endif
CAMLP5O = @CAMLP5O@
LABLGLADECC = @LABLGLADECC@
-HAVE_OCAMLOPT = @HAVE_OCAMLOPT@
+# debian specific limitation of architecture on which native compilers are used
+ifeq "$(shell dpkg-architecture -qDEB_HOST_ARCH)" "alpha"
+ HAVE_OCAMLOPT = no
+else
+ifeq "$(shell dpkg-architecture -qDEB_HOST_ARCH)" "ia64"
+ HAVE_OCAMLOPT = no
+else
+ HAVE_OCAMLOPT = @HAVE_OCAMLOPT@
+endif
+endif
+
DISTRIBUTED = @DISTRIBUTED@
ANNOT = @ANNOT@
-requires="helm-registry sqlite3 mysql helm-extlib"
+requires="helm-registry sqlite3 mysql helm-extlib pcre"
version="0.0.1"
archive(byte)="hmysql.cma"
archive(native)="hmysql.cmxa"
-requires="helm-whelp helm-acic_content helm-ng_refiner helm-disambiguation helm-cic_disambiguation"
+requires="helm-whelp helm-acic_content helm-ng_refiner helm-disambiguation"
version="0.0.1"
archive(byte)="ng_disambiguation.cma"
archive(native)="ng_disambiguation.cmxa"
-content.cmi:
acic2content.cmi: content.cmi
content2cic.cmi: content.cmi
cicNotationUtil.cmi: cicNotationPt.cmo
cicNotationPp.cmi: cicNotationPt.cmo cicNotationEnv.cmi
acic2astMatcher.cmi: cicNotationPt.cmo
termAcicContent.cmi: cicNotationPt.cmo
-cicNotationPt.cmo:
-cicNotationPt.cmx:
content.cmo: content.cmi
content.cmx: content.cmi
acic2content.cmo: content.cmi acic2content.cmi
-content.cmi:
acic2content.cmi: content.cmi
content2cic.cmi: content.cmi
cicNotationUtil.cmi: cicNotationPt.cmx
cicNotationPp.cmi: cicNotationPt.cmx cicNotationEnv.cmi
acic2astMatcher.cmi: cicNotationPt.cmx
termAcicContent.cmi: cicNotationPt.cmx
-cicNotationPt.cmo:
-cicNotationPt.cmx:
content.cmo: content.cmi
content.cmx: content.cmi
acic2content.cmo: content.cmi acic2content.cmi
| Ast.Ident (name, Some substs)
| Ast.Uri (name, Some substs) ->
sprintf "%s \\subst [%s]" name (pp_substs substs)
- | Ast.Implicit `Vector -> "…"
- | Ast.Implicit `JustOne -> "?"
+ | Ast.Implicit `Vector -> "?"
+ | Ast.Implicit `JustOne -> "…"
| Ast.Implicit (`Tagged name) -> "?"^name
| Ast.Meta (index, substs) ->
sprintf "%d[%s]" index
| Ast.Sort (`NCProp s)-> "CProp[" ^ s ^ "]"
| Ast.Symbol (name, _) -> "'" ^ name
- | Ast.UserInput -> "%"
+ | Ast.UserInput -> ""
| Ast.Literal l -> pp_literal l
| Ast.Layout l -> pp_layout l
match pp_parens, t with
| false, _
| true, Ast.Implicit _
- | true, Ast.UserInput
| true, Ast.Sort _
| true, Ast.Ident (_, Some [])
| true, Ast.Ident (_, None) -> t_pp
-proceduralHelpers.cmi:
-proceduralClassify.cmi:
-proceduralOptimizer.cmi:
-proceduralTypes.cmi:
-proceduralMode.cmi:
-proceduralConversion.cmi:
procedural1.cmi: proceduralTypes.cmi
procedural2.cmi: proceduralTypes.cmi
proceduralTeX.cmi: proceduralTypes.cmi
-acic2Procedural.cmi:
proceduralHelpers.cmo: proceduralHelpers.cmi
proceduralHelpers.cmx: proceduralHelpers.cmi
proceduralClassify.cmo: proceduralHelpers.cmi proceduralClassify.cmi
-proceduralHelpers.cmi:
-proceduralClassify.cmi:
-proceduralOptimizer.cmi:
-proceduralTypes.cmi:
-proceduralMode.cmi:
-proceduralConversion.cmi:
procedural1.cmi: proceduralTypes.cmi
procedural2.cmi: proceduralTypes.cmi
proceduralTeX.cmi: proceduralTypes.cmi
-acic2Procedural.cmi:
proceduralHelpers.cmo: proceduralHelpers.cmi
proceduralHelpers.cmx: proceduralHelpers.cmi
proceduralClassify.cmo: proceduralHelpers.cmi proceduralClassify.cmi
-extractor.cmo:
-extractor.cmx:
-extractor_manager.cmo:
-extractor_manager.cmx:
-extractor.cmo:
-extractor.cmx:
-extractor_manager.cmo:
-extractor_manager.cmx:
(fun x _ m -> embed m x) m args
in
m, Terms.Node (Terms.Leaf (hash name):: args)
- let is_eq = function
- | Terms.Node [ Terms.Leaf eqt ; ty; l; r ] when eq eqP eqt ->
- Some (ty,l,r)
- | _ -> None
+ ;;
let saturate bo ty =
let vars, ty = embed [] ty in
let _, bo = embed vars bo in
~max_steps:max_int bag ~g_passives:[g_passives] ~passives
with
| P.Error s -> report_error s; 3
- | P.Unsatisfiable ((bag,_,_,l)::_) ->
+ | P.Unsatisfiable ((bag,_,l)::_) ->
success_msg bag l pp_unit_clause name; 0
| P.Unsatisfiable ([]) ->
report_error "Unsatisfiable but no solution output"; 3
> log
for PROBLEM in `cat $2`; do
echo running on $PROBLEM
- ./TreeLimitedRun -q0 $1 $(($1*2)) ./matitaprover.native --tptppath ~/TPTP-v3.1.1/ $PROBLEM \
+ ./TreeLimitedRun -q0 $1 $(($1*2)) ./matitaprover.native --tptppath ~/TPTP-v3.7.0/ $PROBLEM \
>> log 2>&1
echo So far `grep 'SZS status Unsatisfiable' log|wc -l` solved
done
-table_creator.cmo:
-table_creator.cmx:
-table_creator.cmo:
-table_creator.cmx:
-gallina8Parser.cmi: types.cmo
-grafiteParser.cmi: types.cmo
-grafite.cmi: types.cmo
-engine.cmi:
-types.cmo:
-types.cmx:
-options.cmo:
-options.cmx:
-gallina8Parser.cmo: types.cmo options.cmo gallina8Parser.cmi
-gallina8Parser.cmx: types.cmx options.cmx gallina8Parser.cmi
-gallina8Lexer.cmo: options.cmo gallina8Parser.cmi
-gallina8Lexer.cmx: options.cmx gallina8Parser.cmx
-grafiteParser.cmo: types.cmo options.cmo grafiteParser.cmi
-grafiteParser.cmx: types.cmx options.cmx grafiteParser.cmi
-grafiteLexer.cmo: options.cmo grafiteParser.cmi
-grafiteLexer.cmx: options.cmx grafiteParser.cmx
-grafite.cmo: types.cmo options.cmo grafite.cmi
-grafite.cmx: types.cmx options.cmx grafite.cmi
-engine.cmo: types.cmo options.cmo grafiteParser.cmi grafiteLexer.cmo \
- grafite.cmi gallina8Parser.cmi gallina8Lexer.cmo engine.cmi
-engine.cmx: types.cmx options.cmx grafiteParser.cmx grafiteLexer.cmx \
- grafite.cmx gallina8Parser.cmx gallina8Lexer.cmx engine.cmi
-top.cmo: options.cmo engine.cmi
-top.cmx: options.cmx engine.cmx
+gallina8Parser.cmi : types.cmo
+grafiteParser.cmi : types.cmo
+grafite.cmi : types.cmo
+engine.cmi :
+types.cmo :
+types.cmx :
+options.cmo :
+options.cmx :
+gallina8Parser.cmo : types.cmo options.cmo gallina8Parser.cmi
+gallina8Parser.cmx : types.cmx options.cmx gallina8Parser.cmi
+gallina8Lexer.cmo : options.cmo gallina8Parser.cmi
+gallina8Lexer.cmx : options.cmx gallina8Parser.cmx
+grafiteParser.cmo : types.cmo options.cmo grafiteParser.cmi
+grafiteParser.cmx : types.cmx options.cmx grafiteParser.cmi
+grafiteLexer.cmo : options.cmo grafiteParser.cmi
+grafiteLexer.cmx : options.cmx grafiteParser.cmx
+grafite.cmo : types.cmo options.cmo grafite.cmi
+grafite.cmx : types.cmx options.cmx grafite.cmi
+engine.cmo : types.cmo options.cmo grafiteParser.cmi grafiteLexer.cmo \
+ grafite.cmi gallina8Parser.cmi gallina8Lexer.cmo engine.cmi
+engine.cmx : types.cmx options.cmx grafiteParser.cmx grafiteLexer.cmx \
+ grafite.cmx gallina8Parser.cmx gallina8Lexer.cmx engine.cmi
+top.cmo : options.cmo engine.cmi
+top.cmx : options.cmx engine.cmx
-gallina8Parser.cmi: types.cmx
-grafiteParser.cmi: types.cmx
-grafite.cmi: types.cmx
-engine.cmi:
-types.cmo:
-types.cmx:
-options.cmo:
-options.cmx:
-gallina8Parser.cmo: types.cmx options.cmx gallina8Parser.cmi
-gallina8Parser.cmx: types.cmx options.cmx gallina8Parser.cmi
-gallina8Lexer.cmo: options.cmx gallina8Parser.cmi
-gallina8Lexer.cmx: options.cmx gallina8Parser.cmx
-grafiteParser.cmo: types.cmx options.cmx grafiteParser.cmi
-grafiteParser.cmx: types.cmx options.cmx grafiteParser.cmi
-grafiteLexer.cmo: options.cmx grafiteParser.cmi
-grafiteLexer.cmx: options.cmx grafiteParser.cmx
-grafite.cmo: types.cmx options.cmx grafite.cmi
-grafite.cmx: types.cmx options.cmx grafite.cmi
-engine.cmo: types.cmx options.cmx grafiteParser.cmi grafiteLexer.cmx \
+gallina8Parser.cmi : types.cmx
+grafiteParser.cmi : types.cmx
+grafite.cmi : types.cmx
+engine.cmi :
+types.cmo :
+types.cmx :
+options.cmo :
+options.cmx :
+gallina8Parser.cmo : types.cmx options.cmx gallina8Parser.cmi
+gallina8Parser.cmx : types.cmx options.cmx gallina8Parser.cmi
+gallina8Lexer.cmo : options.cmx gallina8Parser.cmi
+gallina8Lexer.cmx : options.cmx gallina8Parser.cmx
+grafiteParser.cmo : types.cmx options.cmx grafiteParser.cmi
+grafiteParser.cmx : types.cmx options.cmx grafiteParser.cmi
+grafiteLexer.cmo : options.cmx grafiteParser.cmi
+grafiteLexer.cmx : options.cmx grafiteParser.cmx
+grafite.cmo : types.cmx options.cmx grafite.cmi
+grafite.cmx : types.cmx options.cmx grafite.cmi
+engine.cmo : types.cmx options.cmx grafiteParser.cmi grafiteLexer.cmx \
grafite.cmi gallina8Parser.cmi gallina8Lexer.cmx engine.cmi
-engine.cmx: types.cmx options.cmx grafiteParser.cmx grafiteLexer.cmx \
+engine.cmx : types.cmx options.cmx grafiteParser.cmx grafiteLexer.cmx \
grafite.cmx gallina8Parser.cmx gallina8Lexer.cmx engine.cmi
-top.cmo: options.cmx engine.cmi
-top.cmx: options.cmx engine.cmx
+top.cmo : options.cmx engine.cmi
+top.cmx : options.cmx engine.cmx
-cicUniv.cmi:
unshare.cmi: cic.cmo
deannotate.cmi: cic.cmo
cicParser.cmi: cic.cmo
cicUtil.cmi: cic.cmo
helmLibraryObjects.cmi: cic.cmo
-libraryObjects.cmi:
cic_indexable.cmi: cic.cmo
path_indexing.cmi: cic.cmo
cicInspect.cmi: cic.cmo
-cicUniv.cmi:
unshare.cmi: cic.cmx
deannotate.cmi: cic.cmx
cicParser.cmi: cic.cmx
cicUtil.cmi: cic.cmx
helmLibraryObjects.cmi: cic.cmx
-libraryObjects.cmi:
cic_indexable.cmi: cic.cmx
path_indexing.cmi: cic.cmx
cicInspect.cmi: cic.cmx
-eta_fixing.cmi:
-doubleTypeInference.cmi:
-cic2acic.cmi:
cic2Xml.cmi: cic2acic.cmi
eta_fixing.cmo: eta_fixing.cmi
eta_fixing.cmx: eta_fixing.cmi
-eta_fixing.cmi:
-doubleTypeInference.cmi:
-cic2acic.cmi:
cic2Xml.cmi: cic2acic.cmi
eta_fixing.cmo: eta_fixing.cmi
eta_fixing.cmx: eta_fixing.cmi
-cicDisambiguate.cmi:
-disambiguateChoices.cmi:
cicDisambiguate.cmo: cicDisambiguate.cmi
cicDisambiguate.cmx: cicDisambiguate.cmi
disambiguateChoices.cmo: disambiguateChoices.cmi
-cicDisambiguate.cmi:
-disambiguateChoices.cmi:
cicDisambiguate.cmo: cicDisambiguate.cmi
cicDisambiguate.cmx: cicDisambiguate.cmi
disambiguateChoices.cmo: disambiguateChoices.cmi
exception Choice_not_found of string Lazy.t
let num_choices = ref []
-let nnum_choices = ref []
let add_num_choice choice = num_choices := choice :: !num_choices
-let nadd_num_choice choice = nnum_choices := choice :: !nnum_choices
let has_description dsc = (fun x -> fst x = dsc)
List.find (has_description dsc) !num_choices
with Not_found -> raise (Choice_not_found (lazy ("Num with dsc " ^ dsc)))
-let nlookup_num_by_dsc dsc =
- try
- List.find (has_description dsc) !nnum_choices
- with Not_found -> raise (Choice_not_found (lazy ("Num with dsc " ^ dsc)))
-
let mk_choice ~mk_appl ~mk_implicit ~term_of_uri ~term_of_nref (dsc, args, appl_pattern)=
dsc,
`Sym_interp
(** register a new number choice *)
val add_num_choice: Cic.term codomain_item -> unit
- (** register a new number choice *)
-val nadd_num_choice: NCic.term codomain_item -> unit
-
(** {2 Choices lookup}
* for user defined aliases *)
(** @param dsc description (1st component of codomain_item) *)
val lookup_num_by_dsc: string -> Cic.term codomain_item
- (** @param dsc description (1st component of codomain_item) *)
-val nlookup_num_by_dsc: string -> NCic.term codomain_item
-
(** @param symbol symbol as per AST
* @param dsc description (1st component of codomain_item)
*)
let _ =
DisambiguateChoices.add_num_choice
- ("natural number", `Num_interp interp_natural_number);
+ ("natural number", `Num_interp interp_natural_number); (*
DisambiguateChoices.add_num_choice
("Coq natural number",
`Num_interp (fun num -> HelmLibraryObjects.build_nat (int_of_string num)));
HelmLibraryObjects.build_bin_pos num ]
else
assert false))
+ *)
-cicExportation.cmi:
cicExportation.cmo: cicExportation.cmi
cicExportation.cmx: cicExportation.cmi
-cicExportation.cmi:
cicExportation.cmo: cicExportation.cmi
cicExportation.cmx: cicExportation.cmi
-cicLogger.cmi:
-cicEnvironment.cmi:
-cicPp.cmi:
-cicUnivUtils.cmi:
-cicSubstitution.cmi:
-cicMiniReduction.cmi:
-cicReduction.cmi:
-cicTypeChecker.cmi:
-freshNamesGenerator.cmi:
-cicDischarge.cmi:
cicLogger.cmo: cicLogger.cmi
cicLogger.cmx: cicLogger.cmi
cicEnvironment.cmo: cicEnvironment.cmi
-cicLogger.cmi:
-cicEnvironment.cmi:
-cicPp.cmi:
-cicUnivUtils.cmi:
-cicSubstitution.cmi:
-cicMiniReduction.cmi:
-cicReduction.cmi:
-cicTypeChecker.cmi:
-freshNamesGenerator.cmi:
-cicDischarge.cmi:
cicLogger.cmo: cicLogger.cmi
cicLogger.cmx: cicLogger.cmi
cicEnvironment.cmo: cicEnvironment.cmi
-cicMetaSubst.cmi:
-cicMkImplicit.cmi:
-termUtil.cmi:
-coercGraph.cmi:
-cicUnification.cmi:
-cicReplace.cmi:
-cicRefine.cmi:
cicMetaSubst.cmo: cicMetaSubst.cmi
cicMetaSubst.cmx: cicMetaSubst.cmi
cicMkImplicit.cmo: cicMkImplicit.cmi
-cicMetaSubst.cmi:
-cicMkImplicit.cmi:
-termUtil.cmi:
-coercGraph.cmi:
-cicUnification.cmi:
-cicReplace.cmi:
-cicRefine.cmi:
cicMetaSubst.cmo: cicMetaSubst.cmi
cicMetaSubst.cmx: cicMetaSubst.cmi
cicMkImplicit.cmo: cicMkImplicit.cmi
-renderingAttrs.cmi:
-cicNotationLexer.cmi:
-cicNotationParser.cmi:
-mpresentation.cmi:
-box.cmi:
-content2presMatcher.cmi:
termContentPres.cmi: cicNotationParser.cmi
boxPp.cmi: mpresentation.cmi cicNotationPres.cmi box.cmi
cicNotationPres.cmi: mpresentation.cmi box.cmi
-renderingAttrs.cmi:
-cicNotationLexer.cmi:
-cicNotationParser.cmi:
-mpresentation.cmi:
-box.cmi:
-content2presMatcher.cmi:
termContentPres.cmi: cicNotationParser.cmi
boxPp.cmi: mpresentation.cmi cicNotationPres.cmi box.cmi
cicNotationPres.cmi: mpresentation.cmi box.cmi
match magic with
| Ast.List0 (_, None) -> Gramext.Slist0 s
| Ast.List1 (_, None) -> Gramext.Slist1 s
- | Ast.List0 (_, Some l) -> Gramext.Slist0sep (s, gram_of_literal l, false)
- | Ast.List1 (_, Some l) -> Gramext.Slist1sep (s, gram_of_literal l, false)
+ | Ast.List0 (_, Some l) -> Gramext.Slist0sep (s, gram_of_literal l,false)
+ | Ast.List1 (_, Some l) -> Gramext.Slist1sep (s, gram_of_literal l,false)
| _ -> assert false
in
[ Env (List.map Env.list_declaration p_names),
| [],[] -> 0
| [],_ -> ~-1
| _,[] -> 1
- | ((s1::tl1) ),((s2::tl2) ) ->
+ | ((s1::tl1) as x),((s2::tl2) as y) ->
if Gramext.eq_symbol s1 s2 then aux (tl1,tl2)
- else
- let res =
- try Pervasives.compare s1 s2
- with Invalid_argument _ -> 0
- in
- if res = 0 then aux (tl1, tl2) else res
+ else Pervasives.compare x y
in
aux (x,y)
(* use the one below to reset precedence and associativity *)
let invoke_reinit t = aux [] mathonly xref ~-1 t in
match l with
- | A.Sup (A.Layout (A.Sub (t1,t2)), t3)
- | A.Sup (A.AttributedTerm (_,A.Layout (A.Sub (t1,t2))), t3)
- -> Mpres.Msubsup (attrs, invoke' t1, invoke_reinit t2, invoke_reinit t3)
| A.Sub (t1, t2) -> Mpres.Msub (attrs, invoke' t1, invoke_reinit t2)
| A.Sup (t1, t2) -> Mpres.Msup (attrs, invoke' t1, invoke_reinit t2)
| A.Below (t1, t2) -> Mpres.Munder (attrs, invoke' t1, invoke_reinit t2)
;;
let content2pres0
- ?skip_initial_lambdas ?(skip_thm_and_qed=false) term2pres
+ ?skip_initial_lambdas ?(skip_thm_and_qed=false)
+ (term2pres : ?prec:int -> 'a -> 'b)
(id,params,metasenv,obj)
=
match obj with
(TermContentPres.pp_ast ast)))
let ncontent2pres0
- ?skip_initial_lambdas ?(skip_thm_and_qed=false) term2pres
+ ?skip_initial_lambdas ?(skip_thm_and_qed=false)
+ (term2pres : ?prec:int -> 'a -> 'b)
(id,params,metasenv,obj : CicNotationPt.term Content.cobj)
=
match obj with
-disambiguateTypes.cmi:
disambiguate.cmi: disambiguateTypes.cmi
multiPassDisambiguator.cmi: disambiguateTypes.cmi disambiguate.cmi
disambiguateTypes.cmo: disambiguateTypes.cmi
-disambiguateTypes.cmi:
disambiguate.cmi: disambiguateTypes.cmi
multiPassDisambiguator.cmi: disambiguateTypes.cmi disambiguate.cmi
disambiguateTypes.cmo: disambiguateTypes.cmi
fix_instance item (Environment.find item e)
with Not_found -> [])
in
-
- (* items with 1 choice are interpreted ASAP *)
- let aliases, todo_dom =
- let rec aux (aliases,acc) = function
- | [] -> aliases, acc
- | (Node (_, item,extra) as node) :: tl ->
- let choices = lookup_choices item in
- if List.length choices <> 1 then aux (aliases, acc@[node]) tl
- else
- let tl = tl @ extra in
- if Environment.mem item aliases then aux (aliases, acc) tl
- else aux (Environment.add item (List.hd choices) aliases, acc) tl
- in
- aux (aliases,[]) todo_dom
- in
-
(*
(* <benchmark> *)
let _ =
(* for demo to reduce the number of interpretations *)
(true, `Library, true);
]
- else if !debug then
- [ (true, `Multi, true); ]
else
[ (true, `Mono, false);
(true, `Multi, false);
-componentsConf.cmi:
-hExtlib.cmi:
-hMarshal.cmi:
-patternMatcher.cmi:
-hLog.cmi:
-trie.cmi:
-discrimination_tree.cmi:
-hTopoSort.cmi:
-refCounter.cmi:
-graphvizPp.cmi:
componentsConf.cmo: componentsConf.cmi
componentsConf.cmx: componentsConf.cmi
hExtlib.cmo: hExtlib.cmi
-componentsConf.cmi:
-hExtlib.cmi:
-hMarshal.cmi:
-patternMatcher.cmi:
-hLog.cmi:
-trie.cmi:
-discrimination_tree.cmi:
-hTopoSort.cmi:
-refCounter.cmi:
-graphvizPp.cmi:
componentsConf.cmo: componentsConf.cmi
componentsConf.cmx: componentsConf.cmi
hExtlib.cmo: hExtlib.cmi
struct
let attribute fmt (k, v) = fprintf fmt "@[<hv2>%s=@,\"%s\",@]" k v
let attributes attrs fmt = List.iter (attribute fmt) attrs
- let quote_string quote s = if quote then "\"" ^s ^ "\"" else s
let node name ~quote ?(attrs = []) fmt =
- fprintf fmt "@[<hov2>%s@ [" (quote_string quote name);
- attributes attrs fmt;
- fprintf fmt "];@]@,"
-
- let edge ~quote name1 name2 ?(attrs = []) fmt =
- fprintf fmt "@[<hov2>%s ->@ %s@ ["
- (quote_string quote name1) (quote_string quote name2);
+ let quote_string = if quote then "\"" else "" in
+ fprintf fmt "@[<hov2>%s%s%s@ [" quote_string name quote_string;
attributes attrs fmt;
fprintf fmt "];@]@,"
| None -> ())
let node = node ~quote:true
- let edge = edge ~quote:true
+ let edge name1 name2 ?(attrs = []) fmt =
+ fprintf fmt "@[<hov2>%s ->@ %s@ [" name1 name2;
+ attributes attrs fmt;
+ fprintf fmt "];@]@,"
let raw s fmt = pp_print_string fmt s
let trailer fmt = fprintf fmt "@,}@]%!"
end
-http_getter_wget.cmi:
-http_getter_logger.cmi:
-http_getter_misc.cmi:
-http_getter_const.cmi:
http_getter_env.cmi: http_getter_types.cmo
-http_getter_storage.cmi:
http_getter_common.cmi: http_getter_types.cmo
http_getter.cmi: http_getter_types.cmo
-http_getter_types.cmo:
-http_getter_types.cmx:
http_getter_wget.cmo: http_getter_types.cmo http_getter_wget.cmi
http_getter_wget.cmx: http_getter_types.cmx http_getter_wget.cmi
http_getter_logger.cmo: http_getter_logger.cmi
-http_getter_wget.cmi:
-http_getter_logger.cmi:
-http_getter_misc.cmi:
-http_getter_const.cmi:
http_getter_env.cmi: http_getter_types.cmx
-http_getter_storage.cmi:
http_getter_common.cmi: http_getter_types.cmx
http_getter.cmi: http_getter_types.cmx
-http_getter_types.cmo:
-http_getter_types.cmx:
http_getter_wget.cmo: http_getter_types.cmx http_getter_wget.cmi
http_getter_wget.cmx: http_getter_types.cmx http_getter_wget.cmi
http_getter_logger.cmo: http_getter_logger.cmi
grafiteAstPp.cmi: grafiteAst.cmo
grafiteMarshal.cmi: grafiteAst.cmo
-grafiteAst.cmo:
-grafiteAst.cmx:
grafiteAstPp.cmo: grafiteAst.cmo grafiteAstPp.cmi
grafiteAstPp.cmx: grafiteAst.cmx grafiteAstPp.cmi
grafiteMarshal.cmo: grafiteAstPp.cmi grafiteAst.cmo grafiteMarshal.cmi
grafiteAstPp.cmi: grafiteAst.cmx
grafiteMarshal.cmi: grafiteAst.cmx
-grafiteAst.cmo:
-grafiteAst.cmx:
grafiteAstPp.cmo: grafiteAst.cmx grafiteAstPp.cmi
grafiteAstPp.cmx: grafiteAst.cmx grafiteAstPp.cmi
grafiteMarshal.cmo: grafiteAstPp.cmi grafiteAst.cmx grafiteMarshal.cmi
type 'ident intros_spec = int option * 'ident option list
-type 'term auto_params = 'term list option * (string*string) list
+type 'term auto_params = 'term list * (string*string) list
type 'term just =
[ `Term of 'term
type ntactic =
| NApply of loc * CicNotationPt.term
- | NSmartApply of loc * CicNotationPt.term
| NAssert of loc * ((string * [`Decl of CicNotationPt.term | `Def of CicNotationPt.term * CicNotationPt.term]) list * CicNotationPt.term) list
| NCases of loc * CicNotationPt.term * npattern
| NCase1 of loc * string
| NCut of loc * CicNotationPt.term
(* | NDiscriminate of loc * CicNotationPt.term
| NSubst of loc * CicNotationPt.term *)
- | NDestruct of loc * string list option * string list
+ | NDestruct of loc
| NElim of loc * CicNotationPt.term * npattern
| NGeneralize of loc * npattern
| NId of loc
| NIntro of loc * string
- | NIntros of loc * string list
- | NInversion of loc * CicNotationPt.term * npattern
| NLApply of loc * CicNotationPt.term
| NLetIn of loc * npattern * CicNotationPt.term * string
| NReduce of loc * [ `Normalize of bool | `Whd of bool ] * npattern
type nmacro =
| NCheck of loc * CicNotationPt.term
| Screenshot of loc * string
- | NAutoInteractive of loc * CicNotationPt.term auto_params
- | NIntroGuess of loc
(** To be increased each time the command type below changes, used for "safe"
* marshalling *)
-let magic = 34
+let magic = 33
type ('term,'obj) command =
| Index of loc * 'term option (* key *) * UriManager.uri (* value *)
let pp_auto_params ~term_pp (univ, params) =
String.concat " "
(List.map (fun (k,v) -> if v <> "" then k ^ "=" ^ v else k) params) ^
- match univ with
- | None -> ""
- | Some l -> (if params <> [] then " " else "") ^ "by " ^
- String.concat " " (List.map term_pp l)
+ if univ <> [] then
+ (if params <> [] then " " else "") ^ "by " ^
+ String.concat " " (List.map term_pp univ)
+ else ""
;;
let pp_just ~term_pp =
pp_tactic_pattern ~map_unicode_to_tex ~lazy_term_pp ~term_pp in
function
| NApply (_,t) -> "napply " ^ CicNotationPp.pp_term t
- | NSmartApply (_,t) -> "fixme"
- | NAuto (_,(None,flgs)) ->
- "nautobatch" ^
- String.concat " " (List.map (fun a,b -> a ^ "=" ^ b) flgs)
- | NAuto (_,(Some l,flgs)) ->
- "nautobatch" ^ " by " ^
- (String.concat "," (List.map CicNotationPp.pp_term l)) ^
+ | NAuto (_,(l,flgs)) ->
+ "nauto" ^
+ (if l <> [] then (" by " ^
+ (String.concat "," (List.map CicNotationPp.pp_term l))) else "") ^
String.concat " " (List.map (fun a,b -> a ^ "=" ^ b) flgs)
| NCases (_,what,where) -> "ncases " ^ CicNotationPp.pp_term what ^
assert false ^ " " ^ assert false
| NCut (_,t) -> "ncut " ^ CicNotationPp.pp_term t
(*| NDiscriminate (_,t) -> "ndiscriminate " ^ CicNotationPp.pp_term t
| NSubst (_,t) -> "nsubst " ^ CicNotationPp.pp_term t *)
- | NDestruct (_,dom,skip) -> "ndestruct ..."
+ | NDestruct _ -> "ndestruct"
| NElim (_,what,where) -> "nelim " ^ CicNotationPp.pp_term what ^
assert false ^ " " ^ assert false
| NId _ -> "nid"
| NIntro (_,n) -> "#" ^ n
- | NInversion (_,what,where) -> "ninversion " ^ CicNotationPp.pp_term what ^
- assert false ^ " " ^ assert false
| NLApply (_,t) -> "lapply " ^ CicNotationPp.pp_term t
| NRewrite (_,dir,n,where) -> "nrewrite " ^
(match dir with `LeftToRight -> ">" | `RightToLeft -> "<") ^
(term_pp t) arity saturations
(if do_composites then "" else "nocomposites")
-let pp_ncommand ~obj_pp = function
+let pp_ncommand = function
| UnificationHint (_,t, n) ->
"unification hint " ^ string_of_int n ^ " " ^ CicNotationPp.pp_term t
| NDiscriminator (_,_)
| NInverter (_,_,_,_,_)
+ | NObj (_,_)
| NUnivConstraint (_) -> "not supported"
| NCoercion (_) -> "not supported"
- | NObj (_,obj) -> obj_pp obj
| NQed (_) -> "nqed"
| NCopy (_,name,uri,map) ->
"copy " ^ name ^ " from " ^ NUri.string_of_uri uri ^ " with " ^
pp_non_punctuation_tactical tac
^ pp_punctuation_tactical punct
| Command (_, cmd) -> pp_command ~term_pp ~obj_pp cmd ^ "."
- | NCommand (_, cmd) ->
- let obj_pp = Obj.magic obj_pp in
- pp_ncommand ~obj_pp cmd ^ "."
+ | NCommand (_, cmd) -> pp_ncommand cmd ^ "."
let pp_comment ~map_unicode_to_tex ~term_pp ~lazy_term_pp ~obj_pp =
function
-grafiteTypes.cmi:
grafiteSync.cmi: grafiteTypes.cmi
nCicCoercDeclaration.cmi: grafiteTypes.cmi
grafiteEngine.cmi: grafiteTypes.cmi
-grafiteTypes.cmi:
grafiteSync.cmi: grafiteTypes.cmi
nCicCoercDeclaration.cmi: grafiteTypes.cmi
grafiteEngine.cmi: grafiteTypes.cmi
end
;;
-let compute_keys status uri height kind =
- let mk_item ty spec =
- let orig_ty = NTacStatus.mk_cic_term [] ty in
- let status,keys = NnAuto.keys_of_type status orig_ty in
- let keys =
- List.map
- (fun t ->
- snd (NTacStatus.term_of_cic_term status t (NTacStatus.ctx_of t)))
- keys
+let index_obj_for_auto status (uri, height, _, _, kind) =
+ let mk_item orig_ty spec =
+ let ty,_,_ = NCicMetaSubst.saturate ~delta:max_int [] [] [] orig_ty 0 in
+ let keys =
+ match ty with
+ | NCic.Const (NReference.Ref (_,NReference.Def h))
+ | NCic.Appl (NCic.Const (NReference.Ref (_,NReference.Def h))::_)
+ when h > 0 ->
+ let ty',_,_= NCicMetaSubst.saturate ~delta:(h-1) [] [] [] orig_ty 0 in
+ [ty;ty']
+ | _ -> [ty]
in
keys,NCic.Const(NReference.reference_of_spec uri spec)
in
| NCic.Constant (_,_,None, ty, _) ->
[ mk_item ty NReference.Decl ]
in
- HExtlib.filter_map
+ let data = HExtlib.filter_map
(fun (keys, t) ->
let keys = List.filter
(function
NCicPp.ppterm ~metasenv:[] ~subst:[] ~context:[] t);
None
end)
- data
-;;
-
-let index_obj_for_auto status (uri, height, _, _, kind) =
- (*prerr_endline (string_of_int height);*)
- let data = compute_keys status uri height kind in
- let status = basic_index_obj data status in
- let dump = record_index_obj data :: status#dump in
- status#set_dump dump
-;;
-
-let index_eq uri status =
- let eq_status = status#eq_cache in
- let eq_status1 = NCicParamod.index_obj eq_status uri in
- status#set_eq_cache eq_status1
-;;
-
-let record_index_eq =
- let basic_index_eq uri
- ~refresh_uri_in_universe
- ~refresh_uri_in_term
- = index_eq (NCicLibrary.refresh_uri uri)
+ data
in
- NCicLibrary.Serializer.register#run "index_eq"
- object(_ : 'a NCicLibrary.register_type)
- method run = basic_index_eq
- end
-;;
-
-let index_eq_for_auto status uri =
- if NnAuto.is_a_fact_obj status uri then
- let newstatus = index_eq uri status in
- if newstatus#eq_cache == status#eq_cache then status
- else
- ((*prerr_endline ("recording " ^ (NUri.string_of_uri uri));*)
- let dump = record_index_eq uri :: newstatus#dump
- in newstatus#set_dump dump)
- else
- ((*prerr_endline "Not a fact";*)
- status)
+ let status = basic_index_obj data status in
+ let dump = record_index_obj data :: status#dump in
+ status#set_dump dump
;;
+
let basic_eval_add_constraint (u1,u2) status =
NCicLibrary.add_constraint status u1 u2
;;
match punct with
| GrafiteAst.Dot _ -> NTactics.dot_tac
| GrafiteAst.Semicolon _ -> fun x -> x
- | GrafiteAst.Branch _ -> NTactics.branch_tac ~force:false
+ | GrafiteAst.Branch _ -> NTactics.branch_tac
| GrafiteAst.Shift _ -> NTactics.shift_tac
| GrafiteAst.Pos (_,l) -> NTactics.pos_tac l
| GrafiteAst.Wildcard _ -> NTactics.wildcard_tac
let rec aux f (text, prefix_len, tac) =
match tac with
| GrafiteAst.NApply (_loc, t) -> NTactics.apply_tac (text,prefix_len,t)
- | GrafiteAst.NSmartApply (_loc, t) ->
- NnAuto.smart_apply_tac (text,prefix_len,t)
| GrafiteAst.NAssert (_loc, seqs) ->
NTactics.assert_tac
((List.map
) hyps,
(text,prefix_len,concl))
) seqs)
- | GrafiteAst.NAuto (_loc, (None,a)) ->
- NAuto.auto_tac ~params:(None,a) ?trace_ref:None
- | GrafiteAst.NAuto (_loc, (Some l,a)) ->
+ | GrafiteAst.NAuto (_loc, (l,a)) ->
NAuto.auto_tac
- ~params:(Some List.map (fun x -> "",0,x) l,a) ?trace_ref:None
- | GrafiteAst.NBranch _ -> NTactics.branch_tac ~force:false
+ ~params:(List.map (fun x -> "",0,x) l,a)
+ | GrafiteAst.NBranch _ -> NTactics.branch_tac
| GrafiteAst.NCases (_loc, what, where) ->
NTactics.cases_tac
~what:(text,prefix_len,what)
| GrafiteAst.NCut (_loc, t) -> NTactics.cut_tac (text,prefix_len,t)
(*| GrafiteAst.NDiscriminate (_,what) -> NDestructTac.discriminate_tac ~what:(text,prefix_len,what)
| GrafiteAst.NSubst (_,what) -> NDestructTac.subst_tac ~what:(text,prefix_len,what)*)
- | GrafiteAst.NDestruct (_,dom,skip) -> NDestructTac.destruct_tac dom skip
+ | GrafiteAst.NDestruct _ -> NDestructTac.destruct_tac
| GrafiteAst.NDot _ -> NTactics.dot_tac
| GrafiteAst.NElim (_loc, what, where) ->
NTactics.elim_tac
NTactics.generalize_tac ~where:(text,prefix_len,where)
| GrafiteAst.NId _ -> (fun x -> x)
| GrafiteAst.NIntro (_loc,n) -> NTactics.intro_tac n
- | GrafiteAst.NIntros (_loc,ns) -> NTactics.intros_tac ns
- | GrafiteAst.NInversion (_loc, what, where) ->
- NTactics.inversion_tac
- ~what:(text,prefix_len,what)
- ~where:(text,prefix_len,where)
| GrafiteAst.NLApply (_loc, t) -> NTactics.lapply_tac (text,prefix_len,t)
| GrafiteAst.NLetIn (_loc,where,what,name) ->
NTactics.letin_tac ~where:(text,prefix_len,where)
| GrafiteAst.NUnfocus _ -> NTactics.unfocus_tac
| GrafiteAst.NWildcard _ -> NTactics.wildcard_tac
| GrafiteAst.NTry (_,tac) -> NTactics.try_tac
- (f f (text, prefix_len, tac))
+ (aux f (text, prefix_len, tac))
| GrafiteAst.NAssumption _ -> NTactics.assumption_tac
| GrafiteAst.NBlock (_,l) ->
NTactics.block_tac (List.map (fun x -> aux f (text,prefix_len,x)) l)
| _ -> obj_kind
in
let obj = uri,height,[],[],obj_kind in
- (*prerr_endline ("pp new obj \n"^NCicPp.ppobj obj);*)
let old_status = status in
let status = NCicLibrary.add_obj status obj in
- let index_obj =
- match obj_kind with
- NCic.Constant (_,_,_,_,(_,`Example,_))
- | NCic.Fixpoint (_,_,(_,`Example,_)) -> false
- | _ -> true
- in
- let status =
- if index_obj then
- let status = index_obj_for_auto status obj in
- (try index_eq_for_auto status uri
- with _ -> status)
- else
- status in
-(*
- try
- index_eq uri status
- with _ -> prerr_endline "got an exception"; status
- in *)
+ let status = index_obj_for_auto status obj in
(* prerr_endline (NCicPp.ppobj obj); *)
HLog.message ("New object: " ^ NUri.string_of_uri uri);
(try
in
if nstatus#ng_mode <> `CommandMode then
begin
- (*HLog.warn "error in generating projection/eliminator";*)
- status, uris
+ HLog.error "error in generating projection/eliminator";
+ prerr_endline (NCicPp.ppobj nstatus#obj);
+ nstatus, uris
end
else
nstatus, concat_nuris uris nuris
with
- | MultiPassDisambiguator.DisambiguationError _
+ | MultiPassDisambiguator.DisambiguationError _
| NCicTypeChecker.TypeCheckerFailure _ ->
- (*HLog.warn "error in generating projection/eliminator";*)
+ HLog.warn "error in generating projection/eliminator";
status,uris
) (status,`New [] (* uris *)) boxml in
let _,_,_,_,nobj = obj in
let status = match nobj with
- NCic.Inductive (is_ind,leftno,[it],_) ->
+ NCic.Inductive (true,leftno,[it],_) ->
let _,ind_name,ty,cl = it in
List.fold_left
(fun status outsort ->
let status = status#set_ng_mode `ProofMode in
try
- (let status,invobj =
- NInversion.mk_inverter
- (ind_name ^ "_inv_" ^
- (snd (NCicElim.ast_of_sort outsort)))
- is_ind it leftno outsort status status#baseuri in
+ (let status,invobj = NInversion.mk_inverter
+ (ind_name ^ "_inv_" ^ (snd (NCicElim.ast_of_sort outsort)))
+ it leftno outsort status status#baseuri in
let _,_,menv,_,_ = invobj in
fst (match menv with
[] -> eval_ncommand opts status ("",0,GrafiteAst.NQed Stdpp.dummy_loc)
| _ -> status,`New []))
(* XXX *)
- with _ -> (*HLog.warn "error in generating inversion principle"; *)
+ with _ -> HLog.warn "error in generating inversion principle";
let status = status#set_ng_mode `CommandMode in status)
status
(NCic.Prop::
indtyno, NCicEnvironment.get_checked_indtys r
| _ -> prerr_endline ("engine: indty =" ^ NCicPp.ppterm ~metasenv:[] ~subst:[] ~context:[] indty) ; assert false in
let it = List.nth tys indtyno in
- let status,obj = NInversion.mk_inverter name true it leftno ?selection sort
+ let status,obj = NInversion.mk_inverter name it leftno ?selection sort
status status#baseuri in
let _,_,menv,_,_ = obj in
(match menv with
let diff = S.diff s2 s1 in
S.fold (fun uri uris -> uri :: uris) diff []
-let initial_status lexicon_status baseuri =
- (new GrafiteTypes.status baseuri)#set_lstatus lexicon_status#lstatus
-;;
-
-let time_travel ~present ?(past=initial_status present present#baseuri) () =
+let time_travel ~present ~past =
let objs_to_remove =
uri_list_diff present#objects past#objects in
List.iter LibrarySync.remove_obj objs_to_remove;
NCicLibrary.time_travel past
;;
-let init lexicon_status =
+let initial_status lexicon_status baseuri =
+ (new GrafiteTypes.status baseuri)#set_lstatus lexicon_status#lstatus
+;;
+
+let init baseuri =
CoercDb.restore CoercDb.empty_coerc_db;
LibraryObjects.reset_defaults ();
- initial_status lexicon_status
+ initial_status baseuri
;;
let pop () =
LibrarySync.pop ();
GrafiteTypes.status -> UriManager.uri -> GrafiteTypes.status
val time_travel:
- present:GrafiteTypes.status -> ?past:GrafiteTypes.status -> unit -> unit
+ present:GrafiteTypes.status -> past:GrafiteTypes.status -> unit
(* also resets the imperative part of the status
* init: the baseuri of the current script *)
\ / This software is distributed as is, NO WARRANTY.
V_______________________________________________________________ *)
-(* let debug s = prerr_endline (Lazy.force s) ;;*)
+let debug s = prerr_endline (Lazy.force s) ;;
let debug _ = ();;
let skel_dummy = NCic.Implicit `Type;;
let src_tgt_cpos_arity_of_ty_id_src_tgt status ty id src tgt =
let status, src, cpos =
let rec aux cpos ctx = function
- | NCic.Prod (name,ty,bo) ->
+ | NCic.Prod (name,ty,bo) ->
if name <> id then aux (cpos+1) ((name,NCic.Decl ty)::ctx) bo
else
(try
diverge (mk "") 0
;;
-exception Stop;;
let close_graph name t s d to_s from_d p a status =
let c =
let c_o_from_d =
product
(fun (n,mc,c,_,j) (n1,m1,t1,ty,i) ->
- compose_names n n1,m1@mc,t1,[i,c],j,count_prod ty)
+ compose_names n1 n,m1@mc,t1,[i,c],j,count_prod ty)
[c] from_d
in
let to_s_o_c_o_from_d =
product
(fun (n1,m1,t1,_,j) (n,m,t,upl,i,a)->
- compose_names n1 n,m@m1,t,(i,t1)::upl,j,a)
+ compose_names n n1,m@m1,t,(i,t1)::upl,j,a)
to_s c_o_from_d
in
to_s_o_c @ c_o_from_d @ to_s_o_c_o_from_d
let pos =
match p with
| NCic.Meta (p,_) -> pos_in_list p (List.map fst metasenv)
- | t -> raise Stop
+ | t -> assert false
in
let ty = NCicTypeChecker.typeof ~metasenv:[] ~subst:[] [] bo in
let src,tgt = src_tgt_of_ty_cpos_arity ty pos arity in
let src = only_head src in
let tgt = only_head tgt in
debug (lazy(
- "composite " ^ name ^ ": "^
+ "composite: "^
NCicPp.ppterm ~metasenv:[] ~subst:[] ~context:[] bo ^ " : " ^
NCicPp.ppterm ~metasenv:[] ~subst:[] ~context:[] ty ^ " as " ^
NCicPp.ppterm ~metasenv:[] ~subst:[] ~context:[] src ^ " ===> " ^
with
| NCicTypeChecker.TypeCheckerFailure _
| NCicUnification.UnificationFailure _
- | NCicUnification.Uncertain _ | Stop -> None
+ | NCicUnification.Uncertain _ -> None
) composites
in
composites
-dependenciesParser.cmi:
-grafiteParser.cmi:
-cicNotation2.cmi:
-nEstatus.cmi:
grafiteDisambiguate.cmi: nEstatus.cmi
-print_grammar.cmi:
dependenciesParser.cmo: dependenciesParser.cmi
dependenciesParser.cmx: dependenciesParser.cmi
grafiteParser.cmo: grafiteParser.cmi
-dependenciesParser.cmi:
-grafiteParser.cmi:
-cicNotation2.cmi:
-nEstatus.cmi:
grafiteDisambiguate.cmi: nEstatus.cmi
-print_grammar.cmi:
dependenciesParser.cmo: dependenciesParser.cmi
dependenciesParser.cmx: dependenciesParser.cmi
grafiteParser.cmo: grafiteParser.cmi
Printf.sprintf "GrafiteDisambiguate.singleton (%s): %u interpretations"
msg (List.length l)
in
- prerr_endline debug; assert false
+ HLog.debug debug; assert false
let __Implicit = "__Implicit__"
let __Closed_Implicit = "__Closed_Implicit__"
~term_of_nref:(fun nref -> NCic.Const nref)
name dsc
| LexiconAst.Number_alias (_, dsc) ->
- (try
- let desc,f = DisambiguateChoices.nlookup_num_by_dsc dsc in
- desc, `Num_interp
- (fun num -> match f with `Num_interp f -> f num | _ -> assert false)
- with
- DisambiguateChoices.Choice_not_found _ ->
- let desc,f = DisambiguateChoices.lookup_num_by_dsc dsc in
- desc, `Num_interp
+ let desc,f = DisambiguateChoices.lookup_num_by_dsc dsc in
+ desc, `Num_interp
(fun num ->
fst (OCic2NCic.convert_term
(UriManager.uri_of_string "cic:/xxx/x.con")
- (match f with `Num_interp f -> f num | _ -> assert false))))
+ (match f with `Num_interp f -> f num | _ -> assert false)))
| LexiconAst.Ident_alias (name, uri) ->
uri, `Sym_interp
(fun l->assert(l = []);
;;
let disambiguate_auto_params
- disambiguate_term metasenv context (oterms, params)
+ disambiguate_term metasenv context (terms, params)
=
- match oterms with
- | None -> metasenv, (None, params)
- | Some terms ->
- let metasenv, terms =
- List.fold_right
- (fun t (metasenv, terms) ->
- let metasenv,t = disambiguate_term context metasenv t in
- metasenv,t::terms) terms (metasenv, [])
- in
- metasenv, (Some terms, params)
+ let metasenv, terms =
+ List.fold_right
+ (fun t (metasenv, terms) ->
+ let metasenv,t = disambiguate_term context metasenv t in
+ metasenv,t::terms) terms (metasenv, [])
+ in
+ metasenv, (terms, params)
;;
let disambiguate_just disambiguate_term context metasenv =
| G.Semicolon loc -> G.NSemicolon loc
| G.Dot loc -> G.NDot loc
;;
-let cons_ntac t p =
- match t with
- | G.NTactic(loc,[t]) -> G.NTactic(loc,[t;p])
- | x -> x
-;;
type by_continuation =
BYC_done
| id = IDENT -> Some id ]
];
ident_list0: [ [ LPAREN; idents = LIST0 new_name; RPAREN -> idents ] ];
- ident_list1: [ [ LPAREN; idents = LIST1 IDENT; RPAREN -> idents ] ];
tactic_term_list1: [
[ tactic_terms = LIST1 tactic_term SEP SYMBOL "," -> tactic_terms ]
];
];
using: [ [ using = OPT [ IDENT "using"; t = tactic_term -> t ] -> using ] ];
ntactic: [
- [ IDENT "napply"; t = tactic_term -> G.NTactic(loc,[G.NApply (loc, t)])
- | IDENT "napplyS"; t = tactic_term -> G.NTactic(loc,[G.NSmartApply(loc, t)])
+ [ IDENT "napply"; t = tactic_term -> G.NApply (loc, t)
| IDENT "nassert";
seqs = LIST0 [
hyps = LIST0
id,`Def (bo,ty)];
SYMBOL <:unicode<vdash>>;
concl = tactic_term -> (List.rev hyps,concl) ] ->
- G.NTactic(loc,[G.NAssert (loc, seqs)])
- | IDENT "nauto"; params = auto_params ->
- G.NTactic(loc,[G.NAuto (loc, params)])
- | SYMBOL "/"; num = OPT NUMBER ;
- params = nauto_params; SYMBOL "/" ;
- just = OPT [ IDENT "by"; by =
- [ univ = tactic_term_list1 -> `Univ univ
- | SYMBOL "{"; SYMBOL "}" -> `EmptyUniv
- | SYMBOL "_" -> `Trace ] -> by ] ->
- let depth = match num with Some n -> n | None -> "1" in
- (match just with
- | None ->
- G.NTactic(loc,
- [G.NAuto(loc,(None,["slir","";"depth",depth]@params))])
- | Some (`Univ univ) ->
- G.NTactic(loc,
- [G.NAuto(loc,(Some univ,["slir","";"depth",depth]@params))])
- | Some `EmptyUniv ->
- G.NTactic(loc,
- [G.NAuto(loc,(Some [],["slir","";"depth",depth]@params))])
- | Some `Trace ->
- G.NMacro(loc,
- G.NAutoInteractive (loc, (None,["slir","";"depth",depth]@params))))
- | IDENT "nintros" -> G.NMacro (loc, G.NIntroGuess loc)
- | IDENT "ncheck"; t = term -> G.NMacro(loc,G.NCheck (loc,t))
- | IDENT "screenshot"; fname = QSTRING ->
- G.NMacro(loc,G.Screenshot (loc, fname))
+ G.NAssert (loc, seqs)
+ | IDENT "nauto"; params = auto_params -> G.NAuto (loc, params)
| IDENT "ncases"; what = tactic_term ; where = pattern_spec ->
- G.NTactic(loc,[G.NCases (loc, what, where)])
+ G.NCases (loc, what, where)
| IDENT "nchange"; what = pattern_spec; "with"; with_what = tactic_term ->
- G.NTactic(loc,[G.NChange (loc, what, with_what)])
+ G.NChange (loc, what, with_what)
| SYMBOL "@"; num = OPT NUMBER; l = LIST0 tactic_term ->
- G.NTactic(loc,[G.NConstructor (loc, (match num with None -> None | Some x -> Some (int_of_string x)),l)])
- | IDENT "ncut"; t = tactic_term -> G.NTactic(loc,[G.NCut (loc, t)])
+ G.NConstructor (loc,
+ (match num with None -> None | Some x -> Some (int_of_string x)),l)
+ | IDENT "ncut"; t = tactic_term -> G.NCut (loc, t)
(* | IDENT "ndiscriminate"; t = tactic_term -> G.NDiscriminate (loc, t)
| IDENT "nsubst"; t = tactic_term -> G.NSubst (loc, t) *)
- | IDENT "ndestruct"; just = OPT [ dom = ident_list1 -> dom ];
- exclude = OPT [ IDENT "skip"; skip = ident_list1 -> skip ]
- -> let exclude' = match exclude with None -> [] | Some l -> l in
- G.NTactic(loc,[G.NDestruct (loc,just,exclude')])
+ | IDENT "ndestruct" -> G.NDestruct loc
| IDENT "nelim"; what = tactic_term ; where = pattern_spec ->
- G.NTactic(loc,[G.NElim (loc, what, where)])
+ G.NElim (loc, what, where)
| IDENT "ngeneralize"; p=pattern_spec ->
- G.NTactic(loc,[G.NGeneralize (loc, p)])
- | IDENT "ninversion"; what = tactic_term ; where = pattern_spec ->
- G.NTactic(loc,[G.NInversion (loc, what, where)])
- | IDENT "nlapply"; t = tactic_term -> G.NTactic(loc,[G.NLApply (loc, t)])
+ G.NGeneralize (loc, p)
+ | IDENT "nlapply"; t = tactic_term -> G.NLApply (loc, t)
| IDENT "nletin"; name = IDENT ; SYMBOL <:unicode<def>> ; t = tactic_term;
where = pattern_spec ->
- G.NTactic(loc,[G.NLetIn (loc,where,t,name)])
+ G.NLetIn (loc,where,t,name)
| kind = nreduction_kind; p = pattern_spec ->
- G.NTactic(loc,[G.NReduce (loc, kind, p)])
+ G.NReduce (loc, kind, p)
| IDENT "nrewrite"; dir = direction; what = tactic_term ; where = pattern_spec ->
- G.NTactic(loc,[G.NRewrite (loc, dir, what, where)])
- | IDENT "ntry"; tac = SELF ->
- let tac = match tac with G.NTactic(_,[t]) -> t | _ -> assert false in
- G.NTactic(loc,[ G.NTry (loc,tac)])
- | IDENT "nrepeat"; tac = SELF ->
- let tac = match tac with G.NTactic(_,[t]) -> t | _ -> assert false in
- G.NTactic(loc,[ G.NRepeat (loc,tac)])
- | LPAREN; l = LIST1 SELF; RPAREN ->
- let l =
- List.flatten
- (List.map (function G.NTactic(_,t) -> t | _ -> assert false) l) in
- G.NTactic(loc,[G.NBlock (loc,l)])
- | IDENT "nassumption" -> G.NTactic(loc,[ G.NAssumption loc])
- | SYMBOL "#"; ns=LIST0 IDENT -> G.NTactic(loc,[ G.NIntros (loc,ns)])
- | SYMBOL "#"; SYMBOL "_" -> G.NTactic(loc,[ G.NIntro (loc,"_")])
- | SYMBOL "*" -> G.NTactic(loc,[ G.NCase1 (loc,"_")])
- | SYMBOL "*"; n=IDENT -> G.NTactic(loc,[ G.NCase1 (loc,n)])
+ G.NRewrite (loc, dir, what, where)
+ | IDENT "ntry"; tac = SELF -> G.NTry (loc,tac)
+ | IDENT "nrepeat"; tac = SELF -> G.NRepeat (loc,tac)
+ | LPAREN; l = LIST1 SELF; RPAREN -> G.NBlock (loc,l)
+ | IDENT "nassumption" -> G.NAssumption loc
+ | SYMBOL "#"; n=IDENT -> G.NIntro (loc,n)
+ | SYMBOL "#"; SYMBOL "_" -> G.NIntro (loc,"_")
+ | SYMBOL "*" -> G.NCase1 (loc,"_")
+ | SYMBOL "*"; n=IDENT ->
+ G.NCase1 (loc,n)
]
];
tactic: [
| "let" ; id1 = IDENT ; SYMBOL ":" ; t1 = tactic_term ;
IDENT "such" ; IDENT "that" ; t2=tactic_term ; LPAREN ;
id2 = IDENT ; RPAREN ->
- G.ExistsElim (loc, `Auto (None,[]), id1, t1, id2, t2)
+ G.ExistsElim (loc, `Auto ([],[]), id1, t1, id2, t2)
| just =
[ IDENT "using"; t=tactic_term -> `Term t
| params = auto_params -> `Auto params] ;
];
auto_fixed_param: [
[ IDENT "paramodulation"
- | IDENT "demod"
- | IDENT "fast_paramod"
- | IDENT "paramod"
- | IDENT "slir"
| IDENT "depth"
| IDENT "width"
| IDENT "size"
]
];
auto_params: [
- [ params =
+ [ params =
LIST0 [
i = auto_fixed_param -> i,""
| i = auto_fixed_param ; SYMBOL "="; v = [ v = int ->
string_of_int v | v = IDENT -> v ] -> i,v ];
- tl = OPT [ IDENT "by"; tl = tactic_term_list1 -> tl] -> tl,
- (* (match tl with Some l -> l | None -> []), *)
+ tl = OPT [ IDENT "by"; tl = tactic_term_list1 -> tl] ->
+ (match tl with Some l -> l | None -> []),
params
]
];
- nauto_params: [
- [ params =
- LIST0 [
- i = auto_fixed_param -> i,""
- | i = auto_fixed_param ; SYMBOL "="; v = [ v = int ->
- string_of_int v | v = IDENT -> v ] -> i,v ] ->
- params
- ]
-];
-
inline_params:[
[ params = LIST0
[ IDENT "prefix"; SYMBOL "="; prefix = QSTRING -> G.IPPrefix prefix
(params,name,typ,fields)
] ];
+ nmacro: [
+ [ [ IDENT "ncheck" ]; t = term -> G.NCheck (loc,t)
+ | [ IDENT "screenshot"]; fname = QSTRING -> G.Screenshot (loc, fname)
+ ]
+ ];
+
macro: [
[ [ IDENT "check" ]; t = term ->
G.Check (loc, t)
| tac = atomic_tactical LEVEL "loops"; punct = punctuation_tactical ->
G.Tactic (loc, Some tac, punct)
| punct = punctuation_tactical -> G.Tactic (loc, None, punct)
- | tac = ntactic; OPT [ SYMBOL "#" ; SYMBOL "#" ] ;
- punct = punctuation_tactical ->
- cons_ntac tac (npunct_of_punct punct)
-(*
+ | tac = ntactic; SYMBOL "#" ; SYMBOL "#" ; punct = punctuation_tactical ->
+ G.NTactic (loc, [tac; npunct_of_punct punct])
| tac = ntactic; punct = punctuation_tactical ->
- cons_ntac tac (npunct_of_punct punct)
-*)
+ G.NTactic (loc, [tac; npunct_of_punct punct])
| SYMBOL "#" ; SYMBOL "#" ; punct = npunctuation_tactical ->
G.NTactic (loc, [punct])
| tac = non_punctuation_tactical; punct = punctuation_tactical ->
punct = punctuation_tactical ->
G.NTactic (loc, [nnon_punct_of_punct tac; npunct_of_punct punct])
| mac = macro; SYMBOL "." -> G.Macro (loc, mac)
+ | mac = nmacro; SYMBOL "." -> G.NMacro (loc, mac)
]
];
comment: [
-domMisc.cmi:
-xml2Gdome.cmi:
domMisc.cmo: domMisc.cmi
domMisc.cmx: domMisc.cmi
xml2Gdome.cmo: xml2Gdome.cmi
-domMisc.cmi:
-xml2Gdome.cmi:
domMisc.cmo: domMisc.cmi
domMisc.cmx: domMisc.cmi
xml2Gdome.cmo: xml2Gdome.cmi
-hSql.cmi:
-hSqlite3.cmo:
-hSqlite3.cmx:
-hMysql.cmo:
-hMysql.cmx:
hSql.cmo: hSqlite3.cmo hMysql.cmo hSql.cmi
hSql.cmx: hSqlite3.cmx hMysql.cmx hSql.cmi
-hSql.cmi:
-hSqlite3.cmo:
-hSqlite3.cmx:
-hMysql.cmo:
-hMysql.cmx:
hSql.cmo: hSqlite3.cmx hMysql.cmx hSql.cmi
hSql.cmx: hSqlite3.cmx hMysql.cmx hSql.cmi
cicNotation.cmi: lexiconAst.cmo
lexiconEngine.cmi: lexiconMarshal.cmi lexiconAst.cmo cicNotation.cmi
lexiconSync.cmi: lexiconEngine.cmi lexiconAst.cmo
-lexiconAst.cmo:
-lexiconAst.cmx:
lexiconAstPp.cmo: lexiconAst.cmo lexiconAstPp.cmi
lexiconAstPp.cmx: lexiconAst.cmx lexiconAstPp.cmi
lexiconMarshal.cmo: lexiconAstPp.cmi lexiconAst.cmo lexiconMarshal.cmi
cicNotation.cmi: lexiconAst.cmx
lexiconEngine.cmi: lexiconMarshal.cmi lexiconAst.cmx cicNotation.cmi
lexiconSync.cmi: lexiconEngine.cmi lexiconAst.cmx
-lexiconAst.cmo:
-lexiconAst.cmx:
lexiconAstPp.cmo: lexiconAst.cmx lexiconAstPp.cmi
lexiconAstPp.cmx: lexiconAst.cmx lexiconAstPp.cmi
lexiconMarshal.cmo: lexiconAstPp.cmi lexiconAst.cmx lexiconMarshal.cmi
-librarian.cmi:
-libraryMisc.cmi:
-libraryDb.cmi:
-coercDb.cmi:
cicCoercion.cmi: coercDb.cmi
-librarySync.cmi:
-cicElim.cmi:
-cicRecord.cmi:
-cicFix.cmi:
-libraryClean.cmi:
librarian.cmo: librarian.cmi
librarian.cmx: librarian.cmi
libraryMisc.cmo: libraryMisc.cmi
-librarian.cmi:
-libraryMisc.cmi:
-libraryDb.cmi:
-coercDb.cmi:
cicCoercion.cmi: coercDb.cmi
-librarySync.cmi:
-cicElim.cmi:
-cicRecord.cmi:
-cicFix.cmi:
-libraryClean.cmi:
librarian.cmo: librarian.cmi
librarian.cmx: librarian.cmi
libraryMisc.cmo: libraryMisc.cmi
-helmLogger.cmi:
helmLogger.cmo: helmLogger.cmi
helmLogger.cmx: helmLogger.cmi
-helmLogger.cmi:
helmLogger.cmo: helmLogger.cmi
helmLogger.cmx: helmLogger.cmi
-sqlStatements.cmi:
-metadataTypes.cmi:
metadataExtractor.cmi: metadataTypes.cmi
metadataPp.cmi: metadataTypes.cmi
metadataConstraints.cmi: metadataTypes.cmi
-sqlStatements.cmi:
-metadataTypes.cmi:
metadataExtractor.cmi: metadataTypes.cmi
metadataPp.cmi: metadataTypes.cmi
metadataConstraints.cmi: metadataTypes.cmi
-ncic2astMatcher.cmi:
-nTermCicContent.cmi:
ncic2astMatcher.cmo: ncic2astMatcher.cmi
ncic2astMatcher.cmx: ncic2astMatcher.cmi
nTermCicContent.cmo: ncic2astMatcher.cmi nTermCicContent.cmi
-ncic2astMatcher.cmi:
-nTermCicContent.cmi:
ncic2astMatcher.cmo: ncic2astMatcher.cmi
ncic2astMatcher.cmx: ncic2astMatcher.cmi
nTermCicContent.cmo: ncic2astMatcher.cmi nTermCicContent.cmi
String.sub name 4 (String.length name - 4)
;;
-let destroy_nat =
- let is_nat_URI = NUri.eq (NUri.uri_of_string
- "cic:/matita/ng/arithmetics/nat/nat.ind") in
- let is_zero = function
- | NCic.Const (NReference.Ref (uri, NReference.Con (0, 1, 0))) when
- is_nat_URI uri -> true
- | _ -> false
- in
- let is_succ = function
- | NCic.Const (NReference.Ref (uri, NReference.Con (0, 2, 0))) when
- is_nat_URI uri -> true
- | _ -> false
- in
- let rec aux acc = function
- | NCic.Appl [he ; tl] when is_succ he -> aux (acc + 1) tl
- | t when is_zero t -> Some acc
- | _ -> None
- in
- aux 0
-
(* CODICE c&p da NCicPp *)
let nast_of_cic0 status
~(idref:
| NCic.Appl l -> NCic.Appl (l@args)
| _ -> NCic.Appl (hd :: args)))
| NCic.Appl args as t ->
- (match destroy_nat t with
- | Some n -> idref (Ast.Num (string_of_int n, -1))
- | None ->
- let args =
- if not !Acic2content.hide_coercions then args
- else
- match
- NCicCoercion.match_coercion status ~metasenv ~context ~subst t
- with
- | None -> args
- | Some (_,sats,cpos) ->
+ let args =
+ if not !Acic2content.hide_coercions then args
+ else
+ match
+ NCicCoercion.match_coercion status ~metasenv ~context ~subst t
+ with
+ | None -> args
+ | Some (_,sats,cpos) ->
(* CSC: sats e' il numero di pi, ma non so cosa farmene! voglio il numero di
argomenti da saltare, come prima! *)
- if cpos < List.length args - 1 then
- List.nth args (cpos + 1) ::
- try snd (HExtlib.split_nth (cpos+sats+2) args)
- with Failure _->[]
- else
- args
- in
- (match args with
- [arg] -> idref (k ~context arg)
- | _ -> idref (Ast.Appl (List.map (k ~context) args))))
+ if cpos < List.length args - 1 then
+ List.nth args (cpos + 1) ::
+ try snd (HExtlib.split_nth (cpos+sats+2) args) with Failure _->[]
+ else
+ args
+ in
+ (match args with
+ [arg] -> idref (k ~context arg)
+ | _ -> idref (Ast.Appl (List.map (k ~context) args)))
| NCic.Match (NReference.Ref (uri,_) as r,outty,te,patterns) ->
let name = NUri.name_of_uri uri in
(* CSC
-nCicDisambiguate.cmi:
nCicDisambiguate.cmo: nCicDisambiguate.cmi
nCicDisambiguate.cmx: nCicDisambiguate.cmi
-nnumber_notation.cmo:
-nnumber_notation.cmx:
-nCicDisambiguate.cmi:
nCicDisambiguate.cmo: nCicDisambiguate.cmi
nCicDisambiguate.cmx: nCicDisambiguate.cmi
-nnumber_notation.cmo:
-nnumber_notation.cmx:
INTERFACE_FILES = nCicDisambiguate.mli
IMPLEMENTATION_FILES = \
- $(INTERFACE_FILES:%.mli=%.ml) nnumber_notation.ml
+ $(INTERFACE_FILES:%.mli=%.ml)
EXTRA_OBJECTS_TO_INSTALL =
EXTRA_OBJECTS_TO_CLEAN =
%.cmo: OCAMLOPTIONS += -w Ae
include ../../Makefile.defs
include ../Makefile.common
-OCAMLARCHIVEOPTIONS += -linkall
with NRef.IllFormedReference _ ->
CicNotationPt.fail loc "Ill formed reference")
| CicNotationPt.NRef nref -> NCic.Const nref
- | CicNotationPt.NCic t -> t
+ | CicNotationPt.NCic t ->
+ let context = (* to make metas_of_term happy *)
+ List.map (fun x -> x,NCic.Decl (NCic.Implicit `Type)) context in
+ assert(NCicUntrusted.metas_of_term [] context t = []); t
| CicNotationPt.Implicit `Vector -> NCic.Implicit `Vector
| CicNotationPt.Implicit `JustOne -> NCic.Implicit `Term
| CicNotationPt.Implicit (`Tagged s) -> NCic.Implicit (`Tagged s)
| `MutualDefinition -> `Definition
| `Fact -> `Fact
| `Lemma -> `Lemma
- | `Remark -> `Example
+ | `Remark -> `Corollary
| `Theorem -> `Theorem
| `Variant -> `Corollary
| `Axiom -> `Fact
+++ /dev/null
-(* Copyright (C) 2004, HELM Team.
- *
- * This file is part of HELM, an Hypertextual, Electronic
- * Library of Mathematics, developed at the Computer Science
- * Department, University of Bologna, Italy.
- *
- * HELM is free software; you can redistribute it and/or
- * modify it under the terms of the GNU General Public License
- * as published by the Free Software Foundation; either version 2
- * of the License, or (at your option) any later version.
- *
- * HELM is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with HELM; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston,
- * MA 02111-1307, USA.
- *
- * For details, see the HELM World-Wide-Web page,
- * http://helm.cs.unibo.it/
- *)
-
-(* $Id: number_notation.ml 9771 2009-05-14 13:43:55Z fguidi $ *)
-
-let error msg =
- raise (DisambiguateTypes.Invalid_choice (lazy (Stdpp.dummy_loc, msg)))
-
-let build_nat o s str =
- let n = int_of_string str in
- if n < 0 then error (str ^ " is not a valid natural number number") else
- let rec aux n = if n = 0 then o () else s (aux (pred n)) in
- aux n
-
-let ninterp_natural_number num =
- (*
- let nat_URI = match Obj.nat_URI () with
- | Some uri -> uri
- | None -> error "no default natural numbers"
- in
- *)
- let nat_URI = NUri.uri_of_string "cic:/matita/ng/arithmetics/nat/nat.ind" in
- let o () =
- NCic.Const
- (NReference.reference_of_spec nat_URI (NReference.Con (0,1,0))) in
- let s t =
- NCic.Appl
- [NCic.Const
- (NReference.reference_of_spec nat_URI (NReference.Con (0,2,0)));
- t] in
- build_nat o s num
-
-let _ =
- DisambiguateChoices.nadd_num_choice
- ("nnatural number", `Num_interp ninterp_natural_number);
-;;
-nUri.cmi:
nReference.cmi: nUri.cmi
nCicUtils.cmi: nCic.cmo
nCicSubstitution.cmi: nCic.cmo
-nUri.cmi:
nReference.cmi: nUri.cmi
nCicUtils.cmi: nCic.cmx
nCicSubstitution.cmi: nCic.cmx
lazy (fst (reduce ~delta:0 c)),
(fun delta -> fst (reduce ~delta c)),
lazy (unwind c)
- let from_stack ~delta (c0,c,_) = if delta = 0 then Lazy.force c0 else c delta
+ let from_stack ~delta (c0,c,_) = if delta = 0 then Lazy.force c0 else c delta
let from_stack_list_for_unwind ~unwind:_ l =
List.map (fun (_,_,c) -> Lazy.force c) l
let from_env ~delta (c0,c,_) = if delta = 0 then Lazy.force c0 else c delta
let reduce_machine = R.reduce
let from_stack = RS.from_stack
-let from_env = RS.from_env
let unwind = R.unwind
let _ =
delta:int -> ?subst:NCic.substitution -> NCic.context -> machine ->
machine * bool
val from_stack : delta:int -> stack_item -> machine
-val from_env : delta:int -> environment_item -> machine
val unwind : machine -> NCic.term
val split_prods:
let debug_print = fun _ -> ();;
-let lift_from ?(no_implicit=true) k n =
+let lift_from k n =
let rec liftaux k = function
| C.Rel m as t -> if m < k then t else C.Rel (m + n)
| C.Meta (i,(m,(C.Irl 0 as l))) when k <= m+1 -> C.Meta (i,(m,l))
| C.Meta (i,(m,l)) ->
let lctx = NCicUtils.expand_local_context l in
C.Meta (i, (m, C.Ctx (HExtlib.sharing_map (liftaux (k-m)) lctx)))
- | C.Implicit _ as t -> (* was the identity *)
- if no_implicit then assert false
- else t
+ | C.Implicit _ -> (* was the identity *) assert false
| t -> NCicUtils.map (fun _ k -> k + 1) k liftaux t
in
liftaux k
;;
-let lift ?(from=1) ?(no_implicit=true) n t =
- if n = 0 then t else lift_from ~no_implicit from n t
+let lift ?(from=1) n t =
+ if n = 0 then t
+ else lift_from from n t
;;
(* well typed and avoid_beta_redexes is true. *)
(* map_arg is ReductionStrategy.from_env_for_unwind when psubst is *)
(* used to implement nCicReduction.unwind' *)
-let rec psubst ?(avoid_beta_redexes=false) ?(no_implicit=true) map_arg args =
+let rec psubst ?(avoid_beta_redexes=false) map_arg args =
let nargs = List.length args in
let rec substaux k = function
| C.Rel n as t ->
if nargs <> 0 then C.Rel (n - nargs) else t
| n when n < k -> t
| n (* k <= n < k+nargs *) ->
- (try lift ~no_implicit (k-1) (map_arg (List.nth args (n-k)))
+ (try lift (k-1) (map_arg (List.nth args (n-k)))
with Failure _ | Invalid_argument _ -> assert false))
| C.Meta (i,(m,l)) as t when m >= k + nargs - 1 ->
if nargs <> 0 then C.Meta (i,(m-nargs,l)) else t
| C.Meta (i,(m,l)) ->
let lctx = NCicUtils.expand_local_context l in
C.Meta (i,(0,
- C.Ctx (HExtlib.sharing_map
- (fun x -> substaux k (lift ~no_implicit m x)) lctx)))
- | C.Implicit _ as t ->
- if no_implicit then assert false (* was identity *)
- else t
+ C.Ctx (HExtlib.sharing_map (fun x -> substaux k (lift m x)) lctx)))
+ | C.Implicit _ -> assert false (* was identity *)
| C.Appl (he::tl) as t ->
(* Invariant: no Appl applied to another Appl *)
let rec avoid he' = function
(* map_arg is here \x.x, Obj magic is needed because
* we don't have polymorphic recursion w/o records *)
avoid (psubst
- ~avoid_beta_redexes ~no_implicit
- Obj.magic [Obj.magic arg] bo) tl'
+ ~avoid_beta_redexes Obj.magic [Obj.magic arg] bo) tl'
| _ -> if he == he' && args == tl then t else C.Appl (he'::args))
in
let tl = HExtlib.sharing_map (substaux k) tl in
substaux 1
;;
-let subst ?avoid_beta_redexes ?no_implicit arg =
- psubst ?avoid_beta_redexes ?no_implicit(fun x -> x)[arg];;
+let subst ?avoid_beta_redexes arg =
+ psubst ?avoid_beta_redexes (fun x -> x)[arg];;
(* subst_meta (n, C.Ctx [t_1 ; ... ; t_n]) t *)
(* returns the term [t] where [Rel i] is substituted with [t_i] lifted by n *)
?inside_fix:bool ->
NCic.term -> string) -> unit
-val lift_from : ?no_implicit:bool -> int -> int -> NCic.term -> NCic.term
-
(* lift n t *)
(* lifts [t] of [n] *)
(* [from] default 1, lifts only indexes >= [from] *)
(* NOTE: the opposite function (delift_rels) is defined in CicMetaSubst *)
(* since it needs to restrict the metavariables in case of failure *)
-val lift : ?from:int -> ?no_implicit:bool -> int -> NCic.term -> NCic.term
+val lift : ?from:int -> int -> NCic.term -> NCic.term
(* subst t1 t2 *)
(* substitutes [t1] for [Rel 1] in [t2] *)
(* if avoid_beta_redexes is true (default: false) no new beta redexes *)
(* are generated. WARNING: the substitution can diverge when t2 is not *)
(* well typed and avoid_beta_redexes is true. *)
-val subst :
- ?avoid_beta_redexes:bool -> ?no_implicit:bool ->
- NCic.term -> NCic.term -> NCic.term
+val subst : ?avoid_beta_redexes:bool -> NCic.term -> NCic.term -> NCic.term
(* psubst [avoid] [map_arg] [args] [t]
* [avoid] : do not leave newly created beta-redexes, default false
* the function is ReductionStrategy.from_env_for_unwind when psubst is
* used to implement nCicReduction.unwind' *)
val psubst :
- ?avoid_beta_redexes:bool -> ?no_implicit:bool ->
+ ?avoid_beta_redexes:bool ->
('a -> NCic.term) -> 'a list -> NCic.term ->
NCic.term
(PP.ppterm ~subst ~metasenv ~context so)
)));
(match arity1, R.whd ~subst ((name,C.Decl so)::context) ta with
- | C.Sort s1, (C.Sort s2 as arity2) ->
+ | C.Sort s1, C.Sort s2 ->
(match NCicEnvironment.allowed_sort_elimination s1 s2 with
| `Yes -> ()
| `UnitOnly ->
is_non_informative ~metasenv ~subst leftno constrty))
then
raise (TypeCheckerFailure (lazy
- ("Sort elimination not allowed: " ^
- NCicPp.ppterm ~metasenv ~subst ~context arity1
- ^ " towards "^
- NCicPp.ppterm ~metasenv ~subst ~context arity2
- ))))
+ ("Sort elimination not allowed"))))
| _ -> ())
| _,_ -> ()
in
| C.Appl (C.Const (Ref.Ref (uri,Ref.Ind _) as ref) :: _) ->
let _,_,itl,_,_ = E.get_checked_indtys ref in
uri, List.length itl
- | _ ->
- raise (TypeCheckerFailure
- (lazy "Fix: the recursive argument is not inductive"))
+ | _ -> assert false
in
(* guarded by destructors conditions D{f,k,x,M} *)
let rec enum_from k =
NCic.context -> NUri.uri -> int -> int -> int -> int -> NCic.term -> bool
val does_not_occur :
- subst:NCic.substitution -> NCic.context -> int -> int -> NCic.term -> bool
+ subst:NCic.substitution ->
+ ('a * NCic.context_entry) list -> int -> int -> NCic.term -> bool
in
if pragma <> `Projection || List.length args <= rno then conclude ()
else
- (match List.nth l (rno+1) with
+ (match List.nth args rno with
| C.Appl (C.Const(Ref.Ref(_,Ref.Con _))::_) ->
let _, _, _, _, fbody = List.nth ifl fno in (* fbody is closed! *)
- let t = C.Appl (fbody::List.tl l) in
+ let t = C.Appl (fbody::args) in
(match NCicReduction.head_beta_reduce ~delta:max_int t with
- | C.Match (_,_, C.Appl(C.Const(Ref.Ref(_,Ref.Con (_,_,leftno)))
- ::kargs),[pat])->
+ | C.Match (_,_,C.Appl(C.Const(Ref.Ref(_,Ref.Con (_,_,leftno)))::kargs),[pat])->
let _,kargs = HExtlib.split_nth leftno kargs in
- fire_projection_redex false
- (NCicReduction.head_beta_reduce
- ~delta:max_int (C.Appl (pat :: kargs)))
- | C.Appl(C.Match(_,_,C.Appl(C.Const(Ref.Ref(_,Ref.Con (_,_,leftno)))
- ::kargs),[pat]) :: args) ->
+ fire_projection_redex false
+ (NCicReduction.head_beta_reduce
+ ~delta:max_int (C.Appl (pat :: kargs)))
+ | C.Appl(C.Match(_,_,C.Appl(C.Const(Ref.Ref(_,Ref.Con (_,_,leftno)))::kargs),[pat]) :: args) ->
let _,kargs = HExtlib.split_nth leftno kargs in
- fire_projection_redex false
- (NCicReduction.head_beta_reduce
- ~delta:max_int (C.Appl (pat :: kargs @ args)))
+ fire_projection_redex false
+ (NCicReduction.head_beta_reduce
+ ~delta:max_int (C.Appl (pat :: kargs @ args)))
| _ -> conclude ())
| _ -> conclude ())
| t when on_args -> NCicUtils.map (fun _ x -> x) true fire_projection_redex t
;;
let set_kind newkind attrs =
- newkind :: List.filter (fun x -> not (is_kind x)) attrs
+ (newkind :> NCic.meta_attr) :: List.filter (fun x -> not (is_kind x)) attrs
;;
let max_kind k1 k2 =
| _ -> `IsTerm
;;
-module OT =
- struct
- type t = int * NCic.conjecture
- let compare (i,_) (j,_) = Pervasives.compare i j
- end
-
-module MS = HTopoSort.Make(OT)
-let relations_of_menv subst m c =
- let i, (_, ctx, ty) = c in
- let m = List.filter (fun (j,_) -> j <> i) m in
- let m_ty = metas_of_term subst ctx ty in
- let m_ctx =
- snd
- (List.fold_right
- (fun i (ctx,res) ->
- (i::ctx),
- (match i with
- | _,NCic.Decl ty -> metas_of_term subst ctx ty
- | _,NCic.Def (t,ty) ->
- metas_of_term subst ctx ty @ metas_of_term subst ctx t) @ res)
- ctx ([],[]))
- in
- let metas = HExtlib.list_uniq (List.sort compare (m_ty @ m_ctx)) in
- List.filter (fun (i,_) -> List.exists ((=) i) metas) m
-;;
-
-let sort_metasenv subst (m : NCic.metasenv) =
- (MS.topological_sort m (relations_of_menv subst m) : NCic.metasenv)
-;;
-
-let count_occurrences ~subst n t =
- let occurrences = ref 0 in
- let rec aux k _ = function
- | C.Rel m when m = n+k -> incr occurrences
- | C.Rel _m -> ()
- | C.Implicit _ -> ()
- | C.Meta (_,(_,(C.Irl 0 | C.Ctx []))) -> (* closed meta *) ()
- | C.Meta (mno,(s,l)) ->
- (try
- (* possible optimization here: try does_not_occur on l and
- perform substitution only if DoesOccur is raised *)
- let _,_,term,_ = NCicUtils.lookup_subst mno subst in
- aux (k-s) () (NCicSubstitution.subst_meta (0,l) term)
- with NCicUtils.Subst_not_found _ -> () (*match l with
- | C.Irl len -> if not (n+k >= s+len || s > nn+k) then raise DoesOccur
- | C.Ctx lc -> List.iter (aux (k-s) ()) lc*))
- | t -> NCicUtils.fold (fun _ k -> k + 1) k aux () t
- in
- aux 0 () t;
- !occurrences
-;;
-
-exception Found_variable
-
-let looks_closed t =
- let rec aux k _ = function
- | C.Rel m when k < m -> raise Found_variable
- | C.Rel _m -> ()
- | C.Implicit _ -> ()
- | C.Meta (_,(_,(C.Irl 0 | C.Ctx []))) -> (* closed meta *) ()
- | C.Meta _ -> raise Found_variable
- | t -> NCicUtils.fold (fun _ k -> k + 1) k aux () t
- in
- try aux 0 () t; true with Found_variable -> false
-;;
?skip_body:bool -> (NCic.term -> NCic.term) -> NCic.obj_kind -> NCic.obj_kind
val metas_of_term : NCic.substitution -> NCic.context -> NCic.term -> int list
-val sort_metasenv: NCic.substitution -> NCic.metasenv -> NCic.metasenv
type meta_kind = [ `IsSort | `IsType | `IsTerm ]
val kind_of_meta: NCic.meta_attrs -> meta_kind
val apply_subst_context : fix_projections:bool ->
NCic.substitution -> NCic.context -> NCic.context
val apply_subst_metasenv : NCic.substitution -> NCic.metasenv -> NCic.metasenv
-
-val count_occurrences :
- subst:NCic.substitution -> int -> NCic.term -> int
-(* quick, but with false negatives (since no ~subst), check for closed terms *)
-val looks_closed : NCic.term -> bool
-nCic2OCic.cmi:
-oCic2NCic.cmi:
-nCicLibrary.cmi:
nCic2OCic.cmo: nCic2OCic.cmi
nCic2OCic.cmx: nCic2OCic.cmi
oCic2NCic.cmo: oCic2NCic.cmi
-nCic2OCic.cmi:
-oCic2NCic.cmi:
-nCicLibrary.cmi:
nCic2OCic.cmo: nCic2OCic.cmi
nCic2OCic.cmx: nCic2OCic.cmi
oCic2NCic.cmo: oCic2NCic.cmi
let init = load_db;;
type automation_cache = NDiscriminationTree.DiscriminationTree.t
-type unit_eq_cache = NCicParamod.state
-
-class type g_eq_status =
- object
- method eq_cache : unit_eq_cache
- end
-
-class eq_status =
- object(self)
- val eq_cache = NCicParamod.empty_state
- method eq_cache = eq_cache
- method set_eq_cache v = {< eq_cache = v >}
- method set_eq_status
- : 'status. #g_eq_status as 'status -> 'self
- = fun o -> self#set_eq_cache o#eq_cache
- end
class type g_auto_status =
object
- method auto_cache : automation_cache
+ method auto_cache : automation_cache
end
class auto_status =
object
inherit g_status
inherit g_auto_status
- inherit g_eq_status
method dump: obj list
end
object(self)
inherit status
inherit auto_status
- inherit eq_status
val dump = ([] : obj list)
method dump = dump
method set_dump v = {< dump = v >}
method set_dumpable_status : 'status. #g_dumpable_status as 'status -> 'self
- = fun o ->
- (((self#set_dump o#dump)#set_coercion_status o)#set_auto_status o)#set_eq_status o
+ = fun o -> ((self#set_dump o#dump)#set_coercion_status o)#set_auto_status o
end
type 'a register_type =
exception LibraryOutOfSync of string Lazy.t
type automation_cache = NDiscriminationTree.DiscriminationTree.t
-type unit_eq_cache = NCicParamod.state
-
-class type g_eq_status =
- object
- method eq_cache : unit_eq_cache
- end
-
-class eq_status :
- object('self)
- inherit g_eq_status
- method set_eq_cache: unit_eq_cache -> 'self
- method set_eq_status: #g_eq_status -> 'self
- end
class type g_auto_status =
object
object
inherit g_status
inherit g_auto_status
- inherit g_eq_status
method dump: obj list
end
object ('self)
inherit status
inherit auto_status
- inherit eq_status
inherit g_dumpable_status
method set_dump: obj list -> 'self
method set_dumpable_status: #g_dumpable_status -> 'self
NCicCoercion.set_convert_term convert_term;;
Ncic2astMatcher.set_reference_of_oxuri reference_of_oxuri;;
NCicDisambiguate.set_reference_of_oxuri reference_of_oxuri;;
-(* Why should we set them here?
NCicBlob.set_reference_of_oxuri reference_of_oxuri;;
NCicProof.set_reference_of_oxuri reference_of_oxuri;;
-*)
-terms.cmi:
pp.cmi: terms.cmi
foSubst.cmi: terms.cmi
orderings.cmi: terms.cmi
nCicBlob.cmi: terms.cmi
cicBlob.cmi: terms.cmi
nCicProof.cmi: terms.cmi
-nCicParamod.cmi:
terms.cmo: terms.cmi
terms.cmx: terms.cmi
pp.cmo: terms.cmi pp.cmi
-terms.cmi:
pp.cmi: terms.cmi
foSubst.cmi: terms.cmi
orderings.cmi: terms.cmi
nCicBlob.cmi: terms.cmi
cicBlob.cmi: terms.cmi
nCicProof.cmi: terms.cmi
-nCicParamod.cmi:
terms.cmo: terms.cmi
terms.cmx: terms.cmi
pp.cmo: terms.cmi pp.cmi
let eqP = assert false;;
- let is_eq = assert false;;
-
let saturate = assert false;;
end
varlist
;;
- let rec reloc_subst subst = function
- | (Terms.Leaf _) as t -> t
- | Terms.Var i ->
- (try
- List.assoc i subst
- with
- Not_found -> assert false)
- | (Terms.Node l) ->
- Terms.Node (List.map (fun t -> reloc_subst subst t) l)
-;;
-
let rec apply_subst subst = function
| (Terms.Leaf _) as t -> t
| Terms.Var i ->
Terms.Node (List.map (fun t -> apply_subst subst t) l)
;;
- let flat subst =
- List.map (fun (x,t) -> (x, apply_subst subst t)) subst
-;;
-
let concat x y = x @ y;;
(* end *)
val lookup :
int -> 'a Terms.substitution -> 'a Terms.foterm
val filter : 'a Terms.substitution -> Terms.varlist -> Terms.varlist
- val reloc_subst :
- 'a Terms.substitution -> 'a Terms.foterm -> 'a Terms.foterm
val apply_subst :
'a Terms.substitution -> 'a Terms.foterm -> 'a Terms.foterm
- val flat:
- 'a Terms.substitution -> 'a Terms.substitution
val concat:
'a Terms.substitution -> 'a Terms.substitution ->
'a Terms.substitution
let rec eq_foterm x y =
x == y ||
match x, y with
- | Terms.Leaf t1, Terms.Leaf t2 -> B.eq t1 t2
+ | Terms.Leaf t1, Terms.Leaf t2 -> B.eq t1 t2
| Terms.Var i, Terms.Var j -> i = j
| Terms.Node l1, Terms.Node l2 -> List.for_all2 eq_foterm l1 l2
| _ -> false
;;
let fresh_unit_clause maxvar (id, lit, varlist, proof) =
- (* prerr_endline
- ("varlist = " ^ (String.concat "," (List.map string_of_int varlist)));*)
let maxvar, varlist, subst = relocate maxvar varlist Subst.id_subst in
let lit =
match lit with
| Terms.Equation (l,r,ty,o) ->
- let l = Subst.reloc_subst subst l in
- let r = Subst.reloc_subst subst r in
- let ty = Subst.reloc_subst subst ty in
+ let l = Subst.apply_subst subst l in
+ let r = Subst.apply_subst subst r in
+ let ty = Subst.apply_subst subst ty in
Terms.Equation (l,r,ty,o)
| Terms.Predicate p ->
- let p = Subst.reloc_subst subst p in
+ let p = Subst.apply_subst subst p in
Terms.Predicate p
in
let proof =
match proof with
- | Terms.Exact t -> Terms.Exact (Subst.reloc_subst subst t)
+ | Terms.Exact t -> Terms.Exact (Subst.apply_subst subst t)
| Terms.Step (rule,c1,c2,dir,pos,s) ->
Terms.Step(rule,c1,c2,dir,pos,Subst.concat subst s)
in
aux (aux [] ty) proofterm
in
let lit =
- match B.is_eq ty with
- | Some(ty,l,r) ->
+ match ty with
+ | Terms.Node [ Terms.Leaf eq ; ty; l; r ] when B.eq B.eqP eq ->
let o = Order.compare_terms l r in
Terms.Equation (l, r, ty, o)
- | None -> Terms.Predicate ty
+ | t -> Terms.Predicate t
in
let proof = Terms.Exact proofterm in
fresh_unit_clause maxvar (0, lit, varlist, proof)
let path_string_of =
let rec aux arity = function
| Terms.Leaf a -> [Constant (a, arity)]
- | Terms.Var i -> (* assert (arity = 0); *) [Variable]
- (* FIXME : should this be allowed or not ?
+ | Terms.Var i -> assert (arity = 0); [Variable]
| Terms.Node (Terms.Var _::_) ->
- assert false *)
+ (* FIXME : should this be allowed or not ? *)
+ assert false
| Terms.Node ([] | [ _ ] ) -> assert false
| Terms.Node (Terms.Node _::_) -> assert false
| Terms.Node (hd::tl) ->
type dataset = ClauseSet.t
= Make(FotermIndexable)(ClauseSet)
- let process op t = function
+ let index_unit_clause maxvar t = function
| (_,Terms.Equation (l,_,_,Terms.Gt),_,_) as c ->
- op t l (Terms.Left2Right, c)
+ DT.index t l (Terms.Left2Right, c)
| (_,Terms.Equation (_,r,_,Terms.Lt),_,_) as c ->
- op t r (Terms.Right2Left, c)
+ DT.index t r (Terms.Right2Left, c)
| (_,Terms.Equation (l,r,_,Terms.Incomparable),vl,_) as c ->
- op (op t l (Terms.Left2Right, c))
- r (Terms.Right2Left, c)
+(* if are_invertible maxvar vl l r then
+ (prerr_endline ("Invertible " ^ (Pp.pp_foterm l) ^ "=" ^
+ (Pp.pp_foterm r));
+ DT.index t l (Terms.Left2Right, c))
+ else *)
+ DT.index
+ (DT.index t l (Terms.Left2Right, c))
+ r (Terms.Right2Left, c)
| (_,Terms.Equation (l,r,_,Terms.Invertible),vl,_) as c ->
- op t l (Terms.Left2Right, c)
+ DT.index t l (Terms.Left2Right, c)
| (_,Terms.Equation (_,r,_,Terms.Eq),_,_) -> assert false
| (_,Terms.Predicate p,_,_) as c ->
- op t p (Terms.Nodir, c)
+ DT.index t p (Terms.Nodir, c)
;;
- let index_unit_clause =
- process DT.index
-
- let remove_unit_clause =
- process DT.remove_index
-
- let fold = DT.fold
-
- let elems index =
- DT.fold index (fun _ dataset acc -> ClauseSet.union dataset acc)
- ClauseSet.empty
-
type active_set = B.t Terms.unit_clause list * DT.t
end
type data = ClauseSet.elt and
type dataset = ClauseSet.t
- val index_unit_clause :
- DT.t -> B.t Terms.unit_clause -> DT.t
-
- val remove_unit_clause :
- DT.t -> B.t Terms.unit_clause -> DT.t
-
- val fold :
- DT.t ->
- (B.t Discrimination_tree.path -> ClauseSet.t -> 'a -> 'a)
- -> 'a -> 'a
-
- val elems : DT.t -> ClauseSet.t
+ val index_unit_clause :
+ int -> DT.t -> B.t Terms.unit_clause -> DT.t
type active_set = B.t Terms.unit_clause list * DT.t
(* $Id: terms.mli 9822 2009-06-03 15:37:06Z tassi $ *)
-let eqPref = ref (fun _ -> assert false);;
-let set_eqP t = eqPref := fun _ -> t;;
-
-let default_eqP() =
- let uri = NUri.uri_of_string "cic:/matita/ng/Plogic/equality/eq.ind" in
- let ref = NReference.reference_of_spec uri (NReference.Ind(true,0,2)) in
- NCic.Const ref
-;;
-
-let equivalence_relation =
- let uri = NUri.uri_of_string "cic:/matita/ng/properties/relations/eq_rel.con"
- in
- let ref = NReference.reference_of_spec uri (NReference.Fix(0,1,2))
- in NCic.Const ref
-
-let setoid_eq =
- let uri = NUri.uri_of_string "cic:/matita/ng/sets/setoids/eq.con" in
- let ref = NReference.reference_of_spec uri (NReference.Fix(0,0,2))
- in NCic.Const ref
-
-let set_default_eqP() = eqPref := default_eqP
-
-let set_reference_of_oxuri f =
- let eqnew = function
- _ ->
- let r = f(UriManager.uri_of_string
- "cic:/matita/logic/equality/eq.ind#xpointer(1/1)")
- in
- NCic.Const r
- in
- eqPref := eqnew
-;;
-
+let reference_of_oxuri = ref (fun _ -> assert false);;
+let set_reference_of_oxuri f = reference_of_oxuri := f;;
module type NCicContext =
sig
type t = NCic.term
- let eq x y = x = y;;
- (* NCicReduction.alpha_eq C.metasenv C.subst C.context x y;; *)
-
- let height_of_ref = function
- | NReference.Def h -> h
- | NReference.Fix(_,_,h) -> h
- | _ -> 0
-
- let compare_refs (NReference.Ref (u1,r1)) (NReference.Ref (u2,r2)) =
- let x = height_of_ref r2 - height_of_ref r1 in
- if x = 0 then
- Hashtbl.hash (NUri.string_of_uri u1,r1) -
- Hashtbl.hash (NUri.string_of_uri u2,r2)
- else x
+ let eq x y = NCicReduction.alpha_eq C.metasenv C.subst C.context x y;;
let rec compare x y =
match x,y with
| NCic.Rel i, NCic.Rel j -> j-i
| NCic.Meta (i,_), NCic.Meta (j,_) -> i-j
- | NCic.Const r1, NCic.Const r2 -> compare_refs r1 r2
- (*NReference.compare r1 r2*)
+ | NCic.Const r1, NCic.Const r2 -> NReference.compare r1 r2
| NCic.Appl l1, NCic.Appl l2 -> FoUtils.lexicograph compare l1 l2
| NCic.Rel _, ( NCic.Meta _ | NCic.Const _ | NCic.Appl _ ) -> ~-1
| ( NCic.Meta _ | NCic.Const _ | NCic.Appl _ ), NCic.Rel _ -> 1
| ( NCic.Meta _ | NCic.Appl _ ), NCic.Const _ -> 1
| NCic.Appl _, NCic.Meta _ -> ~-1
| NCic.Meta _, NCic.Appl _ -> 1
- | _ -> Pervasives.compare x y
- (* was assert false, but why? *)
-
+ | _ -> assert false
;;
let compare x y =
- if NCicReduction.alpha_eq [] [] [] x y then 0
- (* if x = y then 0 *)
+ if NCicReduction.alpha_eq C.metasenv C.subst C.context x y then 0
else compare x y
;;
- let eqP = (!eqPref)()
- ;;
-
- let is_eq = function
- | Terms.Node [ Terms.Leaf eqt ; ty; l; r ] when eq eqP eqt ->
- Some (ty,l,r)
-(*
- | Terms.Node [ Terms.Leaf eqt ; _; Terms.Node [Terms.Leaf eqt2 ; ty]; l; r]
- when eq equivalence_relation eqt && eq setoid_eq eqt2 ->
- Some (ty,l,r) *)
- | _ -> None
-
let pp t =
NCicPp.ppterm ~context:C.context ~metasenv:C.metasenv ~subst:C.subst t;;
let saturate t ty =
let sty, _, args =
- NCicMetaSubst.saturate ~delta:0 C.metasenv C.subst C.context
+ NCicMetaSubst.saturate ~delta:max_int C.metasenv C.subst C.context
ty 0
in
let proof =
let sty = embed sty in
proof, sty
;;
-
+
+ let eqP =
+ let r =
+ !reference_of_oxuri
+ (UriManager.uri_of_string
+ "cic:/matita/logic/equality/eq.ind#xpointer(1/1)")
+ in
+ NCic.Const r
+ ;;
+
end
(* $Id: terms.mli 9822 2009-06-03 15:37:06Z tassi $ *)
val set_reference_of_oxuri: (UriManager.uri -> NReference.reference) -> unit
-val set_eqP: NCic.term -> unit
-val set_default_eqP: unit -> unit
module type NCicContext =
sig
(* $Id: orderings.ml 9869 2009-06-11 22:52:38Z denes $ *)
-NCicBlob.set_default_eqP()
-;;
-NCicProof.set_default_sig()
-;;
-
-let debug _ = ();;
-let print s = prerr_endline (Lazy.force s);;
module B(C : NCicBlob.NCicContext): Orderings.Blob
with type t = NCic.term and type input = NCic.term
module NCicParamod(C : NCicBlob.NCicContext) = Paramod.Paramod(B(C))
-let readback ?(demod=false) rdb metasenv subst context (bag,i,fo_subst,l) =
-(*
- List.iter (fun x ->
- print_endline (Pp.pp_unit_clause ~margin:max_int
- (fst(Terms.M.find x bag)))) l;
-*)
- (* let stamp = Unix.gettimeofday () in *)
- let proofterm,prooftype = NCicProof.mk_proof ~demod bag i fo_subst l in
- (* debug (lazy (Printf.sprintf "Got proof term in %fs"
- (Unix.gettimeofday() -. stamp))); *)
-(*
- let metasenv, proofterm =
- let rec aux k metasenv = function
- | NCic.Meta _ as t -> metasenv, t
- | NCic.Implicit _ ->
- let metasenv, i, _, _ =
- NCicMetaSubst.mk_meta metasenv context `IsTerm
- in
- metasenv, NCic.Meta (i,(k,NCic.Irl (List.length context)))
- | t -> NCicUntrusted.map_term_fold_a
- (fun _ k -> k+1) k aux metasenv t
- in
- aux 0 metasenv proofterm
- in *)
- debug (lazy (NCicPp.ppterm ~metasenv ~subst ~context proofterm));
-(*
- let stamp = Unix.gettimeofday () in
- let metasenv, subst, proofterm, _prooftype =
- NCicRefiner.typeof
- (rdb#set_coerc_db NCicCoercion.empty_db)
- metasenv subst context proofterm None
- in
- print (lazy (Printf.sprintf "Refined in %fs"
- (Unix.gettimeofday() -. stamp)));
-*)
- proofterm, prooftype, metasenv, subst
-
let nparamod rdb metasenv subst context t table =
let module C =
struct
~g_passives:goals ~passives (bag,maxvar)
with
| P.Error _ | P.GaveUp | P.Timeout _ -> []
- | P.Unsatisfiable solutions ->
- List.map (readback rdb metasenv subst context) solutions
+ | P.Unsatisfiable solutions ->
+ List.map
+ (fun (bag,i,l) ->
+ (* List.iter (fun x ->
+ print_endline (Pp.pp_unit_clause ~margin:max_int
+ (fst(Terms.M.find x bag)))) l; *)
+ let stamp = Unix.gettimeofday () in
+ let proofterm = NCicProof.mk_proof bag i l in
+ prerr_endline (Printf.sprintf "Got proof term in %fs"
+ (Unix.gettimeofday() -. stamp));
+ let metasenv, proofterm =
+ let rec aux k metasenv = function
+ | NCic.Meta _ as t -> metasenv, t
+ | NCic.Implicit _ ->
+ let metasenv, i, _, _ =
+ NCicMetaSubst.mk_meta metasenv context `IsTerm
+ in
+ metasenv, NCic.Meta (i,(k,NCic.Irl (List.length context)))
+ | t -> NCicUntrusted.map_term_fold_a
+ (fun _ k -> k+1) k aux metasenv t
+ in
+ aux 0 metasenv proofterm
+ in
+ let metasenv, subst, proofterm, _prooftype =
+ NCicRefiner.typeof
+ (rdb#set_coerc_db NCicCoercion.empty_db)
+ metasenv subst context proofterm None
+ in
+ proofterm, metasenv, subst)
+ solutions
;;
-module EmptyC =
- struct
- let metasenv = []
- let subst = []
- let context = []
- end
-
-module CB = NCicBlob.NCicBlob(EmptyC)
-module P = NCicParamod(EmptyC)
-
-type state = P.state
-let empty_state = P.empty_state
-
-let forward_infer_step s t ty =
- let bag = P.bag_of_state s in
- let bag,clause = P.mk_passive bag (t,ty) in
- if Terms.is_eq_clause clause then
- P.forward_infer_step (P.replace_bag s bag) clause 0
- else (debug (lazy "not eq"); s)
-;;
-
-let index_obj s uri =
- let obj = NCicEnvironment.get_checked_obj uri in
- debug (lazy ("indexing : " ^ (NUri.string_of_uri uri)));
- debug (lazy ("no : " ^ (string_of_int (fst (Obj.magic uri)))));
- match obj with
- | (_,_,[],[],NCic.Constant(_,_,None,ty,_)) ->
- let nref = NReference.reference_of_spec uri NReference.Decl in
- forward_infer_step s (NCic.Const nref) ty
- | (_,d,[],[],NCic.Constant(_,_,Some(_),ty,_)) ->
- let nref = NReference.reference_of_spec uri (NReference.Def d) in
- forward_infer_step s (NCic.Const nref) ty
- | _ -> s
-;;
-
-let demod rdb metasenv subst context s goal =
- (* let stamp = Unix.gettimeofday () in *)
- match P.demod s goal with
- | P.Error _ | P.GaveUp | P.Timeout _ -> []
- | P.Unsatisfiable solutions ->
- (* print (lazy (Printf.sprintf "Got solutions in %fs"
- (Unix.gettimeofday() -. stamp))); *)
- List.map (readback ~demod:true rdb metasenv subst context) solutions
-;;
-
-let paramod rdb metasenv subst context s goal =
- (* let stamp = Unix.gettimeofday () in *)
- match P.nparamod ~useage:true ~max_steps:max_int
- ~timeout:(Unix.gettimeofday () +. 300.0) s goal with
- | P.Error _ | P.GaveUp | P.Timeout _ -> []
- | P.Unsatisfiable solutions ->
- (* print (lazy (Printf.sprintf "Got solutions in %fs"
- (Unix.gettimeofday() -. stamp))); *)
- List.map (readback rdb metasenv subst context) solutions
-;;
-
-let fast_eq_check rdb metasenv subst context s goal =
- (* let stamp = Unix.gettimeofday () in *)
- match P.fast_eq_check s goal with
- | P.Error _ | P.GaveUp | P.Timeout _ -> []
- | P.Unsatisfiable solutions ->
- (* print (lazy (Printf.sprintf "Got solutions in %fs"
- (Unix.gettimeofday() -. stamp))); *)
- List.map (readback rdb metasenv subst context) solutions
-;;
-
-let is_equation metasenv subst context ty =
- let hty, _, _ =
- NCicMetaSubst.saturate ~delta:0 metasenv subst context
- ty 0
- in match hty with
- | NCic.Appl (eq ::tl) when eq = CB.eqP -> true
- | _ -> false
-;;
+
-(*
-let demodulate rdb metasenv subst context s goal =
- (* let stamp = Unix.gettimeofday () in *)
- match P.fast_eq_check s goal with
- | P.Error _ | P.GaveUp | P.Timeout _ -> []
- | P.Unsatisfiable solutions ->
- (* print (lazy (Printf.sprintf "Got solutions in %fs"
- (Unix.gettimeofday() -. stamp))); *)
- List.map (readback rdb metasenv subst context) solutions
-;;
-*)
(* $Id: orderings.ml 9869 2009-06-11 22:52:38Z denes $ *)
+module NCicParamod(C : NCicBlob.NCicContext) : Paramod.Paramod
+with type t = NCic.term and type input = NCic.term
+
val nparamod :
#NRstatus.status ->
NCic.metasenv -> NCic.substitution -> NCic.context ->
(NCic.term * NCic.term) -> (NCic.term * NCic.term) list ->
- (NCic.term * NCic.term * NCic.metasenv * NCic.substitution) list
-
-type state
-val empty_state: state
-val forward_infer_step: state -> NCic.term -> NCic.term -> state
-val index_obj: state -> NUri.uri -> state
-val is_equation: NCic.metasenv ->
- NCic.substitution -> NCic.context -> NCic.term -> bool
-val paramod :
- #NRstatus.status ->
- NCic.metasenv -> NCic.substitution -> NCic.context ->
- state ->
- (NCic.term * NCic.term) ->
- (NCic.term * NCic.term * NCic.metasenv * NCic.substitution) list
-val fast_eq_check :
- #NRstatus.status ->
- NCic.metasenv -> NCic.substitution -> NCic.context ->
- state ->
- (NCic.term * NCic.term) ->
- (NCic.term * NCic.term * NCic.metasenv * NCic.substitution) list
-val demod :
- #NRstatus.status ->
- NCic.metasenv -> NCic.substitution -> NCic.context ->
- state ->
- (NCic.term * NCic.term) ->
- (NCic.term * NCic.term * NCic.metasenv * NCic.substitution) list
+ (NCic.term * NCic.metasenv * NCic.substitution) list
(* $Id: orderings.ml 9869 2009-06-11 22:52:38Z denes $ *)
-type eq_sig_type = Eq | EqInd_l | EqInd_r | Refl
-
-let eqsig = ref (fun _ -> assert false);;
-let set_sig f = eqsig:= f;;
-let get_sig = fun x -> !eqsig x;;
+let reference_of_oxuri = ref (fun _ -> assert false);;
+let set_reference_of_oxuri f = reference_of_oxuri := f;;
-let default_sig = function
- | Eq ->
- let uri = NUri.uri_of_string "cic:/matita/ng/Plogic/equality/eq.ind" in
- let ref = NReference.reference_of_spec uri (NReference.Ind(true,0,2)) in
- NCic.Const ref
- | EqInd_l ->
- let uri = NUri.uri_of_string "cic:/matita/ng/Plogic/equality/rewrite_l.con" in
- let ref = NReference.reference_of_spec uri (NReference.Def(1)) in
- NCic.Const ref
- | EqInd_r ->
- let uri = NUri.uri_of_string "cic:/matita/ng/Plogic/equality/rewrite_r.con" in
- let ref = NReference.reference_of_spec uri (NReference.Def(3)) in
- NCic.Const ref
- | Refl ->
- let uri = NUri.uri_of_string "cic:/matita/ng/Plogic/equality/eq.ind" in
- let ref = NReference.reference_of_spec uri (NReference.Con(0,1,2)) in
- NCic.Const ref
-let set_default_sig () =
- (*prerr_endline "setting default sig";*)
- eqsig := default_sig
-
-let set_reference_of_oxuri reference_of_oxuri =
- prerr_endline "setting oxuri in nCicProof";
- let nsig = function
- | Eq ->
- NCic.Const
- (reference_of_oxuri
- (UriManager.uri_of_string
- "cic:/matita/logic/equality/eq.ind#xpointer(1/1)"))
- | EqInd_l ->
- NCic.Const
- (reference_of_oxuri
- (UriManager.uri_of_string
- "cic:/matita/logic/equality/eq_ind.con"))
- | EqInd_r ->
- NCic.Const
- (reference_of_oxuri
- (UriManager.uri_of_string
- "cic:/matita/logic/equality/eq_elim_r.con"))
- | Refl ->
- NCic.Const
- (reference_of_oxuri
- (UriManager.uri_of_string
- "cic:/matita/logic/equality/eq.ind#xpointer(1/1/1)"))
- in eqsig:= nsig
+ let eqP () =
+ let r =
+ !reference_of_oxuri
+ (UriManager.uri_of_string
+ "cic:/matita/logic/equality/eq.ind#xpointer(1/1)")
+ in
+ NCic.Const r
;;
-(* let debug c r = prerr_endline r; c *)
-let debug c _ = c;;
+ let eq_ind () =
+ let r =
+ !reference_of_oxuri
+ (UriManager.uri_of_string
+ "cic:/matita/logic/equality/eq_ind.con")
+ in
+ NCic.Const r
+ ;;
- let eqP() = debug (!eqsig Eq) "eq" ;;
- let eq_ind() = debug (!eqsig EqInd_l) "eq_ind" ;;
- let eq_ind_r() = debug (!eqsig EqInd_r) "eq_ind_r";;
- let eq_refl() = debug (!eqsig Refl) "refl";;
+ let eq_ind_r () =
+ let r =
+ !reference_of_oxuri
+ (UriManager.uri_of_string
+ "cic:/matita/logic/equality/eq_elim_r.con")
+ in
+ NCic.Const r
+ ;;
+ let eq_refl () =
+ let r =
+ !reference_of_oxuri
+ (UriManager.uri_of_string
+ "cic:/matita/logic/equality/eq.ind#xpointer(1/1/1)")
+ in
+ NCic.Const r
+ ;;
let extract lift vl t =
let rec pos i = function
extract t
;;
-
let mk_predicate hole_type amount ft p1 vl =
let rec aux t p =
match p with
match t with
| Terms.Leaf _
| Terms.Var _ ->
- let module NCicBlob = NCicBlob.NCicBlob(
- struct
- let metasenv = [] let subst = [] let context = []
- end)
- in
- let module Pp = Pp.Pp(NCicBlob) in
+ let module Pp =
+ Pp.Pp(NCicBlob.NCicBlob(
+ struct
+ let metasenv = [] let subst = [] let context = []
+ end))
+ in
prerr_endline ("term: " ^ Pp.pp_foterm ft);
prerr_endline ("path: " ^ String.concat ","
(List.map string_of_int p1));
- prerr_endline ("leading to: " ^ Pp.pp_foterm t);
+ prerr_endline ("leading to: " ^ Pp.pp_foterm t);
assert false
| Terms.Node l ->
let l =
NCic.Lambda("x", hole_type, aux ft (List.rev p1))
;;
- let dag =
- let uri = NUri.uri_of_string "cic:/matita/ng/sets/setoids/prop1.con" in
- let ref = NReference.reference_of_spec uri (NReference.Fix(0,2,4)) in
- NCic.Const ref
- ;;
-
- (*
- let eq_setoid =
- let uri = NUri.uri_of_string "cic:/matita/ng/sets/setoids/eq.con" in
- let ref = NReference.reference_of_spec uri (NReference.Fix(0,0,2)) in
- NCic.Const ref
- ;;
- *)
-
- let sym eq =
- let u= NUri.uri_of_string "cic:/matita/ng/properties/relations/sym.con" in
- let u = NReference.reference_of_spec u (NReference.Fix(0,1,3)) in
- NCic.Appl[NCic.Const u; NCic.Implicit `Type; NCic.Implicit `Term;
- NCic.Implicit `Term; NCic.Implicit `Term; eq];
- ;;
-
- let eq_morphism1 eq =
- let u= NUri.uri_of_string "cic:/matita/ng/sets/setoids/eq_is_morphism1.con" in
- let u = NReference.reference_of_spec u (NReference.Def 4) in
- NCic.Appl[NCic.Const u; NCic.Implicit `Term; NCic.Implicit `Term;
- NCic.Implicit `Term; NCic.Implicit `Term; eq];
- ;;
-
- let eq_morphism2 eq =
- let u= NUri.uri_of_string "cic:/matita/ng/sets/setoids/eq_is_morphism2.con" in
- let u = NReference.reference_of_spec u (NReference.Def 4) in
- NCic.Appl[NCic.Const u; NCic.Implicit `Term; NCic.Implicit `Term;
- NCic.Implicit `Term; eq; NCic.Implicit `Term];
- ;;
-
- let trans eq p =
- let u= NUri.uri_of_string "cic:/matita/ng/properties/relations/trans.con" in
- let u = NReference.reference_of_spec u (NReference.Fix(0,1,3)) in
- NCic.Appl[NCic.Const u; NCic.Implicit `Type; NCic.Implicit `Term;
- NCic.Implicit `Term; NCic.Implicit `Term; NCic.Implicit `Term; eq]
- ;;
-
- let iff1 eq p =
- let uri = NUri.uri_of_string "cic:/matita/ng/logic/connectives/if.con" in
- let ref = NReference.reference_of_spec uri (NReference.Fix(0,2,1)) in
- NCic.Appl[NCic.Const ref; NCic.Implicit `Type; NCic.Implicit `Type;
- eq; p];
- ;;
-
-(*
- let mk_refl = function
- | NCic.Appl [_; _; x; _] ->
- let uri= NUri.uri_of_string "cic:/matita/ng/properties/relations/refl.con" in
- let ref = NReference.reference_of_spec uri (NReference.Fix(0,1,3)) in
- NCic.Appl[NCic.Const ref; NCic.Implicit `Type; NCic.Implicit `Term;
- NCic.Implicit `Term(*x*)]
- | _ -> assert false
-*)
-
- let mk_refl = function
- | NCic.Appl [_; ty; l; _]
- -> NCic.Appl [eq_refl();ty;l]
- | _ -> assert false
-
-
- let mk_morphism eq amount ft pl vl =
- let rec aux t p =
- match p with
- | [] -> eq
- | n::tl ->
- prerr_endline (string_of_int n);
- match t with
- | Terms.Leaf _
- | Terms.Var _ -> assert false
- | Terms.Node [] -> assert false
- | Terms.Node [ Terms.Leaf eqt ; _; l; r ]
- when (eqP ()) = eqt ->
- if n=2 then eq_morphism1 (aux l tl)
- else eq_morphism2 (aux r tl)
- | Terms.Node (f::l) ->
- snd (
- List.fold_left
- (fun (i,acc) t ->
- i+1,
- let f = extract amount vl f in
- if i = n then
- let imp = NCic.Implicit `Term in
- NCic.Appl (dag::imp::imp::imp(* f *)::imp::imp::
- [aux t tl])
- else
- NCicUntrusted.mk_appl acc [extract amount vl t]
- ) (1,extract amount vl f) l)
- in aux ft (List.rev pl)
- ;;
-
- let mk_proof ?(demod=false) (bag : NCic.term Terms.bag) mp subst steps =
- let module NCicBlob =
- NCicBlob.NCicBlob(
- struct
- let metasenv = [] let subst = [] let context = []
- end)
- in
- let module Pp = Pp.Pp(NCicBlob)
- in
+ let mk_proof (bag : NCic.term Terms.bag) mp steps =
let module Subst = FoSubst in
let position i l =
let rec aux = function
let get_literal id =
let (_, lit, vl, proof),_,_ = Terms.get_from_bag id bag in
let lit =match lit with
- | Terms.Predicate t -> t (* assert false *)
+ | Terms.Predicate t -> assert false
| Terms.Equation (l,r,ty,_) ->
Terms.Node [ Terms.Leaf eqP(); ty; l; r]
in
- lit, vl, proof
- in
- let proof_type =
- let lit,_,_ = get_literal mp in
- let lit = Subst.apply_subst subst lit in
- extract 0 [] lit in
- (* composition of all subst acting on goal *)
- let res_subst =
- let rec rsaux ongoal acc =
- function
- | [] -> acc (* is the final subst for refl *)
- | id::tl when ongoal ->
- let lit,vl,proof = get_literal id in
- (match proof with
- | Terms.Exact _ -> rsaux ongoal acc tl
- | Terms.Step (_, _, _, _, _, s) ->
- rsaux ongoal (s@acc) tl)
- | id::tl ->
- (* subst is the the substitution for refl *)
- rsaux (id=mp) subst tl
- in
- let r = rsaux false [] steps in
- (* prerr_endline ("res substitution: " ^ Pp.pp_substitution r);
- prerr_endline ("\n" ^ "subst: " ^ Pp.pp_substitution subst); *)
- r
+ lit, vl, proof
in
let rec aux ongoal seen = function
| [] -> NCic.Rel 1
let amount = List.length seen in
let lit,vl,proof = get_literal id in
if not ongoal && id = mp then
- let lit = Subst.apply_subst subst lit in
- let eq_ty = extract amount [] lit in
- let refl =
- if demod then NCic.Implicit `Term
- else mk_refl eq_ty in
- (* prerr_endline ("Reached m point, id=" ^ (string_of_int id));
- (NCic.LetIn ("clause_" ^ string_of_int id, eq_ty, refl,
- aux true ((id,([],lit))::seen) (id::tl))) *)
- NCicSubstitution.subst
- ~avoid_beta_redexes:true ~no_implicit:false refl
- (aux true ((id,([],lit))::seen) (id::tl))
+ ((*prerr_endline ("Reached m point, id=" ^ (string_of_int id));*)
+ NCic.LetIn ("clause_" ^ string_of_int id,
+ extract amount [] lit,
+ (NCic.Appl [eq_refl();NCic.Implicit `Type;NCic.Implicit `Term]),
+ aux true ((id,([],lit))::seen) (id::tl)))
else
match proof with
| Terms.Exact _ when tl=[] ->
- (* prerr_endline ("Exact (tl=[]) for " ^ (string_of_int id));*)
- aux ongoal seen tl
+ (* prerr_endline ("Exact (tl=[]) for " ^ (string_of_int id));*)
+ aux ongoal seen tl
| Terms.Step _ when tl=[] -> assert false
| Terms.Exact ft ->
- (*
- prerr_endline ("Exact for " ^ (string_of_int id));
+ (* prerr_endline ("Exact for " ^ (string_of_int id));*)
NCic.LetIn ("clause_" ^ string_of_int id,
close_with_forall vl (extract amount vl lit),
close_with_lambdas vl (extract amount vl ft),
aux ongoal
((id,(List.map (fun x -> Terms.Var x) vl,lit))::seen) tl)
- *)
- NCicSubstitution.subst
- ~avoid_beta_redexes:true ~no_implicit:false
- (close_with_lambdas vl (extract amount vl ft))
- (aux ongoal
- ((id,(List.map (fun x -> Terms.Var x) vl,lit))::seen) tl)
| Terms.Step (_, id1, id2, dir, pos, subst) ->
let id, id1,(lit,vl,proof) =
- if ongoal then
- let lit,vl,proof = get_literal id1 in
- id1,id,(Subst.apply_subst res_subst lit,
- Subst.filter res_subst vl, proof)
- else id,id1,(lit,vl,proof) in
- (* free variables remaining in the goal should not
- be abstracted: we do not want to prove a generalization *)
- let vl = if ongoal then [] else vl in
+ if ongoal then id1,id,get_literal id1
+ else id,id1,(lit,vl,proof)
+ in
+ let vl = if ongoal then [](*Subst.filter subst vl*) else vl in
let proof_of_id id =
let vars = List.rev (vars_of id seen) in
let args = List.map (Subst.apply_subst subst) vars in
let args = List.map (extract amount vl) args in
- let rel_for_id = NCic.Rel (List.length vl + position id seen) in
- if args = [] then rel_for_id
+ let rel_for_id = NCic.Rel (List.length vl + position id seen) in
+ if args = [] then rel_for_id
else NCic.Appl (rel_for_id::args)
in
let p_id1 = proof_of_id id1 in
let p_id2 = proof_of_id id2 in
-(*
- let morphism, l, r =
- let p =
- if (ongoal=true) = (dir=Terms.Left2Right) then
- p_id2
- else sym p_id2 in
- let id1_ty = ty_of id1 seen in
- let id2_ty,l,r =
- match ty_of id2 seen with
- | Terms.Node [ _; t; l; r ] ->
- extract amount vl (Subst.apply_subst subst t),
- extract amount vl (Subst.apply_subst subst l),
- extract amount vl (Subst.apply_subst subst r)
- | _ -> assert false
- in
- (*prerr_endline "mk_predicate :";
- if ongoal then prerr_endline "ongoal=true"
- else prerr_endline "ongoal=false";
- prerr_endline ("id=" ^ string_of_int id);
- prerr_endline ("id1=" ^ string_of_int id1);
- prerr_endline ("id2=" ^ string_of_int id2);
- prerr_endline ("Positions :" ^
- (String.concat ", "
- (List.map string_of_int pos)));*)
- mk_morphism
- p amount (Subst.apply_subst subst id1_ty) pos vl,
- l,r
- in
- let rewrite_step = iff1 morphism p_id1
- in
-*)
let pred, hole_type, l, r =
let id1_ty = ty_of id1 seen in
let id2_ty,l,r =
extract amount vl (Subst.apply_subst subst r)
| _ -> assert false
in
- (*
- prerr_endline "mk_predicate :";
- if ongoal then prerr_endline "ongoal=true"
- else prerr_endline "ongoal=false";
- prerr_endline ("id=" ^ string_of_int id);
- prerr_endline ("id1=" ^ string_of_int id1
- ^": " ^ Pp.pp_foterm id1_ty);
- prerr_endline ("id2=" ^ string_of_int id2
- ^ ": " ^ NCicPp.ppterm [][][] id2_ty);
- prerr_endline ("Positions :" ^
- (String.concat ", "
- (List.map string_of_int pos)));*)
+ (*prerr_endline "mk_predicate :";
+ if ongoal then prerr_endline "ongoal=true"
+ else prerr_endline "ongoal=false";
+ prerr_endline ("id=" ^ string_of_int id);
+ prerr_endline ("id1=" ^ string_of_int id1);
+ prerr_endline ("id2=" ^ string_of_int id2);
+ prerr_endline ("Positions :" ^
+ (String.concat ", "
+ (List.map string_of_int pos)));*)
mk_predicate
id2_ty amount (Subst.apply_subst subst id1_ty) pos vl,
id2_ty,
l,r
in
- let rewrite_step =
- if (ongoal=true) = (dir=Terms.Left2Right) then
- NCic.Appl
- [eq_ind_r(); hole_type; r; pred; p_id1; l; p_id2]
- else
- NCic.Appl
- [ eq_ind(); hole_type; l; pred; p_id1; r; p_id2]
- in
- let body = aux ongoal
- ((id,(List.map (fun x -> Terms.Var x) vl,lit))::seen) tl
- in
- let occ= NCicUntrusted.count_occurrences [] 1 body in
- if occ <= 1 then
- NCicSubstitution.subst
- ~avoid_beta_redexes:true ~no_implicit:false
- (close_with_lambdas vl rewrite_step) body
+ let l, r, eq_ind =
+ if (ongoal=true) = (dir=Terms.Left2Right) then
+ r,l,eq_ind_r ()
else
- NCic.LetIn ("clause_" ^ string_of_int id,
- close_with_forall vl (extract amount vl lit),
- (* NCic.Implicit `Type, *)
- close_with_lambdas vl rewrite_step, body)
+ l,r,eq_ind ()
+ in
+ NCic.LetIn ("clause_" ^ string_of_int id,
+ close_with_forall vl (extract amount vl lit),
+ (* NCic.Implicit `Type, *)
+ close_with_lambdas vl
+ (NCic.Appl [ eq_ind ; hole_type; l; pred; p_id1; r; p_id2 ]),
+ aux ongoal
+ ((id,(List.map (fun x -> Terms.Var x) vl,lit))::seen) tl)
in
- aux false [] steps, proof_type
+ aux false [] steps
;;
(* $Id: nCic.ml 9058 2008-10-13 17:42:30Z tassi $ *)
-type eq_sig_type = Eq | EqInd_l | EqInd_r | Refl
-
val set_reference_of_oxuri: (UriManager.uri -> NReference.reference) -> unit
-val set_default_sig: unit -> unit
-val get_sig: eq_sig_type -> NCic.term
-val mk_proof:
- ?demod:bool
- -> NCic.term Terms.bag
- -> Terms.M.key
- -> NCic.term Terms.substitution
- -> Terms.M.key list
- -> NCic.term * NCic.term (* proof, type *)
+val mk_proof:NCic.term Terms.bag -> Terms.M.key -> Terms.M.key list -> NCic.term
match x, y with
| Terms.Leaf t1, Terms.Leaf t2 -> f t1 t2
| Terms.Var i, Terms.Var j -> i = j
- | Terms.Node l1, Terms.Node l2 when List.length l1 = List.length l2 ->
- List.for_all2 (eq_foterm f) l1 l2
+ | Terms.Node l1, Terms.Node l2 -> List.for_all2 (eq_foterm f) l1 l2
| _ -> false
;;
| XLT -> if check_subterms t (l_ol,tl1) then XLT
else XINCOMPARABLE
| XEQ ->
- (try
let lex = List.fold_left2
(fun acc si ti -> if acc = XEQ then lpo si ti else acc)
XEQ tl1 tl2
if List.for_all (fun x -> lpo x t = XLT) tl1 then XLT
else XINCOMPARABLE
| o -> o)
- with Invalid_argument _ -> (* assert false *)
- XINCOMPARABLE)
| XINCOMPARABLE -> XINCOMPARABLE
| _ -> assert false
end
(* $Id: orderings.ml 9869 2009-06-11 22:52:38Z denes $ *)
-let print s = prerr_endline (Lazy.force s) ;;
-let noprint s = ();;
-let debug = noprint;;
+let debug s = prerr_endline (Lazy.force s) ;;
+let debug _ = ();;
let monster = 100;;
sig
type t
type input
+ type state
type szsontology =
- | Unsatisfiable of
- (t Terms.bag * int * t Terms.substitution * int list) list
+ | Unsatisfiable of (t Terms.bag * int * int list) list
| GaveUp
| Error of string
| Timeout of int * t Terms.bag
type bag = t Terms.bag * int
- type state
val empty_state : state
- val bag_of_state : state -> bag
- val replace_bag: state -> bag -> state
val mk_passive : bag -> input * input -> bag * t Terms.unit_clause
val mk_goal : bag -> input * input -> bag * t Terms.unit_clause
val forward_infer_step :
t Terms.unit_clause ->
int ->
state
- val goal_narrowing :
- int
- -> int
- -> float option
- -> state
- -> state
val paramod :
useage:bool ->
max_steps:int ->
bag ->
g_passives:t Terms.unit_clause list ->
passives:t Terms.unit_clause list -> szsontology
- val demod :
- state -> input* input -> szsontology
- val fast_eq_check :
- state -> input* input -> szsontology
- val nparamod :
- useage:bool ->
- max_steps:int ->
- ?timeout:float ->
- state -> input* input -> szsontology
end
module Paramod (B : Orderings.Blob) = struct
type t = B.t
type input = B.input
- type bag = B.t Terms.bag * int
+ type state =
+ B.t Terms.bag
+ * int
+ * Index.Index(B).active_set
+ * (WeightPassiveSet.t * AgePassiveSet.t)
+ * B.t Terms.unit_clause list
+ * (WeightPassiveSet.t * AgePassiveSet.t)
type szsontology =
- | Unsatisfiable of
- (B.t Terms.bag * int * B.t Terms.substitution * int list) list
+ | Unsatisfiable of (B.t Terms.bag * int * int list) list
| GaveUp
| Error of string
| Timeout of int * B.t Terms.bag
exception Stop of szsontology
- type state =
- t Terms.bag
- * int
- * Index.Index(B).active_set
- * (IDX.DT.t * WeightPassiveSet.t * AgePassiveSet.t)
- * B.t Terms.unit_clause list
- * (WeightPassiveSet.t * AgePassiveSet.t)
+ type bag = B.t Terms.bag * int
let empty_state =
Terms.empty_bag,
0,
([],IDX.DT.empty),
- (IDX.DT.empty,WeightPassiveSet.empty,AgePassiveSet.empty),
+ (WeightPassiveSet.empty,AgePassiveSet.empty),
[],
(WeightPassiveSet.empty,AgePassiveSet.empty)
- ;;
+;;
- let bag_of_state (bag,n,_,_,_,_) = bag,n
- ;;
-
- let replace_bag (_,_,a,b,c,d) (bag,n) = bag,n,a,b,c,d
- ;;
-
- let add_passive_clause ?(no_weight=false)
- (passive_t,passives_w,passives_a) cl =
- let pcl = if no_weight then (0,cl)
+ let add_passive_clause ?(no_weight=false) (passives_w,passives_a) cl =
+ let cl = if no_weight then (0,cl)
else Utils.mk_passive_clause cl in
- IDX.index_unit_clause passive_t cl,
- WeightPassiveSet.add pcl passives_w,
- AgePassiveSet.add pcl passives_a
+ WeightPassiveSet.add cl passives_w, AgePassiveSet.add cl passives_a
;;
let add_passive_goal ?(no_weight=false) (passives_w,passives_a) g =
WeightPassiveSet.add g passives_w, AgePassiveSet.add g passives_a
;;
- let remove_passive_clause (passive_t,passives_w,passives_a) cl =
- let passive_t = IDX.remove_unit_clause passive_t (snd cl) in
+ let remove_passive_clause (passives_w,passives_a) cl =
let passives_w = WeightPassiveSet.remove cl passives_w in
let passives_a = AgePassiveSet.remove cl passives_a in
- passive_t,passives_w,passives_a
+ passives_w,passives_a
;;
- let add_passive_clauses ?(no_weight=false) =
- List.fold_left (add_passive_clause ~no_weight)
+ let add_passive_clauses ?(no_weight=false)
+ (passives_w,passives_a) new_clauses =
+ let new_clauses_w,new_clauses_a =
+ List.fold_left (add_passive_clause ~no_weight)
+ (WeightPassiveSet.empty,AgePassiveSet.empty) new_clauses
+ in
+ (WeightPassiveSet.union new_clauses_w passives_w,
+ AgePassiveSet.union new_clauses_a passives_a)
;;
let add_passive_goals ?(no_weight=false)
AgePassiveSet.union new_clauses_a passives_a)
;;
- let remove_passive_goal (passives_w,passives_a) cl =
- let passives_w = WeightPassiveSet.remove cl passives_w in
- let passives_a = AgePassiveSet.remove cl passives_a in
- passives_w,passives_a
- ;;
-
- let is_passive_set_empty (_,passives_w,passives_a) =
- if (WeightPassiveSet.is_empty passives_w) then begin
- assert (AgePassiveSet.is_empty passives_a); true
- end else begin
- assert (not (AgePassiveSet.is_empty passives_a)); false
- end
- ;;
-
- let is_passive_g_set_empty (passives_w,passives_a) =
+ let is_passive_set_empty (passives_w,passives_a) =
if (WeightPassiveSet.is_empty passives_w) then begin
assert (AgePassiveSet.is_empty passives_a); true
end else begin
end
;;
- let passive_set_cardinal (_,passives_w,_)
- = WeightPassiveSet.cardinal passives_w
- ;;
-
- let g_passive_set_cardinal (passives_w,_)
- = WeightPassiveSet.cardinal passives_w
- ;;
-
+ let passive_set_cardinal (passives_w,_) = WeightPassiveSet.cardinal passives_w
+
let passive_empty_set =
- (IDX.DT.empty,WeightPassiveSet.empty,AgePassiveSet.empty)
- ;;
-
- let g_passive_empty_set =
(WeightPassiveSet.empty,AgePassiveSet.empty)
;;
- let pick_min_passive ~use_age (_,passives_w,passives_a) =
+ let pick_min_passive ~use_age (passives_w,passives_a) =
if use_age then AgePassiveSet.min_elt passives_a
else WeightPassiveSet.min_elt passives_w
;;
- let pick_min_g_passive ~use_age (passives_w,passives_a) =
- if use_age then AgePassiveSet.min_elt passives_a
- else WeightPassiveSet.min_elt passives_w
- ;;
-
- let mk_unit_clause bag maxvar (t,ty) =
- let c, maxvar = Utils.mk_unit_clause maxvar (B.embed ty) (B.embed t) in
- let bag, c = Terms.add_to_bag c bag in
- (bag, maxvar), c
- ;;
-
let mk_clause bag maxvar (t,ty) =
let (proof,ty) = B.saturate t ty in
let c, maxvar = Utils.mk_unit_clause maxvar ty proof in
;;
let mk_passive (bag,maxvar) = mk_clause bag maxvar;;
-
let mk_goal (bag,maxvar) = mk_clause bag maxvar;;
- let initialize_goal (bag,maxvar,actives,passives,_,_) t =
- let (bag,maxvar), g = mk_unit_clause bag maxvar t in
- let g_passives = g_passive_empty_set in
- (* if the goal is not an equation we returns an empty
- passive set *)
- let g_passives =
- if Terms.is_eq_clause g then add_passive_goal g_passives g
- else g_passives
- in
- (bag,maxvar,actives,passives,[],g_passives)
-
-
(* TODO : global age over facts and goals (without comparing weights) *)
let select ~use_age passives g_passives =
if is_passive_set_empty passives then begin
- if (is_passive_g_set_empty g_passives) then
+ if (is_passive_set_empty g_passives) then
raise (Stop GaveUp) (* we say we are incomplete *)
else
- let g_cl = pick_min_g_passive ~use_age:use_age g_passives in
- (true,g_cl,passives,remove_passive_goal g_passives g_cl)
+ let g_cl = pick_min_passive ~use_age:use_age g_passives in
+ (true,g_cl,passives,remove_passive_clause g_passives g_cl)
end
else let cl = pick_min_passive ~use_age:use_age passives in
- if is_passive_g_set_empty g_passives then
+ if is_passive_set_empty g_passives then
(false,cl,remove_passive_clause passives cl,g_passives)
else
- let g_cl = pick_min_g_passive ~use_age:use_age g_passives in
+ let g_cl = pick_min_passive ~use_age:use_age g_passives in
let (id1,_,_,_),(id2,_,_,_) = snd cl, snd g_cl in
let cmp = if use_age then id1 <= id2
else fst cl <= fst g_cl
if cmp then
(false,cl,remove_passive_clause passives cl,g_passives)
else
- (true,g_cl,passives,remove_passive_goal g_passives g_cl)
+ (true,g_cl,passives,remove_passive_clause g_passives g_cl)
;;
let backward_infer_step bag maxvar actives passives
in
debug (lazy "Performed infer_left step");
let bag = Terms.replace_in_bag (g_current,false,iterno) bag in
- bag, maxvar, actives, passives, g_current::g_actives,
+ bag, maxvar, actives, passives, g_current::g_actives,
(add_passive_goals g_passives new_goals)
;;
- let pp_clauses actives passives =
- let actives_l, _ = actives in
- let passive_t,_,_ = passives in
- let wset = IDX.elems passive_t in
- ("Actives :" ^ (String.concat ";\n"
- (List.map Pp.pp_unit_clause actives_l)))
- ^
- ("Passives:" ^(String.concat ";\n"
- (List.map (fun (_,cl) -> Pp.pp_unit_clause cl)
- (IDX.ClauseSet.elements wset))))
- ;;
-
- let forward_infer_step
- ((bag,maxvar,actives,passives,g_actives,g_passives) as s)
+ let forward_infer_step (bag,maxvar,actives,passives,g_actives,g_passives)
current iterno =
(* forward step *)
* P' = P + new' *)
debug (lazy "Forward infer step...");
debug (lazy("Number of actives : " ^ (string_of_int (List.length (fst actives)))));
- noprint (lazy (pp_clauses actives passives));
- match Sup.keep_simplified current actives bag maxvar
- with
- | _,None -> s
- | bag,Some (current,actives) ->
- debug (lazy ("simplified to " ^ (Pp.pp_unit_clause current)));
let bag, maxvar, actives, new_clauses =
Sup.infer_right bag maxvar current actives
in
- debug
- (lazy
- ("New clauses :" ^ (String.concat ";\n"
- (List.map Pp.pp_unit_clause new_clauses))));
debug (lazy "Demodulating goals with actives...");
(* keep goals demodulated w.r.t. actives and check if solved *)
let bag, g_actives =
| Some (bag,c1) -> bag,if c==c1 then c::acc else c::c1::acc)
(bag,[]) g_actives
in
- let ctable = IDX.index_unit_clause IDX.DT.empty current in
+ let ctable = IDX.index_unit_clause maxvar IDX.DT.empty current in
let bag, maxvar, new_goals =
List.fold_left
(fun (bag,m,acc) g ->
add_passive_clauses passives new_clauses, g_actives,
add_passive_goals g_passives new_goals
;;
-
- let debug_status (_,_,actives,passives,g_actives,g_passives) =
- lazy
- ((Printf.sprintf "Number of active goals : %d\n"
- (List.length g_actives)) ^
- (Printf.sprintf "Number of passive goals : %d\n"
- (g_passive_set_cardinal g_passives)) ^
- (Printf.sprintf "Number of actives : %d\n"
- (List.length (fst actives))) ^
- (Printf.sprintf "Number of passives : %d\n"
- (passive_set_cardinal passives)))
- ;;
-
-
- (* we just check if any of the active goals is subsumed by a
- passive clause, or if any of the passive goal is subsumed
- by an active or passive clause *)
- let last_chance (bag,maxvar,actives,passives,g_actives,g_passives) =
- debug (lazy("Last chance " ^ string_of_float
- (Unix.gettimeofday())));
- let actives_l, active_t = actives in
- let passive_t,wset,_ = passives in
- let _ = noprint
- (lazy
- ("Actives :" ^ (String.concat ";\n"
- (List.map Pp.pp_unit_clause actives_l)))) in
- let wset = IDX.elems passive_t in
- let _ = noprint
- (lazy
- ("Passives:" ^(String.concat ";\n"
- (List.map (fun (_,cl) -> Pp.pp_unit_clause cl)
- (IDX.ClauseSet.elements wset))))) in
- let g_passives =
- WeightPassiveSet.fold
- (fun (_,x) acc ->
- if List.exists (Sup.are_alpha_eq x) g_actives then acc
- else x::acc)
- (fst g_passives) []
- in
- ignore
- (List.iter
- (fun x ->
- ignore
- (debug (lazy("ckecking goal vs a: " ^ Pp.pp_unit_clause x));
- Sup.simplify_goal ~no_demod:true maxvar active_t bag [] x))
- g_passives);
- ignore
- (List.iter
- (fun x ->
- ignore
- (debug (lazy("ckecking goal vs p: " ^ Pp.pp_unit_clause x));
- Sup.simplify_goal ~no_demod:true maxvar passive_t bag [] x))
- (g_actives@g_passives));
- raise (Stop (Timeout (maxvar,bag)))
-
- let check_timeout = function
- | None -> false
- | Some timeout -> Unix.gettimeofday () > timeout
- let rec given_clause ~useage
+ let rec given_clause ~useage ~noinfer
bag maxvar iterno weight_picks max_steps timeout
actives passives g_actives g_passives
=
let iterno = iterno + 1 in
- if iterno = max_steps || check_timeout timeout then
- last_chance (bag,maxvar,actives,passives,g_actives,g_passives)
- else
+ if iterno = max_steps then raise (Stop (Timeout (maxvar,bag)));
+ (* timeout check: gettimeofday called only if timeout set *)
+ if timeout <> None &&
+ (match timeout with
+ | None -> assert false
+ | Some timeout -> Unix.gettimeofday () > timeout) then
+ if noinfer then
+ begin
+ debug
+ (lazy("Last chance: all is indexed " ^ string_of_float
+ (Unix.gettimeofday())));
+ let maxgoals = 100 in
+ ignore(List.fold_left
+ (fun (acc,i) x ->
+ if i < maxgoals then
+ ignore(Sup.simplify_goal ~no_demod:true
+ maxvar (snd actives) bag acc x)
+ else
+ ();
+ x::acc,i+1)
+ ([],0) g_actives);
+ raise (Stop (Timeout (maxvar,bag)))
+ end
+ else if false then (* activates last chance strategy *)
+ begin
+ debug (lazy("Last chance: "^string_of_float (Unix.gettimeofday())));
+ given_clause ~useage ~noinfer:true bag maxvar iterno weight_picks max_steps
+ (Some (Unix.gettimeofday () +. 20.))
+ actives passives g_actives g_passives;
+ raise (Stop (Timeout (maxvar,bag)));
+ end
+ else raise (Stop (Timeout (maxvar,bag)));
+
let use_age = useage && (weight_picks = (iterno / 6 + 1)) in
let weight_picks = if use_age then 0 else weight_picks+1
in
- let rec aux_select bag
- (passives:IDX.DT.t * WeightPassiveSet.t * AgePassiveSet.t)
- g_passives =
+ let rec aux_select bag passives g_passives =
let backward,(weight,current),passives,g_passives =
select ~use_age passives g_passives
in
if use_age && weight > monster then
let bag,cl = Terms.add_to_bag current bag in
if backward then
- aux_select bag passives (add_passive_goal g_passives cl)
+ aux_select bag passives (add_passive_clause g_passives cl)
else
aux_select bag (add_passive_clause passives cl) g_passives
else
if backward then
let _ = debug (lazy("Selected goal : " ^ Pp.pp_unit_clause current)) in
match
- Sup.simplify_goal
- ~no_demod:false maxvar (snd actives) bag g_actives current
+ if noinfer then
+ if weight > monster then None else Some (bag,current)
+ else
+ Sup.simplify_goal
+ ~no_demod:false maxvar (snd actives) bag g_actives current
with
- | None -> aux_select bag passives g_passives
- | Some (bag,g_current) ->
- backward_infer_step bag maxvar actives passives
- g_actives g_passives g_current iterno
+ | None -> aux_select bag passives g_passives
+ | Some (bag,g_current) ->
+ if noinfer then
+ let g_actives = g_current :: g_actives in
+ bag,maxvar,actives,passives,g_actives,g_passives
+ else
+ backward_infer_step bag maxvar actives passives
+ g_actives g_passives g_current iterno
else
- let _ = debug (lazy("Selected fact : " ^ Pp.pp_unit_clause current))
- in
- if Sup.orphan_murder bag (fst actives) current then
+ let _ = debug (lazy("Selected fact : " ^ Pp.pp_unit_clause current)) in
+ (*let is_orphan = Sup.orphan_murder bag (fst actives) current in*)
+ match
+ if noinfer then
+ if weight > monster then bag,None
+ else bag, Some (current,actives)
+ else if Sup.orphan_murder bag (fst actives) current then
let _ = debug (lazy "Orphan murdered") in
let bag = Terms.replace_in_bag (current,true,iterno) bag in
- aux_select bag passives g_passives
- else
- let s = bag,maxvar,actives,passives,g_actives,g_passives in
- let s1 = forward_infer_step s current iterno
- in
- if s == s1 then aux_select bag passives g_passives
- else s1
+ bag, None
+ else Sup.keep_simplified current actives bag maxvar
+ with
+ (*match Sup.one_pass_simplification current actives bag maxvar with*)
+ | bag,None -> aux_select bag passives g_passives
+ | bag,Some (current,actives) ->
+(* if is_orphan then prerr_endline
+ ("WRONG discarded: " ^ (Pp.pp_unit_clause current));
+ List.iter (fun x ->
+ prerr_endline (Pp.pp_unit_clause x))
+ (fst actives);*)
+
+(* List.iter (fun (id,_,_,_) -> let (cl,d) =
+ Terms.M.find id bag in
+ if d then prerr_endline
+ ("WRONG discarded: " ^ (Pp.pp_unit_clause cl)))
+ (current::fst actives);*)
+ if noinfer then
+ let actives =
+ current::fst actives,
+ IDX.index_unit_clause maxvar (snd actives) current
+ in
+ bag,maxvar,actives,passives,g_actives,g_passives
+ else
+ forward_infer_step
+ (bag,maxvar,actives,passives,g_actives,g_passives)
+ current iterno
in
+
+
(*prerr_endline "Active table :";
(List.iter (fun x -> prerr_endline (Pp.pp_unit_clause x))
(fst actives)); *)
- let (bag,maxvar,actives,passives,g_actives,g_passives) as status =
+ let bag,maxvar,actives,passives,g_actives,g_passives =
aux_select bag passives g_passives
in
- debug (debug_status status);
- given_clause ~useage
+ debug
+ (lazy(Printf.sprintf "Number of active goals : %d"
+ (List.length g_actives)));
+ debug
+ (lazy(Printf.sprintf "Number of passive goals : %d"
+ (passive_set_cardinal g_passives)));
+ debug
+ (lazy(Printf.sprintf "Number of actives : %d" (List.length (fst actives))));
+ debug
+ (lazy(Printf.sprintf "Number of passives : %d"
+ (passive_set_cardinal passives)));
+ given_clause ~useage ~noinfer
bag maxvar iterno weight_picks max_steps timeout
actives passives g_actives g_passives
;;
- let check_and_infer ~no_demod iterno status current =
- let bag,maxvar,actives,passives,g_actives,g_passives = status in
- match
- Sup.simplify_goal
- ~no_demod maxvar (snd actives) bag g_actives current
- with
- | None -> debug (lazy "None"); status
- | Some (bag,g_current) ->
- let _ =
- debug (lazy("Infer on goal : "
- ^ Pp.pp_unit_clause g_current))
- in
- backward_infer_step bag maxvar actives passives
- g_actives g_passives g_current iterno
-
- (* similar to given_clause, but it merely works on goals,
- in parallel, at each iteration *)
- let rec goal_narrowing iterno max_steps timeout status
- =
- debug (debug_status status);
- let iterno = iterno + 1 in
- if iterno = max_steps || check_timeout timeout then
- last_chance status
- else
- let _,_,_,_,_,g_passives = status in
- let passive_goals = WeightPassiveSet.elements (fst g_passives) in
- let newstatus =
- List.fold_left
- (fun acc g ->
- let bag,maxvar,actives,passives,g_actives,g_passives = acc in
- let g_passives =
- remove_passive_goal g_passives g in
- let current = snd g in
- let _ =
- debug (lazy("Selected goal : " ^ Pp.pp_unit_clause current))
- in
- (* we work both on the original goal and the demodulated one*)
- let acc = check_and_infer ~no_demod:false iterno acc current
- in check_and_infer ~no_demod:true iterno acc current)
- status passive_goals
+ let paramod ~useage ~max_steps ?timeout (bag,maxvar) ~g_passives ~passives =
+ let _initial_timestamp = Unix.gettimeofday () in
+ let passives =
+ add_passive_clauses ~no_weight:true passive_empty_set passives
in
- goal_narrowing iterno max_steps timeout newstatus
-
- let compute_result bag i subst =
- let l =
- let rec traverse ongoal (accg,acce) i =
- match Terms.get_from_bag i bag with
- | (id,_,_,Terms.Exact _),_,_ ->
- if ongoal then [i],acce else
- if (List.mem i acce) then accg,acce else accg,acce@[i]
- | (_,_,_,Terms.Step (_,i1,i2,_,_,_)),_,_ ->
- if (not ongoal) && (List.mem i acce) then accg,acce
- else
- let accg,acce =
- traverse false (traverse ongoal (accg,acce) i1) i2
- in
- if ongoal then i::accg,acce else accg,i::acce
+ let g_passives =
+ add_passive_goals ~no_weight:true passive_empty_set g_passives
+ in
+ let g_actives = [] in
+ let actives = [], IDX.DT.empty in
+ try
+ given_clause ~useage ~noinfer:false
+ bag maxvar 0 0 max_steps timeout actives passives g_actives g_passives
+ with
+ | Sup.Success (bag, _, (i,_,_,_)) ->
+ let l =
+ let rec traverse ongoal (accg,acce) i =
+ match Terms.get_from_bag i bag with
+ | (id,_,_,Terms.Exact _),_,_ ->
+ if ongoal then [i],acce else
+ if (List.mem i acce) then accg,acce else accg,acce@[i]
+ | (_,_,_,Terms.Step (_,i1,i2,_,_,_)),_,_ ->
+ if (not ongoal) && (List.mem i acce) then accg,acce
+ else
+ let accg,acce =
+ traverse false (traverse ongoal (accg,acce) i1) i2
+ in
+ if ongoal then i::accg,acce else accg,i::acce
+ in
+ let gsteps,esteps = traverse true ([],[]) i in
+ (List.rev esteps)@gsteps
in
- let gsteps,esteps = traverse true ([],[]) i in
- (List.rev esteps)@gsteps
- in
- debug (lazy ("steps: " ^ (string_of_int (List.length l))));
- let max_w =
- List.fold_left
- (fun acc i ->
- let (cl,_,_) = Terms.get_from_bag i bag in
- max acc (Order.compute_unit_clause_weight cl)) 0 l in
- debug (lazy ("Max weight : " ^ (string_of_int max_w)));
+ let max_w = List.fold_left (fun acc i ->
+ let (cl,_,_) = Terms.get_from_bag i bag in
+ max acc (Order.compute_unit_clause_weight cl)) 0 l in
+ prerr_endline "Statistics :";
+ prerr_endline ("Max weight : " ^ (string_of_int max_w));
(* List.iter (fun id -> let ((_,lit,_,proof as cl),d,it) =
Terms.get_from_bag id bag in
if d then
(Printf.sprintf "Id : %d, selected at %d, weight %d by %s"
id it (Order.compute_unit_clause_weight cl)
(Pp.pp_proof_step proof))) l;*)
- debug (lazy ("Proof:" ^
- (String.concat "\n"
- (List.map
- (fun x ->
- let cl,_,_ = Terms.get_from_bag x bag in
- Pp.pp_unit_clause cl) l))));
- Unsatisfiable [ bag, i, subst, l ]
-
- let paramod ~useage ~max_steps ?timeout (bag,maxvar) ~g_passives ~passives =
- let _initial_timestamp = Unix.gettimeofday () in
- let passives =
- add_passive_clauses ~no_weight:true passive_empty_set passives
- in
- let g_passives =
- add_passive_goals ~no_weight:true g_passive_empty_set g_passives
- in
- let g_actives = [] in
- let actives = [], IDX.DT.empty in
- try
- given_clause ~useage ~noinfer:false
- bag maxvar 0 0 max_steps timeout actives passives g_actives g_passives
- with
- | Sup.Success (bag, _, (i,_,_,_),subst) ->
- compute_result bag i subst
- | Stop (Unsatisfiable _) -> Error "solution found!"
- | Stop o -> o
- ;;
-
-let demod s goal =
- let bag,maxvar,actives,passives,g_actives,g_passives = s in
- let (bag,maxvar), g = mk_goal (bag,maxvar) goal in
- let bag, ((i,_,_,_) as g1) = Sup.demodulate bag g (snd actives) in
- if g1 = g then GaveUp else compute_result bag i []
-(*
- if Terms.is_eq_clause g then
-
- else GaveUp *)
-
-let fast_eq_check s goal =
- let (_,_,_,_,_,g_passives) as s = initialize_goal s goal in
- if is_passive_g_set_empty g_passives then Error "not an equation"
- else
- try
- goal_narrowing 0 2 None s
- with
- | Sup.Success (bag, _, (i,_,_,_),subst) ->
- compute_result bag i subst
- | Stop (Unsatisfiable _) -> Error "solution found!"
- | Stop o -> o
- ;;
-
-let nparamod ~useage ~max_steps ?timeout s goal =
- let bag,maxvar,actives,passives,g_actives,g_passives
- = initialize_goal s goal in
- if is_passive_g_set_empty g_passives then Error "not an equation"
- else
- try given_clause ~useage ~noinfer:false
- bag maxvar 0 0 max_steps timeout actives passives g_actives g_passives
- with
- | Sup.Success (bag, _, (i,_,_,_),subst) ->
- compute_result bag i subst
- | Stop (Unsatisfiable _) -> Error "solution found!"
+ (*
+ prerr_endline "Proof:";
+ List.iter (fun x ->
+ prerr_endline (Pp.pp_unit_clause (fst(Terms.M.find x bag)))) l;
+ *)
+ Unsatisfiable [ bag, i, l ]
+ | Stop (Unsatisfiable _) -> Error "stop bug solution found!"
| Stop o -> o
;;
type input
type state
type szsontology =
- | Unsatisfiable of
- (t Terms.bag * int * t Terms.substitution * int list) list
+ | Unsatisfiable of (t Terms.bag * int * int list) list
| GaveUp
| Error of string
| Timeout of int * t Terms.bag
type bag = t Terms.bag * int
val empty_state : state
- val bag_of_state :state -> bag
- val replace_bag : state -> bag -> state
val mk_passive : bag -> input * input -> bag * t Terms.unit_clause
val mk_goal : bag -> input * input -> bag * t Terms.unit_clause
val forward_infer_step :
t Terms.unit_clause ->
int ->
state
- val goal_narrowing :
- int
- -> int
- -> float option
- -> state
- -> state
val paramod :
useage:bool ->
max_steps:int ->
bag ->
g_passives:t Terms.unit_clause list ->
passives:t Terms.unit_clause list -> szsontology
- val demod :
- state -> input* input -> szsontology
- val fast_eq_check :
- state -> input* input -> szsontology
- val nparamod :
- useage:bool ->
- max_steps:int ->
- ?timeout:float ->
- state ->
- input* input ->
- szsontology
end
module Paramod ( B : Orderings.Blob ) : Paramod
module Utils = FoUtils.Utils(B)
module Pp = Pp.Pp(B)
- exception Success of
- B.t Terms.bag
- * int
- * B.t Terms.unit_clause
- * B.t Terms.substitution
+ exception Success of B.t Terms.bag * int * B.t Terms.unit_clause
- let print s = prerr_endline (Lazy.force s);;
+ (* let debug s = prerr_endline s;; *)
let debug _ = ();;
let enable = true;;
prof_demod.HExtlib.profile (demod table varlist) x
;;
- let mydemod table varlist subterm =
+ let mydemod table varlist subterm =
let cands =
prof_demod_r.HExtlib.profile
(IDX.DT.retrieve_generalizations table) subterm
in
list_first
- (fun (dir, ((id,lit,vl,_) as c)) ->
- debug (lazy("candidate: "
- ^ Pp.pp_unit_clause c));
+ (fun (dir, (id,lit,vl,_)) ->
match lit with
| Terms.Predicate _ -> assert false
| Terms.Equation (l,r,_,o) ->
((*prerr_endline ("Filtering: " ^
Pp.pp_foterm side ^ " =(< || =)" ^
Pp.pp_foterm newside ^ " coming from " ^
- Pp.pp_unit_clause uc );*)
- debug (lazy "not applied");None)
+ Pp.pp_unit_clause uc );*)None)
else
Some (newside, subst, id, dir)
- with FoUnif.UnificationFailure _ ->
- debug (lazy "not applied"); None)
+ with FoUnif.UnificationFailure _ -> None)
(IDX.ClauseSet.elements cands)
;;
;;
let rec demodulate bag (id, literal, vl, pr) table =
- debug (lazy ("demodulate " ^ (string_of_int id)));
match literal with
- | Terms.Predicate t -> (* assert false *)
- let bag,_,id1 =
- visit bag [] (fun x -> x) id t (ctx_demod table vl)
- in
- let cl,_,_ = Terms.get_from_bag id1 bag in
- bag,cl
+ | Terms.Predicate t -> assert false
| Terms.Equation (l,r,ty,_) ->
let bag,l,id1 =
visit bag [2]
visit bag [3]
(fun x -> Terms.Node [ Terms.Leaf B.eqP; ty; l; x ]) id1 r
(ctx_demod table vl)
- in
+ in
let cl,_,_ = Terms.get_from_bag id2 bag in
bag,cl
;;
;;
(* move away *)
- let is_identity_clause = function
+ let is_identity_clause ~unify = function
| _, Terms.Equation (_,_,_,Terms.Eq), _, _ -> true
+ | _, Terms.Equation (l,r,_,_), vl, proof when unify ->
+ (try ignore(Unif.unification (* vl *) [] l r); true
+ with FoUnif.UnificationFailure _ -> false)
| _, Terms.Equation (_,_,_,_), _, _ -> false
| _, Terms.Predicate _, _, _ -> assert false
;;
- let is_identity_goal = function
- | _, Terms.Equation (_,_,_,Terms.Eq), _, _ -> Some []
- | _, Terms.Equation (l,r,_,_), vl, proof ->
- (try Some (Unif.unification (* vl *) [] l r)
- with FoUnif.UnificationFailure _ -> None)
- | _, Terms.Predicate _, _, _ -> assert false
- ;;
-
- let build_new_clause_reloc bag maxvar filter rule t subst id id2 pos dir =
+ let build_new_clause bag maxvar filter rule t subst id id2 pos dir =
let maxvar, _vl, subst = Utils.relocate maxvar (Terms.vars_of_term
(Subst.apply_subst subst t)) subst in
match build_clause bag filter rule t subst id id2 pos dir with
- | Some (bag, c) -> Some ((bag, maxvar), c), subst
- | None -> None,subst
- ;;
-
- let build_new_clause bag maxvar filter rule t subst id id2 pos dir =
- fst (build_new_clause_reloc bag maxvar filter rule t
- subst id id2 pos dir)
+ | Some (bag, c) -> Some ((bag, maxvar), c)
+ | None -> None
;;
-
let prof_build_new_clause = HExtlib.profile ~enable "build_new_clause";;
let build_new_clause bag maxvar filter rule t subst id id2 pos x =
prof_build_new_clause.HExtlib.profile (build_new_clause bag maxvar filter
in
bag, maxvar, res
;;
+
let rewrite_eq ~unify l r ty vl table =
let retrieve = if unify then IDX.DT.retrieve_unifiables
match acc with
| None -> None
| Some(bag,maxvar,(id,lit,vl,p),subst) ->
- (* prerr_endline ("input subst = "^Pp.pp_substitution subst); *)
let l = Subst.apply_subst subst l in
let r = Subst.apply_subst subst r in
try
with FoUnif.UnificationFailure _ ->
match rewrite_eq ~unify l r ty vl table with
| Some (id2, dir, subst1) ->
- (* prerr_endline ("subst1 = "^Pp.pp_substitution subst1);
- prerr_endline ("old subst = "^Pp.pp_substitution subst);*)
let newsubst = Subst.concat subst1 subst in
let id_t =
FoSubst.apply_subst newsubst
(Terms.Node[Terms.Leaf B.eqP;ty;contextl r;contextr r])
in
(match
- build_new_clause_reloc bag maxvar (fun _ -> true)
+ build_new_clause bag maxvar (fun _ -> true)
Terms.Superposition id_t
subst1 id id2 (pos@[2]) dir
with
- | Some ((bag, maxvar), c), r ->
- (* prerr_endline ("r = "^Pp.pp_substitution r); *)
- let newsubst = Subst.flat
- (Subst.concat r subst) in
+ | Some ((bag, maxvar), c) ->
Some(bag,maxvar,c,newsubst)
- | None, _ -> assert false)
+ | None -> assert false)
| None ->
match l,r with
| Terms.Node (a::la), Terms.Node (b::lb) when
in acc
| _,_ -> None
;;
-
let prof_deep_eq = HExtlib.profile ~enable "deep_eq";;
let deep_eq ~unify l r ty pos contextl contextr table x =
prof_deep_eq.HExtlib.profile (deep_eq ~unify l r ty pos contextl contextr table) x
let (id,_,_,_) = cl in
let actives = List.map (fun (i,_,_,_) -> i) actives in
let (res,_) = orphan_murder bag actives id in
- if res then debug (lazy "Orphan murdered"); res
+ if res then debug "Orphan murdered"; res
;;
let prof_orphan_murder = HExtlib.profile ~enable "orphan_murder";;
let orphan_murder bag actives x =
;;
(* demodulate and check for subsumption *)
- let simplify table maxvar bag clause =
- debug (lazy "simplify...");
- if is_identity_clause clause then bag,None
+ let simplify table maxvar bag clause =
+ if is_identity_clause ~unify:false clause then bag,None
(* else if orphan_murder bag actives clause then bag,None *)
else let bag, clause = demodulate bag clause table in
- if is_identity_clause clause then bag,None
+ if is_identity_clause ~unify:false clause then bag,None
else
match is_subsumed ~unify:false bag maxvar clause table with
| None -> bag, Some clause
match simplify atable maxvar bag new_clause with
| bag,None -> bag,None (* new_clause has been discarded *)
| bag,(Some clause) ->
- let ctable = IDX.index_unit_clause IDX.DT.empty clause in
+ let ctable = IDX.index_unit_clause maxvar IDX.DT.empty clause in
let bag, alist, atable =
List.fold_left
(fun (bag, alist, atable) c ->
|bag,None -> (bag,alist,atable)
(* an active clause as been discarded *)
|bag,Some c1 ->
- bag, c :: alist, IDX.index_unit_clause atable c)
+ bag, c :: alist, IDX.index_unit_clause maxvar atable c)
(bag,[],IDX.DT.empty) alist
in
bag, Some (clause, (alist,atable))
let simplification_step ~new_cl cl (alist,atable) bag maxvar new_clause =
let atable1 =
if new_cl then atable else
- IDX.index_unit_clause atable cl
+ IDX.index_unit_clause maxvar atable cl
in
(* Simplification of new_clause with : *
* - actives and cl if new_clause is not cl *
| bag,Some clause ->
(* Simplification of each active clause with clause *
* which is the simplified form of new_clause *)
- let ctable = IDX.index_unit_clause IDX.DT.empty clause in
+ let ctable = IDX.index_unit_clause maxvar IDX.DT.empty clause in
let bag, newa, alist, atable =
List.fold_left
(fun (bag, newa, alist, atable) c ->
|bag,Some c1 ->
if (c1 == c) then
bag, newa, c :: alist,
- IDX.index_unit_clause atable c
+ IDX.index_unit_clause maxvar atable c
else
bag, c1 :: newa, alist, atable)
(bag,[],[],IDX.DT.empty) alist
| bag,(None, Some _) -> bag,None
| bag,(Some cl1, Some (clause, (alist,atable), newa)) ->
let alist,atable =
- (clause::alist, IDX.index_unit_clause atable clause)
+ (clause::alist, IDX.index_unit_clause maxvar atable clause)
in
keep_simplified_aux ~new_cl:(cl!=cl1) cl1 (alist,atable)
bag (newa@tl)
let bag, clause =
if no_demod then bag, clause else demodulate bag clause table
in
- let _ = debug (lazy ("demodulated goal : "
- ^ Pp.pp_unit_clause clause))
- in
- if List.exists (are_alpha_eq clause) g_actives then None
- else match (is_identity_goal clause) with
- | Some subst -> raise (Success (bag,maxvar,clause,subst))
- | None ->
+ if List.exists (are_alpha_eq clause) g_actives then None else
+ if (is_identity_clause ~unify:true clause)
+ then raise (Success (bag, maxvar, clause))
+ else
let (id,lit,vl,_) = clause in
- (* this optimization makes sense only if we demodulated, since in
- that case the clause should have been turned into an identity *)
- if (vl = [] && not(no_demod))
- then Some (bag,clause)
+ if vl = [] then Some (bag,clause)
else
let l,r,ty =
match lit with
table (Some(bag,maxvar,clause,Subst.id_subst)) with
| None -> Some (bag,clause)
| Some (bag,maxvar,cl,subst) ->
- debug (lazy "Goal subsumed");
- raise (Success (bag,maxvar,cl,subst))
+ prerr_endline "Goal subsumed";
+ raise (Success (bag,maxvar,cl))
(*
- match is_subsumed ~unify:true bag maxvar clause table with
+ else match is_subsumed ~unify:true bag maxvar clause table with
| None -> Some (bag, clause)
| Some ((bag,maxvar),c) ->
prerr_endline "Goal subsumed";
raise (Success (bag,maxvar,c))
-*)
+*)
;;
let prof_simplify_goal = HExtlib.profile ~enable "simplify_goal";;
(* We demodulate actives clause with current until all *
* active clauses are reduced w.r.t each other *)
(* let bag, (alist,atable) = keep_simplified (alist,atable) bag [current] in *)
- let ctable = IDX.index_unit_clause IDX.DT.empty current in
+ let ctable = IDX.index_unit_clause maxvar IDX.DT.empty current in
(* let bag, (alist, atable) =
let bag, alist =
HExtlib.filter_map_acc (simplify ctable) bag alist
in
bag, (alist, List.fold_left IDX.index_unit_clause IDX.DT.empty alist)
in*)
- debug (lazy "Simplified active clauses with fact");
+ debug "Simplified active clauses with fact";
(* We superpose active clauses with current *)
let bag, maxvar, new_clauses =
List.fold_left
bag, maxvar, newc @ acc)
(bag, maxvar, []) alist
in
- debug
- (lazy
- ("New clauses :" ^ (String.concat ";\n"
- (List.map Pp.pp_unit_clause new_clauses))));
- debug (lazy "First superpositions");
+ debug "First superpositions";
(* We add current to active clauses so that it can be *
* superposed with itself *)
let alist, atable =
- current :: alist, IDX.index_unit_clause atable current
+ current :: alist, IDX.index_unit_clause maxvar atable current
in
- debug (lazy "Indexed");
+ debug "Indexed";
let fresh_current, maxvar = Utils.fresh_unit_clause maxvar current in
(* We need to put fresh_current into the bag so that all *
* variables clauses refer to are known. *)
let bag, maxvar, additional_new_clauses =
superposition_with_table bag maxvar fresh_current atable
in
- debug (lazy "Another superposition");
+ debug "Another superposition";
let new_clauses = new_clauses @ additional_new_clauses in
- (* debug (lazy (Printf.sprintf "Demodulating %d clauses"
- (List.length new_clauses))); *)
+ debug (lazy (Printf.sprintf "Demodulating %d clauses"
+ (List.length new_clauses)));
let bag, new_clauses =
HExtlib.filter_map_monad (simplify atable maxvar) bag new_clauses
in
- debug (lazy "Demodulated new clauses");
+ debug "Demodulated new clauses";
bag, maxvar, (alist, atable), new_clauses
;;
let bag, maxvar, new_goals =
superposition_with_table bag maxvar goal atable
in
- debug(lazy "Superposed goal with active clauses");
+ debug "Superposed goal with active clauses";
(* We simplify the new goals with active clauses *)
let bag, new_goals =
List.fold_left
| Some (bag,g) -> bag,g::acc)
(bag, []) new_goals
in
- debug (lazy "Simplified new goals with active clauses");
+ debug "Simplified new goals with active clauses";
bag, maxvar, List.rev new_goals
;;
sig
(* bag, maxvar, meeting point *)
- exception Success of
- B.t Terms.bag
- * int
- * B.t Terms.unit_clause
- * B.t Terms.substitution
+ exception Success of B.t Terms.bag * int * B.t Terms.unit_clause
(* The returned active set is the input one + the selected clause *)
val infer_right :
B.t Terms.bag ->
int ->
B.t Terms.bag * (B.t Terms.unit_clause * Index.Index(B).active_set) option
+
+
val keep_simplified:
B.t Terms.unit_clause ->
Index.Index(B).active_set ->
B.t Terms.unit_clause ->
bool
- val are_alpha_eq :
- B.t Terms.unit_clause ->
- B.t Terms.unit_clause ->
- bool
+
end
type 'a passive_clause = int * 'a unit_clause (* weight * equation *)
-let is_eq_clause (_,l,_,_) =
- match l with
- | Equation _ -> true
- | Predicate _ -> false
-;;
let vars_of_term t =
let rec aux acc = function
val eq : t -> t -> bool
val compare : t -> t -> int
val eqP : t
- val is_eq: t foterm -> (t foterm* t foterm *t foterm) option
val pp : t -> string
type input
val embed : input -> t foterm
type 'a passive_clause = int * 'a unit_clause (* weight * equation *)
-val is_eq_clause : 'a unit_clause -> bool
val vars_of_term : 'a foterm -> int list
module M : Map.S with type key = int
(* TODO: consider taking in input an imperative buffer for Format
* val pp : Format.formatter -> t -> unit
* *)
- val is_eq : t foterm -> (t foterm * t foterm * t foterm) option
val pp : t -> string
type input
-nDiscriminationTree.cmi:
-nCicMetaSubst.cmi:
-nCicUnifHint.cmi:
nCicCoercion.cmi: nCicUnifHint.cmi
nRstatus.cmi: nCicCoercion.cmi
-nCicRefineUtil.cmi:
nCicUnification.cmi: nRstatus.cmi
nCicRefiner.cmi: nRstatus.cmi
nDiscriminationTree.cmo: nDiscriminationTree.cmi
nCicCoercion.cmi
nRstatus.cmo: nCicCoercion.cmi nRstatus.cmi
nRstatus.cmx: nCicCoercion.cmx nRstatus.cmi
-nCicRefineUtil.cmo: nCicMetaSubst.cmi nCicRefineUtil.cmi
-nCicRefineUtil.cmx: nCicMetaSubst.cmx nCicRefineUtil.cmi
nCicUnification.cmo: nCicUnifHint.cmi nCicMetaSubst.cmi nCicUnification.cmi
nCicUnification.cmx: nCicUnifHint.cmx nCicMetaSubst.cmx nCicUnification.cmi
-nCicRefiner.cmo: nCicUnification.cmi nCicRefineUtil.cmi nCicMetaSubst.cmi \
- nCicCoercion.cmi nCicRefiner.cmi
-nCicRefiner.cmx: nCicUnification.cmx nCicRefineUtil.cmx nCicMetaSubst.cmx \
- nCicCoercion.cmx nCicRefiner.cmi
+nCicRefiner.cmo: nCicUnification.cmi nCicMetaSubst.cmi nCicCoercion.cmi \
+ nCicRefiner.cmi
+nCicRefiner.cmx: nCicUnification.cmx nCicMetaSubst.cmx nCicCoercion.cmx \
+ nCicRefiner.cmi
-nDiscriminationTree.cmi:
-nCicMetaSubst.cmi:
-nCicUnifHint.cmi:
nCicCoercion.cmi: nCicUnifHint.cmi
nRstatus.cmi: nCicCoercion.cmi
-nCicRefineUtil.cmi:
nCicUnification.cmi: nRstatus.cmi
nCicRefiner.cmi: nRstatus.cmi
nDiscriminationTree.cmo: nDiscriminationTree.cmi
nCicCoercion.cmi
nRstatus.cmo: nCicCoercion.cmi nRstatus.cmi
nRstatus.cmx: nCicCoercion.cmx nRstatus.cmi
-nCicRefineUtil.cmo: nCicMetaSubst.cmi nCicRefineUtil.cmi
-nCicRefineUtil.cmx: nCicMetaSubst.cmx nCicRefineUtil.cmi
nCicUnification.cmo: nCicUnifHint.cmi nCicMetaSubst.cmi nCicUnification.cmi
nCicUnification.cmx: nCicUnifHint.cmx nCicMetaSubst.cmx nCicUnification.cmi
-nCicRefiner.cmo: nCicUnification.cmi nCicRefineUtil.cmi nCicMetaSubst.cmi \
- nCicCoercion.cmi nCicRefiner.cmi
-nCicRefiner.cmx: nCicUnification.cmx nCicRefineUtil.cmx nCicMetaSubst.cmx \
- nCicCoercion.cmx nCicRefiner.cmi
+nCicRefiner.cmo: nCicUnification.cmi nCicMetaSubst.cmi nCicCoercion.cmi \
+ nCicRefiner.cmi
+nCicRefiner.cmx: nCicUnification.cmx nCicMetaSubst.cmx nCicCoercion.cmx \
+ nCicRefiner.cmi
nCicUnifHint.mli \
nCicCoercion.mli \
nRstatus.mli \
- nCicRefineUtil.mli \
nCicUnification.mli \
nCicRefiner.mli
| NCicUtils.Meta_not_found _ -> assert false
;;
-let rec is_flexible context ~subst = function
+let rec flexible_arg context subst = function
| NCic.Meta (i,_) ->
(try
let _,_,t,_ = List.assoc i subst in
- is_flexible context ~subst t
+ flexible_arg context subst t
with Not_found -> true)
| NCic.Appl (NCic.Meta (i,_) :: args)->
(try
let _,_,t,_ = List.assoc i subst in
- is_flexible context ~subst
+ flexible_arg context subst
(NCicReduction.head_beta_reduce ~delta:max_int
(NCic.Appl (t :: args)))
with Not_found -> true)
match List.nth context (i-1)
with
| _,NCic.Def (bo,_) ->
- is_flexible context ~subst
+ flexible_arg context subst
(NCicSubstitution.lift i bo)
| _ -> false
with
match l with
| _, NCic.Irl _ -> fun _ _ _ _ _ -> None
| shift, NCic.Ctx l -> fun metasenv subst context k t ->
- if is_flexible context ~subst t || contains_in_scope subst t then None else
+ if flexible_arg context subst t || contains_in_scope subst t then None else
let lb =
List.map (fun t ->
let t = NCicSubstitution.lift (k+shift) t in
- t, is_flexible context ~subst t)
+ t, flexible_arg context subst t)
l
in
HExtlib.list_findopt
NCic.context -> NCic.term -> int ->
NCic.term * NCic.metasenv * NCic.term list
-val pack_lc : int * NCic.lc_kind -> int * NCic.lc_kind
-
val is_out_scope_tag : NCic.meta_attrs -> bool
val int_of_out_scope_tag : NCic.meta_attrs -> int
-
-val is_flexible : NCic.context -> subst:NCic.substitution -> NCic.term -> bool
+++ /dev/null
-(* Copyright (C) 2004, HELM Team.
- *
- * This file is part of HELM, an Hypertextual, Electronic
- * Library of Mathematics, developed at the Computer Science
- * Department, University of Bologna, Italy.
- *
- * HELM is free software; you can redistribute it and/or
- * modify it under the terms of the GNU General Public License
- * as published by the Free Software Foundation; either version 2
- * of the License, or (at your option) any later version.
- *
- * HELM is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with HELM; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston,
- * MA 02111-1307, USA.
- *
- * For details, see the HELM World-Wide-Web page,
- * http://helm.cs.unibo.it/
- *)
-
-(* $Id: cicUtil.ml 10153 2009-07-28 15:17:51Z sacerdot $ *)
-
-exception Meta_not_found of int
-exception Subst_not_found of int
-
-(* syntactic_equality up to the *)
-(* distinction between fake dependent products *)
-(* and non-dependent products, alfa-conversion *)
-let alpha_equivalence =
- let rec aux t t' =
- if t = t' then true
- else
- match t,t' with
- | NCic.Prod (_,s,t), NCic.Prod (_,s',t') ->
- aux s s' && aux t t'
- | NCic.Lambda (_,s,t), NCic.Lambda (_,s',t') ->
- aux s s' && aux t t'
- | NCic.LetIn (_,s,ty,t), NCic.LetIn(_,s',ty',t') ->
- aux s s' && aux ty ty' && aux t t'
- | NCic.Appl l, NCic.Appl l' when List.length l = List.length l' ->
- (try
- List.fold_left2
- (fun b t1 t2 -> b && aux t1 t2) true l l'
- with
- Invalid_argument _ -> false)
- | NCic.Const ref1, NCic.Const ref2 -> t == t'
- | NCic.Match (it,outt,t,pl), NCic.Match (it',outt',t',pl') ->
- it == it' &&
- aux outt outt' && aux t t' &&
- (try
- List.fold_left2
- (fun b t1 t2 -> b && aux t1 t2) true pl pl'
- with
- Invalid_argument _ -> false)
- | NCic.Meta (n1,(s1, NCic.Irl _)), NCic.Meta (n2,(s2, NCic.Irl _))
- when n1 = n2 && s1 = s2 -> true
- | NCic.Meta (i, (s,lc)), NCic.Meta (i', (s',lc')) ->
- let lc = NCicUtils.expand_local_context lc in
- let lc' = NCicUtils.expand_local_context lc' in
- i = i' &&
- (try
- List.fold_left2
- (fun b xt xt' -> b && aux (NCicSubstitution.lift s xt) (NCicSubstitution.lift s' xt'))
- true lc lc'
- with
- Invalid_argument _ -> false)
- | NCic.Appl [t], t' | t, NCic.Appl [t'] -> assert false
- | NCic.Sort s, NCic.Sort s' -> s == s'
- | _,_ -> false (* we already know that t != t' *)
- in
- aux
-;;
-
-exception WhatAndWithWhatDoNotHaveTheSameLength;;
-
-let replace_lifting ~equality ~context ~what ~with_what ~where =
- let find_image ctx what t =
- let rec find_image_aux =
- function
- [],[] -> raise Not_found
- | what::tl1,with_what::tl2 ->
- if equality ctx what t then with_what else find_image_aux (tl1,tl2)
- | _,_ -> raise WhatAndWithWhatDoNotHaveTheSameLength
- in
- find_image_aux (what,with_what)
- in
- let add_ctx ctx n s = (n, NCic.Decl s)::ctx in
- let add_ctx1 ctx n s ty = (n, NCic.Def (s,ty))::ctx in
- let rec substaux k ctx what t =
- try
- NCicSubstitution.lift (k-1) (find_image ctx what t)
- with Not_found ->
- match t with
- NCic.Rel _ as t -> t
- | NCic.Meta (i, (shift,l)) ->
- let l = NCicUtils.expand_local_context l in
- let l' =
- List.map (fun t -> substaux k ctx what (NCicSubstitution.lift shift t)) l
- in
- NCic.Meta(i,NCicMetaSubst.pack_lc (0, NCic.Ctx l'))
- | NCic.Sort _ as t -> t
- | NCic.Implicit _ as t -> t
- | NCic.Prod (n,s,t) ->
- NCic.Prod
- (n, substaux k ctx what s, substaux (k + 1) (add_ctx ctx n s) (List.map (NCicSubstitution.lift 1) what) t)
- | NCic.Lambda (n,s,t) ->
- NCic.Lambda
- (n, substaux k ctx what s, substaux (k + 1) (add_ctx ctx n s) (List.map (NCicSubstitution.lift 1) what) t)
- | NCic.LetIn (n,s,ty,t) ->
- NCic.LetIn
- (n, substaux k ctx what s, substaux k ctx what ty, substaux (k + 1) (add_ctx1 ctx n s ty) (List.map (NCicSubstitution.lift 1) what) t)
- | NCic.Appl (he::tl) ->
- (* Invariant: no Appl applied to another Appl *)
- let tl' = List.map (substaux k ctx what) tl in
- begin
- match substaux k ctx what he with
- NCic.Appl l -> NCic.Appl (l@tl')
- | _ as he' -> NCic.Appl (he'::tl')
- end
- | NCic.Appl _ -> assert false
- | NCic.Const _ as t -> t
- | NCic.Match (it,outt,t,pl) ->
- NCic.Match (it,substaux k ctx what outt, substaux k ctx what t,
- List.map (substaux k ctx what) pl)
- in
- (*prerr_endline "*** replace lifting -- what:";
- List.iter (fun x -> prerr_endline (NCicPp.ppterm ~metasenv:[] ~subst:[] ~context x)) what;
- prerr_endline "\n*** replace lifting -- with what:";
- List.iter (fun x -> prerr_endline (NCicPp.ppterm ~metasenv:[] ~subst:[] ~context x)) with_what;
- prerr_endline "\n*** replace lifting -- where:";
- prerr_endline (NCicPp.ppterm ~metasenv:[] ~subst:[] ~context where);*)
-
- substaux 1 context what where
-;;
-
-
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-(* $Id: nCicRefiner.ml 9802 2009-05-25 15:39:26Z tassi $ *)
-
-val alpha_equivalence : NCic.term -> NCic.term -> bool
-
-val replace_lifting :
- equality:((string * NCic.context_entry) list ->
- NCic.term -> NCic.term -> bool) ->
- context:(string * NCic.context_entry) list ->
- what:NCic.term list ->
- with_what:NCic.term list -> where:NCic.term -> NCic.term
-
let hbr t =
if upto > 0 then NCicReduction.head_beta_reduce ~upto t else t
in
- let refine_appl metasenv subst args =
+ let refine_appl () =
let metasenv, subst, he, ty_he =
typeof_aux metasenv subst context None he in
let metasenv, subst, t, ty =
let metasenv, subst, he, ty_he =
typeof_aux metasenv subst context expty he in
metasenv, subst, hbr he, ty_he
- with Uncertain _ | RefineFailure _ -> refine_appl metasenv subst args
- else
- (* CSC: whd can be useful on he too... *)
- (match he with
- C.Const (Ref.Ref (uri1,Ref.Con _)) -> (
- match
- HExtlib.map_option (NCicReduction.whd ~subst context) expty
- with
- Some (C.Appl(C.Const(Ref.Ref (uri2,Ref.Ind _) as ref)::expargs))
- when NUri.eq uri1 uri2 ->
- (try
- let _,leftno,_,_,_ = NCicEnvironment.get_checked_indtys ref in
- let leftexpargs,_ = HExtlib.split_nth leftno expargs in
- let rec instantiate metasenv subst revargs args =
- function
- [] ->
- (* some checks are re-done here, but it would be complex
- to avoid them (e.g. we did not check yet that the
- constructor is a constructor for that inductive type)*)
- refine_appl metasenv subst ((List.rev revargs)@args)
- | (exparg::expargs) as allexpargs ->
- match args with
- [] -> raise (Failure "Not enough args")
- | (C.Implicit `Vector::args) as allargs ->
- (try
- instantiate metasenv subst revargs args allexpargs
- with
- Sys.Break as exn -> raise exn
- | _ ->
- instantiate metasenv subst revargs
- (C.Implicit `Term :: allargs) allexpargs)
- | arg::args ->
- let metasenv,subst,arg,_ =
- typeof_aux metasenv subst context None arg in
- let metasenv,subst =
- NCicUnification.unify rdb metasenv subst context
- arg exparg
- in
- instantiate metasenv subst(arg::revargs) args expargs
- in
- instantiate metasenv subst [] args leftexpargs
- with
- | Sys.Break as exn -> raise exn
- | _ ->
- refine_appl metasenv subst args (* to try coercions *))
- | _ -> refine_appl metasenv subst args)
- | _ -> refine_appl metasenv subst args)
+ with Uncertain _ | RefineFailure _ -> refine_appl ()
+ else refine_appl ()
| C.Appl _ -> raise (AssertFailure (lazy "Appl of length < 2"))
| C.Match (Ref.Ref (_,Ref.Ind (_,tyno,_)) as r,
outtype,(term as orig_term),pl) as orig ->
~localise
metasenv subst context t orig_t infty expty perform_unification exc
=
- let cs_subst = NCicSubstitution.subst ~avoid_beta_redexes:true in
- try
- pp (lazy "WWW: trying coercions -- preliminary unification");
- let metasenv, subst =
- NCicUnification.unify rdb metasenv subst context infty expty
- in metasenv, subst, t, expty
- with
- | exn ->
(* we try with a coercion *)
let rec first exc = function
- | [] ->
- pp (lazy "WWW: no more coercions!");
+ | [] ->
raise (wrap_exc (lazy (localise orig_t, Printf.sprintf
"The term\n%s\nhas type\n%s\nbut is here used with type\n%s"
(NCicPp.ppterm ~metasenv ~subst ~context t)
with
| NCicUnification.UnificationFailure _ -> first exc tl
| NCicUnification.Uncertain _ as exc -> first exc tl
- in
-
- try
- pp (lazy "WWW: trying coercions -- inner check");
- match infty, expty, t with
- | _,_, NCic.Match (Ref.Ref (_,Ref.Ind (_,tyno,leftno)) as r,outty,m,pl) ->
- (*{{{*) pp (lazy "CASE");
- (* {{{ helper functions *)
- let get_cl_and_left_p refit outty =
- match refit with
- | NReference.Ref (uri, NReference.Ind (_,tyno,leftno)) ->
- let _, leftno, itl, _, _ = NCicEnvironment.get_checked_indtys r in
- let _, _, ty, cl = List.nth itl tyno in
- let constructorsno = List.length cl in
- let count_pis t =
- let rec aux ctx t =
- match NCicReduction.whd ~subst ~delta:max_int ctx t with
- | NCic.Prod (name,src,tgt) ->
- let ctx = (name, (NCic.Decl src)) :: ctx in
- 1 + aux ctx tgt
- | _ -> 0
- in
- aux [] t
- in
- let rec skip_lambda_delifting t n =
- match t,n with
- | _,0 -> t
- | NCic.Lambda (_,_,t),n ->
- pp (lazy ("WWW: failing term? "^ NCicPp.ppterm ~subst:[] ~metasenv:[] ~context:[] t));
- skip_lambda_delifting
- (* substitute dangling indices with a dummy *)
- (NCicSubstitution.subst (NCic.Sort NCic.Prop) t) (n - 1)
- | _ -> assert false
- in
- let get_l_r_p n = function
- | NCic.Lambda (_,NCic.Const (Ref.Ref (_,Ref.Ind (_,_,_))),_) -> [],[]
- | NCic.Lambda (_,NCic.Appl
- (NCic.Const (Ref.Ref (_,Ref.Ind (_,_,_))) :: args),_) ->
- HExtlib.split_nth n args
- | _ -> assert false
- in
- let pis = count_pis ty in
- let rno = pis - leftno in
- let t = skip_lambda_delifting outty rno in
- let left_p, _ = get_l_r_p leftno t in
- let instantiate_with_left cl =
- List.map
- (fun ty ->
- List.fold_left
- (fun t p -> match t with
- | NCic.Prod (_,_,t) ->
- cs_subst p t
- | _-> assert false)
- ty left_p)
- cl
- in
- let cl = instantiate_with_left (List.map (fun (_,_,x) -> x) cl) in
- cl, left_p, leftno, rno
- | _ -> raise exn
- in
- let rec keep_lambdas_and_put_expty ctx t bo right_p matched n =
- match t,n with
- | _,0 ->
- let rec mkr n = function
- | [] -> [] | _::tl -> NCic.Rel n :: mkr (n+1) tl
- in
- pp (lazy ("input replace: " ^ NCicPp.ppterm ~context:ctx ~metasenv:[] ~subst:[] bo));
- let bo =
- NCicRefineUtil.replace_lifting
- ~equality:(fun _ -> NCicRefineUtil.alpha_equivalence)
- ~context:ctx
- ~what:(matched::right_p)
- ~with_what:(NCic.Rel 1::List.rev (mkr 2 right_p))
- ~where:bo
- in
- pp (lazy ("output replace: " ^ NCicPp.ppterm ~context:ctx ~metasenv:[] ~subst:[] bo));
- bo
- | NCic.Lambda (name, src, tgt),_ ->
- NCic.Lambda (name, src,
- keep_lambdas_and_put_expty
- ((name, NCic.Decl src)::ctx) tgt (NCicSubstitution.lift 1 bo)
- (List.map (NCicSubstitution.lift 1) right_p) (NCicSubstitution.lift 1 matched) (n-1))
- | _ -> assert false
- in
- (*let eq = NCic.Const (NReference.reference_of_string ("cic:/matita/ng/Plogic/equality/eq.ind(1,0,2)")) in
- let eq_refl = NCic.Const (NReference.reference_of_string ("cic:/matita/ng/Plogic/equality/eq.con(0,1,2)")) in*)
- let eq = NCic.Const (NReference.reference_of_string ("cic:/matita/ng/Plogic/jmeq/jmeq.ind(1,0,2)")) in
- let eq_refl = NCic.Const (NReference.reference_of_string ("cic:/matita/ng/Plogic/jmeq/jmeq.con(0,1,2)")) in
- let add_params
- metasenv subst context cty outty mty m i
- =
- let rec aux context outty par j mty m = function
- | NCic.Prod (name, src, tgt) ->
- let t,k =
- aux
- ((name, NCic.Decl src) :: context)
- (NCicSubstitution.lift 1 outty) (NCic.Rel j::par) (j+1)
- (NCicSubstitution.lift 1 mty) (NCicSubstitution.lift 1 m) tgt
- in
- NCic.Prod (name, src, t), k
- | NCic.Const (Ref.Ref (_,Ref.Ind (_,_,leftno)) as r) ->
- let k =
- let k = NCic.Const(Ref.mk_constructor i r) in
- NCicUntrusted.mk_appl k par
- in
- (* the type has no parameters, so kty = mty
- let kty =
- try NCicTypechecker.typeof ~subst ~metasenv context k
- with NCicTypeChecker.TypeCheckerFailure _ -> assert false
- in *)
- NCic.Prod ("p",
- NCic.Appl [eq; mty; m; mty; k],
- (NCicSubstitution.lift 1
- (NCicReduction.head_beta_reduce ~delta:max_int
- (NCicUntrusted.mk_appl outty [k])))),[mty,m,mty,k]
- | NCic.Appl (NCic.Const (Ref.Ref (_,Ref.Ind (_,_,leftno)) as r)::pl) ->
- let left_p,right_p = HExtlib.split_nth leftno pl in
- let has_rights = right_p <> [] in
- let k =
- let k = NCic.Const(Ref.mk_constructor i r) in
- NCicUntrusted.mk_appl k (left_p@par)
- in
- let right_p =
- try match
- NCicTypeChecker.typeof ~subst ~metasenv context k
- with
- | NCic.Appl (NCic.Const (Ref.Ref (_,Ref.Ind (_,_,_)))::args) ->
- snd (HExtlib.split_nth leftno args)
- | _ -> assert false
- with NCicTypeChecker.TypeCheckerFailure _-> assert false
- in
- let orig_right_p =
- match mty with
- | NCic.Appl (NCic.Const (Ref.Ref (_,Ref.Ind (_,_,_)))::args) ->
- snd (HExtlib.split_nth leftno args)
- | _ -> assert false
- in
- List.fold_right2
- (fun x y (tacc,pacc) ->
- let xty =
- try NCicTypeChecker.typeof ~subst ~metasenv context x
- with NCicTypeChecker.TypeCheckerFailure _ -> assert false
- in
- let yty =
- try NCicTypeChecker.typeof ~subst ~metasenv context y
- with NCicTypeChecker.TypeCheckerFailure _ -> assert false
- in
- NCic.Prod ("_", NCic.Appl [eq;xty;x;yty;y],
- NCicSubstitution.lift 1 tacc), (xty,x,yty,y)::pacc)
- (orig_right_p @ [m]) (right_p @ [k])
- (NCicReduction.head_beta_reduce ~delta:max_int
- (NCicUntrusted.mk_appl outty (right_p@[k])), [])
-
- (* if has_rights then
- NCicReduction.head_beta_reduce ~delta:max_int
- (NCic.Appl (outty ::right_p @ [k])),k
- else
- NCic.Prod ("p",
- NCic.Appl [eq; mty; m; k],
- (NCicSubstitution.lift 1
- (NCicReduction.head_beta_reduce ~delta:max_int
- (NCic.Appl (outty ::right_p @ [k]))))),k*)
- | _ -> assert false
- in
- aux context outty [] 1 mty m cty
- in
- let add_lambda_for_refl_m pbo eqs cty =
- (* k lives in the right context *)
- (* if rno <> 0 then pbo else *)
- let rec aux = function
- | NCic.Lambda (name,src,bo), NCic.Prod (_,_,ty) ->
- NCic.Lambda (name,src,
- (aux (bo,ty)))
- | t,_ -> snd (List.fold_right
- (fun (xty,x,yty,y) (n,acc) -> n+1, NCic.Lambda ("p" ^ string_of_int n,
- NCic.Appl [eq; xty; x; yty; y],
- NCicSubstitution.lift 1 acc)) eqs (1,t))
- (*NCic.Lambda ("p",
- NCic.Appl [eq; mty; m; k],NCicSubstitution.lift 1 t)*)
- in
- aux (pbo,cty)
- in
- let add_pi_for_refl_m context new_outty mty m lno rno =
- (*if rno <> 0 then new_outty else*)
- let rec aux context mty m = function
- | NCic.Lambda (name, src, tgt) ->
- let context = (name, NCic.Decl src)::context in
- NCic.Lambda (name, src, aux context (NCicSubstitution.lift 1 mty) (NCicSubstitution.lift 1 m) tgt)
- | t ->
- let lhs =
- match mty with
- | NCic.Appl (_::params) -> (snd (HExtlib.split_nth lno params))@[m]
- | _ -> [m]
- in
- let rhs =
- List.map (fun x -> NCic.Rel x)
- (List.rev (HExtlib.list_seq 1 (rno+2))) in
- List.fold_right2
- (fun x y acc ->
- let xty =
- try NCicTypeChecker.typeof ~subst ~metasenv context x
- with NCicTypeChecker.TypeCheckerFailure _ -> assert false
- in
- let yty =
- try NCicTypeChecker.typeof ~subst ~metasenv context y
- with NCicTypeChecker.TypeCheckerFailure _ -> assert false
- in
- NCic.Prod
- ("_", NCic.Appl [eq;xty;x;yty;y],
- (NCicSubstitution.lift 1 acc)))
- lhs rhs t
- (* NCic.Prod
- ("_", NCic.Appl [eq;mty;m;NCic.Rel 1],
- NCicSubstitution.lift 1 t)*)
- in
- aux context mty m new_outty
- in (* }}} end helper functions *)
- (* constructors types with left params already instantiated *)
- let outty = NCicUntrusted.apply_subst subst context outty in
- let cl, left_p, leftno,rno =
- get_cl_and_left_p r outty
- in
- let right_p, mty =
- try
- match
- NCicTypeChecker.typeof ~subst ~metasenv context m
- with
- | (NCic.Const (Ref.Ref (_,Ref.Ind (_,_,_))) | NCic.Meta _) as mty -> [], mty
- | NCic.Appl ((NCic.Const (Ref.Ref (_,Ref.Ind (_,_,_)))|NCic.Meta _)::args) as mty ->
- snd (HExtlib.split_nth leftno args), mty
- | _ -> assert false
- with NCicTypeChecker.TypeCheckerFailure _ ->
- raise (AssertFailure(lazy "already ill-typed matched term"))
- in
- let mty = NCicUntrusted.apply_subst subst context mty in
- let outty = NCicUntrusted.apply_subst subst context outty in
- let expty = NCicUntrusted.apply_subst subst context expty in
- let new_outty =
- keep_lambdas_and_put_expty context outty expty right_p m (rno+1)
- in
- pp
- (lazy ("CASE: new_outty: " ^ NCicPp.ppterm
- ~context ~metasenv ~subst new_outty));
- let _,pl,subst,metasenv =
- List.fold_right2
- (fun cty pbo (i, acc, s, menv) ->
- pp (lazy ("begin iteration"));
- (* Pi k_par, (Pi H:m=(K_i left_par k_par)),
- * (new_)outty right_par (K_i left_par k_par) *)
- let infty_pbo, _ =
- add_params menv s context cty outty mty m i in
- pp
- (lazy ("CASE: infty_pbo: "^ NCicPp.ppterm
- ~context ~metasenv ~subst infty_pbo));
- let expty_pbo, eqs = (* k is (K_i left_par k_par) *)
- add_params menv s context cty new_outty mty m i in
- pp
- (lazy ("CASE: expty_pbo: "^ NCicPp.ppterm
- ~context ~metasenv ~subst expty_pbo));
- let pbo = add_lambda_for_refl_m pbo eqs cty in
- pp
- (lazy ("CASE: pbo: " ^ NCicPp.ppterm
- ~context ~metasenv ~subst pbo));
- let metasenv, subst, pbo, _ =
- try_coercions rdb ~localise menv s context pbo
- orig_t (*??*) infty_pbo expty_pbo perform_unification exc
- in
- pp
- (lazy ("CASE: pbo2: " ^ NCicPp.ppterm
- ~context ~metasenv ~subst pbo));
- (i-1, pbo::acc, subst, metasenv))
- cl pl (List.length pl, [], subst, metasenv)
- in
- (*let metasenv, subst =
- try
- NCicUnification.unify rdb metasenv subst context outty new_outty
- with _ -> raise (RefineFailure (lazy (localise orig_t, "try_coercions")))
- in*)
- let new_outty = add_pi_for_refl_m context new_outty mty m leftno rno in
- pp (lazy ("CASE: new_outty: " ^ (NCicPp.ppterm
- ~metasenv ~subst ~context new_outty)));
- let right_tys =
- List.map
- (fun t -> NCicTypeChecker.typeof ~subst ~metasenv context t) right_p in
- let eqs =
- List.map2 (fun x y -> NCic.Appl[eq_refl;x;y]) (right_tys@[mty])
- (right_p@[m]) in
- let t = NCic.Appl (NCic.Match(r,new_outty,m,pl) :: eqs)
- in
- metasenv, subst, t, expty (*}}}*)
- | NCic.Prod (nameprod, src, ty),NCic.Prod (_, src2, ty2), _ ->
- let rec mk_fresh_name ctx firstch n =
- let candidate = (String.make 1 firstch) ^ (string_of_int n) in
- if (List.for_all (fun (s,_) -> s <> candidate) ctx) then candidate
- else mk_fresh_name ctx firstch (n+1)
- in
- (*{{{*) pp (lazy "LAM");
- pp (lazy ("LAM: t = " ^ NCicPp.ppterm ~metasenv ~subst ~context t));
- let name_con = mk_fresh_name context 'c' 0
- (*FreshNamesGenerator.mk_fresh_name
- ~subst metasenv context ~typ:src2 Cic.Anonymous*)
- in
- let context_src2 = ((name_con, NCic.Decl src2) :: context) in
- (* contravariant part: the argument of f:src->ty *)
- let metasenv, subst, rel1, _ =
- try_coercions rdb ~localise metasenv subst context_src2
- (NCic.Rel 1) orig_t (NCicSubstitution.lift 1 src2)
- (NCicSubstitution.lift 1 src) perform_unification exc
- in
- (* covariant part: the result of f(c x); x:src2; (c x):src *)
- let name_t, bo =
- match t with
- | NCic.Lambda (n,_,bo) -> n, cs_subst rel1 (NCicSubstitution.lift_from 2 1 bo)
- | _ -> name_con, NCicUntrusted.mk_appl (NCicSubstitution.lift 1 t) [rel1]
- in
- (* we fix the possible dependency problem in the source ty *)
- let ty = cs_subst rel1 (NCicSubstitution.lift_from 2 1 ty) in
- let metasenv, subst, bo, _ =
- try_coercions rdb ~localise metasenv subst context_src2
- bo orig_t ty ty2 perform_unification exc
- in
- let coerced = NCic.Lambda (name_t,src2, bo) in
- pp (lazy ("LAM: coerced = " ^ NCicPp.ppterm ~metasenv ~subst ~context coerced));
- metasenv, subst, coerced, expty (*}}}*)
- | _ -> raise exc
- with exc2 ->
+ in
pp(lazy("try_coercion " ^
NCicPp.ppterm ~metasenv ~subst ~context infty ^ " |---> " ^
NCicPp.ppterm ~metasenv ~subst ~context expty));
;;
let undebruijnate inductive ref t rev_fl =
- let len = List.length rev_fl in
NCicSubstitution.psubst (fun x -> x)
- (HExtlib.list_mapi
+ (List.rev (HExtlib.list_mapi
(fun (_,_,rno,_,_,_) i ->
- let i = len - i - 1 in
NCic.Const
(if inductive then NReference.mk_fix i rno ref
else NReference.mk_cofix i ref))
- rev_fl)
+ rev_fl))
t
;;
metasenv,subst,item1::context
) (metasenv,subst,tys) sx_context_ty_rev sx_context_te_rev
with Invalid_argument "List.fold_left2" -> assert false in
- let metasenv, subst =
- let rec aux context (metasenv,subst) = function
- | NCic.Meta _ -> metasenv, subst
- | NCic.Implicit _ -> metasenv, subst
- | NCic.Appl (NCic.Rel i :: args) as t
- when i > List.length context - len ->
- let lefts, _ = HExtlib.split_nth leftno args in
- let ctxlen = List.length context in
- let (metasenv, subst), _ =
- List.fold_left
- (fun ((metasenv, subst),l) arg ->
- NCicUnification.unify rdb
- ~test_eq_only:true metasenv subst context arg
- (NCic.Rel (ctxlen - len - l)), l+1
- )
- ((metasenv, subst), 0) lefts
- in
- metasenv, subst
- | t -> NCicUtils.fold (fun e c -> e::c) context aux
- (metasenv,subst) t
- in
- aux context (metasenv,subst) te
- in
let con_sort= NCicTypeChecker.typeof ~subst ~metasenv context te in
(match
NCicReduction.whd ~subst context con_sort,
let _,_,t,_ = NCicUtils.lookup_subst i subst in
let t = NCicSubstitution.subst_meta lc t in
eat_lambdas ctx t
- with NCicUtils.Subst_not_found _ -> ctx, t)
+ with Not_found -> ctx, t)
| t -> ctx, t
in
let context_body = eat_lambdas [] t in
let time2 = Unix.gettimeofday () in
let time1 =
match !times with time1::tl -> times := tl; time1 | [] -> assert false in
- prerr_endline ("}}} " ^ !indent ^ " " ^ string_of_float (time2 -. time1));
+ prerr_endline ("}}} " ^ string_of_float (time2 -. time1));
(match exc_opt with
| Some e -> prerr_endline ("exception raised: " ^ Printexc.to_string e)
| None -> ());
| _ ->
let lty = NCicSubstitution.subst_meta lc ty in
pp (lazy ("On the types: " ^
- ppterm ~metasenv ~subst ~context ty_t ^ "=<=" ^
- ppterm ~metasenv ~subst ~context lty));
+ ppterm ~metasenv ~subst ~context lty ^ "=<=" ^
+ ppterm ~metasenv ~subst ~context ty_t));
let metasenv, subst =
unify rdb false metasenv subst context ty_t lty false
in
len2 < len1 && cc2 = fst (HExtlib.split_nth len2 cc1) ->
instantiate rdb test_eq_only metasenv subst context m lc'
(NCicReduction.head_beta_reduce ~subst t1) (not swap)
- | C.Meta (n,lc), C.Meta (m,lc') when
- let _,_,tyn = NCicUtils.lookup_meta n metasenv in
- let _,_,tym = NCicUtils.lookup_meta m metasenv in
- let tyn = NCicSubstitution.subst_meta lc tyn in
- let tym = NCicSubstitution.subst_meta lc tym in
- match tyn,tym with
- NCic.Sort NCic.Type u1, NCic.Sort NCic.Type u2 ->
- NCicEnvironment.universe_lt u1 u2
- | _,_ -> false ->
- instantiate rdb test_eq_only metasenv subst context m lc'
- (NCicReduction.head_beta_reduce ~subst t1) (not swap)
| C.Meta (n,lc), t ->
instantiate rdb test_eq_only metasenv subst context n lc
(NCicReduction.head_beta_reduce ~subst t) swap
instantiate rdb test_eq_only metasenv subst context n lc
(NCicReduction.head_beta_reduce ~subst t) (not swap)
- (* higher order unification case *)
| NCic.Appl (NCic.Meta (i,l) as meta :: args), _ ->
- (* this easy_case handles "(? ?) =?= (f a)", same number of
- * args, preferring the instantiation "f" over "\_.f a" for the
- * metavariable in head position. Since the arguments of the meta
- * are flexible, delift would ignore them generating a constant
- * function even in the easy case above *)
- let easy_case =
- match t2 with
- | NCic.Appl (f :: f_args)
- when
- List.exists (NCicMetaSubst.is_flexible context ~subst) args ->
- let mlen = List.length args in
- let flen = List.length f_args in
- let min_len = min mlen flen in
- let mhe,margs = HExtlib.split_nth (mlen - min_len) args in
- let fhe,fargs = HExtlib.split_nth (flen - min_len) f_args in
- (try
- Some (List.fold_left2
- (fun (m, s) t1 t2 ->
- unify rdb test_eq_only m s context t1 t2 swap
- ) (metasenv,subst)
- ((NCicUntrusted.mk_appl meta mhe)::margs)
- ((NCicUntrusted.mk_appl f fhe)::fargs))
- with UnificationFailure _ | Uncertain _ | KeepReducing _ ->
- None)
- | _ -> None
- in
- (match easy_case with
- | Some ms -> ms
- | None ->
- (* This case handles "(?_f ..ti..) =?= t2", abstracting every
- * non flexible ti (delift skips local context items that are
- * flexible) from t2 in two steps:
- * 1) ?_f := \..xi.. .?
- * 2) ?_f ..ti.. =?= t2 --unif_machines-->
- ?_f[..ti..] =?= t2 --instantiate-->
- delift [..ti..] t2 *)
- let metasenv, lambda_Mj =
- lambda_intros rdb metasenv subst context (List.length args)
- (NCicTypeChecker.typeof ~metasenv ~subst context meta)
- in
- let metasenv, subst =
- unify rdb test_eq_only metasenv subst context
- (C.Meta (i,l)) lambda_Mj swap
- in
- let metasenv, subst =
- unify rdb test_eq_only metasenv subst context t1 t2 swap
- in
- (try
- let name, ctx, term, ty = NCicUtils.lookup_subst i subst in
- let term = eta_reduce subst term in
- let subst = List.filter (fun (j,_) -> j <> i) subst in
- metasenv, ((i, (name, ctx, term, ty)) :: subst)
- with Not_found -> assert false))
-
+ let metasenv, lambda_Mj =
+ lambda_intros rdb metasenv subst context (List.length args)
+ (NCicTypeChecker.typeof ~metasenv ~subst context meta)
+ in
+ let metasenv, subst =
+ try
+ unify rdb test_eq_only metasenv subst context
+ (C.Meta (i,l)) lambda_Mj swap
+ with UnificationFailure msg | Uncertain msg when not norm2->
+ (* failure: let's try again argument vs argument *)
+ raise (KeepReducing msg)
+ in
+ let metasenv, subst =
+ unify rdb test_eq_only metasenv subst context t1 t2 swap
+ in
+ (try
+ let name, ctx, term, ty = NCicUtils.lookup_subst i subst in
+ let term = eta_reduce subst term in
+ let subst = List.filter (fun (j,_) -> j <> i) subst in
+ metasenv, ((i, (name, ctx, term, ty)) :: subst)
+ with Not_found -> assert false)
| _, NCic.Appl (NCic.Meta (_,_) :: _) ->
unify rdb test_eq_only metasenv subst context t2 t1 (not swap)
with
Invalid_argument _ ->
raise (Uncertain (mk_msg metasenv subst context t1 t2))
+ | UnificationFailure _ | Uncertain _ when not (norm1 && norm2) ->
+ raise (KeepReducing (mk_msg metasenv subst context t1 t2))
| KeepReducing _ | KeepReducingThis _ -> assert false
in
metasenv, subst
| (C.Match (Ref.Ref (_,Ref.Ind (_,tyno,_)) as ref1,outtype1,term1,pl1),
- C.Match (ref2,outtype2,term2,pl2)) when Ref.eq ref1 ref2 ->
+ C.Match (ref2,outtype2,term2,pl2)) ->
let _,_,itl,_,_ = NCicEnvironment.get_checked_indtys ref1 in
let _,_,ty,_ = List.nth itl tyno in
let rec remove_prods ~subst context ty =
| C.Sort C.Prop -> true
| _ -> false
in
- (* if not (Ref.eq ref1 ref2) then
+ if not (Ref.eq ref1 ref2) then
raise (Uncertain (mk_msg metasenv subst context t1 t2))
- else*)
+ else
let metasenv, subst =
unify rdb test_eq_only metasenv subst context outtype1 outtype2 swap in
let metasenv, subst =
| _ -> raise (KeepReducing (mk_msg metasenv subst context t1 t2))
(*D*) in outside None; rc with exn -> outside (Some exn); raise exn
in
- let fo_unif test_eq_only metasenv subst (norm1,t1 as nt1) (norm2,t2 as nt2)=
- try fo_unif test_eq_only metasenv subst nt1 nt2
- with
- UnificationFailure _ | Uncertain _ when not norm1 || not norm2 ->
- raise (KeepReducing (mk_msg metasenv subst context t1 t2))
- in
let try_hints metasenv subst (_,t1 as mt1) (_,t2 as mt2) (* exc*) =
- if NCicUntrusted.metas_of_term subst context t1 = [] &&
- NCicUntrusted.metas_of_term subst context t2 = []
- then None
- else begin
(*D*) inside 'H'; try let rc =
pp(lazy ("\nProblema:\n" ^
ppterm ~metasenv ~subst ~context t1 ^ " =?= " ^
List.fold_left
(fun (metasenv, subst) (x,y) ->
unify rdb test_eq_only metasenv subst context x y false)
- (metasenv, subst) (List.rev premises)
+ (metasenv, subst) premises
in
pp(lazy("FUNZIONA!"));
Some (metasenv, subst)
in
cand_iter candidates
(*D*) in outside None; rc with exn -> outside (Some exn); raise exn
- end
in
let put_in_whd m1 m2 =
NCicReduction.reduce_machine ~delta:max_int ~subst context m1,
| Uncertain _ as exn -> raise exn
| _ -> assert false
in
- let fo_unif_heads_and_cont_or_unwind_and_hints
- test_eq_only metasenv subst m1 m2 cont hm1 hm2
- =
- let ms, continuation =
- (* calling the continuation inside the outermost try is an option
- and makes unification stronger, but looks not frequent to me
- that heads unify but not the arguments and that an hints can fix
- that *)
- try fo_unif test_eq_only metasenv subst m1 m2, cont
- with
- | UnificationFailure _
- | KeepReducing _ | Uncertain _ as exn ->
- let (t1,norm1),(t2,norm2) = hm1, hm2 in
- match
- try_hints metasenv subst
- (norm1,NCicReduction.unwind t1) (norm2,NCicReduction.unwind t2)
- with
- | Some x -> x, fun x -> x
- | None ->
- match exn with
- | KeepReducing msg -> raise (KeepReducingThis (msg,hm1,hm2))
- | UnificationFailure _ | Uncertain _ as exn -> raise exn
- | _ -> assert false
- in
- continuation ms
- in
let height_of = function
| NCic.Const (Ref.Ref (_,Ref.Def h))
| NCic.Const (Ref.Ref (_,Ref.Fix (_,_,h)))
match t1 with
| C.Const r -> NCicEnvironment.get_relevance r
| _ -> [] *) in
- let unif_from_stack (metasenv, subst) (t1, t2, b) =
+ let unif_from_stack t1 t2 b metasenv subst =
try
let t1 = NCicReduction.from_stack ~delta:max_int t1 in
let t2 = NCicReduction.from_stack ~delta:max_int t2 in
NCicReduction.unwind (k2,e2,t2,List.rev l2),
todo
in
- let check_stack l1 l2 r =
- match t1, t2 with
- | NCic.Meta _, _ | _, NCic.Meta _ ->
- (NCicReduction.unwind (k1,e1,t1,s1)),
- (NCicReduction.unwind (k2,e2,t2,s2)),[]
- | _ -> check_stack l1 l2 r []
- in
- let hh1,hh2,todo = check_stack (List.rev s1) (List.rev s2) relevance in
+ let hh1,hh2,todo=check_stack (List.rev s1) (List.rev s2) relevance [] in
try
- fo_unif_heads_and_cont_or_unwind_and_hints
- test_eq_only metasenv subst (norm1,hh1) (norm2,hh2)
- (fun ms -> List.fold_left unif_from_stack ms todo)
- m1 m2
+ let metasenv,subst =
+ fo_unif_w_hints test_eq_only metasenv subst (norm1,hh1) (norm2,hh2) in
+ List.fold_left
+ (fun (metasenv,subst) (x1,x2,r) ->
+ unif_from_stack x1 x2 r metasenv subst
+ ) (metasenv,subst) todo
with
| KeepReducing _ -> assert false
| KeepReducingThis _ ->
assert (not (norm1 && norm2));
- unif_machines metasenv subst (small_delta_step ~subst m1 m2)
+ unif_machines metasenv subst (small_delta_step ~subst m1 m2)
| UnificationFailure _ | Uncertain _ when (not (norm1 && norm2))
-> unif_machines metasenv subst (small_delta_step ~subst m1 m2)
| UnificationFailure msg
module TermSet = Set.Make(TermOT)
-module TermListOT : Set.OrderedType with type t = NCic.term list =
- struct
- type t = NCic.term list
- let compare = Pervasives.compare
- end
-
-module TermListSet : Set.S with type elt = NCic.term list =
- Set.Make(TermListOT)
-
-
module NCicIndexable : Indexable
-with type input = NCic.term
-and type constant_name = NReference.reference = struct
+with type input = NCic.term and type constant_name = NUri.uri = struct
type input = NCic.term
-type constant_name = NReference.reference
+type constant_name = NUri.uri
let ppelem = function
- | Constant (ref,arity) ->
- "("^NReference.string_of_reference ref ^ "," ^ string_of_int arity^")"
+ | Constant (uri,arity) ->
+ "("^NUri.name_of_uri uri ^ "," ^ string_of_int arity^")"
| Bound (i,arity) ->
"("^string_of_int i ^ "," ^ string_of_int arity^")"
| Variable -> "?"
| NCic.Rel i -> [Bound (i, arity)]
| NCic.Sort (NCic.Prop) -> assert (arity=0); [Proposition]
| NCic.Sort _ -> assert (arity=0); [Datatype]
- | NCic.Const (u) -> [Constant (u, arity)]
+ | NCic.Const (NReference.Ref (u,_)) -> [Constant (u, arity)]
| NCic.Match _ -> [Dead]
in
aux 0 0 t
let compare e1 e2 =
match e1,e2 with
| Constant (u1,a1),Constant (u2,a2) ->
- let x = NReference.compare u1 u2 in
+ let x = NUri.compare u1 u2 in
if x = 0 then Pervasives.compare a1 a2 else x
| e1,e2 -> Pervasives.compare e1 e2
;;
*)
module NCicIndexable : Discrimination_tree.Indexable
-with type input = NCic.term and type constant_name = NReference.reference
+with type input = NCic.term and type constant_name = NUri.uri
module TermSet : Set.S with type elt = NCic.term
-module TermListSet : Set.S with type elt = NCic.term list
module DiscriminationTree : Discrimination_tree.DiscriminationTree
with type constant_name = NCicIndexable.constant_name
-nCicTacReduction.cmi:
-nTacStatus.cmi:
-nCicElim.cmi:
nTactics.cmi: nTacStatus.cmi
-zipTree.cmi:
andOrTree.cmi: zipTree.cmi
-nnAuto.cmi: nTacStatus.cmi
nAuto.cmi: nTacStatus.cmi
nInversion.cmi: nTacStatus.cmi
nDestructTac.cmi: nTacStatus.cmi
zipTree.cmx: zipTree.cmi
andOrTree.cmo: zipTree.cmi andOrTree.cmi
andOrTree.cmx: zipTree.cmx andOrTree.cmi
-nnAuto.cmo: nTactics.cmi nTacStatus.cmi nCicTacReduction.cmi nnAuto.cmi
-nnAuto.cmx: nTactics.cmx nTacStatus.cmx nCicTacReduction.cmx nnAuto.cmi
-nAuto.cmo: zipTree.cmi nnAuto.cmi nTactics.cmi nTacStatus.cmi andOrTree.cmi \
- nAuto.cmi
-nAuto.cmx: zipTree.cmx nnAuto.cmx nTactics.cmx nTacStatus.cmx andOrTree.cmx \
- nAuto.cmi
+nAuto.cmo: zipTree.cmi nTactics.cmi nTacStatus.cmi andOrTree.cmi nAuto.cmi
+nAuto.cmx: zipTree.cmx nTactics.cmx nTacStatus.cmx andOrTree.cmx nAuto.cmi
nInversion.cmo: nTactics.cmi nCicElim.cmi nInversion.cmi
nInversion.cmx: nTactics.cmx nCicElim.cmx nInversion.cmi
nDestructTac.cmo: nTactics.cmi nTacStatus.cmi nDestructTac.cmi
-nCicTacReduction.cmi:
-nTacStatus.cmi:
-nCicElim.cmi:
nTactics.cmi: nTacStatus.cmi
-zipTree.cmi:
andOrTree.cmi: zipTree.cmi
-nnAuto.cmi: nTacStatus.cmi
nAuto.cmi: nTacStatus.cmi
nInversion.cmi: nTacStatus.cmi
nDestructTac.cmi: nTacStatus.cmi
zipTree.cmx: zipTree.cmi
andOrTree.cmo: zipTree.cmi andOrTree.cmi
andOrTree.cmx: zipTree.cmx andOrTree.cmi
-nnAuto.cmo: nTactics.cmi nTacStatus.cmi nCicTacReduction.cmi nnAuto.cmi
-nnAuto.cmx: nTactics.cmx nTacStatus.cmx nCicTacReduction.cmx nnAuto.cmi
-nAuto.cmo: zipTree.cmi nnAuto.cmi nTactics.cmi nTacStatus.cmi andOrTree.cmi \
- nAuto.cmi
-nAuto.cmx: zipTree.cmx nnAuto.cmx nTactics.cmx nTacStatus.cmx andOrTree.cmx \
- nAuto.cmi
+nAuto.cmo: zipTree.cmi nTactics.cmi nTacStatus.cmi andOrTree.cmi nAuto.cmi
+nAuto.cmx: zipTree.cmx nTactics.cmx nTacStatus.cmx andOrTree.cmx nAuto.cmi
nInversion.cmo: nTactics.cmi nCicElim.cmi nInversion.cmi
nInversion.cmx: nTactics.cmx nCicElim.cmx nInversion.cmi
nDestructTac.cmo: nTactics.cmi nTacStatus.cmi nDestructTac.cmi
nTactics.mli \
zipTree.mli \
andOrTree.mli \
- nnAuto.mli \
nAuto.mli \
- nDestructTac.mli \
- nInversion.mli
+ nInversion.mli \
+ nDestructTac.mli
IMPLEMENTATION_FILES = $(INTERFACE_FILES:%.mli=%.ml)
open Printf
-let debug = ref true
+let debug = ref false
let debug_print ?(depth=0) s =
if !debug then prerr_endline (String.make depth '\t'^Lazy.force s) else ()
let debug_do f = if !debug then f () else ()
(* =================================== paramod =========================== *)
let auto_paramod ~params:(l,_) status goal =
- let l = match l with
- | None -> raise (Error (lazy "no proof found",None))
- | Some l -> l in
let gty = get_goalty status goal in
let n,h,metasenv,subst,o = status#obj in
let status,t = term_of_cic_term status gty (ctx_of gty) in
NCicParamod.nparamod status metasenv subst (ctx_of gty) (NCic.Rel ~-1,t) l
with
| [] -> raise (Error (lazy "no proof found",None))
- | (pt, _, metasenv, subst)::_ ->
+ | (pt, metasenv, subst)::_ ->
let status = status#set_obj (n,h,metasenv,subst,o) in
instantiate status goal (mk_cic_term (ctx_of gty) pt)
;;
status pos cache
and attack pos cache and_item =
- (* show pos; uncomment to show the tree *)
+ show pos; (* uncomment to show the tree *)
match and_item with
| _, S _ -> assert false (* next would close the proof or give a D *)
| _, L _ -> assert false (* L is a final solution *)
up_to depth depth
;;
-let rec rm_assoc n = function
- | [] -> assert false
- | (x,i)::tl when n=x -> i,tl
- | p::tl -> let i,tl = rm_assoc n tl in i,p::tl
-;;
-
-let merge canonicals elements n m =
- let cn,canonicals = rm_assoc n canonicals in
- let cm,canonicals = rm_assoc m canonicals in
- let ln,elements = rm_assoc cn elements in
- let lm,elements = rm_assoc cm elements in
- let canonicals =
- (n,cm)::(m,cm)::List.map
- (fun (x,xc) as p ->
- if xc = cn then (x,cm) else p) canonicals
- in
- let elements = (cn,ln@lm)::elements
- in
- canonicals,elements
-;;
-
-let clusters f l =
- let canonicals = List.map (fun x -> (x,x)) l in
- let elements = List.map (fun x -> (x,[x])) l in
- List.fold_left
- (fun (canonicals,elements) x ->
- let dep = f x in
- List.fold_left
- (fun (canonicals,elements) d ->
- merge canonicals elements d x)
- (canonicals,elements) dep)
- (canonicals,elements) l
-;;
-
let group_by_tac ~eq_predicate ~action:tactic status =
let goals = head_goals status#stack in
if List.length goals < 2 then tactic status
let l2 = HExtlib.list_mapi (fun x i -> x,i+1) l2 in
List.map (fun x -> List.assoc x l2) l1
in
- NTactics.block_tac ([ NTactics.branch_tac ~force:false]
+ NTactics.block_tac ([ NTactics.branch_tac ]
@
HExtlib.list_concat ~sep:[NTactics.shift_tac]
(List.map (fun gl-> [NTactics.pos_tac (pos_of gl goals); tactic]) classes)
;;
(* ========================= dispatching of auto/auto_paramod ============ *)
-let auto_tac ~params:(_,flags as params) ?trace_ref =
+let auto_tac ~params:(_,flags as params) =
if List.mem_assoc "paramodulation" flags then
- auto_paramod_tac ~params
- else if List.mem_assoc "demod" flags then
- NnAuto.demod_tac ~params
- else if List.mem_assoc "paramod" flags then
- NnAuto.paramod_tac ~params
- else if List.mem_assoc "fast_paramod" flags then
- NnAuto.fast_eq_check_tac ~params
- else if List.mem_assoc "slir" flags then
- NnAuto.auto_tac ~params ?trace_ref
+ auto_paramod_tac ~params
else
auto_tac ~params
;;
(* $Id: nCic.ml 9058 2008-10-13 17:42:30Z tassi $ *)
val auto_tac:
- params:(NTacStatus.tactic_term list option * (string * string) list) ->
- ?trace_ref:CicNotationPt.term list ref ->
+ params:(NTacStatus.tactic_term list * (string * string) list) ->
's NTacStatus.tactic
val group_by_tac:
let args,sort = NCicReduction.split_prods ~subst:[] [] (-1) ty in
let args = List.rev_map (function name,_ -> mk_id name) args in
let rec_arg = mk_id (fresh_name ()) in
- let mk_prods =
+ let p_ty =
List.fold_right
- (fun name res -> CicNotationPt.Binder (`Forall,(name,None),res)) in
- let p_ty = mk_prods args
+ (fun name res -> CicNotationPt.Binder (`Forall,(name,None),res)) args
(CicNotationPt.Binder
(`Forall,
(rec_arg,Some (mk_appl (mk_id ind_name :: params @ args))),
CicNotationPt.Sort outsort)) in
- let mk_arrs n = mk_prods (HExtlib.mk_list (mk_id "_") n) in
let args = args @ [rec_arg] in
let k_names = List.map (function _,name,_ -> name_of_k name) cl in
- (*
let final_params =
List.map (function name -> name, None) params @
[p_name,Some p_ty] @
List.map (function name -> name, None) k_names @
List.map (function name -> name, None) args in
- *)
let cty = mk_appl (p_name :: args) in
let ty = Some cty in
- let branches_with_args =
+ let branches =
List.map
(function (_,name,ty) ->
let _,ty = NCicReduction.split_prods ~subst:[] [] leftno ty in
let cargs,ty= my_split_prods ~subst:[] [] (-1) ty in
- let cargs_recargs_nih =
- List.fold_left
- (fun (acc,nih) -> function
+ let cargs_and_recursive_args =
+ List.rev_map
+ (function
_,NCic.Def _ -> assert false
| name,NCic.Decl ty ->
let context,ty = my_split_prods ~subst:[] [] (-1) ty in
->
let abs = List.rev_map (fun id,_ -> mk_id id) context in
let name = mk_id name in
- (name, Some (
+ name, Some (
List.fold_right
(fun id res ->
CicNotationPt.Binder (`Lambda,(id,None),res))
k_names @
List.map (fun _ -> CicNotationPt.Implicit `JustOne)
(List.tl args) @
- [mk_appl (name::abs)]))))::acc, nih + 1
- | _ -> (mk_id name,None)::acc,nih
- ) ([],0) cargs in
- let cargs_and_recursive_args, nih = cargs_recargs_nih in
+ [mk_appl (name::abs)])))
+ | _ -> mk_id name,None
+ ) cargs in
let cargs,recursive_args = List.split cargs_and_recursive_args in
let recursive_args = HExtlib.filter_map (fun x -> x) recursive_args in
- (CicNotationPt.Pattern (name,None,List.map (fun x -> x,None) cargs),
- mk_appl (name_of_k name :: cargs @ recursive_args)), (name,cargs, nih)
+ CicNotationPt.Pattern (name,None,List.map (fun x -> x,None) cargs),
+ mk_appl (name_of_k name :: cargs @ recursive_args)
) cl
in
- let branches, branch_args = List.split branches_with_args in
- let bo = CicNotationPt.Case (rec_arg,Some (ind_name,None),Some p_name,branches) in
- let final_params =
- List.map (function name -> name, None) params @
- [p_name,Some p_ty] @
- List.map (function name, cargs, nih ->
- name_of_k name,
- Some (mk_prods cargs (mk_arrs nih
- (mk_appl
- (p_name::HExtlib.mk_list (CicNotationPt.Implicit `JustOne)
- (List.length args - 1) @
- [mk_appl (mk_id name :: params @ cargs)]))))) branch_args @
- List.map (function name -> name, None) args in
+ let bo = CicNotationPt.Case (rec_arg,Some (ind_name,None),None,branches) in
let recno = List.length final_params in
let where = recno - 1 in
let res =
(* $Id: nCic.ml 9058 2008-10-13 17:42:30Z tassi $ *)
let rec normalize ?(delta=0) ~subst ctx t =
- normalize_machine ~delta ~subst ctx
- (fst (NCicReduction.reduce_machine ~delta ~subst ctx (0,[],t,[])))
-and normalize_machine ?(delta=0) ~subst ctx (k,e,t,s) =
- assert (delta=0);
- let t =
- if k = 0 then t
- else
- NCicSubstitution.psubst ~avoid_beta_redexes:true
- (fun e -> normalize_machine ~delta ~subst ctx (NCicReduction.from_env ~delta e)) e t in
- let t =
- match t with
+ let aux = normalize ~delta ~subst in
+ match NCicReduction.whd ~delta ~subst ctx t with
NCic.Meta (n,(s,lc)) ->
let l = NCicUtils.expand_local_context lc in
- let l' = List.map (normalize ~delta ~subst ctx) l in
+ let l' = List.map (aux ctx) l in
if l = l' then t
else
NCic.Meta (n,(s,NCic.Ctx l))
- | t -> NCicUtils.map (fun h ctx -> h::ctx) ctx (normalize ~delta ~subst) t
- in
- if s = [] then t
- else
- NCic.Appl
- (t::
- (List.map (fun i -> normalize_machine ~delta ~subst ctx (NCicReduction.from_stack ~delta i)) s))
+ | t -> NCicUtils.map (fun h ctx -> h::ctx) ctx aux t
;;
open NTacStatus
open Continuationals.Stack
-let debug = false
+let debug = false
let pp =
if debug then (fun x -> prerr_endline (Lazy.force x)) else (fun _ -> ())
CicNotationPt.Ident (id,None)
;;
-let rec mk_prods l t =
- match l with
- [] -> t
- | hd::tl -> CicNotationPt.Binder (`Forall, (mk_id hd, None), mk_prods tl t)
-;;
-
let mk_appl =
function
[] -> assert false
(* input: nome della variabile riscritta
* output: lista dei nomi delle variabili il cui tipo dipende dall'input *)
-let cascade_select_in_ctx ~subst ctx skip iname =
+let cascade_select_in_ctx ~subst ctx iname =
+ prerr_endline "C";
let lctx, rctx = HExtlib.split_nth (iname - 1) ctx in
let lctx = List.rev lctx in
let rec rm_last = function
let indices,_ = List.fold_left
(fun (acc,context) item ->
+ prerr_endline "C2";
match item with
| n,(NCic.Decl s | NCic.Def (s,_))
- when (not (List.for_all (fun x -> NCicTypeChecker.does_not_occur ~subst context (x-1) x s) acc)
- && not (List.mem n skip)) ->
- List.iter (fun m -> pp (lazy ("acc has " ^ (string_of_int m)))) acc;
- pp (lazy ("acc occurs in the type of " ^ n));
+ when not (List.for_all (fun x -> NCicTypeChecker.does_not_occur ~subst context (x-1) x s) acc) ->
+ List.iter (fun m -> prerr_endline ("acc has " ^ (string_of_int m))) acc;
+ prerr_endline ("acc occurs in the type of " ^ n);
(1::List.map ((+) 1) acc, item::context)
| _ -> (List.map ((+) 1) acc, item::context))
([1], rctx) lctx in
- let indices = rm_last indices in
+ prerr_endline "C3:";
+ List.iter (fun n -> prerr_endline (string_of_int n)) indices;
+ let indices = match rm_last indices with
+ | [] -> []
+ | _::tl -> tl in
let res = List.map (fun n -> let s,_ = List.nth ctx (n-1) in s) indices in
- List.iter (fun n -> pp (lazy n)) res;
- pp (lazy (NCicPp.ppcontext ~metasenv:[] ~subst ctx));
+ prerr_endline "C4:";
+ List.iter (fun n -> prerr_endline n) res;
+ prerr_endline (NCicPp.ppcontext ~metasenv:[] ~subst ctx);
res, indices
;;
;;
let nargs it nleft consno =
- pp (lazy (Printf.sprintf "nargs %d %d" nleft consno));
+ prerr_endline (Printf.sprintf "nargs %d %d" nleft consno);
let _,indname,_,cl = it in
let _,_,t_k = List.nth cl consno in
List.length (arg_list nleft t_k) ;;
let default_pattern = "",0,(None,[],Some CicNotationPt.UserInput);;
(* returns the discrimination = injection+contradiction principle *)
+(* FIXME: mi riservo di considerare tipi con parametri sx alla fine *)
-let mk_discriminator it ~use_jmeq nleft xyty status =
+let mk_discriminator it status =
+ let nleft = 0 in
let _,indname,_,cl = it in
let mk_eq tys ts us es n =
- if use_jmeq then
- mk_appl [mk_id "jmeq";
- CicNotationPt.Implicit `JustOne; List.nth ts n;
- CicNotationPt.Implicit `JustOne; List.nth us n]
- else
(* eqty = Tn u0 e0...un-1 en-1 *)
let eqty = mk_appl
(List.nth tys n :: iter (fun i acc ->
List.nth es i:: acc) (n-1) []) in
mk_appl [mk_id "eq"; eqty;
mk_appl (mk_id ("R" ^ string_of_int n) :: params);
- List.nth us n]
-
+ List.nth us n]
in
let kname it j =
let nargs = nargs it nleft i in
let es = List.map (fun x -> mk_id ("e" ^ string_of_int x)) (HExtlib.list_seq 0 nargs) in
let tys = List.map
- (fun x -> iter
- (fun i acc ->
- CicNotationPt.Binder (`Lambda, (mk_id ("x" ^ string_of_int i), None),
- CicNotationPt.Binder (`Lambda, (mk_id ("p" ^ string_of_int i), None),
- acc))) (x-1)
- (CicNotationPt.Implicit (`Tagged ("T" ^ (string_of_int x)))))
- (HExtlib.list_seq 0 nargs) in
+ (fun x -> CicNotationPt.Implicit (`Tagged ("T" ^ (string_of_int x))))
+ (HExtlib.list_seq 0 nargs) in
let tys = tys @
[iter (fun i acc ->
CicNotationPt.Binder (`Lambda, (mk_id ("x" ^ string_of_int i), None),
(HExtlib.list_seq 0 (List.length ts)));
mk_appl (mk_id (kname it j)::us)])]
in
- (** CicNotationPt.Binder (`Lambda, (mk_id "e",
+ CicNotationPt.Binder (`Lambda, (mk_id "e",
Some (mk_appl
[mk_id "eq";
CicNotationPt.Implicit `JustOne;
mk_appl (mk_id (kname it i)::ts);
mk_appl (mk_id (kname it j)::us)])),
- let ts = ts @ [mk_id "e"] in
+ let ts = ts @ [mk_id "e"] in
let refl2 = mk_appl
[mk_id "refl";
CicNotationPt.Implicit `JustOne;
mk_appl (mk_id (kname it j)::us)] in
- let us = us @ [refl2] in *)
+ let us = us @ [refl2] in
CicNotationPt.Binder (`Forall, (mk_id "P", Some (CicNotationPt.Sort (`NType "1") )),
if i = j then
CicNotationPt.Binder (`Forall, (mk_id "_",
Some (iter (fun i acc ->
CicNotationPt.Binder (`Forall, (List.nth es i, Some (mk_eq tys ts us es i)), acc))
(nargs-1)
- (** (CicNotationPt.Binder (`Forall, (mk_id "_",
- Some (mk_eq tys ts us es nargs)),*)
- (mk_id "P"))), mk_id "P")
- else mk_id "P")
+ (CicNotationPt.Binder (`Forall, (mk_id "_",
+ Some (mk_eq tys ts us es nargs)),
+ mk_id "P")))), mk_id "P")
+ else mk_id "P"))
in
let inner i ts = CicNotationPt.Case
(mk_id "y",None,
- (*Some (CicNotationPt.Binder (`Lambda, (mk_id "y",None),
+ Some (CicNotationPt.Binder (`Lambda, (mk_id "y",None),
CicNotationPt.Binder (`Forall, (mk_id "_", Some
(mk_appl [mk_id "eq";CicNotationPt.Implicit
- `JustOne;(*CicNotationPt.Implicit `JustOne*)
- mk_appl (mk_id (kname it i)::ts);mk_id "y"])),
- CicNotationPt.Implicit `JustOne )))*)
- None,
+ `JustOne;CicNotationPt.Implicit `JustOne;mk_id "y"])),
+ CicNotationPt.Implicit `JustOne ))),
List.map
(fun j ->
let nargs_kty = nargs it nleft j in
in
let outer = CicNotationPt.Case
(mk_id "x",None,
- None ,
+ Some (CicNotationPt.Binder (`Lambda, (mk_id "_",None),
+ (*CicNotationPt.Sort (`NType "2")*) CicNotationPt.Implicit
+ `JustOne)) ,
List.map
(fun i ->
let nargs_kty = nargs it nleft i in
List.combine ts nones),
inner i ts)
(HExtlib.list_seq 0 (List.length cl))) in
- let principle = CicNotationPt.Binder (`Lambda, (mk_id "x", Some xyty),
- CicNotationPt.Binder (`Lambda, (mk_id "y", Some xyty), outer))
+ let principle = CicNotationPt.Binder (`Lambda, (mk_id "x", Some (mk_id indname)),
+ CicNotationPt.Binder (`Lambda, (mk_id "y", Some (mk_id indname)), outer))
in
pp (lazy ("discriminator = " ^ (CicNotationPp.pp_term principle)));
let discriminate_tac ~context cur_eq status =
pp (lazy (Printf.sprintf "discriminate: equation %s" (name_of_rel ~context cur_eq)));
- let dbranch it ~use_jmeq leftno consno =
- let refl_id = mk_id (if use_jmeq then "refl_jmeq" else "refl") in
- pp (lazy (Printf.sprintf "dbranch %d %d" leftno consno));
+ let dbranch it leftno consno =
+ prerr_endline (Printf.sprintf "dbranch %d %d" leftno consno);
let nlist = HExtlib.list_seq 0 (nargs it leftno consno) in
(* (\forall ...\forall P.\forall DH : ( ... = ... -> P). P) *)
- let params = List.map (fun x -> NTactics.intro_tac ("a" ^ string_of_int x)) nlist in
+ let params = List.map (fun x -> prerr_endline (Printf.sprintf "dbranch param a%d" x); NTactics.intro_tac ("a" ^ string_of_int x)) nlist in
NTactics.reduce_tac ~reduction:(`Normalize true) ~where:default_pattern::
params @ [
NTactics.intro_tac "P";
NTactics.intro_tac "DH";
NTactics.apply_tac ("",0,mk_id "DH");
- NTactics.apply_tac ("",0,refl_id); (* well, it works even if no goal is selected after applying DH... *)
+ NTactics.apply_tac ("",0,mk_id "refl");
] in
- let dbranches it ~use_jmeq leftno =
- pp (lazy (Printf.sprintf "dbranches %d" leftno));
+ let dbranches it leftno =
+ prerr_endline (Printf.sprintf "dbranches %d" leftno);
let _,_,_,cl = it in
let nbranches = List.length cl in
let branches = iter (fun n acc ->
let m = nbranches - n - 1 in
- if m = 0 then acc @ (dbranch it ~use_jmeq leftno m)
- else acc @ NTactics.shift_tac :: (dbranch it ~use_jmeq
- leftno m))
+ if m = 0 then (prerr_endline "no shift"; acc @ (dbranch it leftno m))
+ else (prerr_endline "sì shift"; acc @ NTactics.shift_tac :: (dbranch it
+ leftno m)))
(nbranches-1) [] in
if nbranches > 1 then
- NTactics.branch_tac ~force:false:: branches @ [NTactics.merge_tac]
- else branches
+ (prerr_endline "sì branch";
+ NTactics.branch_tac:: branches @ [NTactics.merge_tac])
+ else
+ (prerr_endline "no branch";
+ branches)
in
let eq_name,(NCic.Decl s | NCic.Def (s,_)) = List.nth context (cur_eq-1) in
let _,ctx' = HExtlib.split_nth cur_eq context in
let status, s = NTacStatus.whd status ctx' (mk_cic_term ctx' s) in
let status, s = term_of_cic_term status s ctx' in
- let status, leftno, it, use_jmeq =
- let it, t1, t2, use_jmeq = match s with
- | NCic.Appl [_;it;t1;t2] -> it,t1,t2,false
- | NCic.Appl [_;it;t1;_;t2] -> it,t1,t2,true
+ let status, leftno, it =
+ let it, t1, t2 = match s with
+ | NCic.Appl [_;it;t1;t2] -> it,t1,t2
| _ -> assert false in
(* XXX: serve? ho già fatto whd *)
let status, it = whd status ctx' (mk_cic_term ctx' it) in
let status, it = term_of_cic_term status it ctx' in
let _uri,indtyno,its = match it with
- | NCic.Const (NReference.Ref (uri, NReference.Ind (_,indtyno,_)) as r)
- | NCic.Appl (NCic.Const
- (NReference.Ref (uri, NReference.Ind (_,indtyno,_)) as r)::_) ->
+ NCic.Const (NReference.Ref (uri, NReference.Ind (_,indtyno,_)) as r) ->
uri, indtyno, NCicEnvironment.get_checked_indtys r
- | _ -> pp (lazy ("discriminate: indty =" ^ NCicPp.ppterm
- ~metasenv:[] ~subst:[] ~context:[] it)) ; assert false in
+ | _ -> prerr_endline ("discriminate: indty =" ^ NCicPp.ppterm
+ ~metasenv:[] ~subst:[] ~context:[] it) ; assert false in
let _,leftno,its,_,_ = its in
- status, leftno, List.nth its indtyno, use_jmeq
+ status, leftno, List.nth its indtyno
in
-
- let itnargs =
- let _,_,arity,_ = it in
- List.length (arg_list 0 arity) in
- let _,itname,_,_ = it in
- let params = List.map (fun x -> "a" ^ string_of_int x) (HExtlib.list_seq 1 (itnargs+1)) in
- let xyty = mk_appl (List.map mk_id (itname::params)) in
- let print_tac s status = pp s ; status in
+
NTactics.block_tac (
[(fun status ->
- let status, discr = mk_discriminator it ~use_jmeq leftno xyty status in
- let cut_term = mk_prods params (CicNotationPt.Binder (`Forall, (mk_id "x",
- Some xyty),
- CicNotationPt.Binder (`Forall, (mk_id "y", Some xyty),
- CicNotationPt.Binder (`Forall, (mk_id "e",
+ let status, discr = mk_discriminator it status in
+ NTactics.cut_tac ("",0, CicNotationPt.Binder (`Forall, (mk_id "x", None),
+ CicNotationPt.Binder (`Forall, (mk_id "y", None),
+ CicNotationPt.Binder (`Forall, (mk_id "e",
Some (mk_appl [mk_id "eq";CicNotationPt.Implicit `JustOne; mk_id "x"; mk_id "y"])),
- mk_appl [discr; mk_id "x"; mk_id "y"(*;mk_id "e"*)])))) in
- let status = print_tac (lazy ("cut_term = "^ CicNotationPp.pp_term cut_term)) status in
- NTactics.cut_tac ("",0, cut_term)
+ mk_appl [discr; mk_id "x"; mk_id "y";
+ mk_id "e"]))))
status);
NTactics.branch_tac;
- print_tac (lazy "ci sono");
- NTactics.reduce_tac ~reduction:(`Normalize true) ~where:default_pattern]
- @ List.map (fun x -> NTactics.intro_tac x) params @
- [NTactics.intro_tac "x";
+ NTactics.reduce_tac ~reduction:(`Normalize true) ~where:default_pattern;
+ NTactics.intro_tac "x";
NTactics.intro_tac "y";
NTactics.intro_tac "Deq";
- print_tac (lazy "ci sono 2");
NTactics.rewrite_tac ~dir:`RightToLeft ~what:("",0,mk_id "Deq") ~where:default_pattern;
NTactics.cases_tac ~what:("",0,mk_id "x") ~where:default_pattern]
- @ dbranches it ~use_jmeq leftno @
+ @ dbranches it leftno @
[NTactics.shift_tac;
- print_tac (lazy "ci sono 3");
NTactics.intro_tac "#discriminate";
- NTactics.apply_tac ("",0,mk_appl ([mk_id "#discriminate"]@
- HExtlib.mk_list (CicNotationPt.Implicit `JustOne) (List.length params + 2) @
- [mk_id eq_name ]));
+ NTactics.apply_tac ("",0,mk_appl [mk_id "#discriminate";
+ CicNotationPt.Implicit `JustOne;
+ CicNotationPt.Implicit `JustOne; mk_id eq_name ]);
NTactics.reduce_tac ~reduction:(`Normalize true) ~where:default_pattern;
NTactics.clear_tac ["#discriminate"];
- NTactics.merge_tac; print_tac (lazy "the end of discriminate")]
+ NTactics.merge_tac]
) status
;;
-
-let saturate_skip status context skip =
- HExtlib.list_uniq
- (List.fold_left
- (fun acc x ->
- let ix = HExtlib.list_index ((=) x) (List.map fst context)
- in match ix with
- | None -> acc
- | Some (i,_) ->
- fst (cascade_select_in_ctx ~subst:(get_subst status) context [] (i+1)) @ acc) skip skip)
-;;
-let subst_tac ~context ~dir skip cur_eq =
- fun status as oldstatus ->
+let subst_tac ~context ~dir cur_eq =
+ fun status ->
let eq_name,(NCic.Decl s | NCic.Def (s,_)) = List.nth context (cur_eq-1) in
let _,ctx' = HExtlib.split_nth cur_eq context in
let status, s = NTacStatus.whd status ctx' (mk_cic_term ctx' s) in
let status, s = term_of_cic_term status s ctx' in
- let skip = saturate_skip status context skip in
pp (lazy (Printf.sprintf "subst: equation %s" eq_name));
let l, r = match s with
- | NCic.Appl [_;_;t1;t2] | NCic.Appl [_;_;t1;_;t2] -> t1,t2
+ | NCic.Appl [_;_;t1;t2] -> t1,t2
| _ -> assert false in
let var = match dir with
| `LeftToRight -> l
| `RightToLeft -> r in
- (* let var = match var with
+ let var = match var with
| NCic.Rel i -> i
- | _ -> assert false in *)
+ | _ -> assert false in
let names_to_gen, _ =
- match var with
- | NCic.Rel var ->
- cascade_select_in_ctx ~subst:(get_subst status) context skip (var+cur_eq)
- | _ -> cascade_select_in_ctx ~subst:(get_subst status) context skip cur_eq in
- let names_to_gen = List.filter (fun n -> n <> eq_name) names_to_gen in
- if (List.exists (fun x -> List.mem x skip) names_to_gen)
- then oldstatus
- else
+ cascade_select_in_ctx ~subst:(get_subst status) context (var+cur_eq) in
let gen_tac x =
NTactics.generalize_tac
~where:("",0,(Some (mk_id x),[], Some CicNotationPt.UserInput)) in
~what:("",0,mk_id eq_name) ~where:default_pattern;
NTactics.reduce_tac ~reduction:(`Normalize true)
~where:default_pattern;
- NTactics.try_tac (NTactics.clear_tac [eq_name])]@
+ NTactics.clear_tac [eq_name]]@
(List.map NTactics.intro_tac (List.rev names_to_gen))) status
;;
-let clearid_tac ~context skip cur_eq =
- fun status ->
- let eq_name,(NCic.Decl s | NCic.Def (s,_)) = List.nth context (cur_eq-1) in
- let _,ctx' = HExtlib.split_nth cur_eq context in
- let status, s = NTacStatus.whd status ctx' (mk_cic_term ctx' s) in
- let status, s = term_of_cic_term status s ctx' in
- let skip = saturate_skip status context skip in
- (*
- let streicher_id =
- match s with
- | NCic.Appl [_;_;_;_] -> mk_id "streicherK"
- | NCic.Appl [_;_;_;_;_] -> mk_id "streicherKjmeq"
- | _ -> assert false
- in
- pp (lazy (Printf.sprintf "clearid: equation %s" eq_name));
- let names_to_gen, _ =
- cascade_select_in_ctx ~subst:(get_subst status) context cur_eq in
- let names_to_gen = names_to_gen @ [eq_name] in
- let gen_tac x =
- NTactics.generalize_tac
- ~where:("",0,(Some (mk_id x),[], Some CicNotationPt.UserInput)) in
- NTactics.block_tac ((List.map gen_tac names_to_gen)@
- [NTactics.clear_tac names_to_gen;
- NTactics.apply_tac ("",0, mk_appl [streicher_id;
- CicNotationPt.Implicit `JustOne;
- CicNotationPt.Implicit `JustOne;
- CicNotationPt.Implicit `JustOne;
- CicNotationPt.Implicit `JustOne]);
- NTactics.reduce_tac ~reduction:(`Normalize true)
- ~where:default_pattern] @
- (let names_to_intro =
- match List.rev names_to_gen with
- | [] -> []
- | _::tl -> tl in
- List.map NTactics.intro_tac names_to_intro)) status
-*)
-
- pp (lazy (Printf.sprintf "clearid: equation %s" eq_name));
- match s with
- | NCic.Appl [_;_;_;_] ->
- (* leibniz *)
- let streicher_id = mk_id "streicherK"
- in
- let names_to_gen, _ =
- cascade_select_in_ctx ~subst:(get_subst status) context skip cur_eq in
- let names_to_gen = names_to_gen @ [eq_name] in
- let gen_tac x =
- NTactics.generalize_tac
- ~where:("",0,(Some (mk_id x),[], Some CicNotationPt.UserInput)) in
- NTactics.block_tac ((List.map gen_tac names_to_gen)@
- [NTactics.clear_tac names_to_gen;
- NTactics.apply_tac ("",0, mk_appl [streicher_id;
- CicNotationPt.Implicit `JustOne;
- CicNotationPt.Implicit `JustOne;
- CicNotationPt.Implicit `JustOne;
- CicNotationPt.Implicit `JustOne]);
- NTactics.reduce_tac ~reduction:(`Normalize true)
- ~where:default_pattern] @
- (let names_to_intro =
- match List.rev names_to_gen with
- | [] -> []
- | _::tl -> tl in
- List.map NTactics.intro_tac names_to_intro)) status
- | NCic.Appl [_;_;_;_;_] ->
- (* JMeq *)
- let streicher_id = mk_id "streicherK"
- in
- let names_to_gen, _ =
- cascade_select_in_ctx ~subst:(get_subst status) context skip cur_eq in
- let names_to_gen = names_to_gen (* @ [eq_name]*) in
- let gen_tac x =
- NTactics.generalize_tac
- ~where:("",0,(Some (mk_id x),[], Some CicNotationPt.UserInput)) in
- let gen_eq = NTactics.generalize_tac
- ~where:("",0,(Some (mk_appl [mk_id "jmeq_to_eq";
- CicNotationPt.Implicit `JustOne;
- CicNotationPt.Implicit `JustOne;
- CicNotationPt.Implicit `JustOne;
- mk_id eq_name]),[], Some CicNotationPt.UserInput)) in
- NTactics.block_tac ((List.map gen_tac names_to_gen)@gen_eq::
- [NTactics.clear_tac names_to_gen;
- NTactics.try_tac (NTactics.clear_tac [eq_name]);
- NTactics.apply_tac ("",0, mk_appl [streicher_id;
- CicNotationPt.Implicit `JustOne;
- CicNotationPt.Implicit `JustOne;
- CicNotationPt.Implicit `JustOne;
- CicNotationPt.Implicit `JustOne]);
- NTactics.reduce_tac ~reduction:(`Normalize true)
- ~where:default_pattern] @
- (let names_to_intro = List.rev names_to_gen in
- List.map NTactics.intro_tac names_to_intro)) status
- | _ -> assert false
-;;
-
let get_ctx st goal =
ctx_of (get_goalty st goal)
;;
(* = select + classify *)
-let select_eq ctx acc domain status goal =
+let select_eq ctx acc status goal =
let classify ~subst ctx' l r =
(* FIXME: metasenv *)
if NCicReduction.are_convertible ~metasenv:[] ~subst ctx' l r
let rit = NReference.mk_indty true kref in
let _,_,its,_,itno = NCicEnvironment.get_checked_indtys rit in
let it = List.nth its itno in
- let newprods = nargs it nleft (ki-1) in
+ let newprods = (nargs it nleft (ki-1)) + 1 in
`Discriminate (newprods, false)
| NCic.Rel j, _
- when NCicTypeChecker.does_not_occur ~subst ctx' (j-1) j r
- && l = NCic.Rel j -> `Subst `LeftToRight
+ when NCicTypeChecker.does_not_occur ~subst ctx' (j-1) j r ->
+ `Subst `LeftToRight
| _, NCic.Rel j
- when NCicTypeChecker.does_not_occur ~subst ctx' (j-1) j l
- && r = NCic.Rel j -> `Subst `RightToLeft
- | (NCic.Rel _, _ | _, NCic.Rel _ ) -> `Cycle (* could be a blob too... *)
+ when NCicTypeChecker.does_not_occur ~subst ctx' (j-1) j l ->
+ `Subst `RightToLeft
+ | (NCic.Rel _, _ | _, NCic.Rel _ ) -> `Cycle
| _ -> `Blob) in
let rec aux i =
try
let index = List.length ctx - i in
- pp (lazy ("provo classify di index = " ^string_of_int index));
match (List.nth ctx (index - 1)) with
| n, (NCic.Decl ty | NCic.Def (ty,_)) ->
(let _,ctx_ty = HExtlib.split_nth index ctx in
let status, ty = NTacStatus.whd status ctx_ty (mk_cic_term ctx_ty ty) in
let status, ty = term_of_cic_term status ty ctx_ty in
pp (lazy (Printf.sprintf "select_eq tries %s" (NCicPp.ppterm ~context:ctx_ty ~subst:[] ~metasenv:[] ty)));
- let status, kind = match ty with
- | NCic.Appl [NCic.Const (NReference.Ref (u,_)) ;_;l;r]
- when NUri.name_of_uri u = "eq" ->
- classify ~subst:(get_subst status) ctx_ty l r
- | NCic.Appl [NCic.Const (NReference.Ref (u,_)) ;lty;l;rty;r]
- when NUri.name_of_uri u = "jmeq" &&
- NCicReduction.are_convertible ~metasenv:[]
- ~subst:(get_subst status) ctx_ty lty rty
- -> classify ~subst:(get_subst status) ctx_ty l r
- | _ -> status, `NonEq
- in match kind with
- | `Identity ->
- let status, goalty = term_of_cic_term status (get_goalty status goal) ctx in
- status, Some (List.length ctx - i), kind
- | `Cycle | `Blob | `NonEq -> aux (i+1) (* XXX: skip cyclic/blob equations for now *)
- | _ ->
- if (List.for_all (fun x -> x <> n) acc) &&
- (List.exists (fun x -> x = n) domain)
- then status, Some (List.length ctx - i), kind
- else aux (i+1))
+ match ty with
+ | NCic.Appl [NCic.Const (NReference.Ref (u,_)) ;_;l;r] when NUri.name_of_uri u = "eq" ->
+ (let status, kind = classify ~subst:(get_subst status) ctx_ty l r in
+ match kind with
+ | `Identity ->
+ let status, goalty = term_of_cic_term status (get_goalty status goal) ctx in
+ if NCicTypeChecker.does_not_occur ~subst:(get_subst status) ctx (index - 1) index goalty
+ then status, Some (List.length ctx - i), kind
+ else aux (i+1)
+ | `Cycle | `Blob -> aux (i+1) (* XXX: skip cyclic/blob equations for now *)
+ | _ ->
+ if (List.for_all (fun x -> x <> n) acc) then
+ status, Some (List.length ctx - i), kind
+ else aux (i+1))
+ | _ -> aux (i+1))
with Failure _ | Invalid_argument _ -> status, None, `Blob
in aux 0
;;
-let rec destruct_tac0 nprods acc domain skip status goal =
+let rec destruct_tac0 nprods acc status goal =
let ctx = get_ctx status goal in
let subst = get_subst status in
let get_newgoal os ns ogoal =
let go' = ([ogoal] @- gc) @+ go in
match go' with [] -> assert false | g::_ -> g
in
- let status, selection, kind = select_eq ctx acc domain status goal in
+ let status, selection, kind = select_eq ctx acc status goal in
pp (lazy ("destruct: acc is " ^ String.concat "," acc ));
match selection, kind with
| None, _ ->
pp (lazy (Printf.sprintf "destruct: nprods is %d, no selection, context is %s" nprods (NCicPp.ppcontext ~metasenv:[] ~subst ctx)));
- if nprods > 0 then
- let fresh = mk_fresh_name ctx 'e' 0 in
- let status' = NTactics.exec (NTactics.intro_tac fresh) status goal in
- destruct_tac0 (nprods-1) acc (fresh::domain) skip status' (get_newgoal status status' goal)
+ if nprods > 0 then
+ let status' = NTactics.exec (NTactics.intro_tac (mk_fresh_name ctx 'e' 0)) status goal in
+ destruct_tac0 (nprods-1) acc status' (get_newgoal status status' goal)
else
status
| Some cur_eq, `Discriminate (newprods,conflict) ->
pp (lazy (Printf.sprintf "destruct: discriminate - nprods is %d, selection is %d, context is %s" nprods cur_eq (NCicPp.ppcontext ~metasenv:[] ~subst ctx)));
let status' = NTactics.exec (discriminate_tac ~context:ctx cur_eq) status goal in
if conflict then status'
- else
- destruct_tac0 (nprods+newprods)
- (name_of_rel ~context:ctx cur_eq::acc)
- (List.filter (fun x -> x <> name_of_rel ~context:ctx cur_eq) domain)
- skip
- status' (get_newgoal status status' goal)
+ else destruct_tac0 (nprods+newprods)
+ (name_of_rel ~context:ctx cur_eq::acc) status' (get_newgoal status status' goal)
| Some cur_eq, `Subst dir ->
pp (lazy (Printf.sprintf "destruct: subst - nprods is %d, selection is %d, context is %s" nprods cur_eq (NCicPp.ppcontext ~metasenv:[] ~subst ctx)));
- let status' = NTactics.exec (subst_tac ~context:ctx ~dir skip cur_eq) status goal in
+ let status' = NTactics.exec (subst_tac ~context:ctx ~dir cur_eq) status goal in
pp (lazy (Printf.sprintf " ctx after subst = %s" (NCicPp.ppcontext ~metasenv:[] ~subst (get_ctx status' (get_newgoal status status' goal)))));
let eq_name,_ = List.nth ctx (cur_eq-1) in
- let newgoal = get_newgoal status status' goal in
- let has_cleared =
- try
- let _ = NTactics.find_in_context eq_name (get_ctx status' newgoal) in false
- with _ -> true in
- let rm_eq b l = if b then List.filter (fun x -> x <> eq_name) l else l in
- let acc = rm_eq has_cleared acc in
- let skip = rm_eq has_cleared skip in
- let domain = rm_eq has_cleared domain in
- destruct_tac0 nprods acc domain skip status' newgoal
- | Some cur_eq, `Identity ->
+ destruct_tac0 nprods (List.filter (fun x -> x <> eq_name) acc) status' (get_newgoal status status' goal)
+ | Some cur_eq, `Identity ->
pp (lazy (Printf.sprintf "destruct: identity - nprods is %d, selection is %d, context is %s" nprods cur_eq (NCicPp.ppcontext ~metasenv:[] ~subst ctx)));
let eq_name,_ = List.nth ctx (cur_eq-1) in
- let status' = NTactics.exec (clearid_tac ~context:ctx skip cur_eq) status goal in
- let newgoal = get_newgoal status status' goal in
- let has_cleared =
- try
- let _ = NTactics.find_in_context eq_name (get_ctx status' newgoal) in false
- with _ -> true in
- let rm_eq b l = if b then List.filter (fun x -> x <> eq_name) l else l in
- let acc = rm_eq has_cleared acc in
- let skip = rm_eq has_cleared skip in
- let domain = rm_eq has_cleared domain in
- destruct_tac0 nprods acc domain skip status' newgoal
+ let status' = NTactics.exec (NTactics.clear_tac [eq_name]) status goal in
+ destruct_tac0 nprods (List.filter (fun x -> x <> eq_name) acc) status' (get_newgoal status status' goal)
| Some cur_eq, `Cycle -> (* TODO, should never happen *)
pp (lazy (Printf.sprintf "destruct: cycle - nprods is %d, selection is %d, context is %s" nprods cur_eq (NCicPp.ppcontext ~metasenv:[] ~subst ctx)));
assert false
| Some cur_eq, `Blob ->
pp (lazy (Printf.sprintf "destruct: blob - nprods is %d, selection is %d, context is %s" nprods cur_eq (NCicPp.ppcontext ~metasenv:[] ~subst ctx)));
assert false
- | _ -> assert false
;;
-let destruct_tac dom skip s =
- NTactics.distribute_tac
- (fun s' g ->
- let ctx = get_ctx s' g in
- let domain = match dom with
- | None -> List.map (fun (n,_) -> n) ctx
- | Some l -> l
- in
- destruct_tac0 0 [] domain skip s' g) s;;
+let destruct_tac s = NTactics.distribute_tac (destruct_tac0 0 []) s;;
(* $Id: nCic.ml 9058 2008-10-13 17:42:30Z tassi $ *)
-val destruct_tac : string list option -> string list -> 's NTacStatus.tactic
-
+val destruct_tac : 's NTacStatus.tactic
(* $Id: nCic.ml 9058 2008-10-13 17:42:30Z tassi $ *)
-(*let pp m = prerr_endline (Lazy.force m);;*)
-let pp _ = ();;
+let pp m = prerr_endline (Lazy.force m);;
+(* let pp _ = ();; *)
let fresh_name =
let i = ref 0 in
| hd::tl -> CicNotationPt.Binder (`Forall, (mk_id hd, None), mk_prods tl t)
;;
-let rec mk_arrows ?(pattern=false) xs ys selection target =
+let rec mk_lambdas l t =
+ match l with
+ [] -> t
+ | hd::tl -> CicNotationPt.Binder (`Lambda, (mk_id hd, None), mk_lambdas tl t)
+;;
+
+let rec mk_arrows xs ys selection target =
match selection,xs,ys with
[],[],[] -> target
- | false :: l,x::xs,y::ys -> mk_arrows ~pattern xs ys l target
+ | false :: l,x::xs,y::ys -> mk_arrows xs ys l target
| true :: l,x::xs,y::ys ->
- CicNotationPt.Binder (`Forall, (mk_id "_", Some (mk_appl [if pattern then CicNotationPt.Implicit `JustOne else mk_id "eq" ; CicNotationPt.Implicit `JustOne;x;y])),
- mk_arrows ~pattern xs ys l target)
+ CicNotationPt.Binder (`Forall, (mk_id "_", Some (mk_appl [mk_id "eq" ; CicNotationPt.Implicit `JustOne;x;y])),
+ mk_arrows xs ys l target)
| _ -> raise (Invalid_argument "ninverter: the selection doesn't match the arity of the specified inductive type")
;;
status#set_obj(u,h,NCicUntrusted.apply_subst_metasenv subst metasenv,subst,o)
;;
-let mk_inverter name is_ind it leftno ?selection outsort status baseuri =
+let mk_inverter name it leftno ?selection outsort status baseuri =
pp (lazy ("leftno = " ^ string_of_int leftno));
let _,ind_name,ty,cl = it in
pp (lazy ("arity: " ^ NCicPp.ppterm ~metasenv:[] ~subst:[] ~context:[] ty));
let ncons = List.length cl in
- (**)let params,ty = NCicReduction.split_prods ~subst:[] [] leftno ty in
+ (*let params,ty = NCicReduction.split_prods ~subst:[] [] leftno ty in
let params = List.rev_map (function name,_ -> mk_id name) params in
- pp (lazy ("lunghezza params = " ^ string_of_int (List.length params)));(**)
+ pp (lazy ("lunghezza params = " ^ string_of_int (List.length params)));*)
let args,sort= split_arity ~subst:[] [] ty in
pp (lazy ("arity sort: " ^ NCicPp.ppterm ~metasenv:[] ~subst:[] ~context:args sort));
- (**)let args = List.rev_map (function name,_ -> mk_id name) args in
- pp (lazy ("lunghezza args = " ^ string_of_int (List.length args)));(**)
+ (*let args = List.rev_map (function name,_ -> mk_id name) args in
+ pp (lazy ("lunghezza args = " ^ string_of_int (List.length args)));*)
let nparams = List.length args in
-
pp (lazy ("nparams = " ^ string_of_int nparams));
- if nparams = 0
+ if nparams <= leftno
then raise (Failure "inverter: the type must have at least one right parameter")
else
- let xs = List.map (fun n -> "x" ^ (string_of_int n)) (HExtlib.list_seq 1 (leftno+nparams+1)) in
+ let xs = List.map (fun n -> "x" ^ (string_of_int n)) (HExtlib.list_seq 1 (nparams+1)) in
pp (lazy ("lunghezza xs = " ^ string_of_int (List.length xs)));
let ls, rs = HExtlib.split_nth leftno xs in
pp (lazy ("lunghezza ls = " ^ string_of_int (List.length ls)));
pp (lazy ("lunghezza rs = " ^ string_of_int (List.length rs)));
- let ys = List.map (fun n -> "y" ^ (string_of_int n)) (HExtlib.list_seq (leftno+1) (leftno+nparams+1)) in
+ let ys = List.map (fun n -> "y" ^ (string_of_int n)) (HExtlib.list_seq (leftno+1) (nparams+1)) in
let _id_xs = List.map mk_id xs in
let id_ls = List.map mk_id ls in
in
let prods = mk_arrows id_rs id_ys selection pred in
+ let lambdas = mk_lambdas (ys@["p"]) prods in
+
let hyplist =
let rec hypaux k = function
0 -> []
pp (lazy ("lunghezza ys = " ^ string_of_int (List.length ys)));
let outsort, suffix = NCicElim.ast_of_sort outsort in
- let theorem =
- mk_prods xs
- (CicNotationPt.Binder (`Forall, (mk_id "P", Some (mk_prods (HExtlib.mk_list "_" (List.length ys)) (CicNotationPt.Sort outsort))),
- mk_prods hyplist (CicNotationPt.Binder (`Forall, (mk_id "Hterm", Some (mk_appl (List.map mk_id (ind_name::xs)))), mk_appl (mk_id "P"::id_rs)))))
- in
- let status, theorem =
- GrafiteDisambiguate.disambiguate_nobj status ~baseuri
- (baseuri ^ name ^ ".def",0,
- CicNotationPt.Theorem
- (`Theorem,name,theorem,
- Some (CicNotationPt.Implicit (`Tagged "inv")),`InversionPrinciple))
+ let theorem = mk_prods xs
+ (CicNotationPt.Binder (`Forall, (mk_id "P", Some (mk_prods (HExtlib.mk_list "_" (List.length ys)) (CicNotationPt.Sort outsort))),
+ mk_prods hyplist (CicNotationPt.Binder (`Forall, (mk_id "Hterm", (*Some (mk_appl (List.map mk_id (ind_name::xs)))) *)
+ Some (CicNotationPt.Implicit `JustOne)),
+ mk_appl (mk_id "P"::id_rs)))))
in
+ let t = mk_appl ( [mk_id (ind_name ^ "_" ^ suffix)]@ id_ls @ [lambdas] @
+ List.map mk_id hyplist @
+ CicNotationPt.Implicit `Vector::[mk_id "Hterm"] ) in
+ let status, theorem = GrafiteDisambiguate.disambiguate_nobj status ~baseuri
+ (baseuri ^ name ^ ".def",
+ 0,CicNotationPt.Theorem (`Theorem,name,theorem,Some
+ (CicNotationPt.Implicit (`Tagged "inv")),`InversionPrinciple)) in
let uri,height,nmenv,nsubst,nobj = theorem in
let ninitial_stack = Continuationals.Stack.of_nmetasenv nmenv in
let status = status#set_obj theorem in
mk_arrows rs rs selection (mk_appl (mk_id "P"::rs)) in
let cut = mk_appl [CicNotationPt.Binder (`Lambda, (mk_id "Hcut", Some cut_theorem),
-
-CicNotationPt.Implicit (`Tagged "end"));
+ CicNotationPt.Implicit (`Tagged "end"));
CicNotationPt.Implicit (`Tagged "cut")] in
let intros = List.map (fun x -> pp (lazy x); NTactics.intro_tac x) (xs@["P"]@hyplist@["Hterm"]) in
- let where =
- "",0,(None,[],
- Some (
- mk_arrows ~pattern:true
- (HExtlib.mk_list (CicNotationPt.Implicit `JustOne) (List.length ys))
- (HExtlib.mk_list CicNotationPt.UserInput (List.length ys))
- selection CicNotationPt.UserInput)) in
- let elim_tac = if is_ind then NTactics.elim_tac else NTactics.cases_tac in
- let status =
- NTactics.block_tac
- (NTactics.branch_tac ::
- NTactics.case_tac "inv" ::
- (intros @
- [NTactics.apply_tac ("",0,cut);
- NTactics.branch_tac;
- NTactics.case_tac "end";
- NTactics.apply_tac ("",0,mk_id "Hcut");
- NTactics.apply_tac ("",0,mk_id "refl");
- NTactics.shift_tac;
- elim_tac ~what:("",0,mk_id "Hterm") ~where;
- NTactics.branch_tac ~force:true] @
- HExtlib.list_concat ~sep:[NTactics.shift_tac]
- (List.map (fun id-> [NTactics.apply_tac ("",0,mk_id id)]) hyplist) @
- [NTactics.merge_tac;
- NTactics.merge_tac;
- NTactics.merge_tac;
- NTactics.skip_tac])) status in
+ let status = NTactics.block_tac
+ (NTactics.branch_tac ::
+ NTactics.case_tac "inv" ::
+ (intros @
+ [NTactics.apply_tac ("",0,cut);
+ NTactics.branch_tac;
+ NTactics.case_tac "end";
+ NTactics.apply_tac ("",0,mk_id "Hcut");
+ NTactics.apply_tac ("",0,mk_id "refl_eq");
+ NTactics.shift_tac;
+ (*NTactics.case_tac "cut";*)
+ NTactics.apply_tac ("",0,t);
+ NTactics.merge_tac;
+ NTactics.merge_tac;
+ NTactics.skip_tac])) status in
pp (lazy "inv 3");
status,status#obj
;;
(* $Id: nCic.ml 9058 2008-10-13 17:42:30Z tassi $ *)
-val mk_inverter:
- string -> bool -> NCic.inductiveType -> int -> ?selection:bool list ->
+val mk_inverter: string -> NCic.inductiveType -> int -> ?selection:bool list ->
NCic.sort -> (#NTacStatus.tac_status as 's) -> string ->
- 's * NCic.obj
+ 's * NCic.obj
| NCicMetaSubst.MetaSubstFailure _ as exn -> fail ~exn (lazy fname)
;;
-class type g_pstatus =
- object
- inherit NEstatus.g_status
- method obj: NCic.obj
- end
-
class pstatus =
fun (o: NCic.obj) ->
- object (self)
+ object
inherit NEstatus.status
val obj = o
method obj = obj
method set_obj o = {< obj = o >}
- method set_pstatus : 'status. #g_pstatus as 'status -> 'self
- = fun o -> (self#set_estatus o)#set_obj o#obj
end
type tactic_term = CicNotationPt.term Disambiguate.disambiguator_input
type tactic_pattern = GrafiteAst.npattern Disambiguate.disambiguator_input
-let pp_tac_status status =
- prerr_endline (NCicPp.ppobj status#obj);
- prerr_endline ("STACK:\n" ^ Continuationals.Stack.pp status#stack)
+let pp_status status =
+ pp (lazy (NCicPp.ppobj status#obj))
;;
type cic_term = NCic.context * NCic.term
status#set_obj (name,height,metasenv,subst,obj)
;;
-let instantiate status ?refine:(dorefine=true) i t =
+let instantiate status i t =
let _,_,metasenv,_,_ = status#obj in
let gname, context, gty = List.assoc i metasenv in
- if dorefine then
- let status, (_,t), (_,ty) = refine status context t (Some (context,gty)) in
- to_subst status i (gname,context,t,ty)
- else
- let status,(_,ty) = typeof status context t in
- to_subst status i (gname,context,snd t,ty)
+ let status, (_,t), (_,ty) = refine status context t (Some (context,gty)) in
+ to_subst status i (gname,context,t,ty)
;;
let instantiate_with_ast status i t =
| _,NCic.Const ref -> ref, []
| _,NCic.Appl (NCic.Const (NRef.Ref (_,(NRef.Ind _)) as ref) :: args) ->
ref, args
- | _,_ -> fail (lazy ("not an inductive type: " ^ ppterm status ty)) in
+ | _,_ -> fail (lazy ("not an inductive type")) in
let _,lno,tl,_,i = NCicEnvironment.get_checked_indtys ref in
let _,_,_,cl = List.nth tl i in
let consno = List.length cl in
status, (ctx, NCicUntrusted.apply_subst subst ctx t)
;;
-let apply_subst_context status ~fix_projections ctx =
- let _,_,_,subst,_ = status#obj in
- NCicUntrusted.apply_subst_context ~fix_projections subst ctx
-;;
-
let metas_of_term status (context,t) =
let _,_,_,subst,_ = status#obj in
NCicUntrusted.metas_of_term subst context t
(* ============= move this elsewhere ====================*)
-class type ['stack] g_status =
- object
- inherit g_pstatus
- method stack: 'stack
- end
-
class ['stack] status =
fun (o: NCic.obj) (s: 'stack) ->
- object (self)
+ object
inherit (pstatus o)
val stack = s
method stack = stack
method set_stack s = {< stack = s >}
- method set_status : 'status. 'stack #g_status as 'status -> 'self
- = fun o -> (self#set_pstatus o)#set_stack o#stack
end
class type lowtac_status = [unit] status
exception Error of string lazy_t * exn option
val fail: ?exn:exn -> string lazy_t -> 'a
-class type g_pstatus =
- object
- inherit NEstatus.g_status
- method obj: NCic.obj
- end
-
class pstatus :
NCic.obj ->
object ('self)
inherit NEstatus.status
method obj: NCic.obj
method set_obj: NCic.obj -> 'self
- method set_pstatus: #g_pstatus -> 'self
end
type tactic_term = CicNotationPt.term Disambiguate.disambiguator_input
'status * cic_term * cic_term (* status, term, type *)
val apply_subst:
#pstatus as 'status -> NCic.context -> cic_term -> 'status * cic_term
-val apply_subst_context :
- #pstatus -> fix_projections:bool -> NCic.context -> NCic.context
val fix_sorts: #pstatus as 'status -> cic_term -> 'status * cic_term
val saturate :
#pstatus as 'status -> ?delta:int -> cic_term -> 'status * cic_term * cic_term list
#pstatus as 'status -> ?attrs:NCic.meta_attrs -> NCic.context ->
[ `Decl of cic_term | `Def of cic_term ] -> NCicUntrusted.meta_kind ->
'status * cic_term
-
-(* default value for refine: true; you can use false if the term has already been refined with
- the expected type for the meta (e.g. after a reduction tactic) *)
-val instantiate: #pstatus as 'status -> ?refine:bool -> int -> cic_term -> 'status
+val instantiate: #pstatus as 'status -> int -> cic_term -> 'status
val instantiate_with_ast: #pstatus as 'status -> int -> tactic_term -> 'status
val select_term:
val mk_out_scope:
int -> (#pstatus as 'status) -> cic_term -> 'status * cic_term
-class type ['stack] g_status =
- object
- inherit g_pstatus
- method stack: 'stack
- end
+val pp_status: #pstatus -> unit
class ['stack] status :
NCic.obj -> 'stack ->
inherit pstatus
method stack: 'stack
method set_stack: 'stack -> 'self
- method set_status: 'stack #g_status -> 'self
end
class type lowtac_status = [unit] status
class type tac_status = [Continuationals.Stack.t] status
-val pp_tac_status: #tac_status -> unit
-
type 'status tactic = #tac_status as 'status -> 'status
(* indexing facilities over cic_term based on inverse De Bruijn indexes *)
let id_tac status = status ;;
let print_tac print_status message status =
- if print_status then pp_tac_status status;
+ if print_status then pp_status status;
prerr_endline message;
status
;;
status#set_stack gstatus
;;
-let branch_tac ?(force=false) status =
+let branch_tac status =
let gstatus =
match status#stack with
| [] -> assert false
| (g, t, k, tag) :: s ->
match init_pos g with (* TODO *)
- | [] -> fail (lazy "empty goals")
- | [_] when (not force) -> fail (lazy "too few goals to branch")
+ | [] | [ _ ] -> fail (lazy "too few goals to branch")
| loc :: loc_tl ->
([ loc ], [], [], `BranchTag) :: (loc_tl, t, k, tag) :: s
in
let try_tac tac status =
- let try_tac status =
try
tac status
with NTacStatus.Error _ ->
status
- in
- atomic_tac try_tac status
;;
let first_tac tacl status =
let status, instance =
mk_meta status newgoalctx (`Decl newgoalty) `IsTerm
in
- instantiate ~refine:false status goal instance)
+ instantiate status goal instance)
;;
let select_tac ~where ~job move_down_hyps =
;;
let cut_tac t =
- atomic_tac (block_tac [
+ block_tac [
exact_tac ("",0, Ast.Appl [Ast.Implicit `JustOne; Ast.Implicit `JustOne]);
branch_tac;
pos_tac [3]; exact_tac t;
shift_tac; pos_tac [2]; skip_tac;
- merge_tac ])
+ merge_tac ]
;;
let lapply_tac (s,n,t) =
rightno: int;
leftno: int;
consno: int;
+ lefts: NCic.term list;
+ rights: NCic.term list;
reference: NReference.reference;
}
;;
let ref_of_indtyinfo iti = iti.reference;;
let analyze_indty_tac ~what indtyref =
- distribute_tac (fun (status as orig_status) goal ->
+ distribute_tac (fun status goal ->
let goalty = get_goalty status goal in
let status, what = disambiguate status (ctx_of goalty) what None in
let status, ty_what = typeof status (ctx_of what) what in
let leftno = List.length lefts in
let rightno = List.length rights in
indtyref := Some {
- rightno = rightno; leftno = leftno; consno = consno; reference = r;
+ rightno = rightno; leftno = leftno; consno = consno;
+ lefts = lefts; rights = rights; reference = r;
};
- exec id_tac orig_status goal)
+ exec id_tac status goal)
;;
let sort_of_goal_tac sortref = distribute_tac (fun status goal ->
`LeftToRight -> "eq" ^ suffix ^ "_r"
| `RightToLeft -> "eq" ^ suffix
in
- let what = Ast.Appl [what; Ast.Implicit `Vector] in
block_tac
- [ select_tac ~where ~job:(`Substexpand 2) true;
+ [ select_tac ~where ~job:(`Substexpand 1) true;
exact_tac
("",0,
Ast.Appl(Ast.Ident(name,None)::HExtlib.mk_list (Ast.Implicit `JustOne) 5@
if name = "_" then clear_tac [name] else id_tac ]
;;
-let name_counter = ref 0;;
-let intros_tac ?names_ref names s =
- let names_ref, prefix =
- match names_ref with | None -> ref [], "__" | Some r -> r, "H"
- in
- if names = [] then
- repeat_tac
- (fun s ->
- incr name_counter;
- (* TODO: generate better names *)
- let name = prefix ^ string_of_int !name_counter in
- let s = intro_tac name s in
- names_ref := !names_ref @ [name];
- s)
- s
- else
- block_tac (List.map intro_tac names) s
-;;
-
let cases ~what status goal =
let gty = get_goalty status goal in
let status, what = disambiguate status (ctx_of gty) what None in
| [seq] -> assert0_tac seq
| _ ->
block_tac
- ((branch_tac ~force:false)::
+ (branch_tac::
HExtlib.list_concat ~sep:[shift_tac]
(List.map (fun seq -> [assert0_tac seq]) seqs)@
[merge_tac])
) status
;;
-let inversion_tac ~what:(txt,len,what) ~where =
- let what = txt, len, Ast.Appl [what; Ast.Implicit `Vector] in
- let indtyinfo = ref None in
- let sort = ref (NCic.Rel 1) in
- atomic_tac (block_tac [
- analyze_indty_tac ~what indtyinfo;
- (fun s -> select_tac
- ~where ~job:(`Substexpand ((HExtlib.unopt !indtyinfo).rightno+1)) true s);
- sort_of_goal_tac sort;
- (fun status ->
- let ity = HExtlib.unopt !indtyinfo in
- let NReference.Ref (uri, _) = ity.reference in
- let name =
- NUri.name_of_uri uri ^ "_inv_" ^
- snd (NCicElim.ast_of_sort
- (match !sort with NCic.Sort x -> x | _ -> assert false))
- in
- let eliminator =
- let _,_,w = what in
- Ast.Appl [ Ast.Ident (name,None) ; Ast.Implicit `Vector ; w ]
- in
- exact_tac ("",0,eliminator) status) ])
-;;
(* $Id: nCic.ml 9058 2008-10-13 17:42:30Z tassi $ *)
-val print_tac: bool -> string -> 's NTacStatus.tactic
-
val dot_tac: 's NTacStatus.tactic
-val branch_tac: ?force:bool -> 's NTacStatus.tactic
+val branch_tac: 's NTacStatus.tactic
val shift_tac: 's NTacStatus.tactic
val pos_tac: int list -> 's NTacStatus.tactic
val case_tac: string -> 's NTacStatus.tactic
val focus_tac: int list -> 's NTacStatus.tactic
val unfocus_tac: 's NTacStatus.tactic
val skip_tac: 's NTacStatus.tactic
-val try_tac: NTacStatus.tac_status NTacStatus.tactic -> 's NTacStatus.tactic
+val try_tac: 's NTacStatus.tactic -> 's NTacStatus.tactic
val repeat_tac: NTacStatus.tac_status NTacStatus.tactic -> 's NTacStatus.tactic
val compare_statuses : past:#NTacStatus.lowtac_status -> present:#NTacStatus.lowtac_status -> int list * int list
val distribute_tac:
NTacStatus.lowtac_status NTacStatus.lowtactic -> 's NTacStatus.tactic
-val exec : NTacStatus.tac_status NTacStatus.tactic -> 's NTacStatus.lowtactic
+val exec : ((int * Continuationals.Stack.switch) list * 'a list * 'b list *
+ [> `NoTag ])
+ list NTacStatus.status NTacStatus.tactic ->
+ (#NTacStatus.lowtac_status as 's) -> Continuationals.goal -> 's
val block_tac: 's NTacStatus.tactic list -> 's NTacStatus.tactic
val apply_tac: NTacStatus.tactic_term -> 's NTacStatus.tactic
what:NTacStatus.tactic_term -> where:NTacStatus.tactic_pattern ->
's NTacStatus.tactic
val intro_tac: string -> 's NTacStatus.tactic
-val intros_tac:
- ?names_ref:string list ref -> string list -> 's NTacStatus.tactic
val cases_tac:
what:NTacStatus.tactic_term -> where:NTacStatus.tactic_pattern ->
's NTacStatus.tactic
?num:int -> args:NTacStatus.tactic_term list -> 's NTacStatus.tactic
val atomic_tac :
- (NTacStatus.tac_status -> 'c #NTacStatus.status) ->
- (#NTacStatus.tac_status as 'f) -> 'f
+ (((int * Continuationals.Stack.switch) list * 'a list * 'b list *
+ [> `NoTag ])
+ list NTacStatus.status ->
+ (< auto_cache : NCicLibrary.automation_cache;
+ coerc_db : NCicCoercion.db; dump : NCicLibrary.obj list;
+ lstatus : LexiconEngine.lexicon_status; obj : NCic.obj;
+ set_coerc_db : NCicCoercion.db -> 'c;
+ set_coercion_status : 'd. (#NCicCoercion.g_status as 'd) -> 'c;
+ set_uhint_db : NCicUnifHint.db -> 'c;
+ set_unifhint_status : 'e. (#NCicUnifHint.g_status as 'e) -> 'c;
+ timestamp : NCicLibrary.timestamp; uhint_db : NCicUnifHint.db; .. >
+ as 'c)) ->
+ (#NTacStatus.tac_status as 'f) -> 'f
type indtyinfo
val find_in_context : 'a -> ('a * 'b) list -> int
-
-val inversion_tac:
- what:NTacStatus.tactic_term -> where:NTacStatus.tactic_pattern ->
- 's NTacStatus.tactic
open Printf
-let print ?(depth=0) s =
+let debug = ref false
+let debug_print ?(depth=0) s =
+ if !debug then prerr_endline (String.make depth '\t'^Lazy.force s) else ()
+(* let print= debug_print *)
+ let print ?(depth=0) s =
prerr_endline (String.make depth '\t'^Lazy.force s)
-let noprint ?(depth=0) _ = ()
-let debug_print = noprint
+
+let debug_do f = if !debug then f () else ()
open Continuationals.Stack
open NTacStatus
module Ast = CicNotationPt
-
-(* ======================= statistics ========================= *)
-
let app_counter = ref 0
-module RHT = struct
- type t = NReference.reference
- let equal = (==)
- let compare = Pervasives.compare
- let hash = Hashtbl.hash
-end;;
-
-module RefHash = Hashtbl.Make(RHT);;
-
-type info = {
- nominations : int ref;
- uses: int ref;
-}
-
-let statistics: info RefHash.t = RefHash.create 503
-
-let incr_nominations tbl item =
- try
- let v = RefHash.find tbl item in incr v.nominations
- with Not_found ->
- RefHash.add tbl item {nominations = ref 1; uses = ref 0}
-
-let incr_uses tbl item =
- try
- let v = RefHash.find tbl item in incr v.uses
- with Not_found -> assert false
+(* =================================== paramod =========================== *)
+let auto_paramod ~params:(l,_) status goal =
+ let gty = get_goalty status goal in
+ let n,h,metasenv,subst,o = status#obj in
+ let status,t = term_of_cic_term status gty (ctx_of gty) in
+ let status, l =
+ List.fold_left
+ (fun (status, l) t ->
+ let status, t = disambiguate status (ctx_of gty) t None in
+ let status, ty = typeof status (ctx_of t) t in
+ let status, t = term_of_cic_term status t (ctx_of gty) in
+ let status, ty = term_of_cic_term status ty (ctx_of ty) in
+ (status, (t,ty) :: l))
+ (status,[]) l
+ in
+ match
+ NCicParamod.nparamod status metasenv subst (ctx_of gty) (NCic.Rel ~-1,t) l
+ with
+ | [] -> raise (Error (lazy "no proof found",None))
+ | (pt, metasenv, subst)::_ ->
+ let status = status#set_obj (n,h,metasenv,subst,o) in
+ instantiate status goal (mk_cic_term (ctx_of gty) pt)
+;;
-let toref f tbl t =
- match t with
- | Ast.NRef n ->
- f tbl n
- | Ast.NCic _ (* local candidate *)
- | _ -> ()
+let auto_paramod_tac ~params status =
+ NTactics.distribute_tac (auto_paramod ~params) status
+;;
-let is_relevant tbl item =
- try
- let v = RefHash.find tbl item in
- if !(v.nominations) < 60 then true (* not enough info *)
- else if !(v.uses) = 0 then false
- else true
- with Not_found -> true
-
-let print_stat tbl =
- let l = RefHash.fold (fun a v l -> (a,v)::l) tbl [] in
- let relevance v = float !(v.uses) /. float !(v.nominations) in
- let vcompare (_,v1) (_,v2) =
- Pervasives.compare (relevance v1) (relevance v2) in
- let l = List.sort vcompare l in
- let vstring (a,v)=
- CicNotationPp.pp_term (Ast.NCic (NCic.Const a)) ^ ": rel = " ^
- (string_of_float (relevance v)) ^
- "; uses = " ^ (string_of_int !(v.uses)) ^
- "; nom = " ^ (string_of_int !(v.nominations)) in
- lazy ("\n\nSTATISTICS:\n" ^
- String.concat "\n" (List.map vstring l))
-
-(* ======================= utility functions ========================= *)
+(*************** subsumption ****************)
module IntSet = Set.Make(struct type t = int let compare = compare end)
+(* exceptions *)
let get_sgoalty status g =
let _,_,metasenv,subst,_ = status#obj in
in closure IntSet.empty gl
;;
-(* we call a "fact" an object whose hypothesis occur in the goal
- or in types of goal-variables *)
-let branch status ty =
- let status, ty, metas = saturate ~delta:0 status ty in
- noprint (lazy ("saturated ty :" ^ (ppterm status ty)));
- let g_metas = metas_of_term status ty in
- let clos = menv_closure status g_metas in
- (* let _,_,metasenv,_,_ = status#obj in *)
- let menv =
- List.fold_left
- (fun acc m ->
- let _, m = term_of_cic_term status m (ctx_of m) in
- match m with
- | NCic.Meta(i,_) -> IntSet.add i acc
- | _ -> assert false)
- IntSet.empty metas
- in
- (* IntSet.subset menv clos *)
- IntSet.cardinal(IntSet.diff menv clos)
-
-let is_a_fact status ty = branch status ty = 0
-
-let is_a_fact_obj s uri =
- let obj = NCicEnvironment.get_checked_obj uri in
- match obj with
- | (_,_,[],[],NCic.Constant(_,_,_,ty,_)) ->
- is_a_fact s (mk_cic_term [] ty)
-(* aggiungere i costruttori *)
- | _ -> false
-
-let is_a_fact_ast status subst metasenv ctx cand =
- debug_print ~depth:0
- (lazy ("------- checking " ^ CicNotationPp.pp_term cand));
- let status, t = disambiguate status ctx ("",0,cand) None in
- let status,t = term_of_cic_term status t ctx in
- let ty = NCicTypeChecker.typeof subst metasenv ctx t in
- is_a_fact status (mk_cic_term ctx ty)
-
-let current_goal status =
- let open_goals = head_goals status#stack in
- assert (List.length open_goals = 1);
- let open_goal = List.hd open_goals in
- let gty = get_goalty status open_goal in
- let ctx = ctx_of gty in
- open_goal, ctx, gty
-
-let height_of_ref (NReference.Ref (uri, x)) =
- match x with
- | NReference.Decl
- | NReference.Ind _
- | NReference.Con _
- | NReference.CoFix _ ->
- let _,height,_,_,_ = NCicEnvironment.get_checked_obj uri in
- height
- | NReference.Def h -> h
- | NReference.Fix (_,_,h) -> h
-;;
-
-(*************************** height functions ********************************)
-let fast_height_of_term t =
- let h = ref 0 in
- let rec aux =
- function
- NCic.Meta (_,(_,NCic.Ctx l)) -> List.iter aux l
- | NCic.Meta _ -> ()
- | NCic.Rel _
- | NCic.Sort _ -> ()
- | NCic.Implicit _ -> assert false
- | NCic.Const nref ->
-(*
- prerr_endline (NCicPp.ppterm ~metasenv:[] ~subst:[]
- ~context:[] t ^ ":" ^ string_of_int (height_of_ref nref));
-*)
- h := max !h (height_of_ref nref)
- | NCic.Prod (_,t1,t2)
- | NCic.Lambda (_,t1,t2) -> aux t1; aux t2
- | NCic.LetIn (_,s,ty,t) -> aux s; aux ty; aux t
- | NCic.Appl l -> List.iter aux l
- | NCic.Match (_,outty,t,pl) -> aux outty; aux t; List.iter aux pl
- in
- aux t; !h
-;;
-
-let height_of_goal g status =
- let ty = get_goalty status g in
- let context = ctx_of ty in
- let _, ty = term_of_cic_term status ty (ctx_of ty) in
- let h = ref (fast_height_of_term ty) in
- List.iter
- (function
- | _, NCic.Decl ty -> h := max !h (fast_height_of_term ty)
- | _, NCic.Def (bo,ty) ->
- h := max !h (fast_height_of_term ty);
- h := max !h (fast_height_of_term bo);
- )
- context;
- !h
-;;
-
-let height_of_goals status =
- let open_goals = head_goals status#stack in
- assert (List.length open_goals > 0);
- let h = ref 1 in
- List.iter
- (fun open_goal ->
- h := max !h (height_of_goal open_goal status))
- open_goals;
- debug_print (lazy ("altezza sequente: " ^ string_of_int !h));
- !h
-;;
-
-(* =============================== paramod =========================== *)
-let solve f status eq_cache goal =
-(*
- let f =
- if fast then NCicParamod.fast_eq_check
- else NCicParamod.paramod in
-*)
- let n,h,metasenv,subst,o = status#obj in
- let gname, ctx, gty = List.assoc goal metasenv in
- let gty = NCicUntrusted.apply_subst subst ctx gty in
- let build_status (pt, _, metasenv, subst) =
- try
- debug_print (lazy ("refining: "^(NCicPp.ppterm ctx subst metasenv pt)));
- let stamp = Unix.gettimeofday () in
- let metasenv, subst, pt, pty =
- (* NCicRefiner.typeof status
- (* (status#set_coerc_db NCicCoercion.empty_db) *)
- metasenv subst ctx pt None in
- print (lazy ("refined: "^(NCicPp.ppterm ctx subst metasenv pt)));
- debug_print (lazy ("synt: "^(NCicPp.ppterm ctx subst metasenv pty)));
- let metasenv, subst =
- NCicUnification.unify status metasenv subst ctx gty pty *)
- NCicRefiner.typeof
- (status#set_coerc_db NCicCoercion.empty_db)
- metasenv subst ctx pt (Some gty)
- in
- debug_print (lazy (Printf.sprintf "Refined in %fs"
- (Unix.gettimeofday() -. stamp)));
- let status = status#set_obj (n,h,metasenv,subst,o) in
- let metasenv = List.filter (fun j,_ -> j <> goal) metasenv in
- let subst = (goal,(gname,ctx,pt,pty)) :: subst in
- Some (status#set_obj (n,h,metasenv,subst,o))
- with
- NCicRefiner.RefineFailure msg
- | NCicRefiner.Uncertain msg ->
- debug_print (lazy ("WARNING: refining in fast_eq_check failed\n" ^
- snd (Lazy.force msg) ^
- "\n in the environment\n" ^
- NCicPp.ppmetasenv subst metasenv)); None
- | NCicRefiner.AssertFailure msg ->
- debug_print (lazy ("WARNING: refining in fast_eq_check failed" ^
- Lazy.force msg ^
- "\n in the environment\n" ^
- NCicPp.ppmetasenv subst metasenv)); None
- | _ -> None
- in
- HExtlib.filter_map build_status
- (f status metasenv subst ctx eq_cache (NCic.Rel ~-1,gty))
-;;
-
-let fast_eq_check eq_cache status (goal:int) =
- match solve NCicParamod.fast_eq_check status eq_cache goal with
- | [] -> raise (Error (lazy "no proof found",None))
- | s::_ -> s
-;;
-
-let dist_fast_eq_check eq_cache s =
- NTactics.distribute_tac (fast_eq_check eq_cache) s
-;;
-
-let auto_eq_check eq_cache status =
- try
- let s = dist_fast_eq_check eq_cache status in
- [s]
- with
- | Error _ -> debug_print (lazy ("no paramod proof found"));[]
-;;
-
-let index_local_equations eq_cache status =
- debug_print (lazy "indexing equations");
- let open_goals = head_goals status#stack in
- let open_goal = List.hd open_goals in
- let ngty = get_goalty status open_goal in
- let ctx = apply_subst_context ~fix_projections:true status (ctx_of ngty) in
- let c = ref 0 in
- List.fold_left
- (fun eq_cache _ ->
- c:= !c+1;
- let t = NCic.Rel !c in
- try
- let ty = NCicTypeChecker.typeof [] [] ctx t in
- if is_a_fact status (mk_cic_term ctx ty) then
- (debug_print(lazy("eq indexing " ^ (NCicPp.ppterm ctx [] [] ty)));
- NCicParamod.forward_infer_step eq_cache t ty)
- else
- (debug_print (lazy ("not a fact: " ^ (NCicPp.ppterm ctx [] [] ty)));
- eq_cache)
- with
- | NCicTypeChecker.TypeCheckerFailure _
- | NCicTypeChecker.AssertFailure _ -> eq_cache)
- eq_cache ctx
-;;
-
-let fast_eq_check_tac ~params s =
- let unit_eq = index_local_equations s#eq_cache s in
- dist_fast_eq_check unit_eq s
-;;
-
-let paramod eq_cache status goal =
- match solve NCicParamod.paramod status eq_cache goal with
- | [] -> raise (Error (lazy "no proof found",None))
- | s::_ -> s
-;;
-
-let paramod_tac ~params s =
- let unit_eq = index_local_equations s#eq_cache s in
- NTactics.distribute_tac (paramod unit_eq) s
-;;
-
-let demod eq_cache status goal =
- match solve NCicParamod.demod status eq_cache goal with
- | [] -> raise (Error (lazy "no progress",None))
- | s::_ -> s
-;;
-
-let demod_tac ~params s =
- let unit_eq = index_local_equations s#eq_cache s in
- NTactics.distribute_tac (demod unit_eq) s
-;;
-
-(*
-let fast_eq_check_tac_all ~params eq_cache status =
- let g,_,_ = current_goal status in
- let allstates = fast_eq_check_all status eq_cache g in
- let pseudo_low_tac s _ _ = s in
- let pseudo_low_tactics =
- List.map pseudo_low_tac allstates
- in
- List.map (fun f -> NTactics.distribute_tac f status) pseudo_low_tactics
-;;
-*)
-
-(*
-let demod status eq_cache goal =
- let n,h,metasenv,subst,o = status#obj in
- let gname, ctx, gty = List.assoc goal metasenv in
- let gty = NCicUntrusted.apply_subst subst ctx gty in
-
-let demod_tac ~params s =
- let unit_eq = index_local_equations s#eq_cache s in
- dist_fast_eq_check unit_eq s
-*)
-
-(*************** subsumption ****************)
-
let close_wrt_context =
List.fold_left
(fun ty ctx_entry ->
- match ctx_entry with
+ match ctx_entry with
| name, NCic.Decl t -> NCic.Prod(name,t,ty)
| name, NCic.Def(bo, _) -> NCicSubstitution.subst bo ty)
;;
let _,args =
List.fold_left
(fun (n,l) ctx_entry ->
- match ctx_entry with
- | name, NCic.Decl t -> n+1,NCic.Rel(n)::l
- | name, NCic.Def(bo, _) -> n+1,l)
+ match ctx_entry with
+ | name, NCic.Decl t -> n+1,NCic.Rel(n)::l
+ | name, NCic.Def(bo, _) -> n+1,l)
(k,[]) ctx in
args
(fun (metasenv,subst) (i,(iattr,ctx,ty)) ->
let ikind = NCicUntrusted.kind_of_meta iattr in
let metasenv,j,instance,ty =
- NCicMetaSubst.mk_meta ~attrs:iattr
- metasenv ctx ~with_type:ty ikind in
+ NCicMetaSubst.mk_meta ~attrs:iattr
+ metasenv ctx ~with_type:ty ikind in
let s_entry = i,(iattr, ctx, instance, ty) in
let metasenv = List.filter (fun x,_ -> i <> x) metasenv in
- metasenv,s_entry::subst)
+ metasenv,s_entry::subst)
(metasenv,[]) metasenv
(* close metasenv returns a ground instance of all the metas in the
let metasenv = NCicUntrusted.sort_metasenv subst metasenv in
List.fold_left
(fun (subst,objs) (i,(iattr,ctx,ty)) ->
- let ty = NCicUntrusted.apply_subst subst ctx ty in
+ let ty = NCicUntrusted.apply_subst subst ctx ty in
let ctx =
- NCicUntrusted.apply_subst_context ~fix_projections:true
- subst ctx in
- let (uri,_,_,_,obj) as okind =
- constant_for_meta ctx ty i in
- try
- NCicEnvironment.check_and_add_obj okind;
- let iref = NReference.reference_of_spec uri NReference.Decl in
- let iterm =
- let args = args_for_context ctx in
- if args = [] then NCic.Const iref
- else NCic.Appl(NCic.Const iref::args)
- in
+ NCicUntrusted.apply_subst_context ~fix_projections:true
+ subst ctx in
+ let (uri,_,_,_,obj) as okind =
+ constant_for_meta ctx ty i in
+ try
+ NCicEnvironment.check_and_add_obj okind;
+ let iref = NReference.reference_of_spec uri NReference.Decl in
+ let iterm =
+ let args = args_for_context ctx in
+ if args = [] then NCic.Const iref
+ else NCic.Appl(NCic.Const iref::args)
+ in
(* prerr_endline (NCicPp.ppterm ctx [] [] iterm); *)
- let s_entry = i, ([], ctx, iterm, ty)
- in s_entry::subst,okind::objs
- with _ -> assert false)
+ let s_entry = i, ([], ctx, iterm, ty)
+ in s_entry::subst,okind::objs
+ with _ -> assert false)
(subst,[]) metasenv
;;
try
List.iter
(fun i ->
- let (_, ctx, t, _) = List.assoc i subst in
- debug_print (lazy (NCicPp.ppterm ctx [] [] t));
- List.iter
- (fun (uri,_,_,_,_) as obj ->
- NCicEnvironment.invalidate_item (`Obj (uri, obj)))
- objs;
- ())
+ let (_, ctx, t, _) = List.assoc i subst in
+ debug_print (lazy (NCicPp.ppterm ctx [] [] t));
+ List.iter
+ (fun (uri,_,_,_,_) as obj ->
+ NCicEnvironment.invalidate_item (`Obj (uri, obj)))
+ objs;
+ ())
gl
with
Not_found -> assert false
let rec aux k = function
(* TODO: local context *)
| NCic.Meta (j,lc) when i = j ->
- (match args with
- | [] -> NCic.Rel 1
- | _ -> let args =
- List.map (NCicSubstitution.subst_meta lc) args in
- NCic.Appl(NCic.Rel k::args))
+ (match args with
+ | [] -> NCic.Rel 1
+ | _ -> let args =
+ List.map (NCicSubstitution.subst_meta lc) args in
+ NCic.Appl(NCic.Rel k::args))
| NCic.Meta (j,lc) as m ->
(match lc with
_,NCic.Irl _ -> m
(fun ty (i,(iattr,ctx,mty)) ->
let mty = NCicUntrusted.apply_subst subst ctx mty in
let ctx =
- NCicUntrusted.apply_subst_context ~fix_projections:true
- subst ctx in
+ NCicUntrusted.apply_subst_context ~fix_projections:true
+ subst ctx in
let cty = close_wrt_context mty ctx in
let name = "foo"^(string_of_int i) in
let ty = NCicSubstitution.lift 1 ty in
ctx,ty
;;
-(****************** smart application ********************)
-let saturate_to_ref metasenv subst ctx nref ty =
- let height = height_of_ref nref in
- let rec aux metasenv ty args =
- let ty,metasenv,moreargs =
- NCicMetaSubst.saturate ~delta:height metasenv subst ctx ty 0 in
- match ty with
- | NCic.Const(NReference.Ref (_,NReference.Def _) as nre)
- when nre<>nref ->
- let _, _, bo, _, _, _ = NCicEnvironment.get_checked_def nre in
- aux metasenv bo (args@moreargs)
- | NCic.Appl(NCic.Const(NReference.Ref (_,NReference.Def _) as nre)::tl)
- when nre<>nref ->
- let _, _, bo, _, _, _ = NCicEnvironment.get_checked_def nre in
- aux metasenv (NCic.Appl(bo::tl)) (args@moreargs)
- | _ -> ty,metasenv,(args@moreargs)
+
+(* =================================== auto =========================== *)
+(****************** AUTO ********************
+
+let calculate_timeout flags =
+ if flags.timeout = 0. then
+ (debug_print (lazy "AUTO WITH NO TIMEOUT");
+ {flags with timeout = infinity})
+ else
+ flags
+;;
+let is_equational_case goalty flags =
+ let ensure_equational t =
+ if is_an_equational_goal t then true
+ else false
in
- aux metasenv ty []
+ (flags.use_paramod && is_an_equational_goal goalty) ||
+ (flags.use_only_paramod && ensure_equational goalty)
+;;
-let smart_apply t unit_eq status g =
- let n,h,metasenv,subst,o = status#obj in
- let gname, ctx, gty = List.assoc g metasenv in
- (* let ggty = mk_cic_term context gty in *)
- let status, t = disambiguate status ctx t None in
- let status,t = term_of_cic_term status t ctx in
- let _,_,metasenv,subst,_ = status#obj in
- let ty = NCicTypeChecker.typeof subst metasenv ctx t in
- let ty,metasenv,args =
- match gty with
- | NCic.Const(nref)
- | NCic.Appl(NCic.Const(nref)::_) ->
- saturate_to_ref metasenv subst ctx nref ty
- | _ ->
- NCicMetaSubst.saturate metasenv subst ctx ty 0 in
- let metasenv,j,inst,_ = NCicMetaSubst.mk_meta metasenv ctx `IsTerm in
- let status = status#set_obj (n,h,metasenv,subst,o) in
- let pterm = if args=[] then t else
- match t with
- | NCic.Appl l -> NCic.Appl(l@args)
- | _ -> NCic.Appl(t::args)
+type menv = Cic.metasenv
+type subst = Cic.substitution
+type goal = ProofEngineTypes.goal * int * AutoTypes.sort
+let candidate_no = ref 0;;
+type candidate = int * Cic.term Lazy.t
+type cache = AutoCache.cache
+
+type fail =
+ (* the goal (mainly for depth) and key of the goal *)
+ goal * AutoCache.cache_key
+type op =
+ (* goal has to be proved *)
+ | D of goal
+ (* goal has to be cached as a success obtained using candidate as the first
+ * step *)
+ | S of goal * AutoCache.cache_key * candidate * int
+type elem =
+ (* menv, subst, size, operations done (only S), operations to do, failures to cache if any op fails *)
+ menv * subst * int * op list * op list * fail list
+type status =
+ (* list of computations that may lead to the solution: all op list will
+ * end with the same (S(g,_)) *)
+ elem list
+type auto_result =
+ (* menv, subst, alternatives, tables, cache *)
+ | Proved of menv * subst * elem list * AutomationCache.tables * cache
+ | Gaveup of AutomationCache.tables * cache
+
+
+(* the status exported to the external observer *)
+type auto_status =
+ (* context, (goal,candidate) list, and_list, history *)
+ Cic.context * (int * Cic.term * bool * int * (int * Cic.term Lazy.t) list) list *
+ (int * Cic.term * int) list * Cic.term Lazy.t list
+
+let d_prefix l =
+ let rec aux acc = function
+ | (D g)::tl -> aux (acc@[g]) tl
+ | _ -> acc
in
- noprint(lazy("pterm " ^ (NCicPp.ppterm ctx [] [] pterm)));
- noprint(lazy("pty " ^ (NCicPp.ppterm ctx [] [] ty)));
- let eq_coerc =
- let uri =
- NUri.uri_of_string "cic:/matita/ng/Plogic/equality/eq_coerc.con" in
- let ref = NReference.reference_of_spec uri (NReference.Def(2)) in
- NCic.Const ref
+ aux [] l
+;;
+
+let calculate_goal_ty (goalno,_,_) s m =
+ try
+ let _,cc,goalty = CicUtil.lookup_meta goalno m in
+ (* XXX applicare la subst al contesto? *)
+ Some (cc, CicMetaSubst.apply_subst s goalty)
+ with CicUtil.Meta_not_found i when i = goalno -> None
+;;
+
+let calculate_closed_goal_ty (goalno,_,_) s =
+ try
+ let cc,_,goalty = List.assoc goalno s in
+ (* XXX applicare la subst al contesto? *)
+ Some (cc, CicMetaSubst.apply_subst s goalty)
+ with Not_found ->
+ None
+;;
+
+let pp_status ctx status =
+ if debug then
+ let names = Utils.names_of_context ctx in
+ let pp x =
+ let x =
+ ProofEngineReduction.replace
+ ~equality:(fun a b -> match b with Cic.Meta _ -> true | _ -> false)
+ ~what:[Cic.Rel 1] ~with_what:[Cic.Implicit None] ~where:x
+ in
+ CicPp.pp x names
in
- let smart =
- NCic.Appl[eq_coerc;ty;NCic.Implicit `Type;pterm;inst] in
- let smart = mk_cic_term ctx smart in
- try
- let status = instantiate status g smart in
- let _,_,metasenv,subst,_ = status#obj in
- let _,ctx,jty = List.assoc j metasenv in
- let jty = NCicUntrusted.apply_subst subst ctx jty in
- debug_print(lazy("goal " ^ (NCicPp.ppterm ctx [] [] jty)));
- fast_eq_check unit_eq status j
- with
- | NCicEnvironment.ObjectNotFound s as e ->
- raise (Error (lazy "eq_coerc non yet defined",Some e))
- | Error _ as e -> debug_print (lazy "error"); raise e
+ let string_of_do m s (gi,_,_ as g) d =
+ match calculate_goal_ty g s m with
+ | Some (_,gty) -> Printf.sprintf "D(%d, %s, %d)" gi (pp gty) d
+ | None -> Printf.sprintf "D(%d, _, %d)" gi d
+ in
+ let string_of_s m su k (ci,ct) gi =
+ Printf.sprintf "S(%d, %s, %s, %d)" gi (pp k) (pp (Lazy.force ct)) ci
+ in
+ let string_of_ol m su l =
+ String.concat " | "
+ (List.map
+ (function
+ | D (g,d,s) -> string_of_do m su (g,d,s) d
+ | S ((gi,_,_),k,c,_) -> string_of_s m su k c gi)
+ l)
+ in
+ let string_of_fl m s fl =
+ String.concat " | "
+ (List.map (fun ((i,_,_),ty) ->
+ Printf.sprintf "(%d, %s)" i (pp ty)) fl)
+ in
+ let rec aux = function
+ | [] -> ()
+ | (m,s,_,_,ol,fl)::tl ->
+ Printf.eprintf "< [%s] ;;; [%s]>\n"
+ (string_of_ol m s ol) (string_of_fl m s fl);
+ aux tl
+ in
+ Printf.eprintf "-------------------------- status -------------------\n";
+ aux status;
+ Printf.eprintf "-----------------------------------------------------\n";
+;;
+
+let auto_status = ref [] ;;
+let auto_context = ref [];;
+let in_pause = ref false;;
+let pause b = in_pause := b;;
+let cond = Condition.create ();;
+let mutex = Mutex.create ();;
+let hint = ref None;;
+let prune_hint = ref [];;
+
+let step _ = Condition.signal cond;;
+let give_hint n = hint := Some n;;
+let give_prune_hint hint =
+ prune_hint := hint :: !prune_hint
+;;
-let smart_apply_tac t s =
- let unit_eq = index_local_equations s#eq_cache s in
- NTactics.distribute_tac (smart_apply t unit_eq) s
+let check_pause _ =
+ if !in_pause then
+ begin
+ Mutex.lock mutex;
+ Condition.wait cond mutex;
+ Mutex.unlock mutex
+ end
+;;
-let smart_apply_auto t eq_cache =
- NTactics.distribute_tac (smart_apply t eq_cache)
+let get_auto_status _ =
+ let status = !auto_status in
+ let and_list,elems,last =
+ match status with
+ | [] -> [],[],[]
+ | (m,s,_,don,gl,fail)::tl ->
+ let and_list =
+ HExtlib.filter_map
+ (fun (id,d,_ as g) ->
+ match calculate_goal_ty g s m with
+ | Some (_,x) -> Some (id,x,d) | None -> None)
+ (d_goals gl)
+ in
+ let rows =
+ (* these are the S goalsin the or list *)
+ let orlist =
+ List.map
+ (fun (m,s,_,don,gl,fail) ->
+ HExtlib.filter_map
+ (function S (g,k,c,_) -> Some (g,k,c) | _ -> None)
+ (List.rev don @ gl))
+ status
+ in
+ (* this function eats id from a list l::[id,x] returning x, l *)
+ let eat_tail_if_eq id l =
+ let rec aux (s, l) = function
+ | [] -> s, l
+ | ((id1,_,_),k1,c)::tl when id = id1 ->
+ (match s with
+ | None -> aux (Some c,l) tl
+ | Some _ -> assert false)
+ | ((id1,_,_),k1,c as e)::tl -> aux (s, e::l) tl
+ in
+ let c, l = aux (None, []) l in
+ c, List.rev l
+ in
+ let eat_in_parallel id l =
+ let rec aux (b,eaten, new_l as acc) l =
+ match l with
+ | [] -> acc
+ | l::tl ->
+ match eat_tail_if_eq id l with
+ | None, l -> aux (b@[false], eaten, new_l@[l]) tl
+ | Some t,l -> aux (b@[true],eaten@[t], new_l@[l]) tl
+ in
+ aux ([],[],[]) l
+ in
+ let rec eat_all rows l =
+ match l with
+ | [] -> rows
+ | elem::or_list ->
+ match List.rev elem with
+ | ((to_eat,depth,_),k,_)::next_lunch ->
+ let b, eaten, l = eat_in_parallel to_eat l in
+ let eaten = HExtlib.list_uniq eaten in
+ let eaten = List.rev eaten in
+ let b = true (* List.hd (List.rev b) *) in
+ let rows = rows @ [to_eat,k,b,depth,eaten] in
+ eat_all rows l
+ | [] -> eat_all rows or_list
+ in
+ eat_all [] (List.rev orlist)
+ in
+ let history =
+ HExtlib.filter_map
+ (function (S (_,_,(_,c),_)) -> Some c | _ -> None)
+ gl
+ in
+(* let rows = List.filter (fun (_,l) -> l <> []) rows in *)
+ and_list, rows, history
+ in
+ !auto_context, elems, and_list, last
+;;
+(* Works if there is no dependency over proofs *)
+let is_a_green_cut goalty =
+ CicUtil.is_meta_closed goalty
+;;
+let rec first_s = function
+ | (D _)::tl -> first_s tl
+ | (S (g,k,c,s))::tl -> Some ((g,k,c,s),tl)
+ | [] -> None
+;;
+let list_union l1 l2 =
+ (* TODO ottimizzare compare *)
+ HExtlib.list_uniq (List.sort compare (l1 @ l1))
+;;
+let rec eq_todo l1 l2 =
+ match l1,l2 with
+ | (D g1) :: tl1,(D g2) :: tl2 when g1=g2 -> eq_todo tl1 tl2
+ | (S (g1,k1,(c1,lt1),i1)) :: tl1, (S (g2,k2,(c2,lt2),i2)) :: tl2
+ when i1 = i2 && g1 = g2 && k1 = k2 && c1 = c2 ->
+ if Lazy.force lt1 = Lazy.force lt2 then eq_todo tl1 tl2 else false
+ | [],[] -> true
+ | _ -> false
+;;
+let eat_head todo id fl orlist =
+ let rec aux acc = function
+ | [] -> [], acc
+ | (m, s, _, _, todo1, fl1)::tl as orlist ->
+ let rec aux1 todo1 =
+ match first_s todo1 with
+ | None -> orlist, acc
+ | Some (((gno,_,_),_,_,_), todo11) ->
+ (* TODO confronto tra todo da ottimizzare *)
+ if gno = id && eq_todo todo11 todo then
+ aux (list_union fl1 acc) tl
+ else
+ aux1 todo11
+ in
+ aux1 todo1
+ in
+ aux fl orlist
+;;
+let close_proof p ty menv context =
+ let metas =
+ List.map fst (CicUtil.metas_of_term p @ CicUtil.metas_of_term ty)
+ in
+ let menv = List.filter (fun (i,_,_) -> List.exists ((=)i) metas) menv in
+ naif_closure p menv context
+;;
+(* XXX capire bene quando aggiungere alla cache *)
+let add_to_cache_and_del_from_orlist_if_green_cut
+ g s m cache key todo orlist fl ctx size minsize
+=
+ let cache = cache_remove_underinspection cache key in
+ (* prima per fare la irl usavamo il contesto vero e proprio e non quello
+ * canonico! XXX *)
+ match calculate_closed_goal_ty g s with
+ | None -> assert false
+ | Some (canonical_ctx , gty) ->
+ let goalno,depth,sort = g in
+ let irl = mk_irl canonical_ctx in
+ let goal = Cic.Meta(goalno, irl) in
+ let proof = CicMetaSubst.apply_subst s goal in
+ let green_proof, closed_proof =
+ let b = is_a_green_cut proof in
+ if not b then
+ b, (* close_proof proof gty m ctx *) proof
+ else
+ b, proof
+ in
+ debug_print (lazy ("TENTATIVE CACHE: " ^ CicPp.ppterm key));
+ if is_a_green_cut key then
+ (* if the initia goal was closed, we cut alternatives *)
+ let _ = debug_print (lazy ("MANGIO: " ^ string_of_int goalno)) in
+ let orlist, fl = eat_head todo goalno fl orlist in
+ let cache =
+ if size < minsize then
+ (debug_print (lazy ("NO CACHE: 2 (size <= minsize)"));cache)
+ else
+ (* if the proof is closed we cache it *)
+ if green_proof then cache_add_success cache key proof
+ else (* cache_add_success cache key closed_proof *)
+ (debug_print (lazy ("NO CACHE: (no gree proof)"));cache)
+ in
+ cache, orlist, fl, true
+ else
+ let cache =
+ debug_print (lazy ("TENTATIVE CACHE: " ^ CicPp.ppterm gty));
+ if size < minsize then
+ (debug_print (lazy ("NO CACHE: (size <= minsize)")); cache) else
+ (* if the substituted goal and the proof are closed we cache it *)
+ if is_a_green_cut gty then
+ if green_proof then cache_add_success cache gty proof
+ else (* cache_add_success cache gty closed_proof *)
+ (debug_print (lazy ("NO CACHE: (no green proof (gty))"));cache)
+ else (*
+ try
+ let ty, _ =
+ CicTypeChecker.type_of_aux' ~subst:s
+ m ctx closed_proof CicUniv.oblivion_ugraph
+ in
+ if is_a_green_cut ty then
+ cache_add_success cache ty closed_proof
+ else cache
+ with
+ | CicTypeChecker.TypeCheckerFailure _ ->*)
+ (debug_print (lazy ("NO CACHE: (no green gty )"));cache)
+ in
+ cache, orlist, fl, false
+;;
+let close_failures (fl : fail list) (cache : cache) =
+ List.fold_left
+ (fun cache ((gno,depth,_),gty) ->
+ if CicUtil.is_meta_closed gty then
+ ( debug_print (lazy ("FAIL: INDUCED: " ^ string_of_int gno));
+ cache_add_failure cache gty depth)
+ else
+ cache)
+ cache fl
+;;
+let put_in_subst subst metasenv (goalno,_,_) canonical_ctx t ty =
+ let entry = goalno, (canonical_ctx, t,ty) in
+ assert_subst_are_disjoint subst [entry];
+ let subst = entry :: subst in
+
+ let metasenv = CicMetaSubst.apply_subst_metasenv subst metasenv in
-(****************** types **************)
+ subst, metasenv
+;;
+let mk_fake_proof metasenv subst (goalno,_,_) goalty context =
+ None,metasenv,subst ,(lazy (Cic.Meta(goalno,mk_irl context))),goalty, []
+;;
-type th_cache = (NCic.context * InvRelDiscriminationTree.t) list
+let equational_case
+ tables cache depth fake_proof goalno goalty subst context
+ flags
+=
+ let active,passive,bag = tables in
+ let ppterm = ppterm context in
+ let status = (fake_proof,goalno) in
+ if flags.use_only_paramod then
+ begin
+ debug_print (lazy ("PARAMODULATION SU: " ^
+ string_of_int goalno ^ " " ^ ppterm goalty ));
+ let goal_steps, saturation_steps, timeout =
+ max_int,max_int,flags.timeout
+ in
+ match
+ Saturation.given_clause bag status active passive
+ goal_steps saturation_steps timeout
+ with
+ | None, active, passive, bag ->
+ [], (active,passive,bag), cache, flags
+ | Some(subst',(_,metasenv,_subst,proof,_, _),open_goals),active,
+ passive,bag ->
+ assert_subst_are_disjoint subst subst';
+ let subst = subst@subst' in
+ let open_goals =
+ order_new_goals metasenv subst open_goals ppterm
+ in
+ let open_goals =
+ List.map (fun (x,sort) -> x,depth-1,sort) open_goals
+ in
+ incr candidate_no;
+ [(!candidate_no,proof),metasenv,subst,open_goals],
+ (active,passive,bag), cache, flags
+ end
+ else
+ begin
+ debug_print (lazy ("NARROWING DEL GOAL: " ^
+ string_of_int goalno ^ " " ^ ppterm goalty ));
+ let goal_steps, saturation_steps, timeout =
+ 1,0,flags.timeout
+ in
+ match
+ Saturation.solve_narrowing bag status active passive goal_steps
+ with
+ | None, active, passive, bag ->
+ [], (active,passive,bag), cache, flags
+ | Some(subst',(_,metasenv,_subst,proof,_, _),open_goals),active,
+ passive,bag ->
+ assert_subst_are_disjoint subst subst';
+ let subst = subst@subst' in
+ let open_goals =
+ order_new_goals metasenv subst open_goals ppterm
+ in
+ let open_goals =
+ List.map (fun (x,sort) -> x,depth-1,sort) open_goals
+ in
+ incr candidate_no;
+ [(!candidate_no,proof),metasenv,subst,open_goals],
+ (active,passive,bag), cache, flags
+ end
+(*
+ begin
+ let params = ([],["use_context","false"]) in
+ let automation_cache = {
+ AutomationCache.tables = tables ;
+ AutomationCache.univ = Universe.empty; }
+ in
+ try
+ let ((_,metasenv,subst,_,_,_),open_goals) =
-(* cartesian: term set list -> term list set *)
-let rec cartesian =
- function
- [] -> NDiscriminationTree.TermListSet.empty
- | [l] ->
- NDiscriminationTree.TermSet.fold
- (fun x acc -> NDiscriminationTree.TermListSet.add [x] acc) l NDiscriminationTree.TermListSet.empty
- | he::tl ->
- let rest = cartesian tl in
- NDiscriminationTree.TermSet.fold
- (fun x acc ->
- NDiscriminationTree.TermListSet.fold (fun l acc' -> NDiscriminationTree.TermListSet.add (x::l) acc') rest acc
- ) he NDiscriminationTree.TermListSet.empty
-;;
-
-(* all_keys_of_cic_type: term -> term set *)
-let all_keys_of_cic_type metasenv subst context ty =
- let saturate ty =
- (* Here we are dropping the metasenv, but this should not raise any
- exception (hopefully...) *)
- let ty,_,hyps =
- NCicMetaSubst.saturate ~delta:max_int metasenv subst context ty 0
+ solve_rewrite ~params ~automation_cache
+ (fake_proof, goalno)
+ in
+ let proof = lazy (Cic.Meta (-1,[])) in
+ [(!candidate_no,proof),metasenv,subst,[]],tables, cache, flags
+ with ProofEngineTypes.Fail _ -> [], tables, cache, flags
+(*
+ let res = Saturation.all_subsumed bag status active passive in
+ let res' =
+ List.map
+ (fun (subst',(_,metasenv,_subst,proof,_, _),open_goals) ->
+ assert_subst_are_disjoint subst subst';
+ let subst = subst@subst' in
+ let open_goals =
+ order_new_goals metasenv subst open_goals ppterm
+ in
+ let open_goals =
+ List.map (fun (x,sort) -> x,depth-1,sort) open_goals
+ in
+ incr candidate_no;
+ (!candidate_no,proof),metasenv,subst,open_goals)
+ res
+ in
+ res', (active,passive,bag), cache, flags
+*)
+ end
+*)
+;;
+
+let sort_new_elems =
+ List.sort (fun (_,_,_,l1) (_,_,_,l2) ->
+ let p1 = List.length (prop_only l1) in
+ let p2 = List.length (prop_only l2) in
+ if p1 = p2 then List.length l1 - List.length l2 else p1-p2)
+;;
+
+
+let try_candidate dbd
+ goalty tables subst fake_proof goalno depth context cand
+=
+ let ppterm = ppterm context in
+ try
+ let actives, passives, bag = tables in
+ let (_,metasenv,subst,_,_,_), open_goals =
+ ProofEngineTypes.apply_tactic
+ (PrimitiveTactics.apply_tac ~term:cand)
+ (fake_proof,goalno)
+ in
+ let tables = actives, passives,
+ Equality.push_maxmeta bag
+ (max (Equality.maxmeta bag) (CicMkImplicit.new_meta metasenv subst))
+ in
+ debug_print (lazy (" OK: " ^ ppterm cand));
+ let metasenv = CicRefine.pack_coercion_metasenv metasenv in
+ let open_goals = order_new_goals metasenv subst open_goals ppterm in
+ let open_goals = List.map (fun (x,sort) -> x,depth-1,sort) open_goals in
+ incr candidate_no;
+ Some ((!candidate_no,lazy cand),metasenv,subst,open_goals), tables
+ with
+ | ProofEngineTypes.Fail s -> None,tables
+ | CicUnification.Uncertain s -> None,tables
+;;
+
+let applicative_case dbd
+ tables depth subst fake_proof goalno goalty metasenv context
+ signature universe cache flags
+=
+ (* let goalty_aux =
+ match goalty with
+ | Cic.Appl (hd::tl) ->
+ Cic.Appl (hd :: HExtlib.mk_list (Cic.Meta (0,[])) (List.length tl))
+ | _ -> goalty
+ in *)
+ let goalty_aux = goalty in
+ let candidates =
+ get_candidates flags.skip_trie_filtering universe cache goalty_aux
in
- ty,List.length hyps
- in
- let rec aux ty =
- match ty with
- NCic.Appl (he::tl) ->
- let tl' =
- List.map (fun ty ->
- let wty = NCicReduction.whd ~delta:0 ~subst context ty in
- if ty = wty then
- NDiscriminationTree.TermSet.add ty (aux ty)
- else
- NDiscriminationTree.TermSet.union
- (NDiscriminationTree.TermSet.add ty (aux ty))
- (NDiscriminationTree.TermSet.add wty (aux wty))
- ) tl
- in
- NDiscriminationTree.TermListSet.fold
- (fun l acc -> NDiscriminationTree.TermSet.add (NCic.Appl l) acc)
- (cartesian ((NDiscriminationTree.TermSet.singleton he)::tl'))
- NDiscriminationTree.TermSet.empty
- | _ -> NDiscriminationTree.TermSet.empty
- in
- let ty,ity = saturate ty in
- let wty,iwty = saturate (NCicReduction.whd ~delta:0 ~subst context ty) in
- if ty = wty then
- [ity, NDiscriminationTree.TermSet.add ty (aux ty)]
- else
- [ity, NDiscriminationTree.TermSet.add ty (aux ty) ;
- iwty, NDiscriminationTree.TermSet.add wty (aux wty) ]
+ (* if the goal is an equality we skip the congruence theorems
+ let candidates =
+ if is_equational_case goalty flags
+ then List.filter not_default_eq_term candidates
+ else candidates
+ in *)
+ let candidates = List.filter (only signature context metasenv) candidates
+ in
+ let tables, elems =
+ List.fold_left
+ (fun (tables,elems) cand ->
+ match
+ try_candidate dbd goalty
+ tables subst fake_proof goalno depth context cand
+ with
+ | None, tables -> tables, elems
+ | Some x, tables -> tables, x::elems)
+ (tables,[]) candidates
+ in
+ let elems = sort_new_elems elems in
+ elems, tables, cache
;;
-let all_keys_of_type status t =
- let _,_,metasenv,subst,_ = status#obj in
- let context = ctx_of t in
- let status, t = apply_subst status context t in
- let keys =
- all_keys_of_cic_type metasenv subst context
- (snd (term_of_cic_term status t context))
- in
- status,
- List.map
- (fun (intros,keys) ->
- intros,
- NDiscriminationTree.TermSet.fold
- (fun t acc -> Ncic_termSet.add (mk_cic_term context t) acc)
- keys Ncic_termSet.empty
- ) keys
+let try_smart_candidate dbd
+ goalty tables subst fake_proof goalno depth context cand
+=
+ let ppterm = ppterm context in
+ try
+ let params = ([],[]) in
+ let automation_cache = {
+ AutomationCache.tables = tables ;
+ AutomationCache.univ = Universe.empty; }
+ in
+ debug_print (lazy ("candidato per " ^ string_of_int goalno
+ ^ ": " ^ CicPp.ppterm cand));
+(*
+ let (_,metasenv,subst,_,_,_) = fake_proof in
+ prerr_endline ("metasenv:\n" ^ CicMetaSubst.ppmetasenv [] metasenv);
+ prerr_endline ("subst:\n" ^ CicMetaSubst.ppsubst ~metasenv subst);
+*)
+ let ((_,metasenv,subst,_,_,_),open_goals) =
+ apply_smart ~dbd ~term:cand ~params ~automation_cache
+ (fake_proof, goalno)
+ in
+ let metasenv = CicRefine.pack_coercion_metasenv metasenv in
+ let open_goals = order_new_goals metasenv subst open_goals ppterm in
+ let open_goals = List.map (fun (x,sort) -> x,depth-1,sort) open_goals in
+ incr candidate_no;
+ Some ((!candidate_no,lazy cand),metasenv,subst,open_goals), tables
+ with
+ | ProofEngineTypes.Fail s -> None,tables
+ | CicUnification.Uncertain s -> None,tables
+;;
+
+let smart_applicative_case dbd
+ tables depth subst fake_proof goalno goalty metasenv context signature
+ universe cache flags
+=
+ let goalty_aux =
+ match goalty with
+ | Cic.Appl (hd::tl) ->
+ Cic.Appl (hd :: HExtlib.mk_list (Cic.Meta (0,[])) (List.length tl))
+ | _ -> goalty
+ in
+ let smart_candidates =
+ get_candidates flags.skip_trie_filtering universe cache goalty_aux
+ in
+ let candidates =
+ get_candidates flags.skip_trie_filtering universe cache goalty
+ in
+ let smart_candidates =
+ List.filter
+ (fun x -> not(List.mem x candidates)) smart_candidates
+ in
+ let debug_msg =
+ (lazy ("smart_candidates" ^ " = " ^
+ (String.concat "\n" (List.map CicPp.ppterm smart_candidates)))) in
+ debug_print debug_msg;
+ let candidates = List.filter (only signature context metasenv) candidates in
+ let smart_candidates =
+ List.filter (only signature context metasenv) smart_candidates
+ in
+(*
+ let penalty cand depth =
+ if only signature context metasenv cand then depth else ((prerr_endline (
+ "penalizzo " ^ CicPp.ppterm cand));depth -1)
+ in
+*)
+ let tables, elems =
+ List.fold_left
+ (fun (tables,elems) cand ->
+ match
+ try_candidate dbd goalty
+ tables subst fake_proof goalno depth context cand
+ with
+ | None, tables ->
+ (* if normal application fails we try to be smart *)
+ (match try_smart_candidate dbd goalty
+ tables subst fake_proof goalno depth context cand
+ with
+ | None, tables -> tables, elems
+ | Some x, tables -> tables, x::elems)
+ | Some x, tables -> tables, x::elems)
+ (tables,[]) candidates
+ in
+ let tables, smart_elems =
+ List.fold_left
+ (fun (tables,elems) cand ->
+ match
+ try_smart_candidate dbd goalty
+ tables subst fake_proof goalno depth context cand
+ with
+ | None, tables -> tables, elems
+ | Some x, tables -> tables, x::elems)
+ (tables,[]) smart_candidates
+ in
+ let elems = sort_new_elems (elems @ smart_elems) in
+ elems, tables, cache
;;
+let equational_and_applicative_case dbd
+ signature universe flags m s g gty tables cache context
+=
+ let goalno, depth, sort = g in
+ let fake_proof = mk_fake_proof m s g gty context in
+ if is_equational_case gty flags then
+ let elems,tables,cache, flags =
+ equational_case tables cache
+ depth fake_proof goalno gty s context flags
+ in
+ let more_elems, tables, cache =
+ if flags.use_only_paramod then
+ [],tables, cache
+ else
+ applicative_case dbd
+ tables depth s fake_proof goalno
+ gty m context signature universe cache flags
+ in
+ elems@more_elems, tables, cache, flags
+ else
+ let elems, tables, cache =
+ match LibraryObjects.eq_URI () with
+ | Some _ ->
+ smart_applicative_case dbd tables depth s fake_proof goalno
+ gty m context signature universe cache flags
+ | None ->
+ applicative_case dbd tables depth s fake_proof goalno
+ gty m context signature universe cache flags
+ in
+ elems, tables, cache, flags
+;;
+let rec condition_for_hint i = function
+ | [] -> false
+ | S (_,_,(j,_),_):: tl -> j <> i (* && condition_for_hint i tl *)
+ | _::tl -> condition_for_hint i tl
+;;
+let prunable_for_size flags s m todo =
+ let rec aux b = function
+ | (S _)::tl -> aux b tl
+ | (D (_,_,T))::tl -> aux b tl
+ | (D g)::tl ->
+ (match calculate_goal_ty g s m with
+ | None -> aux b tl
+ | Some (canonical_ctx, gty) ->
+ let gsize, _ =
+ Utils.weight_of_term
+ ~consider_metas:false ~count_metas_occurrences:true gty in
+ let newb = b || gsize > flags.maxgoalsizefactor in
+ aux newb tl)
+ | [] -> b
+ in
+ aux false todo
-let keys_of_type status orig_ty =
- (* Here we are dropping the metasenv (in the status), but this should not
- raise any exception (hopefully...) *)
- let _, ty, _ = saturate ~delta:max_int status orig_ty in
- let _, ty = apply_subst status (ctx_of ty) ty in
- let keys =
(*
- let orig_ty' = NCicTacReduction.normalize ~subst context orig_ty in
- if orig_ty' <> orig_ty then
- let ty',_,_= NCicMetaSubst.saturate ~delta:0 metasenv subst context orig_ty' 0 in
- [ty;ty']
- else
- [ty]
+let prunable ty todo =
+ let rec aux b = function
+ | (S(_,k,_,_))::tl -> aux (b || Equality.meta_convertibility k ty) tl
+ | (D (_,_,T))::tl -> aux b tl
+ | D _::_ -> false
+ | [] -> b
+ in
+ aux false todo
+;;
*)
- [ty] in
-(*CSC: strange: we keep ty, ty normalized and ty ~delta:(h-1) *)
+
+let prunable menv subst ty todo =
+ let rec aux = function
+ | (S(_,k,_,_))::tl ->
+ (match Equality.meta_convertibility_subst k ty menv with
+ | None -> aux tl
+ | Some variant ->
+ no_progress variant tl (* || aux tl*))
+ | (D (_,_,T))::tl -> aux tl
+ | _ -> false
+ and no_progress variant = function
+ | [] -> (*prerr_endline "++++++++++++++++++++++++ no_progress";*) true
+ | D ((n,_,P) as g)::tl ->
+ (match calculate_goal_ty g subst menv with
+ | None -> no_progress variant tl
+ | Some (_, gty) ->
+ (match calculate_goal_ty g variant menv with
+ | None -> assert false
+ | Some (_, gty') ->
+ if gty = gty' then no_progress variant tl
+(*
+(prerr_endline (string_of_int n);
+ prerr_endline (CicPp.ppterm gty);
+ prerr_endline (CicPp.ppterm gty');
+ prerr_endline "---------- subst";
+ prerr_endline (CicMetaSubst.ppsubst ~metasenv:menv subst);
+ prerr_endline "---------- variant";
+ prerr_endline (CicMetaSubst.ppsubst ~metasenv:menv variant);
+ prerr_endline "---------- menv";
+ prerr_endline (CicMetaSubst.ppmetasenv [] menv);
+ no_progress variant tl) *)
+ else false))
+ | _::tl -> no_progress variant tl
+ in
+ aux todo
+
+;;
+let condition_for_prune_hint prune (m, s, size, don, todo, fl) =
+ let s =
+ HExtlib.filter_map (function S (_,_,(c,_),_) -> Some c | _ -> None) todo
+ in
+ List.for_all (fun i -> List.for_all (fun j -> i<>j) prune) s
+;;
+let filter_prune_hint c l =
+ let prune = !prune_hint in
+ prune_hint := []; (* possible race... *)
+ if prune = [] then c,l
+ else
+ cache_reset_underinspection c,
+ List.filter (condition_for_prune_hint prune) l
+;;
+
+
+
+let
+ auto_all_solutions dbd tables universe cache context metasenv gl flags
+=
+ let signature =
+ List.fold_left
+ (fun set g ->
+ MetadataConstraints.UriManagerSet.union set
+ (MetadataQuery.signature_of metasenv g)
+ )
+ MetadataConstraints.UriManagerSet.empty gl
+ in
+ let goals = order_new_goals metasenv [] gl CicPp.ppterm in
+ let goals =
+ List.map
+ (fun (x,s) -> D (x,flags.maxdepth,s)) goals
+ in
+ let elems = [metasenv,[],1,[],goals,[]] in
+ let rec aux tables solutions cache elems flags =
+ match auto_main dbd tables context flags signature universe cache elems with
+ | Gaveup (tables,cache) ->
+ solutions,cache, tables
+ | Proved (metasenv,subst,others,tables,cache) ->
+ if Unix.gettimeofday () > flags.timeout then
+ ((subst,metasenv)::solutions), cache, tables
+ else
+ aux tables ((subst,metasenv)::solutions) cache others flags
+ in
+ let rc = aux tables [] cache elems flags in
+ match rc with
+ | [],cache,tables -> [],cache,tables
+ | solutions, cache,tables ->
+ let solutions =
+ HExtlib.filter_map
+ (fun (subst,newmetasenv) ->
+ let opened =
+ ProofEngineHelpers.compare_metasenvs ~oldmetasenv:metasenv ~newmetasenv
+ in
+ if opened = [] then Some subst else None)
+ solutions
+ in
+ solutions,cache,tables
+;;
+
+(******************* AUTO ***************)
+
+
+let auto dbd flags metasenv tables universe cache context metasenv gl =
+ let initial_time = Unix.gettimeofday() in
+ let signature =
+ List.fold_left
+ (fun set g ->
+ MetadataConstraints.UriManagerSet.union set
+ (MetadataQuery.signature_of metasenv g)
+ )
+ MetadataConstraints.UriManagerSet.empty gl
+ in
+ let goals = order_new_goals metasenv [] gl CicPp.ppterm in
+ let goals = List.map (fun (x,s) -> D(x,flags.maxdepth,s)) goals in
+ let elems = [metasenv,[],1,[],goals,[]] in
+ match auto_main dbd tables context flags signature universe cache elems with
+ | Proved (metasenv,subst,_, tables,cache) ->
+ debug_print(lazy
+ ("TIME:"^string_of_float(Unix.gettimeofday()-.initial_time)));
+ Some (subst,metasenv), cache
+ | Gaveup (tables,cache) ->
+ debug_print(lazy
+ ("TIME:"^string_of_float(Unix.gettimeofday()-.initial_time)));
+ None,cache
+;;
+
+let auto_tac ~(dbd:HSql.dbd) ~params:(univ,params) ~automation_cache (proof, goal) =
+ let flags = flags_of_params params () in
+ let use_library = flags.use_library in
+ let universe, tables, cache =
+ init_cache_and_tables
+ ~dbd ~use_library ~use_context:(not flags.skip_context)
+ automation_cache univ (proof, goal)
+ in
+ let _,metasenv,subst,_,_, _ = proof in
+ let _,context,goalty = CicUtil.lookup_meta goal metasenv in
+ let signature = MetadataQuery.signature_of metasenv goal in
+ let signature =
+ List.fold_left
+ (fun set t ->
+ let ty, _ =
+ CicTypeChecker.type_of_aux' metasenv context t
+ CicUniv.oblivion_ugraph
+ in
+ MetadataConstraints.UriManagerSet.union set
+ (MetadataConstraints.constants_of ty)
+ )
+ signature univ
+ in
+ let tables,cache =
+ if flags.close_more then
+ close_more
+ tables context (proof, goal)
+ (auto_all_solutions dbd) signature universe cache
+ else tables,cache in
+ let initial_time = Unix.gettimeofday() in
+ let (_,oldmetasenv,_,_,_, _) = proof in
+ hint := None;
+ let elem =
+ metasenv,subst,1,[],[D (goal,flags.maxdepth,P)],[]
+ in
+ match auto_main dbd tables context flags signature universe cache [elem] with
+ | Proved (metasenv,subst,_, tables,cache) ->
+ debug_print (lazy
+ ("TIME:"^string_of_float(Unix.gettimeofday()-.initial_time)));
+ let proof,metasenv =
+ ProofEngineHelpers.subst_meta_and_metasenv_in_proof
+ proof goal subst metasenv
+ in
+ let opened =
+ ProofEngineHelpers.compare_metasenvs ~oldmetasenv
+ ~newmetasenv:metasenv
+ in
+ proof,opened
+ | Gaveup (tables,cache) ->
+ debug_print
+ (lazy ("TIME:"^
+ string_of_float(Unix.gettimeofday()-.initial_time)));
+ raise (ProofEngineTypes.Fail (lazy "Auto gave up"))
+;;
+*)
+
+(****************** types **************)
+type th_cache = (NCic.context * InvRelDiscriminationTree.t) list
+
+let keys_of_term status t =
+ let status, orig_ty = typeof status (ctx_of t) t in
+ let _, ty, _ = saturate ~delta:max_int status orig_ty in
+ let keys = [ty] in
let keys =
let _, ty = term_of_cic_term status ty (ctx_of ty) in
match ty with
- | NCic.Const (NReference.Ref (_,(NReference.Def h | NReference.Fix (_,_,h))))
- | NCic.Appl (NCic.Const(NReference.Ref(_,(NReference.Def h | NReference.Fix (_,_,h))))::_)
+ | NCic.Const (NReference.Ref (_,NReference.Def h))
+ | NCic.Appl (NCic.Const(NReference.Ref(_,NReference.Def h))::_)
when h > 0 ->
let _,ty,_= saturate status ~delta:(h-1) orig_ty in
ty::keys
status, keys
;;
-let all_keys_of_term status t =
- let status, orig_ty = typeof status (ctx_of t) t in
- all_keys_of_type status orig_ty
-;;
-
-let keys_of_term status t =
- let status, orig_ty = typeof status (ctx_of t) t in
- keys_of_type status orig_ty
-;;
-
let mk_th_cache status gl =
List.fold_left
(fun (status, acc) g ->
List.fold_left
(fun (status, i, idx) _ ->
let t = mk_cic_term ctx (NCic.Rel i) in
+ debug_print(lazy("indexing: "^ppterm status t));
let status, keys = keys_of_term status t in
- debug_print(lazy("indexing: "^ppterm status t ^ ": " ^ string_of_int (List.length keys)));
let idx =
List.fold_left (fun idx k ->
InvRelDiscriminationTree.index idx k t) idx keys
replace c
;;
-let rm_from_th t c ty =
- let key_c = ctx_of t in
- if not (List.mem_assq key_c c) then assert false
- else
- let rec replace = function
- | [] -> []
- | (x, idx) :: tl when x == key_c ->
- (x, InvRelDiscriminationTree.remove_index idx ty t) :: tl
- | x :: tl -> x :: replace tl
- in
- replace c
-;;
-
let pp_idx status idx =
InvRelDiscriminationTree.iter idx
(fun k set ->
let search_in_th gty th =
let c = ctx_of gty in
let rec aux acc = function
- | [] -> (* Ncic_termSet.elements *) acc
+ | [] -> Ncic_termSet.elements acc
| (_::tl) as k ->
try
- let idx = List.assoc(*q*) k th in
+ let idx = List.assq k th in
let acc = Ncic_termSet.union acc
(InvRelDiscriminationTree.retrieve_unifiables idx gty)
in
type flags = {
do_types : bool; (* solve goals in Type *)
- last : bool; (* last goal: take first solution only *)
- candidates: Ast.term list option;
maxwidth : int;
maxsize : int;
maxdepth : int;
timeout : float;
}
-type cache =
- {facts : th_cache; (* positive results *)
- under_inspection : cic_term list * th_cache; (* to prune looping *)
- unit_eq : NCicParamod.state;
- trace: Ast.term list
- }
-
-let add_to_trace ~depth cache t =
- match t with
- | Ast.NRef _ ->
- debug_print ~depth (lazy ("Adding to trace: " ^ CicNotationPp.pp_term t));
- {cache with trace = t::cache.trace}
- | Ast.NCic _ (* local candidate *)
- | _ -> (*not an application *) cache
-
-let pptrace tr =
- (lazy ("Proof Trace: " ^ (String.concat ";"
- (List.map CicNotationPp.pp_term tr))))
-(* not used
-let remove_from_trace cache t =
- match t with
- | Ast.NRef _ ->
- (match cache.trace with
- | _::tl -> {cache with trace = tl}
- | _ -> assert false)
- | Ast.NCic _ (* local candidate *)
- | _ -> (*not an application *) cache *)
-
type sort = T | P
type goal = int * sort (* goal, depth, sort *)
type fail = goal * cic_term
exception Gaveup of IntSet.t (* a sublist of unprovable conjunctive
atoms of the input goals *)
-exception Proved of NTacStatus.tac_status * Ast.term list
+exception Proved of #NTacStatus.tac_status
(* let close_failures _ c = c;; *)
(* let prunable _ _ _ = false;; *)
(* let put_in_subst s _ _ _ = s;; *)
(* let add_to_cache_and_del_from_orlist_if_green_cut _ _ c _ _ o f _ = c, o, f, false ;; *)
(* let cache_add_underinspection c _ _ = c;; *)
-
-let init_cache ?(facts=[]) ?(under_inspection=[],[])
- ?(unit_eq=NCicParamod.empty_state)
- ?(trace=[])
- _ =
- {facts = facts;
- under_inspection = under_inspection;
- unit_eq = unit_eq;
- trace = trace}
-
-let only signature _context candidate = true
-(*
- (* TASSI: nel trie ci mettiamo solo il body, non il ty *)
- let candidate_ty =
- NCicTypeChecker.typeof ~subst:[] ~metasenv:[] [] candidate
- in
- let height = fast_height_of_term candidate_ty in
- let rc = signature >= height in
- if rc = false then
- debug_print (lazy ("Filtro: " ^ NCicPp.ppterm ~context:[] ~subst:[]
- ~metasenv:[] candidate ^ ": " ^ string_of_int height))
- else
- debug_print (lazy ("Tengo: " ^ NCicPp.ppterm ~context:[] ~subst:[]
- ~metasenv:[] candidate ^ ": " ^ string_of_int height));
-
- rc *)
-;;
+let equational_case _ _ _ _ _ _ = [];;
+let only _ _ _ = true;;
let candidate_no = ref 0;;
-let openg_no status = List.length (head_goals status#stack)
-
-let sort_candidates status ctx candidates =
- let _,_,metasenv,subst,_ = status#obj in
- let branch cand =
- let status,ct = disambiguate status ctx ("",0,cand) None in
- let status,t = term_of_cic_term status ct ctx in
- let ty = NCicTypeChecker.typeof subst metasenv ctx t in
- let res = branch status (mk_cic_term ctx ty) in
- debug_print (lazy ("branch factor for: " ^ (ppterm status ct) ^ " = "
- ^ (string_of_int res)));
- res
- in
- let candidates = List.map (fun t -> branch t,t) candidates in
- let candidates =
- List.sort (fun (a,_) (b,_) -> a - b) candidates in
- let candidates = List.map snd candidates in
- debug_print (lazy ("candidates =\n" ^ (String.concat "\n"
- (List.map CicNotationPp.pp_term candidates))));
- candidates
-
-let sort_new_elems l =
- List.sort (fun (_,s1) (_,s2) -> openg_no s1 - openg_no s2) l
+let sort_new_elems l =
+ List.sort (fun (_,_,_,_,l1) (_,_,_,_,l2) -> List.length l1 - List.length l2) l
+;;
-let try_candidate ?(smart=0) flags depth status eq_cache ctx t =
+let try_candidate flags depth status t =
try
- debug_print ~depth (lazy ("try " ^ CicNotationPp.pp_term t));
- let status =
- if smart= 0 then NTactics.apply_tac ("",0,t) status
- else if smart = 1 then smart_apply_auto ("",0,t) eq_cache status
- else (* smart = 2: both *)
- try NTactics.apply_tac ("",0,t) status
- with Error _ ->
- smart_apply_auto ("",0,t) eq_cache status
- in
-(*
- let og_no = openg_no status in
- if (* og_no > flags.maxwidth || *)
- ((depth + 1) = flags.maxdepth && og_no <> 0) then
- (debug_print ~depth (lazy "pruned immediately"); None)
- else *)
- (* useless
- let status, cict = disambiguate status ctx ("",0,t) None in
- let status,ct = term_of_cic_term status cict ctx in
- let _,_,metasenv,subst,_ = status#obj in
- let ty = NCicTypeChecker.typeof subst metasenv ctx ct in
- let res = branch status (mk_cic_term ctx ty) in
- if smart=1 && og_no > res then
- (print (lazy ("branch factor for: " ^ (ppterm status cict) ^ " = "
- ^ (string_of_int res) ^ " vs. " ^ (string_of_int og_no)));
- print ~depth (lazy "strange application"); None)
- else *)
- (incr candidate_no;
- Some ((!candidate_no,t),status))
+ debug_print ~depth (lazy ("try " ^ CicNotationPp.pp_term t));
+ let status = NTactics.apply_tac ("",0,t) status in
+ let open_goals = head_goals status#stack in
+ debug_print ~depth
+ (lazy ("success: "^String.concat " "(List.map string_of_int open_goals)));
+ if List.length open_goals > flags.maxwidth ||
+ (depth = flags.maxdepth && open_goals <> []) then
+ (debug_print ~depth (lazy "pruned immediately"); None)
+ else
+ (incr candidate_no;
+ Some ((!candidate_no,t),status,open_goals))
with Error (msg,exn) -> debug_print ~depth (lazy "failed"); None
;;
-let sort_of subst metasenv ctx t =
- let ty = NCicTypeChecker.typeof subst metasenv ctx t in
- let metasenv',ty = NCicUnification.fix_sorts metasenv subst ty in
- assert (metasenv = metasenv');
- NCicTypeChecker.typeof subst metasenv ctx ty
-;;
-
-let type0= NUri.uri_of_string ("cic:/matita/pts/Type0.univ")
-;;
-
-let perforate_small subst metasenv context t =
- let rec aux = function
- | NCic.Appl (hd::tl) ->
- let map t =
- let s = sort_of subst metasenv context t in
- match s with
- | NCic.Sort(NCic.Type [`Type,u])
- when u=type0 -> NCic.Meta (0,(0,NCic.Irl 0))
- | _ -> aux t
- in
- NCic.Appl (hd::List.map map tl)
- | t -> t
- in
- aux t
-;;
-
-let get_cands retrieve_for diff empty gty weak_gty =
- let cands = retrieve_for gty in
- match weak_gty with
- | None -> cands, empty
- | Some weak_gty ->
- let more_cands = retrieve_for weak_gty in
- cands, diff more_cands cands
-;;
-
-let get_candidates ?(smart=true) depth flags status cache signature gty =
- let maxd = ((depth + 1) = flags.maxdepth) in
+let get_candidates status cache signature gty =
let universe = status#auto_cache in
- let _,_,metasenv,subst,_ = status#obj in
let context = ctx_of gty in
let _, raw_gty = term_of_cic_term status gty context in
- let raw_weak_gty, weak_gty =
- if smart then
- match raw_gty with
- | NCic.Appl _
- | NCic.Const _
- | NCic.Rel _ ->
- let weak = perforate_small subst metasenv context raw_gty in
- Some weak, Some (mk_cic_term context weak)
- | _ -> None,None
- else None,None
- in
- let global_cands, smart_global_cands =
- match flags.candidates with
- | Some l when (not maxd) -> l,[]
- | Some _
- | None ->
- let mapf s =
- let to_ast = function
- | NCic.Const r when true (*is_relevant statistics r*) -> Some (Ast.NRef r)
- | NCic.Const _ -> None
- | _ -> assert false in
- HExtlib.filter_map
- to_ast (NDiscriminationTree.TermSet.elements s) in
- let g,l =
- get_cands
- (NDiscriminationTree.DiscriminationTree.retrieve_unifiables
- universe)
- NDiscriminationTree.TermSet.diff
- NDiscriminationTree.TermSet.empty
- raw_gty raw_weak_gty in
- mapf g, mapf l in
- let local_cands,smart_local_cands =
- let mapf s =
- let to_ast t =
- let _status, t = term_of_cic_term status t context
- in Ast.NCic t in
- List.map to_ast (Ncic_termSet.elements s) in
- let g,l =
- get_cands
- (fun ty -> search_in_th ty cache)
- Ncic_termSet.diff Ncic_termSet.empty gty weak_gty in
- mapf g, mapf l in
- sort_candidates status context (global_cands@local_cands),
- sort_candidates status context (smart_global_cands@smart_local_cands)
-;;
-
-(* old version
-let get_candidates ?(smart=true) status cache signature gty =
- let universe = status#auto_cache in
- let _,_,metasenv,subst,_ = status#obj in
- let context = ctx_of gty in
- let t_ast t =
- let _status, t = term_of_cic_term status t context
- in Ast.NCic t in
- let c_ast = function
- | NCic.Const r -> Ast.NRef r | _ -> assert false in
- let _, raw_gty = term_of_cic_term status gty context in
- let keys = all_keys_of_cic_term metasenv subst context raw_gty in
- (* we only keep those keys that do not require any intros for now *)
- let no_intros_keys = snd (List.hd keys) in
- let cands =
- NDiscriminationTree.TermSet.fold
- (fun ty acc ->
- NDiscriminationTree.TermSet.union acc
- (NDiscriminationTree.DiscriminationTree.retrieve_unifiables
- universe ty)
- ) no_intros_keys NDiscriminationTree.TermSet.empty in
-(* old code:
let cands = NDiscriminationTree.DiscriminationTree.retrieve_unifiables
- universe raw_gty in
-*)
- let local_cands =
- NDiscriminationTree.TermSet.fold
- (fun ty acc ->
- Ncic_termSet.union acc (search_in_th (mk_cic_term context ty) cache)
- ) no_intros_keys Ncic_termSet.empty in
-(* old code:
- let local_cands = search_in_th gty cache in
-*)
- debug_print (lazy ("candidates for" ^ NTacStatus.ppterm status gty));
- debug_print (lazy ("local cands = " ^ (string_of_int (List.length (Ncic_termSet.elements local_cands)))));
- let together global local =
- List.map c_ast
- (List.filter (only signature context)
- (NDiscriminationTree.TermSet.elements global)) @
- List.map t_ast (Ncic_termSet.elements local) in
- let candidates = together cands local_cands in
- let candidates = sort_candidates status context candidates in
- let smart_candidates =
- if smart then
- match raw_gty with
- | NCic.Appl _
- | NCic.Const _
- | NCic.Rel _ ->
- let weak_gty = perforate_small subst metasenv context raw_gty in
- (*
- NCic.Appl (hd:: HExtlib.mk_list(NCic.Meta (0,(0,NCic.Irl 0)))
- (List.length tl)) in *)
- let more_cands =
- NDiscriminationTree.DiscriminationTree.retrieve_unifiables
- universe weak_gty
- in
- let smart_cands =
- NDiscriminationTree.TermSet.diff more_cands cands in
- let cic_weak_gty = mk_cic_term context weak_gty in
- let more_local_cands = search_in_th cic_weak_gty cache in
- let smart_local_cands =
- Ncic_termSet.diff more_local_cands local_cands in
- together smart_cands smart_local_cands
- (* together more_cands more_local_cands *)
- | _ -> []
- else []
+ universe raw_gty
+ in
+ let cands =
+ List.filter (only signature context)
+ (NDiscriminationTree.TermSet.elements cands)
in
- let smart_candidates = sort_candidates status context smart_candidates in
- (* if smart then smart_candidates, []
- else candidates, [] *)
- candidates, smart_candidates
-;;
-
-let get_candidates ?(smart=true) flags status cache signature gty =
- match flags.candidates with
- | None -> get_candidates ~smart status cache signature gty
- | Some l -> l,[]
-;; *)
+ List.map (fun t ->
+ let _status, t = term_of_cic_term status t context in Ast.NCic t)
+ (search_in_th gty cache)
+ @
+ List.map (function NCic.Const r -> Ast.NRef r | _ -> assert false) cands
+;;
let applicative_case depth signature status flags gty cache =
+ let tcache,_ = cache in
app_counter:= !app_counter+1;
- let _,_,metasenv,subst,_ = status#obj in
- let context = ctx_of gty in
- let tcache = cache.facts in
- let is_prod, is_eq =
- let status, t = term_of_cic_term status gty context in
- let t = NCicReduction.whd subst context t in
- match t with
- | NCic.Prod _ -> true, false
- | _ -> false, NCicParamod.is_equation metasenv subst context t
- in
- debug_print~depth (lazy (string_of_bool is_eq));
- (* old
- let candidates, smart_candidates =
- get_candidates ~smart:(not is_eq) depth
- flags status tcache signature gty in
- (* if the goal is an equation we avoid to apply unit equalities,
- since superposition should take care of them; refl is an
- exception since it prompts for convertibility *)
- let candidates =
- let test x = not (is_a_fact_ast status subst metasenv context x) in
- if is_eq then
- Ast.Ident("refl",None) ::List.filter test candidates
- else candidates in *)
- (* new *)
- let candidates, smart_candidates =
- get_candidates ~smart:true depth
- flags status tcache signature gty in
- (* if the goal is an equation we avoid to apply unit equalities,
- since superposition should take care of them; refl is an
- exception since it prompts for convertibility *)
- let candidates,smart_candidates =
- let test x = not (is_a_fact_ast status subst metasenv context x) in
- if is_eq then
- Ast.Ident("refl",None) ::List.filter test candidates,
- List.filter test smart_candidates
- else candidates,smart_candidates in
+ let candidates = get_candidates status tcache signature gty in
debug_print ~depth
(lazy ("candidates: " ^ string_of_int (List.length candidates)));
- debug_print ~depth
- (lazy ("smart candidates: " ^
- string_of_int (List.length smart_candidates)));
- (*
- let sm = 0 in
- let smart_candidates = [] in *)
- let sm = if is_eq then 0 else 2 in
- let maxd = ((depth + 1) = flags.maxdepth) in
- let only_one = flags.last && maxd in
- debug_print (lazy ("only_one: " ^ (string_of_bool only_one)));
- debug_print (lazy ("maxd: " ^ (string_of_bool maxd)));
- let elems =
+ let elems =
List.fold_left
(fun elems cand ->
- if (only_one && (elems <> [])) then elems
- else
- if (maxd && not(is_prod) &
- not(is_a_fact_ast status subst metasenv context cand))
- then (debug_print (lazy "pruned: not a fact"); elems)
- else
- match try_candidate (~smart:sm)
- flags depth status cache.unit_eq context cand with
- | None -> elems
- | Some x -> x::elems)
+ match try_candidate flags depth status cand with
+ | None -> elems
+ | Some x -> x::elems)
[] candidates
in
- let more_elems =
- if only_one && elems <> [] then elems
- else
- List.fold_left
- (fun elems cand ->
- if (only_one && (elems <> [])) then elems
- else
- if (maxd && not(is_prod) &&
- not(is_a_fact_ast status subst metasenv context cand))
- then (debug_print (lazy "pruned: not a fact"); elems)
- else
- match try_candidate (~smart:1)
- flags depth status cache.unit_eq context cand with
- | None -> elems
- | Some x -> x::elems)
- [] smart_candidates
- in
- elems@more_elems
+ elems
;;
exception Found
;;
(* gty is supposed to be meta-closed *)
-let is_subsumed depth status gty cache =
+let is_subsumed depth status gty (_,cache) =
if cache=[] then false else (
debug_print ~depth (lazy("Subsuming " ^ (ppterm status gty)));
let n,h,metasenv,subst,obj = status#obj in
try
let idx = List.assq ctx cache in
Ncic_termSet.elements
- (InvRelDiscriminationTree.retrieve_generalizations idx gty)
+ (InvRelDiscriminationTree.retrieve_generalizations idx gty)
with Not_found -> []
in
debug_print ~depth
(lazy ("failure candidates: " ^ string_of_int (List.length candidates)));
try
List.iter
- (fun t ->
- let _ , source = term_of_cic_term status t ctx in
- let implication =
- NCic.Prod("foo",source,target) in
- let metasenv,j,_,_ =
- NCicMetaSubst.mk_meta
- metasenv ctx ~with_type:implication `IsType in
- let status = status#set_obj (n,h,metasenv,subst,obj) in
- let status = status#set_stack [([1,Open j],[],[],`NoTag)] in
- try
- let status = NTactics.intro_tac "foo" status in
- let status =
- NTactics.apply_tac ("",0,Ast.NCic (NCic.Rel 1)) status
- in
- if (head_goals status#stack = []) then raise Found
- else ()
+ (fun t ->
+ let _ , source = term_of_cic_term status t ctx in
+ let implication =
+ NCic.Prod("foo",source,target) in
+ let metasenv,j,_,_ =
+ NCicMetaSubst.mk_meta
+ metasenv ctx ~with_type:implication `IsType in
+ let status = status#set_obj (n,h,metasenv,subst,obj) in
+ let status = status#set_stack [([1,Open j],[],[],`NoTag)] in
+ try
+ let status = NTactics.intro_tac "foo" status in
+ let status =
+ NTactics.apply_tac ("",0,Ast.NCic (NCic.Rel 1)) status
+ in
+ if (head_goals status#stack = []) then raise Found
+ else ()
with
- | Error _ -> ())
- candidates;false
+ | Error _ -> ())
+ candidates;false
with Found -> debug_print ~depth (lazy "success");true)
;;
+
+let equational_and_applicative_case
+ signature flags status g depth gty cache
+=
+ let elems =
+ if false (*is_equational_case gty flags*) then
+ let elems =
+ equational_case
+ signature status flags g gty cache
+ in
+ let more_elems =
+ applicative_case depth
+ signature status flags gty cache
+ in
+ elems@more_elems
+ else
+ let elems =
+ (*match LibraryObjects.eq_URI () with
+ | Some _ ->
+ smart_applicative_case dbd tables depth s fake_proof goalno
+ gty m context signature universe cache flags
+ | None -> *)
+ applicative_case depth
+ signature status flags gty cache
+ in
+ elems
+ in
+ let elems =
+ List.map (fun c,s,gl ->
+ c,1,1,s,List.map (fun i ->
+ let sort =
+ let gty = get_goalty s i in
+ let _, sort = typeof s (ctx_of gty) gty in
+ match term_of_cic_term s sort (ctx_of sort) with
+ | _, NCic.Sort NCic.Prop -> P
+ | _ -> T
+ in
+ i,sort) gl) elems
+ in
+ (* let elems = sort_new_elems elems in *)
+ elems, cache
+;;
+
let rec guess_name name ctx =
if name = "_" then guess_name "auto" ctx else
if not (List.mem_assoc name ctx) then name else
guess_name (name^"'") ctx
;;
-let is_prod status =
- let _, ctx, gty = current_goal status in
- let status, gty = apply_subst status ctx gty in
- let _, raw_gty = term_of_cic_term status gty ctx in
- match raw_gty with
- | NCic.Prod (name,src,_) ->
- let status, src = whd status ~delta:0 ctx (mk_cic_term ctx src) in
- (match snd (term_of_cic_term status src ctx) with
- | NCic.Const(NReference.Ref (_,NReference.Ind _) as r)
- | NCic.Appl (NCic.Const(NReference.Ref (_,NReference.Ind _) as r)::_) ->
- let _,_,itys,_,_ = NCicEnvironment.get_checked_indtys r in
- (match itys with
- (* | [_,_,_,[_;_]] con nat va, ovviamente, in loop *)
- | [_,_,_,[_]]
- | [_,_,_,[]] -> `Inductive (guess_name name ctx)
- | _ -> `Some (guess_name name ctx))
- | _ -> `Some (guess_name name ctx))
- | _ -> `None
-
-let intro ~depth status facts name =
+let intro ~depth status (tcache,fcache) name =
let status = NTactics.intro_tac name status in
- let _, ctx, ngty = current_goal status in
+ let open_goals = head_goals status#stack in
+ assert (List.length open_goals = 1);
+ let open_goal = List.hd open_goals in
+ let ngty = get_goalty status open_goal in
+ let ctx = ctx_of ngty in
let t = mk_cic_term ctx (NCic.Rel 1) in
let status, keys = keys_of_term status t in
- let facts = List.fold_left (add_to_th t) facts keys in
- debug_print ~depth (lazy ("intro: "^ name));
+ let tcache = List.fold_left (add_to_th t) tcache keys in
+ debug_print ~depth (lazy ("intro: "^ string_of_int open_goal));
(* unprovability is not stable w.r.t introduction *)
- status, facts
-;;
-
-let rec intros_facts ~depth status facts =
- if List.length (head_goals status#stack) <> 1 then status, facts else
- match is_prod status with
- | `Inductive name
- | `Some(name) ->
- let status,facts =
- intro ~depth status facts name
- in intros_facts ~depth status facts
-(* | `Inductive name ->
- let status = NTactics.case1_tac name status in
- intros_facts ~depth status facts *)
- | _ -> status, facts
-;;
-
-let intros ~depth status cache =
- match is_prod status with
- | `Inductive _
- | `Some _ ->
- let trace = cache.trace in
- let status,facts =
- intros_facts ~depth status cache.facts
- in
- if head_goals status#stack = [] then
- let status = NTactics.merge_tac status in
- [(0,Ast.Ident("__intros",None)),status], cache
- else
- (* we reindex the equation from scratch *)
- let unit_eq = index_local_equations status#eq_cache status in
- let status = NTactics.merge_tac status in
- [(0,Ast.Ident("__intros",None)),status],
- init_cache ~facts ~unit_eq () ~trace
- | _ -> [],cache
-;;
-
-let reduce ~whd ~depth status g =
+ status, (tcache,[])
+;;
+
+let rec intros ~depth status cache =
+ let open_goals = head_goals status#stack in
+ assert (List.length open_goals = 1);
+ let open_goal = List.hd open_goals in
+ let gty = get_goalty status open_goal in
+ let _, raw_gty = term_of_cic_term status gty (ctx_of gty) in
+ match raw_gty with
+ | NCic.Prod (name,_,_) ->
+ let status,cache =
+ intro ~depth status cache (guess_name name (ctx_of gty))
+ in intros ~depth status cache
+ | _ -> status, cache, open_goal
+;;
+
+let reduce ~depth status g =
let n,h,metasenv,subst,o = status#obj in
let attr, ctx, ty = NCicUtils.lookup_meta g metasenv in
let ty = NCicUntrusted.apply_subst subst ctx ty in
- let ty' =
- (if whd then NCicReduction.whd else NCicTacReduction.normalize) ~subst ctx ty
- in
+ let ty' = NCicReduction.whd ~subst ctx ty in
if ty = ty' then []
else
(debug_print ~depth
(g,(attr,ctx,ty'))::(List.filter (fun (i,_) -> i<>g) metasenv)
in
let status = status#set_obj (n,h,metasenv,subst,o) in
- (* we merge to gain a depth level; the previous goal level should
- be empty *)
- let status = NTactics.merge_tac status in
incr candidate_no;
- [(!candidate_no,Ast.Ident("__whd",None)),status])
+ [(!candidate_no,Ast.Implicit `JustOne),0,0,status,[g,P]])
;;
let do_something signature flags status g depth gty cache =
- let l0, cache = intros ~depth status cache in
- if l0 <> [] then l0, cache
- else
- (* whd *)
- let l = (*reduce ~whd:true ~depth status g @*) reduce ~whd:true ~depth status g in
- (* if l <> [] then l,cache else *)
- (* backward aplications *)
- let l1 =
- List.map
- (fun s ->
- incr candidate_no;
- ((!candidate_no,Ast.Ident("__paramod",None)),s))
- (auto_eq_check cache.unit_eq status)
- in
- let l2 =
- if ((l1 <> []) && flags.last) then [] else
- applicative_case depth signature status flags gty cache
+ let l = reduce ~depth status g in
+ let l1,cache =
+ (equational_and_applicative_case
+ signature flags status g depth gty cache)
in
- (* statistics *)
- List.iter
- (fun ((_,t),_) -> toref incr_nominations statistics t) l2;
- (* states in l1 have have an empty set of subgoals: no point to sort them *)
- debug_print ~depth
- (lazy ("alternatives = " ^ (string_of_int (List.length (l1@l@l2)))));
- (* l1 @ (sort_new_elems (l @ l2)), cache *)
- l1 @ (List.rev l2) @ l, cache
+ sort_new_elems (l@l1), cache
;;
let pp_goal = function
String.concat ", "
(List.map
(fun i ->
- let gty = get_goalty status i in
- NTacStatus.ppterm status gty)
+ let gty = get_goalty status i in
+ NTacStatus.ppterm status gty)
l)
;;
| [] -> assert false
| (goals, t, k, tag) :: s ->
let g = head_goals status#stack in
- let sortedg =
- (List.rev (MS.topological_sort g (deps status))) in
+ let sortedg =
+ (List.rev (MS.topological_sort g (deps status))) in
debug_print (lazy ("old g = " ^
String.concat "," (List.map string_of_int g)));
debug_print (lazy ("sorted goals = " ^
- String.concat "," (List.map string_of_int sortedg)));
- let is_it i = function
- | (_,Continuationals.Stack.Open j )
+ String.concat "," (List.map string_of_int sortedg)));
+ let is_it i = function
+ | (_,Continuationals.Stack.Open j )
| (_,Continuationals.Stack.Closed j ) -> i = j
- in
- let sorted_goals =
- List.map (fun i -> List.find (is_it i) goals) sortedg
- in
- (sorted_goals, t, k, tag) :: s
+ in
+ let sorted_goals =
+ List.map (fun i -> List.find (is_it i) goals) sortedg
+ in
+ (sorted_goals, t, k, tag) :: s
in
status#set_stack gstatus
;;
| [] -> assert false
| (g, t, k, tag) :: s ->
let is_open = function
- | (_,Continuationals.Stack.Open _) -> true
+ | (_,Continuationals.Stack.Open _) -> true
| (_,Continuationals.Stack.Closed _) -> false
- in
- let g' = List.filter is_open g in
- (g', t, k, tag) :: s
+ in
+ let g' = List.filter is_open g in
+ (g', t, k, tag) :: s
in
status#set_stack gstatus
;;
| [] -> assert false
| (g, t, k, tag) :: s ->
let in_focus = function
- | (_,Continuationals.Stack.Open i)
+ | (_,Continuationals.Stack.Open i)
| (_,Continuationals.Stack.Closed i) -> List.mem i focus
- in
+ in
let focus,others = List.partition in_focus g
- in
+ in
(* we need to mark it as a BranchTag, otherwise cannot merge later *)
- (focus,[],[],`BranchTag) :: (others, t, k, tag) :: s
+ (focus,[],[],`BranchTag) :: (others, t, k, tag) :: s
in
status#set_stack gstatus
;;
-let deep_focus_tac level focus status =
- let in_focus = function
- | (_,Continuationals.Stack.Open i)
- | (_,Continuationals.Stack.Closed i) -> List.mem i focus
- in
- let rec slice level gs =
- if level = 0 then [],[],gs else
- match gs with
- | [] -> assert false
- | (g, t, k, tag) :: s ->
- let f,o,gs = slice (level-1) s in
- let f1,o1 = List.partition in_focus g
- in
- (f1,[],[],`BranchTag)::f, (o1, t, k, tag)::o, gs
- in
- let gstatus =
- let f,o,s = slice level status#stack in f@o@s
- in
- status#set_stack gstatus
-;;
-
-let rec stack_goals level gs =
- if level = 0 then []
- else match gs with
- | [] -> assert false
- | (g,_,_,_)::s ->
- let is_open = function
- | (_,Continuationals.Stack.Open i) -> Some i
- | (_,Continuationals.Stack.Closed _) -> None
- in
- HExtlib.filter_map is_open g @ stack_goals (level-1) s
-;;
-
-let open_goals level status = stack_goals level status#stack
-;;
-
-let move_to_side level status =
-match status#stack with
- | [] -> assert false
- | (g,_,_,_)::tl ->
- let is_open = function
- | (_,Continuationals.Stack.Open i) -> Some i
- | (_,Continuationals.Stack.Closed _) -> None
- in
- let others = menv_closure status (stack_goals (level-1) tl) in
- List.for_all (fun i -> IntSet.mem i others)
- (HExtlib.filter_map is_open g)
-
-let rec auto_clusters ?(top=false)
+let rec auto_clusters
flags signature cache depth status : unit =
- debug_print ~depth (lazy ("entering auto clusters at depth " ^
- (string_of_int depth)));
- debug_print ~depth (pptrace cache.trace);
+ debug_print ~depth (lazy "entering auto clusters");
(* ignore(Unix.select [] [] [] 0.01); *)
let status = clean_up_tac status in
let goals = head_goals status#stack in
- if goals = [] then
- if depth = 0 then raise (Proved (status, cache.trace))
- else
- let status = NTactics.merge_tac status in
- let cache =
- let l,tree = cache.under_inspection in
- match l with
- | [] -> cache (* possible because of intros that cleans the cache *)
- | a::tl -> let tree = rm_from_th a tree a in
- {cache with under_inspection = tl,tree}
- in
- auto_clusters flags signature cache (depth-1) status
- else if List.length goals < 2 then
- auto_main flags signature cache depth status
+ if goals = [] then raise (Proved status)
+ else if depth = flags.maxdepth then raise (Gaveup IntSet.empty)
+ else if List.length goals < 2 then
+ auto_main flags signature cache depth status
else
- let all_goals = open_goals (depth+1) status in
debug_print ~depth (lazy ("goals = " ^
- String.concat "," (List.map string_of_int all_goals)));
- let classes = HExtlib.clusters (deps status) all_goals in
- List.iter
- (fun gl ->
- if List.length gl > flags.maxwidth then
- (debug_print ~depth (lazy "FAIL GLOBAL WIDTH");
- raise (Gaveup IntSet.empty))
- else ()) classes;
- if List.length classes = 1 then
- let flags =
- {flags with last = (List.length all_goals = 1)} in
- (* no need to cluster *)
- auto_main flags signature cache depth status
- else
- let classes = if top then List.rev classes else classes in
+ String.concat "," (List.map string_of_int goals)));
+ let classes = HExtlib.clusters (deps status) goals in
debug_print ~depth
- (lazy
- (String.concat "\n"
- (List.map
- (fun l ->
- ("cluster:" ^ String.concat "," (List.map string_of_int l)))
- classes)));
- let status,trace,b =
- List.fold_left
- (fun (status,trace,b) gl ->
- let cache = {cache with trace = trace} in
- let flags =
- {flags with last = (List.length gl = 1)} in
- let lold = List.length status#stack in
- debug_print ~depth (lazy ("stack length = " ^
- (string_of_int lold)));
- let fstatus = deep_focus_tac (depth+1) gl status in
- try
+ (lazy
+ (String.concat "\n"
+ (List.map
+ (fun l ->
+ ("cluster:" ^ String.concat "," (List.map string_of_int l)))
+ classes)));
+ let status =
+ List.fold_left
+ (fun status gl ->
+ let status = focus_tac gl status in
+ try
debug_print ~depth (lazy ("focusing on" ^
- String.concat "," (List.map string_of_int gl)));
- auto_main flags signature cache depth fstatus; assert false
- with
- | Proved(status,trace) ->
- let status = NTactics.merge_tac status in
- let lnew = List.length status#stack in
- assert (lold = lnew);
- (status,trace,true)
- | Gaveup _ when top -> (status,trace,b)
- )
- (status,cache.trace,false) classes
- in
- let rec final_merge n s =
- if n = 0 then s else final_merge (n-1) (NTactics.merge_tac s)
- in let status = final_merge depth status
- in if b then raise (Proved(status,trace)) else raise (Gaveup IntSet.empty)
+ String.concat "," (List.map string_of_int gl)));
+ auto_main flags signature cache depth status; status
+ with Proved(status) -> NTactics.merge_tac status)
+ status classes
+ in raise (Proved status)
and
-
-(* BRAND NEW VERSION *)
+
+(* let rec auto_main flags signature cache status k depth = *)
+
auto_main flags signature cache depth status: unit =
debug_print ~depth (lazy "entering auto main");
- debug_print ~depth (pptrace cache.trace);
- debug_print ~depth (lazy ("stack length = " ^
- (string_of_int (List.length status#stack))));
(* ignore(Unix.select [] [] [] 0.01); *)
let status = sort_tac (clean_up_tac status) in
let goals = head_goals status#stack in
match goals with
- | [] when depth = 0 -> raise (Proved (status,cache.trace))
- | [] ->
- let status = NTactics.merge_tac status in
- let cache =
- let l,tree = cache.under_inspection in
- match l with
- | [] -> cache (* possible because of intros that cleans the cache *)
- | a::tl -> let tree = rm_from_th a tree a in
- {cache with under_inspection = tl,tree}
- in
- auto_clusters flags signature cache (depth-1) status
- | orig::_ ->
- if depth > 0 && move_to_side depth status
- then
- let status = NTactics.merge_tac status in
- let cache =
- let l,tree = cache.under_inspection in
- match l with
- | [] -> cache (* possible because of intros that cleans the cache*)
- | a::tl -> let tree = rm_from_th a tree a in
- {cache with under_inspection = tl,tree}
- in
- auto_clusters flags signature cache (depth-1) status
- else
- let ng = List.length goals in
- (* moved inside auto_clusters *)
- if ng > flags.maxwidth then
- (print ~depth (lazy "FAIL LOCAL WIDTH"); raise (Gaveup IntSet.empty))
- else if depth = flags.maxdepth then
- raise (Gaveup IntSet.empty)
- else
- let status = NTactics.branch_tac ~force:true status in
- let g,gctx, gty = current_goal status in
- let ctx,ty = close status g in
- let closegty = mk_cic_term ctx ty in
- let status, gty = apply_subst status gctx gty in
- debug_print ~depth (lazy("Attacking goal " ^ (string_of_int g) ^" : "^ppterm status gty));
- if is_subsumed depth status closegty (snd cache.under_inspection) then
- (debug_print ~depth (lazy "SUBSUMED");
- raise (Gaveup IntSet.add g IntSet.empty))
+ | [] -> raise (Proved status)
+ | g::tlg ->
+ if depth = flags.maxdepth then raise (Gaveup IntSet.empty)
else
- let new_sig = height_of_goal g status in
- if new_sig < signature then
- (debug_print (lazy ("news = " ^ (string_of_int new_sig)));
- debug_print (lazy ("olds = " ^ (string_of_int signature))));
- let alternatives, cache =
+ let status =
+ if tlg=[] then status
+ else NTactics.branch_tac status in
+ let status, cache, g = intros ~depth status cache in
+ let gty = get_goalty status g in
+ let ctx,ty = close status g in
+ let closegty = mk_cic_term ctx ty in
+ let status, gty = apply_subst status (ctx_of gty) gty in
+ debug_print ~depth (lazy("Attacking goal " ^ (string_of_int g) ^" : "^ppterm status gty));
+ if is_subsumed depth status closegty cache then
+ (debug_print (lazy "SUBSUMED");
+ raise (Gaveup IntSet.add g IntSet.empty))
+ else
+ let alternatives, cache =
do_something signature flags status g depth gty cache in
- let loop_cache =
- let l,tree = cache.under_inspection in
- let l,tree = closegty::l, add_to_th closegty tree closegty in
- {cache with under_inspection = l,tree} in
- List.iter
- (fun ((_,t),status) ->
- debug_print ~depth
- (lazy ("(re)considering goal " ^
- (string_of_int g) ^" : "^ppterm status gty));
- debug_print (~depth:depth)
- (lazy ("Case: " ^ CicNotationPp.pp_term t));
- let depth,cache =
- if t=Ast.Ident("__whd",None) ||
- t=Ast.Ident("__intros",None)
- then depth, cache
- else depth+1,loop_cache in
- let cache = add_to_trace ~depth cache t in
- try
- auto_clusters flags signature cache depth status
- with Gaveup _ ->
- debug_print ~depth (lazy "Failed");
- ())
- alternatives;
- raise (debug_print(lazy "no more candidates"); Gaveup IntSet.empty)
+ let loop_cache =
+ let tcache,fcache = cache in
+ tcache,add_to_th closegty fcache closegty in
+ let unsat =
+ List.fold_left
+ (* the underscore information does not need to be returned
+ by do_something *)
+ (fun unsat ((_,t),_,_,status,_) ->
+ let depth',looping_cache =
+ if t=(Ast.Implicit `JustOne) then depth,cache
+ else depth+1, loop_cache in
+ debug_print (~depth:depth')
+ (lazy ("Case: " ^ CicNotationPp.pp_term t));
+ try auto_clusters flags signature loop_cache
+ depth' status; unsat
+ with
+ | Proved status ->
+ debug_print (~depth:depth') (lazy "proved");
+ if tlg=[] then raise (Proved status)
+ else
+ let status = NTactics.merge_tac status
+ in
+ ( (* old cache, here *)
+ try auto_clusters flags signature cache
+ depth status; assert false
+ with Gaveup f ->
+ debug_print ~depth
+ (lazy ("Unsat1 at depth " ^ (string_of_int depth)
+ ^ ": " ^
+ (pp_goals status (IntSet.elements f))));
+ (* TODO: cache failures *)
+ IntSet.union f unsat)
+ | Gaveup f ->
+ debug_print (~depth:depth')
+ (lazy ("Unsat2 at depth " ^ (string_of_int depth')
+ ^ ": " ^
+ (pp_goals status (IntSet.elements f))));
+ (* TODO: cache local failures *)
+ unsat)
+ IntSet.empty alternatives
+ in
+ raise (Gaveup IntSet.add g unsat)
;;
-
+
let int name l def =
try int_of_string (List.assoc name l)
with Failure _ | Not_found -> def
;;
-module AstSet = Set.Make(struct type t = Ast.term let compare = compare end)
-
-let cleanup_trace s trace =
- (* removing duplicates *)
- let trace_set =
- List.fold_left
- (fun acc t -> AstSet.add t acc)
- AstSet.empty trace in
- let trace = AstSet.elements trace_set
- (* filtering facts *)
- in List.filter
- (fun t ->
- match t with
- | Ast.NRef (NReference.Ref (u,_)) -> not (is_a_fact_obj s u)
- | _ -> false) trace
-;;
-
-let auto_tac ~params:(univ,flags) ?(trace_ref=ref []) status =
- let oldstatus = status in
- let status = (status:> NTacStatus.tac_status) in
+let auto_tac ~params:(_univ,flags) status =
let goals = head_goals status#stack in
- let status, facts = mk_th_cache status goals in
- let unit_eq = index_local_equations status#eq_cache status in
- let cache = init_cache ~facts ~unit_eq () in
-(* pp_th status facts; *)
+ let status, cache = mk_th_cache status goals in
+(* pp_th status cache; *)
(*
NDiscriminationTree.DiscriminationTree.iter status#auto_cache (fun p t ->
debug_print (lazy(
(NDiscriminationTree.TermSet.elements t))
)));
*)
- let candidates =
- match univ with
- | None -> None
- | Some l ->
- let to_Ast t =
- let status, res = disambiguate status [] t None in
- let _,res = term_of_cic_term status res (ctx_of res)
- in Ast.NCic res
- in Some (List.map to_Ast l)
- in
let depth = int "depth" flags 3 in
let size = int "size" flags 10 in
- let width = int "width" flags 4 (* (3+List.length goals)*) in
+ let width = int "width" flags (3+List.length goals) in
(* XXX fix sort *)
-(* let goals = List.map (fun i -> (i,P)) goals in *)
- let signature = height_of_goals status in
+ let goals = List.map (fun i -> (i,P)) goals in
+ let signature = () in
let flags = {
- last = true;
- candidates = candidates;
maxwidth = width;
maxsize = size;
maxdepth = depth;
if x > y then
(print(lazy
("TIME ELAPSED:"^string_of_float(Unix.gettimeofday()-.initial_time)));
- debug_print(lazy
+ print(lazy
("Applicative nodes:"^string_of_int !app_counter));
raise (Error (lazy "auto gave up", None)))
else
let _ = debug_print (lazy("\n\nRound "^string_of_int x^"\n")) in
let flags = { flags with maxdepth = x }
in
- try auto_clusters (~top:true) flags signature cache 0 status;assert false
-(*
- try auto_main flags signature cache 0 status;assert false
-*)
- with
- | Gaveup _ -> up_to (x+1) y
- | Proved (s,trace) ->
- debug_print (lazy ("proved at depth " ^ string_of_int x));
- List.iter (toref incr_uses statistics) trace;
- let trace = cleanup_trace s trace in
- let _ = debug_print (pptrace trace) in
+ try auto_clusters flags signature (cache,[]) 0 status;status
+ with
+ | Gaveup _ -> up_to (x+1) y
+ | Proved s ->
+ print (lazy ("proved at depth " ^ string_of_int x));
let stack =
- match s#stack with
- | (g,t,k,f) :: rest -> (filter_open g,t,k,f):: rest
- | _ -> assert false
+ match s#stack with
+ | (g,t,k,f) :: rest -> (filter_open g,t,k,f):: rest
+ | _ -> assert false
in
- let s = s#set_stack stack in
- trace_ref := trace;
- oldstatus#set_status s
+ s#set_stack stack
in
let s = up_to depth depth in
- debug_print (print_stat statistics);
- debug_print(lazy
+ print(lazy
("TIME ELAPSED:"^string_of_float(Unix.gettimeofday()-.initial_time)));
- debug_print(lazy
+ print(lazy
("Applicative nodes:"^string_of_int !app_counter));
s
;;
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val is_a_fact_obj:
- #NTacStatus.pstatus -> NUri.uri -> bool
-
-val fast_eq_check_tac:
- params:(NTacStatus.tactic_term list option * (string * string) list) ->
- 's NTacStatus.tactic
-
-val paramod_tac:
- params:(NTacStatus.tactic_term list option * (string * string) list) ->
- 's NTacStatus.tactic
-
-val demod_tac:
- params:(NTacStatus.tactic_term list option* (string * string) list) ->
- 's NTacStatus.tactic
-
-val smart_apply_tac:
- NTacStatus.tactic_term -> 's NTacStatus.tactic
-
-val auto_tac:
- params:(NTacStatus.tactic_term list option * (string * string) list) ->
- ?trace_ref:CicNotationPt.term list ref ->
- 's NTacStatus.tactic
-
-val keys_of_type:
- (#NTacStatus.pstatus as 'a) ->
- NTacStatus.cic_term -> 'a * NTacStatus.cic_term list
-
-helm_registry.cmi:
helm_registry.cmo: helm_registry.cmi
helm_registry.cmx: helm_registry.cmi
-helm_registry.cmi:
helm_registry.cmo: helm_registry.cmi
helm_registry.cmx: helm_registry.cmi
-utf8Macro.cmi:
-utf8MacroTable.cmo:
-utf8MacroTable.cmx:
-utf8Macro.cmo: utf8MacroTable.cmo utf8Macro.cmi
-utf8Macro.cmx: utf8MacroTable.cmx utf8Macro.cmi
+utf8Macro.cmi :
+utf8MacroTable.cmo :
+utf8MacroTable.cmx :
+utf8Macro.cmo : utf8MacroTable.cmo utf8Macro.cmi
+utf8Macro.cmx : utf8MacroTable.cmx utf8Macro.cmi
-utf8Macro.cmi:
-utf8MacroTable.cmo:
-utf8MacroTable.cmx:
utf8Macro.cmo: utf8MacroTable.cmx utf8Macro.cmi
utf8Macro.cmx: utf8MacroTable.cmx utf8Macro.cmi
-proofEngineTypes.cmi:
proofEngineHelpers.cmi: proofEngineTypes.cmi
-proofEngineReduction.cmi:
continuationals.cmi: proofEngineTypes.cmi
tacticals.cmi: proofEngineTypes.cmi
reductionTactics.cmi: proofEngineTypes.cmi
proofEngineStructuralRules.cmi: proofEngineTypes.cmi
primitiveTactics.cmi: proofEngineTypes.cmi
-hashtbl_equiv.cmi:
metadataQuery.cmi: proofEngineTypes.cmi
-universe.cmi:
autoTypes.cmi: proofEngineTypes.cmi
-autoCache.cmi:
-paramodulation/utils.cmi:
-closeCoercionGraph.cmi:
-paramodulation/subst.cmi:
paramodulation/equality.cmi: paramodulation/utils.cmi \
paramodulation/subst.cmi
paramodulation/founif.cmi: paramodulation/subst.cmi
auto.cmi: proofEngineTypes.cmi automationCache.cmi
destructTactic.cmi: proofEngineTypes.cmi
inversion.cmi: proofEngineTypes.cmi
-inversion_principle.cmi:
ring.cmi: proofEngineTypes.cmi
setoids.cmi: proofEngineTypes.cmi
-fourier.cmi:
fourierR.cmi: proofEngineTypes.cmi
fwdSimplTactic.cmi: proofEngineTypes.cmi
-history.cmi:
statefulProofEngine.cmi: proofEngineTypes.cmi
tactics.cmi: tacticals.cmi proofEngineTypes.cmi automationCache.cmi auto.cmi
declarative.cmi: proofEngineTypes.cmi automationCache.cmi auto.cmi
-proofEngineTypes.cmi:
proofEngineHelpers.cmi: proofEngineTypes.cmi
-proofEngineReduction.cmi:
continuationals.cmi: proofEngineTypes.cmi
tacticals.cmi: proofEngineTypes.cmi
reductionTactics.cmi: proofEngineTypes.cmi
proofEngineStructuralRules.cmi: proofEngineTypes.cmi
primitiveTactics.cmi: proofEngineTypes.cmi
-hashtbl_equiv.cmi:
metadataQuery.cmi: proofEngineTypes.cmi
-universe.cmi:
autoTypes.cmi: proofEngineTypes.cmi
-autoCache.cmi:
-paramodulation/utils.cmi:
-closeCoercionGraph.cmi:
-paramodulation/subst.cmi:
paramodulation/equality.cmi: paramodulation/utils.cmi \
paramodulation/subst.cmi
paramodulation/founif.cmi: paramodulation/subst.cmi
auto.cmi: proofEngineTypes.cmi automationCache.cmi
destructTactic.cmi: proofEngineTypes.cmi
inversion.cmi: proofEngineTypes.cmi
-inversion_principle.cmi:
ring.cmi: proofEngineTypes.cmi
setoids.cmi: proofEngineTypes.cmi
-fourier.cmi:
fourierR.cmi: proofEngineTypes.cmi
fwdSimplTactic.cmi: proofEngineTypes.cmi
-history.cmi:
statefulProofEngine.cmi: proofEngineTypes.cmi
tactics.cmi: tacticals.cmi proofEngineTypes.cmi automationCache.cmi auto.cmi
declarative.cmi: proofEngineTypes.cmi automationCache.cmi auto.cmi
| _ -> false
;;
-type auto_params = Cic.term list option * (string * string) list
+type auto_params = Cic.term list * (string * string) list
let elems = ref [] ;;
metasenv subst context t None)
automation_cache ct
in
- match restricted_univ with
- | None ->
- let ct =
- if use_context then find_context_theorems context metasenv else []
- in
- let lt =
- match use_library, dbd with
- | true, Some dbd -> find_library_theorems dbd metasenv goal
- | _ -> []
- in
- let cache = AutoCache.cache_empty in
- let cache = cache_add_list cache context (ct@lt) in
- let automation_cache =
- add_list_to_tables metasenv subst automation_cache ct
- in
+ if restricted_univ = [] then
+ let ct =
+ if use_context then find_context_theorems context metasenv else []
+ in
+ let lt =
+ match use_library, dbd with
+ | true, Some dbd -> find_library_theorems dbd metasenv goal
+ | _ -> []
+ in
+ let cache = AutoCache.cache_empty in
+ let cache = cache_add_list cache context (ct@lt) in
+ let automation_cache =
+ add_list_to_tables metasenv subst automation_cache ct
+ in
(* AutomationCache.pp_cache automation_cache; *)
- automation_cache.AutomationCache.univ,
- automation_cache.AutomationCache.tables,
- cache
- | Some restricted_univ ->
- let t_ty =
- List.map
- (fun t ->
- let ty, _ = CicTypeChecker.type_of_aux'
- metasenv ~subst:[] context t CicUniv.oblivion_ugraph
- in
- t, ty)
- restricted_univ
- in
- (* let automation_cache = AutomationCache.empty () in *)
- let automation_cache =
- let universe = Universe.empty in
- let universe =
- Universe.index_list universe context t_ty
- in
- { automation_cache with AutomationCache.univ = universe }
- in
- let ct =
- if use_context then find_context_theorems context metasenv else t_ty
- in
- let automation_cache =
- add_list_to_tables metasenv subst automation_cache ct
- in
+ automation_cache.AutomationCache.univ,
+ automation_cache.AutomationCache.tables,
+ cache
+ else
+ let t_ty =
+ List.map
+ (fun t ->
+ let ty, _ = CicTypeChecker.type_of_aux'
+ metasenv ~subst:[] context t CicUniv.oblivion_ugraph
+ in
+ t, ty)
+ restricted_univ
+ in
+ (* let automation_cache = AutomationCache.empty () in *)
+ let automation_cache =
+ let universe = Universe.empty in
+ let universe =
+ Universe.index_list universe context t_ty
+ in
+ { automation_cache with AutomationCache.univ = universe }
+ in
+ let ct =
+ if use_context then find_context_theorems context metasenv else t_ty
+ in
+ let automation_cache =
+ add_list_to_tables metasenv subst automation_cache ct
+ in
(* AutomationCache.pp_cache automation_cache; *)
- automation_cache.AutomationCache.univ,
- automation_cache.AutomationCache.tables,
- cache_empty
+ automation_cache.AutomationCache.univ,
+ automation_cache.AutomationCache.tables,
+ cache_empty
;;
let fill_hypothesis context metasenv subst term tables (universe:Universe.universe) cache auto fast =
(***************** applyS *******************)
let apply_smart_aux
- dbd automation_cache (params:auto_params) proof goal newmeta' metasenv' subst
+ dbd automation_cache params proof goal newmeta' metasenv' subst
context term' ty termty goal_arity
=
let consthead,newmetasenv,arguments,_ =
=
let ppterm = ppterm context in
try
- let params = (None,[]) in
+ let params = ([],[]) in
let automation_cache = {
AutomationCache.tables = tables ;
AutomationCache.univ = Universe.empty; }
let _,metasenv,subst,_,_, _ = proof in
let _,context,goalty = CicUtil.lookup_meta goal metasenv in
let signature = MetadataQuery.signature_of metasenv goal in
- let signature =
- match univ with
- | None -> signature
- | Some l ->
- List.fold_left
- (fun set t ->
- let ty, _ =
- CicTypeChecker.type_of_aux' metasenv context t
- CicUniv.oblivion_ugraph
- in
- MetadataConstraints.UriManagerSet.union set
- (MetadataConstraints.constants_of ty)
- )
- signature l
+ let signature =
+ List.fold_left
+ (fun set t ->
+ let ty, _ =
+ CicTypeChecker.type_of_aux' metasenv context t
+ CicUniv.oblivion_ugraph
+ in
+ MetadataConstraints.UriManagerSet.union set
+ (MetadataConstraints.constants_of ty)
+ )
+ signature univ
in
let tables,cache =
if flags.close_more then
* http://cs.unibo.it/helm/.
*)
-type auto_params = Cic.term list option * (string * string) list
+type auto_params = Cic.term list * (string * string) list
val auto_tac:
dbd:HSql.dbd ->
| `Term just -> Tactics.apply just
| `SolveWith term ->
Tactics.demodulate ~automation_cache ~dbd
- ~params:(Some [term],
+ ~params:([term],
["all","1";"steps","1"; "use_context","false"])
| `Proof ->
Tacticals.id_tac
-threadSafe.cmi:
-extThread.cmi:
threadSafe.cmo: threadSafe.cmi
threadSafe.cmx: threadSafe.cmi
extThread.cmo: extThread.cmi
-threadSafe.cmi:
-extThread.cmi:
threadSafe.cmo: threadSafe.cmi
threadSafe.cmx: threadSafe.cmi
extThread.cmo: extThread.cmi
parser.cmi: ast.cmo
-parserTHF.cmi: astTHF.cmo
-tptp2grafite.cmi:
-ast.cmo:
-ast.cmx:
lexer.cmo: parser.cmi
lexer.cmx: parser.cmx
-astTHF.cmo:
-astTHF.cmx:
-lexerTHF.cmo: parserTHF.cmi
-lexerTHF.cmx: parserTHF.cmx
parser.cmo: ast.cmo parser.cmi
parser.cmx: ast.cmx parser.cmi
-parserTHF.cmo: astTHF.cmo parserTHF.cmi
-parserTHF.cmx: astTHF.cmx parserTHF.cmi
tptp2grafite.cmo: parser.cmi lexer.cmo ast.cmo tptp2grafite.cmi
tptp2grafite.cmx: parser.cmx lexer.cmx ast.cmx tptp2grafite.cmi
parser.cmi: ast.cmx
-tptp2grafite.cmi:
-ast.cmo:
-ast.cmx:
lexer.cmo: parser.cmi
lexer.cmx: parser.cmx
parser.cmo: ast.cmx parser.cmi
PACKAGE = tptp_grafite
PREDICATES =
-INTERFACE_FILES= parser.mli parserTHF.mli tptp2grafite.mli
+INTERFACE_FILES= parser.mli tptp2grafite.mli
-IMPLEMENTATION_FILES = ast.ml lexer.ml astTHF.ml lexerTHF.ml $(INTERFACE_FILES:%.mli=%.ml)
+IMPLEMENTATION_FILES = ast.ml lexer.ml $(INTERFACE_FILES:%.mli=%.ml)
EXTRA_OBJECTS_TO_INSTALL =
EXTRA_OBJECTS_TO_CLEAN =
-TPTPDIR= /home/$(USER)/work-area/TPTP-v4.0.1/
+TPTPDIR= /home/$(USER)/work-area/TPTP-v3.2.0/
-all: tptp2grafite mainTHF
-clean: clean_tests clean_generated
-
-clean_generated:
- rm -f parser.mli parser.ml parserTHF.mli parserTHF.ml
- rm -f lexer.ml lexerTHF.ml
+all: tptp2grafite
+clean: clean_tests
clean_tests:
rm -f tptp2grafite
-lexer.cmo: parser.cmi
-lexer.cmx: parser.cmi
-lexerTHF.cmo: parserTHF.cmi
-lexerTHF.cmx: parserTHF.cmi
-
-%.mli %.ml: %.mly
- ocamlyacc $*.mly
-%.ml:%.mll
- ocamllex $*.mll
+parser.mli parser.ml:parser.mly
+ ocamlyacc parser.mly
+lexer.ml:
+ ocamllex lexer.mll
LOCAL_LINKOPTS = -package helm-$(PACKAGE) -linkpkg
tptp2grafite: main.ml tptp_grafite.cma
@echo " OCAMLC $<"
@$(OCAMLC) $(LOCAL_LINKOPTS) -o $@ $<
-mainTHF: mainTHF.ml tptp_grafite.cma
- @echo " OCAMLC $<"
- @$(OCAMLC) $(LOCAL_LINKOPTS) -o $@ $<
-
-test: tptp2grafite mainTHF
+test: tptp2grafite
testall: tptp2grafite
for X in `cat unit_equality_problems`; do\
> /dev/null || echo Failed: $$X; \
done
-thf:
- rm -rf THF
- mkdir THF
- for x in `cat thf_problems`; do\
- echo $$x;\
- ./mainTHF -tptppath $(TPTPDIR) $$x.p > THF/$$x.ma;\
- done
-
include ../../Makefile.defs
include ../Makefile.common
+++ /dev/null
-type role =
- Axiom
-| Hypothesis
-| Definition
-| Assumption
-| Lemma
-| Theorem
-| Conjecture
-| Negated_conjecture
-| Lemma_conjecture
-| Plain
-| Fi_domain
-| Fi_functors
-| Fi_predicates
-| Type
-| Unknown
-
-
-type ast =
- | ThfFormula of string * role * CicNotationPt.term
- | ThfDefinition of string * string * CicNotationPt.term
- | ThfType of string * string * CicNotationPt.term
- | Comment of string
- | Inclusion of string * (string list)
+++ /dev/null
-{
- open ParserTHF
- exception BadToken of string
-
- let incr_linenum lexbuf =
- let pos = lexbuf.Lexing.lex_curr_p in
- lexbuf.Lexing.lex_curr_p <- { pos with
- Lexing.pos_lnum = pos.Lexing.pos_lnum + 1;
- Lexing.pos_bol = pos.Lexing.pos_cnum;
- }
- ;;
-
-}
-
-let dust = ' ' | '\t'
-let comment = '%' [^ '\n' ] * '\n'
-let lname =
- ['a'-'z'] ['a'-'z''A'-'Z''0'-'9''_']*
-let uname =
- ['A'-'Z'] ['a'-'z''A'-'Z''0'-'9''_']*
-let qstring = ''' [^ ''' ]+ '''
-let type_ =
- "axiom" | "hypothesis" | "definition" | "lemma" | "theorem" |
- "conjecture" | "lemma_conjecture" | "negated_conjecture" |
- "plain" | "unknown" | "type"
-
-let ieq = "="
-let peq = "equal"
-let nieq = "!="
-
-rule yylex = parse
- | dust { yylex lexbuf }
- | '\n' { incr_linenum lexbuf; yylex lexbuf }
- | comment { incr_linenum lexbuf; COMMENT (Lexing.lexeme lexbuf) }
- | "include" { INCLUSION }
- | type_ { TYPE (Lexing.lexeme lexbuf) }
- | "thf" { THF }
- | "$true" { TRUE }
- | "$false" { FALSE }
- | "equal" { PEQ }
-
- | "$i" { TYPE_I }
- | "$o" { TYPE_O }
- | "$tType" { TYPE_U }
- | ">" { TO }
-
- | lname { LNAME (Lexing.lexeme lexbuf) }
- | uname { UNAME (Lexing.lexeme lexbuf) }
-
- | ['0' - '9']+ { NUM (int_of_string (Lexing.lexeme lexbuf)) }
- | ',' { COMMA }
- | '.' { DOT }
- | '(' { LPAREN }
- | ')' { RPAREN }
- | '|' { IOR }
- | '&' { IAND }
- | '~' { NOT }
- | '=' { IEQ }
- | "=>" { IMPLY }
- | "<=" { IMPLYLR }
- | "<=>" { COIMPLY }
- | "<~>" { XOR }
- | "!=" { NIEQ }
- | "!" { FORALL }
- | "?" { EXISTS }
- | "!" { FORALL }
- | "^" { LAMBDA }
- | "[" { BEGINVARLIST }
- | "]" { ENDVARLIST }
- | ":" { COLON }
- | "," { COMMA }
- | "@" { APPLY }
- | qstring { QSTRING (Lexing.lexeme lexbuf) }
- | eof { EOF }
- | _ { raise (BadToken (Lexing.lexeme lexbuf)) }
-
-{ (* trailer *) }
+++ /dev/null
-module T = CicNotationPt
-module GA = GrafiteAst
-module A = AstTHF
-
-let floc = HExtlib.dummy_floc;;
-
-(* OPTIONS *)
-let tptppath = ref "./";;
-let ng = ref false;;
-let spec = [
- ("-ng",Arg.Set ng,"Matita ng syntax");
- ("-tptppath",
- Arg.String (fun x -> tptppath := x),
- "Where to find the Axioms/ and Problems/ directory")
-]
-
-let resolve ~tptppath s =
- if s.[0] = '/' then s else
- let resolved_name =
- if Filename.check_suffix s ".p" then
- (assert (String.length s > 5);
- let prefix = String.sub s 0 3 in
- tptppath ^ "/Problems/" ^ prefix ^ "/" ^ s)
- else
- tptppath ^ "/" ^ s
- in
- if HExtlib.is_regular resolved_name then
- resolved_name
- else
- begin
- prerr_endline ("Unable to find " ^ s ^ " (" ^ resolved_name ^ ")");
- exit 1
- end
-;;
-
-
-let find_related id =
- HExtlib.filter_map_monad
- (fun acc -> function
- | A.ThfDefinition (_,did,dbody) when did = id -> Some dbody, None
- | A.ThfType (_,did,dtype) when did = id -> Some dtype, None
- | x -> acc, Some x)
-;;
-
-(* MAIN *)
-let _ =
- let usage = "Usage: tptpTHF2grafite [options] file" in
- let inputfile = ref "" in
- Arg.parse spec (fun s -> inputfile := s) usage;
- if !inputfile = "" then
- begin
- prerr_endline usage;
- exit 1
- end;
- let tptppath = !tptppath in
- let statements =
- let rec aux = function
- | [] -> []
- | ((A.Inclusion (file,_)) as hd) :: tl ->
- let file = resolve ~tptppath file in
- let lexbuf = Lexing.from_channel (open_in file) in
- let statements = ParserTHF.main LexerTHF.yylex lexbuf in
- hd :: aux (statements @ tl)
- | hd::tl -> hd :: aux tl
- in
- aux [A.Inclusion (!inputfile,[])]
- in
- let statements =
- let rec aux = function
- | [] -> []
- | A.Comment s :: tl ->
- let s = Pcre.replace ~pat:"\n" ~templ:"" s in
- let s = Pcre.replace ~pat:"\\*\\)" ~templ:"" s in
- GA.Comment (floc,GA.Note (floc,s)) :: aux tl
- | A.Inclusion (s,_) :: tl ->
- GA.Comment (
- floc, GA.Note (
- floc,"Inclusion of: " ^ s)) :: aux tl
- | A.ThfType(name,id,ty) :: tl ->
- let body, tl = find_related id None tl in
- let what = match body with None -> `Axiom | _ -> `Definition in
- GA.Executable(floc,
- GA.NCommand(floc,
- GA.NObj(floc,
- T.Theorem(what, id,ty,body,`Regular)))) :: aux tl
- | A.ThfDefinition(name,id,body) :: tl ->
- let ty, tl = find_related id None tl in
- let ty = match ty with Some x -> x | None -> T.Implicit `JustOne in
- GA.Executable(floc,
- GA.NCommand(floc,
- GA.NObj(floc,
- T.Theorem(`Definition,
- id,ty,Some body,`Regular)))):: aux tl
- | A.ThfFormula(name,(A.Axiom|A.Hypothesis|A.Assumption),term) :: tl ->
- GA.Executable(floc,
- GA.NCommand(floc,
- GA.NObj(floc,
- T.Theorem(`Axiom, name,term,None,`Regular)))):: aux tl
- | A.ThfFormula(name,A.Conjecture,term) :: tl ->
- GA.Executable(floc,
- GA.NCommand(floc,
- GA.NObj(floc,
- T.Theorem(`Theorem, name,
- term,None,`Regular)))):: aux tl
- | A.ThfFormula _ :: tl -> assert false
- in
- aux statements
- in
- let pp t =
- (* ZACK: setting width to 80 will trigger a bug of BoxPp.render_to_string
- * which will show up using the following command line:
- * ./tptp2grafite -tptppath ~tassi/TPTP-v3.1.1 GRP170-1 *)
- let width = max_int in
- let term_pp prec content_term =
- let pres_term = TermContentPres.pp_ast content_term in
- let lookup_uri = fun _ -> None in
- let markup = CicNotationPres.render ~lookup_uri ~prec pres_term in
- let s = BoxPp.render_to_string List.hd width markup ~map_unicode_to_tex:false in
- Pcre.substitute
- ~rex:(Pcre.regexp ~flags:[`UTF8] "∀[Ha-z][a-z0-9_]*") ~subst:(fun x -> "\n" ^ x)
- s
- in
- CicNotationPp.set_pp_term (term_pp 90);
- let lazy_term_pp = fun x -> assert false in
- let obj_pp = CicNotationPp.pp_obj CicNotationPp.pp_term in
- Pcre.replace ~pat:"^theorem" ~templ:"ntheorem"
- (Pcre.replace ~pat:"^axiom" ~templ:"naxiom"
- (Pcre.replace ~pat:"^definition" ~templ:"ndefinition"
- (Pcre.replace ~pat:"Type \\\\sub ([0-9]+)" ~templ:"Type[$1]"
- (GrafiteAstPp.pp_statement
- ~map_unicode_to_tex:false
- ~term_pp:(term_pp 19) ~lazy_term_pp ~obj_pp t))))
- in
- print_endline (pp (GA.Executable (floc,
- GA.Command(floc,GA.Include(floc,true,`OldAndNew,"TPTP.ma")))));
- List.iter (fun x -> print_endline (pp x)) statements;
- exit 0
-
+++ /dev/null
-%{
- (* header *)
- open AstTHF
- open Parsing
- open Lexing
- module T = CicNotationPt
-
- let parse_error s = Printf.eprintf "%s: " s ;;
- let rm_q s = String.sub s 1 (String.length s - 2) ;;
-
-let reserved = [
- "in","In";
- "to","To";
- "theorem","Theorem";
-];;
-
-let unreserve k =
- try List.assoc k reserved with Not_found -> k
-;;
-
-
-%}
- %token <string> TYPE
- %token <string> COMMENT
- %token <int> NUM
- %token <string> LNAME
- %token <string> UNAME
- %token <string> QSTRING
- %token COMMA
- %token INCLUSION
- %token LPAREN
- %token RPAREN
- %token CNF
- %token TRUE
- %token FALSE
- %token NOT
- %token IAND
- %token IOR
- %token NIEQ
- %token IEQ
- %token XOR
- %token IMPLY
- %token IMPLYLR
- %token COIMPLY
- %token PEQ
- %token DOT
- %token EOF
- %token FORALL
- %token EXISTS
- %token LAMBDA
- %token COLON
- %token BEGINVARLIST
- %token ENDVARLIST
- %token APPLY
- %token TYPE_I
- %token TYPE_O
- %token TYPE_U
- %token TO
- %token THF
-
- %left IOR
- %left IAND
- %nonassoc NOT
- %right TO
- %left APPLY
-
- %type <AstTHF.ast list> main
- %start main
-%%
- main:
- | tptp_input EOF {[$1]}
- | tptp_input main {$1::$2}
- | error {
- let start_pos = rhs_start_pos 1 in
- let end_pos = rhs_end_pos 1 in
- Printf.eprintf "from line %d char %d to line %d char %d\n"
- start_pos.pos_lnum (start_pos.pos_cnum - start_pos.pos_bol)
- end_pos.pos_lnum (end_pos.pos_cnum - end_pos.pos_bol);
- exit 1
- }
- ;
-
- tptp_input:
- | annot_formula {$1}
- | include_ {$1}
- | comment {$1}
- ;
-
- formula_source_and_infos:
- | { () }
- | COMMA { assert false }
- ;
-
- annot_formula:
- | THF LPAREN name COMMA formula_type COMMA
- term formula_source_and_infos RPAREN DOT {
- match $5 with
- | Definition ->
- (match $7 with
- | T.Appl [T.Symbol("Eq",_);T.Ident(name,_);body] ->
- ThfDefinition($3,unreserve name,body)
- | _ -> prerr_endline ("near " ^ $3); assert false)
- | Type ->
- (match $7 with
- | T.Cast (T.Ident(name,_),ty) -> ThfType($3,unreserve name,ty)
- | _ -> assert false)
- | _ -> ThfFormula($3,$5,$7)
- }
- ;
-
- formula_type:
- | TYPE {
- match $1 with
- | "axiom" -> Axiom
- | "hypothesis" -> Hypothesis
- | "definition" -> Definition
- | "lemma" -> Lemma
- | "theorem" -> Theorem
- | "conjecture" -> Conjecture
- | "lemma_conjecture" -> Lemma_conjecture
- | "negated_conjecture" -> Negated_conjecture
- | "plain" -> Plain
- | "unknown" -> Unknown
- | "type" -> Type
- | _ -> assert false
- }
- ;
-
- quantifier :
- | FORALL {`Forall}
- | EXISTS {`Exists}
- | LAMBDA {`Lambda}
-
- vardecl :
- | UNAME { T.Ident($1,None), None }
- | UNAME COLON term { T.Ident($1,None),Some $3 }
-
- varlist :
- | vardecl { [$1] }
- | vardecl COMMA varlist { $1 :: $3 }
-
- term:
- | quantifier BEGINVARLIST varlist ENDVARLIST COLON term {
- List.fold_right (fun v t -> T.Binder($1,v,t)) $3 $6
- }
- | term APPLY term {
- match $1 with
- | T.Appl l -> T.Appl (l @ [$3])
- | x -> T.Appl ([$1; $3])
- }
- | LPAREN term COLON term RPAREN { T.Cast ($2,$4) }
- | term TO term { T.Binder (`Forall,(T.Ident("_",None),Some $1),$3) }
- | term IMPLY term { T.Binder (`Forall,(T.Ident("_",None),Some $1),$3) }
- | term IMPLYLR term { T.Binder (`Forall,(T.Ident("_",None),Some $3),$1) }
- | term COIMPLY term { T.Appl [T.Symbol("Iff",0);$1;$3] }
- | term XOR term { T.Appl [T.Symbol("Xor",0);$1;$3] }
- | term IEQ term { T.Appl [T.Symbol("Eq",0);$1;$3] }
- | term NIEQ term { T.Appl [T.Symbol("NotEq",0);$1;$3] }
- | term IAND term { T.Appl [T.Symbol("And",0);$1;$3] }
- | term IOR term { T.Appl [T.Symbol("Or",0);$1;$3] }
- | NOT term { T.Appl [T.Symbol("Not",0);$2] }
- | LPAREN term RPAREN {$2}
- | LNAME { T.Ident(unreserve $1,None) }
- | UNAME { T.Ident($1,None) }
- | TYPE_I { T.Symbol("i",0) }
- | TYPE_O { T.Symbol("o",0) }
- | TYPE_U { T.Sort (`NType "0") }
- | FALSE { T.Symbol("False",0)}
- | TRUE { T.Symbol("True",0)}
- ;
-
- include_:
- | INCLUSION LPAREN QSTRING selection_of_formulae RPAREN DOT {
- let fname = rm_q $3 in
- Inclusion (fname,$4)
- }
- ;
-
- selection_of_formulae:
- | { [] }
- | COMMA name selection_of_formulae { $2::$3 }
- ;
-
- comment: COMMENT {Comment $1} ;
-
- name: NUM { string_of_int $1} | LNAME { $1 } | UNAME { $1 } ;
-%%
- (* trailer *)
+++ /dev/null
-SWV438^1
-SWV443^1
-SWV425^2
-SWV428^2
-SWV432^2
-SWV428^1
-SWV431^2
-SWV430^1
-SWV436^3
-SWV439^1
-SWV441^1
-SWV432^1
-SWV426^4
-SWV427^2
-SWV433^1
-SWV427^1
-SWV435^3
-SWV426^3
-SWV444^1
-SWV429^1
-SWV426^2
-SWV430^2
-SWV437^1
-SWV425^1
-SWV440^1
-SWV429^2
-SWV447^1
-SWV426^1
-SWV446^1
-SWV434^3
-SWV442^1
-SWV433^2
-SWV431^1
-SWV436^4
-SWV445^1
-SWV435^4
-SWV434^4
-SYO272^5
-SYO337^5
-SYO130^5
-SYO408^1
-SYO147^5
-SYO466^1
-SYO188^5
-SYO174^5
-SYO165^5
-SYO466^2
-SYO432^1
-SYO228^5
-SYO120^5
-SYO436^1
-SYO184^5
-SYO296^5
-SYO483^6
-SYO284^5
-SYO462^1
-SYO465^1
-SYO278^5
-SYO471^2
-SYO453^5
-SYO217^5
-SYO314^5
-SYO160^5
-SYO302^5
-SYO367^5
-SYO064^4.001
-SYO048^1
-SYO065^4.003
-SYO176^5
-SYO092^5
-SYO245^5
-SYO131^5
-SYO002^1
-SYO063^4
-SYO234^5
-SYO472^4
-SYO159^5
-SYO062^4.003
-SYO424^1
-SYO304^5
-SYO155^5
-SYO468^4
-SYO455^5
-SYO425^1
-SYO457^2
-SYO050^1
-SYO201^5
-SYO112^5
-SYO454^4
-SYO071^4.001
-SYO009^1
-SYO182^5
-SYO482^6
-SYO499^1
-SYO205^5
-SYO462^2
-SYO067^4.004
-SYO193^5
-SYO311^5
-SYO455^2
-SYO049^1
-SYO163^5
-SYO401^1
-SYO455^3
-SYO473^5
-SYO146^5
-SYO305^5
-SYO471^6
-SYO451^6
-SYO241^5
-SYO462^4
-SYO042^1
-SYO448^1
-SYO012^1
-SYO275^5
-SYO026^1
-SYO395^1
-SYO021^1
-SYO065^4.001
-SYO464^2
-SYO010^1
-SYO058^4
-SYO313^5
-SYO303^5
-SYO294^5
-SYO032^1
-SYO232^5
-SYO342^5
-SYO454^2
-SYO463^1
-SYO239^5
-SYO468^3
-SYO379^5
-SYO186^5
-SYO339^5
-SYO455^6
-SYO427^1
-SYO298^5
-SYO397^1
-SYO473^6
-SYO183^5
-SYO461^6
-SYO354^5
-SYO317^5
-SYO100^5
-SYO465^2
-SYO386^5
-SYO474^5
-SYO416^1
-SYO149^5
-SYO464^4
-SYO098^5
-SYO223^5
-SYO450^1
-SYO437^1
-SYO074^4.003
-SYO451^2
-SYO472^6
-SYO462^6
-SYO224^5
-SYO081^5
-SYO085^5
-SYO316^5
-SYO127^5
-SYO072^4.001
-SYO363^5
-SYO072^4.003
-SYO469^2
-SYO216^5
-SYO212^5
-SYO450^6
-SYO373^5
-SYO400^1
-SYO461^2
-SYO290^5
-SYO210^5
-SYO252^5
-SYO221^5
-SYO046^1
-SYO415^1
-SYO069^4.002
-SYO022^1
-SYO460^6
-SYO420^1
-SYO459^6
-SYO478^6
-SYO168^5
-SYO315^5
-SYO403^1
-SYO177^5
-SYO465^5
-SYO079^5
-SYO097^5
-SYO001^1
-SYO348^5
-SYO069^4.001
-SYO454^6
-SYO467^2
-SYO164^5
-SYO497^6
-SYO262^5
-SYO452^6
-SYO464^3
-SYO019^1
-SYO450^4
-SYO291^5
-SYO070^4.003
-SYO471^1
-SYO116^5
-SYO393^1
-SYO114^5
-SYO003^1
-SYO471^4
-SYO453^2
-SYO285^5
-SYO371^5
-SYO173^5
-SYO005^1
-SYO470^3
-SYO271^5
-SYO431^1
-SYO070^4.004
-SYO144^5
-SYO326^5
-SYO269^5
-SYO204^5
-SYO466^6
-SYO004^1
-SYO101^5
-SYO102^5
-SYO484^6
-SYO438^1
-SYO451^1
-SYO074^4.001
-SYO494^6
-SYO109^5
-SYO074^4.002
-SYO067^4.002
-SYO345^5
-SYO052^2
-SYO106^5
-SYO334^5
-SYO189^5
-SYO351^5
-SYO222^5
-SYO378^5
-SYO170^5
-SYO459^4
-SYO470^6
-SYO452^1
-SYO445^1
-SYO380^5
-SYO076^5
-SYO329^5
-SYO029^1
-SYO208^5
-SYO258^5
-SYO073^4.004
-SYO479^6
-SYO467^6
-SYO467^1
-SYO248^5
-SYO207^5
-SYO306^5
-SYO199^5
-SYO444^1
-SYO015^1
-SYO381^5
-SYO051^1
-SYO470^1
-SYO064^4.002
-SYO468^5
-SYO251^5
-SYO453^4
-SYO136^5
-SYO054^2
-SYO218^5
-SYO451^4
-SYO336^5
-SYO430^1
-SYO064^4.004
-SYO171^5
-SYO071^4.002
-SYO469^3
-SYO119^5
-SYO469^5
-SYO105^5
-SYO069^4.003
-SYO061^4
-SYO073^4.003
-SYO008^1
-SYO419^1
-SYO175^5
-SYO288^5
-SYO031^1
-SYO040^1
-SYO358^5
-SYO331^5
-SYO385^5
-SYO292^5
-SYO020^1
-SYO071^4.004
-SYO471^5
-SYO068^4.020
-SYO384^5
-SYO074^4.004
-SYO418^1
-SYO157^5
-SYO247^5
-SYO423^1
-SYO067^4.001
-SYO065^4.002
-SYO023^1
-SYO135^5
-SYO410^1
-SYO362^5
-SYO459^3
-SYO198^5
-SYO140^5
-SYO254^5
-SYO452^3
-SYO280^5
-SYO192^5
-SYO094^5
-SYO088^5
-SYO153^5
-SYO376^5
-SYO346^5
-SYO399^1
-SYO043^1
-SYO377^5
-SYO454^1
-SYO255^5
-SYO489^6
-SYO325^5
-SYO066^4.004
-SYO034^1
-SYO220^5
-SYO369^5
-SYO456^6
-SYO396^1
-SYO498^6
-SYO203^5
-SYO481^6
-SYO055^2
-SYO166^5
-SYO470^5
-SYO495^6
-SYO200^5
-SYO457^1
-SYO412^1
-SYO117^5
-SYO413^1
-SYO458^4
-SYO460^1
-SYO472^5
-SYO493^6
-SYO073^4.001
-SYO405^1
-SYO191^5
-SYO382^5
-SYO268^5
-SYO287^5
-SYO389^5
-SYO394^1
-SYO141^5
-SYO457^5
-SYO454^3
-SYO219^5
-SYO213^5
-SYO426^1
-SYO062^4.004
-SYO257^5
-SYO006^1
-SYO073^4.002
-SYO025^1
-SYO142^5
-SYO129^5
-SYO229^5
-SYO087^5
-SYO250^5
-SYO320^5
-SYO473^1
-SYO267^5
-SYO392^1
-SYO122^5
-SYO450^5
-SYO417^1
-SYO319^5
-SYO463^6
-SYO321^5
-SYO356^5
-SYO167^5
-SYO274^5
-SYO469^1
-SYO467^5
-SYO113^5
-SYO035^1
-SYO488^6
-SYO347^5
-SYO256^5
-SYO107^5
-SYO099^5
-SYO045^1
-SYO458^3
-SYO041^1
-SYO007^1
-SYO039^1
-SYO143^5
-SYO472^2
-SYO068^4.001
-SYO428^1
-SYO332^5
-SYO235^5
-SYO065^4.004
-SYO452^4
-SYO490^6
-SYO295^5
-SYO178^5
-SYO464^5
-SYO162^5
-SYO349^5
-SYO324^5
-SYO447^1
-SYO069^4.004
-SYO457^3
-SYO264^5
-SYO366^5
-SYO158^5
-SYO463^5
-SYO226^5
-SYO333^5
-SYO463^3
-SYO472^3
-SYO110^5
-SYO465^3
-SYO471^3
-SYO335^5
-SYO341^5
-SYO322^5
-SYO473^4
-SYO078^5
-SYO309^5
-SYO279^5
-SYO297^5
-SYO474^3
-SYO350^5
-SYO018^1
-SYO187^5
-SYO340^5
-SYO103^5
-SYO353^5
-SYO123^5
-SYO240^5
-SYO458^6
-SYO475^6
-SYO456^1
-SYO054^1
-SYO086^5
-SYO231^5
-SYO154^5
-SYO391^5
-SYO451^5
-SYO080^5
-SYO312^5
-SYO491^6
-SYO462^3
-SYO249^5
-SYO474^2
-SYO460^5
-SYO033^1
-SYO476^6
-SYO458^5
-SYO487^6
-SYO059^4
-SYO172^5
-SYO028^1
-SYO180^5
-SYO121^5
-SYO206^5
-SYO352^5
-SYO024^1
-SYO470^2
-SYO453^3
-SYO273^5
-SYO263^5
-SYO406^1
-SYO450^2
-SYO460^4
-SYO011^1
-SYO066^4.002
-SYO075^5
-SYO093^5
-SYO237^5
-SYO179^5
-SYO374^5
-SYO328^5
-SYO429^1
-SYO458^1
-SYO443^1
-SYO050^2
-SYO343^5
-SYO323^5
-SYO053^1
-SYO082^5
-SYO067^4.003
-SYO108^5
-SYO261^5
-SYO387^5
-SYO449^1
-SYO238^5
-SYO407^1
-SYO276^5
-SYO084^5
-SYO467^3
-SYO051^2
-SYO435^1
-SYO474^6
-SYO115^5
-SYO056^2
-SYO244^5
-SYO243^5
-SYO464^6
-SYO037^1
-SYO465^4
-SYO111^5
-SYO462^5
-SYO456^4
-SYO458^2
-SYO038^1
-SYO132^5
-SYO473^2
-SYO027^1
-SYO190^5
-SYO197^5
-SYO195^5
-SYO030^1
-SYO286^5
-SYO134^5
-SYO368^5
-SYO456^3
-SYO460^3
-SYO307^5
-SYO344^5
-SYO355^5
-SYO202^5
-SYO365^5
-SYO095^5
-SYO253^5
-SYO459^1
-SYO057^1
-SYO246^5
-SYO442^1
-SYO053^2
-SYO152^5
-SYO070^4.001
-SYO474^1
-SYO066^4.003
-SYO468^6
-SYO300^5
-SYO125^5
-SYO470^4
-SYO402^1
-SYO440^1
-SYO456^2
-SYO214^5
-SYO308^5
-SYO070^4.002
-SYO375^5
-SYO468^2
-SYO016^1
-SYO383^5
-SYO467^4
-SYO090^5
-SYO242^5
-SYO148^5
-SYO196^5
-SYO453^1
-SYO047^1
-SYO370^5
-SYO145^5
-SYO194^5
-SYO126^5
-SYO139^5
-SYO466^3
-SYO485^6
-SYO455^4
-SYO017^1
-SYO066^4.001
-SYO486^6
-SYO209^5
-SYO461^5
-SYO169^5
-SYO433^1
-SYO265^5
-SYO225^5
-SYO459^2
-SYO064^4.003
-SYO057^2
-SYO472^1
-SYO463^4
-SYO450^3
-SYO469^6
-SYO452^5
-SYO161^5
-SYO460^2
-SYO071^4.003
-SYO496^6
-SYO260^5
-SYO301^5
-SYO466^4
-SYO062^4.002
-SYO185^5
-SYO461^3
-SYO211^5
-SYO357^5
-SYO454^5
-SYO089^5
-SYO360^5
-SYO137^5
-SYO455^1
-SYO457^6
-SYO289^5
-SYO474^4
-SYO388^5
-SYO414^1
-SYO451^3
-SYO118^5
-SYO463^2
-SYO277^5
-SYO327^5
-SYO421^1
-SYO464^1
-SYO151^5
-SYO283^5
-SYO133^5
-SYO124^5
-SYO227^5
-SYO338^5
-SYO409^1
-SYO404^1
-SYO236^5
-SYO266^5
-SYO138^5
-SYO128^5
-SYO270^5
-SYO068^4.010
-SYO230^5
-SYO468^1
-SYO330^5
-SYO456^5
-SYO068^4.005
-SYO310^5
-SYO398^1
-SYO215^5
-SYO459^5
-SYO461^4
-SYO318^5
-SYO500^1
-SYO361^5
-SYO473^3
-SYO156^5
-SYO422^1
-SYO434^1
-SYO453^6
-SYO364^5
-SYO411^1
-SYO052^1
-SYO072^4.004
-SYO469^4
-SYO441^1
-SYO457^4
-SYO055^1
-SYO060^4
-SYO390^5
-SYO044^1
-SYO077^5
-SYO181^5
-SYO096^5
-SYO359^5
-SYO013^1
-SYO372^5
-SYO480^6
-SYO282^5
-SYO461^1
-SYO293^5
-SYO439^1
-SYO056^1
-SYO072^4.002
-SYO477^6
-SYO465^6
-SYO233^5
-SYO150^5
-SYO091^5
-SYO281^5
-SYO259^5
-SYO452^2
-SYO492^6
-SYO466^5
-SYO446^1
-SYO104^5
-SYO083^5
-SYO299^5
-LCL613^1
-LCL690^1
-LCL612^1
-LCL600^1
-LCL586^1
-LCL739^5
-LCL718^1
-LCL606^1
-LCL615^1
-LCL618^1
-LCL585^1
-LCL587^1
-LCL623^1
-LCL583^1
-LCL742^5
-LCL230^4
-LCL723^1
-LCL594^1
-LCL624^1
-LCL737^5
-LCL634^1
-LCL584^1
-LCL703^1
-LCL695^1
-LCL607^1
-LCL692^1
-LCL593^1
-LCL591^1
-LCL604^1
-LCL698^1
-LCL706^1
-LCL720^1
-LCL694^1
-LCL588^1
-LCL708^1
-LCL626^1
-LCL595^1
-LCL711^1
-LCL621^1
-LCL596^1
-LCL732^5
-LCL693^1
-LCL710^1
-LCL590^1
-LCL741^5
-LCL731^5
-LCL740^5
-LCL629^1
-LCL627^1
-LCL738^5
-LCL735^5
-LCL743^5
-LCL619^1
-LCL592^1
-LCL699^1
-LCL609^1
-LCL598^1
-LCL705^1
-LCL697^1
-LCL724^1
-LCL721^1
-LCL712^1
-LCL730^5
-LCL625^1
-LCL691^1
-LCL614^1
-LCL715^1
-LCL580^1
-LCL736^5
-LCL716^1
-LCL599^1
-LCL631^1
-LCL597^1
-LCL700^1
-LCL582^1
-LCL696^1
-LCL603^1
-LCL608^1
-LCL717^1
-LCL727^5
-LCL704^1
-LCL632^1
-LCL733^5
-LCL713^1
-LCL601^1
-LCL729^5
-LCL714^1
-LCL725^1
-LCL630^1
-LCL709^1
-LCL620^1
-LCL728^5
-LCL602^1
-LCL726^5
-LCL581^1
-LCL719^1
-LCL707^1
-LCL633^1
-LCL617^1
-LCL722^1
-LCL701^1
-LCL702^1
-LCL181^4
-LCL611^1
-LCL589^1
-LCL734^5
-LCL579^1
-SYN987^1
-SYN977^4
-SYN731^5
-SYN392^4
-SYN992^1
-SYN007^4.014
-SYN045^4
-SYN386^5
-SYN393^4.003
-SYN416^4
-SYN381^5
-SYN049^5
-SYN046^4
-SYN983^1
-SYN374^5
-SYN382^5
-SYN064^5
-SYN393^4.004
-SYN997^1
-SYN998^1
-SYN978^4
-SYN055^5
-SYN389^4
-SYN984^1
-SYN036^5
-SYN001^4.003
-SYN363^5
-SYN358^5
-SYN001^4.004
-SYN996^1
-SYN988^1
-SYN361^5
-SYN355^5
-SYN391^4
-SYN041^4
-SYN991^1
-SYN390^4
-SYN388^4
-SYN364^5
-SYN001^4.001
-SYN040^4
-SYN989^2
-SYN988^2
-SYN365^5
-SYN044^4
-SYN995^1
-SYN387^4
-SYN000^1
-SYN985^1
-SYN357^5
-SYN393^4.002
-SYN990^1
-SYN001^4.002
-SYN360^5
-SYN047^4
-SYN059^5
-SYN375^5
-SYN000^2
-SYN057^5
-SYN994^1
-SYN356^5
-SYN987^2
-SYN058^5
-SYN051^5
-SYN989^1
-SYN916^4
-SYN377^5
-SYN999^1
-SYN915^4
-SYN056^5
-SYN732^5
-SYN993^1
-ALG282^5
-ALG298^5
-ALG256^1
-ALG248^1
-ALG268^4
-ALG290^5
-ALG258^2
-ALG249^3
-ALG251^3
-ALG278^5
-ALG265^2
-ALG257^1
-ALG275^5
-ALG272^5
-ALG270^5
-ALG263^1
-ALG264^2
-ALG266^1
-ALG266^2
-ALG261^2
-ALG292^5
-ALG274^5
-ALG258^1
-ALG253^2
-ALG260^1
-ALG268^1
-ALG251^1
-ALG285^5
-ALG277^5
-ALG263^2
-ALG280^5
-ALG287^5
-ALG284^5
-ALG267^2
-ALG289^5
-ALG286^5
-ALG254^2
-ALG269^2
-ALG257^2
-ALG252^2
-ALG251^2
-ALG288^5
-ALG273^5
-ALG248^3
-ALG268^5
-ALG268^3
-ALG297^5
-ALG269^3
-ALG259^2
-ALG295^5
-ALG281^5
-ALG296^5
-ALG269^4
-ALG001^5
-ALG262^2
-ALG294^5
-ALG254^1
-ALG293^5
-ALG276^5
-ALG264^3
-ALG264^1
-ALG269^1
-ALG253^1
-ALG250^3
-ALG271^5
-ALG283^5
-ALG255^1
-ALG260^2
-ALG268^6
-ALG259^1
-ALG279^5
-ALG263^3
-ALG248^2
-ALG261^1
-ALG247^2
-ALG252^1
-ALG256^2
-ALG291^5
-ALG268^2
-ALG267^1
-GRP001^5
-SEV236^5
-SEV341^5
-SEV299^5
-SEV206^5
-SEV069^5
-SEV251^5
-SEV309^5
-SEV286^5
-SEV356^5
-SEV227^5
-SEV102^5
-SEV040^5
-SEV157^5
-SEV055^5
-SEV059^5
-SEV303^5
-SEV008^5
-SEV129^5
-SEV262^5
-SEV099^5
-SEV295^5
-SEV047^5
-SEV337^5
-SEV006^5
-SEV390^5
-SEV339^5
-SEV306^5
-SEV193^5
-SEV345^5
-SEV138^5
-SEV241^5
-SEV344^5
-SEV070^5
-SEV121^5
-SEV253^5
-SEV403^5
-SEV229^5
-SEV016^5
-SEV273^5
-SEV035^5
-SEV134^5
-SEV252^5
-SEV272^5
-SEV145^5
-SEV338^5
-SEV304^5
-SEV208^5
-SEV233^5
-SEV131^5
-SEV077^5
-SEV413^5
-SEV392^5
-SEV122^5
-SEV275^5
-SEV051^5
-SEV065^5
-SEV380^5
-SEV329^5
-SEV120^5
-SEV048^5
-SEV343^5
-SEV375^5
-SEV014^5
-SEV147^5
-SEV033^5
-SEV091^5
-SEV287^5
-SEV290^5
-SEV311^5
-SEV152^5
-SEV115^5
-SEV171^5
-SEV360^5
-SEV310^5
-SEV036^5
-SEV342^5
-SEV293^5
-SEV271^5
-SEV294^5
-SEV011^5
-SEV210^5
-SEV219^5
-SEV226^5
-SEV019^5
-SEV354^5
-SEV186^5
-SEV312^5
-SEV175^5
-SEV325^5
-SEV018^5
-SEV334^5
-SEV137^5
-SEV280^5
-SEV201^5
-SEV258^5
-SEV034^5
-SEV288^5
-SEV263^5
-SEV100^5
-SEV410^5
-SEV140^5
-SEV020^5
-SEV216^5
-SEV142^5
-SEV162^5
-SEV195^5
-SEV406^5
-SEV355^5
-SEV202^5
-SEV265^5
-SEV071^5
-SEV317^5
-SEV281^5
-SEV207^5
-SEV296^5
-SEV007^5
-SEV298^5
-SEV073^5
-SEV083^5
-SEV028^5
-SEV139^5
-SEV221^5
-SEV234^5
-SEV119^5
-SEV245^5
-SEV373^5
-SEV319^5
-SEV400^5
-SEV151^5
-SEV094^5
-SEV218^5
-SEV377^5
-SEV165^5
-SEV358^5
-SEV246^5
-SEV090^5
-SEV143^5
-SEV079^5
-SEV062^5
-SEV114^5
-SEV331^5
-SEV209^5
-SEV057^5
-SEV243^5
-SEV402^5
-SEV188^5
-SEV023^5
-SEV418^5
-SEV166^5
-SEV316^5
-SEV395^5
-SEV178^5
-SEV156^5
-SEV066^5
-SEV061^5
-SEV323^5
-SEV397^5
-SEV126^5
-SEV283^5
-SEV414^5
-SEV135^5
-SEV371^5
-SEV060^5
-SEV387^5
-SEV068^5
-SEV256^5
-SEV074^5
-SEV198^5
-SEV044^5
-SEV108^5
-SEV124^5
-SEV001^5
-SEV179^5
-SEV197^5
-SEV385^5
-SEV043^5
-SEV200^5
-SEV314^5
-SEV112^5
-SEV277^5
-SEV411^5
-SEV012^5
-SEV089^5
-SEV105^5
-SEV184^5
-SEV381^5
-SEV204^5
-SEV169^5
-SEV223^5
-SEV086^5
-SEV024^5
-SEV106^5
-SEV285^5
-SEV097^5
-SEV374^5
-SEV230^5
-SEV003^5
-SEV328^5
-SEV075^5
-SEV333^5
-SEV146^5
-SEV396^5
-SEV389^5
-SEV181^5
-SEV103^5
-SEV196^5
-SEV408^5
-SEV340^5
-SEV274^5
-SEV409^5
-SEV203^5
-SEV087^5
-SEV282^5
-SEV407^5
-SEV353^5
-SEV168^5
-SEV249^5
-SEV096^5
-SEV133^5
-SEV125^5
-SEV379^5
-SEV199^5
-SEV067^5
-SEV362^5
-SEV350^5
-SEV404^5
-SEV010^5
-SEV365^5
-SEV352^5
-SEV098^5
-SEV026^5
-SEV084^5
-SEV078^5
-SEV158^5
-SEV419^5
-SEV153^5
-SEV161^5
-SEV113^5
-SEV191^5
-SEV190^5
-SEV017^5
-SEV056^5
-SEV307^5
-SEV412^5
-SEV013^5
-SEV394^5
-SEV318^5
-SEV111^5
-SEV058^5
-SEV349^5
-SEV167^5
-SEV361^5
-SEV369^5
-SEV388^5
-SEV150^5
-SEV085^5
-SEV052^5
-SEV242^5
-SEV046^5
-SEV330^5
-SEV382^5
-SEV192^5
-SEV239^5
-SEV118^5
-SEV320^5
-SEV417^5
-SEV027^5
-SEV391^5
-SEV093^5
-SEV183^5
-SEV127^5
-SEV176^5
-SEV212^5
-SEV050^5
-SEV004^5
-SEV015^5
-SEV081^5
-SEV235^5
-SEV261^5
-SEV370^5
-SEV141^5
-SEV185^5
-SEV259^5
-SEV163^5
-SEV025^5
-SEV187^5
-SEV000^5
-SEV238^5
-SEV080^5
-SEV315^5
-SEV278^5
-SEV031^5
-SEV301^5
-SEV297^5
-SEV250^5
-SEV332^5
-SEV363^5
-SEV364^5
-SEV170^5
-SEV326^5
-SEV228^5
-SEV155^5
-SEV030^5
-SEV130^5
-SEV267^5
-SEV205^5
-SEV064^5
-SEV289^5
-SEV042^5
-SEV092^5
-SEV231^5
-SEV159^5
-SEV132^5
-SEV095^5
-SEV401^5
-SEV254^5
-SEV292^5
-SEV291^5
-SEV110^5
-SEV128^5
-SEV107^5
-SEV211^5
-SEV041^5
-SEV247^5
-SEV372^5
-SEV045^5
-SEV109^5
-SEV257^5
-SEV376^5
-SEV225^5
-SEV321^5
-SEV279^5
-SEV039^5
-SEV268^5
-SEV240^5
-SEV386^5
-SEV378^5
-SEV327^5
-SEV313^5
-SEV104^5
-SEV154^5
-SEV393^5
-SEV305^5
-SEV222^5
-SEV368^5
-SEV116^5
-SEV255^5
-SEV177^5
-SEV217^5
-SEV260^5
-SEV182^5
-SEV123^5
-SEV136^5
-SEV002^5
-SEV101^5
-SEV284^5
-SEV220^5
-SEV148^5
-SEV032^5
-SEV322^5
-SEV244^5
-SEV117^5
-SEV053^5
-SEV324^5
-SEV276^5
-SEV248^5
-SEV172^5
-SEV149^5
-SEV054^5
-SEV346^5
-SEV357^5
-SEV348^5
-SEV021^5
-SEV405^5
-SEV384^5
-SEV232^5
-SEV029^5
-SEV308^5
-SEV383^5
-SEV270^5
-SEV072^5
-SEV088^5
-SEV144^5
-SEV359^5
-SEV160^5
-SEV180^5
-SEV237^5
-SEV173^5
-SEV224^5
-SEV266^5
-SEV269^5
-SEV214^5
-SEV367^5
-SEV076^5
-SEV336^5
-SEV022^5
-SEV194^5
-SEV063^5
-SEV038^5
-SEV398^5
-SEV215^5
-SEV351^5
-SEV264^5
-SEV174^5
-SEV082^5
-SEV415^5
-SEV009^5
-SEV164^5
-SEV399^5
-SEV347^5
-SEV213^5
-SEV189^5
-SEV049^5
-SEV335^5
-SEV005^5
-SEV037^5
-SEV366^5
-SEV302^5
-SEV416^5
-SEV300^5
-SET171^3
-SET612^3
-SET587^5
-SET008^5
-SET636^5
-SET683^3
-SET647^3
-SET624^5
-SET621^5
-SET604^5
-SET557^1
-SET585^5
-SET606^5
-SET616^5
-SET027^5
-SET657^3
-SET200^5
-SET753^4
-SET586^5
-SET593^5
-SET063^5
-SET605^5
-SET680^3
-SET615^5
-SET613^5
-SET589^5
-SET724^4
-SET582^5
-SET629^5
-SET557^5
-SET618^5
-SET591^5
-SET014^4
-SET598^5
-SET592^5
-SET171^5
-SET185^5
-SET628^5
-SET609^5
-SET594^5
-SET606^3
-SET199^5
-SET615^3
-SET162^5
-SET066^1
-SET044^5
-SET011^5
-SET631^5
-SET614^3
-SET580^5
-SET752^4
-SET619^5
-SET143^5
-SET611^3
-SET067^1
-SET599^5
-SET196^5
-SET183^5
-SET603^5
-SET086^1
-SET669^3
-SET580^3
-SET009^5
-SET596^5
-SET673^3
-SET590^5
-SET622^5
-SET610^5
-SET194^5
-SET635^5
-SET595^5
-SET608^5
-SET607^5
-SET716^4
-SET169^5
-SET741^4
-SET624^3
-SET626^5
-SET201^5
-SET588^5
-SET634^5
-SET640^3
-SET601^5
-SET764^4
-SET649^3
-SET017^1
-SET614^5
-SET648^3
-SET607^3
-SET625^5
-SET630^3
-SET175^5
-SET627^5
-SET671^3
-SET143^3
-SET584^5
-SET043^5
-SET623^5
-SET646^3
-SET620^5
-SET623^3
-SET747^4
-SET597^5
-SET062^5
-SET096^1
-SET010^5
-SET173^5
-SET076^1
-SET014^5
-SET633^5
-SET651^3
-SET144^5
-SET159^5
-SET045^5
-SET672^3
-SET632^5
-SET670^3
-SET617^5
-SET630^5
-SET638^5
-SET600^5
-SET684^3
-SET609^3
-SET046^5
-SET601^3
-SET612^5
-SET611^5
-COM024^5
-GRA039^2
-GRA032^1
-GRA062^2
-GRA065^1
-GRA059^2
-GRA039^1
-GRA073^1
-GRA037^1
-GRA068^2
-GRA048^1
-GRA057^2
-GRA060^1
-GRA036^1
-GRA032^2
-GRA043^1
-GRA070^1
-GRA067^1
-GRA051^1
-GRA051^2
-GRA046^1
-GRA050^1
-GRA055^2
-GRA073^2
-GRA033^2
-GRA053^2
-GRA041^2
-GRA044^2
-GRA064^1
-GRA074^1
-GRA068^1
-GRA057^1
-GRA049^2
-GRA041^1
-GRA028^1
-GRA045^2
-GRA048^2
-GRA031^2
-GRA038^1
-GRA058^1
-GRA074^2
-GRA058^2
-GRA047^1
-GRA049^1
-GRA072^1
-GRA063^1
-GRA044^1
-GRA030^1
-GRA027^1
-GRA035^2
-GRA064^2
-GRA038^2
-GRA052^1
-GRA033^1
-GRA071^1
-GRA047^2
-GRA052^2
-GRA063^2
-GRA071^2
-GRA069^2
-GRA070^2
-GRA043^2
-GRA062^1
-GRA037^2
-GRA059^1
-GRA065^2
-GRA042^1
-GRA050^2
-GRA034^1
-GRA031^1
-GRA029^2
-GRA029^1
-GRA061^2
-GRA040^2
-GRA054^2
-GRA034^2
-GRA046^2
-GRA072^2
-GRA040^1
-GRA056^2
-GRA066^2
-GRA060^2
-GRA056^1
-GRA066^1
-GRA055^1
-GRA053^1
-GRA036^2
-GRA061^1
-GRA035^1
-GRA042^2
-GRA045^1
-GRA054^1
-GRA067^2
-GRA069^1
-PUZ096^5
-PUZ120^5
-PUZ110^5
-PUZ125^5
-PUZ090^5
-PUZ093^5
-PUZ111^5
-PUZ122^5
-PUZ099^5
-PUZ081^3
-PUZ109^5
-PUZ082^1
-PUZ085^1
-PUZ083^1
-PUZ117^5
-PUZ102^5
-PUZ105^5
-PUZ113^5
-PUZ091^5
-PUZ108^5
-PUZ097^5
-PUZ047^5
-PUZ094^5
-PUZ081^2
-PUZ106^5
-PUZ101^5
-PUZ112^5
-PUZ031^5
-PUZ118^5
-PUZ100^5
-PUZ124^5
-PUZ123^5
-PUZ116^5
-PUZ126^5
-PUZ103^5
-PUZ127^5
-PUZ089^5
-PUZ114^5
-PUZ119^5
-PUZ081^1
-PUZ088^5
-PUZ115^5
-PUZ087^1
-PUZ098^5
-PUZ092^5
-PUZ086^1
-PUZ095^5
-PUZ104^5
-PUZ084^1
-PUZ121^5
-PUZ107^5
-SEU546^1
-SEU666^2
-SEU918^5
-SEU543^2
-SEU659^2
-SEU819^2
-SEU852^5
-SEU929^5
-SEU873^5
-SEU965^5
-SEU949^5
-SEU732^1
-SEU713^2
-SEU490^1
-SEU778^2
-SEU975^5
-SEU560^1
-SEU663^1
-SEU673^1
-SEU787^1
-SEU957^5
-SEU741^2
-SEU629^2
-SEU792^1
-SEU684^2
-SEU553^2
-SEU854^5
-SEU800^1
-SEU470^1
-SEU790^2
-SEU974^5
-SEU888^5
-SEU552^1
-SEU832^5
-SEU700^1
-SEU591^2
-SEU587^1
-SEU771^2
-SEU952^5
-SEU712^1
-SEU608^2
-SEU784^2
-SEU579^1
-SEU718^2
-SEU827^1
-SEU656^1
-SEU697^1
-SEU660^1
-SEU637^1
-SEU594^1
-SEU791^1
-SEU548^2
-SEU665^1
-SEU495^1
-SEU865^5
-SEU472^1
-SEU740^2
-SEU463^1
-SEU904^5
-SEU502^2
-SEU499^1
-SEU970^5
-SEU546^2
-SEU513^1
-SEU512^1
-SEU548^1
-SEU634^1
-SEU761^2
-SEU921^5
-SEU619^1
-SEU588^1
-SEU571^1
-SEU740^1
-SEU706^1
-SEU769^1
-SEU989^5
-SEU871^5
-SEU695^1
-SEU642^2
-SEU526^1
-SEU824^2
-SEU465^1
-SEU759^1
-SEU953^5
-SEU513^2
-SEU643^1
-SEU503^2
-SEU645^2
-SEU684^1
-SEU569^2
-SEU452^1
-SEU799^2
-SEU928^5
-SEU651^2
-SEU968^5
-SEU916^5
-SEU702^2
-SEU863^5
-SEU644^2
-SEU917^5
-SEU774^2
-SEU940^5
-SEU461^1
-SEU464^1
-SEU670^2
-SEU743^1
-SEU650^1
-SEU663^2
-SEU543^1
-SEU922^5
-SEU826^1
-SEU609^2
-SEU747^2
-SEU582^1
-SEU942^5
-SEU931^5
-SEU550^1
-SEU941^5
-SEU920^5
-SEU626^1
-SEU605^2
-SEU950^5
-SEU770^2
-SEU717^2
-SEU607^2
-SEU466^1
-SEU818^2
-SEU788^2
-SEU530^2
-SEU563^2
-SEU866^5
-SEU633^1
-SEU596^1
-SEU807^1
-SEU848^5
-SEU597^2
-SEU725^2
-SEU535^1
-SEU685^2
-SEU676^2
-SEU615^2
-SEU935^5
-SEU884^5
-SEU653^1
-SEU696^2
-SEU673^2
-SEU655^1
-SEU721^2
-SEU558^2
-SEU575^2
-SEU640^1
-SEU521^1
-SEU804^1
-SEU875^5
-SEU741^1
-SEU514^1
-SEU674^1
-SEU664^1
-SEU788^1
-SEU593^2
-SEU487^1
-SEU575^1
-SEU913^5
-SEU812^2
-SEU523^2
-SEU946^5
-SEU705^2
-SEU674^2
-SEU841^5
-SEU905^5
-SEU629^1
-SEU619^2
-SEU693^1
-SEU512^2
-SEU579^2
-SEU462^1
-SEU493^1
-SEU627^2
-SEU500^2
-SEU577^1
-SEU699^1
-SEU767^1
-SEU885^5
-SEU803^1
-SEU565^2
-SEU816^1
-SEU820^2
-SEU793^2
-SEU760^2
-SEU783^1
-SEU816^2
-SEU892^5
-SEU707^1
-SEU881^5
-SEU622^2
-SEU563^1
-SEU644^1
-SEU606^2
-SEU855^5
-SEU765^1
-SEU636^1
-SEU507^2
-SEU769^2
-SEU776^1
-SEU668^1
-SEU723^2
-SEU744^2
-SEU582^2
-SEU497^1
-SEU843^5
-SEU677^1
-SEU692^1
-SEU610^1
-SEU786^1
-SEU688^2
-SEU636^2
-SEU600^2
-SEU577^2
-SEU726^2
-SEU906^5
-SEU992^5
-SEU901^5
-SEU625^2
-SEU574^2
-SEU589^1
-SEU737^1
-SEU479^1
-SEU539^2
-SEU729^1
-SEU729^2
-SEU511^1
-SEU638^2
-SEU880^5
-SEU555^1
-SEU939^5
-SEU998^5
-SEU504^2
-SEU679^1
-SEU823^1
-SEU701^1
-SEU710^2
-SEU768^2
-SEU573^2
-SEU525^1
-SEU648^2
-SEU786^2
-SEU558^1
-SEU706^2
-SEU510^2
-SEU712^2
-SEU976^5
-SEU926^5
-SEU652^1
-SEU990^5
-SEU822^2
-SEU962^5
-SEU637^2
-SEU635^2
-SEU753^2
-SEU853^5
-SEU477^1
-SEU584^1
-SEU590^2
-SEU640^2
-SEU800^2
-SEU567^2
-SEU986^5
-SEU802^1
-SEU574^1
-SEU569^1
-SEU538^2
-SEU993^5
-SEU724^1
-SEU762^1
-SEU628^2
-SEU655^2
-SEU641^2
-SEU654^1
-SEU494^1
-SEU604^2
-SEU676^1
-SEU578^2
-SEU623^2
-SEU625^1
-SEU956^5
-SEU780^1
-SEU778^1
-SEU744^1
-SEU724^2
-SEU524^2
-SEU459^1
-SEU478^1
-SEU908^5
-SEU847^5
-SEU669^1
-SEU987^5
-SEU588^2
-SEU810^1
-SEU509^1
-SEU639^1
-SEU481^1
-SEU523^1
-SEU981^5
-SEU647^2
-SEU995^5
-SEU626^2
-SEU671^1
-SEU802^2
-SEU787^2
-SEU750^2
-SEU603^1
-SEU586^2
-SEU882^5
-SEU687^1
-SEU711^2
-SEU638^1
-SEU609^1
-SEU585^2
-SEU746^2
-SEU831^5
-SEU733^1
-SEU742^2
-SEU710^1
-SEU766^1
-SEU809^2
-SEU564^2
-SEU912^5
-SEU680^1
-SEU507^1
-SEU476^1
-SEU948^5
-SEU611^1
-SEU622^1
-SEU678^1
-SEU570^1
-SEU836^5
-SEU780^2
-SEU639^2
-SEU624^1
-SEU878^5
-SEU902^5
-SEU654^2
-SEU483^1
-SEU988^5
-SEU814^2
-SEU890^5
-SEU667^1
-SEU945^5
-SEU934^5
-SEU782^1
-SEU595^1
-SEU551^1
-SEU489^1
-SEU704^2
-SEU969^5
-SEU746^1
-SEU821^1
-SEU725^1
-SEU534^1
-SEU496^1
-SEU554^1
-SEU757^1
-SEU977^5
-SEU618^1
-SEU947^5
-SEU565^1
-SEU549^1
-SEU506^2
-SEU595^2
-SEU803^2
-SEU685^1
-SEU606^1
-SEU594^2
-SEU698^1
-SEU761^1
-SEU732^2
-SEU642^1
-SEU616^1
-SEU840^5
-SEU797^2
-SEU527^1
-SEU469^1
-SEU933^5
-SEU722^2
-SEU943^5
-SEU547^1
-SEU653^2
-SEU659^1
-SEU615^1
-SEU628^1
-SEU717^1
-SEU796^1
-SEU571^2
-SEU966^5
-SEU752^1
-SEU893^5
-SEU783^2
-SEU541^1
-SEU735^1
-SEU756^1
-SEU500^1
-SEU822^1
-SEU869^5
-SEU518^1
-SEU561^1
-SEU475^1
-SEU651^1
-SEU883^5
-SEU728^1
-SEU754^2
-SEU899^5
-SEU515^2
-SEU891^5
-SEU508^2
-SEU667^2
-SEU566^1
-SEU657^1
-SEU503^1
-SEU806^1
-SEU731^1
-SEU598^1
-SEU557^1
-SEU844^5
-SEU996^5
-SEU486^1
-SEU682^1
-SEU779^2
-SEU658^2
-SEU567^1
-SEU610^2
-SEU887^5
-SEU781^1
-SEU596^2
-SEU613^2
-SEU647^1
-SEU568^2
-SEU868^5
-SEU824^3
-SEU815^1
-SEU897^5
-SEU811^2
-SEU605^1
-SEU752^2
-SEU549^2
-SEU796^2
-SEU509^2
-SEU751^1
-SEU485^1
-SEU896^5
-SEU664^2
-SEU620^1
-SEU932^5
-SEU773^2
-SEU680^2
-SEU576^1
-SEU851^5
-SEU833^5
-SEU745^2
-SEU919^5
-SEU508^1
-SEU601^1
-SEU691^1
-SEU856^5
-SEU617^2
-SEU618^2
-SEU799^1
-SEU559^2
-SEU614^2
-SEU791^2
-SEU645^1
-SEU620^2
-SEU689^2
-SEU562^2
-SEU727^1
-SEU694^1
-SEU805^1
-SEU879^5
-SEU776^2
-SEU775^1
-SEU709^2
-SEU818^1
-SEU656^2
-SEU458^1
-SEU978^5
-SEU529^2
-SEU536^2
-SEU747^1
-SEU551^2
-SEU474^1
-SEU621^2
-SEU603^2
-SEU544^2
-SEU795^1
-SEU755^1
-SEU999^5
-SEU792^2
-SEU900^5
-SEU937^5
-SEU737^2
-SEU665^2
-SEU699^2
-SEU708^1
-SEU972^5
-SEU817^1
-SEU814^1
-SEU719^1
-SEU556^1
-SEU789^1
-SEU867^5
-SEU915^5
-SEU601^2
-SEU535^2
-SEU482^1
-SEU612^2
-SEU515^1
-SEU504^1
-SEU456^1
-SEU798^1
-SEU911^5
-SEU714^1
-SEU963^5
-SEU984^5
-SEU714^2
-SEU672^2
-SEU617^1
-SEU820^1
-SEU745^1
-SEU774^1
-SEU672^1
-SEU795^2
-SEU514^2
-SEU669^2
-SEU521^2
-SEU849^5
-SEU516^1
-SEU632^2
-SEU692^2
-SEU681^2
-SEU696^1
-SEU997^5
-SEU960^5
-SEU580^1
-SEU764^2
-SEU522^1
-SEU602^2
-SEU964^5
-SEU528^1
-SEU789^2
-SEU707^2
-SEU708^2
-SEU804^2
-SEU924^5
-SEU604^1
-SEU683^2
-SEU661^1
-SEU785^2
-SEU631^2
-SEU537^2
-SEU484^1
-SEU501^2
-SEU516^2
-SEU686^1
-SEU677^2
-SEU860^5
-SEU632^1
-SEU909^5
-SEU573^1
-SEU607^1
-SEU813^1
-SEU510^1
-SEU695^2
-SEU755^2
-SEU581^2
-SEU529^1
-SEU821^2
-SEU592^1
-SEU794^1
-SEU748^1
-SEU688^1
-SEU834^5
-SEU506^1
-SEU679^2
-SEU562^1
-SEU734^1
-SEU790^1
-SEU566^2
-SEU467^1
-SEU641^1
-SEU511^2
-SEU693^2
-SEU591^1
-SEU817^2
-SEU502^1
-SEU734^2
-SEU537^1
-SEU621^1
-SEU815^2
-SEU793^1
-SEU536^1
-SEU797^1
-SEU726^1
-SEU488^1
-SEU690^2
-SEU733^2
-SEU643^2
-SEU608^1
-SEU697^2
-SEU526^2
-SEU683^1
-SEU650^2
-SEU738^2
-SEU675^2
-SEU578^1
-SEU570^2
-SEU798^2
-SEU825^3
-SEU771^1
-SEU611^2
-SEU649^2
-SEU839^5
-SEU961^5
-SEU531^2
-SEU480^1
-SEU775^2
-SEU662^1
-SEU715^2
-SEU750^1
-SEU801^2
-SEU552^2
-SEU473^1
-SEU525^2
-SEU630^1
-SEU772^1
-SEU808^1
-SEU877^5
-SEU614^1
-SEU613^1
-SEU824^1
-SEU547^2
-SEU652^2
-SEU991^5
-SEU808^2
-SEU805^2
-SEU561^2
-SEU973^5
-SEU876^5
-SEU903^5
-SEU857^5
-SEU716^2
-SEU646^2
-SEU460^1
-SEU498^1
-SEU660^2
-SEU735^2
-SEU557^2
-SEU823^2
-SEU730^2
-SEU720^2
-SEU634^2
-SEU731^2
-SEU925^5
-SEU980^5
-SEU813^2
-SEU612^1
-SEU874^5
-SEU686^2
-SEU898^5
-SEU568^1
-SEU736^1
-SEU739^1
-SEU597^1
-SEU532^2
-SEU661^2
-SEU592^2
-SEU930^5
-SEU586^1
-SEU763^1
-SEU627^1
-SEU907^5
-SEU955^5
-SEU539^1
-SEU709^1
-SEU914^5
-SEU718^1
-SEU553^1
-SEU861^5
-SEU758^1
-SEU671^2
-SEU864^5
-SEU728^2
-SEU759^2
-SEU540^1
-SEU738^1
-SEU517^1
-SEU550^2
-SEU542^1
-SEU895^5
-SEU845^5
-SEU770^1
-SEU784^1
-SEU657^2
-SEU951^5
-SEU690^1
-SEU777^1
-SEU519^2
-SEU687^2
-SEU545^2
-SEU635^1
-SEU703^2
-SEU772^2
-SEU468^1
-SEU648^1
-SEU700^2
-SEU983^5
-SEU649^1
-SEU520^1
-SEU705^1
-SEU703^1
-SEU542^2
-SEU527^2
-SEU538^1
-SEU593^1
-SEU518^2
-SEU572^2
-SEU519^1
-SEU689^1
-SEU630^2
-SEU505^1
-SEU631^1
-SEU944^5
-SEU850^5
-SEU810^2
-SEU560^2
-SEU678^2
-SEU564^1
-SEU819^1
-SEU682^2
-SEU580^2
-SEU894^5
-SEU721^1
-SEU828^1
-SEU524^1
-SEU958^5
-SEU829^1
-SEU530^1
-SEU938^5
-SEU730^1
-SEU982^5
-SEU454^1
-SEU794^2
-SEU698^2
-SEU716^1
-SEU623^1
-SEU701^2
-SEU491^1
-SEU501^1
-SEU533^1
-SEU675^1
-SEU858^5
-SEU959^5
-SEU711^1
-SEU985^5
-SEU492^1
-SEU751^2
-SEU455^1
-SEU781^2
-SEU779^1
-SEU979^5
-SEU872^5
-SEU782^2
-SEU545^1
-SEU846^5
-SEU599^1
-SEU589^2
-SEU505^2
-SEU722^1
-SEU471^1
-SEU602^1
-SEU801^1
-SEU662^2
-SEU694^2
-SEU749^1
-SEU540^2
-SEU760^1
-SEU715^1
-SEU576^2
-SEU719^2
-SEU809^1
-SEU599^2
-SEU811^1
-SEU633^2
-SEU994^5
-SEU886^5
-SEU531^1
-SEU768^1
-SEU583^1
-SEU704^1
-SEU743^2
-SEU764^1
-SEU528^2
-SEU584^2
-SEU756^2
-SEU757^2
-SEU835^5
-SEU559^1
-SEU581^1
-SEU889^5
-SEU923^5
-SEU727^2
-SEU587^2
-SEU773^1
-SEU910^5
-SEU691^2
-SEU600^1
-SEU544^1
-SEU646^1
-SEU666^1
-SEU541^2
-SEU532^1
-SEU807^2
-SEU927^5
-SEU658^1
-SEU681^1
-SEU859^5
-SEU720^1
-SEU749^2
-SEU534^2
-SEU742^1
-SEU777^2
-SEU517^2
-SEU572^1
-SEU723^1
-SEU739^2
-SEU499^2
-SEU585^1
-SEU590^1
-SEU812^1
-SEU762^2
-SEU670^1
-SEU785^1
-SEU754^1
-SEU862^5
-SEU954^5
-SEU837^5
-SEU842^5
-SEU522^2
-SEU533^2
-SEU457^1
-SEU758^2
-SEU702^1
-SEU753^1
-SEU936^5
-SEU668^2
-SEU736^2
-SEU967^5
-SEU971^5
-SEU806^2
-SEU453^1
-SEU713^1
-SEU598^2
-MSC021^5
-MSC020^5
-NUM661^1
-NUM728^1
-NUM697^1
-NUM653^1
-NUM790^1
-NUM772^1
-NUM637^2
-NUM833^5
-NUM792^1
-NUM815^5
-NUM016^5
-NUM678^1
-NUM726^1
-NUM648^1
-NUM676^1
-NUM801^1
-NUM754^1
-NUM756^1
-NUM799^1
-NUM702^1
-NUM708^1
-NUM677^1
-NUM727^1
-NUM663^1
-NUM021^1
-NUM765^1
-NUM814^5
-NUM773^1
-NUM758^1
-NUM724^1
-NUM689^1
-NUM691^1
-NUM684^1
-NUM780^1
-NUM742^1
-NUM710^1
-NUM664^1
-NUM639^1
-NUM686^1
-NUM636^2
-NUM646^1
-NUM734^1
-NUM642^1
-NUM020^1
-NUM746^1
-NUM774^1
-NUM695^1
-NUM744^1
-NUM709^1
-NUM782^1
-NUM701^1
-NUM812^5
-NUM660^1
-NUM643^1
-NUM798^1
-NUM688^1
-NUM636^3
-NUM652^1
-NUM740^1
-NUM644^1
-NUM671^1
-NUM669^1
-NUM749^1
-NUM681^1
-NUM690^1
-NUM737^1
-NUM797^1
-NUM820^5
-NUM721^1
-NUM760^1
-NUM757^1
-NUM764^1
-NUM821^5
-NUM739^1
-NUM771^1
-NUM818^5
-NUM803^5
-NUM656^1
-NUM636^1
-NUM649^1
-NUM692^1
-NUM730^1
-NUM743^1
-NUM768^1
-NUM826^5
-NUM417^1
-NUM675^1
-NUM419^1
-NUM418^1
-NUM732^1
-NUM791^1
-NUM723^1
-NUM805^5
-NUM637^1
-NUM645^1
-NUM729^1
-NUM647^1
-NUM787^1
-NUM680^1
-NUM806^5
-NUM770^1
-NUM788^1
-NUM670^1
-NUM733^1
-NUM722^1
-NUM786^1
-NUM716^1
-NUM731^1
-NUM785^1
-NUM828^5
-NUM682^1
-NUM717^1
-NUM635^1
-NUM685^1
-NUM635^2
-NUM831^5
-NUM816^5
-NUM703^1
-NUM767^1
-NUM783^1
-NUM650^1
-NUM659^1
-NUM651^1
-NUM641^1
-NUM795^1
-NUM662^1
-NUM715^1
-NUM683^1
-NUM705^1
-NUM657^1
-NUM810^5
-NUM699^1
-NUM811^5
-NUM696^1
-NUM673^1
-NUM658^1
-NUM694^1
-NUM822^5
-NUM830^5
-NUM415^1
-NUM781^1
-NUM638^1
-NUM763^1
-NUM800^1
-NUM804^5
-NUM707^1
-NUM777^1
-NUM809^5
-NUM769^1
-NUM719^1
-NUM759^1
-NUM824^5
-NUM666^1
-NUM784^1
-NUM700^1
-NUM687^1
-NUM668^1
-NUM766^1
-NUM735^1
-NUM796^1
-NUM819^5
-NUM755^1
-NUM654^1
-NUM750^1
-NUM693^1
-NUM667^1
-NUM808^5
-NUM751^1
-NUM829^5
-NUM827^5
-NUM665^1
-NUM747^1
-NUM779^1
-NUM736^1
-NUM825^5
-NUM679^1
-NUM711^1
-NUM789^1
-NUM807^5
-NUM794^1
-NUM776^1
-NUM761^1
-NUM672^1
-NUM775^1
-NUM713^1
-NUM706^1
-NUM748^1
-NUM655^1
-NUM720^1
-NUM416^1
-NUM741^1
-NUM762^1
-NUM793^1
-NUM753^1
-NUM714^1
-NUM718^1
-NUM752^1
-NUM674^1
-NUM823^5
-NUM802^5
-NUM712^1
-NUM640^1
-NUM698^1
-NUM738^1
-NUM832^5
-NUM704^1
-NUM745^1
-NUM834^5
-NUM817^5
-NUM725^1
-NUM813^5
-NUM778^1
else [])@
[GA.Executable(floc,GA.NTactic(floc, [
if (*ueq_case*) true then
- GA.NAuto (floc,(Some
+ GA.NAuto (floc,(
HExtlib.list_mapi
(fun _ i ->
mk_ident ("H" ^ string_of_int i))
context
,[]))
else
- GA.NAuto (floc,(None,[
+ GA.NAuto (floc,([],[
"depth",string_of_int 5;
"width",string_of_int 5;
"size",string_of_int 20;
else [])@
[GA.Executable(floc,GA.Tactic(floc, Some (
if true (*ueq_case*) then
- GA.AutoBatch (floc,(None,["paramodulation","";
+ GA.AutoBatch (floc,([],["paramodulation","";
"timeout",string_of_int !paramod_timeout]))
else
- GA.AutoBatch (floc,(None,[
+ GA.AutoBatch (floc,([],[
"depth",string_of_int 5;
"width",string_of_int 5;
"size",string_of_int 20;
-uriManager.cmi:
uriManager.cmo: uriManager.cmi
uriManager.cmx: uriManager.cmi
-uriManager.cmi:
uriManager.cmo: uriManager.cmi
uriManager.cmx: uriManager.cmi
-whelp.cmi:
-fwdQueries.cmi:
whelp.cmo: whelp.cmi
whelp.cmx: whelp.cmi
fwdQueries.cmo: fwdQueries.cmi
-whelp.cmi:
-fwdQueries.cmi:
whelp.cmo: whelp.cmi
whelp.cmx: whelp.cmi
fwdQueries.cmo: fwdQueries.cmi
-xml.cmi:
-xmlPushParser.cmi:
xml.cmo: xml.cmi
xml.cmx: xml.cmi
xmlPushParser.cmo: xmlPushParser.cmi
-xml.cmi:
-xmlPushParser.cmi:
xml.cmo: xml.cmi
xml.cmx: xml.cmi
xmlPushParser.cmo: xmlPushParser.cmi
-xmlDiff.cmi:
xmlDiff.cmo: xmlDiff.cmi
xmlDiff.cmx: xmlDiff.cmi
-xmlDiff.cmi:
xmlDiff.cmo: xmlDiff.cmi
xmlDiff.cmx: xmlDiff.cmi
DEBUG_DEFAULT="true"
DEFAULT_DBHOST="mysql://mowgli.cs.unibo.it"
RT_BASE_DIR_DEFAULT="`pwd`/matita"
-MATITA_VERSION="0.5.8"
+MATITA_VERSION="0.5.9"
DISTRIBUTED="no" # "yes" for distributed tarballs
# End of distribution settings
gdome2 \
http \
lablgtk2 \
-lablgtksourceview2.gtksourceview2 \
lablgtkmathview \
mysql \
netstring \
FINDLIB_REQUIRES="\
$FINDLIB_CREQUIRES \
lablgtk2.glade \
+lablgtk2.sourceview2 \
lablgtkmathview \
-lablgtksourceview2.gtksourceview2 \
helm-xmldiff \
"
for r in $FINDLIB_LIBSREQUIRES $FINDLIB_REQUIRES
+++ /dev/null
-src/lib/cps.cmo :
-src/lib/cps.cmx :
-src/lib/share.cmo :
-src/lib/share.cmx :
-src/lib/log.cmi :
-src/lib/log.cmo : src/lib/log.cmi
-src/lib/log.cmx : src/lib/log.cmi
-src/lib/time.cmo : src/lib/log.cmi
-src/lib/time.cmx : src/lib/log.cmx
-src/common/options.cmo : src/lib/cps.cmx
-src/common/options.cmx : src/lib/cps.cmx
-src/common/marks.cmi :
-src/common/marks.cmo : src/common/marks.cmi
-src/common/marks.cmx : src/common/marks.cmi
-src/common/hierarchy.cmi :
-src/common/hierarchy.cmo : src/lib/cps.cmx src/common/hierarchy.cmi
-src/common/hierarchy.cmx : src/lib/cps.cmx src/common/hierarchy.cmi
-src/common/layer.cmi :
-src/common/layer.cmo : src/common/options.cmx src/common/marks.cmi \
- src/lib/log.cmi src/common/layer.cmi
-src/common/layer.cmx : src/common/options.cmx src/common/marks.cmx \
- src/lib/log.cmx src/common/layer.cmi
-src/common/entity.cmo : src/common/layer.cmi
-src/common/entity.cmx : src/common/layer.cmx
-src/common/output.cmi :
-src/common/output.cmo : src/common/options.cmx src/lib/log.cmi \
- src/common/output.cmi
-src/common/output.cmx : src/common/options.cmx src/lib/log.cmx \
- src/common/output.cmi
-src/common/alpha.cmi : src/common/entity.cmx
-src/common/alpha.cmo : src/common/entity.cmx src/common/alpha.cmi
-src/common/alpha.cmx : src/common/entity.cmx src/common/alpha.cmi
-src/complete_rg/crg.cmo : src/common/layer.cmi src/common/entity.cmx \
- src/lib/cps.cmx
-src/complete_rg/crg.cmx : src/common/layer.cmx src/common/entity.cmx \
- src/lib/cps.cmx
-src/complete_rg/crgOutput.cmi : src/common/layer.cmi src/complete_rg/crg.cmx
-src/complete_rg/crgOutput.cmo : src/common/marks.cmi src/lib/log.cmi \
- src/common/layer.cmi src/common/entity.cmx src/complete_rg/crg.cmx \
- src/lib/cps.cmx src/complete_rg/crgOutput.cmi
-src/complete_rg/crgOutput.cmx : src/common/marks.cmx src/lib/log.cmx \
- src/common/layer.cmx src/common/entity.cmx src/complete_rg/crg.cmx \
- src/lib/cps.cmx src/complete_rg/crgOutput.cmi
-src/text/txt.cmo : src/common/layer.cmi
-src/text/txt.cmx : src/common/layer.cmx
-src/text/txtParser.cmi : src/text/txt.cmx
-src/text/txtParser.cmo : src/text/txt.cmx src/common/options.cmx \
- src/common/layer.cmi src/text/txtParser.cmi
-src/text/txtParser.cmx : src/text/txt.cmx src/common/options.cmx \
- src/common/layer.cmx src/text/txtParser.cmi
-src/text/txtLexer.cmo : src/text/txtParser.cmi src/common/options.cmx \
- src/lib/log.cmi
-src/text/txtLexer.cmx : src/text/txtParser.cmx src/common/options.cmx \
- src/lib/log.cmx
-src/text/txtTxt.cmi : src/text/txt.cmx
-src/text/txtTxt.cmo : src/text/txt.cmx src/lib/cps.cmx src/text/txtTxt.cmi
-src/text/txtTxt.cmx : src/text/txt.cmx src/lib/cps.cmx src/text/txtTxt.cmi
-src/text/txtCrg.cmi : src/text/txt.cmx src/complete_rg/crg.cmx
-src/text/txtCrg.cmo : src/text/txtTxt.cmi src/text/txt.cmx \
- src/common/options.cmx src/common/hierarchy.cmi src/common/entity.cmx \
- src/complete_rg/crg.cmx src/lib/cps.cmx src/text/txtCrg.cmi
-src/text/txtCrg.cmx : src/text/txtTxt.cmx src/text/txt.cmx \
- src/common/options.cmx src/common/hierarchy.cmx src/common/entity.cmx \
- src/complete_rg/crg.cmx src/lib/cps.cmx src/text/txtCrg.cmi
-src/automath/aut.cmo : src/common/entity.cmx
-src/automath/aut.cmx : src/common/entity.cmx
-src/automath/autProcess.cmi : src/automath/aut.cmx
-src/automath/autProcess.cmo : src/automath/aut.cmx \
- src/automath/autProcess.cmi
-src/automath/autProcess.cmx : src/automath/aut.cmx \
- src/automath/autProcess.cmi
-src/automath/autOutput.cmi : src/automath/autProcess.cmi \
- src/automath/aut.cmx
-src/automath/autOutput.cmo : src/lib/log.cmi src/lib/cps.cmx \
- src/automath/autProcess.cmi src/automath/aut.cmx \
- src/automath/autOutput.cmi
-src/automath/autOutput.cmx : src/lib/log.cmx src/lib/cps.cmx \
- src/automath/autProcess.cmx src/automath/aut.cmx \
- src/automath/autOutput.cmi
-src/automath/autParser.cmi : src/automath/aut.cmx
-src/automath/autParser.cmo : src/common/options.cmx src/automath/aut.cmx \
- src/automath/autParser.cmi
-src/automath/autParser.cmx : src/common/options.cmx src/automath/aut.cmx \
- src/automath/autParser.cmi
-src/automath/autLexer.cmo : src/common/options.cmx src/lib/log.cmi \
- src/automath/autParser.cmi
-src/automath/autLexer.cmx : src/common/options.cmx src/lib/log.cmx \
- src/automath/autParser.cmx
-src/automath/autCrg.cmi : src/common/layer.cmi src/complete_rg/crg.cmx \
- src/automath/aut.cmx
-src/automath/autCrg.cmo : src/common/options.cmx src/common/layer.cmi \
- src/common/entity.cmx src/complete_rg/crg.cmx src/lib/cps.cmx \
- src/automath/aut.cmx src/automath/autCrg.cmi
-src/automath/autCrg.cmx : src/common/options.cmx src/common/layer.cmx \
- src/common/entity.cmx src/complete_rg/crg.cmx src/lib/cps.cmx \
- src/automath/aut.cmx src/automath/autCrg.cmi
-src/xml/xmlLibrary.cmi : src/common/layer.cmi src/common/entity.cmx
-src/xml/xmlLibrary.cmo : src/common/options.cmx src/common/layer.cmi \
- src/common/hierarchy.cmi src/common/entity.cmx src/lib/cps.cmx \
- src/xml/xmlLibrary.cmi
-src/xml/xmlLibrary.cmx : src/common/options.cmx src/common/layer.cmx \
- src/common/hierarchy.cmx src/common/entity.cmx src/lib/cps.cmx \
- src/xml/xmlLibrary.cmi
-src/xml/xmlCrg.cmi : src/xml/xmlLibrary.cmi src/common/layer.cmi \
- src/complete_rg/crg.cmx
-src/xml/xmlCrg.cmo : src/xml/xmlLibrary.cmi src/common/hierarchy.cmi \
- src/common/entity.cmx src/complete_rg/crg.cmx src/lib/cps.cmx \
- src/common/alpha.cmi src/xml/xmlCrg.cmi
-src/xml/xmlCrg.cmx : src/xml/xmlLibrary.cmx src/common/hierarchy.cmx \
- src/common/entity.cmx src/complete_rg/crg.cmx src/lib/cps.cmx \
- src/common/alpha.cmx src/xml/xmlCrg.cmi
-src/basic_rg/brg.cmo : src/common/layer.cmi src/common/entity.cmx
-src/basic_rg/brg.cmx : src/common/layer.cmx src/common/entity.cmx
-src/basic_rg/brgCrg.cmi : src/complete_rg/crg.cmx src/basic_rg/brg.cmx
-src/basic_rg/brgCrg.cmo : src/common/layer.cmi src/common/entity.cmx \
- src/complete_rg/crg.cmx src/lib/cps.cmx src/basic_rg/brg.cmx \
- src/basic_rg/brgCrg.cmi
-src/basic_rg/brgCrg.cmx : src/common/layer.cmx src/common/entity.cmx \
- src/complete_rg/crg.cmx src/lib/cps.cmx src/basic_rg/brg.cmx \
- src/basic_rg/brgCrg.cmi
-src/basic_rg/brgOutput.cmi : src/xml/xmlLibrary.cmi src/lib/log.cmi \
- src/common/layer.cmi src/basic_rg/brg.cmx
-src/basic_rg/brgOutput.cmo : src/xml/xmlCrg.cmi src/common/options.cmx \
- src/lib/log.cmi src/common/layer.cmi src/common/hierarchy.cmi \
- src/common/entity.cmx src/lib/cps.cmx src/basic_rg/brgCrg.cmi \
- src/basic_rg/brg.cmx src/basic_rg/brgOutput.cmi
-src/basic_rg/brgOutput.cmx : src/xml/xmlCrg.cmx src/common/options.cmx \
- src/lib/log.cmx src/common/layer.cmx src/common/hierarchy.cmx \
- src/common/entity.cmx src/lib/cps.cmx src/basic_rg/brgCrg.cmx \
- src/basic_rg/brg.cmx src/basic_rg/brgOutput.cmi
-src/basic_rg/brgEnvironment.cmi : src/basic_rg/brg.cmx
-src/basic_rg/brgEnvironment.cmo : src/common/entity.cmx \
- src/basic_rg/brgEnvironment.cmi
-src/basic_rg/brgEnvironment.cmx : src/common/entity.cmx \
- src/basic_rg/brgEnvironment.cmi
-src/basic_rg/brgSubstitution.cmi : src/basic_rg/brg.cmx
-src/basic_rg/brgSubstitution.cmo : src/common/options.cmx \
- src/basic_rg/brg.cmx src/basic_rg/brgSubstitution.cmi
-src/basic_rg/brgSubstitution.cmx : src/common/options.cmx \
- src/basic_rg/brg.cmx src/basic_rg/brgSubstitution.cmi
-src/basic_rg/brgReduction.cmi : src/lib/log.cmi src/common/layer.cmi \
- src/common/entity.cmx src/basic_rg/brg.cmx
-src/basic_rg/brgReduction.cmo : src/lib/share.cmx src/common/output.cmi \
- src/common/options.cmx src/lib/log.cmi src/common/layer.cmi \
- src/common/hierarchy.cmi src/common/entity.cmx src/basic_rg/brgOutput.cmi \
- src/basic_rg/brgEnvironment.cmi src/basic_rg/brg.cmx \
- src/basic_rg/brgReduction.cmi
-src/basic_rg/brgReduction.cmx : src/lib/share.cmx src/common/output.cmx \
- src/common/options.cmx src/lib/log.cmx src/common/layer.cmx \
- src/common/hierarchy.cmx src/common/entity.cmx src/basic_rg/brgOutput.cmx \
- src/basic_rg/brgEnvironment.cmx src/basic_rg/brg.cmx \
- src/basic_rg/brgReduction.cmi
-src/basic_rg/brgValidity.cmi : src/common/layer.cmi \
- src/basic_rg/brgReduction.cmi src/basic_rg/brg.cmx
-src/basic_rg/brgValidity.cmo : src/common/options.cmx src/lib/log.cmi \
- src/common/layer.cmi src/common/entity.cmx src/basic_rg/brgReduction.cmi \
- src/basic_rg/brgEnvironment.cmi src/basic_rg/brg.cmx \
- src/basic_rg/brgValidity.cmi
-src/basic_rg/brgValidity.cmx : src/common/options.cmx src/lib/log.cmx \
- src/common/layer.cmx src/common/entity.cmx src/basic_rg/brgReduction.cmx \
- src/basic_rg/brgEnvironment.cmx src/basic_rg/brg.cmx \
- src/basic_rg/brgValidity.cmi
-src/basic_rg/brgType.cmi : src/common/layer.cmi \
- src/basic_rg/brgReduction.cmi src/basic_rg/brg.cmx
-src/basic_rg/brgType.cmo : src/lib/share.cmx src/common/options.cmx \
- src/lib/log.cmi src/common/layer.cmi src/common/hierarchy.cmi \
- src/common/entity.cmx src/lib/cps.cmx src/basic_rg/brgSubstitution.cmi \
- src/basic_rg/brgReduction.cmi src/basic_rg/brgEnvironment.cmi \
- src/basic_rg/brg.cmx src/basic_rg/brgType.cmi
-src/basic_rg/brgType.cmx : src/lib/share.cmx src/common/options.cmx \
- src/lib/log.cmx src/common/layer.cmx src/common/hierarchy.cmx \
- src/common/entity.cmx src/lib/cps.cmx src/basic_rg/brgSubstitution.cmx \
- src/basic_rg/brgReduction.cmx src/basic_rg/brgEnvironment.cmx \
- src/basic_rg/brg.cmx src/basic_rg/brgType.cmi
-src/basic_rg/brgUntrusted.cmi : src/common/layer.cmi \
- src/basic_rg/brgReduction.cmi src/basic_rg/brg.cmx
-src/basic_rg/brgUntrusted.cmo : src/lib/log.cmi src/common/entity.cmx \
- src/basic_rg/brgValidity.cmi src/basic_rg/brgType.cmi \
- src/basic_rg/brgReduction.cmi src/basic_rg/brgEnvironment.cmi \
- src/basic_rg/brg.cmx src/basic_rg/brgUntrusted.cmi
-src/basic_rg/brgUntrusted.cmx : src/lib/log.cmx src/common/entity.cmx \
- src/basic_rg/brgValidity.cmx src/basic_rg/brgType.cmx \
- src/basic_rg/brgReduction.cmx src/basic_rg/brgEnvironment.cmx \
- src/basic_rg/brg.cmx src/basic_rg/brgUntrusted.cmi
-src/basic_rg/brgGrafite.cmi : src/common/layer.cmi src/basic_rg/brg.cmx
-src/basic_rg/brgGrafite.cmo : src/common/options.cmx src/common/layer.cmi \
- src/common/entity.cmx src/lib/cps.cmx src/basic_rg/brg.cmx \
- src/common/alpha.cmi src/basic_rg/brgGrafite.cmi
-src/basic_rg/brgGrafite.cmx : src/common/options.cmx src/common/layer.cmx \
- src/common/entity.cmx src/lib/cps.cmx src/basic_rg/brg.cmx \
- src/common/alpha.cmx src/basic_rg/brgGrafite.cmi
-src/basic_ag/bag.cmo : src/common/marks.cmi src/lib/log.cmi \
- src/common/entity.cmx src/lib/cps.cmx
-src/basic_ag/bag.cmx : src/common/marks.cmx src/lib/log.cmx \
- src/common/entity.cmx src/lib/cps.cmx
-src/basic_ag/bagCrg.cmi : src/common/layer.cmi src/complete_rg/crg.cmx \
- src/basic_ag/bag.cmx
-src/basic_ag/bagCrg.cmo : src/common/marks.cmi src/common/layer.cmi \
- src/common/entity.cmx src/complete_rg/crg.cmx src/lib/cps.cmx \
- src/basic_ag/bag.cmx src/basic_ag/bagCrg.cmi
-src/basic_ag/bagCrg.cmx : src/common/marks.cmx src/common/layer.cmx \
- src/common/entity.cmx src/complete_rg/crg.cmx src/lib/cps.cmx \
- src/basic_ag/bag.cmx src/basic_ag/bagCrg.cmi
-src/basic_ag/bagOutput.cmi : src/xml/xmlLibrary.cmi src/lib/log.cmi \
- src/common/layer.cmi src/basic_ag/bag.cmx
-src/basic_ag/bagOutput.cmo : src/xml/xmlCrg.cmi src/common/options.cmx \
- src/common/marks.cmi src/lib/log.cmi src/common/hierarchy.cmi \
- src/common/entity.cmx src/basic_ag/bagCrg.cmi src/basic_ag/bag.cmx \
- src/basic_ag/bagOutput.cmi
-src/basic_ag/bagOutput.cmx : src/xml/xmlCrg.cmx src/common/options.cmx \
- src/common/marks.cmx src/lib/log.cmx src/common/hierarchy.cmx \
- src/common/entity.cmx src/basic_ag/bagCrg.cmx src/basic_ag/bag.cmx \
- src/basic_ag/bagOutput.cmi
-src/basic_ag/bagEnvironment.cmi : src/basic_ag/bag.cmx
-src/basic_ag/bagEnvironment.cmo : src/lib/log.cmi src/common/entity.cmx \
- src/basic_ag/bag.cmx src/basic_ag/bagEnvironment.cmi
-src/basic_ag/bagEnvironment.cmx : src/lib/log.cmx src/common/entity.cmx \
- src/basic_ag/bag.cmx src/basic_ag/bagEnvironment.cmi
-src/basic_ag/bagSubstitution.cmi : src/common/marks.cmi src/basic_ag/bag.cmx
-src/basic_ag/bagSubstitution.cmo : src/lib/share.cmx src/basic_ag/bag.cmx \
- src/basic_ag/bagSubstitution.cmi
-src/basic_ag/bagSubstitution.cmx : src/lib/share.cmx src/basic_ag/bag.cmx \
- src/basic_ag/bagSubstitution.cmi
-src/basic_ag/bagReduction.cmi : src/common/layer.cmi src/basic_ag/bag.cmx
-src/basic_ag/bagReduction.cmo : src/common/options.cmx src/common/marks.cmi \
- src/lib/log.cmi src/common/entity.cmx src/lib/cps.cmx \
- src/basic_ag/bagSubstitution.cmi src/basic_ag/bagOutput.cmi \
- src/basic_ag/bagEnvironment.cmi src/basic_ag/bag.cmx \
- src/basic_ag/bagReduction.cmi
-src/basic_ag/bagReduction.cmx : src/common/options.cmx src/common/marks.cmx \
- src/lib/log.cmx src/common/entity.cmx src/lib/cps.cmx \
- src/basic_ag/bagSubstitution.cmx src/basic_ag/bagOutput.cmx \
- src/basic_ag/bagEnvironment.cmx src/basic_ag/bag.cmx \
- src/basic_ag/bagReduction.cmi
-src/basic_ag/bagType.cmi : src/common/layer.cmi src/basic_ag/bag.cmx
-src/basic_ag/bagType.cmo : src/lib/share.cmx src/common/options.cmx \
- src/lib/log.cmi src/common/hierarchy.cmi src/common/entity.cmx \
- src/lib/cps.cmx src/basic_ag/bagReduction.cmi src/basic_ag/bagOutput.cmi \
- src/basic_ag/bagEnvironment.cmi src/basic_ag/bag.cmx \
- src/basic_ag/bagType.cmi
-src/basic_ag/bagType.cmx : src/lib/share.cmx src/common/options.cmx \
- src/lib/log.cmx src/common/hierarchy.cmx src/common/entity.cmx \
- src/lib/cps.cmx src/basic_ag/bagReduction.cmx src/basic_ag/bagOutput.cmx \
- src/basic_ag/bagEnvironment.cmx src/basic_ag/bag.cmx \
- src/basic_ag/bagType.cmi
-src/basic_ag/bagUntrusted.cmi : src/common/layer.cmi src/basic_ag/bag.cmx
-src/basic_ag/bagUntrusted.cmo : src/lib/log.cmi src/common/entity.cmx \
- src/basic_ag/bagType.cmi src/basic_ag/bagEnvironment.cmi \
- src/basic_ag/bag.cmx src/basic_ag/bagUntrusted.cmi
-src/basic_ag/bagUntrusted.cmx : src/lib/log.cmx src/common/entity.cmx \
- src/basic_ag/bagType.cmx src/basic_ag/bagEnvironment.cmx \
- src/basic_ag/bag.cmx src/basic_ag/bagUntrusted.cmi
-src/toplevel/top.cmo : src/xml/xmlLibrary.cmi src/xml/xmlCrg.cmi \
- src/text/txtParser.cmi src/text/txtLexer.cmx src/text/txtCrg.cmi \
- src/text/txt.cmx src/lib/time.cmx src/common/output.cmi \
- src/common/options.cmx src/lib/log.cmi src/common/layer.cmi \
- src/common/hierarchy.cmi src/common/entity.cmx \
- src/complete_rg/crgOutput.cmi src/complete_rg/crg.cmx src/lib/cps.cmx \
- src/basic_rg/brgUntrusted.cmi src/basic_rg/brgReduction.cmi \
- src/basic_rg/brgOutput.cmi src/basic_rg/brgGrafite.cmi \
- src/basic_rg/brgCrg.cmi src/basic_rg/brg.cmx \
- src/basic_ag/bagUntrusted.cmi src/basic_ag/bagType.cmi \
- src/basic_ag/bagOutput.cmi src/basic_ag/bagCrg.cmi src/basic_ag/bag.cmx \
- src/automath/autProcess.cmi src/automath/autParser.cmi \
- src/automath/autOutput.cmi src/automath/autLexer.cmx \
- src/automath/autCrg.cmi src/automath/aut.cmx
-src/toplevel/top.cmx : src/xml/xmlLibrary.cmx src/xml/xmlCrg.cmx \
- src/text/txtParser.cmx src/text/txtLexer.cmx src/text/txtCrg.cmx \
- src/text/txt.cmx src/lib/time.cmx src/common/output.cmx \
- src/common/options.cmx src/lib/log.cmx src/common/layer.cmx \
- src/common/hierarchy.cmx src/common/entity.cmx \
- src/complete_rg/crgOutput.cmx src/complete_rg/crg.cmx src/lib/cps.cmx \
- src/basic_rg/brgUntrusted.cmx src/basic_rg/brgReduction.cmx \
- src/basic_rg/brgOutput.cmx src/basic_rg/brgGrafite.cmx \
- src/basic_rg/brgCrg.cmx src/basic_rg/brg.cmx \
- src/basic_ag/bagUntrusted.cmx src/basic_ag/bagType.cmx \
- src/basic_ag/bagOutput.cmx src/basic_ag/bagCrg.cmx src/basic_ag/bag.cmx \
- src/automath/autProcess.cmx src/automath/autParser.cmx \
- src/automath/autOutput.cmx src/automath/autLexer.cmx \
- src/automath/autCrg.cmx src/automath/aut.cmx
+++ /dev/null
-.depend.opt
-Make*
-README
-examples/automath/*.aut
-src/*.ml
-src/Make*
-src/*/*
+++ /dev/null
-MAIN = helena
-
-SRC = src
-
-REQUIRES = unix str helm-ng_kernel
-
-OCAMLOPTIONS = -rectypes
-
-KEEP = README
-
-CLEAN = etc/log.txt etc/profile.txt
-
-TAGS = test-si-fast test-si test-si-matita profile xml-si-crg xml-si matita matitac
-
-include Makefile.common
-
-MATITAC = ../../../../matita/matita/matitac.opt
-
-MATITA = ../../../../matita/matita/matita.opt
-
-XMLDIR = ../../www/lambdadelta
-
-INPUT = examples/automath/grundlagen_2.aut
-
-INPUTFAST = examples/automath/grundlagen_1.aut
-
-MA = grundlagen_2.ma
-
-PREAMBLE = ../matita/matita.ma.templ
-
-test-si-fast: $(MAIN).opt etc
- @echo " HELENA -o -q $(INPUTFAST)"
- $(H)./$(MAIN).opt -T 1 -o -q $(O) $(INPUTFAST) > etc/log.txt
-
-test-si: $(MAIN).opt etc
- @echo " HELENA -d -l -p -o $(INPUT)"
- $(H)./$(MAIN).opt -T 2 -d -l -p -o $(O) $(INPUT) > etc/log.txt
-
-test-si-matita matita/$(MA): $(MAIN).opt etc
- @echo " HELENA -d -l -m -p -o $(INPUT)"
- $(H)./$(MAIN).opt -T 2 -a n -d -l -m $(PREAMBLE) -p -o $(O) $(INPUT) > etc/log.txt
-
-profile: $(MAIN).opt etc
- @echo " HELENA -o -q $(INPUTFAST) (30 TIMES)"
- $(H)rm -f etc/log.txt
- $(H)for T in `seq 30`; do ./$(MAIN).opt -T 1 -o -q $(O) $(INPUTFAST) >> etc/log.txt; done
- $(H)grep "at exit" etc/log.txt | sort | uniq > etc/profile-new.txt
-
-xml-si-crg: $(MAIN).opt etc
- @echo " HELENA -l -o -s 1 -x $(INPUT)"
- $(H)./$(MAIN).opt -O $(XMLDIR) -T 1 -l -o -s 1 -x $(INPUT) > etc/log.txt
-
-xml-si: $(MAIN).opt etc
- @echo " HELENA -l -o -s 2 -x $(INPUT)"
- $(H)./$(MAIN).opt -O $(XMLDIR) -T 1 -l -o -s 2 -x $(INPUT) > etc/log.txt
-
-matita: matita/$(MA)
- @echo " MATITA $(MA)"
- $(H)cd matita && $(MATITA) $(MA)
-
-matitac: matita/$(MA)
- @echo " MATITAC $(MA)"
- $(H)cd matita && $(MATITAC) $(MA)
+++ /dev/null
-H=@
-ifeq ($(origin OCAMLPATH), undefined)
- OCAMLFIND = OCAMLPATH=$(HOME)/svn/claudio/components/METAS ocamlfind
-else
- OCAMLFIND = ocamlfind
-endif
-
-RELISE = $(MAIN:%=%_$(shell cat MakeVersion))
-
-DOWNDIR = $(HOME)/svn/helm_stable/www/lambdadelta/download
-
-DIRECTORIES = $(addprefix $(SRC)/,$(shell cat $(SRC)/Make))
-
-INCLUDES = $(DIRECTORIES:%=-I %)
-
-OCAMLDEP = $(OCAMLFIND) ocamldep -native $(INCLUDES)
-OCAMLOPT = $(OCAMLFIND) opt $(OCAMLOPTIONS) -linkpkg -package "$(REQUIRES)" $(INCLUDES)
-OCAMLLEX = ocamllex.opt
-OCAMLYACC = ocamlyacc -v
-TAR = tar -czf etc/$(MAIN:%=%.tgz)
-
-define DIR_TEMPLATE
- MODULES += $$(addprefix $(1)/,$$(shell cat $(1)/Make))
-endef
-
-define MOD_TEMPLATE
- SOURCES += $$(if $$(wildcard $(1).ml[yi]),$(1).mli $(1).ml,$(1).ml)
- CMXS += $(1).cmx
- CLEAN += $(1).cmi $(1).cmx $(1).o
- CLEAN += $$(if $$(wildcard $(1).ml[ly]),$(1).ml,)
- CLEAN += $$(if $$(wildcard $(1).mly),$(1).mli $(1).output,)
- KEEP += $$(if $$(wildcard $(1).mly),$(1).mly,\
- $$(if $$(wildcard $(1).mll),$(1).mll,\
- $$(if $$(wildcard $(1).mli),$(1).mli $(1).ml,$(1).ml)\
- )\
- )
-endef
-
-define INCLUDE_TEMPLATE
- ifeq ($(MAKECMDGOALS), $(1))
- include .depend.opt
- endif
-endef
-
-$(foreach DIR, $(DIRECTORIES), $(eval $(call DIR_TEMPLATE, $(DIR))))
-$(foreach MOD, $(MODULES), $(eval $(call MOD_TEMPLATE, $(MOD))))
-
-OBJECTS = $(patsubst %.ml,%.cmx,$(SOURCES:%.mli=%.cmi))
-CLEAN += $(MAIN).opt
-
-all opt: .depend.opt
- @$(MAKE) --no-print-directory $(MAIN).opt
-
-$(MAIN).opt: $(OBJECTS)
- @echo " OCAMLOPT -o $(MAIN).opt"
- $(H)$(OCAMLOPT) -o $(MAIN).opt $(CMXS)
-
-.depend.opt: $(SOURCES)
- @echo " OCAMLDEP -native"
- $(H)$(OCAMLDEP) $^ > .depend.opt
-
-clean:
- @echo " CLEAN . $(SRC)"
- $(H)find -name "*~" | xargs $(RM) $(CLEAN)
-
-relise: clean
- @echo " RELISE $(RELISE)"
- $(H)mkdir -p $(RELISE)
- $(H)$(foreach FILE, $(shell cat Make), cp --parents $(FILE) $(RELISE);)
- $(H)tar -czf etc/$(RELISE).tar.gz $(RELISE)
- $(H)scp etc/$(RELISE).tar.gz $(DOWNDIR)
-
-tgz: clean
- @echo " TAR -czf $(MAIN:%=%.tgz) . $(DIRECTORIES)"
- $(H)find -name "Make*" | xargs $(TAR) $(KEEP)
-
-etc:
- @echo " MKDIR etc"
- $(H)mkdir etc
-
-%.ml %.mli: %.mly
- @echo " OCAMLYACC $<"
- $(H)$(OCAMLYACC) $<
-%.ml: %.mll
- @echo " OCAMLLEX $<"
- $(H)$(OCAMLLEX) $<
-%.cmi: %.mli
- @echo " OCAMLOPT $<"
- $(H)$(OCAMLOPT) -c $<
-%.cmx: %.ml
- @echo " OCAMLOPT $<"
- $(H)$(OCAMLOPT) -c $<
-
-TAGS += all opt $(MAIN).opt
-
-$(foreach TAG, $(TAGS), $(eval $(call INCLUDE_TEMPLATE, $(TAG))))
+++ /dev/null
-Helena 0.8.1 M
-
-* type "make" or "make opt" to compile the native executable
-
-* type "make test-si" to parse the grundlagen
- it generates a log.txt with the grundlagen contents statistics
-
-* type "make test-si-fast" to parse the grundlagen with minimum logging
-
-* type "make clean" to remove the products of compilation
+++ /dev/null
-This directory contains:
-
-grundlagen_0.aut: original specification valid in AutQE with η-reduction enabled
-grundlagen_1.aut: "η-equivalent" specification valid also in λδ version 3
-grundlagen_2.aut: "η-equivalent" specification valid also in a Pure Type System
+++ /dev/null
-# Landau's "Grundlagen der Analysis", formal specification in AUTOMATH
-# Copyright (C) 1977, L.S. van Benthem Jutting
-# 1992, revised by F. Wiedijk (http://www.cs.ru.nl/~freek/aut/)
-
-+l
-@[a:'prop'][b:'prop']
-imp:=[x:a]b:'prop'
-[a1:a][i:imp(a,b)]
-mp:=<a1>i:b
-a@refimp:=[x:a]x:imp(a,a)
-b@[c:'prop'][i:imp(a,b)][j:imp(b,c)]
-trimp:=[x:a]<<x>i>j:imp(a,c)
-@con:='prim':'prop'
-a@not:=imp(con):'prop'
-wel:=not(not(a)):'prop'
-[a1:a]
-weli:=[x:not(a)]<a1>x:wel(a)
-a@[w:wel(a)]
-et:='prim':a
-a@[c1:con]
-cone:=et([x:not(a)]c1):a
-+imp
-b@[i:imp(a,b)][j:imp(not(a),b)]
-th1:=et(b,[x:not(b)]<<trimp(con,i,x)>j>x):b
-b@[n:not(a)]
-th2:=trimp(con,b,n,[x:con]cone(b,x)):imp(a,b)
-b@[n:not(b)][i:imp(a,b)]
-th3:=trimp(con,i,n):not(a)
-b@[a1:a][n:not(b)]
-th4:=[x:imp(a,b)]<a1>th3(n,x):not(imp(a,b))
-b@[n:not(imp(a,b))]
-th5:=et([x:not(a)]<th2(x)>n):a
-th6:=[x:b]<[y:a]x>n:not(b)
-b@[n:not(b)][i:imp(not(a),b)]
-th7:=et(a,th3(not(a),b,n,i)):a
--imp
-b@[i:imp(not(b),not(a))]
-cp:=[x:a]th7".imp"(b,not(a),weli(x),i):imp(a,b)
-@obvious:=imp(con,con):'prop'
-obviousi:=refimp(con):obvious
-b@ec:=imp(a,not(b)):'prop'
-[n:not(a)]
-eci1:=th2".imp"(not(b),n):ec(a,b)
-b@[n:not(b)]
-eci2:=[x:a]n:ec(a,b)
-+ec
-b@[i:imp(a,not(b))]
-th1:=i:ec(a,b)
-b@[i:imp(b,not(a))]
-th2:=[x:a][y:b]<x><y>i:ec(a,b)
--ec
-b@[e:ec(a,b)]
-comec:=th2".ec"(b,a,e):ec(b,a)
-[a1:a]
-ece1:=<a1>e:not(b)
-e@[b1:b]
-ece2:=th3".imp"(not(b),weli(b,b1),e):not(a)
-+*ec
-c@[e:ec(a,b)][i:imp(c,a)]
-th3:=trimp(c,a,not(b),i,e):ec(c,b)
-e@[i:imp(c,b)]
-th4:=comec(c,a,th3(b,a,c,comec(e),i)):ec(a,c)
--ec
-b@and:=not(ec(a,b)):'prop'
-[a1:a][b1:b]
-andi:=th4".imp"(not(b),a1,weli(b,b1)):and(a,b)
-b@[a1:and(a,b)]
-ande1:=th5".imp"(not(b),a1):a
-ande2:=et(b,th6".imp"(not(b),a1)):b
-comand:=andi(b,a,ande2,ande1):and(b,a)
-+and
-b@[n:not(a)]
-th1:=weli(ec,eci1(n)):not(and)
-b@[n:not(b)]
-th2:=weli(ec,eci2(n)):not(and)
-b@[n:not(and)][a1:a]
-th3:=ece1(et(ec,n),a1):not(b)
-n@[b1:b]
-th4:=ece2(et(ec,n),b1):not(a)
-n@th5:=th3"l.imp"(and(b,a),and(a,b),n,[x:and(b,a)]comand(b,a,x)):not(and(b,a))
-c@[a1:and(a,b)][i:imp(a,c)]
-th6:=andi(c,b,<ande1(a1)>i,ande2(a1)):and(c,b)
-a1@[i:imp(b,c)]
-th7:=andi(a,c,ande1(a1),<ande2(a1)>i):and(a,c)
--and
-b@or:=imp(not(a),b):'prop'
-[a1:a]
-ori1:=th2".imp"(not(a),b,weli(a1)):or(a,b)
-b@[b1:b]
-ori2:=[x:not(a)]b1:or(a,b)
-+or
-b@[i:imp(not(a),b)]
-th1:=i:or(a,b)
-b@[i:imp(not(b),a)]
-th2:=[x:not]et(b,th3"l.imp"(not(b),a,x,i)):or(a,b)
--or
-b@[o:or(a,b)][n:not(a)]
-ore2:=<n>o:b
-o@[n:not(b)]
-ore1:=et(th3".imp"(not(a),b,n,o)):a
-o@comor:=[x:not(b)]ore1(x):or(b,a)
-+*or
-b@[n:not(a)][m:not(b)]
-th3:=th4"l.imp"(not(a),b,n,m):not(or(a,b))
-b@[n:not(or(a,b))]
-th4:=th5"l.imp"(not(a),b,n):not(a)
-th5:=th6"l.imp"(not(a),b,n):not(b)
-a@th6:=refimp(not(a)):or(a,not(a))
--or
-c@[o:or(a,b)][i:imp(a,c)][j:imp(b,c)]
-orapp:=th1".imp"(c,i,trimp(not,b,c,o,j)):c
-c@[d:'prop']
-+*or
-o@[i:imp(a,c)]
-th7:=trimp(not(c),not,b,[x:not(c)]th3"l.imp"(a,c,x,i),o):or(c,b)
-o@[i:imp(b,c)]
-th8:=trimp(not(a),b,c,o,i):or(a,c)
-d@[o:or(a,b)][i:imp(a,c)][j:imp(b,d)]
-th9:=th7(a,d,c,th8(a,b,d,o,j),i):or(c,d)
-b@[o:or(a,b)]
-th10:=o:imp(not(a),b)
-th11:=comor(o):imp(not(b),a)
-b@[o:or(not(a),b)]
-th12:=trimp(a,wel(a),b,[x:a]weli(x),o):imp(a,b)
-b@[i:imp(a,b)]
-th13:=trimp(wel(a),a,b,[x:wel(a)]et(x),i):or(not(a),b)
-b@[o:or(not(a),not(b))]
-th14:=weli(ec,th12(not(b),o)):not(and)
-b@[n:not(and)]
-th15:=th13(not(b),et(ec,n)):or(not(a),not(b))
-b@[a1:and(not(a),not(b))]
-th16:=th3(ande1(not(a),not(b),a1),ande2(not(a),not(b),a1)):not(or(a,b))
-b@[n:not(or(a,b))]
-th17:=andi(not(a),not(b),th4(n),th5(n)):and(not(a),not(b))
--or
-b@orec:=and(or(a,b),ec(a,b)):'prop'
-[o:or(a,b)][e:ec(a,b)]
-oreci:=andi(or(a,b),ec(a,b),o,e):orec(a,b)
-+orec
-b@[a1:a][n:not(b)]
-th1:=oreci(ori1(a1),eci2(n)):orec(a,b)
-b@[n:not(a)][b1:b]
-th2:=oreci(ori2(b1),eci1(n)):orec(a,b)
--orec
-b@[o:orec(a,b)]
-orece1:=ande1(or(a,b),ec,o):or(a,b)
-orece2:=ande2(or(a,b),ec,o):ec(a,b)
-comorec:=oreci(b,a,comor(orece1),comec(orece2)):orec(b,a)
-+*orec
-o@[a1:a]
-th3:=ece1(orece2,a1):not(b)
-o@[b1:b]
-th4:=ece2(orece2,b1):not(a)
-o@[n:not(a)]
-th5:=ore2(orece1,n):b
-o@[n:not(b)]
-th6:=ore1(orece1,n):a
--orec
-b@iff:=and(imp(a,b),imp(b,a)):'prop'
-[i:imp(a,b)][j:imp(b,a)]
-iffi:=andi(imp(a,b),imp(b,a),i,j):iff(a,b)
-+iff
-b@[a1:a][b1:b]
-th1:=iffi([x:a]b1,[x:b]a1):iff(a,b)
-b@[n:not(a)][m:not(b)]
-th2:=iffi(th2"l.imp"(n),th2"l.imp"(b,a,m)):iff(a,b)
--iff
-b@[i:iff(a,b)]
-iffe1:=ande1(imp(a,b),imp(b,a),i):imp(a,b)
-iffe2:=ande2(imp(a,b),imp(b,a),i):imp(b,a)
-comiff:=iffi(b,a,iffe2,iffe1):iff(b,a)
-+*iff
-i@[a1:a]
-th3:=<a1>iffe1:b
-i@[b1:b]
-th4:=<b1>iffe2:a
-i@[n:not(a)]
-th5:=th3"l.imp"(b,a,n,iffe2):not(b)
-i@[n:not(b)]
-th6:=th3"l.imp"(n,iffe1):not(a)
-b@[a1:a][n:not(b)]
-th7:=th1"l.and"(imp(a,b),imp(b,a),th4"l.imp"(a1,n)):not(iff(a,b))
-b@[n:not(a)][b1:b]
-th8:=th2"l.and"(imp(a,b),imp(b,a),th4"l.imp"(b,a,b1,n)):not(iff(a,b))
--iff
-a@refiff:=iffi(a,refimp,refimp):iff(a,a)
-b@[i:iff(a,b)]
-symiff:=comiff(i):iff(b,a)
-c@[i:iff(a,b)][j:iff(b,c)]
-triff:=iffi(a,c,trimp(iffe1(i),iffe1(b,c,j)),trimp(c,b,a,iffe2(b,c,j),iffe2(i))):iff(a,c)
-+*iff
-b@[i:iff(a,b)]
-th9:=[x:not(a)]th5(i,x):imp(not(a),not(b))
-th10:=[x:not(b)]th6(i,x):imp(not(b),not(a))
-th11:=iffi(not(a),not(b),th9,th10):iff(not(a),not(b))
-b@[i:imp(not(a),not(b))][j:imp(not(b),not(a))]
-th12:=iffi(cp(j),cp(b,a,i)):iff(a,b)
-b@[o:orec(a,b)]
-th13:=iffi(not(b),orece2(o),comor(orece1(o))):iff(a,not(b))
-th14:=th13(b,a,comorec(o)):iff(b,not(a))
-b@[i:iff(a,not(b))]
-th15:=oreci(comor(b,a,iffe2(not(b),i)),iffe1(not(b),i)):orec(a,b)
-b@[i:iff(b,not(a))]
-th16:=comorec(b,a,th15(b,a,i)):orec(a,b)
-c@[i:iff(a,b)][j:imp(a,c)]
-thimp1:=trimp(b,a,c,iffe2(i),j):imp(b,c)
-i@[j:imp(c,a)]
-thimp2:=trimp(c,a,b,j,iffe1(i)):imp(c,b)
-i@[e:ec(a,c)]
-thec1:=th3"l.ec"(c,b,e,iffe2(i)):ec(b,c)
-i@[e:ec(c,a)]
-thec2:=th4"l.ec"(c,a,b,e,iffe2(i)):ec(c,b)
-i@[a1:and(a,c)]
-thand1:=th6"l.and"(c,b,a1,iffe1(i)):and(b,c)
-i@[a1:and(c,a)]
-thand2:=th7"l.and"(c,a,b,a1,iffe1(i)):and(c,b)
-i@[o:or(a,c)]
-thor1:=th7"l.or"(c,b,o,iffe1(i)):or(b,c)
-i@[o:or(c,a)]
-thor2:=th8"l.or"(c,a,b,o,iffe1(i)):or(c,b)
-i@[o:orec(a,c)]
-thorec1:=oreci(b,c,thor1(orece1(a,c,o)),thec1(orece2(a,c,o))):orec(b,c)
-i@[o:orec(c,a)]
-thorec2:=oreci(c,b,thor2(orece1(c,a,o)),thec2(orece2(c,a,o))):orec(c,b)
--iff
-@[sigma:'type'][p:[x:sigma]'prop']
-all:=p:'prop'
-[a1:all(sigma,p)][s:sigma]
-alle:=<s>a1:<s>p
-+all
-p@[s:sigma][n:not(<s>p)]
-th1:=[x:all(sigma,p)]<<s>x>n:not(all(sigma,p))
--all
-p@non:=[x:sigma]not(<x>p):[x:sigma]'prop'
-some:=not(non(p)):'prop'
-[s:sigma][sp:<s>p]
-somei:=th1".all"(non(p),s,weli(<s>p,sp)):some(sigma,p)
-+some
-p@[n:not(all(sigma,p))][m:non(non(p))][s:sigma]
-t1:=et(<s>p,<s>m):<s>p
-%set etared
-m@t2:=<[x:sigma]t1(x)>n:con
-%reset etared
-n@th1:=[x:non(non(p))]t2(x):some(non(p))
-p@[s:some(non(p))][a1:all(sigma,p)][t:sigma]
-t3:=weli(<t>p,<t>a1):not(not(<t>p))
-a1@t4:=<[x:sigma]t3(x)>s:con
-s@th2:=[x:all(sigma,p)]t4(x):not(all(sigma,p))
-p@[n:not(some(sigma,p))]
-th3:=et(non(p),n):non(p)
-[s:sigma]
-th4:=<s>th3:not(<s>p)
-p@[n:non(p)]
-th5:=weli(non(p),n):not(some(sigma,p))
--some
-p@[s:some(sigma,p)][x:'prop'][i:[y:sigma]imp(<y>p,x)]
-+*some
-i@[n:not(x)][t:sigma]
-t5:=th3"l.imp"(<t>p,x,n,<t>i):not(<t>p)
-n@t6:=mp(some(sigma,p),con,s,th5([y:sigma]t5(y))):con
--some
-i@someapp:=et(x,[y:not(x)]t6".some"(y)):x
-+*some
-p@[q:[x:sigma]'prop'][s:some(sigma,p)][i:[x:sigma]imp(<x>p,<x>q)]
-th6:=someapp(s,some(q),[x:sigma][y:<x>p]somei(q,x,mp(<x>p,<x>q,y,<x>i))):some(q)
--some
-c@or3:=or(a,or(b,c)):'prop'
-[o:or3(a,b,c)][n:not(a)]
-+or3
-th1:=ore2(or(b,c),o,n):or(b,c)
--or3
-[m:not(b)]
-or3e3:=ore2(b,c,th1".or3",m):c
-o@[n:not(b)]
-+*or3
-n@th2:=th2"l.or"(c,a,[x:not(a)]or3e3(x,n)):or(c,a)
--or3
-n@[m:not(c)]
-or3e1:=ore2(c,a,th2".or3",m):a
-o@[n:not(c)]
-+*or3
-n@th3:=th2"l.or"([x:not(b)]or3e1(x,n)):or(a,b)
--or3
-n@[m:not(a)]
-or3e2:=ore2(th3".or3",m):b
-+*or3
-o@th4:=th1"l.or"(b,or(c,a),[x:not(b)]th2(x)):or3(b,c,a)
-th5:=th4(b,c,a,th4):or3(c,a,b)
--or3
-c@[a1:a]
-or3i1:=ori1(a,or(b,c),a1):or3(a,b,c)
-c@[b1:b]
-or3i2:=ori2(a,or(b,c),ori1(b,c,b1)):or3(a,b,c)
-c@[c1:c]
-or3i3:=ori2(a,or(b,c),ori2(b,c,c1)):or3(a,b,c)
-+*or3
-c@[o:or(a,b)]
-th6:=th4"or3"(c,a,b,ori2(c,or(a,b),o)):or3(a,b,c)
-c@[o:or(b,c)]
-th7:=ori2(or(b,c),o):or3(a,b,c)
-c@[o:or(c,a)]
-th8:=th4"or3"(c,a,b,th6(c,a,b,o)):or3(a,b,c)
--or3
-d@[o:or3(a,b,c)][i:imp(a,d)][j:imp(b,d)][k:imp(c,d)]
-or3app:=orapp(or(b,c),d,o,i,[x:or(b,c)]orapp(b,c,d,x,j,k)):d
-c@and3:=and(a,and(b,c)):'prop'
-[a1:and3(a,b,c)]
-and3e1:=ande1(and(b,c),a1):a
-and3e2:=ande1(b,c,ande2(and(b,c),a1)):b
-and3e3:=ande2(b,c,ande2(and(b,c),a1)):c
-c@[a1:a][b1:b][c1:c]
-and3i:=andi(a,and(b,c),a1,andi(b,c,b1,c1)):and3(a,b,c)
-+and3
-c@[a1:and3(a,b,c)]
-th1:=and3i(b,c,a,and3e2(a1),and3e3(a1),and3e1(a1)):and3(b,c,a)
-th2:=th1(b,c,a,th1):and3(c,a,b)
-th3:=andi(and3e1(a1),and3e2(a1)):and(a,b)
-th4:=ande2(and(b,c),a1):and(b,c)
-th5:=th3(c,a,b,th2):and(c,a)
-th6:=and3i(c,b,a,and3e3(a1),and3e2(a1),and3e1(a1)):and3(c,b,a)
--and3
-c@ec3:=and3(ec,ec(b,c),ec(c,a)):'prop'
-[e:ec3(a,b,c)]
-+ec3
-th1:=and3e1(ec,ec(b,c),ec(c,a),e):ec(a,b)
-th2:=and3e2(ec,ec(b,c),ec(c,a),e):ec(b,c)
-th3:=and3e3(ec,ec(b,c),ec(c,a),e):ec(c,a)
-th4:=th1"l.and3"(ec,ec(b,c),ec(c,a),e):ec3(b,c,a)
-th5:=th4(b,c,a,th4):ec3(c,a,b)
-th5a:=and3i(ec(c,b),ec(b,a),ec(a,c),comec(b,c,th2(e)),comec(a,b,th1(e)),comec(c,a,th3(e))):ec3(c,b,a)
--ec3
-[a1:a]
-ec3e12:=ece1(th1".ec3",a1):not(b)
-ec3e13:=ece2(c,a,th3".ec3",a1):not(c)
-e@[b1:b]
-ec3e23:=ec3e12(b,c,a,th4".ec3",b1):not(c)
-ec3e21:=ec3e13(b,c,a,th4".ec3",b1):not(a)
-e@[c1:c]
-ec3e31:=ec3e12(c,a,b,th5".ec3",c1):not(a)
-ec3e32:=ec3e13(c,a,b,th5".ec3",c1):not(b)
-+*ec3
-c@[e:ec(a,b)][f:ec(b,c)][g:ec(c,a)]
-th6:=and3i(ec,ec(b,c),ec(c,a),e,f,g):ec3(a,b,c)
-c@[e:ec3(a,b,c)][o:or(a,b)]
-th7:=orapp(not(c),o,[x:a]ece2(c,a,th3"ec3"(e),x),[x:b]ece1(b,c,th2"ec3"(e),x)):not(c)
-e@[o:or(b,c)]
-th8:=th7(b,c,a,th4"ec3"(e),o):not(a)
-e@[o:or(c,a)]
-th9:=th7(c,a,b,th5"ec3"(e),o):not(b)
--ec3
-c@[n:not(a)][m:not(b)]
-ec3i1:=th6".ec3"(eci1(n),eci1(b,c,m),eci2(c,a,n)):ec3(a,b,c)
-c@[n:not(b)][m:not(c)]
-ec3i2:=th6".ec3"(eci2(n),eci1(b,c,n),eci1(c,a,m)):ec3(a,b,c)
-c@[n:not(c)][m:not(a)]
-ec3i3:=th6".ec3"(eci1(m),eci2(b,c,n),eci1(c,a,n)):ec3(a,b,c)
-+*ec3
-d@[e:'prop'][f:'prop'][o1:or3(a,b,c)][p1:ec3(d,e,f)][i:imp(a,d)][j:imp(b,e)][k:imp(c,f)][d1:d]
-t1:=[x:b]mp(e,con,<x>j,ec3e12(d,e,f,p1,d1)):not(b)
-t2:=[x:c]mp(f,con,<x>k,ec3e13(d,e,f,p1,d1)):not(c)
-th10:=or3e1(o1,t1,t2):a
-k@[e1:e]
-th11:=th10(b,c,a,e,f,d,th4"l.or3"(o1),th4"ec3"(d,e,f,p1),j,k,i,e1):b
-k@[f1:f]
-th12:=th10(c,a,b,f,d,e,th5"l.or3"(o1),th5"ec3"(d,e,f,p1),k,i,j,f1):c
--ec3
-c@orec3:=and(or3(a,b,c),ec3(a,b,c)):'prop'
-[o:orec3(a,b,c)]
-orec3e1:=ande1(or3(a,b,c),ec3(a,b,c),o):or3(a,b,c)
-orec3e2:=ande2(or3(a,b,c),ec3(a,b,c),o):ec3(a,b,c)
-c@[o:or3(a,b,c)][e:ec3(a,b,c)]
-orec3i:=andi(or3(a,b,c),ec3(a,b,c),o,e):orec3(a,b,c)
-+orec3
-c@[o:orec3(a,b,c)]
-th1:=orec3i(b,c,a,th4"l.or3"(orec3e1(o)),th4"l.ec3"(orec3e2(o))):orec3(b,c,a)
-th2:=orec3i(c,a,b,th5"l.or3"(orec3e1(o)),th5"l.ec3"(orec3e2(o))):orec3(c,a,b)
--orec3
-+e
-sigma@[s:sigma][t:sigma]
-is:='prim':'prop'
-s@refis:='prim':is(s,s)
-p@[s:sigma][t:sigma][sp:<s>p][i:is(s,t)]
-isp:='prim':<t>p
-sigma@[s:sigma][t:sigma][i:is(s,t)]
-symis:=isp([x:sigma]is(x,s),s,t,refis(s),i):is(t,s)
-t@[u:sigma][i:is(s,t)][j:is(t,u)]
-tris:=isp([x:sigma]is(x,u),t,s,j,symis(i)):is(s,u)
-u@[i:is(u,s)][j:is(u,t)]
-tris1:=tris(s,u,t,symis(u,s,i),j):is(s,t)
-u@[i:is(s,u)][j:is(t,u)]
-tris2:=tris(s,u,t,i,symis(t,u,j)):is(s,t)
-sp@[i:is(t,s)]
-isp1:=isp(symis(t,s,i)):<t>p
-t@[n:not(is(s,t))]
-symnotis:=th3"l.imp"(is(t,s),is(s,t),n,[x:is(t,s)]symis(t,s,x)):not(is(t,s))
-+notis
-u@[n:not(is(s,t))][i:is(s,u)]
-th1:=isp([x:sigma]not(is(x,t)),s,u,n,i):not(is(u,t))
-n@[i:is(u,s)]
-th2:=th1(symis(u,s,i)):not(is(u,t))
-n@[i:is(t,u)]
-th3:=isp([x:sigma]not(is(s,x)),t,u,n,i):not(is(s,u))
-n@[i:is(u,t)]
-th4:=th3(symis(u,t,i)):not(is(s,u))
-u@[v:sigma][n:not(is(s,t))][i:is(s,u)][j:is(t,v)]
-th5:=th3(u,t,v,th1(n,i),j):not(is(u,v))
--notis
-u@[v:sigma][i:is(s,t)][j:is(t,u)][k:is(u,v)]
-tr3is:=tris(s,u,v,tris(i,j),k):is(s,v)
-v@[w:sigma][i:is(s,t)][j:is(t,u)][k:is(u,v)][l:is(v,w)]
-tr4is:=tris(s,v,w,tr3is(i,j,k),l):is(s,w)
-p@amone:=[x:sigma][y:sigma][u:<x>p][v:<y>p]is(x,y):'prop'
-[a1:amone(sigma,p)][s:sigma][t:sigma][sp:<s>p][tp:<t>p]
-amonee:=<tp><sp><t><s>a1:is(s,t)
-p@one:=and(amone(sigma,p),some(sigma,p)):'prop'
-[a1:amone(sigma,p)][s:some(sigma,p)]
-onei:=andi(amone(sigma,p),some(sigma,p),a1,s):one(sigma,p)
-p@[o1:one(sigma,p)]
-onee1:=ande1(amone(sigma,p),some(sigma,p),o1):amone(sigma,p)
-onee2:=ande2(amone(sigma,p),some(sigma,p),o1):some(sigma,p)
-ind:='prim':sigma
-oneax:='prim':<ind>p
-+one
-[s:sigma][sp:<s>p]
-th1:=amonee(onee1,ind,s,oneax,sp):is(ind,s)
--one
-sigma@[tau:'type'][f:[x:sigma]tau][s:sigma][t:sigma][i:is(s,t)]
-isf:=isp(sigma,[x:sigma]is(tau,<s>f,<x>f),s,t,refis(tau,<s>f),i):is(tau,<s>f,<t>f)
-f@injective:=all([x:sigma]all([y:sigma]imp(is(tau,<x>f,<y>f),is(x,y)))):'prop'
-[i:injective(f)][s:sigma][t:sigma][j:is(tau,<s>f,<t>f)]
-isfe:=<j><t><s>i:is(s,t)
-f@[t0:tau]
-image:=some([x:sigma]is(tau,t0,<x>f)):'prop'
-f@[s:sigma]
-tofs:=<s>f:tau
-imagei:=somei([x:sigma]is(tau,tofs,<x>f),s,refis(tau,tofs)):image(tofs)
-+inj
-i@[ta:tau][tb:tau][j:is(tau,ta,tb)][sa:sigma][sb:sigma][ja:is(tau,ta,tofs(sa))][jb:is(tau,tb,tofs(sb))]
-t1:=tr3is(tau,tofs(sa),ta,tb,tofs(sb),symis(tau,ta,tofs(sa),ja),j,jb):is(tau,tofs(sa),tofs(sb))
-th1:=isfe(sa,sb,t1):is(sa,sb)
-i@[t0:tau]
-th2:=[x:sigma][y:sigma][u:is(tau,t0,<x>f)][v:is(tau,t0,<y>f)]th1(t0,t0,refis(tau,t0),x,y,u,v):amone([x:sigma]is(tau,t0,<x>f))
-[j:image(f,t0)]
-th3:=onei([x:sigma]is(tau,t0,<x>f),th2,j):one([x:sigma]is(tau,t0,<x>f))
--inj
-i@[t0:tau][j:image(f,t0)]
-soft:=ind([x:sigma]is(tau,t0,<x>f),th3".inj"(t0,j)):sigma
-i@inverse:=[x:tau][u:image(f,x)]soft(x,u):[x:tau][u:image(f,x)]sigma
-j@ists1:=oneax([x:sigma]is(tau,t0,<x>f),th3".inj"(t0,j)):is(tau,t0,tofs(soft(t0,j)))
-ists2:=symis(tau,t0,tofs(soft(t0,j)),ists1):is(tau,tofs(soft(t0,j)),t0)
-i@[ta:tau][ja:image(ta)][tb:tau][jb:image(tb)][j:is(tau,ta,tb)]
-isinv:=th1".inj"(ta,tb,j,soft(ta,ja),soft(tb,jb),ists1(ta,ja),ists1(tb,jb)):is(soft(ta,ja),soft(tb,jb))
-jb@[j:is(soft(ta,ja),soft(tb,jb))]
-isinve:=tr3is(tau,ta,tofs(soft(ta,ja)),tofs(soft(tb,jb)),tb,ists1(ta,ja),isf(soft(ta,ja),soft(tb,jb),j),ists2(tb,jb)):is(tau,ta,tb)
-i@[s:sigma]
-isst1:=isfe(s,soft(tofs(s),imagei(s)),ists1(tofs(s),imagei(s))):is(s,soft(tofs(s),imagei(s)))
-isst2:=symis(s,soft(tofs(s),imagei(s)),isst1):is(soft(tofs(s),imagei(s)),s)
-f@surjective:=all(tau,[x:tau]image(x)):'prop'
-bijective:=and(injective,surjective):'prop'
-[b:bijective(f)]
-+*inj
-b@t2:=ande1(injective,surjective,b):injective(f)
-t3:=ande2(injective,surjective,b):surjective(f)
-[t:tau]
-so:=soft(t2,t,<t>t3):sigma
--inj
-b@invf:=[x:tau]so".inj"(x):[x:tau]sigma
-[s:sigma]
-thinvf1:=tris(s,soft(t2".inj",tofs(s),imagei(s)),<<s>f>invf,isst1(t2".inj",s),isinv(t2".inj",tofs(s),imagei(s),tofs(s),<tofs(s)>t3".inj",refis(tau,tofs(s)))):is(s,<<s>f>invf)
-b@[t:tau]
-thinvf2:=ists1(t2".inj",t,<t>t3".inj"):is(tau,t,<<t>invf>f)
-tau@[upsilon:'type'][f:[x:sigma]tau][g:[x:tau]upsilon]
-+*inj
-g@[if:injective(sigma,tau,f)][ig:injective(tau,upsilon,g)]
-h:=[x:sigma]<<x>f>g:[x:sigma]upsilon
-[s:sigma][t:sigma][i:is(upsilon,<s>h,<t>h)]
-t4:=isfe(tau,upsilon,g,ig,<s>f,<t>f,i):is(tau,<s>f,<t>f)
-t5:=isfe(f,if,s,t,t4):is(s,t)
-ig@th4:=[x:sigma][y:sigma][v:is(upsilon,<x>h,<y>h)]t5(x,y,v):injective(sigma,upsilon,[x:sigma]<<x>f>g)
--inj
-+surj
-g@[sf:surjective(sigma,tau,f)][sg:surjective(tau,upsilon,g)]
-h:=[x:sigma]<<x>f>g:[x:sigma]upsilon
-[u:upsilon]
-t1:=<u>sg:image(tau,upsilon,g,u)
-[t:tau][i:is(upsilon,u,<t>g)]
-t2:=<t>sf:image(sigma,tau,f,t)
-[s:sigma][j:is(tau,t,<s>f)]
-t3:=tris(upsilon,u,<t>g,<s>h,i,isf(tau,upsilon,g,t,<s>f,j)):is(upsilon,u,<s>h)
-t4:=somei([x:sigma]is(upsilon,u,<x>h),s,t3):image(sigma,upsilon,h,u)
-i@t5:=someapp([x:sigma]is(tau,t,<x>f),t2,image(sigma,upsilon,h,u),[x:sigma][v:is(tau,t,<x>f)]t4(x,v)):image(sigma,upsilon,h,u)
-u@t6:=someapp(tau,[x:tau]is(upsilon,u,<x>g),t1,image(sigma,upsilon,h,u),[x:tau][v:is(upsilon,u,<x>g)]t5(x,v)):image(sigma,upsilon,h,u)
-sg@th1:=[x:upsilon]t6(x):surjective(sigma,upsilon,[x:sigma]<<x>f>g)
--surj
-+bij
-g@[bf:bijective(sigma,tau,f)][bg:bijective(tau,upsilon,g)]
-h:=[x:sigma]<<x>f>g:[x:sigma]upsilon
-t1:=th4"e.inj"(f,g,ande1(injective(f),surjective(f),bf),ande1(injective(tau,upsilon,g),surjective(tau,upsilon,g),bg)):injective(sigma,upsilon,h)
-t2:=th1"e.surj"(f,g,ande2(injective(f),surjective(f),bf),ande2(injective(tau,upsilon,g),surjective(tau,upsilon,g),bg)):surjective(sigma,upsilon,h)
-th1:=andi(injective(sigma,upsilon,h),surjective(sigma,upsilon,h),t1,t2):bijective(sigma,upsilon,[x:sigma]<<x>f>g)
--bij
-tau@[f:[x:sigma]tau][g:[x:sigma]tau][i:is([x:sigma]tau,f,g)][s:sigma]
-fise:=isp([x:sigma]tau,[y:[x:sigma]tau]is(tau,<s>f,<s>y),f,g,refis(tau,<s>f),i):is(tau,<s>f,<s>g)
-g@[i:[x:sigma]is(tau,<x>f,<x>g)]
-fisi:='prim':is([x:sigma]tau,f,g)
-+fis
-g@[i:is([x:sigma]tau,f,g)][s:sigma][t:sigma][j:is(s,t)]
-th1:=tris(tau,<s>f,<t>f,<t>g,isf(f,s,t,j),fise(i,t)):is(tau,<s>f,<t>g)
--fis
-p@ot:='prim':'type'
-[o1:ot]
-in:='prim':sigma
-inp:='prim':<in>p
-p@otax1:='prim':injective(ot,sigma,[x:ot]in(x))
-[s:sigma][sp:<s>p]
-otax2:='prim':image(ot,sigma,[x:ot]in(x),s)
-o1@[o2:ot][i:is(ot,o1,o2)]
-isini:=isf(ot,sigma,[x:ot]in(x),o1,o2,i):is(in(o1),in(o2))
-o2@[i:is(in(o1),in(o2))]
-isine:=isfe(ot,sigma,[x:ot]in(x),otax1,o1,o2,i):is(ot,o1,o2)
-sp@out:=soft(ot,sigma,[x:ot]in(x),otax1,s,otax2):ot
-[t:sigma][tp:<t>p][i:is(s,t)]
-isouti:=isinv(ot,sigma,[x:ot]in(x),otax1,s,otax2,t,otax2(t,tp),i):is(ot,out(s,sp),out(t,tp))
-tp@[i:is(ot,out(s,sp),out(t,tp))]
-isoute:=isinve(ot,sigma,[x:ot]in(x),otax1,s,otax2,t,otax2(t,tp),i):is(s,t)
-o1@isoutin:=tris(ot,o1,soft(ot,sigma,[x:ot]in(x),otax1,in(o1),imagei(ot,sigma,[x:ot]in(x),o1)),out(in(o1),inp(o1)),isst1(ot,sigma,[x:ot]in(x),otax1,o1),isinv(ot,sigma,[x:ot]in(x),otax1,in(o1),imagei(ot,sigma,[x:ot]in(x),o1),in(o1),otax2(in(o1),inp(o1)),refis(sigma,in(o1)))):is(ot,o1,out(in(o1),inp(o1)))
-sp@isinout:=ists1(ot,sigma,[x:ot]in(x),otax1,s,otax2):is(s,in(out(s,sp)))
-tau@pairtype:='prim':'type'
-[s:sigma][t:tau]
-pair:='prim':pairtype
-tau@[p1:pairtype]
-first:='prim':sigma
-second:='prim':tau
-pairis1:='prim':is(pairtype,pair(first,second),p1)
-pairis2:=symis(pairtype,pair(first,second),p1,pairis1):is(pairtype,p1,pair(first,second))
-t@firstis1:='prim':is(sigma,first(pair),s)
-firstis2:=symis(sigma,first(pair),s,firstis1):is(sigma,s,first(pair))
-secondis1:='prim':is(tau,second(pair),t)
-secondis2:=symis(tau,second(pair),t,secondis1):is(tau,t,second(pair))
-a@[ksi:'type'][x:ksi][y:ksi]
-+ite
-[z:ksi]
-prop1:=and(imp(a,is(ksi,z,x)),imp(not(a),is(ksi,z,y))):'prop'
-y@[a1:a][x1:ksi][y1:ksi][px1:prop1(x1)][py1:prop1(y1)]
-t1:=ande1(imp(a,is(ksi,x1,x)),imp(not(a),is(ksi,x1,y)),px1):imp(a,is(ksi,x1,x))
-t2:=mp(a,is(ksi,x1,x),a1,t1):is(ksi,x1,x)
-t3:=t2(y1,x1,py1,px1):is(ksi,y1,x)
-t4:=tris2(ksi,x1,y1,x,t2,t3):is(ksi,x1,y1)
-a1@t5:=[s:ksi][t:ksi][ps:prop1(s)][pt:prop1(t)]t4(s,t,ps,pt):amone(ksi,[t:ksi]prop1(t))
-t6:=[x1:a]refis(ksi,x):imp(a,is(ksi,x,x))
-t7:=th2"l.imp"(not(a),is(ksi,x,y),weli(a,a1)):imp(not(a),is(ksi,x,y))
-t8:=andi(imp(a,is(ksi,x,x)),imp(not(a),is(ksi,x,y)),t6,t7):prop1(x)
-t9:=somei(ksi,[t:ksi]prop1(t),x,t8):some(ksi,[t:ksi]prop1(t))
-t10:=onei(ksi,[t:ksi]prop1(t),t5,t9):one(ksi,[t:ksi]prop1(t))
-y@[n:not(a)][x1:ksi][y1:ksi][px1:prop1(x1)][py1:prop1(y1)]
-t11:=ande2(imp(a,is(ksi,x1,x)),imp(not(a),is(ksi,x1,y)),px1):imp(not(a),is(ksi,x1,y))
-t12:=mp(not(a),is(ksi,x1,y),n,t11):is(ksi,x1,y)
-t13:=t12(y1,x1,py1,px1):is(ksi,y1,y)
-t14:=tris2(ksi,x1,y1,y,t12,t13):is(ksi,x1,y1)
-n@t15:=[s:ksi][t:ksi][ps:prop1(s)][pt:prop1(t)]t14(s,t,ps,pt):amone(ksi,[t:ksi]prop1(t))
-t16:=[x1:not(a)]refis(ksi,y):imp(not(a),is(ksi,y,y))
-t17:=th2"l.imp"(a,is(ksi,y,x),n):imp(a,is(ksi,y,x))
-t18:=andi(imp(a,is(ksi,y,x)),imp(not(a),is(ksi,y,y)),t17,t16):prop1(y)
-t19:=somei(ksi,[t:ksi]prop1(t),y,t18):some(ksi,[t:ksi]prop1(t))
-t20:=onei(ksi,[t:ksi]prop1(t),t15,t19):one(ksi,[t:ksi]prop1(t))
-y@t21:=th1"l.imp"(a,one(ksi,[t:ksi]prop1(t)),[t:a]t10(t),[t:not(a)]t20(t)):one(ksi,[t:ksi]prop1(t))
--ite
-ite:=ind(ksi,[t:ksi]prop1".ite"(t),t21".ite"):ksi
-+*ite
-y@t22:=oneax(ksi,[t:ksi]prop1(t),t21):prop1(ite)
-t23:=ande1(imp(a,is(ksi,ite,x)),imp(not(a),is(ksi,ite,y)),t22):imp(a,is(ksi,ite,x))
-t24:=ande2(imp(a,is(ksi,ite,x)),imp(not(a),is(ksi,ite,y)),t22):imp(not(a),is(ksi,ite,y))
--ite
-y@[a1:a]
-itet:=mp(a,is(ksi,ite,x),a1,t23".ite"):is(ksi,ite,x)
-y@[n:not(a)]
-itef:=mp(not(a),is(ksi,ite,y),n,t24".ite"):is(ksi,ite,y)
-sigma@[s0:sigma][t0:sigma]
-+wissel
-[s:sigma]
-wa:=ite(is(s,s0),sigma,t0,s):sigma
-[i:is(s,s0)]
-t1:=itet(is(s,s0),sigma,t0,s,i):is(wa,t0)
-s@[n:not(is(s,s0))]
-t2:=itef(is(s,s0),sigma,t0,s,n):is(wa,s)
-s@wb:=ite(is(s,t0),sigma,s0,wa):sigma
-[i:is(s,t0)]
-t3:=itet(is(s,t0),sigma,s0,wa,i):is(wb,s0)
-s@[n:not(is(s,t0))]
-t4:=itef(is(s,t0),sigma,s0,wa,n):is(wb,wa)
-s@[i:is(s,s0)][j:is(s0,t0)]
-t5:=tris(wb,s0,t0,t3(tris(s,s0,t0,i,j)),j):is(wb,t0)
-i@[n:not(is(s0,t0))]
-t6:=tris(wb,wa,t0,t4(th2"e.notis"(s0,t0,s,n,i)),t1(i)):is(wb,t0)
-i@t7:=th1"l.imp"(is(s0,t0),is(wb,t0),[t:is(s0,t0)]t5(t),[t:not(is(s0,t0))]t6(t)):is(wb,t0)
-s@[n:not(is(s,s0))][o:not(is(s,t0))]
-t8:=tris(wb,wa,s,t4(o),t2(n)):is(wb,s)
--wissel
-wissel:=[x:sigma]wb".wissel"(x):[x:sigma]sigma
-[s:sigma][i:is(s,s0)]
-iswissel1:=t7".wissel"(s,i):is(<s>wissel,t0)
-s@[i:is(s,t0)]
-iswissel2:=t3".wissel"(s,i):is(<s>wissel,s0)
-s@[n:not(is(s,s0))][o:not(is(s,t0))]
-iswissel3:=t8".wissel"(s,n,o):is(<s>wissel,s)
-+*wissel
-s@[t:sigma][i:is(wb(s),wb(t))][n:not(is(s,t))][j:is(s,s0)]
-t9:=symnotis(s0,t,th1"e.notis"(s,t,s0,n,j)):not(is(t,s0))
-[k:is(s0,t0)]
-t10:=th3"e.notis"(t,s0,t0,t9,k):not(is(t,t0))
-t11:=tris(wb(s),wb(t),t,i,t8(t,t9,t10)):is(wb(s),t)
-t12:=<tris1(t,t0,wb(s),t11,t7(j))>t10:con
-j@t13:=[v:is(s0,t0)]t12(v):not(is(s0,t0))
-[k:is(t,t0)]
-t14:=tris(wb(s),wb(t),s0,i,t3(t,k)):is(wb(s),s0)
-t15:=t12(tris1(s0,t0,wb(s),t14,t7(j))):con
-j@t16:=[v:is(t,t0)]t15(v):not(is(t,t0))
-t17:=tris(wb(s),wb(t),t,i,t8(t,t9,t16)):is(wb(s),t)
-t18:=t15(tris1(t,t0,wb(s),t17,t7(j))):con
-n@t19:=[v:is(s,s0)]t18(v):not(is(s,s0))
-t20:=t19(t,s,symis(wb(s),wb(t),i),symnotis(s,t,n)):not(is(t,s0))
-[j:is(s,t0)]
-t21:=symnotis(t0,t,th1"e.notis"(s,t,t0,n,j)):not(is(t,t0))
-t22:=tris(wb(s),wb(t),t,i,t8(t,t20,t21)):is(wb(s),t)
-t23:=<tris1(t,s0,wb(s),t22,t3(j))>t20:con
-n@t24:=[v:is(s,t0)]t23(v):not(is(s,t0))
-t25:=t24(t,s,symis(wb(s),wb(t),i),symnotis(s,t,n)):not(is(t,t0))
-t26:=tris(wb(s),wb(t),t,i,t8(t,t20,t25)):is(wb(s),t)
-t27:=<tris1(s,t,wb(s),t8(t19,t24),t26)>n:con
-i@t28:=et(is(s,t),[v:not(is(s,t))]t27(v)):is(s,t)
-t0@th1:=[x:sigma][y:sigma][v:is(wb(x),wb(y))]t28(x,y,v):injective(sigma,sigma,wissel)
-s@[i:is(s,s0)]
-t29:=tris2(s,wb(t0),s0,i,t3(t0,refis(t0))):is(s,wb(t0))
-t30:=somei(sigma,[x:sigma]is(s,wb(x)),t0,t29):image(sigma,sigma,wissel,s)
-s@[i:is(s,t0)]
-t31:=tris2(s,wb(s0),t0,i,t7(s0,refis(s0))):is(s,wb(s0))
-t32:=somei(sigma,[x:sigma]is(s,wb(x)),s0,t31):image(sigma,sigma,wissel,s)
-s@[n:not(is(s,s0))][o:not(is(s,t0))]
-t33:=symis(wb(s),s,t8(n,o)):is(s,wb(s))
-t34:=somei(sigma,[x:sigma]is(s,wb(x)),s,t33):image(sigma,sigma,wissel,s)
-n@t35:=th1"l.imp"(is(s,t0),image(sigma,sigma,wissel,s),[v:is(s,t0)]t32(v),[v:not(is(s,t0))]t34(v)):image(sigma,sigma,wissel,s)
-s@t36:=th1"l.imp"(is(s,s0),image(sigma,sigma,wissel,s),[v:is(s,s0)]t30(v),[v:not(is(s,s0))]t35(v)):image(sigma,sigma,wissel,s)
-t0@th2:=[x:sigma]t36(x):surjective(sigma,sigma,wissel)
-th3:=andi(injective(sigma,sigma,wissel),surjective(sigma,sigma,wissel),th1,th2):bijective(sigma,sigma,wissel)
--wissel
-tau@[f:[x:sigma]tau][s0:sigma][t0:sigma]
-changef:=[x:sigma]<<x>wissel(s0,t0)>f:[x:sigma]tau
-[s:sigma][i:is(s,s0)]
-changef1:=isf(sigma,tau,f,<s>wissel(s0,t0),t0,iswissel1(s0,t0,s,i)):is(tau,<s>changef,<t0>f)
-s@[i:is(s,t0)]
-changef2:=isf(sigma,tau,f,<s>wissel(s0,t0),s0,iswissel2(s0,t0,s,i)):is(tau,<s>changef,<s0>f)
-s@[n:not(is(s,s0))][o:not(is(s,t0))]
-changef3:=isf(sigma,tau,f,<s>wissel(s0,t0),s,iswissel3(s0,t0,s,n,o)):is(tau,<s>changef,<s>f)
-+*wissel
-t0@[i:injective(f)]
-th4:=th4"e.inj"(sigma,sigma,tau,wissel(s0,t0),f,th1(s0,t0),i):injective(changef)
-t0@[s:surjective(f)]
-th5:=th1"e.surj"(sigma,sigma,tau,wissel(s0,t0),f,th2(s0,t0),s):surjective(changef)
-t0@[b:bijective(f)]
-th6:=th1"e.bij"(sigma,sigma,tau,wissel(s0,t0),f,th3(s0,t0),b):bijective(changef)
--wissel
--e
-+r
-a@[b:[x:a]'prop']
-imp:=b:'prop'
-[a1:a][i:imp(a,b)]
-mp:=<a1>i:<a1>b
-+imp
-b@[n:not(a)]
-%set etared
-th2:=[x:a]cone(<x>b,mp"l"(a,con,x,n)):imp(a,b)
-%reset etared
--imp
-b@ec:=[x:a]not(<x>b):'prop'
-[n:not(a)]
-eci1:=[x:a]cone(not(<x>b),mp"l"(a,con,x,n)):ec(a,b)
-b@[a1:and(a,b)]
-ande2:=<ande1(a,b,a1)>ande2"l"(a,b,a1):<ande1(a,b,a1)>b
-a@[ksi:'type']
-+ite
-[x1:ksi][y1:ksi]
-is:=is"l.e"(ksi,x1,y1):'prop'
--ite
-[x:[t:a]ksi][y:[t:not(a)]ksi][i:[t:a][u:a]is".ite"(<t>x,<u>x)][j:[t:not(a)][u:not(a)]is".ite"(<t>y,<u>y)]
-+*ite
-j@[z:ksi]
-prop1:=and(imp(a,[t:a]is(z,<t>x)),imp(not(a),[t:not(a)]is(z,<t>y))):'prop'
-j@[a1:a][x1:ksi][y1:ksi][px1:prop1(x1)][py1:prop1(y1)]
-t1:=ande1"l"(imp(a,[t:a]is(x1,<t>x)),imp(not(a),[t:not(a)]is(x1,<t>y)),px1):imp(a,[t:a]is(x1,<t>x))
-t2:=mp(a,[t:a]is(x1,<t>x),a1,t1):is(x1,<a1>x)
-t3:=t2(y1,x1,py1,px1):is(y1,<a1>x)
-t4:=tris2"l.e"(ksi,x1,y1,<a1>x,t2,t3):is(x1,y1)
-a1@t5:=[s:ksi][t:ksi][ps:prop1(s)][pt:prop1(t)]t4(s,t,ps,pt):amone"l.e"(ksi,[t:ksi]prop1(t))
-t6:=<a1>i:imp(a,[t:a]is(<a1>x,<t>x))
-t7:=th2"r.imp"(not(a),[t:not(a)]is(<a1>x,<t>y),weli(a,a1)):imp(not(a),[t:not(a)]is(<a1>x,<t>y))
-t8:=andi(imp(a,[t:a]is(<a1>x,<t>x)),imp(not(a),[t:not(a)]is(<a1>x,<t>y)),t6,t7):prop1(<a1>x)
-t9:=somei(ksi,[t:ksi]prop1(t),<a1>x,t8):some(ksi,[t:ksi]prop1(t))
-t10:=onei"l.e"(ksi,[t:ksi]prop1(t),t5,t9):one"l.e"(ksi,[t:ksi]prop1(t))
-j@[n:not(a)][x1:ksi][y1:ksi][px1:prop1(x1)][py1:prop1(y1)]
-t11:=ande2"l"(imp(a,[t:a]is(x1,<t>x)),imp(not(a),[t:not(a)]is(x1,<t>y)),px1):imp(not(a),[t:not(a)]is(x1,<t>y))
-t12:=mp(not(a),[t:not(a)]is(x1,<t>y),n,t11):is(x1,<n>y)
-t13:=t12(y1,x1,py1,px1):is(y1,<n>y)
-t14:=tris2"l.e"(ksi,x1,y1,<n>y,t12,t13):is(x1,y1)
-n@t15:=[s:ksi][t:ksi][ps:prop1(s)][pt:prop1(t)]t14(s,t,ps,pt):amone"l.e"(ksi,[t:ksi]prop1(t))
-t16:=<n>j:imp(not(a),[t:not(a)]is(<n>y,<t>y))
-t17:=th2"r.imp"(a,[t:a]is(<n>y,<t>x),n):imp(a,[t:a]is(<n>y,<t>x))
-t18:=andi"l"(imp(a,[t:a]is(<n>y,<t>x)),imp(not(a),[t:not(a)]is(<n>y,<t>y)),t17,t16):prop1(<n>y)
-t19:=somei(ksi,[t:ksi]prop1(t),<n>y,t18):some(ksi,[t:ksi]prop1(t))
-t20:=onei"l.e"(ksi,[t:ksi]prop1(t),t15,t19):one"l.e"(ksi,[t:ksi]prop1(t))
-j@t21:=th1"l.imp"(a,one"l.e"(ksi,[t:ksi]prop1(t)),[t:a]t10(t),[t:not(a)]t20(t)):one"l.e"(ksi,[t:ksi]prop1(t))
--ite
-j@ite:=ind"l.e"(ksi,[t:ksi]prop1".ite"(t),t21".ite"):ksi
-+*ite
-j@t22:=oneax"l.e"(ksi,[t:ksi]prop1(t),t21):prop1(ite)
-t23:=ande1"l"(imp(a,[t:a]is(ite,<t>x)),imp(not(a),[t:not(a)]is(ite,<t>y)),t22):imp(a,[t:a]is(ite,<t>x))
-t24:=ande2"l"(imp(a,[t:a]is(ite,<t>x)),imp(not(a),[t:not(a)]is(ite,<t>y)),t22):imp(not(a),[t:not(a)]is(ite,<t>y))
--ite
-j@[a1:a]
-itet:=mp(a,[t:a]is".ite"(ite,<t>x),a1,t23".ite"):is".ite"(ksi,ite,<a1>x)
-j@[n:not(a)]
-itef:=mp(not(a),[t:not(a)]is".ite"(ite,<t>y),n,t24".ite"):is".ite"(ksi,ite,<n>y)
--r
-+*e
-+st
-sigma@set:='prim':'type'
-[s:sigma][s0:set]
-esti:='prim':'prop'
-p@setof:='prim':set
-[s:sigma][sp:<s>p]
-estii:='prim':esti(s,setof(p))
-s@[e:esti(s,setof(p))]
-estie:='prim':<s>p
-sigma@[s0:set]
-empty:=non([x:sigma]esti(x,s0)):'prop'
-nonempty:=some([x:sigma]esti(x,s0)):'prop'
-[n:[x:sigma]not(esti(x,s0))]
-emptyi:=n:empty(s0)
-s0@[e:empty(s0)][s:sigma]
-emptye:=<s>e:not(esti(s,s0))
-s0@[s:sigma][ses0:esti(s,s0)]
-nonemptyi:=somei([x:sigma]esti(x,s0),s,ses0):nonempty(s0)
-s0@[n:nonempty(s0)][x:'prop'][x1:[y:sigma][z:esti(y,s0)]x]
-nonemptyapp:=someapp([y:sigma]esti(y,s0),n,x,x1):x
-s0@[t0:set]
-incl:=all([x:sigma]imp(esti(x,s0),esti(x,t0))):'prop'
-[e:[x:sigma][y:esti(x,s0)]esti(x,t0)]
-incli:=e:incl(s0,t0)
-t0@[i:incl(s0,t0)][s:sigma][ses0:esti(s,s0)]
-incle:=<ses0><s>i:esti(s,t0)
-s0@refincl:=[x:sigma][y:esti(x,s0)]y:incl(s0,s0)
-t0@disj:=all([x:sigma]ec(esti(x,s0),esti(x,t0))):'prop'
-[n:[x:sigma][y:esti(x,s0)]not(esti(x,t0))]
-disji1:=n:disj(s0,t0)
-t0@[n:[x:sigma][y:esti(x,t0)]not(esti(x,s0))]
-disji2:=[x:sigma]th2"l.ec"(esti(x,s0),esti(x,t0),<x>n):disj(s0,t0)
-t0@[d:disj(s0,t0)][s:sigma][ses0:esti(s,s0)]
-disje1:=ece1(esti(s,s0),esti(s,t0),<s>d,ses0):not(esti(s,t0))
-s@[set0:esti(s,t0)]
-disje2:=ece2(esti(s,s0),esti(s,t0),<s>d,set0):not(esti(s,s0))
-t0@[d:disj(s0,t0)]
-symdisj:=[x:sigma][y:esti(x,t0)]disje2(d,x,y):disj(t0,s0)
-+disj
-t0@[s:sigma][ses0:esti(s,s0)][set0:esti(s,t0)]
-th1:=th1"l.all"([x:sigma]ec(esti(x,s0),esti(x,t0)),s,th4"l.imp"(esti(s,s0),not(esti(s,t0)),ses0,weli(esti(s,t0),set0))):not(disj(s0,t0))
-th2:=th1(t0,s0,s,set0,ses0):not(disj(t0,s0))
--disj
-t0@[i:is(set,s0,t0)][s:sigma][ses0:esti(s,s0)]
-issete1:=isp(set,[x:set]esti(s,x),s0,t0,ses0,i):esti(s,t0)
-s@[set0:esti(s,t0)]
-issete2:=isp1(set,[x:set]esti(s,x),t0,s0,set0,i):esti(s,s0)
-+isset
-i@th1:=[x:sigma][y:esti(x,s0)]issete1(x,y):incl(s0,t0)
-th2:=[x:sigma][y:esti(x,t0)]issete2(x,y):incl(t0,s0)
--isset
-t0@[i:incl(s0,t0)][j:incl(t0,s0)]
-isseti:='prim':is(set,s0,t0)
-+*isset
-t0@[s:sigma][ses0:esti(s,s0)][n:not(esti(s,t0))]
-th3:=th3"l.imp"(is(set,s0,t0),esti(s,t0),n,[t:is(set,s0,t0)]issete1(t,s,ses0)):not(is(set,s0,t0))
-th4:=symnotis(set,s0,t0,th3):not(is(set,t0,s0))
-s@nissetprop:=and(esti(s,s0),not(esti(s,t0))):'prop'
-[n:not(nissetprop(s0,t0,s))][e:esti(s,s0)]
-t1:=et(esti(s,t0),th3"l.and"(esti(s,s0),not(esti(s,t0)),n,e)):esti(s,t0)
-t0@[n:not(is(set,s0,t0))][m:not(some([x:sigma]nissetprop(s0,t0,x)))][l:non([x:sigma]nissetprop(t0,s0,x))][s:sigma]
-t2:=th4"l.some"([x:sigma]nissetprop(s0,t0,x),m,s):not(nissetprop(s0,t0,s))
-t3:=<s>l:not(nissetprop(t0,s0,s))
-l@t4:=isseti(s0,t0,[x:sigma][y:esti(x,s0)]t1(s0,t0,x,t2(x),y),[x:sigma][y:esti(x,t0)]t1(t0,s0,x,t3(x),y)):is(set,s0,t0)
-m@t5:=th3"l.imp"(non([x:sigma]nissetprop(t0,s0,x)),is(set,s0,t0),n,[y:non([x:sigma]nissetprop(t0,s0,x))]t4(y)):some([x:sigma]nissetprop(t0,s0,x))
-n@th5:=th1"l.or"(some([x:sigma]nissetprop(s0,t0,x)),some([x:sigma]nissetprop(t0,s0,x)),[y:not(some([x:sigma]nissetprop(s0,t0,x)))]t5(y)):or(some([x:sigma]nissetprop(s0,t0,x)),some([x:sigma]nissetprop(t0,s0,x)))
--isset
-sigma@[alpha:'type'][sa:[x:alpha]set]
-unmore:=setof([x:sigma]some(alpha,[y:alpha]esti(x,<y>sa))):set
-[s:sigma][a:alpha][seasa:esti(s,<a>sa)]
-eunmore1:=estii([x:sigma]some(alpha,[y:alpha]esti(x,<y>sa)),s,somei(alpha,[y:alpha]esti(s,<y>sa),a,seasa)):esti(s,unmore(sa))
-s@[seun:esti(s,unmore(sa))][x:'prop'][x1:[y:alpha][z:esti(s,<y>sa)]x]
-unmoreapp:=someapp(alpha,[y:alpha]esti(s,<y>sa),estie([z:sigma]some(alpha,[y:alpha]esti(z,<y>sa)),s,seun),x,x1):x
-+eq
-sigma@[r:[x:sigma][y:sigma]'prop'][refr1:[x:sigma]<x><x>r][symr1:[x:sigma][y:sigma][t:<y><x>r]<x><y>r][trr1:[x:sigma][y:sigma][z:sigma][t:<y><x>r][u:<z><y>r]<z><x>r][s:sigma]
-refr:=<s>refr1:<s><s>r
-[t:sigma][tsr:<t><s>r]
-symr:=<tsr><t><s>symr1:<s><t>r
-t@[u:sigma][tsr:<t><s>r][utr:<u><t>r]
-trr:=<utr><tsr><u><t><s>trr1:<u><s>r
-u@[sur:<s><u>r][tur:<t><u>r]
-tr1r:=trr(s,u,t,symr(u,s,sur),tur):<t><s>r
-u@[usr:<u><s>r][utr:<u><t>r]
-tr2r:=trr(s,u,t,usr,symr(t,u,utr)):<t><s>r
-s@ecelt:=setof(<s>r):set
-+1
-th1:=estii(<s>r,s,refr):esti(s,ecelt(s))
-t@[tsr:<t><s>r]
-th2:=estii(<s>r,t,tsr):esti(t,ecelt(s))
-t@[e:esti(t,ecelt(s))]
-th3:=estie(<s>r,t,e):<t><s>r
-tsr@[u:sigma][e:esti(u,ecelt(s))]
-t1:=th2(t,u,tr1r(t,u,s,tsr,th3(u,e))):esti(u,ecelt(t))
-tsr@th4:=isseti(ecelt(s),ecelt(t),[x:sigma][y:esti(x,ecelt(s))]t1(x,y),[x:sigma][y:esti(x,ecelt(t))]t1(t,s,symr(tsr),x,y)):is(set,ecelt(s),ecelt(t))
-t@[n:not(<t><s>r)][u:sigma][e:esti(u,ecelt(s))]
-t2:=th3"l.imp"(esti(u,ecelt(t)),<t><s>r,n,[x:esti(u,ecelt(t))]tr2r(s,t,u,th3(u,e),th3(t,u,x))):not(esti(u,ecelt(t)))
-n@th5:=[x:sigma][y:esti(x,ecelt(s))]t2(x,y):disj(ecelt(s),ecelt(t))
-s@th6:=nonemptyi(ecelt(s),s,th1):nonempty(ecelt(s))
--1
-trr1@[s0:set][s:sigma]
-ecp:=is(set,s0,ecelt(s)):'prop'
-s0@anec:=some([x:sigma]ecp(x)):'prop'
-+2
-trr1@[s:sigma]
-th1:=somei([x:sigma]ecp(ecelt(s),x),s,refis(set,ecelt(s))):anec(ecelt(s))
--2
-[ecs0:anec(s0)]
-+*2
-ecs0@[s:sigma][ses0:esti(s,s0)][t:sigma][e:ecp(s0,t)]
-t1:=issete1(s0,ecelt(t),e,s,ses0):esti(s,ecelt(t))
-t2:=th4"eq.1"(t,s,th3"eq.1"(t,s,t1)):is(set,ecelt(t),ecelt(s))
-t3:=tris(set,s0,ecelt(t),ecelt(s),e,t2):is(set,s0,ecelt(s))
-ses0@th2:=someapp([x:sigma]ecp(x),ecs0,is(set,s0,ecelt(s)),[x:sigma][y:ecp(x)]t3(x,y)):is(set,s0,ecelt(s))
-[t:sigma][tes0:esti(t,s0)]
-th3:=th3"eq.1"(s,t,issete1(s0,ecelt(s),th2,t,tes0)):<t><s>r
-t@[tsr:<t><s>r]
-th4:=issete2(s0,ecelt(s),th2,t,th2"eq.1"(s,t,tsr)):esti(t,s0)
-ecs0@[s:sigma][e:ecp(s0,s)]
-t4:=isp(set,[x:set]nonempty(x),ecelt(s),s0,th6"eq.1"(s),symis(set,s0,ecelt(s),e)):nonempty(s0)
-ecs0@th5:=someapp([x:sigma]ecp(x),ecs0,nonempty(s0),[x:sigma][y:ecp(x)]t4(x,y)):nonempty(s0)
--2
-+3
-ecs0@[t0:set][ect0:anec(t0)][s:sigma][ses0:esti(s,s0)][t:sigma][tet0:esti(t,t0)][tsr:<t><s>r]
-th1:=tr3is(set,s0,ecelt(s),ecelt(t),t0,th2"eq.2"(s0,ecs0,s,ses0),th4"eq.1"(s,t,tsr),symis(set,t0,ecelt(t),th2"eq.2"(t0,ect0,t,tet0))):is(set,s0,t0)
-tet0@[n:not(<t><s>r)]
-t1:=isp1(set,[x:set]disj(x,ecelt(t)),ecelt(s),s0,th5"eq.1"(s,t,n),th2"eq.2"(s0,ecs0,s,ses0)):disj(s0,ecelt(t))
-th2:=isp1(set,[x:set]disj(s0,x),ecelt(t),t0,t1,th2"eq.2"(t0,ect0,t,tet0)):disj(s0,t0)
-t0@[i:is(set,s0,t0)][s:sigma][ses0:esti(s,s0)]
-t2:=issete1(s0,t0,i,s,ses0):esti(s,t0)
-t3:=th1"st.disj"(s0,t0,s,ses0,t2):not(disj(s0,t0))
-i@th3:=nonemptyapp(s0,th5"eq.2"(s0,ecs0),not(disj(s0,t0)),[x:sigma][y:esti(x,s0)]t3(x,y)):not(disj(s0,t0))
--3
-trr1@ect:=ot(set,[x:set]anec(x)):'type'
-ecs0@ectset:=out(set,[x:set]anec(x),s0,ecs0):ect
-trr1@[s:sigma]
-ectelt:=ectset(ecelt(s),th1".2"(s)):ect
-trr1@[e:ect]
-ecect:=in(set,[x:set]anec(x),e):set
-+4
-th1:=inp(set,[x:set]anec(x),e):anec(ecect(e))
-th2:=th5"eq.2"(ecect(e),th1):nonempty(ecect(e))
-[x:'prop'][x1:[y:sigma][z:esti(y,ecect(e))]x]
-th3:=nonemptyapp(ecect(e),th2,x,x1):x
-s@th4:=isinout(set,[x:set]anec(x),ecelt(s),th1"eq.2"(s)):is(set,ecelt(s),ecect(ectelt(s)))
-th5:=issete1(ecelt(s),ecect(ectelt(s)),th4,s,th1"eq.1"(s)):esti(s,ecect(ectelt(s)))
-th6:=eunmore1(ect,[x:ect]ecect(x),s,ectelt(s),th5):esti(s,unmore(ect,[x:ect]ecect(x)))
-e@[s:sigma][see:esti(s,ecect(e))][t:sigma][tee:esti(t,ecect(e))]
-th7:=th3"eq.2"(ecect(e),th1,s,see,t,tee):<t><s>r
-t@[tsr:<t><s>r]
-th8:=th4"eq.2"(ecect(e),th1,s,see,t,tsr):esti(t,ecect(e))
--4
-+5
-[f:ect][i:is(ect,e,f)]
-th1:=isini(set,[x:set]anec(x),e,f,i):is(set,ecect(e),ecect(f))
-f@[i:is(set,ecect(e),ecect(f))]
-th2:=isine(set,[x:set]anec(x),e,f,i):is(ect,e,f)
-f@[s:sigma][see:esti(s,ecect(e))][t:sigma][tef:esti(t,ecect(f))][tsr:<t><s>r]
-th3:=th2(th1"eq.3"(ecect(e),th1"eq.4"(e),ecect(f),th1"eq.4"(f),s,see,t,tef,tsr)):is(ect,e,f)
-see@[i:is(ect,e,f)]
-th4:=issete1(ecect(e),ecect(f),th1(i),s,see):esti(s,ecect(f))
-tef@[i:is(ect,e,f)]
-th5:=th3"eq.2"(ecect(f),th1"eq.4"(f),s,th4(i),t,tef):<t><s>r
-trr1@[s:sigma][t:sigma][tsr:<t><s>r]
-th6:=isouti(set,[x:set]anec(x),ecelt(s),th1"eq.2"(s),ecelt(t),th1"eq.2"(t),th4"eq.1"(s,t,tsr)):is(ect,ectelt(s),ectelt(t))
--5
-trr1@[alpha:'type'][fu:[x:sigma]alpha]
-fixfu:=[x:sigma][y:sigma][z:<y><x>r]is(alpha,<x>fu,<y>fu):'prop'
-+10
-[ff:fixfu][e:ect][a1:alpha][s:sigma]
-prop1:=and(esti(s,ecect(e)),is(alpha,<s>fu,a1)):'prop'
-a1@prop2:=some([x:sigma]prop1(x)):'prop'
-e@[s:sigma][see:esti(s,ecect(e))]
-t1:=andi(esti(s,ecect(e)),is(alpha,<s>fu,<s>fu),see,refis(alpha,<s>fu)):prop1(<s>fu,s)
-t2:=somei([x:sigma]prop1(<s>fu,x),s,t1):prop2(<s>fu)
-t3:=somei(alpha,[x:alpha]prop2(x),<s>fu,t2):some(alpha,[x:alpha]prop2(x))
-e@t4:=th3"eq.4"(e,some(alpha,[x:alpha]prop2(x)),[x:sigma][y:esti(x,ecect(e))]t3(x,y)):some(alpha,[x:alpha]prop2(x))
-a1@[b1:alpha][pa1:prop2(a1)][pb1:prop2(b1)][s:sigma][pa1s:prop1(a1,s)][t:sigma][pb1t:prop1(b1,t)]
-t5:=ande1(esti(s,ecect(e)),is(alpha,<s>fu,a1),pa1s):esti(s,ecect(e))
-t6:=ande1(esti(t,ecect(e)),is(alpha,<t>fu,b1),pb1t):esti(t,ecect(e))
-t7:=th7"eq.4"(e,s,t5,t,t6):<t><s>r
-t8:=ande2(esti(s,ecect(e)),is(alpha,<s>fu,a1),pa1s):is(alpha,<s>fu,a1)
-t9:=ande2(esti(t,ecect(e)),is(alpha,<t>fu,b1),pb1t):is(alpha,<t>fu,b1)
-t10:=tr3is(alpha,a1,<s>fu,<t>fu,b1,symis(alpha,<s>fu,a1,t8),<t7><t><s>ff,t9):is(alpha,a1,b1)
-pa1s@t11:=someapp([x:sigma]prop1(b1,x),pb1,is(alpha,a1,b1),[x:sigma][y:prop1(b1,x)]t10(x,y)):is(alpha,a1,b1)
-pb1@t12:=someapp([x:sigma]prop1(a1,x),pa1,is(alpha,a1,b1),[x:sigma][y:prop1(a1,x)]t11(x,y)):is(alpha,a1,b1)
-e@t13:=[x:alpha][y:alpha][u:prop2(x)][v:prop2(y)]t12(x,y,u,v):amone(alpha,[x:alpha]prop2(x))
-t14:=onei(alpha,[x:alpha]prop2(x),t13,t4):one(alpha,[x:alpha]prop2(x))
--10
-e".10"@indeq:=ind(alpha,[x:alpha]prop2".10"(x),t14".10"):alpha
-+*10
-e@th1:=oneax(alpha,[x:alpha]prop2(x),t14):some([x:sigma]and(esti(x,ecect(e)),is(alpha,<x>fu,indeq)))
-[s:sigma][see:esti(s,ecect(e))]
-th2:=t12(<s>fu,indeq,t2(s,see),th1):is(alpha,<s>fu,indeq)
-ff@[s:sigma]
-th3:=th2(ectelt(s),s,th5"eq.4"(s)):is(alpha,<s>fu,indeq(ectelt(s)))
--10
-alpha@[fu2:[x:sigma][y:sigma]alpha]
-fixfu2:=[x:sigma][y:sigma][z:sigma][u:sigma][v:<y><x>r][w:<u><z>r]is(alpha,<z><x>fu2,<u><y>fu2):'prop'
-+11
-[ff2:fixfu2][s:sigma][t:sigma][tsr:<t><s>r][u:sigma]
-t1:=<refr(u)><tsr><u><u><t><s>ff2:is(alpha,<u><s>fu2,<u><t>fu2)
-tsr@t2:=fisi(sigma,alpha,<s>fu2,<t>fu2,[x:sigma]t1(x)):is([x:sigma]alpha,<s>fu2,<t>fu2)
-ff2@[e:ect]
-i:=indeq([x:sigma]alpha,fu2,[x:sigma][y:sigma][z:<y><x>r]t2(x,y,z),e):[x:sigma]alpha
-[s:sigma][t:sigma][tsr:<t><s>r][u:sigma][uee:esti(u,ecect(e))]
-t3:=th2"eq.10"([x:sigma]alpha,fu2,[x:sigma][y:sigma][z:<y><x>r]t2(x,y,z),e,u,uee):is([x:sigma]alpha,<u>fu2,i)
-t4:=fise(alpha,<u>fu2,i,t3,s):is(alpha,<s><u>fu2,<s>i)
-t5:=fise(alpha,<u>fu2,i,t3,t):is(alpha,<t><u>fu2,<t>i)
-t6:=<tsr><refr(u)><t><s><u><u>ff2:is(alpha,<s><u>fu2,<t><u>fu2)
-t7:=tr3is(alpha,<s>i,<s><u>fu2,<t><u>fu2,<t>i,symis(alpha,<s><u>fu2,<s>i,t4),t6,t5):is(alpha,<s>i,<t>i)
-tsr@t8:=th3"eq.4"(e,is(alpha,<s>i,<t>i),[x:sigma][y:esti(x,ecect(e))]t7(x,y)):is(alpha,<s>i,<t>i)
--11
-e".11"@[f:ect]
-indeq2:=indeq(i".11",[x:sigma][y:sigma][z:<y><x>r]t8".11"(x,y,z),f):alpha
-+*11
-f@[s:sigma][see:esti(s,ecect(e))][t:sigma][tef:esti(t,ecect(f))]
-t9:=th2"eq.10"(i,[x:sigma][y:sigma][z:<y><x>r]t8(x,y,z),f,t,tef):is(alpha,<t>i,indeq2(e,f))
-t10:=th2"eq.10"([x:sigma]alpha,fu2,[x:sigma][y:sigma][z:<y><x>r]t2(x,y,z),e,s,see):is([x:sigma]alpha,<s>fu2,i)
-t11:=fise(alpha,<s>fu2,i,t10,t):is(alpha,<t><s>fu2,<t>i)
-th1:=tris(alpha,<t><s>fu2,<t>i,indeq2,t11,t9):is(alpha,<t><s>fu2,indeq2(e,f))
-ff2@[s:sigma][t:sigma]
-th2:=th1(ectelt(s),ectelt(t),s,th5"eq.4"(s),t,th5"eq.4"(t)):is(alpha,<t><s>fu2,indeq2(ectelt(s),ectelt(t)))
--11
-+landau
-+n
-@nat:='prim':'type'
-[x:nat][y:nat]
-is:=is"e"(nat,x,y):'prop'
-nis:=not(is(x,y)):'prop'
-x@[s:set(nat)]
-in:=esti(nat,x,s):'prop'
-@[p:[x:nat]'prop']
-some:=some"l"(nat,p):'prop'
-all:=all"l"(nat,p):'prop'
-one:=one"e"(nat,p):'prop'
-@1:='prim':nat
-suc:='prim':[x:nat]nat
-[x:nat][y:nat][i:is(x,y)]
-ax2:=isf(nat,nat,suc,x,y,i):is(<x>suc,<y>suc)
-@ax3:='prim':[x:nat]nis(<x>suc,1)
-ax4:='prim':[x:nat][y:nat][u:is(<x>suc,<y>suc)]is(x,y)
-[s:set(nat)]
-cond1:=in(1,s):'prop'
-cond2:=all([x:nat]imp(in(x,s),in(<x>suc,s))):'prop'
-@ax5:='prim':[s:set(nat)][u:cond1(s)][v:cond2(s)][x:nat]in(x,s)
-[p:[x:nat]'prop'][1p:<1>p][xsp:[x:nat][y:<x>p]<<x>suc>p][x:nat]
-+i1
-s:=setof(nat,p):set(nat)
-t1:=estii(nat,p,1,1p):cond1(s)
-[y:nat][yes:in(y,s)]
-t2:=estie(nat,p,y,yes):<y>p
-t3:=estii(nat,p,<y>suc,<t2><y>xsp):in(<y>suc,s)
-x@t4:=<x><[y:nat][u:in(y,s)]t3(y,u)><t1><s>ax5:in(x,s)
--i1
-induction:=estie(nat,p,x,t4".i1"):<x>p
-@[x:nat][y:nat][n:nis(x,y)]
-+21
-[i:is(<x>suc,<y>suc)]
-t1:=<i><y><x>ax4:is(x,y)
--21
-satz1:=th3"l.imp"(is(<x>suc,<y>suc),is(x,y),n,[u:is(<x>suc,<y>suc)]t1".21"(u)):nis(<x>suc,<y>suc)
-+22
-x@prop1:=nis(<x>suc,x):'prop'
-@t1:=<1>ax3:prop1(1)
-x@[p:prop1(x)]
-t2:=satz1(<x>suc,x,p):prop1(<x>suc)
--22
-x@satz2:=induction([y:nat]prop1".22"(y),t1".22",[y:nat][u:prop1".22"(y)]t2".22"(y,u),x):nis(<x>suc,x)
-+23
-prop1:=or(is(x,1),some([u:nat]is(x,<u>suc))):'prop'
-@t1:=ori1(is(1,1),some([u:nat]is(1,<u>suc)),refis(nat,1)):prop1(1)
-x@t2:=somei(nat,[u:nat]is(<x>suc,<u>suc),x,refis(nat,<x>suc)):some([u:nat]is(<x>suc,<u>suc))
-t3:=ori2(is(<x>suc,1),some([u:nat]is(<x>suc,<u>suc)),t2):prop1(<x>suc)
-t4:=induction([y:nat]prop1(y),t1,[y:nat][u:prop1(y)]t3(y),x):prop1(x)
--23
-[n:nis(x,1)]
-satz3:=ore2(is(x,1),some([u:nat]is(x,<u>suc)),t4".23",n):some([u:nat]is(x,<u>suc))
-y@[z:nat][i:is(x,<y>suc)][j:is(x,<z>suc)]
-+*23
-j@t5:=<tris1(nat,<y>suc,<z>suc,x,i,j)><z><y>ax4:is(y,z)
-x@t6:=[y:nat][z:nat][u:is(x,<y>suc)][v:is(x,<z>suc)]t5(y,z,u,v):amone(nat,[u:nat]is(x,<u>suc))
--23
-n@satz3a:=onei(nat,[u:nat]is(x,<u>suc),t6".23",satz3):one([u:nat]is(x,<u>suc))
-+24
-x@[f:[y:nat]nat]
-prop1:=all([y:nat]is(<<y>suc>f,<<y>f>suc)):'prop'
-prop2:=and(is(<1>f,<x>suc),prop1):'prop'
-x@[a:[y:nat]nat][b:[y:nat]nat][pa:prop2(a)][pb:prop2(b)][y:nat]
-prop3:=is(<y>a,<y>b):'prop'
-pb@t1:=ande1(is(<1>a,<x>suc),prop1(a),pa):is(<1>a,<x>suc)
-t2:=ande1(is(<1>b,<x>suc),prop1(b),pb):is(<1>b,<x>suc)
-t3:=tris2(nat,<1>a,<1>b,<x>suc,t1,t2):prop3(1)
-y@[p:prop3(y)]
-t4:=ax2(<y>a,<y>b,p):is(<<y>a>suc,<<y>b>suc)
-t5:=ande2(is(<1>a,<x>suc),prop1(a),pa):prop1(a)
-t6:=ande2(is(<1>b,<x>suc),prop1(b),pb):prop1(b)
-t7:=<y>t5:is(<<y>suc>a,<<y>a>suc)
-t8:=<y>t6:is(<<y>suc>b,<<y>b>suc)
-t9:=tr3is(nat,<<y>suc>a,<<y>a>suc,<<y>b>suc,<<y>suc>b,t7,t4,symis"e"(nat,<<y>suc>b,<<y>b>suc,t8)):prop3(<y>suc)
-y@t10:=induction([z:nat]prop3(z),t3,[z:nat][u:prop3(z)]t9(z,u),y):prop3(y)
-pb@t11:=fisi(nat,nat,a,b,[y:nat]t10(y)):is"e"([y:nat]nat,a,b)
-x@aa:=[z:[y:nat]nat][u:[y:nat]nat][v:prop2(z)][w:prop2(u)]t11(z,u,v,w):amone([y:nat]nat,[z:[y:nat]nat]prop2(z))
-prop4:=some"l"([y:nat]nat,[z:[y:nat]nat]prop2(z)):'prop'
-@t12:=[x:nat]refis(nat,<<x>suc>suc):prop1(1,suc)
-t13:=andi(is(<1>suc,<1>suc),prop1(1,suc),refis(nat,<1>suc),t12):prop2(1,suc)
-t14:=somei([y:nat]nat,[z:[y:nat]nat]prop2(1,z),suc,t13):prop4(1)
-x@[p:prop4(x)][f:[y:nat]nat][pf:prop2(f)]
-g:=[y:nat]<<y>f>suc:[y:nat]nat
-[y:nat]
-t15:=refis(nat,<y>g):is(<y>g,<<y>f>suc)
-pf@t16:=ande1(is(<1>f,<x>suc),prop1(f),pf):is(<1>f,<x>suc)
-t17:=tris(nat,<1>g,<<1>f>suc,<<x>suc>suc,t15(1),ax2(<1>f,<x>suc,t16)):is(<1>g,<<x>suc>suc)
-y@t18:=ande2(is(<1>f,<x>suc),prop1(f),pf):prop1(f)
-t19:=<y>t18:is(<<y>suc>f,<<y>f>suc)
-t20:=tris2(nat,<<y>suc>f,<y>g,<<y>f>suc,t19,t15):is(<<y>suc>f,<y>g)
-t21:=tris(nat,<<y>suc>g,<<<y>suc>f>suc,<<y>g>suc,t15(<y>suc),ax2(<<y>suc>f,<y>g,t20)):is(<<y>suc>g,<<y>g>suc)
-pf@t22:=[y:nat]t21(y):prop1(<x>suc,g)
-t23:=andi(is(<1>g,<<x>suc>suc),prop1(<x>suc,g),t17,t22):prop2(<x>suc,g)
-t24:=somei([y:nat]nat,[z:[y:nat]nat]prop2(<x>suc,z),g,t23):prop4(<x>suc)
-p@t25:=someapp([y:nat]nat,[z:[y:nat]nat]prop2(z),p,prop4(<x>suc),[z:[y:nat]nat][u:prop2(z)]t24(z,u)):prop4(<x>suc)
-x@bb:=induction([y:nat]prop4(y),t14,[y:nat][u:prop4(y)]t25(y,u),x):prop4(x)
--24
-x@satz4:=onei([y:nat]nat,[z:[y:nat]nat]prop2".24"(z),aa".24",bb".24"):one"e"([y:nat]nat,[z:[y:nat]nat]and(is(<1>z,<x>suc),all([y:nat]is(<<y>suc>z,<<y>z>suc))))
-plus:=ind([y:nat]nat,[z:[y:nat]nat]prop2".24"(z),satz4):[y:nat]nat
-y@pl:=<y>plus:nat
-+*24
-x@t26:=oneax([y:nat]nat,[z:[y:nat]nat]prop2(z),satz4):prop2(plus)
--24
-x@satz4a:=ande1(is(<1>plus,<x>suc),prop1".24"(plus),t26".24"):is(pl(x,1),<x>suc)
-+*24
-x@t27:=ande2(is(<1>plus,<x>suc),prop1(plus),t26):prop1(plus)
--24
-y@satz4b:=<y>t27".24":is(pl(x,<y>suc),<pl(x,y)>suc)
-+*24
-@t28:=t11(1,plus(1),suc,t26(1),t13):is"e"([y:nat]nat,plus(1),suc)
--24
-x@satz4c:=fise(nat,nat,plus(1),suc,t28".24",x):is(pl(1,x),<x>suc)
-+*24
-x@t29:=t11(<x>suc,plus(<x>suc),[y:nat]<<y>plus>suc,t26(<x>suc),t23(bb,plus,t26)):is"e"([y:nat]nat,plus(<x>suc),[y:nat]<<y>plus>suc)
--24
-y@satz4d:=fise(nat,nat,plus(<x>suc),[z:nat]<<z>plus>suc,t29".24",y):is(pl(<x>suc,y),<pl(x,y)>suc)
-x@satz4e:=symis(nat,pl(x,1),<x>suc,satz4a):is(<x>suc,pl(x,1))
-y@satz4f:=symis(nat,pl(x,<y>suc),<pl(x,y)>suc,satz4b):is(<pl(x,y)>suc,pl(x,<y>suc))
-x@satz4g:=symis(nat,pl(1,x),<x>suc,satz4c):is(<x>suc,pl(1,x))
-y@satz4h:=symis(nat,pl(<x>suc,y),<pl(x,y)>suc,satz4d):is(<pl(x,y)>suc,pl(<x>suc,y))
-z@[i:is(x,y)]
-ispl1:=isf(nat,nat,[u:nat]pl(u,z),x,y,i):is(pl(x,z),pl(y,z))
-ispl2:=isf(nat,nat,[u:nat]pl(z,u),x,y,i):is(pl(z,x),pl(z,y))
-z@[u:nat][i:is(x,y)][j:is(z,u)]
-ispl12:=tris(nat,pl(x,z),pl(y,z),pl(y,u),ispl1(i),ispl2(z,u,y,j)):is(pl(x,z),pl(y,u))
-+25
-z@prop1:=is(pl(pl(x,y),z),pl(x,pl(y,z))):'prop'
-y@t1:=tr3is(nat,pl(pl(x,y),1),<pl(x,y)>suc,pl(x,<y>suc),pl(x,pl(y,1)),satz4a(pl(x,y)),satz4f,ispl2(<y>suc,pl(y,1),x,satz4e(y))):prop1(1)
-z@[p:prop1(z)]
-t2:=ax2(pl(pl(x,y),z),pl(x,pl(y,z)),p):is(<pl(pl(x,y),z)>suc,<pl(x,pl(y,z))>suc)
-t3:=tr4is(nat,pl(pl(x,y),<z>suc),<pl(pl(x,y),z)>suc,<pl(x,pl(y,z))>suc,pl(x,<pl(y,z)>suc),pl(x,pl(y,<z>suc)),satz4b(pl(x,y),z),t2,satz4f(x,pl(y,z)),ispl2(<pl(y,z)>suc,pl(y,<z>suc),x,satz4f(y,z))):prop1(<z>suc)
--25
-z@satz5:=induction([u:nat]prop1".25"(u),t1".25",[u:nat][v:prop1".25"(u)]t3".25"(u,v),z):is(pl(pl(x,y),z),pl(x,pl(y,z)))
-asspl1:=satz5:is(pl(pl(x,y),z),pl(x,pl(y,z)))
-asspl2:=symis(nat,pl(pl(x,y),z),pl(x,pl(y,z)),satz5):is(pl(x,pl(y,z)),pl(pl(x,y),z))
-+26
-y@prop1:=is(pl(x,y),pl(y,x)):'prop'
-t1:=satz4a(y):is(pl(y,1),<y>suc)
-t2:=satz4c(y):is(pl(1,y),<y>suc)
-t3:=tris2(nat,pl(1,y),pl(y,1),<y>suc,t2,t1):prop1(1,y)
-[p:prop1(x,y)]
-t4:=tris(nat,<pl(x,y)>suc,<pl(y,x)>suc,pl(y,<x>suc),ax2(pl(x,y),pl(y,x),p),satz4f(y,x)):is(<pl(x,y)>suc,pl(y,<x>suc))
-t5:=satz4d:is(pl(<x>suc,y),<pl(x,y)>suc)
-t6:=tris(nat,pl(<x>suc,y),<pl(x,y)>suc,pl(y,<x>suc),t5,t4):prop1(<x>suc,y)
--26
-y@satz6:=induction([z:nat]prop1".26"(z,y),t3".26",[z:nat][u:prop1".26"(z,y)]t6".26"(z,y,u),x):is(pl(x,y),pl(y,x))
-compl:=satz6:is(pl(x,y),pl(y,x))
-+*26
-x@t7:=tris(nat,pl(x,1),<x>suc,pl(1,x),satz4a,satz4g):prop1(1)
-y@[p:prop1(y)]
-t8:=tr3is(nat,pl(x,<y>suc),<pl(x,y)>suc,<pl(y,x)>suc,pl(<y>suc,x),satz4b,ax2(pl(x,y),pl(y,x),p),satz4h(y,x)):prop1(<y>suc)
-y@anders:=induction([z:nat]prop1(z),t7,[z:nat][u:prop1(z)]t8(z,u),y):is(pl(x,y),pl(y,x))
--26
-+27
-y@prop1:=nis(y,pl(x,y)):'prop'
-x@t1:=symnotis(nat,<x>suc,1,<x>ax3):nis(1,<x>suc)
-t2:=th4"e.notis"(nat,1,<x>suc,pl(x,1),t1,satz4a):prop1(1)
-y@[p:prop1(y)]
-t3:=satz1(y,pl(x,y),p):nis(<y>suc,<pl(x,y)>suc)
-t4:=th4"e.notis"(nat,<y>suc,<pl(x,y)>suc,pl(x,<y>suc),t3,satz4b):prop1(<y>suc)
--27
-y@satz7:=induction([z:nat]prop1".27"(z),t2".27",[z:nat][u:prop1".27"(z)]t4".27"(z,u),y):nis(y,pl(x,y))
-z@[n:nis(y,z)]
-+28
-prop1:=nis(pl(x,y),pl(x,z)):'prop'
-t1:=satz1(y,z,n):nis(<y>suc,<z>suc)
-t2:=th5"e.notis"(nat,<y>suc,<z>suc,pl(1,y),pl(1,z),t1,satz4g(y),satz4g(z)):prop1(1,y,z,n)
-[p:prop1(x,y,z,n)]
-t3:=satz1(pl(x,y),pl(x,z),p):nis(<pl(x,y)>suc,<pl(x,z)>suc)
-t4:=th5"e.notis"(nat,<pl(x,y)>suc,<pl(x,z)>suc,pl(<x>suc,y),pl(<x>suc,z),t3,satz4h,satz4h(z)):prop1(<x>suc,y,z,n)
--28
-satz8:=induction([u:nat]prop1".28"(u,y,z,n),t2".28",[u:nat][v:prop1".28"(u,y,z,n)]t4".28"(u,y,z,n,v),x):nis(pl(x,y),pl(x,z))
-z@[i:is(pl(x,y),pl(x,z))]
-satz8a:=th7"l.imp"(is(y,z),nis(pl(x,y),pl(x,z)),weli(is(pl(x,y),pl(x,z)),i),[u:nis(y,z)]satz8(u)):is(y,z)
-z@diffprop:=is(x,pl(y,z)):'prop'
-+*28
-y@[u:nat][v:nat][du:diffprop(u)][dv:diffprop(v)]
-t5:=satz8a(y,u,v,tris1(nat,pl(y,u),pl(y,v),x,du,dv)):is(u,v)
--28
-y@satz8b:=[u:nat][v:nat][du:diffprop(u)][dv:diffprop(v)]t5".28"(u,v,du,dv):amone(nat,[z:nat]is(x,pl(y,z)))
-+29
-i:=is(x,y):'prop'
-ii:=some([u:nat]diffprop(x,y,u)):'prop'
-iii:=some([v:nat]diffprop(y,x,v)):'prop'
-[one1:i][u:nat]
-t1:=tris(nat,pl(u,x),pl(x,u),pl(y,u),compl(u,x),ispl1(u,one1)):is(pl(u,x),pl(y,u))
-t2:=th3"e.notis"(nat,x,pl(u,x),pl(y,u),satz7(u,x),t1):nis(x,pl(y,u))
-one1@t3:=th5"l.some"(nat,[u:nat]diffprop(u),[u:nat]t2(u)):not(ii)
-y@t4:=th1"l.ec"(i,ii,[z:i]t3(z)):ec(i,ii)
-one1@t5:=t3(y,x,symis(nat,x,y,one1)):not(iii)
-y@t6:=th2"l.ec"(iii,i,[z:i]t5(z)):ec(iii,i)
-[two1:ii][three1:iii][u:nat][du:diffprop(x,y,u)][v:nat][dv:diffprop(y,x,v)]
-t6a:=tr4is(nat,x,pl(y,u),pl(pl(x,v),u),pl(x,pl(v,u)),pl(pl(v,u),x),du,ispl1(y,pl(x,v),u,dv),asspl1(x,v,u),compl(x,pl(v,u))):is(x,pl(pl(v,u),x))
-t7:=mp(is(x,pl(pl(v,u),x)),con,t6a,satz7(pl(v,u),x)):con
-du@t8:=someapp(nat,[v:nat]diffprop(y,x,v),three1,con,[v:nat][dv:diffprop(y,x,v)]t7(v,dv)):con
-three1@t9:=someapp(nat,[u:nat]diffprop(u),two1,con,[u:nat][du:diffprop(u)]t8(u,du)):con
-two1@t10:=[z:iii]t9(z):not(iii)
-y@t11:=th1"l.ec"(ii,iii,[z:ii]t10(z)):ec(ii,iii)
-a:=th6"l.ec3"(i,ii,iii,t4,t11,t6):ec3(i,ii,iii)
-prop1:=or3(i,ii,iii):'prop'
-x@[j:is(x,1)]
-t12:=or3i1(i(1),ii(1),iii(1),j):prop1(1)
-x@[n:nis(x,1)][u:nat][j:is(x,<u>suc)]
-t13:=tris(nat,x,<u>suc,pl(1,u),j,satz4g(u)):is(x,pl(1,u))
-t14:=somei(nat,[z:nat]diffprop(x,1,z),u,t13):ii(1)
-t15:=someapp(nat,[u1:nat]is(x,<u1>suc),satz3(x,n),ii(1),[u1:nat][z:is(x,<u1>suc)]t14(u1,z)):ii(1)
-t16:=or3i2(i(1),ii(1),iii(1),t15):prop1(1)
-n@t16a:=someapp(nat,[u:nat]is(x,<u>suc),satz3(x,n),prop1(1),[u:nat][v:is(x,<u>suc)]t16(u,v)):prop1(1)
-x@t17:=th1"l.imp"(is(x,1),prop1(1),[z:is(x,1)]t12(z),[z:nis(x,1)]t16a(z)):prop1(1)
-y@[p:prop1(y)][one1:i(y)]
-t18:=tris(nat,<y>suc,pl(y,1),pl(x,1),satz4e(y),ispl1(y,x,1,symis(nat,x,y,one1))):is(<y>suc,pl(x,1))
-t19:=somei(nat,[z:nat]diffprop(<y>suc,x,z),1,t18):iii(<y>suc)
-t20:=or3i3(i(<y>suc),ii(<y>suc),iii(<y>suc),t19):prop1(<y>suc)
-p@[two1:ii(y)][u:nat][du:diffprop(x,y,u)][j:is(u,1)]
-t21:=tr3is(nat,x,pl(y,u),pl(y,1),<y>suc,du,ispl2(u,1,y,j),satz4a(y)):is(x,<y>suc)
-t22:=or3i1(i(<y>suc),ii(<y>suc),iii(<y>suc),t21):prop1(<y>suc)
-du@[n:nis(u,1)][w:nat][j:is(u,<w>suc)]
-t23:=tris(nat,u,<w>suc,pl(1,w),j,satz4g(w)):is(u,pl(1,w))
-t24:=tr4is(nat,x,pl(y,u),pl(y,pl(1,w)),pl(pl(y,1),w),pl(<y>suc,w),du,ispl2(u,pl(1,w),y,t23),asspl2(y,1,w),ispl1(pl(y,1),<y>suc,w,satz4a(y))):is(x,pl(<y>suc,w))
-t25:=somei(nat,[z:nat]diffprop(x,<y>suc,z),w,t24):ii(<y>suc)
-n@t26:=someapp(nat,[z:nat]is(u,<z>suc),satz3(u,n),ii(<y>suc),[z:nat][v:is(u,<z>suc)]t25(z,v)):ii(<y>suc)
-t27:=or3i2(i(<y>suc),ii(<y>suc),iii(<y>suc),t26):prop1(<y>suc)
-du@t28:=th1"l.imp"(is(u,1),prop1(<y>suc),[z:is(u,1)]t22(z),[z:nis(u,1)]t27(z)):prop1(<y>suc)
-two1@t28a:=someapp(nat,[u:nat]diffprop(u),two1,prop1(<y>suc),[u:nat][du:diffprop(u)]t28(u,du)):prop1(<y>suc)
-p@[three1:iii(y)][v:nat][dv:diffprop(y,x,v)]
-t29:=tris(nat,<y>suc,<pl(x,v)>suc,pl(x,<v>suc),ax2(y,pl(x,v),dv),satz4f(x,v)):is(<y>suc,pl(x,<v>suc))
-t30:=somei(nat,[z:nat]diffprop(<y>suc,x,z),<v>suc,t29):iii(<y>suc)
-three1@t31:=someapp(nat,[v:nat]diffprop(y,x,v),three1,iii(<y>suc),[v:nat][dv:diffprop(y,x,v)]t30(v,dv)):iii(<y>suc)
-t32:=or3i3(i(<y>suc),ii(<y>suc),iii(<y>suc),t31):prop1(<y>suc)
-p@t33:=or3app(i(y),ii(y),iii(y),prop1(<y>suc),p,[z:i(y)]t20(z),[z:ii(y)]t28a(z),[z:iii(y)]t32(z)):prop1(<y>suc)
-y@b:=induction([z:nat]prop1(z),t17,[z:nat][u:prop1(z)]t33(z,u),y):or3(i,ii,iii)
--29
-satz9:=orec3i(i".29",ii".29",iii".29",b".29",a".29"):orec3(is(x,y),some([u:nat]is(x,pl(y,u))),some([v:nat]is(y,pl(x,v))))
-satz9a:=b".29":or3(is(x,y),some([u:nat]diffprop(x,y,u)),some([v:nat]diffprop(y,x,v)))
-satz9b:=a".29":ec3(is(x,y),some([u:nat]diffprop(x,y,u)),some([v:nat]diffprop(y,x,v)))
-more:=some([u:nat]diffprop(x,y,u)):'prop'
-less:=some([v:nat]diffprop(y,x,v)):'prop'
-satz10:=satz9:orec3(is(x,y),more(x,y),less(x,y))
-satz10a:=satz9a:or3(is(x,y),more(x,y),less(x,y))
-satz10b:=satz9b:ec3(is(x,y),more(x,y),less(x,y))
-[m:more(x,y)]
-satz11:=m:less(y,x)
-y@[l:less(x,y)]
-satz12:=l:more(y,x)
-y@moreis:=or(more,is(x,y)):'prop'
-lessis:=or(less,is(x,y)):'prop'
-[m:moreis(x,y)]
-satz13:=th9"l.or"(more,is(x,y),less(y,x),is(y,x),m,[z:more]satz11(z),[z:is(x,y)]symis(nat,x,y,z)):lessis(y,x)
-y@[l:lessis(x,y)]
-satz14:=th9"l.or"(less,is(x,y),more(y,x),is(y,x),l,[z:less]satz12(z),[z:is(x,y)]symis(nat,x,y,z)):moreis(y,x)
-z@[i:is(x,y)][m:more(x,z)]
-ismore1:=isp(nat,[u:nat]more(u,z),x,y,m,i):more(y,z)
-i@[m:more(z,x)]
-ismore2:=isp(nat,[u:nat]more(z,u),x,y,m,i):more(z,y)
-i@[l:less(x,z)]
-isless1:=isp(nat,[u:nat]less(u,z),x,y,l,i):less(y,z)
-i@[l:less(z,x)]
-isless2:=isp(nat,[u:nat]less(z,u),x,y,l,i):less(z,y)
-i@[m:moreis(x,z)]
-ismoreis1:=isp(nat,[u:nat]moreis(u,z),x,y,m,i):moreis(y,z)
-i@[m:moreis(z,x)]
-ismoreis2:=isp(nat,[u:nat]moreis(z,u),x,y,m,i):moreis(z,y)
-i@[l:lessis(x,z)]
-islessis1:=isp(nat,[u:nat]lessis(u,z),x,y,l,i):lessis(y,z)
-i@[l:lessis(z,x)]
-islessis2:=isp(nat,[u:nat]lessis(z,u),x,y,l,i):lessis(z,y)
-y@[i:is(x,y)]
-moreisi2:=ori2(more(x,y),is(x,y),i):moreis(x,y)
-lessisi2:=ori2(less(x,y),is(x,y),i):lessis(x,y)
-y@[m:more(x,y)]
-moreisi1:=ori1(more(x,y),is(x,y),m):moreis(x,y)
-y@[l:less(x,y)]
-lessisi1:=ori1(less(x,y),is(x,y),l):lessis(x,y)
-z@[u:nat][i:is(x,y)][j:is(z,u)][m:more(x,z)]
-ismore12:=ismore2(z,u,y,j,ismore1(x,y,z,i,m)):more(y,u)
-j@[l:less(x,z)]
-isless12:=isless2(z,u,y,j,isless1(x,y,z,i,l)):less(y,u)
-j@[m:moreis(x,z)]
-ismoreis12:=ismoreis2(z,u,y,j,ismoreis1(x,y,z,i,m)):moreis(y,u)
-j@[l:lessis(x,z)]
-islessis12:=islessis2(z,u,y,j,islessis1(x,y,z,i,l)):lessis(y,u)
-y@[m:moreis(x,y)]
-satz10c:=th7"l.ec3"(is(x,y),more(x,y),less(x,y),satz10b,comor(more(x,y),is(x,y),m)):not(less(x,y))
-y@[l:lessis(x,y)]
-satz10d:=th9"l.ec3"(is(x,y),more(x,y),less(x,y),satz10b,l):not(more(x,y))
-y@[n:not(more(x,y))]
-satz10e:=th2"l.or3"(is(x,y),more(x,y),less(x,y),satz10a,n):lessis(x,y)
-y@[n:not(less(x,y))]
-satz10f:=comor(is(x,y),more(x,y),th3"l.or3"(is(x,y),more(x,y),less(x,y),satz10a,n)):moreis(x,y)
-y@[m:more(x,y)]
-satz10g:=th3"l.or"(less(x,y),is(x,y),ec3e23(is(x,y),more(x,y),less(x,y),satz10b,m),ec3e21(is(x,y),more(x,y),less(x,y),satz10b,m)):not(lessis(x,y))
-y@[l:less(x,y)]
-satz10h:=th3"l.or"(more(x,y),is(x,y),ec3e32(is(x,y),more(x,y),less(x,y),satz10b,l),ec3e31(is(x,y),more(x,y),less(x,y),satz10b,l)):not(moreis(x,y))
-y@[n:not(moreis(x,y))]
-satz10j:=or3e3(is(x,y),more(x,y),less(x,y),satz10a,th5"l.or"(more(x,y),is(x,y),n),th4"l.or"(more(x,y),is(x,y),n)):less(x,y)
-y@[n:not(lessis(x,y))]
-satz10k:=or3e2(is(x,y),more(x,y),less(x,y),satz10a,th4"l.or"(less(x,y),is(x,y),n),th5"l.or"(less(x,y),is(x,y),n)):more(x,y)
-z@[l:less(x,y)][k:less(y,z)]
-+315
-[v:nat][dv:diffprop(y,x,v)][w:nat][dw:diffprop(z,y,w)]
-t1:=tr3is(nat,z,pl(y,w),pl(pl(x,v),w),pl(x,pl(v,w)),dw,ispl1(y,pl(x,v),w,dv),asspl1(x,v,w)):is(z,pl(x,pl(v,w)))
-t2:=somei(nat,[u:nat]diffprop(z,x,u),pl(v,w),t1):less(x,z)
-dv@t3:=someapp(nat,[w:nat]diffprop(z,y,w),k,less(x,z),[w:nat][dw:diffprop(z,y,w)]t2(w,dw)):less(x,z)
--315
-satz15:=someapp(nat,[v:nat]diffprop(y,x,v),l,less(x,z),[v:nat][dv:diffprop(y,x,v)]t3".315"(v,dv)):less(x,z)
-trless:=satz15:less(x,z)
-z@[m:more(x,y)][n:more(y,z)]
-trmore:=satz15(z,y,x,n,m):more(x,z)
-+*315
-n@anders:=satz12(z,x,satz15(z,y,x,satz11(y,z,n),satz11(m))):more(x,z)
--315
-z@[l:lessis(x,y)][k:less(y,z)]
-satz16a:=orapp(less(x,y),is(x,y),less(x,z),l,[u:less(x,y)]trless(u,k),[u:is(x,y)]isless1(y,x,z,symis(nat,x,y,u),k)):less(x,z)
-z@[l:less(x,y)][k:lessis(y,z)]
-satz16b:=orapp(less(y,z),is(y,z),less(x,z),k,[u:less(y,z)]trless(l,u),[u:is(y,z)]isless2(y,z,x,u,l)):less(x,z)
-z@[m:moreis(x,y)][n:more(y,z)]
-satz16c:=satz16b(z,y,x,n,satz13(m)):more(x,z)
-z@[m:more(x,y)][n:moreis(y,z)]
-satz16d:=satz16a(z,y,x,satz13(y,z,n),m):more(x,z)
-z@[l:lessis(x,y)][k:lessis(y,z)]
-+317
-[i:is(x,y)][j:is(y,z)]
-t1:=lessisi2(x,z,tris(nat,x,y,z,i,j)):lessis(x,z)
-i@[j:less(y,z)]
-t2:=lessisi1(x,z,satz16a(l,j)):lessis(x,z)
-i@t3:=orapp(less(y,z),is(y,z),lessis(x,z),k,[u:less(y,z)]t2(u),[u:is(y,z)]t1(u)):lessis(x,z)
-k@[j:less(x,y)]
-t4:=lessisi1(x,z,satz16b(j,k)):lessis(x,z)
--317
-satz17:=orapp(less(x,y),is(x,y),lessis(x,z),l,[u:less(x,y)]t4".317"(u),[u:is(x,y)]t3".317"(u)):lessis(x,z)
-+*317
-k@[j:less(x,y)]
-t5:=lessisi1(x,z,satz16b(j,k)):lessis(x,z)
-k@[i:is(x,y)]
-t6:=islessis1(y,x,z,symis(nat,x,y,i),k):lessis(x,z)
-k@anders:=orapp(less(x,y),is(x,y),lessis(x,z),l,[u:less(x,y)]t5(u),[u:is(x,y)]t6(u)):lessis(x,z)
--317
-k@trlessis:=satz17:lessis(x,z)
-z@[m:moreis(x,y)][n:moreis(y,z)]
-trmoreis:=satz14(z,x,satz17(z,y,x,satz13(y,z,n),satz13(m))):moreis(x,z)
-y@satz18:=somei(nat,[u:nat]diffprop(pl(x,y),x,u),y,refis(nat,pl(x,y))):more(pl(x,y),x)
-satz18a:=satz18:less(x,pl(x,y))
-x@satz18b:=ismore1(pl(x,1),<x>suc,x,satz4a,satz18(1)):more(<x>suc,x)
-satz18c:=satz18b:less(x,<x>suc)
-z@[m:more(x,y)]
-+319
-[u:nat][du:diffprop(u)]
-t1:=tris(nat,x,pl(y,u),pl(u,y),du,compl(y,u)):is(x,pl(u,y))
-t2:=tr3is(nat,pl(x,z),pl(pl(u,y),z),pl(u,pl(y,z)),pl(pl(y,z),u),ispl1(x,pl(u,y),z,t1),asspl1(u,y,z),compl(u,pl(y,z))):is(pl(x,z),pl(pl(y,z),u))
-t3:=somei(nat,[v:nat]diffprop(pl(x,z),pl(y,z),v),u,t2):more(pl(x,z),pl(y,z))
--319
-satz19a:=someapp(nat,[u:nat]diffprop(u),m,more(pl(x,z),pl(y,z)),[u:nat][v:diffprop(u)]t3".319"(u,v)):more(pl(x,z),pl(y,z))
-z@[i:is(x,y)]
-satz19b:=ispl1(x,y,z,i):is(pl(x,z),pl(y,z))
-z@[l:less(x,y)]
-satz19c:=satz11(pl(y,z),pl(x,z),satz19a(y,x,z,satz12(x,y,l))):less(pl(x,z),pl(y,z))
-+*319
-l@anders1:=satz19a(y,x,z,l):less(pl(x,z),pl(y,z))
--319
-m@satz19d:=ismore12(pl(x,z),pl(z,x),pl(y,z),pl(z,y),compl(x,z),compl(y,z),satz19a):more(pl(z,x),pl(z,y))
-i@satz19e:=ispl2(x,y,z,i):is(pl(z,x),pl(z,y))
-l@satz19f:=isless12(pl(x,z),pl(z,x),pl(y,z),pl(z,y),compl(x,z),compl(y,z),satz19c):less(pl(z,x),pl(z,y))
-+*319
-l@anders2:=satz19d(y,x,z,l):less(pl(z,x),pl(z,y))
--319
-z@[u:nat][i:is(x,y)][m:more(z,u)]
-satz19g:=ismore2(pl(x,u),pl(y,u),pl(x,z),ispl1(x,y,u,i),satz19d(z,u,x,m)):more(pl(x,z),pl(y,u))
-satz19h:=ismore12(pl(x,z),pl(z,x),pl(y,u),pl(u,y),compl(x,z),compl(y,u),satz19g):more(pl(z,x),pl(u,y))
-i@[l:less(z,u)]
-satz19j:=isless2(pl(x,u),pl(y,u),pl(x,z),ispl1(x,y,u,i),satz19f(z,u,x,l)):less(pl(x,z),pl(y,u))
-satz19k:=isless12(pl(x,z),pl(z,x),pl(y,u),pl(u,y),compl(x,z),compl(y,u),satz19j):less(pl(z,x),pl(u,y))
-z@[m:moreis(x,y)]
-+*319
-m@[n:more(x,y)]
-t4:=moreisi1(pl(x,z),pl(y,z),satz19a(n)):moreis(pl(x,z),pl(y,z))
-m@[i:is(x,y)]
-t5:=moreisi2(pl(x,z),pl(y,z),ispl1(x,y,z,i)):moreis(pl(x,z),pl(y,z))
--319
-m@satz19l:=orapp(more(x,y),is(x,y),moreis(pl(x,z),pl(y,z)),m,[u:more(x,y)]t4".319"(u),[u:is(x,y)]t5".319"(u)):moreis(pl(x,z),pl(y,z))
-satz19m:=ismoreis12(pl(x,z),pl(z,x),pl(y,z),pl(z,y),compl(x,z),compl(y,z),satz19l):moreis(pl(z,x),pl(z,y))
-z@[l:lessis(x,y)]
-satz19n:=satz13(pl(y,z),pl(x,z),satz19l(y,x,z,satz14(l))):lessis(pl(x,z),pl(y,z))
-satz19o:=satz13(pl(z,y),pl(z,x),satz19m(y,x,z,satz14(l))):lessis(pl(z,x),pl(z,y))
-+320
-z@t1:=satz10a(x,y):or3(is(x,y),more(x,y),less(x,y))
-t2:=satz10b(pl(x,z),pl(y,z)):ec3(is(pl(x,z),pl(y,z)),more(pl(x,z),pl(y,z)),less(pl(x,z),pl(y,z)))
--320
-z@[m:more(pl(x,z),pl(y,z))]
-satz20a:=th11"l.ec3"(is(x,y),more(x,y),less(x,y),is(pl(x,z),pl(y,z)),more(pl(x,z),pl(y,z)),less(pl(x,z),pl(y,z)),t1".320",t2".320",[u:is(x,y)]satz19b(x,y,z,u),[u:more(x,y)]satz19a(x,y,z,u),[u:less(x,y)]satz19c(x,y,z,u),m):more(x,y)
-z@[i:is(pl(x,z),pl(y,z))]
-satz20b:=th10"l.ec3"(is(x,y),more(x,y),less(x,y),is(pl(x,z),pl(y,z)),more(pl(x,z),pl(y,z)),less(pl(x,z),pl(y,z)),t1".320",t2".320",[u:is(x,y)]satz19b(x,y,z,u),[u:more(x,y)]satz19a(x,y,z,u),[u:less(x,y)]satz19c(x,y,z,u),i):is(x,y)
-z@[l:less(pl(x,z),pl(y,z))]
-satz20c:=th12"l.ec3"(is(x,y),more(x,y),less(x,y),is(pl(x,z),pl(y,z)),more(pl(x,z),pl(y,z)),less(pl(x,z),pl(y,z)),t1".320",t2".320",[u:is(x,y)]satz19b(x,y,z,u),[u:more(x,y)]satz19a(x,y,z,u),[u:less(x,y)]satz19c(x,y,z,u),l):less(x,y)
-+*320
-i@t3:=tr3is(nat,pl(z,x),pl(x,z),pl(y,z),pl(z,y),compl(z,x),i,compl(y,z)):is(pl(z,x),pl(z,y))
-andersb:=satz8a(z,x,y,t3):is(x,y)
-l@andersc:=satz20a(y,x,z,l):less(x,y)
--320
-z@[m:more(pl(z,x),pl(z,y))]
-satz20d:=satz20a(ismore12(pl(z,x),pl(x,z),pl(z,y),pl(y,z),compl(z,x),compl(z,y),m)):more(x,y)
-z@[i:is(pl(z,x),pl(z,y))]
-satz20e:=satz20b(tr3is(nat,pl(x,z),pl(z,x),pl(z,y),pl(y,z),compl(x,z),i,compl(z,y))):is(x,y)
-z@[l:less(pl(z,x),pl(z,y))]
-satz20f:=satz20c(isless12(pl(z,x),pl(x,z),pl(z,y),pl(y,z),compl(z,x),compl(z,y),l)):less(x,y)
-u@[m:more(x,y)][n:more(z,u)]
-+321
-t1:=satz19a(x,y,z,m):more(pl(x,z),pl(y,z))
-t2:=ismore12(pl(z,y),pl(y,z),pl(u,y),pl(y,u),compl(z,y),compl(u,y),satz19a(z,u,y,n)):more(pl(y,z),pl(y,u))
--321
-satz21:=trmore(pl(x,z),pl(y,z),pl(y,u),t1".321",t2".321"):more(pl(x,z),pl(y,u))
-+*321
-n@anders:=trmore(pl(x,z),pl(y,z),pl(y,u),satz19a(x,y,z,m),satz19d(z,u,y,n)):more(pl(x,z),pl(y,u))
--321
-u@[l:less(x,y)][k:less(z,u)]
-satz21a:=satz21(y,x,u,z,l,k):less(pl(x,z),pl(y,u))
-+*321
-k@andersa:=satz11(pl(y,u),pl(x,z),satz21(y,x,u,z,satz12(x,y,l),satz12(z,u,k))):less(pl(x,z),pl(y,u))
--321
-u@[m:moreis(x,y)][n:more(z,u)]
-satz22a:=orapp(more(x,y),is(x,y),more(pl(x,z),pl(y,u)),m,[v:more(x,y)]satz21(v,n),[v:is(x,y)]satz19g(u,v,n)):more(pl(x,z),pl(y,u))
-u@[m:more(x,y)][n:moreis(z,u)]
-satz22b:=orapp(more(z,u),is(z,u),more(pl(x,z),pl(y,u)),n,[v:more(z,u)]satz21(m,v),[v:is(z,u)]satz19h(z,u,x,y,v,m)):more(pl(x,z),pl(y,u))
-u@[l:lessis(x,y)][k:less(z,u)]
-satz22c:=satz22a(y,x,u,z,satz14(x,y,l),k):less(pl(x,z),pl(y,u))
-u@[l:less(x,y)][k:lessis(z,u)]
-satz22d:=satz22b(y,x,u,z,l,satz14(z,u,k)):less(pl(x,z),pl(y,u))
-u@[m:moreis(x,y)][n:moreis(z,u)]
-+323
-[i:is(x,y)][j:is(z,u)]
-t1:=moreisi2(pl(x,z),pl(y,u),tris(nat,pl(x,z),pl(y,z),pl(y,u),ispl1(x,y,z,i),ispl2(z,u,y,j))):moreis(pl(x,z),pl(y,u))
-i@[o:more(z,u)]
-t2:=moreisi1(pl(x,z),pl(y,u),satz22a(m,o)):moreis(pl(x,z),pl(y,u))
-i@t3:=orapp(more(z,u),is(z,u),moreis(pl(x,z),pl(y,u)),n,[v:more(z,u)]t2(v),[v:is(z,u)]t1(v)):moreis(pl(x,z),pl(y,u))
-n@[o:more(x,y)]
-t4:=moreisi1(pl(x,z),pl(y,u),satz22b(o,n)):moreis(pl(x,z),pl(y,u))
--323
-satz23:=orapp(more(x,y),is(x,y),moreis(pl(x,z),pl(y,u)),m,[v:more(x,y)]t4".323"(v),[v:is(x,y)]t3".323"(v)):moreis(pl(x,z),pl(y,u))
-+*323
-n@[o:more(x,y)]
-t5:=moreisi1(pl(x,z),pl(y,u),satz22b(o,n)):moreis(pl(x,z),pl(y,u))
-n@[i:is(x,y)]
-t6:=ismoreis2(pl(x,u),pl(y,u),pl(x,z),ispl1(u,i),satz19m(z,u,x,n)):moreis(pl(x,z),pl(y,u))
-n@anders:=orapp(more(x,y),is(x,y),moreis(pl(x,z),pl(y,u)),m,[v:more(x,y)]t5(v),[v:is(x,y)]t6(v)):moreis(pl(x,z),pl(y,u))
--323
-u@[l:lessis(x,y)][k:lessis(z,u)]
-satz23a:=satz13(pl(y,u),pl(x,z),satz23(y,x,u,z,satz14(l),satz14(z,u,k))):lessis(pl(x,z),pl(y,u))
-+324
-x@[n:nis(x,1)][u:nat][i:is(x,<u>suc)]
-t1:=tris(nat,x,<u>suc,pl(1,u),i,satz4g(u)):is(x,pl(1,u))
-t2:=ismore1(pl(1,u),x,1,symis(nat,x,pl(1,u),t1),satz18(1,u)):more(x,1)
-n@t3:=someapp(nat,[u:nat]is(x,<u>suc),satz3(x,n),more(x,1),[u:nat][v:is(x,<u>suc)]t2(u,v)):more(x,1)
--324
-x@satz24:=th2"l.or"(more(x,1),is(x,1),[u:nis(x,1)]t3".324"(u)):moreis(x,1)
-satz24a:=satz13(x,1,satz24):lessis(1,x)
-satz24b:=t3".324"(<x>suc,<x>ax3):more(<x>suc,1)
-satz24c:=satz24b:less(1,<x>suc)
-y@[m:more(y,x)]
-+325
-[u:nat][du:diffprop(y,x,u)]
-t1:=satz19m(u,1,x,satz24(u)):moreis(pl(x,u),pl(x,1))
-t2:=ismoreis1(pl(x,u),y,pl(x,1),symis(nat,y,pl(x,u),du),t1):moreis(y,pl(x,1))
--325
-satz25:=someapp(nat,[u:nat]diffprop(y,x,u),m,moreis(y,pl(x,1)),[u:nat][v:diffprop(y,x,u)]t2".325"(u,v)):moreis(y,pl(x,1))
-satz25a:=ismoreis2(pl(x,1),<x>suc,y,satz4a,satz25):moreis(y,<x>suc)
-y@[l:less(y,x)]
-satz25b:=satz13(x,pl(y,1),satz25(y,x,l)):lessis(pl(y,1),x)
-satz25c:=islessis1(pl(y,1),<y>suc,x,satz4a(y),satz25b):lessis(<y>suc,x)
-y@[l:less(y,pl(x,1))]
-+326
-[m:more(y,x)]
-t1:=satz25(m):moreis(y,pl(x,1))
-l@t2:=th3"l.imp"(more(y,x),moreis(y,pl(x,1)),satz10h(y,pl(x,1),l),[v:more(y,x)]t1(v)):not(more(y,x))
--326
-satz26:=satz10e(y,x,t2".326"):lessis(y,x)
-y@[l:less(y,<x>suc)]
-satz26a:=satz26(isless2(<x>suc,pl(x,1),y,satz4e,l)):lessis(y,x)
-y@[m:more(pl(y,1),x)]
-satz26b:=satz14(x,y,satz26(y,x,m)):moreis(y,x)
-y@[m:more(<y>suc,x)]
-satz26c:=satz26b(ismore1(<y>suc,pl(y,1),x,satz4e(y),m)):moreis(y,x)
-@[p:[x:nat]'prop'][n:nat]
-+327
-[m:nat]
-lbprop:=imp(<m>p,lessis(n,m)):'prop'
--327
-lb:=all([x:nat]lbprop".327"(x)):'prop'
-min:=and(lb,<n>p):'prop'
-p@[s:some(p)]
-+*327
-s@[n:nat]
-t1:=[x:<n>p]satz24a(n):lbprop(1,n)
-s@t2:=[x:nat]t1(x):lb(1)
-[l:[x:nat]lb(x)][y:nat][yp:<y>p]
-t3:=satz18(y,1):more(pl(y,1),y)
-t4:=satz10g(pl(y,1),y,t3):not(lessis(pl(y,1),y))
-t5:=th4"l.imp"(<y>p,lessis(pl(y,1),y),yp,t4):not(lbprop(pl(y,1),y))
-t6:=th1"l.all"(nat,[x:nat]lbprop(pl(y,1),x),y,t5):not(lb(pl(y,1)))
-t7:=mp(lb(pl(y,1)),con,<pl(y,1)>l,t6):con
-l@t8:=someapp(nat,p,s,con,[x:nat][y:<x>p]t7(x,y)):con
-s@[n:non(nat,[x:nat]and(lb(x),not(lb(pl(x,1)))))][m:nat][l:lb(m)]
-t9:=<m>n:not(and(lb(m),not(lb(pl(m,1)))))
-t10:=et(lb(pl(m,1)),th3"l.and"(lb(m),not(lb(pl(m,1))),t9,l)):lb(pl(m,1))
-t11:=isp(nat,[x:nat]lb(x),pl(m,1),<m>suc,t10,satz4a(m)):lb(<m>suc)
-n@t12:=[x:nat]induction([y:nat]lb(y),t2,[y:nat][z:lb(y)]t11(y,z),x):[x:nat]lb(x)
-s@t13:=[x:non(nat,[x:nat]and(lb(x),not(lb(pl(x,1)))))]t8(t12(x)):some([x:nat]and(lb(x),not(lb(pl(x,1)))))
-[m:nat][a:and(lb(m),not(lb(pl(m,1))))]
-t14:=ande1(lb(m),not(lb(pl(m,1))),a):lb(m)
-t15:=ande2(lb(m),not(lb(pl(m,1))),a):not(lb(pl(m,1)))
-[nmp:not(<m>p)][n:nat][np:<n>p]
-t16:=mp(<n>p,lessis(m,n),np,<n>t14):lessis(m,n)
-t17:=th3"l.imp"(is(m,n),<m>p,nmp,[x:is(m,n)]isp(nat,p,n,m,np,symis(nat,m,n,x))):not(is(m,n))
-t18:=ore1(less(m,n),is(m,n),t16,t17):less(m,n)
-t19:=satz25b(n,m,t18):lessis(pl(m,1),n)
-nmp@t20:=[x:nat][y:<x>p]t19(x,y):lb(pl(m,1))
-t21:=mp(lb(pl(m,1)),con,t20,t15):con
-a@t22:=et(<m>p,[x:not(<m>p)]t21(x)):<m>p
-t23:=andi(lb(m),<m>p,t14,t22):min(m)
--327
-s@satz27:=th6"l.some"(nat,[x:nat]and(lb(x),not(lb(pl(x,1)))),[x:nat]min(x),t13".327",[x:nat][y:and(lb(x),not(lb(pl(x,1))))]t23".327"(x,y)):some([x:nat]min(p,x))
-+*327
-p@[n:non(nat,[x:nat]min(x))][u:nat]
-t24:=[x:<u>p]satz24a(u):lbprop(1,u)
-n@t25:=[x:nat]t24(x):lb(1)
-u@[l:lb(u)]
-t26:=<u>n:not(min(u))
-t27:=th3"l.and"(lb(u),<u>p,t26,l):not(<u>p)
-[v:nat][vp:<v>p]
-t28:=th3"l.imp"(is(u,v),<u>p,t27,[x:is(u,v)]isp1(nat,p,v,u,vp,x)):nis(u,v)
-t29:=mp(<v>p,lessis(u,v),vp,<v>l):lessis(u,v)
-t30:=ore1(less(u,v),is(u,v),t29,t28):less(u,v)
-t31:=satz25c(v,u,t30):lessis(<u>suc,v)
-v@t32:=[x:<v>p]t31(x):lbprop(<u>suc,v)
-l@t33:=[x:nat]t32(x):lb(<u>suc)
-u@t34:=induction([x:nat]lb(x),t25,[x:nat][y:lb(x)]t33(x,y),u):lb(u)
-p@[s:some(p)][u:nat][up:<u>p]
-t35:=satz10g(<u>suc,u,satz18b(u)):not(lessis(<u>suc,u))
-t36:=th4"l.imp"(<u>p,lessis(<u>suc,u),up,t35):not(lbprop(<u>suc,u))
-t37:=th1"l.all"(nat,[x:nat]lbprop(<u>suc,x),u,t36):not(lb(<u>suc))
-t38:=[y:non(nat,[x:nat]min(x))]mp(lb(<u>suc),con,t34(y,<u>suc),t37):some([x:nat]min(x))
-s@anders:=someapp(nat,p,s,some([x:nat]min(x)),[x:nat][y:<x>p]t38(x,y)):some([x:nat]min(x))
--327
-+*327
-p@[n:nat][m:nat][mn:min(p,n)][mm:min(p,m)]
-t39:=ande1(lb(n),<n>p,mn):lb(n)
-t40:=ande1(lb(m),<m>p,mm):lb(m)
-t41:=ande2(lb(n),<n>p,mn):<n>p
-t42:=ande2(lb(m),<m>p,mm):<m>p
-t43:=<m>t39:lbprop(n,m)
-t44:=<n>t40:lbprop(m,n)
-t45:=mp(<m>p,lessis(n,m),t42,t43):lessis(n,m)
-t46:=mp(<n>p,lessis(m,n),t41,t44):lessis(m,n)
-t47:=ore2(more(n,m),is(n,m),satz14(m,n,t46),satz10d(n,m,t45)):is(n,m)
-p@t48:=[x:nat][y:nat][u:min(x)][v:min(y)]t47(x,y,u,v):amone(nat,[x:nat]min(p,x))
--327
-s@satz27a:=onei(nat,[x:nat]min(p,x),t48".327",satz27):one([x:nat]min(p,x))
-+428
-x@[f:[y:nat]nat]
-prop1:=all([y:nat]is(<<y>suc>f,pl(<y>f,x))):'prop'
-prop2:=and(is(<1>f,x),prop1):'prop'
-x@[a:[y:nat]nat][b:[y:nat]nat][pa:prop2(a)][pb:prop2(b)][y:nat]
-prop3:=is(<y>a,<y>b):'prop'
-pb@t1:=ande1(is(<1>a,x),prop1(a),pa):is(<1>a,x)
-t2:=ande1(is(<1>b,x),prop1(b),pb):is(<1>b,x)
-t3:=tris2(nat,<1>a,<1>b,x,t1,t2):prop3(1)
-y@[p:prop3(y)]
-t4:=ispl1(<y>a,<y>b,x,p):is(pl(<y>a,x),pl(<y>b,x))
-t5:=ande2(is(<1>a,x),prop1(a),pa):prop1(a)
-t6:=ande2(is(<1>b,x),prop1(b),pb):prop1(b)
-t7:=<y>t5:is(<<y>suc>a,pl(<y>a,x))
-t8:=<y>t6:is(<<y>suc>b,pl(<y>b,x))
-t9:=tr3is(nat,<<y>suc>a,pl(<y>a,x),pl(<y>b,x),<<y>suc>b,t7,t4,symis(nat,<<y>suc>b,pl(<y>b,x),t8)):prop3(<y>suc)
-y@t10:=induction([z:nat]prop3(z),t3,[z:nat][u:prop3(z)]t9(z,u),y):prop3(y)
-pb@t11:=fisi(nat,nat,a,b,[y:nat]t10(y)):is"e"([y:nat]nat,a,b)
-x@a1:=[z:[y:nat]nat][u:[y:nat]nat][v:prop2(z)][w:prop2(u)]t11(z,u,v,w):amone([y:nat]nat,[z:[y:nat]nat]prop2(z))
-prop4:=some"l"([y:nat]nat,[z:[y:nat]nat]prop2(z)):'prop'
-@id:=[y:nat]y:[y:nat]nat
-t12:=[x:nat]satz4e(x):prop1(1,id)
-t13:=andi(is(<1>id,1),prop1(1,id),refis(nat,1),t12):prop2(1,id)
-t14:=somei([y:nat]nat,[z:[y:nat]nat]prop2(1,z),id,t13):prop4(1)
-x@[p:prop4(x)][f:[y:nat]nat][pf:prop2(f)]
-g:=[y:nat]pl(<y>f,y):[y:nat]nat
-t15:=ande1(is(<1>f,x),prop1(f),pf):is(<1>f,x)
-t16:=tris(nat,<1>g,pl(x,1),<x>suc,ispl1(<1>f,x,1,t15),satz4a(x)):is(<1>g,<x>suc)
-[y:nat]
-t17:=ande2(is(<1>f,x),prop1(f),pf):prop1(f)
-t18:=<y>t17:is(<<y>suc>f,pl(<y>f,x))
-t19:=tris(nat,<<y>suc>g,pl(pl(<y>f,x),<y>suc),pl(<y>f,pl(x,<y>suc)),ispl1(<<y>suc>f,pl(<y>f,x),<y>suc,t18),asspl1(<y>f,x,<y>suc)):is(<<y>suc>g,pl(<y>f,pl(x,<y>suc)))
-t20:=tr3is(nat,pl(x,<y>suc),<pl(x,y)>suc,pl(<x>suc,y),pl(y,<x>suc),satz4b(x,y),satz4h(x,y),compl(<x>suc,y)):is(pl(x,<y>suc),pl(y,<x>suc))
-t21:=tr3is(nat,<<y>suc>g,pl(<y>f,pl(x,<y>suc)),pl(<y>f,pl(y,<x>suc)),pl(<y>g,<x>suc),t19,ispl2(pl(x,<y>suc),pl(y,<x>suc),<y>f,t20),asspl2(<y>f,y,<x>suc)):is(<<y>suc>g,pl(<y>g,<x>suc))
-pf@t22:=[y:nat]t21(y):prop1(<x>suc,g)
-t23:=andi(is(<1>g,<x>suc),prop1(<x>suc,g),t16,t22):prop2(<x>suc,g)
-t24:=somei([y:nat]nat,[z:[y:nat]nat]prop2(<x>suc,z),g,t23):prop4(<x>suc)
-p@t25:=someapp([y:nat]nat,[z:[y:nat]nat]prop2(z),p,prop4(<x>suc),[z:[y:nat]nat][u:prop2(z)]t24(z,u)):prop4(<x>suc)
-x@b1:=induction([y:nat]prop4(y),t14,[y:nat][u:prop4(y)]t25(y,u),x):prop4(x)
--428
-x@satz28:=onei([y:nat]nat,[z:[y:nat]nat]prop2".428"(z),a1".428",b1".428"):one"e"([y:nat]nat,[z:[y:nat]nat]and(is(<1>z,x),all([y:nat]is(<<y>suc>z,pl(<y>z,x)))))
-times:=ind([y:nat]nat,[z:[y:nat]nat]prop2".428"(z),satz28):[y:nat]nat
-y@ts:=<y>times:nat
-+*428
-x@t26:=oneax([y:nat]nat,[z:[y:nat]nat]prop2(z),satz28):prop2(times)
--428
-x@satz28a:=ande1(is(<1>times,x),prop1".428"(times),t26".428"):is(ts(x,1),x)
-+*428
-x@t27:=ande2(is(<1>times,x),prop1(times),t26):prop1(times)
--428
-y@satz28b:=<y>t27".428":is(ts(x,<y>suc),pl(ts(x,y),x))
-+*428
-@t28:=t11(1,times(1),id,t26(1),t13):is"e"([y:nat]nat,times(1),id)
--428
-x@satz28c:=fise(nat,nat,times(1),id".428",t28".428",x):is(ts(1,x),x)
-+*428
-x@t29:=t11(<x>suc,times(<x>suc),[y:nat]pl(<y>times,y),t26(<x>suc),t23(b1,times,t26)):is"e"([y:nat]nat,times(<x>suc),[y:nat]pl(<y>times,y))
--428
-y@satz28d:=fise(nat,nat,times(<x>suc),[z:nat]pl(<z>times,z),t29".428",y):is(ts(<x>suc,y),pl(ts(x,y),y))
-x@satz28e:=symis(nat,ts(x,1),x,satz28a):is(x,ts(x,1))
-y@satz28f:=symis(nat,ts(x,<y>suc),pl(ts(x,y),x),satz28b):is(pl(ts(x,y),x),ts(x,<y>suc))
-x@satz28g:=symis(nat,ts(1,x),x,satz28c):is(x,ts(1,x))
-y@satz28h:=symis(nat,ts(<x>suc,y),pl(ts(x,y),y),satz28d):is(pl(ts(x,y),y),ts(<x>suc,y))
-z@[i:is(x,y)]
-ists1:=isf(nat,nat,[u:nat]ts(u,z),x,y,i):is(ts(x,z),ts(y,z))
-ists2:=isf(nat,nat,[u:nat]ts(z,u),x,y,i):is(ts(z,x),ts(z,y))
-z@[u:nat][i:is(x,y)][j:is(z,u)]
-ists12:=tris(nat,ts(x,z),ts(y,z),ts(y,u),ists1(i),ists2(z,u,y,j)):is(ts(x,z),ts(y,u))
-+429
-y@prop1:=is(ts(x,y),ts(y,x)):'prop'
-t1:=satz28a(y):is(ts(y,1),y)
-t2:=satz28c(y):is(ts(1,y),y)
-t3:=tris2(nat,ts(1,y),ts(y,1),y,t2,t1):prop1(1,y)
-[p:prop1(x,y)]
-t4:=tris(nat,pl(ts(x,y),y),pl(ts(y,x),y),ts(y,<x>suc),ispl1(ts(x,y),ts(y,x),y,p),satz28f(y,x)):is(pl(ts(x,y),y),ts(y,<x>suc))
-t5:=satz28d:is(ts(<x>suc,y),pl(ts(x,y),y))
-t6:=tris(nat,ts(<x>suc,y),pl(ts(x,y),y),ts(y,<x>suc),t5,t4):prop1(<x>suc,y)
--429
-y@satz29:=induction([z:nat]prop1".429"(z,y),t3".429",[z:nat][u:prop1".429"(z,y)]t6".429"(z,y,u),x):is(ts(x,y),ts(y,x))
-comts:=satz29:is(ts(x,y),ts(y,x))
-+*429
-x@t7:=tris(nat,ts(x,1),x,ts(1,x),satz28a,satz28g):prop1(1)
-y@[p:prop1(y)]
-t8:=tr3is(nat,ts(x,<y>suc),pl(ts(x,y),x),pl(ts(y,x),x),ts(<y>suc,x),satz28b(x,y),ispl1(ts(x,y),ts(y,x),x,p),satz28h(y,x)):prop1(<y>suc)
-y@anders:=induction([z:nat]prop1(z),t7,[z:nat][u:prop1(z)]t8(z,u),y):is(ts(x,y),ts(y,x))
--429
-+430
-z@prop1:=is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z))):'prop'
-y@t1:=tr3is(nat,ts(x,pl(y,1)),ts(x,<y>suc),pl(ts(x,y),x),pl(ts(x,y),ts(x,1)),ists2(pl(y,1),<y>suc,x,satz4a(y)),satz28b,ispl2(x,ts(x,1),ts(x,y),satz28e(x))):prop1(1)
-z@[p:prop1(z)]
-t2:=tr3is(nat,ts(x,pl(y,<z>suc)),ts(x,<pl(y,z)>suc),pl(ts(x,pl(y,z)),x),pl(pl(ts(x,y),ts(x,z)),x),ists2(pl(y,<z>suc),<pl(y,z)>suc,x,satz4b(y,z)),satz28b(x,pl(y,z)),ispl1(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)),x,p)):is(ts(x,pl(y,<z>suc)),pl(pl(ts(x,y),ts(x,z)),x))
-t3:=tr3is(nat,ts(x,pl(y,<z>suc)),pl(pl(ts(x,y),ts(x,z)),x),pl(ts(x,y),pl(ts(x,z),x)),pl(ts(x,y),ts(x,<z>suc)),t2,asspl1(ts(x,y),ts(x,z),x),ispl2(pl(ts(x,z),x),ts(x,<z>suc),ts(x,y),satz28f(x,z))):prop1(<z>suc)
--430
-z@satz30:=induction([u:nat]prop1".430"(u),t1".430",[u:nat][v:prop1".430"(u)]t3".430"(u,v),z):is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
-disttp1:=tr3is(nat,ts(pl(x,y),z),ts(z,pl(x,y)),pl(ts(z,x),ts(z,y)),pl(ts(x,z),ts(y,z)),comts(pl(x,y),z),satz30(z,x,y),ispl12(ts(z,x),ts(x,z),ts(z,y),ts(y,z),comts(z,x),comts(z,y))):is(ts(pl(x,y),z),pl(ts(x,z),ts(y,z)))
-disttp2:=satz30:is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
-distpt1:=symis(nat,ts(pl(x,y),z),pl(ts(x,z),ts(y,z)),disttp1):is(pl(ts(x,z),ts(y,z)),ts(pl(x,y),z))
-distpt2:=symis(nat,ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)),disttp2):is(pl(ts(x,y),ts(x,z)),ts(x,pl(y,z)))
-+431
-prop1:=is(ts(ts(x,y),z),ts(x,ts(y,z))):'prop'
-y@t1:=tris(nat,ts(ts(x,y),1),ts(x,y),ts(x,ts(y,1)),satz28a(ts(x,y)),ists2(y,ts(y,1),x,satz28e(y))):prop1(1)
-z@[p:prop1(z)]
-t2:=tr4is(nat,ts(ts(x,y),<z>suc),pl(ts(ts(x,y),z),ts(x,y)),pl(ts(x,ts(y,z)),ts(x,y)),ts(x,pl(ts(y,z),y)),ts(x,ts(y,<z>suc)),satz28b(ts(x,y),z),ispl1(ts(ts(x,y),z),ts(x,ts(y,z)),ts(x,y),p),distpt2(x,ts(y,z),y),ists2(pl(ts(y,z),y),ts(y,<z>suc),x,satz28f(y,z))):prop1(<z>suc)
--431
-satz31:=induction([u:nat]prop1".431"(u),t1".431",[u:nat][v:prop1".431"(u)]t2".431"(u,v),z):is(ts(ts(x,y),z),ts(x,ts(y,z)))
-assts1:=satz31:is(ts(ts(x,y),z),ts(x,ts(y,z)))
-assts2:=symis(nat,ts(ts(x,y),z),ts(x,ts(y,z)),assts1):is(ts(x,ts(y,z)),ts(ts(x,y),z))
-[m:more(x,y)]
-+432
-[u:nat][du:diffprop(u)]
-t1:=tris(nat,ts(x,z),ts(pl(y,u),z),pl(ts(y,z),ts(u,z)),ists1(x,pl(y,u),z,du),disttp1(y,u,z)):is(ts(x,z),pl(ts(y,z),ts(u,z)))
-t2:=somei(nat,[v:nat]diffprop(ts(x,z),ts(y,z),v),ts(u,z),t1):more(ts(x,z),ts(y,z))
--432
-satz32a:=someapp(nat,[u:nat]diffprop(u),m,more(ts(x,z),ts(y,z)),[u:nat][v:diffprop(u)]t2".432"(u,v)):more(ts(x,z),ts(y,z))
-z@[i:is(x,y)]
-satz32b:=ists1(x,y,z,i):is(ts(x,z),ts(y,z))
-z@[l:less(x,y)]
-satz32c:=satz11(ts(y,z),ts(x,z),satz32a(y,x,z,satz12(x,y,l))):less(ts(x,z),ts(y,z))
-+*432
-l@anders1:=satz32a(y,x,z,l):less(ts(x,z),ts(y,z))
--432
-m@satz32d:=ismore12(ts(x,z),ts(z,x),ts(y,z),ts(z,y),comts(x,z),comts(y,z),satz32a):more(ts(z,x),ts(z,y))
-i@satz32e:=ists2(x,y,z,i):is(ts(z,x),ts(z,y))
-l@satz32f:=isless12(ts(x,z),ts(z,x),ts(y,z),ts(z,y),comts(x,z),comts(y,z),satz32c):less(ts(z,x),ts(z,y))
-+*432
-l@anders2:=satz32d(y,x,z,l):less(ts(z,x),ts(z,y))
--432
-z@[u:nat][i:is(x,y)][m:more(z,u)]
-satz32g:=ismore2(ts(x,u),ts(y,u),ts(x,z),ists1(x,y,u,i),satz32d(z,u,x,m)):more(ts(x,z),ts(y,u))
-satz32h:=ismore12(ts(x,z),ts(z,x),ts(y,u),ts(u,y),comts(x,z),comts(y,u),satz32g):more(ts(z,x),ts(u,y))
-i@[l:less(z,u)]
-satz32j:=isless2(ts(x,u),ts(y,u),ts(x,z),ists1(x,y,u,i),satz32f(z,u,x,l)):less(ts(x,z),ts(y,u))
-satz32k:=isless12(ts(x,z),ts(z,x),ts(y,u),ts(u,y),comts(x,z),comts(y,u),satz32j):less(ts(z,x),ts(u,y))
-z@[m:moreis(x,y)]
-+*432
-m@[n:more(x,y)]
-t3:=moreisi1(ts(x,z),ts(y,z),satz32a(n)):moreis(ts(x,z),ts(y,z))
-m@[i:is(x,y)]
-t4:=moreisi2(ts(x,z),ts(y,z),ists1(x,y,z,i)):moreis(ts(x,z),ts(y,z))
--432
-m@satz32l:=orapp(more(x,y),is(x,y),moreis(ts(x,z),ts(y,z)),m,[u:more(x,y)]t3".432"(u),[u:is(x,y)]t4".432"(u)):moreis(ts(x,z),ts(y,z))
-satz32m:=ismoreis12(ts(x,z),ts(z,x),ts(y,z),ts(z,y),comts(x,z),comts(y,z),satz32l):moreis(ts(z,x),ts(z,y))
-z@[l:lessis(x,y)]
-satz32n:=satz13(ts(y,z),ts(x,z),satz32l(y,x,z,satz14(l))):lessis(ts(x,z),ts(y,z))
-satz32o:=satz13(ts(z,y),ts(z,x),satz32m(y,x,z,satz14(l))):lessis(ts(z,x),ts(z,y))
-+433
-z@t1:=satz10a(x,y):or3(is(x,y),more(x,y),less(x,y))
-t2:=satz10b(ts(x,z),ts(y,z)):ec3(is(ts(x,z),ts(y,z)),more(ts(x,z),ts(y,z)),less(ts(x,z),ts(y,z)))
--433
-z@[m:more(ts(x,z),ts(y,z))]
-satz33a:=th11"l.ec3"(is(x,y),more(x,y),less(x,y),is(ts(x,z),ts(y,z)),more(ts(x,z),ts(y,z)),less(ts(x,z),ts(y,z)),t1".433",t2".433",[u:is(x,y)]satz32b(x,y,z,u),[u:more(x,y)]satz32a(x,y,z,u),[u:less(x,y)]satz32c(x,y,z,u),m):more(x,y)
-z@[i:is(ts(x,z),ts(y,z))]
-satz33b:=th10"l.ec3"(is(x,y),more(x,y),less(x,y),is(ts(x,z),ts(y,z)),more(ts(x,z),ts(y,z)),less(ts(x,z),ts(y,z)),t1".433",t2".433",[u:is(x,y)]satz32b(x,y,z,u),[u:more(x,y)]satz32a(x,y,z,u),[u:less(x,y)]satz32c(x,y,z,u),i):is(x,y)
-z@[l:less(ts(x,z),ts(y,z))]
-satz33c:=th12"l.ec3"(is(x,y),more(x,y),less(x,y),is(ts(x,z),ts(y,z)),more(ts(x,z),ts(y,z)),less(ts(x,z),ts(y,z)),t1".433",t2".433",[u:is(x,y)]satz32b(x,y,z,u),[u:more(x,y)]satz32a(x,y,z,u),[u:less(x,y)]satz32c(x,y,z,u),l):less(x,y)
-+*433
-l@anders:=satz33a(y,x,z,l):less(x,y)
--433
-u@[m:more(x,y)][n:more(z,u)]
-+434
-t1:=satz32a(x,y,z,m):more(ts(x,z),ts(y,z))
-t2:=ismore12(ts(z,y),ts(y,z),ts(u,y),ts(y,u),comts(z,y),comts(u,y),satz32a(z,u,y,n)):more(ts(y,z),ts(y,u))
--434
-satz34:=trmore(ts(x,z),ts(y,z),ts(y,u),t1".434",t2".434"):more(ts(x,z),ts(y,u))
-+*434
-n@anders:=trmore(ts(x,z),ts(y,z),ts(y,u),satz32a(x,y,z,m),satz32d(z,u,y,n)):more(ts(x,z),ts(y,u))
--434
-u@[l:less(x,y)][k:less(z,u)]
-satz34a:=satz34(y,x,u,z,l,k):less(ts(x,z),ts(y,u))
-+*434
-k@andersa:=satz11(ts(y,u),ts(x,z),satz34(y,x,u,z,satz12(x,y,l),satz12(z,u,k))):less(ts(x,z),ts(y,u))
--434
-u@[m:moreis(x,y)][n:more(z,u)]
-satz35a:=orapp(more(x,y),is(x,y),more(ts(x,z),ts(y,u)),m,[v:more(x,y)]satz34(v,n),[v:is(x,y)]satz32g(u,v,n)):more(ts(x,z),ts(y,u))
-u@[m:more(x,y)][n:moreis(z,u)]
-satz35b:=orapp(more(z,u),is(z,u),more(ts(x,z),ts(y,u)),n,[v:more(z,u)]satz34(m,v),[v:is(z,u)]satz32h(z,u,x,y,v,m)):more(ts(x,z),ts(y,u))
-u@[l:lessis(x,y)][k:less(z,u)]
-satz35c:=satz35a(y,x,u,z,satz14(x,y,l),k):less(ts(x,z),ts(y,u))
-u@[l:less(x,y)][k:lessis(z,u)]
-satz35d:=satz35b(y,x,u,z,l,satz14(z,u,k)):less(ts(x,z),ts(y,u))
-u@[m:moreis(x,y)][n:moreis(z,u)]
-+436
-[i:is(x,y)][j:is(z,u)]
-t1:=moreisi2(ts(x,z),ts(y,u),tris(nat,ts(x,z),ts(y,z),ts(y,u),ists1(x,y,z,i),ists2(z,u,y,j))):moreis(ts(x,z),ts(y,u))
-i@[o:more(z,u)]
-t2:=moreisi1(ts(x,z),ts(y,u),satz35a(m,o)):moreis(ts(x,z),ts(y,u))
-i@t3:=orapp(more(z,u),is(z,u),moreis(ts(x,z),ts(y,u)),n,[v:more(z,u)]t2(v),[v:is(z,u)]t1(v)):moreis(ts(x,z),ts(y,u))
-n@[o:more(x,y)]
-t4:=moreisi1(ts(x,z),ts(y,u),satz35b(o,n)):moreis(ts(x,z),ts(y,u))
--436
-satz36:=orapp(more(x,y),is(x,y),moreis(ts(x,z),ts(y,u)),m,[v:more(x,y)]t4".436"(v),[v:is(x,y)]t3".436"(v)):moreis(ts(x,z),ts(y,u))
-+*436
-n@[o:more(x,y)]
-t5:=moreisi1(ts(x,z),ts(y,u),satz35b(o,n)):moreis(ts(x,z),ts(y,u))
-n@[i:is(x,y)]
-t6:=ismoreis2(ts(x,u),ts(y,u),ts(x,z),ists1(u,i),satz32m(z,u,x,n)):moreis(ts(x,z),ts(y,u))
-n@anders:=orapp(more(x,y),is(x,y),moreis(ts(x,z),ts(y,u)),m,[v:more(x,y)]t5(v),[v:is(x,y)]t6(v)):moreis(ts(x,z),ts(y,u))
--436
-u@[l:lessis(x,y)][k:lessis(z,u)]
-satz36a:=satz13(ts(y,u),ts(x,z),satz36(y,x,u,z,satz14(l),satz14(z,u,k))):lessis(ts(x,z),ts(y,u))
-y@[m:more(x,y)]
-+mn
-t1:=onei(nat,[z:nat]diffprop(x,y,z),satz8b(x,y),m):one([z:nat]diffprop(x,y,z))
--mn
-mn:=ind(nat,[z:nat]diffprop(x,y,z),t1".mn"):nat
-+*mn
-m@th1a:=oneax(nat,[z:nat]diffprop(x,y,z),t1):is(x,pl(y,mn(x,y,m)))
-th1b:=symis(nat,x,pl(y,mn(x,y,m)),th1a):is(pl(y,mn(x,y,m)),x)
-th1c:=tris(nat,x,pl(y,mn(x,y,m)),pl(mn(x,y,m),y),th1a,compl(y,mn(x,y,m))):is(x,pl(mn(x,y,m),y))
-th1d:=symis(nat,x,pl(mn(x,y,m),y),th1c):is(pl(mn(x,y,m),y),x)
-y@[z:nat][m:more(x,y)][i:is(pl(y,z),x)]
-th1e:=<th1a(m)><symis(nat,pl(y,z),x,i)><mn(x,y,m)><z>satz8b(x,y):is(z,mn(x,y,m))
--mn
-z@[u:nat][m:more(x,z)][n:more(y,u)][i:is(x,y)][j:is(z,u)]
-+*mn
-j@t2:=tr3is(nat,pl(u,mn(x,z,m)),pl(z,mn(x,z,m)),x,y,ispl1(u,z,mn(x,z,m),symis(nat,z,u,j)),th1b(x,z,m),i):is(pl(u,mn(x,z,m)),y)
--mn
-j@ismn12:=th1e".mn"(y,u,mn(x,z,m),n,t2".mn"):is(mn(x,z,m),mn(y,u,n))
-@[n:nat]
-1to:=ot(nat,[x:nat]lessis(x,n)):'type'
-[x:nat][l:lessis(x,n)]
-outn:=out(nat,[y:nat]lessis(y,n),x,l):1to(n)
-n@[xn:1to(n)]
-inn:=in"e"(nat,[y:nat]lessis(y,n),xn):nat
-1top:=inp(nat,[y:nat]lessis(y,n),xn):lessis(inn,n)
-l@[y:nat][k:lessis(y,n)][i:is(x,y)]
-isoutni:=isouti(nat,[z:nat]lessis(z,n),x,l,y,k,i):is"e"(1to(n),outn(x,l),outn(y,k))
-k@[i:is"e"(1to(n),outn(x,l),outn(y,k))]
-isoutne:=isoute(nat,[z:nat]lessis(z,n),x,l,y,k,i):is(x,y)
-xn@[yn:1to(n)][i:is"e"(1to(n),xn,yn)]
-isinni:=isini(nat,[z:nat]lessis(z,n),xn,yn,i):is(inn(xn),inn(yn))
-yn@[i:is(inn(xn),inn(yn))]
-isinne:=isine(nat,[z:nat]lessis(z,n),xn,yn,i):is"e"(1to(n),xn,yn)
-xn@isoutinn:=isoutin(nat,[y:nat]lessis(y,n),xn):is"e"(1to(n),xn,outn(inn(xn),1top(xn)))
-l@isinoutn:=isinout(nat,[y:nat]lessis(y,n),x,l):is(x,inn(outn(x,l)))
-@1o:=outn(1,1,lessisi2(1,1,refis(nat,1))):1to(1)
-[u:1to(1)]
-+singlet
-u0:=inn(1,u):nat
-t1:=1top(1,u):lessis(u0,1)
-t2:=ore2(more(u0,1),is(u0,1),satz24(u0),satz10d(u0,1,t1)):is(u0,1)
-th1:=tris(1to(1),u,outn(1,u0,t1),1o,isoutinn(1,u),isoutni(1,u0,t1,1,lessisi2(1,1,refis(nat,1)),t2)):is"e"(1to(1),u,1o)
--singlet
-@2:=pl(1,1):nat
-[x:nat]
-+pair
-[l:lessis(x,2)][n:nis(x,2)]
-t1:=satz26(1,x,ore1(less(x,2),is(x,2),l,n)):lessis(x,1)
-t2:=ore2(more(x,1),is(x,1),satz24(x),satz10d(x,1,t1)):is(x,1)
-l@th1:=th2"l.or"(is(x,1),is(x,2),[t:nis(x,2)]t2(t)):or(is(x,1),is(x,2))
-@th2:=th1"e.notis"(nat,<1>suc,1,2,<1>ax3,satz4e(1)):nis(2,1)
--pair
-@1t:=outn(2,1,satz24a(2)):1to(2)
-2t:=outn(2,2,lessisi2(2,2,refis(nat,2))):1to(2)
-+*pair
-@[u:1to(2)]
-u0:=inn(2,u):nat
-t3:=1top(2,u):lessis(u0,2)
-[i:is(u0,1)]
-t4:=isoutni(2,u0,t3,1,satz24a(2),i):is"e"(1to(2),outn(2,u0,t3),1t)
-t5:=tris(1to(2),u,outn(2,u0,t3),1t,isoutinn(2,u),t4):is"e"(1to(2),u,1t)
-u@[i:is(u0,2)]
-t6:=isoutni(2,u0,t3,2,lessisi2(2,2,refis(nat,2)),i):is"e"(1to(2),outn(2,u0,t3),2t)
-t7:=tris(1to(2),u,outn(2,u0,t3),2t,isoutinn(2,u),t6):is"e"(1to(2),u,2t)
-u@th3:=th9"l.or"(is(u0,1),is(u0,2),is"e"(1to(2),u,1t),is"e"(1to(2),u,2t),th1(u0,t3),[t:is(u0,1)]t5(t),[t:is(u0,2)]t7(t)):or(is"e"(1to(2),u,1t),is"e"(1to(2),u,2t))
-@[i:is"e"(1to(2),2t,1t)]
-t9:=isini(nat,[x:nat]lessis(x,2),2t,1t,i):is(u0(2t),u0(1t))
-t10:=tr3is(nat,2,u0(2t),u0(1t),1,isinoutn(2,2,lessisi2(2,2,refis(nat,2))),t9,symis(nat,1,u0(1t),isinoutn(2,1,satz24a(2)))):is(2,1)
-@th4:=th3"l.imp"(is"e"(1to(2),2t,1t),is(2,1),th2,[t:is"e"(1to(2),2t,1t)]t10(t)):not(is"e"(1to(2),2t,1t))
--pair
-@[alpha:'type']
-pair1type:=[x:1to(2)]alpha:'type'
-[a:alpha][b:alpha]
-pair1:=[x:1to(2)]ite(is"e"(1to(2),x,1t),alpha,a,b):pair1type
-alpha@[p:pair1type]
-first1:=<1t>p:alpha
-second1:=<2t>p:alpha
-b@first1is1:=itet(is"e"(1to(2),1t,1t),alpha,a,b,refis(1to(2),1t)):is"e"(alpha,first1(pair1),a)
-first1is2:=symis(alpha,first1(pair1),a,first1is1):is"e"(alpha,a,first1(pair1))
-second1is1:=itef(is"e"(1to(2),2t,1t),alpha,a,b,th4".pair"):is"e"(alpha,second1(pair1),b)
-second1is2:=symis(alpha,second1(pair1),b,second1is1):is"e"(alpha,b,second1(pair1))
-+*pair
-p@[q:pair1type][i:is"e"(alpha,first1(p),first1(q))][j:is"e"(alpha,second1(p),second1(q))][u:1to(2)][u1:is"e"(1to(2),u,1t)]
-t11:=isf(1to(2),alpha,p,u,1t,u1):is"e"(alpha,<u>p,first1(p))
-t12:=symis(alpha,<u>q,first1(q),isf(1to(2),alpha,q,u,1t,u1)):is"e"(alpha,first1(q),<u>q)
-t13:=tr3is(alpha,<u>p,first1(p),first1(q),<u>q,t11,i,t12):is"e"(alpha,<u>p,<u>q)
-u@[u2:is"e"(1to(2),u,2t)]
-t14:=isf(1to(2),alpha,p,u,2t,u2):is"e"(alpha,<u>p,second1(p))
-t15:=symis(alpha,<u>q,second1(q),isf(1to(2),alpha,q,u,2t,u2)):is"e"(alpha,second1(q),<u>q)
-t16:=tr3is(alpha,<u>p,second1(p),second1(q),<u>q,t14,j,t15):is"e"(alpha,<u>p,<u>q)
-u@t17:=orapp(is"e"(1to(2),u,1t),is"e"(1to(2),u,2t),is"e"(alpha,<u>p,<u>q),th3(u),[t:is"e"(1to(2),u,1t)]t13(t),[t:is"e"(1to(2),u,2t)]t16(t)):is"e"(alpha,<u>p,<u>q)
-j@th5:=fisi(1to(2),alpha,p,q,[t:1to(2)]t17(t)):is"e"(pair1type,p,q)
-p@q0:=pair1(first1,second1):pair1type
-t18:=first1is1(first1(p),second1):is"e"(alpha,first1(q0),first1(p))
-t19:=second1is1(first1,second1):is"e"(alpha,second1(q0),second1(p))
--pair
-p@pair1is1:=th5".pair"(q0".pair",p,t18".pair",t19".pair"):is"e"(pair1type,pair1(first1,second1),p)
-pair1is2:=symis(pair1type,pair1(first1,second1),p,pair1is1):is"e"(pair1type,p,pair1(first1,second1))
-@[x:nat]
-lessisi3:=lessisi2(x,x,refis(nat,x)):lessis(x,x)
-1out:=outn(x,1,satz24a(x)):1to(x)
-xout:=outn(x,x,lessisi3(x)):1to(x)
-[y:nat][l:lessis(y,x)][u:1to(y)]
-+left
-ui:=inn(y,u):nat
-t1:=1top(y,u):lessis(ui,y)
-t2:=trlessis(ui,y,x,t1,l):lessis(ui,x)
--left
-left1to:=outn(x,ui".left",t2".left"):1to(x)
-[v:1to(y)][i:is"e"(1to(x),left1to(u),left1to(v))]
-+*left
-i@t3:=isoutne(x,ui,t2,ui(v),t2(v),i):is(ui,ui(v))
--left
-i@thleft1:=isinne(y,u,v,t3".left"):is"e"(1to(y),u,v)
-l@thleft2:=[u:1to(y)][v:1to(y)][t:is"e"(1to(x),left1to(u),left1to(v))]thleft1(u,v,t):injective(1to(y),1to(x),[t:1to(y)]left1to(t))
-y@[u:1to(y)]
-+right
-ui:=inn(y,u):nat
-t4:=1top(y,u):lessis(ui,y)
-t5:=satz19o(ui,y,x,t4):lessis(pl(x,ui),pl(x,y))
--right
-right1to:=outn(pl(x,y),pl(x,ui".right"),t5".right"):1to(pl(x,y))
-[v:1to(y)][i:is"e"(1to(pl(x,y)),right1to(u),right1to(v))]
-+*right
-i@t6:=isoutne(pl(x,y),pl(x,ui(u)),t5(u),pl(x,ui(v)),t5(v),i):is(pl(x,ui(u)),pl(x,ui(v)))
-t7:=satz20e(ui(u),ui(v),x,t6):is(ui(u),ui(v))
--right
-i@thright1:=isinne(y,u,v,t7".right"):is"e"(1to(y),u,v)
-@[alpha:'type'][x:nat][y:nat][l:lessis(y,x)][f:[t:1to(x)]alpha]
-left:=[t:1to(y)]<left1to(x,y,l,t)>f:[t:1to(y)]alpha
-y@[f:[t:1to(pl(x,y))]alpha]
-right:=[t:1to(y)]<right1to(x,y,t)>f:[t:1to(y)]alpha
-y@[i:is(y,x)][f:[t:1to(y)]alpha]
-+*left
-f@t4:=lessisi2(y,x,i):lessis(y,x)
-t5:=lessisi2(x,y,symis(nat,y,x,i)):lessis(x,y)
-f1:=left(y,x,t5,f):[t:1to(x)]alpha
-f2:=left(t4,f1):[t:1to(y)]alpha
-[u:1to(y)]
-t6:=isinoutn(x,inn(y,u),trlessis(inn(y,u),y,x,1top(y,u),t4)):is(inn(y,u),inn(x,left1to(x,y,t4,u)))
-t7:=tris(1to(y),u,outn(y,inn(y,u),1top(y,u)),left1to(y,x,t5,left1to(x,y,t4,u)),isoutinn(y,u),isoutni(y,inn(y,u),1top(y,u),inn(x,left1to(x,y,t4,u)),trlessis(inn(x,left1to(x,y,t4,u)),x,y,1top(x,left1to(x,y,t4,u)),t5),t6)):is"e"(1to(y),u,left1to(y,x,t5,left1to(x,y,t4,u)))
-t8:=isf(1to(y),alpha,f,u,left1to(y,x,t5,left1to(x,y,t4,u)),t7):is"e"(alpha,<u>f,<u>f2)
--left
-f@thleft:=fisi(1to(y),alpha,f,f2".left",[t:1to(y)]t8".left"(t)):is"e"([t:1to(y)]alpha,f,left(x,y,lessisi2(y,x,i),left(y,x,lessisi2(x,y,symis(nat,y,x,i)),f)))
-@frac:=pair1type(nat):'type'
-[x1:nat][x2:nat]
-fr:=pair1(nat,x1,x2):frac
-@[x:frac]
-num:=first1(nat,x):nat
-den:=second1(nat,x):nat
-x2@numis:=first1is1(nat,x1,x2):is(num(fr(x1,x2)),x1)
-isnum:=first1is2(nat,x1,x2):is(x1,num(fr(x1,x2)))
-denis:=second1is1(nat,x1,x2):is(den(fr(x1,x2)),x2)
-isden:=second1is2(nat,x1,x2):is(x2,den(fr(x1,x2)))
-x@1x:=num(x):nat
-2x:=den(x):nat
-fris:=pair1is1(nat,x):is"e"(frac,fr(1x,2x),x)
-isfr:=pair1is2(nat,x):is"e"(frac,x,fr(1x,2x))
-x2@[y1:nat][y2:nat]
-12isnd:=ists12(x1,num(fr(x1,x2)),y2,den(fr(y1,y2)),isnum(x1,x2),isden(y1,y2)):is(ts(x1,y2),ts(num(fr(x1,x2)),den(fr(y1,y2))))
-ndis12:=symis(nat,ts(x1,y2),ts(num(fr(x1,x2)),den(fr(y1,y2))),12isnd):is(ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(x1,y2))
-x@[n1:nat][n2:nat]
-1disnd:=ists1(n1,num(fr(n1,n2)),2x,isnum(n1,n2)):is(ts(n1,2x),ts(num(fr(n1,n2)),2x))
-ndis1d:=symis(nat,ts(n1,2x),ts(num(fr(n1,n2)),2x),1disnd):is(ts(num(fr(n1,n2)),2x),ts(n1,2x))
-n2isnd:=ists2(n2,den(fr(n1,n2)),1x,isden(n1,n2)):is(ts(1x,n2),ts(1x,den(fr(n1,n2))))
-ndisn2:=symis(nat,ts(1x,n2),ts(1x,den(fr(n1,n2))),n2isnd):is(ts(1x,den(fr(n1,n2))),ts(1x,n2))
-x2@[n:nat][i:is(x1,n)]
-isn:=isf(nat,frac,[t:nat]fr(t,x2),x1,n,i):is"e"(frac,fr(x1,x2),fr(n,x2))
-n@[i:is(x2,n)]
-isd:=isf(nat,frac,[t:nat]fr(x1,t),x2,n,i):is"e"(frac,fr(x1,x2),fr(x1,n))
-y2@[i:is(x1,y1)][j:is(x2,y2)]
-isnd:=tris(frac,fr(x1,x2),fr(y1,x2),fr(y1,y2),isn(x1,x2,y1,i),isd(y1,x2,y2,j)):is"e"(frac,fr(x1,x2),fr(y1,y2))
-x@[y:frac]
-1y:=num(y):nat
-2y:=den(y):nat
-eq:=is(ts(1x,2y),ts(1y,2x)):'prop'
-y2@[i:is(ts(x1,y2),ts(y1,x2))]
-eqi12:=tr3is(nat,ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(x1,y2),ts(y1,x2),ts(num(fr(y1,y2)),den(fr(x1,x2))),ndis12(x1,x2,y1,y2),i,12isnd(y1,y2,x1,x2)):eq(fr(x1,x2),fr(y1,y2))
-n2@[i:is(ts(1x,n2),ts(n1,2x))]
-eqi1:=isp(frac,[t:frac]eq(t,fr(n1,n2)),fr(1x,2x),x,eqi12(1x,2x,n1,n2,i),fris):eq(x,fr(n1,n2))
-n2@[i:is(ts(n1,2x),ts(1x,n2))]
-eqi2:=isp(frac,[t:frac]eq(fr(n1,n2),t),fr(1x,2x),x,eqi12(n1,n2,1x,2x,i),fris):eq(fr(n1,n2),x)
-x@satz37:=refis(nat,ts(1x,2x)):eq(x,x)
-refeq:=satz37:eq(x,x)
-y@[i:is"e"(frac,x,y)]
-refeq1:=isp(frac,[t:frac]eq(x,t),x,y,refeq,i):eq(x,y)
-refeq2:=isp(frac,[t:frac]eq(t,x),x,y,refeq,i):eq(y,x)
-y2@[i:is(x1,y1)][j:is(x2,y2)]
-eqnd:=refeq1(fr(x1,x2),fr(y1,y2),isnd(i,j)):eq(fr(x1,x2),fr(y1,y2))
-x2@[n:nat][i:is(x1,n)]
-eqn:=refeq1(fr(x1,x2),fr(n,x2),isn(n,i)):eq(fr(x1,x2),fr(n,x2))
-n@[i:is(x2,n)]
-eqd:=refeq1(fr(x1,x2),fr(x1,n),isd(n,i)):eq(fr(x1,x2),fr(x1,n))
-y@[e:eq(x,y)]
-satz38:=symis(nat,ts(1x,2y),ts(1y,2x),e):eq(y,x)
-symeq:=satz38:eq(y,x)
-@[a:nat][b:nat][c:nat][d:nat]
-+ii1
-t1:=tris(nat,ts(b,ts(c,d)),ts(ts(b,c),d),ts(d,ts(b,c)),assts2(b,c,d),comts(ts(b,c),d)):is(ts(b,ts(c,d)),ts(d,ts(b,c)))
--ii1
-stets:=tr4is(nat,ts(ts(a,b),ts(c,d)),ts(a,ts(b,ts(c,d))),ts(a,ts(d,ts(b,c))),ts(ts(a,d),ts(b,c)),ts(ts(a,d),ts(c,b)),assts1(a,b,ts(c,d)),ists2(ts(b,ts(c,d)),ts(d,ts(b,c)),a,t1".ii1"),assts2(a,d,ts(b,c)),ists2(ts(b,c),ts(c,b),ts(a,d),comts(b,c))):is(ts(ts(a,b),ts(c,d)),ts(ts(a,d),ts(c,b)))
-+*ii1
-d@t2:=tr3is(nat,ts(b,ts(c,d)),ts(ts(c,d),b),ts(ts(d,c),b),ts(d,ts(c,b)),comts(b,ts(c,d)),ists1(ts(c,d),ts(d,c),b,comts(c,d)),assts1(d,c,b)):is(ts(b,ts(c,d)),ts(d,ts(c,b)))
-anders:=tr3is(nat,ts(ts(a,b),ts(c,d)),ts(a,ts(b,ts(c,d))),ts(a,ts(d,ts(c,b))),ts(ts(a,d),ts(c,b)),assts1(a,b,ts(c,d)),ists2(ts(b,ts(c,d)),ts(d,ts(c,b)),a,t2),assts2(a,d,ts(c,b))):is(ts(ts(a,b),ts(c,d)),ts(ts(a,d),ts(c,b)))
--ii1
-y@[z:frac]
-1z:=num(z):nat
-2z:=den(z):nat
-[e:eq(x,y)][f:eq(y,z)]
-+139
-t1:=ists12(ts(1x,2y),ts(1y,2x),ts(1y,2z),ts(1z,2y),e,f):is(ts(ts(1x,2y),ts(1y,2z)),ts(ts(1y,2x),ts(1z,2y)))
-t2:=stets(1x,2y,1y,2z):is(ts(ts(1x,2y),ts(1y,2z)),ts(ts(1x,2z),ts(1y,2y)))
-t3:=tris(nat,ts(ts(1y,2x),ts(1z,2y)),ts(ts(1y,2y),ts(1z,2x)),ts(ts(1z,2x),ts(1y,2y)),stets(1y,2x,1z,2y),comts(ts(1y,2y),ts(1z,2x))):is(ts(ts(1y,2x),ts(1z,2y)),ts(ts(1z,2x),ts(1y,2y)))
-t4:=tr3is(nat,ts(ts(1x,2z),ts(1y,2y)),ts(ts(1x,2y),ts(1y,2z)),ts(ts(1y,2x),ts(1z,2y)),ts(ts(1z,2x),ts(1y,2y)),symis(nat,ts(ts(1x,2y),ts(1y,2z)),ts(ts(1x,2z),ts(1y,2y)),t2),t1,t3):is(ts(ts(1x,2z),ts(1y,2y)),ts(ts(1z,2x),ts(1y,2y)))
--139
-satz39:=satz33b(ts(1x,2z),ts(1z,2x),ts(1y,2y),t4".139"):eq(x,z)
-+*139
-f@anders:=tr4is(nat,ts(ts(1x,2z),ts(1y,2y)),ts(ts(1x,2y),ts(1y,2z)),ts(ts(1y,2x),ts(1z,2y)),ts(ts(1y,2y),ts(1z,2x)),ts(ts(1z,2x),ts(1y,2y)),stets(1x,2z,1y,2y),ists12(ts(1x,2y),ts(1y,2x),ts(1y,2z),ts(1z,2y),e,f),stets(1y,2x,1z,2y),comts(ts(1y,2y),ts(1z,2x))):is(ts(ts(1x,2z),ts(1y,2y)),ts(ts(1z,2x),ts(1y,2y)))
--139
-f@treq:=satz39:eq(x,z)
-z@[e:eq(z,x)][f:eq(z,y)]
-treq1:=treq(x,z,y,symeq(z,x,e),f):eq(x,y)
-z@[e:eq(x,z)][f:eq(y,z)]
-treq2:=treq(x,z,y,e,symeq(y,z,f)):eq(x,y)
-z@[u:frac][e:eq(x,y)][f:eq(y,z)][g:eq(z,u)]
-tr3eq:=treq(x,y,u,e,treq(y,z,u,f,g)):eq(x,u)
-u@[v:frac][e:eq(x,y)][f:eq(y,z)][g:eq(z,u)][h:eq(u,v)]
-tr4eq:=tr3eq(x,y,z,v,e,f,treq(z,u,v,g,h)):eq(x,v)
-x@[n:nat]
-satz40:=eqi1(ts(1x,n),ts(2x,n),tris(nat,ts(1x,ts(2x,n)),ts(1x,ts(n,2x)),ts(ts(1x,n),2x),ists2(ts(2x,n),ts(n,2x),1x,comts(2x,n)),assts2(1x,n,2x))):eq(x,fr(ts(1x,n),ts(2x,n)))
-satz40a:=symeq(x,fr(ts(1x,n),ts(2x,n)),satz40):eq(fr(ts(1x,n),ts(2x,n)),x)
-x2@[n:nat]
-satz40b:=eqi12(ts(x1,n),ts(x2,n),tris(nat,ts(x1,ts(x2,n)),ts(x1,ts(n,x2)),ts(ts(x1,n),x2),ists2(ts(x2,n),ts(n,x2),x1,comts(x2,n)),assts2(x1,n,x2))):eq(fr(x1,x2),fr(ts(x1,n),ts(x2,n)))
-satz40c:=symeq(fr(x1,x2),fr(ts(x1,n),ts(x2,n)),satz40b):eq(fr(ts(x1,n),ts(x2,n)),fr(x1,x2))
-y@moref:=more(ts(1x,2y),ts(1y,2x)):'prop'
-lessf:=less(ts(1x,2y),ts(1y,2x)):'prop'
-y2@[m:more(ts(x1,y2),ts(y1,x2))]
-morefi12:=ismore12(ts(x1,y2),ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(y1,x2),ts(num(fr(y1,y2)),den(fr(x1,x2))),12isnd(x1,x2,y1,y2),12isnd(y1,y2,x1,x2),m):moref(fr(x1,x2),fr(y1,y2))
-y2@[l:less(ts(x1,y2),ts(y1,x2))]
-lessfi12:=isless12(ts(x1,y2),ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(y1,x2),ts(num(fr(y1,y2)),den(fr(x1,x2))),12isnd(x1,x2,y1,y2),12isnd(y1,y2,x1,x2),l):lessf(fr(x1,x2),fr(y1,y2))
-n2@[m:more(ts(1x,n2),ts(n1,2x))]
-morefi1:=ismore12(ts(1x,n2),ts(1x,den(fr(n1,n2))),ts(n1,2x),ts(num(fr(n1,n2)),2x),n2isnd(x,n1,n2),1disnd(x,n1,n2),m):moref(x,fr(n1,n2))
-n2@[m:more(ts(n1,2x),ts(1x,n2))]
-morefi2:=ismore12(ts(n1,2x),ts(num(fr(n1,n2)),2x),ts(1x,n2),ts(1x,den(fr(n1,n2))),1disnd(x,n1,n2),n2isnd(x,n1,n2),m):moref(fr(n1,n2),x)
-n2@[l:less(ts(1x,n2),ts(n1,2x))]
-lessfi1:=isless12(ts(1x,n2),ts(1x,den(fr(n1,n2))),ts(n1,2x),ts(num(fr(n1,n2)),2x),n2isnd(x,n1,n2),1disnd(x,n1,n2),l):lessf(x,fr(n1,n2))
-n2@[l:less(ts(n1,2x),ts(1x,n2))]
-lessfi2:=isless12(ts(n1,2x),ts(num(fr(n1,n2)),2x),ts(1x,n2),ts(1x,den(fr(n1,n2))),1disnd(x,n1,n2),n2isnd(x,n1,n2),l):lessf(fr(n1,n2),x)
-y@satz41:=satz10(ts(1x,2y),ts(1y,2x)):orec3(eq(x,y),moref(x,y),lessf(x,y))
-satz41a:=satz10a(ts(1x,2y),ts(1y,2x)):or3(eq(x,y),moref(x,y),lessf(x,y))
-satz41b:=satz10b(ts(1x,2y),ts(1y,2x)):ec3(eq(x,y),moref(x,y),lessf(x,y))
-[m:moref(x,y)]
-satz42:=satz11(ts(1x,2y),ts(1y,2x),m):lessf(y,x)
-y@[l:lessf(x,y)]
-satz43:=satz12(ts(1x,2y),ts(1y,2x),l):moref(y,x)
-u@1u:=num(u):nat
-2u:=den(u):nat
-[m:moref(x,y)][e:eq(x,z)][f:eq(y,u)]
-+244
-t1:=ists12(ts(1y,2u),ts(1u,2y),ts(1z,2x),ts(1x,2z),f,symeq(x,z,e)):is(ts(ts(1y,2u),ts(1z,2x)),ts(ts(1u,2y),ts(1x,2z)))
-t2:=tr3is(nat,ts(ts(1y,2x),ts(1z,2u)),ts(ts(1y,2u),ts(1z,2x)),ts(ts(1u,2y),ts(1x,2z)),ts(ts(1u,2z),ts(1x,2y)),stets(1y,2x,1z,2u),t1,stets(1u,2y,1x,2z)):is(ts(ts(1y,2x),ts(1z,2u)),ts(ts(1u,2z),ts(1x,2y)))
-t3:=ismore1(ts(ts(1u,2z),ts(1x,2y)),ts(ts(1y,2x),ts(1z,2u)),ts(ts(1u,2z),ts(1y,2x)),symis(nat,ts(ts(1y,2x),ts(1z,2u)),ts(ts(1u,2z),ts(1x,2y)),t2),satz32d(ts(1x,2y),ts(1y,2x),ts(1u,2z),m)):more(ts(ts(1y,2x),ts(1z,2u)),ts(ts(1u,2z),ts(1y,2x)))
--244
-satz44:=satz33a(ts(1z,2u),ts(1u,2z),ts(1y,2x),ismore1(ts(ts(1y,2x),ts(1z,2u)),ts(ts(1z,2u),ts(1y,2x)),ts(ts(1u,2z),ts(1y,2x)),comts(ts(1y,2x),ts(1z,2u)),t3".244")):moref(z,u)
-u@[e:eq(x,y)][f:eq(z,u)][m:moref(x,z)]
-eqmoref12:=satz44(x,z,y,u,m,e,f):moref(y,u)
-z@[e:eq(x,y)][m:moref(x,z)]
-eqmoref1:=satz44(x,z,y,z,m,e,refeq(z)):moref(y,z)
-e@[m:moref(z,x)]
-eqmoref2:=satz44(z,x,z,y,m,refeq(z),e):moref(z,y)
-u@[l:lessf(x,y)][e:eq(x,z)][f:eq(y,u)]
-satz45:=satz42(u,z,satz44(y,x,u,z,satz43(x,y,l),f,e)):lessf(z,u)
-u@[e:eq(x,y)][f:eq(z,u)][l:lessf(x,z)]
-eqlessf12:=satz45(x,z,y,u,l,e,f):lessf(y,u)
-z@[e:eq(x,y)][l:lessf(x,z)]
-eqlessf1:=satz45(x,z,y,z,l,e,refeq(z)):lessf(y,z)
-e@[l:lessf(z,x)]
-eqlessf2:=satz45(z,x,z,y,l,refeq(z),e):lessf(z,y)
-y@moreq:=or(moref(x,y),eq(x,y)):'prop'
-lesseq:=or(lessf(x,y),eq(x,y)):'prop'
-[e:eq(x,y)]
-moreqi2:=ori2(moref(x,y),eq(x,y),e):moreq(x,y)
-lesseqi2:=ori2(lessf(x,y),eq(x,y),e):lesseq(x,y)
-y@[m:moref(x,y)]
-moreqi1:=ori1(moref(x,y),eq(x,y),m):moreq(x,y)
-y@[l:lessf(x,y)]
-lesseqi1:=ori1(lessf(x,y),eq(x,y),l):lesseq(x,y)
-y@[m:moreq(x,y)]
-satz41c:=th7"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),satz41b,comor(moref(x,y),eq(x,y),m)):not(lessf(x,y))
-y@[l:lesseq(x,y)]
-satz41d:=th9"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),satz41b,l):not(moref(x,y))
-y@[n:not(moref(x,y))]
-satz41e:=th2"l.or3"(eq(x,y),moref(x,y),lessf(x,y),satz41a,n):lesseq(x,y)
-y@[n:not(lessf(x,y))]
-satz41f:=comor(eq(x,y),moref(x,y),th3"l.or3"(eq(x,y),moref(x,y),lessf(x,y),satz41a,n)):moreq(x,y)
-y@[m:moref(x,y)]
-satz41g:=th3"l.or"(lessf(x,y),eq(x,y),ec3e23(eq(x,y),moref(x,y),lessf(x,y),satz41b,m),ec3e21(eq(x,y),moref(x,y),lessf(x,y),satz41b,m)):not(lesseq(x,y))
-y@[l:lessf(x,y)]
-satz41h:=th3"l.or"(moref(x,y),eq(x,y),ec3e32(eq(x,y),moref(x,y),lessf(x,y),satz41b,l),ec3e31(eq(x,y),moref(x,y),lessf(x,y),satz41b,l)):not(moreq(x,y))
-y@[n:not(moreq(x,y))]
-satz41j:=or3e3(eq(x,y),moref(x,y),lessf(x,y),satz41a,th5"l.or"(moref(x,y),eq(x,y),n),th4"l.or"(moref(x,y),eq(x,y),n)):lessf(x,y)
-y@[n:not(lesseq(x,y))]
-satz41k:=or3e2(eq(x,y),moref(x,y),lessf(x,y),satz41a,th4"l.or"(lessf(x,y),eq(x,y),n),th5"l.or"(lessf(x,y),eq(x,y),n)):moref(x,y)
-u@[m:moreq(x,y)][e:eq(x,z)][f:eq(y,u)]
-+246
-[n:moref(x,y)]
-t1:=ori1(moref(z,u),eq(z,u),satz44(n,e,f)):moreq(z,u)
-f@[g:eq(x,y)]
-t2:=ori2(moref(z,u),eq(z,u),tr3eq(z,x,y,u,symeq(x,z,e),g,f)):moreq(z,u)
--246
-satz46:=orapp(moref(x,y),eq(x,y),moreq(z,u),m,[t:moref(x,y)]t1".246"(t),[t:eq(x,y)]t2".246"(t)):moreq(z,u)
-u@[e:eq(x,y)][f:eq(z,u)][m:moreq(x,z)]
-eqmoreq12:=satz46(x,z,y,u,m,e,f):moreq(y,u)
-z@[e:eq(x,y)][m:moreq(x,z)]
-eqmoreq1:=satz46(x,z,y,z,m,e,refeq(z)):moreq(y,z)
-e@[m:moreq(z,x)]
-eqmoreq2:=satz46(z,x,z,y,m,refeq(z),e):moreq(z,y)
-u@[l:lesseq(x,y)][e:eq(x,z)][f:eq(y,u)]
-+247
-[k:lessf(x,y)]
-t1:=ori1(lessf(z,u),eq(z,u),satz45(k,e,f)):lesseq(z,u)
-f@[g:eq(x,y)]
-t2:=ori2(lessf(z,u),eq(z,u),tr3eq(z,x,y,u,symeq(x,z,e),g,f)):lesseq(z,u)
--247
-satz47:=orapp(lessf(x,y),eq(x,y),lesseq(z,u),l,[t:lessf(x,y)]t1".247"(t),[t:eq(x,y)]t2".247"(t)):lesseq(z,u)
-u@[e:eq(x,y)][f:eq(z,u)][l:lesseq(x,z)]
-eqlesseq12:=satz47(x,z,y,u,l,e,f):lesseq(y,u)
-z@[e:eq(x,y)][l:lesseq(x,z)]
-eqlesseq1:=satz47(x,z,y,z,l,e,refeq(z)):lesseq(y,z)
-e@[l:lesseq(z,x)]
-eqlesseq2:=satz47(z,x,z,y,l,refeq(z),e):lesseq(z,y)
-y@[m:moreq(x,y)]
-satz48:=th9"l.or"(moref(x,y),eq(x,y),lessf(y,x),eq(y,x),m,[t:moref(x,y)]satz42(x,y,t),[t:eq(x,y)]satz38(x,y,t)):lesseq(y,x)
-y@[l:lesseq(x,y)]
-satz49:=th9"l.or"(lessf(x,y),eq(x,y),moref(y,x),eq(y,x),l,[t:lessf(x,y)]satz43(x,y,t),[t:eq(x,y)]satz38(x,y,t)):moreq(y,x)
-z@[l:lessf(x,y)][k:lessf(y,z)]
-+250
-t1:=satz34a(ts(1x,2y),ts(1y,2x),ts(1y,2z),ts(1z,2y),l,k):less(ts(ts(1x,2y),ts(1y,2z)),ts(ts(1y,2x),ts(1z,2y)))
-t2:=isless12(ts(ts(1x,2y),ts(1y,2z)),ts(ts(1x,2z),ts(1y,2y)),ts(ts(1y,2x),ts(1z,2y)),ts(ts(1z,2x),ts(1y,2y)),stets(1x,2y,1y,2z),tris(nat,ts(ts(1y,2x),ts(1z,2y)),ts(ts(1y,2y),ts(1z,2x)),ts(ts(1z,2x),ts(1y,2y)),stets(1y,2x,1z,2y),comts(ts(1y,2y),ts(1z,2x))),t1):less(ts(ts(1x,2z),ts(1y,2y)),ts(ts(1z,2x),ts(1y,2y)))
--250
-satz50:=satz33c(ts(1x,2z),ts(1z,2x),ts(1y,2y),t2".250"):lessf(x,z)
-trlessf:=satz50:lessf(x,z)
-z@[m:moref(x,y)][n:moref(y,z)]
-trmoref:=satz43(z,x,satz50(z,y,x,satz42(y,z,n),satz42(x,y,m))):moref(x,z)
-z@[l:lesseq(x,y)][k:lessf(y,z)]
-satz51a:=orapp(lessf(x,y),eq(x,y),lessf(x,z),l,[t:lessf(x,y)]satz50(t,k),[t:eq(x,y)]eqlessf1(y,x,z,symeq(x,y,t),k)):lessf(x,z)
-z@[l:lessf(x,y)][k:lesseq(y,z)]
-satz51b:=orapp(lessf(y,z),eq(y,z),lessf(x,z),k,[t:lessf(y,z)]satz50(l,t),[t:eq(y,z)]eqlessf2(y,z,x,t,l)):lessf(x,z)
-z@[m:moreq(x,y)][n:moref(y,z)]
-satz51c:=satz43(z,x,satz51b(z,y,x,satz42(y,z,n),satz48(x,y,m))):moref(x,z)
-z@[m:moref(x,y)][n:moreq(y,z)]
-satz51d:=satz43(z,x,satz51a(z,y,x,satz48(y,z,n),satz42(x,y,m))):moref(x,z)
-z@[l:lesseq(x,y)][k:lesseq(y,z)]
-+252
-[e:eq(x,y)][f:eq(y,z)]
-t1:=ori2(lessf(x,z),eq(x,z),treq(x,y,z,e,f)):lesseq(x,z)
-e@[j:lessf(y,z)]
-t2:=ori1(lessf(x,z),eq(x,z),satz51a(l,j)):lesseq(x,z)
-e@t3:=orapp(lessf(y,z),eq(y,z),lesseq(x,z),k,[t:lessf(y,z)]t2(t),[t:eq(y,z)]t1(t)):lesseq(x,z)
-k@[j:lessf(x,y)]
-t4:=ori1(lessf(x,z),eq(x,z),satz51b(j,k)):lesseq(x,z)
--252
-satz52:=orapp(lessf(x,y),eq(x,y),lesseq(x,z),l,[t:lessf(x,y)]t4".252"(t),[t:eq(x,y)]t3".252"(t)):lesseq(x,z)
-trlesseq:=satz52:lesseq(x,z)
-+*252
-k@[j:lessf(x,y)]
-t5:=ori1(lessf(x,z),eq(x,z),satz51b(j,k)):lesseq(x,z)
-k@[e:eq(x,y)]
-t6:=eqlesseq1(y,x,z,symeq(x,y,e),k):lesseq(x,z)
-k@anders:=orapp(lessf(x,y),eq(x,y),lesseq(x,z),l,[t:lessf(x,y)]t5(t),[t:eq(x,y)]t6(t)):lesseq(x,z)
--252
-z@[m:moreq(x,y)][n:moreq(y,z)]
-trmoreq:=satz49(z,x,satz52(z,y,x,satz48(y,z,n),satz48(x,y,m))):moreq(x,z)
-+253
-x@t1:=ismore1(pl(ts(1x,2x),ts(1x,2x)),ts(pl(1x,1x),2x),ts(1x,2x),distpt1(1x,1x,2x),satz18(ts(1x,2x),ts(1x,2x))):more(ts(pl(1x,1x),2x),ts(1x,2x))
-t2:=morefi2(pl(1x,1x),2x,t1):moref(fr(pl(1x,1x),2x),x)
--253
-x@satz53:=somei(frac,[t:frac]moref(t,x),fr(pl(1x,1x),2x),t2".253"):some"l"(frac,[t:frac]moref(t,x))
-+254
-t1:=isless2(pl(ts(1x,2x),ts(1x,2x)),ts(1x,pl(2x,2x)),ts(1x,2x),distpt2(1x,2x,2x),satz18a(ts(1x,2x),ts(1x,2x))):less(ts(1x,2x),ts(1x,pl(2x,2x)))
-t2:=lessfi2(1x,pl(2x,2x),t1):lessf(fr(1x,pl(2x,2x)),x)
--254
-satz54:=somei(frac,[t:frac]lessf(t,x),fr(1x,pl(2x,2x)),t2".254"):some"l"(frac,[t:frac]lessf(t,x))
-y@[l:lessf(x,y)]
-+255
-t1:=satz19f(ts(1x,2y),ts(1y,2x),ts(1x,2x),l):less(pl(ts(1x,2x),ts(1x,2y)),pl(ts(1x,2x),ts(1y,2x)))
-t2:=satz19c(ts(1x,2y),ts(1y,2x),ts(1y,2y),l):less(pl(ts(1x,2y),ts(1y,2y)),pl(ts(1y,2x),ts(1y,2y)))
-t3:=isless12(pl(ts(1x,2x),ts(1x,2y)),ts(1x,pl(2x,2y)),pl(ts(1x,2x),ts(1y,2x)),ts(pl(1x,1y),2x),distpt2(1x,2x,2y),distpt1(1x,1y,2x),t1):less(ts(1x,pl(2x,2y)),ts(pl(1x,1y),2x))
-t4:=lessfi1(pl(1x,1y),pl(2x,2y),t3):lessf(x,fr(pl(1x,1y),pl(2x,2y)))
-t5:=isless12(pl(ts(1x,2y),ts(1y,2y)),ts(pl(1x,1y),2y),pl(ts(1y,2x),ts(1y,2y)),ts(1y,pl(2x,2y)),distpt1(1x,1y,2y),distpt2(1y,2x,2y),t2):less(ts(pl(1x,1y),2y),ts(1y,pl(2x,2y)))
-t6:=lessfi2(y,pl(1x,1y),pl(2x,2y),t5):lessf(fr(pl(1x,1y),pl(2x,2y)),y)
-t7:=andi(lessf(x,fr(pl(1x,1y),pl(2x,2y))),lessf(fr(pl(1x,1y),pl(2x,2y)),y),t4,t6):and(lessf(x,fr(pl(1x,1y),pl(2x,2y))),lessf(fr(pl(1x,1y),pl(2x,2y)),y))
--255
-satz55:=somei(frac,[t:frac]and(lessf(x,t),lessf(t,y)),fr(pl(1x,1y),pl(2x,2y)),t7".255"):some"l"(frac,[t:frac]and(lessf(x,t),lessf(t,y)))
-y@pf:=fr(pl(ts(1x,2y),ts(1y,2x)),ts(2x,2y)):frac
-+ii3
-y2@t1:=ispl12(ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(x1,y2),ts(num(fr(y1,y2)),den(fr(x1,x2))),ts(y1,x2),ndis12(x1,x2,y1,y2),ndis12(y1,y2,x1,x2)):is(pl(ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(num(fr(y1,y2)),den(fr(x1,x2)))),pl(ts(x1,y2),ts(y1,x2)))
-t2:=ists12(den(fr(x1,x2)),x2,den(fr(y1,y2)),y2,denis(x1,x2),denis(y1,y2)):is(ts(den(fr(x1,x2)),den(fr(y1,y2))),ts(x2,y2))
--ii3
-y2@pf12:=isnd(pl(ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(num(fr(y1,y2)),den(fr(x1,x2)))),ts(den(fr(x1,x2)),den(fr(y1,y2))),pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2),t1".ii3",t2".ii3"):is"e"(frac,pf(fr(x1,x2),fr(y1,y2)),fr(pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2)))
-+*ii3
-n2@t3:=ispl12(ts(1x,den(fr(n1,n2))),ts(1x,n2),ts(num(fr(n1,n2)),2x),ts(n1,2x),ndisn2(x,n1,n2),ndis1d(x,n1,n2)):is(pl(ts(1x,den(fr(n1,n2))),ts(num(fr(n1,n2)),2x)),pl(ts(1x,n2),ts(n1,2x)))
-t4:=ists2(den(fr(n1,n2)),n2,2x,denis(n1,n2)):is(ts(2x,den(fr(n1,n2))),ts(2x,n2))
--ii3
-n2@pf1:=isnd(pl(ts(1x,den(fr(n1,n2))),ts(num(fr(n1,n2)),2x)),ts(2x,den(fr(n1,n2))),pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2),t3".ii3",t4".ii3"):is"e"(frac,pf(x,fr(n1,n2)),fr(pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2)))
-+*ii3
-n2@t5:=ispl12(ts(num(fr(n1,n2)),2x),ts(n1,2x),ts(1x,den(fr(n1,n2))),ts(1x,n2),ndis1d(x,n1,n2),ndisn2(x,n1,n2)):is(pl(ts(num(fr(n1,n2)),2x),ts(1x,den(fr(n1,n2)))),pl(ts(n1,2x),ts(1x,n2)))
-t6:=ists1(den(fr(n1,n2)),n2,2x,denis(n1,n2)):is(ts(den(fr(n1,n2)),2x),ts(n2,2x))
--ii3
-n2@pf2:=isnd(pl(ts(num(fr(n1,n2)),2x),ts(1x,den(fr(n1,n2)))),ts(den(fr(n1,n2)),2x),pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x),t5".ii3",t6".ii3"):is"e"(frac,pf(fr(n1,n2),x),fr(pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x)))
-y2@pfeq12a:=refeq1(pf(fr(x1,x2),fr(y1,y2)),fr(pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2)),pf12):eq(pf(fr(x1,x2),fr(y1,y2)),fr(pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2)))
-pfeq12b:=refeq2(pf(fr(x1,x2),fr(y1,y2)),fr(pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2)),pf12):eq(fr(pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2)),pf(fr(x1,x2),fr(y1,y2)))
-n2@pfeq1a:=refeq1(pf(x,fr(n1,n2)),fr(pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2)),pf1):eq(pf(x,fr(n1,n2)),fr(pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2)))
-pfeq1b:=refeq2(pf(x,fr(n1,n2)),fr(pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2)),pf1):eq(fr(pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2)),pf(x,fr(n1,n2)))
-pfeq2a:=refeq1(pf(fr(n1,n2),x),fr(pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x)),pf2):eq(pf(fr(n1,n2),x),fr(pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x)))
-pfeq2b:=refeq2(pf(fr(n1,n2),x),fr(pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x)),pf2):eq(fr(pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x)),pf(fr(n1,n2),x))
-u@[e:eq(x,y)][f:eq(z,u)]
-+356
-t1:=ists1(ts(1x,2y),ts(1y,2x),ts(2z,2u),e):is(ts(ts(1x,2y),ts(2z,2u)),ts(ts(1y,2x),ts(2z,2u)))
-t2:=t1(z,u,x,y,f,e):is(ts(ts(1z,2u),ts(2x,2y)),ts(ts(1u,2z),ts(2x,2y)))
-t3:=tr3is(nat,ts(ts(1x,2z),ts(2y,2u)),ts(ts(1x,2z),ts(2u,2y)),ts(ts(1x,2y),ts(2u,2z)),ts(ts(1x,2y),ts(2z,2u)),ists2(ts(2y,2u),ts(2u,2y),ts(1x,2z),comts(2y,2u)),stets(1x,2z,2u,2y),ists2(ts(2u,2z),ts(2z,2u),ts(1x,2y),comts(2u,2z))):is(ts(ts(1x,2z),ts(2y,2u)),ts(ts(1x,2y),ts(2z,2u)))
-t4:=tr4is(nat,ts(ts(1x,2z),ts(2y,2u)),ts(ts(1x,2y),ts(2z,2u)),ts(ts(1y,2x),ts(2z,2u)),ts(ts(1y,2u),ts(2z,2x)),ts(ts(1y,2u),ts(2x,2z)),t3,t1,stets(1y,2x,2z,2u),ists2(ts(2z,2x),ts(2x,2z),ts(1y,2u),comts(2z,2x))):is(ts(ts(1x,2z),ts(2y,2u)),ts(ts(1y,2u),ts(2x,2z)))
-t5:=tr4is(nat,ts(ts(1z,2x),ts(2y,2u)),ts(ts(1z,2u),ts(2y,2x)),ts(ts(1z,2u),ts(2x,2y)),ts(ts(1u,2z),ts(2x,2y)),ts(ts(1u,2y),ts(2x,2z)),stets(1z,2x,2y,2u),ists2(ts(2y,2x),ts(2x,2y),ts(1z,2u),comts(2y,2x)),t2,stets(1u,2z,2x,2y)):is(ts(ts(1z,2x),ts(2y,2u)),ts(ts(1u,2y),ts(2x,2z)))
-t6:=ispl12(ts(ts(1x,2z),ts(2y,2u)),ts(ts(1y,2u),ts(2x,2z)),ts(ts(1z,2x),ts(2y,2u)),ts(ts(1u,2y),ts(2x,2z)),t4,t5):is(pl(ts(ts(1x,2z),ts(2y,2u)),ts(ts(1z,2x),ts(2y,2u))),pl(ts(ts(1y,2u),ts(2x,2z)),ts(ts(1u,2y),ts(2x,2z))))
-t7:=tr3is(nat,ts(pl(ts(1x,2z),ts(1z,2x)),ts(2y,2u)),pl(ts(ts(1x,2z),ts(2y,2u)),ts(ts(1z,2x),ts(2y,2u))),pl(ts(ts(1y,2u),ts(2x,2z)),ts(ts(1u,2y),ts(2x,2z))),ts(pl(ts(1y,2u),ts(1u,2y)),ts(2x,2z)),disttp1(ts(1x,2z),ts(1z,2x),ts(2y,2u)),t6,distpt1(ts(1y,2u),ts(1u,2y),ts(2x,2z))):is(ts(pl(ts(1x,2z),ts(1z,2x)),ts(2y,2u)),ts(pl(ts(1y,2u),ts(1u,2y)),ts(2x,2z)))
--356
-satz56:=eqi12(pl(ts(1x,2z),ts(1z,2x)),ts(2x,2z),pl(ts(1y,2u),ts(1u,2y)),ts(2y,2u),t7".356"):eq(pf(x,z),pf(y,u))
-eqpf12:=satz56:eq(pf(x,z),pf(y,u))
-z@[e:eq(x,y)]
-eqpf1:=eqpf12(x,y,z,z,e,refeq(z)):eq(pf(x,z),pf(y,z))
-eqpf2:=eqpf12(z,z,x,y,refeq(z),e):eq(pf(z,x),pf(z,y))
-x2@[n:nat]
-satz57:=tr3eq(pf(fr(x1,n),fr(x2,n)),fr(pl(ts(x1,n),ts(x2,n)),ts(n,n)),fr(ts(pl(x1,x2),n),ts(n,n)),fr(pl(x1,x2),n),pfeq12a(x1,n,x2,n),eqn(pl(ts(x1,n),ts(x2,n)),ts(n,n),ts(pl(x1,x2),n),distpt1(x1,x2,n)),satz40c(pl(x1,x2),n,n)):eq(pf(fr(x1,n),fr(x2,n)),fr(pl(x1,x2),n))
-satz57a:=symeq(pf(fr(x1,n),fr(x2,n)),fr(pl(x1,x2),n),satz57):eq(fr(pl(x1,x2),n),pf(fr(x1,n),fr(x2,n)))
-y@satz58:=eqnd(pl(ts(1x,2y),ts(1y,2x)),ts(2x,2y),pl(ts(1y,2x),ts(1x,2y)),ts(2y,2x),compl(ts(1x,2y),ts(1y,2x)),comts(2x,2y)):eq(pf(x,y),pf(y,x))
-compf:=satz58:eq(pf(x,y),pf(y,x))
-+359
-z@t1:=tr3is(nat,ts(ts(1y,2x),2z),ts(ts(2x,1y),2z),ts(2x,ts(1y,2z)),ts(ts(1y,2z),2x),ists1(ts(1y,2x),ts(2x,1y),2z,comts(1y,2x)),assts1(2x,1y,2z),comts(2x,ts(1y,2z))):is(ts(ts(1y,2x),2z),ts(ts(1y,2z),2x))
-t2:=ispl12(ts(ts(1x,2y),2z),ts(1x,ts(2y,2z)),ts(ts(1y,2x),2z),ts(ts(1y,2z),2x),assts1(1x,2y,2z),t1):is(pl(ts(ts(1x,2y),2z),ts(ts(1y,2x),2z)),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)))
-t3:=tris(nat,ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(ts(1x,2y),2z),ts(ts(1y,2x),2z)),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),disttp1(ts(1x,2y),ts(1y,2x),2z),t2):is(ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)))
-t4:=tris(nat,ts(1z,ts(2x,2y)),ts(1z,ts(2y,2x)),ts(ts(1z,2y),2x),ists2(ts(2x,2y),ts(2y,2x),1z,comts(2x,2y)),assts2(1z,2y,2x)):is(ts(1z,ts(2x,2y)),ts(ts(1z,2y),2x))
-t5:=ispl12(ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),ts(1z,ts(2x,2y)),ts(ts(1z,2y),2x),t3,t4):is(pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),pl(pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),ts(ts(1z,2y),2x)))
-t6:=ispl2(pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)),ts(pl(ts(1y,2z),ts(1z,2y)),2x),ts(1x,ts(2y,2z)),distpt1(ts(1y,2z),ts(1z,2y),2x)):is(pl(ts(1x,ts(2y,2z)),pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x))),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)))
-t7:=tr3is(nat,pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),pl(pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),ts(ts(1z,2y),2x)),pl(ts(1x,ts(2y,2z)),pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x))),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)),t5,asspl1(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)),t6):is(pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)))
--359
-z@satz59:=tr3eq(pf(pf(x,y),z),fr(pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),ts(ts(2x,2y),2z)),fr(pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)),ts(2x,ts(2y,2z))),pf(x,pf(y,z)),pfeq2a(z,pl(ts(1x,2y),ts(1y,2x)),ts(2x,2y)),eqnd(pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),ts(ts(2x,2y),2z),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)),ts(2x,ts(2y,2z)),t7".359",assts1(2x,2y,2z)),pfeq1b(x,pl(ts(1y,2z),ts(1z,2y)),ts(2y,2z))):eq(pf(pf(x,y),z),pf(x,pf(y,z)))
-asspf1:=satz59:eq(pf(pf(x,y),z),pf(x,pf(y,z)))
-asspf2:=symeq(pf(pf(x,y),z),pf(x,pf(y,z)),asspf1):eq(pf(x,pf(y,z)),pf(pf(x,y),z))
-c@stets1:=tr3is(nat,ts(ts(a,b),c),ts(a,ts(b,c)),ts(a,ts(c,b)),ts(ts(a,c),b),assts1(a,b,c),ists2(ts(b,c),ts(c,b),a,comts(b,c)),assts2(a,c,b)):is(ts(ts(a,b),c),ts(ts(a,c),b))
-+*359
-z@t8:=tris(nat,ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(ts(1x,2y),2z),ts(ts(1y,2x),2z)),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),disttp1(ts(1x,2y),ts(1y,2x),2z),ispl12(ts(ts(1x,2y),2z),ts(1x,ts(2y,2z)),ts(ts(1y,2x),2z),ts(ts(1y,2z),2x),assts1(1x,2y,2z),stets1(1y,2x,2z))):is(ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)))
-t9:=tris(nat,ts(1z,ts(2x,2y)),ts(ts(1z,2x),2y),ts(ts(1z,2y),2x),assts2(1z,2x,2y),stets1(1z,2x,2y)):is(ts(1z,ts(2x,2y)),ts(ts(1z,2y),2x))
-anderst7:=tr3is(nat,pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),pl(pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),ts(ts(1z,2y),2x)),pl(ts(1x,ts(2y,2z)),pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x))),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)),ispl12(ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),ts(1z,ts(2x,2y)),ts(ts(1z,2y),2x),t8,t9),asspl1(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)),ispl2(pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)),ts(pl(ts(1y,2z),ts(1z,2y)),2x),ts(1x,ts(2y,2z)),distpt1(ts(1y,2z),ts(1z,2y),2x))):is(pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)))
--359
-+360
-y@t1:=satz18(ts(1x,2y),ts(1y,2x)):more(pl(ts(1x,2y),ts(1y,2x)),ts(1x,2y))
-t2:=satz32a(pl(ts(1x,2y),ts(1y,2x)),ts(1x,2y),2x,t1):more(ts(pl(ts(1x,2y),ts(1y,2x)),2x),ts(ts(1x,2y),2x))
-t3:=tris(nat,ts(ts(1x,2y),2x),ts(1x,ts(2y,2x)),ts(1x,ts(2x,2y)),assts1(1x,2y,2x),ists2(ts(2y,2x),ts(2x,2y),1x,comts(2y,2x))):is(ts(ts(1x,2y),2x),ts(1x,ts(2x,2y)))
-t4:=ismore2(ts(ts(1x,2y),2x),ts(1x,ts(2x,2y)),ts(pl(ts(1x,2y),ts(1y,2x)),2x),t3,t2):more(ts(pl(ts(1x,2y),ts(1y,2x)),2x),ts(1x,ts(2x,2y)))
--360
-y@satz60:=morefi2(pl(ts(1x,2y),ts(1y,2x)),ts(2x,2y),t4".360"):moref(pf(x,y),x)
-satz60a:=satz42(pf(x,y),x,satz60):lessf(x,pf(x,y))
-z@[m:moref(x,y)]
-+361
-t1:=satz32a(ts(1x,2y),ts(1y,2x),2z,m):more(ts(ts(1x,2y),2z),ts(ts(1y,2x),2z))
-t2:=ismore12(ts(ts(1x,2y),2z),ts(ts(1x,2z),2y),ts(ts(1y,2x),2z),ts(ts(1y,2z),2x),stets1(1x,2y,2z),stets1(1y,2x,2z),t1):more(ts(ts(1x,2z),2y),ts(ts(1y,2z),2x))
-t3:=stets1(1z,2x,2y):is(ts(ts(1z,2x),2y),ts(ts(1z,2y),2x))
-t4:=satz19h(ts(ts(1z,2x),2y),ts(ts(1z,2y),2x),ts(ts(1x,2z),2y),ts(ts(1y,2z),2x),t3,t2):more(pl(ts(ts(1x,2z),2y),ts(ts(1z,2x),2y)),pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)))
-t5:=ismore12(pl(ts(ts(1x,2z),2y),ts(ts(1z,2x),2y)),ts(pl(ts(1x,2z),ts(1z,2x)),2y),pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)),ts(pl(ts(1y,2z),ts(1z,2y)),2x),distpt1(ts(1x,2z),ts(1z,2x),2y),distpt1(ts(1y,2z),ts(1z,2y),2x),t4):more(ts(pl(ts(1x,2z),ts(1z,2x)),2y),ts(pl(ts(1y,2z),ts(1z,2y)),2x))
-t6:=satz32a(ts(pl(ts(1x,2z),ts(1z,2x)),2y),ts(pl(ts(1y,2z),ts(1z,2y)),2x),2z,t5):more(ts(ts(pl(ts(1x,2z),ts(1z,2x)),2y),2z),ts(ts(pl(ts(1y,2z),ts(1z,2y)),2x),2z))
-t7:=ismore12(ts(ts(pl(ts(1x,2z),ts(1z,2x)),2y),2z),ts(pl(ts(1x,2z),ts(1z,2x)),ts(2y,2z)),ts(ts(pl(ts(1y,2z),ts(1z,2y)),2x),2z),ts(pl(ts(1y,2z),ts(1z,2y)),ts(2x,2z)),assts1(pl(ts(1x,2z),ts(1z,2x)),2y,2z),assts1(pl(ts(1y,2z),ts(1z,2y)),2x,2z),t6):more(ts(pl(ts(1x,2z),ts(1z,2x)),ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),ts(2x,2z)))
--361
-satz61:=morefi12(pl(ts(1x,2z),ts(1z,2x)),ts(2x,2z),pl(ts(1y,2z),ts(1z,2y)),ts(2y,2z),t7".361"):moref(pf(x,z),pf(y,z))
-z@[m:moref(x,y)]
-satz62a:=satz61(m):moref(pf(x,z),pf(y,z))
-z@[e:eq(x,y)]
-satz62b:=eqpf1(x,y,z,e):eq(pf(x,z),pf(y,z))
-z@[l:lessf(x,y)]
-satz62c:=satz42(pf(y,z),pf(x,z),satz61(y,x,z,satz43(l))):lessf(pf(x,z),pf(y,z))
-m@satz62d:=eqmoref12(pf(x,z),pf(z,x),pf(y,z),pf(z,y),compf(x,z),compf(y,z),satz62a):moref(pf(z,x),pf(z,y))
-e@satz62e:=eqpf2(x,y,z,e):eq(pf(z,x),pf(z,y))
-l@satz62f:=eqlessf12(pf(x,z),pf(z,x),pf(y,z),pf(z,y),compf(x,z),compf(y,z),satz62c):lessf(pf(z,x),pf(z,y))
-u@[e:eq(x,y)][m:moref(z,u)]
-satz62g:=eqmoref2(pf(x,u),pf(y,u),pf(x,z),eqpf1(x,y,u,e),satz62d(z,u,x,m)):moref(pf(x,z),pf(y,u))
-satz62h:=eqmoref12(pf(x,z),pf(z,x),pf(y,u),pf(u,y),compf(x,z),compf(y,u),satz62g):moref(pf(z,x),pf(u,y))
-e@[l:lessf(z,u)]
-satz62j:=eqlessf2(pf(x,u),pf(y,u),pf(x,z),eqpf1(x,y,u,e),satz62f(z,u,x,l)):lessf(pf(x,z),pf(y,u))
-satz62k:=eqlessf12(pf(x,z),pf(z,x),pf(y,u),pf(u,y),compf(x,z),compf(y,u),satz62j):lessf(pf(z,x),pf(u,y))
-+363
-z@t1:=satz41a(x,y):or3(eq(x,y),moref(x,y),lessf(x,y))
-t2:=satz41b(pf(x,z),pf(y,z)):ec3(eq(pf(x,z),pf(y,z)),moref(pf(x,z),pf(y,z)),lessf(pf(x,z),pf(y,z)))
--363
-z@[m:moref(pf(x,z),pf(y,z))]
-satz63a:=th11"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(pf(x,z),pf(y,z)),moref(pf(x,z),pf(y,z)),lessf(pf(x,z),pf(y,z)),t1".363",t2".363",[u:eq(x,y)]satz62b(x,y,z,u),[u:moref(x,y)]satz62a(x,y,z,u),[u:lessf(x,y)]satz62c(x,y,z,u),m):moref(x,y)
-z@[e:eq(pf(x,z),pf(y,z))]
-satz63b:=th10"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(pf(x,z),pf(y,z)),moref(pf(x,z),pf(y,z)),lessf(pf(x,z),pf(y,z)),t1".363",t2".363",[u:eq(x,y)]satz62b(x,y,z,u),[u:moref(x,y)]satz62a(x,y,z,u),[u:lessf(x,y)]satz62c(x,y,z,u),e):eq(x,y)
-z@[l:lessf(pf(x,z),pf(y,z))]
-satz63c:=th12"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(pf(x,z),pf(y,z)),moref(pf(x,z),pf(y,z)),lessf(pf(x,z),pf(y,z)),t1".363",t2".363",[u:eq(x,y)]satz62b(x,y,z,u),[u:moref(x,y)]satz62a(x,y,z,u),[u:lessf(x,y)]satz62c(x,y,z,u),l):lessf(x,y)
-z@[m:moref(pf(z,x),pf(z,y))]
-satz63d:=satz63a(eqmoref12(pf(z,x),pf(x,z),pf(z,y),pf(y,z),compf(z,x),compf(z,y),m)):moref(x,y)
-z@[e:eq(pf(z,x),pf(z,y))]
-satz63e:=satz63b(tr3eq(pf(x,z),pf(z,x),pf(z,y),pf(y,z),compf(x,z),e,compf(z,y))):eq(x,y)
-z@[f:lessf(pf(z,x),pf(z,y))]
-satz63f:=satz63c(eqlessf12(pf(z,x),pf(x,z),pf(z,y),pf(y,z),compf(z,x),compf(z,y),f)):lessf(x,y)
-u@[m:moref(x,y)][n:moref(z,u)]
-+364
-t1:=satz61(x,y,z,m):moref(pf(x,z),pf(y,z))
-t2:=eqmoref12(pf(z,y),pf(y,z),pf(u,y),pf(y,u),compf(z,y),compf(u,y),satz61(z,u,y,n)):moref(pf(y,z),pf(y,u))
--364
-satz64:=trmoref(pf(x,z),pf(y,z),pf(y,u),t1".364",t2".364"):moref(pf(x,z),pf(y,u))
-u@[l:lessf(x,y)][k:lessf(z,u)]
-satz64a:=satz42(pf(y,u),pf(x,z),satz64(y,x,u,z,satz43(x,y,l),satz43(z,u,k))):lessf(pf(x,z),pf(y,u))
-u@[m:moreq(x,y)][n:moref(z,u)]
-satz65a:=orapp(moref(x,y),eq(x,y),moref(pf(x,z),pf(y,u)),m,[v:moref(x,y)]satz64(v,n),[v:eq(x,y)]satz62g(v,n)):moref(pf(x,z),pf(y,u))
-u@[m:moref(x,y)][n:moreq(z,u)]
-satz65b:=orapp(moref(z,u),eq(z,u),moref(pf(x,z),pf(y,u)),n,[v:moref(z,u)]satz64(m,v),[v:eq(z,u)]eqmoref2(pf(y,z),pf(y,u),pf(x,z),eqpf2(z,u,y,v),satz61(x,y,z,m))):moref(pf(x,z),pf(y,u))
-u@[l:lesseq(x,y)][k:lessf(z,u)]
-satz65c:=satz42(pf(y,u),pf(x,z),satz65a(y,x,u,z,satz49(x,y,l),satz43(z,u,k))):lessf(pf(x,z),pf(y,u))
-u@[l:lessf(x,y)][k:lesseq(z,u)]
-satz65d:=satz42(pf(y,u),pf(x,z),satz65b(y,x,u,z,satz43(x,y,l),satz49(z,u,k))):lessf(pf(x,z),pf(y,u))
-u@[m:moreq(x,y)][n:moreq(z,u)]
-+366
-[e:eq(x,y)][f:eq(z,u)]
-t1:=moreqi2(pf(x,z),pf(y,u),satz56(e,f)):moreq(pf(x,z),pf(y,u))
-e@[o:moref(z,u)]
-t2:=moreqi1(pf(x,z),pf(y,u),satz65a(m,o)):moreq(pf(x,z),pf(y,u))
-e@t3:=orapp(moref(z,u),eq(z,u),moreq(pf(x,z),pf(y,u)),n,[v:moref(z,u)]t2(v),[v:eq(z,u)]t1(v)):moreq(pf(x,z),pf(y,u))
-n@[o:moref(x,y)]
-t4:=moreqi1(pf(x,z),pf(y,u),satz65b(o,n)):moreq(pf(x,z),pf(y,u))
--366
-satz66:=orapp(moref(x,y),eq(x,y),moreq(pf(x,z),pf(y,u)),m,[v:moref(x,y)]t4".366"(v),[v:eq(x,y)]t3".366"(v)):moreq(pf(x,z),pf(y,u))
-u@[l:lesseq(x,y)][k:lesseq(z,u)]
-satz66a:=satz48(pf(y,u),pf(x,z),satz66(y,x,u,z,satz49(x,y,l),satz49(z,u,k))):lesseq(pf(x,z),pf(y,u))
-y@[l:lesseq(x,y)]
-+367
-[v:frac][e:eq(pf(y,v),x)]
-t1:=eqmoref1(pf(y,v),x,y,e,satz60(y,v)):moref(x,y)
-v@t2:=th3"l.imp"(eq(pf(y,v),x),moref(x,y),satz41d(x,y,l),[t:eq(pf(y,v),x)]t1(t)):not(eq(pf(y,v),x))
--367
-vorbemerkung67:=th5"l.some"(frac,[v:frac]eq(pf(y,v),x),[v:frac]t2".367"(v)):not(some"l"(frac,[t:frac]eq(pf(y,t),x)))
-y@[v:frac][w:frac][e:eq(pf(y,v),x)][f:eq(pf(y,w),x)]
-satz67b:=satz63e(v,w,y,treq2(pf(y,v),pf(y,w),x,e,f)):eq(v,w)
-y@[m:moref(x,y)]
-+*367
-m@t3:=onei(nat,[t:nat]diffprop(ts(1x,2y),ts(1y,2x),t),satz8b(ts(1x,2y),ts(1y,2x)),m):one([t:nat]diffprop(ts(1x,2y),ts(1y,2x),t))
-vo:=ind(nat,[t:nat]diffprop(ts(1x,2y),ts(1y,2x),t),t3):nat
-t4:=oneax(nat,[t:nat]diffprop(ts(1x,2y),ts(1y,2x),t),t3):is(ts(1x,2y),pl(ts(1y,2x),vo))
-w:=fr(vo,ts(2x,2y)):frac
-t5:=treq(y,fr(ts(1y,2x),ts(2y,2x)),fr(ts(1y,2x),ts(2x,2y)),satz40(y,2x),eqd(ts(1y,2x),ts(2y,2x),ts(2x,2y),comts(2y,2x))):eq(y,fr(ts(1y,2x),ts(2x,2y)))
-t6:=tr4eq(pf(y,w),pf(fr(ts(1y,2x),ts(2x,2y)),fr(vo,ts(2x,2y))),fr(pl(ts(1y,2x),vo),ts(2x,2y)),fr(ts(1x,2y),ts(2x,2y)),x,eqpf1(y,fr(ts(1y,2x),ts(2x,2y)),w,t5),satz57(ts(1y,2x),vo,ts(2x,2y)),eqn(pl(ts(1y,2x),vo),ts(2x,2y),ts(1x,2y),symis(nat,ts(1x,2y),pl(ts(1y,2x),vo),t4)),satz40a(x,2y)):eq(pf(y,w),x)
--367
-m@satz67a:=somei(frac,[t:frac]eq(pf(y,t),x),w".367",t6".367"):some"l"(frac,[t:frac]eq(pf(y,t),x))
-mf:=w".367":frac
-satz67c:=t6".367":eq(pf(y,mf(x,y,m)),x)
-satz67d:=symeq(pf(y,mf(x,y,m)),x,satz67c):eq(x,pf(y,mf(x,y,m)))
-y@[v:frac][m:moref(x,y)][e:eq(pf(y,v),x)]
-satz67e:=satz67b(v,mf(x,y,m),e,satz67c(m)):eq(v,mf(x,y,m))
-y@tf:=fr(ts(1x,1y),ts(2x,2y)):frac
-+ii4
-y2@t1:=ists12(num(fr(x1,x2)),x1,num(fr(y1,y2)),y1,numis(x1,x2),numis(y1,y2)):is(ts(num(fr(x1,x2)),num(fr(y1,y2))),ts(x1,y1))
-t2:=ists12(den(fr(x1,x2)),x2,den(fr(y1,y2)),y2,denis(x1,x2),denis(y1,y2)):is(ts(den(fr(x1,x2)),den(fr(y1,y2))),ts(x2,y2))
--ii4
-y2@tf12:=isnd(ts(num(fr(x1,x2)),num(fr(y1,y2))),ts(den(fr(x1,x2)),den(fr(y1,y2))),ts(x1,y1),ts(x2,y2),t1".ii4",t2".ii4"):is"e"(frac,tf(fr(x1,x2),fr(y1,y2)),fr(ts(x1,y1),ts(x2,y2)))
-+*ii4
-n2@t3:=ists2(num(fr(n1,n2)),n1,1x,numis(n1,n2)):is(ts(1x,num(fr(n1,n2))),ts(1x,n1))
-t4:=ists2(den(fr(n1,n2)),n2,2x,denis(n1,n2)):is(ts(2x,den(fr(n1,n2))),ts(2x,n2))
--ii4
-n2@tf1:=isnd(ts(1x,num(fr(n1,n2))),ts(2x,den(fr(n1,n2))),ts(1x,n1),ts(2x,n2),t3".ii4",t4".ii4"):is"e"(frac,tf(x,fr(n1,n2)),fr(ts(1x,n1),ts(2x,n2)))
-+*ii4
-n2@t5:=ists1(num(fr(n1,n2)),n1,1x,numis(n1,n2)):is(ts(num(fr(n1,n2)),1x),ts(n1,1x))
-t6:=ists1(den(fr(n1,n2)),n2,2x,denis(n1,n2)):is(ts(den(fr(n1,n2)),2x),ts(n2,2x))
--ii4
-n2@tf2:=isnd(ts(num(fr(n1,n2)),1x),ts(den(fr(n1,n2)),2x),ts(n1,1x),ts(n2,2x),t5".ii4",t6".ii4"):is"e"(frac,tf(fr(n1,n2),x),fr(ts(n1,1x),ts(n2,2x)))
-y2@tfeq12a:=refeq1(tf(fr(x1,x2),fr(y1,y2)),fr(ts(x1,y1),ts(x2,y2)),tf12):eq(tf(fr(x1,x2),fr(y1,y2)),fr(ts(x1,y1),ts(x2,y2)))
-tfeq12b:=refeq2(tf(fr(x1,x2),fr(y1,y2)),fr(ts(x1,y1),ts(x2,y2)),tf12):eq(fr(ts(x1,y1),ts(x2,y2)),tf(fr(x1,x2),fr(y1,y2)))
-n2@tfeq1a:=refeq1(tf(x,fr(n1,n2)),fr(ts(1x,n1),ts(2x,n2)),tf1):eq(tf(x,fr(n1,n2)),fr(ts(1x,n1),ts(2x,n2)))
-tfeq1b:=refeq2(tf(x,fr(n1,n2)),fr(ts(1x,n1),ts(2x,n2)),tf1):eq(fr(ts(1x,n1),ts(2x,n2)),tf(x,fr(n1,n2)))
-tfeq2a:=refeq1(tf(fr(n1,n2),x),fr(ts(n1,1x),ts(n2,2x)),tf2):eq(tf(fr(n1,n2),x),fr(ts(n1,1x),ts(n2,2x)))
-tfeq2b:=refeq2(tf(fr(n1,n2),x),fr(ts(n1,1x),ts(n2,2x)),tf2):eq(fr(ts(n1,1x),ts(n2,2x)),tf(fr(n1,n2),x))
-u@[e:eq(x,y)][f:eq(z,u)]
-+468
-t1:=ists12(ts(1x,2y),ts(1y,2x),ts(1z,2u),ts(1u,2z),e,f):is(ts(ts(1x,2y),ts(1z,2u)),ts(ts(1y,2x),ts(1u,2z)))
--468
-d@stets2:=tr3is(nat,ts(ts(a,b),ts(c,d)),ts(ts(a,b),ts(d,c)),ts(ts(a,c),ts(d,b)),ts(ts(a,c),ts(b,d)),ists2(ts(c,d),ts(d,c),ts(a,b),comts(c,d)),stets(a,b,d,c),ists2(ts(d,b),ts(b,d),ts(a,c),comts(d,b))):is(ts(ts(a,b),ts(c,d)),ts(ts(a,c),ts(b,d)))
-+*468
-f@t2:=tr3is(nat,ts(ts(1x,1z),ts(2y,2u)),ts(ts(1x,2y),ts(1z,2u)),ts(ts(1y,2x),ts(1u,2z)),ts(ts(1y,1u),ts(2x,2z)),stets2(1x,1z,2y,2u),t1,stets2(1y,2x,1u,2z)):is(ts(ts(1x,1z),ts(2y,2u)),ts(ts(1y,1u),ts(2x,2z)))
--468
-f@satz68:=eqi12(ts(1x,1z),ts(2x,2z),ts(1y,1u),ts(2y,2u),t2".468"):eq(tf(x,z),tf(y,u))
-eqtf12:=satz68:eq(tf(x,z),tf(y,u))
-z@[e:eq(x,y)]
-eqtf1:=eqtf12(x,y,z,z,e,refeq(z)):eq(tf(x,z),tf(y,z))
-eqtf2:=eqtf12(z,z,x,y,refeq(z),e):eq(tf(z,x),tf(z,y))
-y@satz69:=eqnd(ts(1x,1y),ts(2x,2y),ts(1y,1x),ts(2y,2x),comts(1x,1y),comts(2x,2y)):eq(tf(x,y),tf(y,x))
-comtf:=satz69:eq(tf(x,y),tf(y,x))
-z@satz70:=tr3eq(tf(tf(x,y),z),fr(ts(ts(1x,1y),1z),ts(ts(2x,2y),2z)),fr(ts(1x,ts(1y,1z)),ts(2x,ts(2y,2z))),tf(x,tf(y,z)),tfeq2a(z,ts(1x,1y),ts(2x,2y)),eqnd(ts(ts(1x,1y),1z),ts(ts(2x,2y),2z),ts(1x,ts(1y,1z)),ts(2x,ts(2y,2z)),assts1(1x,1y,1z),assts1(2x,2y,2z)),tfeq1b(x,ts(1y,1z),ts(2y,2z))):eq(tf(tf(x,y),z),tf(x,tf(y,z)))
-asstf1:=satz70:eq(tf(tf(x,y),z),tf(x,tf(y,z)))
-asstf2:=symeq(tf(tf(x,y),z),tf(x,tf(y,z)),asstf1):eq(tf(x,tf(y,z)),tf(tf(x,y),z))
-+471
-t1:=tr3eq(tf(x,pf(y,z)),fr(ts(1x,pl(ts(1y,2z),ts(1z,2y))),ts(2x,ts(2y,2z))),fr(pl(ts(1x,ts(1y,2z)),ts(1x,ts(1z,2y))),ts(2x,ts(2y,2z))),pf(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z)))),tfeq1a(x,pl(ts(1y,2z),ts(1z,2y)),ts(2y,2z)),eqn(ts(1x,pl(ts(1y,2z),ts(1z,2y))),ts(2x,ts(2y,2z)),pl(ts(1x,ts(1y,2z)),ts(1x,ts(1z,2y))),disttp2(1x,ts(1y,2z),ts(1z,2y))),satz57a(ts(1x,ts(1y,2z)),ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z)))):eq(tf(x,pf(y,z)),pf(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z)))))
-t2:=treq(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),fr(ts(ts(1x,1y),2z),ts(ts(2x,2y),2z)),tf(x,y),eqnd(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z)),ts(ts(1x,1y),2z),ts(ts(2x,2y),2z),assts2(1x,1y,2z),assts2(2x,2y,2z)),satz40c(ts(1x,1y),ts(2x,2y),2z)):eq(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),tf(x,y))
-t3:=treq(fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z))),fr(ts(1x,ts(1z,2y)),ts(2x,ts(2z,2y))),tf(x,z),eqd(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z)),ts(2x,ts(2z,2y)),ists2(ts(2y,2z),ts(2z,2y),2x,comts(2y,2z))),t2(x,z,y)):eq(fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z))),tf(x,z))
--471
-satz71:=treq(tf(x,pf(y,z)),pf(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z)))),pf(tf(x,y),tf(x,z)),t1".471",eqpf12(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),tf(x,y),fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z))),tf(x,z),t2".471",t3".471")):eq(tf(x,pf(y,z)),pf(tf(x,y),tf(x,z)))
-disttpf1:=tr3eq(tf(pf(x,y),z),tf(z,pf(x,y)),pf(tf(z,x),tf(z,y)),pf(tf(x,z),tf(y,z)),comtf(pf(x,y),z),satz71(z,x,y),eqpf12(tf(z,x),tf(x,z),tf(z,y),tf(y,z),comtf(z,x),comtf(z,y))):eq(tf(pf(x,y),z),pf(tf(x,z),tf(y,z)))
-disttpf2:=satz71:eq(tf(x,pf(y,z)),pf(tf(x,y),tf(x,z)))
-distptf1:=symeq(tf(pf(x,y),z),pf(tf(x,z),tf(y,z)),disttpf1):eq(pf(tf(x,z),tf(y,z)),tf(pf(x,y),z))
-distptf2:=symeq(tf(x,pf(y,z)),pf(tf(x,y),tf(x,z)),disttpf2):eq(pf(tf(x,y),tf(x,z)),tf(x,pf(y,z)))
-[m:moref(x,y)]
-+472
-t1:=satz32a(ts(1x,2y),ts(1y,2x),ts(1z,2z),m):more(ts(ts(1x,2y),ts(1z,2z)),ts(ts(1y,2x),ts(1z,2z)))
-t2:=ismore12(ts(ts(1x,2y),ts(1z,2z)),ts(ts(1x,1z),ts(2y,2z)),ts(ts(1y,2x),ts(1z,2z)),ts(ts(1y,1z),ts(2x,2z)),stets2(1x,2y,1z,2z),stets2(1y,2x,1z,2z),t1):more(ts(ts(1x,1z),ts(2y,2z)),ts(ts(1y,1z),ts(2x,2z)))
--472
-satz72a:=morefi12(ts(1x,1z),ts(2x,2z),ts(1y,1z),ts(2y,2z),t2".472"):moref(tf(x,z),tf(y,z))
-z@[e:eq(x,y)]
-satz72b:=satz68(x,y,z,z,e,refeq(z)):eq(tf(x,z),tf(y,z))
-z@[l:lessf(x,y)]
-satz72c:=satz42(tf(y,z),tf(x,z),satz72a(y,x,z,satz43(x,y,l))):lessf(tf(x,z),tf(y,z))
-m@satz72d:=eqmoref12(tf(x,z),tf(z,x),tf(y,z),tf(z,y),comtf(x,z),comtf(y,z),satz72a):moref(tf(z,x),tf(z,y))
-e@satz72e:=eqtf2(x,y,z,e):eq(tf(z,x),tf(z,y))
-l@satz72f:=eqlessf12(tf(x,z),tf(z,x),tf(y,z),tf(z,y),comtf(x,z),comtf(y,z),satz72c):lessf(tf(z,x),tf(z,y))
-u@[e:eq(x,y)][m:moref(z,u)]
-satz72g:=eqmoref2(tf(x,u),tf(y,u),tf(x,z),eqtf1(x,y,u,e),satz72d(z,u,x,m)):moref(tf(x,z),tf(y,u))
-satz72h:=eqmoref12(tf(x,z),tf(z,x),tf(y,u),tf(u,y),comtf(x,z),comtf(y,u),satz72g):moref(tf(z,x),tf(u,y))
-e@[l:lessf(z,u)]
-satz72j:=eqlessf2(tf(x,u),tf(y,u),tf(x,z),eqtf1(x,y,u,e),satz72f(z,u,x,l)):lessf(tf(x,z),tf(y,u))
-satz72k:=eqlessf12(tf(x,z),tf(z,x),tf(y,u),tf(u,y),comtf(x,z),comtf(y,u),satz72j):lessf(tf(z,x),tf(u,y))
-+473
-z@t1:=satz41a(x,y):or3(eq(x,y),moref(x,y),lessf(x,y))
-t2:=satz41b(tf(x,z),tf(y,z)):ec3(eq(tf(x,z),tf(y,z)),moref(tf(x,z),tf(y,z)),lessf(tf(x,z),tf(y,z)))
--473
-z@[m:moref(tf(x,z),tf(y,z))]
-satz73a:=th11"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(tf(x,z),tf(y,z)),moref(tf(x,z),tf(y,z)),lessf(tf(x,z),tf(y,z)),t1".473",t2".473",[u:eq(x,y)]satz72b(x,y,z,u),[u:moref(x,y)]satz72a(x,y,z,u),[u:lessf(x,y)]satz72c(x,y,z,u),m):moref(x,y)
-z@[e:eq(tf(x,z),tf(y,z))]
-satz73b:=th10"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(tf(x,z),tf(y,z)),moref(tf(x,z),tf(y,z)),lessf(tf(x,z),tf(y,z)),t1".473",t2".473",[u:eq(x,y)]satz72b(x,y,z,u),[u:moref(x,y)]satz72a(x,y,z,u),[u:lessf(x,y)]satz72c(x,y,z,u),e):eq(x,y)
-z@[l:lessf(tf(x,z),tf(y,z))]
-satz73c:=th12"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(tf(x,z),tf(y,z)),moref(tf(x,z),tf(y,z)),lessf(tf(x,z),tf(y,z)),t1".473",t2".473",[u:eq(x,y)]satz72b(x,y,z,u),[u:moref(x,y)]satz72a(x,y,z,u),[u:lessf(x,y)]satz72c(x,y,z,u),l):lessf(x,y)
-z@[m:moref(tf(z,x),tf(z,y))]
-satz73d:=satz73a(eqmoref12(tf(z,x),tf(x,z),tf(z,y),tf(y,z),comtf(z,x),comtf(z,y),m)):moref(x,y)
-z@[e:eq(tf(z,x),tf(z,y))]
-satz73e:=satz73b(tr3eq(tf(x,z),tf(z,x),tf(z,y),tf(y,z),comtf(x,z),e,comtf(z,y))):eq(x,y)
-z@[l:lessf(tf(z,x),tf(z,y))]
-satz73f:=satz73c(eqlessf12(tf(z,x),tf(x,z),tf(z,y),tf(y,z),comtf(z,x),comtf(z,y),l)):lessf(x,y)
-u@[m:moref(x,y)][n:moref(z,u)]
-+474
-t1:=satz72a(x,y,z,m):moref(tf(x,z),tf(y,z))
-t2:=eqmoref12(tf(z,y),tf(y,z),tf(u,y),tf(y,u),comtf(z,y),comtf(u,y),satz72a(z,u,y,n)):moref(tf(y,z),tf(y,u))
--474
-satz74:=trmoref(tf(x,z),tf(y,z),tf(y,u),t1".474",t2".474"):moref(tf(x,z),tf(y,u))
-u@[l:lessf(x,y)][k:lessf(z,u)]
-satz74a:=satz42(tf(y,u),tf(x,z),satz74(y,x,u,z,satz43(x,y,l),satz43(z,u,k))):lessf(tf(x,z),tf(y,u))
-u@[m:moreq(x,y)][n:moref(z,u)]
-satz75a:=orapp(moref(x,y),eq(x,y),moref(tf(x,z),tf(y,u)),m,[v:moref(x,y)]satz74(v,n),[v:eq(x,y)]satz72g(v,n)):moref(tf(x,z),tf(y,u))
-u@[m:moref(x,y)][n:moreq(z,u)]
-satz75b:=orapp(moref(z,u),eq(z,u),moref(tf(x,z),tf(y,u)),n,[v:moref(z,u)]satz74(m,v),[v:eq(z,u)]eqmoref2(tf(y,z),tf(y,u),tf(x,z),eqtf2(z,u,y,v),satz72a(m))):moref(tf(x,z),tf(y,u))
-u@[l:lesseq(x,y)][k:lessf(z,u)]
-satz75c:=satz42(tf(y,u),tf(x,z),satz75a(y,x,u,z,satz49(x,y,l),satz43(z,u,k))):lessf(tf(x,z),tf(y,u))
-u@[l:lessf(x,y)][k:lesseq(z,u)]
-satz75d:=satz42(tf(y,u),tf(x,z),satz75b(y,x,u,z,satz43(x,y,l),satz49(z,u,k))):lessf(tf(x,z),tf(y,u))
-u@[m:moreq(x,y)][n:moreq(z,u)]
-+476
-[e:eq(x,y)][f:eq(z,u)]
-t1:=moreqi2(tf(x,z),tf(y,u),satz68(e,f)):moreq(tf(x,z),tf(y,u))
-e@[o:moref(z,u)]
-t2:=moreqi1(tf(x,z),tf(y,u),satz75a(m,o)):moreq(tf(x,z),tf(y,u))
-e@t3:=orapp(moref(z,u),eq(z,u),moreq(tf(x,z),tf(y,u)),n,[v:moref(z,u)]t2(v),[v:eq(z,u)]t1(v)):moreq(tf(x,z),tf(y,u))
-n@[o:moref(x,y)]
-t4:=moreqi1(tf(x,z),tf(y,u),satz75b(o,n)):moreq(tf(x,z),tf(y,u))
--476
-satz76:=orapp(moref(x,y),eq(x,y),moreq(tf(x,z),tf(y,u)),m,[v:moref(x,y)]t4".476"(v),[v:eq(x,y)]t3".476"(v)):moreq(tf(x,z),tf(y,u))
-u@[l:lesseq(x,y)][k:lesseq(z,u)]
-satz76a:=satz48(tf(y,u),tf(x,z),satz76(y,x,u,z,satz49(x,y,l),satz49(z,u,k))):lesseq(tf(x,z),tf(y,u))
-y@[v:frac][w:frac][e:eq(tf(y,v),x)][f:eq(tf(y,w),x)]
-satz77b:=satz73e(v,w,y,treq2(tf(y,v),tf(y,w),x,e,f)):eq(v,w)
-+477
-y@v:=fr(ts(1x,2y),ts(2x,1y)):frac
-t1:=tr4eq(tf(y,v),tf(v,y),fr(ts(ts(1x,2y),1y),ts(ts(2x,1y),2y)),fr(ts(1x,ts(1y,2y)),ts(2x,ts(1y,2y))),x,comtf(y,v),tfeq2a(y,ts(1x,2y),ts(2x,1y)),eqnd(ts(ts(1x,2y),1y),ts(ts(2x,1y),2y),ts(1x,ts(1y,2y)),ts(2x,ts(1y,2y)),tris(nat,ts(ts(1x,2y),1y),ts(1x,ts(2y,1y)),ts(1x,ts(1y,2y)),assts1(1x,2y,1y),ists2(ts(2y,1y),ts(1y,2y),1x,comts(2y,1y))),assts1(2x,1y,2y)),satz40a(x,ts(1y,2y))):eq(tf(y,v),x)
--477
-y@satz77a:=somei(frac,[t:frac]eq(tf(y,t),x),v".477",t1".477"):some"l"(frac,[t:frac]eq(tf(y,t),x))
-+rt
-@eq:=[x:frac][y:frac]eq"n"(x,y):[x:frac][y:frac]'prop'
-refeq:=[x:frac]refeq"n"(x):[x:frac]<x><x>eq
-symeq:=[x:frac][y:frac][t:<y><x>eq]symeq"n"(x,y,t):[x:frac][y:frac][t:<y><x>eq]<x><y>eq
-treq:=[x:frac][y:frac][z:frac][t:<y><x>eq][u:<z><y>eq]treq"n"(x,y,z,t,u):[x:frac][y:frac][z:frac][t:<y><x>eq][u:<z><y>eq]<z><x>eq
-[x:frac][s:set(frac)]
-inf:=esti(frac,x,s):'prop'
-@rat:=ect"eq"(frac,eq,refeq,symeq,treq):'type'
-[x0:rat][y0:rat]
-is:=is"e"(rat,x0,y0):'prop'
-nis:=not(is(x0,y0)):'prop'
-@[p:[x:rat]'prop']
-some:=some"l"(rat,p):'prop'
-all:=all"l"(rat,p):'prop'
-one:=one"e"(rat,p):'prop'
-x0@[s:set(rat)]
-in:=esti(rat,x0,s):'prop'
-x@ratof:=ectelt"eq"(frac,eq,refeq,symeq,treq,x):rat
-x0@class:=ecect"eq"(frac,eq,refeq,symeq,treq,x0):set(frac)
-x@inclass:=th5"eq.4"(frac,eq,refeq,symeq,treq,x):inf(x,class(ratof(x)))
-x0@[x:frac][y:frac][xix0:inf(x,class(x0))][e:eq"n"(x,y)]
-lemmaeq1:=th8"eq.4"(frac,eq,refeq,symeq,treq,x0,x,xix0,y,e):inf(y,class(x0))
-x0@[a:'prop'][a1:[x:frac][xi:inf(x,class(x0))]a]
-ratapp1:=th3"eq.4"(frac,eq,refeq,symeq,treq,x0,a,a1):a
-y0@[a:'prop'][a1:[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]a][x:frac][xix0:inf(x,class(x0))]
-+ii5
-t1:=ratapp1(y0,a,[y:frac][yi:inf(y,class(y0))]<yi><xix0><y><x>a1):a
--ii5
-a1@ratapp2:=ratapp1(x0,a,[x:frac][xi:inf(x,class(x0))]t1".ii5"(x,xi)):a
-y0@[z0:rat][a:'prop'][a1:[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]a][x:frac][xix0:inf(x,class(x0))]
-+*ii5
-xix0@t2:=ratapp2(y0,z0,a,[y:frac][z:frac][yi:inf(y,class(y0))][zi:inf(z,class(z0))]<zi><yi><xix0><z><y><x>a1):a
--ii5
-a1@ratapp3:=ratapp1(x0,a,[x:frac][xi:inf(x,class(x0))]t2".ii5"(x,xi)):a
-z0@[u0:rat][a:'prop'][a1:[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]a][x:frac][xix0:inf(x,class(x0))]
-+*ii5
-xix0@t3:=ratapp3(y0,z0,u0,a,[y:frac][z:frac][u:frac][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]<ui><zi><yi><xix0><u><z><y><x>a1):a
--ii5
-a1@ratapp4:=ratapp1(x0,a,[x:frac][xi:inf(x,class(x0))]t3".ii5"(x,xi)):a
-y0@[x1:frac][y1:frac][x1ix0:inf(x1,class(x0))][y1iy0:inf(y1,class(y0))][e:eq"n"(x1,y1)]
-isi:=th3"eq.5"(frac,eq,refeq,symeq,treq,x0,y0,x1,x1ix0,y1,y1iy0,e):is(x0,y0)
-y1iy0@[i:is(x0,y0)]
-ise:=th5"eq.5"(frac,eq,refeq,symeq,treq,x0,y0,x1,x1ix0,y1,y1iy0,i):eq"n"(x1,y1)
-y1iy0@[n:not(eq"n"(x1,y1))]
-nisi:=th3"l.imp"(is(x0,y0),eq"n"(x1,y1),n,[t:is(x0,y0)]ise(t)):nis(x0,y0)
-y1iy0@[n:nis(x0,y0)]
-nise:=th3"l.imp"(eq"n"(x1,y1),is(x0,y0),n,[t:eq"n"(x1,y1)]isi(t)):not(eq"n"(x1,y1))
-@[alpha:'type'][f:[x:frac][y:frac]alpha]
-fixf:=fixfu2"eq"(frac,eq,refeq,symeq,treq,alpha,f):'prop'
-y0@[alpha:'type'][f:[x:frac][y:frac]alpha][ff:fixf(alpha,f)]
-indrat:=indeq2"eq"(frac,eq,refeq,symeq,treq,alpha,f,ff,x0,y0):alpha
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))]
-isindrat:=th1"eq.11"(frac,eq,refeq,symeq,treq,alpha,f,ff,x0,y0,x,xix0,y,yiy0):is"e"(alpha,<y><x>f,indrat)
-x0@satz78:=refis(rat,x0):is(x0,x0)
-y0@[i:is(x0,y0)]
-satz79:=symis(rat,x0,y0,i):is(y0,x0)
-z0@[i:is(x0,y0)][j:is(y0,z0)]
-satz80:=tris(rat,x0,y0,z0,i,j):is(x0,z0)
-y0@more:=some"l"(frac,[x:frac]some"l"(frac,[y:frac]and3(inf(x,class(x0)),inf(y,class(y0)),moref(x,y)))):'prop'
-+*ii5
-y1@propm:=and3(inf(x1,class(x0)),inf(y1,class(y0)),moref(x1,y1)):'prop'
--ii5
-y0@[m:more(x0,y0)][x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][t:frac][s:some"l"(frac,[u:frac]propm".ii5"(t,u))][u:frac][p:propm".ii5"(t,u)]
-+*ii5
-p@t4:=and3e1(inf(t,class(x0)),inf(u,class(y0)),moref(t,u),p):inf(t,class(x0))
-t5:=and3e2(inf(t,class(x0)),inf(u,class(y0)),moref(t,u),p):inf(u,class(y0))
-t6:=and3e3(inf(t,class(x0)),inf(u,class(y0)),moref(t,u),p):moref(t,u)
-t7:=satz44(t,u,x,y,t6,ise(x0,x0,t,x,t4,xix0,refis(rat,x0)),ise(y0,y0,u,y,t5,yiy0,refis(rat,y0))):moref(x,y)
-s@t8:=someapp(frac,[u:frac]propm(t,u),s,moref(x,y),[u:frac][v:propm(t,u)]t7(u,v)):moref(x,y)
--ii5
-yiy0@also18:=someapp(frac,[t:frac]some"l"(frac,[u:frac]propm".ii5"(t,u)),m,moref(x,y),[t:frac][v:some"l"(frac,[u:frac]propm".ii5"(t,u))]t8".ii5"(t,v)):moref(x,y)
-y1iy0@[m:moref(x1,y1)]
-+*ii5
-m@t9:=and3i(inf(x1,class(x0)),inf(y1,class(y0)),moref(x1,y1),x1ix0,y1iy0,m):propm(x1,y1)
-t10:=somei(frac,[t:frac]propm(x1,t),y1,t9):some"l"(frac,[t:frac]propm(x1,t))
--ii5
-m@morei:=somei(frac,[u:frac]some"l"(frac,[t:frac]propm".ii5"(u,t)),x1,t10".ii5"):more(x0,y0)
-y1iy0@[m:more(x0,y0)]
-moree:=also18(m,x1,y1,x1ix0,y1iy0):moref(x1,y1)
-z0@[i:is(x0,y0)][m:more(x0,z0)]
-ismore1:=isp(rat,[t:rat]more(t,z0),x0,y0,m,i):more(y0,z0)
-i@[m:more(z0,x0)]
-ismore2:=isp(rat,[t:rat]more(z0,t),x0,y0,m,i):more(z0,y0)
-u0@[i:is(x0,y0)][j:is(z0,u0)][m:more(x0,z0)]
-ismore12:=ismore2(z0,u0,y0,j,ismore1(x0,y0,z0,i,m)):more(y0,u0)
-y0@less:=some"l"(frac,[x:frac]some"l"(frac,[y:frac]and3(inf(x,class(x0)),inf(y,class(y0)),lessf(x,y)))):'prop'
-+*ii5
-y1@propl:=and3(inf(x1,class(x0)),inf(y1,class(y0)),lessf(x1,y1)):'prop'
--ii5
-y0@[l:less(x0,y0)][x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][t:frac][s:some"l"(frac,[u:frac]propl".ii5"(t,u))][u:frac][p:propl".ii5"(t,u)]
-+*ii5
-p@t11:=and3e1(inf(t,class(x0)),inf(u,class(y0)),lessf(t,u),p):inf(t,class(x0))
-t12:=and3e2(inf(t,class(x0)),inf(u,class(y0)),lessf(t,u),p):inf(u,class(y0))
-t13:=and3e3(inf(t,class(x0)),inf(u,class(y0)),lessf(t,u),p):lessf(t,u)
-t14:=satz45(t,u,x,y,t13,ise(x0,x0,t,x,t11,xix0,refis(rat,x0)),ise(y0,y0,u,y,t12,yiy0,refis(rat,y0))):lessf(x,y)
-s@t15:=someapp(frac,[u:frac]propl(t,u),s,lessf(x,y),[u:frac][v:propl(t,u)]t14(u,v)):lessf(x,y)
--ii5
-yiy0@also19:=someapp(frac,[t:frac]some"l"(frac,[u:frac]propl".ii5"(t,u)),l,lessf(x,y),[t:frac][v:some"l"(frac,[u:frac]propl".ii5"(t,u))]t15".ii5"(t,v)):lessf(x,y)
-y1iy0@[l:lessf(x1,y1)]
-+*ii5
-l@t16:=and3i(inf(x1,class(x0)),inf(y1,class(y0)),lessf(x1,y1),x1ix0,y1iy0,l):propl(x1,y1)
-t17:=somei(frac,[t:frac]propl(x1,t),y1,t16):some"l"(frac,[t:frac]propl(x1,t))
--ii5
-l@lessi:=somei(frac,[u:frac]some"l"(frac,[t:frac]propl".ii5"(u,t)),x1,t17".ii5"):less(x0,y0)
-y1iy0@[l:less(x0,y0)]
-lesse:=also19(l,x1,y1,x1ix0,y1iy0):lessf(x1,y1)
-z0@[i:is(x0,y0)][l:less(x0,z0)]
-isless1:=isp(rat,[t:rat]less(t,z0),x0,y0,l,i):less(y0,z0)
-i@[l:less(z0,x0)]
-isless2:=isp(rat,[t:rat]less(z0,t),x0,y0,l,i):less(z0,y0)
-u0@[i:is(x0,y0)][j:is(z0,u0)][l:less(x0,z0)]
-isless12:=isless2(z0,u0,y0,j,isless1(x0,y0,z0,i,l)):less(y0,u0)
-+581
-y1iy0@t1:=satz41a(x1,y1):or3(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1))
-[e:eq"n"(x1,y1)]
-t2:=or3i1(is(x0,y0),more(x0,y0),less(x0,y0),isi(e)):or3(is(x0,y0),more(x0,y0),less(x0,y0))
-y1iy0@[m:moref(x1,y1)]
-t3:=or3i2(is(x0,y0),more(x0,y0),less(x0,y0),morei(m)):or3(is(x0,y0),more(x0,y0),less(x0,y0))
-y1iy0@[l:lessf(x1,y1)]
-t4:=or3i3(is(x0,y0),more(x0,y0),less(x0,y0),lessi(l)):or3(is(x0,y0),more(x0,y0),less(x0,y0))
-y1iy0@t5:=or3app(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1),or3(is(x0,y0),more(x0,y0),less(x0,y0)),t1,[t:eq"n"(x1,y1)]t2(t),[t:moref(x1,y1)]t3(t),[t:lessf(x1,y1)]t4(t)):or3(is(x0,y0),more(x0,y0),less(x0,y0))
-t6:=satz41b(x1,y1):ec3(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1))
-[i:is(x0,y0)]
-t7:=th3"l.imp"(more(x0,y0),moref(x1,y1),ec3e12(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1),t6,ise(i)),[t:more(x0,y0)]moree(t)):not(more(x0,y0))
-y1iy0@[m:more(x0,y0)]
-t8:=th3"l.imp"(less(x0,y0),lessf(x1,y1),ec3e23(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1),t6,moree(m)),[t:less(x0,y0)]lesse(t)):not(less(x0,y0))
-y1iy0@[l:less(x0,y0)]
-t9:=th3"l.imp"(is(x0,y0),eq"n"(x1,y1),ec3e31(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1),t6,lesse(l)),[t:is(x0,y0)]ise(t)):nis(x0,y0)
-y1iy0@t10:=th6"l.ec3"(is(x0,y0),more(x0,y0),less(x0,y0),th1"l.ec"(is(x0,y0),more(x0,y0),[t:is(x0,y0)]t7(t)),th1"l.ec"(more(x0,y0),less(x0,y0),[t:more(x0,y0)]t8(t)),th1"l.ec"(less(x0,y0),is(x0,y0),[t:less(x0,y0)]t9(t))):ec3(is(x0,y0),more(x0,y0),less(x0,y0))
-t11:=orec3i(is(x0,y0),more(x0,y0),less(x0,y0),t5,t10):orec3(is(x0,y0),more(x0,y0),less(x0,y0))
--581
-y0@satz81:=ratapp2(orec3(is(x0,y0),more(x0,y0),less(x0,y0)),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t11".581"(x,y,xi,yi)):orec3(is(x0,y0),more(x0,y0),less(x0,y0))
-satz81a:=orec3e1(is(x0,y0),more(x0,y0),less(x0,y0),satz81):or3(is(x0,y0),more(x0,y0),less(x0,y0))
-satz81b:=orec3e2(is(x0,y0),more(x0,y0),less(x0,y0),satz81):ec3(is(x0,y0),more(x0,y0),less(x0,y0))
-[m:more(x0,y0)]
-+582
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))]
-t1:=lessi(y0,x0,y,x,yiy0,xix0,satz42(x,y,moree(x0,y0,x,y,xix0,yiy0,m))):less(y0,x0)
--582
-satz82:=ratapp2(less(y0,x0),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".582"(x,y,xi,yi)):less(y0,x0)
-y0@[l:less(x0,y0)]
-+583
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))]
-t1:=morei(y0,x0,y,x,yiy0,xix0,satz43(x,y,lesse(x0,y0,x,y,xix0,yiy0,l))):more(y0,x0)
--583
-satz83:=ratapp2(more(y0,x0),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".583"(x,y,xi,yi)):more(y0,x0)
-y0@moreis:=or(more(x0,y0),is(x0,y0)):'prop'
-[m:more(x0,y0)]
-moreisi1:=ori1(more,is,m):moreis(x0,y0)
-y0@[i:is(x0,y0)]
-moreisi2:=ori2(more,is,i):moreis(x0,y0)
-y1iy0@[m:moreq(x1,y1)]
-moreisi:=orapp(moref(x1,y1),eq"n"(x1,y1),moreis,m,[t:moref(x1,y1)]moreisi1(morei(t)),[t:eq"n"(x1,y1)]moreisi2(isi(t))):moreis(x0,y0)
-y1iy0@[m:moreis(x0,y0)]
-moreise:=orapp(more,is,moreq(x1,y1),m,[t:more]moreqi1(x1,y1,moree(t)),[t:is]moreqi2(x1,y1,ise(t))):moreq(x1,y1)
-z0@[i:is(x0,y0)][m:moreis(x0,z0)]
-ismoreis1:=isp(rat,[t:rat]moreis(t,z0),x0,y0,m,i):moreis(y0,z0)
-i@[m:moreis(z0,x0)]
-ismoreis2:=isp(rat,[t:rat]moreis(z0,t),x0,y0,m,i):moreis(z0,y0)
-u0@[i:is(x0,y0)][j:is(z0,u0)][m:moreis(x0,z0)]
-ismoreis12:=ismoreis2(z0,u0,y0,j,ismoreis1(x0,y0,z0,i,m)):moreis(y0,u0)
-y0@lessis:=or(less(x0,y0),is(x0,y0)):'prop'
-[l:less(x0,y0)]
-lessisi1:=ori1(less,is,l):lessis(x0,y0)
-y0@[i:is(x0,y0)]
-lessisi2:=ori2(less,is,i):lessis(x0,y0)
-y1iy0@[l:lesseq(x1,y1)]
-lessisi:=orapp(lessf(x1,y1),eq"n"(x1,y1),lessis,l,[t:lessf(x1,y1)]lessisi1(lessi(t)),[t:eq"n"(x1,y1)]lessisi2(isi(t))):lessis(x0,y0)
-y1iy0@[l:lessis(x0,y0)]
-lessise:=orapp(less,is,lesseq(x1,y1),l,[t:less]lesseqi1(x1,y1,lesse(t)),[t:is]lesseqi2(x1,y1,ise(t))):lesseq(x1,y1)
-z0@[i:is(x0,y0)][l:lessis(x0,z0)]
-islessis1:=isp(rat,[t:rat]lessis(t,z0),x0,y0,l,i):lessis(y0,z0)
-i@[l:lessis(z0,x0)]
-islessis2:=isp(rat,[t:rat]lessis(z0,t),x0,y0,l,i):lessis(z0,y0)
-u0@[i:is(x0,y0)][j:is(z0,u0)][l:lessis(x0,z0)]
-islessis12:=islessis2(z0,u0,y0,j,islessis1(x0,y0,z0,i,l)):lessis(y0,u0)
-y0@[m:moreis(x0,y0)]
-satz81c:=th7"l.ec3"(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,comor(more(x0,y0),is(x0,y0),m)):not(less(x0,y0))
-y0@[l:lessis(x0,y0)]
-satz81d:=th9"l.ec3"(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,l):not(more(x0,y0))
-y0@[n:not(more(x0,y0))]
-satz81e:=th2"l.or3"(is(x0,y0),more(x0,y0),less(x0,y0),satz81a,n):lessis(x0,y0)
-y0@[n:not(less(x0,y0))]
-satz81f:=comor(is(x0,y0),more(x0,y0),th3"l.or3"(is(x0,y0),more(x0,y0),less(x0,y0),satz81a,n)):moreis(x0,y0)
-y0@[m:more(x0,y0)]
-satz81g:=th3"l.or"(less(x0,y0),is(x0,y0),ec3e23(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,m),ec3e21(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,m)):not(lessis(x0,y0))
-y0@[l:less(x0,y0)]
-satz81h:=th3"l.or"(more(x0,y0),is(x0,y0),ec3e32(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,l),ec3e31(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,l)):not(moreis(x0,y0))
-y0@[n:not(moreis(x0,y0))]
-satz81j:=or3e3(is(x0,y0),more(x0,y0),less(x0,y0),satz81a,th5"l.or"(more(x0,y0),is(x0,y0),n),th4"l.or"(more(x0,y0),is(x0,y0),n)):less(x0,y0)
-y0@[n:not(lessis(x0,y0))]
-satz81k:=or3e2(is(x0,y0),more(x0,y0),less(x0,y0),satz81a,th4"l.or"(less(x0,y0),is(x0,y0),n),th5"l.or"(less(x0,y0),is(x0,y0),n)):more(x0,y0)
-y0@[m:moreis(x0,y0)]
-+584
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))]
-t1:=lessisi(y0,x0,y,x,yiy0,xix0,satz48(x,y,moreise(x0,y0,x,y,xix0,yiy0,m))):lessis(y0,x0)
--584
-satz84:=ratapp2(lessis(y0,x0),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".584"(x,y,xi,yi)):lessis(y0,x0)
-y0@[l:lessis(x0,y0)]
-+585
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))]
-t1:=moreisi(y0,x0,y,x,yiy0,xix0,satz49(x,y,lessise(x0,y0,x,y,xix0,yiy0,l))):moreis(y0,x0)
--585
-satz85:=ratapp2(moreis(y0,x0),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".585"(x,y,xi,yi)):moreis(y0,x0)
-z0@[l:less(x0,y0)][k:less(y0,z0)]
-+586
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=lessi(x0,z0,x,z,xix0,ziz0,satz50(x,y,z,lesse(x0,y0,x,y,xix0,yiy0,l),lesse(y0,z0,y,z,yiy0,ziz0,k))):less(x0,z0)
--586
-satz86:=ratapp3(less(x0,z0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".586"(x,y,z,xi,yi,zi)):less(x0,z0)
-trless:=satz86:less(x0,z0)
-z0@[m:more(x0,y0)][n:more(y0,z0)]
-trmore:=satz83(z0,x0,satz86(z0,y0,x0,satz82(y0,z0,n),satz82(m))):more(x0,z0)
-z0@[l:lessis(x0,y0)][k:less(y0,z0)]
-+587
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=lessi(x0,z0,x,z,xix0,ziz0,satz51a(x,y,z,lessise(x0,y0,x,y,xix0,yiy0,l),lesse(y0,z0,y,z,yiy0,ziz0,k))):less(x0,z0)
--587
-satz87a:=ratapp3(less(x0,z0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".587"(x,y,z,xi,yi,zi)):less(x0,z0)
-z0@[l:less(x0,y0)][k:lessis(y0,z0)]
-+*587
-k@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t2:=lessi(x0,z0,x,z,xix0,ziz0,satz51b(x,y,z,lesse(x0,y0,x,y,xix0,yiy0,l),lessise(y0,z0,y,z,yiy0,ziz0,k))):less(x0,z0)
--587
-k@satz87b:=ratapp3(less(x0,z0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t2".587"(x,y,z,xi,yi,zi)):less(x0,z0)
-z0@[m:moreis(x0,y0)][n:more(y0,z0)]
-satz87c:=satz83(z0,x0,satz87b(z0,y0,x0,satz82(y0,z0,n),satz84(m))):more(x0,z0)
-z0@[m:more(x0,y0)][n:moreis(y0,z0)]
-satz87d:=satz83(z0,x0,satz87a(z0,y0,x0,satz84(y0,z0,n),satz82(m))):more(x0,z0)
-z0@[l:lessis(x0,y0)][k:lessis(y0,z0)]
-+588
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=lessisi(x0,z0,x,z,xix0,ziz0,satz52(x,y,z,lessise(x0,y0,x,y,xix0,yiy0,l),lessise(y0,z0,y,z,yiy0,ziz0,k))):lessis(x0,z0)
--588
-satz88:=ratapp3(lessis(x0,z0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".588"(x,y,z,xi,yi,zi)):lessis(x0,z0)
-trlessis:=satz88:lessis(x0,z0)
-z0@[m:moreis(x0,y0)][n:moreis(y0,z0)]
-trmoreis:=satz85(z0,x0,satz88(z0,y0,x0,satz84(y0,z0,n),satz84(m))):moreis(x0,z0)
-+589
-x0@[x:frac][xix0:inf(x,class(x0))][z:frac][m:moref(z,x)]
-t1:=somei(rat,[t:rat]more(t,x0),ratof(z),morei(ratof(z),x0,z,x,inclass(z),xix0,m)):some([t:rat]more(t,x0))
-xix0@t2:=someapp(frac,[t:frac]moref(t,x),satz53(x),some([t:rat]more(t,x0)),[t:frac][u:moref(t,x)]t1(t,u)):some([t:rat]more(t,x0))
--589
-x0@satz89:=ratapp1(some([t:rat]more(t,x0)),[x:frac][xi:inf(x,class(x0))]t2".589"(x,xi)):some([t:rat]more(t,x0))
-+590
-z"rt.589"@[l:lessf(z,x)]
-t1:=somei(rat,[t:rat]less(t,x0),ratof(z),lessi(ratof(z),x0,z,x,inclass(z),xix0,l)):some([t:rat]less(t,x0))
-xix0"rt.589"@t2:=someapp(frac,[t:frac]lessf(t,x),satz54(x),some([t:rat]less(t,x0)),[t:frac][u:lessf(t,x)]t1(t,u)):some([t:rat]less(t,x0))
--590
-satz90:=ratapp1(some([t:rat]less(t,x0)),[x:frac][xi:inf(x,class(x0))]t2".590"(x,xi)):some([t:rat]less(t,x0))
-y0@[l:less(x0,y0)]
-+591
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][z:frac][a:and(lessf(x,z),lessf(z,y))]
-t1:=lessi(x0,ratof(z),x,z,xix0,inclass(z),ande1(lessf(x,z),lessf(z,y),a)):less(x0,ratof(z))
-t2:=lessi(ratof(z),y0,z,y,inclass(z),yiy0,ande2(lessf(x,z),lessf(z,y),a)):less(ratof(z),y0)
-t3:=andi(less(x0,ratof(z)),less(ratof(z),y0),t1,t2):and(less(x0,ratof(z)),less(ratof(z),y0))
-t4:=somei(rat,[t:rat]and(less(x0,t),less(t,y0)),ratof(z),t3):some([t:rat]and(less(x0,t),less(t,y0)))
-yiy0@t5:=someapp(frac,[t:frac]and(lessf(x,t),lessf(t,y)),satz55(x,y,lesse(x,y,xix0,yiy0,l)),some([t:rat]and(less(x0,t),less(t,y0))),[t:frac][u:and(lessf(x,t),lessf(t,y))]t4(t,u)):some([t:rat]and(less(x0,t),less(t,y0)))
--591
-satz91:=ratapp2(some([t:rat]and(less(x0,t),less(t,y0))),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t5".591"(x,y,xi,yi)):some([t:rat]and(less(x0,t),less(t,y0)))
-@plusfrt:=[x:frac][y:frac]ratof(pf(x,y)):[x:frac][y:frac]rat
-[x:frac][y:frac][z:frac][u:frac][e:eq"n"(x,y)][f:eq"n"(z,u)]
-+*ii5
-f@t18:=isi(ratof(pf(x,z)),ratof(pf(y,u)),pf(x,z),pf(y,u),inclass(pf(x,z)),inclass(pf(y,u)),satz56(x,y,z,u,e,f)):is(<z><x>plusfrt,<u><y>plusfrt)
--ii5
-@fplusfrt:=[x:frac][y:frac][z:frac][u:frac][v:<y><x>eq][w:<u><z>eq]t18".ii5"(x,y,z,u,v,w):fixf(rat,plusfrt)
-y0@pl:=indrat(rat,plusfrt,fplusfrt):rat
-+*ii5
-y1iy0@t19:=isindrat(rat,plusfrt,fplusfrt,x1,y1,x1ix0,y1iy0):is(ratof(pf(x1,y1)),pl(x0,y0))
--ii5
-y1iy0@picp:=isp(rat,[t:rat]inf(pf(x1,y1),class(t)),ratof(pf(x1,y1)),pl(x0,y0),inclass(pf(x1,y1)),t19".ii5"):inf(pf(x1,y1),class(pl(x0,y0)))
-z0@[i:is(x0,y0)]
-ispl1:=isf(rat,rat,[t:rat]pl(t,z0),x0,y0,i):is(pl(x0,z0),pl(y0,z0))
-ispl2:=isf(rat,rat,[t:rat]pl(z0,t),x0,y0,i):is(pl(z0,x0),pl(z0,y0))
-u0@[i:is(x0,y0)][j:is(z0,u0)]
-ispl12:=tris(rat,pl(x0,z0),pl(y0,z0),pl(y0,u0),ispl1(i),ispl2(z0,u0,y0,j)):is(pl(x0,z0),pl(y0,u0))
-+592
-y1iy0@t1:=isi(pl(x0,y0),pl(y0,x0),pf(x1,y1),pf(y1,x1),picp,picp(y0,x0,y1,x1,y1iy0,x1ix0),satz58(x1,y1)):is(pl(x0,y0),pl(y0,x0))
--592
-y0@satz92:=ratapp2(is(pl(x0,y0),pl(y0,x0)),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".592"(x,y,xi,yi)):is(pl(x0,y0),pl(y0,x0))
-compl:=satz92:is(pl(x0,y0),pl(y0,x0))
-+593
-z0@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=picp(pl(x0,y0),z0,pf(x,y),z,picp(x0,y0,x,y,xix0,yiy0),ziz0):inf(pf(pf(x,y),z),class(pl(pl(x0,y0),z0)))
-t2:=picp(x0,pl(y0,z0),x,pf(y,z),xix0,picp(y0,z0,y,z,yiy0,ziz0)):inf(pf(x,pf(y,z)),class(pl(x0,pl(y0,z0))))
-t3:=isi(pl(pl(x0,y0),z0),pl(x0,pl(y0,z0)),pf(pf(x,y),z),pf(x,pf(y,z)),t1,t2,satz59(x,y,z)):is(pl(pl(x0,y0),z0),pl(x0,pl(y0,z0)))
--593
-z0@satz93:=ratapp3(is(pl(pl(x0,y0),z0),pl(x0,pl(y0,z0))),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".593"(x,y,z,xi,yi,zi)):is(pl(pl(x0,y0),z0),pl(x0,pl(y0,z0)))
-asspl1:=satz93:is(pl(pl(x0,y0),z0),pl(x0,pl(y0,z0)))
-asspl2:=symis(rat,pl(pl(x0,y0),z0),pl(x0,pl(y0,z0)),satz93):is(pl(x0,pl(y0,z0)),pl(pl(x0,y0),z0))
-+594
-y1iy0@t1:=morei(pl(x0,y0),x0,pf(x1,y1),x1,picp,x1ix0,satz60(x1,y1)):more(pl(x0,y0),x0)
--594
-y0@satz94:=ratapp2(more(pl(x0,y0),x0),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".594"(x,y,xi,yi)):more(pl(x0,y0),x0)
-satz94a:=satz82(pl(x0,y0),x0,satz94):less(x0,pl(x0,y0))
-z0@[m:more(x0,y0)]
-+595
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=morei(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),satz61(x,y,z,moree(x0,y0,x,y,xix0,yiy0,m))):more(pl(x0,z0),pl(y0,z0))
--595
-satz95:=ratapp3(more(pl(x0,z0),pl(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".595"(x,y,z,xi,yi,zi)):more(pl(x0,z0),pl(y0,z0))
-z0@[m:more(x0,y0)]
-+596
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=morei(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),satz62a(x,y,z,moree(x0,y0,x,y,xix0,yiy0,m))):more(pl(x0,z0),pl(y0,z0))
--596
-satz96a:=ratapp3(more(pl(x0,z0),pl(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".596"(x,y,z,xi,yi,zi)):more(pl(x0,z0),pl(y0,z0))
-z0@[i:is(x0,y0)]
-+*596
-i@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t2:=isi(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),satz62b(x,y,z,ise(x0,y0,x,y,xix0,yiy0,i))):is(pl(x0,z0),pl(y0,z0))
--596
-i@satz96b:=ratapp3(is(pl(x0,z0),pl(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t2".596"(x,y,z,xi,yi,zi)):is(pl(x0,z0),pl(y0,z0))
-z0@[l:less(x0,y0)]
-+*596
-l@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t3:=lessi(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),satz62c(x,y,z,lesse(x0,y0,x,y,xix0,yiy0,l))):less(pl(x0,z0),pl(y0,z0))
--596
-l@satz96c:=ratapp3(less(pl(x0,z0),pl(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".596"(x,y,z,xi,yi,zi)):less(pl(x0,z0),pl(y0,z0))
-+*596
-m@andersa:=satz95(m):more(pl(x0,z0),pl(y0,z0))
-i@andersb:=ispl1(x0,y0,z0,i):is(pl(x0,z0),pl(y0,z0))
-l@andersc:=satz82(pl(y0,z0),pl(x0,z0),satz95(y0,x0,z0,satz83(l))):less(pl(x0,z0),pl(y0,z0))
--596
-m@satz96d:=ismore12(pl(x0,z0),pl(z0,x0),pl(y0,z0),pl(z0,y0),compl(x0,z0),compl(y0,z0),satz96a):more(pl(z0,x0),pl(z0,y0))
-i@satz96e:=ispl2(x0,y0,z0,i):is(pl(z0,x0),pl(z0,y0))
-l@satz96f:=isless12(pl(x0,z0),pl(z0,x0),pl(y0,z0),pl(z0,y0),compl(x0,z0),compl(y0,z0),satz96c):less(pl(z0,x0),pl(z0,y0))
-z0@[m:more(pl(x0,z0),pl(y0,z0))]
-+597
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=morei(x0,y0,x,y,xix0,yiy0,satz63a(x,y,z,moree(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),m))):more(x0,y0)
--597
-satz97a:=ratapp3(more(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".597"(x,y,z,xi,yi,zi)):more(x0,y0)
-z0@[i:is(pl(x0,z0),pl(y0,z0))]
-+*597
-i@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t2:=isi(x0,y0,x,y,xix0,yiy0,satz63b(x,y,z,ise(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),i))):is(x0,y0)
--597
-i@satz97b:=ratapp3(is(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t2".597"(x,y,z,xi,yi,zi)):is(x0,y0)
-z0@[l:less(pl(x0,z0),pl(y0,z0))]
-+*597
-l@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t3:=lessi(x0,y0,x,y,xix0,yiy0,satz63c(x,y,z,lesse(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),l))):less(x0,y0)
--597
-l@satz97c:=ratapp3(less(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".597"(x,y,z,xi,yi,zi)):less(x0,y0)
-+*597
-l@anders:=satz82(y0,x0,satz97a(y0,x0,z0,satz83(pl(x0,z0),pl(y0,z0),l))):less(x0,y0)
--597
-u0@[m:more(x0,y0)][n:more(z0,u0)]
-+598
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=morei(pl(x0,z0),pl(y0,u0),pf(x,z),pf(y,u),picp(x0,z0,x,z,xix0,ziz0),picp(y0,u0,y,u,yiy0,uiu0),satz64(x,y,z,u,moree(x0,y0,x,y,xix0,yiy0,m),moree(z0,u0,z,u,ziz0,uiu0,n))):more(pl(x0,z0),pl(y0,u0))
--598
-satz98:=ratapp4(more(pl(x0,z0),pl(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".598"(x,y,z,u,xi,yi,zi,ui)):more(pl(x0,z0),pl(y0,u0))
-u0@[l:less(x0,y0)][k:less(z0,u0)]
-satz98a:=satz82(pl(y0,u0),pl(x0,z0),satz98(y0,x0,u0,z0,satz83(l),satz83(z0,u0,k))):less(pl(x0,z0),pl(y0,u0))
-u0@[m:moreis(x0,y0)][n:more(z0,u0)]
-+599
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=morei(pl(x0,z0),pl(y0,u0),pf(x,z),pf(y,u),picp(x0,z0,x,z,xix0,ziz0),picp(y0,u0,y,u,yiy0,uiu0),satz65a(x,y,z,u,moreise(x0,y0,x,y,xix0,yiy0,m),moree(z0,u0,z,u,ziz0,uiu0,n))):more(pl(x0,z0),pl(y0,u0))
--599
-satz99a:=ratapp4(more(pl(x0,z0),pl(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".599"(x,y,z,u,xi,yi,zi,ui)):more(pl(x0,z0),pl(y0,u0))
-u0@[m:more(x0,y0)][n:moreis(z0,u0)]
-+*599
-n@[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t2:=morei(pl(x0,z0),pl(y0,u0),pf(x,z),pf(y,u),picp(x0,z0,x,z,xix0,ziz0),picp(y0,u0,y,u,yiy0,uiu0),satz65b(x,y,z,u,moree(x0,y0,x,y,xix0,yiy0,m),moreise(z0,u0,z,u,ziz0,uiu0,n))):more(pl(x0,z0),pl(y0,u0))
--599
-n@satz99b:=ratapp4(more(pl(x0,z0),pl(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t2".599"(x,y,z,u,xi,yi,zi,ui)):more(pl(x0,z0),pl(y0,u0))
-u0@[l:lessis(x0,y0)][k:less(z0,u0)]
-satz99c:=satz82(pl(y0,u0),pl(x0,z0),satz99a(y0,x0,u0,z0,satz85(l),satz83(z0,u0,k))):less(pl(x0,z0),pl(y0,u0))
-u0@[l:less(x0,y0)][k:lessis(z0,u0)]
-satz99d:=satz82(pl(y0,u0),pl(x0,z0),satz99b(y0,x0,u0,z0,satz83(l),satz85(z0,u0,k))):less(pl(x0,z0),pl(y0,u0))
-u0@[m:moreis(x0,y0)][n:moreis(z0,u0)]
-+5100
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=moreisi(pl(x0,z0),pl(y0,u0),pf(x,z),pf(y,u),picp(x0,z0,x,z,xix0,ziz0),picp(y0,u0,y,u,yiy0,uiu0),satz66(x,y,z,u,moreise(x0,y0,x,y,xix0,yiy0,m),moreise(z0,u0,z,u,ziz0,uiu0,n))):moreis(pl(x0,z0),pl(y0,u0))
--5100
-satz100:=ratapp4(moreis(pl(x0,z0),pl(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".5100"(x,y,z,u,xi,yi,zi,ui)):moreis(pl(x0,z0),pl(y0,u0))
-u0@[l:lessis(x0,y0)][k:lessis(z0,u0)]
-satz100a:=satz84(pl(y0,u0),pl(x0,z0),satz100(y0,x0,u0,z0,satz85(l),satz85(z0,u0,k))):lessis(pl(x0,z0),pl(y0,u0))
-y0@[l:lessis(x0,y0)]
-+5101
-[v0:rat][i:is(pl(y0,v0),x0)]
-t1:=ismore1(pl(y0,v0),x0,y0,i,satz94(y0,v0)):more(x0,y0)
-v0@t2:=th3"l.imp"(is(pl(y0,v0),x0),more(x0,y0),satz81d(x0,y0,l),[t:is(pl(y0,v0),x0)]t1(t)):nis(pl(y0,v0),x0)
--5101
-vorbemerkung101:=th5"l.some"(rat,[v:rat]is(pl(y0,v),x0),[v:rat]t2".5101"(v)):not(some([t:rat]is(pl(y0,t),x0)))
-y0@[m:more(x0,y0)]
-+*5101
-m@[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][v:frac][e:eq"n"(pf(y,v),x)]
-t3:=isi(pl(y0,ratof(v)),x0,pf(y,v),x,picp(y0,ratof(v),y,v,yiy0,inclass(v)),xix0,e):is(pl(y0,ratof(v)),x0)
-t4:=somei(rat,[t:rat]is(pl(y0,t),x0),ratof(v),t3):some([t:rat]is(pl(y0,t),x0))
-yiy0@t5:=someapp(frac,[t:frac]eq"n"(pf(y,t),x),satz67a(x,y,moree(x0,y0,x,y,xix0,yiy0,m)),some([t:rat]is(pl(y0,t),x0)),[t:frac][u:eq"n"(pf(y,t),x)]t4(t,u)):some([t:rat]is(pl(y0,t),x0))
--5101
-m@satz101a:=ratapp2(some([t:rat]is(pl(y0,t),x0)),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t5".5101"(x,y,xi,yi)):some([t:rat]is(pl(y0,t),x0))
-y0@[v0:rat][w0:rat][i:is(pl(y0,v0),x0)][j:is(pl(y0,w0),x0)]
-+*5101
-j@[x:frac][y:frac][v:frac][w:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][viv0:inf(v,class(v0))][wiw0:inf(w,class(w0))]
-t6:=isi(v0,w0,v,w,viv0,wiw0,satz67b(x,y,v,w,ise(pl(y0,v0),x0,pf(y,v),x,picp(y0,v0,y,v,yiy0,viv0),xix0,i),ise(pl(y0,w0),x0,pf(y,w),x,picp(y0,w0,y,w,yiy0,wiw0),xix0,j))):is(v0,w0)
--5101
-j@satz101b:=ratapp4(v0,w0,is(v0,w0),[x:frac][y:frac][v:frac][w:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][vi:inf(v,class(v0))][wi:inf(w,class(w0))]t6".5101"(x,y,v,w,xi,yi,vi,wi)):is(v0,w0)
-+*5101
-y0@t7:=[t:rat][u:rat][v:is(pl(y0,t),x0)][w:is(pl(y0,u),x0)]satz101b(t,u,v,w):amone(rat,[t:rat]is(pl(y0,t),x0))
--5101
-m@satz101:=onei(rat,[t:rat]is(pl(y0,t),x0),t7".5101",satz101a):one([t:rat]is(pl(y0,t),x0))
-mn:=ind(rat,[t:rat]is(pl(y0,t),x0),satz101):rat
-satz101c:=oneax(rat,[t:rat]is(pl(y0,t),x0),satz101):is(pl(y0,mn(x0,y0,m)),x0)
-satz101d:=symis(rat,pl(y0,mn(x0,y0,m)),x0,satz101c):is(x0,pl(y0,mn(x0,y0,m)))
-satz101e:=tris(rat,pl(mn(x0,y0,m),y0),pl(y0,mn(x0,y0,m)),x0,compl(mn(x0,y0,m),y0),satz101c):is(pl(mn(x0,y0,m),y0),x0)
-satz101f:=symis(rat,pl(mn(x0,y0,m),y0),x0,satz101e):is(x0,pl(mn(x0,y0,m),y0))
-y0@[v0:rat][m:more(x0,y0)][i:is(pl(y0,v0),x0)]
-satz101g:=satz101b(v0,mn(x0,y0,m),i,satz101c(m)):is(v0,mn(x0,y0,m))
-@timesfrt:=[x:frac][y:frac]ratof(tf(x,y)):[x:frac][y:frac]rat
-+*ii5
-f@t20:=isi(ratof(tf(x,z)),ratof(tf(y,u)),tf(x,z),tf(y,u),inclass(tf(x,z)),inclass(tf(y,u)),satz68(x,y,z,u,e,f)):is(<z><x>timesfrt,<u><y>timesfrt)
--ii5
-@ftimesfrt:=[x:frac][y:frac][z:frac][u:frac][v:<y><x>eq][w:<u><z>eq]t20".ii5"(x,y,z,u,v,w):fixf(rat,timesfrt)
-y0@ts:=indrat(rat,timesfrt,ftimesfrt):rat
-+*ii5
-y1iy0@t21:=isindrat(rat,timesfrt,ftimesfrt,x1,y1,x1ix0,y1iy0):is(ratof(tf(x1,y1)),ts(x0,y0))
--ii5
-y1iy0@tict:=isp(rat,[t:rat]inf(tf(x1,y1),class(t)),ratof(tf(x1,y1)),ts(x0,y0),inclass(tf(x1,y1)),t21".ii5"):inf(tf(x1,y1),class(ts(x0,y0)))
-z0@[i:is(x0,y0)]
-ists1:=isf(rat,rat,[t:rat]ts(t,z0),x0,y0,i):is(ts(x0,z0),ts(y0,z0))
-ists2:=isf(rat,rat,[t:rat]ts(z0,t),x0,y0,i):is(ts(z0,x0),ts(z0,y0))
-u0@[i:is(x0,y0)][j:is(z0,u0)]
-ists12:=tris(rat,ts(x0,z0),ts(y0,z0),ts(y0,u0),ists1(i),ists2(z0,u0,y0,j)):is(ts(x0,z0),ts(y0,u0))
-+5102
-y1iy0@t1:=isi(ts(x0,y0),ts(y0,x0),tf(x1,y1),tf(y1,x1),tict,tict(y0,x0,y1,x1,y1iy0,x1ix0),satz69(x1,y1)):is(ts(x0,y0),ts(y0,x0))
--5102
-y0@satz102:=ratapp2(is(ts(x0,y0),ts(y0,x0)),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".5102"(x,y,xi,yi)):is(ts(x0,y0),ts(y0,x0))
-comts:=satz102:is(ts(x0,y0),ts(y0,x0))
-+5103
-ziz0"rt.593"@t1:=tict(ts(x0,y0),z0,tf(x,y),z,tict(x0,y0,x,y,xix0,yiy0),ziz0):inf(tf(tf(x,y),z),class(ts(ts(x0,y0),z0)))
-t2:=tict(x0,ts(y0,z0),x,tf(y,z),xix0,tict(y0,z0,y,z,yiy0,ziz0)):inf(tf(x,tf(y,z)),class(ts(x0,ts(y0,z0))))
-t3:=isi(ts(ts(x0,y0),z0),ts(x0,ts(y0,z0)),tf(tf(x,y),z),tf(x,tf(y,z)),t1,t2,satz70(x,y,z)):is(ts(ts(x0,y0),z0),ts(x0,ts(y0,z0)))
--5103
-z0@satz103:=ratapp3(is(ts(ts(x0,y0),z0),ts(x0,ts(y0,z0))),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".5103"(x,y,z,xi,yi,zi)):is(ts(ts(x0,y0),z0),ts(x0,ts(y0,z0)))
-assts1:=satz103:is(ts(ts(x0,y0),z0),ts(x0,ts(y0,z0)))
-assts2:=symis(rat,ts(ts(x0,y0),z0),ts(x0,ts(y0,z0)),satz103):is(ts(x0,ts(y0,z0)),ts(ts(x0,y0),z0))
-+5104
-ziz0"rt.593"@t1:=tict(x0,pl(y0,z0),x,pf(y,z),xix0,picp(y0,z0,y,z,yiy0,ziz0)):inf(tf(x,pf(y,z)),class(ts(x0,pl(y0,z0))))
-t2:=picp(ts(x0,y0),ts(x0,z0),tf(x,y),tf(x,z),tict(x0,y0,x,y,xix0,yiy0),tict(x0,z0,x,z,xix0,ziz0)):inf(pf(tf(x,y),tf(x,z)),class(pl(ts(x0,y0),ts(x0,z0))))
-t3:=isi(ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0)),tf(x,pf(y,z)),pf(tf(x,y),tf(x,z)),t1,t2,satz71(x,y,z)):is(ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0)))
--5104
-satz104:=ratapp3(is(ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0))),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".5104"(x,y,z,xi,yi,zi)):is(ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0)))
-disttp1:=tr3is(rat,ts(pl(x0,y0),z0),ts(z0,pl(x0,y0)),pl(ts(z0,x0),ts(z0,y0)),pl(ts(x0,z0),ts(y0,z0)),comts(pl(x0,y0),z0),satz104(z0,x0,y0),ispl12(ts(z0,x0),ts(x0,z0),ts(z0,y0),ts(y0,z0),comts(z0,x0),comts(z0,y0))):is(ts(pl(x0,y0),z0),pl(ts(x0,z0),ts(y0,z0)))
-disttp2:=satz104:is(ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0)))
-distpt1:=symis(rat,ts(pl(x0,y0),z0),pl(ts(x0,z0),ts(y0,z0)),disttp1):is(pl(ts(x0,z0),ts(y0,z0)),ts(pl(x0,y0),z0))
-distpt2:=symis(rat,ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0)),disttp2):is(pl(ts(x0,y0),ts(x0,z0)),ts(x0,pl(y0,z0)))
-[m:more(x0,y0)]
-+5105
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=morei(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xix0,ziz0),tict(y0,z0,y,z,yiy0,ziz0),satz72a(x,y,z,moree(x0,y0,x,y,xix0,yiy0,m))):more(ts(x0,z0),ts(y0,z0))
--5105
-satz105a:=ratapp3(more(ts(x0,z0),ts(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".5105"(x,y,z,xi,yi,zi)):more(ts(x0,z0),ts(y0,z0))
-z0@[i:is(x0,y0)]
-+*5105
-i@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t2:=isi(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xix0,ziz0),tict(y0,z0,y,z,yiy0,ziz0),satz72b(x,y,z,ise(x0,y0,x,y,xix0,yiy0,i))):is(ts(x0,z0),ts(y0,z0))
--5105
-i@satz105b:=ratapp3(is(ts(x0,z0),ts(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t2".5105"(x,y,z,xi,yi,zi)):is(ts(x0,z0),ts(y0,z0))
-z0@[l:less(x0,y0)]
-+*5105
-l@[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]
-t3:=lessi(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xi,zi),tict(y0,z0,y,z,yi,zi),satz72c(x,y,z,lesse(x0,y0,x,y,xi,yi,l))):less(ts(x0,z0),ts(y0,z0))
--5105
-l@satz105c:=ratapp3(less(ts(x0,z0),ts(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".5105"(x,y,z,xi,yi,zi)):less(ts(x0,z0),ts(y0,z0))
-+*5105
-i@andersb:=ists1(x0,y0,z0,i):is(ts(x0,z0),ts(y0,z0))
-l@andersc:=satz82(ts(y0,z0),ts(x0,z0),satz105a(y0,x0,z0,satz83(l))):less(ts(x0,z0),ts(y0,z0))
--5105
-m@satz105d:=ismore12(ts(x0,z0),ts(z0,x0),ts(y0,z0),ts(z0,y0),comts(x0,z0),comts(y0,z0),satz105a):more(ts(z0,x0),ts(z0,y0))
-i@satz105e:=ists2(x0,y0,z0,i):is(ts(z0,x0),ts(z0,y0))
-l@satz105f:=isless12(ts(x0,z0),ts(z0,x0),ts(y0,z0),ts(z0,y0),comts(x0,z0),comts(y0,z0),satz105c):less(ts(z0,x0),ts(z0,y0))
-z0@[m:more(ts(x0,z0),ts(y0,z0))]
-+5106
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=morei(x0,y0,x,y,xix0,yiy0,satz73a(x,y,z,moree(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xix0,ziz0),tict(y0,z0,y,z,yiy0,ziz0),m))):more(x0,y0)
--5106
-satz106a:=ratapp3(more(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".5106"(x,y,z,xi,yi,zi)):more(x0,y0)
-z0@[i:is(ts(x0,z0),ts(y0,z0))]
-+*5106
-i@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t2:=isi(x0,y0,x,y,xix0,yiy0,satz73b(x,y,z,ise(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xix0,ziz0),tict(y0,z0,y,z,yiy0,ziz0),i))):is(x0,y0)
--5106
-i@satz106b:=ratapp3(is(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t2".5106"(x,y,z,xi,yi,zi)):is(x0,y0)
-z0@[l:less(ts(x0,z0),ts(y0,z0))]
-+*5106
-l@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t3:=lessi(x0,y0,x,y,xix0,yiy0,satz73c(x,y,z,lesse(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xix0,ziz0),tict(y0,z0,y,z,yiy0,ziz0),l))):less(x0,y0)
--5106
-l@satz106c:=ratapp3(less(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".5106"(x,y,z,xi,yi,zi)):less(x0,y0)
-+*5106
-l@anders:=satz82(y0,x0,satz106a(y0,x0,z0,satz83(ts(x0,z0),ts(y0,z0),l))):less(x0,y0)
--5106
-u0@[m:more(x0,y0)][n:more(z0,u0)]
-+5107
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=morei(ts(x0,z0),ts(y0,u0),tf(x,z),tf(y,u),tict(x0,z0,x,z,xix0,ziz0),tict(y0,u0,y,u,yiy0,uiu0),satz74(x,y,z,u,moree(x0,y0,x,y,xix0,yiy0,m),moree(z0,u0,z,u,ziz0,uiu0,n))):more(ts(x0,z0),ts(y0,u0))
--5107
-satz107:=ratapp4(more(ts(x0,z0),ts(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".5107"(x,y,z,u,xi,yi,zi,ui)):more(ts(x0,z0),ts(y0,u0))
-u0@[l:less(x0,y0)][k:less(z0,u0)]
-satz107a:=satz82(ts(y0,u0),ts(x0,z0),satz107(y0,x0,u0,z0,satz83(l),satz83(z0,u0,k))):less(ts(x0,z0),ts(y0,u0))
-u0@[m:moreis(x0,y0)][n:more(z0,u0)]
-+5108
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=morei(ts(x0,z0),ts(y0,u0),tf(x,z),tf(y,u),tict(x0,z0,x,z,xix0,ziz0),tict(y0,u0,y,u,yiy0,uiu0),satz75a(x,y,z,u,moreise(x0,y0,x,y,xix0,yiy0,m),moree(z0,u0,z,u,ziz0,uiu0,n))):more(ts(x0,z0),ts(y0,u0))
--5108
-satz108a:=ratapp4(more(ts(x0,z0),ts(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".5108"(x,y,z,u,xi,yi,zi,ui)):more(ts(x0,z0),ts(y0,u0))
-u0@[m:more(x0,y0)][n:moreis(z0,u0)]
-+*5108
-n@[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t2:=morei(ts(x0,z0),ts(y0,u0),tf(x,z),tf(y,u),tict(x0,z0,x,z,xix0,ziz0),tict(y0,u0,y,u,yiy0,uiu0),satz75b(x,y,z,u,moree(x0,y0,x,y,xix0,yiy0,m),moreise(z0,u0,z,u,ziz0,uiu0,n))):more(ts(x0,z0),ts(y0,u0))
--5108
-n@satz108b:=ratapp4(more(ts(x0,z0),ts(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t2".5108"(x,y,z,u,xi,yi,zi,ui)):more(ts(x0,z0),ts(y0,u0))
-u0@[l:lessis(x0,y0)][k:less(z0,u0)]
-satz108c:=satz82(ts(y0,u0),ts(x0,z0),satz108a(y0,x0,u0,z0,satz85(l),satz83(z0,u0,k))):less(ts(x0,z0),ts(y0,u0))
-u0@[l:less(x0,y0)][k:lessis(z0,u0)]
-satz108d:=satz82(ts(y0,u0),ts(x0,z0),satz108b(y0,x0,u0,z0,satz83(l),satz85(z0,u0,k))):less(ts(x0,z0),ts(y0,u0))
-u0@[m:moreis(x0,y0)][n:moreis(z0,u0)]
-+5109
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=moreisi(ts(x0,z0),ts(y0,u0),tf(x,z),tf(y,u),tict(x0,z0,x,z,xix0,ziz0),tict(y0,u0,y,u,yiy0,uiu0),satz76(x,y,z,u,moreise(x0,y0,x,y,xix0,yiy0,m),moreise(z0,u0,z,u,ziz0,uiu0,n))):moreis(ts(x0,z0),ts(y0,u0))
--5109
-satz109:=ratapp4(moreis(ts(x0,z0),ts(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".5109"(x,y,z,u,xi,yi,zi,ui)):moreis(ts(x0,z0),ts(y0,u0))
-u0@[l:lessis(x0,y0)][k:lessis(z0,u0)]
-satz109a:=satz84(ts(y0,u0),ts(x0,z0),satz109(y0,x0,u0,z0,satz85(l),satz85(z0,u0,k))):lessis(ts(x0,z0),ts(y0,u0))
-+5110
-y1iy0@[v:frac][e:eq"n"(tf(y1,v),x1)]
-t1:=isi(ts(y0,ratof(v)),x0,tf(y1,v),x1,tict(y0,ratof(v),y1,v,y1iy0,inclass(v)),x1ix0,e):is(ts(y0,ratof(v)),x0)
-t2:=somei(rat,[t:rat]is(ts(y0,t),x0),ratof(v),t1):some([t:rat]is(ts(y0,t),x0))
-y1iy0@t3:=someapp(frac,[t:frac]eq"n"(tf(y1,t),x1),satz77a(x1,y1),some([t:rat]is(ts(y0,t),x0)),[t:frac][u:eq"n"(tf(y1,t),x1)]t2(t,u)):some([t:rat]is(ts(y0,t),x0))
--5110
-y0@satz110a:=ratapp2(some([t:rat]is(ts(y0,t),x0)),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t3".5110"(x,y,xi,yi)):some([t:rat]is(ts(y0,t),x0))
-[v0:rat][w0:rat][i:is(ts(y0,v0),x0)][j:is(ts(y0,w0),x0)]
-+*5110
-j@[x:frac][y:frac][v:frac][w:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][viv0:inf(v,class(v0))][wiw0:inf(w,class(w0))]
-t4:=isi(v0,w0,v,w,viv0,wiw0,satz77b(x,y,v,w,ise(ts(y0,v0),x0,tf(y,v),x,tict(y0,v0,y,v,yiy0,viv0),xix0,i),ise(ts(y0,w0),x0,tf(y,w),x,tict(y0,w0,y,w,yiy0,wiw0),xix0,j))):is(v0,w0)
--5110
-j@satz110b:=ratapp4(v0,w0,is(v0,w0),[x:frac][y:frac][v:frac][w:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][vi:inf(v,class(v0))][wi:inf(w,class(w0))]t4".5110"(x,y,v,w,xi,yi,vi,wi)):is(v0,w0)
-+*5110
-y0@t5:=[t:rat][u:rat][v:is(ts(y0,t),x0)][w:is(ts(y0,u),x0)]satz110b(t,u,v,w):amone(rat,[t:rat]is(ts(y0,t),x0))
--5110
-y0@satz110:=onei(rat,[t:rat]is(ts(y0,t),x0),t5".5110",satz110a):one([t:rat]is(ts(y0,t),x0))
--rt
-@[x:nat][y:nat]
-+5111
-t1:=tris(nat,ts(num(fr(x,1)),den(fr(y,1))),ts(x,1),x,ndis12(x,1,y,1),satz28a(x)):is(ts(num(fr(x,1)),den(fr(y,1))),x)
-t2:=symis(nat,ts(num(fr(x,1)),den(fr(y,1))),x,t1):is(x,ts(num(fr(x,1)),den(fr(y,1))))
--5111
-[m:moref(fr(x,1),fr(y,1))]
-satz111a:=ismore12(ts(num(fr(x,1)),den(fr(y,1))),x,ts(num(fr(y,1)),den(fr(x,1))),y,t1".5111",t1".5111"(y,x),m):more(x,y)
-y@[e:eq(fr(x,1),fr(y,1))]
-satz111b:=tr3is(nat,x,ts(num(fr(x,1)),den(fr(y,1))),ts(num(fr(y,1)),den(fr(x,1))),y,t2".5111",e,t1".5111"(y,x)):is(x,y)
-y@[l:lessf(fr(x,1),fr(y,1))]
-satz111c:=isless12(ts(num(fr(x,1)),den(fr(y,1))),x,ts(num(fr(y,1)),den(fr(x,1))),y,t1".5111",t1".5111"(y,x),l):less(x,y)
-y@[m:more(x,y)]
-satz111d:=ismore12(x,ts(num(fr(x,1)),den(fr(y,1))),y,ts(num(fr(y,1)),den(fr(x,1))),t2".5111",t2".5111"(y,x),m):moref(fr(x,1),fr(y,1))
-y@[i:is(x,y)]
-satz111e:=tr3is(nat,ts(num(fr(x,1)),den(fr(y,1))),x,y,ts(num(fr(y,1)),den(fr(x,1))),t1".5111",i,t2".5111"(y,x)):eq(fr(x,1),fr(y,1))
-y@[l:less(x,y)]
-satz111f:=isless12(x,ts(num(fr(x,1)),den(fr(y,1))),y,ts(num(fr(y,1)),den(fr(x,1))),t2".5111",t2".5111"(y,x),l):lessf(fr(x,1),fr(y,1))
-+*rt
-@[x0:rat][x:nat]
-natprop:=inf(fr(x,1),class(x0)):'prop'
-x0@natrt:=some"n"([t:nat]natprop(t)):'prop'
-+*ii5
-y0@[x:nat][y:nat][npx:natprop(x0,x)][npy:natprop(y0,y)][i:is(x0,y0)]
-t22:=satz111b(x,y,ise(x0,y0,fr(x,1),fr(y,1),npx,npy,i)):is"n"(x,y)
-x0@t23:=[t:nat][u:nat][v:natprop(x0,t)][w:natprop(x0,u)]t22(x0,x0,t,u,v,w,refis(rat,x0)):amone(nat,[t:nat]natprop(x0,t))
--ii5
-x0@[nx0:natrt(x0)]
-satz111g:=onei(nat,[t:nat]natprop(t),t23".ii5",nx0):one"n"([t:nat]natprop(x0,t))
-nofrt:=ind(nat,[t:nat]natprop(t),satz111g):nat
-inclassn:=oneax(nat,[t:nat]natprop(t),satz111g):inf(fr(nofrt,1),class(x0))
-[y0:rat][ny0:natrt(y0)][i:is(x0,y0)]
-isrten:=t22".ii5"(x0,y0,nofrt(x0,nx0),nofrt(y0,ny0),inclassn(x0,nx0),inclassn(y0,ny0),i):is"n"(nofrt(x0,nx0),nofrt(y0,ny0))
-ny0@[i:is"n"(nofrt(x0,nx0),nofrt(y0,ny0))]
-isrtin:=isi(x0,y0,fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1),inclassn(x0,nx0),inclassn(y0,ny0),eqn"n"(nofrt(x0,nx0),1,nofrt(y0,ny0),i)):is(x0,y0)
-@[x:nat]
-rtofn:=ratof(fr(x,1)):rat
-natrti:=somei(nat,[t:nat]natprop(rtofn,t),x,inclass(fr(x,1))):natrt(rtofn(x))
-[y:nat][i:is"n"(x,y)]
-isnert:=isf(nat,rat,[t:nat]rtofn(t),x,y,i):is(rtofn(x),rtofn(y))
-y@[i:is(rtofn(x),rtofn(y))]
-isnirt:=t22".ii5"(rtofn(x),rtofn(y),x,y,inclass(fr(x,1)),inclass(fr(y,1)),i):is"n"(x,y)
-nx0@isrtn1:=isi(x0,rtofn(nofrt(x0,nx0)),fr(nofrt(x0,nx0),1),fr(nofrt(x0,nx0),1),inclassn(x0,nx0),inclass(fr(nofrt(x0,nx0),1)),refeq"n"(fr(nofrt(x0,nx0),1))):is(x0,rtofn(nofrt(x0,nx0)))
-x@isnrt1:=t22".ii5"(rtofn(x),rtofn(x),x,nofrt(rtofn(x),natrti(x)),inclass(fr(x,1)),inclassn(rtofn(x),natrti(x)),refis(rat,rtofn(x))):is"n"(x,nofrt(rtofn(x),natrti(x)))
--rt
-@[x:nat][y:nat]
-satz112a:=satz57(x,y,1):eq(pf(fr(x,1),fr(y,1)),fr(pl(x,y),1))
-satz112b:=treq(tf(fr(x,1),fr(y,1)),fr(ts(x,y),ts(1,1)),fr(ts(x,y),1),tfeq12a(x,1,y,1),eqd(ts(x,y),ts(1,1),1,satz28a(1))):eq(tf(fr(x,1),fr(y,1)),fr(ts(x,y),1))
-+*rt
-ny0@satz112c:=lemmaeq1(pl(x0,y0),pf(fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1)),fr(pl"n"(nofrt(x0,nx0),nofrt(y0,ny0)),1),picp(x0,y0,fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1),inclassn(x0,nx0),inclassn(y0,ny0)),satz112a(nofrt(x0,nx0),nofrt(y0,ny0))):inf(fr(pl"n"(nofrt(x0,nx0),nofrt(y0,ny0)),1),class(pl(x0,y0)))
-satz112d:=somei(nat,[t:nat]natprop(pl(x0,y0),t),pl"n"(nofrt(x0,nx0),nofrt(y0,ny0)),satz112c):natrt(pl(x0,y0))
-satz112e:=lemmaeq1(ts(x0,y0),tf(fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1)),fr(ts"n"(nofrt(x0,nx0),nofrt(y0,ny0)),1),tict(x0,y0,fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1),inclassn(x0,nx0),inclassn(y0,ny0)),satz112b(nofrt(x0,nx0),nofrt(y0,ny0))):inf(fr(ts"n"(nofrt(x0,nx0),nofrt(y0,ny0)),1),class(ts(x0,y0)))
-satz112f:=somei(nat,[t:nat]natprop(ts(x0,y0),t),ts"n"(nofrt(x0,nx0),nofrt(y0,ny0)),satz112e):natrt(ts(x0,y0))
-[m:more(x0,y0)]
-+5112
-t1:=satz111a(nofrt(x0,nx0),nofrt(y0,ny0),moree(x0,y0,fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1),inclassn(x0,nx0),inclassn(y0,ny0),m)):more"n"(nofrt(x0,nx0),nofrt(y0,ny0))
-[z:nat][d:diffprop(nofrt(x0,nx0),nofrt(y0,ny0),z)]
-t2:=tris(nat,nofrt(x0,nx0),pl"n"(nofrt(y0,ny0),z),pl"n"(nofrt(y0,ny0),nofrt(rtofn(z),natrti(z))),d,ispl2"n"(z,nofrt(rtofn(z),natrti(z)),nofrt(y0,ny0),isnrt1(z))):is"n"(nofrt(x0,nx0),pl"n"(nofrt(y0,ny0),nofrt(rtofn(z),natrti(z))))
-t3:=isi(x0,pl(y0,rtofn(z)),fr(nofrt(x0,nx0),1),fr(pl"n"(nofrt(y0,ny0),nofrt(rtofn(z),natrti(z))),1),inclassn(x0,nx0),satz112c(y0,ny0,rtofn(z),natrti(z)),eqn(nofrt(x0,nx0),1,pl"n"(nofrt(y0,ny0),nofrt(rtofn(z),natrti(z))),t2)):is(x0,pl(y0,rtofn(z)))
-t4:=satz101g(x0,y0,rtofn(z),m,symis(rat,x0,pl(y0,rtofn(z)),t3)):is(rtofn(z),mn(x0,y0,m))
-t5:=isp(rat,[t:rat]natrt(t),rtofn(z),mn(x0,y0,m),natrti(z),t4):natrt(mn(x0,y0,m))
--5112
-satz112g:=someapp(nat,[t:nat]diffprop(nofrt(x0,nx0),nofrt(y0,ny0),t),t1".5112",natrt(mn(x0,y0,m)),[t:nat][u:diffprop(nofrt(x0,nx0),nofrt(y0,ny0),t)]t5".5112"(t,u)):natrt(mn(x0,y0,m))
-@[x:nat][y:nat]
-satz112h:=isi(pl(rtofn(x),rtofn(y)),rtofn(pl"n"(x,y)),pf(fr(x,1),fr(y,1)),fr(pl"n"(x,y),1),picp(rtofn(x),rtofn(y),fr(x,1),fr(y,1),inclass(fr(x,1)),inclass(fr(y,1))),inclass(fr(pl"n"(x,y),1)),satz112a(x,y)):is(pl(rtofn(x),rtofn(y)),rtofn(pl"n"(x,y)))
-satz112j:=isi(ts(rtofn(x),rtofn(y)),rtofn(ts"n"(x,y)),tf(fr(x,1),fr(y,1)),fr(ts"n"(x,y),1),tict(rtofn(x),rtofn(y),fr(x,1),fr(y,1),inclass(fr(x,1)),inclass(fr(y,1))),inclass(fr(ts"n"(x,y),1)),satz112b(x,y)):is(ts(rtofn(x),rtofn(y)),rtofn(ts"n"(x,y)))
-+nt
-@natt:=ot(rat,[t:rat]natrt(t)):'type'
-nx0@ntofrt:=out(rat,[t:rat]natrt(t),x0,nx0):natt
-@[xt:natt][yt:natt]
-is:=is"e"(natt,xt,yt):'prop'
-nis:=not(is(xt,yt)):'prop'
-@[p:[x:natt]'prop']
-all:=all"l"(natt,p):'prop'
-some:=some"l"(natt,p):'prop'
-one:=one"e"(natt,p):'prop'
-xt@[st:set(natt)]
-in:=esti(natt,xt,st):'prop'
-xt@rtofnt:=in"e"(rat,[t:rat]natrt(t),xt):rat
-natrti:=inp(rat,[t:rat]natrt(t),xt):natrt(rtofnt(xt))
-ny0@[i:is"rt"(x0,y0)]
-isrtent:=isouti(rat,[t:rat]natrt(t),x0,nx0,y0,ny0,i):is(ntofrt(x0,nx0),ntofrt(y0,ny0))
-ny0@[i:is(ntofrt(x0,nx0),ntofrt(y0,ny0))]
-isrtint:=isoute(rat,[t:rat]natrt(t),x0,nx0,y0,ny0,i):is"rt"(x0,y0)
-yt@[i:is(xt,yt)]
-isntert:=isini(rat,[t:rat]natrt(t),xt,yt,i):is"rt"(rtofnt(xt),rtofnt(yt))
-yt@[i:is"rt"(rtofnt(xt),rtofnt(yt))]
-isntirt:=isine(rat,[t:rat]natrt(t),xt,yt,i):is(xt,yt)
-nx0@isrtnt1:=isinout(rat,[t:rat]natrt(t),x0,nx0):is"rt"(x0,rtofnt(ntofrt(x0,nx0)))
-xt@isntrt1:=isoutin(rat,[t:rat]natrt(t),xt):is(xt,ntofrt(rtofnt(xt),natrti(xt)))
-x@ntofn:=ntofrt(rtofn(x),natrti"rt"(x)):natt
-y@[i:is"n"(x,y)]
-isnent:=isrtent(rtofn(x),natrti"rt"(x),rtofn(y),natrti"rt"(y),isnert(x,y,i)):is(ntofn(x),ntofn(y))
-y@[i:is(ntofn(x),ntofn(y))]
-isnint:=isnirt(x,y,isrtint(rtofn"rt"(x),natrti"rt"(x),rtofn(y),natrti"rt"(y),i)):is"n"(x,y)
-xt@nofnt:=nofrt(rtofnt(xt),natrti(xt)):nat
-yt@[i:is(xt,yt)]
-isnten:=isrten(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),isntert(xt,yt,i)):is"n"(nofnt(xt),nofnt(yt))
-yt@[i:is"n"(nofnt(xt),nofnt(yt))]
-isntin:=isntirt(xt,yt,isrtin(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),i)):is(xt,yt)
-+ii5
-x@t24:=isrtnt1(rtofn(x),natrti"rt"(x)):is"rt"(rtofn(x),rtofnt(ntofn(x)))
-t25:=isrten(rtofn(x),natrti"rt"(x),rtofnt(ntofn(x)),natrti(ntofn(x)),t24):is"n"(nofrt(rtofn(x),natrti"rt"(x)),nofnt(ntofn(x)))
--ii5
-x@isnnt1:=tris(nat,x,nofrt(rtofn(x),natrti"rt"(x)),nofnt(ntofn(x)),isnrt1(x),t25".ii5"):is"n"(x,nofnt(ntofn(x)))
-+*ii5
-xt@t26:=isrtn1(rtofnt(xt),natrti(xt)):is"rt"(rtofnt(xt),rtofn(nofnt(xt)))
-t27:=isrtent(rtofnt(xt),natrti(xt),rtofn(nofnt(xt)),natrti"rt"(nofnt(xt)),t26):is(ntofrt(rtofnt(xt),natrti(xt)),ntofn(nofnt(xt)))
--ii5
-xt@isntn1:=tris(natt,xt,ntofrt(rtofnt(xt),natrti(xt)),ntofn(nofnt(xt)),isntrt1(xt),t27".ii5"):is(xt,ntofn(nofnt(xt)))
-x@isnnt2:=symis(nat,x,nofnt(ntofn(x)),isnnt1):is"n"(nofnt(ntofn(x)),x)
-xt@isntn2:=symis(natt,xt,ntofn(nofnt(xt)),isntn1):is(ntofn(nofnt(xt)),xt)
-@1t:=ntofn(1):natt
-suct:=[x:natt]ntofn(<nofnt(x)>suc):[x:natt]natt
-+5113
-xt@[i:is(<xt>suct,1t)]
-t1:=isnint(<nofnt(xt)>suc,1,i):is"n"(<nofnt(xt)>suc,1)
--5113
-xt@satz113a:=th3"l.imp"(is(<xt>suct,1t),is"n"(<nofnt(xt)>suc,1),<nofnt(xt)>ax3,[t:is(<xt>suct,1t)]t1".5113"(t)):nis(<xt>suct,1t)
-yt@[i:is(<xt>suct,<yt>suct)]
-+*5113
-i"nt"@t2:=isnint(<nofnt(xt)>suc,<nofnt(yt)>suc,i):is"n"(<nofnt(xt)>suc,<nofnt(yt)>suc)
--5113
-i@satz113b:=isntin(xt,yt,<t2".5113"><nofnt(yt)><nofnt(xt)>ax4):is(xt,yt)
-@[st:set(natt)]
-cond1:=in(1t,st):'prop'
-cond2:=all([x:natt]imp(in(x,st),in(<x>suct,st))):'prop'
-[c1:cond1][c2:cond2]
-+*5113
-c2@[x:nat]
-prop1:=in(ntofn(x),st):'prop'
-[p:prop1(x)]
-t3:=<ntofn(x)>c2:imp(in(ntofn(x),st),in(<ntofn(x)>suct,st))
-t4:=mp(in(ntofn(x),st),in(<ntofn(x)>suct,st),p,t3):in(<ntofn(x)>suct,st)
-t5:=isp(nat,[t:nat]in(ntofn(<t>suc),st),nofnt(ntofn(x)),x,t4,isnnt2(x)):prop1(<x>suc)
--5113
-c2@[xt:natt]
-+*5113
-xt@t6:=induction([t:nat]prop1(t),c1,[t:nat][u:prop1(t)]t5(t,u),nofnt(xt)):in(ntofn(nofnt(xt)),st)
--5113
-xt@satz113c:=isp(natt,[t:natt]in(t,st),ntofn(nofnt(xt)),xt,t6".5113",isntn2(xt)):in(xt,st)
-@ax3t:=[x:natt]satz113a(x):[x:natt]nis(<x>suct,1t)
-ax4t:=[x:natt][y:natt][u:is(<x>suct,<y>suct)]satz113b(x,y,u):[x:natt][y:natt][u:is(<x>suct,<y>suct)]is(x,y)
-ax5t:=[s:set(natt)][u:cond1(s)][v:cond2(s)][x:natt]satz113c(s,u,v,x):[s:set(natt)][u:cond1(s)][v:cond2(s)][x:natt]in(x,s)
-yt@[n:nis(xt,yt)]
-+51
-t1:=th3"l.imp"(is"n"(nofnt(xt),nofnt(yt)),is(xt,yt),n,[t:is"n"(nofnt(xt),nofnt(yt))]isntin(xt,yt,t)):nis"n"(nofnt(xt),nofnt(yt))
-t2:=satz1(nofnt(xt),nofnt(yt),t1):nis"n"(<nofnt(xt)>suc,<nofnt(yt)>suc)
--51
-satz1:=th3"l.imp"(is(<xt>suct,<yt>suct),is"n"(<nofnt(xt)>suc,<nofnt(yt)>suc),t2".51",[t:is(<xt>suct,<yt>suct)]isnint(<nofnt(xt)>suc,<nofnt(yt)>suc,t)):nis(<xt>suct,<yt>suct)
-+54
-xt@x:=nofnt(xt):nat
-[ft:[x:natt]natt]
-prop1t:=all([t:natt]is(<<t>suct>ft,<<t>ft>suct)):'prop'
-prop2t:=and(is(<1t>ft,<xt>suct),prop1t):'prop'
-xt@[f:[x:nat]nat]
-prop1:=all"n"([t:nat]is"n"(<<t>suc>f,<<t>f>suc)):'prop'
-prop2:=and(is"n"(<1>f,<x>suc),prop1):'prop'
-ft@g:=[t:nat]nofnt(<ntofn(t)>ft):[x:nat]nat
-[p:prop2t]
-t1:=ande1(is(<1t>ft,<xt>suct),prop1t,p):is(<1t>ft,<xt>suct)
-t2:=tris(nat,<1>g,nofnt(<xt>suct),<x>suc,isnten(<1t>ft,<xt>suct,t1),isnnt2(<x>suc)):is"n"(<1>g,<x>suc)
-t3:=ande2(is(<1t>ft,<xt>suct),prop1t,p):prop1t
-[u:nat]
-ut:=ntofn(u):natt
-t4:=isf(nat,nat,suc,u,nofnt(ut),isnnt1(u)):is"n"(<u>suc,<nofnt(ut)>suc)
-t5:=isf(nat,nat,g,<u>suc,<nofnt(ut)>suc,t4):is"n"(<<u>suc>g,nofnt(<<ut>suct>ft))
-t6:=<ut>t3:is(<<ut>suct>ft,<<ut>ft>suct)
-t7:=isnten(<<ut>suct>ft,<<ut>ft>suct,t6):is"n"(nofnt(<<ut>suct>ft),nofnt(<<ut>ft>suct))
-t8:=isnnt2(<<u>g>suc):is"n"(nofnt(<<ut>ft>suct),<<u>g>suc)
-t9:=tr3is(nat,<<u>suc>g,nofnt(<<ut>suct>ft),nofnt(<<ut>ft>suct),<<u>g>suc,t5,t7,t8):is"n"(<<u>suc>g,<<u>g>suc)
-p@t10:=[u:nat]t9(u):prop1(g)
-t11:=andi(is"n"(<1>g,<x>suc),prop1(g),t2,t10):prop2(g)
-xt@[a:[t:natt]natt][b:[t:natt]natt][pa:prop2t(a)][pb:prop2t(b)]
-t12:=onee1([t:nat]nat,[u:[t:nat]nat]prop2(u),satz4(x)):amone([t:nat]nat,[u:[t:nat]nat]prop2(u))
-t13:=<t11(b,pb)><t11(a,pa)><g(b)><g(a)>t12:is"e"([t:nat]nat,g(a),g(b))
-[yt:natt]
-y:=nofnt(yt):nat
-t14:=fise(nat,nat,g(a),g(b),t13,y):is"n"(nofnt(<ntofn(y)>a),nofnt(<ntofn(y)>b))
-t15:=isntin(<ntofn(y)>a,<ntofn(y)>b,t14):is(<ntofn(y)>a,<ntofn(y)>b)
-t16:=tr3is(natt,<yt>a,<ntofn(y)>a,<ntofn(y)>b,<yt>b,isf(natt,natt,a,yt,ntofn(y),isntn1(yt)),t15,isf(natt,natt,b,ntofn(y),yt,isntn2(yt))):is(<yt>a,<yt>b)
-pb@t17:=fisi(natt,natt,a,b,[t:natt]t16(t)):is"e"([t:natt]natt,a,b)
-xt@t18:=[u:[t:natt]natt][v:[t:natt]natt][w:prop2t(u)][z:prop2t(v)]t17(u,v,w,z):amone([t:natt]natt,[u:[t:natt]natt]prop2t(u))
-t19:=onee2([t:nat]nat,[u:[t:nat]nat]prop2(u),satz4(x)):some"l"([t:nat]nat,[u:[t:nat]nat]prop2(u))
-f@gt:=[t:natt]ntofn(<nofnt(t)>f):[x:natt]natt
-[p:prop2]
-t20:=ande1(is"n"(<1>f,<x>suc),prop1,p):is"n"(<1>f,<x>suc)
-t21:=isf(nat,nat,f,nofnt(1t),1,isnnt2(1)):is"n"(<nofnt(1t)>f,<1>f)
-t22:=isnent(<nofnt(1t)>f,<x>suc,tris(nat,<nofnt(1t)>f,<1>f,<x>suc,t21,t20)):is(<1t>gt,<xt>suct)
-t23:=ande2(is"n"(<1>f,<x>suc),prop1,p):prop1
-[zt:natt]
-z:=nofnt(zt):nat
-t24:=isf(nat,nat,f,nofnt(<zt>suct),<z>suc,isnnt2(<z>suc)):is"n"(<nofnt(<zt>suct)>f,<<z>suc>f)
-t25:=<z>t23:is"n"(<<z>suc>f,<<z>f>suc)
-t26:=isf(nat,nat,suc,<z>f,nofnt(<zt>gt),isnnt1(<z>f)):is"n"(<<z>f>suc,<nofnt(<zt>gt)>suc)
-t27:=isnent(<nofnt(<zt>suct)>f,<nofnt(<zt>gt)>suc,tr3is(nat,<nofnt(<zt>suct)>f,<<z>suc>f,<<z>f>suc,<nofnt(<zt>gt)>suc,t24,t25,t26)):is(<<zt>suct>gt,<<zt>gt>suct)
-p@t28:=[u:natt]t27(u):prop1t(gt)
-t29:=andi(is(<1t>gt,<xt>suct),prop1t(gt),t22,t28):prop2t(gt)
-t30:=somei([t:natt]natt,[u:[t:natt]natt]prop2t(u),gt,t29):some"l"([t:natt]natt,[u:[t:natt]natt]prop2t(u))
-xt@t31:=someapp([t:nat]nat,[u:[t:nat]nat]prop2(u),t19,some"l"([t:natt]natt,[u:[t:natt]natt]prop2t(u)),[u:[t:nat]nat][v:prop2(u)]t30(u,v)):some"l"([t:natt]natt,[u:[t:natt]natt]prop2t(u))
--54
-xt@satz4:=onei([t:natt]natt,[u:[t:natt]natt]prop2t".54"(u),t18".54",t31".54"):one"e"([t:natt]natt,[u:[t:natt]natt]and(is(<1t>u,<xt>suct),all([v:natt]is(<<v>suct>u,<<v>u>suct))))
-yt@pl:=ntofrt(pl"rt"(rtofnt(xt),rtofnt(yt)),satz112d(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt))):natt
-+*ii5
-yt@t28:=satz112c(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt)):inf(fr(pl"n"(nofnt(xt),nofnt(yt)),1),class(pl"rt"(rtofnt(xt),rtofnt(yt))))
-t29:=isi(pl"rt"(rtofnt(xt),rtofnt(yt)),rtofn(pl"n"(nofnt(xt),nofnt(yt))),fr(pl"n"(nofnt(xt),nofnt(yt)),1),fr(pl"n"(nofnt(xt),nofnt(yt)),1),t28,inclass(fr(pl"n"(nofnt(xt),nofnt(yt)),1)),refeq"n"(fr(pl"n"(nofnt(xt),nofnt(yt)),1))):is"rt"(pl"rt"(rtofnt(xt),rtofnt(yt)),rtofn(pl"n"(nofnt(xt),nofnt(yt))))
--ii5
-yt@isplnt:=isrtent(pl"rt"(rtofnt(xt),rtofnt(yt)),satz112d(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt)),rtofn(pl"n"(nofnt(xt),nofnt(yt))),natrti"rt"(pl"n"(nofnt(xt),nofnt(yt))),t29".ii5"):is(pl(xt,yt),ntofn(pl"n"(nofnt(xt),nofnt(yt))))
-isntpl:=symis(natt,pl(xt,yt),ntofn(pl"n"(nofnt(xt),nofnt(yt))),isplnt):is(ntofn(pl"n"(nofnt(xt),nofnt(yt))),pl(xt,yt))
-ispln:=tris(nat,pl"n"(nofnt(xt),nofnt(yt)),nofnt(ntofn(pl"n"(nofnt(xt),nofnt(yt)))),nofnt(pl(xt,yt)),isnnt1(pl"n"(nofnt(xt),nofnt(yt))),isnten(ntofn(pl"n"(nofnt(xt),nofnt(yt))),pl(xt,yt),isntpl)):is"n"(pl"n"(nofnt(xt),nofnt(yt)),nofnt(pl(xt,yt)))
-isnpl:=symis(nat,pl"n"(nofnt(xt),nofnt(yt)),nofnt(pl(xt,yt)),ispln):is"n"(nofnt(pl(xt,yt)),pl"n"(nofnt(xt),nofnt(yt)))
-[zt:natt]
-+55
-t1:=ispl1"n"(nofnt(pl(xt,yt)),pl"n"(nofnt(xt),nofnt(yt)),nofnt(zt),isnpl(xt,yt)):is"n"(pl"n"(nofnt(pl(xt,yt)),nofnt(zt)),pl"n"(pl"n"(nofnt(xt),nofnt(yt)),nofnt(zt)))
-t2:=ispl2"n"(pl"n"(nofnt(yt),nofnt(zt)),nofnt(pl(yt,zt)),nofnt(xt),ispln(yt,zt)):is"n"(pl"n"(nofnt(xt),pl"n"(nofnt(yt),nofnt(zt))),pl"n"(nofnt(xt),nofnt(pl(yt,zt))))
-t3:=tr3is(nat,pl"n"(nofnt(pl(xt,yt)),nofnt(zt)),pl"n"(pl"n"(nofnt(xt),nofnt(yt)),nofnt(zt)),pl"n"(nofnt(xt),pl"n"(nofnt(yt),nofnt(zt))),pl"n"(nofnt(xt),nofnt(pl(yt,zt))),t1,satz5(nofnt(xt),nofnt(yt),nofnt(zt)),t2):is"n"(pl"n"(nofnt(pl(xt,yt)),nofnt(zt)),pl"n"(nofnt(xt),nofnt(pl(yt,zt))))
--55
-satz5:=tr3is(natt,pl(pl(xt,yt),zt),ntofn(pl"n"(nofnt(pl(xt,yt)),nofnt(zt))),ntofn(pl"n"(nofnt(xt),nofnt(pl(yt,zt)))),pl(xt,pl(yt,zt)),isplnt(pl(xt,yt),zt),isnent(pl"n"(nofnt(pl(xt,yt)),nofnt(zt)),pl"n"(nofnt(xt),nofnt(pl(yt,zt))),t3".55"),isntpl(xt,pl(yt,zt))):is(pl(pl(xt,yt),zt),pl(xt,pl(yt,zt)))
-diffprop:=is(xt,pl(yt,zt)):'prop'
-[d:diffprop]
-diffprope:=tris(nat,nofnt(xt),nofnt(pl(yt,zt)),pl"n"(nofnt(yt),nofnt(zt)),isnten(xt,pl(yt,zt),d),isnpl(yt,zt)):diffprop"n"(nofnt(xt),nofnt(yt),nofnt(zt))
-zt@[d:diffprop"n"(nofnt(xt),nofnt(yt),nofnt(zt))]
-+*ii5
-d@t30:=tris(nat,nofnt(xt),pl"n"(nofnt(yt),nofnt(zt)),nofnt(pl(yt,zt)),d,ispln(yt,zt)):is"n"(nofnt(xt),nofnt(pl(yt,zt)))
--ii5
-d@diffpropi:=isntin(xt,pl(yt,zt),t30".ii5"):diffprop
-+59
-yt@it:=is(xt,yt):'prop'
-iit:=some([u:natt]diffprop(xt,yt,u)):'prop'
-iiit:=some([u:natt]diffprop(yt,xt,u)):'prop'
-i:=is"n"(nofnt(xt),nofnt(yt)):'prop'
-ii:=some"n"([u:nat]diffprop"n"(nofnt(xt),nofnt(yt),u)):'prop'
-iii:=some"n"([u:nat]diffprop"n"(nofnt(yt),nofnt(xt),u)):'prop'
-[one:i]
-t1:=or3i1(it,iit,iiit,isntin(xt,yt,one)):or3(it,iit,iiit)
-yt@[two:ii][v:nat][d:diffprop"n"(nofnt(xt),nofnt(yt),v)]
-t2:=isp(nat,[u:nat]diffprop"n"(nofnt(xt),nofnt(yt),u),v,nofnt(ntofn(v)),d,isnnt1(v)):diffprop"n"(nofnt(xt),nofnt(yt),nofnt(ntofn(v)))
-t3:=somei(natt,[u:natt]diffprop(xt,yt,u),ntofn(v),diffpropi(xt,yt,ntofn(v),t2)):iit
-two@t4:=someapp(nat,[u:nat]diffprop"n"(nofnt(xt),nofnt(yt),u),two,iit,[u:nat][v:diffprop"n"(nofnt(xt),nofnt(yt),u)]t3(u,v)):iit
-t5:=or3i2(it,iit,iiit,t4):or3(it,iit,iiit)
-yt@[three:iii]
-t6:=or3i3(it,iit,iiit,t4(yt,xt,three)):or3(it,iit,iiit)
-yt@t7:=or3app(i,ii,iii,or3(it,iit,iiit),satz9a(nofnt(xt),nofnt(yt)),[u:i]t1(u),[u:ii]t5(u),[u:iii]t6(u)):or3(it,iit,iiit)
-[onet:it]
-t8:=isnten(xt,yt,onet):i
-yt@[twot:iit][vt:natt][d:diffprop(xt,yt,vt)]
-t9:=somei(nat,[u:nat]diffprop"n"(nofnt(xt),nofnt(yt),u),nofnt(vt),diffprope(xt,yt,vt,d)):ii
-twot@t10:=someapp(natt,[u:natt]diffprop(xt,yt,u),twot,ii,[u:natt][v:diffprop(xt,yt,u)]t9(u,v)):ii
-yt@[threet:iiit]
-t11:=t10(yt,xt,threet):iii
-yt@t12:=satz9b(nofnt(xt),nofnt(yt)):ec3(i,ii,iii)
-onet@t13:=ec3e12(i,ii,iii,t12,t8):not(ii)
-t14:=th3"l.imp"(iit,ii,t13,[x:iit]t10(x)):not(iit)
-yt@t15:=th1"l.ec"(it,iit,[x:it]t14(x)):ec(it,iit)
-twot@t16:=ec3e23(i,ii,iii,t12,t10):not(iii)
-t17:=th3"l.imp"(iiit,iii,t16,[x:iiit]t11(x)):not(iiit)
-yt@t18:=th1"l.ec"(iit,iiit,[x:iit]t17(x)):ec(iit,iiit)
-threet@t19:=ec3e31(i,ii,iii,t12,t11):not(i)
-t20:=th3"l.imp"(it,i,t19,[x:it]t8(x)):not(it)
-yt@t21:=th1"l.ec"(iiit,it,[x:iiit]t20(x)):ec(iiit,it)
-t22:=th6"l.ec3"(it,iit,iiit,t15,t18,t21):ec3(it,iit,iiit)
--59
-yt@satz9:=orec3i(it".59",iit".59",iiit".59",t7".59",t22".59"):orec3(is(xt,yt),some([u:natt]is(xt,pl(yt,u))),some([u:natt]is(yt,pl(xt,u))))
-more:=more"rt"(rtofnt(xt),rtofnt(yt)):'prop'
-[m:more(xt,yt)]
-+*ii5
-m@t31:=moree(rtofnt(xt),rtofnt(yt),fr(nofnt(xt),1),fr(nofnt(yt),1),inclassn(rtofnt(xt),natrti(xt)),inclassn(rtofnt(yt),natrti(yt)),m):moref(fr(nofnt(xt),1),fr(nofnt(yt),1))
--ii5
-m@moree:=satz111a(nofnt(xt),nofnt(yt),t31".ii5"):more"n"(nofnt(xt),nofnt(yt))
-yt@[m:more"n"(nofnt(xt),nofnt(yt))]
-+*ii5
-m@t32:=satz111d(nofnt(xt),nofnt(yt),m):moref(fr(nofnt(xt),1),fr(nofnt(yt),1))
--ii5
-m@morei:=morei"rt"(rtofnt(xt),rtofnt(yt),fr(nofnt(xt),1),fr(nofnt(yt),1),inclassn(rtofnt(xt),natrti(xt)),inclassn(rtofnt(yt),natrti(yt)),t32".ii5"):more(xt,yt)
-yt@less:=less"rt"(rtofnt(xt),rtofnt(yt)):'prop'
-[l:less(xt,yt)]
-+*ii5
-l@t33:=lesse(rtofnt(xt),rtofnt(yt),fr(nofnt(xt),1),fr(nofnt(yt),1),inclassn(rtofnt(xt),natrti(xt)),inclassn(rtofnt(yt),natrti(yt)),l):lessf(fr(nofnt(xt),1),fr(nofnt(yt),1))
--ii5
-l@lesse:=satz111c(nofnt(xt),nofnt(yt),t33".ii5"):less"n"(nofnt(xt),nofnt(yt))
-yt@[l:less"n"(nofnt(xt),nofnt(yt))]
-+*ii5
-l@t34:=satz111f(nofnt(xt),nofnt(yt),l):lessf(fr(nofnt(xt),1),fr(nofnt(yt),1))
--ii5
-l@lessi:=lessi"rt"(rtofnt(xt),rtofnt(yt),fr(nofnt(xt),1),fr(nofnt(yt),1),inclassn(rtofnt(xt),natrti(xt)),inclassn(rtofnt(yt),natrti(yt)),t34".ii5"):less(xt,yt)
-yt@moreis:=moreis"rt"(rtofnt(xt),rtofnt(yt)):'prop'
-[m:moreis(xt,yt)]
-moreise:=th9"l.or"(more"rt"(rtofnt(xt),rtofnt(yt)),is"rt"(rtofnt(xt),rtofnt(yt)),more"n"(nofnt(xt),nofnt(yt)),is"n"(nofnt(xt),nofnt(yt)),m,[u:more"rt"(rtofnt(xt),rtofnt(yt))]moree(xt,yt,u),[u:is"rt"(rtofnt(xt),rtofnt(yt))]isrten(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),u)):moreis"n"(nofnt(xt),nofnt(yt))
-yt@[m:moreis"n"(nofnt(xt),nofnt(yt))]
-moreisi:=th9"l.or"(more"n"(nofnt(xt),nofnt(yt)),is"n"(nofnt(xt),nofnt(yt)),more"rt"(rtofnt(xt),rtofnt(yt)),is"rt"(rtofnt(xt),rtofnt(yt)),m,[u:more"n"(nofnt(xt),nofnt(yt))]morei(xt,yt,u),[u:is"n"(nofnt(xt),nofnt(yt))]isrtin(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),u)):moreis(xt,yt)
-yt@lessis:=lessis"rt"(rtofnt(xt),rtofnt(yt)):'prop'
-[l:lessis(xt,yt)]
-lessise:=th9"l.or"(less"rt"(rtofnt(xt),rtofnt(yt)),is"rt"(rtofnt(xt),rtofnt(yt)),less"n"(nofnt(xt),nofnt(yt)),is"n"(nofnt(xt),nofnt(yt)),l,[u:less"rt"(rtofnt(xt),rtofnt(yt))]lesse(xt,yt,u),[u:is"rt"(rtofnt(xt),rtofnt(yt))]isrten(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),u)):lessis"n"(nofnt(xt),nofnt(yt))
-yt@[l:lessis"n"(nofnt(xt),nofnt(yt))]
-lessisi:=th9"l.or"(less"n"(nofnt(xt),nofnt(yt)),is"n"(nofnt(xt),nofnt(yt)),less"rt"(rtofnt(xt),rtofnt(yt)),is"rt"(rtofnt(xt),rtofnt(yt)),l,[u:less"n"(nofnt(xt),nofnt(yt))]lessi(xt,yt,u),[u:is"n"(nofnt(xt),nofnt(yt))]isrtin(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),u)):lessis(xt,yt)
-zt@[l:less(xt,yt)][k:less(yt,zt)]
-+515
-t1:=satz15(nofnt(xt),nofnt(yt),nofnt(zt),lesse(xt,yt,l),lesse(yt,zt,k)):less"n"(nofnt(xt),nofnt(zt))
--515
-satz15:=lessi(xt,zt,t1".515"):less(xt,zt)
-zt@[ut:natt][m:more(xt,yt)][n:more(zt,ut)]
-+521
-t1:=satz21(nofnt(xt),nofnt(yt),nofnt(zt),nofnt(ut),moree(xt,yt,m),moree(zt,ut,n)):more"n"(pl"n"(nofnt(xt),nofnt(zt)),pl"n"(nofnt(yt),nofnt(ut)))
-t2:=ismore12"n"(pl"n"(nofnt(xt),nofnt(zt)),nofnt(pl(xt,zt)),pl"n"(nofnt(yt),nofnt(ut)),nofnt(pl(yt,ut)),ispln(xt,zt),ispln(yt,ut),t1):more"n"(nofnt(pl(xt,zt)),nofnt(pl(yt,ut)))
--521
-satz21:=morei(pl(xt,zt),pl(yt,ut),t2".521"):more(pl(xt,zt),pl(yt,ut))
-@[p:[x:natt]'prop'][n:natt]
-lb:=all([x:natt]imp(<x>p,lessis(n,x))):'prop'
-min:=and(lb,<n>p):'prop'
-p@[s:some(p)]
-+527
-q:=[x:nat]<ntofn(x)>p:[x:nat]'prop'
-[n:natt][np:<n>p]
-t1:=isp(natt,p,n,ntofn(nofnt(n)),np,isntn1(n)):<nofnt(n)>q
-t2:=somei(nat,q,nofnt(n),t1):some"n"(q)
-s@t3:=someapp(natt,p,s,some"n"(q),[u:natt][v:<u>p]t2(u,v)):some"n"(q)
-t4:=satz27(q,t3):some"n"([x:nat]min"n"(q,x))
-[m:nat][mqm:min"n"(q,m)]
-t5:=ande1(lb"n"(q,m),<m>q,mqm):lb"n"(q,m)
-[n:nat][nq:<n>q]
-t6:=mp(<n>q,lessis"n"(m,n),nq,<n>t5):lessis"n"(m,n)
-mqm@[n:natt][np:<n>p]
-t7:=t6(nofnt(n),t1(n,np)):lessis"n"(m,nofnt(n))
-t8:=islessis1"n"(m,nofnt(ntofn(m)),nofnt(n),isnnt1(m),t7):lessis"n"(nofnt(ntofn(m)),nofnt(n))
-t9:=lessisi(ntofn(m),n,t8):lessis(ntofn(m),n)
-n@t10:=[u:<n>p]t9(u):imp(<n>p,lessis(ntofn(m),n))
-mqm@t11:=[x:natt]t10(x):lb(ntofn(m))
-t12:=ande2(lb"n"(q,m),<m>q,mqm):<ntofn(m)>p
-t13:=andi(lb(ntofn(m)),<ntofn(m)>p,t11,t12):min(ntofn(m))
-t14:=somei(natt,[x:natt]min(x),ntofn(m),t13):some([x:natt]min(x))
--527
-satz27:=someapp(nat,[x:nat]min"n"(q".527",x),t4".527",some([x:natt]min(x)),[x:nat][y:min"n"(q".527",x)]t14".527"(x,y)):some([x:natt]min(p,x))
--nt
-@1rt:=rtofn(1):rat
-x0@[x:frac][xix0:inf(x,class(x0))]
-+*ii5
-xix0@t35:=tr3eq(tf(x,fr(1,1)),fr(ts"n"(num(x),1),ts"n"(den(x),1)),fr(num(x),den(x)),x,tfeq1a(x,1,1),eqnd(ts"n"(num(x),1),ts"n"(den(x),1),num(x),den(x),satz28a(num(x)),satz28a(den(x))),refeq1(fr(num(x),den(x)),x,fris(x))):eq"n"(tf(x,fr(1,1)),x)
-t36:=isi(ts(x0,1rt),x0,tf(x,fr(1,1)),x,tict(x0,1rt,x,fr(1,1),xix0,inclass(fr(1,1))),xix0,t35):is(ts(x0,1rt),x0)
--ii5
-x0@example1a:=ratapp1(x0,is(ts(x0,1rt),x0),[x:frac][xi:inf(x,class(x0))]t36".ii5"(x,xi)):is(ts(x0,1rt),x0)
-example1b:=symis(rat,ts(x0,1rt),x0,example1a):is(x0,ts(x0,1rt))
-example1c:=tris(rat,ts(1rt,x0),ts(x0,1rt),x0,comts(1rt,x0),example1a):is(ts(1rt,x0),x0)
-example1d:=symis(rat,ts(1rt,x0),x0,example1c):is(x0,ts(1rt,x0))
-@[x:frac]
-+5114
-t1:=tr3eq(tf(fr(den(x),1),x),fr(ts"n"(den(x),num(x)),ts"n"(1,den(x))),fr(ts"n"(num(x),den(x)),ts"n"(1,den(x))),fr(num(x),1),tfeq2a(x,den(x),1),eqn(ts"n"(den(x),num(x)),ts"n"(1,den(x)),ts"n"(num(x),den(x)),comts"n"(den(x),num(x))),satz40c(num(x),1,den(x))):eq"n"(tf(fr(den(x),1),x),fr(num(x),1))
--5114
-satz114:=isi(ts(rtofn(den(x)),ratof(x)),rtofn(num(x)),tf(fr(den(x),1),x),fr(num(x),1),tict(rtofn(den(x)),ratof(x),fr(den(x),1),x,inclass(fr(den(x),1)),inclass(x)),inclass(fr(num(x),1)),t1".5114"):is(ts(rtofn(den(x)),ratof(x)),rtofn(num(x)))
-@[x1:nat][x2:nat]
-satz114a:=tr3is(rat,ts(rtofn(x2),ratof(fr(x1,x2))),ts(rtofn(den(fr(x1,x2))),ratof(fr(x1,x2))),rtofn(num(fr(x1,x2))),rtofn(x1),ists1(rtofn(x2),rtofn(den(fr(x1,x2))),ratof(fr(x1,x2)),isnert(x2,den(fr(x1,x2)),isden(x1,x2))),satz114(fr(x1,x2)),isnert(num(fr(x1,x2)),x1,numis(x1,x2))):is(ts(rtofn(x2),ratof(fr(x1,x2))),rtofn(x1))
-x0@[y0:rat]
-ov:=ind(rat,[t:rat]is(ts(y0,t),x0),satz110(x0,y0)):rat
-satz110c:=oneax(rat,[t:rat]is(ts(y0,t),x0),satz110(x0,y0)):is(ts(y0,ov(x0,y0)),x0)
-satz110d:=symis(rat,ts(y0,ov(x0,y0)),x0,satz110c):is(x0,ts(y0,ov(x0,y0)))
-satz110e:=tris(rat,ts(ov(x0,y0),y0),ts(y0,ov(x0,y0)),x0,comts(ov(x0,y0),y0),satz110c):is(ts(ov(x0,y0),y0),x0)
-satz110f:=symis(rat,ts(ov(x0,y0),y0),x0,satz110e):is(x0,ts(ov(x0,y0),y0))
-[v0:rat][i:is(ts(y0,v0),x0)]
-satz110g:=satz110b(x0,y0,v0,ov(x0,y0),i,satz110c):is(v0,ov(x0,y0))
-x2@satz114b:=satz110b(rtofn(x1),rtofn(x2),ratof(fr(x1,x2)),ov(rtofn(x1),rtofn(x2)),satz114a,satz110c(rtofn(x1),rtofn(x2))):is(ratof(fr(x1,x2)),ov(rtofn(x1),rtofn(x2)))
-satz114c:=symis(rat,ratof(fr(x1,x2)),ov(rtofn(x1),rtofn(x2)),satz114b):is(ov(rtofn(x1),rtofn(x2)),ratof(fr(x1,x2)))
-+5115
-y0@t1:=satz89(ov(y0,x0)):some([t:rat]more(t,ov(y0,x0)))
-[u0:rat][m:more(u0,ov(y0,x0))][u:frac][uiu0:inf(u,class(u0))]
-z:=num(u):nat
-v:=den(u):nat
-t2:=ismore1(u0,ov(rtofn(z),rtofn(v)),ov(y0,x0),tris(rat,u0,ratof(fr(z,v)),ov(rtofn(z),rtofn(v)),isi(u0,ratof(fr(z,v)),u,fr(z,v),uiu0,inclass(fr(z,v)),refeq1(u,fr(z,v),isfr(u))),satz114b(z,v)),m):more(ov(rtofn(z),rtofn(v)),ov(y0,x0))
-t3:=moreisi(rtofn(v),1rt,fr(v,1),fr(1,1),inclass(fr(v,1)),inclass(fr(1,1)),th9"l.or"(more"n"(v,1),is"n"(v,1),moref(fr(v,1),fr(1,1)),eq"n"(fr(v,1),fr(1,1)),satz24(v),[t:more"n"(v,1)]satz111d(v,1,t),[t:is"n"(v,1)]satz111e(v,1,t))):moreis(rtofn(v),1rt)
-t4:=tr3is(rat,ts(rtofn(z),x0),ts(x0,rtofn(z)),ts(x0,ts(ov(rtofn(z),rtofn(v)),rtofn(v))),ts(ts(x0,ov(rtofn(z),rtofn(v))),rtofn(v)),comts(rtofn(z),x0),ists2(rtofn(z),ts(ov(rtofn(z),rtofn(v)),rtofn(v)),x0,satz110f(rtofn(z),rtofn(v))),assts2(x0,ov(rtofn(z),rtofn(v)),rtofn(v))):is(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),rtofn(v)))
-[n:more(rtofn(v),1rt)]
-t5:=ismore1(ts(ts(x0,ov(rtofn(z),rtofn(v))),rtofn(v)),ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),symis(rat,ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),rtofn(v)),t4),satz105d(rtofn(v),1rt,ts(x0,ov(rtofn(z),rtofn(v))),n)):more(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt))
-t6:=moreisi1(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),t5):moreis(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt))
-uiu0@[i:is(rtofn(v),1rt)]
-t7:=moreisi2(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),tris(rat,ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),rtofn(v)),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),t4,ists2(rtofn(v),1rt,ts(x0,ov(rtofn(z),rtofn(v))),i))):moreis(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt))
-uiu0@t8:=orapp(more(rtofn(v),1rt),is(rtofn(v),1rt),moreis(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt)),t3,[t:more(rtofn(v),1rt)]t6(t),[t:is(rtofn(v),1rt)]t7(t)):moreis(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt))
-t9:=ismore12(ts(x0,ov(rtofn(z),rtofn(v))),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),ts(x0,ov(y0,x0)),y0,example1b(ts(x0,ov(rtofn(z),rtofn(v)))),satz110c(y0,x0),satz105d(ov(rtofn(z),rtofn(v)),ov(y0,x0),x0,t2)):more(ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),y0)
-t10:=satz87c(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),y0,t8,t9):more(ts(rtofn(z),x0),y0)
-t11:=somei(nat,[t:nat]more(ts(rtofn(t),x0),y0),z,t10):some"n"([t:nat]more(ts(rtofn(t),x0),y0))
-m@t12:=ratapp1(u0,some"n"([t:nat]more(ts(rtofn(t),x0),y0)),[u:frac][ui:inf(u,class(u0))]t11(u,ui)):some"n"([t:nat]more(ts(rtofn(t),x0),y0))
--5115
-y0@satz115:=someapp(rat,[t:rat]more(t,ov(y0,x0)),t1".5115",some"n"([t:nat]more(ts(rtofn(t),x0),y0)),[t:rat][u:more(t,ov(y0,x0))]t12".5115"(t,u)):some"n"([t:nat]more(ts(rtofn(t),x0),y0))
-+*5115
-uiu0@t13:=andi(natrt(rtofn(z)),more(ts(rtofn(z),x0),y0),natrti(z),t10):and(natrt(rtofn(z)),more(ts(rtofn(z),x0),y0))
-t14:=somei(rat,[t:rat]and(natrt(t),more(ts(t,x0),y0)),rtofn(z),t13):some([t:rat]and(natrt(t),more(ts(t,x0),y0)))
-m@t15:=ratapp1(u0,some([t:rat]and(natrt(t),more(ts(t,x0),y0))),[u:frac][ui:inf(u,class(u0))]t14(u,ui)):some([t:rat]and(natrt(t),more(ts(t,x0),y0)))
--5115
-y0@satz115a:=someapp(rat,[t:rat]more(t,ov(y0,x0)),t1".5115",some([t:rat]and(natrt(t),more(ts(t,x0),y0))),[t:rat][u:more(t,ov(y0,x0))]t15".5115"(t,u)):some([t:rat]and(natrt(t),more(ts(t,x0),y0)))
-@[s:set(rat)]
-cutprop1a:=nonempty(rat,s):'prop'
-cutprop1b:=not(all([x:rat]in(x,s))):'prop'
-cutprop1:=and(cutprop1a,cutprop1b):'prop'
-[x0:rat]
-cutprop2a:=all([x:rat]imp(not(in(x,s)),less(x0,x))):'prop'
-s@cutprop2:=all([x:rat]imp(in(x,s),cutprop2a(x))):'prop'
-x0@[y0:rat]
-+iii1
-ubprop:=imp(in(y0,s),moreis(x0,y0)):'prop'
--iii1
-x0@ub:=all([x:rat]ubprop".iii1"(x0,x)):'prop'
-max:=and(ub(x0),in(x0,s)):'prop'
-s@cutprop3:=not(some([x:rat]max(s,x))):'prop'
-cutprop:=and3(cutprop1,cutprop2,cutprop3):'prop'
-+*iii1
-y0@lbprop:=imp(in(y0,s),lessis(x0,y0)):'prop'
--iii1
-x0@lb:=all([x:rat]lbprop".iii1"(x0,x)):'prop'
-min:=and(lb(x0),in(x0,s)):'prop'
-@cut:=ot(set(rat),[x:set(rat)]cutprop(x)):'type'
-[ksi:cut]
-lcl:=in"e"(set(rat),[x:set(rat)]cutprop(x),ksi):set(rat)
-[x0:rat]
-lrt:=in(x0,lcl(ksi)):'prop'
-urt:=not(in(x0,lcl(ksi))):'prop'
-ksi@clcl:=inp(set(rat),[x:set(rat)]cutprop(x),ksi):cutprop(lcl(ksi))
-clcl1:=and3e1(cutprop1(lcl),cutprop2(lcl),cutprop3(lcl),clcl):cutprop1(lcl(ksi))
-clcl2:=and3e2(cutprop1(lcl),cutprop2(lcl),cutprop3(lcl),clcl):cutprop2(lcl(ksi))
-clcl3:=and3e3(cutprop1(lcl),cutprop2(lcl),cutprop3(lcl),clcl):cutprop3(lcl(ksi))
-clcl1a:=ande1(cutprop1a(lcl),cutprop1b(lcl),clcl1):cutprop1a(lcl(ksi))
-clcl1b:=ande2(cutprop1a(lcl),cutprop1b(lcl),clcl1):cutprop1b(lcl(ksi))
-[p:'prop'][p1:[x:rat][t:lrt(ksi,x)]p]
-cutapp1a:=nonemptyapp(rat,lcl,clcl1a,p,p1):p
-+*iii1
-ksi@t1:=th1"l.some"(rat,[x:rat]lrt(ksi,x),clcl1b):some([x:rat]urt(ksi,x))
--iii1
-p@[p1:[x:rat][t:urt(ksi,x)]p]
-cutapp1b:=someapp(rat,[x:rat]urt(ksi,x),t1".iii1",p,p1):p
-ksi@[x0:rat][lx:lrt(ksi,x0)]
-+*iii1
-lx@t2:=mp(lrt(ksi,x0),cutprop2a(lcl,x0),lx,<x0>clcl2):cutprop2a(lcl,x0)
--iii1
-lx@[y0:rat][uy:urt(ksi,y0)]
-cutapp2a:=mp(urt(ksi,y0),less(x0,y0),uy,<y0>t2".iii1"):less(x0,y0)
-cutapp2b:=satz83(x0,y0,cutapp2a):more(y0,x0)
-+*iii1
-lx@t3:=th4"l.some"(rat,[x:rat]max(lcl,x),clcl3,x0):not(max(lcl,x0))
-t4:=th4"l.and"(ub(lcl,x0),lrt(ksi,x0),t3,lx):not(ub(lcl,x0))
-t5:=th1"l.some"(rat,[x:rat]ubprop(lcl,x0,x),t4):some([x:rat]not(ubprop(lcl,x0,x)))
--iii1
-lx@[p:'prop'][p1:[y:rat][t:lrt(ksi,y)][u:less(x0,y)]p][y0:rat][n:not(ubprop".iii1"(lcl,x0,y0))]
-+*iii1
-n@t6:=th5"l.imp"(lrt(ksi,y0),moreis(x0,y0),n):lrt(ksi,y0)
-t7:=th6"l.imp"(lrt(ksi,y0),moreis(x0,y0),n):not(moreis(x0,y0))
-t8:=satz81j(x0,y0,t7):less(x0,y0)
-t9:=<t8><t6><y0>p1:p
--iii1
-p1@cutapp3:=someapp(rat,[y:rat]not(ubprop".iii1"(lcl,x0,y)),t5".iii1",p,[y:rat][t:not(ubprop".iii1"(lcl,x0,y))]t9".iii1"(y,t)):p
-s@[x0:rat][i:in(x0,s)][y0:rat][n:not(in(y0,s))]
-+*iii1
-n@t10:=andi(cutprop1a,cutprop1b,nonemptyi(rat,s,x0,i),th1"l.all"(rat,[x:rat]in(x,s),y0,n)):cutprop1
--iii1
-s@[n:[x:rat]not(max(s,x))]
-+*iii1
-n@t11:=th5"l.some"(rat,[x:rat]max(s,x),n):cutprop3
--iii1
-s@[x0:rat][i:in(x0,s)][y0:rat][n:not(in(y0,s))][l:[x:rat][t:in(x,s)][y:rat][u:not(in(y,s))]less(x,y)][m:[x:rat]not(max(s,x))]
-cut1:=and3i(cutprop1,cutprop2,cutprop3,t10".iii1"(x0,i,y0,n),l,t11".iii1"(m)):cutprop(s)
-+rp
-ksi@[eta:cut]
-is:=is"e"(cut,ksi,eta):'prop'
-nis:=not(is(ksi,eta)):'prop'
-[i:is(ksi,eta)]
-ise:=isini(set(rat),[x:set(rat)]cutprop(x),ksi,eta,i):is"e"(set(rat),lcl(ksi),lcl(eta))
-[x0:rat][lx:lrt(ksi,x0)]
-ise1:=issete1(rat,lcl(ksi),lcl(eta),ise,x0,lx):lrt(eta,x0)
-eta@[i:is"e"(set(rat),lcl(ksi),lcl(eta))]
-isi:=isine(set(rat),[x:set(rat)]cutprop(x),ksi,eta,i):is(ksi,eta)
-eta@[l:[x:rat][t:lrt(ksi,x)]lrt(eta,x)][k:[x:rat][t:lrt(eta,x)]lrt(ksi,x)]
-isi1:=isi(isseti(rat,lcl(ksi),lcl(eta),l,k)):is(ksi,eta)
-@[s:set(rat)][cs:cutprop(s)]
-cutof:=out(set(rat),[x:set(rat)]cutprop(x),s,cs):cut
-[x0:rat][i:in(x0,s)]
-ine:=issete1(rat,s,lcl(cutof(s,cs)),isinout(set(rat),[x:set(rat)]cutprop(x),s,cs),x0,i):lrt(cutof(s,cs),x0)
-x0@[lx:lrt(cutof(s,cs),x0)]
-ini:=issete2(rat,s,lcl(cutof(s,cs)),isinout(set(rat),[x:set(rat)]cutprop(x),s,cs),x0,lx):in(x0,s)
-s@[t:set(rat)][cs:cutprop(s)][ct:cutprop(t)][i:[x:rat][u:in(x,s)]in(x,t)][j:[x:rat][u:in(x,t)]in(x,s)]
-isi2:=isouti(set(rat),[x:set(rat)]cutprop(x),s,cs,t,ct,isseti(rat,s,t,i,j)):is(cutof(s,cs),cutof(t,ct))
-@[p:[x:cut]'prop']
-all:=all"l"(cut,p):'prop'
-some:=some"l"(cut,p):'prop'
-one:=one"e"(cut,p):'prop'
-ksi@satz116:=refis(cut,ksi):is(ksi,ksi)
-eta@[i:is(ksi,eta)]
-satz117:=symis(cut,ksi,eta,i):is(eta,ksi)
-eta@[zeta:cut][i:is(ksi,eta)][j:is(eta,zeta)]
-satz118:=tris(cut,ksi,eta,zeta,i,j):is(ksi,zeta)
-+1119
-@[x0:rat][y0:rat][m:more(x0,y0)]
-t1:=ec3e23(is"rt"(x0,y0),more(x0,y0),less(x0,y0),satz81b(x0,y0),m):not(less(x0,y0))
--1119
-ksi@[x0:rat][ux:urt(ksi,x0)][y0:rat][m:more(y0,x0)]
-satz119:=th3"l.imp"(lrt(ksi,y0),less(y0,x0),t1".1119"(y0,x0,m),[t:lrt(ksi,y0)]cutapp2a(y0,t,x0,ux)):urt(ksi,y0)
-y0@[l:less(x0,y0)]
-satz119a:=satz119(satz83(x0,y0,l)):urt(ksi,y0)
-+1120
-@[x0:rat][y0:rat][l:less(x0,y0)]
-t1:=ec3e32(is"rt"(x0,y0),more(x0,y0),less(x0,y0),satz81b(x0,y0),l):not(more(x0,y0))
--1120
-ksi@[x0:rat][lx:lrt(ksi,x0)][y0:rat][l:less(y0,x0)]
-satz120:=th7"l.imp"(lrt(ksi,y0),more(y0,x0),t1".1120"(y0,x0,l),[t:urt(ksi,y0)]cutapp2b(x0,lx,y0,t)):lrt(ksi,y0)
-y0@[m:more(x0,y0)]
-satz120a:=satz120(satz82(x0,y0,m)):lrt(ksi,y0)
--rp
-s@[i:[x:rat][t:in(x,s)][y:rat][u:less(y,x)]in(y,s)][x0:rat][j:in(x0,s)][y0:rat][n:not(in(y0,s))]
-+*iii1
-n@t12:=<y0><j><x0>i:[u:less(y0,x0)]in(y0,s)
-t13:=th3"l.imp"(less(y0,x0),in(y0,s),n,t12):not(less(y0,x0))
-t14:=satz81f(y0,x0,t13):moreis(y0,x0)
--iii1
-n@[k:is(y0,x0)]
-+*iii1
-k@t15:=isp1(rat,[x:rat]in(x,s),x0,y0,j,k):in(y0,s)
-n@t16:=th3"l.imp"(is(y0,x0),in(y0,s),n,[t:is(y0,x0)]t15(t)):nis(y0,x0)
-t17:=ore1(more(y0,x0),is(y0,x0),t14,t16):more(y0,x0)
-t18:=satz82(y0,x0,t17):less(x0,y0)
-i@t19:=[x:rat][t:in(x,s)][y:rat][u:not(in(y,s))]t18(x,t,y,u):cutprop2
--iii1
-s@[s1:[x:rat][t:in(x,s)]some([y:rat]and(in(y,s),more(y,x)))][x0:rat][i:in(x0,s)]
-+*iii1
-i@t20:=<i><x0>s1:some([y:rat]and(in(y,s),more(y,x0)))
--iii1
-i@[y0:rat][a:and(in(y0,s),more(y0,x0))]
-+*iii1
-a@t21:=ande1(in(y0,s),more(y0,x0),a):in(y0,s)
-t22:=ande2(in(y0,s),more(y0,x0),a):more(y0,x0)
-t23:=satz81g(y0,x0,t22):not(lessis(y0,x0))
-t24:=th3"l.imp"(moreis(x0,y0),lessis(y0,x0),t23,[t:moreis(x0,y0)]satz84(x0,y0,t)):not(moreis(x0,y0))
-t25:=th4"l.imp"(in(y0,s),moreis(x0,y0),t21,t24):not(ubprop(x0,y0))
-t26:=th1"l.all"(rat,[y:rat]ubprop(x0,y),y0,t25):not(ub(s,x0))
-t27:=th1"l.and"(ub(s,x0),in(x0,s),t26):not(max(s,x0))
-i@t28:=someapp(rat,[y:rat]and(in(y,s),more(y,x0)),t20,not(max(s,x0)),[y:rat][t:and(in(y,s),more(y,x0))]t27(y,t)):not(max(s,x0))
--iii1
-x0@[n:not(in(x0,s))]
-+*iii1
-n@t29:=th2"l.and"(ub(x0),in(x0,s),n):not(max(s,x0))
-x0@t30:=th1"l.imp"(in(x0,s),not(max(s,x0)),[u:in(x0,s)]t28(u),[u:not(in(x0,s))]t29(u)):not(max(s,x0))
-s1@t31:=t11([x:rat]t30(x)):cutprop3
--iii1
-s@[x0:rat][i:in(x0,s)][y0:rat][n:not(in(y0,s))][j:[x:rat][t:in(x,s)][y:rat][u:less(y,x)]in(y,s)][s1:[x:rat][t:in(x,s)]some([y:rat]and(in(y,s),more(y,x)))]
-cut2:=and3i(cutprop1,cutprop2,cutprop3,t10".iii1"(x0,i,y0,n),t19".iii1"(j),t31".iii1"(s1)):cutprop(s)
-+*rp
-eta@more:=some"rt"([x:rat]and(lrt(ksi,x),urt(eta,x))):'prop'
-[m:more(ksi,eta)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]p][x0:rat][a:and(lrt(ksi,x0),urt(eta,x0))]
-+iii2
-t1:=ande1(lrt(ksi,x0),urt(eta,x0),a):lrt(ksi,x0)
-t2:=ande2(lrt(ksi,x0),urt(eta,x0),a):urt(eta,x0)
-t3:=<t2><t1><x0>p1:p
--iii2
-p1@moreapp:=someapp(rat,[x:rat]and(lrt(ksi,x),urt(eta,x)),m,p,[x:rat][t:and(lrt(ksi,x),urt(eta,x))]t3".iii2"(x,t)):p
-eta@less:=some"rt"([x:rat]and(urt(ksi,x),lrt(eta,x))):'prop'
-[l:less(ksi,eta)][p:'prop'][p1:[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]p][x0:rat][a:and(urt(ksi,x0),lrt(eta,x0))]
-+*iii2
-a@t4:=ande1(urt(ksi,x0),lrt(eta,x0),a):urt(ksi,x0)
-t5:=ande2(urt(ksi,x0),lrt(eta,x0),a):lrt(eta,x0)
-t6:=<t5><t4><x0>p1:p
--iii2
-p1@lessapp:=someapp(rat,[x:rat]and(urt(ksi,x),lrt(eta,x)),l,p,[x:rat][t:and(urt(ksi,x),lrt(eta,x))]t6".iii2"(x,t)):p
-eta@[m:more(ksi,eta)]
-+2121
-[x0:rat][lx:lrt(ksi,x0)][ux:urt(eta,x0)]
-t1:=andi(urt(eta,x0),lrt(ksi,x0),ux,lx):and(urt(eta,x0),lrt(ksi,x0))
-t2:=somei(rat,[x:rat]and(urt(eta,x),lrt(ksi,x)),x0,t1):less(eta,ksi)
--2121
-satz121:=moreapp(m,less(eta,ksi),[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]t2".2121"(x,t,u)):less(eta,ksi)
-eta@[l:less(ksi,eta)]
-+2122
-[x0:rat][ux:urt(ksi,x0)][lx:lrt(eta,x0)]
-t1:=andi(lrt(eta,x0),urt(ksi,x0),lx,ux):and(lrt(eta,x0),urt(ksi,x0))
-t2:=somei(rat,[x:rat]and(lrt(eta,x),urt(ksi,x)),x0,t1):more(eta,ksi)
--2122
-satz122:=lessapp(l,more(eta,ksi),[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]t2".2122"(x,t,u)):more(eta,ksi)
-+2123
-eta@[m:more(ksi,eta)][x0:rat][lx:lrt(ksi,x0)][ux:urt(eta,x0)]
-t1:=th3"st.isset"(rat,lcl(ksi),lcl(eta),x0,lx,ux):not(is"e"(set(rat),lcl(ksi),lcl(eta)))
-t2:=th3"l.imp"(is(ksi,eta),is"e"(set(rat),lcl(ksi),lcl(eta)),t1,[t:is(ksi,eta)]ise(ksi,eta,t)):not(is(ksi,eta))
-m@t3:=moreapp(ksi,eta,m,not(is(ksi,eta)),[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]t2(x,t,u)):not(is(ksi,eta))
-eta@t4:=th2"l.ec"(is(ksi,eta),more(ksi,eta),[t:more(ksi,eta)]t3(t)):ec(is(ksi,eta),more(ksi,eta))
-[l:less(ksi,eta)][x0:rat][ux:urt(ksi,x0)][lx:lrt(eta,x0)]
-t5:=th4"st.isset"(rat,lcl(eta),lcl(ksi),x0,lx,ux):not(is"e"(set(rat),lcl(ksi),lcl(eta)))
-t6:=th3"l.imp"(is(ksi,eta),is"e"(set(rat),lcl(ksi),lcl(eta)),t5,[t:is(ksi,eta)]ise(ksi,eta,t)):not(is(ksi,eta))
-l@t7:=lessapp(ksi,eta,l,not(is(ksi,eta)),[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]t6(x,t,u)):not(is(ksi,eta))
-eta@t8:=th1"l.ec"(less(ksi,eta),is(ksi,eta),[t:less(ksi,eta)]t7(t)):ec(less(ksi,eta),is(ksi,eta))
-m@[l:less(ksi,eta)][x0:rat][lx:lrt(ksi,x0)][ux:urt(eta,x0)][y0:rat][uy:urt(ksi,y0)][ly:lrt(eta,y0)]
-t9:=cutapp2a(ksi,x0,lx,y0,uy):less"rt"(x0,y0)
-t10:=cutapp2b(eta,y0,ly,x0,ux):more"rt"(x0,y0)
-t11:=mp(less"rt"(x0,y0),con,t9,ec3e23(is"rt"(x0,y0),more"rt"(x0,y0),less"rt"(x0,y0),satz81b(x0,y0),t10)):con
-ux@t12:=lessapp(ksi,eta,l,con,[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]t11(x,t,u)):con
-l@t13:=moreapp(ksi,eta,m,con,[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]t12(x,t,u)):con
-m@t14:=[t:less(ksi,eta)]t13(t):not(less(ksi,eta))
-eta@t15:=th1"l.ec"(more(ksi,eta),less(ksi,eta),[t:more(ksi,eta)]t14(t)):ec(more(ksi,eta),less(ksi,eta))
-a:=th6"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),t4,t15,t8):ec3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-[i:is(ksi,eta)]
-t16:=or3i1(is(ksi,eta),more(ksi,eta),less(ksi,eta),i):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-eta@[n:nis(ksi,eta)]
-t17:=th3"l.imp"(is"e"(set(rat),lcl(ksi),lcl(eta)),is(ksi,eta),n,[t:is"e"(set(rat),lcl(ksi),lcl(eta))]isi(ksi,eta,t)):not(is"e"(set(rat),lcl(ksi),lcl(eta)))
-t18:=th5"st.isset"(rat,lcl(ksi),lcl(eta),t17):or(more(ksi,eta),more(eta,ksi))
-t19:=th8"l.or"(more(ksi,eta),more(eta,ksi),less(ksi,eta),t18,[t:more(eta,ksi)]satz121(eta,ksi,t)):or(more(ksi,eta),less(ksi,eta))
-t20:=th7"l.or3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),t19):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-eta@b:=th1"l.imp"(is(ksi,eta),or3(is(ksi,eta),more(ksi,eta),less(ksi,eta)),[t:is(ksi,eta)]t16(t),[t:nis(ksi,eta)]t20(t)):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
--2123
-eta@satz123:=orec3i(is(ksi,eta),more(ksi,eta),less(ksi,eta),b".2123",a".2123"):orec3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-satz123a:=orec3e1(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-satz123b:=orec3e2(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123):ec3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-moreis:=or(more(ksi,eta),is(ksi,eta)):'prop'
-lessis:=or(less(ksi,eta),is(ksi,eta)):'prop'
-[m:moreis(ksi,eta)]
-satz124:=th9"l.or"(more(ksi,eta),is(ksi,eta),less(eta,ksi),is(eta,ksi),m,[t:more(ksi,eta)]satz121(t),[t:is(ksi,eta)]symis(cut,ksi,eta,t)):lessis(eta,ksi)
-eta@[l:lessis(ksi,eta)]
-satz125:=th9"l.or"(less(ksi,eta),is(ksi,eta),more(eta,ksi),is(eta,ksi),l,[t:less(ksi,eta)]satz122(t),[t:is(ksi,eta)]symis(cut,ksi,eta,t)):moreis(eta,ksi)
-zeta@[i:is(ksi,eta)][m:more(ksi,zeta)]
-ismore1:=isp(cut,[u:cut]more(u,zeta),ksi,eta,m,i):more(eta,zeta)
-i@[m:more(zeta,ksi)]
-ismore2:=isp(cut,[u:cut]more(zeta,u),ksi,eta,m,i):more(zeta,eta)
-i@[l:less(ksi,zeta)]
-isless1:=isp(cut,[u:cut]less(u,zeta),ksi,eta,l,i):less(eta,zeta)
-i@[l:less(zeta,ksi)]
-isless2:=isp(cut,[u:cut]less(zeta,u),ksi,eta,l,i):less(zeta,eta)
-i@[m:moreis(ksi,zeta)]
-ismoreis1:=isp(cut,[u:cut]moreis(u,zeta),ksi,eta,m,i):moreis(eta,zeta)
-i@[m:moreis(zeta,ksi)]
-ismoreis2:=isp(cut,[u:cut]moreis(zeta,u),ksi,eta,m,i):moreis(zeta,eta)
-i@[l:lessis(ksi,zeta)]
-islessis1:=isp(cut,[u:cut]lessis(u,zeta),ksi,eta,l,i):lessis(eta,zeta)
-i@[l:lessis(zeta,ksi)]
-islessis2:=isp(cut,[u:cut]lessis(zeta,u),ksi,eta,l,i):lessis(zeta,eta)
-eta@[i:is(ksi,eta)]
-moreisi2:=ori2(more(ksi,eta),is(ksi,eta),i):moreis(ksi,eta)
-lessisi2:=ori2(less(ksi,eta),is(ksi,eta),i):lessis(ksi,eta)
-eta@[m:more(ksi,eta)]
-moreisi1:=ori1(more(ksi,eta),is(ksi,eta),m):moreis(ksi,eta)
-eta@[l:less(ksi,eta)]
-lessisi1:=ori1(less(ksi,eta),is(ksi,eta),l):lessis(ksi,eta)
-zeta@[upsilon:cut][i:is(ksi,eta)][j:is(zeta,upsilon)][m:more(ksi,zeta)]
-ismore12:=ismore2(zeta,upsilon,eta,j,ismore1(ksi,eta,zeta,i,m)):more(eta,upsilon)
-j@[l:less(ksi,zeta)]
-isless12:=isless2(zeta,upsilon,eta,j,isless1(ksi,eta,zeta,i,l)):less(eta,upsilon)
-j@[m:moreis(ksi,zeta)]
-ismoreis12:=ismoreis2(zeta,upsilon,eta,j,ismoreis1(ksi,eta,zeta,i,m)):moreis(eta,upsilon)
-j@[l:lessis(ksi,zeta)]
-islessis12:=islessis2(zeta,upsilon,eta,j,islessis1(ksi,eta,zeta,i,l)):lessis(eta,upsilon)
-eta@[m:moreis(ksi,eta)]
-satz123c:=th7"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,comor(more(ksi,eta),is(ksi,eta),m)):not(less(ksi,eta))
-eta@[l:lessis(ksi,eta)]
-satz123d:=th9"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,l):not(more(ksi,eta))
-eta@[n:not(more(ksi,eta))]
-satz123e:=th2"l.or3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123a,n):lessis(ksi,eta)
-eta@[n:not(less(ksi,eta))]
-satz123f:=comor(is(ksi,eta),more(ksi,eta),th3"l.or3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123a,n)):moreis(ksi,eta)
-eta@[m:more(ksi,eta)]
-satz123g:=th3"l.or"(less(ksi,eta),is(ksi,eta),ec3e23(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,m),ec3e21(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,m)):not(lessis(ksi,eta))
-eta@[l:less(ksi,eta)]
-satz123h:=th3"l.or"(more(ksi,eta),is(ksi,eta),ec3e32(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,l),ec3e31(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,l)):not(moreis(ksi,eta))
-eta@[n:not(moreis(ksi,eta))]
-satz123j:=or3e3(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123a,th5"l.or"(more(ksi,eta),is(ksi,eta),n),th4"l.or"(more(ksi,eta),is(ksi,eta),n)):less(ksi,eta)
-eta@[n:not(lessis(ksi,eta))]
-satz123k:=or3e2(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123a,th4"l.or"(less(ksi,eta),is(ksi,eta),n),th5"l.or"(less(ksi,eta),is(ksi,eta),n)):more(ksi,eta)
-zeta@[l:less(ksi,eta)][k:less(eta,zeta)]
-+2126
-[x0:rat][ux:urt(ksi,x0)][lx:lrt(eta,x0)][y0:rat][uy:urt(eta,y0)][ly:lrt(zeta,y0)]
-t1:=cutapp2a(eta,x0,lx,y0,uy):less"rt"(x0,y0)
-t2:=satz119a(ksi,x0,ux,y0,t1):urt(ksi,y0)
-t3:=andi(urt(ksi,y0),lrt(zeta,y0),t2,ly):and(urt(ksi,y0),lrt(zeta,y0))
-t4:=somei(rat,[x:rat]and(urt(ksi,x),lrt(zeta,x)),y0,t3):less(ksi,zeta)
-lx@t5:=lessapp(eta,zeta,k,less(ksi,zeta),[x:rat][t:urt(eta,x)][u:lrt(zeta,x)]t4(x,t,u)):less(ksi,zeta)
--2126
-satz126:=lessapp(ksi,eta,l,less(ksi,zeta),[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]t5".2126"(x,t,u)):less(ksi,zeta)
-trless:=satz126:less(ksi,zeta)
-zeta@[m:more(ksi,eta)][n:more(eta,zeta)]
-trmore:=satz122(zeta,ksi,satz126(zeta,eta,ksi,satz121(eta,zeta,n),satz121(ksi,eta,m))):more(ksi,zeta)
-zeta@[l:lessis(ksi,eta)][k:less(eta,zeta)]
-satz127a:=orapp(less(ksi,eta),is(ksi,eta),less(ksi,zeta),l,[u:less(ksi,eta)]trless(u,k),[u:is(ksi,eta)]isless1(eta,ksi,zeta,symis(cut,ksi,eta,u),k)):less(ksi,zeta)
-zeta@[l:less(ksi,eta)][k:lessis(eta,zeta)]
-satz127b:=orapp(less(eta,zeta),is(eta,zeta),less(ksi,zeta),k,[u:less(eta,zeta)]trless(l,u),[u:is(eta,zeta)]isless2(eta,zeta,ksi,u,l)):less(ksi,zeta)
-zeta@[m:moreis(ksi,eta)][n:more(eta,zeta)]
-satz127c:=satz122(zeta,ksi,satz127b(zeta,eta,ksi,satz121(eta,zeta,n),satz124(ksi,eta,m))):more(ksi,zeta)
-zeta@[m:more(ksi,eta)][n:moreis(eta,zeta)]
-satz127d:=satz122(zeta,ksi,satz127a(zeta,eta,ksi,satz124(eta,zeta,n),satz121(ksi,eta,m))):more(ksi,zeta)
-zeta@[l:lessis(ksi,eta)][k:lessis(eta,zeta)]
-+2128
-[i:is(ksi,eta)][j:is(eta,zeta)]
-t1:=lessisi2(ksi,zeta,tris(cut,ksi,eta,zeta,i,j)):lessis(ksi,zeta)
-i@[j:less(eta,zeta)]
-t2:=lessisi1(ksi,zeta,satz127a(l,j)):lessis(ksi,zeta)
-i@t3:=orapp(less(eta,zeta),is(eta,zeta),lessis(ksi,zeta),k,[t:less(eta,zeta)]t2(t),[t:is(eta,zeta)]t1(t)):lessis(ksi,zeta)
-k@[j:less(ksi,eta)]
-t4:=lessisi1(ksi,zeta,satz127b(j,k)):lessis(ksi,zeta)
--2128
-satz128:=orapp(less(ksi,eta),is(ksi,eta),lessis(ksi,zeta),l,[t:less(ksi,eta)]t4".2128"(t),[t:is(ksi,eta)]t3".2128"(t)):lessis(ksi,zeta)
-trlessis:=satz128:lessis(ksi,zeta)
-zeta@[m:moreis(ksi,eta)][n:moreis(eta,zeta)]
-trmoreis:=satz125(zeta,ksi,satz128(zeta,eta,ksi,satz124(eta,zeta,n),satz124(ksi,eta,m))):moreis(ksi,zeta)
-eta@[z0:rat][x0:rat][y0:rat]
-sumprop1:=and3(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,pl(x0,y0))):'prop'
-z0@sumprop:=some"rt"([x:rat]some"rt"([y:rat]sumprop1(z0,x,y))):'prop'
-eta@sum:=setof(rat,[z:rat]sumprop(z)):set(rat)
-x0@[lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,pl(x0,y0))]
-+iii3
-t1:=and3i(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,pl(x0,y0)),lx,ly,i):sumprop1(z0,x0,y0)
-t2:=somei(rat,[y:rat]sumprop1(z0,x0,y),y0,t1):some"rt"([y:rat]sumprop1(z0,x0,y))
-t3:=somei(rat,[x:rat]some"rt"([y:rat]sumprop1(z0,x,y)),x0,t2):sumprop(z0)
--iii3
-sum1:=estii(rat,[z:rat]sumprop(z),z0,t3".iii3"):in(z0,sum)
-z0@[i:in(z0,sum)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,pl(x,y))]p]
-+*iii3
-p1@t4:=estie(rat,[z:rat]sumprop(z),z0,i):sumprop(z0)
--iii3
-p1@[x0:rat][px:some"rt"([y:rat]sumprop1(z0,x0,y))][y0:rat][py:sumprop1(z0,x0,y0)]
-+*iii3
-py@t5:=and3e1(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,pl(x0,y0)),py):lrt(ksi,x0)
-t6:=and3e2(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,pl(x0,y0)),py):lrt(eta,y0)
-t7:=and3e3(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,pl(x0,y0)),py):is"rt"(z0,pl(x0,y0))
-t8:=<t7><t6><y0><t5><x0>p1:p
-px@t9:=someapp(rat,[y:rat]sumprop1(z0,x0,y),px,p,[y:rat][t:sumprop1(z0,x0,y)]t8(y,t)):p
--iii3
-p1@sumapp:=someapp(rat,[x:rat]some"rt"([y:rat]sumprop1(z0,x,y)),t4".iii3",p,[x:rat][t:some"rt"([y:rat]sumprop1(z0,x,y))]t9".iii3"(x,t)):p
-eta@[x1:rat][ux:urt(ksi,x1)][y1:rat][uy:urt(eta,y1)]
-+3129
-[z0:rat][i:in(z0,sum)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(z0,pl(x0,y0))]
-t1:=cutapp2a(ksi,x0,lx,x1,ux):less"rt"(x0,x1)
-t2:=cutapp2a(eta,y0,ly,y1,uy):less"rt"(y0,y1)
-t3:=isless1"rt"(pl(x0,y0),z0,pl(x1,y1),symis(rat,z0,pl(x0,y0),j),satz98a(x0,x1,y0,y1,t1,t2)):less"rt"(z0,pl(x1,y1))
-t4:=ec3e31(is"rt"(z0,pl(x1,y1)),more"rt"(z0,pl(x1,y1)),less"rt"(z0,pl(x1,y1)),satz81b(z0,pl(x1,y1)),t3):nis"rt"(z0,pl(x1,y1))
-i@t5:=sumapp(ksi,eta,z0,i,nis"rt"(z0,pl(x1,y1)),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,pl(x,y))]t4(x,t,y,u,v)):nis"rt"(z0,pl(x1,y1))
--3129
-satz129a:=th3"l.imp"(in(pl(x1,y1),sum),nis"rt"(pl(x1,y1),pl(x1,y1)),weli(is"rt"(pl(x1,y1),pl(x1,y1)),refis(rat,pl(x1,y1))),[t:in(pl(x1,y1),sum)]t5".3129"(pl(x1,y1),t)):not(in(pl(x1,y1),sum))
-+*3129
-eta@[u0:rat][i:in(u0,sum)][z0:rat][l:less"rt"(z0,u0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(u0,pl(x0,y0))]
-t6:=isless2"rt"(u0,pl(x0,y0),z0,j,l):less"rt"(z0,pl(x0,y0))
-z1:=ov(z0,pl(x0,y0)):rat
-t7:=isless12"rt"(z0,ts(z1,pl(x0,y0)),pl(x0,y0),ts(1rt,pl(x0,y0)),satz110f(z0,pl(x0,y0)),example1d(pl(x0,y0)),t6):less"rt"(ts(z1,pl(x0,y0)),ts(1rt,pl(x0,y0)))
-t8:=satz106c(z1,1rt,pl(x0,y0),t7):less"rt"(z1,1rt)
-t9:=isless2"rt"(ts(x0,1rt),x0,ts(x0,z1),example1a(x0),satz105f(z1,1rt,x0,t8)):less"rt"(ts(x0,z1),x0)
-t10:=isless2"rt"(ts(y0,1rt),y0,ts(y0,z1),example1a(y0),satz105f(z1,1rt,y0,t8)):less"rt"(ts(y0,z1),y0)
-t11:=satz120(ksi,x0,lx,ts(x0,z1),t9):lrt(ksi,ts(x0,z1))
-t12:=satz120(eta,y0,ly,ts(y0,z1),t10):lrt(eta,ts(y0,z1))
-t13:=tris(rat,pl(ts(x0,z1),ts(y0,z1)),ts(pl(x0,y0),z1),z0,distpt1(x0,y0,z1),satz110c(z0,pl(x0,y0))):is"rt"(pl(ts(x0,z1),ts(y0,z1)),z0)
-t14:=symis(rat,pl(ts(x0,z1),ts(y0,z1)),z0,t13):is"rt"(z0,pl(ts(x0,z1),ts(y0,z1)))
-t15:=sum1(ksi,eta,z0,ts(x0,z1),t11,ts(y0,z1),t12,t14):in(z0,sum)
-l@t16:=sumapp(ksi,eta,u0,i,in(z0,sum),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(u0,pl(x,y))]t15(x,t,y,u,v)):in(z0,sum)
-eta@[z0:rat][i:in(z0,sum)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(z0,pl(x0,y0))][x1:rat][lx1:lrt(ksi,x1)][l:less"rt"(x0,x1)]
-t17:=sum1(ksi,eta,pl(x1,y0),x1,lx1,y0,ly,refis(rat,pl(x1,y0))):in(pl(x1,y0),sum)
-t18:=satz96a(x1,x0,y0,satz83(x0,x1,l)):more"rt"(pl(x1,y0),pl(x0,y0))
-t19:=ismore2"rt"(pl(x0,y0),z0,pl(x1,y0),symis(rat,z0,pl(x0,y0),j),t18):more"rt"(pl(x1,y0),z0)
-t20:=andi(in(pl(x1,y0),sum),more"rt"(pl(x1,y0),z0),t17,t19):and(in(pl(x1,y0),sum),more"rt"(pl(x1,y0),z0))
-t21:=somei(rat,[y:rat]and(in(y,sum),more"rt"(y,z0)),pl(x1,y0),t20):some"rt"([y:rat]and(in(y,sum),more"rt"(y,z0)))
-j@t22:=cutapp3(ksi,x0,lx,some"rt"([y:rat]and(in(y,sum),more"rt"(y,z0))),[x:rat][t:lrt(ksi,x)][u:less"rt"(x0,x)]t21(x,t,u)):some"rt"([y:rat]and(in(y,sum),more"rt"(y,z0)))
-i@t23:=sumapp(ksi,eta,z0,i,some"rt"([y:rat]and(in(y,sum),more"rt"(y,z0))),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,pl(x,y))]t22(x,t,y,u,v)):some"rt"([y:rat]and(in(y,sum),more"rt"(y,z0)))
-eta@[x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][x1:rat][ux:urt(ksi,x1)][y1:rat][uy:urt(eta,y1)]
-t24:=cut2(sum,pl(x0,y0),sum1(ksi,eta,pl(x0,y0),x0,lx,y0,ly,refis(rat,pl(x0,y0))),pl(x1,y1),satz129a(x1,ux,y1,uy),[x:rat][t:in(x,sum)][y:rat][u:less"rt"(y,x)]t16(x,t,y,u),[x:rat][t:in(x,sum)]t23(x,t)):cutprop(sum)
-ux@t25:=cutapp1b(eta,cutprop(sum),[y:rat][t:urt(eta,y)]t24(y,t)):cutprop(sum)
-ly@t26:=cutapp1b(ksi,cutprop(sum),[x:rat][t:urt(ksi,x)]t25(x,t)):cutprop(sum)
-lx@t27:=cutapp1a(eta,cutprop(sum),[y:rat][t:lrt(eta,y)]t26(y,t)):cutprop(sum)
--3129
-eta@satz129:=cutapp1a(ksi,cutprop(sum),[x:rat][t:lrt(ksi,x)]t27".3129"(x,t)):cutprop(sum)
-pl:=cutof(sum,satz129):cut
-[z0:rat][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,pl"rt"(x0,y0))]
-lrtpl:=ine(sum,satz129,z0,sum1(z0,x0,lx,y0,ly,i)):lrt(pl(ksi,eta),z0)
-eta@[z0:rat][x0:rat][ux:urt(ksi,x0)][y0:rat][uy:urt(eta,y0)][i:is"rt"(z0,pl"rt"(x0,y0))]
-+*iii3
-i@t10:=isp1(rat,[x:rat]not(in(x,sum)),pl"rt"(x0,y0),z0,satz129a(x0,ux,y0,uy),i):not(in(z0,sum))
--iii3
-i@urtpl:=th3"l.imp"(lrt(pl(ksi,eta),z0),in(z0,sum),t10".iii3",[t:lrt(pl(ksi,eta),z0)]ini(sum,satz129,z0,t)):urt(pl(ksi,eta),z0)
-eta@[z0:rat][lz:lrt(pl(ksi,eta),z0)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,pl"rt"(x,y))]p]
-+*iii3
-p1@t11:=ini(sum,satz129,z0,lz):in(z0,sum)
--iii3
-p1@plapp:=sumapp(z0,t11".iii3",p,p1):p
-zeta@[i:is(ksi,eta)]
-ispl1:=isf(cut,cut,[u:cut]pl(u,zeta),ksi,eta,i):is(pl(ksi,zeta),pl(eta,zeta))
-ispl2:=isf(cut,cut,[u:cut]pl(zeta,u),ksi,eta,i):is(pl(zeta,ksi),pl(zeta,eta))
-upsilon@[i:is(ksi,eta)][j:is(zeta,upsilon)]
-ispl12:=tris(cut,pl(ksi,zeta),pl(eta,zeta),pl(eta,upsilon),ispl1(i),ispl2(zeta,upsilon,eta,j)):is(pl(ksi,zeta),pl(eta,upsilon))
-+3130
-eta@[z0:rat][lz:lrt(pl(ksi,eta),z0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,pl"rt"(x0,y0))]
-t1:=tris(rat,z0,pl"rt"(x0,y0),pl"rt"(y0,x0),i,compl(x0,y0)):is"rt"(z0,pl"rt"(y0,x0))
-t2:=lrtpl(eta,ksi,z0,y0,ly,x0,lx,t1):lrt(pl(eta,ksi),z0)
-lz@t3:=plapp(ksi,eta,z0,lz,lrt(pl(eta,ksi),z0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,pl"rt"(x,y))]t2(x,t,y,u,v)):lrt(pl(eta,ksi),z0)
--3130
-eta@satz130:=isi1(pl(ksi,eta),pl(eta,ksi),[x:rat][t:lrt(pl(ksi,eta),x)]t3".3130"(x,t),[x:rat][t:lrt(pl(eta,ksi),x)]t3".3130"(eta,ksi,x,t)):is(pl(ksi,eta),pl(eta,ksi))
-compl:=satz130:is(pl(ksi,eta),pl(eta,ksi))
-+3131
-zeta@[u0:rat][lu:lrt(pl(pl(ksi,eta),zeta),u0)][v0:rat][lv:lrt(pl(ksi,eta),v0)][z0:rat][lz:lrt(zeta,z0)][i:is"rt"(u0,pl"rt"(v0,z0))][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(v0,pl"rt"(x0,y0))]
-t1:=tr3is(rat,u0,pl"rt"(v0,z0),pl"rt"(pl"rt"(x0,y0),z0),pl"rt"(x0,pl"rt"(y0,z0)),i,ispl1"rt"(v0,pl"rt"(x0,y0),z0,j),asspl1(x0,y0,z0)):is"rt"(u0,pl"rt"(x0,pl"rt"(y0,z0)))
-t2:=lrtpl(eta,zeta,pl"rt"(y0,z0),y0,ly,z0,lz,refis(rat,pl"rt"(y0,z0))):lrt(pl(eta,zeta),pl"rt"(y0,z0))
-t3:=lrtpl(ksi,pl(eta,zeta),u0,x0,lx,pl"rt"(y0,z0),t2,t1):lrt(pl(ksi,pl(eta,zeta)),u0)
-i@t4:=plapp(ksi,eta,v0,lv,lrt(pl(ksi,pl(eta,zeta)),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(v0,pl"rt"(x,y))]t3(x,t,y,u,v)):lrt(pl(ksi,pl(eta,zeta)),u0)
-lu@t5:=plapp(pl(ksi,eta),zeta,u0,lu,lrt(pl(ksi,pl(eta,zeta)),u0),[x:rat][t:lrt(pl(ksi,eta),x)][y:rat][u:lrt(zeta,y)][v:is"rt"(u0,pl"rt"(x,y))]t4(x,t,y,u,v)):lrt(pl(ksi,pl(eta,zeta)),u0)
-u0@[lu:lrt(pl(ksi,pl(eta,zeta)),u0)][x0:rat][lx:lrt(ksi,x0)][v0:rat][lv:lrt(pl(eta,zeta),v0)][i:is"rt"(u0,pl"rt"(x0,v0))][y0:rat][ly:lrt(eta,y0)][z0:rat][lz:lrt(zeta,z0)][j:is"rt"(v0,pl"rt"(y0,z0))]
-t6:=tr3is(rat,u0,pl"rt"(x0,v0),pl"rt"(x0,pl"rt"(y0,z0)),pl"rt"(pl"rt"(x0,y0),z0),i,ispl2"rt"(v0,pl"rt"(y0,z0),x0,j),asspl2(x0,y0,z0)):is"rt"(u0,pl"rt"(pl"rt"(x0,y0),z0))
-t7:=lrtpl(ksi,eta,pl"rt"(x0,y0),x0,lx,y0,ly,refis(rat,pl"rt"(x0,y0))):lrt(pl(ksi,eta),pl"rt"(x0,y0))
-t8:=lrtpl(pl(ksi,eta),zeta,u0,pl"rt"(x0,y0),t7,z0,lz,t6):lrt(pl(pl(ksi,eta),zeta),u0)
-i@t9:=plapp(eta,zeta,v0,lv,lrt(pl(pl(ksi,eta),zeta),u0),[x:rat][t:lrt(eta,x)][y:rat][u:lrt(zeta,y)][v:is"rt"(v0,pl"rt"(x,y))]t8(x,t,y,u,v)):lrt(pl(pl(ksi,eta),zeta),u0)
-lu@t10:=plapp(ksi,pl(eta,zeta),u0,lu,lrt(pl(pl(ksi,eta),zeta),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(pl(eta,zeta),y)][v:is"rt"(u0,pl"rt"(x,y))]t9(x,t,y,u,v)):lrt(pl(pl(ksi,eta),zeta),u0)
--3131
-zeta@satz131:=isi1(pl(pl(ksi,eta),zeta),pl(ksi,pl(eta,zeta)),[x:rat][t:lrt(pl(pl(ksi,eta),zeta),x)]t5".3131"(x,t),[x:rat][t:lrt(pl(ksi,pl(eta,zeta)),x)]t10".3131"(x,t)):is(pl(pl(ksi,eta),zeta),pl(ksi,pl(eta,zeta)))
-asspl1:=satz131:is(pl(pl(ksi,eta),zeta),pl(ksi,pl(eta,zeta)))
-asspl2:=symis(cut,pl(pl(ksi,eta),zeta),pl(ksi,pl(eta,zeta)),satz131):is(pl(ksi,pl(eta,zeta)),pl(pl(ksi,eta),zeta))
-ksi@[a0:rat]
-+3132
-[x0:rat][y0:rat]
-prop1:=and(lrt(ksi,x0),urt(ksi,y0)):'prop'
-[p:prop1]
-t1:=cutapp2b(x0,ande1(lrt(ksi,x0),urt(ksi,y0),p),y0,ande2(lrt(ksi,x0),urt(ksi,y0),p)):more"rt"(y0,x0)
-prop2:=is"rt"(mn(y0,x0,t1),a0):'prop'
-y0@prop3:=and(prop1,[t:prop1]prop2(t)):'prop'
-a0@prop4:=some"rt"([x:rat]some"rt"([y:rat]prop3(x,y))):'prop'
-x0@[lx:lrt(ksi,x0)][y0:rat][uy:urt(ksi,y0)]
-t2:=cutapp2b(x0,lx,y0,uy):more"rt"(y0,x0)
-[n:nat][m:more"rt"(ts(rtofn(n),a0),mn(y0,x0,t2))]
-t3:=satz96d(ts(rtofn(n),a0),mn(y0,x0,t2),x0,m):more"rt"(pl"rt"(x0,ts(rtofn(n),a0)),pl"rt"(x0,mn(y0,x0,t2)))
-t4:=ismore2"rt"(pl"rt"(x0,mn(y0,x0,t2)),y0,pl"rt"(x0,ts(rtofn(n),a0)),satz101c(y0,x0,t2),t3):more"rt"(pl"rt"(x0,ts(rtofn(n),a0)),y0)
-t5:=satz119(y0,uy,pl"rt"(x0,ts(rtofn(n),a0)),t4):urt(pl"rt"(x0,ts(rtofn(n),a0)))
-t6:=somei(nat,[x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))),n,t5):some"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))))
-uy@t7:=someapp(nat,[x:nat]more"rt"(ts(rtofn(x),a0),mn(y0,x0,t2)),satz115(a0,mn(y0,x0,t2)),some"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0)))),[x:nat][t:more"rt"(ts(rtofn(x),a0),mn(y0,x0,t2))]t6(x,t)):some"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))))
-[u:nat][m:min"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))),u)]
-t8:=ande1(lb"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))),u),urt(pl"rt"(x0,ts(rtofn(u),a0))),m):lb"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))),u)
-t9:=ande2(lb"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))),u),urt(pl"rt"(x0,ts(rtofn(u),a0))),m):urt(pl"rt"(x0,ts(rtofn(u),a0)))
-[i:is"n"(u,1)]
-u0:=pl"rt"(x0,a0):rat
-t10:=tr3is(rat,ts(rtofn(u),a0),ts(1rt,a0),ts(a0,1rt),a0,ists1(rtofn(u),1rt,a0,isnert(u,1,i)),comts(1rt,a0),example1a(a0)):is"rt"(ts(rtofn(u),a0),a0)
-t11:=isp(rat,[x:rat]urt(pl"rt"(x0,x)),ts(rtofn(u),a0),a0,t9,t10):urt(ksi,u0)
-t12:=andi(lrt(ksi,x0),urt(ksi,u0),lx,t11):prop1(x0,u0)
-[p:prop1(x0,u0)]
-t13:=symis(rat,a0,mn(u0,x0,t1(x0,u0,p)),satz101g(u0,x0,a0,t1(x0,u0,p),refis(rat,u0))):prop2(x0,u0,p)
-i@t14:=andi(prop1(x0,u0),[t:prop1(x0,u0)]prop2(x0,u0,t),t12,[t:prop1(x0,u0)]t13(t)):prop3(x0,u0)
-t15:=somei(rat,[y:rat]prop3(x0,y),u0,t14):some"rt"([y:rat]prop3(x0,y))
-t16:=somei(rat,[x:rat]some"rt"([y:rat]prop3(x,y)),x0,t15):prop4
-m@[o:more"n"(u,1)]
-t17:=morei(rtofn(u),1rt,fr(u,1),fr(1,1),inclass(fr(u,1)),inclass(fr(1,1)),satz111d(u,1,o)):more"rt"(rtofn(u),1rt)
-um10:=mn(rtofn(u),1rt,t17):rat
-t18:=satz112g(rtofn(u),natrti(u),1rt,natrti(1),t17):natrt(um10)
-um1:=nofrt(um10,t18):nat
-v0:=pl"rt"(x0,ts(um10,a0)):rat
-w0:=pl"rt"(x0,ts(rtofn(u),a0)):rat
-t19:=isless2"rt"(pl"rt"(um10,1rt),rtofn(u),um10,satz101e(rtofn(u),1rt,t17),satz94a(um10,1rt)):less"rt"(um10,rtofn(u))
-t20:=lesse(um10,rtofn(u),fr(um1,1),fr(u,1),inclassn(um10,t18),inclass(fr(u,1)),t19):lessf(fr(um1,1),fr(u,1))
-t21:=satz111c(um1,u,t20):less"n"(um1,u)
-t22:=th3"l.imp"(lessis"n"(u,um1),moreis"n"(um1,u),satz10h(um1,u,t21),[t:lessis"n"(u,um1)]satz14(u,um1,t)):not(lessis"n"(u,um1))
-t23:=et(lrt(pl"rt"(x0,ts(rtofn(um1),a0))),th3"l.imp"(urt(pl"rt"(x0,ts(rtofn(um1),a0))),lessis"n"(u,um1),t22,<um1>t8)):lrt(pl"rt"(x0,ts(rtofn(um1),a0)))
-t24:=isp1(rat,[x:rat]lrt(pl"rt"(x0,ts(x,a0))),rtofn(um1),um10,t23,isrtn1(um10,t18)):lrt(ksi,v0)
-t25:=andi(lrt(ksi,v0),urt(ksi,w0),t24,t9):prop1(v0,w0)
-t26:=tr3is(rat,pl"rt"(ts(um10,a0),a0),pl"rt"(ts(um10,a0),ts(1rt,a0)),ts(pl"rt"(um10,1rt),a0),ts(rtofn(u),a0),ispl2"rt"(a0,ts(1rt,a0),ts(um10,a0),example1d(a0)),distpt1(um10,1rt,a0),ists1(pl"rt"(um10,1rt),rtofn(u),a0,satz101e(rtofn(u),1rt,t17))):is"rt"(pl"rt"(ts(um10,a0),a0),ts(rtofn(u),a0))
-t27:=tris(rat,pl"rt"(v0,a0),pl"rt"(x0,pl"rt"(ts(um10,a0),a0)),w0,asspl1"rt"(x0,ts(um10,a0),a0),ispl2"rt"(pl"rt"(ts(um10,a0),a0),ts(rtofn(u),a0),x0,t26)):is"rt"(pl"rt"(v0,a0),w0)
-[p:prop1(v0,w0)]
-t28:=symis(rat,a0,mn(w0,v0,t1(v0,w0,p)),satz101g(w0,v0,a0,t1(v0,w0,p),t27)):prop2(v0,w0,p)
-o@t29:=andi(prop1(v0,w0),[t:prop1(v0,w0)]prop2(v0,w0,t),t25,[t:prop1(v0,w0)]t28(t)):prop3(v0,w0)
-t30:=somei(rat,[y:rat]prop3(v0,y),w0,t29):some"rt"([y:rat]prop3(v0,y))
-t31:=somei(rat,[x:rat]some"rt"([y:rat]prop3(x,y)),v0,t30):prop4
-m@t32:=orapp(more"n"(u,1),is"n"(u,1),prop4,satz24(u),[t:more"n"(u,1)]t31(t),[t:is"n"(u,1)]t16(t)):prop4
-uy@t34:=someapp(nat,[x:nat]min"n"([y:nat]urt(pl"rt"(x0,ts(rtofn(y),a0))),x),satz27([y:nat]urt(pl"rt"(x0,ts(rtofn(y),a0))),t7),prop4,[x:nat][t:min"n"([y:nat]urt(pl"rt"(x0,ts(rtofn(y),a0))),x)]t32(x,t)):prop4
-lx@t35:=cutapp1b(prop4,[y:rat][t:urt(ksi,y)]t34(y,t)):prop4
--3132
-satz132:=cutapp1a(prop4".3132",[x:rat][t:lrt(ksi,x)]t35".3132"(x,t)):some"rt"([x:rat]some"rt"([y:rat]and(and(lrt(ksi,x),urt(ksi,y)),[t:and(lrt(ksi,x),urt(ksi,y))]is"rt"(mn(y,x,cutapp2b(x,ande1(lrt(ksi,x),urt(ksi,y),t),y,ande2(lrt(ksi,x),urt(ksi,y),t))),a0))))
-ksi@[p:'prop'][a0:rat][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:urt(ksi,y)][v:is"rt"(mn(y,x,cutapp2b(x,t,y,u)),a0)]p]
-+*3132
-p1@[x0:rat][s:some"rt"([y:rat]prop3(a0,x0,y))][y0:rat][p3:prop3(a0,x0,y0)]
-t36:=ande1(prop1(a0,x0,y0),[t:prop1(a0,x0,y0)]prop2(a0,x0,y0,t),p3):prop1(a0,x0,y0)
-t37:=ande2"l.r"(prop1(a0,x0,y0),[t:prop1(a0,x0,y0)]prop2(a0,x0,y0,t),p3):prop2(a0,x0,y0,t36)
-t38:=ande1(lrt(ksi,x0),urt(ksi,y0),t36):lrt(ksi,x0)
-t39:=ande2(lrt(ksi,x0),urt(ksi,y0),t36):urt(ksi,y0)
-t40:=satz101g(y0,x0,mn(y0,x0,cutapp2b(x0,t38,y0,t39)),t1(a0,x0,y0,t36),satz101c(y0,x0,cutapp2b(x0,t38,y0,t39))):is"rt"(mn(y0,x0,cutapp2b(x0,t38,y0,t39)),mn(y0,x0,t1(a0,x0,y0,t36)))
-t41:=tris(rat,mn(y0,x0,cutapp2b(x0,t38,y0,t39)),mn(y0,x0,t1(a0,x0,y0,t36)),a0,t40,t37):is"rt"(mn(y0,x0,cutapp2b(x0,t38,y0,t39)),a0)
-t42:=<t41><t39><y0><t38><x0>p1:p
-s@t43:=someapp(rat,[y:rat]prop3(a0,x0,y),s,p,[y:rat][t:prop3(a0,x0,y)]t42(y,t)):p
--3132
-p1@satz132app:=someapp(rat,[x:rat]some"rt"([y:rat]prop3".3132"(a0,x,y)),satz132(a0),p,[x:rat][t:some"rt"([y:rat]prop3".3132"(a0,x,y))]t43".3132"(x,t)):p
-+3133
-eta@[y0:rat][ly:lrt(eta,y0)][x0:rat][lx:lrt(ksi,x0)][u0:rat][uu:urt(ksi,u0)][i:is"rt"(mn(u0,x0,cutapp2b(x0,lx,u0,uu)),y0)]
-t1:=tris(rat,u0,pl"rt"(x0,mn(u0,x0,cutapp2b(x0,lx,u0,uu))),pl"rt"(x0,y0),satz101d(u0,x0,cutapp2b(x0,lx,u0,uu)),ispl2"rt"(mn(u0,x0,cutapp2b(x0,lx,u0,uu)),y0,x0,i)):is"rt"(u0,pl"rt"(x0,y0))
-t2:=lrtpl(ksi,eta,u0,x0,lx,y0,ly,t1):lrt(pl(ksi,eta),u0)
-t3:=andi(lrt(pl(ksi,eta),u0),urt(ksi,u0),t2,uu):and(lrt(pl(ksi,eta),u0),urt(ksi,u0))
-t4:=somei(rat,[x:rat]and(lrt(pl(ksi,eta),x),urt(ksi,x)),u0,t3):more(pl(ksi,eta),ksi)
-ly@t5:=satz132app(ksi,more(pl(ksi,eta),ksi),y0,[x:rat][t:lrt(ksi,x)][y:rat][u:urt(ksi,y)][v:is"rt"(mn(y,x,cutapp2b(x,t,y,u)),y0)]t4(x,t,y,u,v)):more(pl(ksi,eta),ksi)
--3133
-eta@satz133:=cutapp1a(eta,more(pl(ksi,eta),ksi),[x:rat][t:lrt(eta,x)]t5".3133"(x,t)):more(pl(ksi,eta),ksi)
-satz133a:=satz121(pl(ksi,eta),ksi,satz133):less(ksi,pl(ksi,eta))
-zeta@[m:more(ksi,eta)]
-+3134
-[y0:rat][ly:lrt(ksi,y0)][uy:urt(eta,y0)][x0:rat][lx:lrt(ksi,x0)][l:less"rt"(y0,x0)]
-t1:=satz119a(eta,y0,uy,x0,l):urt(eta,x0)
-t2:=satz83(y0,x0,l):more"rt"(x0,y0)
-[u0:rat][lu:lrt(zeta,u0)][z0:rat][uz:urt(zeta,z0)][i:is"rt"(mn(z0,u0,cutapp2b(zeta,u0,lu,z0,uz)),mn(x0,y0,t2))]
-t3:=tris(rat,z0,pl"rt"(mn(z0,u0,cutapp2b(zeta,u0,lu,z0,uz)),u0),pl"rt"(mn(x0,y0,t2),u0),satz101f(z0,u0,cutapp2b(zeta,u0,lu,z0,uz)),ispl1"rt"(mn(z0,u0,cutapp2b(zeta,u0,lu,z0,uz)),mn(x0,y0,t2),u0,i)):is"rt"(z0,pl"rt"(mn(x0,y0,t2),u0))
-t4:=tr3is(rat,pl"rt"(y0,z0),pl"rt"(y0,pl"rt"(mn(x0,y0,t2),u0)),pl"rt"(pl"rt"(y0,mn(x0,y0,t2)),u0),pl"rt"(x0,u0),ispl2"rt"(z0,pl"rt"(mn(x0,y0,t2),u0),y0,t3),asspl2"rt"(y0,mn(x0,y0,t2),u0),ispl1"rt"(pl"rt"(y0,mn(x0,y0,t2)),x0,u0,satz101c(x0,y0,t2))):is"rt"(pl"rt"(y0,z0),pl"rt"(x0,u0))
-t5:=lrtpl(ksi,zeta,pl"rt"(y0,z0),x0,lx,u0,lu,t4):lrt(pl(ksi,zeta),pl"rt"(y0,z0))
-t6:=urtpl(eta,zeta,pl"rt"(y0,z0),y0,uy,z0,uz,refis(rat,pl"rt"(y0,z0))):urt(pl(eta,zeta),pl"rt"(y0,z0))
-t7:=andi(lrt(pl(ksi,zeta),pl"rt"(y0,z0)),urt(pl(eta,zeta),pl"rt"(y0,z0)),t5,t6):and(lrt(pl(ksi,zeta),pl"rt"(y0,z0)),urt(pl(eta,zeta),pl"rt"(y0,z0)))
-t8:=somei(rat,[x:rat]and(lrt(pl(ksi,zeta),x),urt(pl(eta,zeta),x)),pl"rt"(y0,z0),t7):more(pl(ksi,zeta),pl(eta,zeta))
-l@t9:=satz132app(zeta,more(pl(ksi,zeta),pl(eta,zeta)),mn(x0,y0,t2),[x:rat][t:lrt(zeta,x)][y:rat][u:urt(zeta,y)][v:is"rt"(mn(y,x,cutapp2b(zeta,x,t,y,u)),mn(x0,y0,t2))]t8(x,t,y,u,v)):more(pl(ksi,zeta),pl(eta,zeta))
-uy@t10:=cutapp3(ksi,y0,ly,more(pl(ksi,zeta),pl(eta,zeta)),[x:rat][t:lrt(ksi,x)][u:less"rt"(y0,x)]t9(x,t,u)):more(pl(ksi,zeta),pl(eta,zeta))
--3134
-satz134:=moreapp(ksi,eta,m,more(pl(ksi,zeta),pl(eta,zeta)),[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]t10".3134"(x,t,u)):more(pl(ksi,zeta),pl(eta,zeta))
-zeta@[m:more(ksi,eta)]
-satz135a:=satz134(m):more(pl(ksi,zeta),pl(eta,zeta))
-zeta@[i:is(ksi,eta)]
-satz135b:=ispl1(ksi,eta,zeta,i):is(pl(ksi,zeta),pl(eta,zeta))
-zeta@[l:less(ksi,eta)]
-satz135c:=satz121(pl(eta,zeta),pl(ksi,zeta),satz134(eta,ksi,zeta,satz122(ksi,eta,l))):less(pl(ksi,zeta),pl(eta,zeta))
-m@satz135d:=ismore12(pl(ksi,zeta),pl(zeta,ksi),pl(eta,zeta),pl(zeta,eta),compl(ksi,zeta),compl(eta,zeta),satz135a):more(pl(zeta,ksi),pl(zeta,eta))
-i@satz135e:=ispl2(ksi,eta,zeta,i):is(pl(zeta,ksi),pl(zeta,eta))
-l@satz135f:=isless12(pl(ksi,zeta),pl(zeta,ksi),pl(eta,zeta),pl(zeta,eta),compl(ksi,zeta),compl(eta,zeta),satz135c):less(pl(zeta,ksi),pl(zeta,eta))
-upsilon@[i:is(ksi,eta)][m:more(zeta,upsilon)]
-satz135g:=ismore2(pl(ksi,upsilon),pl(eta,upsilon),pl(ksi,zeta),ispl1(ksi,eta,upsilon,i),satz135d(zeta,upsilon,ksi,m)):more(pl(ksi,zeta),pl(eta,upsilon))
-satz135h:=ismore12(pl(ksi,zeta),pl(zeta,ksi),pl(eta,upsilon),pl(upsilon,eta),compl(ksi,zeta),compl(eta,upsilon),satz135g):more(pl(zeta,ksi),pl(upsilon,eta))
-i@[l:less(zeta,upsilon)]
-satz135j:=isless2(pl(ksi,upsilon),pl(eta,upsilon),pl(ksi,zeta),ispl1(ksi,eta,upsilon,i),satz135f(zeta,upsilon,ksi,l)):less(pl(ksi,zeta),pl(eta,upsilon))
-satz135k:=isless12(pl(ksi,zeta),pl(zeta,ksi),pl(eta,upsilon),pl(upsilon,eta),compl(ksi,zeta),compl(eta,upsilon),satz135j):less(pl(zeta,ksi),pl(upsilon,eta))
-+3136
-zeta@t1:=satz123a(ksi,eta):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-t2:=satz123b(pl(ksi,zeta),pl(eta,zeta)):ec3(is(pl(ksi,zeta),pl(eta,zeta)),more(pl(ksi,zeta),pl(eta,zeta)),less(pl(ksi,zeta),pl(eta,zeta)))
--3136
-zeta@[m:more(pl(ksi,zeta),pl(eta,zeta))]
-satz136a:=th11"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(pl(ksi,zeta),pl(eta,zeta)),more(pl(ksi,zeta),pl(eta,zeta)),less(pl(ksi,zeta),pl(eta,zeta)),t1".3136",t2".3136",[u:is(ksi,eta)]satz135b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz135a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz135c(ksi,eta,zeta,u),m):more(ksi,eta)
-zeta@[i:is(pl(ksi,zeta),pl(eta,zeta))]
-satz136b:=th10"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(pl(ksi,zeta),pl(eta,zeta)),more(pl(ksi,zeta),pl(eta,zeta)),less(pl(ksi,zeta),pl(eta,zeta)),t1".3136",t2".3136",[u:is(ksi,eta)]satz135b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz135a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz135c(ksi,eta,zeta,u),i):is(ksi,eta)
-zeta@[l:less(pl(ksi,zeta),pl(eta,zeta))]
-satz136c:=th12"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(pl(ksi,zeta),pl(eta,zeta)),more(pl(ksi,zeta),pl(eta,zeta)),less(pl(ksi,zeta),pl(eta,zeta)),t1".3136",t2".3136",[u:is(ksi,eta)]satz135b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz135a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz135c(ksi,eta,zeta,u),l):less(ksi,eta)
-zeta@[m:more(pl(zeta,ksi),pl(zeta,eta))]
-satz136d:=satz136a(ismore12(pl(zeta,ksi),pl(ksi,zeta),pl(zeta,eta),pl(eta,zeta),compl(zeta,ksi),compl(zeta,eta),m)):more(ksi,eta)
-zeta@[i:is(pl(zeta,ksi),pl(zeta,eta))]
-satz136e:=satz136b(tr3is(cut,pl(ksi,zeta),pl(zeta,ksi),pl(zeta,eta),pl(eta,zeta),compl(ksi,zeta),i,compl(zeta,eta))):is(ksi,eta)
-zeta@[l:less(pl(zeta,ksi),pl(zeta,eta))]
-satz136f:=satz136c(isless12(pl(zeta,ksi),pl(ksi,zeta),pl(zeta,eta),pl(eta,zeta),compl(zeta,ksi),compl(zeta,eta),l)):less(ksi,eta)
-upsilon@[m:more(ksi,eta)][n:more(zeta,upsilon)]
-+3137
-t1:=satz134(ksi,eta,zeta,m):more(pl(ksi,zeta),pl(eta,zeta))
-t2:=ismore12(pl(zeta,eta),pl(eta,zeta),pl(upsilon,eta),pl(eta,upsilon),compl(zeta,eta),compl(upsilon,eta),satz134(zeta,upsilon,eta,n)):more(pl(eta,zeta),pl(eta,upsilon))
--3137
-satz137:=trmore(pl(ksi,zeta),pl(eta,zeta),pl(eta,upsilon),t1".3137",t2".3137"):more(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[l:less(ksi,eta)][k:less(zeta,upsilon)]
-satz137a:=satz121(pl(eta,upsilon),pl(ksi,zeta),satz137(eta,ksi,upsilon,zeta,satz122(ksi,eta,l),satz122(zeta,upsilon,k))):less(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[m:moreis(ksi,eta)][n:more(zeta,upsilon)]
-satz138a:=orapp(more(ksi,eta),is(ksi,eta),more(pl(ksi,zeta),pl(eta,upsilon)),m,[t:more(ksi,eta)]satz137(t,n),[t:is(ksi,eta)]satz135g(t,n)):more(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[m:more(ksi,eta)][n:moreis(zeta,upsilon)]
-satz138b:=orapp(more(zeta,upsilon),is(zeta,upsilon),more(pl(ksi,zeta),pl(eta,upsilon)),n,[t:more(zeta,upsilon)]satz137(m,t),[t:is(zeta,upsilon)]satz135h(zeta,upsilon,ksi,eta,t,m)):more(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[l:lessis(ksi,eta)][k:less(zeta,upsilon)]
-satz138c:=satz121(pl(eta,upsilon),pl(ksi,zeta),satz138a(eta,ksi,upsilon,zeta,satz125(ksi,eta,l),satz122(zeta,upsilon,k))):less(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[l:less(ksi,eta)][k:lessis(zeta,upsilon)]
-satz138d:=satz121(pl(eta,upsilon),pl(ksi,zeta),satz138b(eta,ksi,upsilon,zeta,satz122(ksi,eta,l),satz125(zeta,upsilon,k))):less(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[m:moreis(ksi,eta)][n:moreis(zeta,upsilon)]
-+3139
-[i:is(ksi,eta)][j:is(zeta,upsilon)]
-t1:=moreisi2(pl(ksi,zeta),pl(eta,upsilon),ispl12(ksi,eta,zeta,upsilon,i,j)):moreis(pl(ksi,zeta),pl(eta,upsilon))
-i@[o:more(zeta,upsilon)]
-t2:=moreisi1(pl(ksi,zeta),pl(eta,upsilon),satz138a(m,o)):moreis(pl(ksi,zeta),pl(eta,upsilon))
-i@t3:=orapp(more(zeta,upsilon),is(zeta,upsilon),moreis(pl(ksi,zeta),pl(eta,upsilon)),n,[t:more(zeta,upsilon)]t2(t),[t:is(zeta,upsilon)]t1(t)):moreis(pl(ksi,zeta),pl(eta,upsilon))
-n@[o:more(ksi,eta)]
-t4:=moreisi1(pl(ksi,zeta),pl(eta,upsilon),satz138b(o,n)):moreis(pl(ksi,zeta),pl(eta,upsilon))
--3139
-satz139:=orapp(more(ksi,eta),is(ksi,eta),moreis(pl(ksi,zeta),pl(eta,upsilon)),m,[t:more(ksi,eta)]t4".3139"(t),[t:is(ksi,eta)]t3".3139"(t)):moreis(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[l:lessis(ksi,eta)][k:lessis(zeta,upsilon)]
-satz139a:=satz124(pl(eta,upsilon),pl(ksi,zeta),satz139(eta,ksi,upsilon,zeta,satz125(ksi,eta,l),satz125(zeta,upsilon,k))):lessis(pl(ksi,zeta),pl(eta,upsilon))
-eta@[l:lessis(ksi,eta)]
-+3140
-[phi:cut][i:is(pl(eta,phi),ksi)]
-t1:=ismore1(pl(eta,phi),ksi,eta,i,satz133(eta,phi)):more(ksi,eta)
-phi@t2:=th3"l.imp"(is(pl(eta,phi),ksi),more(ksi,eta),satz123d(ksi,eta,l),[t:is(pl(eta,phi),ksi)]t1(t)):nis(pl(eta,phi),ksi)
--3140
-vorbemerkung140:=th5"l.some"(cut,[a:cut]is(pl(eta,a),ksi),[a:cut]t2".3140"(a)):not(some([a:cut]is(pl(eta,a),ksi)))
-eta@[phi:cut][psi:cut]
-+*3140
-psi@[m:more(phi,psi)]
-t3:=satz135d(phi,psi,eta,m):more(pl(eta,phi),pl(eta,psi))
-t4:=ec3e21(is(pl(eta,phi),pl(eta,psi)),more(pl(eta,phi),pl(eta,psi)),less(pl(eta,phi),pl(eta,psi)),satz123b(pl(eta,phi),pl(eta,psi)),t3):nis(pl(eta,phi),pl(eta,psi))
-psi@[l:less(phi,psi)]
-t5:=satz135f(phi,psi,eta,l):less(pl(eta,phi),pl(eta,psi))
-t6:=ec3e31(is(pl(eta,phi),pl(eta,psi)),more(pl(eta,phi),pl(eta,psi)),less(pl(eta,phi),pl(eta,psi)),satz123b(pl(eta,phi),pl(eta,psi)),t5):nis(pl(eta,phi),pl(eta,psi))
-psi@[n:nis(phi,psi)]
-t7:=th1"l.or3"(is(phi,psi),more(phi,psi),less(phi,psi),satz123a(phi,psi),n):or(more(phi,psi),less(phi,psi))
-t8:=orapp(more(phi,psi),less(phi,psi),nis(pl(eta,phi),pl(eta,psi)),t7,[t:more(phi,psi)]t4(t),[t:less(phi,psi)]t6(t)):nis(pl(eta,phi),pl(eta,psi))
--3140
-psi@[i:is(pl(eta,phi),ksi)][j:is(pl(eta,psi),ksi)]
-satz140b:=th7"l.imp"(is(phi,psi),nis(pl(eta,phi),pl(eta,psi)),weli(is(pl(eta,phi),pl(eta,psi)),tris2(cut,pl(eta,phi),pl(eta,psi),ksi,i,j)),[t:nis(phi,psi)]t8".3140"(t)):is(phi,psi)
-eta@[z0:rat][x0:rat][y0:rat]
-diffprop1:=and(more"rt"(x0,y0),[t:more"rt"(x0,y0)]is"rt"(z0,mn(x0,y0,t))):'prop'
-diffprop2:=and3(lrt(ksi,x0),urt(eta,y0),diffprop1(z0,x0,y0)):'prop'
-z0@diffprop:=some"rt"([x:rat]some"rt"([y:rat]diffprop2(z0,x,y))):'prop'
-eta@diff:=setof(rat,[z:rat]diffprop(z)):set(rat)
-x0@[lx:lrt(ksi,x0)][y0:rat][uy:urt(eta,y0)][m:more"rt"(x0,y0)][i:is"rt"(z0,mn(x0,y0,m))]
-+*iii3
-i@[m1:more"rt"(x0,y0)]
-t11a:=tris(rat,z0,mn(x0,y0,m),mn(x0,y0,m1),i,satz101g(x0,y0,mn(x0,y0,m),m1,satz101c(x0,y0,m))):is"rt"(z0,mn(x0,y0,m1))
-i@t12:=andi(more"rt"(x0,y0),[t:more"rt"(x0,y0)]is"rt"(z0,mn(x0,y0,t)),m,[t:more"rt"(x0,y0)]t11a(t)):diffprop1(z0,x0,y0)
-t13:=and3i(lrt(ksi,x0),urt(eta,y0),diffprop1(z0,x0,y0),lx,uy,t12):diffprop2(z0,x0,y0)
-t14:=somei(rat,[y:rat]diffprop2(z0,x0,y),y0,t13):some"rt"([y:rat]diffprop2(z0,x0,y))
-t15:=somei(rat,[x:rat]some"rt"([y:rat]diffprop2(z0,x,y)),x0,t14):diffprop(z0)
--iii3
-i@diff1:=estii(rat,[z:rat]diffprop(z),z0,t15".iii3"):in(z0,diff)
-z0@[i:in(z0,diff)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:urt(eta,y)][v:more"rt"(x,y)][w:is"rt"(z0,mn(x,y,v))]p]
-+*iii3
-p1@t16:=estie(rat,[z:rat]diffprop(z),z0,i):diffprop(z0)
--iii3
-p1@[x0:rat][px:some"rt"([y:rat]diffprop2(z0,x0,y))][y0:rat][py:diffprop2(z0,x0,y0)]
-+*iii3
-py@t17:=and3e1(lrt(ksi,x0),urt(eta,y0),diffprop1(z0,x0,y0),py):lrt(ksi,x0)
-t18:=and3e2(lrt(ksi,x0),urt(eta,y0),diffprop1(z0,x0,y0),py):urt(eta,y0)
-t19:=and3e3(lrt(ksi,x0),urt(eta,y0),diffprop1(z0,x0,y0),py):diffprop1(z0,x0,y0)
-t20:=ande1(more"rt"(x0,y0),[t:more"rt"(x0,y0)]is"rt"(z0,mn(x0,y0,t)),t19):more"rt"(x0,y0)
-t21:=ande2"l.r"(more"rt"(x0,y0),[t:more"rt"(x0,y0)]is"rt"(z0,mn(x0,y0,t)),t19):is"rt"(z0,mn(x0,y0,t20))
-t22:=<t21><t20><t18><y0><t17><x0>p1:p
-px@t23:=someapp(rat,[y:rat]diffprop2(z0,x0,y),px,p,[y:rat][t:diffprop2(z0,x0,y)]t22(y,t)):p
--iii3
-p1@diffapp:=someapp(rat,[x:rat]some"rt"([y:rat]diffprop2(z0,x,y)),t16".iii3",p,[x:rat][t:some"rt"([y:rat]diffprop2(z0,x,y))]t23".iii3"(x,t)):p
-eta@[m:more(ksi,eta)]
-+*3140
-m"rp"@[y0:rat][ly:lrt(ksi,y0)][uy:urt(eta,y0)][x0:rat][lx:lrt(ksi,x0)][l:less"rt"(y0,x0)]
-t9:=t2"rp.3134"(eta,m,y0,ly,uy,x0,lx,l):more"rt"(x0,y0)
-t10:=diff1(mn(x0,y0,t9),x0,lx,y0,uy,t9,refis(rat,mn(x0,y0,t9))):in(mn(x0,y0,t9),diff)
-m"rp"@[x1:rat][ux:urt(ksi,x1)][z0:rat][i:in(z0,diff)][x0:rat][lx:lrt(ksi,x0)][y0:rat][uy:urt(eta,y0)][n:more"rt"(x0,y0)][j:is"rt"(z0,mn(x0,y0,n))]
-t11:=isless12"rt"(mn(x0,y0,n),z0,pl"rt"(mn(x0,y0,n),y0),x0,symis(rat,z0,mn(x0,y0,n),j),satz101e(x0,y0,n),satz94a(mn(x0,y0,n),y0)):less"rt"(z0,x0)
-t12:=trless"rt"(z0,x0,x1,t11,cutapp2a(ksi,x0,lx,x1,ux)):less"rt"(z0,x1)
-t13:=ec3e31(is"rt"(z0,x1),more"rt"(z0,x1),less"rt"(z0,x1),satz81b(z0,x1),t12):nis"rt"(z0,x1)
-i@t14:=diffapp(z0,i,nis"rt"(z0,x1),[x:rat][t:lrt(ksi,x)][y:rat][u:urt(eta,y)][v:more"rt"(x,y)][w:is"rt"(z0,mn(x,y,v))]t13(x,t,y,u,v,w)):nis"rt"(z0,x1)
-ux@t15:=th3"l.imp"(in(x1,diff),nis"rt"(x1,x1),weli(is"rt"(x1,x1),refis(rat,x1)),[t:in(x1,diff)]t14(x1,t)):not(in(x1,diff))
-m"rp"@[z0:rat][i:in(z0,diff)][u0:rat][l:less"rt"(u0,z0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][uy:urt(eta,y0)][n:more"rt"(x0,y0)][j:is"rt"(z0,mn(x0,y0,n))]
-t16:=tris(rat,pl"rt"(z0,y0),pl"rt"(mn(x0,y0,n),y0),x0,ispl1"rt"(z0,mn(x0,y0,n),y0,j),satz101e(x0,y0,n)):is"rt"(pl"rt"(z0,y0),x0)
-x2:=pl"rt"(u0,y0):rat
-t17:=isless2"rt"(pl"rt"(z0,y0),x0,x2,t16,satz96c(u0,z0,y0,l)):less"rt"(x2,x0)
-t18:=satz120(ksi,x0,lx,x2,t17):lrt(ksi,x2)
-t19:=ismore1"rt"(pl"rt"(y0,u0),pl"rt"(u0,y0),y0,compl"rt"(y0,u0),satz94(y0,u0)):more"rt"(x2,y0)
-t20:=satz101g(x2,y0,u0,t19,compl"rt"(y0,u0)):is"rt"(u0,mn(x2,y0,t19))
-t21:=diff1(u0,x2,t18,y0,uy,t19,t20):in(u0,diff)
-l@t22:=diffapp(z0,i,in(u0,diff),[x:rat][t:lrt(ksi,x)][y:rat][u:urt(eta,y)][v:more"rt"(x,y)][w:is"rt"(z0,mn(x,y,v))]t21(x,t,y,u,v,w)):in(u0,diff)
-m"rp"@[z0:rat][i:in(z0,diff)][x0:rat][lx:lrt(ksi,x0)][y0:rat][uy:urt(eta,y0)][n:more"rt"(x0,y0)][j:is"rt"(z0,mn(x0,y0,n))][x3:rat][lx3:lrt(ksi,x3)][l:less"rt"(x0,x3)]
-t23:=satz83(x0,x3,l):more"rt"(x3,x0)
-t24:=trmore"rt"(x3,x0,y0,t23,n):more"rt"(x3,y0)
-t25:=ismore12"rt"(x3,pl"rt"(mn(x3,y0,t24),y0),x0,pl"rt"(mn(x0,y0,n),y0),satz101f(x3,y0,t24),satz101f(x0,y0,n),t23):more"rt"(pl"rt"(mn(x3,y0,t24),y0),pl"rt"(mn(x0,y0,n),y0))
-t26:=satz97a(mn(x3,y0,t24),mn(x0,y0,n),y0,t25):more"rt"(mn(x3,y0,t24),mn(x0,y0,n))
-t27:=ismore2"rt"(mn(x0,y0,n),z0,mn(x3,y0,t24),symis(rat,z0,mn(x0,y0,n),j),t26):more"rt"(mn(x3,y0,t24),z0)
-t28:=diff1(mn(x3,y0,t24),x3,lx3,y0,uy,t24,refis(rat,mn(x3,y0,t24))):in(mn(x3,y0,t24),diff)
-t29:=andi(in(mn(x3,y0,t24),diff),more"rt"(mn(x3,y0,t24),z0),t28,t27):and(in(mn(x3,y0,t24),diff),more"rt"(mn(x3,y0,t24),z0))
-t30:=somei(rat,[x:rat]and(in(x,diff),more"rt"(x,z0)),mn(x3,y0,t24),t29):some"rt"([x:rat]and(in(x,diff),more"rt"(x,z0)))
-j@t31:=cutapp3(ksi,x0,lx,some"rt"([x:rat]and(in(x,diff),more"rt"(x,z0))),[y:rat][t:lrt(ksi,y)][u:less"rt"(x0,y)]t30(y,t,u)):some"rt"([x:rat]and(in(x,diff),more"rt"(x,z0)))
-i@t32:=diffapp(z0,i,some"rt"([x:rat]and(in(x,diff),more"rt"(x,z0))),[x:rat][t:lrt(ksi,x)][y:rat][u:urt(eta,y)][v:more"rt"(x,y)][w:is"rt"(z0,mn(x,y,v))]t31(x,t,y,u,v,w)):some"rt"([x:rat]and(in(x,diff),more"rt"(x,z0)))
-m"rp"@[y0:rat][ly:lrt(ksi,y0)][uy:urt(eta,y0)][x0:rat][lx:lrt(ksi,x0)][l:less"rt"(y0,x0)][x1:rat][ux1:urt(ksi,x1)]
-t33:=cut2(diff,mn(x0,y0,t9(y0,ly,uy,x0,lx,l)),t10(y0,ly,uy,x0,lx,l),x1,t15(x1,ux1),[x:rat][t:in(x,diff)][y:rat][u:less"rt"(y,x)]t22(x,t,y,u),[x:rat][t:in(x,diff)]t32(x,t)):cutprop(diff)
-l@t34:=cutapp1b(ksi,cutprop(diff),[x:rat][t:urt(ksi,x)]t33(x,t)):cutprop(diff)
-uy@t35:=cutapp3(ksi,y0,ly,cutprop(diff),[x:rat][t:lrt(ksi,x)][u:less"rt"(y0,x)]t34(x,t,u)):cutprop(diff)
--3140
-m@satz140h:=moreapp(ksi,eta,m,cutprop(diff),[x:rat][u:lrt(ksi,x)][v:urt(eta,x)]t35".3140"(x,u,v)):cutprop(diff)
-+*3140
-m"rp"@chi:=cutof(diff,satz140h):cut
-[z0:rat][lz:lrt(pl(eta,chi),z0)][y1:rat][ly:lrt(eta,y1)][u0:rat][lu:lrt(chi,u0)][i:is"rt"(z0,pl"rt"(y1,u0))][x0:rat][lx:lrt(ksi,x0)][y0:rat][uy:urt(eta,y0)][o:more"rt"(x0,y0)][j:is"rt"(u0,mn(x0,y0,o))]
-t36:=cutapp2b(eta,y1,ly,y0,uy):more"rt"(y0,y1)
-t37:=tr3is(rat,pl"rt"(pl"rt"(mn(x0,y0,o),y1),mn(y0,y1,t36)),pl"rt"(mn(x0,y0,o),pl"rt"(y1,mn(y0,y1,t36))),pl"rt"(mn(x0,y0,o),y0),x0,asspl1"rt"(mn(x0,y0,o),y1,mn(y0,y1,t36)),ispl2"rt"(pl"rt"(y1,mn(y0,y1,t36)),y0,mn(x0,y0,o),satz101c(y0,y1,t36)),satz101e(x0,y0,o)):is"rt"(pl"rt"(pl"rt"(mn(x0,y0,o),y1),mn(y0,y1,t36)),x0)
-t38:=isless2"rt"(pl"rt"(pl"rt"(mn(x0,y0,o),y1),mn(y0,y1,t36)),x0,pl"rt"(mn(x0,y0,o),y1),t37,satz94a(pl"rt"(mn(x0,y0,o),y1),mn(y0,y1,t36))):less"rt"(pl"rt"(mn(x0,y0,o),y1),x0)
-t39:=tr3is(rat,z0,pl"rt"(y1,u0),pl"rt"(u0,y1),pl"rt"(mn(x0,y0,o),y1),i,compl"rt"(y1,u0),ispl1"rt"(u0,mn(x0,y0,o),y1,j)):is"rt"(z0,pl"rt"(mn(x0,y0,o),y1))
-t40:=isless1"rt"(pl"rt"(mn(x0,y0,o),y1),z0,x0,symis(rat,z0,pl"rt"(mn(x0,y0,o),y1),t39),t38):less"rt"(z0,x0)
-t41:=satz120(ksi,x0,lx,z0,t40):lrt(ksi,z0)
-i@t42:=diffapp(u0,ini(diff,satz140h,u0,lu),lrt(ksi,z0),[x:rat][t:lrt(ksi,x)][y:rat][u:urt(eta,y)][v:more"rt"(x,y)][w:is"rt"(u0,mn(x,y,v))]t41(x,t,y,u,v,w)):lrt(ksi,z0)
-lz@a:=plapp(eta,chi,z0,lz,lrt(ksi,z0),[x:rat][t:lrt(eta,x)][y:rat][u:lrt(chi,y)][v:is"rt"(z0,pl"rt"(x,y))]t42(x,t,y,u,v)):lrt(ksi,z0)
-m"rp"@[y0:rat][ly:lrt(ksi,y0)][uy:urt(eta,y0)][x0:rat][lx:lrt(ksi,x0)][l:less"rt"(y0,x0)]
-t43:=satz83(y0,x0,l):more"rt"(x0,y0)
-[y1:rat][ly1:lrt(eta,y1)][y2:rat][uy2:urt(eta,y2)]
-t44:=cutapp2b(eta,y1,ly1,y2,uy2):more"rt"(y2,y1)
-[i:is"rt"(mn(y2,y1,t44),mn(x0,y0,t43))]
-t45:=cutapp2b(eta,y1,ly1,y0,uy):more"rt"(y0,y1)
-t46:=tris(rat,y2,pl"rt"(mn(y2,y1,t44),y1),pl"rt"(mn(x0,y0,t43),y1),satz101f(y2,y1,t44),ispl1"rt"(mn(y2,y1,t44),mn(x0,y0,t43),y1,i)):is"rt"(y2,pl"rt"(mn(x0,y0,t43),y1))
-t47:=tr4is(rat,pl"rt"(y2,mn(y0,y1,t45)),pl"rt"(pl"rt"(mn(x0,y0,t43),y1),mn(y0,y1,t45)),pl"rt"(mn(x0,y0,t43),pl"rt"(y1,mn(y0,y1,t45))),pl"rt"(mn(x0,y0,t43),y0),x0,ispl1"rt"(y2,pl"rt"(mn(x0,y0,t43),y1),mn(y0,y1,t45),t46),asspl1"rt"(mn(x0,y0,t43),y1,mn(y0,y1,t45)),ispl2"rt"(pl"rt"(y1,mn(y0,y1,t45)),y0,mn(x0,y0,t43),satz101c(y0,y1,t45)),satz101e(x0,y0,t43)):is"rt"(pl"rt"(y2,mn(y0,y1,t45)),x0)
-t48:=ismore1"rt"(pl"rt"(y2,mn(y0,y1,t45)),x0,y2,t47,satz94(y2,mn(y0,y1,t45))):more"rt"(x0,y2)
-t49:=satz101g(x0,y2,mn(y0,y1,t45),t48,t47):is"rt"(mn(y0,y1,t45),mn(x0,y2,t48))
-t50:=tris(rat,y0,pl"rt"(mn(y0,y1,t45),y1),pl"rt"(mn(x0,y2,t48),y1),satz101f(y0,y1,t45),ispl1"rt"(mn(y0,y1,t45),mn(x0,y2,t48),y1,t49)):is"rt"(y0,pl"rt"(mn(x0,y2,t48),y1))
-t51:=ine(diff,satz140h,mn(x0,y2,t48),diff1(mn(x0,y2,t48),x0,lx,y2,uy2,t48,refis(rat,mn(x0,y2,t48)))):lrt(chi,mn(x0,y2,t48))
-t52:=lrtpl(eta,chi,y0,y1,ly1,mn(x0,y2,t48),t51,tris(rat,y0,pl"rt"(mn(x0,y2,t48),y1),pl"rt"(y1,mn(x0,y2,t48)),t50,compl"rt"(mn(x0,y2,t48),y1))):lrt(pl(eta,chi),y0)
-l@t53:=satz132app(eta,lrt(pl(eta,chi),y0),mn(x0,y0,t43),[x:rat][t:lrt(eta,x)][y:rat][u:urt(eta,y)][v:is"rt"(mn(y,x,cutapp2b(eta,x,t,y,u)),mn(x0,y0,t43))]t52(x,t,y,u,v)):lrt(pl(eta,chi),y0)
-uy@t54:=cutapp3(ksi,y0,ly,lrt(pl(eta,chi),y0),[x:rat][t:lrt(ksi,x)][u:less"rt"(y0,x)]t53(x,t,u)):lrt(pl(eta,chi),y0)
-ly@[ly0:lrt(eta,y0)][y1:rat][ly1:lrt(ksi,y1)][uy1:urt(eta,y1)]
-t55:=t54(y1,ly1,uy1):lrt(pl(eta,chi),y1)
-t56:=satz120(pl(eta,chi),y1,t55,y0,cutapp2a(eta,y0,ly0,y1,uy1)):lrt(pl(eta,chi),y0)
-ly0@t57:=moreapp(ksi,eta,m,lrt(pl(eta,chi),y0),[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]t56(x,t,u)):lrt(pl(eta,chi),y0)
-ly@b:=th1"l.imp"(lrt(eta,y0),lrt(pl(eta,chi),y0),[t:lrt(eta,y0)]t57(t),[t:urt(eta,y0)]t54(t)):lrt(pl(eta,chi),y0)
-m"rp"@t58:=isi1(pl(eta,chi),ksi,[x:rat][t:lrt(pl(eta,chi),x)]a(x,t),[x:rat][t:lrt(ksi,x)]b(x,t)):is(pl(eta,chi),ksi)
--3140
-m@satz140a:=somei(cut,[a:cut]is(pl(eta,a),ksi),chi".3140",t58".3140"):some([a:cut]is(pl(eta,a),ksi))
-+*3140
-eta@t59:=[c:cut][d:cut][t:is(pl(eta,c),ksi)][u:is(pl(eta,d),ksi)]satz140b(c,d,t,u):amone(cut,[c:cut]is(pl(eta,c),ksi))
--3140
-m@satz140:=onei(cut,[a:cut]is(pl(eta,a),ksi),t59".3140",satz140a):one([a:cut]is(pl(eta,a),ksi))
-mn:=ind(cut,[a:cut]is(pl(eta,a),ksi),satz140):cut
-satz140c:=oneax(cut,[a:cut]is(pl(eta,a),ksi),satz140):is(pl(eta,mn(ksi,eta,m)),ksi)
-satz140d:=symis(cut,pl(eta,mn(ksi,eta,m)),ksi,satz140c):is(ksi,pl(eta,mn(ksi,eta,m)))
-satz140e:=tris(cut,pl(mn(ksi,eta,m),eta),pl(eta,mn(ksi,eta,m)),ksi,compl(mn(ksi,eta,m),eta),satz140c):is(pl(mn(ksi,eta,m),eta),ksi)
-satz140f:=symis(cut,pl(mn(ksi,eta,m),eta),ksi,satz140e):is(ksi,pl(mn(ksi,eta,m),eta))
-eta@[phi:cut][m:more(ksi,eta)][i:is(pl(eta,phi),ksi)]
-satz140g:=satz140b(phi,mn(ksi,eta,m),i,satz140c(m)):is(phi,mn(ksi,eta,m))
-upsilon@[m:more(ksi,zeta)][n:more(eta,upsilon)][i:is(ksi,eta)][j:is(zeta,upsilon)]
-+*3140
-j"rp"@t60:=tr3is(cut,pl(upsilon,mn(ksi,zeta,m)),pl(zeta,mn(ksi,zeta,m)),ksi,eta,ispl1(upsilon,zeta,mn(ksi,zeta,m),symis(cut,zeta,upsilon,j)),satz140c(ksi,zeta,m),i):is(pl(upsilon,mn(ksi,zeta,m)),eta)
--3140
-j@ismn12:=satz140g(eta,upsilon,mn(ksi,zeta,m),n,t60".3140"):is(mn(ksi,zeta,m),mn(eta,upsilon,n))
-zeta@[m:more(ksi,zeta)][n:more(eta,zeta)][i:is(ksi,eta)]
-ismn1:=ismn12(zeta,m,n,i,refis(cut,zeta)):is(mn(ksi,zeta,m),mn(eta,zeta,n))
-zeta@[m:more(zeta,ksi)][n:more(zeta,eta)][i:is(ksi,eta)]
-ismn2:=ismn12(zeta,zeta,ksi,eta,m,n,refis(cut,zeta),i):is(mn(zeta,ksi,m),mn(zeta,eta,n))
-eta@[z0:rat][x0:rat][y0:rat]
-prodprop1:=and3(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,ts(x0,y0))):'prop'
-z0@prodprop:=some"rt"([x:rat]some"rt"([y:rat]prodprop1(z0,x,y))):'prop'
-eta@prod:=setof(rat,[z:rat]prodprop(z)):set(rat)
-x0@[lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,ts(x0,y0))]
-+iii4
-t1:=and3i(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,ts(x0,y0)),lx,ly,i):prodprop1(z0,x0,y0)
-t2:=somei(rat,[y:rat]prodprop1(z0,x0,y),y0,t1):some"rt"([y:rat]prodprop1(z0,x0,y))
-t3:=somei(rat,[x:rat]some"rt"([y:rat]prodprop1(z0,x,y)),x0,t2):prodprop(z0)
--iii4
-prod1:=estii(rat,[z:rat]prodprop(z),z0,t3".iii4"):in(z0,prod)
-z0@[i:in(z0,prod)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,ts(x,y))]p]
-+*iii4
-p1@t4:=estie(rat,[z:rat]prodprop(z),z0,i):prodprop(z0)
--iii4
-p1@[x0:rat][px:some"rt"([y:rat]prodprop1(z0,x0,y))][y0:rat][py:prodprop1(z0,x0,y0)]
-+*iii4
-py@t5:=and3e1(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,ts(x0,y0)),py):lrt(ksi,x0)
-t6:=and3e2(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,ts(x0,y0)),py):lrt(eta,y0)
-t7:=and3e3(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,ts(x0,y0)),py):is"rt"(z0,ts(x0,y0))
-t8:=<t7><t6><y0><t5><x0>p1:p
-px@t9:=someapp(rat,[y:rat]prodprop1(z0,x0,y),px,p,[y:rat][t:prodprop1(z0,x0,y)]t8(y,t)):p
--iii4
-p1@prodapp:=someapp(rat,[x:rat]some"rt"([y:rat]prodprop1(z0,x,y)),t4".iii4",p,[x:rat][t:some"rt"([y:rat]prodprop1(z0,x,y))]t9".iii4"(x,t)):p
-eta@[x1:rat][ux:urt(ksi,x1)][y1:rat][uy:urt(eta,y1)]
-+4141
-[z0:rat][i:in(z0,prod)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(z0,ts(x0,y0))]
-t1:=cutapp2a(ksi,x0,lx,x1,ux):less"rt"(x0,x1)
-t2:=cutapp2a(eta,y0,ly,y1,uy):less"rt"(y0,y1)
-t3:=isless1"rt"(ts(x0,y0),z0,ts(x1,y1),symis(rat,z0,ts(x0,y0),j),satz107a(x0,x1,y0,y1,t1,t2)):less"rt"(z0,ts(x1,y1))
-t4:=ec3e31(is"rt"(z0,ts(x1,y1)),more"rt"(z0,ts(x1,y1)),less"rt"(z0,ts(x1,y1)),satz81b(z0,ts(x1,y1)),t3):nis"rt"(z0,ts(x1,y1))
-i@t5:=prodapp(ksi,eta,z0,i,nis"rt"(z0,ts(x1,y1)),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,ts(x,y))]t4(x,t,y,u,v)):nis"rt"(z0,ts(x1,y1))
--4141
-satz141a:=th3"l.imp"(in(ts(x1,y1),prod),nis"rt"(ts(x1,y1),ts(x1,y1)),weli(is"rt"(ts(x1,y1),ts(x1,y1)),refis(rat,ts(x1,y1))),[t:in(ts(x1,y1),prod)]t5".4141"(ts(x1,y1),t)):not(in(ts(x1,y1),prod))
--rp
-@[x0:rat][y0:rat]
-+4141
-v0:=ts(ov(1rt,y0),x0):rat
-t6:=tr3is(rat,ts(y0,v0),ts(ts(y0,ov(1rt,y0)),x0),ts(1rt,x0),x0,assts2(y0,ov(1rt,y0),x0),ists1(ts(y0,ov(1rt,y0)),1rt,x0,satz110c(1rt,y0)),example1c(x0)):is(ts(y0,v0),x0)
--4141
-satz141b:=satz110g(x0,y0,v0".4141",t6".4141"):is(ts(ov(1rt,y0),x0),ov(x0,y0))
-satz141c:=symis(rat,ts(ov(1rt,y0),x0),ov(x0,y0),satz141b):is"rt"(ov(x0,y0),ts(ov(1rt,y0),x0))
-+*rp
-+*4141
-eta@[u0:rat][i:in(u0,prod)][z0:rat][l:less"rt"(z0,u0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(u0,ts(x0,y0))]
-t7:=isless2"rt"(u0,ts(x0,y0),z0,j,l):less"rt"(z0,ts(x0,y0))
-t8:=tr3is(rat,ts(ov(1rt,x0),ts(x0,y0)),ts(ts(ov(1rt,x0),x0),y0),ts(1rt,y0),y0,assts2(ov(1rt,x0),x0,y0),ists1(ts(ov(1rt,x0),x0),1rt,y0,satz110e(1rt,x0)),example1c(y0)):is"rt"(ts(ov(1rt,x0),ts(x0,y0)),y0)
-t9:=isless12"rt"(ts(ov(1rt,x0),z0),ov(z0,x0),ts(ov(1rt,x0),ts(x0,y0)),y0,satz141b(z0,x0),t8,satz105f(z0,ts(x0,y0),ov(1rt,x0),t7)):less"rt"(ov(z0,x0),y0)
-t10:=satz120(eta,y0,ly,ov(z0,x0),t9):lrt(eta,ov(z0,x0))
-t11:=prod1(z0,x0,lx,ov(z0,x0),t10,satz110d(z0,x0)):in(z0,prod)
-l@t12:=prodapp(u0,i,in(z0,prod),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(u0,ts(x,y))]t11(x,t,y,u,v)):in(z0,prod)
-eta@[z0:rat][i:in(z0,prod)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(z0,ts(x0,y0))][x1:rat][lx1:lrt(ksi,x1)][l:less"rt"(x0,x1)]
-t13:=prod1(ts(x1,y0),x1,lx1,y0,ly,refis(rat,ts(x1,y0))):in(ts(x1,y0),prod)
-t14:=satz105a(x1,x0,y0,satz83(x0,x1,l)):more"rt"(ts(x1,y0),ts(x0,y0))
-t15:=ismore2"rt"(ts(x0,y0),z0,ts(x1,y0),symis(rat,z0,ts(x0,y0),j),t14):more"rt"(ts(x1,y0),z0)
-t16:=andi(in(ts(x1,y0),prod),more"rt"(ts(x1,y0),z0),t13,t15):and(in(ts(x1,y0),prod),more"rt"(ts(x1,y0),z0))
-t17:=somei(rat,[y:rat]and(in(y,prod),more"rt"(y,z0)),ts(x1,y0),t16):some"rt"([y:rat]and(in(y,prod),more"rt"(y,z0)))
-j@t18:=cutapp3(ksi,x0,lx,some"rt"([y:rat]and(in(y,prod),more"rt"(y,z0))),[x:rat][t:lrt(ksi,x)][u:less"rt"(x0,x)]t17(x,t,u)):some"rt"([y:rat]and(in(y,prod),more"rt"(y,z0)))
-i@t19:=prodapp(z0,i,some"rt"([y:rat]and(in(y,prod),more"rt"(y,z0))),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,ts(x,y))]t18(x,t,y,u,v)):some"rt"([y:rat]and(in(y,prod),more"rt"(y,z0)))
-eta@[x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][x1:rat][ux:urt(ksi,x1)][y1:rat][uy:urt(eta,y1)]
-t20:=cut2(prod,ts(x0,y0),prod1(ts(x0,y0),x0,lx,y0,ly,refis(rat,ts(x0,y0))),ts(x1,y1),satz141a(x1,ux,y1,uy),[x:rat][t:in(x,prod)][y:rat][u:less"rt"(y,x)]t12(x,t,y,u),[x:rat][t:in(x,prod)]t19(x,t)):cutprop(prod)
-ux@t21:=cutapp1b(eta,cutprop(prod),[y:rat][t:urt(eta,y)]t20(y,t)):cutprop(prod)
-ly@t22:=cutapp1b(ksi,cutprop(prod),[x:rat][t:urt(ksi,x)]t21(x,t)):cutprop(prod)
-lx@t23:=cutapp1a(eta,cutprop(prod),[y:rat][t:lrt(eta,y)]t22(y,t)):cutprop(prod)
--4141
-eta@satz141:=cutapp1a(ksi,cutprop(prod),[x:rat][t:lrt(ksi,x)]t23".4141"(x,t)):cutprop(prod)
-ts:=cutof(prod,satz141):cut
-[z0:rat][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,ts"rt"(x0,y0))]
-lrtts:=ine(prod,satz141,z0,prod1(z0,x0,lx,y0,ly,i)):lrt(ts(ksi,eta),z0)
-eta@[z0:rat][x0:rat][ux:urt(ksi,x0)][y0:rat][uy:urt(eta,y0)][i:is"rt"(z0,ts"rt"(x0,y0))]
-+*iii4
-i@t10:=isp1(rat,[x:rat]not(in(x,prod)),ts"rt"(x0,y0),z0,satz141a(x0,ux,y0,uy),i):not(in(z0,prod))
--iii4
-i@urtts:=th3"l.imp"(lrt(ts(ksi,eta),z0),in(z0,prod),t10".iii4",[t:lrt(ts(ksi,eta),z0)]ini(prod,satz141,z0,t)):urt(ts(ksi,eta),z0)
-eta@[z0:rat][lz:lrt(ts(ksi,eta),z0)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,ts"rt"(x,y))]p]
-+*iii4
-p1@t11:=ini(prod,satz141,z0,lz):in(z0,prod)
--iii4
-p1@tsapp:=prodapp(z0,t11".iii4",p,p1):p
-zeta@[i:is(ksi,eta)]
-ists1:=isf(cut,cut,[u:cut]ts(u,zeta),ksi,eta,i):is(ts(ksi,zeta),ts(eta,zeta))
-ists2:=isf(cut,cut,[u:cut]ts(zeta,u),ksi,eta,i):is(ts(zeta,ksi),ts(zeta,eta))
-upsilon@[i:is(ksi,eta)][j:is(zeta,upsilon)]
-ists12:=tris(cut,ts(ksi,zeta),ts(eta,zeta),ts(eta,upsilon),ists1(i),ists2(zeta,upsilon,eta,j)):is(ts(ksi,zeta),ts(eta,upsilon))
-+4142
-eta@[z0:rat][lz:lrt(ts(ksi,eta),z0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,ts"rt"(x0,y0))]
-t1:=tris(rat,z0,ts"rt"(x0,y0),ts"rt"(y0,x0),i,comts(x0,y0)):is"rt"(z0,ts"rt"(y0,x0))
-t2:=lrtts(eta,ksi,z0,y0,ly,x0,lx,t1):lrt(ts(eta,ksi),z0)
-lz@t3:=tsapp(ksi,eta,z0,lz,lrt(ts(eta,ksi),z0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,ts"rt"(x,y))]t2(x,t,y,u,v)):lrt(ts(eta,ksi),z0)
--4142
-eta@satz142:=isi1(ts(ksi,eta),ts(eta,ksi),[x:rat][t:lrt(ts(ksi,eta),x)]t3".4142"(x,t),[x:rat][t:lrt(ts(eta,ksi),x)]t3".4142"(eta,ksi,x,t)):is(ts(ksi,eta),ts(eta,ksi))
-comts:=satz142:is(ts(ksi,eta),ts(eta,ksi))
-+4143
-zeta@[u0:rat][lu:lrt(ts(ts(ksi,eta),zeta),u0)][v0:rat][lv:lrt(ts(ksi,eta),v0)][z0:rat][lz:lrt(zeta,z0)][i:is"rt"(u0,ts"rt"(v0,z0))][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(v0,ts"rt"(x0,y0))]
-t1:=tr3is(rat,u0,ts"rt"(v0,z0),ts"rt"(ts"rt"(x0,y0),z0),ts"rt"(x0,ts"rt"(y0,z0)),i,ists1"rt"(v0,ts"rt"(x0,y0),z0,j),assts1(x0,y0,z0)):is"rt"(u0,ts"rt"(x0,ts"rt"(y0,z0)))
-t2:=lrtts(eta,zeta,ts"rt"(y0,z0),y0,ly,z0,lz,refis(rat,ts"rt"(y0,z0))):lrt(ts(eta,zeta),ts"rt"(y0,z0))
-t3:=lrtts(ksi,ts(eta,zeta),u0,x0,lx,ts"rt"(y0,z0),t2,t1):lrt(ts(ksi,ts(eta,zeta)),u0)
-i@t4:=tsapp(ksi,eta,v0,lv,lrt(ts(ksi,ts(eta,zeta)),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(v0,ts"rt"(x,y))]t3(x,t,y,u,v)):lrt(ts(ksi,ts(eta,zeta)),u0)
-lu@t5:=tsapp(ts(ksi,eta),zeta,u0,lu,lrt(ts(ksi,ts(eta,zeta)),u0),[x:rat][t:lrt(ts(ksi,eta),x)][y:rat][u:lrt(zeta,y)][v:is"rt"(u0,ts"rt"(x,y))]t4(x,t,y,u,v)):lrt(ts(ksi,ts(eta,zeta)),u0)
-u0@[lu:lrt(ts(ksi,ts(eta,zeta)),u0)][x0:rat][lx:lrt(ksi,x0)][v0:rat][lv:lrt(ts(eta,zeta),v0)][i:is"rt"(u0,ts"rt"(x0,v0))][y0:rat][ly:lrt(eta,y0)][z0:rat][lz:lrt(zeta,z0)][j:is"rt"(v0,ts"rt"(y0,z0))]
-t6:=tr3is(rat,u0,ts"rt"(x0,v0),ts"rt"(x0,ts"rt"(y0,z0)),ts"rt"(ts"rt"(x0,y0),z0),i,ists2"rt"(v0,ts"rt"(y0,z0),x0,j),assts2(x0,y0,z0)):is"rt"(u0,ts"rt"(ts"rt"(x0,y0),z0))
-t7:=lrtts(ksi,eta,ts"rt"(x0,y0),x0,lx,y0,ly,refis(rat,ts"rt"(x0,y0))):lrt(ts(ksi,eta),ts"rt"(x0,y0))
-t8:=lrtts(ts(ksi,eta),zeta,u0,ts"rt"(x0,y0),t7,z0,lz,t6):lrt(ts(ts(ksi,eta),zeta),u0)
-i@t9:=tsapp(eta,zeta,v0,lv,lrt(ts(ts(ksi,eta),zeta),u0),[x:rat][t:lrt(eta,x)][y:rat][u:lrt(zeta,y)][v:is"rt"(v0,ts"rt"(x,y))]t8(x,t,y,u,v)):lrt(ts(ts(ksi,eta),zeta),u0)
-lu@t10:=tsapp(ksi,ts(eta,zeta),u0,lu,lrt(ts(ts(ksi,eta),zeta),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(ts(eta,zeta),y)][v:is"rt"(u0,ts"rt"(x,y))]t9(x,t,y,u,v)):lrt(ts(ts(ksi,eta),zeta),u0)
--4143
-zeta@satz143:=isi1(ts(ts(ksi,eta),zeta),ts(ksi,ts(eta,zeta)),[x:rat][t:lrt(ts(ts(ksi,eta),zeta),x)]t5".4143"(x,t),[x:rat][t:lrt(ts(ksi,ts(eta,zeta)),x)]t10".4143"(x,t)):is(ts(ts(ksi,eta),zeta),ts(ksi,ts(eta,zeta)))
-assts1:=satz143:is(ts(ts(ksi,eta),zeta),ts(ksi,ts(eta,zeta)))
-assts2:=symis(cut,ts(ts(ksi,eta),zeta),ts(ksi,ts(eta,zeta)),satz143):is(ts(ksi,ts(eta,zeta)),ts(ts(ksi,eta),zeta))
-+4144
-[u0:rat][lu:lrt(ts(ksi,pl(eta,zeta)),u0)][x0:rat][lx:lrt(ksi,x0)][v0:rat][lv:lrt(pl(eta,zeta),v0)][i:is"rt"(u0,ts"rt"(x0,v0))][y0:rat][ly:lrt(eta,y0)][z0:rat][lz:lrt(zeta,z0)][j:is"rt"(v0,pl"rt"(y0,z0))]
-t1:=tr3is(rat,u0,ts"rt"(x0,v0),ts"rt"(x0,pl"rt"(y0,z0)),pl"rt"(ts"rt"(x0,y0),ts"rt"(x0,z0)),i,ists2"rt"(v0,pl"rt"(y0,z0),x0,j),disttp2(x0,y0,z0)):is"rt"(u0,pl"rt"(ts"rt"(x0,y0),ts"rt"(x0,z0)))
-t2:=lrtts(ksi,eta,ts"rt"(x0,y0),x0,lx,y0,ly,refis(rat,ts"rt"(x0,y0))):lrt(ts(ksi,eta),ts"rt"(x0,y0))
-t3:=lrtts(ksi,zeta,ts"rt"(x0,z0),x0,lx,z0,lz,refis(rat,ts"rt"(x0,z0))):lrt(ts(ksi,zeta),ts"rt"(x0,z0))
-t4:=lrtpl(ts(ksi,eta),ts(ksi,zeta),u0,ts"rt"(x0,y0),t2,ts"rt"(x0,z0),t3,t1):lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0)
-i@t5:=plapp(eta,zeta,v0,lv,lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0),[x:rat][t:lrt(eta,x)][y:rat][u:lrt(zeta,y)][v:is"rt"(v0,pl"rt"(x,y))]t4(x,t,y,u,v)):lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0)
-lu@t6:=tsapp(ksi,pl(eta,zeta),u0,lu,lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(pl(eta,zeta),y)][v:is"rt"(u0,ts"rt"(x,y))]t5(x,t,y,u,v)):lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0)
-u0@[lu:lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0)][v0:rat][lv:lrt(ts(ksi,eta),v0)][w0:rat][lw:lrt(ts(ksi,zeta),w0)][i:is"rt"(u0,pl"rt"(v0,w0))][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(v0,ts"rt"(x0,y0))][x1:rat][lx1:lrt(ksi,x1)][z0:rat][lz:lrt(zeta,z0)][k:is"rt"(w0,ts"rt"(x1,z0))]
-t7:=tris(rat,u0,pl"rt"(v0,w0),pl"rt"(ts"rt"(x0,y0),ts"rt"(x1,z0)),i,ispl12"rt"(v0,ts"rt"(x0,y0),w0,ts"rt"(x1,z0),j,k)):is"rt"(u0,pl"rt"(ts"rt"(x0,y0),ts"rt"(x1,z0)))
-x2:=ite(moreis"rt"(x0,x1),rat,x0,x1):rat
-[m:moreis"rt"(x0,x1)]
-t8:=itet(moreis"rt"(x0,x1),rat,x0,x1,m):is"rt"(x2,x0)
-t9:=isp1(rat,[t:rat]lrt(ksi,t),x0,x2,lx,t8):lrt(ksi,x2)
-t10:=lessisi2"rt"(x0,x2,symis(rat,x2,x0,t8)):lessis"rt"(x0,x2)
-t11:=satz88(x1,x0,x2,satz84(x0,x1,m),t10):lessis"rt"(x1,x2)
-k@[n:not(moreis"rt"(x0,x1))]
-t12:=itef(moreis"rt"(x0,x1),rat,x0,x1,n):is"rt"(x2,x1)
-t13:=isp1(rat,[t:rat]lrt(ksi,t),x1,x2,lx1,t12):lrt(ksi,x2)
-t14:=lessisi2"rt"(x1,x2,symis(rat,x2,x1,t12)):lessis"rt"(x1,x2)
-t15:=lessisi1"rt"(x0,x2,satz87b(x0,x1,x2,satz81j(x0,x1,n),t14)):lessis"rt"(x0,x2)
-k@t16:=th1"l.imp"(moreis"rt"(x0,x1),lrt(ksi,x2),[t:moreis"rt"(x0,x1)]t9(t),[t:not(moreis"rt"(x0,x1))]t13(t)):lrt(ksi,x2)
-t17:=th1"l.imp"(moreis"rt"(x0,x1),lessis"rt"(x0,x2),[t:moreis"rt"(x0,x1)]t10(t),[t:not(moreis"rt"(x0,x1))]t15(t)):lessis"rt"(x0,x2)
-t18:=th1"l.imp"(moreis"rt"(x0,x1),lessis"rt"(x1,x2),[t:moreis"rt"(x0,x1)]t11(t),[t:not(moreis"rt"(x0,x1))]t14(t)):lessis"rt"(x1,x2)
-t19:=lrtpl(eta,zeta,pl"rt"(y0,z0),y0,ly,z0,lz,refis(rat,pl"rt"(y0,z0))):lrt(pl(eta,zeta),pl"rt"(y0,z0))
-t20:=lrtts(ksi,pl(eta,zeta),ts"rt"(x2,pl"rt"(y0,z0)),x2,t16,pl"rt"(y0,z0),t19,refis(rat,ts"rt"(x2,pl"rt"(y0,z0)))):lrt(ts(ksi,pl(eta,zeta)),ts"rt"(x2,pl"rt"(y0,z0)))
-t21:=satz109a(x0,x2,y0,y0,t17,lessisi2"rt"(y0,y0,refis(rat,y0))):lessis"rt"(ts"rt"(x0,y0),ts"rt"(x2,y0))
-t22:=satz109a(x1,x2,z0,z0,t18,lessisi2"rt"(z0,z0,refis(rat,z0))):lessis"rt"(ts"rt"(x1,z0),ts"rt"(x2,z0))
-t23:=islessis12"rt"(pl"rt"(ts"rt"(x0,y0),ts"rt"(x1,z0)),u0,pl"rt"(ts"rt"(x2,y0),ts"rt"(x2,z0)),ts"rt"(x2,pl"rt"(y0,z0)),symis(rat,u0,pl"rt"(ts"rt"(x0,y0),ts"rt"(x1,z0)),t7),distpt2(x2,y0,z0),satz100a(ts"rt"(x0,y0),ts"rt"(x2,y0),ts"rt"(x1,z0),ts"rt"(x2,z0),t21,t22)):lessis"rt"(u0,ts"rt"(x2,pl"rt"(y0,z0)))
-t24:=orapp(less"rt"(u0,ts"rt"(x2,pl"rt"(y0,z0))),is"rt"(u0,ts"rt"(x2,pl"rt"(y0,z0))),lrt(ts(ksi,pl(eta,zeta)),u0),t23,[t:less"rt"(u0,ts"rt"(x2,pl"rt"(y0,z0)))]satz120(ts(ksi,pl(eta,zeta)),ts"rt"(x2,pl"rt"(y0,z0)),t20,u0,t),[t:is"rt"(u0,ts"rt"(x2,pl"rt"(y0,z0)))]isp1(rat,[u:rat]lrt(ts(ksi,pl(eta,zeta)),u),ts"rt"(x2,pl"rt"(y0,z0)),u0,t20,t)):lrt(ts(ksi,pl(eta,zeta)),u0)
-j@t25:=tsapp(ksi,zeta,w0,lw,lrt(ts(ksi,pl(eta,zeta)),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(zeta,y)][v:is"rt"(w0,ts"rt"(x,y))]t24(x,t,y,u,v)):lrt(ts(ksi,pl(eta,zeta)),u0)
-i@t26:=tsapp(ksi,eta,v0,lv,lrt(ts(ksi,pl(eta,zeta)),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(v0,ts"rt"(x,y))]t25(x,t,y,u,v)):lrt(ts(ksi,pl(eta,zeta)),u0)
-lu@t27:=plapp(ts(ksi,eta),ts(ksi,zeta),u0,lu,lrt(ts(ksi,pl(eta,zeta)),u0),[x:rat][t:lrt(ts(ksi,eta),x)][y:rat][u:lrt(ts(ksi,zeta),y)][v:is"rt"(u0,pl"rt"(x,y))]t26(x,t,y,u,v)):lrt(ts(ksi,pl(eta,zeta)),u0)
--4144
-satz144:=isi1(ts(ksi,pl(eta,zeta)),pl(ts(ksi,eta),ts(ksi,zeta)),[x:rat][t:lrt(ts(ksi,pl(eta,zeta)),x)]t6".4144"(x,t),[x:rat][t:lrt(pl(ts(ksi,eta),ts(ksi,zeta)),x)]t27".4144"(x,t)):is(ts(ksi,pl(eta,zeta)),pl(ts(ksi,eta),ts(ksi,zeta)))
-disttp1:=tr3is(cut,ts(pl(ksi,eta),zeta),ts(zeta,pl(ksi,eta)),pl(ts(zeta,ksi),ts(zeta,eta)),pl(ts(ksi,zeta),ts(eta,zeta)),comts(pl(ksi,eta),zeta),satz144(zeta,ksi,eta),ispl12(ts(zeta,ksi),ts(ksi,zeta),ts(zeta,eta),ts(eta,zeta),comts(zeta,ksi),comts(zeta,eta))):is(ts(pl(ksi,eta),zeta),pl(ts(ksi,zeta),ts(eta,zeta)))
-disttp2:=satz144:is(ts(ksi,pl(eta,zeta)),pl(ts(ksi,eta),ts(ksi,zeta)))
-distpt1:=symis(cut,ts(pl(ksi,eta),zeta),pl(ts(ksi,zeta),ts(eta,zeta)),disttp1):is(pl(ts(ksi,zeta),ts(eta,zeta)),ts(pl(ksi,eta),zeta))
-distpt2:=symis(cut,ts(ksi,pl(eta,zeta)),pl(ts(ksi,eta),ts(ksi,zeta)),disttp2):is(pl(ts(ksi,eta),ts(ksi,zeta)),ts(ksi,pl(eta,zeta)))
-[m:more(ksi,eta)]
-+4145
-phi:=mn(ksi,eta,m):cut
-t1:=satz140d(ksi,eta,m):is(ksi,pl(eta,phi))
-t2:=tris(cut,ts(ksi,zeta),ts(pl(eta,phi),zeta),pl(ts(eta,zeta),ts(phi,zeta)),ists1(ksi,pl(eta,phi),zeta,t1),disttp1(eta,phi,zeta)):is(ts(ksi,zeta),pl(ts(eta,zeta),ts(phi,zeta)))
--4145
-satz145a:=ismore1(pl(ts(eta,zeta),ts(phi".4145",zeta)),ts(ksi,zeta),ts(eta,zeta),symis(cut,ts(ksi,zeta),pl(ts(eta,zeta),ts(phi".4145",zeta)),t2".4145"),satz133(ts(eta,zeta),ts(phi".4145",zeta))):more(ts(ksi,zeta),ts(eta,zeta))
-zeta@[i:is(ksi,eta)]
-satz145b:=ists1(ksi,eta,zeta,i):is(ts(ksi,zeta),ts(eta,zeta))
-zeta@[l:less(ksi,eta)]
-satz145c:=satz121(ts(eta,zeta),ts(ksi,zeta),satz145a(eta,ksi,zeta,satz122(ksi,eta,l))):less(ts(ksi,zeta),ts(eta,zeta))
-m@satz145d:=ismore12(ts(ksi,zeta),ts(zeta,ksi),ts(eta,zeta),ts(zeta,eta),comts(ksi,zeta),comts(eta,zeta),satz145a):more(ts(zeta,ksi),ts(zeta,eta))
-i@satz145e:=ists2(ksi,eta,zeta,i):is(ts(zeta,ksi),ts(zeta,eta))
-l@satz145f:=isless12(ts(ksi,zeta),ts(zeta,ksi),ts(eta,zeta),ts(zeta,eta),comts(ksi,zeta),comts(eta,zeta),satz145c):less(ts(zeta,ksi),ts(zeta,eta))
-upsilon@[i:is(ksi,eta)][m:more(zeta,upsilon)]
-satz145g:=ismore2(ts(ksi,upsilon),ts(eta,upsilon),ts(ksi,zeta),ists1(ksi,eta,upsilon,i),satz145d(zeta,upsilon,ksi,m)):more(ts(ksi,zeta),ts(eta,upsilon))
-satz145h:=ismore12(ts(ksi,zeta),ts(zeta,ksi),ts(eta,upsilon),ts(upsilon,eta),comts(ksi,zeta),comts(eta,upsilon),satz145g):more(ts(zeta,ksi),ts(upsilon,eta))
-i@[l:less(zeta,upsilon)]
-satz145j:=isless2(ts(ksi,upsilon),ts(eta,upsilon),ts(ksi,zeta),ists1(ksi,eta,upsilon,i),satz145f(zeta,upsilon,ksi,l)):less(ts(ksi,zeta),ts(eta,upsilon))
-satz145k:=isless12(ts(ksi,zeta),ts(zeta,ksi),ts(eta,upsilon),ts(upsilon,eta),comts(ksi,zeta),comts(eta,upsilon),satz145j):less(ts(zeta,ksi),ts(upsilon,eta))
-+4146
-zeta@t1:=satz123a(ksi,eta):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-t2:=satz123b(ts(ksi,zeta),ts(eta,zeta)):ec3(is(ts(ksi,zeta),ts(eta,zeta)),more(ts(ksi,zeta),ts(eta,zeta)),less(ts(ksi,zeta),ts(eta,zeta)))
--4146
-zeta@[m:more(ts(ksi,zeta),ts(eta,zeta))]
-satz146a:=th11"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(ts(ksi,zeta),ts(eta,zeta)),more(ts(ksi,zeta),ts(eta,zeta)),less(ts(ksi,zeta),ts(eta,zeta)),t1".4146",t2".4146",[u:is(ksi,eta)]satz145b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz145a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz145c(ksi,eta,zeta,u),m):more(ksi,eta)
-zeta@[i:is(ts(ksi,zeta),ts(eta,zeta))]
-satz146b:=th10"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(ts(ksi,zeta),ts(eta,zeta)),more(ts(ksi,zeta),ts(eta,zeta)),less(ts(ksi,zeta),ts(eta,zeta)),t1".4146",t2".4146",[u:is(ksi,eta)]satz145b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz145a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz145c(ksi,eta,zeta,u),i):is(ksi,eta)
-zeta@[l:less(ts(ksi,zeta),ts(eta,zeta))]
-satz146c:=th12"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(ts(ksi,zeta),ts(eta,zeta)),more(ts(ksi,zeta),ts(eta,zeta)),less(ts(ksi,zeta),ts(eta,zeta)),t1".4146",t2".4146",[u:is(ksi,eta)]satz145b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz145a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz145c(ksi,eta,zeta,u),l):less(ksi,eta)
-zeta@[m:more(ts(zeta,ksi),ts(zeta,eta))]
-satz146d:=satz146a(ismore12(ts(zeta,ksi),ts(ksi,zeta),ts(zeta,eta),ts(eta,zeta),comts(zeta,ksi),comts(zeta,eta),m)):more(ksi,eta)
-zeta@[i:is(ts(zeta,ksi),ts(zeta,eta))]
-satz146e:=satz146b(tr3is(cut,ts(ksi,zeta),ts(zeta,ksi),ts(zeta,eta),ts(eta,zeta),comts(ksi,zeta),i,comts(zeta,eta))):is(ksi,eta)
-zeta@[l:less(ts(zeta,ksi),ts(zeta,eta))]
-satz146f:=satz146c(isless12(ts(zeta,ksi),ts(ksi,zeta),ts(zeta,eta),ts(eta,zeta),comts(zeta,ksi),comts(zeta,eta),l)):less(ksi,eta)
-upsilon@[m:more(ksi,eta)][n:more(zeta,upsilon)]
-+4147
-t1:=satz145a(ksi,eta,zeta,m):more(ts(ksi,zeta),ts(eta,zeta))
-t2:=ismore12(ts(zeta,eta),ts(eta,zeta),ts(upsilon,eta),ts(eta,upsilon),comts(zeta,eta),comts(upsilon,eta),satz145a(zeta,upsilon,eta,n)):more(ts(eta,zeta),ts(eta,upsilon))
--4147
-satz147:=trmore(ts(ksi,zeta),ts(eta,zeta),ts(eta,upsilon),t1".4147",t2".4147"):more(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[l:less(ksi,eta)][k:less(zeta,upsilon)]
-satz147a:=satz121(ts(eta,upsilon),ts(ksi,zeta),satz147(eta,ksi,upsilon,zeta,satz122(ksi,eta,l),satz122(zeta,upsilon,k))):less(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[m:moreis(ksi,eta)][n:more(zeta,upsilon)]
-satz148a:=orapp(more(ksi,eta),is(ksi,eta),more(ts(ksi,zeta),ts(eta,upsilon)),m,[t:more(ksi,eta)]satz147(t,n),[t:is(ksi,eta)]satz145g(t,n)):more(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[m:more(ksi,eta)][n:moreis(zeta,upsilon)]
-satz148b:=orapp(more(zeta,upsilon),is(zeta,upsilon),more(ts(ksi,zeta),ts(eta,upsilon)),n,[t:more(zeta,upsilon)]satz147(m,t),[t:is(zeta,upsilon)]satz145h(zeta,upsilon,ksi,eta,t,m)):more(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[l:lessis(ksi,eta)][k:less(zeta,upsilon)]
-satz148c:=satz121(ts(eta,upsilon),ts(ksi,zeta),satz148a(eta,ksi,upsilon,zeta,satz125(ksi,eta,l),satz122(zeta,upsilon,k))):less(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[l:less(ksi,eta)][k:lessis(zeta,upsilon)]
-satz148d:=satz121(ts(eta,upsilon),ts(ksi,zeta),satz148b(eta,ksi,upsilon,zeta,satz122(ksi,eta,l),satz125(zeta,upsilon,k))):less(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[m:moreis(ksi,eta)][n:moreis(zeta,upsilon)]
-+4149
-[i:is(ksi,eta)][j:is(zeta,upsilon)]
-t1:=moreisi2(ts(ksi,zeta),ts(eta,upsilon),ists12(ksi,eta,zeta,upsilon,i,j)):moreis(ts(ksi,zeta),ts(eta,upsilon))
-i@[o:more(zeta,upsilon)]
-t2:=moreisi1(ts(ksi,zeta),ts(eta,upsilon),satz148a(m,o)):moreis(ts(ksi,zeta),ts(eta,upsilon))
-i@t3:=orapp(more(zeta,upsilon),is(zeta,upsilon),moreis(ts(ksi,zeta),ts(eta,upsilon)),n,[t:more(zeta,upsilon)]t2(t),[t:is(zeta,upsilon)]t1(t)):moreis(ts(ksi,zeta),ts(eta,upsilon))
-n@[o:more(ksi,eta)]
-t4:=moreisi1(ts(ksi,zeta),ts(eta,upsilon),satz148b(o,n)):moreis(ts(ksi,zeta),ts(eta,upsilon))
--4149
-satz149:=orapp(more(ksi,eta),is(ksi,eta),moreis(ts(ksi,zeta),ts(eta,upsilon)),m,[t:more(ksi,eta)]t4".4149"(t),[t:is(ksi,eta)]t3".4149"(t)):moreis(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[l:lessis(ksi,eta)][k:lessis(zeta,upsilon)]
-satz149a:=satz124(ts(eta,upsilon),ts(ksi,zeta),satz149(eta,ksi,upsilon,zeta,satz125(ksi,eta,l),satz125(zeta,upsilon,k))):lessis(ts(ksi,zeta),ts(eta,upsilon))
--rp
-@[r0:rat]
-ratset:=setof(rat,[x:rat]less(x,r0)):set(rat)
-+4150
-t1:=satz90(r0):some([x:rat]less(x,r0))
-[x0:rat][l:less(x0,r0)]
-t2:=estii(rat,[x:rat]less(x,r0),x0,l):in(x0,ratset)
-r0@t3:=ec3e13(is(r0,r0),more(r0,r0),less(r0,r0),satz81b(r0,r0),refis(rat,r0)):not(less(r0,r0))
-t4:=th3"l.imp"(in(r0,ratset),less(r0,r0),t3,[t:in(r0,ratset)]estie(rat,[x:rat]less(x,r0),r0,t)):not(in(r0,ratset))
-x0@[i:in(x0,ratset)]
-t5:=estie(rat,[x:rat]less(x,r0),x0,i):less(x0,r0)
-[x1:rat][k:less(x1,x0)]
-t6:=t2(x1,trless(x1,x0,r0,k,t5)):in(x1,ratset)
-i@t7:=satz91(x0,r0,t5):some([x:rat]and(less(x0,x),less(x,r0)))
-[x1:rat][a:and(less(x0,x1),less(x1,r0))]
-t8:=ande1(less(x0,x1),less(x1,r0),a):less(x0,x1)
-t9:=ande2(less(x0,x1),less(x1,r0),a):less(x1,r0)
-t10:=andi(in(x1,ratset),more(x1,x0),t2(x1,t9),satz83(x0,x1,t8)):and(in(x1,ratset),more(x1,x0))
-i@t11:=th6"l.some"(rat,[x:rat]and(less(x0,x),less(x,r0)),[x:rat]and(in(x,ratset),more(x,x0)),t7,[x:rat][t:and(less(x0,x),less(x,r0))]t10(x,t)):some([x:rat]and(in(x,ratset),more(x,x0)))
-l@t12:=cut2(ratset,x0,t2,r0,t4,[x:rat][t:in(x,ratset)][y:rat][u:less(y,x)]t6(x,t,y,u),[x:rat][t:in(x,ratset)]t11(x,t)):cutprop(ratset)
--4150
-satz150:=someapp(rat,[x:rat]less(x,r0),t1".4150",cutprop(ratset),[x:rat][t:less(x,r0)]t12".4150"(x,t)):cutprop(ratset)
-+*rp
-r0@rpofrt:=cutof(ratset,satz150):cut
-[x0:rat][l:less"rt"(x0,r0)]
-lrtrpofrt:=ine(ratset,satz150,x0,t2"rt.4150"(x0,l)):lrt(rpofrt,x0)
-r0@[x0:rat][lx:lrt(rpofrt,x0)]
-lrtrpofrte:=t5"rt.4150"(x0,ini(ratset,satz150,x0,lx)):less"rt"(x0,r0)
-r0@[x0:rat][m:moreis"rt"(x0,r0)]
-+*iii4
-m@t12:=satz81c(x0,r0,m):not(less"rt"(x0,r0))
--iii4
-m@urtrpofrt:=th3"l.imp"(lrt(rpofrt,x0),less"rt"(x0,r0),t12".iii4",[t:lrt(rpofrt,x0)]lrtrpofrte(x0,t)):urt(rpofrt,x0)
-@1rp:=rpofrt(1rt):cut
-+4151
-ksi@[z0:rat][lz:lrt(ts(ksi,1rp),z0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(1rp,y0)][i:is"rt"(z0,ts"rt"(x0,y0))]
-t1:=lrtrpofrte(1rt,y0,ly):less"rt"(y0,1rt)
-t2:=isless12"rt"(ts"rt"(x0,y0),z0,ts"rt"(x0,1rt),x0,symis(rat,z0,ts"rt"(x0,y0),i),example1a(x0),satz105f(y0,1rt,x0,t1)):less"rt"(z0,x0)
-t3:=satz120(ksi,x0,lx,z0,t2):lrt(ksi,z0)
-lz@t4:=tsapp(ksi,1rp,z0,lz,lrt(ksi,z0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(1rp,y)][v:is"rt"(z0,ts"rt"(x,y))]t3(x,t,y,u,v)):lrt(ksi,z0)
-ksi@[x0:rat][lx:lrt(ksi,x0)][x1:rat][lx1:lrt(ksi,x1)][l:less"rt"(x0,x1)]
-y1:=ts"rt"(ov(1rt,x1),x0):rat
-t5:=isless2"rt"(ts"rt"(ov(1rt,x1),x1),1rt,y1,satz110e(1rt,x1),satz105f(x0,x1,ov(1rt,x1),l)):less"rt"(y1,1rt)
-t6:=lrtrpofrt(1rt,y1,t5):lrt(1rp,y1)
-t7:=tr3is(rat,ts"rt"(x1,y1),ts"rt"(ts"rt"(x1,ov(1rt,x1)),x0),ts"rt"(1rt,x0),x0,assts2"rt"(x1,ov(1rt,x1),x0),ists1"rt"(ts"rt"(x1,ov(1rt,x1)),1rt,x0,satz110c(1rt,x1)),example1c(x0)):is"rt"(ts"rt"(x1,y1),x0)
-t8:=lrtts(ksi,1rp,x0,x1,lx1,y1,t6,symis(rat,ts"rt"(x1,y1),x0,t7)):lrt(ts(ksi,1rp),x0)
-lx@t9:=cutapp3(ksi,x0,lx,lrt(ts(ksi,1rp),x0),[y:rat][t:lrt(ksi,y)][u:less"rt"(x0,y)]t8(y,t,u)):lrt(ts(ksi,1rp),x0)
--4151
-ksi@satz151:=isi1(ts(ksi,1rp),ksi,[x:rat][t:lrt(ts(ksi,1rp),x)]t4".4151"(x,t),[x:rat][t:lrt(ksi,x)]t9".4151"(x,t)):is(ts(ksi,1rp),ksi)
-satz151a:=symis(cut,ts(ksi,1rp),ksi,satz151):is(ksi,ts(ksi,1rp))
-satz151b:=tris(cut,ts(1rp,ksi),ts(ksi,1rp),ksi,comts(1rp,ksi),satz151):is(ts(1rp,ksi),ksi)
-satz151c:=symis(cut,ts(1rp,ksi),ksi,satz151b):is(ksi,ts(1rp,ksi))
-+4152
-[x0:rat][y0:rat]
-invprop1:=and(urt(ksi,y0),less"rt"(y0,x0)):'prop'
-ksi@[z0:rat][x0:rat]
-invprop2:=and3(urt(ksi,x0),some"rt"([x:rat]invprop1(x0,x)),is"rt"(z0,ov(1rt,x0))):'prop'
-z0@invprop:=some"rt"([x:rat]invprop2(z0,x)):'prop'
-ksi@inv:=setof(rat,[z:rat]invprop(z)):set(rat)
-x0@[ux:urt(ksi,x0)][y0:rat][uy:urt(ksi,y0)][l:less"rt"(y0,x0)][i:is"rt"(z0,ov(1rt,x0))]
-t1:=andi(urt(ksi,y0),less"rt"(y0,x0),uy,l):invprop1(x0,y0)
-t2:=somei(rat,[x:rat]invprop1(x0,x),y0,t1):some"rt"([x:rat]invprop1(x0,x))
-t3:=and3i(urt(ksi,x0),some"rt"([x:rat]invprop1(x0,x)),is"rt"(z0,ov(1rt,x0)),ux,t2,i):invprop2(z0,x0)
-t4:=somei(rat,[x:rat]invprop2(z0,x),x0,t3):invprop(z0)
-inv1:=estii(rat,[z:rat]invprop(z),z0,t4):in(z0,inv)
-z0@[i:in(z0,inv)][p:'prop'][p1:[x:rat][t:urt(ksi,x)][y:rat][u:urt(ksi,y)][v:less"rt"(y,x)][w:is"rt"(z0,ov(1rt,x))]p]
-t5:=estie(rat,[x:rat]invprop(x),z0,i):invprop(z0)
-[x0:rat][px:invprop2(z0,x0)]
-t6:=and3e1(urt(ksi,x0),some"rt"([x:rat]invprop1(x0,x)),is"rt"(z0,ov(1rt,x0)),px):urt(ksi,x0)
-t7:=and3e2(urt(ksi,x0),some"rt"([x:rat]invprop1(x0,x)),is"rt"(z0,ov(1rt,x0)),px):some"rt"([x:rat]invprop1(x0,x))
-t8:=and3e3(urt(ksi,x0),some"rt"([x:rat]invprop1(x0,x)),is"rt"(z0,ov(1rt,x0)),px):is"rt"(z0,ov(1rt,x0))
-[y0:rat][py:invprop1(x0,y0)]
-t9:=ande1(urt(ksi,y0),less"rt"(y0,x0),py):urt(ksi,y0)
-t10:=ande2(urt(ksi,y0),less"rt"(y0,x0),py):less"rt"(y0,x0)
-t11:=<t8><t10><t9><y0><t6><x0>p1:p
-px@t12:=someapp(rat,[x:rat]invprop1(x0,x),t7,p,[x:rat][t:invprop1(x0,x)]t11(x,t)):p
-p1@invapp:=someapp(rat,[x:rat]invprop2(z0,x),t5,p,[x:rat][t:invprop2(z0,x)]t12(x,t)):p
-ksi@[x0:rat][ux:urt(ksi,x0)]
-2x0:=pl"rt"(x0,x0):rat
-t13:=satz94a(x0,x0):less"rt"(x0,2x0)
-t14:=satz119a(ksi,x0,ux,2x0,t13):urt(ksi,2x0)
-t15:=inv1(ov(1rt,2x0),2x0,t14,x0,ux,t13,refis(rat,ov(1rt,2x0))):in(ov(1rt,2x0),inv)
-ksi@[x1:rat][lx:lrt(ksi,x1)][x0:rat][ux:urt(ksi,x0)]
-t16:=th3"l.imp"(is"rt"(x0,x1),lrt(ksi,x0),ux,[t:is"rt"(x0,x1)]isp1(rat,[x:rat]lrt(ksi,x),x1,x0,lx,t)):nis"rt"(x0,x1)
-t17:=satz110e(1rt,x0):is"rt"(ts"rt"(ov(1rt,x0),x0),1rt)
-t18:=satz110e(1rt,x1):is"rt"(ts"rt"(ov(1rt,x1),x1),1rt)
-[i:is"rt"(ov(1rt,x0),ov(1rt,x1))]
-t19:=tris(rat,ts"rt"(ov(1rt,x0),x1),ts"rt"(ov(1rt,x1),x1),1rt,ists1"rt"(ov(1rt,x0),ov(1rt,x1),x1,i),t18):is"rt"(ts"rt"(ov(1rt,x0),x1),1rt)
-t20:=satz110b(1rt,ov(1rt,x0),x0,x1,t17,t19):is"rt"(x0,x1)
-ux@t21:=th3"l.imp"(is"rt"(ov(1rt,x0),ov(1rt,x1)),is"rt"(x0,x1),t16,[t:is"rt"(ov(1rt,x0),ov(1rt,x1))]t20(t)):nis"rt"(ov(1rt,x0),ov(1rt,x1))
-lx@[i:in(ov(1rt,x1),inv)]
-t22:=invapp(ov(1rt,x1),i,con,[x:rat][t:urt(ksi,x)][y:rat][u:urt(ksi,y)][v:less"rt"(y,x)][w:is"rt"(ov(1rt,x1),ov(1rt,x))]<symis(rat,ov(1rt,x1),ov(1rt,x),w)>t21(x,t)):con
-lx@t23:=[t:in(ov(1rt,x1),inv)]t22(t):not(in(ov(1rt,x1),inv))
-ksi@[z0:rat][i:in(z0,inv)][u0:rat][l:less"rt"(u0,z0)][x0:rat][ux:urt(ksi,x0)][j:is"rt"(z0,ov(1rt,x0))]
-t24:=isless2"rt"(z0,ov(1rt,x0),u0,j,l):less"rt"(u0,ov(1rt,x0))
-t25:=tris(rat,ts"rt"(ov(1rt,x0),x0),1rt,ts"rt"(u0,ov(1rt,u0)),satz110e(1rt,x0),satz110d(1rt,u0)):is"rt"(ts"rt"(ov(1rt,x0),x0),ts"rt"(u0,ov(1rt,u0)))
-t26:=isless2"rt"(ts"rt"(ov(1rt,x0),x0),ts"rt"(u0,ov(1rt,u0)),ts"rt"(u0,x0),t25,satz105c(u0,ov(1rt,x0),x0,t24)):less"rt"(ts"rt"(u0,x0),ts"rt"(u0,ov(1rt,u0)))
-t27:=isless12"rt"(ts"rt"(u0,x0),ts"rt"(x0,u0),ts"rt"(u0,ov(1rt,u0)),ts"rt"(ov(1rt,u0),u0),comts"rt"(u0,x0),comts"rt"(u0,ov(1rt,u0)),t26):less"rt"(ts"rt"(x0,u0),ts"rt"(ov(1rt,u0),u0))
-t28:=satz106c(x0,ov(1rt,u0),u0,t27):less"rt"(x0,ov(1rt,u0))
-t29:=satz119a(x0,ux,ov(1rt,u0),t28):urt(ksi,ov(1rt,u0))
-t30:=satz110e(1rt,u0):is"rt"(ts"rt"(ov(1rt,u0),u0),1rt)
-t31:=satz110g(1rt,ov(1rt,u0),u0,t30):is"rt"(u0,ov(1rt,ov(1rt,u0)))
-t32:=inv1(u0,ov(1rt,u0),t29,x0,ux,t28,t31):in(u0,inv)
-l@t33:=invapp(z0,i,in(u0,inv),[x:rat][t:urt(ksi,x)][y:rat][u:urt(ksi,y)][v:less"rt"(y,x)][w:is"rt"(z0,ov(1rt,x))]t32(x,t,w)):in(u0,inv)
-i@[x0:rat][ux:urt(ksi,x0)][x1:rat][ux1:urt(ksi,x1)][l:less"rt"(x1,x0)][j:is"rt"(z0,ov(1rt,x0))]
-t34:=satz91(x1,x0,l):some"rt"([x:rat]and(less"rt"(x1,x),less"rt"(x,x0)))
-[x2:rat][a:and(less"rt"(x1,x2),less"rt"(x2,x0))]
-t35:=ande1(less"rt"(x1,x2),less"rt"(x2,x0),a):less"rt"(x1,x2)
-t36:=satz119a(ksi,x1,ux1,x2,t35):urt(ksi,x2)
-t37:=inv1(ov(1rt,x2),x2,t36,x1,ux1,t35,refis(rat,ov(1rt,x2))):in(ov(1rt,x2),inv)
-t38:=ande2(less"rt"(x1,x2),less"rt"(x2,x0),a):less"rt"(x2,x0)
-t39:=tris(rat,ts"rt"(x0,ov(1rt,x0)),1rt,ts"rt"(x2,ov(1rt,x2)),satz110c(1rt,x0),satz110d(1rt,x2)):is"rt"(ts"rt"(x0,ov(1rt,x0)),ts"rt"(x2,ov(1rt,x2)))
-t40:=isless2"rt"(ts"rt"(x0,ov(1rt,x0)),ts"rt"(x2,ov(1rt,x2)),ts"rt"(x2,ov(1rt,x0)),t39,satz105c(x2,x0,ov(1rt,x0),t38)):less"rt"(ts"rt"(x2,ov(1rt,x0)),ts"rt"(x2,ov(1rt,x2)))
-t41:=isless12"rt"(ts"rt"(x2,ov(1rt,x0)),ts"rt"(ov(1rt,x0),x2),ts"rt"(x2,ov(1rt,x2)),ts"rt"(ov(1rt,x2),x2),comts"rt"(x2,ov(1rt,x0)),comts"rt"(x2,ov(1rt,x2)),t40):less"rt"(ts"rt"(ov(1rt,x0),x2),ts"rt"(ov(1rt,x2),x2))
-t42:=satz106c(ov(1rt,x0),ov(1rt,x2),x2,t41):less"rt"(ov(1rt,x0),ov(1rt,x2))
-t43:=ismore2"rt"(ov(1rt,x0),z0,ov(1rt,x2),symis(rat,z0,ov(1rt,x0),j),satz83(ov(1rt,x0),ov(1rt,x2),t42)):more"rt"(ov(1rt,x2),z0)
-t44:=andi(in(ov(1rt,x2),inv),more"rt"(ov(1rt,x2),z0),t37,t43):and(in(ov(1rt,x2),inv),more"rt"(ov(1rt,x2),z0))
-t45:=somei(rat,[x:rat]and(in(x,inv),more"rt"(x,z0)),ov(1rt,x2),t44):some"rt"([x:rat]and(in(x,inv),more"rt"(x,z0)))
-j@t46:=someapp(rat,[x:rat]and(less"rt"(x1,x),less"rt"(x,x0)),t34,some"rt"([x:rat]and(in(x,inv),more"rt"(x,z0))),[x:rat][t:and(less"rt"(x1,x),less"rt"(x,x0))]t45(x,t)):some"rt"([x:rat]and(in(x,inv),more"rt"(x,z0)))
-i@t47:=invapp(z0,i,some"rt"([x:rat]and(in(x,inv),more"rt"(x,z0))),[x:rat][t:urt(ksi,x)][y:rat][u:urt(ksi,y)][v:less"rt"(y,x)][w:is"rt"(z0,ov(1rt,x))]t46(x,t,y,u,v,w)):some"rt"([x:rat]and(in(x,inv),more"rt"(x,z0)))
-ksi@[x0:rat][lx:lrt(ksi,x0)][y0:rat][uy:urt(ksi,y0)]
-t48:=cut2(inv,ov(1rt,pl"rt"(y0,y0)),t15(y0,uy),ov(1rt,x0),t23(x0,lx),[x:rat][t:in(x,inv)][y:rat][u:less"rt"(y,x)]t33(x,t,y,u),[x:rat][t:in(x,inv)]t47(x,t)):cutprop(inv)
-lx@t49:=cutapp1b(ksi,cutprop(inv),[x:rat][t:urt(ksi,x)]t48(x,t)):cutprop(inv)
-ksi@t50:=cutapp1a(ksi,cutprop(inv),[x:rat][t:lrt(ksi,x)]t49(x,t)):cutprop(inv)
-chi:=cutof(inv,t50):cut
-[z0:rat][lz:lrt(ts(ksi,chi),z0)][x0:rat][lx:lrt(ksi,x0)][u0:rat][lu:lrt(chi,u0)][i:is"rt"(z0,ts"rt"(x0,u0))][x1:rat][ux:urt(ksi,x1)][j:is"rt"(u0,ov(1rt,x1))]
-t51:=tris(rat,z0,ts"rt"(x0,u0),ts"rt"(x0,ov(1rt,x1)),i,ists2"rt"(u0,ov(1rt,x1),x0,j)):is"rt"(z0,ts"rt"(x0,ov(1rt,x1)))
-t52:=cutapp2a(ksi,x0,lx,x1,ux):less"rt"(x0,x1)
-t53:=isless12"rt"(ts"rt"(x0,ov(1rt,x1)),z0,ts"rt"(x1,ov(1rt,x1)),1rt,symis(rat,z0,ts"rt"(x0,ov(1rt,x1)),t51),satz110c(1rt,x1),satz105c(x0,x1,ov(1rt,x1),t52)):less"rt"(z0,1rt)
-t54:=lrtrpofrt(1rt,z0,t53):lrt(1rp,z0)
-i@r1:=ini(inv,t50,u0,lu):in(u0,inv)
-r2:=invapp(u0,r1,lrt(1rp,z0),[x:rat][t:urt(ksi,x)][y:rat][u:urt(ksi,y)][v:less"rt"(y,x)][w:is"rt"(u0,ov(1rt,x))]t54(x,t,w)):lrt(1rp,z0)
-lz@r3:=tsapp(ksi,chi,z0,lz,lrt(1rp,z0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(chi,y)][v:is"rt"(z0,ts"rt"(x,y))]r2(x,t,y,u,v)):lrt(1rp,z0)
-ksi@[u0:rat][lu:lrt(1rp,u0)]
-t55:=lrtrpofrte(1rt,u0,lu):less"rt"(u0,1rt)
-t56:=satz83(u0,1rt,t55):more"rt"(1rt,u0)
-[x0:rat][lx:lrt(ksi,x0)][x1:rat][lx1:lrt(ksi,x1)][x2:rat][ux2:urt(ksi,x2)]
-t57:=cutapp2b(x1,lx1,x2,ux2):more"rt"(x2,x1)
-[i:is"rt"(mn"rt"(x2,x1,t57),ts"rt"(mn"rt"(1rt,u0,t56),x0))]
-t58:=cutapp2a(x0,lx,x2,ux2):less"rt"(x0,x2)
-t59:=satz105f(x0,x2,mn"rt"(1rt,u0,t56),t58):less"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x0),ts"rt"(mn"rt"(1rt,u0,t56),x2))
-t60:=isless1"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x0),mn"rt"(x2,x1,t57),ts"rt"(mn"rt"(1rt,u0,t56),x2),symis(rat,mn"rt"(x2,x1,t57),ts"rt"(mn"rt"(1rt,u0,t56),x0),i),t59):less"rt"(mn"rt"(x2,x1,t57),ts"rt"(mn"rt"(1rt,u0,t56),x2))
-t61:=tr4is(rat,pl"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x2),ts"rt"(u0,x2)),ts"rt"(pl"rt"(mn"rt"(1rt,u0,t56),u0),x2),ts"rt"(1rt,x2),x2,pl"rt"(mn"rt"(x2,x1,t57),x1),distpt1"rt"(mn"rt"(1rt,u0,t56),u0,x2),ists1"rt"(pl"rt"(mn"rt"(1rt,u0,t56),u0),1rt,x2,satz101e(1rt,u0,t56)),example1c(x2),satz101f(x2,x1,t57)):is"rt"(pl"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x2),ts"rt"(u0,x2)),pl"rt"(mn"rt"(x2,x1,t57),x1))
-t62:=satz96c(mn"rt"(x2,x1,t57),ts"rt"(mn"rt"(1rt,u0,t56),x2),ts"rt"(u0,x2),t60):less"rt"(pl"rt"(mn"rt"(x2,x1,t57),ts"rt"(u0,x2)),pl"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x2),ts"rt"(u0,x2)))
-t63:=isless2"rt"(pl"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x2),ts"rt"(u0,x2)),pl"rt"(mn"rt"(x2,x1,t57),x1),pl"rt"(mn"rt"(x2,x1,t57),ts"rt"(u0,x2)),t61,t62):less"rt"(pl"rt"(mn"rt"(x2,x1,t57),ts"rt"(u0,x2)),pl"rt"(mn"rt"(x2,x1,t57),x1))
-t64:=isless12"rt"(pl"rt"(mn"rt"(x2,x1,t57),ts"rt"(u0,x2)),pl"rt"(ts"rt"(u0,x2),mn"rt"(x2,x1,t57)),pl"rt"(mn"rt"(x2,x1,t57),x1),pl"rt"(x1,mn"rt"(x2,x1,t57)),compl"rt"(mn"rt"(x2,x1,t57),ts"rt"(u0,x2)),compl"rt"(mn"rt"(x2,x1,t57),x1),t63):less"rt"(pl"rt"(ts"rt"(u0,x2),mn"rt"(x2,x1,t57)),pl"rt"(x1,mn"rt"(x2,x1,t57)))
-t65:=satz97c(ts"rt"(u0,x2),x1,mn"rt"(x2,x1,t57),t64):less"rt"(ts"rt"(u0,x2),x1)
-t66:=tr3is(rat,ts"rt"(ov(1rt,u0),ts"rt"(u0,x2)),ts"rt"(ts"rt"(ov(1rt,u0),u0),x2),ts"rt"(1rt,x2),x2,assts2"rt"(ov(1rt,u0),u0,x2),ists1"rt"(ts"rt"(ov(1rt,u0),u0),1rt,x2,satz110e(1rt,u0)),example1c(x2)):is"rt"(ts"rt"(ov(1rt,u0),ts"rt"(u0,x2)),x2)
-t67:=isless12"rt"(ts"rt"(ov(1rt,u0),ts"rt"(u0,x2)),x2,ts"rt"(ov(1rt,u0),x1),ov(x1,u0),t66,satz141b(x1,u0),satz105f(ts"rt"(u0,x2),x1,ov(1rt,u0),t65)):less"rt"(x2,ov(x1,u0))
-t68:=satz119a(x2,ux2,ov(x1,u0),t67):urt(ksi,ov(x1,u0))
-t69:=satz110e(x1,u0):is"rt"(ts"rt"(ov(x1,u0),u0),x1)
-t70:=tr3is(rat,u0,ov(x1,ov(x1,u0)),ts"rt"(ov(1rt,ov(x1,u0)),x1),ts"rt"(x1,ov(1rt,ov(x1,u0))),satz110g(x1,ov(x1,u0),u0,t69),satz141c(x1,ov(x1,u0)),comts"rt"(ov(1rt,ov(x1,u0)),x1)):is"rt"(u0,ts"rt"(x1,ov(1rt,ov(x1,u0))))
-t71:=inv1(ov(1rt,ov(x1,u0)),ov(x1,u0),t68,x2,ux2,t67,refis(rat,ov(1rt,ov(x1,u0)))):in(ov(1rt,ov(x1,u0)),inv)
-t72:=ine(inv,t50,ov(1rt,ov(x1,u0)),t71):lrt(chi,ov(1rt,ov(x1,u0)))
-t73:=lrtts(ksi,chi,u0,x1,lx1,ov(1rt,ov(x1,u0)),t72,t70):lrt(ts(ksi,chi),u0)
-lx@t74:=satz132app(ksi,lrt(ts(ksi,chi),u0),ts"rt"(mn"rt"(1rt,u0,t56),x0),[x:rat][t:lrt(ksi,x)][y:rat][u:urt(ksi,y)][v:is"rt"(mn"rt"(y,x,cutapp2b(x,t,y,u)),ts"rt"(mn"rt"(1rt,u0,t56),x0))]t73(x,t,y,u,v)):lrt(ts(ksi,chi),u0)
-lu@t75:=cutapp1a(ksi,lrt(ts(ksi,chi),u0),[x:rat][t:lrt(ksi,x)]t74(x,t)):lrt(ts(ksi,chi),u0)
-ksi@t76:=isi1(ts(ksi,chi),1rp,[x:rat][t:lrt(ts(ksi,chi),x)]r3(x,t),[x:rat][t:lrt(1rp,x)]t75(x,t)):is(ts(ksi,chi),1rp)
--4152
-satz152:=somei(cut,[t:cut]is(ts(ksi,t),1rp),chi".4152",t76".4152"):some([c:cut]is(ts(ksi,c),1rp))
-eta@[phi:cut][psi:cut]
-+4153
-[m:more(phi,psi)]
-t1:=satz145d(phi,psi,eta,m):more(ts(eta,phi),ts(eta,psi))
-t2:=ec3e21(is(ts(eta,phi),ts(eta,psi)),more(ts(eta,phi),ts(eta,psi)),less(ts(eta,phi),ts(eta,psi)),satz123b(ts(eta,phi),ts(eta,psi)),t1):nis(ts(eta,phi),ts(eta,psi))
-psi@[l:less(phi,psi)]
-t3:=satz145f(phi,psi,eta,l):less(ts(eta,phi),ts(eta,psi))
-t4:=ec3e31(is(ts(eta,phi),ts(eta,psi)),more(ts(eta,phi),ts(eta,psi)),less(ts(eta,phi),ts(eta,psi)),satz123b(ts(eta,phi),ts(eta,psi)),t3):nis(ts(eta,phi),ts(eta,psi))
-psi@[n:nis(phi,psi)]
-t5:=th1"l.or3"(is(phi,psi),more(phi,psi),less(phi,psi),satz123a(phi,psi),n):or(more(phi,psi),less(phi,psi))
-t6:=orapp(more(phi,psi),less(phi,psi),nis(ts(eta,phi),ts(eta,psi)),t5,[t:more(phi,psi)]t2(t),[t:less(phi,psi)]t4(t)):nis(ts(eta,phi),ts(eta,psi))
--4153
-[i:is(ts(eta,phi),ksi)][j:is(ts(eta,psi),ksi)]
-satz153b:=th7"l.imp"(is(phi,psi),nis(ts(eta,phi),ts(eta,psi)),weli(is(ts(eta,phi),ts(eta,psi)),tris2(cut,ts(eta,phi),ts(eta,psi),ksi,i,j)),[t:nis(phi,psi)]t6".4153"(t)):is(phi,psi)
-+*4153
-eta@[tau:cut][i:is(ts(eta,tau),1rp)]
-chi:=ts(tau,ksi):cut
-t7:=tr3is(cut,ts(eta,chi),ts(ts(eta,tau),ksi),ts(1rp,ksi),ksi,assts2(eta,tau,ksi),ists1(ts(eta,tau),1rp,ksi,i),satz151b(ksi)):is(ts(eta,chi),ksi)
-t8:=somei(cut,[c:cut]is(ts(eta,c),ksi),chi,t7):some([c:cut]is(ts(eta,c),ksi))
--4153
-eta@satz153a:=someapp(cut,[c:cut]is(ts(eta,c),1rp),satz152(eta),some([c:cut]is(ts(eta,c),ksi)),[c:cut][t:is(ts(eta,c),1rp)]t8".4153"(c,t)):some([c:cut]is(ts(eta,c),ksi))
-+*4153
-eta@t9:=[c:cut][d:cut][t:is(ts(eta,c),ksi)][u:is(ts(eta,d),ksi)]satz153b(c,d,t,u):amone(cut,[c:cut]is(ts(eta,c),ksi))
--4153
-eta@satz153:=onei(cut,[c:cut]is(ts(eta,c),ksi),t9".4153",satz153a):one([c:cut]is(ts(eta,c),ksi))
-ov:=ind(cut,[a:cut]is(ts(eta,a),ksi),satz153):cut
-satz153c:=oneax(cut,[a:cut]is(ts(eta,a),ksi),satz153):is(ts(eta,ov(ksi,eta)),ksi)
-satz153d:=symis(cut,ts(eta,ov(ksi,eta)),ksi,satz153c):is(ksi,ts(eta,ov(ksi,eta)))
-satz153e:=tris(cut,ts(ov(ksi,eta),eta),ts(eta,ov(ksi,eta)),ksi,comts(ov(ksi,eta),eta),satz153c):is(ts(ov(ksi,eta),eta),ksi)
-satz153f:=symis(cut,ts(ov(ksi,eta),eta),ksi,satz153e):is(ksi,ts(ov(ksi,eta),eta))
-[phi:cut][i:is(ts(eta,phi),ksi)]
-satz153g:=satz153b(phi,ov(ksi,eta),i,satz153c):is(phi,ov(ksi,eta))
-@[ksi:cut]
-ratrp:=image(rat,cut,[x:rat]rpofrt(x),ksi):'prop'
-@[x0:rat]
-ratrpi:=imagei(rat,cut,[x:rat]rpofrt(x),x0):ratrp(rpofrt(x0))
-@[x:nat]
-rpofnt:=rpofrt(rtofn(x)):cut
-ksi@natrp:=image(nat,cut,[x:nat]rpofnt(x),ksi):'prop'
-x@natrpi:=imagei(nat,cut,[y:nat]rpofnt(y),x):natrp(rpofnt(x))
-ksi@[n:natrp(ksi)]
-+iii5
-[x:nat][i:is(ksi,rpofnt(x))]
-t1:=somei(rat,[y:rat]is(ksi,rpofrt(y)),rtofn(x),i):ratrp(ksi)
--iii5
-lemmaiii5:=someapp(nat,[x:nat]is(ksi,rpofnt(x)),n,ratrp(ksi),[x:nat][t:is(ksi,rpofnt(x))]t1".iii5"(x,t)):ratrp(ksi)
-@[x0:rat][y0:rat][m:more"rt"(x0,y0)]
-+5154
-t1:=lrtrpofrt(x0,y0,satz82(x0,y0,m)):lrt(rpofrt(x0),y0)
-t2:=urtrpofrt(y0,y0,moreisi2"rt"(y0,y0,refis(rat,y0))):urt(rpofrt(y0),y0)
-t3:=andi(lrt(rpofrt(x0),y0),urt(rpofrt(y0),y0),t1,t2):and(lrt(rpofrt(x0),y0),urt(rpofrt(y0),y0))
--5154
-satz154a:=somei(rat,[x:rat]and(lrt(rpofrt(x0),x),urt(rpofrt(y0),x)),y0,t3".5154"):more(rpofrt(x0),rpofrt(y0))
-y0@[i:is"rt"(x0,y0)]
-satz154b:=isf(rat,cut,[x:rat]rpofrt(x),x0,y0,i):is(rpofrt(x0),rpofrt(y0))
-y0@[l:less"rt"(x0,y0)]
-satz154c:=satz121(rpofrt(y0),rpofrt(x0),satz154a(y0,x0,satz83(x0,y0,l))):less(rpofrt(x0),rpofrt(y0))
-+*5154
-y0@t4:=satz81a(x0,y0):or3(is"rt"(x0,y0),more"rt"(x0,y0),less"rt"(x0,y0))
-t5:=satz123b(rpofrt(x0),rpofrt(y0)):ec3(is(rpofrt(x0),rpofrt(y0)),more(rpofrt(x0),rpofrt(y0)),less(rpofrt(x0),rpofrt(y0)))
--5154
-y0@[m:more(rpofrt(x0),rpofrt(y0))]
-satz154d:=th11"l.ec3"(is"rt"(x0,y0),more"rt"(x0,y0),less"rt"(x0,y0),is(rpofrt(x0),rpofrt(y0)),more(rpofrt(x0),rpofrt(y0)),less(rpofrt(x0),rpofrt(y0)),t4".5154",t5".5154",[u:is"rt"(x0,y0)]satz154b(u),[u:more"rt"(x0,y0)]satz154a(u),[u:less"rt"(x0,y0)]satz154c(u),m):more"rt"(x0,y0)
-y0@[i:is(rpofrt(x0),rpofrt(y0))]
-satz154e:=th10"l.ec3"(is"rt"(x0,y0),more"rt"(x0,y0),less"rt"(x0,y0),is(rpofrt(x0),rpofrt(y0)),more(rpofrt(x0),rpofrt(y0)),less(rpofrt(x0),rpofrt(y0)),t4".5154",t5".5154",[u:is"rt"(x0,y0)]satz154b(u),[u:more"rt"(x0,y0)]satz154a(u),[u:less"rt"(x0,y0)]satz154c(u),i):is"rt"(x0,y0)
-y0@[l:less(rpofrt(x0),rpofrt(y0))]
-satz154f:=th12"l.ec3"(is"rt"(x0,y0),more"rt"(x0,y0),less"rt"(x0,y0),is(rpofrt(x0),rpofrt(y0)),more(rpofrt(x0),rpofrt(y0)),less(rpofrt(x0),rpofrt(y0)),t4".5154",t5".5154",[u:is"rt"(x0,y0)]satz154b(u),[u:more"rt"(x0,y0)]satz154a(u),[u:less"rt"(x0,y0)]satz154c(u),l):less"rt"(x0,y0)
-+*iii5
-@t2:=[x:rat][y:rat][t:is(rpofrt(x),rpofrt(y))]satz154e(x,y,t):injective(rat,cut,[x:rat]rpofrt(x))
--iii5
-y0@[i:is"rt"(x0,y0)]
-isrterp:=satz154b(x0,y0,i):is(rpofrt(x0),rpofrt(y0))
-y0@[i:is(rpofrt(x0),rpofrt(y0))]
-isrtirp:=satz154e(x0,y0,i):is"rt"(x0,y0)
-ksi@[rtksi:ratrp(ksi)]
-rtofrp:=soft(rat,cut,[x:rat]rpofrt(x),t2".iii5",ksi,rtksi):rat
-[eta:cut][rteta:ratrp(eta)][i:is(ksi,eta)]
-isrpert:=isinv(rat,cut,[x:rat]rpofrt(x),t2".iii5",ksi,rtksi,eta,rteta,i):is"rt"(rtofrp(ksi,rtksi),rtofrp(eta,rteta))
-rteta@[i:is"rt"(rtofrp(ksi,rtksi),rtofrp(eta,rteta))]
-isrpirt:=isinve(rat,cut,[x:rat]rpofrt(x),t2".iii5",ksi,rtksi,eta,rteta,i):is(ksi,eta)
-x0@isrtrp1:=isst1(rat,cut,[x:rat]rpofrt(x),t2".iii5",x0):is"rt"(x0,rtofrp(rpofrt(x0),ratrpi(x0)))
-isrtrp2:=isst2(rat,cut,[x:rat]rpofrt(x),t2".iii5",x0):is"rt"(rtofrp(rpofrt(x0),ratrpi(x0)),x0)
-rtksi@isrprt1:=ists1"e"(rat,cut,[x:rat]rpofrt(x),t2".iii5",ksi,rtksi):is(ksi,rpofrt(rtofrp(ksi,rtksi)))
-isrprt2:=ists2"e"(rat,cut,[x:rat]rpofrt(x),t2".iii5",ksi,rtksi):is(rpofrt(rtofrp(ksi,rtksi)),ksi)
-@[x:nat][y:nat][i:is"n"(x,y)]
-isnterp:=isf(nat,cut,[z:nat]rpofnt(z),x,y,i):is(rpofnt(x),rpofnt(y))
-y@[i:is(rpofnt(x),rpofnt(y))]
-isntirp:=isnirt(x,y,isrtirp(rtofn(x),rtofn(y),i)):is"n"(x,y)
-+*iii5
-@t3:=[x:nat][y:nat][t:is(rpofnt(x),rpofnt(y))]isntirp(x,y,t):injective(nat,cut,[x:nat]rpofnt(x))
--iii5
-ksi@[ntksi:natrp(ksi)]
-ntofrp:=soft(nat,cut,[x:nat]rpofnt(x),t3".iii5",ksi,ntksi):nat
-[eta:cut][nteta:natrp(eta)][i:is(ksi,eta)]
-isrpent:=isinv(nat,cut,[x:nat]rpofnt(x),t3".iii5",ksi,ntksi,eta,nteta,i):is"n"(ntofrp(ksi,ntksi),ntofrp(eta,nteta))
-nteta@[i:is"n"(ntofrp(ksi,ntksi),ntofrp(eta,nteta))]
-isrpint:=isinve(nat,cut,[x:nat]rpofnt(x),t3".iii5",ksi,ntksi,eta,nteta,i):is(ksi,eta)
-x@isntrp1:=isst1(nat,cut,[y:nat]rpofnt(y),t3".iii5",x):is"n"(x,ntofrp(rpofnt(x),natrpi(x)))
-isntrp2:=isst2(nat,cut,[y:nat]rpofnt(y),t3".iii5",x):is"n"(ntofrp(rpofnt(x),natrpi(x)),x)
-ntksi@isrpnt1:=ists1"e"(nat,cut,[x:nat]rpofnt(x),t3".iii5",ksi,ntksi):is(ksi,rpofnt(ntofrp(ksi,ntksi)))
-isrpnt2:=ists2"e"(nat,cut,[x:nat]rpofnt(x),t3".iii5",ksi,ntksi):is(rpofnt(ntofrp(ksi,ntksi)),ksi)
-@[x0:rat][y0:rat]
-+5155
-[z0:rat][lz:lrt(pl(rpofrt(x0),rpofrt(y0)),z0)][u0:rat][lu:lrt(rpofrt(x0),u0)][v0:rat][lv:lrt(rpofrt(y0),v0)][i:is"rt"(z0,pl"rt"(u0,v0))]
-t1:=lrtrpofrte(x0,u0,lu):less"rt"(u0,x0)
-t2:=lrtrpofrte(y0,v0,lv):less"rt"(v0,y0)
-t3:=satz98a(u0,x0,v0,y0,t1,t2):less"rt"(pl"rt"(u0,v0),pl"rt"(x0,y0))
-t4:=isless1"rt"(pl"rt"(u0,v0),z0,pl"rt"(x0,y0),symis(rat,z0,pl"rt"(u0,v0),i),t3):less"rt"(z0,pl"rt"(x0,y0))
-t5:=lrtrpofrt(pl"rt"(x0,y0),z0,t4):lrt(rpofrt(pl"rt"(x0,y0)),z0)
-lz@t6:=plapp(rpofrt(x0),rpofrt(y0),z0,lz,lrt(rpofrt(pl"rt"(x0,y0)),z0),[x:rat][t:lrt(rpofrt(x0),x)][y:rat][u:lrt(rpofrt(y0),y)][v:is"rt"(z0,pl"rt"(x,y))]t5(x,t,y,u,v)):lrt(rpofrt(pl"rt"(x0,y0)),z0)
-y0@[u0:rat][lu:lrt(rpofrt(pl"rt"(x0,y0)),u0)]
-t7:=lrtrpofrte(pl"rt"(x0,y0),u0,lu):less"rt"(u0,pl"rt"(x0,y0))
-u01:=ov"rt"(u0,pl"rt"(x0,y0)):rat
-t8:=isless12"rt"(u0,ts"rt"(u01,pl"rt"(x0,y0)),pl"rt"(x0,y0),ts"rt"(1rt,pl"rt"(x0,y0)),satz110f(u0,pl"rt"(x0,y0)),example1d(pl"rt"(x0,y0)),t7):less"rt"(ts"rt"(u01,pl"rt"(x0,y0)),ts"rt"(1rt,pl"rt"(x0,y0)))
-t9:=satz106c(u01,1rt,pl"rt"(x0,y0),t8):less"rt"(u01,1rt)
-t10:=tris(rat,u0,ts"rt"(pl"rt"(x0,y0),u01),pl"rt"(ts"rt"(x0,u01),ts"rt"(y0,u01)),satz110d(u0,pl"rt"(x0,y0)),disttp1"rt"(x0,y0,u01)):is"rt"(u0,pl"rt"(ts"rt"(x0,u01),ts"rt"(y0,u01)))
-y0@[l:less"rt"(y0,1rt)]
-t11:=isless12"rt"(ts"rt"(y0,x0),ts"rt"(x0,y0),ts"rt"(1rt,x0),x0,comts"rt"(y0,x0),example1c(x0),satz105c(y0,1rt,x0,l)):less"rt"(ts"rt"(x0,y0),x0)
-t12:=lrtrpofrt(x0,ts"rt"(x0,y0),t11):lrt(rpofrt(x0),ts"rt"(x0,y0))
-lu@t13:=lrtpl(rpofrt(x0),rpofrt(y0),u0,ts"rt"(x0,u01),t12(x0,u01,t9),ts"rt"(y0,u01),t12(y0,u01,t9),t10):lrt(pl(rpofrt(x0),rpofrt(y0)),u0)
--5155
-satz155a:=isi1(rpofrt(pl"rt"(x0,y0)),pl(rpofrt(x0),rpofrt(y0)),[x:rat][t:lrt(rpofrt(pl"rt"(x0,y0)),x)]t13".5155"(x,t),[x:rat][t:lrt(pl(rpofrt(x0),rpofrt(y0)),x)]t6".5155"(x,t)):is(rpofrt(pl"rt"(x0,y0)),pl(rpofrt(x0),rpofrt(y0)))
-[m:more"rt"(x0,y0)]
-+*5155
-m@t14:=satz101f(x0,y0,m):is"rt"(x0,pl"rt"(mn"rt"(x0,y0,m),y0))
-t15:=tris(cut,rpofrt(x0),rpofrt(pl"rt"(mn"rt"(x0,y0,m),y0)),pl(rpofrt(mn"rt"(x0,y0,m)),rpofrt(y0)),isrterp(x0,pl"rt"(mn"rt"(x0,y0,m),y0),t14),satz155a(mn"rt"(x0,y0,m),y0)):is(rpofrt(x0),pl(rpofrt(mn"rt"(x0,y0,m)),rpofrt(y0)))
-t16:=tris2(cut,pl(rpofrt(y0),rpofrt(mn"rt"(x0,y0,m))),rpofrt(x0),pl(rpofrt(mn"rt"(x0,y0,m)),rpofrt(y0)),compl(rpofrt(y0),rpofrt(mn"rt"(x0,y0,m))),t15):is(pl(rpofrt(y0),rpofrt(mn"rt"(x0,y0,m))),rpofrt(x0))
--5155
-m@satz155b:=satz140g(rpofrt(x0),rpofrt(y0),rpofrt(mn"rt"(x0,y0,m)),satz154a(x0,y0,m),t16".5155"):is(rpofrt(mn"rt"(x0,y0,m)),mn(rpofrt(x0),rpofrt(y0),satz154a(x0,y0,m)))
-+*5155
-y0@[z0:rat][lz:lrt(ts(rpofrt(x0),rpofrt(y0)),z0)][u0:rat][lu:lrt(rpofrt(x0),u0)][v0:rat][lv:lrt(rpofrt(y0),v0)][i:is"rt"(z0,ts"rt"(u0,v0))]
-t17:=lrtrpofrte(x0,u0,lu):less"rt"(u0,x0)
-t18:=lrtrpofrte(y0,v0,lv):less"rt"(v0,y0)
-t19:=satz107a(u0,x0,v0,y0,t17,t18):less"rt"(ts"rt"(u0,v0),ts"rt"(x0,y0))
-t20:=isless1"rt"(ts"rt"(u0,v0),z0,ts"rt"(x0,y0),symis(rat,z0,ts"rt"(u0,v0),i),t19):less"rt"(z0,ts"rt"(x0,y0))
-t21:=lrtrpofrt(ts"rt"(x0,y0),z0,t20):lrt(rpofrt(ts"rt"(x0,y0)),z0)
-lz@t22:=tsapp(rpofrt(x0),rpofrt(y0),z0,lz,lrt(rpofrt(ts"rt"(x0,y0)),z0),[x:rat][t:lrt(rpofrt(x0),x)][y:rat][u:lrt(rpofrt(y0),y)][v:is"rt"(z0,ts"rt"(x,y))]t21(x,t,y,u,v)):lrt(rpofrt(ts"rt"(x0,y0)),z0)
-y0@[u0:rat][lu:lrt(rpofrt(ts"rt"(x0,y0)),u0)]
-t23:=lrtrpofrte(ts"rt"(x0,y0),u0,lu):less"rt"(u0,ts"rt"(x0,y0))
-[u1:rat][a:and(less"rt"(u0,u1),less"rt"(u1,ts"rt"(x0,y0)))]
-t24:=ande1(less"rt"(u0,u1),less"rt"(u1,ts"rt"(x0,y0)),a):less"rt"(u0,u1)
-t25:=ande2(less"rt"(u0,u1),less"rt"(u1,ts"rt"(x0,y0)),a):less"rt"(u1,ts"rt"(x0,y0))
-t26:=isless12"rt"(u0,ts"rt"(ov"rt"(u0,u1),u1),u1,ts"rt"(1rt,u1),satz110f(u0,u1),example1d(u1),t24):less"rt"(ts"rt"(ov"rt"(u0,u1),u1),ts"rt"(1rt,u1))
-t27:=satz106c(ov"rt"(u0,u1),1rt,u1,t26):less"rt"(ov"rt"(u0,u1),1rt)
-t28:=isless1"rt"(u1,ts"rt"(ov"rt"(u1,y0),y0),ts"rt"(x0,y0),satz110f(u1,y0),t25):less"rt"(ts"rt"(ov"rt"(u1,y0),y0),ts"rt"(x0,y0))
-t29:=satz106c(ov"rt"(u1,y0),x0,y0,t28):less"rt"(ov"rt"(u1,y0),x0)
-t30:=tr3is(rat,u0,ts"rt"(u1,ov"rt"(u0,u1)),ts"rt"(ts"rt"(ov"rt"(u1,y0),y0),ov"rt"(u0,u1)),ts"rt"(ov"rt"(u1,y0),ts"rt"(y0,ov"rt"(u0,u1))),satz110d(u0,u1),ists1"rt"(u1,ts"rt"(ov"rt"(u1,y0),y0),ov"rt"(u0,u1),satz110f(u1,y0)),assts1"rt"(ov"rt"(u1,y0),y0,ov"rt"(u0,u1))):is"rt"(u0,ts"rt"(ov"rt"(u1,y0),ts"rt"(y0,ov"rt"(u0,u1))))
-t31:=lrtts(rpofrt(x0),rpofrt(y0),u0,ov"rt"(u1,y0),lrtrpofrt(x0,ov"rt"(u1,y0),t29),ts"rt"(y0,ov"rt"(u0,u1)),t12(y0,ov"rt"(u0,u1),t27),t30):lrt(ts(rpofrt(x0),rpofrt(y0)),u0)
-lu@t32:=someapp(rat,[x:rat]and(less"rt"(u0,x),less"rt"(x,ts"rt"(x0,y0))),satz91(u0,ts"rt"(x0,y0),t23),lrt(ts(rpofrt(x0),rpofrt(y0)),u0),[x:rat][t:and(less"rt"(u0,x),less"rt"(x,ts"rt"(x0,y0)))]t31(x,t)):lrt(ts(rpofrt(x0),rpofrt(y0)),u0)
--5155
-y0@satz155c:=isi1(rpofrt(ts"rt"(x0,y0)),ts(rpofrt(x0),rpofrt(y0)),[x:rat][t:lrt(rpofrt(ts"rt"(x0,y0)),x)]t32".5155"(x,t),[x:rat][t:lrt(ts(rpofrt(x0),rpofrt(y0)),x)]t22".5155"(x,t)):is(rpofrt(ts"rt"(x0,y0)),ts(rpofrt(x0),rpofrt(y0)))
-+*5155
-y0@t33:=satz110f(x0,y0):is"rt"(x0,ts"rt"(ov"rt"(x0,y0),y0))
-t34:=tris(cut,rpofrt(x0),rpofrt(ts"rt"(ov"rt"(x0,y0),y0)),ts(rpofrt(ov"rt"(x0,y0)),rpofrt(y0)),isrterp(x0,ts"rt"(ov"rt"(x0,y0),y0),t33),satz155c(ov"rt"(x0,y0),y0)):is(rpofrt(x0),ts(rpofrt(ov"rt"(x0,y0)),rpofrt(y0)))
-t35:=tris2(cut,ts(rpofrt(y0),rpofrt(ov"rt"(x0,y0))),rpofrt(x0),ts(rpofrt(ov"rt"(x0,y0)),rpofrt(y0)),comts(rpofrt(y0),rpofrt(ov"rt"(x0,y0))),t34):is(ts(rpofrt(y0),rpofrt(ov"rt"(x0,y0))),rpofrt(x0))
--5155
-y0@satz155d:=satz153g(rpofrt(x0),rpofrt(y0),rpofrt(ov"rt"(x0,y0)),t35".5155"):is(rpofrt(ov"rt"(x0,y0)),ov(rpofrt(x0),rpofrt(y0)))
-@[x:nat][y:nat]
-satz155e:=tris(cut,rpofnt(pl"n"(x,y)),rpofrt(pl"rt"(rtofn(x),rtofn(y))),pl(rpofnt(x),rpofnt(y)),isrterp(rtofn(pl"n"(x,y)),pl"rt"(rtofn(x),rtofn(y)),symis(rat,pl"rt"(rtofn(x),rtofn(y)),rtofn(pl"n"(x,y)),satz112h(x,y))),satz155a(rtofn(x),rtofn(y))):is(rpofnt(pl"n"(x,y)),pl(rpofnt(x),rpofnt(y)))
-satz155f:=tris(cut,rpofnt(ts"n"(x,y)),rpofrt(ts"rt"(rtofn(x),rtofn(y))),ts(rpofnt(x),rpofnt(y)),isrterp(rtofn(ts"n"(x,y)),ts"rt"(rtofn(x),rtofn(y)),symis(rat,ts"rt"(rtofn(x),rtofn(y)),rtofn(ts"n"(x,y)),satz112j(x,y))),satz155c(rtofn(x),rtofn(y))):is(rpofnt(ts"n"(x,y)),ts(rpofnt(x),rpofnt(y)))
-+nt
-@natt:=ot(cut,[t:cut]natrp(t)):'type'
-[ksi:cut][nksi:natrp(ksi)]
-nttofrp:=out(cut,[t:cut]natrp(t),ksi,nksi):natt
-@[xt:natt][yt:natt]
-is:=is"e"(natt,xt,yt):'prop'
-nis:=not(is(xt,yt)):'prop'
-@[p:[x:natt]'prop']
-all:=all"l"(natt,p):'prop'
-some:=some"l"(natt,p):'prop'
-one:=one"e"(natt,p):'prop'
-xt@[st:set(natt)]
-in:=esti(natt,xt,st):'prop'
-xt@rpofntt:=in"e"(cut,[t:cut]natrp(t),xt):cut
-natrpi:=inp(cut,[t:cut]natrp(t),xt):natrp(rpofntt(xt))
-nksi@[eta:cut][neta:natrp(eta)][i:is"rp"(ksi,eta)]
-isrpentt:=isouti(cut,[t:cut]natrp(t),ksi,nksi,eta,neta,i):is(nttofrp(ksi,nksi),nttofrp(eta,neta))
-neta@[i:is(nttofrp(ksi,nksi),nttofrp(eta,neta))]
-isrpintt:=isoute(cut,[t:cut]natrp(t),ksi,nksi,eta,neta,i):is"rp"(ksi,eta)
-yt@[i:is(xt,yt)]
-isntterp:=isini(cut,[t:cut]natrp(t),xt,yt,i):is"rp"(rpofntt(xt),rpofntt(yt))
-yt@[i:is"rp"(rpofntt(xt),rpofntt(yt))]
-isnttirp:=isine(cut,[t:cut]natrp(t),xt,yt,i):is(xt,yt)
-nksi@isrpntt1:=isinout(cut,[t:cut]natrp(t),ksi,nksi):is"rp"(ksi,rpofntt(nttofrp(ksi,nksi)))
-xt@isnttrp1:=isoutin(cut,[t:cut]natrp(t),xt):is(xt,nttofrp(rpofntt(xt),natrpi(xt)))
-@[x:nat]
-nttofnt:=nttofrp(rpofnt(x),natrpi"rp"(x)):natt
-[y:nat][i:is"n"(x,y)]
-isntentt:=isrpentt(rpofnt(x),natrpi"rp"(x),rpofnt(y),natrpi"rp"(y),isnterp(x,y,i)):is(nttofnt(x),nttofnt(y))
-y@[i:is(nttofnt(x),nttofnt(y))]
-isntintt:=isntirp(x,y,isrpintt(rpofnt(x),natrpi"rp"(x),rpofnt(y),natrpi"rp"(y),i)):is"n"(x,y)
-xt@ntofntt:=ntofrp(rpofntt(xt),natrpi(xt)):nat
-yt@[i:is(xt,yt)]
-isnttent:=isrpent(rpofntt(xt),natrpi(xt),rpofntt(yt),natrpi(yt),isntterp(xt,yt,i)):is"n"(ntofntt(xt),ntofntt(yt))
-yt@[i:is"n"(ntofntt(xt),ntofntt(yt))]
-isnttint:=isnttirp(xt,yt,isrpint(rpofntt(xt),natrpi(xt),rpofntt(yt),natrpi(yt),i)):is(xt,yt)
-+iii5
-x@t5:=isrpntt1(rpofnt(x),natrpi"rp"(x)):is"rp"(rpofnt(x),rpofntt(nttofnt(x)))
-t6:=isrpent(rpofnt(x),natrpi"rp"(x),rpofntt(nttofnt(x)),natrpi(nttofnt(x)),t5):is"n"(ntofrp(rpofnt(x),natrpi"rp"(x)),ntofntt(nttofnt(x)))
--iii5
-x@isntntt1:=tris(nat,x,ntofrp(rpofnt(x),natrpi"rp"(x)),ntofntt(nttofnt(x)),isntrp1(x),t6".iii5"):is"n"(x,ntofntt(nttofnt(x)))
-+*iii5
-xt@t7:=isrpnt1(rpofntt(xt),natrpi(xt)):is"rp"(rpofntt(xt),rpofnt(ntofntt(xt)))
-t8:=isrpentt(rpofntt(xt),natrpi(xt),rpofnt(ntofntt(xt)),natrpi"rp"(ntofntt(xt)),t7):is(nttofrp(rpofntt(xt),natrpi(xt)),nttofnt(ntofntt(xt)))
--iii5
-xt@isnttnt1:=tris(natt,xt,nttofrp(rpofntt(xt),natrpi(xt)),nttofnt(ntofntt(xt)),isnttrp1(xt),t8".iii5"):is(xt,nttofnt(ntofntt(xt)))
-x@isntntt2:=symis(nat,x,ntofntt(nttofnt(x)),isntntt1):is"n"(ntofntt(nttofnt(x)),x)
-xt@isnttnt2:=symis(natt,xt,nttofnt(ntofntt(xt)),isnttnt1):is(nttofnt(ntofntt(xt)),xt)
-@1t:=nttofnt(1):natt
-suct:=[x:natt]nttofnt(<ntofntt(x)>suc):[x:natt]natt
-+5156
-xt@[j:is(<xt>suct,1t)]
-t1:=isntintt(<ntofntt(xt)>suc,1,j):is"n"(<ntofntt(xt)>suc,1)
--5156
-xt@satz156a:=th3"l.imp"(is(<xt>suct,1t),is"n"(<ntofntt(xt)>suc,1),<ntofntt(xt)>ax3,[t:is(<xt>suct,1t)]t1".5156"(t)):nis(<xt>suct,1t)
-yt@[i:is(<xt>suct,<yt>suct)]
-+*5156
-i@t2:=isntintt(<ntofntt(xt)>suc,<ntofntt(yt)>suc,i):is"n"(<ntofntt(xt)>suc,<ntofntt(yt)>suc)
--5156
-i@satz156b:=isnttint(xt,yt,<t2".5156"><ntofntt(yt)><ntofntt(xt)>ax4):is(xt,yt)
-@[st:set(natt)]
-cond1:=in(1t,st):'prop'
-cond2:=all([x:natt]imp(in(x,st),in(<x>suct,st))):'prop'
-[c1:cond1][c2:cond2]
-+*5156
-c2@[x:nat]
-prop1:=in(nttofnt(x),st):'prop'
-[p:prop1(x)]
-t3:=<p><nttofnt(x)>c2:in(<nttofnt(x)>suct,st)
-t4:=isp(nat,[t:nat]in(nttofnt(<t>suc),st),ntofntt(nttofnt(x)),x,t3,isntntt2(x)):prop1(<x>suc)
--5156
-c2@[xt:natt]
-+*5156
-xt@t5:=induction([t:nat]prop1(t),c1,[t:nat][u:prop1(t)]t4(t,u),ntofntt(xt)):in(nttofnt(ntofntt(xt)),st)
--5156
-xt@satz156c:=isp(natt,[t:natt]in(t,st),nttofnt(ntofntt(xt)),xt,t5".5156",isnttnt2(xt)):in(xt,st)
-@ax3t:=[x:natt]satz156a(x):[x:natt]nis(<x>suct,1t)
-ax4t:=[x:natt][y:natt][u:is(<x>suct,<y>suct)]satz156b(x,y,u):[x:natt][y:natt][u:is(<x>suct,<y>suct)]is(x,y)
-ax5t:=[s:set(natt)][u:cond1(s)][v:cond2(s)][x:natt]satz156c(s,u,v,x):[s:set(natt)][u:cond1(s)][v:cond2(s)][x:natt]in(x,s)
--nt
-+rtt
-@ratt:=ot(cut,[t:cut]ratrp(t)):'type'
-[ksi:cut][rtksi:ratrp(ksi)]
-rttofrp:=out(cut,[t:cut]ratrp(t),ksi,rtksi):ratt
-@[x0t:ratt][y0t:ratt]
-is:=is"e"(ratt,x0t,y0t):'prop'
-nis:=not(is(x0t,y0t)):'prop'
-@[p:[x:ratt]'prop']
-all:=all"l"(ratt,p):'prop'
-some:=some"l"(ratt,p):'prop'
-one:=one"e"(ratt,p):'prop'
-x0t@rpofrtt:=in"e"(cut,[t:cut]ratrp(t),x0t):cut
-ratrpi:=inp(cut,[t:cut]ratrp(t),x0t):ratrp(rpofrtt(x0t))
-rtksi@[eta:cut][rteta:ratrp(eta)][i:is"rp"(ksi,eta)]
-isrpertt:=isouti(cut,[t:cut]ratrp(t),ksi,rtksi,eta,rteta,i):is(rttofrp(ksi,rtksi),rttofrp(eta,rteta))
-rteta@[i:is(rttofrp(ksi,rtksi),rttofrp(eta,rteta))]
-isrpirtt:=isoute(cut,[t:cut]ratrp(t),ksi,rtksi,eta,rteta,i):is"rp"(ksi,eta)
-y0t@[i:is(x0t,y0t)]
-isrtterp:=isini(cut,[t:cut]ratrp(t),x0t,y0t,i):is"rp"(rpofrtt(x0t),rpofrtt(y0t))
-y0t@[i:is"rp"(rpofrtt(x0t),rpofrtt(y0t))]
-isrttirp:=isine(cut,[t:cut]ratrp(t),x0t,y0t,i):is(x0t,y0t)
-rtksi@isrprtt1:=isinout(cut,[t:cut]ratrp(t),ksi,rtksi):is"rp"(ksi,rpofrtt(rttofrp(ksi,rtksi)))
-x0t@isrttrp1:=isoutin(cut,[t:cut]ratrp(t),x0t):is(x0t,rttofrp(rpofrtt(x0t),ratrpi(x0t)))
-@[x0:rat]
-rttofrt:=rttofrp(rpofrt(x0),ratrpi"rp"(x0)):ratt
-[y0:rat][i:is"rt"(x0,y0)]
-isrtertt:=isrpertt(rpofrt(x0),ratrpi"rp"(x0),rpofrt(y0),ratrpi"rp"(y0),isrterp(x0,y0,i)):is(rttofrt(x0),rttofrt(y0))
-y0@[i:is(rttofrt(x0),rttofrt(y0))]
-isrtirtt:=isrtirp(x0,y0,isrpirtt(rpofrt(x0),ratrpi"rp"(x0),rpofrt(y0),ratrpi"rp"(y0),i)):is"rt"(x0,y0)
-x0t@rtofrtt:=rtofrp(rpofrtt(x0t),ratrpi(x0t)):rat
-y0t@[i:is(x0t,y0t)]
-isrttert:=isrpert(rpofrtt(x0t),ratrpi(x0t),rpofrtt(y0t),ratrpi(y0t),isrtterp(x0t,y0t,i)):is"rt"(rtofrtt(x0t),rtofrtt(y0t))
-y0t@[i:is"rt"(rtofrtt(x0t),rtofrtt(y0t))]
-isrttirt:=isrttirp(x0t,y0t,isrpirt(rpofrtt(x0t),ratrpi(x0t),rpofrtt(y0t),ratrpi(y0t),i)):is(x0t,y0t)
-+iii5
-x0@t9:=isrprtt1(rpofrt(x0),ratrpi"rp"(x0)):is"rp"(rpofrt(x0),rpofrtt(rttofrt(x0)))
-t10:=isrpert(rpofrt(x0),ratrpi"rp"(x0),rpofrtt(rttofrt(x0)),ratrpi(rttofrt(x0)),t9):is"rt"(rtofrp(rpofrt(x0),ratrpi"rp"(x0)),rtofrtt(rttofrt(x0)))
--iii5
-x0@isrtrtt1:=tris(rat,x0,rtofrp(rpofrt(x0),ratrpi"rp"(x0)),rtofrtt(rttofrt(x0)),isrtrp1(x0),t10".iii5"):is"rt"(x0,rtofrtt(rttofrt(x0)))
-+*iii5
-x0t@t11:=isrprt1(rpofrtt(x0t),ratrpi(x0t)):is"rp"(rpofrtt(x0t),rpofrt(rtofrtt(x0t)))
-t12:=isrpertt(rpofrtt(x0t),ratrpi(x0t),rpofrt(rtofrtt(x0t)),ratrpi"rp"(rtofrtt(x0t)),t11):is(rttofrp(rpofrtt(x0t),ratrpi(x0t)),rttofrt(rtofrtt(x0t)))
--iii5
-x0t@isrttrt1:=tris(ratt,x0t,rttofrp(rpofrtt(x0t),ratrpi(x0t)),rttofrt(rtofrtt(x0t)),isrttrp1(x0t),t12".iii5"):is(x0t,rttofrt(rtofrtt(x0t)))
--rtt
-@[ksi:cut]
-example2:=satz153c(1rp,ksi):is(ts(ksi,ov(1rp,ksi)),1rp)
-[rtksi:ratrp(ksi)]
-+5157
-x01:=rtofrp(ksi,rtksi):rat
-ksi@s1:=setof(rat,[x:rat]urt(ksi,x)):set(rat)
-rtksi@[y0:rat][i:in(y0,s1)]
-t1:=estie(rat,[x:rat]urt(ksi,x),y0,i):urt(ksi,y0)
-[m:more"rt"(x01,y0)]
-t2:=lrtrpofrt(x01,y0,satz82(x01,y0,m)):lrt(rpofrt(x01),y0)
-t3:=isp(cut,[x:cut]lrt(x,y0),rpofrt(x01),ksi,t2,isrprt2(ksi,rtksi)):lrt(ksi,y0)
-i@t4:=th3"l.imp"(more"rt"(x01,y0),lrt(ksi,y0),t1,[t:more"rt"(x01,y0)]t3(t)):not(more"rt"(x01,y0))
-t5:=satz81e(x01,y0,t4):lessis"rt"(x01,y0)
-rtksi@t6:=[x:rat][t:in(x,s1)]t5(x,t):lb(s1,x01)
-t7:=urtrpofrt(x01,x01,moreisi2"rt"(x01,x01,refis(rat,x01))):urt(rpofrt(x01),x01)
-t8:=isp(cut,[x:cut]urt(x,x01),rpofrt(x01),ksi,t7,isrprt2(ksi,rtksi)):urt(ksi,x01)
-t9:=estii(rat,[x:rat]urt(ksi,x),x01,t8):in(x01,s1)
-t10:=andi(lb(s1,x01),in(x01,s1),t6,t9):min(s1,x01)
--5157
-satz157a:=t10".5157":min(setof(rat,[x:rat]urt(ksi,x)),rtofrp(ksi,rtksi))
-satz157b:=somei(rat,[x:rat]min(s1".5157",x),x01".5157",t10".5157"):some"rt"([x:rat]min(setof(rat,[y:rat]urt(ksi,y)),x))
-ksi@[x0:rat][m:min(setof(rat,[x:rat]urt(ksi,x)),x0)]
-+*5157
-m"rp"@t11:=ande1(lb(s1,x0),in(x0,s1),m):lb(s1,x0)
-t12:=ande2(lb(s1,x0),in(x0,s1),m):in(x0,s1)
-t13:=estie(rat,[x:rat]urt(ksi,x),x0,t12):urt(ksi,x0)
-[y0:rat][ly:lrt(ksi,y0)]
-t14:=cutapp2a(ksi,y0,ly,x0,t13):less"rt"(y0,x0)
-t15:=lrtrpofrt(x0,y0,t14):lrt(rpofrt(x0),y0)
-y0@[uy:urt(ksi,y0)]
-t17:=estii(rat,[x:rat]urt(ksi,x),y0,uy):in(y0,s1)
-t18:=satz85(x0,y0,<t17><y0>t11):moreis"rt"(y0,x0)
-t19:=urtrpofrt(x0,y0,t18):urt(rpofrt(x0),y0)
-y0@t20:=cp(lrt(rpofrt(x0),y0),lrt(ksi,y0),[t:urt(ksi,y0)]t19(t)):imp(lrt(rpofrt(x0),y0),lrt(ksi,y0))
--5157
-m@satz157c:=isi1(ksi,rpofrt(x0),[x:rat][t:lrt(ksi,x)]t15".5157"(x,t),[x:rat]t20".5157"(x)):is(ksi,rpofrt(x0))
-ksi@[s:some"rt"([x:rat]min(setof(rat,[y:rat]urt(ksi,y)),x))]
-+*5157
-s@[x0:rat][m:min(s1,x0)]
-t21:=somei(rat,[x:rat]is(ksi,rpofrt(x)),x0,satz157c(x0,m)):ratrp(ksi)
--5157
-s@satz157d:=someapp(rat,[x:rat]min(s1".5157",x),s,ratrp(ksi),[x:rat][t:min(s1".5157",x)]t21".5157"(x,t)):ratrp(ksi)
-ksi@[x0:rat][lx:lrt(ksi,x0)]
-+5158
-x0@xr:=rpofrt(x0):cut
-lx@t1:=urtrpofrt(x0,x0,moreisi2"rt"(x0,x0,refis(rat,x0))):urt(xr,x0)
-t2:=andi(urt(xr,x0),lrt(ksi,x0),t1,lx):and(urt(xr,x0),lrt(ksi,x0))
--5158
-satz158a:=somei(rat,[x:rat]and(urt(rpofrt(x0),x),lrt(ksi,x)),x0,t2".5158"):less(rpofrt(x0),ksi)
-x0@[ux:urt(ksi,x0)]
-+*5158
-ux@s1:=setof(rat,[x:rat]urt(ksi,x)):set(rat)
-[m:min(s1,x0)]
-t3:=symis(cut,ksi,xr,satz157c(ksi,x0,m)):is(xr,ksi)
-t4:=moreisi2(xr,ksi,t3):moreis(xr,ksi)
-ux@[n:not(min(s1,x0))]
-t5:=estii(rat,[x:rat]urt(ksi,x),x0,ux):in(x0,s1)
-t6:=th4"l.and"(lb(s1,x0),in(x0,s1),n,t5):not(lb(s1,x0))
-t7:=th1"l.some"(rat,[x:rat]imp(in(x,s1),lessis"rt"(x0,x)),t6):some"rt"([x:rat]not(imp(in(x,s1),lessis"rt"(x0,x))))
-[y0:rat][o:not(imp(in(y0,s1),lessis"rt"(x0,y0)))]
-t8:=th5"l.imp"(in(y0,s1),lessis"rt"(x0,y0),o):in(y0,s1)
-t9:=estie(rat,[x:rat]urt(ksi,x),y0,t8):urt(ksi,y0)
-t10:=th6"l.imp"(in(y0,s1),lessis"rt"(x0,y0),o):not(lessis"rt"(x0,y0))
-t11:=satz82(x0,y0,satz81k(x0,y0,t10)):less"rt"(y0,x0)
-t12:=lrtrpofrt(x0,y0,t11):lrt(xr,y0)
-t13:=andi(lrt(xr,y0),urt(ksi,y0),t12,t9):and(lrt(xr,y0),urt(ksi,y0))
-t14:=somei(rat,[x:rat]and(lrt(xr,x),urt(ksi,x)),y0,t13):more(xr,ksi)
-n@t15:=someapp(rat,[x:rat]not(imp(in(x,s1),lessis"rt"(x0,x))),t7,more(xr,ksi),[x:rat][t:not(imp(in(x,s1),lessis"rt"(x0,x)))]t14(x,t)):more(xr,ksi)
-t16:=moreisi1(xr,ksi,t15):moreis(xr,ksi)
--5158
-ux@satz158b:=th1"l.imp"(min(s1".5158",x0),moreis(rpofrt(x0),ksi),[t:min(s1".5158",x0)]t4".5158"(t),[t:not(min(s1".5158",x0))]t16".5158"(t)):moreis(rpofrt(x0),ksi)
-x0@[l:less(rpofrt(x0),ksi)]
-+*5158
-l@t17:=satz123h(xr,ksi,l):not(moreis(xr,ksi))
-t18:=th3"l.imp"(urt(ksi,x0),moreis(xr,ksi),t17,[t:urt(ksi,x0)]satz158b(t)):not(urt(ksi,x0))
--5158
-l@satz158c:=et(lrt(ksi,x0),t18".5158"):lrt(ksi,x0)
-x0@[m:moreis(rpofrt(x0),ksi)]
-+*5158
-m"rp"@t19:=satz123c(xr,ksi,m):not(less(xr,ksi))
--5158
-m@satz158d:=th3"l.imp"(lrt(ksi,x0),less(rpofrt(x0),ksi),t19".5158",[t:lrt(ksi,x0)]satz158a(t)):urt(ksi,x0)
-ksi@[eta:cut][l:less(ksi,eta)]
-+5159
-[x0:rat]
-xr:=rpofrt(x0):cut
-[ux:urt(ksi,x0)][lx:lrt(eta,x0)][z0:rat]
-zr:=rpofrt(z0):cut
-[lz:lrt(eta,z0)][k:less"rt"(x0,z0)]
-t1:=satz127a(ksi,xr,zr,satz124(xr,ksi,satz158b(ksi,x0,ux)),satz154c(x0,z0,k)):less(ksi,zr)
-t2:=andi(less(ksi,zr),less(zr,eta),t1,satz158a(eta,z0,lz)):and(less(ksi,zr),less(zr,eta))
-t3:=somei(rat,[x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)),z0,t2):some"rt"([x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)))
-lx@t4:=cutapp3(eta,x0,lx,some"rt"([x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta))),[x:rat][t:lrt(eta,x)][u:less"rt"(x0,x)]t3(x,t,u)):some"rt"([x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)))
--5159
-satz159:=lessapp(ksi,eta,l,some"rt"([x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta))),[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]t4".5159"(x,t,u)):some"rt"([x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)))
-+*5159
-x0@[a:and(less(ksi,xr),less(xr,eta))]
-t5:=andi(ratrp(xr),and(less(ksi,xr),less(xr,eta)),ratrpi(x0),a):and3(ratrp(xr),less(ksi,xr),less(xr,eta))
-t6:=somei(cut,[c:cut]and3(ratrp(c),less(ksi,c),less(c,eta)),xr,t5):some([c:cut]and3(ratrp(c),less(ksi,c),less(c,eta)))
--5159
-l@satz159a:=someapp(rat,[x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)),satz159,some([a:cut]and3(ratrp(a),less(ksi,a),less(a,eta))),[x:rat][t:and(less(ksi,rpofrt(x)),less(rpofrt(x),eta))]t6".5159"(x,t)):some([a:cut]and3(ratrp(a),less(ksi,a),less(a,eta)))
-[p:'prop'][p1:[x:rat][t:less(ksi,rpofrt(x))][u:less(rpofrt(x),eta)]p]
-+*5159
-p1@[y0:rat]
-yr:=rpofrt(y0):cut
-[a:and(less(ksi,yr),less(yr,eta))]
-t7:=ande1(less(ksi,yr),less(yr,eta),a):less(ksi,yr)
-t8:=ande2(less(ksi,yr),less(yr,eta),a):less(yr,eta)
-t9:=<t8><t7><y0>p1:p
--5159
-p1@satz159app:=someapp(rat,[x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)),satz159,p,[x:rat][t:and(less(ksi,rpofrt(x)),less(rpofrt(x),eta))]t9".5159"(x,t)):p
-eta@[z0:rat][m:more(rpofrt(z0),ts(ksi,eta))]
-+5160
-zr:=rpofrt(z0):cut
-nm:=mn(zr,ts(ksi,eta),m):cut
-dn:=pl(pl(ksi,eta),1rp):cut
-fr:=ov(nm,dn):cut
-zeta:=ite(less(fr,1rp),cut,fr,1rp):cut
-[l:less(fr,1rp)]
-t1:=itet(less(fr,1rp),cut,fr,1rp,l):is(zeta,fr)
-t2:=lessisi2(zeta,fr,t1):lessis(zeta,fr)
-t3:=lessisi1(zeta,1rp,satz127a(zeta,fr,1rp,t2,l)):lessis(zeta,1rp)
-m@[n:not(less(fr,1rp))]
-t4:=itef(less(fr,1rp),cut,fr,1rp,n):is(zeta,1rp)
-t5:=lessisi2(zeta,1rp,t4):lessis(zeta,1rp)
-t6:=trlessis(zeta,1rp,fr,t5,satz124(fr,1rp,satz123f(fr,1rp,n))):lessis(zeta,fr)
-m@t7:=th1"l.imp"(less(fr,1rp),lessis(zeta,1rp),[t:less(fr,1rp)]t3(t),[t:not(less(fr,1rp))]t5(t)):lessis(zeta,1rp)
-t8:=th1"l.imp"(less(fr,1rp),lessis(zeta,fr),[t:less(fr,1rp)]t2(t),[t:not(less(fr,1rp))]t6(t)):lessis(zeta,fr)
-[z1:rat]
-zr1:=rpofrt(z1):cut
-[l1:less(ksi,zr1)][l2:less(zr1,pl(ksi,zeta))][z2:rat]
-zr2:=rpofrt(z2):cut
-[l3:less(eta,zr2)][l4:less(zr2,pl(eta,zeta))]
-t9:=isless2(ts(pl(ksi,zeta),pl(eta,zeta)),pl(ts(pl(ksi,zeta),eta),ts(pl(ksi,zeta),zeta)),ts(zr1,zr2),disttp2(pl(ksi,zeta),eta,zeta),satz147a(zr1,pl(ksi,zeta),zr2,pl(eta,zeta),l2,l4)):less(ts(zr1,zr2),pl(ts(pl(ksi,zeta),eta),ts(pl(ksi,zeta),zeta)))
-t10:=lessisi2(ts(pl(ksi,zeta),eta),pl(ts(ksi,eta),ts(eta,zeta)),tris(cut,ts(pl(ksi,zeta),eta),pl(ts(ksi,eta),ts(zeta,eta)),pl(ts(ksi,eta),ts(eta,zeta)),disttp1(ksi,zeta,eta),ispl2(ts(zeta,eta),ts(eta,zeta),ts(ksi,eta),comts(zeta,eta)))):lessis(ts(pl(ksi,zeta),eta),pl(ts(ksi,eta),ts(eta,zeta)))
-t11:=satz149a(pl(ksi,zeta),pl(ksi,1rp),zeta,zeta,satz139a(ksi,ksi,zeta,1rp,lessisi2(ksi,ksi,refis(cut,ksi)),t7),lessisi2(zeta,zeta,refis(cut,zeta))):lessis(ts(pl(ksi,zeta),zeta),ts(pl(ksi,1rp),zeta))
-t12:=satz139a(ts(pl(ksi,zeta),eta),pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,zeta),zeta),ts(pl(ksi,1rp),zeta),t10,t11):lessis(pl(ts(pl(ksi,zeta),eta),ts(pl(ksi,zeta),zeta)),pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)))
-t13:=satz127b(ts(zr1,zr2),pl(ts(pl(ksi,zeta),eta),ts(pl(ksi,zeta),zeta)),pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)),t9,t12):less(ts(zr1,zr2),pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)))
-t14:=tris(cut,pl(eta,pl(ksi,1rp)),pl(pl(eta,ksi),1rp),pl(pl(ksi,eta),1rp),asspl2(eta,ksi,1rp),ispl1(pl(eta,ksi),pl(ksi,eta),1rp,compl(eta,ksi))):is(pl(eta,pl(ksi,1rp)),dn)
-t15:=tris(cut,pl(ts(eta,zeta),ts(pl(ksi,1rp),zeta)),ts(pl(eta,pl(ksi,1rp)),zeta),ts(dn,zeta),distpt1(eta,pl(ksi,1rp),zeta),ists1(pl(eta,pl(ksi,1rp)),dn,zeta,t14)):is(pl(ts(eta,zeta),ts(pl(ksi,1rp),zeta)),ts(dn,zeta))
-t16:=tris(cut,pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)),pl(ts(ksi,eta),pl(ts(eta,zeta),ts(pl(ksi,1rp),zeta))),pl(ts(ksi,eta),ts(dn,zeta)),asspl1(ts(ksi,eta),ts(eta,zeta),ts(pl(ksi,1rp),zeta)),ispl2(pl(ts(eta,zeta),ts(pl(ksi,1rp),zeta)),ts(dn,zeta),ts(ksi,eta),t15)):is(pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)),pl(ts(ksi,eta),ts(dn,zeta)))
-t17:=isless2(pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)),pl(ts(ksi,eta),ts(dn,zeta)),ts(zr1,zr2),t16,t13):less(ts(zr1,zr2),pl(ts(ksi,eta),ts(dn,zeta)))
-t18:=islessis12(ts(zeta,dn),ts(dn,zeta),ts(fr,dn),nm,comts(zeta,dn),satz153e(nm,dn),satz149a(zeta,fr,dn,dn,t8,lessisi2(dn,dn,refis(cut,dn)))):lessis(ts(dn,zeta),nm)
-t19:=satz139a(ts(ksi,eta),ts(ksi,eta),ts(dn,zeta),nm,lessisi2(ts(ksi,eta),ts(ksi,eta),refis(cut,ts(ksi,eta))),t18):lessis(pl(ts(ksi,eta),ts(dn,zeta)),pl(ts(ksi,eta),nm))
-t20:=satz127b(ts(zr1,zr2),pl(ts(ksi,eta),ts(dn,zeta)),pl(ts(ksi,eta),nm),t17,t19):less(ts(zr1,zr2),pl(ts(ksi,eta),nm))
-t21:=isless2(pl(ts(ksi,eta),nm),zr,ts(zr1,zr2),satz140c(zr,ts(ksi,eta),m),t20):less(ts(zr1,zr2),zr)
-t22:=satz154f(ts"rt"(z1,z2),z0,isless1(ts(zr1,zr2),rpofrt(ts"rt"(z1,z2)),zr,symis(cut,rpofrt(ts"rt"(z1,z2)),ts(zr1,zr2),satz155c(z1,z2)),t21)):less"rt"(ts"rt"(z1,z2),z0)
-x0:=ov"rt"(z0,z2):rat
-xr:=rpofrt(x0):cut
-y0:=z2:rat
-yr:=rpofrt(y0):cut
-t23:=satz110e(z0,z2):is"rt"(ts"rt"(x0,y0),z0)
-t24:=ismore1"rt"(z0,ts"rt"(x0,z2),ts"rt"(z1,z2),symis(rat,ts"rt"(x0,z2),z0,t23),satz83(ts"rt"(z1,z2),z0,t22)):more"rt"(ts"rt"(x0,z2),ts"rt"(z1,z2))
-t25:=satz106a(x0,z1,z2,t24):more"rt"(x0,z1)
-t26:=trmore(xr,zr1,ksi,satz154a(x0,z1,t25),satz122(ksi,zr1,l1)):more(xr,ksi)
-t27:=satz122(eta,yr,l3):more(yr,eta)
-z0@[u0:rat]
-ur:=rpofrt(u0):cut
-[v0:rat]
-vr:=rpofrt(v0):cut
-prop1:=and3(more(ur,ksi),more(vr,eta),is"rt"(ts"rt"(u0,v0),z0)):'prop'
-z0@prop2:=some"rt"([x:rat]some"rt"([y:rat]prop1(x,y))):'prop'
-l4@t28:=and3i(more(xr,ksi),more(yr,eta),is"rt"(ts"rt"(x0,y0),z0),t26,t27,t23):prop1(x0,y0)
-t29:=somei(rat,[y:rat]prop1(x0,y),y0,t28):some"rt"([y:rat]prop1(x0,y))
-t30:=somei(rat,[x:rat]some"rt"([y:rat]prop1(x,y)),x0,t29):prop2
-l2@t31:=satz159app(eta,pl(eta,zeta),satz133a(eta,zeta),prop2,[x:rat][t:less(eta,rpofrt(x))][u:less(rpofrt(x),pl(eta,zeta))]t30(x,t,u)):prop2
--5160
-satz160:=satz159app(ksi,pl(ksi,zeta".5160"),satz133a(ksi,zeta".5160"),prop2".5160",[x:rat][t:less(ksi,rpofrt(x))][u:less(rpofrt(x),pl(ksi,zeta".5160"))]t31".5160"(x,t,u)):some"rt"([x:rat]some"rt"([y:rat]and3(more(rpofrt(x),ksi),more(rpofrt(y),eta),is"rt"(ts"rt"(x,y),z0))))
-[p:'prop'][p1:[x:rat][t:more(rpofrt(x),ksi)][y:rat][u:more(rpofrt(y),eta)][v:is"rt"(ts"rt"(x,y),z0)]p]
-+*5160
-p1@[x1:rat]
-xr1:=rpofrt(x1):cut
-[px:some"rt"([y:rat]prop1(x1,y))][y1:rat]
-yr1:=rpofrt(y1):cut
-[py:prop1(x1,y1)]
-t32:=and3e1(more(xr1,ksi),more(yr1,eta),is"rt"(ts"rt"(x1,y1),z0),py):more(xr1,ksi)
-t33:=and3e2(more(xr1,ksi),more(yr1,eta),is"rt"(ts"rt"(x1,y1),z0),py):more(yr1,eta)
-t34:=and3e3(more(xr1,ksi),more(yr1,eta),is"rt"(ts"rt"(x1,y1),z0),py):is"rt"(ts"rt"(x1,y1),z0)
-t35:=<t34><t33><y1><t32><x1>p1:p
-px@t36:=someapp(rat,[y:rat]prop1(x1,y),px,p,[y:rat][v:prop1(x1,y)]t35(y,v)):p
--5160
-p1@satz160app:=someapp(rat,[x:rat]some"rt"([y:rat]prop1".5160"(x,y)),satz160,p,[x:rat][t:some"rt"([y:rat]prop1".5160"(x,y))]t36".5160"(x,t)):p
-+5161
-@[ksi:cut][eta:cut]
-min:=ite(less(ksi,eta),cut,ksi,eta):cut
-max:=ite(more(ksi,eta),cut,ksi,eta):cut
-[u0:rat]
-ur:=rpofrt(u0):cut
-[lu:lrt(min,u0)]
-t1:=satz158a(min,u0,lu):less(ur,min)
-[l:less(ksi,eta)]
-t2:=isless2(min,ksi,ur,itet(less(ksi,eta),cut,ksi,eta,l),t1):less(ur,ksi)
-t3:=trless(ur,ksi,eta,t2,l):less(ur,eta)
-lu@[n:not(less(ksi,eta))]
-t4:=isless2(min,eta,ur,itef(less(ksi,eta),cut,ksi,eta,n),t1):less(ur,eta)
-t5:=satz127b(ur,eta,ksi,t4,satz124(ksi,eta,satz123f(ksi,eta,n))):less(ur,ksi)
-lu@t6:=th1"l.imp"(less(ksi,eta),less(ur,ksi),[t:less(ksi,eta)]t2(t),[t:not(less(ksi,eta))]t5(t)):less(ur,ksi)
-t7:=th1"l.imp"(less(ksi,eta),less(ur,eta),[t:less(ksi,eta)]t3(t),[t:not(less(ksi,eta))]t4(t)):less(ur,eta)
-u0@[uu:urt(max,u0)]
-t8:=satz158b(max,u0,uu):moreis(ur,max)
-[m:more(ksi,eta)]
-t9:=ismoreis2(max,ksi,ur,itet(more(ksi,eta),cut,ksi,eta,m),t8):moreis(ur,ksi)
-t10:=trmoreis(ur,ksi,eta,t9,moreisi1(ksi,eta,m)):moreis(ur,eta)
-uu@[n:not(more(ksi,eta))]
-t11:=ismoreis2(max,eta,ur,itef(more(ksi,eta),cut,ksi,eta,n),t8):moreis(ur,eta)
-t12:=trmoreis(ur,eta,ksi,t11,satz125(ksi,eta,satz123e(ksi,eta,n))):moreis(ur,ksi)
-uu@t13:=th1"l.imp"(more(ksi,eta),moreis(ur,ksi),[t:more(ksi,eta)]t9(t),[t:not(more(ksi,eta))]t12(t)):moreis(ur,ksi)
-t14:=th1"l.imp"(more(ksi,eta),moreis(ur,eta),[t:more(ksi,eta)]t10(t),[t:not(more(ksi,eta))]t11(t)):moreis(ur,eta)
--5161
-@[zeta:cut]
-+*5161
-zeta@[ksi1:cut][ksi2:cut][m:more(ksi1,ksi2)]
-t15:=satz147(ksi1,ksi2,ksi1,ksi2,m,m):more(ts(ksi1,ksi1),ts(ksi2,ksi2))
-ksi2@sq1:=ts(ksi1,ksi1):cut
-sq2:=ts(ksi2,ksi2):cut
-m@t16:=ec3e21(is(sq1,sq2),more(sq1,sq2),less(sq1,sq2),satz123b(sq1,sq2),t15):nis(sq1,sq2)
-ksi2@[i:is(sq1,zeta)][j:is(sq2,zeta)]
-t17:=tris2(cut,sq1,sq2,zeta,i,j):is(sq1,sq2)
-t18:=[t:more(ksi1,ksi2)]<t17>t16(t):not(more(ksi1,ksi2))
-t19:=[t:less(ksi1,ksi2)]<symis(cut,sq1,sq2,t17)>t16(ksi2,ksi1,satz122(ksi1,ksi2,t)):not(less(ksi1,ksi2))
-t20:=or3e1(is(ksi1,ksi2),more(ksi1,ksi2),less(ksi1,ksi2),satz123a(ksi1,ksi2),t18,t19):is(ksi1,ksi2)
-zeta@t21:=[a:cut][b:cut][t:is(ts(a,a),zeta)][u:is(ts(b,b),zeta)]t20(a,b,t,u):amone(cut,[a:cut]is(ts(a,a),zeta))
-sqrtset:=setof(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta)):set(rat)
-[x0:rat]
-xr:=rpofrt(x0):cut
-[lx:lrt(min(1rp,zeta),x0)]
-t22:=t6(1rp,zeta,x0,lx):less(xr,1rp)
-t23:=t7(1rp,zeta,x0,lx):less(xr,zeta)
-t24:=isless1(xr,ts(xr,1rp),zeta,satz151a(xr),t23):less(ts(xr,1rp),zeta)
-t25:=trless(ts(xr,xr),ts(xr,1rp),zeta,satz148c(xr,xr,xr,1rp,lessisi2(xr,xr,refis(cut,xr)),t22),t24):less(ts(xr,xr),zeta)
-t26:=estii(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),x0,t25):in(x0,sqrtset)
-x0@[ux:urt(max(1rp,zeta),x0)]
-t27:=t13(1rp,zeta,x0,ux):moreis(xr,1rp)
-t28:=t14(1rp,zeta,x0,ux):moreis(xr,zeta)
-t29:=ismoreis1(xr,ts(xr,1rp),zeta,satz151a(xr),t28):moreis(ts(xr,1rp),zeta)
-t30:=trmoreis(ts(xr,xr),ts(xr,1rp),zeta,satz149(xr,xr,xr,1rp,moreisi2(xr,xr,refis(cut,xr)),t27),t29):moreis(ts(xr,xr),zeta)
-t31:=satz123c(ts(xr,xr),zeta,t30):not(less(ts(xr,xr),zeta))
-t32:=th3"l.imp"(in(x0,sqrtset),less(ts(xr,xr),zeta),t31,[t:in(x0,sqrtset)]estie(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),x0,t)):not(in(x0,sqrtset))
-x0@[i:in(x0,sqrtset)][y0:rat]
-yr:=rpofrt(y0):cut
-[l:less"rt"(y0,x0)]
-i@t33:=estie(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),x0,i):less(ts(xr,xr),zeta)
-l@t34:=satz154c(y0,x0,l):less(yr,xr)
-t35:=trless(ts(yr,yr),ts(xr,xr),zeta,satz147a(yr,xr,yr,xr,t34,t34),t33):less(ts(yr,yr),zeta)
-t36:=estii(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),y0,t35):in(y0,sqrtset)
-i@t37:=satz122(ts(xr,xr),zeta,t33):more(zeta,ts(xr,xr))
-nm:=mn(zeta,ts(xr,xr),t37):cut
-dn:=pl(xr,pl(xr,1rp)):cut
-fr:=ov(nm,dn):cut
-[z0:rat]
-zr:=rpofrt(z0):cut
-[lz:lrt(min(1rp,fr),z0)]
-t38:=t6(1rp,fr,z0,lz):less(zr,1rp)
-t39:=t7(1rp,fr,z0,lz):less(zr,fr)
-t40:=satz94(x0,z0):more"rt"(pl"rt"(x0,z0),x0)
-t41:=tris(cut,ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),ts(pl(xr,zr),pl(xr,zr)),pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)),ists12(rpofrt(pl"rt"(x0,z0)),pl(xr,zr),rpofrt(pl"rt"(x0,z0)),pl(xr,zr),satz155a(x0,z0),satz155a(x0,z0)),disttp2(pl(xr,zr),xr,zr)):is(ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)))
-t42:=symis(cut,ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)),t41):is(pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)),ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))))
-t43:=lessisi2(ts(pl(xr,zr),xr),pl(ts(xr,xr),ts(xr,zr)),tris(cut,ts(pl(xr,zr),xr),pl(ts(xr,xr),ts(zr,xr)),pl(ts(xr,xr),ts(xr,zr)),disttp1(xr,zr,xr),ispl2(ts(zr,xr),ts(xr,zr),ts(xr,xr),comts(zr,xr)))):lessis(ts(pl(xr,zr),xr),pl(ts(xr,xr),ts(xr,zr)))
-t44:=satz145c(pl(xr,zr),pl(xr,1rp),zr,satz138c(xr,xr,zr,1rp,lessisi2(xr,xr,refis(cut,xr)),t38)):less(ts(pl(xr,zr),zr),ts(pl(xr,1rp),zr))
-t45:=satz138c(ts(pl(xr,zr),xr),pl(ts(xr,xr),ts(xr,zr)),ts(pl(xr,zr),zr),ts(pl(xr,1rp),zr),t43,t44):less(pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)),pl(pl(ts(xr,xr),ts(xr,zr)),ts(pl(xr,1rp),zr)))
-t46:=tris(cut,pl(pl(ts(xr,xr),ts(xr,zr)),ts(pl(xr,1rp),zr)),pl(ts(xr,xr),pl(ts(xr,zr),ts(pl(xr,1rp),zr))),pl(ts(xr,xr),ts(dn,zr)),asspl1(ts(xr,xr),ts(xr,zr),ts(pl(xr,1rp),zr)),ispl2(pl(ts(xr,zr),ts(pl(xr,1rp),zr)),ts(dn,zr),ts(xr,xr),distpt1(xr,pl(xr,1rp),zr))):is(pl(pl(ts(xr,xr),ts(xr,zr)),ts(pl(xr,1rp),zr)),pl(ts(xr,xr),ts(dn,zr)))
-t47:=isless12(pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)),ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),pl(pl(ts(xr,xr),ts(xr,zr)),ts(pl(xr,1rp),zr)),pl(ts(xr,xr),ts(dn,zr)),t42,t46,t45):less(ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),pl(ts(xr,xr),ts(dn,zr)))
-t48:=isless2(ts(dn,fr),nm,ts(dn,zr),satz153c(nm,dn),satz148c(dn,dn,zr,fr,lessisi2(dn,dn,refis(cut,dn)),t39)):less(ts(dn,zr),nm)
-t49:=satz138c(ts(xr,xr),ts(xr,xr),ts(dn,zr),nm,lessisi2(ts(xr,xr),ts(xr,xr),refis(cut,ts(xr,xr))),t48):less(pl(ts(xr,xr),ts(dn,zr)),pl(ts(xr,xr),nm))
-t50:=isless2(pl(ts(xr,xr),nm),zeta,pl(ts(xr,xr),ts(dn,zr)),satz140c(zeta,ts(xr,xr),t37),t49):less(pl(ts(xr,xr),ts(dn,zr)),zeta)
-t51:=trless(ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),pl(ts(xr,xr),ts(dn,zr)),zeta,t47,t50):less(ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),zeta)
-t52:=estii(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),pl"rt"(x0,z0),t51):in(pl"rt"(x0,z0),sqrtset)
-t53:=andi(in(pl"rt"(x0,z0),sqrtset),more"rt"(pl"rt"(x0,z0),x0),t52,t40):and(in(pl"rt"(x0,z0),sqrtset),more"rt"(pl"rt"(x0,z0),x0))
-t54:=somei(rat,[y:rat]and(in(y,sqrtset),more"rt"(y,x0)),pl"rt"(x0,z0),t53):some"rt"([y:rat]and(in(y,sqrtset),more"rt"(y,x0)))
-i@t55:=cutapp1a(min(1rp,fr),some"rt"([y:rat]and(in(y,sqrtset),more"rt"(y,x0))),[x:rat][t:lrt(min(1rp,fr),x)]t54(x,t)):some"rt"([y:rat]and(in(y,sqrtset),more"rt"(y,x0)))
-x0@[lx:lrt(min(1rp,zeta),x0)][y0:rat][uy:urt(max(1rp,zeta),y0)]
-t56:=cut2(sqrtset,x0,t26(lx),y0,t32(y0,uy),[x:rat][t:in(x,sqrtset)][y:rat][u:less"rt"(y,x)]t36(x,t,y,u),[x:rat][t:in(x,sqrtset)]t55(x,t)):cutprop(sqrtset)
-lx@t57:=cutapp1b(max(1rp,zeta),cutprop(sqrtset),[y:rat][t:urt(max(1rp,zeta),y)]t56(y,t)):cutprop(sqrtset)
-zeta@t58:=cutapp1a(min(1rp,zeta),cutprop(sqrtset),[x:rat][t:lrt(min(1rp,zeta),x)]t57(x,t)):cutprop(sqrtset)
-rtc:=cutof(sqrtset,t58):cut
-@[x0:rat][y0:rat][l:lessis"rt"(x0,y0)]
-t59:=th9"l.or"(less"rt"(x0,y0),is"rt"(x0,y0),less(rpofrt(x0),rpofrt(y0)),is(rpofrt(x0),rpofrt(y0)),l,[t:less"rt"(x0,y0)]satz154c(x0,y0,t),[t:is"rt"(x0,y0)]satz154b(x0,y0,t)):lessis(rpofrt(x0),rpofrt(y0))
-y0@[m:moreis"rt"(x0,y0)]
-t60:=satz125(rpofrt(y0),rpofrt(x0),t59(y0,x0,satz84(x0,y0,m))):moreis(rpofrt(x0),rpofrt(y0))
-zeta@[m:more(ts(rtc,rtc),zeta)]
-t61:=satz121(ts(rtc,rtc),zeta,m):less(zeta,ts(rtc,rtc))
-[z1:rat]
-zr1:=rpofrt(z1):cut
-[l1:less(zeta,zr1)][l2:less(zr1,ts(rtc,rtc))]
-t62:=satz158c(ts(rtc,rtc),z1,l2):lrt(ts(rtc,rtc),z1)
-[x1:rat]
-xr1:=rpofrt(x1):cut
-[lx1:lrt(rtc,x1)][x2:rat]
-xr2:=rpofrt(x2):cut
-[lx2:lrt(rtc,x2)][i:is"rt"(z1,ts"rt"(x1,x2))]
-xm:=ite(more"rt"(x1,x2),rat,x1,x2):rat
-xrm:=rpofrt(xm):cut
-[o:more"rt"(x1,x2)]
-t63:=symis(rat,xm,x1,itet(more"rt"(x1,x2),rat,x1,x2,o)):is"rt"(x1,xm)
-t64:=isp(rat,[x:rat]lrt(rtc,x),x1,xm,lx1,t63):lrt(rtc,xm)
-t65:=lessisi2"rt"(x1,xm,t63):lessis"rt"(x1,xm)
-t66:=lessisi1"rt"(x2,xm,satz87b(x2,x1,xm,satz82(x1,x2,o),t65)):lessis"rt"(x2,xm)
-i@[n:not(more"rt"(x1,x2))]
-t67:=symis(rat,xm,x2,itef(more"rt"(x1,x2),rat,x1,x2,n)):is"rt"(x2,xm)
-t68:=isp(rat,[x:rat]lrt(rtc,x),x2,xm,lx2,t67):lrt(rtc,xm)
-t69:=lessisi2"rt"(x2,xm,t67):lessis"rt"(x2,xm)
-t70:=satz88(x1,x2,xm,satz81e(x1,x2,n),t69):lessis"rt"(x1,xm)
-i@t71:=th1"l.imp"(more"rt"(x1,x2),lrt(rtc,xm),[t:more"rt"(x1,x2)]t64(t),[t:not(more"rt"(x1,x2))]t68(t)):lrt(rtc,xm)
-t72:=th1"l.imp"(more"rt"(x1,x2),lessis"rt"(x1,xm),[t:more"rt"(x1,x2)]t65(t),[t:not(more"rt"(x1,x2))]t70(t)):lessis"rt"(x1,xm)
-t73:=th1"l.imp"(more"rt"(x1,x2),lessis"rt"(x2,xm),[t:more"rt"(x1,x2)]t66(t),[t:not(more"rt"(x1,x2))]t69(t)):lessis"rt"(x2,xm)
-t74:=ini(sqrtset,t58,xm,t71):in(xm,sqrtset)
-t75:=t59(x1,xm,t72):lessis(xr1,xrm)
-t76:=t59(x2,xm,t73):lessis(xr2,xrm)
-t77:=tris(cut,zr1,rpofrt(ts"rt"(x1,x2)),ts(xr1,xr2),satz154b(z1,ts"rt"(x1,x2),i),satz155c(x1,x2)):is(zr1,ts(xr1,xr2))
-t78:=islessis1(ts(xr1,xr2),zr1,ts(xrm,xrm),symis(cut,zr1,ts(xr1,xr2),t77),satz149a(xr1,xrm,xr2,xrm,t75,t76)):lessis(zr1,ts(xrm,xrm))
-t79:=estie(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),xm,t74):less(ts(xrm,xrm),zeta)
-t80:=satz127a(zr1,ts(xrm,xrm),zeta,t78,t79):less(zr1,zeta)
-t81:=<t80>ec3e23(is(zr1,zeta),more(zr1,zeta),less(zr1,zeta),satz123b(zr1,zeta),satz122(zeta,zr1,l1)):con
-t82:=tsapp(rtc,rtc,z1,t62,con,[x:rat][t:lrt(rtc,x)][y:rat][u:lrt(rtc,y)][v:is"rt"(z1,ts"rt"(x,y))]t81(x,t,y,u,v)):con
-l2@t82a:=tsapp(rtc,rtc,z1,t62,con,[x:rat][t:lrt(rtc,x)][y:rat][u:lrt(rtc,y)][v:is"rt"(z1,ts"rt"(x,y))]t82(x,t,y,u,v)):con
-m@t83:=satz159app(zeta,ts(rtc,rtc),t61,con,[x:rat][t:less(zeta,rpofrt(x))][u:less(rpofrt(x),ts(rtc,rtc))]t82a(x,t,u)):con
-zeta@[l:less(ts(rtc,rtc),zeta)][z2:rat]
-zr2:=rpofrt(z2):cut
-[l3:less(ts(rtc,rtc),zr2)][l4:less(zr2,zeta)]
-t84:=satz122(ts(rtc,rtc),zr2,l3):more(zr2,ts(rtc,rtc))
-[y1:rat]
-yr1:=rpofrt(y1):cut
-[m1:more(yr1,rtc)][y2:rat]
-yr2:=rpofrt(y2):cut
-[m2:more(yr2,rtc)][i:is"rt"(ts"rt"(y1,y2),z2)]
-ym:=ite(less"rt"(y1,y2),rat,y1,y2):rat
-yrm:=rpofrt(ym):cut
-[k:less"rt"(y1,y2)]
-t85:=symis(rat,ym,y1,itet(less"rt"(y1,y2),rat,y1,y2,k)):is"rt"(y1,ym)
-t86:=satz154b(y1,ym,t85):is(yr1,yrm)
-t87:=ismore1(yr1,yrm,rtc,t86,m1):more(yrm,rtc)
-t88:=moreisi2(yr1,yrm,t86):moreis(yr1,yrm)
-t89:=moreisi1(yr2,yrm,satz127d(yr2,yr1,yrm,satz122(yr1,yr2,satz154c(y1,y2,k)),t88)):moreis(yr2,yrm)
-i@[n:not(less"rt"(y1,y2))]
-t90:=symis(rat,ym,y2,itef(less"rt"(y1,y2),rat,y1,y2,n)):is"rt"(y2,ym)
-t91:=satz154b(y2,ym,t90):is(yr2,yrm)
-t92:=ismore1(yr2,yrm,rtc,t91,m2):more(yrm,rtc)
-t93:=moreisi2(yr2,yrm,t91):moreis(yr2,yrm)
-t94:=trmoreis(yr1,yr2,yrm,t60(y1,y2,satz81f(y1,y2,n)),t93):moreis(yr1,yrm)
-i@t95:=th1"l.imp"(less"rt"(y1,y2),more(yrm,rtc),[t:less"rt"(y1,y2)]t87(t),[t:not(less"rt"(y1,y2))]t92(t)):more(yrm,rtc)
-t96:=th1"l.imp"(less"rt"(y1,y2),moreis(yr1,yrm),[t:less"rt"(y1,y2)]t88(t),[t:not(less"rt"(y1,y2))]t94(t)):moreis(yr1,yrm)
-t97:=th1"l.imp"(less"rt"(y1,y2),moreis(yr2,yrm),[t:less"rt"(y1,y2)]t89(t),[t:not(less"rt"(y1,y2))]t93(t)):moreis(yr2,yrm)
-t98:=satz158d(rtc,ym,moreisi1(yrm,rtc,t95)):urt(rtc,ym)
-t99:=th3"l.imp"(in(ym,sqrtset),lrt(rtc,ym),t98,[t:in(ym,sqrtset)]ine(sqrtset,t58,ym,t)):not(in(ym,sqrtset))
-t100:=th3"l.imp"(less(ts(yrm,yrm),zeta),in(ym,sqrtset),t99,[t:less(ts(yrm,yrm),zeta)]estii(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),ym,t)):not(less(ts(yrm,yrm),zeta))
-t101:=satz123f(ts(yrm,yrm),zeta,t100):moreis(ts(yrm,yrm),zeta)
-t101a:=satz149(yr1,yrm,yr2,yrm,t96,t97):moreis(ts(yr1,yr2),ts(yrm,yrm))
-t102:=ismoreis1(ts(yr1,yr2),zr2,ts(yrm,yrm),tris(cut,ts(yr1,yr2),rpofrt(ts"rt"(y1,y2)),zr2,symis(cut,rpofrt(ts"rt"(y1,y2)),ts(yr1,yr2),satz155c(y1,y2)),satz154b(ts"rt"(y1,y2),z2,i)),t101a):moreis(zr2,ts(yrm,yrm))
-t103:=trmoreis(zr2,ts(yrm,yrm),zeta,t102,t101):moreis(zr2,zeta)
-t104:=<l4>satz123c(zr2,zeta,t103):con
-l4@t105:=satz160app(rtc,rtc,z2,t84,con,[x:rat][t:more(rpofrt(x),rtc)][y:rat][u:more(rpofrt(y),rtc)][v:is"rt"(ts"rt"(x,y),z2)]t104(x,t,y,u,v)):con
-l@t106:=satz159app(ts(rtc,rtc),zeta,l,con,[x:rat][t:less(ts(rtc,rtc),rpofrt(x))][u:less(rpofrt(x),zeta)]t105(x,t,u)):con
-zeta@t107:=or3e1(is(ts(rtc,rtc),zeta),more(ts(rtc,rtc),zeta),less(ts(rtc,rtc),zeta),satz123a(ts(rtc,rtc),zeta),[t:more(ts(rtc,rtc),zeta)]t83(t),[t:less(ts(rtc,rtc),zeta)]t106(t)):is(ts(rtc,rtc),zeta)
-t108:=somei(cut,[a:cut]is(ts(a,a),zeta),rtc,t107):some([a:cut]is(ts(a,a),zeta))
--5161
-zeta@satz161:=onei(cut,[a:cut]is(ts(a,a),zeta),t21".5161",t108".5161"):one([a:cut]is(ts(a,a),zeta))
-@[ksi:cut]
-irratrp:=not(ratrp(ksi)):'prop'
--rp
--rt
-+5162
-@[v:nat]
-t1:=tris(nat,pl(v,v),pl(ts(1,v),v),ts(<1>suc,v),ispl1(v,ts(1,v),v,satz28g(v)),satz28h(1,v)):is(pl(v,v),ts(<1>suc,v))
-t2:=isless2(pl(v,v),ts(<1>suc,v),v,t1,satz18a(v,v)):less(v,ts(<1>suc,v))
-[w:nat][l:less(ts(v,v),ts(w,w))]
-t3:=satz10j(v,w,th3"l.imp"(moreis(v,w),moreis(ts(v,v),ts(w,w)),satz10h(ts(v,v),ts(w,w),l),[t:moreis(v,w)]satz36(v,w,v,w,t,t))):less(v,w)
-w@t4:=tris(nat,ts(pl(v,w),v),pl(ts(v,v),ts(w,v)),pl(ts(v,v),ts(v,w)),disttp1(v,w,v),ispl2(ts(w,v),ts(v,w),ts(v,v),comts(w,v))):is(ts(pl(v,w),v),pl(ts(v,v),ts(v,w)))
-t5:=tr3is(nat,ts(pl(v,w),pl(v,w)),pl(ts(pl(v,w),v),ts(pl(v,w),w)),pl(pl(ts(v,v),ts(v,w)),pl(ts(v,w),ts(w,w))),pl(pl(pl(ts(v,v),ts(v,w)),ts(v,w)),ts(w,w)),disttp2(pl(v,w),v,w),ispl12(ts(pl(v,w),v),pl(ts(v,v),ts(v,w)),ts(pl(v,w),w),pl(ts(v,w),ts(w,w)),t4,disttp1(v,w,w)),asspl2(pl(ts(v,v),ts(v,w)),ts(v,w),ts(w,w))):is(ts(pl(v,w),pl(v,w)),pl(pl(pl(ts(v,v),ts(v,w)),ts(v,w)),ts(w,w)))
-t6:=tris(nat,pl(pl(ts(v,v),ts(v,w)),ts(v,w)),pl(ts(v,v),pl(ts(v,w),ts(v,w))),pl(ts(v,v),ts(<1>suc,ts(v,w))),asspl1(ts(v,v),ts(v,w),ts(v,w)),ispl2(pl(ts(v,w),ts(v,w)),ts(<1>suc,ts(v,w)),ts(v,v),t1(ts(v,w)))):is(pl(pl(ts(v,v),ts(v,w)),ts(v,w)),pl(ts(v,v),ts(<1>suc,ts(v,w))))
-nun:=tris(nat,ts(pl(v,w),pl(v,w)),pl(pl(pl(ts(v,v),ts(v,w)),ts(v,w)),ts(w,w)),pl(pl(ts(v,v),ts(<1>suc,ts(v,w))),ts(w,w)),t5,ispl1(pl(pl(ts(v,v),ts(v,w)),ts(v,w)),pl(ts(v,v),ts(<1>suc,ts(v,w))),ts(w,w),t6)):is(ts(pl(v,w),pl(v,w)),pl(pl(ts(v,v),ts(<1>suc,ts(v,w))),ts(w,w)))
-nun1:=symis(nat,ts(pl(v,w),pl(v,w)),pl(pl(ts(v,v),ts(<1>suc,ts(v,w))),ts(w,w)),nun):is(pl(pl(ts(v,v),ts(<1>suc,ts(v,w))),ts(w,w)),ts(pl(v,w),pl(v,w)))
-prop1:=eq(tf(fr(w,v),fr(w,v)),fr(<1>suc,1)):'prop'
-v@prop2:=some([t:nat]prop1(t)):'prop'
-@prop3:=some([u:nat]prop2(u)):'prop'
-[p:prop3]
-y:=ind(nat,[t:nat]min([u:nat]prop2(u),t),satz27a([u:nat]prop2(u),p)):nat
-t7:=oneax(nat,[t:nat]min([u:nat]prop2(u),t),satz27a([u:nat]prop2(u),p)):min([u:nat]prop2(u),y)
-t8:=ande1(lb([u:nat]prop2(u),y),prop2(y),t7):lb([u:nat]prop2(u),y)
-t9:=ande2(lb([u:nat]prop2(u),y),prop2(y),t7):prop2(y)
-[x:nat][q:prop1(y,x)]
-t10:=treq1(fr(<1>suc,1),fr(ts(x,x),ts(y,y)),tf(fr(x,y),fr(x,y)),q,tfeq12a(x,y,x,y)):eq(fr(<1>suc,1),fr(ts(x,x),ts(y,y)))
-t11:=tr4is(nat,ts(<1>suc,ts(y,y)),ts(num(fr(<1>suc,1)),den(fr(ts(x,x),ts(y,y)))),ts(num(fr(ts(x,x),ts(y,y))),den(fr(<1>suc,1))),ts(ts(x,x),1),ts(x,x),12isnd(<1>suc,1,ts(x,x),ts(y,y)),t10,ndis12(ts(x,x),ts(y,y),<1>suc,1),satz28a(ts(x,x))):is(ts(<1>suc,ts(y,y)),ts(x,x))
-t12:=isless2(ts(<1>suc,ts(y,y)),ts(x,x),ts(y,y),t11,t2(ts(y,y))):less(ts(y,y),ts(x,x))
-t13:=isless1(ts(ts(<1>suc,y),y),ts(x,x),ts(ts(<1>suc,y),ts(<1>suc,y)),tris(nat,ts(ts(<1>suc,y),y),ts(<1>suc,ts(y,y)),ts(x,x),assts1(<1>suc,y,y),t11),satz35c(ts(<1>suc,y),ts(<1>suc,y),y,ts(<1>suc,y),lessisi2(ts(<1>suc,y),ts(<1>suc,y),refis(nat,ts(<1>suc,y))),t2(y))):less(ts(x,x),ts(ts(<1>suc,y),ts(<1>suc,y)))
-t14:=t3(y,x,t12):less(y,x)
-t15:=t3(x,ts(<1>suc,y),t13):less(x,ts(<1>suc,y))
-[u:nat][i:is(x,pl(y,u))]
-t16:=isless12(x,pl(y,u),ts(<1>suc,y),pl(y,y),i,symis(nat,pl(y,y),ts(<1>suc,y),t1(y)),t15):less(pl(y,u),pl(y,y))
-t17:=satz20f(u,y,y,t16):less(u,y)
-[t:nat][j:is(y,pl(u,t))]
-t18:=symis(nat,y,pl(u,t),j):is(pl(u,t),y)
-t19:=tris(nat,ts(x,x),ts(pl(y,u),pl(y,u)),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),ts(u,u)),ists12(x,pl(y,u),x,pl(y,u),i,i),nun(y,u)):is(ts(x,x),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),ts(u,u)))
-t20:=tris(nat,pl(ts(x,x),ts(t,t)),pl(pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),ts(u,u)),ts(t,t)),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(ts(u,u),ts(t,t))),ispl1(ts(x,x),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),ts(u,u)),ts(t,t),t19),asspl1(pl(ts(y,y),ts(<1>suc,ts(y,u))),ts(u,u),ts(t,t))):is(pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(ts(u,u),ts(t,t))))
-t21:=tr3is(nat,ts(y,u),ts(u,y),ts(u,pl(u,t)),pl(ts(u,u),ts(u,t)),comts(y,u),ists2(y,pl(u,t),u,j),disttp2(u,u,t)):is(ts(y,u),pl(ts(u,u),ts(u,t)))
-t22:=tris(nat,ts(<1>suc,ts(y,u)),ts(<1>suc,pl(ts(u,u),ts(u,t))),pl(ts(<1>suc,ts(u,u)),ts(<1>suc,ts(u,t))),ists2(ts(y,u),pl(ts(u,u),ts(u,t)),<1>suc,t21),disttp2(<1>suc,ts(u,u),ts(u,t))):is(ts(<1>suc,ts(y,u)),pl(ts(<1>suc,ts(u,u)),ts(<1>suc,ts(u,t))))
-t23:=tris(nat,pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(ts(y,y),pl(ts(<1>suc,ts(u,u)),ts(<1>suc,ts(u,t)))),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(<1>suc,ts(u,t))),ispl2(ts(<1>suc,ts(y,u)),pl(ts(<1>suc,ts(u,u)),ts(<1>suc,ts(u,t))),ts(y,y),t22),asspl2(ts(y,y),ts(<1>suc,ts(u,u)),ts(<1>suc,ts(u,t)))):is(pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(<1>suc,ts(u,t))))
-t24:=tr3is(nat,pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(ts(u,u),ts(t,t))),pl(pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(<1>suc,ts(u,t))),pl(ts(u,u),ts(t,t))),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t)))),t20,ispl1(pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(<1>suc,ts(u,t))),pl(ts(u,u),ts(t,t)),t23),asspl1(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t)))):is(pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t)))))
-t25:=tr4is(nat,pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t))),pl(pl(ts(<1>suc,ts(u,t)),ts(u,u)),ts(t,t)),pl(pl(ts(u,u),ts(<1>suc,ts(u,t))),ts(t,t)),ts(pl(u,t),pl(u,t)),ts(y,y),asspl2(ts(<1>suc,ts(u,t)),ts(u,u),ts(t,t)),ispl1(pl(ts(<1>suc,ts(u,t)),ts(u,u)),pl(ts(u,u),ts(<1>suc,ts(u,t))),ts(t,t),compl(ts(<1>suc,ts(u,t)),ts(u,u))),nun1(u,t),ists12(pl(u,t),y,pl(u,t),y,t18,t18)):is(pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t))),ts(y,y))
-t26:=tr4is(nat,pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t)))),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(y,y)),pl(ts(y,y),pl(ts(y,y),ts(<1>suc,ts(u,u)))),pl(pl(ts(y,y),ts(y,y)),ts(<1>suc,ts(u,u))),t24,ispl2(pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t))),ts(y,y),pl(ts(y,y),ts(<1>suc,ts(u,u))),t25),compl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(y,y)),asspl2(ts(y,y),ts(y,y),ts(<1>suc,ts(u,u)))):is(pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(y,y)),ts(<1>suc,ts(u,u))))
-t27:=tris(nat,pl(ts(y,y),ts(y,y)),ts(<1>suc,ts(y,y)),ts(x,x),t1(ts(y,y)),t11):is(pl(ts(y,y),ts(y,y)),ts(x,x))
-t28:=tris(nat,pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(y,y)),ts(<1>suc,ts(u,u))),pl(ts(x,x),ts(<1>suc,ts(u,u))),t26,ispl1(pl(ts(y,y),ts(y,y)),ts(x,x),ts(<1>suc,ts(u,u)),t27)):is(pl(ts(x,x),ts(t,t)),pl(ts(x,x),ts(<1>suc,ts(u,u))))
-t29:=satz20e(ts(t,t),ts(<1>suc,ts(u,u)),ts(x,x),t28):is(ts(t,t),ts(<1>suc,ts(u,u)))
-t30:=tr4is(nat,ts(num(fr(<1>suc,1)),den(fr(ts(t,t),ts(u,u)))),ts(<1>suc,ts(u,u)),ts(t,t),ts(ts(t,t),1),ts(num(fr(ts(t,t),ts(u,u))),den(fr(<1>suc,1))),ndis12(<1>suc,1,ts(t,t),ts(u,u)),symis(nat,ts(t,t),ts(<1>suc,ts(u,u)),t29),satz28e(ts(t,t)),12isnd(ts(t,t),ts(u,u),<1>suc,1)):eq(fr(<1>suc,1),fr(ts(t,t),ts(u,u)))
-t31:=treq2(tf(fr(t,u),fr(t,u)),fr(<1>suc,1),fr(ts(t,t),ts(u,u)),tfeq12a(t,u,t,u),t30):prop1(u,t)
-t32:=somei(nat,[v:nat]prop1(u,v),t,t31):prop2(u)
-t33:=<t32><u>t8:lessis(y,u)
-t34:=<t33>satz10g(y,u,satz12(u,y,t17)):con
-i@t35:=someapp(nat,[v:nat]diffprop(y,u,v),t17,con,[v:nat][w:diffprop(y,u,v)]t34(v,w)):con
-q@t36:=someapp(nat,[v:nat]diffprop(x,y,v),t14,con,[v:nat][w:diffprop(x,y,v)]t35(v,w)):con
-p@t37:=someapp(nat,[v:nat]prop1(y,v),t9,con,[v:nat][w:prop1(y,v)]t36(v,w)):con
--5162
-+*rt
-+5162
-@[x0:rat][i:is(ts(x0,x0),rtofn(<1>suc))][x:frac][xix0:inf(x,class(x0))]
-t38:=ise(ts(x0,x0),rtofn(<1>suc),tf(x,x),fr(<1>suc,1),tict(x0,x0,x,x,xix0,xix0),inclass(fr(<1>suc,1)),i):eq"n"(tf(x,x),fr(<1>suc,1))
-t39:=refeq1(fr(num(x),den(x)),x,fris(x)):eq"n"(fr(num(x),den(x)),x)
-t40:=eqtf12(fr(num(x),den(x)),x,fr(num(x),den(x)),x,t39,t39):eq"n"(tf(fr(num(x),den(x)),fr(num(x),den(x))),tf(x,x))
-t41:=treq"n"(tf(fr(num(x),den(x)),fr(num(x),den(x))),tf(x,x),fr(<1>suc,1),t40,t38):prop1"n.5162"(den(x),num(x))
-t42:=somei(nat,[t:nat]prop1"n.5162"(den(x),t),num(x),t41):prop2"n.5162"(den(x))
-t43:=somei(nat,[t:nat]prop2"n.5162"(t),den(x),t42):prop3"n.5162"
-t44:=t37"n.5162"(t43):con
-i@t45:=ratapp1(x0,con,[x:frac][t:inf(x,class(x0))]t44(x,t)):con
--5162
-+*rp
-+5162
-@ksi:=ind(cut,[a:cut]is(ts(a,a),rpofnt(<1>suc)),satz161(rpofnt(<1>suc))):cut
-t46:=oneax(cut,[a:cut]is(ts(a,a),rpofnt(<1>suc)),satz161(rpofnt(<1>suc))):is(ts(ksi,ksi),rpofnt(<1>suc))
-[r:ratrp(ksi)]
-x0:=rtofrp(ksi,r):rat
-t47:=tr3is(cut,rpofrt(ts"rt"(x0,x0)),ts(rpofrt(x0),rpofrt(x0)),ts(ksi,ksi),rpofnt(<1>suc),satz155c(x0,x0),ists12(rpofrt(x0),ksi,rpofrt(x0),ksi,isrprt2(ksi,r),isrprt2(ksi,r)),t46):is(rpofrt(ts"rt"(x0,x0)),rpofnt(<1>suc))
-t48:=isrtirp(ts"rt"(x0,x0),rtofn(<1>suc),t47):is"rt"(ts"rt"(x0,x0),rtofn(<1>suc))
-t49:=t45"rt.5162"(x0,t48):con
--5162
-@satz162:=somei(cut,[a:cut]irratrp(a),ksi".5162",[t:ratrp(ksi".5162")]t49".5162"(t)):some([a:cut]irratrp(a))
-[zeta:cut]
-sqrt:=ind(cut,[a:cut]is(ts(a,a),zeta),satz161(zeta)):cut
-thsqrt1:=oneax(cut,[a:cut]is(ts(a,a),zeta),satz161(zeta)):is(ts(sqrt(zeta),sqrt(zeta)),zeta)
-[ksi:cut][i:is(ts(ksi,ksi),zeta)]
-thsqrt2:=t20".5161"(zeta,ksi,sqrt,i,thsqrt1):is(ksi,sqrt)
-@[ksi:cut][eta:cut][i:is(ksi,eta)]
-issqrt:=isf(cut,cut,[t:cut]sqrt(t),ksi,eta,i):is(sqrt(ksi),sqrt(eta))
-@[ksi:cut][nx:natrp(ksi)][eta:cut][ny:natrp(eta)]
-+iiia
-x:=ntofrp(ksi,nx):nat
-y:=ntofrp(eta,ny):nat
-t1:=isrpnt1(ksi,nx):is(ksi,rpofnt(x))
-t2:=isrpnt1(eta,ny):is(eta,rpofnt(y))
-t3:=ispl12(ksi,rpofnt(x),eta,rpofnt(y),t1,t2):is(pl(ksi,eta),pl(rpofnt(x),rpofnt(y)))
-x0:=rtofn(x):rat
-y0:=rtofn(y):rat
-t4:=natrti(x):natrt(x0)
-t5:=natrti(y):natrt(y0)
-t6:=symis(cut,rpofrt(pl"rt"(x0,y0)),pl(rpofnt(x),rpofnt(y)),satz155a(x0,y0)):is(pl(rpofnt(x),rpofnt(y)),rpofrt(pl"rt"(x0,y0)))
-t7:=satz112d(x0,t4,y0,t5):natrt(pl"rt"(x0,y0))
-xpy:=nofrt(pl"rt"(x0,y0),t7):nat
-t8:=isrtn1(pl"rt"(x0,y0),t7):is"rt"(pl"rt"(x0,y0),rtofn(xpy))
-t9:=isrterp(pl"rt"(x0,y0),rtofn(xpy),t8):is(rpofrt(pl"rt"(x0,y0)),rpofnt(xpy))
-t10:=tr3is(cut,pl(ksi,eta),pl(rpofnt(x),rpofnt(y)),rpofrt(pl"rt"(x0,y0)),rpofnt(xpy),t3,t6,t9):is(pl(ksi,eta),rpofnt(xpy))
--iiia
-natpl:=somei(nat,[t:nat]is(pl(ksi,eta),rpofnt(t)),xpy".iiia",t10".iiia"):natrp(pl(ksi,eta))
-+*iiia
-ny@t11:=ists12(ksi,rpofnt(x),eta,rpofnt(y),t1,t2):is(ts(ksi,eta),ts(rpofnt(x),rpofnt(y)))
-t12:=symis(cut,rpofrt(ts"rt"(x0,y0)),ts(rpofnt(x),rpofnt(y)),satz155c(x0,y0)):is(ts(rpofnt(x),rpofnt(y)),rpofrt(ts"rt"(x0,y0)))
-t13:=satz112f(x0,t4,y0,t5):natrt(ts"rt"(x0,y0))
-xty:=nofrt(ts"rt"(x0,y0),t13):nat
-t14:=isrtn1(ts"rt"(x0,y0),t13):is"rt"(ts"rt"(x0,y0),rtofn(xty))
-t15:=isrterp(ts"rt"(x0,y0),rtofn(xty),t14):is(rpofrt(ts"rt"(x0,y0)),rpofnt(xty))
-t16:=tr3is(cut,ts(ksi,eta),ts(rpofnt(x),rpofnt(y)),rpofrt(ts"rt"(x0,y0)),rpofnt(xty),t11,t12,t15):is(ts(ksi,eta),rpofnt(xty))
--iiia
-ny@natts:=somei(nat,[t:nat]is(ts(ksi,eta),rpofnt(t)),xty".iiia",t16".iiia"):natrp(ts(ksi,eta))
-[m:more(ksi,eta)]
-+*iiia
-m@t17:=ismore12(ksi,rpofnt(x),eta,rpofnt(y),t1,t2,m):more(rpofnt(x),rpofnt(y))
-t18:=satz154d(x0,y0,t17):more"rt"(x0,y0)
-t20:=ismn12(ksi,rpofnt(x),eta,rpofnt(y),m,satz154a(x0,y0,t18),t1,t2):is(mn(ksi,eta,m),mn(rpofnt(x),rpofnt(y),satz154a(x0,y0,t18)))
-t21:=symis(cut,rpofrt(mn"rt"(x0,y0,t18)),mn(rpofnt(x),rpofnt(y),satz154a(x0,y0,t18)),satz155b(x0,y0,t18)):is(mn(rpofnt(x),rpofnt(y),satz154a(x0,y0,t18)),rpofrt(mn"rt"(x0,y0,t18)))
-t22:=satz112g(x0,t4,y0,t5,t18):natrt(mn"rt"(x0,y0,t18))
-xmy:=nofrt(mn"rt"(x0,y0,t18),t22):nat
-t23:=isrtn1(mn"rt"(x0,y0,t18),t22):is"rt"(mn"rt"(x0,y0,t18),rtofn(xmy))
-t24:=isrterp(mn"rt"(x0,y0,t18),rtofn(xmy),t23):is(rpofrt(mn"rt"(x0,y0,t18)),rpofnt(xmy))
-t25:=tr3is(cut,mn(ksi,eta,m),mn(rpofnt(x),rpofnt(y),satz154a(x0,y0,t18)),rpofrt(mn"rt"(x0,y0,t18)),rpofnt(xmy),t20,t21,t24):is(mn(ksi,eta,m),rpofnt(xmy))
--iiia
-m@natmn:=somei(nat,[t:nat]is(mn(ksi,eta,m),rpofnt(t)),xmy".iiia",t25".iiia"):natrp(mn(ksi,eta,m))
-@[p:cut][q:cut][r:cut]
-3pl13:=tr3is(cut,pl(p,pl(q,r)),pl(pl(q,r),p),pl(pl(r,q),p),pl(r,pl(q,p)),compl(p,pl(q,r)),ispl1(pl(q,r),pl(r,q),p,compl(q,r)),asspl1(r,q,p)):is(pl(p,pl(q,r)),pl(r,pl(q,p)))
-[s:cut]
-4pl24:=tr3is(cut,pl(pl(p,q),pl(r,s)),pl(p,pl(q,pl(r,s))),pl(p,pl(s,pl(r,q))),pl(pl(p,s),pl(r,q)),asspl1(p,q,pl(r,s)),ispl2(pl(q,pl(r,s)),pl(s,pl(r,q)),p,3pl13(q,r,s)),asspl2(p,s,pl(r,q))):is(pl(pl(p,q),pl(r,s)),pl(pl(p,s),pl(r,q)))
-r@3pl12:=tr3is(cut,pl(p,pl(q,r)),pl(pl(p,q),r),pl(pl(q,p),r),pl(q,pl(p,r)),asspl2(p,q,r),ispl1(pl(p,q),pl(q,p),r,compl(p,q)),asspl1(q,p,r)):is(pl(p,pl(q,r)),pl(q,pl(p,r)))
-s@4pl23:=tr3is(cut,pl(pl(p,q),pl(r,s)),pl(p,pl(q,pl(r,s))),pl(p,pl(r,pl(q,s))),pl(pl(p,r),pl(q,s)),asspl1(p,q,pl(r,s)),ispl2(pl(q,pl(r,s)),pl(r,pl(q,s)),p,3pl12(q,r,s)),asspl2(p,r,pl(q,s))):is(pl(pl(p,q),pl(r,s)),pl(pl(p,r),pl(q,s)))
-r@3pl23:=tr3is(cut,pl(pl(p,q),r),pl(p,pl(q,r)),pl(p,pl(r,q)),pl(pl(p,r),q),asspl1(p,q,r),ispl2(pl(q,r),pl(r,q),p,compl(q,r)),asspl2(p,r,q)):is(pl(pl(p,q),r),pl(pl(p,r),q))
-p@a2isapa:=tris(cut,ts(p,pl(1rp,1rp)),pl(ts(p,1rp),ts(p,1rp)),pl(p,p),disttp2(p,1rp,1rp),ispl12(ts(p,1rp),p,ts(p,1rp),p,satz151(p),satz151(p))):is(ts(p,pl(1rp,1rp)),pl(p,p))
-@dif:=pair1type(cut):'type'
-[a1:cut][a2:cut]
-df:=pair1(cut,a1,a2):dif
-@[a:dif]
-stm:=first1(cut,a):cut
-std:=second1(cut,a):cut
-a2@stmis:=first1is1(cut,a1,a2):is(stm(df(a1,a2)),a1)
-isstm:=first1is2(cut,a1,a2):is(a1,stm(df(a1,a2)))
-stdis:=second1is1(cut,a1,a2):is(std(df(a1,a2)),a2)
-isstd:=second1is2(cut,a1,a2):is(a2,std(df(a1,a2)))
-a@1a:=stm(a):cut
-2a:=std(a):cut
-dfis:=pair1is1(cut,a):is"e"(dif,df(1a,2a),a)
-isdf:=pair1is2(cut,a):is"e"(dif,a,df(1a,2a))
-a2@[b1:cut][b2:cut]
-12issmsd:=ispl12(a1,stm(df(a1,a2)),b2,std(df(b1,b2)),isstm(a1,a2),isstd(b1,b2)):is(pl(a1,b2),pl(stm(df(a1,a2)),std(df(b1,b2))))
-smsdis12:=symis(cut,pl(a1,b2),pl(stm(df(a1,a2)),std(df(b1,b2))),12issmsd):is(pl(stm(df(a1,a2)),std(df(b1,b2))),pl(a1,b2))
-a@[r1:cut][r2:cut]
-1sdissmsd:=ispl1(r1,stm(df(r1,r2)),2a,isstm(r1,r2)):is(pl(r1,2a),pl(stm(df(r1,r2)),2a))
-smsdis1sd:=symis(cut,pl(r1,2a),pl(stm(df(r1,r2)),2a),1sdissmsd):is(pl(stm(df(r1,r2)),2a),pl(r1,2a))
-sm2issmsd:=ispl2(r2,std(df(r1,r2)),1a,isstd(r1,r2)):is(pl(1a,r2),pl(1a,std(df(r1,r2))))
-smsdissm2:=symis(cut,pl(1a,r2),pl(1a,std(df(r1,r2))),sm2issmsd):is(pl(1a,std(df(r1,r2))),pl(1a,r2))
-a2@[r:cut][i:is(a1,r)]
-issm:=isf(cut,dif,[t:cut]df(t,a2),a1,r,i):is"e"(dif,df(a1,a2),df(r,a2))
-r@[i:is(a2,r)]
-issd:=isf(cut,dif,[t:cut]df(a1,t),a2,r,i):is"e"(dif,df(a1,a2),df(a1,r))
-b2@[i:is(a1,b1)][j:is(a2,b2)]
-issmsd:=tris(dif,df(a1,a2),df(b1,a2),df(b1,b2),issm(a1,a2,b1,i),issd(b1,a2,b2,j)):is"e"(dif,df(a1,a2),df(b1,b2))
-a@[b:dif]
-1b:=stm(b):cut
-2b:=std(b):cut
-eq:=is(pl(1a,2b),pl(1b,2a)):'prop'
-b2@[i:is(pl(a1,b2),pl(b1,a2))]
-eqi12:=tr3is(cut,pl(stm(df(a1,a2)),std(df(b1,b2))),pl(a1,b2),pl(b1,a2),pl(stm(df(b1,b2)),std(df(a1,a2))),smsdis12(a1,a2,b1,b2),i,12issmsd(b1,b2,a1,a2)):eq(df(a1,a2),df(b1,b2))
-r2@[i:is(pl(1a,r2),pl(r1,2a))]
-eqi1:=isp(dif,[x:dif]eq(x,df(r1,r2)),df(1a,2a),a,eqi12(1a,2a,r1,r2,i),dfis):eq(a,df(r1,r2))
-r2@[i:is(pl(r1,2a),pl(1a,r2))]
-eqi2:=isp(dif,[x:dif]eq(df(r1,r2),x),df(1a,2a),a,eqi12(r1,r2,1a,2a,i),dfis):eq(df(r1,r2),a)
-b2@[e:eq(df(a1,a2),df(b1,b2))]
-eqe12:=tr3is(cut,pl(a1,b2),pl(stm(df(a1,a2)),std(df(b1,b2))),pl(stm(df(b1,b2)),std(df(a1,a2))),pl(b1,a2),12issmsd(a1,a2,b1,b2),e,smsdis12(b1,b2,a1,a2)):is(pl(a1,b2),pl(b1,a2))
-a@satzd163:=refis(cut,pl(1a,2a)):eq(a,a)
-refeq:=satzd163:eq(a,a)
-b@[i:is"e"(dif,a,b)]
-refeq1:=isp(dif,[x:dif]eq(a,x),a,b,refeq,i):eq(a,b)
-refeq2:=isp(dif,[x:dif]eq(x,a),a,b,refeq,i):eq(b,a)
-b2@[i:is(a1,b1)][j:is(a2,b2)]
-eqsmsd:=refeq1(df(a1,a2),df(b1,b2),issmsd(i,j)):eq(df(a1,a2),df(b1,b2))
-r@[i:is(a1,r)]
-eqsm:=refeq1(df(a1,a2),df(r,a2),issm(i)):eq(df(a1,a2),df(r,a2))
-r@[i:is(a2,r)]
-eqsd:=refeq1(df(a1,a2),df(a1,r),issd(i)):eq(df(a1,a2),df(a1,r))
-b@[e:eq(a,b)]
-satzd164:=symis(cut,pl(1a,2b),pl(1b,2a),e):eq(b,a)
-symeq:=satzd164:eq(b,a)
-b@[c:dif]
-1c:=stm(c):cut
-2c:=std(c):cut
-[e:eq(a,b)][f:eq(b,c)]
-+1d165
-t1:=ispl12(pl(1a,2b),pl(1b,2a),pl(1b,2c),pl(1c,2b),e,f):is(pl(pl(1a,2b),pl(1b,2c)),pl(pl(1b,2a),pl(1c,2b)))
-t2:=tr4is(cut,pl(pl(1a,2c),pl(1b,2b)),pl(pl(1a,2b),pl(1b,2c)),pl(pl(1b,2a),pl(1c,2b)),pl(pl(1c,2b),pl(1b,2a)),pl(pl(1c,2a),pl(1b,2b)),4pl24(1a,2c,1b,2b),t1,compl(pl(1b,2a),pl(1c,2b)),4pl24(1c,2b,1b,2a)):is(pl(pl(1a,2c),pl(1b,2b)),pl(pl(1c,2a),pl(1b,2b)))
--1d165
-satzd165:=satz136b(pl(1a,2c),pl(1c,2a),pl(1b,2b),t2".1d165"):eq(a,c)
-treq:=satzd165:eq(a,c)
-c@[e:eq(c,a)][f:eq(c,b)]
-treq1:=treq(a,c,b,symeq(c,a,e),f):eq(a,b)
-c@[e:eq(a,c)][f:eq(b,c)]
-treq2:=treq(a,c,b,e,symeq(b,c,f)):eq(a,b)
-c@[d:dif][e1:eq(a,b)][e2:eq(b,c)][e3:eq(c,d)]
-tr3eq:=treq(a,b,d,e1,treq(b,c,d,e2,e3)):eq(a,d)
-d@[e:dif][e1:eq(a,b)][e2:eq(b,c)][e3:eq(c,d)][e4:eq(d,e)]
-tr4eq:=tr3eq(a,b,c,e,e1,e2,treq(c,d,e,e3,e4)):eq(a,e)
-a@posd:=more(1a,2a):'prop'
-zero:=is(1a,2a):'prop'
-negd:=less(1a,2a):'prop'
-a2@[m:more(a1,a2)]
-posdi:=ismore12(a1,stm(df(a1,a2)),a2,std(df(a1,a2)),isstm(a1,a2),isstd(a1,a2),m):posd(df(a1,a2))
-a2@[i:is(a1,a2)]
-zeroi:=tr3is(cut,stm(df(a1,a2)),a1,a2,std(df(a1,a2)),stmis(a1,a2),i,isstd(a1,a2)):zero(df(a1,a2))
-a2@[l:less(a1,a2)]
-negdi:=isless12(a1,stm(df(a1,a2)),a2,std(df(a1,a2)),isstm(a1,a2),isstd(a1,a2),l):negd(df(a1,a2))
-a@axrde:=satz123b(1a,2a):ec3(zero(a),posd(a),negd(a))
-axrdo:=satz123a(1a,2a):or3(zero(a),posd(a),negd(a))
-axrd:=orec3i(zero(a),posd(a),negd(a),axrdo,axrde):orec3(zero(a),posd(a),negd(a))
-[p:'prop'][p1:[t:posd(a)]p][p2:[t:zero(a)]p][p3:[t:negd(a)]p]
-rappd:=or3app(zero(a),posd(a),negd(a),p,axrdo,p2,p1,p3):p
-a@[p:posd(a)]
-pnot0d:=ec3e21(zero(a),posd(a),negd(a),axrde,p):not(zero(a))
-pnotnd:=ec3e23(zero(a),posd(a),negd(a),axrde,p):not(negd(a))
-a@[z:zero(a)]
-0notpd:=ec3e12(zero(a),posd(a),negd(a),axrde,z):not(posd(a))
-0notnd:=ec3e13(zero(a),posd(a),negd(a),axrde,z):not(negd(a))
-a@[n:negd(a)]
-nnotpd:=ec3e32(zero(a),posd(a),negd(a),axrde,n):not(posd(a))
-nnot0d:=ec3e31(zero(a),posd(a),negd(a),axrde,n):not(zero(a))
-b@[e:eq(a,b)][p:posd(a)]
-+iv1d
-t1:=ismore12(pl(1a,2b),pl(1b,2a),pl(2a,2b),pl(2b,2a),e,compl(2a,2b),satz135a(1a,2a,2b,p)):more(pl(1b,2a),pl(2b,2a))
--iv1d
-eqposd:=satz136a(1b,2b,2a,t1".iv1d"):posd(b)
-e@[z:zero(a)]
-+*iv1d
-z@t2:=tr3is(cut,pl(1b,2a),pl(1a,2b),pl(2a,2b),pl(2b,2a),symeq(a,b,e),ispl1(1a,2a,2b,z),compl(2a,2b)):is(pl(1b,2a),pl(2b,2a))
--iv1d
-z@eqzero:=satz136b(1b,2b,2a,t2".iv1d"):zero(b)
-e@[n:negd(a)]
-+*iv1d
-n@t3:=isless12(pl(1a,2b),pl(1b,2a),pl(2a,2b),pl(2b,2a),e,compl(2a,2b),satz135c(1a,2a,2b,n)):less(pl(1b,2a),pl(2b,2a))
--iv1d
-n@eqnegd:=satz136c(1b,2b,2a,t3".iv1d"):negd(b)
-b@[z:zero(a)][y:zero(b)]
-zeroeq:=tris(cut,pl(1a,2b),pl(2a,1b),pl(1b,2a),ispl12(1a,2a,2b,1b,z,symis(cut,1b,2b,y)),compl(2a,1b)):eq(a,b)
-@[r:cut]
-pdofrp:=df(pl(r,1rp),1rp):dif
-ndofrp:=df(1rp,pl(r,1rp)):dif
-[s:cut][i:is(r,s)]
-isrpepd:=refeq1(pdofrp(r),pdofrp(s),isf(cut,dif,[x:cut]pdofrp(x),r,s,i)):eq(pdofrp(r),pdofrp(s))
-isrpend:=refeq1(ndofrp(r),ndofrp(s),isf(cut,dif,[x:cut]ndofrp(x),r,s,i)):eq(ndofrp(r),ndofrp(s))
-s@[e:eq(pdofrp(r),pdofrp(s))]
-+*iv1d
-e@t4:=satz136b(pl(r,1rp),pl(s,1rp),1rp,eqe12(pl(r,1rp),1rp,pl(s,1rp),1rp,e)):is(pl(r,1rp),pl(s,1rp))
--iv1d
-e@isrpipd:=satz136b(r,s,1rp,t4".iv1d"):is(r,s)
-s@[e:eq(ndofrp(r),ndofrp(s))]
-+*iv1d
-e@t5:=satz136e(pl(s,1rp),pl(r,1rp),1rp,eqe12(1rp,pl(r,1rp),1rp,pl(s,1rp),e)):is(pl(s,1rp),pl(r,1rp))
--iv1d
-e@isrpind:=symis(cut,s,r,satz136b(s,r,1rp,t5".iv1d")):is(r,s)
-r@posdirp:=posdi(pl(r,1rp),1rp,ismore1(pl(1rp,r),pl(r,1rp),1rp,compl(1rp,r),satz133(1rp,r))):posd(pdofrp(r))
-negdirp:=negdi(1rp,pl(r,1rp),isless2(pl(1rp,r),pl(r,1rp),1rp,compl(1rp,r),satz133a(1rp,r))):negd(ndofrp(r))
-a@[p:posd(a)]
-rpofpd:=mn(1a,2a,p):cut
-+*iv1d
-p@t6:=tr4is(cut,pl(1a,1rp),pl(pl(rpofpd,2a),1rp),pl(rpofpd,pl(2a,1rp)),pl(rpofpd,pl(1rp,2a)),pl(pl(rpofpd,1rp),2a),ispl1(1a,pl(rpofpd,2a),1rp,satz140f(1a,2a,p)),asspl1(rpofpd,2a,1rp),ispl2(pl(2a,1rp),pl(1rp,2a),rpofpd,compl(2a,1rp)),asspl2(rpofpd,1rp,2a)):is(pl(1a,1rp),pl(pl(rpofpd,1rp),2a))
--iv1d
-p@eqpdrp1:=eqi1(a,pl(rpofpd,1rp),1rp,t6".iv1d"):eq(a,pdofrp(rpofpd(a,p)))
-eqpdrp2:=symeq(a,pdofrp(rpofpd(a,p)),eqpdrp1):eq(pdofrp(rpofpd(a,p)),a)
-a@[n:negd(a)]
-rpofnd:=mn(2a,1a,satz122(1a,2a,n)):cut
-+*iv1d
-n@t7:=tr3is(cut,pl(1a,pl(rpofnd,1rp)),pl(pl(1a,rpofnd),1rp),pl(2a,1rp),pl(1rp,2a),asspl2(1a,rpofnd,1rp),ispl1(pl(1a,rpofnd),2a,1rp,satz140c(2a,1a,satz122(1a,2a,n))),compl(2a,1rp)):is(pl(1a,pl(rpofnd,1rp)),pl(1rp,2a))
--iv1d
-n@eqndrp1:=eqi1(a,1rp,pl(rpofnd,1rp),t7".iv1d"):eq(a,ndofrp(rpofnd(a,n)))
-eqndrp2:=symeq(a,ndofrp(rpofnd(a,n)),eqndrp1):eq(ndofrp(rpofnd(a,n)),a)
-@[h:dif][p:posd(h)][k:dif][q:posd(k)][e:eq(h,k)]
-+*iv1d
-e@t8:=tr3eq(pdofrp(rpofpd(h,p)),h,k,pdofrp(rpofpd(k,q)),eqpdrp2(h,p),e,eqpdrp1(k,q)):eq(pdofrp(rpofpd(h,p)),pdofrp(rpofpd(k,q)))
--iv1d
-e@eqpderp:=isrpipd(rpofpd(h,p),rpofpd(k,q),t8".iv1d"):is(rpofpd(h,p),rpofpd(k,q))
-q@[i:is(rpofpd(h,p),rpofpd(k,q))]
-+*iv1d
-i@t9:=isrpepd(rpofpd(h,p),rpofpd(k,q),i):eq(pdofrp(rpofpd(h,p)),pdofrp(rpofpd(k,q)))
--iv1d
-i@eqpdirp:=tr3eq(h,pdofrp(rpofpd(h,p)),pdofrp(rpofpd(k,q)),k,eqpdrp1(h,p),t9".iv1d",eqpdrp2(k,q)):eq(h,k)
-h@[n:negd(h)][k:dif][o:negd(k)][e:eq(h,k)]
-+*iv1d
-e@t10:=tr3eq(ndofrp(rpofnd(h,n)),h,k,ndofrp(rpofnd(k,o)),eqndrp2(h,n),e,eqndrp1(k,o)):eq(ndofrp(rpofnd(h,n)),ndofrp(rpofnd(k,o)))
--iv1d
-e@eqnderp:=isrpind(rpofnd(h,n),rpofnd(k,o),t10".iv1d"):is(rpofnd(h,n),rpofnd(k,o))
-o@[i:is(rpofnd(h,n),rpofnd(k,o))]
-+*iv1d
-i@t11:=isrpend(rpofnd(h,n),rpofnd(k,o),i):eq(ndofrp(rpofnd(h,n)),ndofrp(rpofnd(k,o)))
--iv1d
-i@eqndirp:=tr3eq(h,ndofrp(rpofnd(h,n)),ndofrp(rpofnd(k,o)),k,eqndrp1(h,n),t11".iv1d",eqndrp2(k,o)):eq(h,k)
-@[r:cut]
-+*iv1d
-r@t12:=eqpdrp1(pdofrp(r),posdirp(r)):eq(pdofrp(r),pdofrp(rpofpd(pdofrp(r),posdirp(r))))
--iv1d
-r@isrppd1:=isrpipd(r,rpofpd(pdofrp(r),posdirp(r)),t12".iv1d"):is(r,rpofpd(pdofrp(r),posdirp(r)))
-isrppd2:=symis(cut,r,rpofpd(pdofrp(r),posdirp(r)),isrppd1):is(rpofpd(pdofrp(r),posdirp(r)),r)
-+*iv1d
-r@t13:=eqndrp1(ndofrp(r),negdirp(r)):eq(ndofrp(r),ndofrp(rpofnd(ndofrp(r),negdirp(r))))
--iv1d
-r@isrpnd1:=isrpind(r,rpofnd(ndofrp(r),negdirp(r)),t13".iv1d"):is(r,rpofnd(ndofrp(r),negdirp(r)))
-isrpnd2:=symis(cut,r,rpofnd(ndofrp(r),negdirp(r)),isrpnd1):is(rpofnd(ndofrp(r),negdirp(r)),r)
-a2@[r:cut]
-lemmad1:=eqi12(a1,a2,pl(a1,r),pl(a2,r),tris(cut,pl(a1,pl(a2,r)),pl(a1,pl(r,a2)),pl(pl(a1,r),a2),ispl2(pl(a2,r),pl(r,a2),a1,compl(a2,r)),asspl2(a1,r,a2))):eq(df(a1,a2),df(pl(a1,r),pl(a2,r)))
-lemmad2:=symeq(df(a1,a2),df(pl(a1,r),pl(a2,r)),lemmad1):eq(df(pl(a1,r),pl(a2,r)),df(a1,a2))
-a@[r:cut]
-lemmad3:=treq(a,df(1a,2a),df(pl(1a,r),pl(2a,r)),refeq1(a,df(1a,2a),isdf),lemmad1(1a,2a,r)):eq(a,df(pl(1a,r),pl(2a,r)))
-lemmad4:=symeq(a,df(pl(1a,r),pl(2a,r)),lemmad3):eq(df(pl(1a,r),pl(2a,r)),a)
-a@absd:=ite(negd(a),dif,df(2a,1a),a):dif
-[n:negd(a)]
-absnd:=refeq1(absd(a),df(2a,1a),itet(negd(a),dif,df(2a,1a),a,n)):eq(absd(a),df(2a,1a))
-a@[n:not(negd(a))]
-absnnd:=refeq1(absd(a),a,itef(negd(a),dif,df(2a,1a),a,n)):eq(absd(a),a)
-a2@[l:less(a1,a2)]
-absdeql:=treq(absd(df(a1,a2)),df(std(df(a1,a2)),stm(df(a1,a2))),df(a2,a1),absnd(df(a1,a2),negdi(a1,a2,l)),eqsmsd(std(df(a1,a2)),stm(df(a1,a2)),a2,a1,stdis(a1,a2),stmis(a1,a2))):eq(absd(df(a1,a2)),df(a2,a1))
-a2@[m:moreis(a1,a2)]
-absdeqm:=absnnd(df(a1,a2),th3"l.imp"(negd(df(a1,a2)),less(a1,a2),satz123c(a1,a2,m),[t:negd(df(a1,a2))]isless12(stm(df(a1,a2)),a1,std(df(a1,a2)),a2,stmis(a1,a2),stdis(a1,a2),t))):eq(absd(df(a1,a2)),df(a1,a2))
-b@[e:eq(a,b)]
-+iv2d
-[n:negd(a)]
-t1:=tr3is(cut,pl(2a,1b),pl(1b,2a),pl(1a,2b),pl(2b,1a),compl(2a,1b),symeq(a,b,e),compl(1a,2b)):is(pl(2a,1b),pl(2b,1a))
-t2:=tr3eq(absd(a),df(2a,1a),df(2b,1b),absd(b),absnd(a,n),eqi12(2a,1a,2b,1b,t1),symeq(absd(b),df(2b,1b),absnd(b,eqnegd(a,b,e,n)))):eq(absd(a),absd(b))
-e@[n:not(negd(a))]
-t3:=tr3eq(absd(a),a,b,absd(b),absnnd(a,n),e,symeq(absd(b),b,absnnd(b,th3"l.imp"(negd(b),negd(a),n,[t:negd(b)]eqnegd(b,a,symeq(a,b,e),t))))):eq(absd(a),absd(b))
--iv2d
-eqabsd:=th1"l.imp"(negd(a),eq(absd(a),absd(b)),[t:negd(a)]t2".iv2d"(t),[t:not(negd(a))]t3".iv2d"(t)):eq(absd(a),absd(b))
-a@[p:posd(a)]
-satzd166a:=eqposd(a,absd(a),symeq(absd(a),a,absnnd(a,pnotnd(a,p))),p):posd(absd(a))
-a@[n:negd(a)]
-+2d166
-t1:=posdi(2a,1a,satz122(1a,2a,n)):posd(df(2a,1a))
--2d166
-satzd166b:=eqposd(df(2a,1a),absd(a),symeq(absd(a),df(2a,1a),absnd(a,n)),t1".2d166"):posd(absd(a))
-b@[p:posd(a)][q:posd(b)][e:eq(absd(a),absd(b))]
-satzd166c:=tr3eq(a,absd(a),absd(b),b,symeq(absd(a),a,absnnd(a,pnotnd(a,p))),e,absnnd(b,pnotnd(b,q))):eq(a,b)
-b@[n:negd(a)][o:negd(b)][e:eq(absd(a),absd(b))]
-+*2d166
-e@t2:=tr3eq(df(2a,1a),absd(a),absd(b),df(2b,1b),symeq(absd(a),df(2a,1a),absnd(a,n)),e,absnd(b,o)):eq(df(2a,1a),df(2b,1b))
--2d166
-e@satzd166d:=tr3is(cut,pl(1a,2b),pl(2b,1a),pl(2a,1b),pl(1b,2a),compl(1a,2b),symis(cut,pl(2a,1b),pl(2b,1a),eqe12(2a,1a,2b,1b,t2".2d166")),compl(2a,1b)):eq(a,b)
-a@[n:not(zero(a))]
-satzd166e:=rappd(a,posd(absd(a)),[t:posd(a)]satzd166a(a,t),th2"l.imp"(zero(a),posd(absd(a)),n),[t:negd(a)]satzd166b(a,t)):posd(absd(a))
-a@[z:zero(a)]
-satzd166f:=eqzero(a,absd(a),symeq(absd(a),a,absnnd(a,0notnd(a,z))),z):zero(absd(a))
-b@mored:=more(pl(1a,2b),pl(1b,2a)):'prop'
-b2@[m:more(pl(a1,b2),pl(b1,a2))]
-moredi12:=ismore12(pl(a1,b2),pl(stm(df(a1,a2)),std(df(b1,b2))),pl(b1,a2),pl(stm(df(b1,b2)),std(df(a1,a2))),12issmsd(a1,a2,b1,b2),12issmsd(b1,b2,a1,a2),m):mored(df(a1,a2),df(b1,b2))
-r2@[m:more(pl(1a,r2),pl(r1,2a))]
-moredi1:=ismore12(pl(1a,r2),pl(1a,std(df(r1,r2))),pl(r1,2a),pl(stm(df(r1,r2)),2a),sm2issmsd(a,r1,r2),1sdissmsd(a,r1,r2),m):mored(a,df(r1,r2))
-r2@[m:more(pl(r1,2a),pl(1a,r2))]
-moredi2:=ismore12(pl(r1,2a),pl(stm(df(r1,r2)),2a),pl(1a,r2),pl(1a,std(df(r1,r2))),1sdissmsd(a,r1,r2),sm2issmsd(a,r1,r2),m):mored(df(r1,r2),a)
-b2@[m:mored(df(a1,a2),df(b1,b2))]
-morede12:=ismore12(pl(stm(df(a1,a2)),std(df(b1,b2))),pl(a1,b2),pl(stm(df(b1,b2)),std(df(a1,a2))),pl(b1,a2),smsdis12(a1,a2,b1,b2),smsdis12(b1,b2,a1,a2),m):more(pl(a1,b2),pl(b1,a2))
-b@lessd:=less(pl(1a,2b),pl(1b,2a)):'prop'
-[m:mored(a,b)]
-lemmad5:=satz121(pl(1a,2b),pl(1b,2a),m):lessd(b,a)
-b@[l:lessd(a,b)]
-lemmad6:=satz122(pl(1a,2b),pl(1b,2a),l):mored(b,a)
-b2@[l:less(pl(a1,b2),pl(b1,a2))]
-lessdi12:=lemmad5(df(b1,b2),df(a1,a2),moredi12(b1,b2,a1,a2,satz122(pl(a1,b2),pl(b1,a2),l))):lessd(df(a1,a2),df(b1,b2))
-r2@[l:less(pl(1a,r2),pl(r1,2a))]
-lessdi1:=lemmad5(df(r1,r2),a,moredi2(a,r1,r2,satz122(pl(1a,r2),pl(r1,2a),l))):lessd(a,df(r1,r2))
-r2@[l:less(pl(r1,2a),pl(1a,r2))]
-lessdi2:=lemmad5(a,df(r1,r2),moredi1(a,r1,r2,satz122(pl(r1,2a),pl(1a,r2),l))):lessd(df(r1,r2),a)
-b2@[l:lessd(df(a1,a2),df(b1,b2))]
-lessde12:=satz121(pl(b1,a2),pl(a1,b2),morede12(b1,b2,a1,a2,lemmad6(df(a1,a2),df(b1,b2),l))):less(pl(a1,b2),pl(b1,a2))
-b@satzd167:=satz123(pl(1a,2b),pl(1b,2a)):orec3(eq(a,b),mored(a,b),lessd(a,b))
-satzd167a:=satz123a(pl(1a,2b),pl(1b,2a)):or3(eq(a,b),mored(a,b),lessd(a,b))
-satzd167b:=satz123b(pl(1a,2b),pl(1b,2a)):ec3(eq(a,b),mored(a,b),lessd(a,b))
-d@1d:=stm(d):cut
-2d:=std(d):cut
-[e:eq(a,b)][f:eq(c,d)][m:mored(a,c)]
-+*iv2d
-m@t4:=tr4is(cut,pl(pl(1b,2d),pl(1c,2a)),pl(pl(1b,2a),pl(1c,2d)),pl(pl(1a,2b),pl(1d,2c)),pl(pl(1a,2c),pl(1d,2b)),pl(pl(1d,2b),pl(1a,2c)),4pl24(1b,2d,1c,2a),ispl12(pl(1b,2a),pl(1a,2b),pl(1c,2d),pl(1d,2c),symeq(a,b,e),f),4pl24(1a,2b,1d,2c),compl(pl(1a,2c),pl(1d,2b))):is(pl(pl(1b,2d),pl(1c,2a)),pl(pl(1d,2b),pl(1a,2c)))
-t5:=ismore2(pl(pl(1b,2d),pl(1c,2a)),pl(pl(1d,2b),pl(1a,2c)),pl(pl(1b,2d),pl(1a,2c)),t4,satz135d(pl(1a,2c),pl(1c,2a),pl(1b,2d),m)):more(pl(pl(1b,2d),pl(1a,2c)),pl(pl(1d,2b),pl(1a,2c)))
--iv2d
-m@eqmored12:=satz136a(pl(1b,2d),pl(1d,2b),pl(1a,2c),t5".iv2d"):mored(b,d)
-f@[l:lessd(a,c)]
-eqlessd12:=lemmad5(d,b,eqmored12(c,d,a,b,f,e,lemmad6(a,c,l))):lessd(b,d)
-c@[e:eq(a,b)][m:mored(a,c)]
-eqmored1:=eqmored12(a,b,c,c,e,refeq(c),m):mored(b,c)
-e@[m:mored(c,a)]
-eqmored2:=eqmored12(c,c,a,b,refeq(c),e,m):mored(c,b)
-e@[l:lessd(a,c)]
-eqlessd1:=eqlessd12(a,b,c,c,e,refeq(c),l):lessd(b,c)
-e@[l:lessd(c,a)]
-eqlessd2:=eqlessd12(c,c,a,b,refeq(c),e,l):lessd(c,b)
-b@moreq:=or(mored(a,b),eq(a,b)):'prop'
-lesseq:=or(lessd(a,b),eq(a,b)):'prop'
-[m:moreq(a,b)]
-satzd168a:=th9"l.or"(mored(a,b),eq(a,b),lessd(b,a),eq(b,a),m,[t:mored(a,b)]lemmad5(a,b,t),[t:eq(a,b)]symeq(a,b,t)):lesseq(b,a)
-b@[l:lesseq(a,b)]
-satzd168b:=th9"l.or"(lessd(a,b),eq(a,b),mored(b,a),eq(b,a),l,[t:lessd(a,b)]lemmad6(a,b,t),[t:eq(a,b)]symeq(a,b,t)):moreq(b,a)
-c@[e:eq(a,b)][m:moreq(a,c)]
-eqmoreq1:=th9"l.or"(mored(a,c),eq(a,c),mored(b,c),eq(b,c),m,[t:mored(a,c)]eqmored1(a,b,c,e,t),[t:eq(a,c)]treq1(b,c,a,e,t)):moreq(b,c)
-e@[m:moreq(c,a)]
-eqmoreq2:=th9"l.or"(mored(c,a),eq(c,a),mored(c,b),eq(c,b),m,[t:mored(c,a)]eqmored2(a,b,c,e,t),[t:eq(c,a)]treq(c,a,b,t,e)):moreq(c,b)
-e@[l:lesseq(a,c)]
-eqlesseq1:=satzd168a(c,b,eqmoreq2(a,b,c,e,satzd168b(a,c,l))):lesseq(b,c)
-e@[l:lesseq(c,a)]
-eqlesseq2:=satzd168a(b,c,eqmoreq1(a,b,c,e,satzd168b(c,a,l))):lesseq(c,b)
-d@[e:eq(a,b)][f:eq(c,d)][m:moreq(a,c)]
-eqmoreq12:=eqmoreq1(a,b,d,e,eqmoreq2(c,d,a,f,m)):moreq(b,d)
-f@[l:lesseq(a,c)]
-eqlesseq12:=eqlesseq1(a,b,d,e,eqlesseq2(c,d,a,f,l)):lesseq(b,d)
-b@[m:mored(a,b)]
-moreqi1:=ori1(mored(a,b),eq(a,b),m):moreq(a,b)
-b@[l:lessd(a,b)]
-lesseqi1:=ori1(lessd(a,b),eq(a,b),l):lesseq(a,b)
-b@[e:eq(a,b)]
-moreqi2:=ori2(mored(a,b),eq(a,b),e):moreq(a,b)
-lesseqi2:=ori2(lessd(a,b),eq(a,b),e):lesseq(a,b)
-b@[m:moreq(a,b)]
-satzd167c:=th7"l.ec3"(eq(a,b),mored(a,b),lessd(a,b),satzd167b,comor(mored(a,b),eq(a,b),m)):not(lessd(a,b))
-b@[l:lesseq(a,b)]
-satzd167d:=th9"l.ec3"(eq(a,b),mored(a,b),lessd(a,b),satzd167b,l):not(mored(a,b))
-b@[n:not(mored(a,b))]
-satzd167e:=th2"l.or3"(eq(a,b),mored(a,b),lessd(a,b),satzd167a,n):lesseq(a,b)
-b@[n:not(lessd(a,b))]
-satzd167f:=comor(eq(a,b),mored(a,b),th3"l.or3"(eq(a,b),mored(a,b),lessd(a,b),satzd167a,n)):moreq(a,b)
-b@[m:mored(a,b)]
-satzd167g:=th3"l.imp"(lesseq(a,b),not(mored(a,b)),weli(mored(a,b),m),[t:lesseq(a,b)]satzd167d(t)):not(lesseq(a,b))
-b@[l:lessd(a,b)]
-satzd167h:=th3"l.imp"(moreq(a,b),not(lessd(a,b)),weli(lessd(a,b),l),[t:moreq(a,b)]satzd167c(t)):not(moreq(a,b))
-b@[n:not(moreq(a,b))]
-satzd167j:=or3e3(eq(a,b),mored(a,b),lessd(a,b),satzd167a,th5"l.or"(mored(a,b),eq(a,b),n),th4"l.or"(mored(a,b),eq(a,b),n)):lessd(a,b)
-b@[n:not(lesseq(a,b))]
-satzd167k:=or3e2(eq(a,b),mored(a,b),lessd(a,b),satzd167a,th4"l.or"(lessd(a,b),eq(a,b),n),th5"l.or"(lessd(a,b),eq(a,b),n)):mored(a,b)
-b@[z:zero(b)][p:posd(a)]
-satzd169a:=ismore12(pl(1a,1b),pl(1a,2b),pl(2a,1b),pl(1b,2a),ispl2(1b,2b,1a,z),compl(2a,1b),satz135a(1a,2a,1b,p)):mored(a,b)
-z@[m:mored(a,b)]
-satzd169b:=satz136d(1a,2a,2b,ismore12(pl(1a,2b),pl(2b,1a),pl(1b,2a),pl(2b,2a),compl(1a,2b),ispl1(1b,2b,2a,z),m)):posd(a)
-z@[n:negd(a)]
-satzd169c:=isless12(pl(1a,1b),pl(1a,2b),pl(2a,1b),pl(1b,2a),ispl2(1b,2b,1a,z),compl(2a,1b),satz135c(1a,2a,1b,n)):lessd(a,b)
-z@[l:lessd(a,b)]
-satzd169d:=satz136f(1a,2a,2b,isless12(pl(1a,2b),pl(2b,1a),pl(1b,2a),pl(2b,2a),compl(1a,2b),ispl1(1b,2b,2a,z),l)):negd(a)
-+2d170
-z@[p:posd(a)]
-t1:=moreqi1(absd(a),b,satzd169a(absd(a),b,z,satzd166a(a,p))):moreq(absd(a),b)
-z@[y:zero(a)]
-t2:=moreqi2(absd(a),b,treq(absd(a),a,b,absnnd(a,0notnd(a,y)),zeroeq(a,b,y,z))):moreq(absd(a),b)
-z@[n:negd(a)]
-t3:=moreqi1(absd(a),b,satzd169a(absd(a),b,z,satzd166b(a,n))):moreq(absd(a),b)
--2d170
-z@satzd170:=rappd(a,moreq(absd(a),b),[t:posd(a)]t1".2d170"(t),[t:zero(a)]t2".2d170"(t),[t:negd(a)]t3".2d170"(t)):moreq(absd(a),b)
-c@[l:lessd(a,b)][k:lessd(b,c)]
-+2d171
-t1:=satz137a(pl(1a,2b),pl(1b,2a),pl(1b,2c),pl(1c,2b),l,k):less(pl(pl(1a,2b),pl(1b,2c)),pl(pl(1b,2a),pl(1c,2b)))
-t2:=isless12(pl(pl(1a,2b),pl(1b,2c)),pl(pl(1a,2c),pl(1b,2b)),pl(pl(1b,2a),pl(1c,2b)),pl(pl(1c,2a),pl(1b,2b)),4pl24(1a,2b,1b,2c),tris(cut,pl(pl(1b,2a),pl(1c,2b)),pl(pl(1b,2b),pl(1c,2a)),pl(pl(1c,2a),pl(1b,2b)),4pl24(1b,2a,1c,2b),compl(pl(1b,2b),pl(1c,2a))),t1):less(pl(pl(1a,2c),pl(1b,2b)),pl(pl(1c,2a),pl(1b,2b)))
--2d171
-satzd171:=satz136c(pl(1a,2c),pl(1c,2a),pl(1b,2b),t2".2d171"):lessd(a,c)
-trlessd:=satzd171:lessd(a,c)
-c@[m:mored(a,b)][n:mored(b,c)]
-trmored:=lemmad6(c,a,trlessd(c,b,a,lemmad5(b,c,n),lemmad5(a,b,m))):mored(a,c)
-c@[l:lesseq(a,b)][k:lessd(b,c)]
-satzd172a:=orapp(lessd(a,b),eq(a,b),lessd(a,c),l,[t:lessd(a,b)]trlessd(t,k),[t:eq(a,b)]eqlessd1(b,a,c,symeq(a,b,t),k)):lessd(a,c)
-c@[l:lessd(a,b)][k:lesseq(b,c)]
-satzd172b:=orapp(lessd(b,c),eq(b,c),lessd(a,c),k,[t:lessd(b,c)]trlessd(l,t),[t:eq(b,c)]eqlessd2(b,c,a,t,l)):lessd(a,c)
-c@[m:moreq(a,b)][n:mored(b,c)]
-satzd172c:=lemmad6(c,a,satzd172b(c,b,a,lemmad5(b,c,n),satzd168a(a,b,m))):mored(a,c)
-c@[m:mored(a,b)][n:moreq(b,c)]
-satzd172d:=lemmad6(c,a,satzd172a(c,b,a,satzd168a(b,c,n),lemmad5(a,b,m))):mored(a,c)
-c@[l:lesseq(a,b)][k:lesseq(b,c)]
-+2d173
-[j:lessd(a,b)]
-t1:=lesseqi1(a,c,satzd172b(j,k)):lesseq(a,c)
-k@[e:eq(a,b)]
-t2:=eqlesseq1(b,a,c,symeq(a,b,e),k):lesseq(a,c)
--2d173
-satzd173:=orapp(lessd(a,b),eq(a,b),lesseq(a,c),l,[t:lessd(a,b)]t1".2d173"(t),[t:eq(a,b)]t2".2d173"(t)):lesseq(a,c)
-trlesseq:=satzd173:lesseq(a,c)
-c@[m:moreq(a,b)][n:moreq(b,c)]
-trmoreq:=satzd168b(c,a,trlesseq(c,b,a,satzd168a(b,c,n),satzd168a(a,b,m))):moreq(a,c)
-a@ratd:=[t:not(zero(a))]ratrp(rpofpd(absd(a),satzd166e(a,t))):'prop'
-irratd:=not(ratd(a)):'prop'
-b@[e:eq(a,b)][r:ratd(a)]
-+*iv2d
-r@[n:not(zero(b))]
-t6:=th3"l.imp"(zero(a),zero(b),n,[t:zero(a)]eqzero(a,b,e,t)):not(zero(a))
-t7:=eqpderp(absd(a),satzd166e(a,t6),absd(b),satzd166e(b,n),eqabsd(a,b,e)):is(rpofpd(absd(a),satzd166e(a,t6)),rpofpd(absd(b),satzd166e(b,n)))
-t8:=isp(cut,[t:cut]ratrp(t),rpofpd(absd(a),satzd166e(a,t6)),rpofpd(absd(b),satzd166e(b,n)),<t6>r,t7):ratrp(rpofpd(absd(b),satzd166e(b,n)))
--iv2d
-r@eqratd:=[t:not(zero(b))]t8".iv2d"(t):ratd(b)
-e@[i:irratd(a)]
-eqirratd:=th3"l.imp"(ratd(b),ratd(a),i,[t:ratd(b)]eqratd(b,a,symeq(a,b,e),t)):irratd(b)
-a@[z:zero(a)]
-ratdi0:=th2"l.r.imp"(not(zero(a)),[t:not(zero(a))]ratrp(rpofpd(absd(a),satzd166e(a,t))),weli(zero(a),z)):ratd(a)
-@[r:cut][i:irratrp(r)][x0:rat]
-+*iv2d
-x0@[s:ratrp(pl(r,rpofrt(x0)))][y0:rat][j:is(pl(r,rpofrt(x0)),rpofrt(y0))]
-t9:=tris(cut,pl(rpofrt(x0),r),pl(r,rpofrt(x0)),rpofrt(y0),compl(rpofrt(x0),r),j):is(pl(rpofrt(x0),r),rpofrt(y0))
-t10:=ismore1(pl(rpofrt(x0),r),rpofrt(y0),rpofrt(x0),t9,satz133(rpofrt(x0),r)):more(rpofrt(y0),rpofrt(x0))
-t11:=satz154d(y0,x0,t10):more"rt"(y0,x0)
-t12:=satz155b(y0,x0,t11):is(rpofrt(mn"rt"(y0,x0,t11)),mn(rpofrt(y0),rpofrt(x0),satz154a(y0,x0,t11)))
-t13:=satz140g(rpofrt(y0),rpofrt(x0),r,satz154a(y0,x0,t11),t9):is(r,mn(rpofrt(y0),rpofrt(x0),satz154a(y0,x0,t11)))
-t14:=tris2(cut,r,rpofrt(mn"rt"(y0,x0,t11)),mn(rpofrt(y0),rpofrt(x0),satz154a(y0,x0,t11)),t13,t12):is(r,rpofrt(mn"rt"(y0,x0,t11)))
-t15:=somei(rat,[x:rat]is(r,rpofrt(x)),mn"rt"(y0,x0,t11),t14):ratrp(r)
-s@t16:=someapp(rat,[x:rat]is(pl(r,rpofrt(x0)),rpofrt(x)),s,con,[x:rat][t:is(pl(r,rpofrt(x0)),rpofrt(x))]<t15(x,t)>i):con
--iv2d
-x0@remark1:=[t:ratrp(pl(r,rpofrt(x0)))]t16".iv2d"(t):irratrp(pl(r,rpofrt(x0)))
-+*iv2d
-r@rp:=pdofrp(r):dif
-rn:=ndofrp(r):dif
-t17:=posdirp(r):posd(rp)
-t18:=pnot0d(rp,t17):not(zero(rp))
-t19:=nnot0d(rn,negdirp(r)):not(zero(rn))
-[n:not(zero(rp))]
-t20:=tris2(cut,r,rpofpd(absd(rp),satzd166e(rp,n)),rpofpd(rp,t17),isrppd1(r),eqpderp(absd(rp),satzd166e(rp,n),rp,t17,absnnd(rp,pnotnd(rp,t17)))):is(r,rpofpd(absd(rp),satzd166e(rp,n)))
-r@t21:=treq(absd(rn),df(std(rn),stm(rn)),rp,absnd(rn,negdirp(r)),eqsmsd(std(rn),stm(rn),pl(r,1rp),1rp,stdis(1rp,pl(r,1rp)),stmis(1rp,pl(r,1rp)))):eq(absd(rn),rp)
-[n:not(zero(rn))]
-t22:=tris2(cut,r,rpofpd(absd(rn),satzd166e(rn,n)),rpofpd(rp,t17),isrppd1(r),eqpderp(absd(rn),satzd166e(rn,n),rp,t17,t21)):is(r,rpofpd(absd(rn),satzd166e(rn,n)))
-r@[s:cut][i:is(r,s)][rr:ratrp(r)]
-t23:=isp(cut,[x:cut]ratrp(x),r,s,rr,i):ratrp(s)
-i@[rs:ratrp(s)]
-t24:=isp1(cut,[x:cut]ratrp(x),s,r,rs,i):ratrp(r)
--iv2d
-r@[rr:ratrp(r)]
-remark2a:=[t:not(zero(pdofrp(r)))]t23".iv2d"(rpofpd(absd(pdofrp(r)),satzd166e(pdofrp(r),t)),t20".iv2d"(t),rr):ratd(pdofrp(r))
-remark2b:=t17".iv2d":posd(pdofrp(r))
-remark3a:=[t:not(zero(ndofrp(r)))]t23".iv2d"(rpofpd(absd(ndofrp(r)),satzd166e(ndofrp(r),t)),t22".iv2d"(t),rr):ratd(ndofrp(r))
-remark3b:=negdirp(r):negd(ndofrp(r))
-r@[i:irratrp(r)]
-remark4a:=th3"l.imp"(ratd(pdofrp(r)),ratrp(r),i,[t:ratd(pdofrp(r))]t24".iv2d"(rpofpd(absd(pdofrp(r)),satzd166e(pdofrp(r),t18".iv2d")),t20".iv2d"(t18".iv2d"),<t18".iv2d">t)):irratd(pdofrp(r))
-remark4b:=t17".iv2d":posd(pdofrp(r))
-remark5a:=th3"l.imp"(ratd(ndofrp(r)),ratrp(r),i,[t:ratd(ndofrp(r))]t24".iv2d"(rpofpd(absd(ndofrp(r)),satzd166e(ndofrp(r),t19".iv2d")),t22".iv2d"(t19".iv2d"),<t19".iv2d">t)):irratd(ndofrp(r))
-remark5b:=negdirp(r):negd(ndofrp(r))
-a@natd:=and(posd(a),[t:posd(a)]natrp(rpofpd(a,t))):'prop'
-[n:natd(a)]
-natposd:=ande1(posd(a),[t:posd(a)]natrp(rpofpd(a,t)),n):posd(a)
-natderp:=ande2"l.r"(posd(a),[t:posd(a)]natrp(rpofpd(a,t)),n):natrp(rpofpd(a,natposd(a,n)))
-b@[e:eq(a,b)][n:natd(a)]
-+*iv2d
-n"rp"@t25:=eqposd(a,b,e,natposd(a,n)):posd(b)
-[p:posd(b)]
-t26:=eqpderp(a,natposd(a,n),b,p,e):is(rpofpd(a,natposd(a,n)),rpofpd(b,p))
-t27:=isp(cut,[t:cut]natrp(t),rpofpd(a,natposd(a,n)),rpofpd(b,p),natderp(a,n),t26):natrp(rpofpd(b,p))
--iv2d
-n@eqnatd:=andi(posd(b),[t:posd(b)]natrp(rpofpd(b,t)),t25".iv2d",[t:posd(b)]t27".iv2d"(t)):natd(b)
-@[x:nat]
-pdofnt:=pdofrp(rpofnt(x)):dif
-+*iv2d
-x@t28:=posdirp(rpofnt(x)):posd(pdofnt(x))
-[p:posd(pdofnt(x))]
-t29:=isrppd1(rpofnt(x)):is(rpofnt(x),rpofpd(pdofnt(x),t28))
-t30:=eqpderp(pdofnt(x),t28,pdofnt(x),p,refeq(pdofnt(x))):is(rpofpd(pdofnt(x),t28),rpofpd(pdofnt(x),p))
-t31:=tris(cut,rpofnt(x),rpofpd(pdofnt(x),t28),rpofpd(pdofnt(x),p),t29,t30):is(rpofnt(x),rpofpd(pdofnt(x),p))
-t32:=isp(cut,[t:cut]natrp(t),rpofnt(x),rpofpd(pdofnt(x),p),natrpi(x),t31):natrp(rpofpd(pdofnt(x),p))
--iv2d
-x@natdi:=andi(posd(pdofnt(x)),[t:posd(pdofnt(x))]natrp(rpofpd(pdofnt(x),t)),t28".iv2d",[t:posd(pdofnt(x))]t32".iv2d"(t)):natd(pdofnt(x))
-a@intd:=or(zero(a),natd(absd(a))):'prop'
-b@[e:eq(a,b)][i:intd(a)]
-+*iv2d
-i"rp"@[z:zero(a)]
-t33:=eqzero(a,b,e,z):zero(b)
-i"rp"@[n:natd(absd(a))]
-t34:=eqnatd(absd(a),absd(b),eqabsd(a,b,e),n):natd(absd(b))
--iv2d
-i@eqintd:=th9"l.or"(zero(a),natd(absd(a)),zero(b),natd(absd(b)),i,[t:zero(a)]t33".iv2d"(t),[t:natd(absd(a))]t34".iv2d"(t)):intd(b)
-a@[n:natd(a)]
-+*iv2d
-n"rp"@t34a:=symeq(absd(a),a,absnnd(a,pnotnd(a,natposd(a,n)))):eq(a,absd(a))
-t35:=eqnatd(a,absd(a),t34a,n):natd(absd(a))
--iv2d
-n@natintd:=ori2(zero(a),natd(absd(a)),t35".iv2d"):intd(a)
-a@[p:posd(a)][i:intd(a)]
-+*iv2d
-i"rp"@t36:=ore2(zero(a),natd(absd(a)),i,pnot0d(a,p)):natd(absd(a))
--iv2d
-i@posintnatd:=eqnatd(absd(a),a,absnnd(a,pnotnd(a,p)),t36".iv2d"):natd(a)
-a@[z:zero(a)]
-intdi0:=ori1(zero(a),natd(absd(a)),z):intd(a)
-r@[n:natrp(r)]
-+*iv2d
-n"rp"@t37:=posdirp(r):posd(pdofrp(r))
-[p:posd(pdofrp(r))]
-t38:=tris(cut,r,rpofpd(pdofrp(r),t37),rpofpd(pdofrp(r),p),isrppd1(r),eqpderp(pdofrp(r),t37,pdofrp(r),p,refeq(pdofrp(r)))):is(r,rpofpd(pdofrp(r),p))
-t39:=isp(cut,[t:cut]natrp(t),r,rpofpd(pdofrp(r),p),n,t38):natrp(rpofpd(pdofrp(r),p))
--iv2d
-n@remark6a:=andi(posd(pdofrp(r)),[t:posd(pdofrp(r))]natrp(rpofpd(pdofrp(r),t)),t37".iv2d",[t:posd(pdofrp(r))]t39".iv2d"(t)):natd(pdofrp(r))
-remark6:=natintd(pdofrp(r),remark6a):intd(pdofrp(r))
-+*iv2d
-n"rp"@t40:=absdeql(1rp,pl(r,1rp),isless2(pl(1rp,r),pl(r,1rp),1rp,compl(1rp,r),satz133a(1rp,r))):eq(absd(ndofrp(r)),pdofrp(r))
-t41:=eqnatd(pdofrp(r),absd(ndofrp(r)),symeq(absd(ndofrp(r)),pdofrp(r),t40),remark6a):natd(absd(ndofrp(r)))
--iv2d
-n@remark7:=ori2(zero(ndofrp(r)),natd(absd(ndofrp(r))),t41".iv2d"):intd(ndofrp(r))
-a@[i:intd(a)]
-+2d174
-[n:not(zero(a))]
-t1:=ore2(zero(a),natd(absd(a)),i,n):natd(absd(a))
-t2:=ande2(posd(absd(a)),[t:posd(absd(a))]natrp(rpofpd(absd(a),t)),t1):[t:posd(absd(a))]natrp(rpofpd(absd(a),t))
-t3:=lemmaiii5(rpofpd(absd(a),satzd166e(a,n)),<satzd166e(a,n)>t2):ratrp(rpofpd(absd(a),satzd166e(a,n)))
--2d174
-satzd174:=[t:not(zero(a))]t3".2d174"(t):ratd(a)
-b@pd:=df(pl(1a,1b),pl(2a,2b)):dif
-b2@pd12:=issmsd(pl(stm(df(a1,a2)),stm(df(b1,b2))),pl(std(df(a1,a2)),std(df(b1,b2))),pl(a1,b1),pl(a2,b2),ispl12(stm(df(a1,a2)),a1,stm(df(b1,b2)),b1,stmis(a1,a2),stmis(b1,b2)),ispl12(std(df(a1,a2)),a2,std(df(b1,b2)),b2,stdis(a1,a2),stdis(b1,b2))):is"e"(dif,pd(df(a1,a2),df(b1,b2)),df(pl(a1,b1),pl(a2,b2)))
-r2@pd1:=issmsd(pl(1a,stm(df(r1,r2))),pl(2a,std(df(r1,r2))),pl(1a,r1),pl(2a,r2),ispl2(stm(df(r1,r2)),r1,1a,stmis(r1,r2)),ispl2(std(df(r1,r2)),r2,2a,stdis(r1,r2))):is"e"(dif,pd(a,df(r1,r2)),df(pl(1a,r1),pl(2a,r2)))
-pd2:=issmsd(pl(stm(df(r1,r2)),1a),pl(std(df(r1,r2)),2a),pl(r1,1a),pl(r2,2a),ispl1(stm(df(r1,r2)),r1,1a,stmis(r1,r2)),ispl1(std(df(r1,r2)),r2,2a,stdis(r1,r2))):is"e"(dif,pd(df(r1,r2),a),df(pl(r1,1a),pl(r2,2a)))
-b2@pdeq12a:=refeq1(pd(df(a1,a2),df(b1,b2)),df(pl(a1,b1),pl(a2,b2)),pd12):eq(pd(df(a1,a2),df(b1,b2)),df(pl(a1,b1),pl(a2,b2)))
-pdeq12b:=refeq2(pd(df(a1,a2),df(b1,b2)),df(pl(a1,b1),pl(a2,b2)),pd12):eq(df(pl(a1,b1),pl(a2,b2)),pd(df(a1,a2),df(b1,b2)))
-r2@pdeq1a:=refeq1(pd(a,df(r1,r2)),df(pl(1a,r1),pl(2a,r2)),pd1):eq(pd(a,df(r1,r2)),df(pl(1a,r1),pl(2a,r2)))
-pdeq1b:=refeq2(pd(a,df(r1,r2)),df(pl(1a,r1),pl(2a,r2)),pd1):eq(df(pl(1a,r1),pl(2a,r2)),pd(a,df(r1,r2)))
-pdeq2a:=refeq1(pd(df(r1,r2),a),df(pl(r1,1a),pl(r2,2a)),pd2):eq(pd(df(r1,r2),a),df(pl(r1,1a),pl(r2,2a)))
-pdeq2b:=refeq2(pd(df(r1,r2),a),df(pl(r1,1a),pl(r2,2a)),pd2):eq(df(pl(r1,1a),pl(r2,2a)),pd(df(r1,r2),a))
-b@satzd175:=eqsmsd(pl(1a,1b),pl(2a,2b),pl(1b,1a),pl(2b,2a),compl(1a,1b),compl(2a,2b)):eq(pd(a,b),pd(b,a))
-compd:=satzd175:eq(pd(a,b),pd(b,a))
-c@[e:eq(a,b)]
-+iv3d
-t1:=tr3is(cut,pl(pl(1a,1c),pl(2b,2c)),pl(pl(1a,2b),pl(1c,2c)),pl(pl(1b,2a),pl(1c,2c)),pl(pl(1b,1c),pl(2a,2c)),4pl23(1a,1c,2b,2c),ispl1(pl(1a,2b),pl(1b,2a),pl(1c,2c),e),4pl23(1b,2a,1c,2c)):is(pl(pl(1a,1c),pl(2b,2c)),pl(pl(1b,1c),pl(2a,2c)))
--iv3d
-eqpd1:=eqi12(pl(1a,1c),pl(2a,2c),pl(1b,1c),pl(2b,2c),t1".iv3d"):eq(pd(a,c),pd(b,c))
-eqpd2:=tr3eq(pd(c,a),pd(a,c),pd(b,c),pd(c,b),compd(c,a),eqpd1,compd(b,c)):eq(pd(c,a),pd(c,b))
-d@[e:eq(a,b)][f:eq(c,d)]
-eqpd12:=treq(pd(a,c),pd(b,c),pd(b,d),eqpd1(a,b,c,e),eqpd2(c,d,b,f)):eq(pd(a,c),pd(b,d))
-b@[z:zero(a)]
-+*iv3d
-z@t2:=tr4is(cut,pl(pl(1a,1b),2b),pl(1a,pl(1b,2b)),pl(2a,pl(2b,1b)),pl(pl(2a,2b),1b),pl(1b,pl(2a,2b)),asspl1(1a,1b,2b),ispl12(1a,2a,pl(1b,2b),pl(2b,1b),z,compl(1b,2b)),asspl2(2a,2b,1b),compl(pl(2a,2b),1b)):is(pl(pl(1a,1b),2b),pl(1b,pl(2a,2b)))
--iv3d
-z@pd01:=eqi2(b,pl(1a,1b),pl(2a,2b),t2".iv3d"):eq(pd(a,b),b)
-b@[z:zero(b)]
-pd02:=treq(pd(a,b),pd(b,a),a,compd(a,b),pd01(b,a,z)):eq(pd(a,b),a)
-b@[p:posd(a)][q:posd(b)]
-ppd:=posdi(pl(1a,1b),pl(2a,2b),satz137(1a,2a,1b,2b,p,q)):posd(pd(a,b))
-b@[n:negd(a)][o:negd(b)]
-npd:=negdi(pl(1a,1b),pl(2a,2b),satz137a(1a,2a,1b,2b,n,o)):negd(pd(a,b))
-a@m0d:=df(2a,1a):dif
-a2@m0deqa:=eqsmsd(std(df(a1,a2)),stm(df(a1,a2)),a2,a1,stdis(a1,a2),stmis(a1,a2)):eq(m0d(df(a1,a2)),df(a2,a1))
-m0deqb:=symeq(m0d(df(a1,a2)),df(a2,a1),m0deqa):eq(df(a2,a1),m0d(df(a1,a2)))
-b@[e:eq(a,b)]
-+*iv3d
-e@t3:=tr3is(cut,pl(2a,1b),pl(1b,2a),pl(1a,2b),pl(2b,1a),compl(2a,1b),symeq(a,b,e),compl(1a,2b)):is(pl(2a,1b),pl(2b,1a))
--iv3d
-e@eqm0d:=eqi12(2a,1a,2b,1b,t3".iv3d"):eq(m0d(a),m0d(b))
-a@[p:posd(a)]
-satzd176a:=negdi(2a,1a,satz121(1a,2a,p)):negd(m0d(a))
-a@[z:zero(a)]
-satzd176b:=zeroi(2a,1a,symis(cut,1a,2a,z)):zero(m0d(a))
-a@[n:negd(a)]
-satzd176c:=posdi(2a,1a,satz122(1a,2a,n)):posd(m0d(a))
-a@[n:negd(m0d(a))]
-satzd176d:=satz122(2a,1a,isless12(stm(m0d(a)),2a,std(m0d(a)),1a,stmis(2a,1a),stdis(2a,1a),n)):posd(a)
-a@[z:zero(m0d(a))]
-satzd176e:=symis(cut,2a,1a,tr3is(cut,2a,stm(df(2a,1a)),std(df(2a,1a)),1a,isstm(2a,1a),z,stdis(2a,1a))):zero(a)
-a@[p:posd(m0d(a))]
-satzd176f:=satz121(2a,1a,ismore12(stm(m0d(a)),2a,std(m0d(a)),1a,stmis(2a,1a),stdis(2a,1a),p)):negd(a)
-a@[z:zero(a)]
-m0d0:=zeroeq(m0d(a),a,satzd176b(a,z),z):eq(m0d(a),a)
-+3d177
-a@t1:=tris(dif,m0d(m0d(a)),df(1a,2a),a,issmsd(std(m0d(a)),stm(m0d(a)),1a,2a,stdis(2a,1a),stmis(2a,1a)),dfis(a)):is"e"(dif,m0d(m0d(a)),a)
--3d177
-a@satzd177:=refeq1(m0d(m0d(a)),a,t1".3d177"):eq(m0d(m0d(a)),a)
-satzd177a:=symeq(m0d(m0d(a)),a,satzd177):eq(a,m0d(m0d(a)))
-b@[e:eq(a,m0d(b))]
-satzd177b:=treq(m0d(a),m0d(m0d(b)),b,eqm0d(a,m0d(b),e),satzd177(b)):eq(m0d(a),b)
-satzd177c:=symeq(m0d(a),b,satzd177b):eq(b,m0d(a))
-b@[e:eq(m0d(a),b)]
-satzd177d:=satzd177c(b,a,symeq(m0d(a),b,e)):eq(a,m0d(b))
-satzd177e:=symeq(a,m0d(b),satzd177d):eq(m0d(b),a)
-+3d178
-a@[p:posd(a)]
-t1:=tr3eq(absd(m0d(a)),m0d(m0d(a)),a,absd(a),absnd(m0d(a),satzd176a(a,p)),satzd177(a),symeq(absd(a),a,absnnd(a,pnotnd(a,p)))):eq(absd(m0d(a)),absd(a))
-a@[z:zero(a)]
-t2:=tr3eq(absd(m0d(a)),m0d(a),a,absd(a),absnnd(m0d(a),0notnd(m0d(a),satzd176b(a,z))),m0d0(a,z),symeq(absd(a),a,absnnd(a,0notnd(a,z)))):eq(absd(m0d(a)),absd(a))
-a@[n:negd(a)]
-t3:=treq(absd(m0d(a)),m0d(a),absd(a),absnnd(m0d(a),pnotnd(m0d(a),satzd176c(a,n))),symeq(absd(a),m0d(a),absnd(a,n))):eq(absd(m0d(a)),absd(a))
--3d178
-a@satzd178:=rappd(a,eq(absd(m0d(a)),absd(a)),[t:posd(a)]t1".3d178"(t),[t:zero(a)]t2".3d178"(t),[t:negd(a)]t3".3d178"(t)):eq(absd(m0d(a)),absd(a))
-satzd178a:=symeq(absd(m0d(a)),absd(a),satzd178):eq(absd(a),absd(m0d(a)))
-+3d179
-t1:=pdeq1b(a,2a,1a):eq(df(pl(1a,2a),pl(2a,1a)),pd(a,m0d(a)))
-t2:=zeroi(pl(1a,2a),pl(2a,1a),compl(1a,2a)):zero(df(pl(1a,2a),pl(2a,1a)))
--3d179
-satzd179:=eqzero(df(pl(1a,2a),pl(2a,1a)),pd(a,m0d(a)),t1".3d179",t2".3d179"):zero(pd(a,m0d(a)))
-satzd179a:=eqzero(pd(a,m0d(a)),pd(m0d(a),a),compd(a,m0d(a)),satzd179):zero(pd(m0d(a),a))
-b@satzd180:=treq(m0d(pd(a,b)),df(pl(2a,2b),pl(1a,1b)),pd(m0d(a),m0d(b)),m0deqa(pl(1a,1b),pl(2a,2b)),pdeq12b(2a,1a,2b,1b)):eq(m0d(pd(a,b)),pd(m0d(a),m0d(b)))
-satzd180a:=symeq(m0d(pd(a,b)),pd(m0d(a),m0d(b)),satzd180):eq(pd(m0d(a),m0d(b)),m0d(pd(a,b)))
-md:=pd(a,m0d(b)):dif
-b2@mdeq12a:=treq(md(df(a1,a2),df(b1,b2)),pd(df(a1,a2),df(b2,b1)),df(pl(a1,b2),pl(a2,b1)),eqpd2(m0d(df(b1,b2)),df(b2,b1),df(a1,a2),m0deqa(b1,b2)),pdeq12a(a1,a2,b2,b1)):eq(md(df(a1,a2),df(b1,b2)),df(pl(a1,b2),pl(a2,b1)))
-mdeq12b:=symeq(md(df(a1,a2),df(b1,b2)),df(pl(a1,b2),pl(a2,b1)),mdeq12a):eq(df(pl(a1,b2),pl(a2,b1)),md(df(a1,a2),df(b1,b2)))
-r2@mdeq1a:=treq(md(a,df(r1,r2)),pd(a,df(r2,r1)),df(pl(1a,r2),pl(2a,r1)),eqpd2(m0d(df(r1,r2)),df(r2,r1),a,m0deqa(r1,r2)),pdeq1a(a,r2,r1)):eq(md(a,df(r1,r2)),df(pl(1a,r2),pl(2a,r1)))
-mdeq1b:=symeq(md(a,df(r1,r2)),df(pl(1a,r2),pl(2a,r1)),mdeq1a):eq(df(pl(1a,r2),pl(2a,r1)),md(a,df(r1,r2)))
-mdeq2a:=pdeq12a(r1,r2,2a,1a):eq(md(df(r1,r2),a),df(pl(r1,2a),pl(r2,1a)))
-mdeq2b:=pdeq12b(r1,r2,2a,1a):eq(df(pl(r1,2a),pl(r2,1a)),md(df(r1,r2),a))
-c@[e:eq(a,b)]
-eqmd1:=eqpd1(a,b,m0d(c),e):eq(md(a,c),md(b,c))
-eqmd2:=eqpd2(m0d(a),m0d(b),c,eqm0d(a,b,e)):eq(md(c,a),md(c,b))
-d@[e:eq(a,b)][f:eq(c,d)]
-eqmd12:=treq(md(a,c),md(b,c),md(b,d),eqmd1(a,b,c,e),eqmd2(c,d,b,f)):eq(md(a,c),md(b,d))
-b@satzd181:=tr3eq(m0d(md(a,b)),pd(m0d(a),m0d(m0d(b))),pd(m0d(a),b),md(b,a),satzd180(a,m0d(b)),eqpd2(m0d(m0d(b)),b,m0d(a),satzd177(b)),compd(m0d(a),b)):eq(m0d(md(a,b)),md(b,a))
-satzd181a:=symeq(m0d(md(b,a)),md(a,b),satzd181(b,a)):eq(md(a,b),m0d(md(b,a)))
-+3d182
-t1:=treq(md(a,b),df(pl(1a,2b),pl(2a,1b)),df(pl(1a,2b),pl(1b,2a)),pdeq1a(a,2b,1b),eqsd(pl(1a,2b),pl(2a,1b),pl(1b,2a),compl(2a,1b))):eq(md(a,b),df(pl(1a,2b),pl(1b,2a)))
-t2:=symeq(md(a,b),df(pl(1a,2b),pl(1b,2a)),t1):eq(df(pl(1a,2b),pl(1b,2a)),md(a,b))
-t3:=stmis(pl(1a,2b),pl(1b,2a)):is(stm(df(pl(1a,2b),pl(1b,2a))),pl(1a,2b))
-t4:=stdis(pl(1a,2b),pl(1b,2a)):is(std(df(pl(1a,2b),pl(1b,2a))),pl(1b,2a))
--3d182
-[p:posd(md(a,b))]
-+*3d182
-p@t5:=eqposd(md(a,b),df(pl(1a,2b),pl(1b,2a)),t1,p):posd(df(pl(1a,2b),pl(1b,2a)))
--3d182
-p@satzd182a:=ismore12(stm(df(pl(1a,2b),pl(1b,2a))),pl(1a,2b),std(df(pl(1a,2b),pl(1b,2a))),pl(1b,2a),t3".3d182",t4".3d182",t5".3d182"):mored(a,b)
-b@[z:zero(md(a,b))]
-+*3d182
-z@t6:=eqzero(md(a,b),df(pl(1a,2b),pl(1b,2a)),t1,z):zero(df(pl(1a,2b),pl(1b,2a)))
--3d182
-z@satzd182b:=tr3is(cut,pl(1a,2b),stm(df(pl(1a,2b),pl(1b,2a))),std(df(pl(1a,2b),pl(1b,2a))),pl(1b,2a),isstm(pl(1a,2b),pl(1b,2a)),t6".3d182",t4".3d182"):eq(a,b)
-b@[n:negd(md(a,b))]
-+*3d182
-n@t7:=eqnegd(md(a,b),df(pl(1a,2b),pl(1b,2a)),t1,n):negd(df(pl(1a,2b),pl(1b,2a)))
--3d182
-n@satzd182c:=isless12(stm(df(pl(1a,2b),pl(1b,2a))),pl(1a,2b),std(df(pl(1a,2b),pl(1b,2a))),pl(1b,2a),t3".3d182",t4".3d182",t7".3d182"):lessd(a,b)
-b@[m:mored(a,b)]
-+*3d182
-m@t8:=posdi(pl(1a,2b),pl(1b,2a),m):posd(df(pl(1a,2b),pl(1b,2a)))
--3d182
-m@satzd182d:=eqposd(df(pl(1a,2b),pl(1b,2a)),md(a,b),t2".3d182",t8".3d182"):posd(md(a,b))
-b@[e:eq(a,b)]
-+*3d182
-e@t9:=zeroi(pl(1a,2b),pl(1b,2a),e):zero(df(pl(1a,2b),pl(1b,2a)))
--3d182
-e@satzd182e:=eqzero(df(pl(1a,2b),pl(1b,2a)),md(a,b),t2".3d182",t9".3d182"):zero(md(a,b))
-b@[l:lessd(a,b)]
-+*3d182
-l@t10:=negdi(pl(1a,2b),pl(1b,2a),l):negd(df(pl(1a,2b),pl(1b,2a)))
--3d182
-l@satzd182f:=eqnegd(df(pl(1a,2b),pl(1b,2a)),md(a,b),t2".3d182",t10".3d182"):negd(md(a,b))
-+3d183
-b@t1:=tris(cut,pl(1a,2b),pl(2b,1a),pl(stm(m0d(b)),std(m0d(a))),compl(1a,2b),12issmsd(2b,1b,2a,1a)):is(pl(1a,2b),pl(stm(m0d(b)),std(m0d(a))))
-t2:=t1(b,a):is(pl(1b,2a),pl(stm(m0d(a)),std(m0d(b))))
--3d183
-b@[m:mored(a,b)]
-satzd183a:=isless12(pl(1b,2a),pl(stm(m0d(a)),std(m0d(b))),pl(1a,2b),pl(stm(m0d(b)),std(m0d(a))),t2".3d183",t1".3d183",lemmad5(a,b,m)):lessd(m0d(a),m0d(b))
-b@[e:eq(a,b)]
-staz183b:=eqm0d(a,b,e):eq(m0d(a),m0d(b))
-b@[l:lessd(a,b)]
-satzd183c:=ismore12(pl(1b,2a),pl(stm(m0d(a)),std(m0d(b))),pl(1a,2b),pl(stm(m0d(b)),std(m0d(a))),t2".3d183",t1".3d183",lemmad6(a,b,l)):mored(m0d(a),m0d(b))
-b@[l:lessd(m0d(a),m0d(b))]
-satzd183d:=eqmored12(m0d(m0d(a)),a,m0d(m0d(b)),b,satzd177(a),satzd177(b),satzd183c(m0d(a),m0d(b),l)):mored(a,b)
-b@[e:eq(m0d(a),m0d(b))]
-satzd183e:=tr3eq(a,m0d(m0d(a)),m0d(m0d(b)),b,satzd177a(a),eqm0d(m0d(a),m0d(b),e),satzd177(b)):eq(a,b)
-b@[m:mored(m0d(a),m0d(b))]
-satzd183f:=eqlessd12(m0d(m0d(a)),a,m0d(m0d(b)),b,satzd177(a),satzd177(b),satzd183a(m0d(a),m0d(b),m)):lessd(a,b)
-+3d184
-a@t1:=tr3eq(a,df(pl(1a,pl(1rp,1rp)),pl(2a,pl(1rp,1rp))),df(pl(pl(1a,1rp),1rp),pl(1rp,pl(2a,1rp))),md(pdofrp(1a),pdofrp(2a)),lemmad3(a,pl(1rp,1rp)),eqsmsd(pl(1a,pl(1rp,1rp)),pl(2a,pl(1rp,1rp)),pl(pl(1a,1rp),1rp),pl(1rp,pl(2a,1rp)),asspl2(1a,1rp,1rp),3pl12(2a,1rp,1rp)),mdeq12b(pl(1a,1rp),1rp,pl(2a,1rp),1rp)):eq(a,md(pdofrp(1a),pdofrp(2a)))
-t2:=and3i(posd(pdofrp(1a)),posd(pdofrp(2a)),eq(a,md(pdofrp(1a),pdofrp(2a))),posdirp(1a),posdirp(2a),t1):and3(posd(pdofrp(1a)),posd(pdofrp(2a)),eq(a,md(pdofrp(1a),pdofrp(2a))))
-t3:=somei(dif,[x:dif]and3(posd(pdofrp(1a)),posd(x),eq(a,md(pdofrp(1a),x))),pdofrp(2a),t2):some"l"(dif,[x:dif]and3(posd(pdofrp(1a)),posd(x),eq(a,md(pdofrp(1a),x))))
--3d184
-a@satzd184:=somei(dif,[x:dif]some"l"(dif,[y:dif]and3(posd(x),posd(y),eq(a,md(x,y)))),pdofrp(1a),t3".3d184"):some"l"(dif,[x:dif]some"l"(dif,[y:dif]and3(posd(x),posd(y),eq(a,md(x,y)))))
-c@asspd1:=tr3eq(pd(pd(a,b),c),df(pl(pl(1a,1b),1c),pl(pl(2a,2b),2c)),df(pl(1a,pl(1b,1c)),pl(2a,pl(2b,2c))),pd(a,pd(b,c)),pdeq2a(c,pl(1a,1b),pl(2a,2b)),eqsmsd(pl(pl(1a,1b),1c),pl(pl(2a,2b),2c),pl(1a,pl(1b,1c)),pl(2a,pl(2b,2c)),asspl1(1a,1b,1c),asspl1(2a,2b,2c)),pdeq1b(a,pl(1b,1c),pl(2b,2c))):eq(pd(pd(a,b),c),pd(a,pd(b,c)))
-asspd2:=symeq(pd(pd(a,b),c),pd(a,pd(b,c)),asspd1):eq(pd(a,pd(b,c)),pd(pd(a,b),c))
-3pd23:=tr3eq(pd(pd(a,b),c),pd(a,pd(b,c)),pd(a,pd(c,b)),pd(pd(a,c),b),asspd1(a,b,c),eqpd2(pd(b,c),pd(c,b),a,compd(b,c)),asspd2(a,c,b)):eq(pd(pd(a,b),c),pd(pd(a,c),b))
-d@4pd23:=tr3eq(pd(pd(a,b),pd(c,d)),pd(pd(pd(a,b),c),d),pd(pd(pd(a,c),b),d),pd(pd(a,c),pd(b,d)),asspd2(pd(a,b),c,d),eqpd1(pd(pd(a,b),c),pd(pd(a,c),b),d,3pd23),asspd1(pd(a,c),b,d)):eq(pd(pd(a,b),pd(c,d)),pd(pd(a,c),pd(b,d)))
-b@pdmd:=treq(pd(md(a,b),b),pd(a,pd(m0d(b),b)),a,asspd1(a,m0d(b),b),pd02(a,pd(m0d(b),b),satzd179a(b))):eq(pd(md(a,b),b),a)
-mdpd:=treq(md(pd(a,b),b),pd(a,pd(b,m0d(b))),a,asspd1(a,b,m0d(b)),pd02(a,pd(b,m0d(b)),satzd179(b))):eq(md(pd(a,b),b),a)
-d@satzd185:=treq(pd(md(a,b),md(c,d)),pd(pd(a,c),pd(m0d(b),m0d(d))),md(pd(a,c),pd(b,d)),4pd23(a,m0d(b),c,m0d(d)),eqpd2(pd(m0d(b),m0d(d)),m0d(pd(b,d)),pd(a,c),satzd180a(b,d))):eq(pd(md(a,b),md(c,d)),md(pd(a,c),pd(b,d)))
-c@satzd186:=asspd1:eq(pd(pd(a,b),c),pd(a,pd(b,c)))
-b@satzd187a:=treq(pd(b,md(a,b)),pd(md(a,b),b),a,compd(b,md(a,b)),pdmd):eq(pd(b,md(a,b)),a)
-[x:dif][e:eq(pd(b,x),a)]
-satzd187c:=treq(md(a,b),md(pd(x,b),b),x,eqmd1(a,pd(x,b),b,treq1(a,pd(x,b),pd(b,x),e,compd(b,x))),mdpd(x,b)):eq(md(a,b),x)
-satzd187d:=symeq(md(a,b),x,satzd187c):eq(x,md(a,b))
-x@[e:eq(pd(x,b),a)]
-satzd187e:=satzd187c(treq(pd(b,x),pd(x,b),a,compd(b,x),e)):eq(md(a,b),x)
-satzd187f:=symeq(md(a,b),x,satzd187e):eq(x,md(a,b))
-+3d188
-c@t1:=tr3eq(md(pd(a,c),pd(b,c)),pd(pd(a,c),pd(m0d(b),m0d(c))),pd(md(a,b),md(c,c)),md(a,b),eqpd2(m0d(pd(b,c)),pd(m0d(b),m0d(c)),pd(a,c),satzd180(b,c)),4pd23(a,c,m0d(b),m0d(c)),pd02(md(a,b),md(c,c),satzd179(c))):eq(md(pd(a,c),pd(b,c)),md(a,b))
-t2:=symeq(md(pd(a,c),pd(b,c)),md(a,b),t1):eq(md(a,b),md(pd(a,c),pd(b,c)))
--3d188
-c@[m:mored(pd(a,c),pd(b,c))]
-+*3d188
-m@t3:=eqposd(md(pd(a,c),pd(b,c)),md(a,b),t1,satzd182d(pd(a,c),pd(b,c),m)):posd(md(a,b))
--3d188
-m@satzd188a:=satzd182a(a,b,t3".3d188"):mored(a,b)
-c@[e:eq(pd(a,c),pd(b,c))]
-+*3d188
-e@t4:=eqzero(md(pd(a,c),pd(b,c)),md(a,b),t1,satzd182e(pd(a,c),pd(b,c),e)):zero(md(a,b))
--3d188
-e@satzd188b:=satzd182b(a,b,t4".3d188"):eq(a,b)
-c@[l:lessd(pd(a,c),pd(b,c))]
-+*3d188
-l@t5:=eqnegd(md(pd(a,c),pd(b,c)),md(a,b),t1,satzd182f(pd(a,c),pd(b,c),l)):negd(md(a,b))
--3d188
-l@satzd188c:=satzd182c(a,b,t5".3d188"):lessd(a,b)
-c@[m:mored(a,b)]
-+*3d188
-m@t6:=eqposd(md(a,b),md(pd(a,c),pd(b,c)),t2,satzd182d(a,b,m)):posd(md(pd(a,c),pd(b,c)))
--3d188
-m@satzd188d:=satzd182a(pd(a,c),pd(b,c),t6".3d188"):mored(pd(a,c),pd(b,c))
-c@[e:eq(a,b)]
-satzd188e:=eqpd1(a,b,c,e):eq(pd(a,c),pd(b,c))
-c@[l:lessd(a,b)]
-+*3d188
-l@t7:=eqnegd(md(a,b),md(pd(a,c),pd(b,c)),t2,satzd182f(a,b,l)):negd(md(pd(a,c),pd(b,c)))
--3d188
-l@satzd188f:=satzd182c(pd(a,c),pd(b,c),t7".3d188"):lessd(pd(a,c),pd(b,c))
-c@[m:mored(pd(c,a),pd(c,b))]
-satzd188g:=satzd188a(eqmored12(pd(c,a),pd(a,c),pd(c,b),pd(b,c),compd(c,a),compd(c,b),m)):mored(a,b)
-c@[e:eq(pd(c,a),pd(c,b))]
-satzd188h:=satzd188b(tr3eq(pd(a,c),pd(c,a),pd(c,b),pd(b,c),compd(a,c),e,compd(c,b))):eq(a,b)
-[l:lessd(pd(c,a),pd(c,b))]
-satzd188j:=satzd188c(eqlessd12(pd(c,a),pd(a,c),pd(c,b),pd(b,c),compd(c,a),compd(c,b),l)):lessd(a,b)
-c@[m:mored(a,b)]
-satzd188k:=eqmored12(pd(a,c),pd(c,a),pd(b,c),pd(c,b),compd(a,c),compd(b,c),satzd188d(m)):mored(pd(c,a),pd(c,b))
-c@[e:eq(a,b)]
-satzd188l:=eqpd2(a,b,c,e):eq(pd(c,a),pd(c,b))
-c@[l:lessd(a,b)]
-satzd188m:=eqlessd12(pd(a,c),pd(c,a),pd(b,c),pd(c,b),compd(a,c),compd(b,c),satzd188f(l)):lessd(pd(c,a),pd(c,b))
-d@[e:eq(a,b)][m:mored(c,d)]
-satzd188n:=eqmored2(pd(a,d),pd(b,d),pd(a,c),eqpd1(a,b,d,e),satzd188k(c,d,a,m)):mored(pd(a,c),pd(b,d))
-satzd188o:=eqmored12(pd(a,c),pd(c,a),pd(b,d),pd(d,b),compd(a,c),compd(b,d),satzd188n):mored(pd(c,a),pd(d,b))
-e@[l:lessd(c,d)]
-satzd188p:=eqlessd2(pd(a,d),pd(b,d),pd(a,c),eqpd1(a,b,d,e),satzd188m(c,d,a,l)):lessd(pd(a,c),pd(b,d))
-satzd188q:=eqlessd12(pd(a,c),pd(c,a),pd(b,d),pd(d,b),compd(a,c),compd(b,d),satzd188p):lessd(pd(c,a),pd(d,b))
-d@[m:mored(a,b)][n:mored(c,d)]
-satzd189:=trmored(pd(a,c),pd(b,c),pd(b,d),satzd188d(a,b,c,m),satzd188k(c,d,b,n)):mored(pd(a,c),pd(b,d))
-d@[l:lessd(a,b)][k:lessd(c,d)]
-satzd189a:=lemmad5(pd(b,d),pd(a,c),satzd189(b,a,d,c,lemmad6(a,b,l),lemmad6(c,d,k))):lessd(pd(a,c),pd(b,d))
-d@[m:moreq(a,b)][n:mored(c,d)]
-satzd190a:=orapp(mored(a,b),eq(a,b),mored(pd(a,c),pd(b,d)),m,[t:mored(a,b)]satzd189(t,n),[t:eq(a,b)]satzd188n(t,n)):mored(pd(a,c),pd(b,d))
-d@[m:mored(a,b)][n:moreq(c,d)]
-satzd190b:=eqmored12(pd(c,a),pd(a,c),pd(d,b),pd(b,d),compd(c,a),compd(d,b),satzd190a(c,d,a,b,n,m)):mored(pd(a,c),pd(b,d))
-d@[l:lesseq(a,b)][k:lessd(c,d)]
-satzd190c:=lemmad5(pd(b,d),pd(a,c),satzd190a(b,a,d,c,satzd168b(a,b,l),lemmad6(c,d,k))):lessd(pd(a,c),pd(b,d))
-d@[l:lessd(a,b)][k:lesseq(c,d)]
-satzd190d:=lemmad5(pd(b,d),pd(a,c),satzd190b(b,a,d,c,lemmad6(a,b,l),satzd168b(c,d,k))):lessd(pd(a,c),pd(b,d))
-d@[m:moreq(a,b)][n:moreq(c,d)]
-+3d191
-[e:eq(a,b)][f:eq(c,d)]
-t1:=moreqi2(pd(a,c),pd(b,d),eqpd12(a,b,c,d,e,f)):moreq(pd(a,c),pd(b,d))
-e@[o:mored(c,d)]
-t2:=moreqi1(pd(a,c),pd(b,d),satzd190a(m,o)):moreq(pd(a,c),pd(b,d))
-e@t3:=orapp(mored(c,d),eq(c,d),moreq(pd(a,c),pd(b,d)),n,[t:mored(c,d)]t2(t),[t:eq(c,d)]t1(t)):moreq(pd(a,c),pd(b,d))
-n@[o:mored(a,b)]
-t4:=moreqi1(pd(a,c),pd(b,d),satzd190b(o,n)):moreq(pd(a,c),pd(b,d))
--3d191
-satzd191:=orapp(mored(a,b),eq(a,b),moreq(pd(a,c),pd(b,d)),m,[t:mored(a,b)]t4".3d191"(t),[t:eq(a,b)]t3".3d191"(t)):moreq(pd(a,c),pd(b,d))
-d@[l:lesseq(a,b)][k:lesseq(c,d)]
-satzd191a:=satzd168a(pd(b,d),pd(a,c),satzd191(b,a,d,c,satzd168b(a,b,l),satzd168b(c,d,k))):lesseq(pd(a,c),pd(b,d))
-b@td:=df(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b))):dif
-+iv4d
-a2@[r:cut]
-t1:=ists1(stm(df(a1,a2)),a1,r,stmis(a1,a2)):is(ts(stm(df(a1,a2)),r),ts(a1,r))
-t2:=ists2(stm(df(a1,a2)),a1,r,stmis(a1,a2)):is(ts(r,stm(df(a1,a2))),ts(r,a1))
-t3:=ists1(std(df(a1,a2)),a2,r,stdis(a1,a2)):is(ts(std(df(a1,a2)),r),ts(a2,r))
-t4:=ists2(std(df(a1,a2)),a2,r,stdis(a1,a2)):is(ts(r,std(df(a1,a2))),ts(r,a2))
-[s:cut]
-t5:=ispl12(ts(stm(df(a1,a2)),r),ts(a1,r),ts(std(df(a1,a2)),s),ts(a2,s),t1(r),t3(s)):is(pl(ts(stm(df(a1,a2)),r),ts(std(df(a1,a2)),s)),pl(ts(a1,r),ts(a2,s)))
-t6:=ispl12(ts(r,stm(df(a1,a2))),ts(r,a1),ts(s,std(df(a1,a2))),ts(s,a2),t2(r),t4(s)):is(pl(ts(r,stm(df(a1,a2))),ts(s,std(df(a1,a2)))),pl(ts(r,a1),ts(s,a2)))
-t7:=ispl12(ts(std(df(a1,a2)),r),ts(a2,r),ts(stm(df(a1,a2)),s),ts(a1,s),t3(r),t1(s)):is(pl(ts(std(df(a1,a2)),r),ts(stm(df(a1,a2)),s)),pl(ts(a2,r),ts(a1,s)))
-t8:=ispl12(ts(r,std(df(a1,a2))),ts(r,a2),ts(s,stm(df(a1,a2))),ts(s,a1),t4(r),t2(s)):is(pl(ts(r,std(df(a1,a2))),ts(s,stm(df(a1,a2)))),pl(ts(r,a2),ts(s,a1)))
-b2@t9:=tris(cut,pl(ts(stm(df(a1,a2)),stm(df(b1,b2))),ts(std(df(a1,a2)),std(df(b1,b2)))),pl(ts(a1,stm(df(b1,b2))),ts(a2,std(df(b1,b2)))),pl(ts(a1,b1),ts(a2,b2)),t5(a1,a2,stm(df(b1,b2)),std(df(b1,b2))),t6(b1,b2,a1,a2)):is(pl(ts(stm(df(a1,a2)),stm(df(b1,b2))),ts(std(df(a1,a2)),std(df(b1,b2)))),pl(ts(a1,b1),ts(a2,b2)))
-t10:=tris(cut,pl(ts(stm(df(a1,a2)),std(df(b1,b2))),ts(std(df(a1,a2)),stm(df(b1,b2)))),pl(ts(a1,std(df(b1,b2))),ts(a2,stm(df(b1,b2)))),pl(ts(a1,b2),ts(a2,b1)),t5(a1,a2,std(df(b1,b2)),stm(df(b1,b2))),t8(b1,b2,a1,a2)):is(pl(ts(stm(df(a1,a2)),std(df(b1,b2))),ts(std(df(a1,a2)),stm(df(b1,b2)))),pl(ts(a1,b2),ts(a2,b1)))
--iv4d
-b2@td12:=issmsd(pl(ts(stm(df(a1,a2)),stm(df(b1,b2))),ts(std(df(a1,a2)),std(df(b1,b2)))),pl(ts(stm(df(a1,a2)),std(df(b1,b2))),ts(std(df(a1,a2)),stm(df(b1,b2)))),pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1)),t9".iv4d",t10".iv4d"):is"e"(dif,td(df(a1,a2),df(b1,b2)),df(pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1))))
-r2@td1:=issmsd(pl(ts(1a,stm(df(r1,r2))),ts(2a,std(df(r1,r2)))),pl(ts(1a,std(df(r1,r2))),ts(2a,stm(df(r1,r2)))),pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1)),t6".iv4d"(r1,r2,1a,2a),t8".iv4d"(r1,r2,1a,2a)):is"e"(dif,td(a,df(r1,r2)),df(pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1))))
-td2:=issmsd(pl(ts(stm(df(r1,r2)),1a),ts(std(df(r1,r2)),2a)),pl(ts(stm(df(r1,r2)),2a),ts(std(df(r1,r2)),1a)),pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a)),t5".iv4d"(r1,r2,1a,2a),t5".iv4d"(r1,r2,2a,1a)):is"e"(dif,td(df(r1,r2),a),df(pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a))))
-b2@tdeq12a:=refeq1(td(df(a1,a2),df(b1,b2)),df(pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1))),td12):eq(td(df(a1,a2),df(b1,b2)),df(pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1))))
-tdeq12b:=refeq2(td(df(a1,a2),df(b1,b2)),df(pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1))),td12):eq(df(pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1))),td(df(a1,a2),df(b1,b2)))
-r2@tdeq1a:=refeq1(td(a,df(r1,r2)),df(pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1))),td1):eq(td(a,df(r1,r2)),df(pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1))))
-tdeq1b:=refeq2(td(a,df(r1,r2)),df(pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1))),td1):eq(df(pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1))),td(a,df(r1,r2)))
-tdeq2a:=refeq1(td(df(r1,r2),a),df(pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a))),td2):eq(td(df(r1,r2),a),df(pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a))))
-tdeq2b:=refeq2(td(df(r1,r2),a),df(pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a))),td2):eq(df(pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a))),td(df(r1,r2),a))
-+4d194
-b@t1:=ispl12(ts(1a,1b),ts(1b,1a),ts(2a,2b),ts(2b,2a),comts(1a,1b),comts(2a,2b)):is(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1b,1a),ts(2b,2a)))
-t2:=tris(cut,pl(ts(1a,2b),ts(2a,1b)),pl(ts(2a,1b),ts(1a,2b)),pl(ts(1b,2a),ts(2b,1a)),compl(ts(1a,2b),ts(2a,1b)),ispl12(ts(2a,1b),ts(1b,2a),ts(1a,2b),ts(2b,1a),comts(2a,1b),comts(1a,2b))):is(pl(ts(1a,2b),ts(2a,1b)),pl(ts(1b,2a),ts(2b,1a)))
--4d194
-b@satzd194:=eqsmsd(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)),pl(ts(1b,1a),ts(2b,2a)),pl(ts(1b,2a),ts(2b,1a)),t1".4d194",t2".4d194"):eq(td(a,b),td(b,a))
-comtd:=satzd194:eq(td(a,b),td(b,a))
-c@[e:eq(a,b)]
-+*iv4d
-e@[r:cut]
-t11:=tr3is(cut,pl(ts(1a,r),ts(2b,r)),ts(pl(1a,2b),r),ts(pl(1b,2a),r),pl(ts(1b,r),ts(2a,r)),distpt1(1a,2b,r),ists1(pl(1a,2b),pl(1b,2a),r,e),disttp1(1b,2a,r)):is(pl(ts(1a,r),ts(2b,r)),pl(ts(1b,r),ts(2a,r)))
-e@t12:=tr3is(cut,pl(pl(ts(1a,1c),ts(2a,2c)),pl(ts(1b,2c),ts(2b,1c))),pl(pl(ts(1a,1c),ts(2b,1c)),pl(ts(1b,2c),ts(2a,2c))),pl(pl(ts(1b,1c),ts(2a,1c)),pl(ts(1a,2c),ts(2b,2c))),pl(pl(ts(1b,1c),ts(2b,2c)),pl(ts(1a,2c),ts(2a,1c))),4pl24(ts(1a,1c),ts(2a,2c),ts(1b,2c),ts(2b,1c)),ispl12(pl(ts(1a,1c),ts(2b,1c)),pl(ts(1b,1c),ts(2a,1c)),pl(ts(1b,2c),ts(2a,2c)),pl(ts(1a,2c),ts(2b,2c)),t11(1c),t11(b,a,c,symeq(a,b,e),2c)),4pl24(ts(1b,1c),ts(2a,1c),ts(1a,2c),ts(2b,2c))):is(pl(pl(ts(1a,1c),ts(2a,2c)),pl(ts(1b,2c),ts(2b,1c))),pl(pl(ts(1b,1c),ts(2b,2c)),pl(ts(1a,2c),ts(2a,1c))))
--iv4d
-e@eqtd1:=eqi12(pl(ts(1a,1c),ts(2a,2c)),pl(ts(1a,2c),ts(2a,1c)),pl(ts(1b,1c),ts(2b,2c)),pl(ts(1b,2c),ts(2b,1c)),t12".iv4d"):eq(td(a,c),td(b,c))
-eqtd2:=tr3eq(td(c,a),td(a,c),td(b,c),td(c,b),comtd(c,a),eqtd1,comtd(b,c)):eq(td(c,a),td(c,b))
-d@[e:eq(a,b)][f:eq(c,d)]
-eqtd12:=treq(td(a,c),td(b,c),td(b,d),eqtd1(a,b,c,e),eqtd2(c,d,b,f)):eq(td(a,c),td(b,d))
-b@[z:zero(a)]
-+4d192
-t1:=tris(cut,pl(ts(1a,1b),ts(2a,2b)),pl(ts(2a,1b),ts(1a,2b)),pl(ts(1a,2b),ts(2a,1b)),ispl12(ts(1a,1b),ts(2a,1b),ts(2a,2b),ts(1a,2b),ists1(1a,2a,1b,z),ists1(2a,1a,2b,symis(cut,1a,2a,z))),compl(ts(2a,1b),ts(1a,2b))):is(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)))
--4d192
-satzd192a:=zeroi(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)),t1".4d192"):zero(td(a,b))
-b@[z:zero(b)]
-satzd192b:=eqzero(td(b,a),td(a,b),comtd(b,a),satzd192a(b,a,z)):zero(td(a,b))
-b@[z:zero(a)]
-td01:=satzd192a(z):zero(td(a,b))
-b@[z:zero(b)]
-td02:=satzd192b(z):zero(td(a,b))
-b@satzd197a:=tr3eq(td(m0d(a),b),df(pl(ts(2a,1b),ts(1a,2b)),pl(ts(2a,2b),ts(1a,1b))),df(pl(ts(1a,2b),ts(2a,1b)),pl(ts(1a,1b),ts(2a,2b))),m0d(td(a,b)),tdeq2a(b,2a,1a),eqsmsd(pl(ts(2a,1b),ts(1a,2b)),pl(ts(2a,2b),ts(1a,1b)),pl(ts(1a,2b),ts(2a,1b)),pl(ts(1a,1b),ts(2a,2b)),compl(ts(2a,1b),ts(1a,2b)),compl(ts(2a,2b),ts(1a,1b))),m0deqb(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)))):eq(td(m0d(a),b),m0d(td(a,b)))
-satzd197b:=tr3eq(td(a,m0d(b)),td(m0d(b),a),m0d(td(b,a)),m0d(td(a,b)),comtd(a,m0d(b)),satzd197a(b,a),eqm0d(td(b,a),td(a,b),comtd(b,a))):eq(td(a,m0d(b)),m0d(td(a,b)))
-satzd197c:=treq2(td(m0d(a),b),td(a,m0d(b)),m0d(td(a,b)),satzd197a,satzd197b):eq(td(m0d(a),b),td(a,m0d(b)))
-satzd197d:=symeq(td(m0d(a),b),td(a,m0d(b)),satzd197c):eq(td(a,m0d(b)),td(m0d(a),b))
-satzd197e:=symeq(td(m0d(a),b),m0d(td(a,b)),satzd197a):eq(m0d(td(a,b)),td(m0d(a),b))
-satzd197f:=symeq(td(a,m0d(b)),m0d(td(a,b)),satzd197b):eq(m0d(td(a,b)),td(a,m0d(b)))
-satzd198:=treq(td(m0d(a),m0d(b)),td(a,m0d(m0d(b))),td(a,b),satzd197c(a,m0d(b)),eqtd2(m0d(m0d(b)),b,a,satzd177(b))):eq(td(m0d(a),m0d(b)),td(a,b))
-satzd198a:=symeq(td(m0d(a),m0d(b)),td(a,b),satzd198):eq(td(a,b),td(m0d(a),m0d(b)))
-[p:posd(a)][q:posd(b)]
-+*iv4d
-q@[r:cut]
-t13:=tris(cut,pl(ts(r,mn(1b,2b,q)),ts(r,2b)),ts(r,pl(mn(1b,2b,q),2b)),ts(r,1b),distpt2(r,mn(1b,2b,q),2b),ists2(pl(mn(1b,2b,q),2b),1b,r,satz140e(1b,2b,q))):is(pl(ts(r,mn(1b,2b,q)),ts(r,2b)),ts(r,1b))
-[s:cut]
-t14:=tris(cut,pl(ts(r,mn(1b,2b,q)),pl(ts(r,2b),s)),pl(pl(ts(r,mn(1b,2b,q)),ts(r,2b)),s),pl(ts(r,1b),s),asspl2(ts(r,mn(1b,2b,q)),ts(r,2b),s),ispl1(pl(ts(r,mn(1b,2b,q)),ts(r,2b)),ts(r,1b),s,t13)):is(pl(ts(r,mn(1b,2b,q)),pl(ts(r,2b),s)),pl(ts(r,1b),s))
-t15:=tris(cut,pl(ts(r,mn(1b,2b,q)),pl(ts(r,2b),s)),pl(ts(r,1b),s),pl(s,ts(r,1b)),t14,compl(ts(r,1b),s)):is(pl(ts(r,mn(1b,2b,q)),pl(ts(r,2b),s)),pl(s,ts(r,1b)))
-q@t16:=satz135h(pl(ts(1a,2b),ts(2a,2b)),pl(ts(2a,2b),ts(1a,2b)),ts(1a,mn(1b,2b,q)),ts(2a,mn(1b,2b,q)),compl(ts(1a,2b),ts(2a,2b)),satz145a(1a,2a,mn(1b,2b,q),p)):more(pl(ts(1a,mn(1b,2b,q)),pl(ts(1a,2b),ts(2a,2b))),pl(ts(2a,mn(1b,2b,q)),pl(ts(2a,2b),ts(1a,2b))))
-t17:=ismore12(pl(ts(1a,mn(1b,2b,q)),pl(ts(1a,2b),ts(2a,2b))),pl(ts(1a,1b),ts(2a,2b)),pl(ts(2a,mn(1b,2b,q)),pl(ts(2a,2b),ts(1a,2b))),pl(ts(1a,2b),ts(2a,1b)),t14(1a,ts(2a,2b)),t15(2a,ts(1a,2b)),t16):more(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)))
--iv4d
-q@ptdpp:=posdi(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)),t17".iv4d"):posd(td(a,b))
-b@[p:posd(a)][n:negd(b)]
-+*iv4d
-n@t18:=eqposd(td(a,m0d(b)),m0d(td(a,b)),satzd197b(a,b),ptdpp(a,m0d(b),p,satzd176c(b,n))):posd(m0d(td(a,b)))
--iv4d
-n@ntdpn:=satzd176f(td(a,b),t18".iv4d"):negd(td(a,b))
-b@[n:negd(a)][p:posd(b)]
-ntdnp:=eqnegd(td(b,a),td(a,b),comtd(b,a),ntdpn(b,a,p,n)):negd(td(a,b))
-b@[n:negd(a)][o:negd(b)]
-ptdnn:=eqposd(td(m0d(a),m0d(b)),td(a,b),satzd198(a,b),ptdpp(m0d(a),m0d(b),satzd176c(a,n),satzd176c(b,o))):posd(td(a,b))
-b@[n:not(zero(a))][o:not(zero(b))]
-+*4d192
-o@[p:posd(a)][q:posd(b)]
-t2:=pnot0d(td(a,b),ptdpp(a,b,p,q)):not(zero(td(a,b)))
-p@[m:negd(b)]
-t3:=nnot0d(td(a,b),ntdpn(a,b,p,m)):not(zero(td(a,b)))
-p@t4:=rappd(b,not(zero(td(a,b))),[t:posd(b)]t2(t),th2"l.imp"(zero(b),not(zero(td(a,b))),o),[t:negd(b)]t3(t)):not(zero(td(a,b)))
-o@[m:negd(a)][p:posd(b)]
-t5:=nnot0d(td(a,b),ntdnp(a,b,m,p)):not(zero(td(a,b)))
-m@[l:negd(b)]
-t6:=pnot0d(td(a,b),ptdnn(a,b,m,l)):not(zero(td(a,b)))
-m@t7:=rappd(b,not(zero(td(a,b))),[t:posd(b)]t5(t),th2"l.imp"(zero(b),not(zero(td(a,b))),o),[t:negd(b)]t6(t)):not(zero(td(a,b)))
--4d192
-o@satzd192d:=rappd(a,not(zero(td(a,b))),[t:posd(a)]t4".4d192"(t),th2"l.imp"(zero(a),not(zero(td(a,b))),n),[t:negd(a)]t7".4d192"(t)):not(zero(td(a,b)))
-b@[z:zero(td(a,b))]
-+*4d192
-z@[n:not(zero(a))]
-t8:=et(zero(b),th3"l.imp"(not(zero(b)),not(zero(td(a,b))),weli(zero(td(a,b)),z),[t:not(zero(b))]satzd192d(n,t))):zero(b)
--4d192
-z@satzd192c:=[t:not(zero(a))]t8".4d192"(t):or(zero(a),zero(b))
-+4d193
-b@[p:posd(a)][q:posd(b)]
-t1:=treq2(absd(td(a,b)),td(absd(a),absd(b)),td(a,b),absnnd(td(a,b),pnotnd(td(a,b),ptdpp(a,b,p,q))),eqtd12(absd(a),a,absd(b),b,absnnd(a,pnotnd(a,p)),absnnd(b,pnotnd(b,q)))):eq(absd(td(a,b)),td(absd(a),absd(b)))
-p@[n:negd(b)]
-t2:=treq(absd(td(a,b)),m0d(td(a,b)),td(a,m0d(b)),absnd(td(a,b),ntdpn(a,b,p,n)),satzd197f(a,b)):eq(absd(td(a,b)),td(a,m0d(b)))
-t3:=treq2(absd(td(a,b)),td(absd(a),absd(b)),td(a,m0d(b)),t2,eqtd12(absd(a),a,absd(b),m0d(b),absnnd(a,pnotnd(a,p)),absnd(b,n))):eq(absd(td(a,b)),td(absd(a),absd(b)))
-b@[z:zero(a)]
-t4:=zeroeq(absd(td(a,b)),td(absd(a),absd(b)),satzd166f(td(a,b),td01(a,b,z)),td01(absd(a),absd(b),satzd166f(a,z))):eq(absd(td(a,b)),td(absd(a),absd(b)))
-b@[z:zero(b)]
-t5:=zeroeq(absd(td(a,b)),td(absd(a),absd(b)),satzd166f(td(a,b),td02(a,b,z)),td02(absd(a),absd(b),satzd166f(b,z))):eq(absd(td(a,b)),td(absd(a),absd(b)))
-b@[n:negd(a)][p:posd(b)]
-t6:=tr3eq(absd(td(a,b)),absd(td(b,a)),td(absd(b),absd(a)),td(absd(a),absd(b)),eqabsd(td(a,b),td(b,a),comtd(a,b)),t3(b,a,p,n),comtd(absd(b),absd(a))):eq(absd(td(a,b)),td(absd(a),absd(b)))
-n@[o:negd(b)]
-t7:=treq(td(absd(a),absd(b)),td(m0d(a),m0d(b)),td(a,b),eqtd12(absd(a),m0d(a),absd(b),m0d(b),absnd(a,n),absnd(b,o)),satzd198(a,b)):eq(td(absd(a),absd(b)),td(a,b))
-t8:=treq2(absd(td(a,b)),td(absd(a),absd(b)),td(a,b),absnnd(td(a,b),pnotnd(td(a,b),ptdnn(a,b,n,o))),t7):eq(absd(td(a,b)),td(absd(a),absd(b)))
-b@[p:posd(a)]
-t9:=rappd(b,eq(absd(td(a,b)),td(absd(a),absd(b))),[t:posd(b)]t1(p,t),[t:zero(b)]t5(t),[t:negd(b)]t3(p,t)):eq(absd(td(a,b)),td(absd(a),absd(b)))
-b@[n:negd(a)]
-t10:=rappd(b,eq(absd(td(a,b)),td(absd(a),absd(b))),[t:posd(b)]t6(n,t),[t:zero(b)]t5(t),[t:negd(b)]t8(n,t)):eq(absd(td(a,b)),td(absd(a),absd(b)))
--4d193
-b@satzd193:=rappd(a,eq(absd(td(a,b)),td(absd(a),absd(b))),[t:posd(a)]t9".4d193"(t),[t:zero(a)]t4".4d193"(t),[t:negd(a)]t10".4d193"(t)):eq(absd(td(a,b)),td(absd(a),absd(b)))
-satzd103a:=symeq(absd(td(a,b)),td(absd(a),absd(b)),satzd193):eq(td(absd(a),absd(b)),absd(td(a,b)))
-@1df:=pdofrp(1rp):dif
-+4d195
-a@t1:=tris(cut,pl(pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),2a),pl(ts(1a,pl(1rp,1rp)),pl(ts(2a,1rp),2a)),pl(pl(1a,1a),pl(2a,2a)),asspl1(ts(1a,pl(1rp,1rp)),ts(2a,1rp),2a),ispl12(ts(1a,pl(1rp,1rp)),pl(1a,1a),pl(ts(2a,1rp),2a),pl(2a,2a),a2isapa(1a),ispl1(ts(2a,1rp),2a,2a,satz151(2a)))):is(pl(pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),2a),pl(pl(1a,1a),pl(2a,2a)))
-t2:=tris(cut,pl(1a,pl(ts(1a,1rp),ts(2a,pl(1rp,1rp)))),pl(pl(1a,ts(1a,1rp)),ts(2a,pl(1rp,1rp))),pl(pl(1a,1a),pl(2a,2a)),asspl2(1a,ts(1a,1rp),ts(2a,pl(1rp,1rp))),ispl12(pl(1a,ts(1a,1rp)),pl(1a,1a),ts(2a,pl(1rp,1rp)),pl(2a,2a),ispl2(ts(1a,1rp),1a,1a,satz151(1a)),a2isapa(2a))):is(pl(1a,pl(ts(1a,1rp),ts(2a,pl(1rp,1rp)))),pl(pl(1a,1a),pl(2a,2a)))
-t3:=tris2(cut,pl(pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),2a),pl(1a,pl(ts(1a,1rp),ts(2a,pl(1rp,1rp)))),pl(pl(1a,1a),pl(2a,2a)),t1,t2):is(pl(pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),2a),pl(1a,pl(ts(1a,1rp),ts(2a,pl(1rp,1rp)))))
--4d195
-a@satzd195:=treq(td(a,1df),df(pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),pl(ts(1a,1rp),ts(2a,pl(1rp,1rp)))),a,tdeq1a(a,pl(1rp,1rp),1rp),eqi2(a,pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),pl(ts(1a,1rp),ts(2a,pl(1rp,1rp))),t3".4d195")):eq(td(a,1df),a)
-satzd195a:=symeq(td(a,1df),a,satzd195):eq(a,td(a,1df))
-satzd195b:=treq(td(1df,a),td(a,1df),a,comtd(1df,a),satzd195):eq(td(1df,a),a)
-satzd195c:=symeq(td(1df,a),a,satzd195b):eq(a,td(1df,a))
-b@[p:posd(a)][q:posd(b)]
-satzd196a:=symeq(td(absd(a),absd(b)),td(a,b),eqtd12(absd(a),a,absd(b),b,absnnd(a,pnotnd(a,p)),absnnd(b,pnotnd(b,q)))):eq(td(a,b),td(absd(a),absd(b)))
-b@[n:negd(a)][o:negd(b)]
-satzd196b:=treq2(td(a,b),td(absd(a),absd(b)),td(m0d(a),m0d(b)),satzd198a(a,b),eqtd12(absd(a),m0d(a),absd(b),m0d(b),absnd(a,n),absnd(b,o))):eq(td(a,b),td(absd(a),absd(b)))
-b@[p:posd(a)][n:negd(b)]
-satzd196c:=treq1(td(a,b),m0d(td(absd(a),absd(b))),td(absd(a),m0d(absd(b))),eqtd12(absd(a),a,m0d(absd(b)),b,absnnd(a,pnotnd(a,p)),satzd177b(absd(b),b,absnd(b,n))),satzd197b(absd(a),absd(b))):eq(td(a,b),m0d(td(absd(a),absd(b))))
-b@[n:negd(a)][p:posd(b)]
-satzd196d:=tr3eq(td(a,b),td(b,a),m0d(td(absd(b),absd(a))),m0d(td(absd(a),absd(b))),comtd(a,b),satzd196c(b,a,p,n),eqm0d(td(absd(b),absd(a)),td(absd(a),absd(b)),comtd(absd(b),absd(a)))):eq(td(a,b),m0d(td(absd(a),absd(b))))
-+4d196
-b@p1p2:=and(posd(a),posd(b)):'prop'
-p1n2:=and(posd(a),negd(b)):'prop'
-n1p2:=and(negd(a),posd(b)):'prop'
-n1n2:=and(negd(a),negd(b)):'prop'
--4d196
-b@[n:not(zero(a))][o:not(zero(b))][e:eq(td(a,b),td(absd(a),absd(b)))]
-+*4d196
-o@t1:=ptdpp(absd(a),absd(b),satzd166e(a,n),satzd166e(b,o)):posd(td(absd(a),absd(b)))
-e@t2:=pnotnd(td(a,b),eqposd(td(absd(a),absd(b)),td(a,b),symeq(td(a,b),td(absd(a),absd(b)),e),t1)):not(negd(td(a,b)))
-[p:posd(a)]
-t3:=th3"l.imp"(negd(b),negd(td(a,b)),t2,[t:negd(b)]ntdpn(a,b,p,t)):not(negd(b))
-t4:=or3e2(zero(b),posd(b),negd(b),axrdo(b),t3,o):posd(b)
-t5:=andi(posd(a),posd(b),p,t4):p1p2
-t6:=ori1(p1p2,n1n2,t5):or(p1p2,n1n2)
-e@[m:negd(a)]
-t7:=th3"l.imp"(posd(b),negd(td(a,b)),t2,[t:posd(b)]ntdnp(a,b,m,t)):not(posd(b))
-t8:=or3e3(zero(b),posd(b),negd(b),axrdo(b),o,t7):negd(b)
-t9:=andi(negd(a),negd(b),m,t8):n1n2
-t10:=ori2(p1p2,n1n2,t9):or(p1p2,n1n2)
--4d196
-e@satzd196e:=rappd(a,or(p1p2".4d196",n1n2".4d196"),[t:posd(a)]t6".4d196"(t),th2"l.imp"(zero(a),or(p1p2".4d196",n1n2".4d196"),n),[t:negd(a)]t10".4d196"(t)):or(and(posd(a),posd(b)),and(negd(a),negd(b)))
-o@[e:eq(td(a,b),m0d(td(absd(a),absd(b))))]
-+*4d196
-o@t11:=satzd176a(td(absd(a),absd(b)),t1):negd(m0d(td(absd(a),absd(b))))
-e@t12:=nnotpd(td(a,b),eqnegd(m0d(td(absd(a),absd(b))),td(a,b),symeq(td(a,b),m0d(td(absd(a),absd(b))),e),t11)):not(posd(td(a,b)))
-[p:posd(a)]
-t13:=th3"l.imp"(posd(b),posd(td(a,b)),t12,[t:posd(b)]ptdpp(a,b,p,t)):not(posd(b))
-t14:=or3e3(zero(b),posd(b),negd(b),axrdo(b),o,t13):negd(b)
-t15:=andi(posd(a),negd(b),p,t14):p1n2
-t16:=ori1(p1n2,n1p2,t15):or(p1n2,n1p2)
-e@[m:negd(a)]
-t17:=th3"l.imp"(negd(b),posd(td(a,b)),t12,[t:negd(b)]ptdnn(a,b,m,t)):not(negd(b))
-t18:=or3e2(zero(b),posd(b),negd(b),axrdo(b),t17,o):posd(b)
-t19:=andi(negd(a),posd(b),m,t18):n1p2
-t20:=ori2(p1n2,n1p2,t19):or(p1n2,n1p2)
--4d196
-e@satzd196f:=rappd(a,or(p1n2".4d196",n1p2".4d196"),[t:posd(a)]t16".4d196"(t),th2"l.imp"(zero(a),or(p1n2".4d196",n1p2".4d196"),n),[t:negd(a)]t20".4d196"(t)):or(and(posd(a),negd(b)),and(negd(a),posd(b)))
-+4d199
-@[p:cut][q:cut][r:cut][s:cut][t:cut][u:cut]
-t1:=tris(cut,ts(pl(ts(p,r),ts(q,s)),t),pl(ts(ts(p,r),t),ts(ts(q,s),t)),pl(ts(p,ts(r,t)),ts(q,ts(s,t))),disttp1(ts(p,r),ts(q,s),t),ispl12(ts(ts(p,r),t),ts(p,ts(r,t)),ts(ts(q,s),t),ts(q,ts(s,t)),assts1(p,r,t),assts1(q,s,t))):is(ts(pl(ts(p,r),ts(q,s)),t),pl(ts(p,ts(r,t)),ts(q,ts(s,t))))
-t2:=tris(cut,pl(ts(q,ts(s,t)),ts(q,ts(r,u))),pl(ts(q,ts(r,u)),ts(q,ts(s,t))),ts(q,pl(ts(r,u),ts(s,t))),compl(ts(q,ts(s,t)),ts(q,ts(r,u))),distpt2(q,ts(r,u),ts(s,t))):is(pl(ts(q,ts(s,t)),ts(q,ts(r,u))),ts(q,pl(ts(r,u),ts(s,t))))
-t3:=tr3is(cut,pl(ts(pl(ts(p,r),ts(q,s)),t),ts(pl(ts(p,s),ts(q,r)),u)),pl(pl(ts(p,ts(r,t)),ts(q,ts(s,t))),pl(ts(p,ts(s,u)),ts(q,ts(r,u)))),pl(pl(ts(p,ts(r,t)),ts(p,ts(s,u))),pl(ts(q,ts(s,t)),ts(q,ts(r,u)))),pl(ts(p,pl(ts(r,t),ts(s,u))),ts(q,pl(ts(r,u),ts(s,t)))),ispl12(ts(pl(ts(p,r),ts(q,s)),t),pl(ts(p,ts(r,t)),ts(q,ts(s,t))),ts(pl(ts(p,s),ts(q,r)),u),pl(ts(p,ts(s,u)),ts(q,ts(r,u))),t1,t1(p,q,s,r,u,t)),4pl23(ts(p,ts(r,t)),ts(q,ts(s,t)),ts(p,ts(s,u)),ts(q,ts(r,u))),ispl12(pl(ts(p,ts(r,t)),ts(p,ts(s,u))),ts(p,pl(ts(r,t),ts(s,u))),pl(ts(q,ts(s,t)),ts(q,ts(r,u))),ts(q,pl(ts(r,u),ts(s,t))),distpt2(p,ts(r,t),ts(s,u)),t2)):is(pl(ts(pl(ts(p,r),ts(q,s)),t),ts(pl(ts(p,s),ts(q,r)),u)),pl(ts(p,pl(ts(r,t),ts(s,u))),ts(q,pl(ts(r,u),ts(s,t)))))
--4d199
-c@satzd199:=tr3eq(td(td(a,b),c),df(pl(ts(pl(ts(1a,1b),ts(2a,2b)),1c),ts(pl(ts(1a,2b),ts(2a,1b)),2c)),pl(ts(pl(ts(1a,1b),ts(2a,2b)),2c),ts(pl(ts(1a,2b),ts(2a,1b)),1c))),df(pl(ts(1a,pl(ts(1b,1c),ts(2b,2c))),ts(2a,pl(ts(1b,2c),ts(2b,1c)))),pl(ts(1a,pl(ts(1b,2c),ts(2b,1c))),ts(2a,pl(ts(1b,1c),ts(2b,2c))))),td(a,td(b,c)),tdeq2a(c,pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b))),eqsmsd(pl(ts(pl(ts(1a,1b),ts(2a,2b)),1c),ts(pl(ts(1a,2b),ts(2a,1b)),2c)),pl(ts(pl(ts(1a,1b),ts(2a,2b)),2c),ts(pl(ts(1a,2b),ts(2a,1b)),1c)),pl(ts(1a,pl(ts(1b,1c),ts(2b,2c))),ts(2a,pl(ts(1b,2c),ts(2b,1c)))),pl(ts(1a,pl(ts(1b,2c),ts(2b,1c))),ts(2a,pl(ts(1b,1c),ts(2b,2c)))),t3".4d199"(1a,2a,1b,2b,1c,2c),t3".4d199"(1a,2a,1b,2b,2c,1c)),tdeq1b(a,pl(ts(1b,1c),ts(2b,2c)),pl(ts(1b,2c),ts(2b,1c)))):eq(td(td(a,b),c),td(a,td(b,c)))
-asstd1:=satzd199:eq(td(td(a,b),c),td(a,td(b,c)))
-asstd2:=symeq(td(td(a,b),c),td(a,td(b,c)),satzd199):eq(td(a,td(b,c)),td(td(a,b),c))
-+4d201
-@[p:cut][q:cut][r:cut][s:cut][t:cut][u:cut]
-t1:=tris(cut,pl(ts(p,pl(r,t)),ts(q,pl(s,u))),pl(pl(ts(p,r),ts(p,t)),pl(ts(q,s),ts(q,u))),pl(pl(ts(p,r),ts(q,s)),pl(ts(p,t),ts(q,u))),ispl12(ts(p,pl(r,t)),pl(ts(p,r),ts(p,t)),ts(q,pl(s,u)),pl(ts(q,s),ts(q,u)),disttp2(p,r,t),disttp2(q,s,u)),4pl23(ts(p,r),ts(p,t),ts(q,s),ts(q,u))):is(pl(ts(p,pl(r,t)),ts(q,pl(s,u))),pl(pl(ts(p,r),ts(q,s)),pl(ts(p,t),ts(q,u))))
--4d201
-satzd201:=tr3eq(td(a,pd(b,c)),df(pl(ts(1a,pl(1b,1c)),ts(2a,pl(2b,2c))),pl(ts(1a,pl(2b,2c)),ts(2a,pl(1b,1c)))),df(pl(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,1c),ts(2a,2c))),pl(pl(ts(1a,2b),ts(2a,1b)),pl(ts(1a,2c),ts(2a,1c)))),pd(td(a,b),td(a,c)),tdeq1a(a,pl(1b,1c),pl(2b,2c)),eqsmsd(pl(ts(1a,pl(1b,1c)),ts(2a,pl(2b,2c))),pl(ts(1a,pl(2b,2c)),ts(2a,pl(1b,1c))),pl(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,1c),ts(2a,2c))),pl(pl(ts(1a,2b),ts(2a,1b)),pl(ts(1a,2c),ts(2a,1c))),t1".4d201"(1a,2a,1b,2b,1c,2c),t1".4d201"(1a,2a,2b,1b,2c,1c)),pdeq12b(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)),pl(ts(1a,1c),ts(2a,2c)),pl(ts(1a,2c),ts(2a,1c)))):eq(td(a,pd(b,c)),pd(td(a,b),td(a,c)))
-disttpd1:=tr3eq(td(pd(a,b),c),td(c,pd(a,b)),pd(td(c,a),td(c,b)),pd(td(a,c),td(b,c)),comtd(pd(a,b),c),satzd201(c,a,b),eqpd12(td(c,a),td(a,c),td(c,b),td(b,c),comtd(c,a),comtd(c,b))):eq(td(pd(a,b),c),pd(td(a,c),td(b,c)))
-disttpd2:=satzd201:eq(td(a,pd(b,c)),pd(td(a,b),td(a,c)))
-distptd1:=symeq(td(pd(a,b),c),pd(td(a,c),td(b,c)),disttpd1):eq(pd(td(a,c),td(b,c)),td(pd(a,b),c))
-distptd2:=symeq(td(a,pd(b,c)),pd(td(a,b),td(a,c)),disttpd2):eq(pd(td(a,b),td(a,c)),td(a,pd(b,c)))
-satzd202:=treq(td(a,md(b,c)),pd(td(a,b),td(a,m0d(c))),md(td(a,b),td(a,c)),disttpd2(a,b,m0d(c)),eqpd2(td(a,m0d(c)),m0d(td(a,c)),td(a,b),satzd197b(a,c))):eq(td(a,md(b,c)),md(td(a,b),td(a,c)))
-disttmd1:=treq(td(md(a,b),c),pd(td(a,c),td(m0d(b),c)),md(td(a,c),td(b,c)),disttpd1(a,m0d(b),c),eqpd2(td(m0d(b),c),m0d(td(b,c)),td(a,c),satzd197a(b,c))):eq(td(md(a,b),c),md(td(a,c),td(b,c)))
-disttmd2:=satzd202:eq(td(a,md(b,c)),md(td(a,b),td(a,c)))
-distmtd1:=symeq(td(md(a,b),c),md(td(a,c),td(b,c)),disttmd1):eq(md(td(a,c),td(b,c)),td(md(a,b),c))
-distmtd2:=symeq(td(a,md(b,c)),md(td(a,b),td(a,c)),disttmd2):eq(md(td(a,b),td(a,c)),td(a,md(b,c)))
-satzd200:=satzd202:eq(td(a,md(b,c)),md(td(a,b),td(a,c)))
-[m:mored(a,b)]
-+4d203
-t1:=satzd182d(a,b,m):posd(md(a,b))
--4d203
-[p:posd(c)]
-+*4d203
-p@t2:=eqposd(td(md(a,b),c),md(td(a,c),td(b,c)),disttmd1(a,b,c),ptdpp(md(a,b),c,t1,p)):posd(md(td(a,c),td(b,c)))
--4d203
-p@satzd203a:=satzd182a(td(a,c),td(b,c),t2".4d203"):mored(td(a,c),td(b,c))
-m@[z:zero(c)]
-satzd203b:=zeroeq(td(a,c),td(b,c),td02(a,c,z),td02(b,c,z)):eq(td(a,c),td(b,c))
-m@[n:negd(c)]
-+*4d203
-n@t3:=eqnegd(td(md(a,b),c),md(td(a,c),td(b,c)),disttmd1(a,b,c),ntdpn(md(a,b),c,t1,n)):negd(md(td(a,c),td(b,c)))
--4d203
-n@satzd203c:=satzd182c(td(a,c),td(b,c),t3".4d203"):lessd(td(a,c),td(b,c))
-p@satzd203d:=eqmored12(td(a,c),td(c,a),td(b,c),td(c,b),comtd(a,c),comtd(b,c),satzd203a):mored(td(c,a),td(c,b))
-z@satzd203e:=zeroeq(td(c,a),td(c,b),td01(c,a,z),td01(c,b,z)):eq(td(c,a),td(c,b))
-n@satzd203f:=eqlessd12(td(a,c),td(c,a),td(b,c),td(c,b),comtd(a,c),comtd(b,c),satzd203c):lessd(td(c,a),td(c,b))
-c@[l:lessd(a,b)][p:posd(c)]
-satzd203g:=lemmad5(td(b,c),td(a,c),satzd203a(b,a,c,lemmad6(a,b,l),p)):lessd(td(a,c),td(b,c))
-l@[z:zero(c)]
-satzd203h:=zeroeq(td(a,c),td(b,c),td02(a,c,z),td02(b,c,z)):eq(td(a,c),td(b,c))
-l@[n:negd(c)]
-satzd203j:=lemmad6(td(b,c),td(a,c),satzd203c(b,a,c,lemmad6(a,b,l),n)):mored(td(a,c),td(b,c))
-p@satzd203k:=lemmad5(td(c,b),td(c,a),satzd203d(b,a,c,lemmad6(a,b,l),p)):lessd(td(c,a),td(c,b))
-z@satzd203l:=zeroeq(td(c,a),td(c,b),td01(c,a,z),td01(c,b,z)):eq(td(c,a),td(c,b))
-n@satzd203m:=lemmad6(td(c,b),td(c,a),satzd203f(b,a,c,lemmad6(a,b,l),n)):mored(td(c,a),td(c,b))
-+*iv4d
-@[p:cut][q:cut]
-t19:=tris(cut,ts(q,pl(p,1rp)),pl(ts(q,p),ts(q,1rp)),pl(ts(q,p),q),disttp2(q,p,1rp),ispl2(ts(q,1rp),q,ts(q,p),satz151(q))):is(ts(q,pl(p,1rp)),pl(ts(q,p),q))
-[r:cut]
-t20:=tris(cut,pl(ts(q,pl(p,1rp)),ts(r,1rp)),pl(pl(ts(q,p),q),r),pl(ts(q,p),pl(q,r)),ispl12(ts(q,pl(p,1rp)),pl(ts(q,p),q),ts(r,1rp),r,t19,satz151(r)),asspl1(ts(q,p),q,r)):is(pl(ts(q,pl(p,1rp)),ts(r,1rp)),pl(ts(q,p),pl(q,r)))
-t21:=tr3is(cut,pl(ts(r,1rp),ts(q,pl(p,1rp))),pl(ts(q,pl(p,1rp)),ts(r,1rp)),pl(ts(q,p),pl(q,r)),pl(ts(q,p),pl(r,q)),compl(ts(r,1rp),ts(q,pl(p,1rp))),t20,ispl2(pl(q,r),pl(r,q),ts(q,p),compl(q,r))):is(pl(ts(r,1rp),ts(q,pl(p,1rp))),pl(ts(q,p),pl(r,q)))
-a@[p:posd(a)]
-arp:=rpofpd(a,p):cut
-arpi:=ov(1rp,arp):cut
-ai:=pdofrp(arpi):dif
-t22:=tr3eq(td(a,ai),df(pl(ts(1a,pl(arpi,1rp)),ts(2a,1rp)),pl(ts(1a,1rp),ts(2a,pl(arpi,1rp)))),df(pl(ts(1a,arpi),pl(1a,2a)),pl(ts(2a,arpi),pl(1a,2a))),df(ts(1a,arpi),ts(2a,arpi)),tdeq1a(a,pl(arpi,1rp),1rp),eqsmsd(pl(ts(1a,pl(arpi,1rp)),ts(2a,1rp)),pl(ts(1a,1rp),ts(2a,pl(arpi,1rp))),pl(ts(1a,arpi),pl(1a,2a)),pl(ts(2a,arpi),pl(1a,2a)),t20(arpi,1a,2a),t21(arpi,2a,1a)),lemmad2(ts(1a,arpi),ts(2a,arpi),pl(1a,2a))):eq(td(a,ai),df(ts(1a,arpi),ts(2a,arpi)))
-t23:=tr3is(cut,ts(1a,arpi),ts(pl(2a,arp),arpi),pl(ts(2a,arpi),ts(arp,arpi)),pl(ts(2a,arpi),1rp),ists1(1a,pl(2a,arp),arpi,satz140d(1a,2a,p)),disttp1(2a,arp,arpi),ispl2(ts(arp,arpi),1rp,ts(2a,arpi),satz153c(1rp,arp))):is(ts(1a,arpi),pl(ts(2a,arpi),1rp))
-t24:=tr3is(cut,pl(ts(1a,arpi),1rp),pl(pl(ts(2a,arpi),1rp),1rp),pl(ts(2a,arpi),pl(1rp,1rp)),pl(pl(1rp,1rp),ts(2a,arpi)),ispl1(ts(1a,arpi),pl(ts(2a,arpi),1rp),1rp,t23),asspl1(ts(2a,arpi),1rp,1rp),compl(ts(2a,arpi),pl(1rp,1rp))):is(pl(ts(1a,arpi),1rp),pl(pl(1rp,1rp),ts(2a,arpi)))
-t25:=eqi12(ts(1a,arpi),ts(2a,arpi),pl(1rp,1rp),1rp,t24):eq(df(ts(1a,arpi),ts(2a,arpi)),1df)
-t26:=treq(td(a,ai),df(ts(1a,arpi),ts(2a,arpi)),1df,t22,t25):eq(td(a,ai),1df)
-t27:=somei(dif,[x:dif]eq(td(a,x),1df),ai,t26):some"l"(dif,[x:dif]eq(td(a,x),1df))
-a@[n:negd(a)]
-t28:=satzd176c(a,n):posd(m0d(a))
-[h:dif][e:eq(td(m0d(a),h),1df)]
-t29:=treq(td(a,m0d(h)),td(m0d(a),h),1df,satzd197d(a,h),e):eq(td(a,m0d(h)),1df)
-t30:=somei(dif,[x:dif]eq(td(a,x),1df),m0d(h),t29):some"l"(dif,[x:dif]eq(td(a,x),1df))
-n@t31:=someapp(dif,[x:dif]eq(td(m0d(a),x),1df),t27(m0d(a),t28),some"l"(dif,[x:dif]eq(td(a,x),1df)),[x:dif][t:eq(td(m0d(a),x),1df)]t30(x,t)):some"l"(dif,[x:dif]eq(td(a,x),1df))
--iv4d
-a@[n:not(zero(a))]
-lemmad7:=rappd(a,some"l"(dif,[x:dif]eq(td(a,x),1df)),[t:posd(a)]t27".iv4d"(t),th2"l.imp"(zero(a),some"l"(dif,[x:dif]eq(td(a,x),1df)),n),[t:negd(a)]t31".iv4d"(t)):some"l"(dif,[x:dif]eq(td(a,x),1df))
-b@[n:not(zero(b))][h:dif][k:dif][e:eq(td(b,h),a)][f:eq(td(b,k),a)]
-+4d204
-t1:=treq2(td(b,h),td(b,k),a,e,f):eq(td(b,h),td(b,k))
-t2:=eqzero(md(td(b,h),td(b,k)),td(b,md(h,k)),distmtd2(b,h,k),satzd182e(td(b,h),td(b,k),t1)):zero(td(b,md(h,k)))
-t3:=ore2(zero(b),zero(md(h,k)),satzd192c(b,md(h,k),t2),n):zero(md(h,k))
--4d204
-satzd204b:=satzd182b(h,k,t3".4d204"):eq(h,k)
-+*4d204
-n@[h:dif][e:eq(td(b,h),1df)]
-t4:=tr3eq(td(b,td(h,a)),td(td(b,h),a),td(1df,a),a,asstd2(b,h,a),eqtd1(td(b,h),1df,a,e),satzd195b(a)):eq(td(b,td(h,a)),a)
-t5:=somei(dif,[x:dif]eq(td(b,x),a),td(h,a),t4):some"l"(dif,[x:dif]eq(td(b,x),a))
--4d204
-n@satzd204a:=someapp(dif,[x:dif]eq(td(b,x),1df),lemmad7(b,n),some"l"(dif,[x:dif]eq(td(b,x),a)),[x:dif][t:eq(td(b,x),1df)]t5".4d204"(x,t)):some"l"(dif,[x:dif]eq(td(b,x),a))
-@[r:cut][s:cut][m:more(r,s)]
-+iv5d
-t1:=ismore12(pl(r,pl(1rp,1rp)),pl(pl(r,1rp),1rp),pl(s,pl(1rp,1rp)),pl(pl(s,1rp),1rp),asspl2(r,1rp,1rp),asspl2(s,1rp,1rp),satz134(r,s,pl(1rp,1rp),m)):more(pl(pl(r,1rp),1rp),pl(pl(s,1rp),1rp))
--iv5d
-morerpepd:=moredi12(pl(r,1rp),1rp,pl(s,1rp),1rp,t1".iv5d"):mored(pdofrp(r),pdofrp(s))
-s@[m:mored(pdofrp(r),pdofrp(s))]
-+*iv5d
-m@t2:=morede12(pl(r,1rp),1rp,pl(s,1rp),1rp,m):more(pl(pl(r,1rp),1rp),pl(pl(s,1rp),1rp))
--iv5d
-m@morerpipd:=satz136a(r,s,pl(1rp,1rp),ismore12(pl(pl(r,1rp),1rp),pl(r,pl(1rp,1rp)),pl(pl(s,1rp),1rp),pl(s,pl(1rp,1rp)),asspl1(r,1rp,1rp),asspl1(s,1rp,1rp),t2".iv5d")):more(r,s)
-s@[l:less(r,s)]
-lessrpepd:=lemmad5(pdofrp(s),pdofrp(r),morerpepd(s,r,satz122(r,s,l))):lessd(pdofrp(r),pdofrp(s))
-s@[l:lessd(pdofrp(r),pdofrp(s))]
-lessrpipd:=satz121(s,r,morerpipd(s,r,lemmad6(pdofrp(r),pdofrp(s),l))):less(r,s)
-+*iv5d
-@i:=1rp:cut
-2:=pl(i,i):cut
-r@rp1:=pl(r,i):cut
-s@sp1:=pl(s,i):cut
-rps:=pl(r,s):cut
-rs:=ts(r,s):cut
-t3:=tris(cut,pl(pl(rp1,sp1),i),pl(pl(rps,2),i),pl(pl(rps,i),2),ispl1(pl(rp1,sp1),pl(rps,2),i,4pl23(r,i,s,i)),3pl23(rps,2,i)):is(pl(pl(rp1,sp1),i),pl(pl(rps,i),2))
-t4:=treq(pd(pdofrp(r),pdofrp(s)),df(pl(rp1,sp1),2),pdofrp(rps),pdeq12a(rp1,i,sp1,i),eqi12(pl(rp1,sp1),2,pl(rps,i),i,t3)):eq(pd(pdofrp(r),pdofrp(s)),pdofrp(rps))
--iv5d
-s@lemmad8:=t4".iv5d":eq(pd(pdofrp(r),pdofrp(s)),pdofrp(pl(r,s)))
-+*iv5d
-s@t5:=tris(cut,ts(r,sp1),pl(rs,ts(r,i)),pl(rs,r),disttp2(r,s,i),ispl2(ts(r,i),r,rs,satz151(r))):is(ts(r,sp1),pl(rs,r))
-t6:=tr4is(cut,ts(rp1,sp1),pl(ts(r,sp1),ts(i,sp1)),pl(pl(rs,r),sp1),pl(pl(pl(rs,r),s),i),pl(pl(rs,rps),i),disttp1(r,i,sp1),ispl12(ts(r,sp1),pl(rs,r),ts(i,sp1),sp1,t5,satz151b(sp1)),asspl2(pl(rs,r),s,i),ispl1(pl(pl(rs,r),s),pl(rs,rps),i,asspl1(rs,r,s))):is(ts(rp1,sp1),pl(pl(rs,rps),i))
-t7:=tr3is(cut,pl(ts(rp1,sp1),ts(i,i)),pl(pl(pl(rs,rps),i),i),pl(pl(rs,rps),2),pl(rs,pl(rps,2)),ispl12(ts(rp1,sp1),pl(pl(rs,rps),i),ts(i,i),i,t6,satz151(i)),asspl1(pl(rs,rps),i,i),asspl1(rs,rps,2)):is(pl(ts(rp1,sp1),ts(i,i)),pl(rs,pl(rps,2)))
-t8:=tris(cut,pl(ts(rp1,i),ts(i,sp1)),pl(rp1,sp1),pl(rps,2),ispl12(ts(rp1,i),rp1,ts(i,sp1),sp1,satz151(rp1),satz151b(sp1)),4pl23(r,i,s,i)):is(pl(ts(rp1,i),ts(i,sp1)),pl(rps,2))
-t9:=tris(cut,pl(pl(rs,i),pl(ts(rp1,i),ts(i,sp1))),pl(pl(rs,i),pl(rps,2)),pl(pl(rs,pl(rps,2)),i),ispl2(pl(ts(rp1,i),ts(i,sp1)),pl(rps,2),pl(rs,i),t8),3pl23(rs,i,pl(rps,2))):is(pl(pl(rs,i),pl(ts(rp1,i),ts(i,sp1))),pl(pl(rs,pl(rps,2)),i))
-t10:=tris2(cut,pl(pl(ts(rp1,sp1),ts(i,i)),i),pl(pl(rs,i),pl(ts(rp1,i),ts(i,sp1))),pl(pl(rs,pl(rps,2)),i),ispl1(pl(ts(rp1,sp1),ts(i,i)),pl(rs,pl(rps,2)),i,t7),t9):is(pl(pl(ts(rp1,sp1),ts(i,i)),i),pl(pl(rs,i),pl(ts(rp1,i),ts(i,sp1))))
-t11:=treq(td(pdofrp(r),pdofrp(s)),df(pl(ts(rp1,sp1),ts(i,i)),pl(ts(rp1,i),ts(i,sp1))),pdofrp(rs),tdeq12a(rp1,i,sp1,i),eqi12(pl(ts(rp1,sp1),ts(i,i)),pl(ts(rp1,i),ts(i,sp1)),pl(rs,i),i,t10)):eq(td(pdofrp(r),pdofrp(s)),pdofrp(rs))
--iv5d
-s@lemmad9:=t11".iv5d":eq(td(pdofrp(r),pdofrp(s)),pdofrp(ts(r,s)))
-@[r:cut][s0:set(cut)]
-in:=esti(cut,r,s0):'prop'
-@[s0:set(cut)][t0:set(cut)][p0:all([x:cut]or(in(x,s0),in(x,t0)))][p1a:nonempty(cut,s0)][p1b:nonempty(cut,t0)][p2:all([x:cut][t:in(x,s0)]all([y:cut][u:in(y,t0)]less(x,y)))]
-+5p205
-t0@[r:cut]
-prop1:=all([x:cut][t:less(x,r)]in(x,s0)):'prop'
-prop2:=all([x:cut][t:more(x,r)]in(x,t0)):'prop'
-prop3:=and(prop1,prop2):'prop'
-p2@[r1:cut][r2:cut][pr1:prop3(r1)][pr2:prop3(r2)]
-t1:=ande2(prop1(r1),prop2(r1),pr1):prop2(r1)
-t2:=ande1(prop1(r2),prop2(r2),pr2):prop1(r2)
-[l:less(r1,r2)][x0:rat]
-rx:=rpofrt(x0):cut
-[l1:less(r1,rx)][l2:less(rx,r2)]
-t3:=<l2><rx>t2:in(rx,s0)
-t4:=<satz122(r1,rx,l1)><rx>t1:in(rx,t0)
-t5:=<refis(cut,rx)>ec3e31(is(rx,rx),more(rx,rx),less(rx,rx),satz123b(rx,rx),<t4><rx><t3><rx>p2):con
-l@t6:=satz159app(r1,r2,l,con,[x:rat][t:less(r1,rpofrt(x))][u:less(rpofrt(x),r2)]t5(x,t,u)):con
-pr2@t7:=[t:less(r1,r2)]t6(t):not(less(r1,r2))
-t8:=[t:more(r1,r2)]t6(r2,r1,pr2,pr1,satz121(r1,r2,t)):not(more(r1,r2))
-t9:=or3e1(is(r1,r2),more(r1,r2),less(r1,r2),satz123a(r1,r2),t8,t7):is(r1,r2)
-p2@t10:=[x:cut][y:cut][t:prop3(x)][u:prop3(y)]t9(x,y,t,u):amone(cut,[x:cut]prop3(x))
-[x0:rat]
-schnittprop:=some([y:cut]and(in(y,s0),lrt(y,x0))):'prop'
-p2@schnittset:=setof(rat,[x:rat]schnittprop(x)):set(rat)
-[r:cut][i:in(r,s0)][x0:rat][lx:lrt(r,x0)]
-t11:=andi(in(r,s0),lrt(r,x0),i,lx):and(in(r,s0),lrt(r,x0))
-t12:=somei(cut,[y:cut]and(in(y,s0),lrt(y,x0)),r,t11):schnittprop(x0)
-t13:=estii(rat,[x:rat]schnittprop(x),x0,t12):in"rt"(x0,schnittset)
-r@[i:in(r,t0)][x0:rat][ux:urt(r,x0)][s:cut][j:in(s,s0)]
-t14:=satz122(s,r,<i><r><j><s>p2):more(r,s)
-t15:=satz158b(r,x0,ux):moreis(rpofrt(x0),r)
-t16:=moreisi1(rpofrt(x0),s,satz127c(rpofrt(x0),r,s,t15,t14)):moreis(rpofrt(x0),s)
-t17:=satz158d(s,x0,t16):urt(s,x0)
-s@t18:=weli(ec(in(s,s0),lrt(s,x0)),[t:in(s,s0)]t17(t)):not(and(in(s,s0),lrt(s,x0)))
-ux@t19:=th5"l.some"(cut,[y:cut]and(in(y,s0),lrt(y,x0)),[y:cut]t18(y)):not(schnittprop(x0))
-t20:=th3"l.imp"(in"rt"(x0,schnittset),schnittprop(x0),t19,[t:in"rt"(x0,schnittset)]estie(rat,[x:rat]schnittprop(x),x0,t)):not(in"rt"(x0,schnittset))
-p2@[x0:rat][i:in"rt"(x0,schnittset)][y0:rat][l:less"rt"(y0,x0)]
-i@t21:=estie(rat,[x:rat]schnittprop(x),x0,i):schnittprop(x0)
-l@[r:cut][a:and(in(r,s0),lrt(r,x0))]
-t22:=ande1(in(r,s0),lrt(r,x0),a):in(r,s0)
-t23:=ande2(in(r,s0),lrt(r,x0),a):lrt(r,x0)
-t24:=satz120(r,x0,t23,y0,l):lrt(r,y0)
-t25:=andi(in(r,s0),lrt(r,y0),t22,t24):and(in(r,s0),lrt(r,y0))
-t26:=somei(cut,[y:cut]and(in(y,s0),lrt(y,y0)),r,t25):schnittprop(y0)
-l@t27:=someapp(cut,[y:cut]and(in(y,s0),lrt(y,x0)),t21,schnittprop(y0),[y:cut][r:and(in(y,s0),lrt(y,x0))]t26(y,r)):schnittprop(y0)
-t28:=estii(rat,[x:rat]schnittprop(x),y0,t27):in"rt"(y0,schnittset)
-i@[r:cut][a:and(in(r,s0),lrt(r,x0))]
-t29:=ande1(in(r,s0),lrt(r,x0),a):in(r,s0)
-t30:=ande2(in(r,s0),lrt(r,x0),a):lrt(r,x0)
-[y0:rat][ly:lrt(r,y0)][l:less"rt"(x0,y0)]
-t31:=andi(in(r,s0),lrt(r,y0),t29,ly):and(in(r,s0),lrt(r,y0))
-t32:=somei(cut,[y:cut]and(in(y,s0),lrt(y,y0)),r,t31):schnittprop(y0)
-t33:=estii(rat,[x:rat]schnittprop(x),y0,t32):in"rt"(y0,schnittset)
-t34:=satz83(x0,y0,l):more"rt"(y0,x0)
-t35:=andi(in"rt"(y0,schnittset),more"rt"(y0,x0),t33,t34):and(in"rt"(y0,schnittset),more"rt"(y0,x0))
-t36:=somei(rat,[y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0)),y0,t35):some"rt"([y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0)))
-a@t37:=cutapp3(r,x0,t30,some"rt"([y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0))),[y:rat][t:lrt(r,y)][u:less"rt"(x0,y)]t36(y,t,u)):some"rt"([y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0)))
-i@t38:=someapp(cut,[y:cut]and(in(y,s0),lrt(y,x0)),t21,some"rt"([y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0))),[y:cut][t:and(in(y,s0),lrt(y,x0))]t37(y,t)):some"rt"([y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0)))
-p2@[r:cut][i:in(r,s0)][x0:rat][lx:lrt(r,x0)][s:cut][j:in(s,t0)][y0:rat][uy:urt(s,y0)]
-t39:=cut2(schnittset,x0,t13(r,i,x0,lx),y0,t20(s,j,y0,uy),[x:rat][t:in"rt"(x,schnittset)][y:rat][u:less"rt"(y,x)]t28(x,t,y,u),[x:rat][t:in"rt"(x,schnittset)]t38(x,t)):cutprop(schnittset)
-j@t40:=cutapp1b(s,cutprop(schnittset),[x:rat][t:urt(s,x)]t39(x,t)):cutprop(schnittset)
-lx@t41:=nonemptyapp(cut,t0,p1b,cutprop(schnittset),[y:cut][t:in(y,t0)]t40(y,t)):cutprop(schnittset)
-i@t42:=cutapp1a(r,cutprop(schnittset),[x:rat][t:lrt(r,x)]t41(x,t)):cutprop(schnittset)
-p2@t43:=nonemptyapp(cut,s0,p1a,cutprop(schnittset),[y:cut][t:in(y,s0)]t42(y,t)):cutprop(schnittset)
-snt:=cutof(schnittset,t43):cut
-[r:cut][l:less(r,snt)][x0:rat][ux:urt(r,x0)][lx:lrt(snt,x0)]
-t44:=ini(schnittset,t43,x0,lx):in"rt"(x0,schnittset)
-t45:=estie(rat,[x:rat]schnittprop(x),x0,t44):schnittprop(x0)
-[s:cut][a:and(in(s,s0),lrt(s,x0))]
-t46:=ande1(in(s,s0),lrt(s,x0),a):in(s,s0)
-t47:=ande2(in(s,s0),lrt(s,x0),a):lrt(s,x0)
-t48:=andi(urt(r,x0),lrt(s,x0),ux,t47):and(urt(r,x0),lrt(s,x0))
-t49:=somei(rat,[x:rat]and(urt(r,x),lrt(s,x)),x0,t48):less(r,s)
-t50:=ec3e23(is(s,r),more(s,r),less(s,r),satz123b(s,r),satz122(r,s,t49)):not(less(s,r))
-t51:=th3"l.imp"(in(r,t0),less(s,r),t50,<r><t46><s>p2):not(in(r,t0))
-t52:=ore1(in(r,s0),in(r,t0),<r>p0,t51):in(r,s0)
-lx@t53:=someapp(cut,[y:cut]and(in(y,s0),lrt(y,x0)),t45,in(r,s0),[y:cut][t:and(in(y,s0),lrt(y,x0))]t52(y,t)):in(r,s0)
-l@t54:=lessapp(r,snt,l,in(r,s0),[x:rat][t:urt(r,x)][u:lrt(snt,x)]t53(x,t,u)):in(r,s0)
-r@[m:more(r,snt)][x0:rat][lx:lrt(r,x0)][ux:urt(snt,x0)][i:in(r,s0)]
-t55:=andi(in(r,s0),lrt(r,x0),i,lx):and(in(r,s0),lrt(r,x0))
-t56:=somei(cut,[y:cut]and(in(y,s0),lrt(y,x0)),r,t55):schnittprop(x0)
-t57:=estii(rat,[x:rat]schnittprop(x),x0,t56):in"rt"(x0,schnittset)
-t58:=ine(schnittset,t43,x0,t57):lrt(snt,x0)
-ux@t59:=th3"l.imp"(in(r,s0),lrt(snt,x0),ux,[t:in(r,s0)]t58(t)):not(in(r,s0))
-t60:=ore2(in(r,s0),in(r,t0),<r>p0,t59):in(r,t0)
-m@t61:=moreapp(r,snt,m,in(r,t0),[x:rat][t:lrt(r,x)][u:urt(snt,x)]t60(x,t,u)):in(r,t0)
-p2@t62:=andi(prop1(snt),prop2(snt),[x:cut][t:less(x,snt)]t54(x,t),[x:cut][t:more(x,snt)]t61(x,t)):prop3(snt)
-t63:=somei(cut,[x:cut]prop3(x),snt,t62):some([x:cut]prop3(x))
--5p205
-satzp205:=onei(cut,[x:cut]prop3".5p205"(x),t10".5p205",t63".5p205"):one([x:cut]and(all([y:cut][t:less(y,x)]in(y,s0)),all([y:cut][t:more(y,x)]in(y,t0))))
-schnitt:=ind(cut,[x:cut]prop3".5p205"(x),satzp205):cut
-satzp205a:=ande1(prop1".5p205"(schnitt),prop2".5p205"(schnitt),oneax(cut,[x:cut]prop3".5p205"(x),satzp205)):all([x:cut][t:less(x,schnitt)]in(x,s0))
-satzp205b:=ande2(prop1".5p205"(schnitt),prop2".5p205"(schnitt),oneax(cut,[x:cut]prop3".5p205"(x),satzp205)):all([x:cut][t:more(x,schnitt)]in(x,t0))
-@[r:cut][s:cut]
-+ivad
-@i:=1rp:cut
-r@r1:=pl(r,i):cut
-s@s1:=pl(s,i):cut
-rps:=pl(r,s):cut
-@2:=pl(i,i):cut
-s@t1:=pdeq12a(r1,i,s1,i):eq(pd(pdofrp(r),pdofrp(s)),df(pl(r1,s1),2))
-t2:=tris(cut,pl(r1,s1),pl(rps,2),pl(pl(rps,i),i),4pl23(r,i,s,i),asspl2(rps,i,i)):is(pl(r1,s1),pl(pl(rps,i),i))
-t3:=ispl1(pl(r1,s1),pl(pl(rps,i),i),i,t2):is(pl(pl(r1,s1),i),pl(pl(pl(rps,i),i),i))
-t4:=tris(cut,pl(pl(r1,s1),i),pl(pl(pl(rps,i),i),i),pl(pl(rps,i),2),t3,asspl1(pl(rps,i),i,i)):is(pl(pl(r1,s1),i),pl(pl(rps,i),2))
-t5:=eqi12(pl(r1,s1),2,pl(rps,i),i,t4):eq(df(pl(r1,s1),2),pdofrp(rps))
--ivad
-lemmaivad1:=treq(pd(pdofrp(r),pdofrp(s)),df(pl(pl(r,1rp),pl(s,1rp)),pl(1rp,1rp)),pdofrp(pl(r,s)),t1".ivad",t5".ivad"):eq(pd(pdofrp(r),pdofrp(s)),pdofrp(pl(r,s)))
-+*ivad
-s@rs:=ts(r,s):cut
-t6:=tdeq12a(r1,i,s1,i):eq(td(pdofrp(r),pdofrp(s)),df(pl(ts(r1,s1),ts(i,i)),pl(ts(r1,i),ts(i,s1))))
-t7:=tris(cut,ts(r1,s),pl(rs,ts(i,s)),pl(rs,s),disttp1(r,i,s),ispl2(ts(i,s),s,rs,satz151b(s))):is(ts(r1,s),pl(rs,s))
-t8:=tr3is(cut,ts(r1,s1),pl(ts(r1,s),ts(r1,i)),pl(pl(rs,s),r1),pl(pl(rs,i),rps),disttp2(r1,s,i),ispl12(ts(r1,s),pl(rs,s),ts(r1,i),r1,t7,satz151(r1)),4pl24(rs,s,r,i)):is(ts(r1,s1),pl(pl(rs,i),rps))
-t9:=tris(cut,pl(ts(r1,s1),ts(i,i)),pl(pl(pl(rs,i),rps),i),pl(pl(rs,i),pl(rps,i)),ispl12(ts(r1,s1),pl(pl(rs,i),rps),ts(i,i),i,t8,satz151(i)),asspl1(pl(rs,i),rps,i)):is(pl(ts(r1,s1),ts(i,i)),pl(pl(rs,i),pl(rps,i)))
-t10:=tris(cut,pl(pl(ts(r1,s1),ts(i,i)),i),pl(pl(pl(rs,i),pl(rps,i)),i),pl(pl(rs,i),pl(pl(rps,i),i)),ispl1(pl(ts(r1,s1),ts(i,i)),pl(pl(rs,i),pl(rps,i)),i,t9),asspl1(pl(rs,i),pl(rps,i),i)):is(pl(pl(ts(r1,s1),ts(i,i)),i),pl(pl(rs,i),pl(pl(rps,i),i)))
-t11:=tr3is(cut,pl(pl(rps,i),i),pl(rps,2),pl(r1,s1),pl(ts(r1,i),ts(i,s1)),asspl1(rps,i,i),4pl23(r,s,i,i),ispl12(r1,ts(r1,i),s1,ts(i,s1),satz151a(r1),satz151c(s1))):is(pl(pl(rps,i),i),pl(ts(r1,i),ts(i,s1)))
-t12:=tris(cut,pl(pl(ts(r1,s1),ts(i,i)),i),pl(pl(rs,i),pl(pl(rps,i),i)),pl(pl(rs,i),pl(ts(r1,i),ts(i,s1))),t10,ispl2(pl(pl(rps,i),i),pl(ts(r1,i),ts(i,s1)),pl(rs,i),t11)):is(pl(pl(ts(r1,s1),ts(i,i)),i),pl(pl(rs,i),pl(ts(r1,i),ts(i,s1))))
-t13:=eqi12(pl(ts(r1,s1),ts(i,i)),pl(ts(r1,i),ts(i,s1)),pl(rs,i),i,t12):eq(df(pl(ts(r1,s1),ts(i,i)),pl(ts(r1,i),ts(i,s1))),pdofrp(rs))
--ivad
-s@lemmaivad2:=treq(td(pdofrp(r),pdofrp(s)),df(pl(ts(pl(r,1rp),pl(s,1rp)),ts(1rp,1rp)),pl(ts(pl(r,1rp),1rp),ts(1rp,pl(s,1rp)))),pdofrp(ts(r,s)),t6".ivad",t13".ivad"):eq(td(pdofrp(r),pdofrp(s)),pdofrp(ts(r,s)))
-[m:mored(pdofrp(r),pdofrp(s))]
-+*ivad
-m@t14:=morede12(r1,i,s1,i,m):more(pl(r1,i),pl(s1,i))
-t15:=satz136a(r1,s1,i,t14):more(r1,s1)
--ivad
-m@lemmaivad3:=satz136a(r,s,1rp,t15".ivad"):more(r,s)
-@[c:dif][a:dif][b:dif][n:not(negd(a))][o:not(negd(b))][e:eq(td(a,a),c)][f:eq(td(b,b),c)]
-+d161
-t1:=treq2(td(a,a),td(b,b),c,e,f):eq(td(a,a),td(b,b))
-t2:=treq(pd(md(td(a,a),td(a,b)),td(b,a)),pd(md(td(a,a),td(a,b)),td(a,b)),td(a,a),eqpd2(td(b,a),td(a,b),md(td(a,a),td(a,b)),comtd(b,a)),pdmd(td(a,a),td(a,b))):eq(pd(md(td(a,a),td(a,b)),td(b,a)),td(a,a))
-t3:=tr4eq(td(pd(a,b),md(a,b)),pd(td(a,md(a,b)),td(b,md(a,b))),pd(md(td(a,a),td(a,b)),md(td(b,a),td(b,b))),md(pd(md(td(a,a),td(a,b)),td(b,a)),td(b,b)),md(td(a,a),td(b,b)),disttpd1(a,b,md(a,b)),eqpd12(td(a,md(a,b)),md(td(a,a),td(a,b)),td(b,md(a,b)),md(td(b,a),td(b,b)),disttmd2(a,a,b),disttmd2(b,a,b)),asspd2(md(td(a,a),td(a,b)),td(b,a),m0d(td(b,b))),eqmd1(pd(md(td(a,a),td(a,b)),td(b,a)),td(a,a),td(b,b),t2)):eq(td(pd(a,b),md(a,b)),md(td(a,a),td(b,b)))
-t4:=eqzero(md(td(a,a),td(b,b)),td(pd(a,b),md(a,b)),symeq(td(pd(a,b),md(a,b)),md(td(a,a),td(b,b)),t3),satzd182e(td(a,a),td(b,b),t1)):zero(td(pd(a,b),md(a,b)))
-t5:=satzd192c(pd(a,b),md(a,b),t4):or(zero(pd(a,b)),zero(md(a,b)))
-[z:zero(a)]
-t6:=eqzero(td(a,a),td(b,b),t1,td01(a,a,z)):zero(td(b,b))
-t7:=th1"l.imp"(zero(b),zero(b),refimp(zero(b)),satzd192c(b,b,t6)):zero(b)
-t8:=zeroeq(a,b,z,t7):eq(a,b)
-f@[p:not(zero(a))]
-t9:=or3e2(zero(a),posd(a),negd(a),axrdo(a),n,p):posd(a)
-t10:=th3"l.imp"(zero(b),zero(a),p,[t:zero(b)]t7(b,a,o,n,f,e,t)):not(zero(b))
-t11:=t9(b,a,o,n,f,e,t10):posd(b)
-t12:=pnot0d(pd(a,b),ppd(a,b,t9,t11)):not(zero(pd(a,b)))
-t13:=ore2(zero(pd(a,b)),zero(md(a,b)),t5,t12):zero(md(a,b))
-t14:=satzd182b(a,b,t13):eq(a,b)
--d161
-satzd161b:=th1"l.imp"(zero(a),eq(a,b),[t:zero(a)]t8".d161"(t),[t:not(zero(a))]t14".d161"(t)):eq(a,b)
-c@[n:not(negd(c))]
-+*d161
-n@[z:zero(c)]
-t15:=zeroeq(td(c,c),c,td01(c,c,z),z):eq(td(c,c),c)
-t16:=andi(not(negd(c)),eq(td(c,c),c),n,t15):and(not(negd(c)),eq(td(c,c),c))
-t17:=somei(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c)),c,t16):some"l"(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c)))
-n@[o:not(zero(c))]
-t18:=or3e2(zero(c),posd(c),negd(c),axrdo(c),n,o):posd(c)
-crp:=rpofpd(c,t18):cut
-srp:=sqrt(crp):cut
-s:=pdofrp(srp):dif
-t19:=tr3eq(td(s,s),pdofrp(ts(srp,srp)),pdofrp(crp),c,lemmaivad2(srp,srp),isrpepd(ts(srp,srp),crp,thsqrt1(crp)),eqpdrp2(c,t18)):eq(td(s,s),c)
-t20:=andi(not(negd(s)),eq(td(s,s),c),pnotnd(s,posdirp(srp)),t19):and(not(negd(s)),eq(td(s,s),c))
-t21:=somei(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c)),s,t20):some"l"(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c)))
--d161
-n@satzd161a:=th1"l.imp"(zero(c),some"l"(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c))),[t:zero(c)]t17".d161"(t),[t:not(zero(c))]t21".d161"(t)):some"l"(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c)))
-@[a:dif][i:intd(a)]
-+intd
-[z:zero(a)]
-t1:=ori1(zero(absd(a)),natd(absd(absd(a))),satzd166f(a,z)):intd(absd(a))
-i@[n:natd(absd(a))]
-t2:=natintd(absd(a),n):intd(absd(a))
--intd
-intabsd:=orapp(zero(a),natd(absd(a)),intd(absd(a)),i,[t:zero(a)]t1".intd"(t),[t:natd(absd(a))]t2".intd"(t)):intd(absd(a))
-+*intd
-n@t4:=eqnatd(absd(a),absd(m0d(a)),satzd178a(a),n):natd(absd(m0d(a)))
--intd
-i@intm0d:=th9"l.or"(zero(a),natd(absd(a)),zero(m0d(a)),natd(absd(m0d(a))),i,[t:zero(a)]satzd176b(a,t),[t:natd(absd(a))]t4".intd"(t)):intd(m0d(a))
-a@[b:dif][i:intd(a)][j:intd(b)]
-+*intd
-j@[z:zero(a)]
-t5:=symeq(pd(a,b),b,pd01(a,b,z)):eq(b,pd(a,b))
-t6:=eqintd(b,pd(a,b),t5,j):intd(pd(a,b))
-j@[z:zero(b)]
-t7:=symeq(pd(a,b),a,pd02(a,b,z)):eq(a,pd(a,b))
-t8:=eqintd(a,pd(a,b),t7,i):intd(pd(a,b))
-a@[i:intd(a)][p:posd(a)]
-t9:=<p>ande2(posd(a),[t:posd(a)]natrp(rpofpd(a,t)),posintnatd(a,p,i)):natrp(rpofpd(a,p))
-j@[pp:posd(pd(a,b))]
-apb1:=rpofpd(pd(a,b),pp):cut
-[p:posd(a)]
-a1:=rpofpd(a,p):cut
-[q:posd(b)]
-b1:=rpofpd(b,q):cut
-t10:=natpl(a1,t9(a,i,p),b1,t9(b,j,q)):natrp(pl(a1,b1))
-t11:=eqpd12(a,pdofrp(a1),b,pdofrp(b1),eqpdrp1(a,p),eqpdrp1(b,q)):eq(pd(a,b),pd(pdofrp(a1),pdofrp(b1)))
-t12:=treq(pd(a,b),pd(pdofrp(a1),pdofrp(b1)),pdofrp(pl(a1,b1)),t11,lemmaivad1(a1,b1)):eq(pd(a,b),pdofrp(pl(a1,b1)))
-t13:=tris(cut,apb1,rpofpd(pdofrp(pl(a1,b1)),posdirp(pl(a1,b1))),pl(a1,b1),eqpderp(pd(a,b),pp,pdofrp(pl(a1,b1)),posdirp(pl(a1,b1)),t12),isrppd2(pl(a1,b1))):is(apb1,pl(a1,b1))
-t14:=isp1(cut,[t:cut]natrp(t),pl(a1,b1),apb1,t10,t13):natrp(apb1)
-t15:=andi(posd(pd(a,b)),[t:posd(pd(a,b))]natrp(apb1(t)),pp,[t:posd(pd(a,b))]t14(t,p,q)):natd(pd(a,b))
-t16:=natintd(pd(a,b),t15):intd(pd(a,b))
-p@[n:negd(b)]
-t17:=satzd176c(b,n):posd(m0d(b))
-b2:=rpofpd(m0d(b),t17):cut
-t18:=eqpd2(b,m0d(m0d(b)),a,satzd177a(b)):eq(pd(a,b),md(a,m0d(b)))
-t19:=eqposd(pd(a,b),md(a,m0d(b)),t18,pp):posd(md(a,m0d(b)))
-t20:=satzd182a(a,m0d(b),t19):mored(a,m0d(b))
-t21:=eqmored12(a,pdofrp(a1),m0d(b),pdofrp(b2),eqpdrp1(a,p),eqpdrp1(m0d(b),t17),t20):mored(pdofrp(a1),pdofrp(b2))
-t22:=lemmaivad3(a1,b2,t21):more(a1,b2)
-t23:=natmn(a1,t9(a,i,p),b2,t9(m0d(b),intm0d(b,j),t17),t22):natrp(mn(a1,b2,t22))
-t24:=eqpd12(m0d(b),pdofrp(b2),pd(a,b),pdofrp(apb1),eqpdrp1(m0d(b),t17),eqpdrp1(pd(a,b),pp)):eq(pd(m0d(b),pd(a,b)),pd(pdofrp(b2),pdofrp(apb1)))
-t25:=tr4eq(a,md(pd(a,b),b),pd(m0d(b),pd(a,b)),pd(pdofrp(b2),pdofrp(apb1)),pdofrp(pl(b2,apb1)),symeq(md(pd(a,b),b),a,mdpd(a,b)),compd(pd(a,b),m0d(b)),t24,lemmaivad1(b2,apb1)):eq(a,pdofrp(pl(b2,apb1)))
-t26:=tris2(cut,pl(b2,apb1),a1,rpofpd(pdofrp(pl(b2,apb1)),posdirp(pl(b2,apb1))),isrppd1(pl(b2,apb1)),eqpderp(a,p,pdofrp(pl(b2,apb1)),posdirp(pl(b2,apb1)),t25)):is(pl(b2,apb1),a1)
-t27:=satz140g(a1,b2,apb1,t22,t26):is(apb1,mn(a1,b2,t22))
-t28:=isp1(cut,[t:cut]natrp(t),mn(a1,b2,t22),apb1,t23,t27):natrp(apb1)
-t29:=andi(posd(pd(a,b)),[t:posd(pd(a,b))]natrp(apb1(t)),pp,[t:posd(pd(a,b))]t28(t,p,n)):natd(pd(a,b))
-t30:=natintd(pd(a,b),t29):intd(pd(a,b))
-p@t31:=rappd(b,intd(pd(a,b)),[t:posd(b)]t16(t),[t:zero(b)]t8(t),[t:negd(b)]t30(t)):intd(pd(a,b))
-pp@[n:negd(a)]
-t31a:=th3"l.imp"(negd(b),negd(pd(a,b)),pnotnd(pd(a,b),pp),[t:negd(b)]npd(a,b,n,t)):not(negd(b))
-t32:=th3"l.imp"(zero(b),negd(pd(a,b)),pnotnd(pd(a,b),pp),[t:zero(b)]eqnegd(a,pd(a,b),symeq(pd(a,b),a,pd02(a,b,t)),n)):not(zero(b))
-t33:=or3e2(zero(b),posd(b),negd(b),axrdo(b),t31a,t32):posd(b)
-t34:=eqposd(pd(a,b),pd(b,a),compd(a,b),pp):posd(pd(b,a))
-t35:=t30(b,a,j,i,t34,t33,n):intd(pd(b,a))
-t36:=eqintd(pd(b,a),pd(a,b),compd(b,a),t35):intd(pd(a,b))
-pp@t37:=rappd(a,intd(pd(a,b)),[t:posd(a)]t31(t),[t:zero(a)]t6(t),[t:negd(a)]t36(t)):intd(pd(a,b))
-j@[0p:zero(pd(a,b))]
-t38:=intdi0(pd(a,b),0p):intd(pd(a,b))
-j@[np:negd(pd(a,b))]
-t39:=satzd176c(pd(a,b),np):posd(m0d(pd(a,b)))
-t40:=eqposd(m0d(pd(a,b)),pd(m0d(a),m0d(b)),satzd180(a,b),t39):posd(pd(m0d(a),m0d(b)))
-t41:=t37(m0d(a),m0d(b),intm0d(a,i),intm0d(b,j),t40):intd(pd(m0d(a),m0d(b)))
-t42:=eqintd(pd(m0d(a),m0d(b)),m0d(pd(a,b)),satzd180a(a,b),t41):intd(m0d(pd(a,b)))
-t43:=intm0d(m0d(pd(a,b)),t42):intd(m0d(m0d(pd(a,b))))
-t44:=eqintd(m0d(m0d(pd(a,b))),pd(a,b),satzd177(pd(a,b)),t43):intd(pd(a,b))
--intd
-j@intpd:=rappd(pd(a,b),intd(pd(a,b)),[t:posd(pd(a,b))]t37".intd"(t),[t:zero(pd(a,b))]t38".intd"(t),[t:negd(pd(a,b))]t44".intd"(t)):intd(pd(a,b))
-intmd:=intpd(a,m0d(b),i,intm0d(b,j)):intd(md(a,b))
-+*intd
-j@[n:not(zero(td(a,b)))]
-t45:=th3"l.imp"(zero(a),zero(td(a,b)),n,[t:zero(a)]td01(a,b,t)):not(zero(a))
-t46:=th3"l.imp"(zero(b),zero(td(a,b)),n,[t:zero(b)]td02(a,b,t)):not(zero(b))
-t47:=satzd166e(a,t45):posd(absd(a))
-a3:=rpofpd(absd(a),t47):cut
-t48:=satzd166e(b,t46):posd(absd(b))
-b3:=rpofpd(absd(b),t48):cut
-t49:=natts(a3,t9(absd(a),intabsd(a,i),t47),b3,t9(absd(b),intabsd(b,j),t48)):natrp(ts(a3,b3))
-t50:=satzd166e(td(a,b),n):posd(absd(td(a,b)))
-[p:posd(absd(td(a,b)))]
-atb3:=rpofpd(absd(td(a,b)),p):cut
-t51:=eqtd12(absd(a),pdofrp(a3),absd(b),pdofrp(b3),eqpdrp1(absd(a),t47),eqpdrp1(absd(b),t48)):eq(td(absd(a),absd(b)),td(pdofrp(a3),pdofrp(b3)))
-t52:=tr3eq(absd(td(a,b)),td(absd(a),absd(b)),td(pdofrp(a3),pdofrp(b3)),pdofrp(ts(a3,b3)),satzd193(a,b),t51,lemmaivad2(a3,b3)):eq(absd(td(a,b)),pdofrp(ts(a3,b3)))
-t53:=tris2(cut,atb3,ts(a3,b3),rpofpd(pdofrp(ts(a3,b3)),posdirp(ts(a3,b3))),eqpderp(absd(td(a,b)),p,pdofrp(ts(a3,b3)),posdirp(ts(a3,b3)),t52),isrppd1(ts(a3,b3))):is(atb3,ts(a3,b3))
-t54:=isp1(cut,[t:cut]natrp(t),ts(a3,b3),atb3,t49,t53):natrp(atb3)
-n@t55:=andi(posd(absd(td(a,b))),[t:posd(absd(td(a,b)))]natrp(atb3(t)),t50,[t:posd(absd(td(a,b)))]t54(t)):natd(absd(td(a,b)))
--intd
-j@inttd:=[t:not(zero(td(a,b)))]t55".intd"(t):intd(td(a,b))
-+r
-@eq:=[x:dif][y:dif]eq"rp"(x,y):[x:dif][y:dif]'prop'
-refeq:=[x:dif]refeq"rp"(x):[x:dif]<x><x>eq
-symeq:=[x:dif][y:dif][t:<y><x>eq]symeq"rp"(x,y,t):[x:dif][y:dif][t:<y><x>eq]<x><y>eq
-treq:=[x:dif][y:dif][z:dif][t:<y><x>eq][u:<z><y>eq]treq"rp"(x,y,z,t,u):[x:dif][y:dif][z:dif][t:<y><x>eq][u:<z><y>eq]<z><x>eq
-[a:dif][s:set(dif)]
-inn:=esti(dif,a,s):'prop'
-@real:=ect"eq"(dif,eq,refeq,symeq,treq):'type'
-[r:real][s:real]
-is:=is"e"(real,r,s):'prop'
-nis:=not(is(r,s)):'prop'
-@[p:[x:real]'prop']
-some:=some"l"(real,p):'prop'
-all:=all"l"(real,p):'prop'
-one:=one"e"(real,p):'prop'
-r@[s0:set(real)]
-in:=esti(real,r,s0):'prop'
-a@realof:=ectelt"eq"(dif,eq,refeq,symeq,treq,a):real
-r@class:=ecect"eq"(dif,eq,refeq,symeq,treq,r):set(dif)
-a@innclass:=th5"eq.4"(dif,eq,refeq,symeq,treq,a):inn(a,class(realof(a)))
-r@[a:dif][b:dif][e:eq"rp"(a,b)][air:inn(a,class(r))]
-eqinn:=th8"eq.4"(dif,eq,refeq,symeq,treq,r,a,air,b,e):inn(b,class(r))
-r@[p:'prop'][p1:[x:dif][xi:inn(x,class(r))]p]
-realapp1:=th3"eq.4"(dif,eq,refeq,symeq,treq,r,p,p1):p
-r@[s:real][p:'prop'][p1:[x:dif][y:dif][xi:inn(x,class(r))][yi:inn(y,class(s))]p]
-+ivr1
-[a:dif][air:inn(a,class(r))]
-t1:=realapp1(s,p,[y:dif]<air><y><a>p1):p
--ivr1
-realapp2:=realapp1(r,p,[x:dif][xi:inn(x,class(r))]t1".ivr1"(x,xi)):p
-s@[t:real][p:'prop'][p1:[x:dif][y:dif][z:dif][xi:inn(x,class(r))][yi:inn(y,class(s))][zi:inn(z,class(t))]p]
-+*ivr1
-p1@[a:dif][air:inn(a,class(r))]
-t2:=realapp2(s,t,p,[y:dif][z:dif]<air><z><y><a>p1):p
--ivr1
-p1@realapp3:=realapp1(r,p,[x:dif][xi:inn(x,class(r))]t2".ivr1"(x,xi)):p
-t@[u:real][p:'prop'][p1:[x:dif][y:dif][z:dif][v:dif][xi:inn(x,class(r))][yi:inn(y,class(s))][zi:inn(z,class(t))][vi:inn(v,class(u))]p]
-+*ivr1
-p1@[a:dif][air:inn(a,class(r))]
-t3:=realapp3(s,t,u,p,[y:dif][z:dif][v:dif]<air><v><z><y><a>p1):p
--ivr1
-p1@realapp4:=realapp1(r,p,[x:dif][xi:inn(x,class(r))]t3".ivr1"(x,xi)):p
-s@[a1:dif][b1:dif][a1ir:inn(a1,class(r))][b1is:inn(b1,class(s))][e:eq"rp"(a1,b1)]
-isin:=th3"eq.5"(dif,eq,refeq,symeq,treq,r,s,a1,a1ir,b1,b1is,e):is(r,s)
-b1is@[i:is(r,s)]
-isex:=th5"eq.5"(dif,eq,refeq,symeq,treq,r,s,a1,a1ir,b1,b1is,i):eq"rp"(a1,b1)
-b1is@[n:not(eq"rp"(a1,b1))]
-nisin:=th3"l.imp"(is(r,s),eq"rp"(a1,b1),n,[t:is(r,s)]isex(t)):nis(r,s)
-b1is@[n:nis(r,s)]
-nisex:=th3"l.imp"(eq"rp"(a1,b1),is(r,s),n,[t:eq"rp"(a1,b1)]isin(t)):not(eq"rp"(a1,b1))
-@[alpha:'type'][f:[x:dif]alpha]
-fixf:=fixfu"eq"(dif,eq,refeq,symeq,treq,alpha,f):'prop'
-[ff:fixf(alpha,f)][r0:real]
-indreal:=indeq"eq"(dif,eq,refeq,symeq,treq,alpha,f,ff,r0):alpha
-[a:dif][air:inn(a,class(r0))]
-isindreal:=th2"eq.10"(dif,eq,refeq,symeq,treq,alpha,f,ff,r0,a,air):is"e"(alpha,<a>f,indreal)
-alpha@[g:[x:dif][y:dif]alpha]
-fixf2:=fixfu2"eq"(dif,eq,refeq,symeq,treq,alpha,g):'prop'
-[ff2:fixf2(alpha,g)][r0:real][s0:real]
-indreal2:=indeq2"eq"(dif,eq,refeq,symeq,treq,alpha,g,ff2,r0,s0):alpha
-[a:dif][b:dif][air:inn(a,class(r0))][bis:inn(b,class(s0))]
-isindreal2:=th1"eq.11"(dif,eq,refeq,symeq,treq,alpha,g,ff2,r0,s0,a,air,b,bis):is"e"(alpha,<b><a>g,indreal2)
-@0:=realof(df(1rp,1rp)):real
-r@[a0:dif][a0ir:inn(a0,class(r))][z:zero(a0)]
-0in:=isin(r,0,a0,df(1rp,1rp),a0ir,innclass(df(1rp,1rp)),zeroeq(a0,df(1rp,1rp),z,zeroi(1rp,1rp,refis(cut,1rp)))):is(r,0)
-a0ir@[i:is(r,0)]
-0ex:=eqzero(df(1rp,1rp),a0,isex(0,r,df(1rp,1rp),a0,innclass(df(1rp,1rp)),a0ir,symis(real,r,0,i)),tris(cut,stm(df(1rp,1rp)),1rp,std(df(1rp,1rp)),stmis(1rp,1rp),isstd(1rp,1rp))):zero(a0)
-+*ivr1
-a0@propp:=and(inn(a0,class(r)),posd(a0)):'prop'
--ivr1
-r@pos:=some"l"(dif,[x:dif]propp".ivr1"(x)):'prop'
-a0ir@[p:posd(a0)]
-+*ivr1
-p@t4:=andi(inn(a0,class(r)),posd(a0),a0ir,p):propp(a0)
--ivr1
-p@posin:=somei(dif,[x:dif]propp".ivr1"(x),a0,t4".ivr1"):pos(r)
-a0ir@[p:pos(r)]
-+*ivr1
-p@[a:dif][q1:propp(a)]
-t5:=ande1(inn(a,class(r)),posd(a),q1):inn(a,class(r))
-t6:=ande2(inn(a,class(r)),posd(a),q1):posd(a)
-t7:=eqposd(a,a0,isex(r,r,a,a0,t5,a0ir,refis(real,r)),t6):posd(a0)
--ivr1
-p@posex:=someapp(dif,[x:dif]propp".ivr1"(x),p,posd(a0),[x:dif][t:propp".ivr1"(x)]t7".ivr1"(x,t)):posd(a0)
-+*ivr1
-a0@propn:=and(inn(a0,class(r)),negd(a0)):'prop'
--ivr1
-r@neg:=some"l"(dif,[x:dif]propn".ivr1"(x)):'prop'
-a0ir@[n:negd(a0)]
-+*ivr1
-n@t8:=andi(inn(a0,class(r)),negd(a0),a0ir,n):propn(a0)
--ivr1
-n@negin:=somei(dif,[x:dif]propn".ivr1"(x),a0,t8".ivr1"):neg(r)
-a0ir@[n:neg(r)]
-+*ivr1
-n@[a:dif][pl:propn(a)]
-t9:=ande1(inn(a,class(r)),negd(a),pl):inn(a,class(r))
-t10:=ande2(inn(a,class(r)),negd(a),pl):negd(a)
-t11:=eqnegd(a,a0,isex(r,r,a,a0,t9,a0ir,refis(real,r)),t10):negd(a0)
--ivr1
-n@negex:=someapp(dif,[x:dif]propn".ivr1"(x),n,negd(a0),[x:dif][t:propn".ivr1"(x)]t11".ivr1"(x,t)):negd(a0)
-+*ivr1
-a0ir@[p:posd(a0)]
-t12:=or3i2(is(r,0),pos(r),neg(r),posin(p)):or3(is(r,0),pos(r),neg(r))
-a0ir@[z:zero(a0)]
-t13:=or3i1(is(r,0),pos(r),neg(r),0in(z)):or3(is(r,0),pos(r),neg(r))
-a0ir@[n:negd(a0)]
-t14:=or3i3(is(r,0),pos(r),neg(r),negin(n)):or3(is(r,0),pos(r),neg(r))
-a0ir@t15:=rappd(a0,or3(is(r,0),pos(r),neg(r)),[t:posd(a0)]t12(t),[t:zero(a0)]t13(t),[t:negd(a0)]t14(t)):or3(is(r,0),pos(r),neg(r))
--ivr1
-r@axrlo:=realapp1(r,or3(is(r,0),pos(r),neg(r)),[x:dif][xi:inn(x,class(r))]t15".ivr1"(x,xi)):or3(is(r,0),pos(r),neg(r))
-+*ivr1
-a0ir@[i:is(r,0)]
-t16:=th3"l.imp"(pos(r),posd(a0),0notpd(a0,0ex(i)),[t:pos(r)]posex(t)):not(pos(r))
-a0ir@[p:pos(r)]
-t17:=th3"l.imp"(neg(r),negd(a0),pnotnd(a0,posex(p)),[t:neg(r)]negex(t)):not(neg(r))
-a0ir@[n:neg(r)]
-t18:=th3"l.imp"(is(r,0),zero(a0),nnot0d(a0,negex(n)),[t:is(r,0)]0ex(t)):not(is(r,0))
-a0ir@t19:=th6"l.ec3"(is(r,0),pos(r),neg(r),[t:is(r,0)]t16(t),[t:pos(r)]t17(t),[t:neg(r)]t18(t)):ec3(is(r,0),pos(r),neg(r))
--ivr1
-r@axrle:=realapp1(r,ec3(is(r,0),pos(r),neg(r)),[x:dif][xi:inn(x,class(r))]t19".ivr1"(x,xi)):ec3(is(r,0),pos(r),neg(r))
-axrl:=orec3i(is(r,0),pos(r),neg(r),axrlo,axrle):orec3(is(r,0),pos(r),neg(r))
-[p:'prop'][p1:[t:pos(r)]p][p2:[t:is(r,0)]p][p3:[t:neg(r)]p]
-rapp:=or3app(is(r,0),pos(r),neg(r),p,axrlo,p2,p1,p3):p
-r@[p:pos(r)]
-pnotn:=ec3e23(is(r,0),pos(r),neg(r),axrle,p):not(neg(r))
-pnot0:=ec3e21(is(r,0),pos(r),neg(r),axrle,p):nis(r,0)
-r@[i:is(r,0)]
-0notp:=ec3e12(is(r,0),pos(r),neg(r),axrle,i):not(pos(r))
-0notn:=ec3e13(is(r,0),pos(r),neg(r),axrle,i):not(neg(r))
-r@[n:neg(r)]
-nnotp:=ec3e32(is(r,0),pos(r),neg(r),axrle,n):not(pos(r))
-nnot0:=ec3e31(is(r,0),pos(r),neg(r),axrle,n):nis(r,0)
-s@[i:is(r,s)][p:pos(r)]
-ispos:=isp(real,[x:real]pos(x),r,s,p,i):pos(s)
-i@[n:neg(r)]
-isneg:=isp(real,[x:real]neg(x),r,s,n,i):neg(s)
-@[r0:cut]
-pofrp:=realof(pdofrp(r0)):real
-nofrp:=realof(ndofrp(r0)):real
-[s0:cut][i:is"rp"(r0,s0)]
-isrpep:=isf(cut,real,[x:cut]pofrp(x),r0,s0,i):is(pofrp(r0),pofrp(s0))
-isrpen:=isf(cut,real,[x:cut]nofrp(x),r0,s0,i):is(nofrp(r0),nofrp(s0))
-s0@[i:is(pofrp(r0),pofrp(s0))]
-+*ivr1
-i"r"@t20:=isex(pofrp(r0),pofrp(s0),pdofrp(r0),pdofrp(s0),innclass(pdofrp(r0)),innclass(pdofrp(s0)),i):eq"rp"(pdofrp(r0),pdofrp(s0))
--ivr1
-i@isrpip:=isrpipd(r0,s0,t20".ivr1"):is"rp"(r0,s0)
-s0@[i:is(nofrp(r0),nofrp(s0))]
-+*ivr1
-i"r"@t21:=isex(nofrp(r0),nofrp(s0),ndofrp(r0),ndofrp(s0),innclass(ndofrp(r0)),innclass(ndofrp(s0)),i):eq"rp"(ndofrp(r0),ndofrp(s0))
--ivr1
-i@isrpin:=isrpind(r0,s0,t21".ivr1"):is"rp"(r0,s0)
-r0@posi:=posin(pofrp(r0),pdofrp(r0),innclass(pdofrp(r0)),posdirp(r0)):pos(pofrp(r0))
-negi:=negin(nofrp(r0),ndofrp(r0),innclass(ndofrp(r0)),negdirp(r0)):neg(nofrp(r0))
-s@[r0:cut][s0:cut][i:is(r,pofrp(r0))][j:is(s,pofrp(s0))][k:is(r,s)]
-+*ivr1
-k@t22:=isrpip(r0,s0,tr3is(real,pofrp(r0),r,s,pofrp(s0),symis(real,r,pofrp(r0),i),k,j)):is"rp"(r0,s0)
-r@t23:=[x:cut][y:cut][t:is(r,pofrp(x))][u:is(r,pofrp(y))]t22(r,r,x,y,t,u,refis(real,r)):amone(cut,[x:cut]is(r,pofrp(x)))
-a0ir@[p1:pos(r)]
-t24:=posex(p1):posd(a0)
-pr:=rpofpd(a0,t24):cut
-t25:=isin(r,pofrp(pr),a0,pdofrp(pr),a0ir,innclass(pdofrp(pr)),eqpdrp1(a0,t24)):is(r,pofrp(pr))
-t26:=somei(cut,[x:cut]is(r,pofrp(x)),pr,t25):some"rp"([x:cut]is(r,pofrp(x)))
--ivr1
-r@[p:pos(r)]
-+*ivr1
-p"r"@t27:=realapp1(some"rp"([x:cut]is(r,pofrp(x))),[x:dif][t:inn(x,class(r))]t26(x,t,p)):some"rp"([x:cut]is(r,pofrp(x)))
-t28:=onei(cut,[x:cut]is(r,pofrp(x)),t23,t27):one"rp"([x:cut]is(r,pofrp(x)))
--ivr1
-p@rpofp:=ind(cut,[x:cut]is(r,pofrp(x)),t28".ivr1"):cut
-isprp1:=oneax(cut,[x:cut]is(r,pofrp(x)),t28".ivr1"):is(r,pofrp(rpofp(r,p)))
-isprp2:=symis(real,r,pofrp(rpofp(r,p)),isprp1):is(pofrp(rpofp(r,p)),r)
-@[r1:real][p:pos(r1)][s1:real][q:pos(s1)][i:is(r1,s1)]
-isperp:=t22".ivr1"(r1,s1,rpofp(r1,p),rpofp(s1,q),isprp1(r1,p),isprp1(s1,q),i):is"rp"(rpofp(r1,p),rpofp(s1,q))
-q@[i:is"rp"(rpofp(r1,p),rpofp(s1,q))]
-ispirp:=tr3is(real,r1,pofrp(rpofp(r1,p)),pofrp(rpofp(s1,q)),s1,isprp1(r1,p),isrpep(rpofp(r1,p),rpofp(s1,q),i),isprp2(s1,q)):is(r1,s1)
-@[r0:cut]
-isrpp1:=t22".ivr1"(pofrp(r0),pofrp(r0),r0,rpofp(pofrp(r0),posi(r0)),refis(real,pofrp(r0)),isprp1(pofrp(r0),posi(r0)),refis(real,pofrp(r0))):is"rp"(r0,rpofp(pofrp(r0),posi(r0)))
-isrpp2:=symis(cut,r0,rpofp(pofrp(r0),posi(r0)),isrpp1):is"rp"(rpofp(pofrp(r0),posi(r0)),r0)
-s@[r0:cut][s0:cut][i:is(r,nofrp(r0))][j:is(s,nofrp(s0))][k:is(r,s)]
-+*ivr1
-k@t29:=isrpin(r0,s0,tr3is(real,nofrp(r0),r,s,nofrp(s0),symis(real,r,nofrp(r0),i),k,j)):is"rp"(r0,s0)
-r@t30:=[x:cut][y:cut][t:is(r,nofrp(x))][u:is(r,nofrp(y))]t29(r,r,x,y,t,u,refis(real,r)):amone(cut,[x:cut]is(r,nofrp(x)))
-a0ir@[n1:neg(r)]
-t31:=negex(n1):negd(a0)
-nr:=rpofnd(a0,t31):cut
-t32:=isin(r,nofrp(nr),a0,ndofrp(nr),a0ir,innclass(ndofrp(nr)),eqndrp1(a0,t31)):is(r,nofrp(nr))
-t33:=somei(cut,[x:cut]is(r,nofrp(x)),nr,t32):some"rp"([x:cut]is(r,nofrp(x)))
--ivr1
-r@[n:neg(r)]
-+*ivr1
-n"r"@t34:=realapp1(some"rp"([x:cut]is(r,nofrp(x))),[x:dif][t:inn(x,class(r))]t33(x,t,n)):some"rp"([x:cut]is(r,nofrp(x)))
-t35:=onei(cut,[x:cut]is(r,nofrp(x)),t30,t34):one"rp"([x:cut]is(r,nofrp(x)))
--ivr1
-n@rpofn:=ind(cut,[x:cut]is(r,nofrp(x)),t35".ivr1"):cut
-isnrp1:=oneax(cut,[x:cut]is(r,nofrp(x)),t35".ivr1"):is(r,nofrp(rpofn(r,n)))
-isnrp2:=symis(real,r,nofrp(rpofn(r,n)),isnrp1):is(nofrp(rpofn(r,n)),r)
-@[r1:real][n:neg(r1)][s1:real][m:neg(s1)][i:is(r1,s1)]
-isnerp:=t29".ivr1"(r1,s1,rpofn(r1,n),rpofn(s1,m),isnrp1(r1,n),isnrp1(s1,m),i):is"rp"(rpofn(r1,n),rpofn(s1,m))
-m@[i:is"rp"(rpofn(r1,n),rpofn(s1,m))]
-isnirp:=tr3is(real,r1,nofrp(rpofn(r1,n)),nofrp(rpofn(s1,m)),s1,isnrp1(r1,n),isrpen(rpofn(r1,n),rpofn(s1,m),i),isnrp2(s1,m)):is(r1,s1)
-@[r0:cut]
-isrpn1:=t29".ivr1"(nofrp(r0),nofrp(r0),r0,rpofn(nofrp(r0),negi(r0)),refis(real,nofrp(r0)),isnrp1(nofrp(r0),negi(r0)),refis(real,nofrp(r0))):is"rp"(r0,rpofn(nofrp(r0),negi(r0)))
-isrpn2:=symis(cut,r0,rpofn(nofrp(r0),negi(r0)),isrpn1):is"rp"(rpofn(nofrp(r0),negi(r0)),r0)
-r@satz163:=refis(real,r):is(r,r)
-s@[i:is(r,s)]
-satz164:=symis(real,r,s,i):is(s,r)
-t@[i:is(r,s)][j:is(s,t)]
-satz165:=tris(real,r,s,t,i,j):is(r,t)
-@absdr:=[x:dif]realof(absd(x)):[x:dif]real
-+ivr2
-[a:dif][b:dif][e:eq"rp"(a,b)]
-t1:=isin(realof(absd(a)),realof(absd(b)),absd(a),absd(b),innclass(absd(a)),innclass(absd(b)),eqabsd(a,b,e)):is(<a>absdr,<b>absdr)
--ivr2
-fabsdr:=[x:dif][y:dif][t:<y><x>eq]t1".ivr2"(x,y,t):fixf(real,absdr)
-r@abs:=indreal(real,absdr,fabsdr,r):real
-+*ivr2
-a0ir@t2:=isindreal(real,absdr,fabsdr,r,a0,a0ir):is(realof(absd(a0)),abs(r))
--ivr2
-a0ir@aica:=isp(real,[x:real]inn(absd(a0),class(x)),realof(absd(a0)),abs(r),innclass(absd(a0)),t2".ivr2"):inn(absd(a0),class(abs(r)))
-s@[i:is(r,s)]
-isabs:=isf(real,real,[x:real]abs(x),r,s,i):is(abs(r),abs(s))
-+2r166
-a0ir@[p:pos(r)]
-t1:=satzd166a(a0,posex(p)):posd(absd(a0))
-t2:=posin(abs(r),absd(a0),aica,t1):pos(abs(r))
--2r166
-r@[p:pos(r)]
-satz166a:=realapp1(pos(abs(r)),[x:dif][t:inn(x,class(r))]t2".2r166"(x,t,p)):pos(abs(r))
-+*2r166
-a0ir@[n:neg(r)]
-t3:=satzd166b(a0,negex(n)):posd(absd(a0))
-t4:=posin(abs(r),absd(a0),aica,t3):pos(abs(r))
--2r166
-r@[n:neg(r)]
-satz166b:=realapp1(pos(abs(r)),[x:dif][t:inn(x,class(r))]t4".2r166"(x,t,n)):pos(abs(r))
-+*2r166
-b1is@[p:pos(r)][q:pos(s)][i:is(abs(r),abs(s))]
-t5:=satzd166c(a1,b1,posex(r,a1,a1ir,p),posex(s,b1,b1is,q),isex(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is),i)):eq"rp"(a1,b1)
-t6:=isin(t5):is(r,s)
--2r166
-s@[p:pos(r)][q:pos(s)][i:is(abs(r),abs(s))]
-satz166c:=realapp2(is(r,s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".2r166"(x,y,t,u,p,q,i)):is(r,s)
-+*2r166
-b1is@[n:neg(r)][o:neg(s)][i:is(abs(r),abs(s))]
-t7:=satzd166d(a1,b1,negex(r,a1,a1ir,n),negex(s,b1,b1is,o),isex(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is),i)):eq"rp"(a1,b1)
-t8:=isin(t7):is(r,s)
--2r166
-s@[n:neg(r)][o:neg(s)][i:is(abs(r),abs(s))]
-satz166d:=realapp2(is(r,s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t8".2r166"(x,y,t,u,n,o,i)):is(r,s)
-r@[n:nis(r,0)]
-satz166e:=rapp(r,pos(abs(r)),[t:pos(r)]satz166a(t),th2"l.imp"(is(r,0),pos(abs(r)),n),[t:neg(r)]satz166b(t)):pos(abs(r))
-+*2r166
-a0ir@[i:is(r,0)]
-t9:=satzd166f(a0,0ex(i)):zero(absd(a0))
-t10:=0in(abs(r),absd(a0),aica,t9):is(abs(r),0)
--2r166
-r@[i:is(r,0)]
-satz166f:=realapp1(is(abs(r),0),[x:dif][t:inn(x,class(r))]t10".2r166"(x,t,i)):is(abs(r),0)
-s@more:=some"l"(dif,[x:dif]some"l"(dif,[y:dif]and3(inn(x,class(r)),inn(y,class(s)),mored(x,y)))):'prop'
-+*ivr2
-b1@propm:=and3(inn(a1,class(r)),inn(b1,class(s)),mored(a1,b1)):'prop'
--ivr2
-b1is@[m:mored(a1,b1)]
-+*ivr2
-m@t3:=and3i(inn(a1,class(r)),inn(b1,class(s)),mored(a1,b1),a1ir,b1is,m):propm(a1,b1)
-t4:=somei(dif,[x:dif]propm(a1,x),b1,t3):some"l"(dif,[x:dif]propm(a1,x))
--ivr2
-m@morein:=somei(dif,[x:dif]some"l"(dif,[y:dif]propm".ivr2"(x,y)),a1,t4".ivr2"):more(r,s)
-b1is@[m:more(r,s)]
-+*ivr2
-m@[a:dif][sa:some"l"(dif,[x:dif]propm(a,x))][b:dif][p2:propm(a,b)]
-t5:=and3e1(inn(a,class(r)),inn(b,class(s)),mored(a,b),p2):inn(a,class(r))
-t6:=and3e2(inn(a,class(r)),inn(b,class(s)),mored(a,b),p2):inn(b,class(s))
-t7:=and3e3(inn(a,class(r)),inn(b,class(s)),mored(a,b),p2):mored(a,b)
-t8:=eqmored12(a,a1,b,b1,isex(r,r,a,a1,t5,a1ir,refis(real,r)),isex(s,s,b,b1,t6,b1is,refis(real,s)),t7):mored(a1,b1)
-sa@t9:=someapp(dif,[x:dif]propm(a,x),sa,mored(a1,b1),[x:dif][t:propm(a,x)]t8(x,t)):mored(a1,b1)
--ivr2
-m@moreex:=someapp(dif,[x:dif]some"l"(dif,[y:dif]propm".ivr2"(x,y)),m,mored(a1,b1),[x:dif][t:some"l"(dif,[y:dif]propm".ivr2"(x,y))]t9".ivr2"(x,t)):mored(a1,b1)
-s@less:=some"l"(dif,[x:dif]some"l"(dif,[y:dif]and3(inn(x,class(r)),inn(y,class(s)),lessd(x,y)))):'prop'
-+*ivr2
-b1@propl:=and3(inn(a1,class(r)),inn(b1,class(s)),lessd(a1,b1)):'prop'
--ivr2
-b1is@[l:lessd(a1,b1)]
-+*ivr2
-l@t10:=and3i(inn(a1,class(r)),inn(b1,class(s)),lessd(a1,b1),a1ir,b1is,l):propl(a1,b1)
-t11:=somei(dif,[x:dif]propl(a1,x),b1,t10):some"l"(dif,[x:dif]propl(a1,x))
--ivr2
-l@lessin:=somei(dif,[x:dif]some"l"(dif,[y:dif]propl".ivr2"(x,y)),a1,t11".ivr2"):less(r,s)
-b1is@[l:less(r,s)]
-+*ivr2
-l@[a:dif][sa:some"l"(dif,[x:dif]propl(a,x))][b:dif][p2:propl(a,b)]
-t12:=and3e1(inn(a,class(r)),inn(b,class(s)),lessd(a,b),p2):inn(a,class(r))
-t13:=and3e2(inn(a,class(r)),inn(b,class(s)),lessd(a,b),p2):inn(b,class(s))
-t14:=and3e3(inn(a,class(r)),inn(b,class(s)),lessd(a,b),p2):lessd(a,b)
-t15:=eqlessd12(a,a1,b,b1,isex(r,r,a,a1,t12,a1ir,refis(real,r)),isex(s,s,b,b1,t13,b1is,refis(real,s)),t14):lessd(a1,b1)
-sa@t16:=someapp(dif,[x:dif]propl(a,x),sa,lessd(a1,b1),[x:dif][t:propl(a,x)]t15(x,t)):lessd(a1,b1)
--ivr2
-l@lessex:=someapp(dif,[x:dif]some"l"(dif,[y:dif]propl".ivr2"(x,y)),l,lessd(a1,b1),[x:dif][t:some"l"(dif,[y:dif]propl".ivr2"(x,y))]t16".ivr2"(x,t)):lessd(a1,b1)
-t@[i:is(r,s)][m:more(r,t)]
-ismore1:=isp(real,[x:real]more(x,t),r,s,m,i):more(s,t)
-i@[m:more(t,r)]
-ismore2:=isp(real,[x:real]more(t,x),r,s,m,i):more(t,s)
-i@[l:less(r,t)]
-isless1:=isp(real,[x:real]less(x,t),r,s,l,i):less(s,t)
-i@[l:less(t,r)]
-isless2:=isp(real,[x:real]less(t,x),r,s,l,i):less(t,s)
-u@[i:is(r,s)][j:is(t,u)][m:more(r,t)]
-ismore12:=ismore2(t,u,s,j,ismore1(r,s,t,i,m)):more(s,u)
-j@[l:less(r,t)]
-isless12:=isless2(t,u,s,j,isless1(r,s,t,i,l)):less(s,u)
-+*ivr2
-b1is@[m:more(r,s)]
-t17:=lemmad5(a1,b1,moreex(m)):lessd(b1,a1)
-t18:=lessin(s,r,b1,a1,b1is,a1ir,t17):less(s,r)
--ivr2
-s@[m:more(r,s)]
-lemma1:=realapp2(less(s,r),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t18".ivr2"(x,y,t,u,m)):less(s,r)
-+*ivr2
-b1is@[l:less(r,s)]
-t19:=lemmad6(a1,b1,lessex(l)):mored(b1,a1)
-t20:=morein(s,r,b1,a1,b1is,a1ir,t19):more(s,r)
--ivr2
-s@[l:less(r,s)]
-lemma2:=realapp2(more(s,r),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t20".ivr2"(x,y,t,u,l)):more(s,r)
-+2r167
-b1is@t1:=satzd167a(a1,b1):or3(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1))
-[e:eq"rp"(a1,b1)]
-t2:=or3i1(is(r,s),more(r,s),less(r,s),isin(e)):or3(is(r,s),more(r,s),less(r,s))
-b1is@[m:mored(a1,b1)]
-t3:=or3i2(is(r,s),more(r,s),less(r,s),morein(m)):or3(is(r,s),more(r,s),less(r,s))
-b1is@[l:lessd(a1,b1)]
-t4:=or3i3(is(r,s),more(r,s),less(r,s),lessin(l)):or3(is(r,s),more(r,s),less(r,s))
-b1is@t5:=or3app(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1),or3(is(r,s),more(r,s),less(r,s)),t1,[t:eq"rp"(a1,b1)]t2(t),[t:mored(a1,b1)]t3(t),[t:lessd(a1,b1)]t4(t)):or3(is(r,s),more(r,s),less(r,s))
-t6:=satzd167b(a1,b1):ec3(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1))
-[i:is(r,s)]
-t7:=th3"l.imp"(more(r,s),mored(a1,b1),ec3e12(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1),t6,isex(i)),[t:more(r,s)]moreex(t)):not(more(r,s))
-b1is@[m:more(r,s)]
-t8:=th3"l.imp"(less(r,s),lessd(a1,b1),ec3e23(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1),t6,moreex(m)),[t:less(r,s)]lessex(t)):not(less(r,s))
-b1is@[l:less(r,s)]
-t9:=th3"l.imp"(is(r,s),eq"rp"(a1,b1),ec3e31(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1),t6,lessex(l)),[t:is(r,s)]isex(t)):not(is(r,s))
-b1is@t10:=th6"l.ec3"(is(r,s),more(r,s),less(r,s),th1"l.ec"(is(r,s),more(r,s),[t:is(r,s)]t7(t)),th1"l.ec"(more(r,s),less(r,s),[t:more(r,s)]t8(t)),th1"l.ec"(less(r,s),is(r,s),[t:less(r,s)]t9(t))):ec3(is(r,s),more(r,s),less(r,s))
-t11:=orec3i(is(r,s),more(r,s),less(r,s),t5,t10):orec3(is(r,s),more(r,s),less(r,s))
--2r167
-s@satz167:=realapp2(orec3(is(r,s),more(r,s),less(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t11".2r167"(x,y,t,u)):orec3(is(r,s),more(r,s),less(r,s))
-satz167a:=orec3e1(is(r,s),more(r,s),less(r,s),satz167):or3(is(r,s),more(r,s),less(r,s))
-satz167b:=orec3e2(is(r,s),more(r,s),less(r,s),satz167):ec3(is(r,s),more(r,s),less(r,s))
-moreis:=or(more(r,s),is(r,s)):'prop'
-lessis:=or(less(r,s),is(r,s)):'prop'
-[m:moreis(r,s)]
-satz168a:=th9"l.or"(more(r,s),is(r,s),less(s,r),is(s,r),m,[t:more(r,s)]lemma1(t),[t:is(r,s)]symis(real,r,s,t)):lessis(s,r)
-s@[l:lessis(r,s)]
-satz168b:=th9"l.or"(less(r,s),is(r,s),more(s,r),is(s,r),l,[t:less(r,s)]lemma2(t),[t:is(r,s)]symis(real,r,s,t)):moreis(s,r)
-t@[i:is(r,s)][m:moreis(r,t)]
-ismoreis1:=isp(real,[x:real]moreis(x,t),r,s,m,i):moreis(s,t)
-i@[m:moreis(t,r)]
-ismoreis2:=isp(real,[x:real]moreis(t,x),r,s,m,i):moreis(t,s)
-i@[l:lessis(r,t)]
-islessis1:=isp(real,[x:real]lessis(x,t),r,s,l,i):lessis(s,t)
-i@[l:lessis(t,r)]
-islessis2:=isp(real,[x:real]lessis(t,x),r,s,l,i):lessis(t,s)
-u@[i:is(r,s)][j:is(t,u)][m:moreis(r,t)]
-ismoreis12:=ismoreis2(t,u,s,j,ismoreis1(r,s,t,i,m)):moreis(s,u)
-j@[l:lessis(r,t)]
-islessis12:=islessis2(t,u,s,j,islessis1(r,s,t,i,l)):lessis(s,u)
-s@[m:more(r,s)]
-moreisi1:=ori1(more(r,s),is(r,s),m):moreis(r,s)
-s@[l:less(r,s)]
-lessisi1:=ori1(less(r,s),is(r,s),l):lessis(r,s)
-s@[i:is(r,s)]
-moreisi2:=ori2(more(r,s),is(r,s),i):moreis(r,s)
-lessisi2:=ori2(less(r,s),is(r,s),i):lessis(r,s)
-b1is@[m:moreq(a1,b1)]
-moreisin:=orapp(mored(a1,b1),eq"rp"(a1,b1),moreis(r,s),m,[t:mored(a1,b1)]moreisi1(morein(t)),[t:eq"rp"(a1,b1)]moreisi2(isin(t))):moreis(r,s)
-b1is@[m:moreis(r,s)]
-moreisex:=orapp(more(r,s),is(r,s),moreq(a1,b1),m,[t:more(r,s)]moreqi1(a1,b1,moreex(t)),[t:is(r,s)]moreqi2(a1,b1,isex(t))):moreq(a1,b1)
-b1is@[l:lesseq(a1,b1)]
-lessisin:=orapp(lessd(a1,b1),eq"rp"(a1,b1),lessis(r,s),l,[t:lessd(a1,b1)]lessisi1(lessin(t)),[t:eq"rp"(a1,b1)]lessisi2(isin(t))):lessis(r,s)
-b1is@[l:lessis(r,s)]
-lessisex:=orapp(less(r,s),is(r,s),lesseq(a1,b1),l,[t:less(r,s)]lesseqi1(a1,b1,lessex(t)),[t:is(r,s)]lesseqi2(a1,b1,isex(t))):lesseq(a1,b1)
-s@[m:moreis(r,s)]
-satz167c:=th7"l.ec3"(is(r,s),more(r,s),less(r,s),satz167b,comor(more(r,s),is(r,s),m)):not(less(r,s))
-s@[l:lessis(r,s)]
-satz167d:=th9"l.ec3"(is(r,s),more(r,s),less(r,s),satz167b,l):not(more(r,s))
-s@[n:not(more(r,s))]
-satz167e:=th2"l.or3"(is(r,s),more(r,s),less(r,s),satz167a,n):lessis(r,s)
-s@[n:not(less(r,s))]
-s@[n:not(less(r,s))]
-satz167f:=comor(is(r,s),more(r,s),th3"l.or3"(is(r,s),more(r,s),less(r,s),satz167a,n)):moreis(r,s)
-s@[m:more(r,s)]
-satz167g:=th3"l.imp"(lessis(r,s),not(more(r,s)),weli(more(r,s),m),[t:lessis(r,s)]satz167d(t)):not(lessis(r,s))
-s@[l:less(r,s)]
-satz167h:=th3"l.imp"(moreis(r,s),not(less(r,s)),weli(less(r,s),l),[t:moreis(r,s)]satz167c(t)):not(moreis(r,s))
-s@[n:not(moreis(r,s))]
-satz167j:=or3e3(is(r,s),more(r,s),less(r,s),satz167a,th5"l.or"(more(r,s),is(r,s),n),th4"l.or"(more(r,s),is(r,s),n)):less(r,s)
-s@[n:not(lessis(r,s))]
-satz167k:=or3e2(is(r,s),more(r,s),less(r,s),satz167a,th4"l.or"(less(r,s),is(r,s),n),th5"l.or"(less(r,s),is(r,s),n)):more(r,s)
-r@[p:pos(r)]
-+2r169
-[a:dif][b:dif][air:inn(a,class(r))][bi0:inn(b,class(0))]
-t1:=satzd169a(a,b,0ex(0,b,bi0,refis(real,0)),posex(a,air,p)):mored(a,b)
-t2:=morein(r,0,a,b,air,bi0,t1):more(r,0)
--2r169
-satz169a:=realapp2(r,0,more(r,0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(0))]t2".2r169"(x,y,t,u)):more(r,0)
-r@[m:more(r,0)]
-+*2r169
-m@[a:dif][b:dif][air:inn(a,class(r))][bi0:inn(b,class(0))]
-t3:=satzd169b(a,b,0ex(0,b,bi0,refis(real,0)),moreex(r,0,a,b,air,bi0,m)):posd(a)
-t4:=posin(r,a,air,t3):pos(r)
--2r169
-m@satz169b:=realapp2(r,0,pos(r),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(0))]t4".2r169"(x,y,t,u)):pos(r)
-r@[n:neg(r)]
-+*2r169
-n@[a:dif][b:dif][air:inn(a,class(r))][bi0:inn(b,class(0))]
-t5:=satzd169c(a,b,0ex(0,b,bi0,refis(real,0)),negex(a,air,n)):lessd(a,b)
-t6:=lessin(r,0,a,b,air,bi0,t5):less(r,0)
--2r169
-n@satz169c:=realapp2(r,0,less(r,0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(0))]t6".2r169"(x,y,t,u)):less(r,0)
-r@[l:less(r,0)]
-+*2r169
-l@[a:dif][b:dif][air:inn(a,class(r))][bi0:inn(b,class(0))]
-t7:=satzd169d(a,b,0ex(0,b,bi0,refis(real,0)),lessex(r,0,a,b,air,bi0,l)):negd(a)
-t8:=negin(r,a,air,t7):neg(r)
--2r169
-l@satz169d:=realapp2(r,0,neg(r),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(0))]t8".2r169"(x,y,t,u)):neg(r)
-+2r170
-r@[a:dif][b:dif][air:inn(a,class(r))][bi0:inn(b,class(0))]
-t1:=satzd170(a,b,0ex(0,b,bi0,refis(real,0))):moreq(absd(a),b)
-t2:=moreisin(abs(r),0,absd(a),b,aica(r,a,air),bi0,t1):moreis(abs(r),0)
--2r170
-r@satz170:=realapp2(r,0,moreis(abs(r),0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(0))]t2".2r170"(x,y,t,u)):moreis(abs(r),0)
-satz170a:=th3"l.imp"(neg(abs(r)),less(abs(r),0),satz167c(abs(r),0,satz170),[t:neg(abs(r))]satz169c(abs(r),t)):not(neg(abs(r)))
-t@[l:less(r,s)][k:less(s,t)]
-+2r171
-[a:dif][b:dif][c:dif][air:inn(a,class(r))][bis:inn(b,class(s))][cit:inn(c,class(t))]
-t1:=satzd171(a,b,c,lessex(r,s,a,b,air,bis,l),lessex(s,t,b,c,bis,cit,k)):lessd(a,c)
-t2:=lessin(r,t,a,c,air,cit,t1):less(r,t)
--2r171
-satz171:=realapp3(r,s,t,less(r,t),[x:dif][y:dif][z:dif][w:inn(x,class(r))][u:inn(y,class(s))][v:inn(z,class(t))]t2".2r171"(x,y,z,w,u,v)):less(r,t)
-trless:=satz171:less(r,t)
-t@[m:more(r,s)][n:more(s,t)]
-trmore:=lemma2(t,r,trless(t,s,r,lemma1(s,t,n),lemma1(r,s,m))):more(r,t)
-t@[a2:dif][b2:dif][c2:dif][a2ir:inn(a2,class(r))][b2is:inn(b2,class(s))][c2it:inn(c2,class(t))]
-+2r172
-[l:lessis(r,s)][k:less(s,t)]
-t1:=satzd172a(a2,b2,c2,lessisex(a2,b2,a2ir,b2is,l),lessex(s,t,b2,c2,b2is,c2it,k)):lessd(a2,c2)
-t2:=lessin(r,t,a2,c2,a2ir,c2it,t1):less(r,t)
--2r172
-t@[l:lessis(r,s)][k:less(s,t)]
-satz172a:=realapp3(less(r,t),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".2r172"(x,y,z,u,v,w,l,k)):less(r,t)
-+*2r172
-c2it@[l:less(r,s)][k:lessis(s,t)]
-t3:=satzd172b(a2,b2,c2,lessex(a2,b2,a2ir,b2is,l),lessisex(s,t,b2,c2,b2is,c2it,k)):lessd(a2,c2)
-t4:=lessin(r,t,a2,c2,a2ir,c2it,t3):less(r,t)
--2r172
-t@[l:less(r,s)][k:lessis(s,t)]
-satz172b:=realapp3(less(r,t),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t4".2r172"(x,y,z,u,v,w,l,k)):less(r,t)
-t@[m:moreis(r,s)][n:more(s,t)]
-satz172c:=lemma2(t,r,satz172b(t,s,r,lemma1(s,t,n),satz168a(m))):more(r,t)
-t@[m:more(r,s)][n:moreis(s,t)]
-satz172d:=lemma2(t,r,satz172a(t,s,r,satz168a(s,t,n),lemma1(m))):more(r,t)
-+2r173
-c2it@[l:lessis(r,s)][k:lessis(s,t)]
-t1:=satzd173(a2,b2,c2,lessisex(a2,b2,a2ir,b2is,l),lessisex(s,t,b2,c2,b2is,c2it,k)):lesseq(a2,c2)
-t2:=lessisin(r,t,a2,c2,a2ir,c2it,t1):lessis(r,t)
--2r173
-t@[l:lessis(r,s)][k:lessis(s,t)]
-satz173:=realapp3(lessis(r,t),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".2r173"(x,y,z,u,v,w,l,k)):lessis(r,t)
-trlessis:=satz173:lessis(r,t)
-t@[m:moreis(r,s)][n:moreis(s,t)]
-trmoreis:=satz168b(t,r,trlessis(t,s,r,satz168a(s,t,n),satz168a(m))):moreis(r,t)
-r@ratrl:=some"l"(dif,[x:dif]and(inn(x,class(r)),ratd(x))):'prop'
-a0ir@[r1:ratd(a0)]
-+*ivr2
-r1@t21:=andi(inn(a0,class(r)),ratd(a0),a0ir,r1):and(inn(a0,class(r)),ratd(a0))
--ivr2
-r1@ratrlin:=somei(dif,[x:dif]and(inn(x,class(r)),ratd(x)),a0,t21".ivr2"):ratrl(r)
-a0ir@[rr:ratrl(r)]
-+*ivr2
-rr@[a:dif][b:and(inn(a,class(r)),ratd(a))]
-t22:=ande1(inn(a,class(r)),ratd(a),b):inn(a,class(r))
-t23:=ande2(inn(a,class(r)),ratd(a),b):ratd(a)
-t24:=eqratd(a,a0,isex(r,r,a,a0,t22,a0ir,refis(real,r)),t23):ratd(a0)
--ivr2
-rr@ratrlex:=someapp(dif,[x:dif]and(inn(x,class(r)),ratd(x)),rr,ratd(a0),[x:dif][t:and(inn(x,class(r)),ratd(x))]t24".ivr2"(x,t)):ratd(a0)
-r@irratrl:=not(ratrl(r)):'prop'
-@[r0:cut][rr:ratrp(r0)]
-remark2:=ratrlin(pofrp(r0),pdofrp(r0),innclass(pdofrp(r0)),remark2a(r0,rr)):ratrl(pofrp(r0))
-remark3:=ratrlin(nofrp(r0),ndofrp(r0),innclass(ndofrp(r0)),remark3a(r0,rr)):ratrl(nofrp(r0))
-r0@[ir:irratrp(r0)]
-remark4:=th3"l.imp"(ratrl(pofrp(r0)),ratd(pdofrp(r0)),remark4a(r0,ir),[t:ratrl(pofrp(r0))]ratrlex(pofrp(r0),pdofrp(r0),innclass(pdofrp(r0)),t)):irratrl(pofrp(r0))
-remark5:=th3"l.imp"(ratrl(nofrp(r0)),ratd(ndofrp(r0)),remark5a(r0,ir),[t:ratrl(nofrp(r0))]ratrlex(nofrp(r0),ndofrp(r0),innclass(ndofrp(r0)),t)):irratrl(nofrp(r0))
-r@natrl:=some"l"(dif,[x:dif]and(inn(x,class(r)),natd(x))):'prop'
-a0ir@[n:natd(a0)]
-+*ivr2
-n@t25:=andi(inn(a0,class(r)),natd(a0),a0ir,n):and(inn(a0,class(r)),natd(a0))
--ivr2
-n@natrlin:=somei(dif,[x:dif]and(inn(x,class(r)),natd(x)),a0,t25".ivr2"):natrl(r)
-a0ir@[n:natrl(r)]
-+*ivr2
-n@[a:dif][b:and(inn(a,class(r)),natd(a))]
-t26:=ande1(inn(a,class(r)),natd(a),b):inn(a,class(r))
-t27:=ande2(inn(a,class(r)),natd(a),b):natd(a)
-t28:=eqnatd(a,a0,isex(r,r,a,a0,t26,a0ir,refis(real,r)),t27):natd(a0)
--ivr2
-n@natrlex:=someapp(dif,[x:dif]and(inn(x,class(r)),natd(x)),n,natd(a0),[x:dif][t:and(inn(x,class(r)),natd(x))]t28".ivr2"(x,t)):natd(a0)
-+*ivr2
-a0ir@[n:natrl(r)]
-t29:=natposd(a0,natrlex(n)):posd(a0)
-t30:=posin(t29):pos(r)
--ivr2
-r@[n:natrl(r)]
-natpos:=realapp1(pos(r),[x:dif][t:inn(x,class(r))]t30".ivr2"(x,t,n)):pos(r)
-@[x:nat]
-rlofnt:=realof(pdofnt(x)):real
-natrli:=natrlin(rlofnt(x),pdofnt(x),innclass(pdofnt(x)),natdi(x)):natrl(rlofnt(x))
-[y:nat][i:is"n"(x,y)]
-isnterl:=isf(nat,real,[u:nat]rlofnt(u),x,y,i):is(rlofnt(x),rlofnt(y))
-y@[i:is(rlofnt(x),rlofnt(y))]
-isntirl:=isntirp(x,y,isrpip(rpofnt(x),rpofnt(y),i)):is"n"(x,y)
-+*ivr2
-@t31:=[x:nat][y:nat][t:is(rlofnt(x),rlofnt(y))]isntirl(x,y,t):injective(nat,real,[x:nat]rlofnt(x))
-a0ir@[n:natrl(r)]
-t32:=natposd(a0,natrlex(n)):posd(a0)
-ap:=rpofpd(a0,t32):cut
-t33:=natderp(a0,natrlex(n)):natrp(ap)
-x0:=ntofrp(ap,t33):nat
-t34:=isrpepd(ap,rpofnt(x0),isrpnt1(ap,t33)):eq"rp"(pdofrp(ap),pdofnt(x0))
-t35:=treq"rp"(a0,pdofrp(ap),pdofnt(x0),eqpdrp1(a0,t32),t34):eq"rp"(a0,pdofnt(x0))
-t36:=isin(r,rlofnt(x0),a0,pdofnt(x0),a0ir,innclass(pdofnt(x0)),t35):is(r,rlofnt(x0))
-t37:=somei(nat,[x:nat]is(r,rlofnt(x)),x0,t36):image(nat,real,[x:nat]rlofnt(x),r)
--ivr2
-r@[n:natrl(r)]
-natimage:=realapp1(image(nat,real,[x:nat]rlofnt(x),r),[x:dif][t:inn(x,class(r))]t37".ivr2"(x,t,n)):image(nat,real,[x:nat]rlofnt(x),r)
-r@[i:image(nat,real,[x:nat]rlofnt(x),r)]
-+*ivr2
-i"r"@[x:nat][j:is(r,rlofnt(x))]
-t38:=isp1(real,[u:real]natrl(u),rlofnt(x),r,natrli(x),j):natrl(r)
--ivr2
-i@imagenat:=someapp(nat,[u:nat]is(r,rlofnt(u)),i,natrl(r),[u:nat][v:is(r,rlofnt(u))]t38".ivr2"(u,v)):natrl(r)
-r@[n:natrl(r)]
-ntofrl:=soft(nat,real,[x:nat]rlofnt(x),t31".ivr2",r,natimage(r,n)):nat
-@[r1:real][n:natrl(r1)][s1:real][m:natrl(s1)][i:is(r1,s1)]
-isrlent:=isinv(nat,real,[x:nat]rlofnt(x),t31".ivr2",r1,natimage(r1,n),s1,natimage(s1,m),i):is"n"(ntofrl(r1,n),ntofrl(s1,m))
-m@[i:is"n"(ntofrl(r1,n),ntofrl(s1,m))]
-isrlint:=isinve(nat,real,[x:nat]rlofnt(x),t31".ivr2",r1,natimage(r1,n),s1,natimage(s1,m),i):is(r1,s1)
-r@[n:natrl(r)]
-isrlnt1:=ists1"e"(nat,real,[x:nat]rlofnt(x),t31".ivr2",r,natimage(r,n)):is(r,rlofnt(ntofrl(r,n)))
-isrlnt2:=symis(real,r,rlofnt(ntofrl(r,n)),isrlnt1):is(rlofnt(ntofrl(r,n)),r)
-@[x:nat]
-+*ivr2
-x"r"@xn:=soft(nat,real,[u:nat]rlofnt(u),t31,rlofnt(x),imagei(nat,real,[u:nat]rlofnt(u),x)):nat
-t39:=isinv(nat,real,[u:nat]rlofnt(u),t31,rlofnt(x),imagei(nat,real,[u:nat]rlofnt(u),x),rlofnt(x),natimage(rlofnt(x),natrli(x)),refis(real,rlofnt(x))):is"n"(xn,ntofrl(rlofnt(x),natrli(x)))
--ivr2
-x@isntrl1:=tris(nat,x,xn".ivr2",ntofrl(rlofnt(x),natrli(x)),isst1(nat,real,[u:nat]rlofnt(u),t31".ivr2",x),t39".ivr2"):is"n"(x,ntofrl(rlofnt(x),natrli(x)))
-isntrl2:=symis(nat,x,ntofrl(rlofnt(x),natrli(x)),isntrl1):is"n"(ntofrl(rlofnt(x),natrli(x)),x)
-r@intrl:=some"l"(dif,[x:dif]and(inn(x,class(r)),intd(x))):'prop'
-a0ir@[i:intd(a0)]
-+*ivr2
-i@t40:=andi(inn(a0,class(r)),intd(a0),a0ir,i):and(inn(a0,class(r)),intd(a0))
--ivr2
-i@intrlin:=somei(dif,[x:dif]and(inn(x,class(r)),intd(x)),a0,t40".ivr2"):intrl(r)
-a0ir@[i:intrl(r)]
-+*ivr2
-i@[a:dif][b:and(inn(a,class(r)),intd(a))]
-t41:=ande1(inn(a,class(r)),intd(a),b):inn(a,class(r))
-t42:=ande2(inn(a,class(r)),intd(a),b):intd(a)
-t43:=eqintd(a,a0,isex(r,r,a,a0,t41,a0ir,refis(real,r)),t42):intd(a0)
--ivr2
-i@intrlex:=someapp(dif,[x:dif]and(inn(x,class(r)),intd(x)),i,intd(a0),[x:dif][t:and(inn(x,class(r)),intd(x))]t43".ivr2"(x,t)):intd(a0)
-+*ivr2
-a0ir@[n:natrl(r)]
-t44:=natintd(a0,natrlex(n)):intd(a0)
-t45:=intrlin(t44):intrl(r)
--ivr2
-r@[n:natrl(r)]
-natintrl:=realapp1(intrl(r),[x:dif][t:inn(x,class(r))]t45".ivr2"(x,t,n)):intrl(r)
-+*ivr2
-a0ir@[p:pos(r)][i:intrl(r)]
-t46:=posintnatd(a0,posex(p),intrlex(i)):natd(a0)
-t47:=natrlin(t46):natrl(r)
--ivr2
-r@[p:pos(r)][i:intrl(r)]
-posintnatrl:=realapp1(natrl(r),[x:dif][t:inn(x,class(r))]t47".ivr2"(x,t,p,i)):natrl(r)
-+*ivr2
-a0ir@[i2:is(r,0)]
-t48:=intdi0(a0,0ex(i2)):intd(a0)
-t49:=intrlin(t48):intrl(r)
--ivr2
-r@[i:is(r,0)]
-intrli0:=realapp1(intrl(r),[x:dif][t:inn(x,class(r))]t49".ivr2"(x,t,i)):intrl(r)
-r0@[n:natrp(r0)]
-remark6:=intrlin(pofrp(r0),pdofrp(r0),innclass(pdofrp(r0)),remark6"rp"(r0,n)):intrl(pofrp(r0))
-remark7:=intrlin(nofrp(r0),ndofrp(r0),innclass(ndofrp(r0)),remark7"rp"(r0,n)):intrl(nofrp(r0))
-+2r174
-a0ir@[i:intrl(r)]
-t1:=satzd174(a0,intrlex(i)):ratd(a0)
-t2:=ratrlin(t1):ratrl(r)
--2r174
-r@[i:intrl(r)]
-satz174:=realapp1(ratrl(r),[x:dif][t:inn(x,class(r))]t2".2r174"(x,t,i)):ratrl(r)
-@plusdr:=[x:dif][y:dif]realof(pd(x,y)):[x:dif][y:dif]real
-+ivr3
-[a:dif][b:dif][c:dif][d:dif][e:eq"rp"(a,b)][f:eq"rp"(c,d)]
-t1:=isin(realof(pd(a,c)),realof(pd(b,d)),pd(a,c),pd(b,d),innclass(pd(a,c)),innclass(pd(b,d)),eqpd12(a,b,c,d,e,f)):is(<c><a>plusdr,<d><b>plusdr)
--ivr3
-fplusdr:=[x:dif][y:dif][z:dif][v:dif][t:<y><x>eq][u:<v><z>eq]t1".ivr3"(x,y,z,v,t,u):fixf2(real,plusdr)
-s@pl:=indreal2(real,plusdr,fplusdr,r,s):real
-+*ivr3
-b1is@t2:=isindreal2(real,plusdr,fplusdr,r,s,a1,b1,a1ir,b1is):is(realof(pd(a1,b1)),pl(r,s))
--ivr3
-b1is@picp:=isp(real,[x:real]inn(pd(a1,b1),class(x)),realof(pd(a1,b1)),pl(r,s),innclass(pd(a1,b1)),t2".ivr3"):inn(pd(a1,b1),class(pl(r,s)))
-t@[i:is(r,s)]
-ispl1:=isf(real,real,[x:real]pl(x,t),r,s,i):is(pl(r,t),pl(s,t))
-ispl2:=isf(real,real,[x:real]pl(t,x),r,s,i):is(pl(t,r),pl(t,s))
-u@[i:is(r,s)][j:is(t,u)]
-ispl12:=tris(real,pl(r,t),pl(s,t),pl(s,u),ispl1(i),ispl2(t,u,s,j)):is(pl(r,t),pl(s,u))
-+3r175
-b1is@t1:=satzd175(a1,b1):eq"rp"(pd(a1,b1),pd(b1,a1))
-t2:=isin(pl(r,s),pl(s,r),pd(a1,b1),pd(b1,a1),picp,picp(s,r,b1,a1,b1is,a1ir),t1):is(pl(r,s),pl(s,r))
--3r175
-s@satz175:=realapp2(is(pl(r,s),pl(s,r)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".3r175"(x,y,t,u)):is(pl(r,s),pl(s,r))
-compl:=satz175:is(pl(r,s),pl(s,r))
-+*ivr3
-b1is@[i:is(r,0)]
-t3:=pd01(a1,b1,0ex(r,a1,a1ir,i)):eq"rp"(pd(a1,b1),b1)
-t4:=isin(pl(r,s),s,pd(a1,b1),b1,picp,b1is,t3):is(pl(r,s),s)
--ivr3
-s@[i:is(r,0)]
-pl01:=realapp2(is(pl(r,s),s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t4".ivr3"(x,y,t,u,i)):is(pl(r,s),s)
-s@[i:is(s,0)]
-pl02:=tris(real,pl(r,s),pl(s,r),r,compl,pl01(s,r,i)):is(pl(r,s),r)
-+*ivr3
-b1is@[p:pos(r)][q:pos(s)]
-t5:=ppd(a1,b1,posex(r,a1,a1ir,p),posex(s,b1,b1is,q)):posd(pd(a1,b1))
-t6:=posin(pl(r,s),pd(a1,b1),picp,t5):pos(pl(r,s))
--ivr3
-s@[p:pos(r)][q:pos(s)]
-pospl:=realapp2(pos(pl(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".ivr3"(x,y,t,u,p,q)):pos(pl(r,s))
-+*ivr3
-b1is@[n:neg(r)][o:neg(s)]
-t7:=npd(a1,b1,negex(r,a1,a1ir,n),negex(s,b1,b1is,o)):negd(pd(a1,b1))
-t8:=negin(pl(r,s),pd(a1,b1),picp,t7):neg(pl(r,s))
--ivr3
-s@[n:neg(r)][o:neg(s)]
-negpl:=realapp2(neg(pl(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t8".ivr3"(x,y,t,u,n,o)):neg(pl(r,s))
-@m0dr:=[x:dif]realof(m0d(x)):[x:dif]real
-+*ivr3
-@[a:dif][b:dif][e:eq"rp"(a,b)]
-t5a:=isin(realof(m0d(a)),realof(m0d(b)),m0d(a),m0d(b),innclass(m0d(a)),innclass(m0d(b)),eqm0d(a,b,e)):is(<a>m0dr,<b>m0dr)
--ivr3
-@fm0dr:=[x:dif][y:dif][t:<y><x>eq]t5a".ivr3"(x,y,t):fixf(real,m0dr)
-r@m0:=indreal(real,m0dr,fm0dr,r):real
-+*ivr3
-a0ir@t6a:=isindreal(real,m0dr,fm0dr,r,a0,a0ir):is(realof(m0d(a0)),m0(r))
--ivr3
-a0ir@micm0:=isp(real,[x:real]inn(m0d(a0),class(x)),realof(m0d(a0)),m0(r),innclass(m0d(a0)),t6a".ivr3"):inn(m0d(a0),class(m0(r)))
-s@[i:is(r,s)]
-ism0:=isf(real,real,[x:real]m0(x),r,s,i):is(m0(r),m0(s))
-+*ivr3
-a0ir@[n:neg(r)]
-t7a:=absnd(a0,negex(n)):eq"rp"(absd(a0),m0d(a0))
-t8a:=isin(abs(r),m0(r),absd(a0),m0d(a0),aica,micm0,t7a):is(abs(r),m0(r))
--ivr3
-r@[n:neg(r)]
-absn:=realapp1(is(abs(r),m0(r)),[x:dif][t:inn(x,class(r))]t8a".ivr3"(x,t,n)):is(abs(r),m0(r))
-+*ivr3
-a0ir@[nn:not(neg(r))]
-t9:=absnnd(a0,th3"l.imp"(negd(a0),neg(r),nn,[t:negd(a0)]negin(t))):eq"rp"(absd(a0),a0)
-t10:=isin(abs(r),r,absd(a0),a0,aica,a0ir,t9):is(abs(r),r)
--ivr3
-r@[nn:not(neg(r))]
-absnn:=realapp1(is(abs(r),r),[x:dif][t:inn(x,class(r))]t10".ivr3"(x,t,nn)):is(abs(r),r)
-r@[p:pos(r)]
-absp:=absnn(r,pnotn(r,p)):is(abs(r),r)
-r@[i:is(r,0)]
-abs0:=tris(real,abs(r),r,0,absnn(r,0notn(r,i)),i):is(abs(r),0)
-+3r176
-a0ir@[p:pos(r)]
-t1:=satzd176a(a0,posex(p)):negd(m0d(a0))
-t2:=negin(m0(r),m0d(a0),micm0,t1):neg(m0(r))
--3r176
-r@[p:pos(r)]
-satz176a:=realapp1(neg(m0(r)),[x:dif][t:inn(x,class(r))]t2".3r176"(x,t,p)):neg(m0(r))
-+*3r176
-a0ir@[i:is(r,0)]
-t3:=satzd176b(a0,0ex(i)):zero(m0d(a0))
-t4:=0in(m0(r),m0d(a0),micm0,t3):is(m0(r),0)
--3r176
-r@[i:is(r,0)]
-satz176b:=realapp1(is(m0(r),0),[x:dif][t:inn(x,class(r))]t4".3r176"(x,t,i)):is(m0(r),0)
-+*3r176
-a0ir@[n:neg(r)]
-t5:=satzd176c(a0,negex(n)):posd(m0d(a0))
-t6:=posin(m0(r),m0d(a0),micm0,t5):pos(m0(r))
--3r176
-r@[n:neg(r)]
-satz176c:=realapp1(pos(m0(r)),[x:dif][t:inn(x,class(r))]t6".3r176"(x,t,n)):pos(m0(r))
-+*3r176
-a0ir@[n:neg(m0(r))]
-t7:=satzd176d(a0,negex(m0(r),m0d(a0),micm0,n)):posd(a0)
-t8:=posin(t7):pos(r)
--3r176
-r@[n:neg(m0(r))]
-satz176d:=realapp1(pos(r),[x:dif][t:inn(x,class(r))]t8".3r176"(x,t,n)):pos(r)
-+*3r176
-a0ir@[i:is(m0(r),0)]
-t9:=satzd176e(a0,0ex(m0(r),m0d(a0),micm0,i)):zero(a0)
-t10:=0in(t9):is(r,0)
--3r176
-r@[i:is(m0(r),0)]
-satz176e:=realapp1(is(r,0),[x:dif][t:inn(x,class(r))]t10".3r176"(x,t,i)):is(r,0)
-+*3r176
-a0ir@[p:pos(m0(r))]
-t11:=satzd176f(a0,posex(m0(r),m0d(a0),micm0,p)):negd(a0)
-t12:=negin(t11):neg(r)
--3r176
-r@[p:pos(m0(r))]
-satz176f:=realapp1(neg(r),[x:dif][t:inn(x,class(r))]t12".3r176"(x,t,p)):neg(r)
-+3r177
-a0ir@t1:=isin(m0(m0(r)),r,m0d(m0d(a0)),a0,micm0(m0(r),m0d(a0),micm0),a0ir,satzd177(a0)):is(m0(m0(r)),r)
--3r177
-r@satz177:=realapp1(is(m0(m0(r)),r),[x:dif][t:inn(x,class(r))]t1".3r177"(x,t)):is(m0(m0(r)),r)
-satz177a:=symis(real,m0(m0(r)),r,satz177):is(r,m0(m0(r)))
-s@[i:is(r,m0(s))]
-satz177b:=tris(real,m0(r),m0(m0(s)),s,ism0(r,m0(s),i),satz177(s)):is(m0(r),s)
-satz177c:=symis(real,m0(r),s,satz177b):is(s,m0(r))
-s@[i:is(m0(r),s)]
-satz177d:=satz177c(s,r,symis(real,m0(r),s,i)):is(r,m0(s))
-satz177e:=symis(real,r,m0(s),satz177d):is(m0(s),r)
-+3r178
-a0ir@t1:=isin(abs(m0(r)),abs(r),absd(m0d(a0)),absd(a0),aica(m0(r),m0d(a0),micm0),aica,satzd178(a0)):is(abs(m0(r)),abs(r))
--3r178
-r@satz178:=realapp1(is(abs(m0(r)),abs(r)),[x:dif][t:inn(x,class(r))]t1".3r178"(x,t)):is(abs(m0(r)),abs(r))
-satz178a:=symis(real,abs(m0(r)),abs(r),satz178):is(abs(r),abs(m0(r)))
-+3r179
-a0ir@t1:=0in(pl(r,m0(r)),pd(a0,m0d(a0)),picp(r,m0(r),a0,m0d(a0),a0ir,micm0),satzd179(a0)):is(pl(r,m0(r)),0)
--3r179
-satz179:=realapp1(is(pl(r,m0(r)),0),[x:dif][t:inn(x,class(r))]t1".3r179"(x,t)):is(pl(r,m0(r)),0)
-satz179a:=tris(real,pl(m0(r),r),pl(r,m0(r)),0,compl(m0(r),r),satz179):is(pl(m0(r),r),0)
-+3r180
-b1is@t1:=isin(m0(pl(r,s)),pl(m0(r),m0(s)),m0d(pd(a1,b1)),pd(m0d(a1),m0d(b1)),micm0(pl(r,s),pd(a1,b1),picp),picp(m0(r),m0(s),m0d(a1),m0d(b1),micm0(r,a1,a1ir),micm0(s,b1,b1is)),satzd180(a1,b1)):is(m0(pl(r,s)),pl(m0(r),m0(s)))
--3r180
-s@satz180:=realapp2(is(m0(pl(r,s)),pl(m0(r),m0(s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t1".3r180"(x,y,t,u)):is(m0(pl(r,s)),pl(m0(r),m0(s)))
-satz180a:=symis(real,m0(pl(r,s)),pl(m0(r),m0(s)),satz180):is(pl(m0(r),m0(s)),m0(pl(r,s)))
-mn:=pl(r,m0(s)):real
-b1is@micmn:=picp(r,m0(s),a1,m0d(b1),a1ir,micm0(s,b1,b1is)):inn(md(a1,b1),class(mn(r,s)))
-t@[i:is(r,s)]
-ismn1:=ispl1(r,s,m0(t),i):is(mn(r,t),mn(s,t))
-ismn2:=ispl2(m0(r),m0(s),t,ism0(r,s,i)):is(mn(t,r),mn(t,s))
-u@[i:is(r,s)][j:is(t,u)]
-ismn12:=ispl12(r,s,m0(t),m0(u),i,ism0(t,u,j)):is(mn(r,t),mn(s,u))
-s@satz181:=tr3is(real,m0(mn(r,s)),pl(m0(r),m0(m0(s))),pl(m0(r),s),mn(s,r),satz180(r,m0(s)),ispl2(m0(m0(s)),s,m0(r),satz177(s)),compl(m0(r),s)):is(m0(mn(r,s)),mn(s,r))
-satz181a:=symis(real,m0(mn(s,r)),mn(r,s),satz181(s,r)):is(mn(r,s),m0(mn(s,r)))
-+3r182
-b1is@[p:pos(mn(r,s))]
-t1:=satzd182a(a1,b1,posex(mn(r,s),md(a1,b1),micmn,p)):mored(a1,b1)
-t2:=morein(t1):more(r,s)
--3r182
-[p:pos(mn(r,s))]
-satz182a:=realapp2(more(r,s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".3r182"(x,y,t,u,p)):more(r,s)
-+*3r182
-b1is@[i:is(mn(r,s),0)]
-t3:=satzd182b(a1,b1,0ex(mn(r,s),md(a1,b1),micmn,i)):eq"rp"(a1,b1)
-t4:=isin(t3):is(r,s)
--3r182
-s@[i:is(mn(r,s),0)]
-satz182b:=realapp2(is(r,s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t4".3r182"(x,y,t,u,i)):is(r,s)
-+*3r182
-b1is@[n:neg(mn(r,s))]
-t5:=satzd182c(a1,b1,negex(mn(r,s),md(a1,b1),micmn,n)):lessd(a1,b1)
-t6:=lessin(t5):less(r,s)
--3r182
-s@[n:neg(mn(r,s))]
-satz182c:=realapp2(less(r,s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".3r182"(x,y,t,u,n)):less(r,s)
-+*3r182
-b1is@[m:more(r,s)]
-t7:=satzd182d(a1,b1,moreex(m)):posd(md(a1,b1))
-t8:=posin(mn(r,s),md(a1,b1),micmn,t7):pos(mn(r,s))
--3r182
-s@[m:more(r,s)]
-satz182d:=realapp2(pos(mn(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t8".3r182"(x,y,t,u,m)):pos(mn(r,s))
-+*3r182
-b1is@[i:is(r,s)]
-t9:=satzd182e(a1,b1,isex(i)):zero(md(a1,b1))
-t10:=0in(mn(r,s),md(a1,b1),micmn,t9):is(mn(r,s),0)
--3r182
-s@[i:is(r,s)]
-satz182e:=realapp2(is(mn(r,s),0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t10".3r182"(x,y,t,u,i)):is(mn(r,s),0)
-+*3r182
-b1is@[l:less(r,s)]
-t11:=satzd182f(a1,b1,lessex(l)):negd(md(a1,b1))
-t12:=negin(mn(r,s),md(a1,b1),micmn,t11):neg(mn(r,s))
--3r182
-s@[l:less(r,s)]
-satz182f:=realapp2(neg(mn(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t12".3r182"(x,y,t,u,l)):neg(mn(r,s))
-+3r183
-b1is@[m:more(r,s)]
-t1:=satzd183a(a1,b1,moreex(m)):lessd(m0d(a1),m0d(b1))
-t2:=lessin(m0(r),m0(s),m0d(a1),m0d(b1),micm0(r,a1,a1ir),micm0(s,b1,b1is),t1):less(m0(r),m0(s))
--3r183
-s@[m:more(r,s)]
-satz183a:=realapp2(less(m0(r),m0(s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".3r183"(x,y,t,u,m)):less(m0(r),m0(s))
-s@[i:is(r,s)]
-satz183b:=ism0(r,s,i):is(m0(r),m0(s))
-+*3r183
-b1is@[l:less(r,s)]
-t3:=satzd183c(a1,b1,lessex(l)):mored(m0d(a1),m0d(b1))
-t4:=morein(m0(r),m0(s),m0d(a1),m0d(b1),micm0(r,a1,a1ir),micm0(s,b1,b1is),t3):more(m0(r),m0(s))
--3r183
-s@[l:less(r,s)]
-satz183c:=realapp2(more(m0(r),m0(s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t4".3r183"(x,y,t,u,l)):more(m0(r),m0(s))
-s@[l:less(m0(r),m0(s))]
-satz183d:=ismore12(m0(m0(r)),r,m0(m0(s)),s,satz177(r),satz177(s),satz183c(m0(r),m0(s),l)):more(r,s)
-s@[i:is(m0(r),m0(s))]
-satz183e:=tr3is(real,r,m0(m0(r)),m0(m0(s)),s,satz177a(r),ism0(m0(r),m0(s),i),satz177(s)):is(r,s)
-s@[m:more(m0(r),m0(s))]
-satz183f:=isless12(m0(m0(r)),r,m0(m0(s)),s,satz177(r),satz177(s),satz183a(m0(r),m0(s),m)):less(r,s)
-+3r184
-t@prop1:=and3(pos(s),pos(t),is(r,mn(s,t))):'prop'
-s@prop2:=some([x:real]prop1(x)):'prop'
-r@prop3:=some([x:real]prop2(x)):'prop'
-a0ir@[a:dif][b:dif]
-prop1d:=and3(posd(a),posd(b),eq"rp"(a0,md(a,b))):'prop'
-a@prop2d:=some"l"(dif,[x:dif]prop1d(x)):'prop'
-[p2:prop2d(a)][b:dif][p1:prop1d(a,b)]
-t1:=and3e1(posd(a),posd(b),eq"rp"(a0,md(a,b)),p1):posd(a)
-t2:=and3e2(posd(a),posd(b),eq"rp"(a0,md(a,b)),p1):posd(b)
-t3:=and3e3(posd(a),posd(b),eq"rp"(a0,md(a,b)),p1):eq"rp"(a0,md(a,b))
-p2@ra:=realof(a):real
-p1@rb:=realof(b):real
-t4:=innclass(a):inn(a,class(ra))
-t5:=innclass(b):inn(b,class(rb))
-t6:=isin(r,mn(ra,rb),a0,md(a,b),a0ir,micmn(ra,rb,a,b,t4,t5),t3):is(r,mn(ra,rb))
-t7:=and3i(pos(ra),pos(rb),is(r,mn(ra,rb)),posin(ra,a,t4,t1),posin(rb,b,t5,t2),t6):prop1(ra,rb)
-t8:=somei(real,[x:real]prop1(ra,x),rb,t7):prop2(ra)
-p2@t9:=someapp(dif,[x:dif]prop1d(a,x),p2,prop2(ra),[x:dif][t:prop1d(a,x)]t8(x,t)):prop2(ra)
-t10:=somei(real,[x:real]prop2(x),ra,t9):prop3
-a0ir@t11:=someapp(dif,[x:dif]prop2d(x),satzd184(a0),prop3,[x:dif][t:prop2d(x)]t10(x,t)):prop3
--3r184
-r@satz184:=realapp1(prop3".3r184",[x:dif][t:inn(x,class(r))]t11".3r184"(x,t)):some([x:real]some([y:real]and3(pos(x),pos(y),is(r,mn(x,y)))))
-u@[a3:dif][b3:dif][c3:dif][d3:dif][a3ir:inn(a3,class(r))][b3is:inn(b3,class(s))][c3it:inn(c3,class(t))][d3iu:inn(d3,class(u))]
-+3r185
-t1:=satzd185(a3,b3,c3,d3):eq"rp"(pd(md(a3,b3),md(c3,d3)),md(pd(a3,c3),pd(b3,d3)))
-t2:=isin(pl(mn(r,s),mn(t,u)),mn(pl(r,t),pl(s,u)),pd(md(a3,b3),md(c3,d3)),md(pd(a3,c3),pd(b3,d3)),picp(mn(r,s),mn(t,u),md(a3,b3),md(c3,d3),micmn(r,s,a3,b3,a3ir,b3is),micmn(t,u,c3,d3,c3it,d3iu)),micmn(pl(r,t),pl(s,u),pd(a3,c3),pd(b3,d3),picp(r,t,a3,c3,a3ir,c3it),picp(s,u,b3,d3,b3is,d3iu)),t1):is(pl(mn(r,s),mn(t,u)),mn(pl(r,t),pl(s,u)))
--3r185
-u@satz185:=realapp4(is(pl(mn(r,s),mn(t,u)),mn(pl(r,t),pl(s,u))),[x:dif][y:dif][z:dif][v:dif][xi:inn(x,class(r))][yi:inn(y,class(s))][zi:inn(z,class(t))][vi:inn(v,class(u))]t2".3r185"(x,y,z,v,xi,yi,zi,vi)):is(pl(mn(r,s),mn(t,u)),mn(pl(r,t),pl(s,u)))
-+3r186
-c2it@t1:=satzd186(a2,b2,c2):eq"rp"(pd(pd(a2,b2),c2),pd(a2,pd(b2,c2)))
-t2:=isin(pl(pl(r,s),t),pl(r,pl(s,t)),pd(pd(a2,b2),c2),pd(a2,pd(b2,c2)),picp(pl(r,s),t,pd(a2,b2),c2,picp(r,s,a2,b2,a2ir,b2is),c2it),picp(r,pl(s,t),a2,pd(b2,c2),a2ir,picp(s,t,b2,c2,b2is,c2it)),t1):is(pl(pl(r,s),t),pl(r,pl(s,t)))
--3r186
-t@satz186:=realapp3(is(pl(pl(r,s),t),pl(r,pl(s,t))),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".3r186"(x,y,z,u,v,w)):is(pl(pl(r,s),t),pl(r,pl(s,t)))
-asspl1:=satz186:is(pl(pl(r,s),t),pl(r,pl(s,t)))
-asspl2:=symis(real,pl(pl(r,s),t),pl(r,pl(s,t)),satz186):is(pl(r,pl(s,t)),pl(pl(r,s),t))
-s@plmn:=tris(real,pl(mn(r,s),s),pl(r,pl(m0(s),s)),r,asspl1(r,m0(s),s),pl02(r,pl(m0(s),s),satz179a(s))):is(pl(mn(r,s),s),r)
-mnpl:=tris(real,mn(pl(r,s),s),pl(r,pl(s,m0(s))),r,asspl1(r,s,m0(s)),pl02(r,pl(s,m0(s)),satz179(s))):is(mn(pl(r,s),s),r)
-satz187a:=tris(real,pl(s,mn(r,s)),pl(mn(r,s),s),r,compl(s,mn(r,s)),plmn):is(pl(s,mn(r,s)),r)
-satz187b:=somei(real,[x:real]is(pl(s,x),r),mn(r,s),satz187a):some([x:real]is(pl(s,x),r))
-[x:real][i:is(pl(s,x),r)]
-satz187c:=tris(real,mn(r,s),mn(pl(x,s),s),x,ismn1(r,pl(x,s),s,tris1(real,r,pl(x,s),pl(s,x),i,compl(s,x))),mnpl(x,s)):is(mn(r,s),x)
-satz187d:=symis(real,mn(r,s),x,satz187c):is(x,mn(r,s))
-x@[i:is(pl(x,s),r)]
-satz187e:=satz187c(tris(real,pl(s,x),pl(x,s),r,compl(s,x),i)):is(mn(r,s),x)
-satz187f:=symis(real,mn(r,s),x,satz187e):is(x,mn(r,s))
-+3r187
-s@[x:real][y:real][i:is(pl(s,x),r)][j:is(pl(s,y),r)]
-t1:=tris1(real,x,y,mn(r,s),satz187c(x,i),satz187c(y,j)):is(x,y)
-s@t2:=[x:real][y:real][t:is(pl(s,x),r)][u:is(pl(s,y),r)]t1(x,y,t,u):amone(real,[x:real]is(pl(s,x),r))
--3r187
-s@satz187:=onei(real,[x:real]is(pl(s,x),r),t2".3r187",satz187b):one([x:real]is(pl(s,x),r))
-+3r188
-c2it@[m:more(pl(r,t),pl(s,t))]
-t1:=satzd188a(a2,b2,c2,moreex(pl(r,t),pl(s,t),pd(a2,c2),pd(b2,c2),picp(r,t,a2,c2,a2ir,c2it),picp(s,t,b2,c2,b2is,c2it),m)):mored(a2,b2)
-t2:=morein(r,s,a2,b2,a2ir,b2is,t1):more(r,s)
--3r188
-t@[m:more(pl(r,t),pl(s,t))]
-satz188a:=realapp3(more(r,s),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".3r188"(x,y,z,u,v,w,m)):more(r,s)
-+*3r188
-c2it@[i:is(pl(r,t),pl(s,t))]
-t3:=satzd188b(a2,b2,c2,isex(pl(r,t),pl(s,t),pd(a2,c2),pd(b2,c2),picp(r,t,a2,c2,a2ir,c2it),picp(s,t,b2,c2,b2is,c2it),i)):eq"rp"(a2,b2)
-t4:=isin(r,s,a2,b2,a2ir,b2is,t3):is(r,s)
--3r188
-t@[i:is(pl(r,t),pl(s,t))]
-satz188b:=realapp3(is(r,s),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t4".3r188"(x,y,z,u,v,w,i)):is(r,s)
-+*3r188
-c2it@[l:less(pl(r,t),pl(s,t))]
-t5:=satzd188c(a2,b2,c2,lessex(pl(r,t),pl(s,t),pd(a2,c2),pd(b2,c2),picp(r,t,a2,c2,a2ir,c2it),picp(s,t,b2,c2,b2is,c2it),l)):lessd(a2,b2)
-t6:=lessin(r,s,a2,b2,a2ir,b2is,t5):less(r,s)
--3r188
-t@[l:less(pl(r,t),pl(s,t))]
-satz188c:=realapp3(less(r,s),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t6".3r188"(x,y,z,u,v,w,l)):less(r,s)
-+*3r188
-c2it@[m:more(r,s)]
-t7:=satzd188d(a2,b2,c2,moreex(r,s,a2,b2,a2ir,b2is,m)):mored(pd(a2,c2),pd(b2,c2))
-t8:=morein(pl(r,t),pl(s,t),pd(a2,c2),pd(b2,c2),picp(r,t,a2,c2,a2ir,c2it),picp(s,t,b2,c2,b2is,c2it),t7):more(pl(r,t),pl(s,t))
--3r188
-t@[m:more(r,s)]
-satz188d:=realapp3(more(pl(r,t),pl(s,t)),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t8".3r188"(x,y,z,u,v,w,m)):more(pl(r,t),pl(s,t))
-t@[i:is(r,s)]
-satz188e:=ispl1(r,s,t,i):is(pl(r,t),pl(s,t))
-+*3r188
-c2it@[l:less(r,s)]
-t9:=satzd188f(a2,b2,c2,lessex(r,s,a2,b2,a2ir,b2is,l)):lessd(pd(a2,c2),pd(b2,c2))
-t10:=lessin(pl(r,t),pl(s,t),pd(a2,c2),pd(b2,c2),picp(r,t,a2,c2,a2ir,c2it),picp(s,t,b2,c2,b2is,c2it),t9):less(pl(r,t),pl(s,t))
--3r188
-t@[l:less(r,s)]
-satz188f:=realapp3(less(pl(r,t),pl(s,t)),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t10".3r188"(x,y,z,u,v,w,l)):less(pl(r,t),pl(s,t))
-t@[m:more(pl(t,r),pl(t,s))]
-satz188g:=satz188a(ismore12(pl(t,r),pl(r,t),pl(t,s),pl(s,t),compl(t,r),compl(t,s),m)):more(r,s)
-t@[i:is(pl(t,r),pl(t,s))]
-satz188h:=satz188b(tr3is(real,pl(r,t),pl(t,r),pl(t,s),pl(s,t),compl(r,t),i,compl(t,s))):is(r,s)
-t@[l:less(pl(t,r),pl(t,s))]
-satz188j:=satz188c(isless12(pl(t,r),pl(r,t),pl(t,s),pl(s,t),compl(t,r),compl(t,s),l)):less(r,s)
-t@[m:more(r,s)]
-satz188k:=ismore12(pl(r,t),pl(t,r),pl(s,t),pl(t,s),compl(r,t),compl(s,t),satz188d(m)):more(pl(t,r),pl(t,s))
-t@[i:is(r,s)]
-satz188l:=ispl2(r,s,t,i):is(pl(t,r),pl(t,s))
-t@[l:less(r,s)]
-satz188m:=isless12(pl(r,t),pl(t,r),pl(s,t),pl(t,s),compl(r,t),compl(s,t),satz188f(l)):less(pl(t,r),pl(t,s))
-u@[i:is(r,s)][m:more(t,u)]
-satz188n:=ismore2(pl(r,u),pl(s,u),pl(r,t),ispl1(r,s,u,i),satz188k(t,u,r,m)):more(pl(r,t),pl(s,u))
-satz188o:=ismore12(pl(r,t),pl(t,r),pl(s,u),pl(u,s),compl(r,t),compl(s,u),satz188n):more(pl(t,r),pl(u,s))
-i@[l:less(t,u)]
-satz188p:=isless2(pl(r,u),pl(s,u),pl(r,t),ispl1(r,s,u,i),satz188m(t,u,r,l)):less(pl(r,t),pl(s,u))
-satz188q:=isless12(pl(r,t),pl(t,r),pl(s,u),pl(u,s),compl(r,t),compl(s,u),satz188p):less(pl(t,r),pl(u,s))
-u@[m:more(r,s)][n:more(t,u)]
-satz189:=trmore(pl(r,t),pl(s,t),pl(s,u),satz188d(m),satz188k(t,u,s,n)):more(pl(r,t),pl(s,u))
-u@[l:less(r,s)][k:less(t,u)]
-satz189a:=lemma1(pl(s,u),pl(r,t),satz189(s,r,u,t,lemma2(r,s,l),lemma2(t,u,k))):less(pl(r,t),pl(s,u))
-u@[m:moreis(r,s)][n:more(t,u)]
-satz190a:=orapp(more(r,s),is(r,s),more(pl(r,t),pl(s,u)),m,[v:more(r,s)]satz189(v,n),[v:is(r,s)]satz188n(v,n)):more(pl(r,t),pl(s,u))
-u@[m:more(r,s)][n:moreis(t,u)]
-satz190b:=ismore12(pl(t,r),pl(r,t),pl(u,s),pl(s,u),compl(t,r),compl(u,s),satz190a(t,u,r,s,n,m)):more(pl(r,t),pl(s,u))
-u@[l:lessis(r,s)][k:less(t,u)]
-satz190c:=lemma1(pl(s,u),pl(r,t),satz190a(s,r,u,t,satz168b(l),lemma2(t,u,k))):less(pl(r,t),pl(s,u))
-u@[l:less(r,s)][k:lessis(t,u)]
-satz190d:=lemma1(pl(s,u),pl(r,t),satz190b(s,r,u,t,lemma2(l),satz168b(t,u,k))):less(pl(r,t),pl(s,u))
-+3r191
-d3iu@[m:moreis(r,s)][n:moreis(t,u)]
-t1:=satzd191(a3,b3,c3,d3,moreisex(r,s,a3,b3,a3ir,b3is,m),moreisex(t,u,c3,d3,c3it,d3iu,n)):moreq(pd(a3,c3),pd(b3,d3))
-t2:=moreisin(pl(r,t),pl(s,u),pd(a3,c3),pd(b3,d3),picp(r,t,a3,c3,a3ir,c3it),picp(s,u,b3,d3,b3is,d3iu),t1):moreis(pl(r,t),pl(s,u))
--3r191
-u@[m:moreis(r,s)][n:moreis(t,u)]
-satz191:=realapp4(moreis(pl(r,t),pl(s,u)),[x:dif][y:dif][z:dif][v:dif][xi:inn(x,class(r))][yi:inn(y,class(s))][zi:inn(z,class(t))][vi:inn(v,class(u))]t2".3r191"(x,y,z,v,xi,yi,zi,vi,m,n)):moreis(pl(r,t),pl(s,u))
-u@[l:lessis(r,s)][k:lessis(t,u)]
-satz191a:=satz168a(pl(s,u),pl(r,t),satz191(s,r,u,t,satz168b(l),satz168b(t,u,k))):lessis(pl(r,t),pl(s,u))
-@timesdr:=[x:dif][y:dif]realof(td(x,y)):[x:dif][y:dif]real
-+ivr4
-[a:dif][b:dif][c:dif][d:dif][e:eq"rp"(a,b)][f:eq"rp"(c,d)]
-t1:=isin(realof(td(a,c)),realof(td(b,d)),td(a,c),td(b,d),innclass(td(a,c)),innclass(td(b,d)),eqtd12(a,b,c,d,e,f)):is(<c><a>timesdr,<d><b>timesdr)
--ivr4
-ftimesdr:=[x:dif][y:dif][z:dif][v:dif][t:<y><x>eq][u:<v><z>eq]t1".ivr4"(x,y,z,v,t,u):fixf2(real,timesdr)
-s@ts:=indreal2(real,timesdr,ftimesdr,r,s):real
-+*ivr4
-b1is@t2:=isindreal2(real,timesdr,ftimesdr,r,s,a1,b1,a1ir,b1is):is(realof(td(a1,b1)),ts(r,s))
--ivr4
-b1is@tict:=isp(real,[x:real]inn(td(a1,b1),class(x)),realof(td(a1,b1)),ts(r,s),innclass(td(a1,b1)),t2".ivr4"):inn(td(a1,b1),class(ts(r,s)))
-t@[i:is(r,s)]
-ists1:=isf(real,real,[x:real]ts(x,t),r,s,i):is(ts(r,t),ts(s,t))
-ists2:=isf(real,real,[x:real]ts(t,x),r,s,i):is(ts(t,r),ts(t,s))
-u@[i:is(r,s)][j:is(t,u)]
-ists12:=tris(real,ts(r,t),ts(s,t),ts(s,u),ists1(i),ists2(t,u,s,j)):is(ts(r,t),ts(s,u))
-+4r192
-b1is@[i:is(r,0)]
-t1:=satzd192a(a1,b1,0ex(r,a1,a1ir,i)):zero(td(a1,b1))
-t2:=0in(ts(r,s),td(a1,b1),tict,t1):is(ts(r,s),0)
--4r192
-s@[i:is(r,0)]
-satz192a:=realapp2(is(ts(r,s),0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".4r192"(x,y,t,u,i)):is(ts(r,s),0)
-+*4r192
-b1is@[i:is(s,0)]
-t3:=satzd192b(a1,b1,0ex(s,b1,b1is,i)):zero(td(a1,b1))
-t4:=0in(ts(r,s),td(a1,b1),tict,t3):is(ts(r,s),0)
--4r192
-s@[i:is(s,0)]
-satz192b:=realapp2(is(ts(r,s),0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t4".4r192"(x,y,t,u,i)):is(ts(r,s),0)
-+*4r192
-b1is@[i:is(ts(r,s),0)]
-t5:=satzd192c(a1,b1,0ex(ts(r,s),td(a1,b1),tict,i)):or(zero(a1),zero(b1))
-t6:=th9"l.or"(zero(a1),zero(b1),is(r,0),is(s,0),t5,[t:zero(a1)]0in(r,a1,a1ir,t),[t:zero(b1)]0in(s,b1,b1is,t)):or(is(r,0),is(s,0))
--4r192
-s@[i:is(ts(r,s),0)]
-satz192c:=realapp2(or(is(r,0),is(s,0)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".4r192"(x,y,t,u,i)):or(is(r,0),is(s,0))
-s@[n:nis(r,0)][o:nis(s,0)]
-satz192d:=th3"l.imp"(is(ts(r,s),0),or(is(r,0),is(s,0)),th3"l.or"(is(r,0),is(s,0),n,o),[t:is(ts(r,s),0)]satz192c(t)):nis(ts(r,s),0)
-s@[i:is(r,0)]
-ts01:=satz192a(i):is(ts(r,s),0)
-s@[i:is(s,0)]
-ts02:=satz192b(i):is(ts(r,s),0)
-+4r193
-b1is@t1:=satzd193(a1,b1):eq"rp"(absd(td(a1,b1)),td(absd(a1),absd(b1)))
-t2:=isin(abs(ts(r,s)),ts(abs(r),abs(s)),absd(td(a1,b1)),td(absd(a1),absd(b1)),aica(ts(r,s),td(a1,b1),tict),tict(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is)),t1):is(abs(ts(r,s)),ts(abs(r),abs(s)))
--4r193
-s@satz193:=realapp2(is(abs(ts(r,s)),ts(abs(r),abs(s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".4r193"(x,y,t,u)):is(abs(ts(r,s)),ts(abs(r),abs(s)))
-satz193a:=symis(real,abs(ts(r,s)),ts(abs(r),abs(s)),satz193):is(ts(abs(r),abs(s)),abs(ts(r,s)))
-+4r194
-b1is@t1:=satzd194(a1,b1):eq"rp"(td(a1,b1),td(b1,a1))
-t2:=isin(ts(r,s),ts(s,r),td(a1,b1),td(b1,a1),tict,tict(s,r,b1,a1,b1is,a1ir),t1):is(ts(r,s),ts(s,r))
--4r194
-satz194:=realapp2(is(ts(r,s),ts(s,r)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".4r194"(x,y,t,u)):is(ts(r,s),ts(s,r))
-comts:=satz194:is(ts(r,s),ts(s,r))
-@1rl:=realof(1df):real
-pos1:=posin(1rl,1df,innclass(1df),posdirp(1rp)):pos(1rl)
-natrl1:=natrli(1):natrl(1rl)
-intrl1:=natintrl(1rl,natrl1):intrl(1rl)
-+4r195
-a0ir@t1:=satzd195(a0):eq"rp"(td(a0,1df),a0)
-t2:=isin(ts(r,1rl),r,td(a0,1df),a0,tict(r,1rl,a0,1df,a0ir,innclass(1df)),a0ir,t1):is(ts(r,1rl),r)
--4r195
-r@satz195:=realapp1(is(ts(r,1rl),r),[x:dif][t:inn(x,class(r))]t2".4r195"(x,t)):is(ts(r,1rl),r)
-satz195a:=symis(real,ts(r,1rl),r,satz195):is(r,ts(r,1rl))
-satz195b:=tris(real,ts(1rl,r),ts(r,1rl),r,comts(1rl,r),satz195):is(ts(1rl,r),r)
-satz195c:=symis(real,ts(1rl,r),r,satz195b):is(r,ts(1rl,r))
-s@[p:pos(r)][q:pos(s)]
-satz196a:=symis(real,ts(abs(r),abs(s)),ts(r,s),ists12(abs(r),r,abs(s),s,absp(r,p),absp(s,q))):is(ts(r,s),ts(abs(r),abs(s)))
-+4r196
-b1is@[n:neg(r)][o:neg(s)]
-t1:=satzd196b(a1,b1,negex(r,a1,a1ir,n),negex(s,b1,b1is,o)):eq"rp"(td(a1,b1),td(absd(a1),absd(b1)))
-t2:=isin(ts(r,s),ts(abs(r),abs(s)),td(a1,b1),td(absd(a1),absd(b1)),tict,tict(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is)),t1):is(ts(r,s),ts(abs(r),abs(s)))
--4r196
-s@[n:neg(r)][o:neg(s)]
-satz196b:=realapp2(is(ts(r,s),ts(abs(r),abs(s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".4r196"(x,y,t,u,n,o)):is(ts(r,s),ts(abs(r),abs(s)))
-+*4r196
-b1is@[p:pos(r)][n:neg(s)]
-t1a:=satzd196c(a1,b1,posex(r,a1,a1ir,p),negex(s,b1,b1is,n)):eq"rp"(td(a1,b1),m0d(td(absd(a1),absd(b1))))
-t2a:=isin(ts(r,s),m0(ts(abs(r),abs(s))),td(a1,b1),m0d(td(absd(a1),absd(b1))),tict,micm0(ts(abs(r),abs(s)),td(absd(a1),absd(b1)),tict(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is))),t1a):is(ts(r,s),m0(ts(abs(r),abs(s))))
--4r196
-s@[p:pos(r)][n:neg(s)]
-satz196c:=realapp2(is(ts(r,s),m0(ts(abs(r),abs(s)))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2a".4r196"(x,y,t,u,p,n)):is(ts(r,s),m0(ts(abs(r),abs(s))))
-s@[n:neg(r)][p:pos(s)]
-satz196d:=tr3is(real,ts(r,s),ts(s,r),m0(ts(abs(s),abs(r))),m0(ts(abs(r),abs(s))),comts(r,s),satz196c(s,r,p,n),ism0(ts(abs(s),abs(r)),ts(abs(r),abs(s)),comts(abs(s),abs(r)))):is(ts(r,s),m0(ts(abs(r),abs(s))))
-+*4r196
-a0ir@[n:not(is(r,0))]
-t3:=th3"l.imp"(zero(a0),is(r,0),n,[t:zero(a0)]0in(t)):not(zero(a0))
-b1is@[n:not(is(r,0))][o:not(is(s,0))][i:is(ts(r,s),ts(abs(r),abs(s)))]
-t4:=satzd196e(a1,b1,t3(r,a1,a1ir,n),t3(s,b1,b1is,o),isex(ts(r,s),ts(abs(r),abs(s)),td(a1,b1),td(absd(a1),absd(b1)),tict,tict(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is)),i)):or(and(posd(a1),posd(b1)),and(negd(a1),negd(b1)))
-[a:and(posd(a1),posd(b1))]
-t5:=andi(pos(r),pos(s),posin(r,a1,a1ir,ande1(posd(a1),posd(b1),a)),posin(s,b1,b1is,ande2(posd(a1),posd(b1),a))):and(pos(r),pos(s))
-i@[a:and(negd(a1),negd(b1))]
-t6:=andi(neg(r),neg(s),negin(r,a1,a1ir,ande1(negd(a1),negd(b1),a)),negin(s,b1,b1is,ande2(negd(a1),negd(b1),a))):and(neg(r),neg(s))
-i@t7:=th9"l.or"(and(posd(a1),posd(b1)),and(negd(a1),negd(b1)),and(pos(r),pos(s)),and(neg(r),neg(s)),t4,[t:and(posd(a1),posd(b1))]t5(t),[t:and(negd(a1),negd(b1))]t6(t)):or(and(pos(r),pos(s)),and(neg(r),neg(s)))
--4r196
-s@[n:not(is(r,0))][o:not(is(s,0))][i:is(ts(r,s),ts(abs(r),abs(s)))]
-satz196e:=realapp2(or(and(pos(r),pos(s)),and(neg(r),neg(s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t7".4r196"(x,y,t,u,n,o,i)):or(and(pos(r),pos(s)),and(neg(r),neg(s)))
-+*4r196
-o@[i:is(ts(r,s),m0(ts(abs(r),abs(s))))]
-t8:=satzd196f(a1,b1,t3(r,a1,a1ir,n),t3(s,b1,b1is,o),isex(ts(r,s),m0(ts(abs(r),abs(s))),td(a1,b1),m0d(td(absd(a1),absd(b1))),tict,micm0(ts(abs(r),abs(s)),td(absd(a1),absd(b1)),tict(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is))),i)):or(and(posd(a1),negd(b1)),and(negd(a1),posd(b1)))
-[a:and(posd(a1),negd(b1))]
-t9:=andi(pos(r),neg(s),posin(r,a1,a1ir,ande1(posd(a1),negd(b1),a)),negin(s,b1,b1is,ande2(posd(a1),negd(b1),a))):and(pos(r),neg(s))
-i@[a:and(negd(a1),posd(b1))]
-t10:=andi(neg(r),pos(s),negin(r,a1,a1ir,ande1(negd(a1),posd(b1),a)),posin(s,b1,b1is,ande2(negd(a1),posd(b1),a))):and(neg(r),pos(s))
-i@t11:=th9"l.or"(and(posd(a1),negd(b1)),and(negd(a1),posd(b1)),and(pos(r),neg(s)),and(neg(r),pos(s)),t8,[t:and(posd(a1),negd(b1))]t9(t),[t:and(negd(a1),posd(b1))]t10(t)):or(and(pos(r),neg(s)),and(neg(r),pos(s)))
--4r196
-o@[i:is(ts(r,s),m0(ts(abs(r),abs(s))))]
-satz196f:=realapp2(or(and(pos(r),neg(s)),and(neg(r),pos(s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t11".4r196"(x,y,t,u,n,o,i)):or(and(pos(r),neg(s)),and(neg(r),pos(s)))
-s@[p:pos(ts(r,s))]
-+*4r196
-p"r"@t12:=th3"l.imp"(is(r,0),is(ts(r,s),0),pnot0(ts(r,s),p),[t:is(r,0)]ts01(r,s,t)):nis(r,0)
-t13:=th3"l.imp"(is(s,0),is(ts(r,s),0),pnot0(ts(r,s),p),[t:is(s,0)]ts02(r,s,t)):nis(s,0)
-t14:=tris1(real,ts(r,s),ts(abs(r),abs(s)),abs(ts(r,s)),absp(ts(r,s),p),satz193(r,s)):is(ts(r,s),ts(abs(r),abs(s)))
--4r196
-p@satz196g:=satz196e(t12".4r196",t13".4r196",t14".4r196"):or(and(pos(r),pos(s)),and(neg(r),neg(s)))
-s@[n:neg(ts(r,s))]
-+*4r196
-n"r"@t15:=th3"l.imp"(is(r,0),is(ts(r,s),0),nnot0(ts(r,s),n),[t:is(r,0)]ts01(r,s,t)):nis(r,0)
-t16:=th3"l.imp"(is(s,0),is(ts(r,s),0),nnot0(ts(r,s),n),[t:is(s,0)]ts02(r,s,t)):nis(s,0)
-t17:=satz177c(ts(abs(r),abs(s)),ts(r,s),tris(real,ts(abs(r),abs(s)),abs(ts(r,s)),m0(ts(r,s)),satz193a(r,s),absn(ts(r,s),n))):is(ts(r,s),m0(ts(abs(r),abs(s))))
--4r196
-n@satz196h:=satz196f(t15".4r196",t16".4r196",t17".4r196"):or(and(pos(r),neg(s)),and(neg(r),pos(s)))
-+4r197
-b1is@t1:=satzd197a(a1,b1):eq"rp"(td(m0d(a1),b1),m0d(td(a1,b1)))
-t2:=isin(ts(m0(r),s),m0(ts(r,s)),td(m0d(a1),b1),m0d(td(a1,b1)),tict(m0(r),s,m0d(a1),b1,micm0(r,a1,a1ir),b1is),micm0(ts(r,s),td(a1,b1),tict),t1):is(ts(m0(r),s),m0(ts(r,s)))
--4r197
-s@satz197a:=realapp2(is(ts(m0(r),s),m0(ts(r,s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".4r197"(x,y,t,u)):is(ts(m0(r),s),m0(ts(r,s)))
-satz197b:=tr3is(real,ts(r,m0(s)),ts(m0(s),r),m0(ts(s,r)),m0(ts(r,s)),comts(r,m0(s)),satz197a(s,r),ism0(ts(s,r),ts(r,s),comts(s,r))):is(ts(r,m0(s)),m0(ts(r,s)))
-satz197c:=tris2(real,ts(m0(r),s),ts(r,m0(s)),m0(ts(r,s)),satz197a,satz197b):is(ts(m0(r),s),ts(r,m0(s)))
-satz197d:=symis(real,ts(m0(r),s),ts(r,m0(s)),satz197c):is(ts(r,m0(s)),ts(m0(r),s))
-satz197e:=symis(real,ts(m0(r),s),m0(ts(r,s)),satz197a):is(m0(ts(r,s)),ts(m0(r),s))
-satz197f:=symis(real,ts(r,m0(s)),m0(ts(r,s)),satz197b):is(m0(ts(r,s)),ts(r,m0(s)))
-satz198:=tris(real,ts(m0(r),m0(s)),ts(r,m0(m0(s))),ts(r,s),satz197c(r,m0(s)),ists2(m0(m0(s)),s,r,satz177(s))):is(ts(m0(r),m0(s)),ts(r,s))
-satz198a:=symis(real,ts(m0(r),m0(s)),ts(r,s),satz198):is(ts(r,s),ts(m0(r),m0(s)))
-+*ivr4
-b1is@[p:pos(r)][q:pos(s)]
-t3:=ptdpp(a1,b1,posex(r,a1,a1ir,p),posex(s,b1,b1is,q)):posd(td(a1,b1))
-t4:=posin(ts(r,s),td(a1,b1),tict,t3):pos(ts(r,s))
--ivr4
-s@[p:pos(r)][q:pos(s)]
-postspp:=realapp2(pos(ts(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t4".ivr4"(x,y,t,u,p,q)):pos(ts(r,s))
-+*ivr4
-p@[n:neg(s)]
-t5:=ntdpn(a1,b1,posex(r,a1,a1ir,p),negex(s,b1,b1is,n)):negd(td(a1,b1))
-t6:=negin(ts(r,s),td(a1,b1),tict,t5):neg(ts(r,s))
--ivr4
-s@[p:pos(r)][n:neg(s)]
-negtspn:=realapp2(neg(ts(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".ivr4"(x,y,t,u,p,n)):neg(ts(r,s))
-s@[n:neg(r)][p:pos(s)]
-negtsnp:=isneg(ts(s,r),ts(r,s),comts(s,r),negtspn(s,r,p,n)):neg(ts(r,s))
-s@[n:neg(r)][o:neg(s)]
-postsnn:=ispos(ts(m0(r),m0(s)),ts(r,s),satz198,postspp(m0(r),m0(s),satz176c(r,n),satz176c(s,o))):pos(ts(r,s))
-r@[n:nis(r,0)]
-possq:=rapp(r,pos(ts(r,r)),[t:pos(r)]postspp(r,r,t,t),th2"l.imp"(is(r,0),pos(ts(r,r)),n),[t:neg(r)]postsnn(r,r,t,t)):pos(ts(r,r))
-r@nnegsq:=th1"l.imp"(is(r,0),not(neg(ts(r,r))),[t:is(r,0)]0notn(ts(r,r),satz192a(r,r,t)),[t:nis(r,0)]pnotn(ts(r,r),possq(r,t))):not(neg(ts(r,r)))
-+4r199
-c2it@t1:=satzd199(a2,b2,c2):eq"rp"(td(td(a2,b2),c2),td(a2,td(b2,c2)))
-t2:=isin(ts(ts(r,s),t),ts(r,ts(s,t)),td(td(a2,b2),c2),td(a2,td(b2,c2)),tict(ts(r,s),t,td(a2,b2),c2,tict(r,s,a2,b2,a2ir,b2is),c2it),tict(r,ts(s,t),a2,td(b2,c2),a2ir,tict(s,t,b2,c2,b2is,c2it)),t1):is(ts(ts(r,s),t),ts(r,ts(s,t)))
--4r199
-t@satz199:=realapp3(is(ts(ts(r,s),t),ts(r,ts(s,t))),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".4r199"(x,y,z,u,v,w)):is(ts(ts(r,s),t),ts(r,ts(s,t)))
-assts1:=satz199:is(ts(ts(r,s),t),ts(r,ts(s,t)))
-assts2:=symis(real,ts(ts(r,s),t),ts(r,ts(s,t)),satz199):is(ts(r,ts(s,t)),ts(ts(r,s),t))
-+4r201
-c2it@t1:=satzd201(a2,b2,c2):eq"rp"(td(a2,pd(b2,c2)),pd(td(a2,b2),td(a2,c2)))
-t2:=isin(ts(r,pl(s,t)),pl(ts(r,s),ts(r,t)),td(a2,pd(b2,c2)),pd(td(a2,b2),td(a2,c2)),tict(r,pl(s,t),a2,pd(b2,c2),a2ir,picp(s,t,b2,c2,b2is,c2it)),picp(ts(r,s),ts(r,t),td(a2,b2),td(a2,c2),tict(r,s,a2,b2,a2ir,b2is),tict(r,t,a2,c2,a2ir,c2it)),t1):is(ts(r,pl(s,t)),pl(ts(r,s),ts(r,t)))
--4r201
-satz201:=realapp3(is(ts(r,pl(s,t)),pl(ts(r,s),ts(r,t))),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".4r201"(x,y,z,u,v,w)):is(ts(r,pl(s,t)),pl(ts(r,s),ts(r,t)))
-disttp1:=tr3is(real,ts(pl(r,s),t),ts(t,pl(r,s)),pl(ts(t,r),ts(t,s)),pl(ts(r,t),ts(s,t)),comts(pl(r,s),t),satz201(t,r,s),ispl12(ts(t,r),ts(r,t),ts(t,s),ts(s,t),comts(t,r),comts(t,s))):is(ts(pl(r,s),t),pl(ts(r,t),ts(s,t)))
-disttp2:=satz201:is(ts(r,pl(s,t)),pl(ts(r,s),ts(r,t)))
-distpt1:=symis(real,ts(pl(r,s),t),pl(ts(r,t),ts(s,t)),disttp1):is(pl(ts(r,t),ts(s,t)),ts(pl(r,s),t))
-distpt2:=symis(real,ts(r,pl(s,t)),pl(ts(r,s),ts(r,t)),disttp2):is(pl(ts(r,s),ts(r,t)),ts(r,pl(s,t)))
-satz202:=tris(real,ts(r,mn(s,t)),pl(ts(r,s),ts(r,m0(t))),mn(ts(r,s),ts(r,t)),disttp2(r,s,m0(t)),ispl2(ts(r,m0(t)),m0(ts(r,t)),ts(r,s),satz197b(r,t))):is(ts(r,mn(s,t)),mn(ts(r,s),ts(r,t)))
-disttm1:=tris(real,ts(mn(r,s),t),pl(ts(r,t),ts(m0(s),t)),mn(ts(r,t),ts(s,t)),disttp1(r,m0(s),t),ispl2(ts(m0(s),t),m0(ts(s,t)),ts(r,t),satz197a(s,t))):is(ts(mn(r,s),t),mn(ts(r,t),ts(s,t)))
-disttm2:=satz202:is(ts(r,mn(s,t)),mn(ts(r,s),ts(r,t)))
-distmt1:=symis(real,ts(mn(r,s),t),mn(ts(r,t),ts(s,t)),disttm1):is(mn(ts(r,t),ts(s,t)),ts(mn(r,s),t))
-distmt2:=symis(real,ts(r,mn(s,t)),mn(ts(r,s),ts(r,t)),disttm2):is(mn(ts(r,s),ts(r,t)),ts(r,mn(s,t)))
-satz200:=satz202:is(ts(r,mn(s,t)),mn(ts(r,s),ts(r,t)))
-+4r203
-c2it@[m:more(r,s)][p:pos(t)]
-t1:=satzd203a(a2,b2,c2,moreex(r,s,a2,b2,a2ir,b2is,m),posex(t,c2,c2it,p)):mored(td(a2,c2),td(b2,c2))
-t2:=morein(ts(r,t),ts(s,t),td(a2,c2),td(b2,c2),tict(r,t,a2,c2,a2ir,c2it),tict(s,t,b2,c2,b2is,c2it),t1):more(ts(r,t),ts(s,t))
--4r203
-[m:more(r,s)][p:pos(t)]
-satz203a:=realapp3(more(ts(r,t),ts(s,t)),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".4r203"(x,y,z,u,v,w,m,p)):more(ts(r,t),ts(s,t))
-m@[i:is(t,0)]
-satz203b:=tris2(real,ts(r,t),ts(s,t),0,ts02(r,t,i),ts02(s,t,i)):is(ts(r,t),ts(s,t))
-+*4r203
-m@[n:neg(t)]
-t3:=satzd203c(a2,b2,c2,moreex(r,s,a2,b2,a2ir,b2is,m),negex(t,c2,c2it,n)):lessd(td(a2,c2),td(b2,c2))
-t4:=lessin(ts(r,t),ts(s,t),td(a2,c2),td(b2,c2),tict(r,t,a2,c2,a2ir,c2it),tict(s,t,b2,c2,b2is,c2it),t3):less(ts(r,t),ts(s,t))
--4r203
-m@[n:neg(t)]
-satz203c:=realapp3(less(ts(r,t),ts(s,t)),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t4".4r203"(x,y,z,u,v,w,m,n)):less(ts(r,t),ts(s,t))
-p@satz203d:=ismore12(ts(r,t),ts(t,r),ts(s,t),ts(t,s),comts(r,t),comts(s,t),satz203a):more(ts(t,r),ts(t,s))
-i@satz203e:=tris2(real,ts(t,r),ts(t,s),0,ts01(t,r,i),ts01(t,s,i)):is(ts(t,r),ts(t,s))
-n@satz203f:=isless12(ts(r,t),ts(t,r),ts(s,t),ts(t,s),comts(r,t),comts(s,t),satz203c):less(ts(t,r),ts(t,s))
-t@[l:less(r,s)][p:pos(t)]
-satz203g:=lemma1(ts(s,t),ts(r,t),satz203a(s,r,t,lemma2(r,s,l),p)):less(ts(r,t),ts(s,t))
-l@[i:is(t,0)]
-satz203h:=tris2(real,ts(r,t),ts(s,t),0,ts02(r,t,i),ts02(s,t,i)):is(ts(r,t),ts(s,t))
-l@[n:neg(t)]
-satz203j:=lemma2(ts(s,t),ts(r,t),satz203c(s,r,t,lemma2(r,s,l),n)):more(ts(r,t),ts(s,t))
-p@satz203k:=lemma1(ts(t,s),ts(t,r),satz203d(s,r,t,lemma2(r,s,l),p)):less(ts(t,r),ts(t,s))
-i@satz203l:=tris2(real,ts(t,r),ts(t,s),0,ts01(t,r,i),ts01(t,s,i)):is(ts(t,r),ts(t,s))
-n@satz203m:=lemma2(ts(t,s),ts(t,r),satz203f(s,r,t,lemma2(r,s,l),n)):more(ts(t,r),ts(t,s))
-+4r204
-a0ir@[n1:nis(r,0)]
-t1:=th3"l.imp"(zero(a0),is(r,0),n1,[t:zero(a0)]0in(t)):not(zero(a0))
-d3iu@[n1:nis(s,0)][i:is(ts(s,t),r)][j:is(ts(s,u),r)]
-t2:=satzd204b(a3,b3,t1(s,b3,b3is,n1),c3,d3,isex(ts(s,t),r,td(b3,c3),a3,tict(s,t,b3,c3,b3is,c3it),a3ir,i),isex(ts(s,u),r,td(b3,d3),a3,tict(s,u,b3,d3,b3is,d3iu),a3ir,j)):eq"rp"(c3,d3)
-t3:=isin(t,u,c3,d3,c3it,d3iu,t2):is(t,u)
--4r204
-s@[n:nis(s,0)][x:real][y:real][i:is(ts(s,x),r)][j:is(ts(s,y),r)]
-satz204b:=realapp4(x,y,is(x,y),[z:dif][u:dif][v:dif][w:dif][zi:inn(z,class(r))][ui:inn(u,class(s))][vi:inn(v,class(x))][wi:inn(w,class(y))]t3".4r204"(x,y,z,u,v,w,zi,ui,vi,wi,n,i,j)):is(x,y)
-+*4r204
-b1is@[n1:nis(s,0)]
-t4:=satzd204a(a1,b1,t1(s,b1,b1is,n1)):some"l"(dif,[x:dif]eq"rp"(td(b1,x),a1))
-[a:dif][e:eq"rp"(td(b1,a),a1)]
-ar:=realof(a):real
-t5:=isin(ts(s,ar),r,td(b1,a),a1,tict(s,ar,b1,a,b1is,innclass(a)),a1ir,e):is(ts(s,ar),r)
-t6:=somei(real,[x:real]is(ts(s,x),r),ar,t5):some([x:real]is(ts(s,x),r))
-n1@t7:=someapp(dif,[x:dif]eq"rp"(td(b1,x),a1),t4,some([x:real]is(ts(s,x),r)),[x:dif][t:eq"rp"(td(b1,x),a1)]t6(x,t)):some([x:real]is(ts(s,x),r))
--4r204
-n@satz204a:=realapp2(some([x:real]is(ts(s,x),r)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t7".4r204"(x,y,t,u,n)):some([x:real]is(ts(s,x),r))
-satz204:=onei(real,[x:real]is(ts(s,x),r),[x:real][y:real][t:is(ts(s,x),r)][u:is(ts(s,y),r)]satz204b(x,y,t,u),satz204a):one([x:real]is(ts(s,x),r))
-ov:=ind(real,[x:real]is(ts(s,x),r),satz204):real
-satz204c:=oneax(real,[x:real]is(ts(s,x),r),satz204):is(ts(s,ov(r,s,n)),r)
-satz204d:=symis(real,ts(s,ov(r,s,n)),r,satz204c):is(r,ts(s,ov(r,s,n)))
-satz204e:=tris(real,ts(ov(r,s,n),s),ts(s,ov(r,s,n)),r,comts(ov(r,s,n),s),satz204c):is(ts(ov(r,s,n),s),r)
-satz204f:=symis(real,ts(ov(r,s,n),s),r,satz204e):is(r,ts(ov(r,s,n),s))
-s@[x:real][n:nis(s,0)][i:is(ts(s,x),r)]
-satz204g:=satz204b(n,x,ov(r,s,n),i,satz204c(n)):is(x,ov(r,s,n))
-s@[n:nis(s,0)][p:pos(r)][q:pos(s)]
-+*4r204
-n@ros:=ov(r,s,n):real
-p@t8:=ispos(r,ts(s,ros),satz204d(n),p):pos(ts(s,ros))
-q@t9:=th1"l.and"(neg(s),neg(ros),pnotn(s,q)):not(and(neg(s),neg(ros)))
-t10:=ore1(and(pos(s),pos(ros)),and(neg(s),neg(ros)),satz196g(s,ros,t8),t9):and(pos(s),pos(ros))
--4r204
-q@posovpp:=ande2(pos(s),pos(ov(r,s,n)),t10".4r204"):pos(ov(r,s,n))
-p@[m:neg(s)]
-+*4r204
-m@t11:=th1"l.and"(pos(s),pos(ros),nnotp(s,m)):not(and(pos(s),pos(ros)))
-t12:=ore2(and(pos(s),pos(ros)),and(neg(s),neg(ros)),satz196g(s,ros,t8),t11):and(neg(s),neg(ros))
--4r204
-m@negovpn:=ande2(neg(s),neg(ov(r,s,n)),t12".4r204"):neg(ov(r,s,n))
-n@[m:neg(r)][p:pos(s)]
-+*4r204
-m@t13:=isneg(r,ts(s,ros),satz204d(n),m):neg(ts(s,ros))
-p@t14:=th1"l.and"(neg(s),pos(ros),pnotn(s,p)):not(and(neg(s),pos(ros)))
-t15:=ore1(and(pos(s),neg(ros)),and(neg(s),pos(ros)),satz196h(s,ros,t13),t14):and(pos(s),neg(ros))
--4r204
-p@negovnp:=ande2(pos(s),neg(ov(r,s,n)),t15".4r204"):neg(ov(r,s,n))
-m@[l:neg(s)]
-+*4r204
-l@t16:=th1"l.and"(pos(s),neg(ros),nnotp(s,l)):not(and(pos(s),neg(ros)))
-t17:=ore2(and(pos(s),neg(ros)),and(neg(s),pos(ros)),satz196h(s,ros,t13),t16):and(neg(s),pos(ros))
--4r204
-l@posovnn:=ande2(neg(s),pos(ov(r,s,n)),t17".4r204"):pos(ov(r,s,n))
-@[r0:cut][s0:cut][m:more"rp"(r0,s0)]
-morerpep:=morein(pofrp(r0),pofrp(s0),pdofrp(r0),pdofrp(s0),innclass(pdofrp(r0)),innclass(pdofrp(s0)),morerpepd(r0,s0,m)):more(pofrp(r0),pofrp(s0))
-s0@[m:more(pofrp(r0),pofrp(s0))]
-morerpip:=morerpipd(r0,s0,moreex(pofrp(r0),pofrp(s0),pdofrp(r0),pdofrp(s0),innclass(pdofrp(r0)),innclass(pdofrp(s0)),m)):more"rp"(r0,s0)
-s0@[l:less"rp"(r0,s0)]
-lessrpep:=lemma1(pofrp(s0),pofrp(r0),morerpep(s0,r0,satz122(r0,s0,l))):less(pofrp(r0),pofrp(s0))
-s0@[l:less(pofrp(r0),pofrp(s0))]
-lessrpip:=satz121(s0,r0,morerpip(s0,r0,lemma2(pofrp(r0),pofrp(s0),l))):less"rp"(r0,s0)
-s@[p:pos(r)][q:pos(s)][m:more(r,s)]
-q@[m:more(r,s)]
-+ivr5
-t1:=ismore12(r,pofrp(rpofp(r,p)),s,pofrp(rpofp(s,q)),isprp1(r,p),isprp1(s,q),m):more(pofrp(rpofp(r,p)),pofrp(rpofp(s,q)))
--ivr5
-moreperp:=morerpip(rpofp(r,p),rpofp(s,q),t1".ivr5"):more"rp"(rpofp(r,p),rpofp(s,q))
-q@[m:more"rp"(rpofp(r,p),rpofp(s,q))]
-+*ivr5
-m@t2:=morerpep(rpofp(r,p),rpofp(s,q),m):more(pofrp(rpofp(r,p)),pofrp(rpofp(s,q)))
--ivr5
-m@morepirp:=ismore12(pofrp(rpofp(r,p)),r,pofrp(rpofp(s,q)),s,isprp2(r,p),isprp2(s,q),t2".ivr5"):more(r,s)
-q@[l:less(r,s)]
-lessperp:=satz121(rpofp(s,q),rpofp(r,p),moreperp(s,r,q,p,lemma2(r,s,l))):less"rp"(rpofp(r,p),rpofp(s,q))
-q@[l:less"rp"(rpofp(r,p),rpofp(s,q))]
-lesspirp:=lemma1(s,r,morepirp(s,r,q,p,satz122(rpofp(r,p),rpofp(s,q),l))):less(r,s)
-r@s01:=setof(real,[x:real]lessis(x,r)):set(real)
-s02:=setof(real,[x:real]more(x,r)):set(real)
-+5r205
-s@[n:not(in(s,s01))]
-t1:=th3"l.imp"(lessis(s,r),in(s,s01),n,[t:lessis(s,r)]estii(real,[x:real]lessis(x,r),s,t)):not(lessis(s,r))
-t2:=estii(real,[x:real]more(x,r),s,satz167k(s,r,t1)):in(s,s02)
--5r205
-vb00:=[x:real][t:not(in(x,s01))]t2".5r205"(x,t):all([x:real]or(in(x,s01),in(x,s02)))
-+*5r205
-r@t3:=estii(real,[x:real]lessis(x,r),r,lessisi2(r,r,refis(real,r))):in(r,s01)
--5r205
-r@vb01a:=nonemptyi(real,s01,r,t3".5r205"):nonempty(real,s01)
-+*5r205
-r@t4:=ismore2(pl(r,0),r,pl(r,1rl),pl02(r,0,refis(real,0)),satz188k(1rl,0,r,satz169a(1rl,pos1))):more(pl(r,1rl),r)
-t5:=estii(real,[x:real]more(x,r),pl(r,1rl),t4):in(pl(r,1rl),s02)
--5r205
-r@vb01b:=nonemptyi(real,s02,pl(r,1rl),t5".5r205"):nonempty(real,s02)
-+*5r205
-s@[i:in(s,s01)][t:real][j:in(t,s02)]
-t6:=satz172a(s,r,t,estie(real,[x:real]lessis(x,r),s,i),lemma1(t,r,estie(real,[x:real]more(x,r),t,j))):less(s,t)
--5r205
-r@vb02:=[x:real][t:in(x,s01)][y:real][u:in(y,s02)]t6".5r205"(x,t,y,u):all([x:real][t:in(x,s01)]all([y:real][u:in(y,s02)]less(x,y)))
-s@[l:less(s,r)]
-vb03a:=estii(real,[x:real]lessis(x,r),s,lessisi1(s,r,l)):in(s,s01)
-s@[m:more(s,r)]
-vb03b:=estii(real,[x:real]more(x,r),s,m):in(s,s02)
-r@s11:=setof(real,[x:real]less(x,r)):set(real)
-s12:=setof(real,[x:real]moreis(x,r)):set(real)
-+*5r205
-s@[n:not(in(s,s11))]
-t7:=th3"l.imp"(less(s,r),in(s,s11),n,[t:less(s,r)]estii(real,[x:real]less(x,r),s,t)):not(less(s,r))
-t8:=estii(real,[x:real]moreis(x,r),s,satz167f(s,r,t7)):in(s,s12)
--5r205
-r@vb10:=[x:real][t:not(in(x,s11))]t8".5r205"(x,t):all([x:real]or(in(x,s11),in(x,s12)))
-+*5r205
-r@t9:=isless2(pl(r,0),r,mn(r,1rl),pl02(r,0,refis(real,0)),satz188m(m0(1rl),0,r,satz169c(m0(1rl),satz176a(1rl,pos1)))):less(mn(r,1rl),r)
-t10:=estii(real,[x:real]less(x,r),mn(r,1rl),t9):in(mn(r,1rl),s11)
--5r205
-r@vb11a:=nonemptyi(real,s11,mn(r,1rl),t10".5r205"):nonempty(real,s11)
-+*5r205
-r@t11:=estii(real,[x:real]moreis(x,r),r,moreisi2(r,r,refis(real,r))):in(r,s12)
--5r205
-r@vb11b:=nonemptyi(real,s12,r,t11".5r205"):nonempty(real,s12)
-+*5r205
-s@[i:in(s,s11)][t:real][j:in(t,s12)]
-t12:=satz172b(s,r,t,estie(real,[x:real]less(x,r),s,i),satz168a(t,r,estie(real,[x:real]moreis(x,r),t,j))):less(s,t)
--5r205
-r@vb12:=[x:real][t:in(x,s11)][y:real][u:in(y,s12)]t12".5r205"(x,t,y,u):all([x:real][t:in(x,s11)]all([y:real][u:in(y,s12)]less(x,y)))
-s@[l:less(s,r)]
-vb13a:=estii(real,[x:real]less(x,r),s,l):in(s,s11)
-s@[m:more(s,r)]
-vb13b:=estii(real,[x:real]moreis(x,r),s,moreisi1(s,r,m)):in(s,s12)
-@2rl:=pl(1rl,1rl):real
-pos2:=pospl(1rl,1rl,pos1,pos1):pos(2rl)
-half:=ov(1rl,2rl,pnot0(2rl,pos2)):real
-poshalf:=posovpp(1rl,2rl,pnot0(2rl,pos2),pos1,pos2):pos(half)
-+*ivr5
-r@t3:=tris(real,pl(r,r),pl(ts(1rl,r),ts(1rl,r)),ts(2rl,r),ispl12(r,ts(1rl,r),r,ts(1rl,r),satz195c(r),satz195c(r)),distpt1(1rl,1rl,r)):is(pl(r,r),ts(2rl,r))
-t4:=tr4is(real,ts(half,pl(r,r)),ts(half,ts(2rl,r)),ts(ts(half,2rl),r),ts(1rl,r),r,ists2(pl(r,r),ts(2rl,r),half,t3),assts2(half,2rl,r),ists1(ts(half,2rl),1rl,r,satz204e(1rl,2rl,pnot0(2rl,pos2))),satz195b(r)):is(ts(half,pl(r,r)),r)
--ivr5
-s@[l:less(r,s)]
-+*ivr5
-l@t5:=satz203k(pl(r,r),pl(r,s),half,satz188m(r,s,r,l),poshalf):less(ts(half,pl(r,r)),ts(half,pl(r,s)))
--ivr5
-l@lemma3:=isless1(ts(half,pl(r,r)),r,ts(half,pl(r,s)),t4".ivr5",t5".ivr5"):less(r,ts(half,pl(r,s)))
-+*ivr5
-l@t6:=satz203k(pl(r,s),pl(s,s),half,satz188f(r,s,s,l),poshalf):less(ts(half,pl(r,s)),ts(half,pl(s,s)))
--ivr5
-l@lemma4:=isless2(ts(half,pl(s,s)),s,ts(half,pl(r,s)),t4".ivr5"(s),t6".ivr5"):less(ts(half,pl(r,s)),s)
-[p:pos(r)]
-lemma5:=satz169b(s,trmore(s,r,0,lemma2(r,s,l),satz169a(r,p))):pos(s)
-@[s1:set(real)][s2:set(real)][p0:all([x:real]or(in(x,s1),in(x,s2)))][p1a:nonempty(real,s1)][p1b:nonempty(real,s2)][p2:all([x:real][t:in(x,s1)]all([y:real][u:in(y,s2)]less(x,y)))]
-+*5r205
-s2@[r:real]
-prop1:=all([x:real][t:less(x,r)]in(x,s1)):'prop'
-prop2:=all([x:real][t:more(x,r)]in(x,s2)):'prop'
-prop3:=and(prop1,prop2):'prop'
-p2@[x:real][y:real][px:prop3(x)][py:prop3(y)][l:less(x,y)]
-mxy:=ts(half,pl(x,y)):real
-t13:=lemma2(x,mxy,lemma3(x,y,l)):more(mxy,x)
-t14:=lemma4(x,y,l):less(mxy,y)
-t15:=<t14><mxy>ande1(prop1(y),prop2(y),py):in(mxy,s1)
-t16:=<t13><mxy>ande2(prop1(x),prop2(x),px):in(mxy,s2)
-t17:=<t16><mxy><t15><mxy>p2:less(mxy,mxy)
-t18:=<refis(real,mxy)>ec3e31(is(mxy,mxy),more(mxy,mxy),less(mxy,mxy),satz167b(mxy,mxy),t17):con
-py@t19:=[t:less(x,y)]t18(t):not(less(x,y))
-t20:=[t:more(x,y)]t18(y,x,py,px,lemma1(x,y,t)):not(more(x,y))
-t21:=or3e1(is(x,y),more(x,y),less(x,y),satz167a(x,y),t20,t19):is(x,y)
-p2@t22:=[x:real][y:real][t:prop3(x)][u:prop3(y)]t21(x,y,t,u):amone(real,[x:real]prop3(x))
-[case1:some([x:real]and(pos(x),in(x,s1)))][r:real][a:and(pos(r),in(r,s1))]
-t23:=ande1(pos(r),in(r,s1),a):pos(r)
-t24:=ande2(pos(r),in(r,s1),a):in(r,s1)
-sc1:=setof(cut,[x:cut]in(pofrp(x),s1)):set(cut)
-sc2:=setof(cut,[x:cut]in(pofrp(x),s2)):set(cut)
-[r0:cut][i:in(pofrp(r0),s1)]
-t25:=estii(cut,[x:cut]in(pofrp(x),s1),r0,i):in"rp"(r0,sc1)
-r0@[i:in"rp"(r0,sc1)]
-t26:=estie(cut,[x:cut]in(pofrp(x),s1),r0,i):in(pofrp(r0),s1)
-r0@[i:in(pofrp(r0),s2)]
-t27:=estii(cut,[x:cut]in(pofrp(x),s2),r0,i):in"rp"(r0,sc2)
-r0@[i:in"rp"(r0,sc2)]
-t28:=estie(cut,[x:cut]in(pofrp(x),s2),r0,i):in(pofrp(r0),s2)
-r0@t29:=th9"l.or"(in(pofrp(r0),s1),in(pofrp(r0),s2),in"rp"(r0,sc1),in"rp"(r0,sc2),<pofrp(r0)>p0,[t:in(pofrp(r0),s1)]t25(t),[t:in(pofrp(r0),s2)]t27(t)):or(in"rp"(r0,sc1),in"rp"(r0,sc2))
-a@pr1:=rpofp(r,t23):cut
-t30:=isp(real,[x:real]in(x,s1),r,pofrp(pr1),t24,isprp1(r,t23)):in(pofrp(pr1),s1)
-t31:=nonemptyi(cut,sc1,pr1,t25(pr1,t30)):nonempty(cut,sc1)
-[s:real][i:in(s,s2)]
-t32:=<i><s><t24><r>p2:less(r,s)
-t33:=lemma5(r,s,t32,t23):pos(s)
-ps1:=rpofp(s,t33):cut
-t34:=isp(real,[x:real]in(x,s2),s,pofrp(ps1),i,isprp1(s,t33)):in(pofrp(ps1),s2)
-t35:=nonemptyi(cut,sc2,ps1,t27(ps1,t34)):nonempty(cut,sc2)
-a@t36:=nonemptyapp(real,s2,p1b,nonempty(cut,sc2),[x:real][t:in(x,s2)]t35(x,t)):nonempty(cut,sc2)
-r0@[i:in"rp"(r0,sc1)][s0:cut][j:in"rp"(s0,sc2)]
-t37:=<t28(s0,j)><pofrp(s0)><t26(r0,i)><pofrp(r0)>p2:less(pofrp(r0),pofrp(s0))
-t38:=lessrpip(r0,s0,t37):less"rp"(r0,s0)
-a@stc:=schnitt(sc1,sc2,[x:cut]t29(x),t31,t36,[x:cut][t:in"rp"(x,sc1)][y:cut][u:in"rp"(y,sc2)]t38(x,t,y,u)):cut
-t39:=satzp205a(sc1,sc2,[x:cut]t29(x),t31,t36,[x:cut][t:in"rp"(x,sc1)][y:cut][u:in"rp"(y,sc2)]t38(x,t,y,u)):all"rp"([x:cut][t:less"rp"(x,stc)]in"rp"(x,sc1))
-t40:=satzp205b(sc1,sc2,[x:cut]t29(x),t31,t36,[x:cut][t:in"rp"(x,sc1)][y:cut][u:in"rp"(y,sc2)]t38(x,t,y,u)):all"rp"([x:cut][t:more"rp"(x,stc)]in"rp"(x,sc2))
-stp:=pofrp(stc):real
-t41:=posi(stc):pos(stp)
-[s:real][l:less(s,stp)][p:pos(s)]
-ps2:=rpofp(s,p):cut
-t42:=lessrpip(ps2,stc,isless1(s,pofrp(ps2),stp,isprp1(s,p),l)):less"rp"(ps2,stc)
-t43:=<t42><ps2>t39:in"rp"(ps2,sc1)
-t44:=isp(real,[x:real]in(x,s1),pofrp(ps2),s,t26(ps2,t43),isprp2(s,p)):in(s,s1)
-l@[n:not(pos(s))][i:in(s,s2)]
-t45:=<i><s><t24><r>p2:less(r,s)
-t46:=<lemma5(r,s,t45,t23)>n:con
-n@t47:=ore1(in(s,s1),in(s,s2),<s>p0,[t:in(s,s2)]t46(t)):in(s,s1)
-l@t48:=th1"l.imp"(pos(s),in(s,s1),[t:pos(s)]t44(t),[t:not(pos(s))]t47(t)):in(s,s1)
-s@[m:more(s,stp)]
-t49:=lemma5(stp,s,lemma1(s,stp,m),t41):pos(s)
-ps3:=rpofp(s,t49):cut
-t50:=morerpip(ps3,stc,ismore1(s,pofrp(ps3),stp,isprp1(s,t49),m)):more"rp"(ps3,stc)
-t51:=<t50><ps3>t40:in"rp"(ps3,sc2)
-t52:=isp(real,[x:real]in(x,s2),pofrp(ps3),s,t28(ps3,t51),isprp2(s,t49)):in(s,s2)
-a@t53:=andi(prop1(stp),prop2(stp),[x:real][t:less(x,stp)]t48(x,t),[x:real][t:more(x,stp)]t52(x,t)):prop3(stp)
-t54:=somei(real,[x:real]prop3(x),stp,t53):some([x:real]prop3(x))
-case1@t55:=someapp(real,[x:real]and(pos(x),in(x,s1)),case1,some([x:real]prop3(x)),[x:real][t:and(pos(x),in(x,s1))]t54(x,t)):some([x:real]prop3(x))
-p2@[case2:some([x:real]and(neg(x),in(x,s2)))]
-sp1:=setof(real,[x:real]in(m0(x),s1)):set(real)
-sp2:=setof(real,[x:real]in(m0(x),s2)):set(real)
-[r:real][i:in(m0(r),s1)]
-t56:=estii(real,[x:real]in(m0(x),s1),r,i):in(r,sp1)
-r@[i:in(r,sp1)]
-t57:=estie(real,[x:real]in(m0(x),s1),r,i):in(m0(r),s1)
-r@[i:in(m0(r),s2)]
-t58:=estii(real,[x:real]in(m0(x),s2),r,i):in(r,sp2)
-r@[i:in(r,sp2)]
-t59:=estie(real,[x:real]in(m0(x),s2),r,i):in(m0(r),s2)
-r@t60:=comor(in(r,sp1),in(r,sp2),th9"l.or"(in(m0(r),s1),in(m0(r),s2),in(r,sp1),in(r,sp2),<m0(r)>p0,[t:in(m0(r),s1)]t56(t),[t:in(m0(r),s2)]t58(t))):or(in(r,sp2),in(r,sp1))
-[i:in(r,s2)]
-t61:=t58(m0(r),isp(real,[x:real]in(x,s2),r,m0(m0(r)),i,satz177a(r))):in(m0(r),sp2)
-t62:=nonemptyi(real,sp2,m0(r),t61):nonempty(real,sp2)
-case2@t63:=nonemptyapp(real,s2,p1b,nonempty(real,sp2),[x:real][t:in(x,s2)]t62(x,t)):nonempty(real,sp2)
-r@[i:in(r,s1)]
-t64:=t56(m0(r),isp(real,[x:real]in(x,s1),r,m0(m0(r)),i,satz177a(r))):in(m0(r),sp1)
-t65:=nonemptyi(real,sp1,m0(r),t64):nonempty(real,sp1)
-case2@t66:=nonemptyapp(real,s1,p1a,nonempty(real,sp1),[x:real][t:in(x,s1)]t65(x,t)):nonempty(real,sp1)
-r@[i:in(r,sp2)][s:real][j:in(s,sp1)]
-t67:=<t59(r,i)><m0(r)><t57(s,j)><m0(s)>p2:less(m0(s),m0(r))
-t68:=lemma1(s,r,satz183d(s,r,t67)):less(r,s)
-r@[a:and(neg(r),in(r,s2))]
-t69:=satz176c(r,ande1(neg(r),in(r,s2),a)):pos(m0(r))
-t70:=isp(real,[x:real]in(x,s2),r,m0(m0(r)),ande2(neg(r),in(r,s2),a),satz177a(r)):in(m0(m0(r)),s2)
-t71:=andi(pos(m0(r)),in(m0(r),sp2),t69,t58(m0(r),t70)):and(pos(m0(r)),in(m0(r),sp2))
-t72:=somei(real,[x:real]and(pos(x),in(x,sp2)),m0(r),t71):some([x:real]and(pos(x),in(x,sp2)))
-case2@t73:=someapp(real,[x:real]and(neg(x),in(x,s2)),case2,some([x:real]and(pos(x),in(x,sp2))),[x:real][t:and(neg(x),in(x,s2))]t72(x,t)):some([x:real]and(pos(x),in(x,sp2)))
-t74:=t55(sp2,sp1,[x:real]t60(x),t63,t66,[x:real][t:in(x,sp2)][y:real][u:in(y,sp1)]t68(x,t,y,u),t73):some([x:real]prop3(sp2,sp1,x))
-[r:real][p:prop3(sp2,sp1,r)][s:real][l:less(s,m0(r))]
-t75:=ismore2(m0(m0(r)),r,m0(s),satz177(r),satz183c(s,m0(r),l)):more(m0(s),r)
-t76:=<t75><m0(s)>ande2(prop1(sp2,sp1,r),prop2(sp2,sp1,r),p):in(m0(s),sp1)
-t77:=isp(real,[x:real]in(x,s1),m0(m0(s)),s,t57(m0(s),t76),satz177(s)):in(s,s1)
-s@[m:more(s,m0(r))]
-t78:=isless2(m0(m0(r)),r,m0(s),satz177(r),satz183a(s,m0(r),m)):less(m0(s),r)
-t79:=<t78><m0(s)>ande1(prop1(sp2,sp1,r),prop2(sp2,sp1,r),p):in(m0(s),sp2)
-t80:=isp(real,[x:real]in(x,s2),m0(m0(s)),s,t59(m0(s),t79),satz177(s)):in(s,s2)
-p@t81:=andi(prop1(m0(r)),prop2(m0(r)),[x:real][t:less(x,m0(r))]t77(x,t),[x:real][t:more(x,m0(r))]t80(x,t)):prop3(m0(r))
-t82:=somei(real,[x:real]prop3(x),m0(r),t81):some([x:real]prop3(x))
-case2@t83:=someapp(real,[x:real]prop3(sp2,sp1,x),t74,some([x:real]prop3(x)),[x:real][t:prop3(sp2,sp1,x)]t82(x,t)):some([x:real]prop3(x))
-p2@[notcase1:not(some([x:real]and(pos(x),in(x,s1))))][notcase2:not(some([x:real]and(neg(x),in(x,s2))))][r:real][l:less(r,0)]
-t84:=th4"l.some"(real,[x:real]and(neg(x),in(x,s2)),notcase2,r):not(and(neg(r),in(r,s2)))
-t85:=th3"l.and"(neg(r),in(r,s2),t84,satz169d(r,l)):not(in(r,s2))
-t86:=ore1(in(r,s1),in(r,s2),<r>p0,t85):in(r,s1)
-r@[m:more(r,0)]
-t87:=th4"l.some"(real,[x:real]and(pos(x),in(x,s1)),notcase1,r):not(and(pos(r),in(r,s1)))
-t88:=th3"l.and"(pos(r),in(r,s1),t87,satz169b(r,m)):not(in(r,s1))
-t89:=ore2(in(r,s1),in(r,s2),<r>p0,t88):in(r,s2)
-notcase2@t90:=andi(prop1(0),prop2(0),[x:real][t:less(x,0)]t86(x,t),[x:real][t:more(x,0)]t89(x,t)):prop3(0)
-t91:=somei(real,[x:real]prop3(x),0,t90):some([x:real]prop3(x))
-notcase1@t92:=th1"l.imp"(some([x:real]and(neg(x),in(x,s2))),some([x:real]prop3(x)),[t:some([x:real]and(neg(x),in(x,s2)))]t83(t),[t:not(some([x:real]and(neg(x),in(x,s2))))]t91(t)):some([x:real]prop3(x))
-p2@t93:=th1"l.imp"(some([x:real]and(pos(x),in(x,s1))),some([x:real]prop3(x)),[t:some([x:real]and(pos(x),in(x,s1)))]t55(t),[t:not(some([x:real]and(pos(x),in(x,s1))))]t92(t)):some([x:real]prop3(x))
-t94:=onei(real,[x:real]prop3(x),t22,t93):one([x:real]prop3(x))
--5r205
-p2@satz205:=t94".5r205":one([x:real]and(all([y:real][t:less(y,x)]in(y,s1)),all([y:real][t:more(y,x)]in(y,s2))))
-dedekind:=satz205:one([x:real]and(all([y:real][t:less(y,x)]in(y,s1)),all([y:real][t:more(y,x)]in(y,s2))))
-schnitt:=ind(real,[x:real]prop3".5r205"(x),satz205):real
-[r:real][l:less(r,schnitt)]
-satz205a:=<l><r>ande1(prop1".5r205"(schnitt),prop2".5r205"(schnitt),oneax(real,[x:real]prop3".5r205"(x),satz205)):in(r,s1)
-r@[m:more(r,schnitt)]
-satz205b:=<m><r>ande2(prop1".5r205"(schnitt),prop2".5r205"(schnitt),oneax(real,[x:real]prop3".5r205"(x),satz205)):in(r,s2)
-@[r0:cut][s0:cut]
-+iva
-dr:=pdofrp(r0):dif
-ds:=pdofrp(s0):dif
-t1:=lemmaivad1(r0,s0):eq"rp"(pd(dr,ds),pdofrp(pl"rp"(r0,s0)))
--iva
-lemmaiva1:=isin(pl(pofrp(r0),pofrp(s0)),pofrp(pl"rp"(r0,s0)),pd(pdofrp(r0),pdofrp(s0)),pdofrp(pl"rp"(r0,s0)),picp(pofrp(r0),pofrp(s0),pdofrp(r0),pdofrp(s0),innclass(pdofrp(r0)),innclass(pdofrp(s0))),innclass(pdofrp(pl"rp"(r0,s0))),t1".iva"):is(pl(pofrp(r0),pofrp(s0)),pofrp(pl"rp"(r0,s0)))
-+*iva
-s0@t2:=lemmaivad2(r0,s0):eq"rp"(td(dr,ds),pdofrp(ts"rp"(r0,s0)))
--iva
-s0@lemmaiva2:=isin(ts(pofrp(r0),pofrp(s0)),pofrp(ts"rp"(r0,s0)),td(pdofrp(r0),pdofrp(s0)),pdofrp(ts"rp"(r0,s0)),tict(pofrp(r0),pofrp(s0),pdofrp(r0),pdofrp(s0),innclass(pdofrp(r0)),innclass(pdofrp(s0))),innclass(pdofrp(ts"rp"(r0,s0))),t2".iva"):is(ts(pofrp(r0),pofrp(s0)),pofrp(ts"rp"(r0,s0)))
-[m:more(pofrp(r0),pofrp(s0))]
-+*iva
-m@t3:=moreex(pofrp(r0),pofrp(s0),dr,ds,innclass(dr),innclass(ds),m):mored(dr,ds)
--iva
-m@lemmaiva3:=lemmaivad3(r0,s0,t3".iva"):more"rp"(r0,s0)
-s0@[m:more"rp"(r0,s0)]
-+*iva
-m@[l:less(pofrp(r0),pofrp(s0))]
-t4:=satz121(s0,r0,lemmaiva3(s0,r0,lemma2(pofrp(r0),pofrp(s0),l))):less"rp"(r0,s0)
-m@t5:=ec3e23(is"rp"(r0,s0),more"rp"(r0,s0),less"rp"(r0,s0),satz123b(r0,s0),m):not(less"rp"(r0,s0))
-t6:=th3"l.imp"(less(pofrp(r0),pofrp(s0)),less"rp"(r0,s0),t5,[t:less(pofrp(r0),pofrp(s0))]t4(t)):not(less(pofrp(r0),pofrp(s0)))
-t7:=ec3e21(is"rp"(r0,s0),more"rp"(r0,s0),less"rp"(r0,s0),satz123b(r0,s0),m):nis"rp"(r0,s0)
-t8:=th3"l.imp"(is(pofrp(r0),pofrp(s0)),is"rp"(r0,s0),t7,[t:is(pofrp(r0),pofrp(s0))]isrpip(r0,s0,t)):nis(pofrp(r0),pofrp(s0))
--iva
-m@lemmaiva4:=or3e2(is(pofrp(r0),pofrp(s0)),more(pofrp(r0),pofrp(s0)),less(pofrp(r0),pofrp(s0)),satz167a(pofrp(r0),pofrp(s0)),t6".iva",t8".iva"):more(pofrp(r0),pofrp(s0))
-@[x:nat][y:nat][m:more(rlofnt(x),rlofnt(y))]
-+*iva
-m@t9:=lemmaiva3(rpofnt(x),rpofnt(y),m):more"rp"(rpofnt(x),rpofnt(y))
-t10:=satz154d(rtofn(x),rtofn(y),t9):more"rt"(rtofn(x),rtofn(y))
-t11:=moree"rt"(rtofn(x),rtofn(y),fr(x,1),fr(y,1),inclass"rt"(fr(x,1)),inclass"rt"(fr(y,1)),t10):moref(fr(x,1),fr(y,1))
--iva
-m@lemmaiva5:=satz111a(x,y,t11".iva"):more"n"(x,y)
-y@[m:more"n"(x,y)]
-+*iva
-m@t12:=satz111d(x,y,m):moref(fr(x,1),fr(y,1))
-t13:=morei"rt"(rtofn(x),rtofn(y),fr(x,1),fr(y,1),inclass"rt"(fr(x,1)),inclass"rt"(fr(y,1)),t12):more"rt"(rtofn(x),rtofn(y))
-t14:=satz154a(rtofn(x),rtofn(y),t13):more"rp"(rpofnt(x),rpofnt(y))
--iva
-m@lemmaiva6:=lemmaiva4(rpofnt(x),rpofnt(y),t14".iva"):more(rlofnt(x),rlofnt(y))
-@[r:real]
-+int
-a0ir@[i:intrl(r)]
-t1:=intabsd(a0,intrlex(r,a0,a0ir,i)):intd(absd(a0))
-t2:=intrlin(abs(r),absd(a0),aica,t1):intrl(abs(r))
--int
-[i:intrl(r)]
-intabs:=realapp1(r,intrl(abs(r)),[x:dif][t:inn(x,class(r))]t2".int"(r,x,t,i)):intrl(abs(r))
-+*int
-i@t3:=intm0d(a0,intrlex(r,a0,a0ir,i)):intd(m0d(a0))
-t4:=intrlin(m0(r),m0d(a0),micm0,t3):intrl(m0(r))
--int
-i@intm0:=realapp1(r,intrl(m0(r)),[x:dif][t:inn(x,class(r))]t4".int"(r,x,t,i)):intrl(m0(r))
-+*int
-b1is@[i:intrl(r)][j:intrl(s)]
-t5:=intpd(a1,b1,intrlex(r,a1,a1ir,i),intrlex(s,b1,b1is,j)):intd(pd(a1,b1))
-t6:=intrlin(pl(r,s),pd(a1,b1),picp,t5):intrl(pl(r,s))
--int
-i@[s:real][j:intrl(s)]
-intpl:=realapp2(r,s,intrl(pl(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".int"(r,s,x,y,t,u,i,j)):intrl(pl(r,s))
-intmn:=intpl(r,i,m0(s),intm0(s,j)):intrl(mn(r,s))
-+*int
-j@t7:=inttd(a1,b1,intrlex(r,a1,a1ir,i),intrlex(s,b1,b1is,j)):intd(td(a1,b1))
-t8:=intrlin(ts(r,s),td(a1,b1),tict,t7):intrl(ts(r,s))
--int
-j@intts:=realapp2(r,s,intrl(ts(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t8".int"(r,s,x,y,t,u,i,j)):intrl(ts(r,s))
-r@[n:natrl(r)]
-+ivr24
-t1:=satz24a(ntofrl(r,n)):lessis"n"(1,ntofrl(r,n))
-t2:=th3"l.imp"(more(1rl,r),more"n"(1,ntofrl(r,n)),satz10d(1,ntofrl(r,n),t1),[t:more(1rl,r)]lemmaiva5(1,ntofrl(r,n),ismore2(r,rlofnt(ntofrl(r,n)),1rl,isrlnt1(r,n),t))):not(more(1rl,r))
--ivr24
-satzr24:=satz167e(1rl,r,t2".ivr24"):lessis(1rl,r)
-r@[i:intrl(r)][s:real][j:intrl(s)][l:less(r,s)]
-+ivr25
-t1:=satz182d(s,r,lemma2(r,s,l)):pos(mn(s,r))
-t2:=intmn(s,j,r,i):intrl(mn(s,r))
-t3:=posintnatrl(mn(s,r),t1,t2):natrl(mn(s,r))
-t4:=satzr24(mn(s,r),t3):lessis(1rl,mn(s,r))
-t5:=th9"l.or"(less(1rl,mn(s,r)),is(1rl,mn(s,r)),less(pl(1rl,r),pl(mn(s,r),r)),is(pl(1rl,r),pl(mn(s,r),r)),t4,[t:less(1rl,mn(s,r))]satz188f(1rl,mn(s,r),r,t),[t:is(1rl,mn(s,r))]ispl1(1rl,mn(s,r),r,t)):lessis(pl(1rl,r),pl(mn(s,r),r))
--ivr25
-satzr25:=islessis12(pl(1rl,r),pl(r,1rl),pl(mn(s,r),r),s,compl(1rl,r),plmn(s,r),t5".ivr25"):lessis(pl(r,1rl),s)
-@[x:nat][y:nat]
-+ivr155
-t1:=lemmaiva1(rpofnt(x),rpofnt(y)):is(pl(rlofnt(x),rlofnt(y)),pofrp(pl"rp"(rpofnt(x),rpofnt(y))))
-t2:=isrpep(rpofnt(pl"n"(x,y)),pl"rp"(rpofnt(x),rpofnt(y)),satz155e(x,y)):is(rlofnt(pl"n"(x,y)),pofrp(pl"rp"(rpofnt(x),rpofnt(y))))
--ivr155
-satzr155a:=tris2(real,rlofnt(pl"n"(x,y)),pl(rlofnt(x),rlofnt(y)),pofrp(pl"rp"(rpofnt(x),rpofnt(y))),t2".ivr155",t1".ivr155"):is(rlofnt(pl"n"(x,y)),pl(rlofnt(x),rlofnt(y)))
-satzr155b:=symis(real,rlofnt(pl"n"(x,y)),pl(rlofnt(x),rlofnt(y)),satzr155a):is(pl(rlofnt(x),rlofnt(y)),rlofnt(pl"n"(x,y)))
-+*ivr155
-y@t3:=lemmaiva2(rpofnt(x),rpofnt(y)):is(ts(rlofnt(x),rlofnt(y)),pofrp(ts"rp"(rpofnt(x),rpofnt(y))))
-t4:=isrpep(rpofnt(ts"n"(x,y)),ts"rp"(rpofnt(x),rpofnt(y)),satz155f(x,y)):is(rlofnt(ts"n"(x,y)),pofrp(ts"rp"(rpofnt(x),rpofnt(y))))
--ivr155
-y@satzr155c:=tris2(real,rlofnt(ts"n"(x,y)),ts(rlofnt(x),rlofnt(y)),pofrp(ts"rp"(rpofnt(x),rpofnt(y))),t4".ivr155",t3".ivr155"):is(rlofnt(ts"n"(x,y)),ts(rlofnt(x),rlofnt(y)))
-satzr155d:=symis(real,rlofnt(ts"n"(x,y)),ts(rlofnt(x),rlofnt(y)),satzr155c):is(ts(rlofnt(x),rlofnt(y)),rlofnt(ts"n"(x,y)))
-@[t:real][r:real][s:real][a:and(not(neg(r)),is(ts(r,r),t))][b:and(not(neg(s)),is(ts(s,s),t))]
-+7r161
-[c0:dif][cit:inn(c0,class(t))][a0:dif][air:inn(a0,class(r))][b0:dif][bis:inn(b0,class(s))]
-t1:=th3"l.imp"(negd(a0),neg(r),ande1(not(neg(r)),is(ts(r,r),t),a),[u:negd(a0)]negin(r,a0,air,u)):not(negd(a0))
-t2:=th3"l.imp"(negd(b0),neg(s),ande1(not(neg(s)),is(ts(s,s),t),b),[u:negd(b0)]negin(s,b0,bis,u)):not(negd(b0))
-t3:=isex(ts(r,r),t,td(a0,a0),c0,tict(r,r,a0,a0,air,air),cit,ande2(not(neg(r)),is(ts(r,r),t),a)):eq"rp"(td(a0,a0),c0)
-t4:=isex(ts(s,s),t,td(b0,b0),c0,tict(s,s,b0,b0,bis,bis),cit,ande2(not(neg(s)),is(ts(s,s),t),b)):eq"rp"(td(b0,b0),c0)
-t5:=isin(r,s,a0,b0,air,bis,satzd161b(c0,a0,b0,t1,t2,t3,t4)):is(r,s)
--7r161
-satzr161b:=realapp3(t,r,s,is(r,s),[x:dif][y:dif][z:dif][u:inn(x,class(t))][v:inn(y,class(r))][w:inn(z,class(s))]t5".7r161"(x,u,y,v,z,w)):is(r,s)
-t@[n:not(neg(t))]
-+*7r161
-n@[c0:dif][cit:inn(c0,class(t))]
-t6:=th3"l.imp"(negd(c0),neg(t),n,[u:negd(c0)]negin(t,c0,cit,u)):not(negd(c0))
-[a0:dif][a:and(not(negd(a0)),eq"rp"(td(a0,a0),c0))]
-ar:=realof(a0):real
-t7:=th3"l.imp"(neg(ar),negd(a0),ande1(not(negd(a0)),eq"rp"(td(a0,a0),c0),a),[u:neg(ar)]negex(ar,a0,innclass(a0),u)):not(neg(ar))
-t8:=isin(ts(ar,ar),t,td(a0,a0),c0,tict(ar,ar,a0,a0,innclass(a0),innclass(a0)),cit,ande2(not(negd(a0)),eq"rp"(td(a0,a0),c0),a)):is(ts(ar,ar),t)
-t9:=andi(not(neg(ar)),is(ts(ar,ar),t),t7,t8):and(not(neg(ar)),is(ts(ar,ar),t))
-t10:=somei(real,[u:real]and(not(neg(u)),is(ts(u,u),t)),ar,t9):some([u:real]and(not(neg(u)),is(ts(u,u),t)))
-cit@t11:=someapp(dif,[x:dif]and(not(negd(x)),eq"rp"(td(x,x),c0)),satzd161a(c0,t6),some([u:real]and(not(neg(u)),is(ts(u,u),t))),[x:dif][v:and(not(negd(x)),eq"rp"(td(x,x),c0))]t10(x,v)):some([u:real]and(not(neg(u)),is(ts(u,u),t)))
--7r161
-n@satzr161a:=realapp1(t,some([u:real]and(not(neg(u)),is(ts(u,u),t))),[x:dif][v:inn(x,class(t))]t11".7r161"(x,v)):some([u:real]and(not(neg(u)),is(ts(u,u),t)))
-satzr161:=onei(real,[u:real]and(not(neg(u)),is(ts(u,u),t)),[u:real][v:real][a:and(not(neg(u)),is(ts(u,u),t))][b:and(not(neg(v)),is(ts(v,v),t))]satzr161b(u,v,a,b),satzr161a):one([u:real]and(not(neg(u)),is(ts(u,u),t)))
-sqrt:=ind(real,[u:real]and(not(neg(u)),is(ts(u,u),t)),satzr161):real
-+*7r161
-n@t12:=oneax(real,[u:real]and(not(neg(u)),is(ts(u,u),t)),satzr161):and(not(neg(sqrt)),is(ts(sqrt,sqrt),t))
--7r161
-n@thsqrt1a:=ande1(not(neg(sqrt)),is(ts(sqrt,sqrt),t),t12".7r161"):not(neg(sqrt))
-thsqrt1b:=ande2(not(neg(sqrt)),is(ts(sqrt,sqrt),t),t12".7r161"):is(ts(sqrt,sqrt),t)
-[x:real][o:not(neg(x))][i:is(ts(x,x),t)]
-thsqrt2:=satzr161b(x,sqrt,andi(not(neg(x)),is(ts(x,x),t),o,i),t12".7r161"):is(x,sqrt(t,n))
-o@[i:is(t,ts(x,x))]
-thsqrt3:=symis(real,x,sqrt(t,n),thsqrt2(symis(real,t,ts(x,x),i))):is(sqrt(t,n),x)
-@[r:real][s:real][n:not(neg(r))][o:not(neg(s))][i:is(r,s)]
-issqrt:=thsqrt2(s,o,sqrt(r,n),thsqrt1a(r,n),tris(real,ts(sqrt(r,n),sqrt(r,n)),r,s,thsqrt1b(r,n),i)):is(sqrt(r,n),sqrt(s,o))
-r@[n:not(neg(r))][i:is(r,0)]
-sqrt0:=thsqrt3(r,n,0,0notn(0,refis(real,0)),tris2(real,r,ts(0,0),0,i,ts01(0,0,refis(real,0)))):is(sqrt(r,n),0)
-n@[o:nis(r,0)]
-+sqrt
-t1:=th3"l.imp"(is(sqrt(r,n),0),is(r,0),o,[t:is(sqrt(r,n),0)]tris1(real,r,0,ts(sqrt(r,n),sqrt(r,n)),thsqrt1b(r,n),ts01(sqrt(r,n),sqrt(r,n),t))):nis(sqrt(r,n),0)
--sqrt
-sqrtnot0:=or3e2(is(sqrt(r,n),0),pos(sqrt(r,n)),neg(sqrt(r,n)),axrlo(sqrt(r,n)),thsqrt1a(r,n),t1".sqrt"):pos(sqrt(r,n))
-@[r:real][s:real][t:real][n:nis(t,0)]
-+v0
-t1:=tr3is(real,ts(t,ts(r,ov(s,t,n))),ts(ts(r,ov(s,t,n)),t),ts(r,ts(ov(s,t,n),t)),ts(r,s),comts(t,ts(r,ov(s,t,n))),assts1(r,ov(s,t,n),t),ists2(ts(ov(s,t,n),t),s,r,satz204e(s,t,n))):is(ts(t,ts(r,ov(s,t,n))),ts(r,s))
--v0
-lemma6:=satz204g(ts(r,s),t,ts(r,ov(s,t,n)),n,t1".v0"):is(ts(r,ov(s,t,n)),ov(ts(r,s),t,n))
-+*v0
-n@t2:=tris(real,ts(t,pl(ov(r,t,n),ov(s,t,n))),pl(ts(t,ov(r,t,n)),ts(t,ov(s,t,n))),pl(r,s),disttp2(t,ov(r,t,n),ov(s,t,n)),ispl12(ts(t,ov(r,t,n)),r,ts(t,ov(s,t,n)),s,satz204c(r,t,n),satz204c(s,t,n))):is(ts(t,pl(ov(r,t,n),ov(s,t,n))),pl(r,s))
--v0
-n@lemma7:=satz204g(pl(r,s),t,pl(ov(r,t,n),ov(s,t,n)),n,t2".v0"):is(pl(ov(r,t,n),ov(s,t,n)),ov(pl(r,s),t,n))
-r@[n:nis(r,0)]
-lemma8:=satz204b(r,r,n,ov(r,r,n),1rl,satz204c(r,r,n),satz195(r)):is(ov(r,r,n),1rl)
-lemma9:=ore2(is(r,0),is(ov(0,r,n),0),satz192c(r,ov(0,r,n),satz204c(0,r,n)),n):is(ov(0,r,n),0)
-r@[i:is(r,m0(r))]
-+*v0
-i@[p:pos(m0(r))]
-t3:=<isneg(r,m0(r),i,satz176f(r,p))>pnotn(m0(r),p):con
-i@[n:neg(m0(r))]
-t4:=<ispos(r,m0(r),i,satz176d(r,n))>nnotp(m0(r),n):con
--v0
-i@lemma10:=satz176e(r,or3e1(is(m0(r),0),pos(m0(r)),neg(m0(r)),axrlo(m0(r)),[t:pos(m0(r))]t3".v0"(t),[t:neg(m0(r))]t4".v0"(t))):is(r,0)
-r@lemma11:=satz167f(ts(r,r),0,th3"l.imp"(less(ts(r,r),0),neg(ts(r,r)),nnegsq(r),[t:less(ts(r,r),0)]satz169d(ts(r,r),t))):moreis(ts(r,r),0)
-lemma12:=rapp(r,is(ts(r,r),ts(abs(r),abs(r))),[t:pos(r)]satz196a(r,r,t,t),[t:is(r,0)]tris2(real,ts(r,r),ts(abs(r),abs(r)),0,ts01(r,r,t),ts01(abs(r),abs(r),abs0(r,t))),[t:neg(r)]satz196b(r,r,t,t)):is(ts(r,r),ts(abs(r),abs(r)))
-@[x:real][ix:intrl(x)][y:real][iy:intrl(y)][ly:lessis(y,x)]
-+shift
-t1:=satz190a(x,x,1rl,0,moreisi2(x,x,refis(real,x)),satz169a(1rl,natpos(1rl,natrl1))):more(pl(x,1rl),pl(x,0))
-t2:=ismore2(pl(x,0),x,pl(x,1rl),pl02(x,0,refis(real,0)),t1):more(pl(x,1rl),x)
-t3:=satz172d(pl(x,1rl),x,y,t2,satz168b(y,x,ly)):more(pl(x,1rl),y)
-t4:=satz182d(pl(x,1rl),y,t3):pos(mn(pl(x,1rl),y))
-t5:=intmn(pl(x,1rl),intpl(x,ix,1rl,intrl1),y,iy):intrl(mn(pl(x,1rl),y))
-t6:=posintnatrl(mn(pl(x,1rl),y),t4,t5):natrl(mn(pl(x,1rl),y))
--shift
-shiftl:=ntofrl(mn(pl(x,1rl),y),t6".shift"):nat
-[n:1to(shiftl)]
-+*shift
-n@n1:=inn"n"(shiftl,n):nat
-t7:=1top(shiftl,n):lessis"n"(n1,shiftl)
-n2:=rlofnt(n1):real
-t8:=natintrl(n2,natrli(n1)):intrl(n2)
--shift
-n@shiftr:=mn(pl(n2".shift",y),1rl):real
-intshiftr:=intmn(pl(n2".shift",y),intpl(n2".shift",t8".shift",y,iy),1rl,intrl1):intrl(shiftr)
-[m:1to(shiftl)][i:is(shiftr(n),shiftr(m))]
-+*shift
-n@t8a:=tris(real,mn(pl(shiftr(n),1rl),y),mn(pl(n2,y),y),n2,ismn1(pl(mn(pl(n2,y),1rl),1rl),pl(n2,y),y,plmn(pl(n2,y),1rl)),mnpl(n2,y)):is(mn(pl(shiftr(n),1rl),y),n2)
-i@t9a:=ismn1(pl(shiftr(n),1rl),pl(shiftr(m),1rl),y,ispl1(shiftr(n),shiftr(m),1rl,i)):is(mn(pl(shiftr(n),1rl),y),mn(pl(shiftr(m),1rl),y))
-t10a:=tr3is(real,n2(n),mn(pl(shiftr(n),1rl),y),mn(pl(shiftr(m),1rl),y),n2(m),symis(real,mn(pl(shiftr(n),1rl),y),n2,t8a),t9a,t8a(m)):is(n2(n),n2(m))
-t11a:=isntirl(n1(n),n1(m),t10a):is"n"(n1(n),n1(m))
--shift
-i@iseshiftr:=isinne(shiftl,n,m,t11a".shift"):is"e"(1to(shiftl),n,m)
-+*shift
-n@[m:more(shiftr,x)]
-t9:=satz188d(shiftr,x,1rl,m):more(pl(shiftr,1rl),pl(x,1rl))
-t10:=ismore1(pl(shiftr,1rl),pl(n2,y),pl(x,1rl),plmn(pl(n2,y),1rl),t9):more(pl(n2,y),pl(x,1rl))
-t11:=satz188d(pl(n2,y),pl(x,1rl),m0(y),t10):more(mn(pl(n2,y),y),mn(pl(x,1rl),y))
-t12:=ismore1(mn(pl(n2,y),y),n2,mn(pl(x,1rl),y),mnpl(n2,y),t11):more(n2,mn(pl(x,1rl),y))
-t13:=ismore12(n2,rlofnt(ntofrl(n2,natrli(n1))),mn(pl(x,1rl),y),rlofnt(ntofrl(mn(pl(x,1rl),y),t6)),isrlnt1(n2,natrli(n1)),isrlnt1(mn(pl(x,1rl),y),t6),t12):more(rlofnt(ntofrl(n2,natrli(n1))),rlofnt(shiftl))
-t14:=lemmaiva5(ntofrl(n2,natrli(n1)),shiftl,t13):more"n"(ntofrl(n2,natrli(n1)),shiftl)
-t15:=ismore1"n"(ntofrl(n2,natrli(n1)),n1,shiftl,isntrl2(n1),t14):more"n"(n1,shiftl)
-n@t16:=th3"l.imp"(more(shiftr,x),more"n"(n1,shiftl),satz10d(n1,shiftl,t7),[t:more(shiftr,x)]t15(t)):not(more(shiftr,x))
--shift
-n@shiftrls:=satz167e(shiftr,x,t16".shift"):lessis(shiftr,x)
-+*shift
-n@[m:more(y,shiftr)]
-t17:=satz188d(y,shiftr,1rl,m):more(pl(y,1rl),pl(shiftr,1rl))
-t18:=ismore12(pl(y,1rl),pl(1rl,y),pl(shiftr,1rl),pl(n2,y),compl(y,1rl),plmn(pl(n2,y),1rl),t17):more(pl(1rl,y),pl(n2,y))
-t19:=satz188a(1rl,n2,y,t18):more(1rl,n2)
-t20:=lemmaiva5(1,n1,t19):more"n"(1,n1)
-n@t21:=th3"l.imp"(more(y,shiftr),more"n"(1,n1),satz10d(1,n1,satz24a(n1)),[t:more(y,shiftr)]t20(t)):not(more(y,shiftr))
--shift
-n@lsshiftr:=satz167e(y,shiftr,t21".shift"):lessis(y,shiftr)
-ly@[u:real][a:and3(intrl(u),lessis(y,u),lessis(u,x))]
-+*shift
-a@t22:=and3e1(intrl(u),lessis(y,u),lessis(u,x),a):intrl(u)
-t23:=and3e2(intrl(u),lessis(y,u),lessis(u,x),a):lessis(y,u)
-t24:=and3e3(intrl(u),lessis(y,u),lessis(u,x),a):lessis(u,x)
-[l:less(u,x)]
-t25:=satz188f(pl(u,1rl),pl(x,1rl),m0"r"(y),satz188f(u,x,1rl,l)):less(mn(pl(u,1rl),y),mn(pl(x,1rl),y))
-a@[i:is(u,x)]
-t26:=ismn1(pl(u,1rl),pl(x,1rl),y,ispl1(u,x,1rl,i)):is(mn(pl(u,1rl),y),mn(pl(x,1rl),y))
-a@t27:=th9"l.or"(less(u,x),is(u,x),less(mn(pl(u,1rl),y),mn(pl(x,1rl),y)),is(mn(pl(u,1rl),y),mn(pl(x,1rl),y)),t24,[t:less(u,x)]t25(t),[t:is(u,x)]t26(t)):lessis(mn(pl(u,1rl),y),mn(pl(x,1rl),y))
-ul:=shiftl(u,t22,y,iy,t23):nat
-t28:=islessis12(mn(pl(u,1rl),y),rlofnt(ul),mn(pl(x,1rl),y),rlofnt(shiftl),isrlnt1(mn(pl(u,1rl),y),t6(u,t22,y,iy,t23)),isrlnt1(mn(pl(x,1rl),y),t6),t27):lessis(rlofnt(ul),rlofnt(shiftl))
-t29:=th3"l.imp"(more"n"(ul,shiftl),more(rlofnt(ul),rlofnt(shiftl)),satz167d(rlofnt(ul),rlofnt(shiftl),t28),[t:more"n"(ul,shiftl)]lemmaiva6(ul,shiftl,t)):not(more"n"(ul,shiftl))
-t30:=satz10e(ul,shiftl,t29):lessis"n"(ul,shiftl)
--shift
-a@shiftl1:=outn(shiftl,ul".shift",t30".shift"):1to(shiftl)
-+*shift
-a@t31:=isinoutn(shiftl,ul,t30):is"n"(ul,n1(shiftl1))
-t32:=tris(real,mn(pl(u,1rl),y),rlofnt(ul),n2(shiftl1),isrlnt1(mn(pl(u,1rl),y),t6(u,t22,y,iy,t23)),isnterl(ul,n1(shiftl1),t31)):is(mn(pl(u,1rl),y),n2(shiftl1))
-t33:=tris(real,mn(pl(mn(pl(u,1rl),y),y),1rl),mn(pl(u,1rl),1rl),u,ismn1(pl(mn(pl(u,1rl),y),y),pl(u,1rl),1rl,plmn(pl(u,1rl),y)),mnpl(u,1rl)):is(mn(pl(mn(pl(u,1rl),y),y),1rl),u)
--shift
-a@shiftinv1:=tris1(real,u,shiftr(shiftl1),mn(pl(mn(pl(u,1rl),y),y),1rl),t33".shift",ismn1(pl(mn(pl(u,1rl),y),y),pl(n2".shift"(shiftl1),y),1rl,ispl1(mn(pl(u,1rl),y),n2".shift"(shiftl1),y,t32".shift"))):is(u,shiftr(shiftl1))
-shiftinv2:=symis(real,u,shiftr(shiftl1),shiftinv1):is(shiftr(shiftl1),u)
-ly@[alpha:'type']
-seq:=[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]alpha:'type'
-[s:seq]
-proofsirrelevant:=[t:real][it:intrl(t)][lt:lessis(y,t)][tl:lessis(t,x)][u:real][iu:intrl(u)][lu:lessis(y,u)][ul:lessis(u,x)][v:is(t,u)]is"e"(alpha,<tl><lt><it><t>s,<ul><lu><iu><u>s):'prop'
-alpha@[f:seq]
-shiftf:=[t:1to(shiftl)]<shiftrls(t)><lsshiftr(t)><intshiftr(t)><shiftr(t)>f:[t:1to(shiftl)]alpha
-ly@[s:seq(real)]
-inseq:=[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]and3(intrl(<w><v><u><t>s),lessis(y,<w><v><u><t>s),lessis(<w><v><u><t>s,x)):'prop'
-injseq:=[t:real][it:intrl(t)][lt:lessis(y,t)][tl:lessis(t,x)][u:real][iu:intrl(u)][lu:lessis(y,u)][ul:lessis(u,x)][v:is"r"(<tl><lt><it><t>s,<ul><lu><iu><u>s)]is"r"(t,u):'prop'
-[u:real][v:real][a:and3(intrl(v),lessis(y,v),lessis(v,x))]
-+*shift
-a@prop1:=is(u,<t24(v,a)><t23(v,a)><t22(v,a)><v>s):'prop'
--shift
-v@improp:=and(and3(intrl(v),lessis(y,v),lessis(v,x)),[t:and3(intrl(v),lessis(y,v),lessis(v,x))]prop1".shift"(t)):'prop'
-u@imseq:=some([t:real]improp(u,t)):'prop'
-s@surjseq:=[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]imseq(t):'prop'
-perm:=and(injseq,surjseq):'prop'
-[ins:inseq(s)]
-+*shift
-ins@[n:1to(shiftl)]
-ns:=<shiftrls(n)><lsshiftr(n)><intshiftr(n)><shiftr(n)>s:real
-t34:=<shiftrls(n)><lsshiftr(n)><intshiftr(n)><shiftr(n)>ins:and3(intrl(ns),lessis(y,ns),lessis(ns,x))
--shift
-ins@shiftseq:=[t:1to(shiftl)]shiftl1(ns".shift"(t),t34".shift"(t)):[t:1to(shiftl)]1to(shiftl)
-[js:injseq(s)]
-+*shift
-js@[n:1to(shiftl)][m:1to(shiftl)][i:is"e"(1to(shiftl),<n>shiftseq,<m>shiftseq)]
-t35:=isoutne(shiftl,ul(ns(n),t34(n)),t30(ns(n),t34(n)),ul(ns(m),t34(m)),t30(ns(m),t34(m)),i):is"n"(ul(ns(n),t34(n)),ul(ns(m),t34(m)))
-t36:=isrlint(mn(pl(ns(n),1rl),y),t6(ns(n),t22(ns(n),t34(n)),y,iy,t23(ns(n),t34(n))),mn(pl(ns(m),1rl),y),t6(ns(m),t22(ns(m),t34(m)),y,iy,t23(ns(m),t34(m))),t35):is(mn(pl(ns(n),1rl),y),mn(pl(ns(m),1rl),y))
-t37:=satz188b(ns(n),ns(m),1rl,satz188b(pl(ns(n),1rl),pl(ns(m),1rl),m0"r"(y),t36)):is(ns(n),ns(m))
-t38:=<t37><shiftrls(m)><lsshiftr(m)><intshiftr(m)><shiftr(m)><shiftrls(n)><lsshiftr(n)><intshiftr(n)><shiftr(n)>js:is(shiftr(n),shiftr(m))
-t39:=satz188b(n2(n),n2(m),y,satz188b(pl(n2(n),y),pl(n2(m),y),m0(1rl),t38)):is(n2(n),n2(m))
-t40:=isntirl(n1(n),n1(m),t39):is"n"(n1(n),n1(m))
-t41:=isinne(shiftl,n,m,t40):is"e"(1to(shiftl),n,m)
--shift
-js@injshiftseq:=[t:1to(shiftl)][u:1to(shiftl)][v:is"e"(1to(shiftl),<t>shiftseq,<u>shiftseq)]t41".shift"(t,u,v):injective(1to(shiftl),1to(shiftl),shiftseq)
-ins@[pri:proofsirrelevant(real,s)][ss:surjseq(s)]
-+*shift
-ss@[n:1to(shiftl)]
-t42:=<shiftrls(n)><lsshiftr(n)><intshiftr(n)><shiftr(n)>ss:imseq(shiftr(n))
-[u:real][p:improp(shiftr(n),u)]
-t43:=ande1(and3(intrl(u),lessis(y,u),lessis(u,x)),[t:and3(intrl(u),lessis(y,u),lessis(u,x))]prop1(shiftr(n),u,t),p):and3(intrl(u),lessis(y,u),lessis(u,x))
-t44:=ande2"l.r"(and3(intrl(u),lessis(y,u),lessis(u,x)),[t:and3(intrl(u),lessis(y,u),lessis(u,x))]prop1(shiftr(n),u,t),p):is(shiftr(n),<t24(u,t43)><t23(u,t43)><t22(u,t43)><u>s)
-ul1:=shiftl1(u,t43):1to(shiftl)
-t45:=<shiftinv1(u,t43)><shiftrls(ul1)><lsshiftr(ul1)><intshiftr(ul1)><shiftr(ul1)><t24(u,t43)><t23(u,t43)><t22(u,t43)><u>pri:is(<t24(u,t43)><t23(u,t43)><t22(u,t43)><u>s,ns(ul1))
-t46:=shiftinv1(ns(ul1),t34(ul1)):is(ns(ul1),shiftr(<ul1>shiftseq))
-t47:=tr3is(real,shiftr(n),<t24(u,t43)><t23(u,t43)><t22(u,t43)><u>s,ns(ul1),shiftr(<ul1>shiftseq),t44,t45,t46):is(shiftr(n),shiftr(<ul1>shiftseq))
-t48:=iseshiftr(n,<ul1>shiftseq,t47):is"e"(1to(shiftl),n,<ul1>shiftseq)
-t49:=somei(1to(shiftl),[t:1to(shiftl)]is"e"(1to(shiftl),n,<t>shiftseq),ul1,t48):image(1to(shiftl),1to(shiftl),shiftseq,n)
-n@t50:=someapp(real,[t:real]improp(shiftr(n),t),t42,image(1to(shiftl),1to(shiftl),shiftseq,n),[t:real][u:improp(shiftr(n),t)]t49(t,u)):image(1to(shiftl),1to(shiftl),shiftseq,n)
--shift
-ss@surjshiftseq:=[t:1to(shiftl)]t50".shift"(t):surjective(1to(shiftl),1to(shiftl),shiftseq)
-pri@[ps:perm(s)]
-bijshiftseq:=andi(injective(1to(shiftl),1to(shiftl),shiftseq),surjective(1to(shiftl),1to(shiftl),shiftseq),injshiftseq(ande1(injseq(s),surjseq(s),ps)),surjshiftseq(ande2(injseq(s),surjseq(s),ps))):bijective(1to(shiftl),1to(shiftl),shiftseq)
-+c
-@complex:=pair1type(real):'type'
-cx:=complex:'type'
-[x:complex][y:complex]
-is:=is"e"(cx,x,y):'prop'
-nis:=not(is(x,y)):'prop'
-@[p:[t:complex]'prop']
-some:=some"l"(cx,p):'prop'
-all:=all"l"(cx,p):'prop'
-one:=one"e"(cx,p):'prop'
-@[a:real][b:real]
-pli:=pair1(real,a,b):complex
-x@re:=first1(real,x):real
-im:=second1(real,x):real
-b@reis:=first1is1(real,a,b):is"r"(re(pli(a,b)),a)
-isre:=first1is2(real,a,b):is"r"(a,re(pli(a,b)))
-imis:=second1is1(real,a,b):is"r"(im(pli(a,b)),b)
-isim:=second1is2(real,a,b):is"r"(b,im(pli(a,b)))
-x@pliis:=pair1is1(real,x):is(pli(re(x),im(x)),x)
-ispli:=pair1is2(real,x):is(x,pli(re(x),im(x)))
-y@[i:is(x,y)]
-iscere:=isf(cx,real,[t:cx]re(t),x,y,i):is"r"(re(x),re(y))
-isceim:=isf(cx,real,[t:cx]im(t),x,y,i):is"r"(im(x),im(y))
-b@[c:real][i:is"r"(a,b)]
-isrecx1:=isf(real,cx,[t:real]pli(t,c),a,b,i):is(pli(a,c),pli(b,c))
-isrecx2:=isf(real,cx,[t:real]pli(c,t),a,b,i):is(pli(c,a),pli(c,b))
-c@[d:real][i:is"r"(a,b)][j:is"r"(c,d)]
-isrecx12:=tris(cx,pli(a,c),pli(b,c),pli(b,d),isrecx1(a,b,c,i),isrecx2(c,d,b,j)):is(pli(a,c),pli(b,d))
-x@satz206:=refis(cx,x):is(x,x)
-y@[i:is(x,y)]
-satz207:=symis(cx,x,y,i):is(y,x)
-y@[z:complex][i:is(x,y)][j:is(y,z)]
-satz208:=tris(cx,x,y,z,i,j):is(x,z)
-@0c:=pli(0,0):complex
-1c:=pli(1rl,0):complex
-y@pl:=pli(pl"r"(re(x),re(y)),pl"r"(im(x),im(y))):complex
-d@plis12a:=isrecx12(pl"r"(re(pli(a,b)),re(pli(c,d))),pl"r"(a,c),pl"r"(im(pli(a,b)),im(pli(c,d))),pl"r"(b,d),ispl12(re(pli(a,b)),a,re(pli(c,d)),c,reis(a,b),reis(c,d)),ispl12(im(pli(a,b)),b,im(pli(c,d)),d,imis(a,b),imis(c,d))):is(pl(pli(a,b),pli(c,d)),pli(pl"r"(a,c),pl"r"(b,d)))
-plis12b:=symis(cx,pl(pli(a,b),pli(c,d)),pli(pl"r"(a,c),pl"r"(b,d)),plis12a):is(pli(pl"r"(a,c),pl"r"(b,d)),pl(pli(a,b),pli(c,d)))
-x@[r:real][s:real]
-plis1a:=isrecx12(pl"r"(re(pli(r,s)),re(x)),pl"r"(r,re(x)),pl"r"(im(pli(r,s)),im(x)),pl"r"(s,im(x)),ispl1(re(pli(r,s)),r,re(x),reis(r,s)),ispl1(im(pli(r,s)),s,im(x),imis(r,s))):is(pl(pli(r,s),x),pli(pl"r"(r,re(x)),pl"r"(s,im(x))))
-plis1b:=symis(cx,pl(pli(r,s),x),pli(pl"r"(r,re(x)),pl"r"(s,im(x))),plis1a):is(pli(pl"r"(r,re(x)),pl"r"(s,im(x))),pl(pli(r,s),x))
-plis2a:=isrecx12(pl"r"(re(x),re(pli(r,s))),pl"r"(re(x),r),pl"r"(im(x),im(pli(r,s))),pl"r"(im(x),s),ispl2(re(pli(r,s)),r,re(x),reis(r,s)),ispl2(im(pli(r,s)),s,im(x),imis(r,s))):is(pl(x,pli(r,s)),pli(pl"r"(re(x),r),pl"r"(im(x),s)))
-plis2b:=symis(cx,pl(x,pli(r,s)),pli(pl"r"(re(x),r),pl"r"(im(x),s)),plis2a):is(pli(pl"r"(re(x),r),pl"r"(im(x),s)),pl(x,pli(r,s)))
-z@[i:is(x,y)]
-ispl1:=isf(cx,cx,[t:cx]pl(t,z),x,y,i):is(pl(x,z),pl(y,z))
-ispl2:=isf(cx,cx,[t:cx]pl(z,t),x,y,i):is(pl(z,x),pl(z,y))
-z@[u:complex][i:is(x,y)][j:is(z,u)]
-ispl12:=tris(cx,pl(x,z),pl(y,z),pl(y,u),ispl1(x,y,z,i),ispl2(z,u,y,j)):is(pl(x,z),pl(y,u))
-y@satz209:=isrecx12(pl"r"(re(x),re(y)),pl"r"(re(y),re(x)),pl"r"(im(x),im(y)),pl"r"(im(y),im(x)),compl(re(x),re(y)),compl(im(x),im(y))):is(pl(x,y),pl(y,x))
-compl:=satz209:is(pl(x,y),pl(y,x))
-x@satz210:=tr3is(cx,pl(x,0c),pli(pl"r"(re(x),0),pl"r"(im(x),0)),pli(re(x),im(x)),x,plis2a(x,0,0),isrecx12(pl"r"(re(x),0),re(x),pl"r"(im(x),0),im(x),pl02(re(x),0,refis(real,0)),pl02(im(x),0,refis(real,0))),pliis(x)):is(pl(x,0c),x)
-satz210a:=symis(cx,pl(x,0c),x,satz210):is(x,pl(x,0c))
-satz210b:=tris(cx,pl(0c,x),pl(x,0c),x,compl(0c,x),satz210):is(pl(0c,x),x)
-satz210c:=symis(cx,pl(0c,x),x,satz210b):is(x,pl(0c,x))
-z@satz211:=tr3is(cx,pl(pl(x,y),z),pli(pl"r"(pl"r"(re(x),re(y)),re(z)),pl"r"(pl"r"(im(x),im(y)),im(z))),pli(pl"r"(re(x),pl"r"(re(y),re(z))),pl"r"(im(x),pl"r"(im(y),im(z)))),pl(x,pl(y,z)),plis1a(z,pl"r"(re(x),re(y)),pl"r"(im(x),im(y))),isrecx12(pl"r"(pl"r"(re(x),re(y)),re(z)),pl"r"(re(x),pl"r"(re(y),re(z))),pl"r"(pl"r"(im(x),im(y)),im(z)),pl"r"(im(x),pl"r"(im(y),im(z))),asspl1(re(x),re(y),re(z)),asspl1(im(x),im(y),im(z))),plis2b(x,pl"r"(re(y),re(z)),pl"r"(im(y),im(z)))):is(pl(pl(x,y),z),pl(x,pl(y,z)))
-asspl1:=satz211:is(pl(pl(x,y),z),pl(x,pl(y,z)))
-asspl2:=symis(cx,pl(pl(x,y),z),pl(x,pl(y,z)),asspl1):is(pl(x,pl(y,z)),pl(pl(x,y),z))
-y@[u:complex][i:is(pl(y,u),x)]
-+2212
-t1:=tris(real,pl"r"(re(y),re(u)),re(pl(y,u)),re(x),isre(pl"r"(re(y),re(u)),pl"r"(im(y),im(u))),iscere(pl(y,u),x,i)):is"r"(pl"r"(re(y),re(u)),re(x))
-t2:=tris(real,pl"r"(im(y),im(u)),im(pl(y,u)),im(x),isim(pl"r"(re(y),re(u)),pl"r"(im(y),im(u))),isceim(pl(y,u),x,i)):is"r"(pl"r"(im(y),im(u)),im(x))
-t3:=satz187d(re(x),re(y),re(u),t1):is"r"(re(u),mn(re(x),re(y)))
-t4:=satz187d(im(x),im(y),im(u),t2):is"r"(im(u),mn(im(x),im(y)))
--2212
-satz212a:=tris(cx,u,pli(re(u),im(u)),pli(mn(re(x),re(y)),mn(im(x),im(y))),ispli(u),isrecx12(re(u),mn(re(x),re(y)),im(u),mn(im(x),im(y)),t3".2212",t4".2212")):is(u,pli(mn(re(x),re(y)),mn(im(x),im(y))))
-y@satz212b:=tr3is(cx,pl(y,pli(mn(re(x),re(y)),mn(im(x),im(y)))),pli(pl"r"(re(y),mn(re(x),re(y))),pl"r"(im(y),mn(im(x),im(y)))),pli(re(x),im(x)),x,plis2a(y,mn(re(x),re(y)),mn(im(x),im(y))),isrecx12(pl"r"(re(y),mn(re(x),re(y))),re(x),pl"r"(im(y),mn(im(x),im(y))),im(x),satz187a(re(x),re(y)),satz187a(im(x),im(y))),pliis(x)):is(pl(y,pli(mn(re(x),re(y)),mn(im(x),im(y)))),x)
-satz212c:=somei(cx,[t:cx]is(pl(y,t),x),pli(mn(re(x),re(y)),mn(im(x),im(y))),satz212b):some([t:complex]is(pl(y,t),x))
-satz212:=onei(cx,[t:cx]is(pl(y,t),x),[t:cx][u:cx][v:is(pl(y,t),x)][w:is(pl(y,u),x)]tris2(cx,t,u,pli(mn(re(x),re(y)),mn(im(x),im(y))),satz212a(t,v),satz212a(u,w)),satz212c):one([t:complex]is(pl(y,t),x))
-%satz212:=onei(cx,[t:cx]is(pl(y,t),x),[t:cx][u:cx][v:is(pl(y,t),x)][w:is(pl(y,u),x)]tris2(cx,t,u,v),satz212a(u,w)),satz212c):one([t:complex]is(pl(y,t),x))
-mn:=pli(mn"r"(re(x),re(y)),mn"r"(im(x),im(y))):complex
-d@mnis12a:=isrecx12(mn"r"(re(pli(a,b)),re(pli(c,d))),mn"r"(a,c),mn"r"(im(pli(a,b)),im(pli(c,d))),mn"r"(b,d),ismn12(re(pli(a,b)),a,re(pli(c,d)),c,reis(a,b),reis(c,d)),ismn12(im(pli(a,b)),b,im(pli(c,d)),d,imis(a,b),imis(c,d))):is(mn(pli(a,b),pli(c,d)),pli(mn"r"(a,c),mn"r"(b,d)))
-mnis12b:=symis(cx,mn(pli(a,b),pli(c,d)),pli(mn"r"(a,c),mn"r"(b,d)),mnis12a):is(pli(mn"r"(a,c),mn"r"(b,d)),mn(pli(a,b),pli(c,d)))
-x@[r:real][s:real]
-mnis1a:=isrecx12(mn"r"(re(pli(r,s)),re(x)),mn"r"(r,re(x)),mn"r"(im(pli(r,s)),im(x)),mn"r"(s,im(x)),ismn1(re(pli(r,s)),r,re(x),reis(r,s)),ismn1(im(pli(r,s)),s,im(x),imis(r,s))):is(mn(pli(r,s),x),pli(mn"r"(r,re(x)),mn"r"(s,im(x))))
-mnis1b:=symis(cx,mn(pli(r,s),x),pli(mn"r"(r,re(x)),mn"r"(s,im(x))),mnis1a):is(pli(mn"r"(r,re(x)),mn"r"(s,im(x))),mn(pli(r,s),x))
-mnis2a:=isrecx12(mn"r"(re(x),re(pli(r,s))),mn"r"(re(x),r),mn"r"(im(x),im(pli(r,s))),mn"r"(im(x),s),ismn2(re(pli(r,s)),r,re(x),reis(r,s)),ismn2(im(pli(r,s)),s,im(x),imis(r,s))):is(mn(x,pli(r,s)),pli(mn"r"(re(x),r),mn"r"(im(x),s)))
-mnis2b:=symis(cx,mn(x,pli(r,s)),pli(mn"r"(re(x),r),mn"r"(im(x),s)),mnis2a):is(pli(mn"r"(re(x),r),mn"r"(im(x),s)),mn(x,pli(r,s)))
-z@[i:is(x,y)]
-ismn1:=isf(cx,cx,[t:cx]mn(t,z),x,y,i):is(mn(x,z),mn(y,z))
-ismn2:=isf(cx,cx,[t:cx]mn(z,t),x,y,i):is(mn(z,x),mn(z,y))
-z@[u:complex][i:is(x,y)][j:is(z,u)]
-ismn12:=tris(cx,mn(x,z),mn(y,z),mn(y,u),ismn1(x,y,z,i),ismn2(z,u,y,j)):is(mn(x,z),mn(y,u))
-y@[u:complex][i:is(pl(y,u),x)]
-satz212d:=satz212a(u,i):is(u,mn(x,y))
-satz212e:=symis(cx,u,mn(x,y),satz212d):is(mn(x,y),u)
-u@[i:is(pl(u,y),x)]
-satz212f:=satz212d(tris(cx,pl(y,u),pl(u,y),x,compl(y,u),i)):is(u,mn(x,y))
-satz212g:=symis(cx,u,mn(x,y),satz212f):is(mn(x,y),u)
-y@satz212h:=satz212b:is(pl(y,mn(x,y)),x)
-[i:is(mn(x,y),0c)]
-+2213
-t1:=tr3is(real,mn"r"(re(x),re(y)),re(mn(x,y)),re(0c),0,isre(mn"r"(re(x),re(y)),mn"r"(im(x),im(y))),iscere(mn(x,y),0c,i),reis(0,0)):is"r"(mn"r"(re(x),re(y)),0)
-t2:=tr3is(real,mn"r"(im(x),im(y)),im(mn(x,y)),im(0c),0,isim(mn"r"(re(x),re(y)),mn"r"(im(x),im(y))),isceim(mn(x,y),0c,i),imis(0,0)):is"r"(mn"r"(im(x),im(y)),0)
-t3:=satz182b(re(x),re(y),t1):is"r"(re(x),re(y))
-t4:=satz182b(im(x),im(y),t2):is"r"(im(x),im(y))
--2213
-satz213a:=tr3is(cx,x,pli(re(x),im(x)),pli(re(y),im(y)),y,ispli(x),isrecx12(re(x),re(y),im(x),im(y),t3".2213",t4".2213"),pliis(y)):is(x,y)
-y@[i:is(x,y)]
-+*2213
-i@t5:=satz182e(re(x),re(y),iscere(x,y,i)):is"r"(mn"r"(re(x),re(y)),0)
-t6:=satz182e(im(x),im(y),isceim(x,y,i)):is"r"(mn"r"(im(x),im(y)),0)
--2213
-i@satz213b:=isrecx12(mn"r"(re(x),re(y)),0,mn"r"(im(x),im(y)),0,t5".2213",t6".2213"):is(mn(x,y),0c)
-x@m0:=mn(0c,x):complex
-satz214:=isrecx12(mn"r"(re(0c),re(x)),m0"r"(re(x)),mn"r"(im(0c),im(x)),m0"r"(im(x)),pl01(re(0c),m0"r"(re(x)),reis(0,0)),pl01(im(0c),m0"r"(im(x)),imis(0,0))):is(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))))
-satz214a:=symis(cx,m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),satz214):is(pli(m0"r"(re(x)),m0"r"(im(x))),m0(x))
-b@m0isa:=tris(cx,m0(pli(a,b)),pli(m0"r"(re(pli(a,b))),m0"r"(im(pli(a,b)))),pli(m0"r"(a),m0"r"(b)),satz214(pli(a,b)),isrecx12(m0"r"(re(pli(a,b))),m0"r"(a),m0"r"(im(pli(a,b))),m0"r"(b),ism0(re(pli(a,b)),a,reis(a,b)),ism0(im(pli(a,b)),b,imis(a,b)))):is(m0(pli(a,b)),pli(m0"r"(a),m0"r"(b)))
-m0isb:=symis(cx,m0(pli(a,b)),pli(m0"r"(a),m0"r"(b)),m0isa):is(pli(m0"r"(a),m0"r"(b)),m0(pli(a,b)))
-y@[i:is(x,y)]
-ism0:=isf(cx,cx,[t:cx]m0(t),x,y,i):is(m0(x),m0(y))
-x@satz215:=tr4is(cx,m0(m0(x)),m0(pli(m0"r"(re(x)),m0"r"(im(x)))),pli(m0"r"(m0"r"(re(x))),m0"r"(m0"r"(im(x)))),pli(re(x),im(x)),x,ism0(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),satz214),m0isa(m0"r"(re(x)),m0"r"(im(x))),isrecx12(m0"r"(m0"r"(re(x))),re(x),m0"r"(m0"r"(im(x))),im(x),satz177(re(x)),satz177(im(x))),pliis(x)):is(m0(m0(x)),x)
-satz215a:=symis(cx,m0(m0(x)),x,satz215):is(x,m0(m0(x)))
-y@[i:is(x,m0(y))]
-satz215b:=tris(cx,m0(x),m0(m0(y)),y,ism0(x,m0(y),i),satz215(y)):is(m0(x),y)
-satz215c:=symis(cx,m0(x),y,satz215b):is(y,m0(x))
-y@[i:is(m0(x),y)]
-satz215d:=satz215c(y,x,symis(cx,m0(x),y,i)):is(x,m0(y))
-satz215e:=symis(cx,x,m0(y),satz215d):is(m0(y),x)
-x@satz216:=tr3is(cx,pl(x,m0(x)),pl(x,pli(m0"r"(re(x)),m0"r"(im(x)))),pli(pl"r"(re(x),m0"r"(re(x))),pl"r"(im(x),m0"r"(im(x)))),0c,ispl2(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),x,satz214(x)),plis2a(x,m0"r"(re(x)),m0"r"(im(x))),isrecx12(pl"r"(re(x),m0"r"(re(x))),0,pl"r"(im(x),m0"r"(im(x))),0,satz179(re(x)),satz179(im(x)))):is(pl(x,m0(x)),0c)
-+2216
-anders:=satz212h(0c,x):is(pl(x,m0(x)),0c)
--2216
-satz216a:=tris(cx,pl(m0(x),x),pl(x,m0(x)),0c,compl(m0(x),x),satz216):is(pl(m0(x),x),0c)
-y@satz217:=tr4is(cx,m0(pl(x,y)),pli(m0"r"(pl"r"(re(x),re(y))),m0"r"(pl"r"(im(x),im(y)))),pli(pl"r"(m0"r"(re(x)),m0"r"(re(y))),pl"r"(m0"r"(im(x)),m0"r"(im(y)))),pl(pli(m0"r"(re(x)),m0"r"(im(x))),pli(m0"r"(re(y)),m0"r"(im(y)))),pl(m0(x),m0(y)),m0isa(pl"r"(re(x),re(y)),pl"r"(im(x),im(y))),isrecx12(m0"r"(pl"r"(re(x),re(y))),pl"r"(m0"r"(re(x)),m0"r"(re(y))),m0"r"(pl"r"(im(x),im(y))),pl"r"(m0"r"(im(x)),m0"r"(im(y))),satz180(re(x),re(y)),satz180(im(x),im(y))),plis12b(m0"r"(re(x)),m0"r"(im(x)),m0"r"(re(y)),m0"r"(im(y))),ispl12(pli(m0"r"(re(x)),m0"r"(im(x))),m0(x),pli(m0"r"(re(y)),m0"r"(im(y))),m0(y),satz214a(x),satz214a(y))):is(m0(pl(x,y)),pl(m0(x),m0(y)))
-satz217a:=symis(cx,m0(pl(x,y)),pl(m0(x),m0(y)),satz217):is(pl(m0(x),m0(y)),m0(pl(x,y)))
-satz218:=tris(cx,mn(x,y),pl(x,pli(m0"r"(re(y)),m0"r"(im(y)))),pl(x,m0(y)),plis2b(x,m0"r"(re(y)),m0"r"(im(y))),ispl2(pli(m0"r"(re(y)),m0"r"(im(y))),m0(y),x,satz214a(y))):is(mn(x,y),pl(x,m0(y)))
-satz218a:=symis(cx,mn(x,y),pl(x,m0(y)),satz218):is(pl(x,m0(y)),mn(x,y))
-+2219
-t1:=tr3is(cx,m0(mn(x,y)),m0(pl(x,m0(y))),pl(m0(x),m0(m0(y))),pl(m0(x),y),ism0(mn(x,y),pl(x,m0(y)),satz218),satz217(x,m0(y)),ispl2(m0(m0(y)),y,m0(x),satz215(y))):is(m0(mn(x,y)),pl(m0(x),y))
--2219
-satz219:=tr3is(cx,m0(mn(x,y)),pl(m0(x),y),pl(y,m0(x)),mn(y,x),t1".2219",compl(m0(x),y),satz218a(y,x)):is(m0(mn(x,y)),mn(y,x))
-satz219a:=symis(cx,m0(mn(y,x)),mn(x,y),satz219(y,x)):is(mn(x,y),m0(mn(y,x)))
-ts:=pli(mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y))),pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)))):complex
-rets:=mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y))):real
-imts:=pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))):real
-+v3
-d@t1:=ismn12"r"(ts"r"(re(pli(a,b)),re(pli(c,d))),ts"r"(a,c),ts"r"(im(pli(a,b)),im(pli(c,d))),ts"r"(b,d),ists12(re(pli(a,b)),a,re(pli(c,d)),c,reis(a,b),reis(c,d)),ists12(im(pli(a,b)),b,im(pli(c,d)),d,imis(a,b),imis(c,d))):is"r"(rets(pli(a,b),pli(c,d)),mn"r"(ts"r"(a,c),ts"r"(b,d)))
-t2:=ispl12"r"(ts"r"(re(pli(a,b)),im(pli(c,d))),ts"r"(a,d),ts"r"(im(pli(a,b)),re(pli(c,d))),ts"r"(b,c),ists12(re(pli(a,b)),a,im(pli(c,d)),d,reis(a,b),imis(c,d)),ists12(im(pli(a,b)),b,re(pli(c,d)),c,imis(a,b),reis(c,d))):is"r"(imts(pli(a,b),pli(c,d)),pl"r"(ts"r"(a,d),ts"r"(b,c)))
--v3
-d@tsis12a:=isrecx12(rets(pli(a,b),pli(c,d)),mn"r"(ts"r"(a,c),ts"r"(b,d)),imts(pli(a,b),pli(c,d)),pl"r"(ts"r"(a,d),ts"r"(b,c)),t1".v3",t2".v3"):is(ts(pli(a,b),pli(c,d)),pli(mn"r"(ts"r"(a,c),ts"r"(b,d)),pl"r"(ts"r"(a,d),ts"r"(b,c))))
-tsis12b:=symis(cx,ts(pli(a,b),pli(c,d)),pli(mn"r"(ts"r"(a,c),ts"r"(b,d)),pl"r"(ts"r"(a,d),ts"r"(b,c))),tsis12a):is(pli(mn"r"(ts"r"(a,c),ts"r"(b,d)),pl"r"(ts"r"(a,d),ts"r"(b,c))),ts(pli(a,b),pli(c,d)))
-x@[r:real][s:real]
-+*v3
-s@t3:=ismn12"r"(ts"r"(re(pli(r,s)),re(x)),ts"r"(r,re(x)),ts"r"(im(pli(r,s)),im(x)),ts"r"(s,im(x)),ists1(re(pli(r,s)),r,re(x),reis(r,s)),ists1(im(pli(r,s)),s,im(x),imis(r,s))):is"r"(rets(pli(r,s),x),mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))))
-t4:=ispl12"r"(ts"r"(re(pli(r,s)),im(x)),ts"r"(r,im(x)),ts"r"(im(pli(r,s)),re(x)),ts"r"(s,re(x)),ists1(re(pli(r,s)),r,im(x),reis(r,s)),ists1(im(pli(r,s)),s,re(x),imis(r,s))):is"r"(imts(pli(r,s),x),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x))))
--v3
-s@tsis1a:=isrecx12(rets(pli(r,s),x),mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))),imts(pli(r,s),x),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x))),t3".v3",t4".v3"):is(ts(pli(r,s),x),pli(mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x)))))
-tsis1b:=symis(cx,ts(pli(r,s),x),pli(mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x)))),tsis1a):is(pli(mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x)))),ts(pli(r,s),x))
-+*v3
-s@t5:=ismn12"r"(ts"r"(re(x),re(pli(r,s))),ts"r"(re(x),r),ts"r"(im(x),im(pli(r,s))),ts"r"(im(x),s),ists2(re(pli(r,s)),r,re(x),reis(r,s)),ists2(im(pli(r,s)),s,im(x),imis(r,s))):is"r"(rets(x,pli(r,s)),mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)))
-t6:=ispl12"r"(ts"r"(re(x),im(pli(r,s))),ts"r"(re(x),s),ts"r"(im(x),re(pli(r,s))),ts"r"(im(x),r),ists2(im(pli(r,s)),s,re(x),imis(r,s)),ists2(re(pli(r,s)),r,im(x),reis(r,s))):is"r"(imts(x,pli(r,s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r)))
--v3
-s@tsis2a:=isrecx12(rets(x,pli(r,s)),mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)),imts(x,pli(r,s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r)),t5".v3",t6".v3"):is(ts(x,pli(r,s)),pli(mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r))))
-tsis2b:=symis(cx,ts(x,pli(r,s)),pli(mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r))),tsis2a):is(pli(mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r))),ts(x,pli(r,s)))
-z@[i:is(x,y)]
-ists1:=isf(cx,cx,[t:cx]ts(t,z),x,y,i):is(ts(x,z),ts(y,z))
-ists2:=isf(cx,cx,[t:cx]ts(z,t),x,y,i):is(ts(z,x),ts(z,y))
-z@[u:complex][i:is(x,y)][j:is(z,u)]
-ists12:=tris(cx,ts(x,z),ts(y,z),ts(y,u),ists1(x,y,z,i),ists2(z,u,y,j)):is(ts(x,z),ts(y,u))
-+3220
-y@t1:=ismn12"r"(ts"r"(re(x),re(y)),ts"r"(re(y),re(x)),ts"r"(im(x),im(y)),ts"r"(im(y),im(x)),comts(re(x),re(y)),comts(im(x),im(y))):is"r"(rets(x,y),rets(y,x))
-t2:=tris(real,imts(x,y),pl"r"(ts"r"(im(x),re(y)),ts"r"(re(x),im(y))),imts(y,x),compl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))),ispl12"r"(ts"r"(im(x),re(y)),ts"r"(re(y),im(x)),ts"r"(re(x),im(y)),ts"r"(im(y),re(x)),comts(im(x),re(y)),comts(re(x),im(y)))):is"r"(imts(x,y),imts(y,x))
--3220
-y@satz220:=isrecx12(rets(x,y),rets(y,x),imts(x,y),imts(y,x),t1".3220",t2".3220"):is(ts(x,y),ts(y,x))
-comts:=satz220:is(ts(x,y),ts(y,x))
-x@[i:is(x,0c)]
-lemma1:=tris(real,re(x),re(0c),0,iscere(x,0c,i),reis(0,0)):is"r"(re(x),0)
-lemma2:=tris(real,im(x),im(0c),0,isceim(x,0c,i),imis(0,0)):is"r"(im(x),0)
-x@mod2:=pl"r"(ts"r"(re(x),re(x)),ts"r"(im(x),im(x))):real
-i@lemma3:=tris(real,mod2,pl"r"(0,0),0,ispl12"r"(ts"r"(re(x),re(x)),0,ts"r"(im(x),im(x)),0,ts01(re(x),re(x),lemma1),ts01(im(x),im(x),lemma2)),pl01(0,0,refis(real,0))):is"r"(mod2(x),0)
-x@[n:nis(x,0c)]
-+*v3
-x@re2:=ts"r"(re(x),re(x)):real
-im2:=ts"r"(im(x),im(x)):real
-n@[i:is"r"(re(x),0)]
-t7:=th3"l.imp"(is"r"(im(x),0),is(x,0c),n,[t:is"r"(im(x),0)]tris(cx,x,pli(re(x),im(x)),0c,ispli(x),isrecx12(re(x),0,im(x),0,i,t))):nis"r"(im(x),0)
-t8:=ispos(im2,mod2,symis(real,mod2,im2,pl01(re2,im2,ts01(re(x),re(x),i))),possq(im(x),t7)):pos(mod2)
-n@[o:nis"r"(re(x),0)][i:is"r"(im(x),0)]
-t9:=ispos(re2,mod2,symis(real,mod2,re2,pl02(re2,im2,ts01(im(x),im(x),i))),possq(re(x),o)):pos(mod2)
-o@[p:nis"r"(im(x),0)]
-t10:=pospl(re2,im2,possq(re(x),o),possq(im(x),p)):pos(mod2)
-o@t11:=th1"l.imp"(is"r"(im(x),0),pos(mod2),[t:is"r"(im(x),0)]t9(t),[t:nis"r"(im(x),0)]t10(t)):pos(mod2)
--v3
-n@lemma4:=th1"l.imp"(is"r"(re(x),0),pos(mod2),[t:is"r"(re(x),0)]t8".v3"(t),[t:nis"r"(re(x),0)]t11".v3"(t)):pos(mod2(x))
-x@lemma5:=th1"l.imp"(is(x,0c),not(neg(mod2)),[t:is(x,0c)]0notn(mod2,lemma3(t)),[t:nis(x,0c)]pnotn(mod2,lemma4(t))):not(neg(mod2(x)))
-y@[i:is(x,0c)]
-+3221
-t1:=lemma1(x,i):is"r"(re(x),0)
-t2:=lemma2(x,i):is"r"(im(x),0)
-t3:=tris(real,rets(x,y),mn"r"(0,0),0,ismn12"r"(ts"r"(re(x),re(y)),0,ts"r"(im(x),im(y)),0,ts01(re(x),re(y),t1),ts01(im(x),im(y),t2)),satz187c(0,0,0,pl02(0,0,refis(real,0)))):is"r"(rets(x,y),0)
-t4:=tris(real,imts(x,y),pl"r"(0,0),0,ispl12"r"(ts"r"(re(x),im(y)),0,ts"r"(im(x),re(y)),0,ts01(re(x),im(y),t1),ts01(im(x),re(y),t2)),pl02(0,0,refis(real,0))):is"r"(imts(x,y),0)
--3221
-satz221a:=isrecx12(rets(x,y),0,imts(x,y),0,t3".3221",t4".3221"):is(ts(x,y),0c)
-y@[i:is(y,0c)]
-satz221b:=tris(cx,ts(x,y),ts(y,x),0c,comts(x,y),satz221a(y,x,i)):is(ts(x,y),0c)
-y@[i:is(ts(x,y),0c)]
-+*3221
-i@[n:nis(y,0c)]
-t5:=lemma4(y,n):pos(mod2(y))
-t6:=tris1(real,rets(x,y),0,re(ts(x,y)),reis(rets(x,y),imts(x,y)),lemma1(ts(x,y),i)):is"r"(rets(x,y),0)
-t7:=tris1(real,imts(x,y),0,im(ts(x,y)),imis(rets(x,y),imts(x,y)),lemma2(ts(x,y),i)):is"r"(imts(x,y),0)
-t8:=tris(real,pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),pl"r"(0,0),0,ispl12"r"(ts"r"(rets(x,y),re(y)),0,ts"r"(imts(x,y),im(y)),0,ts01(rets(x,y),re(y),t6),ts01(imts(x,y),im(y),t7)),pl02(0,0,refis(real,0))):is"r"(pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),0)
-y@ii1r:=ts"r"(ts"r"(im(x),im(y)),re(y)):real
-i1ir:=ts"r"(im(x),ts"r"(im(y),re(y))):real
-ir1i:=ts"r"(ts"r"(im(x),re(y)),im(y)):real
-i1ri:=ts"r"(im(x),ts"r"(re(y),im(y))):real
-rr1r:=ts"r"(ts"r"(re(x),re(y)),re(y)):real
-r1rr:=ts"r"(re(x),ts"r"(re(y),re(y))):real
-ri1r:=ts"r"(ts"r"(re(x),im(y)),re(y)):real
-r1ir:=ts"r"(re(x),ts"r"(im(y),re(y))):real
-ri1i:=ts"r"(ts"r"(re(x),im(y)),im(y)):real
-r1ii:=ts"r"(re(x),ts"r"(im(y),im(y))):real
-n@t9:=tris(real,ii1r,i1ir,i1ri,assts1(im(x),im(y),re(y)),ists2"r"(ts"r"(im(y),re(y)),ts"r"(re(y),im(y)),im(x),comts"r"(im(y),re(y)))):is"r"(ii1r,i1ri)
-t10:=tris(real,ts"r"(rets(x,y),re(y)),mn"r"(rr1r,ii1r),mn"r"(r1rr,i1ri),disttm1(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)),re(y)),ismn12"r"(rr1r,r1rr,ii1r,i1ri,assts1(re(x),re(y),re(y)),t9)):is"r"(ts"r"(rets(x,y),re(y)),mn"r"(r1rr,i1ri))
-t11:=tr3is(real,ts"r"(imts(x,y),im(y)),pl"r"(ri1i,ir1i),pl"r"(r1ii,i1ri),pl"r"(i1ri,r1ii),disttp1(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)),im(y)),ispl12"r"(ri1i,r1ii,ir1i,i1ri,assts1(re(x),im(y),im(y)),assts1(im(x),re(y),im(y))),compl"r"(r1ii,i1ri)):is"r"(ts"r"(imts(x,y),im(y)),pl"r"(i1ri,r1ii))
-t12:=tr4is(real,pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),pl"r"(mn"r"(r1rr,i1ri),pl"r"(i1ri,r1ii)),pl"r"(pl"r"(mn"r"(r1rr,i1ri),i1ri),r1ii),pl"r"(r1rr,r1ii),ts"r"(re(x),mod2(y)),ispl12"r"(ts"r"(rets(x,y),re(y)),mn"r"(r1rr,i1ri),ts"r"(imts(x,y),im(y)),pl"r"(i1ri,r1ii),t10,t11),asspl2"r"(mn"r"(r1rr,i1ri),i1ri,r1ii),ispl1"r"(pl"r"(mn"r"(r1rr,i1ri),i1ri),r1rr,r1ii,plmn(r1rr,i1ri)),distpt2(re(x),ts"r"(re(y),re(y)),ts"r"(im(y),im(y)))):is"r"(pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),ts"r"(re(x),mod2(y)))
-t13:=tris1(real,ts"r"(re(x),mod2(y)),0,pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),t12,t8):is"r"(ts"r"(re(x),mod2(y)),0)
-t14:=ore1(is"r"(re(x),0),is"r"(mod2(y),0),satz192c(re(x),mod2(y),t13),pnot0(mod2(y),t5)):is"r"(re(x),0)
-t15:=tris1(real,ts"r"(im(x),im(y)),0,ts"r"(re(x),re(y)),satz182b(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)),t6),ts01(re(x),re(y),t14)):is"r"(ts"r"(im(x),im(y)),0)
-t16:=tris1(real,ts"r"(im(x),re(y)),0,imts(x,y),pl01(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)),ts01(re(x),im(y),t14)),t7):is"r"(ts"r"(im(x),re(y)),0)
-[j:is"r"(re(y),0)]
-t17:=t7"c.v3"(y,n,j):nis"r"(im(y),0)
-t18:=ore1(is"r"(im(x),0),is"r"(im(y),0),satz192c(im(x),im(y),t15),t17):is"r"(im(x),0)
-n@[o:nis"r"(re(y),0)]
-t19:=ore1(is"r"(im(x),0),is"r"(re(y),0),satz192c(im(x),re(y),t16),o):is"r"(im(x),0)
-n@t20:=th1"l.imp"(is"r"(re(y),0),is"r"(im(x),0),[t:is"r"(re(y),0)]t18(t),[t:nis"r"(re(y),0)]t19(t)):is"r"(im(x),0)
-t21:=tris(cx,x,pli(re(x),im(x)),0c,ispli(x),isrecx12(re(x),0,im(x),0,t14,t20)):is(x,0c)
--3221
-i@satz221c:=th2"l.or"(is(x,0c),is(y,0c),[t:nis(y,0c)]t21".3221"(t)):or(is(x,0c),is(y,0c))
-y@[n:nis(x,0c)][o:nis(y,0c)]
-satz221d:=th3"l.imp"(is(ts(x,y),0c),or(is(x,0c),is(y,0c)),th3"l.or"(is(x,0c),is(y,0c),n,o),[t:is(ts(x,y),0c)]satz221c(t)):nis(ts(x,y),0c)
-+3222
-x@t1:=tris(real,mn"r"(ts"r"(re(x),1rl),ts"r"(im(x),0)),mn"r"(re(x),0),re(x),ismn12"r"(ts"r"(re(x),1rl),re(x),ts"r"(im(x),0),0,satz195(re(x)),ts02(im(x),0,refis(real,0))),pl02(re(x),m0"r"(0),satz176b(0,refis(real,0)))):is"r"(mn"r"(ts"r"(re(x),1rl),ts"r"(im(x),0)),re(x))
-t2:=tris(real,pl"r"(ts"r"(re(x),0),ts"r"(im(x),1rl)),pl"r"(0,im(x)),im(x),ispl12"r"(ts"r"(re(x),0),0,ts"r"(im(x),1rl),im(x),ts02(re(x),0,refis(real,0)),satz195(im(x))),pl01(0,im(x),refis(real,0))):is"r"(pl"r"(ts"r"(re(x),0),ts"r"(im(x),1rl)),im(x))
--3222
-x@satz222:=tr3is(cx,ts(x,1c),pli(mn"r"(ts"r"(re(x),1rl),ts"r"(im(x),0)),pl"r"(ts"r"(re(x),0),ts"r"(im(x),1rl))),pli(re(x),im(x)),x,tsis2a(x,1rl,0),isrecx12(mn"r"(ts"r"(re(x),1rl),ts"r"(im(x),0)),re(x),pl"r"(ts"r"(re(x),0),ts"r"(im(x),1rl)),im(x),t1".3222",t2".3222"),pliis(x)):is(ts(x,1c),x)
-satz222a:=symis(cx,ts(x,1c),x,satz222):is(x,ts(x,1c))
-satz222b:=tris(cx,ts(1c,x),ts(x,1c),x,comts(1c,x),satz222):is(ts(1c,x),x)
-satz222c:=symis(cx,ts(1c,x),x,satz222b):is(x,ts(1c,x))
-+3223
-t1:=tris(real,mn"r"(ts"r"(re(x),m0"r"(1rl)),ts"r"(im(x),m0"r"(0))),mn"r"(m0"r"(re(x)),0),m0"r"(re(x)),ismn12"r"(ts"r"(re(x),m0"r"(1rl)),m0"r"(re(x)),ts"r"(im(x),m0"r"(0)),0,tris(real,ts"r"(re(x),m0"r"(1rl)),m0"r"(ts"r"(re(x),1rl)),m0"r"(re(x)),satz197b(re(x),1rl),ism0"r"(ts"r"(re(x),1rl),re(x),satz195(re(x)))),ts02(im(x),m0"r"(0),satz176b(0,refis(real,0)))),pl02(m0"r"(re(x)),m0"r"(0),satz176b(0,refis(real,0)))):is"r"(mn"r"(ts"r"(re(x),m0"r"(1rl)),ts"r"(im(x),m0"r"(0))),m0"r"(re(x)))
-t2:=tris(real,pl"r"(ts"r"(re(x),m0"r"(0)),ts"r"(im(x),m0"r"(1rl))),pl"r"(0,m0"r"(im(x))),m0"r"(im(x)),ispl12"r"(ts"r"(re(x),m0"r"(0)),0,ts"r"(im(x),m0"r"(1rl)),m0"r"(im(x)),ts02(re(x),m0"r"(0),satz176b(0,refis(real,0))),tris(real,ts"r"(im(x),m0"r"(1rl)),m0"r"(ts"r"(im(x),1rl)),m0"r"(im(x)),satz197b(im(x),1rl),ism0"r"(ts"r"(im(x),1rl),im(x),satz195(im(x))))),pl01(0,m0"r"(im(x)),refis(real,0))):is"r"(pl"r"(ts"r"(re(x),m0"r"(0)),ts"r"(im(x),m0"r"(1rl))),m0"r"(im(x)))
--3223
-satz223:=tr4is(cx,ts(x,m0(1c)),ts(x,pli(m0"r"(1rl),m0"r"(0))),pli(mn"r"(ts"r"(re(x),m0"r"(1rl)),ts"r"(im(x),m0"r"(0))),pl"r"(ts"r"(re(x),m0"r"(0)),ts"r"(im(x),m0"r"(1rl)))),pli(m0"r"(re(x)),m0"r"(im(x))),m0(x),ists2(m0(1c),pli(m0"r"(1rl),m0"r"(0)),x,m0isa(1rl,0)),tsis2a(x,m0"r"(1rl),m0"r"(0)),isrecx12(mn"r"(ts"r"(re(x),m0"r"(1rl)),ts"r"(im(x),m0"r"(0))),m0"r"(re(x)),pl"r"(ts"r"(re(x),m0"r"(0)),ts"r"(im(x),m0"r"(1rl))),m0"r"(im(x)),t1".3223",t2".3223"),satz214a(x)):is(ts(x,m0(1c)),m0(x))
-satz223a:=symis(cx,ts(x,m0(1c)),m0(x),satz223):is(m0(x),ts(x,m0(1c)))
-satz223b:=tris(cx,ts(m0(1c),x),ts(x,m0(1c)),m0(x),comts(m0(1c),x),satz223):is(ts(m0(1c),x),m0(x))
-satz223c:=symis(cx,ts(m0(1c),x),m0(x),satz223b):is(m0(x),ts(m0(1c),x))
-+3224
-y@rxry:=ts"r"(re(x),re(y)):real
-ixiy:=ts"r"(im(x),im(y)):real
-rxiy:=ts"r"(re(x),im(y)):real
-ixry:=ts"r"(im(x),re(y)):real
-t1:=tr4is(real,mn"r"(ts"r"(m0"r"(re(x)),re(y)),ts"r"(m0"r"(im(x)),im(y))),mn"r"(m0"r"(rxry),m0"r"(ixiy)),pl"r"(m0"r"(rxry),ixiy),mn"r"(ixiy,rxry),m0"r"(mn"r"(rxry,ixiy)),ismn12"r"(ts"r"(m0"r"(re(x)),re(y)),m0"r"(rxry),ts"r"(m0"r"(im(x)),im(y)),m0"r"(ixiy),satz197a(re(x),re(y)),satz197a(im(x),im(y))),ispl2"r"(m0"r"(m0"r"(ixiy)),ixiy,m0"r"(rxry),satz177(ixiy)),compl"r"(m0"r"(rxry),ixiy),satz181a(ixiy,rxry)):is"r"(mn"r"(ts"r"(m0"r"(re(x)),re(y)),ts"r"(m0"r"(im(x)),im(y))),m0"r"(mn"r"(rxry,ixiy)))
-t2:=tris(real,pl"r"(ts"r"(m0"r"(re(x)),im(y)),ts"r"(m0"r"(im(x)),re(y))),mn"r"(m0"r"(rxiy),ixry),m0"r"(pl"r"(rxiy,ixry)),ispl12"r"(ts"r"(m0"r"(re(x)),im(y)),m0"r"(rxiy),ts"r"(m0"r"(im(x)),re(y)),m0"r"(ixry),satz197a(re(x),im(y)),satz197a(im(x),re(y))),satz180a(rxiy,ixry)):is"r"(pl"r"(ts"r"(m0"r"(re(x)),im(y)),ts"r"(m0"r"(im(x)),re(y))),m0"r"(pl"r"(rxiy,ixry)))
--3224
-y@satz224a:=tr4is(cx,ts(m0(x),y),ts(pli(m0"r"(re(x)),m0"r"(im(x))),y),pli(mn"r"(ts"r"(m0"r"(re(x)),re(y)),ts"r"(m0"r"(im(x)),im(y))),pl"r"(ts"r"(m0"r"(re(x)),im(y)),ts"r"(m0"r"(im(x)),re(y)))),pli(m0"r"(mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)))),m0"r"(pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))))),m0(ts(x,y)),ists1(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),y,satz214(x)),tsis1a(y,m0"r"(re(x)),m0"r"(im(x))),isrecx12(mn"r"(ts"r"(m0"r"(re(x)),re(y)),ts"r"(m0"r"(im(x)),im(y))),m0"r"(mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)))),pl"r"(ts"r"(m0"r"(re(x)),im(y)),ts"r"(m0"r"(im(x)),re(y))),m0"r"(pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)))),t1".3224",t2".3224"),m0isb(mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y))),pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))))):is(ts(m0(x),y),m0(ts(x,y)))
-satz224b:=tr3is(cx,ts(x,m0(y)),ts(m0(y),x),m0(ts(y,x)),m0(ts(x,y)),comts(x,m0(y)),satz224a(y,x),ism0(ts(y,x),ts(x,y),comts(y,x))):is(ts(x,m0(y)),m0(ts(x,y)))
-satz224c:=tris2(cx,ts(m0(x),y),ts(x,m0(y)),m0(ts(x,y)),satz224a,satz224b):is(ts(m0(x),y),ts(x,m0(y)))
-satz224d:=symis(cx,ts(m0(x),y),ts(x,m0(y)),satz224c):is(ts(x,m0(y)),ts(m0(x),y))
-satz224e:=symis(cx,ts(m0(x),y),m0(ts(x,y)),satz224a):is(m0(ts(x,y)),ts(m0(x),y))
-satz224f:=symis(cx,ts(x,m0(y)),m0(ts(x,y)),satz224b):is(m0(ts(x,y)),ts(x,m0(y)))
-satz225:=tris(cx,ts(m0(x),m0(y)),ts(x,m0(m0(y))),ts(x,y),satz224c(x,m0(y)),ists2(m0(m0(y)),y,x,satz215(y))):is(ts(m0(x),m0(y)),ts(x,y))
-satz225a:=symis(cx,ts(m0(x),m0(y)),ts(x,y),satz225):is(ts(x,y),ts(m0(x),m0(y)))
-+3226
-z@rrr:=ts"r"(ts"r"(re(x),re(y)),re(z)):real
-iir:=ts"r"(ts"r"(im(x),im(y)),re(z)):real
-rii:=ts"r"(ts"r"(re(x),im(y)),im(z)):real
-iri:=ts"r"(ts"r"(im(x),re(y)),im(z)):real
-rri:=ts"r"(ts"r"(re(x),re(y)),im(z)):real
-iii:=ts"r"(ts"r"(im(x),im(y)),im(z)):real
-rir:=ts"r"(ts"r"(re(x),im(y)),re(z)):real
-irr:=ts"r"(ts"r"(im(x),re(y)),re(z)):real
-t1:=tr3is(real,mn"r"(ts"r"(rets(x,y),re(z)),ts"r"(imts(x,y),im(z))),mn"r"(mn"r"(rrr,iir),pl"r"(rii,iri)),pl"r"(rrr,pl"r"(m0"r"(iir),m0"r"(pl"r"(rii,iri)))),mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),ismn12"r"(ts"r"(rets(x,y),re(z)),mn"r"(rrr,iir),ts"r"(imts(x,y),im(z)),pl"r"(rii,iri),disttm1(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)),re(z)),disttp1(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)),im(z))),asspl1"r"(rrr,m0"r"(iir),m0"r"(pl"r"(rii,iri))),ispl2"r"(pl"r"(m0"r"(iir),m0"r"(pl"r"(rii,iri))),m0"r"(pl"r"(iir,pl"r"(rii,iri))),rrr,satz180a(iir,pl"r"(rii,iri)))):is"r"(mn"r"(ts"r"(rets(x,y),re(z)),ts"r"(imts(x,y),im(z))),mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))))
-t2:=tr3is(real,pl"r"(ts"r"(rets(x,y),im(z)),ts"r"(imts(x,y),re(z))),pl"r"(mn"r"(rri,iii),pl"r"(rir,irr)),pl"r"(pl"r"(rir,irr),mn"r"(rri,iii)),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii),ispl12"r"(ts"r"(rets(x,y),im(z)),mn"r"(rri,iii),ts"r"(imts(x,y),re(z)),pl"r"(rir,irr),disttm1(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)),im(z)),disttp1(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)),re(z))),compl"r"(mn"r"(rri,iii),pl"r"(rir,irr)),asspl2"r"(pl"r"(rir,irr),rri,m0"r"(iii))):is"r"(pl"r"(ts"r"(rets(x,y),im(z)),ts"r"(imts(x,y),re(z))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii))
-t3:=tris(cx,ts(ts(x,y),z),pli(mn"r"(ts"r"(rets(x,y),re(z)),ts"r"(imts(x,y),im(z))),pl"r"(ts"r"(rets(x,y),im(z)),ts"r"(imts(x,y),re(z)))),pli(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii)),tsis1a(z,rets(x,y),imts(x,y)),isrecx12(mn"r"(ts"r"(rets(x,y),re(z)),ts"r"(imts(x,y),im(z))),mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),pl"r"(ts"r"(rets(x,y),im(z)),ts"r"(imts(x,y),re(z))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii),t1,t2)):is(ts(ts(x,y),z),pli(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii)))
-c@t4:=tris(real,ts"r"(ts"r"(a,b),c),ts"r"(a,ts"r"(b,c)),ts"r"(ts"r"(b,c),a),assts1(a,b,c),comts"r"(a,ts"r"(b,c))):is"r"(ts"r"(ts"r"(a,b),c),ts"r"(ts"r"(b,c),a))
-t5:=tris(real,pl"r"(pl"r"(a,b),c),pl"r"(c,pl"r"(a,b)),pl"r"(pl"r"(c,a),b),compl"r"(pl"r"(a,b),c),asspl2"r"(c,a,b)):is"r"(pl"r"(pl"r"(a,b),c),pl"r"(pl"r"(c,a),b))
-t6:=tris(real,pl"r"(a,pl"r"(b,c)),pl"r"(pl"r"(b,c),a),pl"r"(b,pl"r"(c,a)),compl"r"(a,pl"r"(b,c)),asspl1"r"(b,c,a)):is"r"(pl"r"(a,pl"r"(b,c)),pl"r"(b,pl"r"(c,a)))
-z@rrr1:=rrr(y,z,x):real
-iir1:=iir(y,z,x):real
-rii1:=rii(y,z,x):real
-iri1:=iri(y,z,x):real
-rri1:=rri(y,z,x):real
-iii1:=iii(y,z,x):real
-rir1:=rir(y,z,x):real
-irr1:=irr(y,z,x):real
-t7:=tris(real,pl"r"(iir,pl"r"(rii,iri)),pl"r"(rii,pl"r"(iri,iir)),pl"r"(iir1,pl"r"(rii1,iri1)),t6(iir,rii,iri),ispl12"r"(rii,iir1,pl"r"(iri,iir),pl"r"(rii1,iri1),t4(re(x),im(y),im(z)),ispl12"r"(iri,rii1,iir,iri1,t4(im(x),re(y),im(z)),t4(im(x),im(y),re(z))))):is"r"(pl"r"(iir,pl"r"(rii,iri)),pl"r"(iir1,pl"r"(rii1,iri1)))
-t8:=tris(real,pl"r"(pl"r"(rir,irr),rri),pl"r"(pl"r"(rri,rir),irr),pl"r"(pl"r"(rir1,irr1),rri1),t5(rir,irr,rri),ispl12"r"(pl"r"(rri,rir),pl"r"(rir1,irr1),irr,rri1,ispl12"r"(rri,rir1,rir,irr1,t4(re(x),re(y),im(z)),t4(re(x),im(y),re(z))),t4(im(x),re(y),re(z)))):is"r"(pl"r"(pl"r"(rir,irr),rri),pl"r"(pl"r"(rir1,irr1),rri1))
-t9:=ismn12"r"(rrr,rrr1,pl"r"(iir,pl"r"(rii,iri)),pl"r"(iir1,pl"r"(rii1,iri1)),t4(re(x),re(y),re(z)),t7):is"r"(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))))
-t10:=ismn12"r"(pl"r"(pl"r"(rir,irr),rri),pl"r"(pl"r"(rir1,irr1),rri1),iii,iii1,t8,t4(im(x),im(y),im(z))):is"r"(mn"r"(pl"r"(pl"r"(rir,irr),rri),iii),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1))
-t11:=tris(cx,ts(ts(x,y),z),pli(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii)),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)),t3,isrecx12(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1),t9,t10)):is(ts(ts(x,y),z),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)))
-t12:=tris(cx,ts(x,ts(y,z)),ts(ts(y,z),x),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)),comts(x,ts(y,z)),t3(y,z,x)):is(ts(x,ts(y,z)),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)))
-t13:=tris2(cx,ts(ts(x,y),z),ts(x,ts(y,z)),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)),t11,t12):is(ts(ts(x,y),z),ts(x,ts(y,z)))
--3226
-z@satz226:=t13".3226":is(ts(ts(x,y),z),ts(x,ts(y,z)))
-assts1:=satz226:is(ts(ts(x,y),z),ts(x,ts(y,z)))
-assts2:=symis(cx,ts(ts(x,y),z),ts(x,ts(y,z)),assts1):is(ts(x,ts(y,z)),ts(ts(x,y),z))
-+3227
-c@t1:=tr3is(real,pl"r"(pl"r"(a,b),c),pl"r"(a,pl"r"(b,c)),pl"r"(a,pl"r"(c,b)),pl"r"(pl"r"(a,c),b),asspl1"r"(a,b,c),ispl2"r"(pl"r"(b,c),pl"r"(c,b),a,compl"r"(b,c)),asspl2"r"(a,c,b)):is"r"(pl"r"(pl"r"(a,b),c),pl"r"(pl"r"(a,c),b))
-d@t2:=tr3is(real,pl"r"(pl"r"(a,b),pl"r"(c,d)),pl"r"(pl"r"(pl"r"(a,b),c),d),pl"r"(pl"r"(pl"r"(a,c),b),d),pl"r"(pl"r"(a,c),pl"r"(b,d)),asspl2"r"(pl"r"(a,b),c,d),ispl1"r"(pl"r"(pl"r"(a,b),c),pl"r"(pl"r"(a,c),b),d,t1),asspl1"r"(pl"r"(a,c),b,d)):is"r"(pl"r"(pl"r"(a,b),pl"r"(c,d)),pl"r"(pl"r"(a,c),pl"r"(b,d)))
-t3:=tris(real,mn"r"(pl"r"(a,b),pl"r"(c,d)),pl"r"(pl"r"(a,b),pl"r"(m0"r"(c),m0"r"(d))),pl"r"(mn"r"(a,c),mn"r"(b,d)),ispl2"r"(m0"r"(pl"r"(c,d)),pl"r"(m0"r"(c),m0"r"(d)),pl"r"(a,b),satz180(c,d)),t2(a,b,m0"r"(c),m0"r"(d))):is"r"(mn"r"(pl"r"(a,b),pl"r"(c,d)),pl"r"(mn"r"(a,c),mn"r"(b,d)))
-z@t4:=tris(real,mn"r"(ts"r"(re(x),pl"r"(re(y),re(z))),ts"r"(im(x),pl"r"(im(y),im(z)))),mn"r"(pl"r"(ts"r"(re(x),re(y)),ts"r"(re(x),re(z))),pl"r"(ts"r"(im(x),im(y)),ts"r"(im(x),im(z)))),pl"r"(rets(x,y),rets(x,z)),ismn12"r"(ts"r"(re(x),pl"r"(re(y),re(z))),pl"r"(ts"r"(re(x),re(y)),ts"r"(re(x),re(z))),ts"r"(im(x),pl"r"(im(y),im(z))),pl"r"(ts"r"(im(x),im(y)),ts"r"(im(x),im(z))),disttp2(re(x),re(y),re(z)),disttp2(im(x),im(y),im(z))),t3(ts"r"(re(x),re(y)),ts"r"(re(x),re(z)),ts"r"(im(x),im(y)),ts"r"(im(x),im(z)))):is"r"(mn"r"(ts"r"(re(x),pl"r"(re(y),re(z))),ts"r"(im(x),pl"r"(im(y),im(z)))),pl"r"(rets(x,y),rets(x,z)))
-t5:=tris(real,pl"r"(ts"r"(re(x),pl"r"(im(y),im(z))),ts"r"(im(x),pl"r"(re(y),re(z)))),pl"r"(pl"r"(ts"r"(re(x),im(y)),ts"r"(re(x),im(z))),pl"r"(ts"r"(im(x),re(y)),ts"r"(im(x),re(z)))),pl"r"(imts(x,y),imts(x,z)),ispl12"r"(ts"r"(re(x),pl"r"(im(y),im(z))),pl"r"(ts"r"(re(x),im(y)),ts"r"(re(x),im(z))),ts"r"(im(x),pl"r"(re(y),re(z))),pl"r"(ts"r"(im(x),re(y)),ts"r"(im(x),re(z))),disttp2(re(x),im(y),im(z)),disttp2(im(x),re(y),re(z))),t2(ts"r"(re(x),im(y)),ts"r"(re(x),im(z)),ts"r"(im(x),re(y)),ts"r"(im(x),re(z)))):is"r"(pl"r"(ts"r"(re(x),pl"r"(im(y),im(z))),ts"r"(im(x),pl"r"(re(y),re(z)))),pl"r"(imts(x,y),imts(x,z)))
-t6:=tr3is(cx,ts(x,pl(y,z)),pli(mn"r"(ts"r"(re(x),pl"r"(re(y),re(z))),ts"r"(im(x),pl"r"(im(y),im(z)))),pl"r"(ts"r"(re(x),pl"r"(im(y),im(z))),ts"r"(im(x),pl"r"(re(y),re(z))))),pli(pl"r"(rets(x,y),rets(x,z)),pl"r"(imts(x,y),imts(x,z))),pl(ts(x,y),ts(x,z)),tsis2a(x,pl"r"(re(y),re(z)),pl"r"(im(y),im(z))),isrecx12(mn"r"(ts"r"(re(x),pl"r"(re(y),re(z))),ts"r"(im(x),pl"r"(im(y),im(z)))),pl"r"(rets(x,y),rets(x,z)),pl"r"(ts"r"(re(x),pl"r"(im(y),im(z))),ts"r"(im(x),pl"r"(re(y),re(z)))),pl"r"(imts(x,y),imts(x,z)),t4,t5),plis12b(rets(x,y),imts(x,y),rets(x,z),imts(x,z))):is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
--3227
-satz227:=t6".3227":is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
-disttp1:=tr3is(cx,ts(pl(x,y),z),ts(z,pl(x,y)),pl(ts(z,x),ts(z,y)),pl(ts(x,z),ts(y,z)),comts(pl(x,y),z),satz227(z,x,y),ispl12(ts(z,x),ts(x,z),ts(z,y),ts(y,z),comts(z,x),comts(z,y))):is(ts(pl(x,y),z),pl(ts(x,z),ts(y,z)))
-disttp2:=satz227:is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
-distpt1:=symis(cx,ts(pl(x,y),z),pl(ts(x,z),ts(y,z)),disttp1):is(pl(ts(x,z),ts(y,z)),ts(pl(x,y),z))
-distpt2:=symis(cx,ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)),disttp2):is(pl(ts(x,y),ts(x,z)),ts(x,pl(y,z)))
-satz228:=tr4is(cx,ts(x,mn(y,z)),ts(x,pl(y,m0(z))),pl(ts(x,y),ts(x,m0(z))),pl(ts(x,y),m0(ts(x,z))),mn(ts(x,y),ts(x,z)),ists2(mn(y,z),pl(y,m0(z)),x,satz218(y,z)),disttp2(x,y,m0(z)),ispl2(ts(x,m0(z)),m0(ts(x,z)),ts(x,y),satz224b(x,z)),satz218a(ts(x,y),ts(x,z))):is(ts(x,mn(y,z)),mn(ts(x,y),ts(x,z)))
-disttm1:=tr3is(cx,ts(mn(x,y),z),ts(z,mn(x,y)),mn(ts(z,x),ts(z,y)),mn(ts(x,z),ts(y,z)),comts(mn(x,y),z),satz228(z,x,y),ismn12(ts(z,x),ts(x,z),ts(z,y),ts(y,z),comts(z,x),comts(z,y))):is(ts(mn(x,y),z),mn(ts(x,z),ts(y,z)))
-disttm2:=satz228:is(ts(x,mn(y,z)),mn(ts(x,y),ts(x,z)))
-distmt1:=symis(cx,ts(mn(x,y),z),mn(ts(x,z),ts(y,z)),disttm1):is(mn(ts(x,z),ts(y,z)),ts(mn(x,y),z))
-distmt2:=symis(cx,ts(x,mn(y,z)),mn(ts(x,y),ts(x,z)),disttm2):is(mn(ts(x,y),ts(x,z)),ts(x,mn(y,z)))
-y@[n:nis(y,0c)][u1:complex][u2:complex][i:is(ts(y,u1),x)][j:is(ts(y,u2),x)]
-+3229
-t1:=tris2(cx,ts(y,u1),ts(y,u2),x,i,j):is(ts(y,u1),ts(y,u2))
-t2:=tris(cx,ts(y,mn(u1,u2)),mn(ts(y,u1),ts(y,u2)),0c,disttm2(y,u1,u2),satz213b(ts(y,u1),ts(y,u2),t1)):is(ts(y,mn(u1,u2)),0c)
-t3:=ore2(is(y,0c),is(mn(u1,u2),0c),satz221c(y,mn(u1,u2),t2),n):is(mn(u1,u2),0c)
--3229
-satz229b:=satz213a(u1,u2,t3".3229"):is(u1,u2)
-+*3229
-n@t4:=pnot0(mod2(y),lemma4(y,n)):nis"r"(mod2(y),0)
-u:=ts(pli(ov(re(y),mod2(y),t4),m0"r"(ov(im(y),mod2(y),t4))),x):complex
-[v:real]
-dd:=ov(v,mod2(y),t4):real
-n@t5:=tr3is(real,m0"r"(ts"r"(im(y),m0"r"(dd(im(y))))),m0"r"(m0"r"(ts"r"(im(y),dd(im(y))))),ts"r"(im(y),dd(im(y))),dd(ts"r"(im(y),im(y))),ism0"r"(ts"r"(im(y),m0"r"(dd(im(y)))),m0"r"(ts"r"(im(y),dd(im(y)))),satz197b(im(y),dd(im(y)))),satz177(ts"r"(im(y),dd(im(y)))),lemma6(im(y),im(y),mod2(y),t4)):is"r"(m0"r"(ts"r"(im(y),m0"r"(dd(im(y))))),dd(ts"r"(im(y),im(y))))
-t6:=tr3is(real,mn"r"(ts"r"(re(y),dd(re(y))),ts"r"(im(y),m0"r"(dd(im(y))))),pl"r"(dd(ts"r"(re(y),re(y))),dd(ts"r"(im(y),im(y)))),dd(mod2(y)),1rl,ispl12"r"(ts"r"(re(y),dd(re(y))),dd(ts"r"(re(y),re(y))),m0"r"(ts"r"(im(y),m0"r"(dd(im(y))))),dd(ts"r"(im(y),im(y))),lemma6(re(y),re(y),mod2(y),t4),t5),lemma7(ts"r"(re(y),re(y)),ts"r"(im(y),im(y)),mod2(y),t4),lemma8(mod2(y),t4)):is"r"(mn"r"(ts"r"(re(y),dd(re(y))),ts"r"(im(y),m0"r"(dd(im(y))))),1rl)
-t7:=tris(real,ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(m0"r"(re(y)),dd(im(y))),dd(ts"r"(m0"r"(re(y)),im(y))),satz197d(re(y),dd(im(y))),lemma6(m0"r"(re(y)),im(y),mod2(y),t4)):is"r"(ts"r"(re(y),m0"r"(dd(im(y)))),dd(ts"r"(m0"r"(re(y)),im(y))))
-t8:=tris(real,pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),pl"r"(dd(ts"r"(m0"r"(re(y)),im(y))),dd(ts"r"(im(y),re(y)))),dd(pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y)))),ispl12"r"(ts"r"(re(y),m0"r"(dd(im(y)))),dd(ts"r"(m0"r"(re(y)),im(y))),ts"r"(im(y),dd(re(y))),dd(ts"r"(im(y),re(y))),t7,lemma6(im(y),re(y),mod2(y),t4)),lemma7(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y)),mod2(y),t4)):is"r"(pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),dd(pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y)))))
-t9:=tr3is(real,pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y))),pl"r"(m0"r"(ts"r"(re(y),im(y))),ts"r"(im(y),re(y))),mn"r"(ts"r"(im(y),re(y)),ts"r"(re(y),im(y))),0,ispl1"r"(ts"r"(m0"r"(re(y)),im(y)),m0"r"(ts"r"(re(y),im(y))),ts"r"(im(y),re(y)),satz197a(re(y),im(y))),compl"r"(m0"r"(ts"r"(re(y),im(y))),ts"r"(im(y),re(y))),satz182e(ts"r"(im(y),re(y)),ts"r"(re(y),im(y)),comts"r"(im(y),re(y)))):is"r"(pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y))),0)
-t10:=tr3is(real,pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),dd(pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y)))),dd(0),0,t8,isf(real,real,[t:real]dd(t),pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y))),0,t9),lemma9(mod2(y),t4)):is"r"(pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),0)
-t11:=tris(cx,ts(y,pli(dd(re(y)),m0"r"(dd(im(y))))),pli(mn"r"(ts"r"(re(y),dd(re(y))),ts"r"(im(y),m0"r"(dd(im(y))))),pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y))))),1c,tsis2a(y,dd(re(y)),m0"r"(dd(im(y)))),isrecx12(mn"r"(ts"r"(re(y),dd(re(y))),ts"r"(im(y),m0"r"(dd(im(y))))),1rl,pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),0,t6,t10)):is(ts(y,pli(dd(re(y)),m0"r"(dd(im(y))))),1c)
-t12:=tr3is(cx,ts(y,u),ts(ts(y,pli(dd(re(y)),m0"r"(dd(im(y))))),x),ts(1c,x),x,assts2(y,pli(dd(re(y)),m0"r"(dd(im(y)))),x),ists1(ts(y,pli(dd(re(y)),m0"r"(dd(im(y))))),1c,x,t11),satz222b(x)):is(ts(y,u),x)
--3229
-n@satz229a:=somei(cx,[t:cx]is(ts(y,t),x),u".3229",t12".3229"):some([t:cx]is(ts(y,t),x))
-satz229:=onei(cx,[t:cx]is(ts(y,t),x),[t:cx][u:cx][v:is(ts(y,t),x)][w:is(ts(y,u),x)]satz229b(t,u,v,w),satz229a):one([t:cx]is(ts(y,t),x))
-ov:=ind(cx,[t:cx]is(ts(y,t),x),satz229):complex
-satz229c:=oneax(cx,[t:cx]is(ts(y,t),x),satz229):is(ts(y,ov(x,y,n)),x)
-satz229d:=symis(cx,ts(y,ov(x,y,n)),x,satz229c):is(x,ts(y,ov(x,y,n)))
-satz229e:=tris(cx,ts(ov(x,y,n),y),ts(y,ov(x,y,n)),x,comts(ov(x,y,n),y),satz229c):is(ts(ov(x,y,n),y),x)
-satz229f:=symis(cx,ts(ov(x,y,n),y),x,satz229e):is(x,ts(ov(x,y,n),y))
-y@[u:complex][n:nis(y,0c)][i:is(ts(y,u),x)]
-satz229g:=satz229b(n,u,ov(x,y,n),i,satz229c(n)):is(u,ov(x,y,n))
-satz229h:=symis(cx,u,ov(x,y,n),satz229g):is(ov(x,y,n),u)
-n@[i:is(ts(u,y),x)]
-satz229j:=satz229g(tris(cx,ts(y,u),ts(u,y),x,comts(y,u),i)):is(u,ov(x,y,n))
-satz229k:=symis(cx,u,ov(x,y,n),satz229j):is(ov(x,y,n),u)
-z@[i:is(x,y)][n:nis(z,0c)]
-isov1:=isf(cx,cx,[t:cx]ov(t,z,n),x,y,i):is(ov(x,z,n),ov(y,z,n))
-i@[n:nis(x,0c)][o:nis(y,0c)]
-isov2:=satz229h(z,x,ov(z,y,o),n,tris(cx,ts(x,ov(z,y,o)),ts(y,ov(z,y,o)),z,ists1(x,y,ov(z,y,o),i),satz229c(z,y,o))):is(ov(z,x,n),ov(z,y,o))
-z@[u:complex][i:is(x,y)][j:is(z,u)][n:nis(z,0c)][o:nis(u,0c)]
-isov12:=tris(cx,ov(x,z,n),ov(y,z,n),ov(y,u,o),isov1(x,y,z,i,n),isov2(z,u,y,j,n,o)):is(ov(x,z,n),ov(y,u,o))
-y@satz230:=tris(cx,pl(mn(x,y),y),pl(y,mn(x,y)),x,compl(mn(x,y),y),satz212h(x,y)):is(pl(mn(x,y),y),x)
-satz231:=satz212e(pl(x,y),y,x,compl(y,x)):is(mn(pl(x,y),y),x)
-satz232:=satz212e(x,mn(x,y),y,satz230):is(mn(x,mn(x,y)),y)
-+4233
-z@t1:=tr3is(cx,pl(pl(y,z),mn(mn(x,y),z)),pl(mn(mn(x,y),z),pl(y,z)),pl(mn(mn(x,y),z),pl(z,y)),pl(pl(mn(mn(x,y),z),z),y),compl(pl(y,z),mn(mn(x,y),z)),ispl2(pl(y,z),pl(z,y),mn(mn(x,y),z),compl(y,z)),asspl2(mn(mn(x,y),z),z,y)):is(pl(pl(y,z),mn(mn(x,y),z)),pl(pl(mn(mn(x,y),z),z),y))
-t2:=tr3is(cx,pl(pl(y,z),mn(mn(x,y),z)),pl(pl(mn(mn(x,y),z),z),y),pl(mn(x,y),y),x,t1,ispl1(pl(mn(mn(x,y),z),z),mn(x,y),y,satz230(mn(x,y),z)),satz230(x,y)):is(pl(pl(y,z),mn(mn(x,y),z)),x)
--4233
-z@satz233:=satz212d(x,pl(y,z),mn(mn(x,y),z),t2".4233"):is(mn(mn(x,y),z),mn(x,pl(y,z)))
-satz234:=satz212g(pl(x,y),z,pl(x,mn(y,z)),tris(cx,pl(pl(x,mn(y,z)),z),pl(x,pl(mn(y,z),z)),pl(x,y),asspl1(x,mn(y,z),z),ispl2(pl(mn(y,z),z),y,x,satz230(y,z)))):is(mn(pl(x,y),z),pl(x,mn(y,z)))
-satz234a:=symis(cx,mn(pl(x,y),z),pl(x,mn(y,z)),satz234):is(pl(x,mn(y,z)),mn(pl(x,y),z))
-satz234b:=tr3is(cx,mn(pl(x,y),z),mn(pl(y,x),z),pl(y,mn(x,z)),pl(mn(x,z),y),ismn1(pl(x,y),pl(y,x),z,compl(x,y)),satz234(y,x,z),compl(y,mn(x,z))):is(mn(pl(x,y),z),pl(mn(x,z),y))
-satz234c:=symis(cx,mn(pl(x,y),z),pl(mn(x,z),y),satz234b):is(pl(mn(x,z),y),mn(pl(x,y),z))
-satz235:=satz212f(x,mn(y,z),pl(mn(x,y),z),tr3is(cx,pl(pl(mn(x,y),z),mn(y,z)),pl(mn(x,y),pl(z,mn(y,z))),pl(mn(x,y),y),x,asspl1(mn(x,y),z,mn(y,z)),ispl2(pl(z,mn(y,z)),y,mn(x,y),satz212h(y,z)),satz230(x,y))):is(pl(mn(x,y),z),mn(x,mn(y,z)))
-satz235a:=symis(cx,pl(mn(x,y),z),mn(x,mn(y,z)),satz235):is(mn(x,mn(y,z)),pl(mn(x,y),z))
-satz235b:=tris(cx,mn(x,mn(y,z)),pl(mn(x,y),z),mn(pl(x,z),y),satz235a,satz234c(x,z,y)):is(mn(x,mn(y,z)),mn(pl(x,z),y))
-satz235c:=tris(cx,mn(x,mn(y,z)),mn(pl(x,z),y),mn(pl(z,x),y),satz235b,ismn1(pl(x,z),pl(z,x),y,compl(x,z))):is(mn(x,mn(y,z)),mn(pl(z,x),y))
-satz236:=satz212g(pl(x,z),pl(y,z),mn(x,y),tris(cx,pl(mn(x,y),pl(y,z)),pl(pl(mn(x,y),y),z),pl(x,z),asspl2(mn(x,y),y,z),ispl1(pl(mn(x,y),y),x,z,satz230(x,y)))):is(mn(pl(x,z),pl(y,z)),mn(x,y))
-satz236a:=tris(cx,mn(pl(z,x),pl(z,y)),mn(pl(x,z),pl(y,z)),mn(x,y),ismn12(pl(z,x),pl(x,z),pl(z,y),pl(y,z),compl(z,x),compl(z,y)),satz236):is(mn(pl(z,x),pl(z,y)),mn(x,y))
-[u:complex]
-+4237
-t1:=tr3is(cx,pl(mn(z,u),pl(u,y)),pl(pl(mn(z,u),u),y),pl(z,y),pl(y,z),asspl2(mn(z,u),u,y),ispl1(pl(mn(z,u),u),z,y,satz230(z,u)),compl(z,y)):is(pl(mn(z,u),pl(u,y)),pl(y,z))
-t2:=tr3is(cx,pl(pl(mn(x,y),mn(z,u)),pl(y,u)),pl(pl(mn(x,y),mn(z,u)),pl(u,y)),pl(mn(x,y),pl(mn(z,u),pl(u,y))),pl(mn(x,y),pl(y,z)),ispl2(pl(y,u),pl(u,y),pl(mn(x,y),mn(z,u)),compl(y,u)),asspl1(mn(x,y),mn(z,u),pl(u,y)),ispl2(pl(mn(z,u),pl(u,y)),pl(y,z),mn(x,y),t1)):is(pl(pl(mn(x,y),mn(z,u)),pl(y,u)),pl(mn(x,y),pl(y,z)))
-t3:=tr3is(cx,pl(pl(mn(x,y),mn(z,u)),pl(y,u)),pl(mn(x,y),pl(y,z)),pl(pl(mn(x,y),y),z),pl(x,z),t2,asspl2(mn(x,y),y,z),ispl1(pl(mn(x,y),y),x,z,satz230(x,y))):is(pl(pl(mn(x,y),mn(z,u)),pl(y,u)),pl(x,z))
--4237
-satz237:=satz212f(pl(x,z),pl(y,u),pl(mn(x,y),mn(z,u)),t3".4237"):is(pl(mn(x,y),mn(z,u)),mn(pl(x,z),pl(y,u)))
-+4238
-t1:=tris(cx,pl(pl(x,u),z),pl(x,pl(u,z)),pl(x,pl(z,u)),asspl1(x,u,z),ispl2(pl(u,z),pl(z,u),x,compl(u,z))):is(pl(pl(x,u),z),pl(x,pl(z,u)))
-t2:=tr3is(cx,pl(mn(pl(x,u),pl(y,z)),mn(z,u)),mn(pl(pl(x,u),z),pl(pl(y,z),u)),mn(pl(x,pl(z,u)),pl(y,pl(z,u))),mn(x,y),satz237(pl(x,u),pl(y,z),z,u),ismn12(pl(pl(x,u),z),pl(x,pl(z,u)),pl(pl(y,z),u),pl(y,pl(z,u)),t1,asspl1(y,z,u)),satz236(x,y,pl(z,u))):is(pl(mn(pl(x,u),pl(y,z)),mn(z,u)),mn(x,y))
--4238
-satz238:=satz212g(mn(x,y),mn(z,u),mn(pl(x,u),pl(y,z)),t2".4238"):is(mn(mn(x,y),mn(z,u)),mn(pl(x,u),pl(y,z)))
-[i:is(mn(x,y),mn(z,u))]
-+4239
-t1:=tris1(cx,mn(pl(x,u),pl(y,z)),0c,mn(mn(x,y),mn(z,u)),satz238,satz213b(mn(x,y),mn(z,u),i)):is(mn(pl(x,u),pl(y,z)),0c)
--4239
-satz239a:=satz213a(pl(x,u),pl(y,z),t1".4239"):is(pl(x,u),pl(y,z))
-u@[i:is(pl(x,u),pl(y,z))]
-+*4239
-i@t2:=tris(cx,mn(mn(x,y),mn(z,u)),mn(pl(x,u),pl(y,z)),0c,satz238,satz213b(pl(x,u),pl(y,z),i)):is(mn(mn(x,y),mn(z,u)),0c)
--4239
-i@satz239b:=satz213a(mn(x,y),mn(z,u),t2".4239"):is(mn(x,y),mn(z,u))
-y@[n:nis(y,0c)]
-satz240:=tris(cx,ts(ov(x,y,n),y),ts(y,ov(x,y,n)),x,comts(ov(x,y,n),y),satz229c(x,y,n)):is(ts(ov(x,y,n),y),x)
-satz241:=satz229h(ts(x,y),y,x,n,comts(y,x)):is(ov(ts(x,y),y,n),x)
-y@[n:nis(x,0c)][o:nis(y,0c)]
-lemma6:=th3"l.imp"(is(ov(x,y,o),0c),is(x,0c),n,[t:is(ov(x,y,o),0c)]tris1(cx,x,0c,ts(y,ov(x,y,o)),satz229c(x,y,o),satz221b(y,ov(x,y,o),t))):nis(ov(x,y,o),0c)
-satz242:=satz229h(x,ov(x,y,o),y,lemma6,satz240(o)):is(ov(x,ov(x,y,o),lemma6),y)
-z@[n:nis(y,0c)][o:nis(z,0c)]
-+5243
-t1:=tr3is(cx,ts(ts(y,z),ov(ov(x,y,n),z,o)),ts(ov(ov(x,y,n),z,o),ts(y,z)),ts(ov(ov(x,y,n),z,o),ts(z,y)),ts(ts(ov(ov(x,y,n),z,o),z),y),comts(ts(y,z),ov(ov(x,y,n),z,o)),ists2(ts(y,z),ts(z,y),ov(ov(x,y,n),z,o),comts(y,z)),assts2(ov(ov(x,y,n),z,o),z,y)):is(ts(ts(y,z),ov(ov(x,y,n),z,o)),ts(ts(ov(ov(x,y,n),z,o),z),y))
-t2:=tr3is(cx,ts(ts(y,z),ov(ov(x,y,n),z,o)),ts(ts(ov(ov(x,y,n),z,o),z),y),ts(ov(x,y,n),y),x,t1,ists1(ts(ov(ov(x,y,n),z,o),z),ov(x,y,n),y,satz240(ov(x,y,n),z,o)),satz240(x,y,n)):is(ts(ts(y,z),ov(ov(x,y,n),z,o)),x)
--5243
-satz243:=satz229g(x,ts(y,z),ov(ov(x,y,n),z,o),satz221d(y,z,n,o),t2".5243"):is(ov(ov(x,y,n),z,o),ov(x,ts(y,z),satz221d(y,z,n,o)))
-z@[n:nis(z,0c)]
-satz244:=satz229k(ts(x,y),z,ts(x,ov(y,z,n)),n,tris(cx,ts(ts(x,ov(y,z,n)),z),ts(x,ts(ov(y,z,n),z)),ts(x,y),assts1(x,ov(y,z,n),z),ists2(ts(ov(y,z,n),z),y,x,satz240(y,z,n)))):is(ov(ts(x,y),z,n),ts(x,ov(y,z,n)))
-satz244a:=symis(cx,ov(ts(x,y),z,n),ts(x,ov(y,z,n)),satz244):is(ts(x,ov(y,z,n)),ov(ts(x,y),z,n))
-satz244b:=tr3is(cx,ov(ts(x,y),z,n),ov(ts(y,x),z,n),ts(y,ov(x,z,n)),ts(ov(x,z,n),y),isov1(ts(x,y),ts(y,x),z,comts(x,y),n),satz244(y,x,z,n),comts(y,ov(x,z,n))):is(ov(ts(x,y),z,n),ts(ov(x,z,n),y))
-satz244c:=symis(cx,ov(ts(x,y),z,n),ts(ov(x,z,n),y),satz244b):is(ts(ov(x,z,n),y),ov(ts(x,y),z,n))
-z@[n:nis(y,0c)][o:nis(z,0c)]
-satz245:=satz229j(x,ov(y,z,o),ts(ov(x,y,n),z),lemma6(y,z,n,o),tr3is(cx,ts(ts(ov(x,y,n),z),ov(y,z,o)),ts(ov(x,y,n),ts(z,ov(y,z,o))),ts(ov(x,y,n),y),x,assts1(ov(x,y,n),z,ov(y,z,o)),ists2(ts(z,ov(y,z,o)),y,ov(x,y,n),satz229c(y,z,o)),satz240(x,y,n))):is(ts(ov(x,y,n),z),ov(x,ov(y,z,o),lemma6(y,z,n,o)))
-satz245a:=symis(cx,ts(ov(x,y,n),z),ov(x,ov(y,z,o),lemma6(y,z,n,o)),satz245):is(ov(x,ov(y,z,o),lemma6(y,z,n,o)),ts(ov(x,y,n),z))
-satz245b:=tris(cx,ov(x,ov(y,z,o),lemma6(y,z,n,o)),ts(ov(x,y,n),z),ov(ts(x,z),y,n),satz245a,satz244c(x,z,y,n)):is(ov(x,ov(y,z,o),lemma6(y,z,n,o)),ov(ts(x,z),y,n))
-satz245c:=tris(cx,ov(x,ov(y,z,o),lemma6(y,z,n,o)),ov(ts(x,z),y,n),ov(ts(z,x),y,n),satz245b,isov1(ts(x,z),ts(z,x),y,comts(x,z),n)):is(ov(x,ov(y,z,o),lemma6(y,z,n,o)),ov(ts(z,x),y,n))
-satz246:=satz229k(ts(x,z),ts(y,z),ov(x,y,n),satz221d(y,z,n,o),tris(cx,ts(ov(x,y,n),ts(y,z)),ts(ts(ov(x,y,n),y),z),ts(x,z),assts2(ov(x,y,n),y,z),ists1(ts(ov(x,y,n),y),x,z,satz240(x,y,n)))):is(ov(ts(x,z),ts(y,z),satz221d(y,z,n,o)),ov(x,y,n))
-satz246a:=tris(cx,ov(ts(z,x),ts(z,y),satz221d(z,y,o,n)),ov(ts(x,z),ts(y,z),satz221d(y,z,n,o)),ov(x,y,n),isov12(ts(z,x),ts(x,z),ts(z,y),ts(y,z),comts(z,x),comts(z,y),satz221d(z,y,o,n),satz221d(y,z,n,o)),satz246):is(ov(ts(z,x),ts(z,y),satz221d(z,y,o,n)),ov(x,y,n))
-z@[u:complex][n:nis(y,0c)][o:nis(u,0c)]
-+5247
-t1:=tr3is(cx,ts(ov(z,u,o),ts(u,y)),ts(ts(ov(z,u,o),u),y),ts(z,y),ts(y,z),assts2(ov(z,u,o),u,y),ists1(ts(ov(z,u,o),u),z,y,satz240(z,u,o)),comts(z,y)):is(ts(ov(z,u,o),ts(u,y)),ts(y,z))
-t2:=tr3is(cx,ts(ts(ov(x,y,n),ov(z,u,o)),ts(y,u)),ts(ts(ov(x,y,n),ov(z,u,o)),ts(u,y)),ts(ov(x,y,n),ts(ov(z,u,o),ts(u,y))),ts(ov(x,y,n),ts(y,z)),ists2(ts(y,u),ts(u,y),ts(ov(x,y,n),ov(z,u,o)),comts(y,u)),assts1(ov(x,y,n),ov(z,u,o),ts(u,y)),ists2(ts(ov(z,u,o),ts(u,y)),ts(y,z),ov(x,y,n),t1)):is(ts(ts(ov(x,y,n),ov(z,u,o)),ts(y,u)),ts(ov(x,y,n),ts(y,z)))
-t3:=tr3is(cx,ts(ts(ov(x,y,n),ov(z,u,o)),ts(y,u)),ts(ov(x,y,n),ts(y,z)),ts(ts(ov(x,y,n),y),z),ts(x,z),t2,assts2(ov(x,y,n),y,z),ists1(ts(ov(x,y,n),y),x,z,satz240(x,y,n))):is(ts(ts(ov(x,y,n),ov(z,u,o)),ts(y,u)),ts(x,z))
--5247
-satz247:=satz229j(ts(x,z),ts(y,u),ts(ov(x,y,n),ov(z,u,o)),satz221d(y,u,n,o),t3".5247"):is(ts(ov(x,y,n),ov(z,u,o)),ov(ts(x,z),ts(y,u),satz221d(y,u,n,o)))
-u@[n:nis(y,0c)][o:nis(z,0c)][p:nis(u,0c)]
-+5248
-t1:=tris(cx,ts(ts(x,u),z),ts(x,ts(u,z)),ts(x,ts(z,u)),assts1(x,u,z),ists2(ts(u,z),ts(z,u),x,comts(u,z))):is(ts(ts(x,u),z),ts(x,ts(z,u)))
-t2:=tr3is(cx,ts(ov(ts(x,u),ts(y,z),satz221d(y,z,n,o)),ov(z,u,p)),ov(ts(ts(x,u),z),ts(ts(y,z),u),satz221d(ts(y,z),u,satz221d(y,z,n,o),p)),ov(ts(x,ts(z,u)),ts(y,ts(z,u)),satz221d(y,ts(z,u),n,satz221d(z,u,o,p))),ov(x,y,n),satz247(ts(x,u),ts(y,z),z,u,satz221d(y,z,n,o),p),isov12(ts(ts(x,u),z),ts(x,ts(z,u)),ts(ts(y,z),u),ts(y,ts(z,u)),t1,assts1(y,z,u),satz221d(ts(y,z),u,satz221d(y,z,n,o),p),satz221d(y,ts(z,u),n,satz221d(z,u,o,p))),satz246(x,y,ts(z,u),n,satz221d(z,u,o,p))):is(ts(ov(ts(x,u),ts(y,z),satz221d(y,z,n,o)),ov(z,u,p)),ov(x,y,n))
--5248
-satz248:=satz229k(ov(x,y,n),ov(z,u,p),ov(ts(x,u),ts(y,z),satz221d(y,z,n,o)),lemma6(z,u,o,p),t2".5248"):is(ov(ov(x,y,n),ov(z,u,p),lemma6(z,u,o,p)),ov(ts(x,u),ts(y,z),satz221d(y,z,n,o)))
-x@[n:nis(x,0c)]
-satz249:=satz229h(0c,x,0c,n,satz221b(x,0c,refis(cx,0c))):is(ov(0c,x,n),0c)
-satz250:=satz229h(x,x,1c,n,satz222(x)):is(ov(x,x,n),1c)
-y@[n:nis(y,0c)][i:is(x,y)]
-satz251a:=tris(cx,ov(x,y,n),ov(x,x,th2"e.notis"(cx,y,0c,x,n,i)),1c,isov2(y,x,x,symis(cx,x,y,i),n,th2"e.notis"(cx,y,0c,x,n,i)),satz250(x,th2"e.notis"(cx,y,0c,x,n,i))):is(ov(x,y,n),1c)
-n@[i:is(ov(x,y,n),1c)]
-satz251b:=tr3is(cx,x,ts(y,ov(x,y,n)),ts(y,1c),y,satz229d(x,y,n),ists2(ov(x,y,n),1c,y,i),satz222(y)):is(x,y)
-u@[n:nis(y,0c)][o:nis(u,0c)][i:is(ov(x,y,n),ov(z,u,o))]
-+5252
-[j:is(z,0c)]
-t1:=tr3is(cx,ov(x,y,n),ov(z,u,o),ov(0c,u,o),0c,i,isov1(z,0c,u,j,o),satz249(u,o)):is(ov(x,y,n),0c)
-t2:=tris(cx,x,ts(y,ov(x,y,n)),0c,satz229d(x,y,n),satz221b(y,ov(x,y,n),t1)):is(x,0c)
-t3:=tris2(cx,ts(x,u),ts(y,z),0c,satz221a(x,u,t2),satz221b(y,z,j)):is(ts(x,u),ts(y,z))
-i@[p:nis(z,0c)]
-t4:=tris1(cx,ov(ts(x,u),ts(y,z),satz221d(y,z,n,p)),1c,ov(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o)),satz248(x,y,z,u,n,p,o),satz251a(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o),i)):is(ov(ts(x,u),ts(y,z),satz221d(y,z,n,p)),1c)
-t5:=satz251b(ts(x,u),ts(y,z),satz221d(y,z,n,p),t4):is(ts(x,u),ts(y,z))
--5252
-satz252a:=th1"l.imp"(is(z,0c),is(ts(x,u),ts(y,z)),[t:is(z,0c)]t3".5252"(t),[t:nis(z,0c)]t5".5252"(t)):is(ts(x,u),ts(y,z))
-o@[i:is(ts(x,u),ts(y,z))]
-+*5252
-i@[j:is(z,0c)]
-t6:=tris(cx,ts(x,u),ts(y,z),0c,i,satz221b(y,z,j)):is(ts(x,u),0c)
-t7:=ore1(is(x,0c),is(u,0c),satz221c(x,u,t6),o):is(x,0c)
-t8:=tris2(cx,ov(x,y,n),ov(z,u,o),0c,tris(cx,ov(x,y,n),ov(0c,y,n),0c,isov1(x,0c,y,t7,n),satz249(y,n)),tris(cx,ov(z,u,o),ov(0c,u,o),0c,isov1(z,0c,u,j,o),satz249(u,o))):is(ov(x,y,n),ov(z,u,o))
-i@[p:nis(z,0c)]
-t9:=tris(cx,ov(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o)),ov(ts(x,u),ts(y,z),satz221d(y,z,n,p)),1c,satz248(x,y,z,u,n,p,o),satz251a(ts(x,u),ts(y,z),satz221d(y,z,n,p),i)):is(ov(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o)),1c)
-t10:=satz251b(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o),t9):is(ov(x,y,n),ov(z,u,o))
--5252
-i@satz252b:=th1"l.imp"(is(z,0c),is(ov(x,y,n),ov(z,u,o)),[t:is(z,0c)]t8".5252"(t),[t:nis(z,0c)]t10".5252"(t)):is(ov(x,y,n),ov(z,u,o))
-z@[n:nis(y,0c)]
-satz253:=satz229g(pl(x,z),y,pl(ov(x,y,n),ov(z,y,n)),n,tris(cx,ts(y,pl(ov(x,y,n),ov(z,y,n))),pl(ts(y,ov(x,y,n)),ts(y,ov(z,y,n))),pl(x,z),disttp2(y,ov(x,y,n),ov(z,y,n)),ispl12(ts(y,ov(x,y,n)),x,ts(y,ov(z,y,n)),z,satz229c(x,y,n),satz229c(z,y,n)))):is(pl(ov(x,y,n),ov(z,y,n)),ov(pl(x,z),y,n))
-z@[n:nis(z,0c)]
-distop:=symis(cx,pl(ov(x,z,n),ov(y,z,n)),ov(pl(x,y),z,n),satz253(x,z,y,n)):is(ov(pl(x,y),z,n),pl(ov(x,z,n),ov(y,z,n)))
-distpo:=satz253(x,z,y,n):is(pl(ov(x,z,n),ov(y,z,n)),ov(pl(x,y),z,n))
-u@[n:nis(y,0c)][o:nis(u,0c)]
-satz254:=tris1(cx,pl(ov(x,y,n),ov(z,u,o)),ov(pl(ts(x,u),ts(y,z)),ts(y,u),satz221d(y,u,n,o)),pl(ov(ts(x,u),ts(y,u),satz221d(y,u,n,o)),ov(ts(y,z),ts(y,u),satz221d(y,u,n,o))),ispl12(ov(ts(x,u),ts(y,u),satz221d(y,u,n,o)),ov(x,y,n),ov(ts(y,z),ts(y,u),satz221d(y,u,n,o)),ov(z,u,o),satz246(x,y,u,n,o),satz246a(z,u,y,o,n)),satz253(ts(x,u),ts(y,u),ts(y,z),satz221d(y,u,n,o))):is(pl(ov(x,y,n),ov(z,u,o)),ov(pl(ts(x,u),ts(y,z)),ts(y,u),satz221d(y,u,n,o)))
-z@[n:nis(y,0c)]
-satz255:=satz229g(mn(x,z),y,mn(ov(x,y,n),ov(z,y,n)),n,tris(cx,ts(y,mn(ov(x,y,n),ov(z,y,n))),mn(ts(y,ov(x,y,n)),ts(y,ov(z,y,n))),mn(x,z),disttm2(y,ov(x,y,n),ov(z,y,n)),ismn12(ts(y,ov(x,y,n)),x,ts(y,ov(z,y,n)),z,satz229c(x,y,n),satz229c(z,y,n)))):is(mn(ov(x,y,n),ov(z,y,n)),ov(mn(x,z),y,n))
-z@[n:nis(z,0c)]
-distom:=symis(cx,mn(ov(x,z,n),ov(y,z,n)),ov(mn(x,y),z,n),satz255(x,z,y,n)):is(ov(mn(x,y),z,n),mn(ov(x,z,n),ov(y,z,n)))
-distmo:=satz255(x,z,y,n):is(mn(ov(x,z,n),ov(y,z,n)),ov(mn(x,y),z,n))
-u@[n:nis(y,0c)][o:nis(u,0c)]
-satz256:=tris1(cx,mn(ov(x,y,n),ov(z,u,o)),ov(mn(ts(x,u),ts(y,z)),ts(y,u),satz221d(y,u,n,o)),mn(ov(ts(x,u),ts(y,u),satz221d(y,u,n,o)),ov(ts(y,z),ts(y,u),satz221d(y,u,n,o))),ismn12(ov(ts(x,u),ts(y,u),satz221d(y,u,n,o)),ov(x,y,n),ov(ts(y,z),ts(y,u),satz221d(y,u,n,o)),ov(z,u,o),satz246(x,y,u,n,o),satz246a(z,u,y,o,n)),satz255(ts(x,u),ts(y,u),ts(y,z),satz221d(y,u,n,o))):is(mn(ov(x,y,n),ov(z,u,o)),ov(mn(ts(x,u),ts(y,z)),ts(y,u),satz221d(y,u,n,o)))
-x@conj:=pli(re(x),m0"r"(im(x))):complex
-b@conjisa:=isrecx12(re(pli(a,b)),a,m0"r"(im(pli(a,b))),m0"r"(b),reis(a,b),ism0"r"(im(pli(a,b)),b,imis(a,b))):is(conj(pli(a,b)),pli(a,m0"r"(b)))
-conjisb:=symis(cx,conj(pli(a,b)),pli(a,m0"r"(b)),conjisa):is(pli(a,m0"r"(b)),conj(pli(a,b)))
-y@[i:is(x,y)]
-isconj:=isf(cx,cx,[t:cx]conj(t),x,y,i):is(conj(x),conj(y))
-x@satz257:=tr3is(cx,conj(conj(x)),pli(re(x),m0"r"(m0"r"(im(x)))),pli(re(x),im(x)),x,conjisa(re(x),m0"r"(im(x))),isrecx2(m0"r"(m0"r"(im(x))),im(x),re(x),satz177(im(x))),pliis(x)):is(conj(conj(x)),x)
-[i:is(x,0c)]
-satz258a:=tr3is(cx,conj(x),conj(0c),pli(0,m0"r"(0)),0c,isconj(x,0c,i),conjisa(0,0),isrecx2(m0"r"(0),0,0,satz176b(0,refis(real,0)))):is(conj(x),0c)
-x@[i:is(conj(x),0c)]
-+6258
-t1:=tris(real,re(x),re(conj(x)),0,isre(re(x),m0"r"(im(x))),lemma1(conj(x),i)):is"r"(re(x),0)
-t2:=satz176e(im(x),tris(real,m0"r"(im(x)),im(conj(x)),0,isim(re(x),m0"r"(im(x))),lemma2(conj(x),i))):is"r"(im(x),0)
--6258
-satz258b:=tris(cx,x,pli(re(x),im(x)),0c,ispli(x),isrecx12(re(x),0,im(x),0,t1".6258",t2".6258")):is(x,0c)
-+*6258
-i@anders:=tris1(cx,x,0c,conj(conj(x)),satz257,satz258a(conj(x),i)):is(x,0c)
--6258
-x@[n:nis(x,0c)]
-satz258c:=th3"l.imp"(is(conj(x),0c),is(x,0c),n,[t:is(conj(x),0c)]satz258b(t)):nis(conj(x),0c)
-x@[i:is(conj(x),x)]
-+6259
-t1:=tris(real,m0"r"(im(x)),im(conj(x)),im(x),isim(re(x),m0"r"(im(x))),isceim(conj(x),x,i)):is"r"(m0"r"(im(x)),im(x))
--6259
-satz259a:=lemma10(im(x),symis(real,m0"r"(im(x)),im(x),t1".6259")):is"r"(im(x),0)
-x@[i:is"r"(im(x),0)]
-satz259b:=tris(cx,conj(x),pli(re(x),im(x)),x,isrecx2(m0"r"(im(x)),im(x),re(x),tris2(real,m0"r"(im(x)),im(x),0,satz176b(im(x),i),i)),pliis(x)):is(conj(x),x)
-x@[i:is(x,conj(x))]
-satz269c:=satz259a(x,symis(cx,x,conj(x),i)):is"r"(im(x),0)
-x@[i:is"r"(im(x),0)]
-satz269d:=symis(cx,conj(x),x,satz259b(i)):is(x,conj(x))
-y@satz260:=tr3is(cx,conj(pl(x,y)),pli(pl"r"(re(x),re(y)),m0"r"(pl"r"(im(x),im(y)))),pli(pl"r"(re(x),re(y)),pl"r"(m0"r"(im(x)),m0"r"(im(y)))),pl(conj(x),conj(y)),conjisa(pl"r"(re(x),re(y)),pl"r"(im(x),im(y))),isrecx2(m0"r"(pl"r"(im(x),im(y))),pl"r"(m0"r"(im(x)),m0"r"(im(y))),pl"r"(re(x),re(y)),satz180(im(x),im(y))),plis12b(re(x),m0"r"(im(x)),re(y),m0"r"(im(y)))):is(conj(pl(x,y)),pl(conj(x),conj(y)))
-satz260a:=symis(cx,conj(pl(x,y)),pl(conj(x),conj(y)),satz260):is(pl(conj(x),conj(y)),conj(pl(x,y)))
-+6261
-t1:=tris(real,m0"r"(imts(x,y)),pl"r"(m0"r"(ts"r"(re(x),im(y))),m0"r"(ts"r"(im(x),re(y)))),pl"r"(ts"r"(re(x),m0"r"(im(y))),ts"r"(m0"r"(im(x)),re(y))),satz180(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))),ispl12"r"(m0"r"(ts"r"(re(x),im(y))),ts"r"(re(x),m0"r"(im(y))),m0"r"(ts"r"(im(x),re(y))),ts"r"(m0"r"(im(x)),re(y)),satz197f(re(x),im(y)),satz197e(im(x),re(y)))):is"r"(m0"r"(imts(x,y)),pl"r"(ts"r"(re(x),m0"r"(im(y))),ts"r"(m0"r"(im(x)),re(y))))
--6261
-satz261:=tr3is(cx,conj(ts(x,y)),pli(rets(x,y),m0"r"(imts(x,y))),pli(mn"r"(ts"r"(re(x),re(y)),ts"r"(m0"r"(im(x)),m0"r"(im(y)))),pl"r"(ts"r"(re(x),m0"r"(im(y))),ts"r"(m0"r"(im(x)),re(y)))),ts(conj(x),conj(y)),conjisa(rets(x,y),imts(x,y)),isrecx12(rets(x,y),mn"r"(ts"r"(re(x),re(y)),ts"r"(m0"r"(im(x)),m0"r"(im(y)))),m0"r"(imts(x,y)),pl"r"(ts"r"(re(x),m0"r"(im(y))),ts"r"(m0"r"(im(x)),re(y))),ismn2"r"(ts"r"(im(x),im(y)),ts"r"(m0"r"(im(x)),m0"r"(im(y))),ts"r"(re(x),re(y)),satz198a(im(x),im(y))),t1".6261"),tsis12b(re(x),m0"r"(im(x)),re(y),m0"r"(im(y)))):is(conj(ts(x,y)),ts(conj(x),conj(y)))
-satz261a:=symis(cx,conj(ts(x,y)),ts(conj(x),conj(y)),satz261):is(ts(conj(x),conj(y)),conj(ts(x,y)))
-+6262
-t1:=symis(cx,pl(mn(x,y),y),x,satz230(x,y)):is(x,pl(mn(x,y),y))
-t2:=tris(cx,conj(x),conj(pl(mn(x,y),y)),pl(conj(mn(x,y)),conj(y)),isconj(x,pl(mn(x,y),y),t1),satz260(mn(x,y),y)):is(conj(x),pl(conj(mn(x,y)),conj(y)))
--6262
-satz262:=satz212f(conj(x),conj(y),conj(mn(x,y)),symis(cx,conj(x),pl(conj(mn(x,y)),conj(y)),t2".6262")):is(conj(mn(x,y)),mn(conj(x),conj(y)))
-satz262a:=symis(cx,conj(mn(x,y)),mn(conj(x),conj(y)),satz262):is(mn(conj(x),conj(y)),conj(mn(x,y)))
-[n:nis(y,0c)]
-+6263
-t1:=satz229f(x,y,n):is(x,ts(ov(x,y,n),y))
-t2:=isconj(x,ts(ov(x,y,n),y),t1):is(conj(x),conj(ts(ov(x,y,n),y)))
-t3:=satz261(ov(x,y,n),y):is(conj(ts(ov(x,y,n),y)),ts(conj(ov(x,y,n)),conj(y)))
-t4:=tris(cx,conj(x),conj(ts(ov(x,y,n),y)),ts(conj(ov(x,y,n)),conj(y)),t2,t3):is(conj(x),ts(conj(ov(x,y,n)),conj(y)))
-t5:=satz258c(y,n):nis(conj(y),0c)
--6263
-satz263:=satz229j(conj(x),conj(y),conj(ov(x,y,n)),t5".6263",symis(cx,conj(x),ts(conj(ov(x,y,n)),conj(y)),t4".6263")):is(conj(ov(x,y,n)),ov(conj(x),conj(y),satz258c(y,n)))
-satz263a:=symis(cx,conj(ov(x,y,n)),ov(conj(x),conj(y),satz258c(y,n)),satz263):is(ov(conj(x),conj(y),satz258c(y,n)),conj(ov(x,y,n)))
-x@mod:=sqrt(mod2(x),lemma5(x)):real
-y@[i:is(x,y)]
-ismod:=isf(cx,real,[t:cx]mod(t),x,y,i):is"r"(mod(x),mod(y))
-x@[n:nis(x,0c)]
-satz264a:=sqrtnot0(mod2(x),lemma5(x),pnot0(mod2(x),lemma4(x,n))):pos(mod(x))
-x@[i:is(x,0c)]
-satz264b:=sqrt0(mod2(x),lemma5(x),lemma3(x,i)):is"r"(mod(x),0)
-x@satz264c:=thsqrt1a(mod2(x),lemma5(x)):not(neg(mod(x)))
-satz264d:=satz167f(mod(x),0,th3"l.imp"(less(mod(x),0),neg(mod(x)),satz264c,[t:less(mod(x),0)]satz169d(mod(x),t))):moreis(mod(x),0)
-+7265
-t1:=symis(real,ts"r"(mod(x),mod(x)),mod2(x),thsqrt1b(mod2(x),lemma5(x))):is"r"(mod2(x),ts"r"(mod(x),mod(x)))
-t2:=tris(real,pl"r"(ts"r"(re(x),re(x)),0),ts"r"(re(x),re(x)),ts"r"(abs(re(x)),abs(re(x))),pl02(ts"r"(re(x),re(x)),0,refis(real,0)),lemma12"r"(re(x))):is"r"(pl"r"(ts"r"(re(x),re(x)),0),ts"r"(abs(re(x)),abs(re(x))))
-t3:=satz191(ts"r"(re(x),re(x)),ts"r"(re(x),re(x)),ts"r"(im(x),im(x)),0,moreisi2(ts"r"(re(x),re(x)),ts"r"(re(x),re(x)),refis(real,ts"r"(re(x),re(x)))),lemma11"r"(im(x))):moreis(mod2(x),pl"r"(ts"r"(re(x),re(x)),0))
-t4:=ismoreis12(mod2(x),ts"r"(mod(x),mod(x)),pl"r"(ts"r"(re(x),re(x)),0),ts"r"(abs(re(x)),abs(re(x))),t1,t2,t3):moreis(ts"r"(mod(x),mod(x)),ts"r"(abs(re(x)),abs(re(x))))
-t5:=tris(real,pl"r"(0,ts"r"(im(x),im(x))),ts"r"(im(x),im(x)),ts"r"(abs(im(x)),abs(im(x))),pl01(0,ts"r"(im(x),im(x)),refis(real,0)),lemma12"r"(im(x))):is"r"(pl"r"(0,ts"r"(im(x),im(x))),ts"r"(abs(im(x)),abs(im(x))))
-t6:=satz191(ts"r"(re(x),re(x)),0,ts"r"(im(x),im(x)),ts"r"(im(x),im(x)),lemma11"r"(re(x)),moreisi2(ts"r"(im(x),im(x)),ts"r"(im(x),im(x)),refis(real,ts"r"(im(x),im(x))))):moreis(mod2(x),pl"r"(0,ts"r"(im(x),im(x))))
-t7:=ismoreis12(mod2(x),ts"r"(mod(x),mod(x)),pl"r"(0,ts"r"(im(x),im(x))),ts"r"(abs(im(x)),abs(im(x))),t1,t5,t6):moreis(ts"r"(mod(x),mod(x)),ts"r"(abs(im(x)),abs(im(x))))
-@[r:real][s:real][m:moreis(ts"r"(r,r),ts"r"(s,s))][n:moreis(r,0)][l:less(r,s)]
-t8:=lemma2"r"(r,s,l):more(s,r)
-t9:=satz169b(s,satz172d(s,r,0,t8,n)):pos(s)
-[o:more(r,0)]
-t10:=trmore(ts"r"(s,s),ts"r"(r,s),ts"r"(r,r),satz203a(s,r,s,t8,t9),satz203d(s,r,r,t8,satz169b(r,o))):more(ts"r"(s,s),ts"r"(r,r))
-l@[i:is"r"(r,0)]
-t11:=ismore2(0,ts"r"(r,r),ts"r"(s,s),symis(real,ts"r"(r,r),0,ts01(r,r,i)),satz169a(ts"r"(s,s),possq(s,pnot0(s,t9)))):more(ts"r"(s,s),ts"r"(r,r))
-l@t12:=lemma1"r"(ts"r"(s,s),ts"r"(r,r),orapp(more(r,0),is"r"(r,0),more(ts"r"(s,s),ts"r"(r,r)),n,[t:more(r,0)]t10(t),[t:is"r"(r,0)]t11(t))):less(ts"r"(r,r),ts"r"(s,s))
-n@t13:=satz167f(r,s,[t:less(r,s)]<t12(t)>satz167c(ts"r"(r,r),ts"r"(s,s),m)):moreis(r,s)
--7265
-satz265a:=t13".7265"(mod(x),abs(re(x)),t4".7265",satz264d(x)):moreis(mod(x),abs(re(x)))
-satz265b:=t13".7265"(mod(x),abs(im(x)),t7".7265",satz264d(x)):moreis(mod(x),abs(im(x)))
-@[r:real][s:real][i:is(ts(pli(r,0),pli(r,0)),ts(pli(s,0),pli(s,0)))][n:not(neg(r))][o:not(neg(s))]
-+7266
-@[t:real]
-t1:=pl02(ts"r"(t,t),m0"r"(ts"r"(0,0)),satz176b(ts"r"(0,0),ts01(0,0,refis(real,0)))):is"r"(mn"r"(ts"r"(t,t),ts"r"(0,0)),ts"r"(t,t))
-t2:=tris(real,pl"r"(ts"r"(t,0),ts"r"(0,t)),ts"r"(t,0),0,pl02(ts"r"(t,0),ts"r"(0,t),ts01(0,t,refis(real,0))),ts02(t,0,refis(real,0))):is"r"(pl"r"(ts"r"(t,0),ts"r"(0,t)),0)
-t3:=tris(cx,ts(pli(t,0),pli(t,0)),pli(mn"r"(ts"r"(t,t),ts"r"(0,0)),pl"r"(ts"r"(t,0),ts"r"(0,t))),pli(ts"r"(t,t),0),tsis12a(t,0,t,0),isrecx12(mn"r"(ts"r"(t,t),ts"r"(0,0)),ts"r"(t,t),pl"r"(ts"r"(t,0),ts"r"(0,t)),0,t1,t2)):is(ts(pli(t,0),pli(t,0)),pli(ts"r"(t,t),0))
-o@t4:=tr3is(cx,pli(ts"r"(r,r),0),ts(pli(r,0),pli(r,0)),ts(pli(s,0),pli(s,0)),pli(ts"r"(s,s),0),symis(cx,ts(pli(r,0),pli(r,0)),pli(ts"r"(r,r),0),t3(r)),i,t3(s)):is(pli(ts"r"(r,r),0),pli(ts"r"(s,s),0))
-t5:=tr3is(real,ts"r"(r,r),re(pli(ts"r"(r,r),0)),re(pli(ts"r"(s,s),0)),ts"r"(s,s),isre(ts"r"(r,r),0),iscere(pli(ts"r"(r,r),0),pli(ts"r"(s,s),0),t4),reis(ts"r"(s,s),0)):is"r"(ts"r"(r,r),ts"r"(s,s))
-t6:=andi(not(neg(r)),is"r"(ts"r"(r,r),ts"r"(s,s)),n,t5):and(not(neg(r)),is"r"(ts"r"(r,r),ts"r"(s,s)))
-t7:=andi(not(neg(s)),is"r"(ts"r"(s,s),ts"r"(s,s)),o,refis(real,ts"r"(s,s))):and(not(neg(s)),is"r"(ts"r"(s,s),ts"r"(s,s)))
--7266
-satz266:=satzr161b(ts"r"(s,s),r,s,t6".7266",t7".7266"):is"r"(r,s)
-+7267
-x@t1:=tris(cx,ts(pli(mod(x),0),pli(mod(x),0)),pli(ts"r"(mod(x),mod(x)),0),pli(mod2(x),0),t3"c.7266"(mod(x)),isrecx1(ts"r"(mod(x),mod(x)),mod2(x),0,thsqrt1b(mod2(x),lemma5(x)))):is(ts(pli(mod(x),0),pli(mod(x),0)),pli(mod2(x),0))
-t2:=ispl2"r"(m0"r"(ts"r"(im(x),m0"r"(im(x)))),ts"r"(im(x),im(x)),ts"r"(re(x),re(x)),tris(real,m0"r"(ts"r"(im(x),m0"r"(im(x)))),ts"r"(m0"r"(im(x)),m0"r"(im(x))),ts"r"(im(x),im(x)),satz197e(im(x),m0"r"(im(x))),satz198(im(x),im(x)))):is"r"(mn"r"(ts"r"(re(x),re(x)),ts"r"(im(x),m0"r"(im(x)))),mod2(x))
-t3:=tris(real,pl"r"(ts"r"(re(x),m0"r"(im(x))),ts"r"(im(x),re(x))),pl"r"(m0"r"(ts"r"(re(x),im(x))),ts"r"(re(x),im(x))),0,ispl12"r"(ts"r"(re(x),m0"r"(im(x))),m0"r"(ts"r"(re(x),im(x))),ts"r"(im(x),re(x)),ts"r"(re(x),im(x)),satz197b(re(x),im(x)),comts"r"(im(x),re(x))),satz179a(ts"r"(re(x),im(x)))):is"r"(pl"r"(ts"r"(re(x),m0"r"(im(x))),ts"r"(im(x),re(x))),0)
-t4:=tris(cx,ts(x,conj(x)),pli(mn"r"(ts"r"(re(x),re(x)),ts"r"(im(x),m0"r"(im(x)))),pl"r"(ts"r"(re(x),m0"r"(im(x))),ts"r"(im(x),re(x)))),pli(mod2(x),0),tsis2a(x,re(x),m0"r"(im(x))),isrecx12(mn"r"(ts"r"(re(x),re(x)),ts"r"(im(x),m0"r"(im(x)))),mod2(x),pl"r"(ts"r"(re(x),m0"r"(im(x))),ts"r"(im(x),re(x))),0,t2,t3)):is(ts(x,conj(x)),pli(mod2(x),0))
--7267
-x@satz267:=tris2(cx,ts(pli(mod(x),0),pli(mod(x),0)),ts(x,conj(x)),pli(mod2(x),0),t1".7267",t4".7267"):is(ts(pli(mod(x),0),pli(mod(x),0)),ts(x,conj(x)))
-satz267a:=symis(cx,ts(pli(mod(x),0),pli(mod(x),0)),ts(x,conj(x)),satz267):is(ts(x,conj(x)),ts(pli(mod(x),0),pli(mod(x),0)))
-+7268
-z@t1:=tr3is(cx,ts(x,ts(y,z)),ts(ts(x,y),z),ts(ts(y,x),z),ts(y,ts(x,z)),assts2(x,y,z),ists1(ts(x,y),ts(y,x),z,comts(x,y)),assts1(y,x,z)):is(ts(x,ts(y,z)),ts(y,ts(x,z)))
-[u:complex]
-t2:=tr3is(cx,ts(ts(x,y),ts(z,u)),ts(x,ts(y,ts(z,u))),ts(x,ts(z,ts(y,u))),ts(ts(x,z),ts(y,u)),assts1(x,y,ts(z,u)),ists2(ts(y,ts(z,u)),ts(z,ts(y,u)),x,t1(y,z,u)),assts2(x,z,ts(y,u))):is(ts(ts(x,y),ts(z,u)),ts(ts(x,z),ts(y,u)))
-y@t3:=tr3is(cx,ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(x,y),conj(ts(x,y))),ts(ts(x,y),ts(conj(x),conj(y))),ts(ts(x,conj(x)),ts(y,conj(y))),satz267(ts(x,y)),ists2(conj(ts(x,y)),ts(conj(x),conj(y)),ts(x,y),satz261(x,y)),t2(x,y,conj(x),conj(y))):is(ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(x,conj(x)),ts(y,conj(y))))
-t4:=tr3is(cx,ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(x,conj(x)),ts(y,conj(y))),ts(ts(pli(mod(x),0),pli(mod(x),0)),ts(pli(mod(y),0),pli(mod(y),0))),ts(ts(pli(mod(x),0),pli(mod(y),0)),ts(pli(mod(x),0),pli(mod(y),0))),t3,ists12(ts(x,conj(x)),ts(pli(mod(x),0),pli(mod(x),0)),ts(y,conj(y)),ts(pli(mod(y),0),pli(mod(y),0)),satz267a(x),satz267a(y)),t2(pli(mod(x),0),pli(mod(x),0),pli(mod(y),0),pli(mod(y),0))):is(ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(pli(mod(x),0),pli(mod(y),0)),ts(pli(mod(x),0),pli(mod(y),0))))
-@[r:real][s:real]
-t5:=pl02(ts"r"(r,s),m0"r"(ts"r"(0,0)),satz176b(ts"r"(0,0),ts01(0,0,refis(real,0)))):is"r"(mn"r"(ts"r"(r,s),ts"r"(0,0)),ts"r"(r,s))
-t6:=tris(real,pl"r"(ts"r"(r,0),ts"r"(0,s)),ts"r"(r,0),0,pl02(ts"r"(r,0),ts"r"(0,s),ts01(0,s,refis(real,0))),ts02(r,0,refis(real,0))):is"r"(pl"r"(ts"r"(r,0),ts"r"(0,s)),0)
-t7:=tris(cx,ts(pli(r,0),pli(s,0)),pli(mn"r"(ts"r"(r,s),ts"r"(0,0)),pl"r"(ts"r"(r,0),ts"r"(0,s))),pli(ts"r"(r,s),0),tsis12a(r,0,s,0),isrecx12(mn"r"(ts"r"(r,s),ts"r"(0,0)),ts"r"(r,s),pl"r"(ts"r"(r,0),ts"r"(0,s)),0,t5,t6)):is(ts(pli(r,0),pli(s,0)),pli(ts"r"(r,s),0))
-y@t8:=tris(cx,ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(pli(mod(x),0),pli(mod(y),0)),ts(pli(mod(x),0),pli(mod(y),0))),ts(pli(ts"r"(mod(x),mod(y)),0),pli(ts"r"(mod(x),mod(y)),0)),t4,ists12(ts(pli(mod(x),0),pli(mod(y),0)),pli(ts"r"(mod(x),mod(y)),0),ts(pli(mod(x),0),pli(mod(y),0)),pli(ts"r"(mod(x),mod(y)),0),t7(mod(x),mod(y)),t7(mod(x),mod(y)))):is(ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(pli(ts"r"(mod(x),mod(y)),0),pli(ts"r"(mod(x),mod(y)),0)))
-[n:neg(ts"r"(mod(x),mod(y)))]
-t9:=orapp(and(pos(mod(x)),neg(mod(y))),and(neg(mod(x)),pos(mod(y))),con,satz196h(mod(x),mod(y),n),[t:and(pos(mod(x)),neg(mod(y)))]<ande2(pos(mod(x)),neg(mod(y)),t)>satz264c(y),[t:and(neg(mod(x)),pos(mod(y)))]<ande1(neg(mod(x)),pos(mod(y)),t)>satz264c(x)):con
--7268
-y@satz268:=satz266(mod(ts(x,y)),ts"r"(mod(x),mod(y)),t8".7268",satz264c(ts(x,y)),[t:neg(ts"r"(mod(x),mod(y)))]t9".7268"(t)):is"r"(mod(ts(x,y)),ts"r"(mod(x),mod(y)))
-satz268a:=symis(real,mod(ts(x,y)),ts"r"(mod(x),mod(y)),satz268):is"r"(ts"r"(mod(x),mod(y)),mod(ts(x,y)))
-[n:nis(y,0c)]
-+7269
-t1:=pnot0(mod(y),satz264a(y,n)):nis"r"(mod(y),0)
-t2:=tris1(real,ts"r"(mod(ov(x,y,n)),mod(y)),mod(x),mod(ts(ov(x,y,n),y)),satz268(ov(x,y,n),y),ismod(ts(ov(x,y,n),y),x,satz240(x,y,n))):is"r"(ts"r"(mod(ov(x,y,n)),mod(y)),mod(x))
-t3:=satz204g(mod(x),mod(y),mod(ov(x,y,n)),t1,tris(real,ts"r"(mod(y),mod(ov(x,y,n))),ts"r"(mod(ov(x,y,n)),mod(y)),mod(x),comts"r"(mod(y),mod(ov(x,y,n))),t2)):is"r"(mod(ov(x,y,n)),ov"r"(mod(x),mod(y),t1))
--7269
-satz269:=t3".7269":is"r"(mod(ov(x,y,n)),ov"r"(mod(x),mod(y),pnot0(mod(y),satz264a(y,n))))
-y@[i:is(pl(x,y),1c)]
-+7270
-@[r:real]
-t1:=th1"l.imp"(neg(r),moreis(abs(r),r),[t:neg(r)]moreisi1(abs(r),r,trmore(abs(r),0,r,satz169a(abs(r),satz166b(r,t)),lemma2"r"(r,0,satz169c(r,t)))),[t:not(neg(r))]moreisi2(abs(r),r,absnn(r,t))):moreis(abs(r),r)
-x@t2:=trmoreis(mod(x),abs(re(x)),re(x),satz265a(x),t1(re(x))):moreis(mod(x),re(x))
-i@t3:=tr3is(real,pl"r"(re(x),re(y)),re(pl(x,y)),re(1c),1rl,isre(pl"r"(re(x),re(y)),pl"r"(im(x),im(y))),iscere(pl(x,y),1c,i),reis(1rl,0)):is"r"(pl"r"(re(x),re(y)),1rl)
--7270
-satz270:=ismoreis2(pl"r"(re(x),re(y)),1rl,pl"r"(mod(x),mod(y)),t3".7270",satz191(mod(x),re(x),mod(y),re(y),t2".7270",t2".7270"(y))):moreis(pl"r"(mod(x),mod(y)),1rl)
-+7271
-y@[i:is(pl(x,y),0c)]
-t1:=satz264b(pl(x,y),i):is"r"(mod(pl(x,y)),0)
-t2:=ismoreis2(pl"r"(0,0),mod(pl(x,y)),pl"r"(mod(x),mod(y)),tris2(real,pl"r"(0,0),mod(pl(x,y)),0,pl01(0,0,refis(real,0)),t1),satz191(mod(x),0,mod(y),0,satz264d(x),satz264d(y))):moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y)))
-y@[n:nis(pl(x,y),0c)]
-t3:=pnot0(mod(pl(x,y)),satz264a(pl(x,y),n)):nis"r"(mod(pl(x,y)),0)
-t4:=tris(cx,pl(ov(x,pl(x,y),n),ov(y,pl(x,y),n)),ov(pl(x,y),pl(x,y),n),1c,satz253(x,pl(x,y),y,n),satz250(pl(x,y),n)):is(pl(ov(x,pl(x,y),n),ov(y,pl(x,y),n)),1c)
-t5:=satz270(ov(x,pl(x,y),n),ov(y,pl(x,y),n),t4):moreis(pl"r"(mod(ov(x,pl(x,y),n)),mod(ov(y,pl(x,y),n))),1rl)
-fx:=ov"r"(mod(x),mod(pl(x,y)),t3):real
-fy:=ov"r"(mod(y),mod(pl(x,y)),t3):real
-t6:=ismoreis1(pl"r"(mod(ov(x,pl(x,y),n)),mod(ov(y,pl(x,y),n))),pl"r"(fx,fy),1rl,ispl12"r"(mod(ov(x,pl(x,y),n)),fx,mod(ov(y,pl(x,y),n)),fy,satz269(x,pl(x,y),n),satz269(y,pl(x,y),n)),t5):moreis(pl"r"(fx,fy),1rl)
-prl:=ts"r"(pl"r"(fx,fy),mod(pl(x,y))):real
-prr:=ts"r"(1rl,mod(pl(x,y))):real
-t7:=orapp(more(pl"r"(fx,fy),1rl),is"r"(pl"r"(fx,fy),1rl),moreis(prl,prr),t6,[t:more(pl"r"(fx,fy),1rl)]moreisi1(prl,prr,satz203a(pl"r"(fx,fy),1rl,mod(pl(x,y)),t,satz264a(pl(x,y),n))),[t:is"r"(pl"r"(fx,fy),1rl)]moreisi2(prl,prr,ists1"r"(pl"r"(fx,fy),1rl,mod(pl(x,y)),t))):moreis(prl,prr)
-t8:=tris(real,prl,pl"r"(ts"r"(fx,mod(pl(x,y))),ts"r"(fy,mod(pl(x,y)))),pl"r"(mod(x),mod(y)),disttp1"r"(fx,fy,mod(pl(x,y))),ispl12"r"(ts"r"(fx,mod(pl(x,y))),mod(x),ts"r"(fy,mod(pl(x,y))),mod(y),satz204e(mod(x),mod(pl(x,y)),t3),satz204e(mod(y),mod(pl(x,y)),t3))):is"r"(prl,pl"r"(mod(x),mod(y)))
-t9:=satz195b(mod(pl(x,y))):is"r"(prr,mod(pl(x,y)))
-t10:=ismoreis12(prl,pl"r"(mod(x),mod(y)),prr,mod(pl(x,y)),t8,t9,t7):moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y)))
-y@t11:=th1"l.imp"(is(pl(x,y),0c),moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y))),[t:is(pl(x,y),0c)]t2(t),[t:nis(pl(x,y),0c)]t10(t)):moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y)))
--7271
-y@satz271:=satz168a(pl"r"(mod(x),mod(y)),mod(pl(x,y)),t11".7271"):lessis(mod(pl(x,y)),pl"r"(mod(x),mod(y)))
-satz271a:=t11".7271":moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y)))
-+7272
-x@t1:=tris(real,re(m0(x)),re(pli(m0"r"(re(x)),m0"r"(im(x)))),m0"r"(re(x)),iscere(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),satz214(x)),reis(m0"r"(re(x)),m0"r"(im(x)))):is"r"(re(m0(x)),m0"r"(re(x)))
-t2:=tris(real,ts"r"(re(m0(x)),re(m0(x))),ts"r"(m0"r"(re(x)),m0"r"(re(x))),ts"r"(re(x),re(x)),ists12"r"(re(m0(x)),m0"r"(re(x)),re(m0(x)),m0"r"(re(x)),t1,t1),satz198(re(x),re(x))):is"r"(ts"r"(re(m0(x)),re(m0(x))),ts"r"(re(x),re(x)))
-t3:=tris(real,im(m0(x)),im(pli(m0"r"(re(x)),m0"r"(im(x)))),m0"r"(im(x)),isceim(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),satz214(x)),imis(m0"r"(re(x)),m0"r"(im(x)))):is"r"(im(m0(x)),m0"r"(im(x)))
-t4:=tris(real,ts"r"(im(m0(x)),im(m0(x))),ts"r"(m0"r"(im(x)),m0"r"(im(x))),ts"r"(im(x),im(x)),ists12"r"(im(m0(x)),m0"r"(im(x)),im(m0(x)),m0"r"(im(x)),t3,t3),satz198(im(x),im(x))):is"r"(ts"r"(im(m0(x)),im(m0(x))),ts"r"(im(x),im(x)))
-t5:=ispl12"r"(ts"r"(re(m0(x)),re(m0(x))),ts"r"(re(x),re(x)),ts"r"(im(m0(x)),im(m0(x))),ts"r"(im(x),im(x)),t2,t4):is"r"(mod2(m0(x)),mod2(x))
--7272
-x@satz272:=issqrt(mod2(m0(x)),mod2(x),lemma5(m0(x)),lemma5(x),t5".7272"):is"r"(mod(m0(x)),mod(x))
-satz272a:=symis(real,mod(m0(x)),mod(x),satz272):is"r"(mod(x),mod(m0(x)))
-+7273
-y@sum:=pl"r"(mod(y),mod(mn(x,y))):real
-t1:=islessis1(mod(pl(y,mn(x,y))),mod(x),sum,ismod(pl(y,mn(x,y)),x,satz212h(x,y)),satz271(y,mn(x,y))):lessis(mod(x),sum)
-t2:=th9"l.or"(less(mod(x),sum),is"r"(mod(x),sum),less(mn"r"(mod(x),mod(y)),mn"r"(sum,mod(y))),is"r"(mn"r"(mod(x),mod(y)),mn"r"(sum,mod(y))),t1,[t:less(mod(x),sum)]satz188f(mod(x),sum,m0"r"(mod(y)),t),[t:is"r"(mod(x),sum)]ismn1"r"(mod(x),sum,mod(y),t)):lessis(mn"r"(mod(x),mod(y)),mn"r"(sum,mod(y)))
-t3:=tris(real,mn"r"(sum,mod(y)),mn"r"(pl"r"(mod(mn(x,y)),mod(y)),mod(y)),mod(mn(x,y)),ismn1"r"(sum,pl"r"(mod(mn(x,y)),mod(y)),mod(y),compl"r"(mod(y),mod(mn(x,y)))),mnpl(mod(mn(x,y)),mod(y))):is"r"(mn"r"(sum,mod(y)),mod(mn(x,y)))
-t4:=satz168b(mn"r"(mod(x),mod(y)),mod(mn(x,y)),islessis2(mn"r"(sum,mod(y)),mod(mn(x,y)),mn"r"(mod(x),mod(y)),t3,t2)):moreis(mod(mn(x,y)),mn"r"(mod(x),mod(y)))
-t5:=ismoreis12(mod(mn(y,x)),mod(mn(x,y)),mn"r"(mod(y),mod(x)),m0"r"(mn"r"(mod(x),mod(y))),tris1(real,mod(mn(y,x)),mod(mn(x,y)),mod(m0(mn(x,y))),ismod(m0(mn(x,y)),mn(y,x),satz219(x,y)),satz272(mn(x,y))),satz181a(mod(y),mod(x)),t4(y,x)):moreis(mod(mn(x,y)),m0"r"(mn"r"(mod(x),mod(y))))
-@[r:real][s:real][m:moreis(r,s)][n:moreis(r,m0"r"(s))]
-r@t6:=th9"l.or"(neg(r),not(neg(r)),is"r"(abs(r),m0"r"(r)),is"r"(abs(r),r),th6"l.or"(neg(r)),[t:neg(r)]absn(r,t),[t:not(neg(r))]absnn(r,t)):or(is"r"(abs(r),m0"r"(r)),is"r"(abs(r),r))
-n@t7:=orapp(is"r"(abs(s),m0"r"(s)),is"r"(abs(s),s),moreis(r,abs(s)),t6(s),[t:is"r"(abs(s),m0"r"(s))]ismoreis2(m0"r"(s),abs(s),r,symis(real,abs(s),m0"r"(s),t),n),[t:is"r"(abs(s),s)]ismoreis2(s,abs(s),r,symis(real,abs(s),s,t),m)):moreis(r,abs(s))
--7273
-y@satz273:=t7".7273"(mod(mn(x,y)),mn"r"(mod(x),mod(y)),t4".7273",t5".7273"):moreis(mod(mn(x,y)),abs(mn"r"(mod(x),mod(y))))
--c
--r
--rp
--rt
-@[x:nat][y:nat]
-+8274
-prop1:=some"l"([t:1to(x)]1to(y),[f:[t:1to(x)]1to(y)]bijective(1to(x),1to(y),f)):'prop'
-x@prop2:=all([y:nat]imp(less(x,y),not(prop1(y)))):'prop'
-@[y:nat][l:less(1,y)][f:[t:1to(1)]1to(y)]
-1y:=1out(y):1to(y)
-yy:=xout(y):1to(y)
-[i:is"e"(1to(y),1y,yy)]
-t1:=isoutne(y,1,satz24a(y),y,lessisi3(y),i):is(1,y)
-f@t2:=ec3e31(is(1,y),more(1,y),less(1,y),satz10b(1,y),l):nis(1,y)
-t3:=th3"l.imp"(is"e"(1to(y),1y,yy),is(1,y),t2,[t:is"e"(1to(y),1y,yy)]t1(t)):not(is"e"(1to(y),1y,yy))
-[u:1to(1)]
-t4:=isf(1to(1),1to(y),f,u,1o,th1"n.singlet"(u)):is"e"(1to(y),<u>f,<1o>f)
-f@[i:is"e"(1to(y),<1o>f,1y)][u:1to(1)]
-t5:=th2"e.notis"(1to(y),1y,yy,<u>f,t3,tris(1to(y),<u>f,<1o>f,1y,t4(u),i)):not(is"e"(1to(y),<u>f,yy))
-i@t6:=th5"l.some"(1to(1),[u:1to(1)]is"e"(1to(y),yy,<u>f),[u:1to(1)]symnotis(1to(y),<u>f,yy,t5(u))):not(image(1to(1),1to(y),f,yy))
-t7:=th1"l.all"(1to(y),[u:1to(y)]image(1to(1),1to(y),f,u),yy,t6):not(surjective(1to(1),1to(y),f))
-f@[n:not(is"e"(1to(y),<1o>f,1y))][u:1to(1)]
-t8:=th2"e.notis"(1to(y),<1o>f,1y,<u>f,n,t4(u)):not(is"e"(1to(y),<u>f,1y))
-n@t9:=th5"l.some"(1to(1),[u:1to(1)]is"e"(1to(y),1y,<u>f),[u:1to(1)]symnotis(1to(y),<u>f,1y,t8(u))):not(image(1to(1),1to(y),f,1y))
-t10:=th1"l.all"(1to(y),[u:1to(y)]image(1to(1),1to(y),f,u),1y,t9):not(surjective(1to(1),1to(y),f))
-f@t11:=th1"l.imp"(is"e"(1to(y),<1o>f,1y),not(surjective(1to(1),1to(y),f)),[t:is"e"(1to(y),<1o>f,1y)]t7(t),[t:not(is"e"(1to(y),<1o>f,1y))]t10(t)):not(surjective(1to(1),1to(y),f))
-t12:=th2"l.and"(injective(1to(1),1to(y),f),surjective(1to(1),1to(y),f),t11):not(bijective(1to(1),1to(y),f))
-l@t13:=th5"l.some"([t:1to(1)]1to(y),[f:[t:1to(1)]1to(y)]bijective(1to(1),1to(y),f),[f:[t:1to(1)]1to(y)]t12(f)):not(prop1(1,y))
-@t14:=[y:nat][t:less(1,y)]t13(y,t):prop2(1)
-x@[p:prop2(x)][y:nat][l:less(<x>suc,y)]
-x@xs:=<x>suc:nat
-l@xxs:=xout(xs):1to(<x>suc)
-yy1:=xout(y):1to(y)
-t15:=trless(1,<x>suc,y,satz24c(x),l):less(1,y)
-ym1:=mn(y,1,t15):nat
-t16:=isless12(<x>suc,pl(x,1),y,pl(ym1,1),satz4e(x),th1c"n.mn"(y,1,t15),l):less(pl(x,1),pl(ym1,1))
-t17:=satz20c(x,ym1,1,t16):less(x,ym1)
-t18:=isless2(pl(ym1,1),y,ym1,th1d"n.mn"(y,1,t15),satz18a(ym1,1)):less(ym1,y)
-[f:[t:1to(xs)]1to(y)][b:bijective(1to(xs),1to(y),f)]
-t19:=ande1(injective(1to(xs),1to(y),f),surjective(1to(xs),1to(y),f),b):injective(1to(xs),1to(y),f)
-t20:=ande2(injective(1to(xs),1to(y),f),surjective(1to(xs),1to(y),f),b):surjective(1to(xs),1to(y),f)
-[i:is"e"(1to(y),<xxs>f,yy1)][u:1to(x)]
-u1:=inn(x,u):nat
-t21:=satz16a(u1,x,xs,1top(x,u),satz18c(x)):less(u1,xs)
-t22:=ec3e31(is(u1,xs),more(u1,xs),less(u1,xs),satz10b(u1,xs),t21):nis(u1,xs)
-t23:=lessisi1(u1,xs,t21):lessis(u1,xs)
-u2:=outn(xs,u1,t23):1to(xs)
-t24:=th3"l.imp"(is"e"(1to(xs),u2,xxs),is(u1,xs),t22,[t:is"e"(1to(xs),u2,xxs)]isoutne(xs,u1,t23,xs,lessisi3(xs),t)):not(is"e"(1to(xs),u2,xxs))
-[j:is"e"(1to(y),<u2>f,yy1)]
-t25:=tris2(1to(y),<u2>f,<xxs>f,yy1,j,i):is"e"(1to(y),<u2>f,<xxs>f)
-t26:=isfe(1to(xs),1to(y),f,t19,u2,xxs,t25):is"e"(1to(xs),u2,xxs)
-u@t27:=th3"l.imp"(is"e"(1to(y),<u2>f,yy1),is"e"(1to(xs),u2,xxs),t24,[t:is"e"(1to(y),<u2>f,yy1)]t26(t)):not(is"e"(1to(y),<u2>f,yy1))
-w1:=inn(y,<u2>f):nat
-[j:is(w1,y)]
-t28:=tris(1to(y),<u2>f,outn(y,w1,1top(y,<u2>f)),yy1,isoutinn(y,<u2>f),isoutni(y,w1,1top(y,<u2>f),y,lessisi3(y),j)):is"e"(1to(y),<u2>f,yy1)
-u@t29:=th3"l.imp"(is(w1,y),is"e"(1to(y),<u2>f,yy1),t27,[t:is(w1,y)]t28(t)):nis(w1,y)
-t30:=ore1(less(w1,y),is(w1,y),1top(y,<u2>f),t29):less(w1,y)
-t31:=islessis2(y,pl(ym1,1),pl(w1,1),th1c"n.mn"(y,1,t15),satz25b(y,w1,t30)):lessis(pl(w1,1),pl(ym1,1))
-t32:=th9"l.or"(less(pl(w1,1),pl(ym1,1)),is(pl(w1,1),pl(ym1,1)),less(w1,ym1),is(w1,ym1),t31,[t:less(pl(w1,1),pl(ym1,1))]satz20c(w1,ym1,1,t),[t:is(pl(w1,1),pl(ym1,1))]satz20b(w1,ym1,1,t)):lessis(w1,ym1)
-w2:=outn(ym1,w1,t32):1to(ym1)
-i@f1:=[t:1to(x)]w2(t):[t:1to(x)]1to(ym1)
-u@[v:1to(x)][j:is"e"(1to(ym1),<u>f1,<v>f1)]
-t33:=isoutne(ym1,w1(u),t32(u),w1(v),t32(v),j):is(w1(u),w1(v))
-t34:=isinne(y,<u2(u)>f,<u2(v)>f,t33):is"e"(1to(y),<u2(u)>f,<u2(v)>f)
-t35:=<t34><u2(v)><u2(u)>t19:is"e"(1to(xs),u2(u),u2(v))
-t36:=isoutne(xs,u1(u),t23(u),u1(v),t23(v),t35):is(u1(u),u1(v))
-t37:=isinne(x,u,v,t36):is"e"(1to(x),u,v)
-i@[v:1to(ym1)]
-v1:=inn(ym1,v):nat
-t38:=satz16a(v1,ym1,y,1top(ym1,v),t18):less(v1,y)
-t39:=ec3e31(is(v1,y),more(v1,y),less(v1,y),satz10b(v1,y),t38):nis(v1,y)
-t40:=lessisi1(v1,y,t38):lessis(v1,y)
-v2:=outn(y,v1,t40):1to(y)
-w3:=<v2>invf(1to(xs),1to(y),f,b):1to(xs)
-t41:=thinvf2(1to(xs),1to(y),f,b,v2):is"e"(1to(y),v2,<w3>f)
-[j:is"e"(1to(xs),w3,xxs)]
-t42:=isf(1to(xs),1to(y),f,w3,xxs,j):is"e"(1to(y),<w3>f,<xxs>f)
-t43:=tr3is(1to(y),v2,<w3>f,<xxs>f,yy1,t41,t42,i):is"e"(1to(y),v2,yy1)
-t44:=isoutne(y,v1,t40,y,lessisi3(y),t43):is(v1,y)
-v@t45:=th3"l.imp"(is"e"(1to(xs),w3,xxs),is(v1,y),t39,[t:is"e"(1to(xs),w3,xxs)]t44(t)):not(is"e"(1to(xs),w3,xxs))
-w4:=inn(xs,w3):nat
-[j:is(w4,xs)]
-t46:=tris(1to(xs),w3,outn(xs,w4,1top(xs,w3)),xxs,isoutinn(xs,w3),isoutni(xs,w4,1top(xs,w3),xs,lessisi3(xs),j)):is"e"(1to(xs),w3,xxs)
-v@t47:=th3"l.imp"(is(w4,xs),is"e"(1to(xs),w3,xxs),t45,[t:is(w4,xs)]t46(t)):nis(w4,xs)
-t48:=ore1(less(w4,xs),is(w4,xs),1top(xs,w3),t47):less(w4,xs)
-t49:=satz26a(x,w4,t48):lessis(w4,x)
-w5:=outn(x,w4,t49):1to(x)
-t50:=isinoutn(x,w4,t49):is(w4,u1(w5))
-t51:=tris(1to(xs),w3,outn(xs,w4,1top(xs,w3)),u2(w5),isoutinn(xs,w3),isoutni(xs,w4,1top(xs,w3),u1(w5),t23(w5),t50)):is"e"(1to(xs),w3,u2(w5))
-t52:=isf(1to(xs),1to(y),f,w3,u2(w5),t51):is"e"(1to(y),<w3>f,<u2(w5)>f)
-t53:=tris(1to(y),v2,<w3>f,<u2(w5)>f,t41,t52):is"e"(1to(y),v2,<u2(w5)>f)
-t54:=tris(nat,v1,inn(y,v2),w1(w5),isinoutn(y,v1,t40),isinni(y,v2,<u2(w5)>f,t53)):is(v1,w1(w5))
-t55:=tris(1to(ym1),v,outn(ym1,v1,1top(ym1,v)),w2(w5),isoutinn(ym1,v),isoutni(ym1,v1,1top(ym1,v),w1(w5),t32(w5),t54)):is"e"(1to(ym1),v,<w5>f1)
-t56:=somei(1to(x),[t:1to(x)]is"e"(1to(ym1),v,<t>f1),w5,t55):image(1to(x),1to(ym1),f1,v)
-i@t57:=andi(injective(1to(x),1to(ym1),f1),surjective(1to(x),1to(ym1),f1),[u:1to(x)][v:1to(x)][t:is"e"(1to(ym1),<u>f1,<v>f1)]t37(u,v,t),[u:1to(ym1)]t56(u)):bijective(1to(x),1to(ym1),f1)
-t58:=somei([t:1to(x)]1to(ym1),[g:[t:1to(x)]1to(ym1)]bijective(1to(x),1to(ym1),g),f1,t57):prop1(ym1)
-t59:=<t58><t17><ym1>p:con
-b@[n:not(is"e"(1to(y),<xxs>f,yy1))]
-m0:=<yy1>invf(1to(xs),1to(y),f,b):1to(xs)
-t60:=thinvf2(1to(xs),1to(y),f,b,yy1):is"e"(1to(y),yy1,<m0>f)
-f2:=changef(1to(xs),1to(y),f,m0,xxs):[t:1to(xs)]1to(y)
-t61:=changef2(1to(xs),1to(y),f,m0,xxs,xxs,refis(1to(xs),xxs)):is"e"(1to(y),<xxs>f2,<m0>f)
-t62:=tris2(1to(y),<xxs>f2,yy1,<m0>f,t61,t60):is"e"(1to(y),<xxs>f2,yy1)
-t63:=th6"e.wissel"(1to(xs),1to(y),f,m0,xxs,b):bijective(1to(xs),1to(y),f2)
-t64:=t59(f2,t63,t62):con
-b@t65:=th1"l.imp"(is"e"(1to(y),<xxs>f,yy1),con,[t:is"e"(1to(y),<xxs>f,yy1)]t59(t),[t:not(is"e"(1to(y),<xxs>f,yy1))]t64(t)):con
-l@t65a:=th5"l.some"([t:1to(xs)]1to(y),[f:[t:1to(xs)]1to(y)]bijective(1to(xs),1to(y),f),[f:[t:1to(xs)]1to(y)][t:bijective(1to(xs),1to(y),f)]t65(f,t)):not(prop1(xs,y))
-p@t66:=[y:nat][t:less(xs,y)]t65a(y,t):prop2(xs)
-x@t67:=induction([t:nat]prop2(t),t14,[t:nat][u:prop2(t)]t66(t,u),x):prop2(x)
--8274
-[l:less(x,y)]
-satz274:=<l><y>t67".8274":not(some"l"([t:1to(x)]1to(y),[f:[t:1to(x)]1to(y)]bijective(1to(x),1to(y),f)))
-[f:[t:1to(x)]1to(y)]
-satz274a:=th4"l.some"([t:1to(x)]1to(y),[g:[t:1to(x)]1to(y)]bijective(1to(x),1to(y),g),satz274,f):not(bijective(1to(x),1to(y),f))
-+*rt
-+*rp
-+*r
-+*c
-@[x:nat][u:1to(x)]
-inn:=inn"n"(x,u):nat
-@[q:[t:cx][u:cx]cx][x:nat][f:[t:1to(x)]cx]
-x@[n:1to(x)][o:not(is"e"(1to(x),n,xout(x)))]
-+8275
-t1:=th3"l.imp"(is"n"(inn(x,n),x),is"e"(1to(x),n,xout(x)),o,[t:is"n"(inn(x,n),x)]tris(1to(x),n,outn(x,inn(x,n),1top(x,n)),xout(x),isoutinn(x,n),isoutni(x,inn(x,n),1top(x,n),x,lessisi3(x),t))):not(is"n"(inn(x,n),x))
-t2:=ore1(less"n"(inn(x,n),x),is"n"(inn(x,n),x),1top(x,n),t1):less"n"(inn(x,n),x)
--8275
-lemma275:=satz25c(x,inn(x,n),t2".8275"):lessis"n"(<inn(x,n)>suc,x)
-f@[g:[t:1to(x)]cx]
-recprop:=and(is(<1out(x)>g,<1out(x)>f),[t:1to(x)][u:not(is"e"(1to(x),t,xout(x)))]is(<outn(x,<inn(x,t)>suc,lemma275(t,u))>g,<<outn(x,<inn(x,t)>suc,lemma275(t,u))>f><<t>g>q)):'prop'
-+*8275
-x@1o:=1out(x):1to(x)
-xo:=xout(x):1to(x)
-[u:nat][l:lessis"n"(<u>suc,x)]
-t11:=satz16b(u,<u>suc,x,satz18c(u),l):less"n"(u,x)
-t12:=lessisi1"n"(u,x,t11):lessis"n"(u,x)
-ux:=outn(x,u,t12):1to(x)
-t13:=ec3e31(is"n"(u,x),more"n"(u,x),less"n"(u,x),satz10b(u,x),t11):nis"n"(u,x)
-t14:=th3"l.imp"(is"e"(1to(x),ux,xo),is"n"(u,x),t13,[t:is"e"(1to(x),ux,xo)]isoutne(x,u,t12,x,lessisi3(x),t)):not(is"e"(1to(x),ux,xo))
-t15:=isf(nat,nat,suc,u,inn(x,ux),isinoutn(x,u,t12)):is"n"(<u>suc,<inn(x,ux)>suc)
-t16:=isoutni(x,<u>suc,l,<inn(x,ux)>suc,lemma275(ux,t14),t15):is"e"(1to(x),outn(x,<u>suc,l),outn(x,<inn(x,ux)>suc,lemma275(ux,t14)))
-x@[n:1to(x)][o:not(is"e"(1to(x),n,xo))]
-ns:=outn(x,<inn(x,n)>suc,lemma275(n,o)):1to(x)
-f@[g:[t:1to(x)]cx]
-prop1:=is(<1o>g,<1o>f):'prop'
-prop2:=[t:1to(x)][u:not(is"e"(1to(x),t,xo))]is(<ns(t,u)>g,<<ns(t,u)>f><<t>g>q):'prop'
-[pg:recprop(g)]
-t3:=ande1(prop1,prop2,pg):prop1
-[n:1to(x)][o:not(is"e"(1to(x),n,xo))]
-t4:=<o><n>ande2(prop1,prop2,pg):is(<ns(n,o)>g,<<ns(n,o)>f><<n>g>q)
-pg@[u:nat][l:lessis"n"(<u>suc,x)]
-t17:=isf(1to(x),cx,g,outn(x,<u>suc,l),ns(ux(u,l),t14(u,l)),t16(u,l)):is(<outn(x,<u>suc,l)>g,<ns(ux(u,l),t14(u,l))>g)
-t18:=tris(cx,<outn(x,<u>suc,l)>g,<ns(ux(u,l),t14(u,l))>g,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>g>q,t17,t4(pg,ux(u,l),t14(u,l))):is(<outn(x,<u>suc,l)>g,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>g>q)
-g@[h:[t:1to(x)]cx][u:nat][l:lessis"n"(u,x)]
-prop3:=is(<outn(x,u,l)>g,<outn(x,u,l)>h):'prop'
-u@prop4:=and(lessis"n"(u,x),[t:lessis"n"(u,x)]prop3(t)):'prop'
-prop5:=or(prop4,more"n"(u,x)):'prop'
-h@[pg:recprop(g)][ph:recprop(h)][l:lessis"n"(1,x)]
-t5:=isoutni(x,1,l,1,satz24a(x),refis(nat,1)):is"e"(1to(x),outn(x,1,l),1o)
-t6:=isf(1to(x),cx,g,outn(x,1,l),1o,t5):is(<outn(x,1,l)>g,<1o>g)
-t7:=tris(cx,<outn(x,1,l)>g,<1o>g,<1o>f,t6,t3(pg)):is(<outn(x,1,l)>g,<1o>f)
-t8:=tris2(cx,<outn(x,1,l)>g,<outn(x,1,l)>h,<1o>f,t7,t7(h,g,ph,pg,l)):prop3(1,l)
-ph@t9:=andi(lessis"n"(1,x),[t:lessis"n"(1,x)]prop3(1,t),satz24a(x),[t:lessis"n"(1,x)]t8(t)):prop4(1)
-t10:=ori1(prop4(1),more"n"(1,x),t9):prop5(1)
-[u:nat][p:prop5(u)][l:lessis"n"(<u>suc,x)]
-t19:=ec3e32(is"n"(u,x),more"n"(u,x),less"n"(u,x),satz10b(u,x),t11(u,l)):not(more"n"(u,x))
-t20:=ore1(prop4(u),more"n"(u,x),p,t19):prop4(u)
-t21:=<t12(u,l)>ande2(lessis"n"(u,x),[t:lessis"n"(u,x)]prop3(u,t),t20):prop3(u,t12(u,l))
-t22:=isf(cx,cx,[t:cx]<<ns(ux(u,l),t14(u,l))>f><t>q,<ux(u,l)>g,<ux(u,l)>h,t21):is(<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>g>q,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>h>q)
-t23:=symis(cx,<outn(x,<u>suc,l)>h,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>h>q,t18(h,ph,u,l)):is(<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>h>q,<outn(x,<u>suc,l)>h)
-t24:=tr3is(cx,<outn(x,<u>suc,l)>g,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>g>q,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>h>q,<outn(x,<u>suc,l)>h,t18(g,pg,u,l),t22,t23):prop3(<u>suc,l)
-t25:=andi(lessis"n"(<u>suc,x),[t:lessis"n"(<u>suc,x)]prop3(<u>suc,t),l,[t:lessis"n"(<u>suc,x)]t24(t)):prop4(<u>suc)
-t26:=ori1(prop4(<u>suc),more"n"(<u>suc,x),t25):prop5(<u>suc)
-p@[n:not(lessis"n"(<u>suc,x))]
-t27:=satz10k(<u>suc,x,n):more"n"(<u>suc,x)
-t28:=ori2(prop4(<u>suc),more"n"(<u>suc,x),t27):prop5(<u>suc)
-p@t29:=th1"l.imp"(lessis"n"(<u>suc,x),prop5(<u>suc),[t:lessis"n"(<u>suc,x)]t26(t),[t:not(lessis"n"(<u>suc,x))]t28(t)):prop5(<u>suc)
-u@t30:=induction([v:nat]prop5(v),t10,[v:nat][t:prop5(v)]t29(v,t),u):prop5(u)
-ph@[n:1to(x)]
-t31:=isf(1to(x),cx,g,n,outn(x,inn(x,n),1top(x,n)),isoutinn(x,n)):is(<n>g,<outn(x,inn(x,n),1top(x,n))>g)
-t32:=satz10d(inn(x,n),x,1top(x,n)):not(more"n"(inn(x,n),x))
-t33:=ore1(prop4(inn(x,n)),more"n"(inn(x,n),x),t30(inn(x,n)),t32):prop4(inn(x,n))
-t34:=<1top(x,n)>ande2(lessis"n"(inn(x,n),x),[t:lessis"n"(inn(x,n),x)]prop3(inn(x,n),t),t33):prop3(inn(x,n),1top(x,n))
-t35:=symis(cx,<n>h,<outn(x,inn(x,n),1top(x,n))>h,t31(h,g,ph,pg,n)):is(<outn(x,inn(x,n),1top(x,n))>h,<n>h)
-t36:=tr3is(cx,<n>g,<outn(x,inn(x,n),1top(x,n))>g,<outn(x,inn(x,n),1top(x,n))>h,<n>h,t31,t34,t35):is(<n>g,<n>h)
-ph@t37:=fisi(1to(x),cx,g,h,[t:1to(x)]t36(t)):is"e"([t:1to(x)]cx,g,h)
-f@prop6:=some"l"([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(g)):'prop'
-x@prop7:=all"l"([t:1to(x)]cx,[f:[t:1to(x)]cx]prop6(f)):'prop'
-q@[f:[t:1to(1)]cx]
-t38:=refis(cx,<1o(1)>f):prop1(1,f,f)
-[n:1to(1)][o:not(is"e"(1to(1),n,xo(1)))]
-t39:=<th1"n.singlet"(n)>o:con
-t40:=cone(is(<ns(1,n,o)>f,<<ns(1,n,o)>f><<n>f>q),t39):is(<ns(1,n,o)>f,<<ns(1,n,o)>f><<n>f>q)
-f@t41:=andi(prop1(1,f,f),prop2(1,f,f),t38,[t:1to(1)][u:not(is"e"(1to(1),t,xo(1)))]t40(t,u)):recprop(1,f,f)
-t42:=somei([t:1to(1)]cx,[g:[t:1to(1)]cx]recprop(1,f,g),f,t41):prop6(1,f)
-q@t43:=[f:[t:1to(1)]cx]t42(f):prop7(1)
-x@[p:prop7(x)]
-xs:=<x>suc:nat
-[f:[t:1to(xs)]cx]
-f1:=left(cx,xs,x,lessisi1"n"(x,xs,satz18c(x)),f):[t:1to(x)]cx
-t44:=onei([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f1,g),[g:[t:1to(x)]cx][h:[t:1to(x)]cx][u:recprop(x,f1,g)][v:recprop(x,f1,h)]t37(f1,g,h,u,v),<f1>p):one"e"([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f1,g))
-g1:=ind([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f1,g),t44):[t:1to(x)]cx
-t45:=oneax([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f1,g),t44):recprop(x,f1,g1)
-[n:1to(xs)]
-nxs:=is"e"(1to(xs),n,xo(xs)):'prop'
-[o:not(nxs)]
-t46:=satz26a(x,inn(xs,n),t2(xs,n,o)):lessis"n"(inn(xs,n),x)
-n1:=outn(x,inn(xs,n),t46):1to(x)
-b:=<n1>g1:cx
-[o1:not(nxs)]
-t47:=isoutni(x,inn(xs,n),t46(o),inn(xs,n),t46(o1),refis(nat,inn(xs,n))):is"e"(1to(x),n1(o),n1(o1))
-t48:=isf(1to(x),cx,g1,n1(o),n1(o1),t47):is(b(o),b(o1))
-f@a:=<<xo(xs)>f><<xo(x)>g1>q:cx
-n@c:=ite"l.r"(nxs,cx,[t:nxs]a,[t:not(nxs)]b(t),[t:nxs][u:nxs]refis(cx,a),[t:not(nxs)][u:not(nxs)]t48(t,u)):cx
-[i:nxs]
-t49:=itet"l.r"(nxs,cx,[t:nxs]a,[t:not(nxs)]b(t),[t:nxs][u:nxs]refis(cx,a),[t:not(nxs)][u:not(nxs)]t48(t,u),i):is(c,a)
-o@t50:=itef"l.r"(nxs,cx,[t:nxs]a,[t:not(nxs)]b(t),[t:nxs][u:nxs]refis(cx,a),[t:not(nxs)][u:not(nxs)]t48(t,u),o):is(c,b)
-f@g2:=[t:1to(xs)]c(t):[t:1to(xs)]cx
-t51:=th3"l.imp"(is"e"(1to(xs),1o(xs),xo(xs)),is"n"(1,xs),symnotis(nat,xs,1,<x>ax3),[t:is"e"(1to(xs),1o(xs),xo(xs))]isoutne(xs,1,satz24a(xs),xs,lessisi3(xs),t)):not(is"e"(1to(xs),1o(xs),xo(xs)))
-t52:=t50(1o(xs),t51):is(c(1o(xs)),b(1o(xs),t51))
-t53:=isinoutn(xs,1,satz24a(xs)):is"n"(1,inn(xs,1o(xs)))
-t54:=isoutni(x,1,satz24a(x),inn(xs,1o(xs)),t46(1o(xs),t51),t53):is"e"(1to(x),1o(x),n1(1o(xs),t51))
-t55:=isf(1to(x),cx,g1,1o(x),n1(1o(xs),t51),t54):is(<1o(x)>g1,b(1o(xs),t51))
-t56:=tris2(cx,c(1o(xs)),<1o(x)>g1,b(1o(xs),t51),t52,t55):is(c(1o(xs)),<1o(x)>g1)
-t57:=tris(cx,c(1o(xs)),<1o(x)>g1,<1o(x)>f1,t56,t3(x,f1,g1,t45)):is(c(1o(xs)),<1o(x)>f1)
-t58:=isinoutn(x,1,satz24a(x)):is"n"(1,inn(x,1o(x)))
-t59:=isoutni(xs,1,satz24a(xs),inn(x,1o(x)),trlessis"n"(inn(x,1o(x)),x,xs,1top(x,1o(x)),lessisi1"n"(x,xs,satz18c(x))),t58):is"e"(1to(xs),1o(xs),left1to(xs,x,lessisi1"n"(x,xs,satz18c(x)),1o(x)))
-t60:=isf(1to(xs),cx,f,1o(xs),left1to(xs,x,lessisi1"n"(x,xs,satz18c(x)),1o(x)),t59):is(<1o(xs)>f,<1o(x)>f1)
-t61:=tris2(cx,c(1o(xs)),<1o(xs)>f,<1o(x)>f1,t57,t60):prop1(xs,f,g2)
-o@[i:is"e"(1to(xs),ns(xs,n,o),xo(xs))]
-t62:=isoutne(xs,<inn(xs,n)>suc,lemma275(xs,n,o),xs,lessisi3(xs),i):is"n"(<inn(xs,n)>suc,xs)
-t63:=<t62><x><inn(xs,n)>ax4:is"n"(inn(xs,n),x)
-t64:=isoutni(x,inn(xs,n),t46,x,lessisi3(x),t63):is"e"(1to(x),n1,xo(x))
-t65:=isf(1to(x),cx,g1,xo(x),n1,symis(1to(x),n1,xo(x),t64)):is(<xo(x)>g1,b)
-t66:=tris2(cx,<xo(x)>g1,c,b,t65,t50):is(<xo(x)>g1,c)
-t67:=isf(cx,cx,[t:cx]<<xo(xs)>f><t>q,<xo(x)>g1,c,t66):is(a,<<xo(xs)>f><c>q)
-t68:=isf(1to(xs),cx,f,xo(xs),ns(xs,n,o),symis(1to(xs),ns(xs,n,o),xo(xs),i)):is(<xo(xs)>f,<ns(xs,n,o)>f)
-t69:=isf(cx,cx,<c>q,<xo(xs)>f,<ns(xs,n,o)>f,t68):is(<<xo(xs)>f><c>q,<<ns(xs,n,o)>f><c>q)
-t70:=tr3is(cx,c(ns(xs,n,o)),a,<<xo(xs)>f><c>q,<<ns(xs,n,o)>f><c>q,t49(ns(xs,n,o),i),t67,t69):is(c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q)
-o@[o1:not(is"e"(1to(xs),ns(xs,n,o),xo(xs)))][i:is"e"(1to(x),n1,xo(x))]
-t71:=isoutne(x,inn(xs,n),t46,x,lessisi3(x),i):is"n"(inn(xs,n),x)
-t72:=ax2(inn(xs,n),x,t71):is"n"(<inn(xs,n)>suc,xs)
-t73:=isoutni(xs,<inn(xs,n)>suc,lemma275(xs,n,o),xs,lessisi3(xs),t72):is"e"(1to(xs),ns(xs,n,o),xo(xs))
-o1@t74:=th3"l.imp"(is"e"(1to(x),n1,xo(x)),is"e"(1to(xs),ns(xs,n,o),xo(xs)),o1,[t:is"e"(1to(x),n1,xo(x))]t73(t)):not(is"e"(1to(x),n1,xo(x)))
-t75:=isinoutn(x,inn(xs,n),t46):is"n"(inn(xs,n),inn(x,n1))
-t76:=ax2(inn(xs,n),inn(x,n1),t75):is"n"(<inn(xs,n)>suc,<inn(x,n1)>suc)
-t77:=isinoutn(xs,<inn(xs,n)>suc,lemma275(xs,n,o)):is"n"(<inn(xs,n)>suc,inn(xs,ns(xs,n,o)))
-t78:=tris1(nat,inn(xs,ns(xs,n,o)),<inn(x,n1)>suc,<inn(xs,n)>suc,t77,t76):is"n"(inn(xs,ns(xs,n,o)),<inn(x,n1)>suc)
-t79:=isoutni(x,inn(xs,ns(xs,n,o)),t46(ns(xs,n,o),o1),<inn(x,n1)>suc,lemma275(x,n1,t74),t78):is"e"(1to(x),n1(ns(xs,n,o),o1),ns(n1,t74))
-t80:=isf(1to(x),cx,g1,n1(ns(xs,n,o),o1),ns(n1,t74),t79):is(b(ns(xs,n,o),o1),<ns(n1,t74)>g1)
-t81:=isinoutn(x,<inn(x,n1)>suc,lemma275(x,n1,t74)):is"n"(<inn(x,n1)>suc,inn(x,ns(n1,t74)))
-t82:=tris(nat,<inn(xs,n)>suc,<inn(x,n1)>suc,inn(x,ns(n1,t74)),t76,t81):is"n"(<inn(xs,n)>suc,inn(x,ns(n1,t74)))
-t83:=isoutni(xs,<inn(xs,n)>suc,lemma275(xs,n,o),inn(x,ns(n1,t74)),trlessis"n"(inn(x,ns(n1,t74)),x,xs,1top(x,ns(n1,t74)),lessisi1"n"(x,xs,satz18c(x))),t82):is"e"(1to(xs),ns(xs,n,o),left1to(xs,x,lessisi1"n"(x,xs,satz18c(x)),ns(n1,t74)))
-t84:=isf(1to(xs),cx,f,ns(xs,n,o),left1to(xs,x,lessisi1"n"(x,xs,satz18c(x)),ns(n1,t74)),t83):is(<ns(xs,n,o)>f,<ns(n1,t74)>f1)
-t85:=isf(cx,cx,<b>q,<ns(xs,n,o)>f,<ns(n1,t74)>f1,t84):is(<<ns(xs,n,o)>f><b>q,<<ns(n1,t74)>f1><b>q)
-t86:=isf(cx,cx,[t:cx]<<ns(xs,n,o)>f><t>q,c,b,t50):is(<<ns(xs,n,o)>f><c>q,<<ns(xs,n,o)>f><b>q)
-t87:=tr3is(cx,c(ns(xs,n,o)),b(ns(xs,n,o),o1),<ns(n1,t74)>g1,<<ns(n1,t74)>f1><b>q,t50(ns(xs,n,o),o1),t80,t4(f1,g1,t45,n1,t74)):is(c(ns(xs,n,o)),<<ns(n1,t74)>f1><b>q)
-t88:=tris(cx,<<ns(xs,n,o)>f><c>q,<<ns(xs,n,o)>f><b>q,<<ns(n1,t74)>f1><b>q,t86,t85):is(<<ns(xs,n,o)>f><c>q,<<ns(n1,t74)>f1><b>q)
-t89:=tris2(cx,c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q,<<ns(n1,t74)>f1><b>q,t87,t88):is(c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q)
-o@t90:=th1"l.imp"(is"e"(1to(xs),ns(xs,n,o),xo(xs)),is(c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q),[t:is"e"(1to(xs),ns(xs,n,o),xo(xs))]t70(t),[t:not(is"e"(1to(xs),ns(xs,n,o),xo(xs)))]t89(t)):is(c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q)
-f@t91:=[t:1to(xs)][u:not(nxs(t))]t90(t,u):prop2(xs,f,g2)
-t92:=andi(prop1(xs,f,g2),prop2(xs,f,g2),t61,t91):recprop(xs,f,g2)
-t93:=somei([t:1to(xs)]cx,[g:[t:1to(xs)]cx]recprop(xs,f,g),g2,t92):prop6(xs,f)
-p@t94:=[f:[t:1to(xs)]cx]t93(f):prop7(xs)
-x@t95:=induction([y:nat]prop7(y),t43,[y:nat][t:prop7(y)]t94(y,t),x):prop7(x)
-[f:[t:1to(x)]cx]
-t96:=<f>t95:prop6(x,f)
-t97:=onei([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g),[g:[t:1to(x)]cx][h:[t:1to(x)]cx][u:recprop(x,f,g)][v:recprop(x,f,h)]t37(f,g,h,u,v),t96):one"e"([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g))
--8275
-f@satz275:=t97".8275"(f):one"e"([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g))
-recf:=ind([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g),satz275):[t:1to(x)]cx
-satz275a:=oneax([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g),satz275):recprop(x,f,recf)
-[n:1to(x)]
-rec:=<n>recf:cx
-f@satz275b:=t3".8275"(x,f,recf,satz275a):is(rec(1out(x)),<1out(x)>f)
-n@[o:not(is"e"(1to(x),n,xout(x)))]
-sucx:=ns".8275"(n,o):1to(x)
-satz275c:=t4".8275"(x,f,recf,satz275a,n,o):is(rec(sucx(n,o)),<<sucx(n,o)>f><rec(n)>q)
-f@[g:[t:1to(x)]cx][r:recprop(x,f,g)]
-satz275d:=t37".8275"(x,f,g,recf,r,satz275a):is"e"([t:1to(x)]cx,g,recf)
-[n:1to(x)]
-satz275e:=fise(1to(x),cx,g,recf,satz275d,n):is(<n>g,rec(n))
-x@[y:nat]
-+*8275
-y@[l:lessis"n"(y,x)][f:[t:1to(x)]cx]
-fl:=left(cx,x,y,l,f):[t:1to(y)]cx
-rf:=recf(x,f):[t:1to(x)]cx
-rfl:=left(cx,x,y,l,rf):[t:1to(y)]cx
-t98:=isinoutn(y,1,satz24a(y)):is"n"(1,inn(y,1out(y)))
-t99:=isoutni(x,1,satz24a(x),inn(y,1out(y)),trlessis"n"(inn(y,1out(y)),y,x,1top(y,1out(y)),l),t98):is"e"(1to(x),1out(x),left1to(x,y,l,1out(y)))
-t100:=isp(1to(x),[t:1to(x)]is(<t>rf,<t>f),1out(x),left1to(x,y,l,1out(y)),t3(x,f,rf,satz275a(x,f)),t99):prop1(y,fl,rfl)
-[n:1to(y)][o:not(is"e"(1to(y),n,xout(y)))]
-t100a:=th3"l.imp"(is"n"(inn(y,n),y),is"e"(1to(y),n,xout(y)),o,[t:is"n"(inn(y,n),y)]tris(1to(y),n,outn(y,inn(y,n),1top(y,n)),xout(y),isoutinn(y,n),isoutni(y,inn(y,n),1top(y,n),y,lessisi3(y),t))):not(is"n"(inn(y,n),y))
-t100b:=ore1(less"n"(inn(y,n),y),is"n"(inn(y,n),y),1top(y,n),t100a):less"n"(inn(y,n),y)
-t101:=satz16b(inn(y,n),y,x,t100b,l):less"n"(inn(y,n),x)
-t102:=ec3e31(is"n"(inn(y,n),x),more"n"(inn(y,n),x),less"n"(inn(y,n),x),satz10b(inn(y,n),x),t101):nis"n"(inn(y,n),x)
-t103:=th3"l.imp"(is"e"(1to(x),left1to(x,y,l,n),xout(x)),is"n"(inn(y,n),x),t102,[t:is"e"(1to(x),left1to(x,y,l,n),xout(x))]isoutne(x,inn(y,n),trlessis"n"(inn(y,n),y,x,1top(y,n),l),x,lessisi3(x),t)):not(is"e"(1to(x),left1to(x,y,l,n),xout(x)))
-t104:=t4(x,f,rf,satz275a(x,f),left1to(x,y,l,n),t103):is(<ns(x,left1to(x,y,l,n),t103)>rf,<<ns(x,left1to(x,y,l,n),t103)>f><<n>rfl>q)
-t105:=isinoutn(x,inn(y,n),trlessis"n"(inn(y,n),y,x,1top(y,n),l)):is"n"(inn(y,n),inn(x,left1to(x,y,l,n)))
-t106:=ax2(inn(y,n),inn(x,left1to(x,y,l,n)),t105):is"n"(<inn(y,n)>suc,<inn(x,left1to(x,y,l,n))>suc)
-t107:=isinoutn(y,<inn(y,n)>suc,lemma275(y,n,o)):is"n"(<inn(y,n)>suc,inn(y,ns(y,n,o)))
-t108:=tris1(nat,<inn(x,left1to(x,y,l,n))>suc,inn(y,ns(y,n,o)),<inn(y,n)>suc,t106,t107):is"n"(<inn(x,left1to(x,y,l,n))>suc,inn(y,ns(y,n,o)))
-t109:=isoutni(x,<inn(x,left1to(x,y,l,n))>suc,lemma275(x,left1to(x,y,l,n),t103),inn(y,ns(y,n,o)),trlessis"n"(inn(y,ns(y,n,o)),y,x,1top(y,ns(y,n,o)),l),t108):is"e"(1to(x),ns(x,left1to(x,y,l,n),t103),left1to(x,y,l,ns(y,n,o)))
-t110:=isp(1to(x),[t:1to(x)]is(<t>rf,<<t>f><<n>rfl>q),ns(x,left1to(x,y,l,n),t103),left1to(x,y,l,ns(y,n,o)),t104,t109):is(<ns(y,n,o)>rfl,<<ns(y,n,o)>fl><<n>rfl>q)
-f@t111:=[t:1to(y)][u:not(is"e"(1to(y),t,xout(y)))]t110(t,u):prop2(y,fl,rfl)
-t112:=andi(prop1(y,fl,rfl),prop2(y,fl,rfl),t100,t111):recprop(y,fl,rfl)
--8275
-y@[l:lessis"n"(y,x)][f:[t:1to(x)]cx]
-satz275f:=satz275d(y,fl".8275"(l,f),rfl".8275"(l,f),t112".8275"(l,f)):is"e"([t:1to(y)]cx,left(cx,x,y,l,recf(x,f)),recf(y,left(cx,x,y,l,f)))
-x@[f:[t:1to(pl"n"(x,1))]cx]
-+8276
-xs:=<x>suc:nat
-x1:=pl"n"(x,1):nat
-t1:=lessisi1"n"(x,x1,satz18a(x,1)):lessis"n"(x,x1)
-t2:=lessisi1"n"(x,xs,satz18c(x)):lessis"n"(x,xs)
-t3:=lessisi2"n"(xs,x1,satz4e(x)):lessis"n"(xs,x1)
-fx:=left(cx,x1,x,t1,f):[t:1to(x)]cx
-f1:=left(cx,x1,xs,t3,f):[t:1to(xs)]cx
-f1x:=f1"c.8275"(x,t95"c.8275"(x),f1):[t:1to(x)]cx
-g1:=g2"c.8275"(x,t95"c.8275"(x),f1):[t:1to(xs)]cx
-g1x:=g1"c.8275"(x,t95"c.8275"(x),f1):[t:1to(x)]cx
-g:=left(cx,x1,xs,t3,recf(x1,f)):[t:1to(xs)]cx
-t4:=t49"c.8275"(x,t95"c.8275"(x),f1,xout(xs),refis(1to(xs),xout(xs))):is(<xout(xs)>g1,<<xout(xs)>f1><<xout(x)>g1x>q)
-t5:=satz275d(xs,f1,g1,t92"c.8275"(x,t95"c.8275"(x),f1)):is"e"([t:1to(xs)]cx,g1,recf(xs,f1))
-t6:=satz275f(x1,xs,t3,f):is"e"([t:1to(xs)]cx,g,recf(xs,f1))
-t7:=tris2([t:1to(xs)]cx,g,g1,recf(xs,f1),t6,t5):is"e"([t:1to(xs)]cx,g,g1)
-t8:=fise(1to(xs),cx,g,g1,t7,xout(xs)):is(<xout(xs)>g,<xout(xs)>g1)
-t9:=tris(cx,<xout(xs)>g,<xout(xs)>g1,<<xout(xs)>f1><<xout(x)>g1x>q,t8,t4):is(<xout(xs)>g,<<xout(xs)>f1><<xout(x)>g1x>q)
-[n:1to(x)]
-t10:=isinoutn(xs,inn(x,n),trlessis"n"(inn(x,n),x,xs,1top(x,n),t2)):is"n"(inn(x,n),inn(xs,left1to(xs,x,t2,n)))
-t11:=isoutni(x1,inn(x,n),trlessis"n"(inn(x,n),x,x1,1top(x,n),t1),inn(xs,left1to(xs,x,t2,n)),trlessis"n"(inn(xs,left1to(xs,x,t2,n)),xs,x1,1top(xs,left1to(xs,x,t2,n)),t3),t10):is"e"(1to(x1),left1to(x1,x,t1,n),left1to(x1,xs,t3,left1to(xs,x,t2,n)))
-t12:=isf(1to(x1),cx,f,left1to(x1,x,t1,n),left1to(x1,xs,t3,left1to(xs,x,t2,n)),t11):is(<n>fx,<n>f1x)
-f@t13:=fisi(1to(x),cx,fx,f1x,[t:1to(x)]t12(t)):is"e"([t:1to(x)]cx,fx,f1x)
-t14:=isf([t:1to(x)]cx,[t:1to(x)]cx,[u:[t:1to(x)]cx]recf(x,u),fx,f1x,t13):is"e"([t:1to(x)]cx,recf(x,fx),recf(x,f1x))
-t15:=satz275d(x,f1x,g1x,t45"c.8275"(x,t95"c.8275"(x),f1)):is"e"([t:1to(x)]cx,g1x,recf(x,f1x))
-t16:=tris2([t:1to(x)]cx,g1x,recf(x,fx),recf(x,f1x),t15,t14):is"e"([t:1to(x)]cx,g1x,recf(x,fx))
-t17:=fise(1to(x),cx,g1x,recf(x,fx),t16,xout(x)):is(<xout(x)>g1x,<xout(x)>recf(x,fx))
-t18:=isinoutn(xs,xs,lessisi3(xs)):is"n"(xs,inn(xs,xout(xs)))
-t19:=tris(nat,x1,xs,inn(xs,xout(xs)),satz4a(x),t18):is"n"(x1,inn(xs,xout(xs)))
-t20:=isoutni(x1,x1,lessisi3(x1),inn(xs,xout(xs)),trlessis"n"(inn(xs,xout(xs)),xs,x1,1top(xs,xout(xs)),t3),t19):is"e"(1to(x1),xout(x1),left1to(x1,xs,t3,xout(xs)))
-t21:=isp1(1to(x1),[t:1to(x1)]is(<t>recf(x1,f),<<t>f><<xout(x)>g1x>q),left1to(x1,xs,t3,xout(xs)),xout(x1),t9,t20):is(<xout(x1)>recf(x1,f),<<xout(x1)>f><<xout(x)>g1x>q)
-t22:=isf(cx,cx,[t:cx]<<xout(x1)>f><t>q,<xout(x)>g1x,<xout(x)>recf(x,fx),t17):is(<<xout(x1)>f><<xout(x)>g1x>q,<<xout(x1)>f><<xout(x)>recf(x,fx)>q)
--8276
-satz276:=tris(cx,<xout(pl"n"(x,1))>recf(pl"n"(x,1),f),<<xout(pl"n"(x,1))>f><<xout(x)>g1x".8276">q,<<xout(pl"n"(x,1))>f><<xout(x)>recf(x,fx".8276")>q,t21".8276",t22".8276"):is(<xout(pl"n"(x,1))>recf(pl"n"(x,1),f),<<xout(pl"n"(x,1))>f><<xout(x)>recf(x,left(cx,pl"n"(x,1),x,lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)),f))>q)
-x@[f:[u:1to(x)]cx]
-smpr:=rec(x,f,xout(x)):cx
-@[x:nat][f:[u:1to(x)]cx]
-sum:=smpr([t:cx][u:cx]pl(t,u),x,f):cx
-prod:=smpr([t:cx][u:cx]ts(t,u),x,f):cx
-q@[f:[u:1to(1)]cx]
-+8277
-t1:=isoutni(1,1,satz24a(1),1,lessisi3(1),refis(nat,1)):is"e"(1to(1),1out(1),xout(1))
--8277
-satz277:=isp(1to(1),[t:1to(1)]is(rec(1,f,t),<t>f),1out(1),xout(1),satz275b(1,f),t1".8277"):is(smpr(1,f),<xout(1)>f)
-q@[x:nat][f:[u:1to(pl"n"(x,1))]cx]
-satz278:=satz276(x,f):is(smpr(pl"n"(x,1),f),<<xout(pl"n"(x,1))>f><smpr(x,left(cx,pl"n"(x,1),x,lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)),f))>q)
-x@[f:[u:1to(x)]cx][y:nat][i:is"n"(y,x)]
-+v8
-t1:=lessisi2"n"(y,x,i):lessis"n"(y,x)
-f0:=left(cx,x,y,t1,f):[t:1to(y)]cx
-t2:=fise(1to(y),cx,left(cx,x,y,t1,recf(x,f)),recf(y,f0),satz275f(x,y,t1,f),xout(y)):is(<left1to(x,y,t1,xout(y))>recf(x,f),smpr(y,f0))
-t3:=tris1(nat,inn(y,xout(y)),x,y,isinoutn(y,y,lessisi3(y)),i):is"n"(inn(y,xout(y)),x)
-t4:=isoutni(x,inn(y,xout(y)),trlessis"n"(inn(y,xout(y)),y,x,1top(y,xout(y)),t1),x,lessisi3(x),t3):is"e"(1to(x),left1to(x,y,t1,xout(y)),xout(x))
-t5:=isf(1to(x),cx,recf(x,f),left1to(x,y,t1,xout(y)),xout(x),t4):is(<left1to(x,y,t1,xout(y))>recf(x,f),smpr(x,f))
--v8
-issmpr:=tris1(cx,smpr(y,f0".v8"),smpr(x,f),<left1to(x,y,t1".v8",xout(y))>recf(x,f),t2".v8",t5".v8"):is(smpr(y,left(cx,x,y,lessisi2"n"(y,x,i),f)),smpr(x,f))
-@[z:complex][x:nat]
-+8279
-xr:=rlofnt(x):real
-prop1:=is(sum(x,[t:1to(x)]z),ts(z,pli(xr,0))):'prop'
-z@t1:=satz277([t:cx][u:cx]pl(t,u),[t:1to(1)]z):is(sum(1,[t:1to(1)]z),z)
-t2:=tris(cx,sum(1,[t:1to(1)]z),z,ts(z,1c),t1,satz222a(z)):prop1(1)
-x@[p:prop1(x)]
-t3:=satz278([t:cx][u:cx]pl(t,u),x,[t:1to(pl"n"(x,1))]z):is(sum(pl"n"(x,1),[t:1to(pl"n"(x,1))]z),pl(sum(x,[t:1to(x)]z),z))
-t4:=ispl12(sum(x,[t:1to(x)]z),ts(z,pli(xr,0)),z,ts(z,1c),p,satz222a(z)):is(pl(sum(x,[t:1to(x)]z),z),pl(ts(z,pli(xr,0)),ts(z,1c)))
-t5:=distpt2(z,pli(xr,0),1c):is(pl(ts(z,pli(xr,0)),ts(z,1c)),ts(z,pl(pli(xr,0),1c)))
-t6:=plis12a(xr,0,1rl,0):is(pl(pli(xr,0),1c),pli(pl"r"(xr,1rl),pl"r"(0,0)))
-t7:=isrecx12(pl"r"(xr,1rl),rlofnt(pl"n"(x,1)),pl"r"(0,0),0,satzr155b(x,1),pl01"r"(0,0,refis(real,0))):is(pli(pl"r"(xr,1rl),pl"r"(0,0)),pli(rlofnt(pl"n"(x,1)),0))
-t8:=tris(cx,pl(pli(xr,0),1c),pli(pl"r"(xr,1rl),pl"r"(0,0)),pli(rlofnt(pl"n"(x,1)),0),t6,t7):is(pl(pli(xr,0),1c),pli(rlofnt(pl"n"(x,1)),0))
-t9:=ists2(pl(pli(xr,0),1c),pli(rlofnt(pl"n"(x,1)),0),z,t8):is(ts(z,pl(pli(xr,0),1c)),ts(z,pli(rlofnt(pl"n"(x,1)),0)))
-t10:=tr4is(cx,sum(pl"n"(x,1),[t:1to(pl"n"(x,1))]z),pl(sum(x,[t:1to(x)]z),z),pl(ts(z,pli(xr,0)),ts(z,1c)),ts(z,pl(pli(xr,0),1c)),ts(z,pli(rlofnt(pl"n"(x,1)),0)),t3,t4,t5,t9):prop1(pl"n"(x,1))
-t11:=isp(nat,[t:nat]prop1(t),pl"n"(x,1),<x>suc,t10,satz4a(x)):prop1(<x>suc)
--8279
-satz279:=induction([t:nat]prop1".8279"(t),t2".8279",[u:nat][t:prop1".8279"(u)]t11".8279"(u,t),x):is(sum(x,[t:1to(x)]z),ts(z,pli(rlofnt(x),0)))
-q@[f:[t:1to(2)]cx]
-+8280
-t1:=lessisi1"n"(1,2,satz18a(1,1)):lessis"n"(1,2)
-f1:=left(cx,2,1,t1,f):[t:1to(1)]cx
-t2:=satz278(q,1,f):is(smpr(2,f),<<xout(2)>f><smpr(1,f1)>q)
-t3:=satz277(q,f1):is(smpr(1,f1),<xout(1)>f1)
-t4:=isinoutn(1,1,lessisi3(1)):is"n"(1,inn(1,xout(1)))
-t5:=isoutni(2,1,satz24a(2),inn(1,xout(1)),trlessis"n"(inn(1,xout(1)),1,2,1top(1,xout(1)),t1),t4):is"e"(1to(2),1out(2),left1to(2,1,t1,xout(1)))
-t6:=isf(1to(2),cx,f,1out(2),left1to(2,1,t1,xout(1)),t5):is(<1out(2)>f,<xout(1)>f1)
-t7:=tris2(cx,smpr(1,f1),<1out(2)>f,<xout(1)>f1,t3,t6):is(smpr(1,f1),<1out(2)>f)
-t8:=isf(cx,cx,[t:cx]<<xout(2)>f><t>q,smpr(1,f1),<1out(2)>f,t7):is(<<xout(2)>f><smpr(1,f1)>q,<<xout(2)>f><<1out(2)>f>q)
--8280
-satz280:=tris(cx,smpr(2,f),<<xout(2)>f><smpr(1,f1".8280")>q,<<xout(2)>f><<1out(2)>f>q,t2".8280",t8".8280"):is(smpr(2,f),<<xout(2)>f><<1out(2)>f>q)
-q@assoc:=[x:cx][y:cx][z:cx]is(<z><<y><x>q>q,<<z><y>q><x>q):'prop'
-@assocp1:=[x:cx][y:cx][z:cx]asspl1(x,y,z):assoc([x:cx][y:cx]pl(x,y))
-assocts:=[x:cx][y:cx][z:cx]assts1(x,y,z):assoc([x:cx][y:cx]ts(x,y))
-q@[a:assoc][z:cx][u:cx][v:cx]
-assq1:=<v><u><z>a:is(<v><<u><z>q>q,<<v><u>q><z>q)
-assq2:=symis(cx,<v><<u><z>q>q,<<v><u>q><z>q,assq1):is(<<v><u>q><z>q,<v><<u><z>q>q)
-q@[a:assoc(q)][x:nat][y:nat][f:[t:1to(pl"n"(x,y))]cx]
-+8281
-y@t1:=lessisi1"n"(x,pl"n"(x,y),satz18a(x,y)):lessis"n"(x,pl"n"(x,y))
-f@f1:=left(cx,pl"n"(x,y),x,t1,f):[t:1to(x)]cx
-f2:=right(cx,x,y,f):[t:1to(y)]cx
-prop1:=is(smpr(pl"n"(x,y),f),<smpr(y,f2)><smpr(x,f1)>q):'prop'
-y@prop2:=all"l"([t:1to(pl"n"(x,y))]cx,[u:[t:1to(pl"n"(x,y))]cx]prop1(u)):'prop'
-x@[f0:[t:1to(pl"n"(x,1))]cx]
-t2:=satz278(q,x,f0):is(smpr(pl"n"(x,1),f0),<<xout(pl"n"(x,1))>f0><smpr(x,f1(1,f0))>q)
-t3:=satz277(q,f2(1,f0)):is(smpr(1,f2(1,f0)),<xout(1)>f2(1,f0))
-t4:=isinoutn(1,1,lessisi3(1)):is"n"(1,inn(1,xout(1)))
-t5:=ispl2"n"(1,inn(1,xout(1)),x,t4):is"n"(pl"n"(x,1),pl"n"(x,inn(1,xout(1))))
-t6:=isoutni(pl"n"(x,1),pl"n"(x,1),lessisi3(pl"n"(x,1)),pl"n"(x,inn(1,xout(1))),satz19o(inn(1,xout(1)),1,x,1top(1,xout(1))),t5):is"e"(1to(pl"n"(x,1)),xout(pl"n"(x,1)),right1to(x,1,xout(1)))
-t7:=isf(1to(pl"n"(x,1)),cx,f0,xout(pl"n"(x,1)),right1to(x,1,xout(1)),t6):is(<xout(pl"n"(x,1))>f0,<xout(1)>f2(1,f0))
-t8:=tris2(cx,<xout(pl"n"(x,1))>f0,smpr(1,f2(1,f0)),<xout(1)>f2(1,f0),t7,t3):is(<xout(pl"n"(x,1))>f0,smpr(1,f2(1,f0)))
-t9:=isf(cx,cx,<smpr(x,f1(1,f0))>q,<xout(pl"n"(x,1))>f0,smpr(1,f2(1,f0)),t8):is(<<xout(pl"n"(x,1))>f0><smpr(x,f1(1,f0))>q,<smpr(1,f2(1,f0))><smpr(x,f1(1,f0))>q)
-t10:=tris(cx,smpr(pl"n"(x,1),f0),<<xout(pl"n"(x,1))>f0><smpr(x,f1(1,f0))>q,<smpr(1,f2(1,f0))><smpr(x,f1(1,f0))>q,t2,t9):prop1(1,f0)
-x@t11:=[u:[t:1to(pl"n"(x,1))]cx]t10(u):prop2(1)
-y@yp1:=pl"n"(y,1):nat
-xpy:=pl"n"(x,y):nat
-xpy1:=pl"n"(x,yp1):nat
-xyp1:=pl"n"(xpy,1):nat
-t12:=lessisi2"n"(xyp1,xpy1,asspl1"n"(x,y,1)):lessis"n"(xyp1,xpy1)
-[p:prop2(y)][f:[t:1to(xpy1)]cx]
-t13:=isinoutn(xyp1,xyp1,lessisi3(xyp1)):is"n"(xyp1,inn(xyp1,xout(xyp1)))
-t14:=tris(nat,xpy1,xyp1,inn(xyp1,xout(xyp1)),asspl2"n"(x,y,1),t13):is"n"(xpy1,inn(xyp1,xout(xyp1)))
-t15:=isoutni(xpy1,xpy1,lessisi3(xpy1),inn(xyp1,xout(xyp1)),trlessis"n"(inn(xyp1,xout(xyp1)),xyp1,xpy1,1top(xyp1,xout(xyp1)),t12),t14):is"e"(1to(xpy1),xout(xpy1),left1to(xpy1,xyp1,t12,xout(xyp1)))
-t16:=isf(1to(xpy1),cx,recf(xpy1,f),xout(xpy1),left1to(xpy1,xyp1,t12,xout(xyp1)),t15):is(smpr(xpy1,f),<xout(xyp1)>left(cx,xpy1,xyp1,t12,recf(xpy1,f)))
-fr:=left(cx,xpy1,xyp1,t12,f):[t:1to(xyp1)]cx
-t17:=satz275f(xpy1,xyp1,t12,f):is"e"([t:1to(xyp1)]cx,left(cx,xpy1,xyp1,t12,recf(xpy1,f)),recf(xyp1,fr))
-t18:=fise(1to(xyp1),cx,left(cx,xpy1,xyp1,t12,recf(xpy1,f)),recf(xyp1,fr),t17,xout(xyp1)):is(<xout(xyp1)>left(cx,xpy1,xyp1,t12,recf(xpy1,f)),smpr(xyp1,fr))
-t19:=lessisi1"n"(xpy,xyp1,satz18a(xpy,1)):lessis"n"(xpy,xyp1)
-frr:=left(cx,xyp1,xpy,t19,fr):[t:1to(xpy)]cx
-t20:=satz278(xpy,fr):is(smpr(xyp1,fr),<<xout(xyp1)>fr><smpr(xpy,frr)>q)
-t21:=isf(cx,cx,[u:cx]<<xout(xyp1)>fr><u>q,smpr(xpy,frr),<smpr(y,f2(frr))><smpr(x,f1(frr))>q,<frr>p):is(<<xout(xyp1)>fr><smpr(xpy,frr)>q,<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q)
-t22:=assq1(a,smpr(x,f1(frr)),smpr(y,f2(frr)),<xout(xyp1)>fr):is(<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q,<<<xout(xyp1)>fr><smpr(y,f2(frr))>q><smpr(x,f1(frr))>q)
-t23:=lessisi1"n"(y,yp1,satz18a(y,1)):lessis"n"(y,yp1)
-fy:=left(cx,yp1,y,t23,f2(yp1,f)):[t:1to(y)]cx
-t24:=satz278(y,f2(yp1,f)):is(smpr(yp1,f2(yp1,f)),<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q)
-t25:=isinoutn(yp1,yp1,lessisi3(yp1)):is"n"(yp1,inn(yp1,xout(yp1)))
-t26:=ispl2"n"(yp1,inn(yp1,xout(yp1)),x,t25):is"n"(xpy1,pl"n"(x,inn(yp1,xout(yp1))))
-t27:=tris1(nat,inn(xyp1,xout(xyp1)),pl"n"(x,inn(yp1,xout(yp1))),xpy1,t14,t26):is"n"(inn(xyp1,xout(xyp1)),pl"n"(x,inn(yp1,xout(yp1))))
-t28:=isoutni(xpy1,inn(xyp1,xout(xyp1)),trlessis"n"(inn(xyp1,xout(xyp1)),xyp1,xpy1,1top(xyp1,xout(xyp1)),t12),pl"n"(x,inn(yp1,xout(yp1))),satz19o(inn(yp1,xout(yp1)),yp1,x,1top(yp1,xout(yp1))),t27):is"e"(1to(xpy1),left1to(xpy1,xyp1,t12,xout(xyp1)),right1to(x,yp1,xout(yp1)))
-t29:=isf(1to(xpy1),cx,f,left1to(xpy1,xyp1,t12,xout(xyp1)),right1to(x,yp1,xout(yp1)),t28):is(<xout(xyp1)>fr,<xout(yp1)>f2(yp1,f))
-t30:=isf(cx,cx,<smpr(y,f2(frr))>q,<xout(xyp1)>fr,<xout(yp1)>f2(yp1,f),t29):is(<<xout(xyp1)>fr><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,f2(frr))>q)
-[n:1to(y)]
-n0:=inn(y,n):nat
-nyp1:=left1to(yp1,y,t23,n):1to(yp1)
-t31:=isinoutn(yp1,n0,trlessis"n"(n0,y,yp1,1top(y,n),t23)):is"n"(n0,inn(yp1,nyp1))
-t32:=ispl2"n"(n0,inn(yp1,nyp1),x,t31):is"n"(pl"n"(x,n0),pl"n"(x,inn(yp1,nyp1)))
-nxpy:=right1to(x,y,n):1to(xpy)
-nxyp1:=left1to(xyp1,xpy,t19,nxpy):1to(xyp1)
-t33:=isinoutn(xyp1,inn(xpy,nxpy),trlessis"n"(inn(xpy,nxpy),xpy,xyp1,1top(xpy,nxpy),t19)):is"n"(inn(xpy,nxpy),inn(xyp1,nxyp1))
-t34:=isinoutn(xpy,pl"n"(x,n0),satz19o(n0,y,x,1top(y,n))):is"n"(pl"n"(x,n0),inn(xpy,nxpy))
-t35:=tris(nat,pl"n"(x,n0),inn(xpy,nxpy),inn(xyp1,nxyp1),t34,t33):is"n"(pl"n"(x,n0),inn(xyp1,nxyp1))
-t36:=tris1(nat,pl"n"(x,inn(yp1,nyp1)),inn(xyp1,nxyp1),pl"n"(x,n0),t32,t35):is"n"(pl"n"(x,inn(yp1,nyp1)),inn(xyp1,nxyp1))
-t37:=isoutni(xpy1,pl"n"(x,inn(yp1,nyp1)),satz19o(inn(yp1,nyp1),yp1,x,1top(yp1,nyp1)),inn(xyp1,nxyp1),trlessis"n"(inn(xyp1,nxyp1),xyp1,xpy1,1top(xyp1,nxyp1),t12),t36):is"e"(1to(xpy1),right1to(x,yp1,nyp1),left1to(xpy1,xyp1,t12,nxyp1))
-t38:=isf(1to(xpy1),cx,f,right1to(x,yp1,nyp1),left1to(xpy1,xyp1,t12,nxyp1),t37):is(<n>fy,<n>f2(frr))
-f@t39:=fisi(1to(y),cx,fy,f2(frr),[u:1to(y)]t38(u)):is"e"([u:1to(y)]cx,fy,f2(frr))
-t40:=isf([u:1to(y)]cx,cx,[t:[u:1to(y)]cx]smpr(y,t),fy,f2(frr),t39):is(smpr(y,fy),smpr(y,f2(frr)))
-t41:=isf(cx,cx,[t:cx]<<xout(yp1)>f2(yp1,f)><t>q,smpr(y,f2(frr)),smpr(y,fy),symis(cx,smpr(y,fy),smpr(y,f2(frr)),t40)):is(<<xout(yp1)>f2(yp1,f)><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q)
-t41a:=tris(cx,<<xout(xyp1)>fr><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q,t30,t41):is(<<xout(xyp1)>fr><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q)
-t42:=tris2(cx,<<xout(xyp1)>fr><smpr(y,f2(frr))>q,smpr(yp1,f2(yp1,f)),<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q,t41a,t24):is(<<xout(xyp1)>fr><smpr(y,f2(frr))>q,smpr(yp1,f2(yp1,f)))
-t43:=isf(cx,cx,<smpr(x,f1(frr))>q,<<xout(xyp1)>fr><smpr(y,f2(frr))>q,smpr(yp1,f2(yp1,f)),t42):is(<<<xout(xyp1)>fr><smpr(y,f2(frr))>q><smpr(x,f1(frr))>q,<smpr(yp1,f2(yp1,f))><smpr(x,f1(frr))>q)
-[m:1to(x)]
-m0:=inn(x,m):nat
-mxpy:=left1to(xpy,x,t1,m):1to(xpy)
-mxyp1:=left1to(xyp1,xpy,t19,mxpy):1to(xyp1)
-t44:=isinoutn(xyp1,inn(xpy,mxpy),trlessis"n"(inn(xpy,mxpy),xpy,xyp1,1top(xpy,mxpy),t19)):is"n"(inn(xpy,mxpy),inn(xyp1,mxyp1))
-t45:=isinoutn(xpy,m0,trlessis"n"(m0,x,xpy,1top(x,m),t1)):is"n"(m0,inn(xpy,mxpy))
-t46:=tris(nat,m0,inn(xpy,mxpy),inn(xyp1,mxyp1),t45,t44):is"n"(m0,inn(xyp1,mxyp1))
-t47:=isoutni(xpy1,m0,trlessis"n"(m0,x,xpy1,1top(x,m),t1(yp1)),inn(xyp1,mxyp1),trlessis"n"(inn(xyp1,mxyp1),xyp1,xpy1,1top(xyp1,mxyp1),t12),t46):is"e"(1to(xpy1),left1to(xpy1,x,t1(yp1),m),left1to(xpy1,xyp1,t12,mxyp1))
-t48:=isf(1to(xpy1),cx,f,left1to(xpy1,x,t1(yp1),m),left1to(xpy1,xyp1,t12,mxyp1),t47):is(<m>f1(x,yp1,f),<m>f1(x,y,frr))
-f@t49:=fisi(1to(x),cx,f1(x,yp1,f),f1(x,y,frr),[u:1to(x)]t48(u)):is"e"([u:1to(x)]cx,f1(x,yp1,f),f1(x,y,frr))
-t50:=isf([u:1to(x)]cx,cx,[t:[u:1to(x)]cx]smpr(x,t),f1(yp1,f),f1(frr),t49):is(smpr(x,f1(yp1,f)),smpr(x,f1(frr)))
-t51:=isf(cx,cx,[t:cx]<smpr(yp1,f2(yp1,f))><t>q,smpr(x,f1(frr)),smpr(x,f1(yp1,f)),symis(cx,smpr(x,f1(yp1,f)),smpr(x,f1(frr)),t50)):is(<smpr(yp1,f2(yp1,f))><smpr(x,f1(frr))>q,<smpr(yp1,f2(yp1,f))><smpr(x,f1(yp1,f))>q)
-t52:=tr4is(cx,smpr(xpy1,f),<xout(xyp1)>left(cx,xpy1,xyp1,t12,recf(xpy1,f)),smpr(xyp1,fr),<<xout(xyp1)>fr><smpr(xpy,frr)>q,<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q,t16,t18,t20,t21):is(smpr(xpy1,f),<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q)
-t53:=tr4is(cx,smpr(xpy1,f),<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q,<<<xout(xyp1)>fr><smpr(y,f2(frr))>q><smpr(x,f1(frr))>q,<smpr(yp1,f2(yp1,f))><smpr(x,f1(frr))>q,<smpr(yp1,f2(yp1,f))><smpr(x,f1(yp1,f))>q,t52,t22,t43,t51):prop1(yp1,f)
-p@t54:=[u:[t:1to(xpy1)]cx]t53(u):prop2(yp1)
-t55:=isp(nat,[t:nat]prop2(t),yp1,<y>suc,t54,satz4a(y)):prop2(<y>suc)
-y@t56:=induction([t:nat]prop2(t),t11,[z:nat][t:prop2(z)]t55(z,t),y):prop2(y)
--8281
-satz281:=<f>t56".8281":is(smpr(pl"n"(x,y),f),<smpr(y,right(cx,x,y,f))><smpr(x,left(cx,pl"n"(x,y),x,lessisi1"n"(x,pl"n"(x,y),satz18a(x,y)),f))>q)
-q@commut:=[x:cx][y:cx]is(<y><x>q,<x><y>q):'prop'
-@commutpl:=[x:cx][y:cx]compl(x,y):commut([x:cx][y:cx]pl(x,y))
-commutts:=[x:cx][y:cx]comts(x,y):commut([x:cx][y:cx]ts(x,y))
-q@[c:commut][z:cx][u:cx]
-comq:=<u><z>c:is(<u><z>q,<z><u>q)
-a@[c:commut(q)][x:nat][f:[t:1to(x)]cx][g:[t:1to(x)]cx]
-+8282
-prop1:=is(smpr(x,[t:1to(x)]<<t>g><<t>f>q),<smpr(x,g)><smpr(x,f)>q):'prop'
-x@prop2:=all"l"([t:1to(x)]cx,[u:[t:1to(x)]cx]all"l"([t:1to(x)]cx,[v:[t:1to(x)]cx]prop1(u,v))):'prop'
-c@[f0:[t:1to(1)]cx][g0:[t:1to(1)]cx]
-t1:=satz277([t:1to(1)]<<t>g0><<t>f0>q):is(smpr(1,[t:1to(1)]<<t>g0><<t>f0>q),<<xout(1)>g0><<xout(1)>f0>q)
-t2:=isf(cx,cx,<smpr(1,f0)>q,smpr(1,g0),<xout(1)>g0,satz277(g0)):is(<smpr(1,g0)><smpr(1,f0)>q,<<xout(1)>g0><smpr(1,f0)>q)
-t3:=isf(cx,cx,[t:cx]<<xout(1)>g0><t>q,smpr(1,f0),<xout(1)>f0,satz277(f0)):is(<<xout(1)>g0><smpr(1,f0)>q,<<xout(1)>g0><<xout(1)>f0>q)
-t4:=tris(cx,<smpr(1,g0)><smpr(1,f0)>q,<<xout(1)>g0><smpr(1,f0)>q,<<xout(1)>g0><<xout(1)>f0>q,t2,t3):is(<smpr(1,g0)><smpr(1,f0)>q,<<xout(1)>g0><<xout(1)>f0>q)
-t5:=tris2(cx,smpr(1,[t:1to(1)]<<t>g0><<t>f0>q),<smpr(1,g0)><smpr(1,f0)>q,<<xout(1)>g0><<xout(1)>f0>q,t1,t4):prop1(1,f0,g0)
-c@t6:=[u:[t:1to(1)]cx][v:[t:1to(1)]cx]t5(u,v):prop2(1)
-x@xp1:=pl"n"(x,1):nat
-[p:prop2(x)][f:[t:1to(xp1)]cx][g:[t:1to(xp1)]cx]
-c@[u:cx][v:cx][w:cx][z:cx]
-t7:=assq2(a,<v><u>q,w,z):is(<<z><w>q><<v><u>q>q,<z><<w><<v><u>q>q>q)
-t8:=comq(c,<v><u>q,w):is(<w><<v><u>q>q,<<v><u>q><w>q)
-t9:=assq2(a,w,u,v):is(<<v><u>q><w>q,<v><<u><w>q>q)
-t10:=tris(cx,<w><<v><u>q>q,<<v><u>q><w>q,<v><<u><w>q>q,t8,t9):is(<w><<v><u>q>q,<v><<u><w>q>q)
-t11:=isf(cx,cx,[t:cx]<z><t>q,<w><<v><u>q>q,<v><<u><w>q>q,t10):is(<z><<w><<v><u>q>q>q,<z><<v><<u><w>q>q>q)
-t12:=assq1(a,<u><w>q,v,z):is(<z><<v><<u><w>q>q>q,<<z><v>q><<u><w>q>q)
-t13:=comq(c,w,u):is(<u><w>q,<w><u>q)
-t14:=isf(cx,cx,[t:cx]<<z><v>q><t>q,<u><w>q,<w><u>q,t13):is(<<z><v>q><<u><w>q>q,<<z><v>q><<w><u>q>q)
-t15:=tr4is(cx,<<z><w>q><<v><u>q>q,<z><<w><<v><u>q>q>q,<z><<v><<u><w>q>q>q,<<z><v>q><<u><w>q>q,<<z><v>q><<w><u>q>q,t7,t11,t12,t14):is(<<z><w>q><<v><u>q>q,<<z><v>q><<w><u>q>q)
-g@t16:=lessisi1"n"(x,xp1,satz18a(x,1)):lessis"n"(x,xp1)
-sfx:=smpr(x,left(cx,xp1,x,t16,f)):cx
-sgx:=smpr(x,left(cx,xp1,x,t16,g)):cx
-h:=[t:1to(xp1)]<<t>g><<t>f>q:[t:1to(xp1)]cx
-shx:=smpr(x,left(cx,xp1,x,t16,h)):cx
-t17:=satz278(x,h):is(smpr(xp1,h),<<<xout(xp1)>g><<xout(xp1)>f>q><shx>q)
-t18:=<left(cx,xp1,x,t16,g)><left(cx,xp1,x,t16,f)>p:is(shx,<sgx><sfx>q)
-t19:=isf(cx,cx,[t:cx]<<<xout(xp1)>g><<xout(xp1)>f>q><t>q,shx,<sgx><sfx>q,t18):is(<<<xout(xp1)>g><<xout(xp1)>f>q><shx>q,<<<xout(xp1)>g><<xout(xp1)>f>q><<sgx><sfx>q>q)
-t20:=t15(sfx,sgx,<xout(xp1)>f,<xout(xp1)>g):is(<<<xout(xp1)>g><<xout(xp1)>f>q><<sgx><sfx>q>q,<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q)
-t21:=symis(cx,smpr(xp1,f),<<xout(xp1)>f><sfx>q,satz278(x,f)):is(<<xout(xp1)>f><sfx>q,smpr(xp1,f))
-t22:=isf(cx,cx,[t:cx]<<<xout(xp1)>g><sgx>q><t>q,<<xout(xp1)>f><sfx>q,smpr(xp1,f),t21):is(<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q,<<<xout(xp1)>g><sgx>q><smpr(xp1,f)>q)
-t23:=symis(cx,smpr(xp1,g),<<xout(xp1)>g><sgx>q,satz278(x,g)):is(<<xout(xp1)>g><sgx>q,smpr(xp1,g))
-t24:=isf(cx,cx,<smpr(xp1,f)>q,<<xout(xp1)>g><sgx>q,smpr(xp1,g),t23):is(<<<xout(xp1)>g><sgx>q><smpr(xp1,f)>q,<smpr(xp1,g)><smpr(xp1,f)>q)
-t25:=tr3is(cx,smpr(xp1,h),<<<xout(xp1)>g><<xout(xp1)>f>q><shx>q,<<<xout(xp1)>g><<xout(xp1)>f>q><<sgx><sfx>q>q,<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q,t17,t19,t20):is(smpr(xp1,h),<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q)
-t26:=tr3is(cx,smpr(xp1,h),<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q,<<<xout(xp1)>g><sgx>q><smpr(xp1,f)>q,<smpr(xp1,g)><smpr(xp1,f)>q,t25,t22,t24):prop1(xp1,f,g)
-p@t27:=[u:[t:1to(xp1)]cx][v:[t:1to(xp1)]cx]t26(u,v):prop2(xp1)
-t28:=isp(nat,[t:nat]prop2(t),xp1,<x>suc,t27,satz4a(x)):prop2(<x>suc)
-x@t29:=induction([t:nat]prop2(t),t6,[y:nat][t:prop2(y)]t28(y,t),x):prop2(x)
--8282
-satz282:=<g><f>t29".8282":is(smpr(x,[t:1to(x)]<<t>g><<t>f>q),<smpr(x,g)><smpr(x,f)>q)
-x@[s:[t:1to(x)]1to(x)][b:bijective(1to(x),1to(x),s)][f:[t:1to(x)]cx]
-+8283
-s@[f:[t:1to(x)]cx]
-g:=[t:1to(x)]<<t>s>f:[t:1to(x)]cx
-prop1:=is(smpr(x,g),smpr(x,f)):'prop'
-x@prop2:=all"l"([t:1to(x)]1to(x),[u:[t:1to(x)]1to(x)]all"l"([t:1to(x)]cx,[v:[t:1to(x)]cx]imp(bijective(1to(x),1to(x),u),prop1(u,v)))):'prop'
-c@[s:[t:1to(1)]1to(1)][f:[t:1to(1)]cx]
-t1:=tris2(1to(1),<xout(1)>s,xout(1),1o"n",th1"n.singlet"(<xout(1)>s),th1"n.singlet"(xout(1))):is"e"(1to(1),<xout(1)>s,xout(1))
-t2:=satz277(g(1,s,f)):is(smpr(1,g(1,s,f)),<xout(1)>g(1,s,f))
-t3:=isf(1to(1),cx,f,<xout(1)>s,xout(1),t1):is(<xout(1)>g(1,s,f),<xout(1)>f)
-t4:=symis(cx,smpr(1,f),<xout(1)>f,satz277(f)):is(<xout(1)>f,smpr(1,f))
-t5:=tr3is(cx,smpr(1,g(1,s,f)),<xout(1)>g(1,s,f),<xout(1)>f,smpr(1,f),t2,t3,t4):prop1(1,s,f)
-c@t6:=[u:[t:1to(1)]1to(1)][v:[t:1to(1)]cx][w:bijective(1to(1),1to(1),u)]t5(u,v):prop2(1)
-x@xp1:=pl"n"(x,1):nat
-t7:=lessisi1"n"(x,xp1,satz18a(x,1)):lessis"n"(x,xp1)
-[p:prop2(x)][s:[t:1to(xp1)]1to(xp1)][f:[t:1to(xp1)]cx][b:bijective(1to(xp1),1to(xp1),s)]
-t8:=ande1(injective(1to(xp1),1to(xp1),s),surjective(1to(xp1),1to(xp1),s),b):injective(1to(xp1),1to(xp1),s)
-[case1:is"e"(1to(xp1),<xout(xp1)>s,xout(xp1))][u:1to(x)]
-u1:=left1to(xp1,x,t7,u):1to(xp1)
-n1:=inn(xp1,<u1>s):nat
-[i:is"n"(n1,xp1)]
-t9:=tr3is(1to(xp1),<u1>s,outn(xp1,n1,1top(xp1,<u1>s)),xout(xp1),<xout(xp1)>s,isoutinn(xp1,<u1>s),isoutni(xp1,n1,1top(xp1,<u1>s),xp1,lessisi3(xp1),i),symis(1to(xp1),<xout(xp1)>s,xout(xp1),case1)):is"e"(1to(xp1),<u1>s,<xout(xp1)>s)
-t10:=isfe(1to(xp1),1to(xp1),s,t8,u1,xout(xp1),t9):is"e"(1to(xp1),u1,xout(xp1))
-t11:=isoutne(xp1,inn(x,u),trlessis"n"(inn(x,u),x,xp1,1top(x,u),t7),xp1,lessisi3(xp1),t10):is"n"(inn(x,u),xp1)
-t12:=satz16a(inn(x,u),x,xp1,1top(x,u),satz18a(x,1)):less"n"(inn(x,u),xp1)
-t13:=<t11>ec3e31(is"n"(inn(x,u),xp1),more"n"(inn(x,u),xp1),less"n"(inn(x,u),xp1),satz10b(inn(x,u),xp1),t12):con
-u@t14:=ore1(less"n"(n1,xp1),is"n"(n1,xp1),1top(xp1,<u1>s),[t:is"n"(n1,xp1)]t13(t)):less"n"(n1,xp1)
-t15:=satz26(x,n1,t14):lessis"n"(n1,x)
-w1:=outn(x,n1,t15):1to(x)
-case1@s01:=[t:1to(x)]w1(t):[t:1to(x)]1to(x)
-u@[v:1to(x)][i:is"e"(1to(x),w1(u),w1(v))]
-t16:=isoutne(x,n1(u),t15(u),n1(v),t15(v),i):is"n"(n1(u),n1(v))
-t17:=<isinne(xp1,<u1(u)>s,<u1(v)>s,t16)><u1(v)><u1(u)>t8:is"e"(1to(xp1),u1(u),u1(v))
-t18:=thleft1(xp1,x,t7,u,v,t17):is"e"(1to(x),u,v)
-u@u2:=<u1>invf(1to(xp1),1to(xp1),s,b):1to(xp1)
-n2:=inn(xp1,u2):nat
-[i:is"n"(n2,xp1)]
-t19:=tris(1to(xp1),u2,outn(xp1,n2,1top(xp1,u2)),xout(xp1),isoutinn(xp1,u2),isoutni(xp1,n2,1top(xp1,u2),xp1,lessisi3(xp1),i)):is"e"(1to(xp1),u2,xout(xp1))
-t20:=tr3is(1to(xp1),u1,<u2>s,<xout(xp1)>s,xout(xp1),thinvf2(1to(xp1),1to(xp1),s,b,u1),isf(1to(xp1),1to(xp1),s,u2,xout(xp1),t19),case1):is"e"(1to(xp1),u1,xout(xp1))
-t21:=isoutne(xp1,inn(x,u),trlessis"n"(inn(x,u),x,xp1,1top(x,u),t7),xp1,lessisi3(xp1),t20):is"n"(inn(x,u),xp1)
-t22:=satz16a(inn(x,u),x,xp1,1top(x,u),satz18a(x,1)):less"n"(inn(x,u),xp1)
-t23:=<t21>ec3e31(is"n"(inn(x,u),xp1),more"n"(inn(x,u),xp1),less"n"(inn(x,u),xp1),satz10b(inn(x,u),xp1),t22):con
-u@t24:=ore1(less"n"(n2,xp1),is"n"(n2,xp1),1top(xp1,u2),[t:is"n"(n2,xp1)]t23(t)):less"n"(n2,xp1)
-t25:=satz26(x,n2,t24):lessis"n"(n2,x)
-w2:=outn(x,n2,t25):1to(x)
-t26:=isinoutn(x,n2,t25):is"n"(n2,inn(x,w2))
-t27:=tris(1to(xp1),u2,outn(xp1,n2,1top(xp1,u2)),u1(w2),isoutinn(xp1,u2),isoutni(xp1,n2,1top(xp1,u2),inn(x,w2),trlessis"n"(inn(x,w2),x,xp1,1top(x,w2),t7),t26)):is"e"(1to(xp1),u2,u1(w2))
-t28:=tris(1to(xp1),u1,<u2>s,<u1(w2)>s,thinvf2(1to(xp1),1to(xp1),s,b,u1),isf(1to(xp1),1to(xp1),s,u2,u1(w2),t27)):is"e"(1to(xp1),u1,<u1(w2)>s)
-t29:=tris(nat,inn(x,u),inn(xp1,u1),n1(w2),isinoutn(xp1,inn(x,u),trlessis"n"(inn(x,u),x,xp1,1top(x,u),t7)),isinni(xp1,u1,<u1(w2)>s,t28)):is"n"(inn(x,u),n1(w2))
-t30:=tris(1to(x),u,outn(x,inn(x,u),1top(x,u)),w1(w2),isoutinn(x,u),isoutni(x,inn(x,u),1top(x,u),n1(w2),t15(w2),t29)):is"e"(1to(x),u,w1(w2))
-t31:=somei(1to(x),[t:1to(x)]is"e"(1to(x),u,w1(t)),w2,t30):image(1to(x),1to(x),s01,u)
-case1@t32:=andi(injective(1to(x),1to(x),s01),surjective(1to(x),1to(x),s01),[t:1to(x)][u:1to(x)][v:is"e"(1to(x),<t>s01,<u>s01)]t18(t,u,v),[t:1to(x)]t31(t)):bijective(1to(x),1to(x),s01)
-f01:=left(cx,xp1,x,t7,f):[t:1to(x)]cx
-t33:=<t32><f01><s01>p:prop1(s01,f01)
-g1:=left(cx,xp1,x,t7,g(xp1,s,f)):[t:1to(x)]cx
-g2:=g(x,s01,f01):[t:1to(x)]cx
-u@t33a:=isoutinn(xp1,<u1>s):is"e"(1to(xp1),<u1>s,outn(xp1,n1,1top(xp1,<u1>s)))
-t34:=isinoutn(x,n1,t15):is"n"(n1,inn(x,w1))
-t35:=isoutni(xp1,n1,1top(xp1,<u1>s),inn(x,w1),trlessis"n"(inn(x,w1),x,xp1,1top(x,w1),t7),t34):is"e"(1to(xp1),outn(xp1,n1,1top(xp1,<u1>s)),left1to(xp1,x,t7,w1))
-t36:=tris(1to(xp1),<u1>s,outn(xp1,n1,1top(xp1,<u1>s)),left1to(xp1,x,t7,w1),t33a,t35):is"e"(1to(xp1),<u1>s,left1to(xp1,x,t7,w1))
-t37:=isf(1to(xp1),cx,f,<u1>s,left1to(xp1,x,t7,w1),t36):is(<u>g1,<u>g2)
-case1@t38:=fisi(1to(x),cx,g1,g2,[t:1to(x)]t37(t)):is"e"([t:1to(x)]cx,g1,g2)
-t39:=isf([t:1to(x)]cx,cx,[u:[t:1to(x)]cx]smpr(x,u),g1,g2,t38):is(smpr(x,g1),smpr(x,g2))
-t40:=tris(cx,smpr(x,g1),smpr(x,g2),smpr(x,f01),t39,t33):is(smpr(x,g1),smpr(x,f01))
-t41:=isf(1to(xp1),cx,f,<xout(xp1)>s,xout(xp1),case1):is(<xout(xp1)>g(xp1,s,f),<xout(xp1)>f)
-t42:=satz278(x,g(xp1,s,f)):is(smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s,f)><smpr(x,g1)>q)
-t43:=isf(cx,cx,<smpr(x,g1)>q,<xout(xp1)>g(xp1,s,f),<xout(xp1)>f,t41):is(<<xout(xp1)>g(xp1,s,f)><smpr(x,g1)>q,<<xout(xp1)>f><smpr(x,g1)>q)
-t44:=isf(cx,cx,[t:cx]<<xout(xp1)>f><t>q,smpr(x,g1),smpr(x,f01),t40):is(<<xout(xp1)>f><smpr(x,g1)>q,<<xout(xp1)>f><smpr(x,f01)>q)
-t45:=symis(cx,smpr(xp1,f),<<xout(xp1)>f><smpr(x,f01)>q,satz278(x,f)):is(<<xout(xp1)>f><smpr(x,f01)>q,smpr(xp1,f))
-t46:=tr4is(cx,smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s,f)><smpr(x,g1)>q,<<xout(xp1)>f><smpr(x,g1)>q,<<xout(xp1)>f><smpr(x,f01)>q,smpr(xp1,f),t42,t43,t44,t45):prop1(xp1,s,f)
-b@1px:=pl"n"(1,x):nat
-[case2:is"e"(1to(xp1),<1out(xp1)>s,1out(xp1))][u:1to(x)]
-u3:=right1to(1,x,u):1to(1px)
-case2@t47:=lessisi2"n"(1px,xp1,compl"n"(1,x)):lessis"n"(1px,xp1)
-s02:=left(1to(xp1),xp1,1px,t47,s):[t:1to(1px)]1to(xp1)
-u@n3:=inn(xp1,<u3>s02):nat
-[i:is"n"(n3,1)]
-t48:=tr3is(1to(xp1),<u3>s02,outn(xp1,n3,1top(xp1,<u3>s02)),1out(xp1),<1out(xp1)>s,isoutinn(xp1,<u3>s02),isoutni(xp1,n3,1top(xp1,<u3>s02),1,satz24a(xp1),i),symis(1to(xp1),<1out(xp1)>s,1out(xp1),case2)):is"e"(1to(xp1),<u3>s02,<1out(xp1)>s)
-t49:=isfe(1to(xp1),1to(xp1),s,t8,left1to(xp1,1px,t47,u3),1out(xp1),t48):is"e"(1to(xp1),left1to(xp1,1px,t47,u3),1out(xp1))
-t50:=isoutne(xp1,inn(1px,u3),trlessis"n"(inn(1px,u3),1px,xp1,1top(1px,u3),t47),1,satz24a(xp1),t49):is"n"(inn(1px,u3),1)
-t51:=isinoutn(1px,pl"n"(1,inn(x,u)),satz19o(inn(x,u),x,1,1top(x,u))):is"n"(pl"n"(1,inn(x,u)),inn(1px,u3))
-t52:=ismore1"n"(pl"n"(1,inn(x,u)),inn(1px,u3),1,t51,satz18(1,inn(x,u))):more"n"(inn(1px,u3),1)
-t53:=<t50>ec3e21(is"n"(inn(1px,u3),1),more"n"(inn(1px,u3),1),less"n"(inn(1px,u3),1),satz10b(inn(1px,u3),1),t52):con
-u@t54:=ore1(more"n"(n3,1),is"n"(n3,1),satz24(n3),[t:is"n"(n3,1)]t53(t)):more"n"(n3,1)
-nm1:=mn"n"(n3,1,t54):nat
-t54a:=islessis1"n"(n3,pl"n"(nm1,1),xp1,th1c"n.mn"(n3,1,t54),1top(xp1,<u3>s02)):lessis"n"(pl"n"(nm1,1),xp1)
-t55:=th9"l.or"(less"n"(pl"n"(nm1,1),xp1),is"n"(pl"n"(nm1,1),xp1),less"n"(nm1,x),is"n"(nm1,x),t54a,[t:less"n"(pl"n"(nm1,1),xp1)]satz20c(nm1,x,1,t),[t:is"n"(pl"n"(nm1,1),xp1)]satz20b(nm1,x,1,t)):lessis"n"(nm1,x)
-w3:=outn(x,nm1,t55):1to(x)
-case2@s03:=[t:1to(x)]w3(t):[t:1to(x)]1to(x)
-u@[v:1to(x)][i:is"e"(1to(x),w3(u),w3(v))]
-t56:=isoutne(x,nm1(u),t55(u),nm1(v),t55(v),i):is"n"(nm1(u),nm1(v))
-t57:=tr3is(nat,n3(u),pl"n"(nm1(u),1),pl"n"(nm1(v),1),n3(v),th1c"n.mn"(n3(u),1,t54(u)),ispl1"n"(nm1(u),nm1(v),1,t56),th1d"n.mn"(n3(v),1,t54(v))):is"n"(n3(u),n3(v))
-t58:=isinne(xp1,<u3(u)>s02,<u3(v)>s02,t57):is"e"(1to(xp1),<u3(u)>s02,<u3(v)>s02)
-t59:=isfe(1to(xp1),1to(xp1),s,t8,left1to(xp1,1px,t47,u3(u)),left1to(xp1,1px,t47,u3(v)),t58):is"e"(1to(xp1),left1to(xp1,1px,t47,u3(u)),left1to(xp1,1px,t47,u3(v)))
-t60:=thleft1(xp1,1px,t47,u3(u),u3(v),t59):is"e"(1to(1px),u3(u),u3(v))
-t61:=thright1(1,x,u,v,t60):is"e"(1to(x),u,v)
-case2@s04:=left(1to(xp1),xp1,1px,t47,invf(1to(xp1),1to(xp1),s,b)):[t:1to(1px)]1to(xp1)
-u@u4:=<u3>s04:1to(xp1)
-n4:=inn(xp1,u4):nat
-[i:is"n"(n4,1)]
-t62:=tris(1to(xp1),u4,outn(xp1,n4,1top(xp1,u4)),1out(xp1),isoutinn(xp1,u4),isoutni(xp1,n4,1top(xp1,u4),1,satz24a(xp1),i)):is"e"(1to(xp1),u4,1out(xp1))
-t63:=tr3is(1to(xp1),left1to(xp1,1px,t47,u3),<u4>s,<1out(xp1)>s,1out(xp1),thinvf2(1to(xp1),1to(xp1),s,b,left1to(xp1,1px,t47,u3)),isf(1to(xp1),1to(xp1),s,u4,1out(xp1),t62),case2):is"e"(1to(xp1),left1to(xp1,1px,t47,u3),1out(xp1))
-t64:=isoutne(xp1,inn(1px,u3),trlessis"n"(inn(1px,u3),1px,xp1,1top(1px,u3),t47),1,satz24a(xp1),t63):is"n"(inn(1px,u3),1)
-t65:=tris(nat,pl"n"(1,inn(x,u)),inn(1px,u3),1,isinoutn(1px,pl"n"(1,inn(x,u)),satz19o(inn(x,u),x,1,1top(x,u))),t64):is"n"(pl"n"(1,inn(x,u)),1)
-t66:=<t65>ec3e21(is"n"(pl"n"(1,inn(x,u)),1),more"n"(pl"n"(1,inn(x,u)),1),less"n"(pl"n"(1,inn(x,u)),1),satz10b(pl"n"(1,inn(x,u)),1),satz18(1,inn(x,u))):con
-u@t67:=ore1(more"n"(n4,1),is"n"(n4,1),satz24(n4),[t:is"n"(n4,1)]t66(t)):more"n"(n4,1)
-nm2:=mn"n"(n4,1,t67):nat
-t68:=islessis1"n"(n4,pl"n"(nm2,1),xp1,th1c"n.mn"(n4,1,t67),1top(xp1,u4)):lessis"n"(pl"n"(nm2,1),xp1)
-t69:=th9"l.or"(less"n"(pl"n"(nm2,1),xp1),is"n"(pl"n"(nm2,1),xp1),less"n"(nm2,x),is"n"(nm2,x),t68,[t:less"n"(pl"n"(nm2,1),xp1)]satz20c(nm2,x,1,t),[t:is"n"(pl"n"(nm2,1),xp1)]satz20b(nm2,x,1,t)):lessis"n"(nm2,x)
-w4:=outn(x,nm2,t69):1to(x)
-t70:=isinoutn(x,nm2,t69):is"n"(nm2,inn(x,w4))
-t71:=tr3is(nat,n4,pl"n"(1,nm2),pl"n"(1,inn(x,w4)),inn(1px,u3(w4)),th1a"n.mn"(n4,1,t67),ispl2"n"(nm2,inn(x,w4),1,t70),isinoutn(1px,pl"n"(1,inn(x,w4)),satz19o(inn(x,w4),x,1,1top(x,w4)))):is"n"(n4,inn(1px,u3(w4)))
-t72:=tris(1to(xp1),u4,outn(xp1,n4,1top(xp1,u4)),left1to(xp1,1px,t47,u3(w4)),isoutinn(xp1,u4),isoutni(xp1,n4,1top(xp1,u4),inn(1px,u3(w4)),trlessis"n"(inn(1px,u3(w4)),1px,xp1,1top(1px,u3(w4)),t47),t71)):is"e"(1to(xp1),u4,left1to(xp1,1px,t47,u3(w4)))
-t73:=tris(1to(xp1),left1to(xp1,1px,t47,u3),<u4>s,<u3(w4)>s02,thinvf2(1to(xp1),1to(xp1),s,b,left1to(xp1,1px,t47,u3)),isf(1to(xp1),1to(xp1),s,u4,left1to(xp1,1px,t47,u3(w4)),t72)):is"e"(1to(xp1),left1to(xp1,1px,t47,u3),<u3(w4)>s02)
-t74:=tr3is(nat,pl"n"(1,inn(x,u)),inn(1px,u3),inn(xp1,left1to(xp1,1px,t47,u3)),n3(w4),isinoutn(1px,pl"n"(1,inn(x,u)),satz19o(inn(x,u),x,1,1top(x,u))),isinoutn(xp1,inn(1px,u3),trlessis"n"(inn(1px,u3),1px,xp1,1top(1px,u3),t47)),isinni(xp1,left1to(xp1,1px,t47,u3),<u3(w4)>s02,t73)):is"n"(pl"n"(1,inn(x,u)),n3(w4))
-t75:=th1e"n.mn"(n3(w4),1,inn(x,u),t54(w4),t74):is"n"(inn(x,u),nm1(w4))
-t76:=tris(1to(x),u,outn(x,inn(x,u),1top(x,u)),w3(w4),isoutinn(x,u),isoutni(x,inn(x,u),1top(x,u),nm1(w4),t55(w4),t75)):is"e"(1to(x),u,w3(w4))
-t77:=somei(1to(x),[t:1to(x)]is"e"(1to(x),u,w3(t)),w4,t76):image(1to(x),1to(x),s03,u)
-case2@t78:=andi(injective(1to(x),1to(x),s03),surjective(1to(x),1to(x),s03),[t:1to(x)][u:1to(x)][v:is"e"(1to(x),<t>s03,<u>s03)]t61(t,u,v),[t:1to(x)]t77(t)):bijective(1to(x),1to(x),s03)
-f02:=left(cx,xp1,1px,t47,f):[t:1to(1px)]cx
-f03:=right(cx,1,x,f02):[t:1to(x)]cx
-t79:=<t78><f03><s03>p:prop1(s03,f03)
-g3:=left(cx,xp1,1px,t47,g(xp1,s,f)):[t:1to(1px)]cx
-g4:=right(cx,1,x,g3):[t:1to(x)]cx
-g5:=g(x,s03,f03):[t:1to(x)]cx
-u@t80:=tr3is(nat,n3,pl"n"(1,nm1),pl"n"(1,inn(x,w3)),inn(1px,right1to(1,x,w3)),th1a"n.mn"(n3,1,t54),ispl2"n"(nm1,inn(x,w3),1,isinoutn(x,nm1,t55)),isinoutn(1px,pl"n"(1,inn(x,w3)),satz19o(inn(x,w3),x,1,1top(x,w3)))):is"n"(n3,inn(1px,right1to(1,x,w3)))
-t81:=tris(1to(xp1),<u3>s02,outn(xp1,n3,1top(xp1,<u3>s02)),left1to(xp1,1px,t47,right1to(1,x,w3)),isoutinn(xp1,<u3>s02),isoutni(xp1,n3,1top(xp1,<u3>s02),inn(1px,right1to(1,x,w3)),trlessis"n"(inn(1px,right1to(1,x,w3)),1px,xp1,1top(1px,right1to(1,x,w3)),t47),t80)):is"e"(1to(xp1),<u3>s02,left1to(xp1,1px,t47,right1to(1,x,w3)))
-t82:=isf(1to(xp1),cx,f,<u3>s02,left1to(xp1,1px,t47,right1to(1,x,w3)),t81):is(<u>g4,<u>g5)
-case2@t83:=fisi(1to(x),cx,g4,g5,[t:1to(x)]t82(t)):is"e"([t:1to(x)]cx,g4,g5)
-t85:=isf([t:1to(x)]cx,cx,[u:[t:1to(x)]cx]smpr(x,u),g4,g5,t83):is(smpr(x,g4),smpr(x,g5))
-t86:=tris(cx,smpr(x,g4),smpr(x,g5),smpr(x,f03),t85,t79):is(smpr(x,g4),smpr(x,f03))
-t87:=lessisi1"n"(1,1px,satz18a(1,x)):lessis"n"(1,1px)
-g6:=left(cx,1px,1,t87,g3):[t:1to(1)]cx
-f04:=left(cx,1px,1,t87,f02):[t:1to(1)]cx
-t87a:=isinoutn(1,1,lessisi3(1)):is"n"(1,inn(1,xout(1)))
-1d:=left1to(1px,1,t87,xout(1)):1to(1px)
-t87b:=isinoutn(1px,inn(1,xout(1)),trlessis"n"(inn(1,xout(1)),1,1px,1top(1,xout(1)),t87)):is"n"(inn(1,xout(1)),inn(1px,1d))
-t88:=tris(nat,1,inn(1,xout(1)),inn(1px,1d),t87a,t87b):is"n"(1,inn(1px,1d))
-1e:=left1to(xp1,1px,t47,1d):1to(xp1)
-t88a:=isoutni(xp1,1,satz24a(xp1),inn(1px,1d),trlessis"n"(inn(1px,1d),1px,xp1,1top(1px,1d),t47),t88):is"e"(1to(xp1),1out(xp1),1e)
-t88b:=isf(1to(xp1),1to(xp1),s,1e,1out(xp1),symis(1to(xp1),1out(xp1),1e,t88a)):is"e"(1to(xp1),<1e>s,<1out(xp1)>s)
-t89:=tr3is(1to(xp1),<1e>s,<1out(xp1)>s,1out(xp1),1e,t88b,case2,t88a):is"e"(1to(xp1),<1e>s,1e)
-t89a:=tr3is(cx,smpr(1,g6),<xout(1)>g6,<xout(1)>f04,smpr(1,f04),satz277(g6),isf(1to(xp1),cx,f,<1e>s,1e,t89),symis(cx,smpr(1,f04),<xout(1)>f04,satz277(f04))):is(smpr(1,g6),smpr(1,f04))
-t90:=satz281(1,x,g3):is(smpr(1px,g3),<smpr(x,g4)><smpr(1,g6)>q)
-t91:=isf(cx,cx,<smpr(1,g6)>q,smpr(x,g4),smpr(x,f03),t86):is(<smpr(x,g4)><smpr(1,g6)>q,<smpr(x,f03)><smpr(1,g6)>q)
-t92:=isf(cx,cx,[t:cx]<smpr(x,f03)><t>q,smpr(1,g6),smpr(1,f04),t89a):is(<smpr(x,f03)><smpr(1,g6)>q,<smpr(x,f03)><smpr(1,f04)>q)
-t93:=symis(cx,smpr(1px,f02),<smpr(x,f03)><smpr(1,f04)>q,satz281(1,x,f02)):is(<smpr(x,f03)><smpr(1,f04)>q,smpr(1px,f02))
-t94:=tr4is(cx,smpr(1px,g3),<smpr(x,g4)><smpr(1,g6)>q,<smpr(x,f03)><smpr(1,g6)>q,<smpr(x,f03)><smpr(1,f04)>q,smpr(1px,f02),t90,t91,t92,t93):is(smpr(1px,g3),smpr(1px,f02))
-t95:=issmpr(xp1,f,1px,compl"n"(1,x)):is(smpr(1px,f02),smpr(xp1,f))
-t96:=symis(cx,smpr(1px,g3),smpr(xp1,g(xp1,s,f)),issmpr(xp1,g(xp1,s,f),1px,compl"n"(1,x))):is(smpr(xp1,g(xp1,s,f)),smpr(1px,g3))
-t97:=tr3is(cx,smpr(xp1,g(xp1,s,f)),smpr(1px,g3),smpr(1px,f02),smpr(xp1,f),t96,t94,t95):prop1(xp1,s,f)
-b@[not1:not(is"e"(1to(xp1),<xout(xp1)>s,xout(xp1)))][not2:not(is"e"(1to(xp1),<1out(xp1)>s,1out(xp1)))]
-a0:=<1out(xp1)>s:1to(xp1)
-b0:=<1out(xp1)>invf(1to(xp1),1to(xp1),s,b):1to(xp1)
-t98:=thinvf2(1to(xp1),1to(xp1),s,b,1out(xp1)):is"e"(1to(xp1),1out(xp1),<b0>s)
-t99:=not2:not(is"e"(1to(xp1),a0,1out(xp1)))
-t100:=symnotis(1to(xp1),<1out(xp1)>s,<b0>s,th3"e.notis"(1to(xp1),<1out(xp1)>s,1out(xp1),<b0>s,not2,t98)):not(is"e"(1to(xp1),<b0>s,<1out(xp1)>s))
-t101:=th3"l.imp"(is"e"(1to(xp1),b0,1out(xp1)),is"e"(1to(xp1),<b0>s,<1out(xp1)>s),t100,[t:is"e"(1to(xp1),b0,1out(xp1))]isf(1to(xp1),1to(xp1),s,b0,1out(xp1),t)):not(is"e"(1to(xp1),b0,1out(xp1)))
-s1:=changef(1to(xp1),1to(xp1),s,1out(xp1),b0):[t:1to(xp1)]1to(xp1)
-[u:1to(xp1)][i:is"e"(1to(xp1),u,1out(xp1))]
-t102:=changef1(1to(xp1),1to(xp1),s,1out(xp1),b0,u,i):is"e"(1to(xp1),<u>s1,<b0>s)
-t103:=tris2(1to(xp1),<u>s1,1out(xp1),<b0>s,t102,t98):is"e"(1to(xp1),<u>s1,1out(xp1))
-u@[i:is"e"(1to(xp1),u,b0)]
-t104:=changef2(1to(xp1),1to(xp1),s,1out(xp1),b0,u,i):is"e"(1to(xp1),<u>s1,a0)
-u@[n:not(is"e"(1to(xp1),u,1out(xp1)))][o:not(is"e"(1to(xp1),u,b0))]
-t105:=changef3(1to(xp1),1to(xp1),s,1out(xp1),b0,u,n,o):is"e"(1to(xp1),<u>s1,<u>s)
-not2@t106:=th6"e.wissel"(1to(xp1),1to(xp1),s,1out(xp1),b0,b):bijective(1to(xp1),1to(xp1),s1)
-[alpha:not(is"e"(1to(xp1),a0,xout(xp1)))]
-s2:=wissel(1to(xp1),1out(xp1),a0):[t:1to(xp1)]1to(xp1)
-t107:=th3"e.wissel"(1to(xp1),1out(xp1),a0):bijective(1to(xp1),1to(xp1),s2)
-[u:1to(xp1)][i:is"e"(1to(xp1),u,1out(xp1))]
-t108:=iswissel1(1to(xp1),1out(xp1),a0,<u>s1,t103(u,i)):is"e"(1to(xp1),<<u>s1>s2,a0)
-t109:=tris2(1to(xp1),<u>s,<<u>s1>s2,a0,isf(1to(xp1),1to(xp1),s,u,1out(xp1),i),t108):is"e"(1to(xp1),<u>s,<<u>s1>s2)
-u@[i:is"e"(1to(xp1),u,b0)]
-t110:=iswissel2(1to(xp1),1out(xp1),a0,<u>s1,t104(u,i)):is"e"(1to(xp1),<<u>s1>s2,1out(xp1))
-t111:=tris2(1to(xp1),<u>s,<<u>s1>s2,1out(xp1),tris2(1to(xp1),<u>s,1out(xp1),<b0>s,isf(1to(xp1),1to(xp1),s,u,b0,i),t98),t110):is"e"(1to(xp1),<u>s,<<u>s1>s2)
-u@[n:not(is"e"(1to(xp1),u,1out(xp1)))][o:not(is"e"(1to(xp1),u,b0))][i:is"e"(1to(xp1),<u>s1,1out(xp1))]
-t112:=isfe(1to(xp1),1to(xp1),s1,t8(s1,f,t106),u,1out(xp1),tris2(1to(xp1),<u>s1,<1out(xp1)>s1,1out(xp1),i,t103(1out(xp1),refis(1to(xp1),1out(xp1))))):is"e"(1to(xp1),u,1out(xp1))
-o@t113:=th3"l.imp"(is"e"(1to(xp1),<u>s1,1out(xp1)),is"e"(1to(xp1),u,1out(xp1)),n,[t:is"e"(1to(xp1),<u>s1,1out(xp1))]t112(t)):not(is"e"(1to(xp1),<u>s1,1out(xp1)))
-[i:is"e"(1to(xp1),<u>s1,a0)]
-t114:=isfe(1to(xp1),1to(xp1),s1,t8(s1,f,t106),u,b0,tris2(1to(xp1),<u>s1,<b0>s1,a0,i,t104(b0,refis(1to(xp1),b0)))):is"e"(1to(xp1),u,b0)
-o@t115:=th3"l.imp"(is"e"(1to(xp1),<u>s1,a0),is"e"(1to(xp1),u,b0),o,[t:is"e"(1to(xp1),<u>s1,a0)]t114(t)):not(is"e"(1to(xp1),<u>s1,a0))
-t116:=iswissel3(1to(xp1),1out(xp1),a0,<u>s1,t113,t115):is"e"(1to(xp1),<<u>s1>s2,<u>s1)
-t117:=symis(1to(xp1),<<u>s1>s2,<u>s,tris(1to(xp1),<<u>s1>s2,<u>s1,<u>s,t116,t105(u,n,o))):is"e"(1to(xp1),<u>s,<<u>s1>s2)
-n@t118:=th1"l.imp"(is"e"(1to(xp1),u,b0),is"e"(1to(xp1),<u>s,<<u>s1>s2),[t:is"e"(1to(xp1),u,b0)]t111(t),[t:not(is"e"(1to(xp1),u,b0))]t117(t)):is"e"(1to(xp1),<u>s,<<u>s1>s2)
-u@t119:=th1"l.imp"(is"e"(1to(xp1),u,1out(xp1)),is"e"(1to(xp1),<u>s,<<u>s1>s2),[t:is"e"(1to(xp1),u,1out(xp1))]t109(t),[t:not(is"e"(1to(xp1),u,1out(xp1)))]t118(t)):is"e"(1to(xp1),<u>s,<<u>s1>s2)
-alpha@t120:=fisi(1to(xp1),1to(xp1),s,[t:1to(xp1)]<<t>s1>s2,[t:1to(xp1)]t119(t)):is"e"([t:1to(xp1)]1to(xp1),s,[t:1to(xp1)]<<t>s1>s2)
-not2@t121:=t103(1out(xp1),refis(1to(xp1),1out(xp1))):is"e"(1to(xp1),<1out(xp1)>s1,1out(xp1))
-t121a:=ec3e21(is"n"(xp1,1),more"n"(xp1,1),less"n"(xp1,1),satz10b(xp1,1),ismore1"n"(1px,xp1,1,compl"n"(1,x),satz18(1,x))):nis"n"(xp1,1)
-t122:=th3"l.imp"(is"e"(1to(xp1),xout(xp1),1out(xp1)),is"n"(xp1,1),t121a,[t:is"e"(1to(xp1),xout(xp1),1out(xp1))]isoutne(xp1,xp1,lessisi3(xp1),1,satz24a(xp1),t)):not(is"e"(1to(xp1),xout(xp1),1out(xp1)))
-alpha@t123:=symnotis(1to(xp1),a0,xout(xp1),alpha):not(is"e"(1to(xp1),xout(xp1),a0))
-t124:=iswissel3(1to(xp1),1out(xp1),a0,xout(xp1),t122,t123):is"e"(1to(xp1),<xout(xp1)>s2,xout(xp1))
-t125:=isf([t:1to(xp1)]1to(xp1),cx,[u:[t:1to(xp1)]1to(xp1)]smpr(xp1,g(xp1,u,f)),s,[t:1to(xp1)]<<t>s1>s2,t120):is(smpr(xp1,g(xp1,s,f)),smpr(xp1,g(xp1,s1,g(xp1,s2,f))))
-t126:=t97(s1,g(xp1,s2,f),t106,t121):is(smpr(xp1,g(xp1,s1,g(xp1,s2,f))),smpr(xp1,g(xp1,s2,f)))
-t127:=t46(s2,f,t107,t124):is(smpr(xp1,g(xp1,s2,f)),smpr(xp1,f))
-t128:=tr3is(cx,smpr(xp1,g(xp1,s,f)),smpr(xp1,g(xp1,s1,g(xp1,s2,f))),smpr(xp1,g(xp1,s2,f)),smpr(xp1,f),t125,t126,t127):prop1(xp1,s,f)
-not2@[i3:is"e"(1to(xp1),a0,xout(xp1))][beta:not(is"e"(1to(xp1),b0,xout(xp1)))]
-s3:=wissel(1to(xp1),1out(xp1),b0):[t:1to(xp1)]1to(xp1)
-t129:=th3"e.wissel"(1to(xp1),1out(xp1),b0):bijective(1to(xp1),1to(xp1),s3)
-[u:1to(xp1)][i:is"e"(1to(xp1),u,1out(xp1))]
-t130:=t104(<u>s3,iswissel1(1to(xp1),1out(xp1),b0,u,i)):is"e"(1to(xp1),<<u>s3>s1,a0)
-t131:=tris2(1to(xp1),<u>s,<<u>s3>s1,a0,isf(1to(xp1),1to(xp1),s,u,1out(xp1),i),t130):is"e"(1to(xp1),<u>s,<<u>s3>s1)
-u@[i:is"e"(1to(xp1),u,b0)]
-t132:=t103(<u>s3,iswissel2(1to(xp1),1out(xp1),b0,u,i)):is"e"(1to(xp1),<<u>s3>s1,1out(xp1))
-t133:=tris2(1to(xp1),<u>s,<<u>s3>s1,<b0>s,isf(1to(xp1),1to(xp1),s,u,b0,i),tris(1to(xp1),<<u>s3>s1,1out(xp1),<b0>s,t132,t98)):is"e"(1to(xp1),<u>s,<<u>s3>s1)
-u@[n:not(is"e"(1to(xp1),u,1out(xp1)))][o:not(is"e"(1to(xp1),u,b0))]
-t134:=iswissel3(1to(xp1),1out(xp1),b0,u,n,o):is"e"(1to(xp1),<u>s3,u)
-t135:=isf(1to(xp1),1to(xp1),s1,<u>s3,u,t134):is"e"(1to(xp1),<<u>s3>s1,<u>s1)
-t136:=t105(u,n,o):is"e"(1to(xp1),<u>s1,<u>s)
-t139:=symis(1to(xp1),<<u>s3>s1,<u>s,tris(1to(xp1),<<u>s3>s1,<u>s1,<u>s,t135,t136)):is"e"(1to(xp1),<u>s,<<u>s3>s1)
-n@t140:=th1"l.imp"(is"e"(1to(xp1),u,b0),is"e"(1to(xp1),<u>s,<<u>s3>s1),[t:is"e"(1to(xp1),u,b0)]t133(t),[t:not(is"e"(1to(xp1),u,b0))]t139(t)):is"e"(1to(xp1),<u>s,<<u>s3>s1)
-u@t141:=th1"l.imp"(is"e"(1to(xp1),u,1out(xp1)),is"e"(1to(xp1),<u>s,<<u>s3>s1),[t:is"e"(1to(xp1),u,1out(xp1))]t131(t),[t:not(is"e"(1to(xp1),u,1out(xp1)))]t140(t)):is"e"(1to(xp1),<u>s,<<u>s3>s1)
-beta@t142:=fisi(1to(xp1),1to(xp1),s,[t:1to(xp1)]<<t>s3>s1,[t:1to(xp1)]t141(t)):is"e"([t:1to(xp1)]1to(xp1),s,[t:1to(xp1)]<<t>s3>s1)
-t143:=symnotis(1to(xp1),b0,xout(xp1),beta):not(is"e"(1to(xp1),xout(xp1),b0))
-t144:=iswissel3(1to(xp1),1out(xp1),b0,xout(xp1),t122,t143):is"e"(1to(xp1),<xout(xp1)>s3,xout(xp1))
-t145:=isf([t:1to(xp1)]1to(xp1),cx,[u:[t:1to(xp1)]1to(xp1)]smpr(xp1,g(xp1,u,f)),s,[t:1to(xp1)]<<t>s3>s1,t142):is(smpr(xp1,g(xp1,s,f)),smpr(xp1,g(xp1,s3,g(xp1,s1,f))))
-t146:=t46(s3,g(xp1,s1,f),t129,t144):is(smpr(xp1,g(xp1,s3,g(xp1,s1,f))),smpr(xp1,g(xp1,s1,f)))
-t147:=t97(s1,f,t106,t121):is(smpr(xp1,g(xp1,s1,f)),smpr(xp1,f))
-t148:=tr3is(cx,smpr(xp1,g(xp1,s,f)),smpr(xp1,g(xp1,s3,g(xp1,s1,f))),smpr(xp1,g(xp1,s1,f)),smpr(xp1,f),t145,t146,t147):prop1(xp1,s,f)
-i3@[gamma:is"e"(1to(xp1),b0,xout(xp1))][i:is"n"(x,1)]
-t149:=ispl1"n"(1,x,1,symis(nat,x,1,i)):is"n"(2,xp1)
-t150:=lessisi2"n"(2,xp1,t149):lessis"n"(2,xp1)
-f05:=left(cx,xp1,2,t150,f):[t:1to(2)]cx
-s05:=left(1to(xp1),xp1,2,t150,s):[t:1to(2)]1to(xp1)
-g7:=left(cx,xp1,2,t150,g(xp1,s,f)):[t:1to(2)]cx
-t151:=issmpr(xp1,f,2,t149):is(smpr(2,f05),smpr(xp1,f))
-t152:=issmpr(xp1,g(xp1,s,f),2,t149):is(smpr(2,g7),smpr(xp1,g(xp1,s,f)))
-t153:=satz280(f05):is(smpr(2,f05),<<xout(2)>f05><<1out(2)>f05>q)
-t154:=satz280(g7):is(smpr(2,g7),<<xout(2)>g7><<1out(2)>g7>q)
-t155:=tris1(nat,inn(2,xout(2)),xp1,2,isinoutn(2,2,lessisi3(2)),t149):is"n"(inn(2,xout(2)),xp1)
-t156:=isoutni(xp1,inn(2,xout(2)),trlessis"n"(inn(2,xout(2)),2,xp1,1top(2,xout(2)),t150),xp1,lessisi3(xp1),t155):is"e"(1to(xp1),left1to(xp1,2,t150,xout(2)),xout(xp1))
-t157:=isf(1to(xp1),1to(xp1),s,left1to(xp1,2,t150,xout(2)),xout(xp1),t156):is"e"(1to(xp1),<xout(2)>s05,<xout(xp1)>s)
-t158:=symis(nat,1,inn(2,1out(2)),isinoutn(2,1,satz24a(2))):is"n"(inn(2,1out(2)),1)
-t159:=isoutni(xp1,inn(2,1out(2)),trlessis"n"(inn(2,1out(2)),2,xp1,1top(2,1out(2)),t150),1,satz24a(xp1),t158):is"e"(1to(xp1),left1to(xp1,2,t150,1out(2)),1out(xp1))
-t160:=tr3is(1to(xp1),left1to(xp1,2,t150,1out(2)),1out(xp1),<b0>s,<xout(xp1)>s,t159,t98,isf(1to(xp1),1to(xp1),s,b0,xout(xp1),gamma)):is"e"(1to(xp1),left1to(xp1,2,t150,1out(2)),<xout(xp1)>s)
-t161:=tris2(1to(xp1),<xout(2)>s05,left1to(xp1,2,t150,1out(2)),<xout(xp1)>s,t157,t160):is"e"(1to(xp1),<xout(2)>s05,left1to(xp1,2,t150,1out(2)))
-t163:=isf(1to(xp1),1to(xp1),s,left1to(xp1,2,t150,1out(2)),1out(xp1),t159):is"e"(1to(xp1),<1out(2)>s05,<1out(xp1)>s)
-t164:=tris(1to(xp1),<1out(2)>s05,<1out(xp1)>s,xout(xp1),t163,i3):is"e"(1to(xp1),<1out(2)>s05,xout(xp1))
-t165:=tris2(1to(xp1),<1out(2)>s05,left1to(xp1,2,t150,xout(2)),xout(xp1),t164,t156):is"e"(1to(xp1),<1out(2)>s05,left1to(xp1,2,t150,xout(2)))
-t166:=isf(1to(xp1),cx,f,<xout(2)>s05,left1to(xp1,2,t150,1out(2)),t161):is(<xout(2)>g7,<1out(2)>f05)
-t167:=isf(1to(xp1),cx,f,<1out(2)>s05,left1to(xp1,2,t150,xout(2)),t165):is(<1out(2)>g7,<xout(2)>f05)
-t168:=isf(cx,cx,<<1out(2)>g7>q,<xout(2)>g7,<1out(2)>f05,t166):is(<<xout(2)>g7><<1out(2)>g7>q,<<1out(2)>f05><<1out(2)>g7>q)
-t169:=comq(c,<1out(2)>g7,<1out(2)>f05):is(<<1out(2)>f05><<1out(2)>g7>q,<<1out(2)>g7><<1out(2)>f05>q)
-t170:=isf(cx,cx,<<1out(2)>f05>q,<1out(2)>g7,<xout(2)>f05,t167):is(<<1out(2)>g7><<1out(2)>f05>q,<<xout(2)>f05><<1out(2)>f05>q)
-t171:=tr4is(cx,smpr(xp1,g(xp1,s,f)),smpr(2,g7),<<xout(2)>g7><<1out(2)>g7>q,<<1out(2)>f05><<1out(2)>g7>q,<<1out(2)>g7><<1out(2)>f05>q,symis(cx,smpr(2,g7),smpr(xp1,g(xp1,s,f)),t152),t154,t168,t169):is(smpr(xp1,g(xp1,s,f)),<<1out(2)>g7><<1out(2)>f05>q)
-t172:=tr4is(cx,smpr(xp1,g(xp1,s,f)),<<1out(2)>g7><<1out(2)>f05>q,<<xout(2)>f05><<1out(2)>f05>q,smpr(2,f05),smpr(xp1,f),t171,t170,symis(cx,smpr(2,f05),<<xout(2)>f05><<1out(2)>f05>q,t153),t151):prop1(xp1,s,f)
-trivial:=t172:prop1(xp1,s,f)
-gamma@[n:nis"n"(x,1)]
-t173:=ore1(more"n"(x,1),is"n"(x,1),satz24(x),n):more"n"(x,1)
-xm1:=mn"n"(x,1,t173):nat
-s4:=changef(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1)):[t:1to(xp1)]1to(xp1)
-t174:=th6"e.wissel"(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1),b):bijective(1to(xp1),1to(xp1),s4)
-t175:=changef2(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1),xout(xp1),refis(1to(xp1),xout(xp1))):is"e"(1to(xp1),<xout(xp1)>s4,<1out(xp1)>s)
-t176:=symis(1to(xp1),a0,xout(xp1),i3):is"e"(1to(xp1),xout(xp1),<1out(xp1)>s)
-t177:=tris2(1to(xp1),<xout(xp1)>s4,xout(xp1),<1out(xp1)>s,t175,t176):is"e"(1to(xp1),<xout(xp1)>s4,xout(xp1))
-t178:=lessisi1"n"(x,xp1,satz18a(x,1)):lessis"n"(x,xp1)
-g8:=left(cx,xp1,x,t178,g(xp1,s,f)):[t:1to(x)]cx
-t179:=satz278(x,g(xp1,s,f)):is(smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s,f)><smpr(x,g8)>q)
-t180:=th1b"n.mn"(x,1,t173):is"n"(pl"n"(1,xm1),x)
-t181:=lessisi2"n"(pl"n"(1,xm1),x,t180):lessis"n"(pl"n"(1,xm1),x)
-g9:=left(cx,x,pl"n"(1,xm1),t181,g8):[t:1to(pl"n"(1,xm1))]cx
-t182:=symis(cx,smpr(pl"n"(1,xm1),g9),smpr(x,g8),issmpr(x,g8,pl"n"(1,xm1),t180)):is(smpr(x,g8),smpr(pl"n"(1,xm1),g9))
-g10:=right(cx,1,xm1,g9):[t:1to(xm1)]cx
-t183:=lessisi1"n"(1,pl"n"(1,xm1),satz18a(1,xm1)):lessis"n"(1,pl"n"(1,xm1))
-g11:=left(cx,pl"n"(1,xm1),1,t183,g9):[t:1to(1)]cx
-t184:=satz281(a,1,xm1,g9):is(smpr(pl"n"(1,xm1),g9),<smpr(xm1,g10)><smpr(1,g11)>q)
-t185:=satz277(g11):is(smpr(1,g11),<xout(1)>g11)
-t186:=isinoutn(1,1,lessisi3(1)):is"n"(1,inn(1,xout(1)))
-1a:=left1to(pl"n"(1,xm1),1,t183,xout(1)):1to(pl"n"(1,xm1))
-t187:=isinoutn(pl"n"(1,xm1),inn(1,xout(1)),trlessis"n"(inn(1,xout(1)),1,pl"n"(1,xm1),1top(1,xout(1)),t183)):is"n"(inn(1,xout(1)),inn(pl"n"(1,xm1),1a))
-1b:=left1to(x,pl"n"(1,xm1),t181,1a):1to(x)
-t188:=isinoutn(x,inn(pl"n"(1,xm1),1a),trlessis"n"(inn(pl"n"(1,xm1),1a),pl"n"(1,xm1),x,1top(pl"n"(1,xm1),1a),t181)):is"n"(inn(pl"n"(1,xm1),1a),inn(x,1b))
-t189:=tr3is(nat,1,inn(1,xout(1)),inn(pl"n"(1,xm1),1a),inn(x,1b),t186,t187,t188):is"n"(1,inn(x,1b))
-1c:=left1to(xp1,x,t178,1b):1to(xp1)
-t190:=isoutni(xp1,1,satz24a(xp1),inn(x,1b),trlessis"n"(inn(x,1b),x,xp1,1top(x,1b),t178),t189):is"e"(1to(xp1),1out(xp1),1c)
-t191:=isf(1to(xp1),cx,g(xp1,s,f),1out(xp1),1c,t190):is(<1out(xp1)>g(xp1,s,f),<xout(1)>g11)
-t192:=tris2(cx,smpr(1,g11),<1out(xp1)>g(xp1,s,f),<xout(1)>g11,t185,t191):is(smpr(1,g11),<1out(xp1)>g(xp1,s,f))
-t193:=symis(1to(xp1),<xout(xp1)>s4,<1out(xp1)>s,t175):is"e"(1to(xp1),<1out(xp1)>s,<xout(xp1)>s4)
-t194:=isf(1to(xp1),cx,f,<1out(xp1)>s,<xout(xp1)>s4,t193):is(<1out(xp1)>g(xp1,s,f),<xout(xp1)>g(xp1,s4,f))
-t195:=tris(cx,smpr(1,g11),<1out(xp1)>g(xp1,s,f),<xout(xp1)>g(xp1,s4,f),t192,t194):is(smpr(1,g11),<xout(xp1)>g(xp1,s4,f))
-t196:=isf(cx,cx,[t:cx]<smpr(xm1,g10)><t>q,smpr(1,g11),<xout(xp1)>g(xp1,s4,f),t195):is(<smpr(xm1,g10)><smpr(1,g11)>q,<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q)
-t197:=tr3is(cx,smpr(x,g8),smpr(pl"n"(1,xm1),g9),<smpr(xm1,g10)><smpr(1,g11)>q,<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q,t182,t184,t196):is(smpr(x,g8),<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q)
-t198:=isf(cx,cx,[t:cx]<<xout(xp1)>g(xp1,s,f)><t>q,smpr(x,g8),<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q,t197):is(<<xout(xp1)>g(xp1,s,f)><smpr(x,g8)>q,<<xout(xp1)>g(xp1,s,f)><<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q>q)
-t199:=assq1(a,<xout(xp1)>g(xp1,s4,f),smpr(xm1,g10),<xout(xp1)>g(xp1,s,f)):is(<<xout(xp1)>g(xp1,s,f)><<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q>q,<<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q><<xout(xp1)>g(xp1,s4,f)>q)
-t200:=comq(c,<xout(xp1)>g(xp1,s4,f),<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q):is(<<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q><<xout(xp1)>g(xp1,s4,f)>q,<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q)
-g12:=left(cx,xp1,x,t178,g(xp1,s4,f)):[t:1to(x)]cx
-g13:=left(cx,x,pl"n"(1,xm1),t181,g12):[t:1to(pl"n"(1,xm1))]cx
-g14:=right(cx,1,xm1,g13):[t:1to(xm1)]cx
-g15:=left(cx,pl"n"(1,xm1),1,lessisi1"n"(1,pl"n"(1,xm1),satz18a(1,xm1)),g13):[t:1to(1)]cx
-t201:=satz278(x,g(xp1,s4,f)):is(smpr(xp1,g(xp1,s4,f)),<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q)
-t202:=symis(cx,smpr(pl"n"(1,xm1),g13),smpr(x,g12),issmpr(x,g12,pl"n"(1,xm1),t180)):is(smpr(x,g12),smpr(pl"n"(1,xm1),g13))
-t203:=satz281(a,1,xm1,g13):is(smpr(pl"n"(1,xm1),g13),<smpr(xm1,g14)><smpr(1,g15)>q)
-t204:=satz277(g15):is(smpr(1,g15),<xout(1)>g15)
-t205:=isf(1to(xp1),cx,g(xp1,s4,f),1out(xp1),1c,t190):is(<1out(xp1)>g(xp1,s4,f),<xout(1)>g15)
-t206:=tris2(cx,smpr(1,g15),<1out(xp1)>g(xp1,s4,f),<xout(1)>g15,t204,t205):is(smpr(1,g15),<1out(xp1)>g(xp1,s4,f))
-t207:=changef1(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1),1out(xp1),refis(1to(xp1),1out(xp1))):is"e"(1to(xp1),<1out(xp1)>s4,<xout(xp1)>s)
-t208:=isf(1to(xp1),cx,f,<1out(xp1)>s4,<xout(xp1)>s,t207):is(<1out(xp1)>g(xp1,s4,f),<xout(xp1)>g(xp1,s,f))
-t209:=tris(cx,smpr(1,g15),<1out(xp1)>g(xp1,s4,f),<xout(xp1)>g(xp1,s,f),t206,t208):is(smpr(1,g15),<xout(xp1)>g(xp1,s,f))
-t210:=isf(cx,cx,[t:cx]<smpr(xm1,g14)><t>q,smpr(1,g15),<xout(xp1)>g(xp1,s,f),t209):is(<smpr(xm1,g14)><smpr(1,g15)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q)
-t211:=tr3is(cx,smpr(x,g12),smpr(pl"n"(1,xm1),g13),<smpr(xm1,g14)><smpr(1,g15)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q,t202,t203,t210):is(smpr(x,g12),<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q)
-[u:1to(xm1)]
-ua:=right1to(1,xm1,u):1to(pl"n"(1,xm1))
-ub:=left1to(x,pl"n"(1,xm1),t181,ua):1to(x)
-uc:=left1to(xp1,x,t178,ub):1to(xp1)
-[i:is"e"(1to(xp1),uc,xout(xp1))]
-t212:=isoutne(xp1,inn(x,ub),trlessis"n"(inn(x,ub),x,xp1,1top(x,ub),t178),xp1,lessisi3(xp1),i):is"n"(inn(x,ub),xp1)
-t213:=satz16a(inn(x,ub),x,xp1,1top(x,ub),satz18a(x,1)):less"n"(inn(x,ub),xp1)
-t214:=<t212>ec3e31(is"n"(inn(x,ub),xp1),more"n"(inn(x,ub),xp1),less"n"(inn(x,ub),xp1),satz10b(inn(x,ub),xp1),t213):con
-u@t215:=[t:is"e"(1to(xp1),uc,xout(xp1))]t214(t):not(is"e"(1to(xp1),uc,xout(xp1)))
-[i:is"e"(1to(xp1),uc,1out(xp1))]
-t216:=isoutne(xp1,inn(x,ub),trlessis"n"(inn(x,ub),x,xp1,1top(x,ub),t178),1,satz24a(xp1),i):is"n"(inn(x,ub),1)
-t217:=isinoutn(x,inn(pl"n"(1,xm1),ua),trlessis"n"(inn(pl"n"(1,xm1),ua),pl"n"(1,xm1),x,1top(pl"n"(1,xm1),ua),t181)):is"n"(inn(pl"n"(1,xm1),ua),inn(x,ub))
-t218:=isinoutn(pl"n"(1,xm1),pl"n"(1,inn(xm1,u)),satz19o(inn(xm1,u),xm1,1,1top(xm1,u))):is"n"(pl"n"(1,inn(xm1,u)),inn(pl"n"(1,xm1),ua))
-t219:=tr3is(nat,pl"n"(1,inn(xm1,u)),inn(pl"n"(1,xm1),ua),inn(x,ub),1,t218,t217,t216):is"n"(pl"n"(1,inn(xm1,u)),1)
-t220:=satz18(1,inn(xm1,u)):more"n"(pl"n"(1,inn(xm1,u)),1)
-t221:=<t219>ec3e21(is"n"(pl"n"(1,inn(xm1,u)),1),more"n"(pl"n"(1,inn(xm1,u)),1),less"n"(pl"n"(1,inn(xm1,u)),1),satz10b(pl"n"(1,inn(xm1,u)),1),t220):con
-u@t222:=[t:is"e"(1to(xp1),uc,1out(xp1))]t221(t):not(is"e"(1to(xp1),uc,1out(xp1)))
-t223:=changef3(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1),uc,t222,t215):is"e"(1to(xp1),<uc>s4,<uc>s)
-t224:=isf(1to(xp1),cx,f,<uc>s4,<uc>s,t223):is(<u>g14,<u>g10)
-n@t225:=fisi(1to(xm1),cx,g10,g14,[t:1to(xm1)]symis(cx,<t>g14,<t>g10,t224(t))):is"e"([t:1to(xm1)]cx,g10,g14)
-t226:=isf([t:1to(xm1)]cx,cx,[u:[t:1to(xm1)]cx]smpr(xm1,u),g10,g14,t225):is(smpr(xm1,g10),smpr(xm1,g14))
-t227:=comq(c,smpr(xm1,g10),<xout(xp1)>g(xp1,s,f)):is(<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,<smpr(xm1,g10)><<xout(xp1)>g(xp1,s,f)>q)
-t228:=isf(cx,cx,<<xout(xp1)>g(xp1,s,f)>q,smpr(xm1,g10),smpr(xm1,g14),t226):is(<smpr(xm1,g10)><<xout(xp1)>g(xp1,s,f)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q)
-t229:=tris(cx,<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,<smpr(xm1,g10)><<xout(xp1)>g(xp1,s,f)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q,t227,t228):is(<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q)
-t230:=tris2(cx,<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,smpr(x,g12),<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q,t229,t211):is(<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,smpr(x,g12))
-t231:=isf(cx,cx,[t:cx]<<xout(xp1)>g(xp1,s4,f)><t>q,<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,smpr(x,g12),t230):is(<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q,<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q)
-t232:=symis(cx,smpr(xp1,g(xp1,s4,f)),<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q,t201):is(<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q,smpr(xp1,g(xp1,s4,f)))
-t233:=t46(s4,f,t174,t177):is(smpr(xp1,g(xp1,s4,f)),smpr(xp1,f))
-t234:=tr4is(cx,smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s,f)><smpr(x,g8)>q,<<xout(xp1)>g(xp1,s,f)><<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q>q,<<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q><<xout(xp1)>g(xp1,s4,f)>q,<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q,t179,t198,t199,t200):is(smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q)
-t235:=tr4is(cx,smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q,<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q,smpr(xp1,g(xp1,s4,f)),smpr(xp1,f),t234,t231,t232,t233):prop1(xp1,s,f)
-gamma@t236:=th1"l.imp"(is"n"(x,1),prop1(xp1,s,f),[t:is"n"(x,1)]t172(t),[t:not(is"n"(x,1))]t235(t)):prop1(xp1,s,f)
-i3@t237:=th1"l.imp"(is"e"(1to(xp1),b0,xout(xp1)),prop1(xp1,s,f),[t:is"e"(1to(xp1),b0,xout(xp1))]t236(t),[t:not(is"e"(1to(xp1),b0,xout(xp1)))]t148(t)):prop1(xp1,s,f)
-not2@t238:=th1"l.imp"(is"e"(1to(xp1),a0,xout(xp1)),prop1(xp1,s,f),[t:is"e"(1to(xp1),a0,xout(xp1))]t237(t),[t:not(is"e"(1to(xp1),a0,xout(xp1)))]t128(t)):prop1(xp1,s,f)
-not1@t239:=th1"l.imp"(is"e"(1to(xp1),<1out(xp1)>s,1out(xp1)),prop1(xp1,s,f),[t:is"e"(1to(xp1),<1out(xp1)>s,1out(xp1))]t97(t),[t:not(is"e"(1to(xp1),<1out(xp1)>s,1out(xp1)))]t238(t)):prop1(xp1,s,f)
-b@t240:=th1"l.imp"(is"e"(1to(xp1),<xout(xp1)>s,xout(xp1)),prop1(xp1,s,f),[t:is"e"(1to(xp1),<xout(xp1)>s,xout(xp1))]t46(t),[t:not(is"e"(1to(xp1),<xout(xp1)>s,xout(xp1)))]t239(t)):prop1(xp1,s,f)
-p@t241:=[u:[t:1to(xp1)]1to(xp1)][v:[t:1to(xp1)]cx][w:bijective(1to(xp1),1to(xp1),u)]t240(u,v,w):prop2(xp1)
-t242:=isp(nat,[t:nat]prop2(t),xp1,<x>suc,t241,satz4a(x)):prop2(<x>suc)
-x@t243:=induction([t:nat]prop2(t),t6,[t:nat][u:prop2(t)]t242(t,u),x):prop2(x)
--8283
-satz283:=<b><f><s>t243".8283":is(smpr(x,[t:1to(x)]<<t>s>f),smpr(x,f))
-@[x:real][ix:intrl(x)][y:real][iy:intrl(y)][ly:lessis(y,x)]
-shiftl:=shiftl"r"(x,ix,y,iy,ly):nat
-[n:1to(shiftl)]
-shiftr:=shiftr"r"(x,ix,y,iy,ly,n):real
-intshiftr:=intshiftr"r"(x,ix,y,iy,ly,n):intrl(shiftr)
-shiftrls:=shiftrls"r"(x,ix,y,iy,ly,n):lessis(shiftr,x)
-lsshiftr:=lsshiftr"r"(x,ix,y,iy,ly,n):lessis(y,shiftr)
-[m:1to(shiftl)][i:is"r"(shiftr(n),shiftr(m))]
-iseshiftr:=iseshiftr"r"(x,ix,y,iy,ly,n,m,i):is"e"(1to(shiftl),n,m)
-ly@[u:real][a:and3(intrl(u),lessis(y,u),lessis(u,x))]
-shiftl1:=shiftl1"r"(x,ix,y,iy,ly,u,a):1to(shiftl)
-shiftinv1:=shiftinv1"r"(x,ix,y,iy,ly,u,a):is"r"(u,shiftr(shiftl1))
-shiftinv2:=shiftinv2"r"(x,ix,y,iy,ly,u,a):is"r"(shiftr(shiftl1),u)
-ly@[f:seq(x,ix,y,iy,ly,cx)]
-shiftf:=shiftf(x,ix,y,iy,ly,cx,f):[t:1to(shiftl)]cx
-[q:[t:cx][u:cx]cx]
-smpri:=smpr(q,shiftl,shiftf):cx
-f@[pi:proofsirrelevant(x,ix,y,iy,ly,cx,f)][q:[t:cx][u:cx]cx][a:assoc(q)][u:real][iu:intrl(u)][l:lessis(y,u)][k:less(u,x)][v:real][iv:intrl(v)][lv:lessis(y,v)][kv:lessis(v,u)]
-+8284
-t1:=lessisi1(v,x,satz172a(v,u,x,kv,k)):lessis(v,x)
--8284
-k@lft:=[t:real][v:intrl(t)][lt:lessis(y,t)][kt:lessis(t,u)]<t1".8284"(t,v,lt,kt)><lt><v><t>f:[t:real][v:intrl(t)][lt:lessis(y,t)][kt:lessis(t,u)]cx
-iv@[lv:lessis(pl"r"(u,1rl),v)][kv:lessis(v,x)]
-+*8284
-x@[y:real]
-pl:=pl"r"(x,y):real
-mn:=mn"r"(x,y):real
-x@p1:=pl"r"(x,1rl):real
-kv@t2:=satz190c(u,u,0,1rl,lessisi2(u,u,refis(real,u)),lemma1"r"(1rl,0,satz169a(1rl,natpos(1rl,natrl1)))):less(pl(u,0),p1(u))
-t3:=isless1(pl(u,0),u,p1(u),pl02"r"(u,0,refis(real,0)),t2):less(u,p1(u))
-t4:=lessisi1(y,v,satz172b(y,p1(u),v,satz172a(y,u,p1(u),l,t3),lv)):lessis(y,v)
--8284
-k@rgt:=[t:real][v:intrl(t)][lt:lessis(pl"r"(u,1rl),t)][kt:lessis(t,x)]<kt><t4".8284"(t,v,lt,kt)><v><t>f:[t:real][v:intrl(t)][lt:lessis(pl"r"(u,1rl),t)][kt:lessis(t,x)]cx
-+*8284
-k@t5:=intpl(u,iu,1rl,intrl1):intrl(p1(u))
-t6:=satzr25(u,iu,x,ix,k):lessis(p1(u),x)
-t7:=tr3is(real,pl(mn(p1(u),y),mn(p1(x),p1(u))),pl(mn(p1(x),p1(u)),mn(p1(u),y)),mn(pl(mn(p1(x),p1(u)),p1(u)),y),mn(p1(x),y),compl"r"(mn(p1(u),y),mn(p1(x),p1(u))),asspl2"r"(mn(p1(x),p1(u)),p1(u),m0"r"(y)),ismn1"r"(pl(mn(p1(x),p1(u)),p1(u)),p1(x),y,plmn(p1(x),p1(u)))):is"r"(pl(mn(p1(u),y),mn(p1(x),p1(u))),mn(p1(x),y))
-sxy:=shiftl(x,ix,y,iy,ly):nat
-suy:=shiftl(u,iu,y,iy,l):nat
-sxu:=shiftl(x,ix,p1(u),t5,t6):nat
-t8:=tr4is(real,rlofnt(pl"n"(suy,sxu)),pl(rlofnt(suy),rlofnt(sxu)),pl(mn(p1(u),y),mn(p1(x),p1(u))),mn(p1(x),y),rlofnt(sxy),satzr155a(suy,sxu),ispl12"r"(rlofnt(suy),mn(p1(u),y),rlofnt(sxu),mn(p1(x),p1(u)),isrlnt2(mn(p1(u),y),t6"r.shift"(u,iu,y,iy,l)),isrlnt2(mn(p1(x),p1(u)),t6"r.shift"(x,ix,p1(u),t5,t6))),t7,isrlnt1(mn(p1(x),y),t6"r.shift"(x,ix,y,iy,ly))):is"r"(rlofnt(pl"n"(suy,sxu)),rlofnt(sxy))
-t9:=isntirl(pl"n"(suy,sxu),sxy,t8):is"n"(pl"n"(suy,sxu),sxy)
-t10:=lessisi2"n"(pl"n"(suy,sxu),sxy,t9):lessis"n"(pl"n"(suy,sxu),sxy)
-f1:=left(cx,sxy,pl"n"(suy,sxu),t10,shiftf(x,ix,y,iy,ly,f)):[t:1to(pl"n"(suy,sxu))]cx
-t11:=issmpr(q,sxy,shiftf(x,ix,y,iy,ly,f),pl"n"(suy,sxu),t9):is(smpr(q,pl"n"(suy,sxu),f1),smpri(x,ix,y,iy,ly,f,q))
-fr:=right(cx,suy,sxu,f1):[t:1to(sxu)]cx
-t12:=lessisi1"n"(suy,pl"n"(suy,sxu),satz18a(suy,sxu)):lessis"n"(suy,pl"n"(suy,sxu))
-fl:=left(cx,pl"n"(suy,sxu),suy,t12,f1):[t:1to(suy)]cx
-t12a:=satz281(q,a,suy,sxu,f1):is(smpr(q,pl"n"(suy,sxu),f1),<smpr(q,sxu,fr)><smpr(q,suy,fl)>q)
-[n:1to(sxu)]
-t13:=isinoutn(pl"n"(suy,sxu),pl"n"(suy,inn(sxu,n)),satz19o(inn(sxu,n),sxu,suy,1top(sxu,n))):is"n"(pl"n"(suy,inn(sxu,n)),inn(pl"n"(suy,sxu),right1to(suy,sxu,n)))
-t14:=isinoutn(sxy,inn(pl"n"(suy,sxu),right1to(suy,sxu,n)),trlessis"n"(inn(pl"n"(suy,sxu),right1to(suy,sxu,n)),pl"n"(suy,sxu),sxy,1top(pl"n"(suy,sxu),right1to(suy,sxu,n)),t10)):is"n"(inn(pl"n"(suy,sxu),right1to(suy,sxu,n)),inn(sxy,left1to(sxy,pl"n"(suy,sxu),t10,right1to(suy,sxu,n))))
-n1:=left1to(sxy,pl"n"(suy,sxu),t10,right1to(suy,sxu,n)):1to(sxy)
-t15:=tris(nat,pl"n"(suy,inn(sxu,n)),inn(pl"n"(suy,sxu),right1to(suy,sxu,n)),inn(sxy,n1),t13,t14):is"n"(pl"n"(suy,inn(sxu,n)),inn(sxy,n1))
-t16:=isnterl(pl"n"(suy,inn(sxu,n)),inn(sxy,n1),t15):is"r"(rlofnt(pl"n"(suy,inn(sxu,n))),rlofnt(inn(sxy,n1)))
-t17:=satzr155b(suy,inn(sxu,n)):is"r"(pl(rlofnt(suy),rlofnt(inn(sxu,n))),rlofnt(pl"n"(suy,inn(sxu,n))))
-t18:=ispl1"r"(mn(p1(u),y),rlofnt(suy),rlofnt(inn(sxu,n)),isrlnt1(mn(p1(u),y),t6"r.shift"(u,iu,y,iy,l))):is"r"(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),pl(rlofnt(suy),rlofnt(inn(sxu,n))))
-t19:=tr3is(real,pl(mn(p1(u),y),rlofnt(inn(sxu,n))),pl(rlofnt(suy),rlofnt(inn(sxu,n))),rlofnt(pl"n"(suy,inn(sxu,n))),rlofnt(inn(sxy,n1)),t18,t17,t16):is"r"(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),rlofnt(inn(sxy,n1)))
-t20:=ispl1"r"(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),rlofnt(inn(sxy,n1)),y,t19):is"r"(pl(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),y),pl(rlofnt(inn(sxy,n1)),y))
-t21:=tr3is(real,pl(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),y),pl(pl(rlofnt(inn(sxu,n)),mn(p1(u),y)),y),pl(rlofnt(inn(sxu,n)),pl(mn(p1(u),y),y)),pl(rlofnt(inn(sxu,n)),p1(u)),ispl1"r"(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),pl(rlofnt(inn(sxu,n)),mn(p1(u),y)),y,compl"r"(mn(p1(u),y),rlofnt(inn(sxu,n)))),asspl1"r"(rlofnt(inn(sxu,n)),mn(p1(u),y),y),ispl2"r"(pl(mn(p1(u),y),y),p1(u),rlofnt(inn(sxu,n)),plmn(p1(u),y))):is"r"(pl(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),y),pl(rlofnt(inn(sxu,n)),p1(u)))
-t22:=tris1(real,pl(rlofnt(inn(sxy,n1)),y),pl(rlofnt(inn(sxu,n)),p1(u)),pl(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),y),t20,t21):is"r"(pl(rlofnt(inn(sxy,n1)),y),pl(rlofnt(inn(sxu,n)),p1(u)))
-t23:=ismn1"r"(pl(rlofnt(inn(sxy,n1)),y),pl(rlofnt(inn(sxu,n)),p1(u)),1rl,t22):is"r"(shiftr(x,ix,y,iy,ly,n1),shiftr(x,ix,p1(u),t5,t6,n))
-t24:=intshiftr(x,ix,y,iy,ly,n1):intrl(shiftr(x,ix,y,iy,ly,n1))
-t25:=lsshiftr(x,ix,y,iy,ly,n1):lessis(y,shiftr(x,ix,y,iy,ly,n1))
-t26:=shiftrls(x,ix,y,iy,ly,n1):lessis(shiftr(x,ix,y,iy,ly,n1),x)
-t27:=intshiftr(x,ix,p1(u),t5,t6,n):intrl(shiftr(x,ix,p1(u),t5,t6,n))
-t28:=lsshiftr(x,ix,p1(u),t5,t6,n):lessis(p1(u),shiftr(x,ix,p1(u),t5,t6,n))
-t29:=shiftrls(x,ix,p1(u),t5,t6,n):lessis(shiftr(x,ix,p1(u),t5,t6,n),x)
-t30:=t4(shiftr(x,ix,p1(u),t5,t6,n),t27,t28,t29):lessis(y,shiftr(x,ix,p1(u),t5,t6,n))
-t31:=<t23><t29><t30><t27><shiftr(x,ix,p1(u),t5,t6,n)><t26><t25><t24><shiftr(x,ix,y,iy,ly,n1)>pi:is(<n>fr,<n>shiftf(x,ix,p1(u),t5,t6,rgt))
-k@t32:=fisi(1to(sxu),cx,fr,shiftf(x,ix,p1(u),t5,t6,rgt),[t:1to(sxu)]t31(t)):is"e"([t:1to(sxu)]cx,fr,shiftf(x,ix,p1(u),t5,t6,rgt))
-t33:=isf([t:1to(sxu)]cx,cx,[v:[t:1to(sxu)]cx]smpr(q,sxu,v),fr,shiftf(x,ix,p1(u),t5,t6,rgt),t32):is(smpr(q,sxu,fr),smpri(x,ix,p1(u),t5,t6,rgt,q))
-t34:=isf(cx,cx,<smpr(q,suy,fl)>q,smpr(q,sxu,fr),smpri(x,ix,p1(u),t5,t6,rgt,q),t33):is(<smpr(q,sxu,fr)><smpr(q,suy,fl)>q,<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpr(q,suy,fl)>q)
-[n:1to(suy)]
-t35:=isinoutn(pl"n"(suy,sxu),inn(suy,n),trlessis"n"(inn(suy,n),suy,pl"n"(suy,sxu),1top(suy,n),t12)):is"n"(inn(suy,n),inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)))
-t36:=isinoutn(sxy,inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),trlessis"n"(inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),pl"n"(suy,sxu),sxy,1top(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),t10)):is"n"(inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),inn(sxy,left1to(sxy,pl"n"(suy,sxu),t10,left1to(pl"n"(suy,sxu),suy,t12,n))))
-n2:=left1to(sxy,pl"n"(suy,sxu),t10,left1to(pl"n"(suy,sxu),suy,t12,n)):1to(sxy)
-t37:=tris(nat,inn(suy,n),inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),inn(sxy,n2),t35,t36):is"n"(inn(suy,n),inn(sxy,n2))
-t38:=isnterl(inn(suy,n),inn(sxy,n2),t37):is"r"(rlofnt(inn(suy,n)),rlofnt(inn(sxy,n2)))
-t39:=ispl1"r"(rlofnt(inn(suy,n)),rlofnt(inn(sxy,n2)),y,t38):is"r"(pl(rlofnt(inn(suy,n)),y),pl(rlofnt(inn(sxy,n2)),y))
-t40:=ismn1"r"(pl(rlofnt(inn(suy,n)),y),pl(rlofnt(inn(sxy,n2)),y),1rl,t39):is"r"(shiftr(u,iu,y,iy,l,n),shiftr(x,ix,y,iy,ly,n2))
-t41:=intshiftr(u,iu,y,iy,l,n):intrl(shiftr(u,iu,y,iy,l,n))
-t42:=lsshiftr(u,iu,y,iy,l,n):lessis(y,shiftr(u,iu,y,iy,l,n))
-t43:=shiftrls(u,iu,y,iy,l,n):lessis(shiftr(u,iu,y,iy,l,n),u)
-t44:=t1(shiftr(u,iu,y,iy,l,n),t41,t42,t43):lessis(shiftr(u,iu,y,iy,l,n),x)
-t45:=intshiftr(x,ix,y,iy,ly,n2):intrl(shiftr(x,ix,y,iy,ly,n2))
-t46:=lsshiftr(x,ix,y,iy,ly,n2):lessis(y,shiftr(x,ix,y,iy,ly,n2))
-t47:=shiftrls(x,ix,y,iy,ly,n2):lessis(shiftr(x,ix,y,iy,ly,n2),x)
-t48:=<t40><t47><t46><t45><shiftr(x,ix,y,iy,ly,n2)><t44><t42><t41><shiftr(u,iu,y,iy,l,n)>pi:is(<n>shiftf(u,iu,y,iy,l,lft),<n>fl)
-t49:=symis(cx,<n>shiftf(u,iu,y,iy,l,lft),<n>fl,t48):is(<n>fl,<n>shiftf(u,iu,y,iy,l,lft))
-k@t50:=fisi(1to(suy),cx,fl,shiftf(u,iu,y,iy,l,lft),[t:1to(suy)]t49(t)):is"e"([t:1to(suy)]cx,fl,shiftf(u,iu,y,iy,l,lft))
-t51:=isf([t:1to(suy)]cx,cx,[v:[t:1to(suy)]cx]smpr(q,suy,v),fl,shiftf(u,iu,y,iy,l,lft),t50):is(smpr(q,suy,fl),smpri(u,iu,y,iy,l,lft,q))
-t52:=isf(cx,cx,[t:cx]<smpri(x,ix,p1(u),t5,t6,rgt,q)><t>q,smpr(q,suy,fl),smpri(u,iu,y,iy,l,lft,q),t51):is(<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpr(q,suy,fl)>q,<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q)
-t53:=tr3is(cx,smpr(q,pl"n"(suy,sxu),f1),<smpr(q,sxu,fr)><smpr(q,suy,fl)>q,<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpr(q,suy,fl)>q,<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q,t12a,t34,t52):is(smpr(q,pl"n"(suy,sxu),f1),<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q)
--8284
-k@satz284:=tris1(cx,smpri(x,ix,y,iy,ly,f,q),<smpri(x,ix,pl"r"(u,1rl),intpl(u,iu,1rl,intrl1),satzr25(u,iu,x,ix,k),rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q,smpr(q,pl"n"(suy".8284",sxu".8284"),f1".8284"),t11".8284",t53".8284"):is(smpri(x,ix,y,iy,ly,f,q),<smpri(x,ix,pl"r"(u,1rl),intpl(u,iu,1rl,intrl1),satzr25(u,iu,x,ix,k),rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q)
-q@[v:real][iv:intrl(v)][w:real][iw:intrl(w)][lw:lessis(pl"r"(y,v),w)][kw:lessis(w,pl"r"(x,v))]
-+8285
-x@[y:real]
-pl:=pl"r"(x,y):real
-mn:=mn"r"(x,y):real
-x@p1:=pl"r"(x,1rl):real
-kw@t1:=th9"l.or"(less(pl(y,v),w),is"r"(pl(y,v),w),less(mn(pl(y,v),v),mn(w,v)),is"r"(mn(pl(y,v),v),mn(w,v)),lw,[t:less(pl(y,v),w)]satz188f(pl(y,v),w,m0"r"(v),t),[t:is"r"(pl(y,v),w)]ismn1"r"(pl(y,v),w,v,t)):lessis(mn(pl(y,v),v),mn(w,v))
-t2:=islessis1(mn(pl(y,v),v),y,mn(w,v),mnpl(y,v),t1):lessis(y,mn(w,v))
-t3:=th9"l.or"(less(w,pl(x,v)),is"r"(w,pl(x,v)),less(mn(w,v),mn(pl(x,v),v)),is"r"(mn(w,v),mn(pl(x,v),v)),kw,[t:less(w,pl(x,v))]satz188f(w,pl(x,v),m0"r"(v),t),[t:is"r"(w,pl(x,v))]ismn1"r"(w,pl(x,v),v,t)):lessis(mn(w,v),mn(pl(x,v),v))
-t4:=islessis2(mn(pl(x,v),v),x,mn(w,v),mnpl(x,v),t3):lessis(mn(w,v),x)
--8285
-iv@sft:=[t:real][w:intrl(t)][lt:lessis(pl"r"(y,v),t)][kt:lessis(t,pl"r"(x,v))]<t4".8285"(t,w,lt,kt)><t2".8285"(t,w,lt,kt)><intmn(t,w,v,iv)><mn"r"(t,v)>f:[t:real][w:intrl(t)][lt:lessis(pl"r"(y,v),t)][kt:lessis(t,pl"r"(x,v))]cx
-+*8285
-iv@t5:=tris(real,m0"r"(pl(y,v)),m0"r"(pl(v,y)),pl(m0"r"(v),m0"r"(y)),ism0"r"(pl(y,v),pl(v,y),compl"r"(y,v)),satz180(v,y)):is"r"(m0"r"(pl(y,v)),pl(m0"r"(v),m0"r"(y)))
-t6:=tr3is(real,mn(pl(1rl,pl(x,v)),v),pl(1rl,mn(pl(x,v),v)),pl(1rl,x),p1(x),asspl1"r"(1rl,pl(x,v),m0"r"(v)),ispl2"r"(mn(pl(x,v),v),x,1rl,mnpl(x,v)),compl"r"(1rl,x)):is"r"(mn(pl(1rl,pl(x,v)),v),p1(x))
-t7:=tr3is(real,mn(p1(pl(x,v)),pl(y,v)),pl(pl(1rl,pl(x,v)),pl(m0"r"(v),m0"r"(y))),mn(mn(pl(1rl,pl(x,v)),v),y),mn(p1(x),y),ispl12"r"(p1(pl(x,v)),pl(1rl,pl(x,v)),m0"r"(pl(y,v)),pl(m0"r"(v),m0"r"(y)),compl"r"(pl(x,v),1rl),t5),asspl2"r"(pl(1rl,pl(x,v)),m0"r"(v),m0"r"(y)),ismn1"r"(mn(pl(1rl,pl(x,v)),v),p1(x),y,t6)):is"r"(mn(p1(pl(x,v)),pl(y,v)),mn(p1(x),y))
-t8:=th9"l.or"(less(y,x),is"r"(y,x),less(pl(y,v),pl(x,v)),is"r"(pl(y,v),pl(x,v)),ly,[t:less(y,x)]satz188f(y,x,v,t),[t:is"r"(y,x)]ispl1"r"(y,x,v,t)):lessis(pl(y,v),pl(x,v))
-s0:=shiftl(x,ix,y,iy,ly):nat
-sv:=shiftl(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8):nat
-t9:=isrlent(mn(p1(pl(x,v)),pl(y,v)),t6"r.shift"(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8),mn(p1(x),y),t6"r.shift"(x,ix,y,iy,ly),t7):is"n"(sv,s0)
-t10:=lessisi2"n"(sv,s0,t9):lessis"n"(sv,s0)
-f1:=left(cx,s0,sv,t10,shiftf(x,ix,y,iy,ly,f)):[t:1to(sv)]cx
-t11:=issmpr(q,s0,shiftf(x,ix,y,iy,ly,f),sv,t9):is(smpr(q,sv,f1),smpri(x,ix,y,iy,ly,f,q))
-[n:1to(sv)]
-t12:=isinoutn(s0,inn(sv,n),trlessis"n"(inn(sv,n),sv,s0,1top(sv,n),t10)):is"n"(inn(sv,n),inn(s0,left1to(s0,sv,t10,n)))
-n1:=left1to(s0,sv,t10,n):1to(s0)
-t13:=isnterl(inn(sv,n),inn(s0,n1),t12):is"r"(rlofnt(inn(sv,n)),rlofnt(inn(s0,n1)))
-t14:=tris(real,mn(pl(rlofnt(inn(sv,n)),pl(y,v)),v),pl(rlofnt(inn(sv,n)),mn(pl(y,v),v)),pl(rlofnt(inn(s0,n1)),y),asspl1"r"(rlofnt(inn(sv,n)),pl(y,v),m0"r"(v)),ispl12"r"(rlofnt(inn(sv,n)),rlofnt(inn(s0,n1)),mn(pl(y,v),v),y,t13,mnpl(y,v))):is"r"(mn(pl(rlofnt(inn(sv,n)),pl(y,v)),v),pl(rlofnt(inn(s0,n1)),y))
-st0:=shiftr(x,ix,y,iy,ly,n1):real
-stv:=shiftr(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,n):real
-t15:=tr4is(real,mn(stv,v),pl(pl(rlofnt(inn(sv,n)),pl(y,v)),pl(m0"r"(1rl),m0"r"(v))),pl(pl(rlofnt(inn(sv,n)),pl(y,v)),pl(m0"r"(v),m0"r"(1rl))),mn(mn(pl(rlofnt(inn(sv,n)),pl(y,v)),v),1rl),st0,asspl1"r"(pl(rlofnt(inn(sv,n)),pl(y,v)),m0"r"(1rl),m0"r"(v)),ispl2"r"(pl(m0"r"(1rl),m0"r"(v)),pl(m0"r"(v),m0"r"(1rl)),pl(rlofnt(inn(sv,n)),pl(y,v)),compl"r"(m0"r"(1rl),m0"r"(v))),asspl2"r"(pl(rlofnt(inn(sv,n)),pl(y,v)),m0"r"(v),m0"r"(1rl)),ismn1"r"(mn(pl(rlofnt(inn(sv,n)),pl(y,v)),v),pl(rlofnt(inn(s0,n1)),y),1rl,t14)):is"r"(mn(stv,v),st0)
-t16:=intshiftr(x,ix,y,iy,ly,n1):intrl(st0)
-t17:=shiftrls(x,ix,y,iy,ly,n1):lessis(st0,x)
-t18:=lsshiftr(x,ix,y,iy,ly,n1):lessis(y,st0)
-t19:=intshiftr(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,n):intrl(stv)
-t20:=shiftrls(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,n):lessis(stv,pl(x,v))
-t21:=lsshiftr(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,n):lessis(pl(y,v),stv)
-t22:=intmn(stv,t19,v,iv):intrl(mn(stv,v))
-t23:=t2(stv,t19,t21,t20):lessis(y,mn(stv,v))
-t24:=t4(stv,t19,t21,t20):lessis(mn(stv,v),x)
-t25:=<t15><t17><t18><t16><st0><t24><t23><t22><mn(stv,v)>pi:is(<n>shiftf(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft),<n>f1)
-iv@t26:=fisi(1to(sv),cx,shiftf(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft),f1,[t:1to(sv)]t25(t)):is"e"([t:1to(sv)]cx,shiftf(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft),f1)
-t27:=isf([t:1to(sv)]cx,cx,[w:[t:1to(sv)]cx]smpr(q,sv,w),shiftf(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft),f1,t26):is(smpri(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft,q),smpr(q,sv,f1))
--8285
-iv@lemma285:=t8".8285":lessis(pl"r"(y,v),pl"r"(x,v))
-satz285:=tris(cx,smpri(pl"r"(x,v),intpl(x,ix,v,iv),pl"r"(y,v),intpl(y,iy,v,iv),lemma285,sft,q),smpr(q,sv".8285",f1".8285"),smpri(x,ix,y,iy,ly,f,q),t27".8285",t11".8285"):is(smpri(pl"r"(x,v),intpl(x,ix,v,iv),pl"r"(y,v),intpl(y,iy,v,iv),lemma285,sft,q),smpri(x,ix,y,iy,ly,f,q))
-ly@[s:seq(x,ix,y,iy,ly,real)][ins:inseq(x,ix,y,iy,ly,s)][f:seq(x,ix,y,iy,ly,cx)][u:real][iu:intrl(u)][lu:lessis(y,u)][ul:lessis(u,x)]
-us:=<ul><lu><iu><u>s:real
-+8286
-t1:=<ul><lu><iu><u>ins:and3(intrl(us),lessis(y,us),lessis(us,x))
--8286
-inseqe1:=t22"r.shift"(x,ix,y,iy,ly,us,t1".8286"):intrl(us)
-inseqe2:=t23"r.shift"(x,ix,y,iy,ly,us,t1".8286"):lessis(y,us)
-inseqe3:=t24"r.shift"(x,ix,y,iy,ly,us,t1".8286"):lessis(us,x)
-usf:=<inseqe3><inseqe2><inseqe1><us>f:cx
-f@permseq:=[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]usf(t,u,v,w):[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]cx
-q@[a:assoc(q)][c:commut(q)][s:seq(x,ix,y,iy,ly,real)][ins:inseq(x,ix,y,iy,ly,s)][pri:proofsirrelevant(x,ix,y,iy,ly,real,s)][ps:perm(x,ix,y,iy,ly,s)]
-+*8286
-ps@ss:=shiftseq(x,ix,y,iy,ly,s,ins):[t:1to(shiftl)]1to(shiftl)
-t2:=satz283(q,a,c,shiftl,ss,bijshiftseq(x,ix,y,iy,ly,s,ins,pri,ps),shiftf(f)):is(smpr(q,shiftl,[t:1to(shiftl)]<<t>ss>shiftf(f)),smpri(f,q))
-[n:1to(shiftl)]
-ns:=us(s,ins,f,shiftr(n),intshiftr(n),lsshiftr(n),shiftrls(n)):real
-t3:=shiftinv1(ns,t34"r.shift"(x,ix,y,iy,ly,s,ins,n)):is"r"(ns,shiftr(<n>ss))
-t4:=inseqe1(s,ins,f,shiftr(n),intshiftr(n),lsshiftr(n),shiftrls(n)):intrl(ns)
-t5:=inseqe2(s,ins,f,shiftr(n),intshiftr(n),lsshiftr(n),shiftrls(n)):lessis(y,ns)
-t6:=inseqe3(s,ins,f,shiftr(n),intshiftr(n),lsshiftr(n),shiftrls(n)):lessis(ns,x)
-t7:=intshiftr(<n>ss):intrl(shiftr(<n>ss))
-t8:=lsshiftr(<n>ss):lessis(y,shiftr(<n>ss))
-t9:=shiftrls(<n>ss):lessis(shiftr(<n>ss),x)
-t10:=<t3><t9><t8><t7><shiftr(<n>ss)><t6><t5><t4><ns>pi:is(<n>shiftf(permseq(s,ins,f)),<<n>ss>shiftf(f))
-ps@t11:=fisi(1to(shiftl),cx,shiftf(permseq(s,ins,f)),[t:1to(shiftl)]<<t>ss>shiftf(f),[t:1to(shiftl)]t10(t)):is"e"([t:1to(shiftl)]cx,shiftf(permseq(s,ins,f)),[t:1to(shiftl)]<<t>ss>shiftf(f))
-t12:=isf([t:1to(shiftl)]cx,cx,[u:[t:1to(shiftl)]cx]smpr(q,shiftl,u),shiftf(permseq(s,ins,f)),[t:1to(shiftl)]<<t>ss>shiftf(f),t11):is(smpri(permseq(s,ins,f),q),smpr(q,shiftl,[t:1to(shiftl)]<<t>ss>shiftf(f)))
--8286
-ps@satz286:=tris(cx,smpri(permseq(s,ins,f),q),smpr(q,shiftl,[t:1to(shiftl)]<<t>ss".8286">shiftf(f)),smpri(f,q),t12".8286",t2".8286"):is(smpri(permseq(s,ins,f),q),smpri(f,q))
-@[x:nat][f:[t:1to(x)]cx]
-modf:=[t:1to(x)]pli(mod(<t>f),0):[t:1to(x)]cx
-+8287
-[r:real]
-prop1:=lessis(mod(sum(x,f)),r):'prop'
-prop2:=is(sum(x,modf(f)),pli(r,0)):'prop'
-prop3:=and(prop1,prop2):'prop'
-f@prop4:=some"r"([t:real]prop3(t)):'prop'
-x@prop5:=[u:[t:1to(x)]cx]prop4(u):'prop'
-@[f:[t:1to(1)]cx]
-t1:=satz277([t:cx][u:cx]pl(t,u),f):is(sum(1,f),<xout(1)>f)
-t2:=ismod(sum(1,f),<xout(1)>f,t1):is"r"(mod(sum(1,f)),mod(<xout(1)>f))
-t3:=lessisi2(mod(sum(1,f)),mod(<xout(1)>f),t2):prop1(1,f,mod(<xout(1)>f))
-t4:=satz277([t:cx][u:cx]pl(t,u),modf(1,f)):prop2(1,f,mod(<xout(1)>f))
-t5:=andi(prop1(1,f,mod(<xout(1)>f)),prop2(1,f,mod(<xout(1)>f)),t3,t4):prop3(1,f,mod(<xout(1)>f))
-t6:=somei(real,[t:real]prop3(1,f,t),mod(<xout(1)>f),t5):prop4(1,f)
-@t7:=[u:[t:1to(1)]cx]t6(u):prop5(1)
-x@[p:prop5(x)][f:[t:1to(pl"n"(x,1))]cx]
-t8:=lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)):lessis"n"(x,pl"n"(x,1))
-lf:=left(cx,pl"n"(x,1),x,t8,f):[t:1to(x)]cx
-[r:real][pr:prop3(lf,r)]
-t9:=ande1(prop1(lf,r),prop2(lf,r),pr):prop1(lf,r)
-t10:=ande2(prop1(lf,r),prop2(lf,r),pr):prop2(lf,r)
-t11:=satz278([t:cx][u:cx]pl(t,u),x,f):is(sum(pl"n"(x,1),f),pl(sum(x,lf),<xout(pl"n"(x,1))>f))
-t12:=ismod(pl(sum(x,lf),<xout(pl"n"(x,1))>f),sum(pl"n"(x,1),f),symis(cx,sum(pl"n"(x,1),f),pl(sum(x,lf),<xout(pl"n"(x,1))>f),t11)):is"r"(mod(pl(sum(x,lf),<xout(pl"n"(x,1))>f)),mod(sum(pl"n"(x,1),f)))
-m:=mod(<xout(pl"n"(x,1))>f):real
-t13:=islessis1(mod(pl(sum(x,lf),<xout(pl"n"(x,1))>f)),mod(sum(pl"n"(x,1),f)),pl"r"(mod(sum(x,lf)),m),t12,satz271(sum(x,lf),<xout(pl"n"(x,1))>f)):lessis(mod(sum(pl"n"(x,1),f)),pl"r"(mod(sum(x,lf)),m))
-t14:=th9"l.or"(less(mod(sum(x,lf)),r),is"r"(mod(sum(x,lf)),r),less(pl"r"(mod(sum(x,lf)),m),pl"r"(r,m)),is"r"(pl"r"(mod(sum(x,lf)),m),pl"r"(r,m)),t9,[t:less(mod(sum(x,lf)),r)]satz188f(mod(sum(x,lf)),r,m,t),[t:is"r"(mod(sum(x,lf)),r)]ispl1"r"(mod(sum(x,lf)),r,m,t)):lessis(pl"r"(mod(sum(x,lf)),m),pl"r"(r,m))
-t15:=trlessis(mod(sum(pl"n"(x,1),f)),pl"r"(mod(sum(x,lf)),m),pl"r"(r,m),t13,t14):prop1(pl"n"(x,1),f,pl"r"(r,m))
-lmf:=left(cx,pl"n"(x,1),x,t8,modf(pl"n"(x,1),f)):[t:1to(x)]cx
-t16:=satz278([t:cx][u:cx]pl(t,u),x,modf(pl"n"(x,1),f)):is(sum(pl"n"(x,1),modf(pl"n"(x,1),f)),pl(sum(x,lmf),pli(m,0)))
-t17:=ispl1(sum(x,lmf),pli(r,0),pli(m,0),t10):is(pl(sum(x,lmf),pli(m,0)),pl(pli(r,0),pli(m,0)))
-t18:=plis12a(r,0,m,0):is(pl(pli(r,0),pli(m,0)),pli(pl"r"(r,m),pl"r"(0,0)))
-t19:=isrecx2(pl"r"(0,0),0,pl"r"(r,m),pl01"r"(0,0,refis(real,0))):is(pli(pl"r"(r,m),pl"r"(0,0)),pli(pl"r"(r,m),0))
-t20:=tr4is(cx,sum(pl"n"(x,1),modf(pl"n"(x,1),f)),pl(sum(x,lmf),pli(m,0)),pl(pli(r,0),pli(m,0)),pli(pl"r"(r,m),pl"r"(0,0)),pli(pl"r"(r,m),0),t16,t17,t18,t19):prop2(pl"n"(x,1),f,pl"r"(r,m))
-t21:=andi(prop1(pl"n"(x,1),f,pl"r"(r,m)),prop2(pl"n"(x,1),f,pl"r"(r,m)),t15,t20):prop3(pl"n"(x,1),f,pl"r"(r,m))
-t22:=somei(real,[t:real]prop3(pl"n"(x,1),f,t),pl"r"(r,m),t21):prop4(pl"n"(x,1),f)
-f@t23:=someapp(real,[t:real]prop3(lf,t),<lf>p,prop4(pl"n"(x,1),f),[t:real][u:prop3(lf,t)]t22(t,u)):prop4(pl"n"(x,1),f)
-p@t25:=[u:[t:1to(pl"n"(x,1))]cx]t23(u):prop5(pl"n"(x,1))
-t26:=isp(nat,[t:nat]prop5(t),pl"n"(x,1),<x>suc,t25,satz4a(x)):prop5(<x>suc)
--8287
-satz287:=<f>induction([t:nat]prop5".8287"(t),t7".8287",[t:nat][u:prop5".8287"(t)]t26".8287"(t,u),x):some"r"([t:real]and(lessis(mod(sum(x,f)),t),is(sum(x,modf(f)),pli(t,0))))
-+8288
-prop1:=is(pli(mod(prod(x,f)),0),prod(x,modf(f))):'prop'
-x@prop2:=[u:[t:1to(x)]cx]prop1(u):'prop'
-@[f:[t:1to(1)]cx]
-t1:=satz277([t:cx][u:cx]ts(t,u),f):is(prod(1,f),<xout(1)>f)
-t2:=ismod(prod(1,f),<xout(1)>f,t1):is"r"(mod(prod(1,f)),mod(<xout(1)>f))
-t3:=isrecx1(mod(prod(1,f)),mod(<xout(1)>f),0,t2):is(pli(mod(prod(1,f)),0),pli(mod(<xout(1)>f),0))
-t4:=satz277([t:cx][u:cx]ts(t,u),modf(1,f)):is(prod(1,modf(1,f)),pli(mod(<xout(1)>f),0))
-t5:=tris2(cx,pli(mod(prod(1,f)),0),prod(1,modf(1,f)),pli(mod(<xout(1)>f),0),t3,t4):prop1(1,f)
-@t6:=[u:[t:1to(1)]cx]t5(u):prop2(1)
-x@[p:prop2(x)][f:[t:1to(pl"n"(x,1))]cx]
-t7:=lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)):lessis"n"(x,pl"n"(x,1))
-lf:=left(cx,pl"n"(x,1),x,t7,f):[t:1to(x)]cx
-t8:=satz278([t:cx][u:cx]ts(t,u),x,f):is(prod(pl"n"(x,1),f),ts(prod(x,lf),<xout(pl"n"(x,1))>f))
-m:=mod(<xout(pl"n"(x,1))>f):real
-t9:=ismod(prod(pl"n"(x,1),f),ts(prod(x,lf),<xout(pl"n"(x,1))>f),t8):is"r"(mod(prod(pl"n"(x,1),f)),mod(ts(prod(x,lf),<xout(pl"n"(x,1))>f)))
-t10:=satz268(prod(x,lf),<xout(pl"n"(x,1))>f):is"r"(mod(ts(prod(x,lf),<xout(pl"n"(x,1))>f)),ts"r"(mod(prod(x,lf)),m))
-t11:=tris(real,mod(prod(pl"n"(x,1),f)),mod(ts(prod(x,lf),<xout(pl"n"(x,1))>f)),ts"r"(mod(prod(x,lf)),m),t9,t10):is"r"(mod(prod(pl"n"(x,1),f)),ts"r"(mod(prod(x,lf)),m))
-t12:=isrecx1(mod(prod(pl"n"(x,1),f)),ts"r"(mod(prod(x,lf)),m),0,t11):is(pli(mod(prod(pl"n"(x,1),f)),0),pli(ts"r"(mod(prod(x,lf)),m),0))
-lmf:=left(cx,pl"n"(x,1),x,t7,modf(pl"n"(x,1),f)):[t:1to(x)]cx
-t13:=satz278([t:cx][u:cx]ts(t,u),x,modf(pl"n"(x,1),f)):is(prod(pl"n"(x,1),modf(pl"n"(x,1),f)),ts(prod(x,lmf),pli(m,0)))
-t14:=symis(cx,pli(mod(prod(x,lf)),0),prod(x,lmf),<lf>p):is(prod(x,lmf),pli(mod(prod(x,lf)),0))
-t15:=ists1(prod(x,lmf),pli(mod(prod(x,lf)),0),pli(m,0),t14):is(ts(prod(x,lmf),pli(m,0)),ts(pli(mod(prod(x,lf)),0),pli(m,0)))
-t16:=tsis12a(mod(prod(x,lf)),0,m,0):is(ts(pli(mod(prod(x,lf)),0),pli(m,0)),pli(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m))))
-t17:=tris(real,mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),mn"r"(ts"r"(mod(prod(x,lf)),m),0),ts"r"(mod(prod(x,lf)),m),ismn2"r"(ts"r"(0,0),0,ts"r"(mod(prod(x,lf)),m),ts01"r"(0,0,refis(real,0))),pl02"r"(ts"r"(mod(prod(x,lf)),m),m0"r"(0),satz176b(0,refis(real,0)))):is"r"(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),ts"r"(mod(prod(x,lf)),m))
-t18:=tris(real,pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m)),pl"r"(0,0),0,ispl12"r"(ts"r"(mod(prod(x,lf)),0),0,ts"r"(0,m),0,ts02"r"(mod(prod(x,lf)),0,refis(real,0)),ts01"r"(0,m,refis(real,0))),pl01"r"(0,0,refis(real,0))):is"r"(pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m)),0)
-t19:=isrecx12(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),ts"r"(mod(prod(x,lf)),m),pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m)),0,t17,t18):is(pli(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m))),pli(ts"r"(mod(prod(x,lf)),m),0))
-t20:=tr4is(cx,prod(pl"n"(x,1),modf(pl"n"(x,1),f)),ts(prod(x,lmf),pli(m,0)),ts(pli(mod(prod(x,lf)),0),pli(m,0)),pli(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m))),pli(ts"r"(mod(prod(x,lf)),m),0),t13,t15,t16,t19):is(prod(pl"n"(x,1),modf(pl"n"(x,1),f)),pli(ts"r"(mod(prod(x,lf)),m),0))
-t21:=tris2(cx,pli(mod(prod(pl"n"(x,1),f)),0),prod(pl"n"(x,1),modf(pl"n"(x,1),f)),pli(ts"r"(mod(prod(x,lf)),m),0),t12,t20):prop1(pl"n"(x,1),f)
-p@t21a:=[u:[t:1to(pl"n"(x,1))]cx]t21(u):prop2(pl"n"(x,1))
-t22:=isp(nat,[t:nat]prop2(t),pl"n"(x,1),<x>suc,t21a,satz4a(x)):prop2(<x>suc)
--8288
-satz288:=<f>induction([t:nat]prop2".8288"(t),t6".8288",[t:nat][u:prop2".8288"(t)]t22".8288"(t,u),x):is(pli(mod(prod(x,f)),0),prod(x,modf(f)))
-+8289
-prop1:=is(prod(x,f),0c):'prop'
-prop2:=some"l"(1to(x),[t:1to(x)]is(<t>f,0c)):'prop'
-prop3:=iff(prop1,prop2):'prop'
-x@prop4:=[u:[t:1to(x)]cx]prop3(u):'prop'
-@[f:[t:1to(1)]cx]
-t1:=satz277([t:cx][u:cx]ts(t,u),f):is(prod(1,f),<xout(1)>f)
-[p:prop1(1,f)]
-t2:=tris1(cx,<xout(1)>f,0c,prod(1,f),t1,p):is(<xout(1)>f,0c)
-t3:=somei(1to(1),[t:1to(1)]is(<t>f,0c),xout(1),t2):prop2(1,f)
-f@[p:prop2(1,f)][u:1to(1)][i:is(<u>f,0c)]
-t4:=th1"n.singlet"(u):is"e"(1to(1),u,xout(1))
-t5:=tr3is(cx,prod(1,f),<xout(1)>f,<u>f,0c,t1,isf(1to(1),cx,f,xout(1),u,symis(1to(1),u,xout(1),t4)),i):prop1(1,f)
-p@t6:=someapp(1to(1),[t:1to(1)]is(<t>f,0c),p,prop1(1,f),[t:1to(1)][u:is(<t>f,0c)]t5(t,u)):prop1(1,f)
-f@t7:=iffi(prop1(1,f),prop2(1,f),[t:prop1(1,f)]t3(t),[t:prop2(1,f)]t6(t)):prop3(1,f)
-@t8:=[u:[t:1to(1)]cx]t7(u):prop4(1)
-x@[p:prop4(x)][f:[t:1to(pl"n"(x,1))]cx]
-t9:=lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)):lessis"n"(x,pl"n"(x,1))
-lf:=left(cx,pl"n"(x,1),x,t9,f):[t:1to(x)]cx
-t10:=satz278([t:cx][u:cx]ts(t,u),x,f):is(prod(pl"n"(x,1),f),ts(prod(x,lf),<xout(pl"n"(x,1))>f))
-[q:prop1(pl"n"(x,1),f)]
-t11:=tris1(cx,ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c,prod(pl"n"(x,1),f),t10,q):is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c)
-t12:=satz221c(prod(x,lf),<xout(pl"n"(x,1))>f,t11):or(is(prod(x,lf),0c),is(<xout(pl"n"(x,1))>f,0c))
-[i:is(prod(x,lf),0c)]
-t13:=th3"l.iff"(prop1(x,lf),prop2(x,lf),<lf>p,i):prop2(x,lf)
-[n:1to(x)][j:is(<n>lf,0c)]
-t14:=somei(1to(pl"n"(x,1)),[t:1to(pl"n"(x,1))]is(<t>f,0c),left1to(pl"n"(x,1),x,t9,n),j):prop2(pl"n"(x,1),f)
-i@t15:=someapp(1to(x),[t:1to(x)]is(<t>lf,0c),t13,prop2(pl"n"(x,1),f),[t:1to(x)][u:is(<t>lf,0c)]t14(t,u)):prop2(pl"n"(x,1),f)
-q@[i:is(<xout(pl"n"(x,1))>f,0c)]
-t16:=somei(1to(pl"n"(x,1)),[t:1to(pl"n"(x,1))]is(<t>f,0c),xout(pl"n"(x,1)),i):prop2(pl"n"(x,1),f)
-q@t17:=orapp(is(prod(x,lf),0c),is(<xout(pl"n"(x,1))>f,0c),prop2(pl"n"(x,1),f),t12,[t:is(prod(x,lf),0c)]t15(t),[t:is(<xout(pl"n"(x,1))>f,0c)]t16(t)):prop2(pl"n"(x,1),f)
-f@[q:prop2(pl"n"(x,1),f)][n:1to(pl"n"(x,1))][i:is(<n>f,0c)][j:is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1)))]
-t18:=tris1(cx,<xout(pl"n"(x,1))>f,0c,<n>f,isf(1to(pl"n"(x,1)),cx,f,n,xout(pl"n"(x,1)),j),i):is(<xout(pl"n"(x,1))>f,0c)
-t20:=satz221b(prod(x,lf),<xout(pl"n"(x,1))>f,t18):is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c)
-i@[m:not(is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1))))]
-n1:=inn(pl"n"(x,1),n):nat
-[j:is"n"(n1,pl"n"(x,1))]
-t21:=isoutni(pl"n"(x,1),n1,1top(pl"n"(x,1),n),pl"n"(x,1),lessisi3(pl"n"(x,1)),j):is"e"(1to(pl"n"(x,1)),outn(pl"n"(x,1),n1,1top(pl"n"(x,1),n)),xout(pl"n"(x,1)))
-t22:=tris(1to(pl"n"(x,1)),n,outn(pl"n"(x,1),n1,1top(pl"n"(x,1),n)),xout(pl"n"(x,1)),isoutinn(pl"n"(x,1),n),t21):is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1)))
-m@t23:=th3"l.imp"(is"n"(n1,pl"n"(x,1)),is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1))),m,[t:is"n"(n1,pl"n"(x,1))]t22(t)):nis"n"(n1,pl"n"(x,1))
-t24:=ore1(less"n"(n1,pl"n"(x,1)),is"n"(n1,pl"n"(x,1)),1top(pl"n"(x,1),n),t23):less"n"(n1,pl"n"(x,1))
-t25:=satz26(x,n1,t24):lessis"n"(n1,x)
-n2:=outn(x,n1,t25):1to(x)
-t26:=isinoutn(x,n1,t25):is"n"(n1,inn(x,n2))
-t27:=isoutni(pl"n"(x,1),n1,1top(pl"n"(x,1),n),inn(x,n2),trlessis"n"(inn(x,n2),x,pl"n"(x,1),1top(x,n2),t9),t26):is"e"(1to(pl"n"(x,1)),outn(pl"n"(x,1),n1,1top(pl"n"(x,1),n)),left1to(pl"n"(x,1),x,t9,n2))
-t28:=tris(1to(pl"n"(x,1)),n,outn(pl"n"(x,1),n1,1top(pl"n"(x,1),n)),left1to(pl"n"(x,1),x,t9,n2),isoutinn(pl"n"(x,1),n),t27):is"e"(1to(pl"n"(x,1)),n,left1to(pl"n"(x,1),x,t9,n2))
-t29:=isf(1to(pl"n"(x,1)),cx,f,n,left1to(pl"n"(x,1),x,t9,n2),t28):is(<n>f,<n2>lf)
-t30:=tris1(cx,<n2>lf,0c,<n>f,t29,i):is(<n2>lf,0c)
-t31:=somei(1to(x),[t:1to(x)]is(<t>lf,0c),n2,t30):prop2(x,lf)
-t32:=th4"l.iff"(prop1(x,lf),prop2(x,lf),<lf>p,t31):prop1(x,lf)
-t34:=satz221a(prod(x,lf),<xout(pl"n"(x,1))>f,t32):is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c)
-i@t35:=th1"l.imp"(is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1))),is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c),[t:is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1)))]t20(t),[t:not(is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1))))]t34(t)):is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c)
-t36:=tris(cx,prod(pl"n"(x,1),f),ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c,t10,t35):prop1(pl"n"(x,1),f)
-q@t37:=someapp(1to(pl"n"(x,1)),[t:1to(pl"n"(x,1))]is(<t>f,0c),q,prop1(pl"n"(x,1),f),[t:1to(pl"n"(x,1))][u:is(<t>f,0c)]t36(t,u)):prop1(pl"n"(x,1),f)
-f@t38:=iffi(prop1(pl"n"(x,1),f),prop2(pl"n"(x,1),f),[t:prop1(pl"n"(x,1),f)]t17(t),[t:prop2(pl"n"(x,1),f)]t37(t)):prop3(pl"n"(x,1),f)
-p@t39:=[u:[t:1to(pl"n"(x,1))]cx]t38(u):prop4(pl"n"(x,1))
-t40:=isp(nat,[t:nat]prop4(t),pl"n"(x,1),<x>suc,t39,satz4a(x)):prop4(<x>suc)
--8289
-satz289:=<f>induction([t:nat]prop4".8289"(t),t8".8289",[t:nat][u:prop4".8289"(t)]t40".8289"(t,u),x):iff(is(prod(x,f),0c),some"l"(1to(x),[t:1to(x)]is(<t>f,0c)))
-[i:is(prod(x,f),0c)]
-satz289a:=th3"l.iff"(prop1".8289",prop2".8289",satz289,i):some"l"(1to(x),[t:1to(x)]is(<t>f,0c))
-f@[n:1to(x)][i:is(<n>f,0c)]
-+*8289
-i"c"@t41:=somei(1to(x),[t:1to(x)]is(<t>f,0c),n,i):prop2
--8289
-i@satz289b:=th4"l.iff"(prop1".8289",prop2".8289",satz289,t41".8289"):is(prod(x,f),0c)
-@[x:complex][m:real][mi:intrl(m)][o:or(nis(x,0c),pos(m))]
-+v9
-[p:pos(m)]
-t1:=posintnatrl(m,p,mi):natrl(m)
-m1:=ntofrl(m,t1):nat
-pw1:=prod(m1,[t:1to(m1)]x):cx
--v9
-x@[y:complex][m:real][n:real][i:is(x,y)][j:is"r"(m,n)][mi1:intrl(m)][ni1:intrl(n)][ox:or(nis(x,0c),pos(m))][oy:or(nis(y,0c),pos(n))]
-+*v9
-oy@[mp:pos(m)][np:pos(n)]
-m0:=m1(x,m,mi1,ox,mp):nat
-n0:=m1(y,n,ni1,oy,np):nat
-t2:=isrlent(m,t1(x,m,mi1,ox,mp),n,t1(y,n,ni1,oy,np),j):is"n"(m0,n0)
-t3:=lessisi2"n"(m0,n0,t2):lessis"n"(m0,n0)
-t4:=issmpr([t:cx][u:cx]ts(t,u),n0,[t:1to(n0)]y,m0,t2):is(prod(m0,left(cx,n0,m0,t3,[t:1to(n0)]y)),pw1(y,n,ni1,oy,np))
-t5:=fisi(1to(m0),cx,[t:1to(m0)]x,left(cx,n0,m0,t3,[t:1to(n0)]y),[t:1to(m0)]i):is"e"([t:1to(m0)]cx,[t:1to(m0)]x,left(cx,n0,m0,t3,[t:1to(n0)]y))
-t6:=isf([t:1to(m0)]cx,cx,[u:[t:1to(m0)]cx]prod(m0,u),[t:1to(m0)]x,left(cx,n0,m0,t3,[t:1to(n0)]y),t5):is(pw1(x,m,mi1,ox,mp),prod(m0,left(cx,n0,m0,t3,[t:1to(n0)]y)))
-t7:=tris(cx,pw1(x,m,mi1,ox,mp),prod(m0,left(cx,n0,m0,t3,[t:1to(n0)]y)),pw1(y,n,ni1,oy,np),t6,t4):is(pw1(x,m,mi1,ox,mp),pw1(y,n,ni1,oy,np))
-p@[p1:pos(m)]
-t8:=t7(x,x,m,m,refis(cx,x),refis(real,m),mi,mi,o,o,p,p1):is(pw1(p),pw1(p1))
-p@[n:nis(x,0c)]
-t9:=th5"l.some"(1to(m1),[t:1to(m1)]is(<t>[u:1to(m1)]x,0c),[t:1to(m1)]n):not(some"l"(1to(m1),[t:1to(m1)]is(<t>[u:1to(m1)]x,0c)))
-t10:=th3"l.imp"(is(pw1,0c),some"l"(1to(m1),[t:1to(m1)]is(<t>[u:1to(m1)]x,0c)),t9,[t:is(pw1,0c)]satz289a(m1,[u:1to(m1)]x,t)):nis(pw1,0c)
-o@[n:neg(m)]
-mi@t11:=intabs(m,mi):intrl(abs(m))
-n@t12:=satz166b(m,n):pos(abs(m))
-t13:=ori2(nis(x,0c),pos(abs(m)),t12):or(nis(x,0c),pos(abs(m)))
-t14:=ore1(nis(x,0c),pos(m),o,nnotp(m,n)):nis(x,0c)
-t15:=t10(abs(m),t11,t13,t12,t14):nis(pw1(abs(m),t11,t13,t12),0c)
-pw2:=ov(1c,pw1(abs(m),t11,t13,t12),t15):cx
-oy@[nm:neg(m)][nn:neg(n)]
-pwm:=pw1(x,abs(m),t11(x,m,mi1),t13(x,m,mi1,ox,nm),t12(x,m,mi1,ox,nm)):cx
-pwn:=pw1(y,abs(n),t11(y,n,ni1),t13(y,n,ni1,oy,nn),t12(y,n,ni1,oy,nn)):cx
-t16:=t7(abs(m),abs(n),i,isabs(m,n,j),t11(x,m,mi1),t11(y,n,ni1),t13(x,m,mi1,ox,nm),t13(y,n,ni1,oy,nn),t12(x,m,mi1,ox,nm),t12(y,n,ni1,oy,nn)):is(pwm,pwn)
-t17:=isov2(pwm,pwn,1c,t16,t15(x,m,mi1,ox,nm),t15(y,n,ni1,oy,nn)):is(pw2(x,m,mi1,ox,nm),pw2(y,n,ni1,oy,nn))
-n@[n1:neg(m)]
-t18:=t17(x,x,m,m,refis(cx,x),refis(real,m),mi,mi,o,o,n,n1):is(pw2(n),pw2(n1))
-o@pw3:=ite"l.r"(neg(m),cx,[t:neg(m)]pw2(t),[t:not(neg(m))]1c,[t:neg(m)][u:neg(m)]t18(t,u),[t:not(neg(m))][u:not(neg(m))]refis(cx,1c)):cx
-n@t19:=itet"l.r"(neg(m),cx,[t:neg(m)]pw2(t),[t:not(neg(m))]1c,[t:neg(m)][u:neg(m)]t18(t,u),[t:not(neg(m))][u:not(neg(m))]refis(cx,1c),n):is(pw3,pw2(n))
-o@[nn:not(neg(m))]
-t20:=itef"l.r"(neg(m),cx,[t:neg(m)]pw2(t),[t:not(neg(m))]1c,[t:neg(m)][u:neg(m)]t18(t,u),[t:not(neg(m))][u:not(neg(m))]refis(cx,1c),nn):is(pw3,1c)
-nm@t21:=isp(real,[t:real]neg(t),m,n,nm,j):neg(n)
-t22:=t19(x,m,mi1,ox,nm):is(pw3(x,m,mi1,ox),pw2(x,m,mi1,ox,nm))
-t23:=symis(cx,pw3(y,n,ni1,oy),pw2(y,n,ni1,oy,t21),t19(y,n,ni1,oy,t21)):is(pw2(y,n,ni1,oy,t21),pw3(y,n,ni1,oy))
-t24:=tr3is(cx,pw3(x,m,mi1,ox),pw2(x,m,mi1,ox,nm),pw2(y,n,ni1,oy,t21),pw3(y,n,ni1,oy),t22,t17(t21),t23):is(pw3(x,m,mi1,ox),pw3(y,n,ni1,oy))
-oy@[nn:not(neg(m))]
-t25:=isp(real,[t:real]not(neg(t)),m,n,nn,j):not(neg(n))
-t26:=t20(x,m,mi1,ox,nn):is(pw3(x,m,mi1,ox),1c)
-t27:=t20(y,n,ni1,oy,t25):is(pw3(y,n,ni1,oy),1c)
-t28:=tris2(cx,pw3(x,m,mi1,ox),pw3(y,n,ni1,oy),1c,t26,t27):is(pw3(x,m,mi1,ox),pw3(y,n,ni1,oy))
-oy@t29:=th1"l.imp"(neg(m),is(pw3(x,m,mi1,ox),pw3(y,n,ni1,oy)),[t:neg(m)]t24(t),[t:not(neg(m))]t28(t)):is(pw3(x,m,mi1,ox),pw3(y,n,ni1,oy))
--v9
-o@pw:=ite"l.r"(pos(m),cx,[t:pos(m)]pw1".v9"(t),[t:not(pos(m))]pw3".v9",[t:pos(m)][u:pos(m)]t8".v9"(t,u),[t:not(pos(m))][u:not(pos(m))]refis(cx,pw3".v9")):cx
-+*v9
-p@t30:=itet"l.r"(pos(m),cx,[t:pos(m)]pw1(t),[t:not(pos(m))]pw3,[t:pos(m)][u:pos(m)]t8(t,u),[t:not(pos(m))][u:not(pos(m))]refis(cx,pw3),p):is(pw,pw1(p))
-o@[n:not(pos(m))]
-t31:=itef"l.r"(pos(m),cx,[t:pos(m)]pw1(t),[t:not(pos(m))]pw3,[t:pos(m)][u:pos(m)]t8(t,u),[t:not(pos(m))][u:not(pos(m))]refis(cx,pw3),n):is(pw,pw3)
-o@[i:is"r"(m,0)]
-t32:=tris(cx,pw,pw3,1c,t31(0notp(m,i)),t20(0notn(m,i))):is(pw,1c)
-o@[n:neg(m)]
-t33:=tris(cx,pw,pw3,pw2(n),t31(nnotp(m,n)),t19(n)):is(pw,pw2(n))
--v9
-o@[p:pos(m)]
-posexp:=t30".v9"(p):is(pw(x,m,mi,o),prod(ntofrl(m,posintnatrl(m,p,mi)),[t:1to(ntofrl(m,posintnatrl(m,p,mi)))]x))
-[n:nis(x,0c)]
-lemmapw1:=th2"e.notis"(cx,pw1".v9"(p),0c,pw,t10".v9"(p,n),posexp):nis(pw(x,m,mi,o),0c)
-o@[i:is"r"(m,0)]
-0exp:=t32".v9"(i):is(pw(x,m,mi,o),1c)
-o@[n:neg(m)]
-lemmapw2:=t14".v9"(n):nis(x,0c)
-lemmapw3:=t13".v9"(n):or(nis(x,0c),pos(abs(m)))
-+*v9
-n@t34:=t30(abs(m),t11,t13(n),t12(n)):is(pw(x,abs(m),t11,t13(n)),pw1(x,abs(m),t11,t13(n),t12(n)))
-t35:=isov2(pw(x,abs(m),t11,t13(n)),pw1(x,abs(m),t11,t13(n),t12(n)),1c,t34,lemmapw1(abs(m),t11,t13(n),t12(n),t14(n)),t15(n)):is(ov(1c,pw(x,abs(m),t11,t13(n)),lemmapw1(abs(m),t11,t13(n),t12(n),t14(n))),pw2(n))
--v9
-n@negexp:=tris2(cx,pw(x,m,mi,o),ov(1c,pw(x,abs(m),intabs(m,mi),lemmapw3),lemmapw1(x,abs(m),intabs(m,mi),lemmapw3,satz166b(m,n),lemmapw2)),pw2".v9"(n),t33".v9"(n),t35".v9"(n)):is(pw(x,m,mi,o),ov(1c,pw(x,abs(m),intabs(m,mi),lemmapw3),lemmapw1(x,abs(m),intabs(m,mi),lemmapw3,satz166b(m,n),lemmapw2)))
-+*v9
-mp@t36:=isp(real,[t:real]pos(t),m,n,mp,j):pos(n)
-t37:=t30(x,m,mi1,ox,mp):is(pw(x,m,mi1,ox),pw1(x,m,mi1,ox,mp))
-t38:=symis(cx,pw(y,n,ni1,oy),pw1(y,n,ni1,oy,t36),t30(y,n,ni1,oy,t36)):is(pw1(y,n,ni1,oy,t36),pw(y,n,ni1,oy))
-t39:=tr3is(cx,pw(x,m,mi1,ox),pw1(x,m,mi1,ox,mp),pw1(y,n,ni1,oy,t36),pw(y,n,ni1,oy),t37,t7(t36),t38):is(pw(x,m,mi1,ox),pw(y,n,ni1,oy))
-oy@[np:not(pos(m))]
-t40:=isp(real,[t:real]not(pos(t)),m,n,np,j):not(pos(n))
-t41:=t31(x,m,mi1,ox,np):is(pw(x,m,mi1,ox),pw3(x,m,mi1,ox))
-t42:=symis(cx,pw(y,n,ni1,oy),pw3(y,n,ni1,oy),t31(y,n,ni1,oy,t40)):is(pw3(y,n,ni1,oy),pw(y,n,ni1,oy))
-t43:=tr3is(cx,pw(x,m,mi1,ox),pw3(x,m,mi1,ox),pw3(y,n,ni1,oy),pw(y,n,ni1,oy),t41,t29,t42):is(pw(x,m,mi1,ox),pw(y,n,ni1,oy))
--v9
-oy@ispw12:=th1"l.imp"(pos(m),is(pw(x,m,mi1,ox),pw(y,n,ni1,oy)),[t:pos(m)]t39".v9"(t),[t:not(pos(m))]t43".v9"(t)):is(pw(x,m,mi1,ox),pw(y,n,ni1,oy))
-m@[i:is(x,y)][mi:intrl(m)][ox:or(nis(x,0c),pos(m))][oy:or(nis(y,0c),pos(m))]
-ispw1:=ispw12(x,y,m,m,i,refis(real,m),mi,mi,ox,oy):is(pw(x,m,mi,ox),pw(y,m,mi,oy))
-x@[m:real][n:real][i:is"r"(m,n)][mi:intrl(m)][ni:intrl(n)][om:or(nis(x,0c),pos(m))][on:or(nis(x,0c),pos(n))]
-ispw2:=ispw12(x,x,m,n,refis(cx,x),i,mi,ni,om,on):is(pw(x,m,mi,om),pw(x,n,ni,on))
-o@[n:nis(x,0c)]
-+9290
-[p:pos(m)]
-t1:=lemmapw1(p,n):nis(pw(x,m,mi,o),0c)
-@[i:is(1c,0c)]
-t2:=tr3is(real,1rl,re(1c),re(0c),0,isre(1rl,0),iscere(1c,0c,i),reis(0,0)):is"r"(1rl,0)
--9290
-@1not0:=th3"l.imp"(is(1c,0c),is"r"(1rl,0),pnot0(1rl,pos1),[t:is(1c,0c)]t2".9290"(t)):nis(1c,0c)
-+*9290
-n@[i:is"r"(m,0)]
-t4:=th2"e.notis"(cx,1c,0c,pw(x,m,mi,o),1not0,0exp(i)):nis(pw(x,m,mi,o),0c)
-n@[nm:neg(m)]
-p0:=pw(x,abs(m),intabs(m,mi),lemmapw3(nm)):cx
-t5:=lemmapw1(x,abs(m),intabs(m,mi),lemmapw3(nm),satz166b(m,nm),lemmapw2(nm)):nis(p0,0c)
-t6:=tris(cx,ts(pw(x,m,mi,o),p0),ts(ov(1c,p0,t5),p0),1c,ists1(pw(x,m,mi,o),ov(1c,p0,t5),p0,negexp(nm)),satz229e(1c,p0,t5)):is(ts(pw(x,m,mi,o),p0),1c)
-t7:=th2"e.notis"(cx,1c,0c,ts(pw(x,m,mi,o),p0),1not0,t6):nis(ts(pw(x,m,mi,o),p0),0c)
-t8:=th3"l.imp"(is(pw(x,m,mi,o),0c),is(ts(pw(x,m,mi,o),p0),0c),t7,[t:is(pw(x,m,mi,o),0c)]satz221a(pw(x,m,mi,o),p0,t)):nis(pw(x,m,mi,o),0c)
--9290
-n@satz290:=rapp(m,nis(pw(x,m,mi,o),0c),[t:pos(m)]t1".9290"(t),[t:is"r"(m,0)]t4".9290"(t),[t:neg(m)]t8".9290"(t)):nis(pw(x,m,mi,o),0c)
-x@lemma291:=ori2(nis(x,0c),pos(1rl),pos1):or(nis(x,0c),pos(1rl))
-+9291
-1a:=ntofrl(1rl,posintnatrl(1rl,pos1,intrl1)):nat
-t1:=posexp(x,1rl,intrl1,lemma291,pos1):is(pw(x,1rl,intrl1,lemma291),prod(1a,[t:1to(1a)]x))
-t2:=tris(nat,1,ntofrl(1rl,natrl1),ntofrl(1rl,posintnatrl(1rl,pos1,intrl1)),isntrl1(1),isrlent(1rl,natrl1,1rl,posintnatrl(1rl,pos1,intrl1),refis(real,1rl))):is"n"(1,1a)
-t3:=lessisi2"n"(1,1a,t2):lessis"n"(1,1a)
-t4:=issmpr([t:cx][u:cx]ts(t,u),1a,[t:1to(1a)]x,1,t2):is(prod(1,left(cx,1a,1,t3,[t:1to(1a)]x)),prod(1a,[t:1to(1a)]x))
-t5:=satz277([t:cx][u:cx]ts(t,u),left(cx,1a,1,t3,[t:1to(1a)]x)):is(prod(1,left(cx,1a,1,t3,[t:1to(1a)]x)),x)
-t6:=tris1(cx,prod(1a,[t:1to(1a)]x),x,prod(1,left(cx,1a,1,t3,[t:1to(1a)]x)),t4,t5):is(prod(1a,[t:1to(1a)]x),x)
--9291
-satz291:=tris(cx,pw(x,1rl,intrl1,lemma291),prod(1a".9291",[t:1to(1a".9291")]x),x,t1".9291",t6".9291"):is(pw(x,1rl,intrl1,lemma291),x)
-[y:cx][m:real][mi:intrl(m)][o:or(and(nis(x,0c),nis(y,0c)),pos(m))]
-+9292
-[a:and(nis(x,0c),nis(y,0c))]
-t1:=ande1(nis(x,0c),nis(y,0c),a):nis(x,0c)
-t2:=ande2(nis(x,0c),nis(y,0c),a):nis(y,0c)
-t3:=satz221d(x,y,t1,t2):nis(ts(x,y),0c)
--9292
-lemma292a:=th7"l.or"(and(nis(x,0c),nis(y,0c)),pos(m),nis(x,0c),o,[t:and(nis(x,0c),nis(y,0c))]t1".9292"(t)):or(nis(x,0c),pos(m))
-lemma292b:=th7"l.or"(and(nis(x,0c),nis(y,0c)),pos(m),nis(y,0c),o,[t:and(nis(x,0c),nis(y,0c))]t2".9292"(t)):or(nis(y,0c),pos(m))
-lemma292c:=th7"l.or"(and(nis(x,0c),nis(y,0c)),pos(m),nis(ts(x,y),0c),o,[t:and(nis(x,0c),nis(y,0c))]t3".9292"(t)):or(nis(ts(x,y),0c),pos(m))
-+*9292
-x@[n:nat]
-nr:=rlofnt(n):real
-t4:=natintrl(nr,natrli(n)):intrl(nr)
-t5:=ori2(nis(x,0c),pos(nr),natpos(nr,natrli(n))):or(nis(x,0c),pos(nr))
-p0:=pw(x,nr,t4,t5):cx
-x@t6:=tris(cx,p0(1),pw(x,1rl,intrl1,lemma291(x)),x,ispw1(x,x,1rl,refis(cx,x),intrl1,t5(1),lemma291(x)),satz291(x)):is(p0(1),x)
-n@n0:=ntofrl(nr,posintnatrl(nr,natpos(nr,natrli(n)),t4)):nat
-t7:=tris(nat,n,ntofrl(nr,natrli(n)),n0,isntrl1(n),isrlent(nr,natrli(n),nr,posintnatrl(nr,natpos(nr,natrli(n)),t4),refis(real,nr))):is"n"(n,n0)
-t8:=lessisi2"n"(n,n0,t7):lessis"n"(n,n0)
-t9:=posexp(x,nr,t4,t5,natpos(nr,natrli(n))):is(p0,prod(n0,[t:1to(n0)]x))
-t10:=issmpr([t:cx][u:cx]ts(t,u),n0,[t:1to(n0)]x,n,t7):is(prod(n,left(cx,n0,n,t8,[t:1to(n0)]x)),prod(n0,[t:1to(n0)]x))
-t11:=tris2(cx,p0,prod(n,[t:1to(n)]x),prod(n0,[t:1to(n0)]x),t9,t10):is(p0,prod(n,[t:1to(n)]x))
-n1:=pl"n"(n,1):nat
-t12:=lessisi1"n"(n,n1,satz18a(n,1)):lessis"n"(n,n1)
-t13:=satz278([t:cx][u:cx]ts(t,u),n,[t:1to(n1)]x):is(prod(n1,[t:1to(n1)]x),ts(prod(n,left(cx,n1,n,t12,[t:1to(n1)]x)),x))
-t14:=ists1(p0,prod(n,[t:1to(n)]x),x,t11):is(ts(p0,x),ts(prod(n,[t:1to(n)]x),x))
-t15:=tris2(cx,prod(n1,[t:1to(n1)]x),ts(p0,x),ts(prod(n,[t:1to(n)]x),x),t13,t14):is(prod(n1,[t:1to(n1)]x),ts(p0,x))
-t16:=tris(cx,p0(n1),prod(n1,[t:1to(n1)]x),ts(p0,x),t11(n1),t15):is(p0(n1),ts(p0(n),x))
-y@[n:nat]
-prop1:=is(p0(ts(x,y),n),ts(p0(x,n),p0(y,n))):'prop'
-y@t17:=ists12(p0(x,1),x,p0(y,1),y,t6(x),t6(y)):is(ts(p0(x,1),p0(y,1)),ts(x,y))
-t18:=tris2(cx,p0(ts(x,y),1),ts(p0(x,1),p0(y,1)),ts(x,y),t6(ts(x,y)),t17):prop1(1)
-n@[p:prop1(n)]
-t19:=ists1(p0(ts(x,y),n),ts(p0(x,n),p0(y,n)),ts(x,y),p):is(ts(p0(ts(x,y),n),ts(x,y)),ts(ts(p0(x,n),p0(y,n)),ts(x,y)))
-t20:=tr3is(cx,ts(ts(p0(x,n),p0(y,n)),x),ts(p0(x,n),ts(p0(y,n),x)),ts(p0(x,n),ts(x,p0(y,n))),ts(ts(p0(x,n),x),p0(y,n)),assts1(p0(x,n),p0(y,n),x),ists2(ts(p0(y,n),x),ts(x,p0(y,n)),p0(x,n),comts(p0(y,n),x)),assts2(p0(x,n),x,p0(y,n))):is(ts(ts(p0(x,n),p0(y,n)),x),ts(ts(p0(x,n),x),p0(y,n)))
-t21:=tr3is(cx,ts(ts(p0(x,n),p0(y,n)),ts(x,y)),ts(ts(ts(p0(x,n),p0(y,n)),x),y),ts(ts(ts(p0(x,n),x),p0(y,n)),y),ts(ts(p0(x,n),x),ts(p0(y,n),y)),assts2(ts(p0(x,n),p0(y,n)),x,y),ists1(ts(ts(p0(x,n),p0(y,n)),x),ts(ts(p0(x,n),x),p0(y,n)),y,t20),assts1(ts(p0(x,n),x),p0(y,n),y)):is(ts(ts(p0(x,n),p0(y,n)),ts(x,y)),ts(ts(p0(x,n),x),ts(p0(y,n),y)))
-t22:=tr3is(cx,p0(ts(x,y),n1(n)),ts(p0(ts(x,y),n),ts(x,y)),ts(ts(p0(x,n),p0(y,n)),ts(x,y)),ts(ts(p0(x,n),x),ts(p0(y,n),y)),t16(ts(x,y),n),t19,t21):is(p0(ts(x,y),n1(n)),ts(ts(p0(x,n),x),ts(p0(y,n),y)))
-t23:=ists12(p0(x,n1(n)),ts(p0(x,n),x),p0(y,n1(n)),ts(p0(y,n),y),t16(x,n),t16(y,n)):is(ts(p0(x,n1(n)),p0(y,n1(n))),ts(ts(p0(x,n),x),ts(p0(y,n),y)))
-t24:=tris2(cx,p0(ts(x,y),n1(n)),ts(p0(x,n1(n)),p0(y,n1(n))),ts(ts(p0(x,n),x),ts(p0(y,n),y)),t22,t23):prop1(n1(n))
-t25:=isp(nat,[t:nat]prop1(t),n1(n),<n>suc,t24,satz4a(n)):prop1(<n>suc)
-n@t26:=induction([t:nat]prop1(t),t18,[t:nat][u:prop1(t)]t25(t,u),n):prop1
-o@prop2:=is(pw(ts(x,y),m,mi,lemma292c),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b))):'prop'
-[p:pos(m)]
-t28:=posintnatrl(m,p,mi):natrl(m)
-m0:=ntofrl(m,t28):nat
-t29:=isrlnt1(m,t28):is"r"(m,nr(m0))
-t30:=isrlnt2(m,t28):is"r"(nr(m0),m)
-t31:=ispw2(ts(x,y),m,nr(m0),t29,mi,t4(ts(x,y),m0),lemma292c,t5(ts(x,y),m0)):is(pw(ts(x,y),m,mi,lemma292c),p0(ts(x,y),m0))
-t32:=ists12(p0(x,m0),pw(x,m,mi,lemma292a),p0(y,m0),pw(y,m,mi,lemma292b),ispw2(x,nr(m0),m,t30,t4(x,m0),mi,t5(x,m0),lemma292a),ispw2(y,nr(m0),m,t30,t4(y,m0),mi,t5(y,m0),lemma292b)):is(ts(p0(x,m0),p0(y,m0)),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)))
-t33:=tr3is(cx,pw(ts(x,y),m,mi,lemma292c),p0(ts(x,y),m0),ts(p0(x,m0),p0(y,m0)),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),t31,t26(m0),t32):prop2
-o@[i:is"r"(m,0)]
-t34:=tris(cx,ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ts(1c,1c),1c,ists12(pw(x,m,mi,lemma292a),1c,pw(y,m,mi,lemma292b),1c,0exp(x,m,mi,lemma292a,i),0exp(y,m,mi,lemma292b,i)),satz222(1c)):is(ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),1c)
-t35:=tris2(cx,pw(ts(x,y),m,mi,lemma292c),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),1c,0exp(ts(x,y),m,mi,lemma292c,i),t34):prop2
-o@[n:neg(m)]
-t36:=intabs(m,mi):intrl(abs(m))
-t37:=ori2(and(nis(x,0c),nis(y,0c)),pos(abs(m)),satz166b(m,n)):or(and(nis(x,0c),nis(y,0c)),pos(abs(m)))
-t38:=lemma292a(abs(m),t36,t37):or(nis(x,0c),pos(abs(m)))
-t39:=lemma292b(abs(m),t36,t37):or(nis(y,0c),pos(abs(m)))
-t40:=lemma292c(abs(m),t36,t37):or(nis(ts(x,y),0c),pos(abs(m)))
-t41:=lemmapw3(x,m,mi,lemma292a,n):or(nis(x,0c),pos(abs(m)))
-t42:=lemmapw3(y,m,mi,lemma292b,n):or(nis(y,0c),pos(abs(m)))
-t43:=lemmapw3(ts(x,y),m,mi,lemma292c,n):or(nis(ts(x,y),0c),pos(abs(m)))
-t44:=ispw2(ts(x,y),abs(m),abs(m),refis(real,abs(m)),t36,t36,t43,t40):is(pw(ts(x,y),abs(m),t36,t43),pw(ts(x,y),abs(m),t36,t40))
-t45:=t33(abs(m),t36,t37,satz166b(m,n)):is(pw(ts(x,y),abs(m),t36,t40),ts(pw(x,abs(m),t36,t38),pw(y,abs(m),t36,t39)))
-t46:=ists12(pw(x,abs(m),t36,t38),pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t39),pw(y,abs(m),t36,t42),ispw2(x,abs(m),abs(m),refis(real,abs(m)),t36,t36,t38,t41),ispw2(y,abs(m),abs(m),refis(real,abs(m)),t36,t36,t39,t42)):is(ts(pw(x,abs(m),t36,t38),pw(y,abs(m),t36,t39)),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)))
-t47:=tr3is(cx,pw(ts(x,y),abs(m),t36,t43),pw(ts(x,y),abs(m),t36,t40),ts(pw(x,abs(m),t36,t38),pw(y,abs(m),t36,t39)),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t44,t45,t46):is(pw(ts(x,y),abs(m),t36,t43),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)))
-t48:=lemmapw1(x,abs(m),t36,t41,satz166b(m,n),lemmapw2(x,m,mi,lemma292a,n)):nis(pw(x,abs(m),t36,t41),0c)
-t49:=lemmapw1(y,abs(m),t36,t42,satz166b(m,n),lemmapw2(y,m,mi,lemma292b,n)):nis(pw(y,abs(m),t36,t42),0c)
-t50:=lemmapw1(ts(x,y),abs(m),t36,t43,satz166b(m,n),lemmapw2(ts(x,y),m,mi,lemma292c,n)):nis(pw(ts(x,y),abs(m),t36,t43),0c)
-t51:=satz221d(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42),t48,t49):nis(ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),0c)
-t52:=negexp(ts(x,y),m,mi,lemma292c,n):is(pw(ts(x,y),m,mi,lemma292c),ov(1c,pw(ts(x,y),abs(m),t36,t43),t50))
-t53:=isov12(1c,ts(1c,1c),pw(ts(x,y),abs(m),t36,t43),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),satz222a(1c),t47,t50,t51):is(ov(1c,pw(ts(x,y),abs(m),t36,t43),t50),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51))
-t54:=tris(cx,pw(ts(x,y),m,mi,lemma292c),ov(1c,pw(ts(x,y),abs(m),t36,t43),t50),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51),t52,t53):is(pw(ts(x,y),m,mi,lemma292c),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51))
-t55:=ists12(pw(x,m,mi,lemma292a),ov(1c,pw(x,abs(m),t36,t41),t48),pw(y,m,mi,lemma292b),ov(1c,pw(y,abs(m),t36,t42),t49),negexp(x,m,mi,lemma292a,n),negexp(y,m,mi,lemma292b,n)):is(ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ts(ov(1c,pw(x,abs(m),t36,t41),t48),ov(1c,pw(y,abs(m),t36,t42),t49)))
-t56:=satz247(1c,pw(x,abs(m),t36,t41),1c,pw(y,abs(m),t36,t42),t48,t49):is(ts(ov(1c,pw(x,abs(m),t36,t41),t48),ov(1c,pw(y,abs(m),t36,t42),t49)),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51))
-t57:=tris(cx,ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ts(ov(1c,pw(x,abs(m),t36,t41),t48),ov(1c,pw(y,abs(m),t36,t42),t49)),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51),t55,t56):is(ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51))
-t58:=tris2(cx,pw(ts(x,y),m,mi,lemma292c),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51),t54,t57):prop2
--9292
-o@satz292:=rapp(m,prop2".9292",[t:pos(m)]t33".9292"(t),[t:is"r"(m,0)]t35".9292"(t),[t:neg(m)]t58".9292"(t)):is(pw(ts(x,y),m,mi,lemma292c),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)))
-@[m:real]
-lemma293:=ori1(nis(1c,0c),pos(m),1not0):or(nis(1c,0c),pos(m))
-[mi:intrl(m)]
-+9293
-t1:=ori1(and(nis(1c,0c),nis(1c,0c)),pos(m),andi(nis(1c,0c),nis(1c,0c),1not0,1not0)):or(and(nis(1c,0c),nis(1c,0c)),pos(m))
-1m:=pw(1c,m,mi,lemma293):cx
-t2:=satz222(1m):is(ts(1m,1c),1m)
-t3:=ispw1(1c,ts(1c,1c),m,satz222a(1c),mi,lemma293,lemma292c(1c,1c,m,mi,t1)):is(1m,pw(ts(1c,1c),m,mi,lemma292c(1c,1c,m,mi,t1)))
-t4:=satz292(1c,1c,m,mi,t1):is(pw(ts(1c,1c),m,mi,lemma292c(1c,1c,m,mi,t1)),ts(pw(1c,m,mi,lemma292a(1c,1c,m,mi,t1)),pw(1c,m,mi,lemma292b(1c,1c,m,mi,t1))))
-t5:=ists12(pw(1c,m,mi,lemma292a(1c,1c,m,mi,t1)),1m,pw(1c,m,mi,lemma292b(1c,1c,m,mi,t1)),1m,ispw1(1c,1c,m,refis(cx,1c),mi,lemma292a(1c,1c,m,mi,t1),lemma293),ispw1(1c,1c,m,refis(cx,1c),mi,lemma292b(1c,1c,m,mi,t1),lemma293)):is(ts(pw(1c,m,mi,lemma292a(1c,1c,m,mi,t1)),pw(1c,m,mi,lemma292b(1c,1c,m,mi,t1))),ts(1m,1m))
-t6:=tr4is(cx,ts(1m,1c),1m,pw(ts(1c,1c),m,mi,lemma292c(1c,1c,m,mi,t1)),ts(pw(1c,m,mi,lemma292a(1c,1c,m,mi,t1)),pw(1c,m,mi,lemma292b(1c,1c,m,mi,t1))),ts(1m,1m),t2,t3,t4,t5):is(ts(1m,1c),ts(1m,1m))
-t7:=tris(cx,ts(1m,mn(1m,1c)),mn(ts(1m,1m),ts(1m,1c)),0c,disttm2(1m,1m,1c),satz213b(ts(1m,1m),ts(1m,1c),symis(cx,ts(1m,1c),ts(1m,1m),t6))):is(ts(1m,mn(1m,1c)),0c)
-t8:=ore2(is(1m,0c),is(mn(1m,1c),0c),satz221c(1m,mn(1m,1c),t7),satz290(1c,m,mi,lemma293,1not0)):is(mn(1m,1c),0c)
--9293
-satz293:=satz213a(1m".9293",1c,t8".9293"):is(pw(1c,m,mi,lemma293),1c)
-x@[m:real][n:real][mi:intrl(m)][ni:intrl(n)][o:or(nis(x,0c),and(pos(m),pos(n)))]
-+9294
-[a:and(pos(m),pos(n))]
-t1:=ande1(pos(m),pos(n),a):pos(m)
-t2:=ande2(pos(m),pos(n),a):pos(n)
-t3:=pospl(m,n,t1,t2):pos(pl"r"(m,n))
--9294
-lemma294a:=th8"l.or"(nis(x,0c),and(pos(m),pos(n)),pos(m),o,[t:and(pos(m),pos(n))]t1".9294"(t)):or(nis(x,0c),pos(m))
-lemma294b:=th8"l.or"(nis(x,0c),and(pos(m),pos(n)),pos(n),o,[t:and(pos(m),pos(n))]t2".9294"(t)):or(nis(x,0c),pos(n))
-lemma294c:=th8"l.or"(nis(x,0c),and(pos(m),pos(n)),pos(pl"r"(m,n)),o,[t:and(pos(m),pos(n))]t3".9294"(t)):or(nis(x,0c),pos(pl"r"(m,n)))
-+*9294
-o@prop1:=is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c)):'prop'
-a@m1:=ntofrl(m,posintnatrl(m,t1,mi)):nat
-n1:=ntofrl(n,posintnatrl(n,t2,ni)):nat
-t4:=ists12(pw(x,m,mi,lemma294a),prod(m1,[t:1to(m1)]x),pw(x,n,ni,lemma294b),prod(n1,[t:1to(n1)]x),posexp(x,m,mi,lemma294a,t1),posexp(x,n,ni,lemma294b,t2)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(prod(m1,[t:1to(m1)]x),prod(n1,[t:1to(n1)]x)))
-p1:=ntofrl(pl"r"(m,n),posintnatrl(pl"r"(m,n),t3,intpl(m,mi,n,ni))):nat
-t5:=posexp(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t3):is(pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),prod(p1,[t:1to(p1)]x))
-t6:=tris(real,pl"r"(m,n),pl"r"(rlofnt(m1),rlofnt(n1)),rlofnt(pl"n"(m1,n1)),ispl12"r"(m,rlofnt(m1),n,rlofnt(n1),isrlnt1(m,posintnatrl(m,t1,mi)),isrlnt1(n,posintnatrl(n,t2,ni))),satzr155b(m1,n1)):is"r"(pl"r"(m,n),rlofnt(pl"n"(m1,n1)))
-t7:=tris2(nat,pl"n"(m1,n1),p1,ntofrl(rlofnt(pl"n"(m1,n1)),natrli(pl"n"(m1,n1))),isntrl1(pl"n"(m1,n1)),isrlent(pl"r"(m,n),posintnatrl(pl"r"(m,n),t3,intpl(m,mi,n,ni)),rlofnt(pl"n"(m1,n1)),natrli(pl"n"(m1,n1)),t6)):is"n"(pl"n"(m1,n1),p1)
-t8:=lessisi2"n"(pl"n"(m1,n1),p1,t7):lessis"n"(pl"n"(m1,n1),p1)
-t9:=issmpr([t:cx][u:cx]ts(t,u),p1,[t:1to(p1)]x,pl"n"(m1,n1),t7):is(prod(pl"n"(m1,n1),left(cx,p1,pl"n"(m1,n1),t8,[t:1to(p1)]x)),prod(p1,[t:1to(p1)]x))
-t10:=tris2(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),prod(pl"n"(m1,n1),[t:1to(pl"n"(m1,n1))]x),prod(p1,[t:1to(p1)]x),t5,t9):is(pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),prod(pl"n"(m1,n1),[t:1to(pl"n"(m1,n1))]x))
-t11:=lessisi1"n"(m1,pl"n"(m1,n1),satz18a(m1,n1)):lessis"n"(m1,pl"n"(m1,n1))
-t12:=satz281([t:cx][u:cx]ts(t,u),assocts,m1,n1,[t:1to(pl"n"(m1,n1))]x):is(prod(pl"n"(m1,n1),[t:1to(pl"n"(m1,n1))]x),ts(prod(m1,left(cx,pl"n"(m1,n1),m1,t11,[t:1to(pl"n"(m1,n1))]x)),prod(n1,right(cx,m1,n1,[t:1to(pl"n"(m1,n1))]x))))
-t13:=tris(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),prod(pl"n"(m1,n1),[t:1to(pl"n"(m1,n1))]x),ts(prod(m1,[t:1to(m1)]x),prod(n1,[t:1to(n1)]x)),t10,t12):is(pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),ts(prod(m1,[t:1to(m1)]x),prod(n1,[t:1to(n1)]x)))
-t14:=tris2(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),ts(prod(m1,[t:1to(m1)]x),prod(n1,[t:1to(n1)]x)),t4,t13):prop1
-o@[na:not(and(pos(m),pos(n)))]
-t15:=ore1(nis(x,0c),and(pos(m),pos(n)),o,na):nis(x,0c)
-t16:=th15"l.or"(pos(m),pos(n),na):or(not(pos(m)),not(pos(n)))
-o@am:=abs(m):real
-an:=abs(n):real
-ap:=abs(pl"r"(m,n)):real
-t17:=intabs(m,mi):intrl(am)
-t18:=intabs(n,ni):intrl(an)
-t19:=intabs(pl"r"(m,n),intpl(m,mi,n,ni)):intrl(ap)
-na@[nm:neg(m)][nn:neg(n)]
-t20:=andi(pos(am),pos(an),satz166e(m,nnot0(m,nm)),satz166e(n,nnot0(n,nn))):and(pos(am),pos(an))
-t21:=ori2(nis(x,0c),and(pos(am),pos(an)),t20):or(nis(x,0c),and(pos(am),pos(an)))
-t22:=lemmapw3(x,m,mi,lemma294a,nm):or(nis(x,0c),pos(am))
-t23:=lemmapw3(x,n,ni,lemma294b,nn):or(nis(x,0c),pos(an))
-t24:=lemma294a(x,am,an,t17,t18,t21):or(nis(x,0c),pos(am))
-t25:=lemma294b(x,am,an,t17,t18,t21):or(nis(x,0c),pos(an))
-t26:=ists12(pw(x,am,t17,t22),pw(x,am,t17,t24),pw(x,an,t18,t23),pw(x,an,t18,t25),ispw1(x,x,am,refis(cx,x),t17,t22,t24),ispw1(x,x,an,refis(cx,x),t18,t23,t25)):is(ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),ts(pw(x,am,t17,t24),pw(x,an,t18,t25)))
-t27:=lemma294c(x,am,an,t17,t18,t21):or(nis(x,0c),pos(pl"r"(am,an)))
-t28:=t14(x,am,an,t17,t18,t21,t20):is(ts(pw(x,am,t17,t24),pw(x,an,t18,t25)),pw(x,pl"r"(am,an),intpl(am,t17,an,t18),t27))
-t29:=tr3is(real,pl"r"(am,an),pl"r"(m0"r"(m),m0"r"(n)),m0"r"(pl"r"(m,n)),ap,ispl12"r"(am,m0"r"(m),an,m0"r"(n),absn(m,nm),absn(n,nn)),satz180a(m,n),symis(real,ap,m0"r"(pl"r"(m,n)),absn(pl"r"(m,n),negpl(m,n,nm,nn)))):is"r"(pl"r"(am,an),ap)
-t30:=lemmapw3(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,negpl(m,n,nm,nn)):or(nis(x,0c),pos(ap))
-t31:=ispw2(x,pl"r"(am,an),ap,t29,intpl(am,t17,an,t18),t19,t27,t30):is(pw(x,pl"r"(am,an),intpl(am,t17,an,t18),t27),pw(x,ap,t19,t30))
-t32:=tr3is(cx,ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),ts(pw(x,am,t17,t24),pw(x,an,t18,t25)),pw(x,pl"r"(am,an),intpl(am,t17,an,t18),t27),pw(x,ap,t19,t30),t26,t28,t31):is(ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),pw(x,ap,t19,t30))
-t33:=lemmapw1(x,am,t17,t22,satz166b(m,nm),lemmapw2(x,m,mi,lemma294a,nm)):nis(pw(x,am,t17,t22),0c)
-t34:=lemmapw1(x,an,t18,t23,satz166b(n,nn),lemmapw2(x,n,ni,lemma294b,nn)):nis(pw(x,an,t18,t23),0c)
-t35:=lemmapw1(x,ap,t19,t30,satz166b(pl"r"(m,n),negpl(m,n,nm,nn)),lemmapw2(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,negpl(m,n,nm,nn))):nis(pw(x,ap,t19,t30),0c)
-t36:=ists12(pw(x,m,mi,lemma294a),ov(1c,pw(x,am,t17,t22),t33),pw(x,n,ni,lemma294b),ov(1c,pw(x,an,t18,t23),t34),negexp(x,m,mi,lemma294a,nm),negexp(x,n,ni,lemma294b,nn)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(ov(1c,pw(x,am,t17,t22),t33),ov(1c,pw(x,an,t18,t23),t34)))
-t37:=satz221d(pw(x,am,t17,t22),pw(x,an,t18,t23),t33,t34):nis(ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),0c)
-t38:=satz247(1c,pw(x,am,t17,t22),1c,pw(x,an,t18,t23),t33,t34):is(ts(ov(1c,pw(x,am,t17,t22),t33),ov(1c,pw(x,an,t18,t23),t34)),ov(ts(1c,1c),ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),t37))
-t39:=isov12(ts(1c,1c),1c,ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),pw(x,ap,t19,t30),satz222(1c),t32,t37,t35):is(ov(ts(1c,1c),ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),t37),ov(1c,pw(x,ap,t19,t30),t35))
-t40:=symis(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),ov(1c,pw(x,ap,t19,t30),t35),negexp(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,negpl(m,n,nm,nn))):is(ov(1c,pw(x,ap,t19,t30),t35),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-t41:=tr4is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(ov(1c,pw(x,am,t17,t22),t33),ov(1c,pw(x,an,t18,t23),t34)),ov(ts(1c,1c),ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),t37),ov(1c,pw(x,ap,t19,t30),t35),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t36,t38,t39,t40):prop1
-na@[pm:pos(m)][nn:neg(n)]
-t42:=lemmapw3(x,n,ni,lemma294b,nn):or(nis(x,0c),pos(an))
-t43:=lemmapw1(x,an,t18,t42,satz166b(n,nn),lemmapw2(x,n,ni,lemma294b,nn)):nis(pw(x,an,t18,t42),0c)
-t44:=ists2(pw(x,n,ni,lemma294b),ov(1c,pw(x,an,t18,t42),t43),pw(x,m,mi,lemma294a),negexp(x,n,ni,lemma294b,nn)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,lemma294a),ov(1c,pw(x,an,t18,t42),t43)))
-t45:=satz244a(pw(x,m,mi,lemma294a),1c,pw(x,an,t18,t42),t43):is(ts(pw(x,m,mi,lemma294a),ov(1c,pw(x,an,t18,t42),t43)),ov(ts(pw(x,m,mi,lemma294a),1c),pw(x,an,t18,t42),t43))
-t46:=isov1(ts(pw(x,m,mi,lemma294a),1c),pw(x,m,mi,lemma294a),pw(x,an,t18,t42),satz222(pw(x,m,mi,lemma294a)),t43):is(ov(ts(pw(x,m,mi,lemma294a),1c),pw(x,an,t18,t42),t43),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43))
-t47:=tr3is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,lemma294a),ov(1c,pw(x,an,t18,t42),t43)),ov(ts(pw(x,m,mi,lemma294a),1c),pw(x,an,t18,t42),t43),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),t44,t45,t46):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43))
-[casea:more(m,an)]
-t48:=satz182d(m,an,casea):pos(mn"r"(m,an))
-t49:=satz166e(n,nnot0(n,nn)):pos(an)
-t50:=andi(pos(an),pos(mn"r"(m,an)),t49,t48):and(pos(an),pos(mn"r"(m,an)))
-t51:=ori2(nis(x,0c),and(pos(an),pos(mn"r"(m,an))),t50):or(nis(x,0c),and(pos(an),pos(mn"r"(m,an))))
-t52:=intmn(m,mi,an,t18):intrl(mn"r"(m,an))
-t53:=lemma294a(x,an,mn"r"(m,an),t18,t52,t51):or(nis(x,0c),pos(an))
-t54:=lemma294b(x,an,mn"r"(m,an),t18,t52,t51):or(nis(x,0c),pos(mn"r"(m,an)))
-t55:=lemma294c(x,an,mn"r"(m,an),t18,t52,t51):or(nis(x,0c),pos(pl"r"(an,mn"r"(m,an))))
-t56:=intpl(an,t18,mn"r"(m,an),t52):intrl(pl"r"(an,mn"r"(m,an)))
-t57:=t14(x,an,mn"r"(m,an),t18,t52,t51,t50):is(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,pl"r"(an,mn"r"(m,an)),t56,t55))
-t58:=satz187a(m,an):is"r"(pl"r"(an,mn"r"(m,an)),m)
-t59:=ispw2(x,pl"r"(an,mn"r"(m,an)),m,t58,t56,mi,t55,lemma294a):is(pw(x,pl"r"(an,mn"r"(m,an)),t56,t55),pw(x,m,mi,lemma294a))
-t60:=tris(cx,ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,pl"r"(an,mn"r"(m,an)),t56,t55),pw(x,m,mi,lemma294a),t57,t59):is(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,m,mi,lemma294a))
-t61:=ispw1(x,x,an,refis(cx,x),t18,t53,t42):is(pw(x,an,t18,t53),pw(x,an,t18,t42))
-t62:=isp1(cx,[t:cx]nis(t,0c),pw(x,an,t18,t42),pw(x,an,t18,t53),t43,t61):nis(pw(x,an,t18,t53),0c)
-t63:=isov12(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,m,mi,lemma294a),pw(x,an,t18,t53),pw(x,an,t18,t42),t60,t61,t62,t43):is(ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43))
-t64:=tris2(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),t47,t63):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62))
-t65:=satz229h(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54),t62,refis(cx,ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)))):is(ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62),pw(x,mn"r"(m,an),t52,t54))
-t66:=tris(real,mn"r"(m,an),mn"r"(m,m0"r"(n)),pl"r"(m,n),ismn2"r"(an,m0"r"(n),m,absn(n,nn)),ispl2"r"(m0"r"(m0"r"(n)),n,m,satz177(n))):is"r"(mn"r"(m,an),pl"r"(m,n))
-t67:=ispw2(x,mn"r"(m,an),pl"r"(m,n),t66,t52,intpl(m,mi,n,ni),t54,lemma294c):is(pw(x,mn"r"(m,an),t52,t54),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-t68:=tr3is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62),pw(x,mn"r"(m,an),t52,t54),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t64,t65,t67):prop1
-nn@[caseb:is"r"(m,an)]
-t69:=ispw2(x,m,an,caseb,mi,t18,lemma294a,t42):is(pw(x,m,mi,lemma294a),pw(x,an,t18,t42))
-t70:=satz251a(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43,t69):is(ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),1c)
-t71:=tr3is(real,pl"r"(m,n),mn"r"(m,m0"r"(n)),mn"r"(m,an),0,ispl2"r"(n,m0"r"(m0"r"(n)),m,satz177a(n)),ismn2"r"(m0"r"(n),an,m,symis(real,an,m0"r"(n),absn(n,nn))),satz182e(m,an,caseb)):is"r"(pl"r"(m,n),0)
-t72:=symis(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),1c,0exp(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t71)):is(1c,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-t73:=tr3is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),1c,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t47,t70,t72):prop1
-nn@[casec:less(m,an)]
-t74:=satz182d(an,m,lemma2"r"(m,an,casec)):pos(mn"r"(an,m))
-t75:=andi(pos(m),pos(mn"r"(an,m)),pm,t74):and(pos(m),pos(mn"r"(an,m)))
-t76:=ori2(nis(x,0c),and(pos(m),pos(mn"r"(an,m))),t75):or(nis(x,0c),and(pos(m),pos(mn"r"(an,m))))
-t77:=intmn(an,t18,m,mi):intrl(mn"r"(an,m))
-t78:=lemma294a(x,m,mn"r"(an,m),mi,t77,t76):or(nis(x,0c),pos(m))
-t79:=lemma294b(x,m,mn"r"(an,m),mi,t77,t76):or(nis(x,0c),pos(mn"r"(an,m)))
-t80:=lemma294c(x,m,mn"r"(an,m),mi,t77,t76):or(nis(x,0c),pos(pl"r"(m,mn"r"(an,m))))
-t81:=intpl(m,mi,mn"r"(an,m),t77):intrl(pl"r"(m,mn"r"(an,m)))
-t81a:=t14(x,m,mn"r"(an,m),mi,t77,t76,t75):is(ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),pw(x,pl"r"(m,mn"r"(an,m)),t81,t80))
-t82:=satz187a(an,m):is"r"(pl"r"(m,mn"r"(an,m)),an)
-t83:=ispw2(x,pl"r"(m,mn"r"(an,m)),an,t82,t81,t18,t80,t42):is(pw(x,pl"r"(m,mn"r"(an,m)),t81,t80),pw(x,an,t18,t42))
-t84:=tris(cx,ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),pw(x,pl"r"(m,mn"r"(an,m)),t81,t80),pw(x,an,t18,t42),t81a,t83):is(ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),pw(x,an,t18,t42))
-t85:=satz290(x,m,mi,t78,t15):nis(pw(x,m,mi,t78),0c)
-t86:=satz290(x,mn"r"(an,m),t77,t79,t15):nis(pw(x,mn"r"(an,m),t77,t79),0c)
-t87:=satz221d(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79),t85,t86):nis(ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),0c)
-t88:=satz222(pw(x,m,mi,t78)):is(ts(pw(x,m,mi,t78),1c),pw(x,m,mi,t78))
-t89:=ispw1(x,x,m,refis(cx,x),mi,t78,lemma294a):is(pw(x,m,mi,t78),pw(x,m,mi,lemma294a))
-t90:=tris(cx,ts(pw(x,m,mi,t78),1c),pw(x,m,mi,t78),pw(x,m,mi,lemma294a),t88,t89):is(ts(pw(x,m,mi,t78),1c),pw(x,m,mi,lemma294a))
-t91:=isov12(ts(pw(x,m,mi,t78),1c),pw(x,m,mi,lemma294a),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),pw(x,an,t18,t42),t90,t84,t87,t43):is(ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43))
-t92:=tris2(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),t47,t91):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87))
-t93:=satz246a(1c,pw(x,mn"r"(an,m),t77,t79),pw(x,m,mi,t78),t86,t85):is(ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87),ov(1c,pw(x,mn"r"(an,m),t77,t79),t86))
-t94:=satz182f(m,an,casec):neg(mn"r"(m,an))
-t94a:=tris(real,mn"r"(m,an),mn"r"(m,m0"r"(n)),pl"r"(m,n),ismn2"r"(an,m0"r"(n),m,absn(n,nn)),ispl2"r"(m0"r"(m0"r"(n)),n,m,satz177(n))):is"r"(mn"r"(m,an),pl"r"(m,n))
-t95:=tr3is(real,mn"r"(an,m),m0"r"(mn"r"(m,an)),abs(mn"r"(m,an)),ap,satz181a(an,m),symis(real,abs(mn"r"(m,an)),m0"r"(mn"r"(m,an)),absn(mn"r"(m,an),t94)),isabs(mn"r"(m,an),pl"r"(m,n),t94a)):is"r"(mn"r"(an,m),ap)
-t96:=isp(real,[t:real]neg(t),mn"r"(m,an),pl"r"(m,n),t94,t94a):neg(pl"r"(m,n))
-t97:=lemmapw3(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t96):or(nis(x,0c),pos(ap))
-t98:=lemmapw1(x,ap,t19,t97,satz166b(pl"r"(m,n),t96),lemmapw2(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t96)):nis(pw(x,ap,t19,t97),0c)
-t99:=ispw2(x,mn"r"(an,m),ap,t95,t77,t19,t79,t97):is(pw(x,mn"r"(an,m),t77,t79),pw(x,ap,t19,t97))
-t100:=isov2(pw(x,mn"r"(an,m),t77,t79),pw(x,ap,t19,t97),1c,t99,t86,t98):is(ov(1c,pw(x,mn"r"(an,m),t77,t79),t86),ov(1c,pw(x,ap,t19,t97),t98))
-t101:=symis(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),ov(1c,pw(x,ap,t19,t97),t98),negexp(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t96)):is(ov(1c,pw(x,ap,t19,t97),t98),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-t102:=tr4is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87),ov(1c,pw(x,mn"r"(an,m),t77,t79),t86),ov(1c,pw(x,ap,t19,t97),t98),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t92,t93,t100,t101):prop1
-nn@t103:=or3app(is"r"(m,an),more(m,an),less(m,an),prop1,satz167a(m,an),[t:is"r"(m,an)]t73(t),[t:more(m,an)]t68(t),[t:less(m,an)]t102(t)):prop1
-na@[nm:neg(m)][qn:pos(n)]
-na@t104:=ori1(nis(x,0c),and(pos(n),pos(m)),t15):or(nis(x,0c),and(pos(n),pos(m)))
-t104a:=th5"l.and"(pos(m),pos(n),na):not(and(pos(n),pos(m)))
-t105:=lemma294a(x,n,m,ni,mi,t104):or(nis(x,0c),pos(n))
-t106:=lemma294b(x,n,m,ni,mi,t104):or(nis(x,0c),pos(m))
-t107:=lemma294c(x,n,m,ni,mi,t104):or(nis(x,0c),pos(pl"r"(n,m)))
-t108:=ists12(pw(x,m,mi,lemma294a),pw(x,m,mi,t106),pw(x,n,ni,lemma294b),pw(x,n,ni,t105),ispw1(x,x,m,refis(cx,x),mi,lemma294a,t106),ispw1(x,x,n,refis(cx,x),ni,lemma294b,t105)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,t106),pw(x,n,ni,t105)))
-t109:=comts(pw(x,m,mi,t106),pw(x,n,ni,t105)):is(ts(pw(x,m,mi,t106),pw(x,n,ni,t105)),ts(pw(x,n,ni,t105),pw(x,m,mi,t106)))
-qn@t110:=t103(x,n,m,ni,mi,t104,t104a,qn,nm):is(ts(pw(x,n,ni,t105),pw(x,m,mi,t106)),pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107))
-na@t111:=ispw2(x,pl"r"(n,m),pl"r"(m,n),compl"r"(n,m),intpl(n,ni,m,mi),intpl(m,mi,n,ni),t107,lemma294c):is(pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-qn@t112:=tr4is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,t106),pw(x,n,ni,t105)),ts(pw(x,n,ni,t105),pw(x,m,mi,t106)),pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t108,t109,t110,t111):prop1
-na@[i:is"r"(m,0)]
-t113:=ists1(pw(x,m,mi,lemma294a),1c,pw(x,n,ni,lemma294b),0exp(x,m,mi,lemma294a,i)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(1c,pw(x,n,ni,lemma294b)))
-t114:=satz222b(pw(x,n,ni,lemma294b)):is(ts(1c,pw(x,n,ni,lemma294b)),pw(x,n,ni,lemma294b))
-t115:=symis(real,pl"r"(m,n),n,pl01"r"(m,n,i)):is"r"(n,pl"r"(m,n))
-t116:=ispw2(x,n,pl"r"(m,n),t115,ni,intpl(m,mi,n,ni),lemma294b,lemma294c):is(pw(x,n,ni,lemma294b),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-t117:=tr3is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(1c,pw(x,n,ni,lemma294b)),pw(x,n,ni,lemma294b),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t113,t114,t116):prop1
-na@[i:is"r"(n,0)]
-t118:=t117(x,n,m,ni,mi,t104,t104a,i):is(ts(pw(x,n,ni,t105),pw(x,m,mi,t106)),pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107))
-t119:=tr4is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,t106),pw(x,n,ni,t105)),ts(pw(x,n,ni,t105),pw(x,m,mi,t106)),pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t108,t109,t118,t111):prop1
-na@[pm:pos(m)]
-t120:=ore2(not(pos(m)),not(pos(n)),t16,weli(pos(m),pm)):not(pos(n))
-t121:=rapp(n,prop1,th2"l.imp"(pos(n),prop1,t120),[t:is"r"(n,0)]t119(t),[t:neg(n)]t103(pm,t)):prop1
-na@[nm:neg(m)]
-t122:=rapp(n,prop1,[t:pos(n)]t112(nm,t),[t:is"r"(n,0)]t119(t),[t:neg(n)]t41(nm,t)):prop1
-na@t123:=rapp(m,prop1,[t:pos(m)]t121(t),[t:is"r"(m,0)]t117(t),[t:neg(m)]t122(t)):prop1
--9294
-o@satz294:=th1"l.imp"(and(pos(m),pos(n)),prop1".9294",[t:and(pos(m),pos(n))]t14".9294"(t),[t:not(and(pos(m),pos(n)))]t123".9294"(t)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-ni@[o:nis(x,0c)]
-lemma295a:=ori1(nis(x,0c),pos(m),o):or(nis(x,0c),pos(m))
-lemma295b:=ori1(nis(x,0c),pos(n),o):or(nis(x,0c),pos(n))
-lemma295c:=ori1(nis(x,0c),pos(mn"r"(m,n)),o):or(nis(x,0c),pos(mn"r"(m,n)))
-+9295
-t1:=ori1(nis(x,0c),and(pos(mn"r"(m,n)),pos(n)),o):or(nis(x,0c),and(pos(mn"r"(m,n)),pos(n)))
-t2:=intmn(m,mi,n,ni):intrl(mn"r"(m,n))
-t3:=lemma294a(x,mn"r"(m,n),n,t2,ni,t1):or(nis(x,0c),pos(mn"r"(m,n)))
-t4:=lemma294b(x,mn"r"(m,n),n,t2,ni,t1):or(nis(x,0c),pos(n))
-t5:=lemma294c(x,mn"r"(m,n),n,t2,ni,t1):or(nis(x,0c),pos(pl"r"(mn"r"(m,n),n)))
-t6:=ists12(pw(x,mn"r"(m,n),t2,lemma295c),pw(x,mn"r"(m,n),t2,t3),pw(x,n,ni,lemma295b),pw(x,n,ni,t4),ispw1(x,x,mn"r"(m,n),refis(cx,x),t2,lemma295c,t3),ispw1(x,x,n,refis(cx,x),ni,lemma295b,t4)):is(ts(pw(x,mn"r"(m,n),t2,lemma295c),pw(x,n,ni,lemma295b)),ts(pw(x,mn"r"(m,n),t2,t3),pw(x,n,ni,t4)))
-t7:=satz294(x,mn"r"(m,n),n,t2,ni,t1):is(ts(pw(x,mn"r"(m,n),t2,t3),pw(x,n,ni,t4)),pw(x,pl"r"(mn"r"(m,n),n),intpl(mn"r"(m,n),t2,n,ni),t5))
-t8:=plmn(m,n):is"r"(pl"r"(mn"r"(m,n),n),m)
-t9:=ispw2(x,pl"r"(mn"r"(m,n),n),m,t8,intpl(mn"r"(m,n),t2,n,ni),mi,t5,lemma295a):is(pw(x,pl"r"(mn"r"(m,n),n),intpl(mn"r"(m,n),t2,n,ni),t5),pw(x,m,mi,lemma295a))
-t10:=tr3is(cx,ts(pw(x,mn"r"(m,n),t2,lemma295c),pw(x,n,ni,lemma295b)),ts(pw(x,mn"r"(m,n),t2,t3),pw(x,n,ni,t4)),pw(x,pl"r"(mn"r"(m,n),n),intpl(mn"r"(m,n),t2,n,ni),t5),pw(x,m,mi,lemma295a),t6,t7,t9):is(ts(pw(x,mn"r"(m,n),t2,lemma295c),pw(x,n,ni,lemma295b)),pw(x,m,mi,lemma295a))
-t11:=satz290(x,n,ni,lemma295b,o):nis(pw(x,n,ni,lemma295b),0c)
--9295
-satz295:=satz229k(pw(x,m,mi,lemma295a),pw(x,n,ni,lemma295b),pw(x,mn"r"(m,n),t2".9295",lemma295c),t11".9295",t10".9295"):is(ov(pw(x,m,mi,lemma295a),pw(x,n,ni,lemma295b),satz290(x,n,ni,lemma295b,o)),pw(x,mn"r"(m,n),intmn(m,mi,n,ni),lemma295c))
-m@[mi:intrl(m)][n:nis(x,0c)]
-lemma296:=ori1(nis(x,0c),pos(m),n):or(nis(x,0c),pos(m))
-+9296
-t1:=intrli0(0,refis(real,0)):intrl(0)
-t2:=lemma295a(x,0,m,t1,mi,n):or(nis(x,0c),pos(0))
-t3:=lemma295b(x,0,m,t1,mi,n):or(nis(x,0c),pos(m))
-t4:=lemma295c(x,0,m,t1,mi,n):or(nis(x,0c),pos(mn"r"(0,m)))
-t5:=satz290(x,m,mi,lemma296,n):nis(pw(x,m,mi,lemma296),0c)
-t6:=satz290(x,m,mi,t3,n):nis(pw(x,m,mi,t3),0c)
-t7:=symis(cx,pw(x,0,t1,t2),1c,0exp(x,0,t1,t2,refis(real,0))):is(1c,pw(x,0,t1,t2))
-t8:=ispw1(x,x,m,refis(cx,x),mi,lemma296,t3):is(pw(x,m,mi,lemma296),pw(x,m,mi,t3))
-t9:=isov12(1c,pw(x,0,t1,t2),pw(x,m,mi,lemma296),pw(x,m,mi,t3),t7,t8,t5,t6):is(ov(1c,pw(x,m,mi,lemma296),t5),ov(pw(x,0,t1,t2),pw(x,m,mi,t3),t6))
-t10:=satz295(x,0,m,t1,mi,n):is(ov(pw(x,0,t1,t2),pw(x,m,mi,t3),t6),pw(x,mn"r"(0,m),intmn(0,t1,m,mi),t4))
-t11:=pl01(0,m0"r"(m),refis(real,0)):is"r"(mn"r"(0,m),m0"r"(m))
-t12:=lemma296(x,m0"r"(m),intm0(m,mi),n):or(nis(x,0c),pos(m0"r"(m)))
-t13:=ispw2(x,mn"r"(0,m),m0"r"(m),t11,intmn(0,t1,m,mi),intm0(m,mi),t4,t12):is(pw(x,mn"r"(0,m),intmn(0,t1,m,mi),t4),pw(x,m0"r"(m),intm0(m,mi),t12))
-t14:=tr3is(cx,ov(1c,pw(x,m,mi,lemma296),t5),ov(pw(x,0,t1,t2),pw(x,m,mi,t3),t6),pw(x,mn"r"(0,m),intmn(0,t1,m,mi),t4),pw(x,m0"r"(m),intm0(m,mi),t12),t9,t10,t13):is(ov(1c,pw(x,m,mi,lemma296),t5),pw(x,m0"r"(m),intm0(m,mi),t12))
--9296
-satz296:=t14".9296":is(ov(1c,pw(x,m,mi,lemma296),satz290(x,m,mi,lemma296,n)),pw(x,m0"r"(m),intm0(m,mi),lemma296(m0"r"(m),intm0(m,mi),n)))
-ni@[o:or(nis(x,0c),and(pos(m),pos(n)))]
-+9297
-[p:nis(x,0c)]
-t1:=satz290(x,m,mi,lemma294a(o),p):nis(pw(x,m,mi,lemma294a(o)),0c)
-o@[a:and(pos(m),pos(n))]
-t2:=ande2(pos(m),pos(n),a):pos(n)
-t3:=postspp(m,n,ande1(pos(m),pos(n),a),t2):pos(ts"r"(m,n))
--9297
-lemma297a:=th9"l.or"(nis(x,0c),and(pos(m),pos(n)),nis(pw(x,m,mi,lemma294a(o)),0c),pos(n),o,[t:nis(x,0c)]t1".9297"(t),[t:and(pos(m),pos(n))]t2".9297"(t)):or(nis(pw(x,m,mi,lemma294a(o)),0c),pos(n))
-lemma297b:=th8"l.or"(nis(x,0c),and(pos(m),pos(n)),pos(ts"r"(m,n)),o,[t:and(pos(m),pos(n))]t3".9297"(t)):or(nis(x,0c),pos(ts"r"(m,n)))
-mi@[o:or(nis(x,0c),pos(m))][i:is(x,0c)]
-+*9297
-i@t4:=ore2(nis(x,0c),pos(m),o,weli(is(x,0c),i)):pos(m)
-m1:=ntofrl(m,posintnatrl(m,t4,mi)):nat
-t5:=posexp(x,m,mi,o,t4):is(pw(x,m,mi,o),prod(m1,[t:1to(m1)]x))
-t6:=satz289b(m1,[t:1to(m1)]x,xout(m1),i):is(prod(m1,[t:1to(m1)]x),0c)
-t7:=tris(cx,pw(x,m,mi,o),prod(m1,[t:1to(m1)]x),0c,t5,t6):is(pw(x,m,mi,o),0c)
--9297
-i@pw0:=t7".9297":is(pw(x,m,mi,o),0c)
-ni@[o:or(nis(x,0c),and(pos(m),pos(n)))]
-+*9297
-ni@t8:=intts(m,mi,n,ni):intrl(ts"r"(m,n))
-o@prop1:=is(pw(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o)),pw(x,ts"r"(m,n),t8,lemma297b(o))):'prop'
-[i:is(x,0c)]
-t9:=pw0(x,m,mi,lemma294a(o),i):is(pw(x,m,mi,lemma294a(o)),0c)
-t10:=pw0(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o),t9):is(pw(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o)),0c)
-t11:=pw0(x,ts"r"(m,n),t8,lemma297b(o),i):is(pw(x,ts"r"(m,n),t8,lemma297b(o)),0c)
-t12:=tris2(cx,pw(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o)),pw(x,ts"r"(m,n),t8,lemma297b(o)),0c,t10,t11):prop1
-m@[mi:intrl(m)][p:nis(x,0c)]
-t13:=ori1(nis(x,0c),pos(m),p):or(nis(x,0c),pos(m))
-p0:=pw(x,m,mi,t13):cx
-[n:nat]
-nr:=rlofnt(n):real
-t14:=natintrl(nr,natrli(n)):intrl(nr)
-t15:=ori2(nis(p0,0c),pos(nr),natpos(nr,natrli(n))):or(nis(p0,0c),pos(nr))
-t16:=ori1(nis(x,0c),pos(ts"r"(m,nr)),p):or(nis(x,0c),pos(ts"r"(m,nr)))
-t17:=intts(m,mi,nr,t14):intrl(ts"r"(m,nr))
-prop2:=is(pw(p0,nr,t14,t15),pw(x,ts"r"(m,nr),t17,t16)):'prop'
-p@t18:=ispw1(p0,p0,1rl,refis(cx,p0),intrl1,t15(1),lemma291(p0)):is(pw(p0,1rl,t14(1),t15(1)),pw(p0,1rl,intrl1,lemma291(p0)))
-t19:=satz291(p0):is(pw(p0,1rl,intrl1,lemma291(p0)),p0)
-t20:=ispw2(x,m,ts"r"(m,1rl),satz195a(m),mi,t17(1),t13,t16(1)):is(p0,pw(x,ts"r"(m,1rl),t17(1),t16(1)))
-t21:=tr3is(cx,pw(p0,1rl,t14(1),t15(1)),pw(p0,1rl,intrl1,lemma291(p0)),p0,pw(x,ts"r"(m,1rl),t17(1),t16(1)),t18,t19,t20):prop2(1)
-n@[p2:prop2(n)]
-n1:=pl"n"(n,1):nat
-t22:=satz290(x,m,mi,t13,p):nis(p0,0c)
-t23:=ori1(nis(p0,0c),and(pos(nr),pos(1rl)),t22):or(nis(p0,0c),and(pos(nr),pos(1rl)))
-t24:=lemma294a(p0,nr,1rl,t14,intrl1,t23):or(nis(p0,0c),pos(nr))
-t25:=lemma294b(p0,nr,1rl,t14,intrl1,t23):or(nis(p0,0c),pos(1rl))
-t26:=lemma294c(p0,nr,1rl,t14,intrl1,t23):or(nis(p0,0c),pos(pl"r"(nr,1rl)))
-t27:=ispw2(p0,nr(n1),pl"r"(nr,1rl),satzr155a(n,1),t14(n1),intpl(nr,t14,1rl,intrl1),t15(n1),t26):is(pw(p0,nr(n1),t14(n1),t15(n1)),pw(p0,pl"r"(nr,1rl),intpl(nr,t14,1rl,intrl1),t26))
-t27a:=satz294(p0,nr,1rl,t14,intrl1,t23):is(ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)),pw(p0,pl"r"(nr,1rl),intpl(nr,t14,1rl,intrl1),t26))
-t28:=tris2(cx,pw(p0,nr(n1),t14(n1),t15(n1)),ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)),pw(p0,pl"r"(nr,1rl),intpl(nr,t14,1rl,intrl1),t26),t27,t27a):is(pw(p0,nr(n1),t14(n1),t15(n1)),ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)))
-t29:=ori1(nis(x,0c),and(pos(ts"r"(m,nr)),pos(m)),p):or(nis(x,0c),and(pos(ts"r"(m,nr)),pos(m)))
-t30:=lemma294a(x,ts"r"(m,nr),m,t17,mi,t29):or(nis(x,0c),pos(ts"r"(m,nr)))
-t31:=lemma294b(x,ts"r"(m,nr),m,t17,mi,t29):or(nis(x,0c),pos(m))
-t32:=lemma294c(x,ts"r"(m,nr),m,t17,mi,t29):or(nis(x,0c),pos(pl"r"(ts"r"(m,nr),m)))
-t33:=tr3is(cx,pw(p0,nr,t14,t24),pw(p0,nr,t14,t15),pw(x,ts"r"(m,nr),t17,t16),pw(x,ts"r"(m,nr),t17,t30),ispw1(p0,p0,nr,refis(cx,p0),t14,t24,t15),p2,ispw1(x,x,ts"r"(m,nr),refis(cx,x),t17,t16,t30)):is(pw(p0,nr,t14,t24),pw(x,ts"r"(m,nr),t17,t30))
-t34:=tr3is(cx,pw(p0,1rl,intrl1,t25),pw(p0,1rl,intrl1,lemma291(p0)),p0,pw(x,m,mi,t31),ispw1(p0,p0,1rl,refis(cx,p0),intrl1,t25,lemma291(p0)),t19,ispw1(x,x,m,refis(cx,x),mi,t13,t31)):is(pw(p0,1rl,intrl1,t25),pw(x,m,mi,t31))
-t35:=ists12(pw(p0,nr,t14,t24),pw(x,ts"r"(m,nr),t17,t30),pw(p0,1rl,intrl1,t25),pw(x,m,mi,t31),t33,t34):is(ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)),ts(pw(x,ts"r"(m,nr),t17,t30),pw(x,m,mi,t31)))
-t36:=satz294(x,ts"r"(m,nr),m,t17,mi,t29):is(ts(pw(x,ts"r"(m,nr),t17,t30),pw(x,m,mi,t31)),pw(x,pl"r"(ts"r"(m,nr),m),intpl(ts"r"(m,nr),t17,m,mi),t32))
-t37:=tr3is(real,pl"r"(ts"r"(m,nr),m),pl"r"(ts"r"(m,nr),ts"r"(m,1rl)),ts"r"(m,pl"r"(nr,1rl)),ts"r"(m,nr(n1)),ispl2"r"(m,ts"r"(m,1rl),ts"r"(m,nr),satz195a(m)),distpt2"r"(m,nr,1rl),ists2"r"(pl"r"(nr,1rl),nr(n1),m,satzr155b(n,1))):is"r"(pl"r"(ts"r"(m,nr),m),ts"r"(m,nr(n1)))
-t38:=ispw2(x,pl"r"(ts"r"(m,nr),m),ts"r"(m,nr(n1)),t37,intpl(ts"r"(m,nr),t17,m,mi),t17(n1),t32,t16(n1)):is(pw(x,pl"r"(ts"r"(m,nr),m),intpl(ts"r"(m,nr),t17,m,mi),t32),pw(x,ts"r"(m,nr(n1)),t17(n1),t16(n1)))
-t39:=tr4is(cx,pw(p0,nr(n1),t14(n1),t15(n1)),ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)),ts(pw(x,ts"r"(m,nr),t17,t30),pw(x,m,mi,t31)),pw(x,pl"r"(ts"r"(m,nr),m),intpl(ts"r"(m,nr),t17,m,mi),t32),pw(x,ts"r"(m,nr(n1)),t17(n1),t16(n1)),t28,t35,t36,t38):prop2(n1)
-t40:=isp(nat,[t:nat]prop2(t),n1,<n>suc,t39,satz4a(n)):prop2(<n>suc)
-n@t41:=induction([t:nat]prop2(t),t21,[t:nat][u:prop2(t)]t40(t,u),n):prop2(n)
-o@[p:nis(x,0c)][q:pos(n)]
-t42:=posintnatrl(n,q,ni):natrl(n)
-n0:=ntofrl(n,t42):nat
-t43:=isrlnt1(n,t42):is"r"(n,rlofnt(n0))
-t44:=isrlnt2(n,t42):is"r"(rlofnt(n0),n)
-o@p1:=pw(x,m,mi,lemma294a(o)):cx
-q@t44a:=ispw2(x,m,m,refis(real,m),mi,mi,lemma294a(o),t13(mi,p)):is(p1,p0(mi,p))
-t45:=ispw12(p1,p0(mi,p),n,rlofnt(n0),t44a,t43,ni,t14(mi,p,n0),lemma297a(o),t15(mi,p,n0)):is(pw(p1,n,ni,lemma297a(o)),pw(p0(mi,p),rlofnt(n0),t14(mi,p,n0),t15(mi,p,n0)))
-t46:=t41(mi,p,n0):is(pw(p0(mi,p),rlofnt(n0),t14(mi,p,n0),t15(mi,p,n0)),pw(x,ts"r"(m,rlofnt(n0)),t17(mi,p,n0),t16(mi,p,n0)))
-t47:=ists2"r"(rlofnt(n0),n,m,t44):is"r"(ts"r"(m,rlofnt(n0)),ts"r"(m,n))
-t48:=ispw2(x,ts"r"(m,rlofnt(n0)),ts"r"(m,n),t47,t17(mi,p,n0),t8,t16(mi,p,n0),lemma297b(o)):is(pw(x,ts"r"(m,rlofnt(n0)),t17(mi,p,n0),t16(mi,p,n0)),pw(x,ts"r"(m,n),t8,lemma297b(o)))
-t49:=tr3is(cx,pw(p1,n,ni,lemma297a(o)),pw(p0(mi,p),rlofnt(n0),t14(mi,p,n0),t15(mi,p,n0)),pw(x,ts"r"(m,rlofnt(n0)),t17(mi,p,n0),t16(mi,p,n0)),pw(x,ts"r"(m,n),t8,lemma297b(o)),t45,t46,t48):prop1
-p@[i:is"r"(n,0)]
-t50:=0exp(p1,n,ni,lemma297a(o),i):is(pw(p1,n,ni,lemma297a(o)),1c)
-t51:=ts02"r"(m,n,i):is"r"(ts"r"(m,n),0)
-t52:=0exp(x,ts"r"(m,n),t8,lemma297b(o),t51):is(pw(x,ts"r"(m,n),t8,lemma297b(o)),1c)
-t53:=tris2(cx,pw(p1,n,ni,lemma297a(o)),pw(x,ts"r"(m,n),t8,lemma297b(o)),1c,t50,t52):prop1
-p@[q:neg(n)]
-an:=abs(n):real
-t54:=intabs(n,ni):intrl(an)
-t55:=ori1(nis(x,0c),and(pos(m),pos(an)),p):or(nis(x,0c),and(pos(m),pos(an)))
-p1t55:=p1(an,mi,t54,t55):cx
-t56:=satz166e(n,nnot0(n,q)):pos(an)
-t56a:=lemma294a(an,mi,t54,t55):or(nis(x,0c),pos(m))
-t57:=lemma297a(an,mi,t54,t55):or(nis(p1t55,0c),pos(an))
-t58:=lemma297b(an,mi,t54,t55):or(nis(x,0c),pos(ts"r"(m,an)))
-t59:=t49(an,mi,t54,t55,p,t56):is(pw(p1t55,an,t54,t57),pw(x,ts"r"(m,an),t8(an,mi,t54),t58))
-t60:=satz177c(an,n,absn(n,q)):is"r"(n,m0"r"(an))
-t61:=intm0(an,t54):intrl(m0"r"(an))
-t62:=satz290(x,m,mi,t56a,p):nis(p1t55,0c)
-t63:=lemma296(p1t55,an,t54,t62):or(nis(p1t55,0c),pos(an))
-t64:=satz290(p1t55,an,t54,t63,t62):nis(pw(p1t55,an,t54,t63),0c)
-t65:=lemma296(p1t55,m0"r"(an),t61,t62):or(nis(p1t55,0c),pos(m0"r"(an)))
-t66:=satz296(p1t55,an,t54,t62):is(ov(1c,pw(p1t55,an,t54,t63),t64),pw(p1t55,m0"r"(an),t61,t65))
-t67:=ispw1(x,x,m,refis(cx,x),mi,lemma294a(o),t56a):is(p1,p1t55)
-t68:=ispw12(p1,p1t55,n,m0"r"(an),t67,t60,ni,t61,lemma297a(o),t65):is(pw(p1,n,ni,lemma297a(o)),pw(p1t55,m0"r"(an),t61,t65))
-t69:=tris2(cx,pw(p1,n,ni,lemma297a(o)),ov(1c,pw(p1t55,an,t54,t63),t64),pw(p1t55,m0"r"(an),t61,t65),t68,t66):is(pw(p1,n,ni,lemma297a(o)),ov(1c,pw(p1t55,an,t54,t63),t64))
-t70:=tris(real,m0"r"(ts"r"(m,an)),ts"r"(m,m0"r"(an)),ts"r"(m,n),satz197f(m,an),ists2"r"(m0"r"(an),n,m,symis(real,n,m0"r"(an),t60))):is"r"(m0"r"(ts"r"(m,an)),ts"r"(m,n))
-t71:=intm0(ts"r"(m,an),t8(an,mi,t54)):intrl(m0"r"(ts"r"(m,an)))
-t72:=lemma296(x,ts"r"(m,an),t8(an,mi,t54),p):or(nis(x,0c),pos(ts"r"(m,an)))
-t73:=satz290(x,ts"r"(m,an),t8(an,mi,t54),t72,p):nis(pw(x,ts"r"(m,an),t8(an,mi,t54),t72),0c)
-t74:=lemma296(x,m0"r"(ts"r"(m,an)),t71,p):or(nis(x,0c),pos(m0"r"(ts"r"(m,an))))
-t75:=satz296(x,ts"r"(m,an),t8(an,mi,t54),p):is(ov(1c,pw(x,ts"r"(m,an),t8(an,mi,t54),t72),t73),pw(x,m0"r"(ts"r"(m,an)),t71,t74))
-t76:=ispw2(x,m0"r"(ts"r"(m,an)),ts"r"(m,n),t70,t71,t8,t74,lemma297b(o)):is(pw(x,m0"r"(ts"r"(m,an)),t71,t74),pw(x,ts"r"(m,n),t8,lemma297b(o)))
-t77:=ispw1(p1t55,p1t55,an,refis(cx,p1t55),t54,t63,t57):is(pw(p1t55,an,t54,t63),pw(p1t55,an,t54,t57))
-t78:=ispw1(x,x,ts"r"(m,an),refis(cx,x),t8(an,mi,t54),t58,t72):is(pw(x,ts"r"(m,an),t8(an,mi,t54),t58),pw(x,ts"r"(m,an),t8(an,mi,t54),t72))
-t79:=tr3is(cx,pw(p1t55,an,t54,t63),pw(p1t55,an,t54,t57),pw(x,ts"r"(m,an),t8(an,mi,t54),t58),pw(x,ts"r"(m,an),t8(an,mi,t54),t72),t77,t59,t78):is(pw(p1t55,an,t54,t63),pw(x,ts"r"(m,an),t8(an,mi,t54),t72))
-t80:=isov2(pw(p1t55,an,t54,t63),pw(x,ts"r"(m,an),t8(an,mi,t54),t72),1c,t79,t64,t73):is(ov(1c,pw(p1t55,an,t54,t63),t64),ov(1c,pw(x,ts"r"(m,an),t8(an,mi,t54),t72),t73))
-t81:=tr4is(cx,pw(p1,n,ni,lemma297a(o)),ov(1c,pw(p1t55,an,t54,t63),t64),ov(1c,pw(x,ts"r"(m,an),t8(an,mi,t54),t72),t73),pw(x,m0"r"(ts"r"(m,an)),t71,t74),pw(x,ts"r"(m,n),t8,lemma297b(o)),t69,t80,t75,t76):prop1
-p@t82:=rapp(n,prop1,[t:pos(n)]t49(t),[t:is"r"(n,0)]t53(t),[t:neg(n)]t81(t)):prop1
--9297
-o@satz297:=th1"l.imp"(is(x,0c),prop1".9297",[t:is(x,0c)]t12".9297"(t),[t:nis(x,0c)]t82".9297"(t)):is(pw(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o)),pw(x,ts"r"(m,n),intts(m,mi,n,ni),lemma297b(o)))
-@[r:real][s:real]
-+10298
-t1:=tris(cx,pl(pli(r,0),pli(s,0)),pli(pl"r"(r,s),pl"r"(0,0)),pli(pl"r"(r,s),0),plis12a(r,0,s,0),isrecx2(pl"r"(0,0),0,pl"r"(r,s),pl01(0,0,refis(real,0)))):is(pl(pli(r,0),pli(s,0)),pli(pl"r"(r,s),0))
--10298
-satz298a:=symis(cx,pl(pli(r,0),pli(s,0)),pli(pl"r"(r,s),0),t1".10298"):is(pli(pl"r"(r,s),0),pl(pli(r,0),pli(s,0)))
-satz298b:=t1".10298":is(pl(pli(r,0),pli(s,0)),pli(pl"r"(r,s),0))
-+*10298
-s@t2:=tris(cx,mn(pli(r,0),pli(s,0)),pli(mn"r"(r,s),mn"r"(0,0)),pli(mn"r"(r,s),0),mnis12a(r,0,s,0),isrecx2(mn"r"(0,0),0,mn"r"(r,s),pl02(0,m0"r"(0),satz176b(0,refis(real,0))))):is(mn(pli(r,0),pli(s,0)),pli(mn"r"(r,s),0))
--10298
-s@satz298c:=symis(cx,mn(pli(r,0),pli(s,0)),pli(mn"r"(r,s),0),t2".10298"):is(pli(mn"r"(r,s),0),mn(pli(r,0),pli(s,0)))
-satz298d:=t2".10298":is(mn(pli(r,0),pli(s,0)),pli(mn"r"(r,s),0))
-+*10298
-s@t3:=pl02(ts"r"(r,s),m0"r"(ts"r"(0,0)),satz176b(ts"r"(0,0),ts01(0,0,refis(real,0)))):is"r"(mn"r"(ts"r"(r,s),ts"r"(0,0)),ts"r"(r,s))
-t4:=tris(real,pl"r"(ts"r"(r,0),ts"r"(0,s)),ts"r"(r,0),0,pl02(ts"r"(r,0),ts"r"(0,s),ts01(0,s,refis(real,0))),ts02(r,0,refis(real,0))):is"r"(pl"r"(ts"r"(r,0),ts"r"(0,s)),0)
-t5:=tris(cx,ts(pli(r,0),pli(s,0)),pli(mn"r"(ts"r"(r,s),ts"r"(0,0)),pl"r"(ts"r"(r,0),ts"r"(0,s))),pli(ts"r"(r,s),0),tsis12a(r,0,s,0),isrecx12(mn"r"(ts"r"(r,s),ts"r"(0,0)),ts"r"(r,s),pl"r"(ts"r"(r,0),ts"r"(0,s)),0,t3,t4)):is(ts(pli(r,0),pli(s,0)),pli(ts"r"(r,s),0))
--10298
-s@satz298e:=symis(cx,ts(pli(r,0),pli(s,0)),pli(ts"r"(r,s),0),t5".10298"):is(pli(ts"r"(r,s),0),ts(pli(r,0),pli(s,0)))
-satz298f:=t5".10298":is(ts(pli(r,0),pli(s,0)),pli(ts"r"(r,s),0))
-[n:nis"r"(s,0)]
-+*10298
-n@[i:is(pli(s,0),0c)]
-t6:=tr3is(real,s,re(pli(s,0)),re(0c),0,isre(s,0),iscere(pli(s,0),0c,i),reis(0,0)):is"r"(s,0)
--10298
-n@lemma298:=th3"l.imp"(is(pli(s,0),0c),is"r"(s,0),n,[t:is(pli(s,0),0c)]t6".10298"(t)):nis(pli(s,0),0c)
-+*10298
-n@t7:=tris(cx,ts(pli(s,0),pli(ov"r"(r,s,n),0)),pli(ts"r"(s,ov"r"(r,s,n)),0),pli(r,0),t5(s,ov"r"(r,s,n)),isrecx1(ts"r"(s,ov"r"(r,s,n)),r,0,satz204c(r,s,n))):is(ts(pli(s,0),pli(ov"r"(r,s,n),0)),pli(r,0))
--10298
-n@satz298g:=satz229g(pli(r,0),pli(s,0),pli(ov"r"(r,s,n),0),lemma298,t7".10298"):is(pli(ov"r"(r,s,n),0),ov(pli(r,0),pli(s,0),lemma298))
-satz298h:=satz229h(pli(r,0),pli(s,0),pli(ov"r"(r,s,n),0),lemma298,t7".10298"):is(ov(pli(r,0),pli(s,0),lemma298),pli(ov"r"(r,s,n),0))
-+*10298
-r@t8:=tris(cx,m0(pli(r,0)),pli(m0"r"(r),m0"r"(0)),pli(m0"r"(r),0),m0isa(r,0),isrecx2(m0"r"(0),0,m0"r"(r),satz176b(0,refis(real,0)))):is(m0(pli(r,0)),pli(m0"r"(r),0))
--10298
-r@satz298j:=symis(cx,m0(pli(r,0)),pli(m0"r"(r),0),t8".10298"):is(pli(m0"r"(r),0),m0(pli(r,0)))
-satz298k:=t8".10298":is(m0(pli(r,0)),pli(m0"r"(r),0))
-+*10298
-r@t9:=tris(real,mod2(pli(r,0)),ts"r"(re(pli(r,0)),re(pli(r,0))),ts"r"(r,r),pl02(ts"r"(re(pli(r,0)),re(pli(r,0))),ts"r"(im(pli(r,0)),im(pli(r,0))),ts01(im(pli(r,0)),im(pli(r,0)),imis(r,0))),ists12"r"(re(pli(r,0)),r,re(pli(r,0)),r,reis(r,0),reis(r,0))):is"r"(mod2(pli(r,0)),ts"r"(r,r))
-ar:=abs(r):real
-[p:pos(r)]
-t10:=satz196a(r,r,p,p):is"r"(ts"r"(r,r),ts"r"(ar,ar))
-r@[i:is"r"(r,0)]
-t11:=tris2(real,ts"r"(r,r),ts"r"(ar,ar),0,ts01(r,r,i),ts01(ar,ar,abs0(r,i))):is"r"(ts"r"(r,r),ts"r"(ar,ar))
-r@[n:neg(r)]
-t12:=satz196b(r,r,n,n):is"r"(ts"r"(r,r),ts"r"(ar,ar))
-r@t13:=rapp(r,is"r"(ts"r"(r,r),ts"r"(ar,ar)),[t:pos(r)]t10(t),[t:is"r"(r,0)]t11(t),[t:neg(r)]t12(t)):is"r"(ts"r"(r,r),ts"r"(ar,ar))
-t14:=tris(real,mod2(pli(r,0)),ts"r"(r,r),ts"r"(ar,ar),t9,t13):is"r"(mod2(pli(r,0)),ts"r"(ar,ar))
-t15:=th1"l.imp"(is"r"(r,0),not(neg(ar)),[t:is"r"(r,0)]0notn(ar,abs0(r,t)),[t:nis"r"(r,0)]pnotn(ar,satz166e(r,t))):not(neg(ar))
--10298
-r@satz298l:=thsqrt3(mod2(pli(r,0)),lemma5(pli(r,0)),abs(r),t15".10298",t14".10298"):is"r"(mod(pli(r,0)),abs(r))
-satz298m:=symis(real,mod(pli(r,0)),abs(r),satz298l):is"r"(abs(r),mod(pli(r,0)))
-cofrl:=pli(r,0):complex
-s@[i:is(cofrl(r),cofrl(s))]
-isrlic:=tr3is(real,r,re(cofrl(r)),re(cofrl(s)),s,isre(r,0),iscere(cofrl(r),cofrl(s),i),reis(s,0)):is"r"(r,s)
-s@[i:is"r"(r,s)]
-isrlec:=isrecx1(r,s,0,i):is(cofrl(r),cofrl(s))
-+v10
-@t1:=[t:real][u:real][v:is(cofrl(t),cofrl(u))]isrlic(t,u,v):injective(real,cx,[t:real]cofrl(t))
--v10
-@[x:cx]
-realc:=image(real,cx,[t:real]cofrl(t),x):'prop'
-r@reali:=imagei(real,cx,[t:real]cofrl(t),r):realc(cofrl(r))
-x@[rx:realc(x)]
-rlofc:=soft(real,cx,[t:real]cofrl(t),t1".v10",x,rx):real
-[y:cx][ry:realc(y)][i:is"r"(rlofc(x,rx),rlofc(y,ry))]
-iscirl:=isinve(real,cx,[t:real]cofrl(t),t1".v10",x,rx,y,ry,i):is(x,y)
-ry@[i:is(x,y)]
-iscerl:=isinv(real,cx,[t:real]cofrl(t),t1".v10",x,rx,y,ry,i):is"r"(rlofc(x,rx),rlofc(y,ry))
-r@isrlc1:=isst1(real,cx,[t:real]cofrl(t),t1".v10",r):is"r"(r,rlofc(cofrl(r),reali(r)))
-isrlc2:=isst2(real,cx,[t:real]cofrl(t),t1".v10",r):is"r"(rlofc(cofrl(r),reali(r)),r)
-rx@iscrl1:=ists1"e"(real,cx,[t:real]cofrl(t),t1".v10",x,rx):is(x,cofrl(rlofc(x,rx)))
-iscrl2:=ists2"e"(real,cx,[t:real]cofrl(t),t1".v10",x,rx):is(cofrl(rlofc(x,rx)),x)
-@[n:nat]
-cofn:=cofrl(rlofnt(n)):complex
-[m:nat][i:is"n"(n,m)]
-isnec:=isrlec(rlofnt(n),rlofnt(m),isnterl(n,m,i)):is(cofn(n),cofn(m))
-m@[i:is(cofn(n),cofn(m))]
-isnic:=isntirl(n,m,isrlic(rlofnt(n),rlofnt(m),i)):is"n"(n,m)
-+*v10
-@t2:=[t:nat][u:nat][v:is(cofn(t),cofn(u))]isnic(t,u,v):injective(nat,cx,[t:nat]cofn(t))
--v10
-x@natc:=image(nat,cx,[t:nat]cofn(t),x):'prop'
-n@nati:=imagei(nat,cx,[t:nat]cofn(t),n):natc(cofn(n))
-x@[nx:natc(x)]
-nofc:=soft(nat,cx,[t:nat]cofn(t),t2".v10",x,nx):nat
-[y:cx][ny:natc(y)][i:is(x,y)]
-iscen:=isinv(nat,cx,[t:nat]cofn(t),t2".v10",x,nx,y,ny,i):is"n"(nofc(x,nx),nofc(y,ny))
-ny@[i:is"n"(nofc(x,nx),nofc(y,ny))]
-iscin:=isinve(nat,cx,[t:nat]cofn(t),t2".v10",x,nx,y,ny,i):is(x,y)
-n@isnc1:=isst1(nat,cx,[t:nat]cofn(t),t2".v10",n):is"n"(n,nofc(cofn(n),nati(n)))
-isnc2:=isst2(nat,cx,[t:nat]cofn(t),t2".v10",n):is"n"(nofc(cofn(n),nati(n)),n)
-nx@iscn1:=ists1"e"(nat,cx,[t:nat]cofn(t),t2".v10",x,nx):is(x,cofn(nofc(x,nx)))
-iscn2:=ists2"e"(nat,cx,[t:nat]cofn(t),t2".v10",x,nx):is(cofn(nofc(x,nx)),x)
-@natt:=ot(cx,[t:cx]natc(t)):'type'
-[nt:natt]
-cofnt:=in"e"(cx,[t:cx]natc(t),nt):cx
-natti:=inp(cx,[t:cx]natc(t),nt):natc(cofnt(nt))
-[mt:natt][i:is"e"(natt,nt,mt)]
-isntec:=isini(cx,[t:cx]natc(t),nt,mt,i):is(cofnt(nt),cofnt(mt))
-mt@[i:is(cofnt(nt),cofnt(mt))]
-isntic:=isine(cx,[t:cx]natc(t),nt,mt,i):is"e"(natt,nt,mt)
-nx@ntofc:=out(cx,[t:cx]natc(t),x,nx):natt
-ny@[i:is(x,y)]
-iscent:=isouti(cx,[t:cx]natc(t),x,nx,y,ny,i):is"e"(natt,ntofc(x,nx),ntofc(y,ny))
-ny@[i:is"e"(natt,ntofc(x,nx),ntofc(y,ny))]
-iscint:=isoute(cx,[t:cx]natc(t),x,nx,y,ny,i):is(x,y)
-nt@isntc1:=isoutin(cx,[t:cx]natc(t),nt):is"e"(natt,nt,ntofc(cofnt(nt),natti(nt)))
-isntc2:=symis(natt,nt,ntofc(cofnt(nt),natti(nt)),isntc1):is"e"(natt,ntofc(cofnt(nt),natti(nt)),nt)
-nx@iscnt1:=isinout(cx,[t:cx]natc(t),x,nx):is(x,cofnt(ntofc(x,nx)))
-iscnt2:=symis(cx,x,cofnt(ntofc(x,nx)),iscnt1):is(cofnt(ntofc(x,nx)),x)
-n@ntofn:=ntofc(cofn(n),nati(n)):natt
-m@[i:is"n"(n,m)]
-isnent:=iscent(cofn(n),nati(n),cofn(m),nati(m),isnec(n,m,i)):is"e"(natt,ntofn(n),ntofn(m))
-m@[i:is"e"(natt,ntofn(n),ntofn(m))]
-isnint:=isnic(n,m,iscint(cofn(n),nati(n),cofn(m),nati(m),i)):is"n"(n,m)
-nt@nofnt:=nofc(cofnt(nt),natti(nt)):nat
-mt@[i:is"e"(natt,nt,mt)]
-isnter:=iscen(cofnt(nt),natti(nt),cofnt(mt),natti(mt),isntec(nt,mt,i)):is"n"(nofnt(nt),nofnt(mt))
-mt@[i:is"n"(nofnt(nt),nofnt(mt))]
-isntin:=isntic(nt,mt,iscin(cofnt(nt),natti(nt),cofnt(mt),natti(mt),i)):is"e"(natt,nt,mt)
-+*v10
-n@t3:=iscnt1(cofn(n),nati(n)):is(cofn(n),cofnt(ntofn(n)))
--v10
-n@isnnt1:=tris(nat,n,nofc(cofn(n),nati(n)),nofnt(ntofn(n)),isnc1(n),iscen(cofn(n),nati(n),cofnt(ntofn(n)),natti(ntofn(n)),t3".v10")):is"n"(n,nofnt(ntofn(n)))
-isnnt2:=symis(nat,n,nofnt(ntofn(n)),isnnt1):is"n"(nofnt(ntofn(n)),n)
-+*v10
-nt@t4:=iscn1(cofnt(nt),natti(nt)):is(cofnt(nt),cofn(nofnt(nt)))
--v10
-nt@isntn1:=tris(natt,nt,ntofc(cofnt(nt),natti(nt)),ntofn(nofnt(nt)),isntc1(nt),iscent(cofnt(nt),natti(nt),cofn(nofnt(nt)),nati(nofnt(nt)),t4".v10")):is"e"(natt,nt,ntofn(nofnt(nt)))
-isntn2:=symis(natt,nt,ntofn(nofnt(nt)),isntn1):is"e"(natt,ntofn(nofnt(nt)),nt)
-@1t:=ntofn(1):natt
-suct:=[t:natt]ntofn(<nofnt(t)>suc):[t:natt]natt
-+10299
-nt@[i:is"e"(natt,<nt>suct,1t)]
-t1:=isnint(<nofnt(nt)>suc,1,i):is"n"(<nofnt(nt)>suc,1)
--10299
-nt@satz299a:=th3"l.imp"(is"e"(natt,<nt>suct,1t),is"n"(<nofnt(nt)>suc,1),<nofnt(nt)>ax3,[t:is"e"(natt,<nt>suct,1t)]t1".10299"(t)):not(is"e"(natt,<nt>suct,1t))
-@ax3t:=[t:natt]satz299a(t):[t:natt]not(is"e"(natt,<t>suct,1t))
-mt@[i:is"e"(natt,<nt>suct,<mt>suct)]
-+*10299
-i"c"@t2:=isnint(<nofnt(nt)>suc,<nofnt(mt)>suc,i):is"n"(<nofnt(nt)>suc,<nofnt(mt)>suc)
-t3:=<t2><nofnt(mt)><nofnt(nt)>ax4:is"n"(nofnt(nt),nofnt(mt))
--10299
-i@satz299b:=isntin(nt,mt,t3".10299"):is"e"(natt,nt,mt)
-@ax4t:=[t:natt][u:natt][v:is"e"(natt,<t>suct,<u>suct)]satz299b(t,u,v):[t:natt][u:natt][v:is"e"(natt,<t>suct,<u>suct)]is"e"(natt,t,u)
-[s:set(natt)]
-cond1t:=esti(natt,1t,s):'prop'
-cond2t:=all"l"(natt,[t:natt]imp(esti(natt,t,s),esti(natt,<t>suct,s))):'prop'
-[c1:cond1t][c2:cond2t]
-+*10299
-c2@[n:nat]
-prop1:=esti(natt,ntofn(n),s):'prop'
-c2@t4:=c1:prop1(1)
-n@[p:prop1(n)]
-t5:=<p><ntofn(n)>c2:esti(natt,ntofn(<nofnt(ntofn(n))>suc),s)
-t6:=isp(nat,[t:nat]esti(natt,ntofn(<t>suc),s),nofnt(ntofn(n)),n,t5,isnnt2(n)):prop1(<n>suc)
-c2@[nt:natt]
-t7:=induction([t:nat]prop1(t),t4,[t:nat][u:prop1(t)]t6(t,u),nofnt(nt)):prop1(nofnt(nt))
--10299
-c2@satz299c:=[t:natt]isp(natt,[u:natt]esti(natt,u,s),ntofn(nofnt(t)),t,t7".10299"(t),isntn2(t)):[t:natt]esti(natt,t,s)
-@ax5t:=[t:set(natt)][u:cond1t(t)][v:cond2t(t)]satz299c(t,u,v):[t:set(natt)][u:cond1t(t)][v:cond2t(t)][w:natt]esti(natt,w,t)
-ic:=pli(0,1rl):complex
-+10300
-t1:=tsis12a(0,1rl,0,1rl):is(ts(ic,ic),pli(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),pl"r"(ts"r"(0,1rl),ts"r"(1rl,0))))
-t2:=tris(real,mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),m0"r"(ts"r"(1rl,1rl)),m0"r"(1rl),pl01(ts"r"(0,0),m0"r"(ts"r"(1rl,1rl)),ts01(0,0,refis(real,0))),ism0"r"(ts"r"(1rl,1rl),1rl,satz195(1rl))):is"r"(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),m0"r"(1rl))
-t3:=tris(real,pl"r"(ts"r"(0,1rl),ts"r"(1rl,0)),ts"r"(1rl,0),0,pl01(ts"r"(0,1rl),ts"r"(1rl,0),ts01(0,1rl,refis(real,0))),ts02(1rl,0,refis(real,0))):is"r"(pl"r"(ts"r"(0,1rl),ts"r"(1rl,0)),0)
-t4:=isrecx12(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),m0"r"(1rl),pl"r"(ts"r"(0,1rl),ts"r"(1rl,0)),0,t2,t3):is(pli(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),pl"r"(ts"r"(0,1rl),ts"r"(1rl,0))),cofrl(m0"r"(1rl)))
-t5:=satz298j(1rl):is(cofrl(m0"r"(1rl)),m0(1c))
--10300
-satz2300:=tr3is(cx,ts(ic,ic),pli(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),pl"r"(ts"r"(0,1rl),ts"r"(1rl,0))),cofrl(m0"r"(1rl)),m0(1c),t1".10300",t4".10300",t5".10300"):is(ts(ic,ic),m0(1c))
-[r:real][s:real]
-+10301
-t1:=tsis12a(s,0,0,1rl):is(ts(cofrl(s),ic),pli(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),pl"r"(ts"r"(s,1rl),ts"r"(0,0))))
-t2:=tris(real,mn"r"(ts"r"(s,0),ts"r"(0,1rl)),m0"r"(ts"r"(0,1rl)),0,pl01(ts"r"(s,0),m0"r"(ts"r"(0,1rl)),ts02(s,0,refis(real,0))),satz176b(ts"r"(0,1rl),ts01(0,1rl,refis(real,0)))):is"r"(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),0)
-t3:=tris(real,pl"r"(ts"r"(s,1rl),ts"r"(0,0)),ts"r"(s,1rl),s,pl02(ts"r"(s,1rl),ts"r"(0,0),ts01(0,0,refis(real,0))),satz195(s)):is"r"(pl"r"(ts"r"(s,1rl),ts"r"(0,0)),s)
-t4:=isrecx12(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),0,pl"r"(ts"r"(s,1rl),ts"r"(0,0)),s,t2,t3):is(pli(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),pl"r"(ts"r"(s,1rl),ts"r"(0,0))),pli(0,s))
-t5:=tris(cx,ts(cofrl(s),ic),pli(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),pl"r"(ts"r"(s,1rl),ts"r"(0,0))),pli(0,s),t1,t4):is(ts(cofrl(s),ic),pli(0,s))
-t6:=ispl2(ts(cofrl(s),ic),pli(0,s),cofrl(r),t5):is(pl(cofrl(r),ts(cofrl(s),ic)),pl(cofrl(r),pli(0,s)))
-t7:=plis12a(r,0,0,s):is(pl(cofrl(r),pli(0,s)),pli(pl"r"(r,0),pl"r"(0,s)))
-t8:=isrecx12(pl"r"(r,0),r,pl"r"(0,s),s,pl02(r,0,refis(real,0)),pl01(0,s,refis(real,0))):is(pli(pl"r"(r,0),pl"r"(0,s)),pli(r,s))
--10301
-satz301a:=tr3is(cx,pl(cofrl(r),ts(cofrl(s),ic)),pl(cofrl(r),pli(0,s)),pli(pl"r"(r,0),pl"r"(0,s)),pli(r,s),t6".10301",t7".10301",t8".10301"):is"e"(cx,pl(cofrl(r),ts(cofrl(s),ic)),pli(r,s))
-satz301b:=symis(cx,pl(cofrl(r),ts(cofrl(s),ic)),pli(r,s),satz301a):is(pli(r,s),pl(cofrl(r),ts(cofrl(s),ic)))
-@[x:complex]
-satz301c:=tris(cx,x,pli(re(x),im(x)),pl(cofrl(re(x)),ts(cofrl(im(x)),ic)),ispli(x),satz301b(re(x),im(x))):is(x,pl(cofrl(re(x)),ts(cofrl(im(x)),ic)))
-satz301d:=symis(cx,x,pl(cofrl(re(x)),ts(cofrl(im(x)),ic)),satz301c):is(pl(cofrl(re(x)),ts(cofrl(im(x)),ic)),x)
-s@[t:real][u:real][i:is(pl(cofrl(r),ts(cofrl(s),ic)),pl(cofrl(t),ts(cofrl(u),ic)))]
-+*10301
-i@t9:=tr3is(cx,pli(r,s),pl(cofrl(r),ts(cofrl(s),ic)),pl(cofrl(t),ts(cofrl(u),ic)),pli(t,u),satz301b(r,s),i,satz301a(t,u)):is(pli(r,s),pli(t,u))
--10301
-i@satz301e:=tr3is(real,r,re(pli(r,s)),re(pli(t,u)),t,isre(r,s),iscere(pli(r,s),pli(t,u),t9".10301"),reis(t,u)):is"r"(r,t)
-satz301f:=tr3is(real,s,im(pli(r,s)),im(pli(t,u)),u,isim(r,s),isceim(pli(r,s),pli(t,u),t9".10301"),imis(t,u)):is"r"(s,u)
--c
--r
--rp
--rt
--n
--landau
--eq
--st
--e
--l
+++ /dev/null
-# Landau's "Grundlagen der Analysis", formal specification in AUTOMATH
-# Copyright (C) 1977, L.S. van Benthem Jutting
-# 1992, revised by F. Wiedijk (http://www.cs.ru.nl/~freek/aut/)
-# 2008, revised by F. Guidi to remove eta-reductions
-# 2014, revised by F. Guidi to remove sort inclusions on binders of degree 1
-
-+l
-@[a:'prop'][b:'prop']
-imp:=[x:a]b:'prop'
-[a1:a][i:imp(a,b)]
-mp:=<a1>i:b
-a@refimp:=[x:a]x:imp(a,a)
-b@[c:'prop'][i:imp(a,b)][j:imp(b,c)]
-trimp:=[x:a]<<x>i>j:imp(a,c)
-@con:='prim':'prop'
-a@not:=imp(con):'prop'
-wel:=not(not(a)):'prop'
-[a1:a]
-weli:=[x:not(a)]<a1>x:wel(a)
-a@[w:wel(a)]
-et:='prim':a
-a@[c1:con]
-cone:=et([x:not(a)]c1):a
-+imp
-b@[i:imp(a,b)][j:imp(not(a),b)]
-th1:=et(b,[x:not(b)]<<trimp(con,i,x)>j>x):b
-b@[n:not(a)]
-th2:=trimp(con,b,n,[x:con]cone(b,x)):imp(a,b)
-b@[n:not(b)][i:imp(a,b)]
-th3:=trimp(con,i,n):not(a)
-b@[a1:a][n:not(b)]
-th4:=[x:imp(a,b)]<a1>th3(n,x):not(imp(a,b))
-b@[n:not(imp(a,b))]
-th5:=et([x:not(a)]<th2(x)>n):a
-th6:=[x:b]<[y:a]x>n:not(b)
-b@[n:not(b)][i:imp(not(a),b)]
-th7:=et(a,th3(not(a),b,n,i)):a
--imp
-b@[i:imp(not(b),not(a))]
-cp:=[x:a]th7".imp"(b,not(a),weli(x),i):imp(a,b)
-@obvious:=imp(con,con):'prop'
-obviousi:=refimp(con):obvious
-b@ec:=imp(a,not(b)):'prop'
-[n:not(a)]
-eci1:=th2".imp"(not(b),n):ec(a,b)
-b@[n:not(b)]
-eci2:=[x:a]n:ec(a,b)
-+ec
-b@[i:imp(a,not(b))]
-th1:=i:ec(a,b)
-b@[i:imp(b,not(a))]
-th2:=[x:a][y:b]<x><y>i:ec(a,b)
--ec
-b@[e:ec(a,b)]
-comec:=th2".ec"(b,a,e):ec(b,a)
-[a1:a]
-ece1:=<a1>e:not(b)
-e@[b1:b]
-ece2:=th3".imp"(not(b),weli(b,b1),e):not(a)
-+*ec
-c@[e:ec(a,b)][i:imp(c,a)]
-th3:=trimp(c,a,not(b),i,e):ec(c,b)
-e@[i:imp(c,b)]
-th4:=comec(c,a,th3(b,a,c,comec(e),i)):ec(a,c)
--ec
-b@and:=not(ec(a,b)):'prop'
-[a1:a][b1:b]
-andi:=th4".imp"(not(b),a1,weli(b,b1)):and(a,b)
-b@[a1:and(a,b)]
-ande1:=th5".imp"(not(b),a1):a
-ande2:=et(b,th6".imp"(not(b),a1)):b
-comand:=andi(b,a,ande2,ande1):and(b,a)
-+and
-b@[n:not(a)]
-th1:=weli(ec,eci1(n)):not(and)
-b@[n:not(b)]
-th2:=weli(ec,eci2(n)):not(and)
-b@[n:not(and)][a1:a]
-th3:=ece1(et(ec,n),a1):not(b)
-n@[b1:b]
-th4:=ece2(et(ec,n),b1):not(a)
-n@th5:=th3"l.imp"(and(b,a),and(a,b),n,[x:and(b,a)]comand(b,a,x)):not(and(b,a))
-c@[a1:and(a,b)][i:imp(a,c)]
-th6:=andi(c,b,<ande1(a1)>i,ande2(a1)):and(c,b)
-a1@[i:imp(b,c)]
-th7:=andi(a,c,ande1(a1),<ande2(a1)>i):and(a,c)
--and
-b@or:=imp(not(a),b):'prop'
-[a1:a]
-ori1:=th2".imp"(not(a),b,weli(a1)):or(a,b)
-b@[b1:b]
-ori2:=[x:not(a)]b1:or(a,b)
-+or
-b@[i:imp(not(a),b)]
-th1:=i:or(a,b)
-b@[i:imp(not(b),a)]
-th2:=[x:not]et(b,th3"l.imp"(not(b),a,x,i)):or(a,b)
--or
-b@[o:or(a,b)][n:not(a)]
-ore2:=<n>o:b
-o@[n:not(b)]
-ore1:=et(th3".imp"(not(a),b,n,o)):a
-o@comor:=[x:not(b)]ore1(x):or(b,a)
-+*or
-b@[n:not(a)][m:not(b)]
-th3:=th4"l.imp"(not(a),b,n,m):not(or(a,b))
-b@[n:not(or(a,b))]
-th4:=th5"l.imp"(not(a),b,n):not(a)
-th5:=th6"l.imp"(not(a),b,n):not(b)
-a@th6:=refimp(not(a)):or(a,not(a))
--or
-c@[o:or(a,b)][i:imp(a,c)][j:imp(b,c)]
-orapp:=th1".imp"(c,i,trimp(not,b,c,o,j)):c
-c@[d:'prop']
-+*or
-o@[i:imp(a,c)]
-th7:=trimp(not(c),not,b,[x:not(c)]th3"l.imp"(a,c,x,i),o):or(c,b)
-o@[i:imp(b,c)]
-th8:=trimp(not(a),b,c,o,i):or(a,c)
-d@[o:or(a,b)][i:imp(a,c)][j:imp(b,d)]
-th9:=th7(a,d,c,th8(a,b,d,o,j),i):or(c,d)
-b@[o:or(a,b)]
-th10:=o:imp(not(a),b)
-th11:=comor(o):imp(not(b),a)
-b@[o:or(not(a),b)]
-th12:=trimp(a,wel(a),b,[x:a]weli(x),o):imp(a,b)
-b@[i:imp(a,b)]
-th13:=trimp(wel(a),a,b,[x:wel(a)]et(x),i):or(not(a),b)
-b@[o:or(not(a),not(b))]
-th14:=weli(ec,th12(not(b),o)):not(and)
-b@[n:not(and)]
-th15:=th13(not(b),et(ec,n)):or(not(a),not(b))
-b@[a1:and(not(a),not(b))]
-th16:=th3(ande1(not(a),not(b),a1),ande2(not(a),not(b),a1)):not(or(a,b))
-b@[n:not(or(a,b))]
-th17:=andi(not(a),not(b),th4(n),th5(n)):and(not(a),not(b))
--or
-b@orec:=and(or(a,b),ec(a,b)):'prop'
-[o:or(a,b)][e:ec(a,b)]
-oreci:=andi(or(a,b),ec(a,b),o,e):orec(a,b)
-+orec
-b@[a1:a][n:not(b)]
-th1:=oreci(ori1(a1),eci2(n)):orec(a,b)
-b@[n:not(a)][b1:b]
-th2:=oreci(ori2(b1),eci1(n)):orec(a,b)
--orec
-b@[o:orec(a,b)]
-orece1:=ande1(or(a,b),ec,o):or(a,b)
-orece2:=ande2(or(a,b),ec,o):ec(a,b)
-comorec:=oreci(b,a,comor(orece1),comec(orece2)):orec(b,a)
-+*orec
-o@[a1:a]
-th3:=ece1(orece2,a1):not(b)
-o@[b1:b]
-th4:=ece2(orece2,b1):not(a)
-o@[n:not(a)]
-th5:=ore2(orece1,n):b
-o@[n:not(b)]
-th6:=ore1(orece1,n):a
--orec
-b@iff:=and(imp(a,b),imp(b,a)):'prop'
-[i:imp(a,b)][j:imp(b,a)]
-iffi:=andi(imp(a,b),imp(b,a),i,j):iff(a,b)
-+iff
-b@[a1:a][b1:b]
-th1:=iffi([x:a]b1,[x:b]a1):iff(a,b)
-b@[n:not(a)][m:not(b)]
-th2:=iffi(th2"l.imp"(n),th2"l.imp"(b,a,m)):iff(a,b)
--iff
-b@[i:iff(a,b)]
-iffe1:=ande1(imp(a,b),imp(b,a),i):imp(a,b)
-iffe2:=ande2(imp(a,b),imp(b,a),i):imp(b,a)
-comiff:=iffi(b,a,iffe2,iffe1):iff(b,a)
-+*iff
-i@[a1:a]
-th3:=<a1>iffe1:b
-i@[b1:b]
-th4:=<b1>iffe2:a
-i@[n:not(a)]
-th5:=th3"l.imp"(b,a,n,iffe2):not(b)
-i@[n:not(b)]
-th6:=th3"l.imp"(n,iffe1):not(a)
-b@[a1:a][n:not(b)]
-th7:=th1"l.and"(imp(a,b),imp(b,a),th4"l.imp"(a1,n)):not(iff(a,b))
-b@[n:not(a)][b1:b]
-th8:=th2"l.and"(imp(a,b),imp(b,a),th4"l.imp"(b,a,b1,n)):not(iff(a,b))
--iff
-a@refiff:=iffi(a,refimp,refimp):iff(a,a)
-b@[i:iff(a,b)]
-symiff:=comiff(i):iff(b,a)
-c@[i:iff(a,b)][j:iff(b,c)]
-triff:=iffi(a,c,trimp(iffe1(i),iffe1(b,c,j)),trimp(c,b,a,iffe2(b,c,j),iffe2(i))):iff(a,c)
-+*iff
-b@[i:iff(a,b)]
-th9:=[x:not(a)]th5(i,x):imp(not(a),not(b))
-th10:=[x:not(b)]th6(i,x):imp(not(b),not(a))
-th11:=iffi(not(a),not(b),th9,th10):iff(not(a),not(b))
-b@[i:imp(not(a),not(b))][j:imp(not(b),not(a))]
-th12:=iffi(cp(j),cp(b,a,i)):iff(a,b)
-b@[o:orec(a,b)]
-th13:=iffi(not(b),orece2(o),comor(orece1(o))):iff(a,not(b))
-th14:=th13(b,a,comorec(o)):iff(b,not(a))
-b@[i:iff(a,not(b))]
-th15:=oreci(comor(b,a,iffe2(not(b),i)),iffe1(not(b),i)):orec(a,b)
-b@[i:iff(b,not(a))]
-th16:=comorec(b,a,th15(b,a,i)):orec(a,b)
-c@[i:iff(a,b)][j:imp(a,c)]
-thimp1:=trimp(b,a,c,iffe2(i),j):imp(b,c)
-i@[j:imp(c,a)]
-thimp2:=trimp(c,a,b,j,iffe1(i)):imp(c,b)
-i@[e:ec(a,c)]
-thec1:=th3"l.ec"(c,b,e,iffe2(i)):ec(b,c)
-i@[e:ec(c,a)]
-thec2:=th4"l.ec"(c,a,b,e,iffe2(i)):ec(c,b)
-i@[a1:and(a,c)]
-thand1:=th6"l.and"(c,b,a1,iffe1(i)):and(b,c)
-i@[a1:and(c,a)]
-thand2:=th7"l.and"(c,a,b,a1,iffe1(i)):and(c,b)
-i@[o:or(a,c)]
-thor1:=th7"l.or"(c,b,o,iffe1(i)):or(b,c)
-i@[o:or(c,a)]
-thor2:=th8"l.or"(c,a,b,o,iffe1(i)):or(c,b)
-i@[o:orec(a,c)]
-thorec1:=oreci(b,c,thor1(orece1(a,c,o)),thec1(orece2(a,c,o))):orec(b,c)
-i@[o:orec(c,a)]
-thorec2:=oreci(c,b,thor2(orece1(c,a,o)),thec2(orece2(c,a,o))):orec(c,b)
--iff
-@[sigma:'type'][p:[x:sigma]'prop']
-%suggestion by van Daalen to remove eta-reduction
-%all:=p:'prop' %original line
-all:=[x:sigma]<x>p:'prop'
-%end of suggestion
-[a1:all(sigma,p)][s:sigma]
-alle:=<s>a1:<s>p
-+all
-p@[s:sigma][n:not(<s>p)]
-th1:=[x:all(sigma,p)]<<s>x>n:not(all(sigma,p))
--all
-p@non:=[x:sigma]not(<x>p):[x:sigma]'prop'
-%suggestion by Guidi to remove sort inclusion of degree 1 by adding all-introduction
-none:=all(sigma,non(p)):'prop'
-%end of suggestion ("non" replaced by "none" where needed)
-some:=not(none(p)):'prop' %none
-[s:sigma][sp:<s>p]
-somei:=th1".all"(non(p),s,weli(<s>p,sp)):some(sigma,p)
-+some
-p@[n:not(all(sigma,p))][m:none(non(p))][s:sigma] %none
-t1:=et(<s>p,<s>m):<s>p
-%set etared
-m@t2:=<[x:sigma]t1(x)>n:con
-%reset etared
-n@th1:=[x:none(non(p))]t2(x):some(non(p)) %none
-p@[s:some(non(p))][a1:all(sigma,p)][t:sigma]
-t3:=weli(<t>p,<t>a1):not(not(<t>p))
-a1@t4:=<[x:sigma]t3(x)>s:con
-s@th2:=[x:all(sigma,p)]t4(x):not(all(sigma,p))
-p@[n:not(some(sigma,p))]
-th3:=et(none(p),n):none(p) %none x 2
-[s:sigma]
-th4:=<s>th3:not(<s>p)
-p@[n:none(p)] %none
-th5:=weli(none(p),n):not(some(sigma,p)) %none
--some
-p@[s:some(sigma,p)][x:'prop'][i:[y:sigma]imp(<y>p,x)]
-+*some
-i@[n:not(x)][t:sigma]
-t5:=th3"l.imp"(<t>p,x,n,<t>i):not(<t>p)
-n@t6:=mp(some(sigma,p),con,s,th5([y:sigma]t5(y))):con
--some
-i@someapp:=et(x,[y:not(x)]t6".some"(y)):x
-+*some
-p@[q:[x:sigma]'prop'][s:some(sigma,p)][i:[x:sigma]imp(<x>p,<x>q)]
-th6:=someapp(s,some(q),[x:sigma][y:<x>p]somei(q,x,mp(<x>p,<x>q,y,<x>i))):some(q)
--some
-c@or3:=or(a,or(b,c)):'prop'
-[o:or3(a,b,c)][n:not(a)]
-+or3
-th1:=ore2(or(b,c),o,n):or(b,c)
--or3
-[m:not(b)]
-or3e3:=ore2(b,c,th1".or3",m):c
-o@[n:not(b)]
-+*or3
-n@th2:=th2"l.or"(c,a,[x:not(a)]or3e3(x,n)):or(c,a)
--or3
-n@[m:not(c)]
-or3e1:=ore2(c,a,th2".or3",m):a
-o@[n:not(c)]
-+*or3
-n@th3:=th2"l.or"([x:not(b)]or3e1(x,n)):or(a,b)
--or3
-n@[m:not(a)]
-or3e2:=ore2(th3".or3",m):b
-+*or3
-o@th4:=th1"l.or"(b,or(c,a),[x:not(b)]th2(x)):or3(b,c,a)
-th5:=th4(b,c,a,th4):or3(c,a,b)
--or3
-c@[a1:a]
-or3i1:=ori1(a,or(b,c),a1):or3(a,b,c)
-c@[b1:b]
-or3i2:=ori2(a,or(b,c),ori1(b,c,b1)):or3(a,b,c)
-c@[c1:c]
-or3i3:=ori2(a,or(b,c),ori2(b,c,c1)):or3(a,b,c)
-+*or3
-c@[o:or(a,b)]
-th6:=th4"or3"(c,a,b,ori2(c,or(a,b),o)):or3(a,b,c)
-c@[o:or(b,c)]
-th7:=ori2(or(b,c),o):or3(a,b,c)
-c@[o:or(c,a)]
-th8:=th4"or3"(c,a,b,th6(c,a,b,o)):or3(a,b,c)
--or3
-d@[o:or3(a,b,c)][i:imp(a,d)][j:imp(b,d)][k:imp(c,d)]
-or3app:=orapp(or(b,c),d,o,i,[x:or(b,c)]orapp(b,c,d,x,j,k)):d
-c@and3:=and(a,and(b,c)):'prop'
-[a1:and3(a,b,c)]
-and3e1:=ande1(and(b,c),a1):a
-and3e2:=ande1(b,c,ande2(and(b,c),a1)):b
-and3e3:=ande2(b,c,ande2(and(b,c),a1)):c
-c@[a1:a][b1:b][c1:c]
-and3i:=andi(a,and(b,c),a1,andi(b,c,b1,c1)):and3(a,b,c)
-+and3
-c@[a1:and3(a,b,c)]
-th1:=and3i(b,c,a,and3e2(a1),and3e3(a1),and3e1(a1)):and3(b,c,a)
-th2:=th1(b,c,a,th1):and3(c,a,b)
-th3:=andi(and3e1(a1),and3e2(a1)):and(a,b)
-th4:=ande2(and(b,c),a1):and(b,c)
-th5:=th3(c,a,b,th2):and(c,a)
-th6:=and3i(c,b,a,and3e3(a1),and3e2(a1),and3e1(a1)):and3(c,b,a)
--and3
-c@ec3:=and3(ec,ec(b,c),ec(c,a)):'prop'
-[e:ec3(a,b,c)]
-+ec3
-th1:=and3e1(ec,ec(b,c),ec(c,a),e):ec(a,b)
-th2:=and3e2(ec,ec(b,c),ec(c,a),e):ec(b,c)
-th3:=and3e3(ec,ec(b,c),ec(c,a),e):ec(c,a)
-th4:=th1"l.and3"(ec,ec(b,c),ec(c,a),e):ec3(b,c,a)
-th5:=th4(b,c,a,th4):ec3(c,a,b)
-th5a:=and3i(ec(c,b),ec(b,a),ec(a,c),comec(b,c,th2(e)),comec(a,b,th1(e)),comec(c,a,th3(e))):ec3(c,b,a)
--ec3
-[a1:a]
-ec3e12:=ece1(th1".ec3",a1):not(b)
-ec3e13:=ece2(c,a,th3".ec3",a1):not(c)
-e@[b1:b]
-ec3e23:=ec3e12(b,c,a,th4".ec3",b1):not(c)
-ec3e21:=ec3e13(b,c,a,th4".ec3",b1):not(a)
-e@[c1:c]
-ec3e31:=ec3e12(c,a,b,th5".ec3",c1):not(a)
-ec3e32:=ec3e13(c,a,b,th5".ec3",c1):not(b)
-+*ec3
-c@[e:ec(a,b)][f:ec(b,c)][g:ec(c,a)]
-th6:=and3i(ec,ec(b,c),ec(c,a),e,f,g):ec3(a,b,c)
-c@[e:ec3(a,b,c)][o:or(a,b)]
-th7:=orapp(not(c),o,[x:a]ece2(c,a,th3"ec3"(e),x),[x:b]ece1(b,c,th2"ec3"(e),x)):not(c)
-e@[o:or(b,c)]
-th8:=th7(b,c,a,th4"ec3"(e),o):not(a)
-e@[o:or(c,a)]
-th9:=th7(c,a,b,th5"ec3"(e),o):not(b)
--ec3
-c@[n:not(a)][m:not(b)]
-ec3i1:=th6".ec3"(eci1(n),eci1(b,c,m),eci2(c,a,n)):ec3(a,b,c)
-c@[n:not(b)][m:not(c)]
-ec3i2:=th6".ec3"(eci2(n),eci1(b,c,n),eci1(c,a,m)):ec3(a,b,c)
-c@[n:not(c)][m:not(a)]
-ec3i3:=th6".ec3"(eci1(m),eci2(b,c,n),eci1(c,a,n)):ec3(a,b,c)
-+*ec3
-d@[e:'prop'][f:'prop'][o1:or3(a,b,c)][p1:ec3(d,e,f)][i:imp(a,d)][j:imp(b,e)][k:imp(c,f)][d1:d]
-t1:=[x:b]mp(e,con,<x>j,ec3e12(d,e,f,p1,d1)):not(b)
-t2:=[x:c]mp(f,con,<x>k,ec3e13(d,e,f,p1,d1)):not(c)
-th10:=or3e1(o1,t1,t2):a
-k@[e1:e]
-th11:=th10(b,c,a,e,f,d,th4"l.or3"(o1),th4"ec3"(d,e,f,p1),j,k,i,e1):b
-k@[f1:f]
-th12:=th10(c,a,b,f,d,e,th5"l.or3"(o1),th5"ec3"(d,e,f,p1),k,i,j,f1):c
--ec3
-c@orec3:=and(or3(a,b,c),ec3(a,b,c)):'prop'
-[o:orec3(a,b,c)]
-orec3e1:=ande1(or3(a,b,c),ec3(a,b,c),o):or3(a,b,c)
-orec3e2:=ande2(or3(a,b,c),ec3(a,b,c),o):ec3(a,b,c)
-c@[o:or3(a,b,c)][e:ec3(a,b,c)]
-orec3i:=andi(or3(a,b,c),ec3(a,b,c),o,e):orec3(a,b,c)
-+orec3
-c@[o:orec3(a,b,c)]
-th1:=orec3i(b,c,a,th4"l.or3"(orec3e1(o)),th4"l.ec3"(orec3e2(o))):orec3(b,c,a)
-th2:=orec3i(c,a,b,th5"l.or3"(orec3e1(o)),th5"l.ec3"(orec3e2(o))):orec3(c,a,b)
--orec3
-+e
-sigma@[s:sigma][t:sigma]
-is:='prim':'prop'
-s@refis:='prim':is(s,s)
-p@[s:sigma][t:sigma][sp:<s>p][i:is(s,t)]
-isp:='prim':<t>p
-sigma@[s:sigma][t:sigma][i:is(s,t)]
-symis:=isp([x:sigma]is(x,s),s,t,refis(s),i):is(t,s)
-t@[u:sigma][i:is(s,t)][j:is(t,u)]
-tris:=isp([x:sigma]is(x,u),t,s,j,symis(i)):is(s,u)
-u@[i:is(u,s)][j:is(u,t)]
-tris1:=tris(s,u,t,symis(u,s,i),j):is(s,t)
-u@[i:is(s,u)][j:is(t,u)]
-tris2:=tris(s,u,t,i,symis(t,u,j)):is(s,t)
-sp@[i:is(t,s)]
-isp1:=isp(symis(t,s,i)):<t>p
-t@[n:not(is(s,t))]
-symnotis:=th3"l.imp"(is(t,s),is(s,t),n,[x:is(t,s)]symis(t,s,x)):not(is(t,s))
-+notis
-u@[n:not(is(s,t))][i:is(s,u)]
-th1:=isp([x:sigma]not(is(x,t)),s,u,n,i):not(is(u,t))
-n@[i:is(u,s)]
-th2:=th1(symis(u,s,i)):not(is(u,t))
-n@[i:is(t,u)]
-th3:=isp([x:sigma]not(is(s,x)),t,u,n,i):not(is(s,u))
-n@[i:is(u,t)]
-th4:=th3(symis(u,t,i)):not(is(s,u))
-u@[v:sigma][n:not(is(s,t))][i:is(s,u)][j:is(t,v)]
-th5:=th3(u,t,v,th1(n,i),j):not(is(u,v))
--notis
-u@[v:sigma][i:is(s,t)][j:is(t,u)][k:is(u,v)]
-tr3is:=tris(s,u,v,tris(i,j),k):is(s,v)
-v@[w:sigma][i:is(s,t)][j:is(t,u)][k:is(u,v)][l:is(v,w)]
-tr4is:=tris(s,v,w,tr3is(i,j,k),l):is(s,w)
-p@amone:=[x:sigma][y:sigma][u:<x>p][v:<y>p]is(x,y):'prop'
-[a1:amone(sigma,p)][s:sigma][t:sigma][sp:<s>p][tp:<t>p]
-amonee:=<tp><sp><t><s>a1:is(s,t)
-p@one:=and(amone(sigma,p),some(sigma,p)):'prop'
-[a1:amone(sigma,p)][s:some(sigma,p)]
-onei:=andi(amone(sigma,p),some(sigma,p),a1,s):one(sigma,p)
-p@[o1:one(sigma,p)]
-onee1:=ande1(amone(sigma,p),some(sigma,p),o1):amone(sigma,p)
-onee2:=ande2(amone(sigma,p),some(sigma,p),o1):some(sigma,p)
-ind:='prim':sigma
-oneax:='prim':<ind>p
-+one
-[s:sigma][sp:<s>p]
-th1:=amonee(onee1,ind,s,oneax,sp):is(ind,s)
--one
-sigma@[tau:'type'][f:[x:sigma]tau][s:sigma][t:sigma][i:is(s,t)]
-isf:=isp(sigma,[x:sigma]is(tau,<s>f,<x>f),s,t,refis(tau,<s>f),i):is(tau,<s>f,<t>f)
-f@injective:=all([x:sigma]all([y:sigma]imp(is(tau,<x>f,<y>f),is(x,y)))):'prop'
-[i:injective(f)][s:sigma][t:sigma][j:is(tau,<s>f,<t>f)]
-isfe:=<j><t><s>i:is(s,t)
-f@[t0:tau]
-image:=some([x:sigma]is(tau,t0,<x>f)):'prop'
-f@[s:sigma]
-tofs:=<s>f:tau
-imagei:=somei([x:sigma]is(tau,tofs,<x>f),s,refis(tau,tofs)):image(tofs)
-+inj
-i@[ta:tau][tb:tau][j:is(tau,ta,tb)][sa:sigma][sb:sigma][ja:is(tau,ta,tofs(sa))][jb:is(tau,tb,tofs(sb))]
-t1:=tr3is(tau,tofs(sa),ta,tb,tofs(sb),symis(tau,ta,tofs(sa),ja),j,jb):is(tau,tofs(sa),tofs(sb))
-th1:=isfe(sa,sb,t1):is(sa,sb)
-i@[t0:tau]
-th2:=[x:sigma][y:sigma][u:is(tau,t0,<x>f)][v:is(tau,t0,<y>f)]th1(t0,t0,refis(tau,t0),x,y,u,v):amone([x:sigma]is(tau,t0,<x>f))
-[j:image(f,t0)]
-th3:=onei([x:sigma]is(tau,t0,<x>f),th2,j):one([x:sigma]is(tau,t0,<x>f))
--inj
-i@[t0:tau][j:image(f,t0)]
-soft:=ind([x:sigma]is(tau,t0,<x>f),th3".inj"(t0,j)):sigma
-i@inverse:=[x:tau][u:image(f,x)]soft(x,u):[x:tau][u:image(f,x)]sigma
-j@ists1:=oneax([x:sigma]is(tau,t0,<x>f),th3".inj"(t0,j)):is(tau,t0,tofs(soft(t0,j)))
-ists2:=symis(tau,t0,tofs(soft(t0,j)),ists1):is(tau,tofs(soft(t0,j)),t0)
-i@[ta:tau][ja:image(ta)][tb:tau][jb:image(tb)][j:is(tau,ta,tb)]
-isinv:=th1".inj"(ta,tb,j,soft(ta,ja),soft(tb,jb),ists1(ta,ja),ists1(tb,jb)):is(soft(ta,ja),soft(tb,jb))
-jb@[j:is(soft(ta,ja),soft(tb,jb))]
-isinve:=tr3is(tau,ta,tofs(soft(ta,ja)),tofs(soft(tb,jb)),tb,ists1(ta,ja),isf(soft(ta,ja),soft(tb,jb),j),ists2(tb,jb)):is(tau,ta,tb)
-i@[s:sigma]
-isst1:=isfe(s,soft(tofs(s),imagei(s)),ists1(tofs(s),imagei(s))):is(s,soft(tofs(s),imagei(s)))
-isst2:=symis(s,soft(tofs(s),imagei(s)),isst1):is(soft(tofs(s),imagei(s)),s)
-f@surjective:=all(tau,[x:tau]image(x)):'prop'
-bijective:=and(injective,surjective):'prop'
-[b:bijective(f)]
-+*inj
-b@t2:=ande1(injective,surjective,b):injective(f)
-t3:=ande2(injective,surjective,b):surjective(f)
-[t:tau]
-so:=soft(t2,t,<t>t3):sigma
--inj
-b@invf:=[x:tau]so".inj"(x):[x:tau]sigma
-[s:sigma]
-thinvf1:=tris(s,soft(t2".inj",tofs(s),imagei(s)),<<s>f>invf,isst1(t2".inj",s),isinv(t2".inj",tofs(s),imagei(s),tofs(s),<tofs(s)>t3".inj",refis(tau,tofs(s)))):is(s,<<s>f>invf)
-b@[t:tau]
-thinvf2:=ists1(t2".inj",t,<t>t3".inj"):is(tau,t,<<t>invf>f)
-tau@[upsilon:'type'][f:[x:sigma]tau][g:[x:tau]upsilon]
-+*inj
-g@[if:injective(sigma,tau,f)][ig:injective(tau,upsilon,g)]
-h:=[x:sigma]<<x>f>g:[x:sigma]upsilon
-[s:sigma][t:sigma][i:is(upsilon,<s>h,<t>h)]
-t4:=isfe(tau,upsilon,g,ig,<s>f,<t>f,i):is(tau,<s>f,<t>f)
-t5:=isfe(f,if,s,t,t4):is(s,t)
-ig@th4:=[x:sigma][y:sigma][v:is(upsilon,<x>h,<y>h)]t5(x,y,v):injective(sigma,upsilon,[x:sigma]<<x>f>g)
--inj
-+surj
-g@[sf:surjective(sigma,tau,f)][sg:surjective(tau,upsilon,g)]
-h:=[x:sigma]<<x>f>g:[x:sigma]upsilon
-[u:upsilon]
-t1:=<u>sg:image(tau,upsilon,g,u)
-[t:tau][i:is(upsilon,u,<t>g)]
-t2:=<t>sf:image(sigma,tau,f,t)
-[s:sigma][j:is(tau,t,<s>f)]
-t3:=tris(upsilon,u,<t>g,<s>h,i,isf(tau,upsilon,g,t,<s>f,j)):is(upsilon,u,<s>h)
-t4:=somei([x:sigma]is(upsilon,u,<x>h),s,t3):image(sigma,upsilon,h,u)
-i@t5:=someapp([x:sigma]is(tau,t,<x>f),t2,image(sigma,upsilon,h,u),[x:sigma][v:is(tau,t,<x>f)]t4(x,v)):image(sigma,upsilon,h,u)
-u@t6:=someapp(tau,[x:tau]is(upsilon,u,<x>g),t1,image(sigma,upsilon,h,u),[x:tau][v:is(upsilon,u,<x>g)]t5(x,v)):image(sigma,upsilon,h,u)
-sg@th1:=[x:upsilon]t6(x):surjective(sigma,upsilon,[x:sigma]<<x>f>g)
--surj
-+bij
-g@[bf:bijective(sigma,tau,f)][bg:bijective(tau,upsilon,g)]
-h:=[x:sigma]<<x>f>g:[x:sigma]upsilon
-t1:=th4"e.inj"(f,g,ande1(injective(f),surjective(f),bf),ande1(injective(tau,upsilon,g),surjective(tau,upsilon,g),bg)):injective(sigma,upsilon,h)
-t2:=th1"e.surj"(f,g,ande2(injective(f),surjective(f),bf),ande2(injective(tau,upsilon,g),surjective(tau,upsilon,g),bg)):surjective(sigma,upsilon,h)
-th1:=andi(injective(sigma,upsilon,h),surjective(sigma,upsilon,h),t1,t2):bijective(sigma,upsilon,[x:sigma]<<x>f>g)
--bij
-tau@[f:[x:sigma]tau][g:[x:sigma]tau][i:is([x:sigma]tau,f,g)][s:sigma]
-fise:=isp([x:sigma]tau,[y:[x:sigma]tau]is(tau,<s>f,<s>y),f,g,refis(tau,<s>f),i):is(tau,<s>f,<s>g)
-g@[i:[x:sigma]is(tau,<x>f,<x>g)]
-fisi:='prim':is([x:sigma]tau,f,g)
-+fis
-g@[i:is([x:sigma]tau,f,g)][s:sigma][t:sigma][j:is(s,t)]
-th1:=tris(tau,<s>f,<t>f,<t>g,isf(f,s,t,j),fise(i,t)):is(tau,<s>f,<t>g)
--fis
-p@ot:='prim':'type'
-[o1:ot]
-in:='prim':sigma
-inp:='prim':<in>p
-p@otax1:='prim':injective(ot,sigma,[x:ot]in(x))
-[s:sigma][sp:<s>p]
-otax2:='prim':image(ot,sigma,[x:ot]in(x),s)
-o1@[o2:ot][i:is(ot,o1,o2)]
-isini:=isf(ot,sigma,[x:ot]in(x),o1,o2,i):is(in(o1),in(o2))
-o2@[i:is(in(o1),in(o2))]
-isine:=isfe(ot,sigma,[x:ot]in(x),otax1,o1,o2,i):is(ot,o1,o2)
-sp@out:=soft(ot,sigma,[x:ot]in(x),otax1,s,otax2):ot
-[t:sigma][tp:<t>p][i:is(s,t)]
-isouti:=isinv(ot,sigma,[x:ot]in(x),otax1,s,otax2,t,otax2(t,tp),i):is(ot,out(s,sp),out(t,tp))
-tp@[i:is(ot,out(s,sp),out(t,tp))]
-isoute:=isinve(ot,sigma,[x:ot]in(x),otax1,s,otax2,t,otax2(t,tp),i):is(s,t)
-o1@isoutin:=tris(ot,o1,soft(ot,sigma,[x:ot]in(x),otax1,in(o1),imagei(ot,sigma,[x:ot]in(x),o1)),out(in(o1),inp(o1)),isst1(ot,sigma,[x:ot]in(x),otax1,o1),isinv(ot,sigma,[x:ot]in(x),otax1,in(o1),imagei(ot,sigma,[x:ot]in(x),o1),in(o1),otax2(in(o1),inp(o1)),refis(sigma,in(o1)))):is(ot,o1,out(in(o1),inp(o1)))
-sp@isinout:=ists1(ot,sigma,[x:ot]in(x),otax1,s,otax2):is(s,in(out(s,sp)))
-tau@pairtype:='prim':'type'
-[s:sigma][t:tau]
-pair:='prim':pairtype
-tau@[p1:pairtype]
-first:='prim':sigma
-second:='prim':tau
-pairis1:='prim':is(pairtype,pair(first,second),p1)
-pairis2:=symis(pairtype,pair(first,second),p1,pairis1):is(pairtype,p1,pair(first,second))
-t@firstis1:='prim':is(sigma,first(pair),s)
-firstis2:=symis(sigma,first(pair),s,firstis1):is(sigma,s,first(pair))
-secondis1:='prim':is(tau,second(pair),t)
-secondis2:=symis(tau,second(pair),t,secondis1):is(tau,t,second(pair))
-a@[ksi:'type'][x:ksi][y:ksi]
-+ite
-[z:ksi]
-prop1:=and(imp(a,is(ksi,z,x)),imp(not(a),is(ksi,z,y))):'prop'
-y@[a1:a][x1:ksi][y1:ksi][px1:prop1(x1)][py1:prop1(y1)]
-t1:=ande1(imp(a,is(ksi,x1,x)),imp(not(a),is(ksi,x1,y)),px1):imp(a,is(ksi,x1,x))
-t2:=mp(a,is(ksi,x1,x),a1,t1):is(ksi,x1,x)
-t3:=t2(y1,x1,py1,px1):is(ksi,y1,x)
-t4:=tris2(ksi,x1,y1,x,t2,t3):is(ksi,x1,y1)
-a1@t5:=[s:ksi][t:ksi][ps:prop1(s)][pt:prop1(t)]t4(s,t,ps,pt):amone(ksi,[t:ksi]prop1(t))
-t6:=[x1:a]refis(ksi,x):imp(a,is(ksi,x,x))
-t7:=th2"l.imp"(not(a),is(ksi,x,y),weli(a,a1)):imp(not(a),is(ksi,x,y))
-t8:=andi(imp(a,is(ksi,x,x)),imp(not(a),is(ksi,x,y)),t6,t7):prop1(x)
-t9:=somei(ksi,[t:ksi]prop1(t),x,t8):some(ksi,[t:ksi]prop1(t))
-t10:=onei(ksi,[t:ksi]prop1(t),t5,t9):one(ksi,[t:ksi]prop1(t))
-y@[n:not(a)][x1:ksi][y1:ksi][px1:prop1(x1)][py1:prop1(y1)]
-t11:=ande2(imp(a,is(ksi,x1,x)),imp(not(a),is(ksi,x1,y)),px1):imp(not(a),is(ksi,x1,y))
-t12:=mp(not(a),is(ksi,x1,y),n,t11):is(ksi,x1,y)
-t13:=t12(y1,x1,py1,px1):is(ksi,y1,y)
-t14:=tris2(ksi,x1,y1,y,t12,t13):is(ksi,x1,y1)
-n@t15:=[s:ksi][t:ksi][ps:prop1(s)][pt:prop1(t)]t14(s,t,ps,pt):amone(ksi,[t:ksi]prop1(t))
-t16:=[x1:not(a)]refis(ksi,y):imp(not(a),is(ksi,y,y))
-t17:=th2"l.imp"(a,is(ksi,y,x),n):imp(a,is(ksi,y,x))
-t18:=andi(imp(a,is(ksi,y,x)),imp(not(a),is(ksi,y,y)),t17,t16):prop1(y)
-t19:=somei(ksi,[t:ksi]prop1(t),y,t18):some(ksi,[t:ksi]prop1(t))
-t20:=onei(ksi,[t:ksi]prop1(t),t15,t19):one(ksi,[t:ksi]prop1(t))
-y@t21:=th1"l.imp"(a,one(ksi,[t:ksi]prop1(t)),[t:a]t10(t),[t:not(a)]t20(t)):one(ksi,[t:ksi]prop1(t))
--ite
-ite:=ind(ksi,[t:ksi]prop1".ite"(t),t21".ite"):ksi
-+*ite
-y@t22:=oneax(ksi,[t:ksi]prop1(t),t21):prop1(ite)
-t23:=ande1(imp(a,is(ksi,ite,x)),imp(not(a),is(ksi,ite,y)),t22):imp(a,is(ksi,ite,x))
-t24:=ande2(imp(a,is(ksi,ite,x)),imp(not(a),is(ksi,ite,y)),t22):imp(not(a),is(ksi,ite,y))
--ite
-y@[a1:a]
-itet:=mp(a,is(ksi,ite,x),a1,t23".ite"):is(ksi,ite,x)
-y@[n:not(a)]
-itef:=mp(not(a),is(ksi,ite,y),n,t24".ite"):is(ksi,ite,y)
-sigma@[s0:sigma][t0:sigma]
-+wissel
-[s:sigma]
-wa:=ite(is(s,s0),sigma,t0,s):sigma
-[i:is(s,s0)]
-t1:=itet(is(s,s0),sigma,t0,s,i):is(wa,t0)
-s@[n:not(is(s,s0))]
-t2:=itef(is(s,s0),sigma,t0,s,n):is(wa,s)
-s@wb:=ite(is(s,t0),sigma,s0,wa):sigma
-[i:is(s,t0)]
-t3:=itet(is(s,t0),sigma,s0,wa,i):is(wb,s0)
-s@[n:not(is(s,t0))]
-t4:=itef(is(s,t0),sigma,s0,wa,n):is(wb,wa)
-s@[i:is(s,s0)][j:is(s0,t0)]
-t5:=tris(wb,s0,t0,t3(tris(s,s0,t0,i,j)),j):is(wb,t0)
-i@[n:not(is(s0,t0))]
-t6:=tris(wb,wa,t0,t4(th2"e.notis"(s0,t0,s,n,i)),t1(i)):is(wb,t0)
-i@t7:=th1"l.imp"(is(s0,t0),is(wb,t0),[t:is(s0,t0)]t5(t),[t:not(is(s0,t0))]t6(t)):is(wb,t0)
-s@[n:not(is(s,s0))][o:not(is(s,t0))]
-t8:=tris(wb,wa,s,t4(o),t2(n)):is(wb,s)
--wissel
-wissel:=[x:sigma]wb".wissel"(x):[x:sigma]sigma
-[s:sigma][i:is(s,s0)]
-iswissel1:=t7".wissel"(s,i):is(<s>wissel,t0)
-s@[i:is(s,t0)]
-iswissel2:=t3".wissel"(s,i):is(<s>wissel,s0)
-s@[n:not(is(s,s0))][o:not(is(s,t0))]
-iswissel3:=t8".wissel"(s,n,o):is(<s>wissel,s)
-+*wissel
-s@[t:sigma][i:is(wb(s),wb(t))][n:not(is(s,t))][j:is(s,s0)]
-t9:=symnotis(s0,t,th1"e.notis"(s,t,s0,n,j)):not(is(t,s0))
-[k:is(s0,t0)]
-t10:=th3"e.notis"(t,s0,t0,t9,k):not(is(t,t0))
-t11:=tris(wb(s),wb(t),t,i,t8(t,t9,t10)):is(wb(s),t)
-t12:=<tris1(t,t0,wb(s),t11,t7(j))>t10:con
-j@t13:=[v:is(s0,t0)]t12(v):not(is(s0,t0))
-[k:is(t,t0)]
-t14:=tris(wb(s),wb(t),s0,i,t3(t,k)):is(wb(s),s0)
-t15:=t12(tris1(s0,t0,wb(s),t14,t7(j))):con
-j@t16:=[v:is(t,t0)]t15(v):not(is(t,t0))
-t17:=tris(wb(s),wb(t),t,i,t8(t,t9,t16)):is(wb(s),t)
-t18:=t15(tris1(t,t0,wb(s),t17,t7(j))):con
-n@t19:=[v:is(s,s0)]t18(v):not(is(s,s0))
-t20:=t19(t,s,symis(wb(s),wb(t),i),symnotis(s,t,n)):not(is(t,s0))
-[j:is(s,t0)]
-t21:=symnotis(t0,t,th1"e.notis"(s,t,t0,n,j)):not(is(t,t0))
-t22:=tris(wb(s),wb(t),t,i,t8(t,t20,t21)):is(wb(s),t)
-t23:=<tris1(t,s0,wb(s),t22,t3(j))>t20:con
-n@t24:=[v:is(s,t0)]t23(v):not(is(s,t0))
-t25:=t24(t,s,symis(wb(s),wb(t),i),symnotis(s,t,n)):not(is(t,t0))
-t26:=tris(wb(s),wb(t),t,i,t8(t,t20,t25)):is(wb(s),t)
-t27:=<tris1(s,t,wb(s),t8(t19,t24),t26)>n:con
-i@t28:=et(is(s,t),[v:not(is(s,t))]t27(v)):is(s,t)
-t0@th1:=[x:sigma][y:sigma][v:is(wb(x),wb(y))]t28(x,y,v):injective(sigma,sigma,wissel)
-s@[i:is(s,s0)]
-t29:=tris2(s,wb(t0),s0,i,t3(t0,refis(t0))):is(s,wb(t0))
-t30:=somei(sigma,[x:sigma]is(s,wb(x)),t0,t29):image(sigma,sigma,wissel,s)
-s@[i:is(s,t0)]
-t31:=tris2(s,wb(s0),t0,i,t7(s0,refis(s0))):is(s,wb(s0))
-t32:=somei(sigma,[x:sigma]is(s,wb(x)),s0,t31):image(sigma,sigma,wissel,s)
-s@[n:not(is(s,s0))][o:not(is(s,t0))]
-t33:=symis(wb(s),s,t8(n,o)):is(s,wb(s))
-t34:=somei(sigma,[x:sigma]is(s,wb(x)),s,t33):image(sigma,sigma,wissel,s)
-n@t35:=th1"l.imp"(is(s,t0),image(sigma,sigma,wissel,s),[v:is(s,t0)]t32(v),[v:not(is(s,t0))]t34(v)):image(sigma,sigma,wissel,s)
-s@t36:=th1"l.imp"(is(s,s0),image(sigma,sigma,wissel,s),[v:is(s,s0)]t30(v),[v:not(is(s,s0))]t35(v)):image(sigma,sigma,wissel,s)
-t0@th2:=[x:sigma]t36(x):surjective(sigma,sigma,wissel)
-th3:=andi(injective(sigma,sigma,wissel),surjective(sigma,sigma,wissel),th1,th2):bijective(sigma,sigma,wissel)
--wissel
-tau@[f:[x:sigma]tau][s0:sigma][t0:sigma]
-changef:=[x:sigma]<<x>wissel(s0,t0)>f:[x:sigma]tau
-[s:sigma][i:is(s,s0)]
-changef1:=isf(sigma,tau,f,<s>wissel(s0,t0),t0,iswissel1(s0,t0,s,i)):is(tau,<s>changef,<t0>f)
-s@[i:is(s,t0)]
-changef2:=isf(sigma,tau,f,<s>wissel(s0,t0),s0,iswissel2(s0,t0,s,i)):is(tau,<s>changef,<s0>f)
-s@[n:not(is(s,s0))][o:not(is(s,t0))]
-changef3:=isf(sigma,tau,f,<s>wissel(s0,t0),s,iswissel3(s0,t0,s,n,o)):is(tau,<s>changef,<s>f)
-+*wissel
-t0@[i:injective(f)]
-th4:=th4"e.inj"(sigma,sigma,tau,wissel(s0,t0),f,th1(s0,t0),i):injective(changef)
-t0@[s:surjective(f)]
-th5:=th1"e.surj"(sigma,sigma,tau,wissel(s0,t0),f,th2(s0,t0),s):surjective(changef)
-t0@[b:bijective(f)]
-th6:=th1"e.bij"(sigma,sigma,tau,wissel(s0,t0),f,th3(s0,t0),b):bijective(changef)
--wissel
--e
-+r
-a@[b:[x:a]'prop']
-%suggestion by van Daalen to remove eta-reduction
-%imp:=b:'prop' %original line
-imp:=[x:a]<x>b:'prop'
-%end of suggestion
-[a1:a][i:imp(a,b)]
-mp:=<a1>i:<a1>b
-+imp
-b@[n:not(a)]
-%set etared
-th2:=[x:a]cone(<x>b,mp"l"(a,con,x,n)):imp(a,b)
-%reset etared
--imp
-b@ec:=[x:a]not(<x>b):'prop'
-[n:not(a)]
-eci1:=[x:a]cone(not(<x>b),mp"l"(a,con,x,n)):ec(a,b)
-b@[a1:and(a,b)]
-ande2:=<ande1(a,b,a1)>ande2"l"(a,b,a1):<ande1(a,b,a1)>b
-a@[ksi:'type']
-+ite
-[x1:ksi][y1:ksi]
-is:=is"l.e"(ksi,x1,y1):'prop'
--ite
-[x:[t:a]ksi][y:[t:not(a)]ksi][i:[t:a][u:a]is".ite"(<t>x,<u>x)][j:[t:not(a)][u:not(a)]is".ite"(<t>y,<u>y)]
-+*ite
-j@[z:ksi]
-prop1:=and(imp(a,[t:a]is(z,<t>x)),imp(not(a),[t:not(a)]is(z,<t>y))):'prop'
-j@[a1:a][x1:ksi][y1:ksi][px1:prop1(x1)][py1:prop1(y1)]
-t1:=ande1"l"(imp(a,[t:a]is(x1,<t>x)),imp(not(a),[t:not(a)]is(x1,<t>y)),px1):imp(a,[t:a]is(x1,<t>x))
-t2:=mp(a,[t:a]is(x1,<t>x),a1,t1):is(x1,<a1>x)
-t3:=t2(y1,x1,py1,px1):is(y1,<a1>x)
-t4:=tris2"l.e"(ksi,x1,y1,<a1>x,t2,t3):is(x1,y1)
-a1@t5:=[s:ksi][t:ksi][ps:prop1(s)][pt:prop1(t)]t4(s,t,ps,pt):amone"l.e"(ksi,[t:ksi]prop1(t))
-t6:=<a1>i:imp(a,[t:a]is(<a1>x,<t>x))
-t7:=th2"r.imp"(not(a),[t:not(a)]is(<a1>x,<t>y),weli(a,a1)):imp(not(a),[t:not(a)]is(<a1>x,<t>y))
-t8:=andi(imp(a,[t:a]is(<a1>x,<t>x)),imp(not(a),[t:not(a)]is(<a1>x,<t>y)),t6,t7):prop1(<a1>x)
-t9:=somei(ksi,[t:ksi]prop1(t),<a1>x,t8):some(ksi,[t:ksi]prop1(t))
-t10:=onei"l.e"(ksi,[t:ksi]prop1(t),t5,t9):one"l.e"(ksi,[t:ksi]prop1(t))
-j@[n:not(a)][x1:ksi][y1:ksi][px1:prop1(x1)][py1:prop1(y1)]
-t11:=ande2"l"(imp(a,[t:a]is(x1,<t>x)),imp(not(a),[t:not(a)]is(x1,<t>y)),px1):imp(not(a),[t:not(a)]is(x1,<t>y))
-t12:=mp(not(a),[t:not(a)]is(x1,<t>y),n,t11):is(x1,<n>y)
-t13:=t12(y1,x1,py1,px1):is(y1,<n>y)
-t14:=tris2"l.e"(ksi,x1,y1,<n>y,t12,t13):is(x1,y1)
-n@t15:=[s:ksi][t:ksi][ps:prop1(s)][pt:prop1(t)]t14(s,t,ps,pt):amone"l.e"(ksi,[t:ksi]prop1(t))
-t16:=<n>j:imp(not(a),[t:not(a)]is(<n>y,<t>y))
-t17:=th2"r.imp"(a,[t:a]is(<n>y,<t>x),n):imp(a,[t:a]is(<n>y,<t>x))
-t18:=andi"l"(imp(a,[t:a]is(<n>y,<t>x)),imp(not(a),[t:not(a)]is(<n>y,<t>y)),t17,t16):prop1(<n>y)
-t19:=somei(ksi,[t:ksi]prop1(t),<n>y,t18):some(ksi,[t:ksi]prop1(t))
-t20:=onei"l.e"(ksi,[t:ksi]prop1(t),t15,t19):one"l.e"(ksi,[t:ksi]prop1(t))
-j@t21:=th1"l.imp"(a,one"l.e"(ksi,[t:ksi]prop1(t)),[t:a]t10(t),[t:not(a)]t20(t)):one"l.e"(ksi,[t:ksi]prop1(t))
--ite
-j@ite:=ind"l.e"(ksi,[t:ksi]prop1".ite"(t),t21".ite"):ksi
-+*ite
-j@t22:=oneax"l.e"(ksi,[t:ksi]prop1(t),t21):prop1(ite)
-t23:=ande1"l"(imp(a,[t:a]is(ite,<t>x)),imp(not(a),[t:not(a)]is(ite,<t>y)),t22):imp(a,[t:a]is(ite,<t>x))
-t24:=ande2"l"(imp(a,[t:a]is(ite,<t>x)),imp(not(a),[t:not(a)]is(ite,<t>y)),t22):imp(not(a),[t:not(a)]is(ite,<t>y))
--ite
-j@[a1:a]
-itet:=mp(a,[t:a]is".ite"(ite,<t>x),a1,t23".ite"):is".ite"(ksi,ite,<a1>x)
-j@[n:not(a)]
-itef:=mp(not(a),[t:not(a)]is".ite"(ite,<t>y),n,t24".ite"):is".ite"(ksi,ite,<n>y)
--r
-+*e
-+st
-sigma@set:='prim':'type'
-[s:sigma][s0:set]
-esti:='prim':'prop'
-p@setof:='prim':set
-[s:sigma][sp:<s>p]
-estii:='prim':esti(s,setof(p))
-s@[e:esti(s,setof(p))]
-estie:='prim':<s>p
-sigma@[s0:set]
-empty:=none([x:sigma]esti(x,s0)):'prop' %none
-nonempty:=some([x:sigma]esti(x,s0)):'prop'
-[n:[x:sigma]not(esti(x,s0))]
-emptyi:=n:empty(s0)
-s0@[e:empty(s0)][s:sigma]
-emptye:=<s>e:not(esti(s,s0))
-s0@[s:sigma][ses0:esti(s,s0)]
-nonemptyi:=somei([x:sigma]esti(x,s0),s,ses0):nonempty(s0)
-s0@[n:nonempty(s0)][x:'prop'][x1:[y:sigma][z:esti(y,s0)]x]
-nonemptyapp:=someapp([y:sigma]esti(y,s0),n,x,x1):x
-s0@[t0:set]
-incl:=all([x:sigma]imp(esti(x,s0),esti(x,t0))):'prop'
-[e:[x:sigma][y:esti(x,s0)]esti(x,t0)]
-incli:=e:incl(s0,t0)
-t0@[i:incl(s0,t0)][s:sigma][ses0:esti(s,s0)]
-incle:=<ses0><s>i:esti(s,t0)
-s0@refincl:=[x:sigma][y:esti(x,s0)]y:incl(s0,s0)
-t0@disj:=all([x:sigma]ec(esti(x,s0),esti(x,t0))):'prop'
-[n:[x:sigma][y:esti(x,s0)]not(esti(x,t0))]
-disji1:=n:disj(s0,t0)
-t0@[n:[x:sigma][y:esti(x,t0)]not(esti(x,s0))]
-disji2:=[x:sigma]th2"l.ec"(esti(x,s0),esti(x,t0),<x>n):disj(s0,t0)
-t0@[d:disj(s0,t0)][s:sigma][ses0:esti(s,s0)]
-disje1:=ece1(esti(s,s0),esti(s,t0),<s>d,ses0):not(esti(s,t0))
-s@[set0:esti(s,t0)]
-disje2:=ece2(esti(s,s0),esti(s,t0),<s>d,set0):not(esti(s,s0))
-t0@[d:disj(s0,t0)]
-symdisj:=[x:sigma][y:esti(x,t0)]disje2(d,x,y):disj(t0,s0)
-+disj
-t0@[s:sigma][ses0:esti(s,s0)][set0:esti(s,t0)]
-th1:=th1"l.all"([x:sigma]ec(esti(x,s0),esti(x,t0)),s,th4"l.imp"(esti(s,s0),not(esti(s,t0)),ses0,weli(esti(s,t0),set0))):not(disj(s0,t0))
-th2:=th1(t0,s0,s,set0,ses0):not(disj(t0,s0))
--disj
-t0@[i:is(set,s0,t0)][s:sigma][ses0:esti(s,s0)]
-issete1:=isp(set,[x:set]esti(s,x),s0,t0,ses0,i):esti(s,t0)
-s@[set0:esti(s,t0)]
-issete2:=isp1(set,[x:set]esti(s,x),t0,s0,set0,i):esti(s,s0)
-+isset
-i@th1:=[x:sigma][y:esti(x,s0)]issete1(x,y):incl(s0,t0)
-th2:=[x:sigma][y:esti(x,t0)]issete2(x,y):incl(t0,s0)
--isset
-t0@[i:incl(s0,t0)][j:incl(t0,s0)]
-isseti:='prim':is(set,s0,t0)
-+*isset
-t0@[s:sigma][ses0:esti(s,s0)][n:not(esti(s,t0))]
-th3:=th3"l.imp"(is(set,s0,t0),esti(s,t0),n,[t:is(set,s0,t0)]issete1(t,s,ses0)):not(is(set,s0,t0))
-th4:=symnotis(set,s0,t0,th3):not(is(set,t0,s0))
-s@nissetprop:=and(esti(s,s0),not(esti(s,t0))):'prop'
-[n:not(nissetprop(s0,t0,s))][e:esti(s,s0)]
-t1:=et(esti(s,t0),th3"l.and"(esti(s,s0),not(esti(s,t0)),n,e)):esti(s,t0)
-t0@[n:not(is(set,s0,t0))][m:not(some([x:sigma]nissetprop(s0,t0,x)))][l:none([x:sigma]nissetprop(t0,s0,x))][s:sigma] %none
-t2:=th4"l.some"([x:sigma]nissetprop(s0,t0,x),m,s):not(nissetprop(s0,t0,s))
-t3:=<s>l:not(nissetprop(t0,s0,s))
-l@t4:=isseti(s0,t0,[x:sigma][y:esti(x,s0)]t1(s0,t0,x,t2(x),y),[x:sigma][y:esti(x,t0)]t1(t0,s0,x,t3(x),y)):is(set,s0,t0)
-m@t5:=th3"l.imp"(none([x:sigma]nissetprop(t0,s0,x)),is(set,s0,t0),n,[y:none([x:sigma]nissetprop(t0,s0,x))]t4(y)):some([x:sigma]nissetprop(t0,s0,x)) %none x 2
-n@th5:=th1"l.or"(some([x:sigma]nissetprop(s0,t0,x)),some([x:sigma]nissetprop(t0,s0,x)),[y:not(some([x:sigma]nissetprop(s0,t0,x)))]t5(y)):or(some([x:sigma]nissetprop(s0,t0,x)),some([x:sigma]nissetprop(t0,s0,x)))
--isset
-sigma@[alpha:'type'][sa:[x:alpha]set]
-unmore:=setof([x:sigma]some(alpha,[y:alpha]esti(x,<y>sa))):set
-[s:sigma][a:alpha][seasa:esti(s,<a>sa)]
-eunmore1:=estii([x:sigma]some(alpha,[y:alpha]esti(x,<y>sa)),s,somei(alpha,[y:alpha]esti(s,<y>sa),a,seasa)):esti(s,unmore(sa))
-s@[seun:esti(s,unmore(sa))][x:'prop'][x1:[y:alpha][z:esti(s,<y>sa)]x]
-unmoreapp:=someapp(alpha,[y:alpha]esti(s,<y>sa),estie([z:sigma]some(alpha,[y:alpha]esti(z,<y>sa)),s,seun),x,x1):x
-+eq
-sigma@[r:[x:sigma][y:sigma]'prop'][refr1:[x:sigma]<x><x>r][symr1:[x:sigma][y:sigma][t:<y><x>r]<x><y>r][trr1:[x:sigma][y:sigma][z:sigma][t:<y><x>r][u:<z><y>r]<z><x>r][s:sigma]
-refr:=<s>refr1:<s><s>r
-[t:sigma][tsr:<t><s>r]
-symr:=<tsr><t><s>symr1:<s><t>r
-t@[u:sigma][tsr:<t><s>r][utr:<u><t>r]
-trr:=<utr><tsr><u><t><s>trr1:<u><s>r
-u@[sur:<s><u>r][tur:<t><u>r]
-tr1r:=trr(s,u,t,symr(u,s,sur),tur):<t><s>r
-u@[usr:<u><s>r][utr:<u><t>r]
-tr2r:=trr(s,u,t,usr,symr(t,u,utr)):<t><s>r
-s@ecelt:=setof(<s>r):set
-+1
-th1:=estii(<s>r,s,refr):esti(s,ecelt(s))
-t@[tsr:<t><s>r]
-th2:=estii(<s>r,t,tsr):esti(t,ecelt(s))
-t@[e:esti(t,ecelt(s))]
-th3:=estie(<s>r,t,e):<t><s>r
-tsr@[u:sigma][e:esti(u,ecelt(s))]
-t1:=th2(t,u,tr1r(t,u,s,tsr,th3(u,e))):esti(u,ecelt(t))
-tsr@th4:=isseti(ecelt(s),ecelt(t),[x:sigma][y:esti(x,ecelt(s))]t1(x,y),[x:sigma][y:esti(x,ecelt(t))]t1(t,s,symr(tsr),x,y)):is(set,ecelt(s),ecelt(t))
-t@[n:not(<t><s>r)][u:sigma][e:esti(u,ecelt(s))]
-t2:=th3"l.imp"(esti(u,ecelt(t)),<t><s>r,n,[x:esti(u,ecelt(t))]tr2r(s,t,u,th3(u,e),th3(t,u,x))):not(esti(u,ecelt(t)))
-n@th5:=[x:sigma][y:esti(x,ecelt(s))]t2(x,y):disj(ecelt(s),ecelt(t))
-s@th6:=nonemptyi(ecelt(s),s,th1):nonempty(ecelt(s))
--1
-trr1@[s0:set][s:sigma]
-ecp:=is(set,s0,ecelt(s)):'prop'
-s0@anec:=some([x:sigma]ecp(x)):'prop'
-+2
-trr1@[s:sigma]
-th1:=somei([x:sigma]ecp(ecelt(s),x),s,refis(set,ecelt(s))):anec(ecelt(s))
--2
-[ecs0:anec(s0)]
-+*2
-ecs0@[s:sigma][ses0:esti(s,s0)][t:sigma][e:ecp(s0,t)]
-t1:=issete1(s0,ecelt(t),e,s,ses0):esti(s,ecelt(t))
-t2:=th4"eq.1"(t,s,th3"eq.1"(t,s,t1)):is(set,ecelt(t),ecelt(s))
-t3:=tris(set,s0,ecelt(t),ecelt(s),e,t2):is(set,s0,ecelt(s))
-ses0@th2:=someapp([x:sigma]ecp(x),ecs0,is(set,s0,ecelt(s)),[x:sigma][y:ecp(x)]t3(x,y)):is(set,s0,ecelt(s))
-[t:sigma][tes0:esti(t,s0)]
-th3:=th3"eq.1"(s,t,issete1(s0,ecelt(s),th2,t,tes0)):<t><s>r
-t@[tsr:<t><s>r]
-th4:=issete2(s0,ecelt(s),th2,t,th2"eq.1"(s,t,tsr)):esti(t,s0)
-ecs0@[s:sigma][e:ecp(s0,s)]
-t4:=isp(set,[x:set]nonempty(x),ecelt(s),s0,th6"eq.1"(s),symis(set,s0,ecelt(s),e)):nonempty(s0)
-ecs0@th5:=someapp([x:sigma]ecp(x),ecs0,nonempty(s0),[x:sigma][y:ecp(x)]t4(x,y)):nonempty(s0)
--2
-+3
-ecs0@[t0:set][ect0:anec(t0)][s:sigma][ses0:esti(s,s0)][t:sigma][tet0:esti(t,t0)][tsr:<t><s>r]
-th1:=tr3is(set,s0,ecelt(s),ecelt(t),t0,th2"eq.2"(s0,ecs0,s,ses0),th4"eq.1"(s,t,tsr),symis(set,t0,ecelt(t),th2"eq.2"(t0,ect0,t,tet0))):is(set,s0,t0)
-tet0@[n:not(<t><s>r)]
-t1:=isp1(set,[x:set]disj(x,ecelt(t)),ecelt(s),s0,th5"eq.1"(s,t,n),th2"eq.2"(s0,ecs0,s,ses0)):disj(s0,ecelt(t))
-th2:=isp1(set,[x:set]disj(s0,x),ecelt(t),t0,t1,th2"eq.2"(t0,ect0,t,tet0)):disj(s0,t0)
-t0@[i:is(set,s0,t0)][s:sigma][ses0:esti(s,s0)]
-t2:=issete1(s0,t0,i,s,ses0):esti(s,t0)
-t3:=th1"st.disj"(s0,t0,s,ses0,t2):not(disj(s0,t0))
-i@th3:=nonemptyapp(s0,th5"eq.2"(s0,ecs0),not(disj(s0,t0)),[x:sigma][y:esti(x,s0)]t3(x,y)):not(disj(s0,t0))
--3
-trr1@ect:=ot(set,[x:set]anec(x)):'type'
-ecs0@ectset:=out(set,[x:set]anec(x),s0,ecs0):ect
-trr1@[s:sigma]
-ectelt:=ectset(ecelt(s),th1".2"(s)):ect
-trr1@[e:ect]
-ecect:=in(set,[x:set]anec(x),e):set
-+4
-th1:=inp(set,[x:set]anec(x),e):anec(ecect(e))
-th2:=th5"eq.2"(ecect(e),th1):nonempty(ecect(e))
-[x:'prop'][x1:[y:sigma][z:esti(y,ecect(e))]x]
-th3:=nonemptyapp(ecect(e),th2,x,x1):x
-s@th4:=isinout(set,[x:set]anec(x),ecelt(s),th1"eq.2"(s)):is(set,ecelt(s),ecect(ectelt(s)))
-th5:=issete1(ecelt(s),ecect(ectelt(s)),th4,s,th1"eq.1"(s)):esti(s,ecect(ectelt(s)))
-th6:=eunmore1(ect,[x:ect]ecect(x),s,ectelt(s),th5):esti(s,unmore(ect,[x:ect]ecect(x)))
-e@[s:sigma][see:esti(s,ecect(e))][t:sigma][tee:esti(t,ecect(e))]
-th7:=th3"eq.2"(ecect(e),th1,s,see,t,tee):<t><s>r
-t@[tsr:<t><s>r]
-th8:=th4"eq.2"(ecect(e),th1,s,see,t,tsr):esti(t,ecect(e))
--4
-+5
-[f:ect][i:is(ect,e,f)]
-th1:=isini(set,[x:set]anec(x),e,f,i):is(set,ecect(e),ecect(f))
-f@[i:is(set,ecect(e),ecect(f))]
-th2:=isine(set,[x:set]anec(x),e,f,i):is(ect,e,f)
-f@[s:sigma][see:esti(s,ecect(e))][t:sigma][tef:esti(t,ecect(f))][tsr:<t><s>r]
-th3:=th2(th1"eq.3"(ecect(e),th1"eq.4"(e),ecect(f),th1"eq.4"(f),s,see,t,tef,tsr)):is(ect,e,f)
-see@[i:is(ect,e,f)]
-th4:=issete1(ecect(e),ecect(f),th1(i),s,see):esti(s,ecect(f))
-tef@[i:is(ect,e,f)]
-th5:=th3"eq.2"(ecect(f),th1"eq.4"(f),s,th4(i),t,tef):<t><s>r
-trr1@[s:sigma][t:sigma][tsr:<t><s>r]
-th6:=isouti(set,[x:set]anec(x),ecelt(s),th1"eq.2"(s),ecelt(t),th1"eq.2"(t),th4"eq.1"(s,t,tsr)):is(ect,ectelt(s),ectelt(t))
--5
-trr1@[alpha:'type'][fu:[x:sigma]alpha]
-fixfu:=[x:sigma][y:sigma][z:<y><x>r]is(alpha,<x>fu,<y>fu):'prop'
-+10
-[ff:fixfu][e:ect][a1:alpha][s:sigma]
-prop1:=and(esti(s,ecect(e)),is(alpha,<s>fu,a1)):'prop'
-a1@prop2:=some([x:sigma]prop1(x)):'prop'
-e@[s:sigma][see:esti(s,ecect(e))]
-t1:=andi(esti(s,ecect(e)),is(alpha,<s>fu,<s>fu),see,refis(alpha,<s>fu)):prop1(<s>fu,s)
-t2:=somei([x:sigma]prop1(<s>fu,x),s,t1):prop2(<s>fu)
-t3:=somei(alpha,[x:alpha]prop2(x),<s>fu,t2):some(alpha,[x:alpha]prop2(x))
-e@t4:=th3"eq.4"(e,some(alpha,[x:alpha]prop2(x)),[x:sigma][y:esti(x,ecect(e))]t3(x,y)):some(alpha,[x:alpha]prop2(x))
-a1@[b1:alpha][pa1:prop2(a1)][pb1:prop2(b1)][s:sigma][pa1s:prop1(a1,s)][t:sigma][pb1t:prop1(b1,t)]
-t5:=ande1(esti(s,ecect(e)),is(alpha,<s>fu,a1),pa1s):esti(s,ecect(e))
-t6:=ande1(esti(t,ecect(e)),is(alpha,<t>fu,b1),pb1t):esti(t,ecect(e))
-t7:=th7"eq.4"(e,s,t5,t,t6):<t><s>r
-t8:=ande2(esti(s,ecect(e)),is(alpha,<s>fu,a1),pa1s):is(alpha,<s>fu,a1)
-t9:=ande2(esti(t,ecect(e)),is(alpha,<t>fu,b1),pb1t):is(alpha,<t>fu,b1)
-t10:=tr3is(alpha,a1,<s>fu,<t>fu,b1,symis(alpha,<s>fu,a1,t8),<t7><t><s>ff,t9):is(alpha,a1,b1)
-pa1s@t11:=someapp([x:sigma]prop1(b1,x),pb1,is(alpha,a1,b1),[x:sigma][y:prop1(b1,x)]t10(x,y)):is(alpha,a1,b1)
-pb1@t12:=someapp([x:sigma]prop1(a1,x),pa1,is(alpha,a1,b1),[x:sigma][y:prop1(a1,x)]t11(x,y)):is(alpha,a1,b1)
-e@t13:=[x:alpha][y:alpha][u:prop2(x)][v:prop2(y)]t12(x,y,u,v):amone(alpha,[x:alpha]prop2(x))
-t14:=onei(alpha,[x:alpha]prop2(x),t13,t4):one(alpha,[x:alpha]prop2(x))
--10
-e".10"@indeq:=ind(alpha,[x:alpha]prop2".10"(x),t14".10"):alpha
-+*10
-e@th1:=oneax(alpha,[x:alpha]prop2(x),t14):some([x:sigma]and(esti(x,ecect(e)),is(alpha,<x>fu,indeq)))
-[s:sigma][see:esti(s,ecect(e))]
-th2:=t12(<s>fu,indeq,t2(s,see),th1):is(alpha,<s>fu,indeq)
-ff@[s:sigma]
-th3:=th2(ectelt(s),s,th5"eq.4"(s)):is(alpha,<s>fu,indeq(ectelt(s)))
--10
-alpha@[fu2:[x:sigma][y:sigma]alpha]
-fixfu2:=[x:sigma][y:sigma][z:sigma][u:sigma][v:<y><x>r][w:<u><z>r]is(alpha,<z><x>fu2,<u><y>fu2):'prop'
-+11
-[ff2:fixfu2][s:sigma][t:sigma][tsr:<t><s>r][u:sigma]
-t1:=<refr(u)><tsr><u><u><t><s>ff2:is(alpha,<u><s>fu2,<u><t>fu2)
-tsr@t2:=fisi(sigma,alpha,<s>fu2,<t>fu2,[x:sigma]t1(x)):is([x:sigma]alpha,<s>fu2,<t>fu2)
-ff2@[e:ect]
-i:=indeq([x:sigma]alpha,fu2,[x:sigma][y:sigma][z:<y><x>r]t2(x,y,z),e):[x:sigma]alpha
-[s:sigma][t:sigma][tsr:<t><s>r][u:sigma][uee:esti(u,ecect(e))]
-t3:=th2"eq.10"([x:sigma]alpha,fu2,[x:sigma][y:sigma][z:<y><x>r]t2(x,y,z),e,u,uee):is([x:sigma]alpha,<u>fu2,i)
-t4:=fise(alpha,<u>fu2,i,t3,s):is(alpha,<s><u>fu2,<s>i)
-t5:=fise(alpha,<u>fu2,i,t3,t):is(alpha,<t><u>fu2,<t>i)
-t6:=<tsr><refr(u)><t><s><u><u>ff2:is(alpha,<s><u>fu2,<t><u>fu2)
-t7:=tr3is(alpha,<s>i,<s><u>fu2,<t><u>fu2,<t>i,symis(alpha,<s><u>fu2,<s>i,t4),t6,t5):is(alpha,<s>i,<t>i)
-tsr@t8:=th3"eq.4"(e,is(alpha,<s>i,<t>i),[x:sigma][y:esti(x,ecect(e))]t7(x,y)):is(alpha,<s>i,<t>i)
--11
-e".11"@[f:ect]
-indeq2:=indeq(i".11",[x:sigma][y:sigma][z:<y><x>r]t8".11"(x,y,z),f):alpha
-+*11
-f@[s:sigma][see:esti(s,ecect(e))][t:sigma][tef:esti(t,ecect(f))]
-t9:=th2"eq.10"(i,[x:sigma][y:sigma][z:<y><x>r]t8(x,y,z),f,t,tef):is(alpha,<t>i,indeq2(e,f))
-t10:=th2"eq.10"([x:sigma]alpha,fu2,[x:sigma][y:sigma][z:<y><x>r]t2(x,y,z),e,s,see):is([x:sigma]alpha,<s>fu2,i)
-t11:=fise(alpha,<s>fu2,i,t10,t):is(alpha,<t><s>fu2,<t>i)
-th1:=tris(alpha,<t><s>fu2,<t>i,indeq2,t11,t9):is(alpha,<t><s>fu2,indeq2(e,f))
-ff2@[s:sigma][t:sigma]
-th2:=th1(ectelt(s),ectelt(t),s,th5"eq.4"(s),t,th5"eq.4"(t)):is(alpha,<t><s>fu2,indeq2(ectelt(s),ectelt(t)))
--11
-+landau
-+n
-@nat:='prim':'type'
-[x:nat][y:nat]
-is:=is"e"(nat,x,y):'prop'
-nis:=not(is(x,y)):'prop'
-x@[s:set(nat)]
-in:=esti(nat,x,s):'prop'
-@[p:[x:nat]'prop']
-some:=some"l"(nat,p):'prop'
-all:=all"l"(nat,p):'prop'
-one:=one"e"(nat,p):'prop'
-@1:='prim':nat
-suc:='prim':[x:nat]nat
-[x:nat][y:nat][i:is(x,y)]
-ax2:=isf(nat,nat,suc,x,y,i):is(<x>suc,<y>suc)
-@ax3:='prim':[x:nat]nis(<x>suc,1)
-ax4:='prim':[x:nat][y:nat][u:is(<x>suc,<y>suc)]is(x,y)
-[s:set(nat)]
-cond1:=in(1,s):'prop'
-cond2:=all([x:nat]imp(in(x,s),in(<x>suc,s))):'prop'
-@ax5:='prim':[s:set(nat)][u:cond1(s)][v:cond2(s)][x:nat]in(x,s)
-[p:[x:nat]'prop'][1p:<1>p][xsp:[x:nat][y:<x>p]<<x>suc>p][x:nat]
-+i1
-s:=setof(nat,p):set(nat)
-t1:=estii(nat,p,1,1p):cond1(s)
-[y:nat][yes:in(y,s)]
-t2:=estie(nat,p,y,yes):<y>p
-t3:=estii(nat,p,<y>suc,<t2><y>xsp):in(<y>suc,s)
-x@t4:=<x><[y:nat][u:in(y,s)]t3(y,u)><t1><s>ax5:in(x,s)
--i1
-induction:=estie(nat,p,x,t4".i1"):<x>p
-@[x:nat][y:nat][n:nis(x,y)]
-+21
-[i:is(<x>suc,<y>suc)]
-t1:=<i><y><x>ax4:is(x,y)
--21
-satz1:=th3"l.imp"(is(<x>suc,<y>suc),is(x,y),n,[u:is(<x>suc,<y>suc)]t1".21"(u)):nis(<x>suc,<y>suc)
-+22
-x@prop1:=nis(<x>suc,x):'prop'
-@t1:=<1>ax3:prop1(1)
-x@[p:prop1(x)]
-t2:=satz1(<x>suc,x,p):prop1(<x>suc)
--22
-x@satz2:=induction([y:nat]prop1".22"(y),t1".22",[y:nat][u:prop1".22"(y)]t2".22"(y,u),x):nis(<x>suc,x)
-+23
-prop1:=or(is(x,1),some([u:nat]is(x,<u>suc))):'prop'
-@t1:=ori1(is(1,1),some([u:nat]is(1,<u>suc)),refis(nat,1)):prop1(1)
-x@t2:=somei(nat,[u:nat]is(<x>suc,<u>suc),x,refis(nat,<x>suc)):some([u:nat]is(<x>suc,<u>suc))
-t3:=ori2(is(<x>suc,1),some([u:nat]is(<x>suc,<u>suc)),t2):prop1(<x>suc)
-t4:=induction([y:nat]prop1(y),t1,[y:nat][u:prop1(y)]t3(y),x):prop1(x)
--23
-[n:nis(x,1)]
-satz3:=ore2(is(x,1),some([u:nat]is(x,<u>suc)),t4".23",n):some([u:nat]is(x,<u>suc))
-y@[z:nat][i:is(x,<y>suc)][j:is(x,<z>suc)]
-+*23
-j@t5:=<tris1(nat,<y>suc,<z>suc,x,i,j)><z><y>ax4:is(y,z)
-x@t6:=[y:nat][z:nat][u:is(x,<y>suc)][v:is(x,<z>suc)]t5(y,z,u,v):amone(nat,[u:nat]is(x,<u>suc))
--23
-n@satz3a:=onei(nat,[u:nat]is(x,<u>suc),t6".23",satz3):one([u:nat]is(x,<u>suc))
-+24
-x@[f:[y:nat]nat]
-prop1:=all([y:nat]is(<<y>suc>f,<<y>f>suc)):'prop'
-prop2:=and(is(<1>f,<x>suc),prop1):'prop'
-x@[a:[y:nat]nat][b:[y:nat]nat][pa:prop2(a)][pb:prop2(b)][y:nat]
-prop3:=is(<y>a,<y>b):'prop'
-pb@t1:=ande1(is(<1>a,<x>suc),prop1(a),pa):is(<1>a,<x>suc)
-t2:=ande1(is(<1>b,<x>suc),prop1(b),pb):is(<1>b,<x>suc)
-t3:=tris2(nat,<1>a,<1>b,<x>suc,t1,t2):prop3(1)
-y@[p:prop3(y)]
-t4:=ax2(<y>a,<y>b,p):is(<<y>a>suc,<<y>b>suc)
-t5:=ande2(is(<1>a,<x>suc),prop1(a),pa):prop1(a)
-t6:=ande2(is(<1>b,<x>suc),prop1(b),pb):prop1(b)
-t7:=<y>t5:is(<<y>suc>a,<<y>a>suc)
-t8:=<y>t6:is(<<y>suc>b,<<y>b>suc)
-t9:=tr3is(nat,<<y>suc>a,<<y>a>suc,<<y>b>suc,<<y>suc>b,t7,t4,symis"e"(nat,<<y>suc>b,<<y>b>suc,t8)):prop3(<y>suc)
-y@t10:=induction([z:nat]prop3(z),t3,[z:nat][u:prop3(z)]t9(z,u),y):prop3(y)
-pb@t11:=fisi(nat,nat,a,b,[y:nat]t10(y)):is"e"([y:nat]nat,a,b)
-x@aa:=[z:[y:nat]nat][u:[y:nat]nat][v:prop2(z)][w:prop2(u)]t11(z,u,v,w):amone([y:nat]nat,[z:[y:nat]nat]prop2(z))
-prop4:=some"l"([y:nat]nat,[z:[y:nat]nat]prop2(z)):'prop'
-@t12:=[x:nat]refis(nat,<<x>suc>suc):prop1(1,suc)
-t13:=andi(is(<1>suc,<1>suc),prop1(1,suc),refis(nat,<1>suc),t12):prop2(1,suc)
-t14:=somei([y:nat]nat,[z:[y:nat]nat]prop2(1,z),suc,t13):prop4(1)
-x@[p:prop4(x)][f:[y:nat]nat][pf:prop2(f)]
-g:=[y:nat]<<y>f>suc:[y:nat]nat
-[y:nat]
-t15:=refis(nat,<y>g):is(<y>g,<<y>f>suc)
-pf@t16:=ande1(is(<1>f,<x>suc),prop1(f),pf):is(<1>f,<x>suc)
-t17:=tris(nat,<1>g,<<1>f>suc,<<x>suc>suc,t15(1),ax2(<1>f,<x>suc,t16)):is(<1>g,<<x>suc>suc)
-y@t18:=ande2(is(<1>f,<x>suc),prop1(f),pf):prop1(f)
-t19:=<y>t18:is(<<y>suc>f,<<y>f>suc)
-t20:=tris2(nat,<<y>suc>f,<y>g,<<y>f>suc,t19,t15):is(<<y>suc>f,<y>g)
-t21:=tris(nat,<<y>suc>g,<<<y>suc>f>suc,<<y>g>suc,t15(<y>suc),ax2(<<y>suc>f,<y>g,t20)):is(<<y>suc>g,<<y>g>suc)
-pf@t22:=[y:nat]t21(y):prop1(<x>suc,g)
-t23:=andi(is(<1>g,<<x>suc>suc),prop1(<x>suc,g),t17,t22):prop2(<x>suc,g)
-t24:=somei([y:nat]nat,[z:[y:nat]nat]prop2(<x>suc,z),g,t23):prop4(<x>suc)
-p@t25:=someapp([y:nat]nat,[z:[y:nat]nat]prop2(z),p,prop4(<x>suc),[z:[y:nat]nat][u:prop2(z)]t24(z,u)):prop4(<x>suc)
-x@bb:=induction([y:nat]prop4(y),t14,[y:nat][u:prop4(y)]t25(y,u),x):prop4(x)
--24
-x@satz4:=onei([y:nat]nat,[z:[y:nat]nat]prop2".24"(z),aa".24",bb".24"):one"e"([y:nat]nat,[z:[y:nat]nat]and(is(<1>z,<x>suc),all([y:nat]is(<<y>suc>z,<<y>z>suc))))
-plus:=ind([y:nat]nat,[z:[y:nat]nat]prop2".24"(z),satz4):[y:nat]nat
-y@pl:=<y>plus:nat
-+*24
-x@t26:=oneax([y:nat]nat,[z:[y:nat]nat]prop2(z),satz4):prop2(plus)
--24
-x@satz4a:=ande1(is(<1>plus,<x>suc),prop1".24"(plus),t26".24"):is(pl(x,1),<x>suc)
-+*24
-x@t27:=ande2(is(<1>plus,<x>suc),prop1(plus),t26):prop1(plus)
--24
-y@satz4b:=<y>t27".24":is(pl(x,<y>suc),<pl(x,y)>suc)
-+*24
-@t28:=t11(1,plus(1),suc,t26(1),t13):is"e"([y:nat]nat,plus(1),suc)
--24
-x@satz4c:=fise(nat,nat,plus(1),suc,t28".24",x):is(pl(1,x),<x>suc)
-+*24
-x@t29:=t11(<x>suc,plus(<x>suc),[y:nat]<<y>plus>suc,t26(<x>suc),t23(bb,plus,t26)):is"e"([y:nat]nat,plus(<x>suc),[y:nat]<<y>plus>suc)
--24
-y@satz4d:=fise(nat,nat,plus(<x>suc),[z:nat]<<z>plus>suc,t29".24",y):is(pl(<x>suc,y),<pl(x,y)>suc)
-x@satz4e:=symis(nat,pl(x,1),<x>suc,satz4a):is(<x>suc,pl(x,1))
-y@satz4f:=symis(nat,pl(x,<y>suc),<pl(x,y)>suc,satz4b):is(<pl(x,y)>suc,pl(x,<y>suc))
-x@satz4g:=symis(nat,pl(1,x),<x>suc,satz4c):is(<x>suc,pl(1,x))
-y@satz4h:=symis(nat,pl(<x>suc,y),<pl(x,y)>suc,satz4d):is(<pl(x,y)>suc,pl(<x>suc,y))
-z@[i:is(x,y)]
-ispl1:=isf(nat,nat,[u:nat]pl(u,z),x,y,i):is(pl(x,z),pl(y,z))
-ispl2:=isf(nat,nat,[u:nat]pl(z,u),x,y,i):is(pl(z,x),pl(z,y))
-z@[u:nat][i:is(x,y)][j:is(z,u)]
-ispl12:=tris(nat,pl(x,z),pl(y,z),pl(y,u),ispl1(i),ispl2(z,u,y,j)):is(pl(x,z),pl(y,u))
-+25
-z@prop1:=is(pl(pl(x,y),z),pl(x,pl(y,z))):'prop'
-y@t1:=tr3is(nat,pl(pl(x,y),1),<pl(x,y)>suc,pl(x,<y>suc),pl(x,pl(y,1)),satz4a(pl(x,y)),satz4f,ispl2(<y>suc,pl(y,1),x,satz4e(y))):prop1(1)
-z@[p:prop1(z)]
-t2:=ax2(pl(pl(x,y),z),pl(x,pl(y,z)),p):is(<pl(pl(x,y),z)>suc,<pl(x,pl(y,z))>suc)
-t3:=tr4is(nat,pl(pl(x,y),<z>suc),<pl(pl(x,y),z)>suc,<pl(x,pl(y,z))>suc,pl(x,<pl(y,z)>suc),pl(x,pl(y,<z>suc)),satz4b(pl(x,y),z),t2,satz4f(x,pl(y,z)),ispl2(<pl(y,z)>suc,pl(y,<z>suc),x,satz4f(y,z))):prop1(<z>suc)
--25
-z@satz5:=induction([u:nat]prop1".25"(u),t1".25",[u:nat][v:prop1".25"(u)]t3".25"(u,v),z):is(pl(pl(x,y),z),pl(x,pl(y,z)))
-asspl1:=satz5:is(pl(pl(x,y),z),pl(x,pl(y,z)))
-asspl2:=symis(nat,pl(pl(x,y),z),pl(x,pl(y,z)),satz5):is(pl(x,pl(y,z)),pl(pl(x,y),z))
-+26
-y@prop1:=is(pl(x,y),pl(y,x)):'prop'
-t1:=satz4a(y):is(pl(y,1),<y>suc)
-t2:=satz4c(y):is(pl(1,y),<y>suc)
-t3:=tris2(nat,pl(1,y),pl(y,1),<y>suc,t2,t1):prop1(1,y)
-[p:prop1(x,y)]
-t4:=tris(nat,<pl(x,y)>suc,<pl(y,x)>suc,pl(y,<x>suc),ax2(pl(x,y),pl(y,x),p),satz4f(y,x)):is(<pl(x,y)>suc,pl(y,<x>suc))
-t5:=satz4d:is(pl(<x>suc,y),<pl(x,y)>suc)
-t6:=tris(nat,pl(<x>suc,y),<pl(x,y)>suc,pl(y,<x>suc),t5,t4):prop1(<x>suc,y)
--26
-y@satz6:=induction([z:nat]prop1".26"(z,y),t3".26",[z:nat][u:prop1".26"(z,y)]t6".26"(z,y,u),x):is(pl(x,y),pl(y,x))
-compl:=satz6:is(pl(x,y),pl(y,x))
-+*26
-x@t7:=tris(nat,pl(x,1),<x>suc,pl(1,x),satz4a,satz4g):prop1(1)
-y@[p:prop1(y)]
-t8:=tr3is(nat,pl(x,<y>suc),<pl(x,y)>suc,<pl(y,x)>suc,pl(<y>suc,x),satz4b,ax2(pl(x,y),pl(y,x),p),satz4h(y,x)):prop1(<y>suc)
-y@anders:=induction([z:nat]prop1(z),t7,[z:nat][u:prop1(z)]t8(z,u),y):is(pl(x,y),pl(y,x))
--26
-+27
-y@prop1:=nis(y,pl(x,y)):'prop'
-x@t1:=symnotis(nat,<x>suc,1,<x>ax3):nis(1,<x>suc)
-t2:=th4"e.notis"(nat,1,<x>suc,pl(x,1),t1,satz4a):prop1(1)
-y@[p:prop1(y)]
-t3:=satz1(y,pl(x,y),p):nis(<y>suc,<pl(x,y)>suc)
-t4:=th4"e.notis"(nat,<y>suc,<pl(x,y)>suc,pl(x,<y>suc),t3,satz4b):prop1(<y>suc)
--27
-y@satz7:=induction([z:nat]prop1".27"(z),t2".27",[z:nat][u:prop1".27"(z)]t4".27"(z,u),y):nis(y,pl(x,y))
-z@[n:nis(y,z)]
-+28
-prop1:=nis(pl(x,y),pl(x,z)):'prop'
-t1:=satz1(y,z,n):nis(<y>suc,<z>suc)
-t2:=th5"e.notis"(nat,<y>suc,<z>suc,pl(1,y),pl(1,z),t1,satz4g(y),satz4g(z)):prop1(1,y,z,n)
-[p:prop1(x,y,z,n)]
-t3:=satz1(pl(x,y),pl(x,z),p):nis(<pl(x,y)>suc,<pl(x,z)>suc)
-t4:=th5"e.notis"(nat,<pl(x,y)>suc,<pl(x,z)>suc,pl(<x>suc,y),pl(<x>suc,z),t3,satz4h,satz4h(z)):prop1(<x>suc,y,z,n)
--28
-satz8:=induction([u:nat]prop1".28"(u,y,z,n),t2".28",[u:nat][v:prop1".28"(u,y,z,n)]t4".28"(u,y,z,n,v),x):nis(pl(x,y),pl(x,z))
-z@[i:is(pl(x,y),pl(x,z))]
-satz8a:=th7"l.imp"(is(y,z),nis(pl(x,y),pl(x,z)),weli(is(pl(x,y),pl(x,z)),i),[u:nis(y,z)]satz8(u)):is(y,z)
-z@diffprop:=is(x,pl(y,z)):'prop'
-+*28
-y@[u:nat][v:nat][du:diffprop(u)][dv:diffprop(v)]
-t5:=satz8a(y,u,v,tris1(nat,pl(y,u),pl(y,v),x,du,dv)):is(u,v)
--28
-y@satz8b:=[u:nat][v:nat][du:diffprop(u)][dv:diffprop(v)]t5".28"(u,v,du,dv):amone(nat,[z:nat]is(x,pl(y,z)))
-+29
-i:=is(x,y):'prop'
-ii:=some([u:nat]diffprop(x,y,u)):'prop'
-iii:=some([v:nat]diffprop(y,x,v)):'prop'
-[one1:i][u:nat]
-t1:=tris(nat,pl(u,x),pl(x,u),pl(y,u),compl(u,x),ispl1(u,one1)):is(pl(u,x),pl(y,u))
-t2:=th3"e.notis"(nat,x,pl(u,x),pl(y,u),satz7(u,x),t1):nis(x,pl(y,u))
-one1@t3:=th5"l.some"(nat,[u:nat]diffprop(u),[u:nat]t2(u)):not(ii)
-y@t4:=th1"l.ec"(i,ii,[z:i]t3(z)):ec(i,ii)
-one1@t5:=t3(y,x,symis(nat,x,y,one1)):not(iii)
-y@t6:=th2"l.ec"(iii,i,[z:i]t5(z)):ec(iii,i)
-[two1:ii][three1:iii][u:nat][du:diffprop(x,y,u)][v:nat][dv:diffprop(y,x,v)]
-t6a:=tr4is(nat,x,pl(y,u),pl(pl(x,v),u),pl(x,pl(v,u)),pl(pl(v,u),x),du,ispl1(y,pl(x,v),u,dv),asspl1(x,v,u),compl(x,pl(v,u))):is(x,pl(pl(v,u),x))
-t7:=mp(is(x,pl(pl(v,u),x)),con,t6a,satz7(pl(v,u),x)):con
-du@t8:=someapp(nat,[v:nat]diffprop(y,x,v),three1,con,[v:nat][dv:diffprop(y,x,v)]t7(v,dv)):con
-three1@t9:=someapp(nat,[u:nat]diffprop(u),two1,con,[u:nat][du:diffprop(u)]t8(u,du)):con
-two1@t10:=[z:iii]t9(z):not(iii)
-y@t11:=th1"l.ec"(ii,iii,[z:ii]t10(z)):ec(ii,iii)
-a:=th6"l.ec3"(i,ii,iii,t4,t11,t6):ec3(i,ii,iii)
-prop1:=or3(i,ii,iii):'prop'
-x@[j:is(x,1)]
-t12:=or3i1(i(1),ii(1),iii(1),j):prop1(1)
-x@[n:nis(x,1)][u:nat][j:is(x,<u>suc)]
-t13:=tris(nat,x,<u>suc,pl(1,u),j,satz4g(u)):is(x,pl(1,u))
-t14:=somei(nat,[z:nat]diffprop(x,1,z),u,t13):ii(1)
-t15:=someapp(nat,[u1:nat]is(x,<u1>suc),satz3(x,n),ii(1),[u1:nat][z:is(x,<u1>suc)]t14(u1,z)):ii(1)
-t16:=or3i2(i(1),ii(1),iii(1),t15):prop1(1)
-n@t16a:=someapp(nat,[u:nat]is(x,<u>suc),satz3(x,n),prop1(1),[u:nat][v:is(x,<u>suc)]t16(u,v)):prop1(1)
-x@t17:=th1"l.imp"(is(x,1),prop1(1),[z:is(x,1)]t12(z),[z:nis(x,1)]t16a(z)):prop1(1)
-y@[p:prop1(y)][one1:i(y)]
-t18:=tris(nat,<y>suc,pl(y,1),pl(x,1),satz4e(y),ispl1(y,x,1,symis(nat,x,y,one1))):is(<y>suc,pl(x,1))
-t19:=somei(nat,[z:nat]diffprop(<y>suc,x,z),1,t18):iii(<y>suc)
-t20:=or3i3(i(<y>suc),ii(<y>suc),iii(<y>suc),t19):prop1(<y>suc)
-p@[two1:ii(y)][u:nat][du:diffprop(x,y,u)][j:is(u,1)]
-t21:=tr3is(nat,x,pl(y,u),pl(y,1),<y>suc,du,ispl2(u,1,y,j),satz4a(y)):is(x,<y>suc)
-t22:=or3i1(i(<y>suc),ii(<y>suc),iii(<y>suc),t21):prop1(<y>suc)
-du@[n:nis(u,1)][w:nat][j:is(u,<w>suc)]
-t23:=tris(nat,u,<w>suc,pl(1,w),j,satz4g(w)):is(u,pl(1,w))
-t24:=tr4is(nat,x,pl(y,u),pl(y,pl(1,w)),pl(pl(y,1),w),pl(<y>suc,w),du,ispl2(u,pl(1,w),y,t23),asspl2(y,1,w),ispl1(pl(y,1),<y>suc,w,satz4a(y))):is(x,pl(<y>suc,w))
-t25:=somei(nat,[z:nat]diffprop(x,<y>suc,z),w,t24):ii(<y>suc)
-n@t26:=someapp(nat,[z:nat]is(u,<z>suc),satz3(u,n),ii(<y>suc),[z:nat][v:is(u,<z>suc)]t25(z,v)):ii(<y>suc)
-t27:=or3i2(i(<y>suc),ii(<y>suc),iii(<y>suc),t26):prop1(<y>suc)
-du@t28:=th1"l.imp"(is(u,1),prop1(<y>suc),[z:is(u,1)]t22(z),[z:nis(u,1)]t27(z)):prop1(<y>suc)
-two1@t28a:=someapp(nat,[u:nat]diffprop(u),two1,prop1(<y>suc),[u:nat][du:diffprop(u)]t28(u,du)):prop1(<y>suc)
-p@[three1:iii(y)][v:nat][dv:diffprop(y,x,v)]
-t29:=tris(nat,<y>suc,<pl(x,v)>suc,pl(x,<v>suc),ax2(y,pl(x,v),dv),satz4f(x,v)):is(<y>suc,pl(x,<v>suc))
-t30:=somei(nat,[z:nat]diffprop(<y>suc,x,z),<v>suc,t29):iii(<y>suc)
-three1@t31:=someapp(nat,[v:nat]diffprop(y,x,v),three1,iii(<y>suc),[v:nat][dv:diffprop(y,x,v)]t30(v,dv)):iii(<y>suc)
-t32:=or3i3(i(<y>suc),ii(<y>suc),iii(<y>suc),t31):prop1(<y>suc)
-p@t33:=or3app(i(y),ii(y),iii(y),prop1(<y>suc),p,[z:i(y)]t20(z),[z:ii(y)]t28a(z),[z:iii(y)]t32(z)):prop1(<y>suc)
-y@b:=induction([z:nat]prop1(z),t17,[z:nat][u:prop1(z)]t33(z,u),y):or3(i,ii,iii)
--29
-satz9:=orec3i(i".29",ii".29",iii".29",b".29",a".29"):orec3(is(x,y),some([u:nat]is(x,pl(y,u))),some([v:nat]is(y,pl(x,v))))
-satz9a:=b".29":or3(is(x,y),some([u:nat]diffprop(x,y,u)),some([v:nat]diffprop(y,x,v)))
-satz9b:=a".29":ec3(is(x,y),some([u:nat]diffprop(x,y,u)),some([v:nat]diffprop(y,x,v)))
-more:=some([u:nat]diffprop(x,y,u)):'prop'
-less:=some([v:nat]diffprop(y,x,v)):'prop'
-satz10:=satz9:orec3(is(x,y),more(x,y),less(x,y))
-satz10a:=satz9a:or3(is(x,y),more(x,y),less(x,y))
-satz10b:=satz9b:ec3(is(x,y),more(x,y),less(x,y))
-[m:more(x,y)]
-satz11:=m:less(y,x)
-y@[l:less(x,y)]
-satz12:=l:more(y,x)
-y@moreis:=or(more,is(x,y)):'prop'
-lessis:=or(less,is(x,y)):'prop'
-[m:moreis(x,y)]
-satz13:=th9"l.or"(more,is(x,y),less(y,x),is(y,x),m,[z:more]satz11(z),[z:is(x,y)]symis(nat,x,y,z)):lessis(y,x)
-y@[l:lessis(x,y)]
-satz14:=th9"l.or"(less,is(x,y),more(y,x),is(y,x),l,[z:less]satz12(z),[z:is(x,y)]symis(nat,x,y,z)):moreis(y,x)
-z@[i:is(x,y)][m:more(x,z)]
-ismore1:=isp(nat,[u:nat]more(u,z),x,y,m,i):more(y,z)
-i@[m:more(z,x)]
-ismore2:=isp(nat,[u:nat]more(z,u),x,y,m,i):more(z,y)
-i@[l:less(x,z)]
-isless1:=isp(nat,[u:nat]less(u,z),x,y,l,i):less(y,z)
-i@[l:less(z,x)]
-isless2:=isp(nat,[u:nat]less(z,u),x,y,l,i):less(z,y)
-i@[m:moreis(x,z)]
-ismoreis1:=isp(nat,[u:nat]moreis(u,z),x,y,m,i):moreis(y,z)
-i@[m:moreis(z,x)]
-ismoreis2:=isp(nat,[u:nat]moreis(z,u),x,y,m,i):moreis(z,y)
-i@[l:lessis(x,z)]
-islessis1:=isp(nat,[u:nat]lessis(u,z),x,y,l,i):lessis(y,z)
-i@[l:lessis(z,x)]
-islessis2:=isp(nat,[u:nat]lessis(z,u),x,y,l,i):lessis(z,y)
-y@[i:is(x,y)]
-moreisi2:=ori2(more(x,y),is(x,y),i):moreis(x,y)
-lessisi2:=ori2(less(x,y),is(x,y),i):lessis(x,y)
-y@[m:more(x,y)]
-moreisi1:=ori1(more(x,y),is(x,y),m):moreis(x,y)
-y@[l:less(x,y)]
-lessisi1:=ori1(less(x,y),is(x,y),l):lessis(x,y)
-z@[u:nat][i:is(x,y)][j:is(z,u)][m:more(x,z)]
-ismore12:=ismore2(z,u,y,j,ismore1(x,y,z,i,m)):more(y,u)
-j@[l:less(x,z)]
-isless12:=isless2(z,u,y,j,isless1(x,y,z,i,l)):less(y,u)
-j@[m:moreis(x,z)]
-ismoreis12:=ismoreis2(z,u,y,j,ismoreis1(x,y,z,i,m)):moreis(y,u)
-j@[l:lessis(x,z)]
-islessis12:=islessis2(z,u,y,j,islessis1(x,y,z,i,l)):lessis(y,u)
-y@[m:moreis(x,y)]
-satz10c:=th7"l.ec3"(is(x,y),more(x,y),less(x,y),satz10b,comor(more(x,y),is(x,y),m)):not(less(x,y))
-y@[l:lessis(x,y)]
-satz10d:=th9"l.ec3"(is(x,y),more(x,y),less(x,y),satz10b,l):not(more(x,y))
-y@[n:not(more(x,y))]
-satz10e:=th2"l.or3"(is(x,y),more(x,y),less(x,y),satz10a,n):lessis(x,y)
-y@[n:not(less(x,y))]
-satz10f:=comor(is(x,y),more(x,y),th3"l.or3"(is(x,y),more(x,y),less(x,y),satz10a,n)):moreis(x,y)
-y@[m:more(x,y)]
-satz10g:=th3"l.or"(less(x,y),is(x,y),ec3e23(is(x,y),more(x,y),less(x,y),satz10b,m),ec3e21(is(x,y),more(x,y),less(x,y),satz10b,m)):not(lessis(x,y))
-y@[l:less(x,y)]
-satz10h:=th3"l.or"(more(x,y),is(x,y),ec3e32(is(x,y),more(x,y),less(x,y),satz10b,l),ec3e31(is(x,y),more(x,y),less(x,y),satz10b,l)):not(moreis(x,y))
-y@[n:not(moreis(x,y))]
-satz10j:=or3e3(is(x,y),more(x,y),less(x,y),satz10a,th5"l.or"(more(x,y),is(x,y),n),th4"l.or"(more(x,y),is(x,y),n)):less(x,y)
-y@[n:not(lessis(x,y))]
-satz10k:=or3e2(is(x,y),more(x,y),less(x,y),satz10a,th4"l.or"(less(x,y),is(x,y),n),th5"l.or"(less(x,y),is(x,y),n)):more(x,y)
-z@[l:less(x,y)][k:less(y,z)]
-+315
-[v:nat][dv:diffprop(y,x,v)][w:nat][dw:diffprop(z,y,w)]
-t1:=tr3is(nat,z,pl(y,w),pl(pl(x,v),w),pl(x,pl(v,w)),dw,ispl1(y,pl(x,v),w,dv),asspl1(x,v,w)):is(z,pl(x,pl(v,w)))
-t2:=somei(nat,[u:nat]diffprop(z,x,u),pl(v,w),t1):less(x,z)
-dv@t3:=someapp(nat,[w:nat]diffprop(z,y,w),k,less(x,z),[w:nat][dw:diffprop(z,y,w)]t2(w,dw)):less(x,z)
--315
-satz15:=someapp(nat,[v:nat]diffprop(y,x,v),l,less(x,z),[v:nat][dv:diffprop(y,x,v)]t3".315"(v,dv)):less(x,z)
-trless:=satz15:less(x,z)
-z@[m:more(x,y)][n:more(y,z)]
-trmore:=satz15(z,y,x,n,m):more(x,z)
-+*315
-n@anders:=satz12(z,x,satz15(z,y,x,satz11(y,z,n),satz11(m))):more(x,z)
--315
-z@[l:lessis(x,y)][k:less(y,z)]
-satz16a:=orapp(less(x,y),is(x,y),less(x,z),l,[u:less(x,y)]trless(u,k),[u:is(x,y)]isless1(y,x,z,symis(nat,x,y,u),k)):less(x,z)
-z@[l:less(x,y)][k:lessis(y,z)]
-satz16b:=orapp(less(y,z),is(y,z),less(x,z),k,[u:less(y,z)]trless(l,u),[u:is(y,z)]isless2(y,z,x,u,l)):less(x,z)
-z@[m:moreis(x,y)][n:more(y,z)]
-satz16c:=satz16b(z,y,x,n,satz13(m)):more(x,z)
-z@[m:more(x,y)][n:moreis(y,z)]
-satz16d:=satz16a(z,y,x,satz13(y,z,n),m):more(x,z)
-z@[l:lessis(x,y)][k:lessis(y,z)]
-+317
-[i:is(x,y)][j:is(y,z)]
-t1:=lessisi2(x,z,tris(nat,x,y,z,i,j)):lessis(x,z)
-i@[j:less(y,z)]
-t2:=lessisi1(x,z,satz16a(l,j)):lessis(x,z)
-i@t3:=orapp(less(y,z),is(y,z),lessis(x,z),k,[u:less(y,z)]t2(u),[u:is(y,z)]t1(u)):lessis(x,z)
-k@[j:less(x,y)]
-t4:=lessisi1(x,z,satz16b(j,k)):lessis(x,z)
--317
-satz17:=orapp(less(x,y),is(x,y),lessis(x,z),l,[u:less(x,y)]t4".317"(u),[u:is(x,y)]t3".317"(u)):lessis(x,z)
-+*317
-k@[j:less(x,y)]
-t5:=lessisi1(x,z,satz16b(j,k)):lessis(x,z)
-k@[i:is(x,y)]
-t6:=islessis1(y,x,z,symis(nat,x,y,i),k):lessis(x,z)
-k@anders:=orapp(less(x,y),is(x,y),lessis(x,z),l,[u:less(x,y)]t5(u),[u:is(x,y)]t6(u)):lessis(x,z)
--317
-k@trlessis:=satz17:lessis(x,z)
-z@[m:moreis(x,y)][n:moreis(y,z)]
-trmoreis:=satz14(z,x,satz17(z,y,x,satz13(y,z,n),satz13(m))):moreis(x,z)
-y@satz18:=somei(nat,[u:nat]diffprop(pl(x,y),x,u),y,refis(nat,pl(x,y))):more(pl(x,y),x)
-satz18a:=satz18:less(x,pl(x,y))
-x@satz18b:=ismore1(pl(x,1),<x>suc,x,satz4a,satz18(1)):more(<x>suc,x)
-satz18c:=satz18b:less(x,<x>suc)
-z@[m:more(x,y)]
-+319
-[u:nat][du:diffprop(u)]
-t1:=tris(nat,x,pl(y,u),pl(u,y),du,compl(y,u)):is(x,pl(u,y))
-t2:=tr3is(nat,pl(x,z),pl(pl(u,y),z),pl(u,pl(y,z)),pl(pl(y,z),u),ispl1(x,pl(u,y),z,t1),asspl1(u,y,z),compl(u,pl(y,z))):is(pl(x,z),pl(pl(y,z),u))
-t3:=somei(nat,[v:nat]diffprop(pl(x,z),pl(y,z),v),u,t2):more(pl(x,z),pl(y,z))
--319
-satz19a:=someapp(nat,[u:nat]diffprop(u),m,more(pl(x,z),pl(y,z)),[u:nat][v:diffprop(u)]t3".319"(u,v)):more(pl(x,z),pl(y,z))
-z@[i:is(x,y)]
-satz19b:=ispl1(x,y,z,i):is(pl(x,z),pl(y,z))
-z@[l:less(x,y)]
-satz19c:=satz11(pl(y,z),pl(x,z),satz19a(y,x,z,satz12(x,y,l))):less(pl(x,z),pl(y,z))
-+*319
-l@anders1:=satz19a(y,x,z,l):less(pl(x,z),pl(y,z))
--319
-m@satz19d:=ismore12(pl(x,z),pl(z,x),pl(y,z),pl(z,y),compl(x,z),compl(y,z),satz19a):more(pl(z,x),pl(z,y))
-i@satz19e:=ispl2(x,y,z,i):is(pl(z,x),pl(z,y))
-l@satz19f:=isless12(pl(x,z),pl(z,x),pl(y,z),pl(z,y),compl(x,z),compl(y,z),satz19c):less(pl(z,x),pl(z,y))
-+*319
-l@anders2:=satz19d(y,x,z,l):less(pl(z,x),pl(z,y))
--319
-z@[u:nat][i:is(x,y)][m:more(z,u)]
-satz19g:=ismore2(pl(x,u),pl(y,u),pl(x,z),ispl1(x,y,u,i),satz19d(z,u,x,m)):more(pl(x,z),pl(y,u))
-satz19h:=ismore12(pl(x,z),pl(z,x),pl(y,u),pl(u,y),compl(x,z),compl(y,u),satz19g):more(pl(z,x),pl(u,y))
-i@[l:less(z,u)]
-satz19j:=isless2(pl(x,u),pl(y,u),pl(x,z),ispl1(x,y,u,i),satz19f(z,u,x,l)):less(pl(x,z),pl(y,u))
-satz19k:=isless12(pl(x,z),pl(z,x),pl(y,u),pl(u,y),compl(x,z),compl(y,u),satz19j):less(pl(z,x),pl(u,y))
-z@[m:moreis(x,y)]
-+*319
-m@[n:more(x,y)]
-t4:=moreisi1(pl(x,z),pl(y,z),satz19a(n)):moreis(pl(x,z),pl(y,z))
-m@[i:is(x,y)]
-t5:=moreisi2(pl(x,z),pl(y,z),ispl1(x,y,z,i)):moreis(pl(x,z),pl(y,z))
--319
-m@satz19l:=orapp(more(x,y),is(x,y),moreis(pl(x,z),pl(y,z)),m,[u:more(x,y)]t4".319"(u),[u:is(x,y)]t5".319"(u)):moreis(pl(x,z),pl(y,z))
-satz19m:=ismoreis12(pl(x,z),pl(z,x),pl(y,z),pl(z,y),compl(x,z),compl(y,z),satz19l):moreis(pl(z,x),pl(z,y))
-z@[l:lessis(x,y)]
-satz19n:=satz13(pl(y,z),pl(x,z),satz19l(y,x,z,satz14(l))):lessis(pl(x,z),pl(y,z))
-satz19o:=satz13(pl(z,y),pl(z,x),satz19m(y,x,z,satz14(l))):lessis(pl(z,x),pl(z,y))
-+320
-z@t1:=satz10a(x,y):or3(is(x,y),more(x,y),less(x,y))
-t2:=satz10b(pl(x,z),pl(y,z)):ec3(is(pl(x,z),pl(y,z)),more(pl(x,z),pl(y,z)),less(pl(x,z),pl(y,z)))
--320
-z@[m:more(pl(x,z),pl(y,z))]
-satz20a:=th11"l.ec3"(is(x,y),more(x,y),less(x,y),is(pl(x,z),pl(y,z)),more(pl(x,z),pl(y,z)),less(pl(x,z),pl(y,z)),t1".320",t2".320",[u:is(x,y)]satz19b(x,y,z,u),[u:more(x,y)]satz19a(x,y,z,u),[u:less(x,y)]satz19c(x,y,z,u),m):more(x,y)
-z@[i:is(pl(x,z),pl(y,z))]
-satz20b:=th10"l.ec3"(is(x,y),more(x,y),less(x,y),is(pl(x,z),pl(y,z)),more(pl(x,z),pl(y,z)),less(pl(x,z),pl(y,z)),t1".320",t2".320",[u:is(x,y)]satz19b(x,y,z,u),[u:more(x,y)]satz19a(x,y,z,u),[u:less(x,y)]satz19c(x,y,z,u),i):is(x,y)
-z@[l:less(pl(x,z),pl(y,z))]
-satz20c:=th12"l.ec3"(is(x,y),more(x,y),less(x,y),is(pl(x,z),pl(y,z)),more(pl(x,z),pl(y,z)),less(pl(x,z),pl(y,z)),t1".320",t2".320",[u:is(x,y)]satz19b(x,y,z,u),[u:more(x,y)]satz19a(x,y,z,u),[u:less(x,y)]satz19c(x,y,z,u),l):less(x,y)
-+*320
-i@t3:=tr3is(nat,pl(z,x),pl(x,z),pl(y,z),pl(z,y),compl(z,x),i,compl(y,z)):is(pl(z,x),pl(z,y))
-andersb:=satz8a(z,x,y,t3):is(x,y)
-l@andersc:=satz20a(y,x,z,l):less(x,y)
--320
-z@[m:more(pl(z,x),pl(z,y))]
-satz20d:=satz20a(ismore12(pl(z,x),pl(x,z),pl(z,y),pl(y,z),compl(z,x),compl(z,y),m)):more(x,y)
-z@[i:is(pl(z,x),pl(z,y))]
-satz20e:=satz20b(tr3is(nat,pl(x,z),pl(z,x),pl(z,y),pl(y,z),compl(x,z),i,compl(z,y))):is(x,y)
-z@[l:less(pl(z,x),pl(z,y))]
-satz20f:=satz20c(isless12(pl(z,x),pl(x,z),pl(z,y),pl(y,z),compl(z,x),compl(z,y),l)):less(x,y)
-u@[m:more(x,y)][n:more(z,u)]
-+321
-t1:=satz19a(x,y,z,m):more(pl(x,z),pl(y,z))
-t2:=ismore12(pl(z,y),pl(y,z),pl(u,y),pl(y,u),compl(z,y),compl(u,y),satz19a(z,u,y,n)):more(pl(y,z),pl(y,u))
--321
-satz21:=trmore(pl(x,z),pl(y,z),pl(y,u),t1".321",t2".321"):more(pl(x,z),pl(y,u))
-+*321
-n@anders:=trmore(pl(x,z),pl(y,z),pl(y,u),satz19a(x,y,z,m),satz19d(z,u,y,n)):more(pl(x,z),pl(y,u))
--321
-u@[l:less(x,y)][k:less(z,u)]
-satz21a:=satz21(y,x,u,z,l,k):less(pl(x,z),pl(y,u))
-+*321
-k@andersa:=satz11(pl(y,u),pl(x,z),satz21(y,x,u,z,satz12(x,y,l),satz12(z,u,k))):less(pl(x,z),pl(y,u))
--321
-u@[m:moreis(x,y)][n:more(z,u)]
-satz22a:=orapp(more(x,y),is(x,y),more(pl(x,z),pl(y,u)),m,[v:more(x,y)]satz21(v,n),[v:is(x,y)]satz19g(u,v,n)):more(pl(x,z),pl(y,u))
-u@[m:more(x,y)][n:moreis(z,u)]
-satz22b:=orapp(more(z,u),is(z,u),more(pl(x,z),pl(y,u)),n,[v:more(z,u)]satz21(m,v),[v:is(z,u)]satz19h(z,u,x,y,v,m)):more(pl(x,z),pl(y,u))
-u@[l:lessis(x,y)][k:less(z,u)]
-satz22c:=satz22a(y,x,u,z,satz14(x,y,l),k):less(pl(x,z),pl(y,u))
-u@[l:less(x,y)][k:lessis(z,u)]
-satz22d:=satz22b(y,x,u,z,l,satz14(z,u,k)):less(pl(x,z),pl(y,u))
-u@[m:moreis(x,y)][n:moreis(z,u)]
-+323
-[i:is(x,y)][j:is(z,u)]
-t1:=moreisi2(pl(x,z),pl(y,u),tris(nat,pl(x,z),pl(y,z),pl(y,u),ispl1(x,y,z,i),ispl2(z,u,y,j))):moreis(pl(x,z),pl(y,u))
-i@[o:more(z,u)]
-t2:=moreisi1(pl(x,z),pl(y,u),satz22a(m,o)):moreis(pl(x,z),pl(y,u))
-i@t3:=orapp(more(z,u),is(z,u),moreis(pl(x,z),pl(y,u)),n,[v:more(z,u)]t2(v),[v:is(z,u)]t1(v)):moreis(pl(x,z),pl(y,u))
-n@[o:more(x,y)]
-t4:=moreisi1(pl(x,z),pl(y,u),satz22b(o,n)):moreis(pl(x,z),pl(y,u))
--323
-satz23:=orapp(more(x,y),is(x,y),moreis(pl(x,z),pl(y,u)),m,[v:more(x,y)]t4".323"(v),[v:is(x,y)]t3".323"(v)):moreis(pl(x,z),pl(y,u))
-+*323
-n@[o:more(x,y)]
-t5:=moreisi1(pl(x,z),pl(y,u),satz22b(o,n)):moreis(pl(x,z),pl(y,u))
-n@[i:is(x,y)]
-t6:=ismoreis2(pl(x,u),pl(y,u),pl(x,z),ispl1(u,i),satz19m(z,u,x,n)):moreis(pl(x,z),pl(y,u))
-n@anders:=orapp(more(x,y),is(x,y),moreis(pl(x,z),pl(y,u)),m,[v:more(x,y)]t5(v),[v:is(x,y)]t6(v)):moreis(pl(x,z),pl(y,u))
--323
-u@[l:lessis(x,y)][k:lessis(z,u)]
-satz23a:=satz13(pl(y,u),pl(x,z),satz23(y,x,u,z,satz14(l),satz14(z,u,k))):lessis(pl(x,z),pl(y,u))
-+324
-x@[n:nis(x,1)][u:nat][i:is(x,<u>suc)]
-t1:=tris(nat,x,<u>suc,pl(1,u),i,satz4g(u)):is(x,pl(1,u))
-t2:=ismore1(pl(1,u),x,1,symis(nat,x,pl(1,u),t1),satz18(1,u)):more(x,1)
-n@t3:=someapp(nat,[u:nat]is(x,<u>suc),satz3(x,n),more(x,1),[u:nat][v:is(x,<u>suc)]t2(u,v)):more(x,1)
--324
-x@satz24:=th2"l.or"(more(x,1),is(x,1),[u:nis(x,1)]t3".324"(u)):moreis(x,1)
-satz24a:=satz13(x,1,satz24):lessis(1,x)
-satz24b:=t3".324"(<x>suc,<x>ax3):more(<x>suc,1)
-satz24c:=satz24b:less(1,<x>suc)
-y@[m:more(y,x)]
-+325
-[u:nat][du:diffprop(y,x,u)]
-t1:=satz19m(u,1,x,satz24(u)):moreis(pl(x,u),pl(x,1))
-t2:=ismoreis1(pl(x,u),y,pl(x,1),symis(nat,y,pl(x,u),du),t1):moreis(y,pl(x,1))
--325
-satz25:=someapp(nat,[u:nat]diffprop(y,x,u),m,moreis(y,pl(x,1)),[u:nat][v:diffprop(y,x,u)]t2".325"(u,v)):moreis(y,pl(x,1))
-satz25a:=ismoreis2(pl(x,1),<x>suc,y,satz4a,satz25):moreis(y,<x>suc)
-y@[l:less(y,x)]
-satz25b:=satz13(x,pl(y,1),satz25(y,x,l)):lessis(pl(y,1),x)
-satz25c:=islessis1(pl(y,1),<y>suc,x,satz4a(y),satz25b):lessis(<y>suc,x)
-y@[l:less(y,pl(x,1))]
-+326
-[m:more(y,x)]
-t1:=satz25(m):moreis(y,pl(x,1))
-l@t2:=th3"l.imp"(more(y,x),moreis(y,pl(x,1)),satz10h(y,pl(x,1),l),[v:more(y,x)]t1(v)):not(more(y,x))
--326
-satz26:=satz10e(y,x,t2".326"):lessis(y,x)
-y@[l:less(y,<x>suc)]
-satz26a:=satz26(isless2(<x>suc,pl(x,1),y,satz4e,l)):lessis(y,x)
-y@[m:more(pl(y,1),x)]
-satz26b:=satz14(x,y,satz26(y,x,m)):moreis(y,x)
-y@[m:more(<y>suc,x)]
-satz26c:=satz26b(ismore1(<y>suc,pl(y,1),x,satz4e(y),m)):moreis(y,x)
-@[p:[x:nat]'prop'][n:nat]
-+327
-[m:nat]
-lbprop:=imp(<m>p,lessis(n,m)):'prop'
--327
-lb:=all([x:nat]lbprop".327"(x)):'prop'
-min:=and(lb,<n>p):'prop'
-p@[s:some(p)]
-+*327
-s@[n:nat]
-t1:=[x:<n>p]satz24a(n):lbprop(1,n)
-s@t2:=[x:nat]t1(x):lb(1)
-[l:[x:nat]lb(x)][y:nat][yp:<y>p]
-t3:=satz18(y,1):more(pl(y,1),y)
-t4:=satz10g(pl(y,1),y,t3):not(lessis(pl(y,1),y))
-t5:=th4"l.imp"(<y>p,lessis(pl(y,1),y),yp,t4):not(lbprop(pl(y,1),y))
-t6:=th1"l.all"(nat,[x:nat]lbprop(pl(y,1),x),y,t5):not(lb(pl(y,1)))
-t7:=mp(lb(pl(y,1)),con,<pl(y,1)>l,t6):con
-l@t8:=someapp(nat,p,s,con,[x:nat][y:<x>p]t7(x,y)):con
-s@[n:none(nat,[x:nat]and(lb(x),not(lb(pl(x,1)))))][m:nat][l:lb(m)] %none
-t9:=<m>n:not(and(lb(m),not(lb(pl(m,1)))))
-t10:=et(lb(pl(m,1)),th3"l.and"(lb(m),not(lb(pl(m,1))),t9,l)):lb(pl(m,1))
-t11:=isp(nat,[x:nat]lb(x),pl(m,1),<m>suc,t10,satz4a(m)):lb(<m>suc)
-n@t12:=[x:nat]induction([y:nat]lb(y),t2,[y:nat][z:lb(y)]t11(y,z),x):[x:nat]lb(x)
-s@t13:=[x:none(nat,[x:nat]and(lb(x),not(lb(pl(x,1)))))]t8(t12(x)):some([x:nat]and(lb(x),not(lb(pl(x,1))))) %none
-[m:nat][a:and(lb(m),not(lb(pl(m,1))))]
-t14:=ande1(lb(m),not(lb(pl(m,1))),a):lb(m)
-t15:=ande2(lb(m),not(lb(pl(m,1))),a):not(lb(pl(m,1)))
-[nmp:not(<m>p)][n:nat][np:<n>p]
-t16:=mp(<n>p,lessis(m,n),np,<n>t14):lessis(m,n)
-t17:=th3"l.imp"(is(m,n),<m>p,nmp,[x:is(m,n)]isp(nat,p,n,m,np,symis(nat,m,n,x))):not(is(m,n))
-t18:=ore1(less(m,n),is(m,n),t16,t17):less(m,n)
-t19:=satz25b(n,m,t18):lessis(pl(m,1),n)
-nmp@t20:=[x:nat][y:<x>p]t19(x,y):lb(pl(m,1))
-t21:=mp(lb(pl(m,1)),con,t20,t15):con
-a@t22:=et(<m>p,[x:not(<m>p)]t21(x)):<m>p
-t23:=andi(lb(m),<m>p,t14,t22):min(m)
--327
-s@satz27:=th6"l.some"(nat,[x:nat]and(lb(x),not(lb(pl(x,1)))),[x:nat]min(x),t13".327",[x:nat][y:and(lb(x),not(lb(pl(x,1))))]t23".327"(x,y)):some([x:nat]min(p,x))
-+*327
-p@[n:none(nat,[x:nat]min(x))][u:nat] %none
-t24:=[x:<u>p]satz24a(u):lbprop(1,u)
-n@t25:=[x:nat]t24(x):lb(1)
-u@[l:lb(u)]
-t26:=<u>n:not(min(u))
-t27:=th3"l.and"(lb(u),<u>p,t26,l):not(<u>p)
-[v:nat][vp:<v>p]
-t28:=th3"l.imp"(is(u,v),<u>p,t27,[x:is(u,v)]isp1(nat,p,v,u,vp,x)):nis(u,v)
-t29:=mp(<v>p,lessis(u,v),vp,<v>l):lessis(u,v)
-t30:=ore1(less(u,v),is(u,v),t29,t28):less(u,v)
-t31:=satz25c(v,u,t30):lessis(<u>suc,v)
-v@t32:=[x:<v>p]t31(x):lbprop(<u>suc,v)
-l@t33:=[x:nat]t32(x):lb(<u>suc)
-u@t34:=induction([x:nat]lb(x),t25,[x:nat][y:lb(x)]t33(x,y),u):lb(u)
-p@[s:some(p)][u:nat][up:<u>p]
-t35:=satz10g(<u>suc,u,satz18b(u)):not(lessis(<u>suc,u))
-t36:=th4"l.imp"(<u>p,lessis(<u>suc,u),up,t35):not(lbprop(<u>suc,u))
-t37:=th1"l.all"(nat,[x:nat]lbprop(<u>suc,x),u,t36):not(lb(<u>suc))
-t38:=[y:none(nat,[x:nat]min(x))]mp(lb(<u>suc),con,t34(y,<u>suc),t37):some([x:nat]min(x)) %none
-s@anders:=someapp(nat,p,s,some([x:nat]min(x)),[x:nat][y:<x>p]t38(x,y)):some([x:nat]min(x))
--327
-+*327
-p@[n:nat][m:nat][mn:min(p,n)][mm:min(p,m)]
-t39:=ande1(lb(n),<n>p,mn):lb(n)
-t40:=ande1(lb(m),<m>p,mm):lb(m)
-t41:=ande2(lb(n),<n>p,mn):<n>p
-t42:=ande2(lb(m),<m>p,mm):<m>p
-t43:=<m>t39:lbprop(n,m)
-t44:=<n>t40:lbprop(m,n)
-t45:=mp(<m>p,lessis(n,m),t42,t43):lessis(n,m)
-t46:=mp(<n>p,lessis(m,n),t41,t44):lessis(m,n)
-t47:=ore2(more(n,m),is(n,m),satz14(m,n,t46),satz10d(n,m,t45)):is(n,m)
-p@t48:=[x:nat][y:nat][u:min(x)][v:min(y)]t47(x,y,u,v):amone(nat,[x:nat]min(p,x))
--327
-s@satz27a:=onei(nat,[x:nat]min(p,x),t48".327",satz27):one([x:nat]min(p,x))
-+428
-x@[f:[y:nat]nat]
-prop1:=all([y:nat]is(<<y>suc>f,pl(<y>f,x))):'prop'
-prop2:=and(is(<1>f,x),prop1):'prop'
-x@[a:[y:nat]nat][b:[y:nat]nat][pa:prop2(a)][pb:prop2(b)][y:nat]
-prop3:=is(<y>a,<y>b):'prop'
-pb@t1:=ande1(is(<1>a,x),prop1(a),pa):is(<1>a,x)
-t2:=ande1(is(<1>b,x),prop1(b),pb):is(<1>b,x)
-t3:=tris2(nat,<1>a,<1>b,x,t1,t2):prop3(1)
-y@[p:prop3(y)]
-t4:=ispl1(<y>a,<y>b,x,p):is(pl(<y>a,x),pl(<y>b,x))
-t5:=ande2(is(<1>a,x),prop1(a),pa):prop1(a)
-t6:=ande2(is(<1>b,x),prop1(b),pb):prop1(b)
-t7:=<y>t5:is(<<y>suc>a,pl(<y>a,x))
-t8:=<y>t6:is(<<y>suc>b,pl(<y>b,x))
-t9:=tr3is(nat,<<y>suc>a,pl(<y>a,x),pl(<y>b,x),<<y>suc>b,t7,t4,symis(nat,<<y>suc>b,pl(<y>b,x),t8)):prop3(<y>suc)
-y@t10:=induction([z:nat]prop3(z),t3,[z:nat][u:prop3(z)]t9(z,u),y):prop3(y)
-pb@t11:=fisi(nat,nat,a,b,[y:nat]t10(y)):is"e"([y:nat]nat,a,b)
-x@a1:=[z:[y:nat]nat][u:[y:nat]nat][v:prop2(z)][w:prop2(u)]t11(z,u,v,w):amone([y:nat]nat,[z:[y:nat]nat]prop2(z))
-prop4:=some"l"([y:nat]nat,[z:[y:nat]nat]prop2(z)):'prop'
-@id:=[y:nat]y:[y:nat]nat
-t12:=[x:nat]satz4e(x):prop1(1,id)
-t13:=andi(is(<1>id,1),prop1(1,id),refis(nat,1),t12):prop2(1,id)
-t14:=somei([y:nat]nat,[z:[y:nat]nat]prop2(1,z),id,t13):prop4(1)
-x@[p:prop4(x)][f:[y:nat]nat][pf:prop2(f)]
-g:=[y:nat]pl(<y>f,y):[y:nat]nat
-t15:=ande1(is(<1>f,x),prop1(f),pf):is(<1>f,x)
-t16:=tris(nat,<1>g,pl(x,1),<x>suc,ispl1(<1>f,x,1,t15),satz4a(x)):is(<1>g,<x>suc)
-[y:nat]
-t17:=ande2(is(<1>f,x),prop1(f),pf):prop1(f)
-t18:=<y>t17:is(<<y>suc>f,pl(<y>f,x))
-t19:=tris(nat,<<y>suc>g,pl(pl(<y>f,x),<y>suc),pl(<y>f,pl(x,<y>suc)),ispl1(<<y>suc>f,pl(<y>f,x),<y>suc,t18),asspl1(<y>f,x,<y>suc)):is(<<y>suc>g,pl(<y>f,pl(x,<y>suc)))
-t20:=tr3is(nat,pl(x,<y>suc),<pl(x,y)>suc,pl(<x>suc,y),pl(y,<x>suc),satz4b(x,y),satz4h(x,y),compl(<x>suc,y)):is(pl(x,<y>suc),pl(y,<x>suc))
-t21:=tr3is(nat,<<y>suc>g,pl(<y>f,pl(x,<y>suc)),pl(<y>f,pl(y,<x>suc)),pl(<y>g,<x>suc),t19,ispl2(pl(x,<y>suc),pl(y,<x>suc),<y>f,t20),asspl2(<y>f,y,<x>suc)):is(<<y>suc>g,pl(<y>g,<x>suc))
-pf@t22:=[y:nat]t21(y):prop1(<x>suc,g)
-t23:=andi(is(<1>g,<x>suc),prop1(<x>suc,g),t16,t22):prop2(<x>suc,g)
-t24:=somei([y:nat]nat,[z:[y:nat]nat]prop2(<x>suc,z),g,t23):prop4(<x>suc)
-p@t25:=someapp([y:nat]nat,[z:[y:nat]nat]prop2(z),p,prop4(<x>suc),[z:[y:nat]nat][u:prop2(z)]t24(z,u)):prop4(<x>suc)
-x@b1:=induction([y:nat]prop4(y),t14,[y:nat][u:prop4(y)]t25(y,u),x):prop4(x)
--428
-x@satz28:=onei([y:nat]nat,[z:[y:nat]nat]prop2".428"(z),a1".428",b1".428"):one"e"([y:nat]nat,[z:[y:nat]nat]and(is(<1>z,x),all([y:nat]is(<<y>suc>z,pl(<y>z,x)))))
-times:=ind([y:nat]nat,[z:[y:nat]nat]prop2".428"(z),satz28):[y:nat]nat
-y@ts:=<y>times:nat
-+*428
-x@t26:=oneax([y:nat]nat,[z:[y:nat]nat]prop2(z),satz28):prop2(times)
--428
-x@satz28a:=ande1(is(<1>times,x),prop1".428"(times),t26".428"):is(ts(x,1),x)
-+*428
-x@t27:=ande2(is(<1>times,x),prop1(times),t26):prop1(times)
--428
-y@satz28b:=<y>t27".428":is(ts(x,<y>suc),pl(ts(x,y),x))
-+*428
-@t28:=t11(1,times(1),id,t26(1),t13):is"e"([y:nat]nat,times(1),id)
--428
-x@satz28c:=fise(nat,nat,times(1),id".428",t28".428",x):is(ts(1,x),x)
-+*428
-x@t29:=t11(<x>suc,times(<x>suc),[y:nat]pl(<y>times,y),t26(<x>suc),t23(b1,times,t26)):is"e"([y:nat]nat,times(<x>suc),[y:nat]pl(<y>times,y))
--428
-y@satz28d:=fise(nat,nat,times(<x>suc),[z:nat]pl(<z>times,z),t29".428",y):is(ts(<x>suc,y),pl(ts(x,y),y))
-x@satz28e:=symis(nat,ts(x,1),x,satz28a):is(x,ts(x,1))
-y@satz28f:=symis(nat,ts(x,<y>suc),pl(ts(x,y),x),satz28b):is(pl(ts(x,y),x),ts(x,<y>suc))
-x@satz28g:=symis(nat,ts(1,x),x,satz28c):is(x,ts(1,x))
-y@satz28h:=symis(nat,ts(<x>suc,y),pl(ts(x,y),y),satz28d):is(pl(ts(x,y),y),ts(<x>suc,y))
-z@[i:is(x,y)]
-ists1:=isf(nat,nat,[u:nat]ts(u,z),x,y,i):is(ts(x,z),ts(y,z))
-ists2:=isf(nat,nat,[u:nat]ts(z,u),x,y,i):is(ts(z,x),ts(z,y))
-z@[u:nat][i:is(x,y)][j:is(z,u)]
-ists12:=tris(nat,ts(x,z),ts(y,z),ts(y,u),ists1(i),ists2(z,u,y,j)):is(ts(x,z),ts(y,u))
-+429
-y@prop1:=is(ts(x,y),ts(y,x)):'prop'
-t1:=satz28a(y):is(ts(y,1),y)
-t2:=satz28c(y):is(ts(1,y),y)
-t3:=tris2(nat,ts(1,y),ts(y,1),y,t2,t1):prop1(1,y)
-[p:prop1(x,y)]
-t4:=tris(nat,pl(ts(x,y),y),pl(ts(y,x),y),ts(y,<x>suc),ispl1(ts(x,y),ts(y,x),y,p),satz28f(y,x)):is(pl(ts(x,y),y),ts(y,<x>suc))
-t5:=satz28d:is(ts(<x>suc,y),pl(ts(x,y),y))
-t6:=tris(nat,ts(<x>suc,y),pl(ts(x,y),y),ts(y,<x>suc),t5,t4):prop1(<x>suc,y)
--429
-y@satz29:=induction([z:nat]prop1".429"(z,y),t3".429",[z:nat][u:prop1".429"(z,y)]t6".429"(z,y,u),x):is(ts(x,y),ts(y,x))
-comts:=satz29:is(ts(x,y),ts(y,x))
-+*429
-x@t7:=tris(nat,ts(x,1),x,ts(1,x),satz28a,satz28g):prop1(1)
-y@[p:prop1(y)]
-t8:=tr3is(nat,ts(x,<y>suc),pl(ts(x,y),x),pl(ts(y,x),x),ts(<y>suc,x),satz28b(x,y),ispl1(ts(x,y),ts(y,x),x,p),satz28h(y,x)):prop1(<y>suc)
-y@anders:=induction([z:nat]prop1(z),t7,[z:nat][u:prop1(z)]t8(z,u),y):is(ts(x,y),ts(y,x))
--429
-+430
-z@prop1:=is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z))):'prop'
-y@t1:=tr3is(nat,ts(x,pl(y,1)),ts(x,<y>suc),pl(ts(x,y),x),pl(ts(x,y),ts(x,1)),ists2(pl(y,1),<y>suc,x,satz4a(y)),satz28b,ispl2(x,ts(x,1),ts(x,y),satz28e(x))):prop1(1)
-z@[p:prop1(z)]
-t2:=tr3is(nat,ts(x,pl(y,<z>suc)),ts(x,<pl(y,z)>suc),pl(ts(x,pl(y,z)),x),pl(pl(ts(x,y),ts(x,z)),x),ists2(pl(y,<z>suc),<pl(y,z)>suc,x,satz4b(y,z)),satz28b(x,pl(y,z)),ispl1(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)),x,p)):is(ts(x,pl(y,<z>suc)),pl(pl(ts(x,y),ts(x,z)),x))
-t3:=tr3is(nat,ts(x,pl(y,<z>suc)),pl(pl(ts(x,y),ts(x,z)),x),pl(ts(x,y),pl(ts(x,z),x)),pl(ts(x,y),ts(x,<z>suc)),t2,asspl1(ts(x,y),ts(x,z),x),ispl2(pl(ts(x,z),x),ts(x,<z>suc),ts(x,y),satz28f(x,z))):prop1(<z>suc)
--430
-z@satz30:=induction([u:nat]prop1".430"(u),t1".430",[u:nat][v:prop1".430"(u)]t3".430"(u,v),z):is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
-disttp1:=tr3is(nat,ts(pl(x,y),z),ts(z,pl(x,y)),pl(ts(z,x),ts(z,y)),pl(ts(x,z),ts(y,z)),comts(pl(x,y),z),satz30(z,x,y),ispl12(ts(z,x),ts(x,z),ts(z,y),ts(y,z),comts(z,x),comts(z,y))):is(ts(pl(x,y),z),pl(ts(x,z),ts(y,z)))
-disttp2:=satz30:is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
-distpt1:=symis(nat,ts(pl(x,y),z),pl(ts(x,z),ts(y,z)),disttp1):is(pl(ts(x,z),ts(y,z)),ts(pl(x,y),z))
-distpt2:=symis(nat,ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)),disttp2):is(pl(ts(x,y),ts(x,z)),ts(x,pl(y,z)))
-+431
-prop1:=is(ts(ts(x,y),z),ts(x,ts(y,z))):'prop'
-y@t1:=tris(nat,ts(ts(x,y),1),ts(x,y),ts(x,ts(y,1)),satz28a(ts(x,y)),ists2(y,ts(y,1),x,satz28e(y))):prop1(1)
-z@[p:prop1(z)]
-t2:=tr4is(nat,ts(ts(x,y),<z>suc),pl(ts(ts(x,y),z),ts(x,y)),pl(ts(x,ts(y,z)),ts(x,y)),ts(x,pl(ts(y,z),y)),ts(x,ts(y,<z>suc)),satz28b(ts(x,y),z),ispl1(ts(ts(x,y),z),ts(x,ts(y,z)),ts(x,y),p),distpt2(x,ts(y,z),y),ists2(pl(ts(y,z),y),ts(y,<z>suc),x,satz28f(y,z))):prop1(<z>suc)
--431
-satz31:=induction([u:nat]prop1".431"(u),t1".431",[u:nat][v:prop1".431"(u)]t2".431"(u,v),z):is(ts(ts(x,y),z),ts(x,ts(y,z)))
-assts1:=satz31:is(ts(ts(x,y),z),ts(x,ts(y,z)))
-assts2:=symis(nat,ts(ts(x,y),z),ts(x,ts(y,z)),assts1):is(ts(x,ts(y,z)),ts(ts(x,y),z))
-[m:more(x,y)]
-+432
-[u:nat][du:diffprop(u)]
-t1:=tris(nat,ts(x,z),ts(pl(y,u),z),pl(ts(y,z),ts(u,z)),ists1(x,pl(y,u),z,du),disttp1(y,u,z)):is(ts(x,z),pl(ts(y,z),ts(u,z)))
-t2:=somei(nat,[v:nat]diffprop(ts(x,z),ts(y,z),v),ts(u,z),t1):more(ts(x,z),ts(y,z))
--432
-satz32a:=someapp(nat,[u:nat]diffprop(u),m,more(ts(x,z),ts(y,z)),[u:nat][v:diffprop(u)]t2".432"(u,v)):more(ts(x,z),ts(y,z))
-z@[i:is(x,y)]
-satz32b:=ists1(x,y,z,i):is(ts(x,z),ts(y,z))
-z@[l:less(x,y)]
-satz32c:=satz11(ts(y,z),ts(x,z),satz32a(y,x,z,satz12(x,y,l))):less(ts(x,z),ts(y,z))
-+*432
-l@anders1:=satz32a(y,x,z,l):less(ts(x,z),ts(y,z))
--432
-m@satz32d:=ismore12(ts(x,z),ts(z,x),ts(y,z),ts(z,y),comts(x,z),comts(y,z),satz32a):more(ts(z,x),ts(z,y))
-i@satz32e:=ists2(x,y,z,i):is(ts(z,x),ts(z,y))
-l@satz32f:=isless12(ts(x,z),ts(z,x),ts(y,z),ts(z,y),comts(x,z),comts(y,z),satz32c):less(ts(z,x),ts(z,y))
-+*432
-l@anders2:=satz32d(y,x,z,l):less(ts(z,x),ts(z,y))
--432
-z@[u:nat][i:is(x,y)][m:more(z,u)]
-satz32g:=ismore2(ts(x,u),ts(y,u),ts(x,z),ists1(x,y,u,i),satz32d(z,u,x,m)):more(ts(x,z),ts(y,u))
-satz32h:=ismore12(ts(x,z),ts(z,x),ts(y,u),ts(u,y),comts(x,z),comts(y,u),satz32g):more(ts(z,x),ts(u,y))
-i@[l:less(z,u)]
-satz32j:=isless2(ts(x,u),ts(y,u),ts(x,z),ists1(x,y,u,i),satz32f(z,u,x,l)):less(ts(x,z),ts(y,u))
-satz32k:=isless12(ts(x,z),ts(z,x),ts(y,u),ts(u,y),comts(x,z),comts(y,u),satz32j):less(ts(z,x),ts(u,y))
-z@[m:moreis(x,y)]
-+*432
-m@[n:more(x,y)]
-t3:=moreisi1(ts(x,z),ts(y,z),satz32a(n)):moreis(ts(x,z),ts(y,z))
-m@[i:is(x,y)]
-t4:=moreisi2(ts(x,z),ts(y,z),ists1(x,y,z,i)):moreis(ts(x,z),ts(y,z))
--432
-m@satz32l:=orapp(more(x,y),is(x,y),moreis(ts(x,z),ts(y,z)),m,[u:more(x,y)]t3".432"(u),[u:is(x,y)]t4".432"(u)):moreis(ts(x,z),ts(y,z))
-satz32m:=ismoreis12(ts(x,z),ts(z,x),ts(y,z),ts(z,y),comts(x,z),comts(y,z),satz32l):moreis(ts(z,x),ts(z,y))
-z@[l:lessis(x,y)]
-satz32n:=satz13(ts(y,z),ts(x,z),satz32l(y,x,z,satz14(l))):lessis(ts(x,z),ts(y,z))
-satz32o:=satz13(ts(z,y),ts(z,x),satz32m(y,x,z,satz14(l))):lessis(ts(z,x),ts(z,y))
-+433
-z@t1:=satz10a(x,y):or3(is(x,y),more(x,y),less(x,y))
-t2:=satz10b(ts(x,z),ts(y,z)):ec3(is(ts(x,z),ts(y,z)),more(ts(x,z),ts(y,z)),less(ts(x,z),ts(y,z)))
--433
-z@[m:more(ts(x,z),ts(y,z))]
-satz33a:=th11"l.ec3"(is(x,y),more(x,y),less(x,y),is(ts(x,z),ts(y,z)),more(ts(x,z),ts(y,z)),less(ts(x,z),ts(y,z)),t1".433",t2".433",[u:is(x,y)]satz32b(x,y,z,u),[u:more(x,y)]satz32a(x,y,z,u),[u:less(x,y)]satz32c(x,y,z,u),m):more(x,y)
-z@[i:is(ts(x,z),ts(y,z))]
-satz33b:=th10"l.ec3"(is(x,y),more(x,y),less(x,y),is(ts(x,z),ts(y,z)),more(ts(x,z),ts(y,z)),less(ts(x,z),ts(y,z)),t1".433",t2".433",[u:is(x,y)]satz32b(x,y,z,u),[u:more(x,y)]satz32a(x,y,z,u),[u:less(x,y)]satz32c(x,y,z,u),i):is(x,y)
-z@[l:less(ts(x,z),ts(y,z))]
-satz33c:=th12"l.ec3"(is(x,y),more(x,y),less(x,y),is(ts(x,z),ts(y,z)),more(ts(x,z),ts(y,z)),less(ts(x,z),ts(y,z)),t1".433",t2".433",[u:is(x,y)]satz32b(x,y,z,u),[u:more(x,y)]satz32a(x,y,z,u),[u:less(x,y)]satz32c(x,y,z,u),l):less(x,y)
-+*433
-l@anders:=satz33a(y,x,z,l):less(x,y)
--433
-u@[m:more(x,y)][n:more(z,u)]
-+434
-t1:=satz32a(x,y,z,m):more(ts(x,z),ts(y,z))
-t2:=ismore12(ts(z,y),ts(y,z),ts(u,y),ts(y,u),comts(z,y),comts(u,y),satz32a(z,u,y,n)):more(ts(y,z),ts(y,u))
--434
-satz34:=trmore(ts(x,z),ts(y,z),ts(y,u),t1".434",t2".434"):more(ts(x,z),ts(y,u))
-+*434
-n@anders:=trmore(ts(x,z),ts(y,z),ts(y,u),satz32a(x,y,z,m),satz32d(z,u,y,n)):more(ts(x,z),ts(y,u))
--434
-u@[l:less(x,y)][k:less(z,u)]
-satz34a:=satz34(y,x,u,z,l,k):less(ts(x,z),ts(y,u))
-+*434
-k@andersa:=satz11(ts(y,u),ts(x,z),satz34(y,x,u,z,satz12(x,y,l),satz12(z,u,k))):less(ts(x,z),ts(y,u))
--434
-u@[m:moreis(x,y)][n:more(z,u)]
-satz35a:=orapp(more(x,y),is(x,y),more(ts(x,z),ts(y,u)),m,[v:more(x,y)]satz34(v,n),[v:is(x,y)]satz32g(u,v,n)):more(ts(x,z),ts(y,u))
-u@[m:more(x,y)][n:moreis(z,u)]
-satz35b:=orapp(more(z,u),is(z,u),more(ts(x,z),ts(y,u)),n,[v:more(z,u)]satz34(m,v),[v:is(z,u)]satz32h(z,u,x,y,v,m)):more(ts(x,z),ts(y,u))
-u@[l:lessis(x,y)][k:less(z,u)]
-satz35c:=satz35a(y,x,u,z,satz14(x,y,l),k):less(ts(x,z),ts(y,u))
-u@[l:less(x,y)][k:lessis(z,u)]
-satz35d:=satz35b(y,x,u,z,l,satz14(z,u,k)):less(ts(x,z),ts(y,u))
-u@[m:moreis(x,y)][n:moreis(z,u)]
-+436
-[i:is(x,y)][j:is(z,u)]
-t1:=moreisi2(ts(x,z),ts(y,u),tris(nat,ts(x,z),ts(y,z),ts(y,u),ists1(x,y,z,i),ists2(z,u,y,j))):moreis(ts(x,z),ts(y,u))
-i@[o:more(z,u)]
-t2:=moreisi1(ts(x,z),ts(y,u),satz35a(m,o)):moreis(ts(x,z),ts(y,u))
-i@t3:=orapp(more(z,u),is(z,u),moreis(ts(x,z),ts(y,u)),n,[v:more(z,u)]t2(v),[v:is(z,u)]t1(v)):moreis(ts(x,z),ts(y,u))
-n@[o:more(x,y)]
-t4:=moreisi1(ts(x,z),ts(y,u),satz35b(o,n)):moreis(ts(x,z),ts(y,u))
--436
-satz36:=orapp(more(x,y),is(x,y),moreis(ts(x,z),ts(y,u)),m,[v:more(x,y)]t4".436"(v),[v:is(x,y)]t3".436"(v)):moreis(ts(x,z),ts(y,u))
-+*436
-n@[o:more(x,y)]
-t5:=moreisi1(ts(x,z),ts(y,u),satz35b(o,n)):moreis(ts(x,z),ts(y,u))
-n@[i:is(x,y)]
-t6:=ismoreis2(ts(x,u),ts(y,u),ts(x,z),ists1(u,i),satz32m(z,u,x,n)):moreis(ts(x,z),ts(y,u))
-n@anders:=orapp(more(x,y),is(x,y),moreis(ts(x,z),ts(y,u)),m,[v:more(x,y)]t5(v),[v:is(x,y)]t6(v)):moreis(ts(x,z),ts(y,u))
--436
-u@[l:lessis(x,y)][k:lessis(z,u)]
-satz36a:=satz13(ts(y,u),ts(x,z),satz36(y,x,u,z,satz14(l),satz14(z,u,k))):lessis(ts(x,z),ts(y,u))
-y@[m:more(x,y)]
-+mn
-t1:=onei(nat,[z:nat]diffprop(x,y,z),satz8b(x,y),m):one([z:nat]diffprop(x,y,z))
--mn
-mn:=ind(nat,[z:nat]diffprop(x,y,z),t1".mn"):nat
-+*mn
-m@th1a:=oneax(nat,[z:nat]diffprop(x,y,z),t1):is(x,pl(y,mn(x,y,m)))
-th1b:=symis(nat,x,pl(y,mn(x,y,m)),th1a):is(pl(y,mn(x,y,m)),x)
-th1c:=tris(nat,x,pl(y,mn(x,y,m)),pl(mn(x,y,m),y),th1a,compl(y,mn(x,y,m))):is(x,pl(mn(x,y,m),y))
-th1d:=symis(nat,x,pl(mn(x,y,m),y),th1c):is(pl(mn(x,y,m),y),x)
-y@[z:nat][m:more(x,y)][i:is(pl(y,z),x)]
-th1e:=<th1a(m)><symis(nat,pl(y,z),x,i)><mn(x,y,m)><z>satz8b(x,y):is(z,mn(x,y,m))
--mn
-z@[u:nat][m:more(x,z)][n:more(y,u)][i:is(x,y)][j:is(z,u)]
-+*mn
-j@t2:=tr3is(nat,pl(u,mn(x,z,m)),pl(z,mn(x,z,m)),x,y,ispl1(u,z,mn(x,z,m),symis(nat,z,u,j)),th1b(x,z,m),i):is(pl(u,mn(x,z,m)),y)
--mn
-j@ismn12:=th1e".mn"(y,u,mn(x,z,m),n,t2".mn"):is(mn(x,z,m),mn(y,u,n))
-@[n:nat]
-1to:=ot(nat,[x:nat]lessis(x,n)):'type'
-[x:nat][l:lessis(x,n)]
-outn:=out(nat,[y:nat]lessis(y,n),x,l):1to(n)
-n@[xn:1to(n)]
-inn:=in"e"(nat,[y:nat]lessis(y,n),xn):nat
-1top:=inp(nat,[y:nat]lessis(y,n),xn):lessis(inn,n)
-l@[y:nat][k:lessis(y,n)][i:is(x,y)]
-isoutni:=isouti(nat,[z:nat]lessis(z,n),x,l,y,k,i):is"e"(1to(n),outn(x,l),outn(y,k))
-k@[i:is"e"(1to(n),outn(x,l),outn(y,k))]
-isoutne:=isoute(nat,[z:nat]lessis(z,n),x,l,y,k,i):is(x,y)
-xn@[yn:1to(n)][i:is"e"(1to(n),xn,yn)]
-isinni:=isini(nat,[z:nat]lessis(z,n),xn,yn,i):is(inn(xn),inn(yn))
-yn@[i:is(inn(xn),inn(yn))]
-isinne:=isine(nat,[z:nat]lessis(z,n),xn,yn,i):is"e"(1to(n),xn,yn)
-xn@isoutinn:=isoutin(nat,[y:nat]lessis(y,n),xn):is"e"(1to(n),xn,outn(inn(xn),1top(xn)))
-l@isinoutn:=isinout(nat,[y:nat]lessis(y,n),x,l):is(x,inn(outn(x,l)))
-@1o:=outn(1,1,lessisi2(1,1,refis(nat,1))):1to(1)
-[u:1to(1)]
-+singlet
-u0:=inn(1,u):nat
-t1:=1top(1,u):lessis(u0,1)
-t2:=ore2(more(u0,1),is(u0,1),satz24(u0),satz10d(u0,1,t1)):is(u0,1)
-th1:=tris(1to(1),u,outn(1,u0,t1),1o,isoutinn(1,u),isoutni(1,u0,t1,1,lessisi2(1,1,refis(nat,1)),t2)):is"e"(1to(1),u,1o)
--singlet
-@2:=pl(1,1):nat
-[x:nat]
-+pair
-[l:lessis(x,2)][n:nis(x,2)]
-t1:=satz26(1,x,ore1(less(x,2),is(x,2),l,n)):lessis(x,1)
-t2:=ore2(more(x,1),is(x,1),satz24(x),satz10d(x,1,t1)):is(x,1)
-l@th1:=th2"l.or"(is(x,1),is(x,2),[t:nis(x,2)]t2(t)):or(is(x,1),is(x,2))
-@th2:=th1"e.notis"(nat,<1>suc,1,2,<1>ax3,satz4e(1)):nis(2,1)
--pair
-@1t:=outn(2,1,satz24a(2)):1to(2)
-2t:=outn(2,2,lessisi2(2,2,refis(nat,2))):1to(2)
-+*pair
-@[u:1to(2)]
-u0:=inn(2,u):nat
-t3:=1top(2,u):lessis(u0,2)
-[i:is(u0,1)]
-t4:=isoutni(2,u0,t3,1,satz24a(2),i):is"e"(1to(2),outn(2,u0,t3),1t)
-t5:=tris(1to(2),u,outn(2,u0,t3),1t,isoutinn(2,u),t4):is"e"(1to(2),u,1t)
-u@[i:is(u0,2)]
-t6:=isoutni(2,u0,t3,2,lessisi2(2,2,refis(nat,2)),i):is"e"(1to(2),outn(2,u0,t3),2t)
-t7:=tris(1to(2),u,outn(2,u0,t3),2t,isoutinn(2,u),t6):is"e"(1to(2),u,2t)
-u@th3:=th9"l.or"(is(u0,1),is(u0,2),is"e"(1to(2),u,1t),is"e"(1to(2),u,2t),th1(u0,t3),[t:is(u0,1)]t5(t),[t:is(u0,2)]t7(t)):or(is"e"(1to(2),u,1t),is"e"(1to(2),u,2t))
-@[i:is"e"(1to(2),2t,1t)]
-t9:=isini(nat,[x:nat]lessis(x,2),2t,1t,i):is(u0(2t),u0(1t))
-t10:=tr3is(nat,2,u0(2t),u0(1t),1,isinoutn(2,2,lessisi2(2,2,refis(nat,2))),t9,symis(nat,1,u0(1t),isinoutn(2,1,satz24a(2)))):is(2,1)
-@th4:=th3"l.imp"(is"e"(1to(2),2t,1t),is(2,1),th2,[t:is"e"(1to(2),2t,1t)]t10(t)):not(is"e"(1to(2),2t,1t))
--pair
-@[alpha:'type']
-pair1type:=[x:1to(2)]alpha:'type'
-[a:alpha][b:alpha]
-pair1:=[x:1to(2)]ite(is"e"(1to(2),x,1t),alpha,a,b):pair1type
-alpha@[p:pair1type]
-first1:=<1t>p:alpha
-second1:=<2t>p:alpha
-b@first1is1:=itet(is"e"(1to(2),1t,1t),alpha,a,b,refis(1to(2),1t)):is"e"(alpha,first1(pair1),a)
-first1is2:=symis(alpha,first1(pair1),a,first1is1):is"e"(alpha,a,first1(pair1))
-second1is1:=itef(is"e"(1to(2),2t,1t),alpha,a,b,th4".pair"):is"e"(alpha,second1(pair1),b)
-second1is2:=symis(alpha,second1(pair1),b,second1is1):is"e"(alpha,b,second1(pair1))
-+*pair
-p@[q:pair1type][i:is"e"(alpha,first1(p),first1(q))][j:is"e"(alpha,second1(p),second1(q))][u:1to(2)][u1:is"e"(1to(2),u,1t)]
-t11:=isf(1to(2),alpha,p,u,1t,u1):is"e"(alpha,<u>p,first1(p))
-t12:=symis(alpha,<u>q,first1(q),isf(1to(2),alpha,q,u,1t,u1)):is"e"(alpha,first1(q),<u>q)
-t13:=tr3is(alpha,<u>p,first1(p),first1(q),<u>q,t11,i,t12):is"e"(alpha,<u>p,<u>q)
-u@[u2:is"e"(1to(2),u,2t)]
-t14:=isf(1to(2),alpha,p,u,2t,u2):is"e"(alpha,<u>p,second1(p))
-t15:=symis(alpha,<u>q,second1(q),isf(1to(2),alpha,q,u,2t,u2)):is"e"(alpha,second1(q),<u>q)
-t16:=tr3is(alpha,<u>p,second1(p),second1(q),<u>q,t14,j,t15):is"e"(alpha,<u>p,<u>q)
-u@t17:=orapp(is"e"(1to(2),u,1t),is"e"(1to(2),u,2t),is"e"(alpha,<u>p,<u>q),th3(u),[t:is"e"(1to(2),u,1t)]t13(t),[t:is"e"(1to(2),u,2t)]t16(t)):is"e"(alpha,<u>p,<u>q)
-j@th5:=fisi(1to(2),alpha,p,q,[t:1to(2)]t17(t)):is"e"(pair1type,p,q)
-p@q0:=pair1(first1,second1):pair1type
-t18:=first1is1(first1(p),second1):is"e"(alpha,first1(q0),first1(p))
-t19:=second1is1(first1,second1):is"e"(alpha,second1(q0),second1(p))
--pair
-p@pair1is1:=th5".pair"(q0".pair",p,t18".pair",t19".pair"):is"e"(pair1type,pair1(first1,second1),p)
-pair1is2:=symis(pair1type,pair1(first1,second1),p,pair1is1):is"e"(pair1type,p,pair1(first1,second1))
-@[x:nat]
-lessisi3:=lessisi2(x,x,refis(nat,x)):lessis(x,x)
-1out:=outn(x,1,satz24a(x)):1to(x)
-xout:=outn(x,x,lessisi3(x)):1to(x)
-[y:nat][l:lessis(y,x)][u:1to(y)]
-+left
-ui:=inn(y,u):nat
-t1:=1top(y,u):lessis(ui,y)
-t2:=trlessis(ui,y,x,t1,l):lessis(ui,x)
--left
-left1to:=outn(x,ui".left",t2".left"):1to(x)
-[v:1to(y)][i:is"e"(1to(x),left1to(u),left1to(v))]
-+*left
-i@t3:=isoutne(x,ui,t2,ui(v),t2(v),i):is(ui,ui(v))
--left
-i@thleft1:=isinne(y,u,v,t3".left"):is"e"(1to(y),u,v)
-l@thleft2:=[u:1to(y)][v:1to(y)][t:is"e"(1to(x),left1to(u),left1to(v))]thleft1(u,v,t):injective(1to(y),1to(x),[t:1to(y)]left1to(t))
-y@[u:1to(y)]
-+right
-ui:=inn(y,u):nat
-t4:=1top(y,u):lessis(ui,y)
-t5:=satz19o(ui,y,x,t4):lessis(pl(x,ui),pl(x,y))
--right
-right1to:=outn(pl(x,y),pl(x,ui".right"),t5".right"):1to(pl(x,y))
-[v:1to(y)][i:is"e"(1to(pl(x,y)),right1to(u),right1to(v))]
-+*right
-i@t6:=isoutne(pl(x,y),pl(x,ui(u)),t5(u),pl(x,ui(v)),t5(v),i):is(pl(x,ui(u)),pl(x,ui(v)))
-t7:=satz20e(ui(u),ui(v),x,t6):is(ui(u),ui(v))
--right
-i@thright1:=isinne(y,u,v,t7".right"):is"e"(1to(y),u,v)
-@[alpha:'type'][x:nat][y:nat][l:lessis(y,x)][f:[t:1to(x)]alpha]
-left:=[t:1to(y)]<left1to(x,y,l,t)>f:[t:1to(y)]alpha
-y@[f:[t:1to(pl(x,y))]alpha]
-right:=[t:1to(y)]<right1to(x,y,t)>f:[t:1to(y)]alpha
-y@[i:is(y,x)][f:[t:1to(y)]alpha]
-+*left
-f@t4:=lessisi2(y,x,i):lessis(y,x)
-t5:=lessisi2(x,y,symis(nat,y,x,i)):lessis(x,y)
-f1:=left(y,x,t5,f):[t:1to(x)]alpha
-f2:=left(t4,f1):[t:1to(y)]alpha
-[u:1to(y)]
-t6:=isinoutn(x,inn(y,u),trlessis(inn(y,u),y,x,1top(y,u),t4)):is(inn(y,u),inn(x,left1to(x,y,t4,u)))
-t7:=tris(1to(y),u,outn(y,inn(y,u),1top(y,u)),left1to(y,x,t5,left1to(x,y,t4,u)),isoutinn(y,u),isoutni(y,inn(y,u),1top(y,u),inn(x,left1to(x,y,t4,u)),trlessis(inn(x,left1to(x,y,t4,u)),x,y,1top(x,left1to(x,y,t4,u)),t5),t6)):is"e"(1to(y),u,left1to(y,x,t5,left1to(x,y,t4,u)))
-t8:=isf(1to(y),alpha,f,u,left1to(y,x,t5,left1to(x,y,t4,u)),t7):is"e"(alpha,<u>f,<u>f2)
--left
-f@thleft:=fisi(1to(y),alpha,f,f2".left",[t:1to(y)]t8".left"(t)):is"e"([t:1to(y)]alpha,f,left(x,y,lessisi2(y,x,i),left(y,x,lessisi2(x,y,symis(nat,y,x,i)),f)))
-@frac:=pair1type(nat):'type'
-[x1:nat][x2:nat]
-fr:=pair1(nat,x1,x2):frac
-@[x:frac]
-num:=first1(nat,x):nat
-den:=second1(nat,x):nat
-x2@numis:=first1is1(nat,x1,x2):is(num(fr(x1,x2)),x1)
-isnum:=first1is2(nat,x1,x2):is(x1,num(fr(x1,x2)))
-denis:=second1is1(nat,x1,x2):is(den(fr(x1,x2)),x2)
-isden:=second1is2(nat,x1,x2):is(x2,den(fr(x1,x2)))
-x@1x:=num(x):nat
-2x:=den(x):nat
-fris:=pair1is1(nat,x):is"e"(frac,fr(1x,2x),x)
-isfr:=pair1is2(nat,x):is"e"(frac,x,fr(1x,2x))
-x2@[y1:nat][y2:nat]
-12isnd:=ists12(x1,num(fr(x1,x2)),y2,den(fr(y1,y2)),isnum(x1,x2),isden(y1,y2)):is(ts(x1,y2),ts(num(fr(x1,x2)),den(fr(y1,y2))))
-ndis12:=symis(nat,ts(x1,y2),ts(num(fr(x1,x2)),den(fr(y1,y2))),12isnd):is(ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(x1,y2))
-x@[n1:nat][n2:nat]
-1disnd:=ists1(n1,num(fr(n1,n2)),2x,isnum(n1,n2)):is(ts(n1,2x),ts(num(fr(n1,n2)),2x))
-ndis1d:=symis(nat,ts(n1,2x),ts(num(fr(n1,n2)),2x),1disnd):is(ts(num(fr(n1,n2)),2x),ts(n1,2x))
-n2isnd:=ists2(n2,den(fr(n1,n2)),1x,isden(n1,n2)):is(ts(1x,n2),ts(1x,den(fr(n1,n2))))
-ndisn2:=symis(nat,ts(1x,n2),ts(1x,den(fr(n1,n2))),n2isnd):is(ts(1x,den(fr(n1,n2))),ts(1x,n2))
-x2@[n:nat][i:is(x1,n)]
-isn:=isf(nat,frac,[t:nat]fr(t,x2),x1,n,i):is"e"(frac,fr(x1,x2),fr(n,x2))
-n@[i:is(x2,n)]
-isd:=isf(nat,frac,[t:nat]fr(x1,t),x2,n,i):is"e"(frac,fr(x1,x2),fr(x1,n))
-y2@[i:is(x1,y1)][j:is(x2,y2)]
-isnd:=tris(frac,fr(x1,x2),fr(y1,x2),fr(y1,y2),isn(x1,x2,y1,i),isd(y1,x2,y2,j)):is"e"(frac,fr(x1,x2),fr(y1,y2))
-x@[y:frac]
-1y:=num(y):nat
-2y:=den(y):nat
-eq:=is(ts(1x,2y),ts(1y,2x)):'prop'
-y2@[i:is(ts(x1,y2),ts(y1,x2))]
-eqi12:=tr3is(nat,ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(x1,y2),ts(y1,x2),ts(num(fr(y1,y2)),den(fr(x1,x2))),ndis12(x1,x2,y1,y2),i,12isnd(y1,y2,x1,x2)):eq(fr(x1,x2),fr(y1,y2))
-n2@[i:is(ts(1x,n2),ts(n1,2x))]
-eqi1:=isp(frac,[t:frac]eq(t,fr(n1,n2)),fr(1x,2x),x,eqi12(1x,2x,n1,n2,i),fris):eq(x,fr(n1,n2))
-n2@[i:is(ts(n1,2x),ts(1x,n2))]
-eqi2:=isp(frac,[t:frac]eq(fr(n1,n2),t),fr(1x,2x),x,eqi12(n1,n2,1x,2x,i),fris):eq(fr(n1,n2),x)
-x@satz37:=refis(nat,ts(1x,2x)):eq(x,x)
-refeq:=satz37:eq(x,x)
-y@[i:is"e"(frac,x,y)]
-refeq1:=isp(frac,[t:frac]eq(x,t),x,y,refeq,i):eq(x,y)
-refeq2:=isp(frac,[t:frac]eq(t,x),x,y,refeq,i):eq(y,x)
-y2@[i:is(x1,y1)][j:is(x2,y2)]
-eqnd:=refeq1(fr(x1,x2),fr(y1,y2),isnd(i,j)):eq(fr(x1,x2),fr(y1,y2))
-x2@[n:nat][i:is(x1,n)]
-eqn:=refeq1(fr(x1,x2),fr(n,x2),isn(n,i)):eq(fr(x1,x2),fr(n,x2))
-n@[i:is(x2,n)]
-eqd:=refeq1(fr(x1,x2),fr(x1,n),isd(n,i)):eq(fr(x1,x2),fr(x1,n))
-y@[e:eq(x,y)]
-satz38:=symis(nat,ts(1x,2y),ts(1y,2x),e):eq(y,x)
-symeq:=satz38:eq(y,x)
-@[a:nat][b:nat][c:nat][d:nat]
-+ii1
-t1:=tris(nat,ts(b,ts(c,d)),ts(ts(b,c),d),ts(d,ts(b,c)),assts2(b,c,d),comts(ts(b,c),d)):is(ts(b,ts(c,d)),ts(d,ts(b,c)))
--ii1
-stets:=tr4is(nat,ts(ts(a,b),ts(c,d)),ts(a,ts(b,ts(c,d))),ts(a,ts(d,ts(b,c))),ts(ts(a,d),ts(b,c)),ts(ts(a,d),ts(c,b)),assts1(a,b,ts(c,d)),ists2(ts(b,ts(c,d)),ts(d,ts(b,c)),a,t1".ii1"),assts2(a,d,ts(b,c)),ists2(ts(b,c),ts(c,b),ts(a,d),comts(b,c))):is(ts(ts(a,b),ts(c,d)),ts(ts(a,d),ts(c,b)))
-+*ii1
-d@t2:=tr3is(nat,ts(b,ts(c,d)),ts(ts(c,d),b),ts(ts(d,c),b),ts(d,ts(c,b)),comts(b,ts(c,d)),ists1(ts(c,d),ts(d,c),b,comts(c,d)),assts1(d,c,b)):is(ts(b,ts(c,d)),ts(d,ts(c,b)))
-anders:=tr3is(nat,ts(ts(a,b),ts(c,d)),ts(a,ts(b,ts(c,d))),ts(a,ts(d,ts(c,b))),ts(ts(a,d),ts(c,b)),assts1(a,b,ts(c,d)),ists2(ts(b,ts(c,d)),ts(d,ts(c,b)),a,t2),assts2(a,d,ts(c,b))):is(ts(ts(a,b),ts(c,d)),ts(ts(a,d),ts(c,b)))
--ii1
-y@[z:frac]
-1z:=num(z):nat
-2z:=den(z):nat
-[e:eq(x,y)][f:eq(y,z)]
-+139
-t1:=ists12(ts(1x,2y),ts(1y,2x),ts(1y,2z),ts(1z,2y),e,f):is(ts(ts(1x,2y),ts(1y,2z)),ts(ts(1y,2x),ts(1z,2y)))
-t2:=stets(1x,2y,1y,2z):is(ts(ts(1x,2y),ts(1y,2z)),ts(ts(1x,2z),ts(1y,2y)))
-t3:=tris(nat,ts(ts(1y,2x),ts(1z,2y)),ts(ts(1y,2y),ts(1z,2x)),ts(ts(1z,2x),ts(1y,2y)),stets(1y,2x,1z,2y),comts(ts(1y,2y),ts(1z,2x))):is(ts(ts(1y,2x),ts(1z,2y)),ts(ts(1z,2x),ts(1y,2y)))
-t4:=tr3is(nat,ts(ts(1x,2z),ts(1y,2y)),ts(ts(1x,2y),ts(1y,2z)),ts(ts(1y,2x),ts(1z,2y)),ts(ts(1z,2x),ts(1y,2y)),symis(nat,ts(ts(1x,2y),ts(1y,2z)),ts(ts(1x,2z),ts(1y,2y)),t2),t1,t3):is(ts(ts(1x,2z),ts(1y,2y)),ts(ts(1z,2x),ts(1y,2y)))
--139
-satz39:=satz33b(ts(1x,2z),ts(1z,2x),ts(1y,2y),t4".139"):eq(x,z)
-+*139
-f@anders:=tr4is(nat,ts(ts(1x,2z),ts(1y,2y)),ts(ts(1x,2y),ts(1y,2z)),ts(ts(1y,2x),ts(1z,2y)),ts(ts(1y,2y),ts(1z,2x)),ts(ts(1z,2x),ts(1y,2y)),stets(1x,2z,1y,2y),ists12(ts(1x,2y),ts(1y,2x),ts(1y,2z),ts(1z,2y),e,f),stets(1y,2x,1z,2y),comts(ts(1y,2y),ts(1z,2x))):is(ts(ts(1x,2z),ts(1y,2y)),ts(ts(1z,2x),ts(1y,2y)))
--139
-f@treq:=satz39:eq(x,z)
-z@[e:eq(z,x)][f:eq(z,y)]
-treq1:=treq(x,z,y,symeq(z,x,e),f):eq(x,y)
-z@[e:eq(x,z)][f:eq(y,z)]
-treq2:=treq(x,z,y,e,symeq(y,z,f)):eq(x,y)
-z@[u:frac][e:eq(x,y)][f:eq(y,z)][g:eq(z,u)]
-tr3eq:=treq(x,y,u,e,treq(y,z,u,f,g)):eq(x,u)
-u@[v:frac][e:eq(x,y)][f:eq(y,z)][g:eq(z,u)][h:eq(u,v)]
-tr4eq:=tr3eq(x,y,z,v,e,f,treq(z,u,v,g,h)):eq(x,v)
-x@[n:nat]
-satz40:=eqi1(ts(1x,n),ts(2x,n),tris(nat,ts(1x,ts(2x,n)),ts(1x,ts(n,2x)),ts(ts(1x,n),2x),ists2(ts(2x,n),ts(n,2x),1x,comts(2x,n)),assts2(1x,n,2x))):eq(x,fr(ts(1x,n),ts(2x,n)))
-satz40a:=symeq(x,fr(ts(1x,n),ts(2x,n)),satz40):eq(fr(ts(1x,n),ts(2x,n)),x)
-x2@[n:nat]
-satz40b:=eqi12(ts(x1,n),ts(x2,n),tris(nat,ts(x1,ts(x2,n)),ts(x1,ts(n,x2)),ts(ts(x1,n),x2),ists2(ts(x2,n),ts(n,x2),x1,comts(x2,n)),assts2(x1,n,x2))):eq(fr(x1,x2),fr(ts(x1,n),ts(x2,n)))
-satz40c:=symeq(fr(x1,x2),fr(ts(x1,n),ts(x2,n)),satz40b):eq(fr(ts(x1,n),ts(x2,n)),fr(x1,x2))
-y@moref:=more(ts(1x,2y),ts(1y,2x)):'prop'
-lessf:=less(ts(1x,2y),ts(1y,2x)):'prop'
-y2@[m:more(ts(x1,y2),ts(y1,x2))]
-morefi12:=ismore12(ts(x1,y2),ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(y1,x2),ts(num(fr(y1,y2)),den(fr(x1,x2))),12isnd(x1,x2,y1,y2),12isnd(y1,y2,x1,x2),m):moref(fr(x1,x2),fr(y1,y2))
-y2@[l:less(ts(x1,y2),ts(y1,x2))]
-lessfi12:=isless12(ts(x1,y2),ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(y1,x2),ts(num(fr(y1,y2)),den(fr(x1,x2))),12isnd(x1,x2,y1,y2),12isnd(y1,y2,x1,x2),l):lessf(fr(x1,x2),fr(y1,y2))
-n2@[m:more(ts(1x,n2),ts(n1,2x))]
-morefi1:=ismore12(ts(1x,n2),ts(1x,den(fr(n1,n2))),ts(n1,2x),ts(num(fr(n1,n2)),2x),n2isnd(x,n1,n2),1disnd(x,n1,n2),m):moref(x,fr(n1,n2))
-n2@[m:more(ts(n1,2x),ts(1x,n2))]
-morefi2:=ismore12(ts(n1,2x),ts(num(fr(n1,n2)),2x),ts(1x,n2),ts(1x,den(fr(n1,n2))),1disnd(x,n1,n2),n2isnd(x,n1,n2),m):moref(fr(n1,n2),x)
-n2@[l:less(ts(1x,n2),ts(n1,2x))]
-lessfi1:=isless12(ts(1x,n2),ts(1x,den(fr(n1,n2))),ts(n1,2x),ts(num(fr(n1,n2)),2x),n2isnd(x,n1,n2),1disnd(x,n1,n2),l):lessf(x,fr(n1,n2))
-n2@[l:less(ts(n1,2x),ts(1x,n2))]
-lessfi2:=isless12(ts(n1,2x),ts(num(fr(n1,n2)),2x),ts(1x,n2),ts(1x,den(fr(n1,n2))),1disnd(x,n1,n2),n2isnd(x,n1,n2),l):lessf(fr(n1,n2),x)
-y@satz41:=satz10(ts(1x,2y),ts(1y,2x)):orec3(eq(x,y),moref(x,y),lessf(x,y))
-satz41a:=satz10a(ts(1x,2y),ts(1y,2x)):or3(eq(x,y),moref(x,y),lessf(x,y))
-satz41b:=satz10b(ts(1x,2y),ts(1y,2x)):ec3(eq(x,y),moref(x,y),lessf(x,y))
-[m:moref(x,y)]
-satz42:=satz11(ts(1x,2y),ts(1y,2x),m):lessf(y,x)
-y@[l:lessf(x,y)]
-satz43:=satz12(ts(1x,2y),ts(1y,2x),l):moref(y,x)
-u@1u:=num(u):nat
-2u:=den(u):nat
-[m:moref(x,y)][e:eq(x,z)][f:eq(y,u)]
-+244
-t1:=ists12(ts(1y,2u),ts(1u,2y),ts(1z,2x),ts(1x,2z),f,symeq(x,z,e)):is(ts(ts(1y,2u),ts(1z,2x)),ts(ts(1u,2y),ts(1x,2z)))
-t2:=tr3is(nat,ts(ts(1y,2x),ts(1z,2u)),ts(ts(1y,2u),ts(1z,2x)),ts(ts(1u,2y),ts(1x,2z)),ts(ts(1u,2z),ts(1x,2y)),stets(1y,2x,1z,2u),t1,stets(1u,2y,1x,2z)):is(ts(ts(1y,2x),ts(1z,2u)),ts(ts(1u,2z),ts(1x,2y)))
-t3:=ismore1(ts(ts(1u,2z),ts(1x,2y)),ts(ts(1y,2x),ts(1z,2u)),ts(ts(1u,2z),ts(1y,2x)),symis(nat,ts(ts(1y,2x),ts(1z,2u)),ts(ts(1u,2z),ts(1x,2y)),t2),satz32d(ts(1x,2y),ts(1y,2x),ts(1u,2z),m)):more(ts(ts(1y,2x),ts(1z,2u)),ts(ts(1u,2z),ts(1y,2x)))
--244
-satz44:=satz33a(ts(1z,2u),ts(1u,2z),ts(1y,2x),ismore1(ts(ts(1y,2x),ts(1z,2u)),ts(ts(1z,2u),ts(1y,2x)),ts(ts(1u,2z),ts(1y,2x)),comts(ts(1y,2x),ts(1z,2u)),t3".244")):moref(z,u)
-u@[e:eq(x,y)][f:eq(z,u)][m:moref(x,z)]
-eqmoref12:=satz44(x,z,y,u,m,e,f):moref(y,u)
-z@[e:eq(x,y)][m:moref(x,z)]
-eqmoref1:=satz44(x,z,y,z,m,e,refeq(z)):moref(y,z)
-e@[m:moref(z,x)]
-eqmoref2:=satz44(z,x,z,y,m,refeq(z),e):moref(z,y)
-u@[l:lessf(x,y)][e:eq(x,z)][f:eq(y,u)]
-satz45:=satz42(u,z,satz44(y,x,u,z,satz43(x,y,l),f,e)):lessf(z,u)
-u@[e:eq(x,y)][f:eq(z,u)][l:lessf(x,z)]
-eqlessf12:=satz45(x,z,y,u,l,e,f):lessf(y,u)
-z@[e:eq(x,y)][l:lessf(x,z)]
-eqlessf1:=satz45(x,z,y,z,l,e,refeq(z)):lessf(y,z)
-e@[l:lessf(z,x)]
-eqlessf2:=satz45(z,x,z,y,l,refeq(z),e):lessf(z,y)
-y@moreq:=or(moref(x,y),eq(x,y)):'prop'
-lesseq:=or(lessf(x,y),eq(x,y)):'prop'
-[e:eq(x,y)]
-moreqi2:=ori2(moref(x,y),eq(x,y),e):moreq(x,y)
-lesseqi2:=ori2(lessf(x,y),eq(x,y),e):lesseq(x,y)
-y@[m:moref(x,y)]
-moreqi1:=ori1(moref(x,y),eq(x,y),m):moreq(x,y)
-y@[l:lessf(x,y)]
-lesseqi1:=ori1(lessf(x,y),eq(x,y),l):lesseq(x,y)
-y@[m:moreq(x,y)]
-satz41c:=th7"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),satz41b,comor(moref(x,y),eq(x,y),m)):not(lessf(x,y))
-y@[l:lesseq(x,y)]
-satz41d:=th9"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),satz41b,l):not(moref(x,y))
-y@[n:not(moref(x,y))]
-satz41e:=th2"l.or3"(eq(x,y),moref(x,y),lessf(x,y),satz41a,n):lesseq(x,y)
-y@[n:not(lessf(x,y))]
-satz41f:=comor(eq(x,y),moref(x,y),th3"l.or3"(eq(x,y),moref(x,y),lessf(x,y),satz41a,n)):moreq(x,y)
-y@[m:moref(x,y)]
-satz41g:=th3"l.or"(lessf(x,y),eq(x,y),ec3e23(eq(x,y),moref(x,y),lessf(x,y),satz41b,m),ec3e21(eq(x,y),moref(x,y),lessf(x,y),satz41b,m)):not(lesseq(x,y))
-y@[l:lessf(x,y)]
-satz41h:=th3"l.or"(moref(x,y),eq(x,y),ec3e32(eq(x,y),moref(x,y),lessf(x,y),satz41b,l),ec3e31(eq(x,y),moref(x,y),lessf(x,y),satz41b,l)):not(moreq(x,y))
-y@[n:not(moreq(x,y))]
-satz41j:=or3e3(eq(x,y),moref(x,y),lessf(x,y),satz41a,th5"l.or"(moref(x,y),eq(x,y),n),th4"l.or"(moref(x,y),eq(x,y),n)):lessf(x,y)
-y@[n:not(lesseq(x,y))]
-satz41k:=or3e2(eq(x,y),moref(x,y),lessf(x,y),satz41a,th4"l.or"(lessf(x,y),eq(x,y),n),th5"l.or"(lessf(x,y),eq(x,y),n)):moref(x,y)
-u@[m:moreq(x,y)][e:eq(x,z)][f:eq(y,u)]
-+246
-[n:moref(x,y)]
-t1:=ori1(moref(z,u),eq(z,u),satz44(n,e,f)):moreq(z,u)
-f@[g:eq(x,y)]
-t2:=ori2(moref(z,u),eq(z,u),tr3eq(z,x,y,u,symeq(x,z,e),g,f)):moreq(z,u)
--246
-satz46:=orapp(moref(x,y),eq(x,y),moreq(z,u),m,[t:moref(x,y)]t1".246"(t),[t:eq(x,y)]t2".246"(t)):moreq(z,u)
-u@[e:eq(x,y)][f:eq(z,u)][m:moreq(x,z)]
-eqmoreq12:=satz46(x,z,y,u,m,e,f):moreq(y,u)
-z@[e:eq(x,y)][m:moreq(x,z)]
-eqmoreq1:=satz46(x,z,y,z,m,e,refeq(z)):moreq(y,z)
-e@[m:moreq(z,x)]
-eqmoreq2:=satz46(z,x,z,y,m,refeq(z),e):moreq(z,y)
-u@[l:lesseq(x,y)][e:eq(x,z)][f:eq(y,u)]
-+247
-[k:lessf(x,y)]
-t1:=ori1(lessf(z,u),eq(z,u),satz45(k,e,f)):lesseq(z,u)
-f@[g:eq(x,y)]
-t2:=ori2(lessf(z,u),eq(z,u),tr3eq(z,x,y,u,symeq(x,z,e),g,f)):lesseq(z,u)
--247
-satz47:=orapp(lessf(x,y),eq(x,y),lesseq(z,u),l,[t:lessf(x,y)]t1".247"(t),[t:eq(x,y)]t2".247"(t)):lesseq(z,u)
-u@[e:eq(x,y)][f:eq(z,u)][l:lesseq(x,z)]
-eqlesseq12:=satz47(x,z,y,u,l,e,f):lesseq(y,u)
-z@[e:eq(x,y)][l:lesseq(x,z)]
-eqlesseq1:=satz47(x,z,y,z,l,e,refeq(z)):lesseq(y,z)
-e@[l:lesseq(z,x)]
-eqlesseq2:=satz47(z,x,z,y,l,refeq(z),e):lesseq(z,y)
-y@[m:moreq(x,y)]
-satz48:=th9"l.or"(moref(x,y),eq(x,y),lessf(y,x),eq(y,x),m,[t:moref(x,y)]satz42(x,y,t),[t:eq(x,y)]satz38(x,y,t)):lesseq(y,x)
-y@[l:lesseq(x,y)]
-satz49:=th9"l.or"(lessf(x,y),eq(x,y),moref(y,x),eq(y,x),l,[t:lessf(x,y)]satz43(x,y,t),[t:eq(x,y)]satz38(x,y,t)):moreq(y,x)
-z@[l:lessf(x,y)][k:lessf(y,z)]
-+250
-t1:=satz34a(ts(1x,2y),ts(1y,2x),ts(1y,2z),ts(1z,2y),l,k):less(ts(ts(1x,2y),ts(1y,2z)),ts(ts(1y,2x),ts(1z,2y)))
-t2:=isless12(ts(ts(1x,2y),ts(1y,2z)),ts(ts(1x,2z),ts(1y,2y)),ts(ts(1y,2x),ts(1z,2y)),ts(ts(1z,2x),ts(1y,2y)),stets(1x,2y,1y,2z),tris(nat,ts(ts(1y,2x),ts(1z,2y)),ts(ts(1y,2y),ts(1z,2x)),ts(ts(1z,2x),ts(1y,2y)),stets(1y,2x,1z,2y),comts(ts(1y,2y),ts(1z,2x))),t1):less(ts(ts(1x,2z),ts(1y,2y)),ts(ts(1z,2x),ts(1y,2y)))
--250
-satz50:=satz33c(ts(1x,2z),ts(1z,2x),ts(1y,2y),t2".250"):lessf(x,z)
-trlessf:=satz50:lessf(x,z)
-z@[m:moref(x,y)][n:moref(y,z)]
-trmoref:=satz43(z,x,satz50(z,y,x,satz42(y,z,n),satz42(x,y,m))):moref(x,z)
-z@[l:lesseq(x,y)][k:lessf(y,z)]
-satz51a:=orapp(lessf(x,y),eq(x,y),lessf(x,z),l,[t:lessf(x,y)]satz50(t,k),[t:eq(x,y)]eqlessf1(y,x,z,symeq(x,y,t),k)):lessf(x,z)
-z@[l:lessf(x,y)][k:lesseq(y,z)]
-satz51b:=orapp(lessf(y,z),eq(y,z),lessf(x,z),k,[t:lessf(y,z)]satz50(l,t),[t:eq(y,z)]eqlessf2(y,z,x,t,l)):lessf(x,z)
-z@[m:moreq(x,y)][n:moref(y,z)]
-satz51c:=satz43(z,x,satz51b(z,y,x,satz42(y,z,n),satz48(x,y,m))):moref(x,z)
-z@[m:moref(x,y)][n:moreq(y,z)]
-satz51d:=satz43(z,x,satz51a(z,y,x,satz48(y,z,n),satz42(x,y,m))):moref(x,z)
-z@[l:lesseq(x,y)][k:lesseq(y,z)]
-+252
-[e:eq(x,y)][f:eq(y,z)]
-t1:=ori2(lessf(x,z),eq(x,z),treq(x,y,z,e,f)):lesseq(x,z)
-e@[j:lessf(y,z)]
-t2:=ori1(lessf(x,z),eq(x,z),satz51a(l,j)):lesseq(x,z)
-e@t3:=orapp(lessf(y,z),eq(y,z),lesseq(x,z),k,[t:lessf(y,z)]t2(t),[t:eq(y,z)]t1(t)):lesseq(x,z)
-k@[j:lessf(x,y)]
-t4:=ori1(lessf(x,z),eq(x,z),satz51b(j,k)):lesseq(x,z)
--252
-satz52:=orapp(lessf(x,y),eq(x,y),lesseq(x,z),l,[t:lessf(x,y)]t4".252"(t),[t:eq(x,y)]t3".252"(t)):lesseq(x,z)
-trlesseq:=satz52:lesseq(x,z)
-+*252
-k@[j:lessf(x,y)]
-t5:=ori1(lessf(x,z),eq(x,z),satz51b(j,k)):lesseq(x,z)
-k@[e:eq(x,y)]
-t6:=eqlesseq1(y,x,z,symeq(x,y,e),k):lesseq(x,z)
-k@anders:=orapp(lessf(x,y),eq(x,y),lesseq(x,z),l,[t:lessf(x,y)]t5(t),[t:eq(x,y)]t6(t)):lesseq(x,z)
--252
-z@[m:moreq(x,y)][n:moreq(y,z)]
-trmoreq:=satz49(z,x,satz52(z,y,x,satz48(y,z,n),satz48(x,y,m))):moreq(x,z)
-+253
-x@t1:=ismore1(pl(ts(1x,2x),ts(1x,2x)),ts(pl(1x,1x),2x),ts(1x,2x),distpt1(1x,1x,2x),satz18(ts(1x,2x),ts(1x,2x))):more(ts(pl(1x,1x),2x),ts(1x,2x))
-t2:=morefi2(pl(1x,1x),2x,t1):moref(fr(pl(1x,1x),2x),x)
--253
-x@satz53:=somei(frac,[t:frac]moref(t,x),fr(pl(1x,1x),2x),t2".253"):some"l"(frac,[t:frac]moref(t,x))
-+254
-t1:=isless2(pl(ts(1x,2x),ts(1x,2x)),ts(1x,pl(2x,2x)),ts(1x,2x),distpt2(1x,2x,2x),satz18a(ts(1x,2x),ts(1x,2x))):less(ts(1x,2x),ts(1x,pl(2x,2x)))
-t2:=lessfi2(1x,pl(2x,2x),t1):lessf(fr(1x,pl(2x,2x)),x)
--254
-satz54:=somei(frac,[t:frac]lessf(t,x),fr(1x,pl(2x,2x)),t2".254"):some"l"(frac,[t:frac]lessf(t,x))
-y@[l:lessf(x,y)]
-+255
-t1:=satz19f(ts(1x,2y),ts(1y,2x),ts(1x,2x),l):less(pl(ts(1x,2x),ts(1x,2y)),pl(ts(1x,2x),ts(1y,2x)))
-t2:=satz19c(ts(1x,2y),ts(1y,2x),ts(1y,2y),l):less(pl(ts(1x,2y),ts(1y,2y)),pl(ts(1y,2x),ts(1y,2y)))
-t3:=isless12(pl(ts(1x,2x),ts(1x,2y)),ts(1x,pl(2x,2y)),pl(ts(1x,2x),ts(1y,2x)),ts(pl(1x,1y),2x),distpt2(1x,2x,2y),distpt1(1x,1y,2x),t1):less(ts(1x,pl(2x,2y)),ts(pl(1x,1y),2x))
-t4:=lessfi1(pl(1x,1y),pl(2x,2y),t3):lessf(x,fr(pl(1x,1y),pl(2x,2y)))
-t5:=isless12(pl(ts(1x,2y),ts(1y,2y)),ts(pl(1x,1y),2y),pl(ts(1y,2x),ts(1y,2y)),ts(1y,pl(2x,2y)),distpt1(1x,1y,2y),distpt2(1y,2x,2y),t2):less(ts(pl(1x,1y),2y),ts(1y,pl(2x,2y)))
-t6:=lessfi2(y,pl(1x,1y),pl(2x,2y),t5):lessf(fr(pl(1x,1y),pl(2x,2y)),y)
-t7:=andi(lessf(x,fr(pl(1x,1y),pl(2x,2y))),lessf(fr(pl(1x,1y),pl(2x,2y)),y),t4,t6):and(lessf(x,fr(pl(1x,1y),pl(2x,2y))),lessf(fr(pl(1x,1y),pl(2x,2y)),y))
--255
-satz55:=somei(frac,[t:frac]and(lessf(x,t),lessf(t,y)),fr(pl(1x,1y),pl(2x,2y)),t7".255"):some"l"(frac,[t:frac]and(lessf(x,t),lessf(t,y)))
-y@pf:=fr(pl(ts(1x,2y),ts(1y,2x)),ts(2x,2y)):frac
-+ii3
-y2@t1:=ispl12(ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(x1,y2),ts(num(fr(y1,y2)),den(fr(x1,x2))),ts(y1,x2),ndis12(x1,x2,y1,y2),ndis12(y1,y2,x1,x2)):is(pl(ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(num(fr(y1,y2)),den(fr(x1,x2)))),pl(ts(x1,y2),ts(y1,x2)))
-t2:=ists12(den(fr(x1,x2)),x2,den(fr(y1,y2)),y2,denis(x1,x2),denis(y1,y2)):is(ts(den(fr(x1,x2)),den(fr(y1,y2))),ts(x2,y2))
--ii3
-y2@pf12:=isnd(pl(ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(num(fr(y1,y2)),den(fr(x1,x2)))),ts(den(fr(x1,x2)),den(fr(y1,y2))),pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2),t1".ii3",t2".ii3"):is"e"(frac,pf(fr(x1,x2),fr(y1,y2)),fr(pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2)))
-+*ii3
-n2@t3:=ispl12(ts(1x,den(fr(n1,n2))),ts(1x,n2),ts(num(fr(n1,n2)),2x),ts(n1,2x),ndisn2(x,n1,n2),ndis1d(x,n1,n2)):is(pl(ts(1x,den(fr(n1,n2))),ts(num(fr(n1,n2)),2x)),pl(ts(1x,n2),ts(n1,2x)))
-t4:=ists2(den(fr(n1,n2)),n2,2x,denis(n1,n2)):is(ts(2x,den(fr(n1,n2))),ts(2x,n2))
--ii3
-n2@pf1:=isnd(pl(ts(1x,den(fr(n1,n2))),ts(num(fr(n1,n2)),2x)),ts(2x,den(fr(n1,n2))),pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2),t3".ii3",t4".ii3"):is"e"(frac,pf(x,fr(n1,n2)),fr(pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2)))
-+*ii3
-n2@t5:=ispl12(ts(num(fr(n1,n2)),2x),ts(n1,2x),ts(1x,den(fr(n1,n2))),ts(1x,n2),ndis1d(x,n1,n2),ndisn2(x,n1,n2)):is(pl(ts(num(fr(n1,n2)),2x),ts(1x,den(fr(n1,n2)))),pl(ts(n1,2x),ts(1x,n2)))
-t6:=ists1(den(fr(n1,n2)),n2,2x,denis(n1,n2)):is(ts(den(fr(n1,n2)),2x),ts(n2,2x))
--ii3
-n2@pf2:=isnd(pl(ts(num(fr(n1,n2)),2x),ts(1x,den(fr(n1,n2)))),ts(den(fr(n1,n2)),2x),pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x),t5".ii3",t6".ii3"):is"e"(frac,pf(fr(n1,n2),x),fr(pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x)))
-y2@pfeq12a:=refeq1(pf(fr(x1,x2),fr(y1,y2)),fr(pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2)),pf12):eq(pf(fr(x1,x2),fr(y1,y2)),fr(pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2)))
-pfeq12b:=refeq2(pf(fr(x1,x2),fr(y1,y2)),fr(pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2)),pf12):eq(fr(pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2)),pf(fr(x1,x2),fr(y1,y2)))
-n2@pfeq1a:=refeq1(pf(x,fr(n1,n2)),fr(pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2)),pf1):eq(pf(x,fr(n1,n2)),fr(pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2)))
-pfeq1b:=refeq2(pf(x,fr(n1,n2)),fr(pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2)),pf1):eq(fr(pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2)),pf(x,fr(n1,n2)))
-pfeq2a:=refeq1(pf(fr(n1,n2),x),fr(pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x)),pf2):eq(pf(fr(n1,n2),x),fr(pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x)))
-pfeq2b:=refeq2(pf(fr(n1,n2),x),fr(pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x)),pf2):eq(fr(pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x)),pf(fr(n1,n2),x))
-u@[e:eq(x,y)][f:eq(z,u)]
-+356
-t1:=ists1(ts(1x,2y),ts(1y,2x),ts(2z,2u),e):is(ts(ts(1x,2y),ts(2z,2u)),ts(ts(1y,2x),ts(2z,2u)))
-t2:=t1(z,u,x,y,f,e):is(ts(ts(1z,2u),ts(2x,2y)),ts(ts(1u,2z),ts(2x,2y)))
-t3:=tr3is(nat,ts(ts(1x,2z),ts(2y,2u)),ts(ts(1x,2z),ts(2u,2y)),ts(ts(1x,2y),ts(2u,2z)),ts(ts(1x,2y),ts(2z,2u)),ists2(ts(2y,2u),ts(2u,2y),ts(1x,2z),comts(2y,2u)),stets(1x,2z,2u,2y),ists2(ts(2u,2z),ts(2z,2u),ts(1x,2y),comts(2u,2z))):is(ts(ts(1x,2z),ts(2y,2u)),ts(ts(1x,2y),ts(2z,2u)))
-t4:=tr4is(nat,ts(ts(1x,2z),ts(2y,2u)),ts(ts(1x,2y),ts(2z,2u)),ts(ts(1y,2x),ts(2z,2u)),ts(ts(1y,2u),ts(2z,2x)),ts(ts(1y,2u),ts(2x,2z)),t3,t1,stets(1y,2x,2z,2u),ists2(ts(2z,2x),ts(2x,2z),ts(1y,2u),comts(2z,2x))):is(ts(ts(1x,2z),ts(2y,2u)),ts(ts(1y,2u),ts(2x,2z)))
-t5:=tr4is(nat,ts(ts(1z,2x),ts(2y,2u)),ts(ts(1z,2u),ts(2y,2x)),ts(ts(1z,2u),ts(2x,2y)),ts(ts(1u,2z),ts(2x,2y)),ts(ts(1u,2y),ts(2x,2z)),stets(1z,2x,2y,2u),ists2(ts(2y,2x),ts(2x,2y),ts(1z,2u),comts(2y,2x)),t2,stets(1u,2z,2x,2y)):is(ts(ts(1z,2x),ts(2y,2u)),ts(ts(1u,2y),ts(2x,2z)))
-t6:=ispl12(ts(ts(1x,2z),ts(2y,2u)),ts(ts(1y,2u),ts(2x,2z)),ts(ts(1z,2x),ts(2y,2u)),ts(ts(1u,2y),ts(2x,2z)),t4,t5):is(pl(ts(ts(1x,2z),ts(2y,2u)),ts(ts(1z,2x),ts(2y,2u))),pl(ts(ts(1y,2u),ts(2x,2z)),ts(ts(1u,2y),ts(2x,2z))))
-t7:=tr3is(nat,ts(pl(ts(1x,2z),ts(1z,2x)),ts(2y,2u)),pl(ts(ts(1x,2z),ts(2y,2u)),ts(ts(1z,2x),ts(2y,2u))),pl(ts(ts(1y,2u),ts(2x,2z)),ts(ts(1u,2y),ts(2x,2z))),ts(pl(ts(1y,2u),ts(1u,2y)),ts(2x,2z)),disttp1(ts(1x,2z),ts(1z,2x),ts(2y,2u)),t6,distpt1(ts(1y,2u),ts(1u,2y),ts(2x,2z))):is(ts(pl(ts(1x,2z),ts(1z,2x)),ts(2y,2u)),ts(pl(ts(1y,2u),ts(1u,2y)),ts(2x,2z)))
--356
-satz56:=eqi12(pl(ts(1x,2z),ts(1z,2x)),ts(2x,2z),pl(ts(1y,2u),ts(1u,2y)),ts(2y,2u),t7".356"):eq(pf(x,z),pf(y,u))
-eqpf12:=satz56:eq(pf(x,z),pf(y,u))
-z@[e:eq(x,y)]
-eqpf1:=eqpf12(x,y,z,z,e,refeq(z)):eq(pf(x,z),pf(y,z))
-eqpf2:=eqpf12(z,z,x,y,refeq(z),e):eq(pf(z,x),pf(z,y))
-x2@[n:nat]
-satz57:=tr3eq(pf(fr(x1,n),fr(x2,n)),fr(pl(ts(x1,n),ts(x2,n)),ts(n,n)),fr(ts(pl(x1,x2),n),ts(n,n)),fr(pl(x1,x2),n),pfeq12a(x1,n,x2,n),eqn(pl(ts(x1,n),ts(x2,n)),ts(n,n),ts(pl(x1,x2),n),distpt1(x1,x2,n)),satz40c(pl(x1,x2),n,n)):eq(pf(fr(x1,n),fr(x2,n)),fr(pl(x1,x2),n))
-satz57a:=symeq(pf(fr(x1,n),fr(x2,n)),fr(pl(x1,x2),n),satz57):eq(fr(pl(x1,x2),n),pf(fr(x1,n),fr(x2,n)))
-y@satz58:=eqnd(pl(ts(1x,2y),ts(1y,2x)),ts(2x,2y),pl(ts(1y,2x),ts(1x,2y)),ts(2y,2x),compl(ts(1x,2y),ts(1y,2x)),comts(2x,2y)):eq(pf(x,y),pf(y,x))
-compf:=satz58:eq(pf(x,y),pf(y,x))
-+359
-z@t1:=tr3is(nat,ts(ts(1y,2x),2z),ts(ts(2x,1y),2z),ts(2x,ts(1y,2z)),ts(ts(1y,2z),2x),ists1(ts(1y,2x),ts(2x,1y),2z,comts(1y,2x)),assts1(2x,1y,2z),comts(2x,ts(1y,2z))):is(ts(ts(1y,2x),2z),ts(ts(1y,2z),2x))
-t2:=ispl12(ts(ts(1x,2y),2z),ts(1x,ts(2y,2z)),ts(ts(1y,2x),2z),ts(ts(1y,2z),2x),assts1(1x,2y,2z),t1):is(pl(ts(ts(1x,2y),2z),ts(ts(1y,2x),2z)),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)))
-t3:=tris(nat,ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(ts(1x,2y),2z),ts(ts(1y,2x),2z)),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),disttp1(ts(1x,2y),ts(1y,2x),2z),t2):is(ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)))
-t4:=tris(nat,ts(1z,ts(2x,2y)),ts(1z,ts(2y,2x)),ts(ts(1z,2y),2x),ists2(ts(2x,2y),ts(2y,2x),1z,comts(2x,2y)),assts2(1z,2y,2x)):is(ts(1z,ts(2x,2y)),ts(ts(1z,2y),2x))
-t5:=ispl12(ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),ts(1z,ts(2x,2y)),ts(ts(1z,2y),2x),t3,t4):is(pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),pl(pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),ts(ts(1z,2y),2x)))
-t6:=ispl2(pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)),ts(pl(ts(1y,2z),ts(1z,2y)),2x),ts(1x,ts(2y,2z)),distpt1(ts(1y,2z),ts(1z,2y),2x)):is(pl(ts(1x,ts(2y,2z)),pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x))),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)))
-t7:=tr3is(nat,pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),pl(pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),ts(ts(1z,2y),2x)),pl(ts(1x,ts(2y,2z)),pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x))),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)),t5,asspl1(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)),t6):is(pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)))
--359
-z@satz59:=tr3eq(pf(pf(x,y),z),fr(pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),ts(ts(2x,2y),2z)),fr(pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)),ts(2x,ts(2y,2z))),pf(x,pf(y,z)),pfeq2a(z,pl(ts(1x,2y),ts(1y,2x)),ts(2x,2y)),eqnd(pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),ts(ts(2x,2y),2z),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)),ts(2x,ts(2y,2z)),t7".359",assts1(2x,2y,2z)),pfeq1b(x,pl(ts(1y,2z),ts(1z,2y)),ts(2y,2z))):eq(pf(pf(x,y),z),pf(x,pf(y,z)))
-asspf1:=satz59:eq(pf(pf(x,y),z),pf(x,pf(y,z)))
-asspf2:=symeq(pf(pf(x,y),z),pf(x,pf(y,z)),asspf1):eq(pf(x,pf(y,z)),pf(pf(x,y),z))
-c@stets1:=tr3is(nat,ts(ts(a,b),c),ts(a,ts(b,c)),ts(a,ts(c,b)),ts(ts(a,c),b),assts1(a,b,c),ists2(ts(b,c),ts(c,b),a,comts(b,c)),assts2(a,c,b)):is(ts(ts(a,b),c),ts(ts(a,c),b))
-+*359
-z@t8:=tris(nat,ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(ts(1x,2y),2z),ts(ts(1y,2x),2z)),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),disttp1(ts(1x,2y),ts(1y,2x),2z),ispl12(ts(ts(1x,2y),2z),ts(1x,ts(2y,2z)),ts(ts(1y,2x),2z),ts(ts(1y,2z),2x),assts1(1x,2y,2z),stets1(1y,2x,2z))):is(ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)))
-t9:=tris(nat,ts(1z,ts(2x,2y)),ts(ts(1z,2x),2y),ts(ts(1z,2y),2x),assts2(1z,2x,2y),stets1(1z,2x,2y)):is(ts(1z,ts(2x,2y)),ts(ts(1z,2y),2x))
-anderst7:=tr3is(nat,pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),pl(pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),ts(ts(1z,2y),2x)),pl(ts(1x,ts(2y,2z)),pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x))),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)),ispl12(ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),ts(1z,ts(2x,2y)),ts(ts(1z,2y),2x),t8,t9),asspl1(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)),ispl2(pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)),ts(pl(ts(1y,2z),ts(1z,2y)),2x),ts(1x,ts(2y,2z)),distpt1(ts(1y,2z),ts(1z,2y),2x))):is(pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)))
--359
-+360
-y@t1:=satz18(ts(1x,2y),ts(1y,2x)):more(pl(ts(1x,2y),ts(1y,2x)),ts(1x,2y))
-t2:=satz32a(pl(ts(1x,2y),ts(1y,2x)),ts(1x,2y),2x,t1):more(ts(pl(ts(1x,2y),ts(1y,2x)),2x),ts(ts(1x,2y),2x))
-t3:=tris(nat,ts(ts(1x,2y),2x),ts(1x,ts(2y,2x)),ts(1x,ts(2x,2y)),assts1(1x,2y,2x),ists2(ts(2y,2x),ts(2x,2y),1x,comts(2y,2x))):is(ts(ts(1x,2y),2x),ts(1x,ts(2x,2y)))
-t4:=ismore2(ts(ts(1x,2y),2x),ts(1x,ts(2x,2y)),ts(pl(ts(1x,2y),ts(1y,2x)),2x),t3,t2):more(ts(pl(ts(1x,2y),ts(1y,2x)),2x),ts(1x,ts(2x,2y)))
--360
-y@satz60:=morefi2(pl(ts(1x,2y),ts(1y,2x)),ts(2x,2y),t4".360"):moref(pf(x,y),x)
-satz60a:=satz42(pf(x,y),x,satz60):lessf(x,pf(x,y))
-z@[m:moref(x,y)]
-+361
-t1:=satz32a(ts(1x,2y),ts(1y,2x),2z,m):more(ts(ts(1x,2y),2z),ts(ts(1y,2x),2z))
-t2:=ismore12(ts(ts(1x,2y),2z),ts(ts(1x,2z),2y),ts(ts(1y,2x),2z),ts(ts(1y,2z),2x),stets1(1x,2y,2z),stets1(1y,2x,2z),t1):more(ts(ts(1x,2z),2y),ts(ts(1y,2z),2x))
-t3:=stets1(1z,2x,2y):is(ts(ts(1z,2x),2y),ts(ts(1z,2y),2x))
-t4:=satz19h(ts(ts(1z,2x),2y),ts(ts(1z,2y),2x),ts(ts(1x,2z),2y),ts(ts(1y,2z),2x),t3,t2):more(pl(ts(ts(1x,2z),2y),ts(ts(1z,2x),2y)),pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)))
-t5:=ismore12(pl(ts(ts(1x,2z),2y),ts(ts(1z,2x),2y)),ts(pl(ts(1x,2z),ts(1z,2x)),2y),pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)),ts(pl(ts(1y,2z),ts(1z,2y)),2x),distpt1(ts(1x,2z),ts(1z,2x),2y),distpt1(ts(1y,2z),ts(1z,2y),2x),t4):more(ts(pl(ts(1x,2z),ts(1z,2x)),2y),ts(pl(ts(1y,2z),ts(1z,2y)),2x))
-t6:=satz32a(ts(pl(ts(1x,2z),ts(1z,2x)),2y),ts(pl(ts(1y,2z),ts(1z,2y)),2x),2z,t5):more(ts(ts(pl(ts(1x,2z),ts(1z,2x)),2y),2z),ts(ts(pl(ts(1y,2z),ts(1z,2y)),2x),2z))
-t7:=ismore12(ts(ts(pl(ts(1x,2z),ts(1z,2x)),2y),2z),ts(pl(ts(1x,2z),ts(1z,2x)),ts(2y,2z)),ts(ts(pl(ts(1y,2z),ts(1z,2y)),2x),2z),ts(pl(ts(1y,2z),ts(1z,2y)),ts(2x,2z)),assts1(pl(ts(1x,2z),ts(1z,2x)),2y,2z),assts1(pl(ts(1y,2z),ts(1z,2y)),2x,2z),t6):more(ts(pl(ts(1x,2z),ts(1z,2x)),ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),ts(2x,2z)))
--361
-satz61:=morefi12(pl(ts(1x,2z),ts(1z,2x)),ts(2x,2z),pl(ts(1y,2z),ts(1z,2y)),ts(2y,2z),t7".361"):moref(pf(x,z),pf(y,z))
-z@[m:moref(x,y)]
-satz62a:=satz61(m):moref(pf(x,z),pf(y,z))
-z@[e:eq(x,y)]
-satz62b:=eqpf1(x,y,z,e):eq(pf(x,z),pf(y,z))
-z@[l:lessf(x,y)]
-satz62c:=satz42(pf(y,z),pf(x,z),satz61(y,x,z,satz43(l))):lessf(pf(x,z),pf(y,z))
-m@satz62d:=eqmoref12(pf(x,z),pf(z,x),pf(y,z),pf(z,y),compf(x,z),compf(y,z),satz62a):moref(pf(z,x),pf(z,y))
-e@satz62e:=eqpf2(x,y,z,e):eq(pf(z,x),pf(z,y))
-l@satz62f:=eqlessf12(pf(x,z),pf(z,x),pf(y,z),pf(z,y),compf(x,z),compf(y,z),satz62c):lessf(pf(z,x),pf(z,y))
-u@[e:eq(x,y)][m:moref(z,u)]
-satz62g:=eqmoref2(pf(x,u),pf(y,u),pf(x,z),eqpf1(x,y,u,e),satz62d(z,u,x,m)):moref(pf(x,z),pf(y,u))
-satz62h:=eqmoref12(pf(x,z),pf(z,x),pf(y,u),pf(u,y),compf(x,z),compf(y,u),satz62g):moref(pf(z,x),pf(u,y))
-e@[l:lessf(z,u)]
-satz62j:=eqlessf2(pf(x,u),pf(y,u),pf(x,z),eqpf1(x,y,u,e),satz62f(z,u,x,l)):lessf(pf(x,z),pf(y,u))
-satz62k:=eqlessf12(pf(x,z),pf(z,x),pf(y,u),pf(u,y),compf(x,z),compf(y,u),satz62j):lessf(pf(z,x),pf(u,y))
-+363
-z@t1:=satz41a(x,y):or3(eq(x,y),moref(x,y),lessf(x,y))
-t2:=satz41b(pf(x,z),pf(y,z)):ec3(eq(pf(x,z),pf(y,z)),moref(pf(x,z),pf(y,z)),lessf(pf(x,z),pf(y,z)))
--363
-z@[m:moref(pf(x,z),pf(y,z))]
-satz63a:=th11"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(pf(x,z),pf(y,z)),moref(pf(x,z),pf(y,z)),lessf(pf(x,z),pf(y,z)),t1".363",t2".363",[u:eq(x,y)]satz62b(x,y,z,u),[u:moref(x,y)]satz62a(x,y,z,u),[u:lessf(x,y)]satz62c(x,y,z,u),m):moref(x,y)
-z@[e:eq(pf(x,z),pf(y,z))]
-satz63b:=th10"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(pf(x,z),pf(y,z)),moref(pf(x,z),pf(y,z)),lessf(pf(x,z),pf(y,z)),t1".363",t2".363",[u:eq(x,y)]satz62b(x,y,z,u),[u:moref(x,y)]satz62a(x,y,z,u),[u:lessf(x,y)]satz62c(x,y,z,u),e):eq(x,y)
-z@[l:lessf(pf(x,z),pf(y,z))]
-satz63c:=th12"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(pf(x,z),pf(y,z)),moref(pf(x,z),pf(y,z)),lessf(pf(x,z),pf(y,z)),t1".363",t2".363",[u:eq(x,y)]satz62b(x,y,z,u),[u:moref(x,y)]satz62a(x,y,z,u),[u:lessf(x,y)]satz62c(x,y,z,u),l):lessf(x,y)
-z@[m:moref(pf(z,x),pf(z,y))]
-satz63d:=satz63a(eqmoref12(pf(z,x),pf(x,z),pf(z,y),pf(y,z),compf(z,x),compf(z,y),m)):moref(x,y)
-z@[e:eq(pf(z,x),pf(z,y))]
-satz63e:=satz63b(tr3eq(pf(x,z),pf(z,x),pf(z,y),pf(y,z),compf(x,z),e,compf(z,y))):eq(x,y)
-z@[f:lessf(pf(z,x),pf(z,y))]
-satz63f:=satz63c(eqlessf12(pf(z,x),pf(x,z),pf(z,y),pf(y,z),compf(z,x),compf(z,y),f)):lessf(x,y)
-u@[m:moref(x,y)][n:moref(z,u)]
-+364
-t1:=satz61(x,y,z,m):moref(pf(x,z),pf(y,z))
-t2:=eqmoref12(pf(z,y),pf(y,z),pf(u,y),pf(y,u),compf(z,y),compf(u,y),satz61(z,u,y,n)):moref(pf(y,z),pf(y,u))
--364
-satz64:=trmoref(pf(x,z),pf(y,z),pf(y,u),t1".364",t2".364"):moref(pf(x,z),pf(y,u))
-u@[l:lessf(x,y)][k:lessf(z,u)]
-satz64a:=satz42(pf(y,u),pf(x,z),satz64(y,x,u,z,satz43(x,y,l),satz43(z,u,k))):lessf(pf(x,z),pf(y,u))
-u@[m:moreq(x,y)][n:moref(z,u)]
-satz65a:=orapp(moref(x,y),eq(x,y),moref(pf(x,z),pf(y,u)),m,[v:moref(x,y)]satz64(v,n),[v:eq(x,y)]satz62g(v,n)):moref(pf(x,z),pf(y,u))
-u@[m:moref(x,y)][n:moreq(z,u)]
-satz65b:=orapp(moref(z,u),eq(z,u),moref(pf(x,z),pf(y,u)),n,[v:moref(z,u)]satz64(m,v),[v:eq(z,u)]eqmoref2(pf(y,z),pf(y,u),pf(x,z),eqpf2(z,u,y,v),satz61(x,y,z,m))):moref(pf(x,z),pf(y,u))
-u@[l:lesseq(x,y)][k:lessf(z,u)]
-satz65c:=satz42(pf(y,u),pf(x,z),satz65a(y,x,u,z,satz49(x,y,l),satz43(z,u,k))):lessf(pf(x,z),pf(y,u))
-u@[l:lessf(x,y)][k:lesseq(z,u)]
-satz65d:=satz42(pf(y,u),pf(x,z),satz65b(y,x,u,z,satz43(x,y,l),satz49(z,u,k))):lessf(pf(x,z),pf(y,u))
-u@[m:moreq(x,y)][n:moreq(z,u)]
-+366
-[e:eq(x,y)][f:eq(z,u)]
-t1:=moreqi2(pf(x,z),pf(y,u),satz56(e,f)):moreq(pf(x,z),pf(y,u))
-e@[o:moref(z,u)]
-t2:=moreqi1(pf(x,z),pf(y,u),satz65a(m,o)):moreq(pf(x,z),pf(y,u))
-e@t3:=orapp(moref(z,u),eq(z,u),moreq(pf(x,z),pf(y,u)),n,[v:moref(z,u)]t2(v),[v:eq(z,u)]t1(v)):moreq(pf(x,z),pf(y,u))
-n@[o:moref(x,y)]
-t4:=moreqi1(pf(x,z),pf(y,u),satz65b(o,n)):moreq(pf(x,z),pf(y,u))
--366
-satz66:=orapp(moref(x,y),eq(x,y),moreq(pf(x,z),pf(y,u)),m,[v:moref(x,y)]t4".366"(v),[v:eq(x,y)]t3".366"(v)):moreq(pf(x,z),pf(y,u))
-u@[l:lesseq(x,y)][k:lesseq(z,u)]
-satz66a:=satz48(pf(y,u),pf(x,z),satz66(y,x,u,z,satz49(x,y,l),satz49(z,u,k))):lesseq(pf(x,z),pf(y,u))
-y@[l:lesseq(x,y)]
-+367
-[v:frac][e:eq(pf(y,v),x)]
-t1:=eqmoref1(pf(y,v),x,y,e,satz60(y,v)):moref(x,y)
-v@t2:=th3"l.imp"(eq(pf(y,v),x),moref(x,y),satz41d(x,y,l),[t:eq(pf(y,v),x)]t1(t)):not(eq(pf(y,v),x))
--367
-vorbemerkung67:=th5"l.some"(frac,[v:frac]eq(pf(y,v),x),[v:frac]t2".367"(v)):not(some"l"(frac,[t:frac]eq(pf(y,t),x)))
-y@[v:frac][w:frac][e:eq(pf(y,v),x)][f:eq(pf(y,w),x)]
-satz67b:=satz63e(v,w,y,treq2(pf(y,v),pf(y,w),x,e,f)):eq(v,w)
-y@[m:moref(x,y)]
-+*367
-m@t3:=onei(nat,[t:nat]diffprop(ts(1x,2y),ts(1y,2x),t),satz8b(ts(1x,2y),ts(1y,2x)),m):one([t:nat]diffprop(ts(1x,2y),ts(1y,2x),t))
-vo:=ind(nat,[t:nat]diffprop(ts(1x,2y),ts(1y,2x),t),t3):nat
-t4:=oneax(nat,[t:nat]diffprop(ts(1x,2y),ts(1y,2x),t),t3):is(ts(1x,2y),pl(ts(1y,2x),vo))
-w:=fr(vo,ts(2x,2y)):frac
-t5:=treq(y,fr(ts(1y,2x),ts(2y,2x)),fr(ts(1y,2x),ts(2x,2y)),satz40(y,2x),eqd(ts(1y,2x),ts(2y,2x),ts(2x,2y),comts(2y,2x))):eq(y,fr(ts(1y,2x),ts(2x,2y)))
-t6:=tr4eq(pf(y,w),pf(fr(ts(1y,2x),ts(2x,2y)),fr(vo,ts(2x,2y))),fr(pl(ts(1y,2x),vo),ts(2x,2y)),fr(ts(1x,2y),ts(2x,2y)),x,eqpf1(y,fr(ts(1y,2x),ts(2x,2y)),w,t5),satz57(ts(1y,2x),vo,ts(2x,2y)),eqn(pl(ts(1y,2x),vo),ts(2x,2y),ts(1x,2y),symis(nat,ts(1x,2y),pl(ts(1y,2x),vo),t4)),satz40a(x,2y)):eq(pf(y,w),x)
--367
-m@satz67a:=somei(frac,[t:frac]eq(pf(y,t),x),w".367",t6".367"):some"l"(frac,[t:frac]eq(pf(y,t),x))
-mf:=w".367":frac
-satz67c:=t6".367":eq(pf(y,mf(x,y,m)),x)
-satz67d:=symeq(pf(y,mf(x,y,m)),x,satz67c):eq(x,pf(y,mf(x,y,m)))
-y@[v:frac][m:moref(x,y)][e:eq(pf(y,v),x)]
-satz67e:=satz67b(v,mf(x,y,m),e,satz67c(m)):eq(v,mf(x,y,m))
-y@tf:=fr(ts(1x,1y),ts(2x,2y)):frac
-+ii4
-y2@t1:=ists12(num(fr(x1,x2)),x1,num(fr(y1,y2)),y1,numis(x1,x2),numis(y1,y2)):is(ts(num(fr(x1,x2)),num(fr(y1,y2))),ts(x1,y1))
-t2:=ists12(den(fr(x1,x2)),x2,den(fr(y1,y2)),y2,denis(x1,x2),denis(y1,y2)):is(ts(den(fr(x1,x2)),den(fr(y1,y2))),ts(x2,y2))
--ii4
-y2@tf12:=isnd(ts(num(fr(x1,x2)),num(fr(y1,y2))),ts(den(fr(x1,x2)),den(fr(y1,y2))),ts(x1,y1),ts(x2,y2),t1".ii4",t2".ii4"):is"e"(frac,tf(fr(x1,x2),fr(y1,y2)),fr(ts(x1,y1),ts(x2,y2)))
-+*ii4
-n2@t3:=ists2(num(fr(n1,n2)),n1,1x,numis(n1,n2)):is(ts(1x,num(fr(n1,n2))),ts(1x,n1))
-t4:=ists2(den(fr(n1,n2)),n2,2x,denis(n1,n2)):is(ts(2x,den(fr(n1,n2))),ts(2x,n2))
--ii4
-n2@tf1:=isnd(ts(1x,num(fr(n1,n2))),ts(2x,den(fr(n1,n2))),ts(1x,n1),ts(2x,n2),t3".ii4",t4".ii4"):is"e"(frac,tf(x,fr(n1,n2)),fr(ts(1x,n1),ts(2x,n2)))
-+*ii4
-n2@t5:=ists1(num(fr(n1,n2)),n1,1x,numis(n1,n2)):is(ts(num(fr(n1,n2)),1x),ts(n1,1x))
-t6:=ists1(den(fr(n1,n2)),n2,2x,denis(n1,n2)):is(ts(den(fr(n1,n2)),2x),ts(n2,2x))
--ii4
-n2@tf2:=isnd(ts(num(fr(n1,n2)),1x),ts(den(fr(n1,n2)),2x),ts(n1,1x),ts(n2,2x),t5".ii4",t6".ii4"):is"e"(frac,tf(fr(n1,n2),x),fr(ts(n1,1x),ts(n2,2x)))
-y2@tfeq12a:=refeq1(tf(fr(x1,x2),fr(y1,y2)),fr(ts(x1,y1),ts(x2,y2)),tf12):eq(tf(fr(x1,x2),fr(y1,y2)),fr(ts(x1,y1),ts(x2,y2)))
-tfeq12b:=refeq2(tf(fr(x1,x2),fr(y1,y2)),fr(ts(x1,y1),ts(x2,y2)),tf12):eq(fr(ts(x1,y1),ts(x2,y2)),tf(fr(x1,x2),fr(y1,y2)))
-n2@tfeq1a:=refeq1(tf(x,fr(n1,n2)),fr(ts(1x,n1),ts(2x,n2)),tf1):eq(tf(x,fr(n1,n2)),fr(ts(1x,n1),ts(2x,n2)))
-tfeq1b:=refeq2(tf(x,fr(n1,n2)),fr(ts(1x,n1),ts(2x,n2)),tf1):eq(fr(ts(1x,n1),ts(2x,n2)),tf(x,fr(n1,n2)))
-tfeq2a:=refeq1(tf(fr(n1,n2),x),fr(ts(n1,1x),ts(n2,2x)),tf2):eq(tf(fr(n1,n2),x),fr(ts(n1,1x),ts(n2,2x)))
-tfeq2b:=refeq2(tf(fr(n1,n2),x),fr(ts(n1,1x),ts(n2,2x)),tf2):eq(fr(ts(n1,1x),ts(n2,2x)),tf(fr(n1,n2),x))
-u@[e:eq(x,y)][f:eq(z,u)]
-+468
-t1:=ists12(ts(1x,2y),ts(1y,2x),ts(1z,2u),ts(1u,2z),e,f):is(ts(ts(1x,2y),ts(1z,2u)),ts(ts(1y,2x),ts(1u,2z)))
--468
-d@stets2:=tr3is(nat,ts(ts(a,b),ts(c,d)),ts(ts(a,b),ts(d,c)),ts(ts(a,c),ts(d,b)),ts(ts(a,c),ts(b,d)),ists2(ts(c,d),ts(d,c),ts(a,b),comts(c,d)),stets(a,b,d,c),ists2(ts(d,b),ts(b,d),ts(a,c),comts(d,b))):is(ts(ts(a,b),ts(c,d)),ts(ts(a,c),ts(b,d)))
-+*468
-f@t2:=tr3is(nat,ts(ts(1x,1z),ts(2y,2u)),ts(ts(1x,2y),ts(1z,2u)),ts(ts(1y,2x),ts(1u,2z)),ts(ts(1y,1u),ts(2x,2z)),stets2(1x,1z,2y,2u),t1,stets2(1y,2x,1u,2z)):is(ts(ts(1x,1z),ts(2y,2u)),ts(ts(1y,1u),ts(2x,2z)))
--468
-f@satz68:=eqi12(ts(1x,1z),ts(2x,2z),ts(1y,1u),ts(2y,2u),t2".468"):eq(tf(x,z),tf(y,u))
-eqtf12:=satz68:eq(tf(x,z),tf(y,u))
-z@[e:eq(x,y)]
-eqtf1:=eqtf12(x,y,z,z,e,refeq(z)):eq(tf(x,z),tf(y,z))
-eqtf2:=eqtf12(z,z,x,y,refeq(z),e):eq(tf(z,x),tf(z,y))
-y@satz69:=eqnd(ts(1x,1y),ts(2x,2y),ts(1y,1x),ts(2y,2x),comts(1x,1y),comts(2x,2y)):eq(tf(x,y),tf(y,x))
-comtf:=satz69:eq(tf(x,y),tf(y,x))
-z@satz70:=tr3eq(tf(tf(x,y),z),fr(ts(ts(1x,1y),1z),ts(ts(2x,2y),2z)),fr(ts(1x,ts(1y,1z)),ts(2x,ts(2y,2z))),tf(x,tf(y,z)),tfeq2a(z,ts(1x,1y),ts(2x,2y)),eqnd(ts(ts(1x,1y),1z),ts(ts(2x,2y),2z),ts(1x,ts(1y,1z)),ts(2x,ts(2y,2z)),assts1(1x,1y,1z),assts1(2x,2y,2z)),tfeq1b(x,ts(1y,1z),ts(2y,2z))):eq(tf(tf(x,y),z),tf(x,tf(y,z)))
-asstf1:=satz70:eq(tf(tf(x,y),z),tf(x,tf(y,z)))
-asstf2:=symeq(tf(tf(x,y),z),tf(x,tf(y,z)),asstf1):eq(tf(x,tf(y,z)),tf(tf(x,y),z))
-+471
-t1:=tr3eq(tf(x,pf(y,z)),fr(ts(1x,pl(ts(1y,2z),ts(1z,2y))),ts(2x,ts(2y,2z))),fr(pl(ts(1x,ts(1y,2z)),ts(1x,ts(1z,2y))),ts(2x,ts(2y,2z))),pf(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z)))),tfeq1a(x,pl(ts(1y,2z),ts(1z,2y)),ts(2y,2z)),eqn(ts(1x,pl(ts(1y,2z),ts(1z,2y))),ts(2x,ts(2y,2z)),pl(ts(1x,ts(1y,2z)),ts(1x,ts(1z,2y))),disttp2(1x,ts(1y,2z),ts(1z,2y))),satz57a(ts(1x,ts(1y,2z)),ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z)))):eq(tf(x,pf(y,z)),pf(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z)))))
-t2:=treq(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),fr(ts(ts(1x,1y),2z),ts(ts(2x,2y),2z)),tf(x,y),eqnd(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z)),ts(ts(1x,1y),2z),ts(ts(2x,2y),2z),assts2(1x,1y,2z),assts2(2x,2y,2z)),satz40c(ts(1x,1y),ts(2x,2y),2z)):eq(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),tf(x,y))
-t3:=treq(fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z))),fr(ts(1x,ts(1z,2y)),ts(2x,ts(2z,2y))),tf(x,z),eqd(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z)),ts(2x,ts(2z,2y)),ists2(ts(2y,2z),ts(2z,2y),2x,comts(2y,2z))),t2(x,z,y)):eq(fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z))),tf(x,z))
--471
-satz71:=treq(tf(x,pf(y,z)),pf(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z)))),pf(tf(x,y),tf(x,z)),t1".471",eqpf12(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),tf(x,y),fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z))),tf(x,z),t2".471",t3".471")):eq(tf(x,pf(y,z)),pf(tf(x,y),tf(x,z)))
-disttpf1:=tr3eq(tf(pf(x,y),z),tf(z,pf(x,y)),pf(tf(z,x),tf(z,y)),pf(tf(x,z),tf(y,z)),comtf(pf(x,y),z),satz71(z,x,y),eqpf12(tf(z,x),tf(x,z),tf(z,y),tf(y,z),comtf(z,x),comtf(z,y))):eq(tf(pf(x,y),z),pf(tf(x,z),tf(y,z)))
-disttpf2:=satz71:eq(tf(x,pf(y,z)),pf(tf(x,y),tf(x,z)))
-distptf1:=symeq(tf(pf(x,y),z),pf(tf(x,z),tf(y,z)),disttpf1):eq(pf(tf(x,z),tf(y,z)),tf(pf(x,y),z))
-distptf2:=symeq(tf(x,pf(y,z)),pf(tf(x,y),tf(x,z)),disttpf2):eq(pf(tf(x,y),tf(x,z)),tf(x,pf(y,z)))
-[m:moref(x,y)]
-+472
-t1:=satz32a(ts(1x,2y),ts(1y,2x),ts(1z,2z),m):more(ts(ts(1x,2y),ts(1z,2z)),ts(ts(1y,2x),ts(1z,2z)))
-t2:=ismore12(ts(ts(1x,2y),ts(1z,2z)),ts(ts(1x,1z),ts(2y,2z)),ts(ts(1y,2x),ts(1z,2z)),ts(ts(1y,1z),ts(2x,2z)),stets2(1x,2y,1z,2z),stets2(1y,2x,1z,2z),t1):more(ts(ts(1x,1z),ts(2y,2z)),ts(ts(1y,1z),ts(2x,2z)))
--472
-satz72a:=morefi12(ts(1x,1z),ts(2x,2z),ts(1y,1z),ts(2y,2z),t2".472"):moref(tf(x,z),tf(y,z))
-z@[e:eq(x,y)]
-satz72b:=satz68(x,y,z,z,e,refeq(z)):eq(tf(x,z),tf(y,z))
-z@[l:lessf(x,y)]
-satz72c:=satz42(tf(y,z),tf(x,z),satz72a(y,x,z,satz43(x,y,l))):lessf(tf(x,z),tf(y,z))
-m@satz72d:=eqmoref12(tf(x,z),tf(z,x),tf(y,z),tf(z,y),comtf(x,z),comtf(y,z),satz72a):moref(tf(z,x),tf(z,y))
-e@satz72e:=eqtf2(x,y,z,e):eq(tf(z,x),tf(z,y))
-l@satz72f:=eqlessf12(tf(x,z),tf(z,x),tf(y,z),tf(z,y),comtf(x,z),comtf(y,z),satz72c):lessf(tf(z,x),tf(z,y))
-u@[e:eq(x,y)][m:moref(z,u)]
-satz72g:=eqmoref2(tf(x,u),tf(y,u),tf(x,z),eqtf1(x,y,u,e),satz72d(z,u,x,m)):moref(tf(x,z),tf(y,u))
-satz72h:=eqmoref12(tf(x,z),tf(z,x),tf(y,u),tf(u,y),comtf(x,z),comtf(y,u),satz72g):moref(tf(z,x),tf(u,y))
-e@[l:lessf(z,u)]
-satz72j:=eqlessf2(tf(x,u),tf(y,u),tf(x,z),eqtf1(x,y,u,e),satz72f(z,u,x,l)):lessf(tf(x,z),tf(y,u))
-satz72k:=eqlessf12(tf(x,z),tf(z,x),tf(y,u),tf(u,y),comtf(x,z),comtf(y,u),satz72j):lessf(tf(z,x),tf(u,y))
-+473
-z@t1:=satz41a(x,y):or3(eq(x,y),moref(x,y),lessf(x,y))
-t2:=satz41b(tf(x,z),tf(y,z)):ec3(eq(tf(x,z),tf(y,z)),moref(tf(x,z),tf(y,z)),lessf(tf(x,z),tf(y,z)))
--473
-z@[m:moref(tf(x,z),tf(y,z))]
-satz73a:=th11"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(tf(x,z),tf(y,z)),moref(tf(x,z),tf(y,z)),lessf(tf(x,z),tf(y,z)),t1".473",t2".473",[u:eq(x,y)]satz72b(x,y,z,u),[u:moref(x,y)]satz72a(x,y,z,u),[u:lessf(x,y)]satz72c(x,y,z,u),m):moref(x,y)
-z@[e:eq(tf(x,z),tf(y,z))]
-satz73b:=th10"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(tf(x,z),tf(y,z)),moref(tf(x,z),tf(y,z)),lessf(tf(x,z),tf(y,z)),t1".473",t2".473",[u:eq(x,y)]satz72b(x,y,z,u),[u:moref(x,y)]satz72a(x,y,z,u),[u:lessf(x,y)]satz72c(x,y,z,u),e):eq(x,y)
-z@[l:lessf(tf(x,z),tf(y,z))]
-satz73c:=th12"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(tf(x,z),tf(y,z)),moref(tf(x,z),tf(y,z)),lessf(tf(x,z),tf(y,z)),t1".473",t2".473",[u:eq(x,y)]satz72b(x,y,z,u),[u:moref(x,y)]satz72a(x,y,z,u),[u:lessf(x,y)]satz72c(x,y,z,u),l):lessf(x,y)
-z@[m:moref(tf(z,x),tf(z,y))]
-satz73d:=satz73a(eqmoref12(tf(z,x),tf(x,z),tf(z,y),tf(y,z),comtf(z,x),comtf(z,y),m)):moref(x,y)
-z@[e:eq(tf(z,x),tf(z,y))]
-satz73e:=satz73b(tr3eq(tf(x,z),tf(z,x),tf(z,y),tf(y,z),comtf(x,z),e,comtf(z,y))):eq(x,y)
-z@[l:lessf(tf(z,x),tf(z,y))]
-satz73f:=satz73c(eqlessf12(tf(z,x),tf(x,z),tf(z,y),tf(y,z),comtf(z,x),comtf(z,y),l)):lessf(x,y)
-u@[m:moref(x,y)][n:moref(z,u)]
-+474
-t1:=satz72a(x,y,z,m):moref(tf(x,z),tf(y,z))
-t2:=eqmoref12(tf(z,y),tf(y,z),tf(u,y),tf(y,u),comtf(z,y),comtf(u,y),satz72a(z,u,y,n)):moref(tf(y,z),tf(y,u))
--474
-satz74:=trmoref(tf(x,z),tf(y,z),tf(y,u),t1".474",t2".474"):moref(tf(x,z),tf(y,u))
-u@[l:lessf(x,y)][k:lessf(z,u)]
-satz74a:=satz42(tf(y,u),tf(x,z),satz74(y,x,u,z,satz43(x,y,l),satz43(z,u,k))):lessf(tf(x,z),tf(y,u))
-u@[m:moreq(x,y)][n:moref(z,u)]
-satz75a:=orapp(moref(x,y),eq(x,y),moref(tf(x,z),tf(y,u)),m,[v:moref(x,y)]satz74(v,n),[v:eq(x,y)]satz72g(v,n)):moref(tf(x,z),tf(y,u))
-u@[m:moref(x,y)][n:moreq(z,u)]
-satz75b:=orapp(moref(z,u),eq(z,u),moref(tf(x,z),tf(y,u)),n,[v:moref(z,u)]satz74(m,v),[v:eq(z,u)]eqmoref2(tf(y,z),tf(y,u),tf(x,z),eqtf2(z,u,y,v),satz72a(m))):moref(tf(x,z),tf(y,u))
-u@[l:lesseq(x,y)][k:lessf(z,u)]
-satz75c:=satz42(tf(y,u),tf(x,z),satz75a(y,x,u,z,satz49(x,y,l),satz43(z,u,k))):lessf(tf(x,z),tf(y,u))
-u@[l:lessf(x,y)][k:lesseq(z,u)]
-satz75d:=satz42(tf(y,u),tf(x,z),satz75b(y,x,u,z,satz43(x,y,l),satz49(z,u,k))):lessf(tf(x,z),tf(y,u))
-u@[m:moreq(x,y)][n:moreq(z,u)]
-+476
-[e:eq(x,y)][f:eq(z,u)]
-t1:=moreqi2(tf(x,z),tf(y,u),satz68(e,f)):moreq(tf(x,z),tf(y,u))
-e@[o:moref(z,u)]
-t2:=moreqi1(tf(x,z),tf(y,u),satz75a(m,o)):moreq(tf(x,z),tf(y,u))
-e@t3:=orapp(moref(z,u),eq(z,u),moreq(tf(x,z),tf(y,u)),n,[v:moref(z,u)]t2(v),[v:eq(z,u)]t1(v)):moreq(tf(x,z),tf(y,u))
-n@[o:moref(x,y)]
-t4:=moreqi1(tf(x,z),tf(y,u),satz75b(o,n)):moreq(tf(x,z),tf(y,u))
--476
-satz76:=orapp(moref(x,y),eq(x,y),moreq(tf(x,z),tf(y,u)),m,[v:moref(x,y)]t4".476"(v),[v:eq(x,y)]t3".476"(v)):moreq(tf(x,z),tf(y,u))
-u@[l:lesseq(x,y)][k:lesseq(z,u)]
-satz76a:=satz48(tf(y,u),tf(x,z),satz76(y,x,u,z,satz49(x,y,l),satz49(z,u,k))):lesseq(tf(x,z),tf(y,u))
-y@[v:frac][w:frac][e:eq(tf(y,v),x)][f:eq(tf(y,w),x)]
-satz77b:=satz73e(v,w,y,treq2(tf(y,v),tf(y,w),x,e,f)):eq(v,w)
-+477
-y@v:=fr(ts(1x,2y),ts(2x,1y)):frac
-t1:=tr4eq(tf(y,v),tf(v,y),fr(ts(ts(1x,2y),1y),ts(ts(2x,1y),2y)),fr(ts(1x,ts(1y,2y)),ts(2x,ts(1y,2y))),x,comtf(y,v),tfeq2a(y,ts(1x,2y),ts(2x,1y)),eqnd(ts(ts(1x,2y),1y),ts(ts(2x,1y),2y),ts(1x,ts(1y,2y)),ts(2x,ts(1y,2y)),tris(nat,ts(ts(1x,2y),1y),ts(1x,ts(2y,1y)),ts(1x,ts(1y,2y)),assts1(1x,2y,1y),ists2(ts(2y,1y),ts(1y,2y),1x,comts(2y,1y))),assts1(2x,1y,2y)),satz40a(x,ts(1y,2y))):eq(tf(y,v),x)
--477
-y@satz77a:=somei(frac,[t:frac]eq(tf(y,t),x),v".477",t1".477"):some"l"(frac,[t:frac]eq(tf(y,t),x))
-+rt
-@eq:=[x:frac][y:frac]eq"n"(x,y):[x:frac][y:frac]'prop'
-refeq:=[x:frac]refeq"n"(x):[x:frac]<x><x>eq
-symeq:=[x:frac][y:frac][t:<y><x>eq]symeq"n"(x,y,t):[x:frac][y:frac][t:<y><x>eq]<x><y>eq
-treq:=[x:frac][y:frac][z:frac][t:<y><x>eq][u:<z><y>eq]treq"n"(x,y,z,t,u):[x:frac][y:frac][z:frac][t:<y><x>eq][u:<z><y>eq]<z><x>eq
-[x:frac][s:set(frac)]
-inf:=esti(frac,x,s):'prop'
-@rat:=ect"eq"(frac,eq,refeq,symeq,treq):'type'
-[x0:rat][y0:rat]
-is:=is"e"(rat,x0,y0):'prop'
-nis:=not(is(x0,y0)):'prop'
-@[p:[x:rat]'prop']
-some:=some"l"(rat,p):'prop'
-all:=all"l"(rat,p):'prop'
-one:=one"e"(rat,p):'prop'
-x0@[s:set(rat)]
-in:=esti(rat,x0,s):'prop'
-x@ratof:=ectelt"eq"(frac,eq,refeq,symeq,treq,x):rat
-x0@class:=ecect"eq"(frac,eq,refeq,symeq,treq,x0):set(frac)
-x@inclass:=th5"eq.4"(frac,eq,refeq,symeq,treq,x):inf(x,class(ratof(x)))
-x0@[x:frac][y:frac][xix0:inf(x,class(x0))][e:eq"n"(x,y)]
-lemmaeq1:=th8"eq.4"(frac,eq,refeq,symeq,treq,x0,x,xix0,y,e):inf(y,class(x0))
-x0@[a:'prop'][a1:[x:frac][xi:inf(x,class(x0))]a]
-ratapp1:=th3"eq.4"(frac,eq,refeq,symeq,treq,x0,a,a1):a
-y0@[a:'prop'][a1:[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]a][x:frac][xix0:inf(x,class(x0))]
-+ii5
-t1:=ratapp1(y0,a,[y:frac][yi:inf(y,class(y0))]<yi><xix0><y><x>a1):a
--ii5
-a1@ratapp2:=ratapp1(x0,a,[x:frac][xi:inf(x,class(x0))]t1".ii5"(x,xi)):a
-y0@[z0:rat][a:'prop'][a1:[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]a][x:frac][xix0:inf(x,class(x0))]
-+*ii5
-xix0@t2:=ratapp2(y0,z0,a,[y:frac][z:frac][yi:inf(y,class(y0))][zi:inf(z,class(z0))]<zi><yi><xix0><z><y><x>a1):a
--ii5
-a1@ratapp3:=ratapp1(x0,a,[x:frac][xi:inf(x,class(x0))]t2".ii5"(x,xi)):a
-z0@[u0:rat][a:'prop'][a1:[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]a][x:frac][xix0:inf(x,class(x0))]
-+*ii5
-xix0@t3:=ratapp3(y0,z0,u0,a,[y:frac][z:frac][u:frac][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]<ui><zi><yi><xix0><u><z><y><x>a1):a
--ii5
-a1@ratapp4:=ratapp1(x0,a,[x:frac][xi:inf(x,class(x0))]t3".ii5"(x,xi)):a
-y0@[x1:frac][y1:frac][x1ix0:inf(x1,class(x0))][y1iy0:inf(y1,class(y0))][e:eq"n"(x1,y1)]
-isi:=th3"eq.5"(frac,eq,refeq,symeq,treq,x0,y0,x1,x1ix0,y1,y1iy0,e):is(x0,y0)
-y1iy0@[i:is(x0,y0)]
-ise:=th5"eq.5"(frac,eq,refeq,symeq,treq,x0,y0,x1,x1ix0,y1,y1iy0,i):eq"n"(x1,y1)
-y1iy0@[n:not(eq"n"(x1,y1))]
-nisi:=th3"l.imp"(is(x0,y0),eq"n"(x1,y1),n,[t:is(x0,y0)]ise(t)):nis(x0,y0)
-y1iy0@[n:nis(x0,y0)]
-nise:=th3"l.imp"(eq"n"(x1,y1),is(x0,y0),n,[t:eq"n"(x1,y1)]isi(t)):not(eq"n"(x1,y1))
-@[alpha:'type'][f:[x:frac][y:frac]alpha]
-fixf:=fixfu2"eq"(frac,eq,refeq,symeq,treq,alpha,f):'prop'
-y0@[alpha:'type'][f:[x:frac][y:frac]alpha][ff:fixf(alpha,f)]
-indrat:=indeq2"eq"(frac,eq,refeq,symeq,treq,alpha,f,ff,x0,y0):alpha
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))]
-isindrat:=th1"eq.11"(frac,eq,refeq,symeq,treq,alpha,f,ff,x0,y0,x,xix0,y,yiy0):is"e"(alpha,<y><x>f,indrat)
-x0@satz78:=refis(rat,x0):is(x0,x0)
-y0@[i:is(x0,y0)]
-satz79:=symis(rat,x0,y0,i):is(y0,x0)
-z0@[i:is(x0,y0)][j:is(y0,z0)]
-satz80:=tris(rat,x0,y0,z0,i,j):is(x0,z0)
-y0@more:=some"l"(frac,[x:frac]some"l"(frac,[y:frac]and3(inf(x,class(x0)),inf(y,class(y0)),moref(x,y)))):'prop'
-+*ii5
-y1@propm:=and3(inf(x1,class(x0)),inf(y1,class(y0)),moref(x1,y1)):'prop'
--ii5
-y0@[m:more(x0,y0)][x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][t:frac][s:some"l"(frac,[u:frac]propm".ii5"(t,u))][u:frac][p:propm".ii5"(t,u)]
-+*ii5
-p@t4:=and3e1(inf(t,class(x0)),inf(u,class(y0)),moref(t,u),p):inf(t,class(x0))
-t5:=and3e2(inf(t,class(x0)),inf(u,class(y0)),moref(t,u),p):inf(u,class(y0))
-t6:=and3e3(inf(t,class(x0)),inf(u,class(y0)),moref(t,u),p):moref(t,u)
-t7:=satz44(t,u,x,y,t6,ise(x0,x0,t,x,t4,xix0,refis(rat,x0)),ise(y0,y0,u,y,t5,yiy0,refis(rat,y0))):moref(x,y)
-s@t8:=someapp(frac,[u:frac]propm(t,u),s,moref(x,y),[u:frac][v:propm(t,u)]t7(u,v)):moref(x,y)
--ii5
-yiy0@also18:=someapp(frac,[t:frac]some"l"(frac,[u:frac]propm".ii5"(t,u)),m,moref(x,y),[t:frac][v:some"l"(frac,[u:frac]propm".ii5"(t,u))]t8".ii5"(t,v)):moref(x,y)
-y1iy0@[m:moref(x1,y1)]
-+*ii5
-m@t9:=and3i(inf(x1,class(x0)),inf(y1,class(y0)),moref(x1,y1),x1ix0,y1iy0,m):propm(x1,y1)
-t10:=somei(frac,[t:frac]propm(x1,t),y1,t9):some"l"(frac,[t:frac]propm(x1,t))
--ii5
-m@morei:=somei(frac,[u:frac]some"l"(frac,[t:frac]propm".ii5"(u,t)),x1,t10".ii5"):more(x0,y0)
-y1iy0@[m:more(x0,y0)]
-moree:=also18(m,x1,y1,x1ix0,y1iy0):moref(x1,y1)
-z0@[i:is(x0,y0)][m:more(x0,z0)]
-ismore1:=isp(rat,[t:rat]more(t,z0),x0,y0,m,i):more(y0,z0)
-i@[m:more(z0,x0)]
-ismore2:=isp(rat,[t:rat]more(z0,t),x0,y0,m,i):more(z0,y0)
-u0@[i:is(x0,y0)][j:is(z0,u0)][m:more(x0,z0)]
-ismore12:=ismore2(z0,u0,y0,j,ismore1(x0,y0,z0,i,m)):more(y0,u0)
-y0@less:=some"l"(frac,[x:frac]some"l"(frac,[y:frac]and3(inf(x,class(x0)),inf(y,class(y0)),lessf(x,y)))):'prop'
-+*ii5
-y1@propl:=and3(inf(x1,class(x0)),inf(y1,class(y0)),lessf(x1,y1)):'prop'
--ii5
-y0@[l:less(x0,y0)][x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][t:frac][s:some"l"(frac,[u:frac]propl".ii5"(t,u))][u:frac][p:propl".ii5"(t,u)]
-+*ii5
-p@t11:=and3e1(inf(t,class(x0)),inf(u,class(y0)),lessf(t,u),p):inf(t,class(x0))
-t12:=and3e2(inf(t,class(x0)),inf(u,class(y0)),lessf(t,u),p):inf(u,class(y0))
-t13:=and3e3(inf(t,class(x0)),inf(u,class(y0)),lessf(t,u),p):lessf(t,u)
-t14:=satz45(t,u,x,y,t13,ise(x0,x0,t,x,t11,xix0,refis(rat,x0)),ise(y0,y0,u,y,t12,yiy0,refis(rat,y0))):lessf(x,y)
-s@t15:=someapp(frac,[u:frac]propl(t,u),s,lessf(x,y),[u:frac][v:propl(t,u)]t14(u,v)):lessf(x,y)
--ii5
-yiy0@also19:=someapp(frac,[t:frac]some"l"(frac,[u:frac]propl".ii5"(t,u)),l,lessf(x,y),[t:frac][v:some"l"(frac,[u:frac]propl".ii5"(t,u))]t15".ii5"(t,v)):lessf(x,y)
-y1iy0@[l:lessf(x1,y1)]
-+*ii5
-l@t16:=and3i(inf(x1,class(x0)),inf(y1,class(y0)),lessf(x1,y1),x1ix0,y1iy0,l):propl(x1,y1)
-t17:=somei(frac,[t:frac]propl(x1,t),y1,t16):some"l"(frac,[t:frac]propl(x1,t))
--ii5
-l@lessi:=somei(frac,[u:frac]some"l"(frac,[t:frac]propl".ii5"(u,t)),x1,t17".ii5"):less(x0,y0)
-y1iy0@[l:less(x0,y0)]
-lesse:=also19(l,x1,y1,x1ix0,y1iy0):lessf(x1,y1)
-z0@[i:is(x0,y0)][l:less(x0,z0)]
-isless1:=isp(rat,[t:rat]less(t,z0),x0,y0,l,i):less(y0,z0)
-i@[l:less(z0,x0)]
-isless2:=isp(rat,[t:rat]less(z0,t),x0,y0,l,i):less(z0,y0)
-u0@[i:is(x0,y0)][j:is(z0,u0)][l:less(x0,z0)]
-isless12:=isless2(z0,u0,y0,j,isless1(x0,y0,z0,i,l)):less(y0,u0)
-+581
-y1iy0@t1:=satz41a(x1,y1):or3(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1))
-[e:eq"n"(x1,y1)]
-t2:=or3i1(is(x0,y0),more(x0,y0),less(x0,y0),isi(e)):or3(is(x0,y0),more(x0,y0),less(x0,y0))
-y1iy0@[m:moref(x1,y1)]
-t3:=or3i2(is(x0,y0),more(x0,y0),less(x0,y0),morei(m)):or3(is(x0,y0),more(x0,y0),less(x0,y0))
-y1iy0@[l:lessf(x1,y1)]
-t4:=or3i3(is(x0,y0),more(x0,y0),less(x0,y0),lessi(l)):or3(is(x0,y0),more(x0,y0),less(x0,y0))
-y1iy0@t5:=or3app(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1),or3(is(x0,y0),more(x0,y0),less(x0,y0)),t1,[t:eq"n"(x1,y1)]t2(t),[t:moref(x1,y1)]t3(t),[t:lessf(x1,y1)]t4(t)):or3(is(x0,y0),more(x0,y0),less(x0,y0))
-t6:=satz41b(x1,y1):ec3(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1))
-[i:is(x0,y0)]
-t7:=th3"l.imp"(more(x0,y0),moref(x1,y1),ec3e12(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1),t6,ise(i)),[t:more(x0,y0)]moree(t)):not(more(x0,y0))
-y1iy0@[m:more(x0,y0)]
-t8:=th3"l.imp"(less(x0,y0),lessf(x1,y1),ec3e23(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1),t6,moree(m)),[t:less(x0,y0)]lesse(t)):not(less(x0,y0))
-y1iy0@[l:less(x0,y0)]
-t9:=th3"l.imp"(is(x0,y0),eq"n"(x1,y1),ec3e31(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1),t6,lesse(l)),[t:is(x0,y0)]ise(t)):nis(x0,y0)
-y1iy0@t10:=th6"l.ec3"(is(x0,y0),more(x0,y0),less(x0,y0),th1"l.ec"(is(x0,y0),more(x0,y0),[t:is(x0,y0)]t7(t)),th1"l.ec"(more(x0,y0),less(x0,y0),[t:more(x0,y0)]t8(t)),th1"l.ec"(less(x0,y0),is(x0,y0),[t:less(x0,y0)]t9(t))):ec3(is(x0,y0),more(x0,y0),less(x0,y0))
-t11:=orec3i(is(x0,y0),more(x0,y0),less(x0,y0),t5,t10):orec3(is(x0,y0),more(x0,y0),less(x0,y0))
--581
-y0@satz81:=ratapp2(orec3(is(x0,y0),more(x0,y0),less(x0,y0)),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t11".581"(x,y,xi,yi)):orec3(is(x0,y0),more(x0,y0),less(x0,y0))
-satz81a:=orec3e1(is(x0,y0),more(x0,y0),less(x0,y0),satz81):or3(is(x0,y0),more(x0,y0),less(x0,y0))
-satz81b:=orec3e2(is(x0,y0),more(x0,y0),less(x0,y0),satz81):ec3(is(x0,y0),more(x0,y0),less(x0,y0))
-[m:more(x0,y0)]
-+582
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))]
-t1:=lessi(y0,x0,y,x,yiy0,xix0,satz42(x,y,moree(x0,y0,x,y,xix0,yiy0,m))):less(y0,x0)
--582
-satz82:=ratapp2(less(y0,x0),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".582"(x,y,xi,yi)):less(y0,x0)
-y0@[l:less(x0,y0)]
-+583
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))]
-t1:=morei(y0,x0,y,x,yiy0,xix0,satz43(x,y,lesse(x0,y0,x,y,xix0,yiy0,l))):more(y0,x0)
--583
-satz83:=ratapp2(more(y0,x0),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".583"(x,y,xi,yi)):more(y0,x0)
-y0@moreis:=or(more(x0,y0),is(x0,y0)):'prop'
-[m:more(x0,y0)]
-moreisi1:=ori1(more,is,m):moreis(x0,y0)
-y0@[i:is(x0,y0)]
-moreisi2:=ori2(more,is,i):moreis(x0,y0)
-y1iy0@[m:moreq(x1,y1)]
-moreisi:=orapp(moref(x1,y1),eq"n"(x1,y1),moreis,m,[t:moref(x1,y1)]moreisi1(morei(t)),[t:eq"n"(x1,y1)]moreisi2(isi(t))):moreis(x0,y0)
-y1iy0@[m:moreis(x0,y0)]
-moreise:=orapp(more,is,moreq(x1,y1),m,[t:more]moreqi1(x1,y1,moree(t)),[t:is]moreqi2(x1,y1,ise(t))):moreq(x1,y1)
-z0@[i:is(x0,y0)][m:moreis(x0,z0)]
-ismoreis1:=isp(rat,[t:rat]moreis(t,z0),x0,y0,m,i):moreis(y0,z0)
-i@[m:moreis(z0,x0)]
-ismoreis2:=isp(rat,[t:rat]moreis(z0,t),x0,y0,m,i):moreis(z0,y0)
-u0@[i:is(x0,y0)][j:is(z0,u0)][m:moreis(x0,z0)]
-ismoreis12:=ismoreis2(z0,u0,y0,j,ismoreis1(x0,y0,z0,i,m)):moreis(y0,u0)
-y0@lessis:=or(less(x0,y0),is(x0,y0)):'prop'
-[l:less(x0,y0)]
-lessisi1:=ori1(less,is,l):lessis(x0,y0)
-y0@[i:is(x0,y0)]
-lessisi2:=ori2(less,is,i):lessis(x0,y0)
-y1iy0@[l:lesseq(x1,y1)]
-lessisi:=orapp(lessf(x1,y1),eq"n"(x1,y1),lessis,l,[t:lessf(x1,y1)]lessisi1(lessi(t)),[t:eq"n"(x1,y1)]lessisi2(isi(t))):lessis(x0,y0)
-y1iy0@[l:lessis(x0,y0)]
-lessise:=orapp(less,is,lesseq(x1,y1),l,[t:less]lesseqi1(x1,y1,lesse(t)),[t:is]lesseqi2(x1,y1,ise(t))):lesseq(x1,y1)
-z0@[i:is(x0,y0)][l:lessis(x0,z0)]
-islessis1:=isp(rat,[t:rat]lessis(t,z0),x0,y0,l,i):lessis(y0,z0)
-i@[l:lessis(z0,x0)]
-islessis2:=isp(rat,[t:rat]lessis(z0,t),x0,y0,l,i):lessis(z0,y0)
-u0@[i:is(x0,y0)][j:is(z0,u0)][l:lessis(x0,z0)]
-islessis12:=islessis2(z0,u0,y0,j,islessis1(x0,y0,z0,i,l)):lessis(y0,u0)
-y0@[m:moreis(x0,y0)]
-satz81c:=th7"l.ec3"(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,comor(more(x0,y0),is(x0,y0),m)):not(less(x0,y0))
-y0@[l:lessis(x0,y0)]
-satz81d:=th9"l.ec3"(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,l):not(more(x0,y0))
-y0@[n:not(more(x0,y0))]
-satz81e:=th2"l.or3"(is(x0,y0),more(x0,y0),less(x0,y0),satz81a,n):lessis(x0,y0)
-y0@[n:not(less(x0,y0))]
-satz81f:=comor(is(x0,y0),more(x0,y0),th3"l.or3"(is(x0,y0),more(x0,y0),less(x0,y0),satz81a,n)):moreis(x0,y0)
-y0@[m:more(x0,y0)]
-satz81g:=th3"l.or"(less(x0,y0),is(x0,y0),ec3e23(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,m),ec3e21(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,m)):not(lessis(x0,y0))
-y0@[l:less(x0,y0)]
-satz81h:=th3"l.or"(more(x0,y0),is(x0,y0),ec3e32(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,l),ec3e31(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,l)):not(moreis(x0,y0))
-y0@[n:not(moreis(x0,y0))]
-satz81j:=or3e3(is(x0,y0),more(x0,y0),less(x0,y0),satz81a,th5"l.or"(more(x0,y0),is(x0,y0),n),th4"l.or"(more(x0,y0),is(x0,y0),n)):less(x0,y0)
-y0@[n:not(lessis(x0,y0))]
-satz81k:=or3e2(is(x0,y0),more(x0,y0),less(x0,y0),satz81a,th4"l.or"(less(x0,y0),is(x0,y0),n),th5"l.or"(less(x0,y0),is(x0,y0),n)):more(x0,y0)
-y0@[m:moreis(x0,y0)]
-+584
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))]
-t1:=lessisi(y0,x0,y,x,yiy0,xix0,satz48(x,y,moreise(x0,y0,x,y,xix0,yiy0,m))):lessis(y0,x0)
--584
-satz84:=ratapp2(lessis(y0,x0),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".584"(x,y,xi,yi)):lessis(y0,x0)
-y0@[l:lessis(x0,y0)]
-+585
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))]
-t1:=moreisi(y0,x0,y,x,yiy0,xix0,satz49(x,y,lessise(x0,y0,x,y,xix0,yiy0,l))):moreis(y0,x0)
--585
-satz85:=ratapp2(moreis(y0,x0),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".585"(x,y,xi,yi)):moreis(y0,x0)
-z0@[l:less(x0,y0)][k:less(y0,z0)]
-+586
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=lessi(x0,z0,x,z,xix0,ziz0,satz50(x,y,z,lesse(x0,y0,x,y,xix0,yiy0,l),lesse(y0,z0,y,z,yiy0,ziz0,k))):less(x0,z0)
--586
-satz86:=ratapp3(less(x0,z0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".586"(x,y,z,xi,yi,zi)):less(x0,z0)
-trless:=satz86:less(x0,z0)
-z0@[m:more(x0,y0)][n:more(y0,z0)]
-trmore:=satz83(z0,x0,satz86(z0,y0,x0,satz82(y0,z0,n),satz82(m))):more(x0,z0)
-z0@[l:lessis(x0,y0)][k:less(y0,z0)]
-+587
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=lessi(x0,z0,x,z,xix0,ziz0,satz51a(x,y,z,lessise(x0,y0,x,y,xix0,yiy0,l),lesse(y0,z0,y,z,yiy0,ziz0,k))):less(x0,z0)
--587
-satz87a:=ratapp3(less(x0,z0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".587"(x,y,z,xi,yi,zi)):less(x0,z0)
-z0@[l:less(x0,y0)][k:lessis(y0,z0)]
-+*587
-k@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t2:=lessi(x0,z0,x,z,xix0,ziz0,satz51b(x,y,z,lesse(x0,y0,x,y,xix0,yiy0,l),lessise(y0,z0,y,z,yiy0,ziz0,k))):less(x0,z0)
--587
-k@satz87b:=ratapp3(less(x0,z0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t2".587"(x,y,z,xi,yi,zi)):less(x0,z0)
-z0@[m:moreis(x0,y0)][n:more(y0,z0)]
-satz87c:=satz83(z0,x0,satz87b(z0,y0,x0,satz82(y0,z0,n),satz84(m))):more(x0,z0)
-z0@[m:more(x0,y0)][n:moreis(y0,z0)]
-satz87d:=satz83(z0,x0,satz87a(z0,y0,x0,satz84(y0,z0,n),satz82(m))):more(x0,z0)
-z0@[l:lessis(x0,y0)][k:lessis(y0,z0)]
-+588
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=lessisi(x0,z0,x,z,xix0,ziz0,satz52(x,y,z,lessise(x0,y0,x,y,xix0,yiy0,l),lessise(y0,z0,y,z,yiy0,ziz0,k))):lessis(x0,z0)
--588
-satz88:=ratapp3(lessis(x0,z0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".588"(x,y,z,xi,yi,zi)):lessis(x0,z0)
-trlessis:=satz88:lessis(x0,z0)
-z0@[m:moreis(x0,y0)][n:moreis(y0,z0)]
-trmoreis:=satz85(z0,x0,satz88(z0,y0,x0,satz84(y0,z0,n),satz84(m))):moreis(x0,z0)
-+589
-x0@[x:frac][xix0:inf(x,class(x0))][z:frac][m:moref(z,x)]
-t1:=somei(rat,[t:rat]more(t,x0),ratof(z),morei(ratof(z),x0,z,x,inclass(z),xix0,m)):some([t:rat]more(t,x0))
-xix0@t2:=someapp(frac,[t:frac]moref(t,x),satz53(x),some([t:rat]more(t,x0)),[t:frac][u:moref(t,x)]t1(t,u)):some([t:rat]more(t,x0))
--589
-x0@satz89:=ratapp1(some([t:rat]more(t,x0)),[x:frac][xi:inf(x,class(x0))]t2".589"(x,xi)):some([t:rat]more(t,x0))
-+590
-z"rt.589"@[l:lessf(z,x)]
-t1:=somei(rat,[t:rat]less(t,x0),ratof(z),lessi(ratof(z),x0,z,x,inclass(z),xix0,l)):some([t:rat]less(t,x0))
-xix0"rt.589"@t2:=someapp(frac,[t:frac]lessf(t,x),satz54(x),some([t:rat]less(t,x0)),[t:frac][u:lessf(t,x)]t1(t,u)):some([t:rat]less(t,x0))
--590
-satz90:=ratapp1(some([t:rat]less(t,x0)),[x:frac][xi:inf(x,class(x0))]t2".590"(x,xi)):some([t:rat]less(t,x0))
-y0@[l:less(x0,y0)]
-+591
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][z:frac][a:and(lessf(x,z),lessf(z,y))]
-t1:=lessi(x0,ratof(z),x,z,xix0,inclass(z),ande1(lessf(x,z),lessf(z,y),a)):less(x0,ratof(z))
-t2:=lessi(ratof(z),y0,z,y,inclass(z),yiy0,ande2(lessf(x,z),lessf(z,y),a)):less(ratof(z),y0)
-t3:=andi(less(x0,ratof(z)),less(ratof(z),y0),t1,t2):and(less(x0,ratof(z)),less(ratof(z),y0))
-t4:=somei(rat,[t:rat]and(less(x0,t),less(t,y0)),ratof(z),t3):some([t:rat]and(less(x0,t),less(t,y0)))
-yiy0@t5:=someapp(frac,[t:frac]and(lessf(x,t),lessf(t,y)),satz55(x,y,lesse(x,y,xix0,yiy0,l)),some([t:rat]and(less(x0,t),less(t,y0))),[t:frac][u:and(lessf(x,t),lessf(t,y))]t4(t,u)):some([t:rat]and(less(x0,t),less(t,y0)))
--591
-satz91:=ratapp2(some([t:rat]and(less(x0,t),less(t,y0))),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t5".591"(x,y,xi,yi)):some([t:rat]and(less(x0,t),less(t,y0)))
-@plusfrt:=[x:frac][y:frac]ratof(pf(x,y)):[x:frac][y:frac]rat
-[x:frac][y:frac][z:frac][u:frac][e:eq"n"(x,y)][f:eq"n"(z,u)]
-+*ii5
-f@t18:=isi(ratof(pf(x,z)),ratof(pf(y,u)),pf(x,z),pf(y,u),inclass(pf(x,z)),inclass(pf(y,u)),satz56(x,y,z,u,e,f)):is(<z><x>plusfrt,<u><y>plusfrt)
--ii5
-@fplusfrt:=[x:frac][y:frac][z:frac][u:frac][v:<y><x>eq][w:<u><z>eq]t18".ii5"(x,y,z,u,v,w):fixf(rat,plusfrt)
-y0@pl:=indrat(rat,plusfrt,fplusfrt):rat
-+*ii5
-y1iy0@t19:=isindrat(rat,plusfrt,fplusfrt,x1,y1,x1ix0,y1iy0):is(ratof(pf(x1,y1)),pl(x0,y0))
--ii5
-y1iy0@picp:=isp(rat,[t:rat]inf(pf(x1,y1),class(t)),ratof(pf(x1,y1)),pl(x0,y0),inclass(pf(x1,y1)),t19".ii5"):inf(pf(x1,y1),class(pl(x0,y0)))
-z0@[i:is(x0,y0)]
-ispl1:=isf(rat,rat,[t:rat]pl(t,z0),x0,y0,i):is(pl(x0,z0),pl(y0,z0))
-ispl2:=isf(rat,rat,[t:rat]pl(z0,t),x0,y0,i):is(pl(z0,x0),pl(z0,y0))
-u0@[i:is(x0,y0)][j:is(z0,u0)]
-ispl12:=tris(rat,pl(x0,z0),pl(y0,z0),pl(y0,u0),ispl1(i),ispl2(z0,u0,y0,j)):is(pl(x0,z0),pl(y0,u0))
-+592
-y1iy0@t1:=isi(pl(x0,y0),pl(y0,x0),pf(x1,y1),pf(y1,x1),picp,picp(y0,x0,y1,x1,y1iy0,x1ix0),satz58(x1,y1)):is(pl(x0,y0),pl(y0,x0))
--592
-y0@satz92:=ratapp2(is(pl(x0,y0),pl(y0,x0)),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".592"(x,y,xi,yi)):is(pl(x0,y0),pl(y0,x0))
-compl:=satz92:is(pl(x0,y0),pl(y0,x0))
-+593
-z0@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=picp(pl(x0,y0),z0,pf(x,y),z,picp(x0,y0,x,y,xix0,yiy0),ziz0):inf(pf(pf(x,y),z),class(pl(pl(x0,y0),z0)))
-t2:=picp(x0,pl(y0,z0),x,pf(y,z),xix0,picp(y0,z0,y,z,yiy0,ziz0)):inf(pf(x,pf(y,z)),class(pl(x0,pl(y0,z0))))
-t3:=isi(pl(pl(x0,y0),z0),pl(x0,pl(y0,z0)),pf(pf(x,y),z),pf(x,pf(y,z)),t1,t2,satz59(x,y,z)):is(pl(pl(x0,y0),z0),pl(x0,pl(y0,z0)))
--593
-z0@satz93:=ratapp3(is(pl(pl(x0,y0),z0),pl(x0,pl(y0,z0))),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".593"(x,y,z,xi,yi,zi)):is(pl(pl(x0,y0),z0),pl(x0,pl(y0,z0)))
-asspl1:=satz93:is(pl(pl(x0,y0),z0),pl(x0,pl(y0,z0)))
-asspl2:=symis(rat,pl(pl(x0,y0),z0),pl(x0,pl(y0,z0)),satz93):is(pl(x0,pl(y0,z0)),pl(pl(x0,y0),z0))
-+594
-y1iy0@t1:=morei(pl(x0,y0),x0,pf(x1,y1),x1,picp,x1ix0,satz60(x1,y1)):more(pl(x0,y0),x0)
--594
-y0@satz94:=ratapp2(more(pl(x0,y0),x0),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".594"(x,y,xi,yi)):more(pl(x0,y0),x0)
-satz94a:=satz82(pl(x0,y0),x0,satz94):less(x0,pl(x0,y0))
-z0@[m:more(x0,y0)]
-+595
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=morei(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),satz61(x,y,z,moree(x0,y0,x,y,xix0,yiy0,m))):more(pl(x0,z0),pl(y0,z0))
--595
-satz95:=ratapp3(more(pl(x0,z0),pl(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".595"(x,y,z,xi,yi,zi)):more(pl(x0,z0),pl(y0,z0))
-z0@[m:more(x0,y0)]
-+596
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=morei(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),satz62a(x,y,z,moree(x0,y0,x,y,xix0,yiy0,m))):more(pl(x0,z0),pl(y0,z0))
--596
-satz96a:=ratapp3(more(pl(x0,z0),pl(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".596"(x,y,z,xi,yi,zi)):more(pl(x0,z0),pl(y0,z0))
-z0@[i:is(x0,y0)]
-+*596
-i@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t2:=isi(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),satz62b(x,y,z,ise(x0,y0,x,y,xix0,yiy0,i))):is(pl(x0,z0),pl(y0,z0))
--596
-i@satz96b:=ratapp3(is(pl(x0,z0),pl(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t2".596"(x,y,z,xi,yi,zi)):is(pl(x0,z0),pl(y0,z0))
-z0@[l:less(x0,y0)]
-+*596
-l@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t3:=lessi(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),satz62c(x,y,z,lesse(x0,y0,x,y,xix0,yiy0,l))):less(pl(x0,z0),pl(y0,z0))
--596
-l@satz96c:=ratapp3(less(pl(x0,z0),pl(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".596"(x,y,z,xi,yi,zi)):less(pl(x0,z0),pl(y0,z0))
-+*596
-m@andersa:=satz95(m):more(pl(x0,z0),pl(y0,z0))
-i@andersb:=ispl1(x0,y0,z0,i):is(pl(x0,z0),pl(y0,z0))
-l@andersc:=satz82(pl(y0,z0),pl(x0,z0),satz95(y0,x0,z0,satz83(l))):less(pl(x0,z0),pl(y0,z0))
--596
-m@satz96d:=ismore12(pl(x0,z0),pl(z0,x0),pl(y0,z0),pl(z0,y0),compl(x0,z0),compl(y0,z0),satz96a):more(pl(z0,x0),pl(z0,y0))
-i@satz96e:=ispl2(x0,y0,z0,i):is(pl(z0,x0),pl(z0,y0))
-l@satz96f:=isless12(pl(x0,z0),pl(z0,x0),pl(y0,z0),pl(z0,y0),compl(x0,z0),compl(y0,z0),satz96c):less(pl(z0,x0),pl(z0,y0))
-z0@[m:more(pl(x0,z0),pl(y0,z0))]
-+597
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=morei(x0,y0,x,y,xix0,yiy0,satz63a(x,y,z,moree(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),m))):more(x0,y0)
--597
-satz97a:=ratapp3(more(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".597"(x,y,z,xi,yi,zi)):more(x0,y0)
-z0@[i:is(pl(x0,z0),pl(y0,z0))]
-+*597
-i@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t2:=isi(x0,y0,x,y,xix0,yiy0,satz63b(x,y,z,ise(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),i))):is(x0,y0)
--597
-i@satz97b:=ratapp3(is(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t2".597"(x,y,z,xi,yi,zi)):is(x0,y0)
-z0@[l:less(pl(x0,z0),pl(y0,z0))]
-+*597
-l@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t3:=lessi(x0,y0,x,y,xix0,yiy0,satz63c(x,y,z,lesse(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),l))):less(x0,y0)
--597
-l@satz97c:=ratapp3(less(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".597"(x,y,z,xi,yi,zi)):less(x0,y0)
-+*597
-l@anders:=satz82(y0,x0,satz97a(y0,x0,z0,satz83(pl(x0,z0),pl(y0,z0),l))):less(x0,y0)
--597
-u0@[m:more(x0,y0)][n:more(z0,u0)]
-+598
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=morei(pl(x0,z0),pl(y0,u0),pf(x,z),pf(y,u),picp(x0,z0,x,z,xix0,ziz0),picp(y0,u0,y,u,yiy0,uiu0),satz64(x,y,z,u,moree(x0,y0,x,y,xix0,yiy0,m),moree(z0,u0,z,u,ziz0,uiu0,n))):more(pl(x0,z0),pl(y0,u0))
--598
-satz98:=ratapp4(more(pl(x0,z0),pl(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".598"(x,y,z,u,xi,yi,zi,ui)):more(pl(x0,z0),pl(y0,u0))
-u0@[l:less(x0,y0)][k:less(z0,u0)]
-satz98a:=satz82(pl(y0,u0),pl(x0,z0),satz98(y0,x0,u0,z0,satz83(l),satz83(z0,u0,k))):less(pl(x0,z0),pl(y0,u0))
-u0@[m:moreis(x0,y0)][n:more(z0,u0)]
-+599
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=morei(pl(x0,z0),pl(y0,u0),pf(x,z),pf(y,u),picp(x0,z0,x,z,xix0,ziz0),picp(y0,u0,y,u,yiy0,uiu0),satz65a(x,y,z,u,moreise(x0,y0,x,y,xix0,yiy0,m),moree(z0,u0,z,u,ziz0,uiu0,n))):more(pl(x0,z0),pl(y0,u0))
--599
-satz99a:=ratapp4(more(pl(x0,z0),pl(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".599"(x,y,z,u,xi,yi,zi,ui)):more(pl(x0,z0),pl(y0,u0))
-u0@[m:more(x0,y0)][n:moreis(z0,u0)]
-+*599
-n@[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t2:=morei(pl(x0,z0),pl(y0,u0),pf(x,z),pf(y,u),picp(x0,z0,x,z,xix0,ziz0),picp(y0,u0,y,u,yiy0,uiu0),satz65b(x,y,z,u,moree(x0,y0,x,y,xix0,yiy0,m),moreise(z0,u0,z,u,ziz0,uiu0,n))):more(pl(x0,z0),pl(y0,u0))
--599
-n@satz99b:=ratapp4(more(pl(x0,z0),pl(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t2".599"(x,y,z,u,xi,yi,zi,ui)):more(pl(x0,z0),pl(y0,u0))
-u0@[l:lessis(x0,y0)][k:less(z0,u0)]
-satz99c:=satz82(pl(y0,u0),pl(x0,z0),satz99a(y0,x0,u0,z0,satz85(l),satz83(z0,u0,k))):less(pl(x0,z0),pl(y0,u0))
-u0@[l:less(x0,y0)][k:lessis(z0,u0)]
-satz99d:=satz82(pl(y0,u0),pl(x0,z0),satz99b(y0,x0,u0,z0,satz83(l),satz85(z0,u0,k))):less(pl(x0,z0),pl(y0,u0))
-u0@[m:moreis(x0,y0)][n:moreis(z0,u0)]
-+5100
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=moreisi(pl(x0,z0),pl(y0,u0),pf(x,z),pf(y,u),picp(x0,z0,x,z,xix0,ziz0),picp(y0,u0,y,u,yiy0,uiu0),satz66(x,y,z,u,moreise(x0,y0,x,y,xix0,yiy0,m),moreise(z0,u0,z,u,ziz0,uiu0,n))):moreis(pl(x0,z0),pl(y0,u0))
--5100
-satz100:=ratapp4(moreis(pl(x0,z0),pl(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".5100"(x,y,z,u,xi,yi,zi,ui)):moreis(pl(x0,z0),pl(y0,u0))
-u0@[l:lessis(x0,y0)][k:lessis(z0,u0)]
-satz100a:=satz84(pl(y0,u0),pl(x0,z0),satz100(y0,x0,u0,z0,satz85(l),satz85(z0,u0,k))):lessis(pl(x0,z0),pl(y0,u0))
-y0@[l:lessis(x0,y0)]
-+5101
-[v0:rat][i:is(pl(y0,v0),x0)]
-t1:=ismore1(pl(y0,v0),x0,y0,i,satz94(y0,v0)):more(x0,y0)
-v0@t2:=th3"l.imp"(is(pl(y0,v0),x0),more(x0,y0),satz81d(x0,y0,l),[t:is(pl(y0,v0),x0)]t1(t)):nis(pl(y0,v0),x0)
--5101
-vorbemerkung101:=th5"l.some"(rat,[v:rat]is(pl(y0,v),x0),[v:rat]t2".5101"(v)):not(some([t:rat]is(pl(y0,t),x0)))
-y0@[m:more(x0,y0)]
-+*5101
-m@[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][v:frac][e:eq"n"(pf(y,v),x)]
-t3:=isi(pl(y0,ratof(v)),x0,pf(y,v),x,picp(y0,ratof(v),y,v,yiy0,inclass(v)),xix0,e):is(pl(y0,ratof(v)),x0)
-t4:=somei(rat,[t:rat]is(pl(y0,t),x0),ratof(v),t3):some([t:rat]is(pl(y0,t),x0))
-yiy0@t5:=someapp(frac,[t:frac]eq"n"(pf(y,t),x),satz67a(x,y,moree(x0,y0,x,y,xix0,yiy0,m)),some([t:rat]is(pl(y0,t),x0)),[t:frac][u:eq"n"(pf(y,t),x)]t4(t,u)):some([t:rat]is(pl(y0,t),x0))
--5101
-m@satz101a:=ratapp2(some([t:rat]is(pl(y0,t),x0)),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t5".5101"(x,y,xi,yi)):some([t:rat]is(pl(y0,t),x0))
-y0@[v0:rat][w0:rat][i:is(pl(y0,v0),x0)][j:is(pl(y0,w0),x0)]
-+*5101
-j@[x:frac][y:frac][v:frac][w:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][viv0:inf(v,class(v0))][wiw0:inf(w,class(w0))]
-t6:=isi(v0,w0,v,w,viv0,wiw0,satz67b(x,y,v,w,ise(pl(y0,v0),x0,pf(y,v),x,picp(y0,v0,y,v,yiy0,viv0),xix0,i),ise(pl(y0,w0),x0,pf(y,w),x,picp(y0,w0,y,w,yiy0,wiw0),xix0,j))):is(v0,w0)
--5101
-j@satz101b:=ratapp4(v0,w0,is(v0,w0),[x:frac][y:frac][v:frac][w:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][vi:inf(v,class(v0))][wi:inf(w,class(w0))]t6".5101"(x,y,v,w,xi,yi,vi,wi)):is(v0,w0)
-+*5101
-y0@t7:=[t:rat][u:rat][v:is(pl(y0,t),x0)][w:is(pl(y0,u),x0)]satz101b(t,u,v,w):amone(rat,[t:rat]is(pl(y0,t),x0))
--5101
-m@satz101:=onei(rat,[t:rat]is(pl(y0,t),x0),t7".5101",satz101a):one([t:rat]is(pl(y0,t),x0))
-mn:=ind(rat,[t:rat]is(pl(y0,t),x0),satz101):rat
-satz101c:=oneax(rat,[t:rat]is(pl(y0,t),x0),satz101):is(pl(y0,mn(x0,y0,m)),x0)
-satz101d:=symis(rat,pl(y0,mn(x0,y0,m)),x0,satz101c):is(x0,pl(y0,mn(x0,y0,m)))
-satz101e:=tris(rat,pl(mn(x0,y0,m),y0),pl(y0,mn(x0,y0,m)),x0,compl(mn(x0,y0,m),y0),satz101c):is(pl(mn(x0,y0,m),y0),x0)
-satz101f:=symis(rat,pl(mn(x0,y0,m),y0),x0,satz101e):is(x0,pl(mn(x0,y0,m),y0))
-y0@[v0:rat][m:more(x0,y0)][i:is(pl(y0,v0),x0)]
-satz101g:=satz101b(v0,mn(x0,y0,m),i,satz101c(m)):is(v0,mn(x0,y0,m))
-@timesfrt:=[x:frac][y:frac]ratof(tf(x,y)):[x:frac][y:frac]rat
-+*ii5
-f@t20:=isi(ratof(tf(x,z)),ratof(tf(y,u)),tf(x,z),tf(y,u),inclass(tf(x,z)),inclass(tf(y,u)),satz68(x,y,z,u,e,f)):is(<z><x>timesfrt,<u><y>timesfrt)
--ii5
-@ftimesfrt:=[x:frac][y:frac][z:frac][u:frac][v:<y><x>eq][w:<u><z>eq]t20".ii5"(x,y,z,u,v,w):fixf(rat,timesfrt)
-y0@ts:=indrat(rat,timesfrt,ftimesfrt):rat
-+*ii5
-y1iy0@t21:=isindrat(rat,timesfrt,ftimesfrt,x1,y1,x1ix0,y1iy0):is(ratof(tf(x1,y1)),ts(x0,y0))
--ii5
-y1iy0@tict:=isp(rat,[t:rat]inf(tf(x1,y1),class(t)),ratof(tf(x1,y1)),ts(x0,y0),inclass(tf(x1,y1)),t21".ii5"):inf(tf(x1,y1),class(ts(x0,y0)))
-z0@[i:is(x0,y0)]
-ists1:=isf(rat,rat,[t:rat]ts(t,z0),x0,y0,i):is(ts(x0,z0),ts(y0,z0))
-ists2:=isf(rat,rat,[t:rat]ts(z0,t),x0,y0,i):is(ts(z0,x0),ts(z0,y0))
-u0@[i:is(x0,y0)][j:is(z0,u0)]
-ists12:=tris(rat,ts(x0,z0),ts(y0,z0),ts(y0,u0),ists1(i),ists2(z0,u0,y0,j)):is(ts(x0,z0),ts(y0,u0))
-+5102
-y1iy0@t1:=isi(ts(x0,y0),ts(y0,x0),tf(x1,y1),tf(y1,x1),tict,tict(y0,x0,y1,x1,y1iy0,x1ix0),satz69(x1,y1)):is(ts(x0,y0),ts(y0,x0))
--5102
-y0@satz102:=ratapp2(is(ts(x0,y0),ts(y0,x0)),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".5102"(x,y,xi,yi)):is(ts(x0,y0),ts(y0,x0))
-comts:=satz102:is(ts(x0,y0),ts(y0,x0))
-+5103
-ziz0"rt.593"@t1:=tict(ts(x0,y0),z0,tf(x,y),z,tict(x0,y0,x,y,xix0,yiy0),ziz0):inf(tf(tf(x,y),z),class(ts(ts(x0,y0),z0)))
-t2:=tict(x0,ts(y0,z0),x,tf(y,z),xix0,tict(y0,z0,y,z,yiy0,ziz0)):inf(tf(x,tf(y,z)),class(ts(x0,ts(y0,z0))))
-t3:=isi(ts(ts(x0,y0),z0),ts(x0,ts(y0,z0)),tf(tf(x,y),z),tf(x,tf(y,z)),t1,t2,satz70(x,y,z)):is(ts(ts(x0,y0),z0),ts(x0,ts(y0,z0)))
--5103
-z0@satz103:=ratapp3(is(ts(ts(x0,y0),z0),ts(x0,ts(y0,z0))),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".5103"(x,y,z,xi,yi,zi)):is(ts(ts(x0,y0),z0),ts(x0,ts(y0,z0)))
-assts1:=satz103:is(ts(ts(x0,y0),z0),ts(x0,ts(y0,z0)))
-assts2:=symis(rat,ts(ts(x0,y0),z0),ts(x0,ts(y0,z0)),satz103):is(ts(x0,ts(y0,z0)),ts(ts(x0,y0),z0))
-+5104
-ziz0"rt.593"@t1:=tict(x0,pl(y0,z0),x,pf(y,z),xix0,picp(y0,z0,y,z,yiy0,ziz0)):inf(tf(x,pf(y,z)),class(ts(x0,pl(y0,z0))))
-t2:=picp(ts(x0,y0),ts(x0,z0),tf(x,y),tf(x,z),tict(x0,y0,x,y,xix0,yiy0),tict(x0,z0,x,z,xix0,ziz0)):inf(pf(tf(x,y),tf(x,z)),class(pl(ts(x0,y0),ts(x0,z0))))
-t3:=isi(ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0)),tf(x,pf(y,z)),pf(tf(x,y),tf(x,z)),t1,t2,satz71(x,y,z)):is(ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0)))
--5104
-satz104:=ratapp3(is(ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0))),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".5104"(x,y,z,xi,yi,zi)):is(ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0)))
-disttp1:=tr3is(rat,ts(pl(x0,y0),z0),ts(z0,pl(x0,y0)),pl(ts(z0,x0),ts(z0,y0)),pl(ts(x0,z0),ts(y0,z0)),comts(pl(x0,y0),z0),satz104(z0,x0,y0),ispl12(ts(z0,x0),ts(x0,z0),ts(z0,y0),ts(y0,z0),comts(z0,x0),comts(z0,y0))):is(ts(pl(x0,y0),z0),pl(ts(x0,z0),ts(y0,z0)))
-disttp2:=satz104:is(ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0)))
-distpt1:=symis(rat,ts(pl(x0,y0),z0),pl(ts(x0,z0),ts(y0,z0)),disttp1):is(pl(ts(x0,z0),ts(y0,z0)),ts(pl(x0,y0),z0))
-distpt2:=symis(rat,ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0)),disttp2):is(pl(ts(x0,y0),ts(x0,z0)),ts(x0,pl(y0,z0)))
-[m:more(x0,y0)]
-+5105
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=morei(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xix0,ziz0),tict(y0,z0,y,z,yiy0,ziz0),satz72a(x,y,z,moree(x0,y0,x,y,xix0,yiy0,m))):more(ts(x0,z0),ts(y0,z0))
--5105
-satz105a:=ratapp3(more(ts(x0,z0),ts(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".5105"(x,y,z,xi,yi,zi)):more(ts(x0,z0),ts(y0,z0))
-z0@[i:is(x0,y0)]
-+*5105
-i@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t2:=isi(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xix0,ziz0),tict(y0,z0,y,z,yiy0,ziz0),satz72b(x,y,z,ise(x0,y0,x,y,xix0,yiy0,i))):is(ts(x0,z0),ts(y0,z0))
--5105
-i@satz105b:=ratapp3(is(ts(x0,z0),ts(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t2".5105"(x,y,z,xi,yi,zi)):is(ts(x0,z0),ts(y0,z0))
-z0@[l:less(x0,y0)]
-+*5105
-l@[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]
-t3:=lessi(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xi,zi),tict(y0,z0,y,z,yi,zi),satz72c(x,y,z,lesse(x0,y0,x,y,xi,yi,l))):less(ts(x0,z0),ts(y0,z0))
--5105
-l@satz105c:=ratapp3(less(ts(x0,z0),ts(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".5105"(x,y,z,xi,yi,zi)):less(ts(x0,z0),ts(y0,z0))
-+*5105
-i@andersb:=ists1(x0,y0,z0,i):is(ts(x0,z0),ts(y0,z0))
-l@andersc:=satz82(ts(y0,z0),ts(x0,z0),satz105a(y0,x0,z0,satz83(l))):less(ts(x0,z0),ts(y0,z0))
--5105
-m@satz105d:=ismore12(ts(x0,z0),ts(z0,x0),ts(y0,z0),ts(z0,y0),comts(x0,z0),comts(y0,z0),satz105a):more(ts(z0,x0),ts(z0,y0))
-i@satz105e:=ists2(x0,y0,z0,i):is(ts(z0,x0),ts(z0,y0))
-l@satz105f:=isless12(ts(x0,z0),ts(z0,x0),ts(y0,z0),ts(z0,y0),comts(x0,z0),comts(y0,z0),satz105c):less(ts(z0,x0),ts(z0,y0))
-z0@[m:more(ts(x0,z0),ts(y0,z0))]
-+5106
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=morei(x0,y0,x,y,xix0,yiy0,satz73a(x,y,z,moree(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xix0,ziz0),tict(y0,z0,y,z,yiy0,ziz0),m))):more(x0,y0)
--5106
-satz106a:=ratapp3(more(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".5106"(x,y,z,xi,yi,zi)):more(x0,y0)
-z0@[i:is(ts(x0,z0),ts(y0,z0))]
-+*5106
-i@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t2:=isi(x0,y0,x,y,xix0,yiy0,satz73b(x,y,z,ise(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xix0,ziz0),tict(y0,z0,y,z,yiy0,ziz0),i))):is(x0,y0)
--5106
-i@satz106b:=ratapp3(is(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t2".5106"(x,y,z,xi,yi,zi)):is(x0,y0)
-z0@[l:less(ts(x0,z0),ts(y0,z0))]
-+*5106
-l@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t3:=lessi(x0,y0,x,y,xix0,yiy0,satz73c(x,y,z,lesse(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xix0,ziz0),tict(y0,z0,y,z,yiy0,ziz0),l))):less(x0,y0)
--5106
-l@satz106c:=ratapp3(less(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".5106"(x,y,z,xi,yi,zi)):less(x0,y0)
-+*5106
-l@anders:=satz82(y0,x0,satz106a(y0,x0,z0,satz83(ts(x0,z0),ts(y0,z0),l))):less(x0,y0)
--5106
-u0@[m:more(x0,y0)][n:more(z0,u0)]
-+5107
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=morei(ts(x0,z0),ts(y0,u0),tf(x,z),tf(y,u),tict(x0,z0,x,z,xix0,ziz0),tict(y0,u0,y,u,yiy0,uiu0),satz74(x,y,z,u,moree(x0,y0,x,y,xix0,yiy0,m),moree(z0,u0,z,u,ziz0,uiu0,n))):more(ts(x0,z0),ts(y0,u0))
--5107
-satz107:=ratapp4(more(ts(x0,z0),ts(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".5107"(x,y,z,u,xi,yi,zi,ui)):more(ts(x0,z0),ts(y0,u0))
-u0@[l:less(x0,y0)][k:less(z0,u0)]
-satz107a:=satz82(ts(y0,u0),ts(x0,z0),satz107(y0,x0,u0,z0,satz83(l),satz83(z0,u0,k))):less(ts(x0,z0),ts(y0,u0))
-u0@[m:moreis(x0,y0)][n:more(z0,u0)]
-+5108
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=morei(ts(x0,z0),ts(y0,u0),tf(x,z),tf(y,u),tict(x0,z0,x,z,xix0,ziz0),tict(y0,u0,y,u,yiy0,uiu0),satz75a(x,y,z,u,moreise(x0,y0,x,y,xix0,yiy0,m),moree(z0,u0,z,u,ziz0,uiu0,n))):more(ts(x0,z0),ts(y0,u0))
--5108
-satz108a:=ratapp4(more(ts(x0,z0),ts(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".5108"(x,y,z,u,xi,yi,zi,ui)):more(ts(x0,z0),ts(y0,u0))
-u0@[m:more(x0,y0)][n:moreis(z0,u0)]
-+*5108
-n@[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t2:=morei(ts(x0,z0),ts(y0,u0),tf(x,z),tf(y,u),tict(x0,z0,x,z,xix0,ziz0),tict(y0,u0,y,u,yiy0,uiu0),satz75b(x,y,z,u,moree(x0,y0,x,y,xix0,yiy0,m),moreise(z0,u0,z,u,ziz0,uiu0,n))):more(ts(x0,z0),ts(y0,u0))
--5108
-n@satz108b:=ratapp4(more(ts(x0,z0),ts(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t2".5108"(x,y,z,u,xi,yi,zi,ui)):more(ts(x0,z0),ts(y0,u0))
-u0@[l:lessis(x0,y0)][k:less(z0,u0)]
-satz108c:=satz82(ts(y0,u0),ts(x0,z0),satz108a(y0,x0,u0,z0,satz85(l),satz83(z0,u0,k))):less(ts(x0,z0),ts(y0,u0))
-u0@[l:less(x0,y0)][k:lessis(z0,u0)]
-satz108d:=satz82(ts(y0,u0),ts(x0,z0),satz108b(y0,x0,u0,z0,satz83(l),satz85(z0,u0,k))):less(ts(x0,z0),ts(y0,u0))
-u0@[m:moreis(x0,y0)][n:moreis(z0,u0)]
-+5109
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=moreisi(ts(x0,z0),ts(y0,u0),tf(x,z),tf(y,u),tict(x0,z0,x,z,xix0,ziz0),tict(y0,u0,y,u,yiy0,uiu0),satz76(x,y,z,u,moreise(x0,y0,x,y,xix0,yiy0,m),moreise(z0,u0,z,u,ziz0,uiu0,n))):moreis(ts(x0,z0),ts(y0,u0))
--5109
-satz109:=ratapp4(moreis(ts(x0,z0),ts(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".5109"(x,y,z,u,xi,yi,zi,ui)):moreis(ts(x0,z0),ts(y0,u0))
-u0@[l:lessis(x0,y0)][k:lessis(z0,u0)]
-satz109a:=satz84(ts(y0,u0),ts(x0,z0),satz109(y0,x0,u0,z0,satz85(l),satz85(z0,u0,k))):lessis(ts(x0,z0),ts(y0,u0))
-+5110
-y1iy0@[v:frac][e:eq"n"(tf(y1,v),x1)]
-t1:=isi(ts(y0,ratof(v)),x0,tf(y1,v),x1,tict(y0,ratof(v),y1,v,y1iy0,inclass(v)),x1ix0,e):is(ts(y0,ratof(v)),x0)
-t2:=somei(rat,[t:rat]is(ts(y0,t),x0),ratof(v),t1):some([t:rat]is(ts(y0,t),x0))
-y1iy0@t3:=someapp(frac,[t:frac]eq"n"(tf(y1,t),x1),satz77a(x1,y1),some([t:rat]is(ts(y0,t),x0)),[t:frac][u:eq"n"(tf(y1,t),x1)]t2(t,u)):some([t:rat]is(ts(y0,t),x0))
--5110
-y0@satz110a:=ratapp2(some([t:rat]is(ts(y0,t),x0)),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t3".5110"(x,y,xi,yi)):some([t:rat]is(ts(y0,t),x0))
-[v0:rat][w0:rat][i:is(ts(y0,v0),x0)][j:is(ts(y0,w0),x0)]
-+*5110
-j@[x:frac][y:frac][v:frac][w:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][viv0:inf(v,class(v0))][wiw0:inf(w,class(w0))]
-t4:=isi(v0,w0,v,w,viv0,wiw0,satz77b(x,y,v,w,ise(ts(y0,v0),x0,tf(y,v),x,tict(y0,v0,y,v,yiy0,viv0),xix0,i),ise(ts(y0,w0),x0,tf(y,w),x,tict(y0,w0,y,w,yiy0,wiw0),xix0,j))):is(v0,w0)
--5110
-j@satz110b:=ratapp4(v0,w0,is(v0,w0),[x:frac][y:frac][v:frac][w:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][vi:inf(v,class(v0))][wi:inf(w,class(w0))]t4".5110"(x,y,v,w,xi,yi,vi,wi)):is(v0,w0)
-+*5110
-y0@t5:=[t:rat][u:rat][v:is(ts(y0,t),x0)][w:is(ts(y0,u),x0)]satz110b(t,u,v,w):amone(rat,[t:rat]is(ts(y0,t),x0))
--5110
-y0@satz110:=onei(rat,[t:rat]is(ts(y0,t),x0),t5".5110",satz110a):one([t:rat]is(ts(y0,t),x0))
--rt
-@[x:nat][y:nat]
-+5111
-t1:=tris(nat,ts(num(fr(x,1)),den(fr(y,1))),ts(x,1),x,ndis12(x,1,y,1),satz28a(x)):is(ts(num(fr(x,1)),den(fr(y,1))),x)
-t2:=symis(nat,ts(num(fr(x,1)),den(fr(y,1))),x,t1):is(x,ts(num(fr(x,1)),den(fr(y,1))))
--5111
-[m:moref(fr(x,1),fr(y,1))]
-satz111a:=ismore12(ts(num(fr(x,1)),den(fr(y,1))),x,ts(num(fr(y,1)),den(fr(x,1))),y,t1".5111",t1".5111"(y,x),m):more(x,y)
-y@[e:eq(fr(x,1),fr(y,1))]
-satz111b:=tr3is(nat,x,ts(num(fr(x,1)),den(fr(y,1))),ts(num(fr(y,1)),den(fr(x,1))),y,t2".5111",e,t1".5111"(y,x)):is(x,y)
-y@[l:lessf(fr(x,1),fr(y,1))]
-satz111c:=isless12(ts(num(fr(x,1)),den(fr(y,1))),x,ts(num(fr(y,1)),den(fr(x,1))),y,t1".5111",t1".5111"(y,x),l):less(x,y)
-y@[m:more(x,y)]
-satz111d:=ismore12(x,ts(num(fr(x,1)),den(fr(y,1))),y,ts(num(fr(y,1)),den(fr(x,1))),t2".5111",t2".5111"(y,x),m):moref(fr(x,1),fr(y,1))
-y@[i:is(x,y)]
-satz111e:=tr3is(nat,ts(num(fr(x,1)),den(fr(y,1))),x,y,ts(num(fr(y,1)),den(fr(x,1))),t1".5111",i,t2".5111"(y,x)):eq(fr(x,1),fr(y,1))
-y@[l:less(x,y)]
-satz111f:=isless12(x,ts(num(fr(x,1)),den(fr(y,1))),y,ts(num(fr(y,1)),den(fr(x,1))),t2".5111",t2".5111"(y,x),l):lessf(fr(x,1),fr(y,1))
-+*rt
-@[x0:rat][x:nat]
-natprop:=inf(fr(x,1),class(x0)):'prop'
-x0@natrt:=some"n"([t:nat]natprop(t)):'prop'
-+*ii5
-y0@[x:nat][y:nat][npx:natprop(x0,x)][npy:natprop(y0,y)][i:is(x0,y0)]
-t22:=satz111b(x,y,ise(x0,y0,fr(x,1),fr(y,1),npx,npy,i)):is"n"(x,y)
-x0@t23:=[t:nat][u:nat][v:natprop(x0,t)][w:natprop(x0,u)]t22(x0,x0,t,u,v,w,refis(rat,x0)):amone(nat,[t:nat]natprop(x0,t))
--ii5
-x0@[nx0:natrt(x0)]
-satz111g:=onei(nat,[t:nat]natprop(t),t23".ii5",nx0):one"n"([t:nat]natprop(x0,t))
-nofrt:=ind(nat,[t:nat]natprop(t),satz111g):nat
-inclassn:=oneax(nat,[t:nat]natprop(t),satz111g):inf(fr(nofrt,1),class(x0))
-[y0:rat][ny0:natrt(y0)][i:is(x0,y0)]
-isrten:=t22".ii5"(x0,y0,nofrt(x0,nx0),nofrt(y0,ny0),inclassn(x0,nx0),inclassn(y0,ny0),i):is"n"(nofrt(x0,nx0),nofrt(y0,ny0))
-ny0@[i:is"n"(nofrt(x0,nx0),nofrt(y0,ny0))]
-isrtin:=isi(x0,y0,fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1),inclassn(x0,nx0),inclassn(y0,ny0),eqn"n"(nofrt(x0,nx0),1,nofrt(y0,ny0),i)):is(x0,y0)
-@[x:nat]
-rtofn:=ratof(fr(x,1)):rat
-natrti:=somei(nat,[t:nat]natprop(rtofn,t),x,inclass(fr(x,1))):natrt(rtofn(x))
-[y:nat][i:is"n"(x,y)]
-isnert:=isf(nat,rat,[t:nat]rtofn(t),x,y,i):is(rtofn(x),rtofn(y))
-y@[i:is(rtofn(x),rtofn(y))]
-isnirt:=t22".ii5"(rtofn(x),rtofn(y),x,y,inclass(fr(x,1)),inclass(fr(y,1)),i):is"n"(x,y)
-nx0@isrtn1:=isi(x0,rtofn(nofrt(x0,nx0)),fr(nofrt(x0,nx0),1),fr(nofrt(x0,nx0),1),inclassn(x0,nx0),inclass(fr(nofrt(x0,nx0),1)),refeq"n"(fr(nofrt(x0,nx0),1))):is(x0,rtofn(nofrt(x0,nx0)))
-x@isnrt1:=t22".ii5"(rtofn(x),rtofn(x),x,nofrt(rtofn(x),natrti(x)),inclass(fr(x,1)),inclassn(rtofn(x),natrti(x)),refis(rat,rtofn(x))):is"n"(x,nofrt(rtofn(x),natrti(x)))
--rt
-@[x:nat][y:nat]
-satz112a:=satz57(x,y,1):eq(pf(fr(x,1),fr(y,1)),fr(pl(x,y),1))
-satz112b:=treq(tf(fr(x,1),fr(y,1)),fr(ts(x,y),ts(1,1)),fr(ts(x,y),1),tfeq12a(x,1,y,1),eqd(ts(x,y),ts(1,1),1,satz28a(1))):eq(tf(fr(x,1),fr(y,1)),fr(ts(x,y),1))
-+*rt
-ny0@satz112c:=lemmaeq1(pl(x0,y0),pf(fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1)),fr(pl"n"(nofrt(x0,nx0),nofrt(y0,ny0)),1),picp(x0,y0,fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1),inclassn(x0,nx0),inclassn(y0,ny0)),satz112a(nofrt(x0,nx0),nofrt(y0,ny0))):inf(fr(pl"n"(nofrt(x0,nx0),nofrt(y0,ny0)),1),class(pl(x0,y0)))
-satz112d:=somei(nat,[t:nat]natprop(pl(x0,y0),t),pl"n"(nofrt(x0,nx0),nofrt(y0,ny0)),satz112c):natrt(pl(x0,y0))
-satz112e:=lemmaeq1(ts(x0,y0),tf(fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1)),fr(ts"n"(nofrt(x0,nx0),nofrt(y0,ny0)),1),tict(x0,y0,fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1),inclassn(x0,nx0),inclassn(y0,ny0)),satz112b(nofrt(x0,nx0),nofrt(y0,ny0))):inf(fr(ts"n"(nofrt(x0,nx0),nofrt(y0,ny0)),1),class(ts(x0,y0)))
-satz112f:=somei(nat,[t:nat]natprop(ts(x0,y0),t),ts"n"(nofrt(x0,nx0),nofrt(y0,ny0)),satz112e):natrt(ts(x0,y0))
-[m:more(x0,y0)]
-+5112
-t1:=satz111a(nofrt(x0,nx0),nofrt(y0,ny0),moree(x0,y0,fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1),inclassn(x0,nx0),inclassn(y0,ny0),m)):more"n"(nofrt(x0,nx0),nofrt(y0,ny0))
-[z:nat][d:diffprop(nofrt(x0,nx0),nofrt(y0,ny0),z)]
-t2:=tris(nat,nofrt(x0,nx0),pl"n"(nofrt(y0,ny0),z),pl"n"(nofrt(y0,ny0),nofrt(rtofn(z),natrti(z))),d,ispl2"n"(z,nofrt(rtofn(z),natrti(z)),nofrt(y0,ny0),isnrt1(z))):is"n"(nofrt(x0,nx0),pl"n"(nofrt(y0,ny0),nofrt(rtofn(z),natrti(z))))
-t3:=isi(x0,pl(y0,rtofn(z)),fr(nofrt(x0,nx0),1),fr(pl"n"(nofrt(y0,ny0),nofrt(rtofn(z),natrti(z))),1),inclassn(x0,nx0),satz112c(y0,ny0,rtofn(z),natrti(z)),eqn(nofrt(x0,nx0),1,pl"n"(nofrt(y0,ny0),nofrt(rtofn(z),natrti(z))),t2)):is(x0,pl(y0,rtofn(z)))
-t4:=satz101g(x0,y0,rtofn(z),m,symis(rat,x0,pl(y0,rtofn(z)),t3)):is(rtofn(z),mn(x0,y0,m))
-t5:=isp(rat,[t:rat]natrt(t),rtofn(z),mn(x0,y0,m),natrti(z),t4):natrt(mn(x0,y0,m))
--5112
-satz112g:=someapp(nat,[t:nat]diffprop(nofrt(x0,nx0),nofrt(y0,ny0),t),t1".5112",natrt(mn(x0,y0,m)),[t:nat][u:diffprop(nofrt(x0,nx0),nofrt(y0,ny0),t)]t5".5112"(t,u)):natrt(mn(x0,y0,m))
-@[x:nat][y:nat]
-satz112h:=isi(pl(rtofn(x),rtofn(y)),rtofn(pl"n"(x,y)),pf(fr(x,1),fr(y,1)),fr(pl"n"(x,y),1),picp(rtofn(x),rtofn(y),fr(x,1),fr(y,1),inclass(fr(x,1)),inclass(fr(y,1))),inclass(fr(pl"n"(x,y),1)),satz112a(x,y)):is(pl(rtofn(x),rtofn(y)),rtofn(pl"n"(x,y)))
-satz112j:=isi(ts(rtofn(x),rtofn(y)),rtofn(ts"n"(x,y)),tf(fr(x,1),fr(y,1)),fr(ts"n"(x,y),1),tict(rtofn(x),rtofn(y),fr(x,1),fr(y,1),inclass(fr(x,1)),inclass(fr(y,1))),inclass(fr(ts"n"(x,y),1)),satz112b(x,y)):is(ts(rtofn(x),rtofn(y)),rtofn(ts"n"(x,y)))
-+nt
-@natt:=ot(rat,[t:rat]natrt(t)):'type'
-nx0@ntofrt:=out(rat,[t:rat]natrt(t),x0,nx0):natt
-@[xt:natt][yt:natt]
-is:=is"e"(natt,xt,yt):'prop'
-nis:=not(is(xt,yt)):'prop'
-@[p:[x:natt]'prop']
-all:=all"l"(natt,p):'prop'
-some:=some"l"(natt,p):'prop'
-one:=one"e"(natt,p):'prop'
-xt@[st:set(natt)]
-in:=esti(natt,xt,st):'prop'
-xt@rtofnt:=in"e"(rat,[t:rat]natrt(t),xt):rat
-natrti:=inp(rat,[t:rat]natrt(t),xt):natrt(rtofnt(xt))
-ny0@[i:is"rt"(x0,y0)]
-isrtent:=isouti(rat,[t:rat]natrt(t),x0,nx0,y0,ny0,i):is(ntofrt(x0,nx0),ntofrt(y0,ny0))
-ny0@[i:is(ntofrt(x0,nx0),ntofrt(y0,ny0))]
-isrtint:=isoute(rat,[t:rat]natrt(t),x0,nx0,y0,ny0,i):is"rt"(x0,y0)
-yt@[i:is(xt,yt)]
-isntert:=isini(rat,[t:rat]natrt(t),xt,yt,i):is"rt"(rtofnt(xt),rtofnt(yt))
-yt@[i:is"rt"(rtofnt(xt),rtofnt(yt))]
-isntirt:=isine(rat,[t:rat]natrt(t),xt,yt,i):is(xt,yt)
-nx0@isrtnt1:=isinout(rat,[t:rat]natrt(t),x0,nx0):is"rt"(x0,rtofnt(ntofrt(x0,nx0)))
-xt@isntrt1:=isoutin(rat,[t:rat]natrt(t),xt):is(xt,ntofrt(rtofnt(xt),natrti(xt)))
-x@ntofn:=ntofrt(rtofn(x),natrti"rt"(x)):natt
-y@[i:is"n"(x,y)]
-isnent:=isrtent(rtofn(x),natrti"rt"(x),rtofn(y),natrti"rt"(y),isnert(x,y,i)):is(ntofn(x),ntofn(y))
-y@[i:is(ntofn(x),ntofn(y))]
-isnint:=isnirt(x,y,isrtint(rtofn"rt"(x),natrti"rt"(x),rtofn(y),natrti"rt"(y),i)):is"n"(x,y)
-xt@nofnt:=nofrt(rtofnt(xt),natrti(xt)):nat
-yt@[i:is(xt,yt)]
-isnten:=isrten(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),isntert(xt,yt,i)):is"n"(nofnt(xt),nofnt(yt))
-yt@[i:is"n"(nofnt(xt),nofnt(yt))]
-isntin:=isntirt(xt,yt,isrtin(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),i)):is(xt,yt)
-+ii5
-x@t24:=isrtnt1(rtofn(x),natrti"rt"(x)):is"rt"(rtofn(x),rtofnt(ntofn(x)))
-t25:=isrten(rtofn(x),natrti"rt"(x),rtofnt(ntofn(x)),natrti(ntofn(x)),t24):is"n"(nofrt(rtofn(x),natrti"rt"(x)),nofnt(ntofn(x)))
--ii5
-x@isnnt1:=tris(nat,x,nofrt(rtofn(x),natrti"rt"(x)),nofnt(ntofn(x)),isnrt1(x),t25".ii5"):is"n"(x,nofnt(ntofn(x)))
-+*ii5
-xt@t26:=isrtn1(rtofnt(xt),natrti(xt)):is"rt"(rtofnt(xt),rtofn(nofnt(xt)))
-t27:=isrtent(rtofnt(xt),natrti(xt),rtofn(nofnt(xt)),natrti"rt"(nofnt(xt)),t26):is(ntofrt(rtofnt(xt),natrti(xt)),ntofn(nofnt(xt)))
--ii5
-xt@isntn1:=tris(natt,xt,ntofrt(rtofnt(xt),natrti(xt)),ntofn(nofnt(xt)),isntrt1(xt),t27".ii5"):is(xt,ntofn(nofnt(xt)))
-x@isnnt2:=symis(nat,x,nofnt(ntofn(x)),isnnt1):is"n"(nofnt(ntofn(x)),x)
-xt@isntn2:=symis(natt,xt,ntofn(nofnt(xt)),isntn1):is(ntofn(nofnt(xt)),xt)
-@1t:=ntofn(1):natt
-suct:=[x:natt]ntofn(<nofnt(x)>suc):[x:natt]natt
-+5113
-xt@[i:is(<xt>suct,1t)]
-t1:=isnint(<nofnt(xt)>suc,1,i):is"n"(<nofnt(xt)>suc,1)
--5113
-xt@satz113a:=th3"l.imp"(is(<xt>suct,1t),is"n"(<nofnt(xt)>suc,1),<nofnt(xt)>ax3,[t:is(<xt>suct,1t)]t1".5113"(t)):nis(<xt>suct,1t)
-yt@[i:is(<xt>suct,<yt>suct)]
-+*5113
-i"nt"@t2:=isnint(<nofnt(xt)>suc,<nofnt(yt)>suc,i):is"n"(<nofnt(xt)>suc,<nofnt(yt)>suc)
--5113
-i@satz113b:=isntin(xt,yt,<t2".5113"><nofnt(yt)><nofnt(xt)>ax4):is(xt,yt)
-@[st:set(natt)]
-cond1:=in(1t,st):'prop'
-cond2:=all([x:natt]imp(in(x,st),in(<x>suct,st))):'prop'
-[c1:cond1][c2:cond2]
-+*5113
-c2@[x:nat]
-prop1:=in(ntofn(x),st):'prop'
-[p:prop1(x)]
-t3:=<ntofn(x)>c2:imp(in(ntofn(x),st),in(<ntofn(x)>suct,st))
-t4:=mp(in(ntofn(x),st),in(<ntofn(x)>suct,st),p,t3):in(<ntofn(x)>suct,st)
-t5:=isp(nat,[t:nat]in(ntofn(<t>suc),st),nofnt(ntofn(x)),x,t4,isnnt2(x)):prop1(<x>suc)
--5113
-c2@[xt:natt]
-+*5113
-xt@t6:=induction([t:nat]prop1(t),c1,[t:nat][u:prop1(t)]t5(t,u),nofnt(xt)):in(ntofn(nofnt(xt)),st)
--5113
-xt@satz113c:=isp(natt,[t:natt]in(t,st),ntofn(nofnt(xt)),xt,t6".5113",isntn2(xt)):in(xt,st)
-@ax3t:=[x:natt]satz113a(x):[x:natt]nis(<x>suct,1t)
-ax4t:=[x:natt][y:natt][u:is(<x>suct,<y>suct)]satz113b(x,y,u):[x:natt][y:natt][u:is(<x>suct,<y>suct)]is(x,y)
-ax5t:=[s:set(natt)][u:cond1(s)][v:cond2(s)][x:natt]satz113c(s,u,v,x):[s:set(natt)][u:cond1(s)][v:cond2(s)][x:natt]in(x,s)
-yt@[n:nis(xt,yt)]
-+51
-t1:=th3"l.imp"(is"n"(nofnt(xt),nofnt(yt)),is(xt,yt),n,[t:is"n"(nofnt(xt),nofnt(yt))]isntin(xt,yt,t)):nis"n"(nofnt(xt),nofnt(yt))
-t2:=satz1(nofnt(xt),nofnt(yt),t1):nis"n"(<nofnt(xt)>suc,<nofnt(yt)>suc)
--51
-satz1:=th3"l.imp"(is(<xt>suct,<yt>suct),is"n"(<nofnt(xt)>suc,<nofnt(yt)>suc),t2".51",[t:is(<xt>suct,<yt>suct)]isnint(<nofnt(xt)>suc,<nofnt(yt)>suc,t)):nis(<xt>suct,<yt>suct)
-+54
-xt@x:=nofnt(xt):nat
-[ft:[x:natt]natt]
-prop1t:=all([t:natt]is(<<t>suct>ft,<<t>ft>suct)):'prop'
-prop2t:=and(is(<1t>ft,<xt>suct),prop1t):'prop'
-xt@[f:[x:nat]nat]
-prop1:=all"n"([t:nat]is"n"(<<t>suc>f,<<t>f>suc)):'prop'
-prop2:=and(is"n"(<1>f,<x>suc),prop1):'prop'
-ft@g:=[t:nat]nofnt(<ntofn(t)>ft):[x:nat]nat
-[p:prop2t]
-t1:=ande1(is(<1t>ft,<xt>suct),prop1t,p):is(<1t>ft,<xt>suct)
-t2:=tris(nat,<1>g,nofnt(<xt>suct),<x>suc,isnten(<1t>ft,<xt>suct,t1),isnnt2(<x>suc)):is"n"(<1>g,<x>suc)
-t3:=ande2(is(<1t>ft,<xt>suct),prop1t,p):prop1t
-[u:nat]
-ut:=ntofn(u):natt
-t4:=isf(nat,nat,suc,u,nofnt(ut),isnnt1(u)):is"n"(<u>suc,<nofnt(ut)>suc)
-t5:=isf(nat,nat,g,<u>suc,<nofnt(ut)>suc,t4):is"n"(<<u>suc>g,nofnt(<<ut>suct>ft))
-t6:=<ut>t3:is(<<ut>suct>ft,<<ut>ft>suct)
-t7:=isnten(<<ut>suct>ft,<<ut>ft>suct,t6):is"n"(nofnt(<<ut>suct>ft),nofnt(<<ut>ft>suct))
-t8:=isnnt2(<<u>g>suc):is"n"(nofnt(<<ut>ft>suct),<<u>g>suc)
-t9:=tr3is(nat,<<u>suc>g,nofnt(<<ut>suct>ft),nofnt(<<ut>ft>suct),<<u>g>suc,t5,t7,t8):is"n"(<<u>suc>g,<<u>g>suc)
-p@t10:=[u:nat]t9(u):prop1(g)
-t11:=andi(is"n"(<1>g,<x>suc),prop1(g),t2,t10):prop2(g)
-xt@[a:[t:natt]natt][b:[t:natt]natt][pa:prop2t(a)][pb:prop2t(b)]
-t12:=onee1([t:nat]nat,[u:[t:nat]nat]prop2(u),satz4(x)):amone([t:nat]nat,[u:[t:nat]nat]prop2(u))
-t13:=<t11(b,pb)><t11(a,pa)><g(b)><g(a)>t12:is"e"([t:nat]nat,g(a),g(b))
-[yt:natt]
-y:=nofnt(yt):nat
-t14:=fise(nat,nat,g(a),g(b),t13,y):is"n"(nofnt(<ntofn(y)>a),nofnt(<ntofn(y)>b))
-t15:=isntin(<ntofn(y)>a,<ntofn(y)>b,t14):is(<ntofn(y)>a,<ntofn(y)>b)
-t16:=tr3is(natt,<yt>a,<ntofn(y)>a,<ntofn(y)>b,<yt>b,isf(natt,natt,a,yt,ntofn(y),isntn1(yt)),t15,isf(natt,natt,b,ntofn(y),yt,isntn2(yt))):is(<yt>a,<yt>b)
-pb@t17:=fisi(natt,natt,a,b,[t:natt]t16(t)):is"e"([t:natt]natt,a,b)
-xt@t18:=[u:[t:natt]natt][v:[t:natt]natt][w:prop2t(u)][z:prop2t(v)]t17(u,v,w,z):amone([t:natt]natt,[u:[t:natt]natt]prop2t(u))
-t19:=onee2([t:nat]nat,[u:[t:nat]nat]prop2(u),satz4(x)):some"l"([t:nat]nat,[u:[t:nat]nat]prop2(u))
-f@gt:=[t:natt]ntofn(<nofnt(t)>f):[x:natt]natt
-[p:prop2]
-t20:=ande1(is"n"(<1>f,<x>suc),prop1,p):is"n"(<1>f,<x>suc)
-t21:=isf(nat,nat,f,nofnt(1t),1,isnnt2(1)):is"n"(<nofnt(1t)>f,<1>f)
-t22:=isnent(<nofnt(1t)>f,<x>suc,tris(nat,<nofnt(1t)>f,<1>f,<x>suc,t21,t20)):is(<1t>gt,<xt>suct)
-t23:=ande2(is"n"(<1>f,<x>suc),prop1,p):prop1
-[zt:natt]
-z:=nofnt(zt):nat
-t24:=isf(nat,nat,f,nofnt(<zt>suct),<z>suc,isnnt2(<z>suc)):is"n"(<nofnt(<zt>suct)>f,<<z>suc>f)
-t25:=<z>t23:is"n"(<<z>suc>f,<<z>f>suc)
-t26:=isf(nat,nat,suc,<z>f,nofnt(<zt>gt),isnnt1(<z>f)):is"n"(<<z>f>suc,<nofnt(<zt>gt)>suc)
-t27:=isnent(<nofnt(<zt>suct)>f,<nofnt(<zt>gt)>suc,tr3is(nat,<nofnt(<zt>suct)>f,<<z>suc>f,<<z>f>suc,<nofnt(<zt>gt)>suc,t24,t25,t26)):is(<<zt>suct>gt,<<zt>gt>suct)
-p@t28:=[u:natt]t27(u):prop1t(gt)
-t29:=andi(is(<1t>gt,<xt>suct),prop1t(gt),t22,t28):prop2t(gt)
-t30:=somei([t:natt]natt,[u:[t:natt]natt]prop2t(u),gt,t29):some"l"([t:natt]natt,[u:[t:natt]natt]prop2t(u))
-xt@t31:=someapp([t:nat]nat,[u:[t:nat]nat]prop2(u),t19,some"l"([t:natt]natt,[u:[t:natt]natt]prop2t(u)),[u:[t:nat]nat][v:prop2(u)]t30(u,v)):some"l"([t:natt]natt,[u:[t:natt]natt]prop2t(u))
--54
-xt@satz4:=onei([t:natt]natt,[u:[t:natt]natt]prop2t".54"(u),t18".54",t31".54"):one"e"([t:natt]natt,[u:[t:natt]natt]and(is(<1t>u,<xt>suct),all([v:natt]is(<<v>suct>u,<<v>u>suct))))
-yt@pl:=ntofrt(pl"rt"(rtofnt(xt),rtofnt(yt)),satz112d(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt))):natt
-+*ii5
-yt@t28:=satz112c(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt)):inf(fr(pl"n"(nofnt(xt),nofnt(yt)),1),class(pl"rt"(rtofnt(xt),rtofnt(yt))))
-t29:=isi(pl"rt"(rtofnt(xt),rtofnt(yt)),rtofn(pl"n"(nofnt(xt),nofnt(yt))),fr(pl"n"(nofnt(xt),nofnt(yt)),1),fr(pl"n"(nofnt(xt),nofnt(yt)),1),t28,inclass(fr(pl"n"(nofnt(xt),nofnt(yt)),1)),refeq"n"(fr(pl"n"(nofnt(xt),nofnt(yt)),1))):is"rt"(pl"rt"(rtofnt(xt),rtofnt(yt)),rtofn(pl"n"(nofnt(xt),nofnt(yt))))
--ii5
-yt@isplnt:=isrtent(pl"rt"(rtofnt(xt),rtofnt(yt)),satz112d(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt)),rtofn(pl"n"(nofnt(xt),nofnt(yt))),natrti"rt"(pl"n"(nofnt(xt),nofnt(yt))),t29".ii5"):is(pl(xt,yt),ntofn(pl"n"(nofnt(xt),nofnt(yt))))
-isntpl:=symis(natt,pl(xt,yt),ntofn(pl"n"(nofnt(xt),nofnt(yt))),isplnt):is(ntofn(pl"n"(nofnt(xt),nofnt(yt))),pl(xt,yt))
-ispln:=tris(nat,pl"n"(nofnt(xt),nofnt(yt)),nofnt(ntofn(pl"n"(nofnt(xt),nofnt(yt)))),nofnt(pl(xt,yt)),isnnt1(pl"n"(nofnt(xt),nofnt(yt))),isnten(ntofn(pl"n"(nofnt(xt),nofnt(yt))),pl(xt,yt),isntpl)):is"n"(pl"n"(nofnt(xt),nofnt(yt)),nofnt(pl(xt,yt)))
-isnpl:=symis(nat,pl"n"(nofnt(xt),nofnt(yt)),nofnt(pl(xt,yt)),ispln):is"n"(nofnt(pl(xt,yt)),pl"n"(nofnt(xt),nofnt(yt)))
-[zt:natt]
-+55
-t1:=ispl1"n"(nofnt(pl(xt,yt)),pl"n"(nofnt(xt),nofnt(yt)),nofnt(zt),isnpl(xt,yt)):is"n"(pl"n"(nofnt(pl(xt,yt)),nofnt(zt)),pl"n"(pl"n"(nofnt(xt),nofnt(yt)),nofnt(zt)))
-t2:=ispl2"n"(pl"n"(nofnt(yt),nofnt(zt)),nofnt(pl(yt,zt)),nofnt(xt),ispln(yt,zt)):is"n"(pl"n"(nofnt(xt),pl"n"(nofnt(yt),nofnt(zt))),pl"n"(nofnt(xt),nofnt(pl(yt,zt))))
-t3:=tr3is(nat,pl"n"(nofnt(pl(xt,yt)),nofnt(zt)),pl"n"(pl"n"(nofnt(xt),nofnt(yt)),nofnt(zt)),pl"n"(nofnt(xt),pl"n"(nofnt(yt),nofnt(zt))),pl"n"(nofnt(xt),nofnt(pl(yt,zt))),t1,satz5(nofnt(xt),nofnt(yt),nofnt(zt)),t2):is"n"(pl"n"(nofnt(pl(xt,yt)),nofnt(zt)),pl"n"(nofnt(xt),nofnt(pl(yt,zt))))
--55
-satz5:=tr3is(natt,pl(pl(xt,yt),zt),ntofn(pl"n"(nofnt(pl(xt,yt)),nofnt(zt))),ntofn(pl"n"(nofnt(xt),nofnt(pl(yt,zt)))),pl(xt,pl(yt,zt)),isplnt(pl(xt,yt),zt),isnent(pl"n"(nofnt(pl(xt,yt)),nofnt(zt)),pl"n"(nofnt(xt),nofnt(pl(yt,zt))),t3".55"),isntpl(xt,pl(yt,zt))):is(pl(pl(xt,yt),zt),pl(xt,pl(yt,zt)))
-diffprop:=is(xt,pl(yt,zt)):'prop'
-[d:diffprop]
-diffprope:=tris(nat,nofnt(xt),nofnt(pl(yt,zt)),pl"n"(nofnt(yt),nofnt(zt)),isnten(xt,pl(yt,zt),d),isnpl(yt,zt)):diffprop"n"(nofnt(xt),nofnt(yt),nofnt(zt))
-zt@[d:diffprop"n"(nofnt(xt),nofnt(yt),nofnt(zt))]
-+*ii5
-d@t30:=tris(nat,nofnt(xt),pl"n"(nofnt(yt),nofnt(zt)),nofnt(pl(yt,zt)),d,ispln(yt,zt)):is"n"(nofnt(xt),nofnt(pl(yt,zt)))
--ii5
-d@diffpropi:=isntin(xt,pl(yt,zt),t30".ii5"):diffprop
-+59
-yt@it:=is(xt,yt):'prop'
-iit:=some([u:natt]diffprop(xt,yt,u)):'prop'
-iiit:=some([u:natt]diffprop(yt,xt,u)):'prop'
-i:=is"n"(nofnt(xt),nofnt(yt)):'prop'
-ii:=some"n"([u:nat]diffprop"n"(nofnt(xt),nofnt(yt),u)):'prop'
-iii:=some"n"([u:nat]diffprop"n"(nofnt(yt),nofnt(xt),u)):'prop'
-[one:i]
-t1:=or3i1(it,iit,iiit,isntin(xt,yt,one)):or3(it,iit,iiit)
-yt@[two:ii][v:nat][d:diffprop"n"(nofnt(xt),nofnt(yt),v)]
-t2:=isp(nat,[u:nat]diffprop"n"(nofnt(xt),nofnt(yt),u),v,nofnt(ntofn(v)),d,isnnt1(v)):diffprop"n"(nofnt(xt),nofnt(yt),nofnt(ntofn(v)))
-t3:=somei(natt,[u:natt]diffprop(xt,yt,u),ntofn(v),diffpropi(xt,yt,ntofn(v),t2)):iit
-two@t4:=someapp(nat,[u:nat]diffprop"n"(nofnt(xt),nofnt(yt),u),two,iit,[u:nat][v:diffprop"n"(nofnt(xt),nofnt(yt),u)]t3(u,v)):iit
-t5:=or3i2(it,iit,iiit,t4):or3(it,iit,iiit)
-yt@[three:iii]
-t6:=or3i3(it,iit,iiit,t4(yt,xt,three)):or3(it,iit,iiit)
-yt@t7:=or3app(i,ii,iii,or3(it,iit,iiit),satz9a(nofnt(xt),nofnt(yt)),[u:i]t1(u),[u:ii]t5(u),[u:iii]t6(u)):or3(it,iit,iiit)
-[onet:it]
-t8:=isnten(xt,yt,onet):i
-yt@[twot:iit][vt:natt][d:diffprop(xt,yt,vt)]
-t9:=somei(nat,[u:nat]diffprop"n"(nofnt(xt),nofnt(yt),u),nofnt(vt),diffprope(xt,yt,vt,d)):ii
-twot@t10:=someapp(natt,[u:natt]diffprop(xt,yt,u),twot,ii,[u:natt][v:diffprop(xt,yt,u)]t9(u,v)):ii
-yt@[threet:iiit]
-t11:=t10(yt,xt,threet):iii
-yt@t12:=satz9b(nofnt(xt),nofnt(yt)):ec3(i,ii,iii)
-onet@t13:=ec3e12(i,ii,iii,t12,t8):not(ii)
-t14:=th3"l.imp"(iit,ii,t13,[x:iit]t10(x)):not(iit)
-yt@t15:=th1"l.ec"(it,iit,[x:it]t14(x)):ec(it,iit)
-twot@t16:=ec3e23(i,ii,iii,t12,t10):not(iii)
-t17:=th3"l.imp"(iiit,iii,t16,[x:iiit]t11(x)):not(iiit)
-yt@t18:=th1"l.ec"(iit,iiit,[x:iit]t17(x)):ec(iit,iiit)
-threet@t19:=ec3e31(i,ii,iii,t12,t11):not(i)
-t20:=th3"l.imp"(it,i,t19,[x:it]t8(x)):not(it)
-yt@t21:=th1"l.ec"(iiit,it,[x:iiit]t20(x)):ec(iiit,it)
-t22:=th6"l.ec3"(it,iit,iiit,t15,t18,t21):ec3(it,iit,iiit)
--59
-yt@satz9:=orec3i(it".59",iit".59",iiit".59",t7".59",t22".59"):orec3(is(xt,yt),some([u:natt]is(xt,pl(yt,u))),some([u:natt]is(yt,pl(xt,u))))
-more:=more"rt"(rtofnt(xt),rtofnt(yt)):'prop'
-[m:more(xt,yt)]
-+*ii5
-m@t31:=moree(rtofnt(xt),rtofnt(yt),fr(nofnt(xt),1),fr(nofnt(yt),1),inclassn(rtofnt(xt),natrti(xt)),inclassn(rtofnt(yt),natrti(yt)),m):moref(fr(nofnt(xt),1),fr(nofnt(yt),1))
--ii5
-m@moree:=satz111a(nofnt(xt),nofnt(yt),t31".ii5"):more"n"(nofnt(xt),nofnt(yt))
-yt@[m:more"n"(nofnt(xt),nofnt(yt))]
-+*ii5
-m@t32:=satz111d(nofnt(xt),nofnt(yt),m):moref(fr(nofnt(xt),1),fr(nofnt(yt),1))
--ii5
-m@morei:=morei"rt"(rtofnt(xt),rtofnt(yt),fr(nofnt(xt),1),fr(nofnt(yt),1),inclassn(rtofnt(xt),natrti(xt)),inclassn(rtofnt(yt),natrti(yt)),t32".ii5"):more(xt,yt)
-yt@less:=less"rt"(rtofnt(xt),rtofnt(yt)):'prop'
-[l:less(xt,yt)]
-+*ii5
-l@t33:=lesse(rtofnt(xt),rtofnt(yt),fr(nofnt(xt),1),fr(nofnt(yt),1),inclassn(rtofnt(xt),natrti(xt)),inclassn(rtofnt(yt),natrti(yt)),l):lessf(fr(nofnt(xt),1),fr(nofnt(yt),1))
--ii5
-l@lesse:=satz111c(nofnt(xt),nofnt(yt),t33".ii5"):less"n"(nofnt(xt),nofnt(yt))
-yt@[l:less"n"(nofnt(xt),nofnt(yt))]
-+*ii5
-l@t34:=satz111f(nofnt(xt),nofnt(yt),l):lessf(fr(nofnt(xt),1),fr(nofnt(yt),1))
--ii5
-l@lessi:=lessi"rt"(rtofnt(xt),rtofnt(yt),fr(nofnt(xt),1),fr(nofnt(yt),1),inclassn(rtofnt(xt),natrti(xt)),inclassn(rtofnt(yt),natrti(yt)),t34".ii5"):less(xt,yt)
-yt@moreis:=moreis"rt"(rtofnt(xt),rtofnt(yt)):'prop'
-[m:moreis(xt,yt)]
-moreise:=th9"l.or"(more"rt"(rtofnt(xt),rtofnt(yt)),is"rt"(rtofnt(xt),rtofnt(yt)),more"n"(nofnt(xt),nofnt(yt)),is"n"(nofnt(xt),nofnt(yt)),m,[u:more"rt"(rtofnt(xt),rtofnt(yt))]moree(xt,yt,u),[u:is"rt"(rtofnt(xt),rtofnt(yt))]isrten(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),u)):moreis"n"(nofnt(xt),nofnt(yt))
-yt@[m:moreis"n"(nofnt(xt),nofnt(yt))]
-moreisi:=th9"l.or"(more"n"(nofnt(xt),nofnt(yt)),is"n"(nofnt(xt),nofnt(yt)),more"rt"(rtofnt(xt),rtofnt(yt)),is"rt"(rtofnt(xt),rtofnt(yt)),m,[u:more"n"(nofnt(xt),nofnt(yt))]morei(xt,yt,u),[u:is"n"(nofnt(xt),nofnt(yt))]isrtin(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),u)):moreis(xt,yt)
-yt@lessis:=lessis"rt"(rtofnt(xt),rtofnt(yt)):'prop'
-[l:lessis(xt,yt)]
-lessise:=th9"l.or"(less"rt"(rtofnt(xt),rtofnt(yt)),is"rt"(rtofnt(xt),rtofnt(yt)),less"n"(nofnt(xt),nofnt(yt)),is"n"(nofnt(xt),nofnt(yt)),l,[u:less"rt"(rtofnt(xt),rtofnt(yt))]lesse(xt,yt,u),[u:is"rt"(rtofnt(xt),rtofnt(yt))]isrten(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),u)):lessis"n"(nofnt(xt),nofnt(yt))
-yt@[l:lessis"n"(nofnt(xt),nofnt(yt))]
-lessisi:=th9"l.or"(less"n"(nofnt(xt),nofnt(yt)),is"n"(nofnt(xt),nofnt(yt)),less"rt"(rtofnt(xt),rtofnt(yt)),is"rt"(rtofnt(xt),rtofnt(yt)),l,[u:less"n"(nofnt(xt),nofnt(yt))]lessi(xt,yt,u),[u:is"n"(nofnt(xt),nofnt(yt))]isrtin(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),u)):lessis(xt,yt)
-zt@[l:less(xt,yt)][k:less(yt,zt)]
-+515
-t1:=satz15(nofnt(xt),nofnt(yt),nofnt(zt),lesse(xt,yt,l),lesse(yt,zt,k)):less"n"(nofnt(xt),nofnt(zt))
--515
-satz15:=lessi(xt,zt,t1".515"):less(xt,zt)
-zt@[ut:natt][m:more(xt,yt)][n:more(zt,ut)]
-+521
-t1:=satz21(nofnt(xt),nofnt(yt),nofnt(zt),nofnt(ut),moree(xt,yt,m),moree(zt,ut,n)):more"n"(pl"n"(nofnt(xt),nofnt(zt)),pl"n"(nofnt(yt),nofnt(ut)))
-t2:=ismore12"n"(pl"n"(nofnt(xt),nofnt(zt)),nofnt(pl(xt,zt)),pl"n"(nofnt(yt),nofnt(ut)),nofnt(pl(yt,ut)),ispln(xt,zt),ispln(yt,ut),t1):more"n"(nofnt(pl(xt,zt)),nofnt(pl(yt,ut)))
--521
-satz21:=morei(pl(xt,zt),pl(yt,ut),t2".521"):more(pl(xt,zt),pl(yt,ut))
-@[p:[x:natt]'prop'][n:natt]
-lb:=all([x:natt]imp(<x>p,lessis(n,x))):'prop'
-min:=and(lb,<n>p):'prop'
-p@[s:some(p)]
-+527
-q:=[x:nat]<ntofn(x)>p:[x:nat]'prop'
-[n:natt][np:<n>p]
-t1:=isp(natt,p,n,ntofn(nofnt(n)),np,isntn1(n)):<nofnt(n)>q
-t2:=somei(nat,q,nofnt(n),t1):some"n"(q)
-s@t3:=someapp(natt,p,s,some"n"(q),[u:natt][v:<u>p]t2(u,v)):some"n"(q)
-t4:=satz27(q,t3):some"n"([x:nat]min"n"(q,x))
-[m:nat][mqm:min"n"(q,m)]
-t5:=ande1(lb"n"(q,m),<m>q,mqm):lb"n"(q,m)
-[n:nat][nq:<n>q]
-t6:=mp(<n>q,lessis"n"(m,n),nq,<n>t5):lessis"n"(m,n)
-mqm@[n:natt][np:<n>p]
-t7:=t6(nofnt(n),t1(n,np)):lessis"n"(m,nofnt(n))
-t8:=islessis1"n"(m,nofnt(ntofn(m)),nofnt(n),isnnt1(m),t7):lessis"n"(nofnt(ntofn(m)),nofnt(n))
-t9:=lessisi(ntofn(m),n,t8):lessis(ntofn(m),n)
-n@t10:=[u:<n>p]t9(u):imp(<n>p,lessis(ntofn(m),n))
-mqm@t11:=[x:natt]t10(x):lb(ntofn(m))
-t12:=ande2(lb"n"(q,m),<m>q,mqm):<ntofn(m)>p
-t13:=andi(lb(ntofn(m)),<ntofn(m)>p,t11,t12):min(ntofn(m))
-t14:=somei(natt,[x:natt]min(x),ntofn(m),t13):some([x:natt]min(x))
--527
-satz27:=someapp(nat,[x:nat]min"n"(q".527",x),t4".527",some([x:natt]min(x)),[x:nat][y:min"n"(q".527",x)]t14".527"(x,y)):some([x:natt]min(p,x))
--nt
-@1rt:=rtofn(1):rat
-x0@[x:frac][xix0:inf(x,class(x0))]
-+*ii5
-xix0@t35:=tr3eq(tf(x,fr(1,1)),fr(ts"n"(num(x),1),ts"n"(den(x),1)),fr(num(x),den(x)),x,tfeq1a(x,1,1),eqnd(ts"n"(num(x),1),ts"n"(den(x),1),num(x),den(x),satz28a(num(x)),satz28a(den(x))),refeq1(fr(num(x),den(x)),x,fris(x))):eq"n"(tf(x,fr(1,1)),x)
-t36:=isi(ts(x0,1rt),x0,tf(x,fr(1,1)),x,tict(x0,1rt,x,fr(1,1),xix0,inclass(fr(1,1))),xix0,t35):is(ts(x0,1rt),x0)
--ii5
-x0@example1a:=ratapp1(x0,is(ts(x0,1rt),x0),[x:frac][xi:inf(x,class(x0))]t36".ii5"(x,xi)):is(ts(x0,1rt),x0)
-example1b:=symis(rat,ts(x0,1rt),x0,example1a):is(x0,ts(x0,1rt))
-example1c:=tris(rat,ts(1rt,x0),ts(x0,1rt),x0,comts(1rt,x0),example1a):is(ts(1rt,x0),x0)
-example1d:=symis(rat,ts(1rt,x0),x0,example1c):is(x0,ts(1rt,x0))
-@[x:frac]
-+5114
-t1:=tr3eq(tf(fr(den(x),1),x),fr(ts"n"(den(x),num(x)),ts"n"(1,den(x))),fr(ts"n"(num(x),den(x)),ts"n"(1,den(x))),fr(num(x),1),tfeq2a(x,den(x),1),eqn(ts"n"(den(x),num(x)),ts"n"(1,den(x)),ts"n"(num(x),den(x)),comts"n"(den(x),num(x))),satz40c(num(x),1,den(x))):eq"n"(tf(fr(den(x),1),x),fr(num(x),1))
--5114
-satz114:=isi(ts(rtofn(den(x)),ratof(x)),rtofn(num(x)),tf(fr(den(x),1),x),fr(num(x),1),tict(rtofn(den(x)),ratof(x),fr(den(x),1),x,inclass(fr(den(x),1)),inclass(x)),inclass(fr(num(x),1)),t1".5114"):is(ts(rtofn(den(x)),ratof(x)),rtofn(num(x)))
-@[x1:nat][x2:nat]
-satz114a:=tr3is(rat,ts(rtofn(x2),ratof(fr(x1,x2))),ts(rtofn(den(fr(x1,x2))),ratof(fr(x1,x2))),rtofn(num(fr(x1,x2))),rtofn(x1),ists1(rtofn(x2),rtofn(den(fr(x1,x2))),ratof(fr(x1,x2)),isnert(x2,den(fr(x1,x2)),isden(x1,x2))),satz114(fr(x1,x2)),isnert(num(fr(x1,x2)),x1,numis(x1,x2))):is(ts(rtofn(x2),ratof(fr(x1,x2))),rtofn(x1))
-x0@[y0:rat]
-ov:=ind(rat,[t:rat]is(ts(y0,t),x0),satz110(x0,y0)):rat
-satz110c:=oneax(rat,[t:rat]is(ts(y0,t),x0),satz110(x0,y0)):is(ts(y0,ov(x0,y0)),x0)
-satz110d:=symis(rat,ts(y0,ov(x0,y0)),x0,satz110c):is(x0,ts(y0,ov(x0,y0)))
-satz110e:=tris(rat,ts(ov(x0,y0),y0),ts(y0,ov(x0,y0)),x0,comts(ov(x0,y0),y0),satz110c):is(ts(ov(x0,y0),y0),x0)
-satz110f:=symis(rat,ts(ov(x0,y0),y0),x0,satz110e):is(x0,ts(ov(x0,y0),y0))
-[v0:rat][i:is(ts(y0,v0),x0)]
-satz110g:=satz110b(x0,y0,v0,ov(x0,y0),i,satz110c):is(v0,ov(x0,y0))
-x2@satz114b:=satz110b(rtofn(x1),rtofn(x2),ratof(fr(x1,x2)),ov(rtofn(x1),rtofn(x2)),satz114a,satz110c(rtofn(x1),rtofn(x2))):is(ratof(fr(x1,x2)),ov(rtofn(x1),rtofn(x2)))
-satz114c:=symis(rat,ratof(fr(x1,x2)),ov(rtofn(x1),rtofn(x2)),satz114b):is(ov(rtofn(x1),rtofn(x2)),ratof(fr(x1,x2)))
-+5115
-y0@t1:=satz89(ov(y0,x0)):some([t:rat]more(t,ov(y0,x0)))
-[u0:rat][m:more(u0,ov(y0,x0))][u:frac][uiu0:inf(u,class(u0))]
-z:=num(u):nat
-v:=den(u):nat
-t2:=ismore1(u0,ov(rtofn(z),rtofn(v)),ov(y0,x0),tris(rat,u0,ratof(fr(z,v)),ov(rtofn(z),rtofn(v)),isi(u0,ratof(fr(z,v)),u,fr(z,v),uiu0,inclass(fr(z,v)),refeq1(u,fr(z,v),isfr(u))),satz114b(z,v)),m):more(ov(rtofn(z),rtofn(v)),ov(y0,x0))
-t3:=moreisi(rtofn(v),1rt,fr(v,1),fr(1,1),inclass(fr(v,1)),inclass(fr(1,1)),th9"l.or"(more"n"(v,1),is"n"(v,1),moref(fr(v,1),fr(1,1)),eq"n"(fr(v,1),fr(1,1)),satz24(v),[t:more"n"(v,1)]satz111d(v,1,t),[t:is"n"(v,1)]satz111e(v,1,t))):moreis(rtofn(v),1rt)
-t4:=tr3is(rat,ts(rtofn(z),x0),ts(x0,rtofn(z)),ts(x0,ts(ov(rtofn(z),rtofn(v)),rtofn(v))),ts(ts(x0,ov(rtofn(z),rtofn(v))),rtofn(v)),comts(rtofn(z),x0),ists2(rtofn(z),ts(ov(rtofn(z),rtofn(v)),rtofn(v)),x0,satz110f(rtofn(z),rtofn(v))),assts2(x0,ov(rtofn(z),rtofn(v)),rtofn(v))):is(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),rtofn(v)))
-[n:more(rtofn(v),1rt)]
-t5:=ismore1(ts(ts(x0,ov(rtofn(z),rtofn(v))),rtofn(v)),ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),symis(rat,ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),rtofn(v)),t4),satz105d(rtofn(v),1rt,ts(x0,ov(rtofn(z),rtofn(v))),n)):more(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt))
-t6:=moreisi1(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),t5):moreis(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt))
-uiu0@[i:is(rtofn(v),1rt)]
-t7:=moreisi2(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),tris(rat,ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),rtofn(v)),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),t4,ists2(rtofn(v),1rt,ts(x0,ov(rtofn(z),rtofn(v))),i))):moreis(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt))
-uiu0@t8:=orapp(more(rtofn(v),1rt),is(rtofn(v),1rt),moreis(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt)),t3,[t:more(rtofn(v),1rt)]t6(t),[t:is(rtofn(v),1rt)]t7(t)):moreis(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt))
-t9:=ismore12(ts(x0,ov(rtofn(z),rtofn(v))),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),ts(x0,ov(y0,x0)),y0,example1b(ts(x0,ov(rtofn(z),rtofn(v)))),satz110c(y0,x0),satz105d(ov(rtofn(z),rtofn(v)),ov(y0,x0),x0,t2)):more(ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),y0)
-t10:=satz87c(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),y0,t8,t9):more(ts(rtofn(z),x0),y0)
-t11:=somei(nat,[t:nat]more(ts(rtofn(t),x0),y0),z,t10):some"n"([t:nat]more(ts(rtofn(t),x0),y0))
-m@t12:=ratapp1(u0,some"n"([t:nat]more(ts(rtofn(t),x0),y0)),[u:frac][ui:inf(u,class(u0))]t11(u,ui)):some"n"([t:nat]more(ts(rtofn(t),x0),y0))
--5115
-y0@satz115:=someapp(rat,[t:rat]more(t,ov(y0,x0)),t1".5115",some"n"([t:nat]more(ts(rtofn(t),x0),y0)),[t:rat][u:more(t,ov(y0,x0))]t12".5115"(t,u)):some"n"([t:nat]more(ts(rtofn(t),x0),y0))
-+*5115
-uiu0@t13:=andi(natrt(rtofn(z)),more(ts(rtofn(z),x0),y0),natrti(z),t10):and(natrt(rtofn(z)),more(ts(rtofn(z),x0),y0))
-t14:=somei(rat,[t:rat]and(natrt(t),more(ts(t,x0),y0)),rtofn(z),t13):some([t:rat]and(natrt(t),more(ts(t,x0),y0)))
-m@t15:=ratapp1(u0,some([t:rat]and(natrt(t),more(ts(t,x0),y0))),[u:frac][ui:inf(u,class(u0))]t14(u,ui)):some([t:rat]and(natrt(t),more(ts(t,x0),y0)))
--5115
-y0@satz115a:=someapp(rat,[t:rat]more(t,ov(y0,x0)),t1".5115",some([t:rat]and(natrt(t),more(ts(t,x0),y0))),[t:rat][u:more(t,ov(y0,x0))]t15".5115"(t,u)):some([t:rat]and(natrt(t),more(ts(t,x0),y0)))
-@[s:set(rat)]
-cutprop1a:=nonempty(rat,s):'prop'
-cutprop1b:=not(all([x:rat]in(x,s))):'prop'
-cutprop1:=and(cutprop1a,cutprop1b):'prop'
-[x0:rat]
-cutprop2a:=all([x:rat]imp(not(in(x,s)),less(x0,x))):'prop'
-s@cutprop2:=all([x:rat]imp(in(x,s),cutprop2a(x))):'prop'
-x0@[y0:rat]
-+iii1
-ubprop:=imp(in(y0,s),moreis(x0,y0)):'prop'
--iii1
-x0@ub:=all([x:rat]ubprop".iii1"(x0,x)):'prop'
-max:=and(ub(x0),in(x0,s)):'prop'
-s@cutprop3:=not(some([x:rat]max(s,x))):'prop'
-cutprop:=and3(cutprop1,cutprop2,cutprop3):'prop'
-+*iii1
-y0@lbprop:=imp(in(y0,s),lessis(x0,y0)):'prop'
--iii1
-x0@lb:=all([x:rat]lbprop".iii1"(x0,x)):'prop'
-min:=and(lb(x0),in(x0,s)):'prop'
-@cut:=ot(set(rat),[x:set(rat)]cutprop(x)):'type'
-[ksi:cut]
-lcl:=in"e"(set(rat),[x:set(rat)]cutprop(x),ksi):set(rat)
-[x0:rat]
-lrt:=in(x0,lcl(ksi)):'prop'
-urt:=not(in(x0,lcl(ksi))):'prop'
-ksi@clcl:=inp(set(rat),[x:set(rat)]cutprop(x),ksi):cutprop(lcl(ksi))
-clcl1:=and3e1(cutprop1(lcl),cutprop2(lcl),cutprop3(lcl),clcl):cutprop1(lcl(ksi))
-clcl2:=and3e2(cutprop1(lcl),cutprop2(lcl),cutprop3(lcl),clcl):cutprop2(lcl(ksi))
-clcl3:=and3e3(cutprop1(lcl),cutprop2(lcl),cutprop3(lcl),clcl):cutprop3(lcl(ksi))
-clcl1a:=ande1(cutprop1a(lcl),cutprop1b(lcl),clcl1):cutprop1a(lcl(ksi))
-clcl1b:=ande2(cutprop1a(lcl),cutprop1b(lcl),clcl1):cutprop1b(lcl(ksi))
-[p:'prop'][p1:[x:rat][t:lrt(ksi,x)]p]
-cutapp1a:=nonemptyapp(rat,lcl,clcl1a,p,p1):p
-+*iii1
-ksi@t1:=th1"l.some"(rat,[x:rat]lrt(ksi,x),clcl1b):some([x:rat]urt(ksi,x))
--iii1
-p@[p1:[x:rat][t:urt(ksi,x)]p]
-cutapp1b:=someapp(rat,[x:rat]urt(ksi,x),t1".iii1",p,p1):p
-ksi@[x0:rat][lx:lrt(ksi,x0)]
-+*iii1
-lx@t2:=mp(lrt(ksi,x0),cutprop2a(lcl,x0),lx,<x0>clcl2):cutprop2a(lcl,x0)
--iii1
-lx@[y0:rat][uy:urt(ksi,y0)]
-cutapp2a:=mp(urt(ksi,y0),less(x0,y0),uy,<y0>t2".iii1"):less(x0,y0)
-cutapp2b:=satz83(x0,y0,cutapp2a):more(y0,x0)
-+*iii1
-lx@t3:=th4"l.some"(rat,[x:rat]max(lcl,x),clcl3,x0):not(max(lcl,x0))
-t4:=th4"l.and"(ub(lcl,x0),lrt(ksi,x0),t3,lx):not(ub(lcl,x0))
-t5:=th1"l.some"(rat,[x:rat]ubprop(lcl,x0,x),t4):some([x:rat]not(ubprop(lcl,x0,x)))
--iii1
-lx@[p:'prop'][p1:[y:rat][t:lrt(ksi,y)][u:less(x0,y)]p][y0:rat][n:not(ubprop".iii1"(lcl,x0,y0))]
-+*iii1
-n@t6:=th5"l.imp"(lrt(ksi,y0),moreis(x0,y0),n):lrt(ksi,y0)
-t7:=th6"l.imp"(lrt(ksi,y0),moreis(x0,y0),n):not(moreis(x0,y0))
-t8:=satz81j(x0,y0,t7):less(x0,y0)
-t9:=<t8><t6><y0>p1:p
--iii1
-p1@cutapp3:=someapp(rat,[y:rat]not(ubprop".iii1"(lcl,x0,y)),t5".iii1",p,[y:rat][t:not(ubprop".iii1"(lcl,x0,y))]t9".iii1"(y,t)):p
-s@[x0:rat][i:in(x0,s)][y0:rat][n:not(in(y0,s))]
-+*iii1
-n@t10:=andi(cutprop1a,cutprop1b,nonemptyi(rat,s,x0,i),th1"l.all"(rat,[x:rat]in(x,s),y0,n)):cutprop1
--iii1
-s@[n:[x:rat]not(max(s,x))]
-+*iii1
-n@t11:=th5"l.some"(rat,[x:rat]max(s,x),n):cutprop3
--iii1
-s@[x0:rat][i:in(x0,s)][y0:rat][n:not(in(y0,s))][l:[x:rat][t:in(x,s)][y:rat][u:not(in(y,s))]less(x,y)][m:[x:rat]not(max(s,x))]
-cut1:=and3i(cutprop1,cutprop2,cutprop3,t10".iii1"(x0,i,y0,n),l,t11".iii1"(m)):cutprop(s)
-+rp
-ksi@[eta:cut]
-is:=is"e"(cut,ksi,eta):'prop'
-nis:=not(is(ksi,eta)):'prop'
-[i:is(ksi,eta)]
-ise:=isini(set(rat),[x:set(rat)]cutprop(x),ksi,eta,i):is"e"(set(rat),lcl(ksi),lcl(eta))
-[x0:rat][lx:lrt(ksi,x0)]
-ise1:=issete1(rat,lcl(ksi),lcl(eta),ise,x0,lx):lrt(eta,x0)
-eta@[i:is"e"(set(rat),lcl(ksi),lcl(eta))]
-isi:=isine(set(rat),[x:set(rat)]cutprop(x),ksi,eta,i):is(ksi,eta)
-eta@[l:[x:rat][t:lrt(ksi,x)]lrt(eta,x)][k:[x:rat][t:lrt(eta,x)]lrt(ksi,x)]
-isi1:=isi(isseti(rat,lcl(ksi),lcl(eta),l,k)):is(ksi,eta)
-@[s:set(rat)][cs:cutprop(s)]
-cutof:=out(set(rat),[x:set(rat)]cutprop(x),s,cs):cut
-[x0:rat][i:in(x0,s)]
-ine:=issete1(rat,s,lcl(cutof(s,cs)),isinout(set(rat),[x:set(rat)]cutprop(x),s,cs),x0,i):lrt(cutof(s,cs),x0)
-x0@[lx:lrt(cutof(s,cs),x0)]
-ini:=issete2(rat,s,lcl(cutof(s,cs)),isinout(set(rat),[x:set(rat)]cutprop(x),s,cs),x0,lx):in(x0,s)
-s@[t:set(rat)][cs:cutprop(s)][ct:cutprop(t)][i:[x:rat][u:in(x,s)]in(x,t)][j:[x:rat][u:in(x,t)]in(x,s)]
-isi2:=isouti(set(rat),[x:set(rat)]cutprop(x),s,cs,t,ct,isseti(rat,s,t,i,j)):is(cutof(s,cs),cutof(t,ct))
-@[p:[x:cut]'prop']
-all:=all"l"(cut,p):'prop'
-some:=some"l"(cut,p):'prop'
-one:=one"e"(cut,p):'prop'
-ksi@satz116:=refis(cut,ksi):is(ksi,ksi)
-eta@[i:is(ksi,eta)]
-satz117:=symis(cut,ksi,eta,i):is(eta,ksi)
-eta@[zeta:cut][i:is(ksi,eta)][j:is(eta,zeta)]
-satz118:=tris(cut,ksi,eta,zeta,i,j):is(ksi,zeta)
-+1119
-@[x0:rat][y0:rat][m:more(x0,y0)]
-t1:=ec3e23(is"rt"(x0,y0),more(x0,y0),less(x0,y0),satz81b(x0,y0),m):not(less(x0,y0))
--1119
-ksi@[x0:rat][ux:urt(ksi,x0)][y0:rat][m:more(y0,x0)]
-satz119:=th3"l.imp"(lrt(ksi,y0),less(y0,x0),t1".1119"(y0,x0,m),[t:lrt(ksi,y0)]cutapp2a(y0,t,x0,ux)):urt(ksi,y0)
-y0@[l:less(x0,y0)]
-satz119a:=satz119(satz83(x0,y0,l)):urt(ksi,y0)
-+1120
-@[x0:rat][y0:rat][l:less(x0,y0)]
-t1:=ec3e32(is"rt"(x0,y0),more(x0,y0),less(x0,y0),satz81b(x0,y0),l):not(more(x0,y0))
--1120
-ksi@[x0:rat][lx:lrt(ksi,x0)][y0:rat][l:less(y0,x0)]
-satz120:=th7"l.imp"(lrt(ksi,y0),more(y0,x0),t1".1120"(y0,x0,l),[t:urt(ksi,y0)]cutapp2b(x0,lx,y0,t)):lrt(ksi,y0)
-y0@[m:more(x0,y0)]
-satz120a:=satz120(satz82(x0,y0,m)):lrt(ksi,y0)
--rp
-s@[i:[x:rat][t:in(x,s)][y:rat][u:less(y,x)]in(y,s)][x0:rat][j:in(x0,s)][y0:rat][n:not(in(y0,s))]
-+*iii1
-n@t12:=<y0><j><x0>i:[u:less(y0,x0)]in(y0,s)
-t13:=th3"l.imp"(less(y0,x0),in(y0,s),n,t12):not(less(y0,x0))
-t14:=satz81f(y0,x0,t13):moreis(y0,x0)
--iii1
-n@[k:is(y0,x0)]
-+*iii1
-k@t15:=isp1(rat,[x:rat]in(x,s),x0,y0,j,k):in(y0,s)
-n@t16:=th3"l.imp"(is(y0,x0),in(y0,s),n,[t:is(y0,x0)]t15(t)):nis(y0,x0)
-t17:=ore1(more(y0,x0),is(y0,x0),t14,t16):more(y0,x0)
-t18:=satz82(y0,x0,t17):less(x0,y0)
-i@t19:=[x:rat][t:in(x,s)][y:rat][u:not(in(y,s))]t18(x,t,y,u):cutprop2
--iii1
-s@[s1:[x:rat][t:in(x,s)]some([y:rat]and(in(y,s),more(y,x)))][x0:rat][i:in(x0,s)]
-+*iii1
-i@t20:=<i><x0>s1:some([y:rat]and(in(y,s),more(y,x0)))
--iii1
-i@[y0:rat][a:and(in(y0,s),more(y0,x0))]
-+*iii1
-a@t21:=ande1(in(y0,s),more(y0,x0),a):in(y0,s)
-t22:=ande2(in(y0,s),more(y0,x0),a):more(y0,x0)
-t23:=satz81g(y0,x0,t22):not(lessis(y0,x0))
-t24:=th3"l.imp"(moreis(x0,y0),lessis(y0,x0),t23,[t:moreis(x0,y0)]satz84(x0,y0,t)):not(moreis(x0,y0))
-t25:=th4"l.imp"(in(y0,s),moreis(x0,y0),t21,t24):not(ubprop(x0,y0))
-t26:=th1"l.all"(rat,[y:rat]ubprop(x0,y),y0,t25):not(ub(s,x0))
-t27:=th1"l.and"(ub(s,x0),in(x0,s),t26):not(max(s,x0))
-i@t28:=someapp(rat,[y:rat]and(in(y,s),more(y,x0)),t20,not(max(s,x0)),[y:rat][t:and(in(y,s),more(y,x0))]t27(y,t)):not(max(s,x0))
--iii1
-x0@[n:not(in(x0,s))]
-+*iii1
-n@t29:=th2"l.and"(ub(x0),in(x0,s),n):not(max(s,x0))
-x0@t30:=th1"l.imp"(in(x0,s),not(max(s,x0)),[u:in(x0,s)]t28(u),[u:not(in(x0,s))]t29(u)):not(max(s,x0))
-s1@t31:=t11([x:rat]t30(x)):cutprop3
--iii1
-s@[x0:rat][i:in(x0,s)][y0:rat][n:not(in(y0,s))][j:[x:rat][t:in(x,s)][y:rat][u:less(y,x)]in(y,s)][s1:[x:rat][t:in(x,s)]some([y:rat]and(in(y,s),more(y,x)))]
-cut2:=and3i(cutprop1,cutprop2,cutprop3,t10".iii1"(x0,i,y0,n),t19".iii1"(j),t31".iii1"(s1)):cutprop(s)
-+*rp
-eta@more:=some"rt"([x:rat]and(lrt(ksi,x),urt(eta,x))):'prop'
-[m:more(ksi,eta)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]p][x0:rat][a:and(lrt(ksi,x0),urt(eta,x0))]
-+iii2
-t1:=ande1(lrt(ksi,x0),urt(eta,x0),a):lrt(ksi,x0)
-t2:=ande2(lrt(ksi,x0),urt(eta,x0),a):urt(eta,x0)
-t3:=<t2><t1><x0>p1:p
--iii2
-p1@moreapp:=someapp(rat,[x:rat]and(lrt(ksi,x),urt(eta,x)),m,p,[x:rat][t:and(lrt(ksi,x),urt(eta,x))]t3".iii2"(x,t)):p
-eta@less:=some"rt"([x:rat]and(urt(ksi,x),lrt(eta,x))):'prop'
-[l:less(ksi,eta)][p:'prop'][p1:[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]p][x0:rat][a:and(urt(ksi,x0),lrt(eta,x0))]
-+*iii2
-a@t4:=ande1(urt(ksi,x0),lrt(eta,x0),a):urt(ksi,x0)
-t5:=ande2(urt(ksi,x0),lrt(eta,x0),a):lrt(eta,x0)
-t6:=<t5><t4><x0>p1:p
--iii2
-p1@lessapp:=someapp(rat,[x:rat]and(urt(ksi,x),lrt(eta,x)),l,p,[x:rat][t:and(urt(ksi,x),lrt(eta,x))]t6".iii2"(x,t)):p
-eta@[m:more(ksi,eta)]
-+2121
-[x0:rat][lx:lrt(ksi,x0)][ux:urt(eta,x0)]
-t1:=andi(urt(eta,x0),lrt(ksi,x0),ux,lx):and(urt(eta,x0),lrt(ksi,x0))
-t2:=somei(rat,[x:rat]and(urt(eta,x),lrt(ksi,x)),x0,t1):less(eta,ksi)
--2121
-satz121:=moreapp(m,less(eta,ksi),[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]t2".2121"(x,t,u)):less(eta,ksi)
-eta@[l:less(ksi,eta)]
-+2122
-[x0:rat][ux:urt(ksi,x0)][lx:lrt(eta,x0)]
-t1:=andi(lrt(eta,x0),urt(ksi,x0),lx,ux):and(lrt(eta,x0),urt(ksi,x0))
-t2:=somei(rat,[x:rat]and(lrt(eta,x),urt(ksi,x)),x0,t1):more(eta,ksi)
--2122
-satz122:=lessapp(l,more(eta,ksi),[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]t2".2122"(x,t,u)):more(eta,ksi)
-+2123
-eta@[m:more(ksi,eta)][x0:rat][lx:lrt(ksi,x0)][ux:urt(eta,x0)]
-t1:=th3"st.isset"(rat,lcl(ksi),lcl(eta),x0,lx,ux):not(is"e"(set(rat),lcl(ksi),lcl(eta)))
-t2:=th3"l.imp"(is(ksi,eta),is"e"(set(rat),lcl(ksi),lcl(eta)),t1,[t:is(ksi,eta)]ise(ksi,eta,t)):not(is(ksi,eta))
-m@t3:=moreapp(ksi,eta,m,not(is(ksi,eta)),[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]t2(x,t,u)):not(is(ksi,eta))
-eta@t4:=th2"l.ec"(is(ksi,eta),more(ksi,eta),[t:more(ksi,eta)]t3(t)):ec(is(ksi,eta),more(ksi,eta))
-[l:less(ksi,eta)][x0:rat][ux:urt(ksi,x0)][lx:lrt(eta,x0)]
-t5:=th4"st.isset"(rat,lcl(eta),lcl(ksi),x0,lx,ux):not(is"e"(set(rat),lcl(ksi),lcl(eta)))
-t6:=th3"l.imp"(is(ksi,eta),is"e"(set(rat),lcl(ksi),lcl(eta)),t5,[t:is(ksi,eta)]ise(ksi,eta,t)):not(is(ksi,eta))
-l@t7:=lessapp(ksi,eta,l,not(is(ksi,eta)),[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]t6(x,t,u)):not(is(ksi,eta))
-eta@t8:=th1"l.ec"(less(ksi,eta),is(ksi,eta),[t:less(ksi,eta)]t7(t)):ec(less(ksi,eta),is(ksi,eta))
-m@[l:less(ksi,eta)][x0:rat][lx:lrt(ksi,x0)][ux:urt(eta,x0)][y0:rat][uy:urt(ksi,y0)][ly:lrt(eta,y0)]
-t9:=cutapp2a(ksi,x0,lx,y0,uy):less"rt"(x0,y0)
-t10:=cutapp2b(eta,y0,ly,x0,ux):more"rt"(x0,y0)
-t11:=mp(less"rt"(x0,y0),con,t9,ec3e23(is"rt"(x0,y0),more"rt"(x0,y0),less"rt"(x0,y0),satz81b(x0,y0),t10)):con
-ux@t12:=lessapp(ksi,eta,l,con,[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]t11(x,t,u)):con
-l@t13:=moreapp(ksi,eta,m,con,[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]t12(x,t,u)):con
-m@t14:=[t:less(ksi,eta)]t13(t):not(less(ksi,eta))
-eta@t15:=th1"l.ec"(more(ksi,eta),less(ksi,eta),[t:more(ksi,eta)]t14(t)):ec(more(ksi,eta),less(ksi,eta))
-a:=th6"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),t4,t15,t8):ec3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-[i:is(ksi,eta)]
-t16:=or3i1(is(ksi,eta),more(ksi,eta),less(ksi,eta),i):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-eta@[n:nis(ksi,eta)]
-t17:=th3"l.imp"(is"e"(set(rat),lcl(ksi),lcl(eta)),is(ksi,eta),n,[t:is"e"(set(rat),lcl(ksi),lcl(eta))]isi(ksi,eta,t)):not(is"e"(set(rat),lcl(ksi),lcl(eta)))
-t18:=th5"st.isset"(rat,lcl(ksi),lcl(eta),t17):or(more(ksi,eta),more(eta,ksi))
-t19:=th8"l.or"(more(ksi,eta),more(eta,ksi),less(ksi,eta),t18,[t:more(eta,ksi)]satz121(eta,ksi,t)):or(more(ksi,eta),less(ksi,eta))
-t20:=th7"l.or3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),t19):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-eta@b:=th1"l.imp"(is(ksi,eta),or3(is(ksi,eta),more(ksi,eta),less(ksi,eta)),[t:is(ksi,eta)]t16(t),[t:nis(ksi,eta)]t20(t)):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
--2123
-eta@satz123:=orec3i(is(ksi,eta),more(ksi,eta),less(ksi,eta),b".2123",a".2123"):orec3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-satz123a:=orec3e1(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-satz123b:=orec3e2(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123):ec3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-moreis:=or(more(ksi,eta),is(ksi,eta)):'prop'
-lessis:=or(less(ksi,eta),is(ksi,eta)):'prop'
-[m:moreis(ksi,eta)]
-satz124:=th9"l.or"(more(ksi,eta),is(ksi,eta),less(eta,ksi),is(eta,ksi),m,[t:more(ksi,eta)]satz121(t),[t:is(ksi,eta)]symis(cut,ksi,eta,t)):lessis(eta,ksi)
-eta@[l:lessis(ksi,eta)]
-satz125:=th9"l.or"(less(ksi,eta),is(ksi,eta),more(eta,ksi),is(eta,ksi),l,[t:less(ksi,eta)]satz122(t),[t:is(ksi,eta)]symis(cut,ksi,eta,t)):moreis(eta,ksi)
-zeta@[i:is(ksi,eta)][m:more(ksi,zeta)]
-ismore1:=isp(cut,[u:cut]more(u,zeta),ksi,eta,m,i):more(eta,zeta)
-i@[m:more(zeta,ksi)]
-ismore2:=isp(cut,[u:cut]more(zeta,u),ksi,eta,m,i):more(zeta,eta)
-i@[l:less(ksi,zeta)]
-isless1:=isp(cut,[u:cut]less(u,zeta),ksi,eta,l,i):less(eta,zeta)
-i@[l:less(zeta,ksi)]
-isless2:=isp(cut,[u:cut]less(zeta,u),ksi,eta,l,i):less(zeta,eta)
-i@[m:moreis(ksi,zeta)]
-ismoreis1:=isp(cut,[u:cut]moreis(u,zeta),ksi,eta,m,i):moreis(eta,zeta)
-i@[m:moreis(zeta,ksi)]
-ismoreis2:=isp(cut,[u:cut]moreis(zeta,u),ksi,eta,m,i):moreis(zeta,eta)
-i@[l:lessis(ksi,zeta)]
-islessis1:=isp(cut,[u:cut]lessis(u,zeta),ksi,eta,l,i):lessis(eta,zeta)
-i@[l:lessis(zeta,ksi)]
-islessis2:=isp(cut,[u:cut]lessis(zeta,u),ksi,eta,l,i):lessis(zeta,eta)
-eta@[i:is(ksi,eta)]
-moreisi2:=ori2(more(ksi,eta),is(ksi,eta),i):moreis(ksi,eta)
-lessisi2:=ori2(less(ksi,eta),is(ksi,eta),i):lessis(ksi,eta)
-eta@[m:more(ksi,eta)]
-moreisi1:=ori1(more(ksi,eta),is(ksi,eta),m):moreis(ksi,eta)
-eta@[l:less(ksi,eta)]
-lessisi1:=ori1(less(ksi,eta),is(ksi,eta),l):lessis(ksi,eta)
-zeta@[upsilon:cut][i:is(ksi,eta)][j:is(zeta,upsilon)][m:more(ksi,zeta)]
-ismore12:=ismore2(zeta,upsilon,eta,j,ismore1(ksi,eta,zeta,i,m)):more(eta,upsilon)
-j@[l:less(ksi,zeta)]
-isless12:=isless2(zeta,upsilon,eta,j,isless1(ksi,eta,zeta,i,l)):less(eta,upsilon)
-j@[m:moreis(ksi,zeta)]
-ismoreis12:=ismoreis2(zeta,upsilon,eta,j,ismoreis1(ksi,eta,zeta,i,m)):moreis(eta,upsilon)
-j@[l:lessis(ksi,zeta)]
-islessis12:=islessis2(zeta,upsilon,eta,j,islessis1(ksi,eta,zeta,i,l)):lessis(eta,upsilon)
-eta@[m:moreis(ksi,eta)]
-satz123c:=th7"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,comor(more(ksi,eta),is(ksi,eta),m)):not(less(ksi,eta))
-eta@[l:lessis(ksi,eta)]
-satz123d:=th9"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,l):not(more(ksi,eta))
-eta@[n:not(more(ksi,eta))]
-satz123e:=th2"l.or3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123a,n):lessis(ksi,eta)
-eta@[n:not(less(ksi,eta))]
-satz123f:=comor(is(ksi,eta),more(ksi,eta),th3"l.or3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123a,n)):moreis(ksi,eta)
-eta@[m:more(ksi,eta)]
-satz123g:=th3"l.or"(less(ksi,eta),is(ksi,eta),ec3e23(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,m),ec3e21(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,m)):not(lessis(ksi,eta))
-eta@[l:less(ksi,eta)]
-satz123h:=th3"l.or"(more(ksi,eta),is(ksi,eta),ec3e32(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,l),ec3e31(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,l)):not(moreis(ksi,eta))
-eta@[n:not(moreis(ksi,eta))]
-satz123j:=or3e3(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123a,th5"l.or"(more(ksi,eta),is(ksi,eta),n),th4"l.or"(more(ksi,eta),is(ksi,eta),n)):less(ksi,eta)
-eta@[n:not(lessis(ksi,eta))]
-satz123k:=or3e2(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123a,th4"l.or"(less(ksi,eta),is(ksi,eta),n),th5"l.or"(less(ksi,eta),is(ksi,eta),n)):more(ksi,eta)
-zeta@[l:less(ksi,eta)][k:less(eta,zeta)]
-+2126
-[x0:rat][ux:urt(ksi,x0)][lx:lrt(eta,x0)][y0:rat][uy:urt(eta,y0)][ly:lrt(zeta,y0)]
-t1:=cutapp2a(eta,x0,lx,y0,uy):less"rt"(x0,y0)
-t2:=satz119a(ksi,x0,ux,y0,t1):urt(ksi,y0)
-t3:=andi(urt(ksi,y0),lrt(zeta,y0),t2,ly):and(urt(ksi,y0),lrt(zeta,y0))
-t4:=somei(rat,[x:rat]and(urt(ksi,x),lrt(zeta,x)),y0,t3):less(ksi,zeta)
-lx@t5:=lessapp(eta,zeta,k,less(ksi,zeta),[x:rat][t:urt(eta,x)][u:lrt(zeta,x)]t4(x,t,u)):less(ksi,zeta)
--2126
-satz126:=lessapp(ksi,eta,l,less(ksi,zeta),[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]t5".2126"(x,t,u)):less(ksi,zeta)
-trless:=satz126:less(ksi,zeta)
-zeta@[m:more(ksi,eta)][n:more(eta,zeta)]
-trmore:=satz122(zeta,ksi,satz126(zeta,eta,ksi,satz121(eta,zeta,n),satz121(ksi,eta,m))):more(ksi,zeta)
-zeta@[l:lessis(ksi,eta)][k:less(eta,zeta)]
-satz127a:=orapp(less(ksi,eta),is(ksi,eta),less(ksi,zeta),l,[u:less(ksi,eta)]trless(u,k),[u:is(ksi,eta)]isless1(eta,ksi,zeta,symis(cut,ksi,eta,u),k)):less(ksi,zeta)
-zeta@[l:less(ksi,eta)][k:lessis(eta,zeta)]
-satz127b:=orapp(less(eta,zeta),is(eta,zeta),less(ksi,zeta),k,[u:less(eta,zeta)]trless(l,u),[u:is(eta,zeta)]isless2(eta,zeta,ksi,u,l)):less(ksi,zeta)
-zeta@[m:moreis(ksi,eta)][n:more(eta,zeta)]
-satz127c:=satz122(zeta,ksi,satz127b(zeta,eta,ksi,satz121(eta,zeta,n),satz124(ksi,eta,m))):more(ksi,zeta)
-zeta@[m:more(ksi,eta)][n:moreis(eta,zeta)]
-satz127d:=satz122(zeta,ksi,satz127a(zeta,eta,ksi,satz124(eta,zeta,n),satz121(ksi,eta,m))):more(ksi,zeta)
-zeta@[l:lessis(ksi,eta)][k:lessis(eta,zeta)]
-+2128
-[i:is(ksi,eta)][j:is(eta,zeta)]
-t1:=lessisi2(ksi,zeta,tris(cut,ksi,eta,zeta,i,j)):lessis(ksi,zeta)
-i@[j:less(eta,zeta)]
-t2:=lessisi1(ksi,zeta,satz127a(l,j)):lessis(ksi,zeta)
-i@t3:=orapp(less(eta,zeta),is(eta,zeta),lessis(ksi,zeta),k,[t:less(eta,zeta)]t2(t),[t:is(eta,zeta)]t1(t)):lessis(ksi,zeta)
-k@[j:less(ksi,eta)]
-t4:=lessisi1(ksi,zeta,satz127b(j,k)):lessis(ksi,zeta)
--2128
-satz128:=orapp(less(ksi,eta),is(ksi,eta),lessis(ksi,zeta),l,[t:less(ksi,eta)]t4".2128"(t),[t:is(ksi,eta)]t3".2128"(t)):lessis(ksi,zeta)
-trlessis:=satz128:lessis(ksi,zeta)
-zeta@[m:moreis(ksi,eta)][n:moreis(eta,zeta)]
-trmoreis:=satz125(zeta,ksi,satz128(zeta,eta,ksi,satz124(eta,zeta,n),satz124(ksi,eta,m))):moreis(ksi,zeta)
-eta@[z0:rat][x0:rat][y0:rat]
-sumprop1:=and3(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,pl(x0,y0))):'prop'
-z0@sumprop:=some"rt"([x:rat]some"rt"([y:rat]sumprop1(z0,x,y))):'prop'
-eta@sum:=setof(rat,[z:rat]sumprop(z)):set(rat)
-x0@[lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,pl(x0,y0))]
-+iii3
-t1:=and3i(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,pl(x0,y0)),lx,ly,i):sumprop1(z0,x0,y0)
-t2:=somei(rat,[y:rat]sumprop1(z0,x0,y),y0,t1):some"rt"([y:rat]sumprop1(z0,x0,y))
-t3:=somei(rat,[x:rat]some"rt"([y:rat]sumprop1(z0,x,y)),x0,t2):sumprop(z0)
--iii3
-sum1:=estii(rat,[z:rat]sumprop(z),z0,t3".iii3"):in(z0,sum)
-z0@[i:in(z0,sum)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,pl(x,y))]p]
-+*iii3
-p1@t4:=estie(rat,[z:rat]sumprop(z),z0,i):sumprop(z0)
--iii3
-p1@[x0:rat][px:some"rt"([y:rat]sumprop1(z0,x0,y))][y0:rat][py:sumprop1(z0,x0,y0)]
-+*iii3
-py@t5:=and3e1(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,pl(x0,y0)),py):lrt(ksi,x0)
-t6:=and3e2(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,pl(x0,y0)),py):lrt(eta,y0)
-t7:=and3e3(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,pl(x0,y0)),py):is"rt"(z0,pl(x0,y0))
-t8:=<t7><t6><y0><t5><x0>p1:p
-px@t9:=someapp(rat,[y:rat]sumprop1(z0,x0,y),px,p,[y:rat][t:sumprop1(z0,x0,y)]t8(y,t)):p
--iii3
-p1@sumapp:=someapp(rat,[x:rat]some"rt"([y:rat]sumprop1(z0,x,y)),t4".iii3",p,[x:rat][t:some"rt"([y:rat]sumprop1(z0,x,y))]t9".iii3"(x,t)):p
-eta@[x1:rat][ux:urt(ksi,x1)][y1:rat][uy:urt(eta,y1)]
-+3129
-[z0:rat][i:in(z0,sum)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(z0,pl(x0,y0))]
-t1:=cutapp2a(ksi,x0,lx,x1,ux):less"rt"(x0,x1)
-t2:=cutapp2a(eta,y0,ly,y1,uy):less"rt"(y0,y1)
-t3:=isless1"rt"(pl(x0,y0),z0,pl(x1,y1),symis(rat,z0,pl(x0,y0),j),satz98a(x0,x1,y0,y1,t1,t2)):less"rt"(z0,pl(x1,y1))
-t4:=ec3e31(is"rt"(z0,pl(x1,y1)),more"rt"(z0,pl(x1,y1)),less"rt"(z0,pl(x1,y1)),satz81b(z0,pl(x1,y1)),t3):nis"rt"(z0,pl(x1,y1))
-i@t5:=sumapp(ksi,eta,z0,i,nis"rt"(z0,pl(x1,y1)),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,pl(x,y))]t4(x,t,y,u,v)):nis"rt"(z0,pl(x1,y1))
--3129
-satz129a:=th3"l.imp"(in(pl(x1,y1),sum),nis"rt"(pl(x1,y1),pl(x1,y1)),weli(is"rt"(pl(x1,y1),pl(x1,y1)),refis(rat,pl(x1,y1))),[t:in(pl(x1,y1),sum)]t5".3129"(pl(x1,y1),t)):not(in(pl(x1,y1),sum))
-+*3129
-eta@[u0:rat][i:in(u0,sum)][z0:rat][l:less"rt"(z0,u0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(u0,pl(x0,y0))]
-t6:=isless2"rt"(u0,pl(x0,y0),z0,j,l):less"rt"(z0,pl(x0,y0))
-z1:=ov(z0,pl(x0,y0)):rat
-t7:=isless12"rt"(z0,ts(z1,pl(x0,y0)),pl(x0,y0),ts(1rt,pl(x0,y0)),satz110f(z0,pl(x0,y0)),example1d(pl(x0,y0)),t6):less"rt"(ts(z1,pl(x0,y0)),ts(1rt,pl(x0,y0)))
-t8:=satz106c(z1,1rt,pl(x0,y0),t7):less"rt"(z1,1rt)
-t9:=isless2"rt"(ts(x0,1rt),x0,ts(x0,z1),example1a(x0),satz105f(z1,1rt,x0,t8)):less"rt"(ts(x0,z1),x0)
-t10:=isless2"rt"(ts(y0,1rt),y0,ts(y0,z1),example1a(y0),satz105f(z1,1rt,y0,t8)):less"rt"(ts(y0,z1),y0)
-t11:=satz120(ksi,x0,lx,ts(x0,z1),t9):lrt(ksi,ts(x0,z1))
-t12:=satz120(eta,y0,ly,ts(y0,z1),t10):lrt(eta,ts(y0,z1))
-t13:=tris(rat,pl(ts(x0,z1),ts(y0,z1)),ts(pl(x0,y0),z1),z0,distpt1(x0,y0,z1),satz110c(z0,pl(x0,y0))):is"rt"(pl(ts(x0,z1),ts(y0,z1)),z0)
-t14:=symis(rat,pl(ts(x0,z1),ts(y0,z1)),z0,t13):is"rt"(z0,pl(ts(x0,z1),ts(y0,z1)))
-t15:=sum1(ksi,eta,z0,ts(x0,z1),t11,ts(y0,z1),t12,t14):in(z0,sum)
-l@t16:=sumapp(ksi,eta,u0,i,in(z0,sum),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(u0,pl(x,y))]t15(x,t,y,u,v)):in(z0,sum)
-eta@[z0:rat][i:in(z0,sum)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(z0,pl(x0,y0))][x1:rat][lx1:lrt(ksi,x1)][l:less"rt"(x0,x1)]
-t17:=sum1(ksi,eta,pl(x1,y0),x1,lx1,y0,ly,refis(rat,pl(x1,y0))):in(pl(x1,y0),sum)
-t18:=satz96a(x1,x0,y0,satz83(x0,x1,l)):more"rt"(pl(x1,y0),pl(x0,y0))
-t19:=ismore2"rt"(pl(x0,y0),z0,pl(x1,y0),symis(rat,z0,pl(x0,y0),j),t18):more"rt"(pl(x1,y0),z0)
-t20:=andi(in(pl(x1,y0),sum),more"rt"(pl(x1,y0),z0),t17,t19):and(in(pl(x1,y0),sum),more"rt"(pl(x1,y0),z0))
-t21:=somei(rat,[y:rat]and(in(y,sum),more"rt"(y,z0)),pl(x1,y0),t20):some"rt"([y:rat]and(in(y,sum),more"rt"(y,z0)))
-j@t22:=cutapp3(ksi,x0,lx,some"rt"([y:rat]and(in(y,sum),more"rt"(y,z0))),[x:rat][t:lrt(ksi,x)][u:less"rt"(x0,x)]t21(x,t,u)):some"rt"([y:rat]and(in(y,sum),more"rt"(y,z0)))
-i@t23:=sumapp(ksi,eta,z0,i,some"rt"([y:rat]and(in(y,sum),more"rt"(y,z0))),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,pl(x,y))]t22(x,t,y,u,v)):some"rt"([y:rat]and(in(y,sum),more"rt"(y,z0)))
-eta@[x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][x1:rat][ux:urt(ksi,x1)][y1:rat][uy:urt(eta,y1)]
-t24:=cut2(sum,pl(x0,y0),sum1(ksi,eta,pl(x0,y0),x0,lx,y0,ly,refis(rat,pl(x0,y0))),pl(x1,y1),satz129a(x1,ux,y1,uy),[x:rat][t:in(x,sum)][y:rat][u:less"rt"(y,x)]t16(x,t,y,u),[x:rat][t:in(x,sum)]t23(x,t)):cutprop(sum)
-ux@t25:=cutapp1b(eta,cutprop(sum),[y:rat][t:urt(eta,y)]t24(y,t)):cutprop(sum)
-ly@t26:=cutapp1b(ksi,cutprop(sum),[x:rat][t:urt(ksi,x)]t25(x,t)):cutprop(sum)
-lx@t27:=cutapp1a(eta,cutprop(sum),[y:rat][t:lrt(eta,y)]t26(y,t)):cutprop(sum)
--3129
-eta@satz129:=cutapp1a(ksi,cutprop(sum),[x:rat][t:lrt(ksi,x)]t27".3129"(x,t)):cutprop(sum)
-pl:=cutof(sum,satz129):cut
-[z0:rat][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,pl"rt"(x0,y0))]
-lrtpl:=ine(sum,satz129,z0,sum1(z0,x0,lx,y0,ly,i)):lrt(pl(ksi,eta),z0)
-eta@[z0:rat][x0:rat][ux:urt(ksi,x0)][y0:rat][uy:urt(eta,y0)][i:is"rt"(z0,pl"rt"(x0,y0))]
-+*iii3
-i@t10:=isp1(rat,[x:rat]not(in(x,sum)),pl"rt"(x0,y0),z0,satz129a(x0,ux,y0,uy),i):not(in(z0,sum))
--iii3
-i@urtpl:=th3"l.imp"(lrt(pl(ksi,eta),z0),in(z0,sum),t10".iii3",[t:lrt(pl(ksi,eta),z0)]ini(sum,satz129,z0,t)):urt(pl(ksi,eta),z0)
-eta@[z0:rat][lz:lrt(pl(ksi,eta),z0)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,pl"rt"(x,y))]p]
-+*iii3
-p1@t11:=ini(sum,satz129,z0,lz):in(z0,sum)
--iii3
-p1@plapp:=sumapp(z0,t11".iii3",p,p1):p
-zeta@[i:is(ksi,eta)]
-ispl1:=isf(cut,cut,[u:cut]pl(u,zeta),ksi,eta,i):is(pl(ksi,zeta),pl(eta,zeta))
-ispl2:=isf(cut,cut,[u:cut]pl(zeta,u),ksi,eta,i):is(pl(zeta,ksi),pl(zeta,eta))
-upsilon@[i:is(ksi,eta)][j:is(zeta,upsilon)]
-ispl12:=tris(cut,pl(ksi,zeta),pl(eta,zeta),pl(eta,upsilon),ispl1(i),ispl2(zeta,upsilon,eta,j)):is(pl(ksi,zeta),pl(eta,upsilon))
-+3130
-eta@[z0:rat][lz:lrt(pl(ksi,eta),z0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,pl"rt"(x0,y0))]
-t1:=tris(rat,z0,pl"rt"(x0,y0),pl"rt"(y0,x0),i,compl(x0,y0)):is"rt"(z0,pl"rt"(y0,x0))
-t2:=lrtpl(eta,ksi,z0,y0,ly,x0,lx,t1):lrt(pl(eta,ksi),z0)
-lz@t3:=plapp(ksi,eta,z0,lz,lrt(pl(eta,ksi),z0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,pl"rt"(x,y))]t2(x,t,y,u,v)):lrt(pl(eta,ksi),z0)
--3130
-eta@satz130:=isi1(pl(ksi,eta),pl(eta,ksi),[x:rat][t:lrt(pl(ksi,eta),x)]t3".3130"(x,t),[x:rat][t:lrt(pl(eta,ksi),x)]t3".3130"(eta,ksi,x,t)):is(pl(ksi,eta),pl(eta,ksi))
-compl:=satz130:is(pl(ksi,eta),pl(eta,ksi))
-+3131
-zeta@[u0:rat][lu:lrt(pl(pl(ksi,eta),zeta),u0)][v0:rat][lv:lrt(pl(ksi,eta),v0)][z0:rat][lz:lrt(zeta,z0)][i:is"rt"(u0,pl"rt"(v0,z0))][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(v0,pl"rt"(x0,y0))]
-t1:=tr3is(rat,u0,pl"rt"(v0,z0),pl"rt"(pl"rt"(x0,y0),z0),pl"rt"(x0,pl"rt"(y0,z0)),i,ispl1"rt"(v0,pl"rt"(x0,y0),z0,j),asspl1(x0,y0,z0)):is"rt"(u0,pl"rt"(x0,pl"rt"(y0,z0)))
-t2:=lrtpl(eta,zeta,pl"rt"(y0,z0),y0,ly,z0,lz,refis(rat,pl"rt"(y0,z0))):lrt(pl(eta,zeta),pl"rt"(y0,z0))
-t3:=lrtpl(ksi,pl(eta,zeta),u0,x0,lx,pl"rt"(y0,z0),t2,t1):lrt(pl(ksi,pl(eta,zeta)),u0)
-i@t4:=plapp(ksi,eta,v0,lv,lrt(pl(ksi,pl(eta,zeta)),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(v0,pl"rt"(x,y))]t3(x,t,y,u,v)):lrt(pl(ksi,pl(eta,zeta)),u0)
-lu@t5:=plapp(pl(ksi,eta),zeta,u0,lu,lrt(pl(ksi,pl(eta,zeta)),u0),[x:rat][t:lrt(pl(ksi,eta),x)][y:rat][u:lrt(zeta,y)][v:is"rt"(u0,pl"rt"(x,y))]t4(x,t,y,u,v)):lrt(pl(ksi,pl(eta,zeta)),u0)
-u0@[lu:lrt(pl(ksi,pl(eta,zeta)),u0)][x0:rat][lx:lrt(ksi,x0)][v0:rat][lv:lrt(pl(eta,zeta),v0)][i:is"rt"(u0,pl"rt"(x0,v0))][y0:rat][ly:lrt(eta,y0)][z0:rat][lz:lrt(zeta,z0)][j:is"rt"(v0,pl"rt"(y0,z0))]
-t6:=tr3is(rat,u0,pl"rt"(x0,v0),pl"rt"(x0,pl"rt"(y0,z0)),pl"rt"(pl"rt"(x0,y0),z0),i,ispl2"rt"(v0,pl"rt"(y0,z0),x0,j),asspl2(x0,y0,z0)):is"rt"(u0,pl"rt"(pl"rt"(x0,y0),z0))
-t7:=lrtpl(ksi,eta,pl"rt"(x0,y0),x0,lx,y0,ly,refis(rat,pl"rt"(x0,y0))):lrt(pl(ksi,eta),pl"rt"(x0,y0))
-t8:=lrtpl(pl(ksi,eta),zeta,u0,pl"rt"(x0,y0),t7,z0,lz,t6):lrt(pl(pl(ksi,eta),zeta),u0)
-i@t9:=plapp(eta,zeta,v0,lv,lrt(pl(pl(ksi,eta),zeta),u0),[x:rat][t:lrt(eta,x)][y:rat][u:lrt(zeta,y)][v:is"rt"(v0,pl"rt"(x,y))]t8(x,t,y,u,v)):lrt(pl(pl(ksi,eta),zeta),u0)
-lu@t10:=plapp(ksi,pl(eta,zeta),u0,lu,lrt(pl(pl(ksi,eta),zeta),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(pl(eta,zeta),y)][v:is"rt"(u0,pl"rt"(x,y))]t9(x,t,y,u,v)):lrt(pl(pl(ksi,eta),zeta),u0)
--3131
-zeta@satz131:=isi1(pl(pl(ksi,eta),zeta),pl(ksi,pl(eta,zeta)),[x:rat][t:lrt(pl(pl(ksi,eta),zeta),x)]t5".3131"(x,t),[x:rat][t:lrt(pl(ksi,pl(eta,zeta)),x)]t10".3131"(x,t)):is(pl(pl(ksi,eta),zeta),pl(ksi,pl(eta,zeta)))
-asspl1:=satz131:is(pl(pl(ksi,eta),zeta),pl(ksi,pl(eta,zeta)))
-asspl2:=symis(cut,pl(pl(ksi,eta),zeta),pl(ksi,pl(eta,zeta)),satz131):is(pl(ksi,pl(eta,zeta)),pl(pl(ksi,eta),zeta))
-ksi@[a0:rat]
-+3132
-[x0:rat][y0:rat]
-prop1:=and(lrt(ksi,x0),urt(ksi,y0)):'prop'
-[p:prop1]
-t1:=cutapp2b(x0,ande1(lrt(ksi,x0),urt(ksi,y0),p),y0,ande2(lrt(ksi,x0),urt(ksi,y0),p)):more"rt"(y0,x0)
-prop2:=is"rt"(mn(y0,x0,t1),a0):'prop'
-y0@prop3:=and(prop1,[t:prop1]prop2(t)):'prop'
-a0@prop4:=some"rt"([x:rat]some"rt"([y:rat]prop3(x,y))):'prop'
-x0@[lx:lrt(ksi,x0)][y0:rat][uy:urt(ksi,y0)]
-t2:=cutapp2b(x0,lx,y0,uy):more"rt"(y0,x0)
-[n:nat][m:more"rt"(ts(rtofn(n),a0),mn(y0,x0,t2))]
-t3:=satz96d(ts(rtofn(n),a0),mn(y0,x0,t2),x0,m):more"rt"(pl"rt"(x0,ts(rtofn(n),a0)),pl"rt"(x0,mn(y0,x0,t2)))
-t4:=ismore2"rt"(pl"rt"(x0,mn(y0,x0,t2)),y0,pl"rt"(x0,ts(rtofn(n),a0)),satz101c(y0,x0,t2),t3):more"rt"(pl"rt"(x0,ts(rtofn(n),a0)),y0)
-t5:=satz119(y0,uy,pl"rt"(x0,ts(rtofn(n),a0)),t4):urt(pl"rt"(x0,ts(rtofn(n),a0)))
-t6:=somei(nat,[x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))),n,t5):some"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))))
-uy@t7:=someapp(nat,[x:nat]more"rt"(ts(rtofn(x),a0),mn(y0,x0,t2)),satz115(a0,mn(y0,x0,t2)),some"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0)))),[x:nat][t:more"rt"(ts(rtofn(x),a0),mn(y0,x0,t2))]t6(x,t)):some"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))))
-[u:nat][m:min"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))),u)]
-t8:=ande1(lb"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))),u),urt(pl"rt"(x0,ts(rtofn(u),a0))),m):lb"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))),u)
-t9:=ande2(lb"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))),u),urt(pl"rt"(x0,ts(rtofn(u),a0))),m):urt(pl"rt"(x0,ts(rtofn(u),a0)))
-[i:is"n"(u,1)]
-u0:=pl"rt"(x0,a0):rat
-t10:=tr3is(rat,ts(rtofn(u),a0),ts(1rt,a0),ts(a0,1rt),a0,ists1(rtofn(u),1rt,a0,isnert(u,1,i)),comts(1rt,a0),example1a(a0)):is"rt"(ts(rtofn(u),a0),a0)
-t11:=isp(rat,[x:rat]urt(pl"rt"(x0,x)),ts(rtofn(u),a0),a0,t9,t10):urt(ksi,u0)
-t12:=andi(lrt(ksi,x0),urt(ksi,u0),lx,t11):prop1(x0,u0)
-[p:prop1(x0,u0)]
-t13:=symis(rat,a0,mn(u0,x0,t1(x0,u0,p)),satz101g(u0,x0,a0,t1(x0,u0,p),refis(rat,u0))):prop2(x0,u0,p)
-i@t14:=andi(prop1(x0,u0),[t:prop1(x0,u0)]prop2(x0,u0,t),t12,[t:prop1(x0,u0)]t13(t)):prop3(x0,u0)
-t15:=somei(rat,[y:rat]prop3(x0,y),u0,t14):some"rt"([y:rat]prop3(x0,y))
-t16:=somei(rat,[x:rat]some"rt"([y:rat]prop3(x,y)),x0,t15):prop4
-m@[o:more"n"(u,1)]
-t17:=morei(rtofn(u),1rt,fr(u,1),fr(1,1),inclass(fr(u,1)),inclass(fr(1,1)),satz111d(u,1,o)):more"rt"(rtofn(u),1rt)
-um10:=mn(rtofn(u),1rt,t17):rat
-t18:=satz112g(rtofn(u),natrti(u),1rt,natrti(1),t17):natrt(um10)
-um1:=nofrt(um10,t18):nat
-v0:=pl"rt"(x0,ts(um10,a0)):rat
-w0:=pl"rt"(x0,ts(rtofn(u),a0)):rat
-t19:=isless2"rt"(pl"rt"(um10,1rt),rtofn(u),um10,satz101e(rtofn(u),1rt,t17),satz94a(um10,1rt)):less"rt"(um10,rtofn(u))
-t20:=lesse(um10,rtofn(u),fr(um1,1),fr(u,1),inclassn(um10,t18),inclass(fr(u,1)),t19):lessf(fr(um1,1),fr(u,1))
-t21:=satz111c(um1,u,t20):less"n"(um1,u)
-t22:=th3"l.imp"(lessis"n"(u,um1),moreis"n"(um1,u),satz10h(um1,u,t21),[t:lessis"n"(u,um1)]satz14(u,um1,t)):not(lessis"n"(u,um1))
-t23:=et(lrt(pl"rt"(x0,ts(rtofn(um1),a0))),th3"l.imp"(urt(pl"rt"(x0,ts(rtofn(um1),a0))),lessis"n"(u,um1),t22,<um1>t8)):lrt(pl"rt"(x0,ts(rtofn(um1),a0)))
-t24:=isp1(rat,[x:rat]lrt(pl"rt"(x0,ts(x,a0))),rtofn(um1),um10,t23,isrtn1(um10,t18)):lrt(ksi,v0)
-t25:=andi(lrt(ksi,v0),urt(ksi,w0),t24,t9):prop1(v0,w0)
-t26:=tr3is(rat,pl"rt"(ts(um10,a0),a0),pl"rt"(ts(um10,a0),ts(1rt,a0)),ts(pl"rt"(um10,1rt),a0),ts(rtofn(u),a0),ispl2"rt"(a0,ts(1rt,a0),ts(um10,a0),example1d(a0)),distpt1(um10,1rt,a0),ists1(pl"rt"(um10,1rt),rtofn(u),a0,satz101e(rtofn(u),1rt,t17))):is"rt"(pl"rt"(ts(um10,a0),a0),ts(rtofn(u),a0))
-t27:=tris(rat,pl"rt"(v0,a0),pl"rt"(x0,pl"rt"(ts(um10,a0),a0)),w0,asspl1"rt"(x0,ts(um10,a0),a0),ispl2"rt"(pl"rt"(ts(um10,a0),a0),ts(rtofn(u),a0),x0,t26)):is"rt"(pl"rt"(v0,a0),w0)
-[p:prop1(v0,w0)]
-t28:=symis(rat,a0,mn(w0,v0,t1(v0,w0,p)),satz101g(w0,v0,a0,t1(v0,w0,p),t27)):prop2(v0,w0,p)
-o@t29:=andi(prop1(v0,w0),[t:prop1(v0,w0)]prop2(v0,w0,t),t25,[t:prop1(v0,w0)]t28(t)):prop3(v0,w0)
-t30:=somei(rat,[y:rat]prop3(v0,y),w0,t29):some"rt"([y:rat]prop3(v0,y))
-t31:=somei(rat,[x:rat]some"rt"([y:rat]prop3(x,y)),v0,t30):prop4
-m@t32:=orapp(more"n"(u,1),is"n"(u,1),prop4,satz24(u),[t:more"n"(u,1)]t31(t),[t:is"n"(u,1)]t16(t)):prop4
-uy@t34:=someapp(nat,[x:nat]min"n"([y:nat]urt(pl"rt"(x0,ts(rtofn(y),a0))),x),satz27([y:nat]urt(pl"rt"(x0,ts(rtofn(y),a0))),t7),prop4,[x:nat][t:min"n"([y:nat]urt(pl"rt"(x0,ts(rtofn(y),a0))),x)]t32(x,t)):prop4
-lx@t35:=cutapp1b(prop4,[y:rat][t:urt(ksi,y)]t34(y,t)):prop4
--3132
-satz132:=cutapp1a(prop4".3132",[x:rat][t:lrt(ksi,x)]t35".3132"(x,t)):some"rt"([x:rat]some"rt"([y:rat]and(and(lrt(ksi,x),urt(ksi,y)),[t:and(lrt(ksi,x),urt(ksi,y))]is"rt"(mn(y,x,cutapp2b(x,ande1(lrt(ksi,x),urt(ksi,y),t),y,ande2(lrt(ksi,x),urt(ksi,y),t))),a0))))
-ksi@[p:'prop'][a0:rat][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:urt(ksi,y)][v:is"rt"(mn(y,x,cutapp2b(x,t,y,u)),a0)]p]
-+*3132
-p1@[x0:rat][s:some"rt"([y:rat]prop3(a0,x0,y))][y0:rat][p3:prop3(a0,x0,y0)]
-t36:=ande1(prop1(a0,x0,y0),[t:prop1(a0,x0,y0)]prop2(a0,x0,y0,t),p3):prop1(a0,x0,y0)
-t37:=ande2"l.r"(prop1(a0,x0,y0),[t:prop1(a0,x0,y0)]prop2(a0,x0,y0,t),p3):prop2(a0,x0,y0,t36)
-t38:=ande1(lrt(ksi,x0),urt(ksi,y0),t36):lrt(ksi,x0)
-t39:=ande2(lrt(ksi,x0),urt(ksi,y0),t36):urt(ksi,y0)
-t40:=satz101g(y0,x0,mn(y0,x0,cutapp2b(x0,t38,y0,t39)),t1(a0,x0,y0,t36),satz101c(y0,x0,cutapp2b(x0,t38,y0,t39))):is"rt"(mn(y0,x0,cutapp2b(x0,t38,y0,t39)),mn(y0,x0,t1(a0,x0,y0,t36)))
-t41:=tris(rat,mn(y0,x0,cutapp2b(x0,t38,y0,t39)),mn(y0,x0,t1(a0,x0,y0,t36)),a0,t40,t37):is"rt"(mn(y0,x0,cutapp2b(x0,t38,y0,t39)),a0)
-t42:=<t41><t39><y0><t38><x0>p1:p
-s@t43:=someapp(rat,[y:rat]prop3(a0,x0,y),s,p,[y:rat][t:prop3(a0,x0,y)]t42(y,t)):p
--3132
-p1@satz132app:=someapp(rat,[x:rat]some"rt"([y:rat]prop3".3132"(a0,x,y)),satz132(a0),p,[x:rat][t:some"rt"([y:rat]prop3".3132"(a0,x,y))]t43".3132"(x,t)):p
-+3133
-eta@[y0:rat][ly:lrt(eta,y0)][x0:rat][lx:lrt(ksi,x0)][u0:rat][uu:urt(ksi,u0)][i:is"rt"(mn(u0,x0,cutapp2b(x0,lx,u0,uu)),y0)]
-t1:=tris(rat,u0,pl"rt"(x0,mn(u0,x0,cutapp2b(x0,lx,u0,uu))),pl"rt"(x0,y0),satz101d(u0,x0,cutapp2b(x0,lx,u0,uu)),ispl2"rt"(mn(u0,x0,cutapp2b(x0,lx,u0,uu)),y0,x0,i)):is"rt"(u0,pl"rt"(x0,y0))
-t2:=lrtpl(ksi,eta,u0,x0,lx,y0,ly,t1):lrt(pl(ksi,eta),u0)
-t3:=andi(lrt(pl(ksi,eta),u0),urt(ksi,u0),t2,uu):and(lrt(pl(ksi,eta),u0),urt(ksi,u0))
-t4:=somei(rat,[x:rat]and(lrt(pl(ksi,eta),x),urt(ksi,x)),u0,t3):more(pl(ksi,eta),ksi)
-ly@t5:=satz132app(ksi,more(pl(ksi,eta),ksi),y0,[x:rat][t:lrt(ksi,x)][y:rat][u:urt(ksi,y)][v:is"rt"(mn(y,x,cutapp2b(x,t,y,u)),y0)]t4(x,t,y,u,v)):more(pl(ksi,eta),ksi)
--3133
-eta@satz133:=cutapp1a(eta,more(pl(ksi,eta),ksi),[x:rat][t:lrt(eta,x)]t5".3133"(x,t)):more(pl(ksi,eta),ksi)
-satz133a:=satz121(pl(ksi,eta),ksi,satz133):less(ksi,pl(ksi,eta))
-zeta@[m:more(ksi,eta)]
-+3134
-[y0:rat][ly:lrt(ksi,y0)][uy:urt(eta,y0)][x0:rat][lx:lrt(ksi,x0)][l:less"rt"(y0,x0)]
-t1:=satz119a(eta,y0,uy,x0,l):urt(eta,x0)
-t2:=satz83(y0,x0,l):more"rt"(x0,y0)
-[u0:rat][lu:lrt(zeta,u0)][z0:rat][uz:urt(zeta,z0)][i:is"rt"(mn(z0,u0,cutapp2b(zeta,u0,lu,z0,uz)),mn(x0,y0,t2))]
-t3:=tris(rat,z0,pl"rt"(mn(z0,u0,cutapp2b(zeta,u0,lu,z0,uz)),u0),pl"rt"(mn(x0,y0,t2),u0),satz101f(z0,u0,cutapp2b(zeta,u0,lu,z0,uz)),ispl1"rt"(mn(z0,u0,cutapp2b(zeta,u0,lu,z0,uz)),mn(x0,y0,t2),u0,i)):is"rt"(z0,pl"rt"(mn(x0,y0,t2),u0))
-t4:=tr3is(rat,pl"rt"(y0,z0),pl"rt"(y0,pl"rt"(mn(x0,y0,t2),u0)),pl"rt"(pl"rt"(y0,mn(x0,y0,t2)),u0),pl"rt"(x0,u0),ispl2"rt"(z0,pl"rt"(mn(x0,y0,t2),u0),y0,t3),asspl2"rt"(y0,mn(x0,y0,t2),u0),ispl1"rt"(pl"rt"(y0,mn(x0,y0,t2)),x0,u0,satz101c(x0,y0,t2))):is"rt"(pl"rt"(y0,z0),pl"rt"(x0,u0))
-t5:=lrtpl(ksi,zeta,pl"rt"(y0,z0),x0,lx,u0,lu,t4):lrt(pl(ksi,zeta),pl"rt"(y0,z0))
-t6:=urtpl(eta,zeta,pl"rt"(y0,z0),y0,uy,z0,uz,refis(rat,pl"rt"(y0,z0))):urt(pl(eta,zeta),pl"rt"(y0,z0))
-t7:=andi(lrt(pl(ksi,zeta),pl"rt"(y0,z0)),urt(pl(eta,zeta),pl"rt"(y0,z0)),t5,t6):and(lrt(pl(ksi,zeta),pl"rt"(y0,z0)),urt(pl(eta,zeta),pl"rt"(y0,z0)))
-t8:=somei(rat,[x:rat]and(lrt(pl(ksi,zeta),x),urt(pl(eta,zeta),x)),pl"rt"(y0,z0),t7):more(pl(ksi,zeta),pl(eta,zeta))
-l@t9:=satz132app(zeta,more(pl(ksi,zeta),pl(eta,zeta)),mn(x0,y0,t2),[x:rat][t:lrt(zeta,x)][y:rat][u:urt(zeta,y)][v:is"rt"(mn(y,x,cutapp2b(zeta,x,t,y,u)),mn(x0,y0,t2))]t8(x,t,y,u,v)):more(pl(ksi,zeta),pl(eta,zeta))
-uy@t10:=cutapp3(ksi,y0,ly,more(pl(ksi,zeta),pl(eta,zeta)),[x:rat][t:lrt(ksi,x)][u:less"rt"(y0,x)]t9(x,t,u)):more(pl(ksi,zeta),pl(eta,zeta))
--3134
-satz134:=moreapp(ksi,eta,m,more(pl(ksi,zeta),pl(eta,zeta)),[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]t10".3134"(x,t,u)):more(pl(ksi,zeta),pl(eta,zeta))
-zeta@[m:more(ksi,eta)]
-satz135a:=satz134(m):more(pl(ksi,zeta),pl(eta,zeta))
-zeta@[i:is(ksi,eta)]
-satz135b:=ispl1(ksi,eta,zeta,i):is(pl(ksi,zeta),pl(eta,zeta))
-zeta@[l:less(ksi,eta)]
-satz135c:=satz121(pl(eta,zeta),pl(ksi,zeta),satz134(eta,ksi,zeta,satz122(ksi,eta,l))):less(pl(ksi,zeta),pl(eta,zeta))
-m@satz135d:=ismore12(pl(ksi,zeta),pl(zeta,ksi),pl(eta,zeta),pl(zeta,eta),compl(ksi,zeta),compl(eta,zeta),satz135a):more(pl(zeta,ksi),pl(zeta,eta))
-i@satz135e:=ispl2(ksi,eta,zeta,i):is(pl(zeta,ksi),pl(zeta,eta))
-l@satz135f:=isless12(pl(ksi,zeta),pl(zeta,ksi),pl(eta,zeta),pl(zeta,eta),compl(ksi,zeta),compl(eta,zeta),satz135c):less(pl(zeta,ksi),pl(zeta,eta))
-upsilon@[i:is(ksi,eta)][m:more(zeta,upsilon)]
-satz135g:=ismore2(pl(ksi,upsilon),pl(eta,upsilon),pl(ksi,zeta),ispl1(ksi,eta,upsilon,i),satz135d(zeta,upsilon,ksi,m)):more(pl(ksi,zeta),pl(eta,upsilon))
-satz135h:=ismore12(pl(ksi,zeta),pl(zeta,ksi),pl(eta,upsilon),pl(upsilon,eta),compl(ksi,zeta),compl(eta,upsilon),satz135g):more(pl(zeta,ksi),pl(upsilon,eta))
-i@[l:less(zeta,upsilon)]
-satz135j:=isless2(pl(ksi,upsilon),pl(eta,upsilon),pl(ksi,zeta),ispl1(ksi,eta,upsilon,i),satz135f(zeta,upsilon,ksi,l)):less(pl(ksi,zeta),pl(eta,upsilon))
-satz135k:=isless12(pl(ksi,zeta),pl(zeta,ksi),pl(eta,upsilon),pl(upsilon,eta),compl(ksi,zeta),compl(eta,upsilon),satz135j):less(pl(zeta,ksi),pl(upsilon,eta))
-+3136
-zeta@t1:=satz123a(ksi,eta):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-t2:=satz123b(pl(ksi,zeta),pl(eta,zeta)):ec3(is(pl(ksi,zeta),pl(eta,zeta)),more(pl(ksi,zeta),pl(eta,zeta)),less(pl(ksi,zeta),pl(eta,zeta)))
--3136
-zeta@[m:more(pl(ksi,zeta),pl(eta,zeta))]
-satz136a:=th11"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(pl(ksi,zeta),pl(eta,zeta)),more(pl(ksi,zeta),pl(eta,zeta)),less(pl(ksi,zeta),pl(eta,zeta)),t1".3136",t2".3136",[u:is(ksi,eta)]satz135b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz135a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz135c(ksi,eta,zeta,u),m):more(ksi,eta)
-zeta@[i:is(pl(ksi,zeta),pl(eta,zeta))]
-satz136b:=th10"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(pl(ksi,zeta),pl(eta,zeta)),more(pl(ksi,zeta),pl(eta,zeta)),less(pl(ksi,zeta),pl(eta,zeta)),t1".3136",t2".3136",[u:is(ksi,eta)]satz135b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz135a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz135c(ksi,eta,zeta,u),i):is(ksi,eta)
-zeta@[l:less(pl(ksi,zeta),pl(eta,zeta))]
-satz136c:=th12"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(pl(ksi,zeta),pl(eta,zeta)),more(pl(ksi,zeta),pl(eta,zeta)),less(pl(ksi,zeta),pl(eta,zeta)),t1".3136",t2".3136",[u:is(ksi,eta)]satz135b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz135a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz135c(ksi,eta,zeta,u),l):less(ksi,eta)
-zeta@[m:more(pl(zeta,ksi),pl(zeta,eta))]
-satz136d:=satz136a(ismore12(pl(zeta,ksi),pl(ksi,zeta),pl(zeta,eta),pl(eta,zeta),compl(zeta,ksi),compl(zeta,eta),m)):more(ksi,eta)
-zeta@[i:is(pl(zeta,ksi),pl(zeta,eta))]
-satz136e:=satz136b(tr3is(cut,pl(ksi,zeta),pl(zeta,ksi),pl(zeta,eta),pl(eta,zeta),compl(ksi,zeta),i,compl(zeta,eta))):is(ksi,eta)
-zeta@[l:less(pl(zeta,ksi),pl(zeta,eta))]
-satz136f:=satz136c(isless12(pl(zeta,ksi),pl(ksi,zeta),pl(zeta,eta),pl(eta,zeta),compl(zeta,ksi),compl(zeta,eta),l)):less(ksi,eta)
-upsilon@[m:more(ksi,eta)][n:more(zeta,upsilon)]
-+3137
-t1:=satz134(ksi,eta,zeta,m):more(pl(ksi,zeta),pl(eta,zeta))
-t2:=ismore12(pl(zeta,eta),pl(eta,zeta),pl(upsilon,eta),pl(eta,upsilon),compl(zeta,eta),compl(upsilon,eta),satz134(zeta,upsilon,eta,n)):more(pl(eta,zeta),pl(eta,upsilon))
--3137
-satz137:=trmore(pl(ksi,zeta),pl(eta,zeta),pl(eta,upsilon),t1".3137",t2".3137"):more(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[l:less(ksi,eta)][k:less(zeta,upsilon)]
-satz137a:=satz121(pl(eta,upsilon),pl(ksi,zeta),satz137(eta,ksi,upsilon,zeta,satz122(ksi,eta,l),satz122(zeta,upsilon,k))):less(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[m:moreis(ksi,eta)][n:more(zeta,upsilon)]
-satz138a:=orapp(more(ksi,eta),is(ksi,eta),more(pl(ksi,zeta),pl(eta,upsilon)),m,[t:more(ksi,eta)]satz137(t,n),[t:is(ksi,eta)]satz135g(t,n)):more(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[m:more(ksi,eta)][n:moreis(zeta,upsilon)]
-satz138b:=orapp(more(zeta,upsilon),is(zeta,upsilon),more(pl(ksi,zeta),pl(eta,upsilon)),n,[t:more(zeta,upsilon)]satz137(m,t),[t:is(zeta,upsilon)]satz135h(zeta,upsilon,ksi,eta,t,m)):more(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[l:lessis(ksi,eta)][k:less(zeta,upsilon)]
-satz138c:=satz121(pl(eta,upsilon),pl(ksi,zeta),satz138a(eta,ksi,upsilon,zeta,satz125(ksi,eta,l),satz122(zeta,upsilon,k))):less(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[l:less(ksi,eta)][k:lessis(zeta,upsilon)]
-satz138d:=satz121(pl(eta,upsilon),pl(ksi,zeta),satz138b(eta,ksi,upsilon,zeta,satz122(ksi,eta,l),satz125(zeta,upsilon,k))):less(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[m:moreis(ksi,eta)][n:moreis(zeta,upsilon)]
-+3139
-[i:is(ksi,eta)][j:is(zeta,upsilon)]
-t1:=moreisi2(pl(ksi,zeta),pl(eta,upsilon),ispl12(ksi,eta,zeta,upsilon,i,j)):moreis(pl(ksi,zeta),pl(eta,upsilon))
-i@[o:more(zeta,upsilon)]
-t2:=moreisi1(pl(ksi,zeta),pl(eta,upsilon),satz138a(m,o)):moreis(pl(ksi,zeta),pl(eta,upsilon))
-i@t3:=orapp(more(zeta,upsilon),is(zeta,upsilon),moreis(pl(ksi,zeta),pl(eta,upsilon)),n,[t:more(zeta,upsilon)]t2(t),[t:is(zeta,upsilon)]t1(t)):moreis(pl(ksi,zeta),pl(eta,upsilon))
-n@[o:more(ksi,eta)]
-t4:=moreisi1(pl(ksi,zeta),pl(eta,upsilon),satz138b(o,n)):moreis(pl(ksi,zeta),pl(eta,upsilon))
--3139
-satz139:=orapp(more(ksi,eta),is(ksi,eta),moreis(pl(ksi,zeta),pl(eta,upsilon)),m,[t:more(ksi,eta)]t4".3139"(t),[t:is(ksi,eta)]t3".3139"(t)):moreis(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[l:lessis(ksi,eta)][k:lessis(zeta,upsilon)]
-satz139a:=satz124(pl(eta,upsilon),pl(ksi,zeta),satz139(eta,ksi,upsilon,zeta,satz125(ksi,eta,l),satz125(zeta,upsilon,k))):lessis(pl(ksi,zeta),pl(eta,upsilon))
-eta@[l:lessis(ksi,eta)]
-+3140
-[phi:cut][i:is(pl(eta,phi),ksi)]
-t1:=ismore1(pl(eta,phi),ksi,eta,i,satz133(eta,phi)):more(ksi,eta)
-phi@t2:=th3"l.imp"(is(pl(eta,phi),ksi),more(ksi,eta),satz123d(ksi,eta,l),[t:is(pl(eta,phi),ksi)]t1(t)):nis(pl(eta,phi),ksi)
--3140
-vorbemerkung140:=th5"l.some"(cut,[a:cut]is(pl(eta,a),ksi),[a:cut]t2".3140"(a)):not(some([a:cut]is(pl(eta,a),ksi)))
-eta@[phi:cut][psi:cut]
-+*3140
-psi@[m:more(phi,psi)]
-t3:=satz135d(phi,psi,eta,m):more(pl(eta,phi),pl(eta,psi))
-t4:=ec3e21(is(pl(eta,phi),pl(eta,psi)),more(pl(eta,phi),pl(eta,psi)),less(pl(eta,phi),pl(eta,psi)),satz123b(pl(eta,phi),pl(eta,psi)),t3):nis(pl(eta,phi),pl(eta,psi))
-psi@[l:less(phi,psi)]
-t5:=satz135f(phi,psi,eta,l):less(pl(eta,phi),pl(eta,psi))
-t6:=ec3e31(is(pl(eta,phi),pl(eta,psi)),more(pl(eta,phi),pl(eta,psi)),less(pl(eta,phi),pl(eta,psi)),satz123b(pl(eta,phi),pl(eta,psi)),t5):nis(pl(eta,phi),pl(eta,psi))
-psi@[n:nis(phi,psi)]
-t7:=th1"l.or3"(is(phi,psi),more(phi,psi),less(phi,psi),satz123a(phi,psi),n):or(more(phi,psi),less(phi,psi))
-t8:=orapp(more(phi,psi),less(phi,psi),nis(pl(eta,phi),pl(eta,psi)),t7,[t:more(phi,psi)]t4(t),[t:less(phi,psi)]t6(t)):nis(pl(eta,phi),pl(eta,psi))
--3140
-psi@[i:is(pl(eta,phi),ksi)][j:is(pl(eta,psi),ksi)]
-satz140b:=th7"l.imp"(is(phi,psi),nis(pl(eta,phi),pl(eta,psi)),weli(is(pl(eta,phi),pl(eta,psi)),tris2(cut,pl(eta,phi),pl(eta,psi),ksi,i,j)),[t:nis(phi,psi)]t8".3140"(t)):is(phi,psi)
-eta@[z0:rat][x0:rat][y0:rat]
-diffprop1:=and(more"rt"(x0,y0),[t:more"rt"(x0,y0)]is"rt"(z0,mn(x0,y0,t))):'prop'
-diffprop2:=and3(lrt(ksi,x0),urt(eta,y0),diffprop1(z0,x0,y0)):'prop'
-z0@diffprop:=some"rt"([x:rat]some"rt"([y:rat]diffprop2(z0,x,y))):'prop'
-eta@diff:=setof(rat,[z:rat]diffprop(z)):set(rat)
-x0@[lx:lrt(ksi,x0)][y0:rat][uy:urt(eta,y0)][m:more"rt"(x0,y0)][i:is"rt"(z0,mn(x0,y0,m))]
-+*iii3
-i@[m1:more"rt"(x0,y0)]
-t11a:=tris(rat,z0,mn(x0,y0,m),mn(x0,y0,m1),i,satz101g(x0,y0,mn(x0,y0,m),m1,satz101c(x0,y0,m))):is"rt"(z0,mn(x0,y0,m1))
-i@t12:=andi(more"rt"(x0,y0),[t:more"rt"(x0,y0)]is"rt"(z0,mn(x0,y0,t)),m,[t:more"rt"(x0,y0)]t11a(t)):diffprop1(z0,x0,y0)
-t13:=and3i(lrt(ksi,x0),urt(eta,y0),diffprop1(z0,x0,y0),lx,uy,t12):diffprop2(z0,x0,y0)
-t14:=somei(rat,[y:rat]diffprop2(z0,x0,y),y0,t13):some"rt"([y:rat]diffprop2(z0,x0,y))
-t15:=somei(rat,[x:rat]some"rt"([y:rat]diffprop2(z0,x,y)),x0,t14):diffprop(z0)
--iii3
-i@diff1:=estii(rat,[z:rat]diffprop(z),z0,t15".iii3"):in(z0,diff)
-z0@[i:in(z0,diff)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:urt(eta,y)][v:more"rt"(x,y)][w:is"rt"(z0,mn(x,y,v))]p]
-+*iii3
-p1@t16:=estie(rat,[z:rat]diffprop(z),z0,i):diffprop(z0)
--iii3
-p1@[x0:rat][px:some"rt"([y:rat]diffprop2(z0,x0,y))][y0:rat][py:diffprop2(z0,x0,y0)]
-+*iii3
-py@t17:=and3e1(lrt(ksi,x0),urt(eta,y0),diffprop1(z0,x0,y0),py):lrt(ksi,x0)
-t18:=and3e2(lrt(ksi,x0),urt(eta,y0),diffprop1(z0,x0,y0),py):urt(eta,y0)
-t19:=and3e3(lrt(ksi,x0),urt(eta,y0),diffprop1(z0,x0,y0),py):diffprop1(z0,x0,y0)
-t20:=ande1(more"rt"(x0,y0),[t:more"rt"(x0,y0)]is"rt"(z0,mn(x0,y0,t)),t19):more"rt"(x0,y0)
-t21:=ande2"l.r"(more"rt"(x0,y0),[t:more"rt"(x0,y0)]is"rt"(z0,mn(x0,y0,t)),t19):is"rt"(z0,mn(x0,y0,t20))
-t22:=<t21><t20><t18><y0><t17><x0>p1:p
-px@t23:=someapp(rat,[y:rat]diffprop2(z0,x0,y),px,p,[y:rat][t:diffprop2(z0,x0,y)]t22(y,t)):p
--iii3
-p1@diffapp:=someapp(rat,[x:rat]some"rt"([y:rat]diffprop2(z0,x,y)),t16".iii3",p,[x:rat][t:some"rt"([y:rat]diffprop2(z0,x,y))]t23".iii3"(x,t)):p
-eta@[m:more(ksi,eta)]
-+*3140
-m"rp"@[y0:rat][ly:lrt(ksi,y0)][uy:urt(eta,y0)][x0:rat][lx:lrt(ksi,x0)][l:less"rt"(y0,x0)]
-t9:=t2"rp.3134"(eta,m,y0,ly,uy,x0,lx,l):more"rt"(x0,y0)
-t10:=diff1(mn(x0,y0,t9),x0,lx,y0,uy,t9,refis(rat,mn(x0,y0,t9))):in(mn(x0,y0,t9),diff)
-m"rp"@[x1:rat][ux:urt(ksi,x1)][z0:rat][i:in(z0,diff)][x0:rat][lx:lrt(ksi,x0)][y0:rat][uy:urt(eta,y0)][n:more"rt"(x0,y0)][j:is"rt"(z0,mn(x0,y0,n))]
-t11:=isless12"rt"(mn(x0,y0,n),z0,pl"rt"(mn(x0,y0,n),y0),x0,symis(rat,z0,mn(x0,y0,n),j),satz101e(x0,y0,n),satz94a(mn(x0,y0,n),y0)):less"rt"(z0,x0)
-t12:=trless"rt"(z0,x0,x1,t11,cutapp2a(ksi,x0,lx,x1,ux)):less"rt"(z0,x1)
-t13:=ec3e31(is"rt"(z0,x1),more"rt"(z0,x1),less"rt"(z0,x1),satz81b(z0,x1),t12):nis"rt"(z0,x1)
-i@t14:=diffapp(z0,i,nis"rt"(z0,x1),[x:rat][t:lrt(ksi,x)][y:rat][u:urt(eta,y)][v:more"rt"(x,y)][w:is"rt"(z0,mn(x,y,v))]t13(x,t,y,u,v,w)):nis"rt"(z0,x1)
-ux@t15:=th3"l.imp"(in(x1,diff),nis"rt"(x1,x1),weli(is"rt"(x1,x1),refis(rat,x1)),[t:in(x1,diff)]t14(x1,t)):not(in(x1,diff))
-m"rp"@[z0:rat][i:in(z0,diff)][u0:rat][l:less"rt"(u0,z0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][uy:urt(eta,y0)][n:more"rt"(x0,y0)][j:is"rt"(z0,mn(x0,y0,n))]
-t16:=tris(rat,pl"rt"(z0,y0),pl"rt"(mn(x0,y0,n),y0),x0,ispl1"rt"(z0,mn(x0,y0,n),y0,j),satz101e(x0,y0,n)):is"rt"(pl"rt"(z0,y0),x0)
-x2:=pl"rt"(u0,y0):rat
-t17:=isless2"rt"(pl"rt"(z0,y0),x0,x2,t16,satz96c(u0,z0,y0,l)):less"rt"(x2,x0)
-t18:=satz120(ksi,x0,lx,x2,t17):lrt(ksi,x2)
-t19:=ismore1"rt"(pl"rt"(y0,u0),pl"rt"(u0,y0),y0,compl"rt"(y0,u0),satz94(y0,u0)):more"rt"(x2,y0)
-t20:=satz101g(x2,y0,u0,t19,compl"rt"(y0,u0)):is"rt"(u0,mn(x2,y0,t19))
-t21:=diff1(u0,x2,t18,y0,uy,t19,t20):in(u0,diff)
-l@t22:=diffapp(z0,i,in(u0,diff),[x:rat][t:lrt(ksi,x)][y:rat][u:urt(eta,y)][v:more"rt"(x,y)][w:is"rt"(z0,mn(x,y,v))]t21(x,t,y,u,v,w)):in(u0,diff)
-m"rp"@[z0:rat][i:in(z0,diff)][x0:rat][lx:lrt(ksi,x0)][y0:rat][uy:urt(eta,y0)][n:more"rt"(x0,y0)][j:is"rt"(z0,mn(x0,y0,n))][x3:rat][lx3:lrt(ksi,x3)][l:less"rt"(x0,x3)]
-t23:=satz83(x0,x3,l):more"rt"(x3,x0)
-t24:=trmore"rt"(x3,x0,y0,t23,n):more"rt"(x3,y0)
-t25:=ismore12"rt"(x3,pl"rt"(mn(x3,y0,t24),y0),x0,pl"rt"(mn(x0,y0,n),y0),satz101f(x3,y0,t24),satz101f(x0,y0,n),t23):more"rt"(pl"rt"(mn(x3,y0,t24),y0),pl"rt"(mn(x0,y0,n),y0))
-t26:=satz97a(mn(x3,y0,t24),mn(x0,y0,n),y0,t25):more"rt"(mn(x3,y0,t24),mn(x0,y0,n))
-t27:=ismore2"rt"(mn(x0,y0,n),z0,mn(x3,y0,t24),symis(rat,z0,mn(x0,y0,n),j),t26):more"rt"(mn(x3,y0,t24),z0)
-t28:=diff1(mn(x3,y0,t24),x3,lx3,y0,uy,t24,refis(rat,mn(x3,y0,t24))):in(mn(x3,y0,t24),diff)
-t29:=andi(in(mn(x3,y0,t24),diff),more"rt"(mn(x3,y0,t24),z0),t28,t27):and(in(mn(x3,y0,t24),diff),more"rt"(mn(x3,y0,t24),z0))
-t30:=somei(rat,[x:rat]and(in(x,diff),more"rt"(x,z0)),mn(x3,y0,t24),t29):some"rt"([x:rat]and(in(x,diff),more"rt"(x,z0)))
-j@t31:=cutapp3(ksi,x0,lx,some"rt"([x:rat]and(in(x,diff),more"rt"(x,z0))),[y:rat][t:lrt(ksi,y)][u:less"rt"(x0,y)]t30(y,t,u)):some"rt"([x:rat]and(in(x,diff),more"rt"(x,z0)))
-i@t32:=diffapp(z0,i,some"rt"([x:rat]and(in(x,diff),more"rt"(x,z0))),[x:rat][t:lrt(ksi,x)][y:rat][u:urt(eta,y)][v:more"rt"(x,y)][w:is"rt"(z0,mn(x,y,v))]t31(x,t,y,u,v,w)):some"rt"([x:rat]and(in(x,diff),more"rt"(x,z0)))
-m"rp"@[y0:rat][ly:lrt(ksi,y0)][uy:urt(eta,y0)][x0:rat][lx:lrt(ksi,x0)][l:less"rt"(y0,x0)][x1:rat][ux1:urt(ksi,x1)]
-t33:=cut2(diff,mn(x0,y0,t9(y0,ly,uy,x0,lx,l)),t10(y0,ly,uy,x0,lx,l),x1,t15(x1,ux1),[x:rat][t:in(x,diff)][y:rat][u:less"rt"(y,x)]t22(x,t,y,u),[x:rat][t:in(x,diff)]t32(x,t)):cutprop(diff)
-l@t34:=cutapp1b(ksi,cutprop(diff),[x:rat][t:urt(ksi,x)]t33(x,t)):cutprop(diff)
-uy@t35:=cutapp3(ksi,y0,ly,cutprop(diff),[x:rat][t:lrt(ksi,x)][u:less"rt"(y0,x)]t34(x,t,u)):cutprop(diff)
--3140
-m@satz140h:=moreapp(ksi,eta,m,cutprop(diff),[x:rat][u:lrt(ksi,x)][v:urt(eta,x)]t35".3140"(x,u,v)):cutprop(diff)
-+*3140
-m"rp"@chi:=cutof(diff,satz140h):cut
-[z0:rat][lz:lrt(pl(eta,chi),z0)][y1:rat][ly:lrt(eta,y1)][u0:rat][lu:lrt(chi,u0)][i:is"rt"(z0,pl"rt"(y1,u0))][x0:rat][lx:lrt(ksi,x0)][y0:rat][uy:urt(eta,y0)][o:more"rt"(x0,y0)][j:is"rt"(u0,mn(x0,y0,o))]
-t36:=cutapp2b(eta,y1,ly,y0,uy):more"rt"(y0,y1)
-t37:=tr3is(rat,pl"rt"(pl"rt"(mn(x0,y0,o),y1),mn(y0,y1,t36)),pl"rt"(mn(x0,y0,o),pl"rt"(y1,mn(y0,y1,t36))),pl"rt"(mn(x0,y0,o),y0),x0,asspl1"rt"(mn(x0,y0,o),y1,mn(y0,y1,t36)),ispl2"rt"(pl"rt"(y1,mn(y0,y1,t36)),y0,mn(x0,y0,o),satz101c(y0,y1,t36)),satz101e(x0,y0,o)):is"rt"(pl"rt"(pl"rt"(mn(x0,y0,o),y1),mn(y0,y1,t36)),x0)
-t38:=isless2"rt"(pl"rt"(pl"rt"(mn(x0,y0,o),y1),mn(y0,y1,t36)),x0,pl"rt"(mn(x0,y0,o),y1),t37,satz94a(pl"rt"(mn(x0,y0,o),y1),mn(y0,y1,t36))):less"rt"(pl"rt"(mn(x0,y0,o),y1),x0)
-t39:=tr3is(rat,z0,pl"rt"(y1,u0),pl"rt"(u0,y1),pl"rt"(mn(x0,y0,o),y1),i,compl"rt"(y1,u0),ispl1"rt"(u0,mn(x0,y0,o),y1,j)):is"rt"(z0,pl"rt"(mn(x0,y0,o),y1))
-t40:=isless1"rt"(pl"rt"(mn(x0,y0,o),y1),z0,x0,symis(rat,z0,pl"rt"(mn(x0,y0,o),y1),t39),t38):less"rt"(z0,x0)
-t41:=satz120(ksi,x0,lx,z0,t40):lrt(ksi,z0)
-i@t42:=diffapp(u0,ini(diff,satz140h,u0,lu),lrt(ksi,z0),[x:rat][t:lrt(ksi,x)][y:rat][u:urt(eta,y)][v:more"rt"(x,y)][w:is"rt"(u0,mn(x,y,v))]t41(x,t,y,u,v,w)):lrt(ksi,z0)
-lz@a:=plapp(eta,chi,z0,lz,lrt(ksi,z0),[x:rat][t:lrt(eta,x)][y:rat][u:lrt(chi,y)][v:is"rt"(z0,pl"rt"(x,y))]t42(x,t,y,u,v)):lrt(ksi,z0)
-m"rp"@[y0:rat][ly:lrt(ksi,y0)][uy:urt(eta,y0)][x0:rat][lx:lrt(ksi,x0)][l:less"rt"(y0,x0)]
-t43:=satz83(y0,x0,l):more"rt"(x0,y0)
-[y1:rat][ly1:lrt(eta,y1)][y2:rat][uy2:urt(eta,y2)]
-t44:=cutapp2b(eta,y1,ly1,y2,uy2):more"rt"(y2,y1)
-[i:is"rt"(mn(y2,y1,t44),mn(x0,y0,t43))]
-t45:=cutapp2b(eta,y1,ly1,y0,uy):more"rt"(y0,y1)
-t46:=tris(rat,y2,pl"rt"(mn(y2,y1,t44),y1),pl"rt"(mn(x0,y0,t43),y1),satz101f(y2,y1,t44),ispl1"rt"(mn(y2,y1,t44),mn(x0,y0,t43),y1,i)):is"rt"(y2,pl"rt"(mn(x0,y0,t43),y1))
-t47:=tr4is(rat,pl"rt"(y2,mn(y0,y1,t45)),pl"rt"(pl"rt"(mn(x0,y0,t43),y1),mn(y0,y1,t45)),pl"rt"(mn(x0,y0,t43),pl"rt"(y1,mn(y0,y1,t45))),pl"rt"(mn(x0,y0,t43),y0),x0,ispl1"rt"(y2,pl"rt"(mn(x0,y0,t43),y1),mn(y0,y1,t45),t46),asspl1"rt"(mn(x0,y0,t43),y1,mn(y0,y1,t45)),ispl2"rt"(pl"rt"(y1,mn(y0,y1,t45)),y0,mn(x0,y0,t43),satz101c(y0,y1,t45)),satz101e(x0,y0,t43)):is"rt"(pl"rt"(y2,mn(y0,y1,t45)),x0)
-t48:=ismore1"rt"(pl"rt"(y2,mn(y0,y1,t45)),x0,y2,t47,satz94(y2,mn(y0,y1,t45))):more"rt"(x0,y2)
-t49:=satz101g(x0,y2,mn(y0,y1,t45),t48,t47):is"rt"(mn(y0,y1,t45),mn(x0,y2,t48))
-t50:=tris(rat,y0,pl"rt"(mn(y0,y1,t45),y1),pl"rt"(mn(x0,y2,t48),y1),satz101f(y0,y1,t45),ispl1"rt"(mn(y0,y1,t45),mn(x0,y2,t48),y1,t49)):is"rt"(y0,pl"rt"(mn(x0,y2,t48),y1))
-t51:=ine(diff,satz140h,mn(x0,y2,t48),diff1(mn(x0,y2,t48),x0,lx,y2,uy2,t48,refis(rat,mn(x0,y2,t48)))):lrt(chi,mn(x0,y2,t48))
-t52:=lrtpl(eta,chi,y0,y1,ly1,mn(x0,y2,t48),t51,tris(rat,y0,pl"rt"(mn(x0,y2,t48),y1),pl"rt"(y1,mn(x0,y2,t48)),t50,compl"rt"(mn(x0,y2,t48),y1))):lrt(pl(eta,chi),y0)
-l@t53:=satz132app(eta,lrt(pl(eta,chi),y0),mn(x0,y0,t43),[x:rat][t:lrt(eta,x)][y:rat][u:urt(eta,y)][v:is"rt"(mn(y,x,cutapp2b(eta,x,t,y,u)),mn(x0,y0,t43))]t52(x,t,y,u,v)):lrt(pl(eta,chi),y0)
-uy@t54:=cutapp3(ksi,y0,ly,lrt(pl(eta,chi),y0),[x:rat][t:lrt(ksi,x)][u:less"rt"(y0,x)]t53(x,t,u)):lrt(pl(eta,chi),y0)
-ly@[ly0:lrt(eta,y0)][y1:rat][ly1:lrt(ksi,y1)][uy1:urt(eta,y1)]
-t55:=t54(y1,ly1,uy1):lrt(pl(eta,chi),y1)
-t56:=satz120(pl(eta,chi),y1,t55,y0,cutapp2a(eta,y0,ly0,y1,uy1)):lrt(pl(eta,chi),y0)
-ly0@t57:=moreapp(ksi,eta,m,lrt(pl(eta,chi),y0),[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]t56(x,t,u)):lrt(pl(eta,chi),y0)
-ly@b:=th1"l.imp"(lrt(eta,y0),lrt(pl(eta,chi),y0),[t:lrt(eta,y0)]t57(t),[t:urt(eta,y0)]t54(t)):lrt(pl(eta,chi),y0)
-m"rp"@t58:=isi1(pl(eta,chi),ksi,[x:rat][t:lrt(pl(eta,chi),x)]a(x,t),[x:rat][t:lrt(ksi,x)]b(x,t)):is(pl(eta,chi),ksi)
--3140
-m@satz140a:=somei(cut,[a:cut]is(pl(eta,a),ksi),chi".3140",t58".3140"):some([a:cut]is(pl(eta,a),ksi))
-+*3140
-eta@t59:=[c:cut][d:cut][t:is(pl(eta,c),ksi)][u:is(pl(eta,d),ksi)]satz140b(c,d,t,u):amone(cut,[c:cut]is(pl(eta,c),ksi))
--3140
-m@satz140:=onei(cut,[a:cut]is(pl(eta,a),ksi),t59".3140",satz140a):one([a:cut]is(pl(eta,a),ksi))
-mn:=ind(cut,[a:cut]is(pl(eta,a),ksi),satz140):cut
-satz140c:=oneax(cut,[a:cut]is(pl(eta,a),ksi),satz140):is(pl(eta,mn(ksi,eta,m)),ksi)
-satz140d:=symis(cut,pl(eta,mn(ksi,eta,m)),ksi,satz140c):is(ksi,pl(eta,mn(ksi,eta,m)))
-satz140e:=tris(cut,pl(mn(ksi,eta,m),eta),pl(eta,mn(ksi,eta,m)),ksi,compl(mn(ksi,eta,m),eta),satz140c):is(pl(mn(ksi,eta,m),eta),ksi)
-satz140f:=symis(cut,pl(mn(ksi,eta,m),eta),ksi,satz140e):is(ksi,pl(mn(ksi,eta,m),eta))
-eta@[phi:cut][m:more(ksi,eta)][i:is(pl(eta,phi),ksi)]
-satz140g:=satz140b(phi,mn(ksi,eta,m),i,satz140c(m)):is(phi,mn(ksi,eta,m))
-upsilon@[m:more(ksi,zeta)][n:more(eta,upsilon)][i:is(ksi,eta)][j:is(zeta,upsilon)]
-+*3140
-j"rp"@t60:=tr3is(cut,pl(upsilon,mn(ksi,zeta,m)),pl(zeta,mn(ksi,zeta,m)),ksi,eta,ispl1(upsilon,zeta,mn(ksi,zeta,m),symis(cut,zeta,upsilon,j)),satz140c(ksi,zeta,m),i):is(pl(upsilon,mn(ksi,zeta,m)),eta)
--3140
-j@ismn12:=satz140g(eta,upsilon,mn(ksi,zeta,m),n,t60".3140"):is(mn(ksi,zeta,m),mn(eta,upsilon,n))
-zeta@[m:more(ksi,zeta)][n:more(eta,zeta)][i:is(ksi,eta)]
-ismn1:=ismn12(zeta,m,n,i,refis(cut,zeta)):is(mn(ksi,zeta,m),mn(eta,zeta,n))
-zeta@[m:more(zeta,ksi)][n:more(zeta,eta)][i:is(ksi,eta)]
-ismn2:=ismn12(zeta,zeta,ksi,eta,m,n,refis(cut,zeta),i):is(mn(zeta,ksi,m),mn(zeta,eta,n))
-eta@[z0:rat][x0:rat][y0:rat]
-prodprop1:=and3(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,ts(x0,y0))):'prop'
-z0@prodprop:=some"rt"([x:rat]some"rt"([y:rat]prodprop1(z0,x,y))):'prop'
-eta@prod:=setof(rat,[z:rat]prodprop(z)):set(rat)
-x0@[lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,ts(x0,y0))]
-+iii4
-t1:=and3i(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,ts(x0,y0)),lx,ly,i):prodprop1(z0,x0,y0)
-t2:=somei(rat,[y:rat]prodprop1(z0,x0,y),y0,t1):some"rt"([y:rat]prodprop1(z0,x0,y))
-t3:=somei(rat,[x:rat]some"rt"([y:rat]prodprop1(z0,x,y)),x0,t2):prodprop(z0)
--iii4
-prod1:=estii(rat,[z:rat]prodprop(z),z0,t3".iii4"):in(z0,prod)
-z0@[i:in(z0,prod)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,ts(x,y))]p]
-+*iii4
-p1@t4:=estie(rat,[z:rat]prodprop(z),z0,i):prodprop(z0)
--iii4
-p1@[x0:rat][px:some"rt"([y:rat]prodprop1(z0,x0,y))][y0:rat][py:prodprop1(z0,x0,y0)]
-+*iii4
-py@t5:=and3e1(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,ts(x0,y0)),py):lrt(ksi,x0)
-t6:=and3e2(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,ts(x0,y0)),py):lrt(eta,y0)
-t7:=and3e3(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,ts(x0,y0)),py):is"rt"(z0,ts(x0,y0))
-t8:=<t7><t6><y0><t5><x0>p1:p
-px@t9:=someapp(rat,[y:rat]prodprop1(z0,x0,y),px,p,[y:rat][t:prodprop1(z0,x0,y)]t8(y,t)):p
--iii4
-p1@prodapp:=someapp(rat,[x:rat]some"rt"([y:rat]prodprop1(z0,x,y)),t4".iii4",p,[x:rat][t:some"rt"([y:rat]prodprop1(z0,x,y))]t9".iii4"(x,t)):p
-eta@[x1:rat][ux:urt(ksi,x1)][y1:rat][uy:urt(eta,y1)]
-+4141
-[z0:rat][i:in(z0,prod)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(z0,ts(x0,y0))]
-t1:=cutapp2a(ksi,x0,lx,x1,ux):less"rt"(x0,x1)
-t2:=cutapp2a(eta,y0,ly,y1,uy):less"rt"(y0,y1)
-t3:=isless1"rt"(ts(x0,y0),z0,ts(x1,y1),symis(rat,z0,ts(x0,y0),j),satz107a(x0,x1,y0,y1,t1,t2)):less"rt"(z0,ts(x1,y1))
-t4:=ec3e31(is"rt"(z0,ts(x1,y1)),more"rt"(z0,ts(x1,y1)),less"rt"(z0,ts(x1,y1)),satz81b(z0,ts(x1,y1)),t3):nis"rt"(z0,ts(x1,y1))
-i@t5:=prodapp(ksi,eta,z0,i,nis"rt"(z0,ts(x1,y1)),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,ts(x,y))]t4(x,t,y,u,v)):nis"rt"(z0,ts(x1,y1))
--4141
-satz141a:=th3"l.imp"(in(ts(x1,y1),prod),nis"rt"(ts(x1,y1),ts(x1,y1)),weli(is"rt"(ts(x1,y1),ts(x1,y1)),refis(rat,ts(x1,y1))),[t:in(ts(x1,y1),prod)]t5".4141"(ts(x1,y1),t)):not(in(ts(x1,y1),prod))
--rp
-@[x0:rat][y0:rat]
-+4141
-v0:=ts(ov(1rt,y0),x0):rat
-t6:=tr3is(rat,ts(y0,v0),ts(ts(y0,ov(1rt,y0)),x0),ts(1rt,x0),x0,assts2(y0,ov(1rt,y0),x0),ists1(ts(y0,ov(1rt,y0)),1rt,x0,satz110c(1rt,y0)),example1c(x0)):is(ts(y0,v0),x0)
--4141
-satz141b:=satz110g(x0,y0,v0".4141",t6".4141"):is(ts(ov(1rt,y0),x0),ov(x0,y0))
-satz141c:=symis(rat,ts(ov(1rt,y0),x0),ov(x0,y0),satz141b):is"rt"(ov(x0,y0),ts(ov(1rt,y0),x0))
-+*rp
-+*4141
-eta@[u0:rat][i:in(u0,prod)][z0:rat][l:less"rt"(z0,u0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(u0,ts(x0,y0))]
-t7:=isless2"rt"(u0,ts(x0,y0),z0,j,l):less"rt"(z0,ts(x0,y0))
-t8:=tr3is(rat,ts(ov(1rt,x0),ts(x0,y0)),ts(ts(ov(1rt,x0),x0),y0),ts(1rt,y0),y0,assts2(ov(1rt,x0),x0,y0),ists1(ts(ov(1rt,x0),x0),1rt,y0,satz110e(1rt,x0)),example1c(y0)):is"rt"(ts(ov(1rt,x0),ts(x0,y0)),y0)
-t9:=isless12"rt"(ts(ov(1rt,x0),z0),ov(z0,x0),ts(ov(1rt,x0),ts(x0,y0)),y0,satz141b(z0,x0),t8,satz105f(z0,ts(x0,y0),ov(1rt,x0),t7)):less"rt"(ov(z0,x0),y0)
-t10:=satz120(eta,y0,ly,ov(z0,x0),t9):lrt(eta,ov(z0,x0))
-t11:=prod1(z0,x0,lx,ov(z0,x0),t10,satz110d(z0,x0)):in(z0,prod)
-l@t12:=prodapp(u0,i,in(z0,prod),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(u0,ts(x,y))]t11(x,t,y,u,v)):in(z0,prod)
-eta@[z0:rat][i:in(z0,prod)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(z0,ts(x0,y0))][x1:rat][lx1:lrt(ksi,x1)][l:less"rt"(x0,x1)]
-t13:=prod1(ts(x1,y0),x1,lx1,y0,ly,refis(rat,ts(x1,y0))):in(ts(x1,y0),prod)
-t14:=satz105a(x1,x0,y0,satz83(x0,x1,l)):more"rt"(ts(x1,y0),ts(x0,y0))
-t15:=ismore2"rt"(ts(x0,y0),z0,ts(x1,y0),symis(rat,z0,ts(x0,y0),j),t14):more"rt"(ts(x1,y0),z0)
-t16:=andi(in(ts(x1,y0),prod),more"rt"(ts(x1,y0),z0),t13,t15):and(in(ts(x1,y0),prod),more"rt"(ts(x1,y0),z0))
-t17:=somei(rat,[y:rat]and(in(y,prod),more"rt"(y,z0)),ts(x1,y0),t16):some"rt"([y:rat]and(in(y,prod),more"rt"(y,z0)))
-j@t18:=cutapp3(ksi,x0,lx,some"rt"([y:rat]and(in(y,prod),more"rt"(y,z0))),[x:rat][t:lrt(ksi,x)][u:less"rt"(x0,x)]t17(x,t,u)):some"rt"([y:rat]and(in(y,prod),more"rt"(y,z0)))
-i@t19:=prodapp(z0,i,some"rt"([y:rat]and(in(y,prod),more"rt"(y,z0))),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,ts(x,y))]t18(x,t,y,u,v)):some"rt"([y:rat]and(in(y,prod),more"rt"(y,z0)))
-eta@[x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][x1:rat][ux:urt(ksi,x1)][y1:rat][uy:urt(eta,y1)]
-t20:=cut2(prod,ts(x0,y0),prod1(ts(x0,y0),x0,lx,y0,ly,refis(rat,ts(x0,y0))),ts(x1,y1),satz141a(x1,ux,y1,uy),[x:rat][t:in(x,prod)][y:rat][u:less"rt"(y,x)]t12(x,t,y,u),[x:rat][t:in(x,prod)]t19(x,t)):cutprop(prod)
-ux@t21:=cutapp1b(eta,cutprop(prod),[y:rat][t:urt(eta,y)]t20(y,t)):cutprop(prod)
-ly@t22:=cutapp1b(ksi,cutprop(prod),[x:rat][t:urt(ksi,x)]t21(x,t)):cutprop(prod)
-lx@t23:=cutapp1a(eta,cutprop(prod),[y:rat][t:lrt(eta,y)]t22(y,t)):cutprop(prod)
--4141
-eta@satz141:=cutapp1a(ksi,cutprop(prod),[x:rat][t:lrt(ksi,x)]t23".4141"(x,t)):cutprop(prod)
-ts:=cutof(prod,satz141):cut
-[z0:rat][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,ts"rt"(x0,y0))]
-lrtts:=ine(prod,satz141,z0,prod1(z0,x0,lx,y0,ly,i)):lrt(ts(ksi,eta),z0)
-eta@[z0:rat][x0:rat][ux:urt(ksi,x0)][y0:rat][uy:urt(eta,y0)][i:is"rt"(z0,ts"rt"(x0,y0))]
-+*iii4
-i@t10:=isp1(rat,[x:rat]not(in(x,prod)),ts"rt"(x0,y0),z0,satz141a(x0,ux,y0,uy),i):not(in(z0,prod))
--iii4
-i@urtts:=th3"l.imp"(lrt(ts(ksi,eta),z0),in(z0,prod),t10".iii4",[t:lrt(ts(ksi,eta),z0)]ini(prod,satz141,z0,t)):urt(ts(ksi,eta),z0)
-eta@[z0:rat][lz:lrt(ts(ksi,eta),z0)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,ts"rt"(x,y))]p]
-+*iii4
-p1@t11:=ini(prod,satz141,z0,lz):in(z0,prod)
--iii4
-p1@tsapp:=prodapp(z0,t11".iii4",p,p1):p
-zeta@[i:is(ksi,eta)]
-ists1:=isf(cut,cut,[u:cut]ts(u,zeta),ksi,eta,i):is(ts(ksi,zeta),ts(eta,zeta))
-ists2:=isf(cut,cut,[u:cut]ts(zeta,u),ksi,eta,i):is(ts(zeta,ksi),ts(zeta,eta))
-upsilon@[i:is(ksi,eta)][j:is(zeta,upsilon)]
-ists12:=tris(cut,ts(ksi,zeta),ts(eta,zeta),ts(eta,upsilon),ists1(i),ists2(zeta,upsilon,eta,j)):is(ts(ksi,zeta),ts(eta,upsilon))
-+4142
-eta@[z0:rat][lz:lrt(ts(ksi,eta),z0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,ts"rt"(x0,y0))]
-t1:=tris(rat,z0,ts"rt"(x0,y0),ts"rt"(y0,x0),i,comts(x0,y0)):is"rt"(z0,ts"rt"(y0,x0))
-t2:=lrtts(eta,ksi,z0,y0,ly,x0,lx,t1):lrt(ts(eta,ksi),z0)
-lz@t3:=tsapp(ksi,eta,z0,lz,lrt(ts(eta,ksi),z0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,ts"rt"(x,y))]t2(x,t,y,u,v)):lrt(ts(eta,ksi),z0)
--4142
-eta@satz142:=isi1(ts(ksi,eta),ts(eta,ksi),[x:rat][t:lrt(ts(ksi,eta),x)]t3".4142"(x,t),[x:rat][t:lrt(ts(eta,ksi),x)]t3".4142"(eta,ksi,x,t)):is(ts(ksi,eta),ts(eta,ksi))
-comts:=satz142:is(ts(ksi,eta),ts(eta,ksi))
-+4143
-zeta@[u0:rat][lu:lrt(ts(ts(ksi,eta),zeta),u0)][v0:rat][lv:lrt(ts(ksi,eta),v0)][z0:rat][lz:lrt(zeta,z0)][i:is"rt"(u0,ts"rt"(v0,z0))][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(v0,ts"rt"(x0,y0))]
-t1:=tr3is(rat,u0,ts"rt"(v0,z0),ts"rt"(ts"rt"(x0,y0),z0),ts"rt"(x0,ts"rt"(y0,z0)),i,ists1"rt"(v0,ts"rt"(x0,y0),z0,j),assts1(x0,y0,z0)):is"rt"(u0,ts"rt"(x0,ts"rt"(y0,z0)))
-t2:=lrtts(eta,zeta,ts"rt"(y0,z0),y0,ly,z0,lz,refis(rat,ts"rt"(y0,z0))):lrt(ts(eta,zeta),ts"rt"(y0,z0))
-t3:=lrtts(ksi,ts(eta,zeta),u0,x0,lx,ts"rt"(y0,z0),t2,t1):lrt(ts(ksi,ts(eta,zeta)),u0)
-i@t4:=tsapp(ksi,eta,v0,lv,lrt(ts(ksi,ts(eta,zeta)),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(v0,ts"rt"(x,y))]t3(x,t,y,u,v)):lrt(ts(ksi,ts(eta,zeta)),u0)
-lu@t5:=tsapp(ts(ksi,eta),zeta,u0,lu,lrt(ts(ksi,ts(eta,zeta)),u0),[x:rat][t:lrt(ts(ksi,eta),x)][y:rat][u:lrt(zeta,y)][v:is"rt"(u0,ts"rt"(x,y))]t4(x,t,y,u,v)):lrt(ts(ksi,ts(eta,zeta)),u0)
-u0@[lu:lrt(ts(ksi,ts(eta,zeta)),u0)][x0:rat][lx:lrt(ksi,x0)][v0:rat][lv:lrt(ts(eta,zeta),v0)][i:is"rt"(u0,ts"rt"(x0,v0))][y0:rat][ly:lrt(eta,y0)][z0:rat][lz:lrt(zeta,z0)][j:is"rt"(v0,ts"rt"(y0,z0))]
-t6:=tr3is(rat,u0,ts"rt"(x0,v0),ts"rt"(x0,ts"rt"(y0,z0)),ts"rt"(ts"rt"(x0,y0),z0),i,ists2"rt"(v0,ts"rt"(y0,z0),x0,j),assts2(x0,y0,z0)):is"rt"(u0,ts"rt"(ts"rt"(x0,y0),z0))
-t7:=lrtts(ksi,eta,ts"rt"(x0,y0),x0,lx,y0,ly,refis(rat,ts"rt"(x0,y0))):lrt(ts(ksi,eta),ts"rt"(x0,y0))
-t8:=lrtts(ts(ksi,eta),zeta,u0,ts"rt"(x0,y0),t7,z0,lz,t6):lrt(ts(ts(ksi,eta),zeta),u0)
-i@t9:=tsapp(eta,zeta,v0,lv,lrt(ts(ts(ksi,eta),zeta),u0),[x:rat][t:lrt(eta,x)][y:rat][u:lrt(zeta,y)][v:is"rt"(v0,ts"rt"(x,y))]t8(x,t,y,u,v)):lrt(ts(ts(ksi,eta),zeta),u0)
-lu@t10:=tsapp(ksi,ts(eta,zeta),u0,lu,lrt(ts(ts(ksi,eta),zeta),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(ts(eta,zeta),y)][v:is"rt"(u0,ts"rt"(x,y))]t9(x,t,y,u,v)):lrt(ts(ts(ksi,eta),zeta),u0)
--4143
-zeta@satz143:=isi1(ts(ts(ksi,eta),zeta),ts(ksi,ts(eta,zeta)),[x:rat][t:lrt(ts(ts(ksi,eta),zeta),x)]t5".4143"(x,t),[x:rat][t:lrt(ts(ksi,ts(eta,zeta)),x)]t10".4143"(x,t)):is(ts(ts(ksi,eta),zeta),ts(ksi,ts(eta,zeta)))
-assts1:=satz143:is(ts(ts(ksi,eta),zeta),ts(ksi,ts(eta,zeta)))
-assts2:=symis(cut,ts(ts(ksi,eta),zeta),ts(ksi,ts(eta,zeta)),satz143):is(ts(ksi,ts(eta,zeta)),ts(ts(ksi,eta),zeta))
-+4144
-[u0:rat][lu:lrt(ts(ksi,pl(eta,zeta)),u0)][x0:rat][lx:lrt(ksi,x0)][v0:rat][lv:lrt(pl(eta,zeta),v0)][i:is"rt"(u0,ts"rt"(x0,v0))][y0:rat][ly:lrt(eta,y0)][z0:rat][lz:lrt(zeta,z0)][j:is"rt"(v0,pl"rt"(y0,z0))]
-t1:=tr3is(rat,u0,ts"rt"(x0,v0),ts"rt"(x0,pl"rt"(y0,z0)),pl"rt"(ts"rt"(x0,y0),ts"rt"(x0,z0)),i,ists2"rt"(v0,pl"rt"(y0,z0),x0,j),disttp2(x0,y0,z0)):is"rt"(u0,pl"rt"(ts"rt"(x0,y0),ts"rt"(x0,z0)))
-t2:=lrtts(ksi,eta,ts"rt"(x0,y0),x0,lx,y0,ly,refis(rat,ts"rt"(x0,y0))):lrt(ts(ksi,eta),ts"rt"(x0,y0))
-t3:=lrtts(ksi,zeta,ts"rt"(x0,z0),x0,lx,z0,lz,refis(rat,ts"rt"(x0,z0))):lrt(ts(ksi,zeta),ts"rt"(x0,z0))
-t4:=lrtpl(ts(ksi,eta),ts(ksi,zeta),u0,ts"rt"(x0,y0),t2,ts"rt"(x0,z0),t3,t1):lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0)
-i@t5:=plapp(eta,zeta,v0,lv,lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0),[x:rat][t:lrt(eta,x)][y:rat][u:lrt(zeta,y)][v:is"rt"(v0,pl"rt"(x,y))]t4(x,t,y,u,v)):lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0)
-lu@t6:=tsapp(ksi,pl(eta,zeta),u0,lu,lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(pl(eta,zeta),y)][v:is"rt"(u0,ts"rt"(x,y))]t5(x,t,y,u,v)):lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0)
-u0@[lu:lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0)][v0:rat][lv:lrt(ts(ksi,eta),v0)][w0:rat][lw:lrt(ts(ksi,zeta),w0)][i:is"rt"(u0,pl"rt"(v0,w0))][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(v0,ts"rt"(x0,y0))][x1:rat][lx1:lrt(ksi,x1)][z0:rat][lz:lrt(zeta,z0)][k:is"rt"(w0,ts"rt"(x1,z0))]
-t7:=tris(rat,u0,pl"rt"(v0,w0),pl"rt"(ts"rt"(x0,y0),ts"rt"(x1,z0)),i,ispl12"rt"(v0,ts"rt"(x0,y0),w0,ts"rt"(x1,z0),j,k)):is"rt"(u0,pl"rt"(ts"rt"(x0,y0),ts"rt"(x1,z0)))
-x2:=ite(moreis"rt"(x0,x1),rat,x0,x1):rat
-[m:moreis"rt"(x0,x1)]
-t8:=itet(moreis"rt"(x0,x1),rat,x0,x1,m):is"rt"(x2,x0)
-t9:=isp1(rat,[t:rat]lrt(ksi,t),x0,x2,lx,t8):lrt(ksi,x2)
-t10:=lessisi2"rt"(x0,x2,symis(rat,x2,x0,t8)):lessis"rt"(x0,x2)
-t11:=satz88(x1,x0,x2,satz84(x0,x1,m),t10):lessis"rt"(x1,x2)
-k@[n:not(moreis"rt"(x0,x1))]
-t12:=itef(moreis"rt"(x0,x1),rat,x0,x1,n):is"rt"(x2,x1)
-t13:=isp1(rat,[t:rat]lrt(ksi,t),x1,x2,lx1,t12):lrt(ksi,x2)
-t14:=lessisi2"rt"(x1,x2,symis(rat,x2,x1,t12)):lessis"rt"(x1,x2)
-t15:=lessisi1"rt"(x0,x2,satz87b(x0,x1,x2,satz81j(x0,x1,n),t14)):lessis"rt"(x0,x2)
-k@t16:=th1"l.imp"(moreis"rt"(x0,x1),lrt(ksi,x2),[t:moreis"rt"(x0,x1)]t9(t),[t:not(moreis"rt"(x0,x1))]t13(t)):lrt(ksi,x2)
-t17:=th1"l.imp"(moreis"rt"(x0,x1),lessis"rt"(x0,x2),[t:moreis"rt"(x0,x1)]t10(t),[t:not(moreis"rt"(x0,x1))]t15(t)):lessis"rt"(x0,x2)
-t18:=th1"l.imp"(moreis"rt"(x0,x1),lessis"rt"(x1,x2),[t:moreis"rt"(x0,x1)]t11(t),[t:not(moreis"rt"(x0,x1))]t14(t)):lessis"rt"(x1,x2)
-t19:=lrtpl(eta,zeta,pl"rt"(y0,z0),y0,ly,z0,lz,refis(rat,pl"rt"(y0,z0))):lrt(pl(eta,zeta),pl"rt"(y0,z0))
-t20:=lrtts(ksi,pl(eta,zeta),ts"rt"(x2,pl"rt"(y0,z0)),x2,t16,pl"rt"(y0,z0),t19,refis(rat,ts"rt"(x2,pl"rt"(y0,z0)))):lrt(ts(ksi,pl(eta,zeta)),ts"rt"(x2,pl"rt"(y0,z0)))
-t21:=satz109a(x0,x2,y0,y0,t17,lessisi2"rt"(y0,y0,refis(rat,y0))):lessis"rt"(ts"rt"(x0,y0),ts"rt"(x2,y0))
-t22:=satz109a(x1,x2,z0,z0,t18,lessisi2"rt"(z0,z0,refis(rat,z0))):lessis"rt"(ts"rt"(x1,z0),ts"rt"(x2,z0))
-t23:=islessis12"rt"(pl"rt"(ts"rt"(x0,y0),ts"rt"(x1,z0)),u0,pl"rt"(ts"rt"(x2,y0),ts"rt"(x2,z0)),ts"rt"(x2,pl"rt"(y0,z0)),symis(rat,u0,pl"rt"(ts"rt"(x0,y0),ts"rt"(x1,z0)),t7),distpt2(x2,y0,z0),satz100a(ts"rt"(x0,y0),ts"rt"(x2,y0),ts"rt"(x1,z0),ts"rt"(x2,z0),t21,t22)):lessis"rt"(u0,ts"rt"(x2,pl"rt"(y0,z0)))
-t24:=orapp(less"rt"(u0,ts"rt"(x2,pl"rt"(y0,z0))),is"rt"(u0,ts"rt"(x2,pl"rt"(y0,z0))),lrt(ts(ksi,pl(eta,zeta)),u0),t23,[t:less"rt"(u0,ts"rt"(x2,pl"rt"(y0,z0)))]satz120(ts(ksi,pl(eta,zeta)),ts"rt"(x2,pl"rt"(y0,z0)),t20,u0,t),[t:is"rt"(u0,ts"rt"(x2,pl"rt"(y0,z0)))]isp1(rat,[u:rat]lrt(ts(ksi,pl(eta,zeta)),u),ts"rt"(x2,pl"rt"(y0,z0)),u0,t20,t)):lrt(ts(ksi,pl(eta,zeta)),u0)
-j@t25:=tsapp(ksi,zeta,w0,lw,lrt(ts(ksi,pl(eta,zeta)),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(zeta,y)][v:is"rt"(w0,ts"rt"(x,y))]t24(x,t,y,u,v)):lrt(ts(ksi,pl(eta,zeta)),u0)
-i@t26:=tsapp(ksi,eta,v0,lv,lrt(ts(ksi,pl(eta,zeta)),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(v0,ts"rt"(x,y))]t25(x,t,y,u,v)):lrt(ts(ksi,pl(eta,zeta)),u0)
-lu@t27:=plapp(ts(ksi,eta),ts(ksi,zeta),u0,lu,lrt(ts(ksi,pl(eta,zeta)),u0),[x:rat][t:lrt(ts(ksi,eta),x)][y:rat][u:lrt(ts(ksi,zeta),y)][v:is"rt"(u0,pl"rt"(x,y))]t26(x,t,y,u,v)):lrt(ts(ksi,pl(eta,zeta)),u0)
--4144
-satz144:=isi1(ts(ksi,pl(eta,zeta)),pl(ts(ksi,eta),ts(ksi,zeta)),[x:rat][t:lrt(ts(ksi,pl(eta,zeta)),x)]t6".4144"(x,t),[x:rat][t:lrt(pl(ts(ksi,eta),ts(ksi,zeta)),x)]t27".4144"(x,t)):is(ts(ksi,pl(eta,zeta)),pl(ts(ksi,eta),ts(ksi,zeta)))
-disttp1:=tr3is(cut,ts(pl(ksi,eta),zeta),ts(zeta,pl(ksi,eta)),pl(ts(zeta,ksi),ts(zeta,eta)),pl(ts(ksi,zeta),ts(eta,zeta)),comts(pl(ksi,eta),zeta),satz144(zeta,ksi,eta),ispl12(ts(zeta,ksi),ts(ksi,zeta),ts(zeta,eta),ts(eta,zeta),comts(zeta,ksi),comts(zeta,eta))):is(ts(pl(ksi,eta),zeta),pl(ts(ksi,zeta),ts(eta,zeta)))
-disttp2:=satz144:is(ts(ksi,pl(eta,zeta)),pl(ts(ksi,eta),ts(ksi,zeta)))
-distpt1:=symis(cut,ts(pl(ksi,eta),zeta),pl(ts(ksi,zeta),ts(eta,zeta)),disttp1):is(pl(ts(ksi,zeta),ts(eta,zeta)),ts(pl(ksi,eta),zeta))
-distpt2:=symis(cut,ts(ksi,pl(eta,zeta)),pl(ts(ksi,eta),ts(ksi,zeta)),disttp2):is(pl(ts(ksi,eta),ts(ksi,zeta)),ts(ksi,pl(eta,zeta)))
-[m:more(ksi,eta)]
-+4145
-phi:=mn(ksi,eta,m):cut
-t1:=satz140d(ksi,eta,m):is(ksi,pl(eta,phi))
-t2:=tris(cut,ts(ksi,zeta),ts(pl(eta,phi),zeta),pl(ts(eta,zeta),ts(phi,zeta)),ists1(ksi,pl(eta,phi),zeta,t1),disttp1(eta,phi,zeta)):is(ts(ksi,zeta),pl(ts(eta,zeta),ts(phi,zeta)))
--4145
-satz145a:=ismore1(pl(ts(eta,zeta),ts(phi".4145",zeta)),ts(ksi,zeta),ts(eta,zeta),symis(cut,ts(ksi,zeta),pl(ts(eta,zeta),ts(phi".4145",zeta)),t2".4145"),satz133(ts(eta,zeta),ts(phi".4145",zeta))):more(ts(ksi,zeta),ts(eta,zeta))
-zeta@[i:is(ksi,eta)]
-satz145b:=ists1(ksi,eta,zeta,i):is(ts(ksi,zeta),ts(eta,zeta))
-zeta@[l:less(ksi,eta)]
-satz145c:=satz121(ts(eta,zeta),ts(ksi,zeta),satz145a(eta,ksi,zeta,satz122(ksi,eta,l))):less(ts(ksi,zeta),ts(eta,zeta))
-m@satz145d:=ismore12(ts(ksi,zeta),ts(zeta,ksi),ts(eta,zeta),ts(zeta,eta),comts(ksi,zeta),comts(eta,zeta),satz145a):more(ts(zeta,ksi),ts(zeta,eta))
-i@satz145e:=ists2(ksi,eta,zeta,i):is(ts(zeta,ksi),ts(zeta,eta))
-l@satz145f:=isless12(ts(ksi,zeta),ts(zeta,ksi),ts(eta,zeta),ts(zeta,eta),comts(ksi,zeta),comts(eta,zeta),satz145c):less(ts(zeta,ksi),ts(zeta,eta))
-upsilon@[i:is(ksi,eta)][m:more(zeta,upsilon)]
-satz145g:=ismore2(ts(ksi,upsilon),ts(eta,upsilon),ts(ksi,zeta),ists1(ksi,eta,upsilon,i),satz145d(zeta,upsilon,ksi,m)):more(ts(ksi,zeta),ts(eta,upsilon))
-satz145h:=ismore12(ts(ksi,zeta),ts(zeta,ksi),ts(eta,upsilon),ts(upsilon,eta),comts(ksi,zeta),comts(eta,upsilon),satz145g):more(ts(zeta,ksi),ts(upsilon,eta))
-i@[l:less(zeta,upsilon)]
-satz145j:=isless2(ts(ksi,upsilon),ts(eta,upsilon),ts(ksi,zeta),ists1(ksi,eta,upsilon,i),satz145f(zeta,upsilon,ksi,l)):less(ts(ksi,zeta),ts(eta,upsilon))
-satz145k:=isless12(ts(ksi,zeta),ts(zeta,ksi),ts(eta,upsilon),ts(upsilon,eta),comts(ksi,zeta),comts(eta,upsilon),satz145j):less(ts(zeta,ksi),ts(upsilon,eta))
-+4146
-zeta@t1:=satz123a(ksi,eta):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-t2:=satz123b(ts(ksi,zeta),ts(eta,zeta)):ec3(is(ts(ksi,zeta),ts(eta,zeta)),more(ts(ksi,zeta),ts(eta,zeta)),less(ts(ksi,zeta),ts(eta,zeta)))
--4146
-zeta@[m:more(ts(ksi,zeta),ts(eta,zeta))]
-satz146a:=th11"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(ts(ksi,zeta),ts(eta,zeta)),more(ts(ksi,zeta),ts(eta,zeta)),less(ts(ksi,zeta),ts(eta,zeta)),t1".4146",t2".4146",[u:is(ksi,eta)]satz145b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz145a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz145c(ksi,eta,zeta,u),m):more(ksi,eta)
-zeta@[i:is(ts(ksi,zeta),ts(eta,zeta))]
-satz146b:=th10"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(ts(ksi,zeta),ts(eta,zeta)),more(ts(ksi,zeta),ts(eta,zeta)),less(ts(ksi,zeta),ts(eta,zeta)),t1".4146",t2".4146",[u:is(ksi,eta)]satz145b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz145a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz145c(ksi,eta,zeta,u),i):is(ksi,eta)
-zeta@[l:less(ts(ksi,zeta),ts(eta,zeta))]
-satz146c:=th12"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(ts(ksi,zeta),ts(eta,zeta)),more(ts(ksi,zeta),ts(eta,zeta)),less(ts(ksi,zeta),ts(eta,zeta)),t1".4146",t2".4146",[u:is(ksi,eta)]satz145b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz145a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz145c(ksi,eta,zeta,u),l):less(ksi,eta)
-zeta@[m:more(ts(zeta,ksi),ts(zeta,eta))]
-satz146d:=satz146a(ismore12(ts(zeta,ksi),ts(ksi,zeta),ts(zeta,eta),ts(eta,zeta),comts(zeta,ksi),comts(zeta,eta),m)):more(ksi,eta)
-zeta@[i:is(ts(zeta,ksi),ts(zeta,eta))]
-satz146e:=satz146b(tr3is(cut,ts(ksi,zeta),ts(zeta,ksi),ts(zeta,eta),ts(eta,zeta),comts(ksi,zeta),i,comts(zeta,eta))):is(ksi,eta)
-zeta@[l:less(ts(zeta,ksi),ts(zeta,eta))]
-satz146f:=satz146c(isless12(ts(zeta,ksi),ts(ksi,zeta),ts(zeta,eta),ts(eta,zeta),comts(zeta,ksi),comts(zeta,eta),l)):less(ksi,eta)
-upsilon@[m:more(ksi,eta)][n:more(zeta,upsilon)]
-+4147
-t1:=satz145a(ksi,eta,zeta,m):more(ts(ksi,zeta),ts(eta,zeta))
-t2:=ismore12(ts(zeta,eta),ts(eta,zeta),ts(upsilon,eta),ts(eta,upsilon),comts(zeta,eta),comts(upsilon,eta),satz145a(zeta,upsilon,eta,n)):more(ts(eta,zeta),ts(eta,upsilon))
--4147
-satz147:=trmore(ts(ksi,zeta),ts(eta,zeta),ts(eta,upsilon),t1".4147",t2".4147"):more(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[l:less(ksi,eta)][k:less(zeta,upsilon)]
-satz147a:=satz121(ts(eta,upsilon),ts(ksi,zeta),satz147(eta,ksi,upsilon,zeta,satz122(ksi,eta,l),satz122(zeta,upsilon,k))):less(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[m:moreis(ksi,eta)][n:more(zeta,upsilon)]
-satz148a:=orapp(more(ksi,eta),is(ksi,eta),more(ts(ksi,zeta),ts(eta,upsilon)),m,[t:more(ksi,eta)]satz147(t,n),[t:is(ksi,eta)]satz145g(t,n)):more(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[m:more(ksi,eta)][n:moreis(zeta,upsilon)]
-satz148b:=orapp(more(zeta,upsilon),is(zeta,upsilon),more(ts(ksi,zeta),ts(eta,upsilon)),n,[t:more(zeta,upsilon)]satz147(m,t),[t:is(zeta,upsilon)]satz145h(zeta,upsilon,ksi,eta,t,m)):more(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[l:lessis(ksi,eta)][k:less(zeta,upsilon)]
-satz148c:=satz121(ts(eta,upsilon),ts(ksi,zeta),satz148a(eta,ksi,upsilon,zeta,satz125(ksi,eta,l),satz122(zeta,upsilon,k))):less(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[l:less(ksi,eta)][k:lessis(zeta,upsilon)]
-satz148d:=satz121(ts(eta,upsilon),ts(ksi,zeta),satz148b(eta,ksi,upsilon,zeta,satz122(ksi,eta,l),satz125(zeta,upsilon,k))):less(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[m:moreis(ksi,eta)][n:moreis(zeta,upsilon)]
-+4149
-[i:is(ksi,eta)][j:is(zeta,upsilon)]
-t1:=moreisi2(ts(ksi,zeta),ts(eta,upsilon),ists12(ksi,eta,zeta,upsilon,i,j)):moreis(ts(ksi,zeta),ts(eta,upsilon))
-i@[o:more(zeta,upsilon)]
-t2:=moreisi1(ts(ksi,zeta),ts(eta,upsilon),satz148a(m,o)):moreis(ts(ksi,zeta),ts(eta,upsilon))
-i@t3:=orapp(more(zeta,upsilon),is(zeta,upsilon),moreis(ts(ksi,zeta),ts(eta,upsilon)),n,[t:more(zeta,upsilon)]t2(t),[t:is(zeta,upsilon)]t1(t)):moreis(ts(ksi,zeta),ts(eta,upsilon))
-n@[o:more(ksi,eta)]
-t4:=moreisi1(ts(ksi,zeta),ts(eta,upsilon),satz148b(o,n)):moreis(ts(ksi,zeta),ts(eta,upsilon))
--4149
-satz149:=orapp(more(ksi,eta),is(ksi,eta),moreis(ts(ksi,zeta),ts(eta,upsilon)),m,[t:more(ksi,eta)]t4".4149"(t),[t:is(ksi,eta)]t3".4149"(t)):moreis(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[l:lessis(ksi,eta)][k:lessis(zeta,upsilon)]
-satz149a:=satz124(ts(eta,upsilon),ts(ksi,zeta),satz149(eta,ksi,upsilon,zeta,satz125(ksi,eta,l),satz125(zeta,upsilon,k))):lessis(ts(ksi,zeta),ts(eta,upsilon))
--rp
-@[r0:rat]
-ratset:=setof(rat,[x:rat]less(x,r0)):set(rat)
-+4150
-t1:=satz90(r0):some([x:rat]less(x,r0))
-[x0:rat][l:less(x0,r0)]
-t2:=estii(rat,[x:rat]less(x,r0),x0,l):in(x0,ratset)
-r0@t3:=ec3e13(is(r0,r0),more(r0,r0),less(r0,r0),satz81b(r0,r0),refis(rat,r0)):not(less(r0,r0))
-t4:=th3"l.imp"(in(r0,ratset),less(r0,r0),t3,[t:in(r0,ratset)]estie(rat,[x:rat]less(x,r0),r0,t)):not(in(r0,ratset))
-x0@[i:in(x0,ratset)]
-t5:=estie(rat,[x:rat]less(x,r0),x0,i):less(x0,r0)
-[x1:rat][k:less(x1,x0)]
-t6:=t2(x1,trless(x1,x0,r0,k,t5)):in(x1,ratset)
-i@t7:=satz91(x0,r0,t5):some([x:rat]and(less(x0,x),less(x,r0)))
-[x1:rat][a:and(less(x0,x1),less(x1,r0))]
-t8:=ande1(less(x0,x1),less(x1,r0),a):less(x0,x1)
-t9:=ande2(less(x0,x1),less(x1,r0),a):less(x1,r0)
-t10:=andi(in(x1,ratset),more(x1,x0),t2(x1,t9),satz83(x0,x1,t8)):and(in(x1,ratset),more(x1,x0))
-i@t11:=th6"l.some"(rat,[x:rat]and(less(x0,x),less(x,r0)),[x:rat]and(in(x,ratset),more(x,x0)),t7,[x:rat][t:and(less(x0,x),less(x,r0))]t10(x,t)):some([x:rat]and(in(x,ratset),more(x,x0)))
-l@t12:=cut2(ratset,x0,t2,r0,t4,[x:rat][t:in(x,ratset)][y:rat][u:less(y,x)]t6(x,t,y,u),[x:rat][t:in(x,ratset)]t11(x,t)):cutprop(ratset)
--4150
-satz150:=someapp(rat,[x:rat]less(x,r0),t1".4150",cutprop(ratset),[x:rat][t:less(x,r0)]t12".4150"(x,t)):cutprop(ratset)
-+*rp
-r0@rpofrt:=cutof(ratset,satz150):cut
-[x0:rat][l:less"rt"(x0,r0)]
-lrtrpofrt:=ine(ratset,satz150,x0,t2"rt.4150"(x0,l)):lrt(rpofrt,x0)
-r0@[x0:rat][lx:lrt(rpofrt,x0)]
-lrtrpofrte:=t5"rt.4150"(x0,ini(ratset,satz150,x0,lx)):less"rt"(x0,r0)
-r0@[x0:rat][m:moreis"rt"(x0,r0)]
-+*iii4
-m@t12:=satz81c(x0,r0,m):not(less"rt"(x0,r0))
--iii4
-m@urtrpofrt:=th3"l.imp"(lrt(rpofrt,x0),less"rt"(x0,r0),t12".iii4",[t:lrt(rpofrt,x0)]lrtrpofrte(x0,t)):urt(rpofrt,x0)
-@1rp:=rpofrt(1rt):cut
-+4151
-ksi@[z0:rat][lz:lrt(ts(ksi,1rp),z0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(1rp,y0)][i:is"rt"(z0,ts"rt"(x0,y0))]
-t1:=lrtrpofrte(1rt,y0,ly):less"rt"(y0,1rt)
-t2:=isless12"rt"(ts"rt"(x0,y0),z0,ts"rt"(x0,1rt),x0,symis(rat,z0,ts"rt"(x0,y0),i),example1a(x0),satz105f(y0,1rt,x0,t1)):less"rt"(z0,x0)
-t3:=satz120(ksi,x0,lx,z0,t2):lrt(ksi,z0)
-lz@t4:=tsapp(ksi,1rp,z0,lz,lrt(ksi,z0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(1rp,y)][v:is"rt"(z0,ts"rt"(x,y))]t3(x,t,y,u,v)):lrt(ksi,z0)
-ksi@[x0:rat][lx:lrt(ksi,x0)][x1:rat][lx1:lrt(ksi,x1)][l:less"rt"(x0,x1)]
-y1:=ts"rt"(ov(1rt,x1),x0):rat
-t5:=isless2"rt"(ts"rt"(ov(1rt,x1),x1),1rt,y1,satz110e(1rt,x1),satz105f(x0,x1,ov(1rt,x1),l)):less"rt"(y1,1rt)
-t6:=lrtrpofrt(1rt,y1,t5):lrt(1rp,y1)
-t7:=tr3is(rat,ts"rt"(x1,y1),ts"rt"(ts"rt"(x1,ov(1rt,x1)),x0),ts"rt"(1rt,x0),x0,assts2"rt"(x1,ov(1rt,x1),x0),ists1"rt"(ts"rt"(x1,ov(1rt,x1)),1rt,x0,satz110c(1rt,x1)),example1c(x0)):is"rt"(ts"rt"(x1,y1),x0)
-t8:=lrtts(ksi,1rp,x0,x1,lx1,y1,t6,symis(rat,ts"rt"(x1,y1),x0,t7)):lrt(ts(ksi,1rp),x0)
-lx@t9:=cutapp3(ksi,x0,lx,lrt(ts(ksi,1rp),x0),[y:rat][t:lrt(ksi,y)][u:less"rt"(x0,y)]t8(y,t,u)):lrt(ts(ksi,1rp),x0)
--4151
-ksi@satz151:=isi1(ts(ksi,1rp),ksi,[x:rat][t:lrt(ts(ksi,1rp),x)]t4".4151"(x,t),[x:rat][t:lrt(ksi,x)]t9".4151"(x,t)):is(ts(ksi,1rp),ksi)
-satz151a:=symis(cut,ts(ksi,1rp),ksi,satz151):is(ksi,ts(ksi,1rp))
-satz151b:=tris(cut,ts(1rp,ksi),ts(ksi,1rp),ksi,comts(1rp,ksi),satz151):is(ts(1rp,ksi),ksi)
-satz151c:=symis(cut,ts(1rp,ksi),ksi,satz151b):is(ksi,ts(1rp,ksi))
-+4152
-[x0:rat][y0:rat]
-invprop1:=and(urt(ksi,y0),less"rt"(y0,x0)):'prop'
-ksi@[z0:rat][x0:rat]
-invprop2:=and3(urt(ksi,x0),some"rt"([x:rat]invprop1(x0,x)),is"rt"(z0,ov(1rt,x0))):'prop'
-z0@invprop:=some"rt"([x:rat]invprop2(z0,x)):'prop'
-ksi@inv:=setof(rat,[z:rat]invprop(z)):set(rat)
-x0@[ux:urt(ksi,x0)][y0:rat][uy:urt(ksi,y0)][l:less"rt"(y0,x0)][i:is"rt"(z0,ov(1rt,x0))]
-t1:=andi(urt(ksi,y0),less"rt"(y0,x0),uy,l):invprop1(x0,y0)
-t2:=somei(rat,[x:rat]invprop1(x0,x),y0,t1):some"rt"([x:rat]invprop1(x0,x))
-t3:=and3i(urt(ksi,x0),some"rt"([x:rat]invprop1(x0,x)),is"rt"(z0,ov(1rt,x0)),ux,t2,i):invprop2(z0,x0)
-t4:=somei(rat,[x:rat]invprop2(z0,x),x0,t3):invprop(z0)
-inv1:=estii(rat,[z:rat]invprop(z),z0,t4):in(z0,inv)
-z0@[i:in(z0,inv)][p:'prop'][p1:[x:rat][t:urt(ksi,x)][y:rat][u:urt(ksi,y)][v:less"rt"(y,x)][w:is"rt"(z0,ov(1rt,x))]p]
-t5:=estie(rat,[x:rat]invprop(x),z0,i):invprop(z0)
-[x0:rat][px:invprop2(z0,x0)]
-t6:=and3e1(urt(ksi,x0),some"rt"([x:rat]invprop1(x0,x)),is"rt"(z0,ov(1rt,x0)),px):urt(ksi,x0)
-t7:=and3e2(urt(ksi,x0),some"rt"([x:rat]invprop1(x0,x)),is"rt"(z0,ov(1rt,x0)),px):some"rt"([x:rat]invprop1(x0,x))
-t8:=and3e3(urt(ksi,x0),some"rt"([x:rat]invprop1(x0,x)),is"rt"(z0,ov(1rt,x0)),px):is"rt"(z0,ov(1rt,x0))
-[y0:rat][py:invprop1(x0,y0)]
-t9:=ande1(urt(ksi,y0),less"rt"(y0,x0),py):urt(ksi,y0)
-t10:=ande2(urt(ksi,y0),less"rt"(y0,x0),py):less"rt"(y0,x0)
-t11:=<t8><t10><t9><y0><t6><x0>p1:p
-px@t12:=someapp(rat,[x:rat]invprop1(x0,x),t7,p,[x:rat][t:invprop1(x0,x)]t11(x,t)):p
-p1@invapp:=someapp(rat,[x:rat]invprop2(z0,x),t5,p,[x:rat][t:invprop2(z0,x)]t12(x,t)):p
-ksi@[x0:rat][ux:urt(ksi,x0)]
-2x0:=pl"rt"(x0,x0):rat
-t13:=satz94a(x0,x0):less"rt"(x0,2x0)
-t14:=satz119a(ksi,x0,ux,2x0,t13):urt(ksi,2x0)
-t15:=inv1(ov(1rt,2x0),2x0,t14,x0,ux,t13,refis(rat,ov(1rt,2x0))):in(ov(1rt,2x0),inv)
-ksi@[x1:rat][lx:lrt(ksi,x1)][x0:rat][ux:urt(ksi,x0)]
-t16:=th3"l.imp"(is"rt"(x0,x1),lrt(ksi,x0),ux,[t:is"rt"(x0,x1)]isp1(rat,[x:rat]lrt(ksi,x),x1,x0,lx,t)):nis"rt"(x0,x1)
-t17:=satz110e(1rt,x0):is"rt"(ts"rt"(ov(1rt,x0),x0),1rt)
-t18:=satz110e(1rt,x1):is"rt"(ts"rt"(ov(1rt,x1),x1),1rt)
-[i:is"rt"(ov(1rt,x0),ov(1rt,x1))]
-t19:=tris(rat,ts"rt"(ov(1rt,x0),x1),ts"rt"(ov(1rt,x1),x1),1rt,ists1"rt"(ov(1rt,x0),ov(1rt,x1),x1,i),t18):is"rt"(ts"rt"(ov(1rt,x0),x1),1rt)
-t20:=satz110b(1rt,ov(1rt,x0),x0,x1,t17,t19):is"rt"(x0,x1)
-ux@t21:=th3"l.imp"(is"rt"(ov(1rt,x0),ov(1rt,x1)),is"rt"(x0,x1),t16,[t:is"rt"(ov(1rt,x0),ov(1rt,x1))]t20(t)):nis"rt"(ov(1rt,x0),ov(1rt,x1))
-lx@[i:in(ov(1rt,x1),inv)]
-t22:=invapp(ov(1rt,x1),i,con,[x:rat][t:urt(ksi,x)][y:rat][u:urt(ksi,y)][v:less"rt"(y,x)][w:is"rt"(ov(1rt,x1),ov(1rt,x))]<symis(rat,ov(1rt,x1),ov(1rt,x),w)>t21(x,t)):con
-lx@t23:=[t:in(ov(1rt,x1),inv)]t22(t):not(in(ov(1rt,x1),inv))
-ksi@[z0:rat][i:in(z0,inv)][u0:rat][l:less"rt"(u0,z0)][x0:rat][ux:urt(ksi,x0)][j:is"rt"(z0,ov(1rt,x0))]
-t24:=isless2"rt"(z0,ov(1rt,x0),u0,j,l):less"rt"(u0,ov(1rt,x0))
-t25:=tris(rat,ts"rt"(ov(1rt,x0),x0),1rt,ts"rt"(u0,ov(1rt,u0)),satz110e(1rt,x0),satz110d(1rt,u0)):is"rt"(ts"rt"(ov(1rt,x0),x0),ts"rt"(u0,ov(1rt,u0)))
-t26:=isless2"rt"(ts"rt"(ov(1rt,x0),x0),ts"rt"(u0,ov(1rt,u0)),ts"rt"(u0,x0),t25,satz105c(u0,ov(1rt,x0),x0,t24)):less"rt"(ts"rt"(u0,x0),ts"rt"(u0,ov(1rt,u0)))
-t27:=isless12"rt"(ts"rt"(u0,x0),ts"rt"(x0,u0),ts"rt"(u0,ov(1rt,u0)),ts"rt"(ov(1rt,u0),u0),comts"rt"(u0,x0),comts"rt"(u0,ov(1rt,u0)),t26):less"rt"(ts"rt"(x0,u0),ts"rt"(ov(1rt,u0),u0))
-t28:=satz106c(x0,ov(1rt,u0),u0,t27):less"rt"(x0,ov(1rt,u0))
-t29:=satz119a(x0,ux,ov(1rt,u0),t28):urt(ksi,ov(1rt,u0))
-t30:=satz110e(1rt,u0):is"rt"(ts"rt"(ov(1rt,u0),u0),1rt)
-t31:=satz110g(1rt,ov(1rt,u0),u0,t30):is"rt"(u0,ov(1rt,ov(1rt,u0)))
-t32:=inv1(u0,ov(1rt,u0),t29,x0,ux,t28,t31):in(u0,inv)
-l@t33:=invapp(z0,i,in(u0,inv),[x:rat][t:urt(ksi,x)][y:rat][u:urt(ksi,y)][v:less"rt"(y,x)][w:is"rt"(z0,ov(1rt,x))]t32(x,t,w)):in(u0,inv)
-i@[x0:rat][ux:urt(ksi,x0)][x1:rat][ux1:urt(ksi,x1)][l:less"rt"(x1,x0)][j:is"rt"(z0,ov(1rt,x0))]
-t34:=satz91(x1,x0,l):some"rt"([x:rat]and(less"rt"(x1,x),less"rt"(x,x0)))
-[x2:rat][a:and(less"rt"(x1,x2),less"rt"(x2,x0))]
-t35:=ande1(less"rt"(x1,x2),less"rt"(x2,x0),a):less"rt"(x1,x2)
-t36:=satz119a(ksi,x1,ux1,x2,t35):urt(ksi,x2)
-t37:=inv1(ov(1rt,x2),x2,t36,x1,ux1,t35,refis(rat,ov(1rt,x2))):in(ov(1rt,x2),inv)
-t38:=ande2(less"rt"(x1,x2),less"rt"(x2,x0),a):less"rt"(x2,x0)
-t39:=tris(rat,ts"rt"(x0,ov(1rt,x0)),1rt,ts"rt"(x2,ov(1rt,x2)),satz110c(1rt,x0),satz110d(1rt,x2)):is"rt"(ts"rt"(x0,ov(1rt,x0)),ts"rt"(x2,ov(1rt,x2)))
-t40:=isless2"rt"(ts"rt"(x0,ov(1rt,x0)),ts"rt"(x2,ov(1rt,x2)),ts"rt"(x2,ov(1rt,x0)),t39,satz105c(x2,x0,ov(1rt,x0),t38)):less"rt"(ts"rt"(x2,ov(1rt,x0)),ts"rt"(x2,ov(1rt,x2)))
-t41:=isless12"rt"(ts"rt"(x2,ov(1rt,x0)),ts"rt"(ov(1rt,x0),x2),ts"rt"(x2,ov(1rt,x2)),ts"rt"(ov(1rt,x2),x2),comts"rt"(x2,ov(1rt,x0)),comts"rt"(x2,ov(1rt,x2)),t40):less"rt"(ts"rt"(ov(1rt,x0),x2),ts"rt"(ov(1rt,x2),x2))
-t42:=satz106c(ov(1rt,x0),ov(1rt,x2),x2,t41):less"rt"(ov(1rt,x0),ov(1rt,x2))
-t43:=ismore2"rt"(ov(1rt,x0),z0,ov(1rt,x2),symis(rat,z0,ov(1rt,x0),j),satz83(ov(1rt,x0),ov(1rt,x2),t42)):more"rt"(ov(1rt,x2),z0)
-t44:=andi(in(ov(1rt,x2),inv),more"rt"(ov(1rt,x2),z0),t37,t43):and(in(ov(1rt,x2),inv),more"rt"(ov(1rt,x2),z0))
-t45:=somei(rat,[x:rat]and(in(x,inv),more"rt"(x,z0)),ov(1rt,x2),t44):some"rt"([x:rat]and(in(x,inv),more"rt"(x,z0)))
-j@t46:=someapp(rat,[x:rat]and(less"rt"(x1,x),less"rt"(x,x0)),t34,some"rt"([x:rat]and(in(x,inv),more"rt"(x,z0))),[x:rat][t:and(less"rt"(x1,x),less"rt"(x,x0))]t45(x,t)):some"rt"([x:rat]and(in(x,inv),more"rt"(x,z0)))
-i@t47:=invapp(z0,i,some"rt"([x:rat]and(in(x,inv),more"rt"(x,z0))),[x:rat][t:urt(ksi,x)][y:rat][u:urt(ksi,y)][v:less"rt"(y,x)][w:is"rt"(z0,ov(1rt,x))]t46(x,t,y,u,v,w)):some"rt"([x:rat]and(in(x,inv),more"rt"(x,z0)))
-ksi@[x0:rat][lx:lrt(ksi,x0)][y0:rat][uy:urt(ksi,y0)]
-t48:=cut2(inv,ov(1rt,pl"rt"(y0,y0)),t15(y0,uy),ov(1rt,x0),t23(x0,lx),[x:rat][t:in(x,inv)][y:rat][u:less"rt"(y,x)]t33(x,t,y,u),[x:rat][t:in(x,inv)]t47(x,t)):cutprop(inv)
-lx@t49:=cutapp1b(ksi,cutprop(inv),[x:rat][t:urt(ksi,x)]t48(x,t)):cutprop(inv)
-ksi@t50:=cutapp1a(ksi,cutprop(inv),[x:rat][t:lrt(ksi,x)]t49(x,t)):cutprop(inv)
-chi:=cutof(inv,t50):cut
-[z0:rat][lz:lrt(ts(ksi,chi),z0)][x0:rat][lx:lrt(ksi,x0)][u0:rat][lu:lrt(chi,u0)][i:is"rt"(z0,ts"rt"(x0,u0))][x1:rat][ux:urt(ksi,x1)][j:is"rt"(u0,ov(1rt,x1))]
-t51:=tris(rat,z0,ts"rt"(x0,u0),ts"rt"(x0,ov(1rt,x1)),i,ists2"rt"(u0,ov(1rt,x1),x0,j)):is"rt"(z0,ts"rt"(x0,ov(1rt,x1)))
-t52:=cutapp2a(ksi,x0,lx,x1,ux):less"rt"(x0,x1)
-t53:=isless12"rt"(ts"rt"(x0,ov(1rt,x1)),z0,ts"rt"(x1,ov(1rt,x1)),1rt,symis(rat,z0,ts"rt"(x0,ov(1rt,x1)),t51),satz110c(1rt,x1),satz105c(x0,x1,ov(1rt,x1),t52)):less"rt"(z0,1rt)
-t54:=lrtrpofrt(1rt,z0,t53):lrt(1rp,z0)
-i@r1:=ini(inv,t50,u0,lu):in(u0,inv)
-r2:=invapp(u0,r1,lrt(1rp,z0),[x:rat][t:urt(ksi,x)][y:rat][u:urt(ksi,y)][v:less"rt"(y,x)][w:is"rt"(u0,ov(1rt,x))]t54(x,t,w)):lrt(1rp,z0)
-lz@r3:=tsapp(ksi,chi,z0,lz,lrt(1rp,z0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(chi,y)][v:is"rt"(z0,ts"rt"(x,y))]r2(x,t,y,u,v)):lrt(1rp,z0)
-ksi@[u0:rat][lu:lrt(1rp,u0)]
-t55:=lrtrpofrte(1rt,u0,lu):less"rt"(u0,1rt)
-t56:=satz83(u0,1rt,t55):more"rt"(1rt,u0)
-[x0:rat][lx:lrt(ksi,x0)][x1:rat][lx1:lrt(ksi,x1)][x2:rat][ux2:urt(ksi,x2)]
-t57:=cutapp2b(x1,lx1,x2,ux2):more"rt"(x2,x1)
-[i:is"rt"(mn"rt"(x2,x1,t57),ts"rt"(mn"rt"(1rt,u0,t56),x0))]
-t58:=cutapp2a(x0,lx,x2,ux2):less"rt"(x0,x2)
-t59:=satz105f(x0,x2,mn"rt"(1rt,u0,t56),t58):less"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x0),ts"rt"(mn"rt"(1rt,u0,t56),x2))
-t60:=isless1"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x0),mn"rt"(x2,x1,t57),ts"rt"(mn"rt"(1rt,u0,t56),x2),symis(rat,mn"rt"(x2,x1,t57),ts"rt"(mn"rt"(1rt,u0,t56),x0),i),t59):less"rt"(mn"rt"(x2,x1,t57),ts"rt"(mn"rt"(1rt,u0,t56),x2))
-t61:=tr4is(rat,pl"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x2),ts"rt"(u0,x2)),ts"rt"(pl"rt"(mn"rt"(1rt,u0,t56),u0),x2),ts"rt"(1rt,x2),x2,pl"rt"(mn"rt"(x2,x1,t57),x1),distpt1"rt"(mn"rt"(1rt,u0,t56),u0,x2),ists1"rt"(pl"rt"(mn"rt"(1rt,u0,t56),u0),1rt,x2,satz101e(1rt,u0,t56)),example1c(x2),satz101f(x2,x1,t57)):is"rt"(pl"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x2),ts"rt"(u0,x2)),pl"rt"(mn"rt"(x2,x1,t57),x1))
-t62:=satz96c(mn"rt"(x2,x1,t57),ts"rt"(mn"rt"(1rt,u0,t56),x2),ts"rt"(u0,x2),t60):less"rt"(pl"rt"(mn"rt"(x2,x1,t57),ts"rt"(u0,x2)),pl"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x2),ts"rt"(u0,x2)))
-t63:=isless2"rt"(pl"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x2),ts"rt"(u0,x2)),pl"rt"(mn"rt"(x2,x1,t57),x1),pl"rt"(mn"rt"(x2,x1,t57),ts"rt"(u0,x2)),t61,t62):less"rt"(pl"rt"(mn"rt"(x2,x1,t57),ts"rt"(u0,x2)),pl"rt"(mn"rt"(x2,x1,t57),x1))
-t64:=isless12"rt"(pl"rt"(mn"rt"(x2,x1,t57),ts"rt"(u0,x2)),pl"rt"(ts"rt"(u0,x2),mn"rt"(x2,x1,t57)),pl"rt"(mn"rt"(x2,x1,t57),x1),pl"rt"(x1,mn"rt"(x2,x1,t57)),compl"rt"(mn"rt"(x2,x1,t57),ts"rt"(u0,x2)),compl"rt"(mn"rt"(x2,x1,t57),x1),t63):less"rt"(pl"rt"(ts"rt"(u0,x2),mn"rt"(x2,x1,t57)),pl"rt"(x1,mn"rt"(x2,x1,t57)))
-t65:=satz97c(ts"rt"(u0,x2),x1,mn"rt"(x2,x1,t57),t64):less"rt"(ts"rt"(u0,x2),x1)
-t66:=tr3is(rat,ts"rt"(ov(1rt,u0),ts"rt"(u0,x2)),ts"rt"(ts"rt"(ov(1rt,u0),u0),x2),ts"rt"(1rt,x2),x2,assts2"rt"(ov(1rt,u0),u0,x2),ists1"rt"(ts"rt"(ov(1rt,u0),u0),1rt,x2,satz110e(1rt,u0)),example1c(x2)):is"rt"(ts"rt"(ov(1rt,u0),ts"rt"(u0,x2)),x2)
-t67:=isless12"rt"(ts"rt"(ov(1rt,u0),ts"rt"(u0,x2)),x2,ts"rt"(ov(1rt,u0),x1),ov(x1,u0),t66,satz141b(x1,u0),satz105f(ts"rt"(u0,x2),x1,ov(1rt,u0),t65)):less"rt"(x2,ov(x1,u0))
-t68:=satz119a(x2,ux2,ov(x1,u0),t67):urt(ksi,ov(x1,u0))
-t69:=satz110e(x1,u0):is"rt"(ts"rt"(ov(x1,u0),u0),x1)
-t70:=tr3is(rat,u0,ov(x1,ov(x1,u0)),ts"rt"(ov(1rt,ov(x1,u0)),x1),ts"rt"(x1,ov(1rt,ov(x1,u0))),satz110g(x1,ov(x1,u0),u0,t69),satz141c(x1,ov(x1,u0)),comts"rt"(ov(1rt,ov(x1,u0)),x1)):is"rt"(u0,ts"rt"(x1,ov(1rt,ov(x1,u0))))
-t71:=inv1(ov(1rt,ov(x1,u0)),ov(x1,u0),t68,x2,ux2,t67,refis(rat,ov(1rt,ov(x1,u0)))):in(ov(1rt,ov(x1,u0)),inv)
-t72:=ine(inv,t50,ov(1rt,ov(x1,u0)),t71):lrt(chi,ov(1rt,ov(x1,u0)))
-t73:=lrtts(ksi,chi,u0,x1,lx1,ov(1rt,ov(x1,u0)),t72,t70):lrt(ts(ksi,chi),u0)
-lx@t74:=satz132app(ksi,lrt(ts(ksi,chi),u0),ts"rt"(mn"rt"(1rt,u0,t56),x0),[x:rat][t:lrt(ksi,x)][y:rat][u:urt(ksi,y)][v:is"rt"(mn"rt"(y,x,cutapp2b(x,t,y,u)),ts"rt"(mn"rt"(1rt,u0,t56),x0))]t73(x,t,y,u,v)):lrt(ts(ksi,chi),u0)
-lu@t75:=cutapp1a(ksi,lrt(ts(ksi,chi),u0),[x:rat][t:lrt(ksi,x)]t74(x,t)):lrt(ts(ksi,chi),u0)
-ksi@t76:=isi1(ts(ksi,chi),1rp,[x:rat][t:lrt(ts(ksi,chi),x)]r3(x,t),[x:rat][t:lrt(1rp,x)]t75(x,t)):is(ts(ksi,chi),1rp)
--4152
-satz152:=somei(cut,[t:cut]is(ts(ksi,t),1rp),chi".4152",t76".4152"):some([c:cut]is(ts(ksi,c),1rp))
-eta@[phi:cut][psi:cut]
-+4153
-[m:more(phi,psi)]
-t1:=satz145d(phi,psi,eta,m):more(ts(eta,phi),ts(eta,psi))
-t2:=ec3e21(is(ts(eta,phi),ts(eta,psi)),more(ts(eta,phi),ts(eta,psi)),less(ts(eta,phi),ts(eta,psi)),satz123b(ts(eta,phi),ts(eta,psi)),t1):nis(ts(eta,phi),ts(eta,psi))
-psi@[l:less(phi,psi)]
-t3:=satz145f(phi,psi,eta,l):less(ts(eta,phi),ts(eta,psi))
-t4:=ec3e31(is(ts(eta,phi),ts(eta,psi)),more(ts(eta,phi),ts(eta,psi)),less(ts(eta,phi),ts(eta,psi)),satz123b(ts(eta,phi),ts(eta,psi)),t3):nis(ts(eta,phi),ts(eta,psi))
-psi@[n:nis(phi,psi)]
-t5:=th1"l.or3"(is(phi,psi),more(phi,psi),less(phi,psi),satz123a(phi,psi),n):or(more(phi,psi),less(phi,psi))
-t6:=orapp(more(phi,psi),less(phi,psi),nis(ts(eta,phi),ts(eta,psi)),t5,[t:more(phi,psi)]t2(t),[t:less(phi,psi)]t4(t)):nis(ts(eta,phi),ts(eta,psi))
--4153
-[i:is(ts(eta,phi),ksi)][j:is(ts(eta,psi),ksi)]
-satz153b:=th7"l.imp"(is(phi,psi),nis(ts(eta,phi),ts(eta,psi)),weli(is(ts(eta,phi),ts(eta,psi)),tris2(cut,ts(eta,phi),ts(eta,psi),ksi,i,j)),[t:nis(phi,psi)]t6".4153"(t)):is(phi,psi)
-+*4153
-eta@[tau:cut][i:is(ts(eta,tau),1rp)]
-chi:=ts(tau,ksi):cut
-t7:=tr3is(cut,ts(eta,chi),ts(ts(eta,tau),ksi),ts(1rp,ksi),ksi,assts2(eta,tau,ksi),ists1(ts(eta,tau),1rp,ksi,i),satz151b(ksi)):is(ts(eta,chi),ksi)
-t8:=somei(cut,[c:cut]is(ts(eta,c),ksi),chi,t7):some([c:cut]is(ts(eta,c),ksi))
--4153
-eta@satz153a:=someapp(cut,[c:cut]is(ts(eta,c),1rp),satz152(eta),some([c:cut]is(ts(eta,c),ksi)),[c:cut][t:is(ts(eta,c),1rp)]t8".4153"(c,t)):some([c:cut]is(ts(eta,c),ksi))
-+*4153
-eta@t9:=[c:cut][d:cut][t:is(ts(eta,c),ksi)][u:is(ts(eta,d),ksi)]satz153b(c,d,t,u):amone(cut,[c:cut]is(ts(eta,c),ksi))
--4153
-eta@satz153:=onei(cut,[c:cut]is(ts(eta,c),ksi),t9".4153",satz153a):one([c:cut]is(ts(eta,c),ksi))
-ov:=ind(cut,[a:cut]is(ts(eta,a),ksi),satz153):cut
-satz153c:=oneax(cut,[a:cut]is(ts(eta,a),ksi),satz153):is(ts(eta,ov(ksi,eta)),ksi)
-satz153d:=symis(cut,ts(eta,ov(ksi,eta)),ksi,satz153c):is(ksi,ts(eta,ov(ksi,eta)))
-satz153e:=tris(cut,ts(ov(ksi,eta),eta),ts(eta,ov(ksi,eta)),ksi,comts(ov(ksi,eta),eta),satz153c):is(ts(ov(ksi,eta),eta),ksi)
-satz153f:=symis(cut,ts(ov(ksi,eta),eta),ksi,satz153e):is(ksi,ts(ov(ksi,eta),eta))
-[phi:cut][i:is(ts(eta,phi),ksi)]
-satz153g:=satz153b(phi,ov(ksi,eta),i,satz153c):is(phi,ov(ksi,eta))
-@[ksi:cut]
-ratrp:=image(rat,cut,[x:rat]rpofrt(x),ksi):'prop'
-@[x0:rat]
-ratrpi:=imagei(rat,cut,[x:rat]rpofrt(x),x0):ratrp(rpofrt(x0))
-@[x:nat]
-rpofnt:=rpofrt(rtofn(x)):cut
-ksi@natrp:=image(nat,cut,[x:nat]rpofnt(x),ksi):'prop'
-x@natrpi:=imagei(nat,cut,[y:nat]rpofnt(y),x):natrp(rpofnt(x))
-ksi@[n:natrp(ksi)]
-+iii5
-[x:nat][i:is(ksi,rpofnt(x))]
-t1:=somei(rat,[y:rat]is(ksi,rpofrt(y)),rtofn(x),i):ratrp(ksi)
--iii5
-lemmaiii5:=someapp(nat,[x:nat]is(ksi,rpofnt(x)),n,ratrp(ksi),[x:nat][t:is(ksi,rpofnt(x))]t1".iii5"(x,t)):ratrp(ksi)
-@[x0:rat][y0:rat][m:more"rt"(x0,y0)]
-+5154
-t1:=lrtrpofrt(x0,y0,satz82(x0,y0,m)):lrt(rpofrt(x0),y0)
-t2:=urtrpofrt(y0,y0,moreisi2"rt"(y0,y0,refis(rat,y0))):urt(rpofrt(y0),y0)
-t3:=andi(lrt(rpofrt(x0),y0),urt(rpofrt(y0),y0),t1,t2):and(lrt(rpofrt(x0),y0),urt(rpofrt(y0),y0))
--5154
-satz154a:=somei(rat,[x:rat]and(lrt(rpofrt(x0),x),urt(rpofrt(y0),x)),y0,t3".5154"):more(rpofrt(x0),rpofrt(y0))
-y0@[i:is"rt"(x0,y0)]
-satz154b:=isf(rat,cut,[x:rat]rpofrt(x),x0,y0,i):is(rpofrt(x0),rpofrt(y0))
-y0@[l:less"rt"(x0,y0)]
-satz154c:=satz121(rpofrt(y0),rpofrt(x0),satz154a(y0,x0,satz83(x0,y0,l))):less(rpofrt(x0),rpofrt(y0))
-+*5154
-y0@t4:=satz81a(x0,y0):or3(is"rt"(x0,y0),more"rt"(x0,y0),less"rt"(x0,y0))
-t5:=satz123b(rpofrt(x0),rpofrt(y0)):ec3(is(rpofrt(x0),rpofrt(y0)),more(rpofrt(x0),rpofrt(y0)),less(rpofrt(x0),rpofrt(y0)))
--5154
-y0@[m:more(rpofrt(x0),rpofrt(y0))]
-satz154d:=th11"l.ec3"(is"rt"(x0,y0),more"rt"(x0,y0),less"rt"(x0,y0),is(rpofrt(x0),rpofrt(y0)),more(rpofrt(x0),rpofrt(y0)),less(rpofrt(x0),rpofrt(y0)),t4".5154",t5".5154",[u:is"rt"(x0,y0)]satz154b(u),[u:more"rt"(x0,y0)]satz154a(u),[u:less"rt"(x0,y0)]satz154c(u),m):more"rt"(x0,y0)
-y0@[i:is(rpofrt(x0),rpofrt(y0))]
-satz154e:=th10"l.ec3"(is"rt"(x0,y0),more"rt"(x0,y0),less"rt"(x0,y0),is(rpofrt(x0),rpofrt(y0)),more(rpofrt(x0),rpofrt(y0)),less(rpofrt(x0),rpofrt(y0)),t4".5154",t5".5154",[u:is"rt"(x0,y0)]satz154b(u),[u:more"rt"(x0,y0)]satz154a(u),[u:less"rt"(x0,y0)]satz154c(u),i):is"rt"(x0,y0)
-y0@[l:less(rpofrt(x0),rpofrt(y0))]
-satz154f:=th12"l.ec3"(is"rt"(x0,y0),more"rt"(x0,y0),less"rt"(x0,y0),is(rpofrt(x0),rpofrt(y0)),more(rpofrt(x0),rpofrt(y0)),less(rpofrt(x0),rpofrt(y0)),t4".5154",t5".5154",[u:is"rt"(x0,y0)]satz154b(u),[u:more"rt"(x0,y0)]satz154a(u),[u:less"rt"(x0,y0)]satz154c(u),l):less"rt"(x0,y0)
-+*iii5
-@t2:=[x:rat][y:rat][t:is(rpofrt(x),rpofrt(y))]satz154e(x,y,t):injective(rat,cut,[x:rat]rpofrt(x))
--iii5
-y0@[i:is"rt"(x0,y0)]
-isrterp:=satz154b(x0,y0,i):is(rpofrt(x0),rpofrt(y0))
-y0@[i:is(rpofrt(x0),rpofrt(y0))]
-isrtirp:=satz154e(x0,y0,i):is"rt"(x0,y0)
-ksi@[rtksi:ratrp(ksi)]
-rtofrp:=soft(rat,cut,[x:rat]rpofrt(x),t2".iii5",ksi,rtksi):rat
-[eta:cut][rteta:ratrp(eta)][i:is(ksi,eta)]
-isrpert:=isinv(rat,cut,[x:rat]rpofrt(x),t2".iii5",ksi,rtksi,eta,rteta,i):is"rt"(rtofrp(ksi,rtksi),rtofrp(eta,rteta))
-rteta@[i:is"rt"(rtofrp(ksi,rtksi),rtofrp(eta,rteta))]
-isrpirt:=isinve(rat,cut,[x:rat]rpofrt(x),t2".iii5",ksi,rtksi,eta,rteta,i):is(ksi,eta)
-x0@isrtrp1:=isst1(rat,cut,[x:rat]rpofrt(x),t2".iii5",x0):is"rt"(x0,rtofrp(rpofrt(x0),ratrpi(x0)))
-isrtrp2:=isst2(rat,cut,[x:rat]rpofrt(x),t2".iii5",x0):is"rt"(rtofrp(rpofrt(x0),ratrpi(x0)),x0)
-rtksi@isrprt1:=ists1"e"(rat,cut,[x:rat]rpofrt(x),t2".iii5",ksi,rtksi):is(ksi,rpofrt(rtofrp(ksi,rtksi)))
-isrprt2:=ists2"e"(rat,cut,[x:rat]rpofrt(x),t2".iii5",ksi,rtksi):is(rpofrt(rtofrp(ksi,rtksi)),ksi)
-@[x:nat][y:nat][i:is"n"(x,y)]
-isnterp:=isf(nat,cut,[z:nat]rpofnt(z),x,y,i):is(rpofnt(x),rpofnt(y))
-y@[i:is(rpofnt(x),rpofnt(y))]
-isntirp:=isnirt(x,y,isrtirp(rtofn(x),rtofn(y),i)):is"n"(x,y)
-+*iii5
-@t3:=[x:nat][y:nat][t:is(rpofnt(x),rpofnt(y))]isntirp(x,y,t):injective(nat,cut,[x:nat]rpofnt(x))
--iii5
-ksi@[ntksi:natrp(ksi)]
-ntofrp:=soft(nat,cut,[x:nat]rpofnt(x),t3".iii5",ksi,ntksi):nat
-[eta:cut][nteta:natrp(eta)][i:is(ksi,eta)]
-isrpent:=isinv(nat,cut,[x:nat]rpofnt(x),t3".iii5",ksi,ntksi,eta,nteta,i):is"n"(ntofrp(ksi,ntksi),ntofrp(eta,nteta))
-nteta@[i:is"n"(ntofrp(ksi,ntksi),ntofrp(eta,nteta))]
-isrpint:=isinve(nat,cut,[x:nat]rpofnt(x),t3".iii5",ksi,ntksi,eta,nteta,i):is(ksi,eta)
-x@isntrp1:=isst1(nat,cut,[y:nat]rpofnt(y),t3".iii5",x):is"n"(x,ntofrp(rpofnt(x),natrpi(x)))
-isntrp2:=isst2(nat,cut,[y:nat]rpofnt(y),t3".iii5",x):is"n"(ntofrp(rpofnt(x),natrpi(x)),x)
-ntksi@isrpnt1:=ists1"e"(nat,cut,[x:nat]rpofnt(x),t3".iii5",ksi,ntksi):is(ksi,rpofnt(ntofrp(ksi,ntksi)))
-isrpnt2:=ists2"e"(nat,cut,[x:nat]rpofnt(x),t3".iii5",ksi,ntksi):is(rpofnt(ntofrp(ksi,ntksi)),ksi)
-@[x0:rat][y0:rat]
-+5155
-[z0:rat][lz:lrt(pl(rpofrt(x0),rpofrt(y0)),z0)][u0:rat][lu:lrt(rpofrt(x0),u0)][v0:rat][lv:lrt(rpofrt(y0),v0)][i:is"rt"(z0,pl"rt"(u0,v0))]
-t1:=lrtrpofrte(x0,u0,lu):less"rt"(u0,x0)
-t2:=lrtrpofrte(y0,v0,lv):less"rt"(v0,y0)
-t3:=satz98a(u0,x0,v0,y0,t1,t2):less"rt"(pl"rt"(u0,v0),pl"rt"(x0,y0))
-t4:=isless1"rt"(pl"rt"(u0,v0),z0,pl"rt"(x0,y0),symis(rat,z0,pl"rt"(u0,v0),i),t3):less"rt"(z0,pl"rt"(x0,y0))
-t5:=lrtrpofrt(pl"rt"(x0,y0),z0,t4):lrt(rpofrt(pl"rt"(x0,y0)),z0)
-lz@t6:=plapp(rpofrt(x0),rpofrt(y0),z0,lz,lrt(rpofrt(pl"rt"(x0,y0)),z0),[x:rat][t:lrt(rpofrt(x0),x)][y:rat][u:lrt(rpofrt(y0),y)][v:is"rt"(z0,pl"rt"(x,y))]t5(x,t,y,u,v)):lrt(rpofrt(pl"rt"(x0,y0)),z0)
-y0@[u0:rat][lu:lrt(rpofrt(pl"rt"(x0,y0)),u0)]
-t7:=lrtrpofrte(pl"rt"(x0,y0),u0,lu):less"rt"(u0,pl"rt"(x0,y0))
-u01:=ov"rt"(u0,pl"rt"(x0,y0)):rat
-t8:=isless12"rt"(u0,ts"rt"(u01,pl"rt"(x0,y0)),pl"rt"(x0,y0),ts"rt"(1rt,pl"rt"(x0,y0)),satz110f(u0,pl"rt"(x0,y0)),example1d(pl"rt"(x0,y0)),t7):less"rt"(ts"rt"(u01,pl"rt"(x0,y0)),ts"rt"(1rt,pl"rt"(x0,y0)))
-t9:=satz106c(u01,1rt,pl"rt"(x0,y0),t8):less"rt"(u01,1rt)
-t10:=tris(rat,u0,ts"rt"(pl"rt"(x0,y0),u01),pl"rt"(ts"rt"(x0,u01),ts"rt"(y0,u01)),satz110d(u0,pl"rt"(x0,y0)),disttp1"rt"(x0,y0,u01)):is"rt"(u0,pl"rt"(ts"rt"(x0,u01),ts"rt"(y0,u01)))
-y0@[l:less"rt"(y0,1rt)]
-t11:=isless12"rt"(ts"rt"(y0,x0),ts"rt"(x0,y0),ts"rt"(1rt,x0),x0,comts"rt"(y0,x0),example1c(x0),satz105c(y0,1rt,x0,l)):less"rt"(ts"rt"(x0,y0),x0)
-t12:=lrtrpofrt(x0,ts"rt"(x0,y0),t11):lrt(rpofrt(x0),ts"rt"(x0,y0))
-lu@t13:=lrtpl(rpofrt(x0),rpofrt(y0),u0,ts"rt"(x0,u01),t12(x0,u01,t9),ts"rt"(y0,u01),t12(y0,u01,t9),t10):lrt(pl(rpofrt(x0),rpofrt(y0)),u0)
--5155
-satz155a:=isi1(rpofrt(pl"rt"(x0,y0)),pl(rpofrt(x0),rpofrt(y0)),[x:rat][t:lrt(rpofrt(pl"rt"(x0,y0)),x)]t13".5155"(x,t),[x:rat][t:lrt(pl(rpofrt(x0),rpofrt(y0)),x)]t6".5155"(x,t)):is(rpofrt(pl"rt"(x0,y0)),pl(rpofrt(x0),rpofrt(y0)))
-[m:more"rt"(x0,y0)]
-+*5155
-m@t14:=satz101f(x0,y0,m):is"rt"(x0,pl"rt"(mn"rt"(x0,y0,m),y0))
-t15:=tris(cut,rpofrt(x0),rpofrt(pl"rt"(mn"rt"(x0,y0,m),y0)),pl(rpofrt(mn"rt"(x0,y0,m)),rpofrt(y0)),isrterp(x0,pl"rt"(mn"rt"(x0,y0,m),y0),t14),satz155a(mn"rt"(x0,y0,m),y0)):is(rpofrt(x0),pl(rpofrt(mn"rt"(x0,y0,m)),rpofrt(y0)))
-t16:=tris2(cut,pl(rpofrt(y0),rpofrt(mn"rt"(x0,y0,m))),rpofrt(x0),pl(rpofrt(mn"rt"(x0,y0,m)),rpofrt(y0)),compl(rpofrt(y0),rpofrt(mn"rt"(x0,y0,m))),t15):is(pl(rpofrt(y0),rpofrt(mn"rt"(x0,y0,m))),rpofrt(x0))
--5155
-m@satz155b:=satz140g(rpofrt(x0),rpofrt(y0),rpofrt(mn"rt"(x0,y0,m)),satz154a(x0,y0,m),t16".5155"):is(rpofrt(mn"rt"(x0,y0,m)),mn(rpofrt(x0),rpofrt(y0),satz154a(x0,y0,m)))
-+*5155
-y0@[z0:rat][lz:lrt(ts(rpofrt(x0),rpofrt(y0)),z0)][u0:rat][lu:lrt(rpofrt(x0),u0)][v0:rat][lv:lrt(rpofrt(y0),v0)][i:is"rt"(z0,ts"rt"(u0,v0))]
-t17:=lrtrpofrte(x0,u0,lu):less"rt"(u0,x0)
-t18:=lrtrpofrte(y0,v0,lv):less"rt"(v0,y0)
-t19:=satz107a(u0,x0,v0,y0,t17,t18):less"rt"(ts"rt"(u0,v0),ts"rt"(x0,y0))
-t20:=isless1"rt"(ts"rt"(u0,v0),z0,ts"rt"(x0,y0),symis(rat,z0,ts"rt"(u0,v0),i),t19):less"rt"(z0,ts"rt"(x0,y0))
-t21:=lrtrpofrt(ts"rt"(x0,y0),z0,t20):lrt(rpofrt(ts"rt"(x0,y0)),z0)
-lz@t22:=tsapp(rpofrt(x0),rpofrt(y0),z0,lz,lrt(rpofrt(ts"rt"(x0,y0)),z0),[x:rat][t:lrt(rpofrt(x0),x)][y:rat][u:lrt(rpofrt(y0),y)][v:is"rt"(z0,ts"rt"(x,y))]t21(x,t,y,u,v)):lrt(rpofrt(ts"rt"(x0,y0)),z0)
-y0@[u0:rat][lu:lrt(rpofrt(ts"rt"(x0,y0)),u0)]
-t23:=lrtrpofrte(ts"rt"(x0,y0),u0,lu):less"rt"(u0,ts"rt"(x0,y0))
-[u1:rat][a:and(less"rt"(u0,u1),less"rt"(u1,ts"rt"(x0,y0)))]
-t24:=ande1(less"rt"(u0,u1),less"rt"(u1,ts"rt"(x0,y0)),a):less"rt"(u0,u1)
-t25:=ande2(less"rt"(u0,u1),less"rt"(u1,ts"rt"(x0,y0)),a):less"rt"(u1,ts"rt"(x0,y0))
-t26:=isless12"rt"(u0,ts"rt"(ov"rt"(u0,u1),u1),u1,ts"rt"(1rt,u1),satz110f(u0,u1),example1d(u1),t24):less"rt"(ts"rt"(ov"rt"(u0,u1),u1),ts"rt"(1rt,u1))
-t27:=satz106c(ov"rt"(u0,u1),1rt,u1,t26):less"rt"(ov"rt"(u0,u1),1rt)
-t28:=isless1"rt"(u1,ts"rt"(ov"rt"(u1,y0),y0),ts"rt"(x0,y0),satz110f(u1,y0),t25):less"rt"(ts"rt"(ov"rt"(u1,y0),y0),ts"rt"(x0,y0))
-t29:=satz106c(ov"rt"(u1,y0),x0,y0,t28):less"rt"(ov"rt"(u1,y0),x0)
-t30:=tr3is(rat,u0,ts"rt"(u1,ov"rt"(u0,u1)),ts"rt"(ts"rt"(ov"rt"(u1,y0),y0),ov"rt"(u0,u1)),ts"rt"(ov"rt"(u1,y0),ts"rt"(y0,ov"rt"(u0,u1))),satz110d(u0,u1),ists1"rt"(u1,ts"rt"(ov"rt"(u1,y0),y0),ov"rt"(u0,u1),satz110f(u1,y0)),assts1"rt"(ov"rt"(u1,y0),y0,ov"rt"(u0,u1))):is"rt"(u0,ts"rt"(ov"rt"(u1,y0),ts"rt"(y0,ov"rt"(u0,u1))))
-t31:=lrtts(rpofrt(x0),rpofrt(y0),u0,ov"rt"(u1,y0),lrtrpofrt(x0,ov"rt"(u1,y0),t29),ts"rt"(y0,ov"rt"(u0,u1)),t12(y0,ov"rt"(u0,u1),t27),t30):lrt(ts(rpofrt(x0),rpofrt(y0)),u0)
-lu@t32:=someapp(rat,[x:rat]and(less"rt"(u0,x),less"rt"(x,ts"rt"(x0,y0))),satz91(u0,ts"rt"(x0,y0),t23),lrt(ts(rpofrt(x0),rpofrt(y0)),u0),[x:rat][t:and(less"rt"(u0,x),less"rt"(x,ts"rt"(x0,y0)))]t31(x,t)):lrt(ts(rpofrt(x0),rpofrt(y0)),u0)
--5155
-y0@satz155c:=isi1(rpofrt(ts"rt"(x0,y0)),ts(rpofrt(x0),rpofrt(y0)),[x:rat][t:lrt(rpofrt(ts"rt"(x0,y0)),x)]t32".5155"(x,t),[x:rat][t:lrt(ts(rpofrt(x0),rpofrt(y0)),x)]t22".5155"(x,t)):is(rpofrt(ts"rt"(x0,y0)),ts(rpofrt(x0),rpofrt(y0)))
-+*5155
-y0@t33:=satz110f(x0,y0):is"rt"(x0,ts"rt"(ov"rt"(x0,y0),y0))
-t34:=tris(cut,rpofrt(x0),rpofrt(ts"rt"(ov"rt"(x0,y0),y0)),ts(rpofrt(ov"rt"(x0,y0)),rpofrt(y0)),isrterp(x0,ts"rt"(ov"rt"(x0,y0),y0),t33),satz155c(ov"rt"(x0,y0),y0)):is(rpofrt(x0),ts(rpofrt(ov"rt"(x0,y0)),rpofrt(y0)))
-t35:=tris2(cut,ts(rpofrt(y0),rpofrt(ov"rt"(x0,y0))),rpofrt(x0),ts(rpofrt(ov"rt"(x0,y0)),rpofrt(y0)),comts(rpofrt(y0),rpofrt(ov"rt"(x0,y0))),t34):is(ts(rpofrt(y0),rpofrt(ov"rt"(x0,y0))),rpofrt(x0))
--5155
-y0@satz155d:=satz153g(rpofrt(x0),rpofrt(y0),rpofrt(ov"rt"(x0,y0)),t35".5155"):is(rpofrt(ov"rt"(x0,y0)),ov(rpofrt(x0),rpofrt(y0)))
-@[x:nat][y:nat]
-satz155e:=tris(cut,rpofnt(pl"n"(x,y)),rpofrt(pl"rt"(rtofn(x),rtofn(y))),pl(rpofnt(x),rpofnt(y)),isrterp(rtofn(pl"n"(x,y)),pl"rt"(rtofn(x),rtofn(y)),symis(rat,pl"rt"(rtofn(x),rtofn(y)),rtofn(pl"n"(x,y)),satz112h(x,y))),satz155a(rtofn(x),rtofn(y))):is(rpofnt(pl"n"(x,y)),pl(rpofnt(x),rpofnt(y)))
-satz155f:=tris(cut,rpofnt(ts"n"(x,y)),rpofrt(ts"rt"(rtofn(x),rtofn(y))),ts(rpofnt(x),rpofnt(y)),isrterp(rtofn(ts"n"(x,y)),ts"rt"(rtofn(x),rtofn(y)),symis(rat,ts"rt"(rtofn(x),rtofn(y)),rtofn(ts"n"(x,y)),satz112j(x,y))),satz155c(rtofn(x),rtofn(y))):is(rpofnt(ts"n"(x,y)),ts(rpofnt(x),rpofnt(y)))
-+nt
-@natt:=ot(cut,[t:cut]natrp(t)):'type'
-[ksi:cut][nksi:natrp(ksi)]
-nttofrp:=out(cut,[t:cut]natrp(t),ksi,nksi):natt
-@[xt:natt][yt:natt]
-is:=is"e"(natt,xt,yt):'prop'
-nis:=not(is(xt,yt)):'prop'
-@[p:[x:natt]'prop']
-all:=all"l"(natt,p):'prop'
-some:=some"l"(natt,p):'prop'
-one:=one"e"(natt,p):'prop'
-xt@[st:set(natt)]
-in:=esti(natt,xt,st):'prop'
-xt@rpofntt:=in"e"(cut,[t:cut]natrp(t),xt):cut
-natrpi:=inp(cut,[t:cut]natrp(t),xt):natrp(rpofntt(xt))
-nksi@[eta:cut][neta:natrp(eta)][i:is"rp"(ksi,eta)]
-isrpentt:=isouti(cut,[t:cut]natrp(t),ksi,nksi,eta,neta,i):is(nttofrp(ksi,nksi),nttofrp(eta,neta))
-neta@[i:is(nttofrp(ksi,nksi),nttofrp(eta,neta))]
-isrpintt:=isoute(cut,[t:cut]natrp(t),ksi,nksi,eta,neta,i):is"rp"(ksi,eta)
-yt@[i:is(xt,yt)]
-isntterp:=isini(cut,[t:cut]natrp(t),xt,yt,i):is"rp"(rpofntt(xt),rpofntt(yt))
-yt@[i:is"rp"(rpofntt(xt),rpofntt(yt))]
-isnttirp:=isine(cut,[t:cut]natrp(t),xt,yt,i):is(xt,yt)
-nksi@isrpntt1:=isinout(cut,[t:cut]natrp(t),ksi,nksi):is"rp"(ksi,rpofntt(nttofrp(ksi,nksi)))
-xt@isnttrp1:=isoutin(cut,[t:cut]natrp(t),xt):is(xt,nttofrp(rpofntt(xt),natrpi(xt)))
-@[x:nat]
-nttofnt:=nttofrp(rpofnt(x),natrpi"rp"(x)):natt
-[y:nat][i:is"n"(x,y)]
-isntentt:=isrpentt(rpofnt(x),natrpi"rp"(x),rpofnt(y),natrpi"rp"(y),isnterp(x,y,i)):is(nttofnt(x),nttofnt(y))
-y@[i:is(nttofnt(x),nttofnt(y))]
-isntintt:=isntirp(x,y,isrpintt(rpofnt(x),natrpi"rp"(x),rpofnt(y),natrpi"rp"(y),i)):is"n"(x,y)
-xt@ntofntt:=ntofrp(rpofntt(xt),natrpi(xt)):nat
-yt@[i:is(xt,yt)]
-isnttent:=isrpent(rpofntt(xt),natrpi(xt),rpofntt(yt),natrpi(yt),isntterp(xt,yt,i)):is"n"(ntofntt(xt),ntofntt(yt))
-yt@[i:is"n"(ntofntt(xt),ntofntt(yt))]
-isnttint:=isnttirp(xt,yt,isrpint(rpofntt(xt),natrpi(xt),rpofntt(yt),natrpi(yt),i)):is(xt,yt)
-+iii5
-x@t5:=isrpntt1(rpofnt(x),natrpi"rp"(x)):is"rp"(rpofnt(x),rpofntt(nttofnt(x)))
-t6:=isrpent(rpofnt(x),natrpi"rp"(x),rpofntt(nttofnt(x)),natrpi(nttofnt(x)),t5):is"n"(ntofrp(rpofnt(x),natrpi"rp"(x)),ntofntt(nttofnt(x)))
--iii5
-x@isntntt1:=tris(nat,x,ntofrp(rpofnt(x),natrpi"rp"(x)),ntofntt(nttofnt(x)),isntrp1(x),t6".iii5"):is"n"(x,ntofntt(nttofnt(x)))
-+*iii5
-xt@t7:=isrpnt1(rpofntt(xt),natrpi(xt)):is"rp"(rpofntt(xt),rpofnt(ntofntt(xt)))
-t8:=isrpentt(rpofntt(xt),natrpi(xt),rpofnt(ntofntt(xt)),natrpi"rp"(ntofntt(xt)),t7):is(nttofrp(rpofntt(xt),natrpi(xt)),nttofnt(ntofntt(xt)))
--iii5
-xt@isnttnt1:=tris(natt,xt,nttofrp(rpofntt(xt),natrpi(xt)),nttofnt(ntofntt(xt)),isnttrp1(xt),t8".iii5"):is(xt,nttofnt(ntofntt(xt)))
-x@isntntt2:=symis(nat,x,ntofntt(nttofnt(x)),isntntt1):is"n"(ntofntt(nttofnt(x)),x)
-xt@isnttnt2:=symis(natt,xt,nttofnt(ntofntt(xt)),isnttnt1):is(nttofnt(ntofntt(xt)),xt)
-@1t:=nttofnt(1):natt
-suct:=[x:natt]nttofnt(<ntofntt(x)>suc):[x:natt]natt
-+5156
-xt@[j:is(<xt>suct,1t)]
-t1:=isntintt(<ntofntt(xt)>suc,1,j):is"n"(<ntofntt(xt)>suc,1)
--5156
-xt@satz156a:=th3"l.imp"(is(<xt>suct,1t),is"n"(<ntofntt(xt)>suc,1),<ntofntt(xt)>ax3,[t:is(<xt>suct,1t)]t1".5156"(t)):nis(<xt>suct,1t)
-yt@[i:is(<xt>suct,<yt>suct)]
-+*5156
-i@t2:=isntintt(<ntofntt(xt)>suc,<ntofntt(yt)>suc,i):is"n"(<ntofntt(xt)>suc,<ntofntt(yt)>suc)
--5156
-i@satz156b:=isnttint(xt,yt,<t2".5156"><ntofntt(yt)><ntofntt(xt)>ax4):is(xt,yt)
-@[st:set(natt)]
-cond1:=in(1t,st):'prop'
-cond2:=all([x:natt]imp(in(x,st),in(<x>suct,st))):'prop'
-[c1:cond1][c2:cond2]
-+*5156
-c2@[x:nat]
-prop1:=in(nttofnt(x),st):'prop'
-[p:prop1(x)]
-t3:=<p><nttofnt(x)>c2:in(<nttofnt(x)>suct,st)
-t4:=isp(nat,[t:nat]in(nttofnt(<t>suc),st),ntofntt(nttofnt(x)),x,t3,isntntt2(x)):prop1(<x>suc)
--5156
-c2@[xt:natt]
-+*5156
-xt@t5:=induction([t:nat]prop1(t),c1,[t:nat][u:prop1(t)]t4(t,u),ntofntt(xt)):in(nttofnt(ntofntt(xt)),st)
--5156
-xt@satz156c:=isp(natt,[t:natt]in(t,st),nttofnt(ntofntt(xt)),xt,t5".5156",isnttnt2(xt)):in(xt,st)
-@ax3t:=[x:natt]satz156a(x):[x:natt]nis(<x>suct,1t)
-ax4t:=[x:natt][y:natt][u:is(<x>suct,<y>suct)]satz156b(x,y,u):[x:natt][y:natt][u:is(<x>suct,<y>suct)]is(x,y)
-ax5t:=[s:set(natt)][u:cond1(s)][v:cond2(s)][x:natt]satz156c(s,u,v,x):[s:set(natt)][u:cond1(s)][v:cond2(s)][x:natt]in(x,s)
--nt
-+rtt
-@ratt:=ot(cut,[t:cut]ratrp(t)):'type'
-[ksi:cut][rtksi:ratrp(ksi)]
-rttofrp:=out(cut,[t:cut]ratrp(t),ksi,rtksi):ratt
-@[x0t:ratt][y0t:ratt]
-is:=is"e"(ratt,x0t,y0t):'prop'
-nis:=not(is(x0t,y0t)):'prop'
-@[p:[x:ratt]'prop']
-all:=all"l"(ratt,p):'prop'
-some:=some"l"(ratt,p):'prop'
-one:=one"e"(ratt,p):'prop'
-x0t@rpofrtt:=in"e"(cut,[t:cut]ratrp(t),x0t):cut
-ratrpi:=inp(cut,[t:cut]ratrp(t),x0t):ratrp(rpofrtt(x0t))
-rtksi@[eta:cut][rteta:ratrp(eta)][i:is"rp"(ksi,eta)]
-isrpertt:=isouti(cut,[t:cut]ratrp(t),ksi,rtksi,eta,rteta,i):is(rttofrp(ksi,rtksi),rttofrp(eta,rteta))
-rteta@[i:is(rttofrp(ksi,rtksi),rttofrp(eta,rteta))]
-isrpirtt:=isoute(cut,[t:cut]ratrp(t),ksi,rtksi,eta,rteta,i):is"rp"(ksi,eta)
-y0t@[i:is(x0t,y0t)]
-isrtterp:=isini(cut,[t:cut]ratrp(t),x0t,y0t,i):is"rp"(rpofrtt(x0t),rpofrtt(y0t))
-y0t@[i:is"rp"(rpofrtt(x0t),rpofrtt(y0t))]
-isrttirp:=isine(cut,[t:cut]ratrp(t),x0t,y0t,i):is(x0t,y0t)
-rtksi@isrprtt1:=isinout(cut,[t:cut]ratrp(t),ksi,rtksi):is"rp"(ksi,rpofrtt(rttofrp(ksi,rtksi)))
-x0t@isrttrp1:=isoutin(cut,[t:cut]ratrp(t),x0t):is(x0t,rttofrp(rpofrtt(x0t),ratrpi(x0t)))
-@[x0:rat]
-rttofrt:=rttofrp(rpofrt(x0),ratrpi"rp"(x0)):ratt
-[y0:rat][i:is"rt"(x0,y0)]
-isrtertt:=isrpertt(rpofrt(x0),ratrpi"rp"(x0),rpofrt(y0),ratrpi"rp"(y0),isrterp(x0,y0,i)):is(rttofrt(x0),rttofrt(y0))
-y0@[i:is(rttofrt(x0),rttofrt(y0))]
-isrtirtt:=isrtirp(x0,y0,isrpirtt(rpofrt(x0),ratrpi"rp"(x0),rpofrt(y0),ratrpi"rp"(y0),i)):is"rt"(x0,y0)
-x0t@rtofrtt:=rtofrp(rpofrtt(x0t),ratrpi(x0t)):rat
-y0t@[i:is(x0t,y0t)]
-isrttert:=isrpert(rpofrtt(x0t),ratrpi(x0t),rpofrtt(y0t),ratrpi(y0t),isrtterp(x0t,y0t,i)):is"rt"(rtofrtt(x0t),rtofrtt(y0t))
-y0t@[i:is"rt"(rtofrtt(x0t),rtofrtt(y0t))]
-isrttirt:=isrttirp(x0t,y0t,isrpirt(rpofrtt(x0t),ratrpi(x0t),rpofrtt(y0t),ratrpi(y0t),i)):is(x0t,y0t)
-+iii5
-x0@t9:=isrprtt1(rpofrt(x0),ratrpi"rp"(x0)):is"rp"(rpofrt(x0),rpofrtt(rttofrt(x0)))
-t10:=isrpert(rpofrt(x0),ratrpi"rp"(x0),rpofrtt(rttofrt(x0)),ratrpi(rttofrt(x0)),t9):is"rt"(rtofrp(rpofrt(x0),ratrpi"rp"(x0)),rtofrtt(rttofrt(x0)))
--iii5
-x0@isrtrtt1:=tris(rat,x0,rtofrp(rpofrt(x0),ratrpi"rp"(x0)),rtofrtt(rttofrt(x0)),isrtrp1(x0),t10".iii5"):is"rt"(x0,rtofrtt(rttofrt(x0)))
-+*iii5
-x0t@t11:=isrprt1(rpofrtt(x0t),ratrpi(x0t)):is"rp"(rpofrtt(x0t),rpofrt(rtofrtt(x0t)))
-t12:=isrpertt(rpofrtt(x0t),ratrpi(x0t),rpofrt(rtofrtt(x0t)),ratrpi"rp"(rtofrtt(x0t)),t11):is(rttofrp(rpofrtt(x0t),ratrpi(x0t)),rttofrt(rtofrtt(x0t)))
--iii5
-x0t@isrttrt1:=tris(ratt,x0t,rttofrp(rpofrtt(x0t),ratrpi(x0t)),rttofrt(rtofrtt(x0t)),isrttrp1(x0t),t12".iii5"):is(x0t,rttofrt(rtofrtt(x0t)))
--rtt
-@[ksi:cut]
-example2:=satz153c(1rp,ksi):is(ts(ksi,ov(1rp,ksi)),1rp)
-[rtksi:ratrp(ksi)]
-+5157
-x01:=rtofrp(ksi,rtksi):rat
-ksi@s1:=setof(rat,[x:rat]urt(ksi,x)):set(rat)
-rtksi@[y0:rat][i:in(y0,s1)]
-t1:=estie(rat,[x:rat]urt(ksi,x),y0,i):urt(ksi,y0)
-[m:more"rt"(x01,y0)]
-t2:=lrtrpofrt(x01,y0,satz82(x01,y0,m)):lrt(rpofrt(x01),y0)
-t3:=isp(cut,[x:cut]lrt(x,y0),rpofrt(x01),ksi,t2,isrprt2(ksi,rtksi)):lrt(ksi,y0)
-i@t4:=th3"l.imp"(more"rt"(x01,y0),lrt(ksi,y0),t1,[t:more"rt"(x01,y0)]t3(t)):not(more"rt"(x01,y0))
-t5:=satz81e(x01,y0,t4):lessis"rt"(x01,y0)
-rtksi@t6:=[x:rat][t:in(x,s1)]t5(x,t):lb(s1,x01)
-t7:=urtrpofrt(x01,x01,moreisi2"rt"(x01,x01,refis(rat,x01))):urt(rpofrt(x01),x01)
-t8:=isp(cut,[x:cut]urt(x,x01),rpofrt(x01),ksi,t7,isrprt2(ksi,rtksi)):urt(ksi,x01)
-t9:=estii(rat,[x:rat]urt(ksi,x),x01,t8):in(x01,s1)
-t10:=andi(lb(s1,x01),in(x01,s1),t6,t9):min(s1,x01)
--5157
-satz157a:=t10".5157":min(setof(rat,[x:rat]urt(ksi,x)),rtofrp(ksi,rtksi))
-satz157b:=somei(rat,[x:rat]min(s1".5157",x),x01".5157",t10".5157"):some"rt"([x:rat]min(setof(rat,[y:rat]urt(ksi,y)),x))
-ksi@[x0:rat][m:min(setof(rat,[x:rat]urt(ksi,x)),x0)]
-+*5157
-m"rp"@t11:=ande1(lb(s1,x0),in(x0,s1),m):lb(s1,x0)
-t12:=ande2(lb(s1,x0),in(x0,s1),m):in(x0,s1)
-t13:=estie(rat,[x:rat]urt(ksi,x),x0,t12):urt(ksi,x0)
-[y0:rat][ly:lrt(ksi,y0)]
-t14:=cutapp2a(ksi,y0,ly,x0,t13):less"rt"(y0,x0)
-t15:=lrtrpofrt(x0,y0,t14):lrt(rpofrt(x0),y0)
-y0@[uy:urt(ksi,y0)]
-t17:=estii(rat,[x:rat]urt(ksi,x),y0,uy):in(y0,s1)
-t18:=satz85(x0,y0,<t17><y0>t11):moreis"rt"(y0,x0)
-t19:=urtrpofrt(x0,y0,t18):urt(rpofrt(x0),y0)
-y0@t20:=cp(lrt(rpofrt(x0),y0),lrt(ksi,y0),[t:urt(ksi,y0)]t19(t)):imp(lrt(rpofrt(x0),y0),lrt(ksi,y0))
--5157
-m@satz157c:=isi1(ksi,rpofrt(x0),[x:rat][t:lrt(ksi,x)]t15".5157"(x,t),[x:rat]t20".5157"(x)):is(ksi,rpofrt(x0))
-ksi@[s:some"rt"([x:rat]min(setof(rat,[y:rat]urt(ksi,y)),x))]
-+*5157
-s@[x0:rat][m:min(s1,x0)]
-t21:=somei(rat,[x:rat]is(ksi,rpofrt(x)),x0,satz157c(x0,m)):ratrp(ksi)
--5157
-s@satz157d:=someapp(rat,[x:rat]min(s1".5157",x),s,ratrp(ksi),[x:rat][t:min(s1".5157",x)]t21".5157"(x,t)):ratrp(ksi)
-ksi@[x0:rat][lx:lrt(ksi,x0)]
-+5158
-x0@xr:=rpofrt(x0):cut
-lx@t1:=urtrpofrt(x0,x0,moreisi2"rt"(x0,x0,refis(rat,x0))):urt(xr,x0)
-t2:=andi(urt(xr,x0),lrt(ksi,x0),t1,lx):and(urt(xr,x0),lrt(ksi,x0))
--5158
-satz158a:=somei(rat,[x:rat]and(urt(rpofrt(x0),x),lrt(ksi,x)),x0,t2".5158"):less(rpofrt(x0),ksi)
-x0@[ux:urt(ksi,x0)]
-+*5158
-ux@s1:=setof(rat,[x:rat]urt(ksi,x)):set(rat)
-[m:min(s1,x0)]
-t3:=symis(cut,ksi,xr,satz157c(ksi,x0,m)):is(xr,ksi)
-t4:=moreisi2(xr,ksi,t3):moreis(xr,ksi)
-ux@[n:not(min(s1,x0))]
-t5:=estii(rat,[x:rat]urt(ksi,x),x0,ux):in(x0,s1)
-t6:=th4"l.and"(lb(s1,x0),in(x0,s1),n,t5):not(lb(s1,x0))
-t7:=th1"l.some"(rat,[x:rat]imp(in(x,s1),lessis"rt"(x0,x)),t6):some"rt"([x:rat]not(imp(in(x,s1),lessis"rt"(x0,x))))
-[y0:rat][o:not(imp(in(y0,s1),lessis"rt"(x0,y0)))]
-t8:=th5"l.imp"(in(y0,s1),lessis"rt"(x0,y0),o):in(y0,s1)
-t9:=estie(rat,[x:rat]urt(ksi,x),y0,t8):urt(ksi,y0)
-t10:=th6"l.imp"(in(y0,s1),lessis"rt"(x0,y0),o):not(lessis"rt"(x0,y0))
-t11:=satz82(x0,y0,satz81k(x0,y0,t10)):less"rt"(y0,x0)
-t12:=lrtrpofrt(x0,y0,t11):lrt(xr,y0)
-t13:=andi(lrt(xr,y0),urt(ksi,y0),t12,t9):and(lrt(xr,y0),urt(ksi,y0))
-t14:=somei(rat,[x:rat]and(lrt(xr,x),urt(ksi,x)),y0,t13):more(xr,ksi)
-n@t15:=someapp(rat,[x:rat]not(imp(in(x,s1),lessis"rt"(x0,x))),t7,more(xr,ksi),[x:rat][t:not(imp(in(x,s1),lessis"rt"(x0,x)))]t14(x,t)):more(xr,ksi)
-t16:=moreisi1(xr,ksi,t15):moreis(xr,ksi)
--5158
-ux@satz158b:=th1"l.imp"(min(s1".5158",x0),moreis(rpofrt(x0),ksi),[t:min(s1".5158",x0)]t4".5158"(t),[t:not(min(s1".5158",x0))]t16".5158"(t)):moreis(rpofrt(x0),ksi)
-x0@[l:less(rpofrt(x0),ksi)]
-+*5158
-l@t17:=satz123h(xr,ksi,l):not(moreis(xr,ksi))
-t18:=th3"l.imp"(urt(ksi,x0),moreis(xr,ksi),t17,[t:urt(ksi,x0)]satz158b(t)):not(urt(ksi,x0))
--5158
-l@satz158c:=et(lrt(ksi,x0),t18".5158"):lrt(ksi,x0)
-x0@[m:moreis(rpofrt(x0),ksi)]
-+*5158
-m"rp"@t19:=satz123c(xr,ksi,m):not(less(xr,ksi))
--5158
-m@satz158d:=th3"l.imp"(lrt(ksi,x0),less(rpofrt(x0),ksi),t19".5158",[t:lrt(ksi,x0)]satz158a(t)):urt(ksi,x0)
-ksi@[eta:cut][l:less(ksi,eta)]
-+5159
-[x0:rat]
-xr:=rpofrt(x0):cut
-[ux:urt(ksi,x0)][lx:lrt(eta,x0)][z0:rat]
-zr:=rpofrt(z0):cut
-[lz:lrt(eta,z0)][k:less"rt"(x0,z0)]
-t1:=satz127a(ksi,xr,zr,satz124(xr,ksi,satz158b(ksi,x0,ux)),satz154c(x0,z0,k)):less(ksi,zr)
-t2:=andi(less(ksi,zr),less(zr,eta),t1,satz158a(eta,z0,lz)):and(less(ksi,zr),less(zr,eta))
-t3:=somei(rat,[x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)),z0,t2):some"rt"([x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)))
-lx@t4:=cutapp3(eta,x0,lx,some"rt"([x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta))),[x:rat][t:lrt(eta,x)][u:less"rt"(x0,x)]t3(x,t,u)):some"rt"([x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)))
--5159
-satz159:=lessapp(ksi,eta,l,some"rt"([x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta))),[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]t4".5159"(x,t,u)):some"rt"([x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)))
-+*5159
-x0@[a:and(less(ksi,xr),less(xr,eta))]
-t5:=andi(ratrp(xr),and(less(ksi,xr),less(xr,eta)),ratrpi(x0),a):and3(ratrp(xr),less(ksi,xr),less(xr,eta))
-t6:=somei(cut,[c:cut]and3(ratrp(c),less(ksi,c),less(c,eta)),xr,t5):some([c:cut]and3(ratrp(c),less(ksi,c),less(c,eta)))
--5159
-l@satz159a:=someapp(rat,[x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)),satz159,some([a:cut]and3(ratrp(a),less(ksi,a),less(a,eta))),[x:rat][t:and(less(ksi,rpofrt(x)),less(rpofrt(x),eta))]t6".5159"(x,t)):some([a:cut]and3(ratrp(a),less(ksi,a),less(a,eta)))
-[p:'prop'][p1:[x:rat][t:less(ksi,rpofrt(x))][u:less(rpofrt(x),eta)]p]
-+*5159
-p1@[y0:rat]
-yr:=rpofrt(y0):cut
-[a:and(less(ksi,yr),less(yr,eta))]
-t7:=ande1(less(ksi,yr),less(yr,eta),a):less(ksi,yr)
-t8:=ande2(less(ksi,yr),less(yr,eta),a):less(yr,eta)
-t9:=<t8><t7><y0>p1:p
--5159
-p1@satz159app:=someapp(rat,[x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)),satz159,p,[x:rat][t:and(less(ksi,rpofrt(x)),less(rpofrt(x),eta))]t9".5159"(x,t)):p
-eta@[z0:rat][m:more(rpofrt(z0),ts(ksi,eta))]
-+5160
-zr:=rpofrt(z0):cut
-nm:=mn(zr,ts(ksi,eta),m):cut
-dn:=pl(pl(ksi,eta),1rp):cut
-fr:=ov(nm,dn):cut
-zeta:=ite(less(fr,1rp),cut,fr,1rp):cut
-[l:less(fr,1rp)]
-t1:=itet(less(fr,1rp),cut,fr,1rp,l):is(zeta,fr)
-t2:=lessisi2(zeta,fr,t1):lessis(zeta,fr)
-t3:=lessisi1(zeta,1rp,satz127a(zeta,fr,1rp,t2,l)):lessis(zeta,1rp)
-m@[n:not(less(fr,1rp))]
-t4:=itef(less(fr,1rp),cut,fr,1rp,n):is(zeta,1rp)
-t5:=lessisi2(zeta,1rp,t4):lessis(zeta,1rp)
-t6:=trlessis(zeta,1rp,fr,t5,satz124(fr,1rp,satz123f(fr,1rp,n))):lessis(zeta,fr)
-m@t7:=th1"l.imp"(less(fr,1rp),lessis(zeta,1rp),[t:less(fr,1rp)]t3(t),[t:not(less(fr,1rp))]t5(t)):lessis(zeta,1rp)
-t8:=th1"l.imp"(less(fr,1rp),lessis(zeta,fr),[t:less(fr,1rp)]t2(t),[t:not(less(fr,1rp))]t6(t)):lessis(zeta,fr)
-[z1:rat]
-zr1:=rpofrt(z1):cut
-[l1:less(ksi,zr1)][l2:less(zr1,pl(ksi,zeta))][z2:rat]
-zr2:=rpofrt(z2):cut
-[l3:less(eta,zr2)][l4:less(zr2,pl(eta,zeta))]
-t9:=isless2(ts(pl(ksi,zeta),pl(eta,zeta)),pl(ts(pl(ksi,zeta),eta),ts(pl(ksi,zeta),zeta)),ts(zr1,zr2),disttp2(pl(ksi,zeta),eta,zeta),satz147a(zr1,pl(ksi,zeta),zr2,pl(eta,zeta),l2,l4)):less(ts(zr1,zr2),pl(ts(pl(ksi,zeta),eta),ts(pl(ksi,zeta),zeta)))
-t10:=lessisi2(ts(pl(ksi,zeta),eta),pl(ts(ksi,eta),ts(eta,zeta)),tris(cut,ts(pl(ksi,zeta),eta),pl(ts(ksi,eta),ts(zeta,eta)),pl(ts(ksi,eta),ts(eta,zeta)),disttp1(ksi,zeta,eta),ispl2(ts(zeta,eta),ts(eta,zeta),ts(ksi,eta),comts(zeta,eta)))):lessis(ts(pl(ksi,zeta),eta),pl(ts(ksi,eta),ts(eta,zeta)))
-t11:=satz149a(pl(ksi,zeta),pl(ksi,1rp),zeta,zeta,satz139a(ksi,ksi,zeta,1rp,lessisi2(ksi,ksi,refis(cut,ksi)),t7),lessisi2(zeta,zeta,refis(cut,zeta))):lessis(ts(pl(ksi,zeta),zeta),ts(pl(ksi,1rp),zeta))
-t12:=satz139a(ts(pl(ksi,zeta),eta),pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,zeta),zeta),ts(pl(ksi,1rp),zeta),t10,t11):lessis(pl(ts(pl(ksi,zeta),eta),ts(pl(ksi,zeta),zeta)),pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)))
-t13:=satz127b(ts(zr1,zr2),pl(ts(pl(ksi,zeta),eta),ts(pl(ksi,zeta),zeta)),pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)),t9,t12):less(ts(zr1,zr2),pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)))
-t14:=tris(cut,pl(eta,pl(ksi,1rp)),pl(pl(eta,ksi),1rp),pl(pl(ksi,eta),1rp),asspl2(eta,ksi,1rp),ispl1(pl(eta,ksi),pl(ksi,eta),1rp,compl(eta,ksi))):is(pl(eta,pl(ksi,1rp)),dn)
-t15:=tris(cut,pl(ts(eta,zeta),ts(pl(ksi,1rp),zeta)),ts(pl(eta,pl(ksi,1rp)),zeta),ts(dn,zeta),distpt1(eta,pl(ksi,1rp),zeta),ists1(pl(eta,pl(ksi,1rp)),dn,zeta,t14)):is(pl(ts(eta,zeta),ts(pl(ksi,1rp),zeta)),ts(dn,zeta))
-t16:=tris(cut,pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)),pl(ts(ksi,eta),pl(ts(eta,zeta),ts(pl(ksi,1rp),zeta))),pl(ts(ksi,eta),ts(dn,zeta)),asspl1(ts(ksi,eta),ts(eta,zeta),ts(pl(ksi,1rp),zeta)),ispl2(pl(ts(eta,zeta),ts(pl(ksi,1rp),zeta)),ts(dn,zeta),ts(ksi,eta),t15)):is(pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)),pl(ts(ksi,eta),ts(dn,zeta)))
-t17:=isless2(pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)),pl(ts(ksi,eta),ts(dn,zeta)),ts(zr1,zr2),t16,t13):less(ts(zr1,zr2),pl(ts(ksi,eta),ts(dn,zeta)))
-t18:=islessis12(ts(zeta,dn),ts(dn,zeta),ts(fr,dn),nm,comts(zeta,dn),satz153e(nm,dn),satz149a(zeta,fr,dn,dn,t8,lessisi2(dn,dn,refis(cut,dn)))):lessis(ts(dn,zeta),nm)
-t19:=satz139a(ts(ksi,eta),ts(ksi,eta),ts(dn,zeta),nm,lessisi2(ts(ksi,eta),ts(ksi,eta),refis(cut,ts(ksi,eta))),t18):lessis(pl(ts(ksi,eta),ts(dn,zeta)),pl(ts(ksi,eta),nm))
-t20:=satz127b(ts(zr1,zr2),pl(ts(ksi,eta),ts(dn,zeta)),pl(ts(ksi,eta),nm),t17,t19):less(ts(zr1,zr2),pl(ts(ksi,eta),nm))
-t21:=isless2(pl(ts(ksi,eta),nm),zr,ts(zr1,zr2),satz140c(zr,ts(ksi,eta),m),t20):less(ts(zr1,zr2),zr)
-t22:=satz154f(ts"rt"(z1,z2),z0,isless1(ts(zr1,zr2),rpofrt(ts"rt"(z1,z2)),zr,symis(cut,rpofrt(ts"rt"(z1,z2)),ts(zr1,zr2),satz155c(z1,z2)),t21)):less"rt"(ts"rt"(z1,z2),z0)
-x0:=ov"rt"(z0,z2):rat
-xr:=rpofrt(x0):cut
-y0:=z2:rat
-yr:=rpofrt(y0):cut
-t23:=satz110e(z0,z2):is"rt"(ts"rt"(x0,y0),z0)
-t24:=ismore1"rt"(z0,ts"rt"(x0,z2),ts"rt"(z1,z2),symis(rat,ts"rt"(x0,z2),z0,t23),satz83(ts"rt"(z1,z2),z0,t22)):more"rt"(ts"rt"(x0,z2),ts"rt"(z1,z2))
-t25:=satz106a(x0,z1,z2,t24):more"rt"(x0,z1)
-t26:=trmore(xr,zr1,ksi,satz154a(x0,z1,t25),satz122(ksi,zr1,l1)):more(xr,ksi)
-t27:=satz122(eta,yr,l3):more(yr,eta)
-z0@[u0:rat]
-ur:=rpofrt(u0):cut
-[v0:rat]
-vr:=rpofrt(v0):cut
-prop1:=and3(more(ur,ksi),more(vr,eta),is"rt"(ts"rt"(u0,v0),z0)):'prop'
-z0@prop2:=some"rt"([x:rat]some"rt"([y:rat]prop1(x,y))):'prop'
-l4@t28:=and3i(more(xr,ksi),more(yr,eta),is"rt"(ts"rt"(x0,y0),z0),t26,t27,t23):prop1(x0,y0)
-t29:=somei(rat,[y:rat]prop1(x0,y),y0,t28):some"rt"([y:rat]prop1(x0,y))
-t30:=somei(rat,[x:rat]some"rt"([y:rat]prop1(x,y)),x0,t29):prop2
-l2@t31:=satz159app(eta,pl(eta,zeta),satz133a(eta,zeta),prop2,[x:rat][t:less(eta,rpofrt(x))][u:less(rpofrt(x),pl(eta,zeta))]t30(x,t,u)):prop2
--5160
-satz160:=satz159app(ksi,pl(ksi,zeta".5160"),satz133a(ksi,zeta".5160"),prop2".5160",[x:rat][t:less(ksi,rpofrt(x))][u:less(rpofrt(x),pl(ksi,zeta".5160"))]t31".5160"(x,t,u)):some"rt"([x:rat]some"rt"([y:rat]and3(more(rpofrt(x),ksi),more(rpofrt(y),eta),is"rt"(ts"rt"(x,y),z0))))
-[p:'prop'][p1:[x:rat][t:more(rpofrt(x),ksi)][y:rat][u:more(rpofrt(y),eta)][v:is"rt"(ts"rt"(x,y),z0)]p]
-+*5160
-p1@[x1:rat]
-xr1:=rpofrt(x1):cut
-[px:some"rt"([y:rat]prop1(x1,y))][y1:rat]
-yr1:=rpofrt(y1):cut
-[py:prop1(x1,y1)]
-t32:=and3e1(more(xr1,ksi),more(yr1,eta),is"rt"(ts"rt"(x1,y1),z0),py):more(xr1,ksi)
-t33:=and3e2(more(xr1,ksi),more(yr1,eta),is"rt"(ts"rt"(x1,y1),z0),py):more(yr1,eta)
-t34:=and3e3(more(xr1,ksi),more(yr1,eta),is"rt"(ts"rt"(x1,y1),z0),py):is"rt"(ts"rt"(x1,y1),z0)
-t35:=<t34><t33><y1><t32><x1>p1:p
-px@t36:=someapp(rat,[y:rat]prop1(x1,y),px,p,[y:rat][v:prop1(x1,y)]t35(y,v)):p
--5160
-p1@satz160app:=someapp(rat,[x:rat]some"rt"([y:rat]prop1".5160"(x,y)),satz160,p,[x:rat][t:some"rt"([y:rat]prop1".5160"(x,y))]t36".5160"(x,t)):p
-+5161
-@[ksi:cut][eta:cut]
-min:=ite(less(ksi,eta),cut,ksi,eta):cut
-max:=ite(more(ksi,eta),cut,ksi,eta):cut
-[u0:rat]
-ur:=rpofrt(u0):cut
-[lu:lrt(min,u0)]
-t1:=satz158a(min,u0,lu):less(ur,min)
-[l:less(ksi,eta)]
-t2:=isless2(min,ksi,ur,itet(less(ksi,eta),cut,ksi,eta,l),t1):less(ur,ksi)
-t3:=trless(ur,ksi,eta,t2,l):less(ur,eta)
-lu@[n:not(less(ksi,eta))]
-t4:=isless2(min,eta,ur,itef(less(ksi,eta),cut,ksi,eta,n),t1):less(ur,eta)
-t5:=satz127b(ur,eta,ksi,t4,satz124(ksi,eta,satz123f(ksi,eta,n))):less(ur,ksi)
-lu@t6:=th1"l.imp"(less(ksi,eta),less(ur,ksi),[t:less(ksi,eta)]t2(t),[t:not(less(ksi,eta))]t5(t)):less(ur,ksi)
-t7:=th1"l.imp"(less(ksi,eta),less(ur,eta),[t:less(ksi,eta)]t3(t),[t:not(less(ksi,eta))]t4(t)):less(ur,eta)
-u0@[uu:urt(max,u0)]
-t8:=satz158b(max,u0,uu):moreis(ur,max)
-[m:more(ksi,eta)]
-t9:=ismoreis2(max,ksi,ur,itet(more(ksi,eta),cut,ksi,eta,m),t8):moreis(ur,ksi)
-t10:=trmoreis(ur,ksi,eta,t9,moreisi1(ksi,eta,m)):moreis(ur,eta)
-uu@[n:not(more(ksi,eta))]
-t11:=ismoreis2(max,eta,ur,itef(more(ksi,eta),cut,ksi,eta,n),t8):moreis(ur,eta)
-t12:=trmoreis(ur,eta,ksi,t11,satz125(ksi,eta,satz123e(ksi,eta,n))):moreis(ur,ksi)
-uu@t13:=th1"l.imp"(more(ksi,eta),moreis(ur,ksi),[t:more(ksi,eta)]t9(t),[t:not(more(ksi,eta))]t12(t)):moreis(ur,ksi)
-t14:=th1"l.imp"(more(ksi,eta),moreis(ur,eta),[t:more(ksi,eta)]t10(t),[t:not(more(ksi,eta))]t11(t)):moreis(ur,eta)
--5161
-@[zeta:cut]
-+*5161
-zeta@[ksi1:cut][ksi2:cut][m:more(ksi1,ksi2)]
-t15:=satz147(ksi1,ksi2,ksi1,ksi2,m,m):more(ts(ksi1,ksi1),ts(ksi2,ksi2))
-ksi2@sq1:=ts(ksi1,ksi1):cut
-sq2:=ts(ksi2,ksi2):cut
-m@t16:=ec3e21(is(sq1,sq2),more(sq1,sq2),less(sq1,sq2),satz123b(sq1,sq2),t15):nis(sq1,sq2)
-ksi2@[i:is(sq1,zeta)][j:is(sq2,zeta)]
-t17:=tris2(cut,sq1,sq2,zeta,i,j):is(sq1,sq2)
-t18:=[t:more(ksi1,ksi2)]<t17>t16(t):not(more(ksi1,ksi2))
-t19:=[t:less(ksi1,ksi2)]<symis(cut,sq1,sq2,t17)>t16(ksi2,ksi1,satz122(ksi1,ksi2,t)):not(less(ksi1,ksi2))
-t20:=or3e1(is(ksi1,ksi2),more(ksi1,ksi2),less(ksi1,ksi2),satz123a(ksi1,ksi2),t18,t19):is(ksi1,ksi2)
-zeta@t21:=[a:cut][b:cut][t:is(ts(a,a),zeta)][u:is(ts(b,b),zeta)]t20(a,b,t,u):amone(cut,[a:cut]is(ts(a,a),zeta))
-sqrtset:=setof(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta)):set(rat)
-[x0:rat]
-xr:=rpofrt(x0):cut
-[lx:lrt(min(1rp,zeta),x0)]
-t22:=t6(1rp,zeta,x0,lx):less(xr,1rp)
-t23:=t7(1rp,zeta,x0,lx):less(xr,zeta)
-t24:=isless1(xr,ts(xr,1rp),zeta,satz151a(xr),t23):less(ts(xr,1rp),zeta)
-t25:=trless(ts(xr,xr),ts(xr,1rp),zeta,satz148c(xr,xr,xr,1rp,lessisi2(xr,xr,refis(cut,xr)),t22),t24):less(ts(xr,xr),zeta)
-t26:=estii(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),x0,t25):in(x0,sqrtset)
-x0@[ux:urt(max(1rp,zeta),x0)]
-t27:=t13(1rp,zeta,x0,ux):moreis(xr,1rp)
-t28:=t14(1rp,zeta,x0,ux):moreis(xr,zeta)
-t29:=ismoreis1(xr,ts(xr,1rp),zeta,satz151a(xr),t28):moreis(ts(xr,1rp),zeta)
-t30:=trmoreis(ts(xr,xr),ts(xr,1rp),zeta,satz149(xr,xr,xr,1rp,moreisi2(xr,xr,refis(cut,xr)),t27),t29):moreis(ts(xr,xr),zeta)
-t31:=satz123c(ts(xr,xr),zeta,t30):not(less(ts(xr,xr),zeta))
-t32:=th3"l.imp"(in(x0,sqrtset),less(ts(xr,xr),zeta),t31,[t:in(x0,sqrtset)]estie(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),x0,t)):not(in(x0,sqrtset))
-x0@[i:in(x0,sqrtset)][y0:rat]
-yr:=rpofrt(y0):cut
-[l:less"rt"(y0,x0)]
-i@t33:=estie(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),x0,i):less(ts(xr,xr),zeta)
-l@t34:=satz154c(y0,x0,l):less(yr,xr)
-t35:=trless(ts(yr,yr),ts(xr,xr),zeta,satz147a(yr,xr,yr,xr,t34,t34),t33):less(ts(yr,yr),zeta)
-t36:=estii(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),y0,t35):in(y0,sqrtset)
-i@t37:=satz122(ts(xr,xr),zeta,t33):more(zeta,ts(xr,xr))
-nm:=mn(zeta,ts(xr,xr),t37):cut
-dn:=pl(xr,pl(xr,1rp)):cut
-fr:=ov(nm,dn):cut
-[z0:rat]
-zr:=rpofrt(z0):cut
-[lz:lrt(min(1rp,fr),z0)]
-t38:=t6(1rp,fr,z0,lz):less(zr,1rp)
-t39:=t7(1rp,fr,z0,lz):less(zr,fr)
-t40:=satz94(x0,z0):more"rt"(pl"rt"(x0,z0),x0)
-t41:=tris(cut,ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),ts(pl(xr,zr),pl(xr,zr)),pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)),ists12(rpofrt(pl"rt"(x0,z0)),pl(xr,zr),rpofrt(pl"rt"(x0,z0)),pl(xr,zr),satz155a(x0,z0),satz155a(x0,z0)),disttp2(pl(xr,zr),xr,zr)):is(ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)))
-t42:=symis(cut,ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)),t41):is(pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)),ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))))
-t43:=lessisi2(ts(pl(xr,zr),xr),pl(ts(xr,xr),ts(xr,zr)),tris(cut,ts(pl(xr,zr),xr),pl(ts(xr,xr),ts(zr,xr)),pl(ts(xr,xr),ts(xr,zr)),disttp1(xr,zr,xr),ispl2(ts(zr,xr),ts(xr,zr),ts(xr,xr),comts(zr,xr)))):lessis(ts(pl(xr,zr),xr),pl(ts(xr,xr),ts(xr,zr)))
-t44:=satz145c(pl(xr,zr),pl(xr,1rp),zr,satz138c(xr,xr,zr,1rp,lessisi2(xr,xr,refis(cut,xr)),t38)):less(ts(pl(xr,zr),zr),ts(pl(xr,1rp),zr))
-t45:=satz138c(ts(pl(xr,zr),xr),pl(ts(xr,xr),ts(xr,zr)),ts(pl(xr,zr),zr),ts(pl(xr,1rp),zr),t43,t44):less(pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)),pl(pl(ts(xr,xr),ts(xr,zr)),ts(pl(xr,1rp),zr)))
-t46:=tris(cut,pl(pl(ts(xr,xr),ts(xr,zr)),ts(pl(xr,1rp),zr)),pl(ts(xr,xr),pl(ts(xr,zr),ts(pl(xr,1rp),zr))),pl(ts(xr,xr),ts(dn,zr)),asspl1(ts(xr,xr),ts(xr,zr),ts(pl(xr,1rp),zr)),ispl2(pl(ts(xr,zr),ts(pl(xr,1rp),zr)),ts(dn,zr),ts(xr,xr),distpt1(xr,pl(xr,1rp),zr))):is(pl(pl(ts(xr,xr),ts(xr,zr)),ts(pl(xr,1rp),zr)),pl(ts(xr,xr),ts(dn,zr)))
-t47:=isless12(pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)),ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),pl(pl(ts(xr,xr),ts(xr,zr)),ts(pl(xr,1rp),zr)),pl(ts(xr,xr),ts(dn,zr)),t42,t46,t45):less(ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),pl(ts(xr,xr),ts(dn,zr)))
-t48:=isless2(ts(dn,fr),nm,ts(dn,zr),satz153c(nm,dn),satz148c(dn,dn,zr,fr,lessisi2(dn,dn,refis(cut,dn)),t39)):less(ts(dn,zr),nm)
-t49:=satz138c(ts(xr,xr),ts(xr,xr),ts(dn,zr),nm,lessisi2(ts(xr,xr),ts(xr,xr),refis(cut,ts(xr,xr))),t48):less(pl(ts(xr,xr),ts(dn,zr)),pl(ts(xr,xr),nm))
-t50:=isless2(pl(ts(xr,xr),nm),zeta,pl(ts(xr,xr),ts(dn,zr)),satz140c(zeta,ts(xr,xr),t37),t49):less(pl(ts(xr,xr),ts(dn,zr)),zeta)
-t51:=trless(ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),pl(ts(xr,xr),ts(dn,zr)),zeta,t47,t50):less(ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),zeta)
-t52:=estii(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),pl"rt"(x0,z0),t51):in(pl"rt"(x0,z0),sqrtset)
-t53:=andi(in(pl"rt"(x0,z0),sqrtset),more"rt"(pl"rt"(x0,z0),x0),t52,t40):and(in(pl"rt"(x0,z0),sqrtset),more"rt"(pl"rt"(x0,z0),x0))
-t54:=somei(rat,[y:rat]and(in(y,sqrtset),more"rt"(y,x0)),pl"rt"(x0,z0),t53):some"rt"([y:rat]and(in(y,sqrtset),more"rt"(y,x0)))
-i@t55:=cutapp1a(min(1rp,fr),some"rt"([y:rat]and(in(y,sqrtset),more"rt"(y,x0))),[x:rat][t:lrt(min(1rp,fr),x)]t54(x,t)):some"rt"([y:rat]and(in(y,sqrtset),more"rt"(y,x0)))
-x0@[lx:lrt(min(1rp,zeta),x0)][y0:rat][uy:urt(max(1rp,zeta),y0)]
-t56:=cut2(sqrtset,x0,t26(lx),y0,t32(y0,uy),[x:rat][t:in(x,sqrtset)][y:rat][u:less"rt"(y,x)]t36(x,t,y,u),[x:rat][t:in(x,sqrtset)]t55(x,t)):cutprop(sqrtset)
-lx@t57:=cutapp1b(max(1rp,zeta),cutprop(sqrtset),[y:rat][t:urt(max(1rp,zeta),y)]t56(y,t)):cutprop(sqrtset)
-zeta@t58:=cutapp1a(min(1rp,zeta),cutprop(sqrtset),[x:rat][t:lrt(min(1rp,zeta),x)]t57(x,t)):cutprop(sqrtset)
-rtc:=cutof(sqrtset,t58):cut
-@[x0:rat][y0:rat][l:lessis"rt"(x0,y0)]
-t59:=th9"l.or"(less"rt"(x0,y0),is"rt"(x0,y0),less(rpofrt(x0),rpofrt(y0)),is(rpofrt(x0),rpofrt(y0)),l,[t:less"rt"(x0,y0)]satz154c(x0,y0,t),[t:is"rt"(x0,y0)]satz154b(x0,y0,t)):lessis(rpofrt(x0),rpofrt(y0))
-y0@[m:moreis"rt"(x0,y0)]
-t60:=satz125(rpofrt(y0),rpofrt(x0),t59(y0,x0,satz84(x0,y0,m))):moreis(rpofrt(x0),rpofrt(y0))
-zeta@[m:more(ts(rtc,rtc),zeta)]
-t61:=satz121(ts(rtc,rtc),zeta,m):less(zeta,ts(rtc,rtc))
-[z1:rat]
-zr1:=rpofrt(z1):cut
-[l1:less(zeta,zr1)][l2:less(zr1,ts(rtc,rtc))]
-t62:=satz158c(ts(rtc,rtc),z1,l2):lrt(ts(rtc,rtc),z1)
-[x1:rat]
-xr1:=rpofrt(x1):cut
-[lx1:lrt(rtc,x1)][x2:rat]
-xr2:=rpofrt(x2):cut
-[lx2:lrt(rtc,x2)][i:is"rt"(z1,ts"rt"(x1,x2))]
-xm:=ite(more"rt"(x1,x2),rat,x1,x2):rat
-xrm:=rpofrt(xm):cut
-[o:more"rt"(x1,x2)]
-t63:=symis(rat,xm,x1,itet(more"rt"(x1,x2),rat,x1,x2,o)):is"rt"(x1,xm)
-t64:=isp(rat,[x:rat]lrt(rtc,x),x1,xm,lx1,t63):lrt(rtc,xm)
-t65:=lessisi2"rt"(x1,xm,t63):lessis"rt"(x1,xm)
-t66:=lessisi1"rt"(x2,xm,satz87b(x2,x1,xm,satz82(x1,x2,o),t65)):lessis"rt"(x2,xm)
-i@[n:not(more"rt"(x1,x2))]
-t67:=symis(rat,xm,x2,itef(more"rt"(x1,x2),rat,x1,x2,n)):is"rt"(x2,xm)
-t68:=isp(rat,[x:rat]lrt(rtc,x),x2,xm,lx2,t67):lrt(rtc,xm)
-t69:=lessisi2"rt"(x2,xm,t67):lessis"rt"(x2,xm)
-t70:=satz88(x1,x2,xm,satz81e(x1,x2,n),t69):lessis"rt"(x1,xm)
-i@t71:=th1"l.imp"(more"rt"(x1,x2),lrt(rtc,xm),[t:more"rt"(x1,x2)]t64(t),[t:not(more"rt"(x1,x2))]t68(t)):lrt(rtc,xm)
-t72:=th1"l.imp"(more"rt"(x1,x2),lessis"rt"(x1,xm),[t:more"rt"(x1,x2)]t65(t),[t:not(more"rt"(x1,x2))]t70(t)):lessis"rt"(x1,xm)
-t73:=th1"l.imp"(more"rt"(x1,x2),lessis"rt"(x2,xm),[t:more"rt"(x1,x2)]t66(t),[t:not(more"rt"(x1,x2))]t69(t)):lessis"rt"(x2,xm)
-t74:=ini(sqrtset,t58,xm,t71):in(xm,sqrtset)
-t75:=t59(x1,xm,t72):lessis(xr1,xrm)
-t76:=t59(x2,xm,t73):lessis(xr2,xrm)
-t77:=tris(cut,zr1,rpofrt(ts"rt"(x1,x2)),ts(xr1,xr2),satz154b(z1,ts"rt"(x1,x2),i),satz155c(x1,x2)):is(zr1,ts(xr1,xr2))
-t78:=islessis1(ts(xr1,xr2),zr1,ts(xrm,xrm),symis(cut,zr1,ts(xr1,xr2),t77),satz149a(xr1,xrm,xr2,xrm,t75,t76)):lessis(zr1,ts(xrm,xrm))
-t79:=estie(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),xm,t74):less(ts(xrm,xrm),zeta)
-t80:=satz127a(zr1,ts(xrm,xrm),zeta,t78,t79):less(zr1,zeta)
-t81:=<t80>ec3e23(is(zr1,zeta),more(zr1,zeta),less(zr1,zeta),satz123b(zr1,zeta),satz122(zeta,zr1,l1)):con
-t82:=tsapp(rtc,rtc,z1,t62,con,[x:rat][t:lrt(rtc,x)][y:rat][u:lrt(rtc,y)][v:is"rt"(z1,ts"rt"(x,y))]t81(x,t,y,u,v)):con
-l2@t82a:=tsapp(rtc,rtc,z1,t62,con,[x:rat][t:lrt(rtc,x)][y:rat][u:lrt(rtc,y)][v:is"rt"(z1,ts"rt"(x,y))]t82(x,t,y,u,v)):con
-m@t83:=satz159app(zeta,ts(rtc,rtc),t61,con,[x:rat][t:less(zeta,rpofrt(x))][u:less(rpofrt(x),ts(rtc,rtc))]t82a(x,t,u)):con
-zeta@[l:less(ts(rtc,rtc),zeta)][z2:rat]
-zr2:=rpofrt(z2):cut
-[l3:less(ts(rtc,rtc),zr2)][l4:less(zr2,zeta)]
-t84:=satz122(ts(rtc,rtc),zr2,l3):more(zr2,ts(rtc,rtc))
-[y1:rat]
-yr1:=rpofrt(y1):cut
-[m1:more(yr1,rtc)][y2:rat]
-yr2:=rpofrt(y2):cut
-[m2:more(yr2,rtc)][i:is"rt"(ts"rt"(y1,y2),z2)]
-ym:=ite(less"rt"(y1,y2),rat,y1,y2):rat
-yrm:=rpofrt(ym):cut
-[k:less"rt"(y1,y2)]
-t85:=symis(rat,ym,y1,itet(less"rt"(y1,y2),rat,y1,y2,k)):is"rt"(y1,ym)
-t86:=satz154b(y1,ym,t85):is(yr1,yrm)
-t87:=ismore1(yr1,yrm,rtc,t86,m1):more(yrm,rtc)
-t88:=moreisi2(yr1,yrm,t86):moreis(yr1,yrm)
-t89:=moreisi1(yr2,yrm,satz127d(yr2,yr1,yrm,satz122(yr1,yr2,satz154c(y1,y2,k)),t88)):moreis(yr2,yrm)
-i@[n:not(less"rt"(y1,y2))]
-t90:=symis(rat,ym,y2,itef(less"rt"(y1,y2),rat,y1,y2,n)):is"rt"(y2,ym)
-t91:=satz154b(y2,ym,t90):is(yr2,yrm)
-t92:=ismore1(yr2,yrm,rtc,t91,m2):more(yrm,rtc)
-t93:=moreisi2(yr2,yrm,t91):moreis(yr2,yrm)
-t94:=trmoreis(yr1,yr2,yrm,t60(y1,y2,satz81f(y1,y2,n)),t93):moreis(yr1,yrm)
-i@t95:=th1"l.imp"(less"rt"(y1,y2),more(yrm,rtc),[t:less"rt"(y1,y2)]t87(t),[t:not(less"rt"(y1,y2))]t92(t)):more(yrm,rtc)
-t96:=th1"l.imp"(less"rt"(y1,y2),moreis(yr1,yrm),[t:less"rt"(y1,y2)]t88(t),[t:not(less"rt"(y1,y2))]t94(t)):moreis(yr1,yrm)
-t97:=th1"l.imp"(less"rt"(y1,y2),moreis(yr2,yrm),[t:less"rt"(y1,y2)]t89(t),[t:not(less"rt"(y1,y2))]t93(t)):moreis(yr2,yrm)
-t98:=satz158d(rtc,ym,moreisi1(yrm,rtc,t95)):urt(rtc,ym)
-t99:=th3"l.imp"(in(ym,sqrtset),lrt(rtc,ym),t98,[t:in(ym,sqrtset)]ine(sqrtset,t58,ym,t)):not(in(ym,sqrtset))
-t100:=th3"l.imp"(less(ts(yrm,yrm),zeta),in(ym,sqrtset),t99,[t:less(ts(yrm,yrm),zeta)]estii(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),ym,t)):not(less(ts(yrm,yrm),zeta))
-t101:=satz123f(ts(yrm,yrm),zeta,t100):moreis(ts(yrm,yrm),zeta)
-t101a:=satz149(yr1,yrm,yr2,yrm,t96,t97):moreis(ts(yr1,yr2),ts(yrm,yrm))
-t102:=ismoreis1(ts(yr1,yr2),zr2,ts(yrm,yrm),tris(cut,ts(yr1,yr2),rpofrt(ts"rt"(y1,y2)),zr2,symis(cut,rpofrt(ts"rt"(y1,y2)),ts(yr1,yr2),satz155c(y1,y2)),satz154b(ts"rt"(y1,y2),z2,i)),t101a):moreis(zr2,ts(yrm,yrm))
-t103:=trmoreis(zr2,ts(yrm,yrm),zeta,t102,t101):moreis(zr2,zeta)
-t104:=<l4>satz123c(zr2,zeta,t103):con
-l4@t105:=satz160app(rtc,rtc,z2,t84,con,[x:rat][t:more(rpofrt(x),rtc)][y:rat][u:more(rpofrt(y),rtc)][v:is"rt"(ts"rt"(x,y),z2)]t104(x,t,y,u,v)):con
-l@t106:=satz159app(ts(rtc,rtc),zeta,l,con,[x:rat][t:less(ts(rtc,rtc),rpofrt(x))][u:less(rpofrt(x),zeta)]t105(x,t,u)):con
-zeta@t107:=or3e1(is(ts(rtc,rtc),zeta),more(ts(rtc,rtc),zeta),less(ts(rtc,rtc),zeta),satz123a(ts(rtc,rtc),zeta),[t:more(ts(rtc,rtc),zeta)]t83(t),[t:less(ts(rtc,rtc),zeta)]t106(t)):is(ts(rtc,rtc),zeta)
-t108:=somei(cut,[a:cut]is(ts(a,a),zeta),rtc,t107):some([a:cut]is(ts(a,a),zeta))
--5161
-zeta@satz161:=onei(cut,[a:cut]is(ts(a,a),zeta),t21".5161",t108".5161"):one([a:cut]is(ts(a,a),zeta))
-@[ksi:cut]
-irratrp:=not(ratrp(ksi)):'prop'
--rp
--rt
-+5162
-@[v:nat]
-t1:=tris(nat,pl(v,v),pl(ts(1,v),v),ts(<1>suc,v),ispl1(v,ts(1,v),v,satz28g(v)),satz28h(1,v)):is(pl(v,v),ts(<1>suc,v))
-t2:=isless2(pl(v,v),ts(<1>suc,v),v,t1,satz18a(v,v)):less(v,ts(<1>suc,v))
-[w:nat][l:less(ts(v,v),ts(w,w))]
-t3:=satz10j(v,w,th3"l.imp"(moreis(v,w),moreis(ts(v,v),ts(w,w)),satz10h(ts(v,v),ts(w,w),l),[t:moreis(v,w)]satz36(v,w,v,w,t,t))):less(v,w)
-w@t4:=tris(nat,ts(pl(v,w),v),pl(ts(v,v),ts(w,v)),pl(ts(v,v),ts(v,w)),disttp1(v,w,v),ispl2(ts(w,v),ts(v,w),ts(v,v),comts(w,v))):is(ts(pl(v,w),v),pl(ts(v,v),ts(v,w)))
-t5:=tr3is(nat,ts(pl(v,w),pl(v,w)),pl(ts(pl(v,w),v),ts(pl(v,w),w)),pl(pl(ts(v,v),ts(v,w)),pl(ts(v,w),ts(w,w))),pl(pl(pl(ts(v,v),ts(v,w)),ts(v,w)),ts(w,w)),disttp2(pl(v,w),v,w),ispl12(ts(pl(v,w),v),pl(ts(v,v),ts(v,w)),ts(pl(v,w),w),pl(ts(v,w),ts(w,w)),t4,disttp1(v,w,w)),asspl2(pl(ts(v,v),ts(v,w)),ts(v,w),ts(w,w))):is(ts(pl(v,w),pl(v,w)),pl(pl(pl(ts(v,v),ts(v,w)),ts(v,w)),ts(w,w)))
-t6:=tris(nat,pl(pl(ts(v,v),ts(v,w)),ts(v,w)),pl(ts(v,v),pl(ts(v,w),ts(v,w))),pl(ts(v,v),ts(<1>suc,ts(v,w))),asspl1(ts(v,v),ts(v,w),ts(v,w)),ispl2(pl(ts(v,w),ts(v,w)),ts(<1>suc,ts(v,w)),ts(v,v),t1(ts(v,w)))):is(pl(pl(ts(v,v),ts(v,w)),ts(v,w)),pl(ts(v,v),ts(<1>suc,ts(v,w))))
-nun:=tris(nat,ts(pl(v,w),pl(v,w)),pl(pl(pl(ts(v,v),ts(v,w)),ts(v,w)),ts(w,w)),pl(pl(ts(v,v),ts(<1>suc,ts(v,w))),ts(w,w)),t5,ispl1(pl(pl(ts(v,v),ts(v,w)),ts(v,w)),pl(ts(v,v),ts(<1>suc,ts(v,w))),ts(w,w),t6)):is(ts(pl(v,w),pl(v,w)),pl(pl(ts(v,v),ts(<1>suc,ts(v,w))),ts(w,w)))
-nun1:=symis(nat,ts(pl(v,w),pl(v,w)),pl(pl(ts(v,v),ts(<1>suc,ts(v,w))),ts(w,w)),nun):is(pl(pl(ts(v,v),ts(<1>suc,ts(v,w))),ts(w,w)),ts(pl(v,w),pl(v,w)))
-prop1:=eq(tf(fr(w,v),fr(w,v)),fr(<1>suc,1)):'prop'
-v@prop2:=some([t:nat]prop1(t)):'prop'
-@prop3:=some([u:nat]prop2(u)):'prop'
-[p:prop3]
-y:=ind(nat,[t:nat]min([u:nat]prop2(u),t),satz27a([u:nat]prop2(u),p)):nat
-t7:=oneax(nat,[t:nat]min([u:nat]prop2(u),t),satz27a([u:nat]prop2(u),p)):min([u:nat]prop2(u),y)
-t8:=ande1(lb([u:nat]prop2(u),y),prop2(y),t7):lb([u:nat]prop2(u),y)
-t9:=ande2(lb([u:nat]prop2(u),y),prop2(y),t7):prop2(y)
-[x:nat][q:prop1(y,x)]
-t10:=treq1(fr(<1>suc,1),fr(ts(x,x),ts(y,y)),tf(fr(x,y),fr(x,y)),q,tfeq12a(x,y,x,y)):eq(fr(<1>suc,1),fr(ts(x,x),ts(y,y)))
-t11:=tr4is(nat,ts(<1>suc,ts(y,y)),ts(num(fr(<1>suc,1)),den(fr(ts(x,x),ts(y,y)))),ts(num(fr(ts(x,x),ts(y,y))),den(fr(<1>suc,1))),ts(ts(x,x),1),ts(x,x),12isnd(<1>suc,1,ts(x,x),ts(y,y)),t10,ndis12(ts(x,x),ts(y,y),<1>suc,1),satz28a(ts(x,x))):is(ts(<1>suc,ts(y,y)),ts(x,x))
-t12:=isless2(ts(<1>suc,ts(y,y)),ts(x,x),ts(y,y),t11,t2(ts(y,y))):less(ts(y,y),ts(x,x))
-t13:=isless1(ts(ts(<1>suc,y),y),ts(x,x),ts(ts(<1>suc,y),ts(<1>suc,y)),tris(nat,ts(ts(<1>suc,y),y),ts(<1>suc,ts(y,y)),ts(x,x),assts1(<1>suc,y,y),t11),satz35c(ts(<1>suc,y),ts(<1>suc,y),y,ts(<1>suc,y),lessisi2(ts(<1>suc,y),ts(<1>suc,y),refis(nat,ts(<1>suc,y))),t2(y))):less(ts(x,x),ts(ts(<1>suc,y),ts(<1>suc,y)))
-t14:=t3(y,x,t12):less(y,x)
-t15:=t3(x,ts(<1>suc,y),t13):less(x,ts(<1>suc,y))
-[u:nat][i:is(x,pl(y,u))]
-t16:=isless12(x,pl(y,u),ts(<1>suc,y),pl(y,y),i,symis(nat,pl(y,y),ts(<1>suc,y),t1(y)),t15):less(pl(y,u),pl(y,y))
-t17:=satz20f(u,y,y,t16):less(u,y)
-[t:nat][j:is(y,pl(u,t))]
-t18:=symis(nat,y,pl(u,t),j):is(pl(u,t),y)
-t19:=tris(nat,ts(x,x),ts(pl(y,u),pl(y,u)),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),ts(u,u)),ists12(x,pl(y,u),x,pl(y,u),i,i),nun(y,u)):is(ts(x,x),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),ts(u,u)))
-t20:=tris(nat,pl(ts(x,x),ts(t,t)),pl(pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),ts(u,u)),ts(t,t)),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(ts(u,u),ts(t,t))),ispl1(ts(x,x),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),ts(u,u)),ts(t,t),t19),asspl1(pl(ts(y,y),ts(<1>suc,ts(y,u))),ts(u,u),ts(t,t))):is(pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(ts(u,u),ts(t,t))))
-t21:=tr3is(nat,ts(y,u),ts(u,y),ts(u,pl(u,t)),pl(ts(u,u),ts(u,t)),comts(y,u),ists2(y,pl(u,t),u,j),disttp2(u,u,t)):is(ts(y,u),pl(ts(u,u),ts(u,t)))
-t22:=tris(nat,ts(<1>suc,ts(y,u)),ts(<1>suc,pl(ts(u,u),ts(u,t))),pl(ts(<1>suc,ts(u,u)),ts(<1>suc,ts(u,t))),ists2(ts(y,u),pl(ts(u,u),ts(u,t)),<1>suc,t21),disttp2(<1>suc,ts(u,u),ts(u,t))):is(ts(<1>suc,ts(y,u)),pl(ts(<1>suc,ts(u,u)),ts(<1>suc,ts(u,t))))
-t23:=tris(nat,pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(ts(y,y),pl(ts(<1>suc,ts(u,u)),ts(<1>suc,ts(u,t)))),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(<1>suc,ts(u,t))),ispl2(ts(<1>suc,ts(y,u)),pl(ts(<1>suc,ts(u,u)),ts(<1>suc,ts(u,t))),ts(y,y),t22),asspl2(ts(y,y),ts(<1>suc,ts(u,u)),ts(<1>suc,ts(u,t)))):is(pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(<1>suc,ts(u,t))))
-t24:=tr3is(nat,pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(ts(u,u),ts(t,t))),pl(pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(<1>suc,ts(u,t))),pl(ts(u,u),ts(t,t))),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t)))),t20,ispl1(pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(<1>suc,ts(u,t))),pl(ts(u,u),ts(t,t)),t23),asspl1(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t)))):is(pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t)))))
-t25:=tr4is(nat,pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t))),pl(pl(ts(<1>suc,ts(u,t)),ts(u,u)),ts(t,t)),pl(pl(ts(u,u),ts(<1>suc,ts(u,t))),ts(t,t)),ts(pl(u,t),pl(u,t)),ts(y,y),asspl2(ts(<1>suc,ts(u,t)),ts(u,u),ts(t,t)),ispl1(pl(ts(<1>suc,ts(u,t)),ts(u,u)),pl(ts(u,u),ts(<1>suc,ts(u,t))),ts(t,t),compl(ts(<1>suc,ts(u,t)),ts(u,u))),nun1(u,t),ists12(pl(u,t),y,pl(u,t),y,t18,t18)):is(pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t))),ts(y,y))
-t26:=tr4is(nat,pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t)))),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(y,y)),pl(ts(y,y),pl(ts(y,y),ts(<1>suc,ts(u,u)))),pl(pl(ts(y,y),ts(y,y)),ts(<1>suc,ts(u,u))),t24,ispl2(pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t))),ts(y,y),pl(ts(y,y),ts(<1>suc,ts(u,u))),t25),compl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(y,y)),asspl2(ts(y,y),ts(y,y),ts(<1>suc,ts(u,u)))):is(pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(y,y)),ts(<1>suc,ts(u,u))))
-t27:=tris(nat,pl(ts(y,y),ts(y,y)),ts(<1>suc,ts(y,y)),ts(x,x),t1(ts(y,y)),t11):is(pl(ts(y,y),ts(y,y)),ts(x,x))
-t28:=tris(nat,pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(y,y)),ts(<1>suc,ts(u,u))),pl(ts(x,x),ts(<1>suc,ts(u,u))),t26,ispl1(pl(ts(y,y),ts(y,y)),ts(x,x),ts(<1>suc,ts(u,u)),t27)):is(pl(ts(x,x),ts(t,t)),pl(ts(x,x),ts(<1>suc,ts(u,u))))
-t29:=satz20e(ts(t,t),ts(<1>suc,ts(u,u)),ts(x,x),t28):is(ts(t,t),ts(<1>suc,ts(u,u)))
-t30:=tr4is(nat,ts(num(fr(<1>suc,1)),den(fr(ts(t,t),ts(u,u)))),ts(<1>suc,ts(u,u)),ts(t,t),ts(ts(t,t),1),ts(num(fr(ts(t,t),ts(u,u))),den(fr(<1>suc,1))),ndis12(<1>suc,1,ts(t,t),ts(u,u)),symis(nat,ts(t,t),ts(<1>suc,ts(u,u)),t29),satz28e(ts(t,t)),12isnd(ts(t,t),ts(u,u),<1>suc,1)):eq(fr(<1>suc,1),fr(ts(t,t),ts(u,u)))
-t31:=treq2(tf(fr(t,u),fr(t,u)),fr(<1>suc,1),fr(ts(t,t),ts(u,u)),tfeq12a(t,u,t,u),t30):prop1(u,t)
-t32:=somei(nat,[v:nat]prop1(u,v),t,t31):prop2(u)
-t33:=<t32><u>t8:lessis(y,u)
-t34:=<t33>satz10g(y,u,satz12(u,y,t17)):con
-i@t35:=someapp(nat,[v:nat]diffprop(y,u,v),t17,con,[v:nat][w:diffprop(y,u,v)]t34(v,w)):con
-q@t36:=someapp(nat,[v:nat]diffprop(x,y,v),t14,con,[v:nat][w:diffprop(x,y,v)]t35(v,w)):con
-p@t37:=someapp(nat,[v:nat]prop1(y,v),t9,con,[v:nat][w:prop1(y,v)]t36(v,w)):con
--5162
-+*rt
-+5162
-@[x0:rat][i:is(ts(x0,x0),rtofn(<1>suc))][x:frac][xix0:inf(x,class(x0))]
-t38:=ise(ts(x0,x0),rtofn(<1>suc),tf(x,x),fr(<1>suc,1),tict(x0,x0,x,x,xix0,xix0),inclass(fr(<1>suc,1)),i):eq"n"(tf(x,x),fr(<1>suc,1))
-t39:=refeq1(fr(num(x),den(x)),x,fris(x)):eq"n"(fr(num(x),den(x)),x)
-t40:=eqtf12(fr(num(x),den(x)),x,fr(num(x),den(x)),x,t39,t39):eq"n"(tf(fr(num(x),den(x)),fr(num(x),den(x))),tf(x,x))
-t41:=treq"n"(tf(fr(num(x),den(x)),fr(num(x),den(x))),tf(x,x),fr(<1>suc,1),t40,t38):prop1"n.5162"(den(x),num(x))
-t42:=somei(nat,[t:nat]prop1"n.5162"(den(x),t),num(x),t41):prop2"n.5162"(den(x))
-t43:=somei(nat,[t:nat]prop2"n.5162"(t),den(x),t42):prop3"n.5162"
-t44:=t37"n.5162"(t43):con
-i@t45:=ratapp1(x0,con,[x:frac][t:inf(x,class(x0))]t44(x,t)):con
--5162
-+*rp
-+5162
-@ksi:=ind(cut,[a:cut]is(ts(a,a),rpofnt(<1>suc)),satz161(rpofnt(<1>suc))):cut
-t46:=oneax(cut,[a:cut]is(ts(a,a),rpofnt(<1>suc)),satz161(rpofnt(<1>suc))):is(ts(ksi,ksi),rpofnt(<1>suc))
-[r:ratrp(ksi)]
-x0:=rtofrp(ksi,r):rat
-t47:=tr3is(cut,rpofrt(ts"rt"(x0,x0)),ts(rpofrt(x0),rpofrt(x0)),ts(ksi,ksi),rpofnt(<1>suc),satz155c(x0,x0),ists12(rpofrt(x0),ksi,rpofrt(x0),ksi,isrprt2(ksi,r),isrprt2(ksi,r)),t46):is(rpofrt(ts"rt"(x0,x0)),rpofnt(<1>suc))
-t48:=isrtirp(ts"rt"(x0,x0),rtofn(<1>suc),t47):is"rt"(ts"rt"(x0,x0),rtofn(<1>suc))
-t49:=t45"rt.5162"(x0,t48):con
--5162
-@satz162:=somei(cut,[a:cut]irratrp(a),ksi".5162",[t:ratrp(ksi".5162")]t49".5162"(t)):some([a:cut]irratrp(a))
-[zeta:cut]
-sqrt:=ind(cut,[a:cut]is(ts(a,a),zeta),satz161(zeta)):cut
-thsqrt1:=oneax(cut,[a:cut]is(ts(a,a),zeta),satz161(zeta)):is(ts(sqrt(zeta),sqrt(zeta)),zeta)
-[ksi:cut][i:is(ts(ksi,ksi),zeta)]
-thsqrt2:=t20".5161"(zeta,ksi,sqrt,i,thsqrt1):is(ksi,sqrt)
-@[ksi:cut][eta:cut][i:is(ksi,eta)]
-issqrt:=isf(cut,cut,[t:cut]sqrt(t),ksi,eta,i):is(sqrt(ksi),sqrt(eta))
-@[ksi:cut][nx:natrp(ksi)][eta:cut][ny:natrp(eta)]
-+iiia
-x:=ntofrp(ksi,nx):nat
-y:=ntofrp(eta,ny):nat
-t1:=isrpnt1(ksi,nx):is(ksi,rpofnt(x))
-t2:=isrpnt1(eta,ny):is(eta,rpofnt(y))
-t3:=ispl12(ksi,rpofnt(x),eta,rpofnt(y),t1,t2):is(pl(ksi,eta),pl(rpofnt(x),rpofnt(y)))
-x0:=rtofn(x):rat
-y0:=rtofn(y):rat
-t4:=natrti(x):natrt(x0)
-t5:=natrti(y):natrt(y0)
-t6:=symis(cut,rpofrt(pl"rt"(x0,y0)),pl(rpofnt(x),rpofnt(y)),satz155a(x0,y0)):is(pl(rpofnt(x),rpofnt(y)),rpofrt(pl"rt"(x0,y0)))
-t7:=satz112d(x0,t4,y0,t5):natrt(pl"rt"(x0,y0))
-xpy:=nofrt(pl"rt"(x0,y0),t7):nat
-t8:=isrtn1(pl"rt"(x0,y0),t7):is"rt"(pl"rt"(x0,y0),rtofn(xpy))
-t9:=isrterp(pl"rt"(x0,y0),rtofn(xpy),t8):is(rpofrt(pl"rt"(x0,y0)),rpofnt(xpy))
-t10:=tr3is(cut,pl(ksi,eta),pl(rpofnt(x),rpofnt(y)),rpofrt(pl"rt"(x0,y0)),rpofnt(xpy),t3,t6,t9):is(pl(ksi,eta),rpofnt(xpy))
--iiia
-natpl:=somei(nat,[t:nat]is(pl(ksi,eta),rpofnt(t)),xpy".iiia",t10".iiia"):natrp(pl(ksi,eta))
-+*iiia
-ny@t11:=ists12(ksi,rpofnt(x),eta,rpofnt(y),t1,t2):is(ts(ksi,eta),ts(rpofnt(x),rpofnt(y)))
-t12:=symis(cut,rpofrt(ts"rt"(x0,y0)),ts(rpofnt(x),rpofnt(y)),satz155c(x0,y0)):is(ts(rpofnt(x),rpofnt(y)),rpofrt(ts"rt"(x0,y0)))
-t13:=satz112f(x0,t4,y0,t5):natrt(ts"rt"(x0,y0))
-xty:=nofrt(ts"rt"(x0,y0),t13):nat
-t14:=isrtn1(ts"rt"(x0,y0),t13):is"rt"(ts"rt"(x0,y0),rtofn(xty))
-t15:=isrterp(ts"rt"(x0,y0),rtofn(xty),t14):is(rpofrt(ts"rt"(x0,y0)),rpofnt(xty))
-t16:=tr3is(cut,ts(ksi,eta),ts(rpofnt(x),rpofnt(y)),rpofrt(ts"rt"(x0,y0)),rpofnt(xty),t11,t12,t15):is(ts(ksi,eta),rpofnt(xty))
--iiia
-ny@natts:=somei(nat,[t:nat]is(ts(ksi,eta),rpofnt(t)),xty".iiia",t16".iiia"):natrp(ts(ksi,eta))
-[m:more(ksi,eta)]
-+*iiia
-m@t17:=ismore12(ksi,rpofnt(x),eta,rpofnt(y),t1,t2,m):more(rpofnt(x),rpofnt(y))
-t18:=satz154d(x0,y0,t17):more"rt"(x0,y0)
-t20:=ismn12(ksi,rpofnt(x),eta,rpofnt(y),m,satz154a(x0,y0,t18),t1,t2):is(mn(ksi,eta,m),mn(rpofnt(x),rpofnt(y),satz154a(x0,y0,t18)))
-t21:=symis(cut,rpofrt(mn"rt"(x0,y0,t18)),mn(rpofnt(x),rpofnt(y),satz154a(x0,y0,t18)),satz155b(x0,y0,t18)):is(mn(rpofnt(x),rpofnt(y),satz154a(x0,y0,t18)),rpofrt(mn"rt"(x0,y0,t18)))
-t22:=satz112g(x0,t4,y0,t5,t18):natrt(mn"rt"(x0,y0,t18))
-xmy:=nofrt(mn"rt"(x0,y0,t18),t22):nat
-t23:=isrtn1(mn"rt"(x0,y0,t18),t22):is"rt"(mn"rt"(x0,y0,t18),rtofn(xmy))
-t24:=isrterp(mn"rt"(x0,y0,t18),rtofn(xmy),t23):is(rpofrt(mn"rt"(x0,y0,t18)),rpofnt(xmy))
-t25:=tr3is(cut,mn(ksi,eta,m),mn(rpofnt(x),rpofnt(y),satz154a(x0,y0,t18)),rpofrt(mn"rt"(x0,y0,t18)),rpofnt(xmy),t20,t21,t24):is(mn(ksi,eta,m),rpofnt(xmy))
--iiia
-m@natmn:=somei(nat,[t:nat]is(mn(ksi,eta,m),rpofnt(t)),xmy".iiia",t25".iiia"):natrp(mn(ksi,eta,m))
-@[p:cut][q:cut][r:cut]
-3pl13:=tr3is(cut,pl(p,pl(q,r)),pl(pl(q,r),p),pl(pl(r,q),p),pl(r,pl(q,p)),compl(p,pl(q,r)),ispl1(pl(q,r),pl(r,q),p,compl(q,r)),asspl1(r,q,p)):is(pl(p,pl(q,r)),pl(r,pl(q,p)))
-[s:cut]
-4pl24:=tr3is(cut,pl(pl(p,q),pl(r,s)),pl(p,pl(q,pl(r,s))),pl(p,pl(s,pl(r,q))),pl(pl(p,s),pl(r,q)),asspl1(p,q,pl(r,s)),ispl2(pl(q,pl(r,s)),pl(s,pl(r,q)),p,3pl13(q,r,s)),asspl2(p,s,pl(r,q))):is(pl(pl(p,q),pl(r,s)),pl(pl(p,s),pl(r,q)))
-r@3pl12:=tr3is(cut,pl(p,pl(q,r)),pl(pl(p,q),r),pl(pl(q,p),r),pl(q,pl(p,r)),asspl2(p,q,r),ispl1(pl(p,q),pl(q,p),r,compl(p,q)),asspl1(q,p,r)):is(pl(p,pl(q,r)),pl(q,pl(p,r)))
-s@4pl23:=tr3is(cut,pl(pl(p,q),pl(r,s)),pl(p,pl(q,pl(r,s))),pl(p,pl(r,pl(q,s))),pl(pl(p,r),pl(q,s)),asspl1(p,q,pl(r,s)),ispl2(pl(q,pl(r,s)),pl(r,pl(q,s)),p,3pl12(q,r,s)),asspl2(p,r,pl(q,s))):is(pl(pl(p,q),pl(r,s)),pl(pl(p,r),pl(q,s)))
-r@3pl23:=tr3is(cut,pl(pl(p,q),r),pl(p,pl(q,r)),pl(p,pl(r,q)),pl(pl(p,r),q),asspl1(p,q,r),ispl2(pl(q,r),pl(r,q),p,compl(q,r)),asspl2(p,r,q)):is(pl(pl(p,q),r),pl(pl(p,r),q))
-p@a2isapa:=tris(cut,ts(p,pl(1rp,1rp)),pl(ts(p,1rp),ts(p,1rp)),pl(p,p),disttp2(p,1rp,1rp),ispl12(ts(p,1rp),p,ts(p,1rp),p,satz151(p),satz151(p))):is(ts(p,pl(1rp,1rp)),pl(p,p))
-@dif:=pair1type(cut):'type'
-[a1:cut][a2:cut]
-df:=pair1(cut,a1,a2):dif
-@[a:dif]
-stm:=first1(cut,a):cut
-std:=second1(cut,a):cut
-a2@stmis:=first1is1(cut,a1,a2):is(stm(df(a1,a2)),a1)
-isstm:=first1is2(cut,a1,a2):is(a1,stm(df(a1,a2)))
-stdis:=second1is1(cut,a1,a2):is(std(df(a1,a2)),a2)
-isstd:=second1is2(cut,a1,a2):is(a2,std(df(a1,a2)))
-a@1a:=stm(a):cut
-2a:=std(a):cut
-dfis:=pair1is1(cut,a):is"e"(dif,df(1a,2a),a)
-isdf:=pair1is2(cut,a):is"e"(dif,a,df(1a,2a))
-a2@[b1:cut][b2:cut]
-12issmsd:=ispl12(a1,stm(df(a1,a2)),b2,std(df(b1,b2)),isstm(a1,a2),isstd(b1,b2)):is(pl(a1,b2),pl(stm(df(a1,a2)),std(df(b1,b2))))
-smsdis12:=symis(cut,pl(a1,b2),pl(stm(df(a1,a2)),std(df(b1,b2))),12issmsd):is(pl(stm(df(a1,a2)),std(df(b1,b2))),pl(a1,b2))
-a@[r1:cut][r2:cut]
-1sdissmsd:=ispl1(r1,stm(df(r1,r2)),2a,isstm(r1,r2)):is(pl(r1,2a),pl(stm(df(r1,r2)),2a))
-smsdis1sd:=symis(cut,pl(r1,2a),pl(stm(df(r1,r2)),2a),1sdissmsd):is(pl(stm(df(r1,r2)),2a),pl(r1,2a))
-sm2issmsd:=ispl2(r2,std(df(r1,r2)),1a,isstd(r1,r2)):is(pl(1a,r2),pl(1a,std(df(r1,r2))))
-smsdissm2:=symis(cut,pl(1a,r2),pl(1a,std(df(r1,r2))),sm2issmsd):is(pl(1a,std(df(r1,r2))),pl(1a,r2))
-a2@[r:cut][i:is(a1,r)]
-issm:=isf(cut,dif,[t:cut]df(t,a2),a1,r,i):is"e"(dif,df(a1,a2),df(r,a2))
-r@[i:is(a2,r)]
-issd:=isf(cut,dif,[t:cut]df(a1,t),a2,r,i):is"e"(dif,df(a1,a2),df(a1,r))
-b2@[i:is(a1,b1)][j:is(a2,b2)]
-issmsd:=tris(dif,df(a1,a2),df(b1,a2),df(b1,b2),issm(a1,a2,b1,i),issd(b1,a2,b2,j)):is"e"(dif,df(a1,a2),df(b1,b2))
-a@[b:dif]
-1b:=stm(b):cut
-2b:=std(b):cut
-eq:=is(pl(1a,2b),pl(1b,2a)):'prop'
-b2@[i:is(pl(a1,b2),pl(b1,a2))]
-eqi12:=tr3is(cut,pl(stm(df(a1,a2)),std(df(b1,b2))),pl(a1,b2),pl(b1,a2),pl(stm(df(b1,b2)),std(df(a1,a2))),smsdis12(a1,a2,b1,b2),i,12issmsd(b1,b2,a1,a2)):eq(df(a1,a2),df(b1,b2))
-r2@[i:is(pl(1a,r2),pl(r1,2a))]
-eqi1:=isp(dif,[x:dif]eq(x,df(r1,r2)),df(1a,2a),a,eqi12(1a,2a,r1,r2,i),dfis):eq(a,df(r1,r2))
-r2@[i:is(pl(r1,2a),pl(1a,r2))]
-eqi2:=isp(dif,[x:dif]eq(df(r1,r2),x),df(1a,2a),a,eqi12(r1,r2,1a,2a,i),dfis):eq(df(r1,r2),a)
-b2@[e:eq(df(a1,a2),df(b1,b2))]
-eqe12:=tr3is(cut,pl(a1,b2),pl(stm(df(a1,a2)),std(df(b1,b2))),pl(stm(df(b1,b2)),std(df(a1,a2))),pl(b1,a2),12issmsd(a1,a2,b1,b2),e,smsdis12(b1,b2,a1,a2)):is(pl(a1,b2),pl(b1,a2))
-a@satzd163:=refis(cut,pl(1a,2a)):eq(a,a)
-refeq:=satzd163:eq(a,a)
-b@[i:is"e"(dif,a,b)]
-refeq1:=isp(dif,[x:dif]eq(a,x),a,b,refeq,i):eq(a,b)
-refeq2:=isp(dif,[x:dif]eq(x,a),a,b,refeq,i):eq(b,a)
-b2@[i:is(a1,b1)][j:is(a2,b2)]
-eqsmsd:=refeq1(df(a1,a2),df(b1,b2),issmsd(i,j)):eq(df(a1,a2),df(b1,b2))
-r@[i:is(a1,r)]
-eqsm:=refeq1(df(a1,a2),df(r,a2),issm(i)):eq(df(a1,a2),df(r,a2))
-r@[i:is(a2,r)]
-eqsd:=refeq1(df(a1,a2),df(a1,r),issd(i)):eq(df(a1,a2),df(a1,r))
-b@[e:eq(a,b)]
-satzd164:=symis(cut,pl(1a,2b),pl(1b,2a),e):eq(b,a)
-symeq:=satzd164:eq(b,a)
-b@[c:dif]
-1c:=stm(c):cut
-2c:=std(c):cut
-[e:eq(a,b)][f:eq(b,c)]
-+1d165
-t1:=ispl12(pl(1a,2b),pl(1b,2a),pl(1b,2c),pl(1c,2b),e,f):is(pl(pl(1a,2b),pl(1b,2c)),pl(pl(1b,2a),pl(1c,2b)))
-t2:=tr4is(cut,pl(pl(1a,2c),pl(1b,2b)),pl(pl(1a,2b),pl(1b,2c)),pl(pl(1b,2a),pl(1c,2b)),pl(pl(1c,2b),pl(1b,2a)),pl(pl(1c,2a),pl(1b,2b)),4pl24(1a,2c,1b,2b),t1,compl(pl(1b,2a),pl(1c,2b)),4pl24(1c,2b,1b,2a)):is(pl(pl(1a,2c),pl(1b,2b)),pl(pl(1c,2a),pl(1b,2b)))
--1d165
-satzd165:=satz136b(pl(1a,2c),pl(1c,2a),pl(1b,2b),t2".1d165"):eq(a,c)
-treq:=satzd165:eq(a,c)
-c@[e:eq(c,a)][f:eq(c,b)]
-treq1:=treq(a,c,b,symeq(c,a,e),f):eq(a,b)
-c@[e:eq(a,c)][f:eq(b,c)]
-treq2:=treq(a,c,b,e,symeq(b,c,f)):eq(a,b)
-c@[d:dif][e1:eq(a,b)][e2:eq(b,c)][e3:eq(c,d)]
-tr3eq:=treq(a,b,d,e1,treq(b,c,d,e2,e3)):eq(a,d)
-d@[e:dif][e1:eq(a,b)][e2:eq(b,c)][e3:eq(c,d)][e4:eq(d,e)]
-tr4eq:=tr3eq(a,b,c,e,e1,e2,treq(c,d,e,e3,e4)):eq(a,e)
-a@posd:=more(1a,2a):'prop'
-zero:=is(1a,2a):'prop'
-negd:=less(1a,2a):'prop'
-a2@[m:more(a1,a2)]
-posdi:=ismore12(a1,stm(df(a1,a2)),a2,std(df(a1,a2)),isstm(a1,a2),isstd(a1,a2),m):posd(df(a1,a2))
-a2@[i:is(a1,a2)]
-zeroi:=tr3is(cut,stm(df(a1,a2)),a1,a2,std(df(a1,a2)),stmis(a1,a2),i,isstd(a1,a2)):zero(df(a1,a2))
-a2@[l:less(a1,a2)]
-negdi:=isless12(a1,stm(df(a1,a2)),a2,std(df(a1,a2)),isstm(a1,a2),isstd(a1,a2),l):negd(df(a1,a2))
-a@axrde:=satz123b(1a,2a):ec3(zero(a),posd(a),negd(a))
-axrdo:=satz123a(1a,2a):or3(zero(a),posd(a),negd(a))
-axrd:=orec3i(zero(a),posd(a),negd(a),axrdo,axrde):orec3(zero(a),posd(a),negd(a))
-[p:'prop'][p1:[t:posd(a)]p][p2:[t:zero(a)]p][p3:[t:negd(a)]p]
-rappd:=or3app(zero(a),posd(a),negd(a),p,axrdo,p2,p1,p3):p
-a@[p:posd(a)]
-pnot0d:=ec3e21(zero(a),posd(a),negd(a),axrde,p):not(zero(a))
-pnotnd:=ec3e23(zero(a),posd(a),negd(a),axrde,p):not(negd(a))
-a@[z:zero(a)]
-0notpd:=ec3e12(zero(a),posd(a),negd(a),axrde,z):not(posd(a))
-0notnd:=ec3e13(zero(a),posd(a),negd(a),axrde,z):not(negd(a))
-a@[n:negd(a)]
-nnotpd:=ec3e32(zero(a),posd(a),negd(a),axrde,n):not(posd(a))
-nnot0d:=ec3e31(zero(a),posd(a),negd(a),axrde,n):not(zero(a))
-b@[e:eq(a,b)][p:posd(a)]
-+iv1d
-t1:=ismore12(pl(1a,2b),pl(1b,2a),pl(2a,2b),pl(2b,2a),e,compl(2a,2b),satz135a(1a,2a,2b,p)):more(pl(1b,2a),pl(2b,2a))
--iv1d
-eqposd:=satz136a(1b,2b,2a,t1".iv1d"):posd(b)
-e@[z:zero(a)]
-+*iv1d
-z@t2:=tr3is(cut,pl(1b,2a),pl(1a,2b),pl(2a,2b),pl(2b,2a),symeq(a,b,e),ispl1(1a,2a,2b,z),compl(2a,2b)):is(pl(1b,2a),pl(2b,2a))
--iv1d
-z@eqzero:=satz136b(1b,2b,2a,t2".iv1d"):zero(b)
-e@[n:negd(a)]
-+*iv1d
-n@t3:=isless12(pl(1a,2b),pl(1b,2a),pl(2a,2b),pl(2b,2a),e,compl(2a,2b),satz135c(1a,2a,2b,n)):less(pl(1b,2a),pl(2b,2a))
--iv1d
-n@eqnegd:=satz136c(1b,2b,2a,t3".iv1d"):negd(b)
-b@[z:zero(a)][y:zero(b)]
-zeroeq:=tris(cut,pl(1a,2b),pl(2a,1b),pl(1b,2a),ispl12(1a,2a,2b,1b,z,symis(cut,1b,2b,y)),compl(2a,1b)):eq(a,b)
-@[r:cut]
-pdofrp:=df(pl(r,1rp),1rp):dif
-ndofrp:=df(1rp,pl(r,1rp)):dif
-[s:cut][i:is(r,s)]
-isrpepd:=refeq1(pdofrp(r),pdofrp(s),isf(cut,dif,[x:cut]pdofrp(x),r,s,i)):eq(pdofrp(r),pdofrp(s))
-isrpend:=refeq1(ndofrp(r),ndofrp(s),isf(cut,dif,[x:cut]ndofrp(x),r,s,i)):eq(ndofrp(r),ndofrp(s))
-s@[e:eq(pdofrp(r),pdofrp(s))]
-+*iv1d
-e@t4:=satz136b(pl(r,1rp),pl(s,1rp),1rp,eqe12(pl(r,1rp),1rp,pl(s,1rp),1rp,e)):is(pl(r,1rp),pl(s,1rp))
--iv1d
-e@isrpipd:=satz136b(r,s,1rp,t4".iv1d"):is(r,s)
-s@[e:eq(ndofrp(r),ndofrp(s))]
-+*iv1d
-e@t5:=satz136e(pl(s,1rp),pl(r,1rp),1rp,eqe12(1rp,pl(r,1rp),1rp,pl(s,1rp),e)):is(pl(s,1rp),pl(r,1rp))
--iv1d
-e@isrpind:=symis(cut,s,r,satz136b(s,r,1rp,t5".iv1d")):is(r,s)
-r@posdirp:=posdi(pl(r,1rp),1rp,ismore1(pl(1rp,r),pl(r,1rp),1rp,compl(1rp,r),satz133(1rp,r))):posd(pdofrp(r))
-negdirp:=negdi(1rp,pl(r,1rp),isless2(pl(1rp,r),pl(r,1rp),1rp,compl(1rp,r),satz133a(1rp,r))):negd(ndofrp(r))
-a@[p:posd(a)]
-rpofpd:=mn(1a,2a,p):cut
-+*iv1d
-p@t6:=tr4is(cut,pl(1a,1rp),pl(pl(rpofpd,2a),1rp),pl(rpofpd,pl(2a,1rp)),pl(rpofpd,pl(1rp,2a)),pl(pl(rpofpd,1rp),2a),ispl1(1a,pl(rpofpd,2a),1rp,satz140f(1a,2a,p)),asspl1(rpofpd,2a,1rp),ispl2(pl(2a,1rp),pl(1rp,2a),rpofpd,compl(2a,1rp)),asspl2(rpofpd,1rp,2a)):is(pl(1a,1rp),pl(pl(rpofpd,1rp),2a))
--iv1d
-p@eqpdrp1:=eqi1(a,pl(rpofpd,1rp),1rp,t6".iv1d"):eq(a,pdofrp(rpofpd(a,p)))
-eqpdrp2:=symeq(a,pdofrp(rpofpd(a,p)),eqpdrp1):eq(pdofrp(rpofpd(a,p)),a)
-a@[n:negd(a)]
-rpofnd:=mn(2a,1a,satz122(1a,2a,n)):cut
-+*iv1d
-n@t7:=tr3is(cut,pl(1a,pl(rpofnd,1rp)),pl(pl(1a,rpofnd),1rp),pl(2a,1rp),pl(1rp,2a),asspl2(1a,rpofnd,1rp),ispl1(pl(1a,rpofnd),2a,1rp,satz140c(2a,1a,satz122(1a,2a,n))),compl(2a,1rp)):is(pl(1a,pl(rpofnd,1rp)),pl(1rp,2a))
--iv1d
-n@eqndrp1:=eqi1(a,1rp,pl(rpofnd,1rp),t7".iv1d"):eq(a,ndofrp(rpofnd(a,n)))
-eqndrp2:=symeq(a,ndofrp(rpofnd(a,n)),eqndrp1):eq(ndofrp(rpofnd(a,n)),a)
-@[h:dif][p:posd(h)][k:dif][q:posd(k)][e:eq(h,k)]
-+*iv1d
-e@t8:=tr3eq(pdofrp(rpofpd(h,p)),h,k,pdofrp(rpofpd(k,q)),eqpdrp2(h,p),e,eqpdrp1(k,q)):eq(pdofrp(rpofpd(h,p)),pdofrp(rpofpd(k,q)))
--iv1d
-e@eqpderp:=isrpipd(rpofpd(h,p),rpofpd(k,q),t8".iv1d"):is(rpofpd(h,p),rpofpd(k,q))
-q@[i:is(rpofpd(h,p),rpofpd(k,q))]
-+*iv1d
-i@t9:=isrpepd(rpofpd(h,p),rpofpd(k,q),i):eq(pdofrp(rpofpd(h,p)),pdofrp(rpofpd(k,q)))
--iv1d
-i@eqpdirp:=tr3eq(h,pdofrp(rpofpd(h,p)),pdofrp(rpofpd(k,q)),k,eqpdrp1(h,p),t9".iv1d",eqpdrp2(k,q)):eq(h,k)
-h@[n:negd(h)][k:dif][o:negd(k)][e:eq(h,k)]
-+*iv1d
-e@t10:=tr3eq(ndofrp(rpofnd(h,n)),h,k,ndofrp(rpofnd(k,o)),eqndrp2(h,n),e,eqndrp1(k,o)):eq(ndofrp(rpofnd(h,n)),ndofrp(rpofnd(k,o)))
--iv1d
-e@eqnderp:=isrpind(rpofnd(h,n),rpofnd(k,o),t10".iv1d"):is(rpofnd(h,n),rpofnd(k,o))
-o@[i:is(rpofnd(h,n),rpofnd(k,o))]
-+*iv1d
-i@t11:=isrpend(rpofnd(h,n),rpofnd(k,o),i):eq(ndofrp(rpofnd(h,n)),ndofrp(rpofnd(k,o)))
--iv1d
-i@eqndirp:=tr3eq(h,ndofrp(rpofnd(h,n)),ndofrp(rpofnd(k,o)),k,eqndrp1(h,n),t11".iv1d",eqndrp2(k,o)):eq(h,k)
-@[r:cut]
-+*iv1d
-r@t12:=eqpdrp1(pdofrp(r),posdirp(r)):eq(pdofrp(r),pdofrp(rpofpd(pdofrp(r),posdirp(r))))
--iv1d
-r@isrppd1:=isrpipd(r,rpofpd(pdofrp(r),posdirp(r)),t12".iv1d"):is(r,rpofpd(pdofrp(r),posdirp(r)))
-isrppd2:=symis(cut,r,rpofpd(pdofrp(r),posdirp(r)),isrppd1):is(rpofpd(pdofrp(r),posdirp(r)),r)
-+*iv1d
-r@t13:=eqndrp1(ndofrp(r),negdirp(r)):eq(ndofrp(r),ndofrp(rpofnd(ndofrp(r),negdirp(r))))
--iv1d
-r@isrpnd1:=isrpind(r,rpofnd(ndofrp(r),negdirp(r)),t13".iv1d"):is(r,rpofnd(ndofrp(r),negdirp(r)))
-isrpnd2:=symis(cut,r,rpofnd(ndofrp(r),negdirp(r)),isrpnd1):is(rpofnd(ndofrp(r),negdirp(r)),r)
-a2@[r:cut]
-lemmad1:=eqi12(a1,a2,pl(a1,r),pl(a2,r),tris(cut,pl(a1,pl(a2,r)),pl(a1,pl(r,a2)),pl(pl(a1,r),a2),ispl2(pl(a2,r),pl(r,a2),a1,compl(a2,r)),asspl2(a1,r,a2))):eq(df(a1,a2),df(pl(a1,r),pl(a2,r)))
-lemmad2:=symeq(df(a1,a2),df(pl(a1,r),pl(a2,r)),lemmad1):eq(df(pl(a1,r),pl(a2,r)),df(a1,a2))
-a@[r:cut]
-lemmad3:=treq(a,df(1a,2a),df(pl(1a,r),pl(2a,r)),refeq1(a,df(1a,2a),isdf),lemmad1(1a,2a,r)):eq(a,df(pl(1a,r),pl(2a,r)))
-lemmad4:=symeq(a,df(pl(1a,r),pl(2a,r)),lemmad3):eq(df(pl(1a,r),pl(2a,r)),a)
-a@absd:=ite(negd(a),dif,df(2a,1a),a):dif
-[n:negd(a)]
-absnd:=refeq1(absd(a),df(2a,1a),itet(negd(a),dif,df(2a,1a),a,n)):eq(absd(a),df(2a,1a))
-a@[n:not(negd(a))]
-absnnd:=refeq1(absd(a),a,itef(negd(a),dif,df(2a,1a),a,n)):eq(absd(a),a)
-a2@[l:less(a1,a2)]
-absdeql:=treq(absd(df(a1,a2)),df(std(df(a1,a2)),stm(df(a1,a2))),df(a2,a1),absnd(df(a1,a2),negdi(a1,a2,l)),eqsmsd(std(df(a1,a2)),stm(df(a1,a2)),a2,a1,stdis(a1,a2),stmis(a1,a2))):eq(absd(df(a1,a2)),df(a2,a1))
-a2@[m:moreis(a1,a2)]
-absdeqm:=absnnd(df(a1,a2),th3"l.imp"(negd(df(a1,a2)),less(a1,a2),satz123c(a1,a2,m),[t:negd(df(a1,a2))]isless12(stm(df(a1,a2)),a1,std(df(a1,a2)),a2,stmis(a1,a2),stdis(a1,a2),t))):eq(absd(df(a1,a2)),df(a1,a2))
-b@[e:eq(a,b)]
-+iv2d
-[n:negd(a)]
-t1:=tr3is(cut,pl(2a,1b),pl(1b,2a),pl(1a,2b),pl(2b,1a),compl(2a,1b),symeq(a,b,e),compl(1a,2b)):is(pl(2a,1b),pl(2b,1a))
-t2:=tr3eq(absd(a),df(2a,1a),df(2b,1b),absd(b),absnd(a,n),eqi12(2a,1a,2b,1b,t1),symeq(absd(b),df(2b,1b),absnd(b,eqnegd(a,b,e,n)))):eq(absd(a),absd(b))
-e@[n:not(negd(a))]
-t3:=tr3eq(absd(a),a,b,absd(b),absnnd(a,n),e,symeq(absd(b),b,absnnd(b,th3"l.imp"(negd(b),negd(a),n,[t:negd(b)]eqnegd(b,a,symeq(a,b,e),t))))):eq(absd(a),absd(b))
--iv2d
-eqabsd:=th1"l.imp"(negd(a),eq(absd(a),absd(b)),[t:negd(a)]t2".iv2d"(t),[t:not(negd(a))]t3".iv2d"(t)):eq(absd(a),absd(b))
-a@[p:posd(a)]
-satzd166a:=eqposd(a,absd(a),symeq(absd(a),a,absnnd(a,pnotnd(a,p))),p):posd(absd(a))
-a@[n:negd(a)]
-+2d166
-t1:=posdi(2a,1a,satz122(1a,2a,n)):posd(df(2a,1a))
--2d166
-satzd166b:=eqposd(df(2a,1a),absd(a),symeq(absd(a),df(2a,1a),absnd(a,n)),t1".2d166"):posd(absd(a))
-b@[p:posd(a)][q:posd(b)][e:eq(absd(a),absd(b))]
-satzd166c:=tr3eq(a,absd(a),absd(b),b,symeq(absd(a),a,absnnd(a,pnotnd(a,p))),e,absnnd(b,pnotnd(b,q))):eq(a,b)
-b@[n:negd(a)][o:negd(b)][e:eq(absd(a),absd(b))]
-+*2d166
-e@t2:=tr3eq(df(2a,1a),absd(a),absd(b),df(2b,1b),symeq(absd(a),df(2a,1a),absnd(a,n)),e,absnd(b,o)):eq(df(2a,1a),df(2b,1b))
--2d166
-e@satzd166d:=tr3is(cut,pl(1a,2b),pl(2b,1a),pl(2a,1b),pl(1b,2a),compl(1a,2b),symis(cut,pl(2a,1b),pl(2b,1a),eqe12(2a,1a,2b,1b,t2".2d166")),compl(2a,1b)):eq(a,b)
-a@[n:not(zero(a))]
-satzd166e:=rappd(a,posd(absd(a)),[t:posd(a)]satzd166a(a,t),th2"l.imp"(zero(a),posd(absd(a)),n),[t:negd(a)]satzd166b(a,t)):posd(absd(a))
-a@[z:zero(a)]
-satzd166f:=eqzero(a,absd(a),symeq(absd(a),a,absnnd(a,0notnd(a,z))),z):zero(absd(a))
-b@mored:=more(pl(1a,2b),pl(1b,2a)):'prop'
-b2@[m:more(pl(a1,b2),pl(b1,a2))]
-moredi12:=ismore12(pl(a1,b2),pl(stm(df(a1,a2)),std(df(b1,b2))),pl(b1,a2),pl(stm(df(b1,b2)),std(df(a1,a2))),12issmsd(a1,a2,b1,b2),12issmsd(b1,b2,a1,a2),m):mored(df(a1,a2),df(b1,b2))
-r2@[m:more(pl(1a,r2),pl(r1,2a))]
-moredi1:=ismore12(pl(1a,r2),pl(1a,std(df(r1,r2))),pl(r1,2a),pl(stm(df(r1,r2)),2a),sm2issmsd(a,r1,r2),1sdissmsd(a,r1,r2),m):mored(a,df(r1,r2))
-r2@[m:more(pl(r1,2a),pl(1a,r2))]
-moredi2:=ismore12(pl(r1,2a),pl(stm(df(r1,r2)),2a),pl(1a,r2),pl(1a,std(df(r1,r2))),1sdissmsd(a,r1,r2),sm2issmsd(a,r1,r2),m):mored(df(r1,r2),a)
-b2@[m:mored(df(a1,a2),df(b1,b2))]
-morede12:=ismore12(pl(stm(df(a1,a2)),std(df(b1,b2))),pl(a1,b2),pl(stm(df(b1,b2)),std(df(a1,a2))),pl(b1,a2),smsdis12(a1,a2,b1,b2),smsdis12(b1,b2,a1,a2),m):more(pl(a1,b2),pl(b1,a2))
-b@lessd:=less(pl(1a,2b),pl(1b,2a)):'prop'
-[m:mored(a,b)]
-lemmad5:=satz121(pl(1a,2b),pl(1b,2a),m):lessd(b,a)
-b@[l:lessd(a,b)]
-lemmad6:=satz122(pl(1a,2b),pl(1b,2a),l):mored(b,a)
-b2@[l:less(pl(a1,b2),pl(b1,a2))]
-lessdi12:=lemmad5(df(b1,b2),df(a1,a2),moredi12(b1,b2,a1,a2,satz122(pl(a1,b2),pl(b1,a2),l))):lessd(df(a1,a2),df(b1,b2))
-r2@[l:less(pl(1a,r2),pl(r1,2a))]
-lessdi1:=lemmad5(df(r1,r2),a,moredi2(a,r1,r2,satz122(pl(1a,r2),pl(r1,2a),l))):lessd(a,df(r1,r2))
-r2@[l:less(pl(r1,2a),pl(1a,r2))]
-lessdi2:=lemmad5(a,df(r1,r2),moredi1(a,r1,r2,satz122(pl(r1,2a),pl(1a,r2),l))):lessd(df(r1,r2),a)
-b2@[l:lessd(df(a1,a2),df(b1,b2))]
-lessde12:=satz121(pl(b1,a2),pl(a1,b2),morede12(b1,b2,a1,a2,lemmad6(df(a1,a2),df(b1,b2),l))):less(pl(a1,b2),pl(b1,a2))
-b@satzd167:=satz123(pl(1a,2b),pl(1b,2a)):orec3(eq(a,b),mored(a,b),lessd(a,b))
-satzd167a:=satz123a(pl(1a,2b),pl(1b,2a)):or3(eq(a,b),mored(a,b),lessd(a,b))
-satzd167b:=satz123b(pl(1a,2b),pl(1b,2a)):ec3(eq(a,b),mored(a,b),lessd(a,b))
-d@1d:=stm(d):cut
-2d:=std(d):cut
-[e:eq(a,b)][f:eq(c,d)][m:mored(a,c)]
-+*iv2d
-m@t4:=tr4is(cut,pl(pl(1b,2d),pl(1c,2a)),pl(pl(1b,2a),pl(1c,2d)),pl(pl(1a,2b),pl(1d,2c)),pl(pl(1a,2c),pl(1d,2b)),pl(pl(1d,2b),pl(1a,2c)),4pl24(1b,2d,1c,2a),ispl12(pl(1b,2a),pl(1a,2b),pl(1c,2d),pl(1d,2c),symeq(a,b,e),f),4pl24(1a,2b,1d,2c),compl(pl(1a,2c),pl(1d,2b))):is(pl(pl(1b,2d),pl(1c,2a)),pl(pl(1d,2b),pl(1a,2c)))
-t5:=ismore2(pl(pl(1b,2d),pl(1c,2a)),pl(pl(1d,2b),pl(1a,2c)),pl(pl(1b,2d),pl(1a,2c)),t4,satz135d(pl(1a,2c),pl(1c,2a),pl(1b,2d),m)):more(pl(pl(1b,2d),pl(1a,2c)),pl(pl(1d,2b),pl(1a,2c)))
--iv2d
-m@eqmored12:=satz136a(pl(1b,2d),pl(1d,2b),pl(1a,2c),t5".iv2d"):mored(b,d)
-f@[l:lessd(a,c)]
-eqlessd12:=lemmad5(d,b,eqmored12(c,d,a,b,f,e,lemmad6(a,c,l))):lessd(b,d)
-c@[e:eq(a,b)][m:mored(a,c)]
-eqmored1:=eqmored12(a,b,c,c,e,refeq(c),m):mored(b,c)
-e@[m:mored(c,a)]
-eqmored2:=eqmored12(c,c,a,b,refeq(c),e,m):mored(c,b)
-e@[l:lessd(a,c)]
-eqlessd1:=eqlessd12(a,b,c,c,e,refeq(c),l):lessd(b,c)
-e@[l:lessd(c,a)]
-eqlessd2:=eqlessd12(c,c,a,b,refeq(c),e,l):lessd(c,b)
-b@moreq:=or(mored(a,b),eq(a,b)):'prop'
-lesseq:=or(lessd(a,b),eq(a,b)):'prop'
-[m:moreq(a,b)]
-satzd168a:=th9"l.or"(mored(a,b),eq(a,b),lessd(b,a),eq(b,a),m,[t:mored(a,b)]lemmad5(a,b,t),[t:eq(a,b)]symeq(a,b,t)):lesseq(b,a)
-b@[l:lesseq(a,b)]
-satzd168b:=th9"l.or"(lessd(a,b),eq(a,b),mored(b,a),eq(b,a),l,[t:lessd(a,b)]lemmad6(a,b,t),[t:eq(a,b)]symeq(a,b,t)):moreq(b,a)
-c@[e:eq(a,b)][m:moreq(a,c)]
-eqmoreq1:=th9"l.or"(mored(a,c),eq(a,c),mored(b,c),eq(b,c),m,[t:mored(a,c)]eqmored1(a,b,c,e,t),[t:eq(a,c)]treq1(b,c,a,e,t)):moreq(b,c)
-e@[m:moreq(c,a)]
-eqmoreq2:=th9"l.or"(mored(c,a),eq(c,a),mored(c,b),eq(c,b),m,[t:mored(c,a)]eqmored2(a,b,c,e,t),[t:eq(c,a)]treq(c,a,b,t,e)):moreq(c,b)
-e@[l:lesseq(a,c)]
-eqlesseq1:=satzd168a(c,b,eqmoreq2(a,b,c,e,satzd168b(a,c,l))):lesseq(b,c)
-e@[l:lesseq(c,a)]
-eqlesseq2:=satzd168a(b,c,eqmoreq1(a,b,c,e,satzd168b(c,a,l))):lesseq(c,b)
-d@[e:eq(a,b)][f:eq(c,d)][m:moreq(a,c)]
-eqmoreq12:=eqmoreq1(a,b,d,e,eqmoreq2(c,d,a,f,m)):moreq(b,d)
-f@[l:lesseq(a,c)]
-eqlesseq12:=eqlesseq1(a,b,d,e,eqlesseq2(c,d,a,f,l)):lesseq(b,d)
-b@[m:mored(a,b)]
-moreqi1:=ori1(mored(a,b),eq(a,b),m):moreq(a,b)
-b@[l:lessd(a,b)]
-lesseqi1:=ori1(lessd(a,b),eq(a,b),l):lesseq(a,b)
-b@[e:eq(a,b)]
-moreqi2:=ori2(mored(a,b),eq(a,b),e):moreq(a,b)
-lesseqi2:=ori2(lessd(a,b),eq(a,b),e):lesseq(a,b)
-b@[m:moreq(a,b)]
-satzd167c:=th7"l.ec3"(eq(a,b),mored(a,b),lessd(a,b),satzd167b,comor(mored(a,b),eq(a,b),m)):not(lessd(a,b))
-b@[l:lesseq(a,b)]
-satzd167d:=th9"l.ec3"(eq(a,b),mored(a,b),lessd(a,b),satzd167b,l):not(mored(a,b))
-b@[n:not(mored(a,b))]
-satzd167e:=th2"l.or3"(eq(a,b),mored(a,b),lessd(a,b),satzd167a,n):lesseq(a,b)
-b@[n:not(lessd(a,b))]
-satzd167f:=comor(eq(a,b),mored(a,b),th3"l.or3"(eq(a,b),mored(a,b),lessd(a,b),satzd167a,n)):moreq(a,b)
-b@[m:mored(a,b)]
-satzd167g:=th3"l.imp"(lesseq(a,b),not(mored(a,b)),weli(mored(a,b),m),[t:lesseq(a,b)]satzd167d(t)):not(lesseq(a,b))
-b@[l:lessd(a,b)]
-satzd167h:=th3"l.imp"(moreq(a,b),not(lessd(a,b)),weli(lessd(a,b),l),[t:moreq(a,b)]satzd167c(t)):not(moreq(a,b))
-b@[n:not(moreq(a,b))]
-satzd167j:=or3e3(eq(a,b),mored(a,b),lessd(a,b),satzd167a,th5"l.or"(mored(a,b),eq(a,b),n),th4"l.or"(mored(a,b),eq(a,b),n)):lessd(a,b)
-b@[n:not(lesseq(a,b))]
-satzd167k:=or3e2(eq(a,b),mored(a,b),lessd(a,b),satzd167a,th4"l.or"(lessd(a,b),eq(a,b),n),th5"l.or"(lessd(a,b),eq(a,b),n)):mored(a,b)
-b@[z:zero(b)][p:posd(a)]
-satzd169a:=ismore12(pl(1a,1b),pl(1a,2b),pl(2a,1b),pl(1b,2a),ispl2(1b,2b,1a,z),compl(2a,1b),satz135a(1a,2a,1b,p)):mored(a,b)
-z@[m:mored(a,b)]
-satzd169b:=satz136d(1a,2a,2b,ismore12(pl(1a,2b),pl(2b,1a),pl(1b,2a),pl(2b,2a),compl(1a,2b),ispl1(1b,2b,2a,z),m)):posd(a)
-z@[n:negd(a)]
-satzd169c:=isless12(pl(1a,1b),pl(1a,2b),pl(2a,1b),pl(1b,2a),ispl2(1b,2b,1a,z),compl(2a,1b),satz135c(1a,2a,1b,n)):lessd(a,b)
-z@[l:lessd(a,b)]
-satzd169d:=satz136f(1a,2a,2b,isless12(pl(1a,2b),pl(2b,1a),pl(1b,2a),pl(2b,2a),compl(1a,2b),ispl1(1b,2b,2a,z),l)):negd(a)
-+2d170
-z@[p:posd(a)]
-t1:=moreqi1(absd(a),b,satzd169a(absd(a),b,z,satzd166a(a,p))):moreq(absd(a),b)
-z@[y:zero(a)]
-t2:=moreqi2(absd(a),b,treq(absd(a),a,b,absnnd(a,0notnd(a,y)),zeroeq(a,b,y,z))):moreq(absd(a),b)
-z@[n:negd(a)]
-t3:=moreqi1(absd(a),b,satzd169a(absd(a),b,z,satzd166b(a,n))):moreq(absd(a),b)
--2d170
-z@satzd170:=rappd(a,moreq(absd(a),b),[t:posd(a)]t1".2d170"(t),[t:zero(a)]t2".2d170"(t),[t:negd(a)]t3".2d170"(t)):moreq(absd(a),b)
-c@[l:lessd(a,b)][k:lessd(b,c)]
-+2d171
-t1:=satz137a(pl(1a,2b),pl(1b,2a),pl(1b,2c),pl(1c,2b),l,k):less(pl(pl(1a,2b),pl(1b,2c)),pl(pl(1b,2a),pl(1c,2b)))
-t2:=isless12(pl(pl(1a,2b),pl(1b,2c)),pl(pl(1a,2c),pl(1b,2b)),pl(pl(1b,2a),pl(1c,2b)),pl(pl(1c,2a),pl(1b,2b)),4pl24(1a,2b,1b,2c),tris(cut,pl(pl(1b,2a),pl(1c,2b)),pl(pl(1b,2b),pl(1c,2a)),pl(pl(1c,2a),pl(1b,2b)),4pl24(1b,2a,1c,2b),compl(pl(1b,2b),pl(1c,2a))),t1):less(pl(pl(1a,2c),pl(1b,2b)),pl(pl(1c,2a),pl(1b,2b)))
--2d171
-satzd171:=satz136c(pl(1a,2c),pl(1c,2a),pl(1b,2b),t2".2d171"):lessd(a,c)
-trlessd:=satzd171:lessd(a,c)
-c@[m:mored(a,b)][n:mored(b,c)]
-trmored:=lemmad6(c,a,trlessd(c,b,a,lemmad5(b,c,n),lemmad5(a,b,m))):mored(a,c)
-c@[l:lesseq(a,b)][k:lessd(b,c)]
-satzd172a:=orapp(lessd(a,b),eq(a,b),lessd(a,c),l,[t:lessd(a,b)]trlessd(t,k),[t:eq(a,b)]eqlessd1(b,a,c,symeq(a,b,t),k)):lessd(a,c)
-c@[l:lessd(a,b)][k:lesseq(b,c)]
-satzd172b:=orapp(lessd(b,c),eq(b,c),lessd(a,c),k,[t:lessd(b,c)]trlessd(l,t),[t:eq(b,c)]eqlessd2(b,c,a,t,l)):lessd(a,c)
-c@[m:moreq(a,b)][n:mored(b,c)]
-satzd172c:=lemmad6(c,a,satzd172b(c,b,a,lemmad5(b,c,n),satzd168a(a,b,m))):mored(a,c)
-c@[m:mored(a,b)][n:moreq(b,c)]
-satzd172d:=lemmad6(c,a,satzd172a(c,b,a,satzd168a(b,c,n),lemmad5(a,b,m))):mored(a,c)
-c@[l:lesseq(a,b)][k:lesseq(b,c)]
-+2d173
-[j:lessd(a,b)]
-t1:=lesseqi1(a,c,satzd172b(j,k)):lesseq(a,c)
-k@[e:eq(a,b)]
-t2:=eqlesseq1(b,a,c,symeq(a,b,e),k):lesseq(a,c)
--2d173
-satzd173:=orapp(lessd(a,b),eq(a,b),lesseq(a,c),l,[t:lessd(a,b)]t1".2d173"(t),[t:eq(a,b)]t2".2d173"(t)):lesseq(a,c)
-trlesseq:=satzd173:lesseq(a,c)
-c@[m:moreq(a,b)][n:moreq(b,c)]
-trmoreq:=satzd168b(c,a,trlesseq(c,b,a,satzd168a(b,c,n),satzd168a(a,b,m))):moreq(a,c)
-a@ratd:=[t:not(zero(a))]ratrp(rpofpd(absd(a),satzd166e(a,t))):'prop'
-irratd:=not(ratd(a)):'prop'
-b@[e:eq(a,b)][r:ratd(a)]
-+*iv2d
-r@[n:not(zero(b))]
-t6:=th3"l.imp"(zero(a),zero(b),n,[t:zero(a)]eqzero(a,b,e,t)):not(zero(a))
-t7:=eqpderp(absd(a),satzd166e(a,t6),absd(b),satzd166e(b,n),eqabsd(a,b,e)):is(rpofpd(absd(a),satzd166e(a,t6)),rpofpd(absd(b),satzd166e(b,n)))
-t8:=isp(cut,[t:cut]ratrp(t),rpofpd(absd(a),satzd166e(a,t6)),rpofpd(absd(b),satzd166e(b,n)),<t6>r,t7):ratrp(rpofpd(absd(b),satzd166e(b,n)))
--iv2d
-r@eqratd:=[t:not(zero(b))]t8".iv2d"(t):ratd(b)
-e@[i:irratd(a)]
-eqirratd:=th3"l.imp"(ratd(b),ratd(a),i,[t:ratd(b)]eqratd(b,a,symeq(a,b,e),t)):irratd(b)
-a@[z:zero(a)]
-ratdi0:=th2"l.r.imp"(not(zero(a)),[t:not(zero(a))]ratrp(rpofpd(absd(a),satzd166e(a,t))),weli(zero(a),z)):ratd(a)
-@[r:cut][i:irratrp(r)][x0:rat]
-+*iv2d
-x0@[s:ratrp(pl(r,rpofrt(x0)))][y0:rat][j:is(pl(r,rpofrt(x0)),rpofrt(y0))]
-t9:=tris(cut,pl(rpofrt(x0),r),pl(r,rpofrt(x0)),rpofrt(y0),compl(rpofrt(x0),r),j):is(pl(rpofrt(x0),r),rpofrt(y0))
-t10:=ismore1(pl(rpofrt(x0),r),rpofrt(y0),rpofrt(x0),t9,satz133(rpofrt(x0),r)):more(rpofrt(y0),rpofrt(x0))
-t11:=satz154d(y0,x0,t10):more"rt"(y0,x0)
-t12:=satz155b(y0,x0,t11):is(rpofrt(mn"rt"(y0,x0,t11)),mn(rpofrt(y0),rpofrt(x0),satz154a(y0,x0,t11)))
-t13:=satz140g(rpofrt(y0),rpofrt(x0),r,satz154a(y0,x0,t11),t9):is(r,mn(rpofrt(y0),rpofrt(x0),satz154a(y0,x0,t11)))
-t14:=tris2(cut,r,rpofrt(mn"rt"(y0,x0,t11)),mn(rpofrt(y0),rpofrt(x0),satz154a(y0,x0,t11)),t13,t12):is(r,rpofrt(mn"rt"(y0,x0,t11)))
-t15:=somei(rat,[x:rat]is(r,rpofrt(x)),mn"rt"(y0,x0,t11),t14):ratrp(r)
-s@t16:=someapp(rat,[x:rat]is(pl(r,rpofrt(x0)),rpofrt(x)),s,con,[x:rat][t:is(pl(r,rpofrt(x0)),rpofrt(x))]<t15(x,t)>i):con
--iv2d
-x0@remark1:=[t:ratrp(pl(r,rpofrt(x0)))]t16".iv2d"(t):irratrp(pl(r,rpofrt(x0)))
-+*iv2d
-r@rp:=pdofrp(r):dif
-rn:=ndofrp(r):dif
-t17:=posdirp(r):posd(rp)
-t18:=pnot0d(rp,t17):not(zero(rp))
-t19:=nnot0d(rn,negdirp(r)):not(zero(rn))
-[n:not(zero(rp))]
-t20:=tris2(cut,r,rpofpd(absd(rp),satzd166e(rp,n)),rpofpd(rp,t17),isrppd1(r),eqpderp(absd(rp),satzd166e(rp,n),rp,t17,absnnd(rp,pnotnd(rp,t17)))):is(r,rpofpd(absd(rp),satzd166e(rp,n)))
-r@t21:=treq(absd(rn),df(std(rn),stm(rn)),rp,absnd(rn,negdirp(r)),eqsmsd(std(rn),stm(rn),pl(r,1rp),1rp,stdis(1rp,pl(r,1rp)),stmis(1rp,pl(r,1rp)))):eq(absd(rn),rp)
-[n:not(zero(rn))]
-t22:=tris2(cut,r,rpofpd(absd(rn),satzd166e(rn,n)),rpofpd(rp,t17),isrppd1(r),eqpderp(absd(rn),satzd166e(rn,n),rp,t17,t21)):is(r,rpofpd(absd(rn),satzd166e(rn,n)))
-r@[s:cut][i:is(r,s)][rr:ratrp(r)]
-t23:=isp(cut,[x:cut]ratrp(x),r,s,rr,i):ratrp(s)
-i@[rs:ratrp(s)]
-t24:=isp1(cut,[x:cut]ratrp(x),s,r,rs,i):ratrp(r)
--iv2d
-r@[rr:ratrp(r)]
-remark2a:=[t:not(zero(pdofrp(r)))]t23".iv2d"(rpofpd(absd(pdofrp(r)),satzd166e(pdofrp(r),t)),t20".iv2d"(t),rr):ratd(pdofrp(r))
-remark2b:=t17".iv2d":posd(pdofrp(r))
-remark3a:=[t:not(zero(ndofrp(r)))]t23".iv2d"(rpofpd(absd(ndofrp(r)),satzd166e(ndofrp(r),t)),t22".iv2d"(t),rr):ratd(ndofrp(r))
-remark3b:=negdirp(r):negd(ndofrp(r))
-r@[i:irratrp(r)]
-remark4a:=th3"l.imp"(ratd(pdofrp(r)),ratrp(r),i,[t:ratd(pdofrp(r))]t24".iv2d"(rpofpd(absd(pdofrp(r)),satzd166e(pdofrp(r),t18".iv2d")),t20".iv2d"(t18".iv2d"),<t18".iv2d">t)):irratd(pdofrp(r))
-remark4b:=t17".iv2d":posd(pdofrp(r))
-remark5a:=th3"l.imp"(ratd(ndofrp(r)),ratrp(r),i,[t:ratd(ndofrp(r))]t24".iv2d"(rpofpd(absd(ndofrp(r)),satzd166e(ndofrp(r),t19".iv2d")),t22".iv2d"(t19".iv2d"),<t19".iv2d">t)):irratd(ndofrp(r))
-remark5b:=negdirp(r):negd(ndofrp(r))
-a@natd:=and(posd(a),[t:posd(a)]natrp(rpofpd(a,t))):'prop'
-[n:natd(a)]
-natposd:=ande1(posd(a),[t:posd(a)]natrp(rpofpd(a,t)),n):posd(a)
-natderp:=ande2"l.r"(posd(a),[t:posd(a)]natrp(rpofpd(a,t)),n):natrp(rpofpd(a,natposd(a,n)))
-b@[e:eq(a,b)][n:natd(a)]
-+*iv2d
-n"rp"@t25:=eqposd(a,b,e,natposd(a,n)):posd(b)
-[p:posd(b)]
-t26:=eqpderp(a,natposd(a,n),b,p,e):is(rpofpd(a,natposd(a,n)),rpofpd(b,p))
-t27:=isp(cut,[t:cut]natrp(t),rpofpd(a,natposd(a,n)),rpofpd(b,p),natderp(a,n),t26):natrp(rpofpd(b,p))
--iv2d
-n@eqnatd:=andi(posd(b),[t:posd(b)]natrp(rpofpd(b,t)),t25".iv2d",[t:posd(b)]t27".iv2d"(t)):natd(b)
-@[x:nat]
-pdofnt:=pdofrp(rpofnt(x)):dif
-+*iv2d
-x@t28:=posdirp(rpofnt(x)):posd(pdofnt(x))
-[p:posd(pdofnt(x))]
-t29:=isrppd1(rpofnt(x)):is(rpofnt(x),rpofpd(pdofnt(x),t28))
-t30:=eqpderp(pdofnt(x),t28,pdofnt(x),p,refeq(pdofnt(x))):is(rpofpd(pdofnt(x),t28),rpofpd(pdofnt(x),p))
-t31:=tris(cut,rpofnt(x),rpofpd(pdofnt(x),t28),rpofpd(pdofnt(x),p),t29,t30):is(rpofnt(x),rpofpd(pdofnt(x),p))
-t32:=isp(cut,[t:cut]natrp(t),rpofnt(x),rpofpd(pdofnt(x),p),natrpi(x),t31):natrp(rpofpd(pdofnt(x),p))
--iv2d
-x@natdi:=andi(posd(pdofnt(x)),[t:posd(pdofnt(x))]natrp(rpofpd(pdofnt(x),t)),t28".iv2d",[t:posd(pdofnt(x))]t32".iv2d"(t)):natd(pdofnt(x))
-a@intd:=or(zero(a),natd(absd(a))):'prop'
-b@[e:eq(a,b)][i:intd(a)]
-+*iv2d
-i"rp"@[z:zero(a)]
-t33:=eqzero(a,b,e,z):zero(b)
-i"rp"@[n:natd(absd(a))]
-t34:=eqnatd(absd(a),absd(b),eqabsd(a,b,e),n):natd(absd(b))
--iv2d
-i@eqintd:=th9"l.or"(zero(a),natd(absd(a)),zero(b),natd(absd(b)),i,[t:zero(a)]t33".iv2d"(t),[t:natd(absd(a))]t34".iv2d"(t)):intd(b)
-a@[n:natd(a)]
-+*iv2d
-n"rp"@t34a:=symeq(absd(a),a,absnnd(a,pnotnd(a,natposd(a,n)))):eq(a,absd(a))
-t35:=eqnatd(a,absd(a),t34a,n):natd(absd(a))
--iv2d
-n@natintd:=ori2(zero(a),natd(absd(a)),t35".iv2d"):intd(a)
-a@[p:posd(a)][i:intd(a)]
-+*iv2d
-i"rp"@t36:=ore2(zero(a),natd(absd(a)),i,pnot0d(a,p)):natd(absd(a))
--iv2d
-i@posintnatd:=eqnatd(absd(a),a,absnnd(a,pnotnd(a,p)),t36".iv2d"):natd(a)
-a@[z:zero(a)]
-intdi0:=ori1(zero(a),natd(absd(a)),z):intd(a)
-r@[n:natrp(r)]
-+*iv2d
-n"rp"@t37:=posdirp(r):posd(pdofrp(r))
-[p:posd(pdofrp(r))]
-t38:=tris(cut,r,rpofpd(pdofrp(r),t37),rpofpd(pdofrp(r),p),isrppd1(r),eqpderp(pdofrp(r),t37,pdofrp(r),p,refeq(pdofrp(r)))):is(r,rpofpd(pdofrp(r),p))
-t39:=isp(cut,[t:cut]natrp(t),r,rpofpd(pdofrp(r),p),n,t38):natrp(rpofpd(pdofrp(r),p))
--iv2d
-n@remark6a:=andi(posd(pdofrp(r)),[t:posd(pdofrp(r))]natrp(rpofpd(pdofrp(r),t)),t37".iv2d",[t:posd(pdofrp(r))]t39".iv2d"(t)):natd(pdofrp(r))
-remark6:=natintd(pdofrp(r),remark6a):intd(pdofrp(r))
-+*iv2d
-n"rp"@t40:=absdeql(1rp,pl(r,1rp),isless2(pl(1rp,r),pl(r,1rp),1rp,compl(1rp,r),satz133a(1rp,r))):eq(absd(ndofrp(r)),pdofrp(r))
-t41:=eqnatd(pdofrp(r),absd(ndofrp(r)),symeq(absd(ndofrp(r)),pdofrp(r),t40),remark6a):natd(absd(ndofrp(r)))
--iv2d
-n@remark7:=ori2(zero(ndofrp(r)),natd(absd(ndofrp(r))),t41".iv2d"):intd(ndofrp(r))
-a@[i:intd(a)]
-+2d174
-[n:not(zero(a))]
-t1:=ore2(zero(a),natd(absd(a)),i,n):natd(absd(a))
-t2:=ande2(posd(absd(a)),[t:posd(absd(a))]natrp(rpofpd(absd(a),t)),t1):[t:posd(absd(a))]natrp(rpofpd(absd(a),t))
-t3:=lemmaiii5(rpofpd(absd(a),satzd166e(a,n)),<satzd166e(a,n)>t2):ratrp(rpofpd(absd(a),satzd166e(a,n)))
--2d174
-satzd174:=[t:not(zero(a))]t3".2d174"(t):ratd(a)
-b@pd:=df(pl(1a,1b),pl(2a,2b)):dif
-b2@pd12:=issmsd(pl(stm(df(a1,a2)),stm(df(b1,b2))),pl(std(df(a1,a2)),std(df(b1,b2))),pl(a1,b1),pl(a2,b2),ispl12(stm(df(a1,a2)),a1,stm(df(b1,b2)),b1,stmis(a1,a2),stmis(b1,b2)),ispl12(std(df(a1,a2)),a2,std(df(b1,b2)),b2,stdis(a1,a2),stdis(b1,b2))):is"e"(dif,pd(df(a1,a2),df(b1,b2)),df(pl(a1,b1),pl(a2,b2)))
-r2@pd1:=issmsd(pl(1a,stm(df(r1,r2))),pl(2a,std(df(r1,r2))),pl(1a,r1),pl(2a,r2),ispl2(stm(df(r1,r2)),r1,1a,stmis(r1,r2)),ispl2(std(df(r1,r2)),r2,2a,stdis(r1,r2))):is"e"(dif,pd(a,df(r1,r2)),df(pl(1a,r1),pl(2a,r2)))
-pd2:=issmsd(pl(stm(df(r1,r2)),1a),pl(std(df(r1,r2)),2a),pl(r1,1a),pl(r2,2a),ispl1(stm(df(r1,r2)),r1,1a,stmis(r1,r2)),ispl1(std(df(r1,r2)),r2,2a,stdis(r1,r2))):is"e"(dif,pd(df(r1,r2),a),df(pl(r1,1a),pl(r2,2a)))
-b2@pdeq12a:=refeq1(pd(df(a1,a2),df(b1,b2)),df(pl(a1,b1),pl(a2,b2)),pd12):eq(pd(df(a1,a2),df(b1,b2)),df(pl(a1,b1),pl(a2,b2)))
-pdeq12b:=refeq2(pd(df(a1,a2),df(b1,b2)),df(pl(a1,b1),pl(a2,b2)),pd12):eq(df(pl(a1,b1),pl(a2,b2)),pd(df(a1,a2),df(b1,b2)))
-r2@pdeq1a:=refeq1(pd(a,df(r1,r2)),df(pl(1a,r1),pl(2a,r2)),pd1):eq(pd(a,df(r1,r2)),df(pl(1a,r1),pl(2a,r2)))
-pdeq1b:=refeq2(pd(a,df(r1,r2)),df(pl(1a,r1),pl(2a,r2)),pd1):eq(df(pl(1a,r1),pl(2a,r2)),pd(a,df(r1,r2)))
-pdeq2a:=refeq1(pd(df(r1,r2),a),df(pl(r1,1a),pl(r2,2a)),pd2):eq(pd(df(r1,r2),a),df(pl(r1,1a),pl(r2,2a)))
-pdeq2b:=refeq2(pd(df(r1,r2),a),df(pl(r1,1a),pl(r2,2a)),pd2):eq(df(pl(r1,1a),pl(r2,2a)),pd(df(r1,r2),a))
-b@satzd175:=eqsmsd(pl(1a,1b),pl(2a,2b),pl(1b,1a),pl(2b,2a),compl(1a,1b),compl(2a,2b)):eq(pd(a,b),pd(b,a))
-compd:=satzd175:eq(pd(a,b),pd(b,a))
-c@[e:eq(a,b)]
-+iv3d
-t1:=tr3is(cut,pl(pl(1a,1c),pl(2b,2c)),pl(pl(1a,2b),pl(1c,2c)),pl(pl(1b,2a),pl(1c,2c)),pl(pl(1b,1c),pl(2a,2c)),4pl23(1a,1c,2b,2c),ispl1(pl(1a,2b),pl(1b,2a),pl(1c,2c),e),4pl23(1b,2a,1c,2c)):is(pl(pl(1a,1c),pl(2b,2c)),pl(pl(1b,1c),pl(2a,2c)))
--iv3d
-eqpd1:=eqi12(pl(1a,1c),pl(2a,2c),pl(1b,1c),pl(2b,2c),t1".iv3d"):eq(pd(a,c),pd(b,c))
-eqpd2:=tr3eq(pd(c,a),pd(a,c),pd(b,c),pd(c,b),compd(c,a),eqpd1,compd(b,c)):eq(pd(c,a),pd(c,b))
-d@[e:eq(a,b)][f:eq(c,d)]
-eqpd12:=treq(pd(a,c),pd(b,c),pd(b,d),eqpd1(a,b,c,e),eqpd2(c,d,b,f)):eq(pd(a,c),pd(b,d))
-b@[z:zero(a)]
-+*iv3d
-z@t2:=tr4is(cut,pl(pl(1a,1b),2b),pl(1a,pl(1b,2b)),pl(2a,pl(2b,1b)),pl(pl(2a,2b),1b),pl(1b,pl(2a,2b)),asspl1(1a,1b,2b),ispl12(1a,2a,pl(1b,2b),pl(2b,1b),z,compl(1b,2b)),asspl2(2a,2b,1b),compl(pl(2a,2b),1b)):is(pl(pl(1a,1b),2b),pl(1b,pl(2a,2b)))
--iv3d
-z@pd01:=eqi2(b,pl(1a,1b),pl(2a,2b),t2".iv3d"):eq(pd(a,b),b)
-b@[z:zero(b)]
-pd02:=treq(pd(a,b),pd(b,a),a,compd(a,b),pd01(b,a,z)):eq(pd(a,b),a)
-b@[p:posd(a)][q:posd(b)]
-ppd:=posdi(pl(1a,1b),pl(2a,2b),satz137(1a,2a,1b,2b,p,q)):posd(pd(a,b))
-b@[n:negd(a)][o:negd(b)]
-npd:=negdi(pl(1a,1b),pl(2a,2b),satz137a(1a,2a,1b,2b,n,o)):negd(pd(a,b))
-a@m0d:=df(2a,1a):dif
-a2@m0deqa:=eqsmsd(std(df(a1,a2)),stm(df(a1,a2)),a2,a1,stdis(a1,a2),stmis(a1,a2)):eq(m0d(df(a1,a2)),df(a2,a1))
-m0deqb:=symeq(m0d(df(a1,a2)),df(a2,a1),m0deqa):eq(df(a2,a1),m0d(df(a1,a2)))
-b@[e:eq(a,b)]
-+*iv3d
-e@t3:=tr3is(cut,pl(2a,1b),pl(1b,2a),pl(1a,2b),pl(2b,1a),compl(2a,1b),symeq(a,b,e),compl(1a,2b)):is(pl(2a,1b),pl(2b,1a))
--iv3d
-e@eqm0d:=eqi12(2a,1a,2b,1b,t3".iv3d"):eq(m0d(a),m0d(b))
-a@[p:posd(a)]
-satzd176a:=negdi(2a,1a,satz121(1a,2a,p)):negd(m0d(a))
-a@[z:zero(a)]
-satzd176b:=zeroi(2a,1a,symis(cut,1a,2a,z)):zero(m0d(a))
-a@[n:negd(a)]
-satzd176c:=posdi(2a,1a,satz122(1a,2a,n)):posd(m0d(a))
-a@[n:negd(m0d(a))]
-satzd176d:=satz122(2a,1a,isless12(stm(m0d(a)),2a,std(m0d(a)),1a,stmis(2a,1a),stdis(2a,1a),n)):posd(a)
-a@[z:zero(m0d(a))]
-satzd176e:=symis(cut,2a,1a,tr3is(cut,2a,stm(df(2a,1a)),std(df(2a,1a)),1a,isstm(2a,1a),z,stdis(2a,1a))):zero(a)
-a@[p:posd(m0d(a))]
-satzd176f:=satz121(2a,1a,ismore12(stm(m0d(a)),2a,std(m0d(a)),1a,stmis(2a,1a),stdis(2a,1a),p)):negd(a)
-a@[z:zero(a)]
-m0d0:=zeroeq(m0d(a),a,satzd176b(a,z),z):eq(m0d(a),a)
-+3d177
-a@t1:=tris(dif,m0d(m0d(a)),df(1a,2a),a,issmsd(std(m0d(a)),stm(m0d(a)),1a,2a,stdis(2a,1a),stmis(2a,1a)),dfis(a)):is"e"(dif,m0d(m0d(a)),a)
--3d177
-a@satzd177:=refeq1(m0d(m0d(a)),a,t1".3d177"):eq(m0d(m0d(a)),a)
-satzd177a:=symeq(m0d(m0d(a)),a,satzd177):eq(a,m0d(m0d(a)))
-b@[e:eq(a,m0d(b))]
-satzd177b:=treq(m0d(a),m0d(m0d(b)),b,eqm0d(a,m0d(b),e),satzd177(b)):eq(m0d(a),b)
-satzd177c:=symeq(m0d(a),b,satzd177b):eq(b,m0d(a))
-b@[e:eq(m0d(a),b)]
-satzd177d:=satzd177c(b,a,symeq(m0d(a),b,e)):eq(a,m0d(b))
-satzd177e:=symeq(a,m0d(b),satzd177d):eq(m0d(b),a)
-+3d178
-a@[p:posd(a)]
-t1:=tr3eq(absd(m0d(a)),m0d(m0d(a)),a,absd(a),absnd(m0d(a),satzd176a(a,p)),satzd177(a),symeq(absd(a),a,absnnd(a,pnotnd(a,p)))):eq(absd(m0d(a)),absd(a))
-a@[z:zero(a)]
-t2:=tr3eq(absd(m0d(a)),m0d(a),a,absd(a),absnnd(m0d(a),0notnd(m0d(a),satzd176b(a,z))),m0d0(a,z),symeq(absd(a),a,absnnd(a,0notnd(a,z)))):eq(absd(m0d(a)),absd(a))
-a@[n:negd(a)]
-t3:=treq(absd(m0d(a)),m0d(a),absd(a),absnnd(m0d(a),pnotnd(m0d(a),satzd176c(a,n))),symeq(absd(a),m0d(a),absnd(a,n))):eq(absd(m0d(a)),absd(a))
--3d178
-a@satzd178:=rappd(a,eq(absd(m0d(a)),absd(a)),[t:posd(a)]t1".3d178"(t),[t:zero(a)]t2".3d178"(t),[t:negd(a)]t3".3d178"(t)):eq(absd(m0d(a)),absd(a))
-satzd178a:=symeq(absd(m0d(a)),absd(a),satzd178):eq(absd(a),absd(m0d(a)))
-+3d179
-t1:=pdeq1b(a,2a,1a):eq(df(pl(1a,2a),pl(2a,1a)),pd(a,m0d(a)))
-t2:=zeroi(pl(1a,2a),pl(2a,1a),compl(1a,2a)):zero(df(pl(1a,2a),pl(2a,1a)))
--3d179
-satzd179:=eqzero(df(pl(1a,2a),pl(2a,1a)),pd(a,m0d(a)),t1".3d179",t2".3d179"):zero(pd(a,m0d(a)))
-satzd179a:=eqzero(pd(a,m0d(a)),pd(m0d(a),a),compd(a,m0d(a)),satzd179):zero(pd(m0d(a),a))
-b@satzd180:=treq(m0d(pd(a,b)),df(pl(2a,2b),pl(1a,1b)),pd(m0d(a),m0d(b)),m0deqa(pl(1a,1b),pl(2a,2b)),pdeq12b(2a,1a,2b,1b)):eq(m0d(pd(a,b)),pd(m0d(a),m0d(b)))
-satzd180a:=symeq(m0d(pd(a,b)),pd(m0d(a),m0d(b)),satzd180):eq(pd(m0d(a),m0d(b)),m0d(pd(a,b)))
-md:=pd(a,m0d(b)):dif
-b2@mdeq12a:=treq(md(df(a1,a2),df(b1,b2)),pd(df(a1,a2),df(b2,b1)),df(pl(a1,b2),pl(a2,b1)),eqpd2(m0d(df(b1,b2)),df(b2,b1),df(a1,a2),m0deqa(b1,b2)),pdeq12a(a1,a2,b2,b1)):eq(md(df(a1,a2),df(b1,b2)),df(pl(a1,b2),pl(a2,b1)))
-mdeq12b:=symeq(md(df(a1,a2),df(b1,b2)),df(pl(a1,b2),pl(a2,b1)),mdeq12a):eq(df(pl(a1,b2),pl(a2,b1)),md(df(a1,a2),df(b1,b2)))
-r2@mdeq1a:=treq(md(a,df(r1,r2)),pd(a,df(r2,r1)),df(pl(1a,r2),pl(2a,r1)),eqpd2(m0d(df(r1,r2)),df(r2,r1),a,m0deqa(r1,r2)),pdeq1a(a,r2,r1)):eq(md(a,df(r1,r2)),df(pl(1a,r2),pl(2a,r1)))
-mdeq1b:=symeq(md(a,df(r1,r2)),df(pl(1a,r2),pl(2a,r1)),mdeq1a):eq(df(pl(1a,r2),pl(2a,r1)),md(a,df(r1,r2)))
-mdeq2a:=pdeq12a(r1,r2,2a,1a):eq(md(df(r1,r2),a),df(pl(r1,2a),pl(r2,1a)))
-mdeq2b:=pdeq12b(r1,r2,2a,1a):eq(df(pl(r1,2a),pl(r2,1a)),md(df(r1,r2),a))
-c@[e:eq(a,b)]
-eqmd1:=eqpd1(a,b,m0d(c),e):eq(md(a,c),md(b,c))
-eqmd2:=eqpd2(m0d(a),m0d(b),c,eqm0d(a,b,e)):eq(md(c,a),md(c,b))
-d@[e:eq(a,b)][f:eq(c,d)]
-eqmd12:=treq(md(a,c),md(b,c),md(b,d),eqmd1(a,b,c,e),eqmd2(c,d,b,f)):eq(md(a,c),md(b,d))
-b@satzd181:=tr3eq(m0d(md(a,b)),pd(m0d(a),m0d(m0d(b))),pd(m0d(a),b),md(b,a),satzd180(a,m0d(b)),eqpd2(m0d(m0d(b)),b,m0d(a),satzd177(b)),compd(m0d(a),b)):eq(m0d(md(a,b)),md(b,a))
-satzd181a:=symeq(m0d(md(b,a)),md(a,b),satzd181(b,a)):eq(md(a,b),m0d(md(b,a)))
-+3d182
-t1:=treq(md(a,b),df(pl(1a,2b),pl(2a,1b)),df(pl(1a,2b),pl(1b,2a)),pdeq1a(a,2b,1b),eqsd(pl(1a,2b),pl(2a,1b),pl(1b,2a),compl(2a,1b))):eq(md(a,b),df(pl(1a,2b),pl(1b,2a)))
-t2:=symeq(md(a,b),df(pl(1a,2b),pl(1b,2a)),t1):eq(df(pl(1a,2b),pl(1b,2a)),md(a,b))
-t3:=stmis(pl(1a,2b),pl(1b,2a)):is(stm(df(pl(1a,2b),pl(1b,2a))),pl(1a,2b))
-t4:=stdis(pl(1a,2b),pl(1b,2a)):is(std(df(pl(1a,2b),pl(1b,2a))),pl(1b,2a))
--3d182
-[p:posd(md(a,b))]
-+*3d182
-p@t5:=eqposd(md(a,b),df(pl(1a,2b),pl(1b,2a)),t1,p):posd(df(pl(1a,2b),pl(1b,2a)))
--3d182
-p@satzd182a:=ismore12(stm(df(pl(1a,2b),pl(1b,2a))),pl(1a,2b),std(df(pl(1a,2b),pl(1b,2a))),pl(1b,2a),t3".3d182",t4".3d182",t5".3d182"):mored(a,b)
-b@[z:zero(md(a,b))]
-+*3d182
-z@t6:=eqzero(md(a,b),df(pl(1a,2b),pl(1b,2a)),t1,z):zero(df(pl(1a,2b),pl(1b,2a)))
--3d182
-z@satzd182b:=tr3is(cut,pl(1a,2b),stm(df(pl(1a,2b),pl(1b,2a))),std(df(pl(1a,2b),pl(1b,2a))),pl(1b,2a),isstm(pl(1a,2b),pl(1b,2a)),t6".3d182",t4".3d182"):eq(a,b)
-b@[n:negd(md(a,b))]
-+*3d182
-n@t7:=eqnegd(md(a,b),df(pl(1a,2b),pl(1b,2a)),t1,n):negd(df(pl(1a,2b),pl(1b,2a)))
--3d182
-n@satzd182c:=isless12(stm(df(pl(1a,2b),pl(1b,2a))),pl(1a,2b),std(df(pl(1a,2b),pl(1b,2a))),pl(1b,2a),t3".3d182",t4".3d182",t7".3d182"):lessd(a,b)
-b@[m:mored(a,b)]
-+*3d182
-m@t8:=posdi(pl(1a,2b),pl(1b,2a),m):posd(df(pl(1a,2b),pl(1b,2a)))
--3d182
-m@satzd182d:=eqposd(df(pl(1a,2b),pl(1b,2a)),md(a,b),t2".3d182",t8".3d182"):posd(md(a,b))
-b@[e:eq(a,b)]
-+*3d182
-e@t9:=zeroi(pl(1a,2b),pl(1b,2a),e):zero(df(pl(1a,2b),pl(1b,2a)))
--3d182
-e@satzd182e:=eqzero(df(pl(1a,2b),pl(1b,2a)),md(a,b),t2".3d182",t9".3d182"):zero(md(a,b))
-b@[l:lessd(a,b)]
-+*3d182
-l@t10:=negdi(pl(1a,2b),pl(1b,2a),l):negd(df(pl(1a,2b),pl(1b,2a)))
--3d182
-l@satzd182f:=eqnegd(df(pl(1a,2b),pl(1b,2a)),md(a,b),t2".3d182",t10".3d182"):negd(md(a,b))
-+3d183
-b@t1:=tris(cut,pl(1a,2b),pl(2b,1a),pl(stm(m0d(b)),std(m0d(a))),compl(1a,2b),12issmsd(2b,1b,2a,1a)):is(pl(1a,2b),pl(stm(m0d(b)),std(m0d(a))))
-t2:=t1(b,a):is(pl(1b,2a),pl(stm(m0d(a)),std(m0d(b))))
--3d183
-b@[m:mored(a,b)]
-satzd183a:=isless12(pl(1b,2a),pl(stm(m0d(a)),std(m0d(b))),pl(1a,2b),pl(stm(m0d(b)),std(m0d(a))),t2".3d183",t1".3d183",lemmad5(a,b,m)):lessd(m0d(a),m0d(b))
-b@[e:eq(a,b)]
-staz183b:=eqm0d(a,b,e):eq(m0d(a),m0d(b))
-b@[l:lessd(a,b)]
-satzd183c:=ismore12(pl(1b,2a),pl(stm(m0d(a)),std(m0d(b))),pl(1a,2b),pl(stm(m0d(b)),std(m0d(a))),t2".3d183",t1".3d183",lemmad6(a,b,l)):mored(m0d(a),m0d(b))
-b@[l:lessd(m0d(a),m0d(b))]
-satzd183d:=eqmored12(m0d(m0d(a)),a,m0d(m0d(b)),b,satzd177(a),satzd177(b),satzd183c(m0d(a),m0d(b),l)):mored(a,b)
-b@[e:eq(m0d(a),m0d(b))]
-satzd183e:=tr3eq(a,m0d(m0d(a)),m0d(m0d(b)),b,satzd177a(a),eqm0d(m0d(a),m0d(b),e),satzd177(b)):eq(a,b)
-b@[m:mored(m0d(a),m0d(b))]
-satzd183f:=eqlessd12(m0d(m0d(a)),a,m0d(m0d(b)),b,satzd177(a),satzd177(b),satzd183a(m0d(a),m0d(b),m)):lessd(a,b)
-+3d184
-a@t1:=tr3eq(a,df(pl(1a,pl(1rp,1rp)),pl(2a,pl(1rp,1rp))),df(pl(pl(1a,1rp),1rp),pl(1rp,pl(2a,1rp))),md(pdofrp(1a),pdofrp(2a)),lemmad3(a,pl(1rp,1rp)),eqsmsd(pl(1a,pl(1rp,1rp)),pl(2a,pl(1rp,1rp)),pl(pl(1a,1rp),1rp),pl(1rp,pl(2a,1rp)),asspl2(1a,1rp,1rp),3pl12(2a,1rp,1rp)),mdeq12b(pl(1a,1rp),1rp,pl(2a,1rp),1rp)):eq(a,md(pdofrp(1a),pdofrp(2a)))
-t2:=and3i(posd(pdofrp(1a)),posd(pdofrp(2a)),eq(a,md(pdofrp(1a),pdofrp(2a))),posdirp(1a),posdirp(2a),t1):and3(posd(pdofrp(1a)),posd(pdofrp(2a)),eq(a,md(pdofrp(1a),pdofrp(2a))))
-t3:=somei(dif,[x:dif]and3(posd(pdofrp(1a)),posd(x),eq(a,md(pdofrp(1a),x))),pdofrp(2a),t2):some"l"(dif,[x:dif]and3(posd(pdofrp(1a)),posd(x),eq(a,md(pdofrp(1a),x))))
--3d184
-a@satzd184:=somei(dif,[x:dif]some"l"(dif,[y:dif]and3(posd(x),posd(y),eq(a,md(x,y)))),pdofrp(1a),t3".3d184"):some"l"(dif,[x:dif]some"l"(dif,[y:dif]and3(posd(x),posd(y),eq(a,md(x,y)))))
-c@asspd1:=tr3eq(pd(pd(a,b),c),df(pl(pl(1a,1b),1c),pl(pl(2a,2b),2c)),df(pl(1a,pl(1b,1c)),pl(2a,pl(2b,2c))),pd(a,pd(b,c)),pdeq2a(c,pl(1a,1b),pl(2a,2b)),eqsmsd(pl(pl(1a,1b),1c),pl(pl(2a,2b),2c),pl(1a,pl(1b,1c)),pl(2a,pl(2b,2c)),asspl1(1a,1b,1c),asspl1(2a,2b,2c)),pdeq1b(a,pl(1b,1c),pl(2b,2c))):eq(pd(pd(a,b),c),pd(a,pd(b,c)))
-asspd2:=symeq(pd(pd(a,b),c),pd(a,pd(b,c)),asspd1):eq(pd(a,pd(b,c)),pd(pd(a,b),c))
-3pd23:=tr3eq(pd(pd(a,b),c),pd(a,pd(b,c)),pd(a,pd(c,b)),pd(pd(a,c),b),asspd1(a,b,c),eqpd2(pd(b,c),pd(c,b),a,compd(b,c)),asspd2(a,c,b)):eq(pd(pd(a,b),c),pd(pd(a,c),b))
-d@4pd23:=tr3eq(pd(pd(a,b),pd(c,d)),pd(pd(pd(a,b),c),d),pd(pd(pd(a,c),b),d),pd(pd(a,c),pd(b,d)),asspd2(pd(a,b),c,d),eqpd1(pd(pd(a,b),c),pd(pd(a,c),b),d,3pd23),asspd1(pd(a,c),b,d)):eq(pd(pd(a,b),pd(c,d)),pd(pd(a,c),pd(b,d)))
-b@pdmd:=treq(pd(md(a,b),b),pd(a,pd(m0d(b),b)),a,asspd1(a,m0d(b),b),pd02(a,pd(m0d(b),b),satzd179a(b))):eq(pd(md(a,b),b),a)
-mdpd:=treq(md(pd(a,b),b),pd(a,pd(b,m0d(b))),a,asspd1(a,b,m0d(b)),pd02(a,pd(b,m0d(b)),satzd179(b))):eq(md(pd(a,b),b),a)
-d@satzd185:=treq(pd(md(a,b),md(c,d)),pd(pd(a,c),pd(m0d(b),m0d(d))),md(pd(a,c),pd(b,d)),4pd23(a,m0d(b),c,m0d(d)),eqpd2(pd(m0d(b),m0d(d)),m0d(pd(b,d)),pd(a,c),satzd180a(b,d))):eq(pd(md(a,b),md(c,d)),md(pd(a,c),pd(b,d)))
-c@satzd186:=asspd1:eq(pd(pd(a,b),c),pd(a,pd(b,c)))
-b@satzd187a:=treq(pd(b,md(a,b)),pd(md(a,b),b),a,compd(b,md(a,b)),pdmd):eq(pd(b,md(a,b)),a)
-[x:dif][e:eq(pd(b,x),a)]
-satzd187c:=treq(md(a,b),md(pd(x,b),b),x,eqmd1(a,pd(x,b),b,treq1(a,pd(x,b),pd(b,x),e,compd(b,x))),mdpd(x,b)):eq(md(a,b),x)
-satzd187d:=symeq(md(a,b),x,satzd187c):eq(x,md(a,b))
-x@[e:eq(pd(x,b),a)]
-satzd187e:=satzd187c(treq(pd(b,x),pd(x,b),a,compd(b,x),e)):eq(md(a,b),x)
-satzd187f:=symeq(md(a,b),x,satzd187e):eq(x,md(a,b))
-+3d188
-c@t1:=tr3eq(md(pd(a,c),pd(b,c)),pd(pd(a,c),pd(m0d(b),m0d(c))),pd(md(a,b),md(c,c)),md(a,b),eqpd2(m0d(pd(b,c)),pd(m0d(b),m0d(c)),pd(a,c),satzd180(b,c)),4pd23(a,c,m0d(b),m0d(c)),pd02(md(a,b),md(c,c),satzd179(c))):eq(md(pd(a,c),pd(b,c)),md(a,b))
-t2:=symeq(md(pd(a,c),pd(b,c)),md(a,b),t1):eq(md(a,b),md(pd(a,c),pd(b,c)))
--3d188
-c@[m:mored(pd(a,c),pd(b,c))]
-+*3d188
-m@t3:=eqposd(md(pd(a,c),pd(b,c)),md(a,b),t1,satzd182d(pd(a,c),pd(b,c),m)):posd(md(a,b))
--3d188
-m@satzd188a:=satzd182a(a,b,t3".3d188"):mored(a,b)
-c@[e:eq(pd(a,c),pd(b,c))]
-+*3d188
-e@t4:=eqzero(md(pd(a,c),pd(b,c)),md(a,b),t1,satzd182e(pd(a,c),pd(b,c),e)):zero(md(a,b))
--3d188
-e@satzd188b:=satzd182b(a,b,t4".3d188"):eq(a,b)
-c@[l:lessd(pd(a,c),pd(b,c))]
-+*3d188
-l@t5:=eqnegd(md(pd(a,c),pd(b,c)),md(a,b),t1,satzd182f(pd(a,c),pd(b,c),l)):negd(md(a,b))
--3d188
-l@satzd188c:=satzd182c(a,b,t5".3d188"):lessd(a,b)
-c@[m:mored(a,b)]
-+*3d188
-m@t6:=eqposd(md(a,b),md(pd(a,c),pd(b,c)),t2,satzd182d(a,b,m)):posd(md(pd(a,c),pd(b,c)))
--3d188
-m@satzd188d:=satzd182a(pd(a,c),pd(b,c),t6".3d188"):mored(pd(a,c),pd(b,c))
-c@[e:eq(a,b)]
-satzd188e:=eqpd1(a,b,c,e):eq(pd(a,c),pd(b,c))
-c@[l:lessd(a,b)]
-+*3d188
-l@t7:=eqnegd(md(a,b),md(pd(a,c),pd(b,c)),t2,satzd182f(a,b,l)):negd(md(pd(a,c),pd(b,c)))
--3d188
-l@satzd188f:=satzd182c(pd(a,c),pd(b,c),t7".3d188"):lessd(pd(a,c),pd(b,c))
-c@[m:mored(pd(c,a),pd(c,b))]
-satzd188g:=satzd188a(eqmored12(pd(c,a),pd(a,c),pd(c,b),pd(b,c),compd(c,a),compd(c,b),m)):mored(a,b)
-c@[e:eq(pd(c,a),pd(c,b))]
-satzd188h:=satzd188b(tr3eq(pd(a,c),pd(c,a),pd(c,b),pd(b,c),compd(a,c),e,compd(c,b))):eq(a,b)
-[l:lessd(pd(c,a),pd(c,b))]
-satzd188j:=satzd188c(eqlessd12(pd(c,a),pd(a,c),pd(c,b),pd(b,c),compd(c,a),compd(c,b),l)):lessd(a,b)
-c@[m:mored(a,b)]
-satzd188k:=eqmored12(pd(a,c),pd(c,a),pd(b,c),pd(c,b),compd(a,c),compd(b,c),satzd188d(m)):mored(pd(c,a),pd(c,b))
-c@[e:eq(a,b)]
-satzd188l:=eqpd2(a,b,c,e):eq(pd(c,a),pd(c,b))
-c@[l:lessd(a,b)]
-satzd188m:=eqlessd12(pd(a,c),pd(c,a),pd(b,c),pd(c,b),compd(a,c),compd(b,c),satzd188f(l)):lessd(pd(c,a),pd(c,b))
-d@[e:eq(a,b)][m:mored(c,d)]
-satzd188n:=eqmored2(pd(a,d),pd(b,d),pd(a,c),eqpd1(a,b,d,e),satzd188k(c,d,a,m)):mored(pd(a,c),pd(b,d))
-satzd188o:=eqmored12(pd(a,c),pd(c,a),pd(b,d),pd(d,b),compd(a,c),compd(b,d),satzd188n):mored(pd(c,a),pd(d,b))
-e@[l:lessd(c,d)]
-satzd188p:=eqlessd2(pd(a,d),pd(b,d),pd(a,c),eqpd1(a,b,d,e),satzd188m(c,d,a,l)):lessd(pd(a,c),pd(b,d))
-satzd188q:=eqlessd12(pd(a,c),pd(c,a),pd(b,d),pd(d,b),compd(a,c),compd(b,d),satzd188p):lessd(pd(c,a),pd(d,b))
-d@[m:mored(a,b)][n:mored(c,d)]
-satzd189:=trmored(pd(a,c),pd(b,c),pd(b,d),satzd188d(a,b,c,m),satzd188k(c,d,b,n)):mored(pd(a,c),pd(b,d))
-d@[l:lessd(a,b)][k:lessd(c,d)]
-satzd189a:=lemmad5(pd(b,d),pd(a,c),satzd189(b,a,d,c,lemmad6(a,b,l),lemmad6(c,d,k))):lessd(pd(a,c),pd(b,d))
-d@[m:moreq(a,b)][n:mored(c,d)]
-satzd190a:=orapp(mored(a,b),eq(a,b),mored(pd(a,c),pd(b,d)),m,[t:mored(a,b)]satzd189(t,n),[t:eq(a,b)]satzd188n(t,n)):mored(pd(a,c),pd(b,d))
-d@[m:mored(a,b)][n:moreq(c,d)]
-satzd190b:=eqmored12(pd(c,a),pd(a,c),pd(d,b),pd(b,d),compd(c,a),compd(d,b),satzd190a(c,d,a,b,n,m)):mored(pd(a,c),pd(b,d))
-d@[l:lesseq(a,b)][k:lessd(c,d)]
-satzd190c:=lemmad5(pd(b,d),pd(a,c),satzd190a(b,a,d,c,satzd168b(a,b,l),lemmad6(c,d,k))):lessd(pd(a,c),pd(b,d))
-d@[l:lessd(a,b)][k:lesseq(c,d)]
-satzd190d:=lemmad5(pd(b,d),pd(a,c),satzd190b(b,a,d,c,lemmad6(a,b,l),satzd168b(c,d,k))):lessd(pd(a,c),pd(b,d))
-d@[m:moreq(a,b)][n:moreq(c,d)]
-+3d191
-[e:eq(a,b)][f:eq(c,d)]
-t1:=moreqi2(pd(a,c),pd(b,d),eqpd12(a,b,c,d,e,f)):moreq(pd(a,c),pd(b,d))
-e@[o:mored(c,d)]
-t2:=moreqi1(pd(a,c),pd(b,d),satzd190a(m,o)):moreq(pd(a,c),pd(b,d))
-e@t3:=orapp(mored(c,d),eq(c,d),moreq(pd(a,c),pd(b,d)),n,[t:mored(c,d)]t2(t),[t:eq(c,d)]t1(t)):moreq(pd(a,c),pd(b,d))
-n@[o:mored(a,b)]
-t4:=moreqi1(pd(a,c),pd(b,d),satzd190b(o,n)):moreq(pd(a,c),pd(b,d))
--3d191
-satzd191:=orapp(mored(a,b),eq(a,b),moreq(pd(a,c),pd(b,d)),m,[t:mored(a,b)]t4".3d191"(t),[t:eq(a,b)]t3".3d191"(t)):moreq(pd(a,c),pd(b,d))
-d@[l:lesseq(a,b)][k:lesseq(c,d)]
-satzd191a:=satzd168a(pd(b,d),pd(a,c),satzd191(b,a,d,c,satzd168b(a,b,l),satzd168b(c,d,k))):lesseq(pd(a,c),pd(b,d))
-b@td:=df(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b))):dif
-+iv4d
-a2@[r:cut]
-t1:=ists1(stm(df(a1,a2)),a1,r,stmis(a1,a2)):is(ts(stm(df(a1,a2)),r),ts(a1,r))
-t2:=ists2(stm(df(a1,a2)),a1,r,stmis(a1,a2)):is(ts(r,stm(df(a1,a2))),ts(r,a1))
-t3:=ists1(std(df(a1,a2)),a2,r,stdis(a1,a2)):is(ts(std(df(a1,a2)),r),ts(a2,r))
-t4:=ists2(std(df(a1,a2)),a2,r,stdis(a1,a2)):is(ts(r,std(df(a1,a2))),ts(r,a2))
-[s:cut]
-t5:=ispl12(ts(stm(df(a1,a2)),r),ts(a1,r),ts(std(df(a1,a2)),s),ts(a2,s),t1(r),t3(s)):is(pl(ts(stm(df(a1,a2)),r),ts(std(df(a1,a2)),s)),pl(ts(a1,r),ts(a2,s)))
-t6:=ispl12(ts(r,stm(df(a1,a2))),ts(r,a1),ts(s,std(df(a1,a2))),ts(s,a2),t2(r),t4(s)):is(pl(ts(r,stm(df(a1,a2))),ts(s,std(df(a1,a2)))),pl(ts(r,a1),ts(s,a2)))
-t7:=ispl12(ts(std(df(a1,a2)),r),ts(a2,r),ts(stm(df(a1,a2)),s),ts(a1,s),t3(r),t1(s)):is(pl(ts(std(df(a1,a2)),r),ts(stm(df(a1,a2)),s)),pl(ts(a2,r),ts(a1,s)))
-t8:=ispl12(ts(r,std(df(a1,a2))),ts(r,a2),ts(s,stm(df(a1,a2))),ts(s,a1),t4(r),t2(s)):is(pl(ts(r,std(df(a1,a2))),ts(s,stm(df(a1,a2)))),pl(ts(r,a2),ts(s,a1)))
-b2@t9:=tris(cut,pl(ts(stm(df(a1,a2)),stm(df(b1,b2))),ts(std(df(a1,a2)),std(df(b1,b2)))),pl(ts(a1,stm(df(b1,b2))),ts(a2,std(df(b1,b2)))),pl(ts(a1,b1),ts(a2,b2)),t5(a1,a2,stm(df(b1,b2)),std(df(b1,b2))),t6(b1,b2,a1,a2)):is(pl(ts(stm(df(a1,a2)),stm(df(b1,b2))),ts(std(df(a1,a2)),std(df(b1,b2)))),pl(ts(a1,b1),ts(a2,b2)))
-t10:=tris(cut,pl(ts(stm(df(a1,a2)),std(df(b1,b2))),ts(std(df(a1,a2)),stm(df(b1,b2)))),pl(ts(a1,std(df(b1,b2))),ts(a2,stm(df(b1,b2)))),pl(ts(a1,b2),ts(a2,b1)),t5(a1,a2,std(df(b1,b2)),stm(df(b1,b2))),t8(b1,b2,a1,a2)):is(pl(ts(stm(df(a1,a2)),std(df(b1,b2))),ts(std(df(a1,a2)),stm(df(b1,b2)))),pl(ts(a1,b2),ts(a2,b1)))
--iv4d
-b2@td12:=issmsd(pl(ts(stm(df(a1,a2)),stm(df(b1,b2))),ts(std(df(a1,a2)),std(df(b1,b2)))),pl(ts(stm(df(a1,a2)),std(df(b1,b2))),ts(std(df(a1,a2)),stm(df(b1,b2)))),pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1)),t9".iv4d",t10".iv4d"):is"e"(dif,td(df(a1,a2),df(b1,b2)),df(pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1))))
-r2@td1:=issmsd(pl(ts(1a,stm(df(r1,r2))),ts(2a,std(df(r1,r2)))),pl(ts(1a,std(df(r1,r2))),ts(2a,stm(df(r1,r2)))),pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1)),t6".iv4d"(r1,r2,1a,2a),t8".iv4d"(r1,r2,1a,2a)):is"e"(dif,td(a,df(r1,r2)),df(pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1))))
-td2:=issmsd(pl(ts(stm(df(r1,r2)),1a),ts(std(df(r1,r2)),2a)),pl(ts(stm(df(r1,r2)),2a),ts(std(df(r1,r2)),1a)),pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a)),t5".iv4d"(r1,r2,1a,2a),t5".iv4d"(r1,r2,2a,1a)):is"e"(dif,td(df(r1,r2),a),df(pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a))))
-b2@tdeq12a:=refeq1(td(df(a1,a2),df(b1,b2)),df(pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1))),td12):eq(td(df(a1,a2),df(b1,b2)),df(pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1))))
-tdeq12b:=refeq2(td(df(a1,a2),df(b1,b2)),df(pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1))),td12):eq(df(pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1))),td(df(a1,a2),df(b1,b2)))
-r2@tdeq1a:=refeq1(td(a,df(r1,r2)),df(pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1))),td1):eq(td(a,df(r1,r2)),df(pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1))))
-tdeq1b:=refeq2(td(a,df(r1,r2)),df(pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1))),td1):eq(df(pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1))),td(a,df(r1,r2)))
-tdeq2a:=refeq1(td(df(r1,r2),a),df(pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a))),td2):eq(td(df(r1,r2),a),df(pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a))))
-tdeq2b:=refeq2(td(df(r1,r2),a),df(pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a))),td2):eq(df(pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a))),td(df(r1,r2),a))
-+4d194
-b@t1:=ispl12(ts(1a,1b),ts(1b,1a),ts(2a,2b),ts(2b,2a),comts(1a,1b),comts(2a,2b)):is(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1b,1a),ts(2b,2a)))
-t2:=tris(cut,pl(ts(1a,2b),ts(2a,1b)),pl(ts(2a,1b),ts(1a,2b)),pl(ts(1b,2a),ts(2b,1a)),compl(ts(1a,2b),ts(2a,1b)),ispl12(ts(2a,1b),ts(1b,2a),ts(1a,2b),ts(2b,1a),comts(2a,1b),comts(1a,2b))):is(pl(ts(1a,2b),ts(2a,1b)),pl(ts(1b,2a),ts(2b,1a)))
--4d194
-b@satzd194:=eqsmsd(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)),pl(ts(1b,1a),ts(2b,2a)),pl(ts(1b,2a),ts(2b,1a)),t1".4d194",t2".4d194"):eq(td(a,b),td(b,a))
-comtd:=satzd194:eq(td(a,b),td(b,a))
-c@[e:eq(a,b)]
-+*iv4d
-e@[r:cut]
-t11:=tr3is(cut,pl(ts(1a,r),ts(2b,r)),ts(pl(1a,2b),r),ts(pl(1b,2a),r),pl(ts(1b,r),ts(2a,r)),distpt1(1a,2b,r),ists1(pl(1a,2b),pl(1b,2a),r,e),disttp1(1b,2a,r)):is(pl(ts(1a,r),ts(2b,r)),pl(ts(1b,r),ts(2a,r)))
-e@t12:=tr3is(cut,pl(pl(ts(1a,1c),ts(2a,2c)),pl(ts(1b,2c),ts(2b,1c))),pl(pl(ts(1a,1c),ts(2b,1c)),pl(ts(1b,2c),ts(2a,2c))),pl(pl(ts(1b,1c),ts(2a,1c)),pl(ts(1a,2c),ts(2b,2c))),pl(pl(ts(1b,1c),ts(2b,2c)),pl(ts(1a,2c),ts(2a,1c))),4pl24(ts(1a,1c),ts(2a,2c),ts(1b,2c),ts(2b,1c)),ispl12(pl(ts(1a,1c),ts(2b,1c)),pl(ts(1b,1c),ts(2a,1c)),pl(ts(1b,2c),ts(2a,2c)),pl(ts(1a,2c),ts(2b,2c)),t11(1c),t11(b,a,c,symeq(a,b,e),2c)),4pl24(ts(1b,1c),ts(2a,1c),ts(1a,2c),ts(2b,2c))):is(pl(pl(ts(1a,1c),ts(2a,2c)),pl(ts(1b,2c),ts(2b,1c))),pl(pl(ts(1b,1c),ts(2b,2c)),pl(ts(1a,2c),ts(2a,1c))))
--iv4d
-e@eqtd1:=eqi12(pl(ts(1a,1c),ts(2a,2c)),pl(ts(1a,2c),ts(2a,1c)),pl(ts(1b,1c),ts(2b,2c)),pl(ts(1b,2c),ts(2b,1c)),t12".iv4d"):eq(td(a,c),td(b,c))
-eqtd2:=tr3eq(td(c,a),td(a,c),td(b,c),td(c,b),comtd(c,a),eqtd1,comtd(b,c)):eq(td(c,a),td(c,b))
-d@[e:eq(a,b)][f:eq(c,d)]
-eqtd12:=treq(td(a,c),td(b,c),td(b,d),eqtd1(a,b,c,e),eqtd2(c,d,b,f)):eq(td(a,c),td(b,d))
-b@[z:zero(a)]
-+4d192
-t1:=tris(cut,pl(ts(1a,1b),ts(2a,2b)),pl(ts(2a,1b),ts(1a,2b)),pl(ts(1a,2b),ts(2a,1b)),ispl12(ts(1a,1b),ts(2a,1b),ts(2a,2b),ts(1a,2b),ists1(1a,2a,1b,z),ists1(2a,1a,2b,symis(cut,1a,2a,z))),compl(ts(2a,1b),ts(1a,2b))):is(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)))
--4d192
-satzd192a:=zeroi(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)),t1".4d192"):zero(td(a,b))
-b@[z:zero(b)]
-satzd192b:=eqzero(td(b,a),td(a,b),comtd(b,a),satzd192a(b,a,z)):zero(td(a,b))
-b@[z:zero(a)]
-td01:=satzd192a(z):zero(td(a,b))
-b@[z:zero(b)]
-td02:=satzd192b(z):zero(td(a,b))
-b@satzd197a:=tr3eq(td(m0d(a),b),df(pl(ts(2a,1b),ts(1a,2b)),pl(ts(2a,2b),ts(1a,1b))),df(pl(ts(1a,2b),ts(2a,1b)),pl(ts(1a,1b),ts(2a,2b))),m0d(td(a,b)),tdeq2a(b,2a,1a),eqsmsd(pl(ts(2a,1b),ts(1a,2b)),pl(ts(2a,2b),ts(1a,1b)),pl(ts(1a,2b),ts(2a,1b)),pl(ts(1a,1b),ts(2a,2b)),compl(ts(2a,1b),ts(1a,2b)),compl(ts(2a,2b),ts(1a,1b))),m0deqb(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)))):eq(td(m0d(a),b),m0d(td(a,b)))
-satzd197b:=tr3eq(td(a,m0d(b)),td(m0d(b),a),m0d(td(b,a)),m0d(td(a,b)),comtd(a,m0d(b)),satzd197a(b,a),eqm0d(td(b,a),td(a,b),comtd(b,a))):eq(td(a,m0d(b)),m0d(td(a,b)))
-satzd197c:=treq2(td(m0d(a),b),td(a,m0d(b)),m0d(td(a,b)),satzd197a,satzd197b):eq(td(m0d(a),b),td(a,m0d(b)))
-satzd197d:=symeq(td(m0d(a),b),td(a,m0d(b)),satzd197c):eq(td(a,m0d(b)),td(m0d(a),b))
-satzd197e:=symeq(td(m0d(a),b),m0d(td(a,b)),satzd197a):eq(m0d(td(a,b)),td(m0d(a),b))
-satzd197f:=symeq(td(a,m0d(b)),m0d(td(a,b)),satzd197b):eq(m0d(td(a,b)),td(a,m0d(b)))
-satzd198:=treq(td(m0d(a),m0d(b)),td(a,m0d(m0d(b))),td(a,b),satzd197c(a,m0d(b)),eqtd2(m0d(m0d(b)),b,a,satzd177(b))):eq(td(m0d(a),m0d(b)),td(a,b))
-satzd198a:=symeq(td(m0d(a),m0d(b)),td(a,b),satzd198):eq(td(a,b),td(m0d(a),m0d(b)))
-[p:posd(a)][q:posd(b)]
-+*iv4d
-q@[r:cut]
-t13:=tris(cut,pl(ts(r,mn(1b,2b,q)),ts(r,2b)),ts(r,pl(mn(1b,2b,q),2b)),ts(r,1b),distpt2(r,mn(1b,2b,q),2b),ists2(pl(mn(1b,2b,q),2b),1b,r,satz140e(1b,2b,q))):is(pl(ts(r,mn(1b,2b,q)),ts(r,2b)),ts(r,1b))
-[s:cut]
-t14:=tris(cut,pl(ts(r,mn(1b,2b,q)),pl(ts(r,2b),s)),pl(pl(ts(r,mn(1b,2b,q)),ts(r,2b)),s),pl(ts(r,1b),s),asspl2(ts(r,mn(1b,2b,q)),ts(r,2b),s),ispl1(pl(ts(r,mn(1b,2b,q)),ts(r,2b)),ts(r,1b),s,t13)):is(pl(ts(r,mn(1b,2b,q)),pl(ts(r,2b),s)),pl(ts(r,1b),s))
-t15:=tris(cut,pl(ts(r,mn(1b,2b,q)),pl(ts(r,2b),s)),pl(ts(r,1b),s),pl(s,ts(r,1b)),t14,compl(ts(r,1b),s)):is(pl(ts(r,mn(1b,2b,q)),pl(ts(r,2b),s)),pl(s,ts(r,1b)))
-q@t16:=satz135h(pl(ts(1a,2b),ts(2a,2b)),pl(ts(2a,2b),ts(1a,2b)),ts(1a,mn(1b,2b,q)),ts(2a,mn(1b,2b,q)),compl(ts(1a,2b),ts(2a,2b)),satz145a(1a,2a,mn(1b,2b,q),p)):more(pl(ts(1a,mn(1b,2b,q)),pl(ts(1a,2b),ts(2a,2b))),pl(ts(2a,mn(1b,2b,q)),pl(ts(2a,2b),ts(1a,2b))))
-t17:=ismore12(pl(ts(1a,mn(1b,2b,q)),pl(ts(1a,2b),ts(2a,2b))),pl(ts(1a,1b),ts(2a,2b)),pl(ts(2a,mn(1b,2b,q)),pl(ts(2a,2b),ts(1a,2b))),pl(ts(1a,2b),ts(2a,1b)),t14(1a,ts(2a,2b)),t15(2a,ts(1a,2b)),t16):more(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)))
--iv4d
-q@ptdpp:=posdi(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)),t17".iv4d"):posd(td(a,b))
-b@[p:posd(a)][n:negd(b)]
-+*iv4d
-n@t18:=eqposd(td(a,m0d(b)),m0d(td(a,b)),satzd197b(a,b),ptdpp(a,m0d(b),p,satzd176c(b,n))):posd(m0d(td(a,b)))
--iv4d
-n@ntdpn:=satzd176f(td(a,b),t18".iv4d"):negd(td(a,b))
-b@[n:negd(a)][p:posd(b)]
-ntdnp:=eqnegd(td(b,a),td(a,b),comtd(b,a),ntdpn(b,a,p,n)):negd(td(a,b))
-b@[n:negd(a)][o:negd(b)]
-ptdnn:=eqposd(td(m0d(a),m0d(b)),td(a,b),satzd198(a,b),ptdpp(m0d(a),m0d(b),satzd176c(a,n),satzd176c(b,o))):posd(td(a,b))
-b@[n:not(zero(a))][o:not(zero(b))]
-+*4d192
-o@[p:posd(a)][q:posd(b)]
-t2:=pnot0d(td(a,b),ptdpp(a,b,p,q)):not(zero(td(a,b)))
-p@[m:negd(b)]
-t3:=nnot0d(td(a,b),ntdpn(a,b,p,m)):not(zero(td(a,b)))
-p@t4:=rappd(b,not(zero(td(a,b))),[t:posd(b)]t2(t),th2"l.imp"(zero(b),not(zero(td(a,b))),o),[t:negd(b)]t3(t)):not(zero(td(a,b)))
-o@[m:negd(a)][p:posd(b)]
-t5:=nnot0d(td(a,b),ntdnp(a,b,m,p)):not(zero(td(a,b)))
-m@[l:negd(b)]
-t6:=pnot0d(td(a,b),ptdnn(a,b,m,l)):not(zero(td(a,b)))
-m@t7:=rappd(b,not(zero(td(a,b))),[t:posd(b)]t5(t),th2"l.imp"(zero(b),not(zero(td(a,b))),o),[t:negd(b)]t6(t)):not(zero(td(a,b)))
--4d192
-o@satzd192d:=rappd(a,not(zero(td(a,b))),[t:posd(a)]t4".4d192"(t),th2"l.imp"(zero(a),not(zero(td(a,b))),n),[t:negd(a)]t7".4d192"(t)):not(zero(td(a,b)))
-b@[z:zero(td(a,b))]
-+*4d192
-z@[n:not(zero(a))]
-t8:=et(zero(b),th3"l.imp"(not(zero(b)),not(zero(td(a,b))),weli(zero(td(a,b)),z),[t:not(zero(b))]satzd192d(n,t))):zero(b)
--4d192
-z@satzd192c:=[t:not(zero(a))]t8".4d192"(t):or(zero(a),zero(b))
-+4d193
-b@[p:posd(a)][q:posd(b)]
-t1:=treq2(absd(td(a,b)),td(absd(a),absd(b)),td(a,b),absnnd(td(a,b),pnotnd(td(a,b),ptdpp(a,b,p,q))),eqtd12(absd(a),a,absd(b),b,absnnd(a,pnotnd(a,p)),absnnd(b,pnotnd(b,q)))):eq(absd(td(a,b)),td(absd(a),absd(b)))
-p@[n:negd(b)]
-t2:=treq(absd(td(a,b)),m0d(td(a,b)),td(a,m0d(b)),absnd(td(a,b),ntdpn(a,b,p,n)),satzd197f(a,b)):eq(absd(td(a,b)),td(a,m0d(b)))
-t3:=treq2(absd(td(a,b)),td(absd(a),absd(b)),td(a,m0d(b)),t2,eqtd12(absd(a),a,absd(b),m0d(b),absnnd(a,pnotnd(a,p)),absnd(b,n))):eq(absd(td(a,b)),td(absd(a),absd(b)))
-b@[z:zero(a)]
-t4:=zeroeq(absd(td(a,b)),td(absd(a),absd(b)),satzd166f(td(a,b),td01(a,b,z)),td01(absd(a),absd(b),satzd166f(a,z))):eq(absd(td(a,b)),td(absd(a),absd(b)))
-b@[z:zero(b)]
-t5:=zeroeq(absd(td(a,b)),td(absd(a),absd(b)),satzd166f(td(a,b),td02(a,b,z)),td02(absd(a),absd(b),satzd166f(b,z))):eq(absd(td(a,b)),td(absd(a),absd(b)))
-b@[n:negd(a)][p:posd(b)]
-t6:=tr3eq(absd(td(a,b)),absd(td(b,a)),td(absd(b),absd(a)),td(absd(a),absd(b)),eqabsd(td(a,b),td(b,a),comtd(a,b)),t3(b,a,p,n),comtd(absd(b),absd(a))):eq(absd(td(a,b)),td(absd(a),absd(b)))
-n@[o:negd(b)]
-t7:=treq(td(absd(a),absd(b)),td(m0d(a),m0d(b)),td(a,b),eqtd12(absd(a),m0d(a),absd(b),m0d(b),absnd(a,n),absnd(b,o)),satzd198(a,b)):eq(td(absd(a),absd(b)),td(a,b))
-t8:=treq2(absd(td(a,b)),td(absd(a),absd(b)),td(a,b),absnnd(td(a,b),pnotnd(td(a,b),ptdnn(a,b,n,o))),t7):eq(absd(td(a,b)),td(absd(a),absd(b)))
-b@[p:posd(a)]
-t9:=rappd(b,eq(absd(td(a,b)),td(absd(a),absd(b))),[t:posd(b)]t1(p,t),[t:zero(b)]t5(t),[t:negd(b)]t3(p,t)):eq(absd(td(a,b)),td(absd(a),absd(b)))
-b@[n:negd(a)]
-t10:=rappd(b,eq(absd(td(a,b)),td(absd(a),absd(b))),[t:posd(b)]t6(n,t),[t:zero(b)]t5(t),[t:negd(b)]t8(n,t)):eq(absd(td(a,b)),td(absd(a),absd(b)))
--4d193
-b@satzd193:=rappd(a,eq(absd(td(a,b)),td(absd(a),absd(b))),[t:posd(a)]t9".4d193"(t),[t:zero(a)]t4".4d193"(t),[t:negd(a)]t10".4d193"(t)):eq(absd(td(a,b)),td(absd(a),absd(b)))
-satzd103a:=symeq(absd(td(a,b)),td(absd(a),absd(b)),satzd193):eq(td(absd(a),absd(b)),absd(td(a,b)))
-@1df:=pdofrp(1rp):dif
-+4d195
-a@t1:=tris(cut,pl(pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),2a),pl(ts(1a,pl(1rp,1rp)),pl(ts(2a,1rp),2a)),pl(pl(1a,1a),pl(2a,2a)),asspl1(ts(1a,pl(1rp,1rp)),ts(2a,1rp),2a),ispl12(ts(1a,pl(1rp,1rp)),pl(1a,1a),pl(ts(2a,1rp),2a),pl(2a,2a),a2isapa(1a),ispl1(ts(2a,1rp),2a,2a,satz151(2a)))):is(pl(pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),2a),pl(pl(1a,1a),pl(2a,2a)))
-t2:=tris(cut,pl(1a,pl(ts(1a,1rp),ts(2a,pl(1rp,1rp)))),pl(pl(1a,ts(1a,1rp)),ts(2a,pl(1rp,1rp))),pl(pl(1a,1a),pl(2a,2a)),asspl2(1a,ts(1a,1rp),ts(2a,pl(1rp,1rp))),ispl12(pl(1a,ts(1a,1rp)),pl(1a,1a),ts(2a,pl(1rp,1rp)),pl(2a,2a),ispl2(ts(1a,1rp),1a,1a,satz151(1a)),a2isapa(2a))):is(pl(1a,pl(ts(1a,1rp),ts(2a,pl(1rp,1rp)))),pl(pl(1a,1a),pl(2a,2a)))
-t3:=tris2(cut,pl(pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),2a),pl(1a,pl(ts(1a,1rp),ts(2a,pl(1rp,1rp)))),pl(pl(1a,1a),pl(2a,2a)),t1,t2):is(pl(pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),2a),pl(1a,pl(ts(1a,1rp),ts(2a,pl(1rp,1rp)))))
--4d195
-a@satzd195:=treq(td(a,1df),df(pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),pl(ts(1a,1rp),ts(2a,pl(1rp,1rp)))),a,tdeq1a(a,pl(1rp,1rp),1rp),eqi2(a,pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),pl(ts(1a,1rp),ts(2a,pl(1rp,1rp))),t3".4d195")):eq(td(a,1df),a)
-satzd195a:=symeq(td(a,1df),a,satzd195):eq(a,td(a,1df))
-satzd195b:=treq(td(1df,a),td(a,1df),a,comtd(1df,a),satzd195):eq(td(1df,a),a)
-satzd195c:=symeq(td(1df,a),a,satzd195b):eq(a,td(1df,a))
-b@[p:posd(a)][q:posd(b)]
-satzd196a:=symeq(td(absd(a),absd(b)),td(a,b),eqtd12(absd(a),a,absd(b),b,absnnd(a,pnotnd(a,p)),absnnd(b,pnotnd(b,q)))):eq(td(a,b),td(absd(a),absd(b)))
-b@[n:negd(a)][o:negd(b)]
-satzd196b:=treq2(td(a,b),td(absd(a),absd(b)),td(m0d(a),m0d(b)),satzd198a(a,b),eqtd12(absd(a),m0d(a),absd(b),m0d(b),absnd(a,n),absnd(b,o))):eq(td(a,b),td(absd(a),absd(b)))
-b@[p:posd(a)][n:negd(b)]
-satzd196c:=treq1(td(a,b),m0d(td(absd(a),absd(b))),td(absd(a),m0d(absd(b))),eqtd12(absd(a),a,m0d(absd(b)),b,absnnd(a,pnotnd(a,p)),satzd177b(absd(b),b,absnd(b,n))),satzd197b(absd(a),absd(b))):eq(td(a,b),m0d(td(absd(a),absd(b))))
-b@[n:negd(a)][p:posd(b)]
-satzd196d:=tr3eq(td(a,b),td(b,a),m0d(td(absd(b),absd(a))),m0d(td(absd(a),absd(b))),comtd(a,b),satzd196c(b,a,p,n),eqm0d(td(absd(b),absd(a)),td(absd(a),absd(b)),comtd(absd(b),absd(a)))):eq(td(a,b),m0d(td(absd(a),absd(b))))
-+4d196
-b@p1p2:=and(posd(a),posd(b)):'prop'
-p1n2:=and(posd(a),negd(b)):'prop'
-n1p2:=and(negd(a),posd(b)):'prop'
-n1n2:=and(negd(a),negd(b)):'prop'
--4d196
-b@[n:not(zero(a))][o:not(zero(b))][e:eq(td(a,b),td(absd(a),absd(b)))]
-+*4d196
-o@t1:=ptdpp(absd(a),absd(b),satzd166e(a,n),satzd166e(b,o)):posd(td(absd(a),absd(b)))
-e@t2:=pnotnd(td(a,b),eqposd(td(absd(a),absd(b)),td(a,b),symeq(td(a,b),td(absd(a),absd(b)),e),t1)):not(negd(td(a,b)))
-[p:posd(a)]
-t3:=th3"l.imp"(negd(b),negd(td(a,b)),t2,[t:negd(b)]ntdpn(a,b,p,t)):not(negd(b))
-t4:=or3e2(zero(b),posd(b),negd(b),axrdo(b),t3,o):posd(b)
-t5:=andi(posd(a),posd(b),p,t4):p1p2
-t6:=ori1(p1p2,n1n2,t5):or(p1p2,n1n2)
-e@[m:negd(a)]
-t7:=th3"l.imp"(posd(b),negd(td(a,b)),t2,[t:posd(b)]ntdnp(a,b,m,t)):not(posd(b))
-t8:=or3e3(zero(b),posd(b),negd(b),axrdo(b),o,t7):negd(b)
-t9:=andi(negd(a),negd(b),m,t8):n1n2
-t10:=ori2(p1p2,n1n2,t9):or(p1p2,n1n2)
--4d196
-e@satzd196e:=rappd(a,or(p1p2".4d196",n1n2".4d196"),[t:posd(a)]t6".4d196"(t),th2"l.imp"(zero(a),or(p1p2".4d196",n1n2".4d196"),n),[t:negd(a)]t10".4d196"(t)):or(and(posd(a),posd(b)),and(negd(a),negd(b)))
-o@[e:eq(td(a,b),m0d(td(absd(a),absd(b))))]
-+*4d196
-o@t11:=satzd176a(td(absd(a),absd(b)),t1):negd(m0d(td(absd(a),absd(b))))
-e@t12:=nnotpd(td(a,b),eqnegd(m0d(td(absd(a),absd(b))),td(a,b),symeq(td(a,b),m0d(td(absd(a),absd(b))),e),t11)):not(posd(td(a,b)))
-[p:posd(a)]
-t13:=th3"l.imp"(posd(b),posd(td(a,b)),t12,[t:posd(b)]ptdpp(a,b,p,t)):not(posd(b))
-t14:=or3e3(zero(b),posd(b),negd(b),axrdo(b),o,t13):negd(b)
-t15:=andi(posd(a),negd(b),p,t14):p1n2
-t16:=ori1(p1n2,n1p2,t15):or(p1n2,n1p2)
-e@[m:negd(a)]
-t17:=th3"l.imp"(negd(b),posd(td(a,b)),t12,[t:negd(b)]ptdnn(a,b,m,t)):not(negd(b))
-t18:=or3e2(zero(b),posd(b),negd(b),axrdo(b),t17,o):posd(b)
-t19:=andi(negd(a),posd(b),m,t18):n1p2
-t20:=ori2(p1n2,n1p2,t19):or(p1n2,n1p2)
--4d196
-e@satzd196f:=rappd(a,or(p1n2".4d196",n1p2".4d196"),[t:posd(a)]t16".4d196"(t),th2"l.imp"(zero(a),or(p1n2".4d196",n1p2".4d196"),n),[t:negd(a)]t20".4d196"(t)):or(and(posd(a),negd(b)),and(negd(a),posd(b)))
-+4d199
-@[p:cut][q:cut][r:cut][s:cut][t:cut][u:cut]
-t1:=tris(cut,ts(pl(ts(p,r),ts(q,s)),t),pl(ts(ts(p,r),t),ts(ts(q,s),t)),pl(ts(p,ts(r,t)),ts(q,ts(s,t))),disttp1(ts(p,r),ts(q,s),t),ispl12(ts(ts(p,r),t),ts(p,ts(r,t)),ts(ts(q,s),t),ts(q,ts(s,t)),assts1(p,r,t),assts1(q,s,t))):is(ts(pl(ts(p,r),ts(q,s)),t),pl(ts(p,ts(r,t)),ts(q,ts(s,t))))
-t2:=tris(cut,pl(ts(q,ts(s,t)),ts(q,ts(r,u))),pl(ts(q,ts(r,u)),ts(q,ts(s,t))),ts(q,pl(ts(r,u),ts(s,t))),compl(ts(q,ts(s,t)),ts(q,ts(r,u))),distpt2(q,ts(r,u),ts(s,t))):is(pl(ts(q,ts(s,t)),ts(q,ts(r,u))),ts(q,pl(ts(r,u),ts(s,t))))
-t3:=tr3is(cut,pl(ts(pl(ts(p,r),ts(q,s)),t),ts(pl(ts(p,s),ts(q,r)),u)),pl(pl(ts(p,ts(r,t)),ts(q,ts(s,t))),pl(ts(p,ts(s,u)),ts(q,ts(r,u)))),pl(pl(ts(p,ts(r,t)),ts(p,ts(s,u))),pl(ts(q,ts(s,t)),ts(q,ts(r,u)))),pl(ts(p,pl(ts(r,t),ts(s,u))),ts(q,pl(ts(r,u),ts(s,t)))),ispl12(ts(pl(ts(p,r),ts(q,s)),t),pl(ts(p,ts(r,t)),ts(q,ts(s,t))),ts(pl(ts(p,s),ts(q,r)),u),pl(ts(p,ts(s,u)),ts(q,ts(r,u))),t1,t1(p,q,s,r,u,t)),4pl23(ts(p,ts(r,t)),ts(q,ts(s,t)),ts(p,ts(s,u)),ts(q,ts(r,u))),ispl12(pl(ts(p,ts(r,t)),ts(p,ts(s,u))),ts(p,pl(ts(r,t),ts(s,u))),pl(ts(q,ts(s,t)),ts(q,ts(r,u))),ts(q,pl(ts(r,u),ts(s,t))),distpt2(p,ts(r,t),ts(s,u)),t2)):is(pl(ts(pl(ts(p,r),ts(q,s)),t),ts(pl(ts(p,s),ts(q,r)),u)),pl(ts(p,pl(ts(r,t),ts(s,u))),ts(q,pl(ts(r,u),ts(s,t)))))
--4d199
-c@satzd199:=tr3eq(td(td(a,b),c),df(pl(ts(pl(ts(1a,1b),ts(2a,2b)),1c),ts(pl(ts(1a,2b),ts(2a,1b)),2c)),pl(ts(pl(ts(1a,1b),ts(2a,2b)),2c),ts(pl(ts(1a,2b),ts(2a,1b)),1c))),df(pl(ts(1a,pl(ts(1b,1c),ts(2b,2c))),ts(2a,pl(ts(1b,2c),ts(2b,1c)))),pl(ts(1a,pl(ts(1b,2c),ts(2b,1c))),ts(2a,pl(ts(1b,1c),ts(2b,2c))))),td(a,td(b,c)),tdeq2a(c,pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b))),eqsmsd(pl(ts(pl(ts(1a,1b),ts(2a,2b)),1c),ts(pl(ts(1a,2b),ts(2a,1b)),2c)),pl(ts(pl(ts(1a,1b),ts(2a,2b)),2c),ts(pl(ts(1a,2b),ts(2a,1b)),1c)),pl(ts(1a,pl(ts(1b,1c),ts(2b,2c))),ts(2a,pl(ts(1b,2c),ts(2b,1c)))),pl(ts(1a,pl(ts(1b,2c),ts(2b,1c))),ts(2a,pl(ts(1b,1c),ts(2b,2c)))),t3".4d199"(1a,2a,1b,2b,1c,2c),t3".4d199"(1a,2a,1b,2b,2c,1c)),tdeq1b(a,pl(ts(1b,1c),ts(2b,2c)),pl(ts(1b,2c),ts(2b,1c)))):eq(td(td(a,b),c),td(a,td(b,c)))
-asstd1:=satzd199:eq(td(td(a,b),c),td(a,td(b,c)))
-asstd2:=symeq(td(td(a,b),c),td(a,td(b,c)),satzd199):eq(td(a,td(b,c)),td(td(a,b),c))
-+4d201
-@[p:cut][q:cut][r:cut][s:cut][t:cut][u:cut]
-t1:=tris(cut,pl(ts(p,pl(r,t)),ts(q,pl(s,u))),pl(pl(ts(p,r),ts(p,t)),pl(ts(q,s),ts(q,u))),pl(pl(ts(p,r),ts(q,s)),pl(ts(p,t),ts(q,u))),ispl12(ts(p,pl(r,t)),pl(ts(p,r),ts(p,t)),ts(q,pl(s,u)),pl(ts(q,s),ts(q,u)),disttp2(p,r,t),disttp2(q,s,u)),4pl23(ts(p,r),ts(p,t),ts(q,s),ts(q,u))):is(pl(ts(p,pl(r,t)),ts(q,pl(s,u))),pl(pl(ts(p,r),ts(q,s)),pl(ts(p,t),ts(q,u))))
--4d201
-satzd201:=tr3eq(td(a,pd(b,c)),df(pl(ts(1a,pl(1b,1c)),ts(2a,pl(2b,2c))),pl(ts(1a,pl(2b,2c)),ts(2a,pl(1b,1c)))),df(pl(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,1c),ts(2a,2c))),pl(pl(ts(1a,2b),ts(2a,1b)),pl(ts(1a,2c),ts(2a,1c)))),pd(td(a,b),td(a,c)),tdeq1a(a,pl(1b,1c),pl(2b,2c)),eqsmsd(pl(ts(1a,pl(1b,1c)),ts(2a,pl(2b,2c))),pl(ts(1a,pl(2b,2c)),ts(2a,pl(1b,1c))),pl(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,1c),ts(2a,2c))),pl(pl(ts(1a,2b),ts(2a,1b)),pl(ts(1a,2c),ts(2a,1c))),t1".4d201"(1a,2a,1b,2b,1c,2c),t1".4d201"(1a,2a,2b,1b,2c,1c)),pdeq12b(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)),pl(ts(1a,1c),ts(2a,2c)),pl(ts(1a,2c),ts(2a,1c)))):eq(td(a,pd(b,c)),pd(td(a,b),td(a,c)))
-disttpd1:=tr3eq(td(pd(a,b),c),td(c,pd(a,b)),pd(td(c,a),td(c,b)),pd(td(a,c),td(b,c)),comtd(pd(a,b),c),satzd201(c,a,b),eqpd12(td(c,a),td(a,c),td(c,b),td(b,c),comtd(c,a),comtd(c,b))):eq(td(pd(a,b),c),pd(td(a,c),td(b,c)))
-disttpd2:=satzd201:eq(td(a,pd(b,c)),pd(td(a,b),td(a,c)))
-distptd1:=symeq(td(pd(a,b),c),pd(td(a,c),td(b,c)),disttpd1):eq(pd(td(a,c),td(b,c)),td(pd(a,b),c))
-distptd2:=symeq(td(a,pd(b,c)),pd(td(a,b),td(a,c)),disttpd2):eq(pd(td(a,b),td(a,c)),td(a,pd(b,c)))
-satzd202:=treq(td(a,md(b,c)),pd(td(a,b),td(a,m0d(c))),md(td(a,b),td(a,c)),disttpd2(a,b,m0d(c)),eqpd2(td(a,m0d(c)),m0d(td(a,c)),td(a,b),satzd197b(a,c))):eq(td(a,md(b,c)),md(td(a,b),td(a,c)))
-disttmd1:=treq(td(md(a,b),c),pd(td(a,c),td(m0d(b),c)),md(td(a,c),td(b,c)),disttpd1(a,m0d(b),c),eqpd2(td(m0d(b),c),m0d(td(b,c)),td(a,c),satzd197a(b,c))):eq(td(md(a,b),c),md(td(a,c),td(b,c)))
-disttmd2:=satzd202:eq(td(a,md(b,c)),md(td(a,b),td(a,c)))
-distmtd1:=symeq(td(md(a,b),c),md(td(a,c),td(b,c)),disttmd1):eq(md(td(a,c),td(b,c)),td(md(a,b),c))
-distmtd2:=symeq(td(a,md(b,c)),md(td(a,b),td(a,c)),disttmd2):eq(md(td(a,b),td(a,c)),td(a,md(b,c)))
-satzd200:=satzd202:eq(td(a,md(b,c)),md(td(a,b),td(a,c)))
-[m:mored(a,b)]
-+4d203
-t1:=satzd182d(a,b,m):posd(md(a,b))
--4d203
-[p:posd(c)]
-+*4d203
-p@t2:=eqposd(td(md(a,b),c),md(td(a,c),td(b,c)),disttmd1(a,b,c),ptdpp(md(a,b),c,t1,p)):posd(md(td(a,c),td(b,c)))
--4d203
-p@satzd203a:=satzd182a(td(a,c),td(b,c),t2".4d203"):mored(td(a,c),td(b,c))
-m@[z:zero(c)]
-satzd203b:=zeroeq(td(a,c),td(b,c),td02(a,c,z),td02(b,c,z)):eq(td(a,c),td(b,c))
-m@[n:negd(c)]
-+*4d203
-n@t3:=eqnegd(td(md(a,b),c),md(td(a,c),td(b,c)),disttmd1(a,b,c),ntdpn(md(a,b),c,t1,n)):negd(md(td(a,c),td(b,c)))
--4d203
-n@satzd203c:=satzd182c(td(a,c),td(b,c),t3".4d203"):lessd(td(a,c),td(b,c))
-p@satzd203d:=eqmored12(td(a,c),td(c,a),td(b,c),td(c,b),comtd(a,c),comtd(b,c),satzd203a):mored(td(c,a),td(c,b))
-z@satzd203e:=zeroeq(td(c,a),td(c,b),td01(c,a,z),td01(c,b,z)):eq(td(c,a),td(c,b))
-n@satzd203f:=eqlessd12(td(a,c),td(c,a),td(b,c),td(c,b),comtd(a,c),comtd(b,c),satzd203c):lessd(td(c,a),td(c,b))
-c@[l:lessd(a,b)][p:posd(c)]
-satzd203g:=lemmad5(td(b,c),td(a,c),satzd203a(b,a,c,lemmad6(a,b,l),p)):lessd(td(a,c),td(b,c))
-l@[z:zero(c)]
-satzd203h:=zeroeq(td(a,c),td(b,c),td02(a,c,z),td02(b,c,z)):eq(td(a,c),td(b,c))
-l@[n:negd(c)]
-satzd203j:=lemmad6(td(b,c),td(a,c),satzd203c(b,a,c,lemmad6(a,b,l),n)):mored(td(a,c),td(b,c))
-p@satzd203k:=lemmad5(td(c,b),td(c,a),satzd203d(b,a,c,lemmad6(a,b,l),p)):lessd(td(c,a),td(c,b))
-z@satzd203l:=zeroeq(td(c,a),td(c,b),td01(c,a,z),td01(c,b,z)):eq(td(c,a),td(c,b))
-n@satzd203m:=lemmad6(td(c,b),td(c,a),satzd203f(b,a,c,lemmad6(a,b,l),n)):mored(td(c,a),td(c,b))
-+*iv4d
-@[p:cut][q:cut]
-t19:=tris(cut,ts(q,pl(p,1rp)),pl(ts(q,p),ts(q,1rp)),pl(ts(q,p),q),disttp2(q,p,1rp),ispl2(ts(q,1rp),q,ts(q,p),satz151(q))):is(ts(q,pl(p,1rp)),pl(ts(q,p),q))
-[r:cut]
-t20:=tris(cut,pl(ts(q,pl(p,1rp)),ts(r,1rp)),pl(pl(ts(q,p),q),r),pl(ts(q,p),pl(q,r)),ispl12(ts(q,pl(p,1rp)),pl(ts(q,p),q),ts(r,1rp),r,t19,satz151(r)),asspl1(ts(q,p),q,r)):is(pl(ts(q,pl(p,1rp)),ts(r,1rp)),pl(ts(q,p),pl(q,r)))
-t21:=tr3is(cut,pl(ts(r,1rp),ts(q,pl(p,1rp))),pl(ts(q,pl(p,1rp)),ts(r,1rp)),pl(ts(q,p),pl(q,r)),pl(ts(q,p),pl(r,q)),compl(ts(r,1rp),ts(q,pl(p,1rp))),t20,ispl2(pl(q,r),pl(r,q),ts(q,p),compl(q,r))):is(pl(ts(r,1rp),ts(q,pl(p,1rp))),pl(ts(q,p),pl(r,q)))
-a@[p:posd(a)]
-arp:=rpofpd(a,p):cut
-arpi:=ov(1rp,arp):cut
-ai:=pdofrp(arpi):dif
-t22:=tr3eq(td(a,ai),df(pl(ts(1a,pl(arpi,1rp)),ts(2a,1rp)),pl(ts(1a,1rp),ts(2a,pl(arpi,1rp)))),df(pl(ts(1a,arpi),pl(1a,2a)),pl(ts(2a,arpi),pl(1a,2a))),df(ts(1a,arpi),ts(2a,arpi)),tdeq1a(a,pl(arpi,1rp),1rp),eqsmsd(pl(ts(1a,pl(arpi,1rp)),ts(2a,1rp)),pl(ts(1a,1rp),ts(2a,pl(arpi,1rp))),pl(ts(1a,arpi),pl(1a,2a)),pl(ts(2a,arpi),pl(1a,2a)),t20(arpi,1a,2a),t21(arpi,2a,1a)),lemmad2(ts(1a,arpi),ts(2a,arpi),pl(1a,2a))):eq(td(a,ai),df(ts(1a,arpi),ts(2a,arpi)))
-t23:=tr3is(cut,ts(1a,arpi),ts(pl(2a,arp),arpi),pl(ts(2a,arpi),ts(arp,arpi)),pl(ts(2a,arpi),1rp),ists1(1a,pl(2a,arp),arpi,satz140d(1a,2a,p)),disttp1(2a,arp,arpi),ispl2(ts(arp,arpi),1rp,ts(2a,arpi),satz153c(1rp,arp))):is(ts(1a,arpi),pl(ts(2a,arpi),1rp))
-t24:=tr3is(cut,pl(ts(1a,arpi),1rp),pl(pl(ts(2a,arpi),1rp),1rp),pl(ts(2a,arpi),pl(1rp,1rp)),pl(pl(1rp,1rp),ts(2a,arpi)),ispl1(ts(1a,arpi),pl(ts(2a,arpi),1rp),1rp,t23),asspl1(ts(2a,arpi),1rp,1rp),compl(ts(2a,arpi),pl(1rp,1rp))):is(pl(ts(1a,arpi),1rp),pl(pl(1rp,1rp),ts(2a,arpi)))
-t25:=eqi12(ts(1a,arpi),ts(2a,arpi),pl(1rp,1rp),1rp,t24):eq(df(ts(1a,arpi),ts(2a,arpi)),1df)
-t26:=treq(td(a,ai),df(ts(1a,arpi),ts(2a,arpi)),1df,t22,t25):eq(td(a,ai),1df)
-t27:=somei(dif,[x:dif]eq(td(a,x),1df),ai,t26):some"l"(dif,[x:dif]eq(td(a,x),1df))
-a@[n:negd(a)]
-t28:=satzd176c(a,n):posd(m0d(a))
-[h:dif][e:eq(td(m0d(a),h),1df)]
-t29:=treq(td(a,m0d(h)),td(m0d(a),h),1df,satzd197d(a,h),e):eq(td(a,m0d(h)),1df)
-t30:=somei(dif,[x:dif]eq(td(a,x),1df),m0d(h),t29):some"l"(dif,[x:dif]eq(td(a,x),1df))
-n@t31:=someapp(dif,[x:dif]eq(td(m0d(a),x),1df),t27(m0d(a),t28),some"l"(dif,[x:dif]eq(td(a,x),1df)),[x:dif][t:eq(td(m0d(a),x),1df)]t30(x,t)):some"l"(dif,[x:dif]eq(td(a,x),1df))
--iv4d
-a@[n:not(zero(a))]
-lemmad7:=rappd(a,some"l"(dif,[x:dif]eq(td(a,x),1df)),[t:posd(a)]t27".iv4d"(t),th2"l.imp"(zero(a),some"l"(dif,[x:dif]eq(td(a,x),1df)),n),[t:negd(a)]t31".iv4d"(t)):some"l"(dif,[x:dif]eq(td(a,x),1df))
-b@[n:not(zero(b))][h:dif][k:dif][e:eq(td(b,h),a)][f:eq(td(b,k),a)]
-+4d204
-t1:=treq2(td(b,h),td(b,k),a,e,f):eq(td(b,h),td(b,k))
-t2:=eqzero(md(td(b,h),td(b,k)),td(b,md(h,k)),distmtd2(b,h,k),satzd182e(td(b,h),td(b,k),t1)):zero(td(b,md(h,k)))
-t3:=ore2(zero(b),zero(md(h,k)),satzd192c(b,md(h,k),t2),n):zero(md(h,k))
--4d204
-satzd204b:=satzd182b(h,k,t3".4d204"):eq(h,k)
-+*4d204
-n@[h:dif][e:eq(td(b,h),1df)]
-t4:=tr3eq(td(b,td(h,a)),td(td(b,h),a),td(1df,a),a,asstd2(b,h,a),eqtd1(td(b,h),1df,a,e),satzd195b(a)):eq(td(b,td(h,a)),a)
-t5:=somei(dif,[x:dif]eq(td(b,x),a),td(h,a),t4):some"l"(dif,[x:dif]eq(td(b,x),a))
--4d204
-n@satzd204a:=someapp(dif,[x:dif]eq(td(b,x),1df),lemmad7(b,n),some"l"(dif,[x:dif]eq(td(b,x),a)),[x:dif][t:eq(td(b,x),1df)]t5".4d204"(x,t)):some"l"(dif,[x:dif]eq(td(b,x),a))
-@[r:cut][s:cut][m:more(r,s)]
-+iv5d
-t1:=ismore12(pl(r,pl(1rp,1rp)),pl(pl(r,1rp),1rp),pl(s,pl(1rp,1rp)),pl(pl(s,1rp),1rp),asspl2(r,1rp,1rp),asspl2(s,1rp,1rp),satz134(r,s,pl(1rp,1rp),m)):more(pl(pl(r,1rp),1rp),pl(pl(s,1rp),1rp))
--iv5d
-morerpepd:=moredi12(pl(r,1rp),1rp,pl(s,1rp),1rp,t1".iv5d"):mored(pdofrp(r),pdofrp(s))
-s@[m:mored(pdofrp(r),pdofrp(s))]
-+*iv5d
-m@t2:=morede12(pl(r,1rp),1rp,pl(s,1rp),1rp,m):more(pl(pl(r,1rp),1rp),pl(pl(s,1rp),1rp))
--iv5d
-m@morerpipd:=satz136a(r,s,pl(1rp,1rp),ismore12(pl(pl(r,1rp),1rp),pl(r,pl(1rp,1rp)),pl(pl(s,1rp),1rp),pl(s,pl(1rp,1rp)),asspl1(r,1rp,1rp),asspl1(s,1rp,1rp),t2".iv5d")):more(r,s)
-s@[l:less(r,s)]
-lessrpepd:=lemmad5(pdofrp(s),pdofrp(r),morerpepd(s,r,satz122(r,s,l))):lessd(pdofrp(r),pdofrp(s))
-s@[l:lessd(pdofrp(r),pdofrp(s))]
-lessrpipd:=satz121(s,r,morerpipd(s,r,lemmad6(pdofrp(r),pdofrp(s),l))):less(r,s)
-+*iv5d
-@i:=1rp:cut
-2:=pl(i,i):cut
-r@rp1:=pl(r,i):cut
-s@sp1:=pl(s,i):cut
-rps:=pl(r,s):cut
-rs:=ts(r,s):cut
-t3:=tris(cut,pl(pl(rp1,sp1),i),pl(pl(rps,2),i),pl(pl(rps,i),2),ispl1(pl(rp1,sp1),pl(rps,2),i,4pl23(r,i,s,i)),3pl23(rps,2,i)):is(pl(pl(rp1,sp1),i),pl(pl(rps,i),2))
-t4:=treq(pd(pdofrp(r),pdofrp(s)),df(pl(rp1,sp1),2),pdofrp(rps),pdeq12a(rp1,i,sp1,i),eqi12(pl(rp1,sp1),2,pl(rps,i),i,t3)):eq(pd(pdofrp(r),pdofrp(s)),pdofrp(rps))
--iv5d
-s@lemmad8:=t4".iv5d":eq(pd(pdofrp(r),pdofrp(s)),pdofrp(pl(r,s)))
-+*iv5d
-s@t5:=tris(cut,ts(r,sp1),pl(rs,ts(r,i)),pl(rs,r),disttp2(r,s,i),ispl2(ts(r,i),r,rs,satz151(r))):is(ts(r,sp1),pl(rs,r))
-t6:=tr4is(cut,ts(rp1,sp1),pl(ts(r,sp1),ts(i,sp1)),pl(pl(rs,r),sp1),pl(pl(pl(rs,r),s),i),pl(pl(rs,rps),i),disttp1(r,i,sp1),ispl12(ts(r,sp1),pl(rs,r),ts(i,sp1),sp1,t5,satz151b(sp1)),asspl2(pl(rs,r),s,i),ispl1(pl(pl(rs,r),s),pl(rs,rps),i,asspl1(rs,r,s))):is(ts(rp1,sp1),pl(pl(rs,rps),i))
-t7:=tr3is(cut,pl(ts(rp1,sp1),ts(i,i)),pl(pl(pl(rs,rps),i),i),pl(pl(rs,rps),2),pl(rs,pl(rps,2)),ispl12(ts(rp1,sp1),pl(pl(rs,rps),i),ts(i,i),i,t6,satz151(i)),asspl1(pl(rs,rps),i,i),asspl1(rs,rps,2)):is(pl(ts(rp1,sp1),ts(i,i)),pl(rs,pl(rps,2)))
-t8:=tris(cut,pl(ts(rp1,i),ts(i,sp1)),pl(rp1,sp1),pl(rps,2),ispl12(ts(rp1,i),rp1,ts(i,sp1),sp1,satz151(rp1),satz151b(sp1)),4pl23(r,i,s,i)):is(pl(ts(rp1,i),ts(i,sp1)),pl(rps,2))
-t9:=tris(cut,pl(pl(rs,i),pl(ts(rp1,i),ts(i,sp1))),pl(pl(rs,i),pl(rps,2)),pl(pl(rs,pl(rps,2)),i),ispl2(pl(ts(rp1,i),ts(i,sp1)),pl(rps,2),pl(rs,i),t8),3pl23(rs,i,pl(rps,2))):is(pl(pl(rs,i),pl(ts(rp1,i),ts(i,sp1))),pl(pl(rs,pl(rps,2)),i))
-t10:=tris2(cut,pl(pl(ts(rp1,sp1),ts(i,i)),i),pl(pl(rs,i),pl(ts(rp1,i),ts(i,sp1))),pl(pl(rs,pl(rps,2)),i),ispl1(pl(ts(rp1,sp1),ts(i,i)),pl(rs,pl(rps,2)),i,t7),t9):is(pl(pl(ts(rp1,sp1),ts(i,i)),i),pl(pl(rs,i),pl(ts(rp1,i),ts(i,sp1))))
-t11:=treq(td(pdofrp(r),pdofrp(s)),df(pl(ts(rp1,sp1),ts(i,i)),pl(ts(rp1,i),ts(i,sp1))),pdofrp(rs),tdeq12a(rp1,i,sp1,i),eqi12(pl(ts(rp1,sp1),ts(i,i)),pl(ts(rp1,i),ts(i,sp1)),pl(rs,i),i,t10)):eq(td(pdofrp(r),pdofrp(s)),pdofrp(rs))
--iv5d
-s@lemmad9:=t11".iv5d":eq(td(pdofrp(r),pdofrp(s)),pdofrp(ts(r,s)))
-@[r:cut][s0:set(cut)]
-in:=esti(cut,r,s0):'prop'
-@[s0:set(cut)][t0:set(cut)][p0:all([x:cut]or(in(x,s0),in(x,t0)))][p1a:nonempty(cut,s0)][p1b:nonempty(cut,t0)][p2:all([x:cut][t:in(x,s0)]all([y:cut][u:in(y,t0)]less(x,y)))]
-+5p205
-t0@[r:cut]
-prop1:=all([x:cut][t:less(x,r)]in(x,s0)):'prop'
-prop2:=all([x:cut][t:more(x,r)]in(x,t0)):'prop'
-prop3:=and(prop1,prop2):'prop'
-p2@[r1:cut][r2:cut][pr1:prop3(r1)][pr2:prop3(r2)]
-t1:=ande2(prop1(r1),prop2(r1),pr1):prop2(r1)
-t2:=ande1(prop1(r2),prop2(r2),pr2):prop1(r2)
-[l:less(r1,r2)][x0:rat]
-rx:=rpofrt(x0):cut
-[l1:less(r1,rx)][l2:less(rx,r2)]
-t3:=<l2><rx>t2:in(rx,s0)
-t4:=<satz122(r1,rx,l1)><rx>t1:in(rx,t0)
-t5:=<refis(cut,rx)>ec3e31(is(rx,rx),more(rx,rx),less(rx,rx),satz123b(rx,rx),<t4><rx><t3><rx>p2):con
-l@t6:=satz159app(r1,r2,l,con,[x:rat][t:less(r1,rpofrt(x))][u:less(rpofrt(x),r2)]t5(x,t,u)):con
-pr2@t7:=[t:less(r1,r2)]t6(t):not(less(r1,r2))
-t8:=[t:more(r1,r2)]t6(r2,r1,pr2,pr1,satz121(r1,r2,t)):not(more(r1,r2))
-t9:=or3e1(is(r1,r2),more(r1,r2),less(r1,r2),satz123a(r1,r2),t8,t7):is(r1,r2)
-p2@t10:=[x:cut][y:cut][t:prop3(x)][u:prop3(y)]t9(x,y,t,u):amone(cut,[x:cut]prop3(x))
-[x0:rat]
-schnittprop:=some([y:cut]and(in(y,s0),lrt(y,x0))):'prop'
-p2@schnittset:=setof(rat,[x:rat]schnittprop(x)):set(rat)
-[r:cut][i:in(r,s0)][x0:rat][lx:lrt(r,x0)]
-t11:=andi(in(r,s0),lrt(r,x0),i,lx):and(in(r,s0),lrt(r,x0))
-t12:=somei(cut,[y:cut]and(in(y,s0),lrt(y,x0)),r,t11):schnittprop(x0)
-t13:=estii(rat,[x:rat]schnittprop(x),x0,t12):in"rt"(x0,schnittset)
-r@[i:in(r,t0)][x0:rat][ux:urt(r,x0)][s:cut][j:in(s,s0)]
-t14:=satz122(s,r,<i><r><j><s>p2):more(r,s)
-t15:=satz158b(r,x0,ux):moreis(rpofrt(x0),r)
-t16:=moreisi1(rpofrt(x0),s,satz127c(rpofrt(x0),r,s,t15,t14)):moreis(rpofrt(x0),s)
-t17:=satz158d(s,x0,t16):urt(s,x0)
-s@t18:=weli(ec(in(s,s0),lrt(s,x0)),[t:in(s,s0)]t17(t)):not(and(in(s,s0),lrt(s,x0)))
-ux@t19:=th5"l.some"(cut,[y:cut]and(in(y,s0),lrt(y,x0)),[y:cut]t18(y)):not(schnittprop(x0))
-t20:=th3"l.imp"(in"rt"(x0,schnittset),schnittprop(x0),t19,[t:in"rt"(x0,schnittset)]estie(rat,[x:rat]schnittprop(x),x0,t)):not(in"rt"(x0,schnittset))
-p2@[x0:rat][i:in"rt"(x0,schnittset)][y0:rat][l:less"rt"(y0,x0)]
-i@t21:=estie(rat,[x:rat]schnittprop(x),x0,i):schnittprop(x0)
-l@[r:cut][a:and(in(r,s0),lrt(r,x0))]
-t22:=ande1(in(r,s0),lrt(r,x0),a):in(r,s0)
-t23:=ande2(in(r,s0),lrt(r,x0),a):lrt(r,x0)
-t24:=satz120(r,x0,t23,y0,l):lrt(r,y0)
-t25:=andi(in(r,s0),lrt(r,y0),t22,t24):and(in(r,s0),lrt(r,y0))
-t26:=somei(cut,[y:cut]and(in(y,s0),lrt(y,y0)),r,t25):schnittprop(y0)
-l@t27:=someapp(cut,[y:cut]and(in(y,s0),lrt(y,x0)),t21,schnittprop(y0),[y:cut][r:and(in(y,s0),lrt(y,x0))]t26(y,r)):schnittprop(y0)
-t28:=estii(rat,[x:rat]schnittprop(x),y0,t27):in"rt"(y0,schnittset)
-i@[r:cut][a:and(in(r,s0),lrt(r,x0))]
-t29:=ande1(in(r,s0),lrt(r,x0),a):in(r,s0)
-t30:=ande2(in(r,s0),lrt(r,x0),a):lrt(r,x0)
-[y0:rat][ly:lrt(r,y0)][l:less"rt"(x0,y0)]
-t31:=andi(in(r,s0),lrt(r,y0),t29,ly):and(in(r,s0),lrt(r,y0))
-t32:=somei(cut,[y:cut]and(in(y,s0),lrt(y,y0)),r,t31):schnittprop(y0)
-t33:=estii(rat,[x:rat]schnittprop(x),y0,t32):in"rt"(y0,schnittset)
-t34:=satz83(x0,y0,l):more"rt"(y0,x0)
-t35:=andi(in"rt"(y0,schnittset),more"rt"(y0,x0),t33,t34):and(in"rt"(y0,schnittset),more"rt"(y0,x0))
-t36:=somei(rat,[y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0)),y0,t35):some"rt"([y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0)))
-a@t37:=cutapp3(r,x0,t30,some"rt"([y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0))),[y:rat][t:lrt(r,y)][u:less"rt"(x0,y)]t36(y,t,u)):some"rt"([y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0)))
-i@t38:=someapp(cut,[y:cut]and(in(y,s0),lrt(y,x0)),t21,some"rt"([y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0))),[y:cut][t:and(in(y,s0),lrt(y,x0))]t37(y,t)):some"rt"([y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0)))
-p2@[r:cut][i:in(r,s0)][x0:rat][lx:lrt(r,x0)][s:cut][j:in(s,t0)][y0:rat][uy:urt(s,y0)]
-t39:=cut2(schnittset,x0,t13(r,i,x0,lx),y0,t20(s,j,y0,uy),[x:rat][t:in"rt"(x,schnittset)][y:rat][u:less"rt"(y,x)]t28(x,t,y,u),[x:rat][t:in"rt"(x,schnittset)]t38(x,t)):cutprop(schnittset)
-j@t40:=cutapp1b(s,cutprop(schnittset),[x:rat][t:urt(s,x)]t39(x,t)):cutprop(schnittset)
-lx@t41:=nonemptyapp(cut,t0,p1b,cutprop(schnittset),[y:cut][t:in(y,t0)]t40(y,t)):cutprop(schnittset)
-i@t42:=cutapp1a(r,cutprop(schnittset),[x:rat][t:lrt(r,x)]t41(x,t)):cutprop(schnittset)
-p2@t43:=nonemptyapp(cut,s0,p1a,cutprop(schnittset),[y:cut][t:in(y,s0)]t42(y,t)):cutprop(schnittset)
-snt:=cutof(schnittset,t43):cut
-[r:cut][l:less(r,snt)][x0:rat][ux:urt(r,x0)][lx:lrt(snt,x0)]
-t44:=ini(schnittset,t43,x0,lx):in"rt"(x0,schnittset)
-t45:=estie(rat,[x:rat]schnittprop(x),x0,t44):schnittprop(x0)
-[s:cut][a:and(in(s,s0),lrt(s,x0))]
-t46:=ande1(in(s,s0),lrt(s,x0),a):in(s,s0)
-t47:=ande2(in(s,s0),lrt(s,x0),a):lrt(s,x0)
-t48:=andi(urt(r,x0),lrt(s,x0),ux,t47):and(urt(r,x0),lrt(s,x0))
-t49:=somei(rat,[x:rat]and(urt(r,x),lrt(s,x)),x0,t48):less(r,s)
-t50:=ec3e23(is(s,r),more(s,r),less(s,r),satz123b(s,r),satz122(r,s,t49)):not(less(s,r))
-t51:=th3"l.imp"(in(r,t0),less(s,r),t50,<r><t46><s>p2):not(in(r,t0))
-t52:=ore1(in(r,s0),in(r,t0),<r>p0,t51):in(r,s0)
-lx@t53:=someapp(cut,[y:cut]and(in(y,s0),lrt(y,x0)),t45,in(r,s0),[y:cut][t:and(in(y,s0),lrt(y,x0))]t52(y,t)):in(r,s0)
-l@t54:=lessapp(r,snt,l,in(r,s0),[x:rat][t:urt(r,x)][u:lrt(snt,x)]t53(x,t,u)):in(r,s0)
-r@[m:more(r,snt)][x0:rat][lx:lrt(r,x0)][ux:urt(snt,x0)][i:in(r,s0)]
-t55:=andi(in(r,s0),lrt(r,x0),i,lx):and(in(r,s0),lrt(r,x0))
-t56:=somei(cut,[y:cut]and(in(y,s0),lrt(y,x0)),r,t55):schnittprop(x0)
-t57:=estii(rat,[x:rat]schnittprop(x),x0,t56):in"rt"(x0,schnittset)
-t58:=ine(schnittset,t43,x0,t57):lrt(snt,x0)
-ux@t59:=th3"l.imp"(in(r,s0),lrt(snt,x0),ux,[t:in(r,s0)]t58(t)):not(in(r,s0))
-t60:=ore2(in(r,s0),in(r,t0),<r>p0,t59):in(r,t0)
-m@t61:=moreapp(r,snt,m,in(r,t0),[x:rat][t:lrt(r,x)][u:urt(snt,x)]t60(x,t,u)):in(r,t0)
-p2@t62:=andi(prop1(snt),prop2(snt),[x:cut][t:less(x,snt)]t54(x,t),[x:cut][t:more(x,snt)]t61(x,t)):prop3(snt)
-t63:=somei(cut,[x:cut]prop3(x),snt,t62):some([x:cut]prop3(x))
--5p205
-satzp205:=onei(cut,[x:cut]prop3".5p205"(x),t10".5p205",t63".5p205"):one([x:cut]and(all([y:cut][t:less(y,x)]in(y,s0)),all([y:cut][t:more(y,x)]in(y,t0))))
-schnitt:=ind(cut,[x:cut]prop3".5p205"(x),satzp205):cut
-satzp205a:=ande1(prop1".5p205"(schnitt),prop2".5p205"(schnitt),oneax(cut,[x:cut]prop3".5p205"(x),satzp205)):all([x:cut][t:less(x,schnitt)]in(x,s0))
-satzp205b:=ande2(prop1".5p205"(schnitt),prop2".5p205"(schnitt),oneax(cut,[x:cut]prop3".5p205"(x),satzp205)):all([x:cut][t:more(x,schnitt)]in(x,t0))
-@[r:cut][s:cut]
-+ivad
-@i:=1rp:cut
-r@r1:=pl(r,i):cut
-s@s1:=pl(s,i):cut
-rps:=pl(r,s):cut
-@2:=pl(i,i):cut
-s@t1:=pdeq12a(r1,i,s1,i):eq(pd(pdofrp(r),pdofrp(s)),df(pl(r1,s1),2))
-t2:=tris(cut,pl(r1,s1),pl(rps,2),pl(pl(rps,i),i),4pl23(r,i,s,i),asspl2(rps,i,i)):is(pl(r1,s1),pl(pl(rps,i),i))
-t3:=ispl1(pl(r1,s1),pl(pl(rps,i),i),i,t2):is(pl(pl(r1,s1),i),pl(pl(pl(rps,i),i),i))
-t4:=tris(cut,pl(pl(r1,s1),i),pl(pl(pl(rps,i),i),i),pl(pl(rps,i),2),t3,asspl1(pl(rps,i),i,i)):is(pl(pl(r1,s1),i),pl(pl(rps,i),2))
-t5:=eqi12(pl(r1,s1),2,pl(rps,i),i,t4):eq(df(pl(r1,s1),2),pdofrp(rps))
--ivad
-lemmaivad1:=treq(pd(pdofrp(r),pdofrp(s)),df(pl(pl(r,1rp),pl(s,1rp)),pl(1rp,1rp)),pdofrp(pl(r,s)),t1".ivad",t5".ivad"):eq(pd(pdofrp(r),pdofrp(s)),pdofrp(pl(r,s)))
-+*ivad
-s@rs:=ts(r,s):cut
-t6:=tdeq12a(r1,i,s1,i):eq(td(pdofrp(r),pdofrp(s)),df(pl(ts(r1,s1),ts(i,i)),pl(ts(r1,i),ts(i,s1))))
-t7:=tris(cut,ts(r1,s),pl(rs,ts(i,s)),pl(rs,s),disttp1(r,i,s),ispl2(ts(i,s),s,rs,satz151b(s))):is(ts(r1,s),pl(rs,s))
-t8:=tr3is(cut,ts(r1,s1),pl(ts(r1,s),ts(r1,i)),pl(pl(rs,s),r1),pl(pl(rs,i),rps),disttp2(r1,s,i),ispl12(ts(r1,s),pl(rs,s),ts(r1,i),r1,t7,satz151(r1)),4pl24(rs,s,r,i)):is(ts(r1,s1),pl(pl(rs,i),rps))
-t9:=tris(cut,pl(ts(r1,s1),ts(i,i)),pl(pl(pl(rs,i),rps),i),pl(pl(rs,i),pl(rps,i)),ispl12(ts(r1,s1),pl(pl(rs,i),rps),ts(i,i),i,t8,satz151(i)),asspl1(pl(rs,i),rps,i)):is(pl(ts(r1,s1),ts(i,i)),pl(pl(rs,i),pl(rps,i)))
-t10:=tris(cut,pl(pl(ts(r1,s1),ts(i,i)),i),pl(pl(pl(rs,i),pl(rps,i)),i),pl(pl(rs,i),pl(pl(rps,i),i)),ispl1(pl(ts(r1,s1),ts(i,i)),pl(pl(rs,i),pl(rps,i)),i,t9),asspl1(pl(rs,i),pl(rps,i),i)):is(pl(pl(ts(r1,s1),ts(i,i)),i),pl(pl(rs,i),pl(pl(rps,i),i)))
-t11:=tr3is(cut,pl(pl(rps,i),i),pl(rps,2),pl(r1,s1),pl(ts(r1,i),ts(i,s1)),asspl1(rps,i,i),4pl23(r,s,i,i),ispl12(r1,ts(r1,i),s1,ts(i,s1),satz151a(r1),satz151c(s1))):is(pl(pl(rps,i),i),pl(ts(r1,i),ts(i,s1)))
-t12:=tris(cut,pl(pl(ts(r1,s1),ts(i,i)),i),pl(pl(rs,i),pl(pl(rps,i),i)),pl(pl(rs,i),pl(ts(r1,i),ts(i,s1))),t10,ispl2(pl(pl(rps,i),i),pl(ts(r1,i),ts(i,s1)),pl(rs,i),t11)):is(pl(pl(ts(r1,s1),ts(i,i)),i),pl(pl(rs,i),pl(ts(r1,i),ts(i,s1))))
-t13:=eqi12(pl(ts(r1,s1),ts(i,i)),pl(ts(r1,i),ts(i,s1)),pl(rs,i),i,t12):eq(df(pl(ts(r1,s1),ts(i,i)),pl(ts(r1,i),ts(i,s1))),pdofrp(rs))
--ivad
-s@lemmaivad2:=treq(td(pdofrp(r),pdofrp(s)),df(pl(ts(pl(r,1rp),pl(s,1rp)),ts(1rp,1rp)),pl(ts(pl(r,1rp),1rp),ts(1rp,pl(s,1rp)))),pdofrp(ts(r,s)),t6".ivad",t13".ivad"):eq(td(pdofrp(r),pdofrp(s)),pdofrp(ts(r,s)))
-[m:mored(pdofrp(r),pdofrp(s))]
-+*ivad
-m@t14:=morede12(r1,i,s1,i,m):more(pl(r1,i),pl(s1,i))
-t15:=satz136a(r1,s1,i,t14):more(r1,s1)
--ivad
-m@lemmaivad3:=satz136a(r,s,1rp,t15".ivad"):more(r,s)
-@[c:dif][a:dif][b:dif][n:not(negd(a))][o:not(negd(b))][e:eq(td(a,a),c)][f:eq(td(b,b),c)]
-+d161
-t1:=treq2(td(a,a),td(b,b),c,e,f):eq(td(a,a),td(b,b))
-t2:=treq(pd(md(td(a,a),td(a,b)),td(b,a)),pd(md(td(a,a),td(a,b)),td(a,b)),td(a,a),eqpd2(td(b,a),td(a,b),md(td(a,a),td(a,b)),comtd(b,a)),pdmd(td(a,a),td(a,b))):eq(pd(md(td(a,a),td(a,b)),td(b,a)),td(a,a))
-t3:=tr4eq(td(pd(a,b),md(a,b)),pd(td(a,md(a,b)),td(b,md(a,b))),pd(md(td(a,a),td(a,b)),md(td(b,a),td(b,b))),md(pd(md(td(a,a),td(a,b)),td(b,a)),td(b,b)),md(td(a,a),td(b,b)),disttpd1(a,b,md(a,b)),eqpd12(td(a,md(a,b)),md(td(a,a),td(a,b)),td(b,md(a,b)),md(td(b,a),td(b,b)),disttmd2(a,a,b),disttmd2(b,a,b)),asspd2(md(td(a,a),td(a,b)),td(b,a),m0d(td(b,b))),eqmd1(pd(md(td(a,a),td(a,b)),td(b,a)),td(a,a),td(b,b),t2)):eq(td(pd(a,b),md(a,b)),md(td(a,a),td(b,b)))
-t4:=eqzero(md(td(a,a),td(b,b)),td(pd(a,b),md(a,b)),symeq(td(pd(a,b),md(a,b)),md(td(a,a),td(b,b)),t3),satzd182e(td(a,a),td(b,b),t1)):zero(td(pd(a,b),md(a,b)))
-t5:=satzd192c(pd(a,b),md(a,b),t4):or(zero(pd(a,b)),zero(md(a,b)))
-[z:zero(a)]
-t6:=eqzero(td(a,a),td(b,b),t1,td01(a,a,z)):zero(td(b,b))
-t7:=th1"l.imp"(zero(b),zero(b),refimp(zero(b)),satzd192c(b,b,t6)):zero(b)
-t8:=zeroeq(a,b,z,t7):eq(a,b)
-f@[p:not(zero(a))]
-t9:=or3e2(zero(a),posd(a),negd(a),axrdo(a),n,p):posd(a)
-t10:=th3"l.imp"(zero(b),zero(a),p,[t:zero(b)]t7(b,a,o,n,f,e,t)):not(zero(b))
-t11:=t9(b,a,o,n,f,e,t10):posd(b)
-t12:=pnot0d(pd(a,b),ppd(a,b,t9,t11)):not(zero(pd(a,b)))
-t13:=ore2(zero(pd(a,b)),zero(md(a,b)),t5,t12):zero(md(a,b))
-t14:=satzd182b(a,b,t13):eq(a,b)
--d161
-satzd161b:=th1"l.imp"(zero(a),eq(a,b),[t:zero(a)]t8".d161"(t),[t:not(zero(a))]t14".d161"(t)):eq(a,b)
-c@[n:not(negd(c))]
-+*d161
-n@[z:zero(c)]
-t15:=zeroeq(td(c,c),c,td01(c,c,z),z):eq(td(c,c),c)
-t16:=andi(not(negd(c)),eq(td(c,c),c),n,t15):and(not(negd(c)),eq(td(c,c),c))
-t17:=somei(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c)),c,t16):some"l"(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c)))
-n@[o:not(zero(c))]
-t18:=or3e2(zero(c),posd(c),negd(c),axrdo(c),n,o):posd(c)
-crp:=rpofpd(c,t18):cut
-srp:=sqrt(crp):cut
-s:=pdofrp(srp):dif
-t19:=tr3eq(td(s,s),pdofrp(ts(srp,srp)),pdofrp(crp),c,lemmaivad2(srp,srp),isrpepd(ts(srp,srp),crp,thsqrt1(crp)),eqpdrp2(c,t18)):eq(td(s,s),c)
-t20:=andi(not(negd(s)),eq(td(s,s),c),pnotnd(s,posdirp(srp)),t19):and(not(negd(s)),eq(td(s,s),c))
-t21:=somei(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c)),s,t20):some"l"(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c)))
--d161
-n@satzd161a:=th1"l.imp"(zero(c),some"l"(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c))),[t:zero(c)]t17".d161"(t),[t:not(zero(c))]t21".d161"(t)):some"l"(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c)))
-@[a:dif][i:intd(a)]
-+intd
-[z:zero(a)]
-t1:=ori1(zero(absd(a)),natd(absd(absd(a))),satzd166f(a,z)):intd(absd(a))
-i@[n:natd(absd(a))]
-t2:=natintd(absd(a),n):intd(absd(a))
--intd
-intabsd:=orapp(zero(a),natd(absd(a)),intd(absd(a)),i,[t:zero(a)]t1".intd"(t),[t:natd(absd(a))]t2".intd"(t)):intd(absd(a))
-+*intd
-n@t4:=eqnatd(absd(a),absd(m0d(a)),satzd178a(a),n):natd(absd(m0d(a)))
--intd
-i@intm0d:=th9"l.or"(zero(a),natd(absd(a)),zero(m0d(a)),natd(absd(m0d(a))),i,[t:zero(a)]satzd176b(a,t),[t:natd(absd(a))]t4".intd"(t)):intd(m0d(a))
-a@[b:dif][i:intd(a)][j:intd(b)]
-+*intd
-j@[z:zero(a)]
-t5:=symeq(pd(a,b),b,pd01(a,b,z)):eq(b,pd(a,b))
-t6:=eqintd(b,pd(a,b),t5,j):intd(pd(a,b))
-j@[z:zero(b)]
-t7:=symeq(pd(a,b),a,pd02(a,b,z)):eq(a,pd(a,b))
-t8:=eqintd(a,pd(a,b),t7,i):intd(pd(a,b))
-a@[i:intd(a)][p:posd(a)]
-t9:=<p>ande2(posd(a),[t:posd(a)]natrp(rpofpd(a,t)),posintnatd(a,p,i)):natrp(rpofpd(a,p))
-j@[pp:posd(pd(a,b))]
-apb1:=rpofpd(pd(a,b),pp):cut
-[p:posd(a)]
-a1:=rpofpd(a,p):cut
-[q:posd(b)]
-b1:=rpofpd(b,q):cut
-t10:=natpl(a1,t9(a,i,p),b1,t9(b,j,q)):natrp(pl(a1,b1))
-t11:=eqpd12(a,pdofrp(a1),b,pdofrp(b1),eqpdrp1(a,p),eqpdrp1(b,q)):eq(pd(a,b),pd(pdofrp(a1),pdofrp(b1)))
-t12:=treq(pd(a,b),pd(pdofrp(a1),pdofrp(b1)),pdofrp(pl(a1,b1)),t11,lemmaivad1(a1,b1)):eq(pd(a,b),pdofrp(pl(a1,b1)))
-t13:=tris(cut,apb1,rpofpd(pdofrp(pl(a1,b1)),posdirp(pl(a1,b1))),pl(a1,b1),eqpderp(pd(a,b),pp,pdofrp(pl(a1,b1)),posdirp(pl(a1,b1)),t12),isrppd2(pl(a1,b1))):is(apb1,pl(a1,b1))
-t14:=isp1(cut,[t:cut]natrp(t),pl(a1,b1),apb1,t10,t13):natrp(apb1)
-t15:=andi(posd(pd(a,b)),[t:posd(pd(a,b))]natrp(apb1(t)),pp,[t:posd(pd(a,b))]t14(t,p,q)):natd(pd(a,b))
-t16:=natintd(pd(a,b),t15):intd(pd(a,b))
-p@[n:negd(b)]
-t17:=satzd176c(b,n):posd(m0d(b))
-b2:=rpofpd(m0d(b),t17):cut
-t18:=eqpd2(b,m0d(m0d(b)),a,satzd177a(b)):eq(pd(a,b),md(a,m0d(b)))
-t19:=eqposd(pd(a,b),md(a,m0d(b)),t18,pp):posd(md(a,m0d(b)))
-t20:=satzd182a(a,m0d(b),t19):mored(a,m0d(b))
-t21:=eqmored12(a,pdofrp(a1),m0d(b),pdofrp(b2),eqpdrp1(a,p),eqpdrp1(m0d(b),t17),t20):mored(pdofrp(a1),pdofrp(b2))
-t22:=lemmaivad3(a1,b2,t21):more(a1,b2)
-t23:=natmn(a1,t9(a,i,p),b2,t9(m0d(b),intm0d(b,j),t17),t22):natrp(mn(a1,b2,t22))
-t24:=eqpd12(m0d(b),pdofrp(b2),pd(a,b),pdofrp(apb1),eqpdrp1(m0d(b),t17),eqpdrp1(pd(a,b),pp)):eq(pd(m0d(b),pd(a,b)),pd(pdofrp(b2),pdofrp(apb1)))
-t25:=tr4eq(a,md(pd(a,b),b),pd(m0d(b),pd(a,b)),pd(pdofrp(b2),pdofrp(apb1)),pdofrp(pl(b2,apb1)),symeq(md(pd(a,b),b),a,mdpd(a,b)),compd(pd(a,b),m0d(b)),t24,lemmaivad1(b2,apb1)):eq(a,pdofrp(pl(b2,apb1)))
-t26:=tris2(cut,pl(b2,apb1),a1,rpofpd(pdofrp(pl(b2,apb1)),posdirp(pl(b2,apb1))),isrppd1(pl(b2,apb1)),eqpderp(a,p,pdofrp(pl(b2,apb1)),posdirp(pl(b2,apb1)),t25)):is(pl(b2,apb1),a1)
-t27:=satz140g(a1,b2,apb1,t22,t26):is(apb1,mn(a1,b2,t22))
-t28:=isp1(cut,[t:cut]natrp(t),mn(a1,b2,t22),apb1,t23,t27):natrp(apb1)
-t29:=andi(posd(pd(a,b)),[t:posd(pd(a,b))]natrp(apb1(t)),pp,[t:posd(pd(a,b))]t28(t,p,n)):natd(pd(a,b))
-t30:=natintd(pd(a,b),t29):intd(pd(a,b))
-p@t31:=rappd(b,intd(pd(a,b)),[t:posd(b)]t16(t),[t:zero(b)]t8(t),[t:negd(b)]t30(t)):intd(pd(a,b))
-pp@[n:negd(a)]
-t31a:=th3"l.imp"(negd(b),negd(pd(a,b)),pnotnd(pd(a,b),pp),[t:negd(b)]npd(a,b,n,t)):not(negd(b))
-t32:=th3"l.imp"(zero(b),negd(pd(a,b)),pnotnd(pd(a,b),pp),[t:zero(b)]eqnegd(a,pd(a,b),symeq(pd(a,b),a,pd02(a,b,t)),n)):not(zero(b))
-t33:=or3e2(zero(b),posd(b),negd(b),axrdo(b),t31a,t32):posd(b)
-t34:=eqposd(pd(a,b),pd(b,a),compd(a,b),pp):posd(pd(b,a))
-t35:=t30(b,a,j,i,t34,t33,n):intd(pd(b,a))
-t36:=eqintd(pd(b,a),pd(a,b),compd(b,a),t35):intd(pd(a,b))
-pp@t37:=rappd(a,intd(pd(a,b)),[t:posd(a)]t31(t),[t:zero(a)]t6(t),[t:negd(a)]t36(t)):intd(pd(a,b))
-j@[0p:zero(pd(a,b))]
-t38:=intdi0(pd(a,b),0p):intd(pd(a,b))
-j@[np:negd(pd(a,b))]
-t39:=satzd176c(pd(a,b),np):posd(m0d(pd(a,b)))
-t40:=eqposd(m0d(pd(a,b)),pd(m0d(a),m0d(b)),satzd180(a,b),t39):posd(pd(m0d(a),m0d(b)))
-t41:=t37(m0d(a),m0d(b),intm0d(a,i),intm0d(b,j),t40):intd(pd(m0d(a),m0d(b)))
-t42:=eqintd(pd(m0d(a),m0d(b)),m0d(pd(a,b)),satzd180a(a,b),t41):intd(m0d(pd(a,b)))
-t43:=intm0d(m0d(pd(a,b)),t42):intd(m0d(m0d(pd(a,b))))
-t44:=eqintd(m0d(m0d(pd(a,b))),pd(a,b),satzd177(pd(a,b)),t43):intd(pd(a,b))
--intd
-j@intpd:=rappd(pd(a,b),intd(pd(a,b)),[t:posd(pd(a,b))]t37".intd"(t),[t:zero(pd(a,b))]t38".intd"(t),[t:negd(pd(a,b))]t44".intd"(t)):intd(pd(a,b))
-intmd:=intpd(a,m0d(b),i,intm0d(b,j)):intd(md(a,b))
-+*intd
-j@[n:not(zero(td(a,b)))]
-t45:=th3"l.imp"(zero(a),zero(td(a,b)),n,[t:zero(a)]td01(a,b,t)):not(zero(a))
-t46:=th3"l.imp"(zero(b),zero(td(a,b)),n,[t:zero(b)]td02(a,b,t)):not(zero(b))
-t47:=satzd166e(a,t45):posd(absd(a))
-a3:=rpofpd(absd(a),t47):cut
-t48:=satzd166e(b,t46):posd(absd(b))
-b3:=rpofpd(absd(b),t48):cut
-t49:=natts(a3,t9(absd(a),intabsd(a,i),t47),b3,t9(absd(b),intabsd(b,j),t48)):natrp(ts(a3,b3))
-t50:=satzd166e(td(a,b),n):posd(absd(td(a,b)))
-[p:posd(absd(td(a,b)))]
-atb3:=rpofpd(absd(td(a,b)),p):cut
-t51:=eqtd12(absd(a),pdofrp(a3),absd(b),pdofrp(b3),eqpdrp1(absd(a),t47),eqpdrp1(absd(b),t48)):eq(td(absd(a),absd(b)),td(pdofrp(a3),pdofrp(b3)))
-t52:=tr3eq(absd(td(a,b)),td(absd(a),absd(b)),td(pdofrp(a3),pdofrp(b3)),pdofrp(ts(a3,b3)),satzd193(a,b),t51,lemmaivad2(a3,b3)):eq(absd(td(a,b)),pdofrp(ts(a3,b3)))
-t53:=tris2(cut,atb3,ts(a3,b3),rpofpd(pdofrp(ts(a3,b3)),posdirp(ts(a3,b3))),eqpderp(absd(td(a,b)),p,pdofrp(ts(a3,b3)),posdirp(ts(a3,b3)),t52),isrppd1(ts(a3,b3))):is(atb3,ts(a3,b3))
-t54:=isp1(cut,[t:cut]natrp(t),ts(a3,b3),atb3,t49,t53):natrp(atb3)
-n@t55:=andi(posd(absd(td(a,b))),[t:posd(absd(td(a,b)))]natrp(atb3(t)),t50,[t:posd(absd(td(a,b)))]t54(t)):natd(absd(td(a,b)))
--intd
-j@inttd:=[t:not(zero(td(a,b)))]t55".intd"(t):intd(td(a,b))
-+r
-@eq:=[x:dif][y:dif]eq"rp"(x,y):[x:dif][y:dif]'prop'
-refeq:=[x:dif]refeq"rp"(x):[x:dif]<x><x>eq
-symeq:=[x:dif][y:dif][t:<y><x>eq]symeq"rp"(x,y,t):[x:dif][y:dif][t:<y><x>eq]<x><y>eq
-treq:=[x:dif][y:dif][z:dif][t:<y><x>eq][u:<z><y>eq]treq"rp"(x,y,z,t,u):[x:dif][y:dif][z:dif][t:<y><x>eq][u:<z><y>eq]<z><x>eq
-[a:dif][s:set(dif)]
-inn:=esti(dif,a,s):'prop'
-@real:=ect"eq"(dif,eq,refeq,symeq,treq):'type'
-[r:real][s:real]
-is:=is"e"(real,r,s):'prop'
-nis:=not(is(r,s)):'prop'
-@[p:[x:real]'prop']
-some:=some"l"(real,p):'prop'
-all:=all"l"(real,p):'prop'
-one:=one"e"(real,p):'prop'
-r@[s0:set(real)]
-in:=esti(real,r,s0):'prop'
-a@realof:=ectelt"eq"(dif,eq,refeq,symeq,treq,a):real
-r@class:=ecect"eq"(dif,eq,refeq,symeq,treq,r):set(dif)
-a@innclass:=th5"eq.4"(dif,eq,refeq,symeq,treq,a):inn(a,class(realof(a)))
-r@[a:dif][b:dif][e:eq"rp"(a,b)][air:inn(a,class(r))]
-eqinn:=th8"eq.4"(dif,eq,refeq,symeq,treq,r,a,air,b,e):inn(b,class(r))
-r@[p:'prop'][p1:[x:dif][xi:inn(x,class(r))]p]
-realapp1:=th3"eq.4"(dif,eq,refeq,symeq,treq,r,p,p1):p
-r@[s:real][p:'prop'][p1:[x:dif][y:dif][xi:inn(x,class(r))][yi:inn(y,class(s))]p]
-+ivr1
-[a:dif][air:inn(a,class(r))]
-t1:=realapp1(s,p,[y:dif]<air><y><a>p1):p
--ivr1
-realapp2:=realapp1(r,p,[x:dif][xi:inn(x,class(r))]t1".ivr1"(x,xi)):p
-s@[t:real][p:'prop'][p1:[x:dif][y:dif][z:dif][xi:inn(x,class(r))][yi:inn(y,class(s))][zi:inn(z,class(t))]p]
-+*ivr1
-p1@[a:dif][air:inn(a,class(r))]
-t2:=realapp2(s,t,p,[y:dif][z:dif]<air><z><y><a>p1):p
--ivr1
-p1@realapp3:=realapp1(r,p,[x:dif][xi:inn(x,class(r))]t2".ivr1"(x,xi)):p
-t@[u:real][p:'prop'][p1:[x:dif][y:dif][z:dif][v:dif][xi:inn(x,class(r))][yi:inn(y,class(s))][zi:inn(z,class(t))][vi:inn(v,class(u))]p]
-+*ivr1
-p1@[a:dif][air:inn(a,class(r))]
-t3:=realapp3(s,t,u,p,[y:dif][z:dif][v:dif]<air><v><z><y><a>p1):p
--ivr1
-p1@realapp4:=realapp1(r,p,[x:dif][xi:inn(x,class(r))]t3".ivr1"(x,xi)):p
-s@[a1:dif][b1:dif][a1ir:inn(a1,class(r))][b1is:inn(b1,class(s))][e:eq"rp"(a1,b1)]
-isin:=th3"eq.5"(dif,eq,refeq,symeq,treq,r,s,a1,a1ir,b1,b1is,e):is(r,s)
-b1is@[i:is(r,s)]
-isex:=th5"eq.5"(dif,eq,refeq,symeq,treq,r,s,a1,a1ir,b1,b1is,i):eq"rp"(a1,b1)
-b1is@[n:not(eq"rp"(a1,b1))]
-nisin:=th3"l.imp"(is(r,s),eq"rp"(a1,b1),n,[t:is(r,s)]isex(t)):nis(r,s)
-b1is@[n:nis(r,s)]
-nisex:=th3"l.imp"(eq"rp"(a1,b1),is(r,s),n,[t:eq"rp"(a1,b1)]isin(t)):not(eq"rp"(a1,b1))
-@[alpha:'type'][f:[x:dif]alpha]
-fixf:=fixfu"eq"(dif,eq,refeq,symeq,treq,alpha,f):'prop'
-[ff:fixf(alpha,f)][r0:real]
-indreal:=indeq"eq"(dif,eq,refeq,symeq,treq,alpha,f,ff,r0):alpha
-[a:dif][air:inn(a,class(r0))]
-isindreal:=th2"eq.10"(dif,eq,refeq,symeq,treq,alpha,f,ff,r0,a,air):is"e"(alpha,<a>f,indreal)
-alpha@[g:[x:dif][y:dif]alpha]
-fixf2:=fixfu2"eq"(dif,eq,refeq,symeq,treq,alpha,g):'prop'
-[ff2:fixf2(alpha,g)][r0:real][s0:real]
-indreal2:=indeq2"eq"(dif,eq,refeq,symeq,treq,alpha,g,ff2,r0,s0):alpha
-[a:dif][b:dif][air:inn(a,class(r0))][bis:inn(b,class(s0))]
-isindreal2:=th1"eq.11"(dif,eq,refeq,symeq,treq,alpha,g,ff2,r0,s0,a,air,b,bis):is"e"(alpha,<b><a>g,indreal2)
-@0:=realof(df(1rp,1rp)):real
-r@[a0:dif][a0ir:inn(a0,class(r))][z:zero(a0)]
-0in:=isin(r,0,a0,df(1rp,1rp),a0ir,innclass(df(1rp,1rp)),zeroeq(a0,df(1rp,1rp),z,zeroi(1rp,1rp,refis(cut,1rp)))):is(r,0)
-a0ir@[i:is(r,0)]
-0ex:=eqzero(df(1rp,1rp),a0,isex(0,r,df(1rp,1rp),a0,innclass(df(1rp,1rp)),a0ir,symis(real,r,0,i)),tris(cut,stm(df(1rp,1rp)),1rp,std(df(1rp,1rp)),stmis(1rp,1rp),isstd(1rp,1rp))):zero(a0)
-+*ivr1
-a0@propp:=and(inn(a0,class(r)),posd(a0)):'prop'
--ivr1
-r@pos:=some"l"(dif,[x:dif]propp".ivr1"(x)):'prop'
-a0ir@[p:posd(a0)]
-+*ivr1
-p@t4:=andi(inn(a0,class(r)),posd(a0),a0ir,p):propp(a0)
--ivr1
-p@posin:=somei(dif,[x:dif]propp".ivr1"(x),a0,t4".ivr1"):pos(r)
-a0ir@[p:pos(r)]
-+*ivr1
-p@[a:dif][q1:propp(a)]
-t5:=ande1(inn(a,class(r)),posd(a),q1):inn(a,class(r))
-t6:=ande2(inn(a,class(r)),posd(a),q1):posd(a)
-t7:=eqposd(a,a0,isex(r,r,a,a0,t5,a0ir,refis(real,r)),t6):posd(a0)
--ivr1
-p@posex:=someapp(dif,[x:dif]propp".ivr1"(x),p,posd(a0),[x:dif][t:propp".ivr1"(x)]t7".ivr1"(x,t)):posd(a0)
-+*ivr1
-a0@propn:=and(inn(a0,class(r)),negd(a0)):'prop'
--ivr1
-r@neg:=some"l"(dif,[x:dif]propn".ivr1"(x)):'prop'
-a0ir@[n:negd(a0)]
-+*ivr1
-n@t8:=andi(inn(a0,class(r)),negd(a0),a0ir,n):propn(a0)
--ivr1
-n@negin:=somei(dif,[x:dif]propn".ivr1"(x),a0,t8".ivr1"):neg(r)
-a0ir@[n:neg(r)]
-+*ivr1
-n@[a:dif][pl:propn(a)]
-t9:=ande1(inn(a,class(r)),negd(a),pl):inn(a,class(r))
-t10:=ande2(inn(a,class(r)),negd(a),pl):negd(a)
-t11:=eqnegd(a,a0,isex(r,r,a,a0,t9,a0ir,refis(real,r)),t10):negd(a0)
--ivr1
-n@negex:=someapp(dif,[x:dif]propn".ivr1"(x),n,negd(a0),[x:dif][t:propn".ivr1"(x)]t11".ivr1"(x,t)):negd(a0)
-+*ivr1
-a0ir@[p:posd(a0)]
-t12:=or3i2(is(r,0),pos(r),neg(r),posin(p)):or3(is(r,0),pos(r),neg(r))
-a0ir@[z:zero(a0)]
-t13:=or3i1(is(r,0),pos(r),neg(r),0in(z)):or3(is(r,0),pos(r),neg(r))
-a0ir@[n:negd(a0)]
-t14:=or3i3(is(r,0),pos(r),neg(r),negin(n)):or3(is(r,0),pos(r),neg(r))
-a0ir@t15:=rappd(a0,or3(is(r,0),pos(r),neg(r)),[t:posd(a0)]t12(t),[t:zero(a0)]t13(t),[t:negd(a0)]t14(t)):or3(is(r,0),pos(r),neg(r))
--ivr1
-r@axrlo:=realapp1(r,or3(is(r,0),pos(r),neg(r)),[x:dif][xi:inn(x,class(r))]t15".ivr1"(x,xi)):or3(is(r,0),pos(r),neg(r))
-+*ivr1
-a0ir@[i:is(r,0)]
-t16:=th3"l.imp"(pos(r),posd(a0),0notpd(a0,0ex(i)),[t:pos(r)]posex(t)):not(pos(r))
-a0ir@[p:pos(r)]
-t17:=th3"l.imp"(neg(r),negd(a0),pnotnd(a0,posex(p)),[t:neg(r)]negex(t)):not(neg(r))
-a0ir@[n:neg(r)]
-t18:=th3"l.imp"(is(r,0),zero(a0),nnot0d(a0,negex(n)),[t:is(r,0)]0ex(t)):not(is(r,0))
-a0ir@t19:=th6"l.ec3"(is(r,0),pos(r),neg(r),[t:is(r,0)]t16(t),[t:pos(r)]t17(t),[t:neg(r)]t18(t)):ec3(is(r,0),pos(r),neg(r))
--ivr1
-r@axrle:=realapp1(r,ec3(is(r,0),pos(r),neg(r)),[x:dif][xi:inn(x,class(r))]t19".ivr1"(x,xi)):ec3(is(r,0),pos(r),neg(r))
-axrl:=orec3i(is(r,0),pos(r),neg(r),axrlo,axrle):orec3(is(r,0),pos(r),neg(r))
-[p:'prop'][p1:[t:pos(r)]p][p2:[t:is(r,0)]p][p3:[t:neg(r)]p]
-rapp:=or3app(is(r,0),pos(r),neg(r),p,axrlo,p2,p1,p3):p
-r@[p:pos(r)]
-pnotn:=ec3e23(is(r,0),pos(r),neg(r),axrle,p):not(neg(r))
-pnot0:=ec3e21(is(r,0),pos(r),neg(r),axrle,p):nis(r,0)
-r@[i:is(r,0)]
-0notp:=ec3e12(is(r,0),pos(r),neg(r),axrle,i):not(pos(r))
-0notn:=ec3e13(is(r,0),pos(r),neg(r),axrle,i):not(neg(r))
-r@[n:neg(r)]
-nnotp:=ec3e32(is(r,0),pos(r),neg(r),axrle,n):not(pos(r))
-nnot0:=ec3e31(is(r,0),pos(r),neg(r),axrle,n):nis(r,0)
-s@[i:is(r,s)][p:pos(r)]
-ispos:=isp(real,[x:real]pos(x),r,s,p,i):pos(s)
-i@[n:neg(r)]
-isneg:=isp(real,[x:real]neg(x),r,s,n,i):neg(s)
-@[r0:cut]
-pofrp:=realof(pdofrp(r0)):real
-nofrp:=realof(ndofrp(r0)):real
-[s0:cut][i:is"rp"(r0,s0)]
-isrpep:=isf(cut,real,[x:cut]pofrp(x),r0,s0,i):is(pofrp(r0),pofrp(s0))
-isrpen:=isf(cut,real,[x:cut]nofrp(x),r0,s0,i):is(nofrp(r0),nofrp(s0))
-s0@[i:is(pofrp(r0),pofrp(s0))]
-+*ivr1
-i"r"@t20:=isex(pofrp(r0),pofrp(s0),pdofrp(r0),pdofrp(s0),innclass(pdofrp(r0)),innclass(pdofrp(s0)),i):eq"rp"(pdofrp(r0),pdofrp(s0))
--ivr1
-i@isrpip:=isrpipd(r0,s0,t20".ivr1"):is"rp"(r0,s0)
-s0@[i:is(nofrp(r0),nofrp(s0))]
-+*ivr1
-i"r"@t21:=isex(nofrp(r0),nofrp(s0),ndofrp(r0),ndofrp(s0),innclass(ndofrp(r0)),innclass(ndofrp(s0)),i):eq"rp"(ndofrp(r0),ndofrp(s0))
--ivr1
-i@isrpin:=isrpind(r0,s0,t21".ivr1"):is"rp"(r0,s0)
-r0@posi:=posin(pofrp(r0),pdofrp(r0),innclass(pdofrp(r0)),posdirp(r0)):pos(pofrp(r0))
-negi:=negin(nofrp(r0),ndofrp(r0),innclass(ndofrp(r0)),negdirp(r0)):neg(nofrp(r0))
-s@[r0:cut][s0:cut][i:is(r,pofrp(r0))][j:is(s,pofrp(s0))][k:is(r,s)]
-+*ivr1
-k@t22:=isrpip(r0,s0,tr3is(real,pofrp(r0),r,s,pofrp(s0),symis(real,r,pofrp(r0),i),k,j)):is"rp"(r0,s0)
-r@t23:=[x:cut][y:cut][t:is(r,pofrp(x))][u:is(r,pofrp(y))]t22(r,r,x,y,t,u,refis(real,r)):amone(cut,[x:cut]is(r,pofrp(x)))
-a0ir@[p1:pos(r)]
-t24:=posex(p1):posd(a0)
-pr:=rpofpd(a0,t24):cut
-t25:=isin(r,pofrp(pr),a0,pdofrp(pr),a0ir,innclass(pdofrp(pr)),eqpdrp1(a0,t24)):is(r,pofrp(pr))
-t26:=somei(cut,[x:cut]is(r,pofrp(x)),pr,t25):some"rp"([x:cut]is(r,pofrp(x)))
--ivr1
-r@[p:pos(r)]
-+*ivr1
-p"r"@t27:=realapp1(some"rp"([x:cut]is(r,pofrp(x))),[x:dif][t:inn(x,class(r))]t26(x,t,p)):some"rp"([x:cut]is(r,pofrp(x)))
-t28:=onei(cut,[x:cut]is(r,pofrp(x)),t23,t27):one"rp"([x:cut]is(r,pofrp(x)))
--ivr1
-p@rpofp:=ind(cut,[x:cut]is(r,pofrp(x)),t28".ivr1"):cut
-isprp1:=oneax(cut,[x:cut]is(r,pofrp(x)),t28".ivr1"):is(r,pofrp(rpofp(r,p)))
-isprp2:=symis(real,r,pofrp(rpofp(r,p)),isprp1):is(pofrp(rpofp(r,p)),r)
-@[r1:real][p:pos(r1)][s1:real][q:pos(s1)][i:is(r1,s1)]
-isperp:=t22".ivr1"(r1,s1,rpofp(r1,p),rpofp(s1,q),isprp1(r1,p),isprp1(s1,q),i):is"rp"(rpofp(r1,p),rpofp(s1,q))
-q@[i:is"rp"(rpofp(r1,p),rpofp(s1,q))]
-ispirp:=tr3is(real,r1,pofrp(rpofp(r1,p)),pofrp(rpofp(s1,q)),s1,isprp1(r1,p),isrpep(rpofp(r1,p),rpofp(s1,q),i),isprp2(s1,q)):is(r1,s1)
-@[r0:cut]
-isrpp1:=t22".ivr1"(pofrp(r0),pofrp(r0),r0,rpofp(pofrp(r0),posi(r0)),refis(real,pofrp(r0)),isprp1(pofrp(r0),posi(r0)),refis(real,pofrp(r0))):is"rp"(r0,rpofp(pofrp(r0),posi(r0)))
-isrpp2:=symis(cut,r0,rpofp(pofrp(r0),posi(r0)),isrpp1):is"rp"(rpofp(pofrp(r0),posi(r0)),r0)
-s@[r0:cut][s0:cut][i:is(r,nofrp(r0))][j:is(s,nofrp(s0))][k:is(r,s)]
-+*ivr1
-k@t29:=isrpin(r0,s0,tr3is(real,nofrp(r0),r,s,nofrp(s0),symis(real,r,nofrp(r0),i),k,j)):is"rp"(r0,s0)
-r@t30:=[x:cut][y:cut][t:is(r,nofrp(x))][u:is(r,nofrp(y))]t29(r,r,x,y,t,u,refis(real,r)):amone(cut,[x:cut]is(r,nofrp(x)))
-a0ir@[n1:neg(r)]
-t31:=negex(n1):negd(a0)
-nr:=rpofnd(a0,t31):cut
-t32:=isin(r,nofrp(nr),a0,ndofrp(nr),a0ir,innclass(ndofrp(nr)),eqndrp1(a0,t31)):is(r,nofrp(nr))
-t33:=somei(cut,[x:cut]is(r,nofrp(x)),nr,t32):some"rp"([x:cut]is(r,nofrp(x)))
--ivr1
-r@[n:neg(r)]
-+*ivr1
-n"r"@t34:=realapp1(some"rp"([x:cut]is(r,nofrp(x))),[x:dif][t:inn(x,class(r))]t33(x,t,n)):some"rp"([x:cut]is(r,nofrp(x)))
-t35:=onei(cut,[x:cut]is(r,nofrp(x)),t30,t34):one"rp"([x:cut]is(r,nofrp(x)))
--ivr1
-n@rpofn:=ind(cut,[x:cut]is(r,nofrp(x)),t35".ivr1"):cut
-isnrp1:=oneax(cut,[x:cut]is(r,nofrp(x)),t35".ivr1"):is(r,nofrp(rpofn(r,n)))
-isnrp2:=symis(real,r,nofrp(rpofn(r,n)),isnrp1):is(nofrp(rpofn(r,n)),r)
-@[r1:real][n:neg(r1)][s1:real][m:neg(s1)][i:is(r1,s1)]
-isnerp:=t29".ivr1"(r1,s1,rpofn(r1,n),rpofn(s1,m),isnrp1(r1,n),isnrp1(s1,m),i):is"rp"(rpofn(r1,n),rpofn(s1,m))
-m@[i:is"rp"(rpofn(r1,n),rpofn(s1,m))]
-isnirp:=tr3is(real,r1,nofrp(rpofn(r1,n)),nofrp(rpofn(s1,m)),s1,isnrp1(r1,n),isrpen(rpofn(r1,n),rpofn(s1,m),i),isnrp2(s1,m)):is(r1,s1)
-@[r0:cut]
-isrpn1:=t29".ivr1"(nofrp(r0),nofrp(r0),r0,rpofn(nofrp(r0),negi(r0)),refis(real,nofrp(r0)),isnrp1(nofrp(r0),negi(r0)),refis(real,nofrp(r0))):is"rp"(r0,rpofn(nofrp(r0),negi(r0)))
-isrpn2:=symis(cut,r0,rpofn(nofrp(r0),negi(r0)),isrpn1):is"rp"(rpofn(nofrp(r0),negi(r0)),r0)
-r@satz163:=refis(real,r):is(r,r)
-s@[i:is(r,s)]
-satz164:=symis(real,r,s,i):is(s,r)
-t@[i:is(r,s)][j:is(s,t)]
-satz165:=tris(real,r,s,t,i,j):is(r,t)
-@absdr:=[x:dif]realof(absd(x)):[x:dif]real
-+ivr2
-[a:dif][b:dif][e:eq"rp"(a,b)]
-t1:=isin(realof(absd(a)),realof(absd(b)),absd(a),absd(b),innclass(absd(a)),innclass(absd(b)),eqabsd(a,b,e)):is(<a>absdr,<b>absdr)
--ivr2
-fabsdr:=[x:dif][y:dif][t:<y><x>eq]t1".ivr2"(x,y,t):fixf(real,absdr)
-r@abs:=indreal(real,absdr,fabsdr,r):real
-+*ivr2
-a0ir@t2:=isindreal(real,absdr,fabsdr,r,a0,a0ir):is(realof(absd(a0)),abs(r))
--ivr2
-a0ir@aica:=isp(real,[x:real]inn(absd(a0),class(x)),realof(absd(a0)),abs(r),innclass(absd(a0)),t2".ivr2"):inn(absd(a0),class(abs(r)))
-s@[i:is(r,s)]
-isabs:=isf(real,real,[x:real]abs(x),r,s,i):is(abs(r),abs(s))
-+2r166
-a0ir@[p:pos(r)]
-t1:=satzd166a(a0,posex(p)):posd(absd(a0))
-t2:=posin(abs(r),absd(a0),aica,t1):pos(abs(r))
--2r166
-r@[p:pos(r)]
-satz166a:=realapp1(pos(abs(r)),[x:dif][t:inn(x,class(r))]t2".2r166"(x,t,p)):pos(abs(r))
-+*2r166
-a0ir@[n:neg(r)]
-t3:=satzd166b(a0,negex(n)):posd(absd(a0))
-t4:=posin(abs(r),absd(a0),aica,t3):pos(abs(r))
--2r166
-r@[n:neg(r)]
-satz166b:=realapp1(pos(abs(r)),[x:dif][t:inn(x,class(r))]t4".2r166"(x,t,n)):pos(abs(r))
-+*2r166
-b1is@[p:pos(r)][q:pos(s)][i:is(abs(r),abs(s))]
-t5:=satzd166c(a1,b1,posex(r,a1,a1ir,p),posex(s,b1,b1is,q),isex(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is),i)):eq"rp"(a1,b1)
-t6:=isin(t5):is(r,s)
--2r166
-s@[p:pos(r)][q:pos(s)][i:is(abs(r),abs(s))]
-satz166c:=realapp2(is(r,s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".2r166"(x,y,t,u,p,q,i)):is(r,s)
-+*2r166
-b1is@[n:neg(r)][o:neg(s)][i:is(abs(r),abs(s))]
-t7:=satzd166d(a1,b1,negex(r,a1,a1ir,n),negex(s,b1,b1is,o),isex(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is),i)):eq"rp"(a1,b1)
-t8:=isin(t7):is(r,s)
--2r166
-s@[n:neg(r)][o:neg(s)][i:is(abs(r),abs(s))]
-satz166d:=realapp2(is(r,s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t8".2r166"(x,y,t,u,n,o,i)):is(r,s)
-r@[n:nis(r,0)]
-satz166e:=rapp(r,pos(abs(r)),[t:pos(r)]satz166a(t),th2"l.imp"(is(r,0),pos(abs(r)),n),[t:neg(r)]satz166b(t)):pos(abs(r))
-+*2r166
-a0ir@[i:is(r,0)]
-t9:=satzd166f(a0,0ex(i)):zero(absd(a0))
-t10:=0in(abs(r),absd(a0),aica,t9):is(abs(r),0)
--2r166
-r@[i:is(r,0)]
-satz166f:=realapp1(is(abs(r),0),[x:dif][t:inn(x,class(r))]t10".2r166"(x,t,i)):is(abs(r),0)
-s@more:=some"l"(dif,[x:dif]some"l"(dif,[y:dif]and3(inn(x,class(r)),inn(y,class(s)),mored(x,y)))):'prop'
-+*ivr2
-b1@propm:=and3(inn(a1,class(r)),inn(b1,class(s)),mored(a1,b1)):'prop'
--ivr2
-b1is@[m:mored(a1,b1)]
-+*ivr2
-m@t3:=and3i(inn(a1,class(r)),inn(b1,class(s)),mored(a1,b1),a1ir,b1is,m):propm(a1,b1)
-t4:=somei(dif,[x:dif]propm(a1,x),b1,t3):some"l"(dif,[x:dif]propm(a1,x))
--ivr2
-m@morein:=somei(dif,[x:dif]some"l"(dif,[y:dif]propm".ivr2"(x,y)),a1,t4".ivr2"):more(r,s)
-b1is@[m:more(r,s)]
-+*ivr2
-m@[a:dif][sa:some"l"(dif,[x:dif]propm(a,x))][b:dif][p2:propm(a,b)]
-t5:=and3e1(inn(a,class(r)),inn(b,class(s)),mored(a,b),p2):inn(a,class(r))
-t6:=and3e2(inn(a,class(r)),inn(b,class(s)),mored(a,b),p2):inn(b,class(s))
-t7:=and3e3(inn(a,class(r)),inn(b,class(s)),mored(a,b),p2):mored(a,b)
-t8:=eqmored12(a,a1,b,b1,isex(r,r,a,a1,t5,a1ir,refis(real,r)),isex(s,s,b,b1,t6,b1is,refis(real,s)),t7):mored(a1,b1)
-sa@t9:=someapp(dif,[x:dif]propm(a,x),sa,mored(a1,b1),[x:dif][t:propm(a,x)]t8(x,t)):mored(a1,b1)
--ivr2
-m@moreex:=someapp(dif,[x:dif]some"l"(dif,[y:dif]propm".ivr2"(x,y)),m,mored(a1,b1),[x:dif][t:some"l"(dif,[y:dif]propm".ivr2"(x,y))]t9".ivr2"(x,t)):mored(a1,b1)
-s@less:=some"l"(dif,[x:dif]some"l"(dif,[y:dif]and3(inn(x,class(r)),inn(y,class(s)),lessd(x,y)))):'prop'
-+*ivr2
-b1@propl:=and3(inn(a1,class(r)),inn(b1,class(s)),lessd(a1,b1)):'prop'
--ivr2
-b1is@[l:lessd(a1,b1)]
-+*ivr2
-l@t10:=and3i(inn(a1,class(r)),inn(b1,class(s)),lessd(a1,b1),a1ir,b1is,l):propl(a1,b1)
-t11:=somei(dif,[x:dif]propl(a1,x),b1,t10):some"l"(dif,[x:dif]propl(a1,x))
--ivr2
-l@lessin:=somei(dif,[x:dif]some"l"(dif,[y:dif]propl".ivr2"(x,y)),a1,t11".ivr2"):less(r,s)
-b1is@[l:less(r,s)]
-+*ivr2
-l@[a:dif][sa:some"l"(dif,[x:dif]propl(a,x))][b:dif][p2:propl(a,b)]
-t12:=and3e1(inn(a,class(r)),inn(b,class(s)),lessd(a,b),p2):inn(a,class(r))
-t13:=and3e2(inn(a,class(r)),inn(b,class(s)),lessd(a,b),p2):inn(b,class(s))
-t14:=and3e3(inn(a,class(r)),inn(b,class(s)),lessd(a,b),p2):lessd(a,b)
-t15:=eqlessd12(a,a1,b,b1,isex(r,r,a,a1,t12,a1ir,refis(real,r)),isex(s,s,b,b1,t13,b1is,refis(real,s)),t14):lessd(a1,b1)
-sa@t16:=someapp(dif,[x:dif]propl(a,x),sa,lessd(a1,b1),[x:dif][t:propl(a,x)]t15(x,t)):lessd(a1,b1)
--ivr2
-l@lessex:=someapp(dif,[x:dif]some"l"(dif,[y:dif]propl".ivr2"(x,y)),l,lessd(a1,b1),[x:dif][t:some"l"(dif,[y:dif]propl".ivr2"(x,y))]t16".ivr2"(x,t)):lessd(a1,b1)
-t@[i:is(r,s)][m:more(r,t)]
-ismore1:=isp(real,[x:real]more(x,t),r,s,m,i):more(s,t)
-i@[m:more(t,r)]
-ismore2:=isp(real,[x:real]more(t,x),r,s,m,i):more(t,s)
-i@[l:less(r,t)]
-isless1:=isp(real,[x:real]less(x,t),r,s,l,i):less(s,t)
-i@[l:less(t,r)]
-isless2:=isp(real,[x:real]less(t,x),r,s,l,i):less(t,s)
-u@[i:is(r,s)][j:is(t,u)][m:more(r,t)]
-ismore12:=ismore2(t,u,s,j,ismore1(r,s,t,i,m)):more(s,u)
-j@[l:less(r,t)]
-isless12:=isless2(t,u,s,j,isless1(r,s,t,i,l)):less(s,u)
-+*ivr2
-b1is@[m:more(r,s)]
-t17:=lemmad5(a1,b1,moreex(m)):lessd(b1,a1)
-t18:=lessin(s,r,b1,a1,b1is,a1ir,t17):less(s,r)
--ivr2
-s@[m:more(r,s)]
-lemma1:=realapp2(less(s,r),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t18".ivr2"(x,y,t,u,m)):less(s,r)
-+*ivr2
-b1is@[l:less(r,s)]
-t19:=lemmad6(a1,b1,lessex(l)):mored(b1,a1)
-t20:=morein(s,r,b1,a1,b1is,a1ir,t19):more(s,r)
--ivr2
-s@[l:less(r,s)]
-lemma2:=realapp2(more(s,r),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t20".ivr2"(x,y,t,u,l)):more(s,r)
-+2r167
-b1is@t1:=satzd167a(a1,b1):or3(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1))
-[e:eq"rp"(a1,b1)]
-t2:=or3i1(is(r,s),more(r,s),less(r,s),isin(e)):or3(is(r,s),more(r,s),less(r,s))
-b1is@[m:mored(a1,b1)]
-t3:=or3i2(is(r,s),more(r,s),less(r,s),morein(m)):or3(is(r,s),more(r,s),less(r,s))
-b1is@[l:lessd(a1,b1)]
-t4:=or3i3(is(r,s),more(r,s),less(r,s),lessin(l)):or3(is(r,s),more(r,s),less(r,s))
-b1is@t5:=or3app(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1),or3(is(r,s),more(r,s),less(r,s)),t1,[t:eq"rp"(a1,b1)]t2(t),[t:mored(a1,b1)]t3(t),[t:lessd(a1,b1)]t4(t)):or3(is(r,s),more(r,s),less(r,s))
-t6:=satzd167b(a1,b1):ec3(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1))
-[i:is(r,s)]
-t7:=th3"l.imp"(more(r,s),mored(a1,b1),ec3e12(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1),t6,isex(i)),[t:more(r,s)]moreex(t)):not(more(r,s))
-b1is@[m:more(r,s)]
-t8:=th3"l.imp"(less(r,s),lessd(a1,b1),ec3e23(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1),t6,moreex(m)),[t:less(r,s)]lessex(t)):not(less(r,s))
-b1is@[l:less(r,s)]
-t9:=th3"l.imp"(is(r,s),eq"rp"(a1,b1),ec3e31(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1),t6,lessex(l)),[t:is(r,s)]isex(t)):not(is(r,s))
-b1is@t10:=th6"l.ec3"(is(r,s),more(r,s),less(r,s),th1"l.ec"(is(r,s),more(r,s),[t:is(r,s)]t7(t)),th1"l.ec"(more(r,s),less(r,s),[t:more(r,s)]t8(t)),th1"l.ec"(less(r,s),is(r,s),[t:less(r,s)]t9(t))):ec3(is(r,s),more(r,s),less(r,s))
-t11:=orec3i(is(r,s),more(r,s),less(r,s),t5,t10):orec3(is(r,s),more(r,s),less(r,s))
--2r167
-s@satz167:=realapp2(orec3(is(r,s),more(r,s),less(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t11".2r167"(x,y,t,u)):orec3(is(r,s),more(r,s),less(r,s))
-satz167a:=orec3e1(is(r,s),more(r,s),less(r,s),satz167):or3(is(r,s),more(r,s),less(r,s))
-satz167b:=orec3e2(is(r,s),more(r,s),less(r,s),satz167):ec3(is(r,s),more(r,s),less(r,s))
-moreis:=or(more(r,s),is(r,s)):'prop'
-lessis:=or(less(r,s),is(r,s)):'prop'
-[m:moreis(r,s)]
-satz168a:=th9"l.or"(more(r,s),is(r,s),less(s,r),is(s,r),m,[t:more(r,s)]lemma1(t),[t:is(r,s)]symis(real,r,s,t)):lessis(s,r)
-s@[l:lessis(r,s)]
-satz168b:=th9"l.or"(less(r,s),is(r,s),more(s,r),is(s,r),l,[t:less(r,s)]lemma2(t),[t:is(r,s)]symis(real,r,s,t)):moreis(s,r)
-t@[i:is(r,s)][m:moreis(r,t)]
-ismoreis1:=isp(real,[x:real]moreis(x,t),r,s,m,i):moreis(s,t)
-i@[m:moreis(t,r)]
-ismoreis2:=isp(real,[x:real]moreis(t,x),r,s,m,i):moreis(t,s)
-i@[l:lessis(r,t)]
-islessis1:=isp(real,[x:real]lessis(x,t),r,s,l,i):lessis(s,t)
-i@[l:lessis(t,r)]
-islessis2:=isp(real,[x:real]lessis(t,x),r,s,l,i):lessis(t,s)
-u@[i:is(r,s)][j:is(t,u)][m:moreis(r,t)]
-ismoreis12:=ismoreis2(t,u,s,j,ismoreis1(r,s,t,i,m)):moreis(s,u)
-j@[l:lessis(r,t)]
-islessis12:=islessis2(t,u,s,j,islessis1(r,s,t,i,l)):lessis(s,u)
-s@[m:more(r,s)]
-moreisi1:=ori1(more(r,s),is(r,s),m):moreis(r,s)
-s@[l:less(r,s)]
-lessisi1:=ori1(less(r,s),is(r,s),l):lessis(r,s)
-s@[i:is(r,s)]
-moreisi2:=ori2(more(r,s),is(r,s),i):moreis(r,s)
-lessisi2:=ori2(less(r,s),is(r,s),i):lessis(r,s)
-b1is@[m:moreq(a1,b1)]
-moreisin:=orapp(mored(a1,b1),eq"rp"(a1,b1),moreis(r,s),m,[t:mored(a1,b1)]moreisi1(morein(t)),[t:eq"rp"(a1,b1)]moreisi2(isin(t))):moreis(r,s)
-b1is@[m:moreis(r,s)]
-moreisex:=orapp(more(r,s),is(r,s),moreq(a1,b1),m,[t:more(r,s)]moreqi1(a1,b1,moreex(t)),[t:is(r,s)]moreqi2(a1,b1,isex(t))):moreq(a1,b1)
-b1is@[l:lesseq(a1,b1)]
-lessisin:=orapp(lessd(a1,b1),eq"rp"(a1,b1),lessis(r,s),l,[t:lessd(a1,b1)]lessisi1(lessin(t)),[t:eq"rp"(a1,b1)]lessisi2(isin(t))):lessis(r,s)
-b1is@[l:lessis(r,s)]
-lessisex:=orapp(less(r,s),is(r,s),lesseq(a1,b1),l,[t:less(r,s)]lesseqi1(a1,b1,lessex(t)),[t:is(r,s)]lesseqi2(a1,b1,isex(t))):lesseq(a1,b1)
-s@[m:moreis(r,s)]
-satz167c:=th7"l.ec3"(is(r,s),more(r,s),less(r,s),satz167b,comor(more(r,s),is(r,s),m)):not(less(r,s))
-s@[l:lessis(r,s)]
-satz167d:=th9"l.ec3"(is(r,s),more(r,s),less(r,s),satz167b,l):not(more(r,s))
-s@[n:not(more(r,s))]
-satz167e:=th2"l.or3"(is(r,s),more(r,s),less(r,s),satz167a,n):lessis(r,s)
-s@[n:not(less(r,s))]
-s@[n:not(less(r,s))]
-satz167f:=comor(is(r,s),more(r,s),th3"l.or3"(is(r,s),more(r,s),less(r,s),satz167a,n)):moreis(r,s)
-s@[m:more(r,s)]
-satz167g:=th3"l.imp"(lessis(r,s),not(more(r,s)),weli(more(r,s),m),[t:lessis(r,s)]satz167d(t)):not(lessis(r,s))
-s@[l:less(r,s)]
-satz167h:=th3"l.imp"(moreis(r,s),not(less(r,s)),weli(less(r,s),l),[t:moreis(r,s)]satz167c(t)):not(moreis(r,s))
-s@[n:not(moreis(r,s))]
-satz167j:=or3e3(is(r,s),more(r,s),less(r,s),satz167a,th5"l.or"(more(r,s),is(r,s),n),th4"l.or"(more(r,s),is(r,s),n)):less(r,s)
-s@[n:not(lessis(r,s))]
-satz167k:=or3e2(is(r,s),more(r,s),less(r,s),satz167a,th4"l.or"(less(r,s),is(r,s),n),th5"l.or"(less(r,s),is(r,s),n)):more(r,s)
-r@[p:pos(r)]
-+2r169
-[a:dif][b:dif][air:inn(a,class(r))][bi0:inn(b,class(0))]
-t1:=satzd169a(a,b,0ex(0,b,bi0,refis(real,0)),posex(a,air,p)):mored(a,b)
-t2:=morein(r,0,a,b,air,bi0,t1):more(r,0)
--2r169
-satz169a:=realapp2(r,0,more(r,0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(0))]t2".2r169"(x,y,t,u)):more(r,0)
-r@[m:more(r,0)]
-+*2r169
-m@[a:dif][b:dif][air:inn(a,class(r))][bi0:inn(b,class(0))]
-t3:=satzd169b(a,b,0ex(0,b,bi0,refis(real,0)),moreex(r,0,a,b,air,bi0,m)):posd(a)
-t4:=posin(r,a,air,t3):pos(r)
--2r169
-m@satz169b:=realapp2(r,0,pos(r),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(0))]t4".2r169"(x,y,t,u)):pos(r)
-r@[n:neg(r)]
-+*2r169
-n@[a:dif][b:dif][air:inn(a,class(r))][bi0:inn(b,class(0))]
-t5:=satzd169c(a,b,0ex(0,b,bi0,refis(real,0)),negex(a,air,n)):lessd(a,b)
-t6:=lessin(r,0,a,b,air,bi0,t5):less(r,0)
--2r169
-n@satz169c:=realapp2(r,0,less(r,0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(0))]t6".2r169"(x,y,t,u)):less(r,0)
-r@[l:less(r,0)]
-+*2r169
-l@[a:dif][b:dif][air:inn(a,class(r))][bi0:inn(b,class(0))]
-t7:=satzd169d(a,b,0ex(0,b,bi0,refis(real,0)),lessex(r,0,a,b,air,bi0,l)):negd(a)
-t8:=negin(r,a,air,t7):neg(r)
--2r169
-l@satz169d:=realapp2(r,0,neg(r),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(0))]t8".2r169"(x,y,t,u)):neg(r)
-+2r170
-r@[a:dif][b:dif][air:inn(a,class(r))][bi0:inn(b,class(0))]
-t1:=satzd170(a,b,0ex(0,b,bi0,refis(real,0))):moreq(absd(a),b)
-t2:=moreisin(abs(r),0,absd(a),b,aica(r,a,air),bi0,t1):moreis(abs(r),0)
--2r170
-r@satz170:=realapp2(r,0,moreis(abs(r),0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(0))]t2".2r170"(x,y,t,u)):moreis(abs(r),0)
-satz170a:=th3"l.imp"(neg(abs(r)),less(abs(r),0),satz167c(abs(r),0,satz170),[t:neg(abs(r))]satz169c(abs(r),t)):not(neg(abs(r)))
-t@[l:less(r,s)][k:less(s,t)]
-+2r171
-[a:dif][b:dif][c:dif][air:inn(a,class(r))][bis:inn(b,class(s))][cit:inn(c,class(t))]
-t1:=satzd171(a,b,c,lessex(r,s,a,b,air,bis,l),lessex(s,t,b,c,bis,cit,k)):lessd(a,c)
-t2:=lessin(r,t,a,c,air,cit,t1):less(r,t)
--2r171
-satz171:=realapp3(r,s,t,less(r,t),[x:dif][y:dif][z:dif][w:inn(x,class(r))][u:inn(y,class(s))][v:inn(z,class(t))]t2".2r171"(x,y,z,w,u,v)):less(r,t)
-trless:=satz171:less(r,t)
-t@[m:more(r,s)][n:more(s,t)]
-trmore:=lemma2(t,r,trless(t,s,r,lemma1(s,t,n),lemma1(r,s,m))):more(r,t)
-t@[a2:dif][b2:dif][c2:dif][a2ir:inn(a2,class(r))][b2is:inn(b2,class(s))][c2it:inn(c2,class(t))]
-+2r172
-[l:lessis(r,s)][k:less(s,t)]
-t1:=satzd172a(a2,b2,c2,lessisex(a2,b2,a2ir,b2is,l),lessex(s,t,b2,c2,b2is,c2it,k)):lessd(a2,c2)
-t2:=lessin(r,t,a2,c2,a2ir,c2it,t1):less(r,t)
--2r172
-t@[l:lessis(r,s)][k:less(s,t)]
-satz172a:=realapp3(less(r,t),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".2r172"(x,y,z,u,v,w,l,k)):less(r,t)
-+*2r172
-c2it@[l:less(r,s)][k:lessis(s,t)]
-t3:=satzd172b(a2,b2,c2,lessex(a2,b2,a2ir,b2is,l),lessisex(s,t,b2,c2,b2is,c2it,k)):lessd(a2,c2)
-t4:=lessin(r,t,a2,c2,a2ir,c2it,t3):less(r,t)
--2r172
-t@[l:less(r,s)][k:lessis(s,t)]
-satz172b:=realapp3(less(r,t),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t4".2r172"(x,y,z,u,v,w,l,k)):less(r,t)
-t@[m:moreis(r,s)][n:more(s,t)]
-satz172c:=lemma2(t,r,satz172b(t,s,r,lemma1(s,t,n),satz168a(m))):more(r,t)
-t@[m:more(r,s)][n:moreis(s,t)]
-satz172d:=lemma2(t,r,satz172a(t,s,r,satz168a(s,t,n),lemma1(m))):more(r,t)
-+2r173
-c2it@[l:lessis(r,s)][k:lessis(s,t)]
-t1:=satzd173(a2,b2,c2,lessisex(a2,b2,a2ir,b2is,l),lessisex(s,t,b2,c2,b2is,c2it,k)):lesseq(a2,c2)
-t2:=lessisin(r,t,a2,c2,a2ir,c2it,t1):lessis(r,t)
--2r173
-t@[l:lessis(r,s)][k:lessis(s,t)]
-satz173:=realapp3(lessis(r,t),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".2r173"(x,y,z,u,v,w,l,k)):lessis(r,t)
-trlessis:=satz173:lessis(r,t)
-t@[m:moreis(r,s)][n:moreis(s,t)]
-trmoreis:=satz168b(t,r,trlessis(t,s,r,satz168a(s,t,n),satz168a(m))):moreis(r,t)
-r@ratrl:=some"l"(dif,[x:dif]and(inn(x,class(r)),ratd(x))):'prop'
-a0ir@[r1:ratd(a0)]
-+*ivr2
-r1@t21:=andi(inn(a0,class(r)),ratd(a0),a0ir,r1):and(inn(a0,class(r)),ratd(a0))
--ivr2
-r1@ratrlin:=somei(dif,[x:dif]and(inn(x,class(r)),ratd(x)),a0,t21".ivr2"):ratrl(r)
-a0ir@[rr:ratrl(r)]
-+*ivr2
-rr@[a:dif][b:and(inn(a,class(r)),ratd(a))]
-t22:=ande1(inn(a,class(r)),ratd(a),b):inn(a,class(r))
-t23:=ande2(inn(a,class(r)),ratd(a),b):ratd(a)
-t24:=eqratd(a,a0,isex(r,r,a,a0,t22,a0ir,refis(real,r)),t23):ratd(a0)
--ivr2
-rr@ratrlex:=someapp(dif,[x:dif]and(inn(x,class(r)),ratd(x)),rr,ratd(a0),[x:dif][t:and(inn(x,class(r)),ratd(x))]t24".ivr2"(x,t)):ratd(a0)
-r@irratrl:=not(ratrl(r)):'prop'
-@[r0:cut][rr:ratrp(r0)]
-remark2:=ratrlin(pofrp(r0),pdofrp(r0),innclass(pdofrp(r0)),remark2a(r0,rr)):ratrl(pofrp(r0))
-remark3:=ratrlin(nofrp(r0),ndofrp(r0),innclass(ndofrp(r0)),remark3a(r0,rr)):ratrl(nofrp(r0))
-r0@[ir:irratrp(r0)]
-remark4:=th3"l.imp"(ratrl(pofrp(r0)),ratd(pdofrp(r0)),remark4a(r0,ir),[t:ratrl(pofrp(r0))]ratrlex(pofrp(r0),pdofrp(r0),innclass(pdofrp(r0)),t)):irratrl(pofrp(r0))
-remark5:=th3"l.imp"(ratrl(nofrp(r0)),ratd(ndofrp(r0)),remark5a(r0,ir),[t:ratrl(nofrp(r0))]ratrlex(nofrp(r0),ndofrp(r0),innclass(ndofrp(r0)),t)):irratrl(nofrp(r0))
-r@natrl:=some"l"(dif,[x:dif]and(inn(x,class(r)),natd(x))):'prop'
-a0ir@[n:natd(a0)]
-+*ivr2
-n@t25:=andi(inn(a0,class(r)),natd(a0),a0ir,n):and(inn(a0,class(r)),natd(a0))
--ivr2
-n@natrlin:=somei(dif,[x:dif]and(inn(x,class(r)),natd(x)),a0,t25".ivr2"):natrl(r)
-a0ir@[n:natrl(r)]
-+*ivr2
-n@[a:dif][b:and(inn(a,class(r)),natd(a))]
-t26:=ande1(inn(a,class(r)),natd(a),b):inn(a,class(r))
-t27:=ande2(inn(a,class(r)),natd(a),b):natd(a)
-t28:=eqnatd(a,a0,isex(r,r,a,a0,t26,a0ir,refis(real,r)),t27):natd(a0)
--ivr2
-n@natrlex:=someapp(dif,[x:dif]and(inn(x,class(r)),natd(x)),n,natd(a0),[x:dif][t:and(inn(x,class(r)),natd(x))]t28".ivr2"(x,t)):natd(a0)
-+*ivr2
-a0ir@[n:natrl(r)]
-t29:=natposd(a0,natrlex(n)):posd(a0)
-t30:=posin(t29):pos(r)
--ivr2
-r@[n:natrl(r)]
-natpos:=realapp1(pos(r),[x:dif][t:inn(x,class(r))]t30".ivr2"(x,t,n)):pos(r)
-@[x:nat]
-rlofnt:=realof(pdofnt(x)):real
-natrli:=natrlin(rlofnt(x),pdofnt(x),innclass(pdofnt(x)),natdi(x)):natrl(rlofnt(x))
-[y:nat][i:is"n"(x,y)]
-isnterl:=isf(nat,real,[u:nat]rlofnt(u),x,y,i):is(rlofnt(x),rlofnt(y))
-y@[i:is(rlofnt(x),rlofnt(y))]
-isntirl:=isntirp(x,y,isrpip(rpofnt(x),rpofnt(y),i)):is"n"(x,y)
-+*ivr2
-@t31:=[x:nat][y:nat][t:is(rlofnt(x),rlofnt(y))]isntirl(x,y,t):injective(nat,real,[x:nat]rlofnt(x))
-a0ir@[n:natrl(r)]
-t32:=natposd(a0,natrlex(n)):posd(a0)
-ap:=rpofpd(a0,t32):cut
-t33:=natderp(a0,natrlex(n)):natrp(ap)
-x0:=ntofrp(ap,t33):nat
-t34:=isrpepd(ap,rpofnt(x0),isrpnt1(ap,t33)):eq"rp"(pdofrp(ap),pdofnt(x0))
-t35:=treq"rp"(a0,pdofrp(ap),pdofnt(x0),eqpdrp1(a0,t32),t34):eq"rp"(a0,pdofnt(x0))
-t36:=isin(r,rlofnt(x0),a0,pdofnt(x0),a0ir,innclass(pdofnt(x0)),t35):is(r,rlofnt(x0))
-t37:=somei(nat,[x:nat]is(r,rlofnt(x)),x0,t36):image(nat,real,[x:nat]rlofnt(x),r)
--ivr2
-r@[n:natrl(r)]
-natimage:=realapp1(image(nat,real,[x:nat]rlofnt(x),r),[x:dif][t:inn(x,class(r))]t37".ivr2"(x,t,n)):image(nat,real,[x:nat]rlofnt(x),r)
-r@[i:image(nat,real,[x:nat]rlofnt(x),r)]
-+*ivr2
-i"r"@[x:nat][j:is(r,rlofnt(x))]
-t38:=isp1(real,[u:real]natrl(u),rlofnt(x),r,natrli(x),j):natrl(r)
--ivr2
-i@imagenat:=someapp(nat,[u:nat]is(r,rlofnt(u)),i,natrl(r),[u:nat][v:is(r,rlofnt(u))]t38".ivr2"(u,v)):natrl(r)
-r@[n:natrl(r)]
-ntofrl:=soft(nat,real,[x:nat]rlofnt(x),t31".ivr2",r,natimage(r,n)):nat
-@[r1:real][n:natrl(r1)][s1:real][m:natrl(s1)][i:is(r1,s1)]
-isrlent:=isinv(nat,real,[x:nat]rlofnt(x),t31".ivr2",r1,natimage(r1,n),s1,natimage(s1,m),i):is"n"(ntofrl(r1,n),ntofrl(s1,m))
-m@[i:is"n"(ntofrl(r1,n),ntofrl(s1,m))]
-isrlint:=isinve(nat,real,[x:nat]rlofnt(x),t31".ivr2",r1,natimage(r1,n),s1,natimage(s1,m),i):is(r1,s1)
-r@[n:natrl(r)]
-isrlnt1:=ists1"e"(nat,real,[x:nat]rlofnt(x),t31".ivr2",r,natimage(r,n)):is(r,rlofnt(ntofrl(r,n)))
-isrlnt2:=symis(real,r,rlofnt(ntofrl(r,n)),isrlnt1):is(rlofnt(ntofrl(r,n)),r)
-@[x:nat]
-+*ivr2
-x"r"@xn:=soft(nat,real,[u:nat]rlofnt(u),t31,rlofnt(x),imagei(nat,real,[u:nat]rlofnt(u),x)):nat
-t39:=isinv(nat,real,[u:nat]rlofnt(u),t31,rlofnt(x),imagei(nat,real,[u:nat]rlofnt(u),x),rlofnt(x),natimage(rlofnt(x),natrli(x)),refis(real,rlofnt(x))):is"n"(xn,ntofrl(rlofnt(x),natrli(x)))
--ivr2
-x@isntrl1:=tris(nat,x,xn".ivr2",ntofrl(rlofnt(x),natrli(x)),isst1(nat,real,[u:nat]rlofnt(u),t31".ivr2",x),t39".ivr2"):is"n"(x,ntofrl(rlofnt(x),natrli(x)))
-isntrl2:=symis(nat,x,ntofrl(rlofnt(x),natrli(x)),isntrl1):is"n"(ntofrl(rlofnt(x),natrli(x)),x)
-r@intrl:=some"l"(dif,[x:dif]and(inn(x,class(r)),intd(x))):'prop'
-a0ir@[i:intd(a0)]
-+*ivr2
-i@t40:=andi(inn(a0,class(r)),intd(a0),a0ir,i):and(inn(a0,class(r)),intd(a0))
--ivr2
-i@intrlin:=somei(dif,[x:dif]and(inn(x,class(r)),intd(x)),a0,t40".ivr2"):intrl(r)
-a0ir@[i:intrl(r)]
-+*ivr2
-i@[a:dif][b:and(inn(a,class(r)),intd(a))]
-t41:=ande1(inn(a,class(r)),intd(a),b):inn(a,class(r))
-t42:=ande2(inn(a,class(r)),intd(a),b):intd(a)
-t43:=eqintd(a,a0,isex(r,r,a,a0,t41,a0ir,refis(real,r)),t42):intd(a0)
--ivr2
-i@intrlex:=someapp(dif,[x:dif]and(inn(x,class(r)),intd(x)),i,intd(a0),[x:dif][t:and(inn(x,class(r)),intd(x))]t43".ivr2"(x,t)):intd(a0)
-+*ivr2
-a0ir@[n:natrl(r)]
-t44:=natintd(a0,natrlex(n)):intd(a0)
-t45:=intrlin(t44):intrl(r)
--ivr2
-r@[n:natrl(r)]
-natintrl:=realapp1(intrl(r),[x:dif][t:inn(x,class(r))]t45".ivr2"(x,t,n)):intrl(r)
-+*ivr2
-a0ir@[p:pos(r)][i:intrl(r)]
-t46:=posintnatd(a0,posex(p),intrlex(i)):natd(a0)
-t47:=natrlin(t46):natrl(r)
--ivr2
-r@[p:pos(r)][i:intrl(r)]
-posintnatrl:=realapp1(natrl(r),[x:dif][t:inn(x,class(r))]t47".ivr2"(x,t,p,i)):natrl(r)
-+*ivr2
-a0ir@[i2:is(r,0)]
-t48:=intdi0(a0,0ex(i2)):intd(a0)
-t49:=intrlin(t48):intrl(r)
--ivr2
-r@[i:is(r,0)]
-intrli0:=realapp1(intrl(r),[x:dif][t:inn(x,class(r))]t49".ivr2"(x,t,i)):intrl(r)
-r0@[n:natrp(r0)]
-remark6:=intrlin(pofrp(r0),pdofrp(r0),innclass(pdofrp(r0)),remark6"rp"(r0,n)):intrl(pofrp(r0))
-remark7:=intrlin(nofrp(r0),ndofrp(r0),innclass(ndofrp(r0)),remark7"rp"(r0,n)):intrl(nofrp(r0))
-+2r174
-a0ir@[i:intrl(r)]
-t1:=satzd174(a0,intrlex(i)):ratd(a0)
-t2:=ratrlin(t1):ratrl(r)
--2r174
-r@[i:intrl(r)]
-satz174:=realapp1(ratrl(r),[x:dif][t:inn(x,class(r))]t2".2r174"(x,t,i)):ratrl(r)
-@plusdr:=[x:dif][y:dif]realof(pd(x,y)):[x:dif][y:dif]real
-+ivr3
-[a:dif][b:dif][c:dif][d:dif][e:eq"rp"(a,b)][f:eq"rp"(c,d)]
-t1:=isin(realof(pd(a,c)),realof(pd(b,d)),pd(a,c),pd(b,d),innclass(pd(a,c)),innclass(pd(b,d)),eqpd12(a,b,c,d,e,f)):is(<c><a>plusdr,<d><b>plusdr)
--ivr3
-fplusdr:=[x:dif][y:dif][z:dif][v:dif][t:<y><x>eq][u:<v><z>eq]t1".ivr3"(x,y,z,v,t,u):fixf2(real,plusdr)
-s@pl:=indreal2(real,plusdr,fplusdr,r,s):real
-+*ivr3
-b1is@t2:=isindreal2(real,plusdr,fplusdr,r,s,a1,b1,a1ir,b1is):is(realof(pd(a1,b1)),pl(r,s))
--ivr3
-b1is@picp:=isp(real,[x:real]inn(pd(a1,b1),class(x)),realof(pd(a1,b1)),pl(r,s),innclass(pd(a1,b1)),t2".ivr3"):inn(pd(a1,b1),class(pl(r,s)))
-t@[i:is(r,s)]
-ispl1:=isf(real,real,[x:real]pl(x,t),r,s,i):is(pl(r,t),pl(s,t))
-ispl2:=isf(real,real,[x:real]pl(t,x),r,s,i):is(pl(t,r),pl(t,s))
-u@[i:is(r,s)][j:is(t,u)]
-ispl12:=tris(real,pl(r,t),pl(s,t),pl(s,u),ispl1(i),ispl2(t,u,s,j)):is(pl(r,t),pl(s,u))
-+3r175
-b1is@t1:=satzd175(a1,b1):eq"rp"(pd(a1,b1),pd(b1,a1))
-t2:=isin(pl(r,s),pl(s,r),pd(a1,b1),pd(b1,a1),picp,picp(s,r,b1,a1,b1is,a1ir),t1):is(pl(r,s),pl(s,r))
--3r175
-s@satz175:=realapp2(is(pl(r,s),pl(s,r)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".3r175"(x,y,t,u)):is(pl(r,s),pl(s,r))
-compl:=satz175:is(pl(r,s),pl(s,r))
-+*ivr3
-b1is@[i:is(r,0)]
-t3:=pd01(a1,b1,0ex(r,a1,a1ir,i)):eq"rp"(pd(a1,b1),b1)
-t4:=isin(pl(r,s),s,pd(a1,b1),b1,picp,b1is,t3):is(pl(r,s),s)
--ivr3
-s@[i:is(r,0)]
-pl01:=realapp2(is(pl(r,s),s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t4".ivr3"(x,y,t,u,i)):is(pl(r,s),s)
-s@[i:is(s,0)]
-pl02:=tris(real,pl(r,s),pl(s,r),r,compl,pl01(s,r,i)):is(pl(r,s),r)
-+*ivr3
-b1is@[p:pos(r)][q:pos(s)]
-t5:=ppd(a1,b1,posex(r,a1,a1ir,p),posex(s,b1,b1is,q)):posd(pd(a1,b1))
-t6:=posin(pl(r,s),pd(a1,b1),picp,t5):pos(pl(r,s))
--ivr3
-s@[p:pos(r)][q:pos(s)]
-pospl:=realapp2(pos(pl(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".ivr3"(x,y,t,u,p,q)):pos(pl(r,s))
-+*ivr3
-b1is@[n:neg(r)][o:neg(s)]
-t7:=npd(a1,b1,negex(r,a1,a1ir,n),negex(s,b1,b1is,o)):negd(pd(a1,b1))
-t8:=negin(pl(r,s),pd(a1,b1),picp,t7):neg(pl(r,s))
--ivr3
-s@[n:neg(r)][o:neg(s)]
-negpl:=realapp2(neg(pl(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t8".ivr3"(x,y,t,u,n,o)):neg(pl(r,s))
-@m0dr:=[x:dif]realof(m0d(x)):[x:dif]real
-+*ivr3
-@[a:dif][b:dif][e:eq"rp"(a,b)]
-t5a:=isin(realof(m0d(a)),realof(m0d(b)),m0d(a),m0d(b),innclass(m0d(a)),innclass(m0d(b)),eqm0d(a,b,e)):is(<a>m0dr,<b>m0dr)
--ivr3
-@fm0dr:=[x:dif][y:dif][t:<y><x>eq]t5a".ivr3"(x,y,t):fixf(real,m0dr)
-r@m0:=indreal(real,m0dr,fm0dr,r):real
-+*ivr3
-a0ir@t6a:=isindreal(real,m0dr,fm0dr,r,a0,a0ir):is(realof(m0d(a0)),m0(r))
--ivr3
-a0ir@micm0:=isp(real,[x:real]inn(m0d(a0),class(x)),realof(m0d(a0)),m0(r),innclass(m0d(a0)),t6a".ivr3"):inn(m0d(a0),class(m0(r)))
-s@[i:is(r,s)]
-ism0:=isf(real,real,[x:real]m0(x),r,s,i):is(m0(r),m0(s))
-+*ivr3
-a0ir@[n:neg(r)]
-t7a:=absnd(a0,negex(n)):eq"rp"(absd(a0),m0d(a0))
-t8a:=isin(abs(r),m0(r),absd(a0),m0d(a0),aica,micm0,t7a):is(abs(r),m0(r))
--ivr3
-r@[n:neg(r)]
-absn:=realapp1(is(abs(r),m0(r)),[x:dif][t:inn(x,class(r))]t8a".ivr3"(x,t,n)):is(abs(r),m0(r))
-+*ivr3
-a0ir@[nn:not(neg(r))]
-t9:=absnnd(a0,th3"l.imp"(negd(a0),neg(r),nn,[t:negd(a0)]negin(t))):eq"rp"(absd(a0),a0)
-t10:=isin(abs(r),r,absd(a0),a0,aica,a0ir,t9):is(abs(r),r)
--ivr3
-r@[nn:not(neg(r))]
-absnn:=realapp1(is(abs(r),r),[x:dif][t:inn(x,class(r))]t10".ivr3"(x,t,nn)):is(abs(r),r)
-r@[p:pos(r)]
-absp:=absnn(r,pnotn(r,p)):is(abs(r),r)
-r@[i:is(r,0)]
-abs0:=tris(real,abs(r),r,0,absnn(r,0notn(r,i)),i):is(abs(r),0)
-+3r176
-a0ir@[p:pos(r)]
-t1:=satzd176a(a0,posex(p)):negd(m0d(a0))
-t2:=negin(m0(r),m0d(a0),micm0,t1):neg(m0(r))
--3r176
-r@[p:pos(r)]
-satz176a:=realapp1(neg(m0(r)),[x:dif][t:inn(x,class(r))]t2".3r176"(x,t,p)):neg(m0(r))
-+*3r176
-a0ir@[i:is(r,0)]
-t3:=satzd176b(a0,0ex(i)):zero(m0d(a0))
-t4:=0in(m0(r),m0d(a0),micm0,t3):is(m0(r),0)
--3r176
-r@[i:is(r,0)]
-satz176b:=realapp1(is(m0(r),0),[x:dif][t:inn(x,class(r))]t4".3r176"(x,t,i)):is(m0(r),0)
-+*3r176
-a0ir@[n:neg(r)]
-t5:=satzd176c(a0,negex(n)):posd(m0d(a0))
-t6:=posin(m0(r),m0d(a0),micm0,t5):pos(m0(r))
--3r176
-r@[n:neg(r)]
-satz176c:=realapp1(pos(m0(r)),[x:dif][t:inn(x,class(r))]t6".3r176"(x,t,n)):pos(m0(r))
-+*3r176
-a0ir@[n:neg(m0(r))]
-t7:=satzd176d(a0,negex(m0(r),m0d(a0),micm0,n)):posd(a0)
-t8:=posin(t7):pos(r)
--3r176
-r@[n:neg(m0(r))]
-satz176d:=realapp1(pos(r),[x:dif][t:inn(x,class(r))]t8".3r176"(x,t,n)):pos(r)
-+*3r176
-a0ir@[i:is(m0(r),0)]
-t9:=satzd176e(a0,0ex(m0(r),m0d(a0),micm0,i)):zero(a0)
-t10:=0in(t9):is(r,0)
--3r176
-r@[i:is(m0(r),0)]
-satz176e:=realapp1(is(r,0),[x:dif][t:inn(x,class(r))]t10".3r176"(x,t,i)):is(r,0)
-+*3r176
-a0ir@[p:pos(m0(r))]
-t11:=satzd176f(a0,posex(m0(r),m0d(a0),micm0,p)):negd(a0)
-t12:=negin(t11):neg(r)
--3r176
-r@[p:pos(m0(r))]
-satz176f:=realapp1(neg(r),[x:dif][t:inn(x,class(r))]t12".3r176"(x,t,p)):neg(r)
-+3r177
-a0ir@t1:=isin(m0(m0(r)),r,m0d(m0d(a0)),a0,micm0(m0(r),m0d(a0),micm0),a0ir,satzd177(a0)):is(m0(m0(r)),r)
--3r177
-r@satz177:=realapp1(is(m0(m0(r)),r),[x:dif][t:inn(x,class(r))]t1".3r177"(x,t)):is(m0(m0(r)),r)
-satz177a:=symis(real,m0(m0(r)),r,satz177):is(r,m0(m0(r)))
-s@[i:is(r,m0(s))]
-satz177b:=tris(real,m0(r),m0(m0(s)),s,ism0(r,m0(s),i),satz177(s)):is(m0(r),s)
-satz177c:=symis(real,m0(r),s,satz177b):is(s,m0(r))
-s@[i:is(m0(r),s)]
-satz177d:=satz177c(s,r,symis(real,m0(r),s,i)):is(r,m0(s))
-satz177e:=symis(real,r,m0(s),satz177d):is(m0(s),r)
-+3r178
-a0ir@t1:=isin(abs(m0(r)),abs(r),absd(m0d(a0)),absd(a0),aica(m0(r),m0d(a0),micm0),aica,satzd178(a0)):is(abs(m0(r)),abs(r))
--3r178
-r@satz178:=realapp1(is(abs(m0(r)),abs(r)),[x:dif][t:inn(x,class(r))]t1".3r178"(x,t)):is(abs(m0(r)),abs(r))
-satz178a:=symis(real,abs(m0(r)),abs(r),satz178):is(abs(r),abs(m0(r)))
-+3r179
-a0ir@t1:=0in(pl(r,m0(r)),pd(a0,m0d(a0)),picp(r,m0(r),a0,m0d(a0),a0ir,micm0),satzd179(a0)):is(pl(r,m0(r)),0)
--3r179
-satz179:=realapp1(is(pl(r,m0(r)),0),[x:dif][t:inn(x,class(r))]t1".3r179"(x,t)):is(pl(r,m0(r)),0)
-satz179a:=tris(real,pl(m0(r),r),pl(r,m0(r)),0,compl(m0(r),r),satz179):is(pl(m0(r),r),0)
-+3r180
-b1is@t1:=isin(m0(pl(r,s)),pl(m0(r),m0(s)),m0d(pd(a1,b1)),pd(m0d(a1),m0d(b1)),micm0(pl(r,s),pd(a1,b1),picp),picp(m0(r),m0(s),m0d(a1),m0d(b1),micm0(r,a1,a1ir),micm0(s,b1,b1is)),satzd180(a1,b1)):is(m0(pl(r,s)),pl(m0(r),m0(s)))
--3r180
-s@satz180:=realapp2(is(m0(pl(r,s)),pl(m0(r),m0(s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t1".3r180"(x,y,t,u)):is(m0(pl(r,s)),pl(m0(r),m0(s)))
-satz180a:=symis(real,m0(pl(r,s)),pl(m0(r),m0(s)),satz180):is(pl(m0(r),m0(s)),m0(pl(r,s)))
-mn:=pl(r,m0(s)):real
-b1is@micmn:=picp(r,m0(s),a1,m0d(b1),a1ir,micm0(s,b1,b1is)):inn(md(a1,b1),class(mn(r,s)))
-t@[i:is(r,s)]
-ismn1:=ispl1(r,s,m0(t),i):is(mn(r,t),mn(s,t))
-ismn2:=ispl2(m0(r),m0(s),t,ism0(r,s,i)):is(mn(t,r),mn(t,s))
-u@[i:is(r,s)][j:is(t,u)]
-ismn12:=ispl12(r,s,m0(t),m0(u),i,ism0(t,u,j)):is(mn(r,t),mn(s,u))
-s@satz181:=tr3is(real,m0(mn(r,s)),pl(m0(r),m0(m0(s))),pl(m0(r),s),mn(s,r),satz180(r,m0(s)),ispl2(m0(m0(s)),s,m0(r),satz177(s)),compl(m0(r),s)):is(m0(mn(r,s)),mn(s,r))
-satz181a:=symis(real,m0(mn(s,r)),mn(r,s),satz181(s,r)):is(mn(r,s),m0(mn(s,r)))
-+3r182
-b1is@[p:pos(mn(r,s))]
-t1:=satzd182a(a1,b1,posex(mn(r,s),md(a1,b1),micmn,p)):mored(a1,b1)
-t2:=morein(t1):more(r,s)
--3r182
-[p:pos(mn(r,s))]
-satz182a:=realapp2(more(r,s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".3r182"(x,y,t,u,p)):more(r,s)
-+*3r182
-b1is@[i:is(mn(r,s),0)]
-t3:=satzd182b(a1,b1,0ex(mn(r,s),md(a1,b1),micmn,i)):eq"rp"(a1,b1)
-t4:=isin(t3):is(r,s)
--3r182
-s@[i:is(mn(r,s),0)]
-satz182b:=realapp2(is(r,s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t4".3r182"(x,y,t,u,i)):is(r,s)
-+*3r182
-b1is@[n:neg(mn(r,s))]
-t5:=satzd182c(a1,b1,negex(mn(r,s),md(a1,b1),micmn,n)):lessd(a1,b1)
-t6:=lessin(t5):less(r,s)
--3r182
-s@[n:neg(mn(r,s))]
-satz182c:=realapp2(less(r,s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".3r182"(x,y,t,u,n)):less(r,s)
-+*3r182
-b1is@[m:more(r,s)]
-t7:=satzd182d(a1,b1,moreex(m)):posd(md(a1,b1))
-t8:=posin(mn(r,s),md(a1,b1),micmn,t7):pos(mn(r,s))
--3r182
-s@[m:more(r,s)]
-satz182d:=realapp2(pos(mn(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t8".3r182"(x,y,t,u,m)):pos(mn(r,s))
-+*3r182
-b1is@[i:is(r,s)]
-t9:=satzd182e(a1,b1,isex(i)):zero(md(a1,b1))
-t10:=0in(mn(r,s),md(a1,b1),micmn,t9):is(mn(r,s),0)
--3r182
-s@[i:is(r,s)]
-satz182e:=realapp2(is(mn(r,s),0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t10".3r182"(x,y,t,u,i)):is(mn(r,s),0)
-+*3r182
-b1is@[l:less(r,s)]
-t11:=satzd182f(a1,b1,lessex(l)):negd(md(a1,b1))
-t12:=negin(mn(r,s),md(a1,b1),micmn,t11):neg(mn(r,s))
--3r182
-s@[l:less(r,s)]
-satz182f:=realapp2(neg(mn(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t12".3r182"(x,y,t,u,l)):neg(mn(r,s))
-+3r183
-b1is@[m:more(r,s)]
-t1:=satzd183a(a1,b1,moreex(m)):lessd(m0d(a1),m0d(b1))
-t2:=lessin(m0(r),m0(s),m0d(a1),m0d(b1),micm0(r,a1,a1ir),micm0(s,b1,b1is),t1):less(m0(r),m0(s))
--3r183
-s@[m:more(r,s)]
-satz183a:=realapp2(less(m0(r),m0(s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".3r183"(x,y,t,u,m)):less(m0(r),m0(s))
-s@[i:is(r,s)]
-satz183b:=ism0(r,s,i):is(m0(r),m0(s))
-+*3r183
-b1is@[l:less(r,s)]
-t3:=satzd183c(a1,b1,lessex(l)):mored(m0d(a1),m0d(b1))
-t4:=morein(m0(r),m0(s),m0d(a1),m0d(b1),micm0(r,a1,a1ir),micm0(s,b1,b1is),t3):more(m0(r),m0(s))
--3r183
-s@[l:less(r,s)]
-satz183c:=realapp2(more(m0(r),m0(s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t4".3r183"(x,y,t,u,l)):more(m0(r),m0(s))
-s@[l:less(m0(r),m0(s))]
-satz183d:=ismore12(m0(m0(r)),r,m0(m0(s)),s,satz177(r),satz177(s),satz183c(m0(r),m0(s),l)):more(r,s)
-s@[i:is(m0(r),m0(s))]
-satz183e:=tr3is(real,r,m0(m0(r)),m0(m0(s)),s,satz177a(r),ism0(m0(r),m0(s),i),satz177(s)):is(r,s)
-s@[m:more(m0(r),m0(s))]
-satz183f:=isless12(m0(m0(r)),r,m0(m0(s)),s,satz177(r),satz177(s),satz183a(m0(r),m0(s),m)):less(r,s)
-+3r184
-t@prop1:=and3(pos(s),pos(t),is(r,mn(s,t))):'prop'
-s@prop2:=some([x:real]prop1(x)):'prop'
-r@prop3:=some([x:real]prop2(x)):'prop'
-a0ir@[a:dif][b:dif]
-prop1d:=and3(posd(a),posd(b),eq"rp"(a0,md(a,b))):'prop'
-a@prop2d:=some"l"(dif,[x:dif]prop1d(x)):'prop'
-[p2:prop2d(a)][b:dif][p1:prop1d(a,b)]
-t1:=and3e1(posd(a),posd(b),eq"rp"(a0,md(a,b)),p1):posd(a)
-t2:=and3e2(posd(a),posd(b),eq"rp"(a0,md(a,b)),p1):posd(b)
-t3:=and3e3(posd(a),posd(b),eq"rp"(a0,md(a,b)),p1):eq"rp"(a0,md(a,b))
-p2@ra:=realof(a):real
-p1@rb:=realof(b):real
-t4:=innclass(a):inn(a,class(ra))
-t5:=innclass(b):inn(b,class(rb))
-t6:=isin(r,mn(ra,rb),a0,md(a,b),a0ir,micmn(ra,rb,a,b,t4,t5),t3):is(r,mn(ra,rb))
-t7:=and3i(pos(ra),pos(rb),is(r,mn(ra,rb)),posin(ra,a,t4,t1),posin(rb,b,t5,t2),t6):prop1(ra,rb)
-t8:=somei(real,[x:real]prop1(ra,x),rb,t7):prop2(ra)
-p2@t9:=someapp(dif,[x:dif]prop1d(a,x),p2,prop2(ra),[x:dif][t:prop1d(a,x)]t8(x,t)):prop2(ra)
-t10:=somei(real,[x:real]prop2(x),ra,t9):prop3
-a0ir@t11:=someapp(dif,[x:dif]prop2d(x),satzd184(a0),prop3,[x:dif][t:prop2d(x)]t10(x,t)):prop3
--3r184
-r@satz184:=realapp1(prop3".3r184",[x:dif][t:inn(x,class(r))]t11".3r184"(x,t)):some([x:real]some([y:real]and3(pos(x),pos(y),is(r,mn(x,y)))))
-u@[a3:dif][b3:dif][c3:dif][d3:dif][a3ir:inn(a3,class(r))][b3is:inn(b3,class(s))][c3it:inn(c3,class(t))][d3iu:inn(d3,class(u))]
-+3r185
-t1:=satzd185(a3,b3,c3,d3):eq"rp"(pd(md(a3,b3),md(c3,d3)),md(pd(a3,c3),pd(b3,d3)))
-t2:=isin(pl(mn(r,s),mn(t,u)),mn(pl(r,t),pl(s,u)),pd(md(a3,b3),md(c3,d3)),md(pd(a3,c3),pd(b3,d3)),picp(mn(r,s),mn(t,u),md(a3,b3),md(c3,d3),micmn(r,s,a3,b3,a3ir,b3is),micmn(t,u,c3,d3,c3it,d3iu)),micmn(pl(r,t),pl(s,u),pd(a3,c3),pd(b3,d3),picp(r,t,a3,c3,a3ir,c3it),picp(s,u,b3,d3,b3is,d3iu)),t1):is(pl(mn(r,s),mn(t,u)),mn(pl(r,t),pl(s,u)))
--3r185
-u@satz185:=realapp4(is(pl(mn(r,s),mn(t,u)),mn(pl(r,t),pl(s,u))),[x:dif][y:dif][z:dif][v:dif][xi:inn(x,class(r))][yi:inn(y,class(s))][zi:inn(z,class(t))][vi:inn(v,class(u))]t2".3r185"(x,y,z,v,xi,yi,zi,vi)):is(pl(mn(r,s),mn(t,u)),mn(pl(r,t),pl(s,u)))
-+3r186
-c2it@t1:=satzd186(a2,b2,c2):eq"rp"(pd(pd(a2,b2),c2),pd(a2,pd(b2,c2)))
-t2:=isin(pl(pl(r,s),t),pl(r,pl(s,t)),pd(pd(a2,b2),c2),pd(a2,pd(b2,c2)),picp(pl(r,s),t,pd(a2,b2),c2,picp(r,s,a2,b2,a2ir,b2is),c2it),picp(r,pl(s,t),a2,pd(b2,c2),a2ir,picp(s,t,b2,c2,b2is,c2it)),t1):is(pl(pl(r,s),t),pl(r,pl(s,t)))
--3r186
-t@satz186:=realapp3(is(pl(pl(r,s),t),pl(r,pl(s,t))),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".3r186"(x,y,z,u,v,w)):is(pl(pl(r,s),t),pl(r,pl(s,t)))
-asspl1:=satz186:is(pl(pl(r,s),t),pl(r,pl(s,t)))
-asspl2:=symis(real,pl(pl(r,s),t),pl(r,pl(s,t)),satz186):is(pl(r,pl(s,t)),pl(pl(r,s),t))
-s@plmn:=tris(real,pl(mn(r,s),s),pl(r,pl(m0(s),s)),r,asspl1(r,m0(s),s),pl02(r,pl(m0(s),s),satz179a(s))):is(pl(mn(r,s),s),r)
-mnpl:=tris(real,mn(pl(r,s),s),pl(r,pl(s,m0(s))),r,asspl1(r,s,m0(s)),pl02(r,pl(s,m0(s)),satz179(s))):is(mn(pl(r,s),s),r)
-satz187a:=tris(real,pl(s,mn(r,s)),pl(mn(r,s),s),r,compl(s,mn(r,s)),plmn):is(pl(s,mn(r,s)),r)
-satz187b:=somei(real,[x:real]is(pl(s,x),r),mn(r,s),satz187a):some([x:real]is(pl(s,x),r))
-[x:real][i:is(pl(s,x),r)]
-satz187c:=tris(real,mn(r,s),mn(pl(x,s),s),x,ismn1(r,pl(x,s),s,tris1(real,r,pl(x,s),pl(s,x),i,compl(s,x))),mnpl(x,s)):is(mn(r,s),x)
-satz187d:=symis(real,mn(r,s),x,satz187c):is(x,mn(r,s))
-x@[i:is(pl(x,s),r)]
-satz187e:=satz187c(tris(real,pl(s,x),pl(x,s),r,compl(s,x),i)):is(mn(r,s),x)
-satz187f:=symis(real,mn(r,s),x,satz187e):is(x,mn(r,s))
-+3r187
-s@[x:real][y:real][i:is(pl(s,x),r)][j:is(pl(s,y),r)]
-t1:=tris1(real,x,y,mn(r,s),satz187c(x,i),satz187c(y,j)):is(x,y)
-s@t2:=[x:real][y:real][t:is(pl(s,x),r)][u:is(pl(s,y),r)]t1(x,y,t,u):amone(real,[x:real]is(pl(s,x),r))
--3r187
-s@satz187:=onei(real,[x:real]is(pl(s,x),r),t2".3r187",satz187b):one([x:real]is(pl(s,x),r))
-+3r188
-c2it@[m:more(pl(r,t),pl(s,t))]
-t1:=satzd188a(a2,b2,c2,moreex(pl(r,t),pl(s,t),pd(a2,c2),pd(b2,c2),picp(r,t,a2,c2,a2ir,c2it),picp(s,t,b2,c2,b2is,c2it),m)):mored(a2,b2)
-t2:=morein(r,s,a2,b2,a2ir,b2is,t1):more(r,s)
--3r188
-t@[m:more(pl(r,t),pl(s,t))]
-satz188a:=realapp3(more(r,s),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".3r188"(x,y,z,u,v,w,m)):more(r,s)
-+*3r188
-c2it@[i:is(pl(r,t),pl(s,t))]
-t3:=satzd188b(a2,b2,c2,isex(pl(r,t),pl(s,t),pd(a2,c2),pd(b2,c2),picp(r,t,a2,c2,a2ir,c2it),picp(s,t,b2,c2,b2is,c2it),i)):eq"rp"(a2,b2)
-t4:=isin(r,s,a2,b2,a2ir,b2is,t3):is(r,s)
--3r188
-t@[i:is(pl(r,t),pl(s,t))]
-satz188b:=realapp3(is(r,s),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t4".3r188"(x,y,z,u,v,w,i)):is(r,s)
-+*3r188
-c2it@[l:less(pl(r,t),pl(s,t))]
-t5:=satzd188c(a2,b2,c2,lessex(pl(r,t),pl(s,t),pd(a2,c2),pd(b2,c2),picp(r,t,a2,c2,a2ir,c2it),picp(s,t,b2,c2,b2is,c2it),l)):lessd(a2,b2)
-t6:=lessin(r,s,a2,b2,a2ir,b2is,t5):less(r,s)
--3r188
-t@[l:less(pl(r,t),pl(s,t))]
-satz188c:=realapp3(less(r,s),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t6".3r188"(x,y,z,u,v,w,l)):less(r,s)
-+*3r188
-c2it@[m:more(r,s)]
-t7:=satzd188d(a2,b2,c2,moreex(r,s,a2,b2,a2ir,b2is,m)):mored(pd(a2,c2),pd(b2,c2))
-t8:=morein(pl(r,t),pl(s,t),pd(a2,c2),pd(b2,c2),picp(r,t,a2,c2,a2ir,c2it),picp(s,t,b2,c2,b2is,c2it),t7):more(pl(r,t),pl(s,t))
--3r188
-t@[m:more(r,s)]
-satz188d:=realapp3(more(pl(r,t),pl(s,t)),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t8".3r188"(x,y,z,u,v,w,m)):more(pl(r,t),pl(s,t))
-t@[i:is(r,s)]
-satz188e:=ispl1(r,s,t,i):is(pl(r,t),pl(s,t))
-+*3r188
-c2it@[l:less(r,s)]
-t9:=satzd188f(a2,b2,c2,lessex(r,s,a2,b2,a2ir,b2is,l)):lessd(pd(a2,c2),pd(b2,c2))
-t10:=lessin(pl(r,t),pl(s,t),pd(a2,c2),pd(b2,c2),picp(r,t,a2,c2,a2ir,c2it),picp(s,t,b2,c2,b2is,c2it),t9):less(pl(r,t),pl(s,t))
--3r188
-t@[l:less(r,s)]
-satz188f:=realapp3(less(pl(r,t),pl(s,t)),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t10".3r188"(x,y,z,u,v,w,l)):less(pl(r,t),pl(s,t))
-t@[m:more(pl(t,r),pl(t,s))]
-satz188g:=satz188a(ismore12(pl(t,r),pl(r,t),pl(t,s),pl(s,t),compl(t,r),compl(t,s),m)):more(r,s)
-t@[i:is(pl(t,r),pl(t,s))]
-satz188h:=satz188b(tr3is(real,pl(r,t),pl(t,r),pl(t,s),pl(s,t),compl(r,t),i,compl(t,s))):is(r,s)
-t@[l:less(pl(t,r),pl(t,s))]
-satz188j:=satz188c(isless12(pl(t,r),pl(r,t),pl(t,s),pl(s,t),compl(t,r),compl(t,s),l)):less(r,s)
-t@[m:more(r,s)]
-satz188k:=ismore12(pl(r,t),pl(t,r),pl(s,t),pl(t,s),compl(r,t),compl(s,t),satz188d(m)):more(pl(t,r),pl(t,s))
-t@[i:is(r,s)]
-satz188l:=ispl2(r,s,t,i):is(pl(t,r),pl(t,s))
-t@[l:less(r,s)]
-satz188m:=isless12(pl(r,t),pl(t,r),pl(s,t),pl(t,s),compl(r,t),compl(s,t),satz188f(l)):less(pl(t,r),pl(t,s))
-u@[i:is(r,s)][m:more(t,u)]
-satz188n:=ismore2(pl(r,u),pl(s,u),pl(r,t),ispl1(r,s,u,i),satz188k(t,u,r,m)):more(pl(r,t),pl(s,u))
-satz188o:=ismore12(pl(r,t),pl(t,r),pl(s,u),pl(u,s),compl(r,t),compl(s,u),satz188n):more(pl(t,r),pl(u,s))
-i@[l:less(t,u)]
-satz188p:=isless2(pl(r,u),pl(s,u),pl(r,t),ispl1(r,s,u,i),satz188m(t,u,r,l)):less(pl(r,t),pl(s,u))
-satz188q:=isless12(pl(r,t),pl(t,r),pl(s,u),pl(u,s),compl(r,t),compl(s,u),satz188p):less(pl(t,r),pl(u,s))
-u@[m:more(r,s)][n:more(t,u)]
-satz189:=trmore(pl(r,t),pl(s,t),pl(s,u),satz188d(m),satz188k(t,u,s,n)):more(pl(r,t),pl(s,u))
-u@[l:less(r,s)][k:less(t,u)]
-satz189a:=lemma1(pl(s,u),pl(r,t),satz189(s,r,u,t,lemma2(r,s,l),lemma2(t,u,k))):less(pl(r,t),pl(s,u))
-u@[m:moreis(r,s)][n:more(t,u)]
-satz190a:=orapp(more(r,s),is(r,s),more(pl(r,t),pl(s,u)),m,[v:more(r,s)]satz189(v,n),[v:is(r,s)]satz188n(v,n)):more(pl(r,t),pl(s,u))
-u@[m:more(r,s)][n:moreis(t,u)]
-satz190b:=ismore12(pl(t,r),pl(r,t),pl(u,s),pl(s,u),compl(t,r),compl(u,s),satz190a(t,u,r,s,n,m)):more(pl(r,t),pl(s,u))
-u@[l:lessis(r,s)][k:less(t,u)]
-satz190c:=lemma1(pl(s,u),pl(r,t),satz190a(s,r,u,t,satz168b(l),lemma2(t,u,k))):less(pl(r,t),pl(s,u))
-u@[l:less(r,s)][k:lessis(t,u)]
-satz190d:=lemma1(pl(s,u),pl(r,t),satz190b(s,r,u,t,lemma2(l),satz168b(t,u,k))):less(pl(r,t),pl(s,u))
-+3r191
-d3iu@[m:moreis(r,s)][n:moreis(t,u)]
-t1:=satzd191(a3,b3,c3,d3,moreisex(r,s,a3,b3,a3ir,b3is,m),moreisex(t,u,c3,d3,c3it,d3iu,n)):moreq(pd(a3,c3),pd(b3,d3))
-t2:=moreisin(pl(r,t),pl(s,u),pd(a3,c3),pd(b3,d3),picp(r,t,a3,c3,a3ir,c3it),picp(s,u,b3,d3,b3is,d3iu),t1):moreis(pl(r,t),pl(s,u))
--3r191
-u@[m:moreis(r,s)][n:moreis(t,u)]
-satz191:=realapp4(moreis(pl(r,t),pl(s,u)),[x:dif][y:dif][z:dif][v:dif][xi:inn(x,class(r))][yi:inn(y,class(s))][zi:inn(z,class(t))][vi:inn(v,class(u))]t2".3r191"(x,y,z,v,xi,yi,zi,vi,m,n)):moreis(pl(r,t),pl(s,u))
-u@[l:lessis(r,s)][k:lessis(t,u)]
-satz191a:=satz168a(pl(s,u),pl(r,t),satz191(s,r,u,t,satz168b(l),satz168b(t,u,k))):lessis(pl(r,t),pl(s,u))
-@timesdr:=[x:dif][y:dif]realof(td(x,y)):[x:dif][y:dif]real
-+ivr4
-[a:dif][b:dif][c:dif][d:dif][e:eq"rp"(a,b)][f:eq"rp"(c,d)]
-t1:=isin(realof(td(a,c)),realof(td(b,d)),td(a,c),td(b,d),innclass(td(a,c)),innclass(td(b,d)),eqtd12(a,b,c,d,e,f)):is(<c><a>timesdr,<d><b>timesdr)
--ivr4
-ftimesdr:=[x:dif][y:dif][z:dif][v:dif][t:<y><x>eq][u:<v><z>eq]t1".ivr4"(x,y,z,v,t,u):fixf2(real,timesdr)
-s@ts:=indreal2(real,timesdr,ftimesdr,r,s):real
-+*ivr4
-b1is@t2:=isindreal2(real,timesdr,ftimesdr,r,s,a1,b1,a1ir,b1is):is(realof(td(a1,b1)),ts(r,s))
--ivr4
-b1is@tict:=isp(real,[x:real]inn(td(a1,b1),class(x)),realof(td(a1,b1)),ts(r,s),innclass(td(a1,b1)),t2".ivr4"):inn(td(a1,b1),class(ts(r,s)))
-t@[i:is(r,s)]
-ists1:=isf(real,real,[x:real]ts(x,t),r,s,i):is(ts(r,t),ts(s,t))
-ists2:=isf(real,real,[x:real]ts(t,x),r,s,i):is(ts(t,r),ts(t,s))
-u@[i:is(r,s)][j:is(t,u)]
-ists12:=tris(real,ts(r,t),ts(s,t),ts(s,u),ists1(i),ists2(t,u,s,j)):is(ts(r,t),ts(s,u))
-+4r192
-b1is@[i:is(r,0)]
-t1:=satzd192a(a1,b1,0ex(r,a1,a1ir,i)):zero(td(a1,b1))
-t2:=0in(ts(r,s),td(a1,b1),tict,t1):is(ts(r,s),0)
--4r192
-s@[i:is(r,0)]
-satz192a:=realapp2(is(ts(r,s),0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".4r192"(x,y,t,u,i)):is(ts(r,s),0)
-+*4r192
-b1is@[i:is(s,0)]
-t3:=satzd192b(a1,b1,0ex(s,b1,b1is,i)):zero(td(a1,b1))
-t4:=0in(ts(r,s),td(a1,b1),tict,t3):is(ts(r,s),0)
--4r192
-s@[i:is(s,0)]
-satz192b:=realapp2(is(ts(r,s),0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t4".4r192"(x,y,t,u,i)):is(ts(r,s),0)
-+*4r192
-b1is@[i:is(ts(r,s),0)]
-t5:=satzd192c(a1,b1,0ex(ts(r,s),td(a1,b1),tict,i)):or(zero(a1),zero(b1))
-t6:=th9"l.or"(zero(a1),zero(b1),is(r,0),is(s,0),t5,[t:zero(a1)]0in(r,a1,a1ir,t),[t:zero(b1)]0in(s,b1,b1is,t)):or(is(r,0),is(s,0))
--4r192
-s@[i:is(ts(r,s),0)]
-satz192c:=realapp2(or(is(r,0),is(s,0)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".4r192"(x,y,t,u,i)):or(is(r,0),is(s,0))
-s@[n:nis(r,0)][o:nis(s,0)]
-satz192d:=th3"l.imp"(is(ts(r,s),0),or(is(r,0),is(s,0)),th3"l.or"(is(r,0),is(s,0),n,o),[t:is(ts(r,s),0)]satz192c(t)):nis(ts(r,s),0)
-s@[i:is(r,0)]
-ts01:=satz192a(i):is(ts(r,s),0)
-s@[i:is(s,0)]
-ts02:=satz192b(i):is(ts(r,s),0)
-+4r193
-b1is@t1:=satzd193(a1,b1):eq"rp"(absd(td(a1,b1)),td(absd(a1),absd(b1)))
-t2:=isin(abs(ts(r,s)),ts(abs(r),abs(s)),absd(td(a1,b1)),td(absd(a1),absd(b1)),aica(ts(r,s),td(a1,b1),tict),tict(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is)),t1):is(abs(ts(r,s)),ts(abs(r),abs(s)))
--4r193
-s@satz193:=realapp2(is(abs(ts(r,s)),ts(abs(r),abs(s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".4r193"(x,y,t,u)):is(abs(ts(r,s)),ts(abs(r),abs(s)))
-satz193a:=symis(real,abs(ts(r,s)),ts(abs(r),abs(s)),satz193):is(ts(abs(r),abs(s)),abs(ts(r,s)))
-+4r194
-b1is@t1:=satzd194(a1,b1):eq"rp"(td(a1,b1),td(b1,a1))
-t2:=isin(ts(r,s),ts(s,r),td(a1,b1),td(b1,a1),tict,tict(s,r,b1,a1,b1is,a1ir),t1):is(ts(r,s),ts(s,r))
--4r194
-satz194:=realapp2(is(ts(r,s),ts(s,r)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".4r194"(x,y,t,u)):is(ts(r,s),ts(s,r))
-comts:=satz194:is(ts(r,s),ts(s,r))
-@1rl:=realof(1df):real
-pos1:=posin(1rl,1df,innclass(1df),posdirp(1rp)):pos(1rl)
-natrl1:=natrli(1):natrl(1rl)
-intrl1:=natintrl(1rl,natrl1):intrl(1rl)
-+4r195
-a0ir@t1:=satzd195(a0):eq"rp"(td(a0,1df),a0)
-t2:=isin(ts(r,1rl),r,td(a0,1df),a0,tict(r,1rl,a0,1df,a0ir,innclass(1df)),a0ir,t1):is(ts(r,1rl),r)
--4r195
-r@satz195:=realapp1(is(ts(r,1rl),r),[x:dif][t:inn(x,class(r))]t2".4r195"(x,t)):is(ts(r,1rl),r)
-satz195a:=symis(real,ts(r,1rl),r,satz195):is(r,ts(r,1rl))
-satz195b:=tris(real,ts(1rl,r),ts(r,1rl),r,comts(1rl,r),satz195):is(ts(1rl,r),r)
-satz195c:=symis(real,ts(1rl,r),r,satz195b):is(r,ts(1rl,r))
-s@[p:pos(r)][q:pos(s)]
-satz196a:=symis(real,ts(abs(r),abs(s)),ts(r,s),ists12(abs(r),r,abs(s),s,absp(r,p),absp(s,q))):is(ts(r,s),ts(abs(r),abs(s)))
-+4r196
-b1is@[n:neg(r)][o:neg(s)]
-t1:=satzd196b(a1,b1,negex(r,a1,a1ir,n),negex(s,b1,b1is,o)):eq"rp"(td(a1,b1),td(absd(a1),absd(b1)))
-t2:=isin(ts(r,s),ts(abs(r),abs(s)),td(a1,b1),td(absd(a1),absd(b1)),tict,tict(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is)),t1):is(ts(r,s),ts(abs(r),abs(s)))
--4r196
-s@[n:neg(r)][o:neg(s)]
-satz196b:=realapp2(is(ts(r,s),ts(abs(r),abs(s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".4r196"(x,y,t,u,n,o)):is(ts(r,s),ts(abs(r),abs(s)))
-+*4r196
-b1is@[p:pos(r)][n:neg(s)]
-t1a:=satzd196c(a1,b1,posex(r,a1,a1ir,p),negex(s,b1,b1is,n)):eq"rp"(td(a1,b1),m0d(td(absd(a1),absd(b1))))
-t2a:=isin(ts(r,s),m0(ts(abs(r),abs(s))),td(a1,b1),m0d(td(absd(a1),absd(b1))),tict,micm0(ts(abs(r),abs(s)),td(absd(a1),absd(b1)),tict(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is))),t1a):is(ts(r,s),m0(ts(abs(r),abs(s))))
--4r196
-s@[p:pos(r)][n:neg(s)]
-satz196c:=realapp2(is(ts(r,s),m0(ts(abs(r),abs(s)))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2a".4r196"(x,y,t,u,p,n)):is(ts(r,s),m0(ts(abs(r),abs(s))))
-s@[n:neg(r)][p:pos(s)]
-satz196d:=tr3is(real,ts(r,s),ts(s,r),m0(ts(abs(s),abs(r))),m0(ts(abs(r),abs(s))),comts(r,s),satz196c(s,r,p,n),ism0(ts(abs(s),abs(r)),ts(abs(r),abs(s)),comts(abs(s),abs(r)))):is(ts(r,s),m0(ts(abs(r),abs(s))))
-+*4r196
-a0ir@[n:not(is(r,0))]
-t3:=th3"l.imp"(zero(a0),is(r,0),n,[t:zero(a0)]0in(t)):not(zero(a0))
-b1is@[n:not(is(r,0))][o:not(is(s,0))][i:is(ts(r,s),ts(abs(r),abs(s)))]
-t4:=satzd196e(a1,b1,t3(r,a1,a1ir,n),t3(s,b1,b1is,o),isex(ts(r,s),ts(abs(r),abs(s)),td(a1,b1),td(absd(a1),absd(b1)),tict,tict(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is)),i)):or(and(posd(a1),posd(b1)),and(negd(a1),negd(b1)))
-[a:and(posd(a1),posd(b1))]
-t5:=andi(pos(r),pos(s),posin(r,a1,a1ir,ande1(posd(a1),posd(b1),a)),posin(s,b1,b1is,ande2(posd(a1),posd(b1),a))):and(pos(r),pos(s))
-i@[a:and(negd(a1),negd(b1))]
-t6:=andi(neg(r),neg(s),negin(r,a1,a1ir,ande1(negd(a1),negd(b1),a)),negin(s,b1,b1is,ande2(negd(a1),negd(b1),a))):and(neg(r),neg(s))
-i@t7:=th9"l.or"(and(posd(a1),posd(b1)),and(negd(a1),negd(b1)),and(pos(r),pos(s)),and(neg(r),neg(s)),t4,[t:and(posd(a1),posd(b1))]t5(t),[t:and(negd(a1),negd(b1))]t6(t)):or(and(pos(r),pos(s)),and(neg(r),neg(s)))
--4r196
-s@[n:not(is(r,0))][o:not(is(s,0))][i:is(ts(r,s),ts(abs(r),abs(s)))]
-satz196e:=realapp2(or(and(pos(r),pos(s)),and(neg(r),neg(s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t7".4r196"(x,y,t,u,n,o,i)):or(and(pos(r),pos(s)),and(neg(r),neg(s)))
-+*4r196
-o@[i:is(ts(r,s),m0(ts(abs(r),abs(s))))]
-t8:=satzd196f(a1,b1,t3(r,a1,a1ir,n),t3(s,b1,b1is,o),isex(ts(r,s),m0(ts(abs(r),abs(s))),td(a1,b1),m0d(td(absd(a1),absd(b1))),tict,micm0(ts(abs(r),abs(s)),td(absd(a1),absd(b1)),tict(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is))),i)):or(and(posd(a1),negd(b1)),and(negd(a1),posd(b1)))
-[a:and(posd(a1),negd(b1))]
-t9:=andi(pos(r),neg(s),posin(r,a1,a1ir,ande1(posd(a1),negd(b1),a)),negin(s,b1,b1is,ande2(posd(a1),negd(b1),a))):and(pos(r),neg(s))
-i@[a:and(negd(a1),posd(b1))]
-t10:=andi(neg(r),pos(s),negin(r,a1,a1ir,ande1(negd(a1),posd(b1),a)),posin(s,b1,b1is,ande2(negd(a1),posd(b1),a))):and(neg(r),pos(s))
-i@t11:=th9"l.or"(and(posd(a1),negd(b1)),and(negd(a1),posd(b1)),and(pos(r),neg(s)),and(neg(r),pos(s)),t8,[t:and(posd(a1),negd(b1))]t9(t),[t:and(negd(a1),posd(b1))]t10(t)):or(and(pos(r),neg(s)),and(neg(r),pos(s)))
--4r196
-o@[i:is(ts(r,s),m0(ts(abs(r),abs(s))))]
-satz196f:=realapp2(or(and(pos(r),neg(s)),and(neg(r),pos(s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t11".4r196"(x,y,t,u,n,o,i)):or(and(pos(r),neg(s)),and(neg(r),pos(s)))
-s@[p:pos(ts(r,s))]
-+*4r196
-p"r"@t12:=th3"l.imp"(is(r,0),is(ts(r,s),0),pnot0(ts(r,s),p),[t:is(r,0)]ts01(r,s,t)):nis(r,0)
-t13:=th3"l.imp"(is(s,0),is(ts(r,s),0),pnot0(ts(r,s),p),[t:is(s,0)]ts02(r,s,t)):nis(s,0)
-t14:=tris1(real,ts(r,s),ts(abs(r),abs(s)),abs(ts(r,s)),absp(ts(r,s),p),satz193(r,s)):is(ts(r,s),ts(abs(r),abs(s)))
--4r196
-p@satz196g:=satz196e(t12".4r196",t13".4r196",t14".4r196"):or(and(pos(r),pos(s)),and(neg(r),neg(s)))
-s@[n:neg(ts(r,s))]
-+*4r196
-n"r"@t15:=th3"l.imp"(is(r,0),is(ts(r,s),0),nnot0(ts(r,s),n),[t:is(r,0)]ts01(r,s,t)):nis(r,0)
-t16:=th3"l.imp"(is(s,0),is(ts(r,s),0),nnot0(ts(r,s),n),[t:is(s,0)]ts02(r,s,t)):nis(s,0)
-t17:=satz177c(ts(abs(r),abs(s)),ts(r,s),tris(real,ts(abs(r),abs(s)),abs(ts(r,s)),m0(ts(r,s)),satz193a(r,s),absn(ts(r,s),n))):is(ts(r,s),m0(ts(abs(r),abs(s))))
--4r196
-n@satz196h:=satz196f(t15".4r196",t16".4r196",t17".4r196"):or(and(pos(r),neg(s)),and(neg(r),pos(s)))
-+4r197
-b1is@t1:=satzd197a(a1,b1):eq"rp"(td(m0d(a1),b1),m0d(td(a1,b1)))
-t2:=isin(ts(m0(r),s),m0(ts(r,s)),td(m0d(a1),b1),m0d(td(a1,b1)),tict(m0(r),s,m0d(a1),b1,micm0(r,a1,a1ir),b1is),micm0(ts(r,s),td(a1,b1),tict),t1):is(ts(m0(r),s),m0(ts(r,s)))
--4r197
-s@satz197a:=realapp2(is(ts(m0(r),s),m0(ts(r,s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".4r197"(x,y,t,u)):is(ts(m0(r),s),m0(ts(r,s)))
-satz197b:=tr3is(real,ts(r,m0(s)),ts(m0(s),r),m0(ts(s,r)),m0(ts(r,s)),comts(r,m0(s)),satz197a(s,r),ism0(ts(s,r),ts(r,s),comts(s,r))):is(ts(r,m0(s)),m0(ts(r,s)))
-satz197c:=tris2(real,ts(m0(r),s),ts(r,m0(s)),m0(ts(r,s)),satz197a,satz197b):is(ts(m0(r),s),ts(r,m0(s)))
-satz197d:=symis(real,ts(m0(r),s),ts(r,m0(s)),satz197c):is(ts(r,m0(s)),ts(m0(r),s))
-satz197e:=symis(real,ts(m0(r),s),m0(ts(r,s)),satz197a):is(m0(ts(r,s)),ts(m0(r),s))
-satz197f:=symis(real,ts(r,m0(s)),m0(ts(r,s)),satz197b):is(m0(ts(r,s)),ts(r,m0(s)))
-satz198:=tris(real,ts(m0(r),m0(s)),ts(r,m0(m0(s))),ts(r,s),satz197c(r,m0(s)),ists2(m0(m0(s)),s,r,satz177(s))):is(ts(m0(r),m0(s)),ts(r,s))
-satz198a:=symis(real,ts(m0(r),m0(s)),ts(r,s),satz198):is(ts(r,s),ts(m0(r),m0(s)))
-+*ivr4
-b1is@[p:pos(r)][q:pos(s)]
-t3:=ptdpp(a1,b1,posex(r,a1,a1ir,p),posex(s,b1,b1is,q)):posd(td(a1,b1))
-t4:=posin(ts(r,s),td(a1,b1),tict,t3):pos(ts(r,s))
--ivr4
-s@[p:pos(r)][q:pos(s)]
-postspp:=realapp2(pos(ts(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t4".ivr4"(x,y,t,u,p,q)):pos(ts(r,s))
-+*ivr4
-p@[n:neg(s)]
-t5:=ntdpn(a1,b1,posex(r,a1,a1ir,p),negex(s,b1,b1is,n)):negd(td(a1,b1))
-t6:=negin(ts(r,s),td(a1,b1),tict,t5):neg(ts(r,s))
--ivr4
-s@[p:pos(r)][n:neg(s)]
-negtspn:=realapp2(neg(ts(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".ivr4"(x,y,t,u,p,n)):neg(ts(r,s))
-s@[n:neg(r)][p:pos(s)]
-negtsnp:=isneg(ts(s,r),ts(r,s),comts(s,r),negtspn(s,r,p,n)):neg(ts(r,s))
-s@[n:neg(r)][o:neg(s)]
-postsnn:=ispos(ts(m0(r),m0(s)),ts(r,s),satz198,postspp(m0(r),m0(s),satz176c(r,n),satz176c(s,o))):pos(ts(r,s))
-r@[n:nis(r,0)]
-possq:=rapp(r,pos(ts(r,r)),[t:pos(r)]postspp(r,r,t,t),th2"l.imp"(is(r,0),pos(ts(r,r)),n),[t:neg(r)]postsnn(r,r,t,t)):pos(ts(r,r))
-r@nnegsq:=th1"l.imp"(is(r,0),not(neg(ts(r,r))),[t:is(r,0)]0notn(ts(r,r),satz192a(r,r,t)),[t:nis(r,0)]pnotn(ts(r,r),possq(r,t))):not(neg(ts(r,r)))
-+4r199
-c2it@t1:=satzd199(a2,b2,c2):eq"rp"(td(td(a2,b2),c2),td(a2,td(b2,c2)))
-t2:=isin(ts(ts(r,s),t),ts(r,ts(s,t)),td(td(a2,b2),c2),td(a2,td(b2,c2)),tict(ts(r,s),t,td(a2,b2),c2,tict(r,s,a2,b2,a2ir,b2is),c2it),tict(r,ts(s,t),a2,td(b2,c2),a2ir,tict(s,t,b2,c2,b2is,c2it)),t1):is(ts(ts(r,s),t),ts(r,ts(s,t)))
--4r199
-t@satz199:=realapp3(is(ts(ts(r,s),t),ts(r,ts(s,t))),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".4r199"(x,y,z,u,v,w)):is(ts(ts(r,s),t),ts(r,ts(s,t)))
-assts1:=satz199:is(ts(ts(r,s),t),ts(r,ts(s,t)))
-assts2:=symis(real,ts(ts(r,s),t),ts(r,ts(s,t)),satz199):is(ts(r,ts(s,t)),ts(ts(r,s),t))
-+4r201
-c2it@t1:=satzd201(a2,b2,c2):eq"rp"(td(a2,pd(b2,c2)),pd(td(a2,b2),td(a2,c2)))
-t2:=isin(ts(r,pl(s,t)),pl(ts(r,s),ts(r,t)),td(a2,pd(b2,c2)),pd(td(a2,b2),td(a2,c2)),tict(r,pl(s,t),a2,pd(b2,c2),a2ir,picp(s,t,b2,c2,b2is,c2it)),picp(ts(r,s),ts(r,t),td(a2,b2),td(a2,c2),tict(r,s,a2,b2,a2ir,b2is),tict(r,t,a2,c2,a2ir,c2it)),t1):is(ts(r,pl(s,t)),pl(ts(r,s),ts(r,t)))
--4r201
-satz201:=realapp3(is(ts(r,pl(s,t)),pl(ts(r,s),ts(r,t))),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".4r201"(x,y,z,u,v,w)):is(ts(r,pl(s,t)),pl(ts(r,s),ts(r,t)))
-disttp1:=tr3is(real,ts(pl(r,s),t),ts(t,pl(r,s)),pl(ts(t,r),ts(t,s)),pl(ts(r,t),ts(s,t)),comts(pl(r,s),t),satz201(t,r,s),ispl12(ts(t,r),ts(r,t),ts(t,s),ts(s,t),comts(t,r),comts(t,s))):is(ts(pl(r,s),t),pl(ts(r,t),ts(s,t)))
-disttp2:=satz201:is(ts(r,pl(s,t)),pl(ts(r,s),ts(r,t)))
-distpt1:=symis(real,ts(pl(r,s),t),pl(ts(r,t),ts(s,t)),disttp1):is(pl(ts(r,t),ts(s,t)),ts(pl(r,s),t))
-distpt2:=symis(real,ts(r,pl(s,t)),pl(ts(r,s),ts(r,t)),disttp2):is(pl(ts(r,s),ts(r,t)),ts(r,pl(s,t)))
-satz202:=tris(real,ts(r,mn(s,t)),pl(ts(r,s),ts(r,m0(t))),mn(ts(r,s),ts(r,t)),disttp2(r,s,m0(t)),ispl2(ts(r,m0(t)),m0(ts(r,t)),ts(r,s),satz197b(r,t))):is(ts(r,mn(s,t)),mn(ts(r,s),ts(r,t)))
-disttm1:=tris(real,ts(mn(r,s),t),pl(ts(r,t),ts(m0(s),t)),mn(ts(r,t),ts(s,t)),disttp1(r,m0(s),t),ispl2(ts(m0(s),t),m0(ts(s,t)),ts(r,t),satz197a(s,t))):is(ts(mn(r,s),t),mn(ts(r,t),ts(s,t)))
-disttm2:=satz202:is(ts(r,mn(s,t)),mn(ts(r,s),ts(r,t)))
-distmt1:=symis(real,ts(mn(r,s),t),mn(ts(r,t),ts(s,t)),disttm1):is(mn(ts(r,t),ts(s,t)),ts(mn(r,s),t))
-distmt2:=symis(real,ts(r,mn(s,t)),mn(ts(r,s),ts(r,t)),disttm2):is(mn(ts(r,s),ts(r,t)),ts(r,mn(s,t)))
-satz200:=satz202:is(ts(r,mn(s,t)),mn(ts(r,s),ts(r,t)))
-+4r203
-c2it@[m:more(r,s)][p:pos(t)]
-t1:=satzd203a(a2,b2,c2,moreex(r,s,a2,b2,a2ir,b2is,m),posex(t,c2,c2it,p)):mored(td(a2,c2),td(b2,c2))
-t2:=morein(ts(r,t),ts(s,t),td(a2,c2),td(b2,c2),tict(r,t,a2,c2,a2ir,c2it),tict(s,t,b2,c2,b2is,c2it),t1):more(ts(r,t),ts(s,t))
--4r203
-[m:more(r,s)][p:pos(t)]
-satz203a:=realapp3(more(ts(r,t),ts(s,t)),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".4r203"(x,y,z,u,v,w,m,p)):more(ts(r,t),ts(s,t))
-m@[i:is(t,0)]
-satz203b:=tris2(real,ts(r,t),ts(s,t),0,ts02(r,t,i),ts02(s,t,i)):is(ts(r,t),ts(s,t))
-+*4r203
-m@[n:neg(t)]
-t3:=satzd203c(a2,b2,c2,moreex(r,s,a2,b2,a2ir,b2is,m),negex(t,c2,c2it,n)):lessd(td(a2,c2),td(b2,c2))
-t4:=lessin(ts(r,t),ts(s,t),td(a2,c2),td(b2,c2),tict(r,t,a2,c2,a2ir,c2it),tict(s,t,b2,c2,b2is,c2it),t3):less(ts(r,t),ts(s,t))
--4r203
-m@[n:neg(t)]
-satz203c:=realapp3(less(ts(r,t),ts(s,t)),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t4".4r203"(x,y,z,u,v,w,m,n)):less(ts(r,t),ts(s,t))
-p@satz203d:=ismore12(ts(r,t),ts(t,r),ts(s,t),ts(t,s),comts(r,t),comts(s,t),satz203a):more(ts(t,r),ts(t,s))
-i@satz203e:=tris2(real,ts(t,r),ts(t,s),0,ts01(t,r,i),ts01(t,s,i)):is(ts(t,r),ts(t,s))
-n@satz203f:=isless12(ts(r,t),ts(t,r),ts(s,t),ts(t,s),comts(r,t),comts(s,t),satz203c):less(ts(t,r),ts(t,s))
-t@[l:less(r,s)][p:pos(t)]
-satz203g:=lemma1(ts(s,t),ts(r,t),satz203a(s,r,t,lemma2(r,s,l),p)):less(ts(r,t),ts(s,t))
-l@[i:is(t,0)]
-satz203h:=tris2(real,ts(r,t),ts(s,t),0,ts02(r,t,i),ts02(s,t,i)):is(ts(r,t),ts(s,t))
-l@[n:neg(t)]
-satz203j:=lemma2(ts(s,t),ts(r,t),satz203c(s,r,t,lemma2(r,s,l),n)):more(ts(r,t),ts(s,t))
-p@satz203k:=lemma1(ts(t,s),ts(t,r),satz203d(s,r,t,lemma2(r,s,l),p)):less(ts(t,r),ts(t,s))
-i@satz203l:=tris2(real,ts(t,r),ts(t,s),0,ts01(t,r,i),ts01(t,s,i)):is(ts(t,r),ts(t,s))
-n@satz203m:=lemma2(ts(t,s),ts(t,r),satz203f(s,r,t,lemma2(r,s,l),n)):more(ts(t,r),ts(t,s))
-+4r204
-a0ir@[n1:nis(r,0)]
-t1:=th3"l.imp"(zero(a0),is(r,0),n1,[t:zero(a0)]0in(t)):not(zero(a0))
-d3iu@[n1:nis(s,0)][i:is(ts(s,t),r)][j:is(ts(s,u),r)]
-t2:=satzd204b(a3,b3,t1(s,b3,b3is,n1),c3,d3,isex(ts(s,t),r,td(b3,c3),a3,tict(s,t,b3,c3,b3is,c3it),a3ir,i),isex(ts(s,u),r,td(b3,d3),a3,tict(s,u,b3,d3,b3is,d3iu),a3ir,j)):eq"rp"(c3,d3)
-t3:=isin(t,u,c3,d3,c3it,d3iu,t2):is(t,u)
--4r204
-s@[n:nis(s,0)][x:real][y:real][i:is(ts(s,x),r)][j:is(ts(s,y),r)]
-satz204b:=realapp4(x,y,is(x,y),[z:dif][u:dif][v:dif][w:dif][zi:inn(z,class(r))][ui:inn(u,class(s))][vi:inn(v,class(x))][wi:inn(w,class(y))]t3".4r204"(x,y,z,u,v,w,zi,ui,vi,wi,n,i,j)):is(x,y)
-+*4r204
-b1is@[n1:nis(s,0)]
-t4:=satzd204a(a1,b1,t1(s,b1,b1is,n1)):some"l"(dif,[x:dif]eq"rp"(td(b1,x),a1))
-[a:dif][e:eq"rp"(td(b1,a),a1)]
-ar:=realof(a):real
-t5:=isin(ts(s,ar),r,td(b1,a),a1,tict(s,ar,b1,a,b1is,innclass(a)),a1ir,e):is(ts(s,ar),r)
-t6:=somei(real,[x:real]is(ts(s,x),r),ar,t5):some([x:real]is(ts(s,x),r))
-n1@t7:=someapp(dif,[x:dif]eq"rp"(td(b1,x),a1),t4,some([x:real]is(ts(s,x),r)),[x:dif][t:eq"rp"(td(b1,x),a1)]t6(x,t)):some([x:real]is(ts(s,x),r))
--4r204
-n@satz204a:=realapp2(some([x:real]is(ts(s,x),r)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t7".4r204"(x,y,t,u,n)):some([x:real]is(ts(s,x),r))
-satz204:=onei(real,[x:real]is(ts(s,x),r),[x:real][y:real][t:is(ts(s,x),r)][u:is(ts(s,y),r)]satz204b(x,y,t,u),satz204a):one([x:real]is(ts(s,x),r))
-ov:=ind(real,[x:real]is(ts(s,x),r),satz204):real
-satz204c:=oneax(real,[x:real]is(ts(s,x),r),satz204):is(ts(s,ov(r,s,n)),r)
-satz204d:=symis(real,ts(s,ov(r,s,n)),r,satz204c):is(r,ts(s,ov(r,s,n)))
-satz204e:=tris(real,ts(ov(r,s,n),s),ts(s,ov(r,s,n)),r,comts(ov(r,s,n),s),satz204c):is(ts(ov(r,s,n),s),r)
-satz204f:=symis(real,ts(ov(r,s,n),s),r,satz204e):is(r,ts(ov(r,s,n),s))
-s@[x:real][n:nis(s,0)][i:is(ts(s,x),r)]
-satz204g:=satz204b(n,x,ov(r,s,n),i,satz204c(n)):is(x,ov(r,s,n))
-s@[n:nis(s,0)][p:pos(r)][q:pos(s)]
-+*4r204
-n@ros:=ov(r,s,n):real
-p@t8:=ispos(r,ts(s,ros),satz204d(n),p):pos(ts(s,ros))
-q@t9:=th1"l.and"(neg(s),neg(ros),pnotn(s,q)):not(and(neg(s),neg(ros)))
-t10:=ore1(and(pos(s),pos(ros)),and(neg(s),neg(ros)),satz196g(s,ros,t8),t9):and(pos(s),pos(ros))
--4r204
-q@posovpp:=ande2(pos(s),pos(ov(r,s,n)),t10".4r204"):pos(ov(r,s,n))
-p@[m:neg(s)]
-+*4r204
-m@t11:=th1"l.and"(pos(s),pos(ros),nnotp(s,m)):not(and(pos(s),pos(ros)))
-t12:=ore2(and(pos(s),pos(ros)),and(neg(s),neg(ros)),satz196g(s,ros,t8),t11):and(neg(s),neg(ros))
--4r204
-m@negovpn:=ande2(neg(s),neg(ov(r,s,n)),t12".4r204"):neg(ov(r,s,n))
-n@[m:neg(r)][p:pos(s)]
-+*4r204
-m@t13:=isneg(r,ts(s,ros),satz204d(n),m):neg(ts(s,ros))
-p@t14:=th1"l.and"(neg(s),pos(ros),pnotn(s,p)):not(and(neg(s),pos(ros)))
-t15:=ore1(and(pos(s),neg(ros)),and(neg(s),pos(ros)),satz196h(s,ros,t13),t14):and(pos(s),neg(ros))
--4r204
-p@negovnp:=ande2(pos(s),neg(ov(r,s,n)),t15".4r204"):neg(ov(r,s,n))
-m@[l:neg(s)]
-+*4r204
-l@t16:=th1"l.and"(pos(s),neg(ros),nnotp(s,l)):not(and(pos(s),neg(ros)))
-t17:=ore2(and(pos(s),neg(ros)),and(neg(s),pos(ros)),satz196h(s,ros,t13),t16):and(neg(s),pos(ros))
--4r204
-l@posovnn:=ande2(neg(s),pos(ov(r,s,n)),t17".4r204"):pos(ov(r,s,n))
-@[r0:cut][s0:cut][m:more"rp"(r0,s0)]
-morerpep:=morein(pofrp(r0),pofrp(s0),pdofrp(r0),pdofrp(s0),innclass(pdofrp(r0)),innclass(pdofrp(s0)),morerpepd(r0,s0,m)):more(pofrp(r0),pofrp(s0))
-s0@[m:more(pofrp(r0),pofrp(s0))]
-morerpip:=morerpipd(r0,s0,moreex(pofrp(r0),pofrp(s0),pdofrp(r0),pdofrp(s0),innclass(pdofrp(r0)),innclass(pdofrp(s0)),m)):more"rp"(r0,s0)
-s0@[l:less"rp"(r0,s0)]
-lessrpep:=lemma1(pofrp(s0),pofrp(r0),morerpep(s0,r0,satz122(r0,s0,l))):less(pofrp(r0),pofrp(s0))
-s0@[l:less(pofrp(r0),pofrp(s0))]
-lessrpip:=satz121(s0,r0,morerpip(s0,r0,lemma2(pofrp(r0),pofrp(s0),l))):less"rp"(r0,s0)
-s@[p:pos(r)][q:pos(s)][m:more(r,s)]
-q@[m:more(r,s)]
-+ivr5
-t1:=ismore12(r,pofrp(rpofp(r,p)),s,pofrp(rpofp(s,q)),isprp1(r,p),isprp1(s,q),m):more(pofrp(rpofp(r,p)),pofrp(rpofp(s,q)))
--ivr5
-moreperp:=morerpip(rpofp(r,p),rpofp(s,q),t1".ivr5"):more"rp"(rpofp(r,p),rpofp(s,q))
-q@[m:more"rp"(rpofp(r,p),rpofp(s,q))]
-+*ivr5
-m@t2:=morerpep(rpofp(r,p),rpofp(s,q),m):more(pofrp(rpofp(r,p)),pofrp(rpofp(s,q)))
--ivr5
-m@morepirp:=ismore12(pofrp(rpofp(r,p)),r,pofrp(rpofp(s,q)),s,isprp2(r,p),isprp2(s,q),t2".ivr5"):more(r,s)
-q@[l:less(r,s)]
-lessperp:=satz121(rpofp(s,q),rpofp(r,p),moreperp(s,r,q,p,lemma2(r,s,l))):less"rp"(rpofp(r,p),rpofp(s,q))
-q@[l:less"rp"(rpofp(r,p),rpofp(s,q))]
-lesspirp:=lemma1(s,r,morepirp(s,r,q,p,satz122(rpofp(r,p),rpofp(s,q),l))):less(r,s)
-r@s01:=setof(real,[x:real]lessis(x,r)):set(real)
-s02:=setof(real,[x:real]more(x,r)):set(real)
-+5r205
-s@[n:not(in(s,s01))]
-t1:=th3"l.imp"(lessis(s,r),in(s,s01),n,[t:lessis(s,r)]estii(real,[x:real]lessis(x,r),s,t)):not(lessis(s,r))
-t2:=estii(real,[x:real]more(x,r),s,satz167k(s,r,t1)):in(s,s02)
--5r205
-vb00:=[x:real][t:not(in(x,s01))]t2".5r205"(x,t):all([x:real]or(in(x,s01),in(x,s02)))
-+*5r205
-r@t3:=estii(real,[x:real]lessis(x,r),r,lessisi2(r,r,refis(real,r))):in(r,s01)
--5r205
-r@vb01a:=nonemptyi(real,s01,r,t3".5r205"):nonempty(real,s01)
-+*5r205
-r@t4:=ismore2(pl(r,0),r,pl(r,1rl),pl02(r,0,refis(real,0)),satz188k(1rl,0,r,satz169a(1rl,pos1))):more(pl(r,1rl),r)
-t5:=estii(real,[x:real]more(x,r),pl(r,1rl),t4):in(pl(r,1rl),s02)
--5r205
-r@vb01b:=nonemptyi(real,s02,pl(r,1rl),t5".5r205"):nonempty(real,s02)
-+*5r205
-s@[i:in(s,s01)][t:real][j:in(t,s02)]
-t6:=satz172a(s,r,t,estie(real,[x:real]lessis(x,r),s,i),lemma1(t,r,estie(real,[x:real]more(x,r),t,j))):less(s,t)
--5r205
-r@vb02:=[x:real][t:in(x,s01)][y:real][u:in(y,s02)]t6".5r205"(x,t,y,u):all([x:real][t:in(x,s01)]all([y:real][u:in(y,s02)]less(x,y)))
-s@[l:less(s,r)]
-vb03a:=estii(real,[x:real]lessis(x,r),s,lessisi1(s,r,l)):in(s,s01)
-s@[m:more(s,r)]
-vb03b:=estii(real,[x:real]more(x,r),s,m):in(s,s02)
-r@s11:=setof(real,[x:real]less(x,r)):set(real)
-s12:=setof(real,[x:real]moreis(x,r)):set(real)
-+*5r205
-s@[n:not(in(s,s11))]
-t7:=th3"l.imp"(less(s,r),in(s,s11),n,[t:less(s,r)]estii(real,[x:real]less(x,r),s,t)):not(less(s,r))
-t8:=estii(real,[x:real]moreis(x,r),s,satz167f(s,r,t7)):in(s,s12)
--5r205
-r@vb10:=[x:real][t:not(in(x,s11))]t8".5r205"(x,t):all([x:real]or(in(x,s11),in(x,s12)))
-+*5r205
-r@t9:=isless2(pl(r,0),r,mn(r,1rl),pl02(r,0,refis(real,0)),satz188m(m0(1rl),0,r,satz169c(m0(1rl),satz176a(1rl,pos1)))):less(mn(r,1rl),r)
-t10:=estii(real,[x:real]less(x,r),mn(r,1rl),t9):in(mn(r,1rl),s11)
--5r205
-r@vb11a:=nonemptyi(real,s11,mn(r,1rl),t10".5r205"):nonempty(real,s11)
-+*5r205
-r@t11:=estii(real,[x:real]moreis(x,r),r,moreisi2(r,r,refis(real,r))):in(r,s12)
--5r205
-r@vb11b:=nonemptyi(real,s12,r,t11".5r205"):nonempty(real,s12)
-+*5r205
-s@[i:in(s,s11)][t:real][j:in(t,s12)]
-t12:=satz172b(s,r,t,estie(real,[x:real]less(x,r),s,i),satz168a(t,r,estie(real,[x:real]moreis(x,r),t,j))):less(s,t)
--5r205
-r@vb12:=[x:real][t:in(x,s11)][y:real][u:in(y,s12)]t12".5r205"(x,t,y,u):all([x:real][t:in(x,s11)]all([y:real][u:in(y,s12)]less(x,y)))
-s@[l:less(s,r)]
-vb13a:=estii(real,[x:real]less(x,r),s,l):in(s,s11)
-s@[m:more(s,r)]
-vb13b:=estii(real,[x:real]moreis(x,r),s,moreisi1(s,r,m)):in(s,s12)
-@2rl:=pl(1rl,1rl):real
-pos2:=pospl(1rl,1rl,pos1,pos1):pos(2rl)
-half:=ov(1rl,2rl,pnot0(2rl,pos2)):real
-poshalf:=posovpp(1rl,2rl,pnot0(2rl,pos2),pos1,pos2):pos(half)
-+*ivr5
-r@t3:=tris(real,pl(r,r),pl(ts(1rl,r),ts(1rl,r)),ts(2rl,r),ispl12(r,ts(1rl,r),r,ts(1rl,r),satz195c(r),satz195c(r)),distpt1(1rl,1rl,r)):is(pl(r,r),ts(2rl,r))
-t4:=tr4is(real,ts(half,pl(r,r)),ts(half,ts(2rl,r)),ts(ts(half,2rl),r),ts(1rl,r),r,ists2(pl(r,r),ts(2rl,r),half,t3),assts2(half,2rl,r),ists1(ts(half,2rl),1rl,r,satz204e(1rl,2rl,pnot0(2rl,pos2))),satz195b(r)):is(ts(half,pl(r,r)),r)
--ivr5
-s@[l:less(r,s)]
-+*ivr5
-l@t5:=satz203k(pl(r,r),pl(r,s),half,satz188m(r,s,r,l),poshalf):less(ts(half,pl(r,r)),ts(half,pl(r,s)))
--ivr5
-l@lemma3:=isless1(ts(half,pl(r,r)),r,ts(half,pl(r,s)),t4".ivr5",t5".ivr5"):less(r,ts(half,pl(r,s)))
-+*ivr5
-l@t6:=satz203k(pl(r,s),pl(s,s),half,satz188f(r,s,s,l),poshalf):less(ts(half,pl(r,s)),ts(half,pl(s,s)))
--ivr5
-l@lemma4:=isless2(ts(half,pl(s,s)),s,ts(half,pl(r,s)),t4".ivr5"(s),t6".ivr5"):less(ts(half,pl(r,s)),s)
-[p:pos(r)]
-lemma5:=satz169b(s,trmore(s,r,0,lemma2(r,s,l),satz169a(r,p))):pos(s)
-@[s1:set(real)][s2:set(real)][p0:all([x:real]or(in(x,s1),in(x,s2)))][p1a:nonempty(real,s1)][p1b:nonempty(real,s2)][p2:all([x:real][t:in(x,s1)]all([y:real][u:in(y,s2)]less(x,y)))]
-+*5r205
-s2@[r:real]
-prop1:=all([x:real][t:less(x,r)]in(x,s1)):'prop'
-prop2:=all([x:real][t:more(x,r)]in(x,s2)):'prop'
-prop3:=and(prop1,prop2):'prop'
-p2@[x:real][y:real][px:prop3(x)][py:prop3(y)][l:less(x,y)]
-mxy:=ts(half,pl(x,y)):real
-t13:=lemma2(x,mxy,lemma3(x,y,l)):more(mxy,x)
-t14:=lemma4(x,y,l):less(mxy,y)
-t15:=<t14><mxy>ande1(prop1(y),prop2(y),py):in(mxy,s1)
-t16:=<t13><mxy>ande2(prop1(x),prop2(x),px):in(mxy,s2)
-t17:=<t16><mxy><t15><mxy>p2:less(mxy,mxy)
-t18:=<refis(real,mxy)>ec3e31(is(mxy,mxy),more(mxy,mxy),less(mxy,mxy),satz167b(mxy,mxy),t17):con
-py@t19:=[t:less(x,y)]t18(t):not(less(x,y))
-t20:=[t:more(x,y)]t18(y,x,py,px,lemma1(x,y,t)):not(more(x,y))
-t21:=or3e1(is(x,y),more(x,y),less(x,y),satz167a(x,y),t20,t19):is(x,y)
-p2@t22:=[x:real][y:real][t:prop3(x)][u:prop3(y)]t21(x,y,t,u):amone(real,[x:real]prop3(x))
-[case1:some([x:real]and(pos(x),in(x,s1)))][r:real][a:and(pos(r),in(r,s1))]
-t23:=ande1(pos(r),in(r,s1),a):pos(r)
-t24:=ande2(pos(r),in(r,s1),a):in(r,s1)
-sc1:=setof(cut,[x:cut]in(pofrp(x),s1)):set(cut)
-sc2:=setof(cut,[x:cut]in(pofrp(x),s2)):set(cut)
-[r0:cut][i:in(pofrp(r0),s1)]
-t25:=estii(cut,[x:cut]in(pofrp(x),s1),r0,i):in"rp"(r0,sc1)
-r0@[i:in"rp"(r0,sc1)]
-t26:=estie(cut,[x:cut]in(pofrp(x),s1),r0,i):in(pofrp(r0),s1)
-r0@[i:in(pofrp(r0),s2)]
-t27:=estii(cut,[x:cut]in(pofrp(x),s2),r0,i):in"rp"(r0,sc2)
-r0@[i:in"rp"(r0,sc2)]
-t28:=estie(cut,[x:cut]in(pofrp(x),s2),r0,i):in(pofrp(r0),s2)
-r0@t29:=th9"l.or"(in(pofrp(r0),s1),in(pofrp(r0),s2),in"rp"(r0,sc1),in"rp"(r0,sc2),<pofrp(r0)>p0,[t:in(pofrp(r0),s1)]t25(t),[t:in(pofrp(r0),s2)]t27(t)):or(in"rp"(r0,sc1),in"rp"(r0,sc2))
-a@pr1:=rpofp(r,t23):cut
-t30:=isp(real,[x:real]in(x,s1),r,pofrp(pr1),t24,isprp1(r,t23)):in(pofrp(pr1),s1)
-t31:=nonemptyi(cut,sc1,pr1,t25(pr1,t30)):nonempty(cut,sc1)
-[s:real][i:in(s,s2)]
-t32:=<i><s><t24><r>p2:less(r,s)
-t33:=lemma5(r,s,t32,t23):pos(s)
-ps1:=rpofp(s,t33):cut
-t34:=isp(real,[x:real]in(x,s2),s,pofrp(ps1),i,isprp1(s,t33)):in(pofrp(ps1),s2)
-t35:=nonemptyi(cut,sc2,ps1,t27(ps1,t34)):nonempty(cut,sc2)
-a@t36:=nonemptyapp(real,s2,p1b,nonempty(cut,sc2),[x:real][t:in(x,s2)]t35(x,t)):nonempty(cut,sc2)
-r0@[i:in"rp"(r0,sc1)][s0:cut][j:in"rp"(s0,sc2)]
-t37:=<t28(s0,j)><pofrp(s0)><t26(r0,i)><pofrp(r0)>p2:less(pofrp(r0),pofrp(s0))
-t38:=lessrpip(r0,s0,t37):less"rp"(r0,s0)
-a@stc:=schnitt(sc1,sc2,[x:cut]t29(x),t31,t36,[x:cut][t:in"rp"(x,sc1)][y:cut][u:in"rp"(y,sc2)]t38(x,t,y,u)):cut
-t39:=satzp205a(sc1,sc2,[x:cut]t29(x),t31,t36,[x:cut][t:in"rp"(x,sc1)][y:cut][u:in"rp"(y,sc2)]t38(x,t,y,u)):all"rp"([x:cut][t:less"rp"(x,stc)]in"rp"(x,sc1))
-t40:=satzp205b(sc1,sc2,[x:cut]t29(x),t31,t36,[x:cut][t:in"rp"(x,sc1)][y:cut][u:in"rp"(y,sc2)]t38(x,t,y,u)):all"rp"([x:cut][t:more"rp"(x,stc)]in"rp"(x,sc2))
-stp:=pofrp(stc):real
-t41:=posi(stc):pos(stp)
-[s:real][l:less(s,stp)][p:pos(s)]
-ps2:=rpofp(s,p):cut
-t42:=lessrpip(ps2,stc,isless1(s,pofrp(ps2),stp,isprp1(s,p),l)):less"rp"(ps2,stc)
-t43:=<t42><ps2>t39:in"rp"(ps2,sc1)
-t44:=isp(real,[x:real]in(x,s1),pofrp(ps2),s,t26(ps2,t43),isprp2(s,p)):in(s,s1)
-l@[n:not(pos(s))][i:in(s,s2)]
-t45:=<i><s><t24><r>p2:less(r,s)
-t46:=<lemma5(r,s,t45,t23)>n:con
-n@t47:=ore1(in(s,s1),in(s,s2),<s>p0,[t:in(s,s2)]t46(t)):in(s,s1)
-l@t48:=th1"l.imp"(pos(s),in(s,s1),[t:pos(s)]t44(t),[t:not(pos(s))]t47(t)):in(s,s1)
-s@[m:more(s,stp)]
-t49:=lemma5(stp,s,lemma1(s,stp,m),t41):pos(s)
-ps3:=rpofp(s,t49):cut
-t50:=morerpip(ps3,stc,ismore1(s,pofrp(ps3),stp,isprp1(s,t49),m)):more"rp"(ps3,stc)
-t51:=<t50><ps3>t40:in"rp"(ps3,sc2)
-t52:=isp(real,[x:real]in(x,s2),pofrp(ps3),s,t28(ps3,t51),isprp2(s,t49)):in(s,s2)
-a@t53:=andi(prop1(stp),prop2(stp),[x:real][t:less(x,stp)]t48(x,t),[x:real][t:more(x,stp)]t52(x,t)):prop3(stp)
-t54:=somei(real,[x:real]prop3(x),stp,t53):some([x:real]prop3(x))
-case1@t55:=someapp(real,[x:real]and(pos(x),in(x,s1)),case1,some([x:real]prop3(x)),[x:real][t:and(pos(x),in(x,s1))]t54(x,t)):some([x:real]prop3(x))
-p2@[case2:some([x:real]and(neg(x),in(x,s2)))]
-sp1:=setof(real,[x:real]in(m0(x),s1)):set(real)
-sp2:=setof(real,[x:real]in(m0(x),s2)):set(real)
-[r:real][i:in(m0(r),s1)]
-t56:=estii(real,[x:real]in(m0(x),s1),r,i):in(r,sp1)
-r@[i:in(r,sp1)]
-t57:=estie(real,[x:real]in(m0(x),s1),r,i):in(m0(r),s1)
-r@[i:in(m0(r),s2)]
-t58:=estii(real,[x:real]in(m0(x),s2),r,i):in(r,sp2)
-r@[i:in(r,sp2)]
-t59:=estie(real,[x:real]in(m0(x),s2),r,i):in(m0(r),s2)
-r@t60:=comor(in(r,sp1),in(r,sp2),th9"l.or"(in(m0(r),s1),in(m0(r),s2),in(r,sp1),in(r,sp2),<m0(r)>p0,[t:in(m0(r),s1)]t56(t),[t:in(m0(r),s2)]t58(t))):or(in(r,sp2),in(r,sp1))
-[i:in(r,s2)]
-t61:=t58(m0(r),isp(real,[x:real]in(x,s2),r,m0(m0(r)),i,satz177a(r))):in(m0(r),sp2)
-t62:=nonemptyi(real,sp2,m0(r),t61):nonempty(real,sp2)
-case2@t63:=nonemptyapp(real,s2,p1b,nonempty(real,sp2),[x:real][t:in(x,s2)]t62(x,t)):nonempty(real,sp2)
-r@[i:in(r,s1)]
-t64:=t56(m0(r),isp(real,[x:real]in(x,s1),r,m0(m0(r)),i,satz177a(r))):in(m0(r),sp1)
-t65:=nonemptyi(real,sp1,m0(r),t64):nonempty(real,sp1)
-case2@t66:=nonemptyapp(real,s1,p1a,nonempty(real,sp1),[x:real][t:in(x,s1)]t65(x,t)):nonempty(real,sp1)
-r@[i:in(r,sp2)][s:real][j:in(s,sp1)]
-t67:=<t59(r,i)><m0(r)><t57(s,j)><m0(s)>p2:less(m0(s),m0(r))
-t68:=lemma1(s,r,satz183d(s,r,t67)):less(r,s)
-r@[a:and(neg(r),in(r,s2))]
-t69:=satz176c(r,ande1(neg(r),in(r,s2),a)):pos(m0(r))
-t70:=isp(real,[x:real]in(x,s2),r,m0(m0(r)),ande2(neg(r),in(r,s2),a),satz177a(r)):in(m0(m0(r)),s2)
-t71:=andi(pos(m0(r)),in(m0(r),sp2),t69,t58(m0(r),t70)):and(pos(m0(r)),in(m0(r),sp2))
-t72:=somei(real,[x:real]and(pos(x),in(x,sp2)),m0(r),t71):some([x:real]and(pos(x),in(x,sp2)))
-case2@t73:=someapp(real,[x:real]and(neg(x),in(x,s2)),case2,some([x:real]and(pos(x),in(x,sp2))),[x:real][t:and(neg(x),in(x,s2))]t72(x,t)):some([x:real]and(pos(x),in(x,sp2)))
-t74:=t55(sp2,sp1,[x:real]t60(x),t63,t66,[x:real][t:in(x,sp2)][y:real][u:in(y,sp1)]t68(x,t,y,u),t73):some([x:real]prop3(sp2,sp1,x))
-[r:real][p:prop3(sp2,sp1,r)][s:real][l:less(s,m0(r))]
-t75:=ismore2(m0(m0(r)),r,m0(s),satz177(r),satz183c(s,m0(r),l)):more(m0(s),r)
-t76:=<t75><m0(s)>ande2(prop1(sp2,sp1,r),prop2(sp2,sp1,r),p):in(m0(s),sp1)
-t77:=isp(real,[x:real]in(x,s1),m0(m0(s)),s,t57(m0(s),t76),satz177(s)):in(s,s1)
-s@[m:more(s,m0(r))]
-t78:=isless2(m0(m0(r)),r,m0(s),satz177(r),satz183a(s,m0(r),m)):less(m0(s),r)
-t79:=<t78><m0(s)>ande1(prop1(sp2,sp1,r),prop2(sp2,sp1,r),p):in(m0(s),sp2)
-t80:=isp(real,[x:real]in(x,s2),m0(m0(s)),s,t59(m0(s),t79),satz177(s)):in(s,s2)
-p@t81:=andi(prop1(m0(r)),prop2(m0(r)),[x:real][t:less(x,m0(r))]t77(x,t),[x:real][t:more(x,m0(r))]t80(x,t)):prop3(m0(r))
-t82:=somei(real,[x:real]prop3(x),m0(r),t81):some([x:real]prop3(x))
-case2@t83:=someapp(real,[x:real]prop3(sp2,sp1,x),t74,some([x:real]prop3(x)),[x:real][t:prop3(sp2,sp1,x)]t82(x,t)):some([x:real]prop3(x))
-p2@[notcase1:not(some([x:real]and(pos(x),in(x,s1))))][notcase2:not(some([x:real]and(neg(x),in(x,s2))))][r:real][l:less(r,0)]
-t84:=th4"l.some"(real,[x:real]and(neg(x),in(x,s2)),notcase2,r):not(and(neg(r),in(r,s2)))
-t85:=th3"l.and"(neg(r),in(r,s2),t84,satz169d(r,l)):not(in(r,s2))
-t86:=ore1(in(r,s1),in(r,s2),<r>p0,t85):in(r,s1)
-r@[m:more(r,0)]
-t87:=th4"l.some"(real,[x:real]and(pos(x),in(x,s1)),notcase1,r):not(and(pos(r),in(r,s1)))
-t88:=th3"l.and"(pos(r),in(r,s1),t87,satz169b(r,m)):not(in(r,s1))
-t89:=ore2(in(r,s1),in(r,s2),<r>p0,t88):in(r,s2)
-notcase2@t90:=andi(prop1(0),prop2(0),[x:real][t:less(x,0)]t86(x,t),[x:real][t:more(x,0)]t89(x,t)):prop3(0)
-t91:=somei(real,[x:real]prop3(x),0,t90):some([x:real]prop3(x))
-notcase1@t92:=th1"l.imp"(some([x:real]and(neg(x),in(x,s2))),some([x:real]prop3(x)),[t:some([x:real]and(neg(x),in(x,s2)))]t83(t),[t:not(some([x:real]and(neg(x),in(x,s2))))]t91(t)):some([x:real]prop3(x))
-p2@t93:=th1"l.imp"(some([x:real]and(pos(x),in(x,s1))),some([x:real]prop3(x)),[t:some([x:real]and(pos(x),in(x,s1)))]t55(t),[t:not(some([x:real]and(pos(x),in(x,s1))))]t92(t)):some([x:real]prop3(x))
-t94:=onei(real,[x:real]prop3(x),t22,t93):one([x:real]prop3(x))
--5r205
-p2@satz205:=t94".5r205":one([x:real]and(all([y:real][t:less(y,x)]in(y,s1)),all([y:real][t:more(y,x)]in(y,s2))))
-dedekind:=satz205:one([x:real]and(all([y:real][t:less(y,x)]in(y,s1)),all([y:real][t:more(y,x)]in(y,s2))))
-schnitt:=ind(real,[x:real]prop3".5r205"(x),satz205):real
-[r:real][l:less(r,schnitt)]
-satz205a:=<l><r>ande1(prop1".5r205"(schnitt),prop2".5r205"(schnitt),oneax(real,[x:real]prop3".5r205"(x),satz205)):in(r,s1)
-r@[m:more(r,schnitt)]
-satz205b:=<m><r>ande2(prop1".5r205"(schnitt),prop2".5r205"(schnitt),oneax(real,[x:real]prop3".5r205"(x),satz205)):in(r,s2)
-@[r0:cut][s0:cut]
-+iva
-dr:=pdofrp(r0):dif
-ds:=pdofrp(s0):dif
-t1:=lemmaivad1(r0,s0):eq"rp"(pd(dr,ds),pdofrp(pl"rp"(r0,s0)))
--iva
-lemmaiva1:=isin(pl(pofrp(r0),pofrp(s0)),pofrp(pl"rp"(r0,s0)),pd(pdofrp(r0),pdofrp(s0)),pdofrp(pl"rp"(r0,s0)),picp(pofrp(r0),pofrp(s0),pdofrp(r0),pdofrp(s0),innclass(pdofrp(r0)),innclass(pdofrp(s0))),innclass(pdofrp(pl"rp"(r0,s0))),t1".iva"):is(pl(pofrp(r0),pofrp(s0)),pofrp(pl"rp"(r0,s0)))
-+*iva
-s0@t2:=lemmaivad2(r0,s0):eq"rp"(td(dr,ds),pdofrp(ts"rp"(r0,s0)))
--iva
-s0@lemmaiva2:=isin(ts(pofrp(r0),pofrp(s0)),pofrp(ts"rp"(r0,s0)),td(pdofrp(r0),pdofrp(s0)),pdofrp(ts"rp"(r0,s0)),tict(pofrp(r0),pofrp(s0),pdofrp(r0),pdofrp(s0),innclass(pdofrp(r0)),innclass(pdofrp(s0))),innclass(pdofrp(ts"rp"(r0,s0))),t2".iva"):is(ts(pofrp(r0),pofrp(s0)),pofrp(ts"rp"(r0,s0)))
-[m:more(pofrp(r0),pofrp(s0))]
-+*iva
-m@t3:=moreex(pofrp(r0),pofrp(s0),dr,ds,innclass(dr),innclass(ds),m):mored(dr,ds)
--iva
-m@lemmaiva3:=lemmaivad3(r0,s0,t3".iva"):more"rp"(r0,s0)
-s0@[m:more"rp"(r0,s0)]
-+*iva
-m@[l:less(pofrp(r0),pofrp(s0))]
-t4:=satz121(s0,r0,lemmaiva3(s0,r0,lemma2(pofrp(r0),pofrp(s0),l))):less"rp"(r0,s0)
-m@t5:=ec3e23(is"rp"(r0,s0),more"rp"(r0,s0),less"rp"(r0,s0),satz123b(r0,s0),m):not(less"rp"(r0,s0))
-t6:=th3"l.imp"(less(pofrp(r0),pofrp(s0)),less"rp"(r0,s0),t5,[t:less(pofrp(r0),pofrp(s0))]t4(t)):not(less(pofrp(r0),pofrp(s0)))
-t7:=ec3e21(is"rp"(r0,s0),more"rp"(r0,s0),less"rp"(r0,s0),satz123b(r0,s0),m):nis"rp"(r0,s0)
-t8:=th3"l.imp"(is(pofrp(r0),pofrp(s0)),is"rp"(r0,s0),t7,[t:is(pofrp(r0),pofrp(s0))]isrpip(r0,s0,t)):nis(pofrp(r0),pofrp(s0))
--iva
-m@lemmaiva4:=or3e2(is(pofrp(r0),pofrp(s0)),more(pofrp(r0),pofrp(s0)),less(pofrp(r0),pofrp(s0)),satz167a(pofrp(r0),pofrp(s0)),t6".iva",t8".iva"):more(pofrp(r0),pofrp(s0))
-@[x:nat][y:nat][m:more(rlofnt(x),rlofnt(y))]
-+*iva
-m@t9:=lemmaiva3(rpofnt(x),rpofnt(y),m):more"rp"(rpofnt(x),rpofnt(y))
-t10:=satz154d(rtofn(x),rtofn(y),t9):more"rt"(rtofn(x),rtofn(y))
-t11:=moree"rt"(rtofn(x),rtofn(y),fr(x,1),fr(y,1),inclass"rt"(fr(x,1)),inclass"rt"(fr(y,1)),t10):moref(fr(x,1),fr(y,1))
--iva
-m@lemmaiva5:=satz111a(x,y,t11".iva"):more"n"(x,y)
-y@[m:more"n"(x,y)]
-+*iva
-m@t12:=satz111d(x,y,m):moref(fr(x,1),fr(y,1))
-t13:=morei"rt"(rtofn(x),rtofn(y),fr(x,1),fr(y,1),inclass"rt"(fr(x,1)),inclass"rt"(fr(y,1)),t12):more"rt"(rtofn(x),rtofn(y))
-t14:=satz154a(rtofn(x),rtofn(y),t13):more"rp"(rpofnt(x),rpofnt(y))
--iva
-m@lemmaiva6:=lemmaiva4(rpofnt(x),rpofnt(y),t14".iva"):more(rlofnt(x),rlofnt(y))
-@[r:real]
-+int
-a0ir@[i:intrl(r)]
-t1:=intabsd(a0,intrlex(r,a0,a0ir,i)):intd(absd(a0))
-t2:=intrlin(abs(r),absd(a0),aica,t1):intrl(abs(r))
--int
-[i:intrl(r)]
-intabs:=realapp1(r,intrl(abs(r)),[x:dif][t:inn(x,class(r))]t2".int"(r,x,t,i)):intrl(abs(r))
-+*int
-i@t3:=intm0d(a0,intrlex(r,a0,a0ir,i)):intd(m0d(a0))
-t4:=intrlin(m0(r),m0d(a0),micm0,t3):intrl(m0(r))
--int
-i@intm0:=realapp1(r,intrl(m0(r)),[x:dif][t:inn(x,class(r))]t4".int"(r,x,t,i)):intrl(m0(r))
-+*int
-b1is@[i:intrl(r)][j:intrl(s)]
-t5:=intpd(a1,b1,intrlex(r,a1,a1ir,i),intrlex(s,b1,b1is,j)):intd(pd(a1,b1))
-t6:=intrlin(pl(r,s),pd(a1,b1),picp,t5):intrl(pl(r,s))
--int
-i@[s:real][j:intrl(s)]
-intpl:=realapp2(r,s,intrl(pl(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".int"(r,s,x,y,t,u,i,j)):intrl(pl(r,s))
-intmn:=intpl(r,i,m0(s),intm0(s,j)):intrl(mn(r,s))
-+*int
-j@t7:=inttd(a1,b1,intrlex(r,a1,a1ir,i),intrlex(s,b1,b1is,j)):intd(td(a1,b1))
-t8:=intrlin(ts(r,s),td(a1,b1),tict,t7):intrl(ts(r,s))
--int
-j@intts:=realapp2(r,s,intrl(ts(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t8".int"(r,s,x,y,t,u,i,j)):intrl(ts(r,s))
-r@[n:natrl(r)]
-+ivr24
-t1:=satz24a(ntofrl(r,n)):lessis"n"(1,ntofrl(r,n))
-t2:=th3"l.imp"(more(1rl,r),more"n"(1,ntofrl(r,n)),satz10d(1,ntofrl(r,n),t1),[t:more(1rl,r)]lemmaiva5(1,ntofrl(r,n),ismore2(r,rlofnt(ntofrl(r,n)),1rl,isrlnt1(r,n),t))):not(more(1rl,r))
--ivr24
-satzr24:=satz167e(1rl,r,t2".ivr24"):lessis(1rl,r)
-r@[i:intrl(r)][s:real][j:intrl(s)][l:less(r,s)]
-+ivr25
-t1:=satz182d(s,r,lemma2(r,s,l)):pos(mn(s,r))
-t2:=intmn(s,j,r,i):intrl(mn(s,r))
-t3:=posintnatrl(mn(s,r),t1,t2):natrl(mn(s,r))
-t4:=satzr24(mn(s,r),t3):lessis(1rl,mn(s,r))
-t5:=th9"l.or"(less(1rl,mn(s,r)),is(1rl,mn(s,r)),less(pl(1rl,r),pl(mn(s,r),r)),is(pl(1rl,r),pl(mn(s,r),r)),t4,[t:less(1rl,mn(s,r))]satz188f(1rl,mn(s,r),r,t),[t:is(1rl,mn(s,r))]ispl1(1rl,mn(s,r),r,t)):lessis(pl(1rl,r),pl(mn(s,r),r))
--ivr25
-satzr25:=islessis12(pl(1rl,r),pl(r,1rl),pl(mn(s,r),r),s,compl(1rl,r),plmn(s,r),t5".ivr25"):lessis(pl(r,1rl),s)
-@[x:nat][y:nat]
-+ivr155
-t1:=lemmaiva1(rpofnt(x),rpofnt(y)):is(pl(rlofnt(x),rlofnt(y)),pofrp(pl"rp"(rpofnt(x),rpofnt(y))))
-t2:=isrpep(rpofnt(pl"n"(x,y)),pl"rp"(rpofnt(x),rpofnt(y)),satz155e(x,y)):is(rlofnt(pl"n"(x,y)),pofrp(pl"rp"(rpofnt(x),rpofnt(y))))
--ivr155
-satzr155a:=tris2(real,rlofnt(pl"n"(x,y)),pl(rlofnt(x),rlofnt(y)),pofrp(pl"rp"(rpofnt(x),rpofnt(y))),t2".ivr155",t1".ivr155"):is(rlofnt(pl"n"(x,y)),pl(rlofnt(x),rlofnt(y)))
-satzr155b:=symis(real,rlofnt(pl"n"(x,y)),pl(rlofnt(x),rlofnt(y)),satzr155a):is(pl(rlofnt(x),rlofnt(y)),rlofnt(pl"n"(x,y)))
-+*ivr155
-y@t3:=lemmaiva2(rpofnt(x),rpofnt(y)):is(ts(rlofnt(x),rlofnt(y)),pofrp(ts"rp"(rpofnt(x),rpofnt(y))))
-t4:=isrpep(rpofnt(ts"n"(x,y)),ts"rp"(rpofnt(x),rpofnt(y)),satz155f(x,y)):is(rlofnt(ts"n"(x,y)),pofrp(ts"rp"(rpofnt(x),rpofnt(y))))
--ivr155
-y@satzr155c:=tris2(real,rlofnt(ts"n"(x,y)),ts(rlofnt(x),rlofnt(y)),pofrp(ts"rp"(rpofnt(x),rpofnt(y))),t4".ivr155",t3".ivr155"):is(rlofnt(ts"n"(x,y)),ts(rlofnt(x),rlofnt(y)))
-satzr155d:=symis(real,rlofnt(ts"n"(x,y)),ts(rlofnt(x),rlofnt(y)),satzr155c):is(ts(rlofnt(x),rlofnt(y)),rlofnt(ts"n"(x,y)))
-@[t:real][r:real][s:real][a:and(not(neg(r)),is(ts(r,r),t))][b:and(not(neg(s)),is(ts(s,s),t))]
-+7r161
-[c0:dif][cit:inn(c0,class(t))][a0:dif][air:inn(a0,class(r))][b0:dif][bis:inn(b0,class(s))]
-t1:=th3"l.imp"(negd(a0),neg(r),ande1(not(neg(r)),is(ts(r,r),t),a),[u:negd(a0)]negin(r,a0,air,u)):not(negd(a0))
-t2:=th3"l.imp"(negd(b0),neg(s),ande1(not(neg(s)),is(ts(s,s),t),b),[u:negd(b0)]negin(s,b0,bis,u)):not(negd(b0))
-t3:=isex(ts(r,r),t,td(a0,a0),c0,tict(r,r,a0,a0,air,air),cit,ande2(not(neg(r)),is(ts(r,r),t),a)):eq"rp"(td(a0,a0),c0)
-t4:=isex(ts(s,s),t,td(b0,b0),c0,tict(s,s,b0,b0,bis,bis),cit,ande2(not(neg(s)),is(ts(s,s),t),b)):eq"rp"(td(b0,b0),c0)
-t5:=isin(r,s,a0,b0,air,bis,satzd161b(c0,a0,b0,t1,t2,t3,t4)):is(r,s)
--7r161
-satzr161b:=realapp3(t,r,s,is(r,s),[x:dif][y:dif][z:dif][u:inn(x,class(t))][v:inn(y,class(r))][w:inn(z,class(s))]t5".7r161"(x,u,y,v,z,w)):is(r,s)
-t@[n:not(neg(t))]
-+*7r161
-n@[c0:dif][cit:inn(c0,class(t))]
-t6:=th3"l.imp"(negd(c0),neg(t),n,[u:negd(c0)]negin(t,c0,cit,u)):not(negd(c0))
-[a0:dif][a:and(not(negd(a0)),eq"rp"(td(a0,a0),c0))]
-ar:=realof(a0):real
-t7:=th3"l.imp"(neg(ar),negd(a0),ande1(not(negd(a0)),eq"rp"(td(a0,a0),c0),a),[u:neg(ar)]negex(ar,a0,innclass(a0),u)):not(neg(ar))
-t8:=isin(ts(ar,ar),t,td(a0,a0),c0,tict(ar,ar,a0,a0,innclass(a0),innclass(a0)),cit,ande2(not(negd(a0)),eq"rp"(td(a0,a0),c0),a)):is(ts(ar,ar),t)
-t9:=andi(not(neg(ar)),is(ts(ar,ar),t),t7,t8):and(not(neg(ar)),is(ts(ar,ar),t))
-t10:=somei(real,[u:real]and(not(neg(u)),is(ts(u,u),t)),ar,t9):some([u:real]and(not(neg(u)),is(ts(u,u),t)))
-cit@t11:=someapp(dif,[x:dif]and(not(negd(x)),eq"rp"(td(x,x),c0)),satzd161a(c0,t6),some([u:real]and(not(neg(u)),is(ts(u,u),t))),[x:dif][v:and(not(negd(x)),eq"rp"(td(x,x),c0))]t10(x,v)):some([u:real]and(not(neg(u)),is(ts(u,u),t)))
--7r161
-n@satzr161a:=realapp1(t,some([u:real]and(not(neg(u)),is(ts(u,u),t))),[x:dif][v:inn(x,class(t))]t11".7r161"(x,v)):some([u:real]and(not(neg(u)),is(ts(u,u),t)))
-satzr161:=onei(real,[u:real]and(not(neg(u)),is(ts(u,u),t)),[u:real][v:real][a:and(not(neg(u)),is(ts(u,u),t))][b:and(not(neg(v)),is(ts(v,v),t))]satzr161b(u,v,a,b),satzr161a):one([u:real]and(not(neg(u)),is(ts(u,u),t)))
-sqrt:=ind(real,[u:real]and(not(neg(u)),is(ts(u,u),t)),satzr161):real
-+*7r161
-n@t12:=oneax(real,[u:real]and(not(neg(u)),is(ts(u,u),t)),satzr161):and(not(neg(sqrt)),is(ts(sqrt,sqrt),t))
--7r161
-n@thsqrt1a:=ande1(not(neg(sqrt)),is(ts(sqrt,sqrt),t),t12".7r161"):not(neg(sqrt))
-thsqrt1b:=ande2(not(neg(sqrt)),is(ts(sqrt,sqrt),t),t12".7r161"):is(ts(sqrt,sqrt),t)
-[x:real][o:not(neg(x))][i:is(ts(x,x),t)]
-thsqrt2:=satzr161b(x,sqrt,andi(not(neg(x)),is(ts(x,x),t),o,i),t12".7r161"):is(x,sqrt(t,n))
-o@[i:is(t,ts(x,x))]
-thsqrt3:=symis(real,x,sqrt(t,n),thsqrt2(symis(real,t,ts(x,x),i))):is(sqrt(t,n),x)
-@[r:real][s:real][n:not(neg(r))][o:not(neg(s))][i:is(r,s)]
-issqrt:=thsqrt2(s,o,sqrt(r,n),thsqrt1a(r,n),tris(real,ts(sqrt(r,n),sqrt(r,n)),r,s,thsqrt1b(r,n),i)):is(sqrt(r,n),sqrt(s,o))
-r@[n:not(neg(r))][i:is(r,0)]
-sqrt0:=thsqrt3(r,n,0,0notn(0,refis(real,0)),tris2(real,r,ts(0,0),0,i,ts01(0,0,refis(real,0)))):is(sqrt(r,n),0)
-n@[o:nis(r,0)]
-+sqrt
-t1:=th3"l.imp"(is(sqrt(r,n),0),is(r,0),o,[t:is(sqrt(r,n),0)]tris1(real,r,0,ts(sqrt(r,n),sqrt(r,n)),thsqrt1b(r,n),ts01(sqrt(r,n),sqrt(r,n),t))):nis(sqrt(r,n),0)
--sqrt
-sqrtnot0:=or3e2(is(sqrt(r,n),0),pos(sqrt(r,n)),neg(sqrt(r,n)),axrlo(sqrt(r,n)),thsqrt1a(r,n),t1".sqrt"):pos(sqrt(r,n))
-@[r:real][s:real][t:real][n:nis(t,0)]
-+v0
-t1:=tr3is(real,ts(t,ts(r,ov(s,t,n))),ts(ts(r,ov(s,t,n)),t),ts(r,ts(ov(s,t,n),t)),ts(r,s),comts(t,ts(r,ov(s,t,n))),assts1(r,ov(s,t,n),t),ists2(ts(ov(s,t,n),t),s,r,satz204e(s,t,n))):is(ts(t,ts(r,ov(s,t,n))),ts(r,s))
--v0
-lemma6:=satz204g(ts(r,s),t,ts(r,ov(s,t,n)),n,t1".v0"):is(ts(r,ov(s,t,n)),ov(ts(r,s),t,n))
-+*v0
-n@t2:=tris(real,ts(t,pl(ov(r,t,n),ov(s,t,n))),pl(ts(t,ov(r,t,n)),ts(t,ov(s,t,n))),pl(r,s),disttp2(t,ov(r,t,n),ov(s,t,n)),ispl12(ts(t,ov(r,t,n)),r,ts(t,ov(s,t,n)),s,satz204c(r,t,n),satz204c(s,t,n))):is(ts(t,pl(ov(r,t,n),ov(s,t,n))),pl(r,s))
--v0
-n@lemma7:=satz204g(pl(r,s),t,pl(ov(r,t,n),ov(s,t,n)),n,t2".v0"):is(pl(ov(r,t,n),ov(s,t,n)),ov(pl(r,s),t,n))
-r@[n:nis(r,0)]
-lemma8:=satz204b(r,r,n,ov(r,r,n),1rl,satz204c(r,r,n),satz195(r)):is(ov(r,r,n),1rl)
-lemma9:=ore2(is(r,0),is(ov(0,r,n),0),satz192c(r,ov(0,r,n),satz204c(0,r,n)),n):is(ov(0,r,n),0)
-r@[i:is(r,m0(r))]
-+*v0
-i@[p:pos(m0(r))]
-t3:=<isneg(r,m0(r),i,satz176f(r,p))>pnotn(m0(r),p):con
-i@[n:neg(m0(r))]
-t4:=<ispos(r,m0(r),i,satz176d(r,n))>nnotp(m0(r),n):con
--v0
-i@lemma10:=satz176e(r,or3e1(is(m0(r),0),pos(m0(r)),neg(m0(r)),axrlo(m0(r)),[t:pos(m0(r))]t3".v0"(t),[t:neg(m0(r))]t4".v0"(t))):is(r,0)
-r@lemma11:=satz167f(ts(r,r),0,th3"l.imp"(less(ts(r,r),0),neg(ts(r,r)),nnegsq(r),[t:less(ts(r,r),0)]satz169d(ts(r,r),t))):moreis(ts(r,r),0)
-lemma12:=rapp(r,is(ts(r,r),ts(abs(r),abs(r))),[t:pos(r)]satz196a(r,r,t,t),[t:is(r,0)]tris2(real,ts(r,r),ts(abs(r),abs(r)),0,ts01(r,r,t),ts01(abs(r),abs(r),abs0(r,t))),[t:neg(r)]satz196b(r,r,t,t)):is(ts(r,r),ts(abs(r),abs(r)))
-@[x:real][ix:intrl(x)][y:real][iy:intrl(y)][ly:lessis(y,x)]
-+shift
-t1:=satz190a(x,x,1rl,0,moreisi2(x,x,refis(real,x)),satz169a(1rl,natpos(1rl,natrl1))):more(pl(x,1rl),pl(x,0))
-t2:=ismore2(pl(x,0),x,pl(x,1rl),pl02(x,0,refis(real,0)),t1):more(pl(x,1rl),x)
-t3:=satz172d(pl(x,1rl),x,y,t2,satz168b(y,x,ly)):more(pl(x,1rl),y)
-t4:=satz182d(pl(x,1rl),y,t3):pos(mn(pl(x,1rl),y))
-t5:=intmn(pl(x,1rl),intpl(x,ix,1rl,intrl1),y,iy):intrl(mn(pl(x,1rl),y))
-t6:=posintnatrl(mn(pl(x,1rl),y),t4,t5):natrl(mn(pl(x,1rl),y))
--shift
-shiftl:=ntofrl(mn(pl(x,1rl),y),t6".shift"):nat
-[n:1to(shiftl)]
-+*shift
-n@n1:=inn"n"(shiftl,n):nat
-t7:=1top(shiftl,n):lessis"n"(n1,shiftl)
-n2:=rlofnt(n1):real
-t8:=natintrl(n2,natrli(n1)):intrl(n2)
--shift
-n@shiftr:=mn(pl(n2".shift",y),1rl):real
-intshiftr:=intmn(pl(n2".shift",y),intpl(n2".shift",t8".shift",y,iy),1rl,intrl1):intrl(shiftr)
-[m:1to(shiftl)][i:is(shiftr(n),shiftr(m))]
-+*shift
-n@t8a:=tris(real,mn(pl(shiftr(n),1rl),y),mn(pl(n2,y),y),n2,ismn1(pl(mn(pl(n2,y),1rl),1rl),pl(n2,y),y,plmn(pl(n2,y),1rl)),mnpl(n2,y)):is(mn(pl(shiftr(n),1rl),y),n2)
-i@t9a:=ismn1(pl(shiftr(n),1rl),pl(shiftr(m),1rl),y,ispl1(shiftr(n),shiftr(m),1rl,i)):is(mn(pl(shiftr(n),1rl),y),mn(pl(shiftr(m),1rl),y))
-t10a:=tr3is(real,n2(n),mn(pl(shiftr(n),1rl),y),mn(pl(shiftr(m),1rl),y),n2(m),symis(real,mn(pl(shiftr(n),1rl),y),n2,t8a),t9a,t8a(m)):is(n2(n),n2(m))
-t11a:=isntirl(n1(n),n1(m),t10a):is"n"(n1(n),n1(m))
--shift
-i@iseshiftr:=isinne(shiftl,n,m,t11a".shift"):is"e"(1to(shiftl),n,m)
-+*shift
-n@[m:more(shiftr,x)]
-t9:=satz188d(shiftr,x,1rl,m):more(pl(shiftr,1rl),pl(x,1rl))
-t10:=ismore1(pl(shiftr,1rl),pl(n2,y),pl(x,1rl),plmn(pl(n2,y),1rl),t9):more(pl(n2,y),pl(x,1rl))
-t11:=satz188d(pl(n2,y),pl(x,1rl),m0(y),t10):more(mn(pl(n2,y),y),mn(pl(x,1rl),y))
-t12:=ismore1(mn(pl(n2,y),y),n2,mn(pl(x,1rl),y),mnpl(n2,y),t11):more(n2,mn(pl(x,1rl),y))
-t13:=ismore12(n2,rlofnt(ntofrl(n2,natrli(n1))),mn(pl(x,1rl),y),rlofnt(ntofrl(mn(pl(x,1rl),y),t6)),isrlnt1(n2,natrli(n1)),isrlnt1(mn(pl(x,1rl),y),t6),t12):more(rlofnt(ntofrl(n2,natrli(n1))),rlofnt(shiftl))
-t14:=lemmaiva5(ntofrl(n2,natrli(n1)),shiftl,t13):more"n"(ntofrl(n2,natrli(n1)),shiftl)
-t15:=ismore1"n"(ntofrl(n2,natrli(n1)),n1,shiftl,isntrl2(n1),t14):more"n"(n1,shiftl)
-n@t16:=th3"l.imp"(more(shiftr,x),more"n"(n1,shiftl),satz10d(n1,shiftl,t7),[t:more(shiftr,x)]t15(t)):not(more(shiftr,x))
--shift
-n@shiftrls:=satz167e(shiftr,x,t16".shift"):lessis(shiftr,x)
-+*shift
-n@[m:more(y,shiftr)]
-t17:=satz188d(y,shiftr,1rl,m):more(pl(y,1rl),pl(shiftr,1rl))
-t18:=ismore12(pl(y,1rl),pl(1rl,y),pl(shiftr,1rl),pl(n2,y),compl(y,1rl),plmn(pl(n2,y),1rl),t17):more(pl(1rl,y),pl(n2,y))
-t19:=satz188a(1rl,n2,y,t18):more(1rl,n2)
-t20:=lemmaiva5(1,n1,t19):more"n"(1,n1)
-n@t21:=th3"l.imp"(more(y,shiftr),more"n"(1,n1),satz10d(1,n1,satz24a(n1)),[t:more(y,shiftr)]t20(t)):not(more(y,shiftr))
--shift
-n@lsshiftr:=satz167e(y,shiftr,t21".shift"):lessis(y,shiftr)
-ly@[u:real][a:and3(intrl(u),lessis(y,u),lessis(u,x))]
-+*shift
-a@t22:=and3e1(intrl(u),lessis(y,u),lessis(u,x),a):intrl(u)
-t23:=and3e2(intrl(u),lessis(y,u),lessis(u,x),a):lessis(y,u)
-t24:=and3e3(intrl(u),lessis(y,u),lessis(u,x),a):lessis(u,x)
-[l:less(u,x)]
-t25:=satz188f(pl(u,1rl),pl(x,1rl),m0"r"(y),satz188f(u,x,1rl,l)):less(mn(pl(u,1rl),y),mn(pl(x,1rl),y))
-a@[i:is(u,x)]
-t26:=ismn1(pl(u,1rl),pl(x,1rl),y,ispl1(u,x,1rl,i)):is(mn(pl(u,1rl),y),mn(pl(x,1rl),y))
-a@t27:=th9"l.or"(less(u,x),is(u,x),less(mn(pl(u,1rl),y),mn(pl(x,1rl),y)),is(mn(pl(u,1rl),y),mn(pl(x,1rl),y)),t24,[t:less(u,x)]t25(t),[t:is(u,x)]t26(t)):lessis(mn(pl(u,1rl),y),mn(pl(x,1rl),y))
-ul:=shiftl(u,t22,y,iy,t23):nat
-t28:=islessis12(mn(pl(u,1rl),y),rlofnt(ul),mn(pl(x,1rl),y),rlofnt(shiftl),isrlnt1(mn(pl(u,1rl),y),t6(u,t22,y,iy,t23)),isrlnt1(mn(pl(x,1rl),y),t6),t27):lessis(rlofnt(ul),rlofnt(shiftl))
-t29:=th3"l.imp"(more"n"(ul,shiftl),more(rlofnt(ul),rlofnt(shiftl)),satz167d(rlofnt(ul),rlofnt(shiftl),t28),[t:more"n"(ul,shiftl)]lemmaiva6(ul,shiftl,t)):not(more"n"(ul,shiftl))
-t30:=satz10e(ul,shiftl,t29):lessis"n"(ul,shiftl)
--shift
-a@shiftl1:=outn(shiftl,ul".shift",t30".shift"):1to(shiftl)
-+*shift
-a@t31:=isinoutn(shiftl,ul,t30):is"n"(ul,n1(shiftl1))
-t32:=tris(real,mn(pl(u,1rl),y),rlofnt(ul),n2(shiftl1),isrlnt1(mn(pl(u,1rl),y),t6(u,t22,y,iy,t23)),isnterl(ul,n1(shiftl1),t31)):is(mn(pl(u,1rl),y),n2(shiftl1))
-t33:=tris(real,mn(pl(mn(pl(u,1rl),y),y),1rl),mn(pl(u,1rl),1rl),u,ismn1(pl(mn(pl(u,1rl),y),y),pl(u,1rl),1rl,plmn(pl(u,1rl),y)),mnpl(u,1rl)):is(mn(pl(mn(pl(u,1rl),y),y),1rl),u)
--shift
-a@shiftinv1:=tris1(real,u,shiftr(shiftl1),mn(pl(mn(pl(u,1rl),y),y),1rl),t33".shift",ismn1(pl(mn(pl(u,1rl),y),y),pl(n2".shift"(shiftl1),y),1rl,ispl1(mn(pl(u,1rl),y),n2".shift"(shiftl1),y,t32".shift"))):is(u,shiftr(shiftl1))
-shiftinv2:=symis(real,u,shiftr(shiftl1),shiftinv1):is(shiftr(shiftl1),u)
-ly@[alpha:'type']
-seq:=[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]alpha:'type'
-[s:seq]
-proofsirrelevant:=[t:real][it:intrl(t)][lt:lessis(y,t)][tl:lessis(t,x)][u:real][iu:intrl(u)][lu:lessis(y,u)][ul:lessis(u,x)][v:is(t,u)]is"e"(alpha,<tl><lt><it><t>s,<ul><lu><iu><u>s):'prop'
-alpha@[f:seq]
-shiftf:=[t:1to(shiftl)]<shiftrls(t)><lsshiftr(t)><intshiftr(t)><shiftr(t)>f:[t:1to(shiftl)]alpha
-ly@[s:seq(real)]
-inseq:=[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]and3(intrl(<w><v><u><t>s),lessis(y,<w><v><u><t>s),lessis(<w><v><u><t>s,x)):'prop'
-injseq:=[t:real][it:intrl(t)][lt:lessis(y,t)][tl:lessis(t,x)][u:real][iu:intrl(u)][lu:lessis(y,u)][ul:lessis(u,x)][v:is"r"(<tl><lt><it><t>s,<ul><lu><iu><u>s)]is"r"(t,u):'prop'
-[u:real][v:real][a:and3(intrl(v),lessis(y,v),lessis(v,x))]
-+*shift
-a@prop1:=is(u,<t24(v,a)><t23(v,a)><t22(v,a)><v>s):'prop'
--shift
-v@improp:=and(and3(intrl(v),lessis(y,v),lessis(v,x)),[t:and3(intrl(v),lessis(y,v),lessis(v,x))]prop1".shift"(t)):'prop'
-u@imseq:=some([t:real]improp(u,t)):'prop'
-s@surjseq:=[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]imseq(t):'prop'
-perm:=and(injseq,surjseq):'prop'
-[ins:inseq(s)]
-+*shift
-ins@[n:1to(shiftl)]
-ns:=<shiftrls(n)><lsshiftr(n)><intshiftr(n)><shiftr(n)>s:real
-t34:=<shiftrls(n)><lsshiftr(n)><intshiftr(n)><shiftr(n)>ins:and3(intrl(ns),lessis(y,ns),lessis(ns,x))
--shift
-ins@shiftseq:=[t:1to(shiftl)]shiftl1(ns".shift"(t),t34".shift"(t)):[t:1to(shiftl)]1to(shiftl)
-[js:injseq(s)]
-+*shift
-js@[n:1to(shiftl)][m:1to(shiftl)][i:is"e"(1to(shiftl),<n>shiftseq,<m>shiftseq)]
-t35:=isoutne(shiftl,ul(ns(n),t34(n)),t30(ns(n),t34(n)),ul(ns(m),t34(m)),t30(ns(m),t34(m)),i):is"n"(ul(ns(n),t34(n)),ul(ns(m),t34(m)))
-t36:=isrlint(mn(pl(ns(n),1rl),y),t6(ns(n),t22(ns(n),t34(n)),y,iy,t23(ns(n),t34(n))),mn(pl(ns(m),1rl),y),t6(ns(m),t22(ns(m),t34(m)),y,iy,t23(ns(m),t34(m))),t35):is(mn(pl(ns(n),1rl),y),mn(pl(ns(m),1rl),y))
-t37:=satz188b(ns(n),ns(m),1rl,satz188b(pl(ns(n),1rl),pl(ns(m),1rl),m0"r"(y),t36)):is(ns(n),ns(m))
-t38:=<t37><shiftrls(m)><lsshiftr(m)><intshiftr(m)><shiftr(m)><shiftrls(n)><lsshiftr(n)><intshiftr(n)><shiftr(n)>js:is(shiftr(n),shiftr(m))
-t39:=satz188b(n2(n),n2(m),y,satz188b(pl(n2(n),y),pl(n2(m),y),m0(1rl),t38)):is(n2(n),n2(m))
-t40:=isntirl(n1(n),n1(m),t39):is"n"(n1(n),n1(m))
-t41:=isinne(shiftl,n,m,t40):is"e"(1to(shiftl),n,m)
--shift
-js@injshiftseq:=[t:1to(shiftl)][u:1to(shiftl)][v:is"e"(1to(shiftl),<t>shiftseq,<u>shiftseq)]t41".shift"(t,u,v):injective(1to(shiftl),1to(shiftl),shiftseq)
-ins@[pri:proofsirrelevant(real,s)][ss:surjseq(s)]
-+*shift
-ss@[n:1to(shiftl)]
-t42:=<shiftrls(n)><lsshiftr(n)><intshiftr(n)><shiftr(n)>ss:imseq(shiftr(n))
-[u:real][p:improp(shiftr(n),u)]
-t43:=ande1(and3(intrl(u),lessis(y,u),lessis(u,x)),[t:and3(intrl(u),lessis(y,u),lessis(u,x))]prop1(shiftr(n),u,t),p):and3(intrl(u),lessis(y,u),lessis(u,x))
-t44:=ande2"l.r"(and3(intrl(u),lessis(y,u),lessis(u,x)),[t:and3(intrl(u),lessis(y,u),lessis(u,x))]prop1(shiftr(n),u,t),p):is(shiftr(n),<t24(u,t43)><t23(u,t43)><t22(u,t43)><u>s)
-ul1:=shiftl1(u,t43):1to(shiftl)
-t45:=<shiftinv1(u,t43)><shiftrls(ul1)><lsshiftr(ul1)><intshiftr(ul1)><shiftr(ul1)><t24(u,t43)><t23(u,t43)><t22(u,t43)><u>pri:is(<t24(u,t43)><t23(u,t43)><t22(u,t43)><u>s,ns(ul1))
-t46:=shiftinv1(ns(ul1),t34(ul1)):is(ns(ul1),shiftr(<ul1>shiftseq))
-t47:=tr3is(real,shiftr(n),<t24(u,t43)><t23(u,t43)><t22(u,t43)><u>s,ns(ul1),shiftr(<ul1>shiftseq),t44,t45,t46):is(shiftr(n),shiftr(<ul1>shiftseq))
-t48:=iseshiftr(n,<ul1>shiftseq,t47):is"e"(1to(shiftl),n,<ul1>shiftseq)
-t49:=somei(1to(shiftl),[t:1to(shiftl)]is"e"(1to(shiftl),n,<t>shiftseq),ul1,t48):image(1to(shiftl),1to(shiftl),shiftseq,n)
-n@t50:=someapp(real,[t:real]improp(shiftr(n),t),t42,image(1to(shiftl),1to(shiftl),shiftseq,n),[t:real][u:improp(shiftr(n),t)]t49(t,u)):image(1to(shiftl),1to(shiftl),shiftseq,n)
--shift
-ss@surjshiftseq:=[t:1to(shiftl)]t50".shift"(t):surjective(1to(shiftl),1to(shiftl),shiftseq)
-pri@[ps:perm(s)]
-bijshiftseq:=andi(injective(1to(shiftl),1to(shiftl),shiftseq),surjective(1to(shiftl),1to(shiftl),shiftseq),injshiftseq(ande1(injseq(s),surjseq(s),ps)),surjshiftseq(ande2(injseq(s),surjseq(s),ps))):bijective(1to(shiftl),1to(shiftl),shiftseq)
-+c
-@complex:=pair1type(real):'type'
-cx:=complex:'type'
-[x:complex][y:complex]
-is:=is"e"(cx,x,y):'prop'
-nis:=not(is(x,y)):'prop'
-@[p:[t:complex]'prop']
-some:=some"l"(cx,p):'prop'
-all:=all"l"(cx,p):'prop'
-one:=one"e"(cx,p):'prop'
-@[a:real][b:real]
-pli:=pair1(real,a,b):complex
-x@re:=first1(real,x):real
-im:=second1(real,x):real
-b@reis:=first1is1(real,a,b):is"r"(re(pli(a,b)),a)
-isre:=first1is2(real,a,b):is"r"(a,re(pli(a,b)))
-imis:=second1is1(real,a,b):is"r"(im(pli(a,b)),b)
-isim:=second1is2(real,a,b):is"r"(b,im(pli(a,b)))
-x@pliis:=pair1is1(real,x):is(pli(re(x),im(x)),x)
-ispli:=pair1is2(real,x):is(x,pli(re(x),im(x)))
-y@[i:is(x,y)]
-iscere:=isf(cx,real,[t:cx]re(t),x,y,i):is"r"(re(x),re(y))
-isceim:=isf(cx,real,[t:cx]im(t),x,y,i):is"r"(im(x),im(y))
-b@[c:real][i:is"r"(a,b)]
-isrecx1:=isf(real,cx,[t:real]pli(t,c),a,b,i):is(pli(a,c),pli(b,c))
-isrecx2:=isf(real,cx,[t:real]pli(c,t),a,b,i):is(pli(c,a),pli(c,b))
-c@[d:real][i:is"r"(a,b)][j:is"r"(c,d)]
-isrecx12:=tris(cx,pli(a,c),pli(b,c),pli(b,d),isrecx1(a,b,c,i),isrecx2(c,d,b,j)):is(pli(a,c),pli(b,d))
-x@satz206:=refis(cx,x):is(x,x)
-y@[i:is(x,y)]
-satz207:=symis(cx,x,y,i):is(y,x)
-y@[z:complex][i:is(x,y)][j:is(y,z)]
-satz208:=tris(cx,x,y,z,i,j):is(x,z)
-@0c:=pli(0,0):complex
-1c:=pli(1rl,0):complex
-y@pl:=pli(pl"r"(re(x),re(y)),pl"r"(im(x),im(y))):complex
-d@plis12a:=isrecx12(pl"r"(re(pli(a,b)),re(pli(c,d))),pl"r"(a,c),pl"r"(im(pli(a,b)),im(pli(c,d))),pl"r"(b,d),ispl12(re(pli(a,b)),a,re(pli(c,d)),c,reis(a,b),reis(c,d)),ispl12(im(pli(a,b)),b,im(pli(c,d)),d,imis(a,b),imis(c,d))):is(pl(pli(a,b),pli(c,d)),pli(pl"r"(a,c),pl"r"(b,d)))
-plis12b:=symis(cx,pl(pli(a,b),pli(c,d)),pli(pl"r"(a,c),pl"r"(b,d)),plis12a):is(pli(pl"r"(a,c),pl"r"(b,d)),pl(pli(a,b),pli(c,d)))
-x@[r:real][s:real]
-plis1a:=isrecx12(pl"r"(re(pli(r,s)),re(x)),pl"r"(r,re(x)),pl"r"(im(pli(r,s)),im(x)),pl"r"(s,im(x)),ispl1(re(pli(r,s)),r,re(x),reis(r,s)),ispl1(im(pli(r,s)),s,im(x),imis(r,s))):is(pl(pli(r,s),x),pli(pl"r"(r,re(x)),pl"r"(s,im(x))))
-plis1b:=symis(cx,pl(pli(r,s),x),pli(pl"r"(r,re(x)),pl"r"(s,im(x))),plis1a):is(pli(pl"r"(r,re(x)),pl"r"(s,im(x))),pl(pli(r,s),x))
-plis2a:=isrecx12(pl"r"(re(x),re(pli(r,s))),pl"r"(re(x),r),pl"r"(im(x),im(pli(r,s))),pl"r"(im(x),s),ispl2(re(pli(r,s)),r,re(x),reis(r,s)),ispl2(im(pli(r,s)),s,im(x),imis(r,s))):is(pl(x,pli(r,s)),pli(pl"r"(re(x),r),pl"r"(im(x),s)))
-plis2b:=symis(cx,pl(x,pli(r,s)),pli(pl"r"(re(x),r),pl"r"(im(x),s)),plis2a):is(pli(pl"r"(re(x),r),pl"r"(im(x),s)),pl(x,pli(r,s)))
-z@[i:is(x,y)]
-ispl1:=isf(cx,cx,[t:cx]pl(t,z),x,y,i):is(pl(x,z),pl(y,z))
-ispl2:=isf(cx,cx,[t:cx]pl(z,t),x,y,i):is(pl(z,x),pl(z,y))
-z@[u:complex][i:is(x,y)][j:is(z,u)]
-ispl12:=tris(cx,pl(x,z),pl(y,z),pl(y,u),ispl1(x,y,z,i),ispl2(z,u,y,j)):is(pl(x,z),pl(y,u))
-y@satz209:=isrecx12(pl"r"(re(x),re(y)),pl"r"(re(y),re(x)),pl"r"(im(x),im(y)),pl"r"(im(y),im(x)),compl(re(x),re(y)),compl(im(x),im(y))):is(pl(x,y),pl(y,x))
-compl:=satz209:is(pl(x,y),pl(y,x))
-x@satz210:=tr3is(cx,pl(x,0c),pli(pl"r"(re(x),0),pl"r"(im(x),0)),pli(re(x),im(x)),x,plis2a(x,0,0),isrecx12(pl"r"(re(x),0),re(x),pl"r"(im(x),0),im(x),pl02(re(x),0,refis(real,0)),pl02(im(x),0,refis(real,0))),pliis(x)):is(pl(x,0c),x)
-satz210a:=symis(cx,pl(x,0c),x,satz210):is(x,pl(x,0c))
-satz210b:=tris(cx,pl(0c,x),pl(x,0c),x,compl(0c,x),satz210):is(pl(0c,x),x)
-satz210c:=symis(cx,pl(0c,x),x,satz210b):is(x,pl(0c,x))
-z@satz211:=tr3is(cx,pl(pl(x,y),z),pli(pl"r"(pl"r"(re(x),re(y)),re(z)),pl"r"(pl"r"(im(x),im(y)),im(z))),pli(pl"r"(re(x),pl"r"(re(y),re(z))),pl"r"(im(x),pl"r"(im(y),im(z)))),pl(x,pl(y,z)),plis1a(z,pl"r"(re(x),re(y)),pl"r"(im(x),im(y))),isrecx12(pl"r"(pl"r"(re(x),re(y)),re(z)),pl"r"(re(x),pl"r"(re(y),re(z))),pl"r"(pl"r"(im(x),im(y)),im(z)),pl"r"(im(x),pl"r"(im(y),im(z))),asspl1(re(x),re(y),re(z)),asspl1(im(x),im(y),im(z))),plis2b(x,pl"r"(re(y),re(z)),pl"r"(im(y),im(z)))):is(pl(pl(x,y),z),pl(x,pl(y,z)))
-asspl1:=satz211:is(pl(pl(x,y),z),pl(x,pl(y,z)))
-asspl2:=symis(cx,pl(pl(x,y),z),pl(x,pl(y,z)),asspl1):is(pl(x,pl(y,z)),pl(pl(x,y),z))
-y@[u:complex][i:is(pl(y,u),x)]
-+2212
-t1:=tris(real,pl"r"(re(y),re(u)),re(pl(y,u)),re(x),isre(pl"r"(re(y),re(u)),pl"r"(im(y),im(u))),iscere(pl(y,u),x,i)):is"r"(pl"r"(re(y),re(u)),re(x))
-t2:=tris(real,pl"r"(im(y),im(u)),im(pl(y,u)),im(x),isim(pl"r"(re(y),re(u)),pl"r"(im(y),im(u))),isceim(pl(y,u),x,i)):is"r"(pl"r"(im(y),im(u)),im(x))
-t3:=satz187d(re(x),re(y),re(u),t1):is"r"(re(u),mn(re(x),re(y)))
-t4:=satz187d(im(x),im(y),im(u),t2):is"r"(im(u),mn(im(x),im(y)))
--2212
-satz212a:=tris(cx,u,pli(re(u),im(u)),pli(mn(re(x),re(y)),mn(im(x),im(y))),ispli(u),isrecx12(re(u),mn(re(x),re(y)),im(u),mn(im(x),im(y)),t3".2212",t4".2212")):is(u,pli(mn(re(x),re(y)),mn(im(x),im(y))))
-y@satz212b:=tr3is(cx,pl(y,pli(mn(re(x),re(y)),mn(im(x),im(y)))),pli(pl"r"(re(y),mn(re(x),re(y))),pl"r"(im(y),mn(im(x),im(y)))),pli(re(x),im(x)),x,plis2a(y,mn(re(x),re(y)),mn(im(x),im(y))),isrecx12(pl"r"(re(y),mn(re(x),re(y))),re(x),pl"r"(im(y),mn(im(x),im(y))),im(x),satz187a(re(x),re(y)),satz187a(im(x),im(y))),pliis(x)):is(pl(y,pli(mn(re(x),re(y)),mn(im(x),im(y)))),x)
-satz212c:=somei(cx,[t:cx]is(pl(y,t),x),pli(mn(re(x),re(y)),mn(im(x),im(y))),satz212b):some([t:complex]is(pl(y,t),x))
-satz212:=onei(cx,[t:cx]is(pl(y,t),x),[t:cx][u:cx][v:is(pl(y,t),x)][w:is(pl(y,u),x)]tris2(cx,t,u,pli(mn(re(x),re(y)),mn(im(x),im(y))),satz212a(t,v),satz212a(u,w)),satz212c):one([t:complex]is(pl(y,t),x))
-%satz212:=onei(cx,[t:cx]is(pl(y,t),x),[t:cx][u:cx][v:is(pl(y,t),x)][w:is(pl(y,u),x)]tris2(cx,t,u,v),satz212a(u,w)),satz212c):one([t:complex]is(pl(y,t),x))
-mn:=pli(mn"r"(re(x),re(y)),mn"r"(im(x),im(y))):complex
-d@mnis12a:=isrecx12(mn"r"(re(pli(a,b)),re(pli(c,d))),mn"r"(a,c),mn"r"(im(pli(a,b)),im(pli(c,d))),mn"r"(b,d),ismn12(re(pli(a,b)),a,re(pli(c,d)),c,reis(a,b),reis(c,d)),ismn12(im(pli(a,b)),b,im(pli(c,d)),d,imis(a,b),imis(c,d))):is(mn(pli(a,b),pli(c,d)),pli(mn"r"(a,c),mn"r"(b,d)))
-mnis12b:=symis(cx,mn(pli(a,b),pli(c,d)),pli(mn"r"(a,c),mn"r"(b,d)),mnis12a):is(pli(mn"r"(a,c),mn"r"(b,d)),mn(pli(a,b),pli(c,d)))
-x@[r:real][s:real]
-mnis1a:=isrecx12(mn"r"(re(pli(r,s)),re(x)),mn"r"(r,re(x)),mn"r"(im(pli(r,s)),im(x)),mn"r"(s,im(x)),ismn1(re(pli(r,s)),r,re(x),reis(r,s)),ismn1(im(pli(r,s)),s,im(x),imis(r,s))):is(mn(pli(r,s),x),pli(mn"r"(r,re(x)),mn"r"(s,im(x))))
-mnis1b:=symis(cx,mn(pli(r,s),x),pli(mn"r"(r,re(x)),mn"r"(s,im(x))),mnis1a):is(pli(mn"r"(r,re(x)),mn"r"(s,im(x))),mn(pli(r,s),x))
-mnis2a:=isrecx12(mn"r"(re(x),re(pli(r,s))),mn"r"(re(x),r),mn"r"(im(x),im(pli(r,s))),mn"r"(im(x),s),ismn2(re(pli(r,s)),r,re(x),reis(r,s)),ismn2(im(pli(r,s)),s,im(x),imis(r,s))):is(mn(x,pli(r,s)),pli(mn"r"(re(x),r),mn"r"(im(x),s)))
-mnis2b:=symis(cx,mn(x,pli(r,s)),pli(mn"r"(re(x),r),mn"r"(im(x),s)),mnis2a):is(pli(mn"r"(re(x),r),mn"r"(im(x),s)),mn(x,pli(r,s)))
-z@[i:is(x,y)]
-ismn1:=isf(cx,cx,[t:cx]mn(t,z),x,y,i):is(mn(x,z),mn(y,z))
-ismn2:=isf(cx,cx,[t:cx]mn(z,t),x,y,i):is(mn(z,x),mn(z,y))
-z@[u:complex][i:is(x,y)][j:is(z,u)]
-ismn12:=tris(cx,mn(x,z),mn(y,z),mn(y,u),ismn1(x,y,z,i),ismn2(z,u,y,j)):is(mn(x,z),mn(y,u))
-y@[u:complex][i:is(pl(y,u),x)]
-satz212d:=satz212a(u,i):is(u,mn(x,y))
-satz212e:=symis(cx,u,mn(x,y),satz212d):is(mn(x,y),u)
-u@[i:is(pl(u,y),x)]
-satz212f:=satz212d(tris(cx,pl(y,u),pl(u,y),x,compl(y,u),i)):is(u,mn(x,y))
-satz212g:=symis(cx,u,mn(x,y),satz212f):is(mn(x,y),u)
-y@satz212h:=satz212b:is(pl(y,mn(x,y)),x)
-[i:is(mn(x,y),0c)]
-+2213
-t1:=tr3is(real,mn"r"(re(x),re(y)),re(mn(x,y)),re(0c),0,isre(mn"r"(re(x),re(y)),mn"r"(im(x),im(y))),iscere(mn(x,y),0c,i),reis(0,0)):is"r"(mn"r"(re(x),re(y)),0)
-t2:=tr3is(real,mn"r"(im(x),im(y)),im(mn(x,y)),im(0c),0,isim(mn"r"(re(x),re(y)),mn"r"(im(x),im(y))),isceim(mn(x,y),0c,i),imis(0,0)):is"r"(mn"r"(im(x),im(y)),0)
-t3:=satz182b(re(x),re(y),t1):is"r"(re(x),re(y))
-t4:=satz182b(im(x),im(y),t2):is"r"(im(x),im(y))
--2213
-satz213a:=tr3is(cx,x,pli(re(x),im(x)),pli(re(y),im(y)),y,ispli(x),isrecx12(re(x),re(y),im(x),im(y),t3".2213",t4".2213"),pliis(y)):is(x,y)
-y@[i:is(x,y)]
-+*2213
-i@t5:=satz182e(re(x),re(y),iscere(x,y,i)):is"r"(mn"r"(re(x),re(y)),0)
-t6:=satz182e(im(x),im(y),isceim(x,y,i)):is"r"(mn"r"(im(x),im(y)),0)
--2213
-i@satz213b:=isrecx12(mn"r"(re(x),re(y)),0,mn"r"(im(x),im(y)),0,t5".2213",t6".2213"):is(mn(x,y),0c)
-x@m0:=mn(0c,x):complex
-satz214:=isrecx12(mn"r"(re(0c),re(x)),m0"r"(re(x)),mn"r"(im(0c),im(x)),m0"r"(im(x)),pl01(re(0c),m0"r"(re(x)),reis(0,0)),pl01(im(0c),m0"r"(im(x)),imis(0,0))):is(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))))
-satz214a:=symis(cx,m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),satz214):is(pli(m0"r"(re(x)),m0"r"(im(x))),m0(x))
-b@m0isa:=tris(cx,m0(pli(a,b)),pli(m0"r"(re(pli(a,b))),m0"r"(im(pli(a,b)))),pli(m0"r"(a),m0"r"(b)),satz214(pli(a,b)),isrecx12(m0"r"(re(pli(a,b))),m0"r"(a),m0"r"(im(pli(a,b))),m0"r"(b),ism0(re(pli(a,b)),a,reis(a,b)),ism0(im(pli(a,b)),b,imis(a,b)))):is(m0(pli(a,b)),pli(m0"r"(a),m0"r"(b)))
-m0isb:=symis(cx,m0(pli(a,b)),pli(m0"r"(a),m0"r"(b)),m0isa):is(pli(m0"r"(a),m0"r"(b)),m0(pli(a,b)))
-y@[i:is(x,y)]
-ism0:=isf(cx,cx,[t:cx]m0(t),x,y,i):is(m0(x),m0(y))
-x@satz215:=tr4is(cx,m0(m0(x)),m0(pli(m0"r"(re(x)),m0"r"(im(x)))),pli(m0"r"(m0"r"(re(x))),m0"r"(m0"r"(im(x)))),pli(re(x),im(x)),x,ism0(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),satz214),m0isa(m0"r"(re(x)),m0"r"(im(x))),isrecx12(m0"r"(m0"r"(re(x))),re(x),m0"r"(m0"r"(im(x))),im(x),satz177(re(x)),satz177(im(x))),pliis(x)):is(m0(m0(x)),x)
-satz215a:=symis(cx,m0(m0(x)),x,satz215):is(x,m0(m0(x)))
-y@[i:is(x,m0(y))]
-satz215b:=tris(cx,m0(x),m0(m0(y)),y,ism0(x,m0(y),i),satz215(y)):is(m0(x),y)
-satz215c:=symis(cx,m0(x),y,satz215b):is(y,m0(x))
-y@[i:is(m0(x),y)]
-satz215d:=satz215c(y,x,symis(cx,m0(x),y,i)):is(x,m0(y))
-satz215e:=symis(cx,x,m0(y),satz215d):is(m0(y),x)
-x@satz216:=tr3is(cx,pl(x,m0(x)),pl(x,pli(m0"r"(re(x)),m0"r"(im(x)))),pli(pl"r"(re(x),m0"r"(re(x))),pl"r"(im(x),m0"r"(im(x)))),0c,ispl2(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),x,satz214(x)),plis2a(x,m0"r"(re(x)),m0"r"(im(x))),isrecx12(pl"r"(re(x),m0"r"(re(x))),0,pl"r"(im(x),m0"r"(im(x))),0,satz179(re(x)),satz179(im(x)))):is(pl(x,m0(x)),0c)
-+2216
-anders:=satz212h(0c,x):is(pl(x,m0(x)),0c)
--2216
-satz216a:=tris(cx,pl(m0(x),x),pl(x,m0(x)),0c,compl(m0(x),x),satz216):is(pl(m0(x),x),0c)
-y@satz217:=tr4is(cx,m0(pl(x,y)),pli(m0"r"(pl"r"(re(x),re(y))),m0"r"(pl"r"(im(x),im(y)))),pli(pl"r"(m0"r"(re(x)),m0"r"(re(y))),pl"r"(m0"r"(im(x)),m0"r"(im(y)))),pl(pli(m0"r"(re(x)),m0"r"(im(x))),pli(m0"r"(re(y)),m0"r"(im(y)))),pl(m0(x),m0(y)),m0isa(pl"r"(re(x),re(y)),pl"r"(im(x),im(y))),isrecx12(m0"r"(pl"r"(re(x),re(y))),pl"r"(m0"r"(re(x)),m0"r"(re(y))),m0"r"(pl"r"(im(x),im(y))),pl"r"(m0"r"(im(x)),m0"r"(im(y))),satz180(re(x),re(y)),satz180(im(x),im(y))),plis12b(m0"r"(re(x)),m0"r"(im(x)),m0"r"(re(y)),m0"r"(im(y))),ispl12(pli(m0"r"(re(x)),m0"r"(im(x))),m0(x),pli(m0"r"(re(y)),m0"r"(im(y))),m0(y),satz214a(x),satz214a(y))):is(m0(pl(x,y)),pl(m0(x),m0(y)))
-satz217a:=symis(cx,m0(pl(x,y)),pl(m0(x),m0(y)),satz217):is(pl(m0(x),m0(y)),m0(pl(x,y)))
-satz218:=tris(cx,mn(x,y),pl(x,pli(m0"r"(re(y)),m0"r"(im(y)))),pl(x,m0(y)),plis2b(x,m0"r"(re(y)),m0"r"(im(y))),ispl2(pli(m0"r"(re(y)),m0"r"(im(y))),m0(y),x,satz214a(y))):is(mn(x,y),pl(x,m0(y)))
-satz218a:=symis(cx,mn(x,y),pl(x,m0(y)),satz218):is(pl(x,m0(y)),mn(x,y))
-+2219
-t1:=tr3is(cx,m0(mn(x,y)),m0(pl(x,m0(y))),pl(m0(x),m0(m0(y))),pl(m0(x),y),ism0(mn(x,y),pl(x,m0(y)),satz218),satz217(x,m0(y)),ispl2(m0(m0(y)),y,m0(x),satz215(y))):is(m0(mn(x,y)),pl(m0(x),y))
--2219
-satz219:=tr3is(cx,m0(mn(x,y)),pl(m0(x),y),pl(y,m0(x)),mn(y,x),t1".2219",compl(m0(x),y),satz218a(y,x)):is(m0(mn(x,y)),mn(y,x))
-satz219a:=symis(cx,m0(mn(y,x)),mn(x,y),satz219(y,x)):is(mn(x,y),m0(mn(y,x)))
-ts:=pli(mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y))),pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)))):complex
-rets:=mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y))):real
-imts:=pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))):real
-+v3
-d@t1:=ismn12"r"(ts"r"(re(pli(a,b)),re(pli(c,d))),ts"r"(a,c),ts"r"(im(pli(a,b)),im(pli(c,d))),ts"r"(b,d),ists12(re(pli(a,b)),a,re(pli(c,d)),c,reis(a,b),reis(c,d)),ists12(im(pli(a,b)),b,im(pli(c,d)),d,imis(a,b),imis(c,d))):is"r"(rets(pli(a,b),pli(c,d)),mn"r"(ts"r"(a,c),ts"r"(b,d)))
-t2:=ispl12"r"(ts"r"(re(pli(a,b)),im(pli(c,d))),ts"r"(a,d),ts"r"(im(pli(a,b)),re(pli(c,d))),ts"r"(b,c),ists12(re(pli(a,b)),a,im(pli(c,d)),d,reis(a,b),imis(c,d)),ists12(im(pli(a,b)),b,re(pli(c,d)),c,imis(a,b),reis(c,d))):is"r"(imts(pli(a,b),pli(c,d)),pl"r"(ts"r"(a,d),ts"r"(b,c)))
--v3
-d@tsis12a:=isrecx12(rets(pli(a,b),pli(c,d)),mn"r"(ts"r"(a,c),ts"r"(b,d)),imts(pli(a,b),pli(c,d)),pl"r"(ts"r"(a,d),ts"r"(b,c)),t1".v3",t2".v3"):is(ts(pli(a,b),pli(c,d)),pli(mn"r"(ts"r"(a,c),ts"r"(b,d)),pl"r"(ts"r"(a,d),ts"r"(b,c))))
-tsis12b:=symis(cx,ts(pli(a,b),pli(c,d)),pli(mn"r"(ts"r"(a,c),ts"r"(b,d)),pl"r"(ts"r"(a,d),ts"r"(b,c))),tsis12a):is(pli(mn"r"(ts"r"(a,c),ts"r"(b,d)),pl"r"(ts"r"(a,d),ts"r"(b,c))),ts(pli(a,b),pli(c,d)))
-x@[r:real][s:real]
-+*v3
-s@t3:=ismn12"r"(ts"r"(re(pli(r,s)),re(x)),ts"r"(r,re(x)),ts"r"(im(pli(r,s)),im(x)),ts"r"(s,im(x)),ists1(re(pli(r,s)),r,re(x),reis(r,s)),ists1(im(pli(r,s)),s,im(x),imis(r,s))):is"r"(rets(pli(r,s),x),mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))))
-t4:=ispl12"r"(ts"r"(re(pli(r,s)),im(x)),ts"r"(r,im(x)),ts"r"(im(pli(r,s)),re(x)),ts"r"(s,re(x)),ists1(re(pli(r,s)),r,im(x),reis(r,s)),ists1(im(pli(r,s)),s,re(x),imis(r,s))):is"r"(imts(pli(r,s),x),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x))))
--v3
-s@tsis1a:=isrecx12(rets(pli(r,s),x),mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))),imts(pli(r,s),x),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x))),t3".v3",t4".v3"):is(ts(pli(r,s),x),pli(mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x)))))
-tsis1b:=symis(cx,ts(pli(r,s),x),pli(mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x)))),tsis1a):is(pli(mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x)))),ts(pli(r,s),x))
-+*v3
-s@t5:=ismn12"r"(ts"r"(re(x),re(pli(r,s))),ts"r"(re(x),r),ts"r"(im(x),im(pli(r,s))),ts"r"(im(x),s),ists2(re(pli(r,s)),r,re(x),reis(r,s)),ists2(im(pli(r,s)),s,im(x),imis(r,s))):is"r"(rets(x,pli(r,s)),mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)))
-t6:=ispl12"r"(ts"r"(re(x),im(pli(r,s))),ts"r"(re(x),s),ts"r"(im(x),re(pli(r,s))),ts"r"(im(x),r),ists2(im(pli(r,s)),s,re(x),imis(r,s)),ists2(re(pli(r,s)),r,im(x),reis(r,s))):is"r"(imts(x,pli(r,s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r)))
--v3
-s@tsis2a:=isrecx12(rets(x,pli(r,s)),mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)),imts(x,pli(r,s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r)),t5".v3",t6".v3"):is(ts(x,pli(r,s)),pli(mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r))))
-tsis2b:=symis(cx,ts(x,pli(r,s)),pli(mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r))),tsis2a):is(pli(mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r))),ts(x,pli(r,s)))
-z@[i:is(x,y)]
-ists1:=isf(cx,cx,[t:cx]ts(t,z),x,y,i):is(ts(x,z),ts(y,z))
-ists2:=isf(cx,cx,[t:cx]ts(z,t),x,y,i):is(ts(z,x),ts(z,y))
-z@[u:complex][i:is(x,y)][j:is(z,u)]
-ists12:=tris(cx,ts(x,z),ts(y,z),ts(y,u),ists1(x,y,z,i),ists2(z,u,y,j)):is(ts(x,z),ts(y,u))
-+3220
-y@t1:=ismn12"r"(ts"r"(re(x),re(y)),ts"r"(re(y),re(x)),ts"r"(im(x),im(y)),ts"r"(im(y),im(x)),comts(re(x),re(y)),comts(im(x),im(y))):is"r"(rets(x,y),rets(y,x))
-t2:=tris(real,imts(x,y),pl"r"(ts"r"(im(x),re(y)),ts"r"(re(x),im(y))),imts(y,x),compl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))),ispl12"r"(ts"r"(im(x),re(y)),ts"r"(re(y),im(x)),ts"r"(re(x),im(y)),ts"r"(im(y),re(x)),comts(im(x),re(y)),comts(re(x),im(y)))):is"r"(imts(x,y),imts(y,x))
--3220
-y@satz220:=isrecx12(rets(x,y),rets(y,x),imts(x,y),imts(y,x),t1".3220",t2".3220"):is(ts(x,y),ts(y,x))
-comts:=satz220:is(ts(x,y),ts(y,x))
-x@[i:is(x,0c)]
-lemma1:=tris(real,re(x),re(0c),0,iscere(x,0c,i),reis(0,0)):is"r"(re(x),0)
-lemma2:=tris(real,im(x),im(0c),0,isceim(x,0c,i),imis(0,0)):is"r"(im(x),0)
-x@mod2:=pl"r"(ts"r"(re(x),re(x)),ts"r"(im(x),im(x))):real
-i@lemma3:=tris(real,mod2,pl"r"(0,0),0,ispl12"r"(ts"r"(re(x),re(x)),0,ts"r"(im(x),im(x)),0,ts01(re(x),re(x),lemma1),ts01(im(x),im(x),lemma2)),pl01(0,0,refis(real,0))):is"r"(mod2(x),0)
-x@[n:nis(x,0c)]
-+*v3
-x@re2:=ts"r"(re(x),re(x)):real
-im2:=ts"r"(im(x),im(x)):real
-n@[i:is"r"(re(x),0)]
-t7:=th3"l.imp"(is"r"(im(x),0),is(x,0c),n,[t:is"r"(im(x),0)]tris(cx,x,pli(re(x),im(x)),0c,ispli(x),isrecx12(re(x),0,im(x),0,i,t))):nis"r"(im(x),0)
-t8:=ispos(im2,mod2,symis(real,mod2,im2,pl01(re2,im2,ts01(re(x),re(x),i))),possq(im(x),t7)):pos(mod2)
-n@[o:nis"r"(re(x),0)][i:is"r"(im(x),0)]
-t9:=ispos(re2,mod2,symis(real,mod2,re2,pl02(re2,im2,ts01(im(x),im(x),i))),possq(re(x),o)):pos(mod2)
-o@[p:nis"r"(im(x),0)]
-t10:=pospl(re2,im2,possq(re(x),o),possq(im(x),p)):pos(mod2)
-o@t11:=th1"l.imp"(is"r"(im(x),0),pos(mod2),[t:is"r"(im(x),0)]t9(t),[t:nis"r"(im(x),0)]t10(t)):pos(mod2)
--v3
-n@lemma4:=th1"l.imp"(is"r"(re(x),0),pos(mod2),[t:is"r"(re(x),0)]t8".v3"(t),[t:nis"r"(re(x),0)]t11".v3"(t)):pos(mod2(x))
-x@lemma5:=th1"l.imp"(is(x,0c),not(neg(mod2)),[t:is(x,0c)]0notn(mod2,lemma3(t)),[t:nis(x,0c)]pnotn(mod2,lemma4(t))):not(neg(mod2(x)))
-y@[i:is(x,0c)]
-+3221
-t1:=lemma1(x,i):is"r"(re(x),0)
-t2:=lemma2(x,i):is"r"(im(x),0)
-t3:=tris(real,rets(x,y),mn"r"(0,0),0,ismn12"r"(ts"r"(re(x),re(y)),0,ts"r"(im(x),im(y)),0,ts01(re(x),re(y),t1),ts01(im(x),im(y),t2)),satz187c(0,0,0,pl02(0,0,refis(real,0)))):is"r"(rets(x,y),0)
-t4:=tris(real,imts(x,y),pl"r"(0,0),0,ispl12"r"(ts"r"(re(x),im(y)),0,ts"r"(im(x),re(y)),0,ts01(re(x),im(y),t1),ts01(im(x),re(y),t2)),pl02(0,0,refis(real,0))):is"r"(imts(x,y),0)
--3221
-satz221a:=isrecx12(rets(x,y),0,imts(x,y),0,t3".3221",t4".3221"):is(ts(x,y),0c)
-y@[i:is(y,0c)]
-satz221b:=tris(cx,ts(x,y),ts(y,x),0c,comts(x,y),satz221a(y,x,i)):is(ts(x,y),0c)
-y@[i:is(ts(x,y),0c)]
-+*3221
-i@[n:nis(y,0c)]
-t5:=lemma4(y,n):pos(mod2(y))
-t6:=tris1(real,rets(x,y),0,re(ts(x,y)),reis(rets(x,y),imts(x,y)),lemma1(ts(x,y),i)):is"r"(rets(x,y),0)
-t7:=tris1(real,imts(x,y),0,im(ts(x,y)),imis(rets(x,y),imts(x,y)),lemma2(ts(x,y),i)):is"r"(imts(x,y),0)
-t8:=tris(real,pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),pl"r"(0,0),0,ispl12"r"(ts"r"(rets(x,y),re(y)),0,ts"r"(imts(x,y),im(y)),0,ts01(rets(x,y),re(y),t6),ts01(imts(x,y),im(y),t7)),pl02(0,0,refis(real,0))):is"r"(pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),0)
-y@ii1r:=ts"r"(ts"r"(im(x),im(y)),re(y)):real
-i1ir:=ts"r"(im(x),ts"r"(im(y),re(y))):real
-ir1i:=ts"r"(ts"r"(im(x),re(y)),im(y)):real
-i1ri:=ts"r"(im(x),ts"r"(re(y),im(y))):real
-rr1r:=ts"r"(ts"r"(re(x),re(y)),re(y)):real
-r1rr:=ts"r"(re(x),ts"r"(re(y),re(y))):real
-ri1r:=ts"r"(ts"r"(re(x),im(y)),re(y)):real
-r1ir:=ts"r"(re(x),ts"r"(im(y),re(y))):real
-ri1i:=ts"r"(ts"r"(re(x),im(y)),im(y)):real
-r1ii:=ts"r"(re(x),ts"r"(im(y),im(y))):real
-n@t9:=tris(real,ii1r,i1ir,i1ri,assts1(im(x),im(y),re(y)),ists2"r"(ts"r"(im(y),re(y)),ts"r"(re(y),im(y)),im(x),comts"r"(im(y),re(y)))):is"r"(ii1r,i1ri)
-t10:=tris(real,ts"r"(rets(x,y),re(y)),mn"r"(rr1r,ii1r),mn"r"(r1rr,i1ri),disttm1(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)),re(y)),ismn12"r"(rr1r,r1rr,ii1r,i1ri,assts1(re(x),re(y),re(y)),t9)):is"r"(ts"r"(rets(x,y),re(y)),mn"r"(r1rr,i1ri))
-t11:=tr3is(real,ts"r"(imts(x,y),im(y)),pl"r"(ri1i,ir1i),pl"r"(r1ii,i1ri),pl"r"(i1ri,r1ii),disttp1(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)),im(y)),ispl12"r"(ri1i,r1ii,ir1i,i1ri,assts1(re(x),im(y),im(y)),assts1(im(x),re(y),im(y))),compl"r"(r1ii,i1ri)):is"r"(ts"r"(imts(x,y),im(y)),pl"r"(i1ri,r1ii))
-t12:=tr4is(real,pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),pl"r"(mn"r"(r1rr,i1ri),pl"r"(i1ri,r1ii)),pl"r"(pl"r"(mn"r"(r1rr,i1ri),i1ri),r1ii),pl"r"(r1rr,r1ii),ts"r"(re(x),mod2(y)),ispl12"r"(ts"r"(rets(x,y),re(y)),mn"r"(r1rr,i1ri),ts"r"(imts(x,y),im(y)),pl"r"(i1ri,r1ii),t10,t11),asspl2"r"(mn"r"(r1rr,i1ri),i1ri,r1ii),ispl1"r"(pl"r"(mn"r"(r1rr,i1ri),i1ri),r1rr,r1ii,plmn(r1rr,i1ri)),distpt2(re(x),ts"r"(re(y),re(y)),ts"r"(im(y),im(y)))):is"r"(pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),ts"r"(re(x),mod2(y)))
-t13:=tris1(real,ts"r"(re(x),mod2(y)),0,pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),t12,t8):is"r"(ts"r"(re(x),mod2(y)),0)
-t14:=ore1(is"r"(re(x),0),is"r"(mod2(y),0),satz192c(re(x),mod2(y),t13),pnot0(mod2(y),t5)):is"r"(re(x),0)
-t15:=tris1(real,ts"r"(im(x),im(y)),0,ts"r"(re(x),re(y)),satz182b(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)),t6),ts01(re(x),re(y),t14)):is"r"(ts"r"(im(x),im(y)),0)
-t16:=tris1(real,ts"r"(im(x),re(y)),0,imts(x,y),pl01(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)),ts01(re(x),im(y),t14)),t7):is"r"(ts"r"(im(x),re(y)),0)
-[j:is"r"(re(y),0)]
-t17:=t7"c.v3"(y,n,j):nis"r"(im(y),0)
-t18:=ore1(is"r"(im(x),0),is"r"(im(y),0),satz192c(im(x),im(y),t15),t17):is"r"(im(x),0)
-n@[o:nis"r"(re(y),0)]
-t19:=ore1(is"r"(im(x),0),is"r"(re(y),0),satz192c(im(x),re(y),t16),o):is"r"(im(x),0)
-n@t20:=th1"l.imp"(is"r"(re(y),0),is"r"(im(x),0),[t:is"r"(re(y),0)]t18(t),[t:nis"r"(re(y),0)]t19(t)):is"r"(im(x),0)
-t21:=tris(cx,x,pli(re(x),im(x)),0c,ispli(x),isrecx12(re(x),0,im(x),0,t14,t20)):is(x,0c)
--3221
-i@satz221c:=th2"l.or"(is(x,0c),is(y,0c),[t:nis(y,0c)]t21".3221"(t)):or(is(x,0c),is(y,0c))
-y@[n:nis(x,0c)][o:nis(y,0c)]
-satz221d:=th3"l.imp"(is(ts(x,y),0c),or(is(x,0c),is(y,0c)),th3"l.or"(is(x,0c),is(y,0c),n,o),[t:is(ts(x,y),0c)]satz221c(t)):nis(ts(x,y),0c)
-+3222
-x@t1:=tris(real,mn"r"(ts"r"(re(x),1rl),ts"r"(im(x),0)),mn"r"(re(x),0),re(x),ismn12"r"(ts"r"(re(x),1rl),re(x),ts"r"(im(x),0),0,satz195(re(x)),ts02(im(x),0,refis(real,0))),pl02(re(x),m0"r"(0),satz176b(0,refis(real,0)))):is"r"(mn"r"(ts"r"(re(x),1rl),ts"r"(im(x),0)),re(x))
-t2:=tris(real,pl"r"(ts"r"(re(x),0),ts"r"(im(x),1rl)),pl"r"(0,im(x)),im(x),ispl12"r"(ts"r"(re(x),0),0,ts"r"(im(x),1rl),im(x),ts02(re(x),0,refis(real,0)),satz195(im(x))),pl01(0,im(x),refis(real,0))):is"r"(pl"r"(ts"r"(re(x),0),ts"r"(im(x),1rl)),im(x))
--3222
-x@satz222:=tr3is(cx,ts(x,1c),pli(mn"r"(ts"r"(re(x),1rl),ts"r"(im(x),0)),pl"r"(ts"r"(re(x),0),ts"r"(im(x),1rl))),pli(re(x),im(x)),x,tsis2a(x,1rl,0),isrecx12(mn"r"(ts"r"(re(x),1rl),ts"r"(im(x),0)),re(x),pl"r"(ts"r"(re(x),0),ts"r"(im(x),1rl)),im(x),t1".3222",t2".3222"),pliis(x)):is(ts(x,1c),x)
-satz222a:=symis(cx,ts(x,1c),x,satz222):is(x,ts(x,1c))
-satz222b:=tris(cx,ts(1c,x),ts(x,1c),x,comts(1c,x),satz222):is(ts(1c,x),x)
-satz222c:=symis(cx,ts(1c,x),x,satz222b):is(x,ts(1c,x))
-+3223
-t1:=tris(real,mn"r"(ts"r"(re(x),m0"r"(1rl)),ts"r"(im(x),m0"r"(0))),mn"r"(m0"r"(re(x)),0),m0"r"(re(x)),ismn12"r"(ts"r"(re(x),m0"r"(1rl)),m0"r"(re(x)),ts"r"(im(x),m0"r"(0)),0,tris(real,ts"r"(re(x),m0"r"(1rl)),m0"r"(ts"r"(re(x),1rl)),m0"r"(re(x)),satz197b(re(x),1rl),ism0"r"(ts"r"(re(x),1rl),re(x),satz195(re(x)))),ts02(im(x),m0"r"(0),satz176b(0,refis(real,0)))),pl02(m0"r"(re(x)),m0"r"(0),satz176b(0,refis(real,0)))):is"r"(mn"r"(ts"r"(re(x),m0"r"(1rl)),ts"r"(im(x),m0"r"(0))),m0"r"(re(x)))
-t2:=tris(real,pl"r"(ts"r"(re(x),m0"r"(0)),ts"r"(im(x),m0"r"(1rl))),pl"r"(0,m0"r"(im(x))),m0"r"(im(x)),ispl12"r"(ts"r"(re(x),m0"r"(0)),0,ts"r"(im(x),m0"r"(1rl)),m0"r"(im(x)),ts02(re(x),m0"r"(0),satz176b(0,refis(real,0))),tris(real,ts"r"(im(x),m0"r"(1rl)),m0"r"(ts"r"(im(x),1rl)),m0"r"(im(x)),satz197b(im(x),1rl),ism0"r"(ts"r"(im(x),1rl),im(x),satz195(im(x))))),pl01(0,m0"r"(im(x)),refis(real,0))):is"r"(pl"r"(ts"r"(re(x),m0"r"(0)),ts"r"(im(x),m0"r"(1rl))),m0"r"(im(x)))
--3223
-satz223:=tr4is(cx,ts(x,m0(1c)),ts(x,pli(m0"r"(1rl),m0"r"(0))),pli(mn"r"(ts"r"(re(x),m0"r"(1rl)),ts"r"(im(x),m0"r"(0))),pl"r"(ts"r"(re(x),m0"r"(0)),ts"r"(im(x),m0"r"(1rl)))),pli(m0"r"(re(x)),m0"r"(im(x))),m0(x),ists2(m0(1c),pli(m0"r"(1rl),m0"r"(0)),x,m0isa(1rl,0)),tsis2a(x,m0"r"(1rl),m0"r"(0)),isrecx12(mn"r"(ts"r"(re(x),m0"r"(1rl)),ts"r"(im(x),m0"r"(0))),m0"r"(re(x)),pl"r"(ts"r"(re(x),m0"r"(0)),ts"r"(im(x),m0"r"(1rl))),m0"r"(im(x)),t1".3223",t2".3223"),satz214a(x)):is(ts(x,m0(1c)),m0(x))
-satz223a:=symis(cx,ts(x,m0(1c)),m0(x),satz223):is(m0(x),ts(x,m0(1c)))
-satz223b:=tris(cx,ts(m0(1c),x),ts(x,m0(1c)),m0(x),comts(m0(1c),x),satz223):is(ts(m0(1c),x),m0(x))
-satz223c:=symis(cx,ts(m0(1c),x),m0(x),satz223b):is(m0(x),ts(m0(1c),x))
-+3224
-y@rxry:=ts"r"(re(x),re(y)):real
-ixiy:=ts"r"(im(x),im(y)):real
-rxiy:=ts"r"(re(x),im(y)):real
-ixry:=ts"r"(im(x),re(y)):real
-t1:=tr4is(real,mn"r"(ts"r"(m0"r"(re(x)),re(y)),ts"r"(m0"r"(im(x)),im(y))),mn"r"(m0"r"(rxry),m0"r"(ixiy)),pl"r"(m0"r"(rxry),ixiy),mn"r"(ixiy,rxry),m0"r"(mn"r"(rxry,ixiy)),ismn12"r"(ts"r"(m0"r"(re(x)),re(y)),m0"r"(rxry),ts"r"(m0"r"(im(x)),im(y)),m0"r"(ixiy),satz197a(re(x),re(y)),satz197a(im(x),im(y))),ispl2"r"(m0"r"(m0"r"(ixiy)),ixiy,m0"r"(rxry),satz177(ixiy)),compl"r"(m0"r"(rxry),ixiy),satz181a(ixiy,rxry)):is"r"(mn"r"(ts"r"(m0"r"(re(x)),re(y)),ts"r"(m0"r"(im(x)),im(y))),m0"r"(mn"r"(rxry,ixiy)))
-t2:=tris(real,pl"r"(ts"r"(m0"r"(re(x)),im(y)),ts"r"(m0"r"(im(x)),re(y))),mn"r"(m0"r"(rxiy),ixry),m0"r"(pl"r"(rxiy,ixry)),ispl12"r"(ts"r"(m0"r"(re(x)),im(y)),m0"r"(rxiy),ts"r"(m0"r"(im(x)),re(y)),m0"r"(ixry),satz197a(re(x),im(y)),satz197a(im(x),re(y))),satz180a(rxiy,ixry)):is"r"(pl"r"(ts"r"(m0"r"(re(x)),im(y)),ts"r"(m0"r"(im(x)),re(y))),m0"r"(pl"r"(rxiy,ixry)))
--3224
-y@satz224a:=tr4is(cx,ts(m0(x),y),ts(pli(m0"r"(re(x)),m0"r"(im(x))),y),pli(mn"r"(ts"r"(m0"r"(re(x)),re(y)),ts"r"(m0"r"(im(x)),im(y))),pl"r"(ts"r"(m0"r"(re(x)),im(y)),ts"r"(m0"r"(im(x)),re(y)))),pli(m0"r"(mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)))),m0"r"(pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))))),m0(ts(x,y)),ists1(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),y,satz214(x)),tsis1a(y,m0"r"(re(x)),m0"r"(im(x))),isrecx12(mn"r"(ts"r"(m0"r"(re(x)),re(y)),ts"r"(m0"r"(im(x)),im(y))),m0"r"(mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)))),pl"r"(ts"r"(m0"r"(re(x)),im(y)),ts"r"(m0"r"(im(x)),re(y))),m0"r"(pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)))),t1".3224",t2".3224"),m0isb(mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y))),pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))))):is(ts(m0(x),y),m0(ts(x,y)))
-satz224b:=tr3is(cx,ts(x,m0(y)),ts(m0(y),x),m0(ts(y,x)),m0(ts(x,y)),comts(x,m0(y)),satz224a(y,x),ism0(ts(y,x),ts(x,y),comts(y,x))):is(ts(x,m0(y)),m0(ts(x,y)))
-satz224c:=tris2(cx,ts(m0(x),y),ts(x,m0(y)),m0(ts(x,y)),satz224a,satz224b):is(ts(m0(x),y),ts(x,m0(y)))
-satz224d:=symis(cx,ts(m0(x),y),ts(x,m0(y)),satz224c):is(ts(x,m0(y)),ts(m0(x),y))
-satz224e:=symis(cx,ts(m0(x),y),m0(ts(x,y)),satz224a):is(m0(ts(x,y)),ts(m0(x),y))
-satz224f:=symis(cx,ts(x,m0(y)),m0(ts(x,y)),satz224b):is(m0(ts(x,y)),ts(x,m0(y)))
-satz225:=tris(cx,ts(m0(x),m0(y)),ts(x,m0(m0(y))),ts(x,y),satz224c(x,m0(y)),ists2(m0(m0(y)),y,x,satz215(y))):is(ts(m0(x),m0(y)),ts(x,y))
-satz225a:=symis(cx,ts(m0(x),m0(y)),ts(x,y),satz225):is(ts(x,y),ts(m0(x),m0(y)))
-+3226
-z@rrr:=ts"r"(ts"r"(re(x),re(y)),re(z)):real
-iir:=ts"r"(ts"r"(im(x),im(y)),re(z)):real
-rii:=ts"r"(ts"r"(re(x),im(y)),im(z)):real
-iri:=ts"r"(ts"r"(im(x),re(y)),im(z)):real
-rri:=ts"r"(ts"r"(re(x),re(y)),im(z)):real
-iii:=ts"r"(ts"r"(im(x),im(y)),im(z)):real
-rir:=ts"r"(ts"r"(re(x),im(y)),re(z)):real
-irr:=ts"r"(ts"r"(im(x),re(y)),re(z)):real
-t1:=tr3is(real,mn"r"(ts"r"(rets(x,y),re(z)),ts"r"(imts(x,y),im(z))),mn"r"(mn"r"(rrr,iir),pl"r"(rii,iri)),pl"r"(rrr,pl"r"(m0"r"(iir),m0"r"(pl"r"(rii,iri)))),mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),ismn12"r"(ts"r"(rets(x,y),re(z)),mn"r"(rrr,iir),ts"r"(imts(x,y),im(z)),pl"r"(rii,iri),disttm1(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)),re(z)),disttp1(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)),im(z))),asspl1"r"(rrr,m0"r"(iir),m0"r"(pl"r"(rii,iri))),ispl2"r"(pl"r"(m0"r"(iir),m0"r"(pl"r"(rii,iri))),m0"r"(pl"r"(iir,pl"r"(rii,iri))),rrr,satz180a(iir,pl"r"(rii,iri)))):is"r"(mn"r"(ts"r"(rets(x,y),re(z)),ts"r"(imts(x,y),im(z))),mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))))
-t2:=tr3is(real,pl"r"(ts"r"(rets(x,y),im(z)),ts"r"(imts(x,y),re(z))),pl"r"(mn"r"(rri,iii),pl"r"(rir,irr)),pl"r"(pl"r"(rir,irr),mn"r"(rri,iii)),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii),ispl12"r"(ts"r"(rets(x,y),im(z)),mn"r"(rri,iii),ts"r"(imts(x,y),re(z)),pl"r"(rir,irr),disttm1(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)),im(z)),disttp1(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)),re(z))),compl"r"(mn"r"(rri,iii),pl"r"(rir,irr)),asspl2"r"(pl"r"(rir,irr),rri,m0"r"(iii))):is"r"(pl"r"(ts"r"(rets(x,y),im(z)),ts"r"(imts(x,y),re(z))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii))
-t3:=tris(cx,ts(ts(x,y),z),pli(mn"r"(ts"r"(rets(x,y),re(z)),ts"r"(imts(x,y),im(z))),pl"r"(ts"r"(rets(x,y),im(z)),ts"r"(imts(x,y),re(z)))),pli(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii)),tsis1a(z,rets(x,y),imts(x,y)),isrecx12(mn"r"(ts"r"(rets(x,y),re(z)),ts"r"(imts(x,y),im(z))),mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),pl"r"(ts"r"(rets(x,y),im(z)),ts"r"(imts(x,y),re(z))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii),t1,t2)):is(ts(ts(x,y),z),pli(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii)))
-c@t4:=tris(real,ts"r"(ts"r"(a,b),c),ts"r"(a,ts"r"(b,c)),ts"r"(ts"r"(b,c),a),assts1(a,b,c),comts"r"(a,ts"r"(b,c))):is"r"(ts"r"(ts"r"(a,b),c),ts"r"(ts"r"(b,c),a))
-t5:=tris(real,pl"r"(pl"r"(a,b),c),pl"r"(c,pl"r"(a,b)),pl"r"(pl"r"(c,a),b),compl"r"(pl"r"(a,b),c),asspl2"r"(c,a,b)):is"r"(pl"r"(pl"r"(a,b),c),pl"r"(pl"r"(c,a),b))
-t6:=tris(real,pl"r"(a,pl"r"(b,c)),pl"r"(pl"r"(b,c),a),pl"r"(b,pl"r"(c,a)),compl"r"(a,pl"r"(b,c)),asspl1"r"(b,c,a)):is"r"(pl"r"(a,pl"r"(b,c)),pl"r"(b,pl"r"(c,a)))
-z@rrr1:=rrr(y,z,x):real
-iir1:=iir(y,z,x):real
-rii1:=rii(y,z,x):real
-iri1:=iri(y,z,x):real
-rri1:=rri(y,z,x):real
-iii1:=iii(y,z,x):real
-rir1:=rir(y,z,x):real
-irr1:=irr(y,z,x):real
-t7:=tris(real,pl"r"(iir,pl"r"(rii,iri)),pl"r"(rii,pl"r"(iri,iir)),pl"r"(iir1,pl"r"(rii1,iri1)),t6(iir,rii,iri),ispl12"r"(rii,iir1,pl"r"(iri,iir),pl"r"(rii1,iri1),t4(re(x),im(y),im(z)),ispl12"r"(iri,rii1,iir,iri1,t4(im(x),re(y),im(z)),t4(im(x),im(y),re(z))))):is"r"(pl"r"(iir,pl"r"(rii,iri)),pl"r"(iir1,pl"r"(rii1,iri1)))
-t8:=tris(real,pl"r"(pl"r"(rir,irr),rri),pl"r"(pl"r"(rri,rir),irr),pl"r"(pl"r"(rir1,irr1),rri1),t5(rir,irr,rri),ispl12"r"(pl"r"(rri,rir),pl"r"(rir1,irr1),irr,rri1,ispl12"r"(rri,rir1,rir,irr1,t4(re(x),re(y),im(z)),t4(re(x),im(y),re(z))),t4(im(x),re(y),re(z)))):is"r"(pl"r"(pl"r"(rir,irr),rri),pl"r"(pl"r"(rir1,irr1),rri1))
-t9:=ismn12"r"(rrr,rrr1,pl"r"(iir,pl"r"(rii,iri)),pl"r"(iir1,pl"r"(rii1,iri1)),t4(re(x),re(y),re(z)),t7):is"r"(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))))
-t10:=ismn12"r"(pl"r"(pl"r"(rir,irr),rri),pl"r"(pl"r"(rir1,irr1),rri1),iii,iii1,t8,t4(im(x),im(y),im(z))):is"r"(mn"r"(pl"r"(pl"r"(rir,irr),rri),iii),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1))
-t11:=tris(cx,ts(ts(x,y),z),pli(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii)),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)),t3,isrecx12(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1),t9,t10)):is(ts(ts(x,y),z),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)))
-t12:=tris(cx,ts(x,ts(y,z)),ts(ts(y,z),x),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)),comts(x,ts(y,z)),t3(y,z,x)):is(ts(x,ts(y,z)),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)))
-t13:=tris2(cx,ts(ts(x,y),z),ts(x,ts(y,z)),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)),t11,t12):is(ts(ts(x,y),z),ts(x,ts(y,z)))
--3226
-z@satz226:=t13".3226":is(ts(ts(x,y),z),ts(x,ts(y,z)))
-assts1:=satz226:is(ts(ts(x,y),z),ts(x,ts(y,z)))
-assts2:=symis(cx,ts(ts(x,y),z),ts(x,ts(y,z)),assts1):is(ts(x,ts(y,z)),ts(ts(x,y),z))
-+3227
-c@t1:=tr3is(real,pl"r"(pl"r"(a,b),c),pl"r"(a,pl"r"(b,c)),pl"r"(a,pl"r"(c,b)),pl"r"(pl"r"(a,c),b),asspl1"r"(a,b,c),ispl2"r"(pl"r"(b,c),pl"r"(c,b),a,compl"r"(b,c)),asspl2"r"(a,c,b)):is"r"(pl"r"(pl"r"(a,b),c),pl"r"(pl"r"(a,c),b))
-d@t2:=tr3is(real,pl"r"(pl"r"(a,b),pl"r"(c,d)),pl"r"(pl"r"(pl"r"(a,b),c),d),pl"r"(pl"r"(pl"r"(a,c),b),d),pl"r"(pl"r"(a,c),pl"r"(b,d)),asspl2"r"(pl"r"(a,b),c,d),ispl1"r"(pl"r"(pl"r"(a,b),c),pl"r"(pl"r"(a,c),b),d,t1),asspl1"r"(pl"r"(a,c),b,d)):is"r"(pl"r"(pl"r"(a,b),pl"r"(c,d)),pl"r"(pl"r"(a,c),pl"r"(b,d)))
-t3:=tris(real,mn"r"(pl"r"(a,b),pl"r"(c,d)),pl"r"(pl"r"(a,b),pl"r"(m0"r"(c),m0"r"(d))),pl"r"(mn"r"(a,c),mn"r"(b,d)),ispl2"r"(m0"r"(pl"r"(c,d)),pl"r"(m0"r"(c),m0"r"(d)),pl"r"(a,b),satz180(c,d)),t2(a,b,m0"r"(c),m0"r"(d))):is"r"(mn"r"(pl"r"(a,b),pl"r"(c,d)),pl"r"(mn"r"(a,c),mn"r"(b,d)))
-z@t4:=tris(real,mn"r"(ts"r"(re(x),pl"r"(re(y),re(z))),ts"r"(im(x),pl"r"(im(y),im(z)))),mn"r"(pl"r"(ts"r"(re(x),re(y)),ts"r"(re(x),re(z))),pl"r"(ts"r"(im(x),im(y)),ts"r"(im(x),im(z)))),pl"r"(rets(x,y),rets(x,z)),ismn12"r"(ts"r"(re(x),pl"r"(re(y),re(z))),pl"r"(ts"r"(re(x),re(y)),ts"r"(re(x),re(z))),ts"r"(im(x),pl"r"(im(y),im(z))),pl"r"(ts"r"(im(x),im(y)),ts"r"(im(x),im(z))),disttp2(re(x),re(y),re(z)),disttp2(im(x),im(y),im(z))),t3(ts"r"(re(x),re(y)),ts"r"(re(x),re(z)),ts"r"(im(x),im(y)),ts"r"(im(x),im(z)))):is"r"(mn"r"(ts"r"(re(x),pl"r"(re(y),re(z))),ts"r"(im(x),pl"r"(im(y),im(z)))),pl"r"(rets(x,y),rets(x,z)))
-t5:=tris(real,pl"r"(ts"r"(re(x),pl"r"(im(y),im(z))),ts"r"(im(x),pl"r"(re(y),re(z)))),pl"r"(pl"r"(ts"r"(re(x),im(y)),ts"r"(re(x),im(z))),pl"r"(ts"r"(im(x),re(y)),ts"r"(im(x),re(z)))),pl"r"(imts(x,y),imts(x,z)),ispl12"r"(ts"r"(re(x),pl"r"(im(y),im(z))),pl"r"(ts"r"(re(x),im(y)),ts"r"(re(x),im(z))),ts"r"(im(x),pl"r"(re(y),re(z))),pl"r"(ts"r"(im(x),re(y)),ts"r"(im(x),re(z))),disttp2(re(x),im(y),im(z)),disttp2(im(x),re(y),re(z))),t2(ts"r"(re(x),im(y)),ts"r"(re(x),im(z)),ts"r"(im(x),re(y)),ts"r"(im(x),re(z)))):is"r"(pl"r"(ts"r"(re(x),pl"r"(im(y),im(z))),ts"r"(im(x),pl"r"(re(y),re(z)))),pl"r"(imts(x,y),imts(x,z)))
-t6:=tr3is(cx,ts(x,pl(y,z)),pli(mn"r"(ts"r"(re(x),pl"r"(re(y),re(z))),ts"r"(im(x),pl"r"(im(y),im(z)))),pl"r"(ts"r"(re(x),pl"r"(im(y),im(z))),ts"r"(im(x),pl"r"(re(y),re(z))))),pli(pl"r"(rets(x,y),rets(x,z)),pl"r"(imts(x,y),imts(x,z))),pl(ts(x,y),ts(x,z)),tsis2a(x,pl"r"(re(y),re(z)),pl"r"(im(y),im(z))),isrecx12(mn"r"(ts"r"(re(x),pl"r"(re(y),re(z))),ts"r"(im(x),pl"r"(im(y),im(z)))),pl"r"(rets(x,y),rets(x,z)),pl"r"(ts"r"(re(x),pl"r"(im(y),im(z))),ts"r"(im(x),pl"r"(re(y),re(z)))),pl"r"(imts(x,y),imts(x,z)),t4,t5),plis12b(rets(x,y),imts(x,y),rets(x,z),imts(x,z))):is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
--3227
-satz227:=t6".3227":is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
-disttp1:=tr3is(cx,ts(pl(x,y),z),ts(z,pl(x,y)),pl(ts(z,x),ts(z,y)),pl(ts(x,z),ts(y,z)),comts(pl(x,y),z),satz227(z,x,y),ispl12(ts(z,x),ts(x,z),ts(z,y),ts(y,z),comts(z,x),comts(z,y))):is(ts(pl(x,y),z),pl(ts(x,z),ts(y,z)))
-disttp2:=satz227:is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
-distpt1:=symis(cx,ts(pl(x,y),z),pl(ts(x,z),ts(y,z)),disttp1):is(pl(ts(x,z),ts(y,z)),ts(pl(x,y),z))
-distpt2:=symis(cx,ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)),disttp2):is(pl(ts(x,y),ts(x,z)),ts(x,pl(y,z)))
-satz228:=tr4is(cx,ts(x,mn(y,z)),ts(x,pl(y,m0(z))),pl(ts(x,y),ts(x,m0(z))),pl(ts(x,y),m0(ts(x,z))),mn(ts(x,y),ts(x,z)),ists2(mn(y,z),pl(y,m0(z)),x,satz218(y,z)),disttp2(x,y,m0(z)),ispl2(ts(x,m0(z)),m0(ts(x,z)),ts(x,y),satz224b(x,z)),satz218a(ts(x,y),ts(x,z))):is(ts(x,mn(y,z)),mn(ts(x,y),ts(x,z)))
-disttm1:=tr3is(cx,ts(mn(x,y),z),ts(z,mn(x,y)),mn(ts(z,x),ts(z,y)),mn(ts(x,z),ts(y,z)),comts(mn(x,y),z),satz228(z,x,y),ismn12(ts(z,x),ts(x,z),ts(z,y),ts(y,z),comts(z,x),comts(z,y))):is(ts(mn(x,y),z),mn(ts(x,z),ts(y,z)))
-disttm2:=satz228:is(ts(x,mn(y,z)),mn(ts(x,y),ts(x,z)))
-distmt1:=symis(cx,ts(mn(x,y),z),mn(ts(x,z),ts(y,z)),disttm1):is(mn(ts(x,z),ts(y,z)),ts(mn(x,y),z))
-distmt2:=symis(cx,ts(x,mn(y,z)),mn(ts(x,y),ts(x,z)),disttm2):is(mn(ts(x,y),ts(x,z)),ts(x,mn(y,z)))
-y@[n:nis(y,0c)][u1:complex][u2:complex][i:is(ts(y,u1),x)][j:is(ts(y,u2),x)]
-+3229
-t1:=tris2(cx,ts(y,u1),ts(y,u2),x,i,j):is(ts(y,u1),ts(y,u2))
-t2:=tris(cx,ts(y,mn(u1,u2)),mn(ts(y,u1),ts(y,u2)),0c,disttm2(y,u1,u2),satz213b(ts(y,u1),ts(y,u2),t1)):is(ts(y,mn(u1,u2)),0c)
-t3:=ore2(is(y,0c),is(mn(u1,u2),0c),satz221c(y,mn(u1,u2),t2),n):is(mn(u1,u2),0c)
--3229
-satz229b:=satz213a(u1,u2,t3".3229"):is(u1,u2)
-+*3229
-n@t4:=pnot0(mod2(y),lemma4(y,n)):nis"r"(mod2(y),0)
-u:=ts(pli(ov(re(y),mod2(y),t4),m0"r"(ov(im(y),mod2(y),t4))),x):complex
-[v:real]
-dd:=ov(v,mod2(y),t4):real
-n@t5:=tr3is(real,m0"r"(ts"r"(im(y),m0"r"(dd(im(y))))),m0"r"(m0"r"(ts"r"(im(y),dd(im(y))))),ts"r"(im(y),dd(im(y))),dd(ts"r"(im(y),im(y))),ism0"r"(ts"r"(im(y),m0"r"(dd(im(y)))),m0"r"(ts"r"(im(y),dd(im(y)))),satz197b(im(y),dd(im(y)))),satz177(ts"r"(im(y),dd(im(y)))),lemma6(im(y),im(y),mod2(y),t4)):is"r"(m0"r"(ts"r"(im(y),m0"r"(dd(im(y))))),dd(ts"r"(im(y),im(y))))
-t6:=tr3is(real,mn"r"(ts"r"(re(y),dd(re(y))),ts"r"(im(y),m0"r"(dd(im(y))))),pl"r"(dd(ts"r"(re(y),re(y))),dd(ts"r"(im(y),im(y)))),dd(mod2(y)),1rl,ispl12"r"(ts"r"(re(y),dd(re(y))),dd(ts"r"(re(y),re(y))),m0"r"(ts"r"(im(y),m0"r"(dd(im(y))))),dd(ts"r"(im(y),im(y))),lemma6(re(y),re(y),mod2(y),t4),t5),lemma7(ts"r"(re(y),re(y)),ts"r"(im(y),im(y)),mod2(y),t4),lemma8(mod2(y),t4)):is"r"(mn"r"(ts"r"(re(y),dd(re(y))),ts"r"(im(y),m0"r"(dd(im(y))))),1rl)
-t7:=tris(real,ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(m0"r"(re(y)),dd(im(y))),dd(ts"r"(m0"r"(re(y)),im(y))),satz197d(re(y),dd(im(y))),lemma6(m0"r"(re(y)),im(y),mod2(y),t4)):is"r"(ts"r"(re(y),m0"r"(dd(im(y)))),dd(ts"r"(m0"r"(re(y)),im(y))))
-t8:=tris(real,pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),pl"r"(dd(ts"r"(m0"r"(re(y)),im(y))),dd(ts"r"(im(y),re(y)))),dd(pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y)))),ispl12"r"(ts"r"(re(y),m0"r"(dd(im(y)))),dd(ts"r"(m0"r"(re(y)),im(y))),ts"r"(im(y),dd(re(y))),dd(ts"r"(im(y),re(y))),t7,lemma6(im(y),re(y),mod2(y),t4)),lemma7(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y)),mod2(y),t4)):is"r"(pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),dd(pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y)))))
-t9:=tr3is(real,pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y))),pl"r"(m0"r"(ts"r"(re(y),im(y))),ts"r"(im(y),re(y))),mn"r"(ts"r"(im(y),re(y)),ts"r"(re(y),im(y))),0,ispl1"r"(ts"r"(m0"r"(re(y)),im(y)),m0"r"(ts"r"(re(y),im(y))),ts"r"(im(y),re(y)),satz197a(re(y),im(y))),compl"r"(m0"r"(ts"r"(re(y),im(y))),ts"r"(im(y),re(y))),satz182e(ts"r"(im(y),re(y)),ts"r"(re(y),im(y)),comts"r"(im(y),re(y)))):is"r"(pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y))),0)
-t10:=tr3is(real,pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),dd(pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y)))),dd(0),0,t8,isf(real,real,[t:real]dd(t),pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y))),0,t9),lemma9(mod2(y),t4)):is"r"(pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),0)
-t11:=tris(cx,ts(y,pli(dd(re(y)),m0"r"(dd(im(y))))),pli(mn"r"(ts"r"(re(y),dd(re(y))),ts"r"(im(y),m0"r"(dd(im(y))))),pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y))))),1c,tsis2a(y,dd(re(y)),m0"r"(dd(im(y)))),isrecx12(mn"r"(ts"r"(re(y),dd(re(y))),ts"r"(im(y),m0"r"(dd(im(y))))),1rl,pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),0,t6,t10)):is(ts(y,pli(dd(re(y)),m0"r"(dd(im(y))))),1c)
-t12:=tr3is(cx,ts(y,u),ts(ts(y,pli(dd(re(y)),m0"r"(dd(im(y))))),x),ts(1c,x),x,assts2(y,pli(dd(re(y)),m0"r"(dd(im(y)))),x),ists1(ts(y,pli(dd(re(y)),m0"r"(dd(im(y))))),1c,x,t11),satz222b(x)):is(ts(y,u),x)
--3229
-n@satz229a:=somei(cx,[t:cx]is(ts(y,t),x),u".3229",t12".3229"):some([t:cx]is(ts(y,t),x))
-satz229:=onei(cx,[t:cx]is(ts(y,t),x),[t:cx][u:cx][v:is(ts(y,t),x)][w:is(ts(y,u),x)]satz229b(t,u,v,w),satz229a):one([t:cx]is(ts(y,t),x))
-ov:=ind(cx,[t:cx]is(ts(y,t),x),satz229):complex
-satz229c:=oneax(cx,[t:cx]is(ts(y,t),x),satz229):is(ts(y,ov(x,y,n)),x)
-satz229d:=symis(cx,ts(y,ov(x,y,n)),x,satz229c):is(x,ts(y,ov(x,y,n)))
-satz229e:=tris(cx,ts(ov(x,y,n),y),ts(y,ov(x,y,n)),x,comts(ov(x,y,n),y),satz229c):is(ts(ov(x,y,n),y),x)
-satz229f:=symis(cx,ts(ov(x,y,n),y),x,satz229e):is(x,ts(ov(x,y,n),y))
-y@[u:complex][n:nis(y,0c)][i:is(ts(y,u),x)]
-satz229g:=satz229b(n,u,ov(x,y,n),i,satz229c(n)):is(u,ov(x,y,n))
-satz229h:=symis(cx,u,ov(x,y,n),satz229g):is(ov(x,y,n),u)
-n@[i:is(ts(u,y),x)]
-satz229j:=satz229g(tris(cx,ts(y,u),ts(u,y),x,comts(y,u),i)):is(u,ov(x,y,n))
-satz229k:=symis(cx,u,ov(x,y,n),satz229j):is(ov(x,y,n),u)
-z@[i:is(x,y)][n:nis(z,0c)]
-isov1:=isf(cx,cx,[t:cx]ov(t,z,n),x,y,i):is(ov(x,z,n),ov(y,z,n))
-i@[n:nis(x,0c)][o:nis(y,0c)]
-isov2:=satz229h(z,x,ov(z,y,o),n,tris(cx,ts(x,ov(z,y,o)),ts(y,ov(z,y,o)),z,ists1(x,y,ov(z,y,o),i),satz229c(z,y,o))):is(ov(z,x,n),ov(z,y,o))
-z@[u:complex][i:is(x,y)][j:is(z,u)][n:nis(z,0c)][o:nis(u,0c)]
-isov12:=tris(cx,ov(x,z,n),ov(y,z,n),ov(y,u,o),isov1(x,y,z,i,n),isov2(z,u,y,j,n,o)):is(ov(x,z,n),ov(y,u,o))
-y@satz230:=tris(cx,pl(mn(x,y),y),pl(y,mn(x,y)),x,compl(mn(x,y),y),satz212h(x,y)):is(pl(mn(x,y),y),x)
-satz231:=satz212e(pl(x,y),y,x,compl(y,x)):is(mn(pl(x,y),y),x)
-satz232:=satz212e(x,mn(x,y),y,satz230):is(mn(x,mn(x,y)),y)
-+4233
-z@t1:=tr3is(cx,pl(pl(y,z),mn(mn(x,y),z)),pl(mn(mn(x,y),z),pl(y,z)),pl(mn(mn(x,y),z),pl(z,y)),pl(pl(mn(mn(x,y),z),z),y),compl(pl(y,z),mn(mn(x,y),z)),ispl2(pl(y,z),pl(z,y),mn(mn(x,y),z),compl(y,z)),asspl2(mn(mn(x,y),z),z,y)):is(pl(pl(y,z),mn(mn(x,y),z)),pl(pl(mn(mn(x,y),z),z),y))
-t2:=tr3is(cx,pl(pl(y,z),mn(mn(x,y),z)),pl(pl(mn(mn(x,y),z),z),y),pl(mn(x,y),y),x,t1,ispl1(pl(mn(mn(x,y),z),z),mn(x,y),y,satz230(mn(x,y),z)),satz230(x,y)):is(pl(pl(y,z),mn(mn(x,y),z)),x)
--4233
-z@satz233:=satz212d(x,pl(y,z),mn(mn(x,y),z),t2".4233"):is(mn(mn(x,y),z),mn(x,pl(y,z)))
-satz234:=satz212g(pl(x,y),z,pl(x,mn(y,z)),tris(cx,pl(pl(x,mn(y,z)),z),pl(x,pl(mn(y,z),z)),pl(x,y),asspl1(x,mn(y,z),z),ispl2(pl(mn(y,z),z),y,x,satz230(y,z)))):is(mn(pl(x,y),z),pl(x,mn(y,z)))
-satz234a:=symis(cx,mn(pl(x,y),z),pl(x,mn(y,z)),satz234):is(pl(x,mn(y,z)),mn(pl(x,y),z))
-satz234b:=tr3is(cx,mn(pl(x,y),z),mn(pl(y,x),z),pl(y,mn(x,z)),pl(mn(x,z),y),ismn1(pl(x,y),pl(y,x),z,compl(x,y)),satz234(y,x,z),compl(y,mn(x,z))):is(mn(pl(x,y),z),pl(mn(x,z),y))
-satz234c:=symis(cx,mn(pl(x,y),z),pl(mn(x,z),y),satz234b):is(pl(mn(x,z),y),mn(pl(x,y),z))
-satz235:=satz212f(x,mn(y,z),pl(mn(x,y),z),tr3is(cx,pl(pl(mn(x,y),z),mn(y,z)),pl(mn(x,y),pl(z,mn(y,z))),pl(mn(x,y),y),x,asspl1(mn(x,y),z,mn(y,z)),ispl2(pl(z,mn(y,z)),y,mn(x,y),satz212h(y,z)),satz230(x,y))):is(pl(mn(x,y),z),mn(x,mn(y,z)))
-satz235a:=symis(cx,pl(mn(x,y),z),mn(x,mn(y,z)),satz235):is(mn(x,mn(y,z)),pl(mn(x,y),z))
-satz235b:=tris(cx,mn(x,mn(y,z)),pl(mn(x,y),z),mn(pl(x,z),y),satz235a,satz234c(x,z,y)):is(mn(x,mn(y,z)),mn(pl(x,z),y))
-satz235c:=tris(cx,mn(x,mn(y,z)),mn(pl(x,z),y),mn(pl(z,x),y),satz235b,ismn1(pl(x,z),pl(z,x),y,compl(x,z))):is(mn(x,mn(y,z)),mn(pl(z,x),y))
-satz236:=satz212g(pl(x,z),pl(y,z),mn(x,y),tris(cx,pl(mn(x,y),pl(y,z)),pl(pl(mn(x,y),y),z),pl(x,z),asspl2(mn(x,y),y,z),ispl1(pl(mn(x,y),y),x,z,satz230(x,y)))):is(mn(pl(x,z),pl(y,z)),mn(x,y))
-satz236a:=tris(cx,mn(pl(z,x),pl(z,y)),mn(pl(x,z),pl(y,z)),mn(x,y),ismn12(pl(z,x),pl(x,z),pl(z,y),pl(y,z),compl(z,x),compl(z,y)),satz236):is(mn(pl(z,x),pl(z,y)),mn(x,y))
-[u:complex]
-+4237
-t1:=tr3is(cx,pl(mn(z,u),pl(u,y)),pl(pl(mn(z,u),u),y),pl(z,y),pl(y,z),asspl2(mn(z,u),u,y),ispl1(pl(mn(z,u),u),z,y,satz230(z,u)),compl(z,y)):is(pl(mn(z,u),pl(u,y)),pl(y,z))
-t2:=tr3is(cx,pl(pl(mn(x,y),mn(z,u)),pl(y,u)),pl(pl(mn(x,y),mn(z,u)),pl(u,y)),pl(mn(x,y),pl(mn(z,u),pl(u,y))),pl(mn(x,y),pl(y,z)),ispl2(pl(y,u),pl(u,y),pl(mn(x,y),mn(z,u)),compl(y,u)),asspl1(mn(x,y),mn(z,u),pl(u,y)),ispl2(pl(mn(z,u),pl(u,y)),pl(y,z),mn(x,y),t1)):is(pl(pl(mn(x,y),mn(z,u)),pl(y,u)),pl(mn(x,y),pl(y,z)))
-t3:=tr3is(cx,pl(pl(mn(x,y),mn(z,u)),pl(y,u)),pl(mn(x,y),pl(y,z)),pl(pl(mn(x,y),y),z),pl(x,z),t2,asspl2(mn(x,y),y,z),ispl1(pl(mn(x,y),y),x,z,satz230(x,y))):is(pl(pl(mn(x,y),mn(z,u)),pl(y,u)),pl(x,z))
--4237
-satz237:=satz212f(pl(x,z),pl(y,u),pl(mn(x,y),mn(z,u)),t3".4237"):is(pl(mn(x,y),mn(z,u)),mn(pl(x,z),pl(y,u)))
-+4238
-t1:=tris(cx,pl(pl(x,u),z),pl(x,pl(u,z)),pl(x,pl(z,u)),asspl1(x,u,z),ispl2(pl(u,z),pl(z,u),x,compl(u,z))):is(pl(pl(x,u),z),pl(x,pl(z,u)))
-t2:=tr3is(cx,pl(mn(pl(x,u),pl(y,z)),mn(z,u)),mn(pl(pl(x,u),z),pl(pl(y,z),u)),mn(pl(x,pl(z,u)),pl(y,pl(z,u))),mn(x,y),satz237(pl(x,u),pl(y,z),z,u),ismn12(pl(pl(x,u),z),pl(x,pl(z,u)),pl(pl(y,z),u),pl(y,pl(z,u)),t1,asspl1(y,z,u)),satz236(x,y,pl(z,u))):is(pl(mn(pl(x,u),pl(y,z)),mn(z,u)),mn(x,y))
--4238
-satz238:=satz212g(mn(x,y),mn(z,u),mn(pl(x,u),pl(y,z)),t2".4238"):is(mn(mn(x,y),mn(z,u)),mn(pl(x,u),pl(y,z)))
-[i:is(mn(x,y),mn(z,u))]
-+4239
-t1:=tris1(cx,mn(pl(x,u),pl(y,z)),0c,mn(mn(x,y),mn(z,u)),satz238,satz213b(mn(x,y),mn(z,u),i)):is(mn(pl(x,u),pl(y,z)),0c)
--4239
-satz239a:=satz213a(pl(x,u),pl(y,z),t1".4239"):is(pl(x,u),pl(y,z))
-u@[i:is(pl(x,u),pl(y,z))]
-+*4239
-i@t2:=tris(cx,mn(mn(x,y),mn(z,u)),mn(pl(x,u),pl(y,z)),0c,satz238,satz213b(pl(x,u),pl(y,z),i)):is(mn(mn(x,y),mn(z,u)),0c)
--4239
-i@satz239b:=satz213a(mn(x,y),mn(z,u),t2".4239"):is(mn(x,y),mn(z,u))
-y@[n:nis(y,0c)]
-satz240:=tris(cx,ts(ov(x,y,n),y),ts(y,ov(x,y,n)),x,comts(ov(x,y,n),y),satz229c(x,y,n)):is(ts(ov(x,y,n),y),x)
-satz241:=satz229h(ts(x,y),y,x,n,comts(y,x)):is(ov(ts(x,y),y,n),x)
-y@[n:nis(x,0c)][o:nis(y,0c)]
-lemma6:=th3"l.imp"(is(ov(x,y,o),0c),is(x,0c),n,[t:is(ov(x,y,o),0c)]tris1(cx,x,0c,ts(y,ov(x,y,o)),satz229c(x,y,o),satz221b(y,ov(x,y,o),t))):nis(ov(x,y,o),0c)
-satz242:=satz229h(x,ov(x,y,o),y,lemma6,satz240(o)):is(ov(x,ov(x,y,o),lemma6),y)
-z@[n:nis(y,0c)][o:nis(z,0c)]
-+5243
-t1:=tr3is(cx,ts(ts(y,z),ov(ov(x,y,n),z,o)),ts(ov(ov(x,y,n),z,o),ts(y,z)),ts(ov(ov(x,y,n),z,o),ts(z,y)),ts(ts(ov(ov(x,y,n),z,o),z),y),comts(ts(y,z),ov(ov(x,y,n),z,o)),ists2(ts(y,z),ts(z,y),ov(ov(x,y,n),z,o),comts(y,z)),assts2(ov(ov(x,y,n),z,o),z,y)):is(ts(ts(y,z),ov(ov(x,y,n),z,o)),ts(ts(ov(ov(x,y,n),z,o),z),y))
-t2:=tr3is(cx,ts(ts(y,z),ov(ov(x,y,n),z,o)),ts(ts(ov(ov(x,y,n),z,o),z),y),ts(ov(x,y,n),y),x,t1,ists1(ts(ov(ov(x,y,n),z,o),z),ov(x,y,n),y,satz240(ov(x,y,n),z,o)),satz240(x,y,n)):is(ts(ts(y,z),ov(ov(x,y,n),z,o)),x)
--5243
-satz243:=satz229g(x,ts(y,z),ov(ov(x,y,n),z,o),satz221d(y,z,n,o),t2".5243"):is(ov(ov(x,y,n),z,o),ov(x,ts(y,z),satz221d(y,z,n,o)))
-z@[n:nis(z,0c)]
-satz244:=satz229k(ts(x,y),z,ts(x,ov(y,z,n)),n,tris(cx,ts(ts(x,ov(y,z,n)),z),ts(x,ts(ov(y,z,n),z)),ts(x,y),assts1(x,ov(y,z,n),z),ists2(ts(ov(y,z,n),z),y,x,satz240(y,z,n)))):is(ov(ts(x,y),z,n),ts(x,ov(y,z,n)))
-satz244a:=symis(cx,ov(ts(x,y),z,n),ts(x,ov(y,z,n)),satz244):is(ts(x,ov(y,z,n)),ov(ts(x,y),z,n))
-satz244b:=tr3is(cx,ov(ts(x,y),z,n),ov(ts(y,x),z,n),ts(y,ov(x,z,n)),ts(ov(x,z,n),y),isov1(ts(x,y),ts(y,x),z,comts(x,y),n),satz244(y,x,z,n),comts(y,ov(x,z,n))):is(ov(ts(x,y),z,n),ts(ov(x,z,n),y))
-satz244c:=symis(cx,ov(ts(x,y),z,n),ts(ov(x,z,n),y),satz244b):is(ts(ov(x,z,n),y),ov(ts(x,y),z,n))
-z@[n:nis(y,0c)][o:nis(z,0c)]
-satz245:=satz229j(x,ov(y,z,o),ts(ov(x,y,n),z),lemma6(y,z,n,o),tr3is(cx,ts(ts(ov(x,y,n),z),ov(y,z,o)),ts(ov(x,y,n),ts(z,ov(y,z,o))),ts(ov(x,y,n),y),x,assts1(ov(x,y,n),z,ov(y,z,o)),ists2(ts(z,ov(y,z,o)),y,ov(x,y,n),satz229c(y,z,o)),satz240(x,y,n))):is(ts(ov(x,y,n),z),ov(x,ov(y,z,o),lemma6(y,z,n,o)))
-satz245a:=symis(cx,ts(ov(x,y,n),z),ov(x,ov(y,z,o),lemma6(y,z,n,o)),satz245):is(ov(x,ov(y,z,o),lemma6(y,z,n,o)),ts(ov(x,y,n),z))
-satz245b:=tris(cx,ov(x,ov(y,z,o),lemma6(y,z,n,o)),ts(ov(x,y,n),z),ov(ts(x,z),y,n),satz245a,satz244c(x,z,y,n)):is(ov(x,ov(y,z,o),lemma6(y,z,n,o)),ov(ts(x,z),y,n))
-satz245c:=tris(cx,ov(x,ov(y,z,o),lemma6(y,z,n,o)),ov(ts(x,z),y,n),ov(ts(z,x),y,n),satz245b,isov1(ts(x,z),ts(z,x),y,comts(x,z),n)):is(ov(x,ov(y,z,o),lemma6(y,z,n,o)),ov(ts(z,x),y,n))
-satz246:=satz229k(ts(x,z),ts(y,z),ov(x,y,n),satz221d(y,z,n,o),tris(cx,ts(ov(x,y,n),ts(y,z)),ts(ts(ov(x,y,n),y),z),ts(x,z),assts2(ov(x,y,n),y,z),ists1(ts(ov(x,y,n),y),x,z,satz240(x,y,n)))):is(ov(ts(x,z),ts(y,z),satz221d(y,z,n,o)),ov(x,y,n))
-satz246a:=tris(cx,ov(ts(z,x),ts(z,y),satz221d(z,y,o,n)),ov(ts(x,z),ts(y,z),satz221d(y,z,n,o)),ov(x,y,n),isov12(ts(z,x),ts(x,z),ts(z,y),ts(y,z),comts(z,x),comts(z,y),satz221d(z,y,o,n),satz221d(y,z,n,o)),satz246):is(ov(ts(z,x),ts(z,y),satz221d(z,y,o,n)),ov(x,y,n))
-z@[u:complex][n:nis(y,0c)][o:nis(u,0c)]
-+5247
-t1:=tr3is(cx,ts(ov(z,u,o),ts(u,y)),ts(ts(ov(z,u,o),u),y),ts(z,y),ts(y,z),assts2(ov(z,u,o),u,y),ists1(ts(ov(z,u,o),u),z,y,satz240(z,u,o)),comts(z,y)):is(ts(ov(z,u,o),ts(u,y)),ts(y,z))
-t2:=tr3is(cx,ts(ts(ov(x,y,n),ov(z,u,o)),ts(y,u)),ts(ts(ov(x,y,n),ov(z,u,o)),ts(u,y)),ts(ov(x,y,n),ts(ov(z,u,o),ts(u,y))),ts(ov(x,y,n),ts(y,z)),ists2(ts(y,u),ts(u,y),ts(ov(x,y,n),ov(z,u,o)),comts(y,u)),assts1(ov(x,y,n),ov(z,u,o),ts(u,y)),ists2(ts(ov(z,u,o),ts(u,y)),ts(y,z),ov(x,y,n),t1)):is(ts(ts(ov(x,y,n),ov(z,u,o)),ts(y,u)),ts(ov(x,y,n),ts(y,z)))
-t3:=tr3is(cx,ts(ts(ov(x,y,n),ov(z,u,o)),ts(y,u)),ts(ov(x,y,n),ts(y,z)),ts(ts(ov(x,y,n),y),z),ts(x,z),t2,assts2(ov(x,y,n),y,z),ists1(ts(ov(x,y,n),y),x,z,satz240(x,y,n))):is(ts(ts(ov(x,y,n),ov(z,u,o)),ts(y,u)),ts(x,z))
--5247
-satz247:=satz229j(ts(x,z),ts(y,u),ts(ov(x,y,n),ov(z,u,o)),satz221d(y,u,n,o),t3".5247"):is(ts(ov(x,y,n),ov(z,u,o)),ov(ts(x,z),ts(y,u),satz221d(y,u,n,o)))
-u@[n:nis(y,0c)][o:nis(z,0c)][p:nis(u,0c)]
-+5248
-t1:=tris(cx,ts(ts(x,u),z),ts(x,ts(u,z)),ts(x,ts(z,u)),assts1(x,u,z),ists2(ts(u,z),ts(z,u),x,comts(u,z))):is(ts(ts(x,u),z),ts(x,ts(z,u)))
-t2:=tr3is(cx,ts(ov(ts(x,u),ts(y,z),satz221d(y,z,n,o)),ov(z,u,p)),ov(ts(ts(x,u),z),ts(ts(y,z),u),satz221d(ts(y,z),u,satz221d(y,z,n,o),p)),ov(ts(x,ts(z,u)),ts(y,ts(z,u)),satz221d(y,ts(z,u),n,satz221d(z,u,o,p))),ov(x,y,n),satz247(ts(x,u),ts(y,z),z,u,satz221d(y,z,n,o),p),isov12(ts(ts(x,u),z),ts(x,ts(z,u)),ts(ts(y,z),u),ts(y,ts(z,u)),t1,assts1(y,z,u),satz221d(ts(y,z),u,satz221d(y,z,n,o),p),satz221d(y,ts(z,u),n,satz221d(z,u,o,p))),satz246(x,y,ts(z,u),n,satz221d(z,u,o,p))):is(ts(ov(ts(x,u),ts(y,z),satz221d(y,z,n,o)),ov(z,u,p)),ov(x,y,n))
--5248
-satz248:=satz229k(ov(x,y,n),ov(z,u,p),ov(ts(x,u),ts(y,z),satz221d(y,z,n,o)),lemma6(z,u,o,p),t2".5248"):is(ov(ov(x,y,n),ov(z,u,p),lemma6(z,u,o,p)),ov(ts(x,u),ts(y,z),satz221d(y,z,n,o)))
-x@[n:nis(x,0c)]
-satz249:=satz229h(0c,x,0c,n,satz221b(x,0c,refis(cx,0c))):is(ov(0c,x,n),0c)
-satz250:=satz229h(x,x,1c,n,satz222(x)):is(ov(x,x,n),1c)
-y@[n:nis(y,0c)][i:is(x,y)]
-satz251a:=tris(cx,ov(x,y,n),ov(x,x,th2"e.notis"(cx,y,0c,x,n,i)),1c,isov2(y,x,x,symis(cx,x,y,i),n,th2"e.notis"(cx,y,0c,x,n,i)),satz250(x,th2"e.notis"(cx,y,0c,x,n,i))):is(ov(x,y,n),1c)
-n@[i:is(ov(x,y,n),1c)]
-satz251b:=tr3is(cx,x,ts(y,ov(x,y,n)),ts(y,1c),y,satz229d(x,y,n),ists2(ov(x,y,n),1c,y,i),satz222(y)):is(x,y)
-u@[n:nis(y,0c)][o:nis(u,0c)][i:is(ov(x,y,n),ov(z,u,o))]
-+5252
-[j:is(z,0c)]
-t1:=tr3is(cx,ov(x,y,n),ov(z,u,o),ov(0c,u,o),0c,i,isov1(z,0c,u,j,o),satz249(u,o)):is(ov(x,y,n),0c)
-t2:=tris(cx,x,ts(y,ov(x,y,n)),0c,satz229d(x,y,n),satz221b(y,ov(x,y,n),t1)):is(x,0c)
-t3:=tris2(cx,ts(x,u),ts(y,z),0c,satz221a(x,u,t2),satz221b(y,z,j)):is(ts(x,u),ts(y,z))
-i@[p:nis(z,0c)]
-t4:=tris1(cx,ov(ts(x,u),ts(y,z),satz221d(y,z,n,p)),1c,ov(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o)),satz248(x,y,z,u,n,p,o),satz251a(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o),i)):is(ov(ts(x,u),ts(y,z),satz221d(y,z,n,p)),1c)
-t5:=satz251b(ts(x,u),ts(y,z),satz221d(y,z,n,p),t4):is(ts(x,u),ts(y,z))
--5252
-satz252a:=th1"l.imp"(is(z,0c),is(ts(x,u),ts(y,z)),[t:is(z,0c)]t3".5252"(t),[t:nis(z,0c)]t5".5252"(t)):is(ts(x,u),ts(y,z))
-o@[i:is(ts(x,u),ts(y,z))]
-+*5252
-i@[j:is(z,0c)]
-t6:=tris(cx,ts(x,u),ts(y,z),0c,i,satz221b(y,z,j)):is(ts(x,u),0c)
-t7:=ore1(is(x,0c),is(u,0c),satz221c(x,u,t6),o):is(x,0c)
-t8:=tris2(cx,ov(x,y,n),ov(z,u,o),0c,tris(cx,ov(x,y,n),ov(0c,y,n),0c,isov1(x,0c,y,t7,n),satz249(y,n)),tris(cx,ov(z,u,o),ov(0c,u,o),0c,isov1(z,0c,u,j,o),satz249(u,o))):is(ov(x,y,n),ov(z,u,o))
-i@[p:nis(z,0c)]
-t9:=tris(cx,ov(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o)),ov(ts(x,u),ts(y,z),satz221d(y,z,n,p)),1c,satz248(x,y,z,u,n,p,o),satz251a(ts(x,u),ts(y,z),satz221d(y,z,n,p),i)):is(ov(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o)),1c)
-t10:=satz251b(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o),t9):is(ov(x,y,n),ov(z,u,o))
--5252
-i@satz252b:=th1"l.imp"(is(z,0c),is(ov(x,y,n),ov(z,u,o)),[t:is(z,0c)]t8".5252"(t),[t:nis(z,0c)]t10".5252"(t)):is(ov(x,y,n),ov(z,u,o))
-z@[n:nis(y,0c)]
-satz253:=satz229g(pl(x,z),y,pl(ov(x,y,n),ov(z,y,n)),n,tris(cx,ts(y,pl(ov(x,y,n),ov(z,y,n))),pl(ts(y,ov(x,y,n)),ts(y,ov(z,y,n))),pl(x,z),disttp2(y,ov(x,y,n),ov(z,y,n)),ispl12(ts(y,ov(x,y,n)),x,ts(y,ov(z,y,n)),z,satz229c(x,y,n),satz229c(z,y,n)))):is(pl(ov(x,y,n),ov(z,y,n)),ov(pl(x,z),y,n))
-z@[n:nis(z,0c)]
-distop:=symis(cx,pl(ov(x,z,n),ov(y,z,n)),ov(pl(x,y),z,n),satz253(x,z,y,n)):is(ov(pl(x,y),z,n),pl(ov(x,z,n),ov(y,z,n)))
-distpo:=satz253(x,z,y,n):is(pl(ov(x,z,n),ov(y,z,n)),ov(pl(x,y),z,n))
-u@[n:nis(y,0c)][o:nis(u,0c)]
-satz254:=tris1(cx,pl(ov(x,y,n),ov(z,u,o)),ov(pl(ts(x,u),ts(y,z)),ts(y,u),satz221d(y,u,n,o)),pl(ov(ts(x,u),ts(y,u),satz221d(y,u,n,o)),ov(ts(y,z),ts(y,u),satz221d(y,u,n,o))),ispl12(ov(ts(x,u),ts(y,u),satz221d(y,u,n,o)),ov(x,y,n),ov(ts(y,z),ts(y,u),satz221d(y,u,n,o)),ov(z,u,o),satz246(x,y,u,n,o),satz246a(z,u,y,o,n)),satz253(ts(x,u),ts(y,u),ts(y,z),satz221d(y,u,n,o))):is(pl(ov(x,y,n),ov(z,u,o)),ov(pl(ts(x,u),ts(y,z)),ts(y,u),satz221d(y,u,n,o)))
-z@[n:nis(y,0c)]
-satz255:=satz229g(mn(x,z),y,mn(ov(x,y,n),ov(z,y,n)),n,tris(cx,ts(y,mn(ov(x,y,n),ov(z,y,n))),mn(ts(y,ov(x,y,n)),ts(y,ov(z,y,n))),mn(x,z),disttm2(y,ov(x,y,n),ov(z,y,n)),ismn12(ts(y,ov(x,y,n)),x,ts(y,ov(z,y,n)),z,satz229c(x,y,n),satz229c(z,y,n)))):is(mn(ov(x,y,n),ov(z,y,n)),ov(mn(x,z),y,n))
-z@[n:nis(z,0c)]
-distom:=symis(cx,mn(ov(x,z,n),ov(y,z,n)),ov(mn(x,y),z,n),satz255(x,z,y,n)):is(ov(mn(x,y),z,n),mn(ov(x,z,n),ov(y,z,n)))
-distmo:=satz255(x,z,y,n):is(mn(ov(x,z,n),ov(y,z,n)),ov(mn(x,y),z,n))
-u@[n:nis(y,0c)][o:nis(u,0c)]
-satz256:=tris1(cx,mn(ov(x,y,n),ov(z,u,o)),ov(mn(ts(x,u),ts(y,z)),ts(y,u),satz221d(y,u,n,o)),mn(ov(ts(x,u),ts(y,u),satz221d(y,u,n,o)),ov(ts(y,z),ts(y,u),satz221d(y,u,n,o))),ismn12(ov(ts(x,u),ts(y,u),satz221d(y,u,n,o)),ov(x,y,n),ov(ts(y,z),ts(y,u),satz221d(y,u,n,o)),ov(z,u,o),satz246(x,y,u,n,o),satz246a(z,u,y,o,n)),satz255(ts(x,u),ts(y,u),ts(y,z),satz221d(y,u,n,o))):is(mn(ov(x,y,n),ov(z,u,o)),ov(mn(ts(x,u),ts(y,z)),ts(y,u),satz221d(y,u,n,o)))
-x@conj:=pli(re(x),m0"r"(im(x))):complex
-b@conjisa:=isrecx12(re(pli(a,b)),a,m0"r"(im(pli(a,b))),m0"r"(b),reis(a,b),ism0"r"(im(pli(a,b)),b,imis(a,b))):is(conj(pli(a,b)),pli(a,m0"r"(b)))
-conjisb:=symis(cx,conj(pli(a,b)),pli(a,m0"r"(b)),conjisa):is(pli(a,m0"r"(b)),conj(pli(a,b)))
-y@[i:is(x,y)]
-isconj:=isf(cx,cx,[t:cx]conj(t),x,y,i):is(conj(x),conj(y))
-x@satz257:=tr3is(cx,conj(conj(x)),pli(re(x),m0"r"(m0"r"(im(x)))),pli(re(x),im(x)),x,conjisa(re(x),m0"r"(im(x))),isrecx2(m0"r"(m0"r"(im(x))),im(x),re(x),satz177(im(x))),pliis(x)):is(conj(conj(x)),x)
-[i:is(x,0c)]
-satz258a:=tr3is(cx,conj(x),conj(0c),pli(0,m0"r"(0)),0c,isconj(x,0c,i),conjisa(0,0),isrecx2(m0"r"(0),0,0,satz176b(0,refis(real,0)))):is(conj(x),0c)
-x@[i:is(conj(x),0c)]
-+6258
-t1:=tris(real,re(x),re(conj(x)),0,isre(re(x),m0"r"(im(x))),lemma1(conj(x),i)):is"r"(re(x),0)
-t2:=satz176e(im(x),tris(real,m0"r"(im(x)),im(conj(x)),0,isim(re(x),m0"r"(im(x))),lemma2(conj(x),i))):is"r"(im(x),0)
--6258
-satz258b:=tris(cx,x,pli(re(x),im(x)),0c,ispli(x),isrecx12(re(x),0,im(x),0,t1".6258",t2".6258")):is(x,0c)
-+*6258
-i@anders:=tris1(cx,x,0c,conj(conj(x)),satz257,satz258a(conj(x),i)):is(x,0c)
--6258
-x@[n:nis(x,0c)]
-satz258c:=th3"l.imp"(is(conj(x),0c),is(x,0c),n,[t:is(conj(x),0c)]satz258b(t)):nis(conj(x),0c)
-x@[i:is(conj(x),x)]
-+6259
-t1:=tris(real,m0"r"(im(x)),im(conj(x)),im(x),isim(re(x),m0"r"(im(x))),isceim(conj(x),x,i)):is"r"(m0"r"(im(x)),im(x))
--6259
-satz259a:=lemma10(im(x),symis(real,m0"r"(im(x)),im(x),t1".6259")):is"r"(im(x),0)
-x@[i:is"r"(im(x),0)]
-satz259b:=tris(cx,conj(x),pli(re(x),im(x)),x,isrecx2(m0"r"(im(x)),im(x),re(x),tris2(real,m0"r"(im(x)),im(x),0,satz176b(im(x),i),i)),pliis(x)):is(conj(x),x)
-x@[i:is(x,conj(x))]
-satz269c:=satz259a(x,symis(cx,x,conj(x),i)):is"r"(im(x),0)
-x@[i:is"r"(im(x),0)]
-satz269d:=symis(cx,conj(x),x,satz259b(i)):is(x,conj(x))
-y@satz260:=tr3is(cx,conj(pl(x,y)),pli(pl"r"(re(x),re(y)),m0"r"(pl"r"(im(x),im(y)))),pli(pl"r"(re(x),re(y)),pl"r"(m0"r"(im(x)),m0"r"(im(y)))),pl(conj(x),conj(y)),conjisa(pl"r"(re(x),re(y)),pl"r"(im(x),im(y))),isrecx2(m0"r"(pl"r"(im(x),im(y))),pl"r"(m0"r"(im(x)),m0"r"(im(y))),pl"r"(re(x),re(y)),satz180(im(x),im(y))),plis12b(re(x),m0"r"(im(x)),re(y),m0"r"(im(y)))):is(conj(pl(x,y)),pl(conj(x),conj(y)))
-satz260a:=symis(cx,conj(pl(x,y)),pl(conj(x),conj(y)),satz260):is(pl(conj(x),conj(y)),conj(pl(x,y)))
-+6261
-t1:=tris(real,m0"r"(imts(x,y)),pl"r"(m0"r"(ts"r"(re(x),im(y))),m0"r"(ts"r"(im(x),re(y)))),pl"r"(ts"r"(re(x),m0"r"(im(y))),ts"r"(m0"r"(im(x)),re(y))),satz180(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))),ispl12"r"(m0"r"(ts"r"(re(x),im(y))),ts"r"(re(x),m0"r"(im(y))),m0"r"(ts"r"(im(x),re(y))),ts"r"(m0"r"(im(x)),re(y)),satz197f(re(x),im(y)),satz197e(im(x),re(y)))):is"r"(m0"r"(imts(x,y)),pl"r"(ts"r"(re(x),m0"r"(im(y))),ts"r"(m0"r"(im(x)),re(y))))
--6261
-satz261:=tr3is(cx,conj(ts(x,y)),pli(rets(x,y),m0"r"(imts(x,y))),pli(mn"r"(ts"r"(re(x),re(y)),ts"r"(m0"r"(im(x)),m0"r"(im(y)))),pl"r"(ts"r"(re(x),m0"r"(im(y))),ts"r"(m0"r"(im(x)),re(y)))),ts(conj(x),conj(y)),conjisa(rets(x,y),imts(x,y)),isrecx12(rets(x,y),mn"r"(ts"r"(re(x),re(y)),ts"r"(m0"r"(im(x)),m0"r"(im(y)))),m0"r"(imts(x,y)),pl"r"(ts"r"(re(x),m0"r"(im(y))),ts"r"(m0"r"(im(x)),re(y))),ismn2"r"(ts"r"(im(x),im(y)),ts"r"(m0"r"(im(x)),m0"r"(im(y))),ts"r"(re(x),re(y)),satz198a(im(x),im(y))),t1".6261"),tsis12b(re(x),m0"r"(im(x)),re(y),m0"r"(im(y)))):is(conj(ts(x,y)),ts(conj(x),conj(y)))
-satz261a:=symis(cx,conj(ts(x,y)),ts(conj(x),conj(y)),satz261):is(ts(conj(x),conj(y)),conj(ts(x,y)))
-+6262
-t1:=symis(cx,pl(mn(x,y),y),x,satz230(x,y)):is(x,pl(mn(x,y),y))
-t2:=tris(cx,conj(x),conj(pl(mn(x,y),y)),pl(conj(mn(x,y)),conj(y)),isconj(x,pl(mn(x,y),y),t1),satz260(mn(x,y),y)):is(conj(x),pl(conj(mn(x,y)),conj(y)))
--6262
-satz262:=satz212f(conj(x),conj(y),conj(mn(x,y)),symis(cx,conj(x),pl(conj(mn(x,y)),conj(y)),t2".6262")):is(conj(mn(x,y)),mn(conj(x),conj(y)))
-satz262a:=symis(cx,conj(mn(x,y)),mn(conj(x),conj(y)),satz262):is(mn(conj(x),conj(y)),conj(mn(x,y)))
-[n:nis(y,0c)]
-+6263
-t1:=satz229f(x,y,n):is(x,ts(ov(x,y,n),y))
-t2:=isconj(x,ts(ov(x,y,n),y),t1):is(conj(x),conj(ts(ov(x,y,n),y)))
-t3:=satz261(ov(x,y,n),y):is(conj(ts(ov(x,y,n),y)),ts(conj(ov(x,y,n)),conj(y)))
-t4:=tris(cx,conj(x),conj(ts(ov(x,y,n),y)),ts(conj(ov(x,y,n)),conj(y)),t2,t3):is(conj(x),ts(conj(ov(x,y,n)),conj(y)))
-t5:=satz258c(y,n):nis(conj(y),0c)
--6263
-satz263:=satz229j(conj(x),conj(y),conj(ov(x,y,n)),t5".6263",symis(cx,conj(x),ts(conj(ov(x,y,n)),conj(y)),t4".6263")):is(conj(ov(x,y,n)),ov(conj(x),conj(y),satz258c(y,n)))
-satz263a:=symis(cx,conj(ov(x,y,n)),ov(conj(x),conj(y),satz258c(y,n)),satz263):is(ov(conj(x),conj(y),satz258c(y,n)),conj(ov(x,y,n)))
-x@mod:=sqrt(mod2(x),lemma5(x)):real
-y@[i:is(x,y)]
-ismod:=isf(cx,real,[t:cx]mod(t),x,y,i):is"r"(mod(x),mod(y))
-x@[n:nis(x,0c)]
-satz264a:=sqrtnot0(mod2(x),lemma5(x),pnot0(mod2(x),lemma4(x,n))):pos(mod(x))
-x@[i:is(x,0c)]
-satz264b:=sqrt0(mod2(x),lemma5(x),lemma3(x,i)):is"r"(mod(x),0)
-x@satz264c:=thsqrt1a(mod2(x),lemma5(x)):not(neg(mod(x)))
-satz264d:=satz167f(mod(x),0,th3"l.imp"(less(mod(x),0),neg(mod(x)),satz264c,[t:less(mod(x),0)]satz169d(mod(x),t))):moreis(mod(x),0)
-+7265
-t1:=symis(real,ts"r"(mod(x),mod(x)),mod2(x),thsqrt1b(mod2(x),lemma5(x))):is"r"(mod2(x),ts"r"(mod(x),mod(x)))
-t2:=tris(real,pl"r"(ts"r"(re(x),re(x)),0),ts"r"(re(x),re(x)),ts"r"(abs(re(x)),abs(re(x))),pl02(ts"r"(re(x),re(x)),0,refis(real,0)),lemma12"r"(re(x))):is"r"(pl"r"(ts"r"(re(x),re(x)),0),ts"r"(abs(re(x)),abs(re(x))))
-t3:=satz191(ts"r"(re(x),re(x)),ts"r"(re(x),re(x)),ts"r"(im(x),im(x)),0,moreisi2(ts"r"(re(x),re(x)),ts"r"(re(x),re(x)),refis(real,ts"r"(re(x),re(x)))),lemma11"r"(im(x))):moreis(mod2(x),pl"r"(ts"r"(re(x),re(x)),0))
-t4:=ismoreis12(mod2(x),ts"r"(mod(x),mod(x)),pl"r"(ts"r"(re(x),re(x)),0),ts"r"(abs(re(x)),abs(re(x))),t1,t2,t3):moreis(ts"r"(mod(x),mod(x)),ts"r"(abs(re(x)),abs(re(x))))
-t5:=tris(real,pl"r"(0,ts"r"(im(x),im(x))),ts"r"(im(x),im(x)),ts"r"(abs(im(x)),abs(im(x))),pl01(0,ts"r"(im(x),im(x)),refis(real,0)),lemma12"r"(im(x))):is"r"(pl"r"(0,ts"r"(im(x),im(x))),ts"r"(abs(im(x)),abs(im(x))))
-t6:=satz191(ts"r"(re(x),re(x)),0,ts"r"(im(x),im(x)),ts"r"(im(x),im(x)),lemma11"r"(re(x)),moreisi2(ts"r"(im(x),im(x)),ts"r"(im(x),im(x)),refis(real,ts"r"(im(x),im(x))))):moreis(mod2(x),pl"r"(0,ts"r"(im(x),im(x))))
-t7:=ismoreis12(mod2(x),ts"r"(mod(x),mod(x)),pl"r"(0,ts"r"(im(x),im(x))),ts"r"(abs(im(x)),abs(im(x))),t1,t5,t6):moreis(ts"r"(mod(x),mod(x)),ts"r"(abs(im(x)),abs(im(x))))
-@[r:real][s:real][m:moreis(ts"r"(r,r),ts"r"(s,s))][n:moreis(r,0)][l:less(r,s)]
-t8:=lemma2"r"(r,s,l):more(s,r)
-t9:=satz169b(s,satz172d(s,r,0,t8,n)):pos(s)
-[o:more(r,0)]
-t10:=trmore(ts"r"(s,s),ts"r"(r,s),ts"r"(r,r),satz203a(s,r,s,t8,t9),satz203d(s,r,r,t8,satz169b(r,o))):more(ts"r"(s,s),ts"r"(r,r))
-l@[i:is"r"(r,0)]
-t11:=ismore2(0,ts"r"(r,r),ts"r"(s,s),symis(real,ts"r"(r,r),0,ts01(r,r,i)),satz169a(ts"r"(s,s),possq(s,pnot0(s,t9)))):more(ts"r"(s,s),ts"r"(r,r))
-l@t12:=lemma1"r"(ts"r"(s,s),ts"r"(r,r),orapp(more(r,0),is"r"(r,0),more(ts"r"(s,s),ts"r"(r,r)),n,[t:more(r,0)]t10(t),[t:is"r"(r,0)]t11(t))):less(ts"r"(r,r),ts"r"(s,s))
-n@t13:=satz167f(r,s,[t:less(r,s)]<t12(t)>satz167c(ts"r"(r,r),ts"r"(s,s),m)):moreis(r,s)
--7265
-satz265a:=t13".7265"(mod(x),abs(re(x)),t4".7265",satz264d(x)):moreis(mod(x),abs(re(x)))
-satz265b:=t13".7265"(mod(x),abs(im(x)),t7".7265",satz264d(x)):moreis(mod(x),abs(im(x)))
-@[r:real][s:real][i:is(ts(pli(r,0),pli(r,0)),ts(pli(s,0),pli(s,0)))][n:not(neg(r))][o:not(neg(s))]
-+7266
-@[t:real]
-t1:=pl02(ts"r"(t,t),m0"r"(ts"r"(0,0)),satz176b(ts"r"(0,0),ts01(0,0,refis(real,0)))):is"r"(mn"r"(ts"r"(t,t),ts"r"(0,0)),ts"r"(t,t))
-t2:=tris(real,pl"r"(ts"r"(t,0),ts"r"(0,t)),ts"r"(t,0),0,pl02(ts"r"(t,0),ts"r"(0,t),ts01(0,t,refis(real,0))),ts02(t,0,refis(real,0))):is"r"(pl"r"(ts"r"(t,0),ts"r"(0,t)),0)
-t3:=tris(cx,ts(pli(t,0),pli(t,0)),pli(mn"r"(ts"r"(t,t),ts"r"(0,0)),pl"r"(ts"r"(t,0),ts"r"(0,t))),pli(ts"r"(t,t),0),tsis12a(t,0,t,0),isrecx12(mn"r"(ts"r"(t,t),ts"r"(0,0)),ts"r"(t,t),pl"r"(ts"r"(t,0),ts"r"(0,t)),0,t1,t2)):is(ts(pli(t,0),pli(t,0)),pli(ts"r"(t,t),0))
-o@t4:=tr3is(cx,pli(ts"r"(r,r),0),ts(pli(r,0),pli(r,0)),ts(pli(s,0),pli(s,0)),pli(ts"r"(s,s),0),symis(cx,ts(pli(r,0),pli(r,0)),pli(ts"r"(r,r),0),t3(r)),i,t3(s)):is(pli(ts"r"(r,r),0),pli(ts"r"(s,s),0))
-t5:=tr3is(real,ts"r"(r,r),re(pli(ts"r"(r,r),0)),re(pli(ts"r"(s,s),0)),ts"r"(s,s),isre(ts"r"(r,r),0),iscere(pli(ts"r"(r,r),0),pli(ts"r"(s,s),0),t4),reis(ts"r"(s,s),0)):is"r"(ts"r"(r,r),ts"r"(s,s))
-t6:=andi(not(neg(r)),is"r"(ts"r"(r,r),ts"r"(s,s)),n,t5):and(not(neg(r)),is"r"(ts"r"(r,r),ts"r"(s,s)))
-t7:=andi(not(neg(s)),is"r"(ts"r"(s,s),ts"r"(s,s)),o,refis(real,ts"r"(s,s))):and(not(neg(s)),is"r"(ts"r"(s,s),ts"r"(s,s)))
--7266
-satz266:=satzr161b(ts"r"(s,s),r,s,t6".7266",t7".7266"):is"r"(r,s)
-+7267
-x@t1:=tris(cx,ts(pli(mod(x),0),pli(mod(x),0)),pli(ts"r"(mod(x),mod(x)),0),pli(mod2(x),0),t3"c.7266"(mod(x)),isrecx1(ts"r"(mod(x),mod(x)),mod2(x),0,thsqrt1b(mod2(x),lemma5(x)))):is(ts(pli(mod(x),0),pli(mod(x),0)),pli(mod2(x),0))
-t2:=ispl2"r"(m0"r"(ts"r"(im(x),m0"r"(im(x)))),ts"r"(im(x),im(x)),ts"r"(re(x),re(x)),tris(real,m0"r"(ts"r"(im(x),m0"r"(im(x)))),ts"r"(m0"r"(im(x)),m0"r"(im(x))),ts"r"(im(x),im(x)),satz197e(im(x),m0"r"(im(x))),satz198(im(x),im(x)))):is"r"(mn"r"(ts"r"(re(x),re(x)),ts"r"(im(x),m0"r"(im(x)))),mod2(x))
-t3:=tris(real,pl"r"(ts"r"(re(x),m0"r"(im(x))),ts"r"(im(x),re(x))),pl"r"(m0"r"(ts"r"(re(x),im(x))),ts"r"(re(x),im(x))),0,ispl12"r"(ts"r"(re(x),m0"r"(im(x))),m0"r"(ts"r"(re(x),im(x))),ts"r"(im(x),re(x)),ts"r"(re(x),im(x)),satz197b(re(x),im(x)),comts"r"(im(x),re(x))),satz179a(ts"r"(re(x),im(x)))):is"r"(pl"r"(ts"r"(re(x),m0"r"(im(x))),ts"r"(im(x),re(x))),0)
-t4:=tris(cx,ts(x,conj(x)),pli(mn"r"(ts"r"(re(x),re(x)),ts"r"(im(x),m0"r"(im(x)))),pl"r"(ts"r"(re(x),m0"r"(im(x))),ts"r"(im(x),re(x)))),pli(mod2(x),0),tsis2a(x,re(x),m0"r"(im(x))),isrecx12(mn"r"(ts"r"(re(x),re(x)),ts"r"(im(x),m0"r"(im(x)))),mod2(x),pl"r"(ts"r"(re(x),m0"r"(im(x))),ts"r"(im(x),re(x))),0,t2,t3)):is(ts(x,conj(x)),pli(mod2(x),0))
--7267
-x@satz267:=tris2(cx,ts(pli(mod(x),0),pli(mod(x),0)),ts(x,conj(x)),pli(mod2(x),0),t1".7267",t4".7267"):is(ts(pli(mod(x),0),pli(mod(x),0)),ts(x,conj(x)))
-satz267a:=symis(cx,ts(pli(mod(x),0),pli(mod(x),0)),ts(x,conj(x)),satz267):is(ts(x,conj(x)),ts(pli(mod(x),0),pli(mod(x),0)))
-+7268
-z@t1:=tr3is(cx,ts(x,ts(y,z)),ts(ts(x,y),z),ts(ts(y,x),z),ts(y,ts(x,z)),assts2(x,y,z),ists1(ts(x,y),ts(y,x),z,comts(x,y)),assts1(y,x,z)):is(ts(x,ts(y,z)),ts(y,ts(x,z)))
-[u:complex]
-t2:=tr3is(cx,ts(ts(x,y),ts(z,u)),ts(x,ts(y,ts(z,u))),ts(x,ts(z,ts(y,u))),ts(ts(x,z),ts(y,u)),assts1(x,y,ts(z,u)),ists2(ts(y,ts(z,u)),ts(z,ts(y,u)),x,t1(y,z,u)),assts2(x,z,ts(y,u))):is(ts(ts(x,y),ts(z,u)),ts(ts(x,z),ts(y,u)))
-y@t3:=tr3is(cx,ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(x,y),conj(ts(x,y))),ts(ts(x,y),ts(conj(x),conj(y))),ts(ts(x,conj(x)),ts(y,conj(y))),satz267(ts(x,y)),ists2(conj(ts(x,y)),ts(conj(x),conj(y)),ts(x,y),satz261(x,y)),t2(x,y,conj(x),conj(y))):is(ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(x,conj(x)),ts(y,conj(y))))
-t4:=tr3is(cx,ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(x,conj(x)),ts(y,conj(y))),ts(ts(pli(mod(x),0),pli(mod(x),0)),ts(pli(mod(y),0),pli(mod(y),0))),ts(ts(pli(mod(x),0),pli(mod(y),0)),ts(pli(mod(x),0),pli(mod(y),0))),t3,ists12(ts(x,conj(x)),ts(pli(mod(x),0),pli(mod(x),0)),ts(y,conj(y)),ts(pli(mod(y),0),pli(mod(y),0)),satz267a(x),satz267a(y)),t2(pli(mod(x),0),pli(mod(x),0),pli(mod(y),0),pli(mod(y),0))):is(ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(pli(mod(x),0),pli(mod(y),0)),ts(pli(mod(x),0),pli(mod(y),0))))
-@[r:real][s:real]
-t5:=pl02(ts"r"(r,s),m0"r"(ts"r"(0,0)),satz176b(ts"r"(0,0),ts01(0,0,refis(real,0)))):is"r"(mn"r"(ts"r"(r,s),ts"r"(0,0)),ts"r"(r,s))
-t6:=tris(real,pl"r"(ts"r"(r,0),ts"r"(0,s)),ts"r"(r,0),0,pl02(ts"r"(r,0),ts"r"(0,s),ts01(0,s,refis(real,0))),ts02(r,0,refis(real,0))):is"r"(pl"r"(ts"r"(r,0),ts"r"(0,s)),0)
-t7:=tris(cx,ts(pli(r,0),pli(s,0)),pli(mn"r"(ts"r"(r,s),ts"r"(0,0)),pl"r"(ts"r"(r,0),ts"r"(0,s))),pli(ts"r"(r,s),0),tsis12a(r,0,s,0),isrecx12(mn"r"(ts"r"(r,s),ts"r"(0,0)),ts"r"(r,s),pl"r"(ts"r"(r,0),ts"r"(0,s)),0,t5,t6)):is(ts(pli(r,0),pli(s,0)),pli(ts"r"(r,s),0))
-y@t8:=tris(cx,ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(pli(mod(x),0),pli(mod(y),0)),ts(pli(mod(x),0),pli(mod(y),0))),ts(pli(ts"r"(mod(x),mod(y)),0),pli(ts"r"(mod(x),mod(y)),0)),t4,ists12(ts(pli(mod(x),0),pli(mod(y),0)),pli(ts"r"(mod(x),mod(y)),0),ts(pli(mod(x),0),pli(mod(y),0)),pli(ts"r"(mod(x),mod(y)),0),t7(mod(x),mod(y)),t7(mod(x),mod(y)))):is(ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(pli(ts"r"(mod(x),mod(y)),0),pli(ts"r"(mod(x),mod(y)),0)))
-[n:neg(ts"r"(mod(x),mod(y)))]
-t9:=orapp(and(pos(mod(x)),neg(mod(y))),and(neg(mod(x)),pos(mod(y))),con,satz196h(mod(x),mod(y),n),[t:and(pos(mod(x)),neg(mod(y)))]<ande2(pos(mod(x)),neg(mod(y)),t)>satz264c(y),[t:and(neg(mod(x)),pos(mod(y)))]<ande1(neg(mod(x)),pos(mod(y)),t)>satz264c(x)):con
--7268
-y@satz268:=satz266(mod(ts(x,y)),ts"r"(mod(x),mod(y)),t8".7268",satz264c(ts(x,y)),[t:neg(ts"r"(mod(x),mod(y)))]t9".7268"(t)):is"r"(mod(ts(x,y)),ts"r"(mod(x),mod(y)))
-satz268a:=symis(real,mod(ts(x,y)),ts"r"(mod(x),mod(y)),satz268):is"r"(ts"r"(mod(x),mod(y)),mod(ts(x,y)))
-[n:nis(y,0c)]
-+7269
-t1:=pnot0(mod(y),satz264a(y,n)):nis"r"(mod(y),0)
-t2:=tris1(real,ts"r"(mod(ov(x,y,n)),mod(y)),mod(x),mod(ts(ov(x,y,n),y)),satz268(ov(x,y,n),y),ismod(ts(ov(x,y,n),y),x,satz240(x,y,n))):is"r"(ts"r"(mod(ov(x,y,n)),mod(y)),mod(x))
-t3:=satz204g(mod(x),mod(y),mod(ov(x,y,n)),t1,tris(real,ts"r"(mod(y),mod(ov(x,y,n))),ts"r"(mod(ov(x,y,n)),mod(y)),mod(x),comts"r"(mod(y),mod(ov(x,y,n))),t2)):is"r"(mod(ov(x,y,n)),ov"r"(mod(x),mod(y),t1))
--7269
-satz269:=t3".7269":is"r"(mod(ov(x,y,n)),ov"r"(mod(x),mod(y),pnot0(mod(y),satz264a(y,n))))
-y@[i:is(pl(x,y),1c)]
-+7270
-@[r:real]
-t1:=th1"l.imp"(neg(r),moreis(abs(r),r),[t:neg(r)]moreisi1(abs(r),r,trmore(abs(r),0,r,satz169a(abs(r),satz166b(r,t)),lemma2"r"(r,0,satz169c(r,t)))),[t:not(neg(r))]moreisi2(abs(r),r,absnn(r,t))):moreis(abs(r),r)
-x@t2:=trmoreis(mod(x),abs(re(x)),re(x),satz265a(x),t1(re(x))):moreis(mod(x),re(x))
-i@t3:=tr3is(real,pl"r"(re(x),re(y)),re(pl(x,y)),re(1c),1rl,isre(pl"r"(re(x),re(y)),pl"r"(im(x),im(y))),iscere(pl(x,y),1c,i),reis(1rl,0)):is"r"(pl"r"(re(x),re(y)),1rl)
--7270
-satz270:=ismoreis2(pl"r"(re(x),re(y)),1rl,pl"r"(mod(x),mod(y)),t3".7270",satz191(mod(x),re(x),mod(y),re(y),t2".7270",t2".7270"(y))):moreis(pl"r"(mod(x),mod(y)),1rl)
-+7271
-y@[i:is(pl(x,y),0c)]
-t1:=satz264b(pl(x,y),i):is"r"(mod(pl(x,y)),0)
-t2:=ismoreis2(pl"r"(0,0),mod(pl(x,y)),pl"r"(mod(x),mod(y)),tris2(real,pl"r"(0,0),mod(pl(x,y)),0,pl01(0,0,refis(real,0)),t1),satz191(mod(x),0,mod(y),0,satz264d(x),satz264d(y))):moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y)))
-y@[n:nis(pl(x,y),0c)]
-t3:=pnot0(mod(pl(x,y)),satz264a(pl(x,y),n)):nis"r"(mod(pl(x,y)),0)
-t4:=tris(cx,pl(ov(x,pl(x,y),n),ov(y,pl(x,y),n)),ov(pl(x,y),pl(x,y),n),1c,satz253(x,pl(x,y),y,n),satz250(pl(x,y),n)):is(pl(ov(x,pl(x,y),n),ov(y,pl(x,y),n)),1c)
-t5:=satz270(ov(x,pl(x,y),n),ov(y,pl(x,y),n),t4):moreis(pl"r"(mod(ov(x,pl(x,y),n)),mod(ov(y,pl(x,y),n))),1rl)
-fx:=ov"r"(mod(x),mod(pl(x,y)),t3):real
-fy:=ov"r"(mod(y),mod(pl(x,y)),t3):real
-t6:=ismoreis1(pl"r"(mod(ov(x,pl(x,y),n)),mod(ov(y,pl(x,y),n))),pl"r"(fx,fy),1rl,ispl12"r"(mod(ov(x,pl(x,y),n)),fx,mod(ov(y,pl(x,y),n)),fy,satz269(x,pl(x,y),n),satz269(y,pl(x,y),n)),t5):moreis(pl"r"(fx,fy),1rl)
-prl:=ts"r"(pl"r"(fx,fy),mod(pl(x,y))):real
-prr:=ts"r"(1rl,mod(pl(x,y))):real
-t7:=orapp(more(pl"r"(fx,fy),1rl),is"r"(pl"r"(fx,fy),1rl),moreis(prl,prr),t6,[t:more(pl"r"(fx,fy),1rl)]moreisi1(prl,prr,satz203a(pl"r"(fx,fy),1rl,mod(pl(x,y)),t,satz264a(pl(x,y),n))),[t:is"r"(pl"r"(fx,fy),1rl)]moreisi2(prl,prr,ists1"r"(pl"r"(fx,fy),1rl,mod(pl(x,y)),t))):moreis(prl,prr)
-t8:=tris(real,prl,pl"r"(ts"r"(fx,mod(pl(x,y))),ts"r"(fy,mod(pl(x,y)))),pl"r"(mod(x),mod(y)),disttp1"r"(fx,fy,mod(pl(x,y))),ispl12"r"(ts"r"(fx,mod(pl(x,y))),mod(x),ts"r"(fy,mod(pl(x,y))),mod(y),satz204e(mod(x),mod(pl(x,y)),t3),satz204e(mod(y),mod(pl(x,y)),t3))):is"r"(prl,pl"r"(mod(x),mod(y)))
-t9:=satz195b(mod(pl(x,y))):is"r"(prr,mod(pl(x,y)))
-t10:=ismoreis12(prl,pl"r"(mod(x),mod(y)),prr,mod(pl(x,y)),t8,t9,t7):moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y)))
-y@t11:=th1"l.imp"(is(pl(x,y),0c),moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y))),[t:is(pl(x,y),0c)]t2(t),[t:nis(pl(x,y),0c)]t10(t)):moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y)))
--7271
-y@satz271:=satz168a(pl"r"(mod(x),mod(y)),mod(pl(x,y)),t11".7271"):lessis(mod(pl(x,y)),pl"r"(mod(x),mod(y)))
-satz271a:=t11".7271":moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y)))
-+7272
-x@t1:=tris(real,re(m0(x)),re(pli(m0"r"(re(x)),m0"r"(im(x)))),m0"r"(re(x)),iscere(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),satz214(x)),reis(m0"r"(re(x)),m0"r"(im(x)))):is"r"(re(m0(x)),m0"r"(re(x)))
-t2:=tris(real,ts"r"(re(m0(x)),re(m0(x))),ts"r"(m0"r"(re(x)),m0"r"(re(x))),ts"r"(re(x),re(x)),ists12"r"(re(m0(x)),m0"r"(re(x)),re(m0(x)),m0"r"(re(x)),t1,t1),satz198(re(x),re(x))):is"r"(ts"r"(re(m0(x)),re(m0(x))),ts"r"(re(x),re(x)))
-t3:=tris(real,im(m0(x)),im(pli(m0"r"(re(x)),m0"r"(im(x)))),m0"r"(im(x)),isceim(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),satz214(x)),imis(m0"r"(re(x)),m0"r"(im(x)))):is"r"(im(m0(x)),m0"r"(im(x)))
-t4:=tris(real,ts"r"(im(m0(x)),im(m0(x))),ts"r"(m0"r"(im(x)),m0"r"(im(x))),ts"r"(im(x),im(x)),ists12"r"(im(m0(x)),m0"r"(im(x)),im(m0(x)),m0"r"(im(x)),t3,t3),satz198(im(x),im(x))):is"r"(ts"r"(im(m0(x)),im(m0(x))),ts"r"(im(x),im(x)))
-t5:=ispl12"r"(ts"r"(re(m0(x)),re(m0(x))),ts"r"(re(x),re(x)),ts"r"(im(m0(x)),im(m0(x))),ts"r"(im(x),im(x)),t2,t4):is"r"(mod2(m0(x)),mod2(x))
--7272
-x@satz272:=issqrt(mod2(m0(x)),mod2(x),lemma5(m0(x)),lemma5(x),t5".7272"):is"r"(mod(m0(x)),mod(x))
-satz272a:=symis(real,mod(m0(x)),mod(x),satz272):is"r"(mod(x),mod(m0(x)))
-+7273
-y@sum:=pl"r"(mod(y),mod(mn(x,y))):real
-t1:=islessis1(mod(pl(y,mn(x,y))),mod(x),sum,ismod(pl(y,mn(x,y)),x,satz212h(x,y)),satz271(y,mn(x,y))):lessis(mod(x),sum)
-t2:=th9"l.or"(less(mod(x),sum),is"r"(mod(x),sum),less(mn"r"(mod(x),mod(y)),mn"r"(sum,mod(y))),is"r"(mn"r"(mod(x),mod(y)),mn"r"(sum,mod(y))),t1,[t:less(mod(x),sum)]satz188f(mod(x),sum,m0"r"(mod(y)),t),[t:is"r"(mod(x),sum)]ismn1"r"(mod(x),sum,mod(y),t)):lessis(mn"r"(mod(x),mod(y)),mn"r"(sum,mod(y)))
-t3:=tris(real,mn"r"(sum,mod(y)),mn"r"(pl"r"(mod(mn(x,y)),mod(y)),mod(y)),mod(mn(x,y)),ismn1"r"(sum,pl"r"(mod(mn(x,y)),mod(y)),mod(y),compl"r"(mod(y),mod(mn(x,y)))),mnpl(mod(mn(x,y)),mod(y))):is"r"(mn"r"(sum,mod(y)),mod(mn(x,y)))
-t4:=satz168b(mn"r"(mod(x),mod(y)),mod(mn(x,y)),islessis2(mn"r"(sum,mod(y)),mod(mn(x,y)),mn"r"(mod(x),mod(y)),t3,t2)):moreis(mod(mn(x,y)),mn"r"(mod(x),mod(y)))
-t5:=ismoreis12(mod(mn(y,x)),mod(mn(x,y)),mn"r"(mod(y),mod(x)),m0"r"(mn"r"(mod(x),mod(y))),tris1(real,mod(mn(y,x)),mod(mn(x,y)),mod(m0(mn(x,y))),ismod(m0(mn(x,y)),mn(y,x),satz219(x,y)),satz272(mn(x,y))),satz181a(mod(y),mod(x)),t4(y,x)):moreis(mod(mn(x,y)),m0"r"(mn"r"(mod(x),mod(y))))
-@[r:real][s:real][m:moreis(r,s)][n:moreis(r,m0"r"(s))]
-r@t6:=th9"l.or"(neg(r),not(neg(r)),is"r"(abs(r),m0"r"(r)),is"r"(abs(r),r),th6"l.or"(neg(r)),[t:neg(r)]absn(r,t),[t:not(neg(r))]absnn(r,t)):or(is"r"(abs(r),m0"r"(r)),is"r"(abs(r),r))
-n@t7:=orapp(is"r"(abs(s),m0"r"(s)),is"r"(abs(s),s),moreis(r,abs(s)),t6(s),[t:is"r"(abs(s),m0"r"(s))]ismoreis2(m0"r"(s),abs(s),r,symis(real,abs(s),m0"r"(s),t),n),[t:is"r"(abs(s),s)]ismoreis2(s,abs(s),r,symis(real,abs(s),s,t),m)):moreis(r,abs(s))
--7273
-y@satz273:=t7".7273"(mod(mn(x,y)),mn"r"(mod(x),mod(y)),t4".7273",t5".7273"):moreis(mod(mn(x,y)),abs(mn"r"(mod(x),mod(y))))
--c
--r
--rp
--rt
-@[x:nat][y:nat]
-+8274
-prop1:=some"l"([t:1to(x)]1to(y),[f:[t:1to(x)]1to(y)]bijective(1to(x),1to(y),f)):'prop'
-x@prop2:=all([y:nat]imp(less(x,y),not(prop1(y)))):'prop'
-@[y:nat][l:less(1,y)][f:[t:1to(1)]1to(y)]
-1y:=1out(y):1to(y)
-yy:=xout(y):1to(y)
-[i:is"e"(1to(y),1y,yy)]
-t1:=isoutne(y,1,satz24a(y),y,lessisi3(y),i):is(1,y)
-f@t2:=ec3e31(is(1,y),more(1,y),less(1,y),satz10b(1,y),l):nis(1,y)
-t3:=th3"l.imp"(is"e"(1to(y),1y,yy),is(1,y),t2,[t:is"e"(1to(y),1y,yy)]t1(t)):not(is"e"(1to(y),1y,yy))
-[u:1to(1)]
-t4:=isf(1to(1),1to(y),f,u,1o,th1"n.singlet"(u)):is"e"(1to(y),<u>f,<1o>f)
-f@[i:is"e"(1to(y),<1o>f,1y)][u:1to(1)]
-t5:=th2"e.notis"(1to(y),1y,yy,<u>f,t3,tris(1to(y),<u>f,<1o>f,1y,t4(u),i)):not(is"e"(1to(y),<u>f,yy))
-i@t6:=th5"l.some"(1to(1),[u:1to(1)]is"e"(1to(y),yy,<u>f),[u:1to(1)]symnotis(1to(y),<u>f,yy,t5(u))):not(image(1to(1),1to(y),f,yy))
-t7:=th1"l.all"(1to(y),[u:1to(y)]image(1to(1),1to(y),f,u),yy,t6):not(surjective(1to(1),1to(y),f))
-f@[n:not(is"e"(1to(y),<1o>f,1y))][u:1to(1)]
-t8:=th2"e.notis"(1to(y),<1o>f,1y,<u>f,n,t4(u)):not(is"e"(1to(y),<u>f,1y))
-n@t9:=th5"l.some"(1to(1),[u:1to(1)]is"e"(1to(y),1y,<u>f),[u:1to(1)]symnotis(1to(y),<u>f,1y,t8(u))):not(image(1to(1),1to(y),f,1y))
-t10:=th1"l.all"(1to(y),[u:1to(y)]image(1to(1),1to(y),f,u),1y,t9):not(surjective(1to(1),1to(y),f))
-f@t11:=th1"l.imp"(is"e"(1to(y),<1o>f,1y),not(surjective(1to(1),1to(y),f)),[t:is"e"(1to(y),<1o>f,1y)]t7(t),[t:not(is"e"(1to(y),<1o>f,1y))]t10(t)):not(surjective(1to(1),1to(y),f))
-t12:=th2"l.and"(injective(1to(1),1to(y),f),surjective(1to(1),1to(y),f),t11):not(bijective(1to(1),1to(y),f))
-l@t13:=th5"l.some"([t:1to(1)]1to(y),[f:[t:1to(1)]1to(y)]bijective(1to(1),1to(y),f),[f:[t:1to(1)]1to(y)]t12(f)):not(prop1(1,y))
-@t14:=[y:nat][t:less(1,y)]t13(y,t):prop2(1)
-x@[p:prop2(x)][y:nat][l:less(<x>suc,y)]
-x@xs:=<x>suc:nat
-l@xxs:=xout(xs):1to(<x>suc)
-yy1:=xout(y):1to(y)
-t15:=trless(1,<x>suc,y,satz24c(x),l):less(1,y)
-ym1:=mn(y,1,t15):nat
-t16:=isless12(<x>suc,pl(x,1),y,pl(ym1,1),satz4e(x),th1c"n.mn"(y,1,t15),l):less(pl(x,1),pl(ym1,1))
-t17:=satz20c(x,ym1,1,t16):less(x,ym1)
-t18:=isless2(pl(ym1,1),y,ym1,th1d"n.mn"(y,1,t15),satz18a(ym1,1)):less(ym1,y)
-[f:[t:1to(xs)]1to(y)][b:bijective(1to(xs),1to(y),f)]
-t19:=ande1(injective(1to(xs),1to(y),f),surjective(1to(xs),1to(y),f),b):injective(1to(xs),1to(y),f)
-t20:=ande2(injective(1to(xs),1to(y),f),surjective(1to(xs),1to(y),f),b):surjective(1to(xs),1to(y),f)
-[i:is"e"(1to(y),<xxs>f,yy1)][u:1to(x)]
-u1:=inn(x,u):nat
-t21:=satz16a(u1,x,xs,1top(x,u),satz18c(x)):less(u1,xs)
-t22:=ec3e31(is(u1,xs),more(u1,xs),less(u1,xs),satz10b(u1,xs),t21):nis(u1,xs)
-t23:=lessisi1(u1,xs,t21):lessis(u1,xs)
-u2:=outn(xs,u1,t23):1to(xs)
-t24:=th3"l.imp"(is"e"(1to(xs),u2,xxs),is(u1,xs),t22,[t:is"e"(1to(xs),u2,xxs)]isoutne(xs,u1,t23,xs,lessisi3(xs),t)):not(is"e"(1to(xs),u2,xxs))
-[j:is"e"(1to(y),<u2>f,yy1)]
-t25:=tris2(1to(y),<u2>f,<xxs>f,yy1,j,i):is"e"(1to(y),<u2>f,<xxs>f)
-t26:=isfe(1to(xs),1to(y),f,t19,u2,xxs,t25):is"e"(1to(xs),u2,xxs)
-u@t27:=th3"l.imp"(is"e"(1to(y),<u2>f,yy1),is"e"(1to(xs),u2,xxs),t24,[t:is"e"(1to(y),<u2>f,yy1)]t26(t)):not(is"e"(1to(y),<u2>f,yy1))
-w1:=inn(y,<u2>f):nat
-[j:is(w1,y)]
-t28:=tris(1to(y),<u2>f,outn(y,w1,1top(y,<u2>f)),yy1,isoutinn(y,<u2>f),isoutni(y,w1,1top(y,<u2>f),y,lessisi3(y),j)):is"e"(1to(y),<u2>f,yy1)
-u@t29:=th3"l.imp"(is(w1,y),is"e"(1to(y),<u2>f,yy1),t27,[t:is(w1,y)]t28(t)):nis(w1,y)
-t30:=ore1(less(w1,y),is(w1,y),1top(y,<u2>f),t29):less(w1,y)
-t31:=islessis2(y,pl(ym1,1),pl(w1,1),th1c"n.mn"(y,1,t15),satz25b(y,w1,t30)):lessis(pl(w1,1),pl(ym1,1))
-t32:=th9"l.or"(less(pl(w1,1),pl(ym1,1)),is(pl(w1,1),pl(ym1,1)),less(w1,ym1),is(w1,ym1),t31,[t:less(pl(w1,1),pl(ym1,1))]satz20c(w1,ym1,1,t),[t:is(pl(w1,1),pl(ym1,1))]satz20b(w1,ym1,1,t)):lessis(w1,ym1)
-w2:=outn(ym1,w1,t32):1to(ym1)
-i@f1:=[t:1to(x)]w2(t):[t:1to(x)]1to(ym1)
-u@[v:1to(x)][j:is"e"(1to(ym1),<u>f1,<v>f1)]
-t33:=isoutne(ym1,w1(u),t32(u),w1(v),t32(v),j):is(w1(u),w1(v))
-t34:=isinne(y,<u2(u)>f,<u2(v)>f,t33):is"e"(1to(y),<u2(u)>f,<u2(v)>f)
-t35:=<t34><u2(v)><u2(u)>t19:is"e"(1to(xs),u2(u),u2(v))
-t36:=isoutne(xs,u1(u),t23(u),u1(v),t23(v),t35):is(u1(u),u1(v))
-t37:=isinne(x,u,v,t36):is"e"(1to(x),u,v)
-i@[v:1to(ym1)]
-v1:=inn(ym1,v):nat
-t38:=satz16a(v1,ym1,y,1top(ym1,v),t18):less(v1,y)
-t39:=ec3e31(is(v1,y),more(v1,y),less(v1,y),satz10b(v1,y),t38):nis(v1,y)
-t40:=lessisi1(v1,y,t38):lessis(v1,y)
-v2:=outn(y,v1,t40):1to(y)
-w3:=<v2>invf(1to(xs),1to(y),f,b):1to(xs)
-t41:=thinvf2(1to(xs),1to(y),f,b,v2):is"e"(1to(y),v2,<w3>f)
-[j:is"e"(1to(xs),w3,xxs)]
-t42:=isf(1to(xs),1to(y),f,w3,xxs,j):is"e"(1to(y),<w3>f,<xxs>f)
-t43:=tr3is(1to(y),v2,<w3>f,<xxs>f,yy1,t41,t42,i):is"e"(1to(y),v2,yy1)
-t44:=isoutne(y,v1,t40,y,lessisi3(y),t43):is(v1,y)
-v@t45:=th3"l.imp"(is"e"(1to(xs),w3,xxs),is(v1,y),t39,[t:is"e"(1to(xs),w3,xxs)]t44(t)):not(is"e"(1to(xs),w3,xxs))
-w4:=inn(xs,w3):nat
-[j:is(w4,xs)]
-t46:=tris(1to(xs),w3,outn(xs,w4,1top(xs,w3)),xxs,isoutinn(xs,w3),isoutni(xs,w4,1top(xs,w3),xs,lessisi3(xs),j)):is"e"(1to(xs),w3,xxs)
-v@t47:=th3"l.imp"(is(w4,xs),is"e"(1to(xs),w3,xxs),t45,[t:is(w4,xs)]t46(t)):nis(w4,xs)
-t48:=ore1(less(w4,xs),is(w4,xs),1top(xs,w3),t47):less(w4,xs)
-t49:=satz26a(x,w4,t48):lessis(w4,x)
-w5:=outn(x,w4,t49):1to(x)
-t50:=isinoutn(x,w4,t49):is(w4,u1(w5))
-t51:=tris(1to(xs),w3,outn(xs,w4,1top(xs,w3)),u2(w5),isoutinn(xs,w3),isoutni(xs,w4,1top(xs,w3),u1(w5),t23(w5),t50)):is"e"(1to(xs),w3,u2(w5))
-t52:=isf(1to(xs),1to(y),f,w3,u2(w5),t51):is"e"(1to(y),<w3>f,<u2(w5)>f)
-t53:=tris(1to(y),v2,<w3>f,<u2(w5)>f,t41,t52):is"e"(1to(y),v2,<u2(w5)>f)
-t54:=tris(nat,v1,inn(y,v2),w1(w5),isinoutn(y,v1,t40),isinni(y,v2,<u2(w5)>f,t53)):is(v1,w1(w5))
-t55:=tris(1to(ym1),v,outn(ym1,v1,1top(ym1,v)),w2(w5),isoutinn(ym1,v),isoutni(ym1,v1,1top(ym1,v),w1(w5),t32(w5),t54)):is"e"(1to(ym1),v,<w5>f1)
-t56:=somei(1to(x),[t:1to(x)]is"e"(1to(ym1),v,<t>f1),w5,t55):image(1to(x),1to(ym1),f1,v)
-i@t57:=andi(injective(1to(x),1to(ym1),f1),surjective(1to(x),1to(ym1),f1),[u:1to(x)][v:1to(x)][t:is"e"(1to(ym1),<u>f1,<v>f1)]t37(u,v,t),[u:1to(ym1)]t56(u)):bijective(1to(x),1to(ym1),f1)
-t58:=somei([t:1to(x)]1to(ym1),[g:[t:1to(x)]1to(ym1)]bijective(1to(x),1to(ym1),g),f1,t57):prop1(ym1)
-t59:=<t58><t17><ym1>p:con
-b@[n:not(is"e"(1to(y),<xxs>f,yy1))]
-m0:=<yy1>invf(1to(xs),1to(y),f,b):1to(xs)
-t60:=thinvf2(1to(xs),1to(y),f,b,yy1):is"e"(1to(y),yy1,<m0>f)
-f2:=changef(1to(xs),1to(y),f,m0,xxs):[t:1to(xs)]1to(y)
-t61:=changef2(1to(xs),1to(y),f,m0,xxs,xxs,refis(1to(xs),xxs)):is"e"(1to(y),<xxs>f2,<m0>f)
-t62:=tris2(1to(y),<xxs>f2,yy1,<m0>f,t61,t60):is"e"(1to(y),<xxs>f2,yy1)
-t63:=th6"e.wissel"(1to(xs),1to(y),f,m0,xxs,b):bijective(1to(xs),1to(y),f2)
-t64:=t59(f2,t63,t62):con
-b@t65:=th1"l.imp"(is"e"(1to(y),<xxs>f,yy1),con,[t:is"e"(1to(y),<xxs>f,yy1)]t59(t),[t:not(is"e"(1to(y),<xxs>f,yy1))]t64(t)):con
-l@t65a:=th5"l.some"([t:1to(xs)]1to(y),[f:[t:1to(xs)]1to(y)]bijective(1to(xs),1to(y),f),[f:[t:1to(xs)]1to(y)][t:bijective(1to(xs),1to(y),f)]t65(f,t)):not(prop1(xs,y))
-p@t66:=[y:nat][t:less(xs,y)]t65a(y,t):prop2(xs)
-x@t67:=induction([t:nat]prop2(t),t14,[t:nat][u:prop2(t)]t66(t,u),x):prop2(x)
--8274
-[l:less(x,y)]
-satz274:=<l><y>t67".8274":not(some"l"([t:1to(x)]1to(y),[f:[t:1to(x)]1to(y)]bijective(1to(x),1to(y),f)))
-[f:[t:1to(x)]1to(y)]
-satz274a:=th4"l.some"([t:1to(x)]1to(y),[g:[t:1to(x)]1to(y)]bijective(1to(x),1to(y),g),satz274,f):not(bijective(1to(x),1to(y),f))
-+*rt
-+*rp
-+*r
-+*c
-@[x:nat][u:1to(x)]
-inn:=inn"n"(x,u):nat
-@[q:[t:cx][u:cx]cx][x:nat][f:[t:1to(x)]cx]
-x@[n:1to(x)][o:not(is"e"(1to(x),n,xout(x)))]
-+8275
-t1:=th3"l.imp"(is"n"(inn(x,n),x),is"e"(1to(x),n,xout(x)),o,[t:is"n"(inn(x,n),x)]tris(1to(x),n,outn(x,inn(x,n),1top(x,n)),xout(x),isoutinn(x,n),isoutni(x,inn(x,n),1top(x,n),x,lessisi3(x),t))):not(is"n"(inn(x,n),x))
-t2:=ore1(less"n"(inn(x,n),x),is"n"(inn(x,n),x),1top(x,n),t1):less"n"(inn(x,n),x)
--8275
-lemma275:=satz25c(x,inn(x,n),t2".8275"):lessis"n"(<inn(x,n)>suc,x)
-f@[g:[t:1to(x)]cx]
-recprop:=and(is(<1out(x)>g,<1out(x)>f),[t:1to(x)][u:not(is"e"(1to(x),t,xout(x)))]is(<outn(x,<inn(x,t)>suc,lemma275(t,u))>g,<<outn(x,<inn(x,t)>suc,lemma275(t,u))>f><<t>g>q)):'prop'
-+*8275
-x@1o:=1out(x):1to(x)
-xo:=xout(x):1to(x)
-[u:nat][l:lessis"n"(<u>suc,x)]
-t11:=satz16b(u,<u>suc,x,satz18c(u),l):less"n"(u,x)
-t12:=lessisi1"n"(u,x,t11):lessis"n"(u,x)
-ux:=outn(x,u,t12):1to(x)
-t13:=ec3e31(is"n"(u,x),more"n"(u,x),less"n"(u,x),satz10b(u,x),t11):nis"n"(u,x)
-t14:=th3"l.imp"(is"e"(1to(x),ux,xo),is"n"(u,x),t13,[t:is"e"(1to(x),ux,xo)]isoutne(x,u,t12,x,lessisi3(x),t)):not(is"e"(1to(x),ux,xo))
-t15:=isf(nat,nat,suc,u,inn(x,ux),isinoutn(x,u,t12)):is"n"(<u>suc,<inn(x,ux)>suc)
-t16:=isoutni(x,<u>suc,l,<inn(x,ux)>suc,lemma275(ux,t14),t15):is"e"(1to(x),outn(x,<u>suc,l),outn(x,<inn(x,ux)>suc,lemma275(ux,t14)))
-x@[n:1to(x)][o:not(is"e"(1to(x),n,xo))]
-ns:=outn(x,<inn(x,n)>suc,lemma275(n,o)):1to(x)
-f@[g:[t:1to(x)]cx]
-prop1:=is(<1o>g,<1o>f):'prop'
-prop2:=[t:1to(x)][u:not(is"e"(1to(x),t,xo))]is(<ns(t,u)>g,<<ns(t,u)>f><<t>g>q):'prop'
-[pg:recprop(g)]
-t3:=ande1(prop1,prop2,pg):prop1
-[n:1to(x)][o:not(is"e"(1to(x),n,xo))]
-t4:=<o><n>ande2(prop1,prop2,pg):is(<ns(n,o)>g,<<ns(n,o)>f><<n>g>q)
-pg@[u:nat][l:lessis"n"(<u>suc,x)]
-t17:=isf(1to(x),cx,g,outn(x,<u>suc,l),ns(ux(u,l),t14(u,l)),t16(u,l)):is(<outn(x,<u>suc,l)>g,<ns(ux(u,l),t14(u,l))>g)
-t18:=tris(cx,<outn(x,<u>suc,l)>g,<ns(ux(u,l),t14(u,l))>g,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>g>q,t17,t4(pg,ux(u,l),t14(u,l))):is(<outn(x,<u>suc,l)>g,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>g>q)
-g@[h:[t:1to(x)]cx][u:nat][l:lessis"n"(u,x)]
-prop3:=is(<outn(x,u,l)>g,<outn(x,u,l)>h):'prop'
-u@prop4:=and(lessis"n"(u,x),[t:lessis"n"(u,x)]prop3(t)):'prop'
-prop5:=or(prop4,more"n"(u,x)):'prop'
-h@[pg:recprop(g)][ph:recprop(h)][l:lessis"n"(1,x)]
-t5:=isoutni(x,1,l,1,satz24a(x),refis(nat,1)):is"e"(1to(x),outn(x,1,l),1o)
-t6:=isf(1to(x),cx,g,outn(x,1,l),1o,t5):is(<outn(x,1,l)>g,<1o>g)
-t7:=tris(cx,<outn(x,1,l)>g,<1o>g,<1o>f,t6,t3(pg)):is(<outn(x,1,l)>g,<1o>f)
-t8:=tris2(cx,<outn(x,1,l)>g,<outn(x,1,l)>h,<1o>f,t7,t7(h,g,ph,pg,l)):prop3(1,l)
-ph@t9:=andi(lessis"n"(1,x),[t:lessis"n"(1,x)]prop3(1,t),satz24a(x),[t:lessis"n"(1,x)]t8(t)):prop4(1)
-t10:=ori1(prop4(1),more"n"(1,x),t9):prop5(1)
-[u:nat][p:prop5(u)][l:lessis"n"(<u>suc,x)]
-t19:=ec3e32(is"n"(u,x),more"n"(u,x),less"n"(u,x),satz10b(u,x),t11(u,l)):not(more"n"(u,x))
-t20:=ore1(prop4(u),more"n"(u,x),p,t19):prop4(u)
-t21:=<t12(u,l)>ande2(lessis"n"(u,x),[t:lessis"n"(u,x)]prop3(u,t),t20):prop3(u,t12(u,l))
-t22:=isf(cx,cx,[t:cx]<<ns(ux(u,l),t14(u,l))>f><t>q,<ux(u,l)>g,<ux(u,l)>h,t21):is(<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>g>q,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>h>q)
-t23:=symis(cx,<outn(x,<u>suc,l)>h,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>h>q,t18(h,ph,u,l)):is(<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>h>q,<outn(x,<u>suc,l)>h)
-t24:=tr3is(cx,<outn(x,<u>suc,l)>g,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>g>q,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>h>q,<outn(x,<u>suc,l)>h,t18(g,pg,u,l),t22,t23):prop3(<u>suc,l)
-t25:=andi(lessis"n"(<u>suc,x),[t:lessis"n"(<u>suc,x)]prop3(<u>suc,t),l,[t:lessis"n"(<u>suc,x)]t24(t)):prop4(<u>suc)
-t26:=ori1(prop4(<u>suc),more"n"(<u>suc,x),t25):prop5(<u>suc)
-p@[n:not(lessis"n"(<u>suc,x))]
-t27:=satz10k(<u>suc,x,n):more"n"(<u>suc,x)
-t28:=ori2(prop4(<u>suc),more"n"(<u>suc,x),t27):prop5(<u>suc)
-p@t29:=th1"l.imp"(lessis"n"(<u>suc,x),prop5(<u>suc),[t:lessis"n"(<u>suc,x)]t26(t),[t:not(lessis"n"(<u>suc,x))]t28(t)):prop5(<u>suc)
-u@t30:=induction([v:nat]prop5(v),t10,[v:nat][t:prop5(v)]t29(v,t),u):prop5(u)
-ph@[n:1to(x)]
-t31:=isf(1to(x),cx,g,n,outn(x,inn(x,n),1top(x,n)),isoutinn(x,n)):is(<n>g,<outn(x,inn(x,n),1top(x,n))>g)
-t32:=satz10d(inn(x,n),x,1top(x,n)):not(more"n"(inn(x,n),x))
-t33:=ore1(prop4(inn(x,n)),more"n"(inn(x,n),x),t30(inn(x,n)),t32):prop4(inn(x,n))
-t34:=<1top(x,n)>ande2(lessis"n"(inn(x,n),x),[t:lessis"n"(inn(x,n),x)]prop3(inn(x,n),t),t33):prop3(inn(x,n),1top(x,n))
-t35:=symis(cx,<n>h,<outn(x,inn(x,n),1top(x,n))>h,t31(h,g,ph,pg,n)):is(<outn(x,inn(x,n),1top(x,n))>h,<n>h)
-t36:=tr3is(cx,<n>g,<outn(x,inn(x,n),1top(x,n))>g,<outn(x,inn(x,n),1top(x,n))>h,<n>h,t31,t34,t35):is(<n>g,<n>h)
-ph@t37:=fisi(1to(x),cx,g,h,[t:1to(x)]t36(t)):is"e"([t:1to(x)]cx,g,h)
-f@prop6:=some"l"([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(g)):'prop'
-x@prop7:=all"l"([t:1to(x)]cx,[f:[t:1to(x)]cx]prop6(f)):'prop'
-q@[f:[t:1to(1)]cx]
-t38:=refis(cx,<1o(1)>f):prop1(1,f,f)
-[n:1to(1)][o:not(is"e"(1to(1),n,xo(1)))]
-t39:=<th1"n.singlet"(n)>o:con
-t40:=cone(is(<ns(1,n,o)>f,<<ns(1,n,o)>f><<n>f>q),t39):is(<ns(1,n,o)>f,<<ns(1,n,o)>f><<n>f>q)
-f@t41:=andi(prop1(1,f,f),prop2(1,f,f),t38,[t:1to(1)][u:not(is"e"(1to(1),t,xo(1)))]t40(t,u)):recprop(1,f,f)
-t42:=somei([t:1to(1)]cx,[g:[t:1to(1)]cx]recprop(1,f,g),f,t41):prop6(1,f)
-q@t43:=[f:[t:1to(1)]cx]t42(f):prop7(1)
-x@[p:prop7(x)]
-xs:=<x>suc:nat
-[f:[t:1to(xs)]cx]
-f1:=left(cx,xs,x,lessisi1"n"(x,xs,satz18c(x)),f):[t:1to(x)]cx
-t44:=onei([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f1,g),[g:[t:1to(x)]cx][h:[t:1to(x)]cx][u:recprop(x,f1,g)][v:recprop(x,f1,h)]t37(f1,g,h,u,v),<f1>p):one"e"([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f1,g))
-g1:=ind([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f1,g),t44):[t:1to(x)]cx
-t45:=oneax([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f1,g),t44):recprop(x,f1,g1)
-[n:1to(xs)]
-nxs:=is"e"(1to(xs),n,xo(xs)):'prop'
-[o:not(nxs)]
-t46:=satz26a(x,inn(xs,n),t2(xs,n,o)):lessis"n"(inn(xs,n),x)
-n1:=outn(x,inn(xs,n),t46):1to(x)
-b:=<n1>g1:cx
-[o1:not(nxs)]
-t47:=isoutni(x,inn(xs,n),t46(o),inn(xs,n),t46(o1),refis(nat,inn(xs,n))):is"e"(1to(x),n1(o),n1(o1))
-t48:=isf(1to(x),cx,g1,n1(o),n1(o1),t47):is(b(o),b(o1))
-f@a:=<<xo(xs)>f><<xo(x)>g1>q:cx
-n@c:=ite"l.r"(nxs,cx,[t:nxs]a,[t:not(nxs)]b(t),[t:nxs][u:nxs]refis(cx,a),[t:not(nxs)][u:not(nxs)]t48(t,u)):cx
-[i:nxs]
-t49:=itet"l.r"(nxs,cx,[t:nxs]a,[t:not(nxs)]b(t),[t:nxs][u:nxs]refis(cx,a),[t:not(nxs)][u:not(nxs)]t48(t,u),i):is(c,a)
-o@t50:=itef"l.r"(nxs,cx,[t:nxs]a,[t:not(nxs)]b(t),[t:nxs][u:nxs]refis(cx,a),[t:not(nxs)][u:not(nxs)]t48(t,u),o):is(c,b)
-f@g2:=[t:1to(xs)]c(t):[t:1to(xs)]cx
-t51:=th3"l.imp"(is"e"(1to(xs),1o(xs),xo(xs)),is"n"(1,xs),symnotis(nat,xs,1,<x>ax3),[t:is"e"(1to(xs),1o(xs),xo(xs))]isoutne(xs,1,satz24a(xs),xs,lessisi3(xs),t)):not(is"e"(1to(xs),1o(xs),xo(xs)))
-t52:=t50(1o(xs),t51):is(c(1o(xs)),b(1o(xs),t51))
-t53:=isinoutn(xs,1,satz24a(xs)):is"n"(1,inn(xs,1o(xs)))
-t54:=isoutni(x,1,satz24a(x),inn(xs,1o(xs)),t46(1o(xs),t51),t53):is"e"(1to(x),1o(x),n1(1o(xs),t51))
-t55:=isf(1to(x),cx,g1,1o(x),n1(1o(xs),t51),t54):is(<1o(x)>g1,b(1o(xs),t51))
-t56:=tris2(cx,c(1o(xs)),<1o(x)>g1,b(1o(xs),t51),t52,t55):is(c(1o(xs)),<1o(x)>g1)
-t57:=tris(cx,c(1o(xs)),<1o(x)>g1,<1o(x)>f1,t56,t3(x,f1,g1,t45)):is(c(1o(xs)),<1o(x)>f1)
-t58:=isinoutn(x,1,satz24a(x)):is"n"(1,inn(x,1o(x)))
-t59:=isoutni(xs,1,satz24a(xs),inn(x,1o(x)),trlessis"n"(inn(x,1o(x)),x,xs,1top(x,1o(x)),lessisi1"n"(x,xs,satz18c(x))),t58):is"e"(1to(xs),1o(xs),left1to(xs,x,lessisi1"n"(x,xs,satz18c(x)),1o(x)))
-t60:=isf(1to(xs),cx,f,1o(xs),left1to(xs,x,lessisi1"n"(x,xs,satz18c(x)),1o(x)),t59):is(<1o(xs)>f,<1o(x)>f1)
-t61:=tris2(cx,c(1o(xs)),<1o(xs)>f,<1o(x)>f1,t57,t60):prop1(xs,f,g2)
-o@[i:is"e"(1to(xs),ns(xs,n,o),xo(xs))]
-t62:=isoutne(xs,<inn(xs,n)>suc,lemma275(xs,n,o),xs,lessisi3(xs),i):is"n"(<inn(xs,n)>suc,xs)
-t63:=<t62><x><inn(xs,n)>ax4:is"n"(inn(xs,n),x)
-t64:=isoutni(x,inn(xs,n),t46,x,lessisi3(x),t63):is"e"(1to(x),n1,xo(x))
-t65:=isf(1to(x),cx,g1,xo(x),n1,symis(1to(x),n1,xo(x),t64)):is(<xo(x)>g1,b)
-t66:=tris2(cx,<xo(x)>g1,c,b,t65,t50):is(<xo(x)>g1,c)
-t67:=isf(cx,cx,[t:cx]<<xo(xs)>f><t>q,<xo(x)>g1,c,t66):is(a,<<xo(xs)>f><c>q)
-t68:=isf(1to(xs),cx,f,xo(xs),ns(xs,n,o),symis(1to(xs),ns(xs,n,o),xo(xs),i)):is(<xo(xs)>f,<ns(xs,n,o)>f)
-t69:=isf(cx,cx,<c>q,<xo(xs)>f,<ns(xs,n,o)>f,t68):is(<<xo(xs)>f><c>q,<<ns(xs,n,o)>f><c>q)
-t70:=tr3is(cx,c(ns(xs,n,o)),a,<<xo(xs)>f><c>q,<<ns(xs,n,o)>f><c>q,t49(ns(xs,n,o),i),t67,t69):is(c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q)
-o@[o1:not(is"e"(1to(xs),ns(xs,n,o),xo(xs)))][i:is"e"(1to(x),n1,xo(x))]
-t71:=isoutne(x,inn(xs,n),t46,x,lessisi3(x),i):is"n"(inn(xs,n),x)
-t72:=ax2(inn(xs,n),x,t71):is"n"(<inn(xs,n)>suc,xs)
-t73:=isoutni(xs,<inn(xs,n)>suc,lemma275(xs,n,o),xs,lessisi3(xs),t72):is"e"(1to(xs),ns(xs,n,o),xo(xs))
-o1@t74:=th3"l.imp"(is"e"(1to(x),n1,xo(x)),is"e"(1to(xs),ns(xs,n,o),xo(xs)),o1,[t:is"e"(1to(x),n1,xo(x))]t73(t)):not(is"e"(1to(x),n1,xo(x)))
-t75:=isinoutn(x,inn(xs,n),t46):is"n"(inn(xs,n),inn(x,n1))
-t76:=ax2(inn(xs,n),inn(x,n1),t75):is"n"(<inn(xs,n)>suc,<inn(x,n1)>suc)
-t77:=isinoutn(xs,<inn(xs,n)>suc,lemma275(xs,n,o)):is"n"(<inn(xs,n)>suc,inn(xs,ns(xs,n,o)))
-t78:=tris1(nat,inn(xs,ns(xs,n,o)),<inn(x,n1)>suc,<inn(xs,n)>suc,t77,t76):is"n"(inn(xs,ns(xs,n,o)),<inn(x,n1)>suc)
-t79:=isoutni(x,inn(xs,ns(xs,n,o)),t46(ns(xs,n,o),o1),<inn(x,n1)>suc,lemma275(x,n1,t74),t78):is"e"(1to(x),n1(ns(xs,n,o),o1),ns(n1,t74))
-t80:=isf(1to(x),cx,g1,n1(ns(xs,n,o),o1),ns(n1,t74),t79):is(b(ns(xs,n,o),o1),<ns(n1,t74)>g1)
-t81:=isinoutn(x,<inn(x,n1)>suc,lemma275(x,n1,t74)):is"n"(<inn(x,n1)>suc,inn(x,ns(n1,t74)))
-t82:=tris(nat,<inn(xs,n)>suc,<inn(x,n1)>suc,inn(x,ns(n1,t74)),t76,t81):is"n"(<inn(xs,n)>suc,inn(x,ns(n1,t74)))
-t83:=isoutni(xs,<inn(xs,n)>suc,lemma275(xs,n,o),inn(x,ns(n1,t74)),trlessis"n"(inn(x,ns(n1,t74)),x,xs,1top(x,ns(n1,t74)),lessisi1"n"(x,xs,satz18c(x))),t82):is"e"(1to(xs),ns(xs,n,o),left1to(xs,x,lessisi1"n"(x,xs,satz18c(x)),ns(n1,t74)))
-t84:=isf(1to(xs),cx,f,ns(xs,n,o),left1to(xs,x,lessisi1"n"(x,xs,satz18c(x)),ns(n1,t74)),t83):is(<ns(xs,n,o)>f,<ns(n1,t74)>f1)
-t85:=isf(cx,cx,<b>q,<ns(xs,n,o)>f,<ns(n1,t74)>f1,t84):is(<<ns(xs,n,o)>f><b>q,<<ns(n1,t74)>f1><b>q)
-t86:=isf(cx,cx,[t:cx]<<ns(xs,n,o)>f><t>q,c,b,t50):is(<<ns(xs,n,o)>f><c>q,<<ns(xs,n,o)>f><b>q)
-t87:=tr3is(cx,c(ns(xs,n,o)),b(ns(xs,n,o),o1),<ns(n1,t74)>g1,<<ns(n1,t74)>f1><b>q,t50(ns(xs,n,o),o1),t80,t4(f1,g1,t45,n1,t74)):is(c(ns(xs,n,o)),<<ns(n1,t74)>f1><b>q)
-t88:=tris(cx,<<ns(xs,n,o)>f><c>q,<<ns(xs,n,o)>f><b>q,<<ns(n1,t74)>f1><b>q,t86,t85):is(<<ns(xs,n,o)>f><c>q,<<ns(n1,t74)>f1><b>q)
-t89:=tris2(cx,c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q,<<ns(n1,t74)>f1><b>q,t87,t88):is(c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q)
-o@t90:=th1"l.imp"(is"e"(1to(xs),ns(xs,n,o),xo(xs)),is(c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q),[t:is"e"(1to(xs),ns(xs,n,o),xo(xs))]t70(t),[t:not(is"e"(1to(xs),ns(xs,n,o),xo(xs)))]t89(t)):is(c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q)
-f@t91:=[t:1to(xs)][u:not(nxs(t))]t90(t,u):prop2(xs,f,g2)
-t92:=andi(prop1(xs,f,g2),prop2(xs,f,g2),t61,t91):recprop(xs,f,g2)
-t93:=somei([t:1to(xs)]cx,[g:[t:1to(xs)]cx]recprop(xs,f,g),g2,t92):prop6(xs,f)
-p@t94:=[f:[t:1to(xs)]cx]t93(f):prop7(xs)
-x@t95:=induction([y:nat]prop7(y),t43,[y:nat][t:prop7(y)]t94(y,t),x):prop7(x)
-[f:[t:1to(x)]cx]
-t96:=<f>t95:prop6(x,f)
-t97:=onei([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g),[g:[t:1to(x)]cx][h:[t:1to(x)]cx][u:recprop(x,f,g)][v:recprop(x,f,h)]t37(f,g,h,u,v),t96):one"e"([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g))
--8275
-f@satz275:=t97".8275"(f):one"e"([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g))
-recf:=ind([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g),satz275):[t:1to(x)]cx
-satz275a:=oneax([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g),satz275):recprop(x,f,recf)
-[n:1to(x)]
-rec:=<n>recf:cx
-f@satz275b:=t3".8275"(x,f,recf,satz275a):is(rec(1out(x)),<1out(x)>f)
-n@[o:not(is"e"(1to(x),n,xout(x)))]
-sucx:=ns".8275"(n,o):1to(x)
-satz275c:=t4".8275"(x,f,recf,satz275a,n,o):is(rec(sucx(n,o)),<<sucx(n,o)>f><rec(n)>q)
-f@[g:[t:1to(x)]cx][r:recprop(x,f,g)]
-satz275d:=t37".8275"(x,f,g,recf,r,satz275a):is"e"([t:1to(x)]cx,g,recf)
-[n:1to(x)]
-satz275e:=fise(1to(x),cx,g,recf,satz275d,n):is(<n>g,rec(n))
-x@[y:nat]
-+*8275
-y@[l:lessis"n"(y,x)][f:[t:1to(x)]cx]
-fl:=left(cx,x,y,l,f):[t:1to(y)]cx
-rf:=recf(x,f):[t:1to(x)]cx
-rfl:=left(cx,x,y,l,rf):[t:1to(y)]cx
-t98:=isinoutn(y,1,satz24a(y)):is"n"(1,inn(y,1out(y)))
-t99:=isoutni(x,1,satz24a(x),inn(y,1out(y)),trlessis"n"(inn(y,1out(y)),y,x,1top(y,1out(y)),l),t98):is"e"(1to(x),1out(x),left1to(x,y,l,1out(y)))
-t100:=isp(1to(x),[t:1to(x)]is(<t>rf,<t>f),1out(x),left1to(x,y,l,1out(y)),t3(x,f,rf,satz275a(x,f)),t99):prop1(y,fl,rfl)
-[n:1to(y)][o:not(is"e"(1to(y),n,xout(y)))]
-t100a:=th3"l.imp"(is"n"(inn(y,n),y),is"e"(1to(y),n,xout(y)),o,[t:is"n"(inn(y,n),y)]tris(1to(y),n,outn(y,inn(y,n),1top(y,n)),xout(y),isoutinn(y,n),isoutni(y,inn(y,n),1top(y,n),y,lessisi3(y),t))):not(is"n"(inn(y,n),y))
-t100b:=ore1(less"n"(inn(y,n),y),is"n"(inn(y,n),y),1top(y,n),t100a):less"n"(inn(y,n),y)
-t101:=satz16b(inn(y,n),y,x,t100b,l):less"n"(inn(y,n),x)
-t102:=ec3e31(is"n"(inn(y,n),x),more"n"(inn(y,n),x),less"n"(inn(y,n),x),satz10b(inn(y,n),x),t101):nis"n"(inn(y,n),x)
-t103:=th3"l.imp"(is"e"(1to(x),left1to(x,y,l,n),xout(x)),is"n"(inn(y,n),x),t102,[t:is"e"(1to(x),left1to(x,y,l,n),xout(x))]isoutne(x,inn(y,n),trlessis"n"(inn(y,n),y,x,1top(y,n),l),x,lessisi3(x),t)):not(is"e"(1to(x),left1to(x,y,l,n),xout(x)))
-t104:=t4(x,f,rf,satz275a(x,f),left1to(x,y,l,n),t103):is(<ns(x,left1to(x,y,l,n),t103)>rf,<<ns(x,left1to(x,y,l,n),t103)>f><<n>rfl>q)
-t105:=isinoutn(x,inn(y,n),trlessis"n"(inn(y,n),y,x,1top(y,n),l)):is"n"(inn(y,n),inn(x,left1to(x,y,l,n)))
-t106:=ax2(inn(y,n),inn(x,left1to(x,y,l,n)),t105):is"n"(<inn(y,n)>suc,<inn(x,left1to(x,y,l,n))>suc)
-t107:=isinoutn(y,<inn(y,n)>suc,lemma275(y,n,o)):is"n"(<inn(y,n)>suc,inn(y,ns(y,n,o)))
-t108:=tris1(nat,<inn(x,left1to(x,y,l,n))>suc,inn(y,ns(y,n,o)),<inn(y,n)>suc,t106,t107):is"n"(<inn(x,left1to(x,y,l,n))>suc,inn(y,ns(y,n,o)))
-t109:=isoutni(x,<inn(x,left1to(x,y,l,n))>suc,lemma275(x,left1to(x,y,l,n),t103),inn(y,ns(y,n,o)),trlessis"n"(inn(y,ns(y,n,o)),y,x,1top(y,ns(y,n,o)),l),t108):is"e"(1to(x),ns(x,left1to(x,y,l,n),t103),left1to(x,y,l,ns(y,n,o)))
-t110:=isp(1to(x),[t:1to(x)]is(<t>rf,<<t>f><<n>rfl>q),ns(x,left1to(x,y,l,n),t103),left1to(x,y,l,ns(y,n,o)),t104,t109):is(<ns(y,n,o)>rfl,<<ns(y,n,o)>fl><<n>rfl>q)
-f@t111:=[t:1to(y)][u:not(is"e"(1to(y),t,xout(y)))]t110(t,u):prop2(y,fl,rfl)
-t112:=andi(prop1(y,fl,rfl),prop2(y,fl,rfl),t100,t111):recprop(y,fl,rfl)
--8275
-y@[l:lessis"n"(y,x)][f:[t:1to(x)]cx]
-satz275f:=satz275d(y,fl".8275"(l,f),rfl".8275"(l,f),t112".8275"(l,f)):is"e"([t:1to(y)]cx,left(cx,x,y,l,recf(x,f)),recf(y,left(cx,x,y,l,f)))
-x@[f:[t:1to(pl"n"(x,1))]cx]
-+8276
-xs:=<x>suc:nat
-x1:=pl"n"(x,1):nat
-t1:=lessisi1"n"(x,x1,satz18a(x,1)):lessis"n"(x,x1)
-t2:=lessisi1"n"(x,xs,satz18c(x)):lessis"n"(x,xs)
-t3:=lessisi2"n"(xs,x1,satz4e(x)):lessis"n"(xs,x1)
-fx:=left(cx,x1,x,t1,f):[t:1to(x)]cx
-f1:=left(cx,x1,xs,t3,f):[t:1to(xs)]cx
-f1x:=f1"c.8275"(x,t95"c.8275"(x),f1):[t:1to(x)]cx
-g1:=g2"c.8275"(x,t95"c.8275"(x),f1):[t:1to(xs)]cx
-g1x:=g1"c.8275"(x,t95"c.8275"(x),f1):[t:1to(x)]cx
-g:=left(cx,x1,xs,t3,recf(x1,f)):[t:1to(xs)]cx
-t4:=t49"c.8275"(x,t95"c.8275"(x),f1,xout(xs),refis(1to(xs),xout(xs))):is(<xout(xs)>g1,<<xout(xs)>f1><<xout(x)>g1x>q)
-t5:=satz275d(xs,f1,g1,t92"c.8275"(x,t95"c.8275"(x),f1)):is"e"([t:1to(xs)]cx,g1,recf(xs,f1))
-t6:=satz275f(x1,xs,t3,f):is"e"([t:1to(xs)]cx,g,recf(xs,f1))
-t7:=tris2([t:1to(xs)]cx,g,g1,recf(xs,f1),t6,t5):is"e"([t:1to(xs)]cx,g,g1)
-t8:=fise(1to(xs),cx,g,g1,t7,xout(xs)):is(<xout(xs)>g,<xout(xs)>g1)
-t9:=tris(cx,<xout(xs)>g,<xout(xs)>g1,<<xout(xs)>f1><<xout(x)>g1x>q,t8,t4):is(<xout(xs)>g,<<xout(xs)>f1><<xout(x)>g1x>q)
-[n:1to(x)]
-t10:=isinoutn(xs,inn(x,n),trlessis"n"(inn(x,n),x,xs,1top(x,n),t2)):is"n"(inn(x,n),inn(xs,left1to(xs,x,t2,n)))
-t11:=isoutni(x1,inn(x,n),trlessis"n"(inn(x,n),x,x1,1top(x,n),t1),inn(xs,left1to(xs,x,t2,n)),trlessis"n"(inn(xs,left1to(xs,x,t2,n)),xs,x1,1top(xs,left1to(xs,x,t2,n)),t3),t10):is"e"(1to(x1),left1to(x1,x,t1,n),left1to(x1,xs,t3,left1to(xs,x,t2,n)))
-t12:=isf(1to(x1),cx,f,left1to(x1,x,t1,n),left1to(x1,xs,t3,left1to(xs,x,t2,n)),t11):is(<n>fx,<n>f1x)
-f@t13:=fisi(1to(x),cx,fx,f1x,[t:1to(x)]t12(t)):is"e"([t:1to(x)]cx,fx,f1x)
-t14:=isf([t:1to(x)]cx,[t:1to(x)]cx,[u:[t:1to(x)]cx]recf(x,u),fx,f1x,t13):is"e"([t:1to(x)]cx,recf(x,fx),recf(x,f1x))
-t15:=satz275d(x,f1x,g1x,t45"c.8275"(x,t95"c.8275"(x),f1)):is"e"([t:1to(x)]cx,g1x,recf(x,f1x))
-t16:=tris2([t:1to(x)]cx,g1x,recf(x,fx),recf(x,f1x),t15,t14):is"e"([t:1to(x)]cx,g1x,recf(x,fx))
-t17:=fise(1to(x),cx,g1x,recf(x,fx),t16,xout(x)):is(<xout(x)>g1x,<xout(x)>recf(x,fx))
-t18:=isinoutn(xs,xs,lessisi3(xs)):is"n"(xs,inn(xs,xout(xs)))
-t19:=tris(nat,x1,xs,inn(xs,xout(xs)),satz4a(x),t18):is"n"(x1,inn(xs,xout(xs)))
-t20:=isoutni(x1,x1,lessisi3(x1),inn(xs,xout(xs)),trlessis"n"(inn(xs,xout(xs)),xs,x1,1top(xs,xout(xs)),t3),t19):is"e"(1to(x1),xout(x1),left1to(x1,xs,t3,xout(xs)))
-t21:=isp1(1to(x1),[t:1to(x1)]is(<t>recf(x1,f),<<t>f><<xout(x)>g1x>q),left1to(x1,xs,t3,xout(xs)),xout(x1),t9,t20):is(<xout(x1)>recf(x1,f),<<xout(x1)>f><<xout(x)>g1x>q)
-t22:=isf(cx,cx,[t:cx]<<xout(x1)>f><t>q,<xout(x)>g1x,<xout(x)>recf(x,fx),t17):is(<<xout(x1)>f><<xout(x)>g1x>q,<<xout(x1)>f><<xout(x)>recf(x,fx)>q)
--8276
-satz276:=tris(cx,<xout(pl"n"(x,1))>recf(pl"n"(x,1),f),<<xout(pl"n"(x,1))>f><<xout(x)>g1x".8276">q,<<xout(pl"n"(x,1))>f><<xout(x)>recf(x,fx".8276")>q,t21".8276",t22".8276"):is(<xout(pl"n"(x,1))>recf(pl"n"(x,1),f),<<xout(pl"n"(x,1))>f><<xout(x)>recf(x,left(cx,pl"n"(x,1),x,lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)),f))>q)
-x@[f:[u:1to(x)]cx]
-smpr:=rec(x,f,xout(x)):cx
-@[x:nat][f:[u:1to(x)]cx]
-sum:=smpr([t:cx][u:cx]pl(t,u),x,f):cx
-prod:=smpr([t:cx][u:cx]ts(t,u),x,f):cx
-q@[f:[u:1to(1)]cx]
-+8277
-t1:=isoutni(1,1,satz24a(1),1,lessisi3(1),refis(nat,1)):is"e"(1to(1),1out(1),xout(1))
--8277
-satz277:=isp(1to(1),[t:1to(1)]is(rec(1,f,t),<t>f),1out(1),xout(1),satz275b(1,f),t1".8277"):is(smpr(1,f),<xout(1)>f)
-q@[x:nat][f:[u:1to(pl"n"(x,1))]cx]
-satz278:=satz276(x,f):is(smpr(pl"n"(x,1),f),<<xout(pl"n"(x,1))>f><smpr(x,left(cx,pl"n"(x,1),x,lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)),f))>q)
-x@[f:[u:1to(x)]cx][y:nat][i:is"n"(y,x)]
-+v8
-t1:=lessisi2"n"(y,x,i):lessis"n"(y,x)
-f0:=left(cx,x,y,t1,f):[t:1to(y)]cx
-t2:=fise(1to(y),cx,left(cx,x,y,t1,recf(x,f)),recf(y,f0),satz275f(x,y,t1,f),xout(y)):is(<left1to(x,y,t1,xout(y))>recf(x,f),smpr(y,f0))
-t3:=tris1(nat,inn(y,xout(y)),x,y,isinoutn(y,y,lessisi3(y)),i):is"n"(inn(y,xout(y)),x)
-t4:=isoutni(x,inn(y,xout(y)),trlessis"n"(inn(y,xout(y)),y,x,1top(y,xout(y)),t1),x,lessisi3(x),t3):is"e"(1to(x),left1to(x,y,t1,xout(y)),xout(x))
-t5:=isf(1to(x),cx,recf(x,f),left1to(x,y,t1,xout(y)),xout(x),t4):is(<left1to(x,y,t1,xout(y))>recf(x,f),smpr(x,f))
--v8
-issmpr:=tris1(cx,smpr(y,f0".v8"),smpr(x,f),<left1to(x,y,t1".v8",xout(y))>recf(x,f),t2".v8",t5".v8"):is(smpr(y,left(cx,x,y,lessisi2"n"(y,x,i),f)),smpr(x,f))
-@[z:complex][x:nat]
-+8279
-xr:=rlofnt(x):real
-prop1:=is(sum(x,[t:1to(x)]z),ts(z,pli(xr,0))):'prop'
-z@t1:=satz277([t:cx][u:cx]pl(t,u),[t:1to(1)]z):is(sum(1,[t:1to(1)]z),z)
-t2:=tris(cx,sum(1,[t:1to(1)]z),z,ts(z,1c),t1,satz222a(z)):prop1(1)
-x@[p:prop1(x)]
-t3:=satz278([t:cx][u:cx]pl(t,u),x,[t:1to(pl"n"(x,1))]z):is(sum(pl"n"(x,1),[t:1to(pl"n"(x,1))]z),pl(sum(x,[t:1to(x)]z),z))
-t4:=ispl12(sum(x,[t:1to(x)]z),ts(z,pli(xr,0)),z,ts(z,1c),p,satz222a(z)):is(pl(sum(x,[t:1to(x)]z),z),pl(ts(z,pli(xr,0)),ts(z,1c)))
-t5:=distpt2(z,pli(xr,0),1c):is(pl(ts(z,pli(xr,0)),ts(z,1c)),ts(z,pl(pli(xr,0),1c)))
-t6:=plis12a(xr,0,1rl,0):is(pl(pli(xr,0),1c),pli(pl"r"(xr,1rl),pl"r"(0,0)))
-t7:=isrecx12(pl"r"(xr,1rl),rlofnt(pl"n"(x,1)),pl"r"(0,0),0,satzr155b(x,1),pl01"r"(0,0,refis(real,0))):is(pli(pl"r"(xr,1rl),pl"r"(0,0)),pli(rlofnt(pl"n"(x,1)),0))
-t8:=tris(cx,pl(pli(xr,0),1c),pli(pl"r"(xr,1rl),pl"r"(0,0)),pli(rlofnt(pl"n"(x,1)),0),t6,t7):is(pl(pli(xr,0),1c),pli(rlofnt(pl"n"(x,1)),0))
-t9:=ists2(pl(pli(xr,0),1c),pli(rlofnt(pl"n"(x,1)),0),z,t8):is(ts(z,pl(pli(xr,0),1c)),ts(z,pli(rlofnt(pl"n"(x,1)),0)))
-t10:=tr4is(cx,sum(pl"n"(x,1),[t:1to(pl"n"(x,1))]z),pl(sum(x,[t:1to(x)]z),z),pl(ts(z,pli(xr,0)),ts(z,1c)),ts(z,pl(pli(xr,0),1c)),ts(z,pli(rlofnt(pl"n"(x,1)),0)),t3,t4,t5,t9):prop1(pl"n"(x,1))
-t11:=isp(nat,[t:nat]prop1(t),pl"n"(x,1),<x>suc,t10,satz4a(x)):prop1(<x>suc)
--8279
-satz279:=induction([t:nat]prop1".8279"(t),t2".8279",[u:nat][t:prop1".8279"(u)]t11".8279"(u,t),x):is(sum(x,[t:1to(x)]z),ts(z,pli(rlofnt(x),0)))
-q@[f:[t:1to(2)]cx]
-+8280
-t1:=lessisi1"n"(1,2,satz18a(1,1)):lessis"n"(1,2)
-f1:=left(cx,2,1,t1,f):[t:1to(1)]cx
-t2:=satz278(q,1,f):is(smpr(2,f),<<xout(2)>f><smpr(1,f1)>q)
-t3:=satz277(q,f1):is(smpr(1,f1),<xout(1)>f1)
-t4:=isinoutn(1,1,lessisi3(1)):is"n"(1,inn(1,xout(1)))
-t5:=isoutni(2,1,satz24a(2),inn(1,xout(1)),trlessis"n"(inn(1,xout(1)),1,2,1top(1,xout(1)),t1),t4):is"e"(1to(2),1out(2),left1to(2,1,t1,xout(1)))
-t6:=isf(1to(2),cx,f,1out(2),left1to(2,1,t1,xout(1)),t5):is(<1out(2)>f,<xout(1)>f1)
-t7:=tris2(cx,smpr(1,f1),<1out(2)>f,<xout(1)>f1,t3,t6):is(smpr(1,f1),<1out(2)>f)
-t8:=isf(cx,cx,[t:cx]<<xout(2)>f><t>q,smpr(1,f1),<1out(2)>f,t7):is(<<xout(2)>f><smpr(1,f1)>q,<<xout(2)>f><<1out(2)>f>q)
--8280
-satz280:=tris(cx,smpr(2,f),<<xout(2)>f><smpr(1,f1".8280")>q,<<xout(2)>f><<1out(2)>f>q,t2".8280",t8".8280"):is(smpr(2,f),<<xout(2)>f><<1out(2)>f>q)
-q@assoc:=[x:cx][y:cx][z:cx]is(<z><<y><x>q>q,<<z><y>q><x>q):'prop'
-@assocp1:=[x:cx][y:cx][z:cx]asspl1(x,y,z):assoc([x:cx][y:cx]pl(x,y))
-assocts:=[x:cx][y:cx][z:cx]assts1(x,y,z):assoc([x:cx][y:cx]ts(x,y))
-q@[a:assoc][z:cx][u:cx][v:cx]
-assq1:=<v><u><z>a:is(<v><<u><z>q>q,<<v><u>q><z>q)
-assq2:=symis(cx,<v><<u><z>q>q,<<v><u>q><z>q,assq1):is(<<v><u>q><z>q,<v><<u><z>q>q)
-q@[a:assoc(q)][x:nat][y:nat][f:[t:1to(pl"n"(x,y))]cx]
-+8281
-y@t1:=lessisi1"n"(x,pl"n"(x,y),satz18a(x,y)):lessis"n"(x,pl"n"(x,y))
-f@f1:=left(cx,pl"n"(x,y),x,t1,f):[t:1to(x)]cx
-f2:=right(cx,x,y,f):[t:1to(y)]cx
-prop1:=is(smpr(pl"n"(x,y),f),<smpr(y,f2)><smpr(x,f1)>q):'prop'
-y@prop2:=all"l"([t:1to(pl"n"(x,y))]cx,[u:[t:1to(pl"n"(x,y))]cx]prop1(u)):'prop'
-x@[f0:[t:1to(pl"n"(x,1))]cx]
-t2:=satz278(q,x,f0):is(smpr(pl"n"(x,1),f0),<<xout(pl"n"(x,1))>f0><smpr(x,f1(1,f0))>q)
-t3:=satz277(q,f2(1,f0)):is(smpr(1,f2(1,f0)),<xout(1)>f2(1,f0))
-t4:=isinoutn(1,1,lessisi3(1)):is"n"(1,inn(1,xout(1)))
-t5:=ispl2"n"(1,inn(1,xout(1)),x,t4):is"n"(pl"n"(x,1),pl"n"(x,inn(1,xout(1))))
-t6:=isoutni(pl"n"(x,1),pl"n"(x,1),lessisi3(pl"n"(x,1)),pl"n"(x,inn(1,xout(1))),satz19o(inn(1,xout(1)),1,x,1top(1,xout(1))),t5):is"e"(1to(pl"n"(x,1)),xout(pl"n"(x,1)),right1to(x,1,xout(1)))
-t7:=isf(1to(pl"n"(x,1)),cx,f0,xout(pl"n"(x,1)),right1to(x,1,xout(1)),t6):is(<xout(pl"n"(x,1))>f0,<xout(1)>f2(1,f0))
-t8:=tris2(cx,<xout(pl"n"(x,1))>f0,smpr(1,f2(1,f0)),<xout(1)>f2(1,f0),t7,t3):is(<xout(pl"n"(x,1))>f0,smpr(1,f2(1,f0)))
-t9:=isf(cx,cx,<smpr(x,f1(1,f0))>q,<xout(pl"n"(x,1))>f0,smpr(1,f2(1,f0)),t8):is(<<xout(pl"n"(x,1))>f0><smpr(x,f1(1,f0))>q,<smpr(1,f2(1,f0))><smpr(x,f1(1,f0))>q)
-t10:=tris(cx,smpr(pl"n"(x,1),f0),<<xout(pl"n"(x,1))>f0><smpr(x,f1(1,f0))>q,<smpr(1,f2(1,f0))><smpr(x,f1(1,f0))>q,t2,t9):prop1(1,f0)
-x@t11:=[u:[t:1to(pl"n"(x,1))]cx]t10(u):prop2(1)
-y@yp1:=pl"n"(y,1):nat
-xpy:=pl"n"(x,y):nat
-xpy1:=pl"n"(x,yp1):nat
-xyp1:=pl"n"(xpy,1):nat
-t12:=lessisi2"n"(xyp1,xpy1,asspl1"n"(x,y,1)):lessis"n"(xyp1,xpy1)
-[p:prop2(y)][f:[t:1to(xpy1)]cx]
-t13:=isinoutn(xyp1,xyp1,lessisi3(xyp1)):is"n"(xyp1,inn(xyp1,xout(xyp1)))
-t14:=tris(nat,xpy1,xyp1,inn(xyp1,xout(xyp1)),asspl2"n"(x,y,1),t13):is"n"(xpy1,inn(xyp1,xout(xyp1)))
-t15:=isoutni(xpy1,xpy1,lessisi3(xpy1),inn(xyp1,xout(xyp1)),trlessis"n"(inn(xyp1,xout(xyp1)),xyp1,xpy1,1top(xyp1,xout(xyp1)),t12),t14):is"e"(1to(xpy1),xout(xpy1),left1to(xpy1,xyp1,t12,xout(xyp1)))
-t16:=isf(1to(xpy1),cx,recf(xpy1,f),xout(xpy1),left1to(xpy1,xyp1,t12,xout(xyp1)),t15):is(smpr(xpy1,f),<xout(xyp1)>left(cx,xpy1,xyp1,t12,recf(xpy1,f)))
-fr:=left(cx,xpy1,xyp1,t12,f):[t:1to(xyp1)]cx
-t17:=satz275f(xpy1,xyp1,t12,f):is"e"([t:1to(xyp1)]cx,left(cx,xpy1,xyp1,t12,recf(xpy1,f)),recf(xyp1,fr))
-t18:=fise(1to(xyp1),cx,left(cx,xpy1,xyp1,t12,recf(xpy1,f)),recf(xyp1,fr),t17,xout(xyp1)):is(<xout(xyp1)>left(cx,xpy1,xyp1,t12,recf(xpy1,f)),smpr(xyp1,fr))
-t19:=lessisi1"n"(xpy,xyp1,satz18a(xpy,1)):lessis"n"(xpy,xyp1)
-frr:=left(cx,xyp1,xpy,t19,fr):[t:1to(xpy)]cx
-t20:=satz278(xpy,fr):is(smpr(xyp1,fr),<<xout(xyp1)>fr><smpr(xpy,frr)>q)
-t21:=isf(cx,cx,[u:cx]<<xout(xyp1)>fr><u>q,smpr(xpy,frr),<smpr(y,f2(frr))><smpr(x,f1(frr))>q,<frr>p):is(<<xout(xyp1)>fr><smpr(xpy,frr)>q,<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q)
-t22:=assq1(a,smpr(x,f1(frr)),smpr(y,f2(frr)),<xout(xyp1)>fr):is(<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q,<<<xout(xyp1)>fr><smpr(y,f2(frr))>q><smpr(x,f1(frr))>q)
-t23:=lessisi1"n"(y,yp1,satz18a(y,1)):lessis"n"(y,yp1)
-fy:=left(cx,yp1,y,t23,f2(yp1,f)):[t:1to(y)]cx
-t24:=satz278(y,f2(yp1,f)):is(smpr(yp1,f2(yp1,f)),<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q)
-t25:=isinoutn(yp1,yp1,lessisi3(yp1)):is"n"(yp1,inn(yp1,xout(yp1)))
-t26:=ispl2"n"(yp1,inn(yp1,xout(yp1)),x,t25):is"n"(xpy1,pl"n"(x,inn(yp1,xout(yp1))))
-t27:=tris1(nat,inn(xyp1,xout(xyp1)),pl"n"(x,inn(yp1,xout(yp1))),xpy1,t14,t26):is"n"(inn(xyp1,xout(xyp1)),pl"n"(x,inn(yp1,xout(yp1))))
-t28:=isoutni(xpy1,inn(xyp1,xout(xyp1)),trlessis"n"(inn(xyp1,xout(xyp1)),xyp1,xpy1,1top(xyp1,xout(xyp1)),t12),pl"n"(x,inn(yp1,xout(yp1))),satz19o(inn(yp1,xout(yp1)),yp1,x,1top(yp1,xout(yp1))),t27):is"e"(1to(xpy1),left1to(xpy1,xyp1,t12,xout(xyp1)),right1to(x,yp1,xout(yp1)))
-t29:=isf(1to(xpy1),cx,f,left1to(xpy1,xyp1,t12,xout(xyp1)),right1to(x,yp1,xout(yp1)),t28):is(<xout(xyp1)>fr,<xout(yp1)>f2(yp1,f))
-t30:=isf(cx,cx,<smpr(y,f2(frr))>q,<xout(xyp1)>fr,<xout(yp1)>f2(yp1,f),t29):is(<<xout(xyp1)>fr><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,f2(frr))>q)
-[n:1to(y)]
-n0:=inn(y,n):nat
-nyp1:=left1to(yp1,y,t23,n):1to(yp1)
-t31:=isinoutn(yp1,n0,trlessis"n"(n0,y,yp1,1top(y,n),t23)):is"n"(n0,inn(yp1,nyp1))
-t32:=ispl2"n"(n0,inn(yp1,nyp1),x,t31):is"n"(pl"n"(x,n0),pl"n"(x,inn(yp1,nyp1)))
-nxpy:=right1to(x,y,n):1to(xpy)
-nxyp1:=left1to(xyp1,xpy,t19,nxpy):1to(xyp1)
-t33:=isinoutn(xyp1,inn(xpy,nxpy),trlessis"n"(inn(xpy,nxpy),xpy,xyp1,1top(xpy,nxpy),t19)):is"n"(inn(xpy,nxpy),inn(xyp1,nxyp1))
-t34:=isinoutn(xpy,pl"n"(x,n0),satz19o(n0,y,x,1top(y,n))):is"n"(pl"n"(x,n0),inn(xpy,nxpy))
-t35:=tris(nat,pl"n"(x,n0),inn(xpy,nxpy),inn(xyp1,nxyp1),t34,t33):is"n"(pl"n"(x,n0),inn(xyp1,nxyp1))
-t36:=tris1(nat,pl"n"(x,inn(yp1,nyp1)),inn(xyp1,nxyp1),pl"n"(x,n0),t32,t35):is"n"(pl"n"(x,inn(yp1,nyp1)),inn(xyp1,nxyp1))
-t37:=isoutni(xpy1,pl"n"(x,inn(yp1,nyp1)),satz19o(inn(yp1,nyp1),yp1,x,1top(yp1,nyp1)),inn(xyp1,nxyp1),trlessis"n"(inn(xyp1,nxyp1),xyp1,xpy1,1top(xyp1,nxyp1),t12),t36):is"e"(1to(xpy1),right1to(x,yp1,nyp1),left1to(xpy1,xyp1,t12,nxyp1))
-t38:=isf(1to(xpy1),cx,f,right1to(x,yp1,nyp1),left1to(xpy1,xyp1,t12,nxyp1),t37):is(<n>fy,<n>f2(frr))
-f@t39:=fisi(1to(y),cx,fy,f2(frr),[u:1to(y)]t38(u)):is"e"([u:1to(y)]cx,fy,f2(frr))
-t40:=isf([u:1to(y)]cx,cx,[t:[u:1to(y)]cx]smpr(y,t),fy,f2(frr),t39):is(smpr(y,fy),smpr(y,f2(frr)))
-t41:=isf(cx,cx,[t:cx]<<xout(yp1)>f2(yp1,f)><t>q,smpr(y,f2(frr)),smpr(y,fy),symis(cx,smpr(y,fy),smpr(y,f2(frr)),t40)):is(<<xout(yp1)>f2(yp1,f)><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q)
-t41a:=tris(cx,<<xout(xyp1)>fr><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q,t30,t41):is(<<xout(xyp1)>fr><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q)
-t42:=tris2(cx,<<xout(xyp1)>fr><smpr(y,f2(frr))>q,smpr(yp1,f2(yp1,f)),<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q,t41a,t24):is(<<xout(xyp1)>fr><smpr(y,f2(frr))>q,smpr(yp1,f2(yp1,f)))
-t43:=isf(cx,cx,<smpr(x,f1(frr))>q,<<xout(xyp1)>fr><smpr(y,f2(frr))>q,smpr(yp1,f2(yp1,f)),t42):is(<<<xout(xyp1)>fr><smpr(y,f2(frr))>q><smpr(x,f1(frr))>q,<smpr(yp1,f2(yp1,f))><smpr(x,f1(frr))>q)
-[m:1to(x)]
-m0:=inn(x,m):nat
-mxpy:=left1to(xpy,x,t1,m):1to(xpy)
-mxyp1:=left1to(xyp1,xpy,t19,mxpy):1to(xyp1)
-t44:=isinoutn(xyp1,inn(xpy,mxpy),trlessis"n"(inn(xpy,mxpy),xpy,xyp1,1top(xpy,mxpy),t19)):is"n"(inn(xpy,mxpy),inn(xyp1,mxyp1))
-t45:=isinoutn(xpy,m0,trlessis"n"(m0,x,xpy,1top(x,m),t1)):is"n"(m0,inn(xpy,mxpy))
-t46:=tris(nat,m0,inn(xpy,mxpy),inn(xyp1,mxyp1),t45,t44):is"n"(m0,inn(xyp1,mxyp1))
-t47:=isoutni(xpy1,m0,trlessis"n"(m0,x,xpy1,1top(x,m),t1(yp1)),inn(xyp1,mxyp1),trlessis"n"(inn(xyp1,mxyp1),xyp1,xpy1,1top(xyp1,mxyp1),t12),t46):is"e"(1to(xpy1),left1to(xpy1,x,t1(yp1),m),left1to(xpy1,xyp1,t12,mxyp1))
-t48:=isf(1to(xpy1),cx,f,left1to(xpy1,x,t1(yp1),m),left1to(xpy1,xyp1,t12,mxyp1),t47):is(<m>f1(x,yp1,f),<m>f1(x,y,frr))
-f@t49:=fisi(1to(x),cx,f1(x,yp1,f),f1(x,y,frr),[u:1to(x)]t48(u)):is"e"([u:1to(x)]cx,f1(x,yp1,f),f1(x,y,frr))
-t50:=isf([u:1to(x)]cx,cx,[t:[u:1to(x)]cx]smpr(x,t),f1(yp1,f),f1(frr),t49):is(smpr(x,f1(yp1,f)),smpr(x,f1(frr)))
-t51:=isf(cx,cx,[t:cx]<smpr(yp1,f2(yp1,f))><t>q,smpr(x,f1(frr)),smpr(x,f1(yp1,f)),symis(cx,smpr(x,f1(yp1,f)),smpr(x,f1(frr)),t50)):is(<smpr(yp1,f2(yp1,f))><smpr(x,f1(frr))>q,<smpr(yp1,f2(yp1,f))><smpr(x,f1(yp1,f))>q)
-t52:=tr4is(cx,smpr(xpy1,f),<xout(xyp1)>left(cx,xpy1,xyp1,t12,recf(xpy1,f)),smpr(xyp1,fr),<<xout(xyp1)>fr><smpr(xpy,frr)>q,<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q,t16,t18,t20,t21):is(smpr(xpy1,f),<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q)
-t53:=tr4is(cx,smpr(xpy1,f),<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q,<<<xout(xyp1)>fr><smpr(y,f2(frr))>q><smpr(x,f1(frr))>q,<smpr(yp1,f2(yp1,f))><smpr(x,f1(frr))>q,<smpr(yp1,f2(yp1,f))><smpr(x,f1(yp1,f))>q,t52,t22,t43,t51):prop1(yp1,f)
-p@t54:=[u:[t:1to(xpy1)]cx]t53(u):prop2(yp1)
-t55:=isp(nat,[t:nat]prop2(t),yp1,<y>suc,t54,satz4a(y)):prop2(<y>suc)
-y@t56:=induction([t:nat]prop2(t),t11,[z:nat][t:prop2(z)]t55(z,t),y):prop2(y)
--8281
-satz281:=<f>t56".8281":is(smpr(pl"n"(x,y),f),<smpr(y,right(cx,x,y,f))><smpr(x,left(cx,pl"n"(x,y),x,lessisi1"n"(x,pl"n"(x,y),satz18a(x,y)),f))>q)
-q@commut:=[x:cx][y:cx]is(<y><x>q,<x><y>q):'prop'
-@commutpl:=[x:cx][y:cx]compl(x,y):commut([x:cx][y:cx]pl(x,y))
-commutts:=[x:cx][y:cx]comts(x,y):commut([x:cx][y:cx]ts(x,y))
-q@[c:commut][z:cx][u:cx]
-comq:=<u><z>c:is(<u><z>q,<z><u>q)
-a@[c:commut(q)][x:nat][f:[t:1to(x)]cx][g:[t:1to(x)]cx]
-+8282
-prop1:=is(smpr(x,[t:1to(x)]<<t>g><<t>f>q),<smpr(x,g)><smpr(x,f)>q):'prop'
-x@prop2:=all"l"([t:1to(x)]cx,[u:[t:1to(x)]cx]all"l"([t:1to(x)]cx,[v:[t:1to(x)]cx]prop1(u,v))):'prop'
-c@[f0:[t:1to(1)]cx][g0:[t:1to(1)]cx]
-t1:=satz277([t:1to(1)]<<t>g0><<t>f0>q):is(smpr(1,[t:1to(1)]<<t>g0><<t>f0>q),<<xout(1)>g0><<xout(1)>f0>q)
-t2:=isf(cx,cx,<smpr(1,f0)>q,smpr(1,g0),<xout(1)>g0,satz277(g0)):is(<smpr(1,g0)><smpr(1,f0)>q,<<xout(1)>g0><smpr(1,f0)>q)
-t3:=isf(cx,cx,[t:cx]<<xout(1)>g0><t>q,smpr(1,f0),<xout(1)>f0,satz277(f0)):is(<<xout(1)>g0><smpr(1,f0)>q,<<xout(1)>g0><<xout(1)>f0>q)
-t4:=tris(cx,<smpr(1,g0)><smpr(1,f0)>q,<<xout(1)>g0><smpr(1,f0)>q,<<xout(1)>g0><<xout(1)>f0>q,t2,t3):is(<smpr(1,g0)><smpr(1,f0)>q,<<xout(1)>g0><<xout(1)>f0>q)
-t5:=tris2(cx,smpr(1,[t:1to(1)]<<t>g0><<t>f0>q),<smpr(1,g0)><smpr(1,f0)>q,<<xout(1)>g0><<xout(1)>f0>q,t1,t4):prop1(1,f0,g0)
-c@t6:=[u:[t:1to(1)]cx][v:[t:1to(1)]cx]t5(u,v):prop2(1)
-x@xp1:=pl"n"(x,1):nat
-[p:prop2(x)][f:[t:1to(xp1)]cx][g:[t:1to(xp1)]cx]
-c@[u:cx][v:cx][w:cx][z:cx]
-t7:=assq2(a,<v><u>q,w,z):is(<<z><w>q><<v><u>q>q,<z><<w><<v><u>q>q>q)
-t8:=comq(c,<v><u>q,w):is(<w><<v><u>q>q,<<v><u>q><w>q)
-t9:=assq2(a,w,u,v):is(<<v><u>q><w>q,<v><<u><w>q>q)
-t10:=tris(cx,<w><<v><u>q>q,<<v><u>q><w>q,<v><<u><w>q>q,t8,t9):is(<w><<v><u>q>q,<v><<u><w>q>q)
-t11:=isf(cx,cx,[t:cx]<z><t>q,<w><<v><u>q>q,<v><<u><w>q>q,t10):is(<z><<w><<v><u>q>q>q,<z><<v><<u><w>q>q>q)
-t12:=assq1(a,<u><w>q,v,z):is(<z><<v><<u><w>q>q>q,<<z><v>q><<u><w>q>q)
-t13:=comq(c,w,u):is(<u><w>q,<w><u>q)
-t14:=isf(cx,cx,[t:cx]<<z><v>q><t>q,<u><w>q,<w><u>q,t13):is(<<z><v>q><<u><w>q>q,<<z><v>q><<w><u>q>q)
-t15:=tr4is(cx,<<z><w>q><<v><u>q>q,<z><<w><<v><u>q>q>q,<z><<v><<u><w>q>q>q,<<z><v>q><<u><w>q>q,<<z><v>q><<w><u>q>q,t7,t11,t12,t14):is(<<z><w>q><<v><u>q>q,<<z><v>q><<w><u>q>q)
-g@t16:=lessisi1"n"(x,xp1,satz18a(x,1)):lessis"n"(x,xp1)
-sfx:=smpr(x,left(cx,xp1,x,t16,f)):cx
-sgx:=smpr(x,left(cx,xp1,x,t16,g)):cx
-h:=[t:1to(xp1)]<<t>g><<t>f>q:[t:1to(xp1)]cx
-shx:=smpr(x,left(cx,xp1,x,t16,h)):cx
-t17:=satz278(x,h):is(smpr(xp1,h),<<<xout(xp1)>g><<xout(xp1)>f>q><shx>q)
-t18:=<left(cx,xp1,x,t16,g)><left(cx,xp1,x,t16,f)>p:is(shx,<sgx><sfx>q)
-t19:=isf(cx,cx,[t:cx]<<<xout(xp1)>g><<xout(xp1)>f>q><t>q,shx,<sgx><sfx>q,t18):is(<<<xout(xp1)>g><<xout(xp1)>f>q><shx>q,<<<xout(xp1)>g><<xout(xp1)>f>q><<sgx><sfx>q>q)
-t20:=t15(sfx,sgx,<xout(xp1)>f,<xout(xp1)>g):is(<<<xout(xp1)>g><<xout(xp1)>f>q><<sgx><sfx>q>q,<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q)
-t21:=symis(cx,smpr(xp1,f),<<xout(xp1)>f><sfx>q,satz278(x,f)):is(<<xout(xp1)>f><sfx>q,smpr(xp1,f))
-t22:=isf(cx,cx,[t:cx]<<<xout(xp1)>g><sgx>q><t>q,<<xout(xp1)>f><sfx>q,smpr(xp1,f),t21):is(<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q,<<<xout(xp1)>g><sgx>q><smpr(xp1,f)>q)
-t23:=symis(cx,smpr(xp1,g),<<xout(xp1)>g><sgx>q,satz278(x,g)):is(<<xout(xp1)>g><sgx>q,smpr(xp1,g))
-t24:=isf(cx,cx,<smpr(xp1,f)>q,<<xout(xp1)>g><sgx>q,smpr(xp1,g),t23):is(<<<xout(xp1)>g><sgx>q><smpr(xp1,f)>q,<smpr(xp1,g)><smpr(xp1,f)>q)
-t25:=tr3is(cx,smpr(xp1,h),<<<xout(xp1)>g><<xout(xp1)>f>q><shx>q,<<<xout(xp1)>g><<xout(xp1)>f>q><<sgx><sfx>q>q,<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q,t17,t19,t20):is(smpr(xp1,h),<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q)
-t26:=tr3is(cx,smpr(xp1,h),<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q,<<<xout(xp1)>g><sgx>q><smpr(xp1,f)>q,<smpr(xp1,g)><smpr(xp1,f)>q,t25,t22,t24):prop1(xp1,f,g)
-p@t27:=[u:[t:1to(xp1)]cx][v:[t:1to(xp1)]cx]t26(u,v):prop2(xp1)
-t28:=isp(nat,[t:nat]prop2(t),xp1,<x>suc,t27,satz4a(x)):prop2(<x>suc)
-x@t29:=induction([t:nat]prop2(t),t6,[y:nat][t:prop2(y)]t28(y,t),x):prop2(x)
--8282
-satz282:=<g><f>t29".8282":is(smpr(x,[t:1to(x)]<<t>g><<t>f>q),<smpr(x,g)><smpr(x,f)>q)
-x@[s:[t:1to(x)]1to(x)][b:bijective(1to(x),1to(x),s)][f:[t:1to(x)]cx]
-+8283
-s@[f:[t:1to(x)]cx]
-g:=[t:1to(x)]<<t>s>f:[t:1to(x)]cx
-prop1:=is(smpr(x,g),smpr(x,f)):'prop'
-x@prop2:=all"l"([t:1to(x)]1to(x),[u:[t:1to(x)]1to(x)]all"l"([t:1to(x)]cx,[v:[t:1to(x)]cx]imp(bijective(1to(x),1to(x),u),prop1(u,v)))):'prop'
-c@[s:[t:1to(1)]1to(1)][f:[t:1to(1)]cx]
-t1:=tris2(1to(1),<xout(1)>s,xout(1),1o"n",th1"n.singlet"(<xout(1)>s),th1"n.singlet"(xout(1))):is"e"(1to(1),<xout(1)>s,xout(1))
-t2:=satz277(g(1,s,f)):is(smpr(1,g(1,s,f)),<xout(1)>g(1,s,f))
-t3:=isf(1to(1),cx,f,<xout(1)>s,xout(1),t1):is(<xout(1)>g(1,s,f),<xout(1)>f)
-t4:=symis(cx,smpr(1,f),<xout(1)>f,satz277(f)):is(<xout(1)>f,smpr(1,f))
-t5:=tr3is(cx,smpr(1,g(1,s,f)),<xout(1)>g(1,s,f),<xout(1)>f,smpr(1,f),t2,t3,t4):prop1(1,s,f)
-c@t6:=[u:[t:1to(1)]1to(1)][v:[t:1to(1)]cx][w:bijective(1to(1),1to(1),u)]t5(u,v):prop2(1)
-x@xp1:=pl"n"(x,1):nat
-t7:=lessisi1"n"(x,xp1,satz18a(x,1)):lessis"n"(x,xp1)
-[p:prop2(x)][s:[t:1to(xp1)]1to(xp1)][f:[t:1to(xp1)]cx][b:bijective(1to(xp1),1to(xp1),s)]
-t8:=ande1(injective(1to(xp1),1to(xp1),s),surjective(1to(xp1),1to(xp1),s),b):injective(1to(xp1),1to(xp1),s)
-[case1:is"e"(1to(xp1),<xout(xp1)>s,xout(xp1))][u:1to(x)]
-u1:=left1to(xp1,x,t7,u):1to(xp1)
-n1:=inn(xp1,<u1>s):nat
-[i:is"n"(n1,xp1)]
-t9:=tr3is(1to(xp1),<u1>s,outn(xp1,n1,1top(xp1,<u1>s)),xout(xp1),<xout(xp1)>s,isoutinn(xp1,<u1>s),isoutni(xp1,n1,1top(xp1,<u1>s),xp1,lessisi3(xp1),i),symis(1to(xp1),<xout(xp1)>s,xout(xp1),case1)):is"e"(1to(xp1),<u1>s,<xout(xp1)>s)
-t10:=isfe(1to(xp1),1to(xp1),s,t8,u1,xout(xp1),t9):is"e"(1to(xp1),u1,xout(xp1))
-t11:=isoutne(xp1,inn(x,u),trlessis"n"(inn(x,u),x,xp1,1top(x,u),t7),xp1,lessisi3(xp1),t10):is"n"(inn(x,u),xp1)
-t12:=satz16a(inn(x,u),x,xp1,1top(x,u),satz18a(x,1)):less"n"(inn(x,u),xp1)
-t13:=<t11>ec3e31(is"n"(inn(x,u),xp1),more"n"(inn(x,u),xp1),less"n"(inn(x,u),xp1),satz10b(inn(x,u),xp1),t12):con
-u@t14:=ore1(less"n"(n1,xp1),is"n"(n1,xp1),1top(xp1,<u1>s),[t:is"n"(n1,xp1)]t13(t)):less"n"(n1,xp1)
-t15:=satz26(x,n1,t14):lessis"n"(n1,x)
-w1:=outn(x,n1,t15):1to(x)
-case1@s01:=[t:1to(x)]w1(t):[t:1to(x)]1to(x)
-u@[v:1to(x)][i:is"e"(1to(x),w1(u),w1(v))]
-t16:=isoutne(x,n1(u),t15(u),n1(v),t15(v),i):is"n"(n1(u),n1(v))
-t17:=<isinne(xp1,<u1(u)>s,<u1(v)>s,t16)><u1(v)><u1(u)>t8:is"e"(1to(xp1),u1(u),u1(v))
-t18:=thleft1(xp1,x,t7,u,v,t17):is"e"(1to(x),u,v)
-u@u2:=<u1>invf(1to(xp1),1to(xp1),s,b):1to(xp1)
-n2:=inn(xp1,u2):nat
-[i:is"n"(n2,xp1)]
-t19:=tris(1to(xp1),u2,outn(xp1,n2,1top(xp1,u2)),xout(xp1),isoutinn(xp1,u2),isoutni(xp1,n2,1top(xp1,u2),xp1,lessisi3(xp1),i)):is"e"(1to(xp1),u2,xout(xp1))
-t20:=tr3is(1to(xp1),u1,<u2>s,<xout(xp1)>s,xout(xp1),thinvf2(1to(xp1),1to(xp1),s,b,u1),isf(1to(xp1),1to(xp1),s,u2,xout(xp1),t19),case1):is"e"(1to(xp1),u1,xout(xp1))
-t21:=isoutne(xp1,inn(x,u),trlessis"n"(inn(x,u),x,xp1,1top(x,u),t7),xp1,lessisi3(xp1),t20):is"n"(inn(x,u),xp1)
-t22:=satz16a(inn(x,u),x,xp1,1top(x,u),satz18a(x,1)):less"n"(inn(x,u),xp1)
-t23:=<t21>ec3e31(is"n"(inn(x,u),xp1),more"n"(inn(x,u),xp1),less"n"(inn(x,u),xp1),satz10b(inn(x,u),xp1),t22):con
-u@t24:=ore1(less"n"(n2,xp1),is"n"(n2,xp1),1top(xp1,u2),[t:is"n"(n2,xp1)]t23(t)):less"n"(n2,xp1)
-t25:=satz26(x,n2,t24):lessis"n"(n2,x)
-w2:=outn(x,n2,t25):1to(x)
-t26:=isinoutn(x,n2,t25):is"n"(n2,inn(x,w2))
-t27:=tris(1to(xp1),u2,outn(xp1,n2,1top(xp1,u2)),u1(w2),isoutinn(xp1,u2),isoutni(xp1,n2,1top(xp1,u2),inn(x,w2),trlessis"n"(inn(x,w2),x,xp1,1top(x,w2),t7),t26)):is"e"(1to(xp1),u2,u1(w2))
-t28:=tris(1to(xp1),u1,<u2>s,<u1(w2)>s,thinvf2(1to(xp1),1to(xp1),s,b,u1),isf(1to(xp1),1to(xp1),s,u2,u1(w2),t27)):is"e"(1to(xp1),u1,<u1(w2)>s)
-t29:=tris(nat,inn(x,u),inn(xp1,u1),n1(w2),isinoutn(xp1,inn(x,u),trlessis"n"(inn(x,u),x,xp1,1top(x,u),t7)),isinni(xp1,u1,<u1(w2)>s,t28)):is"n"(inn(x,u),n1(w2))
-t30:=tris(1to(x),u,outn(x,inn(x,u),1top(x,u)),w1(w2),isoutinn(x,u),isoutni(x,inn(x,u),1top(x,u),n1(w2),t15(w2),t29)):is"e"(1to(x),u,w1(w2))
-t31:=somei(1to(x),[t:1to(x)]is"e"(1to(x),u,w1(t)),w2,t30):image(1to(x),1to(x),s01,u)
-case1@t32:=andi(injective(1to(x),1to(x),s01),surjective(1to(x),1to(x),s01),[t:1to(x)][u:1to(x)][v:is"e"(1to(x),<t>s01,<u>s01)]t18(t,u,v),[t:1to(x)]t31(t)):bijective(1to(x),1to(x),s01)
-f01:=left(cx,xp1,x,t7,f):[t:1to(x)]cx
-t33:=<t32><f01><s01>p:prop1(s01,f01)
-g1:=left(cx,xp1,x,t7,g(xp1,s,f)):[t:1to(x)]cx
-g2:=g(x,s01,f01):[t:1to(x)]cx
-u@t33a:=isoutinn(xp1,<u1>s):is"e"(1to(xp1),<u1>s,outn(xp1,n1,1top(xp1,<u1>s)))
-t34:=isinoutn(x,n1,t15):is"n"(n1,inn(x,w1))
-t35:=isoutni(xp1,n1,1top(xp1,<u1>s),inn(x,w1),trlessis"n"(inn(x,w1),x,xp1,1top(x,w1),t7),t34):is"e"(1to(xp1),outn(xp1,n1,1top(xp1,<u1>s)),left1to(xp1,x,t7,w1))
-t36:=tris(1to(xp1),<u1>s,outn(xp1,n1,1top(xp1,<u1>s)),left1to(xp1,x,t7,w1),t33a,t35):is"e"(1to(xp1),<u1>s,left1to(xp1,x,t7,w1))
-t37:=isf(1to(xp1),cx,f,<u1>s,left1to(xp1,x,t7,w1),t36):is(<u>g1,<u>g2)
-case1@t38:=fisi(1to(x),cx,g1,g2,[t:1to(x)]t37(t)):is"e"([t:1to(x)]cx,g1,g2)
-t39:=isf([t:1to(x)]cx,cx,[u:[t:1to(x)]cx]smpr(x,u),g1,g2,t38):is(smpr(x,g1),smpr(x,g2))
-t40:=tris(cx,smpr(x,g1),smpr(x,g2),smpr(x,f01),t39,t33):is(smpr(x,g1),smpr(x,f01))
-t41:=isf(1to(xp1),cx,f,<xout(xp1)>s,xout(xp1),case1):is(<xout(xp1)>g(xp1,s,f),<xout(xp1)>f)
-t42:=satz278(x,g(xp1,s,f)):is(smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s,f)><smpr(x,g1)>q)
-t43:=isf(cx,cx,<smpr(x,g1)>q,<xout(xp1)>g(xp1,s,f),<xout(xp1)>f,t41):is(<<xout(xp1)>g(xp1,s,f)><smpr(x,g1)>q,<<xout(xp1)>f><smpr(x,g1)>q)
-t44:=isf(cx,cx,[t:cx]<<xout(xp1)>f><t>q,smpr(x,g1),smpr(x,f01),t40):is(<<xout(xp1)>f><smpr(x,g1)>q,<<xout(xp1)>f><smpr(x,f01)>q)
-t45:=symis(cx,smpr(xp1,f),<<xout(xp1)>f><smpr(x,f01)>q,satz278(x,f)):is(<<xout(xp1)>f><smpr(x,f01)>q,smpr(xp1,f))
-t46:=tr4is(cx,smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s,f)><smpr(x,g1)>q,<<xout(xp1)>f><smpr(x,g1)>q,<<xout(xp1)>f><smpr(x,f01)>q,smpr(xp1,f),t42,t43,t44,t45):prop1(xp1,s,f)
-b@1px:=pl"n"(1,x):nat
-[case2:is"e"(1to(xp1),<1out(xp1)>s,1out(xp1))][u:1to(x)]
-u3:=right1to(1,x,u):1to(1px)
-case2@t47:=lessisi2"n"(1px,xp1,compl"n"(1,x)):lessis"n"(1px,xp1)
-s02:=left(1to(xp1),xp1,1px,t47,s):[t:1to(1px)]1to(xp1)
-u@n3:=inn(xp1,<u3>s02):nat
-[i:is"n"(n3,1)]
-t48:=tr3is(1to(xp1),<u3>s02,outn(xp1,n3,1top(xp1,<u3>s02)),1out(xp1),<1out(xp1)>s,isoutinn(xp1,<u3>s02),isoutni(xp1,n3,1top(xp1,<u3>s02),1,satz24a(xp1),i),symis(1to(xp1),<1out(xp1)>s,1out(xp1),case2)):is"e"(1to(xp1),<u3>s02,<1out(xp1)>s)
-t49:=isfe(1to(xp1),1to(xp1),s,t8,left1to(xp1,1px,t47,u3),1out(xp1),t48):is"e"(1to(xp1),left1to(xp1,1px,t47,u3),1out(xp1))
-t50:=isoutne(xp1,inn(1px,u3),trlessis"n"(inn(1px,u3),1px,xp1,1top(1px,u3),t47),1,satz24a(xp1),t49):is"n"(inn(1px,u3),1)
-t51:=isinoutn(1px,pl"n"(1,inn(x,u)),satz19o(inn(x,u),x,1,1top(x,u))):is"n"(pl"n"(1,inn(x,u)),inn(1px,u3))
-t52:=ismore1"n"(pl"n"(1,inn(x,u)),inn(1px,u3),1,t51,satz18(1,inn(x,u))):more"n"(inn(1px,u3),1)
-t53:=<t50>ec3e21(is"n"(inn(1px,u3),1),more"n"(inn(1px,u3),1),less"n"(inn(1px,u3),1),satz10b(inn(1px,u3),1),t52):con
-u@t54:=ore1(more"n"(n3,1),is"n"(n3,1),satz24(n3),[t:is"n"(n3,1)]t53(t)):more"n"(n3,1)
-nm1:=mn"n"(n3,1,t54):nat
-t54a:=islessis1"n"(n3,pl"n"(nm1,1),xp1,th1c"n.mn"(n3,1,t54),1top(xp1,<u3>s02)):lessis"n"(pl"n"(nm1,1),xp1)
-t55:=th9"l.or"(less"n"(pl"n"(nm1,1),xp1),is"n"(pl"n"(nm1,1),xp1),less"n"(nm1,x),is"n"(nm1,x),t54a,[t:less"n"(pl"n"(nm1,1),xp1)]satz20c(nm1,x,1,t),[t:is"n"(pl"n"(nm1,1),xp1)]satz20b(nm1,x,1,t)):lessis"n"(nm1,x)
-w3:=outn(x,nm1,t55):1to(x)
-case2@s03:=[t:1to(x)]w3(t):[t:1to(x)]1to(x)
-u@[v:1to(x)][i:is"e"(1to(x),w3(u),w3(v))]
-t56:=isoutne(x,nm1(u),t55(u),nm1(v),t55(v),i):is"n"(nm1(u),nm1(v))
-t57:=tr3is(nat,n3(u),pl"n"(nm1(u),1),pl"n"(nm1(v),1),n3(v),th1c"n.mn"(n3(u),1,t54(u)),ispl1"n"(nm1(u),nm1(v),1,t56),th1d"n.mn"(n3(v),1,t54(v))):is"n"(n3(u),n3(v))
-t58:=isinne(xp1,<u3(u)>s02,<u3(v)>s02,t57):is"e"(1to(xp1),<u3(u)>s02,<u3(v)>s02)
-t59:=isfe(1to(xp1),1to(xp1),s,t8,left1to(xp1,1px,t47,u3(u)),left1to(xp1,1px,t47,u3(v)),t58):is"e"(1to(xp1),left1to(xp1,1px,t47,u3(u)),left1to(xp1,1px,t47,u3(v)))
-t60:=thleft1(xp1,1px,t47,u3(u),u3(v),t59):is"e"(1to(1px),u3(u),u3(v))
-t61:=thright1(1,x,u,v,t60):is"e"(1to(x),u,v)
-case2@s04:=left(1to(xp1),xp1,1px,t47,invf(1to(xp1),1to(xp1),s,b)):[t:1to(1px)]1to(xp1)
-u@u4:=<u3>s04:1to(xp1)
-n4:=inn(xp1,u4):nat
-[i:is"n"(n4,1)]
-t62:=tris(1to(xp1),u4,outn(xp1,n4,1top(xp1,u4)),1out(xp1),isoutinn(xp1,u4),isoutni(xp1,n4,1top(xp1,u4),1,satz24a(xp1),i)):is"e"(1to(xp1),u4,1out(xp1))
-t63:=tr3is(1to(xp1),left1to(xp1,1px,t47,u3),<u4>s,<1out(xp1)>s,1out(xp1),thinvf2(1to(xp1),1to(xp1),s,b,left1to(xp1,1px,t47,u3)),isf(1to(xp1),1to(xp1),s,u4,1out(xp1),t62),case2):is"e"(1to(xp1),left1to(xp1,1px,t47,u3),1out(xp1))
-t64:=isoutne(xp1,inn(1px,u3),trlessis"n"(inn(1px,u3),1px,xp1,1top(1px,u3),t47),1,satz24a(xp1),t63):is"n"(inn(1px,u3),1)
-t65:=tris(nat,pl"n"(1,inn(x,u)),inn(1px,u3),1,isinoutn(1px,pl"n"(1,inn(x,u)),satz19o(inn(x,u),x,1,1top(x,u))),t64):is"n"(pl"n"(1,inn(x,u)),1)
-t66:=<t65>ec3e21(is"n"(pl"n"(1,inn(x,u)),1),more"n"(pl"n"(1,inn(x,u)),1),less"n"(pl"n"(1,inn(x,u)),1),satz10b(pl"n"(1,inn(x,u)),1),satz18(1,inn(x,u))):con
-u@t67:=ore1(more"n"(n4,1),is"n"(n4,1),satz24(n4),[t:is"n"(n4,1)]t66(t)):more"n"(n4,1)
-nm2:=mn"n"(n4,1,t67):nat
-t68:=islessis1"n"(n4,pl"n"(nm2,1),xp1,th1c"n.mn"(n4,1,t67),1top(xp1,u4)):lessis"n"(pl"n"(nm2,1),xp1)
-t69:=th9"l.or"(less"n"(pl"n"(nm2,1),xp1),is"n"(pl"n"(nm2,1),xp1),less"n"(nm2,x),is"n"(nm2,x),t68,[t:less"n"(pl"n"(nm2,1),xp1)]satz20c(nm2,x,1,t),[t:is"n"(pl"n"(nm2,1),xp1)]satz20b(nm2,x,1,t)):lessis"n"(nm2,x)
-w4:=outn(x,nm2,t69):1to(x)
-t70:=isinoutn(x,nm2,t69):is"n"(nm2,inn(x,w4))
-t71:=tr3is(nat,n4,pl"n"(1,nm2),pl"n"(1,inn(x,w4)),inn(1px,u3(w4)),th1a"n.mn"(n4,1,t67),ispl2"n"(nm2,inn(x,w4),1,t70),isinoutn(1px,pl"n"(1,inn(x,w4)),satz19o(inn(x,w4),x,1,1top(x,w4)))):is"n"(n4,inn(1px,u3(w4)))
-t72:=tris(1to(xp1),u4,outn(xp1,n4,1top(xp1,u4)),left1to(xp1,1px,t47,u3(w4)),isoutinn(xp1,u4),isoutni(xp1,n4,1top(xp1,u4),inn(1px,u3(w4)),trlessis"n"(inn(1px,u3(w4)),1px,xp1,1top(1px,u3(w4)),t47),t71)):is"e"(1to(xp1),u4,left1to(xp1,1px,t47,u3(w4)))
-t73:=tris(1to(xp1),left1to(xp1,1px,t47,u3),<u4>s,<u3(w4)>s02,thinvf2(1to(xp1),1to(xp1),s,b,left1to(xp1,1px,t47,u3)),isf(1to(xp1),1to(xp1),s,u4,left1to(xp1,1px,t47,u3(w4)),t72)):is"e"(1to(xp1),left1to(xp1,1px,t47,u3),<u3(w4)>s02)
-t74:=tr3is(nat,pl"n"(1,inn(x,u)),inn(1px,u3),inn(xp1,left1to(xp1,1px,t47,u3)),n3(w4),isinoutn(1px,pl"n"(1,inn(x,u)),satz19o(inn(x,u),x,1,1top(x,u))),isinoutn(xp1,inn(1px,u3),trlessis"n"(inn(1px,u3),1px,xp1,1top(1px,u3),t47)),isinni(xp1,left1to(xp1,1px,t47,u3),<u3(w4)>s02,t73)):is"n"(pl"n"(1,inn(x,u)),n3(w4))
-t75:=th1e"n.mn"(n3(w4),1,inn(x,u),t54(w4),t74):is"n"(inn(x,u),nm1(w4))
-t76:=tris(1to(x),u,outn(x,inn(x,u),1top(x,u)),w3(w4),isoutinn(x,u),isoutni(x,inn(x,u),1top(x,u),nm1(w4),t55(w4),t75)):is"e"(1to(x),u,w3(w4))
-t77:=somei(1to(x),[t:1to(x)]is"e"(1to(x),u,w3(t)),w4,t76):image(1to(x),1to(x),s03,u)
-case2@t78:=andi(injective(1to(x),1to(x),s03),surjective(1to(x),1to(x),s03),[t:1to(x)][u:1to(x)][v:is"e"(1to(x),<t>s03,<u>s03)]t61(t,u,v),[t:1to(x)]t77(t)):bijective(1to(x),1to(x),s03)
-f02:=left(cx,xp1,1px,t47,f):[t:1to(1px)]cx
-f03:=right(cx,1,x,f02):[t:1to(x)]cx
-t79:=<t78><f03><s03>p:prop1(s03,f03)
-g3:=left(cx,xp1,1px,t47,g(xp1,s,f)):[t:1to(1px)]cx
-g4:=right(cx,1,x,g3):[t:1to(x)]cx
-g5:=g(x,s03,f03):[t:1to(x)]cx
-u@t80:=tr3is(nat,n3,pl"n"(1,nm1),pl"n"(1,inn(x,w3)),inn(1px,right1to(1,x,w3)),th1a"n.mn"(n3,1,t54),ispl2"n"(nm1,inn(x,w3),1,isinoutn(x,nm1,t55)),isinoutn(1px,pl"n"(1,inn(x,w3)),satz19o(inn(x,w3),x,1,1top(x,w3)))):is"n"(n3,inn(1px,right1to(1,x,w3)))
-t81:=tris(1to(xp1),<u3>s02,outn(xp1,n3,1top(xp1,<u3>s02)),left1to(xp1,1px,t47,right1to(1,x,w3)),isoutinn(xp1,<u3>s02),isoutni(xp1,n3,1top(xp1,<u3>s02),inn(1px,right1to(1,x,w3)),trlessis"n"(inn(1px,right1to(1,x,w3)),1px,xp1,1top(1px,right1to(1,x,w3)),t47),t80)):is"e"(1to(xp1),<u3>s02,left1to(xp1,1px,t47,right1to(1,x,w3)))
-t82:=isf(1to(xp1),cx,f,<u3>s02,left1to(xp1,1px,t47,right1to(1,x,w3)),t81):is(<u>g4,<u>g5)
-case2@t83:=fisi(1to(x),cx,g4,g5,[t:1to(x)]t82(t)):is"e"([t:1to(x)]cx,g4,g5)
-t85:=isf([t:1to(x)]cx,cx,[u:[t:1to(x)]cx]smpr(x,u),g4,g5,t83):is(smpr(x,g4),smpr(x,g5))
-t86:=tris(cx,smpr(x,g4),smpr(x,g5),smpr(x,f03),t85,t79):is(smpr(x,g4),smpr(x,f03))
-t87:=lessisi1"n"(1,1px,satz18a(1,x)):lessis"n"(1,1px)
-g6:=left(cx,1px,1,t87,g3):[t:1to(1)]cx
-f04:=left(cx,1px,1,t87,f02):[t:1to(1)]cx
-t87a:=isinoutn(1,1,lessisi3(1)):is"n"(1,inn(1,xout(1)))
-1d:=left1to(1px,1,t87,xout(1)):1to(1px)
-t87b:=isinoutn(1px,inn(1,xout(1)),trlessis"n"(inn(1,xout(1)),1,1px,1top(1,xout(1)),t87)):is"n"(inn(1,xout(1)),inn(1px,1d))
-t88:=tris(nat,1,inn(1,xout(1)),inn(1px,1d),t87a,t87b):is"n"(1,inn(1px,1d))
-1e:=left1to(xp1,1px,t47,1d):1to(xp1)
-t88a:=isoutni(xp1,1,satz24a(xp1),inn(1px,1d),trlessis"n"(inn(1px,1d),1px,xp1,1top(1px,1d),t47),t88):is"e"(1to(xp1),1out(xp1),1e)
-t88b:=isf(1to(xp1),1to(xp1),s,1e,1out(xp1),symis(1to(xp1),1out(xp1),1e,t88a)):is"e"(1to(xp1),<1e>s,<1out(xp1)>s)
-t89:=tr3is(1to(xp1),<1e>s,<1out(xp1)>s,1out(xp1),1e,t88b,case2,t88a):is"e"(1to(xp1),<1e>s,1e)
-t89a:=tr3is(cx,smpr(1,g6),<xout(1)>g6,<xout(1)>f04,smpr(1,f04),satz277(g6),isf(1to(xp1),cx,f,<1e>s,1e,t89),symis(cx,smpr(1,f04),<xout(1)>f04,satz277(f04))):is(smpr(1,g6),smpr(1,f04))
-t90:=satz281(1,x,g3):is(smpr(1px,g3),<smpr(x,g4)><smpr(1,g6)>q)
-t91:=isf(cx,cx,<smpr(1,g6)>q,smpr(x,g4),smpr(x,f03),t86):is(<smpr(x,g4)><smpr(1,g6)>q,<smpr(x,f03)><smpr(1,g6)>q)
-t92:=isf(cx,cx,[t:cx]<smpr(x,f03)><t>q,smpr(1,g6),smpr(1,f04),t89a):is(<smpr(x,f03)><smpr(1,g6)>q,<smpr(x,f03)><smpr(1,f04)>q)
-t93:=symis(cx,smpr(1px,f02),<smpr(x,f03)><smpr(1,f04)>q,satz281(1,x,f02)):is(<smpr(x,f03)><smpr(1,f04)>q,smpr(1px,f02))
-t94:=tr4is(cx,smpr(1px,g3),<smpr(x,g4)><smpr(1,g6)>q,<smpr(x,f03)><smpr(1,g6)>q,<smpr(x,f03)><smpr(1,f04)>q,smpr(1px,f02),t90,t91,t92,t93):is(smpr(1px,g3),smpr(1px,f02))
-t95:=issmpr(xp1,f,1px,compl"n"(1,x)):is(smpr(1px,f02),smpr(xp1,f))
-t96:=symis(cx,smpr(1px,g3),smpr(xp1,g(xp1,s,f)),issmpr(xp1,g(xp1,s,f),1px,compl"n"(1,x))):is(smpr(xp1,g(xp1,s,f)),smpr(1px,g3))
-t97:=tr3is(cx,smpr(xp1,g(xp1,s,f)),smpr(1px,g3),smpr(1px,f02),smpr(xp1,f),t96,t94,t95):prop1(xp1,s,f)
-b@[not1:not(is"e"(1to(xp1),<xout(xp1)>s,xout(xp1)))][not2:not(is"e"(1to(xp1),<1out(xp1)>s,1out(xp1)))]
-a0:=<1out(xp1)>s:1to(xp1)
-b0:=<1out(xp1)>invf(1to(xp1),1to(xp1),s,b):1to(xp1)
-t98:=thinvf2(1to(xp1),1to(xp1),s,b,1out(xp1)):is"e"(1to(xp1),1out(xp1),<b0>s)
-t99:=not2:not(is"e"(1to(xp1),a0,1out(xp1)))
-t100:=symnotis(1to(xp1),<1out(xp1)>s,<b0>s,th3"e.notis"(1to(xp1),<1out(xp1)>s,1out(xp1),<b0>s,not2,t98)):not(is"e"(1to(xp1),<b0>s,<1out(xp1)>s))
-t101:=th3"l.imp"(is"e"(1to(xp1),b0,1out(xp1)),is"e"(1to(xp1),<b0>s,<1out(xp1)>s),t100,[t:is"e"(1to(xp1),b0,1out(xp1))]isf(1to(xp1),1to(xp1),s,b0,1out(xp1),t)):not(is"e"(1to(xp1),b0,1out(xp1)))
-s1:=changef(1to(xp1),1to(xp1),s,1out(xp1),b0):[t:1to(xp1)]1to(xp1)
-[u:1to(xp1)][i:is"e"(1to(xp1),u,1out(xp1))]
-t102:=changef1(1to(xp1),1to(xp1),s,1out(xp1),b0,u,i):is"e"(1to(xp1),<u>s1,<b0>s)
-t103:=tris2(1to(xp1),<u>s1,1out(xp1),<b0>s,t102,t98):is"e"(1to(xp1),<u>s1,1out(xp1))
-u@[i:is"e"(1to(xp1),u,b0)]
-t104:=changef2(1to(xp1),1to(xp1),s,1out(xp1),b0,u,i):is"e"(1to(xp1),<u>s1,a0)
-u@[n:not(is"e"(1to(xp1),u,1out(xp1)))][o:not(is"e"(1to(xp1),u,b0))]
-t105:=changef3(1to(xp1),1to(xp1),s,1out(xp1),b0,u,n,o):is"e"(1to(xp1),<u>s1,<u>s)
-not2@t106:=th6"e.wissel"(1to(xp1),1to(xp1),s,1out(xp1),b0,b):bijective(1to(xp1),1to(xp1),s1)
-[alpha:not(is"e"(1to(xp1),a0,xout(xp1)))]
-s2:=wissel(1to(xp1),1out(xp1),a0):[t:1to(xp1)]1to(xp1)
-t107:=th3"e.wissel"(1to(xp1),1out(xp1),a0):bijective(1to(xp1),1to(xp1),s2)
-[u:1to(xp1)][i:is"e"(1to(xp1),u,1out(xp1))]
-t108:=iswissel1(1to(xp1),1out(xp1),a0,<u>s1,t103(u,i)):is"e"(1to(xp1),<<u>s1>s2,a0)
-t109:=tris2(1to(xp1),<u>s,<<u>s1>s2,a0,isf(1to(xp1),1to(xp1),s,u,1out(xp1),i),t108):is"e"(1to(xp1),<u>s,<<u>s1>s2)
-u@[i:is"e"(1to(xp1),u,b0)]
-t110:=iswissel2(1to(xp1),1out(xp1),a0,<u>s1,t104(u,i)):is"e"(1to(xp1),<<u>s1>s2,1out(xp1))
-t111:=tris2(1to(xp1),<u>s,<<u>s1>s2,1out(xp1),tris2(1to(xp1),<u>s,1out(xp1),<b0>s,isf(1to(xp1),1to(xp1),s,u,b0,i),t98),t110):is"e"(1to(xp1),<u>s,<<u>s1>s2)
-u@[n:not(is"e"(1to(xp1),u,1out(xp1)))][o:not(is"e"(1to(xp1),u,b0))][i:is"e"(1to(xp1),<u>s1,1out(xp1))]
-t112:=isfe(1to(xp1),1to(xp1),s1,t8(s1,f,t106),u,1out(xp1),tris2(1to(xp1),<u>s1,<1out(xp1)>s1,1out(xp1),i,t103(1out(xp1),refis(1to(xp1),1out(xp1))))):is"e"(1to(xp1),u,1out(xp1))
-o@t113:=th3"l.imp"(is"e"(1to(xp1),<u>s1,1out(xp1)),is"e"(1to(xp1),u,1out(xp1)),n,[t:is"e"(1to(xp1),<u>s1,1out(xp1))]t112(t)):not(is"e"(1to(xp1),<u>s1,1out(xp1)))
-[i:is"e"(1to(xp1),<u>s1,a0)]
-t114:=isfe(1to(xp1),1to(xp1),s1,t8(s1,f,t106),u,b0,tris2(1to(xp1),<u>s1,<b0>s1,a0,i,t104(b0,refis(1to(xp1),b0)))):is"e"(1to(xp1),u,b0)
-o@t115:=th3"l.imp"(is"e"(1to(xp1),<u>s1,a0),is"e"(1to(xp1),u,b0),o,[t:is"e"(1to(xp1),<u>s1,a0)]t114(t)):not(is"e"(1to(xp1),<u>s1,a0))
-t116:=iswissel3(1to(xp1),1out(xp1),a0,<u>s1,t113,t115):is"e"(1to(xp1),<<u>s1>s2,<u>s1)
-t117:=symis(1to(xp1),<<u>s1>s2,<u>s,tris(1to(xp1),<<u>s1>s2,<u>s1,<u>s,t116,t105(u,n,o))):is"e"(1to(xp1),<u>s,<<u>s1>s2)
-n@t118:=th1"l.imp"(is"e"(1to(xp1),u,b0),is"e"(1to(xp1),<u>s,<<u>s1>s2),[t:is"e"(1to(xp1),u,b0)]t111(t),[t:not(is"e"(1to(xp1),u,b0))]t117(t)):is"e"(1to(xp1),<u>s,<<u>s1>s2)
-u@t119:=th1"l.imp"(is"e"(1to(xp1),u,1out(xp1)),is"e"(1to(xp1),<u>s,<<u>s1>s2),[t:is"e"(1to(xp1),u,1out(xp1))]t109(t),[t:not(is"e"(1to(xp1),u,1out(xp1)))]t118(t)):is"e"(1to(xp1),<u>s,<<u>s1>s2)
-alpha@t120:=fisi(1to(xp1),1to(xp1),s,[t:1to(xp1)]<<t>s1>s2,[t:1to(xp1)]t119(t)):is"e"([t:1to(xp1)]1to(xp1),s,[t:1to(xp1)]<<t>s1>s2)
-not2@t121:=t103(1out(xp1),refis(1to(xp1),1out(xp1))):is"e"(1to(xp1),<1out(xp1)>s1,1out(xp1))
-t121a:=ec3e21(is"n"(xp1,1),more"n"(xp1,1),less"n"(xp1,1),satz10b(xp1,1),ismore1"n"(1px,xp1,1,compl"n"(1,x),satz18(1,x))):nis"n"(xp1,1)
-t122:=th3"l.imp"(is"e"(1to(xp1),xout(xp1),1out(xp1)),is"n"(xp1,1),t121a,[t:is"e"(1to(xp1),xout(xp1),1out(xp1))]isoutne(xp1,xp1,lessisi3(xp1),1,satz24a(xp1),t)):not(is"e"(1to(xp1),xout(xp1),1out(xp1)))
-alpha@t123:=symnotis(1to(xp1),a0,xout(xp1),alpha):not(is"e"(1to(xp1),xout(xp1),a0))
-t124:=iswissel3(1to(xp1),1out(xp1),a0,xout(xp1),t122,t123):is"e"(1to(xp1),<xout(xp1)>s2,xout(xp1))
-t125:=isf([t:1to(xp1)]1to(xp1),cx,[u:[t:1to(xp1)]1to(xp1)]smpr(xp1,g(xp1,u,f)),s,[t:1to(xp1)]<<t>s1>s2,t120):is(smpr(xp1,g(xp1,s,f)),smpr(xp1,g(xp1,s1,g(xp1,s2,f))))
-t126:=t97(s1,g(xp1,s2,f),t106,t121):is(smpr(xp1,g(xp1,s1,g(xp1,s2,f))),smpr(xp1,g(xp1,s2,f)))
-t127:=t46(s2,f,t107,t124):is(smpr(xp1,g(xp1,s2,f)),smpr(xp1,f))
-t128:=tr3is(cx,smpr(xp1,g(xp1,s,f)),smpr(xp1,g(xp1,s1,g(xp1,s2,f))),smpr(xp1,g(xp1,s2,f)),smpr(xp1,f),t125,t126,t127):prop1(xp1,s,f)
-not2@[i3:is"e"(1to(xp1),a0,xout(xp1))][beta:not(is"e"(1to(xp1),b0,xout(xp1)))]
-s3:=wissel(1to(xp1),1out(xp1),b0):[t:1to(xp1)]1to(xp1)
-t129:=th3"e.wissel"(1to(xp1),1out(xp1),b0):bijective(1to(xp1),1to(xp1),s3)
-[u:1to(xp1)][i:is"e"(1to(xp1),u,1out(xp1))]
-t130:=t104(<u>s3,iswissel1(1to(xp1),1out(xp1),b0,u,i)):is"e"(1to(xp1),<<u>s3>s1,a0)
-t131:=tris2(1to(xp1),<u>s,<<u>s3>s1,a0,isf(1to(xp1),1to(xp1),s,u,1out(xp1),i),t130):is"e"(1to(xp1),<u>s,<<u>s3>s1)
-u@[i:is"e"(1to(xp1),u,b0)]
-t132:=t103(<u>s3,iswissel2(1to(xp1),1out(xp1),b0,u,i)):is"e"(1to(xp1),<<u>s3>s1,1out(xp1))
-t133:=tris2(1to(xp1),<u>s,<<u>s3>s1,<b0>s,isf(1to(xp1),1to(xp1),s,u,b0,i),tris(1to(xp1),<<u>s3>s1,1out(xp1),<b0>s,t132,t98)):is"e"(1to(xp1),<u>s,<<u>s3>s1)
-u@[n:not(is"e"(1to(xp1),u,1out(xp1)))][o:not(is"e"(1to(xp1),u,b0))]
-t134:=iswissel3(1to(xp1),1out(xp1),b0,u,n,o):is"e"(1to(xp1),<u>s3,u)
-t135:=isf(1to(xp1),1to(xp1),s1,<u>s3,u,t134):is"e"(1to(xp1),<<u>s3>s1,<u>s1)
-t136:=t105(u,n,o):is"e"(1to(xp1),<u>s1,<u>s)
-t139:=symis(1to(xp1),<<u>s3>s1,<u>s,tris(1to(xp1),<<u>s3>s1,<u>s1,<u>s,t135,t136)):is"e"(1to(xp1),<u>s,<<u>s3>s1)
-n@t140:=th1"l.imp"(is"e"(1to(xp1),u,b0),is"e"(1to(xp1),<u>s,<<u>s3>s1),[t:is"e"(1to(xp1),u,b0)]t133(t),[t:not(is"e"(1to(xp1),u,b0))]t139(t)):is"e"(1to(xp1),<u>s,<<u>s3>s1)
-u@t141:=th1"l.imp"(is"e"(1to(xp1),u,1out(xp1)),is"e"(1to(xp1),<u>s,<<u>s3>s1),[t:is"e"(1to(xp1),u,1out(xp1))]t131(t),[t:not(is"e"(1to(xp1),u,1out(xp1)))]t140(t)):is"e"(1to(xp1),<u>s,<<u>s3>s1)
-beta@t142:=fisi(1to(xp1),1to(xp1),s,[t:1to(xp1)]<<t>s3>s1,[t:1to(xp1)]t141(t)):is"e"([t:1to(xp1)]1to(xp1),s,[t:1to(xp1)]<<t>s3>s1)
-t143:=symnotis(1to(xp1),b0,xout(xp1),beta):not(is"e"(1to(xp1),xout(xp1),b0))
-t144:=iswissel3(1to(xp1),1out(xp1),b0,xout(xp1),t122,t143):is"e"(1to(xp1),<xout(xp1)>s3,xout(xp1))
-t145:=isf([t:1to(xp1)]1to(xp1),cx,[u:[t:1to(xp1)]1to(xp1)]smpr(xp1,g(xp1,u,f)),s,[t:1to(xp1)]<<t>s3>s1,t142):is(smpr(xp1,g(xp1,s,f)),smpr(xp1,g(xp1,s3,g(xp1,s1,f))))
-t146:=t46(s3,g(xp1,s1,f),t129,t144):is(smpr(xp1,g(xp1,s3,g(xp1,s1,f))),smpr(xp1,g(xp1,s1,f)))
-t147:=t97(s1,f,t106,t121):is(smpr(xp1,g(xp1,s1,f)),smpr(xp1,f))
-t148:=tr3is(cx,smpr(xp1,g(xp1,s,f)),smpr(xp1,g(xp1,s3,g(xp1,s1,f))),smpr(xp1,g(xp1,s1,f)),smpr(xp1,f),t145,t146,t147):prop1(xp1,s,f)
-i3@[gamma:is"e"(1to(xp1),b0,xout(xp1))][i:is"n"(x,1)]
-t149:=ispl1"n"(1,x,1,symis(nat,x,1,i)):is"n"(2,xp1)
-t150:=lessisi2"n"(2,xp1,t149):lessis"n"(2,xp1)
-f05:=left(cx,xp1,2,t150,f):[t:1to(2)]cx
-s05:=left(1to(xp1),xp1,2,t150,s):[t:1to(2)]1to(xp1)
-g7:=left(cx,xp1,2,t150,g(xp1,s,f)):[t:1to(2)]cx
-t151:=issmpr(xp1,f,2,t149):is(smpr(2,f05),smpr(xp1,f))
-t152:=issmpr(xp1,g(xp1,s,f),2,t149):is(smpr(2,g7),smpr(xp1,g(xp1,s,f)))
-t153:=satz280(f05):is(smpr(2,f05),<<xout(2)>f05><<1out(2)>f05>q)
-t154:=satz280(g7):is(smpr(2,g7),<<xout(2)>g7><<1out(2)>g7>q)
-t155:=tris1(nat,inn(2,xout(2)),xp1,2,isinoutn(2,2,lessisi3(2)),t149):is"n"(inn(2,xout(2)),xp1)
-t156:=isoutni(xp1,inn(2,xout(2)),trlessis"n"(inn(2,xout(2)),2,xp1,1top(2,xout(2)),t150),xp1,lessisi3(xp1),t155):is"e"(1to(xp1),left1to(xp1,2,t150,xout(2)),xout(xp1))
-t157:=isf(1to(xp1),1to(xp1),s,left1to(xp1,2,t150,xout(2)),xout(xp1),t156):is"e"(1to(xp1),<xout(2)>s05,<xout(xp1)>s)
-t158:=symis(nat,1,inn(2,1out(2)),isinoutn(2,1,satz24a(2))):is"n"(inn(2,1out(2)),1)
-t159:=isoutni(xp1,inn(2,1out(2)),trlessis"n"(inn(2,1out(2)),2,xp1,1top(2,1out(2)),t150),1,satz24a(xp1),t158):is"e"(1to(xp1),left1to(xp1,2,t150,1out(2)),1out(xp1))
-t160:=tr3is(1to(xp1),left1to(xp1,2,t150,1out(2)),1out(xp1),<b0>s,<xout(xp1)>s,t159,t98,isf(1to(xp1),1to(xp1),s,b0,xout(xp1),gamma)):is"e"(1to(xp1),left1to(xp1,2,t150,1out(2)),<xout(xp1)>s)
-t161:=tris2(1to(xp1),<xout(2)>s05,left1to(xp1,2,t150,1out(2)),<xout(xp1)>s,t157,t160):is"e"(1to(xp1),<xout(2)>s05,left1to(xp1,2,t150,1out(2)))
-t163:=isf(1to(xp1),1to(xp1),s,left1to(xp1,2,t150,1out(2)),1out(xp1),t159):is"e"(1to(xp1),<1out(2)>s05,<1out(xp1)>s)
-t164:=tris(1to(xp1),<1out(2)>s05,<1out(xp1)>s,xout(xp1),t163,i3):is"e"(1to(xp1),<1out(2)>s05,xout(xp1))
-t165:=tris2(1to(xp1),<1out(2)>s05,left1to(xp1,2,t150,xout(2)),xout(xp1),t164,t156):is"e"(1to(xp1),<1out(2)>s05,left1to(xp1,2,t150,xout(2)))
-t166:=isf(1to(xp1),cx,f,<xout(2)>s05,left1to(xp1,2,t150,1out(2)),t161):is(<xout(2)>g7,<1out(2)>f05)
-t167:=isf(1to(xp1),cx,f,<1out(2)>s05,left1to(xp1,2,t150,xout(2)),t165):is(<1out(2)>g7,<xout(2)>f05)
-t168:=isf(cx,cx,<<1out(2)>g7>q,<xout(2)>g7,<1out(2)>f05,t166):is(<<xout(2)>g7><<1out(2)>g7>q,<<1out(2)>f05><<1out(2)>g7>q)
-t169:=comq(c,<1out(2)>g7,<1out(2)>f05):is(<<1out(2)>f05><<1out(2)>g7>q,<<1out(2)>g7><<1out(2)>f05>q)
-t170:=isf(cx,cx,<<1out(2)>f05>q,<1out(2)>g7,<xout(2)>f05,t167):is(<<1out(2)>g7><<1out(2)>f05>q,<<xout(2)>f05><<1out(2)>f05>q)
-t171:=tr4is(cx,smpr(xp1,g(xp1,s,f)),smpr(2,g7),<<xout(2)>g7><<1out(2)>g7>q,<<1out(2)>f05><<1out(2)>g7>q,<<1out(2)>g7><<1out(2)>f05>q,symis(cx,smpr(2,g7),smpr(xp1,g(xp1,s,f)),t152),t154,t168,t169):is(smpr(xp1,g(xp1,s,f)),<<1out(2)>g7><<1out(2)>f05>q)
-t172:=tr4is(cx,smpr(xp1,g(xp1,s,f)),<<1out(2)>g7><<1out(2)>f05>q,<<xout(2)>f05><<1out(2)>f05>q,smpr(2,f05),smpr(xp1,f),t171,t170,symis(cx,smpr(2,f05),<<xout(2)>f05><<1out(2)>f05>q,t153),t151):prop1(xp1,s,f)
-trivial:=t172:prop1(xp1,s,f)
-gamma@[n:nis"n"(x,1)]
-t173:=ore1(more"n"(x,1),is"n"(x,1),satz24(x),n):more"n"(x,1)
-xm1:=mn"n"(x,1,t173):nat
-s4:=changef(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1)):[t:1to(xp1)]1to(xp1)
-t174:=th6"e.wissel"(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1),b):bijective(1to(xp1),1to(xp1),s4)
-t175:=changef2(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1),xout(xp1),refis(1to(xp1),xout(xp1))):is"e"(1to(xp1),<xout(xp1)>s4,<1out(xp1)>s)
-t176:=symis(1to(xp1),a0,xout(xp1),i3):is"e"(1to(xp1),xout(xp1),<1out(xp1)>s)
-t177:=tris2(1to(xp1),<xout(xp1)>s4,xout(xp1),<1out(xp1)>s,t175,t176):is"e"(1to(xp1),<xout(xp1)>s4,xout(xp1))
-t178:=lessisi1"n"(x,xp1,satz18a(x,1)):lessis"n"(x,xp1)
-g8:=left(cx,xp1,x,t178,g(xp1,s,f)):[t:1to(x)]cx
-t179:=satz278(x,g(xp1,s,f)):is(smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s,f)><smpr(x,g8)>q)
-t180:=th1b"n.mn"(x,1,t173):is"n"(pl"n"(1,xm1),x)
-t181:=lessisi2"n"(pl"n"(1,xm1),x,t180):lessis"n"(pl"n"(1,xm1),x)
-g9:=left(cx,x,pl"n"(1,xm1),t181,g8):[t:1to(pl"n"(1,xm1))]cx
-t182:=symis(cx,smpr(pl"n"(1,xm1),g9),smpr(x,g8),issmpr(x,g8,pl"n"(1,xm1),t180)):is(smpr(x,g8),smpr(pl"n"(1,xm1),g9))
-g10:=right(cx,1,xm1,g9):[t:1to(xm1)]cx
-t183:=lessisi1"n"(1,pl"n"(1,xm1),satz18a(1,xm1)):lessis"n"(1,pl"n"(1,xm1))
-g11:=left(cx,pl"n"(1,xm1),1,t183,g9):[t:1to(1)]cx
-t184:=satz281(a,1,xm1,g9):is(smpr(pl"n"(1,xm1),g9),<smpr(xm1,g10)><smpr(1,g11)>q)
-t185:=satz277(g11):is(smpr(1,g11),<xout(1)>g11)
-t186:=isinoutn(1,1,lessisi3(1)):is"n"(1,inn(1,xout(1)))
-1a:=left1to(pl"n"(1,xm1),1,t183,xout(1)):1to(pl"n"(1,xm1))
-t187:=isinoutn(pl"n"(1,xm1),inn(1,xout(1)),trlessis"n"(inn(1,xout(1)),1,pl"n"(1,xm1),1top(1,xout(1)),t183)):is"n"(inn(1,xout(1)),inn(pl"n"(1,xm1),1a))
-1b:=left1to(x,pl"n"(1,xm1),t181,1a):1to(x)
-t188:=isinoutn(x,inn(pl"n"(1,xm1),1a),trlessis"n"(inn(pl"n"(1,xm1),1a),pl"n"(1,xm1),x,1top(pl"n"(1,xm1),1a),t181)):is"n"(inn(pl"n"(1,xm1),1a),inn(x,1b))
-t189:=tr3is(nat,1,inn(1,xout(1)),inn(pl"n"(1,xm1),1a),inn(x,1b),t186,t187,t188):is"n"(1,inn(x,1b))
-1c:=left1to(xp1,x,t178,1b):1to(xp1)
-t190:=isoutni(xp1,1,satz24a(xp1),inn(x,1b),trlessis"n"(inn(x,1b),x,xp1,1top(x,1b),t178),t189):is"e"(1to(xp1),1out(xp1),1c)
-t191:=isf(1to(xp1),cx,g(xp1,s,f),1out(xp1),1c,t190):is(<1out(xp1)>g(xp1,s,f),<xout(1)>g11)
-t192:=tris2(cx,smpr(1,g11),<1out(xp1)>g(xp1,s,f),<xout(1)>g11,t185,t191):is(smpr(1,g11),<1out(xp1)>g(xp1,s,f))
-t193:=symis(1to(xp1),<xout(xp1)>s4,<1out(xp1)>s,t175):is"e"(1to(xp1),<1out(xp1)>s,<xout(xp1)>s4)
-t194:=isf(1to(xp1),cx,f,<1out(xp1)>s,<xout(xp1)>s4,t193):is(<1out(xp1)>g(xp1,s,f),<xout(xp1)>g(xp1,s4,f))
-t195:=tris(cx,smpr(1,g11),<1out(xp1)>g(xp1,s,f),<xout(xp1)>g(xp1,s4,f),t192,t194):is(smpr(1,g11),<xout(xp1)>g(xp1,s4,f))
-t196:=isf(cx,cx,[t:cx]<smpr(xm1,g10)><t>q,smpr(1,g11),<xout(xp1)>g(xp1,s4,f),t195):is(<smpr(xm1,g10)><smpr(1,g11)>q,<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q)
-t197:=tr3is(cx,smpr(x,g8),smpr(pl"n"(1,xm1),g9),<smpr(xm1,g10)><smpr(1,g11)>q,<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q,t182,t184,t196):is(smpr(x,g8),<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q)
-t198:=isf(cx,cx,[t:cx]<<xout(xp1)>g(xp1,s,f)><t>q,smpr(x,g8),<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q,t197):is(<<xout(xp1)>g(xp1,s,f)><smpr(x,g8)>q,<<xout(xp1)>g(xp1,s,f)><<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q>q)
-t199:=assq1(a,<xout(xp1)>g(xp1,s4,f),smpr(xm1,g10),<xout(xp1)>g(xp1,s,f)):is(<<xout(xp1)>g(xp1,s,f)><<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q>q,<<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q><<xout(xp1)>g(xp1,s4,f)>q)
-t200:=comq(c,<xout(xp1)>g(xp1,s4,f),<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q):is(<<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q><<xout(xp1)>g(xp1,s4,f)>q,<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q)
-g12:=left(cx,xp1,x,t178,g(xp1,s4,f)):[t:1to(x)]cx
-g13:=left(cx,x,pl"n"(1,xm1),t181,g12):[t:1to(pl"n"(1,xm1))]cx
-g14:=right(cx,1,xm1,g13):[t:1to(xm1)]cx
-g15:=left(cx,pl"n"(1,xm1),1,lessisi1"n"(1,pl"n"(1,xm1),satz18a(1,xm1)),g13):[t:1to(1)]cx
-t201:=satz278(x,g(xp1,s4,f)):is(smpr(xp1,g(xp1,s4,f)),<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q)
-t202:=symis(cx,smpr(pl"n"(1,xm1),g13),smpr(x,g12),issmpr(x,g12,pl"n"(1,xm1),t180)):is(smpr(x,g12),smpr(pl"n"(1,xm1),g13))
-t203:=satz281(a,1,xm1,g13):is(smpr(pl"n"(1,xm1),g13),<smpr(xm1,g14)><smpr(1,g15)>q)
-t204:=satz277(g15):is(smpr(1,g15),<xout(1)>g15)
-t205:=isf(1to(xp1),cx,g(xp1,s4,f),1out(xp1),1c,t190):is(<1out(xp1)>g(xp1,s4,f),<xout(1)>g15)
-t206:=tris2(cx,smpr(1,g15),<1out(xp1)>g(xp1,s4,f),<xout(1)>g15,t204,t205):is(smpr(1,g15),<1out(xp1)>g(xp1,s4,f))
-t207:=changef1(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1),1out(xp1),refis(1to(xp1),1out(xp1))):is"e"(1to(xp1),<1out(xp1)>s4,<xout(xp1)>s)
-t208:=isf(1to(xp1),cx,f,<1out(xp1)>s4,<xout(xp1)>s,t207):is(<1out(xp1)>g(xp1,s4,f),<xout(xp1)>g(xp1,s,f))
-t209:=tris(cx,smpr(1,g15),<1out(xp1)>g(xp1,s4,f),<xout(xp1)>g(xp1,s,f),t206,t208):is(smpr(1,g15),<xout(xp1)>g(xp1,s,f))
-t210:=isf(cx,cx,[t:cx]<smpr(xm1,g14)><t>q,smpr(1,g15),<xout(xp1)>g(xp1,s,f),t209):is(<smpr(xm1,g14)><smpr(1,g15)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q)
-t211:=tr3is(cx,smpr(x,g12),smpr(pl"n"(1,xm1),g13),<smpr(xm1,g14)><smpr(1,g15)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q,t202,t203,t210):is(smpr(x,g12),<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q)
-[u:1to(xm1)]
-ua:=right1to(1,xm1,u):1to(pl"n"(1,xm1))
-ub:=left1to(x,pl"n"(1,xm1),t181,ua):1to(x)
-uc:=left1to(xp1,x,t178,ub):1to(xp1)
-[i:is"e"(1to(xp1),uc,xout(xp1))]
-t212:=isoutne(xp1,inn(x,ub),trlessis"n"(inn(x,ub),x,xp1,1top(x,ub),t178),xp1,lessisi3(xp1),i):is"n"(inn(x,ub),xp1)
-t213:=satz16a(inn(x,ub),x,xp1,1top(x,ub),satz18a(x,1)):less"n"(inn(x,ub),xp1)
-t214:=<t212>ec3e31(is"n"(inn(x,ub),xp1),more"n"(inn(x,ub),xp1),less"n"(inn(x,ub),xp1),satz10b(inn(x,ub),xp1),t213):con
-u@t215:=[t:is"e"(1to(xp1),uc,xout(xp1))]t214(t):not(is"e"(1to(xp1),uc,xout(xp1)))
-[i:is"e"(1to(xp1),uc,1out(xp1))]
-t216:=isoutne(xp1,inn(x,ub),trlessis"n"(inn(x,ub),x,xp1,1top(x,ub),t178),1,satz24a(xp1),i):is"n"(inn(x,ub),1)
-t217:=isinoutn(x,inn(pl"n"(1,xm1),ua),trlessis"n"(inn(pl"n"(1,xm1),ua),pl"n"(1,xm1),x,1top(pl"n"(1,xm1),ua),t181)):is"n"(inn(pl"n"(1,xm1),ua),inn(x,ub))
-t218:=isinoutn(pl"n"(1,xm1),pl"n"(1,inn(xm1,u)),satz19o(inn(xm1,u),xm1,1,1top(xm1,u))):is"n"(pl"n"(1,inn(xm1,u)),inn(pl"n"(1,xm1),ua))
-t219:=tr3is(nat,pl"n"(1,inn(xm1,u)),inn(pl"n"(1,xm1),ua),inn(x,ub),1,t218,t217,t216):is"n"(pl"n"(1,inn(xm1,u)),1)
-t220:=satz18(1,inn(xm1,u)):more"n"(pl"n"(1,inn(xm1,u)),1)
-t221:=<t219>ec3e21(is"n"(pl"n"(1,inn(xm1,u)),1),more"n"(pl"n"(1,inn(xm1,u)),1),less"n"(pl"n"(1,inn(xm1,u)),1),satz10b(pl"n"(1,inn(xm1,u)),1),t220):con
-u@t222:=[t:is"e"(1to(xp1),uc,1out(xp1))]t221(t):not(is"e"(1to(xp1),uc,1out(xp1)))
-t223:=changef3(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1),uc,t222,t215):is"e"(1to(xp1),<uc>s4,<uc>s)
-t224:=isf(1to(xp1),cx,f,<uc>s4,<uc>s,t223):is(<u>g14,<u>g10)
-n@t225:=fisi(1to(xm1),cx,g10,g14,[t:1to(xm1)]symis(cx,<t>g14,<t>g10,t224(t))):is"e"([t:1to(xm1)]cx,g10,g14)
-t226:=isf([t:1to(xm1)]cx,cx,[u:[t:1to(xm1)]cx]smpr(xm1,u),g10,g14,t225):is(smpr(xm1,g10),smpr(xm1,g14))
-t227:=comq(c,smpr(xm1,g10),<xout(xp1)>g(xp1,s,f)):is(<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,<smpr(xm1,g10)><<xout(xp1)>g(xp1,s,f)>q)
-t228:=isf(cx,cx,<<xout(xp1)>g(xp1,s,f)>q,smpr(xm1,g10),smpr(xm1,g14),t226):is(<smpr(xm1,g10)><<xout(xp1)>g(xp1,s,f)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q)
-t229:=tris(cx,<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,<smpr(xm1,g10)><<xout(xp1)>g(xp1,s,f)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q,t227,t228):is(<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q)
-t230:=tris2(cx,<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,smpr(x,g12),<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q,t229,t211):is(<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,smpr(x,g12))
-t231:=isf(cx,cx,[t:cx]<<xout(xp1)>g(xp1,s4,f)><t>q,<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,smpr(x,g12),t230):is(<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q,<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q)
-t232:=symis(cx,smpr(xp1,g(xp1,s4,f)),<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q,t201):is(<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q,smpr(xp1,g(xp1,s4,f)))
-t233:=t46(s4,f,t174,t177):is(smpr(xp1,g(xp1,s4,f)),smpr(xp1,f))
-t234:=tr4is(cx,smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s,f)><smpr(x,g8)>q,<<xout(xp1)>g(xp1,s,f)><<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q>q,<<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q><<xout(xp1)>g(xp1,s4,f)>q,<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q,t179,t198,t199,t200):is(smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q)
-t235:=tr4is(cx,smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q,<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q,smpr(xp1,g(xp1,s4,f)),smpr(xp1,f),t234,t231,t232,t233):prop1(xp1,s,f)
-gamma@t236:=th1"l.imp"(is"n"(x,1),prop1(xp1,s,f),[t:is"n"(x,1)]t172(t),[t:not(is"n"(x,1))]t235(t)):prop1(xp1,s,f)
-i3@t237:=th1"l.imp"(is"e"(1to(xp1),b0,xout(xp1)),prop1(xp1,s,f),[t:is"e"(1to(xp1),b0,xout(xp1))]t236(t),[t:not(is"e"(1to(xp1),b0,xout(xp1)))]t148(t)):prop1(xp1,s,f)
-not2@t238:=th1"l.imp"(is"e"(1to(xp1),a0,xout(xp1)),prop1(xp1,s,f),[t:is"e"(1to(xp1),a0,xout(xp1))]t237(t),[t:not(is"e"(1to(xp1),a0,xout(xp1)))]t128(t)):prop1(xp1,s,f)
-not1@t239:=th1"l.imp"(is"e"(1to(xp1),<1out(xp1)>s,1out(xp1)),prop1(xp1,s,f),[t:is"e"(1to(xp1),<1out(xp1)>s,1out(xp1))]t97(t),[t:not(is"e"(1to(xp1),<1out(xp1)>s,1out(xp1)))]t238(t)):prop1(xp1,s,f)
-b@t240:=th1"l.imp"(is"e"(1to(xp1),<xout(xp1)>s,xout(xp1)),prop1(xp1,s,f),[t:is"e"(1to(xp1),<xout(xp1)>s,xout(xp1))]t46(t),[t:not(is"e"(1to(xp1),<xout(xp1)>s,xout(xp1)))]t239(t)):prop1(xp1,s,f)
-p@t241:=[u:[t:1to(xp1)]1to(xp1)][v:[t:1to(xp1)]cx][w:bijective(1to(xp1),1to(xp1),u)]t240(u,v,w):prop2(xp1)
-t242:=isp(nat,[t:nat]prop2(t),xp1,<x>suc,t241,satz4a(x)):prop2(<x>suc)
-x@t243:=induction([t:nat]prop2(t),t6,[t:nat][u:prop2(t)]t242(t,u),x):prop2(x)
--8283
-satz283:=<b><f><s>t243".8283":is(smpr(x,[t:1to(x)]<<t>s>f),smpr(x,f))
-@[x:real][ix:intrl(x)][y:real][iy:intrl(y)][ly:lessis(y,x)]
-shiftl:=shiftl"r"(x,ix,y,iy,ly):nat
-[n:1to(shiftl)]
-shiftr:=shiftr"r"(x,ix,y,iy,ly,n):real
-intshiftr:=intshiftr"r"(x,ix,y,iy,ly,n):intrl(shiftr)
-shiftrls:=shiftrls"r"(x,ix,y,iy,ly,n):lessis(shiftr,x)
-lsshiftr:=lsshiftr"r"(x,ix,y,iy,ly,n):lessis(y,shiftr)
-[m:1to(shiftl)][i:is"r"(shiftr(n),shiftr(m))]
-iseshiftr:=iseshiftr"r"(x,ix,y,iy,ly,n,m,i):is"e"(1to(shiftl),n,m)
-ly@[u:real][a:and3(intrl(u),lessis(y,u),lessis(u,x))]
-shiftl1:=shiftl1"r"(x,ix,y,iy,ly,u,a):1to(shiftl)
-shiftinv1:=shiftinv1"r"(x,ix,y,iy,ly,u,a):is"r"(u,shiftr(shiftl1))
-shiftinv2:=shiftinv2"r"(x,ix,y,iy,ly,u,a):is"r"(shiftr(shiftl1),u)
-ly@[f:seq(x,ix,y,iy,ly,cx)]
-shiftf:=shiftf(x,ix,y,iy,ly,cx,f):[t:1to(shiftl)]cx
-[q:[t:cx][u:cx]cx]
-smpri:=smpr(q,shiftl,shiftf):cx
-f@[pi:proofsirrelevant(x,ix,y,iy,ly,cx,f)][q:[t:cx][u:cx]cx][a:assoc(q)][u:real][iu:intrl(u)][l:lessis(y,u)][k:less(u,x)][v:real][iv:intrl(v)][lv:lessis(y,v)][kv:lessis(v,u)]
-+8284
-t1:=lessisi1(v,x,satz172a(v,u,x,kv,k)):lessis(v,x)
--8284
-k@lft:=[t:real][v:intrl(t)][lt:lessis(y,t)][kt:lessis(t,u)]<t1".8284"(t,v,lt,kt)><lt><v><t>f:[t:real][v:intrl(t)][lt:lessis(y,t)][kt:lessis(t,u)]cx
-iv@[lv:lessis(pl"r"(u,1rl),v)][kv:lessis(v,x)]
-+*8284
-x@[y:real]
-pl:=pl"r"(x,y):real
-mn:=mn"r"(x,y):real
-x@p1:=pl"r"(x,1rl):real
-kv@t2:=satz190c(u,u,0,1rl,lessisi2(u,u,refis(real,u)),lemma1"r"(1rl,0,satz169a(1rl,natpos(1rl,natrl1)))):less(pl(u,0),p1(u))
-t3:=isless1(pl(u,0),u,p1(u),pl02"r"(u,0,refis(real,0)),t2):less(u,p1(u))
-t4:=lessisi1(y,v,satz172b(y,p1(u),v,satz172a(y,u,p1(u),l,t3),lv)):lessis(y,v)
--8284
-k@rgt:=[t:real][v:intrl(t)][lt:lessis(pl"r"(u,1rl),t)][kt:lessis(t,x)]<kt><t4".8284"(t,v,lt,kt)><v><t>f:[t:real][v:intrl(t)][lt:lessis(pl"r"(u,1rl),t)][kt:lessis(t,x)]cx
-+*8284
-k@t5:=intpl(u,iu,1rl,intrl1):intrl(p1(u))
-t6:=satzr25(u,iu,x,ix,k):lessis(p1(u),x)
-t7:=tr3is(real,pl(mn(p1(u),y),mn(p1(x),p1(u))),pl(mn(p1(x),p1(u)),mn(p1(u),y)),mn(pl(mn(p1(x),p1(u)),p1(u)),y),mn(p1(x),y),compl"r"(mn(p1(u),y),mn(p1(x),p1(u))),asspl2"r"(mn(p1(x),p1(u)),p1(u),m0"r"(y)),ismn1"r"(pl(mn(p1(x),p1(u)),p1(u)),p1(x),y,plmn(p1(x),p1(u)))):is"r"(pl(mn(p1(u),y),mn(p1(x),p1(u))),mn(p1(x),y))
-sxy:=shiftl(x,ix,y,iy,ly):nat
-suy:=shiftl(u,iu,y,iy,l):nat
-sxu:=shiftl(x,ix,p1(u),t5,t6):nat
-t8:=tr4is(real,rlofnt(pl"n"(suy,sxu)),pl(rlofnt(suy),rlofnt(sxu)),pl(mn(p1(u),y),mn(p1(x),p1(u))),mn(p1(x),y),rlofnt(sxy),satzr155a(suy,sxu),ispl12"r"(rlofnt(suy),mn(p1(u),y),rlofnt(sxu),mn(p1(x),p1(u)),isrlnt2(mn(p1(u),y),t6"r.shift"(u,iu,y,iy,l)),isrlnt2(mn(p1(x),p1(u)),t6"r.shift"(x,ix,p1(u),t5,t6))),t7,isrlnt1(mn(p1(x),y),t6"r.shift"(x,ix,y,iy,ly))):is"r"(rlofnt(pl"n"(suy,sxu)),rlofnt(sxy))
-t9:=isntirl(pl"n"(suy,sxu),sxy,t8):is"n"(pl"n"(suy,sxu),sxy)
-t10:=lessisi2"n"(pl"n"(suy,sxu),sxy,t9):lessis"n"(pl"n"(suy,sxu),sxy)
-f1:=left(cx,sxy,pl"n"(suy,sxu),t10,shiftf(x,ix,y,iy,ly,f)):[t:1to(pl"n"(suy,sxu))]cx
-t11:=issmpr(q,sxy,shiftf(x,ix,y,iy,ly,f),pl"n"(suy,sxu),t9):is(smpr(q,pl"n"(suy,sxu),f1),smpri(x,ix,y,iy,ly,f,q))
-fr:=right(cx,suy,sxu,f1):[t:1to(sxu)]cx
-t12:=lessisi1"n"(suy,pl"n"(suy,sxu),satz18a(suy,sxu)):lessis"n"(suy,pl"n"(suy,sxu))
-fl:=left(cx,pl"n"(suy,sxu),suy,t12,f1):[t:1to(suy)]cx
-t12a:=satz281(q,a,suy,sxu,f1):is(smpr(q,pl"n"(suy,sxu),f1),<smpr(q,sxu,fr)><smpr(q,suy,fl)>q)
-[n:1to(sxu)]
-t13:=isinoutn(pl"n"(suy,sxu),pl"n"(suy,inn(sxu,n)),satz19o(inn(sxu,n),sxu,suy,1top(sxu,n))):is"n"(pl"n"(suy,inn(sxu,n)),inn(pl"n"(suy,sxu),right1to(suy,sxu,n)))
-t14:=isinoutn(sxy,inn(pl"n"(suy,sxu),right1to(suy,sxu,n)),trlessis"n"(inn(pl"n"(suy,sxu),right1to(suy,sxu,n)),pl"n"(suy,sxu),sxy,1top(pl"n"(suy,sxu),right1to(suy,sxu,n)),t10)):is"n"(inn(pl"n"(suy,sxu),right1to(suy,sxu,n)),inn(sxy,left1to(sxy,pl"n"(suy,sxu),t10,right1to(suy,sxu,n))))
-n1:=left1to(sxy,pl"n"(suy,sxu),t10,right1to(suy,sxu,n)):1to(sxy)
-t15:=tris(nat,pl"n"(suy,inn(sxu,n)),inn(pl"n"(suy,sxu),right1to(suy,sxu,n)),inn(sxy,n1),t13,t14):is"n"(pl"n"(suy,inn(sxu,n)),inn(sxy,n1))
-t16:=isnterl(pl"n"(suy,inn(sxu,n)),inn(sxy,n1),t15):is"r"(rlofnt(pl"n"(suy,inn(sxu,n))),rlofnt(inn(sxy,n1)))
-t17:=satzr155b(suy,inn(sxu,n)):is"r"(pl(rlofnt(suy),rlofnt(inn(sxu,n))),rlofnt(pl"n"(suy,inn(sxu,n))))
-t18:=ispl1"r"(mn(p1(u),y),rlofnt(suy),rlofnt(inn(sxu,n)),isrlnt1(mn(p1(u),y),t6"r.shift"(u,iu,y,iy,l))):is"r"(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),pl(rlofnt(suy),rlofnt(inn(sxu,n))))
-t19:=tr3is(real,pl(mn(p1(u),y),rlofnt(inn(sxu,n))),pl(rlofnt(suy),rlofnt(inn(sxu,n))),rlofnt(pl"n"(suy,inn(sxu,n))),rlofnt(inn(sxy,n1)),t18,t17,t16):is"r"(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),rlofnt(inn(sxy,n1)))
-t20:=ispl1"r"(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),rlofnt(inn(sxy,n1)),y,t19):is"r"(pl(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),y),pl(rlofnt(inn(sxy,n1)),y))
-t21:=tr3is(real,pl(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),y),pl(pl(rlofnt(inn(sxu,n)),mn(p1(u),y)),y),pl(rlofnt(inn(sxu,n)),pl(mn(p1(u),y),y)),pl(rlofnt(inn(sxu,n)),p1(u)),ispl1"r"(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),pl(rlofnt(inn(sxu,n)),mn(p1(u),y)),y,compl"r"(mn(p1(u),y),rlofnt(inn(sxu,n)))),asspl1"r"(rlofnt(inn(sxu,n)),mn(p1(u),y),y),ispl2"r"(pl(mn(p1(u),y),y),p1(u),rlofnt(inn(sxu,n)),plmn(p1(u),y))):is"r"(pl(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),y),pl(rlofnt(inn(sxu,n)),p1(u)))
-t22:=tris1(real,pl(rlofnt(inn(sxy,n1)),y),pl(rlofnt(inn(sxu,n)),p1(u)),pl(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),y),t20,t21):is"r"(pl(rlofnt(inn(sxy,n1)),y),pl(rlofnt(inn(sxu,n)),p1(u)))
-t23:=ismn1"r"(pl(rlofnt(inn(sxy,n1)),y),pl(rlofnt(inn(sxu,n)),p1(u)),1rl,t22):is"r"(shiftr(x,ix,y,iy,ly,n1),shiftr(x,ix,p1(u),t5,t6,n))
-t24:=intshiftr(x,ix,y,iy,ly,n1):intrl(shiftr(x,ix,y,iy,ly,n1))
-t25:=lsshiftr(x,ix,y,iy,ly,n1):lessis(y,shiftr(x,ix,y,iy,ly,n1))
-t26:=shiftrls(x,ix,y,iy,ly,n1):lessis(shiftr(x,ix,y,iy,ly,n1),x)
-t27:=intshiftr(x,ix,p1(u),t5,t6,n):intrl(shiftr(x,ix,p1(u),t5,t6,n))
-t28:=lsshiftr(x,ix,p1(u),t5,t6,n):lessis(p1(u),shiftr(x,ix,p1(u),t5,t6,n))
-t29:=shiftrls(x,ix,p1(u),t5,t6,n):lessis(shiftr(x,ix,p1(u),t5,t6,n),x)
-t30:=t4(shiftr(x,ix,p1(u),t5,t6,n),t27,t28,t29):lessis(y,shiftr(x,ix,p1(u),t5,t6,n))
-t31:=<t23><t29><t30><t27><shiftr(x,ix,p1(u),t5,t6,n)><t26><t25><t24><shiftr(x,ix,y,iy,ly,n1)>pi:is(<n>fr,<n>shiftf(x,ix,p1(u),t5,t6,rgt))
-k@t32:=fisi(1to(sxu),cx,fr,shiftf(x,ix,p1(u),t5,t6,rgt),[t:1to(sxu)]t31(t)):is"e"([t:1to(sxu)]cx,fr,shiftf(x,ix,p1(u),t5,t6,rgt))
-t33:=isf([t:1to(sxu)]cx,cx,[v:[t:1to(sxu)]cx]smpr(q,sxu,v),fr,shiftf(x,ix,p1(u),t5,t6,rgt),t32):is(smpr(q,sxu,fr),smpri(x,ix,p1(u),t5,t6,rgt,q))
-t34:=isf(cx,cx,<smpr(q,suy,fl)>q,smpr(q,sxu,fr),smpri(x,ix,p1(u),t5,t6,rgt,q),t33):is(<smpr(q,sxu,fr)><smpr(q,suy,fl)>q,<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpr(q,suy,fl)>q)
-[n:1to(suy)]
-t35:=isinoutn(pl"n"(suy,sxu),inn(suy,n),trlessis"n"(inn(suy,n),suy,pl"n"(suy,sxu),1top(suy,n),t12)):is"n"(inn(suy,n),inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)))
-t36:=isinoutn(sxy,inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),trlessis"n"(inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),pl"n"(suy,sxu),sxy,1top(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),t10)):is"n"(inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),inn(sxy,left1to(sxy,pl"n"(suy,sxu),t10,left1to(pl"n"(suy,sxu),suy,t12,n))))
-n2:=left1to(sxy,pl"n"(suy,sxu),t10,left1to(pl"n"(suy,sxu),suy,t12,n)):1to(sxy)
-t37:=tris(nat,inn(suy,n),inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),inn(sxy,n2),t35,t36):is"n"(inn(suy,n),inn(sxy,n2))
-t38:=isnterl(inn(suy,n),inn(sxy,n2),t37):is"r"(rlofnt(inn(suy,n)),rlofnt(inn(sxy,n2)))
-t39:=ispl1"r"(rlofnt(inn(suy,n)),rlofnt(inn(sxy,n2)),y,t38):is"r"(pl(rlofnt(inn(suy,n)),y),pl(rlofnt(inn(sxy,n2)),y))
-t40:=ismn1"r"(pl(rlofnt(inn(suy,n)),y),pl(rlofnt(inn(sxy,n2)),y),1rl,t39):is"r"(shiftr(u,iu,y,iy,l,n),shiftr(x,ix,y,iy,ly,n2))
-t41:=intshiftr(u,iu,y,iy,l,n):intrl(shiftr(u,iu,y,iy,l,n))
-t42:=lsshiftr(u,iu,y,iy,l,n):lessis(y,shiftr(u,iu,y,iy,l,n))
-t43:=shiftrls(u,iu,y,iy,l,n):lessis(shiftr(u,iu,y,iy,l,n),u)
-t44:=t1(shiftr(u,iu,y,iy,l,n),t41,t42,t43):lessis(shiftr(u,iu,y,iy,l,n),x)
-t45:=intshiftr(x,ix,y,iy,ly,n2):intrl(shiftr(x,ix,y,iy,ly,n2))
-t46:=lsshiftr(x,ix,y,iy,ly,n2):lessis(y,shiftr(x,ix,y,iy,ly,n2))
-t47:=shiftrls(x,ix,y,iy,ly,n2):lessis(shiftr(x,ix,y,iy,ly,n2),x)
-t48:=<t40><t47><t46><t45><shiftr(x,ix,y,iy,ly,n2)><t44><t42><t41><shiftr(u,iu,y,iy,l,n)>pi:is(<n>shiftf(u,iu,y,iy,l,lft),<n>fl)
-t49:=symis(cx,<n>shiftf(u,iu,y,iy,l,lft),<n>fl,t48):is(<n>fl,<n>shiftf(u,iu,y,iy,l,lft))
-k@t50:=fisi(1to(suy),cx,fl,shiftf(u,iu,y,iy,l,lft),[t:1to(suy)]t49(t)):is"e"([t:1to(suy)]cx,fl,shiftf(u,iu,y,iy,l,lft))
-t51:=isf([t:1to(suy)]cx,cx,[v:[t:1to(suy)]cx]smpr(q,suy,v),fl,shiftf(u,iu,y,iy,l,lft),t50):is(smpr(q,suy,fl),smpri(u,iu,y,iy,l,lft,q))
-t52:=isf(cx,cx,[t:cx]<smpri(x,ix,p1(u),t5,t6,rgt,q)><t>q,smpr(q,suy,fl),smpri(u,iu,y,iy,l,lft,q),t51):is(<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpr(q,suy,fl)>q,<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q)
-t53:=tr3is(cx,smpr(q,pl"n"(suy,sxu),f1),<smpr(q,sxu,fr)><smpr(q,suy,fl)>q,<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpr(q,suy,fl)>q,<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q,t12a,t34,t52):is(smpr(q,pl"n"(suy,sxu),f1),<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q)
--8284
-k@satz284:=tris1(cx,smpri(x,ix,y,iy,ly,f,q),<smpri(x,ix,pl"r"(u,1rl),intpl(u,iu,1rl,intrl1),satzr25(u,iu,x,ix,k),rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q,smpr(q,pl"n"(suy".8284",sxu".8284"),f1".8284"),t11".8284",t53".8284"):is(smpri(x,ix,y,iy,ly,f,q),<smpri(x,ix,pl"r"(u,1rl),intpl(u,iu,1rl,intrl1),satzr25(u,iu,x,ix,k),rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q)
-q@[v:real][iv:intrl(v)][w:real][iw:intrl(w)][lw:lessis(pl"r"(y,v),w)][kw:lessis(w,pl"r"(x,v))]
-+8285
-x@[y:real]
-pl:=pl"r"(x,y):real
-mn:=mn"r"(x,y):real
-x@p1:=pl"r"(x,1rl):real
-kw@t1:=th9"l.or"(less(pl(y,v),w),is"r"(pl(y,v),w),less(mn(pl(y,v),v),mn(w,v)),is"r"(mn(pl(y,v),v),mn(w,v)),lw,[t:less(pl(y,v),w)]satz188f(pl(y,v),w,m0"r"(v),t),[t:is"r"(pl(y,v),w)]ismn1"r"(pl(y,v),w,v,t)):lessis(mn(pl(y,v),v),mn(w,v))
-t2:=islessis1(mn(pl(y,v),v),y,mn(w,v),mnpl(y,v),t1):lessis(y,mn(w,v))
-t3:=th9"l.or"(less(w,pl(x,v)),is"r"(w,pl(x,v)),less(mn(w,v),mn(pl(x,v),v)),is"r"(mn(w,v),mn(pl(x,v),v)),kw,[t:less(w,pl(x,v))]satz188f(w,pl(x,v),m0"r"(v),t),[t:is"r"(w,pl(x,v))]ismn1"r"(w,pl(x,v),v,t)):lessis(mn(w,v),mn(pl(x,v),v))
-t4:=islessis2(mn(pl(x,v),v),x,mn(w,v),mnpl(x,v),t3):lessis(mn(w,v),x)
--8285
-iv@sft:=[t:real][w:intrl(t)][lt:lessis(pl"r"(y,v),t)][kt:lessis(t,pl"r"(x,v))]<t4".8285"(t,w,lt,kt)><t2".8285"(t,w,lt,kt)><intmn(t,w,v,iv)><mn"r"(t,v)>f:[t:real][w:intrl(t)][lt:lessis(pl"r"(y,v),t)][kt:lessis(t,pl"r"(x,v))]cx
-+*8285
-iv@t5:=tris(real,m0"r"(pl(y,v)),m0"r"(pl(v,y)),pl(m0"r"(v),m0"r"(y)),ism0"r"(pl(y,v),pl(v,y),compl"r"(y,v)),satz180(v,y)):is"r"(m0"r"(pl(y,v)),pl(m0"r"(v),m0"r"(y)))
-t6:=tr3is(real,mn(pl(1rl,pl(x,v)),v),pl(1rl,mn(pl(x,v),v)),pl(1rl,x),p1(x),asspl1"r"(1rl,pl(x,v),m0"r"(v)),ispl2"r"(mn(pl(x,v),v),x,1rl,mnpl(x,v)),compl"r"(1rl,x)):is"r"(mn(pl(1rl,pl(x,v)),v),p1(x))
-t7:=tr3is(real,mn(p1(pl(x,v)),pl(y,v)),pl(pl(1rl,pl(x,v)),pl(m0"r"(v),m0"r"(y))),mn(mn(pl(1rl,pl(x,v)),v),y),mn(p1(x),y),ispl12"r"(p1(pl(x,v)),pl(1rl,pl(x,v)),m0"r"(pl(y,v)),pl(m0"r"(v),m0"r"(y)),compl"r"(pl(x,v),1rl),t5),asspl2"r"(pl(1rl,pl(x,v)),m0"r"(v),m0"r"(y)),ismn1"r"(mn(pl(1rl,pl(x,v)),v),p1(x),y,t6)):is"r"(mn(p1(pl(x,v)),pl(y,v)),mn(p1(x),y))
-t8:=th9"l.or"(less(y,x),is"r"(y,x),less(pl(y,v),pl(x,v)),is"r"(pl(y,v),pl(x,v)),ly,[t:less(y,x)]satz188f(y,x,v,t),[t:is"r"(y,x)]ispl1"r"(y,x,v,t)):lessis(pl(y,v),pl(x,v))
-s0:=shiftl(x,ix,y,iy,ly):nat
-sv:=shiftl(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8):nat
-t9:=isrlent(mn(p1(pl(x,v)),pl(y,v)),t6"r.shift"(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8),mn(p1(x),y),t6"r.shift"(x,ix,y,iy,ly),t7):is"n"(sv,s0)
-t10:=lessisi2"n"(sv,s0,t9):lessis"n"(sv,s0)
-f1:=left(cx,s0,sv,t10,shiftf(x,ix,y,iy,ly,f)):[t:1to(sv)]cx
-t11:=issmpr(q,s0,shiftf(x,ix,y,iy,ly,f),sv,t9):is(smpr(q,sv,f1),smpri(x,ix,y,iy,ly,f,q))
-[n:1to(sv)]
-t12:=isinoutn(s0,inn(sv,n),trlessis"n"(inn(sv,n),sv,s0,1top(sv,n),t10)):is"n"(inn(sv,n),inn(s0,left1to(s0,sv,t10,n)))
-n1:=left1to(s0,sv,t10,n):1to(s0)
-t13:=isnterl(inn(sv,n),inn(s0,n1),t12):is"r"(rlofnt(inn(sv,n)),rlofnt(inn(s0,n1)))
-t14:=tris(real,mn(pl(rlofnt(inn(sv,n)),pl(y,v)),v),pl(rlofnt(inn(sv,n)),mn(pl(y,v),v)),pl(rlofnt(inn(s0,n1)),y),asspl1"r"(rlofnt(inn(sv,n)),pl(y,v),m0"r"(v)),ispl12"r"(rlofnt(inn(sv,n)),rlofnt(inn(s0,n1)),mn(pl(y,v),v),y,t13,mnpl(y,v))):is"r"(mn(pl(rlofnt(inn(sv,n)),pl(y,v)),v),pl(rlofnt(inn(s0,n1)),y))
-st0:=shiftr(x,ix,y,iy,ly,n1):real
-stv:=shiftr(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,n):real
-t15:=tr4is(real,mn(stv,v),pl(pl(rlofnt(inn(sv,n)),pl(y,v)),pl(m0"r"(1rl),m0"r"(v))),pl(pl(rlofnt(inn(sv,n)),pl(y,v)),pl(m0"r"(v),m0"r"(1rl))),mn(mn(pl(rlofnt(inn(sv,n)),pl(y,v)),v),1rl),st0,asspl1"r"(pl(rlofnt(inn(sv,n)),pl(y,v)),m0"r"(1rl),m0"r"(v)),ispl2"r"(pl(m0"r"(1rl),m0"r"(v)),pl(m0"r"(v),m0"r"(1rl)),pl(rlofnt(inn(sv,n)),pl(y,v)),compl"r"(m0"r"(1rl),m0"r"(v))),asspl2"r"(pl(rlofnt(inn(sv,n)),pl(y,v)),m0"r"(v),m0"r"(1rl)),ismn1"r"(mn(pl(rlofnt(inn(sv,n)),pl(y,v)),v),pl(rlofnt(inn(s0,n1)),y),1rl,t14)):is"r"(mn(stv,v),st0)
-t16:=intshiftr(x,ix,y,iy,ly,n1):intrl(st0)
-t17:=shiftrls(x,ix,y,iy,ly,n1):lessis(st0,x)
-t18:=lsshiftr(x,ix,y,iy,ly,n1):lessis(y,st0)
-t19:=intshiftr(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,n):intrl(stv)
-t20:=shiftrls(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,n):lessis(stv,pl(x,v))
-t21:=lsshiftr(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,n):lessis(pl(y,v),stv)
-t22:=intmn(stv,t19,v,iv):intrl(mn(stv,v))
-t23:=t2(stv,t19,t21,t20):lessis(y,mn(stv,v))
-t24:=t4(stv,t19,t21,t20):lessis(mn(stv,v),x)
-t25:=<t15><t17><t18><t16><st0><t24><t23><t22><mn(stv,v)>pi:is(<n>shiftf(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft),<n>f1)
-iv@t26:=fisi(1to(sv),cx,shiftf(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft),f1,[t:1to(sv)]t25(t)):is"e"([t:1to(sv)]cx,shiftf(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft),f1)
-t27:=isf([t:1to(sv)]cx,cx,[w:[t:1to(sv)]cx]smpr(q,sv,w),shiftf(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft),f1,t26):is(smpri(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft,q),smpr(q,sv,f1))
--8285
-iv@lemma285:=t8".8285":lessis(pl"r"(y,v),pl"r"(x,v))
-satz285:=tris(cx,smpri(pl"r"(x,v),intpl(x,ix,v,iv),pl"r"(y,v),intpl(y,iy,v,iv),lemma285,sft,q),smpr(q,sv".8285",f1".8285"),smpri(x,ix,y,iy,ly,f,q),t27".8285",t11".8285"):is(smpri(pl"r"(x,v),intpl(x,ix,v,iv),pl"r"(y,v),intpl(y,iy,v,iv),lemma285,sft,q),smpri(x,ix,y,iy,ly,f,q))
-ly@[s:seq(x,ix,y,iy,ly,real)][ins:inseq(x,ix,y,iy,ly,s)][f:seq(x,ix,y,iy,ly,cx)][u:real][iu:intrl(u)][lu:lessis(y,u)][ul:lessis(u,x)]
-us:=<ul><lu><iu><u>s:real
-+8286
-t1:=<ul><lu><iu><u>ins:and3(intrl(us),lessis(y,us),lessis(us,x))
--8286
-inseqe1:=t22"r.shift"(x,ix,y,iy,ly,us,t1".8286"):intrl(us)
-inseqe2:=t23"r.shift"(x,ix,y,iy,ly,us,t1".8286"):lessis(y,us)
-inseqe3:=t24"r.shift"(x,ix,y,iy,ly,us,t1".8286"):lessis(us,x)
-usf:=<inseqe3><inseqe2><inseqe1><us>f:cx
-f@permseq:=[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]usf(t,u,v,w):[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]cx
-q@[a:assoc(q)][c:commut(q)][s:seq(x,ix,y,iy,ly,real)][ins:inseq(x,ix,y,iy,ly,s)][pri:proofsirrelevant(x,ix,y,iy,ly,real,s)][ps:perm(x,ix,y,iy,ly,s)]
-+*8286
-ps@ss:=shiftseq(x,ix,y,iy,ly,s,ins):[t:1to(shiftl)]1to(shiftl)
-t2:=satz283(q,a,c,shiftl,ss,bijshiftseq(x,ix,y,iy,ly,s,ins,pri,ps),shiftf(f)):is(smpr(q,shiftl,[t:1to(shiftl)]<<t>ss>shiftf(f)),smpri(f,q))
-[n:1to(shiftl)]
-ns:=us(s,ins,f,shiftr(n),intshiftr(n),lsshiftr(n),shiftrls(n)):real
-t3:=shiftinv1(ns,t34"r.shift"(x,ix,y,iy,ly,s,ins,n)):is"r"(ns,shiftr(<n>ss))
-t4:=inseqe1(s,ins,f,shiftr(n),intshiftr(n),lsshiftr(n),shiftrls(n)):intrl(ns)
-t5:=inseqe2(s,ins,f,shiftr(n),intshiftr(n),lsshiftr(n),shiftrls(n)):lessis(y,ns)
-t6:=inseqe3(s,ins,f,shiftr(n),intshiftr(n),lsshiftr(n),shiftrls(n)):lessis(ns,x)
-t7:=intshiftr(<n>ss):intrl(shiftr(<n>ss))
-t8:=lsshiftr(<n>ss):lessis(y,shiftr(<n>ss))
-t9:=shiftrls(<n>ss):lessis(shiftr(<n>ss),x)
-t10:=<t3><t9><t8><t7><shiftr(<n>ss)><t6><t5><t4><ns>pi:is(<n>shiftf(permseq(s,ins,f)),<<n>ss>shiftf(f))
-ps@t11:=fisi(1to(shiftl),cx,shiftf(permseq(s,ins,f)),[t:1to(shiftl)]<<t>ss>shiftf(f),[t:1to(shiftl)]t10(t)):is"e"([t:1to(shiftl)]cx,shiftf(permseq(s,ins,f)),[t:1to(shiftl)]<<t>ss>shiftf(f))
-t12:=isf([t:1to(shiftl)]cx,cx,[u:[t:1to(shiftl)]cx]smpr(q,shiftl,u),shiftf(permseq(s,ins,f)),[t:1to(shiftl)]<<t>ss>shiftf(f),t11):is(smpri(permseq(s,ins,f),q),smpr(q,shiftl,[t:1to(shiftl)]<<t>ss>shiftf(f)))
--8286
-ps@satz286:=tris(cx,smpri(permseq(s,ins,f),q),smpr(q,shiftl,[t:1to(shiftl)]<<t>ss".8286">shiftf(f)),smpri(f,q),t12".8286",t2".8286"):is(smpri(permseq(s,ins,f),q),smpri(f,q))
-@[x:nat][f:[t:1to(x)]cx]
-modf:=[t:1to(x)]pli(mod(<t>f),0):[t:1to(x)]cx
-+8287
-[r:real]
-prop1:=lessis(mod(sum(x,f)),r):'prop'
-prop2:=is(sum(x,modf(f)),pli(r,0)):'prop'
-prop3:=and(prop1,prop2):'prop'
-f@prop4:=some"r"([t:real]prop3(t)):'prop'
-x@prop5:=[u:[t:1to(x)]cx]prop4(u):'prop'
-@[f:[t:1to(1)]cx]
-t1:=satz277([t:cx][u:cx]pl(t,u),f):is(sum(1,f),<xout(1)>f)
-t2:=ismod(sum(1,f),<xout(1)>f,t1):is"r"(mod(sum(1,f)),mod(<xout(1)>f))
-t3:=lessisi2(mod(sum(1,f)),mod(<xout(1)>f),t2):prop1(1,f,mod(<xout(1)>f))
-t4:=satz277([t:cx][u:cx]pl(t,u),modf(1,f)):prop2(1,f,mod(<xout(1)>f))
-t5:=andi(prop1(1,f,mod(<xout(1)>f)),prop2(1,f,mod(<xout(1)>f)),t3,t4):prop3(1,f,mod(<xout(1)>f))
-t6:=somei(real,[t:real]prop3(1,f,t),mod(<xout(1)>f),t5):prop4(1,f)
-@t7:=[u:[t:1to(1)]cx]t6(u):prop5(1)
-x@[p:prop5(x)][f:[t:1to(pl"n"(x,1))]cx]
-t8:=lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)):lessis"n"(x,pl"n"(x,1))
-lf:=left(cx,pl"n"(x,1),x,t8,f):[t:1to(x)]cx
-[r:real][pr:prop3(lf,r)]
-t9:=ande1(prop1(lf,r),prop2(lf,r),pr):prop1(lf,r)
-t10:=ande2(prop1(lf,r),prop2(lf,r),pr):prop2(lf,r)
-t11:=satz278([t:cx][u:cx]pl(t,u),x,f):is(sum(pl"n"(x,1),f),pl(sum(x,lf),<xout(pl"n"(x,1))>f))
-t12:=ismod(pl(sum(x,lf),<xout(pl"n"(x,1))>f),sum(pl"n"(x,1),f),symis(cx,sum(pl"n"(x,1),f),pl(sum(x,lf),<xout(pl"n"(x,1))>f),t11)):is"r"(mod(pl(sum(x,lf),<xout(pl"n"(x,1))>f)),mod(sum(pl"n"(x,1),f)))
-m:=mod(<xout(pl"n"(x,1))>f):real
-t13:=islessis1(mod(pl(sum(x,lf),<xout(pl"n"(x,1))>f)),mod(sum(pl"n"(x,1),f)),pl"r"(mod(sum(x,lf)),m),t12,satz271(sum(x,lf),<xout(pl"n"(x,1))>f)):lessis(mod(sum(pl"n"(x,1),f)),pl"r"(mod(sum(x,lf)),m))
-t14:=th9"l.or"(less(mod(sum(x,lf)),r),is"r"(mod(sum(x,lf)),r),less(pl"r"(mod(sum(x,lf)),m),pl"r"(r,m)),is"r"(pl"r"(mod(sum(x,lf)),m),pl"r"(r,m)),t9,[t:less(mod(sum(x,lf)),r)]satz188f(mod(sum(x,lf)),r,m,t),[t:is"r"(mod(sum(x,lf)),r)]ispl1"r"(mod(sum(x,lf)),r,m,t)):lessis(pl"r"(mod(sum(x,lf)),m),pl"r"(r,m))
-t15:=trlessis(mod(sum(pl"n"(x,1),f)),pl"r"(mod(sum(x,lf)),m),pl"r"(r,m),t13,t14):prop1(pl"n"(x,1),f,pl"r"(r,m))
-lmf:=left(cx,pl"n"(x,1),x,t8,modf(pl"n"(x,1),f)):[t:1to(x)]cx
-t16:=satz278([t:cx][u:cx]pl(t,u),x,modf(pl"n"(x,1),f)):is(sum(pl"n"(x,1),modf(pl"n"(x,1),f)),pl(sum(x,lmf),pli(m,0)))
-t17:=ispl1(sum(x,lmf),pli(r,0),pli(m,0),t10):is(pl(sum(x,lmf),pli(m,0)),pl(pli(r,0),pli(m,0)))
-t18:=plis12a(r,0,m,0):is(pl(pli(r,0),pli(m,0)),pli(pl"r"(r,m),pl"r"(0,0)))
-t19:=isrecx2(pl"r"(0,0),0,pl"r"(r,m),pl01"r"(0,0,refis(real,0))):is(pli(pl"r"(r,m),pl"r"(0,0)),pli(pl"r"(r,m),0))
-t20:=tr4is(cx,sum(pl"n"(x,1),modf(pl"n"(x,1),f)),pl(sum(x,lmf),pli(m,0)),pl(pli(r,0),pli(m,0)),pli(pl"r"(r,m),pl"r"(0,0)),pli(pl"r"(r,m),0),t16,t17,t18,t19):prop2(pl"n"(x,1),f,pl"r"(r,m))
-t21:=andi(prop1(pl"n"(x,1),f,pl"r"(r,m)),prop2(pl"n"(x,1),f,pl"r"(r,m)),t15,t20):prop3(pl"n"(x,1),f,pl"r"(r,m))
-t22:=somei(real,[t:real]prop3(pl"n"(x,1),f,t),pl"r"(r,m),t21):prop4(pl"n"(x,1),f)
-f@t23:=someapp(real,[t:real]prop3(lf,t),<lf>p,prop4(pl"n"(x,1),f),[t:real][u:prop3(lf,t)]t22(t,u)):prop4(pl"n"(x,1),f)
-p@t25:=[u:[t:1to(pl"n"(x,1))]cx]t23(u):prop5(pl"n"(x,1))
-t26:=isp(nat,[t:nat]prop5(t),pl"n"(x,1),<x>suc,t25,satz4a(x)):prop5(<x>suc)
--8287
-satz287:=<f>induction([t:nat]prop5".8287"(t),t7".8287",[t:nat][u:prop5".8287"(t)]t26".8287"(t,u),x):some"r"([t:real]and(lessis(mod(sum(x,f)),t),is(sum(x,modf(f)),pli(t,0))))
-+8288
-prop1:=is(pli(mod(prod(x,f)),0),prod(x,modf(f))):'prop'
-x@prop2:=[u:[t:1to(x)]cx]prop1(u):'prop'
-@[f:[t:1to(1)]cx]
-t1:=satz277([t:cx][u:cx]ts(t,u),f):is(prod(1,f),<xout(1)>f)
-t2:=ismod(prod(1,f),<xout(1)>f,t1):is"r"(mod(prod(1,f)),mod(<xout(1)>f))
-t3:=isrecx1(mod(prod(1,f)),mod(<xout(1)>f),0,t2):is(pli(mod(prod(1,f)),0),pli(mod(<xout(1)>f),0))
-t4:=satz277([t:cx][u:cx]ts(t,u),modf(1,f)):is(prod(1,modf(1,f)),pli(mod(<xout(1)>f),0))
-t5:=tris2(cx,pli(mod(prod(1,f)),0),prod(1,modf(1,f)),pli(mod(<xout(1)>f),0),t3,t4):prop1(1,f)
-@t6:=[u:[t:1to(1)]cx]t5(u):prop2(1)
-x@[p:prop2(x)][f:[t:1to(pl"n"(x,1))]cx]
-t7:=lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)):lessis"n"(x,pl"n"(x,1))
-lf:=left(cx,pl"n"(x,1),x,t7,f):[t:1to(x)]cx
-t8:=satz278([t:cx][u:cx]ts(t,u),x,f):is(prod(pl"n"(x,1),f),ts(prod(x,lf),<xout(pl"n"(x,1))>f))
-m:=mod(<xout(pl"n"(x,1))>f):real
-t9:=ismod(prod(pl"n"(x,1),f),ts(prod(x,lf),<xout(pl"n"(x,1))>f),t8):is"r"(mod(prod(pl"n"(x,1),f)),mod(ts(prod(x,lf),<xout(pl"n"(x,1))>f)))
-t10:=satz268(prod(x,lf),<xout(pl"n"(x,1))>f):is"r"(mod(ts(prod(x,lf),<xout(pl"n"(x,1))>f)),ts"r"(mod(prod(x,lf)),m))
-t11:=tris(real,mod(prod(pl"n"(x,1),f)),mod(ts(prod(x,lf),<xout(pl"n"(x,1))>f)),ts"r"(mod(prod(x,lf)),m),t9,t10):is"r"(mod(prod(pl"n"(x,1),f)),ts"r"(mod(prod(x,lf)),m))
-t12:=isrecx1(mod(prod(pl"n"(x,1),f)),ts"r"(mod(prod(x,lf)),m),0,t11):is(pli(mod(prod(pl"n"(x,1),f)),0),pli(ts"r"(mod(prod(x,lf)),m),0))
-lmf:=left(cx,pl"n"(x,1),x,t7,modf(pl"n"(x,1),f)):[t:1to(x)]cx
-t13:=satz278([t:cx][u:cx]ts(t,u),x,modf(pl"n"(x,1),f)):is(prod(pl"n"(x,1),modf(pl"n"(x,1),f)),ts(prod(x,lmf),pli(m,0)))
-t14:=symis(cx,pli(mod(prod(x,lf)),0),prod(x,lmf),<lf>p):is(prod(x,lmf),pli(mod(prod(x,lf)),0))
-t15:=ists1(prod(x,lmf),pli(mod(prod(x,lf)),0),pli(m,0),t14):is(ts(prod(x,lmf),pli(m,0)),ts(pli(mod(prod(x,lf)),0),pli(m,0)))
-t16:=tsis12a(mod(prod(x,lf)),0,m,0):is(ts(pli(mod(prod(x,lf)),0),pli(m,0)),pli(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m))))
-t17:=tris(real,mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),mn"r"(ts"r"(mod(prod(x,lf)),m),0),ts"r"(mod(prod(x,lf)),m),ismn2"r"(ts"r"(0,0),0,ts"r"(mod(prod(x,lf)),m),ts01"r"(0,0,refis(real,0))),pl02"r"(ts"r"(mod(prod(x,lf)),m),m0"r"(0),satz176b(0,refis(real,0)))):is"r"(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),ts"r"(mod(prod(x,lf)),m))
-t18:=tris(real,pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m)),pl"r"(0,0),0,ispl12"r"(ts"r"(mod(prod(x,lf)),0),0,ts"r"(0,m),0,ts02"r"(mod(prod(x,lf)),0,refis(real,0)),ts01"r"(0,m,refis(real,0))),pl01"r"(0,0,refis(real,0))):is"r"(pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m)),0)
-t19:=isrecx12(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),ts"r"(mod(prod(x,lf)),m),pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m)),0,t17,t18):is(pli(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m))),pli(ts"r"(mod(prod(x,lf)),m),0))
-t20:=tr4is(cx,prod(pl"n"(x,1),modf(pl"n"(x,1),f)),ts(prod(x,lmf),pli(m,0)),ts(pli(mod(prod(x,lf)),0),pli(m,0)),pli(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m))),pli(ts"r"(mod(prod(x,lf)),m),0),t13,t15,t16,t19):is(prod(pl"n"(x,1),modf(pl"n"(x,1),f)),pli(ts"r"(mod(prod(x,lf)),m),0))
-t21:=tris2(cx,pli(mod(prod(pl"n"(x,1),f)),0),prod(pl"n"(x,1),modf(pl"n"(x,1),f)),pli(ts"r"(mod(prod(x,lf)),m),0),t12,t20):prop1(pl"n"(x,1),f)
-p@t21a:=[u:[t:1to(pl"n"(x,1))]cx]t21(u):prop2(pl"n"(x,1))
-t22:=isp(nat,[t:nat]prop2(t),pl"n"(x,1),<x>suc,t21a,satz4a(x)):prop2(<x>suc)
--8288
-satz288:=<f>induction([t:nat]prop2".8288"(t),t6".8288",[t:nat][u:prop2".8288"(t)]t22".8288"(t,u),x):is(pli(mod(prod(x,f)),0),prod(x,modf(f)))
-+8289
-prop1:=is(prod(x,f),0c):'prop'
-prop2:=some"l"(1to(x),[t:1to(x)]is(<t>f,0c)):'prop'
-prop3:=iff(prop1,prop2):'prop'
-x@prop4:=[u:[t:1to(x)]cx]prop3(u):'prop'
-@[f:[t:1to(1)]cx]
-t1:=satz277([t:cx][u:cx]ts(t,u),f):is(prod(1,f),<xout(1)>f)
-[p:prop1(1,f)]
-t2:=tris1(cx,<xout(1)>f,0c,prod(1,f),t1,p):is(<xout(1)>f,0c)
-t3:=somei(1to(1),[t:1to(1)]is(<t>f,0c),xout(1),t2):prop2(1,f)
-f@[p:prop2(1,f)][u:1to(1)][i:is(<u>f,0c)]
-t4:=th1"n.singlet"(u):is"e"(1to(1),u,xout(1))
-t5:=tr3is(cx,prod(1,f),<xout(1)>f,<u>f,0c,t1,isf(1to(1),cx,f,xout(1),u,symis(1to(1),u,xout(1),t4)),i):prop1(1,f)
-p@t6:=someapp(1to(1),[t:1to(1)]is(<t>f,0c),p,prop1(1,f),[t:1to(1)][u:is(<t>f,0c)]t5(t,u)):prop1(1,f)
-f@t7:=iffi(prop1(1,f),prop2(1,f),[t:prop1(1,f)]t3(t),[t:prop2(1,f)]t6(t)):prop3(1,f)
-@t8:=[u:[t:1to(1)]cx]t7(u):prop4(1)
-x@[p:prop4(x)][f:[t:1to(pl"n"(x,1))]cx]
-t9:=lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)):lessis"n"(x,pl"n"(x,1))
-lf:=left(cx,pl"n"(x,1),x,t9,f):[t:1to(x)]cx
-t10:=satz278([t:cx][u:cx]ts(t,u),x,f):is(prod(pl"n"(x,1),f),ts(prod(x,lf),<xout(pl"n"(x,1))>f))
-[q:prop1(pl"n"(x,1),f)]
-t11:=tris1(cx,ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c,prod(pl"n"(x,1),f),t10,q):is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c)
-t12:=satz221c(prod(x,lf),<xout(pl"n"(x,1))>f,t11):or(is(prod(x,lf),0c),is(<xout(pl"n"(x,1))>f,0c))
-[i:is(prod(x,lf),0c)]
-t13:=th3"l.iff"(prop1(x,lf),prop2(x,lf),<lf>p,i):prop2(x,lf)
-[n:1to(x)][j:is(<n>lf,0c)]
-t14:=somei(1to(pl"n"(x,1)),[t:1to(pl"n"(x,1))]is(<t>f,0c),left1to(pl"n"(x,1),x,t9,n),j):prop2(pl"n"(x,1),f)
-i@t15:=someapp(1to(x),[t:1to(x)]is(<t>lf,0c),t13,prop2(pl"n"(x,1),f),[t:1to(x)][u:is(<t>lf,0c)]t14(t,u)):prop2(pl"n"(x,1),f)
-q@[i:is(<xout(pl"n"(x,1))>f,0c)]
-t16:=somei(1to(pl"n"(x,1)),[t:1to(pl"n"(x,1))]is(<t>f,0c),xout(pl"n"(x,1)),i):prop2(pl"n"(x,1),f)
-q@t17:=orapp(is(prod(x,lf),0c),is(<xout(pl"n"(x,1))>f,0c),prop2(pl"n"(x,1),f),t12,[t:is(prod(x,lf),0c)]t15(t),[t:is(<xout(pl"n"(x,1))>f,0c)]t16(t)):prop2(pl"n"(x,1),f)
-f@[q:prop2(pl"n"(x,1),f)][n:1to(pl"n"(x,1))][i:is(<n>f,0c)][j:is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1)))]
-t18:=tris1(cx,<xout(pl"n"(x,1))>f,0c,<n>f,isf(1to(pl"n"(x,1)),cx,f,n,xout(pl"n"(x,1)),j),i):is(<xout(pl"n"(x,1))>f,0c)
-t20:=satz221b(prod(x,lf),<xout(pl"n"(x,1))>f,t18):is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c)
-i@[m:not(is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1))))]
-n1:=inn(pl"n"(x,1),n):nat
-[j:is"n"(n1,pl"n"(x,1))]
-t21:=isoutni(pl"n"(x,1),n1,1top(pl"n"(x,1),n),pl"n"(x,1),lessisi3(pl"n"(x,1)),j):is"e"(1to(pl"n"(x,1)),outn(pl"n"(x,1),n1,1top(pl"n"(x,1),n)),xout(pl"n"(x,1)))
-t22:=tris(1to(pl"n"(x,1)),n,outn(pl"n"(x,1),n1,1top(pl"n"(x,1),n)),xout(pl"n"(x,1)),isoutinn(pl"n"(x,1),n),t21):is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1)))
-m@t23:=th3"l.imp"(is"n"(n1,pl"n"(x,1)),is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1))),m,[t:is"n"(n1,pl"n"(x,1))]t22(t)):nis"n"(n1,pl"n"(x,1))
-t24:=ore1(less"n"(n1,pl"n"(x,1)),is"n"(n1,pl"n"(x,1)),1top(pl"n"(x,1),n),t23):less"n"(n1,pl"n"(x,1))
-t25:=satz26(x,n1,t24):lessis"n"(n1,x)
-n2:=outn(x,n1,t25):1to(x)
-t26:=isinoutn(x,n1,t25):is"n"(n1,inn(x,n2))
-t27:=isoutni(pl"n"(x,1),n1,1top(pl"n"(x,1),n),inn(x,n2),trlessis"n"(inn(x,n2),x,pl"n"(x,1),1top(x,n2),t9),t26):is"e"(1to(pl"n"(x,1)),outn(pl"n"(x,1),n1,1top(pl"n"(x,1),n)),left1to(pl"n"(x,1),x,t9,n2))
-t28:=tris(1to(pl"n"(x,1)),n,outn(pl"n"(x,1),n1,1top(pl"n"(x,1),n)),left1to(pl"n"(x,1),x,t9,n2),isoutinn(pl"n"(x,1),n),t27):is"e"(1to(pl"n"(x,1)),n,left1to(pl"n"(x,1),x,t9,n2))
-t29:=isf(1to(pl"n"(x,1)),cx,f,n,left1to(pl"n"(x,1),x,t9,n2),t28):is(<n>f,<n2>lf)
-t30:=tris1(cx,<n2>lf,0c,<n>f,t29,i):is(<n2>lf,0c)
-t31:=somei(1to(x),[t:1to(x)]is(<t>lf,0c),n2,t30):prop2(x,lf)
-t32:=th4"l.iff"(prop1(x,lf),prop2(x,lf),<lf>p,t31):prop1(x,lf)
-t34:=satz221a(prod(x,lf),<xout(pl"n"(x,1))>f,t32):is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c)
-i@t35:=th1"l.imp"(is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1))),is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c),[t:is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1)))]t20(t),[t:not(is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1))))]t34(t)):is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c)
-t36:=tris(cx,prod(pl"n"(x,1),f),ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c,t10,t35):prop1(pl"n"(x,1),f)
-q@t37:=someapp(1to(pl"n"(x,1)),[t:1to(pl"n"(x,1))]is(<t>f,0c),q,prop1(pl"n"(x,1),f),[t:1to(pl"n"(x,1))][u:is(<t>f,0c)]t36(t,u)):prop1(pl"n"(x,1),f)
-f@t38:=iffi(prop1(pl"n"(x,1),f),prop2(pl"n"(x,1),f),[t:prop1(pl"n"(x,1),f)]t17(t),[t:prop2(pl"n"(x,1),f)]t37(t)):prop3(pl"n"(x,1),f)
-p@t39:=[u:[t:1to(pl"n"(x,1))]cx]t38(u):prop4(pl"n"(x,1))
-t40:=isp(nat,[t:nat]prop4(t),pl"n"(x,1),<x>suc,t39,satz4a(x)):prop4(<x>suc)
--8289
-satz289:=<f>induction([t:nat]prop4".8289"(t),t8".8289",[t:nat][u:prop4".8289"(t)]t40".8289"(t,u),x):iff(is(prod(x,f),0c),some"l"(1to(x),[t:1to(x)]is(<t>f,0c)))
-[i:is(prod(x,f),0c)]
-satz289a:=th3"l.iff"(prop1".8289",prop2".8289",satz289,i):some"l"(1to(x),[t:1to(x)]is(<t>f,0c))
-f@[n:1to(x)][i:is(<n>f,0c)]
-+*8289
-i"c"@t41:=somei(1to(x),[t:1to(x)]is(<t>f,0c),n,i):prop2
--8289
-i@satz289b:=th4"l.iff"(prop1".8289",prop2".8289",satz289,t41".8289"):is(prod(x,f),0c)
-@[x:complex][m:real][mi:intrl(m)][o:or(nis(x,0c),pos(m))]
-+v9
-[p:pos(m)]
-t1:=posintnatrl(m,p,mi):natrl(m)
-m1:=ntofrl(m,t1):nat
-pw1:=prod(m1,[t:1to(m1)]x):cx
--v9
-x@[y:complex][m:real][n:real][i:is(x,y)][j:is"r"(m,n)][mi1:intrl(m)][ni1:intrl(n)][ox:or(nis(x,0c),pos(m))][oy:or(nis(y,0c),pos(n))]
-+*v9
-oy@[mp:pos(m)][np:pos(n)]
-m0:=m1(x,m,mi1,ox,mp):nat
-n0:=m1(y,n,ni1,oy,np):nat
-t2:=isrlent(m,t1(x,m,mi1,ox,mp),n,t1(y,n,ni1,oy,np),j):is"n"(m0,n0)
-t3:=lessisi2"n"(m0,n0,t2):lessis"n"(m0,n0)
-t4:=issmpr([t:cx][u:cx]ts(t,u),n0,[t:1to(n0)]y,m0,t2):is(prod(m0,left(cx,n0,m0,t3,[t:1to(n0)]y)),pw1(y,n,ni1,oy,np))
-t5:=fisi(1to(m0),cx,[t:1to(m0)]x,left(cx,n0,m0,t3,[t:1to(n0)]y),[t:1to(m0)]i):is"e"([t:1to(m0)]cx,[t:1to(m0)]x,left(cx,n0,m0,t3,[t:1to(n0)]y))
-t6:=isf([t:1to(m0)]cx,cx,[u:[t:1to(m0)]cx]prod(m0,u),[t:1to(m0)]x,left(cx,n0,m0,t3,[t:1to(n0)]y),t5):is(pw1(x,m,mi1,ox,mp),prod(m0,left(cx,n0,m0,t3,[t:1to(n0)]y)))
-t7:=tris(cx,pw1(x,m,mi1,ox,mp),prod(m0,left(cx,n0,m0,t3,[t:1to(n0)]y)),pw1(y,n,ni1,oy,np),t6,t4):is(pw1(x,m,mi1,ox,mp),pw1(y,n,ni1,oy,np))
-p@[p1:pos(m)]
-t8:=t7(x,x,m,m,refis(cx,x),refis(real,m),mi,mi,o,o,p,p1):is(pw1(p),pw1(p1))
-p@[n:nis(x,0c)]
-t9:=th5"l.some"(1to(m1),[t:1to(m1)]is(<t>[u:1to(m1)]x,0c),[t:1to(m1)]n):not(some"l"(1to(m1),[t:1to(m1)]is(<t>[u:1to(m1)]x,0c)))
-t10:=th3"l.imp"(is(pw1,0c),some"l"(1to(m1),[t:1to(m1)]is(<t>[u:1to(m1)]x,0c)),t9,[t:is(pw1,0c)]satz289a(m1,[u:1to(m1)]x,t)):nis(pw1,0c)
-o@[n:neg(m)]
-mi@t11:=intabs(m,mi):intrl(abs(m))
-n@t12:=satz166b(m,n):pos(abs(m))
-t13:=ori2(nis(x,0c),pos(abs(m)),t12):or(nis(x,0c),pos(abs(m)))
-t14:=ore1(nis(x,0c),pos(m),o,nnotp(m,n)):nis(x,0c)
-t15:=t10(abs(m),t11,t13,t12,t14):nis(pw1(abs(m),t11,t13,t12),0c)
-pw2:=ov(1c,pw1(abs(m),t11,t13,t12),t15):cx
-oy@[nm:neg(m)][nn:neg(n)]
-pwm:=pw1(x,abs(m),t11(x,m,mi1),t13(x,m,mi1,ox,nm),t12(x,m,mi1,ox,nm)):cx
-pwn:=pw1(y,abs(n),t11(y,n,ni1),t13(y,n,ni1,oy,nn),t12(y,n,ni1,oy,nn)):cx
-t16:=t7(abs(m),abs(n),i,isabs(m,n,j),t11(x,m,mi1),t11(y,n,ni1),t13(x,m,mi1,ox,nm),t13(y,n,ni1,oy,nn),t12(x,m,mi1,ox,nm),t12(y,n,ni1,oy,nn)):is(pwm,pwn)
-t17:=isov2(pwm,pwn,1c,t16,t15(x,m,mi1,ox,nm),t15(y,n,ni1,oy,nn)):is(pw2(x,m,mi1,ox,nm),pw2(y,n,ni1,oy,nn))
-n@[n1:neg(m)]
-t18:=t17(x,x,m,m,refis(cx,x),refis(real,m),mi,mi,o,o,n,n1):is(pw2(n),pw2(n1))
-o@pw3:=ite"l.r"(neg(m),cx,[t:neg(m)]pw2(t),[t:not(neg(m))]1c,[t:neg(m)][u:neg(m)]t18(t,u),[t:not(neg(m))][u:not(neg(m))]refis(cx,1c)):cx
-n@t19:=itet"l.r"(neg(m),cx,[t:neg(m)]pw2(t),[t:not(neg(m))]1c,[t:neg(m)][u:neg(m)]t18(t,u),[t:not(neg(m))][u:not(neg(m))]refis(cx,1c),n):is(pw3,pw2(n))
-o@[nn:not(neg(m))]
-t20:=itef"l.r"(neg(m),cx,[t:neg(m)]pw2(t),[t:not(neg(m))]1c,[t:neg(m)][u:neg(m)]t18(t,u),[t:not(neg(m))][u:not(neg(m))]refis(cx,1c),nn):is(pw3,1c)
-nm@t21:=isp(real,[t:real]neg(t),m,n,nm,j):neg(n)
-t22:=t19(x,m,mi1,ox,nm):is(pw3(x,m,mi1,ox),pw2(x,m,mi1,ox,nm))
-t23:=symis(cx,pw3(y,n,ni1,oy),pw2(y,n,ni1,oy,t21),t19(y,n,ni1,oy,t21)):is(pw2(y,n,ni1,oy,t21),pw3(y,n,ni1,oy))
-t24:=tr3is(cx,pw3(x,m,mi1,ox),pw2(x,m,mi1,ox,nm),pw2(y,n,ni1,oy,t21),pw3(y,n,ni1,oy),t22,t17(t21),t23):is(pw3(x,m,mi1,ox),pw3(y,n,ni1,oy))
-oy@[nn:not(neg(m))]
-t25:=isp(real,[t:real]not(neg(t)),m,n,nn,j):not(neg(n))
-t26:=t20(x,m,mi1,ox,nn):is(pw3(x,m,mi1,ox),1c)
-t27:=t20(y,n,ni1,oy,t25):is(pw3(y,n,ni1,oy),1c)
-t28:=tris2(cx,pw3(x,m,mi1,ox),pw3(y,n,ni1,oy),1c,t26,t27):is(pw3(x,m,mi1,ox),pw3(y,n,ni1,oy))
-oy@t29:=th1"l.imp"(neg(m),is(pw3(x,m,mi1,ox),pw3(y,n,ni1,oy)),[t:neg(m)]t24(t),[t:not(neg(m))]t28(t)):is(pw3(x,m,mi1,ox),pw3(y,n,ni1,oy))
--v9
-o@pw:=ite"l.r"(pos(m),cx,[t:pos(m)]pw1".v9"(t),[t:not(pos(m))]pw3".v9",[t:pos(m)][u:pos(m)]t8".v9"(t,u),[t:not(pos(m))][u:not(pos(m))]refis(cx,pw3".v9")):cx
-+*v9
-p@t30:=itet"l.r"(pos(m),cx,[t:pos(m)]pw1(t),[t:not(pos(m))]pw3,[t:pos(m)][u:pos(m)]t8(t,u),[t:not(pos(m))][u:not(pos(m))]refis(cx,pw3),p):is(pw,pw1(p))
-o@[n:not(pos(m))]
-t31:=itef"l.r"(pos(m),cx,[t:pos(m)]pw1(t),[t:not(pos(m))]pw3,[t:pos(m)][u:pos(m)]t8(t,u),[t:not(pos(m))][u:not(pos(m))]refis(cx,pw3),n):is(pw,pw3)
-o@[i:is"r"(m,0)]
-t32:=tris(cx,pw,pw3,1c,t31(0notp(m,i)),t20(0notn(m,i))):is(pw,1c)
-o@[n:neg(m)]
-t33:=tris(cx,pw,pw3,pw2(n),t31(nnotp(m,n)),t19(n)):is(pw,pw2(n))
--v9
-o@[p:pos(m)]
-posexp:=t30".v9"(p):is(pw(x,m,mi,o),prod(ntofrl(m,posintnatrl(m,p,mi)),[t:1to(ntofrl(m,posintnatrl(m,p,mi)))]x))
-[n:nis(x,0c)]
-lemmapw1:=th2"e.notis"(cx,pw1".v9"(p),0c,pw,t10".v9"(p,n),posexp):nis(pw(x,m,mi,o),0c)
-o@[i:is"r"(m,0)]
-0exp:=t32".v9"(i):is(pw(x,m,mi,o),1c)
-o@[n:neg(m)]
-lemmapw2:=t14".v9"(n):nis(x,0c)
-lemmapw3:=t13".v9"(n):or(nis(x,0c),pos(abs(m)))
-+*v9
-n@t34:=t30(abs(m),t11,t13(n),t12(n)):is(pw(x,abs(m),t11,t13(n)),pw1(x,abs(m),t11,t13(n),t12(n)))
-t35:=isov2(pw(x,abs(m),t11,t13(n)),pw1(x,abs(m),t11,t13(n),t12(n)),1c,t34,lemmapw1(abs(m),t11,t13(n),t12(n),t14(n)),t15(n)):is(ov(1c,pw(x,abs(m),t11,t13(n)),lemmapw1(abs(m),t11,t13(n),t12(n),t14(n))),pw2(n))
--v9
-n@negexp:=tris2(cx,pw(x,m,mi,o),ov(1c,pw(x,abs(m),intabs(m,mi),lemmapw3),lemmapw1(x,abs(m),intabs(m,mi),lemmapw3,satz166b(m,n),lemmapw2)),pw2".v9"(n),t33".v9"(n),t35".v9"(n)):is(pw(x,m,mi,o),ov(1c,pw(x,abs(m),intabs(m,mi),lemmapw3),lemmapw1(x,abs(m),intabs(m,mi),lemmapw3,satz166b(m,n),lemmapw2)))
-+*v9
-mp@t36:=isp(real,[t:real]pos(t),m,n,mp,j):pos(n)
-t37:=t30(x,m,mi1,ox,mp):is(pw(x,m,mi1,ox),pw1(x,m,mi1,ox,mp))
-t38:=symis(cx,pw(y,n,ni1,oy),pw1(y,n,ni1,oy,t36),t30(y,n,ni1,oy,t36)):is(pw1(y,n,ni1,oy,t36),pw(y,n,ni1,oy))
-t39:=tr3is(cx,pw(x,m,mi1,ox),pw1(x,m,mi1,ox,mp),pw1(y,n,ni1,oy,t36),pw(y,n,ni1,oy),t37,t7(t36),t38):is(pw(x,m,mi1,ox),pw(y,n,ni1,oy))
-oy@[np:not(pos(m))]
-t40:=isp(real,[t:real]not(pos(t)),m,n,np,j):not(pos(n))
-t41:=t31(x,m,mi1,ox,np):is(pw(x,m,mi1,ox),pw3(x,m,mi1,ox))
-t42:=symis(cx,pw(y,n,ni1,oy),pw3(y,n,ni1,oy),t31(y,n,ni1,oy,t40)):is(pw3(y,n,ni1,oy),pw(y,n,ni1,oy))
-t43:=tr3is(cx,pw(x,m,mi1,ox),pw3(x,m,mi1,ox),pw3(y,n,ni1,oy),pw(y,n,ni1,oy),t41,t29,t42):is(pw(x,m,mi1,ox),pw(y,n,ni1,oy))
--v9
-oy@ispw12:=th1"l.imp"(pos(m),is(pw(x,m,mi1,ox),pw(y,n,ni1,oy)),[t:pos(m)]t39".v9"(t),[t:not(pos(m))]t43".v9"(t)):is(pw(x,m,mi1,ox),pw(y,n,ni1,oy))
-m@[i:is(x,y)][mi:intrl(m)][ox:or(nis(x,0c),pos(m))][oy:or(nis(y,0c),pos(m))]
-ispw1:=ispw12(x,y,m,m,i,refis(real,m),mi,mi,ox,oy):is(pw(x,m,mi,ox),pw(y,m,mi,oy))
-x@[m:real][n:real][i:is"r"(m,n)][mi:intrl(m)][ni:intrl(n)][om:or(nis(x,0c),pos(m))][on:or(nis(x,0c),pos(n))]
-ispw2:=ispw12(x,x,m,n,refis(cx,x),i,mi,ni,om,on):is(pw(x,m,mi,om),pw(x,n,ni,on))
-o@[n:nis(x,0c)]
-+9290
-[p:pos(m)]
-t1:=lemmapw1(p,n):nis(pw(x,m,mi,o),0c)
-@[i:is(1c,0c)]
-t2:=tr3is(real,1rl,re(1c),re(0c),0,isre(1rl,0),iscere(1c,0c,i),reis(0,0)):is"r"(1rl,0)
--9290
-@1not0:=th3"l.imp"(is(1c,0c),is"r"(1rl,0),pnot0(1rl,pos1),[t:is(1c,0c)]t2".9290"(t)):nis(1c,0c)
-+*9290
-n@[i:is"r"(m,0)]
-t4:=th2"e.notis"(cx,1c,0c,pw(x,m,mi,o),1not0,0exp(i)):nis(pw(x,m,mi,o),0c)
-n@[nm:neg(m)]
-p0:=pw(x,abs(m),intabs(m,mi),lemmapw3(nm)):cx
-t5:=lemmapw1(x,abs(m),intabs(m,mi),lemmapw3(nm),satz166b(m,nm),lemmapw2(nm)):nis(p0,0c)
-t6:=tris(cx,ts(pw(x,m,mi,o),p0),ts(ov(1c,p0,t5),p0),1c,ists1(pw(x,m,mi,o),ov(1c,p0,t5),p0,negexp(nm)),satz229e(1c,p0,t5)):is(ts(pw(x,m,mi,o),p0),1c)
-t7:=th2"e.notis"(cx,1c,0c,ts(pw(x,m,mi,o),p0),1not0,t6):nis(ts(pw(x,m,mi,o),p0),0c)
-t8:=th3"l.imp"(is(pw(x,m,mi,o),0c),is(ts(pw(x,m,mi,o),p0),0c),t7,[t:is(pw(x,m,mi,o),0c)]satz221a(pw(x,m,mi,o),p0,t)):nis(pw(x,m,mi,o),0c)
--9290
-n@satz290:=rapp(m,nis(pw(x,m,mi,o),0c),[t:pos(m)]t1".9290"(t),[t:is"r"(m,0)]t4".9290"(t),[t:neg(m)]t8".9290"(t)):nis(pw(x,m,mi,o),0c)
-x@lemma291:=ori2(nis(x,0c),pos(1rl),pos1):or(nis(x,0c),pos(1rl))
-+9291
-1a:=ntofrl(1rl,posintnatrl(1rl,pos1,intrl1)):nat
-t1:=posexp(x,1rl,intrl1,lemma291,pos1):is(pw(x,1rl,intrl1,lemma291),prod(1a,[t:1to(1a)]x))
-t2:=tris(nat,1,ntofrl(1rl,natrl1),ntofrl(1rl,posintnatrl(1rl,pos1,intrl1)),isntrl1(1),isrlent(1rl,natrl1,1rl,posintnatrl(1rl,pos1,intrl1),refis(real,1rl))):is"n"(1,1a)
-t3:=lessisi2"n"(1,1a,t2):lessis"n"(1,1a)
-t4:=issmpr([t:cx][u:cx]ts(t,u),1a,[t:1to(1a)]x,1,t2):is(prod(1,left(cx,1a,1,t3,[t:1to(1a)]x)),prod(1a,[t:1to(1a)]x))
-t5:=satz277([t:cx][u:cx]ts(t,u),left(cx,1a,1,t3,[t:1to(1a)]x)):is(prod(1,left(cx,1a,1,t3,[t:1to(1a)]x)),x)
-t6:=tris1(cx,prod(1a,[t:1to(1a)]x),x,prod(1,left(cx,1a,1,t3,[t:1to(1a)]x)),t4,t5):is(prod(1a,[t:1to(1a)]x),x)
--9291
-satz291:=tris(cx,pw(x,1rl,intrl1,lemma291),prod(1a".9291",[t:1to(1a".9291")]x),x,t1".9291",t6".9291"):is(pw(x,1rl,intrl1,lemma291),x)
-[y:cx][m:real][mi:intrl(m)][o:or(and(nis(x,0c),nis(y,0c)),pos(m))]
-+9292
-[a:and(nis(x,0c),nis(y,0c))]
-t1:=ande1(nis(x,0c),nis(y,0c),a):nis(x,0c)
-t2:=ande2(nis(x,0c),nis(y,0c),a):nis(y,0c)
-t3:=satz221d(x,y,t1,t2):nis(ts(x,y),0c)
--9292
-lemma292a:=th7"l.or"(and(nis(x,0c),nis(y,0c)),pos(m),nis(x,0c),o,[t:and(nis(x,0c),nis(y,0c))]t1".9292"(t)):or(nis(x,0c),pos(m))
-lemma292b:=th7"l.or"(and(nis(x,0c),nis(y,0c)),pos(m),nis(y,0c),o,[t:and(nis(x,0c),nis(y,0c))]t2".9292"(t)):or(nis(y,0c),pos(m))
-lemma292c:=th7"l.or"(and(nis(x,0c),nis(y,0c)),pos(m),nis(ts(x,y),0c),o,[t:and(nis(x,0c),nis(y,0c))]t3".9292"(t)):or(nis(ts(x,y),0c),pos(m))
-+*9292
-x@[n:nat]
-nr:=rlofnt(n):real
-t4:=natintrl(nr,natrli(n)):intrl(nr)
-t5:=ori2(nis(x,0c),pos(nr),natpos(nr,natrli(n))):or(nis(x,0c),pos(nr))
-p0:=pw(x,nr,t4,t5):cx
-x@t6:=tris(cx,p0(1),pw(x,1rl,intrl1,lemma291(x)),x,ispw1(x,x,1rl,refis(cx,x),intrl1,t5(1),lemma291(x)),satz291(x)):is(p0(1),x)
-n@n0:=ntofrl(nr,posintnatrl(nr,natpos(nr,natrli(n)),t4)):nat
-t7:=tris(nat,n,ntofrl(nr,natrli(n)),n0,isntrl1(n),isrlent(nr,natrli(n),nr,posintnatrl(nr,natpos(nr,natrli(n)),t4),refis(real,nr))):is"n"(n,n0)
-t8:=lessisi2"n"(n,n0,t7):lessis"n"(n,n0)
-t9:=posexp(x,nr,t4,t5,natpos(nr,natrli(n))):is(p0,prod(n0,[t:1to(n0)]x))
-t10:=issmpr([t:cx][u:cx]ts(t,u),n0,[t:1to(n0)]x,n,t7):is(prod(n,left(cx,n0,n,t8,[t:1to(n0)]x)),prod(n0,[t:1to(n0)]x))
-t11:=tris2(cx,p0,prod(n,[t:1to(n)]x),prod(n0,[t:1to(n0)]x),t9,t10):is(p0,prod(n,[t:1to(n)]x))
-n1:=pl"n"(n,1):nat
-t12:=lessisi1"n"(n,n1,satz18a(n,1)):lessis"n"(n,n1)
-t13:=satz278([t:cx][u:cx]ts(t,u),n,[t:1to(n1)]x):is(prod(n1,[t:1to(n1)]x),ts(prod(n,left(cx,n1,n,t12,[t:1to(n1)]x)),x))
-t14:=ists1(p0,prod(n,[t:1to(n)]x),x,t11):is(ts(p0,x),ts(prod(n,[t:1to(n)]x),x))
-t15:=tris2(cx,prod(n1,[t:1to(n1)]x),ts(p0,x),ts(prod(n,[t:1to(n)]x),x),t13,t14):is(prod(n1,[t:1to(n1)]x),ts(p0,x))
-t16:=tris(cx,p0(n1),prod(n1,[t:1to(n1)]x),ts(p0,x),t11(n1),t15):is(p0(n1),ts(p0(n),x))
-y@[n:nat]
-prop1:=is(p0(ts(x,y),n),ts(p0(x,n),p0(y,n))):'prop'
-y@t17:=ists12(p0(x,1),x,p0(y,1),y,t6(x),t6(y)):is(ts(p0(x,1),p0(y,1)),ts(x,y))
-t18:=tris2(cx,p0(ts(x,y),1),ts(p0(x,1),p0(y,1)),ts(x,y),t6(ts(x,y)),t17):prop1(1)
-n@[p:prop1(n)]
-t19:=ists1(p0(ts(x,y),n),ts(p0(x,n),p0(y,n)),ts(x,y),p):is(ts(p0(ts(x,y),n),ts(x,y)),ts(ts(p0(x,n),p0(y,n)),ts(x,y)))
-t20:=tr3is(cx,ts(ts(p0(x,n),p0(y,n)),x),ts(p0(x,n),ts(p0(y,n),x)),ts(p0(x,n),ts(x,p0(y,n))),ts(ts(p0(x,n),x),p0(y,n)),assts1(p0(x,n),p0(y,n),x),ists2(ts(p0(y,n),x),ts(x,p0(y,n)),p0(x,n),comts(p0(y,n),x)),assts2(p0(x,n),x,p0(y,n))):is(ts(ts(p0(x,n),p0(y,n)),x),ts(ts(p0(x,n),x),p0(y,n)))
-t21:=tr3is(cx,ts(ts(p0(x,n),p0(y,n)),ts(x,y)),ts(ts(ts(p0(x,n),p0(y,n)),x),y),ts(ts(ts(p0(x,n),x),p0(y,n)),y),ts(ts(p0(x,n),x),ts(p0(y,n),y)),assts2(ts(p0(x,n),p0(y,n)),x,y),ists1(ts(ts(p0(x,n),p0(y,n)),x),ts(ts(p0(x,n),x),p0(y,n)),y,t20),assts1(ts(p0(x,n),x),p0(y,n),y)):is(ts(ts(p0(x,n),p0(y,n)),ts(x,y)),ts(ts(p0(x,n),x),ts(p0(y,n),y)))
-t22:=tr3is(cx,p0(ts(x,y),n1(n)),ts(p0(ts(x,y),n),ts(x,y)),ts(ts(p0(x,n),p0(y,n)),ts(x,y)),ts(ts(p0(x,n),x),ts(p0(y,n),y)),t16(ts(x,y),n),t19,t21):is(p0(ts(x,y),n1(n)),ts(ts(p0(x,n),x),ts(p0(y,n),y)))
-t23:=ists12(p0(x,n1(n)),ts(p0(x,n),x),p0(y,n1(n)),ts(p0(y,n),y),t16(x,n),t16(y,n)):is(ts(p0(x,n1(n)),p0(y,n1(n))),ts(ts(p0(x,n),x),ts(p0(y,n),y)))
-t24:=tris2(cx,p0(ts(x,y),n1(n)),ts(p0(x,n1(n)),p0(y,n1(n))),ts(ts(p0(x,n),x),ts(p0(y,n),y)),t22,t23):prop1(n1(n))
-t25:=isp(nat,[t:nat]prop1(t),n1(n),<n>suc,t24,satz4a(n)):prop1(<n>suc)
-n@t26:=induction([t:nat]prop1(t),t18,[t:nat][u:prop1(t)]t25(t,u),n):prop1
-o@prop2:=is(pw(ts(x,y),m,mi,lemma292c),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b))):'prop'
-[p:pos(m)]
-t28:=posintnatrl(m,p,mi):natrl(m)
-m0:=ntofrl(m,t28):nat
-t29:=isrlnt1(m,t28):is"r"(m,nr(m0))
-t30:=isrlnt2(m,t28):is"r"(nr(m0),m)
-t31:=ispw2(ts(x,y),m,nr(m0),t29,mi,t4(ts(x,y),m0),lemma292c,t5(ts(x,y),m0)):is(pw(ts(x,y),m,mi,lemma292c),p0(ts(x,y),m0))
-t32:=ists12(p0(x,m0),pw(x,m,mi,lemma292a),p0(y,m0),pw(y,m,mi,lemma292b),ispw2(x,nr(m0),m,t30,t4(x,m0),mi,t5(x,m0),lemma292a),ispw2(y,nr(m0),m,t30,t4(y,m0),mi,t5(y,m0),lemma292b)):is(ts(p0(x,m0),p0(y,m0)),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)))
-t33:=tr3is(cx,pw(ts(x,y),m,mi,lemma292c),p0(ts(x,y),m0),ts(p0(x,m0),p0(y,m0)),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),t31,t26(m0),t32):prop2
-o@[i:is"r"(m,0)]
-t34:=tris(cx,ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ts(1c,1c),1c,ists12(pw(x,m,mi,lemma292a),1c,pw(y,m,mi,lemma292b),1c,0exp(x,m,mi,lemma292a,i),0exp(y,m,mi,lemma292b,i)),satz222(1c)):is(ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),1c)
-t35:=tris2(cx,pw(ts(x,y),m,mi,lemma292c),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),1c,0exp(ts(x,y),m,mi,lemma292c,i),t34):prop2
-o@[n:neg(m)]
-t36:=intabs(m,mi):intrl(abs(m))
-t37:=ori2(and(nis(x,0c),nis(y,0c)),pos(abs(m)),satz166b(m,n)):or(and(nis(x,0c),nis(y,0c)),pos(abs(m)))
-t38:=lemma292a(abs(m),t36,t37):or(nis(x,0c),pos(abs(m)))
-t39:=lemma292b(abs(m),t36,t37):or(nis(y,0c),pos(abs(m)))
-t40:=lemma292c(abs(m),t36,t37):or(nis(ts(x,y),0c),pos(abs(m)))
-t41:=lemmapw3(x,m,mi,lemma292a,n):or(nis(x,0c),pos(abs(m)))
-t42:=lemmapw3(y,m,mi,lemma292b,n):or(nis(y,0c),pos(abs(m)))
-t43:=lemmapw3(ts(x,y),m,mi,lemma292c,n):or(nis(ts(x,y),0c),pos(abs(m)))
-t44:=ispw2(ts(x,y),abs(m),abs(m),refis(real,abs(m)),t36,t36,t43,t40):is(pw(ts(x,y),abs(m),t36,t43),pw(ts(x,y),abs(m),t36,t40))
-t45:=t33(abs(m),t36,t37,satz166b(m,n)):is(pw(ts(x,y),abs(m),t36,t40),ts(pw(x,abs(m),t36,t38),pw(y,abs(m),t36,t39)))
-t46:=ists12(pw(x,abs(m),t36,t38),pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t39),pw(y,abs(m),t36,t42),ispw2(x,abs(m),abs(m),refis(real,abs(m)),t36,t36,t38,t41),ispw2(y,abs(m),abs(m),refis(real,abs(m)),t36,t36,t39,t42)):is(ts(pw(x,abs(m),t36,t38),pw(y,abs(m),t36,t39)),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)))
-t47:=tr3is(cx,pw(ts(x,y),abs(m),t36,t43),pw(ts(x,y),abs(m),t36,t40),ts(pw(x,abs(m),t36,t38),pw(y,abs(m),t36,t39)),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t44,t45,t46):is(pw(ts(x,y),abs(m),t36,t43),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)))
-t48:=lemmapw1(x,abs(m),t36,t41,satz166b(m,n),lemmapw2(x,m,mi,lemma292a,n)):nis(pw(x,abs(m),t36,t41),0c)
-t49:=lemmapw1(y,abs(m),t36,t42,satz166b(m,n),lemmapw2(y,m,mi,lemma292b,n)):nis(pw(y,abs(m),t36,t42),0c)
-t50:=lemmapw1(ts(x,y),abs(m),t36,t43,satz166b(m,n),lemmapw2(ts(x,y),m,mi,lemma292c,n)):nis(pw(ts(x,y),abs(m),t36,t43),0c)
-t51:=satz221d(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42),t48,t49):nis(ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),0c)
-t52:=negexp(ts(x,y),m,mi,lemma292c,n):is(pw(ts(x,y),m,mi,lemma292c),ov(1c,pw(ts(x,y),abs(m),t36,t43),t50))
-t53:=isov12(1c,ts(1c,1c),pw(ts(x,y),abs(m),t36,t43),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),satz222a(1c),t47,t50,t51):is(ov(1c,pw(ts(x,y),abs(m),t36,t43),t50),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51))
-t54:=tris(cx,pw(ts(x,y),m,mi,lemma292c),ov(1c,pw(ts(x,y),abs(m),t36,t43),t50),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51),t52,t53):is(pw(ts(x,y),m,mi,lemma292c),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51))
-t55:=ists12(pw(x,m,mi,lemma292a),ov(1c,pw(x,abs(m),t36,t41),t48),pw(y,m,mi,lemma292b),ov(1c,pw(y,abs(m),t36,t42),t49),negexp(x,m,mi,lemma292a,n),negexp(y,m,mi,lemma292b,n)):is(ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ts(ov(1c,pw(x,abs(m),t36,t41),t48),ov(1c,pw(y,abs(m),t36,t42),t49)))
-t56:=satz247(1c,pw(x,abs(m),t36,t41),1c,pw(y,abs(m),t36,t42),t48,t49):is(ts(ov(1c,pw(x,abs(m),t36,t41),t48),ov(1c,pw(y,abs(m),t36,t42),t49)),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51))
-t57:=tris(cx,ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ts(ov(1c,pw(x,abs(m),t36,t41),t48),ov(1c,pw(y,abs(m),t36,t42),t49)),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51),t55,t56):is(ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51))
-t58:=tris2(cx,pw(ts(x,y),m,mi,lemma292c),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51),t54,t57):prop2
--9292
-o@satz292:=rapp(m,prop2".9292",[t:pos(m)]t33".9292"(t),[t:is"r"(m,0)]t35".9292"(t),[t:neg(m)]t58".9292"(t)):is(pw(ts(x,y),m,mi,lemma292c),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)))
-@[m:real]
-lemma293:=ori1(nis(1c,0c),pos(m),1not0):or(nis(1c,0c),pos(m))
-[mi:intrl(m)]
-+9293
-t1:=ori1(and(nis(1c,0c),nis(1c,0c)),pos(m),andi(nis(1c,0c),nis(1c,0c),1not0,1not0)):or(and(nis(1c,0c),nis(1c,0c)),pos(m))
-1m:=pw(1c,m,mi,lemma293):cx
-t2:=satz222(1m):is(ts(1m,1c),1m)
-t3:=ispw1(1c,ts(1c,1c),m,satz222a(1c),mi,lemma293,lemma292c(1c,1c,m,mi,t1)):is(1m,pw(ts(1c,1c),m,mi,lemma292c(1c,1c,m,mi,t1)))
-t4:=satz292(1c,1c,m,mi,t1):is(pw(ts(1c,1c),m,mi,lemma292c(1c,1c,m,mi,t1)),ts(pw(1c,m,mi,lemma292a(1c,1c,m,mi,t1)),pw(1c,m,mi,lemma292b(1c,1c,m,mi,t1))))
-t5:=ists12(pw(1c,m,mi,lemma292a(1c,1c,m,mi,t1)),1m,pw(1c,m,mi,lemma292b(1c,1c,m,mi,t1)),1m,ispw1(1c,1c,m,refis(cx,1c),mi,lemma292a(1c,1c,m,mi,t1),lemma293),ispw1(1c,1c,m,refis(cx,1c),mi,lemma292b(1c,1c,m,mi,t1),lemma293)):is(ts(pw(1c,m,mi,lemma292a(1c,1c,m,mi,t1)),pw(1c,m,mi,lemma292b(1c,1c,m,mi,t1))),ts(1m,1m))
-t6:=tr4is(cx,ts(1m,1c),1m,pw(ts(1c,1c),m,mi,lemma292c(1c,1c,m,mi,t1)),ts(pw(1c,m,mi,lemma292a(1c,1c,m,mi,t1)),pw(1c,m,mi,lemma292b(1c,1c,m,mi,t1))),ts(1m,1m),t2,t3,t4,t5):is(ts(1m,1c),ts(1m,1m))
-t7:=tris(cx,ts(1m,mn(1m,1c)),mn(ts(1m,1m),ts(1m,1c)),0c,disttm2(1m,1m,1c),satz213b(ts(1m,1m),ts(1m,1c),symis(cx,ts(1m,1c),ts(1m,1m),t6))):is(ts(1m,mn(1m,1c)),0c)
-t8:=ore2(is(1m,0c),is(mn(1m,1c),0c),satz221c(1m,mn(1m,1c),t7),satz290(1c,m,mi,lemma293,1not0)):is(mn(1m,1c),0c)
--9293
-satz293:=satz213a(1m".9293",1c,t8".9293"):is(pw(1c,m,mi,lemma293),1c)
-x@[m:real][n:real][mi:intrl(m)][ni:intrl(n)][o:or(nis(x,0c),and(pos(m),pos(n)))]
-+9294
-[a:and(pos(m),pos(n))]
-t1:=ande1(pos(m),pos(n),a):pos(m)
-t2:=ande2(pos(m),pos(n),a):pos(n)
-t3:=pospl(m,n,t1,t2):pos(pl"r"(m,n))
--9294
-lemma294a:=th8"l.or"(nis(x,0c),and(pos(m),pos(n)),pos(m),o,[t:and(pos(m),pos(n))]t1".9294"(t)):or(nis(x,0c),pos(m))
-lemma294b:=th8"l.or"(nis(x,0c),and(pos(m),pos(n)),pos(n),o,[t:and(pos(m),pos(n))]t2".9294"(t)):or(nis(x,0c),pos(n))
-lemma294c:=th8"l.or"(nis(x,0c),and(pos(m),pos(n)),pos(pl"r"(m,n)),o,[t:and(pos(m),pos(n))]t3".9294"(t)):or(nis(x,0c),pos(pl"r"(m,n)))
-+*9294
-o@prop1:=is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c)):'prop'
-a@m1:=ntofrl(m,posintnatrl(m,t1,mi)):nat
-n1:=ntofrl(n,posintnatrl(n,t2,ni)):nat
-t4:=ists12(pw(x,m,mi,lemma294a),prod(m1,[t:1to(m1)]x),pw(x,n,ni,lemma294b),prod(n1,[t:1to(n1)]x),posexp(x,m,mi,lemma294a,t1),posexp(x,n,ni,lemma294b,t2)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(prod(m1,[t:1to(m1)]x),prod(n1,[t:1to(n1)]x)))
-p1:=ntofrl(pl"r"(m,n),posintnatrl(pl"r"(m,n),t3,intpl(m,mi,n,ni))):nat
-t5:=posexp(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t3):is(pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),prod(p1,[t:1to(p1)]x))
-t6:=tris(real,pl"r"(m,n),pl"r"(rlofnt(m1),rlofnt(n1)),rlofnt(pl"n"(m1,n1)),ispl12"r"(m,rlofnt(m1),n,rlofnt(n1),isrlnt1(m,posintnatrl(m,t1,mi)),isrlnt1(n,posintnatrl(n,t2,ni))),satzr155b(m1,n1)):is"r"(pl"r"(m,n),rlofnt(pl"n"(m1,n1)))
-t7:=tris2(nat,pl"n"(m1,n1),p1,ntofrl(rlofnt(pl"n"(m1,n1)),natrli(pl"n"(m1,n1))),isntrl1(pl"n"(m1,n1)),isrlent(pl"r"(m,n),posintnatrl(pl"r"(m,n),t3,intpl(m,mi,n,ni)),rlofnt(pl"n"(m1,n1)),natrli(pl"n"(m1,n1)),t6)):is"n"(pl"n"(m1,n1),p1)
-t8:=lessisi2"n"(pl"n"(m1,n1),p1,t7):lessis"n"(pl"n"(m1,n1),p1)
-t9:=issmpr([t:cx][u:cx]ts(t,u),p1,[t:1to(p1)]x,pl"n"(m1,n1),t7):is(prod(pl"n"(m1,n1),left(cx,p1,pl"n"(m1,n1),t8,[t:1to(p1)]x)),prod(p1,[t:1to(p1)]x))
-t10:=tris2(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),prod(pl"n"(m1,n1),[t:1to(pl"n"(m1,n1))]x),prod(p1,[t:1to(p1)]x),t5,t9):is(pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),prod(pl"n"(m1,n1),[t:1to(pl"n"(m1,n1))]x))
-t11:=lessisi1"n"(m1,pl"n"(m1,n1),satz18a(m1,n1)):lessis"n"(m1,pl"n"(m1,n1))
-t12:=satz281([t:cx][u:cx]ts(t,u),assocts,m1,n1,[t:1to(pl"n"(m1,n1))]x):is(prod(pl"n"(m1,n1),[t:1to(pl"n"(m1,n1))]x),ts(prod(m1,left(cx,pl"n"(m1,n1),m1,t11,[t:1to(pl"n"(m1,n1))]x)),prod(n1,right(cx,m1,n1,[t:1to(pl"n"(m1,n1))]x))))
-t13:=tris(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),prod(pl"n"(m1,n1),[t:1to(pl"n"(m1,n1))]x),ts(prod(m1,[t:1to(m1)]x),prod(n1,[t:1to(n1)]x)),t10,t12):is(pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),ts(prod(m1,[t:1to(m1)]x),prod(n1,[t:1to(n1)]x)))
-t14:=tris2(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),ts(prod(m1,[t:1to(m1)]x),prod(n1,[t:1to(n1)]x)),t4,t13):prop1
-o@[na:not(and(pos(m),pos(n)))]
-t15:=ore1(nis(x,0c),and(pos(m),pos(n)),o,na):nis(x,0c)
-t16:=th15"l.or"(pos(m),pos(n),na):or(not(pos(m)),not(pos(n)))
-o@am:=abs(m):real
-an:=abs(n):real
-ap:=abs(pl"r"(m,n)):real
-t17:=intabs(m,mi):intrl(am)
-t18:=intabs(n,ni):intrl(an)
-t19:=intabs(pl"r"(m,n),intpl(m,mi,n,ni)):intrl(ap)
-na@[nm:neg(m)][nn:neg(n)]
-t20:=andi(pos(am),pos(an),satz166e(m,nnot0(m,nm)),satz166e(n,nnot0(n,nn))):and(pos(am),pos(an))
-t21:=ori2(nis(x,0c),and(pos(am),pos(an)),t20):or(nis(x,0c),and(pos(am),pos(an)))
-t22:=lemmapw3(x,m,mi,lemma294a,nm):or(nis(x,0c),pos(am))
-t23:=lemmapw3(x,n,ni,lemma294b,nn):or(nis(x,0c),pos(an))
-t24:=lemma294a(x,am,an,t17,t18,t21):or(nis(x,0c),pos(am))
-t25:=lemma294b(x,am,an,t17,t18,t21):or(nis(x,0c),pos(an))
-t26:=ists12(pw(x,am,t17,t22),pw(x,am,t17,t24),pw(x,an,t18,t23),pw(x,an,t18,t25),ispw1(x,x,am,refis(cx,x),t17,t22,t24),ispw1(x,x,an,refis(cx,x),t18,t23,t25)):is(ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),ts(pw(x,am,t17,t24),pw(x,an,t18,t25)))
-t27:=lemma294c(x,am,an,t17,t18,t21):or(nis(x,0c),pos(pl"r"(am,an)))
-t28:=t14(x,am,an,t17,t18,t21,t20):is(ts(pw(x,am,t17,t24),pw(x,an,t18,t25)),pw(x,pl"r"(am,an),intpl(am,t17,an,t18),t27))
-t29:=tr3is(real,pl"r"(am,an),pl"r"(m0"r"(m),m0"r"(n)),m0"r"(pl"r"(m,n)),ap,ispl12"r"(am,m0"r"(m),an,m0"r"(n),absn(m,nm),absn(n,nn)),satz180a(m,n),symis(real,ap,m0"r"(pl"r"(m,n)),absn(pl"r"(m,n),negpl(m,n,nm,nn)))):is"r"(pl"r"(am,an),ap)
-t30:=lemmapw3(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,negpl(m,n,nm,nn)):or(nis(x,0c),pos(ap))
-t31:=ispw2(x,pl"r"(am,an),ap,t29,intpl(am,t17,an,t18),t19,t27,t30):is(pw(x,pl"r"(am,an),intpl(am,t17,an,t18),t27),pw(x,ap,t19,t30))
-t32:=tr3is(cx,ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),ts(pw(x,am,t17,t24),pw(x,an,t18,t25)),pw(x,pl"r"(am,an),intpl(am,t17,an,t18),t27),pw(x,ap,t19,t30),t26,t28,t31):is(ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),pw(x,ap,t19,t30))
-t33:=lemmapw1(x,am,t17,t22,satz166b(m,nm),lemmapw2(x,m,mi,lemma294a,nm)):nis(pw(x,am,t17,t22),0c)
-t34:=lemmapw1(x,an,t18,t23,satz166b(n,nn),lemmapw2(x,n,ni,lemma294b,nn)):nis(pw(x,an,t18,t23),0c)
-t35:=lemmapw1(x,ap,t19,t30,satz166b(pl"r"(m,n),negpl(m,n,nm,nn)),lemmapw2(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,negpl(m,n,nm,nn))):nis(pw(x,ap,t19,t30),0c)
-t36:=ists12(pw(x,m,mi,lemma294a),ov(1c,pw(x,am,t17,t22),t33),pw(x,n,ni,lemma294b),ov(1c,pw(x,an,t18,t23),t34),negexp(x,m,mi,lemma294a,nm),negexp(x,n,ni,lemma294b,nn)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(ov(1c,pw(x,am,t17,t22),t33),ov(1c,pw(x,an,t18,t23),t34)))
-t37:=satz221d(pw(x,am,t17,t22),pw(x,an,t18,t23),t33,t34):nis(ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),0c)
-t38:=satz247(1c,pw(x,am,t17,t22),1c,pw(x,an,t18,t23),t33,t34):is(ts(ov(1c,pw(x,am,t17,t22),t33),ov(1c,pw(x,an,t18,t23),t34)),ov(ts(1c,1c),ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),t37))
-t39:=isov12(ts(1c,1c),1c,ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),pw(x,ap,t19,t30),satz222(1c),t32,t37,t35):is(ov(ts(1c,1c),ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),t37),ov(1c,pw(x,ap,t19,t30),t35))
-t40:=symis(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),ov(1c,pw(x,ap,t19,t30),t35),negexp(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,negpl(m,n,nm,nn))):is(ov(1c,pw(x,ap,t19,t30),t35),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-t41:=tr4is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(ov(1c,pw(x,am,t17,t22),t33),ov(1c,pw(x,an,t18,t23),t34)),ov(ts(1c,1c),ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),t37),ov(1c,pw(x,ap,t19,t30),t35),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t36,t38,t39,t40):prop1
-na@[pm:pos(m)][nn:neg(n)]
-t42:=lemmapw3(x,n,ni,lemma294b,nn):or(nis(x,0c),pos(an))
-t43:=lemmapw1(x,an,t18,t42,satz166b(n,nn),lemmapw2(x,n,ni,lemma294b,nn)):nis(pw(x,an,t18,t42),0c)
-t44:=ists2(pw(x,n,ni,lemma294b),ov(1c,pw(x,an,t18,t42),t43),pw(x,m,mi,lemma294a),negexp(x,n,ni,lemma294b,nn)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,lemma294a),ov(1c,pw(x,an,t18,t42),t43)))
-t45:=satz244a(pw(x,m,mi,lemma294a),1c,pw(x,an,t18,t42),t43):is(ts(pw(x,m,mi,lemma294a),ov(1c,pw(x,an,t18,t42),t43)),ov(ts(pw(x,m,mi,lemma294a),1c),pw(x,an,t18,t42),t43))
-t46:=isov1(ts(pw(x,m,mi,lemma294a),1c),pw(x,m,mi,lemma294a),pw(x,an,t18,t42),satz222(pw(x,m,mi,lemma294a)),t43):is(ov(ts(pw(x,m,mi,lemma294a),1c),pw(x,an,t18,t42),t43),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43))
-t47:=tr3is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,lemma294a),ov(1c,pw(x,an,t18,t42),t43)),ov(ts(pw(x,m,mi,lemma294a),1c),pw(x,an,t18,t42),t43),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),t44,t45,t46):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43))
-[casea:more(m,an)]
-t48:=satz182d(m,an,casea):pos(mn"r"(m,an))
-t49:=satz166e(n,nnot0(n,nn)):pos(an)
-t50:=andi(pos(an),pos(mn"r"(m,an)),t49,t48):and(pos(an),pos(mn"r"(m,an)))
-t51:=ori2(nis(x,0c),and(pos(an),pos(mn"r"(m,an))),t50):or(nis(x,0c),and(pos(an),pos(mn"r"(m,an))))
-t52:=intmn(m,mi,an,t18):intrl(mn"r"(m,an))
-t53:=lemma294a(x,an,mn"r"(m,an),t18,t52,t51):or(nis(x,0c),pos(an))
-t54:=lemma294b(x,an,mn"r"(m,an),t18,t52,t51):or(nis(x,0c),pos(mn"r"(m,an)))
-t55:=lemma294c(x,an,mn"r"(m,an),t18,t52,t51):or(nis(x,0c),pos(pl"r"(an,mn"r"(m,an))))
-t56:=intpl(an,t18,mn"r"(m,an),t52):intrl(pl"r"(an,mn"r"(m,an)))
-t57:=t14(x,an,mn"r"(m,an),t18,t52,t51,t50):is(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,pl"r"(an,mn"r"(m,an)),t56,t55))
-t58:=satz187a(m,an):is"r"(pl"r"(an,mn"r"(m,an)),m)
-t59:=ispw2(x,pl"r"(an,mn"r"(m,an)),m,t58,t56,mi,t55,lemma294a):is(pw(x,pl"r"(an,mn"r"(m,an)),t56,t55),pw(x,m,mi,lemma294a))
-t60:=tris(cx,ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,pl"r"(an,mn"r"(m,an)),t56,t55),pw(x,m,mi,lemma294a),t57,t59):is(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,m,mi,lemma294a))
-t61:=ispw1(x,x,an,refis(cx,x),t18,t53,t42):is(pw(x,an,t18,t53),pw(x,an,t18,t42))
-t62:=isp1(cx,[t:cx]nis(t,0c),pw(x,an,t18,t42),pw(x,an,t18,t53),t43,t61):nis(pw(x,an,t18,t53),0c)
-t63:=isov12(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,m,mi,lemma294a),pw(x,an,t18,t53),pw(x,an,t18,t42),t60,t61,t62,t43):is(ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43))
-t64:=tris2(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),t47,t63):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62))
-t65:=satz229h(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54),t62,refis(cx,ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)))):is(ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62),pw(x,mn"r"(m,an),t52,t54))
-t66:=tris(real,mn"r"(m,an),mn"r"(m,m0"r"(n)),pl"r"(m,n),ismn2"r"(an,m0"r"(n),m,absn(n,nn)),ispl2"r"(m0"r"(m0"r"(n)),n,m,satz177(n))):is"r"(mn"r"(m,an),pl"r"(m,n))
-t67:=ispw2(x,mn"r"(m,an),pl"r"(m,n),t66,t52,intpl(m,mi,n,ni),t54,lemma294c):is(pw(x,mn"r"(m,an),t52,t54),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-t68:=tr3is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62),pw(x,mn"r"(m,an),t52,t54),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t64,t65,t67):prop1
-nn@[caseb:is"r"(m,an)]
-t69:=ispw2(x,m,an,caseb,mi,t18,lemma294a,t42):is(pw(x,m,mi,lemma294a),pw(x,an,t18,t42))
-t70:=satz251a(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43,t69):is(ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),1c)
-t71:=tr3is(real,pl"r"(m,n),mn"r"(m,m0"r"(n)),mn"r"(m,an),0,ispl2"r"(n,m0"r"(m0"r"(n)),m,satz177a(n)),ismn2"r"(m0"r"(n),an,m,symis(real,an,m0"r"(n),absn(n,nn))),satz182e(m,an,caseb)):is"r"(pl"r"(m,n),0)
-t72:=symis(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),1c,0exp(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t71)):is(1c,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-t73:=tr3is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),1c,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t47,t70,t72):prop1
-nn@[casec:less(m,an)]
-t74:=satz182d(an,m,lemma2"r"(m,an,casec)):pos(mn"r"(an,m))
-t75:=andi(pos(m),pos(mn"r"(an,m)),pm,t74):and(pos(m),pos(mn"r"(an,m)))
-t76:=ori2(nis(x,0c),and(pos(m),pos(mn"r"(an,m))),t75):or(nis(x,0c),and(pos(m),pos(mn"r"(an,m))))
-t77:=intmn(an,t18,m,mi):intrl(mn"r"(an,m))
-t78:=lemma294a(x,m,mn"r"(an,m),mi,t77,t76):or(nis(x,0c),pos(m))
-t79:=lemma294b(x,m,mn"r"(an,m),mi,t77,t76):or(nis(x,0c),pos(mn"r"(an,m)))
-t80:=lemma294c(x,m,mn"r"(an,m),mi,t77,t76):or(nis(x,0c),pos(pl"r"(m,mn"r"(an,m))))
-t81:=intpl(m,mi,mn"r"(an,m),t77):intrl(pl"r"(m,mn"r"(an,m)))
-t81a:=t14(x,m,mn"r"(an,m),mi,t77,t76,t75):is(ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),pw(x,pl"r"(m,mn"r"(an,m)),t81,t80))
-t82:=satz187a(an,m):is"r"(pl"r"(m,mn"r"(an,m)),an)
-t83:=ispw2(x,pl"r"(m,mn"r"(an,m)),an,t82,t81,t18,t80,t42):is(pw(x,pl"r"(m,mn"r"(an,m)),t81,t80),pw(x,an,t18,t42))
-t84:=tris(cx,ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),pw(x,pl"r"(m,mn"r"(an,m)),t81,t80),pw(x,an,t18,t42),t81a,t83):is(ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),pw(x,an,t18,t42))
-t85:=satz290(x,m,mi,t78,t15):nis(pw(x,m,mi,t78),0c)
-t86:=satz290(x,mn"r"(an,m),t77,t79,t15):nis(pw(x,mn"r"(an,m),t77,t79),0c)
-t87:=satz221d(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79),t85,t86):nis(ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),0c)
-t88:=satz222(pw(x,m,mi,t78)):is(ts(pw(x,m,mi,t78),1c),pw(x,m,mi,t78))
-t89:=ispw1(x,x,m,refis(cx,x),mi,t78,lemma294a):is(pw(x,m,mi,t78),pw(x,m,mi,lemma294a))
-t90:=tris(cx,ts(pw(x,m,mi,t78),1c),pw(x,m,mi,t78),pw(x,m,mi,lemma294a),t88,t89):is(ts(pw(x,m,mi,t78),1c),pw(x,m,mi,lemma294a))
-t91:=isov12(ts(pw(x,m,mi,t78),1c),pw(x,m,mi,lemma294a),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),pw(x,an,t18,t42),t90,t84,t87,t43):is(ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43))
-t92:=tris2(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),t47,t91):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87))
-t93:=satz246a(1c,pw(x,mn"r"(an,m),t77,t79),pw(x,m,mi,t78),t86,t85):is(ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87),ov(1c,pw(x,mn"r"(an,m),t77,t79),t86))
-t94:=satz182f(m,an,casec):neg(mn"r"(m,an))
-t94a:=tris(real,mn"r"(m,an),mn"r"(m,m0"r"(n)),pl"r"(m,n),ismn2"r"(an,m0"r"(n),m,absn(n,nn)),ispl2"r"(m0"r"(m0"r"(n)),n,m,satz177(n))):is"r"(mn"r"(m,an),pl"r"(m,n))
-t95:=tr3is(real,mn"r"(an,m),m0"r"(mn"r"(m,an)),abs(mn"r"(m,an)),ap,satz181a(an,m),symis(real,abs(mn"r"(m,an)),m0"r"(mn"r"(m,an)),absn(mn"r"(m,an),t94)),isabs(mn"r"(m,an),pl"r"(m,n),t94a)):is"r"(mn"r"(an,m),ap)
-t96:=isp(real,[t:real]neg(t),mn"r"(m,an),pl"r"(m,n),t94,t94a):neg(pl"r"(m,n))
-t97:=lemmapw3(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t96):or(nis(x,0c),pos(ap))
-t98:=lemmapw1(x,ap,t19,t97,satz166b(pl"r"(m,n),t96),lemmapw2(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t96)):nis(pw(x,ap,t19,t97),0c)
-t99:=ispw2(x,mn"r"(an,m),ap,t95,t77,t19,t79,t97):is(pw(x,mn"r"(an,m),t77,t79),pw(x,ap,t19,t97))
-t100:=isov2(pw(x,mn"r"(an,m),t77,t79),pw(x,ap,t19,t97),1c,t99,t86,t98):is(ov(1c,pw(x,mn"r"(an,m),t77,t79),t86),ov(1c,pw(x,ap,t19,t97),t98))
-t101:=symis(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),ov(1c,pw(x,ap,t19,t97),t98),negexp(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t96)):is(ov(1c,pw(x,ap,t19,t97),t98),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-t102:=tr4is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87),ov(1c,pw(x,mn"r"(an,m),t77,t79),t86),ov(1c,pw(x,ap,t19,t97),t98),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t92,t93,t100,t101):prop1
-nn@t103:=or3app(is"r"(m,an),more(m,an),less(m,an),prop1,satz167a(m,an),[t:is"r"(m,an)]t73(t),[t:more(m,an)]t68(t),[t:less(m,an)]t102(t)):prop1
-na@[nm:neg(m)][qn:pos(n)]
-na@t104:=ori1(nis(x,0c),and(pos(n),pos(m)),t15):or(nis(x,0c),and(pos(n),pos(m)))
-t104a:=th5"l.and"(pos(m),pos(n),na):not(and(pos(n),pos(m)))
-t105:=lemma294a(x,n,m,ni,mi,t104):or(nis(x,0c),pos(n))
-t106:=lemma294b(x,n,m,ni,mi,t104):or(nis(x,0c),pos(m))
-t107:=lemma294c(x,n,m,ni,mi,t104):or(nis(x,0c),pos(pl"r"(n,m)))
-t108:=ists12(pw(x,m,mi,lemma294a),pw(x,m,mi,t106),pw(x,n,ni,lemma294b),pw(x,n,ni,t105),ispw1(x,x,m,refis(cx,x),mi,lemma294a,t106),ispw1(x,x,n,refis(cx,x),ni,lemma294b,t105)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,t106),pw(x,n,ni,t105)))
-t109:=comts(pw(x,m,mi,t106),pw(x,n,ni,t105)):is(ts(pw(x,m,mi,t106),pw(x,n,ni,t105)),ts(pw(x,n,ni,t105),pw(x,m,mi,t106)))
-qn@t110:=t103(x,n,m,ni,mi,t104,t104a,qn,nm):is(ts(pw(x,n,ni,t105),pw(x,m,mi,t106)),pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107))
-na@t111:=ispw2(x,pl"r"(n,m),pl"r"(m,n),compl"r"(n,m),intpl(n,ni,m,mi),intpl(m,mi,n,ni),t107,lemma294c):is(pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-qn@t112:=tr4is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,t106),pw(x,n,ni,t105)),ts(pw(x,n,ni,t105),pw(x,m,mi,t106)),pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t108,t109,t110,t111):prop1
-na@[i:is"r"(m,0)]
-t113:=ists1(pw(x,m,mi,lemma294a),1c,pw(x,n,ni,lemma294b),0exp(x,m,mi,lemma294a,i)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(1c,pw(x,n,ni,lemma294b)))
-t114:=satz222b(pw(x,n,ni,lemma294b)):is(ts(1c,pw(x,n,ni,lemma294b)),pw(x,n,ni,lemma294b))
-t115:=symis(real,pl"r"(m,n),n,pl01"r"(m,n,i)):is"r"(n,pl"r"(m,n))
-t116:=ispw2(x,n,pl"r"(m,n),t115,ni,intpl(m,mi,n,ni),lemma294b,lemma294c):is(pw(x,n,ni,lemma294b),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-t117:=tr3is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(1c,pw(x,n,ni,lemma294b)),pw(x,n,ni,lemma294b),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t113,t114,t116):prop1
-na@[i:is"r"(n,0)]
-t118:=t117(x,n,m,ni,mi,t104,t104a,i):is(ts(pw(x,n,ni,t105),pw(x,m,mi,t106)),pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107))
-t119:=tr4is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,t106),pw(x,n,ni,t105)),ts(pw(x,n,ni,t105),pw(x,m,mi,t106)),pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t108,t109,t118,t111):prop1
-na@[pm:pos(m)]
-t120:=ore2(not(pos(m)),not(pos(n)),t16,weli(pos(m),pm)):not(pos(n))
-t121:=rapp(n,prop1,th2"l.imp"(pos(n),prop1,t120),[t:is"r"(n,0)]t119(t),[t:neg(n)]t103(pm,t)):prop1
-na@[nm:neg(m)]
-t122:=rapp(n,prop1,[t:pos(n)]t112(nm,t),[t:is"r"(n,0)]t119(t),[t:neg(n)]t41(nm,t)):prop1
-na@t123:=rapp(m,prop1,[t:pos(m)]t121(t),[t:is"r"(m,0)]t117(t),[t:neg(m)]t122(t)):prop1
--9294
-o@satz294:=th1"l.imp"(and(pos(m),pos(n)),prop1".9294",[t:and(pos(m),pos(n))]t14".9294"(t),[t:not(and(pos(m),pos(n)))]t123".9294"(t)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-ni@[o:nis(x,0c)]
-lemma295a:=ori1(nis(x,0c),pos(m),o):or(nis(x,0c),pos(m))
-lemma295b:=ori1(nis(x,0c),pos(n),o):or(nis(x,0c),pos(n))
-lemma295c:=ori1(nis(x,0c),pos(mn"r"(m,n)),o):or(nis(x,0c),pos(mn"r"(m,n)))
-+9295
-t1:=ori1(nis(x,0c),and(pos(mn"r"(m,n)),pos(n)),o):or(nis(x,0c),and(pos(mn"r"(m,n)),pos(n)))
-t2:=intmn(m,mi,n,ni):intrl(mn"r"(m,n))
-t3:=lemma294a(x,mn"r"(m,n),n,t2,ni,t1):or(nis(x,0c),pos(mn"r"(m,n)))
-t4:=lemma294b(x,mn"r"(m,n),n,t2,ni,t1):or(nis(x,0c),pos(n))
-t5:=lemma294c(x,mn"r"(m,n),n,t2,ni,t1):or(nis(x,0c),pos(pl"r"(mn"r"(m,n),n)))
-t6:=ists12(pw(x,mn"r"(m,n),t2,lemma295c),pw(x,mn"r"(m,n),t2,t3),pw(x,n,ni,lemma295b),pw(x,n,ni,t4),ispw1(x,x,mn"r"(m,n),refis(cx,x),t2,lemma295c,t3),ispw1(x,x,n,refis(cx,x),ni,lemma295b,t4)):is(ts(pw(x,mn"r"(m,n),t2,lemma295c),pw(x,n,ni,lemma295b)),ts(pw(x,mn"r"(m,n),t2,t3),pw(x,n,ni,t4)))
-t7:=satz294(x,mn"r"(m,n),n,t2,ni,t1):is(ts(pw(x,mn"r"(m,n),t2,t3),pw(x,n,ni,t4)),pw(x,pl"r"(mn"r"(m,n),n),intpl(mn"r"(m,n),t2,n,ni),t5))
-t8:=plmn(m,n):is"r"(pl"r"(mn"r"(m,n),n),m)
-t9:=ispw2(x,pl"r"(mn"r"(m,n),n),m,t8,intpl(mn"r"(m,n),t2,n,ni),mi,t5,lemma295a):is(pw(x,pl"r"(mn"r"(m,n),n),intpl(mn"r"(m,n),t2,n,ni),t5),pw(x,m,mi,lemma295a))
-t10:=tr3is(cx,ts(pw(x,mn"r"(m,n),t2,lemma295c),pw(x,n,ni,lemma295b)),ts(pw(x,mn"r"(m,n),t2,t3),pw(x,n,ni,t4)),pw(x,pl"r"(mn"r"(m,n),n),intpl(mn"r"(m,n),t2,n,ni),t5),pw(x,m,mi,lemma295a),t6,t7,t9):is(ts(pw(x,mn"r"(m,n),t2,lemma295c),pw(x,n,ni,lemma295b)),pw(x,m,mi,lemma295a))
-t11:=satz290(x,n,ni,lemma295b,o):nis(pw(x,n,ni,lemma295b),0c)
--9295
-satz295:=satz229k(pw(x,m,mi,lemma295a),pw(x,n,ni,lemma295b),pw(x,mn"r"(m,n),t2".9295",lemma295c),t11".9295",t10".9295"):is(ov(pw(x,m,mi,lemma295a),pw(x,n,ni,lemma295b),satz290(x,n,ni,lemma295b,o)),pw(x,mn"r"(m,n),intmn(m,mi,n,ni),lemma295c))
-m@[mi:intrl(m)][n:nis(x,0c)]
-lemma296:=ori1(nis(x,0c),pos(m),n):or(nis(x,0c),pos(m))
-+9296
-t1:=intrli0(0,refis(real,0)):intrl(0)
-t2:=lemma295a(x,0,m,t1,mi,n):or(nis(x,0c),pos(0))
-t3:=lemma295b(x,0,m,t1,mi,n):or(nis(x,0c),pos(m))
-t4:=lemma295c(x,0,m,t1,mi,n):or(nis(x,0c),pos(mn"r"(0,m)))
-t5:=satz290(x,m,mi,lemma296,n):nis(pw(x,m,mi,lemma296),0c)
-t6:=satz290(x,m,mi,t3,n):nis(pw(x,m,mi,t3),0c)
-t7:=symis(cx,pw(x,0,t1,t2),1c,0exp(x,0,t1,t2,refis(real,0))):is(1c,pw(x,0,t1,t2))
-t8:=ispw1(x,x,m,refis(cx,x),mi,lemma296,t3):is(pw(x,m,mi,lemma296),pw(x,m,mi,t3))
-t9:=isov12(1c,pw(x,0,t1,t2),pw(x,m,mi,lemma296),pw(x,m,mi,t3),t7,t8,t5,t6):is(ov(1c,pw(x,m,mi,lemma296),t5),ov(pw(x,0,t1,t2),pw(x,m,mi,t3),t6))
-t10:=satz295(x,0,m,t1,mi,n):is(ov(pw(x,0,t1,t2),pw(x,m,mi,t3),t6),pw(x,mn"r"(0,m),intmn(0,t1,m,mi),t4))
-t11:=pl01(0,m0"r"(m),refis(real,0)):is"r"(mn"r"(0,m),m0"r"(m))
-t12:=lemma296(x,m0"r"(m),intm0(m,mi),n):or(nis(x,0c),pos(m0"r"(m)))
-t13:=ispw2(x,mn"r"(0,m),m0"r"(m),t11,intmn(0,t1,m,mi),intm0(m,mi),t4,t12):is(pw(x,mn"r"(0,m),intmn(0,t1,m,mi),t4),pw(x,m0"r"(m),intm0(m,mi),t12))
-t14:=tr3is(cx,ov(1c,pw(x,m,mi,lemma296),t5),ov(pw(x,0,t1,t2),pw(x,m,mi,t3),t6),pw(x,mn"r"(0,m),intmn(0,t1,m,mi),t4),pw(x,m0"r"(m),intm0(m,mi),t12),t9,t10,t13):is(ov(1c,pw(x,m,mi,lemma296),t5),pw(x,m0"r"(m),intm0(m,mi),t12))
--9296
-satz296:=t14".9296":is(ov(1c,pw(x,m,mi,lemma296),satz290(x,m,mi,lemma296,n)),pw(x,m0"r"(m),intm0(m,mi),lemma296(m0"r"(m),intm0(m,mi),n)))
-ni@[o:or(nis(x,0c),and(pos(m),pos(n)))]
-+9297
-[p:nis(x,0c)]
-t1:=satz290(x,m,mi,lemma294a(o),p):nis(pw(x,m,mi,lemma294a(o)),0c)
-o@[a:and(pos(m),pos(n))]
-t2:=ande2(pos(m),pos(n),a):pos(n)
-t3:=postspp(m,n,ande1(pos(m),pos(n),a),t2):pos(ts"r"(m,n))
--9297
-lemma297a:=th9"l.or"(nis(x,0c),and(pos(m),pos(n)),nis(pw(x,m,mi,lemma294a(o)),0c),pos(n),o,[t:nis(x,0c)]t1".9297"(t),[t:and(pos(m),pos(n))]t2".9297"(t)):or(nis(pw(x,m,mi,lemma294a(o)),0c),pos(n))
-lemma297b:=th8"l.or"(nis(x,0c),and(pos(m),pos(n)),pos(ts"r"(m,n)),o,[t:and(pos(m),pos(n))]t3".9297"(t)):or(nis(x,0c),pos(ts"r"(m,n)))
-mi@[o:or(nis(x,0c),pos(m))][i:is(x,0c)]
-+*9297
-i@t4:=ore2(nis(x,0c),pos(m),o,weli(is(x,0c),i)):pos(m)
-m1:=ntofrl(m,posintnatrl(m,t4,mi)):nat
-t5:=posexp(x,m,mi,o,t4):is(pw(x,m,mi,o),prod(m1,[t:1to(m1)]x))
-t6:=satz289b(m1,[t:1to(m1)]x,xout(m1),i):is(prod(m1,[t:1to(m1)]x),0c)
-t7:=tris(cx,pw(x,m,mi,o),prod(m1,[t:1to(m1)]x),0c,t5,t6):is(pw(x,m,mi,o),0c)
--9297
-i@pw0:=t7".9297":is(pw(x,m,mi,o),0c)
-ni@[o:or(nis(x,0c),and(pos(m),pos(n)))]
-+*9297
-ni@t8:=intts(m,mi,n,ni):intrl(ts"r"(m,n))
-o@prop1:=is(pw(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o)),pw(x,ts"r"(m,n),t8,lemma297b(o))):'prop'
-[i:is(x,0c)]
-t9:=pw0(x,m,mi,lemma294a(o),i):is(pw(x,m,mi,lemma294a(o)),0c)
-t10:=pw0(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o),t9):is(pw(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o)),0c)
-t11:=pw0(x,ts"r"(m,n),t8,lemma297b(o),i):is(pw(x,ts"r"(m,n),t8,lemma297b(o)),0c)
-t12:=tris2(cx,pw(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o)),pw(x,ts"r"(m,n),t8,lemma297b(o)),0c,t10,t11):prop1
-m@[mi:intrl(m)][p:nis(x,0c)]
-t13:=ori1(nis(x,0c),pos(m),p):or(nis(x,0c),pos(m))
-p0:=pw(x,m,mi,t13):cx
-[n:nat]
-nr:=rlofnt(n):real
-t14:=natintrl(nr,natrli(n)):intrl(nr)
-t15:=ori2(nis(p0,0c),pos(nr),natpos(nr,natrli(n))):or(nis(p0,0c),pos(nr))
-t16:=ori1(nis(x,0c),pos(ts"r"(m,nr)),p):or(nis(x,0c),pos(ts"r"(m,nr)))
-t17:=intts(m,mi,nr,t14):intrl(ts"r"(m,nr))
-prop2:=is(pw(p0,nr,t14,t15),pw(x,ts"r"(m,nr),t17,t16)):'prop'
-p@t18:=ispw1(p0,p0,1rl,refis(cx,p0),intrl1,t15(1),lemma291(p0)):is(pw(p0,1rl,t14(1),t15(1)),pw(p0,1rl,intrl1,lemma291(p0)))
-t19:=satz291(p0):is(pw(p0,1rl,intrl1,lemma291(p0)),p0)
-t20:=ispw2(x,m,ts"r"(m,1rl),satz195a(m),mi,t17(1),t13,t16(1)):is(p0,pw(x,ts"r"(m,1rl),t17(1),t16(1)))
-t21:=tr3is(cx,pw(p0,1rl,t14(1),t15(1)),pw(p0,1rl,intrl1,lemma291(p0)),p0,pw(x,ts"r"(m,1rl),t17(1),t16(1)),t18,t19,t20):prop2(1)
-n@[p2:prop2(n)]
-n1:=pl"n"(n,1):nat
-t22:=satz290(x,m,mi,t13,p):nis(p0,0c)
-t23:=ori1(nis(p0,0c),and(pos(nr),pos(1rl)),t22):or(nis(p0,0c),and(pos(nr),pos(1rl)))
-t24:=lemma294a(p0,nr,1rl,t14,intrl1,t23):or(nis(p0,0c),pos(nr))
-t25:=lemma294b(p0,nr,1rl,t14,intrl1,t23):or(nis(p0,0c),pos(1rl))
-t26:=lemma294c(p0,nr,1rl,t14,intrl1,t23):or(nis(p0,0c),pos(pl"r"(nr,1rl)))
-t27:=ispw2(p0,nr(n1),pl"r"(nr,1rl),satzr155a(n,1),t14(n1),intpl(nr,t14,1rl,intrl1),t15(n1),t26):is(pw(p0,nr(n1),t14(n1),t15(n1)),pw(p0,pl"r"(nr,1rl),intpl(nr,t14,1rl,intrl1),t26))
-t27a:=satz294(p0,nr,1rl,t14,intrl1,t23):is(ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)),pw(p0,pl"r"(nr,1rl),intpl(nr,t14,1rl,intrl1),t26))
-t28:=tris2(cx,pw(p0,nr(n1),t14(n1),t15(n1)),ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)),pw(p0,pl"r"(nr,1rl),intpl(nr,t14,1rl,intrl1),t26),t27,t27a):is(pw(p0,nr(n1),t14(n1),t15(n1)),ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)))
-t29:=ori1(nis(x,0c),and(pos(ts"r"(m,nr)),pos(m)),p):or(nis(x,0c),and(pos(ts"r"(m,nr)),pos(m)))
-t30:=lemma294a(x,ts"r"(m,nr),m,t17,mi,t29):or(nis(x,0c),pos(ts"r"(m,nr)))
-t31:=lemma294b(x,ts"r"(m,nr),m,t17,mi,t29):or(nis(x,0c),pos(m))
-t32:=lemma294c(x,ts"r"(m,nr),m,t17,mi,t29):or(nis(x,0c),pos(pl"r"(ts"r"(m,nr),m)))
-t33:=tr3is(cx,pw(p0,nr,t14,t24),pw(p0,nr,t14,t15),pw(x,ts"r"(m,nr),t17,t16),pw(x,ts"r"(m,nr),t17,t30),ispw1(p0,p0,nr,refis(cx,p0),t14,t24,t15),p2,ispw1(x,x,ts"r"(m,nr),refis(cx,x),t17,t16,t30)):is(pw(p0,nr,t14,t24),pw(x,ts"r"(m,nr),t17,t30))
-t34:=tr3is(cx,pw(p0,1rl,intrl1,t25),pw(p0,1rl,intrl1,lemma291(p0)),p0,pw(x,m,mi,t31),ispw1(p0,p0,1rl,refis(cx,p0),intrl1,t25,lemma291(p0)),t19,ispw1(x,x,m,refis(cx,x),mi,t13,t31)):is(pw(p0,1rl,intrl1,t25),pw(x,m,mi,t31))
-t35:=ists12(pw(p0,nr,t14,t24),pw(x,ts"r"(m,nr),t17,t30),pw(p0,1rl,intrl1,t25),pw(x,m,mi,t31),t33,t34):is(ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)),ts(pw(x,ts"r"(m,nr),t17,t30),pw(x,m,mi,t31)))
-t36:=satz294(x,ts"r"(m,nr),m,t17,mi,t29):is(ts(pw(x,ts"r"(m,nr),t17,t30),pw(x,m,mi,t31)),pw(x,pl"r"(ts"r"(m,nr),m),intpl(ts"r"(m,nr),t17,m,mi),t32))
-t37:=tr3is(real,pl"r"(ts"r"(m,nr),m),pl"r"(ts"r"(m,nr),ts"r"(m,1rl)),ts"r"(m,pl"r"(nr,1rl)),ts"r"(m,nr(n1)),ispl2"r"(m,ts"r"(m,1rl),ts"r"(m,nr),satz195a(m)),distpt2"r"(m,nr,1rl),ists2"r"(pl"r"(nr,1rl),nr(n1),m,satzr155b(n,1))):is"r"(pl"r"(ts"r"(m,nr),m),ts"r"(m,nr(n1)))
-t38:=ispw2(x,pl"r"(ts"r"(m,nr),m),ts"r"(m,nr(n1)),t37,intpl(ts"r"(m,nr),t17,m,mi),t17(n1),t32,t16(n1)):is(pw(x,pl"r"(ts"r"(m,nr),m),intpl(ts"r"(m,nr),t17,m,mi),t32),pw(x,ts"r"(m,nr(n1)),t17(n1),t16(n1)))
-t39:=tr4is(cx,pw(p0,nr(n1),t14(n1),t15(n1)),ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)),ts(pw(x,ts"r"(m,nr),t17,t30),pw(x,m,mi,t31)),pw(x,pl"r"(ts"r"(m,nr),m),intpl(ts"r"(m,nr),t17,m,mi),t32),pw(x,ts"r"(m,nr(n1)),t17(n1),t16(n1)),t28,t35,t36,t38):prop2(n1)
-t40:=isp(nat,[t:nat]prop2(t),n1,<n>suc,t39,satz4a(n)):prop2(<n>suc)
-n@t41:=induction([t:nat]prop2(t),t21,[t:nat][u:prop2(t)]t40(t,u),n):prop2(n)
-o@[p:nis(x,0c)][q:pos(n)]
-t42:=posintnatrl(n,q,ni):natrl(n)
-n0:=ntofrl(n,t42):nat
-t43:=isrlnt1(n,t42):is"r"(n,rlofnt(n0))
-t44:=isrlnt2(n,t42):is"r"(rlofnt(n0),n)
-o@p1:=pw(x,m,mi,lemma294a(o)):cx
-q@t44a:=ispw2(x,m,m,refis(real,m),mi,mi,lemma294a(o),t13(mi,p)):is(p1,p0(mi,p))
-t45:=ispw12(p1,p0(mi,p),n,rlofnt(n0),t44a,t43,ni,t14(mi,p,n0),lemma297a(o),t15(mi,p,n0)):is(pw(p1,n,ni,lemma297a(o)),pw(p0(mi,p),rlofnt(n0),t14(mi,p,n0),t15(mi,p,n0)))
-t46:=t41(mi,p,n0):is(pw(p0(mi,p),rlofnt(n0),t14(mi,p,n0),t15(mi,p,n0)),pw(x,ts"r"(m,rlofnt(n0)),t17(mi,p,n0),t16(mi,p,n0)))
-t47:=ists2"r"(rlofnt(n0),n,m,t44):is"r"(ts"r"(m,rlofnt(n0)),ts"r"(m,n))
-t48:=ispw2(x,ts"r"(m,rlofnt(n0)),ts"r"(m,n),t47,t17(mi,p,n0),t8,t16(mi,p,n0),lemma297b(o)):is(pw(x,ts"r"(m,rlofnt(n0)),t17(mi,p,n0),t16(mi,p,n0)),pw(x,ts"r"(m,n),t8,lemma297b(o)))
-t49:=tr3is(cx,pw(p1,n,ni,lemma297a(o)),pw(p0(mi,p),rlofnt(n0),t14(mi,p,n0),t15(mi,p,n0)),pw(x,ts"r"(m,rlofnt(n0)),t17(mi,p,n0),t16(mi,p,n0)),pw(x,ts"r"(m,n),t8,lemma297b(o)),t45,t46,t48):prop1
-p@[i:is"r"(n,0)]
-t50:=0exp(p1,n,ni,lemma297a(o),i):is(pw(p1,n,ni,lemma297a(o)),1c)
-t51:=ts02"r"(m,n,i):is"r"(ts"r"(m,n),0)
-t52:=0exp(x,ts"r"(m,n),t8,lemma297b(o),t51):is(pw(x,ts"r"(m,n),t8,lemma297b(o)),1c)
-t53:=tris2(cx,pw(p1,n,ni,lemma297a(o)),pw(x,ts"r"(m,n),t8,lemma297b(o)),1c,t50,t52):prop1
-p@[q:neg(n)]
-an:=abs(n):real
-t54:=intabs(n,ni):intrl(an)
-t55:=ori1(nis(x,0c),and(pos(m),pos(an)),p):or(nis(x,0c),and(pos(m),pos(an)))
-p1t55:=p1(an,mi,t54,t55):cx
-t56:=satz166e(n,nnot0(n,q)):pos(an)
-t56a:=lemma294a(an,mi,t54,t55):or(nis(x,0c),pos(m))
-t57:=lemma297a(an,mi,t54,t55):or(nis(p1t55,0c),pos(an))
-t58:=lemma297b(an,mi,t54,t55):or(nis(x,0c),pos(ts"r"(m,an)))
-t59:=t49(an,mi,t54,t55,p,t56):is(pw(p1t55,an,t54,t57),pw(x,ts"r"(m,an),t8(an,mi,t54),t58))
-t60:=satz177c(an,n,absn(n,q)):is"r"(n,m0"r"(an))
-t61:=intm0(an,t54):intrl(m0"r"(an))
-t62:=satz290(x,m,mi,t56a,p):nis(p1t55,0c)
-t63:=lemma296(p1t55,an,t54,t62):or(nis(p1t55,0c),pos(an))
-t64:=satz290(p1t55,an,t54,t63,t62):nis(pw(p1t55,an,t54,t63),0c)
-t65:=lemma296(p1t55,m0"r"(an),t61,t62):or(nis(p1t55,0c),pos(m0"r"(an)))
-t66:=satz296(p1t55,an,t54,t62):is(ov(1c,pw(p1t55,an,t54,t63),t64),pw(p1t55,m0"r"(an),t61,t65))
-t67:=ispw1(x,x,m,refis(cx,x),mi,lemma294a(o),t56a):is(p1,p1t55)
-t68:=ispw12(p1,p1t55,n,m0"r"(an),t67,t60,ni,t61,lemma297a(o),t65):is(pw(p1,n,ni,lemma297a(o)),pw(p1t55,m0"r"(an),t61,t65))
-t69:=tris2(cx,pw(p1,n,ni,lemma297a(o)),ov(1c,pw(p1t55,an,t54,t63),t64),pw(p1t55,m0"r"(an),t61,t65),t68,t66):is(pw(p1,n,ni,lemma297a(o)),ov(1c,pw(p1t55,an,t54,t63),t64))
-t70:=tris(real,m0"r"(ts"r"(m,an)),ts"r"(m,m0"r"(an)),ts"r"(m,n),satz197f(m,an),ists2"r"(m0"r"(an),n,m,symis(real,n,m0"r"(an),t60))):is"r"(m0"r"(ts"r"(m,an)),ts"r"(m,n))
-t71:=intm0(ts"r"(m,an),t8(an,mi,t54)):intrl(m0"r"(ts"r"(m,an)))
-t72:=lemma296(x,ts"r"(m,an),t8(an,mi,t54),p):or(nis(x,0c),pos(ts"r"(m,an)))
-t73:=satz290(x,ts"r"(m,an),t8(an,mi,t54),t72,p):nis(pw(x,ts"r"(m,an),t8(an,mi,t54),t72),0c)
-t74:=lemma296(x,m0"r"(ts"r"(m,an)),t71,p):or(nis(x,0c),pos(m0"r"(ts"r"(m,an))))
-t75:=satz296(x,ts"r"(m,an),t8(an,mi,t54),p):is(ov(1c,pw(x,ts"r"(m,an),t8(an,mi,t54),t72),t73),pw(x,m0"r"(ts"r"(m,an)),t71,t74))
-t76:=ispw2(x,m0"r"(ts"r"(m,an)),ts"r"(m,n),t70,t71,t8,t74,lemma297b(o)):is(pw(x,m0"r"(ts"r"(m,an)),t71,t74),pw(x,ts"r"(m,n),t8,lemma297b(o)))
-t77:=ispw1(p1t55,p1t55,an,refis(cx,p1t55),t54,t63,t57):is(pw(p1t55,an,t54,t63),pw(p1t55,an,t54,t57))
-t78:=ispw1(x,x,ts"r"(m,an),refis(cx,x),t8(an,mi,t54),t58,t72):is(pw(x,ts"r"(m,an),t8(an,mi,t54),t58),pw(x,ts"r"(m,an),t8(an,mi,t54),t72))
-t79:=tr3is(cx,pw(p1t55,an,t54,t63),pw(p1t55,an,t54,t57),pw(x,ts"r"(m,an),t8(an,mi,t54),t58),pw(x,ts"r"(m,an),t8(an,mi,t54),t72),t77,t59,t78):is(pw(p1t55,an,t54,t63),pw(x,ts"r"(m,an),t8(an,mi,t54),t72))
-t80:=isov2(pw(p1t55,an,t54,t63),pw(x,ts"r"(m,an),t8(an,mi,t54),t72),1c,t79,t64,t73):is(ov(1c,pw(p1t55,an,t54,t63),t64),ov(1c,pw(x,ts"r"(m,an),t8(an,mi,t54),t72),t73))
-t81:=tr4is(cx,pw(p1,n,ni,lemma297a(o)),ov(1c,pw(p1t55,an,t54,t63),t64),ov(1c,pw(x,ts"r"(m,an),t8(an,mi,t54),t72),t73),pw(x,m0"r"(ts"r"(m,an)),t71,t74),pw(x,ts"r"(m,n),t8,lemma297b(o)),t69,t80,t75,t76):prop1
-p@t82:=rapp(n,prop1,[t:pos(n)]t49(t),[t:is"r"(n,0)]t53(t),[t:neg(n)]t81(t)):prop1
--9297
-o@satz297:=th1"l.imp"(is(x,0c),prop1".9297",[t:is(x,0c)]t12".9297"(t),[t:nis(x,0c)]t82".9297"(t)):is(pw(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o)),pw(x,ts"r"(m,n),intts(m,mi,n,ni),lemma297b(o)))
-@[r:real][s:real]
-+10298
-t1:=tris(cx,pl(pli(r,0),pli(s,0)),pli(pl"r"(r,s),pl"r"(0,0)),pli(pl"r"(r,s),0),plis12a(r,0,s,0),isrecx2(pl"r"(0,0),0,pl"r"(r,s),pl01(0,0,refis(real,0)))):is(pl(pli(r,0),pli(s,0)),pli(pl"r"(r,s),0))
--10298
-satz298a:=symis(cx,pl(pli(r,0),pli(s,0)),pli(pl"r"(r,s),0),t1".10298"):is(pli(pl"r"(r,s),0),pl(pli(r,0),pli(s,0)))
-satz298b:=t1".10298":is(pl(pli(r,0),pli(s,0)),pli(pl"r"(r,s),0))
-+*10298
-s@t2:=tris(cx,mn(pli(r,0),pli(s,0)),pli(mn"r"(r,s),mn"r"(0,0)),pli(mn"r"(r,s),0),mnis12a(r,0,s,0),isrecx2(mn"r"(0,0),0,mn"r"(r,s),pl02(0,m0"r"(0),satz176b(0,refis(real,0))))):is(mn(pli(r,0),pli(s,0)),pli(mn"r"(r,s),0))
--10298
-s@satz298c:=symis(cx,mn(pli(r,0),pli(s,0)),pli(mn"r"(r,s),0),t2".10298"):is(pli(mn"r"(r,s),0),mn(pli(r,0),pli(s,0)))
-satz298d:=t2".10298":is(mn(pli(r,0),pli(s,0)),pli(mn"r"(r,s),0))
-+*10298
-s@t3:=pl02(ts"r"(r,s),m0"r"(ts"r"(0,0)),satz176b(ts"r"(0,0),ts01(0,0,refis(real,0)))):is"r"(mn"r"(ts"r"(r,s),ts"r"(0,0)),ts"r"(r,s))
-t4:=tris(real,pl"r"(ts"r"(r,0),ts"r"(0,s)),ts"r"(r,0),0,pl02(ts"r"(r,0),ts"r"(0,s),ts01(0,s,refis(real,0))),ts02(r,0,refis(real,0))):is"r"(pl"r"(ts"r"(r,0),ts"r"(0,s)),0)
-t5:=tris(cx,ts(pli(r,0),pli(s,0)),pli(mn"r"(ts"r"(r,s),ts"r"(0,0)),pl"r"(ts"r"(r,0),ts"r"(0,s))),pli(ts"r"(r,s),0),tsis12a(r,0,s,0),isrecx12(mn"r"(ts"r"(r,s),ts"r"(0,0)),ts"r"(r,s),pl"r"(ts"r"(r,0),ts"r"(0,s)),0,t3,t4)):is(ts(pli(r,0),pli(s,0)),pli(ts"r"(r,s),0))
--10298
-s@satz298e:=symis(cx,ts(pli(r,0),pli(s,0)),pli(ts"r"(r,s),0),t5".10298"):is(pli(ts"r"(r,s),0),ts(pli(r,0),pli(s,0)))
-satz298f:=t5".10298":is(ts(pli(r,0),pli(s,0)),pli(ts"r"(r,s),0))
-[n:nis"r"(s,0)]
-+*10298
-n@[i:is(pli(s,0),0c)]
-t6:=tr3is(real,s,re(pli(s,0)),re(0c),0,isre(s,0),iscere(pli(s,0),0c,i),reis(0,0)):is"r"(s,0)
--10298
-n@lemma298:=th3"l.imp"(is(pli(s,0),0c),is"r"(s,0),n,[t:is(pli(s,0),0c)]t6".10298"(t)):nis(pli(s,0),0c)
-+*10298
-n@t7:=tris(cx,ts(pli(s,0),pli(ov"r"(r,s,n),0)),pli(ts"r"(s,ov"r"(r,s,n)),0),pli(r,0),t5(s,ov"r"(r,s,n)),isrecx1(ts"r"(s,ov"r"(r,s,n)),r,0,satz204c(r,s,n))):is(ts(pli(s,0),pli(ov"r"(r,s,n),0)),pli(r,0))
--10298
-n@satz298g:=satz229g(pli(r,0),pli(s,0),pli(ov"r"(r,s,n),0),lemma298,t7".10298"):is(pli(ov"r"(r,s,n),0),ov(pli(r,0),pli(s,0),lemma298))
-satz298h:=satz229h(pli(r,0),pli(s,0),pli(ov"r"(r,s,n),0),lemma298,t7".10298"):is(ov(pli(r,0),pli(s,0),lemma298),pli(ov"r"(r,s,n),0))
-+*10298
-r@t8:=tris(cx,m0(pli(r,0)),pli(m0"r"(r),m0"r"(0)),pli(m0"r"(r),0),m0isa(r,0),isrecx2(m0"r"(0),0,m0"r"(r),satz176b(0,refis(real,0)))):is(m0(pli(r,0)),pli(m0"r"(r),0))
--10298
-r@satz298j:=symis(cx,m0(pli(r,0)),pli(m0"r"(r),0),t8".10298"):is(pli(m0"r"(r),0),m0(pli(r,0)))
-satz298k:=t8".10298":is(m0(pli(r,0)),pli(m0"r"(r),0))
-+*10298
-r@t9:=tris(real,mod2(pli(r,0)),ts"r"(re(pli(r,0)),re(pli(r,0))),ts"r"(r,r),pl02(ts"r"(re(pli(r,0)),re(pli(r,0))),ts"r"(im(pli(r,0)),im(pli(r,0))),ts01(im(pli(r,0)),im(pli(r,0)),imis(r,0))),ists12"r"(re(pli(r,0)),r,re(pli(r,0)),r,reis(r,0),reis(r,0))):is"r"(mod2(pli(r,0)),ts"r"(r,r))
-ar:=abs(r):real
-[p:pos(r)]
-t10:=satz196a(r,r,p,p):is"r"(ts"r"(r,r),ts"r"(ar,ar))
-r@[i:is"r"(r,0)]
-t11:=tris2(real,ts"r"(r,r),ts"r"(ar,ar),0,ts01(r,r,i),ts01(ar,ar,abs0(r,i))):is"r"(ts"r"(r,r),ts"r"(ar,ar))
-r@[n:neg(r)]
-t12:=satz196b(r,r,n,n):is"r"(ts"r"(r,r),ts"r"(ar,ar))
-r@t13:=rapp(r,is"r"(ts"r"(r,r),ts"r"(ar,ar)),[t:pos(r)]t10(t),[t:is"r"(r,0)]t11(t),[t:neg(r)]t12(t)):is"r"(ts"r"(r,r),ts"r"(ar,ar))
-t14:=tris(real,mod2(pli(r,0)),ts"r"(r,r),ts"r"(ar,ar),t9,t13):is"r"(mod2(pli(r,0)),ts"r"(ar,ar))
-t15:=th1"l.imp"(is"r"(r,0),not(neg(ar)),[t:is"r"(r,0)]0notn(ar,abs0(r,t)),[t:nis"r"(r,0)]pnotn(ar,satz166e(r,t))):not(neg(ar))
--10298
-r@satz298l:=thsqrt3(mod2(pli(r,0)),lemma5(pli(r,0)),abs(r),t15".10298",t14".10298"):is"r"(mod(pli(r,0)),abs(r))
-satz298m:=symis(real,mod(pli(r,0)),abs(r),satz298l):is"r"(abs(r),mod(pli(r,0)))
-cofrl:=pli(r,0):complex
-s@[i:is(cofrl(r),cofrl(s))]
-isrlic:=tr3is(real,r,re(cofrl(r)),re(cofrl(s)),s,isre(r,0),iscere(cofrl(r),cofrl(s),i),reis(s,0)):is"r"(r,s)
-s@[i:is"r"(r,s)]
-isrlec:=isrecx1(r,s,0,i):is(cofrl(r),cofrl(s))
-+v10
-@t1:=[t:real][u:real][v:is(cofrl(t),cofrl(u))]isrlic(t,u,v):injective(real,cx,[t:real]cofrl(t))
--v10
-@[x:cx]
-realc:=image(real,cx,[t:real]cofrl(t),x):'prop'
-r@reali:=imagei(real,cx,[t:real]cofrl(t),r):realc(cofrl(r))
-x@[rx:realc(x)]
-rlofc:=soft(real,cx,[t:real]cofrl(t),t1".v10",x,rx):real
-[y:cx][ry:realc(y)][i:is"r"(rlofc(x,rx),rlofc(y,ry))]
-iscirl:=isinve(real,cx,[t:real]cofrl(t),t1".v10",x,rx,y,ry,i):is(x,y)
-ry@[i:is(x,y)]
-iscerl:=isinv(real,cx,[t:real]cofrl(t),t1".v10",x,rx,y,ry,i):is"r"(rlofc(x,rx),rlofc(y,ry))
-r@isrlc1:=isst1(real,cx,[t:real]cofrl(t),t1".v10",r):is"r"(r,rlofc(cofrl(r),reali(r)))
-isrlc2:=isst2(real,cx,[t:real]cofrl(t),t1".v10",r):is"r"(rlofc(cofrl(r),reali(r)),r)
-rx@iscrl1:=ists1"e"(real,cx,[t:real]cofrl(t),t1".v10",x,rx):is(x,cofrl(rlofc(x,rx)))
-iscrl2:=ists2"e"(real,cx,[t:real]cofrl(t),t1".v10",x,rx):is(cofrl(rlofc(x,rx)),x)
-@[n:nat]
-cofn:=cofrl(rlofnt(n)):complex
-[m:nat][i:is"n"(n,m)]
-isnec:=isrlec(rlofnt(n),rlofnt(m),isnterl(n,m,i)):is(cofn(n),cofn(m))
-m@[i:is(cofn(n),cofn(m))]
-isnic:=isntirl(n,m,isrlic(rlofnt(n),rlofnt(m),i)):is"n"(n,m)
-+*v10
-@t2:=[t:nat][u:nat][v:is(cofn(t),cofn(u))]isnic(t,u,v):injective(nat,cx,[t:nat]cofn(t))
--v10
-x@natc:=image(nat,cx,[t:nat]cofn(t),x):'prop'
-n@nati:=imagei(nat,cx,[t:nat]cofn(t),n):natc(cofn(n))
-x@[nx:natc(x)]
-nofc:=soft(nat,cx,[t:nat]cofn(t),t2".v10",x,nx):nat
-[y:cx][ny:natc(y)][i:is(x,y)]
-iscen:=isinv(nat,cx,[t:nat]cofn(t),t2".v10",x,nx,y,ny,i):is"n"(nofc(x,nx),nofc(y,ny))
-ny@[i:is"n"(nofc(x,nx),nofc(y,ny))]
-iscin:=isinve(nat,cx,[t:nat]cofn(t),t2".v10",x,nx,y,ny,i):is(x,y)
-n@isnc1:=isst1(nat,cx,[t:nat]cofn(t),t2".v10",n):is"n"(n,nofc(cofn(n),nati(n)))
-isnc2:=isst2(nat,cx,[t:nat]cofn(t),t2".v10",n):is"n"(nofc(cofn(n),nati(n)),n)
-nx@iscn1:=ists1"e"(nat,cx,[t:nat]cofn(t),t2".v10",x,nx):is(x,cofn(nofc(x,nx)))
-iscn2:=ists2"e"(nat,cx,[t:nat]cofn(t),t2".v10",x,nx):is(cofn(nofc(x,nx)),x)
-@natt:=ot(cx,[t:cx]natc(t)):'type'
-[nt:natt]
-cofnt:=in"e"(cx,[t:cx]natc(t),nt):cx
-natti:=inp(cx,[t:cx]natc(t),nt):natc(cofnt(nt))
-[mt:natt][i:is"e"(natt,nt,mt)]
-isntec:=isini(cx,[t:cx]natc(t),nt,mt,i):is(cofnt(nt),cofnt(mt))
-mt@[i:is(cofnt(nt),cofnt(mt))]
-isntic:=isine(cx,[t:cx]natc(t),nt,mt,i):is"e"(natt,nt,mt)
-nx@ntofc:=out(cx,[t:cx]natc(t),x,nx):natt
-ny@[i:is(x,y)]
-iscent:=isouti(cx,[t:cx]natc(t),x,nx,y,ny,i):is"e"(natt,ntofc(x,nx),ntofc(y,ny))
-ny@[i:is"e"(natt,ntofc(x,nx),ntofc(y,ny))]
-iscint:=isoute(cx,[t:cx]natc(t),x,nx,y,ny,i):is(x,y)
-nt@isntc1:=isoutin(cx,[t:cx]natc(t),nt):is"e"(natt,nt,ntofc(cofnt(nt),natti(nt)))
-isntc2:=symis(natt,nt,ntofc(cofnt(nt),natti(nt)),isntc1):is"e"(natt,ntofc(cofnt(nt),natti(nt)),nt)
-nx@iscnt1:=isinout(cx,[t:cx]natc(t),x,nx):is(x,cofnt(ntofc(x,nx)))
-iscnt2:=symis(cx,x,cofnt(ntofc(x,nx)),iscnt1):is(cofnt(ntofc(x,nx)),x)
-n@ntofn:=ntofc(cofn(n),nati(n)):natt
-m@[i:is"n"(n,m)]
-isnent:=iscent(cofn(n),nati(n),cofn(m),nati(m),isnec(n,m,i)):is"e"(natt,ntofn(n),ntofn(m))
-m@[i:is"e"(natt,ntofn(n),ntofn(m))]
-isnint:=isnic(n,m,iscint(cofn(n),nati(n),cofn(m),nati(m),i)):is"n"(n,m)
-nt@nofnt:=nofc(cofnt(nt),natti(nt)):nat
-mt@[i:is"e"(natt,nt,mt)]
-isnter:=iscen(cofnt(nt),natti(nt),cofnt(mt),natti(mt),isntec(nt,mt,i)):is"n"(nofnt(nt),nofnt(mt))
-mt@[i:is"n"(nofnt(nt),nofnt(mt))]
-isntin:=isntic(nt,mt,iscin(cofnt(nt),natti(nt),cofnt(mt),natti(mt),i)):is"e"(natt,nt,mt)
-+*v10
-n@t3:=iscnt1(cofn(n),nati(n)):is(cofn(n),cofnt(ntofn(n)))
--v10
-n@isnnt1:=tris(nat,n,nofc(cofn(n),nati(n)),nofnt(ntofn(n)),isnc1(n),iscen(cofn(n),nati(n),cofnt(ntofn(n)),natti(ntofn(n)),t3".v10")):is"n"(n,nofnt(ntofn(n)))
-isnnt2:=symis(nat,n,nofnt(ntofn(n)),isnnt1):is"n"(nofnt(ntofn(n)),n)
-+*v10
-nt@t4:=iscn1(cofnt(nt),natti(nt)):is(cofnt(nt),cofn(nofnt(nt)))
--v10
-nt@isntn1:=tris(natt,nt,ntofc(cofnt(nt),natti(nt)),ntofn(nofnt(nt)),isntc1(nt),iscent(cofnt(nt),natti(nt),cofn(nofnt(nt)),nati(nofnt(nt)),t4".v10")):is"e"(natt,nt,ntofn(nofnt(nt)))
-isntn2:=symis(natt,nt,ntofn(nofnt(nt)),isntn1):is"e"(natt,ntofn(nofnt(nt)),nt)
-@1t:=ntofn(1):natt
-suct:=[t:natt]ntofn(<nofnt(t)>suc):[t:natt]natt
-+10299
-nt@[i:is"e"(natt,<nt>suct,1t)]
-t1:=isnint(<nofnt(nt)>suc,1,i):is"n"(<nofnt(nt)>suc,1)
--10299
-nt@satz299a:=th3"l.imp"(is"e"(natt,<nt>suct,1t),is"n"(<nofnt(nt)>suc,1),<nofnt(nt)>ax3,[t:is"e"(natt,<nt>suct,1t)]t1".10299"(t)):not(is"e"(natt,<nt>suct,1t))
-@ax3t:=[t:natt]satz299a(t):[t:natt]not(is"e"(natt,<t>suct,1t))
-mt@[i:is"e"(natt,<nt>suct,<mt>suct)]
-+*10299
-i"c"@t2:=isnint(<nofnt(nt)>suc,<nofnt(mt)>suc,i):is"n"(<nofnt(nt)>suc,<nofnt(mt)>suc)
-t3:=<t2><nofnt(mt)><nofnt(nt)>ax4:is"n"(nofnt(nt),nofnt(mt))
--10299
-i@satz299b:=isntin(nt,mt,t3".10299"):is"e"(natt,nt,mt)
-@ax4t:=[t:natt][u:natt][v:is"e"(natt,<t>suct,<u>suct)]satz299b(t,u,v):[t:natt][u:natt][v:is"e"(natt,<t>suct,<u>suct)]is"e"(natt,t,u)
-[s:set(natt)]
-cond1t:=esti(natt,1t,s):'prop'
-cond2t:=all"l"(natt,[t:natt]imp(esti(natt,t,s),esti(natt,<t>suct,s))):'prop'
-[c1:cond1t][c2:cond2t]
-+*10299
-c2@[n:nat]
-prop1:=esti(natt,ntofn(n),s):'prop'
-c2@t4:=c1:prop1(1)
-n@[p:prop1(n)]
-t5:=<p><ntofn(n)>c2:esti(natt,ntofn(<nofnt(ntofn(n))>suc),s)
-t6:=isp(nat,[t:nat]esti(natt,ntofn(<t>suc),s),nofnt(ntofn(n)),n,t5,isnnt2(n)):prop1(<n>suc)
-c2@[nt:natt]
-t7:=induction([t:nat]prop1(t),t4,[t:nat][u:prop1(t)]t6(t,u),nofnt(nt)):prop1(nofnt(nt))
--10299
-c2@satz299c:=[t:natt]isp(natt,[u:natt]esti(natt,u,s),ntofn(nofnt(t)),t,t7".10299"(t),isntn2(t)):[t:natt]esti(natt,t,s)
-@ax5t:=[t:set(natt)][u:cond1t(t)][v:cond2t(t)]satz299c(t,u,v):[t:set(natt)][u:cond1t(t)][v:cond2t(t)][w:natt]esti(natt,w,t)
-ic:=pli(0,1rl):complex
-+10300
-t1:=tsis12a(0,1rl,0,1rl):is(ts(ic,ic),pli(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),pl"r"(ts"r"(0,1rl),ts"r"(1rl,0))))
-t2:=tris(real,mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),m0"r"(ts"r"(1rl,1rl)),m0"r"(1rl),pl01(ts"r"(0,0),m0"r"(ts"r"(1rl,1rl)),ts01(0,0,refis(real,0))),ism0"r"(ts"r"(1rl,1rl),1rl,satz195(1rl))):is"r"(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),m0"r"(1rl))
-t3:=tris(real,pl"r"(ts"r"(0,1rl),ts"r"(1rl,0)),ts"r"(1rl,0),0,pl01(ts"r"(0,1rl),ts"r"(1rl,0),ts01(0,1rl,refis(real,0))),ts02(1rl,0,refis(real,0))):is"r"(pl"r"(ts"r"(0,1rl),ts"r"(1rl,0)),0)
-t4:=isrecx12(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),m0"r"(1rl),pl"r"(ts"r"(0,1rl),ts"r"(1rl,0)),0,t2,t3):is(pli(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),pl"r"(ts"r"(0,1rl),ts"r"(1rl,0))),cofrl(m0"r"(1rl)))
-t5:=satz298j(1rl):is(cofrl(m0"r"(1rl)),m0(1c))
--10300
-satz2300:=tr3is(cx,ts(ic,ic),pli(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),pl"r"(ts"r"(0,1rl),ts"r"(1rl,0))),cofrl(m0"r"(1rl)),m0(1c),t1".10300",t4".10300",t5".10300"):is(ts(ic,ic),m0(1c))
-[r:real][s:real]
-+10301
-t1:=tsis12a(s,0,0,1rl):is(ts(cofrl(s),ic),pli(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),pl"r"(ts"r"(s,1rl),ts"r"(0,0))))
-t2:=tris(real,mn"r"(ts"r"(s,0),ts"r"(0,1rl)),m0"r"(ts"r"(0,1rl)),0,pl01(ts"r"(s,0),m0"r"(ts"r"(0,1rl)),ts02(s,0,refis(real,0))),satz176b(ts"r"(0,1rl),ts01(0,1rl,refis(real,0)))):is"r"(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),0)
-t3:=tris(real,pl"r"(ts"r"(s,1rl),ts"r"(0,0)),ts"r"(s,1rl),s,pl02(ts"r"(s,1rl),ts"r"(0,0),ts01(0,0,refis(real,0))),satz195(s)):is"r"(pl"r"(ts"r"(s,1rl),ts"r"(0,0)),s)
-t4:=isrecx12(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),0,pl"r"(ts"r"(s,1rl),ts"r"(0,0)),s,t2,t3):is(pli(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),pl"r"(ts"r"(s,1rl),ts"r"(0,0))),pli(0,s))
-t5:=tris(cx,ts(cofrl(s),ic),pli(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),pl"r"(ts"r"(s,1rl),ts"r"(0,0))),pli(0,s),t1,t4):is(ts(cofrl(s),ic),pli(0,s))
-t6:=ispl2(ts(cofrl(s),ic),pli(0,s),cofrl(r),t5):is(pl(cofrl(r),ts(cofrl(s),ic)),pl(cofrl(r),pli(0,s)))
-t7:=plis12a(r,0,0,s):is(pl(cofrl(r),pli(0,s)),pli(pl"r"(r,0),pl"r"(0,s)))
-t8:=isrecx12(pl"r"(r,0),r,pl"r"(0,s),s,pl02(r,0,refis(real,0)),pl01(0,s,refis(real,0))):is(pli(pl"r"(r,0),pl"r"(0,s)),pli(r,s))
--10301
-satz301a:=tr3is(cx,pl(cofrl(r),ts(cofrl(s),ic)),pl(cofrl(r),pli(0,s)),pli(pl"r"(r,0),pl"r"(0,s)),pli(r,s),t6".10301",t7".10301",t8".10301"):is"e"(cx,pl(cofrl(r),ts(cofrl(s),ic)),pli(r,s))
-satz301b:=symis(cx,pl(cofrl(r),ts(cofrl(s),ic)),pli(r,s),satz301a):is(pli(r,s),pl(cofrl(r),ts(cofrl(s),ic)))
-@[x:complex]
-satz301c:=tris(cx,x,pli(re(x),im(x)),pl(cofrl(re(x)),ts(cofrl(im(x)),ic)),ispli(x),satz301b(re(x),im(x))):is(x,pl(cofrl(re(x)),ts(cofrl(im(x)),ic)))
-satz301d:=symis(cx,x,pl(cofrl(re(x)),ts(cofrl(im(x)),ic)),satz301c):is(pl(cofrl(re(x)),ts(cofrl(im(x)),ic)),x)
-s@[t:real][u:real][i:is(pl(cofrl(r),ts(cofrl(s),ic)),pl(cofrl(t),ts(cofrl(u),ic)))]
-+*10301
-i@t9:=tr3is(cx,pli(r,s),pl(cofrl(r),ts(cofrl(s),ic)),pl(cofrl(t),ts(cofrl(u),ic)),pli(t,u),satz301b(r,s),i,satz301a(t,u)):is(pli(r,s),pli(t,u))
--10301
-i@satz301e:=tr3is(real,r,re(pli(r,s)),re(pli(t,u)),t,isre(r,s),iscere(pli(r,s),pli(t,u),t9".10301"),reis(t,u)):is"r"(r,t)
-satz301f:=tr3is(real,s,im(pli(r,s)),im(pli(t,u)),u,isim(r,s),isceim(pli(r,s),pli(t,u),t9".10301"),imis(t,u)):is"r"(s,u)
--c
--r
--rp
--rt
--n
--landau
--eq
--st
--e
--l
+++ /dev/null
-# Landau's "Grundlagen der Analysis", formal specification in AUTOMATH
-# Copyright (C) 1977, L.S. van Benthem Jutting
-# 1992, revised by F. Wiedijk (http://www.cs.ru.nl/~freek/aut/)
-# 2008, revised by F. Guidi to remove eta-reductions
-# 2014, revised by F. Guidi to remove sort inclusions on binders of degree 1
-# 2014, revised by F. Guidi to suggest @-typing removal
-
-+l
-@[a:'prop'][b:'prop']
-imp:=[x:a]b:'prop'
-[a1:a][i:imp(a,b)]
-mp:=<a1>i:b
-a@refimp:=[x:a]x:imp(a,a)
-b@[c:'prop'][i:imp(a,b)][j:imp(b,c)]
-trimp:=[x:a]<<x>i>j:imp(a,c)
-@con:='prim':'prop'
-a@not:=imp(con):'prop'
-wel:=not(not(a)):'prop'
-[a1:a]
-weli:=[x:not(a)]<a1>x:wel(a)
-a@[w:wel(a)]
-et:='prim':a
-a@[c1:con]
-cone:=et([x:not(a)]c1):a
-+imp
-b@[i:imp(a,b)][j:imp(not(a),b)]
-th1:=et(b,[x:not(b)]<<trimp(con,i,x)>j>x):b
-b@[n:not(a)]
-th2:=trimp(con,b,n,[x:con]cone(b,x)):imp(a,b)
-b@[n:not(b)][i:imp(a,b)]
-th3:=trimp(con,i,n):not(a)
-b@[a1:a][n:not(b)]
-th4:=[x:imp(a,b)]<a1>th3(n,x):not(imp(a,b))
-b@[n:not(imp(a,b))]
-th5:=et([x:not(a)]<th2(x)>n):a
-th6:=[x:b]<[y:a]x>n:not(b)
-b@[n:not(b)][i:imp(not(a),b)]
-th7:=et(a,th3(not(a),b,n,i)):a
--imp
-b@[i:imp(not(b),not(a))]
-cp:=[x:a]th7".imp"(b,not(a),weli(x),i):imp(a,b)
-@obvious:=imp(con,con):'prop'
-obviousi:=refimp(con):obvious
-b@ec:=imp(a,not(b)):'prop'
-[n:not(a)]
-eci1:=th2".imp"(not(b),n):ec(a,b)
-b@[n:not(b)]
-eci2:=[x:a]n:ec(a,b)
-+ec
-b@[i:imp(a,not(b))]
-th1:=i:ec(a,b)
-b@[i:imp(b,not(a))]
-th2:=[x:a][y:b]<x><y>i:ec(a,b)
--ec
-b@[e:ec(a,b)]
-comec:=th2".ec"(b,a,e):ec(b,a)
-[a1:a]
-ece1:=<a1>e:not(b)
-e@[b1:b]
-ece2:=th3".imp"(not(b),weli(b,b1),e):not(a)
-+*ec
-c@[e:ec(a,b)][i:imp(c,a)]
-th3:=trimp(c,a,not(b),i,e):ec(c,b)
-e@[i:imp(c,b)]
-th4:=comec(c,a,th3(b,a,c,comec(e),i)):ec(a,c)
--ec
-b@and:=not(ec(a,b)):'prop'
-[a1:a][b1:b]
-andi:=th4".imp"(not(b),a1,weli(b,b1)):and(a,b)
-b@[a1:and(a,b)]
-ande1:=th5".imp"(not(b),a1):a
-ande2:=et(b,th6".imp"(not(b),a1)):b
-comand:=andi(b,a,ande2,ande1):and(b,a)
-+and
-b@[n:not(a)]
-th1:=weli(ec,eci1(n)):not(and)
-b@[n:not(b)]
-th2:=weli(ec,eci2(n)):not(and)
-b@[n:not(and)][a1:a]
-th3:=ece1(et(ec,n),a1):not(b)
-n@[b1:b]
-th4:=ece2(et(ec,n),b1):not(a)
-n@th5:=th3"l.imp"(and(b,a),and(a,b),n,[x:and(b,a)]comand(b,a,x)):not(and(b,a))
-c@[a1:and(a,b)][i:imp(a,c)]
-th6:=andi(c,b,<ande1(a1)>i,ande2(a1)):and(c,b)
-a1@[i:imp(b,c)]
-th7:=andi(a,c,ande1(a1),<ande2(a1)>i):and(a,c)
--and
-b@or:=imp(not(a),b):'prop'
-[a1:a]
-ori1:=th2".imp"(not(a),b,weli(a1)):or(a,b)
-b@[b1:b]
-ori2:=[x:not(a)]b1:or(a,b)
-+or
-b@[i:imp(not(a),b)]
-th1:=i:or(a,b)
-b@[i:imp(not(b),a)]
-th2:=[x:not]et(b,th3"l.imp"(not(b),a,x,i)):or(a,b)
--or
-b@[o:or(a,b)][n:not(a)]
-ore2:=<n>o:b
-o@[n:not(b)]
-ore1:=et(th3".imp"(not(a),b,n,o)):a
-o@comor:=[x:not(b)]ore1(x):or(b,a)
-+*or
-b@[n:not(a)][m:not(b)]
-th3:=th4"l.imp"(not(a),b,n,m):not(or(a,b))
-b@[n:not(or(a,b))]
-th4:=th5"l.imp"(not(a),b,n):not(a)
-th5:=th6"l.imp"(not(a),b,n):not(b)
-a@th6:=refimp(not(a)):or(a,not(a))
--or
-c@[o:or(a,b)][i:imp(a,c)][j:imp(b,c)]
-orapp:=th1".imp"(c,i,trimp(not,b,c,o,j)):c
-c@[d:'prop']
-+*or
-o@[i:imp(a,c)]
-th7:=trimp(not(c),not,b,[x:not(c)]th3"l.imp"(a,c,x,i),o):or(c,b)
-o@[i:imp(b,c)]
-th8:=trimp(not(a),b,c,o,i):or(a,c)
-d@[o:or(a,b)][i:imp(a,c)][j:imp(b,d)]
-th9:=th7(a,d,c,th8(a,b,d,o,j),i):or(c,d)
-b@[o:or(a,b)]
-th10:=o:imp(not(a),b)
-th11:=comor(o):imp(not(b),a)
-b@[o:or(not(a),b)]
-th12:=trimp(a,wel(a),b,[x:a]weli(x),o):imp(a,b)
-b@[i:imp(a,b)]
-th13:=trimp(wel(a),a,b,[x:wel(a)]et(x),i):or(not(a),b)
-b@[o:or(not(a),not(b))]
-th14:=weli(ec,th12(not(b),o)):not(and)
-b@[n:not(and)]
-th15:=th13(not(b),et(ec,n)):or(not(a),not(b))
-b@[a1:and(not(a),not(b))]
-th16:=th3(ande1(not(a),not(b),a1),ande2(not(a),not(b),a1)):not(or(a,b))
-b@[n:not(or(a,b))]
-th17:=andi(not(a),not(b),th4(n),th5(n)):and(not(a),not(b))
--or
-b@orec:=and(or(a,b),ec(a,b)):'prop'
-[o:or(a,b)][e:ec(a,b)]
-oreci:=andi(or(a,b),ec(a,b),o,e):orec(a,b)
-+orec
-b@[a1:a][n:not(b)]
-th1:=oreci(ori1(a1),eci2(n)):orec(a,b)
-b@[n:not(a)][b1:b]
-th2:=oreci(ori2(b1),eci1(n)):orec(a,b)
--orec
-b@[o:orec(a,b)]
-orece1:=ande1(or(a,b),ec,o):or(a,b)
-orece2:=ande2(or(a,b),ec,o):ec(a,b)
-comorec:=oreci(b,a,comor(orece1),comec(orece2)):orec(b,a)
-+*orec
-o@[a1:a]
-th3:=ece1(orece2,a1):not(b)
-o@[b1:b]
-th4:=ece2(orece2,b1):not(a)
-o@[n:not(a)]
-th5:=ore2(orece1,n):b
-o@[n:not(b)]
-th6:=ore1(orece1,n):a
--orec
-b@iff:=and(imp(a,b),imp(b,a)):'prop'
-[i:imp(a,b)][j:imp(b,a)]
-iffi:=andi(imp(a,b),imp(b,a),i,j):iff(a,b)
-+iff
-b@[a1:a][b1:b]
-th1:=iffi([x:a]b1,[x:b]a1):iff(a,b)
-b@[n:not(a)][m:not(b)]
-th2:=iffi(th2"l.imp"(n),th2"l.imp"(b,a,m)):iff(a,b)
--iff
-b@[i:iff(a,b)]
-iffe1:=ande1(imp(a,b),imp(b,a),i):imp(a,b)
-iffe2:=ande2(imp(a,b),imp(b,a),i):imp(b,a)
-comiff:=iffi(b,a,iffe2,iffe1):iff(b,a)
-+*iff
-i@[a1:a]
-th3:=<a1>iffe1:b
-i@[b1:b]
-th4:=<b1>iffe2:a
-i@[n:not(a)]
-th5:=th3"l.imp"(b,a,n,iffe2):not(b)
-i@[n:not(b)]
-th6:=th3"l.imp"(n,iffe1):not(a)
-b@[a1:a][n:not(b)]
-th7:=th1"l.and"(imp(a,b),imp(b,a),th4"l.imp"(a1,n)):not(iff(a,b))
-b@[n:not(a)][b1:b]
-th8:=th2"l.and"(imp(a,b),imp(b,a),th4"l.imp"(b,a,b1,n)):not(iff(a,b))
--iff
-a@refiff:=iffi(a,refimp,refimp):iff(a,a)
-b@[i:iff(a,b)]
-symiff:=comiff(i):iff(b,a)
-c@[i:iff(a,b)][j:iff(b,c)]
-triff:=iffi(a,c,trimp(iffe1(i),iffe1(b,c,j)),trimp(c,b,a,iffe2(b,c,j),iffe2(i))):iff(a,c)
-+*iff
-b@[i:iff(a,b)]
-th9:=[x:not(a)]th5(i,x):imp(not(a),not(b))
-th10:=[x:not(b)]th6(i,x):imp(not(b),not(a))
-th11:=iffi(not(a),not(b),th9,th10):iff(not(a),not(b))
-b@[i:imp(not(a),not(b))][j:imp(not(b),not(a))]
-th12:=iffi(cp(j),cp(b,a,i)):iff(a,b)
-b@[o:orec(a,b)]
-th13:=iffi(not(b),orece2(o),comor(orece1(o))):iff(a,not(b))
-th14:=th13(b,a,comorec(o)):iff(b,not(a))
-b@[i:iff(a,not(b))]
-th15:=oreci(comor(b,a,iffe2(not(b),i)),iffe1(not(b),i)):orec(a,b)
-b@[i:iff(b,not(a))]
-th16:=comorec(b,a,th15(b,a,i)):orec(a,b)
-c@[i:iff(a,b)][j:imp(a,c)]
-thimp1:=trimp(b,a,c,iffe2(i),j):imp(b,c)
-i@[j:imp(c,a)]
-thimp2:=trimp(c,a,b,j,iffe1(i)):imp(c,b)
-i@[e:ec(a,c)]
-thec1:=th3"l.ec"(c,b,e,iffe2(i)):ec(b,c)
-i@[e:ec(c,a)]
-thec2:=th4"l.ec"(c,a,b,e,iffe2(i)):ec(c,b)
-i@[a1:and(a,c)]
-thand1:=th6"l.and"(c,b,a1,iffe1(i)):and(b,c)
-i@[a1:and(c,a)]
-thand2:=th7"l.and"(c,a,b,a1,iffe1(i)):and(c,b)
-i@[o:or(a,c)]
-thor1:=th7"l.or"(c,b,o,iffe1(i)):or(b,c)
-i@[o:or(c,a)]
-thor2:=th8"l.or"(c,a,b,o,iffe1(i)):or(c,b)
-i@[o:orec(a,c)]
-thorec1:=oreci(b,c,thor1(orece1(a,c,o)),thec1(orece2(a,c,o))):orec(b,c)
-i@[o:orec(c,a)]
-thorec2:=oreci(c,b,thor2(orece1(c,a,o)),thec2(orece2(c,a,o))):orec(c,b)
--iff
-@[sigma:'type'][p:[x:sigma]'prop']
-%suggestion by van Daalen to remove eta-reduction
-%all:=p:'prop' %original line
-all:=[x:sigma]<x>p:'prop'
-%end of suggestion
-[a1:all(sigma,p)][s:sigma]
-alle:=<s>a1:<s>p
-+all
-p@[s:sigma][n:not(<s>p)]
-th1:=[x:all(sigma,p)]<<s>x>n:not(all(sigma,p))
--all
-p@non:=[x:sigma]not(<x>p):[x:sigma]'prop'
-%suggestion by Guidi to remove sort inclusion of degree 1 by adding all-introduction
-none:=all(sigma,non(p)):'prop'
-%end of suggestion ("non" replaced by "none" where needed)
-some:=not(none(p)):'prop' %none
-[s:sigma][sp:<s>p]
-somei:=th1".all"(non(p),s,weli(<s>p,sp)):some(sigma,p)
-+some
-p@[n:not(all(sigma,p))][m:none(non(p))][s:sigma] %none
-t1:=et(<s>p,<s>m):<s>p
-%set etared
-m@t2:=<[x:sigma]t1(x)>n:con
-%reset etared
-n@th1:=[x:none(non(p))]t2(x):some(non(p)) %none
-p@[s:some(non(p))][a1:all(sigma,p)][t:sigma]
-t3:=weli(<t>p,<t>a1):not(not(<t>p))
-a1@t4:=<[x:sigma]t3(x)>s:con
-s@th2:=[x:all(sigma,p)]t4(x):not(all(sigma,p))
-p@[n:not(some(sigma,p))]
-th3:=et(none(p),n):none(p) %none x 2
-[s:sigma]
-th4:=<s>th3:not(<s>p)
-p@[n:none(p)] %none
-th5:=weli(none(p),n):not(some(sigma,p)) %none
--some
-p@[s:some(sigma,p)][x:'prop'][i:[y:sigma]imp(<y>p,x)]
-+*some
-i@[n:not(x)][t:sigma]
-t5:=th3"l.imp"(<t>p,x,n,<t>i):not(<t>p)
-n@t6:=mp(some(sigma,p),con,s,th5([y:sigma]t5(y))):con
--some
-i@someapp:=et(x,[y:not(x)]t6".some"(y)):x
-+*some
-p@[q:[x:sigma]'prop'][s:some(sigma,p)][i:[x:sigma]imp(<x>p,<x>q)]
-th6:=someapp(s,some(q),[x:sigma][y:<x>p]somei(q,x,mp(<x>p,<x>q,y,<x>i))):some(q)
--some
-c@or3:=or(a,or(b,c)):'prop'
-[o:or3(a,b,c)][n:not(a)]
-+or3
-th1:=ore2(or(b,c),o,n):or(b,c)
--or3
-[m:not(b)]
-or3e3:=ore2(b,c,th1".or3",m):c
-o@[n:not(b)]
-+*or3
-n@th2:=th2"l.or"(c,a,[x:not(a)]or3e3(x,n)):or(c,a)
--or3
-n@[m:not(c)]
-or3e1:=ore2(c,a,th2".or3",m):a
-o@[n:not(c)]
-+*or3
-n@th3:=th2"l.or"([x:not(b)]or3e1(x,n)):or(a,b)
--or3
-n@[m:not(a)]
-or3e2:=ore2(th3".or3",m):b
-+*or3
-o@th4:=th1"l.or"(b,or(c,a),[x:not(b)]th2(x)):or3(b,c,a)
-th5:=th4(b,c,a,th4):or3(c,a,b)
--or3
-c@[a1:a]
-or3i1:=ori1(a,or(b,c),a1):or3(a,b,c)
-c@[b1:b]
-or3i2:=ori2(a,or(b,c),ori1(b,c,b1)):or3(a,b,c)
-c@[c1:c]
-or3i3:=ori2(a,or(b,c),ori2(b,c,c1)):or3(a,b,c)
-+*or3
-c@[o:or(a,b)]
-th6:=th4"or3"(c,a,b,ori2(c,or(a,b),o)):or3(a,b,c)
-c@[o:or(b,c)]
-th7:=ori2(or(b,c),o):or3(a,b,c)
-c@[o:or(c,a)]
-th8:=th4"or3"(c,a,b,th6(c,a,b,o)):or3(a,b,c)
--or3
-d@[o:or3(a,b,c)][i:imp(a,d)][j:imp(b,d)][k:imp(c,d)]
-or3app:=orapp(or(b,c),d,o,i,[x:or(b,c)]orapp(b,c,d,x,j,k)):d
-c@and3:=and(a,and(b,c)):'prop'
-[a1:and3(a,b,c)]
-and3e1:=ande1(and(b,c),a1):a
-and3e2:=ande1(b,c,ande2(and(b,c),a1)):b
-and3e3:=ande2(b,c,ande2(and(b,c),a1)):c
-c@[a1:a][b1:b][c1:c]
-and3i:=andi(a,and(b,c),a1,andi(b,c,b1,c1)):and3(a,b,c)
-+and3
-c@[a1:and3(a,b,c)]
-th1:=and3i(b,c,a,and3e2(a1),and3e3(a1),and3e1(a1)):and3(b,c,a)
-th2:=th1(b,c,a,th1):and3(c,a,b)
-th3:=andi(and3e1(a1),and3e2(a1)):and(a,b)
-th4:=ande2(and(b,c),a1):and(b,c)
-th5:=th3(c,a,b,th2):and(c,a)
-th6:=and3i(c,b,a,and3e3(a1),and3e2(a1),and3e1(a1)):and3(c,b,a)
--and3
-c@ec3:=and3(ec,ec(b,c),ec(c,a)):'prop'
-[e:ec3(a,b,c)]
-+ec3
-th1:=and3e1(ec,ec(b,c),ec(c,a),e):ec(a,b)
-th2:=and3e2(ec,ec(b,c),ec(c,a),e):ec(b,c)
-th3:=and3e3(ec,ec(b,c),ec(c,a),e):ec(c,a)
-th4:=th1"l.and3"(ec,ec(b,c),ec(c,a),e):ec3(b,c,a)
-th5:=th4(b,c,a,th4):ec3(c,a,b)
-th5a:=and3i(ec(c,b),ec(b,a),ec(a,c),comec(b,c,th2(e)),comec(a,b,th1(e)),comec(c,a,th3(e))):ec3(c,b,a)
--ec3
-[a1:a]
-ec3e12:=ece1(th1".ec3",a1):not(b)
-ec3e13:=ece2(c,a,th3".ec3",a1):not(c)
-e@[b1:b]
-ec3e23:=ec3e12(b,c,a,th4".ec3",b1):not(c)
-ec3e21:=ec3e13(b,c,a,th4".ec3",b1):not(a)
-e@[c1:c]
-ec3e31:=ec3e12(c,a,b,th5".ec3",c1):not(a)
-ec3e32:=ec3e13(c,a,b,th5".ec3",c1):not(b)
-+*ec3
-c@[e:ec(a,b)][f:ec(b,c)][g:ec(c,a)]
-th6:=and3i(ec,ec(b,c),ec(c,a),e,f,g):ec3(a,b,c)
-c@[e:ec3(a,b,c)][o:or(a,b)]
-th7:=orapp(not(c),o,[x:a]ece2(c,a,th3"ec3"(e),x),[x:b]ece1(b,c,th2"ec3"(e),x)):not(c)
-e@[o:or(b,c)]
-th8:=th7(b,c,a,th4"ec3"(e),o):not(a)
-e@[o:or(c,a)]
-th9:=th7(c,a,b,th5"ec3"(e),o):not(b)
--ec3
-c@[n:not(a)][m:not(b)]
-ec3i1:=th6".ec3"(eci1(n),eci1(b,c,m),eci2(c,a,n)):ec3(a,b,c)
-c@[n:not(b)][m:not(c)]
-ec3i2:=th6".ec3"(eci2(n),eci1(b,c,n),eci1(c,a,m)):ec3(a,b,c)
-c@[n:not(c)][m:not(a)]
-ec3i3:=th6".ec3"(eci1(m),eci2(b,c,n),eci1(c,a,n)):ec3(a,b,c)
-+*ec3
-d@[e:'prop'][f:'prop'][o1:or3(a,b,c)][p1:ec3(d,e,f)][i:imp(a,d)][j:imp(b,e)][k:imp(c,f)][d1:d]
-t1:=[x:b]mp(e,con,<x>j,ec3e12(d,e,f,p1,d1)):not(b)
-t2:=[x:c]mp(f,con,<x>k,ec3e13(d,e,f,p1,d1)):not(c)
-th10:=or3e1(o1,t1,t2):a
-k@[e1:e]
-th11:=th10(b,c,a,e,f,d,th4"l.or3"(o1),th4"ec3"(d,e,f,p1),j,k,i,e1):b
-k@[f1:f]
-th12:=th10(c,a,b,f,d,e,th5"l.or3"(o1),th5"ec3"(d,e,f,p1),k,i,j,f1):c
--ec3
-c@orec3:=and(or3(a,b,c),ec3(a,b,c)):'prop'
-[o:orec3(a,b,c)]
-orec3e1:=ande1(or3(a,b,c),ec3(a,b,c),o):or3(a,b,c)
-orec3e2:=ande2(or3(a,b,c),ec3(a,b,c),o):ec3(a,b,c)
-c@[o:or3(a,b,c)][e:ec3(a,b,c)]
-orec3i:=andi(or3(a,b,c),ec3(a,b,c),o,e):orec3(a,b,c)
-+orec3
-c@[o:orec3(a,b,c)]
-th1:=orec3i(b,c,a,th4"l.or3"(orec3e1(o)),th4"l.ec3"(orec3e2(o))):orec3(b,c,a)
-th2:=orec3i(c,a,b,th5"l.or3"(orec3e1(o)),th5"l.ec3"(orec3e2(o))):orec3(c,a,b)
--orec3
-+e
-sigma@[s:sigma][t:sigma]
-is:='prim':'prop'
-s@refis:='prim':is(s,s)
-p@[s:sigma][t:sigma][sp:<s>p][i:is(s,t)]
-isp:='prim':<t>p
-sigma@[s:sigma][t:sigma][i:is(s,t)]
-symis:=isp([x:sigma]is(x,s),s,t,refis(s),i):is(t,s)
-t@[u:sigma][i:is(s,t)][j:is(t,u)]
-tris:=isp([x:sigma]is(x,u),t,s,j,symis(i)):is(s,u)
-u@[i:is(u,s)][j:is(u,t)]
-tris1:=tris(s,u,t,symis(u,s,i),j):is(s,t)
-u@[i:is(s,u)][j:is(t,u)]
-tris2:=tris(s,u,t,i,symis(t,u,j)):is(s,t)
-sp@[i:is(t,s)]
-isp1:=isp(symis(t,s,i)):<t>p
-t@[n:not(is(s,t))]
-symnotis:=th3"l.imp"(is(t,s),is(s,t),n,[x:is(t,s)]symis(t,s,x)):not(is(t,s))
-+notis
-u@[n:not(is(s,t))][i:is(s,u)]
-th1:=isp([x:sigma]not(is(x,t)),s,u,n,i):not(is(u,t))
-n@[i:is(u,s)]
-th2:=th1(symis(u,s,i)):not(is(u,t))
-n@[i:is(t,u)]
-th3:=isp([x:sigma]not(is(s,x)),t,u,n,i):not(is(s,u))
-n@[i:is(u,t)]
-th4:=th3(symis(u,t,i)):not(is(s,u))
-u@[v:sigma][n:not(is(s,t))][i:is(s,u)][j:is(t,v)]
-th5:=th3(u,t,v,th1(n,i),j):not(is(u,v))
--notis
-u@[v:sigma][i:is(s,t)][j:is(t,u)][k:is(u,v)]
-tr3is:=tris(s,u,v,tris(i,j),k):is(s,v)
-v@[w:sigma][i:is(s,t)][j:is(t,u)][k:is(u,v)][l:is(v,w)]
-tr4is:=tris(s,v,w,tr3is(i,j,k),l):is(s,w)
-p@amone:=[x:sigma][y:sigma][u:<x>p][v:<y>p]is(x,y):'prop'
-[a1:amone(sigma,p)][s:sigma][t:sigma][sp:<s>p][tp:<t>p]
-amonee:=<tp><sp><t><s>a1:is(s,t)
-p@one:=and(amone(sigma,p),some(sigma,p)):'prop'
-[a1:amone(sigma,p)][s:some(sigma,p)]
-onei:=andi(amone(sigma,p),some(sigma,p),a1,s):one(sigma,p)
-p@[o1:one(sigma,p)]
-onee1:=ande1(amone(sigma,p),some(sigma,p),o1):amone(sigma,p)
-onee2:=ande2(amone(sigma,p),some(sigma,p),o1):some(sigma,p)
-ind:='prim':sigma
-oneax:='prim':<ind>p
-+one
-[s:sigma][sp:<s>p]
-th1:=amonee(onee1,ind,s,oneax,sp):is(ind,s)
--one
-sigma@[tau:'type'][f:[x:sigma]tau][s:sigma][t:sigma][i:is(s,t)]
-isf:=isp(sigma,[x:sigma]is(tau,<s>f,<x>f),s,t,refis(tau,<s>f),i):is(tau,<s>f,<t>f)
-f@injective:=all([x:sigma]all([y:sigma]imp(is(tau,<x>f,<y>f),is(x,y)))):'prop'
-[i:injective(f)][s:sigma][t:sigma][j:is(tau,<s>f,<t>f)]
-isfe:=<j><t><s>i:is(s,t)
-f@[t0:tau]
-image:=some([x:sigma]is(tau,t0,<x>f)):'prop'
-f@[s:sigma]
-tofs:=<s>f:tau
-imagei:=somei([x:sigma]is(tau,tofs,<x>f),s,refis(tau,tofs)):image(tofs)
-+inj
-i@[ta:tau][tb:tau][j:is(tau,ta,tb)][sa:sigma][sb:sigma][ja:is(tau,ta,tofs(sa))][jb:is(tau,tb,tofs(sb))]
-t1:=tr3is(tau,tofs(sa),ta,tb,tofs(sb),symis(tau,ta,tofs(sa),ja),j,jb):is(tau,tofs(sa),tofs(sb))
-th1:=isfe(sa,sb,t1):is(sa,sb)
-i@[t0:tau]
-th2:=[x:sigma][y:sigma][u:is(tau,t0,<x>f)][v:is(tau,t0,<y>f)]th1(t0,t0,refis(tau,t0),x,y,u,v):amone([x:sigma]is(tau,t0,<x>f))
-[j:image(f,t0)]
-th3:=onei([x:sigma]is(tau,t0,<x>f),th2,j):one([x:sigma]is(tau,t0,<x>f))
--inj
-i@[t0:tau][j:image(f,t0)]
-soft:=ind([x:sigma]is(tau,t0,<x>f),th3".inj"(t0,j)):sigma
-i@inverse:=[x:tau][u:image(f,x)]soft(x,u):[x:tau][u:image(f,x)]sigma
-j@ists1:=oneax([x:sigma]is(tau,t0,<x>f),th3".inj"(t0,j)):is(tau,t0,tofs(soft(t0,j)))
-ists2:=symis(tau,t0,tofs(soft(t0,j)),ists1):is(tau,tofs(soft(t0,j)),t0)
-i@[ta:tau][ja:image(ta)][tb:tau][jb:image(tb)][j:is(tau,ta,tb)]
-isinv:=th1".inj"(ta,tb,j,soft(ta,ja),soft(tb,jb),ists1(ta,ja),ists1(tb,jb)):is(soft(ta,ja),soft(tb,jb))
-jb@[j:is(soft(ta,ja),soft(tb,jb))]
-isinve:=tr3is(tau,ta,tofs(soft(ta,ja)),tofs(soft(tb,jb)),tb,ists1(ta,ja),isf(soft(ta,ja),soft(tb,jb),j),ists2(tb,jb)):is(tau,ta,tb)
-i@[s:sigma]
-isst1:=isfe(s,soft(tofs(s),imagei(s)),ists1(tofs(s),imagei(s))):is(s,soft(tofs(s),imagei(s)))
-isst2:=symis(s,soft(tofs(s),imagei(s)),isst1):is(soft(tofs(s),imagei(s)),s)
-f@surjective:=all(tau,[x:tau]image(x)):'prop'
-bijective:=and(injective,surjective):'prop'
-[b:bijective(f)]
-+*inj
-b@t2:=ande1(injective,surjective,b):injective(f)
-t3:=ande2(injective,surjective,b):surjective(f)
-[t:tau]
-so:=soft(t2,t,<t>t3):sigma
--inj
-b@invf:=[x:tau]so".inj"(x):[x:tau]sigma
-[s:sigma]
-thinvf1:=tris(s,soft(t2".inj",tofs(s),imagei(s)),<<s>f>invf,isst1(t2".inj",s),isinv(t2".inj",tofs(s),imagei(s),tofs(s),<tofs(s)>t3".inj",refis(tau,tofs(s)))):is(s,<<s>f>invf)
-b@[t:tau]
-thinvf2:=ists1(t2".inj",t,<t>t3".inj"):is(tau,t,<<t>invf>f)
-tau@[upsilon:'type'][f:[x:sigma]tau][g:[x:tau]upsilon]
-+*inj
-g@[if:injective(sigma,tau,f)][ig:injective(tau,upsilon,g)]
-h:=[x:sigma]<<x>f>g:[x:sigma]upsilon
-[s:sigma][t:sigma][i:is(upsilon,<s>h,<t>h)]
-t4:=isfe(tau,upsilon,g,ig,<s>f,<t>f,i):is(tau,<s>f,<t>f)
-t5:=isfe(f,if,s,t,t4):is(s,t)
-ig@th4:=[x:sigma][y:sigma][v:is(upsilon,<x>h,<y>h)]t5(x,y,v):injective(sigma,upsilon,[x:sigma]<<x>f>g)
--inj
-+surj
-g@[sf:surjective(sigma,tau,f)][sg:surjective(tau,upsilon,g)]
-h:=[x:sigma]<<x>f>g:[x:sigma]upsilon
-[u:upsilon]
-t1:=<u>sg:image(tau,upsilon,g,u)
-[t:tau][i:is(upsilon,u,<t>g)]
-t2:=<t>sf:image(sigma,tau,f,t)
-[s:sigma][j:is(tau,t,<s>f)]
-t3:=tris(upsilon,u,<t>g,<s>h,i,isf(tau,upsilon,g,t,<s>f,j)):is(upsilon,u,<s>h)
-t4:=somei([x:sigma]is(upsilon,u,<x>h),s,t3):image(sigma,upsilon,h,u)
-i@t5:=someapp([x:sigma]is(tau,t,<x>f),t2,image(sigma,upsilon,h,u),[x:sigma][v:is(tau,t,<x>f)]t4(x,v)):image(sigma,upsilon,h,u)
-u@t6:=someapp(tau,[x:tau]is(upsilon,u,<x>g),t1,image(sigma,upsilon,h,u),[x:tau][v:is(upsilon,u,<x>g)]t5(x,v)):image(sigma,upsilon,h,u)
-sg@th1:=[x:upsilon]t6(x):surjective(sigma,upsilon,[x:sigma]<<x>f>g)
--surj
-+bij
-g@[bf:bijective(sigma,tau,f)][bg:bijective(tau,upsilon,g)]
-h:=[x:sigma]<<x>f>g:[x:sigma]upsilon
-t1:=th4"e.inj"(f,g,ande1(injective(f),surjective(f),bf),ande1(injective(tau,upsilon,g),surjective(tau,upsilon,g),bg)):injective(sigma,upsilon,h)
-t2:=th1"e.surj"(f,g,ande2(injective(f),surjective(f),bf),ande2(injective(tau,upsilon,g),surjective(tau,upsilon,g),bg)):surjective(sigma,upsilon,h)
-th1:=andi(injective(sigma,upsilon,h),surjective(sigma,upsilon,h),t1,t2):bijective(sigma,upsilon,[x:sigma]<<x>f>g)
--bij
-tau@[f:[x:sigma]tau][g:[x:sigma]tau][i:is([x:sigma]tau,f,g)][s:sigma]
-fise:=isp([x:sigma]tau,[y:[x:sigma]tau]is(tau,<s>f,<s>y),f,g,refis(tau,<s>f),i):is(tau,<s>f,<s>g)
-g@[i:[x:sigma]is(tau,<x>f,<x>g)]
-fisi:='prim':is([x:sigma]tau,f,g)
-+fis
-g@[i:is([x:sigma]tau,f,g)][s:sigma][t:sigma][j:is(s,t)]
-th1:=tris(tau,<s>f,<t>f,<t>g,isf(f,s,t,j),fise(i,t)):is(tau,<s>f,<t>g)
--fis
-p@ot:='prim':'type'
-[o1:ot]
-in:='prim':sigma
-inp:='prim':<in>p
-p@otax1:='prim':injective(ot,sigma,[x:ot]in(x))
-[s:sigma][sp:<s>p]
-otax2:='prim':image(ot,sigma,[x:ot]in(x),s)
-o1@[o2:ot][i:is(ot,o1,o2)]
-isini:=isf(ot,sigma,[x:ot]in(x),o1,o2,i):is(in(o1),in(o2))
-o2@[i:is(in(o1),in(o2))]
-isine:=isfe(ot,sigma,[x:ot]in(x),otax1,o1,o2,i):is(ot,o1,o2)
-sp@out:=soft(ot,sigma,[x:ot]in(x),otax1,s,otax2):ot
-[t:sigma][tp:<t>p][i:is(s,t)]
-isouti:=isinv(ot,sigma,[x:ot]in(x),otax1,s,otax2,t,otax2(t,tp),i):is(ot,out(s,sp),out(t,tp))
-tp@[i:is(ot,out(s,sp),out(t,tp))]
-isoute:=isinve(ot,sigma,[x:ot]in(x),otax1,s,otax2,t,otax2(t,tp),i):is(s,t)
-o1@isoutin:=tris(ot,o1,soft(ot,sigma,[x:ot]in(x),otax1,in(o1),imagei(ot,sigma,[x:ot]in(x),o1)),out(in(o1),inp(o1)),isst1(ot,sigma,[x:ot]in(x),otax1,o1),isinv(ot,sigma,[x:ot]in(x),otax1,in(o1),imagei(ot,sigma,[x:ot]in(x),o1),in(o1),otax2(in(o1),inp(o1)),refis(sigma,in(o1)))):is(ot,o1,out(in(o1),inp(o1)))
-sp@isinout:=ists1(ot,sigma,[x:ot]in(x),otax1,s,otax2):is(s,in(out(s,sp)))
-tau@pairtype:='prim':'type'
-[s:sigma][t:tau]
-pair:='prim':pairtype
-tau@[p1:pairtype]
-first:='prim':sigma
-second:='prim':tau
-pairis1:='prim':is(pairtype,pair(first,second),p1)
-pairis2:=symis(pairtype,pair(first,second),p1,pairis1):is(pairtype,p1,pair(first,second))
-t@firstis1:='prim':is(sigma,first(pair),s)
-firstis2:=symis(sigma,first(pair),s,firstis1):is(sigma,s,first(pair))
-secondis1:='prim':is(tau,second(pair),t)
-secondis2:=symis(tau,second(pair),t,secondis1):is(tau,t,second(pair))
-a@[ksi:'type'][x:ksi][y:ksi]
-+ite
-[z:ksi]
-prop1:=and(imp(a,is(ksi,z,x)),imp(not(a),is(ksi,z,y))):'prop'
-y@[a1:a][x1:ksi][y1:ksi][px1:prop1(x1)][py1:prop1(y1)]
-t1:=ande1(imp(a,is(ksi,x1,x)),imp(not(a),is(ksi,x1,y)),px1):imp(a,is(ksi,x1,x))
-t2:=mp(a,is(ksi,x1,x),a1,t1):is(ksi,x1,x)
-t3:=t2(y1,x1,py1,px1):is(ksi,y1,x)
-t4:=tris2(ksi,x1,y1,x,t2,t3):is(ksi,x1,y1)
-a1@t5:=[s:ksi][t:ksi][ps:prop1(s)][pt:prop1(t)]t4(s,t,ps,pt):amone(ksi,[t:ksi]prop1(t))
-t6:=[x1:a]refis(ksi,x):imp(a,is(ksi,x,x))
-t7:=th2"l.imp"(not(a),is(ksi,x,y),weli(a,a1)):imp(not(a),is(ksi,x,y))
-t8:=andi(imp(a,is(ksi,x,x)),imp(not(a),is(ksi,x,y)),t6,t7):prop1(x)
-t9:=somei(ksi,[t:ksi]prop1(t),x,t8):some(ksi,[t:ksi]prop1(t))
-t10:=onei(ksi,[t:ksi]prop1(t),t5,t9):one(ksi,[t:ksi]prop1(t))
-y@[n:not(a)][x1:ksi][y1:ksi][px1:prop1(x1)][py1:prop1(y1)]
-t11:=ande2(imp(a,is(ksi,x1,x)),imp(not(a),is(ksi,x1,y)),px1):imp(not(a),is(ksi,x1,y))
-t12:=mp(not(a),is(ksi,x1,y),n,t11):is(ksi,x1,y)
-t13:=t12(y1,x1,py1,px1):is(ksi,y1,y)
-t14:=tris2(ksi,x1,y1,y,t12,t13):is(ksi,x1,y1)
-n@t15:=[s:ksi][t:ksi][ps:prop1(s)][pt:prop1(t)]t14(s,t,ps,pt):amone(ksi,[t:ksi]prop1(t))
-t16:=[x1:not(a)]refis(ksi,y):imp(not(a),is(ksi,y,y))
-t17:=th2"l.imp"(a,is(ksi,y,x),n):imp(a,is(ksi,y,x))
-t18:=andi(imp(a,is(ksi,y,x)),imp(not(a),is(ksi,y,y)),t17,t16):prop1(y)
-t19:=somei(ksi,[t:ksi]prop1(t),y,t18):some(ksi,[t:ksi]prop1(t))
-t20:=onei(ksi,[t:ksi]prop1(t),t15,t19):one(ksi,[t:ksi]prop1(t))
-y@t21:=th1"l.imp"(a,one(ksi,[t:ksi]prop1(t)),[t:a]t10(t),[t:not(a)]t20(t)):one(ksi,[t:ksi]prop1(t))
--ite
-ite:=ind(ksi,[t:ksi]prop1".ite"(t),t21".ite"):ksi
-+*ite
-y@t22:=oneax(ksi,[t:ksi]prop1(t),t21):prop1(ite)
-t23:=ande1(imp(a,is(ksi,ite,x)),imp(not(a),is(ksi,ite,y)),t22):imp(a,is(ksi,ite,x))
-t24:=ande2(imp(a,is(ksi,ite,x)),imp(not(a),is(ksi,ite,y)),t22):imp(not(a),is(ksi,ite,y))
--ite
-y@[a1:a]
-itet:=mp(a,is(ksi,ite,x),a1,t23".ite"):is(ksi,ite,x)
-y@[n:not(a)]
-itef:=mp(not(a),is(ksi,ite,y),n,t24".ite"):is(ksi,ite,y)
-sigma@[s0:sigma][t0:sigma]
-+wissel
-[s:sigma]
-wa:=ite(is(s,s0),sigma,t0,s):sigma
-[i:is(s,s0)]
-t1:=itet(is(s,s0),sigma,t0,s,i):is(wa,t0)
-s@[n:not(is(s,s0))]
-t2:=itef(is(s,s0),sigma,t0,s,n):is(wa,s)
-s@wb:=ite(is(s,t0),sigma,s0,wa):sigma
-[i:is(s,t0)]
-t3:=itet(is(s,t0),sigma,s0,wa,i):is(wb,s0)
-s@[n:not(is(s,t0))]
-t4:=itef(is(s,t0),sigma,s0,wa,n):is(wb,wa)
-s@[i:is(s,s0)][j:is(s0,t0)]
-t5:=tris(wb,s0,t0,t3(tris(s,s0,t0,i,j)),j):is(wb,t0)
-i@[n:not(is(s0,t0))]
-t6:=tris(wb,wa,t0,t4(th2"e.notis"(s0,t0,s,n,i)),t1(i)):is(wb,t0)
-i@t7:=th1"l.imp"(is(s0,t0),is(wb,t0),[t:is(s0,t0)]t5(t),[t:not(is(s0,t0))]t6(t)):is(wb,t0)
-s@[n:not(is(s,s0))][o:not(is(s,t0))]
-t8:=tris(wb,wa,s,t4(o),t2(n)):is(wb,s)
--wissel
-wissel:=[x:sigma]wb".wissel"(x):[x:sigma]sigma
-[s:sigma][i:is(s,s0)]
-iswissel1:=t7".wissel"(s,i):is(<s>wissel,t0)
-s@[i:is(s,t0)]
-iswissel2:=t3".wissel"(s,i):is(<s>wissel,s0)
-s@[n:not(is(s,s0))][o:not(is(s,t0))]
-iswissel3:=t8".wissel"(s,n,o):is(<s>wissel,s)
-+*wissel
-s@[t:sigma][i:is(wb(s),wb(t))][n:not(is(s,t))][j:is(s,s0)]
-t9:=symnotis(s0,t,th1"e.notis"(s,t,s0,n,j)):not(is(t,s0))
-[k:is(s0,t0)]
-t10:=th3"e.notis"(t,s0,t0,t9,k):not(is(t,t0))
-t11:=tris(wb(s),wb(t),t,i,t8(t,t9,t10)):is(wb(s),t)
-t12:=<tris1(t,t0,wb(s),t11,t7(j))>t10:con
-j@t13:=[v:is(s0,t0)]t12(v):not(is(s0,t0))
-[k:is(t,t0)]
-t14:=tris(wb(s),wb(t),s0,i,t3(t,k)):is(wb(s),s0)
-t15:=t12(tris1(s0,t0,wb(s),t14,t7(j))):con
-j@t16:=[v:is(t,t0)]t15(v):not(is(t,t0))
-t17:=tris(wb(s),wb(t),t,i,t8(t,t9,t16)):is(wb(s),t)
-t18:=t15(tris1(t,t0,wb(s),t17,t7(j))):con
-n@t19:=[v:is(s,s0)]t18(v):not(is(s,s0))
-t20:=t19(t,s,symis(wb(s),wb(t),i),symnotis(s,t,n)):not(is(t,s0))
-[j:is(s,t0)]
-t21:=symnotis(t0,t,th1"e.notis"(s,t,t0,n,j)):not(is(t,t0))
-t22:=tris(wb(s),wb(t),t,i,t8(t,t20,t21)):is(wb(s),t)
-t23:=<tris1(t,s0,wb(s),t22,t3(j))>t20:con
-n@t24:=[v:is(s,t0)]t23(v):not(is(s,t0))
-t25:=t24(t,s,symis(wb(s),wb(t),i),symnotis(s,t,n)):not(is(t,t0))
-t26:=tris(wb(s),wb(t),t,i,t8(t,t20,t25)):is(wb(s),t)
-t27:=<tris1(s,t,wb(s),t8(t19,t24),t26)>n:con
-i@t28:=et(is(s,t),[v:not(is(s,t))]t27(v)):is(s,t)
-t0@th1:=[x:sigma][y:sigma][v:is(wb(x),wb(y))]t28(x,y,v):injective(sigma,sigma,wissel)
-s@[i:is(s,s0)]
-t29:=tris2(s,wb(t0),s0,i,t3(t0,refis(t0))):is(s,wb(t0))
-t30:=somei(sigma,[x:sigma]is(s,wb(x)),t0,t29):image(sigma,sigma,wissel,s)
-s@[i:is(s,t0)]
-t31:=tris2(s,wb(s0),t0,i,t7(s0,refis(s0))):is(s,wb(s0))
-t32:=somei(sigma,[x:sigma]is(s,wb(x)),s0,t31):image(sigma,sigma,wissel,s)
-s@[n:not(is(s,s0))][o:not(is(s,t0))]
-t33:=symis(wb(s),s,t8(n,o)):is(s,wb(s))
-t34:=somei(sigma,[x:sigma]is(s,wb(x)),s,t33):image(sigma,sigma,wissel,s)
-n@t35:=th1"l.imp"(is(s,t0),image(sigma,sigma,wissel,s),[v:is(s,t0)]t32(v),[v:not(is(s,t0))]t34(v)):image(sigma,sigma,wissel,s)
-s@t36:=th1"l.imp"(is(s,s0),image(sigma,sigma,wissel,s),[v:is(s,s0)]t30(v),[v:not(is(s,s0))]t35(v)):image(sigma,sigma,wissel,s)
-t0@th2:=[x:sigma]t36(x):surjective(sigma,sigma,wissel)
-th3:=andi(injective(sigma,sigma,wissel),surjective(sigma,sigma,wissel),th1,th2):bijective(sigma,sigma,wissel)
--wissel
-tau@[f:[x:sigma]tau][s0:sigma][t0:sigma]
-changef:=[x:sigma]<<x>wissel(s0,t0)>f:[x:sigma]tau
-[s:sigma][i:is(s,s0)]
-changef1:=isf(sigma,tau,f,<s>wissel(s0,t0),t0,iswissel1(s0,t0,s,i)):is(tau,<s>changef,<t0>f)
-s@[i:is(s,t0)]
-changef2:=isf(sigma,tau,f,<s>wissel(s0,t0),s0,iswissel2(s0,t0,s,i)):is(tau,<s>changef,<s0>f)
-s@[n:not(is(s,s0))][o:not(is(s,t0))]
-changef3:=isf(sigma,tau,f,<s>wissel(s0,t0),s,iswissel3(s0,t0,s,n,o)):is(tau,<s>changef,<s>f)
-+*wissel
-t0@[i:injective(f)]
-th4:=th4"e.inj"(sigma,sigma,tau,wissel(s0,t0),f,th1(s0,t0),i):injective(changef)
-t0@[s:surjective(f)]
-th5:=th1"e.surj"(sigma,sigma,tau,wissel(s0,t0),f,th2(s0,t0),s):surjective(changef)
-t0@[b:bijective(f)]
-th6:=th1"e.bij"(sigma,sigma,tau,wissel(s0,t0),f,th3(s0,t0),b):bijective(changef)
--wissel
--e
-+r
-a@[b:[x:a]'prop']
-%suggestion by van Daalen to remove eta-reduction
-%imp:=b:'prop' %original line
-imp:=[x:a]<x>b:'prop'
-%end of suggestion
-[a1:a][i:imp(a,b)]
-mp:=<a1>i:<a1>b
-+imp
-b@[n:not(a)]
-%set etared
-th2:=[x:a]cone(<x>b,mp"l"(a,con,x,n)):imp(a,b)
-%reset etared
--imp
-b@ec:=[x:a]not(<x>b):'prop'
-[n:not(a)]
-eci1:=[x:a]cone(not(<x>b),mp"l"(a,con,x,n)):ec(a,b)
-%suggestion by Guidi to remove @-typing by adding imp-introduction
-%b@[a1:and(a,b)] %original line
-%ande2:=<ande1(a,b,a1)>ande2"l"(a,b,a1):<ande1(a,b,a1)>b %original line
-b@[a1:and(a,imp(a,b))]
-ande2:=<ande1(a,imp(a,b),a1)>ande2"l"(a,imp(a,b),a1):<ande1(a,imp(a,b),a1)>b
-%end of suggestion
-a@[ksi:'type']
-+ite
-[x1:ksi][y1:ksi]
-is:=is"l.e"(ksi,x1,y1):'prop'
--ite
-[x:[t:a]ksi][y:[t:not(a)]ksi][i:[t:a][u:a]is".ite"(<t>x,<u>x)][j:[t:not(a)][u:not(a)]is".ite"(<t>y,<u>y)]
-+*ite
-j@[z:ksi]
-prop1:=and(imp(a,[t:a]is(z,<t>x)),imp(not(a),[t:not(a)]is(z,<t>y))):'prop'
-j@[a1:a][x1:ksi][y1:ksi][px1:prop1(x1)][py1:prop1(y1)]
-t1:=ande1"l"(imp(a,[t:a]is(x1,<t>x)),imp(not(a),[t:not(a)]is(x1,<t>y)),px1):imp(a,[t:a]is(x1,<t>x))
-t2:=mp(a,[t:a]is(x1,<t>x),a1,t1):is(x1,<a1>x)
-t3:=t2(y1,x1,py1,px1):is(y1,<a1>x)
-t4:=tris2"l.e"(ksi,x1,y1,<a1>x,t2,t3):is(x1,y1)
-a1@t5:=[s:ksi][t:ksi][ps:prop1(s)][pt:prop1(t)]t4(s,t,ps,pt):amone"l.e"(ksi,[t:ksi]prop1(t))
-t6:=<a1>i:imp(a,[t:a]is(<a1>x,<t>x))
-t7:=th2"r.imp"(not(a),[t:not(a)]is(<a1>x,<t>y),weli(a,a1)):imp(not(a),[t:not(a)]is(<a1>x,<t>y))
-t8:=andi(imp(a,[t:a]is(<a1>x,<t>x)),imp(not(a),[t:not(a)]is(<a1>x,<t>y)),t6,t7):prop1(<a1>x)
-t9:=somei(ksi,[t:ksi]prop1(t),<a1>x,t8):some(ksi,[t:ksi]prop1(t))
-t10:=onei"l.e"(ksi,[t:ksi]prop1(t),t5,t9):one"l.e"(ksi,[t:ksi]prop1(t))
-j@[n:not(a)][x1:ksi][y1:ksi][px1:prop1(x1)][py1:prop1(y1)]
-t11:=ande2"l"(imp(a,[t:a]is(x1,<t>x)),imp(not(a),[t:not(a)]is(x1,<t>y)),px1):imp(not(a),[t:not(a)]is(x1,<t>y))
-t12:=mp(not(a),[t:not(a)]is(x1,<t>y),n,t11):is(x1,<n>y)
-t13:=t12(y1,x1,py1,px1):is(y1,<n>y)
-t14:=tris2"l.e"(ksi,x1,y1,<n>y,t12,t13):is(x1,y1)
-n@t15:=[s:ksi][t:ksi][ps:prop1(s)][pt:prop1(t)]t14(s,t,ps,pt):amone"l.e"(ksi,[t:ksi]prop1(t))
-t16:=<n>j:imp(not(a),[t:not(a)]is(<n>y,<t>y))
-t17:=th2"r.imp"(a,[t:a]is(<n>y,<t>x),n):imp(a,[t:a]is(<n>y,<t>x))
-t18:=andi"l"(imp(a,[t:a]is(<n>y,<t>x)),imp(not(a),[t:not(a)]is(<n>y,<t>y)),t17,t16):prop1(<n>y)
-t19:=somei(ksi,[t:ksi]prop1(t),<n>y,t18):some(ksi,[t:ksi]prop1(t))
-t20:=onei"l.e"(ksi,[t:ksi]prop1(t),t15,t19):one"l.e"(ksi,[t:ksi]prop1(t))
-j@t21:=th1"l.imp"(a,one"l.e"(ksi,[t:ksi]prop1(t)),[t:a]t10(t),[t:not(a)]t20(t)):one"l.e"(ksi,[t:ksi]prop1(t))
--ite
-j@ite:=ind"l.e"(ksi,[t:ksi]prop1".ite"(t),t21".ite"):ksi
-+*ite
-j@t22:=oneax"l.e"(ksi,[t:ksi]prop1(t),t21):prop1(ite)
-t23:=ande1"l"(imp(a,[t:a]is(ite,<t>x)),imp(not(a),[t:not(a)]is(ite,<t>y)),t22):imp(a,[t:a]is(ite,<t>x))
-t24:=ande2"l"(imp(a,[t:a]is(ite,<t>x)),imp(not(a),[t:not(a)]is(ite,<t>y)),t22):imp(not(a),[t:not(a)]is(ite,<t>y))
--ite
-j@[a1:a]
-itet:=mp(a,[t:a]is".ite"(ite,<t>x),a1,t23".ite"):is".ite"(ksi,ite,<a1>x)
-j@[n:not(a)]
-itef:=mp(not(a),[t:not(a)]is".ite"(ite,<t>y),n,t24".ite"):is".ite"(ksi,ite,<n>y)
--r
-+*e
-+st
-sigma@set:='prim':'type'
-[s:sigma][s0:set]
-esti:='prim':'prop'
-p@setof:='prim':set
-[s:sigma][sp:<s>p]
-estii:='prim':esti(s,setof(p))
-s@[e:esti(s,setof(p))]
-estie:='prim':<s>p
-sigma@[s0:set]
-empty:=none([x:sigma]esti(x,s0)):'prop' %none
-nonempty:=some([x:sigma]esti(x,s0)):'prop'
-[n:[x:sigma]not(esti(x,s0))]
-emptyi:=n:empty(s0)
-s0@[e:empty(s0)][s:sigma]
-emptye:=<s>e:not(esti(s,s0))
-s0@[s:sigma][ses0:esti(s,s0)]
-nonemptyi:=somei([x:sigma]esti(x,s0),s,ses0):nonempty(s0)
-s0@[n:nonempty(s0)][x:'prop'][x1:[y:sigma][z:esti(y,s0)]x]
-nonemptyapp:=someapp([y:sigma]esti(y,s0),n,x,x1):x
-s0@[t0:set]
-incl:=all([x:sigma]imp(esti(x,s0),esti(x,t0))):'prop'
-[e:[x:sigma][y:esti(x,s0)]esti(x,t0)]
-incli:=e:incl(s0,t0)
-t0@[i:incl(s0,t0)][s:sigma][ses0:esti(s,s0)]
-incle:=<ses0><s>i:esti(s,t0)
-s0@refincl:=[x:sigma][y:esti(x,s0)]y:incl(s0,s0)
-t0@disj:=all([x:sigma]ec(esti(x,s0),esti(x,t0))):'prop'
-[n:[x:sigma][y:esti(x,s0)]not(esti(x,t0))]
-disji1:=n:disj(s0,t0)
-t0@[n:[x:sigma][y:esti(x,t0)]not(esti(x,s0))]
-disji2:=[x:sigma]th2"l.ec"(esti(x,s0),esti(x,t0),<x>n):disj(s0,t0)
-t0@[d:disj(s0,t0)][s:sigma][ses0:esti(s,s0)]
-disje1:=ece1(esti(s,s0),esti(s,t0),<s>d,ses0):not(esti(s,t0))
-s@[set0:esti(s,t0)]
-disje2:=ece2(esti(s,s0),esti(s,t0),<s>d,set0):not(esti(s,s0))
-t0@[d:disj(s0,t0)]
-symdisj:=[x:sigma][y:esti(x,t0)]disje2(d,x,y):disj(t0,s0)
-+disj
-t0@[s:sigma][ses0:esti(s,s0)][set0:esti(s,t0)]
-th1:=th1"l.all"([x:sigma]ec(esti(x,s0),esti(x,t0)),s,th4"l.imp"(esti(s,s0),not(esti(s,t0)),ses0,weli(esti(s,t0),set0))):not(disj(s0,t0))
-th2:=th1(t0,s0,s,set0,ses0):not(disj(t0,s0))
--disj
-t0@[i:is(set,s0,t0)][s:sigma][ses0:esti(s,s0)]
-issete1:=isp(set,[x:set]esti(s,x),s0,t0,ses0,i):esti(s,t0)
-s@[set0:esti(s,t0)]
-issete2:=isp1(set,[x:set]esti(s,x),t0,s0,set0,i):esti(s,s0)
-+isset
-i@th1:=[x:sigma][y:esti(x,s0)]issete1(x,y):incl(s0,t0)
-th2:=[x:sigma][y:esti(x,t0)]issete2(x,y):incl(t0,s0)
--isset
-t0@[i:incl(s0,t0)][j:incl(t0,s0)]
-isseti:='prim':is(set,s0,t0)
-+*isset
-t0@[s:sigma][ses0:esti(s,s0)][n:not(esti(s,t0))]
-th3:=th3"l.imp"(is(set,s0,t0),esti(s,t0),n,[t:is(set,s0,t0)]issete1(t,s,ses0)):not(is(set,s0,t0))
-th4:=symnotis(set,s0,t0,th3):not(is(set,t0,s0))
-s@nissetprop:=and(esti(s,s0),not(esti(s,t0))):'prop'
-[n:not(nissetprop(s0,t0,s))][e:esti(s,s0)]
-t1:=et(esti(s,t0),th3"l.and"(esti(s,s0),not(esti(s,t0)),n,e)):esti(s,t0)
-t0@[n:not(is(set,s0,t0))][m:not(some([x:sigma]nissetprop(s0,t0,x)))][l:none([x:sigma]nissetprop(t0,s0,x))][s:sigma] %none
-t2:=th4"l.some"([x:sigma]nissetprop(s0,t0,x),m,s):not(nissetprop(s0,t0,s))
-t3:=<s>l:not(nissetprop(t0,s0,s))
-l@t4:=isseti(s0,t0,[x:sigma][y:esti(x,s0)]t1(s0,t0,x,t2(x),y),[x:sigma][y:esti(x,t0)]t1(t0,s0,x,t3(x),y)):is(set,s0,t0)
-m@t5:=th3"l.imp"(none([x:sigma]nissetprop(t0,s0,x)),is(set,s0,t0),n,[y:none([x:sigma]nissetprop(t0,s0,x))]t4(y)):some([x:sigma]nissetprop(t0,s0,x)) %none x 2
-n@th5:=th1"l.or"(some([x:sigma]nissetprop(s0,t0,x)),some([x:sigma]nissetprop(t0,s0,x)),[y:not(some([x:sigma]nissetprop(s0,t0,x)))]t5(y)):or(some([x:sigma]nissetprop(s0,t0,x)),some([x:sigma]nissetprop(t0,s0,x)))
--isset
-sigma@[alpha:'type'][sa:[x:alpha]set]
-unmore:=setof([x:sigma]some(alpha,[y:alpha]esti(x,<y>sa))):set
-[s:sigma][a:alpha][seasa:esti(s,<a>sa)]
-eunmore1:=estii([x:sigma]some(alpha,[y:alpha]esti(x,<y>sa)),s,somei(alpha,[y:alpha]esti(s,<y>sa),a,seasa)):esti(s,unmore(sa))
-s@[seun:esti(s,unmore(sa))][x:'prop'][x1:[y:alpha][z:esti(s,<y>sa)]x]
-unmoreapp:=someapp(alpha,[y:alpha]esti(s,<y>sa),estie([z:sigma]some(alpha,[y:alpha]esti(z,<y>sa)),s,seun),x,x1):x
-+eq
-sigma@[r:[x:sigma][y:sigma]'prop'][refr1:[x:sigma]<x><x>r][symr1:[x:sigma][y:sigma][t:<y><x>r]<x><y>r][trr1:[x:sigma][y:sigma][z:sigma][t:<y><x>r][u:<z><y>r]<z><x>r][s:sigma]
-refr:=<s>refr1:<s><s>r
-[t:sigma][tsr:<t><s>r]
-symr:=<tsr><t><s>symr1:<s><t>r
-t@[u:sigma][tsr:<t><s>r][utr:<u><t>r]
-trr:=<utr><tsr><u><t><s>trr1:<u><s>r
-u@[sur:<s><u>r][tur:<t><u>r]
-tr1r:=trr(s,u,t,symr(u,s,sur),tur):<t><s>r
-u@[usr:<u><s>r][utr:<u><t>r]
-tr2r:=trr(s,u,t,usr,symr(t,u,utr)):<t><s>r
-s@ecelt:=setof(<s>r):set
-+1
-th1:=estii(<s>r,s,refr):esti(s,ecelt(s))
-t@[tsr:<t><s>r]
-th2:=estii(<s>r,t,tsr):esti(t,ecelt(s))
-t@[e:esti(t,ecelt(s))]
-th3:=estie(<s>r,t,e):<t><s>r
-tsr@[u:sigma][e:esti(u,ecelt(s))]
-t1:=th2(t,u,tr1r(t,u,s,tsr,th3(u,e))):esti(u,ecelt(t))
-tsr@th4:=isseti(ecelt(s),ecelt(t),[x:sigma][y:esti(x,ecelt(s))]t1(x,y),[x:sigma][y:esti(x,ecelt(t))]t1(t,s,symr(tsr),x,y)):is(set,ecelt(s),ecelt(t))
-t@[n:not(<t><s>r)][u:sigma][e:esti(u,ecelt(s))]
-t2:=th3"l.imp"(esti(u,ecelt(t)),<t><s>r,n,[x:esti(u,ecelt(t))]tr2r(s,t,u,th3(u,e),th3(t,u,x))):not(esti(u,ecelt(t)))
-n@th5:=[x:sigma][y:esti(x,ecelt(s))]t2(x,y):disj(ecelt(s),ecelt(t))
-s@th6:=nonemptyi(ecelt(s),s,th1):nonempty(ecelt(s))
--1
-trr1@[s0:set][s:sigma]
-ecp:=is(set,s0,ecelt(s)):'prop'
-s0@anec:=some([x:sigma]ecp(x)):'prop'
-+2
-trr1@[s:sigma]
-th1:=somei([x:sigma]ecp(ecelt(s),x),s,refis(set,ecelt(s))):anec(ecelt(s))
--2
-[ecs0:anec(s0)]
-+*2
-ecs0@[s:sigma][ses0:esti(s,s0)][t:sigma][e:ecp(s0,t)]
-t1:=issete1(s0,ecelt(t),e,s,ses0):esti(s,ecelt(t))
-t2:=th4"eq.1"(t,s,th3"eq.1"(t,s,t1)):is(set,ecelt(t),ecelt(s))
-t3:=tris(set,s0,ecelt(t),ecelt(s),e,t2):is(set,s0,ecelt(s))
-ses0@th2:=someapp([x:sigma]ecp(x),ecs0,is(set,s0,ecelt(s)),[x:sigma][y:ecp(x)]t3(x,y)):is(set,s0,ecelt(s))
-[t:sigma][tes0:esti(t,s0)]
-th3:=th3"eq.1"(s,t,issete1(s0,ecelt(s),th2,t,tes0)):<t><s>r
-t@[tsr:<t><s>r]
-th4:=issete2(s0,ecelt(s),th2,t,th2"eq.1"(s,t,tsr)):esti(t,s0)
-ecs0@[s:sigma][e:ecp(s0,s)]
-t4:=isp(set,[x:set]nonempty(x),ecelt(s),s0,th6"eq.1"(s),symis(set,s0,ecelt(s),e)):nonempty(s0)
-ecs0@th5:=someapp([x:sigma]ecp(x),ecs0,nonempty(s0),[x:sigma][y:ecp(x)]t4(x,y)):nonempty(s0)
--2
-+3
-ecs0@[t0:set][ect0:anec(t0)][s:sigma][ses0:esti(s,s0)][t:sigma][tet0:esti(t,t0)][tsr:<t><s>r]
-th1:=tr3is(set,s0,ecelt(s),ecelt(t),t0,th2"eq.2"(s0,ecs0,s,ses0),th4"eq.1"(s,t,tsr),symis(set,t0,ecelt(t),th2"eq.2"(t0,ect0,t,tet0))):is(set,s0,t0)
-tet0@[n:not(<t><s>r)]
-t1:=isp1(set,[x:set]disj(x,ecelt(t)),ecelt(s),s0,th5"eq.1"(s,t,n),th2"eq.2"(s0,ecs0,s,ses0)):disj(s0,ecelt(t))
-th2:=isp1(set,[x:set]disj(s0,x),ecelt(t),t0,t1,th2"eq.2"(t0,ect0,t,tet0)):disj(s0,t0)
-t0@[i:is(set,s0,t0)][s:sigma][ses0:esti(s,s0)]
-t2:=issete1(s0,t0,i,s,ses0):esti(s,t0)
-t3:=th1"st.disj"(s0,t0,s,ses0,t2):not(disj(s0,t0))
-i@th3:=nonemptyapp(s0,th5"eq.2"(s0,ecs0),not(disj(s0,t0)),[x:sigma][y:esti(x,s0)]t3(x,y)):not(disj(s0,t0))
--3
-trr1@ect:=ot(set,[x:set]anec(x)):'type'
-ecs0@ectset:=out(set,[x:set]anec(x),s0,ecs0):ect
-trr1@[s:sigma]
-ectelt:=ectset(ecelt(s),th1".2"(s)):ect
-trr1@[e:ect]
-ecect:=in(set,[x:set]anec(x),e):set
-+4
-th1:=inp(set,[x:set]anec(x),e):anec(ecect(e))
-th2:=th5"eq.2"(ecect(e),th1):nonempty(ecect(e))
-[x:'prop'][x1:[y:sigma][z:esti(y,ecect(e))]x]
-th3:=nonemptyapp(ecect(e),th2,x,x1):x
-s@th4:=isinout(set,[x:set]anec(x),ecelt(s),th1"eq.2"(s)):is(set,ecelt(s),ecect(ectelt(s)))
-th5:=issete1(ecelt(s),ecect(ectelt(s)),th4,s,th1"eq.1"(s)):esti(s,ecect(ectelt(s)))
-th6:=eunmore1(ect,[x:ect]ecect(x),s,ectelt(s),th5):esti(s,unmore(ect,[x:ect]ecect(x)))
-e@[s:sigma][see:esti(s,ecect(e))][t:sigma][tee:esti(t,ecect(e))]
-th7:=th3"eq.2"(ecect(e),th1,s,see,t,tee):<t><s>r
-t@[tsr:<t><s>r]
-th8:=th4"eq.2"(ecect(e),th1,s,see,t,tsr):esti(t,ecect(e))
--4
-+5
-[f:ect][i:is(ect,e,f)]
-th1:=isini(set,[x:set]anec(x),e,f,i):is(set,ecect(e),ecect(f))
-f@[i:is(set,ecect(e),ecect(f))]
-th2:=isine(set,[x:set]anec(x),e,f,i):is(ect,e,f)
-f@[s:sigma][see:esti(s,ecect(e))][t:sigma][tef:esti(t,ecect(f))][tsr:<t><s>r]
-th3:=th2(th1"eq.3"(ecect(e),th1"eq.4"(e),ecect(f),th1"eq.4"(f),s,see,t,tef,tsr)):is(ect,e,f)
-see@[i:is(ect,e,f)]
-th4:=issete1(ecect(e),ecect(f),th1(i),s,see):esti(s,ecect(f))
-tef@[i:is(ect,e,f)]
-th5:=th3"eq.2"(ecect(f),th1"eq.4"(f),s,th4(i),t,tef):<t><s>r
-trr1@[s:sigma][t:sigma][tsr:<t><s>r]
-th6:=isouti(set,[x:set]anec(x),ecelt(s),th1"eq.2"(s),ecelt(t),th1"eq.2"(t),th4"eq.1"(s,t,tsr)):is(ect,ectelt(s),ectelt(t))
--5
-trr1@[alpha:'type'][fu:[x:sigma]alpha]
-fixfu:=[x:sigma][y:sigma][z:<y><x>r]is(alpha,<x>fu,<y>fu):'prop'
-+10
-[ff:fixfu][e:ect][a1:alpha][s:sigma]
-prop1:=and(esti(s,ecect(e)),is(alpha,<s>fu,a1)):'prop'
-a1@prop2:=some([x:sigma]prop1(x)):'prop'
-e@[s:sigma][see:esti(s,ecect(e))]
-t1:=andi(esti(s,ecect(e)),is(alpha,<s>fu,<s>fu),see,refis(alpha,<s>fu)):prop1(<s>fu,s)
-t2:=somei([x:sigma]prop1(<s>fu,x),s,t1):prop2(<s>fu)
-t3:=somei(alpha,[x:alpha]prop2(x),<s>fu,t2):some(alpha,[x:alpha]prop2(x))
-e@t4:=th3"eq.4"(e,some(alpha,[x:alpha]prop2(x)),[x:sigma][y:esti(x,ecect(e))]t3(x,y)):some(alpha,[x:alpha]prop2(x))
-a1@[b1:alpha][pa1:prop2(a1)][pb1:prop2(b1)][s:sigma][pa1s:prop1(a1,s)][t:sigma][pb1t:prop1(b1,t)]
-t5:=ande1(esti(s,ecect(e)),is(alpha,<s>fu,a1),pa1s):esti(s,ecect(e))
-t6:=ande1(esti(t,ecect(e)),is(alpha,<t>fu,b1),pb1t):esti(t,ecect(e))
-t7:=th7"eq.4"(e,s,t5,t,t6):<t><s>r
-t8:=ande2(esti(s,ecect(e)),is(alpha,<s>fu,a1),pa1s):is(alpha,<s>fu,a1)
-t9:=ande2(esti(t,ecect(e)),is(alpha,<t>fu,b1),pb1t):is(alpha,<t>fu,b1)
-t10:=tr3is(alpha,a1,<s>fu,<t>fu,b1,symis(alpha,<s>fu,a1,t8),<t7><t><s>ff,t9):is(alpha,a1,b1)
-pa1s@t11:=someapp([x:sigma]prop1(b1,x),pb1,is(alpha,a1,b1),[x:sigma][y:prop1(b1,x)]t10(x,y)):is(alpha,a1,b1)
-pb1@t12:=someapp([x:sigma]prop1(a1,x),pa1,is(alpha,a1,b1),[x:sigma][y:prop1(a1,x)]t11(x,y)):is(alpha,a1,b1)
-e@t13:=[x:alpha][y:alpha][u:prop2(x)][v:prop2(y)]t12(x,y,u,v):amone(alpha,[x:alpha]prop2(x))
-t14:=onei(alpha,[x:alpha]prop2(x),t13,t4):one(alpha,[x:alpha]prop2(x))
--10
-e".10"@indeq:=ind(alpha,[x:alpha]prop2".10"(x),t14".10"):alpha
-+*10
-e@th1:=oneax(alpha,[x:alpha]prop2(x),t14):some([x:sigma]and(esti(x,ecect(e)),is(alpha,<x>fu,indeq)))
-[s:sigma][see:esti(s,ecect(e))]
-th2:=t12(<s>fu,indeq,t2(s,see),th1):is(alpha,<s>fu,indeq)
-ff@[s:sigma]
-th3:=th2(ectelt(s),s,th5"eq.4"(s)):is(alpha,<s>fu,indeq(ectelt(s)))
--10
-alpha@[fu2:[x:sigma][y:sigma]alpha]
-fixfu2:=[x:sigma][y:sigma][z:sigma][u:sigma][v:<y><x>r][w:<u><z>r]is(alpha,<z><x>fu2,<u><y>fu2):'prop'
-+11
-[ff2:fixfu2][s:sigma][t:sigma][tsr:<t><s>r][u:sigma]
-t1:=<refr(u)><tsr><u><u><t><s>ff2:is(alpha,<u><s>fu2,<u><t>fu2)
-tsr@t2:=fisi(sigma,alpha,<s>fu2,<t>fu2,[x:sigma]t1(x)):is([x:sigma]alpha,<s>fu2,<t>fu2)
-ff2@[e:ect]
-i:=indeq([x:sigma]alpha,fu2,[x:sigma][y:sigma][z:<y><x>r]t2(x,y,z),e):[x:sigma]alpha
-[s:sigma][t:sigma][tsr:<t><s>r][u:sigma][uee:esti(u,ecect(e))]
-t3:=th2"eq.10"([x:sigma]alpha,fu2,[x:sigma][y:sigma][z:<y><x>r]t2(x,y,z),e,u,uee):is([x:sigma]alpha,<u>fu2,i)
-t4:=fise(alpha,<u>fu2,i,t3,s):is(alpha,<s><u>fu2,<s>i)
-t5:=fise(alpha,<u>fu2,i,t3,t):is(alpha,<t><u>fu2,<t>i)
-t6:=<tsr><refr(u)><t><s><u><u>ff2:is(alpha,<s><u>fu2,<t><u>fu2)
-t7:=tr3is(alpha,<s>i,<s><u>fu2,<t><u>fu2,<t>i,symis(alpha,<s><u>fu2,<s>i,t4),t6,t5):is(alpha,<s>i,<t>i)
-tsr@t8:=th3"eq.4"(e,is(alpha,<s>i,<t>i),[x:sigma][y:esti(x,ecect(e))]t7(x,y)):is(alpha,<s>i,<t>i)
--11
-e".11"@[f:ect]
-indeq2:=indeq(i".11",[x:sigma][y:sigma][z:<y><x>r]t8".11"(x,y,z),f):alpha
-+*11
-f@[s:sigma][see:esti(s,ecect(e))][t:sigma][tef:esti(t,ecect(f))]
-t9:=th2"eq.10"(i,[x:sigma][y:sigma][z:<y><x>r]t8(x,y,z),f,t,tef):is(alpha,<t>i,indeq2(e,f))
-t10:=th2"eq.10"([x:sigma]alpha,fu2,[x:sigma][y:sigma][z:<y><x>r]t2(x,y,z),e,s,see):is([x:sigma]alpha,<s>fu2,i)
-t11:=fise(alpha,<s>fu2,i,t10,t):is(alpha,<t><s>fu2,<t>i)
-th1:=tris(alpha,<t><s>fu2,<t>i,indeq2,t11,t9):is(alpha,<t><s>fu2,indeq2(e,f))
-ff2@[s:sigma][t:sigma]
-th2:=th1(ectelt(s),ectelt(t),s,th5"eq.4"(s),t,th5"eq.4"(t)):is(alpha,<t><s>fu2,indeq2(ectelt(s),ectelt(t)))
--11
-+landau
-+n
-@nat:='prim':'type'
-[x:nat][y:nat]
-is:=is"e"(nat,x,y):'prop'
-nis:=not(is(x,y)):'prop'
-x@[s:set(nat)]
-in:=esti(nat,x,s):'prop'
-@[p:[x:nat]'prop']
-some:=some"l"(nat,p):'prop'
-all:=all"l"(nat,p):'prop'
-one:=one"e"(nat,p):'prop'
-@1:='prim':nat
-suc:='prim':[x:nat]nat
-[x:nat][y:nat][i:is(x,y)]
-ax2:=isf(nat,nat,suc,x,y,i):is(<x>suc,<y>suc)
-@ax3:='prim':[x:nat]nis(<x>suc,1)
-ax4:='prim':[x:nat][y:nat][u:is(<x>suc,<y>suc)]is(x,y)
-[s:set(nat)]
-cond1:=in(1,s):'prop'
-cond2:=all([x:nat]imp(in(x,s),in(<x>suc,s))):'prop'
-@ax5:='prim':[s:set(nat)][u:cond1(s)][v:cond2(s)][x:nat]in(x,s)
-[p:[x:nat]'prop'][1p:<1>p][xsp:[x:nat][y:<x>p]<<x>suc>p][x:nat]
-+i1
-s:=setof(nat,p):set(nat)
-t1:=estii(nat,p,1,1p):cond1(s)
-[y:nat][yes:in(y,s)]
-t2:=estie(nat,p,y,yes):<y>p
-t3:=estii(nat,p,<y>suc,<t2><y>xsp):in(<y>suc,s)
-x@t4:=<x><[y:nat][u:in(y,s)]t3(y,u)><t1><s>ax5:in(x,s)
--i1
-induction:=estie(nat,p,x,t4".i1"):<x>p
-@[x:nat][y:nat][n:nis(x,y)]
-+21
-[i:is(<x>suc,<y>suc)]
-t1:=<i><y><x>ax4:is(x,y)
--21
-satz1:=th3"l.imp"(is(<x>suc,<y>suc),is(x,y),n,[u:is(<x>suc,<y>suc)]t1".21"(u)):nis(<x>suc,<y>suc)
-+22
-x@prop1:=nis(<x>suc,x):'prop'
-@t1:=<1>ax3:prop1(1)
-x@[p:prop1(x)]
-t2:=satz1(<x>suc,x,p):prop1(<x>suc)
--22
-x@satz2:=induction([y:nat]prop1".22"(y),t1".22",[y:nat][u:prop1".22"(y)]t2".22"(y,u),x):nis(<x>suc,x)
-+23
-prop1:=or(is(x,1),some([u:nat]is(x,<u>suc))):'prop'
-@t1:=ori1(is(1,1),some([u:nat]is(1,<u>suc)),refis(nat,1)):prop1(1)
-x@t2:=somei(nat,[u:nat]is(<x>suc,<u>suc),x,refis(nat,<x>suc)):some([u:nat]is(<x>suc,<u>suc))
-t3:=ori2(is(<x>suc,1),some([u:nat]is(<x>suc,<u>suc)),t2):prop1(<x>suc)
-t4:=induction([y:nat]prop1(y),t1,[y:nat][u:prop1(y)]t3(y),x):prop1(x)
--23
-[n:nis(x,1)]
-satz3:=ore2(is(x,1),some([u:nat]is(x,<u>suc)),t4".23",n):some([u:nat]is(x,<u>suc))
-y@[z:nat][i:is(x,<y>suc)][j:is(x,<z>suc)]
-+*23
-j@t5:=<tris1(nat,<y>suc,<z>suc,x,i,j)><z><y>ax4:is(y,z)
-x@t6:=[y:nat][z:nat][u:is(x,<y>suc)][v:is(x,<z>suc)]t5(y,z,u,v):amone(nat,[u:nat]is(x,<u>suc))
--23
-n@satz3a:=onei(nat,[u:nat]is(x,<u>suc),t6".23",satz3):one([u:nat]is(x,<u>suc))
-+24
-x@[f:[y:nat]nat]
-prop1:=all([y:nat]is(<<y>suc>f,<<y>f>suc)):'prop'
-prop2:=and(is(<1>f,<x>suc),prop1):'prop'
-x@[a:[y:nat]nat][b:[y:nat]nat][pa:prop2(a)][pb:prop2(b)][y:nat]
-prop3:=is(<y>a,<y>b):'prop'
-pb@t1:=ande1(is(<1>a,<x>suc),prop1(a),pa):is(<1>a,<x>suc)
-t2:=ande1(is(<1>b,<x>suc),prop1(b),pb):is(<1>b,<x>suc)
-t3:=tris2(nat,<1>a,<1>b,<x>suc,t1,t2):prop3(1)
-y@[p:prop3(y)]
-t4:=ax2(<y>a,<y>b,p):is(<<y>a>suc,<<y>b>suc)
-t5:=ande2(is(<1>a,<x>suc),prop1(a),pa):prop1(a)
-t6:=ande2(is(<1>b,<x>suc),prop1(b),pb):prop1(b)
-t7:=<y>t5:is(<<y>suc>a,<<y>a>suc)
-t8:=<y>t6:is(<<y>suc>b,<<y>b>suc)
-t9:=tr3is(nat,<<y>suc>a,<<y>a>suc,<<y>b>suc,<<y>suc>b,t7,t4,symis"e"(nat,<<y>suc>b,<<y>b>suc,t8)):prop3(<y>suc)
-y@t10:=induction([z:nat]prop3(z),t3,[z:nat][u:prop3(z)]t9(z,u),y):prop3(y)
-pb@t11:=fisi(nat,nat,a,b,[y:nat]t10(y)):is"e"([y:nat]nat,a,b)
-x@aa:=[z:[y:nat]nat][u:[y:nat]nat][v:prop2(z)][w:prop2(u)]t11(z,u,v,w):amone([y:nat]nat,[z:[y:nat]nat]prop2(z))
-prop4:=some"l"([y:nat]nat,[z:[y:nat]nat]prop2(z)):'prop'
-@t12:=[x:nat]refis(nat,<<x>suc>suc):prop1(1,suc)
-t13:=andi(is(<1>suc,<1>suc),prop1(1,suc),refis(nat,<1>suc),t12):prop2(1,suc)
-t14:=somei([y:nat]nat,[z:[y:nat]nat]prop2(1,z),suc,t13):prop4(1)
-x@[p:prop4(x)][f:[y:nat]nat][pf:prop2(f)]
-g:=[y:nat]<<y>f>suc:[y:nat]nat
-[y:nat]
-t15:=refis(nat,<y>g):is(<y>g,<<y>f>suc)
-pf@t16:=ande1(is(<1>f,<x>suc),prop1(f),pf):is(<1>f,<x>suc)
-t17:=tris(nat,<1>g,<<1>f>suc,<<x>suc>suc,t15(1),ax2(<1>f,<x>suc,t16)):is(<1>g,<<x>suc>suc)
-y@t18:=ande2(is(<1>f,<x>suc),prop1(f),pf):prop1(f)
-t19:=<y>t18:is(<<y>suc>f,<<y>f>suc)
-t20:=tris2(nat,<<y>suc>f,<y>g,<<y>f>suc,t19,t15):is(<<y>suc>f,<y>g)
-t21:=tris(nat,<<y>suc>g,<<<y>suc>f>suc,<<y>g>suc,t15(<y>suc),ax2(<<y>suc>f,<y>g,t20)):is(<<y>suc>g,<<y>g>suc)
-pf@t22:=[y:nat]t21(y):prop1(<x>suc,g)
-t23:=andi(is(<1>g,<<x>suc>suc),prop1(<x>suc,g),t17,t22):prop2(<x>suc,g)
-t24:=somei([y:nat]nat,[z:[y:nat]nat]prop2(<x>suc,z),g,t23):prop4(<x>suc)
-p@t25:=someapp([y:nat]nat,[z:[y:nat]nat]prop2(z),p,prop4(<x>suc),[z:[y:nat]nat][u:prop2(z)]t24(z,u)):prop4(<x>suc)
-x@bb:=induction([y:nat]prop4(y),t14,[y:nat][u:prop4(y)]t25(y,u),x):prop4(x)
--24
-x@satz4:=onei([y:nat]nat,[z:[y:nat]nat]prop2".24"(z),aa".24",bb".24"):one"e"([y:nat]nat,[z:[y:nat]nat]and(is(<1>z,<x>suc),all([y:nat]is(<<y>suc>z,<<y>z>suc))))
-plus:=ind([y:nat]nat,[z:[y:nat]nat]prop2".24"(z),satz4):[y:nat]nat
-y@pl:=<y>plus:nat
-+*24
-x@t26:=oneax([y:nat]nat,[z:[y:nat]nat]prop2(z),satz4):prop2(plus)
--24
-x@satz4a:=ande1(is(<1>plus,<x>suc),prop1".24"(plus),t26".24"):is(pl(x,1),<x>suc)
-+*24
-x@t27:=ande2(is(<1>plus,<x>suc),prop1(plus),t26):prop1(plus)
--24
-y@satz4b:=<y>t27".24":is(pl(x,<y>suc),<pl(x,y)>suc)
-+*24
-@t28:=t11(1,plus(1),suc,t26(1),t13):is"e"([y:nat]nat,plus(1),suc)
--24
-x@satz4c:=fise(nat,nat,plus(1),suc,t28".24",x):is(pl(1,x),<x>suc)
-+*24
-x@t29:=t11(<x>suc,plus(<x>suc),[y:nat]<<y>plus>suc,t26(<x>suc),t23(bb,plus,t26)):is"e"([y:nat]nat,plus(<x>suc),[y:nat]<<y>plus>suc)
--24
-y@satz4d:=fise(nat,nat,plus(<x>suc),[z:nat]<<z>plus>suc,t29".24",y):is(pl(<x>suc,y),<pl(x,y)>suc)
-x@satz4e:=symis(nat,pl(x,1),<x>suc,satz4a):is(<x>suc,pl(x,1))
-y@satz4f:=symis(nat,pl(x,<y>suc),<pl(x,y)>suc,satz4b):is(<pl(x,y)>suc,pl(x,<y>suc))
-x@satz4g:=symis(nat,pl(1,x),<x>suc,satz4c):is(<x>suc,pl(1,x))
-y@satz4h:=symis(nat,pl(<x>suc,y),<pl(x,y)>suc,satz4d):is(<pl(x,y)>suc,pl(<x>suc,y))
-z@[i:is(x,y)]
-ispl1:=isf(nat,nat,[u:nat]pl(u,z),x,y,i):is(pl(x,z),pl(y,z))
-ispl2:=isf(nat,nat,[u:nat]pl(z,u),x,y,i):is(pl(z,x),pl(z,y))
-z@[u:nat][i:is(x,y)][j:is(z,u)]
-ispl12:=tris(nat,pl(x,z),pl(y,z),pl(y,u),ispl1(i),ispl2(z,u,y,j)):is(pl(x,z),pl(y,u))
-+25
-z@prop1:=is(pl(pl(x,y),z),pl(x,pl(y,z))):'prop'
-y@t1:=tr3is(nat,pl(pl(x,y),1),<pl(x,y)>suc,pl(x,<y>suc),pl(x,pl(y,1)),satz4a(pl(x,y)),satz4f,ispl2(<y>suc,pl(y,1),x,satz4e(y))):prop1(1)
-z@[p:prop1(z)]
-t2:=ax2(pl(pl(x,y),z),pl(x,pl(y,z)),p):is(<pl(pl(x,y),z)>suc,<pl(x,pl(y,z))>suc)
-t3:=tr4is(nat,pl(pl(x,y),<z>suc),<pl(pl(x,y),z)>suc,<pl(x,pl(y,z))>suc,pl(x,<pl(y,z)>suc),pl(x,pl(y,<z>suc)),satz4b(pl(x,y),z),t2,satz4f(x,pl(y,z)),ispl2(<pl(y,z)>suc,pl(y,<z>suc),x,satz4f(y,z))):prop1(<z>suc)
--25
-z@satz5:=induction([u:nat]prop1".25"(u),t1".25",[u:nat][v:prop1".25"(u)]t3".25"(u,v),z):is(pl(pl(x,y),z),pl(x,pl(y,z)))
-asspl1:=satz5:is(pl(pl(x,y),z),pl(x,pl(y,z)))
-asspl2:=symis(nat,pl(pl(x,y),z),pl(x,pl(y,z)),satz5):is(pl(x,pl(y,z)),pl(pl(x,y),z))
-+26
-y@prop1:=is(pl(x,y),pl(y,x)):'prop'
-t1:=satz4a(y):is(pl(y,1),<y>suc)
-t2:=satz4c(y):is(pl(1,y),<y>suc)
-t3:=tris2(nat,pl(1,y),pl(y,1),<y>suc,t2,t1):prop1(1,y)
-[p:prop1(x,y)]
-t4:=tris(nat,<pl(x,y)>suc,<pl(y,x)>suc,pl(y,<x>suc),ax2(pl(x,y),pl(y,x),p),satz4f(y,x)):is(<pl(x,y)>suc,pl(y,<x>suc))
-t5:=satz4d:is(pl(<x>suc,y),<pl(x,y)>suc)
-t6:=tris(nat,pl(<x>suc,y),<pl(x,y)>suc,pl(y,<x>suc),t5,t4):prop1(<x>suc,y)
--26
-y@satz6:=induction([z:nat]prop1".26"(z,y),t3".26",[z:nat][u:prop1".26"(z,y)]t6".26"(z,y,u),x):is(pl(x,y),pl(y,x))
-compl:=satz6:is(pl(x,y),pl(y,x))
-+*26
-x@t7:=tris(nat,pl(x,1),<x>suc,pl(1,x),satz4a,satz4g):prop1(1)
-y@[p:prop1(y)]
-t8:=tr3is(nat,pl(x,<y>suc),<pl(x,y)>suc,<pl(y,x)>suc,pl(<y>suc,x),satz4b,ax2(pl(x,y),pl(y,x),p),satz4h(y,x)):prop1(<y>suc)
-y@anders:=induction([z:nat]prop1(z),t7,[z:nat][u:prop1(z)]t8(z,u),y):is(pl(x,y),pl(y,x))
--26
-+27
-y@prop1:=nis(y,pl(x,y)):'prop'
-x@t1:=symnotis(nat,<x>suc,1,<x>ax3):nis(1,<x>suc)
-t2:=th4"e.notis"(nat,1,<x>suc,pl(x,1),t1,satz4a):prop1(1)
-y@[p:prop1(y)]
-t3:=satz1(y,pl(x,y),p):nis(<y>suc,<pl(x,y)>suc)
-t4:=th4"e.notis"(nat,<y>suc,<pl(x,y)>suc,pl(x,<y>suc),t3,satz4b):prop1(<y>suc)
--27
-y@satz7:=induction([z:nat]prop1".27"(z),t2".27",[z:nat][u:prop1".27"(z)]t4".27"(z,u),y):nis(y,pl(x,y))
-z@[n:nis(y,z)]
-+28
-prop1:=nis(pl(x,y),pl(x,z)):'prop'
-t1:=satz1(y,z,n):nis(<y>suc,<z>suc)
-t2:=th5"e.notis"(nat,<y>suc,<z>suc,pl(1,y),pl(1,z),t1,satz4g(y),satz4g(z)):prop1(1,y,z,n)
-[p:prop1(x,y,z,n)]
-t3:=satz1(pl(x,y),pl(x,z),p):nis(<pl(x,y)>suc,<pl(x,z)>suc)
-t4:=th5"e.notis"(nat,<pl(x,y)>suc,<pl(x,z)>suc,pl(<x>suc,y),pl(<x>suc,z),t3,satz4h,satz4h(z)):prop1(<x>suc,y,z,n)
--28
-satz8:=induction([u:nat]prop1".28"(u,y,z,n),t2".28",[u:nat][v:prop1".28"(u,y,z,n)]t4".28"(u,y,z,n,v),x):nis(pl(x,y),pl(x,z))
-z@[i:is(pl(x,y),pl(x,z))]
-satz8a:=th7"l.imp"(is(y,z),nis(pl(x,y),pl(x,z)),weli(is(pl(x,y),pl(x,z)),i),[u:nis(y,z)]satz8(u)):is(y,z)
-z@diffprop:=is(x,pl(y,z)):'prop'
-+*28
-y@[u:nat][v:nat][du:diffprop(u)][dv:diffprop(v)]
-t5:=satz8a(y,u,v,tris1(nat,pl(y,u),pl(y,v),x,du,dv)):is(u,v)
--28
-y@satz8b:=[u:nat][v:nat][du:diffprop(u)][dv:diffprop(v)]t5".28"(u,v,du,dv):amone(nat,[z:nat]is(x,pl(y,z)))
-+29
-i:=is(x,y):'prop'
-ii:=some([u:nat]diffprop(x,y,u)):'prop'
-iii:=some([v:nat]diffprop(y,x,v)):'prop'
-[one1:i][u:nat]
-t1:=tris(nat,pl(u,x),pl(x,u),pl(y,u),compl(u,x),ispl1(u,one1)):is(pl(u,x),pl(y,u))
-t2:=th3"e.notis"(nat,x,pl(u,x),pl(y,u),satz7(u,x),t1):nis(x,pl(y,u))
-one1@t3:=th5"l.some"(nat,[u:nat]diffprop(u),[u:nat]t2(u)):not(ii)
-y@t4:=th1"l.ec"(i,ii,[z:i]t3(z)):ec(i,ii)
-one1@t5:=t3(y,x,symis(nat,x,y,one1)):not(iii)
-y@t6:=th2"l.ec"(iii,i,[z:i]t5(z)):ec(iii,i)
-[two1:ii][three1:iii][u:nat][du:diffprop(x,y,u)][v:nat][dv:diffprop(y,x,v)]
-t6a:=tr4is(nat,x,pl(y,u),pl(pl(x,v),u),pl(x,pl(v,u)),pl(pl(v,u),x),du,ispl1(y,pl(x,v),u,dv),asspl1(x,v,u),compl(x,pl(v,u))):is(x,pl(pl(v,u),x))
-t7:=mp(is(x,pl(pl(v,u),x)),con,t6a,satz7(pl(v,u),x)):con
-du@t8:=someapp(nat,[v:nat]diffprop(y,x,v),three1,con,[v:nat][dv:diffprop(y,x,v)]t7(v,dv)):con
-three1@t9:=someapp(nat,[u:nat]diffprop(u),two1,con,[u:nat][du:diffprop(u)]t8(u,du)):con
-two1@t10:=[z:iii]t9(z):not(iii)
-y@t11:=th1"l.ec"(ii,iii,[z:ii]t10(z)):ec(ii,iii)
-a:=th6"l.ec3"(i,ii,iii,t4,t11,t6):ec3(i,ii,iii)
-prop1:=or3(i,ii,iii):'prop'
-x@[j:is(x,1)]
-t12:=or3i1(i(1),ii(1),iii(1),j):prop1(1)
-x@[n:nis(x,1)][u:nat][j:is(x,<u>suc)]
-t13:=tris(nat,x,<u>suc,pl(1,u),j,satz4g(u)):is(x,pl(1,u))
-t14:=somei(nat,[z:nat]diffprop(x,1,z),u,t13):ii(1)
-t15:=someapp(nat,[u1:nat]is(x,<u1>suc),satz3(x,n),ii(1),[u1:nat][z:is(x,<u1>suc)]t14(u1,z)):ii(1)
-t16:=or3i2(i(1),ii(1),iii(1),t15):prop1(1)
-n@t16a:=someapp(nat,[u:nat]is(x,<u>suc),satz3(x,n),prop1(1),[u:nat][v:is(x,<u>suc)]t16(u,v)):prop1(1)
-x@t17:=th1"l.imp"(is(x,1),prop1(1),[z:is(x,1)]t12(z),[z:nis(x,1)]t16a(z)):prop1(1)
-y@[p:prop1(y)][one1:i(y)]
-t18:=tris(nat,<y>suc,pl(y,1),pl(x,1),satz4e(y),ispl1(y,x,1,symis(nat,x,y,one1))):is(<y>suc,pl(x,1))
-t19:=somei(nat,[z:nat]diffprop(<y>suc,x,z),1,t18):iii(<y>suc)
-t20:=or3i3(i(<y>suc),ii(<y>suc),iii(<y>suc),t19):prop1(<y>suc)
-p@[two1:ii(y)][u:nat][du:diffprop(x,y,u)][j:is(u,1)]
-t21:=tr3is(nat,x,pl(y,u),pl(y,1),<y>suc,du,ispl2(u,1,y,j),satz4a(y)):is(x,<y>suc)
-t22:=or3i1(i(<y>suc),ii(<y>suc),iii(<y>suc),t21):prop1(<y>suc)
-du@[n:nis(u,1)][w:nat][j:is(u,<w>suc)]
-t23:=tris(nat,u,<w>suc,pl(1,w),j,satz4g(w)):is(u,pl(1,w))
-t24:=tr4is(nat,x,pl(y,u),pl(y,pl(1,w)),pl(pl(y,1),w),pl(<y>suc,w),du,ispl2(u,pl(1,w),y,t23),asspl2(y,1,w),ispl1(pl(y,1),<y>suc,w,satz4a(y))):is(x,pl(<y>suc,w))
-t25:=somei(nat,[z:nat]diffprop(x,<y>suc,z),w,t24):ii(<y>suc)
-n@t26:=someapp(nat,[z:nat]is(u,<z>suc),satz3(u,n),ii(<y>suc),[z:nat][v:is(u,<z>suc)]t25(z,v)):ii(<y>suc)
-t27:=or3i2(i(<y>suc),ii(<y>suc),iii(<y>suc),t26):prop1(<y>suc)
-du@t28:=th1"l.imp"(is(u,1),prop1(<y>suc),[z:is(u,1)]t22(z),[z:nis(u,1)]t27(z)):prop1(<y>suc)
-two1@t28a:=someapp(nat,[u:nat]diffprop(u),two1,prop1(<y>suc),[u:nat][du:diffprop(u)]t28(u,du)):prop1(<y>suc)
-p@[three1:iii(y)][v:nat][dv:diffprop(y,x,v)]
-t29:=tris(nat,<y>suc,<pl(x,v)>suc,pl(x,<v>suc),ax2(y,pl(x,v),dv),satz4f(x,v)):is(<y>suc,pl(x,<v>suc))
-t30:=somei(nat,[z:nat]diffprop(<y>suc,x,z),<v>suc,t29):iii(<y>suc)
-three1@t31:=someapp(nat,[v:nat]diffprop(y,x,v),three1,iii(<y>suc),[v:nat][dv:diffprop(y,x,v)]t30(v,dv)):iii(<y>suc)
-t32:=or3i3(i(<y>suc),ii(<y>suc),iii(<y>suc),t31):prop1(<y>suc)
-p@t33:=or3app(i(y),ii(y),iii(y),prop1(<y>suc),p,[z:i(y)]t20(z),[z:ii(y)]t28a(z),[z:iii(y)]t32(z)):prop1(<y>suc)
-y@b:=induction([z:nat]prop1(z),t17,[z:nat][u:prop1(z)]t33(z,u),y):or3(i,ii,iii)
--29
-satz9:=orec3i(i".29",ii".29",iii".29",b".29",a".29"):orec3(is(x,y),some([u:nat]is(x,pl(y,u))),some([v:nat]is(y,pl(x,v))))
-satz9a:=b".29":or3(is(x,y),some([u:nat]diffprop(x,y,u)),some([v:nat]diffprop(y,x,v)))
-satz9b:=a".29":ec3(is(x,y),some([u:nat]diffprop(x,y,u)),some([v:nat]diffprop(y,x,v)))
-more:=some([u:nat]diffprop(x,y,u)):'prop'
-less:=some([v:nat]diffprop(y,x,v)):'prop'
-satz10:=satz9:orec3(is(x,y),more(x,y),less(x,y))
-satz10a:=satz9a:or3(is(x,y),more(x,y),less(x,y))
-satz10b:=satz9b:ec3(is(x,y),more(x,y),less(x,y))
-[m:more(x,y)]
-satz11:=m:less(y,x)
-y@[l:less(x,y)]
-satz12:=l:more(y,x)
-y@moreis:=or(more,is(x,y)):'prop'
-lessis:=or(less,is(x,y)):'prop'
-[m:moreis(x,y)]
-satz13:=th9"l.or"(more,is(x,y),less(y,x),is(y,x),m,[z:more]satz11(z),[z:is(x,y)]symis(nat,x,y,z)):lessis(y,x)
-y@[l:lessis(x,y)]
-satz14:=th9"l.or"(less,is(x,y),more(y,x),is(y,x),l,[z:less]satz12(z),[z:is(x,y)]symis(nat,x,y,z)):moreis(y,x)
-z@[i:is(x,y)][m:more(x,z)]
-ismore1:=isp(nat,[u:nat]more(u,z),x,y,m,i):more(y,z)
-i@[m:more(z,x)]
-ismore2:=isp(nat,[u:nat]more(z,u),x,y,m,i):more(z,y)
-i@[l:less(x,z)]
-isless1:=isp(nat,[u:nat]less(u,z),x,y,l,i):less(y,z)
-i@[l:less(z,x)]
-isless2:=isp(nat,[u:nat]less(z,u),x,y,l,i):less(z,y)
-i@[m:moreis(x,z)]
-ismoreis1:=isp(nat,[u:nat]moreis(u,z),x,y,m,i):moreis(y,z)
-i@[m:moreis(z,x)]
-ismoreis2:=isp(nat,[u:nat]moreis(z,u),x,y,m,i):moreis(z,y)
-i@[l:lessis(x,z)]
-islessis1:=isp(nat,[u:nat]lessis(u,z),x,y,l,i):lessis(y,z)
-i@[l:lessis(z,x)]
-islessis2:=isp(nat,[u:nat]lessis(z,u),x,y,l,i):lessis(z,y)
-y@[i:is(x,y)]
-moreisi2:=ori2(more(x,y),is(x,y),i):moreis(x,y)
-lessisi2:=ori2(less(x,y),is(x,y),i):lessis(x,y)
-y@[m:more(x,y)]
-moreisi1:=ori1(more(x,y),is(x,y),m):moreis(x,y)
-y@[l:less(x,y)]
-lessisi1:=ori1(less(x,y),is(x,y),l):lessis(x,y)
-z@[u:nat][i:is(x,y)][j:is(z,u)][m:more(x,z)]
-ismore12:=ismore2(z,u,y,j,ismore1(x,y,z,i,m)):more(y,u)
-j@[l:less(x,z)]
-isless12:=isless2(z,u,y,j,isless1(x,y,z,i,l)):less(y,u)
-j@[m:moreis(x,z)]
-ismoreis12:=ismoreis2(z,u,y,j,ismoreis1(x,y,z,i,m)):moreis(y,u)
-j@[l:lessis(x,z)]
-islessis12:=islessis2(z,u,y,j,islessis1(x,y,z,i,l)):lessis(y,u)
-y@[m:moreis(x,y)]
-satz10c:=th7"l.ec3"(is(x,y),more(x,y),less(x,y),satz10b,comor(more(x,y),is(x,y),m)):not(less(x,y))
-y@[l:lessis(x,y)]
-satz10d:=th9"l.ec3"(is(x,y),more(x,y),less(x,y),satz10b,l):not(more(x,y))
-y@[n:not(more(x,y))]
-satz10e:=th2"l.or3"(is(x,y),more(x,y),less(x,y),satz10a,n):lessis(x,y)
-y@[n:not(less(x,y))]
-satz10f:=comor(is(x,y),more(x,y),th3"l.or3"(is(x,y),more(x,y),less(x,y),satz10a,n)):moreis(x,y)
-y@[m:more(x,y)]
-satz10g:=th3"l.or"(less(x,y),is(x,y),ec3e23(is(x,y),more(x,y),less(x,y),satz10b,m),ec3e21(is(x,y),more(x,y),less(x,y),satz10b,m)):not(lessis(x,y))
-y@[l:less(x,y)]
-satz10h:=th3"l.or"(more(x,y),is(x,y),ec3e32(is(x,y),more(x,y),less(x,y),satz10b,l),ec3e31(is(x,y),more(x,y),less(x,y),satz10b,l)):not(moreis(x,y))
-y@[n:not(moreis(x,y))]
-satz10j:=or3e3(is(x,y),more(x,y),less(x,y),satz10a,th5"l.or"(more(x,y),is(x,y),n),th4"l.or"(more(x,y),is(x,y),n)):less(x,y)
-y@[n:not(lessis(x,y))]
-satz10k:=or3e2(is(x,y),more(x,y),less(x,y),satz10a,th4"l.or"(less(x,y),is(x,y),n),th5"l.or"(less(x,y),is(x,y),n)):more(x,y)
-z@[l:less(x,y)][k:less(y,z)]
-+315
-[v:nat][dv:diffprop(y,x,v)][w:nat][dw:diffprop(z,y,w)]
-t1:=tr3is(nat,z,pl(y,w),pl(pl(x,v),w),pl(x,pl(v,w)),dw,ispl1(y,pl(x,v),w,dv),asspl1(x,v,w)):is(z,pl(x,pl(v,w)))
-t2:=somei(nat,[u:nat]diffprop(z,x,u),pl(v,w),t1):less(x,z)
-dv@t3:=someapp(nat,[w:nat]diffprop(z,y,w),k,less(x,z),[w:nat][dw:diffprop(z,y,w)]t2(w,dw)):less(x,z)
--315
-satz15:=someapp(nat,[v:nat]diffprop(y,x,v),l,less(x,z),[v:nat][dv:diffprop(y,x,v)]t3".315"(v,dv)):less(x,z)
-trless:=satz15:less(x,z)
-z@[m:more(x,y)][n:more(y,z)]
-trmore:=satz15(z,y,x,n,m):more(x,z)
-+*315
-n@anders:=satz12(z,x,satz15(z,y,x,satz11(y,z,n),satz11(m))):more(x,z)
--315
-z@[l:lessis(x,y)][k:less(y,z)]
-satz16a:=orapp(less(x,y),is(x,y),less(x,z),l,[u:less(x,y)]trless(u,k),[u:is(x,y)]isless1(y,x,z,symis(nat,x,y,u),k)):less(x,z)
-z@[l:less(x,y)][k:lessis(y,z)]
-satz16b:=orapp(less(y,z),is(y,z),less(x,z),k,[u:less(y,z)]trless(l,u),[u:is(y,z)]isless2(y,z,x,u,l)):less(x,z)
-z@[m:moreis(x,y)][n:more(y,z)]
-satz16c:=satz16b(z,y,x,n,satz13(m)):more(x,z)
-z@[m:more(x,y)][n:moreis(y,z)]
-satz16d:=satz16a(z,y,x,satz13(y,z,n),m):more(x,z)
-z@[l:lessis(x,y)][k:lessis(y,z)]
-+317
-[i:is(x,y)][j:is(y,z)]
-t1:=lessisi2(x,z,tris(nat,x,y,z,i,j)):lessis(x,z)
-i@[j:less(y,z)]
-t2:=lessisi1(x,z,satz16a(l,j)):lessis(x,z)
-i@t3:=orapp(less(y,z),is(y,z),lessis(x,z),k,[u:less(y,z)]t2(u),[u:is(y,z)]t1(u)):lessis(x,z)
-k@[j:less(x,y)]
-t4:=lessisi1(x,z,satz16b(j,k)):lessis(x,z)
--317
-satz17:=orapp(less(x,y),is(x,y),lessis(x,z),l,[u:less(x,y)]t4".317"(u),[u:is(x,y)]t3".317"(u)):lessis(x,z)
-+*317
-k@[j:less(x,y)]
-t5:=lessisi1(x,z,satz16b(j,k)):lessis(x,z)
-k@[i:is(x,y)]
-t6:=islessis1(y,x,z,symis(nat,x,y,i),k):lessis(x,z)
-k@anders:=orapp(less(x,y),is(x,y),lessis(x,z),l,[u:less(x,y)]t5(u),[u:is(x,y)]t6(u)):lessis(x,z)
--317
-k@trlessis:=satz17:lessis(x,z)
-z@[m:moreis(x,y)][n:moreis(y,z)]
-trmoreis:=satz14(z,x,satz17(z,y,x,satz13(y,z,n),satz13(m))):moreis(x,z)
-y@satz18:=somei(nat,[u:nat]diffprop(pl(x,y),x,u),y,refis(nat,pl(x,y))):more(pl(x,y),x)
-satz18a:=satz18:less(x,pl(x,y))
-x@satz18b:=ismore1(pl(x,1),<x>suc,x,satz4a,satz18(1)):more(<x>suc,x)
-satz18c:=satz18b:less(x,<x>suc)
-z@[m:more(x,y)]
-+319
-[u:nat][du:diffprop(u)]
-t1:=tris(nat,x,pl(y,u),pl(u,y),du,compl(y,u)):is(x,pl(u,y))
-t2:=tr3is(nat,pl(x,z),pl(pl(u,y),z),pl(u,pl(y,z)),pl(pl(y,z),u),ispl1(x,pl(u,y),z,t1),asspl1(u,y,z),compl(u,pl(y,z))):is(pl(x,z),pl(pl(y,z),u))
-t3:=somei(nat,[v:nat]diffprop(pl(x,z),pl(y,z),v),u,t2):more(pl(x,z),pl(y,z))
--319
-satz19a:=someapp(nat,[u:nat]diffprop(u),m,more(pl(x,z),pl(y,z)),[u:nat][v:diffprop(u)]t3".319"(u,v)):more(pl(x,z),pl(y,z))
-z@[i:is(x,y)]
-satz19b:=ispl1(x,y,z,i):is(pl(x,z),pl(y,z))
-z@[l:less(x,y)]
-satz19c:=satz11(pl(y,z),pl(x,z),satz19a(y,x,z,satz12(x,y,l))):less(pl(x,z),pl(y,z))
-+*319
-l@anders1:=satz19a(y,x,z,l):less(pl(x,z),pl(y,z))
--319
-m@satz19d:=ismore12(pl(x,z),pl(z,x),pl(y,z),pl(z,y),compl(x,z),compl(y,z),satz19a):more(pl(z,x),pl(z,y))
-i@satz19e:=ispl2(x,y,z,i):is(pl(z,x),pl(z,y))
-l@satz19f:=isless12(pl(x,z),pl(z,x),pl(y,z),pl(z,y),compl(x,z),compl(y,z),satz19c):less(pl(z,x),pl(z,y))
-+*319
-l@anders2:=satz19d(y,x,z,l):less(pl(z,x),pl(z,y))
--319
-z@[u:nat][i:is(x,y)][m:more(z,u)]
-satz19g:=ismore2(pl(x,u),pl(y,u),pl(x,z),ispl1(x,y,u,i),satz19d(z,u,x,m)):more(pl(x,z),pl(y,u))
-satz19h:=ismore12(pl(x,z),pl(z,x),pl(y,u),pl(u,y),compl(x,z),compl(y,u),satz19g):more(pl(z,x),pl(u,y))
-i@[l:less(z,u)]
-satz19j:=isless2(pl(x,u),pl(y,u),pl(x,z),ispl1(x,y,u,i),satz19f(z,u,x,l)):less(pl(x,z),pl(y,u))
-satz19k:=isless12(pl(x,z),pl(z,x),pl(y,u),pl(u,y),compl(x,z),compl(y,u),satz19j):less(pl(z,x),pl(u,y))
-z@[m:moreis(x,y)]
-+*319
-m@[n:more(x,y)]
-t4:=moreisi1(pl(x,z),pl(y,z),satz19a(n)):moreis(pl(x,z),pl(y,z))
-m@[i:is(x,y)]
-t5:=moreisi2(pl(x,z),pl(y,z),ispl1(x,y,z,i)):moreis(pl(x,z),pl(y,z))
--319
-m@satz19l:=orapp(more(x,y),is(x,y),moreis(pl(x,z),pl(y,z)),m,[u:more(x,y)]t4".319"(u),[u:is(x,y)]t5".319"(u)):moreis(pl(x,z),pl(y,z))
-satz19m:=ismoreis12(pl(x,z),pl(z,x),pl(y,z),pl(z,y),compl(x,z),compl(y,z),satz19l):moreis(pl(z,x),pl(z,y))
-z@[l:lessis(x,y)]
-satz19n:=satz13(pl(y,z),pl(x,z),satz19l(y,x,z,satz14(l))):lessis(pl(x,z),pl(y,z))
-satz19o:=satz13(pl(z,y),pl(z,x),satz19m(y,x,z,satz14(l))):lessis(pl(z,x),pl(z,y))
-+320
-z@t1:=satz10a(x,y):or3(is(x,y),more(x,y),less(x,y))
-t2:=satz10b(pl(x,z),pl(y,z)):ec3(is(pl(x,z),pl(y,z)),more(pl(x,z),pl(y,z)),less(pl(x,z),pl(y,z)))
--320
-z@[m:more(pl(x,z),pl(y,z))]
-satz20a:=th11"l.ec3"(is(x,y),more(x,y),less(x,y),is(pl(x,z),pl(y,z)),more(pl(x,z),pl(y,z)),less(pl(x,z),pl(y,z)),t1".320",t2".320",[u:is(x,y)]satz19b(x,y,z,u),[u:more(x,y)]satz19a(x,y,z,u),[u:less(x,y)]satz19c(x,y,z,u),m):more(x,y)
-z@[i:is(pl(x,z),pl(y,z))]
-satz20b:=th10"l.ec3"(is(x,y),more(x,y),less(x,y),is(pl(x,z),pl(y,z)),more(pl(x,z),pl(y,z)),less(pl(x,z),pl(y,z)),t1".320",t2".320",[u:is(x,y)]satz19b(x,y,z,u),[u:more(x,y)]satz19a(x,y,z,u),[u:less(x,y)]satz19c(x,y,z,u),i):is(x,y)
-z@[l:less(pl(x,z),pl(y,z))]
-satz20c:=th12"l.ec3"(is(x,y),more(x,y),less(x,y),is(pl(x,z),pl(y,z)),more(pl(x,z),pl(y,z)),less(pl(x,z),pl(y,z)),t1".320",t2".320",[u:is(x,y)]satz19b(x,y,z,u),[u:more(x,y)]satz19a(x,y,z,u),[u:less(x,y)]satz19c(x,y,z,u),l):less(x,y)
-+*320
-i@t3:=tr3is(nat,pl(z,x),pl(x,z),pl(y,z),pl(z,y),compl(z,x),i,compl(y,z)):is(pl(z,x),pl(z,y))
-andersb:=satz8a(z,x,y,t3):is(x,y)
-l@andersc:=satz20a(y,x,z,l):less(x,y)
--320
-z@[m:more(pl(z,x),pl(z,y))]
-satz20d:=satz20a(ismore12(pl(z,x),pl(x,z),pl(z,y),pl(y,z),compl(z,x),compl(z,y),m)):more(x,y)
-z@[i:is(pl(z,x),pl(z,y))]
-satz20e:=satz20b(tr3is(nat,pl(x,z),pl(z,x),pl(z,y),pl(y,z),compl(x,z),i,compl(z,y))):is(x,y)
-z@[l:less(pl(z,x),pl(z,y))]
-satz20f:=satz20c(isless12(pl(z,x),pl(x,z),pl(z,y),pl(y,z),compl(z,x),compl(z,y),l)):less(x,y)
-u@[m:more(x,y)][n:more(z,u)]
-+321
-t1:=satz19a(x,y,z,m):more(pl(x,z),pl(y,z))
-t2:=ismore12(pl(z,y),pl(y,z),pl(u,y),pl(y,u),compl(z,y),compl(u,y),satz19a(z,u,y,n)):more(pl(y,z),pl(y,u))
--321
-satz21:=trmore(pl(x,z),pl(y,z),pl(y,u),t1".321",t2".321"):more(pl(x,z),pl(y,u))
-+*321
-n@anders:=trmore(pl(x,z),pl(y,z),pl(y,u),satz19a(x,y,z,m),satz19d(z,u,y,n)):more(pl(x,z),pl(y,u))
--321
-u@[l:less(x,y)][k:less(z,u)]
-satz21a:=satz21(y,x,u,z,l,k):less(pl(x,z),pl(y,u))
-+*321
-k@andersa:=satz11(pl(y,u),pl(x,z),satz21(y,x,u,z,satz12(x,y,l),satz12(z,u,k))):less(pl(x,z),pl(y,u))
--321
-u@[m:moreis(x,y)][n:more(z,u)]
-satz22a:=orapp(more(x,y),is(x,y),more(pl(x,z),pl(y,u)),m,[v:more(x,y)]satz21(v,n),[v:is(x,y)]satz19g(u,v,n)):more(pl(x,z),pl(y,u))
-u@[m:more(x,y)][n:moreis(z,u)]
-satz22b:=orapp(more(z,u),is(z,u),more(pl(x,z),pl(y,u)),n,[v:more(z,u)]satz21(m,v),[v:is(z,u)]satz19h(z,u,x,y,v,m)):more(pl(x,z),pl(y,u))
-u@[l:lessis(x,y)][k:less(z,u)]
-satz22c:=satz22a(y,x,u,z,satz14(x,y,l),k):less(pl(x,z),pl(y,u))
-u@[l:less(x,y)][k:lessis(z,u)]
-satz22d:=satz22b(y,x,u,z,l,satz14(z,u,k)):less(pl(x,z),pl(y,u))
-u@[m:moreis(x,y)][n:moreis(z,u)]
-+323
-[i:is(x,y)][j:is(z,u)]
-t1:=moreisi2(pl(x,z),pl(y,u),tris(nat,pl(x,z),pl(y,z),pl(y,u),ispl1(x,y,z,i),ispl2(z,u,y,j))):moreis(pl(x,z),pl(y,u))
-i@[o:more(z,u)]
-t2:=moreisi1(pl(x,z),pl(y,u),satz22a(m,o)):moreis(pl(x,z),pl(y,u))
-i@t3:=orapp(more(z,u),is(z,u),moreis(pl(x,z),pl(y,u)),n,[v:more(z,u)]t2(v),[v:is(z,u)]t1(v)):moreis(pl(x,z),pl(y,u))
-n@[o:more(x,y)]
-t4:=moreisi1(pl(x,z),pl(y,u),satz22b(o,n)):moreis(pl(x,z),pl(y,u))
--323
-satz23:=orapp(more(x,y),is(x,y),moreis(pl(x,z),pl(y,u)),m,[v:more(x,y)]t4".323"(v),[v:is(x,y)]t3".323"(v)):moreis(pl(x,z),pl(y,u))
-+*323
-n@[o:more(x,y)]
-t5:=moreisi1(pl(x,z),pl(y,u),satz22b(o,n)):moreis(pl(x,z),pl(y,u))
-n@[i:is(x,y)]
-t6:=ismoreis2(pl(x,u),pl(y,u),pl(x,z),ispl1(u,i),satz19m(z,u,x,n)):moreis(pl(x,z),pl(y,u))
-n@anders:=orapp(more(x,y),is(x,y),moreis(pl(x,z),pl(y,u)),m,[v:more(x,y)]t5(v),[v:is(x,y)]t6(v)):moreis(pl(x,z),pl(y,u))
--323
-u@[l:lessis(x,y)][k:lessis(z,u)]
-satz23a:=satz13(pl(y,u),pl(x,z),satz23(y,x,u,z,satz14(l),satz14(z,u,k))):lessis(pl(x,z),pl(y,u))
-+324
-x@[n:nis(x,1)][u:nat][i:is(x,<u>suc)]
-t1:=tris(nat,x,<u>suc,pl(1,u),i,satz4g(u)):is(x,pl(1,u))
-t2:=ismore1(pl(1,u),x,1,symis(nat,x,pl(1,u),t1),satz18(1,u)):more(x,1)
-n@t3:=someapp(nat,[u:nat]is(x,<u>suc),satz3(x,n),more(x,1),[u:nat][v:is(x,<u>suc)]t2(u,v)):more(x,1)
--324
-x@satz24:=th2"l.or"(more(x,1),is(x,1),[u:nis(x,1)]t3".324"(u)):moreis(x,1)
-satz24a:=satz13(x,1,satz24):lessis(1,x)
-satz24b:=t3".324"(<x>suc,<x>ax3):more(<x>suc,1)
-satz24c:=satz24b:less(1,<x>suc)
-y@[m:more(y,x)]
-+325
-[u:nat][du:diffprop(y,x,u)]
-t1:=satz19m(u,1,x,satz24(u)):moreis(pl(x,u),pl(x,1))
-t2:=ismoreis1(pl(x,u),y,pl(x,1),symis(nat,y,pl(x,u),du),t1):moreis(y,pl(x,1))
--325
-satz25:=someapp(nat,[u:nat]diffprop(y,x,u),m,moreis(y,pl(x,1)),[u:nat][v:diffprop(y,x,u)]t2".325"(u,v)):moreis(y,pl(x,1))
-satz25a:=ismoreis2(pl(x,1),<x>suc,y,satz4a,satz25):moreis(y,<x>suc)
-y@[l:less(y,x)]
-satz25b:=satz13(x,pl(y,1),satz25(y,x,l)):lessis(pl(y,1),x)
-satz25c:=islessis1(pl(y,1),<y>suc,x,satz4a(y),satz25b):lessis(<y>suc,x)
-y@[l:less(y,pl(x,1))]
-+326
-[m:more(y,x)]
-t1:=satz25(m):moreis(y,pl(x,1))
-l@t2:=th3"l.imp"(more(y,x),moreis(y,pl(x,1)),satz10h(y,pl(x,1),l),[v:more(y,x)]t1(v)):not(more(y,x))
--326
-satz26:=satz10e(y,x,t2".326"):lessis(y,x)
-y@[l:less(y,<x>suc)]
-satz26a:=satz26(isless2(<x>suc,pl(x,1),y,satz4e,l)):lessis(y,x)
-y@[m:more(pl(y,1),x)]
-satz26b:=satz14(x,y,satz26(y,x,m)):moreis(y,x)
-y@[m:more(<y>suc,x)]
-satz26c:=satz26b(ismore1(<y>suc,pl(y,1),x,satz4e(y),m)):moreis(y,x)
-@[p:[x:nat]'prop'][n:nat]
-+327
-[m:nat]
-lbprop:=imp(<m>p,lessis(n,m)):'prop'
--327
-lb:=all([x:nat]lbprop".327"(x)):'prop'
-min:=and(lb,<n>p):'prop'
-p@[s:some(p)]
-+*327
-s@[n:nat]
-t1:=[x:<n>p]satz24a(n):lbprop(1,n)
-s@t2:=[x:nat]t1(x):lb(1)
-[l:[x:nat]lb(x)][y:nat][yp:<y>p]
-t3:=satz18(y,1):more(pl(y,1),y)
-t4:=satz10g(pl(y,1),y,t3):not(lessis(pl(y,1),y))
-t5:=th4"l.imp"(<y>p,lessis(pl(y,1),y),yp,t4):not(lbprop(pl(y,1),y))
-t6:=th1"l.all"(nat,[x:nat]lbprop(pl(y,1),x),y,t5):not(lb(pl(y,1)))
-t7:=mp(lb(pl(y,1)),con,<pl(y,1)>l,t6):con
-l@t8:=someapp(nat,p,s,con,[x:nat][y:<x>p]t7(x,y)):con
-s@[n:none(nat,[x:nat]and(lb(x),not(lb(pl(x,1)))))][m:nat][l:lb(m)] %none
-t9:=<m>n:not(and(lb(m),not(lb(pl(m,1)))))
-t10:=et(lb(pl(m,1)),th3"l.and"(lb(m),not(lb(pl(m,1))),t9,l)):lb(pl(m,1))
-t11:=isp(nat,[x:nat]lb(x),pl(m,1),<m>suc,t10,satz4a(m)):lb(<m>suc)
-n@t12:=[x:nat]induction([y:nat]lb(y),t2,[y:nat][z:lb(y)]t11(y,z),x):[x:nat]lb(x)
-s@t13:=[x:none(nat,[x:nat]and(lb(x),not(lb(pl(x,1)))))]t8(t12(x)):some([x:nat]and(lb(x),not(lb(pl(x,1))))) %none
-[m:nat][a:and(lb(m),not(lb(pl(m,1))))]
-t14:=ande1(lb(m),not(lb(pl(m,1))),a):lb(m)
-t15:=ande2(lb(m),not(lb(pl(m,1))),a):not(lb(pl(m,1)))
-[nmp:not(<m>p)][n:nat][np:<n>p]
-t16:=mp(<n>p,lessis(m,n),np,<n>t14):lessis(m,n)
-t17:=th3"l.imp"(is(m,n),<m>p,nmp,[x:is(m,n)]isp(nat,p,n,m,np,symis(nat,m,n,x))):not(is(m,n))
-t18:=ore1(less(m,n),is(m,n),t16,t17):less(m,n)
-t19:=satz25b(n,m,t18):lessis(pl(m,1),n)
-nmp@t20:=[x:nat][y:<x>p]t19(x,y):lb(pl(m,1))
-t21:=mp(lb(pl(m,1)),con,t20,t15):con
-a@t22:=et(<m>p,[x:not(<m>p)]t21(x)):<m>p
-t23:=andi(lb(m),<m>p,t14,t22):min(m)
--327
-s@satz27:=th6"l.some"(nat,[x:nat]and(lb(x),not(lb(pl(x,1)))),[x:nat]min(x),t13".327",[x:nat][y:and(lb(x),not(lb(pl(x,1))))]t23".327"(x,y)):some([x:nat]min(p,x))
-+*327
-p@[n:none(nat,[x:nat]min(x))][u:nat] %none
-t24:=[x:<u>p]satz24a(u):lbprop(1,u)
-n@t25:=[x:nat]t24(x):lb(1)
-u@[l:lb(u)]
-t26:=<u>n:not(min(u))
-t27:=th3"l.and"(lb(u),<u>p,t26,l):not(<u>p)
-[v:nat][vp:<v>p]
-t28:=th3"l.imp"(is(u,v),<u>p,t27,[x:is(u,v)]isp1(nat,p,v,u,vp,x)):nis(u,v)
-t29:=mp(<v>p,lessis(u,v),vp,<v>l):lessis(u,v)
-t30:=ore1(less(u,v),is(u,v),t29,t28):less(u,v)
-t31:=satz25c(v,u,t30):lessis(<u>suc,v)
-v@t32:=[x:<v>p]t31(x):lbprop(<u>suc,v)
-l@t33:=[x:nat]t32(x):lb(<u>suc)
-u@t34:=induction([x:nat]lb(x),t25,[x:nat][y:lb(x)]t33(x,y),u):lb(u)
-p@[s:some(p)][u:nat][up:<u>p]
-t35:=satz10g(<u>suc,u,satz18b(u)):not(lessis(<u>suc,u))
-t36:=th4"l.imp"(<u>p,lessis(<u>suc,u),up,t35):not(lbprop(<u>suc,u))
-t37:=th1"l.all"(nat,[x:nat]lbprop(<u>suc,x),u,t36):not(lb(<u>suc))
-t38:=[y:none(nat,[x:nat]min(x))]mp(lb(<u>suc),con,t34(y,<u>suc),t37):some([x:nat]min(x)) %none
-s@anders:=someapp(nat,p,s,some([x:nat]min(x)),[x:nat][y:<x>p]t38(x,y)):some([x:nat]min(x))
--327
-+*327
-p@[n:nat][m:nat][mn:min(p,n)][mm:min(p,m)]
-t39:=ande1(lb(n),<n>p,mn):lb(n)
-t40:=ande1(lb(m),<m>p,mm):lb(m)
-t41:=ande2(lb(n),<n>p,mn):<n>p
-t42:=ande2(lb(m),<m>p,mm):<m>p
-t43:=<m>t39:lbprop(n,m)
-t44:=<n>t40:lbprop(m,n)
-t45:=mp(<m>p,lessis(n,m),t42,t43):lessis(n,m)
-t46:=mp(<n>p,lessis(m,n),t41,t44):lessis(m,n)
-t47:=ore2(more(n,m),is(n,m),satz14(m,n,t46),satz10d(n,m,t45)):is(n,m)
-p@t48:=[x:nat][y:nat][u:min(x)][v:min(y)]t47(x,y,u,v):amone(nat,[x:nat]min(p,x))
--327
-s@satz27a:=onei(nat,[x:nat]min(p,x),t48".327",satz27):one([x:nat]min(p,x))
-+428
-x@[f:[y:nat]nat]
-prop1:=all([y:nat]is(<<y>suc>f,pl(<y>f,x))):'prop'
-prop2:=and(is(<1>f,x),prop1):'prop'
-x@[a:[y:nat]nat][b:[y:nat]nat][pa:prop2(a)][pb:prop2(b)][y:nat]
-prop3:=is(<y>a,<y>b):'prop'
-pb@t1:=ande1(is(<1>a,x),prop1(a),pa):is(<1>a,x)
-t2:=ande1(is(<1>b,x),prop1(b),pb):is(<1>b,x)
-t3:=tris2(nat,<1>a,<1>b,x,t1,t2):prop3(1)
-y@[p:prop3(y)]
-t4:=ispl1(<y>a,<y>b,x,p):is(pl(<y>a,x),pl(<y>b,x))
-t5:=ande2(is(<1>a,x),prop1(a),pa):prop1(a)
-t6:=ande2(is(<1>b,x),prop1(b),pb):prop1(b)
-t7:=<y>t5:is(<<y>suc>a,pl(<y>a,x))
-t8:=<y>t6:is(<<y>suc>b,pl(<y>b,x))
-t9:=tr3is(nat,<<y>suc>a,pl(<y>a,x),pl(<y>b,x),<<y>suc>b,t7,t4,symis(nat,<<y>suc>b,pl(<y>b,x),t8)):prop3(<y>suc)
-y@t10:=induction([z:nat]prop3(z),t3,[z:nat][u:prop3(z)]t9(z,u),y):prop3(y)
-pb@t11:=fisi(nat,nat,a,b,[y:nat]t10(y)):is"e"([y:nat]nat,a,b)
-x@a1:=[z:[y:nat]nat][u:[y:nat]nat][v:prop2(z)][w:prop2(u)]t11(z,u,v,w):amone([y:nat]nat,[z:[y:nat]nat]prop2(z))
-prop4:=some"l"([y:nat]nat,[z:[y:nat]nat]prop2(z)):'prop'
-@id:=[y:nat]y:[y:nat]nat
-t12:=[x:nat]satz4e(x):prop1(1,id)
-t13:=andi(is(<1>id,1),prop1(1,id),refis(nat,1),t12):prop2(1,id)
-t14:=somei([y:nat]nat,[z:[y:nat]nat]prop2(1,z),id,t13):prop4(1)
-x@[p:prop4(x)][f:[y:nat]nat][pf:prop2(f)]
-g:=[y:nat]pl(<y>f,y):[y:nat]nat
-t15:=ande1(is(<1>f,x),prop1(f),pf):is(<1>f,x)
-t16:=tris(nat,<1>g,pl(x,1),<x>suc,ispl1(<1>f,x,1,t15),satz4a(x)):is(<1>g,<x>suc)
-[y:nat]
-t17:=ande2(is(<1>f,x),prop1(f),pf):prop1(f)
-t18:=<y>t17:is(<<y>suc>f,pl(<y>f,x))
-t19:=tris(nat,<<y>suc>g,pl(pl(<y>f,x),<y>suc),pl(<y>f,pl(x,<y>suc)),ispl1(<<y>suc>f,pl(<y>f,x),<y>suc,t18),asspl1(<y>f,x,<y>suc)):is(<<y>suc>g,pl(<y>f,pl(x,<y>suc)))
-t20:=tr3is(nat,pl(x,<y>suc),<pl(x,y)>suc,pl(<x>suc,y),pl(y,<x>suc),satz4b(x,y),satz4h(x,y),compl(<x>suc,y)):is(pl(x,<y>suc),pl(y,<x>suc))
-t21:=tr3is(nat,<<y>suc>g,pl(<y>f,pl(x,<y>suc)),pl(<y>f,pl(y,<x>suc)),pl(<y>g,<x>suc),t19,ispl2(pl(x,<y>suc),pl(y,<x>suc),<y>f,t20),asspl2(<y>f,y,<x>suc)):is(<<y>suc>g,pl(<y>g,<x>suc))
-pf@t22:=[y:nat]t21(y):prop1(<x>suc,g)
-t23:=andi(is(<1>g,<x>suc),prop1(<x>suc,g),t16,t22):prop2(<x>suc,g)
-t24:=somei([y:nat]nat,[z:[y:nat]nat]prop2(<x>suc,z),g,t23):prop4(<x>suc)
-p@t25:=someapp([y:nat]nat,[z:[y:nat]nat]prop2(z),p,prop4(<x>suc),[z:[y:nat]nat][u:prop2(z)]t24(z,u)):prop4(<x>suc)
-x@b1:=induction([y:nat]prop4(y),t14,[y:nat][u:prop4(y)]t25(y,u),x):prop4(x)
--428
-x@satz28:=onei([y:nat]nat,[z:[y:nat]nat]prop2".428"(z),a1".428",b1".428"):one"e"([y:nat]nat,[z:[y:nat]nat]and(is(<1>z,x),all([y:nat]is(<<y>suc>z,pl(<y>z,x)))))
-times:=ind([y:nat]nat,[z:[y:nat]nat]prop2".428"(z),satz28):[y:nat]nat
-y@ts:=<y>times:nat
-+*428
-x@t26:=oneax([y:nat]nat,[z:[y:nat]nat]prop2(z),satz28):prop2(times)
--428
-x@satz28a:=ande1(is(<1>times,x),prop1".428"(times),t26".428"):is(ts(x,1),x)
-+*428
-x@t27:=ande2(is(<1>times,x),prop1(times),t26):prop1(times)
--428
-y@satz28b:=<y>t27".428":is(ts(x,<y>suc),pl(ts(x,y),x))
-+*428
-@t28:=t11(1,times(1),id,t26(1),t13):is"e"([y:nat]nat,times(1),id)
--428
-x@satz28c:=fise(nat,nat,times(1),id".428",t28".428",x):is(ts(1,x),x)
-+*428
-x@t29:=t11(<x>suc,times(<x>suc),[y:nat]pl(<y>times,y),t26(<x>suc),t23(b1,times,t26)):is"e"([y:nat]nat,times(<x>suc),[y:nat]pl(<y>times,y))
--428
-y@satz28d:=fise(nat,nat,times(<x>suc),[z:nat]pl(<z>times,z),t29".428",y):is(ts(<x>suc,y),pl(ts(x,y),y))
-x@satz28e:=symis(nat,ts(x,1),x,satz28a):is(x,ts(x,1))
-y@satz28f:=symis(nat,ts(x,<y>suc),pl(ts(x,y),x),satz28b):is(pl(ts(x,y),x),ts(x,<y>suc))
-x@satz28g:=symis(nat,ts(1,x),x,satz28c):is(x,ts(1,x))
-y@satz28h:=symis(nat,ts(<x>suc,y),pl(ts(x,y),y),satz28d):is(pl(ts(x,y),y),ts(<x>suc,y))
-z@[i:is(x,y)]
-ists1:=isf(nat,nat,[u:nat]ts(u,z),x,y,i):is(ts(x,z),ts(y,z))
-ists2:=isf(nat,nat,[u:nat]ts(z,u),x,y,i):is(ts(z,x),ts(z,y))
-z@[u:nat][i:is(x,y)][j:is(z,u)]
-ists12:=tris(nat,ts(x,z),ts(y,z),ts(y,u),ists1(i),ists2(z,u,y,j)):is(ts(x,z),ts(y,u))
-+429
-y@prop1:=is(ts(x,y),ts(y,x)):'prop'
-t1:=satz28a(y):is(ts(y,1),y)
-t2:=satz28c(y):is(ts(1,y),y)
-t3:=tris2(nat,ts(1,y),ts(y,1),y,t2,t1):prop1(1,y)
-[p:prop1(x,y)]
-t4:=tris(nat,pl(ts(x,y),y),pl(ts(y,x),y),ts(y,<x>suc),ispl1(ts(x,y),ts(y,x),y,p),satz28f(y,x)):is(pl(ts(x,y),y),ts(y,<x>suc))
-t5:=satz28d:is(ts(<x>suc,y),pl(ts(x,y),y))
-t6:=tris(nat,ts(<x>suc,y),pl(ts(x,y),y),ts(y,<x>suc),t5,t4):prop1(<x>suc,y)
--429
-y@satz29:=induction([z:nat]prop1".429"(z,y),t3".429",[z:nat][u:prop1".429"(z,y)]t6".429"(z,y,u),x):is(ts(x,y),ts(y,x))
-comts:=satz29:is(ts(x,y),ts(y,x))
-+*429
-x@t7:=tris(nat,ts(x,1),x,ts(1,x),satz28a,satz28g):prop1(1)
-y@[p:prop1(y)]
-t8:=tr3is(nat,ts(x,<y>suc),pl(ts(x,y),x),pl(ts(y,x),x),ts(<y>suc,x),satz28b(x,y),ispl1(ts(x,y),ts(y,x),x,p),satz28h(y,x)):prop1(<y>suc)
-y@anders:=induction([z:nat]prop1(z),t7,[z:nat][u:prop1(z)]t8(z,u),y):is(ts(x,y),ts(y,x))
--429
-+430
-z@prop1:=is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z))):'prop'
-y@t1:=tr3is(nat,ts(x,pl(y,1)),ts(x,<y>suc),pl(ts(x,y),x),pl(ts(x,y),ts(x,1)),ists2(pl(y,1),<y>suc,x,satz4a(y)),satz28b,ispl2(x,ts(x,1),ts(x,y),satz28e(x))):prop1(1)
-z@[p:prop1(z)]
-t2:=tr3is(nat,ts(x,pl(y,<z>suc)),ts(x,<pl(y,z)>suc),pl(ts(x,pl(y,z)),x),pl(pl(ts(x,y),ts(x,z)),x),ists2(pl(y,<z>suc),<pl(y,z)>suc,x,satz4b(y,z)),satz28b(x,pl(y,z)),ispl1(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)),x,p)):is(ts(x,pl(y,<z>suc)),pl(pl(ts(x,y),ts(x,z)),x))
-t3:=tr3is(nat,ts(x,pl(y,<z>suc)),pl(pl(ts(x,y),ts(x,z)),x),pl(ts(x,y),pl(ts(x,z),x)),pl(ts(x,y),ts(x,<z>suc)),t2,asspl1(ts(x,y),ts(x,z),x),ispl2(pl(ts(x,z),x),ts(x,<z>suc),ts(x,y),satz28f(x,z))):prop1(<z>suc)
--430
-z@satz30:=induction([u:nat]prop1".430"(u),t1".430",[u:nat][v:prop1".430"(u)]t3".430"(u,v),z):is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
-disttp1:=tr3is(nat,ts(pl(x,y),z),ts(z,pl(x,y)),pl(ts(z,x),ts(z,y)),pl(ts(x,z),ts(y,z)),comts(pl(x,y),z),satz30(z,x,y),ispl12(ts(z,x),ts(x,z),ts(z,y),ts(y,z),comts(z,x),comts(z,y))):is(ts(pl(x,y),z),pl(ts(x,z),ts(y,z)))
-disttp2:=satz30:is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
-distpt1:=symis(nat,ts(pl(x,y),z),pl(ts(x,z),ts(y,z)),disttp1):is(pl(ts(x,z),ts(y,z)),ts(pl(x,y),z))
-distpt2:=symis(nat,ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)),disttp2):is(pl(ts(x,y),ts(x,z)),ts(x,pl(y,z)))
-+431
-prop1:=is(ts(ts(x,y),z),ts(x,ts(y,z))):'prop'
-y@t1:=tris(nat,ts(ts(x,y),1),ts(x,y),ts(x,ts(y,1)),satz28a(ts(x,y)),ists2(y,ts(y,1),x,satz28e(y))):prop1(1)
-z@[p:prop1(z)]
-t2:=tr4is(nat,ts(ts(x,y),<z>suc),pl(ts(ts(x,y),z),ts(x,y)),pl(ts(x,ts(y,z)),ts(x,y)),ts(x,pl(ts(y,z),y)),ts(x,ts(y,<z>suc)),satz28b(ts(x,y),z),ispl1(ts(ts(x,y),z),ts(x,ts(y,z)),ts(x,y),p),distpt2(x,ts(y,z),y),ists2(pl(ts(y,z),y),ts(y,<z>suc),x,satz28f(y,z))):prop1(<z>suc)
--431
-satz31:=induction([u:nat]prop1".431"(u),t1".431",[u:nat][v:prop1".431"(u)]t2".431"(u,v),z):is(ts(ts(x,y),z),ts(x,ts(y,z)))
-assts1:=satz31:is(ts(ts(x,y),z),ts(x,ts(y,z)))
-assts2:=symis(nat,ts(ts(x,y),z),ts(x,ts(y,z)),assts1):is(ts(x,ts(y,z)),ts(ts(x,y),z))
-[m:more(x,y)]
-+432
-[u:nat][du:diffprop(u)]
-t1:=tris(nat,ts(x,z),ts(pl(y,u),z),pl(ts(y,z),ts(u,z)),ists1(x,pl(y,u),z,du),disttp1(y,u,z)):is(ts(x,z),pl(ts(y,z),ts(u,z)))
-t2:=somei(nat,[v:nat]diffprop(ts(x,z),ts(y,z),v),ts(u,z),t1):more(ts(x,z),ts(y,z))
--432
-satz32a:=someapp(nat,[u:nat]diffprop(u),m,more(ts(x,z),ts(y,z)),[u:nat][v:diffprop(u)]t2".432"(u,v)):more(ts(x,z),ts(y,z))
-z@[i:is(x,y)]
-satz32b:=ists1(x,y,z,i):is(ts(x,z),ts(y,z))
-z@[l:less(x,y)]
-satz32c:=satz11(ts(y,z),ts(x,z),satz32a(y,x,z,satz12(x,y,l))):less(ts(x,z),ts(y,z))
-+*432
-l@anders1:=satz32a(y,x,z,l):less(ts(x,z),ts(y,z))
--432
-m@satz32d:=ismore12(ts(x,z),ts(z,x),ts(y,z),ts(z,y),comts(x,z),comts(y,z),satz32a):more(ts(z,x),ts(z,y))
-i@satz32e:=ists2(x,y,z,i):is(ts(z,x),ts(z,y))
-l@satz32f:=isless12(ts(x,z),ts(z,x),ts(y,z),ts(z,y),comts(x,z),comts(y,z),satz32c):less(ts(z,x),ts(z,y))
-+*432
-l@anders2:=satz32d(y,x,z,l):less(ts(z,x),ts(z,y))
--432
-z@[u:nat][i:is(x,y)][m:more(z,u)]
-satz32g:=ismore2(ts(x,u),ts(y,u),ts(x,z),ists1(x,y,u,i),satz32d(z,u,x,m)):more(ts(x,z),ts(y,u))
-satz32h:=ismore12(ts(x,z),ts(z,x),ts(y,u),ts(u,y),comts(x,z),comts(y,u),satz32g):more(ts(z,x),ts(u,y))
-i@[l:less(z,u)]
-satz32j:=isless2(ts(x,u),ts(y,u),ts(x,z),ists1(x,y,u,i),satz32f(z,u,x,l)):less(ts(x,z),ts(y,u))
-satz32k:=isless12(ts(x,z),ts(z,x),ts(y,u),ts(u,y),comts(x,z),comts(y,u),satz32j):less(ts(z,x),ts(u,y))
-z@[m:moreis(x,y)]
-+*432
-m@[n:more(x,y)]
-t3:=moreisi1(ts(x,z),ts(y,z),satz32a(n)):moreis(ts(x,z),ts(y,z))
-m@[i:is(x,y)]
-t4:=moreisi2(ts(x,z),ts(y,z),ists1(x,y,z,i)):moreis(ts(x,z),ts(y,z))
--432
-m@satz32l:=orapp(more(x,y),is(x,y),moreis(ts(x,z),ts(y,z)),m,[u:more(x,y)]t3".432"(u),[u:is(x,y)]t4".432"(u)):moreis(ts(x,z),ts(y,z))
-satz32m:=ismoreis12(ts(x,z),ts(z,x),ts(y,z),ts(z,y),comts(x,z),comts(y,z),satz32l):moreis(ts(z,x),ts(z,y))
-z@[l:lessis(x,y)]
-satz32n:=satz13(ts(y,z),ts(x,z),satz32l(y,x,z,satz14(l))):lessis(ts(x,z),ts(y,z))
-satz32o:=satz13(ts(z,y),ts(z,x),satz32m(y,x,z,satz14(l))):lessis(ts(z,x),ts(z,y))
-+433
-z@t1:=satz10a(x,y):or3(is(x,y),more(x,y),less(x,y))
-t2:=satz10b(ts(x,z),ts(y,z)):ec3(is(ts(x,z),ts(y,z)),more(ts(x,z),ts(y,z)),less(ts(x,z),ts(y,z)))
--433
-z@[m:more(ts(x,z),ts(y,z))]
-satz33a:=th11"l.ec3"(is(x,y),more(x,y),less(x,y),is(ts(x,z),ts(y,z)),more(ts(x,z),ts(y,z)),less(ts(x,z),ts(y,z)),t1".433",t2".433",[u:is(x,y)]satz32b(x,y,z,u),[u:more(x,y)]satz32a(x,y,z,u),[u:less(x,y)]satz32c(x,y,z,u),m):more(x,y)
-z@[i:is(ts(x,z),ts(y,z))]
-satz33b:=th10"l.ec3"(is(x,y),more(x,y),less(x,y),is(ts(x,z),ts(y,z)),more(ts(x,z),ts(y,z)),less(ts(x,z),ts(y,z)),t1".433",t2".433",[u:is(x,y)]satz32b(x,y,z,u),[u:more(x,y)]satz32a(x,y,z,u),[u:less(x,y)]satz32c(x,y,z,u),i):is(x,y)
-z@[l:less(ts(x,z),ts(y,z))]
-satz33c:=th12"l.ec3"(is(x,y),more(x,y),less(x,y),is(ts(x,z),ts(y,z)),more(ts(x,z),ts(y,z)),less(ts(x,z),ts(y,z)),t1".433",t2".433",[u:is(x,y)]satz32b(x,y,z,u),[u:more(x,y)]satz32a(x,y,z,u),[u:less(x,y)]satz32c(x,y,z,u),l):less(x,y)
-+*433
-l@anders:=satz33a(y,x,z,l):less(x,y)
--433
-u@[m:more(x,y)][n:more(z,u)]
-+434
-t1:=satz32a(x,y,z,m):more(ts(x,z),ts(y,z))
-t2:=ismore12(ts(z,y),ts(y,z),ts(u,y),ts(y,u),comts(z,y),comts(u,y),satz32a(z,u,y,n)):more(ts(y,z),ts(y,u))
--434
-satz34:=trmore(ts(x,z),ts(y,z),ts(y,u),t1".434",t2".434"):more(ts(x,z),ts(y,u))
-+*434
-n@anders:=trmore(ts(x,z),ts(y,z),ts(y,u),satz32a(x,y,z,m),satz32d(z,u,y,n)):more(ts(x,z),ts(y,u))
--434
-u@[l:less(x,y)][k:less(z,u)]
-satz34a:=satz34(y,x,u,z,l,k):less(ts(x,z),ts(y,u))
-+*434
-k@andersa:=satz11(ts(y,u),ts(x,z),satz34(y,x,u,z,satz12(x,y,l),satz12(z,u,k))):less(ts(x,z),ts(y,u))
--434
-u@[m:moreis(x,y)][n:more(z,u)]
-satz35a:=orapp(more(x,y),is(x,y),more(ts(x,z),ts(y,u)),m,[v:more(x,y)]satz34(v,n),[v:is(x,y)]satz32g(u,v,n)):more(ts(x,z),ts(y,u))
-u@[m:more(x,y)][n:moreis(z,u)]
-satz35b:=orapp(more(z,u),is(z,u),more(ts(x,z),ts(y,u)),n,[v:more(z,u)]satz34(m,v),[v:is(z,u)]satz32h(z,u,x,y,v,m)):more(ts(x,z),ts(y,u))
-u@[l:lessis(x,y)][k:less(z,u)]
-satz35c:=satz35a(y,x,u,z,satz14(x,y,l),k):less(ts(x,z),ts(y,u))
-u@[l:less(x,y)][k:lessis(z,u)]
-satz35d:=satz35b(y,x,u,z,l,satz14(z,u,k)):less(ts(x,z),ts(y,u))
-u@[m:moreis(x,y)][n:moreis(z,u)]
-+436
-[i:is(x,y)][j:is(z,u)]
-t1:=moreisi2(ts(x,z),ts(y,u),tris(nat,ts(x,z),ts(y,z),ts(y,u),ists1(x,y,z,i),ists2(z,u,y,j))):moreis(ts(x,z),ts(y,u))
-i@[o:more(z,u)]
-t2:=moreisi1(ts(x,z),ts(y,u),satz35a(m,o)):moreis(ts(x,z),ts(y,u))
-i@t3:=orapp(more(z,u),is(z,u),moreis(ts(x,z),ts(y,u)),n,[v:more(z,u)]t2(v),[v:is(z,u)]t1(v)):moreis(ts(x,z),ts(y,u))
-n@[o:more(x,y)]
-t4:=moreisi1(ts(x,z),ts(y,u),satz35b(o,n)):moreis(ts(x,z),ts(y,u))
--436
-satz36:=orapp(more(x,y),is(x,y),moreis(ts(x,z),ts(y,u)),m,[v:more(x,y)]t4".436"(v),[v:is(x,y)]t3".436"(v)):moreis(ts(x,z),ts(y,u))
-+*436
-n@[o:more(x,y)]
-t5:=moreisi1(ts(x,z),ts(y,u),satz35b(o,n)):moreis(ts(x,z),ts(y,u))
-n@[i:is(x,y)]
-t6:=ismoreis2(ts(x,u),ts(y,u),ts(x,z),ists1(u,i),satz32m(z,u,x,n)):moreis(ts(x,z),ts(y,u))
-n@anders:=orapp(more(x,y),is(x,y),moreis(ts(x,z),ts(y,u)),m,[v:more(x,y)]t5(v),[v:is(x,y)]t6(v)):moreis(ts(x,z),ts(y,u))
--436
-u@[l:lessis(x,y)][k:lessis(z,u)]
-satz36a:=satz13(ts(y,u),ts(x,z),satz36(y,x,u,z,satz14(l),satz14(z,u,k))):lessis(ts(x,z),ts(y,u))
-y@[m:more(x,y)]
-+mn
-t1:=onei(nat,[z:nat]diffprop(x,y,z),satz8b(x,y),m):one([z:nat]diffprop(x,y,z))
--mn
-mn:=ind(nat,[z:nat]diffprop(x,y,z),t1".mn"):nat
-+*mn
-m@th1a:=oneax(nat,[z:nat]diffprop(x,y,z),t1):is(x,pl(y,mn(x,y,m)))
-th1b:=symis(nat,x,pl(y,mn(x,y,m)),th1a):is(pl(y,mn(x,y,m)),x)
-th1c:=tris(nat,x,pl(y,mn(x,y,m)),pl(mn(x,y,m),y),th1a,compl(y,mn(x,y,m))):is(x,pl(mn(x,y,m),y))
-th1d:=symis(nat,x,pl(mn(x,y,m),y),th1c):is(pl(mn(x,y,m),y),x)
-y@[z:nat][m:more(x,y)][i:is(pl(y,z),x)]
-th1e:=<th1a(m)><symis(nat,pl(y,z),x,i)><mn(x,y,m)><z>satz8b(x,y):is(z,mn(x,y,m))
--mn
-z@[u:nat][m:more(x,z)][n:more(y,u)][i:is(x,y)][j:is(z,u)]
-+*mn
-j@t2:=tr3is(nat,pl(u,mn(x,z,m)),pl(z,mn(x,z,m)),x,y,ispl1(u,z,mn(x,z,m),symis(nat,z,u,j)),th1b(x,z,m),i):is(pl(u,mn(x,z,m)),y)
--mn
-j@ismn12:=th1e".mn"(y,u,mn(x,z,m),n,t2".mn"):is(mn(x,z,m),mn(y,u,n))
-@[n:nat]
-1to:=ot(nat,[x:nat]lessis(x,n)):'type'
-[x:nat][l:lessis(x,n)]
-outn:=out(nat,[y:nat]lessis(y,n),x,l):1to(n)
-n@[xn:1to(n)]
-inn:=in"e"(nat,[y:nat]lessis(y,n),xn):nat
-1top:=inp(nat,[y:nat]lessis(y,n),xn):lessis(inn,n)
-l@[y:nat][k:lessis(y,n)][i:is(x,y)]
-isoutni:=isouti(nat,[z:nat]lessis(z,n),x,l,y,k,i):is"e"(1to(n),outn(x,l),outn(y,k))
-k@[i:is"e"(1to(n),outn(x,l),outn(y,k))]
-isoutne:=isoute(nat,[z:nat]lessis(z,n),x,l,y,k,i):is(x,y)
-xn@[yn:1to(n)][i:is"e"(1to(n),xn,yn)]
-isinni:=isini(nat,[z:nat]lessis(z,n),xn,yn,i):is(inn(xn),inn(yn))
-yn@[i:is(inn(xn),inn(yn))]
-isinne:=isine(nat,[z:nat]lessis(z,n),xn,yn,i):is"e"(1to(n),xn,yn)
-xn@isoutinn:=isoutin(nat,[y:nat]lessis(y,n),xn):is"e"(1to(n),xn,outn(inn(xn),1top(xn)))
-l@isinoutn:=isinout(nat,[y:nat]lessis(y,n),x,l):is(x,inn(outn(x,l)))
-@1o:=outn(1,1,lessisi2(1,1,refis(nat,1))):1to(1)
-[u:1to(1)]
-+singlet
-u0:=inn(1,u):nat
-t1:=1top(1,u):lessis(u0,1)
-t2:=ore2(more(u0,1),is(u0,1),satz24(u0),satz10d(u0,1,t1)):is(u0,1)
-th1:=tris(1to(1),u,outn(1,u0,t1),1o,isoutinn(1,u),isoutni(1,u0,t1,1,lessisi2(1,1,refis(nat,1)),t2)):is"e"(1to(1),u,1o)
--singlet
-@2:=pl(1,1):nat
-[x:nat]
-+pair
-[l:lessis(x,2)][n:nis(x,2)]
-t1:=satz26(1,x,ore1(less(x,2),is(x,2),l,n)):lessis(x,1)
-t2:=ore2(more(x,1),is(x,1),satz24(x),satz10d(x,1,t1)):is(x,1)
-l@th1:=th2"l.or"(is(x,1),is(x,2),[t:nis(x,2)]t2(t)):or(is(x,1),is(x,2))
-@th2:=th1"e.notis"(nat,<1>suc,1,2,<1>ax3,satz4e(1)):nis(2,1)
--pair
-@1t:=outn(2,1,satz24a(2)):1to(2)
-2t:=outn(2,2,lessisi2(2,2,refis(nat,2))):1to(2)
-+*pair
-@[u:1to(2)]
-u0:=inn(2,u):nat
-t3:=1top(2,u):lessis(u0,2)
-[i:is(u0,1)]
-t4:=isoutni(2,u0,t3,1,satz24a(2),i):is"e"(1to(2),outn(2,u0,t3),1t)
-t5:=tris(1to(2),u,outn(2,u0,t3),1t,isoutinn(2,u),t4):is"e"(1to(2),u,1t)
-u@[i:is(u0,2)]
-t6:=isoutni(2,u0,t3,2,lessisi2(2,2,refis(nat,2)),i):is"e"(1to(2),outn(2,u0,t3),2t)
-t7:=tris(1to(2),u,outn(2,u0,t3),2t,isoutinn(2,u),t6):is"e"(1to(2),u,2t)
-u@th3:=th9"l.or"(is(u0,1),is(u0,2),is"e"(1to(2),u,1t),is"e"(1to(2),u,2t),th1(u0,t3),[t:is(u0,1)]t5(t),[t:is(u0,2)]t7(t)):or(is"e"(1to(2),u,1t),is"e"(1to(2),u,2t))
-@[i:is"e"(1to(2),2t,1t)]
-t9:=isini(nat,[x:nat]lessis(x,2),2t,1t,i):is(u0(2t),u0(1t))
-t10:=tr3is(nat,2,u0(2t),u0(1t),1,isinoutn(2,2,lessisi2(2,2,refis(nat,2))),t9,symis(nat,1,u0(1t),isinoutn(2,1,satz24a(2)))):is(2,1)
-@th4:=th3"l.imp"(is"e"(1to(2),2t,1t),is(2,1),th2,[t:is"e"(1to(2),2t,1t)]t10(t)):not(is"e"(1to(2),2t,1t))
--pair
-@[alpha:'type']
-pair1type:=[x:1to(2)]alpha:'type'
-[a:alpha][b:alpha]
-pair1:=[x:1to(2)]ite(is"e"(1to(2),x,1t),alpha,a,b):pair1type
-alpha@[p:pair1type]
-first1:=<1t>p:alpha
-second1:=<2t>p:alpha
-b@first1is1:=itet(is"e"(1to(2),1t,1t),alpha,a,b,refis(1to(2),1t)):is"e"(alpha,first1(pair1),a)
-first1is2:=symis(alpha,first1(pair1),a,first1is1):is"e"(alpha,a,first1(pair1))
-second1is1:=itef(is"e"(1to(2),2t,1t),alpha,a,b,th4".pair"):is"e"(alpha,second1(pair1),b)
-second1is2:=symis(alpha,second1(pair1),b,second1is1):is"e"(alpha,b,second1(pair1))
-+*pair
-p@[q:pair1type][i:is"e"(alpha,first1(p),first1(q))][j:is"e"(alpha,second1(p),second1(q))][u:1to(2)][u1:is"e"(1to(2),u,1t)]
-t11:=isf(1to(2),alpha,p,u,1t,u1):is"e"(alpha,<u>p,first1(p))
-t12:=symis(alpha,<u>q,first1(q),isf(1to(2),alpha,q,u,1t,u1)):is"e"(alpha,first1(q),<u>q)
-t13:=tr3is(alpha,<u>p,first1(p),first1(q),<u>q,t11,i,t12):is"e"(alpha,<u>p,<u>q)
-u@[u2:is"e"(1to(2),u,2t)]
-t14:=isf(1to(2),alpha,p,u,2t,u2):is"e"(alpha,<u>p,second1(p))
-t15:=symis(alpha,<u>q,second1(q),isf(1to(2),alpha,q,u,2t,u2)):is"e"(alpha,second1(q),<u>q)
-t16:=tr3is(alpha,<u>p,second1(p),second1(q),<u>q,t14,j,t15):is"e"(alpha,<u>p,<u>q)
-u@t17:=orapp(is"e"(1to(2),u,1t),is"e"(1to(2),u,2t),is"e"(alpha,<u>p,<u>q),th3(u),[t:is"e"(1to(2),u,1t)]t13(t),[t:is"e"(1to(2),u,2t)]t16(t)):is"e"(alpha,<u>p,<u>q)
-j@th5:=fisi(1to(2),alpha,p,q,[t:1to(2)]t17(t)):is"e"(pair1type,p,q)
-p@q0:=pair1(first1,second1):pair1type
-t18:=first1is1(first1(p),second1):is"e"(alpha,first1(q0),first1(p))
-t19:=second1is1(first1,second1):is"e"(alpha,second1(q0),second1(p))
--pair
-p@pair1is1:=th5".pair"(q0".pair",p,t18".pair",t19".pair"):is"e"(pair1type,pair1(first1,second1),p)
-pair1is2:=symis(pair1type,pair1(first1,second1),p,pair1is1):is"e"(pair1type,p,pair1(first1,second1))
-@[x:nat]
-lessisi3:=lessisi2(x,x,refis(nat,x)):lessis(x,x)
-1out:=outn(x,1,satz24a(x)):1to(x)
-xout:=outn(x,x,lessisi3(x)):1to(x)
-[y:nat][l:lessis(y,x)][u:1to(y)]
-+left
-ui:=inn(y,u):nat
-t1:=1top(y,u):lessis(ui,y)
-t2:=trlessis(ui,y,x,t1,l):lessis(ui,x)
--left
-left1to:=outn(x,ui".left",t2".left"):1to(x)
-[v:1to(y)][i:is"e"(1to(x),left1to(u),left1to(v))]
-+*left
-i@t3:=isoutne(x,ui,t2,ui(v),t2(v),i):is(ui,ui(v))
--left
-i@thleft1:=isinne(y,u,v,t3".left"):is"e"(1to(y),u,v)
-l@thleft2:=[u:1to(y)][v:1to(y)][t:is"e"(1to(x),left1to(u),left1to(v))]thleft1(u,v,t):injective(1to(y),1to(x),[t:1to(y)]left1to(t))
-y@[u:1to(y)]
-+right
-ui:=inn(y,u):nat
-t4:=1top(y,u):lessis(ui,y)
-t5:=satz19o(ui,y,x,t4):lessis(pl(x,ui),pl(x,y))
--right
-right1to:=outn(pl(x,y),pl(x,ui".right"),t5".right"):1to(pl(x,y))
-[v:1to(y)][i:is"e"(1to(pl(x,y)),right1to(u),right1to(v))]
-+*right
-i@t6:=isoutne(pl(x,y),pl(x,ui(u)),t5(u),pl(x,ui(v)),t5(v),i):is(pl(x,ui(u)),pl(x,ui(v)))
-t7:=satz20e(ui(u),ui(v),x,t6):is(ui(u),ui(v))
--right
-i@thright1:=isinne(y,u,v,t7".right"):is"e"(1to(y),u,v)
-@[alpha:'type'][x:nat][y:nat][l:lessis(y,x)][f:[t:1to(x)]alpha]
-left:=[t:1to(y)]<left1to(x,y,l,t)>f:[t:1to(y)]alpha
-y@[f:[t:1to(pl(x,y))]alpha]
-right:=[t:1to(y)]<right1to(x,y,t)>f:[t:1to(y)]alpha
-y@[i:is(y,x)][f:[t:1to(y)]alpha]
-+*left
-f@t4:=lessisi2(y,x,i):lessis(y,x)
-t5:=lessisi2(x,y,symis(nat,y,x,i)):lessis(x,y)
-f1:=left(y,x,t5,f):[t:1to(x)]alpha
-f2:=left(t4,f1):[t:1to(y)]alpha
-[u:1to(y)]
-t6:=isinoutn(x,inn(y,u),trlessis(inn(y,u),y,x,1top(y,u),t4)):is(inn(y,u),inn(x,left1to(x,y,t4,u)))
-t7:=tris(1to(y),u,outn(y,inn(y,u),1top(y,u)),left1to(y,x,t5,left1to(x,y,t4,u)),isoutinn(y,u),isoutni(y,inn(y,u),1top(y,u),inn(x,left1to(x,y,t4,u)),trlessis(inn(x,left1to(x,y,t4,u)),x,y,1top(x,left1to(x,y,t4,u)),t5),t6)):is"e"(1to(y),u,left1to(y,x,t5,left1to(x,y,t4,u)))
-t8:=isf(1to(y),alpha,f,u,left1to(y,x,t5,left1to(x,y,t4,u)),t7):is"e"(alpha,<u>f,<u>f2)
--left
-f@thleft:=fisi(1to(y),alpha,f,f2".left",[t:1to(y)]t8".left"(t)):is"e"([t:1to(y)]alpha,f,left(x,y,lessisi2(y,x,i),left(y,x,lessisi2(x,y,symis(nat,y,x,i)),f)))
-@frac:=pair1type(nat):'type'
-[x1:nat][x2:nat]
-fr:=pair1(nat,x1,x2):frac
-@[x:frac]
-num:=first1(nat,x):nat
-den:=second1(nat,x):nat
-x2@numis:=first1is1(nat,x1,x2):is(num(fr(x1,x2)),x1)
-isnum:=first1is2(nat,x1,x2):is(x1,num(fr(x1,x2)))
-denis:=second1is1(nat,x1,x2):is(den(fr(x1,x2)),x2)
-isden:=second1is2(nat,x1,x2):is(x2,den(fr(x1,x2)))
-x@1x:=num(x):nat
-2x:=den(x):nat
-fris:=pair1is1(nat,x):is"e"(frac,fr(1x,2x),x)
-isfr:=pair1is2(nat,x):is"e"(frac,x,fr(1x,2x))
-x2@[y1:nat][y2:nat]
-12isnd:=ists12(x1,num(fr(x1,x2)),y2,den(fr(y1,y2)),isnum(x1,x2),isden(y1,y2)):is(ts(x1,y2),ts(num(fr(x1,x2)),den(fr(y1,y2))))
-ndis12:=symis(nat,ts(x1,y2),ts(num(fr(x1,x2)),den(fr(y1,y2))),12isnd):is(ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(x1,y2))
-x@[n1:nat][n2:nat]
-1disnd:=ists1(n1,num(fr(n1,n2)),2x,isnum(n1,n2)):is(ts(n1,2x),ts(num(fr(n1,n2)),2x))
-ndis1d:=symis(nat,ts(n1,2x),ts(num(fr(n1,n2)),2x),1disnd):is(ts(num(fr(n1,n2)),2x),ts(n1,2x))
-n2isnd:=ists2(n2,den(fr(n1,n2)),1x,isden(n1,n2)):is(ts(1x,n2),ts(1x,den(fr(n1,n2))))
-ndisn2:=symis(nat,ts(1x,n2),ts(1x,den(fr(n1,n2))),n2isnd):is(ts(1x,den(fr(n1,n2))),ts(1x,n2))
-x2@[n:nat][i:is(x1,n)]
-isn:=isf(nat,frac,[t:nat]fr(t,x2),x1,n,i):is"e"(frac,fr(x1,x2),fr(n,x2))
-n@[i:is(x2,n)]
-isd:=isf(nat,frac,[t:nat]fr(x1,t),x2,n,i):is"e"(frac,fr(x1,x2),fr(x1,n))
-y2@[i:is(x1,y1)][j:is(x2,y2)]
-isnd:=tris(frac,fr(x1,x2),fr(y1,x2),fr(y1,y2),isn(x1,x2,y1,i),isd(y1,x2,y2,j)):is"e"(frac,fr(x1,x2),fr(y1,y2))
-x@[y:frac]
-1y:=num(y):nat
-2y:=den(y):nat
-eq:=is(ts(1x,2y),ts(1y,2x)):'prop'
-y2@[i:is(ts(x1,y2),ts(y1,x2))]
-eqi12:=tr3is(nat,ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(x1,y2),ts(y1,x2),ts(num(fr(y1,y2)),den(fr(x1,x2))),ndis12(x1,x2,y1,y2),i,12isnd(y1,y2,x1,x2)):eq(fr(x1,x2),fr(y1,y2))
-n2@[i:is(ts(1x,n2),ts(n1,2x))]
-eqi1:=isp(frac,[t:frac]eq(t,fr(n1,n2)),fr(1x,2x),x,eqi12(1x,2x,n1,n2,i),fris):eq(x,fr(n1,n2))
-n2@[i:is(ts(n1,2x),ts(1x,n2))]
-eqi2:=isp(frac,[t:frac]eq(fr(n1,n2),t),fr(1x,2x),x,eqi12(n1,n2,1x,2x,i),fris):eq(fr(n1,n2),x)
-x@satz37:=refis(nat,ts(1x,2x)):eq(x,x)
-refeq:=satz37:eq(x,x)
-y@[i:is"e"(frac,x,y)]
-refeq1:=isp(frac,[t:frac]eq(x,t),x,y,refeq,i):eq(x,y)
-refeq2:=isp(frac,[t:frac]eq(t,x),x,y,refeq,i):eq(y,x)
-y2@[i:is(x1,y1)][j:is(x2,y2)]
-eqnd:=refeq1(fr(x1,x2),fr(y1,y2),isnd(i,j)):eq(fr(x1,x2),fr(y1,y2))
-x2@[n:nat][i:is(x1,n)]
-eqn:=refeq1(fr(x1,x2),fr(n,x2),isn(n,i)):eq(fr(x1,x2),fr(n,x2))
-n@[i:is(x2,n)]
-eqd:=refeq1(fr(x1,x2),fr(x1,n),isd(n,i)):eq(fr(x1,x2),fr(x1,n))
-y@[e:eq(x,y)]
-satz38:=symis(nat,ts(1x,2y),ts(1y,2x),e):eq(y,x)
-symeq:=satz38:eq(y,x)
-@[a:nat][b:nat][c:nat][d:nat]
-+ii1
-t1:=tris(nat,ts(b,ts(c,d)),ts(ts(b,c),d),ts(d,ts(b,c)),assts2(b,c,d),comts(ts(b,c),d)):is(ts(b,ts(c,d)),ts(d,ts(b,c)))
--ii1
-stets:=tr4is(nat,ts(ts(a,b),ts(c,d)),ts(a,ts(b,ts(c,d))),ts(a,ts(d,ts(b,c))),ts(ts(a,d),ts(b,c)),ts(ts(a,d),ts(c,b)),assts1(a,b,ts(c,d)),ists2(ts(b,ts(c,d)),ts(d,ts(b,c)),a,t1".ii1"),assts2(a,d,ts(b,c)),ists2(ts(b,c),ts(c,b),ts(a,d),comts(b,c))):is(ts(ts(a,b),ts(c,d)),ts(ts(a,d),ts(c,b)))
-+*ii1
-d@t2:=tr3is(nat,ts(b,ts(c,d)),ts(ts(c,d),b),ts(ts(d,c),b),ts(d,ts(c,b)),comts(b,ts(c,d)),ists1(ts(c,d),ts(d,c),b,comts(c,d)),assts1(d,c,b)):is(ts(b,ts(c,d)),ts(d,ts(c,b)))
-anders:=tr3is(nat,ts(ts(a,b),ts(c,d)),ts(a,ts(b,ts(c,d))),ts(a,ts(d,ts(c,b))),ts(ts(a,d),ts(c,b)),assts1(a,b,ts(c,d)),ists2(ts(b,ts(c,d)),ts(d,ts(c,b)),a,t2),assts2(a,d,ts(c,b))):is(ts(ts(a,b),ts(c,d)),ts(ts(a,d),ts(c,b)))
--ii1
-y@[z:frac]
-1z:=num(z):nat
-2z:=den(z):nat
-[e:eq(x,y)][f:eq(y,z)]
-+139
-t1:=ists12(ts(1x,2y),ts(1y,2x),ts(1y,2z),ts(1z,2y),e,f):is(ts(ts(1x,2y),ts(1y,2z)),ts(ts(1y,2x),ts(1z,2y)))
-t2:=stets(1x,2y,1y,2z):is(ts(ts(1x,2y),ts(1y,2z)),ts(ts(1x,2z),ts(1y,2y)))
-t3:=tris(nat,ts(ts(1y,2x),ts(1z,2y)),ts(ts(1y,2y),ts(1z,2x)),ts(ts(1z,2x),ts(1y,2y)),stets(1y,2x,1z,2y),comts(ts(1y,2y),ts(1z,2x))):is(ts(ts(1y,2x),ts(1z,2y)),ts(ts(1z,2x),ts(1y,2y)))
-t4:=tr3is(nat,ts(ts(1x,2z),ts(1y,2y)),ts(ts(1x,2y),ts(1y,2z)),ts(ts(1y,2x),ts(1z,2y)),ts(ts(1z,2x),ts(1y,2y)),symis(nat,ts(ts(1x,2y),ts(1y,2z)),ts(ts(1x,2z),ts(1y,2y)),t2),t1,t3):is(ts(ts(1x,2z),ts(1y,2y)),ts(ts(1z,2x),ts(1y,2y)))
--139
-satz39:=satz33b(ts(1x,2z),ts(1z,2x),ts(1y,2y),t4".139"):eq(x,z)
-+*139
-f@anders:=tr4is(nat,ts(ts(1x,2z),ts(1y,2y)),ts(ts(1x,2y),ts(1y,2z)),ts(ts(1y,2x),ts(1z,2y)),ts(ts(1y,2y),ts(1z,2x)),ts(ts(1z,2x),ts(1y,2y)),stets(1x,2z,1y,2y),ists12(ts(1x,2y),ts(1y,2x),ts(1y,2z),ts(1z,2y),e,f),stets(1y,2x,1z,2y),comts(ts(1y,2y),ts(1z,2x))):is(ts(ts(1x,2z),ts(1y,2y)),ts(ts(1z,2x),ts(1y,2y)))
--139
-f@treq:=satz39:eq(x,z)
-z@[e:eq(z,x)][f:eq(z,y)]
-treq1:=treq(x,z,y,symeq(z,x,e),f):eq(x,y)
-z@[e:eq(x,z)][f:eq(y,z)]
-treq2:=treq(x,z,y,e,symeq(y,z,f)):eq(x,y)
-z@[u:frac][e:eq(x,y)][f:eq(y,z)][g:eq(z,u)]
-tr3eq:=treq(x,y,u,e,treq(y,z,u,f,g)):eq(x,u)
-u@[v:frac][e:eq(x,y)][f:eq(y,z)][g:eq(z,u)][h:eq(u,v)]
-tr4eq:=tr3eq(x,y,z,v,e,f,treq(z,u,v,g,h)):eq(x,v)
-x@[n:nat]
-satz40:=eqi1(ts(1x,n),ts(2x,n),tris(nat,ts(1x,ts(2x,n)),ts(1x,ts(n,2x)),ts(ts(1x,n),2x),ists2(ts(2x,n),ts(n,2x),1x,comts(2x,n)),assts2(1x,n,2x))):eq(x,fr(ts(1x,n),ts(2x,n)))
-satz40a:=symeq(x,fr(ts(1x,n),ts(2x,n)),satz40):eq(fr(ts(1x,n),ts(2x,n)),x)
-x2@[n:nat]
-satz40b:=eqi12(ts(x1,n),ts(x2,n),tris(nat,ts(x1,ts(x2,n)),ts(x1,ts(n,x2)),ts(ts(x1,n),x2),ists2(ts(x2,n),ts(n,x2),x1,comts(x2,n)),assts2(x1,n,x2))):eq(fr(x1,x2),fr(ts(x1,n),ts(x2,n)))
-satz40c:=symeq(fr(x1,x2),fr(ts(x1,n),ts(x2,n)),satz40b):eq(fr(ts(x1,n),ts(x2,n)),fr(x1,x2))
-y@moref:=more(ts(1x,2y),ts(1y,2x)):'prop'
-lessf:=less(ts(1x,2y),ts(1y,2x)):'prop'
-y2@[m:more(ts(x1,y2),ts(y1,x2))]
-morefi12:=ismore12(ts(x1,y2),ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(y1,x2),ts(num(fr(y1,y2)),den(fr(x1,x2))),12isnd(x1,x2,y1,y2),12isnd(y1,y2,x1,x2),m):moref(fr(x1,x2),fr(y1,y2))
-y2@[l:less(ts(x1,y2),ts(y1,x2))]
-lessfi12:=isless12(ts(x1,y2),ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(y1,x2),ts(num(fr(y1,y2)),den(fr(x1,x2))),12isnd(x1,x2,y1,y2),12isnd(y1,y2,x1,x2),l):lessf(fr(x1,x2),fr(y1,y2))
-n2@[m:more(ts(1x,n2),ts(n1,2x))]
-morefi1:=ismore12(ts(1x,n2),ts(1x,den(fr(n1,n2))),ts(n1,2x),ts(num(fr(n1,n2)),2x),n2isnd(x,n1,n2),1disnd(x,n1,n2),m):moref(x,fr(n1,n2))
-n2@[m:more(ts(n1,2x),ts(1x,n2))]
-morefi2:=ismore12(ts(n1,2x),ts(num(fr(n1,n2)),2x),ts(1x,n2),ts(1x,den(fr(n1,n2))),1disnd(x,n1,n2),n2isnd(x,n1,n2),m):moref(fr(n1,n2),x)
-n2@[l:less(ts(1x,n2),ts(n1,2x))]
-lessfi1:=isless12(ts(1x,n2),ts(1x,den(fr(n1,n2))),ts(n1,2x),ts(num(fr(n1,n2)),2x),n2isnd(x,n1,n2),1disnd(x,n1,n2),l):lessf(x,fr(n1,n2))
-n2@[l:less(ts(n1,2x),ts(1x,n2))]
-lessfi2:=isless12(ts(n1,2x),ts(num(fr(n1,n2)),2x),ts(1x,n2),ts(1x,den(fr(n1,n2))),1disnd(x,n1,n2),n2isnd(x,n1,n2),l):lessf(fr(n1,n2),x)
-y@satz41:=satz10(ts(1x,2y),ts(1y,2x)):orec3(eq(x,y),moref(x,y),lessf(x,y))
-satz41a:=satz10a(ts(1x,2y),ts(1y,2x)):or3(eq(x,y),moref(x,y),lessf(x,y))
-satz41b:=satz10b(ts(1x,2y),ts(1y,2x)):ec3(eq(x,y),moref(x,y),lessf(x,y))
-[m:moref(x,y)]
-satz42:=satz11(ts(1x,2y),ts(1y,2x),m):lessf(y,x)
-y@[l:lessf(x,y)]
-satz43:=satz12(ts(1x,2y),ts(1y,2x),l):moref(y,x)
-u@1u:=num(u):nat
-2u:=den(u):nat
-[m:moref(x,y)][e:eq(x,z)][f:eq(y,u)]
-+244
-t1:=ists12(ts(1y,2u),ts(1u,2y),ts(1z,2x),ts(1x,2z),f,symeq(x,z,e)):is(ts(ts(1y,2u),ts(1z,2x)),ts(ts(1u,2y),ts(1x,2z)))
-t2:=tr3is(nat,ts(ts(1y,2x),ts(1z,2u)),ts(ts(1y,2u),ts(1z,2x)),ts(ts(1u,2y),ts(1x,2z)),ts(ts(1u,2z),ts(1x,2y)),stets(1y,2x,1z,2u),t1,stets(1u,2y,1x,2z)):is(ts(ts(1y,2x),ts(1z,2u)),ts(ts(1u,2z),ts(1x,2y)))
-t3:=ismore1(ts(ts(1u,2z),ts(1x,2y)),ts(ts(1y,2x),ts(1z,2u)),ts(ts(1u,2z),ts(1y,2x)),symis(nat,ts(ts(1y,2x),ts(1z,2u)),ts(ts(1u,2z),ts(1x,2y)),t2),satz32d(ts(1x,2y),ts(1y,2x),ts(1u,2z),m)):more(ts(ts(1y,2x),ts(1z,2u)),ts(ts(1u,2z),ts(1y,2x)))
--244
-satz44:=satz33a(ts(1z,2u),ts(1u,2z),ts(1y,2x),ismore1(ts(ts(1y,2x),ts(1z,2u)),ts(ts(1z,2u),ts(1y,2x)),ts(ts(1u,2z),ts(1y,2x)),comts(ts(1y,2x),ts(1z,2u)),t3".244")):moref(z,u)
-u@[e:eq(x,y)][f:eq(z,u)][m:moref(x,z)]
-eqmoref12:=satz44(x,z,y,u,m,e,f):moref(y,u)
-z@[e:eq(x,y)][m:moref(x,z)]
-eqmoref1:=satz44(x,z,y,z,m,e,refeq(z)):moref(y,z)
-e@[m:moref(z,x)]
-eqmoref2:=satz44(z,x,z,y,m,refeq(z),e):moref(z,y)
-u@[l:lessf(x,y)][e:eq(x,z)][f:eq(y,u)]
-satz45:=satz42(u,z,satz44(y,x,u,z,satz43(x,y,l),f,e)):lessf(z,u)
-u@[e:eq(x,y)][f:eq(z,u)][l:lessf(x,z)]
-eqlessf12:=satz45(x,z,y,u,l,e,f):lessf(y,u)
-z@[e:eq(x,y)][l:lessf(x,z)]
-eqlessf1:=satz45(x,z,y,z,l,e,refeq(z)):lessf(y,z)
-e@[l:lessf(z,x)]
-eqlessf2:=satz45(z,x,z,y,l,refeq(z),e):lessf(z,y)
-y@moreq:=or(moref(x,y),eq(x,y)):'prop'
-lesseq:=or(lessf(x,y),eq(x,y)):'prop'
-[e:eq(x,y)]
-moreqi2:=ori2(moref(x,y),eq(x,y),e):moreq(x,y)
-lesseqi2:=ori2(lessf(x,y),eq(x,y),e):lesseq(x,y)
-y@[m:moref(x,y)]
-moreqi1:=ori1(moref(x,y),eq(x,y),m):moreq(x,y)
-y@[l:lessf(x,y)]
-lesseqi1:=ori1(lessf(x,y),eq(x,y),l):lesseq(x,y)
-y@[m:moreq(x,y)]
-satz41c:=th7"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),satz41b,comor(moref(x,y),eq(x,y),m)):not(lessf(x,y))
-y@[l:lesseq(x,y)]
-satz41d:=th9"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),satz41b,l):not(moref(x,y))
-y@[n:not(moref(x,y))]
-satz41e:=th2"l.or3"(eq(x,y),moref(x,y),lessf(x,y),satz41a,n):lesseq(x,y)
-y@[n:not(lessf(x,y))]
-satz41f:=comor(eq(x,y),moref(x,y),th3"l.or3"(eq(x,y),moref(x,y),lessf(x,y),satz41a,n)):moreq(x,y)
-y@[m:moref(x,y)]
-satz41g:=th3"l.or"(lessf(x,y),eq(x,y),ec3e23(eq(x,y),moref(x,y),lessf(x,y),satz41b,m),ec3e21(eq(x,y),moref(x,y),lessf(x,y),satz41b,m)):not(lesseq(x,y))
-y@[l:lessf(x,y)]
-satz41h:=th3"l.or"(moref(x,y),eq(x,y),ec3e32(eq(x,y),moref(x,y),lessf(x,y),satz41b,l),ec3e31(eq(x,y),moref(x,y),lessf(x,y),satz41b,l)):not(moreq(x,y))
-y@[n:not(moreq(x,y))]
-satz41j:=or3e3(eq(x,y),moref(x,y),lessf(x,y),satz41a,th5"l.or"(moref(x,y),eq(x,y),n),th4"l.or"(moref(x,y),eq(x,y),n)):lessf(x,y)
-y@[n:not(lesseq(x,y))]
-satz41k:=or3e2(eq(x,y),moref(x,y),lessf(x,y),satz41a,th4"l.or"(lessf(x,y),eq(x,y),n),th5"l.or"(lessf(x,y),eq(x,y),n)):moref(x,y)
-u@[m:moreq(x,y)][e:eq(x,z)][f:eq(y,u)]
-+246
-[n:moref(x,y)]
-t1:=ori1(moref(z,u),eq(z,u),satz44(n,e,f)):moreq(z,u)
-f@[g:eq(x,y)]
-t2:=ori2(moref(z,u),eq(z,u),tr3eq(z,x,y,u,symeq(x,z,e),g,f)):moreq(z,u)
--246
-satz46:=orapp(moref(x,y),eq(x,y),moreq(z,u),m,[t:moref(x,y)]t1".246"(t),[t:eq(x,y)]t2".246"(t)):moreq(z,u)
-u@[e:eq(x,y)][f:eq(z,u)][m:moreq(x,z)]
-eqmoreq12:=satz46(x,z,y,u,m,e,f):moreq(y,u)
-z@[e:eq(x,y)][m:moreq(x,z)]
-eqmoreq1:=satz46(x,z,y,z,m,e,refeq(z)):moreq(y,z)
-e@[m:moreq(z,x)]
-eqmoreq2:=satz46(z,x,z,y,m,refeq(z),e):moreq(z,y)
-u@[l:lesseq(x,y)][e:eq(x,z)][f:eq(y,u)]
-+247
-[k:lessf(x,y)]
-t1:=ori1(lessf(z,u),eq(z,u),satz45(k,e,f)):lesseq(z,u)
-f@[g:eq(x,y)]
-t2:=ori2(lessf(z,u),eq(z,u),tr3eq(z,x,y,u,symeq(x,z,e),g,f)):lesseq(z,u)
--247
-satz47:=orapp(lessf(x,y),eq(x,y),lesseq(z,u),l,[t:lessf(x,y)]t1".247"(t),[t:eq(x,y)]t2".247"(t)):lesseq(z,u)
-u@[e:eq(x,y)][f:eq(z,u)][l:lesseq(x,z)]
-eqlesseq12:=satz47(x,z,y,u,l,e,f):lesseq(y,u)
-z@[e:eq(x,y)][l:lesseq(x,z)]
-eqlesseq1:=satz47(x,z,y,z,l,e,refeq(z)):lesseq(y,z)
-e@[l:lesseq(z,x)]
-eqlesseq2:=satz47(z,x,z,y,l,refeq(z),e):lesseq(z,y)
-y@[m:moreq(x,y)]
-satz48:=th9"l.or"(moref(x,y),eq(x,y),lessf(y,x),eq(y,x),m,[t:moref(x,y)]satz42(x,y,t),[t:eq(x,y)]satz38(x,y,t)):lesseq(y,x)
-y@[l:lesseq(x,y)]
-satz49:=th9"l.or"(lessf(x,y),eq(x,y),moref(y,x),eq(y,x),l,[t:lessf(x,y)]satz43(x,y,t),[t:eq(x,y)]satz38(x,y,t)):moreq(y,x)
-z@[l:lessf(x,y)][k:lessf(y,z)]
-+250
-t1:=satz34a(ts(1x,2y),ts(1y,2x),ts(1y,2z),ts(1z,2y),l,k):less(ts(ts(1x,2y),ts(1y,2z)),ts(ts(1y,2x),ts(1z,2y)))
-t2:=isless12(ts(ts(1x,2y),ts(1y,2z)),ts(ts(1x,2z),ts(1y,2y)),ts(ts(1y,2x),ts(1z,2y)),ts(ts(1z,2x),ts(1y,2y)),stets(1x,2y,1y,2z),tris(nat,ts(ts(1y,2x),ts(1z,2y)),ts(ts(1y,2y),ts(1z,2x)),ts(ts(1z,2x),ts(1y,2y)),stets(1y,2x,1z,2y),comts(ts(1y,2y),ts(1z,2x))),t1):less(ts(ts(1x,2z),ts(1y,2y)),ts(ts(1z,2x),ts(1y,2y)))
--250
-satz50:=satz33c(ts(1x,2z),ts(1z,2x),ts(1y,2y),t2".250"):lessf(x,z)
-trlessf:=satz50:lessf(x,z)
-z@[m:moref(x,y)][n:moref(y,z)]
-trmoref:=satz43(z,x,satz50(z,y,x,satz42(y,z,n),satz42(x,y,m))):moref(x,z)
-z@[l:lesseq(x,y)][k:lessf(y,z)]
-satz51a:=orapp(lessf(x,y),eq(x,y),lessf(x,z),l,[t:lessf(x,y)]satz50(t,k),[t:eq(x,y)]eqlessf1(y,x,z,symeq(x,y,t),k)):lessf(x,z)
-z@[l:lessf(x,y)][k:lesseq(y,z)]
-satz51b:=orapp(lessf(y,z),eq(y,z),lessf(x,z),k,[t:lessf(y,z)]satz50(l,t),[t:eq(y,z)]eqlessf2(y,z,x,t,l)):lessf(x,z)
-z@[m:moreq(x,y)][n:moref(y,z)]
-satz51c:=satz43(z,x,satz51b(z,y,x,satz42(y,z,n),satz48(x,y,m))):moref(x,z)
-z@[m:moref(x,y)][n:moreq(y,z)]
-satz51d:=satz43(z,x,satz51a(z,y,x,satz48(y,z,n),satz42(x,y,m))):moref(x,z)
-z@[l:lesseq(x,y)][k:lesseq(y,z)]
-+252
-[e:eq(x,y)][f:eq(y,z)]
-t1:=ori2(lessf(x,z),eq(x,z),treq(x,y,z,e,f)):lesseq(x,z)
-e@[j:lessf(y,z)]
-t2:=ori1(lessf(x,z),eq(x,z),satz51a(l,j)):lesseq(x,z)
-e@t3:=orapp(lessf(y,z),eq(y,z),lesseq(x,z),k,[t:lessf(y,z)]t2(t),[t:eq(y,z)]t1(t)):lesseq(x,z)
-k@[j:lessf(x,y)]
-t4:=ori1(lessf(x,z),eq(x,z),satz51b(j,k)):lesseq(x,z)
--252
-satz52:=orapp(lessf(x,y),eq(x,y),lesseq(x,z),l,[t:lessf(x,y)]t4".252"(t),[t:eq(x,y)]t3".252"(t)):lesseq(x,z)
-trlesseq:=satz52:lesseq(x,z)
-+*252
-k@[j:lessf(x,y)]
-t5:=ori1(lessf(x,z),eq(x,z),satz51b(j,k)):lesseq(x,z)
-k@[e:eq(x,y)]
-t6:=eqlesseq1(y,x,z,symeq(x,y,e),k):lesseq(x,z)
-k@anders:=orapp(lessf(x,y),eq(x,y),lesseq(x,z),l,[t:lessf(x,y)]t5(t),[t:eq(x,y)]t6(t)):lesseq(x,z)
--252
-z@[m:moreq(x,y)][n:moreq(y,z)]
-trmoreq:=satz49(z,x,satz52(z,y,x,satz48(y,z,n),satz48(x,y,m))):moreq(x,z)
-+253
-x@t1:=ismore1(pl(ts(1x,2x),ts(1x,2x)),ts(pl(1x,1x),2x),ts(1x,2x),distpt1(1x,1x,2x),satz18(ts(1x,2x),ts(1x,2x))):more(ts(pl(1x,1x),2x),ts(1x,2x))
-t2:=morefi2(pl(1x,1x),2x,t1):moref(fr(pl(1x,1x),2x),x)
--253
-x@satz53:=somei(frac,[t:frac]moref(t,x),fr(pl(1x,1x),2x),t2".253"):some"l"(frac,[t:frac]moref(t,x))
-+254
-t1:=isless2(pl(ts(1x,2x),ts(1x,2x)),ts(1x,pl(2x,2x)),ts(1x,2x),distpt2(1x,2x,2x),satz18a(ts(1x,2x),ts(1x,2x))):less(ts(1x,2x),ts(1x,pl(2x,2x)))
-t2:=lessfi2(1x,pl(2x,2x),t1):lessf(fr(1x,pl(2x,2x)),x)
--254
-satz54:=somei(frac,[t:frac]lessf(t,x),fr(1x,pl(2x,2x)),t2".254"):some"l"(frac,[t:frac]lessf(t,x))
-y@[l:lessf(x,y)]
-+255
-t1:=satz19f(ts(1x,2y),ts(1y,2x),ts(1x,2x),l):less(pl(ts(1x,2x),ts(1x,2y)),pl(ts(1x,2x),ts(1y,2x)))
-t2:=satz19c(ts(1x,2y),ts(1y,2x),ts(1y,2y),l):less(pl(ts(1x,2y),ts(1y,2y)),pl(ts(1y,2x),ts(1y,2y)))
-t3:=isless12(pl(ts(1x,2x),ts(1x,2y)),ts(1x,pl(2x,2y)),pl(ts(1x,2x),ts(1y,2x)),ts(pl(1x,1y),2x),distpt2(1x,2x,2y),distpt1(1x,1y,2x),t1):less(ts(1x,pl(2x,2y)),ts(pl(1x,1y),2x))
-t4:=lessfi1(pl(1x,1y),pl(2x,2y),t3):lessf(x,fr(pl(1x,1y),pl(2x,2y)))
-t5:=isless12(pl(ts(1x,2y),ts(1y,2y)),ts(pl(1x,1y),2y),pl(ts(1y,2x),ts(1y,2y)),ts(1y,pl(2x,2y)),distpt1(1x,1y,2y),distpt2(1y,2x,2y),t2):less(ts(pl(1x,1y),2y),ts(1y,pl(2x,2y)))
-t6:=lessfi2(y,pl(1x,1y),pl(2x,2y),t5):lessf(fr(pl(1x,1y),pl(2x,2y)),y)
-t7:=andi(lessf(x,fr(pl(1x,1y),pl(2x,2y))),lessf(fr(pl(1x,1y),pl(2x,2y)),y),t4,t6):and(lessf(x,fr(pl(1x,1y),pl(2x,2y))),lessf(fr(pl(1x,1y),pl(2x,2y)),y))
--255
-satz55:=somei(frac,[t:frac]and(lessf(x,t),lessf(t,y)),fr(pl(1x,1y),pl(2x,2y)),t7".255"):some"l"(frac,[t:frac]and(lessf(x,t),lessf(t,y)))
-y@pf:=fr(pl(ts(1x,2y),ts(1y,2x)),ts(2x,2y)):frac
-+ii3
-y2@t1:=ispl12(ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(x1,y2),ts(num(fr(y1,y2)),den(fr(x1,x2))),ts(y1,x2),ndis12(x1,x2,y1,y2),ndis12(y1,y2,x1,x2)):is(pl(ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(num(fr(y1,y2)),den(fr(x1,x2)))),pl(ts(x1,y2),ts(y1,x2)))
-t2:=ists12(den(fr(x1,x2)),x2,den(fr(y1,y2)),y2,denis(x1,x2),denis(y1,y2)):is(ts(den(fr(x1,x2)),den(fr(y1,y2))),ts(x2,y2))
--ii3
-y2@pf12:=isnd(pl(ts(num(fr(x1,x2)),den(fr(y1,y2))),ts(num(fr(y1,y2)),den(fr(x1,x2)))),ts(den(fr(x1,x2)),den(fr(y1,y2))),pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2),t1".ii3",t2".ii3"):is"e"(frac,pf(fr(x1,x2),fr(y1,y2)),fr(pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2)))
-+*ii3
-n2@t3:=ispl12(ts(1x,den(fr(n1,n2))),ts(1x,n2),ts(num(fr(n1,n2)),2x),ts(n1,2x),ndisn2(x,n1,n2),ndis1d(x,n1,n2)):is(pl(ts(1x,den(fr(n1,n2))),ts(num(fr(n1,n2)),2x)),pl(ts(1x,n2),ts(n1,2x)))
-t4:=ists2(den(fr(n1,n2)),n2,2x,denis(n1,n2)):is(ts(2x,den(fr(n1,n2))),ts(2x,n2))
--ii3
-n2@pf1:=isnd(pl(ts(1x,den(fr(n1,n2))),ts(num(fr(n1,n2)),2x)),ts(2x,den(fr(n1,n2))),pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2),t3".ii3",t4".ii3"):is"e"(frac,pf(x,fr(n1,n2)),fr(pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2)))
-+*ii3
-n2@t5:=ispl12(ts(num(fr(n1,n2)),2x),ts(n1,2x),ts(1x,den(fr(n1,n2))),ts(1x,n2),ndis1d(x,n1,n2),ndisn2(x,n1,n2)):is(pl(ts(num(fr(n1,n2)),2x),ts(1x,den(fr(n1,n2)))),pl(ts(n1,2x),ts(1x,n2)))
-t6:=ists1(den(fr(n1,n2)),n2,2x,denis(n1,n2)):is(ts(den(fr(n1,n2)),2x),ts(n2,2x))
--ii3
-n2@pf2:=isnd(pl(ts(num(fr(n1,n2)),2x),ts(1x,den(fr(n1,n2)))),ts(den(fr(n1,n2)),2x),pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x),t5".ii3",t6".ii3"):is"e"(frac,pf(fr(n1,n2),x),fr(pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x)))
-y2@pfeq12a:=refeq1(pf(fr(x1,x2),fr(y1,y2)),fr(pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2)),pf12):eq(pf(fr(x1,x2),fr(y1,y2)),fr(pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2)))
-pfeq12b:=refeq2(pf(fr(x1,x2),fr(y1,y2)),fr(pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2)),pf12):eq(fr(pl(ts(x1,y2),ts(y1,x2)),ts(x2,y2)),pf(fr(x1,x2),fr(y1,y2)))
-n2@pfeq1a:=refeq1(pf(x,fr(n1,n2)),fr(pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2)),pf1):eq(pf(x,fr(n1,n2)),fr(pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2)))
-pfeq1b:=refeq2(pf(x,fr(n1,n2)),fr(pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2)),pf1):eq(fr(pl(ts(1x,n2),ts(n1,2x)),ts(2x,n2)),pf(x,fr(n1,n2)))
-pfeq2a:=refeq1(pf(fr(n1,n2),x),fr(pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x)),pf2):eq(pf(fr(n1,n2),x),fr(pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x)))
-pfeq2b:=refeq2(pf(fr(n1,n2),x),fr(pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x)),pf2):eq(fr(pl(ts(n1,2x),ts(1x,n2)),ts(n2,2x)),pf(fr(n1,n2),x))
-u@[e:eq(x,y)][f:eq(z,u)]
-+356
-t1:=ists1(ts(1x,2y),ts(1y,2x),ts(2z,2u),e):is(ts(ts(1x,2y),ts(2z,2u)),ts(ts(1y,2x),ts(2z,2u)))
-t2:=t1(z,u,x,y,f,e):is(ts(ts(1z,2u),ts(2x,2y)),ts(ts(1u,2z),ts(2x,2y)))
-t3:=tr3is(nat,ts(ts(1x,2z),ts(2y,2u)),ts(ts(1x,2z),ts(2u,2y)),ts(ts(1x,2y),ts(2u,2z)),ts(ts(1x,2y),ts(2z,2u)),ists2(ts(2y,2u),ts(2u,2y),ts(1x,2z),comts(2y,2u)),stets(1x,2z,2u,2y),ists2(ts(2u,2z),ts(2z,2u),ts(1x,2y),comts(2u,2z))):is(ts(ts(1x,2z),ts(2y,2u)),ts(ts(1x,2y),ts(2z,2u)))
-t4:=tr4is(nat,ts(ts(1x,2z),ts(2y,2u)),ts(ts(1x,2y),ts(2z,2u)),ts(ts(1y,2x),ts(2z,2u)),ts(ts(1y,2u),ts(2z,2x)),ts(ts(1y,2u),ts(2x,2z)),t3,t1,stets(1y,2x,2z,2u),ists2(ts(2z,2x),ts(2x,2z),ts(1y,2u),comts(2z,2x))):is(ts(ts(1x,2z),ts(2y,2u)),ts(ts(1y,2u),ts(2x,2z)))
-t5:=tr4is(nat,ts(ts(1z,2x),ts(2y,2u)),ts(ts(1z,2u),ts(2y,2x)),ts(ts(1z,2u),ts(2x,2y)),ts(ts(1u,2z),ts(2x,2y)),ts(ts(1u,2y),ts(2x,2z)),stets(1z,2x,2y,2u),ists2(ts(2y,2x),ts(2x,2y),ts(1z,2u),comts(2y,2x)),t2,stets(1u,2z,2x,2y)):is(ts(ts(1z,2x),ts(2y,2u)),ts(ts(1u,2y),ts(2x,2z)))
-t6:=ispl12(ts(ts(1x,2z),ts(2y,2u)),ts(ts(1y,2u),ts(2x,2z)),ts(ts(1z,2x),ts(2y,2u)),ts(ts(1u,2y),ts(2x,2z)),t4,t5):is(pl(ts(ts(1x,2z),ts(2y,2u)),ts(ts(1z,2x),ts(2y,2u))),pl(ts(ts(1y,2u),ts(2x,2z)),ts(ts(1u,2y),ts(2x,2z))))
-t7:=tr3is(nat,ts(pl(ts(1x,2z),ts(1z,2x)),ts(2y,2u)),pl(ts(ts(1x,2z),ts(2y,2u)),ts(ts(1z,2x),ts(2y,2u))),pl(ts(ts(1y,2u),ts(2x,2z)),ts(ts(1u,2y),ts(2x,2z))),ts(pl(ts(1y,2u),ts(1u,2y)),ts(2x,2z)),disttp1(ts(1x,2z),ts(1z,2x),ts(2y,2u)),t6,distpt1(ts(1y,2u),ts(1u,2y),ts(2x,2z))):is(ts(pl(ts(1x,2z),ts(1z,2x)),ts(2y,2u)),ts(pl(ts(1y,2u),ts(1u,2y)),ts(2x,2z)))
--356
-satz56:=eqi12(pl(ts(1x,2z),ts(1z,2x)),ts(2x,2z),pl(ts(1y,2u),ts(1u,2y)),ts(2y,2u),t7".356"):eq(pf(x,z),pf(y,u))
-eqpf12:=satz56:eq(pf(x,z),pf(y,u))
-z@[e:eq(x,y)]
-eqpf1:=eqpf12(x,y,z,z,e,refeq(z)):eq(pf(x,z),pf(y,z))
-eqpf2:=eqpf12(z,z,x,y,refeq(z),e):eq(pf(z,x),pf(z,y))
-x2@[n:nat]
-satz57:=tr3eq(pf(fr(x1,n),fr(x2,n)),fr(pl(ts(x1,n),ts(x2,n)),ts(n,n)),fr(ts(pl(x1,x2),n),ts(n,n)),fr(pl(x1,x2),n),pfeq12a(x1,n,x2,n),eqn(pl(ts(x1,n),ts(x2,n)),ts(n,n),ts(pl(x1,x2),n),distpt1(x1,x2,n)),satz40c(pl(x1,x2),n,n)):eq(pf(fr(x1,n),fr(x2,n)),fr(pl(x1,x2),n))
-satz57a:=symeq(pf(fr(x1,n),fr(x2,n)),fr(pl(x1,x2),n),satz57):eq(fr(pl(x1,x2),n),pf(fr(x1,n),fr(x2,n)))
-y@satz58:=eqnd(pl(ts(1x,2y),ts(1y,2x)),ts(2x,2y),pl(ts(1y,2x),ts(1x,2y)),ts(2y,2x),compl(ts(1x,2y),ts(1y,2x)),comts(2x,2y)):eq(pf(x,y),pf(y,x))
-compf:=satz58:eq(pf(x,y),pf(y,x))
-+359
-z@t1:=tr3is(nat,ts(ts(1y,2x),2z),ts(ts(2x,1y),2z),ts(2x,ts(1y,2z)),ts(ts(1y,2z),2x),ists1(ts(1y,2x),ts(2x,1y),2z,comts(1y,2x)),assts1(2x,1y,2z),comts(2x,ts(1y,2z))):is(ts(ts(1y,2x),2z),ts(ts(1y,2z),2x))
-t2:=ispl12(ts(ts(1x,2y),2z),ts(1x,ts(2y,2z)),ts(ts(1y,2x),2z),ts(ts(1y,2z),2x),assts1(1x,2y,2z),t1):is(pl(ts(ts(1x,2y),2z),ts(ts(1y,2x),2z)),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)))
-t3:=tris(nat,ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(ts(1x,2y),2z),ts(ts(1y,2x),2z)),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),disttp1(ts(1x,2y),ts(1y,2x),2z),t2):is(ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)))
-t4:=tris(nat,ts(1z,ts(2x,2y)),ts(1z,ts(2y,2x)),ts(ts(1z,2y),2x),ists2(ts(2x,2y),ts(2y,2x),1z,comts(2x,2y)),assts2(1z,2y,2x)):is(ts(1z,ts(2x,2y)),ts(ts(1z,2y),2x))
-t5:=ispl12(ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),ts(1z,ts(2x,2y)),ts(ts(1z,2y),2x),t3,t4):is(pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),pl(pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),ts(ts(1z,2y),2x)))
-t6:=ispl2(pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)),ts(pl(ts(1y,2z),ts(1z,2y)),2x),ts(1x,ts(2y,2z)),distpt1(ts(1y,2z),ts(1z,2y),2x)):is(pl(ts(1x,ts(2y,2z)),pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x))),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)))
-t7:=tr3is(nat,pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),pl(pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),ts(ts(1z,2y),2x)),pl(ts(1x,ts(2y,2z)),pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x))),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)),t5,asspl1(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)),t6):is(pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)))
--359
-z@satz59:=tr3eq(pf(pf(x,y),z),fr(pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),ts(ts(2x,2y),2z)),fr(pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)),ts(2x,ts(2y,2z))),pf(x,pf(y,z)),pfeq2a(z,pl(ts(1x,2y),ts(1y,2x)),ts(2x,2y)),eqnd(pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),ts(ts(2x,2y),2z),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)),ts(2x,ts(2y,2z)),t7".359",assts1(2x,2y,2z)),pfeq1b(x,pl(ts(1y,2z),ts(1z,2y)),ts(2y,2z))):eq(pf(pf(x,y),z),pf(x,pf(y,z)))
-asspf1:=satz59:eq(pf(pf(x,y),z),pf(x,pf(y,z)))
-asspf2:=symeq(pf(pf(x,y),z),pf(x,pf(y,z)),asspf1):eq(pf(x,pf(y,z)),pf(pf(x,y),z))
-c@stets1:=tr3is(nat,ts(ts(a,b),c),ts(a,ts(b,c)),ts(a,ts(c,b)),ts(ts(a,c),b),assts1(a,b,c),ists2(ts(b,c),ts(c,b),a,comts(b,c)),assts2(a,c,b)):is(ts(ts(a,b),c),ts(ts(a,c),b))
-+*359
-z@t8:=tris(nat,ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(ts(1x,2y),2z),ts(ts(1y,2x),2z)),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),disttp1(ts(1x,2y),ts(1y,2x),2z),ispl12(ts(ts(1x,2y),2z),ts(1x,ts(2y,2z)),ts(ts(1y,2x),2z),ts(ts(1y,2z),2x),assts1(1x,2y,2z),stets1(1y,2x,2z))):is(ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)))
-t9:=tris(nat,ts(1z,ts(2x,2y)),ts(ts(1z,2x),2y),ts(ts(1z,2y),2x),assts2(1z,2x,2y),stets1(1z,2x,2y)):is(ts(1z,ts(2x,2y)),ts(ts(1z,2y),2x))
-anderst7:=tr3is(nat,pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),pl(pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),ts(ts(1z,2y),2x)),pl(ts(1x,ts(2y,2z)),pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x))),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)),ispl12(ts(pl(ts(1x,2y),ts(1y,2x)),2z),pl(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x)),ts(1z,ts(2x,2y)),ts(ts(1z,2y),2x),t8,t9),asspl1(ts(1x,ts(2y,2z)),ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)),ispl2(pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)),ts(pl(ts(1y,2z),ts(1z,2y)),2x),ts(1x,ts(2y,2z)),distpt1(ts(1y,2z),ts(1z,2y),2x))):is(pl(ts(pl(ts(1x,2y),ts(1y,2x)),2z),ts(1z,ts(2x,2y))),pl(ts(1x,ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),2x)))
--359
-+360
-y@t1:=satz18(ts(1x,2y),ts(1y,2x)):more(pl(ts(1x,2y),ts(1y,2x)),ts(1x,2y))
-t2:=satz32a(pl(ts(1x,2y),ts(1y,2x)),ts(1x,2y),2x,t1):more(ts(pl(ts(1x,2y),ts(1y,2x)),2x),ts(ts(1x,2y),2x))
-t3:=tris(nat,ts(ts(1x,2y),2x),ts(1x,ts(2y,2x)),ts(1x,ts(2x,2y)),assts1(1x,2y,2x),ists2(ts(2y,2x),ts(2x,2y),1x,comts(2y,2x))):is(ts(ts(1x,2y),2x),ts(1x,ts(2x,2y)))
-t4:=ismore2(ts(ts(1x,2y),2x),ts(1x,ts(2x,2y)),ts(pl(ts(1x,2y),ts(1y,2x)),2x),t3,t2):more(ts(pl(ts(1x,2y),ts(1y,2x)),2x),ts(1x,ts(2x,2y)))
--360
-y@satz60:=morefi2(pl(ts(1x,2y),ts(1y,2x)),ts(2x,2y),t4".360"):moref(pf(x,y),x)
-satz60a:=satz42(pf(x,y),x,satz60):lessf(x,pf(x,y))
-z@[m:moref(x,y)]
-+361
-t1:=satz32a(ts(1x,2y),ts(1y,2x),2z,m):more(ts(ts(1x,2y),2z),ts(ts(1y,2x),2z))
-t2:=ismore12(ts(ts(1x,2y),2z),ts(ts(1x,2z),2y),ts(ts(1y,2x),2z),ts(ts(1y,2z),2x),stets1(1x,2y,2z),stets1(1y,2x,2z),t1):more(ts(ts(1x,2z),2y),ts(ts(1y,2z),2x))
-t3:=stets1(1z,2x,2y):is(ts(ts(1z,2x),2y),ts(ts(1z,2y),2x))
-t4:=satz19h(ts(ts(1z,2x),2y),ts(ts(1z,2y),2x),ts(ts(1x,2z),2y),ts(ts(1y,2z),2x),t3,t2):more(pl(ts(ts(1x,2z),2y),ts(ts(1z,2x),2y)),pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)))
-t5:=ismore12(pl(ts(ts(1x,2z),2y),ts(ts(1z,2x),2y)),ts(pl(ts(1x,2z),ts(1z,2x)),2y),pl(ts(ts(1y,2z),2x),ts(ts(1z,2y),2x)),ts(pl(ts(1y,2z),ts(1z,2y)),2x),distpt1(ts(1x,2z),ts(1z,2x),2y),distpt1(ts(1y,2z),ts(1z,2y),2x),t4):more(ts(pl(ts(1x,2z),ts(1z,2x)),2y),ts(pl(ts(1y,2z),ts(1z,2y)),2x))
-t6:=satz32a(ts(pl(ts(1x,2z),ts(1z,2x)),2y),ts(pl(ts(1y,2z),ts(1z,2y)),2x),2z,t5):more(ts(ts(pl(ts(1x,2z),ts(1z,2x)),2y),2z),ts(ts(pl(ts(1y,2z),ts(1z,2y)),2x),2z))
-t7:=ismore12(ts(ts(pl(ts(1x,2z),ts(1z,2x)),2y),2z),ts(pl(ts(1x,2z),ts(1z,2x)),ts(2y,2z)),ts(ts(pl(ts(1y,2z),ts(1z,2y)),2x),2z),ts(pl(ts(1y,2z),ts(1z,2y)),ts(2x,2z)),assts1(pl(ts(1x,2z),ts(1z,2x)),2y,2z),assts1(pl(ts(1y,2z),ts(1z,2y)),2x,2z),t6):more(ts(pl(ts(1x,2z),ts(1z,2x)),ts(2y,2z)),ts(pl(ts(1y,2z),ts(1z,2y)),ts(2x,2z)))
--361
-satz61:=morefi12(pl(ts(1x,2z),ts(1z,2x)),ts(2x,2z),pl(ts(1y,2z),ts(1z,2y)),ts(2y,2z),t7".361"):moref(pf(x,z),pf(y,z))
-z@[m:moref(x,y)]
-satz62a:=satz61(m):moref(pf(x,z),pf(y,z))
-z@[e:eq(x,y)]
-satz62b:=eqpf1(x,y,z,e):eq(pf(x,z),pf(y,z))
-z@[l:lessf(x,y)]
-satz62c:=satz42(pf(y,z),pf(x,z),satz61(y,x,z,satz43(l))):lessf(pf(x,z),pf(y,z))
-m@satz62d:=eqmoref12(pf(x,z),pf(z,x),pf(y,z),pf(z,y),compf(x,z),compf(y,z),satz62a):moref(pf(z,x),pf(z,y))
-e@satz62e:=eqpf2(x,y,z,e):eq(pf(z,x),pf(z,y))
-l@satz62f:=eqlessf12(pf(x,z),pf(z,x),pf(y,z),pf(z,y),compf(x,z),compf(y,z),satz62c):lessf(pf(z,x),pf(z,y))
-u@[e:eq(x,y)][m:moref(z,u)]
-satz62g:=eqmoref2(pf(x,u),pf(y,u),pf(x,z),eqpf1(x,y,u,e),satz62d(z,u,x,m)):moref(pf(x,z),pf(y,u))
-satz62h:=eqmoref12(pf(x,z),pf(z,x),pf(y,u),pf(u,y),compf(x,z),compf(y,u),satz62g):moref(pf(z,x),pf(u,y))
-e@[l:lessf(z,u)]
-satz62j:=eqlessf2(pf(x,u),pf(y,u),pf(x,z),eqpf1(x,y,u,e),satz62f(z,u,x,l)):lessf(pf(x,z),pf(y,u))
-satz62k:=eqlessf12(pf(x,z),pf(z,x),pf(y,u),pf(u,y),compf(x,z),compf(y,u),satz62j):lessf(pf(z,x),pf(u,y))
-+363
-z@t1:=satz41a(x,y):or3(eq(x,y),moref(x,y),lessf(x,y))
-t2:=satz41b(pf(x,z),pf(y,z)):ec3(eq(pf(x,z),pf(y,z)),moref(pf(x,z),pf(y,z)),lessf(pf(x,z),pf(y,z)))
--363
-z@[m:moref(pf(x,z),pf(y,z))]
-satz63a:=th11"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(pf(x,z),pf(y,z)),moref(pf(x,z),pf(y,z)),lessf(pf(x,z),pf(y,z)),t1".363",t2".363",[u:eq(x,y)]satz62b(x,y,z,u),[u:moref(x,y)]satz62a(x,y,z,u),[u:lessf(x,y)]satz62c(x,y,z,u),m):moref(x,y)
-z@[e:eq(pf(x,z),pf(y,z))]
-satz63b:=th10"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(pf(x,z),pf(y,z)),moref(pf(x,z),pf(y,z)),lessf(pf(x,z),pf(y,z)),t1".363",t2".363",[u:eq(x,y)]satz62b(x,y,z,u),[u:moref(x,y)]satz62a(x,y,z,u),[u:lessf(x,y)]satz62c(x,y,z,u),e):eq(x,y)
-z@[l:lessf(pf(x,z),pf(y,z))]
-satz63c:=th12"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(pf(x,z),pf(y,z)),moref(pf(x,z),pf(y,z)),lessf(pf(x,z),pf(y,z)),t1".363",t2".363",[u:eq(x,y)]satz62b(x,y,z,u),[u:moref(x,y)]satz62a(x,y,z,u),[u:lessf(x,y)]satz62c(x,y,z,u),l):lessf(x,y)
-z@[m:moref(pf(z,x),pf(z,y))]
-satz63d:=satz63a(eqmoref12(pf(z,x),pf(x,z),pf(z,y),pf(y,z),compf(z,x),compf(z,y),m)):moref(x,y)
-z@[e:eq(pf(z,x),pf(z,y))]
-satz63e:=satz63b(tr3eq(pf(x,z),pf(z,x),pf(z,y),pf(y,z),compf(x,z),e,compf(z,y))):eq(x,y)
-z@[f:lessf(pf(z,x),pf(z,y))]
-satz63f:=satz63c(eqlessf12(pf(z,x),pf(x,z),pf(z,y),pf(y,z),compf(z,x),compf(z,y),f)):lessf(x,y)
-u@[m:moref(x,y)][n:moref(z,u)]
-+364
-t1:=satz61(x,y,z,m):moref(pf(x,z),pf(y,z))
-t2:=eqmoref12(pf(z,y),pf(y,z),pf(u,y),pf(y,u),compf(z,y),compf(u,y),satz61(z,u,y,n)):moref(pf(y,z),pf(y,u))
--364
-satz64:=trmoref(pf(x,z),pf(y,z),pf(y,u),t1".364",t2".364"):moref(pf(x,z),pf(y,u))
-u@[l:lessf(x,y)][k:lessf(z,u)]
-satz64a:=satz42(pf(y,u),pf(x,z),satz64(y,x,u,z,satz43(x,y,l),satz43(z,u,k))):lessf(pf(x,z),pf(y,u))
-u@[m:moreq(x,y)][n:moref(z,u)]
-satz65a:=orapp(moref(x,y),eq(x,y),moref(pf(x,z),pf(y,u)),m,[v:moref(x,y)]satz64(v,n),[v:eq(x,y)]satz62g(v,n)):moref(pf(x,z),pf(y,u))
-u@[m:moref(x,y)][n:moreq(z,u)]
-satz65b:=orapp(moref(z,u),eq(z,u),moref(pf(x,z),pf(y,u)),n,[v:moref(z,u)]satz64(m,v),[v:eq(z,u)]eqmoref2(pf(y,z),pf(y,u),pf(x,z),eqpf2(z,u,y,v),satz61(x,y,z,m))):moref(pf(x,z),pf(y,u))
-u@[l:lesseq(x,y)][k:lessf(z,u)]
-satz65c:=satz42(pf(y,u),pf(x,z),satz65a(y,x,u,z,satz49(x,y,l),satz43(z,u,k))):lessf(pf(x,z),pf(y,u))
-u@[l:lessf(x,y)][k:lesseq(z,u)]
-satz65d:=satz42(pf(y,u),pf(x,z),satz65b(y,x,u,z,satz43(x,y,l),satz49(z,u,k))):lessf(pf(x,z),pf(y,u))
-u@[m:moreq(x,y)][n:moreq(z,u)]
-+366
-[e:eq(x,y)][f:eq(z,u)]
-t1:=moreqi2(pf(x,z),pf(y,u),satz56(e,f)):moreq(pf(x,z),pf(y,u))
-e@[o:moref(z,u)]
-t2:=moreqi1(pf(x,z),pf(y,u),satz65a(m,o)):moreq(pf(x,z),pf(y,u))
-e@t3:=orapp(moref(z,u),eq(z,u),moreq(pf(x,z),pf(y,u)),n,[v:moref(z,u)]t2(v),[v:eq(z,u)]t1(v)):moreq(pf(x,z),pf(y,u))
-n@[o:moref(x,y)]
-t4:=moreqi1(pf(x,z),pf(y,u),satz65b(o,n)):moreq(pf(x,z),pf(y,u))
--366
-satz66:=orapp(moref(x,y),eq(x,y),moreq(pf(x,z),pf(y,u)),m,[v:moref(x,y)]t4".366"(v),[v:eq(x,y)]t3".366"(v)):moreq(pf(x,z),pf(y,u))
-u@[l:lesseq(x,y)][k:lesseq(z,u)]
-satz66a:=satz48(pf(y,u),pf(x,z),satz66(y,x,u,z,satz49(x,y,l),satz49(z,u,k))):lesseq(pf(x,z),pf(y,u))
-y@[l:lesseq(x,y)]
-+367
-[v:frac][e:eq(pf(y,v),x)]
-t1:=eqmoref1(pf(y,v),x,y,e,satz60(y,v)):moref(x,y)
-v@t2:=th3"l.imp"(eq(pf(y,v),x),moref(x,y),satz41d(x,y,l),[t:eq(pf(y,v),x)]t1(t)):not(eq(pf(y,v),x))
--367
-vorbemerkung67:=th5"l.some"(frac,[v:frac]eq(pf(y,v),x),[v:frac]t2".367"(v)):not(some"l"(frac,[t:frac]eq(pf(y,t),x)))
-y@[v:frac][w:frac][e:eq(pf(y,v),x)][f:eq(pf(y,w),x)]
-satz67b:=satz63e(v,w,y,treq2(pf(y,v),pf(y,w),x,e,f)):eq(v,w)
-y@[m:moref(x,y)]
-+*367
-m@t3:=onei(nat,[t:nat]diffprop(ts(1x,2y),ts(1y,2x),t),satz8b(ts(1x,2y),ts(1y,2x)),m):one([t:nat]diffprop(ts(1x,2y),ts(1y,2x),t))
-vo:=ind(nat,[t:nat]diffprop(ts(1x,2y),ts(1y,2x),t),t3):nat
-t4:=oneax(nat,[t:nat]diffprop(ts(1x,2y),ts(1y,2x),t),t3):is(ts(1x,2y),pl(ts(1y,2x),vo))
-w:=fr(vo,ts(2x,2y)):frac
-t5:=treq(y,fr(ts(1y,2x),ts(2y,2x)),fr(ts(1y,2x),ts(2x,2y)),satz40(y,2x),eqd(ts(1y,2x),ts(2y,2x),ts(2x,2y),comts(2y,2x))):eq(y,fr(ts(1y,2x),ts(2x,2y)))
-t6:=tr4eq(pf(y,w),pf(fr(ts(1y,2x),ts(2x,2y)),fr(vo,ts(2x,2y))),fr(pl(ts(1y,2x),vo),ts(2x,2y)),fr(ts(1x,2y),ts(2x,2y)),x,eqpf1(y,fr(ts(1y,2x),ts(2x,2y)),w,t5),satz57(ts(1y,2x),vo,ts(2x,2y)),eqn(pl(ts(1y,2x),vo),ts(2x,2y),ts(1x,2y),symis(nat,ts(1x,2y),pl(ts(1y,2x),vo),t4)),satz40a(x,2y)):eq(pf(y,w),x)
--367
-m@satz67a:=somei(frac,[t:frac]eq(pf(y,t),x),w".367",t6".367"):some"l"(frac,[t:frac]eq(pf(y,t),x))
-mf:=w".367":frac
-satz67c:=t6".367":eq(pf(y,mf(x,y,m)),x)
-satz67d:=symeq(pf(y,mf(x,y,m)),x,satz67c):eq(x,pf(y,mf(x,y,m)))
-y@[v:frac][m:moref(x,y)][e:eq(pf(y,v),x)]
-satz67e:=satz67b(v,mf(x,y,m),e,satz67c(m)):eq(v,mf(x,y,m))
-y@tf:=fr(ts(1x,1y),ts(2x,2y)):frac
-+ii4
-y2@t1:=ists12(num(fr(x1,x2)),x1,num(fr(y1,y2)),y1,numis(x1,x2),numis(y1,y2)):is(ts(num(fr(x1,x2)),num(fr(y1,y2))),ts(x1,y1))
-t2:=ists12(den(fr(x1,x2)),x2,den(fr(y1,y2)),y2,denis(x1,x2),denis(y1,y2)):is(ts(den(fr(x1,x2)),den(fr(y1,y2))),ts(x2,y2))
--ii4
-y2@tf12:=isnd(ts(num(fr(x1,x2)),num(fr(y1,y2))),ts(den(fr(x1,x2)),den(fr(y1,y2))),ts(x1,y1),ts(x2,y2),t1".ii4",t2".ii4"):is"e"(frac,tf(fr(x1,x2),fr(y1,y2)),fr(ts(x1,y1),ts(x2,y2)))
-+*ii4
-n2@t3:=ists2(num(fr(n1,n2)),n1,1x,numis(n1,n2)):is(ts(1x,num(fr(n1,n2))),ts(1x,n1))
-t4:=ists2(den(fr(n1,n2)),n2,2x,denis(n1,n2)):is(ts(2x,den(fr(n1,n2))),ts(2x,n2))
--ii4
-n2@tf1:=isnd(ts(1x,num(fr(n1,n2))),ts(2x,den(fr(n1,n2))),ts(1x,n1),ts(2x,n2),t3".ii4",t4".ii4"):is"e"(frac,tf(x,fr(n1,n2)),fr(ts(1x,n1),ts(2x,n2)))
-+*ii4
-n2@t5:=ists1(num(fr(n1,n2)),n1,1x,numis(n1,n2)):is(ts(num(fr(n1,n2)),1x),ts(n1,1x))
-t6:=ists1(den(fr(n1,n2)),n2,2x,denis(n1,n2)):is(ts(den(fr(n1,n2)),2x),ts(n2,2x))
--ii4
-n2@tf2:=isnd(ts(num(fr(n1,n2)),1x),ts(den(fr(n1,n2)),2x),ts(n1,1x),ts(n2,2x),t5".ii4",t6".ii4"):is"e"(frac,tf(fr(n1,n2),x),fr(ts(n1,1x),ts(n2,2x)))
-y2@tfeq12a:=refeq1(tf(fr(x1,x2),fr(y1,y2)),fr(ts(x1,y1),ts(x2,y2)),tf12):eq(tf(fr(x1,x2),fr(y1,y2)),fr(ts(x1,y1),ts(x2,y2)))
-tfeq12b:=refeq2(tf(fr(x1,x2),fr(y1,y2)),fr(ts(x1,y1),ts(x2,y2)),tf12):eq(fr(ts(x1,y1),ts(x2,y2)),tf(fr(x1,x2),fr(y1,y2)))
-n2@tfeq1a:=refeq1(tf(x,fr(n1,n2)),fr(ts(1x,n1),ts(2x,n2)),tf1):eq(tf(x,fr(n1,n2)),fr(ts(1x,n1),ts(2x,n2)))
-tfeq1b:=refeq2(tf(x,fr(n1,n2)),fr(ts(1x,n1),ts(2x,n2)),tf1):eq(fr(ts(1x,n1),ts(2x,n2)),tf(x,fr(n1,n2)))
-tfeq2a:=refeq1(tf(fr(n1,n2),x),fr(ts(n1,1x),ts(n2,2x)),tf2):eq(tf(fr(n1,n2),x),fr(ts(n1,1x),ts(n2,2x)))
-tfeq2b:=refeq2(tf(fr(n1,n2),x),fr(ts(n1,1x),ts(n2,2x)),tf2):eq(fr(ts(n1,1x),ts(n2,2x)),tf(fr(n1,n2),x))
-u@[e:eq(x,y)][f:eq(z,u)]
-+468
-t1:=ists12(ts(1x,2y),ts(1y,2x),ts(1z,2u),ts(1u,2z),e,f):is(ts(ts(1x,2y),ts(1z,2u)),ts(ts(1y,2x),ts(1u,2z)))
--468
-d@stets2:=tr3is(nat,ts(ts(a,b),ts(c,d)),ts(ts(a,b),ts(d,c)),ts(ts(a,c),ts(d,b)),ts(ts(a,c),ts(b,d)),ists2(ts(c,d),ts(d,c),ts(a,b),comts(c,d)),stets(a,b,d,c),ists2(ts(d,b),ts(b,d),ts(a,c),comts(d,b))):is(ts(ts(a,b),ts(c,d)),ts(ts(a,c),ts(b,d)))
-+*468
-f@t2:=tr3is(nat,ts(ts(1x,1z),ts(2y,2u)),ts(ts(1x,2y),ts(1z,2u)),ts(ts(1y,2x),ts(1u,2z)),ts(ts(1y,1u),ts(2x,2z)),stets2(1x,1z,2y,2u),t1,stets2(1y,2x,1u,2z)):is(ts(ts(1x,1z),ts(2y,2u)),ts(ts(1y,1u),ts(2x,2z)))
--468
-f@satz68:=eqi12(ts(1x,1z),ts(2x,2z),ts(1y,1u),ts(2y,2u),t2".468"):eq(tf(x,z),tf(y,u))
-eqtf12:=satz68:eq(tf(x,z),tf(y,u))
-z@[e:eq(x,y)]
-eqtf1:=eqtf12(x,y,z,z,e,refeq(z)):eq(tf(x,z),tf(y,z))
-eqtf2:=eqtf12(z,z,x,y,refeq(z),e):eq(tf(z,x),tf(z,y))
-y@satz69:=eqnd(ts(1x,1y),ts(2x,2y),ts(1y,1x),ts(2y,2x),comts(1x,1y),comts(2x,2y)):eq(tf(x,y),tf(y,x))
-comtf:=satz69:eq(tf(x,y),tf(y,x))
-z@satz70:=tr3eq(tf(tf(x,y),z),fr(ts(ts(1x,1y),1z),ts(ts(2x,2y),2z)),fr(ts(1x,ts(1y,1z)),ts(2x,ts(2y,2z))),tf(x,tf(y,z)),tfeq2a(z,ts(1x,1y),ts(2x,2y)),eqnd(ts(ts(1x,1y),1z),ts(ts(2x,2y),2z),ts(1x,ts(1y,1z)),ts(2x,ts(2y,2z)),assts1(1x,1y,1z),assts1(2x,2y,2z)),tfeq1b(x,ts(1y,1z),ts(2y,2z))):eq(tf(tf(x,y),z),tf(x,tf(y,z)))
-asstf1:=satz70:eq(tf(tf(x,y),z),tf(x,tf(y,z)))
-asstf2:=symeq(tf(tf(x,y),z),tf(x,tf(y,z)),asstf1):eq(tf(x,tf(y,z)),tf(tf(x,y),z))
-+471
-t1:=tr3eq(tf(x,pf(y,z)),fr(ts(1x,pl(ts(1y,2z),ts(1z,2y))),ts(2x,ts(2y,2z))),fr(pl(ts(1x,ts(1y,2z)),ts(1x,ts(1z,2y))),ts(2x,ts(2y,2z))),pf(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z)))),tfeq1a(x,pl(ts(1y,2z),ts(1z,2y)),ts(2y,2z)),eqn(ts(1x,pl(ts(1y,2z),ts(1z,2y))),ts(2x,ts(2y,2z)),pl(ts(1x,ts(1y,2z)),ts(1x,ts(1z,2y))),disttp2(1x,ts(1y,2z),ts(1z,2y))),satz57a(ts(1x,ts(1y,2z)),ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z)))):eq(tf(x,pf(y,z)),pf(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z)))))
-t2:=treq(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),fr(ts(ts(1x,1y),2z),ts(ts(2x,2y),2z)),tf(x,y),eqnd(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z)),ts(ts(1x,1y),2z),ts(ts(2x,2y),2z),assts2(1x,1y,2z),assts2(2x,2y,2z)),satz40c(ts(1x,1y),ts(2x,2y),2z)):eq(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),tf(x,y))
-t3:=treq(fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z))),fr(ts(1x,ts(1z,2y)),ts(2x,ts(2z,2y))),tf(x,z),eqd(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z)),ts(2x,ts(2z,2y)),ists2(ts(2y,2z),ts(2z,2y),2x,comts(2y,2z))),t2(x,z,y)):eq(fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z))),tf(x,z))
--471
-satz71:=treq(tf(x,pf(y,z)),pf(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z)))),pf(tf(x,y),tf(x,z)),t1".471",eqpf12(fr(ts(1x,ts(1y,2z)),ts(2x,ts(2y,2z))),tf(x,y),fr(ts(1x,ts(1z,2y)),ts(2x,ts(2y,2z))),tf(x,z),t2".471",t3".471")):eq(tf(x,pf(y,z)),pf(tf(x,y),tf(x,z)))
-disttpf1:=tr3eq(tf(pf(x,y),z),tf(z,pf(x,y)),pf(tf(z,x),tf(z,y)),pf(tf(x,z),tf(y,z)),comtf(pf(x,y),z),satz71(z,x,y),eqpf12(tf(z,x),tf(x,z),tf(z,y),tf(y,z),comtf(z,x),comtf(z,y))):eq(tf(pf(x,y),z),pf(tf(x,z),tf(y,z)))
-disttpf2:=satz71:eq(tf(x,pf(y,z)),pf(tf(x,y),tf(x,z)))
-distptf1:=symeq(tf(pf(x,y),z),pf(tf(x,z),tf(y,z)),disttpf1):eq(pf(tf(x,z),tf(y,z)),tf(pf(x,y),z))
-distptf2:=symeq(tf(x,pf(y,z)),pf(tf(x,y),tf(x,z)),disttpf2):eq(pf(tf(x,y),tf(x,z)),tf(x,pf(y,z)))
-[m:moref(x,y)]
-+472
-t1:=satz32a(ts(1x,2y),ts(1y,2x),ts(1z,2z),m):more(ts(ts(1x,2y),ts(1z,2z)),ts(ts(1y,2x),ts(1z,2z)))
-t2:=ismore12(ts(ts(1x,2y),ts(1z,2z)),ts(ts(1x,1z),ts(2y,2z)),ts(ts(1y,2x),ts(1z,2z)),ts(ts(1y,1z),ts(2x,2z)),stets2(1x,2y,1z,2z),stets2(1y,2x,1z,2z),t1):more(ts(ts(1x,1z),ts(2y,2z)),ts(ts(1y,1z),ts(2x,2z)))
--472
-satz72a:=morefi12(ts(1x,1z),ts(2x,2z),ts(1y,1z),ts(2y,2z),t2".472"):moref(tf(x,z),tf(y,z))
-z@[e:eq(x,y)]
-satz72b:=satz68(x,y,z,z,e,refeq(z)):eq(tf(x,z),tf(y,z))
-z@[l:lessf(x,y)]
-satz72c:=satz42(tf(y,z),tf(x,z),satz72a(y,x,z,satz43(x,y,l))):lessf(tf(x,z),tf(y,z))
-m@satz72d:=eqmoref12(tf(x,z),tf(z,x),tf(y,z),tf(z,y),comtf(x,z),comtf(y,z),satz72a):moref(tf(z,x),tf(z,y))
-e@satz72e:=eqtf2(x,y,z,e):eq(tf(z,x),tf(z,y))
-l@satz72f:=eqlessf12(tf(x,z),tf(z,x),tf(y,z),tf(z,y),comtf(x,z),comtf(y,z),satz72c):lessf(tf(z,x),tf(z,y))
-u@[e:eq(x,y)][m:moref(z,u)]
-satz72g:=eqmoref2(tf(x,u),tf(y,u),tf(x,z),eqtf1(x,y,u,e),satz72d(z,u,x,m)):moref(tf(x,z),tf(y,u))
-satz72h:=eqmoref12(tf(x,z),tf(z,x),tf(y,u),tf(u,y),comtf(x,z),comtf(y,u),satz72g):moref(tf(z,x),tf(u,y))
-e@[l:lessf(z,u)]
-satz72j:=eqlessf2(tf(x,u),tf(y,u),tf(x,z),eqtf1(x,y,u,e),satz72f(z,u,x,l)):lessf(tf(x,z),tf(y,u))
-satz72k:=eqlessf12(tf(x,z),tf(z,x),tf(y,u),tf(u,y),comtf(x,z),comtf(y,u),satz72j):lessf(tf(z,x),tf(u,y))
-+473
-z@t1:=satz41a(x,y):or3(eq(x,y),moref(x,y),lessf(x,y))
-t2:=satz41b(tf(x,z),tf(y,z)):ec3(eq(tf(x,z),tf(y,z)),moref(tf(x,z),tf(y,z)),lessf(tf(x,z),tf(y,z)))
--473
-z@[m:moref(tf(x,z),tf(y,z))]
-satz73a:=th11"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(tf(x,z),tf(y,z)),moref(tf(x,z),tf(y,z)),lessf(tf(x,z),tf(y,z)),t1".473",t2".473",[u:eq(x,y)]satz72b(x,y,z,u),[u:moref(x,y)]satz72a(x,y,z,u),[u:lessf(x,y)]satz72c(x,y,z,u),m):moref(x,y)
-z@[e:eq(tf(x,z),tf(y,z))]
-satz73b:=th10"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(tf(x,z),tf(y,z)),moref(tf(x,z),tf(y,z)),lessf(tf(x,z),tf(y,z)),t1".473",t2".473",[u:eq(x,y)]satz72b(x,y,z,u),[u:moref(x,y)]satz72a(x,y,z,u),[u:lessf(x,y)]satz72c(x,y,z,u),e):eq(x,y)
-z@[l:lessf(tf(x,z),tf(y,z))]
-satz73c:=th12"l.ec3"(eq(x,y),moref(x,y),lessf(x,y),eq(tf(x,z),tf(y,z)),moref(tf(x,z),tf(y,z)),lessf(tf(x,z),tf(y,z)),t1".473",t2".473",[u:eq(x,y)]satz72b(x,y,z,u),[u:moref(x,y)]satz72a(x,y,z,u),[u:lessf(x,y)]satz72c(x,y,z,u),l):lessf(x,y)
-z@[m:moref(tf(z,x),tf(z,y))]
-satz73d:=satz73a(eqmoref12(tf(z,x),tf(x,z),tf(z,y),tf(y,z),comtf(z,x),comtf(z,y),m)):moref(x,y)
-z@[e:eq(tf(z,x),tf(z,y))]
-satz73e:=satz73b(tr3eq(tf(x,z),tf(z,x),tf(z,y),tf(y,z),comtf(x,z),e,comtf(z,y))):eq(x,y)
-z@[l:lessf(tf(z,x),tf(z,y))]
-satz73f:=satz73c(eqlessf12(tf(z,x),tf(x,z),tf(z,y),tf(y,z),comtf(z,x),comtf(z,y),l)):lessf(x,y)
-u@[m:moref(x,y)][n:moref(z,u)]
-+474
-t1:=satz72a(x,y,z,m):moref(tf(x,z),tf(y,z))
-t2:=eqmoref12(tf(z,y),tf(y,z),tf(u,y),tf(y,u),comtf(z,y),comtf(u,y),satz72a(z,u,y,n)):moref(tf(y,z),tf(y,u))
--474
-satz74:=trmoref(tf(x,z),tf(y,z),tf(y,u),t1".474",t2".474"):moref(tf(x,z),tf(y,u))
-u@[l:lessf(x,y)][k:lessf(z,u)]
-satz74a:=satz42(tf(y,u),tf(x,z),satz74(y,x,u,z,satz43(x,y,l),satz43(z,u,k))):lessf(tf(x,z),tf(y,u))
-u@[m:moreq(x,y)][n:moref(z,u)]
-satz75a:=orapp(moref(x,y),eq(x,y),moref(tf(x,z),tf(y,u)),m,[v:moref(x,y)]satz74(v,n),[v:eq(x,y)]satz72g(v,n)):moref(tf(x,z),tf(y,u))
-u@[m:moref(x,y)][n:moreq(z,u)]
-satz75b:=orapp(moref(z,u),eq(z,u),moref(tf(x,z),tf(y,u)),n,[v:moref(z,u)]satz74(m,v),[v:eq(z,u)]eqmoref2(tf(y,z),tf(y,u),tf(x,z),eqtf2(z,u,y,v),satz72a(m))):moref(tf(x,z),tf(y,u))
-u@[l:lesseq(x,y)][k:lessf(z,u)]
-satz75c:=satz42(tf(y,u),tf(x,z),satz75a(y,x,u,z,satz49(x,y,l),satz43(z,u,k))):lessf(tf(x,z),tf(y,u))
-u@[l:lessf(x,y)][k:lesseq(z,u)]
-satz75d:=satz42(tf(y,u),tf(x,z),satz75b(y,x,u,z,satz43(x,y,l),satz49(z,u,k))):lessf(tf(x,z),tf(y,u))
-u@[m:moreq(x,y)][n:moreq(z,u)]
-+476
-[e:eq(x,y)][f:eq(z,u)]
-t1:=moreqi2(tf(x,z),tf(y,u),satz68(e,f)):moreq(tf(x,z),tf(y,u))
-e@[o:moref(z,u)]
-t2:=moreqi1(tf(x,z),tf(y,u),satz75a(m,o)):moreq(tf(x,z),tf(y,u))
-e@t3:=orapp(moref(z,u),eq(z,u),moreq(tf(x,z),tf(y,u)),n,[v:moref(z,u)]t2(v),[v:eq(z,u)]t1(v)):moreq(tf(x,z),tf(y,u))
-n@[o:moref(x,y)]
-t4:=moreqi1(tf(x,z),tf(y,u),satz75b(o,n)):moreq(tf(x,z),tf(y,u))
--476
-satz76:=orapp(moref(x,y),eq(x,y),moreq(tf(x,z),tf(y,u)),m,[v:moref(x,y)]t4".476"(v),[v:eq(x,y)]t3".476"(v)):moreq(tf(x,z),tf(y,u))
-u@[l:lesseq(x,y)][k:lesseq(z,u)]
-satz76a:=satz48(tf(y,u),tf(x,z),satz76(y,x,u,z,satz49(x,y,l),satz49(z,u,k))):lesseq(tf(x,z),tf(y,u))
-y@[v:frac][w:frac][e:eq(tf(y,v),x)][f:eq(tf(y,w),x)]
-satz77b:=satz73e(v,w,y,treq2(tf(y,v),tf(y,w),x,e,f)):eq(v,w)
-+477
-y@v:=fr(ts(1x,2y),ts(2x,1y)):frac
-t1:=tr4eq(tf(y,v),tf(v,y),fr(ts(ts(1x,2y),1y),ts(ts(2x,1y),2y)),fr(ts(1x,ts(1y,2y)),ts(2x,ts(1y,2y))),x,comtf(y,v),tfeq2a(y,ts(1x,2y),ts(2x,1y)),eqnd(ts(ts(1x,2y),1y),ts(ts(2x,1y),2y),ts(1x,ts(1y,2y)),ts(2x,ts(1y,2y)),tris(nat,ts(ts(1x,2y),1y),ts(1x,ts(2y,1y)),ts(1x,ts(1y,2y)),assts1(1x,2y,1y),ists2(ts(2y,1y),ts(1y,2y),1x,comts(2y,1y))),assts1(2x,1y,2y)),satz40a(x,ts(1y,2y))):eq(tf(y,v),x)
--477
-y@satz77a:=somei(frac,[t:frac]eq(tf(y,t),x),v".477",t1".477"):some"l"(frac,[t:frac]eq(tf(y,t),x))
-+rt
-@eq:=[x:frac][y:frac]eq"n"(x,y):[x:frac][y:frac]'prop'
-refeq:=[x:frac]refeq"n"(x):[x:frac]<x><x>eq
-symeq:=[x:frac][y:frac][t:<y><x>eq]symeq"n"(x,y,t):[x:frac][y:frac][t:<y><x>eq]<x><y>eq
-treq:=[x:frac][y:frac][z:frac][t:<y><x>eq][u:<z><y>eq]treq"n"(x,y,z,t,u):[x:frac][y:frac][z:frac][t:<y><x>eq][u:<z><y>eq]<z><x>eq
-[x:frac][s:set(frac)]
-inf:=esti(frac,x,s):'prop'
-@rat:=ect"eq"(frac,eq,refeq,symeq,treq):'type'
-[x0:rat][y0:rat]
-is:=is"e"(rat,x0,y0):'prop'
-nis:=not(is(x0,y0)):'prop'
-@[p:[x:rat]'prop']
-some:=some"l"(rat,p):'prop'
-all:=all"l"(rat,p):'prop'
-one:=one"e"(rat,p):'prop'
-x0@[s:set(rat)]
-in:=esti(rat,x0,s):'prop'
-x@ratof:=ectelt"eq"(frac,eq,refeq,symeq,treq,x):rat
-x0@class:=ecect"eq"(frac,eq,refeq,symeq,treq,x0):set(frac)
-x@inclass:=th5"eq.4"(frac,eq,refeq,symeq,treq,x):inf(x,class(ratof(x)))
-x0@[x:frac][y:frac][xix0:inf(x,class(x0))][e:eq"n"(x,y)]
-lemmaeq1:=th8"eq.4"(frac,eq,refeq,symeq,treq,x0,x,xix0,y,e):inf(y,class(x0))
-x0@[a:'prop'][a1:[x:frac][xi:inf(x,class(x0))]a]
-ratapp1:=th3"eq.4"(frac,eq,refeq,symeq,treq,x0,a,a1):a
-y0@[a:'prop'][a1:[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]a][x:frac][xix0:inf(x,class(x0))]
-+ii5
-t1:=ratapp1(y0,a,[y:frac][yi:inf(y,class(y0))]<yi><xix0><y><x>a1):a
--ii5
-a1@ratapp2:=ratapp1(x0,a,[x:frac][xi:inf(x,class(x0))]t1".ii5"(x,xi)):a
-y0@[z0:rat][a:'prop'][a1:[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]a][x:frac][xix0:inf(x,class(x0))]
-+*ii5
-xix0@t2:=ratapp2(y0,z0,a,[y:frac][z:frac][yi:inf(y,class(y0))][zi:inf(z,class(z0))]<zi><yi><xix0><z><y><x>a1):a
--ii5
-a1@ratapp3:=ratapp1(x0,a,[x:frac][xi:inf(x,class(x0))]t2".ii5"(x,xi)):a
-z0@[u0:rat][a:'prop'][a1:[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]a][x:frac][xix0:inf(x,class(x0))]
-+*ii5
-xix0@t3:=ratapp3(y0,z0,u0,a,[y:frac][z:frac][u:frac][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]<ui><zi><yi><xix0><u><z><y><x>a1):a
--ii5
-a1@ratapp4:=ratapp1(x0,a,[x:frac][xi:inf(x,class(x0))]t3".ii5"(x,xi)):a
-y0@[x1:frac][y1:frac][x1ix0:inf(x1,class(x0))][y1iy0:inf(y1,class(y0))][e:eq"n"(x1,y1)]
-isi:=th3"eq.5"(frac,eq,refeq,symeq,treq,x0,y0,x1,x1ix0,y1,y1iy0,e):is(x0,y0)
-y1iy0@[i:is(x0,y0)]
-ise:=th5"eq.5"(frac,eq,refeq,symeq,treq,x0,y0,x1,x1ix0,y1,y1iy0,i):eq"n"(x1,y1)
-y1iy0@[n:not(eq"n"(x1,y1))]
-nisi:=th3"l.imp"(is(x0,y0),eq"n"(x1,y1),n,[t:is(x0,y0)]ise(t)):nis(x0,y0)
-y1iy0@[n:nis(x0,y0)]
-nise:=th3"l.imp"(eq"n"(x1,y1),is(x0,y0),n,[t:eq"n"(x1,y1)]isi(t)):not(eq"n"(x1,y1))
-@[alpha:'type'][f:[x:frac][y:frac]alpha]
-fixf:=fixfu2"eq"(frac,eq,refeq,symeq,treq,alpha,f):'prop'
-y0@[alpha:'type'][f:[x:frac][y:frac]alpha][ff:fixf(alpha,f)]
-indrat:=indeq2"eq"(frac,eq,refeq,symeq,treq,alpha,f,ff,x0,y0):alpha
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))]
-isindrat:=th1"eq.11"(frac,eq,refeq,symeq,treq,alpha,f,ff,x0,y0,x,xix0,y,yiy0):is"e"(alpha,<y><x>f,indrat)
-x0@satz78:=refis(rat,x0):is(x0,x0)
-y0@[i:is(x0,y0)]
-satz79:=symis(rat,x0,y0,i):is(y0,x0)
-z0@[i:is(x0,y0)][j:is(y0,z0)]
-satz80:=tris(rat,x0,y0,z0,i,j):is(x0,z0)
-y0@more:=some"l"(frac,[x:frac]some"l"(frac,[y:frac]and3(inf(x,class(x0)),inf(y,class(y0)),moref(x,y)))):'prop'
-+*ii5
-y1@propm:=and3(inf(x1,class(x0)),inf(y1,class(y0)),moref(x1,y1)):'prop'
--ii5
-y0@[m:more(x0,y0)][x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][t:frac][s:some"l"(frac,[u:frac]propm".ii5"(t,u))][u:frac][p:propm".ii5"(t,u)]
-+*ii5
-p@t4:=and3e1(inf(t,class(x0)),inf(u,class(y0)),moref(t,u),p):inf(t,class(x0))
-t5:=and3e2(inf(t,class(x0)),inf(u,class(y0)),moref(t,u),p):inf(u,class(y0))
-t6:=and3e3(inf(t,class(x0)),inf(u,class(y0)),moref(t,u),p):moref(t,u)
-t7:=satz44(t,u,x,y,t6,ise(x0,x0,t,x,t4,xix0,refis(rat,x0)),ise(y0,y0,u,y,t5,yiy0,refis(rat,y0))):moref(x,y)
-s@t8:=someapp(frac,[u:frac]propm(t,u),s,moref(x,y),[u:frac][v:propm(t,u)]t7(u,v)):moref(x,y)
--ii5
-yiy0@also18:=someapp(frac,[t:frac]some"l"(frac,[u:frac]propm".ii5"(t,u)),m,moref(x,y),[t:frac][v:some"l"(frac,[u:frac]propm".ii5"(t,u))]t8".ii5"(t,v)):moref(x,y)
-y1iy0@[m:moref(x1,y1)]
-+*ii5
-m@t9:=and3i(inf(x1,class(x0)),inf(y1,class(y0)),moref(x1,y1),x1ix0,y1iy0,m):propm(x1,y1)
-t10:=somei(frac,[t:frac]propm(x1,t),y1,t9):some"l"(frac,[t:frac]propm(x1,t))
--ii5
-m@morei:=somei(frac,[u:frac]some"l"(frac,[t:frac]propm".ii5"(u,t)),x1,t10".ii5"):more(x0,y0)
-y1iy0@[m:more(x0,y0)]
-moree:=also18(m,x1,y1,x1ix0,y1iy0):moref(x1,y1)
-z0@[i:is(x0,y0)][m:more(x0,z0)]
-ismore1:=isp(rat,[t:rat]more(t,z0),x0,y0,m,i):more(y0,z0)
-i@[m:more(z0,x0)]
-ismore2:=isp(rat,[t:rat]more(z0,t),x0,y0,m,i):more(z0,y0)
-u0@[i:is(x0,y0)][j:is(z0,u0)][m:more(x0,z0)]
-ismore12:=ismore2(z0,u0,y0,j,ismore1(x0,y0,z0,i,m)):more(y0,u0)
-y0@less:=some"l"(frac,[x:frac]some"l"(frac,[y:frac]and3(inf(x,class(x0)),inf(y,class(y0)),lessf(x,y)))):'prop'
-+*ii5
-y1@propl:=and3(inf(x1,class(x0)),inf(y1,class(y0)),lessf(x1,y1)):'prop'
--ii5
-y0@[l:less(x0,y0)][x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][t:frac][s:some"l"(frac,[u:frac]propl".ii5"(t,u))][u:frac][p:propl".ii5"(t,u)]
-+*ii5
-p@t11:=and3e1(inf(t,class(x0)),inf(u,class(y0)),lessf(t,u),p):inf(t,class(x0))
-t12:=and3e2(inf(t,class(x0)),inf(u,class(y0)),lessf(t,u),p):inf(u,class(y0))
-t13:=and3e3(inf(t,class(x0)),inf(u,class(y0)),lessf(t,u),p):lessf(t,u)
-t14:=satz45(t,u,x,y,t13,ise(x0,x0,t,x,t11,xix0,refis(rat,x0)),ise(y0,y0,u,y,t12,yiy0,refis(rat,y0))):lessf(x,y)
-s@t15:=someapp(frac,[u:frac]propl(t,u),s,lessf(x,y),[u:frac][v:propl(t,u)]t14(u,v)):lessf(x,y)
--ii5
-yiy0@also19:=someapp(frac,[t:frac]some"l"(frac,[u:frac]propl".ii5"(t,u)),l,lessf(x,y),[t:frac][v:some"l"(frac,[u:frac]propl".ii5"(t,u))]t15".ii5"(t,v)):lessf(x,y)
-y1iy0@[l:lessf(x1,y1)]
-+*ii5
-l@t16:=and3i(inf(x1,class(x0)),inf(y1,class(y0)),lessf(x1,y1),x1ix0,y1iy0,l):propl(x1,y1)
-t17:=somei(frac,[t:frac]propl(x1,t),y1,t16):some"l"(frac,[t:frac]propl(x1,t))
--ii5
-l@lessi:=somei(frac,[u:frac]some"l"(frac,[t:frac]propl".ii5"(u,t)),x1,t17".ii5"):less(x0,y0)
-y1iy0@[l:less(x0,y0)]
-lesse:=also19(l,x1,y1,x1ix0,y1iy0):lessf(x1,y1)
-z0@[i:is(x0,y0)][l:less(x0,z0)]
-isless1:=isp(rat,[t:rat]less(t,z0),x0,y0,l,i):less(y0,z0)
-i@[l:less(z0,x0)]
-isless2:=isp(rat,[t:rat]less(z0,t),x0,y0,l,i):less(z0,y0)
-u0@[i:is(x0,y0)][j:is(z0,u0)][l:less(x0,z0)]
-isless12:=isless2(z0,u0,y0,j,isless1(x0,y0,z0,i,l)):less(y0,u0)
-+581
-y1iy0@t1:=satz41a(x1,y1):or3(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1))
-[e:eq"n"(x1,y1)]
-t2:=or3i1(is(x0,y0),more(x0,y0),less(x0,y0),isi(e)):or3(is(x0,y0),more(x0,y0),less(x0,y0))
-y1iy0@[m:moref(x1,y1)]
-t3:=or3i2(is(x0,y0),more(x0,y0),less(x0,y0),morei(m)):or3(is(x0,y0),more(x0,y0),less(x0,y0))
-y1iy0@[l:lessf(x1,y1)]
-t4:=or3i3(is(x0,y0),more(x0,y0),less(x0,y0),lessi(l)):or3(is(x0,y0),more(x0,y0),less(x0,y0))
-y1iy0@t5:=or3app(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1),or3(is(x0,y0),more(x0,y0),less(x0,y0)),t1,[t:eq"n"(x1,y1)]t2(t),[t:moref(x1,y1)]t3(t),[t:lessf(x1,y1)]t4(t)):or3(is(x0,y0),more(x0,y0),less(x0,y0))
-t6:=satz41b(x1,y1):ec3(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1))
-[i:is(x0,y0)]
-t7:=th3"l.imp"(more(x0,y0),moref(x1,y1),ec3e12(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1),t6,ise(i)),[t:more(x0,y0)]moree(t)):not(more(x0,y0))
-y1iy0@[m:more(x0,y0)]
-t8:=th3"l.imp"(less(x0,y0),lessf(x1,y1),ec3e23(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1),t6,moree(m)),[t:less(x0,y0)]lesse(t)):not(less(x0,y0))
-y1iy0@[l:less(x0,y0)]
-t9:=th3"l.imp"(is(x0,y0),eq"n"(x1,y1),ec3e31(eq"n"(x1,y1),moref(x1,y1),lessf(x1,y1),t6,lesse(l)),[t:is(x0,y0)]ise(t)):nis(x0,y0)
-y1iy0@t10:=th6"l.ec3"(is(x0,y0),more(x0,y0),less(x0,y0),th1"l.ec"(is(x0,y0),more(x0,y0),[t:is(x0,y0)]t7(t)),th1"l.ec"(more(x0,y0),less(x0,y0),[t:more(x0,y0)]t8(t)),th1"l.ec"(less(x0,y0),is(x0,y0),[t:less(x0,y0)]t9(t))):ec3(is(x0,y0),more(x0,y0),less(x0,y0))
-t11:=orec3i(is(x0,y0),more(x0,y0),less(x0,y0),t5,t10):orec3(is(x0,y0),more(x0,y0),less(x0,y0))
--581
-y0@satz81:=ratapp2(orec3(is(x0,y0),more(x0,y0),less(x0,y0)),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t11".581"(x,y,xi,yi)):orec3(is(x0,y0),more(x0,y0),less(x0,y0))
-satz81a:=orec3e1(is(x0,y0),more(x0,y0),less(x0,y0),satz81):or3(is(x0,y0),more(x0,y0),less(x0,y0))
-satz81b:=orec3e2(is(x0,y0),more(x0,y0),less(x0,y0),satz81):ec3(is(x0,y0),more(x0,y0),less(x0,y0))
-[m:more(x0,y0)]
-+582
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))]
-t1:=lessi(y0,x0,y,x,yiy0,xix0,satz42(x,y,moree(x0,y0,x,y,xix0,yiy0,m))):less(y0,x0)
--582
-satz82:=ratapp2(less(y0,x0),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".582"(x,y,xi,yi)):less(y0,x0)
-y0@[l:less(x0,y0)]
-+583
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))]
-t1:=morei(y0,x0,y,x,yiy0,xix0,satz43(x,y,lesse(x0,y0,x,y,xix0,yiy0,l))):more(y0,x0)
--583
-satz83:=ratapp2(more(y0,x0),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".583"(x,y,xi,yi)):more(y0,x0)
-y0@moreis:=or(more(x0,y0),is(x0,y0)):'prop'
-[m:more(x0,y0)]
-moreisi1:=ori1(more,is,m):moreis(x0,y0)
-y0@[i:is(x0,y0)]
-moreisi2:=ori2(more,is,i):moreis(x0,y0)
-y1iy0@[m:moreq(x1,y1)]
-moreisi:=orapp(moref(x1,y1),eq"n"(x1,y1),moreis,m,[t:moref(x1,y1)]moreisi1(morei(t)),[t:eq"n"(x1,y1)]moreisi2(isi(t))):moreis(x0,y0)
-y1iy0@[m:moreis(x0,y0)]
-moreise:=orapp(more,is,moreq(x1,y1),m,[t:more]moreqi1(x1,y1,moree(t)),[t:is]moreqi2(x1,y1,ise(t))):moreq(x1,y1)
-z0@[i:is(x0,y0)][m:moreis(x0,z0)]
-ismoreis1:=isp(rat,[t:rat]moreis(t,z0),x0,y0,m,i):moreis(y0,z0)
-i@[m:moreis(z0,x0)]
-ismoreis2:=isp(rat,[t:rat]moreis(z0,t),x0,y0,m,i):moreis(z0,y0)
-u0@[i:is(x0,y0)][j:is(z0,u0)][m:moreis(x0,z0)]
-ismoreis12:=ismoreis2(z0,u0,y0,j,ismoreis1(x0,y0,z0,i,m)):moreis(y0,u0)
-y0@lessis:=or(less(x0,y0),is(x0,y0)):'prop'
-[l:less(x0,y0)]
-lessisi1:=ori1(less,is,l):lessis(x0,y0)
-y0@[i:is(x0,y0)]
-lessisi2:=ori2(less,is,i):lessis(x0,y0)
-y1iy0@[l:lesseq(x1,y1)]
-lessisi:=orapp(lessf(x1,y1),eq"n"(x1,y1),lessis,l,[t:lessf(x1,y1)]lessisi1(lessi(t)),[t:eq"n"(x1,y1)]lessisi2(isi(t))):lessis(x0,y0)
-y1iy0@[l:lessis(x0,y0)]
-lessise:=orapp(less,is,lesseq(x1,y1),l,[t:less]lesseqi1(x1,y1,lesse(t)),[t:is]lesseqi2(x1,y1,ise(t))):lesseq(x1,y1)
-z0@[i:is(x0,y0)][l:lessis(x0,z0)]
-islessis1:=isp(rat,[t:rat]lessis(t,z0),x0,y0,l,i):lessis(y0,z0)
-i@[l:lessis(z0,x0)]
-islessis2:=isp(rat,[t:rat]lessis(z0,t),x0,y0,l,i):lessis(z0,y0)
-u0@[i:is(x0,y0)][j:is(z0,u0)][l:lessis(x0,z0)]
-islessis12:=islessis2(z0,u0,y0,j,islessis1(x0,y0,z0,i,l)):lessis(y0,u0)
-y0@[m:moreis(x0,y0)]
-satz81c:=th7"l.ec3"(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,comor(more(x0,y0),is(x0,y0),m)):not(less(x0,y0))
-y0@[l:lessis(x0,y0)]
-satz81d:=th9"l.ec3"(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,l):not(more(x0,y0))
-y0@[n:not(more(x0,y0))]
-satz81e:=th2"l.or3"(is(x0,y0),more(x0,y0),less(x0,y0),satz81a,n):lessis(x0,y0)
-y0@[n:not(less(x0,y0))]
-satz81f:=comor(is(x0,y0),more(x0,y0),th3"l.or3"(is(x0,y0),more(x0,y0),less(x0,y0),satz81a,n)):moreis(x0,y0)
-y0@[m:more(x0,y0)]
-satz81g:=th3"l.or"(less(x0,y0),is(x0,y0),ec3e23(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,m),ec3e21(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,m)):not(lessis(x0,y0))
-y0@[l:less(x0,y0)]
-satz81h:=th3"l.or"(more(x0,y0),is(x0,y0),ec3e32(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,l),ec3e31(is(x0,y0),more(x0,y0),less(x0,y0),satz81b,l)):not(moreis(x0,y0))
-y0@[n:not(moreis(x0,y0))]
-satz81j:=or3e3(is(x0,y0),more(x0,y0),less(x0,y0),satz81a,th5"l.or"(more(x0,y0),is(x0,y0),n),th4"l.or"(more(x0,y0),is(x0,y0),n)):less(x0,y0)
-y0@[n:not(lessis(x0,y0))]
-satz81k:=or3e2(is(x0,y0),more(x0,y0),less(x0,y0),satz81a,th4"l.or"(less(x0,y0),is(x0,y0),n),th5"l.or"(less(x0,y0),is(x0,y0),n)):more(x0,y0)
-y0@[m:moreis(x0,y0)]
-+584
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))]
-t1:=lessisi(y0,x0,y,x,yiy0,xix0,satz48(x,y,moreise(x0,y0,x,y,xix0,yiy0,m))):lessis(y0,x0)
--584
-satz84:=ratapp2(lessis(y0,x0),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".584"(x,y,xi,yi)):lessis(y0,x0)
-y0@[l:lessis(x0,y0)]
-+585
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))]
-t1:=moreisi(y0,x0,y,x,yiy0,xix0,satz49(x,y,lessise(x0,y0,x,y,xix0,yiy0,l))):moreis(y0,x0)
--585
-satz85:=ratapp2(moreis(y0,x0),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".585"(x,y,xi,yi)):moreis(y0,x0)
-z0@[l:less(x0,y0)][k:less(y0,z0)]
-+586
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=lessi(x0,z0,x,z,xix0,ziz0,satz50(x,y,z,lesse(x0,y0,x,y,xix0,yiy0,l),lesse(y0,z0,y,z,yiy0,ziz0,k))):less(x0,z0)
--586
-satz86:=ratapp3(less(x0,z0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".586"(x,y,z,xi,yi,zi)):less(x0,z0)
-trless:=satz86:less(x0,z0)
-z0@[m:more(x0,y0)][n:more(y0,z0)]
-trmore:=satz83(z0,x0,satz86(z0,y0,x0,satz82(y0,z0,n),satz82(m))):more(x0,z0)
-z0@[l:lessis(x0,y0)][k:less(y0,z0)]
-+587
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=lessi(x0,z0,x,z,xix0,ziz0,satz51a(x,y,z,lessise(x0,y0,x,y,xix0,yiy0,l),lesse(y0,z0,y,z,yiy0,ziz0,k))):less(x0,z0)
--587
-satz87a:=ratapp3(less(x0,z0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".587"(x,y,z,xi,yi,zi)):less(x0,z0)
-z0@[l:less(x0,y0)][k:lessis(y0,z0)]
-+*587
-k@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t2:=lessi(x0,z0,x,z,xix0,ziz0,satz51b(x,y,z,lesse(x0,y0,x,y,xix0,yiy0,l),lessise(y0,z0,y,z,yiy0,ziz0,k))):less(x0,z0)
--587
-k@satz87b:=ratapp3(less(x0,z0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t2".587"(x,y,z,xi,yi,zi)):less(x0,z0)
-z0@[m:moreis(x0,y0)][n:more(y0,z0)]
-satz87c:=satz83(z0,x0,satz87b(z0,y0,x0,satz82(y0,z0,n),satz84(m))):more(x0,z0)
-z0@[m:more(x0,y0)][n:moreis(y0,z0)]
-satz87d:=satz83(z0,x0,satz87a(z0,y0,x0,satz84(y0,z0,n),satz82(m))):more(x0,z0)
-z0@[l:lessis(x0,y0)][k:lessis(y0,z0)]
-+588
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=lessisi(x0,z0,x,z,xix0,ziz0,satz52(x,y,z,lessise(x0,y0,x,y,xix0,yiy0,l),lessise(y0,z0,y,z,yiy0,ziz0,k))):lessis(x0,z0)
--588
-satz88:=ratapp3(lessis(x0,z0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".588"(x,y,z,xi,yi,zi)):lessis(x0,z0)
-trlessis:=satz88:lessis(x0,z0)
-z0@[m:moreis(x0,y0)][n:moreis(y0,z0)]
-trmoreis:=satz85(z0,x0,satz88(z0,y0,x0,satz84(y0,z0,n),satz84(m))):moreis(x0,z0)
-+589
-x0@[x:frac][xix0:inf(x,class(x0))][z:frac][m:moref(z,x)]
-t1:=somei(rat,[t:rat]more(t,x0),ratof(z),morei(ratof(z),x0,z,x,inclass(z),xix0,m)):some([t:rat]more(t,x0))
-xix0@t2:=someapp(frac,[t:frac]moref(t,x),satz53(x),some([t:rat]more(t,x0)),[t:frac][u:moref(t,x)]t1(t,u)):some([t:rat]more(t,x0))
--589
-x0@satz89:=ratapp1(some([t:rat]more(t,x0)),[x:frac][xi:inf(x,class(x0))]t2".589"(x,xi)):some([t:rat]more(t,x0))
-+590
-z"rt.589"@[l:lessf(z,x)]
-t1:=somei(rat,[t:rat]less(t,x0),ratof(z),lessi(ratof(z),x0,z,x,inclass(z),xix0,l)):some([t:rat]less(t,x0))
-xix0"rt.589"@t2:=someapp(frac,[t:frac]lessf(t,x),satz54(x),some([t:rat]less(t,x0)),[t:frac][u:lessf(t,x)]t1(t,u)):some([t:rat]less(t,x0))
--590
-satz90:=ratapp1(some([t:rat]less(t,x0)),[x:frac][xi:inf(x,class(x0))]t2".590"(x,xi)):some([t:rat]less(t,x0))
-y0@[l:less(x0,y0)]
-+591
-[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][z:frac][a:and(lessf(x,z),lessf(z,y))]
-t1:=lessi(x0,ratof(z),x,z,xix0,inclass(z),ande1(lessf(x,z),lessf(z,y),a)):less(x0,ratof(z))
-t2:=lessi(ratof(z),y0,z,y,inclass(z),yiy0,ande2(lessf(x,z),lessf(z,y),a)):less(ratof(z),y0)
-t3:=andi(less(x0,ratof(z)),less(ratof(z),y0),t1,t2):and(less(x0,ratof(z)),less(ratof(z),y0))
-t4:=somei(rat,[t:rat]and(less(x0,t),less(t,y0)),ratof(z),t3):some([t:rat]and(less(x0,t),less(t,y0)))
-yiy0@t5:=someapp(frac,[t:frac]and(lessf(x,t),lessf(t,y)),satz55(x,y,lesse(x,y,xix0,yiy0,l)),some([t:rat]and(less(x0,t),less(t,y0))),[t:frac][u:and(lessf(x,t),lessf(t,y))]t4(t,u)):some([t:rat]and(less(x0,t),less(t,y0)))
--591
-satz91:=ratapp2(some([t:rat]and(less(x0,t),less(t,y0))),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t5".591"(x,y,xi,yi)):some([t:rat]and(less(x0,t),less(t,y0)))
-@plusfrt:=[x:frac][y:frac]ratof(pf(x,y)):[x:frac][y:frac]rat
-[x:frac][y:frac][z:frac][u:frac][e:eq"n"(x,y)][f:eq"n"(z,u)]
-+*ii5
-f@t18:=isi(ratof(pf(x,z)),ratof(pf(y,u)),pf(x,z),pf(y,u),inclass(pf(x,z)),inclass(pf(y,u)),satz56(x,y,z,u,e,f)):is(<z><x>plusfrt,<u><y>plusfrt)
--ii5
-@fplusfrt:=[x:frac][y:frac][z:frac][u:frac][v:<y><x>eq][w:<u><z>eq]t18".ii5"(x,y,z,u,v,w):fixf(rat,plusfrt)
-y0@pl:=indrat(rat,plusfrt,fplusfrt):rat
-+*ii5
-y1iy0@t19:=isindrat(rat,plusfrt,fplusfrt,x1,y1,x1ix0,y1iy0):is(ratof(pf(x1,y1)),pl(x0,y0))
--ii5
-y1iy0@picp:=isp(rat,[t:rat]inf(pf(x1,y1),class(t)),ratof(pf(x1,y1)),pl(x0,y0),inclass(pf(x1,y1)),t19".ii5"):inf(pf(x1,y1),class(pl(x0,y0)))
-z0@[i:is(x0,y0)]
-ispl1:=isf(rat,rat,[t:rat]pl(t,z0),x0,y0,i):is(pl(x0,z0),pl(y0,z0))
-ispl2:=isf(rat,rat,[t:rat]pl(z0,t),x0,y0,i):is(pl(z0,x0),pl(z0,y0))
-u0@[i:is(x0,y0)][j:is(z0,u0)]
-ispl12:=tris(rat,pl(x0,z0),pl(y0,z0),pl(y0,u0),ispl1(i),ispl2(z0,u0,y0,j)):is(pl(x0,z0),pl(y0,u0))
-+592
-y1iy0@t1:=isi(pl(x0,y0),pl(y0,x0),pf(x1,y1),pf(y1,x1),picp,picp(y0,x0,y1,x1,y1iy0,x1ix0),satz58(x1,y1)):is(pl(x0,y0),pl(y0,x0))
--592
-y0@satz92:=ratapp2(is(pl(x0,y0),pl(y0,x0)),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".592"(x,y,xi,yi)):is(pl(x0,y0),pl(y0,x0))
-compl:=satz92:is(pl(x0,y0),pl(y0,x0))
-+593
-z0@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=picp(pl(x0,y0),z0,pf(x,y),z,picp(x0,y0,x,y,xix0,yiy0),ziz0):inf(pf(pf(x,y),z),class(pl(pl(x0,y0),z0)))
-t2:=picp(x0,pl(y0,z0),x,pf(y,z),xix0,picp(y0,z0,y,z,yiy0,ziz0)):inf(pf(x,pf(y,z)),class(pl(x0,pl(y0,z0))))
-t3:=isi(pl(pl(x0,y0),z0),pl(x0,pl(y0,z0)),pf(pf(x,y),z),pf(x,pf(y,z)),t1,t2,satz59(x,y,z)):is(pl(pl(x0,y0),z0),pl(x0,pl(y0,z0)))
--593
-z0@satz93:=ratapp3(is(pl(pl(x0,y0),z0),pl(x0,pl(y0,z0))),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".593"(x,y,z,xi,yi,zi)):is(pl(pl(x0,y0),z0),pl(x0,pl(y0,z0)))
-asspl1:=satz93:is(pl(pl(x0,y0),z0),pl(x0,pl(y0,z0)))
-asspl2:=symis(rat,pl(pl(x0,y0),z0),pl(x0,pl(y0,z0)),satz93):is(pl(x0,pl(y0,z0)),pl(pl(x0,y0),z0))
-+594
-y1iy0@t1:=morei(pl(x0,y0),x0,pf(x1,y1),x1,picp,x1ix0,satz60(x1,y1)):more(pl(x0,y0),x0)
--594
-y0@satz94:=ratapp2(more(pl(x0,y0),x0),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".594"(x,y,xi,yi)):more(pl(x0,y0),x0)
-satz94a:=satz82(pl(x0,y0),x0,satz94):less(x0,pl(x0,y0))
-z0@[m:more(x0,y0)]
-+595
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=morei(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),satz61(x,y,z,moree(x0,y0,x,y,xix0,yiy0,m))):more(pl(x0,z0),pl(y0,z0))
--595
-satz95:=ratapp3(more(pl(x0,z0),pl(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".595"(x,y,z,xi,yi,zi)):more(pl(x0,z0),pl(y0,z0))
-z0@[m:more(x0,y0)]
-+596
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=morei(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),satz62a(x,y,z,moree(x0,y0,x,y,xix0,yiy0,m))):more(pl(x0,z0),pl(y0,z0))
--596
-satz96a:=ratapp3(more(pl(x0,z0),pl(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".596"(x,y,z,xi,yi,zi)):more(pl(x0,z0),pl(y0,z0))
-z0@[i:is(x0,y0)]
-+*596
-i@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t2:=isi(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),satz62b(x,y,z,ise(x0,y0,x,y,xix0,yiy0,i))):is(pl(x0,z0),pl(y0,z0))
--596
-i@satz96b:=ratapp3(is(pl(x0,z0),pl(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t2".596"(x,y,z,xi,yi,zi)):is(pl(x0,z0),pl(y0,z0))
-z0@[l:less(x0,y0)]
-+*596
-l@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t3:=lessi(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),satz62c(x,y,z,lesse(x0,y0,x,y,xix0,yiy0,l))):less(pl(x0,z0),pl(y0,z0))
--596
-l@satz96c:=ratapp3(less(pl(x0,z0),pl(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".596"(x,y,z,xi,yi,zi)):less(pl(x0,z0),pl(y0,z0))
-+*596
-m@andersa:=satz95(m):more(pl(x0,z0),pl(y0,z0))
-i@andersb:=ispl1(x0,y0,z0,i):is(pl(x0,z0),pl(y0,z0))
-l@andersc:=satz82(pl(y0,z0),pl(x0,z0),satz95(y0,x0,z0,satz83(l))):less(pl(x0,z0),pl(y0,z0))
--596
-m@satz96d:=ismore12(pl(x0,z0),pl(z0,x0),pl(y0,z0),pl(z0,y0),compl(x0,z0),compl(y0,z0),satz96a):more(pl(z0,x0),pl(z0,y0))
-i@satz96e:=ispl2(x0,y0,z0,i):is(pl(z0,x0),pl(z0,y0))
-l@satz96f:=isless12(pl(x0,z0),pl(z0,x0),pl(y0,z0),pl(z0,y0),compl(x0,z0),compl(y0,z0),satz96c):less(pl(z0,x0),pl(z0,y0))
-z0@[m:more(pl(x0,z0),pl(y0,z0))]
-+597
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=morei(x0,y0,x,y,xix0,yiy0,satz63a(x,y,z,moree(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),m))):more(x0,y0)
--597
-satz97a:=ratapp3(more(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".597"(x,y,z,xi,yi,zi)):more(x0,y0)
-z0@[i:is(pl(x0,z0),pl(y0,z0))]
-+*597
-i@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t2:=isi(x0,y0,x,y,xix0,yiy0,satz63b(x,y,z,ise(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),i))):is(x0,y0)
--597
-i@satz97b:=ratapp3(is(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t2".597"(x,y,z,xi,yi,zi)):is(x0,y0)
-z0@[l:less(pl(x0,z0),pl(y0,z0))]
-+*597
-l@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t3:=lessi(x0,y0,x,y,xix0,yiy0,satz63c(x,y,z,lesse(pl(x0,z0),pl(y0,z0),pf(x,z),pf(y,z),picp(x0,z0,x,z,xix0,ziz0),picp(y0,z0,y,z,yiy0,ziz0),l))):less(x0,y0)
--597
-l@satz97c:=ratapp3(less(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".597"(x,y,z,xi,yi,zi)):less(x0,y0)
-+*597
-l@anders:=satz82(y0,x0,satz97a(y0,x0,z0,satz83(pl(x0,z0),pl(y0,z0),l))):less(x0,y0)
--597
-u0@[m:more(x0,y0)][n:more(z0,u0)]
-+598
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=morei(pl(x0,z0),pl(y0,u0),pf(x,z),pf(y,u),picp(x0,z0,x,z,xix0,ziz0),picp(y0,u0,y,u,yiy0,uiu0),satz64(x,y,z,u,moree(x0,y0,x,y,xix0,yiy0,m),moree(z0,u0,z,u,ziz0,uiu0,n))):more(pl(x0,z0),pl(y0,u0))
--598
-satz98:=ratapp4(more(pl(x0,z0),pl(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".598"(x,y,z,u,xi,yi,zi,ui)):more(pl(x0,z0),pl(y0,u0))
-u0@[l:less(x0,y0)][k:less(z0,u0)]
-satz98a:=satz82(pl(y0,u0),pl(x0,z0),satz98(y0,x0,u0,z0,satz83(l),satz83(z0,u0,k))):less(pl(x0,z0),pl(y0,u0))
-u0@[m:moreis(x0,y0)][n:more(z0,u0)]
-+599
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=morei(pl(x0,z0),pl(y0,u0),pf(x,z),pf(y,u),picp(x0,z0,x,z,xix0,ziz0),picp(y0,u0,y,u,yiy0,uiu0),satz65a(x,y,z,u,moreise(x0,y0,x,y,xix0,yiy0,m),moree(z0,u0,z,u,ziz0,uiu0,n))):more(pl(x0,z0),pl(y0,u0))
--599
-satz99a:=ratapp4(more(pl(x0,z0),pl(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".599"(x,y,z,u,xi,yi,zi,ui)):more(pl(x0,z0),pl(y0,u0))
-u0@[m:more(x0,y0)][n:moreis(z0,u0)]
-+*599
-n@[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t2:=morei(pl(x0,z0),pl(y0,u0),pf(x,z),pf(y,u),picp(x0,z0,x,z,xix0,ziz0),picp(y0,u0,y,u,yiy0,uiu0),satz65b(x,y,z,u,moree(x0,y0,x,y,xix0,yiy0,m),moreise(z0,u0,z,u,ziz0,uiu0,n))):more(pl(x0,z0),pl(y0,u0))
--599
-n@satz99b:=ratapp4(more(pl(x0,z0),pl(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t2".599"(x,y,z,u,xi,yi,zi,ui)):more(pl(x0,z0),pl(y0,u0))
-u0@[l:lessis(x0,y0)][k:less(z0,u0)]
-satz99c:=satz82(pl(y0,u0),pl(x0,z0),satz99a(y0,x0,u0,z0,satz85(l),satz83(z0,u0,k))):less(pl(x0,z0),pl(y0,u0))
-u0@[l:less(x0,y0)][k:lessis(z0,u0)]
-satz99d:=satz82(pl(y0,u0),pl(x0,z0),satz99b(y0,x0,u0,z0,satz83(l),satz85(z0,u0,k))):less(pl(x0,z0),pl(y0,u0))
-u0@[m:moreis(x0,y0)][n:moreis(z0,u0)]
-+5100
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=moreisi(pl(x0,z0),pl(y0,u0),pf(x,z),pf(y,u),picp(x0,z0,x,z,xix0,ziz0),picp(y0,u0,y,u,yiy0,uiu0),satz66(x,y,z,u,moreise(x0,y0,x,y,xix0,yiy0,m),moreise(z0,u0,z,u,ziz0,uiu0,n))):moreis(pl(x0,z0),pl(y0,u0))
--5100
-satz100:=ratapp4(moreis(pl(x0,z0),pl(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".5100"(x,y,z,u,xi,yi,zi,ui)):moreis(pl(x0,z0),pl(y0,u0))
-u0@[l:lessis(x0,y0)][k:lessis(z0,u0)]
-satz100a:=satz84(pl(y0,u0),pl(x0,z0),satz100(y0,x0,u0,z0,satz85(l),satz85(z0,u0,k))):lessis(pl(x0,z0),pl(y0,u0))
-y0@[l:lessis(x0,y0)]
-+5101
-[v0:rat][i:is(pl(y0,v0),x0)]
-t1:=ismore1(pl(y0,v0),x0,y0,i,satz94(y0,v0)):more(x0,y0)
-v0@t2:=th3"l.imp"(is(pl(y0,v0),x0),more(x0,y0),satz81d(x0,y0,l),[t:is(pl(y0,v0),x0)]t1(t)):nis(pl(y0,v0),x0)
--5101
-vorbemerkung101:=th5"l.some"(rat,[v:rat]is(pl(y0,v),x0),[v:rat]t2".5101"(v)):not(some([t:rat]is(pl(y0,t),x0)))
-y0@[m:more(x0,y0)]
-+*5101
-m@[x:frac][y:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][v:frac][e:eq"n"(pf(y,v),x)]
-t3:=isi(pl(y0,ratof(v)),x0,pf(y,v),x,picp(y0,ratof(v),y,v,yiy0,inclass(v)),xix0,e):is(pl(y0,ratof(v)),x0)
-t4:=somei(rat,[t:rat]is(pl(y0,t),x0),ratof(v),t3):some([t:rat]is(pl(y0,t),x0))
-yiy0@t5:=someapp(frac,[t:frac]eq"n"(pf(y,t),x),satz67a(x,y,moree(x0,y0,x,y,xix0,yiy0,m)),some([t:rat]is(pl(y0,t),x0)),[t:frac][u:eq"n"(pf(y,t),x)]t4(t,u)):some([t:rat]is(pl(y0,t),x0))
--5101
-m@satz101a:=ratapp2(some([t:rat]is(pl(y0,t),x0)),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t5".5101"(x,y,xi,yi)):some([t:rat]is(pl(y0,t),x0))
-y0@[v0:rat][w0:rat][i:is(pl(y0,v0),x0)][j:is(pl(y0,w0),x0)]
-+*5101
-j@[x:frac][y:frac][v:frac][w:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][viv0:inf(v,class(v0))][wiw0:inf(w,class(w0))]
-t6:=isi(v0,w0,v,w,viv0,wiw0,satz67b(x,y,v,w,ise(pl(y0,v0),x0,pf(y,v),x,picp(y0,v0,y,v,yiy0,viv0),xix0,i),ise(pl(y0,w0),x0,pf(y,w),x,picp(y0,w0,y,w,yiy0,wiw0),xix0,j))):is(v0,w0)
--5101
-j@satz101b:=ratapp4(v0,w0,is(v0,w0),[x:frac][y:frac][v:frac][w:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][vi:inf(v,class(v0))][wi:inf(w,class(w0))]t6".5101"(x,y,v,w,xi,yi,vi,wi)):is(v0,w0)
-+*5101
-y0@t7:=[t:rat][u:rat][v:is(pl(y0,t),x0)][w:is(pl(y0,u),x0)]satz101b(t,u,v,w):amone(rat,[t:rat]is(pl(y0,t),x0))
--5101
-m@satz101:=onei(rat,[t:rat]is(pl(y0,t),x0),t7".5101",satz101a):one([t:rat]is(pl(y0,t),x0))
-mn:=ind(rat,[t:rat]is(pl(y0,t),x0),satz101):rat
-satz101c:=oneax(rat,[t:rat]is(pl(y0,t),x0),satz101):is(pl(y0,mn(x0,y0,m)),x0)
-satz101d:=symis(rat,pl(y0,mn(x0,y0,m)),x0,satz101c):is(x0,pl(y0,mn(x0,y0,m)))
-satz101e:=tris(rat,pl(mn(x0,y0,m),y0),pl(y0,mn(x0,y0,m)),x0,compl(mn(x0,y0,m),y0),satz101c):is(pl(mn(x0,y0,m),y0),x0)
-satz101f:=symis(rat,pl(mn(x0,y0,m),y0),x0,satz101e):is(x0,pl(mn(x0,y0,m),y0))
-y0@[v0:rat][m:more(x0,y0)][i:is(pl(y0,v0),x0)]
-satz101g:=satz101b(v0,mn(x0,y0,m),i,satz101c(m)):is(v0,mn(x0,y0,m))
-@timesfrt:=[x:frac][y:frac]ratof(tf(x,y)):[x:frac][y:frac]rat
-+*ii5
-f@t20:=isi(ratof(tf(x,z)),ratof(tf(y,u)),tf(x,z),tf(y,u),inclass(tf(x,z)),inclass(tf(y,u)),satz68(x,y,z,u,e,f)):is(<z><x>timesfrt,<u><y>timesfrt)
--ii5
-@ftimesfrt:=[x:frac][y:frac][z:frac][u:frac][v:<y><x>eq][w:<u><z>eq]t20".ii5"(x,y,z,u,v,w):fixf(rat,timesfrt)
-y0@ts:=indrat(rat,timesfrt,ftimesfrt):rat
-+*ii5
-y1iy0@t21:=isindrat(rat,timesfrt,ftimesfrt,x1,y1,x1ix0,y1iy0):is(ratof(tf(x1,y1)),ts(x0,y0))
--ii5
-y1iy0@tict:=isp(rat,[t:rat]inf(tf(x1,y1),class(t)),ratof(tf(x1,y1)),ts(x0,y0),inclass(tf(x1,y1)),t21".ii5"):inf(tf(x1,y1),class(ts(x0,y0)))
-z0@[i:is(x0,y0)]
-ists1:=isf(rat,rat,[t:rat]ts(t,z0),x0,y0,i):is(ts(x0,z0),ts(y0,z0))
-ists2:=isf(rat,rat,[t:rat]ts(z0,t),x0,y0,i):is(ts(z0,x0),ts(z0,y0))
-u0@[i:is(x0,y0)][j:is(z0,u0)]
-ists12:=tris(rat,ts(x0,z0),ts(y0,z0),ts(y0,u0),ists1(i),ists2(z0,u0,y0,j)):is(ts(x0,z0),ts(y0,u0))
-+5102
-y1iy0@t1:=isi(ts(x0,y0),ts(y0,x0),tf(x1,y1),tf(y1,x1),tict,tict(y0,x0,y1,x1,y1iy0,x1ix0),satz69(x1,y1)):is(ts(x0,y0),ts(y0,x0))
--5102
-y0@satz102:=ratapp2(is(ts(x0,y0),ts(y0,x0)),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t1".5102"(x,y,xi,yi)):is(ts(x0,y0),ts(y0,x0))
-comts:=satz102:is(ts(x0,y0),ts(y0,x0))
-+5103
-ziz0"rt.593"@t1:=tict(ts(x0,y0),z0,tf(x,y),z,tict(x0,y0,x,y,xix0,yiy0),ziz0):inf(tf(tf(x,y),z),class(ts(ts(x0,y0),z0)))
-t2:=tict(x0,ts(y0,z0),x,tf(y,z),xix0,tict(y0,z0,y,z,yiy0,ziz0)):inf(tf(x,tf(y,z)),class(ts(x0,ts(y0,z0))))
-t3:=isi(ts(ts(x0,y0),z0),ts(x0,ts(y0,z0)),tf(tf(x,y),z),tf(x,tf(y,z)),t1,t2,satz70(x,y,z)):is(ts(ts(x0,y0),z0),ts(x0,ts(y0,z0)))
--5103
-z0@satz103:=ratapp3(is(ts(ts(x0,y0),z0),ts(x0,ts(y0,z0))),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".5103"(x,y,z,xi,yi,zi)):is(ts(ts(x0,y0),z0),ts(x0,ts(y0,z0)))
-assts1:=satz103:is(ts(ts(x0,y0),z0),ts(x0,ts(y0,z0)))
-assts2:=symis(rat,ts(ts(x0,y0),z0),ts(x0,ts(y0,z0)),satz103):is(ts(x0,ts(y0,z0)),ts(ts(x0,y0),z0))
-+5104
-ziz0"rt.593"@t1:=tict(x0,pl(y0,z0),x,pf(y,z),xix0,picp(y0,z0,y,z,yiy0,ziz0)):inf(tf(x,pf(y,z)),class(ts(x0,pl(y0,z0))))
-t2:=picp(ts(x0,y0),ts(x0,z0),tf(x,y),tf(x,z),tict(x0,y0,x,y,xix0,yiy0),tict(x0,z0,x,z,xix0,ziz0)):inf(pf(tf(x,y),tf(x,z)),class(pl(ts(x0,y0),ts(x0,z0))))
-t3:=isi(ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0)),tf(x,pf(y,z)),pf(tf(x,y),tf(x,z)),t1,t2,satz71(x,y,z)):is(ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0)))
--5104
-satz104:=ratapp3(is(ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0))),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".5104"(x,y,z,xi,yi,zi)):is(ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0)))
-disttp1:=tr3is(rat,ts(pl(x0,y0),z0),ts(z0,pl(x0,y0)),pl(ts(z0,x0),ts(z0,y0)),pl(ts(x0,z0),ts(y0,z0)),comts(pl(x0,y0),z0),satz104(z0,x0,y0),ispl12(ts(z0,x0),ts(x0,z0),ts(z0,y0),ts(y0,z0),comts(z0,x0),comts(z0,y0))):is(ts(pl(x0,y0),z0),pl(ts(x0,z0),ts(y0,z0)))
-disttp2:=satz104:is(ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0)))
-distpt1:=symis(rat,ts(pl(x0,y0),z0),pl(ts(x0,z0),ts(y0,z0)),disttp1):is(pl(ts(x0,z0),ts(y0,z0)),ts(pl(x0,y0),z0))
-distpt2:=symis(rat,ts(x0,pl(y0,z0)),pl(ts(x0,y0),ts(x0,z0)),disttp2):is(pl(ts(x0,y0),ts(x0,z0)),ts(x0,pl(y0,z0)))
-[m:more(x0,y0)]
-+5105
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=morei(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xix0,ziz0),tict(y0,z0,y,z,yiy0,ziz0),satz72a(x,y,z,moree(x0,y0,x,y,xix0,yiy0,m))):more(ts(x0,z0),ts(y0,z0))
--5105
-satz105a:=ratapp3(more(ts(x0,z0),ts(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".5105"(x,y,z,xi,yi,zi)):more(ts(x0,z0),ts(y0,z0))
-z0@[i:is(x0,y0)]
-+*5105
-i@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t2:=isi(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xix0,ziz0),tict(y0,z0,y,z,yiy0,ziz0),satz72b(x,y,z,ise(x0,y0,x,y,xix0,yiy0,i))):is(ts(x0,z0),ts(y0,z0))
--5105
-i@satz105b:=ratapp3(is(ts(x0,z0),ts(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t2".5105"(x,y,z,xi,yi,zi)):is(ts(x0,z0),ts(y0,z0))
-z0@[l:less(x0,y0)]
-+*5105
-l@[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]
-t3:=lessi(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xi,zi),tict(y0,z0,y,z,yi,zi),satz72c(x,y,z,lesse(x0,y0,x,y,xi,yi,l))):less(ts(x0,z0),ts(y0,z0))
--5105
-l@satz105c:=ratapp3(less(ts(x0,z0),ts(y0,z0)),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".5105"(x,y,z,xi,yi,zi)):less(ts(x0,z0),ts(y0,z0))
-+*5105
-i@andersb:=ists1(x0,y0,z0,i):is(ts(x0,z0),ts(y0,z0))
-l@andersc:=satz82(ts(y0,z0),ts(x0,z0),satz105a(y0,x0,z0,satz83(l))):less(ts(x0,z0),ts(y0,z0))
--5105
-m@satz105d:=ismore12(ts(x0,z0),ts(z0,x0),ts(y0,z0),ts(z0,y0),comts(x0,z0),comts(y0,z0),satz105a):more(ts(z0,x0),ts(z0,y0))
-i@satz105e:=ists2(x0,y0,z0,i):is(ts(z0,x0),ts(z0,y0))
-l@satz105f:=isless12(ts(x0,z0),ts(z0,x0),ts(y0,z0),ts(z0,y0),comts(x0,z0),comts(y0,z0),satz105c):less(ts(z0,x0),ts(z0,y0))
-z0@[m:more(ts(x0,z0),ts(y0,z0))]
-+5106
-[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t1:=morei(x0,y0,x,y,xix0,yiy0,satz73a(x,y,z,moree(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xix0,ziz0),tict(y0,z0,y,z,yiy0,ziz0),m))):more(x0,y0)
--5106
-satz106a:=ratapp3(more(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t1".5106"(x,y,z,xi,yi,zi)):more(x0,y0)
-z0@[i:is(ts(x0,z0),ts(y0,z0))]
-+*5106
-i@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t2:=isi(x0,y0,x,y,xix0,yiy0,satz73b(x,y,z,ise(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xix0,ziz0),tict(y0,z0,y,z,yiy0,ziz0),i))):is(x0,y0)
--5106
-i@satz106b:=ratapp3(is(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t2".5106"(x,y,z,xi,yi,zi)):is(x0,y0)
-z0@[l:less(ts(x0,z0),ts(y0,z0))]
-+*5106
-l@[x:frac][y:frac][z:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))]
-t3:=lessi(x0,y0,x,y,xix0,yiy0,satz73c(x,y,z,lesse(ts(x0,z0),ts(y0,z0),tf(x,z),tf(y,z),tict(x0,z0,x,z,xix0,ziz0),tict(y0,z0,y,z,yiy0,ziz0),l))):less(x0,y0)
--5106
-l@satz106c:=ratapp3(less(x0,y0),[x:frac][y:frac][z:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))]t3".5106"(x,y,z,xi,yi,zi)):less(x0,y0)
-+*5106
-l@anders:=satz82(y0,x0,satz106a(y0,x0,z0,satz83(ts(x0,z0),ts(y0,z0),l))):less(x0,y0)
--5106
-u0@[m:more(x0,y0)][n:more(z0,u0)]
-+5107
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=morei(ts(x0,z0),ts(y0,u0),tf(x,z),tf(y,u),tict(x0,z0,x,z,xix0,ziz0),tict(y0,u0,y,u,yiy0,uiu0),satz74(x,y,z,u,moree(x0,y0,x,y,xix0,yiy0,m),moree(z0,u0,z,u,ziz0,uiu0,n))):more(ts(x0,z0),ts(y0,u0))
--5107
-satz107:=ratapp4(more(ts(x0,z0),ts(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".5107"(x,y,z,u,xi,yi,zi,ui)):more(ts(x0,z0),ts(y0,u0))
-u0@[l:less(x0,y0)][k:less(z0,u0)]
-satz107a:=satz82(ts(y0,u0),ts(x0,z0),satz107(y0,x0,u0,z0,satz83(l),satz83(z0,u0,k))):less(ts(x0,z0),ts(y0,u0))
-u0@[m:moreis(x0,y0)][n:more(z0,u0)]
-+5108
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=morei(ts(x0,z0),ts(y0,u0),tf(x,z),tf(y,u),tict(x0,z0,x,z,xix0,ziz0),tict(y0,u0,y,u,yiy0,uiu0),satz75a(x,y,z,u,moreise(x0,y0,x,y,xix0,yiy0,m),moree(z0,u0,z,u,ziz0,uiu0,n))):more(ts(x0,z0),ts(y0,u0))
--5108
-satz108a:=ratapp4(more(ts(x0,z0),ts(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".5108"(x,y,z,u,xi,yi,zi,ui)):more(ts(x0,z0),ts(y0,u0))
-u0@[m:more(x0,y0)][n:moreis(z0,u0)]
-+*5108
-n@[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t2:=morei(ts(x0,z0),ts(y0,u0),tf(x,z),tf(y,u),tict(x0,z0,x,z,xix0,ziz0),tict(y0,u0,y,u,yiy0,uiu0),satz75b(x,y,z,u,moree(x0,y0,x,y,xix0,yiy0,m),moreise(z0,u0,z,u,ziz0,uiu0,n))):more(ts(x0,z0),ts(y0,u0))
--5108
-n@satz108b:=ratapp4(more(ts(x0,z0),ts(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t2".5108"(x,y,z,u,xi,yi,zi,ui)):more(ts(x0,z0),ts(y0,u0))
-u0@[l:lessis(x0,y0)][k:less(z0,u0)]
-satz108c:=satz82(ts(y0,u0),ts(x0,z0),satz108a(y0,x0,u0,z0,satz85(l),satz83(z0,u0,k))):less(ts(x0,z0),ts(y0,u0))
-u0@[l:less(x0,y0)][k:lessis(z0,u0)]
-satz108d:=satz82(ts(y0,u0),ts(x0,z0),satz108b(y0,x0,u0,z0,satz83(l),satz85(z0,u0,k))):less(ts(x0,z0),ts(y0,u0))
-u0@[m:moreis(x0,y0)][n:moreis(z0,u0)]
-+5109
-[x:frac][y:frac][z:frac][u:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][ziz0:inf(z,class(z0))][uiu0:inf(u,class(u0))]
-t1:=moreisi(ts(x0,z0),ts(y0,u0),tf(x,z),tf(y,u),tict(x0,z0,x,z,xix0,ziz0),tict(y0,u0,y,u,yiy0,uiu0),satz76(x,y,z,u,moreise(x0,y0,x,y,xix0,yiy0,m),moreise(z0,u0,z,u,ziz0,uiu0,n))):moreis(ts(x0,z0),ts(y0,u0))
--5109
-satz109:=ratapp4(moreis(ts(x0,z0),ts(y0,u0)),[x:frac][y:frac][z:frac][u:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][zi:inf(z,class(z0))][ui:inf(u,class(u0))]t1".5109"(x,y,z,u,xi,yi,zi,ui)):moreis(ts(x0,z0),ts(y0,u0))
-u0@[l:lessis(x0,y0)][k:lessis(z0,u0)]
-satz109a:=satz84(ts(y0,u0),ts(x0,z0),satz109(y0,x0,u0,z0,satz85(l),satz85(z0,u0,k))):lessis(ts(x0,z0),ts(y0,u0))
-+5110
-y1iy0@[v:frac][e:eq"n"(tf(y1,v),x1)]
-t1:=isi(ts(y0,ratof(v)),x0,tf(y1,v),x1,tict(y0,ratof(v),y1,v,y1iy0,inclass(v)),x1ix0,e):is(ts(y0,ratof(v)),x0)
-t2:=somei(rat,[t:rat]is(ts(y0,t),x0),ratof(v),t1):some([t:rat]is(ts(y0,t),x0))
-y1iy0@t3:=someapp(frac,[t:frac]eq"n"(tf(y1,t),x1),satz77a(x1,y1),some([t:rat]is(ts(y0,t),x0)),[t:frac][u:eq"n"(tf(y1,t),x1)]t2(t,u)):some([t:rat]is(ts(y0,t),x0))
--5110
-y0@satz110a:=ratapp2(some([t:rat]is(ts(y0,t),x0)),[x:frac][y:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))]t3".5110"(x,y,xi,yi)):some([t:rat]is(ts(y0,t),x0))
-[v0:rat][w0:rat][i:is(ts(y0,v0),x0)][j:is(ts(y0,w0),x0)]
-+*5110
-j@[x:frac][y:frac][v:frac][w:frac][xix0:inf(x,class(x0))][yiy0:inf(y,class(y0))][viv0:inf(v,class(v0))][wiw0:inf(w,class(w0))]
-t4:=isi(v0,w0,v,w,viv0,wiw0,satz77b(x,y,v,w,ise(ts(y0,v0),x0,tf(y,v),x,tict(y0,v0,y,v,yiy0,viv0),xix0,i),ise(ts(y0,w0),x0,tf(y,w),x,tict(y0,w0,y,w,yiy0,wiw0),xix0,j))):is(v0,w0)
--5110
-j@satz110b:=ratapp4(v0,w0,is(v0,w0),[x:frac][y:frac][v:frac][w:frac][xi:inf(x,class(x0))][yi:inf(y,class(y0))][vi:inf(v,class(v0))][wi:inf(w,class(w0))]t4".5110"(x,y,v,w,xi,yi,vi,wi)):is(v0,w0)
-+*5110
-y0@t5:=[t:rat][u:rat][v:is(ts(y0,t),x0)][w:is(ts(y0,u),x0)]satz110b(t,u,v,w):amone(rat,[t:rat]is(ts(y0,t),x0))
--5110
-y0@satz110:=onei(rat,[t:rat]is(ts(y0,t),x0),t5".5110",satz110a):one([t:rat]is(ts(y0,t),x0))
--rt
-@[x:nat][y:nat]
-+5111
-t1:=tris(nat,ts(num(fr(x,1)),den(fr(y,1))),ts(x,1),x,ndis12(x,1,y,1),satz28a(x)):is(ts(num(fr(x,1)),den(fr(y,1))),x)
-t2:=symis(nat,ts(num(fr(x,1)),den(fr(y,1))),x,t1):is(x,ts(num(fr(x,1)),den(fr(y,1))))
--5111
-[m:moref(fr(x,1),fr(y,1))]
-satz111a:=ismore12(ts(num(fr(x,1)),den(fr(y,1))),x,ts(num(fr(y,1)),den(fr(x,1))),y,t1".5111",t1".5111"(y,x),m):more(x,y)
-y@[e:eq(fr(x,1),fr(y,1))]
-satz111b:=tr3is(nat,x,ts(num(fr(x,1)),den(fr(y,1))),ts(num(fr(y,1)),den(fr(x,1))),y,t2".5111",e,t1".5111"(y,x)):is(x,y)
-y@[l:lessf(fr(x,1),fr(y,1))]
-satz111c:=isless12(ts(num(fr(x,1)),den(fr(y,1))),x,ts(num(fr(y,1)),den(fr(x,1))),y,t1".5111",t1".5111"(y,x),l):less(x,y)
-y@[m:more(x,y)]
-satz111d:=ismore12(x,ts(num(fr(x,1)),den(fr(y,1))),y,ts(num(fr(y,1)),den(fr(x,1))),t2".5111",t2".5111"(y,x),m):moref(fr(x,1),fr(y,1))
-y@[i:is(x,y)]
-satz111e:=tr3is(nat,ts(num(fr(x,1)),den(fr(y,1))),x,y,ts(num(fr(y,1)),den(fr(x,1))),t1".5111",i,t2".5111"(y,x)):eq(fr(x,1),fr(y,1))
-y@[l:less(x,y)]
-satz111f:=isless12(x,ts(num(fr(x,1)),den(fr(y,1))),y,ts(num(fr(y,1)),den(fr(x,1))),t2".5111",t2".5111"(y,x),l):lessf(fr(x,1),fr(y,1))
-+*rt
-@[x0:rat][x:nat]
-natprop:=inf(fr(x,1),class(x0)):'prop'
-x0@natrt:=some"n"([t:nat]natprop(t)):'prop'
-+*ii5
-y0@[x:nat][y:nat][npx:natprop(x0,x)][npy:natprop(y0,y)][i:is(x0,y0)]
-t22:=satz111b(x,y,ise(x0,y0,fr(x,1),fr(y,1),npx,npy,i)):is"n"(x,y)
-x0@t23:=[t:nat][u:nat][v:natprop(x0,t)][w:natprop(x0,u)]t22(x0,x0,t,u,v,w,refis(rat,x0)):amone(nat,[t:nat]natprop(x0,t))
--ii5
-x0@[nx0:natrt(x0)]
-satz111g:=onei(nat,[t:nat]natprop(t),t23".ii5",nx0):one"n"([t:nat]natprop(x0,t))
-nofrt:=ind(nat,[t:nat]natprop(t),satz111g):nat
-inclassn:=oneax(nat,[t:nat]natprop(t),satz111g):inf(fr(nofrt,1),class(x0))
-[y0:rat][ny0:natrt(y0)][i:is(x0,y0)]
-isrten:=t22".ii5"(x0,y0,nofrt(x0,nx0),nofrt(y0,ny0),inclassn(x0,nx0),inclassn(y0,ny0),i):is"n"(nofrt(x0,nx0),nofrt(y0,ny0))
-ny0@[i:is"n"(nofrt(x0,nx0),nofrt(y0,ny0))]
-isrtin:=isi(x0,y0,fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1),inclassn(x0,nx0),inclassn(y0,ny0),eqn"n"(nofrt(x0,nx0),1,nofrt(y0,ny0),i)):is(x0,y0)
-@[x:nat]
-rtofn:=ratof(fr(x,1)):rat
-natrti:=somei(nat,[t:nat]natprop(rtofn,t),x,inclass(fr(x,1))):natrt(rtofn(x))
-[y:nat][i:is"n"(x,y)]
-isnert:=isf(nat,rat,[t:nat]rtofn(t),x,y,i):is(rtofn(x),rtofn(y))
-y@[i:is(rtofn(x),rtofn(y))]
-isnirt:=t22".ii5"(rtofn(x),rtofn(y),x,y,inclass(fr(x,1)),inclass(fr(y,1)),i):is"n"(x,y)
-nx0@isrtn1:=isi(x0,rtofn(nofrt(x0,nx0)),fr(nofrt(x0,nx0),1),fr(nofrt(x0,nx0),1),inclassn(x0,nx0),inclass(fr(nofrt(x0,nx0),1)),refeq"n"(fr(nofrt(x0,nx0),1))):is(x0,rtofn(nofrt(x0,nx0)))
-x@isnrt1:=t22".ii5"(rtofn(x),rtofn(x),x,nofrt(rtofn(x),natrti(x)),inclass(fr(x,1)),inclassn(rtofn(x),natrti(x)),refis(rat,rtofn(x))):is"n"(x,nofrt(rtofn(x),natrti(x)))
--rt
-@[x:nat][y:nat]
-satz112a:=satz57(x,y,1):eq(pf(fr(x,1),fr(y,1)),fr(pl(x,y),1))
-satz112b:=treq(tf(fr(x,1),fr(y,1)),fr(ts(x,y),ts(1,1)),fr(ts(x,y),1),tfeq12a(x,1,y,1),eqd(ts(x,y),ts(1,1),1,satz28a(1))):eq(tf(fr(x,1),fr(y,1)),fr(ts(x,y),1))
-+*rt
-ny0@satz112c:=lemmaeq1(pl(x0,y0),pf(fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1)),fr(pl"n"(nofrt(x0,nx0),nofrt(y0,ny0)),1),picp(x0,y0,fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1),inclassn(x0,nx0),inclassn(y0,ny0)),satz112a(nofrt(x0,nx0),nofrt(y0,ny0))):inf(fr(pl"n"(nofrt(x0,nx0),nofrt(y0,ny0)),1),class(pl(x0,y0)))
-satz112d:=somei(nat,[t:nat]natprop(pl(x0,y0),t),pl"n"(nofrt(x0,nx0),nofrt(y0,ny0)),satz112c):natrt(pl(x0,y0))
-satz112e:=lemmaeq1(ts(x0,y0),tf(fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1)),fr(ts"n"(nofrt(x0,nx0),nofrt(y0,ny0)),1),tict(x0,y0,fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1),inclassn(x0,nx0),inclassn(y0,ny0)),satz112b(nofrt(x0,nx0),nofrt(y0,ny0))):inf(fr(ts"n"(nofrt(x0,nx0),nofrt(y0,ny0)),1),class(ts(x0,y0)))
-satz112f:=somei(nat,[t:nat]natprop(ts(x0,y0),t),ts"n"(nofrt(x0,nx0),nofrt(y0,ny0)),satz112e):natrt(ts(x0,y0))
-[m:more(x0,y0)]
-+5112
-t1:=satz111a(nofrt(x0,nx0),nofrt(y0,ny0),moree(x0,y0,fr(nofrt(x0,nx0),1),fr(nofrt(y0,ny0),1),inclassn(x0,nx0),inclassn(y0,ny0),m)):more"n"(nofrt(x0,nx0),nofrt(y0,ny0))
-[z:nat][d:diffprop(nofrt(x0,nx0),nofrt(y0,ny0),z)]
-t2:=tris(nat,nofrt(x0,nx0),pl"n"(nofrt(y0,ny0),z),pl"n"(nofrt(y0,ny0),nofrt(rtofn(z),natrti(z))),d,ispl2"n"(z,nofrt(rtofn(z),natrti(z)),nofrt(y0,ny0),isnrt1(z))):is"n"(nofrt(x0,nx0),pl"n"(nofrt(y0,ny0),nofrt(rtofn(z),natrti(z))))
-t3:=isi(x0,pl(y0,rtofn(z)),fr(nofrt(x0,nx0),1),fr(pl"n"(nofrt(y0,ny0),nofrt(rtofn(z),natrti(z))),1),inclassn(x0,nx0),satz112c(y0,ny0,rtofn(z),natrti(z)),eqn(nofrt(x0,nx0),1,pl"n"(nofrt(y0,ny0),nofrt(rtofn(z),natrti(z))),t2)):is(x0,pl(y0,rtofn(z)))
-t4:=satz101g(x0,y0,rtofn(z),m,symis(rat,x0,pl(y0,rtofn(z)),t3)):is(rtofn(z),mn(x0,y0,m))
-t5:=isp(rat,[t:rat]natrt(t),rtofn(z),mn(x0,y0,m),natrti(z),t4):natrt(mn(x0,y0,m))
--5112
-satz112g:=someapp(nat,[t:nat]diffprop(nofrt(x0,nx0),nofrt(y0,ny0),t),t1".5112",natrt(mn(x0,y0,m)),[t:nat][u:diffprop(nofrt(x0,nx0),nofrt(y0,ny0),t)]t5".5112"(t,u)):natrt(mn(x0,y0,m))
-@[x:nat][y:nat]
-satz112h:=isi(pl(rtofn(x),rtofn(y)),rtofn(pl"n"(x,y)),pf(fr(x,1),fr(y,1)),fr(pl"n"(x,y),1),picp(rtofn(x),rtofn(y),fr(x,1),fr(y,1),inclass(fr(x,1)),inclass(fr(y,1))),inclass(fr(pl"n"(x,y),1)),satz112a(x,y)):is(pl(rtofn(x),rtofn(y)),rtofn(pl"n"(x,y)))
-satz112j:=isi(ts(rtofn(x),rtofn(y)),rtofn(ts"n"(x,y)),tf(fr(x,1),fr(y,1)),fr(ts"n"(x,y),1),tict(rtofn(x),rtofn(y),fr(x,1),fr(y,1),inclass(fr(x,1)),inclass(fr(y,1))),inclass(fr(ts"n"(x,y),1)),satz112b(x,y)):is(ts(rtofn(x),rtofn(y)),rtofn(ts"n"(x,y)))
-+nt
-@natt:=ot(rat,[t:rat]natrt(t)):'type'
-nx0@ntofrt:=out(rat,[t:rat]natrt(t),x0,nx0):natt
-@[xt:natt][yt:natt]
-is:=is"e"(natt,xt,yt):'prop'
-nis:=not(is(xt,yt)):'prop'
-@[p:[x:natt]'prop']
-all:=all"l"(natt,p):'prop'
-some:=some"l"(natt,p):'prop'
-one:=one"e"(natt,p):'prop'
-xt@[st:set(natt)]
-in:=esti(natt,xt,st):'prop'
-xt@rtofnt:=in"e"(rat,[t:rat]natrt(t),xt):rat
-natrti:=inp(rat,[t:rat]natrt(t),xt):natrt(rtofnt(xt))
-ny0@[i:is"rt"(x0,y0)]
-isrtent:=isouti(rat,[t:rat]natrt(t),x0,nx0,y0,ny0,i):is(ntofrt(x0,nx0),ntofrt(y0,ny0))
-ny0@[i:is(ntofrt(x0,nx0),ntofrt(y0,ny0))]
-isrtint:=isoute(rat,[t:rat]natrt(t),x0,nx0,y0,ny0,i):is"rt"(x0,y0)
-yt@[i:is(xt,yt)]
-isntert:=isini(rat,[t:rat]natrt(t),xt,yt,i):is"rt"(rtofnt(xt),rtofnt(yt))
-yt@[i:is"rt"(rtofnt(xt),rtofnt(yt))]
-isntirt:=isine(rat,[t:rat]natrt(t),xt,yt,i):is(xt,yt)
-nx0@isrtnt1:=isinout(rat,[t:rat]natrt(t),x0,nx0):is"rt"(x0,rtofnt(ntofrt(x0,nx0)))
-xt@isntrt1:=isoutin(rat,[t:rat]natrt(t),xt):is(xt,ntofrt(rtofnt(xt),natrti(xt)))
-x@ntofn:=ntofrt(rtofn(x),natrti"rt"(x)):natt
-y@[i:is"n"(x,y)]
-isnent:=isrtent(rtofn(x),natrti"rt"(x),rtofn(y),natrti"rt"(y),isnert(x,y,i)):is(ntofn(x),ntofn(y))
-y@[i:is(ntofn(x),ntofn(y))]
-isnint:=isnirt(x,y,isrtint(rtofn"rt"(x),natrti"rt"(x),rtofn(y),natrti"rt"(y),i)):is"n"(x,y)
-xt@nofnt:=nofrt(rtofnt(xt),natrti(xt)):nat
-yt@[i:is(xt,yt)]
-isnten:=isrten(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),isntert(xt,yt,i)):is"n"(nofnt(xt),nofnt(yt))
-yt@[i:is"n"(nofnt(xt),nofnt(yt))]
-isntin:=isntirt(xt,yt,isrtin(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),i)):is(xt,yt)
-+ii5
-x@t24:=isrtnt1(rtofn(x),natrti"rt"(x)):is"rt"(rtofn(x),rtofnt(ntofn(x)))
-t25:=isrten(rtofn(x),natrti"rt"(x),rtofnt(ntofn(x)),natrti(ntofn(x)),t24):is"n"(nofrt(rtofn(x),natrti"rt"(x)),nofnt(ntofn(x)))
--ii5
-x@isnnt1:=tris(nat,x,nofrt(rtofn(x),natrti"rt"(x)),nofnt(ntofn(x)),isnrt1(x),t25".ii5"):is"n"(x,nofnt(ntofn(x)))
-+*ii5
-xt@t26:=isrtn1(rtofnt(xt),natrti(xt)):is"rt"(rtofnt(xt),rtofn(nofnt(xt)))
-t27:=isrtent(rtofnt(xt),natrti(xt),rtofn(nofnt(xt)),natrti"rt"(nofnt(xt)),t26):is(ntofrt(rtofnt(xt),natrti(xt)),ntofn(nofnt(xt)))
--ii5
-xt@isntn1:=tris(natt,xt,ntofrt(rtofnt(xt),natrti(xt)),ntofn(nofnt(xt)),isntrt1(xt),t27".ii5"):is(xt,ntofn(nofnt(xt)))
-x@isnnt2:=symis(nat,x,nofnt(ntofn(x)),isnnt1):is"n"(nofnt(ntofn(x)),x)
-xt@isntn2:=symis(natt,xt,ntofn(nofnt(xt)),isntn1):is(ntofn(nofnt(xt)),xt)
-@1t:=ntofn(1):natt
-suct:=[x:natt]ntofn(<nofnt(x)>suc):[x:natt]natt
-+5113
-xt@[i:is(<xt>suct,1t)]
-t1:=isnint(<nofnt(xt)>suc,1,i):is"n"(<nofnt(xt)>suc,1)
--5113
-xt@satz113a:=th3"l.imp"(is(<xt>suct,1t),is"n"(<nofnt(xt)>suc,1),<nofnt(xt)>ax3,[t:is(<xt>suct,1t)]t1".5113"(t)):nis(<xt>suct,1t)
-yt@[i:is(<xt>suct,<yt>suct)]
-+*5113
-i"nt"@t2:=isnint(<nofnt(xt)>suc,<nofnt(yt)>suc,i):is"n"(<nofnt(xt)>suc,<nofnt(yt)>suc)
--5113
-i@satz113b:=isntin(xt,yt,<t2".5113"><nofnt(yt)><nofnt(xt)>ax4):is(xt,yt)
-@[st:set(natt)]
-cond1:=in(1t,st):'prop'
-cond2:=all([x:natt]imp(in(x,st),in(<x>suct,st))):'prop'
-[c1:cond1][c2:cond2]
-+*5113
-c2@[x:nat]
-prop1:=in(ntofn(x),st):'prop'
-[p:prop1(x)]
-t3:=<ntofn(x)>c2:imp(in(ntofn(x),st),in(<ntofn(x)>suct,st))
-t4:=mp(in(ntofn(x),st),in(<ntofn(x)>suct,st),p,t3):in(<ntofn(x)>suct,st)
-t5:=isp(nat,[t:nat]in(ntofn(<t>suc),st),nofnt(ntofn(x)),x,t4,isnnt2(x)):prop1(<x>suc)
--5113
-c2@[xt:natt]
-+*5113
-xt@t6:=induction([t:nat]prop1(t),c1,[t:nat][u:prop1(t)]t5(t,u),nofnt(xt)):in(ntofn(nofnt(xt)),st)
--5113
-xt@satz113c:=isp(natt,[t:natt]in(t,st),ntofn(nofnt(xt)),xt,t6".5113",isntn2(xt)):in(xt,st)
-@ax3t:=[x:natt]satz113a(x):[x:natt]nis(<x>suct,1t)
-ax4t:=[x:natt][y:natt][u:is(<x>suct,<y>suct)]satz113b(x,y,u):[x:natt][y:natt][u:is(<x>suct,<y>suct)]is(x,y)
-ax5t:=[s:set(natt)][u:cond1(s)][v:cond2(s)][x:natt]satz113c(s,u,v,x):[s:set(natt)][u:cond1(s)][v:cond2(s)][x:natt]in(x,s)
-yt@[n:nis(xt,yt)]
-+51
-t1:=th3"l.imp"(is"n"(nofnt(xt),nofnt(yt)),is(xt,yt),n,[t:is"n"(nofnt(xt),nofnt(yt))]isntin(xt,yt,t)):nis"n"(nofnt(xt),nofnt(yt))
-t2:=satz1(nofnt(xt),nofnt(yt),t1):nis"n"(<nofnt(xt)>suc,<nofnt(yt)>suc)
--51
-satz1:=th3"l.imp"(is(<xt>suct,<yt>suct),is"n"(<nofnt(xt)>suc,<nofnt(yt)>suc),t2".51",[t:is(<xt>suct,<yt>suct)]isnint(<nofnt(xt)>suc,<nofnt(yt)>suc,t)):nis(<xt>suct,<yt>suct)
-+54
-xt@x:=nofnt(xt):nat
-[ft:[x:natt]natt]
-prop1t:=all([t:natt]is(<<t>suct>ft,<<t>ft>suct)):'prop'
-prop2t:=and(is(<1t>ft,<xt>suct),prop1t):'prop'
-xt@[f:[x:nat]nat]
-prop1:=all"n"([t:nat]is"n"(<<t>suc>f,<<t>f>suc)):'prop'
-prop2:=and(is"n"(<1>f,<x>suc),prop1):'prop'
-ft@g:=[t:nat]nofnt(<ntofn(t)>ft):[x:nat]nat
-[p:prop2t]
-t1:=ande1(is(<1t>ft,<xt>suct),prop1t,p):is(<1t>ft,<xt>suct)
-t2:=tris(nat,<1>g,nofnt(<xt>suct),<x>suc,isnten(<1t>ft,<xt>suct,t1),isnnt2(<x>suc)):is"n"(<1>g,<x>suc)
-t3:=ande2(is(<1t>ft,<xt>suct),prop1t,p):prop1t
-[u:nat]
-ut:=ntofn(u):natt
-t4:=isf(nat,nat,suc,u,nofnt(ut),isnnt1(u)):is"n"(<u>suc,<nofnt(ut)>suc)
-t5:=isf(nat,nat,g,<u>suc,<nofnt(ut)>suc,t4):is"n"(<<u>suc>g,nofnt(<<ut>suct>ft))
-t6:=<ut>t3:is(<<ut>suct>ft,<<ut>ft>suct)
-t7:=isnten(<<ut>suct>ft,<<ut>ft>suct,t6):is"n"(nofnt(<<ut>suct>ft),nofnt(<<ut>ft>suct))
-t8:=isnnt2(<<u>g>suc):is"n"(nofnt(<<ut>ft>suct),<<u>g>suc)
-t9:=tr3is(nat,<<u>suc>g,nofnt(<<ut>suct>ft),nofnt(<<ut>ft>suct),<<u>g>suc,t5,t7,t8):is"n"(<<u>suc>g,<<u>g>suc)
-p@t10:=[u:nat]t9(u):prop1(g)
-t11:=andi(is"n"(<1>g,<x>suc),prop1(g),t2,t10):prop2(g)
-xt@[a:[t:natt]natt][b:[t:natt]natt][pa:prop2t(a)][pb:prop2t(b)]
-t12:=onee1([t:nat]nat,[u:[t:nat]nat]prop2(u),satz4(x)):amone([t:nat]nat,[u:[t:nat]nat]prop2(u))
-t13:=<t11(b,pb)><t11(a,pa)><g(b)><g(a)>t12:is"e"([t:nat]nat,g(a),g(b))
-[yt:natt]
-y:=nofnt(yt):nat
-t14:=fise(nat,nat,g(a),g(b),t13,y):is"n"(nofnt(<ntofn(y)>a),nofnt(<ntofn(y)>b))
-t15:=isntin(<ntofn(y)>a,<ntofn(y)>b,t14):is(<ntofn(y)>a,<ntofn(y)>b)
-t16:=tr3is(natt,<yt>a,<ntofn(y)>a,<ntofn(y)>b,<yt>b,isf(natt,natt,a,yt,ntofn(y),isntn1(yt)),t15,isf(natt,natt,b,ntofn(y),yt,isntn2(yt))):is(<yt>a,<yt>b)
-pb@t17:=fisi(natt,natt,a,b,[t:natt]t16(t)):is"e"([t:natt]natt,a,b)
-xt@t18:=[u:[t:natt]natt][v:[t:natt]natt][w:prop2t(u)][z:prop2t(v)]t17(u,v,w,z):amone([t:natt]natt,[u:[t:natt]natt]prop2t(u))
-t19:=onee2([t:nat]nat,[u:[t:nat]nat]prop2(u),satz4(x)):some"l"([t:nat]nat,[u:[t:nat]nat]prop2(u))
-f@gt:=[t:natt]ntofn(<nofnt(t)>f):[x:natt]natt
-[p:prop2]
-t20:=ande1(is"n"(<1>f,<x>suc),prop1,p):is"n"(<1>f,<x>suc)
-t21:=isf(nat,nat,f,nofnt(1t),1,isnnt2(1)):is"n"(<nofnt(1t)>f,<1>f)
-t22:=isnent(<nofnt(1t)>f,<x>suc,tris(nat,<nofnt(1t)>f,<1>f,<x>suc,t21,t20)):is(<1t>gt,<xt>suct)
-t23:=ande2(is"n"(<1>f,<x>suc),prop1,p):prop1
-[zt:natt]
-z:=nofnt(zt):nat
-t24:=isf(nat,nat,f,nofnt(<zt>suct),<z>suc,isnnt2(<z>suc)):is"n"(<nofnt(<zt>suct)>f,<<z>suc>f)
-t25:=<z>t23:is"n"(<<z>suc>f,<<z>f>suc)
-t26:=isf(nat,nat,suc,<z>f,nofnt(<zt>gt),isnnt1(<z>f)):is"n"(<<z>f>suc,<nofnt(<zt>gt)>suc)
-t27:=isnent(<nofnt(<zt>suct)>f,<nofnt(<zt>gt)>suc,tr3is(nat,<nofnt(<zt>suct)>f,<<z>suc>f,<<z>f>suc,<nofnt(<zt>gt)>suc,t24,t25,t26)):is(<<zt>suct>gt,<<zt>gt>suct)
-p@t28:=[u:natt]t27(u):prop1t(gt)
-t29:=andi(is(<1t>gt,<xt>suct),prop1t(gt),t22,t28):prop2t(gt)
-t30:=somei([t:natt]natt,[u:[t:natt]natt]prop2t(u),gt,t29):some"l"([t:natt]natt,[u:[t:natt]natt]prop2t(u))
-xt@t31:=someapp([t:nat]nat,[u:[t:nat]nat]prop2(u),t19,some"l"([t:natt]natt,[u:[t:natt]natt]prop2t(u)),[u:[t:nat]nat][v:prop2(u)]t30(u,v)):some"l"([t:natt]natt,[u:[t:natt]natt]prop2t(u))
--54
-xt@satz4:=onei([t:natt]natt,[u:[t:natt]natt]prop2t".54"(u),t18".54",t31".54"):one"e"([t:natt]natt,[u:[t:natt]natt]and(is(<1t>u,<xt>suct),all([v:natt]is(<<v>suct>u,<<v>u>suct))))
-yt@pl:=ntofrt(pl"rt"(rtofnt(xt),rtofnt(yt)),satz112d(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt))):natt
-+*ii5
-yt@t28:=satz112c(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt)):inf(fr(pl"n"(nofnt(xt),nofnt(yt)),1),class(pl"rt"(rtofnt(xt),rtofnt(yt))))
-t29:=isi(pl"rt"(rtofnt(xt),rtofnt(yt)),rtofn(pl"n"(nofnt(xt),nofnt(yt))),fr(pl"n"(nofnt(xt),nofnt(yt)),1),fr(pl"n"(nofnt(xt),nofnt(yt)),1),t28,inclass(fr(pl"n"(nofnt(xt),nofnt(yt)),1)),refeq"n"(fr(pl"n"(nofnt(xt),nofnt(yt)),1))):is"rt"(pl"rt"(rtofnt(xt),rtofnt(yt)),rtofn(pl"n"(nofnt(xt),nofnt(yt))))
--ii5
-yt@isplnt:=isrtent(pl"rt"(rtofnt(xt),rtofnt(yt)),satz112d(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt)),rtofn(pl"n"(nofnt(xt),nofnt(yt))),natrti"rt"(pl"n"(nofnt(xt),nofnt(yt))),t29".ii5"):is(pl(xt,yt),ntofn(pl"n"(nofnt(xt),nofnt(yt))))
-isntpl:=symis(natt,pl(xt,yt),ntofn(pl"n"(nofnt(xt),nofnt(yt))),isplnt):is(ntofn(pl"n"(nofnt(xt),nofnt(yt))),pl(xt,yt))
-ispln:=tris(nat,pl"n"(nofnt(xt),nofnt(yt)),nofnt(ntofn(pl"n"(nofnt(xt),nofnt(yt)))),nofnt(pl(xt,yt)),isnnt1(pl"n"(nofnt(xt),nofnt(yt))),isnten(ntofn(pl"n"(nofnt(xt),nofnt(yt))),pl(xt,yt),isntpl)):is"n"(pl"n"(nofnt(xt),nofnt(yt)),nofnt(pl(xt,yt)))
-isnpl:=symis(nat,pl"n"(nofnt(xt),nofnt(yt)),nofnt(pl(xt,yt)),ispln):is"n"(nofnt(pl(xt,yt)),pl"n"(nofnt(xt),nofnt(yt)))
-[zt:natt]
-+55
-t1:=ispl1"n"(nofnt(pl(xt,yt)),pl"n"(nofnt(xt),nofnt(yt)),nofnt(zt),isnpl(xt,yt)):is"n"(pl"n"(nofnt(pl(xt,yt)),nofnt(zt)),pl"n"(pl"n"(nofnt(xt),nofnt(yt)),nofnt(zt)))
-t2:=ispl2"n"(pl"n"(nofnt(yt),nofnt(zt)),nofnt(pl(yt,zt)),nofnt(xt),ispln(yt,zt)):is"n"(pl"n"(nofnt(xt),pl"n"(nofnt(yt),nofnt(zt))),pl"n"(nofnt(xt),nofnt(pl(yt,zt))))
-t3:=tr3is(nat,pl"n"(nofnt(pl(xt,yt)),nofnt(zt)),pl"n"(pl"n"(nofnt(xt),nofnt(yt)),nofnt(zt)),pl"n"(nofnt(xt),pl"n"(nofnt(yt),nofnt(zt))),pl"n"(nofnt(xt),nofnt(pl(yt,zt))),t1,satz5(nofnt(xt),nofnt(yt),nofnt(zt)),t2):is"n"(pl"n"(nofnt(pl(xt,yt)),nofnt(zt)),pl"n"(nofnt(xt),nofnt(pl(yt,zt))))
--55
-satz5:=tr3is(natt,pl(pl(xt,yt),zt),ntofn(pl"n"(nofnt(pl(xt,yt)),nofnt(zt))),ntofn(pl"n"(nofnt(xt),nofnt(pl(yt,zt)))),pl(xt,pl(yt,zt)),isplnt(pl(xt,yt),zt),isnent(pl"n"(nofnt(pl(xt,yt)),nofnt(zt)),pl"n"(nofnt(xt),nofnt(pl(yt,zt))),t3".55"),isntpl(xt,pl(yt,zt))):is(pl(pl(xt,yt),zt),pl(xt,pl(yt,zt)))
-diffprop:=is(xt,pl(yt,zt)):'prop'
-[d:diffprop]
-diffprope:=tris(nat,nofnt(xt),nofnt(pl(yt,zt)),pl"n"(nofnt(yt),nofnt(zt)),isnten(xt,pl(yt,zt),d),isnpl(yt,zt)):diffprop"n"(nofnt(xt),nofnt(yt),nofnt(zt))
-zt@[d:diffprop"n"(nofnt(xt),nofnt(yt),nofnt(zt))]
-+*ii5
-d@t30:=tris(nat,nofnt(xt),pl"n"(nofnt(yt),nofnt(zt)),nofnt(pl(yt,zt)),d,ispln(yt,zt)):is"n"(nofnt(xt),nofnt(pl(yt,zt)))
--ii5
-d@diffpropi:=isntin(xt,pl(yt,zt),t30".ii5"):diffprop
-+59
-yt@it:=is(xt,yt):'prop'
-iit:=some([u:natt]diffprop(xt,yt,u)):'prop'
-iiit:=some([u:natt]diffprop(yt,xt,u)):'prop'
-i:=is"n"(nofnt(xt),nofnt(yt)):'prop'
-ii:=some"n"([u:nat]diffprop"n"(nofnt(xt),nofnt(yt),u)):'prop'
-iii:=some"n"([u:nat]diffprop"n"(nofnt(yt),nofnt(xt),u)):'prop'
-[one:i]
-t1:=or3i1(it,iit,iiit,isntin(xt,yt,one)):or3(it,iit,iiit)
-yt@[two:ii][v:nat][d:diffprop"n"(nofnt(xt),nofnt(yt),v)]
-t2:=isp(nat,[u:nat]diffprop"n"(nofnt(xt),nofnt(yt),u),v,nofnt(ntofn(v)),d,isnnt1(v)):diffprop"n"(nofnt(xt),nofnt(yt),nofnt(ntofn(v)))
-t3:=somei(natt,[u:natt]diffprop(xt,yt,u),ntofn(v),diffpropi(xt,yt,ntofn(v),t2)):iit
-two@t4:=someapp(nat,[u:nat]diffprop"n"(nofnt(xt),nofnt(yt),u),two,iit,[u:nat][v:diffprop"n"(nofnt(xt),nofnt(yt),u)]t3(u,v)):iit
-t5:=or3i2(it,iit,iiit,t4):or3(it,iit,iiit)
-yt@[three:iii]
-t6:=or3i3(it,iit,iiit,t4(yt,xt,three)):or3(it,iit,iiit)
-yt@t7:=or3app(i,ii,iii,or3(it,iit,iiit),satz9a(nofnt(xt),nofnt(yt)),[u:i]t1(u),[u:ii]t5(u),[u:iii]t6(u)):or3(it,iit,iiit)
-[onet:it]
-t8:=isnten(xt,yt,onet):i
-yt@[twot:iit][vt:natt][d:diffprop(xt,yt,vt)]
-t9:=somei(nat,[u:nat]diffprop"n"(nofnt(xt),nofnt(yt),u),nofnt(vt),diffprope(xt,yt,vt,d)):ii
-twot@t10:=someapp(natt,[u:natt]diffprop(xt,yt,u),twot,ii,[u:natt][v:diffprop(xt,yt,u)]t9(u,v)):ii
-yt@[threet:iiit]
-t11:=t10(yt,xt,threet):iii
-yt@t12:=satz9b(nofnt(xt),nofnt(yt)):ec3(i,ii,iii)
-onet@t13:=ec3e12(i,ii,iii,t12,t8):not(ii)
-t14:=th3"l.imp"(iit,ii,t13,[x:iit]t10(x)):not(iit)
-yt@t15:=th1"l.ec"(it,iit,[x:it]t14(x)):ec(it,iit)
-twot@t16:=ec3e23(i,ii,iii,t12,t10):not(iii)
-t17:=th3"l.imp"(iiit,iii,t16,[x:iiit]t11(x)):not(iiit)
-yt@t18:=th1"l.ec"(iit,iiit,[x:iit]t17(x)):ec(iit,iiit)
-threet@t19:=ec3e31(i,ii,iii,t12,t11):not(i)
-t20:=th3"l.imp"(it,i,t19,[x:it]t8(x)):not(it)
-yt@t21:=th1"l.ec"(iiit,it,[x:iiit]t20(x)):ec(iiit,it)
-t22:=th6"l.ec3"(it,iit,iiit,t15,t18,t21):ec3(it,iit,iiit)
--59
-yt@satz9:=orec3i(it".59",iit".59",iiit".59",t7".59",t22".59"):orec3(is(xt,yt),some([u:natt]is(xt,pl(yt,u))),some([u:natt]is(yt,pl(xt,u))))
-more:=more"rt"(rtofnt(xt),rtofnt(yt)):'prop'
-[m:more(xt,yt)]
-+*ii5
-m@t31:=moree(rtofnt(xt),rtofnt(yt),fr(nofnt(xt),1),fr(nofnt(yt),1),inclassn(rtofnt(xt),natrti(xt)),inclassn(rtofnt(yt),natrti(yt)),m):moref(fr(nofnt(xt),1),fr(nofnt(yt),1))
--ii5
-m@moree:=satz111a(nofnt(xt),nofnt(yt),t31".ii5"):more"n"(nofnt(xt),nofnt(yt))
-yt@[m:more"n"(nofnt(xt),nofnt(yt))]
-+*ii5
-m@t32:=satz111d(nofnt(xt),nofnt(yt),m):moref(fr(nofnt(xt),1),fr(nofnt(yt),1))
--ii5
-m@morei:=morei"rt"(rtofnt(xt),rtofnt(yt),fr(nofnt(xt),1),fr(nofnt(yt),1),inclassn(rtofnt(xt),natrti(xt)),inclassn(rtofnt(yt),natrti(yt)),t32".ii5"):more(xt,yt)
-yt@less:=less"rt"(rtofnt(xt),rtofnt(yt)):'prop'
-[l:less(xt,yt)]
-+*ii5
-l@t33:=lesse(rtofnt(xt),rtofnt(yt),fr(nofnt(xt),1),fr(nofnt(yt),1),inclassn(rtofnt(xt),natrti(xt)),inclassn(rtofnt(yt),natrti(yt)),l):lessf(fr(nofnt(xt),1),fr(nofnt(yt),1))
--ii5
-l@lesse:=satz111c(nofnt(xt),nofnt(yt),t33".ii5"):less"n"(nofnt(xt),nofnt(yt))
-yt@[l:less"n"(nofnt(xt),nofnt(yt))]
-+*ii5
-l@t34:=satz111f(nofnt(xt),nofnt(yt),l):lessf(fr(nofnt(xt),1),fr(nofnt(yt),1))
--ii5
-l@lessi:=lessi"rt"(rtofnt(xt),rtofnt(yt),fr(nofnt(xt),1),fr(nofnt(yt),1),inclassn(rtofnt(xt),natrti(xt)),inclassn(rtofnt(yt),natrti(yt)),t34".ii5"):less(xt,yt)
-yt@moreis:=moreis"rt"(rtofnt(xt),rtofnt(yt)):'prop'
-[m:moreis(xt,yt)]
-moreise:=th9"l.or"(more"rt"(rtofnt(xt),rtofnt(yt)),is"rt"(rtofnt(xt),rtofnt(yt)),more"n"(nofnt(xt),nofnt(yt)),is"n"(nofnt(xt),nofnt(yt)),m,[u:more"rt"(rtofnt(xt),rtofnt(yt))]moree(xt,yt,u),[u:is"rt"(rtofnt(xt),rtofnt(yt))]isrten(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),u)):moreis"n"(nofnt(xt),nofnt(yt))
-yt@[m:moreis"n"(nofnt(xt),nofnt(yt))]
-moreisi:=th9"l.or"(more"n"(nofnt(xt),nofnt(yt)),is"n"(nofnt(xt),nofnt(yt)),more"rt"(rtofnt(xt),rtofnt(yt)),is"rt"(rtofnt(xt),rtofnt(yt)),m,[u:more"n"(nofnt(xt),nofnt(yt))]morei(xt,yt,u),[u:is"n"(nofnt(xt),nofnt(yt))]isrtin(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),u)):moreis(xt,yt)
-yt@lessis:=lessis"rt"(rtofnt(xt),rtofnt(yt)):'prop'
-[l:lessis(xt,yt)]
-lessise:=th9"l.or"(less"rt"(rtofnt(xt),rtofnt(yt)),is"rt"(rtofnt(xt),rtofnt(yt)),less"n"(nofnt(xt),nofnt(yt)),is"n"(nofnt(xt),nofnt(yt)),l,[u:less"rt"(rtofnt(xt),rtofnt(yt))]lesse(xt,yt,u),[u:is"rt"(rtofnt(xt),rtofnt(yt))]isrten(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),u)):lessis"n"(nofnt(xt),nofnt(yt))
-yt@[l:lessis"n"(nofnt(xt),nofnt(yt))]
-lessisi:=th9"l.or"(less"n"(nofnt(xt),nofnt(yt)),is"n"(nofnt(xt),nofnt(yt)),less"rt"(rtofnt(xt),rtofnt(yt)),is"rt"(rtofnt(xt),rtofnt(yt)),l,[u:less"n"(nofnt(xt),nofnt(yt))]lessi(xt,yt,u),[u:is"n"(nofnt(xt),nofnt(yt))]isrtin(rtofnt(xt),natrti(xt),rtofnt(yt),natrti(yt),u)):lessis(xt,yt)
-zt@[l:less(xt,yt)][k:less(yt,zt)]
-+515
-t1:=satz15(nofnt(xt),nofnt(yt),nofnt(zt),lesse(xt,yt,l),lesse(yt,zt,k)):less"n"(nofnt(xt),nofnt(zt))
--515
-satz15:=lessi(xt,zt,t1".515"):less(xt,zt)
-zt@[ut:natt][m:more(xt,yt)][n:more(zt,ut)]
-+521
-t1:=satz21(nofnt(xt),nofnt(yt),nofnt(zt),nofnt(ut),moree(xt,yt,m),moree(zt,ut,n)):more"n"(pl"n"(nofnt(xt),nofnt(zt)),pl"n"(nofnt(yt),nofnt(ut)))
-t2:=ismore12"n"(pl"n"(nofnt(xt),nofnt(zt)),nofnt(pl(xt,zt)),pl"n"(nofnt(yt),nofnt(ut)),nofnt(pl(yt,ut)),ispln(xt,zt),ispln(yt,ut),t1):more"n"(nofnt(pl(xt,zt)),nofnt(pl(yt,ut)))
--521
-satz21:=morei(pl(xt,zt),pl(yt,ut),t2".521"):more(pl(xt,zt),pl(yt,ut))
-@[p:[x:natt]'prop'][n:natt]
-lb:=all([x:natt]imp(<x>p,lessis(n,x))):'prop'
-min:=and(lb,<n>p):'prop'
-p@[s:some(p)]
-+527
-q:=[x:nat]<ntofn(x)>p:[x:nat]'prop'
-[n:natt][np:<n>p]
-t1:=isp(natt,p,n,ntofn(nofnt(n)),np,isntn1(n)):<nofnt(n)>q
-t2:=somei(nat,q,nofnt(n),t1):some"n"(q)
-s@t3:=someapp(natt,p,s,some"n"(q),[u:natt][v:<u>p]t2(u,v)):some"n"(q)
-t4:=satz27(q,t3):some"n"([x:nat]min"n"(q,x))
-[m:nat][mqm:min"n"(q,m)]
-t5:=ande1(lb"n"(q,m),<m>q,mqm):lb"n"(q,m)
-[n:nat][nq:<n>q]
-t6:=mp(<n>q,lessis"n"(m,n),nq,<n>t5):lessis"n"(m,n)
-mqm@[n:natt][np:<n>p]
-t7:=t6(nofnt(n),t1(n,np)):lessis"n"(m,nofnt(n))
-t8:=islessis1"n"(m,nofnt(ntofn(m)),nofnt(n),isnnt1(m),t7):lessis"n"(nofnt(ntofn(m)),nofnt(n))
-t9:=lessisi(ntofn(m),n,t8):lessis(ntofn(m),n)
-n@t10:=[u:<n>p]t9(u):imp(<n>p,lessis(ntofn(m),n))
-mqm@t11:=[x:natt]t10(x):lb(ntofn(m))
-t12:=ande2(lb"n"(q,m),<m>q,mqm):<ntofn(m)>p
-t13:=andi(lb(ntofn(m)),<ntofn(m)>p,t11,t12):min(ntofn(m))
-t14:=somei(natt,[x:natt]min(x),ntofn(m),t13):some([x:natt]min(x))
--527
-satz27:=someapp(nat,[x:nat]min"n"(q".527",x),t4".527",some([x:natt]min(x)),[x:nat][y:min"n"(q".527",x)]t14".527"(x,y)):some([x:natt]min(p,x))
--nt
-@1rt:=rtofn(1):rat
-x0@[x:frac][xix0:inf(x,class(x0))]
-+*ii5
-xix0@t35:=tr3eq(tf(x,fr(1,1)),fr(ts"n"(num(x),1),ts"n"(den(x),1)),fr(num(x),den(x)),x,tfeq1a(x,1,1),eqnd(ts"n"(num(x),1),ts"n"(den(x),1),num(x),den(x),satz28a(num(x)),satz28a(den(x))),refeq1(fr(num(x),den(x)),x,fris(x))):eq"n"(tf(x,fr(1,1)),x)
-t36:=isi(ts(x0,1rt),x0,tf(x,fr(1,1)),x,tict(x0,1rt,x,fr(1,1),xix0,inclass(fr(1,1))),xix0,t35):is(ts(x0,1rt),x0)
--ii5
-x0@example1a:=ratapp1(x0,is(ts(x0,1rt),x0),[x:frac][xi:inf(x,class(x0))]t36".ii5"(x,xi)):is(ts(x0,1rt),x0)
-example1b:=symis(rat,ts(x0,1rt),x0,example1a):is(x0,ts(x0,1rt))
-example1c:=tris(rat,ts(1rt,x0),ts(x0,1rt),x0,comts(1rt,x0),example1a):is(ts(1rt,x0),x0)
-example1d:=symis(rat,ts(1rt,x0),x0,example1c):is(x0,ts(1rt,x0))
-@[x:frac]
-+5114
-t1:=tr3eq(tf(fr(den(x),1),x),fr(ts"n"(den(x),num(x)),ts"n"(1,den(x))),fr(ts"n"(num(x),den(x)),ts"n"(1,den(x))),fr(num(x),1),tfeq2a(x,den(x),1),eqn(ts"n"(den(x),num(x)),ts"n"(1,den(x)),ts"n"(num(x),den(x)),comts"n"(den(x),num(x))),satz40c(num(x),1,den(x))):eq"n"(tf(fr(den(x),1),x),fr(num(x),1))
--5114
-satz114:=isi(ts(rtofn(den(x)),ratof(x)),rtofn(num(x)),tf(fr(den(x),1),x),fr(num(x),1),tict(rtofn(den(x)),ratof(x),fr(den(x),1),x,inclass(fr(den(x),1)),inclass(x)),inclass(fr(num(x),1)),t1".5114"):is(ts(rtofn(den(x)),ratof(x)),rtofn(num(x)))
-@[x1:nat][x2:nat]
-satz114a:=tr3is(rat,ts(rtofn(x2),ratof(fr(x1,x2))),ts(rtofn(den(fr(x1,x2))),ratof(fr(x1,x2))),rtofn(num(fr(x1,x2))),rtofn(x1),ists1(rtofn(x2),rtofn(den(fr(x1,x2))),ratof(fr(x1,x2)),isnert(x2,den(fr(x1,x2)),isden(x1,x2))),satz114(fr(x1,x2)),isnert(num(fr(x1,x2)),x1,numis(x1,x2))):is(ts(rtofn(x2),ratof(fr(x1,x2))),rtofn(x1))
-x0@[y0:rat]
-ov:=ind(rat,[t:rat]is(ts(y0,t),x0),satz110(x0,y0)):rat
-satz110c:=oneax(rat,[t:rat]is(ts(y0,t),x0),satz110(x0,y0)):is(ts(y0,ov(x0,y0)),x0)
-satz110d:=symis(rat,ts(y0,ov(x0,y0)),x0,satz110c):is(x0,ts(y0,ov(x0,y0)))
-satz110e:=tris(rat,ts(ov(x0,y0),y0),ts(y0,ov(x0,y0)),x0,comts(ov(x0,y0),y0),satz110c):is(ts(ov(x0,y0),y0),x0)
-satz110f:=symis(rat,ts(ov(x0,y0),y0),x0,satz110e):is(x0,ts(ov(x0,y0),y0))
-[v0:rat][i:is(ts(y0,v0),x0)]
-satz110g:=satz110b(x0,y0,v0,ov(x0,y0),i,satz110c):is(v0,ov(x0,y0))
-x2@satz114b:=satz110b(rtofn(x1),rtofn(x2),ratof(fr(x1,x2)),ov(rtofn(x1),rtofn(x2)),satz114a,satz110c(rtofn(x1),rtofn(x2))):is(ratof(fr(x1,x2)),ov(rtofn(x1),rtofn(x2)))
-satz114c:=symis(rat,ratof(fr(x1,x2)),ov(rtofn(x1),rtofn(x2)),satz114b):is(ov(rtofn(x1),rtofn(x2)),ratof(fr(x1,x2)))
-+5115
-y0@t1:=satz89(ov(y0,x0)):some([t:rat]more(t,ov(y0,x0)))
-[u0:rat][m:more(u0,ov(y0,x0))][u:frac][uiu0:inf(u,class(u0))]
-z:=num(u):nat
-v:=den(u):nat
-t2:=ismore1(u0,ov(rtofn(z),rtofn(v)),ov(y0,x0),tris(rat,u0,ratof(fr(z,v)),ov(rtofn(z),rtofn(v)),isi(u0,ratof(fr(z,v)),u,fr(z,v),uiu0,inclass(fr(z,v)),refeq1(u,fr(z,v),isfr(u))),satz114b(z,v)),m):more(ov(rtofn(z),rtofn(v)),ov(y0,x0))
-t3:=moreisi(rtofn(v),1rt,fr(v,1),fr(1,1),inclass(fr(v,1)),inclass(fr(1,1)),th9"l.or"(more"n"(v,1),is"n"(v,1),moref(fr(v,1),fr(1,1)),eq"n"(fr(v,1),fr(1,1)),satz24(v),[t:more"n"(v,1)]satz111d(v,1,t),[t:is"n"(v,1)]satz111e(v,1,t))):moreis(rtofn(v),1rt)
-t4:=tr3is(rat,ts(rtofn(z),x0),ts(x0,rtofn(z)),ts(x0,ts(ov(rtofn(z),rtofn(v)),rtofn(v))),ts(ts(x0,ov(rtofn(z),rtofn(v))),rtofn(v)),comts(rtofn(z),x0),ists2(rtofn(z),ts(ov(rtofn(z),rtofn(v)),rtofn(v)),x0,satz110f(rtofn(z),rtofn(v))),assts2(x0,ov(rtofn(z),rtofn(v)),rtofn(v))):is(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),rtofn(v)))
-[n:more(rtofn(v),1rt)]
-t5:=ismore1(ts(ts(x0,ov(rtofn(z),rtofn(v))),rtofn(v)),ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),symis(rat,ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),rtofn(v)),t4),satz105d(rtofn(v),1rt,ts(x0,ov(rtofn(z),rtofn(v))),n)):more(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt))
-t6:=moreisi1(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),t5):moreis(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt))
-uiu0@[i:is(rtofn(v),1rt)]
-t7:=moreisi2(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),tris(rat,ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),rtofn(v)),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),t4,ists2(rtofn(v),1rt,ts(x0,ov(rtofn(z),rtofn(v))),i))):moreis(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt))
-uiu0@t8:=orapp(more(rtofn(v),1rt),is(rtofn(v),1rt),moreis(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt)),t3,[t:more(rtofn(v),1rt)]t6(t),[t:is(rtofn(v),1rt)]t7(t)):moreis(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt))
-t9:=ismore12(ts(x0,ov(rtofn(z),rtofn(v))),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),ts(x0,ov(y0,x0)),y0,example1b(ts(x0,ov(rtofn(z),rtofn(v)))),satz110c(y0,x0),satz105d(ov(rtofn(z),rtofn(v)),ov(y0,x0),x0,t2)):more(ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),y0)
-t10:=satz87c(ts(rtofn(z),x0),ts(ts(x0,ov(rtofn(z),rtofn(v))),1rt),y0,t8,t9):more(ts(rtofn(z),x0),y0)
-t11:=somei(nat,[t:nat]more(ts(rtofn(t),x0),y0),z,t10):some"n"([t:nat]more(ts(rtofn(t),x0),y0))
-m@t12:=ratapp1(u0,some"n"([t:nat]more(ts(rtofn(t),x0),y0)),[u:frac][ui:inf(u,class(u0))]t11(u,ui)):some"n"([t:nat]more(ts(rtofn(t),x0),y0))
--5115
-y0@satz115:=someapp(rat,[t:rat]more(t,ov(y0,x0)),t1".5115",some"n"([t:nat]more(ts(rtofn(t),x0),y0)),[t:rat][u:more(t,ov(y0,x0))]t12".5115"(t,u)):some"n"([t:nat]more(ts(rtofn(t),x0),y0))
-+*5115
-uiu0@t13:=andi(natrt(rtofn(z)),more(ts(rtofn(z),x0),y0),natrti(z),t10):and(natrt(rtofn(z)),more(ts(rtofn(z),x0),y0))
-t14:=somei(rat,[t:rat]and(natrt(t),more(ts(t,x0),y0)),rtofn(z),t13):some([t:rat]and(natrt(t),more(ts(t,x0),y0)))
-m@t15:=ratapp1(u0,some([t:rat]and(natrt(t),more(ts(t,x0),y0))),[u:frac][ui:inf(u,class(u0))]t14(u,ui)):some([t:rat]and(natrt(t),more(ts(t,x0),y0)))
--5115
-y0@satz115a:=someapp(rat,[t:rat]more(t,ov(y0,x0)),t1".5115",some([t:rat]and(natrt(t),more(ts(t,x0),y0))),[t:rat][u:more(t,ov(y0,x0))]t15".5115"(t,u)):some([t:rat]and(natrt(t),more(ts(t,x0),y0)))
-@[s:set(rat)]
-cutprop1a:=nonempty(rat,s):'prop'
-cutprop1b:=not(all([x:rat]in(x,s))):'prop'
-cutprop1:=and(cutprop1a,cutprop1b):'prop'
-[x0:rat]
-cutprop2a:=all([x:rat]imp(not(in(x,s)),less(x0,x))):'prop'
-s@cutprop2:=all([x:rat]imp(in(x,s),cutprop2a(x))):'prop'
-x0@[y0:rat]
-+iii1
-ubprop:=imp(in(y0,s),moreis(x0,y0)):'prop'
--iii1
-x0@ub:=all([x:rat]ubprop".iii1"(x0,x)):'prop'
-max:=and(ub(x0),in(x0,s)):'prop'
-s@cutprop3:=not(some([x:rat]max(s,x))):'prop'
-cutprop:=and3(cutprop1,cutprop2,cutprop3):'prop'
-+*iii1
-y0@lbprop:=imp(in(y0,s),lessis(x0,y0)):'prop'
--iii1
-x0@lb:=all([x:rat]lbprop".iii1"(x0,x)):'prop'
-min:=and(lb(x0),in(x0,s)):'prop'
-@cut:=ot(set(rat),[x:set(rat)]cutprop(x)):'type'
-[ksi:cut]
-lcl:=in"e"(set(rat),[x:set(rat)]cutprop(x),ksi):set(rat)
-[x0:rat]
-lrt:=in(x0,lcl(ksi)):'prop'
-urt:=not(in(x0,lcl(ksi))):'prop'
-ksi@clcl:=inp(set(rat),[x:set(rat)]cutprop(x),ksi):cutprop(lcl(ksi))
-clcl1:=and3e1(cutprop1(lcl),cutprop2(lcl),cutprop3(lcl),clcl):cutprop1(lcl(ksi))
-clcl2:=and3e2(cutprop1(lcl),cutprop2(lcl),cutprop3(lcl),clcl):cutprop2(lcl(ksi))
-clcl3:=and3e3(cutprop1(lcl),cutprop2(lcl),cutprop3(lcl),clcl):cutprop3(lcl(ksi))
-clcl1a:=ande1(cutprop1a(lcl),cutprop1b(lcl),clcl1):cutprop1a(lcl(ksi))
-clcl1b:=ande2(cutprop1a(lcl),cutprop1b(lcl),clcl1):cutprop1b(lcl(ksi))
-[p:'prop'][p1:[x:rat][t:lrt(ksi,x)]p]
-cutapp1a:=nonemptyapp(rat,lcl,clcl1a,p,p1):p
-+*iii1
-ksi@t1:=th1"l.some"(rat,[x:rat]lrt(ksi,x),clcl1b):some([x:rat]urt(ksi,x))
--iii1
-p@[p1:[x:rat][t:urt(ksi,x)]p]
-cutapp1b:=someapp(rat,[x:rat]urt(ksi,x),t1".iii1",p,p1):p
-ksi@[x0:rat][lx:lrt(ksi,x0)]
-+*iii1
-lx@t2:=mp(lrt(ksi,x0),cutprop2a(lcl,x0),lx,<x0>clcl2):cutprop2a(lcl,x0)
--iii1
-lx@[y0:rat][uy:urt(ksi,y0)]
-cutapp2a:=mp(urt(ksi,y0),less(x0,y0),uy,<y0>t2".iii1"):less(x0,y0)
-cutapp2b:=satz83(x0,y0,cutapp2a):more(y0,x0)
-+*iii1
-lx@t3:=th4"l.some"(rat,[x:rat]max(lcl,x),clcl3,x0):not(max(lcl,x0))
-t4:=th4"l.and"(ub(lcl,x0),lrt(ksi,x0),t3,lx):not(ub(lcl,x0))
-t5:=th1"l.some"(rat,[x:rat]ubprop(lcl,x0,x),t4):some([x:rat]not(ubprop(lcl,x0,x)))
--iii1
-lx@[p:'prop'][p1:[y:rat][t:lrt(ksi,y)][u:less(x0,y)]p][y0:rat][n:not(ubprop".iii1"(lcl,x0,y0))]
-+*iii1
-n@t6:=th5"l.imp"(lrt(ksi,y0),moreis(x0,y0),n):lrt(ksi,y0)
-t7:=th6"l.imp"(lrt(ksi,y0),moreis(x0,y0),n):not(moreis(x0,y0))
-t8:=satz81j(x0,y0,t7):less(x0,y0)
-t9:=<t8><t6><y0>p1:p
--iii1
-p1@cutapp3:=someapp(rat,[y:rat]not(ubprop".iii1"(lcl,x0,y)),t5".iii1",p,[y:rat][t:not(ubprop".iii1"(lcl,x0,y))]t9".iii1"(y,t)):p
-s@[x0:rat][i:in(x0,s)][y0:rat][n:not(in(y0,s))]
-+*iii1
-n@t10:=andi(cutprop1a,cutprop1b,nonemptyi(rat,s,x0,i),th1"l.all"(rat,[x:rat]in(x,s),y0,n)):cutprop1
--iii1
-s@[n:[x:rat]not(max(s,x))]
-+*iii1
-n@t11:=th5"l.some"(rat,[x:rat]max(s,x),n):cutprop3
--iii1
-s@[x0:rat][i:in(x0,s)][y0:rat][n:not(in(y0,s))][l:[x:rat][t:in(x,s)][y:rat][u:not(in(y,s))]less(x,y)][m:[x:rat]not(max(s,x))]
-cut1:=and3i(cutprop1,cutprop2,cutprop3,t10".iii1"(x0,i,y0,n),l,t11".iii1"(m)):cutprop(s)
-+rp
-ksi@[eta:cut]
-is:=is"e"(cut,ksi,eta):'prop'
-nis:=not(is(ksi,eta)):'prop'
-[i:is(ksi,eta)]
-ise:=isini(set(rat),[x:set(rat)]cutprop(x),ksi,eta,i):is"e"(set(rat),lcl(ksi),lcl(eta))
-[x0:rat][lx:lrt(ksi,x0)]
-ise1:=issete1(rat,lcl(ksi),lcl(eta),ise,x0,lx):lrt(eta,x0)
-eta@[i:is"e"(set(rat),lcl(ksi),lcl(eta))]
-isi:=isine(set(rat),[x:set(rat)]cutprop(x),ksi,eta,i):is(ksi,eta)
-eta@[l:[x:rat][t:lrt(ksi,x)]lrt(eta,x)][k:[x:rat][t:lrt(eta,x)]lrt(ksi,x)]
-isi1:=isi(isseti(rat,lcl(ksi),lcl(eta),l,k)):is(ksi,eta)
-@[s:set(rat)][cs:cutprop(s)]
-cutof:=out(set(rat),[x:set(rat)]cutprop(x),s,cs):cut
-[x0:rat][i:in(x0,s)]
-ine:=issete1(rat,s,lcl(cutof(s,cs)),isinout(set(rat),[x:set(rat)]cutprop(x),s,cs),x0,i):lrt(cutof(s,cs),x0)
-x0@[lx:lrt(cutof(s,cs),x0)]
-ini:=issete2(rat,s,lcl(cutof(s,cs)),isinout(set(rat),[x:set(rat)]cutprop(x),s,cs),x0,lx):in(x0,s)
-s@[t:set(rat)][cs:cutprop(s)][ct:cutprop(t)][i:[x:rat][u:in(x,s)]in(x,t)][j:[x:rat][u:in(x,t)]in(x,s)]
-isi2:=isouti(set(rat),[x:set(rat)]cutprop(x),s,cs,t,ct,isseti(rat,s,t,i,j)):is(cutof(s,cs),cutof(t,ct))
-@[p:[x:cut]'prop']
-all:=all"l"(cut,p):'prop'
-some:=some"l"(cut,p):'prop'
-one:=one"e"(cut,p):'prop'
-ksi@satz116:=refis(cut,ksi):is(ksi,ksi)
-eta@[i:is(ksi,eta)]
-satz117:=symis(cut,ksi,eta,i):is(eta,ksi)
-eta@[zeta:cut][i:is(ksi,eta)][j:is(eta,zeta)]
-satz118:=tris(cut,ksi,eta,zeta,i,j):is(ksi,zeta)
-+1119
-@[x0:rat][y0:rat][m:more(x0,y0)]
-t1:=ec3e23(is"rt"(x0,y0),more(x0,y0),less(x0,y0),satz81b(x0,y0),m):not(less(x0,y0))
--1119
-ksi@[x0:rat][ux:urt(ksi,x0)][y0:rat][m:more(y0,x0)]
-satz119:=th3"l.imp"(lrt(ksi,y0),less(y0,x0),t1".1119"(y0,x0,m),[t:lrt(ksi,y0)]cutapp2a(y0,t,x0,ux)):urt(ksi,y0)
-y0@[l:less(x0,y0)]
-satz119a:=satz119(satz83(x0,y0,l)):urt(ksi,y0)
-+1120
-@[x0:rat][y0:rat][l:less(x0,y0)]
-t1:=ec3e32(is"rt"(x0,y0),more(x0,y0),less(x0,y0),satz81b(x0,y0),l):not(more(x0,y0))
--1120
-ksi@[x0:rat][lx:lrt(ksi,x0)][y0:rat][l:less(y0,x0)]
-satz120:=th7"l.imp"(lrt(ksi,y0),more(y0,x0),t1".1120"(y0,x0,l),[t:urt(ksi,y0)]cutapp2b(x0,lx,y0,t)):lrt(ksi,y0)
-y0@[m:more(x0,y0)]
-satz120a:=satz120(satz82(x0,y0,m)):lrt(ksi,y0)
--rp
-s@[i:[x:rat][t:in(x,s)][y:rat][u:less(y,x)]in(y,s)][x0:rat][j:in(x0,s)][y0:rat][n:not(in(y0,s))]
-+*iii1
-n@t12:=<y0><j><x0>i:[u:less(y0,x0)]in(y0,s)
-t13:=th3"l.imp"(less(y0,x0),in(y0,s),n,t12):not(less(y0,x0))
-t14:=satz81f(y0,x0,t13):moreis(y0,x0)
--iii1
-n@[k:is(y0,x0)]
-+*iii1
-k@t15:=isp1(rat,[x:rat]in(x,s),x0,y0,j,k):in(y0,s)
-n@t16:=th3"l.imp"(is(y0,x0),in(y0,s),n,[t:is(y0,x0)]t15(t)):nis(y0,x0)
-t17:=ore1(more(y0,x0),is(y0,x0),t14,t16):more(y0,x0)
-t18:=satz82(y0,x0,t17):less(x0,y0)
-i@t19:=[x:rat][t:in(x,s)][y:rat][u:not(in(y,s))]t18(x,t,y,u):cutprop2
--iii1
-s@[s1:[x:rat][t:in(x,s)]some([y:rat]and(in(y,s),more(y,x)))][x0:rat][i:in(x0,s)]
-+*iii1
-i@t20:=<i><x0>s1:some([y:rat]and(in(y,s),more(y,x0)))
--iii1
-i@[y0:rat][a:and(in(y0,s),more(y0,x0))]
-+*iii1
-a@t21:=ande1(in(y0,s),more(y0,x0),a):in(y0,s)
-t22:=ande2(in(y0,s),more(y0,x0),a):more(y0,x0)
-t23:=satz81g(y0,x0,t22):not(lessis(y0,x0))
-t24:=th3"l.imp"(moreis(x0,y0),lessis(y0,x0),t23,[t:moreis(x0,y0)]satz84(x0,y0,t)):not(moreis(x0,y0))
-t25:=th4"l.imp"(in(y0,s),moreis(x0,y0),t21,t24):not(ubprop(x0,y0))
-t26:=th1"l.all"(rat,[y:rat]ubprop(x0,y),y0,t25):not(ub(s,x0))
-t27:=th1"l.and"(ub(s,x0),in(x0,s),t26):not(max(s,x0))
-i@t28:=someapp(rat,[y:rat]and(in(y,s),more(y,x0)),t20,not(max(s,x0)),[y:rat][t:and(in(y,s),more(y,x0))]t27(y,t)):not(max(s,x0))
--iii1
-x0@[n:not(in(x0,s))]
-+*iii1
-n@t29:=th2"l.and"(ub(x0),in(x0,s),n):not(max(s,x0))
-x0@t30:=th1"l.imp"(in(x0,s),not(max(s,x0)),[u:in(x0,s)]t28(u),[u:not(in(x0,s))]t29(u)):not(max(s,x0))
-s1@t31:=t11([x:rat]t30(x)):cutprop3
--iii1
-s@[x0:rat][i:in(x0,s)][y0:rat][n:not(in(y0,s))][j:[x:rat][t:in(x,s)][y:rat][u:less(y,x)]in(y,s)][s1:[x:rat][t:in(x,s)]some([y:rat]and(in(y,s),more(y,x)))]
-cut2:=and3i(cutprop1,cutprop2,cutprop3,t10".iii1"(x0,i,y0,n),t19".iii1"(j),t31".iii1"(s1)):cutprop(s)
-+*rp
-eta@more:=some"rt"([x:rat]and(lrt(ksi,x),urt(eta,x))):'prop'
-[m:more(ksi,eta)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]p][x0:rat][a:and(lrt(ksi,x0),urt(eta,x0))]
-+iii2
-t1:=ande1(lrt(ksi,x0),urt(eta,x0),a):lrt(ksi,x0)
-t2:=ande2(lrt(ksi,x0),urt(eta,x0),a):urt(eta,x0)
-t3:=<t2><t1><x0>p1:p
--iii2
-p1@moreapp:=someapp(rat,[x:rat]and(lrt(ksi,x),urt(eta,x)),m,p,[x:rat][t:and(lrt(ksi,x),urt(eta,x))]t3".iii2"(x,t)):p
-eta@less:=some"rt"([x:rat]and(urt(ksi,x),lrt(eta,x))):'prop'
-[l:less(ksi,eta)][p:'prop'][p1:[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]p][x0:rat][a:and(urt(ksi,x0),lrt(eta,x0))]
-+*iii2
-a@t4:=ande1(urt(ksi,x0),lrt(eta,x0),a):urt(ksi,x0)
-t5:=ande2(urt(ksi,x0),lrt(eta,x0),a):lrt(eta,x0)
-t6:=<t5><t4><x0>p1:p
--iii2
-p1@lessapp:=someapp(rat,[x:rat]and(urt(ksi,x),lrt(eta,x)),l,p,[x:rat][t:and(urt(ksi,x),lrt(eta,x))]t6".iii2"(x,t)):p
-eta@[m:more(ksi,eta)]
-+2121
-[x0:rat][lx:lrt(ksi,x0)][ux:urt(eta,x0)]
-t1:=andi(urt(eta,x0),lrt(ksi,x0),ux,lx):and(urt(eta,x0),lrt(ksi,x0))
-t2:=somei(rat,[x:rat]and(urt(eta,x),lrt(ksi,x)),x0,t1):less(eta,ksi)
--2121
-satz121:=moreapp(m,less(eta,ksi),[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]t2".2121"(x,t,u)):less(eta,ksi)
-eta@[l:less(ksi,eta)]
-+2122
-[x0:rat][ux:urt(ksi,x0)][lx:lrt(eta,x0)]
-t1:=andi(lrt(eta,x0),urt(ksi,x0),lx,ux):and(lrt(eta,x0),urt(ksi,x0))
-t2:=somei(rat,[x:rat]and(lrt(eta,x),urt(ksi,x)),x0,t1):more(eta,ksi)
--2122
-satz122:=lessapp(l,more(eta,ksi),[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]t2".2122"(x,t,u)):more(eta,ksi)
-+2123
-eta@[m:more(ksi,eta)][x0:rat][lx:lrt(ksi,x0)][ux:urt(eta,x0)]
-t1:=th3"st.isset"(rat,lcl(ksi),lcl(eta),x0,lx,ux):not(is"e"(set(rat),lcl(ksi),lcl(eta)))
-t2:=th3"l.imp"(is(ksi,eta),is"e"(set(rat),lcl(ksi),lcl(eta)),t1,[t:is(ksi,eta)]ise(ksi,eta,t)):not(is(ksi,eta))
-m@t3:=moreapp(ksi,eta,m,not(is(ksi,eta)),[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]t2(x,t,u)):not(is(ksi,eta))
-eta@t4:=th2"l.ec"(is(ksi,eta),more(ksi,eta),[t:more(ksi,eta)]t3(t)):ec(is(ksi,eta),more(ksi,eta))
-[l:less(ksi,eta)][x0:rat][ux:urt(ksi,x0)][lx:lrt(eta,x0)]
-t5:=th4"st.isset"(rat,lcl(eta),lcl(ksi),x0,lx,ux):not(is"e"(set(rat),lcl(ksi),lcl(eta)))
-t6:=th3"l.imp"(is(ksi,eta),is"e"(set(rat),lcl(ksi),lcl(eta)),t5,[t:is(ksi,eta)]ise(ksi,eta,t)):not(is(ksi,eta))
-l@t7:=lessapp(ksi,eta,l,not(is(ksi,eta)),[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]t6(x,t,u)):not(is(ksi,eta))
-eta@t8:=th1"l.ec"(less(ksi,eta),is(ksi,eta),[t:less(ksi,eta)]t7(t)):ec(less(ksi,eta),is(ksi,eta))
-m@[l:less(ksi,eta)][x0:rat][lx:lrt(ksi,x0)][ux:urt(eta,x0)][y0:rat][uy:urt(ksi,y0)][ly:lrt(eta,y0)]
-t9:=cutapp2a(ksi,x0,lx,y0,uy):less"rt"(x0,y0)
-t10:=cutapp2b(eta,y0,ly,x0,ux):more"rt"(x0,y0)
-t11:=mp(less"rt"(x0,y0),con,t9,ec3e23(is"rt"(x0,y0),more"rt"(x0,y0),less"rt"(x0,y0),satz81b(x0,y0),t10)):con
-ux@t12:=lessapp(ksi,eta,l,con,[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]t11(x,t,u)):con
-l@t13:=moreapp(ksi,eta,m,con,[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]t12(x,t,u)):con
-m@t14:=[t:less(ksi,eta)]t13(t):not(less(ksi,eta))
-eta@t15:=th1"l.ec"(more(ksi,eta),less(ksi,eta),[t:more(ksi,eta)]t14(t)):ec(more(ksi,eta),less(ksi,eta))
-a:=th6"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),t4,t15,t8):ec3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-[i:is(ksi,eta)]
-t16:=or3i1(is(ksi,eta),more(ksi,eta),less(ksi,eta),i):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-eta@[n:nis(ksi,eta)]
-t17:=th3"l.imp"(is"e"(set(rat),lcl(ksi),lcl(eta)),is(ksi,eta),n,[t:is"e"(set(rat),lcl(ksi),lcl(eta))]isi(ksi,eta,t)):not(is"e"(set(rat),lcl(ksi),lcl(eta)))
-t18:=th5"st.isset"(rat,lcl(ksi),lcl(eta),t17):or(more(ksi,eta),more(eta,ksi))
-t19:=th8"l.or"(more(ksi,eta),more(eta,ksi),less(ksi,eta),t18,[t:more(eta,ksi)]satz121(eta,ksi,t)):or(more(ksi,eta),less(ksi,eta))
-t20:=th7"l.or3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),t19):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-eta@b:=th1"l.imp"(is(ksi,eta),or3(is(ksi,eta),more(ksi,eta),less(ksi,eta)),[t:is(ksi,eta)]t16(t),[t:nis(ksi,eta)]t20(t)):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
--2123
-eta@satz123:=orec3i(is(ksi,eta),more(ksi,eta),less(ksi,eta),b".2123",a".2123"):orec3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-satz123a:=orec3e1(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-satz123b:=orec3e2(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123):ec3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-moreis:=or(more(ksi,eta),is(ksi,eta)):'prop'
-lessis:=or(less(ksi,eta),is(ksi,eta)):'prop'
-[m:moreis(ksi,eta)]
-satz124:=th9"l.or"(more(ksi,eta),is(ksi,eta),less(eta,ksi),is(eta,ksi),m,[t:more(ksi,eta)]satz121(t),[t:is(ksi,eta)]symis(cut,ksi,eta,t)):lessis(eta,ksi)
-eta@[l:lessis(ksi,eta)]
-satz125:=th9"l.or"(less(ksi,eta),is(ksi,eta),more(eta,ksi),is(eta,ksi),l,[t:less(ksi,eta)]satz122(t),[t:is(ksi,eta)]symis(cut,ksi,eta,t)):moreis(eta,ksi)
-zeta@[i:is(ksi,eta)][m:more(ksi,zeta)]
-ismore1:=isp(cut,[u:cut]more(u,zeta),ksi,eta,m,i):more(eta,zeta)
-i@[m:more(zeta,ksi)]
-ismore2:=isp(cut,[u:cut]more(zeta,u),ksi,eta,m,i):more(zeta,eta)
-i@[l:less(ksi,zeta)]
-isless1:=isp(cut,[u:cut]less(u,zeta),ksi,eta,l,i):less(eta,zeta)
-i@[l:less(zeta,ksi)]
-isless2:=isp(cut,[u:cut]less(zeta,u),ksi,eta,l,i):less(zeta,eta)
-i@[m:moreis(ksi,zeta)]
-ismoreis1:=isp(cut,[u:cut]moreis(u,zeta),ksi,eta,m,i):moreis(eta,zeta)
-i@[m:moreis(zeta,ksi)]
-ismoreis2:=isp(cut,[u:cut]moreis(zeta,u),ksi,eta,m,i):moreis(zeta,eta)
-i@[l:lessis(ksi,zeta)]
-islessis1:=isp(cut,[u:cut]lessis(u,zeta),ksi,eta,l,i):lessis(eta,zeta)
-i@[l:lessis(zeta,ksi)]
-islessis2:=isp(cut,[u:cut]lessis(zeta,u),ksi,eta,l,i):lessis(zeta,eta)
-eta@[i:is(ksi,eta)]
-moreisi2:=ori2(more(ksi,eta),is(ksi,eta),i):moreis(ksi,eta)
-lessisi2:=ori2(less(ksi,eta),is(ksi,eta),i):lessis(ksi,eta)
-eta@[m:more(ksi,eta)]
-moreisi1:=ori1(more(ksi,eta),is(ksi,eta),m):moreis(ksi,eta)
-eta@[l:less(ksi,eta)]
-lessisi1:=ori1(less(ksi,eta),is(ksi,eta),l):lessis(ksi,eta)
-zeta@[upsilon:cut][i:is(ksi,eta)][j:is(zeta,upsilon)][m:more(ksi,zeta)]
-ismore12:=ismore2(zeta,upsilon,eta,j,ismore1(ksi,eta,zeta,i,m)):more(eta,upsilon)
-j@[l:less(ksi,zeta)]
-isless12:=isless2(zeta,upsilon,eta,j,isless1(ksi,eta,zeta,i,l)):less(eta,upsilon)
-j@[m:moreis(ksi,zeta)]
-ismoreis12:=ismoreis2(zeta,upsilon,eta,j,ismoreis1(ksi,eta,zeta,i,m)):moreis(eta,upsilon)
-j@[l:lessis(ksi,zeta)]
-islessis12:=islessis2(zeta,upsilon,eta,j,islessis1(ksi,eta,zeta,i,l)):lessis(eta,upsilon)
-eta@[m:moreis(ksi,eta)]
-satz123c:=th7"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,comor(more(ksi,eta),is(ksi,eta),m)):not(less(ksi,eta))
-eta@[l:lessis(ksi,eta)]
-satz123d:=th9"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,l):not(more(ksi,eta))
-eta@[n:not(more(ksi,eta))]
-satz123e:=th2"l.or3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123a,n):lessis(ksi,eta)
-eta@[n:not(less(ksi,eta))]
-satz123f:=comor(is(ksi,eta),more(ksi,eta),th3"l.or3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123a,n)):moreis(ksi,eta)
-eta@[m:more(ksi,eta)]
-satz123g:=th3"l.or"(less(ksi,eta),is(ksi,eta),ec3e23(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,m),ec3e21(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,m)):not(lessis(ksi,eta))
-eta@[l:less(ksi,eta)]
-satz123h:=th3"l.or"(more(ksi,eta),is(ksi,eta),ec3e32(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,l),ec3e31(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123b,l)):not(moreis(ksi,eta))
-eta@[n:not(moreis(ksi,eta))]
-satz123j:=or3e3(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123a,th5"l.or"(more(ksi,eta),is(ksi,eta),n),th4"l.or"(more(ksi,eta),is(ksi,eta),n)):less(ksi,eta)
-eta@[n:not(lessis(ksi,eta))]
-satz123k:=or3e2(is(ksi,eta),more(ksi,eta),less(ksi,eta),satz123a,th4"l.or"(less(ksi,eta),is(ksi,eta),n),th5"l.or"(less(ksi,eta),is(ksi,eta),n)):more(ksi,eta)
-zeta@[l:less(ksi,eta)][k:less(eta,zeta)]
-+2126
-[x0:rat][ux:urt(ksi,x0)][lx:lrt(eta,x0)][y0:rat][uy:urt(eta,y0)][ly:lrt(zeta,y0)]
-t1:=cutapp2a(eta,x0,lx,y0,uy):less"rt"(x0,y0)
-t2:=satz119a(ksi,x0,ux,y0,t1):urt(ksi,y0)
-t3:=andi(urt(ksi,y0),lrt(zeta,y0),t2,ly):and(urt(ksi,y0),lrt(zeta,y0))
-t4:=somei(rat,[x:rat]and(urt(ksi,x),lrt(zeta,x)),y0,t3):less(ksi,zeta)
-lx@t5:=lessapp(eta,zeta,k,less(ksi,zeta),[x:rat][t:urt(eta,x)][u:lrt(zeta,x)]t4(x,t,u)):less(ksi,zeta)
--2126
-satz126:=lessapp(ksi,eta,l,less(ksi,zeta),[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]t5".2126"(x,t,u)):less(ksi,zeta)
-trless:=satz126:less(ksi,zeta)
-zeta@[m:more(ksi,eta)][n:more(eta,zeta)]
-trmore:=satz122(zeta,ksi,satz126(zeta,eta,ksi,satz121(eta,zeta,n),satz121(ksi,eta,m))):more(ksi,zeta)
-zeta@[l:lessis(ksi,eta)][k:less(eta,zeta)]
-satz127a:=orapp(less(ksi,eta),is(ksi,eta),less(ksi,zeta),l,[u:less(ksi,eta)]trless(u,k),[u:is(ksi,eta)]isless1(eta,ksi,zeta,symis(cut,ksi,eta,u),k)):less(ksi,zeta)
-zeta@[l:less(ksi,eta)][k:lessis(eta,zeta)]
-satz127b:=orapp(less(eta,zeta),is(eta,zeta),less(ksi,zeta),k,[u:less(eta,zeta)]trless(l,u),[u:is(eta,zeta)]isless2(eta,zeta,ksi,u,l)):less(ksi,zeta)
-zeta@[m:moreis(ksi,eta)][n:more(eta,zeta)]
-satz127c:=satz122(zeta,ksi,satz127b(zeta,eta,ksi,satz121(eta,zeta,n),satz124(ksi,eta,m))):more(ksi,zeta)
-zeta@[m:more(ksi,eta)][n:moreis(eta,zeta)]
-satz127d:=satz122(zeta,ksi,satz127a(zeta,eta,ksi,satz124(eta,zeta,n),satz121(ksi,eta,m))):more(ksi,zeta)
-zeta@[l:lessis(ksi,eta)][k:lessis(eta,zeta)]
-+2128
-[i:is(ksi,eta)][j:is(eta,zeta)]
-t1:=lessisi2(ksi,zeta,tris(cut,ksi,eta,zeta,i,j)):lessis(ksi,zeta)
-i@[j:less(eta,zeta)]
-t2:=lessisi1(ksi,zeta,satz127a(l,j)):lessis(ksi,zeta)
-i@t3:=orapp(less(eta,zeta),is(eta,zeta),lessis(ksi,zeta),k,[t:less(eta,zeta)]t2(t),[t:is(eta,zeta)]t1(t)):lessis(ksi,zeta)
-k@[j:less(ksi,eta)]
-t4:=lessisi1(ksi,zeta,satz127b(j,k)):lessis(ksi,zeta)
--2128
-satz128:=orapp(less(ksi,eta),is(ksi,eta),lessis(ksi,zeta),l,[t:less(ksi,eta)]t4".2128"(t),[t:is(ksi,eta)]t3".2128"(t)):lessis(ksi,zeta)
-trlessis:=satz128:lessis(ksi,zeta)
-zeta@[m:moreis(ksi,eta)][n:moreis(eta,zeta)]
-trmoreis:=satz125(zeta,ksi,satz128(zeta,eta,ksi,satz124(eta,zeta,n),satz124(ksi,eta,m))):moreis(ksi,zeta)
-eta@[z0:rat][x0:rat][y0:rat]
-sumprop1:=and3(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,pl(x0,y0))):'prop'
-z0@sumprop:=some"rt"([x:rat]some"rt"([y:rat]sumprop1(z0,x,y))):'prop'
-eta@sum:=setof(rat,[z:rat]sumprop(z)):set(rat)
-x0@[lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,pl(x0,y0))]
-+iii3
-t1:=and3i(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,pl(x0,y0)),lx,ly,i):sumprop1(z0,x0,y0)
-t2:=somei(rat,[y:rat]sumprop1(z0,x0,y),y0,t1):some"rt"([y:rat]sumprop1(z0,x0,y))
-t3:=somei(rat,[x:rat]some"rt"([y:rat]sumprop1(z0,x,y)),x0,t2):sumprop(z0)
--iii3
-sum1:=estii(rat,[z:rat]sumprop(z),z0,t3".iii3"):in(z0,sum)
-z0@[i:in(z0,sum)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,pl(x,y))]p]
-+*iii3
-p1@t4:=estie(rat,[z:rat]sumprop(z),z0,i):sumprop(z0)
--iii3
-p1@[x0:rat][px:some"rt"([y:rat]sumprop1(z0,x0,y))][y0:rat][py:sumprop1(z0,x0,y0)]
-+*iii3
-py@t5:=and3e1(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,pl(x0,y0)),py):lrt(ksi,x0)
-t6:=and3e2(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,pl(x0,y0)),py):lrt(eta,y0)
-t7:=and3e3(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,pl(x0,y0)),py):is"rt"(z0,pl(x0,y0))
-t8:=<t7><t6><y0><t5><x0>p1:p
-px@t9:=someapp(rat,[y:rat]sumprop1(z0,x0,y),px,p,[y:rat][t:sumprop1(z0,x0,y)]t8(y,t)):p
--iii3
-p1@sumapp:=someapp(rat,[x:rat]some"rt"([y:rat]sumprop1(z0,x,y)),t4".iii3",p,[x:rat][t:some"rt"([y:rat]sumprop1(z0,x,y))]t9".iii3"(x,t)):p
-eta@[x1:rat][ux:urt(ksi,x1)][y1:rat][uy:urt(eta,y1)]
-+3129
-[z0:rat][i:in(z0,sum)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(z0,pl(x0,y0))]
-t1:=cutapp2a(ksi,x0,lx,x1,ux):less"rt"(x0,x1)
-t2:=cutapp2a(eta,y0,ly,y1,uy):less"rt"(y0,y1)
-t3:=isless1"rt"(pl(x0,y0),z0,pl(x1,y1),symis(rat,z0,pl(x0,y0),j),satz98a(x0,x1,y0,y1,t1,t2)):less"rt"(z0,pl(x1,y1))
-t4:=ec3e31(is"rt"(z0,pl(x1,y1)),more"rt"(z0,pl(x1,y1)),less"rt"(z0,pl(x1,y1)),satz81b(z0,pl(x1,y1)),t3):nis"rt"(z0,pl(x1,y1))
-i@t5:=sumapp(ksi,eta,z0,i,nis"rt"(z0,pl(x1,y1)),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,pl(x,y))]t4(x,t,y,u,v)):nis"rt"(z0,pl(x1,y1))
--3129
-satz129a:=th3"l.imp"(in(pl(x1,y1),sum),nis"rt"(pl(x1,y1),pl(x1,y1)),weli(is"rt"(pl(x1,y1),pl(x1,y1)),refis(rat,pl(x1,y1))),[t:in(pl(x1,y1),sum)]t5".3129"(pl(x1,y1),t)):not(in(pl(x1,y1),sum))
-+*3129
-eta@[u0:rat][i:in(u0,sum)][z0:rat][l:less"rt"(z0,u0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(u0,pl(x0,y0))]
-t6:=isless2"rt"(u0,pl(x0,y0),z0,j,l):less"rt"(z0,pl(x0,y0))
-z1:=ov(z0,pl(x0,y0)):rat
-t7:=isless12"rt"(z0,ts(z1,pl(x0,y0)),pl(x0,y0),ts(1rt,pl(x0,y0)),satz110f(z0,pl(x0,y0)),example1d(pl(x0,y0)),t6):less"rt"(ts(z1,pl(x0,y0)),ts(1rt,pl(x0,y0)))
-t8:=satz106c(z1,1rt,pl(x0,y0),t7):less"rt"(z1,1rt)
-t9:=isless2"rt"(ts(x0,1rt),x0,ts(x0,z1),example1a(x0),satz105f(z1,1rt,x0,t8)):less"rt"(ts(x0,z1),x0)
-t10:=isless2"rt"(ts(y0,1rt),y0,ts(y0,z1),example1a(y0),satz105f(z1,1rt,y0,t8)):less"rt"(ts(y0,z1),y0)
-t11:=satz120(ksi,x0,lx,ts(x0,z1),t9):lrt(ksi,ts(x0,z1))
-t12:=satz120(eta,y0,ly,ts(y0,z1),t10):lrt(eta,ts(y0,z1))
-t13:=tris(rat,pl(ts(x0,z1),ts(y0,z1)),ts(pl(x0,y0),z1),z0,distpt1(x0,y0,z1),satz110c(z0,pl(x0,y0))):is"rt"(pl(ts(x0,z1),ts(y0,z1)),z0)
-t14:=symis(rat,pl(ts(x0,z1),ts(y0,z1)),z0,t13):is"rt"(z0,pl(ts(x0,z1),ts(y0,z1)))
-t15:=sum1(ksi,eta,z0,ts(x0,z1),t11,ts(y0,z1),t12,t14):in(z0,sum)
-l@t16:=sumapp(ksi,eta,u0,i,in(z0,sum),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(u0,pl(x,y))]t15(x,t,y,u,v)):in(z0,sum)
-eta@[z0:rat][i:in(z0,sum)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(z0,pl(x0,y0))][x1:rat][lx1:lrt(ksi,x1)][l:less"rt"(x0,x1)]
-t17:=sum1(ksi,eta,pl(x1,y0),x1,lx1,y0,ly,refis(rat,pl(x1,y0))):in(pl(x1,y0),sum)
-t18:=satz96a(x1,x0,y0,satz83(x0,x1,l)):more"rt"(pl(x1,y0),pl(x0,y0))
-t19:=ismore2"rt"(pl(x0,y0),z0,pl(x1,y0),symis(rat,z0,pl(x0,y0),j),t18):more"rt"(pl(x1,y0),z0)
-t20:=andi(in(pl(x1,y0),sum),more"rt"(pl(x1,y0),z0),t17,t19):and(in(pl(x1,y0),sum),more"rt"(pl(x1,y0),z0))
-t21:=somei(rat,[y:rat]and(in(y,sum),more"rt"(y,z0)),pl(x1,y0),t20):some"rt"([y:rat]and(in(y,sum),more"rt"(y,z0)))
-j@t22:=cutapp3(ksi,x0,lx,some"rt"([y:rat]and(in(y,sum),more"rt"(y,z0))),[x:rat][t:lrt(ksi,x)][u:less"rt"(x0,x)]t21(x,t,u)):some"rt"([y:rat]and(in(y,sum),more"rt"(y,z0)))
-i@t23:=sumapp(ksi,eta,z0,i,some"rt"([y:rat]and(in(y,sum),more"rt"(y,z0))),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,pl(x,y))]t22(x,t,y,u,v)):some"rt"([y:rat]and(in(y,sum),more"rt"(y,z0)))
-eta@[x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][x1:rat][ux:urt(ksi,x1)][y1:rat][uy:urt(eta,y1)]
-t24:=cut2(sum,pl(x0,y0),sum1(ksi,eta,pl(x0,y0),x0,lx,y0,ly,refis(rat,pl(x0,y0))),pl(x1,y1),satz129a(x1,ux,y1,uy),[x:rat][t:in(x,sum)][y:rat][u:less"rt"(y,x)]t16(x,t,y,u),[x:rat][t:in(x,sum)]t23(x,t)):cutprop(sum)
-ux@t25:=cutapp1b(eta,cutprop(sum),[y:rat][t:urt(eta,y)]t24(y,t)):cutprop(sum)
-ly@t26:=cutapp1b(ksi,cutprop(sum),[x:rat][t:urt(ksi,x)]t25(x,t)):cutprop(sum)
-lx@t27:=cutapp1a(eta,cutprop(sum),[y:rat][t:lrt(eta,y)]t26(y,t)):cutprop(sum)
--3129
-eta@satz129:=cutapp1a(ksi,cutprop(sum),[x:rat][t:lrt(ksi,x)]t27".3129"(x,t)):cutprop(sum)
-pl:=cutof(sum,satz129):cut
-[z0:rat][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,pl"rt"(x0,y0))]
-lrtpl:=ine(sum,satz129,z0,sum1(z0,x0,lx,y0,ly,i)):lrt(pl(ksi,eta),z0)
-eta@[z0:rat][x0:rat][ux:urt(ksi,x0)][y0:rat][uy:urt(eta,y0)][i:is"rt"(z0,pl"rt"(x0,y0))]
-+*iii3
-i@t10:=isp1(rat,[x:rat]not(in(x,sum)),pl"rt"(x0,y0),z0,satz129a(x0,ux,y0,uy),i):not(in(z0,sum))
--iii3
-i@urtpl:=th3"l.imp"(lrt(pl(ksi,eta),z0),in(z0,sum),t10".iii3",[t:lrt(pl(ksi,eta),z0)]ini(sum,satz129,z0,t)):urt(pl(ksi,eta),z0)
-eta@[z0:rat][lz:lrt(pl(ksi,eta),z0)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,pl"rt"(x,y))]p]
-+*iii3
-p1@t11:=ini(sum,satz129,z0,lz):in(z0,sum)
--iii3
-p1@plapp:=sumapp(z0,t11".iii3",p,p1):p
-zeta@[i:is(ksi,eta)]
-ispl1:=isf(cut,cut,[u:cut]pl(u,zeta),ksi,eta,i):is(pl(ksi,zeta),pl(eta,zeta))
-ispl2:=isf(cut,cut,[u:cut]pl(zeta,u),ksi,eta,i):is(pl(zeta,ksi),pl(zeta,eta))
-upsilon@[i:is(ksi,eta)][j:is(zeta,upsilon)]
-ispl12:=tris(cut,pl(ksi,zeta),pl(eta,zeta),pl(eta,upsilon),ispl1(i),ispl2(zeta,upsilon,eta,j)):is(pl(ksi,zeta),pl(eta,upsilon))
-+3130
-eta@[z0:rat][lz:lrt(pl(ksi,eta),z0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,pl"rt"(x0,y0))]
-t1:=tris(rat,z0,pl"rt"(x0,y0),pl"rt"(y0,x0),i,compl(x0,y0)):is"rt"(z0,pl"rt"(y0,x0))
-t2:=lrtpl(eta,ksi,z0,y0,ly,x0,lx,t1):lrt(pl(eta,ksi),z0)
-lz@t3:=plapp(ksi,eta,z0,lz,lrt(pl(eta,ksi),z0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,pl"rt"(x,y))]t2(x,t,y,u,v)):lrt(pl(eta,ksi),z0)
--3130
-eta@satz130:=isi1(pl(ksi,eta),pl(eta,ksi),[x:rat][t:lrt(pl(ksi,eta),x)]t3".3130"(x,t),[x:rat][t:lrt(pl(eta,ksi),x)]t3".3130"(eta,ksi,x,t)):is(pl(ksi,eta),pl(eta,ksi))
-compl:=satz130:is(pl(ksi,eta),pl(eta,ksi))
-+3131
-zeta@[u0:rat][lu:lrt(pl(pl(ksi,eta),zeta),u0)][v0:rat][lv:lrt(pl(ksi,eta),v0)][z0:rat][lz:lrt(zeta,z0)][i:is"rt"(u0,pl"rt"(v0,z0))][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(v0,pl"rt"(x0,y0))]
-t1:=tr3is(rat,u0,pl"rt"(v0,z0),pl"rt"(pl"rt"(x0,y0),z0),pl"rt"(x0,pl"rt"(y0,z0)),i,ispl1"rt"(v0,pl"rt"(x0,y0),z0,j),asspl1(x0,y0,z0)):is"rt"(u0,pl"rt"(x0,pl"rt"(y0,z0)))
-t2:=lrtpl(eta,zeta,pl"rt"(y0,z0),y0,ly,z0,lz,refis(rat,pl"rt"(y0,z0))):lrt(pl(eta,zeta),pl"rt"(y0,z0))
-t3:=lrtpl(ksi,pl(eta,zeta),u0,x0,lx,pl"rt"(y0,z0),t2,t1):lrt(pl(ksi,pl(eta,zeta)),u0)
-i@t4:=plapp(ksi,eta,v0,lv,lrt(pl(ksi,pl(eta,zeta)),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(v0,pl"rt"(x,y))]t3(x,t,y,u,v)):lrt(pl(ksi,pl(eta,zeta)),u0)
-lu@t5:=plapp(pl(ksi,eta),zeta,u0,lu,lrt(pl(ksi,pl(eta,zeta)),u0),[x:rat][t:lrt(pl(ksi,eta),x)][y:rat][u:lrt(zeta,y)][v:is"rt"(u0,pl"rt"(x,y))]t4(x,t,y,u,v)):lrt(pl(ksi,pl(eta,zeta)),u0)
-u0@[lu:lrt(pl(ksi,pl(eta,zeta)),u0)][x0:rat][lx:lrt(ksi,x0)][v0:rat][lv:lrt(pl(eta,zeta),v0)][i:is"rt"(u0,pl"rt"(x0,v0))][y0:rat][ly:lrt(eta,y0)][z0:rat][lz:lrt(zeta,z0)][j:is"rt"(v0,pl"rt"(y0,z0))]
-t6:=tr3is(rat,u0,pl"rt"(x0,v0),pl"rt"(x0,pl"rt"(y0,z0)),pl"rt"(pl"rt"(x0,y0),z0),i,ispl2"rt"(v0,pl"rt"(y0,z0),x0,j),asspl2(x0,y0,z0)):is"rt"(u0,pl"rt"(pl"rt"(x0,y0),z0))
-t7:=lrtpl(ksi,eta,pl"rt"(x0,y0),x0,lx,y0,ly,refis(rat,pl"rt"(x0,y0))):lrt(pl(ksi,eta),pl"rt"(x0,y0))
-t8:=lrtpl(pl(ksi,eta),zeta,u0,pl"rt"(x0,y0),t7,z0,lz,t6):lrt(pl(pl(ksi,eta),zeta),u0)
-i@t9:=plapp(eta,zeta,v0,lv,lrt(pl(pl(ksi,eta),zeta),u0),[x:rat][t:lrt(eta,x)][y:rat][u:lrt(zeta,y)][v:is"rt"(v0,pl"rt"(x,y))]t8(x,t,y,u,v)):lrt(pl(pl(ksi,eta),zeta),u0)
-lu@t10:=plapp(ksi,pl(eta,zeta),u0,lu,lrt(pl(pl(ksi,eta),zeta),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(pl(eta,zeta),y)][v:is"rt"(u0,pl"rt"(x,y))]t9(x,t,y,u,v)):lrt(pl(pl(ksi,eta),zeta),u0)
--3131
-zeta@satz131:=isi1(pl(pl(ksi,eta),zeta),pl(ksi,pl(eta,zeta)),[x:rat][t:lrt(pl(pl(ksi,eta),zeta),x)]t5".3131"(x,t),[x:rat][t:lrt(pl(ksi,pl(eta,zeta)),x)]t10".3131"(x,t)):is(pl(pl(ksi,eta),zeta),pl(ksi,pl(eta,zeta)))
-asspl1:=satz131:is(pl(pl(ksi,eta),zeta),pl(ksi,pl(eta,zeta)))
-asspl2:=symis(cut,pl(pl(ksi,eta),zeta),pl(ksi,pl(eta,zeta)),satz131):is(pl(ksi,pl(eta,zeta)),pl(pl(ksi,eta),zeta))
-ksi@[a0:rat]
-+3132
-[x0:rat][y0:rat]
-prop1:=and(lrt(ksi,x0),urt(ksi,y0)):'prop'
-[p:prop1]
-t1:=cutapp2b(x0,ande1(lrt(ksi,x0),urt(ksi,y0),p),y0,ande2(lrt(ksi,x0),urt(ksi,y0),p)):more"rt"(y0,x0)
-prop2:=is"rt"(mn(y0,x0,t1),a0):'prop'
-y0@prop3:=and(prop1,[t:prop1]prop2(t)):'prop'
-a0@prop4:=some"rt"([x:rat]some"rt"([y:rat]prop3(x,y))):'prop'
-x0@[lx:lrt(ksi,x0)][y0:rat][uy:urt(ksi,y0)]
-t2:=cutapp2b(x0,lx,y0,uy):more"rt"(y0,x0)
-[n:nat][m:more"rt"(ts(rtofn(n),a0),mn(y0,x0,t2))]
-t3:=satz96d(ts(rtofn(n),a0),mn(y0,x0,t2),x0,m):more"rt"(pl"rt"(x0,ts(rtofn(n),a0)),pl"rt"(x0,mn(y0,x0,t2)))
-t4:=ismore2"rt"(pl"rt"(x0,mn(y0,x0,t2)),y0,pl"rt"(x0,ts(rtofn(n),a0)),satz101c(y0,x0,t2),t3):more"rt"(pl"rt"(x0,ts(rtofn(n),a0)),y0)
-t5:=satz119(y0,uy,pl"rt"(x0,ts(rtofn(n),a0)),t4):urt(pl"rt"(x0,ts(rtofn(n),a0)))
-t6:=somei(nat,[x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))),n,t5):some"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))))
-uy@t7:=someapp(nat,[x:nat]more"rt"(ts(rtofn(x),a0),mn(y0,x0,t2)),satz115(a0,mn(y0,x0,t2)),some"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0)))),[x:nat][t:more"rt"(ts(rtofn(x),a0),mn(y0,x0,t2))]t6(x,t)):some"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))))
-[u:nat][m:min"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))),u)]
-t8:=ande1(lb"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))),u),urt(pl"rt"(x0,ts(rtofn(u),a0))),m):lb"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))),u)
-t9:=ande2(lb"n"([x:nat]urt(pl"rt"(x0,ts(rtofn(x),a0))),u),urt(pl"rt"(x0,ts(rtofn(u),a0))),m):urt(pl"rt"(x0,ts(rtofn(u),a0)))
-[i:is"n"(u,1)]
-u0:=pl"rt"(x0,a0):rat
-t10:=tr3is(rat,ts(rtofn(u),a0),ts(1rt,a0),ts(a0,1rt),a0,ists1(rtofn(u),1rt,a0,isnert(u,1,i)),comts(1rt,a0),example1a(a0)):is"rt"(ts(rtofn(u),a0),a0)
-t11:=isp(rat,[x:rat]urt(pl"rt"(x0,x)),ts(rtofn(u),a0),a0,t9,t10):urt(ksi,u0)
-t12:=andi(lrt(ksi,x0),urt(ksi,u0),lx,t11):prop1(x0,u0)
-[p:prop1(x0,u0)]
-t13:=symis(rat,a0,mn(u0,x0,t1(x0,u0,p)),satz101g(u0,x0,a0,t1(x0,u0,p),refis(rat,u0))):prop2(x0,u0,p)
-i@t14:=andi(prop1(x0,u0),[t:prop1(x0,u0)]prop2(x0,u0,t),t12,[t:prop1(x0,u0)]t13(t)):prop3(x0,u0)
-t15:=somei(rat,[y:rat]prop3(x0,y),u0,t14):some"rt"([y:rat]prop3(x0,y))
-t16:=somei(rat,[x:rat]some"rt"([y:rat]prop3(x,y)),x0,t15):prop4
-m@[o:more"n"(u,1)]
-t17:=morei(rtofn(u),1rt,fr(u,1),fr(1,1),inclass(fr(u,1)),inclass(fr(1,1)),satz111d(u,1,o)):more"rt"(rtofn(u),1rt)
-um10:=mn(rtofn(u),1rt,t17):rat
-t18:=satz112g(rtofn(u),natrti(u),1rt,natrti(1),t17):natrt(um10)
-um1:=nofrt(um10,t18):nat
-v0:=pl"rt"(x0,ts(um10,a0)):rat
-w0:=pl"rt"(x0,ts(rtofn(u),a0)):rat
-t19:=isless2"rt"(pl"rt"(um10,1rt),rtofn(u),um10,satz101e(rtofn(u),1rt,t17),satz94a(um10,1rt)):less"rt"(um10,rtofn(u))
-t20:=lesse(um10,rtofn(u),fr(um1,1),fr(u,1),inclassn(um10,t18),inclass(fr(u,1)),t19):lessf(fr(um1,1),fr(u,1))
-t21:=satz111c(um1,u,t20):less"n"(um1,u)
-t22:=th3"l.imp"(lessis"n"(u,um1),moreis"n"(um1,u),satz10h(um1,u,t21),[t:lessis"n"(u,um1)]satz14(u,um1,t)):not(lessis"n"(u,um1))
-t23:=et(lrt(pl"rt"(x0,ts(rtofn(um1),a0))),th3"l.imp"(urt(pl"rt"(x0,ts(rtofn(um1),a0))),lessis"n"(u,um1),t22,<um1>t8)):lrt(pl"rt"(x0,ts(rtofn(um1),a0)))
-t24:=isp1(rat,[x:rat]lrt(pl"rt"(x0,ts(x,a0))),rtofn(um1),um10,t23,isrtn1(um10,t18)):lrt(ksi,v0)
-t25:=andi(lrt(ksi,v0),urt(ksi,w0),t24,t9):prop1(v0,w0)
-t26:=tr3is(rat,pl"rt"(ts(um10,a0),a0),pl"rt"(ts(um10,a0),ts(1rt,a0)),ts(pl"rt"(um10,1rt),a0),ts(rtofn(u),a0),ispl2"rt"(a0,ts(1rt,a0),ts(um10,a0),example1d(a0)),distpt1(um10,1rt,a0),ists1(pl"rt"(um10,1rt),rtofn(u),a0,satz101e(rtofn(u),1rt,t17))):is"rt"(pl"rt"(ts(um10,a0),a0),ts(rtofn(u),a0))
-t27:=tris(rat,pl"rt"(v0,a0),pl"rt"(x0,pl"rt"(ts(um10,a0),a0)),w0,asspl1"rt"(x0,ts(um10,a0),a0),ispl2"rt"(pl"rt"(ts(um10,a0),a0),ts(rtofn(u),a0),x0,t26)):is"rt"(pl"rt"(v0,a0),w0)
-[p:prop1(v0,w0)]
-t28:=symis(rat,a0,mn(w0,v0,t1(v0,w0,p)),satz101g(w0,v0,a0,t1(v0,w0,p),t27)):prop2(v0,w0,p)
-o@t29:=andi(prop1(v0,w0),[t:prop1(v0,w0)]prop2(v0,w0,t),t25,[t:prop1(v0,w0)]t28(t)):prop3(v0,w0)
-t30:=somei(rat,[y:rat]prop3(v0,y),w0,t29):some"rt"([y:rat]prop3(v0,y))
-t31:=somei(rat,[x:rat]some"rt"([y:rat]prop3(x,y)),v0,t30):prop4
-m@t32:=orapp(more"n"(u,1),is"n"(u,1),prop4,satz24(u),[t:more"n"(u,1)]t31(t),[t:is"n"(u,1)]t16(t)):prop4
-uy@t34:=someapp(nat,[x:nat]min"n"([y:nat]urt(pl"rt"(x0,ts(rtofn(y),a0))),x),satz27([y:nat]urt(pl"rt"(x0,ts(rtofn(y),a0))),t7),prop4,[x:nat][t:min"n"([y:nat]urt(pl"rt"(x0,ts(rtofn(y),a0))),x)]t32(x,t)):prop4
-lx@t35:=cutapp1b(prop4,[y:rat][t:urt(ksi,y)]t34(y,t)):prop4
--3132
-satz132:=cutapp1a(prop4".3132",[x:rat][t:lrt(ksi,x)]t35".3132"(x,t)):some"rt"([x:rat]some"rt"([y:rat]and(and(lrt(ksi,x),urt(ksi,y)),[t:and(lrt(ksi,x),urt(ksi,y))]is"rt"(mn(y,x,cutapp2b(x,ande1(lrt(ksi,x),urt(ksi,y),t),y,ande2(lrt(ksi,x),urt(ksi,y),t))),a0))))
-ksi@[p:'prop'][a0:rat][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:urt(ksi,y)][v:is"rt"(mn(y,x,cutapp2b(x,t,y,u)),a0)]p]
-+*3132
-p1@[x0:rat][s:some"rt"([y:rat]prop3(a0,x0,y))][y0:rat][p3:prop3(a0,x0,y0)]
-t36:=ande1(prop1(a0,x0,y0),[t:prop1(a0,x0,y0)]prop2(a0,x0,y0,t),p3):prop1(a0,x0,y0)
-t37:=ande2"l.r"(prop1(a0,x0,y0),[t:prop1(a0,x0,y0)]prop2(a0,x0,y0,t),p3):prop2(a0,x0,y0,t36)
-t38:=ande1(lrt(ksi,x0),urt(ksi,y0),t36):lrt(ksi,x0)
-t39:=ande2(lrt(ksi,x0),urt(ksi,y0),t36):urt(ksi,y0)
-t40:=satz101g(y0,x0,mn(y0,x0,cutapp2b(x0,t38,y0,t39)),t1(a0,x0,y0,t36),satz101c(y0,x0,cutapp2b(x0,t38,y0,t39))):is"rt"(mn(y0,x0,cutapp2b(x0,t38,y0,t39)),mn(y0,x0,t1(a0,x0,y0,t36)))
-t41:=tris(rat,mn(y0,x0,cutapp2b(x0,t38,y0,t39)),mn(y0,x0,t1(a0,x0,y0,t36)),a0,t40,t37):is"rt"(mn(y0,x0,cutapp2b(x0,t38,y0,t39)),a0)
-t42:=<t41><t39><y0><t38><x0>p1:p
-s@t43:=someapp(rat,[y:rat]prop3(a0,x0,y),s,p,[y:rat][t:prop3(a0,x0,y)]t42(y,t)):p
--3132
-p1@satz132app:=someapp(rat,[x:rat]some"rt"([y:rat]prop3".3132"(a0,x,y)),satz132(a0),p,[x:rat][t:some"rt"([y:rat]prop3".3132"(a0,x,y))]t43".3132"(x,t)):p
-+3133
-eta@[y0:rat][ly:lrt(eta,y0)][x0:rat][lx:lrt(ksi,x0)][u0:rat][uu:urt(ksi,u0)][i:is"rt"(mn(u0,x0,cutapp2b(x0,lx,u0,uu)),y0)]
-t1:=tris(rat,u0,pl"rt"(x0,mn(u0,x0,cutapp2b(x0,lx,u0,uu))),pl"rt"(x0,y0),satz101d(u0,x0,cutapp2b(x0,lx,u0,uu)),ispl2"rt"(mn(u0,x0,cutapp2b(x0,lx,u0,uu)),y0,x0,i)):is"rt"(u0,pl"rt"(x0,y0))
-t2:=lrtpl(ksi,eta,u0,x0,lx,y0,ly,t1):lrt(pl(ksi,eta),u0)
-t3:=andi(lrt(pl(ksi,eta),u0),urt(ksi,u0),t2,uu):and(lrt(pl(ksi,eta),u0),urt(ksi,u0))
-t4:=somei(rat,[x:rat]and(lrt(pl(ksi,eta),x),urt(ksi,x)),u0,t3):more(pl(ksi,eta),ksi)
-ly@t5:=satz132app(ksi,more(pl(ksi,eta),ksi),y0,[x:rat][t:lrt(ksi,x)][y:rat][u:urt(ksi,y)][v:is"rt"(mn(y,x,cutapp2b(x,t,y,u)),y0)]t4(x,t,y,u,v)):more(pl(ksi,eta),ksi)
--3133
-eta@satz133:=cutapp1a(eta,more(pl(ksi,eta),ksi),[x:rat][t:lrt(eta,x)]t5".3133"(x,t)):more(pl(ksi,eta),ksi)
-satz133a:=satz121(pl(ksi,eta),ksi,satz133):less(ksi,pl(ksi,eta))
-zeta@[m:more(ksi,eta)]
-+3134
-[y0:rat][ly:lrt(ksi,y0)][uy:urt(eta,y0)][x0:rat][lx:lrt(ksi,x0)][l:less"rt"(y0,x0)]
-t1:=satz119a(eta,y0,uy,x0,l):urt(eta,x0)
-t2:=satz83(y0,x0,l):more"rt"(x0,y0)
-[u0:rat][lu:lrt(zeta,u0)][z0:rat][uz:urt(zeta,z0)][i:is"rt"(mn(z0,u0,cutapp2b(zeta,u0,lu,z0,uz)),mn(x0,y0,t2))]
-t3:=tris(rat,z0,pl"rt"(mn(z0,u0,cutapp2b(zeta,u0,lu,z0,uz)),u0),pl"rt"(mn(x0,y0,t2),u0),satz101f(z0,u0,cutapp2b(zeta,u0,lu,z0,uz)),ispl1"rt"(mn(z0,u0,cutapp2b(zeta,u0,lu,z0,uz)),mn(x0,y0,t2),u0,i)):is"rt"(z0,pl"rt"(mn(x0,y0,t2),u0))
-t4:=tr3is(rat,pl"rt"(y0,z0),pl"rt"(y0,pl"rt"(mn(x0,y0,t2),u0)),pl"rt"(pl"rt"(y0,mn(x0,y0,t2)),u0),pl"rt"(x0,u0),ispl2"rt"(z0,pl"rt"(mn(x0,y0,t2),u0),y0,t3),asspl2"rt"(y0,mn(x0,y0,t2),u0),ispl1"rt"(pl"rt"(y0,mn(x0,y0,t2)),x0,u0,satz101c(x0,y0,t2))):is"rt"(pl"rt"(y0,z0),pl"rt"(x0,u0))
-t5:=lrtpl(ksi,zeta,pl"rt"(y0,z0),x0,lx,u0,lu,t4):lrt(pl(ksi,zeta),pl"rt"(y0,z0))
-t6:=urtpl(eta,zeta,pl"rt"(y0,z0),y0,uy,z0,uz,refis(rat,pl"rt"(y0,z0))):urt(pl(eta,zeta),pl"rt"(y0,z0))
-t7:=andi(lrt(pl(ksi,zeta),pl"rt"(y0,z0)),urt(pl(eta,zeta),pl"rt"(y0,z0)),t5,t6):and(lrt(pl(ksi,zeta),pl"rt"(y0,z0)),urt(pl(eta,zeta),pl"rt"(y0,z0)))
-t8:=somei(rat,[x:rat]and(lrt(pl(ksi,zeta),x),urt(pl(eta,zeta),x)),pl"rt"(y0,z0),t7):more(pl(ksi,zeta),pl(eta,zeta))
-l@t9:=satz132app(zeta,more(pl(ksi,zeta),pl(eta,zeta)),mn(x0,y0,t2),[x:rat][t:lrt(zeta,x)][y:rat][u:urt(zeta,y)][v:is"rt"(mn(y,x,cutapp2b(zeta,x,t,y,u)),mn(x0,y0,t2))]t8(x,t,y,u,v)):more(pl(ksi,zeta),pl(eta,zeta))
-uy@t10:=cutapp3(ksi,y0,ly,more(pl(ksi,zeta),pl(eta,zeta)),[x:rat][t:lrt(ksi,x)][u:less"rt"(y0,x)]t9(x,t,u)):more(pl(ksi,zeta),pl(eta,zeta))
--3134
-satz134:=moreapp(ksi,eta,m,more(pl(ksi,zeta),pl(eta,zeta)),[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]t10".3134"(x,t,u)):more(pl(ksi,zeta),pl(eta,zeta))
-zeta@[m:more(ksi,eta)]
-satz135a:=satz134(m):more(pl(ksi,zeta),pl(eta,zeta))
-zeta@[i:is(ksi,eta)]
-satz135b:=ispl1(ksi,eta,zeta,i):is(pl(ksi,zeta),pl(eta,zeta))
-zeta@[l:less(ksi,eta)]
-satz135c:=satz121(pl(eta,zeta),pl(ksi,zeta),satz134(eta,ksi,zeta,satz122(ksi,eta,l))):less(pl(ksi,zeta),pl(eta,zeta))
-m@satz135d:=ismore12(pl(ksi,zeta),pl(zeta,ksi),pl(eta,zeta),pl(zeta,eta),compl(ksi,zeta),compl(eta,zeta),satz135a):more(pl(zeta,ksi),pl(zeta,eta))
-i@satz135e:=ispl2(ksi,eta,zeta,i):is(pl(zeta,ksi),pl(zeta,eta))
-l@satz135f:=isless12(pl(ksi,zeta),pl(zeta,ksi),pl(eta,zeta),pl(zeta,eta),compl(ksi,zeta),compl(eta,zeta),satz135c):less(pl(zeta,ksi),pl(zeta,eta))
-upsilon@[i:is(ksi,eta)][m:more(zeta,upsilon)]
-satz135g:=ismore2(pl(ksi,upsilon),pl(eta,upsilon),pl(ksi,zeta),ispl1(ksi,eta,upsilon,i),satz135d(zeta,upsilon,ksi,m)):more(pl(ksi,zeta),pl(eta,upsilon))
-satz135h:=ismore12(pl(ksi,zeta),pl(zeta,ksi),pl(eta,upsilon),pl(upsilon,eta),compl(ksi,zeta),compl(eta,upsilon),satz135g):more(pl(zeta,ksi),pl(upsilon,eta))
-i@[l:less(zeta,upsilon)]
-satz135j:=isless2(pl(ksi,upsilon),pl(eta,upsilon),pl(ksi,zeta),ispl1(ksi,eta,upsilon,i),satz135f(zeta,upsilon,ksi,l)):less(pl(ksi,zeta),pl(eta,upsilon))
-satz135k:=isless12(pl(ksi,zeta),pl(zeta,ksi),pl(eta,upsilon),pl(upsilon,eta),compl(ksi,zeta),compl(eta,upsilon),satz135j):less(pl(zeta,ksi),pl(upsilon,eta))
-+3136
-zeta@t1:=satz123a(ksi,eta):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-t2:=satz123b(pl(ksi,zeta),pl(eta,zeta)):ec3(is(pl(ksi,zeta),pl(eta,zeta)),more(pl(ksi,zeta),pl(eta,zeta)),less(pl(ksi,zeta),pl(eta,zeta)))
--3136
-zeta@[m:more(pl(ksi,zeta),pl(eta,zeta))]
-satz136a:=th11"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(pl(ksi,zeta),pl(eta,zeta)),more(pl(ksi,zeta),pl(eta,zeta)),less(pl(ksi,zeta),pl(eta,zeta)),t1".3136",t2".3136",[u:is(ksi,eta)]satz135b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz135a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz135c(ksi,eta,zeta,u),m):more(ksi,eta)
-zeta@[i:is(pl(ksi,zeta),pl(eta,zeta))]
-satz136b:=th10"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(pl(ksi,zeta),pl(eta,zeta)),more(pl(ksi,zeta),pl(eta,zeta)),less(pl(ksi,zeta),pl(eta,zeta)),t1".3136",t2".3136",[u:is(ksi,eta)]satz135b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz135a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz135c(ksi,eta,zeta,u),i):is(ksi,eta)
-zeta@[l:less(pl(ksi,zeta),pl(eta,zeta))]
-satz136c:=th12"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(pl(ksi,zeta),pl(eta,zeta)),more(pl(ksi,zeta),pl(eta,zeta)),less(pl(ksi,zeta),pl(eta,zeta)),t1".3136",t2".3136",[u:is(ksi,eta)]satz135b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz135a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz135c(ksi,eta,zeta,u),l):less(ksi,eta)
-zeta@[m:more(pl(zeta,ksi),pl(zeta,eta))]
-satz136d:=satz136a(ismore12(pl(zeta,ksi),pl(ksi,zeta),pl(zeta,eta),pl(eta,zeta),compl(zeta,ksi),compl(zeta,eta),m)):more(ksi,eta)
-zeta@[i:is(pl(zeta,ksi),pl(zeta,eta))]
-satz136e:=satz136b(tr3is(cut,pl(ksi,zeta),pl(zeta,ksi),pl(zeta,eta),pl(eta,zeta),compl(ksi,zeta),i,compl(zeta,eta))):is(ksi,eta)
-zeta@[l:less(pl(zeta,ksi),pl(zeta,eta))]
-satz136f:=satz136c(isless12(pl(zeta,ksi),pl(ksi,zeta),pl(zeta,eta),pl(eta,zeta),compl(zeta,ksi),compl(zeta,eta),l)):less(ksi,eta)
-upsilon@[m:more(ksi,eta)][n:more(zeta,upsilon)]
-+3137
-t1:=satz134(ksi,eta,zeta,m):more(pl(ksi,zeta),pl(eta,zeta))
-t2:=ismore12(pl(zeta,eta),pl(eta,zeta),pl(upsilon,eta),pl(eta,upsilon),compl(zeta,eta),compl(upsilon,eta),satz134(zeta,upsilon,eta,n)):more(pl(eta,zeta),pl(eta,upsilon))
--3137
-satz137:=trmore(pl(ksi,zeta),pl(eta,zeta),pl(eta,upsilon),t1".3137",t2".3137"):more(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[l:less(ksi,eta)][k:less(zeta,upsilon)]
-satz137a:=satz121(pl(eta,upsilon),pl(ksi,zeta),satz137(eta,ksi,upsilon,zeta,satz122(ksi,eta,l),satz122(zeta,upsilon,k))):less(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[m:moreis(ksi,eta)][n:more(zeta,upsilon)]
-satz138a:=orapp(more(ksi,eta),is(ksi,eta),more(pl(ksi,zeta),pl(eta,upsilon)),m,[t:more(ksi,eta)]satz137(t,n),[t:is(ksi,eta)]satz135g(t,n)):more(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[m:more(ksi,eta)][n:moreis(zeta,upsilon)]
-satz138b:=orapp(more(zeta,upsilon),is(zeta,upsilon),more(pl(ksi,zeta),pl(eta,upsilon)),n,[t:more(zeta,upsilon)]satz137(m,t),[t:is(zeta,upsilon)]satz135h(zeta,upsilon,ksi,eta,t,m)):more(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[l:lessis(ksi,eta)][k:less(zeta,upsilon)]
-satz138c:=satz121(pl(eta,upsilon),pl(ksi,zeta),satz138a(eta,ksi,upsilon,zeta,satz125(ksi,eta,l),satz122(zeta,upsilon,k))):less(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[l:less(ksi,eta)][k:lessis(zeta,upsilon)]
-satz138d:=satz121(pl(eta,upsilon),pl(ksi,zeta),satz138b(eta,ksi,upsilon,zeta,satz122(ksi,eta,l),satz125(zeta,upsilon,k))):less(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[m:moreis(ksi,eta)][n:moreis(zeta,upsilon)]
-+3139
-[i:is(ksi,eta)][j:is(zeta,upsilon)]
-t1:=moreisi2(pl(ksi,zeta),pl(eta,upsilon),ispl12(ksi,eta,zeta,upsilon,i,j)):moreis(pl(ksi,zeta),pl(eta,upsilon))
-i@[o:more(zeta,upsilon)]
-t2:=moreisi1(pl(ksi,zeta),pl(eta,upsilon),satz138a(m,o)):moreis(pl(ksi,zeta),pl(eta,upsilon))
-i@t3:=orapp(more(zeta,upsilon),is(zeta,upsilon),moreis(pl(ksi,zeta),pl(eta,upsilon)),n,[t:more(zeta,upsilon)]t2(t),[t:is(zeta,upsilon)]t1(t)):moreis(pl(ksi,zeta),pl(eta,upsilon))
-n@[o:more(ksi,eta)]
-t4:=moreisi1(pl(ksi,zeta),pl(eta,upsilon),satz138b(o,n)):moreis(pl(ksi,zeta),pl(eta,upsilon))
--3139
-satz139:=orapp(more(ksi,eta),is(ksi,eta),moreis(pl(ksi,zeta),pl(eta,upsilon)),m,[t:more(ksi,eta)]t4".3139"(t),[t:is(ksi,eta)]t3".3139"(t)):moreis(pl(ksi,zeta),pl(eta,upsilon))
-upsilon@[l:lessis(ksi,eta)][k:lessis(zeta,upsilon)]
-satz139a:=satz124(pl(eta,upsilon),pl(ksi,zeta),satz139(eta,ksi,upsilon,zeta,satz125(ksi,eta,l),satz125(zeta,upsilon,k))):lessis(pl(ksi,zeta),pl(eta,upsilon))
-eta@[l:lessis(ksi,eta)]
-+3140
-[phi:cut][i:is(pl(eta,phi),ksi)]
-t1:=ismore1(pl(eta,phi),ksi,eta,i,satz133(eta,phi)):more(ksi,eta)
-phi@t2:=th3"l.imp"(is(pl(eta,phi),ksi),more(ksi,eta),satz123d(ksi,eta,l),[t:is(pl(eta,phi),ksi)]t1(t)):nis(pl(eta,phi),ksi)
--3140
-vorbemerkung140:=th5"l.some"(cut,[a:cut]is(pl(eta,a),ksi),[a:cut]t2".3140"(a)):not(some([a:cut]is(pl(eta,a),ksi)))
-eta@[phi:cut][psi:cut]
-+*3140
-psi@[m:more(phi,psi)]
-t3:=satz135d(phi,psi,eta,m):more(pl(eta,phi),pl(eta,psi))
-t4:=ec3e21(is(pl(eta,phi),pl(eta,psi)),more(pl(eta,phi),pl(eta,psi)),less(pl(eta,phi),pl(eta,psi)),satz123b(pl(eta,phi),pl(eta,psi)),t3):nis(pl(eta,phi),pl(eta,psi))
-psi@[l:less(phi,psi)]
-t5:=satz135f(phi,psi,eta,l):less(pl(eta,phi),pl(eta,psi))
-t6:=ec3e31(is(pl(eta,phi),pl(eta,psi)),more(pl(eta,phi),pl(eta,psi)),less(pl(eta,phi),pl(eta,psi)),satz123b(pl(eta,phi),pl(eta,psi)),t5):nis(pl(eta,phi),pl(eta,psi))
-psi@[n:nis(phi,psi)]
-t7:=th1"l.or3"(is(phi,psi),more(phi,psi),less(phi,psi),satz123a(phi,psi),n):or(more(phi,psi),less(phi,psi))
-t8:=orapp(more(phi,psi),less(phi,psi),nis(pl(eta,phi),pl(eta,psi)),t7,[t:more(phi,psi)]t4(t),[t:less(phi,psi)]t6(t)):nis(pl(eta,phi),pl(eta,psi))
--3140
-psi@[i:is(pl(eta,phi),ksi)][j:is(pl(eta,psi),ksi)]
-satz140b:=th7"l.imp"(is(phi,psi),nis(pl(eta,phi),pl(eta,psi)),weli(is(pl(eta,phi),pl(eta,psi)),tris2(cut,pl(eta,phi),pl(eta,psi),ksi,i,j)),[t:nis(phi,psi)]t8".3140"(t)):is(phi,psi)
-eta@[z0:rat][x0:rat][y0:rat]
-diffprop1:=and(more"rt"(x0,y0),[t:more"rt"(x0,y0)]is"rt"(z0,mn(x0,y0,t))):'prop'
-diffprop2:=and3(lrt(ksi,x0),urt(eta,y0),diffprop1(z0,x0,y0)):'prop'
-z0@diffprop:=some"rt"([x:rat]some"rt"([y:rat]diffprop2(z0,x,y))):'prop'
-eta@diff:=setof(rat,[z:rat]diffprop(z)):set(rat)
-x0@[lx:lrt(ksi,x0)][y0:rat][uy:urt(eta,y0)][m:more"rt"(x0,y0)][i:is"rt"(z0,mn(x0,y0,m))]
-+*iii3
-i@[m1:more"rt"(x0,y0)]
-t11a:=tris(rat,z0,mn(x0,y0,m),mn(x0,y0,m1),i,satz101g(x0,y0,mn(x0,y0,m),m1,satz101c(x0,y0,m))):is"rt"(z0,mn(x0,y0,m1))
-i@t12:=andi(more"rt"(x0,y0),[t:more"rt"(x0,y0)]is"rt"(z0,mn(x0,y0,t)),m,[t:more"rt"(x0,y0)]t11a(t)):diffprop1(z0,x0,y0)
-t13:=and3i(lrt(ksi,x0),urt(eta,y0),diffprop1(z0,x0,y0),lx,uy,t12):diffprop2(z0,x0,y0)
-t14:=somei(rat,[y:rat]diffprop2(z0,x0,y),y0,t13):some"rt"([y:rat]diffprop2(z0,x0,y))
-t15:=somei(rat,[x:rat]some"rt"([y:rat]diffprop2(z0,x,y)),x0,t14):diffprop(z0)
--iii3
-i@diff1:=estii(rat,[z:rat]diffprop(z),z0,t15".iii3"):in(z0,diff)
-z0@[i:in(z0,diff)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:urt(eta,y)][v:more"rt"(x,y)][w:is"rt"(z0,mn(x,y,v))]p]
-+*iii3
-p1@t16:=estie(rat,[z:rat]diffprop(z),z0,i):diffprop(z0)
--iii3
-p1@[x0:rat][px:some"rt"([y:rat]diffprop2(z0,x0,y))][y0:rat][py:diffprop2(z0,x0,y0)]
-+*iii3
-py@t17:=and3e1(lrt(ksi,x0),urt(eta,y0),diffprop1(z0,x0,y0),py):lrt(ksi,x0)
-t18:=and3e2(lrt(ksi,x0),urt(eta,y0),diffprop1(z0,x0,y0),py):urt(eta,y0)
-t19:=and3e3(lrt(ksi,x0),urt(eta,y0),diffprop1(z0,x0,y0),py):diffprop1(z0,x0,y0)
-t20:=ande1(more"rt"(x0,y0),[t:more"rt"(x0,y0)]is"rt"(z0,mn(x0,y0,t)),t19):more"rt"(x0,y0)
-t21:=ande2"l.r"(more"rt"(x0,y0),[t:more"rt"(x0,y0)]is"rt"(z0,mn(x0,y0,t)),t19):is"rt"(z0,mn(x0,y0,t20))
-t22:=<t21><t20><t18><y0><t17><x0>p1:p
-px@t23:=someapp(rat,[y:rat]diffprop2(z0,x0,y),px,p,[y:rat][t:diffprop2(z0,x0,y)]t22(y,t)):p
--iii3
-p1@diffapp:=someapp(rat,[x:rat]some"rt"([y:rat]diffprop2(z0,x,y)),t16".iii3",p,[x:rat][t:some"rt"([y:rat]diffprop2(z0,x,y))]t23".iii3"(x,t)):p
-eta@[m:more(ksi,eta)]
-+*3140
-m"rp"@[y0:rat][ly:lrt(ksi,y0)][uy:urt(eta,y0)][x0:rat][lx:lrt(ksi,x0)][l:less"rt"(y0,x0)]
-t9:=t2"rp.3134"(eta,m,y0,ly,uy,x0,lx,l):more"rt"(x0,y0)
-t10:=diff1(mn(x0,y0,t9),x0,lx,y0,uy,t9,refis(rat,mn(x0,y0,t9))):in(mn(x0,y0,t9),diff)
-m"rp"@[x1:rat][ux:urt(ksi,x1)][z0:rat][i:in(z0,diff)][x0:rat][lx:lrt(ksi,x0)][y0:rat][uy:urt(eta,y0)][n:more"rt"(x0,y0)][j:is"rt"(z0,mn(x0,y0,n))]
-t11:=isless12"rt"(mn(x0,y0,n),z0,pl"rt"(mn(x0,y0,n),y0),x0,symis(rat,z0,mn(x0,y0,n),j),satz101e(x0,y0,n),satz94a(mn(x0,y0,n),y0)):less"rt"(z0,x0)
-t12:=trless"rt"(z0,x0,x1,t11,cutapp2a(ksi,x0,lx,x1,ux)):less"rt"(z0,x1)
-t13:=ec3e31(is"rt"(z0,x1),more"rt"(z0,x1),less"rt"(z0,x1),satz81b(z0,x1),t12):nis"rt"(z0,x1)
-i@t14:=diffapp(z0,i,nis"rt"(z0,x1),[x:rat][t:lrt(ksi,x)][y:rat][u:urt(eta,y)][v:more"rt"(x,y)][w:is"rt"(z0,mn(x,y,v))]t13(x,t,y,u,v,w)):nis"rt"(z0,x1)
-ux@t15:=th3"l.imp"(in(x1,diff),nis"rt"(x1,x1),weli(is"rt"(x1,x1),refis(rat,x1)),[t:in(x1,diff)]t14(x1,t)):not(in(x1,diff))
-m"rp"@[z0:rat][i:in(z0,diff)][u0:rat][l:less"rt"(u0,z0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][uy:urt(eta,y0)][n:more"rt"(x0,y0)][j:is"rt"(z0,mn(x0,y0,n))]
-t16:=tris(rat,pl"rt"(z0,y0),pl"rt"(mn(x0,y0,n),y0),x0,ispl1"rt"(z0,mn(x0,y0,n),y0,j),satz101e(x0,y0,n)):is"rt"(pl"rt"(z0,y0),x0)
-x2:=pl"rt"(u0,y0):rat
-t17:=isless2"rt"(pl"rt"(z0,y0),x0,x2,t16,satz96c(u0,z0,y0,l)):less"rt"(x2,x0)
-t18:=satz120(ksi,x0,lx,x2,t17):lrt(ksi,x2)
-t19:=ismore1"rt"(pl"rt"(y0,u0),pl"rt"(u0,y0),y0,compl"rt"(y0,u0),satz94(y0,u0)):more"rt"(x2,y0)
-t20:=satz101g(x2,y0,u0,t19,compl"rt"(y0,u0)):is"rt"(u0,mn(x2,y0,t19))
-t21:=diff1(u0,x2,t18,y0,uy,t19,t20):in(u0,diff)
-l@t22:=diffapp(z0,i,in(u0,diff),[x:rat][t:lrt(ksi,x)][y:rat][u:urt(eta,y)][v:more"rt"(x,y)][w:is"rt"(z0,mn(x,y,v))]t21(x,t,y,u,v,w)):in(u0,diff)
-m"rp"@[z0:rat][i:in(z0,diff)][x0:rat][lx:lrt(ksi,x0)][y0:rat][uy:urt(eta,y0)][n:more"rt"(x0,y0)][j:is"rt"(z0,mn(x0,y0,n))][x3:rat][lx3:lrt(ksi,x3)][l:less"rt"(x0,x3)]
-t23:=satz83(x0,x3,l):more"rt"(x3,x0)
-t24:=trmore"rt"(x3,x0,y0,t23,n):more"rt"(x3,y0)
-t25:=ismore12"rt"(x3,pl"rt"(mn(x3,y0,t24),y0),x0,pl"rt"(mn(x0,y0,n),y0),satz101f(x3,y0,t24),satz101f(x0,y0,n),t23):more"rt"(pl"rt"(mn(x3,y0,t24),y0),pl"rt"(mn(x0,y0,n),y0))
-t26:=satz97a(mn(x3,y0,t24),mn(x0,y0,n),y0,t25):more"rt"(mn(x3,y0,t24),mn(x0,y0,n))
-t27:=ismore2"rt"(mn(x0,y0,n),z0,mn(x3,y0,t24),symis(rat,z0,mn(x0,y0,n),j),t26):more"rt"(mn(x3,y0,t24),z0)
-t28:=diff1(mn(x3,y0,t24),x3,lx3,y0,uy,t24,refis(rat,mn(x3,y0,t24))):in(mn(x3,y0,t24),diff)
-t29:=andi(in(mn(x3,y0,t24),diff),more"rt"(mn(x3,y0,t24),z0),t28,t27):and(in(mn(x3,y0,t24),diff),more"rt"(mn(x3,y0,t24),z0))
-t30:=somei(rat,[x:rat]and(in(x,diff),more"rt"(x,z0)),mn(x3,y0,t24),t29):some"rt"([x:rat]and(in(x,diff),more"rt"(x,z0)))
-j@t31:=cutapp3(ksi,x0,lx,some"rt"([x:rat]and(in(x,diff),more"rt"(x,z0))),[y:rat][t:lrt(ksi,y)][u:less"rt"(x0,y)]t30(y,t,u)):some"rt"([x:rat]and(in(x,diff),more"rt"(x,z0)))
-i@t32:=diffapp(z0,i,some"rt"([x:rat]and(in(x,diff),more"rt"(x,z0))),[x:rat][t:lrt(ksi,x)][y:rat][u:urt(eta,y)][v:more"rt"(x,y)][w:is"rt"(z0,mn(x,y,v))]t31(x,t,y,u,v,w)):some"rt"([x:rat]and(in(x,diff),more"rt"(x,z0)))
-m"rp"@[y0:rat][ly:lrt(ksi,y0)][uy:urt(eta,y0)][x0:rat][lx:lrt(ksi,x0)][l:less"rt"(y0,x0)][x1:rat][ux1:urt(ksi,x1)]
-t33:=cut2(diff,mn(x0,y0,t9(y0,ly,uy,x0,lx,l)),t10(y0,ly,uy,x0,lx,l),x1,t15(x1,ux1),[x:rat][t:in(x,diff)][y:rat][u:less"rt"(y,x)]t22(x,t,y,u),[x:rat][t:in(x,diff)]t32(x,t)):cutprop(diff)
-l@t34:=cutapp1b(ksi,cutprop(diff),[x:rat][t:urt(ksi,x)]t33(x,t)):cutprop(diff)
-uy@t35:=cutapp3(ksi,y0,ly,cutprop(diff),[x:rat][t:lrt(ksi,x)][u:less"rt"(y0,x)]t34(x,t,u)):cutprop(diff)
--3140
-m@satz140h:=moreapp(ksi,eta,m,cutprop(diff),[x:rat][u:lrt(ksi,x)][v:urt(eta,x)]t35".3140"(x,u,v)):cutprop(diff)
-+*3140
-m"rp"@chi:=cutof(diff,satz140h):cut
-[z0:rat][lz:lrt(pl(eta,chi),z0)][y1:rat][ly:lrt(eta,y1)][u0:rat][lu:lrt(chi,u0)][i:is"rt"(z0,pl"rt"(y1,u0))][x0:rat][lx:lrt(ksi,x0)][y0:rat][uy:urt(eta,y0)][o:more"rt"(x0,y0)][j:is"rt"(u0,mn(x0,y0,o))]
-t36:=cutapp2b(eta,y1,ly,y0,uy):more"rt"(y0,y1)
-t37:=tr3is(rat,pl"rt"(pl"rt"(mn(x0,y0,o),y1),mn(y0,y1,t36)),pl"rt"(mn(x0,y0,o),pl"rt"(y1,mn(y0,y1,t36))),pl"rt"(mn(x0,y0,o),y0),x0,asspl1"rt"(mn(x0,y0,o),y1,mn(y0,y1,t36)),ispl2"rt"(pl"rt"(y1,mn(y0,y1,t36)),y0,mn(x0,y0,o),satz101c(y0,y1,t36)),satz101e(x0,y0,o)):is"rt"(pl"rt"(pl"rt"(mn(x0,y0,o),y1),mn(y0,y1,t36)),x0)
-t38:=isless2"rt"(pl"rt"(pl"rt"(mn(x0,y0,o),y1),mn(y0,y1,t36)),x0,pl"rt"(mn(x0,y0,o),y1),t37,satz94a(pl"rt"(mn(x0,y0,o),y1),mn(y0,y1,t36))):less"rt"(pl"rt"(mn(x0,y0,o),y1),x0)
-t39:=tr3is(rat,z0,pl"rt"(y1,u0),pl"rt"(u0,y1),pl"rt"(mn(x0,y0,o),y1),i,compl"rt"(y1,u0),ispl1"rt"(u0,mn(x0,y0,o),y1,j)):is"rt"(z0,pl"rt"(mn(x0,y0,o),y1))
-t40:=isless1"rt"(pl"rt"(mn(x0,y0,o),y1),z0,x0,symis(rat,z0,pl"rt"(mn(x0,y0,o),y1),t39),t38):less"rt"(z0,x0)
-t41:=satz120(ksi,x0,lx,z0,t40):lrt(ksi,z0)
-i@t42:=diffapp(u0,ini(diff,satz140h,u0,lu),lrt(ksi,z0),[x:rat][t:lrt(ksi,x)][y:rat][u:urt(eta,y)][v:more"rt"(x,y)][w:is"rt"(u0,mn(x,y,v))]t41(x,t,y,u,v,w)):lrt(ksi,z0)
-lz@a:=plapp(eta,chi,z0,lz,lrt(ksi,z0),[x:rat][t:lrt(eta,x)][y:rat][u:lrt(chi,y)][v:is"rt"(z0,pl"rt"(x,y))]t42(x,t,y,u,v)):lrt(ksi,z0)
-m"rp"@[y0:rat][ly:lrt(ksi,y0)][uy:urt(eta,y0)][x0:rat][lx:lrt(ksi,x0)][l:less"rt"(y0,x0)]
-t43:=satz83(y0,x0,l):more"rt"(x0,y0)
-[y1:rat][ly1:lrt(eta,y1)][y2:rat][uy2:urt(eta,y2)]
-t44:=cutapp2b(eta,y1,ly1,y2,uy2):more"rt"(y2,y1)
-[i:is"rt"(mn(y2,y1,t44),mn(x0,y0,t43))]
-t45:=cutapp2b(eta,y1,ly1,y0,uy):more"rt"(y0,y1)
-t46:=tris(rat,y2,pl"rt"(mn(y2,y1,t44),y1),pl"rt"(mn(x0,y0,t43),y1),satz101f(y2,y1,t44),ispl1"rt"(mn(y2,y1,t44),mn(x0,y0,t43),y1,i)):is"rt"(y2,pl"rt"(mn(x0,y0,t43),y1))
-t47:=tr4is(rat,pl"rt"(y2,mn(y0,y1,t45)),pl"rt"(pl"rt"(mn(x0,y0,t43),y1),mn(y0,y1,t45)),pl"rt"(mn(x0,y0,t43),pl"rt"(y1,mn(y0,y1,t45))),pl"rt"(mn(x0,y0,t43),y0),x0,ispl1"rt"(y2,pl"rt"(mn(x0,y0,t43),y1),mn(y0,y1,t45),t46),asspl1"rt"(mn(x0,y0,t43),y1,mn(y0,y1,t45)),ispl2"rt"(pl"rt"(y1,mn(y0,y1,t45)),y0,mn(x0,y0,t43),satz101c(y0,y1,t45)),satz101e(x0,y0,t43)):is"rt"(pl"rt"(y2,mn(y0,y1,t45)),x0)
-t48:=ismore1"rt"(pl"rt"(y2,mn(y0,y1,t45)),x0,y2,t47,satz94(y2,mn(y0,y1,t45))):more"rt"(x0,y2)
-t49:=satz101g(x0,y2,mn(y0,y1,t45),t48,t47):is"rt"(mn(y0,y1,t45),mn(x0,y2,t48))
-t50:=tris(rat,y0,pl"rt"(mn(y0,y1,t45),y1),pl"rt"(mn(x0,y2,t48),y1),satz101f(y0,y1,t45),ispl1"rt"(mn(y0,y1,t45),mn(x0,y2,t48),y1,t49)):is"rt"(y0,pl"rt"(mn(x0,y2,t48),y1))
-t51:=ine(diff,satz140h,mn(x0,y2,t48),diff1(mn(x0,y2,t48),x0,lx,y2,uy2,t48,refis(rat,mn(x0,y2,t48)))):lrt(chi,mn(x0,y2,t48))
-t52:=lrtpl(eta,chi,y0,y1,ly1,mn(x0,y2,t48),t51,tris(rat,y0,pl"rt"(mn(x0,y2,t48),y1),pl"rt"(y1,mn(x0,y2,t48)),t50,compl"rt"(mn(x0,y2,t48),y1))):lrt(pl(eta,chi),y0)
-l@t53:=satz132app(eta,lrt(pl(eta,chi),y0),mn(x0,y0,t43),[x:rat][t:lrt(eta,x)][y:rat][u:urt(eta,y)][v:is"rt"(mn(y,x,cutapp2b(eta,x,t,y,u)),mn(x0,y0,t43))]t52(x,t,y,u,v)):lrt(pl(eta,chi),y0)
-uy@t54:=cutapp3(ksi,y0,ly,lrt(pl(eta,chi),y0),[x:rat][t:lrt(ksi,x)][u:less"rt"(y0,x)]t53(x,t,u)):lrt(pl(eta,chi),y0)
-ly@[ly0:lrt(eta,y0)][y1:rat][ly1:lrt(ksi,y1)][uy1:urt(eta,y1)]
-t55:=t54(y1,ly1,uy1):lrt(pl(eta,chi),y1)
-t56:=satz120(pl(eta,chi),y1,t55,y0,cutapp2a(eta,y0,ly0,y1,uy1)):lrt(pl(eta,chi),y0)
-ly0@t57:=moreapp(ksi,eta,m,lrt(pl(eta,chi),y0),[x:rat][t:lrt(ksi,x)][u:urt(eta,x)]t56(x,t,u)):lrt(pl(eta,chi),y0)
-ly@b:=th1"l.imp"(lrt(eta,y0),lrt(pl(eta,chi),y0),[t:lrt(eta,y0)]t57(t),[t:urt(eta,y0)]t54(t)):lrt(pl(eta,chi),y0)
-m"rp"@t58:=isi1(pl(eta,chi),ksi,[x:rat][t:lrt(pl(eta,chi),x)]a(x,t),[x:rat][t:lrt(ksi,x)]b(x,t)):is(pl(eta,chi),ksi)
--3140
-m@satz140a:=somei(cut,[a:cut]is(pl(eta,a),ksi),chi".3140",t58".3140"):some([a:cut]is(pl(eta,a),ksi))
-+*3140
-eta@t59:=[c:cut][d:cut][t:is(pl(eta,c),ksi)][u:is(pl(eta,d),ksi)]satz140b(c,d,t,u):amone(cut,[c:cut]is(pl(eta,c),ksi))
--3140
-m@satz140:=onei(cut,[a:cut]is(pl(eta,a),ksi),t59".3140",satz140a):one([a:cut]is(pl(eta,a),ksi))
-mn:=ind(cut,[a:cut]is(pl(eta,a),ksi),satz140):cut
-satz140c:=oneax(cut,[a:cut]is(pl(eta,a),ksi),satz140):is(pl(eta,mn(ksi,eta,m)),ksi)
-satz140d:=symis(cut,pl(eta,mn(ksi,eta,m)),ksi,satz140c):is(ksi,pl(eta,mn(ksi,eta,m)))
-satz140e:=tris(cut,pl(mn(ksi,eta,m),eta),pl(eta,mn(ksi,eta,m)),ksi,compl(mn(ksi,eta,m),eta),satz140c):is(pl(mn(ksi,eta,m),eta),ksi)
-satz140f:=symis(cut,pl(mn(ksi,eta,m),eta),ksi,satz140e):is(ksi,pl(mn(ksi,eta,m),eta))
-eta@[phi:cut][m:more(ksi,eta)][i:is(pl(eta,phi),ksi)]
-satz140g:=satz140b(phi,mn(ksi,eta,m),i,satz140c(m)):is(phi,mn(ksi,eta,m))
-upsilon@[m:more(ksi,zeta)][n:more(eta,upsilon)][i:is(ksi,eta)][j:is(zeta,upsilon)]
-+*3140
-j"rp"@t60:=tr3is(cut,pl(upsilon,mn(ksi,zeta,m)),pl(zeta,mn(ksi,zeta,m)),ksi,eta,ispl1(upsilon,zeta,mn(ksi,zeta,m),symis(cut,zeta,upsilon,j)),satz140c(ksi,zeta,m),i):is(pl(upsilon,mn(ksi,zeta,m)),eta)
--3140
-j@ismn12:=satz140g(eta,upsilon,mn(ksi,zeta,m),n,t60".3140"):is(mn(ksi,zeta,m),mn(eta,upsilon,n))
-zeta@[m:more(ksi,zeta)][n:more(eta,zeta)][i:is(ksi,eta)]
-ismn1:=ismn12(zeta,m,n,i,refis(cut,zeta)):is(mn(ksi,zeta,m),mn(eta,zeta,n))
-zeta@[m:more(zeta,ksi)][n:more(zeta,eta)][i:is(ksi,eta)]
-ismn2:=ismn12(zeta,zeta,ksi,eta,m,n,refis(cut,zeta),i):is(mn(zeta,ksi,m),mn(zeta,eta,n))
-eta@[z0:rat][x0:rat][y0:rat]
-prodprop1:=and3(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,ts(x0,y0))):'prop'
-z0@prodprop:=some"rt"([x:rat]some"rt"([y:rat]prodprop1(z0,x,y))):'prop'
-eta@prod:=setof(rat,[z:rat]prodprop(z)):set(rat)
-x0@[lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,ts(x0,y0))]
-+iii4
-t1:=and3i(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,ts(x0,y0)),lx,ly,i):prodprop1(z0,x0,y0)
-t2:=somei(rat,[y:rat]prodprop1(z0,x0,y),y0,t1):some"rt"([y:rat]prodprop1(z0,x0,y))
-t3:=somei(rat,[x:rat]some"rt"([y:rat]prodprop1(z0,x,y)),x0,t2):prodprop(z0)
--iii4
-prod1:=estii(rat,[z:rat]prodprop(z),z0,t3".iii4"):in(z0,prod)
-z0@[i:in(z0,prod)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,ts(x,y))]p]
-+*iii4
-p1@t4:=estie(rat,[z:rat]prodprop(z),z0,i):prodprop(z0)
--iii4
-p1@[x0:rat][px:some"rt"([y:rat]prodprop1(z0,x0,y))][y0:rat][py:prodprop1(z0,x0,y0)]
-+*iii4
-py@t5:=and3e1(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,ts(x0,y0)),py):lrt(ksi,x0)
-t6:=and3e2(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,ts(x0,y0)),py):lrt(eta,y0)
-t7:=and3e3(lrt(ksi,x0),lrt(eta,y0),is"rt"(z0,ts(x0,y0)),py):is"rt"(z0,ts(x0,y0))
-t8:=<t7><t6><y0><t5><x0>p1:p
-px@t9:=someapp(rat,[y:rat]prodprop1(z0,x0,y),px,p,[y:rat][t:prodprop1(z0,x0,y)]t8(y,t)):p
--iii4
-p1@prodapp:=someapp(rat,[x:rat]some"rt"([y:rat]prodprop1(z0,x,y)),t4".iii4",p,[x:rat][t:some"rt"([y:rat]prodprop1(z0,x,y))]t9".iii4"(x,t)):p
-eta@[x1:rat][ux:urt(ksi,x1)][y1:rat][uy:urt(eta,y1)]
-+4141
-[z0:rat][i:in(z0,prod)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(z0,ts(x0,y0))]
-t1:=cutapp2a(ksi,x0,lx,x1,ux):less"rt"(x0,x1)
-t2:=cutapp2a(eta,y0,ly,y1,uy):less"rt"(y0,y1)
-t3:=isless1"rt"(ts(x0,y0),z0,ts(x1,y1),symis(rat,z0,ts(x0,y0),j),satz107a(x0,x1,y0,y1,t1,t2)):less"rt"(z0,ts(x1,y1))
-t4:=ec3e31(is"rt"(z0,ts(x1,y1)),more"rt"(z0,ts(x1,y1)),less"rt"(z0,ts(x1,y1)),satz81b(z0,ts(x1,y1)),t3):nis"rt"(z0,ts(x1,y1))
-i@t5:=prodapp(ksi,eta,z0,i,nis"rt"(z0,ts(x1,y1)),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,ts(x,y))]t4(x,t,y,u,v)):nis"rt"(z0,ts(x1,y1))
--4141
-satz141a:=th3"l.imp"(in(ts(x1,y1),prod),nis"rt"(ts(x1,y1),ts(x1,y1)),weli(is"rt"(ts(x1,y1),ts(x1,y1)),refis(rat,ts(x1,y1))),[t:in(ts(x1,y1),prod)]t5".4141"(ts(x1,y1),t)):not(in(ts(x1,y1),prod))
--rp
-@[x0:rat][y0:rat]
-+4141
-v0:=ts(ov(1rt,y0),x0):rat
-t6:=tr3is(rat,ts(y0,v0),ts(ts(y0,ov(1rt,y0)),x0),ts(1rt,x0),x0,assts2(y0,ov(1rt,y0),x0),ists1(ts(y0,ov(1rt,y0)),1rt,x0,satz110c(1rt,y0)),example1c(x0)):is(ts(y0,v0),x0)
--4141
-satz141b:=satz110g(x0,y0,v0".4141",t6".4141"):is(ts(ov(1rt,y0),x0),ov(x0,y0))
-satz141c:=symis(rat,ts(ov(1rt,y0),x0),ov(x0,y0),satz141b):is"rt"(ov(x0,y0),ts(ov(1rt,y0),x0))
-+*rp
-+*4141
-eta@[u0:rat][i:in(u0,prod)][z0:rat][l:less"rt"(z0,u0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(u0,ts(x0,y0))]
-t7:=isless2"rt"(u0,ts(x0,y0),z0,j,l):less"rt"(z0,ts(x0,y0))
-t8:=tr3is(rat,ts(ov(1rt,x0),ts(x0,y0)),ts(ts(ov(1rt,x0),x0),y0),ts(1rt,y0),y0,assts2(ov(1rt,x0),x0,y0),ists1(ts(ov(1rt,x0),x0),1rt,y0,satz110e(1rt,x0)),example1c(y0)):is"rt"(ts(ov(1rt,x0),ts(x0,y0)),y0)
-t9:=isless12"rt"(ts(ov(1rt,x0),z0),ov(z0,x0),ts(ov(1rt,x0),ts(x0,y0)),y0,satz141b(z0,x0),t8,satz105f(z0,ts(x0,y0),ov(1rt,x0),t7)):less"rt"(ov(z0,x0),y0)
-t10:=satz120(eta,y0,ly,ov(z0,x0),t9):lrt(eta,ov(z0,x0))
-t11:=prod1(z0,x0,lx,ov(z0,x0),t10,satz110d(z0,x0)):in(z0,prod)
-l@t12:=prodapp(u0,i,in(z0,prod),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(u0,ts(x,y))]t11(x,t,y,u,v)):in(z0,prod)
-eta@[z0:rat][i:in(z0,prod)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(z0,ts(x0,y0))][x1:rat][lx1:lrt(ksi,x1)][l:less"rt"(x0,x1)]
-t13:=prod1(ts(x1,y0),x1,lx1,y0,ly,refis(rat,ts(x1,y0))):in(ts(x1,y0),prod)
-t14:=satz105a(x1,x0,y0,satz83(x0,x1,l)):more"rt"(ts(x1,y0),ts(x0,y0))
-t15:=ismore2"rt"(ts(x0,y0),z0,ts(x1,y0),symis(rat,z0,ts(x0,y0),j),t14):more"rt"(ts(x1,y0),z0)
-t16:=andi(in(ts(x1,y0),prod),more"rt"(ts(x1,y0),z0),t13,t15):and(in(ts(x1,y0),prod),more"rt"(ts(x1,y0),z0))
-t17:=somei(rat,[y:rat]and(in(y,prod),more"rt"(y,z0)),ts(x1,y0),t16):some"rt"([y:rat]and(in(y,prod),more"rt"(y,z0)))
-j@t18:=cutapp3(ksi,x0,lx,some"rt"([y:rat]and(in(y,prod),more"rt"(y,z0))),[x:rat][t:lrt(ksi,x)][u:less"rt"(x0,x)]t17(x,t,u)):some"rt"([y:rat]and(in(y,prod),more"rt"(y,z0)))
-i@t19:=prodapp(z0,i,some"rt"([y:rat]and(in(y,prod),more"rt"(y,z0))),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,ts(x,y))]t18(x,t,y,u,v)):some"rt"([y:rat]and(in(y,prod),more"rt"(y,z0)))
-eta@[x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][x1:rat][ux:urt(ksi,x1)][y1:rat][uy:urt(eta,y1)]
-t20:=cut2(prod,ts(x0,y0),prod1(ts(x0,y0),x0,lx,y0,ly,refis(rat,ts(x0,y0))),ts(x1,y1),satz141a(x1,ux,y1,uy),[x:rat][t:in(x,prod)][y:rat][u:less"rt"(y,x)]t12(x,t,y,u),[x:rat][t:in(x,prod)]t19(x,t)):cutprop(prod)
-ux@t21:=cutapp1b(eta,cutprop(prod),[y:rat][t:urt(eta,y)]t20(y,t)):cutprop(prod)
-ly@t22:=cutapp1b(ksi,cutprop(prod),[x:rat][t:urt(ksi,x)]t21(x,t)):cutprop(prod)
-lx@t23:=cutapp1a(eta,cutprop(prod),[y:rat][t:lrt(eta,y)]t22(y,t)):cutprop(prod)
--4141
-eta@satz141:=cutapp1a(ksi,cutprop(prod),[x:rat][t:lrt(ksi,x)]t23".4141"(x,t)):cutprop(prod)
-ts:=cutof(prod,satz141):cut
-[z0:rat][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,ts"rt"(x0,y0))]
-lrtts:=ine(prod,satz141,z0,prod1(z0,x0,lx,y0,ly,i)):lrt(ts(ksi,eta),z0)
-eta@[z0:rat][x0:rat][ux:urt(ksi,x0)][y0:rat][uy:urt(eta,y0)][i:is"rt"(z0,ts"rt"(x0,y0))]
-+*iii4
-i@t10:=isp1(rat,[x:rat]not(in(x,prod)),ts"rt"(x0,y0),z0,satz141a(x0,ux,y0,uy),i):not(in(z0,prod))
--iii4
-i@urtts:=th3"l.imp"(lrt(ts(ksi,eta),z0),in(z0,prod),t10".iii4",[t:lrt(ts(ksi,eta),z0)]ini(prod,satz141,z0,t)):urt(ts(ksi,eta),z0)
-eta@[z0:rat][lz:lrt(ts(ksi,eta),z0)][p:'prop'][p1:[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,ts"rt"(x,y))]p]
-+*iii4
-p1@t11:=ini(prod,satz141,z0,lz):in(z0,prod)
--iii4
-p1@tsapp:=prodapp(z0,t11".iii4",p,p1):p
-zeta@[i:is(ksi,eta)]
-ists1:=isf(cut,cut,[u:cut]ts(u,zeta),ksi,eta,i):is(ts(ksi,zeta),ts(eta,zeta))
-ists2:=isf(cut,cut,[u:cut]ts(zeta,u),ksi,eta,i):is(ts(zeta,ksi),ts(zeta,eta))
-upsilon@[i:is(ksi,eta)][j:is(zeta,upsilon)]
-ists12:=tris(cut,ts(ksi,zeta),ts(eta,zeta),ts(eta,upsilon),ists1(i),ists2(zeta,upsilon,eta,j)):is(ts(ksi,zeta),ts(eta,upsilon))
-+4142
-eta@[z0:rat][lz:lrt(ts(ksi,eta),z0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][i:is"rt"(z0,ts"rt"(x0,y0))]
-t1:=tris(rat,z0,ts"rt"(x0,y0),ts"rt"(y0,x0),i,comts(x0,y0)):is"rt"(z0,ts"rt"(y0,x0))
-t2:=lrtts(eta,ksi,z0,y0,ly,x0,lx,t1):lrt(ts(eta,ksi),z0)
-lz@t3:=tsapp(ksi,eta,z0,lz,lrt(ts(eta,ksi),z0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(z0,ts"rt"(x,y))]t2(x,t,y,u,v)):lrt(ts(eta,ksi),z0)
--4142
-eta@satz142:=isi1(ts(ksi,eta),ts(eta,ksi),[x:rat][t:lrt(ts(ksi,eta),x)]t3".4142"(x,t),[x:rat][t:lrt(ts(eta,ksi),x)]t3".4142"(eta,ksi,x,t)):is(ts(ksi,eta),ts(eta,ksi))
-comts:=satz142:is(ts(ksi,eta),ts(eta,ksi))
-+4143
-zeta@[u0:rat][lu:lrt(ts(ts(ksi,eta),zeta),u0)][v0:rat][lv:lrt(ts(ksi,eta),v0)][z0:rat][lz:lrt(zeta,z0)][i:is"rt"(u0,ts"rt"(v0,z0))][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(v0,ts"rt"(x0,y0))]
-t1:=tr3is(rat,u0,ts"rt"(v0,z0),ts"rt"(ts"rt"(x0,y0),z0),ts"rt"(x0,ts"rt"(y0,z0)),i,ists1"rt"(v0,ts"rt"(x0,y0),z0,j),assts1(x0,y0,z0)):is"rt"(u0,ts"rt"(x0,ts"rt"(y0,z0)))
-t2:=lrtts(eta,zeta,ts"rt"(y0,z0),y0,ly,z0,lz,refis(rat,ts"rt"(y0,z0))):lrt(ts(eta,zeta),ts"rt"(y0,z0))
-t3:=lrtts(ksi,ts(eta,zeta),u0,x0,lx,ts"rt"(y0,z0),t2,t1):lrt(ts(ksi,ts(eta,zeta)),u0)
-i@t4:=tsapp(ksi,eta,v0,lv,lrt(ts(ksi,ts(eta,zeta)),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(v0,ts"rt"(x,y))]t3(x,t,y,u,v)):lrt(ts(ksi,ts(eta,zeta)),u0)
-lu@t5:=tsapp(ts(ksi,eta),zeta,u0,lu,lrt(ts(ksi,ts(eta,zeta)),u0),[x:rat][t:lrt(ts(ksi,eta),x)][y:rat][u:lrt(zeta,y)][v:is"rt"(u0,ts"rt"(x,y))]t4(x,t,y,u,v)):lrt(ts(ksi,ts(eta,zeta)),u0)
-u0@[lu:lrt(ts(ksi,ts(eta,zeta)),u0)][x0:rat][lx:lrt(ksi,x0)][v0:rat][lv:lrt(ts(eta,zeta),v0)][i:is"rt"(u0,ts"rt"(x0,v0))][y0:rat][ly:lrt(eta,y0)][z0:rat][lz:lrt(zeta,z0)][j:is"rt"(v0,ts"rt"(y0,z0))]
-t6:=tr3is(rat,u0,ts"rt"(x0,v0),ts"rt"(x0,ts"rt"(y0,z0)),ts"rt"(ts"rt"(x0,y0),z0),i,ists2"rt"(v0,ts"rt"(y0,z0),x0,j),assts2(x0,y0,z0)):is"rt"(u0,ts"rt"(ts"rt"(x0,y0),z0))
-t7:=lrtts(ksi,eta,ts"rt"(x0,y0),x0,lx,y0,ly,refis(rat,ts"rt"(x0,y0))):lrt(ts(ksi,eta),ts"rt"(x0,y0))
-t8:=lrtts(ts(ksi,eta),zeta,u0,ts"rt"(x0,y0),t7,z0,lz,t6):lrt(ts(ts(ksi,eta),zeta),u0)
-i@t9:=tsapp(eta,zeta,v0,lv,lrt(ts(ts(ksi,eta),zeta),u0),[x:rat][t:lrt(eta,x)][y:rat][u:lrt(zeta,y)][v:is"rt"(v0,ts"rt"(x,y))]t8(x,t,y,u,v)):lrt(ts(ts(ksi,eta),zeta),u0)
-lu@t10:=tsapp(ksi,ts(eta,zeta),u0,lu,lrt(ts(ts(ksi,eta),zeta),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(ts(eta,zeta),y)][v:is"rt"(u0,ts"rt"(x,y))]t9(x,t,y,u,v)):lrt(ts(ts(ksi,eta),zeta),u0)
--4143
-zeta@satz143:=isi1(ts(ts(ksi,eta),zeta),ts(ksi,ts(eta,zeta)),[x:rat][t:lrt(ts(ts(ksi,eta),zeta),x)]t5".4143"(x,t),[x:rat][t:lrt(ts(ksi,ts(eta,zeta)),x)]t10".4143"(x,t)):is(ts(ts(ksi,eta),zeta),ts(ksi,ts(eta,zeta)))
-assts1:=satz143:is(ts(ts(ksi,eta),zeta),ts(ksi,ts(eta,zeta)))
-assts2:=symis(cut,ts(ts(ksi,eta),zeta),ts(ksi,ts(eta,zeta)),satz143):is(ts(ksi,ts(eta,zeta)),ts(ts(ksi,eta),zeta))
-+4144
-[u0:rat][lu:lrt(ts(ksi,pl(eta,zeta)),u0)][x0:rat][lx:lrt(ksi,x0)][v0:rat][lv:lrt(pl(eta,zeta),v0)][i:is"rt"(u0,ts"rt"(x0,v0))][y0:rat][ly:lrt(eta,y0)][z0:rat][lz:lrt(zeta,z0)][j:is"rt"(v0,pl"rt"(y0,z0))]
-t1:=tr3is(rat,u0,ts"rt"(x0,v0),ts"rt"(x0,pl"rt"(y0,z0)),pl"rt"(ts"rt"(x0,y0),ts"rt"(x0,z0)),i,ists2"rt"(v0,pl"rt"(y0,z0),x0,j),disttp2(x0,y0,z0)):is"rt"(u0,pl"rt"(ts"rt"(x0,y0),ts"rt"(x0,z0)))
-t2:=lrtts(ksi,eta,ts"rt"(x0,y0),x0,lx,y0,ly,refis(rat,ts"rt"(x0,y0))):lrt(ts(ksi,eta),ts"rt"(x0,y0))
-t3:=lrtts(ksi,zeta,ts"rt"(x0,z0),x0,lx,z0,lz,refis(rat,ts"rt"(x0,z0))):lrt(ts(ksi,zeta),ts"rt"(x0,z0))
-t4:=lrtpl(ts(ksi,eta),ts(ksi,zeta),u0,ts"rt"(x0,y0),t2,ts"rt"(x0,z0),t3,t1):lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0)
-i@t5:=plapp(eta,zeta,v0,lv,lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0),[x:rat][t:lrt(eta,x)][y:rat][u:lrt(zeta,y)][v:is"rt"(v0,pl"rt"(x,y))]t4(x,t,y,u,v)):lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0)
-lu@t6:=tsapp(ksi,pl(eta,zeta),u0,lu,lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(pl(eta,zeta),y)][v:is"rt"(u0,ts"rt"(x,y))]t5(x,t,y,u,v)):lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0)
-u0@[lu:lrt(pl(ts(ksi,eta),ts(ksi,zeta)),u0)][v0:rat][lv:lrt(ts(ksi,eta),v0)][w0:rat][lw:lrt(ts(ksi,zeta),w0)][i:is"rt"(u0,pl"rt"(v0,w0))][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(eta,y0)][j:is"rt"(v0,ts"rt"(x0,y0))][x1:rat][lx1:lrt(ksi,x1)][z0:rat][lz:lrt(zeta,z0)][k:is"rt"(w0,ts"rt"(x1,z0))]
-t7:=tris(rat,u0,pl"rt"(v0,w0),pl"rt"(ts"rt"(x0,y0),ts"rt"(x1,z0)),i,ispl12"rt"(v0,ts"rt"(x0,y0),w0,ts"rt"(x1,z0),j,k)):is"rt"(u0,pl"rt"(ts"rt"(x0,y0),ts"rt"(x1,z0)))
-x2:=ite(moreis"rt"(x0,x1),rat,x0,x1):rat
-[m:moreis"rt"(x0,x1)]
-t8:=itet(moreis"rt"(x0,x1),rat,x0,x1,m):is"rt"(x2,x0)
-t9:=isp1(rat,[t:rat]lrt(ksi,t),x0,x2,lx,t8):lrt(ksi,x2)
-t10:=lessisi2"rt"(x0,x2,symis(rat,x2,x0,t8)):lessis"rt"(x0,x2)
-t11:=satz88(x1,x0,x2,satz84(x0,x1,m),t10):lessis"rt"(x1,x2)
-k@[n:not(moreis"rt"(x0,x1))]
-t12:=itef(moreis"rt"(x0,x1),rat,x0,x1,n):is"rt"(x2,x1)
-t13:=isp1(rat,[t:rat]lrt(ksi,t),x1,x2,lx1,t12):lrt(ksi,x2)
-t14:=lessisi2"rt"(x1,x2,symis(rat,x2,x1,t12)):lessis"rt"(x1,x2)
-t15:=lessisi1"rt"(x0,x2,satz87b(x0,x1,x2,satz81j(x0,x1,n),t14)):lessis"rt"(x0,x2)
-k@t16:=th1"l.imp"(moreis"rt"(x0,x1),lrt(ksi,x2),[t:moreis"rt"(x0,x1)]t9(t),[t:not(moreis"rt"(x0,x1))]t13(t)):lrt(ksi,x2)
-t17:=th1"l.imp"(moreis"rt"(x0,x1),lessis"rt"(x0,x2),[t:moreis"rt"(x0,x1)]t10(t),[t:not(moreis"rt"(x0,x1))]t15(t)):lessis"rt"(x0,x2)
-t18:=th1"l.imp"(moreis"rt"(x0,x1),lessis"rt"(x1,x2),[t:moreis"rt"(x0,x1)]t11(t),[t:not(moreis"rt"(x0,x1))]t14(t)):lessis"rt"(x1,x2)
-t19:=lrtpl(eta,zeta,pl"rt"(y0,z0),y0,ly,z0,lz,refis(rat,pl"rt"(y0,z0))):lrt(pl(eta,zeta),pl"rt"(y0,z0))
-t20:=lrtts(ksi,pl(eta,zeta),ts"rt"(x2,pl"rt"(y0,z0)),x2,t16,pl"rt"(y0,z0),t19,refis(rat,ts"rt"(x2,pl"rt"(y0,z0)))):lrt(ts(ksi,pl(eta,zeta)),ts"rt"(x2,pl"rt"(y0,z0)))
-t21:=satz109a(x0,x2,y0,y0,t17,lessisi2"rt"(y0,y0,refis(rat,y0))):lessis"rt"(ts"rt"(x0,y0),ts"rt"(x2,y0))
-t22:=satz109a(x1,x2,z0,z0,t18,lessisi2"rt"(z0,z0,refis(rat,z0))):lessis"rt"(ts"rt"(x1,z0),ts"rt"(x2,z0))
-t23:=islessis12"rt"(pl"rt"(ts"rt"(x0,y0),ts"rt"(x1,z0)),u0,pl"rt"(ts"rt"(x2,y0),ts"rt"(x2,z0)),ts"rt"(x2,pl"rt"(y0,z0)),symis(rat,u0,pl"rt"(ts"rt"(x0,y0),ts"rt"(x1,z0)),t7),distpt2(x2,y0,z0),satz100a(ts"rt"(x0,y0),ts"rt"(x2,y0),ts"rt"(x1,z0),ts"rt"(x2,z0),t21,t22)):lessis"rt"(u0,ts"rt"(x2,pl"rt"(y0,z0)))
-t24:=orapp(less"rt"(u0,ts"rt"(x2,pl"rt"(y0,z0))),is"rt"(u0,ts"rt"(x2,pl"rt"(y0,z0))),lrt(ts(ksi,pl(eta,zeta)),u0),t23,[t:less"rt"(u0,ts"rt"(x2,pl"rt"(y0,z0)))]satz120(ts(ksi,pl(eta,zeta)),ts"rt"(x2,pl"rt"(y0,z0)),t20,u0,t),[t:is"rt"(u0,ts"rt"(x2,pl"rt"(y0,z0)))]isp1(rat,[u:rat]lrt(ts(ksi,pl(eta,zeta)),u),ts"rt"(x2,pl"rt"(y0,z0)),u0,t20,t)):lrt(ts(ksi,pl(eta,zeta)),u0)
-j@t25:=tsapp(ksi,zeta,w0,lw,lrt(ts(ksi,pl(eta,zeta)),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(zeta,y)][v:is"rt"(w0,ts"rt"(x,y))]t24(x,t,y,u,v)):lrt(ts(ksi,pl(eta,zeta)),u0)
-i@t26:=tsapp(ksi,eta,v0,lv,lrt(ts(ksi,pl(eta,zeta)),u0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(eta,y)][v:is"rt"(v0,ts"rt"(x,y))]t25(x,t,y,u,v)):lrt(ts(ksi,pl(eta,zeta)),u0)
-lu@t27:=plapp(ts(ksi,eta),ts(ksi,zeta),u0,lu,lrt(ts(ksi,pl(eta,zeta)),u0),[x:rat][t:lrt(ts(ksi,eta),x)][y:rat][u:lrt(ts(ksi,zeta),y)][v:is"rt"(u0,pl"rt"(x,y))]t26(x,t,y,u,v)):lrt(ts(ksi,pl(eta,zeta)),u0)
--4144
-satz144:=isi1(ts(ksi,pl(eta,zeta)),pl(ts(ksi,eta),ts(ksi,zeta)),[x:rat][t:lrt(ts(ksi,pl(eta,zeta)),x)]t6".4144"(x,t),[x:rat][t:lrt(pl(ts(ksi,eta),ts(ksi,zeta)),x)]t27".4144"(x,t)):is(ts(ksi,pl(eta,zeta)),pl(ts(ksi,eta),ts(ksi,zeta)))
-disttp1:=tr3is(cut,ts(pl(ksi,eta),zeta),ts(zeta,pl(ksi,eta)),pl(ts(zeta,ksi),ts(zeta,eta)),pl(ts(ksi,zeta),ts(eta,zeta)),comts(pl(ksi,eta),zeta),satz144(zeta,ksi,eta),ispl12(ts(zeta,ksi),ts(ksi,zeta),ts(zeta,eta),ts(eta,zeta),comts(zeta,ksi),comts(zeta,eta))):is(ts(pl(ksi,eta),zeta),pl(ts(ksi,zeta),ts(eta,zeta)))
-disttp2:=satz144:is(ts(ksi,pl(eta,zeta)),pl(ts(ksi,eta),ts(ksi,zeta)))
-distpt1:=symis(cut,ts(pl(ksi,eta),zeta),pl(ts(ksi,zeta),ts(eta,zeta)),disttp1):is(pl(ts(ksi,zeta),ts(eta,zeta)),ts(pl(ksi,eta),zeta))
-distpt2:=symis(cut,ts(ksi,pl(eta,zeta)),pl(ts(ksi,eta),ts(ksi,zeta)),disttp2):is(pl(ts(ksi,eta),ts(ksi,zeta)),ts(ksi,pl(eta,zeta)))
-[m:more(ksi,eta)]
-+4145
-phi:=mn(ksi,eta,m):cut
-t1:=satz140d(ksi,eta,m):is(ksi,pl(eta,phi))
-t2:=tris(cut,ts(ksi,zeta),ts(pl(eta,phi),zeta),pl(ts(eta,zeta),ts(phi,zeta)),ists1(ksi,pl(eta,phi),zeta,t1),disttp1(eta,phi,zeta)):is(ts(ksi,zeta),pl(ts(eta,zeta),ts(phi,zeta)))
--4145
-satz145a:=ismore1(pl(ts(eta,zeta),ts(phi".4145",zeta)),ts(ksi,zeta),ts(eta,zeta),symis(cut,ts(ksi,zeta),pl(ts(eta,zeta),ts(phi".4145",zeta)),t2".4145"),satz133(ts(eta,zeta),ts(phi".4145",zeta))):more(ts(ksi,zeta),ts(eta,zeta))
-zeta@[i:is(ksi,eta)]
-satz145b:=ists1(ksi,eta,zeta,i):is(ts(ksi,zeta),ts(eta,zeta))
-zeta@[l:less(ksi,eta)]
-satz145c:=satz121(ts(eta,zeta),ts(ksi,zeta),satz145a(eta,ksi,zeta,satz122(ksi,eta,l))):less(ts(ksi,zeta),ts(eta,zeta))
-m@satz145d:=ismore12(ts(ksi,zeta),ts(zeta,ksi),ts(eta,zeta),ts(zeta,eta),comts(ksi,zeta),comts(eta,zeta),satz145a):more(ts(zeta,ksi),ts(zeta,eta))
-i@satz145e:=ists2(ksi,eta,zeta,i):is(ts(zeta,ksi),ts(zeta,eta))
-l@satz145f:=isless12(ts(ksi,zeta),ts(zeta,ksi),ts(eta,zeta),ts(zeta,eta),comts(ksi,zeta),comts(eta,zeta),satz145c):less(ts(zeta,ksi),ts(zeta,eta))
-upsilon@[i:is(ksi,eta)][m:more(zeta,upsilon)]
-satz145g:=ismore2(ts(ksi,upsilon),ts(eta,upsilon),ts(ksi,zeta),ists1(ksi,eta,upsilon,i),satz145d(zeta,upsilon,ksi,m)):more(ts(ksi,zeta),ts(eta,upsilon))
-satz145h:=ismore12(ts(ksi,zeta),ts(zeta,ksi),ts(eta,upsilon),ts(upsilon,eta),comts(ksi,zeta),comts(eta,upsilon),satz145g):more(ts(zeta,ksi),ts(upsilon,eta))
-i@[l:less(zeta,upsilon)]
-satz145j:=isless2(ts(ksi,upsilon),ts(eta,upsilon),ts(ksi,zeta),ists1(ksi,eta,upsilon,i),satz145f(zeta,upsilon,ksi,l)):less(ts(ksi,zeta),ts(eta,upsilon))
-satz145k:=isless12(ts(ksi,zeta),ts(zeta,ksi),ts(eta,upsilon),ts(upsilon,eta),comts(ksi,zeta),comts(eta,upsilon),satz145j):less(ts(zeta,ksi),ts(upsilon,eta))
-+4146
-zeta@t1:=satz123a(ksi,eta):or3(is(ksi,eta),more(ksi,eta),less(ksi,eta))
-t2:=satz123b(ts(ksi,zeta),ts(eta,zeta)):ec3(is(ts(ksi,zeta),ts(eta,zeta)),more(ts(ksi,zeta),ts(eta,zeta)),less(ts(ksi,zeta),ts(eta,zeta)))
--4146
-zeta@[m:more(ts(ksi,zeta),ts(eta,zeta))]
-satz146a:=th11"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(ts(ksi,zeta),ts(eta,zeta)),more(ts(ksi,zeta),ts(eta,zeta)),less(ts(ksi,zeta),ts(eta,zeta)),t1".4146",t2".4146",[u:is(ksi,eta)]satz145b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz145a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz145c(ksi,eta,zeta,u),m):more(ksi,eta)
-zeta@[i:is(ts(ksi,zeta),ts(eta,zeta))]
-satz146b:=th10"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(ts(ksi,zeta),ts(eta,zeta)),more(ts(ksi,zeta),ts(eta,zeta)),less(ts(ksi,zeta),ts(eta,zeta)),t1".4146",t2".4146",[u:is(ksi,eta)]satz145b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz145a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz145c(ksi,eta,zeta,u),i):is(ksi,eta)
-zeta@[l:less(ts(ksi,zeta),ts(eta,zeta))]
-satz146c:=th12"l.ec3"(is(ksi,eta),more(ksi,eta),less(ksi,eta),is(ts(ksi,zeta),ts(eta,zeta)),more(ts(ksi,zeta),ts(eta,zeta)),less(ts(ksi,zeta),ts(eta,zeta)),t1".4146",t2".4146",[u:is(ksi,eta)]satz145b(ksi,eta,zeta,u),[u:more(ksi,eta)]satz145a(ksi,eta,zeta,u),[u:less(ksi,eta)]satz145c(ksi,eta,zeta,u),l):less(ksi,eta)
-zeta@[m:more(ts(zeta,ksi),ts(zeta,eta))]
-satz146d:=satz146a(ismore12(ts(zeta,ksi),ts(ksi,zeta),ts(zeta,eta),ts(eta,zeta),comts(zeta,ksi),comts(zeta,eta),m)):more(ksi,eta)
-zeta@[i:is(ts(zeta,ksi),ts(zeta,eta))]
-satz146e:=satz146b(tr3is(cut,ts(ksi,zeta),ts(zeta,ksi),ts(zeta,eta),ts(eta,zeta),comts(ksi,zeta),i,comts(zeta,eta))):is(ksi,eta)
-zeta@[l:less(ts(zeta,ksi),ts(zeta,eta))]
-satz146f:=satz146c(isless12(ts(zeta,ksi),ts(ksi,zeta),ts(zeta,eta),ts(eta,zeta),comts(zeta,ksi),comts(zeta,eta),l)):less(ksi,eta)
-upsilon@[m:more(ksi,eta)][n:more(zeta,upsilon)]
-+4147
-t1:=satz145a(ksi,eta,zeta,m):more(ts(ksi,zeta),ts(eta,zeta))
-t2:=ismore12(ts(zeta,eta),ts(eta,zeta),ts(upsilon,eta),ts(eta,upsilon),comts(zeta,eta),comts(upsilon,eta),satz145a(zeta,upsilon,eta,n)):more(ts(eta,zeta),ts(eta,upsilon))
--4147
-satz147:=trmore(ts(ksi,zeta),ts(eta,zeta),ts(eta,upsilon),t1".4147",t2".4147"):more(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[l:less(ksi,eta)][k:less(zeta,upsilon)]
-satz147a:=satz121(ts(eta,upsilon),ts(ksi,zeta),satz147(eta,ksi,upsilon,zeta,satz122(ksi,eta,l),satz122(zeta,upsilon,k))):less(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[m:moreis(ksi,eta)][n:more(zeta,upsilon)]
-satz148a:=orapp(more(ksi,eta),is(ksi,eta),more(ts(ksi,zeta),ts(eta,upsilon)),m,[t:more(ksi,eta)]satz147(t,n),[t:is(ksi,eta)]satz145g(t,n)):more(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[m:more(ksi,eta)][n:moreis(zeta,upsilon)]
-satz148b:=orapp(more(zeta,upsilon),is(zeta,upsilon),more(ts(ksi,zeta),ts(eta,upsilon)),n,[t:more(zeta,upsilon)]satz147(m,t),[t:is(zeta,upsilon)]satz145h(zeta,upsilon,ksi,eta,t,m)):more(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[l:lessis(ksi,eta)][k:less(zeta,upsilon)]
-satz148c:=satz121(ts(eta,upsilon),ts(ksi,zeta),satz148a(eta,ksi,upsilon,zeta,satz125(ksi,eta,l),satz122(zeta,upsilon,k))):less(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[l:less(ksi,eta)][k:lessis(zeta,upsilon)]
-satz148d:=satz121(ts(eta,upsilon),ts(ksi,zeta),satz148b(eta,ksi,upsilon,zeta,satz122(ksi,eta,l),satz125(zeta,upsilon,k))):less(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[m:moreis(ksi,eta)][n:moreis(zeta,upsilon)]
-+4149
-[i:is(ksi,eta)][j:is(zeta,upsilon)]
-t1:=moreisi2(ts(ksi,zeta),ts(eta,upsilon),ists12(ksi,eta,zeta,upsilon,i,j)):moreis(ts(ksi,zeta),ts(eta,upsilon))
-i@[o:more(zeta,upsilon)]
-t2:=moreisi1(ts(ksi,zeta),ts(eta,upsilon),satz148a(m,o)):moreis(ts(ksi,zeta),ts(eta,upsilon))
-i@t3:=orapp(more(zeta,upsilon),is(zeta,upsilon),moreis(ts(ksi,zeta),ts(eta,upsilon)),n,[t:more(zeta,upsilon)]t2(t),[t:is(zeta,upsilon)]t1(t)):moreis(ts(ksi,zeta),ts(eta,upsilon))
-n@[o:more(ksi,eta)]
-t4:=moreisi1(ts(ksi,zeta),ts(eta,upsilon),satz148b(o,n)):moreis(ts(ksi,zeta),ts(eta,upsilon))
--4149
-satz149:=orapp(more(ksi,eta),is(ksi,eta),moreis(ts(ksi,zeta),ts(eta,upsilon)),m,[t:more(ksi,eta)]t4".4149"(t),[t:is(ksi,eta)]t3".4149"(t)):moreis(ts(ksi,zeta),ts(eta,upsilon))
-upsilon@[l:lessis(ksi,eta)][k:lessis(zeta,upsilon)]
-satz149a:=satz124(ts(eta,upsilon),ts(ksi,zeta),satz149(eta,ksi,upsilon,zeta,satz125(ksi,eta,l),satz125(zeta,upsilon,k))):lessis(ts(ksi,zeta),ts(eta,upsilon))
--rp
-@[r0:rat]
-ratset:=setof(rat,[x:rat]less(x,r0)):set(rat)
-+4150
-t1:=satz90(r0):some([x:rat]less(x,r0))
-[x0:rat][l:less(x0,r0)]
-t2:=estii(rat,[x:rat]less(x,r0),x0,l):in(x0,ratset)
-r0@t3:=ec3e13(is(r0,r0),more(r0,r0),less(r0,r0),satz81b(r0,r0),refis(rat,r0)):not(less(r0,r0))
-t4:=th3"l.imp"(in(r0,ratset),less(r0,r0),t3,[t:in(r0,ratset)]estie(rat,[x:rat]less(x,r0),r0,t)):not(in(r0,ratset))
-x0@[i:in(x0,ratset)]
-t5:=estie(rat,[x:rat]less(x,r0),x0,i):less(x0,r0)
-[x1:rat][k:less(x1,x0)]
-t6:=t2(x1,trless(x1,x0,r0,k,t5)):in(x1,ratset)
-i@t7:=satz91(x0,r0,t5):some([x:rat]and(less(x0,x),less(x,r0)))
-[x1:rat][a:and(less(x0,x1),less(x1,r0))]
-t8:=ande1(less(x0,x1),less(x1,r0),a):less(x0,x1)
-t9:=ande2(less(x0,x1),less(x1,r0),a):less(x1,r0)
-t10:=andi(in(x1,ratset),more(x1,x0),t2(x1,t9),satz83(x0,x1,t8)):and(in(x1,ratset),more(x1,x0))
-i@t11:=th6"l.some"(rat,[x:rat]and(less(x0,x),less(x,r0)),[x:rat]and(in(x,ratset),more(x,x0)),t7,[x:rat][t:and(less(x0,x),less(x,r0))]t10(x,t)):some([x:rat]and(in(x,ratset),more(x,x0)))
-l@t12:=cut2(ratset,x0,t2,r0,t4,[x:rat][t:in(x,ratset)][y:rat][u:less(y,x)]t6(x,t,y,u),[x:rat][t:in(x,ratset)]t11(x,t)):cutprop(ratset)
--4150
-satz150:=someapp(rat,[x:rat]less(x,r0),t1".4150",cutprop(ratset),[x:rat][t:less(x,r0)]t12".4150"(x,t)):cutprop(ratset)
-+*rp
-r0@rpofrt:=cutof(ratset,satz150):cut
-[x0:rat][l:less"rt"(x0,r0)]
-lrtrpofrt:=ine(ratset,satz150,x0,t2"rt.4150"(x0,l)):lrt(rpofrt,x0)
-r0@[x0:rat][lx:lrt(rpofrt,x0)]
-lrtrpofrte:=t5"rt.4150"(x0,ini(ratset,satz150,x0,lx)):less"rt"(x0,r0)
-r0@[x0:rat][m:moreis"rt"(x0,r0)]
-+*iii4
-m@t12:=satz81c(x0,r0,m):not(less"rt"(x0,r0))
--iii4
-m@urtrpofrt:=th3"l.imp"(lrt(rpofrt,x0),less"rt"(x0,r0),t12".iii4",[t:lrt(rpofrt,x0)]lrtrpofrte(x0,t)):urt(rpofrt,x0)
-@1rp:=rpofrt(1rt):cut
-+4151
-ksi@[z0:rat][lz:lrt(ts(ksi,1rp),z0)][x0:rat][lx:lrt(ksi,x0)][y0:rat][ly:lrt(1rp,y0)][i:is"rt"(z0,ts"rt"(x0,y0))]
-t1:=lrtrpofrte(1rt,y0,ly):less"rt"(y0,1rt)
-t2:=isless12"rt"(ts"rt"(x0,y0),z0,ts"rt"(x0,1rt),x0,symis(rat,z0,ts"rt"(x0,y0),i),example1a(x0),satz105f(y0,1rt,x0,t1)):less"rt"(z0,x0)
-t3:=satz120(ksi,x0,lx,z0,t2):lrt(ksi,z0)
-lz@t4:=tsapp(ksi,1rp,z0,lz,lrt(ksi,z0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(1rp,y)][v:is"rt"(z0,ts"rt"(x,y))]t3(x,t,y,u,v)):lrt(ksi,z0)
-ksi@[x0:rat][lx:lrt(ksi,x0)][x1:rat][lx1:lrt(ksi,x1)][l:less"rt"(x0,x1)]
-y1:=ts"rt"(ov(1rt,x1),x0):rat
-t5:=isless2"rt"(ts"rt"(ov(1rt,x1),x1),1rt,y1,satz110e(1rt,x1),satz105f(x0,x1,ov(1rt,x1),l)):less"rt"(y1,1rt)
-t6:=lrtrpofrt(1rt,y1,t5):lrt(1rp,y1)
-t7:=tr3is(rat,ts"rt"(x1,y1),ts"rt"(ts"rt"(x1,ov(1rt,x1)),x0),ts"rt"(1rt,x0),x0,assts2"rt"(x1,ov(1rt,x1),x0),ists1"rt"(ts"rt"(x1,ov(1rt,x1)),1rt,x0,satz110c(1rt,x1)),example1c(x0)):is"rt"(ts"rt"(x1,y1),x0)
-t8:=lrtts(ksi,1rp,x0,x1,lx1,y1,t6,symis(rat,ts"rt"(x1,y1),x0,t7)):lrt(ts(ksi,1rp),x0)
-lx@t9:=cutapp3(ksi,x0,lx,lrt(ts(ksi,1rp),x0),[y:rat][t:lrt(ksi,y)][u:less"rt"(x0,y)]t8(y,t,u)):lrt(ts(ksi,1rp),x0)
--4151
-ksi@satz151:=isi1(ts(ksi,1rp),ksi,[x:rat][t:lrt(ts(ksi,1rp),x)]t4".4151"(x,t),[x:rat][t:lrt(ksi,x)]t9".4151"(x,t)):is(ts(ksi,1rp),ksi)
-satz151a:=symis(cut,ts(ksi,1rp),ksi,satz151):is(ksi,ts(ksi,1rp))
-satz151b:=tris(cut,ts(1rp,ksi),ts(ksi,1rp),ksi,comts(1rp,ksi),satz151):is(ts(1rp,ksi),ksi)
-satz151c:=symis(cut,ts(1rp,ksi),ksi,satz151b):is(ksi,ts(1rp,ksi))
-+4152
-[x0:rat][y0:rat]
-invprop1:=and(urt(ksi,y0),less"rt"(y0,x0)):'prop'
-ksi@[z0:rat][x0:rat]
-invprop2:=and3(urt(ksi,x0),some"rt"([x:rat]invprop1(x0,x)),is"rt"(z0,ov(1rt,x0))):'prop'
-z0@invprop:=some"rt"([x:rat]invprop2(z0,x)):'prop'
-ksi@inv:=setof(rat,[z:rat]invprop(z)):set(rat)
-x0@[ux:urt(ksi,x0)][y0:rat][uy:urt(ksi,y0)][l:less"rt"(y0,x0)][i:is"rt"(z0,ov(1rt,x0))]
-t1:=andi(urt(ksi,y0),less"rt"(y0,x0),uy,l):invprop1(x0,y0)
-t2:=somei(rat,[x:rat]invprop1(x0,x),y0,t1):some"rt"([x:rat]invprop1(x0,x))
-t3:=and3i(urt(ksi,x0),some"rt"([x:rat]invprop1(x0,x)),is"rt"(z0,ov(1rt,x0)),ux,t2,i):invprop2(z0,x0)
-t4:=somei(rat,[x:rat]invprop2(z0,x),x0,t3):invprop(z0)
-inv1:=estii(rat,[z:rat]invprop(z),z0,t4):in(z0,inv)
-z0@[i:in(z0,inv)][p:'prop'][p1:[x:rat][t:urt(ksi,x)][y:rat][u:urt(ksi,y)][v:less"rt"(y,x)][w:is"rt"(z0,ov(1rt,x))]p]
-t5:=estie(rat,[x:rat]invprop(x),z0,i):invprop(z0)
-[x0:rat][px:invprop2(z0,x0)]
-t6:=and3e1(urt(ksi,x0),some"rt"([x:rat]invprop1(x0,x)),is"rt"(z0,ov(1rt,x0)),px):urt(ksi,x0)
-t7:=and3e2(urt(ksi,x0),some"rt"([x:rat]invprop1(x0,x)),is"rt"(z0,ov(1rt,x0)),px):some"rt"([x:rat]invprop1(x0,x))
-t8:=and3e3(urt(ksi,x0),some"rt"([x:rat]invprop1(x0,x)),is"rt"(z0,ov(1rt,x0)),px):is"rt"(z0,ov(1rt,x0))
-[y0:rat][py:invprop1(x0,y0)]
-t9:=ande1(urt(ksi,y0),less"rt"(y0,x0),py):urt(ksi,y0)
-t10:=ande2(urt(ksi,y0),less"rt"(y0,x0),py):less"rt"(y0,x0)
-t11:=<t8><t10><t9><y0><t6><x0>p1:p
-px@t12:=someapp(rat,[x:rat]invprop1(x0,x),t7,p,[x:rat][t:invprop1(x0,x)]t11(x,t)):p
-p1@invapp:=someapp(rat,[x:rat]invprop2(z0,x),t5,p,[x:rat][t:invprop2(z0,x)]t12(x,t)):p
-ksi@[x0:rat][ux:urt(ksi,x0)]
-2x0:=pl"rt"(x0,x0):rat
-t13:=satz94a(x0,x0):less"rt"(x0,2x0)
-t14:=satz119a(ksi,x0,ux,2x0,t13):urt(ksi,2x0)
-t15:=inv1(ov(1rt,2x0),2x0,t14,x0,ux,t13,refis(rat,ov(1rt,2x0))):in(ov(1rt,2x0),inv)
-ksi@[x1:rat][lx:lrt(ksi,x1)][x0:rat][ux:urt(ksi,x0)]
-t16:=th3"l.imp"(is"rt"(x0,x1),lrt(ksi,x0),ux,[t:is"rt"(x0,x1)]isp1(rat,[x:rat]lrt(ksi,x),x1,x0,lx,t)):nis"rt"(x0,x1)
-t17:=satz110e(1rt,x0):is"rt"(ts"rt"(ov(1rt,x0),x0),1rt)
-t18:=satz110e(1rt,x1):is"rt"(ts"rt"(ov(1rt,x1),x1),1rt)
-[i:is"rt"(ov(1rt,x0),ov(1rt,x1))]
-t19:=tris(rat,ts"rt"(ov(1rt,x0),x1),ts"rt"(ov(1rt,x1),x1),1rt,ists1"rt"(ov(1rt,x0),ov(1rt,x1),x1,i),t18):is"rt"(ts"rt"(ov(1rt,x0),x1),1rt)
-t20:=satz110b(1rt,ov(1rt,x0),x0,x1,t17,t19):is"rt"(x0,x1)
-ux@t21:=th3"l.imp"(is"rt"(ov(1rt,x0),ov(1rt,x1)),is"rt"(x0,x1),t16,[t:is"rt"(ov(1rt,x0),ov(1rt,x1))]t20(t)):nis"rt"(ov(1rt,x0),ov(1rt,x1))
-lx@[i:in(ov(1rt,x1),inv)]
-t22:=invapp(ov(1rt,x1),i,con,[x:rat][t:urt(ksi,x)][y:rat][u:urt(ksi,y)][v:less"rt"(y,x)][w:is"rt"(ov(1rt,x1),ov(1rt,x))]<symis(rat,ov(1rt,x1),ov(1rt,x),w)>t21(x,t)):con
-lx@t23:=[t:in(ov(1rt,x1),inv)]t22(t):not(in(ov(1rt,x1),inv))
-ksi@[z0:rat][i:in(z0,inv)][u0:rat][l:less"rt"(u0,z0)][x0:rat][ux:urt(ksi,x0)][j:is"rt"(z0,ov(1rt,x0))]
-t24:=isless2"rt"(z0,ov(1rt,x0),u0,j,l):less"rt"(u0,ov(1rt,x0))
-t25:=tris(rat,ts"rt"(ov(1rt,x0),x0),1rt,ts"rt"(u0,ov(1rt,u0)),satz110e(1rt,x0),satz110d(1rt,u0)):is"rt"(ts"rt"(ov(1rt,x0),x0),ts"rt"(u0,ov(1rt,u0)))
-t26:=isless2"rt"(ts"rt"(ov(1rt,x0),x0),ts"rt"(u0,ov(1rt,u0)),ts"rt"(u0,x0),t25,satz105c(u0,ov(1rt,x0),x0,t24)):less"rt"(ts"rt"(u0,x0),ts"rt"(u0,ov(1rt,u0)))
-t27:=isless12"rt"(ts"rt"(u0,x0),ts"rt"(x0,u0),ts"rt"(u0,ov(1rt,u0)),ts"rt"(ov(1rt,u0),u0),comts"rt"(u0,x0),comts"rt"(u0,ov(1rt,u0)),t26):less"rt"(ts"rt"(x0,u0),ts"rt"(ov(1rt,u0),u0))
-t28:=satz106c(x0,ov(1rt,u0),u0,t27):less"rt"(x0,ov(1rt,u0))
-t29:=satz119a(x0,ux,ov(1rt,u0),t28):urt(ksi,ov(1rt,u0))
-t30:=satz110e(1rt,u0):is"rt"(ts"rt"(ov(1rt,u0),u0),1rt)
-t31:=satz110g(1rt,ov(1rt,u0),u0,t30):is"rt"(u0,ov(1rt,ov(1rt,u0)))
-t32:=inv1(u0,ov(1rt,u0),t29,x0,ux,t28,t31):in(u0,inv)
-l@t33:=invapp(z0,i,in(u0,inv),[x:rat][t:urt(ksi,x)][y:rat][u:urt(ksi,y)][v:less"rt"(y,x)][w:is"rt"(z0,ov(1rt,x))]t32(x,t,w)):in(u0,inv)
-i@[x0:rat][ux:urt(ksi,x0)][x1:rat][ux1:urt(ksi,x1)][l:less"rt"(x1,x0)][j:is"rt"(z0,ov(1rt,x0))]
-t34:=satz91(x1,x0,l):some"rt"([x:rat]and(less"rt"(x1,x),less"rt"(x,x0)))
-[x2:rat][a:and(less"rt"(x1,x2),less"rt"(x2,x0))]
-t35:=ande1(less"rt"(x1,x2),less"rt"(x2,x0),a):less"rt"(x1,x2)
-t36:=satz119a(ksi,x1,ux1,x2,t35):urt(ksi,x2)
-t37:=inv1(ov(1rt,x2),x2,t36,x1,ux1,t35,refis(rat,ov(1rt,x2))):in(ov(1rt,x2),inv)
-t38:=ande2(less"rt"(x1,x2),less"rt"(x2,x0),a):less"rt"(x2,x0)
-t39:=tris(rat,ts"rt"(x0,ov(1rt,x0)),1rt,ts"rt"(x2,ov(1rt,x2)),satz110c(1rt,x0),satz110d(1rt,x2)):is"rt"(ts"rt"(x0,ov(1rt,x0)),ts"rt"(x2,ov(1rt,x2)))
-t40:=isless2"rt"(ts"rt"(x0,ov(1rt,x0)),ts"rt"(x2,ov(1rt,x2)),ts"rt"(x2,ov(1rt,x0)),t39,satz105c(x2,x0,ov(1rt,x0),t38)):less"rt"(ts"rt"(x2,ov(1rt,x0)),ts"rt"(x2,ov(1rt,x2)))
-t41:=isless12"rt"(ts"rt"(x2,ov(1rt,x0)),ts"rt"(ov(1rt,x0),x2),ts"rt"(x2,ov(1rt,x2)),ts"rt"(ov(1rt,x2),x2),comts"rt"(x2,ov(1rt,x0)),comts"rt"(x2,ov(1rt,x2)),t40):less"rt"(ts"rt"(ov(1rt,x0),x2),ts"rt"(ov(1rt,x2),x2))
-t42:=satz106c(ov(1rt,x0),ov(1rt,x2),x2,t41):less"rt"(ov(1rt,x0),ov(1rt,x2))
-t43:=ismore2"rt"(ov(1rt,x0),z0,ov(1rt,x2),symis(rat,z0,ov(1rt,x0),j),satz83(ov(1rt,x0),ov(1rt,x2),t42)):more"rt"(ov(1rt,x2),z0)
-t44:=andi(in(ov(1rt,x2),inv),more"rt"(ov(1rt,x2),z0),t37,t43):and(in(ov(1rt,x2),inv),more"rt"(ov(1rt,x2),z0))
-t45:=somei(rat,[x:rat]and(in(x,inv),more"rt"(x,z0)),ov(1rt,x2),t44):some"rt"([x:rat]and(in(x,inv),more"rt"(x,z0)))
-j@t46:=someapp(rat,[x:rat]and(less"rt"(x1,x),less"rt"(x,x0)),t34,some"rt"([x:rat]and(in(x,inv),more"rt"(x,z0))),[x:rat][t:and(less"rt"(x1,x),less"rt"(x,x0))]t45(x,t)):some"rt"([x:rat]and(in(x,inv),more"rt"(x,z0)))
-i@t47:=invapp(z0,i,some"rt"([x:rat]and(in(x,inv),more"rt"(x,z0))),[x:rat][t:urt(ksi,x)][y:rat][u:urt(ksi,y)][v:less"rt"(y,x)][w:is"rt"(z0,ov(1rt,x))]t46(x,t,y,u,v,w)):some"rt"([x:rat]and(in(x,inv),more"rt"(x,z0)))
-ksi@[x0:rat][lx:lrt(ksi,x0)][y0:rat][uy:urt(ksi,y0)]
-t48:=cut2(inv,ov(1rt,pl"rt"(y0,y0)),t15(y0,uy),ov(1rt,x0),t23(x0,lx),[x:rat][t:in(x,inv)][y:rat][u:less"rt"(y,x)]t33(x,t,y,u),[x:rat][t:in(x,inv)]t47(x,t)):cutprop(inv)
-lx@t49:=cutapp1b(ksi,cutprop(inv),[x:rat][t:urt(ksi,x)]t48(x,t)):cutprop(inv)
-ksi@t50:=cutapp1a(ksi,cutprop(inv),[x:rat][t:lrt(ksi,x)]t49(x,t)):cutprop(inv)
-chi:=cutof(inv,t50):cut
-[z0:rat][lz:lrt(ts(ksi,chi),z0)][x0:rat][lx:lrt(ksi,x0)][u0:rat][lu:lrt(chi,u0)][i:is"rt"(z0,ts"rt"(x0,u0))][x1:rat][ux:urt(ksi,x1)][j:is"rt"(u0,ov(1rt,x1))]
-t51:=tris(rat,z0,ts"rt"(x0,u0),ts"rt"(x0,ov(1rt,x1)),i,ists2"rt"(u0,ov(1rt,x1),x0,j)):is"rt"(z0,ts"rt"(x0,ov(1rt,x1)))
-t52:=cutapp2a(ksi,x0,lx,x1,ux):less"rt"(x0,x1)
-t53:=isless12"rt"(ts"rt"(x0,ov(1rt,x1)),z0,ts"rt"(x1,ov(1rt,x1)),1rt,symis(rat,z0,ts"rt"(x0,ov(1rt,x1)),t51),satz110c(1rt,x1),satz105c(x0,x1,ov(1rt,x1),t52)):less"rt"(z0,1rt)
-t54:=lrtrpofrt(1rt,z0,t53):lrt(1rp,z0)
-i@r1:=ini(inv,t50,u0,lu):in(u0,inv)
-r2:=invapp(u0,r1,lrt(1rp,z0),[x:rat][t:urt(ksi,x)][y:rat][u:urt(ksi,y)][v:less"rt"(y,x)][w:is"rt"(u0,ov(1rt,x))]t54(x,t,w)):lrt(1rp,z0)
-lz@r3:=tsapp(ksi,chi,z0,lz,lrt(1rp,z0),[x:rat][t:lrt(ksi,x)][y:rat][u:lrt(chi,y)][v:is"rt"(z0,ts"rt"(x,y))]r2(x,t,y,u,v)):lrt(1rp,z0)
-ksi@[u0:rat][lu:lrt(1rp,u0)]
-t55:=lrtrpofrte(1rt,u0,lu):less"rt"(u0,1rt)
-t56:=satz83(u0,1rt,t55):more"rt"(1rt,u0)
-[x0:rat][lx:lrt(ksi,x0)][x1:rat][lx1:lrt(ksi,x1)][x2:rat][ux2:urt(ksi,x2)]
-t57:=cutapp2b(x1,lx1,x2,ux2):more"rt"(x2,x1)
-[i:is"rt"(mn"rt"(x2,x1,t57),ts"rt"(mn"rt"(1rt,u0,t56),x0))]
-t58:=cutapp2a(x0,lx,x2,ux2):less"rt"(x0,x2)
-t59:=satz105f(x0,x2,mn"rt"(1rt,u0,t56),t58):less"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x0),ts"rt"(mn"rt"(1rt,u0,t56),x2))
-t60:=isless1"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x0),mn"rt"(x2,x1,t57),ts"rt"(mn"rt"(1rt,u0,t56),x2),symis(rat,mn"rt"(x2,x1,t57),ts"rt"(mn"rt"(1rt,u0,t56),x0),i),t59):less"rt"(mn"rt"(x2,x1,t57),ts"rt"(mn"rt"(1rt,u0,t56),x2))
-t61:=tr4is(rat,pl"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x2),ts"rt"(u0,x2)),ts"rt"(pl"rt"(mn"rt"(1rt,u0,t56),u0),x2),ts"rt"(1rt,x2),x2,pl"rt"(mn"rt"(x2,x1,t57),x1),distpt1"rt"(mn"rt"(1rt,u0,t56),u0,x2),ists1"rt"(pl"rt"(mn"rt"(1rt,u0,t56),u0),1rt,x2,satz101e(1rt,u0,t56)),example1c(x2),satz101f(x2,x1,t57)):is"rt"(pl"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x2),ts"rt"(u0,x2)),pl"rt"(mn"rt"(x2,x1,t57),x1))
-t62:=satz96c(mn"rt"(x2,x1,t57),ts"rt"(mn"rt"(1rt,u0,t56),x2),ts"rt"(u0,x2),t60):less"rt"(pl"rt"(mn"rt"(x2,x1,t57),ts"rt"(u0,x2)),pl"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x2),ts"rt"(u0,x2)))
-t63:=isless2"rt"(pl"rt"(ts"rt"(mn"rt"(1rt,u0,t56),x2),ts"rt"(u0,x2)),pl"rt"(mn"rt"(x2,x1,t57),x1),pl"rt"(mn"rt"(x2,x1,t57),ts"rt"(u0,x2)),t61,t62):less"rt"(pl"rt"(mn"rt"(x2,x1,t57),ts"rt"(u0,x2)),pl"rt"(mn"rt"(x2,x1,t57),x1))
-t64:=isless12"rt"(pl"rt"(mn"rt"(x2,x1,t57),ts"rt"(u0,x2)),pl"rt"(ts"rt"(u0,x2),mn"rt"(x2,x1,t57)),pl"rt"(mn"rt"(x2,x1,t57),x1),pl"rt"(x1,mn"rt"(x2,x1,t57)),compl"rt"(mn"rt"(x2,x1,t57),ts"rt"(u0,x2)),compl"rt"(mn"rt"(x2,x1,t57),x1),t63):less"rt"(pl"rt"(ts"rt"(u0,x2),mn"rt"(x2,x1,t57)),pl"rt"(x1,mn"rt"(x2,x1,t57)))
-t65:=satz97c(ts"rt"(u0,x2),x1,mn"rt"(x2,x1,t57),t64):less"rt"(ts"rt"(u0,x2),x1)
-t66:=tr3is(rat,ts"rt"(ov(1rt,u0),ts"rt"(u0,x2)),ts"rt"(ts"rt"(ov(1rt,u0),u0),x2),ts"rt"(1rt,x2),x2,assts2"rt"(ov(1rt,u0),u0,x2),ists1"rt"(ts"rt"(ov(1rt,u0),u0),1rt,x2,satz110e(1rt,u0)),example1c(x2)):is"rt"(ts"rt"(ov(1rt,u0),ts"rt"(u0,x2)),x2)
-t67:=isless12"rt"(ts"rt"(ov(1rt,u0),ts"rt"(u0,x2)),x2,ts"rt"(ov(1rt,u0),x1),ov(x1,u0),t66,satz141b(x1,u0),satz105f(ts"rt"(u0,x2),x1,ov(1rt,u0),t65)):less"rt"(x2,ov(x1,u0))
-t68:=satz119a(x2,ux2,ov(x1,u0),t67):urt(ksi,ov(x1,u0))
-t69:=satz110e(x1,u0):is"rt"(ts"rt"(ov(x1,u0),u0),x1)
-t70:=tr3is(rat,u0,ov(x1,ov(x1,u0)),ts"rt"(ov(1rt,ov(x1,u0)),x1),ts"rt"(x1,ov(1rt,ov(x1,u0))),satz110g(x1,ov(x1,u0),u0,t69),satz141c(x1,ov(x1,u0)),comts"rt"(ov(1rt,ov(x1,u0)),x1)):is"rt"(u0,ts"rt"(x1,ov(1rt,ov(x1,u0))))
-t71:=inv1(ov(1rt,ov(x1,u0)),ov(x1,u0),t68,x2,ux2,t67,refis(rat,ov(1rt,ov(x1,u0)))):in(ov(1rt,ov(x1,u0)),inv)
-t72:=ine(inv,t50,ov(1rt,ov(x1,u0)),t71):lrt(chi,ov(1rt,ov(x1,u0)))
-t73:=lrtts(ksi,chi,u0,x1,lx1,ov(1rt,ov(x1,u0)),t72,t70):lrt(ts(ksi,chi),u0)
-lx@t74:=satz132app(ksi,lrt(ts(ksi,chi),u0),ts"rt"(mn"rt"(1rt,u0,t56),x0),[x:rat][t:lrt(ksi,x)][y:rat][u:urt(ksi,y)][v:is"rt"(mn"rt"(y,x,cutapp2b(x,t,y,u)),ts"rt"(mn"rt"(1rt,u0,t56),x0))]t73(x,t,y,u,v)):lrt(ts(ksi,chi),u0)
-lu@t75:=cutapp1a(ksi,lrt(ts(ksi,chi),u0),[x:rat][t:lrt(ksi,x)]t74(x,t)):lrt(ts(ksi,chi),u0)
-ksi@t76:=isi1(ts(ksi,chi),1rp,[x:rat][t:lrt(ts(ksi,chi),x)]r3(x,t),[x:rat][t:lrt(1rp,x)]t75(x,t)):is(ts(ksi,chi),1rp)
--4152
-satz152:=somei(cut,[t:cut]is(ts(ksi,t),1rp),chi".4152",t76".4152"):some([c:cut]is(ts(ksi,c),1rp))
-eta@[phi:cut][psi:cut]
-+4153
-[m:more(phi,psi)]
-t1:=satz145d(phi,psi,eta,m):more(ts(eta,phi),ts(eta,psi))
-t2:=ec3e21(is(ts(eta,phi),ts(eta,psi)),more(ts(eta,phi),ts(eta,psi)),less(ts(eta,phi),ts(eta,psi)),satz123b(ts(eta,phi),ts(eta,psi)),t1):nis(ts(eta,phi),ts(eta,psi))
-psi@[l:less(phi,psi)]
-t3:=satz145f(phi,psi,eta,l):less(ts(eta,phi),ts(eta,psi))
-t4:=ec3e31(is(ts(eta,phi),ts(eta,psi)),more(ts(eta,phi),ts(eta,psi)),less(ts(eta,phi),ts(eta,psi)),satz123b(ts(eta,phi),ts(eta,psi)),t3):nis(ts(eta,phi),ts(eta,psi))
-psi@[n:nis(phi,psi)]
-t5:=th1"l.or3"(is(phi,psi),more(phi,psi),less(phi,psi),satz123a(phi,psi),n):or(more(phi,psi),less(phi,psi))
-t6:=orapp(more(phi,psi),less(phi,psi),nis(ts(eta,phi),ts(eta,psi)),t5,[t:more(phi,psi)]t2(t),[t:less(phi,psi)]t4(t)):nis(ts(eta,phi),ts(eta,psi))
--4153
-[i:is(ts(eta,phi),ksi)][j:is(ts(eta,psi),ksi)]
-satz153b:=th7"l.imp"(is(phi,psi),nis(ts(eta,phi),ts(eta,psi)),weli(is(ts(eta,phi),ts(eta,psi)),tris2(cut,ts(eta,phi),ts(eta,psi),ksi,i,j)),[t:nis(phi,psi)]t6".4153"(t)):is(phi,psi)
-+*4153
-eta@[tau:cut][i:is(ts(eta,tau),1rp)]
-chi:=ts(tau,ksi):cut
-t7:=tr3is(cut,ts(eta,chi),ts(ts(eta,tau),ksi),ts(1rp,ksi),ksi,assts2(eta,tau,ksi),ists1(ts(eta,tau),1rp,ksi,i),satz151b(ksi)):is(ts(eta,chi),ksi)
-t8:=somei(cut,[c:cut]is(ts(eta,c),ksi),chi,t7):some([c:cut]is(ts(eta,c),ksi))
--4153
-eta@satz153a:=someapp(cut,[c:cut]is(ts(eta,c),1rp),satz152(eta),some([c:cut]is(ts(eta,c),ksi)),[c:cut][t:is(ts(eta,c),1rp)]t8".4153"(c,t)):some([c:cut]is(ts(eta,c),ksi))
-+*4153
-eta@t9:=[c:cut][d:cut][t:is(ts(eta,c),ksi)][u:is(ts(eta,d),ksi)]satz153b(c,d,t,u):amone(cut,[c:cut]is(ts(eta,c),ksi))
--4153
-eta@satz153:=onei(cut,[c:cut]is(ts(eta,c),ksi),t9".4153",satz153a):one([c:cut]is(ts(eta,c),ksi))
-ov:=ind(cut,[a:cut]is(ts(eta,a),ksi),satz153):cut
-satz153c:=oneax(cut,[a:cut]is(ts(eta,a),ksi),satz153):is(ts(eta,ov(ksi,eta)),ksi)
-satz153d:=symis(cut,ts(eta,ov(ksi,eta)),ksi,satz153c):is(ksi,ts(eta,ov(ksi,eta)))
-satz153e:=tris(cut,ts(ov(ksi,eta),eta),ts(eta,ov(ksi,eta)),ksi,comts(ov(ksi,eta),eta),satz153c):is(ts(ov(ksi,eta),eta),ksi)
-satz153f:=symis(cut,ts(ov(ksi,eta),eta),ksi,satz153e):is(ksi,ts(ov(ksi,eta),eta))
-[phi:cut][i:is(ts(eta,phi),ksi)]
-satz153g:=satz153b(phi,ov(ksi,eta),i,satz153c):is(phi,ov(ksi,eta))
-@[ksi:cut]
-ratrp:=image(rat,cut,[x:rat]rpofrt(x),ksi):'prop'
-@[x0:rat]
-ratrpi:=imagei(rat,cut,[x:rat]rpofrt(x),x0):ratrp(rpofrt(x0))
-@[x:nat]
-rpofnt:=rpofrt(rtofn(x)):cut
-ksi@natrp:=image(nat,cut,[x:nat]rpofnt(x),ksi):'prop'
-x@natrpi:=imagei(nat,cut,[y:nat]rpofnt(y),x):natrp(rpofnt(x))
-ksi@[n:natrp(ksi)]
-+iii5
-[x:nat][i:is(ksi,rpofnt(x))]
-t1:=somei(rat,[y:rat]is(ksi,rpofrt(y)),rtofn(x),i):ratrp(ksi)
--iii5
-lemmaiii5:=someapp(nat,[x:nat]is(ksi,rpofnt(x)),n,ratrp(ksi),[x:nat][t:is(ksi,rpofnt(x))]t1".iii5"(x,t)):ratrp(ksi)
-@[x0:rat][y0:rat][m:more"rt"(x0,y0)]
-+5154
-t1:=lrtrpofrt(x0,y0,satz82(x0,y0,m)):lrt(rpofrt(x0),y0)
-t2:=urtrpofrt(y0,y0,moreisi2"rt"(y0,y0,refis(rat,y0))):urt(rpofrt(y0),y0)
-t3:=andi(lrt(rpofrt(x0),y0),urt(rpofrt(y0),y0),t1,t2):and(lrt(rpofrt(x0),y0),urt(rpofrt(y0),y0))
--5154
-satz154a:=somei(rat,[x:rat]and(lrt(rpofrt(x0),x),urt(rpofrt(y0),x)),y0,t3".5154"):more(rpofrt(x0),rpofrt(y0))
-y0@[i:is"rt"(x0,y0)]
-satz154b:=isf(rat,cut,[x:rat]rpofrt(x),x0,y0,i):is(rpofrt(x0),rpofrt(y0))
-y0@[l:less"rt"(x0,y0)]
-satz154c:=satz121(rpofrt(y0),rpofrt(x0),satz154a(y0,x0,satz83(x0,y0,l))):less(rpofrt(x0),rpofrt(y0))
-+*5154
-y0@t4:=satz81a(x0,y0):or3(is"rt"(x0,y0),more"rt"(x0,y0),less"rt"(x0,y0))
-t5:=satz123b(rpofrt(x0),rpofrt(y0)):ec3(is(rpofrt(x0),rpofrt(y0)),more(rpofrt(x0),rpofrt(y0)),less(rpofrt(x0),rpofrt(y0)))
--5154
-y0@[m:more(rpofrt(x0),rpofrt(y0))]
-satz154d:=th11"l.ec3"(is"rt"(x0,y0),more"rt"(x0,y0),less"rt"(x0,y0),is(rpofrt(x0),rpofrt(y0)),more(rpofrt(x0),rpofrt(y0)),less(rpofrt(x0),rpofrt(y0)),t4".5154",t5".5154",[u:is"rt"(x0,y0)]satz154b(u),[u:more"rt"(x0,y0)]satz154a(u),[u:less"rt"(x0,y0)]satz154c(u),m):more"rt"(x0,y0)
-y0@[i:is(rpofrt(x0),rpofrt(y0))]
-satz154e:=th10"l.ec3"(is"rt"(x0,y0),more"rt"(x0,y0),less"rt"(x0,y0),is(rpofrt(x0),rpofrt(y0)),more(rpofrt(x0),rpofrt(y0)),less(rpofrt(x0),rpofrt(y0)),t4".5154",t5".5154",[u:is"rt"(x0,y0)]satz154b(u),[u:more"rt"(x0,y0)]satz154a(u),[u:less"rt"(x0,y0)]satz154c(u),i):is"rt"(x0,y0)
-y0@[l:less(rpofrt(x0),rpofrt(y0))]
-satz154f:=th12"l.ec3"(is"rt"(x0,y0),more"rt"(x0,y0),less"rt"(x0,y0),is(rpofrt(x0),rpofrt(y0)),more(rpofrt(x0),rpofrt(y0)),less(rpofrt(x0),rpofrt(y0)),t4".5154",t5".5154",[u:is"rt"(x0,y0)]satz154b(u),[u:more"rt"(x0,y0)]satz154a(u),[u:less"rt"(x0,y0)]satz154c(u),l):less"rt"(x0,y0)
-+*iii5
-@t2:=[x:rat][y:rat][t:is(rpofrt(x),rpofrt(y))]satz154e(x,y,t):injective(rat,cut,[x:rat]rpofrt(x))
--iii5
-y0@[i:is"rt"(x0,y0)]
-isrterp:=satz154b(x0,y0,i):is(rpofrt(x0),rpofrt(y0))
-y0@[i:is(rpofrt(x0),rpofrt(y0))]
-isrtirp:=satz154e(x0,y0,i):is"rt"(x0,y0)
-ksi@[rtksi:ratrp(ksi)]
-rtofrp:=soft(rat,cut,[x:rat]rpofrt(x),t2".iii5",ksi,rtksi):rat
-[eta:cut][rteta:ratrp(eta)][i:is(ksi,eta)]
-isrpert:=isinv(rat,cut,[x:rat]rpofrt(x),t2".iii5",ksi,rtksi,eta,rteta,i):is"rt"(rtofrp(ksi,rtksi),rtofrp(eta,rteta))
-rteta@[i:is"rt"(rtofrp(ksi,rtksi),rtofrp(eta,rteta))]
-isrpirt:=isinve(rat,cut,[x:rat]rpofrt(x),t2".iii5",ksi,rtksi,eta,rteta,i):is(ksi,eta)
-x0@isrtrp1:=isst1(rat,cut,[x:rat]rpofrt(x),t2".iii5",x0):is"rt"(x0,rtofrp(rpofrt(x0),ratrpi(x0)))
-isrtrp2:=isst2(rat,cut,[x:rat]rpofrt(x),t2".iii5",x0):is"rt"(rtofrp(rpofrt(x0),ratrpi(x0)),x0)
-rtksi@isrprt1:=ists1"e"(rat,cut,[x:rat]rpofrt(x),t2".iii5",ksi,rtksi):is(ksi,rpofrt(rtofrp(ksi,rtksi)))
-isrprt2:=ists2"e"(rat,cut,[x:rat]rpofrt(x),t2".iii5",ksi,rtksi):is(rpofrt(rtofrp(ksi,rtksi)),ksi)
-@[x:nat][y:nat][i:is"n"(x,y)]
-isnterp:=isf(nat,cut,[z:nat]rpofnt(z),x,y,i):is(rpofnt(x),rpofnt(y))
-y@[i:is(rpofnt(x),rpofnt(y))]
-isntirp:=isnirt(x,y,isrtirp(rtofn(x),rtofn(y),i)):is"n"(x,y)
-+*iii5
-@t3:=[x:nat][y:nat][t:is(rpofnt(x),rpofnt(y))]isntirp(x,y,t):injective(nat,cut,[x:nat]rpofnt(x))
--iii5
-ksi@[ntksi:natrp(ksi)]
-ntofrp:=soft(nat,cut,[x:nat]rpofnt(x),t3".iii5",ksi,ntksi):nat
-[eta:cut][nteta:natrp(eta)][i:is(ksi,eta)]
-isrpent:=isinv(nat,cut,[x:nat]rpofnt(x),t3".iii5",ksi,ntksi,eta,nteta,i):is"n"(ntofrp(ksi,ntksi),ntofrp(eta,nteta))
-nteta@[i:is"n"(ntofrp(ksi,ntksi),ntofrp(eta,nteta))]
-isrpint:=isinve(nat,cut,[x:nat]rpofnt(x),t3".iii5",ksi,ntksi,eta,nteta,i):is(ksi,eta)
-x@isntrp1:=isst1(nat,cut,[y:nat]rpofnt(y),t3".iii5",x):is"n"(x,ntofrp(rpofnt(x),natrpi(x)))
-isntrp2:=isst2(nat,cut,[y:nat]rpofnt(y),t3".iii5",x):is"n"(ntofrp(rpofnt(x),natrpi(x)),x)
-ntksi@isrpnt1:=ists1"e"(nat,cut,[x:nat]rpofnt(x),t3".iii5",ksi,ntksi):is(ksi,rpofnt(ntofrp(ksi,ntksi)))
-isrpnt2:=ists2"e"(nat,cut,[x:nat]rpofnt(x),t3".iii5",ksi,ntksi):is(rpofnt(ntofrp(ksi,ntksi)),ksi)
-@[x0:rat][y0:rat]
-+5155
-[z0:rat][lz:lrt(pl(rpofrt(x0),rpofrt(y0)),z0)][u0:rat][lu:lrt(rpofrt(x0),u0)][v0:rat][lv:lrt(rpofrt(y0),v0)][i:is"rt"(z0,pl"rt"(u0,v0))]
-t1:=lrtrpofrte(x0,u0,lu):less"rt"(u0,x0)
-t2:=lrtrpofrte(y0,v0,lv):less"rt"(v0,y0)
-t3:=satz98a(u0,x0,v0,y0,t1,t2):less"rt"(pl"rt"(u0,v0),pl"rt"(x0,y0))
-t4:=isless1"rt"(pl"rt"(u0,v0),z0,pl"rt"(x0,y0),symis(rat,z0,pl"rt"(u0,v0),i),t3):less"rt"(z0,pl"rt"(x0,y0))
-t5:=lrtrpofrt(pl"rt"(x0,y0),z0,t4):lrt(rpofrt(pl"rt"(x0,y0)),z0)
-lz@t6:=plapp(rpofrt(x0),rpofrt(y0),z0,lz,lrt(rpofrt(pl"rt"(x0,y0)),z0),[x:rat][t:lrt(rpofrt(x0),x)][y:rat][u:lrt(rpofrt(y0),y)][v:is"rt"(z0,pl"rt"(x,y))]t5(x,t,y,u,v)):lrt(rpofrt(pl"rt"(x0,y0)),z0)
-y0@[u0:rat][lu:lrt(rpofrt(pl"rt"(x0,y0)),u0)]
-t7:=lrtrpofrte(pl"rt"(x0,y0),u0,lu):less"rt"(u0,pl"rt"(x0,y0))
-u01:=ov"rt"(u0,pl"rt"(x0,y0)):rat
-t8:=isless12"rt"(u0,ts"rt"(u01,pl"rt"(x0,y0)),pl"rt"(x0,y0),ts"rt"(1rt,pl"rt"(x0,y0)),satz110f(u0,pl"rt"(x0,y0)),example1d(pl"rt"(x0,y0)),t7):less"rt"(ts"rt"(u01,pl"rt"(x0,y0)),ts"rt"(1rt,pl"rt"(x0,y0)))
-t9:=satz106c(u01,1rt,pl"rt"(x0,y0),t8):less"rt"(u01,1rt)
-t10:=tris(rat,u0,ts"rt"(pl"rt"(x0,y0),u01),pl"rt"(ts"rt"(x0,u01),ts"rt"(y0,u01)),satz110d(u0,pl"rt"(x0,y0)),disttp1"rt"(x0,y0,u01)):is"rt"(u0,pl"rt"(ts"rt"(x0,u01),ts"rt"(y0,u01)))
-y0@[l:less"rt"(y0,1rt)]
-t11:=isless12"rt"(ts"rt"(y0,x0),ts"rt"(x0,y0),ts"rt"(1rt,x0),x0,comts"rt"(y0,x0),example1c(x0),satz105c(y0,1rt,x0,l)):less"rt"(ts"rt"(x0,y0),x0)
-t12:=lrtrpofrt(x0,ts"rt"(x0,y0),t11):lrt(rpofrt(x0),ts"rt"(x0,y0))
-lu@t13:=lrtpl(rpofrt(x0),rpofrt(y0),u0,ts"rt"(x0,u01),t12(x0,u01,t9),ts"rt"(y0,u01),t12(y0,u01,t9),t10):lrt(pl(rpofrt(x0),rpofrt(y0)),u0)
--5155
-satz155a:=isi1(rpofrt(pl"rt"(x0,y0)),pl(rpofrt(x0),rpofrt(y0)),[x:rat][t:lrt(rpofrt(pl"rt"(x0,y0)),x)]t13".5155"(x,t),[x:rat][t:lrt(pl(rpofrt(x0),rpofrt(y0)),x)]t6".5155"(x,t)):is(rpofrt(pl"rt"(x0,y0)),pl(rpofrt(x0),rpofrt(y0)))
-[m:more"rt"(x0,y0)]
-+*5155
-m@t14:=satz101f(x0,y0,m):is"rt"(x0,pl"rt"(mn"rt"(x0,y0,m),y0))
-t15:=tris(cut,rpofrt(x0),rpofrt(pl"rt"(mn"rt"(x0,y0,m),y0)),pl(rpofrt(mn"rt"(x0,y0,m)),rpofrt(y0)),isrterp(x0,pl"rt"(mn"rt"(x0,y0,m),y0),t14),satz155a(mn"rt"(x0,y0,m),y0)):is(rpofrt(x0),pl(rpofrt(mn"rt"(x0,y0,m)),rpofrt(y0)))
-t16:=tris2(cut,pl(rpofrt(y0),rpofrt(mn"rt"(x0,y0,m))),rpofrt(x0),pl(rpofrt(mn"rt"(x0,y0,m)),rpofrt(y0)),compl(rpofrt(y0),rpofrt(mn"rt"(x0,y0,m))),t15):is(pl(rpofrt(y0),rpofrt(mn"rt"(x0,y0,m))),rpofrt(x0))
--5155
-m@satz155b:=satz140g(rpofrt(x0),rpofrt(y0),rpofrt(mn"rt"(x0,y0,m)),satz154a(x0,y0,m),t16".5155"):is(rpofrt(mn"rt"(x0,y0,m)),mn(rpofrt(x0),rpofrt(y0),satz154a(x0,y0,m)))
-+*5155
-y0@[z0:rat][lz:lrt(ts(rpofrt(x0),rpofrt(y0)),z0)][u0:rat][lu:lrt(rpofrt(x0),u0)][v0:rat][lv:lrt(rpofrt(y0),v0)][i:is"rt"(z0,ts"rt"(u0,v0))]
-t17:=lrtrpofrte(x0,u0,lu):less"rt"(u0,x0)
-t18:=lrtrpofrte(y0,v0,lv):less"rt"(v0,y0)
-t19:=satz107a(u0,x0,v0,y0,t17,t18):less"rt"(ts"rt"(u0,v0),ts"rt"(x0,y0))
-t20:=isless1"rt"(ts"rt"(u0,v0),z0,ts"rt"(x0,y0),symis(rat,z0,ts"rt"(u0,v0),i),t19):less"rt"(z0,ts"rt"(x0,y0))
-t21:=lrtrpofrt(ts"rt"(x0,y0),z0,t20):lrt(rpofrt(ts"rt"(x0,y0)),z0)
-lz@t22:=tsapp(rpofrt(x0),rpofrt(y0),z0,lz,lrt(rpofrt(ts"rt"(x0,y0)),z0),[x:rat][t:lrt(rpofrt(x0),x)][y:rat][u:lrt(rpofrt(y0),y)][v:is"rt"(z0,ts"rt"(x,y))]t21(x,t,y,u,v)):lrt(rpofrt(ts"rt"(x0,y0)),z0)
-y0@[u0:rat][lu:lrt(rpofrt(ts"rt"(x0,y0)),u0)]
-t23:=lrtrpofrte(ts"rt"(x0,y0),u0,lu):less"rt"(u0,ts"rt"(x0,y0))
-[u1:rat][a:and(less"rt"(u0,u1),less"rt"(u1,ts"rt"(x0,y0)))]
-t24:=ande1(less"rt"(u0,u1),less"rt"(u1,ts"rt"(x0,y0)),a):less"rt"(u0,u1)
-t25:=ande2(less"rt"(u0,u1),less"rt"(u1,ts"rt"(x0,y0)),a):less"rt"(u1,ts"rt"(x0,y0))
-t26:=isless12"rt"(u0,ts"rt"(ov"rt"(u0,u1),u1),u1,ts"rt"(1rt,u1),satz110f(u0,u1),example1d(u1),t24):less"rt"(ts"rt"(ov"rt"(u0,u1),u1),ts"rt"(1rt,u1))
-t27:=satz106c(ov"rt"(u0,u1),1rt,u1,t26):less"rt"(ov"rt"(u0,u1),1rt)
-t28:=isless1"rt"(u1,ts"rt"(ov"rt"(u1,y0),y0),ts"rt"(x0,y0),satz110f(u1,y0),t25):less"rt"(ts"rt"(ov"rt"(u1,y0),y0),ts"rt"(x0,y0))
-t29:=satz106c(ov"rt"(u1,y0),x0,y0,t28):less"rt"(ov"rt"(u1,y0),x0)
-t30:=tr3is(rat,u0,ts"rt"(u1,ov"rt"(u0,u1)),ts"rt"(ts"rt"(ov"rt"(u1,y0),y0),ov"rt"(u0,u1)),ts"rt"(ov"rt"(u1,y0),ts"rt"(y0,ov"rt"(u0,u1))),satz110d(u0,u1),ists1"rt"(u1,ts"rt"(ov"rt"(u1,y0),y0),ov"rt"(u0,u1),satz110f(u1,y0)),assts1"rt"(ov"rt"(u1,y0),y0,ov"rt"(u0,u1))):is"rt"(u0,ts"rt"(ov"rt"(u1,y0),ts"rt"(y0,ov"rt"(u0,u1))))
-t31:=lrtts(rpofrt(x0),rpofrt(y0),u0,ov"rt"(u1,y0),lrtrpofrt(x0,ov"rt"(u1,y0),t29),ts"rt"(y0,ov"rt"(u0,u1)),t12(y0,ov"rt"(u0,u1),t27),t30):lrt(ts(rpofrt(x0),rpofrt(y0)),u0)
-lu@t32:=someapp(rat,[x:rat]and(less"rt"(u0,x),less"rt"(x,ts"rt"(x0,y0))),satz91(u0,ts"rt"(x0,y0),t23),lrt(ts(rpofrt(x0),rpofrt(y0)),u0),[x:rat][t:and(less"rt"(u0,x),less"rt"(x,ts"rt"(x0,y0)))]t31(x,t)):lrt(ts(rpofrt(x0),rpofrt(y0)),u0)
--5155
-y0@satz155c:=isi1(rpofrt(ts"rt"(x0,y0)),ts(rpofrt(x0),rpofrt(y0)),[x:rat][t:lrt(rpofrt(ts"rt"(x0,y0)),x)]t32".5155"(x,t),[x:rat][t:lrt(ts(rpofrt(x0),rpofrt(y0)),x)]t22".5155"(x,t)):is(rpofrt(ts"rt"(x0,y0)),ts(rpofrt(x0),rpofrt(y0)))
-+*5155
-y0@t33:=satz110f(x0,y0):is"rt"(x0,ts"rt"(ov"rt"(x0,y0),y0))
-t34:=tris(cut,rpofrt(x0),rpofrt(ts"rt"(ov"rt"(x0,y0),y0)),ts(rpofrt(ov"rt"(x0,y0)),rpofrt(y0)),isrterp(x0,ts"rt"(ov"rt"(x0,y0),y0),t33),satz155c(ov"rt"(x0,y0),y0)):is(rpofrt(x0),ts(rpofrt(ov"rt"(x0,y0)),rpofrt(y0)))
-t35:=tris2(cut,ts(rpofrt(y0),rpofrt(ov"rt"(x0,y0))),rpofrt(x0),ts(rpofrt(ov"rt"(x0,y0)),rpofrt(y0)),comts(rpofrt(y0),rpofrt(ov"rt"(x0,y0))),t34):is(ts(rpofrt(y0),rpofrt(ov"rt"(x0,y0))),rpofrt(x0))
--5155
-y0@satz155d:=satz153g(rpofrt(x0),rpofrt(y0),rpofrt(ov"rt"(x0,y0)),t35".5155"):is(rpofrt(ov"rt"(x0,y0)),ov(rpofrt(x0),rpofrt(y0)))
-@[x:nat][y:nat]
-satz155e:=tris(cut,rpofnt(pl"n"(x,y)),rpofrt(pl"rt"(rtofn(x),rtofn(y))),pl(rpofnt(x),rpofnt(y)),isrterp(rtofn(pl"n"(x,y)),pl"rt"(rtofn(x),rtofn(y)),symis(rat,pl"rt"(rtofn(x),rtofn(y)),rtofn(pl"n"(x,y)),satz112h(x,y))),satz155a(rtofn(x),rtofn(y))):is(rpofnt(pl"n"(x,y)),pl(rpofnt(x),rpofnt(y)))
-satz155f:=tris(cut,rpofnt(ts"n"(x,y)),rpofrt(ts"rt"(rtofn(x),rtofn(y))),ts(rpofnt(x),rpofnt(y)),isrterp(rtofn(ts"n"(x,y)),ts"rt"(rtofn(x),rtofn(y)),symis(rat,ts"rt"(rtofn(x),rtofn(y)),rtofn(ts"n"(x,y)),satz112j(x,y))),satz155c(rtofn(x),rtofn(y))):is(rpofnt(ts"n"(x,y)),ts(rpofnt(x),rpofnt(y)))
-+nt
-@natt:=ot(cut,[t:cut]natrp(t)):'type'
-[ksi:cut][nksi:natrp(ksi)]
-nttofrp:=out(cut,[t:cut]natrp(t),ksi,nksi):natt
-@[xt:natt][yt:natt]
-is:=is"e"(natt,xt,yt):'prop'
-nis:=not(is(xt,yt)):'prop'
-@[p:[x:natt]'prop']
-all:=all"l"(natt,p):'prop'
-some:=some"l"(natt,p):'prop'
-one:=one"e"(natt,p):'prop'
-xt@[st:set(natt)]
-in:=esti(natt,xt,st):'prop'
-xt@rpofntt:=in"e"(cut,[t:cut]natrp(t),xt):cut
-natrpi:=inp(cut,[t:cut]natrp(t),xt):natrp(rpofntt(xt))
-nksi@[eta:cut][neta:natrp(eta)][i:is"rp"(ksi,eta)]
-isrpentt:=isouti(cut,[t:cut]natrp(t),ksi,nksi,eta,neta,i):is(nttofrp(ksi,nksi),nttofrp(eta,neta))
-neta@[i:is(nttofrp(ksi,nksi),nttofrp(eta,neta))]
-isrpintt:=isoute(cut,[t:cut]natrp(t),ksi,nksi,eta,neta,i):is"rp"(ksi,eta)
-yt@[i:is(xt,yt)]
-isntterp:=isini(cut,[t:cut]natrp(t),xt,yt,i):is"rp"(rpofntt(xt),rpofntt(yt))
-yt@[i:is"rp"(rpofntt(xt),rpofntt(yt))]
-isnttirp:=isine(cut,[t:cut]natrp(t),xt,yt,i):is(xt,yt)
-nksi@isrpntt1:=isinout(cut,[t:cut]natrp(t),ksi,nksi):is"rp"(ksi,rpofntt(nttofrp(ksi,nksi)))
-xt@isnttrp1:=isoutin(cut,[t:cut]natrp(t),xt):is(xt,nttofrp(rpofntt(xt),natrpi(xt)))
-@[x:nat]
-nttofnt:=nttofrp(rpofnt(x),natrpi"rp"(x)):natt
-[y:nat][i:is"n"(x,y)]
-isntentt:=isrpentt(rpofnt(x),natrpi"rp"(x),rpofnt(y),natrpi"rp"(y),isnterp(x,y,i)):is(nttofnt(x),nttofnt(y))
-y@[i:is(nttofnt(x),nttofnt(y))]
-isntintt:=isntirp(x,y,isrpintt(rpofnt(x),natrpi"rp"(x),rpofnt(y),natrpi"rp"(y),i)):is"n"(x,y)
-xt@ntofntt:=ntofrp(rpofntt(xt),natrpi(xt)):nat
-yt@[i:is(xt,yt)]
-isnttent:=isrpent(rpofntt(xt),natrpi(xt),rpofntt(yt),natrpi(yt),isntterp(xt,yt,i)):is"n"(ntofntt(xt),ntofntt(yt))
-yt@[i:is"n"(ntofntt(xt),ntofntt(yt))]
-isnttint:=isnttirp(xt,yt,isrpint(rpofntt(xt),natrpi(xt),rpofntt(yt),natrpi(yt),i)):is(xt,yt)
-+iii5
-x@t5:=isrpntt1(rpofnt(x),natrpi"rp"(x)):is"rp"(rpofnt(x),rpofntt(nttofnt(x)))
-t6:=isrpent(rpofnt(x),natrpi"rp"(x),rpofntt(nttofnt(x)),natrpi(nttofnt(x)),t5):is"n"(ntofrp(rpofnt(x),natrpi"rp"(x)),ntofntt(nttofnt(x)))
--iii5
-x@isntntt1:=tris(nat,x,ntofrp(rpofnt(x),natrpi"rp"(x)),ntofntt(nttofnt(x)),isntrp1(x),t6".iii5"):is"n"(x,ntofntt(nttofnt(x)))
-+*iii5
-xt@t7:=isrpnt1(rpofntt(xt),natrpi(xt)):is"rp"(rpofntt(xt),rpofnt(ntofntt(xt)))
-t8:=isrpentt(rpofntt(xt),natrpi(xt),rpofnt(ntofntt(xt)),natrpi"rp"(ntofntt(xt)),t7):is(nttofrp(rpofntt(xt),natrpi(xt)),nttofnt(ntofntt(xt)))
--iii5
-xt@isnttnt1:=tris(natt,xt,nttofrp(rpofntt(xt),natrpi(xt)),nttofnt(ntofntt(xt)),isnttrp1(xt),t8".iii5"):is(xt,nttofnt(ntofntt(xt)))
-x@isntntt2:=symis(nat,x,ntofntt(nttofnt(x)),isntntt1):is"n"(ntofntt(nttofnt(x)),x)
-xt@isnttnt2:=symis(natt,xt,nttofnt(ntofntt(xt)),isnttnt1):is(nttofnt(ntofntt(xt)),xt)
-@1t:=nttofnt(1):natt
-suct:=[x:natt]nttofnt(<ntofntt(x)>suc):[x:natt]natt
-+5156
-xt@[j:is(<xt>suct,1t)]
-t1:=isntintt(<ntofntt(xt)>suc,1,j):is"n"(<ntofntt(xt)>suc,1)
--5156
-xt@satz156a:=th3"l.imp"(is(<xt>suct,1t),is"n"(<ntofntt(xt)>suc,1),<ntofntt(xt)>ax3,[t:is(<xt>suct,1t)]t1".5156"(t)):nis(<xt>suct,1t)
-yt@[i:is(<xt>suct,<yt>suct)]
-+*5156
-i@t2:=isntintt(<ntofntt(xt)>suc,<ntofntt(yt)>suc,i):is"n"(<ntofntt(xt)>suc,<ntofntt(yt)>suc)
--5156
-i@satz156b:=isnttint(xt,yt,<t2".5156"><ntofntt(yt)><ntofntt(xt)>ax4):is(xt,yt)
-@[st:set(natt)]
-cond1:=in(1t,st):'prop'
-cond2:=all([x:natt]imp(in(x,st),in(<x>suct,st))):'prop'
-[c1:cond1][c2:cond2]
-+*5156
-c2@[x:nat]
-prop1:=in(nttofnt(x),st):'prop'
-[p:prop1(x)]
-t3:=<p><nttofnt(x)>c2:in(<nttofnt(x)>suct,st)
-t4:=isp(nat,[t:nat]in(nttofnt(<t>suc),st),ntofntt(nttofnt(x)),x,t3,isntntt2(x)):prop1(<x>suc)
--5156
-c2@[xt:natt]
-+*5156
-xt@t5:=induction([t:nat]prop1(t),c1,[t:nat][u:prop1(t)]t4(t,u),ntofntt(xt)):in(nttofnt(ntofntt(xt)),st)
--5156
-xt@satz156c:=isp(natt,[t:natt]in(t,st),nttofnt(ntofntt(xt)),xt,t5".5156",isnttnt2(xt)):in(xt,st)
-@ax3t:=[x:natt]satz156a(x):[x:natt]nis(<x>suct,1t)
-ax4t:=[x:natt][y:natt][u:is(<x>suct,<y>suct)]satz156b(x,y,u):[x:natt][y:natt][u:is(<x>suct,<y>suct)]is(x,y)
-ax5t:=[s:set(natt)][u:cond1(s)][v:cond2(s)][x:natt]satz156c(s,u,v,x):[s:set(natt)][u:cond1(s)][v:cond2(s)][x:natt]in(x,s)
--nt
-+rtt
-@ratt:=ot(cut,[t:cut]ratrp(t)):'type'
-[ksi:cut][rtksi:ratrp(ksi)]
-rttofrp:=out(cut,[t:cut]ratrp(t),ksi,rtksi):ratt
-@[x0t:ratt][y0t:ratt]
-is:=is"e"(ratt,x0t,y0t):'prop'
-nis:=not(is(x0t,y0t)):'prop'
-@[p:[x:ratt]'prop']
-all:=all"l"(ratt,p):'prop'
-some:=some"l"(ratt,p):'prop'
-one:=one"e"(ratt,p):'prop'
-x0t@rpofrtt:=in"e"(cut,[t:cut]ratrp(t),x0t):cut
-ratrpi:=inp(cut,[t:cut]ratrp(t),x0t):ratrp(rpofrtt(x0t))
-rtksi@[eta:cut][rteta:ratrp(eta)][i:is"rp"(ksi,eta)]
-isrpertt:=isouti(cut,[t:cut]ratrp(t),ksi,rtksi,eta,rteta,i):is(rttofrp(ksi,rtksi),rttofrp(eta,rteta))
-rteta@[i:is(rttofrp(ksi,rtksi),rttofrp(eta,rteta))]
-isrpirtt:=isoute(cut,[t:cut]ratrp(t),ksi,rtksi,eta,rteta,i):is"rp"(ksi,eta)
-y0t@[i:is(x0t,y0t)]
-isrtterp:=isini(cut,[t:cut]ratrp(t),x0t,y0t,i):is"rp"(rpofrtt(x0t),rpofrtt(y0t))
-y0t@[i:is"rp"(rpofrtt(x0t),rpofrtt(y0t))]
-isrttirp:=isine(cut,[t:cut]ratrp(t),x0t,y0t,i):is(x0t,y0t)
-rtksi@isrprtt1:=isinout(cut,[t:cut]ratrp(t),ksi,rtksi):is"rp"(ksi,rpofrtt(rttofrp(ksi,rtksi)))
-x0t@isrttrp1:=isoutin(cut,[t:cut]ratrp(t),x0t):is(x0t,rttofrp(rpofrtt(x0t),ratrpi(x0t)))
-@[x0:rat]
-rttofrt:=rttofrp(rpofrt(x0),ratrpi"rp"(x0)):ratt
-[y0:rat][i:is"rt"(x0,y0)]
-isrtertt:=isrpertt(rpofrt(x0),ratrpi"rp"(x0),rpofrt(y0),ratrpi"rp"(y0),isrterp(x0,y0,i)):is(rttofrt(x0),rttofrt(y0))
-y0@[i:is(rttofrt(x0),rttofrt(y0))]
-isrtirtt:=isrtirp(x0,y0,isrpirtt(rpofrt(x0),ratrpi"rp"(x0),rpofrt(y0),ratrpi"rp"(y0),i)):is"rt"(x0,y0)
-x0t@rtofrtt:=rtofrp(rpofrtt(x0t),ratrpi(x0t)):rat
-y0t@[i:is(x0t,y0t)]
-isrttert:=isrpert(rpofrtt(x0t),ratrpi(x0t),rpofrtt(y0t),ratrpi(y0t),isrtterp(x0t,y0t,i)):is"rt"(rtofrtt(x0t),rtofrtt(y0t))
-y0t@[i:is"rt"(rtofrtt(x0t),rtofrtt(y0t))]
-isrttirt:=isrttirp(x0t,y0t,isrpirt(rpofrtt(x0t),ratrpi(x0t),rpofrtt(y0t),ratrpi(y0t),i)):is(x0t,y0t)
-+iii5
-x0@t9:=isrprtt1(rpofrt(x0),ratrpi"rp"(x0)):is"rp"(rpofrt(x0),rpofrtt(rttofrt(x0)))
-t10:=isrpert(rpofrt(x0),ratrpi"rp"(x0),rpofrtt(rttofrt(x0)),ratrpi(rttofrt(x0)),t9):is"rt"(rtofrp(rpofrt(x0),ratrpi"rp"(x0)),rtofrtt(rttofrt(x0)))
--iii5
-x0@isrtrtt1:=tris(rat,x0,rtofrp(rpofrt(x0),ratrpi"rp"(x0)),rtofrtt(rttofrt(x0)),isrtrp1(x0),t10".iii5"):is"rt"(x0,rtofrtt(rttofrt(x0)))
-+*iii5
-x0t@t11:=isrprt1(rpofrtt(x0t),ratrpi(x0t)):is"rp"(rpofrtt(x0t),rpofrt(rtofrtt(x0t)))
-t12:=isrpertt(rpofrtt(x0t),ratrpi(x0t),rpofrt(rtofrtt(x0t)),ratrpi"rp"(rtofrtt(x0t)),t11):is(rttofrp(rpofrtt(x0t),ratrpi(x0t)),rttofrt(rtofrtt(x0t)))
--iii5
-x0t@isrttrt1:=tris(ratt,x0t,rttofrp(rpofrtt(x0t),ratrpi(x0t)),rttofrt(rtofrtt(x0t)),isrttrp1(x0t),t12".iii5"):is(x0t,rttofrt(rtofrtt(x0t)))
--rtt
-@[ksi:cut]
-example2:=satz153c(1rp,ksi):is(ts(ksi,ov(1rp,ksi)),1rp)
-[rtksi:ratrp(ksi)]
-+5157
-x01:=rtofrp(ksi,rtksi):rat
-ksi@s1:=setof(rat,[x:rat]urt(ksi,x)):set(rat)
-rtksi@[y0:rat][i:in(y0,s1)]
-t1:=estie(rat,[x:rat]urt(ksi,x),y0,i):urt(ksi,y0)
-[m:more"rt"(x01,y0)]
-t2:=lrtrpofrt(x01,y0,satz82(x01,y0,m)):lrt(rpofrt(x01),y0)
-t3:=isp(cut,[x:cut]lrt(x,y0),rpofrt(x01),ksi,t2,isrprt2(ksi,rtksi)):lrt(ksi,y0)
-i@t4:=th3"l.imp"(more"rt"(x01,y0),lrt(ksi,y0),t1,[t:more"rt"(x01,y0)]t3(t)):not(more"rt"(x01,y0))
-t5:=satz81e(x01,y0,t4):lessis"rt"(x01,y0)
-rtksi@t6:=[x:rat][t:in(x,s1)]t5(x,t):lb(s1,x01)
-t7:=urtrpofrt(x01,x01,moreisi2"rt"(x01,x01,refis(rat,x01))):urt(rpofrt(x01),x01)
-t8:=isp(cut,[x:cut]urt(x,x01),rpofrt(x01),ksi,t7,isrprt2(ksi,rtksi)):urt(ksi,x01)
-t9:=estii(rat,[x:rat]urt(ksi,x),x01,t8):in(x01,s1)
-t10:=andi(lb(s1,x01),in(x01,s1),t6,t9):min(s1,x01)
--5157
-satz157a:=t10".5157":min(setof(rat,[x:rat]urt(ksi,x)),rtofrp(ksi,rtksi))
-satz157b:=somei(rat,[x:rat]min(s1".5157",x),x01".5157",t10".5157"):some"rt"([x:rat]min(setof(rat,[y:rat]urt(ksi,y)),x))
-ksi@[x0:rat][m:min(setof(rat,[x:rat]urt(ksi,x)),x0)]
-+*5157
-m"rp"@t11:=ande1(lb(s1,x0),in(x0,s1),m):lb(s1,x0)
-t12:=ande2(lb(s1,x0),in(x0,s1),m):in(x0,s1)
-t13:=estie(rat,[x:rat]urt(ksi,x),x0,t12):urt(ksi,x0)
-[y0:rat][ly:lrt(ksi,y0)]
-t14:=cutapp2a(ksi,y0,ly,x0,t13):less"rt"(y0,x0)
-t15:=lrtrpofrt(x0,y0,t14):lrt(rpofrt(x0),y0)
-y0@[uy:urt(ksi,y0)]
-t17:=estii(rat,[x:rat]urt(ksi,x),y0,uy):in(y0,s1)
-t18:=satz85(x0,y0,<t17><y0>t11):moreis"rt"(y0,x0)
-t19:=urtrpofrt(x0,y0,t18):urt(rpofrt(x0),y0)
-y0@t20:=cp(lrt(rpofrt(x0),y0),lrt(ksi,y0),[t:urt(ksi,y0)]t19(t)):imp(lrt(rpofrt(x0),y0),lrt(ksi,y0))
--5157
-m@satz157c:=isi1(ksi,rpofrt(x0),[x:rat][t:lrt(ksi,x)]t15".5157"(x,t),[x:rat]t20".5157"(x)):is(ksi,rpofrt(x0))
-ksi@[s:some"rt"([x:rat]min(setof(rat,[y:rat]urt(ksi,y)),x))]
-+*5157
-s@[x0:rat][m:min(s1,x0)]
-t21:=somei(rat,[x:rat]is(ksi,rpofrt(x)),x0,satz157c(x0,m)):ratrp(ksi)
--5157
-s@satz157d:=someapp(rat,[x:rat]min(s1".5157",x),s,ratrp(ksi),[x:rat][t:min(s1".5157",x)]t21".5157"(x,t)):ratrp(ksi)
-ksi@[x0:rat][lx:lrt(ksi,x0)]
-+5158
-x0@xr:=rpofrt(x0):cut
-lx@t1:=urtrpofrt(x0,x0,moreisi2"rt"(x0,x0,refis(rat,x0))):urt(xr,x0)
-t2:=andi(urt(xr,x0),lrt(ksi,x0),t1,lx):and(urt(xr,x0),lrt(ksi,x0))
--5158
-satz158a:=somei(rat,[x:rat]and(urt(rpofrt(x0),x),lrt(ksi,x)),x0,t2".5158"):less(rpofrt(x0),ksi)
-x0@[ux:urt(ksi,x0)]
-+*5158
-ux@s1:=setof(rat,[x:rat]urt(ksi,x)):set(rat)
-[m:min(s1,x0)]
-t3:=symis(cut,ksi,xr,satz157c(ksi,x0,m)):is(xr,ksi)
-t4:=moreisi2(xr,ksi,t3):moreis(xr,ksi)
-ux@[n:not(min(s1,x0))]
-t5:=estii(rat,[x:rat]urt(ksi,x),x0,ux):in(x0,s1)
-t6:=th4"l.and"(lb(s1,x0),in(x0,s1),n,t5):not(lb(s1,x0))
-t7:=th1"l.some"(rat,[x:rat]imp(in(x,s1),lessis"rt"(x0,x)),t6):some"rt"([x:rat]not(imp(in(x,s1),lessis"rt"(x0,x))))
-[y0:rat][o:not(imp(in(y0,s1),lessis"rt"(x0,y0)))]
-t8:=th5"l.imp"(in(y0,s1),lessis"rt"(x0,y0),o):in(y0,s1)
-t9:=estie(rat,[x:rat]urt(ksi,x),y0,t8):urt(ksi,y0)
-t10:=th6"l.imp"(in(y0,s1),lessis"rt"(x0,y0),o):not(lessis"rt"(x0,y0))
-t11:=satz82(x0,y0,satz81k(x0,y0,t10)):less"rt"(y0,x0)
-t12:=lrtrpofrt(x0,y0,t11):lrt(xr,y0)
-t13:=andi(lrt(xr,y0),urt(ksi,y0),t12,t9):and(lrt(xr,y0),urt(ksi,y0))
-t14:=somei(rat,[x:rat]and(lrt(xr,x),urt(ksi,x)),y0,t13):more(xr,ksi)
-n@t15:=someapp(rat,[x:rat]not(imp(in(x,s1),lessis"rt"(x0,x))),t7,more(xr,ksi),[x:rat][t:not(imp(in(x,s1),lessis"rt"(x0,x)))]t14(x,t)):more(xr,ksi)
-t16:=moreisi1(xr,ksi,t15):moreis(xr,ksi)
--5158
-ux@satz158b:=th1"l.imp"(min(s1".5158",x0),moreis(rpofrt(x0),ksi),[t:min(s1".5158",x0)]t4".5158"(t),[t:not(min(s1".5158",x0))]t16".5158"(t)):moreis(rpofrt(x0),ksi)
-x0@[l:less(rpofrt(x0),ksi)]
-+*5158
-l@t17:=satz123h(xr,ksi,l):not(moreis(xr,ksi))
-t18:=th3"l.imp"(urt(ksi,x0),moreis(xr,ksi),t17,[t:urt(ksi,x0)]satz158b(t)):not(urt(ksi,x0))
--5158
-l@satz158c:=et(lrt(ksi,x0),t18".5158"):lrt(ksi,x0)
-x0@[m:moreis(rpofrt(x0),ksi)]
-+*5158
-m"rp"@t19:=satz123c(xr,ksi,m):not(less(xr,ksi))
--5158
-m@satz158d:=th3"l.imp"(lrt(ksi,x0),less(rpofrt(x0),ksi),t19".5158",[t:lrt(ksi,x0)]satz158a(t)):urt(ksi,x0)
-ksi@[eta:cut][l:less(ksi,eta)]
-+5159
-[x0:rat]
-xr:=rpofrt(x0):cut
-[ux:urt(ksi,x0)][lx:lrt(eta,x0)][z0:rat]
-zr:=rpofrt(z0):cut
-[lz:lrt(eta,z0)][k:less"rt"(x0,z0)]
-t1:=satz127a(ksi,xr,zr,satz124(xr,ksi,satz158b(ksi,x0,ux)),satz154c(x0,z0,k)):less(ksi,zr)
-t2:=andi(less(ksi,zr),less(zr,eta),t1,satz158a(eta,z0,lz)):and(less(ksi,zr),less(zr,eta))
-t3:=somei(rat,[x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)),z0,t2):some"rt"([x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)))
-lx@t4:=cutapp3(eta,x0,lx,some"rt"([x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta))),[x:rat][t:lrt(eta,x)][u:less"rt"(x0,x)]t3(x,t,u)):some"rt"([x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)))
--5159
-satz159:=lessapp(ksi,eta,l,some"rt"([x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta))),[x:rat][t:urt(ksi,x)][u:lrt(eta,x)]t4".5159"(x,t,u)):some"rt"([x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)))
-+*5159
-x0@[a:and(less(ksi,xr),less(xr,eta))]
-t5:=andi(ratrp(xr),and(less(ksi,xr),less(xr,eta)),ratrpi(x0),a):and3(ratrp(xr),less(ksi,xr),less(xr,eta))
-t6:=somei(cut,[c:cut]and3(ratrp(c),less(ksi,c),less(c,eta)),xr,t5):some([c:cut]and3(ratrp(c),less(ksi,c),less(c,eta)))
--5159
-l@satz159a:=someapp(rat,[x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)),satz159,some([a:cut]and3(ratrp(a),less(ksi,a),less(a,eta))),[x:rat][t:and(less(ksi,rpofrt(x)),less(rpofrt(x),eta))]t6".5159"(x,t)):some([a:cut]and3(ratrp(a),less(ksi,a),less(a,eta)))
-[p:'prop'][p1:[x:rat][t:less(ksi,rpofrt(x))][u:less(rpofrt(x),eta)]p]
-+*5159
-p1@[y0:rat]
-yr:=rpofrt(y0):cut
-[a:and(less(ksi,yr),less(yr,eta))]
-t7:=ande1(less(ksi,yr),less(yr,eta),a):less(ksi,yr)
-t8:=ande2(less(ksi,yr),less(yr,eta),a):less(yr,eta)
-t9:=<t8><t7><y0>p1:p
--5159
-p1@satz159app:=someapp(rat,[x:rat]and(less(ksi,rpofrt(x)),less(rpofrt(x),eta)),satz159,p,[x:rat][t:and(less(ksi,rpofrt(x)),less(rpofrt(x),eta))]t9".5159"(x,t)):p
-eta@[z0:rat][m:more(rpofrt(z0),ts(ksi,eta))]
-+5160
-zr:=rpofrt(z0):cut
-nm:=mn(zr,ts(ksi,eta),m):cut
-dn:=pl(pl(ksi,eta),1rp):cut
-fr:=ov(nm,dn):cut
-zeta:=ite(less(fr,1rp),cut,fr,1rp):cut
-[l:less(fr,1rp)]
-t1:=itet(less(fr,1rp),cut,fr,1rp,l):is(zeta,fr)
-t2:=lessisi2(zeta,fr,t1):lessis(zeta,fr)
-t3:=lessisi1(zeta,1rp,satz127a(zeta,fr,1rp,t2,l)):lessis(zeta,1rp)
-m@[n:not(less(fr,1rp))]
-t4:=itef(less(fr,1rp),cut,fr,1rp,n):is(zeta,1rp)
-t5:=lessisi2(zeta,1rp,t4):lessis(zeta,1rp)
-t6:=trlessis(zeta,1rp,fr,t5,satz124(fr,1rp,satz123f(fr,1rp,n))):lessis(zeta,fr)
-m@t7:=th1"l.imp"(less(fr,1rp),lessis(zeta,1rp),[t:less(fr,1rp)]t3(t),[t:not(less(fr,1rp))]t5(t)):lessis(zeta,1rp)
-t8:=th1"l.imp"(less(fr,1rp),lessis(zeta,fr),[t:less(fr,1rp)]t2(t),[t:not(less(fr,1rp))]t6(t)):lessis(zeta,fr)
-[z1:rat]
-zr1:=rpofrt(z1):cut
-[l1:less(ksi,zr1)][l2:less(zr1,pl(ksi,zeta))][z2:rat]
-zr2:=rpofrt(z2):cut
-[l3:less(eta,zr2)][l4:less(zr2,pl(eta,zeta))]
-t9:=isless2(ts(pl(ksi,zeta),pl(eta,zeta)),pl(ts(pl(ksi,zeta),eta),ts(pl(ksi,zeta),zeta)),ts(zr1,zr2),disttp2(pl(ksi,zeta),eta,zeta),satz147a(zr1,pl(ksi,zeta),zr2,pl(eta,zeta),l2,l4)):less(ts(zr1,zr2),pl(ts(pl(ksi,zeta),eta),ts(pl(ksi,zeta),zeta)))
-t10:=lessisi2(ts(pl(ksi,zeta),eta),pl(ts(ksi,eta),ts(eta,zeta)),tris(cut,ts(pl(ksi,zeta),eta),pl(ts(ksi,eta),ts(zeta,eta)),pl(ts(ksi,eta),ts(eta,zeta)),disttp1(ksi,zeta,eta),ispl2(ts(zeta,eta),ts(eta,zeta),ts(ksi,eta),comts(zeta,eta)))):lessis(ts(pl(ksi,zeta),eta),pl(ts(ksi,eta),ts(eta,zeta)))
-t11:=satz149a(pl(ksi,zeta),pl(ksi,1rp),zeta,zeta,satz139a(ksi,ksi,zeta,1rp,lessisi2(ksi,ksi,refis(cut,ksi)),t7),lessisi2(zeta,zeta,refis(cut,zeta))):lessis(ts(pl(ksi,zeta),zeta),ts(pl(ksi,1rp),zeta))
-t12:=satz139a(ts(pl(ksi,zeta),eta),pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,zeta),zeta),ts(pl(ksi,1rp),zeta),t10,t11):lessis(pl(ts(pl(ksi,zeta),eta),ts(pl(ksi,zeta),zeta)),pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)))
-t13:=satz127b(ts(zr1,zr2),pl(ts(pl(ksi,zeta),eta),ts(pl(ksi,zeta),zeta)),pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)),t9,t12):less(ts(zr1,zr2),pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)))
-t14:=tris(cut,pl(eta,pl(ksi,1rp)),pl(pl(eta,ksi),1rp),pl(pl(ksi,eta),1rp),asspl2(eta,ksi,1rp),ispl1(pl(eta,ksi),pl(ksi,eta),1rp,compl(eta,ksi))):is(pl(eta,pl(ksi,1rp)),dn)
-t15:=tris(cut,pl(ts(eta,zeta),ts(pl(ksi,1rp),zeta)),ts(pl(eta,pl(ksi,1rp)),zeta),ts(dn,zeta),distpt1(eta,pl(ksi,1rp),zeta),ists1(pl(eta,pl(ksi,1rp)),dn,zeta,t14)):is(pl(ts(eta,zeta),ts(pl(ksi,1rp),zeta)),ts(dn,zeta))
-t16:=tris(cut,pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)),pl(ts(ksi,eta),pl(ts(eta,zeta),ts(pl(ksi,1rp),zeta))),pl(ts(ksi,eta),ts(dn,zeta)),asspl1(ts(ksi,eta),ts(eta,zeta),ts(pl(ksi,1rp),zeta)),ispl2(pl(ts(eta,zeta),ts(pl(ksi,1rp),zeta)),ts(dn,zeta),ts(ksi,eta),t15)):is(pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)),pl(ts(ksi,eta),ts(dn,zeta)))
-t17:=isless2(pl(pl(ts(ksi,eta),ts(eta,zeta)),ts(pl(ksi,1rp),zeta)),pl(ts(ksi,eta),ts(dn,zeta)),ts(zr1,zr2),t16,t13):less(ts(zr1,zr2),pl(ts(ksi,eta),ts(dn,zeta)))
-t18:=islessis12(ts(zeta,dn),ts(dn,zeta),ts(fr,dn),nm,comts(zeta,dn),satz153e(nm,dn),satz149a(zeta,fr,dn,dn,t8,lessisi2(dn,dn,refis(cut,dn)))):lessis(ts(dn,zeta),nm)
-t19:=satz139a(ts(ksi,eta),ts(ksi,eta),ts(dn,zeta),nm,lessisi2(ts(ksi,eta),ts(ksi,eta),refis(cut,ts(ksi,eta))),t18):lessis(pl(ts(ksi,eta),ts(dn,zeta)),pl(ts(ksi,eta),nm))
-t20:=satz127b(ts(zr1,zr2),pl(ts(ksi,eta),ts(dn,zeta)),pl(ts(ksi,eta),nm),t17,t19):less(ts(zr1,zr2),pl(ts(ksi,eta),nm))
-t21:=isless2(pl(ts(ksi,eta),nm),zr,ts(zr1,zr2),satz140c(zr,ts(ksi,eta),m),t20):less(ts(zr1,zr2),zr)
-t22:=satz154f(ts"rt"(z1,z2),z0,isless1(ts(zr1,zr2),rpofrt(ts"rt"(z1,z2)),zr,symis(cut,rpofrt(ts"rt"(z1,z2)),ts(zr1,zr2),satz155c(z1,z2)),t21)):less"rt"(ts"rt"(z1,z2),z0)
-x0:=ov"rt"(z0,z2):rat
-xr:=rpofrt(x0):cut
-y0:=z2:rat
-yr:=rpofrt(y0):cut
-t23:=satz110e(z0,z2):is"rt"(ts"rt"(x0,y0),z0)
-t24:=ismore1"rt"(z0,ts"rt"(x0,z2),ts"rt"(z1,z2),symis(rat,ts"rt"(x0,z2),z0,t23),satz83(ts"rt"(z1,z2),z0,t22)):more"rt"(ts"rt"(x0,z2),ts"rt"(z1,z2))
-t25:=satz106a(x0,z1,z2,t24):more"rt"(x0,z1)
-t26:=trmore(xr,zr1,ksi,satz154a(x0,z1,t25),satz122(ksi,zr1,l1)):more(xr,ksi)
-t27:=satz122(eta,yr,l3):more(yr,eta)
-z0@[u0:rat]
-ur:=rpofrt(u0):cut
-[v0:rat]
-vr:=rpofrt(v0):cut
-prop1:=and3(more(ur,ksi),more(vr,eta),is"rt"(ts"rt"(u0,v0),z0)):'prop'
-z0@prop2:=some"rt"([x:rat]some"rt"([y:rat]prop1(x,y))):'prop'
-l4@t28:=and3i(more(xr,ksi),more(yr,eta),is"rt"(ts"rt"(x0,y0),z0),t26,t27,t23):prop1(x0,y0)
-t29:=somei(rat,[y:rat]prop1(x0,y),y0,t28):some"rt"([y:rat]prop1(x0,y))
-t30:=somei(rat,[x:rat]some"rt"([y:rat]prop1(x,y)),x0,t29):prop2
-l2@t31:=satz159app(eta,pl(eta,zeta),satz133a(eta,zeta),prop2,[x:rat][t:less(eta,rpofrt(x))][u:less(rpofrt(x),pl(eta,zeta))]t30(x,t,u)):prop2
--5160
-satz160:=satz159app(ksi,pl(ksi,zeta".5160"),satz133a(ksi,zeta".5160"),prop2".5160",[x:rat][t:less(ksi,rpofrt(x))][u:less(rpofrt(x),pl(ksi,zeta".5160"))]t31".5160"(x,t,u)):some"rt"([x:rat]some"rt"([y:rat]and3(more(rpofrt(x),ksi),more(rpofrt(y),eta),is"rt"(ts"rt"(x,y),z0))))
-[p:'prop'][p1:[x:rat][t:more(rpofrt(x),ksi)][y:rat][u:more(rpofrt(y),eta)][v:is"rt"(ts"rt"(x,y),z0)]p]
-+*5160
-p1@[x1:rat]
-xr1:=rpofrt(x1):cut
-[px:some"rt"([y:rat]prop1(x1,y))][y1:rat]
-yr1:=rpofrt(y1):cut
-[py:prop1(x1,y1)]
-t32:=and3e1(more(xr1,ksi),more(yr1,eta),is"rt"(ts"rt"(x1,y1),z0),py):more(xr1,ksi)
-t33:=and3e2(more(xr1,ksi),more(yr1,eta),is"rt"(ts"rt"(x1,y1),z0),py):more(yr1,eta)
-t34:=and3e3(more(xr1,ksi),more(yr1,eta),is"rt"(ts"rt"(x1,y1),z0),py):is"rt"(ts"rt"(x1,y1),z0)
-t35:=<t34><t33><y1><t32><x1>p1:p
-px@t36:=someapp(rat,[y:rat]prop1(x1,y),px,p,[y:rat][v:prop1(x1,y)]t35(y,v)):p
--5160
-p1@satz160app:=someapp(rat,[x:rat]some"rt"([y:rat]prop1".5160"(x,y)),satz160,p,[x:rat][t:some"rt"([y:rat]prop1".5160"(x,y))]t36".5160"(x,t)):p
-+5161
-@[ksi:cut][eta:cut]
-min:=ite(less(ksi,eta),cut,ksi,eta):cut
-max:=ite(more(ksi,eta),cut,ksi,eta):cut
-[u0:rat]
-ur:=rpofrt(u0):cut
-[lu:lrt(min,u0)]
-t1:=satz158a(min,u0,lu):less(ur,min)
-[l:less(ksi,eta)]
-t2:=isless2(min,ksi,ur,itet(less(ksi,eta),cut,ksi,eta,l),t1):less(ur,ksi)
-t3:=trless(ur,ksi,eta,t2,l):less(ur,eta)
-lu@[n:not(less(ksi,eta))]
-t4:=isless2(min,eta,ur,itef(less(ksi,eta),cut,ksi,eta,n),t1):less(ur,eta)
-t5:=satz127b(ur,eta,ksi,t4,satz124(ksi,eta,satz123f(ksi,eta,n))):less(ur,ksi)
-lu@t6:=th1"l.imp"(less(ksi,eta),less(ur,ksi),[t:less(ksi,eta)]t2(t),[t:not(less(ksi,eta))]t5(t)):less(ur,ksi)
-t7:=th1"l.imp"(less(ksi,eta),less(ur,eta),[t:less(ksi,eta)]t3(t),[t:not(less(ksi,eta))]t4(t)):less(ur,eta)
-u0@[uu:urt(max,u0)]
-t8:=satz158b(max,u0,uu):moreis(ur,max)
-[m:more(ksi,eta)]
-t9:=ismoreis2(max,ksi,ur,itet(more(ksi,eta),cut,ksi,eta,m),t8):moreis(ur,ksi)
-t10:=trmoreis(ur,ksi,eta,t9,moreisi1(ksi,eta,m)):moreis(ur,eta)
-uu@[n:not(more(ksi,eta))]
-t11:=ismoreis2(max,eta,ur,itef(more(ksi,eta),cut,ksi,eta,n),t8):moreis(ur,eta)
-t12:=trmoreis(ur,eta,ksi,t11,satz125(ksi,eta,satz123e(ksi,eta,n))):moreis(ur,ksi)
-uu@t13:=th1"l.imp"(more(ksi,eta),moreis(ur,ksi),[t:more(ksi,eta)]t9(t),[t:not(more(ksi,eta))]t12(t)):moreis(ur,ksi)
-t14:=th1"l.imp"(more(ksi,eta),moreis(ur,eta),[t:more(ksi,eta)]t10(t),[t:not(more(ksi,eta))]t11(t)):moreis(ur,eta)
--5161
-@[zeta:cut]
-+*5161
-zeta@[ksi1:cut][ksi2:cut][m:more(ksi1,ksi2)]
-t15:=satz147(ksi1,ksi2,ksi1,ksi2,m,m):more(ts(ksi1,ksi1),ts(ksi2,ksi2))
-ksi2@sq1:=ts(ksi1,ksi1):cut
-sq2:=ts(ksi2,ksi2):cut
-m@t16:=ec3e21(is(sq1,sq2),more(sq1,sq2),less(sq1,sq2),satz123b(sq1,sq2),t15):nis(sq1,sq2)
-ksi2@[i:is(sq1,zeta)][j:is(sq2,zeta)]
-t17:=tris2(cut,sq1,sq2,zeta,i,j):is(sq1,sq2)
-t18:=[t:more(ksi1,ksi2)]<t17>t16(t):not(more(ksi1,ksi2))
-t19:=[t:less(ksi1,ksi2)]<symis(cut,sq1,sq2,t17)>t16(ksi2,ksi1,satz122(ksi1,ksi2,t)):not(less(ksi1,ksi2))
-t20:=or3e1(is(ksi1,ksi2),more(ksi1,ksi2),less(ksi1,ksi2),satz123a(ksi1,ksi2),t18,t19):is(ksi1,ksi2)
-zeta@t21:=[a:cut][b:cut][t:is(ts(a,a),zeta)][u:is(ts(b,b),zeta)]t20(a,b,t,u):amone(cut,[a:cut]is(ts(a,a),zeta))
-sqrtset:=setof(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta)):set(rat)
-[x0:rat]
-xr:=rpofrt(x0):cut
-[lx:lrt(min(1rp,zeta),x0)]
-t22:=t6(1rp,zeta,x0,lx):less(xr,1rp)
-t23:=t7(1rp,zeta,x0,lx):less(xr,zeta)
-t24:=isless1(xr,ts(xr,1rp),zeta,satz151a(xr),t23):less(ts(xr,1rp),zeta)
-t25:=trless(ts(xr,xr),ts(xr,1rp),zeta,satz148c(xr,xr,xr,1rp,lessisi2(xr,xr,refis(cut,xr)),t22),t24):less(ts(xr,xr),zeta)
-t26:=estii(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),x0,t25):in(x0,sqrtset)
-x0@[ux:urt(max(1rp,zeta),x0)]
-t27:=t13(1rp,zeta,x0,ux):moreis(xr,1rp)
-t28:=t14(1rp,zeta,x0,ux):moreis(xr,zeta)
-t29:=ismoreis1(xr,ts(xr,1rp),zeta,satz151a(xr),t28):moreis(ts(xr,1rp),zeta)
-t30:=trmoreis(ts(xr,xr),ts(xr,1rp),zeta,satz149(xr,xr,xr,1rp,moreisi2(xr,xr,refis(cut,xr)),t27),t29):moreis(ts(xr,xr),zeta)
-t31:=satz123c(ts(xr,xr),zeta,t30):not(less(ts(xr,xr),zeta))
-t32:=th3"l.imp"(in(x0,sqrtset),less(ts(xr,xr),zeta),t31,[t:in(x0,sqrtset)]estie(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),x0,t)):not(in(x0,sqrtset))
-x0@[i:in(x0,sqrtset)][y0:rat]
-yr:=rpofrt(y0):cut
-[l:less"rt"(y0,x0)]
-i@t33:=estie(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),x0,i):less(ts(xr,xr),zeta)
-l@t34:=satz154c(y0,x0,l):less(yr,xr)
-t35:=trless(ts(yr,yr),ts(xr,xr),zeta,satz147a(yr,xr,yr,xr,t34,t34),t33):less(ts(yr,yr),zeta)
-t36:=estii(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),y0,t35):in(y0,sqrtset)
-i@t37:=satz122(ts(xr,xr),zeta,t33):more(zeta,ts(xr,xr))
-nm:=mn(zeta,ts(xr,xr),t37):cut
-dn:=pl(xr,pl(xr,1rp)):cut
-fr:=ov(nm,dn):cut
-[z0:rat]
-zr:=rpofrt(z0):cut
-[lz:lrt(min(1rp,fr),z0)]
-t38:=t6(1rp,fr,z0,lz):less(zr,1rp)
-t39:=t7(1rp,fr,z0,lz):less(zr,fr)
-t40:=satz94(x0,z0):more"rt"(pl"rt"(x0,z0),x0)
-t41:=tris(cut,ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),ts(pl(xr,zr),pl(xr,zr)),pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)),ists12(rpofrt(pl"rt"(x0,z0)),pl(xr,zr),rpofrt(pl"rt"(x0,z0)),pl(xr,zr),satz155a(x0,z0),satz155a(x0,z0)),disttp2(pl(xr,zr),xr,zr)):is(ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)))
-t42:=symis(cut,ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)),t41):is(pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)),ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))))
-t43:=lessisi2(ts(pl(xr,zr),xr),pl(ts(xr,xr),ts(xr,zr)),tris(cut,ts(pl(xr,zr),xr),pl(ts(xr,xr),ts(zr,xr)),pl(ts(xr,xr),ts(xr,zr)),disttp1(xr,zr,xr),ispl2(ts(zr,xr),ts(xr,zr),ts(xr,xr),comts(zr,xr)))):lessis(ts(pl(xr,zr),xr),pl(ts(xr,xr),ts(xr,zr)))
-t44:=satz145c(pl(xr,zr),pl(xr,1rp),zr,satz138c(xr,xr,zr,1rp,lessisi2(xr,xr,refis(cut,xr)),t38)):less(ts(pl(xr,zr),zr),ts(pl(xr,1rp),zr))
-t45:=satz138c(ts(pl(xr,zr),xr),pl(ts(xr,xr),ts(xr,zr)),ts(pl(xr,zr),zr),ts(pl(xr,1rp),zr),t43,t44):less(pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)),pl(pl(ts(xr,xr),ts(xr,zr)),ts(pl(xr,1rp),zr)))
-t46:=tris(cut,pl(pl(ts(xr,xr),ts(xr,zr)),ts(pl(xr,1rp),zr)),pl(ts(xr,xr),pl(ts(xr,zr),ts(pl(xr,1rp),zr))),pl(ts(xr,xr),ts(dn,zr)),asspl1(ts(xr,xr),ts(xr,zr),ts(pl(xr,1rp),zr)),ispl2(pl(ts(xr,zr),ts(pl(xr,1rp),zr)),ts(dn,zr),ts(xr,xr),distpt1(xr,pl(xr,1rp),zr))):is(pl(pl(ts(xr,xr),ts(xr,zr)),ts(pl(xr,1rp),zr)),pl(ts(xr,xr),ts(dn,zr)))
-t47:=isless12(pl(ts(pl(xr,zr),xr),ts(pl(xr,zr),zr)),ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),pl(pl(ts(xr,xr),ts(xr,zr)),ts(pl(xr,1rp),zr)),pl(ts(xr,xr),ts(dn,zr)),t42,t46,t45):less(ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),pl(ts(xr,xr),ts(dn,zr)))
-t48:=isless2(ts(dn,fr),nm,ts(dn,zr),satz153c(nm,dn),satz148c(dn,dn,zr,fr,lessisi2(dn,dn,refis(cut,dn)),t39)):less(ts(dn,zr),nm)
-t49:=satz138c(ts(xr,xr),ts(xr,xr),ts(dn,zr),nm,lessisi2(ts(xr,xr),ts(xr,xr),refis(cut,ts(xr,xr))),t48):less(pl(ts(xr,xr),ts(dn,zr)),pl(ts(xr,xr),nm))
-t50:=isless2(pl(ts(xr,xr),nm),zeta,pl(ts(xr,xr),ts(dn,zr)),satz140c(zeta,ts(xr,xr),t37),t49):less(pl(ts(xr,xr),ts(dn,zr)),zeta)
-t51:=trless(ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),pl(ts(xr,xr),ts(dn,zr)),zeta,t47,t50):less(ts(rpofrt(pl"rt"(x0,z0)),rpofrt(pl"rt"(x0,z0))),zeta)
-t52:=estii(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),pl"rt"(x0,z0),t51):in(pl"rt"(x0,z0),sqrtset)
-t53:=andi(in(pl"rt"(x0,z0),sqrtset),more"rt"(pl"rt"(x0,z0),x0),t52,t40):and(in(pl"rt"(x0,z0),sqrtset),more"rt"(pl"rt"(x0,z0),x0))
-t54:=somei(rat,[y:rat]and(in(y,sqrtset),more"rt"(y,x0)),pl"rt"(x0,z0),t53):some"rt"([y:rat]and(in(y,sqrtset),more"rt"(y,x0)))
-i@t55:=cutapp1a(min(1rp,fr),some"rt"([y:rat]and(in(y,sqrtset),more"rt"(y,x0))),[x:rat][t:lrt(min(1rp,fr),x)]t54(x,t)):some"rt"([y:rat]and(in(y,sqrtset),more"rt"(y,x0)))
-x0@[lx:lrt(min(1rp,zeta),x0)][y0:rat][uy:urt(max(1rp,zeta),y0)]
-t56:=cut2(sqrtset,x0,t26(lx),y0,t32(y0,uy),[x:rat][t:in(x,sqrtset)][y:rat][u:less"rt"(y,x)]t36(x,t,y,u),[x:rat][t:in(x,sqrtset)]t55(x,t)):cutprop(sqrtset)
-lx@t57:=cutapp1b(max(1rp,zeta),cutprop(sqrtset),[y:rat][t:urt(max(1rp,zeta),y)]t56(y,t)):cutprop(sqrtset)
-zeta@t58:=cutapp1a(min(1rp,zeta),cutprop(sqrtset),[x:rat][t:lrt(min(1rp,zeta),x)]t57(x,t)):cutprop(sqrtset)
-rtc:=cutof(sqrtset,t58):cut
-@[x0:rat][y0:rat][l:lessis"rt"(x0,y0)]
-t59:=th9"l.or"(less"rt"(x0,y0),is"rt"(x0,y0),less(rpofrt(x0),rpofrt(y0)),is(rpofrt(x0),rpofrt(y0)),l,[t:less"rt"(x0,y0)]satz154c(x0,y0,t),[t:is"rt"(x0,y0)]satz154b(x0,y0,t)):lessis(rpofrt(x0),rpofrt(y0))
-y0@[m:moreis"rt"(x0,y0)]
-t60:=satz125(rpofrt(y0),rpofrt(x0),t59(y0,x0,satz84(x0,y0,m))):moreis(rpofrt(x0),rpofrt(y0))
-zeta@[m:more(ts(rtc,rtc),zeta)]
-t61:=satz121(ts(rtc,rtc),zeta,m):less(zeta,ts(rtc,rtc))
-[z1:rat]
-zr1:=rpofrt(z1):cut
-[l1:less(zeta,zr1)][l2:less(zr1,ts(rtc,rtc))]
-t62:=satz158c(ts(rtc,rtc),z1,l2):lrt(ts(rtc,rtc),z1)
-[x1:rat]
-xr1:=rpofrt(x1):cut
-[lx1:lrt(rtc,x1)][x2:rat]
-xr2:=rpofrt(x2):cut
-[lx2:lrt(rtc,x2)][i:is"rt"(z1,ts"rt"(x1,x2))]
-xm:=ite(more"rt"(x1,x2),rat,x1,x2):rat
-xrm:=rpofrt(xm):cut
-[o:more"rt"(x1,x2)]
-t63:=symis(rat,xm,x1,itet(more"rt"(x1,x2),rat,x1,x2,o)):is"rt"(x1,xm)
-t64:=isp(rat,[x:rat]lrt(rtc,x),x1,xm,lx1,t63):lrt(rtc,xm)
-t65:=lessisi2"rt"(x1,xm,t63):lessis"rt"(x1,xm)
-t66:=lessisi1"rt"(x2,xm,satz87b(x2,x1,xm,satz82(x1,x2,o),t65)):lessis"rt"(x2,xm)
-i@[n:not(more"rt"(x1,x2))]
-t67:=symis(rat,xm,x2,itef(more"rt"(x1,x2),rat,x1,x2,n)):is"rt"(x2,xm)
-t68:=isp(rat,[x:rat]lrt(rtc,x),x2,xm,lx2,t67):lrt(rtc,xm)
-t69:=lessisi2"rt"(x2,xm,t67):lessis"rt"(x2,xm)
-t70:=satz88(x1,x2,xm,satz81e(x1,x2,n),t69):lessis"rt"(x1,xm)
-i@t71:=th1"l.imp"(more"rt"(x1,x2),lrt(rtc,xm),[t:more"rt"(x1,x2)]t64(t),[t:not(more"rt"(x1,x2))]t68(t)):lrt(rtc,xm)
-t72:=th1"l.imp"(more"rt"(x1,x2),lessis"rt"(x1,xm),[t:more"rt"(x1,x2)]t65(t),[t:not(more"rt"(x1,x2))]t70(t)):lessis"rt"(x1,xm)
-t73:=th1"l.imp"(more"rt"(x1,x2),lessis"rt"(x2,xm),[t:more"rt"(x1,x2)]t66(t),[t:not(more"rt"(x1,x2))]t69(t)):lessis"rt"(x2,xm)
-t74:=ini(sqrtset,t58,xm,t71):in(xm,sqrtset)
-t75:=t59(x1,xm,t72):lessis(xr1,xrm)
-t76:=t59(x2,xm,t73):lessis(xr2,xrm)
-t77:=tris(cut,zr1,rpofrt(ts"rt"(x1,x2)),ts(xr1,xr2),satz154b(z1,ts"rt"(x1,x2),i),satz155c(x1,x2)):is(zr1,ts(xr1,xr2))
-t78:=islessis1(ts(xr1,xr2),zr1,ts(xrm,xrm),symis(cut,zr1,ts(xr1,xr2),t77),satz149a(xr1,xrm,xr2,xrm,t75,t76)):lessis(zr1,ts(xrm,xrm))
-t79:=estie(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),xm,t74):less(ts(xrm,xrm),zeta)
-t80:=satz127a(zr1,ts(xrm,xrm),zeta,t78,t79):less(zr1,zeta)
-t81:=<t80>ec3e23(is(zr1,zeta),more(zr1,zeta),less(zr1,zeta),satz123b(zr1,zeta),satz122(zeta,zr1,l1)):con
-t82:=tsapp(rtc,rtc,z1,t62,con,[x:rat][t:lrt(rtc,x)][y:rat][u:lrt(rtc,y)][v:is"rt"(z1,ts"rt"(x,y))]t81(x,t,y,u,v)):con
-l2@t82a:=tsapp(rtc,rtc,z1,t62,con,[x:rat][t:lrt(rtc,x)][y:rat][u:lrt(rtc,y)][v:is"rt"(z1,ts"rt"(x,y))]t82(x,t,y,u,v)):con
-m@t83:=satz159app(zeta,ts(rtc,rtc),t61,con,[x:rat][t:less(zeta,rpofrt(x))][u:less(rpofrt(x),ts(rtc,rtc))]t82a(x,t,u)):con
-zeta@[l:less(ts(rtc,rtc),zeta)][z2:rat]
-zr2:=rpofrt(z2):cut
-[l3:less(ts(rtc,rtc),zr2)][l4:less(zr2,zeta)]
-t84:=satz122(ts(rtc,rtc),zr2,l3):more(zr2,ts(rtc,rtc))
-[y1:rat]
-yr1:=rpofrt(y1):cut
-[m1:more(yr1,rtc)][y2:rat]
-yr2:=rpofrt(y2):cut
-[m2:more(yr2,rtc)][i:is"rt"(ts"rt"(y1,y2),z2)]
-ym:=ite(less"rt"(y1,y2),rat,y1,y2):rat
-yrm:=rpofrt(ym):cut
-[k:less"rt"(y1,y2)]
-t85:=symis(rat,ym,y1,itet(less"rt"(y1,y2),rat,y1,y2,k)):is"rt"(y1,ym)
-t86:=satz154b(y1,ym,t85):is(yr1,yrm)
-t87:=ismore1(yr1,yrm,rtc,t86,m1):more(yrm,rtc)
-t88:=moreisi2(yr1,yrm,t86):moreis(yr1,yrm)
-t89:=moreisi1(yr2,yrm,satz127d(yr2,yr1,yrm,satz122(yr1,yr2,satz154c(y1,y2,k)),t88)):moreis(yr2,yrm)
-i@[n:not(less"rt"(y1,y2))]
-t90:=symis(rat,ym,y2,itef(less"rt"(y1,y2),rat,y1,y2,n)):is"rt"(y2,ym)
-t91:=satz154b(y2,ym,t90):is(yr2,yrm)
-t92:=ismore1(yr2,yrm,rtc,t91,m2):more(yrm,rtc)
-t93:=moreisi2(yr2,yrm,t91):moreis(yr2,yrm)
-t94:=trmoreis(yr1,yr2,yrm,t60(y1,y2,satz81f(y1,y2,n)),t93):moreis(yr1,yrm)
-i@t95:=th1"l.imp"(less"rt"(y1,y2),more(yrm,rtc),[t:less"rt"(y1,y2)]t87(t),[t:not(less"rt"(y1,y2))]t92(t)):more(yrm,rtc)
-t96:=th1"l.imp"(less"rt"(y1,y2),moreis(yr1,yrm),[t:less"rt"(y1,y2)]t88(t),[t:not(less"rt"(y1,y2))]t94(t)):moreis(yr1,yrm)
-t97:=th1"l.imp"(less"rt"(y1,y2),moreis(yr2,yrm),[t:less"rt"(y1,y2)]t89(t),[t:not(less"rt"(y1,y2))]t93(t)):moreis(yr2,yrm)
-t98:=satz158d(rtc,ym,moreisi1(yrm,rtc,t95)):urt(rtc,ym)
-t99:=th3"l.imp"(in(ym,sqrtset),lrt(rtc,ym),t98,[t:in(ym,sqrtset)]ine(sqrtset,t58,ym,t)):not(in(ym,sqrtset))
-t100:=th3"l.imp"(less(ts(yrm,yrm),zeta),in(ym,sqrtset),t99,[t:less(ts(yrm,yrm),zeta)]estii(rat,[x:rat]less(ts(rpofrt(x),rpofrt(x)),zeta),ym,t)):not(less(ts(yrm,yrm),zeta))
-t101:=satz123f(ts(yrm,yrm),zeta,t100):moreis(ts(yrm,yrm),zeta)
-t101a:=satz149(yr1,yrm,yr2,yrm,t96,t97):moreis(ts(yr1,yr2),ts(yrm,yrm))
-t102:=ismoreis1(ts(yr1,yr2),zr2,ts(yrm,yrm),tris(cut,ts(yr1,yr2),rpofrt(ts"rt"(y1,y2)),zr2,symis(cut,rpofrt(ts"rt"(y1,y2)),ts(yr1,yr2),satz155c(y1,y2)),satz154b(ts"rt"(y1,y2),z2,i)),t101a):moreis(zr2,ts(yrm,yrm))
-t103:=trmoreis(zr2,ts(yrm,yrm),zeta,t102,t101):moreis(zr2,zeta)
-t104:=<l4>satz123c(zr2,zeta,t103):con
-l4@t105:=satz160app(rtc,rtc,z2,t84,con,[x:rat][t:more(rpofrt(x),rtc)][y:rat][u:more(rpofrt(y),rtc)][v:is"rt"(ts"rt"(x,y),z2)]t104(x,t,y,u,v)):con
-l@t106:=satz159app(ts(rtc,rtc),zeta,l,con,[x:rat][t:less(ts(rtc,rtc),rpofrt(x))][u:less(rpofrt(x),zeta)]t105(x,t,u)):con
-zeta@t107:=or3e1(is(ts(rtc,rtc),zeta),more(ts(rtc,rtc),zeta),less(ts(rtc,rtc),zeta),satz123a(ts(rtc,rtc),zeta),[t:more(ts(rtc,rtc),zeta)]t83(t),[t:less(ts(rtc,rtc),zeta)]t106(t)):is(ts(rtc,rtc),zeta)
-t108:=somei(cut,[a:cut]is(ts(a,a),zeta),rtc,t107):some([a:cut]is(ts(a,a),zeta))
--5161
-zeta@satz161:=onei(cut,[a:cut]is(ts(a,a),zeta),t21".5161",t108".5161"):one([a:cut]is(ts(a,a),zeta))
-@[ksi:cut]
-irratrp:=not(ratrp(ksi)):'prop'
--rp
--rt
-+5162
-@[v:nat]
-t1:=tris(nat,pl(v,v),pl(ts(1,v),v),ts(<1>suc,v),ispl1(v,ts(1,v),v,satz28g(v)),satz28h(1,v)):is(pl(v,v),ts(<1>suc,v))
-t2:=isless2(pl(v,v),ts(<1>suc,v),v,t1,satz18a(v,v)):less(v,ts(<1>suc,v))
-[w:nat][l:less(ts(v,v),ts(w,w))]
-t3:=satz10j(v,w,th3"l.imp"(moreis(v,w),moreis(ts(v,v),ts(w,w)),satz10h(ts(v,v),ts(w,w),l),[t:moreis(v,w)]satz36(v,w,v,w,t,t))):less(v,w)
-w@t4:=tris(nat,ts(pl(v,w),v),pl(ts(v,v),ts(w,v)),pl(ts(v,v),ts(v,w)),disttp1(v,w,v),ispl2(ts(w,v),ts(v,w),ts(v,v),comts(w,v))):is(ts(pl(v,w),v),pl(ts(v,v),ts(v,w)))
-t5:=tr3is(nat,ts(pl(v,w),pl(v,w)),pl(ts(pl(v,w),v),ts(pl(v,w),w)),pl(pl(ts(v,v),ts(v,w)),pl(ts(v,w),ts(w,w))),pl(pl(pl(ts(v,v),ts(v,w)),ts(v,w)),ts(w,w)),disttp2(pl(v,w),v,w),ispl12(ts(pl(v,w),v),pl(ts(v,v),ts(v,w)),ts(pl(v,w),w),pl(ts(v,w),ts(w,w)),t4,disttp1(v,w,w)),asspl2(pl(ts(v,v),ts(v,w)),ts(v,w),ts(w,w))):is(ts(pl(v,w),pl(v,w)),pl(pl(pl(ts(v,v),ts(v,w)),ts(v,w)),ts(w,w)))
-t6:=tris(nat,pl(pl(ts(v,v),ts(v,w)),ts(v,w)),pl(ts(v,v),pl(ts(v,w),ts(v,w))),pl(ts(v,v),ts(<1>suc,ts(v,w))),asspl1(ts(v,v),ts(v,w),ts(v,w)),ispl2(pl(ts(v,w),ts(v,w)),ts(<1>suc,ts(v,w)),ts(v,v),t1(ts(v,w)))):is(pl(pl(ts(v,v),ts(v,w)),ts(v,w)),pl(ts(v,v),ts(<1>suc,ts(v,w))))
-nun:=tris(nat,ts(pl(v,w),pl(v,w)),pl(pl(pl(ts(v,v),ts(v,w)),ts(v,w)),ts(w,w)),pl(pl(ts(v,v),ts(<1>suc,ts(v,w))),ts(w,w)),t5,ispl1(pl(pl(ts(v,v),ts(v,w)),ts(v,w)),pl(ts(v,v),ts(<1>suc,ts(v,w))),ts(w,w),t6)):is(ts(pl(v,w),pl(v,w)),pl(pl(ts(v,v),ts(<1>suc,ts(v,w))),ts(w,w)))
-nun1:=symis(nat,ts(pl(v,w),pl(v,w)),pl(pl(ts(v,v),ts(<1>suc,ts(v,w))),ts(w,w)),nun):is(pl(pl(ts(v,v),ts(<1>suc,ts(v,w))),ts(w,w)),ts(pl(v,w),pl(v,w)))
-prop1:=eq(tf(fr(w,v),fr(w,v)),fr(<1>suc,1)):'prop'
-v@prop2:=some([t:nat]prop1(t)):'prop'
-@prop3:=some([u:nat]prop2(u)):'prop'
-[p:prop3]
-y:=ind(nat,[t:nat]min([u:nat]prop2(u),t),satz27a([u:nat]prop2(u),p)):nat
-t7:=oneax(nat,[t:nat]min([u:nat]prop2(u),t),satz27a([u:nat]prop2(u),p)):min([u:nat]prop2(u),y)
-t8:=ande1(lb([u:nat]prop2(u),y),prop2(y),t7):lb([u:nat]prop2(u),y)
-t9:=ande2(lb([u:nat]prop2(u),y),prop2(y),t7):prop2(y)
-[x:nat][q:prop1(y,x)]
-t10:=treq1(fr(<1>suc,1),fr(ts(x,x),ts(y,y)),tf(fr(x,y),fr(x,y)),q,tfeq12a(x,y,x,y)):eq(fr(<1>suc,1),fr(ts(x,x),ts(y,y)))
-t11:=tr4is(nat,ts(<1>suc,ts(y,y)),ts(num(fr(<1>suc,1)),den(fr(ts(x,x),ts(y,y)))),ts(num(fr(ts(x,x),ts(y,y))),den(fr(<1>suc,1))),ts(ts(x,x),1),ts(x,x),12isnd(<1>suc,1,ts(x,x),ts(y,y)),t10,ndis12(ts(x,x),ts(y,y),<1>suc,1),satz28a(ts(x,x))):is(ts(<1>suc,ts(y,y)),ts(x,x))
-t12:=isless2(ts(<1>suc,ts(y,y)),ts(x,x),ts(y,y),t11,t2(ts(y,y))):less(ts(y,y),ts(x,x))
-t13:=isless1(ts(ts(<1>suc,y),y),ts(x,x),ts(ts(<1>suc,y),ts(<1>suc,y)),tris(nat,ts(ts(<1>suc,y),y),ts(<1>suc,ts(y,y)),ts(x,x),assts1(<1>suc,y,y),t11),satz35c(ts(<1>suc,y),ts(<1>suc,y),y,ts(<1>suc,y),lessisi2(ts(<1>suc,y),ts(<1>suc,y),refis(nat,ts(<1>suc,y))),t2(y))):less(ts(x,x),ts(ts(<1>suc,y),ts(<1>suc,y)))
-t14:=t3(y,x,t12):less(y,x)
-t15:=t3(x,ts(<1>suc,y),t13):less(x,ts(<1>suc,y))
-[u:nat][i:is(x,pl(y,u))]
-t16:=isless12(x,pl(y,u),ts(<1>suc,y),pl(y,y),i,symis(nat,pl(y,y),ts(<1>suc,y),t1(y)),t15):less(pl(y,u),pl(y,y))
-t17:=satz20f(u,y,y,t16):less(u,y)
-[t:nat][j:is(y,pl(u,t))]
-t18:=symis(nat,y,pl(u,t),j):is(pl(u,t),y)
-t19:=tris(nat,ts(x,x),ts(pl(y,u),pl(y,u)),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),ts(u,u)),ists12(x,pl(y,u),x,pl(y,u),i,i),nun(y,u)):is(ts(x,x),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),ts(u,u)))
-t20:=tris(nat,pl(ts(x,x),ts(t,t)),pl(pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),ts(u,u)),ts(t,t)),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(ts(u,u),ts(t,t))),ispl1(ts(x,x),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),ts(u,u)),ts(t,t),t19),asspl1(pl(ts(y,y),ts(<1>suc,ts(y,u))),ts(u,u),ts(t,t))):is(pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(ts(u,u),ts(t,t))))
-t21:=tr3is(nat,ts(y,u),ts(u,y),ts(u,pl(u,t)),pl(ts(u,u),ts(u,t)),comts(y,u),ists2(y,pl(u,t),u,j),disttp2(u,u,t)):is(ts(y,u),pl(ts(u,u),ts(u,t)))
-t22:=tris(nat,ts(<1>suc,ts(y,u)),ts(<1>suc,pl(ts(u,u),ts(u,t))),pl(ts(<1>suc,ts(u,u)),ts(<1>suc,ts(u,t))),ists2(ts(y,u),pl(ts(u,u),ts(u,t)),<1>suc,t21),disttp2(<1>suc,ts(u,u),ts(u,t))):is(ts(<1>suc,ts(y,u)),pl(ts(<1>suc,ts(u,u)),ts(<1>suc,ts(u,t))))
-t23:=tris(nat,pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(ts(y,y),pl(ts(<1>suc,ts(u,u)),ts(<1>suc,ts(u,t)))),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(<1>suc,ts(u,t))),ispl2(ts(<1>suc,ts(y,u)),pl(ts(<1>suc,ts(u,u)),ts(<1>suc,ts(u,t))),ts(y,y),t22),asspl2(ts(y,y),ts(<1>suc,ts(u,u)),ts(<1>suc,ts(u,t)))):is(pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(<1>suc,ts(u,t))))
-t24:=tr3is(nat,pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(ts(u,u),ts(t,t))),pl(pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(<1>suc,ts(u,t))),pl(ts(u,u),ts(t,t))),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t)))),t20,ispl1(pl(ts(y,y),ts(<1>suc,ts(y,u))),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(<1>suc,ts(u,t))),pl(ts(u,u),ts(t,t)),t23),asspl1(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t)))):is(pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t)))))
-t25:=tr4is(nat,pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t))),pl(pl(ts(<1>suc,ts(u,t)),ts(u,u)),ts(t,t)),pl(pl(ts(u,u),ts(<1>suc,ts(u,t))),ts(t,t)),ts(pl(u,t),pl(u,t)),ts(y,y),asspl2(ts(<1>suc,ts(u,t)),ts(u,u),ts(t,t)),ispl1(pl(ts(<1>suc,ts(u,t)),ts(u,u)),pl(ts(u,u),ts(<1>suc,ts(u,t))),ts(t,t),compl(ts(<1>suc,ts(u,t)),ts(u,u))),nun1(u,t),ists12(pl(u,t),y,pl(u,t),y,t18,t18)):is(pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t))),ts(y,y))
-t26:=tr4is(nat,pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t)))),pl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(y,y)),pl(ts(y,y),pl(ts(y,y),ts(<1>suc,ts(u,u)))),pl(pl(ts(y,y),ts(y,y)),ts(<1>suc,ts(u,u))),t24,ispl2(pl(ts(<1>suc,ts(u,t)),pl(ts(u,u),ts(t,t))),ts(y,y),pl(ts(y,y),ts(<1>suc,ts(u,u))),t25),compl(pl(ts(y,y),ts(<1>suc,ts(u,u))),ts(y,y)),asspl2(ts(y,y),ts(y,y),ts(<1>suc,ts(u,u)))):is(pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(y,y)),ts(<1>suc,ts(u,u))))
-t27:=tris(nat,pl(ts(y,y),ts(y,y)),ts(<1>suc,ts(y,y)),ts(x,x),t1(ts(y,y)),t11):is(pl(ts(y,y),ts(y,y)),ts(x,x))
-t28:=tris(nat,pl(ts(x,x),ts(t,t)),pl(pl(ts(y,y),ts(y,y)),ts(<1>suc,ts(u,u))),pl(ts(x,x),ts(<1>suc,ts(u,u))),t26,ispl1(pl(ts(y,y),ts(y,y)),ts(x,x),ts(<1>suc,ts(u,u)),t27)):is(pl(ts(x,x),ts(t,t)),pl(ts(x,x),ts(<1>suc,ts(u,u))))
-t29:=satz20e(ts(t,t),ts(<1>suc,ts(u,u)),ts(x,x),t28):is(ts(t,t),ts(<1>suc,ts(u,u)))
-t30:=tr4is(nat,ts(num(fr(<1>suc,1)),den(fr(ts(t,t),ts(u,u)))),ts(<1>suc,ts(u,u)),ts(t,t),ts(ts(t,t),1),ts(num(fr(ts(t,t),ts(u,u))),den(fr(<1>suc,1))),ndis12(<1>suc,1,ts(t,t),ts(u,u)),symis(nat,ts(t,t),ts(<1>suc,ts(u,u)),t29),satz28e(ts(t,t)),12isnd(ts(t,t),ts(u,u),<1>suc,1)):eq(fr(<1>suc,1),fr(ts(t,t),ts(u,u)))
-t31:=treq2(tf(fr(t,u),fr(t,u)),fr(<1>suc,1),fr(ts(t,t),ts(u,u)),tfeq12a(t,u,t,u),t30):prop1(u,t)
-t32:=somei(nat,[v:nat]prop1(u,v),t,t31):prop2(u)
-t33:=<t32><u>t8:lessis(y,u)
-t34:=<t33>satz10g(y,u,satz12(u,y,t17)):con
-i@t35:=someapp(nat,[v:nat]diffprop(y,u,v),t17,con,[v:nat][w:diffprop(y,u,v)]t34(v,w)):con
-q@t36:=someapp(nat,[v:nat]diffprop(x,y,v),t14,con,[v:nat][w:diffprop(x,y,v)]t35(v,w)):con
-p@t37:=someapp(nat,[v:nat]prop1(y,v),t9,con,[v:nat][w:prop1(y,v)]t36(v,w)):con
--5162
-+*rt
-+5162
-@[x0:rat][i:is(ts(x0,x0),rtofn(<1>suc))][x:frac][xix0:inf(x,class(x0))]
-t38:=ise(ts(x0,x0),rtofn(<1>suc),tf(x,x),fr(<1>suc,1),tict(x0,x0,x,x,xix0,xix0),inclass(fr(<1>suc,1)),i):eq"n"(tf(x,x),fr(<1>suc,1))
-t39:=refeq1(fr(num(x),den(x)),x,fris(x)):eq"n"(fr(num(x),den(x)),x)
-t40:=eqtf12(fr(num(x),den(x)),x,fr(num(x),den(x)),x,t39,t39):eq"n"(tf(fr(num(x),den(x)),fr(num(x),den(x))),tf(x,x))
-t41:=treq"n"(tf(fr(num(x),den(x)),fr(num(x),den(x))),tf(x,x),fr(<1>suc,1),t40,t38):prop1"n.5162"(den(x),num(x))
-t42:=somei(nat,[t:nat]prop1"n.5162"(den(x),t),num(x),t41):prop2"n.5162"(den(x))
-t43:=somei(nat,[t:nat]prop2"n.5162"(t),den(x),t42):prop3"n.5162"
-t44:=t37"n.5162"(t43):con
-i@t45:=ratapp1(x0,con,[x:frac][t:inf(x,class(x0))]t44(x,t)):con
--5162
-+*rp
-+5162
-@ksi:=ind(cut,[a:cut]is(ts(a,a),rpofnt(<1>suc)),satz161(rpofnt(<1>suc))):cut
-t46:=oneax(cut,[a:cut]is(ts(a,a),rpofnt(<1>suc)),satz161(rpofnt(<1>suc))):is(ts(ksi,ksi),rpofnt(<1>suc))
-[r:ratrp(ksi)]
-x0:=rtofrp(ksi,r):rat
-t47:=tr3is(cut,rpofrt(ts"rt"(x0,x0)),ts(rpofrt(x0),rpofrt(x0)),ts(ksi,ksi),rpofnt(<1>suc),satz155c(x0,x0),ists12(rpofrt(x0),ksi,rpofrt(x0),ksi,isrprt2(ksi,r),isrprt2(ksi,r)),t46):is(rpofrt(ts"rt"(x0,x0)),rpofnt(<1>suc))
-t48:=isrtirp(ts"rt"(x0,x0),rtofn(<1>suc),t47):is"rt"(ts"rt"(x0,x0),rtofn(<1>suc))
-t49:=t45"rt.5162"(x0,t48):con
--5162
-@satz162:=somei(cut,[a:cut]irratrp(a),ksi".5162",[t:ratrp(ksi".5162")]t49".5162"(t)):some([a:cut]irratrp(a))
-[zeta:cut]
-sqrt:=ind(cut,[a:cut]is(ts(a,a),zeta),satz161(zeta)):cut
-thsqrt1:=oneax(cut,[a:cut]is(ts(a,a),zeta),satz161(zeta)):is(ts(sqrt(zeta),sqrt(zeta)),zeta)
-[ksi:cut][i:is(ts(ksi,ksi),zeta)]
-thsqrt2:=t20".5161"(zeta,ksi,sqrt,i,thsqrt1):is(ksi,sqrt)
-@[ksi:cut][eta:cut][i:is(ksi,eta)]
-issqrt:=isf(cut,cut,[t:cut]sqrt(t),ksi,eta,i):is(sqrt(ksi),sqrt(eta))
-@[ksi:cut][nx:natrp(ksi)][eta:cut][ny:natrp(eta)]
-+iiia
-x:=ntofrp(ksi,nx):nat
-y:=ntofrp(eta,ny):nat
-t1:=isrpnt1(ksi,nx):is(ksi,rpofnt(x))
-t2:=isrpnt1(eta,ny):is(eta,rpofnt(y))
-t3:=ispl12(ksi,rpofnt(x),eta,rpofnt(y),t1,t2):is(pl(ksi,eta),pl(rpofnt(x),rpofnt(y)))
-x0:=rtofn(x):rat
-y0:=rtofn(y):rat
-t4:=natrti(x):natrt(x0)
-t5:=natrti(y):natrt(y0)
-t6:=symis(cut,rpofrt(pl"rt"(x0,y0)),pl(rpofnt(x),rpofnt(y)),satz155a(x0,y0)):is(pl(rpofnt(x),rpofnt(y)),rpofrt(pl"rt"(x0,y0)))
-t7:=satz112d(x0,t4,y0,t5):natrt(pl"rt"(x0,y0))
-xpy:=nofrt(pl"rt"(x0,y0),t7):nat
-t8:=isrtn1(pl"rt"(x0,y0),t7):is"rt"(pl"rt"(x0,y0),rtofn(xpy))
-t9:=isrterp(pl"rt"(x0,y0),rtofn(xpy),t8):is(rpofrt(pl"rt"(x0,y0)),rpofnt(xpy))
-t10:=tr3is(cut,pl(ksi,eta),pl(rpofnt(x),rpofnt(y)),rpofrt(pl"rt"(x0,y0)),rpofnt(xpy),t3,t6,t9):is(pl(ksi,eta),rpofnt(xpy))
--iiia
-natpl:=somei(nat,[t:nat]is(pl(ksi,eta),rpofnt(t)),xpy".iiia",t10".iiia"):natrp(pl(ksi,eta))
-+*iiia
-ny@t11:=ists12(ksi,rpofnt(x),eta,rpofnt(y),t1,t2):is(ts(ksi,eta),ts(rpofnt(x),rpofnt(y)))
-t12:=symis(cut,rpofrt(ts"rt"(x0,y0)),ts(rpofnt(x),rpofnt(y)),satz155c(x0,y0)):is(ts(rpofnt(x),rpofnt(y)),rpofrt(ts"rt"(x0,y0)))
-t13:=satz112f(x0,t4,y0,t5):natrt(ts"rt"(x0,y0))
-xty:=nofrt(ts"rt"(x0,y0),t13):nat
-t14:=isrtn1(ts"rt"(x0,y0),t13):is"rt"(ts"rt"(x0,y0),rtofn(xty))
-t15:=isrterp(ts"rt"(x0,y0),rtofn(xty),t14):is(rpofrt(ts"rt"(x0,y0)),rpofnt(xty))
-t16:=tr3is(cut,ts(ksi,eta),ts(rpofnt(x),rpofnt(y)),rpofrt(ts"rt"(x0,y0)),rpofnt(xty),t11,t12,t15):is(ts(ksi,eta),rpofnt(xty))
--iiia
-ny@natts:=somei(nat,[t:nat]is(ts(ksi,eta),rpofnt(t)),xty".iiia",t16".iiia"):natrp(ts(ksi,eta))
-[m:more(ksi,eta)]
-+*iiia
-m@t17:=ismore12(ksi,rpofnt(x),eta,rpofnt(y),t1,t2,m):more(rpofnt(x),rpofnt(y))
-t18:=satz154d(x0,y0,t17):more"rt"(x0,y0)
-t20:=ismn12(ksi,rpofnt(x),eta,rpofnt(y),m,satz154a(x0,y0,t18),t1,t2):is(mn(ksi,eta,m),mn(rpofnt(x),rpofnt(y),satz154a(x0,y0,t18)))
-t21:=symis(cut,rpofrt(mn"rt"(x0,y0,t18)),mn(rpofnt(x),rpofnt(y),satz154a(x0,y0,t18)),satz155b(x0,y0,t18)):is(mn(rpofnt(x),rpofnt(y),satz154a(x0,y0,t18)),rpofrt(mn"rt"(x0,y0,t18)))
-t22:=satz112g(x0,t4,y0,t5,t18):natrt(mn"rt"(x0,y0,t18))
-xmy:=nofrt(mn"rt"(x0,y0,t18),t22):nat
-t23:=isrtn1(mn"rt"(x0,y0,t18),t22):is"rt"(mn"rt"(x0,y0,t18),rtofn(xmy))
-t24:=isrterp(mn"rt"(x0,y0,t18),rtofn(xmy),t23):is(rpofrt(mn"rt"(x0,y0,t18)),rpofnt(xmy))
-t25:=tr3is(cut,mn(ksi,eta,m),mn(rpofnt(x),rpofnt(y),satz154a(x0,y0,t18)),rpofrt(mn"rt"(x0,y0,t18)),rpofnt(xmy),t20,t21,t24):is(mn(ksi,eta,m),rpofnt(xmy))
--iiia
-m@natmn:=somei(nat,[t:nat]is(mn(ksi,eta,m),rpofnt(t)),xmy".iiia",t25".iiia"):natrp(mn(ksi,eta,m))
-@[p:cut][q:cut][r:cut]
-3pl13:=tr3is(cut,pl(p,pl(q,r)),pl(pl(q,r),p),pl(pl(r,q),p),pl(r,pl(q,p)),compl(p,pl(q,r)),ispl1(pl(q,r),pl(r,q),p,compl(q,r)),asspl1(r,q,p)):is(pl(p,pl(q,r)),pl(r,pl(q,p)))
-[s:cut]
-4pl24:=tr3is(cut,pl(pl(p,q),pl(r,s)),pl(p,pl(q,pl(r,s))),pl(p,pl(s,pl(r,q))),pl(pl(p,s),pl(r,q)),asspl1(p,q,pl(r,s)),ispl2(pl(q,pl(r,s)),pl(s,pl(r,q)),p,3pl13(q,r,s)),asspl2(p,s,pl(r,q))):is(pl(pl(p,q),pl(r,s)),pl(pl(p,s),pl(r,q)))
-r@3pl12:=tr3is(cut,pl(p,pl(q,r)),pl(pl(p,q),r),pl(pl(q,p),r),pl(q,pl(p,r)),asspl2(p,q,r),ispl1(pl(p,q),pl(q,p),r,compl(p,q)),asspl1(q,p,r)):is(pl(p,pl(q,r)),pl(q,pl(p,r)))
-s@4pl23:=tr3is(cut,pl(pl(p,q),pl(r,s)),pl(p,pl(q,pl(r,s))),pl(p,pl(r,pl(q,s))),pl(pl(p,r),pl(q,s)),asspl1(p,q,pl(r,s)),ispl2(pl(q,pl(r,s)),pl(r,pl(q,s)),p,3pl12(q,r,s)),asspl2(p,r,pl(q,s))):is(pl(pl(p,q),pl(r,s)),pl(pl(p,r),pl(q,s)))
-r@3pl23:=tr3is(cut,pl(pl(p,q),r),pl(p,pl(q,r)),pl(p,pl(r,q)),pl(pl(p,r),q),asspl1(p,q,r),ispl2(pl(q,r),pl(r,q),p,compl(q,r)),asspl2(p,r,q)):is(pl(pl(p,q),r),pl(pl(p,r),q))
-p@a2isapa:=tris(cut,ts(p,pl(1rp,1rp)),pl(ts(p,1rp),ts(p,1rp)),pl(p,p),disttp2(p,1rp,1rp),ispl12(ts(p,1rp),p,ts(p,1rp),p,satz151(p),satz151(p))):is(ts(p,pl(1rp,1rp)),pl(p,p))
-@dif:=pair1type(cut):'type'
-[a1:cut][a2:cut]
-df:=pair1(cut,a1,a2):dif
-@[a:dif]
-stm:=first1(cut,a):cut
-std:=second1(cut,a):cut
-a2@stmis:=first1is1(cut,a1,a2):is(stm(df(a1,a2)),a1)
-isstm:=first1is2(cut,a1,a2):is(a1,stm(df(a1,a2)))
-stdis:=second1is1(cut,a1,a2):is(std(df(a1,a2)),a2)
-isstd:=second1is2(cut,a1,a2):is(a2,std(df(a1,a2)))
-a@1a:=stm(a):cut
-2a:=std(a):cut
-dfis:=pair1is1(cut,a):is"e"(dif,df(1a,2a),a)
-isdf:=pair1is2(cut,a):is"e"(dif,a,df(1a,2a))
-a2@[b1:cut][b2:cut]
-12issmsd:=ispl12(a1,stm(df(a1,a2)),b2,std(df(b1,b2)),isstm(a1,a2),isstd(b1,b2)):is(pl(a1,b2),pl(stm(df(a1,a2)),std(df(b1,b2))))
-smsdis12:=symis(cut,pl(a1,b2),pl(stm(df(a1,a2)),std(df(b1,b2))),12issmsd):is(pl(stm(df(a1,a2)),std(df(b1,b2))),pl(a1,b2))
-a@[r1:cut][r2:cut]
-1sdissmsd:=ispl1(r1,stm(df(r1,r2)),2a,isstm(r1,r2)):is(pl(r1,2a),pl(stm(df(r1,r2)),2a))
-smsdis1sd:=symis(cut,pl(r1,2a),pl(stm(df(r1,r2)),2a),1sdissmsd):is(pl(stm(df(r1,r2)),2a),pl(r1,2a))
-sm2issmsd:=ispl2(r2,std(df(r1,r2)),1a,isstd(r1,r2)):is(pl(1a,r2),pl(1a,std(df(r1,r2))))
-smsdissm2:=symis(cut,pl(1a,r2),pl(1a,std(df(r1,r2))),sm2issmsd):is(pl(1a,std(df(r1,r2))),pl(1a,r2))
-a2@[r:cut][i:is(a1,r)]
-issm:=isf(cut,dif,[t:cut]df(t,a2),a1,r,i):is"e"(dif,df(a1,a2),df(r,a2))
-r@[i:is(a2,r)]
-issd:=isf(cut,dif,[t:cut]df(a1,t),a2,r,i):is"e"(dif,df(a1,a2),df(a1,r))
-b2@[i:is(a1,b1)][j:is(a2,b2)]
-issmsd:=tris(dif,df(a1,a2),df(b1,a2),df(b1,b2),issm(a1,a2,b1,i),issd(b1,a2,b2,j)):is"e"(dif,df(a1,a2),df(b1,b2))
-a@[b:dif]
-1b:=stm(b):cut
-2b:=std(b):cut
-eq:=is(pl(1a,2b),pl(1b,2a)):'prop'
-b2@[i:is(pl(a1,b2),pl(b1,a2))]
-eqi12:=tr3is(cut,pl(stm(df(a1,a2)),std(df(b1,b2))),pl(a1,b2),pl(b1,a2),pl(stm(df(b1,b2)),std(df(a1,a2))),smsdis12(a1,a2,b1,b2),i,12issmsd(b1,b2,a1,a2)):eq(df(a1,a2),df(b1,b2))
-r2@[i:is(pl(1a,r2),pl(r1,2a))]
-eqi1:=isp(dif,[x:dif]eq(x,df(r1,r2)),df(1a,2a),a,eqi12(1a,2a,r1,r2,i),dfis):eq(a,df(r1,r2))
-r2@[i:is(pl(r1,2a),pl(1a,r2))]
-eqi2:=isp(dif,[x:dif]eq(df(r1,r2),x),df(1a,2a),a,eqi12(r1,r2,1a,2a,i),dfis):eq(df(r1,r2),a)
-b2@[e:eq(df(a1,a2),df(b1,b2))]
-eqe12:=tr3is(cut,pl(a1,b2),pl(stm(df(a1,a2)),std(df(b1,b2))),pl(stm(df(b1,b2)),std(df(a1,a2))),pl(b1,a2),12issmsd(a1,a2,b1,b2),e,smsdis12(b1,b2,a1,a2)):is(pl(a1,b2),pl(b1,a2))
-a@satzd163:=refis(cut,pl(1a,2a)):eq(a,a)
-refeq:=satzd163:eq(a,a)
-b@[i:is"e"(dif,a,b)]
-refeq1:=isp(dif,[x:dif]eq(a,x),a,b,refeq,i):eq(a,b)
-refeq2:=isp(dif,[x:dif]eq(x,a),a,b,refeq,i):eq(b,a)
-b2@[i:is(a1,b1)][j:is(a2,b2)]
-eqsmsd:=refeq1(df(a1,a2),df(b1,b2),issmsd(i,j)):eq(df(a1,a2),df(b1,b2))
-r@[i:is(a1,r)]
-eqsm:=refeq1(df(a1,a2),df(r,a2),issm(i)):eq(df(a1,a2),df(r,a2))
-r@[i:is(a2,r)]
-eqsd:=refeq1(df(a1,a2),df(a1,r),issd(i)):eq(df(a1,a2),df(a1,r))
-b@[e:eq(a,b)]
-satzd164:=symis(cut,pl(1a,2b),pl(1b,2a),e):eq(b,a)
-symeq:=satzd164:eq(b,a)
-b@[c:dif]
-1c:=stm(c):cut
-2c:=std(c):cut
-[e:eq(a,b)][f:eq(b,c)]
-+1d165
-t1:=ispl12(pl(1a,2b),pl(1b,2a),pl(1b,2c),pl(1c,2b),e,f):is(pl(pl(1a,2b),pl(1b,2c)),pl(pl(1b,2a),pl(1c,2b)))
-t2:=tr4is(cut,pl(pl(1a,2c),pl(1b,2b)),pl(pl(1a,2b),pl(1b,2c)),pl(pl(1b,2a),pl(1c,2b)),pl(pl(1c,2b),pl(1b,2a)),pl(pl(1c,2a),pl(1b,2b)),4pl24(1a,2c,1b,2b),t1,compl(pl(1b,2a),pl(1c,2b)),4pl24(1c,2b,1b,2a)):is(pl(pl(1a,2c),pl(1b,2b)),pl(pl(1c,2a),pl(1b,2b)))
--1d165
-satzd165:=satz136b(pl(1a,2c),pl(1c,2a),pl(1b,2b),t2".1d165"):eq(a,c)
-treq:=satzd165:eq(a,c)
-c@[e:eq(c,a)][f:eq(c,b)]
-treq1:=treq(a,c,b,symeq(c,a,e),f):eq(a,b)
-c@[e:eq(a,c)][f:eq(b,c)]
-treq2:=treq(a,c,b,e,symeq(b,c,f)):eq(a,b)
-c@[d:dif][e1:eq(a,b)][e2:eq(b,c)][e3:eq(c,d)]
-tr3eq:=treq(a,b,d,e1,treq(b,c,d,e2,e3)):eq(a,d)
-d@[e:dif][e1:eq(a,b)][e2:eq(b,c)][e3:eq(c,d)][e4:eq(d,e)]
-tr4eq:=tr3eq(a,b,c,e,e1,e2,treq(c,d,e,e3,e4)):eq(a,e)
-a@posd:=more(1a,2a):'prop'
-zero:=is(1a,2a):'prop'
-negd:=less(1a,2a):'prop'
-a2@[m:more(a1,a2)]
-posdi:=ismore12(a1,stm(df(a1,a2)),a2,std(df(a1,a2)),isstm(a1,a2),isstd(a1,a2),m):posd(df(a1,a2))
-a2@[i:is(a1,a2)]
-zeroi:=tr3is(cut,stm(df(a1,a2)),a1,a2,std(df(a1,a2)),stmis(a1,a2),i,isstd(a1,a2)):zero(df(a1,a2))
-a2@[l:less(a1,a2)]
-negdi:=isless12(a1,stm(df(a1,a2)),a2,std(df(a1,a2)),isstm(a1,a2),isstd(a1,a2),l):negd(df(a1,a2))
-a@axrde:=satz123b(1a,2a):ec3(zero(a),posd(a),negd(a))
-axrdo:=satz123a(1a,2a):or3(zero(a),posd(a),negd(a))
-axrd:=orec3i(zero(a),posd(a),negd(a),axrdo,axrde):orec3(zero(a),posd(a),negd(a))
-[p:'prop'][p1:[t:posd(a)]p][p2:[t:zero(a)]p][p3:[t:negd(a)]p]
-rappd:=or3app(zero(a),posd(a),negd(a),p,axrdo,p2,p1,p3):p
-a@[p:posd(a)]
-pnot0d:=ec3e21(zero(a),posd(a),negd(a),axrde,p):not(zero(a))
-pnotnd:=ec3e23(zero(a),posd(a),negd(a),axrde,p):not(negd(a))
-a@[z:zero(a)]
-0notpd:=ec3e12(zero(a),posd(a),negd(a),axrde,z):not(posd(a))
-0notnd:=ec3e13(zero(a),posd(a),negd(a),axrde,z):not(negd(a))
-a@[n:negd(a)]
-nnotpd:=ec3e32(zero(a),posd(a),negd(a),axrde,n):not(posd(a))
-nnot0d:=ec3e31(zero(a),posd(a),negd(a),axrde,n):not(zero(a))
-b@[e:eq(a,b)][p:posd(a)]
-+iv1d
-t1:=ismore12(pl(1a,2b),pl(1b,2a),pl(2a,2b),pl(2b,2a),e,compl(2a,2b),satz135a(1a,2a,2b,p)):more(pl(1b,2a),pl(2b,2a))
--iv1d
-eqposd:=satz136a(1b,2b,2a,t1".iv1d"):posd(b)
-e@[z:zero(a)]
-+*iv1d
-z@t2:=tr3is(cut,pl(1b,2a),pl(1a,2b),pl(2a,2b),pl(2b,2a),symeq(a,b,e),ispl1(1a,2a,2b,z),compl(2a,2b)):is(pl(1b,2a),pl(2b,2a))
--iv1d
-z@eqzero:=satz136b(1b,2b,2a,t2".iv1d"):zero(b)
-e@[n:negd(a)]
-+*iv1d
-n@t3:=isless12(pl(1a,2b),pl(1b,2a),pl(2a,2b),pl(2b,2a),e,compl(2a,2b),satz135c(1a,2a,2b,n)):less(pl(1b,2a),pl(2b,2a))
--iv1d
-n@eqnegd:=satz136c(1b,2b,2a,t3".iv1d"):negd(b)
-b@[z:zero(a)][y:zero(b)]
-zeroeq:=tris(cut,pl(1a,2b),pl(2a,1b),pl(1b,2a),ispl12(1a,2a,2b,1b,z,symis(cut,1b,2b,y)),compl(2a,1b)):eq(a,b)
-@[r:cut]
-pdofrp:=df(pl(r,1rp),1rp):dif
-ndofrp:=df(1rp,pl(r,1rp)):dif
-[s:cut][i:is(r,s)]
-isrpepd:=refeq1(pdofrp(r),pdofrp(s),isf(cut,dif,[x:cut]pdofrp(x),r,s,i)):eq(pdofrp(r),pdofrp(s))
-isrpend:=refeq1(ndofrp(r),ndofrp(s),isf(cut,dif,[x:cut]ndofrp(x),r,s,i)):eq(ndofrp(r),ndofrp(s))
-s@[e:eq(pdofrp(r),pdofrp(s))]
-+*iv1d
-e@t4:=satz136b(pl(r,1rp),pl(s,1rp),1rp,eqe12(pl(r,1rp),1rp,pl(s,1rp),1rp,e)):is(pl(r,1rp),pl(s,1rp))
--iv1d
-e@isrpipd:=satz136b(r,s,1rp,t4".iv1d"):is(r,s)
-s@[e:eq(ndofrp(r),ndofrp(s))]
-+*iv1d
-e@t5:=satz136e(pl(s,1rp),pl(r,1rp),1rp,eqe12(1rp,pl(r,1rp),1rp,pl(s,1rp),e)):is(pl(s,1rp),pl(r,1rp))
--iv1d
-e@isrpind:=symis(cut,s,r,satz136b(s,r,1rp,t5".iv1d")):is(r,s)
-r@posdirp:=posdi(pl(r,1rp),1rp,ismore1(pl(1rp,r),pl(r,1rp),1rp,compl(1rp,r),satz133(1rp,r))):posd(pdofrp(r))
-negdirp:=negdi(1rp,pl(r,1rp),isless2(pl(1rp,r),pl(r,1rp),1rp,compl(1rp,r),satz133a(1rp,r))):negd(ndofrp(r))
-a@[p:posd(a)]
-rpofpd:=mn(1a,2a,p):cut
-+*iv1d
-p@t6:=tr4is(cut,pl(1a,1rp),pl(pl(rpofpd,2a),1rp),pl(rpofpd,pl(2a,1rp)),pl(rpofpd,pl(1rp,2a)),pl(pl(rpofpd,1rp),2a),ispl1(1a,pl(rpofpd,2a),1rp,satz140f(1a,2a,p)),asspl1(rpofpd,2a,1rp),ispl2(pl(2a,1rp),pl(1rp,2a),rpofpd,compl(2a,1rp)),asspl2(rpofpd,1rp,2a)):is(pl(1a,1rp),pl(pl(rpofpd,1rp),2a))
--iv1d
-p@eqpdrp1:=eqi1(a,pl(rpofpd,1rp),1rp,t6".iv1d"):eq(a,pdofrp(rpofpd(a,p)))
-eqpdrp2:=symeq(a,pdofrp(rpofpd(a,p)),eqpdrp1):eq(pdofrp(rpofpd(a,p)),a)
-a@[n:negd(a)]
-rpofnd:=mn(2a,1a,satz122(1a,2a,n)):cut
-+*iv1d
-n@t7:=tr3is(cut,pl(1a,pl(rpofnd,1rp)),pl(pl(1a,rpofnd),1rp),pl(2a,1rp),pl(1rp,2a),asspl2(1a,rpofnd,1rp),ispl1(pl(1a,rpofnd),2a,1rp,satz140c(2a,1a,satz122(1a,2a,n))),compl(2a,1rp)):is(pl(1a,pl(rpofnd,1rp)),pl(1rp,2a))
--iv1d
-n@eqndrp1:=eqi1(a,1rp,pl(rpofnd,1rp),t7".iv1d"):eq(a,ndofrp(rpofnd(a,n)))
-eqndrp2:=symeq(a,ndofrp(rpofnd(a,n)),eqndrp1):eq(ndofrp(rpofnd(a,n)),a)
-@[h:dif][p:posd(h)][k:dif][q:posd(k)][e:eq(h,k)]
-+*iv1d
-e@t8:=tr3eq(pdofrp(rpofpd(h,p)),h,k,pdofrp(rpofpd(k,q)),eqpdrp2(h,p),e,eqpdrp1(k,q)):eq(pdofrp(rpofpd(h,p)),pdofrp(rpofpd(k,q)))
--iv1d
-e@eqpderp:=isrpipd(rpofpd(h,p),rpofpd(k,q),t8".iv1d"):is(rpofpd(h,p),rpofpd(k,q))
-q@[i:is(rpofpd(h,p),rpofpd(k,q))]
-+*iv1d
-i@t9:=isrpepd(rpofpd(h,p),rpofpd(k,q),i):eq(pdofrp(rpofpd(h,p)),pdofrp(rpofpd(k,q)))
--iv1d
-i@eqpdirp:=tr3eq(h,pdofrp(rpofpd(h,p)),pdofrp(rpofpd(k,q)),k,eqpdrp1(h,p),t9".iv1d",eqpdrp2(k,q)):eq(h,k)
-h@[n:negd(h)][k:dif][o:negd(k)][e:eq(h,k)]
-+*iv1d
-e@t10:=tr3eq(ndofrp(rpofnd(h,n)),h,k,ndofrp(rpofnd(k,o)),eqndrp2(h,n),e,eqndrp1(k,o)):eq(ndofrp(rpofnd(h,n)),ndofrp(rpofnd(k,o)))
--iv1d
-e@eqnderp:=isrpind(rpofnd(h,n),rpofnd(k,o),t10".iv1d"):is(rpofnd(h,n),rpofnd(k,o))
-o@[i:is(rpofnd(h,n),rpofnd(k,o))]
-+*iv1d
-i@t11:=isrpend(rpofnd(h,n),rpofnd(k,o),i):eq(ndofrp(rpofnd(h,n)),ndofrp(rpofnd(k,o)))
--iv1d
-i@eqndirp:=tr3eq(h,ndofrp(rpofnd(h,n)),ndofrp(rpofnd(k,o)),k,eqndrp1(h,n),t11".iv1d",eqndrp2(k,o)):eq(h,k)
-@[r:cut]
-+*iv1d
-r@t12:=eqpdrp1(pdofrp(r),posdirp(r)):eq(pdofrp(r),pdofrp(rpofpd(pdofrp(r),posdirp(r))))
--iv1d
-r@isrppd1:=isrpipd(r,rpofpd(pdofrp(r),posdirp(r)),t12".iv1d"):is(r,rpofpd(pdofrp(r),posdirp(r)))
-isrppd2:=symis(cut,r,rpofpd(pdofrp(r),posdirp(r)),isrppd1):is(rpofpd(pdofrp(r),posdirp(r)),r)
-+*iv1d
-r@t13:=eqndrp1(ndofrp(r),negdirp(r)):eq(ndofrp(r),ndofrp(rpofnd(ndofrp(r),negdirp(r))))
--iv1d
-r@isrpnd1:=isrpind(r,rpofnd(ndofrp(r),negdirp(r)),t13".iv1d"):is(r,rpofnd(ndofrp(r),negdirp(r)))
-isrpnd2:=symis(cut,r,rpofnd(ndofrp(r),negdirp(r)),isrpnd1):is(rpofnd(ndofrp(r),negdirp(r)),r)
-a2@[r:cut]
-lemmad1:=eqi12(a1,a2,pl(a1,r),pl(a2,r),tris(cut,pl(a1,pl(a2,r)),pl(a1,pl(r,a2)),pl(pl(a1,r),a2),ispl2(pl(a2,r),pl(r,a2),a1,compl(a2,r)),asspl2(a1,r,a2))):eq(df(a1,a2),df(pl(a1,r),pl(a2,r)))
-lemmad2:=symeq(df(a1,a2),df(pl(a1,r),pl(a2,r)),lemmad1):eq(df(pl(a1,r),pl(a2,r)),df(a1,a2))
-a@[r:cut]
-lemmad3:=treq(a,df(1a,2a),df(pl(1a,r),pl(2a,r)),refeq1(a,df(1a,2a),isdf),lemmad1(1a,2a,r)):eq(a,df(pl(1a,r),pl(2a,r)))
-lemmad4:=symeq(a,df(pl(1a,r),pl(2a,r)),lemmad3):eq(df(pl(1a,r),pl(2a,r)),a)
-a@absd:=ite(negd(a),dif,df(2a,1a),a):dif
-[n:negd(a)]
-absnd:=refeq1(absd(a),df(2a,1a),itet(negd(a),dif,df(2a,1a),a,n)):eq(absd(a),df(2a,1a))
-a@[n:not(negd(a))]
-absnnd:=refeq1(absd(a),a,itef(negd(a),dif,df(2a,1a),a,n)):eq(absd(a),a)
-a2@[l:less(a1,a2)]
-absdeql:=treq(absd(df(a1,a2)),df(std(df(a1,a2)),stm(df(a1,a2))),df(a2,a1),absnd(df(a1,a2),negdi(a1,a2,l)),eqsmsd(std(df(a1,a2)),stm(df(a1,a2)),a2,a1,stdis(a1,a2),stmis(a1,a2))):eq(absd(df(a1,a2)),df(a2,a1))
-a2@[m:moreis(a1,a2)]
-absdeqm:=absnnd(df(a1,a2),th3"l.imp"(negd(df(a1,a2)),less(a1,a2),satz123c(a1,a2,m),[t:negd(df(a1,a2))]isless12(stm(df(a1,a2)),a1,std(df(a1,a2)),a2,stmis(a1,a2),stdis(a1,a2),t))):eq(absd(df(a1,a2)),df(a1,a2))
-b@[e:eq(a,b)]
-+iv2d
-[n:negd(a)]
-t1:=tr3is(cut,pl(2a,1b),pl(1b,2a),pl(1a,2b),pl(2b,1a),compl(2a,1b),symeq(a,b,e),compl(1a,2b)):is(pl(2a,1b),pl(2b,1a))
-t2:=tr3eq(absd(a),df(2a,1a),df(2b,1b),absd(b),absnd(a,n),eqi12(2a,1a,2b,1b,t1),symeq(absd(b),df(2b,1b),absnd(b,eqnegd(a,b,e,n)))):eq(absd(a),absd(b))
-e@[n:not(negd(a))]
-t3:=tr3eq(absd(a),a,b,absd(b),absnnd(a,n),e,symeq(absd(b),b,absnnd(b,th3"l.imp"(negd(b),negd(a),n,[t:negd(b)]eqnegd(b,a,symeq(a,b,e),t))))):eq(absd(a),absd(b))
--iv2d
-eqabsd:=th1"l.imp"(negd(a),eq(absd(a),absd(b)),[t:negd(a)]t2".iv2d"(t),[t:not(negd(a))]t3".iv2d"(t)):eq(absd(a),absd(b))
-a@[p:posd(a)]
-satzd166a:=eqposd(a,absd(a),symeq(absd(a),a,absnnd(a,pnotnd(a,p))),p):posd(absd(a))
-a@[n:negd(a)]
-+2d166
-t1:=posdi(2a,1a,satz122(1a,2a,n)):posd(df(2a,1a))
--2d166
-satzd166b:=eqposd(df(2a,1a),absd(a),symeq(absd(a),df(2a,1a),absnd(a,n)),t1".2d166"):posd(absd(a))
-b@[p:posd(a)][q:posd(b)][e:eq(absd(a),absd(b))]
-satzd166c:=tr3eq(a,absd(a),absd(b),b,symeq(absd(a),a,absnnd(a,pnotnd(a,p))),e,absnnd(b,pnotnd(b,q))):eq(a,b)
-b@[n:negd(a)][o:negd(b)][e:eq(absd(a),absd(b))]
-+*2d166
-e@t2:=tr3eq(df(2a,1a),absd(a),absd(b),df(2b,1b),symeq(absd(a),df(2a,1a),absnd(a,n)),e,absnd(b,o)):eq(df(2a,1a),df(2b,1b))
--2d166
-e@satzd166d:=tr3is(cut,pl(1a,2b),pl(2b,1a),pl(2a,1b),pl(1b,2a),compl(1a,2b),symis(cut,pl(2a,1b),pl(2b,1a),eqe12(2a,1a,2b,1b,t2".2d166")),compl(2a,1b)):eq(a,b)
-a@[n:not(zero(a))]
-satzd166e:=rappd(a,posd(absd(a)),[t:posd(a)]satzd166a(a,t),th2"l.imp"(zero(a),posd(absd(a)),n),[t:negd(a)]satzd166b(a,t)):posd(absd(a))
-a@[z:zero(a)]
-satzd166f:=eqzero(a,absd(a),symeq(absd(a),a,absnnd(a,0notnd(a,z))),z):zero(absd(a))
-b@mored:=more(pl(1a,2b),pl(1b,2a)):'prop'
-b2@[m:more(pl(a1,b2),pl(b1,a2))]
-moredi12:=ismore12(pl(a1,b2),pl(stm(df(a1,a2)),std(df(b1,b2))),pl(b1,a2),pl(stm(df(b1,b2)),std(df(a1,a2))),12issmsd(a1,a2,b1,b2),12issmsd(b1,b2,a1,a2),m):mored(df(a1,a2),df(b1,b2))
-r2@[m:more(pl(1a,r2),pl(r1,2a))]
-moredi1:=ismore12(pl(1a,r2),pl(1a,std(df(r1,r2))),pl(r1,2a),pl(stm(df(r1,r2)),2a),sm2issmsd(a,r1,r2),1sdissmsd(a,r1,r2),m):mored(a,df(r1,r2))
-r2@[m:more(pl(r1,2a),pl(1a,r2))]
-moredi2:=ismore12(pl(r1,2a),pl(stm(df(r1,r2)),2a),pl(1a,r2),pl(1a,std(df(r1,r2))),1sdissmsd(a,r1,r2),sm2issmsd(a,r1,r2),m):mored(df(r1,r2),a)
-b2@[m:mored(df(a1,a2),df(b1,b2))]
-morede12:=ismore12(pl(stm(df(a1,a2)),std(df(b1,b2))),pl(a1,b2),pl(stm(df(b1,b2)),std(df(a1,a2))),pl(b1,a2),smsdis12(a1,a2,b1,b2),smsdis12(b1,b2,a1,a2),m):more(pl(a1,b2),pl(b1,a2))
-b@lessd:=less(pl(1a,2b),pl(1b,2a)):'prop'
-[m:mored(a,b)]
-lemmad5:=satz121(pl(1a,2b),pl(1b,2a),m):lessd(b,a)
-b@[l:lessd(a,b)]
-lemmad6:=satz122(pl(1a,2b),pl(1b,2a),l):mored(b,a)
-b2@[l:less(pl(a1,b2),pl(b1,a2))]
-lessdi12:=lemmad5(df(b1,b2),df(a1,a2),moredi12(b1,b2,a1,a2,satz122(pl(a1,b2),pl(b1,a2),l))):lessd(df(a1,a2),df(b1,b2))
-r2@[l:less(pl(1a,r2),pl(r1,2a))]
-lessdi1:=lemmad5(df(r1,r2),a,moredi2(a,r1,r2,satz122(pl(1a,r2),pl(r1,2a),l))):lessd(a,df(r1,r2))
-r2@[l:less(pl(r1,2a),pl(1a,r2))]
-lessdi2:=lemmad5(a,df(r1,r2),moredi1(a,r1,r2,satz122(pl(r1,2a),pl(1a,r2),l))):lessd(df(r1,r2),a)
-b2@[l:lessd(df(a1,a2),df(b1,b2))]
-lessde12:=satz121(pl(b1,a2),pl(a1,b2),morede12(b1,b2,a1,a2,lemmad6(df(a1,a2),df(b1,b2),l))):less(pl(a1,b2),pl(b1,a2))
-b@satzd167:=satz123(pl(1a,2b),pl(1b,2a)):orec3(eq(a,b),mored(a,b),lessd(a,b))
-satzd167a:=satz123a(pl(1a,2b),pl(1b,2a)):or3(eq(a,b),mored(a,b),lessd(a,b))
-satzd167b:=satz123b(pl(1a,2b),pl(1b,2a)):ec3(eq(a,b),mored(a,b),lessd(a,b))
-d@1d:=stm(d):cut
-2d:=std(d):cut
-[e:eq(a,b)][f:eq(c,d)][m:mored(a,c)]
-+*iv2d
-m@t4:=tr4is(cut,pl(pl(1b,2d),pl(1c,2a)),pl(pl(1b,2a),pl(1c,2d)),pl(pl(1a,2b),pl(1d,2c)),pl(pl(1a,2c),pl(1d,2b)),pl(pl(1d,2b),pl(1a,2c)),4pl24(1b,2d,1c,2a),ispl12(pl(1b,2a),pl(1a,2b),pl(1c,2d),pl(1d,2c),symeq(a,b,e),f),4pl24(1a,2b,1d,2c),compl(pl(1a,2c),pl(1d,2b))):is(pl(pl(1b,2d),pl(1c,2a)),pl(pl(1d,2b),pl(1a,2c)))
-t5:=ismore2(pl(pl(1b,2d),pl(1c,2a)),pl(pl(1d,2b),pl(1a,2c)),pl(pl(1b,2d),pl(1a,2c)),t4,satz135d(pl(1a,2c),pl(1c,2a),pl(1b,2d),m)):more(pl(pl(1b,2d),pl(1a,2c)),pl(pl(1d,2b),pl(1a,2c)))
--iv2d
-m@eqmored12:=satz136a(pl(1b,2d),pl(1d,2b),pl(1a,2c),t5".iv2d"):mored(b,d)
-f@[l:lessd(a,c)]
-eqlessd12:=lemmad5(d,b,eqmored12(c,d,a,b,f,e,lemmad6(a,c,l))):lessd(b,d)
-c@[e:eq(a,b)][m:mored(a,c)]
-eqmored1:=eqmored12(a,b,c,c,e,refeq(c),m):mored(b,c)
-e@[m:mored(c,a)]
-eqmored2:=eqmored12(c,c,a,b,refeq(c),e,m):mored(c,b)
-e@[l:lessd(a,c)]
-eqlessd1:=eqlessd12(a,b,c,c,e,refeq(c),l):lessd(b,c)
-e@[l:lessd(c,a)]
-eqlessd2:=eqlessd12(c,c,a,b,refeq(c),e,l):lessd(c,b)
-b@moreq:=or(mored(a,b),eq(a,b)):'prop'
-lesseq:=or(lessd(a,b),eq(a,b)):'prop'
-[m:moreq(a,b)]
-satzd168a:=th9"l.or"(mored(a,b),eq(a,b),lessd(b,a),eq(b,a),m,[t:mored(a,b)]lemmad5(a,b,t),[t:eq(a,b)]symeq(a,b,t)):lesseq(b,a)
-b@[l:lesseq(a,b)]
-satzd168b:=th9"l.or"(lessd(a,b),eq(a,b),mored(b,a),eq(b,a),l,[t:lessd(a,b)]lemmad6(a,b,t),[t:eq(a,b)]symeq(a,b,t)):moreq(b,a)
-c@[e:eq(a,b)][m:moreq(a,c)]
-eqmoreq1:=th9"l.or"(mored(a,c),eq(a,c),mored(b,c),eq(b,c),m,[t:mored(a,c)]eqmored1(a,b,c,e,t),[t:eq(a,c)]treq1(b,c,a,e,t)):moreq(b,c)
-e@[m:moreq(c,a)]
-eqmoreq2:=th9"l.or"(mored(c,a),eq(c,a),mored(c,b),eq(c,b),m,[t:mored(c,a)]eqmored2(a,b,c,e,t),[t:eq(c,a)]treq(c,a,b,t,e)):moreq(c,b)
-e@[l:lesseq(a,c)]
-eqlesseq1:=satzd168a(c,b,eqmoreq2(a,b,c,e,satzd168b(a,c,l))):lesseq(b,c)
-e@[l:lesseq(c,a)]
-eqlesseq2:=satzd168a(b,c,eqmoreq1(a,b,c,e,satzd168b(c,a,l))):lesseq(c,b)
-d@[e:eq(a,b)][f:eq(c,d)][m:moreq(a,c)]
-eqmoreq12:=eqmoreq1(a,b,d,e,eqmoreq2(c,d,a,f,m)):moreq(b,d)
-f@[l:lesseq(a,c)]
-eqlesseq12:=eqlesseq1(a,b,d,e,eqlesseq2(c,d,a,f,l)):lesseq(b,d)
-b@[m:mored(a,b)]
-moreqi1:=ori1(mored(a,b),eq(a,b),m):moreq(a,b)
-b@[l:lessd(a,b)]
-lesseqi1:=ori1(lessd(a,b),eq(a,b),l):lesseq(a,b)
-b@[e:eq(a,b)]
-moreqi2:=ori2(mored(a,b),eq(a,b),e):moreq(a,b)
-lesseqi2:=ori2(lessd(a,b),eq(a,b),e):lesseq(a,b)
-b@[m:moreq(a,b)]
-satzd167c:=th7"l.ec3"(eq(a,b),mored(a,b),lessd(a,b),satzd167b,comor(mored(a,b),eq(a,b),m)):not(lessd(a,b))
-b@[l:lesseq(a,b)]
-satzd167d:=th9"l.ec3"(eq(a,b),mored(a,b),lessd(a,b),satzd167b,l):not(mored(a,b))
-b@[n:not(mored(a,b))]
-satzd167e:=th2"l.or3"(eq(a,b),mored(a,b),lessd(a,b),satzd167a,n):lesseq(a,b)
-b@[n:not(lessd(a,b))]
-satzd167f:=comor(eq(a,b),mored(a,b),th3"l.or3"(eq(a,b),mored(a,b),lessd(a,b),satzd167a,n)):moreq(a,b)
-b@[m:mored(a,b)]
-satzd167g:=th3"l.imp"(lesseq(a,b),not(mored(a,b)),weli(mored(a,b),m),[t:lesseq(a,b)]satzd167d(t)):not(lesseq(a,b))
-b@[l:lessd(a,b)]
-satzd167h:=th3"l.imp"(moreq(a,b),not(lessd(a,b)),weli(lessd(a,b),l),[t:moreq(a,b)]satzd167c(t)):not(moreq(a,b))
-b@[n:not(moreq(a,b))]
-satzd167j:=or3e3(eq(a,b),mored(a,b),lessd(a,b),satzd167a,th5"l.or"(mored(a,b),eq(a,b),n),th4"l.or"(mored(a,b),eq(a,b),n)):lessd(a,b)
-b@[n:not(lesseq(a,b))]
-satzd167k:=or3e2(eq(a,b),mored(a,b),lessd(a,b),satzd167a,th4"l.or"(lessd(a,b),eq(a,b),n),th5"l.or"(lessd(a,b),eq(a,b),n)):mored(a,b)
-b@[z:zero(b)][p:posd(a)]
-satzd169a:=ismore12(pl(1a,1b),pl(1a,2b),pl(2a,1b),pl(1b,2a),ispl2(1b,2b,1a,z),compl(2a,1b),satz135a(1a,2a,1b,p)):mored(a,b)
-z@[m:mored(a,b)]
-satzd169b:=satz136d(1a,2a,2b,ismore12(pl(1a,2b),pl(2b,1a),pl(1b,2a),pl(2b,2a),compl(1a,2b),ispl1(1b,2b,2a,z),m)):posd(a)
-z@[n:negd(a)]
-satzd169c:=isless12(pl(1a,1b),pl(1a,2b),pl(2a,1b),pl(1b,2a),ispl2(1b,2b,1a,z),compl(2a,1b),satz135c(1a,2a,1b,n)):lessd(a,b)
-z@[l:lessd(a,b)]
-satzd169d:=satz136f(1a,2a,2b,isless12(pl(1a,2b),pl(2b,1a),pl(1b,2a),pl(2b,2a),compl(1a,2b),ispl1(1b,2b,2a,z),l)):negd(a)
-+2d170
-z@[p:posd(a)]
-t1:=moreqi1(absd(a),b,satzd169a(absd(a),b,z,satzd166a(a,p))):moreq(absd(a),b)
-z@[y:zero(a)]
-t2:=moreqi2(absd(a),b,treq(absd(a),a,b,absnnd(a,0notnd(a,y)),zeroeq(a,b,y,z))):moreq(absd(a),b)
-z@[n:negd(a)]
-t3:=moreqi1(absd(a),b,satzd169a(absd(a),b,z,satzd166b(a,n))):moreq(absd(a),b)
--2d170
-z@satzd170:=rappd(a,moreq(absd(a),b),[t:posd(a)]t1".2d170"(t),[t:zero(a)]t2".2d170"(t),[t:negd(a)]t3".2d170"(t)):moreq(absd(a),b)
-c@[l:lessd(a,b)][k:lessd(b,c)]
-+2d171
-t1:=satz137a(pl(1a,2b),pl(1b,2a),pl(1b,2c),pl(1c,2b),l,k):less(pl(pl(1a,2b),pl(1b,2c)),pl(pl(1b,2a),pl(1c,2b)))
-t2:=isless12(pl(pl(1a,2b),pl(1b,2c)),pl(pl(1a,2c),pl(1b,2b)),pl(pl(1b,2a),pl(1c,2b)),pl(pl(1c,2a),pl(1b,2b)),4pl24(1a,2b,1b,2c),tris(cut,pl(pl(1b,2a),pl(1c,2b)),pl(pl(1b,2b),pl(1c,2a)),pl(pl(1c,2a),pl(1b,2b)),4pl24(1b,2a,1c,2b),compl(pl(1b,2b),pl(1c,2a))),t1):less(pl(pl(1a,2c),pl(1b,2b)),pl(pl(1c,2a),pl(1b,2b)))
--2d171
-satzd171:=satz136c(pl(1a,2c),pl(1c,2a),pl(1b,2b),t2".2d171"):lessd(a,c)
-trlessd:=satzd171:lessd(a,c)
-c@[m:mored(a,b)][n:mored(b,c)]
-trmored:=lemmad6(c,a,trlessd(c,b,a,lemmad5(b,c,n),lemmad5(a,b,m))):mored(a,c)
-c@[l:lesseq(a,b)][k:lessd(b,c)]
-satzd172a:=orapp(lessd(a,b),eq(a,b),lessd(a,c),l,[t:lessd(a,b)]trlessd(t,k),[t:eq(a,b)]eqlessd1(b,a,c,symeq(a,b,t),k)):lessd(a,c)
-c@[l:lessd(a,b)][k:lesseq(b,c)]
-satzd172b:=orapp(lessd(b,c),eq(b,c),lessd(a,c),k,[t:lessd(b,c)]trlessd(l,t),[t:eq(b,c)]eqlessd2(b,c,a,t,l)):lessd(a,c)
-c@[m:moreq(a,b)][n:mored(b,c)]
-satzd172c:=lemmad6(c,a,satzd172b(c,b,a,lemmad5(b,c,n),satzd168a(a,b,m))):mored(a,c)
-c@[m:mored(a,b)][n:moreq(b,c)]
-satzd172d:=lemmad6(c,a,satzd172a(c,b,a,satzd168a(b,c,n),lemmad5(a,b,m))):mored(a,c)
-c@[l:lesseq(a,b)][k:lesseq(b,c)]
-+2d173
-[j:lessd(a,b)]
-t1:=lesseqi1(a,c,satzd172b(j,k)):lesseq(a,c)
-k@[e:eq(a,b)]
-t2:=eqlesseq1(b,a,c,symeq(a,b,e),k):lesseq(a,c)
--2d173
-satzd173:=orapp(lessd(a,b),eq(a,b),lesseq(a,c),l,[t:lessd(a,b)]t1".2d173"(t),[t:eq(a,b)]t2".2d173"(t)):lesseq(a,c)
-trlesseq:=satzd173:lesseq(a,c)
-c@[m:moreq(a,b)][n:moreq(b,c)]
-trmoreq:=satzd168b(c,a,trlesseq(c,b,a,satzd168a(b,c,n),satzd168a(a,b,m))):moreq(a,c)
-a@ratd:=[t:not(zero(a))]ratrp(rpofpd(absd(a),satzd166e(a,t))):'prop'
-irratd:=not(ratd(a)):'prop'
-b@[e:eq(a,b)][r:ratd(a)]
-+*iv2d
-r@[n:not(zero(b))]
-t6:=th3"l.imp"(zero(a),zero(b),n,[t:zero(a)]eqzero(a,b,e,t)):not(zero(a))
-t7:=eqpderp(absd(a),satzd166e(a,t6),absd(b),satzd166e(b,n),eqabsd(a,b,e)):is(rpofpd(absd(a),satzd166e(a,t6)),rpofpd(absd(b),satzd166e(b,n)))
-t8:=isp(cut,[t:cut]ratrp(t),rpofpd(absd(a),satzd166e(a,t6)),rpofpd(absd(b),satzd166e(b,n)),<t6>r,t7):ratrp(rpofpd(absd(b),satzd166e(b,n)))
--iv2d
-r@eqratd:=[t:not(zero(b))]t8".iv2d"(t):ratd(b)
-e@[i:irratd(a)]
-eqirratd:=th3"l.imp"(ratd(b),ratd(a),i,[t:ratd(b)]eqratd(b,a,symeq(a,b,e),t)):irratd(b)
-a@[z:zero(a)]
-ratdi0:=th2"l.r.imp"(not(zero(a)),[t:not(zero(a))]ratrp(rpofpd(absd(a),satzd166e(a,t))),weli(zero(a),z)):ratd(a)
-@[r:cut][i:irratrp(r)][x0:rat]
-+*iv2d
-x0@[s:ratrp(pl(r,rpofrt(x0)))][y0:rat][j:is(pl(r,rpofrt(x0)),rpofrt(y0))]
-t9:=tris(cut,pl(rpofrt(x0),r),pl(r,rpofrt(x0)),rpofrt(y0),compl(rpofrt(x0),r),j):is(pl(rpofrt(x0),r),rpofrt(y0))
-t10:=ismore1(pl(rpofrt(x0),r),rpofrt(y0),rpofrt(x0),t9,satz133(rpofrt(x0),r)):more(rpofrt(y0),rpofrt(x0))
-t11:=satz154d(y0,x0,t10):more"rt"(y0,x0)
-t12:=satz155b(y0,x0,t11):is(rpofrt(mn"rt"(y0,x0,t11)),mn(rpofrt(y0),rpofrt(x0),satz154a(y0,x0,t11)))
-t13:=satz140g(rpofrt(y0),rpofrt(x0),r,satz154a(y0,x0,t11),t9):is(r,mn(rpofrt(y0),rpofrt(x0),satz154a(y0,x0,t11)))
-t14:=tris2(cut,r,rpofrt(mn"rt"(y0,x0,t11)),mn(rpofrt(y0),rpofrt(x0),satz154a(y0,x0,t11)),t13,t12):is(r,rpofrt(mn"rt"(y0,x0,t11)))
-t15:=somei(rat,[x:rat]is(r,rpofrt(x)),mn"rt"(y0,x0,t11),t14):ratrp(r)
-s@t16:=someapp(rat,[x:rat]is(pl(r,rpofrt(x0)),rpofrt(x)),s,con,[x:rat][t:is(pl(r,rpofrt(x0)),rpofrt(x))]<t15(x,t)>i):con
--iv2d
-x0@remark1:=[t:ratrp(pl(r,rpofrt(x0)))]t16".iv2d"(t):irratrp(pl(r,rpofrt(x0)))
-+*iv2d
-r@rp:=pdofrp(r):dif
-rn:=ndofrp(r):dif
-t17:=posdirp(r):posd(rp)
-t18:=pnot0d(rp,t17):not(zero(rp))
-t19:=nnot0d(rn,negdirp(r)):not(zero(rn))
-[n:not(zero(rp))]
-t20:=tris2(cut,r,rpofpd(absd(rp),satzd166e(rp,n)),rpofpd(rp,t17),isrppd1(r),eqpderp(absd(rp),satzd166e(rp,n),rp,t17,absnnd(rp,pnotnd(rp,t17)))):is(r,rpofpd(absd(rp),satzd166e(rp,n)))
-r@t21:=treq(absd(rn),df(std(rn),stm(rn)),rp,absnd(rn,negdirp(r)),eqsmsd(std(rn),stm(rn),pl(r,1rp),1rp,stdis(1rp,pl(r,1rp)),stmis(1rp,pl(r,1rp)))):eq(absd(rn),rp)
-[n:not(zero(rn))]
-t22:=tris2(cut,r,rpofpd(absd(rn),satzd166e(rn,n)),rpofpd(rp,t17),isrppd1(r),eqpderp(absd(rn),satzd166e(rn,n),rp,t17,t21)):is(r,rpofpd(absd(rn),satzd166e(rn,n)))
-r@[s:cut][i:is(r,s)][rr:ratrp(r)]
-t23:=isp(cut,[x:cut]ratrp(x),r,s,rr,i):ratrp(s)
-i@[rs:ratrp(s)]
-t24:=isp1(cut,[x:cut]ratrp(x),s,r,rs,i):ratrp(r)
--iv2d
-r@[rr:ratrp(r)]
-remark2a:=[t:not(zero(pdofrp(r)))]t23".iv2d"(rpofpd(absd(pdofrp(r)),satzd166e(pdofrp(r),t)),t20".iv2d"(t),rr):ratd(pdofrp(r))
-remark2b:=t17".iv2d":posd(pdofrp(r))
-remark3a:=[t:not(zero(ndofrp(r)))]t23".iv2d"(rpofpd(absd(ndofrp(r)),satzd166e(ndofrp(r),t)),t22".iv2d"(t),rr):ratd(ndofrp(r))
-remark3b:=negdirp(r):negd(ndofrp(r))
-r@[i:irratrp(r)]
-remark4a:=th3"l.imp"(ratd(pdofrp(r)),ratrp(r),i,[t:ratd(pdofrp(r))]t24".iv2d"(rpofpd(absd(pdofrp(r)),satzd166e(pdofrp(r),t18".iv2d")),t20".iv2d"(t18".iv2d"),<t18".iv2d">t)):irratd(pdofrp(r))
-remark4b:=t17".iv2d":posd(pdofrp(r))
-remark5a:=th3"l.imp"(ratd(ndofrp(r)),ratrp(r),i,[t:ratd(ndofrp(r))]t24".iv2d"(rpofpd(absd(ndofrp(r)),satzd166e(ndofrp(r),t19".iv2d")),t22".iv2d"(t19".iv2d"),<t19".iv2d">t)):irratd(ndofrp(r))
-remark5b:=negdirp(r):negd(ndofrp(r))
-a@natd:=and(posd(a),[t:posd(a)]natrp(rpofpd(a,t))):'prop'
-[n:natd(a)]
-natposd:=ande1(posd(a),[t:posd(a)]natrp(rpofpd(a,t)),n):posd(a)
-natderp:=ande2"l.r"(posd(a),[t:posd(a)]natrp(rpofpd(a,t)),n):natrp(rpofpd(a,natposd(a,n)))
-b@[e:eq(a,b)][n:natd(a)]
-+*iv2d
-n"rp"@t25:=eqposd(a,b,e,natposd(a,n)):posd(b)
-[p:posd(b)]
-t26:=eqpderp(a,natposd(a,n),b,p,e):is(rpofpd(a,natposd(a,n)),rpofpd(b,p))
-t27:=isp(cut,[t:cut]natrp(t),rpofpd(a,natposd(a,n)),rpofpd(b,p),natderp(a,n),t26):natrp(rpofpd(b,p))
--iv2d
-n@eqnatd:=andi(posd(b),[t:posd(b)]natrp(rpofpd(b,t)),t25".iv2d",[t:posd(b)]t27".iv2d"(t)):natd(b)
-@[x:nat]
-pdofnt:=pdofrp(rpofnt(x)):dif
-+*iv2d
-x@t28:=posdirp(rpofnt(x)):posd(pdofnt(x))
-[p:posd(pdofnt(x))]
-t29:=isrppd1(rpofnt(x)):is(rpofnt(x),rpofpd(pdofnt(x),t28))
-t30:=eqpderp(pdofnt(x),t28,pdofnt(x),p,refeq(pdofnt(x))):is(rpofpd(pdofnt(x),t28),rpofpd(pdofnt(x),p))
-t31:=tris(cut,rpofnt(x),rpofpd(pdofnt(x),t28),rpofpd(pdofnt(x),p),t29,t30):is(rpofnt(x),rpofpd(pdofnt(x),p))
-t32:=isp(cut,[t:cut]natrp(t),rpofnt(x),rpofpd(pdofnt(x),p),natrpi(x),t31):natrp(rpofpd(pdofnt(x),p))
--iv2d
-x@natdi:=andi(posd(pdofnt(x)),[t:posd(pdofnt(x))]natrp(rpofpd(pdofnt(x),t)),t28".iv2d",[t:posd(pdofnt(x))]t32".iv2d"(t)):natd(pdofnt(x))
-a@intd:=or(zero(a),natd(absd(a))):'prop'
-b@[e:eq(a,b)][i:intd(a)]
-+*iv2d
-i"rp"@[z:zero(a)]
-t33:=eqzero(a,b,e,z):zero(b)
-i"rp"@[n:natd(absd(a))]
-t34:=eqnatd(absd(a),absd(b),eqabsd(a,b,e),n):natd(absd(b))
--iv2d
-i@eqintd:=th9"l.or"(zero(a),natd(absd(a)),zero(b),natd(absd(b)),i,[t:zero(a)]t33".iv2d"(t),[t:natd(absd(a))]t34".iv2d"(t)):intd(b)
-a@[n:natd(a)]
-+*iv2d
-n"rp"@t34a:=symeq(absd(a),a,absnnd(a,pnotnd(a,natposd(a,n)))):eq(a,absd(a))
-t35:=eqnatd(a,absd(a),t34a,n):natd(absd(a))
--iv2d
-n@natintd:=ori2(zero(a),natd(absd(a)),t35".iv2d"):intd(a)
-a@[p:posd(a)][i:intd(a)]
-+*iv2d
-i"rp"@t36:=ore2(zero(a),natd(absd(a)),i,pnot0d(a,p)):natd(absd(a))
--iv2d
-i@posintnatd:=eqnatd(absd(a),a,absnnd(a,pnotnd(a,p)),t36".iv2d"):natd(a)
-a@[z:zero(a)]
-intdi0:=ori1(zero(a),natd(absd(a)),z):intd(a)
-r@[n:natrp(r)]
-+*iv2d
-n"rp"@t37:=posdirp(r):posd(pdofrp(r))
-[p:posd(pdofrp(r))]
-t38:=tris(cut,r,rpofpd(pdofrp(r),t37),rpofpd(pdofrp(r),p),isrppd1(r),eqpderp(pdofrp(r),t37,pdofrp(r),p,refeq(pdofrp(r)))):is(r,rpofpd(pdofrp(r),p))
-t39:=isp(cut,[t:cut]natrp(t),r,rpofpd(pdofrp(r),p),n,t38):natrp(rpofpd(pdofrp(r),p))
--iv2d
-n@remark6a:=andi(posd(pdofrp(r)),[t:posd(pdofrp(r))]natrp(rpofpd(pdofrp(r),t)),t37".iv2d",[t:posd(pdofrp(r))]t39".iv2d"(t)):natd(pdofrp(r))
-remark6:=natintd(pdofrp(r),remark6a):intd(pdofrp(r))
-+*iv2d
-n"rp"@t40:=absdeql(1rp,pl(r,1rp),isless2(pl(1rp,r),pl(r,1rp),1rp,compl(1rp,r),satz133a(1rp,r))):eq(absd(ndofrp(r)),pdofrp(r))
-t41:=eqnatd(pdofrp(r),absd(ndofrp(r)),symeq(absd(ndofrp(r)),pdofrp(r),t40),remark6a):natd(absd(ndofrp(r)))
--iv2d
-n@remark7:=ori2(zero(ndofrp(r)),natd(absd(ndofrp(r))),t41".iv2d"):intd(ndofrp(r))
-a@[i:intd(a)]
-+2d174
-[n:not(zero(a))]
-t1:=ore2(zero(a),natd(absd(a)),i,n):natd(absd(a))
-t2:=ande2(posd(absd(a)),[t:posd(absd(a))]natrp(rpofpd(absd(a),t)),t1):[t:posd(absd(a))]natrp(rpofpd(absd(a),t))
-t3:=lemmaiii5(rpofpd(absd(a),satzd166e(a,n)),<satzd166e(a,n)>t2):ratrp(rpofpd(absd(a),satzd166e(a,n)))
--2d174
-satzd174:=[t:not(zero(a))]t3".2d174"(t):ratd(a)
-b@pd:=df(pl(1a,1b),pl(2a,2b)):dif
-b2@pd12:=issmsd(pl(stm(df(a1,a2)),stm(df(b1,b2))),pl(std(df(a1,a2)),std(df(b1,b2))),pl(a1,b1),pl(a2,b2),ispl12(stm(df(a1,a2)),a1,stm(df(b1,b2)),b1,stmis(a1,a2),stmis(b1,b2)),ispl12(std(df(a1,a2)),a2,std(df(b1,b2)),b2,stdis(a1,a2),stdis(b1,b2))):is"e"(dif,pd(df(a1,a2),df(b1,b2)),df(pl(a1,b1),pl(a2,b2)))
-r2@pd1:=issmsd(pl(1a,stm(df(r1,r2))),pl(2a,std(df(r1,r2))),pl(1a,r1),pl(2a,r2),ispl2(stm(df(r1,r2)),r1,1a,stmis(r1,r2)),ispl2(std(df(r1,r2)),r2,2a,stdis(r1,r2))):is"e"(dif,pd(a,df(r1,r2)),df(pl(1a,r1),pl(2a,r2)))
-pd2:=issmsd(pl(stm(df(r1,r2)),1a),pl(std(df(r1,r2)),2a),pl(r1,1a),pl(r2,2a),ispl1(stm(df(r1,r2)),r1,1a,stmis(r1,r2)),ispl1(std(df(r1,r2)),r2,2a,stdis(r1,r2))):is"e"(dif,pd(df(r1,r2),a),df(pl(r1,1a),pl(r2,2a)))
-b2@pdeq12a:=refeq1(pd(df(a1,a2),df(b1,b2)),df(pl(a1,b1),pl(a2,b2)),pd12):eq(pd(df(a1,a2),df(b1,b2)),df(pl(a1,b1),pl(a2,b2)))
-pdeq12b:=refeq2(pd(df(a1,a2),df(b1,b2)),df(pl(a1,b1),pl(a2,b2)),pd12):eq(df(pl(a1,b1),pl(a2,b2)),pd(df(a1,a2),df(b1,b2)))
-r2@pdeq1a:=refeq1(pd(a,df(r1,r2)),df(pl(1a,r1),pl(2a,r2)),pd1):eq(pd(a,df(r1,r2)),df(pl(1a,r1),pl(2a,r2)))
-pdeq1b:=refeq2(pd(a,df(r1,r2)),df(pl(1a,r1),pl(2a,r2)),pd1):eq(df(pl(1a,r1),pl(2a,r2)),pd(a,df(r1,r2)))
-pdeq2a:=refeq1(pd(df(r1,r2),a),df(pl(r1,1a),pl(r2,2a)),pd2):eq(pd(df(r1,r2),a),df(pl(r1,1a),pl(r2,2a)))
-pdeq2b:=refeq2(pd(df(r1,r2),a),df(pl(r1,1a),pl(r2,2a)),pd2):eq(df(pl(r1,1a),pl(r2,2a)),pd(df(r1,r2),a))
-b@satzd175:=eqsmsd(pl(1a,1b),pl(2a,2b),pl(1b,1a),pl(2b,2a),compl(1a,1b),compl(2a,2b)):eq(pd(a,b),pd(b,a))
-compd:=satzd175:eq(pd(a,b),pd(b,a))
-c@[e:eq(a,b)]
-+iv3d
-t1:=tr3is(cut,pl(pl(1a,1c),pl(2b,2c)),pl(pl(1a,2b),pl(1c,2c)),pl(pl(1b,2a),pl(1c,2c)),pl(pl(1b,1c),pl(2a,2c)),4pl23(1a,1c,2b,2c),ispl1(pl(1a,2b),pl(1b,2a),pl(1c,2c),e),4pl23(1b,2a,1c,2c)):is(pl(pl(1a,1c),pl(2b,2c)),pl(pl(1b,1c),pl(2a,2c)))
--iv3d
-eqpd1:=eqi12(pl(1a,1c),pl(2a,2c),pl(1b,1c),pl(2b,2c),t1".iv3d"):eq(pd(a,c),pd(b,c))
-eqpd2:=tr3eq(pd(c,a),pd(a,c),pd(b,c),pd(c,b),compd(c,a),eqpd1,compd(b,c)):eq(pd(c,a),pd(c,b))
-d@[e:eq(a,b)][f:eq(c,d)]
-eqpd12:=treq(pd(a,c),pd(b,c),pd(b,d),eqpd1(a,b,c,e),eqpd2(c,d,b,f)):eq(pd(a,c),pd(b,d))
-b@[z:zero(a)]
-+*iv3d
-z@t2:=tr4is(cut,pl(pl(1a,1b),2b),pl(1a,pl(1b,2b)),pl(2a,pl(2b,1b)),pl(pl(2a,2b),1b),pl(1b,pl(2a,2b)),asspl1(1a,1b,2b),ispl12(1a,2a,pl(1b,2b),pl(2b,1b),z,compl(1b,2b)),asspl2(2a,2b,1b),compl(pl(2a,2b),1b)):is(pl(pl(1a,1b),2b),pl(1b,pl(2a,2b)))
--iv3d
-z@pd01:=eqi2(b,pl(1a,1b),pl(2a,2b),t2".iv3d"):eq(pd(a,b),b)
-b@[z:zero(b)]
-pd02:=treq(pd(a,b),pd(b,a),a,compd(a,b),pd01(b,a,z)):eq(pd(a,b),a)
-b@[p:posd(a)][q:posd(b)]
-ppd:=posdi(pl(1a,1b),pl(2a,2b),satz137(1a,2a,1b,2b,p,q)):posd(pd(a,b))
-b@[n:negd(a)][o:negd(b)]
-npd:=negdi(pl(1a,1b),pl(2a,2b),satz137a(1a,2a,1b,2b,n,o)):negd(pd(a,b))
-a@m0d:=df(2a,1a):dif
-a2@m0deqa:=eqsmsd(std(df(a1,a2)),stm(df(a1,a2)),a2,a1,stdis(a1,a2),stmis(a1,a2)):eq(m0d(df(a1,a2)),df(a2,a1))
-m0deqb:=symeq(m0d(df(a1,a2)),df(a2,a1),m0deqa):eq(df(a2,a1),m0d(df(a1,a2)))
-b@[e:eq(a,b)]
-+*iv3d
-e@t3:=tr3is(cut,pl(2a,1b),pl(1b,2a),pl(1a,2b),pl(2b,1a),compl(2a,1b),symeq(a,b,e),compl(1a,2b)):is(pl(2a,1b),pl(2b,1a))
--iv3d
-e@eqm0d:=eqi12(2a,1a,2b,1b,t3".iv3d"):eq(m0d(a),m0d(b))
-a@[p:posd(a)]
-satzd176a:=negdi(2a,1a,satz121(1a,2a,p)):negd(m0d(a))
-a@[z:zero(a)]
-satzd176b:=zeroi(2a,1a,symis(cut,1a,2a,z)):zero(m0d(a))
-a@[n:negd(a)]
-satzd176c:=posdi(2a,1a,satz122(1a,2a,n)):posd(m0d(a))
-a@[n:negd(m0d(a))]
-satzd176d:=satz122(2a,1a,isless12(stm(m0d(a)),2a,std(m0d(a)),1a,stmis(2a,1a),stdis(2a,1a),n)):posd(a)
-a@[z:zero(m0d(a))]
-satzd176e:=symis(cut,2a,1a,tr3is(cut,2a,stm(df(2a,1a)),std(df(2a,1a)),1a,isstm(2a,1a),z,stdis(2a,1a))):zero(a)
-a@[p:posd(m0d(a))]
-satzd176f:=satz121(2a,1a,ismore12(stm(m0d(a)),2a,std(m0d(a)),1a,stmis(2a,1a),stdis(2a,1a),p)):negd(a)
-a@[z:zero(a)]
-m0d0:=zeroeq(m0d(a),a,satzd176b(a,z),z):eq(m0d(a),a)
-+3d177
-a@t1:=tris(dif,m0d(m0d(a)),df(1a,2a),a,issmsd(std(m0d(a)),stm(m0d(a)),1a,2a,stdis(2a,1a),stmis(2a,1a)),dfis(a)):is"e"(dif,m0d(m0d(a)),a)
--3d177
-a@satzd177:=refeq1(m0d(m0d(a)),a,t1".3d177"):eq(m0d(m0d(a)),a)
-satzd177a:=symeq(m0d(m0d(a)),a,satzd177):eq(a,m0d(m0d(a)))
-b@[e:eq(a,m0d(b))]
-satzd177b:=treq(m0d(a),m0d(m0d(b)),b,eqm0d(a,m0d(b),e),satzd177(b)):eq(m0d(a),b)
-satzd177c:=symeq(m0d(a),b,satzd177b):eq(b,m0d(a))
-b@[e:eq(m0d(a),b)]
-satzd177d:=satzd177c(b,a,symeq(m0d(a),b,e)):eq(a,m0d(b))
-satzd177e:=symeq(a,m0d(b),satzd177d):eq(m0d(b),a)
-+3d178
-a@[p:posd(a)]
-t1:=tr3eq(absd(m0d(a)),m0d(m0d(a)),a,absd(a),absnd(m0d(a),satzd176a(a,p)),satzd177(a),symeq(absd(a),a,absnnd(a,pnotnd(a,p)))):eq(absd(m0d(a)),absd(a))
-a@[z:zero(a)]
-t2:=tr3eq(absd(m0d(a)),m0d(a),a,absd(a),absnnd(m0d(a),0notnd(m0d(a),satzd176b(a,z))),m0d0(a,z),symeq(absd(a),a,absnnd(a,0notnd(a,z)))):eq(absd(m0d(a)),absd(a))
-a@[n:negd(a)]
-t3:=treq(absd(m0d(a)),m0d(a),absd(a),absnnd(m0d(a),pnotnd(m0d(a),satzd176c(a,n))),symeq(absd(a),m0d(a),absnd(a,n))):eq(absd(m0d(a)),absd(a))
--3d178
-a@satzd178:=rappd(a,eq(absd(m0d(a)),absd(a)),[t:posd(a)]t1".3d178"(t),[t:zero(a)]t2".3d178"(t),[t:negd(a)]t3".3d178"(t)):eq(absd(m0d(a)),absd(a))
-satzd178a:=symeq(absd(m0d(a)),absd(a),satzd178):eq(absd(a),absd(m0d(a)))
-+3d179
-t1:=pdeq1b(a,2a,1a):eq(df(pl(1a,2a),pl(2a,1a)),pd(a,m0d(a)))
-t2:=zeroi(pl(1a,2a),pl(2a,1a),compl(1a,2a)):zero(df(pl(1a,2a),pl(2a,1a)))
--3d179
-satzd179:=eqzero(df(pl(1a,2a),pl(2a,1a)),pd(a,m0d(a)),t1".3d179",t2".3d179"):zero(pd(a,m0d(a)))
-satzd179a:=eqzero(pd(a,m0d(a)),pd(m0d(a),a),compd(a,m0d(a)),satzd179):zero(pd(m0d(a),a))
-b@satzd180:=treq(m0d(pd(a,b)),df(pl(2a,2b),pl(1a,1b)),pd(m0d(a),m0d(b)),m0deqa(pl(1a,1b),pl(2a,2b)),pdeq12b(2a,1a,2b,1b)):eq(m0d(pd(a,b)),pd(m0d(a),m0d(b)))
-satzd180a:=symeq(m0d(pd(a,b)),pd(m0d(a),m0d(b)),satzd180):eq(pd(m0d(a),m0d(b)),m0d(pd(a,b)))
-md:=pd(a,m0d(b)):dif
-b2@mdeq12a:=treq(md(df(a1,a2),df(b1,b2)),pd(df(a1,a2),df(b2,b1)),df(pl(a1,b2),pl(a2,b1)),eqpd2(m0d(df(b1,b2)),df(b2,b1),df(a1,a2),m0deqa(b1,b2)),pdeq12a(a1,a2,b2,b1)):eq(md(df(a1,a2),df(b1,b2)),df(pl(a1,b2),pl(a2,b1)))
-mdeq12b:=symeq(md(df(a1,a2),df(b1,b2)),df(pl(a1,b2),pl(a2,b1)),mdeq12a):eq(df(pl(a1,b2),pl(a2,b1)),md(df(a1,a2),df(b1,b2)))
-r2@mdeq1a:=treq(md(a,df(r1,r2)),pd(a,df(r2,r1)),df(pl(1a,r2),pl(2a,r1)),eqpd2(m0d(df(r1,r2)),df(r2,r1),a,m0deqa(r1,r2)),pdeq1a(a,r2,r1)):eq(md(a,df(r1,r2)),df(pl(1a,r2),pl(2a,r1)))
-mdeq1b:=symeq(md(a,df(r1,r2)),df(pl(1a,r2),pl(2a,r1)),mdeq1a):eq(df(pl(1a,r2),pl(2a,r1)),md(a,df(r1,r2)))
-mdeq2a:=pdeq12a(r1,r2,2a,1a):eq(md(df(r1,r2),a),df(pl(r1,2a),pl(r2,1a)))
-mdeq2b:=pdeq12b(r1,r2,2a,1a):eq(df(pl(r1,2a),pl(r2,1a)),md(df(r1,r2),a))
-c@[e:eq(a,b)]
-eqmd1:=eqpd1(a,b,m0d(c),e):eq(md(a,c),md(b,c))
-eqmd2:=eqpd2(m0d(a),m0d(b),c,eqm0d(a,b,e)):eq(md(c,a),md(c,b))
-d@[e:eq(a,b)][f:eq(c,d)]
-eqmd12:=treq(md(a,c),md(b,c),md(b,d),eqmd1(a,b,c,e),eqmd2(c,d,b,f)):eq(md(a,c),md(b,d))
-b@satzd181:=tr3eq(m0d(md(a,b)),pd(m0d(a),m0d(m0d(b))),pd(m0d(a),b),md(b,a),satzd180(a,m0d(b)),eqpd2(m0d(m0d(b)),b,m0d(a),satzd177(b)),compd(m0d(a),b)):eq(m0d(md(a,b)),md(b,a))
-satzd181a:=symeq(m0d(md(b,a)),md(a,b),satzd181(b,a)):eq(md(a,b),m0d(md(b,a)))
-+3d182
-t1:=treq(md(a,b),df(pl(1a,2b),pl(2a,1b)),df(pl(1a,2b),pl(1b,2a)),pdeq1a(a,2b,1b),eqsd(pl(1a,2b),pl(2a,1b),pl(1b,2a),compl(2a,1b))):eq(md(a,b),df(pl(1a,2b),pl(1b,2a)))
-t2:=symeq(md(a,b),df(pl(1a,2b),pl(1b,2a)),t1):eq(df(pl(1a,2b),pl(1b,2a)),md(a,b))
-t3:=stmis(pl(1a,2b),pl(1b,2a)):is(stm(df(pl(1a,2b),pl(1b,2a))),pl(1a,2b))
-t4:=stdis(pl(1a,2b),pl(1b,2a)):is(std(df(pl(1a,2b),pl(1b,2a))),pl(1b,2a))
--3d182
-[p:posd(md(a,b))]
-+*3d182
-p@t5:=eqposd(md(a,b),df(pl(1a,2b),pl(1b,2a)),t1,p):posd(df(pl(1a,2b),pl(1b,2a)))
--3d182
-p@satzd182a:=ismore12(stm(df(pl(1a,2b),pl(1b,2a))),pl(1a,2b),std(df(pl(1a,2b),pl(1b,2a))),pl(1b,2a),t3".3d182",t4".3d182",t5".3d182"):mored(a,b)
-b@[z:zero(md(a,b))]
-+*3d182
-z@t6:=eqzero(md(a,b),df(pl(1a,2b),pl(1b,2a)),t1,z):zero(df(pl(1a,2b),pl(1b,2a)))
--3d182
-z@satzd182b:=tr3is(cut,pl(1a,2b),stm(df(pl(1a,2b),pl(1b,2a))),std(df(pl(1a,2b),pl(1b,2a))),pl(1b,2a),isstm(pl(1a,2b),pl(1b,2a)),t6".3d182",t4".3d182"):eq(a,b)
-b@[n:negd(md(a,b))]
-+*3d182
-n@t7:=eqnegd(md(a,b),df(pl(1a,2b),pl(1b,2a)),t1,n):negd(df(pl(1a,2b),pl(1b,2a)))
--3d182
-n@satzd182c:=isless12(stm(df(pl(1a,2b),pl(1b,2a))),pl(1a,2b),std(df(pl(1a,2b),pl(1b,2a))),pl(1b,2a),t3".3d182",t4".3d182",t7".3d182"):lessd(a,b)
-b@[m:mored(a,b)]
-+*3d182
-m@t8:=posdi(pl(1a,2b),pl(1b,2a),m):posd(df(pl(1a,2b),pl(1b,2a)))
--3d182
-m@satzd182d:=eqposd(df(pl(1a,2b),pl(1b,2a)),md(a,b),t2".3d182",t8".3d182"):posd(md(a,b))
-b@[e:eq(a,b)]
-+*3d182
-e@t9:=zeroi(pl(1a,2b),pl(1b,2a),e):zero(df(pl(1a,2b),pl(1b,2a)))
--3d182
-e@satzd182e:=eqzero(df(pl(1a,2b),pl(1b,2a)),md(a,b),t2".3d182",t9".3d182"):zero(md(a,b))
-b@[l:lessd(a,b)]
-+*3d182
-l@t10:=negdi(pl(1a,2b),pl(1b,2a),l):negd(df(pl(1a,2b),pl(1b,2a)))
--3d182
-l@satzd182f:=eqnegd(df(pl(1a,2b),pl(1b,2a)),md(a,b),t2".3d182",t10".3d182"):negd(md(a,b))
-+3d183
-b@t1:=tris(cut,pl(1a,2b),pl(2b,1a),pl(stm(m0d(b)),std(m0d(a))),compl(1a,2b),12issmsd(2b,1b,2a,1a)):is(pl(1a,2b),pl(stm(m0d(b)),std(m0d(a))))
-t2:=t1(b,a):is(pl(1b,2a),pl(stm(m0d(a)),std(m0d(b))))
--3d183
-b@[m:mored(a,b)]
-satzd183a:=isless12(pl(1b,2a),pl(stm(m0d(a)),std(m0d(b))),pl(1a,2b),pl(stm(m0d(b)),std(m0d(a))),t2".3d183",t1".3d183",lemmad5(a,b,m)):lessd(m0d(a),m0d(b))
-b@[e:eq(a,b)]
-staz183b:=eqm0d(a,b,e):eq(m0d(a),m0d(b))
-b@[l:lessd(a,b)]
-satzd183c:=ismore12(pl(1b,2a),pl(stm(m0d(a)),std(m0d(b))),pl(1a,2b),pl(stm(m0d(b)),std(m0d(a))),t2".3d183",t1".3d183",lemmad6(a,b,l)):mored(m0d(a),m0d(b))
-b@[l:lessd(m0d(a),m0d(b))]
-satzd183d:=eqmored12(m0d(m0d(a)),a,m0d(m0d(b)),b,satzd177(a),satzd177(b),satzd183c(m0d(a),m0d(b),l)):mored(a,b)
-b@[e:eq(m0d(a),m0d(b))]
-satzd183e:=tr3eq(a,m0d(m0d(a)),m0d(m0d(b)),b,satzd177a(a),eqm0d(m0d(a),m0d(b),e),satzd177(b)):eq(a,b)
-b@[m:mored(m0d(a),m0d(b))]
-satzd183f:=eqlessd12(m0d(m0d(a)),a,m0d(m0d(b)),b,satzd177(a),satzd177(b),satzd183a(m0d(a),m0d(b),m)):lessd(a,b)
-+3d184
-a@t1:=tr3eq(a,df(pl(1a,pl(1rp,1rp)),pl(2a,pl(1rp,1rp))),df(pl(pl(1a,1rp),1rp),pl(1rp,pl(2a,1rp))),md(pdofrp(1a),pdofrp(2a)),lemmad3(a,pl(1rp,1rp)),eqsmsd(pl(1a,pl(1rp,1rp)),pl(2a,pl(1rp,1rp)),pl(pl(1a,1rp),1rp),pl(1rp,pl(2a,1rp)),asspl2(1a,1rp,1rp),3pl12(2a,1rp,1rp)),mdeq12b(pl(1a,1rp),1rp,pl(2a,1rp),1rp)):eq(a,md(pdofrp(1a),pdofrp(2a)))
-t2:=and3i(posd(pdofrp(1a)),posd(pdofrp(2a)),eq(a,md(pdofrp(1a),pdofrp(2a))),posdirp(1a),posdirp(2a),t1):and3(posd(pdofrp(1a)),posd(pdofrp(2a)),eq(a,md(pdofrp(1a),pdofrp(2a))))
-t3:=somei(dif,[x:dif]and3(posd(pdofrp(1a)),posd(x),eq(a,md(pdofrp(1a),x))),pdofrp(2a),t2):some"l"(dif,[x:dif]and3(posd(pdofrp(1a)),posd(x),eq(a,md(pdofrp(1a),x))))
--3d184
-a@satzd184:=somei(dif,[x:dif]some"l"(dif,[y:dif]and3(posd(x),posd(y),eq(a,md(x,y)))),pdofrp(1a),t3".3d184"):some"l"(dif,[x:dif]some"l"(dif,[y:dif]and3(posd(x),posd(y),eq(a,md(x,y)))))
-c@asspd1:=tr3eq(pd(pd(a,b),c),df(pl(pl(1a,1b),1c),pl(pl(2a,2b),2c)),df(pl(1a,pl(1b,1c)),pl(2a,pl(2b,2c))),pd(a,pd(b,c)),pdeq2a(c,pl(1a,1b),pl(2a,2b)),eqsmsd(pl(pl(1a,1b),1c),pl(pl(2a,2b),2c),pl(1a,pl(1b,1c)),pl(2a,pl(2b,2c)),asspl1(1a,1b,1c),asspl1(2a,2b,2c)),pdeq1b(a,pl(1b,1c),pl(2b,2c))):eq(pd(pd(a,b),c),pd(a,pd(b,c)))
-asspd2:=symeq(pd(pd(a,b),c),pd(a,pd(b,c)),asspd1):eq(pd(a,pd(b,c)),pd(pd(a,b),c))
-3pd23:=tr3eq(pd(pd(a,b),c),pd(a,pd(b,c)),pd(a,pd(c,b)),pd(pd(a,c),b),asspd1(a,b,c),eqpd2(pd(b,c),pd(c,b),a,compd(b,c)),asspd2(a,c,b)):eq(pd(pd(a,b),c),pd(pd(a,c),b))
-d@4pd23:=tr3eq(pd(pd(a,b),pd(c,d)),pd(pd(pd(a,b),c),d),pd(pd(pd(a,c),b),d),pd(pd(a,c),pd(b,d)),asspd2(pd(a,b),c,d),eqpd1(pd(pd(a,b),c),pd(pd(a,c),b),d,3pd23),asspd1(pd(a,c),b,d)):eq(pd(pd(a,b),pd(c,d)),pd(pd(a,c),pd(b,d)))
-b@pdmd:=treq(pd(md(a,b),b),pd(a,pd(m0d(b),b)),a,asspd1(a,m0d(b),b),pd02(a,pd(m0d(b),b),satzd179a(b))):eq(pd(md(a,b),b),a)
-mdpd:=treq(md(pd(a,b),b),pd(a,pd(b,m0d(b))),a,asspd1(a,b,m0d(b)),pd02(a,pd(b,m0d(b)),satzd179(b))):eq(md(pd(a,b),b),a)
-d@satzd185:=treq(pd(md(a,b),md(c,d)),pd(pd(a,c),pd(m0d(b),m0d(d))),md(pd(a,c),pd(b,d)),4pd23(a,m0d(b),c,m0d(d)),eqpd2(pd(m0d(b),m0d(d)),m0d(pd(b,d)),pd(a,c),satzd180a(b,d))):eq(pd(md(a,b),md(c,d)),md(pd(a,c),pd(b,d)))
-c@satzd186:=asspd1:eq(pd(pd(a,b),c),pd(a,pd(b,c)))
-b@satzd187a:=treq(pd(b,md(a,b)),pd(md(a,b),b),a,compd(b,md(a,b)),pdmd):eq(pd(b,md(a,b)),a)
-[x:dif][e:eq(pd(b,x),a)]
-satzd187c:=treq(md(a,b),md(pd(x,b),b),x,eqmd1(a,pd(x,b),b,treq1(a,pd(x,b),pd(b,x),e,compd(b,x))),mdpd(x,b)):eq(md(a,b),x)
-satzd187d:=symeq(md(a,b),x,satzd187c):eq(x,md(a,b))
-x@[e:eq(pd(x,b),a)]
-satzd187e:=satzd187c(treq(pd(b,x),pd(x,b),a,compd(b,x),e)):eq(md(a,b),x)
-satzd187f:=symeq(md(a,b),x,satzd187e):eq(x,md(a,b))
-+3d188
-c@t1:=tr3eq(md(pd(a,c),pd(b,c)),pd(pd(a,c),pd(m0d(b),m0d(c))),pd(md(a,b),md(c,c)),md(a,b),eqpd2(m0d(pd(b,c)),pd(m0d(b),m0d(c)),pd(a,c),satzd180(b,c)),4pd23(a,c,m0d(b),m0d(c)),pd02(md(a,b),md(c,c),satzd179(c))):eq(md(pd(a,c),pd(b,c)),md(a,b))
-t2:=symeq(md(pd(a,c),pd(b,c)),md(a,b),t1):eq(md(a,b),md(pd(a,c),pd(b,c)))
--3d188
-c@[m:mored(pd(a,c),pd(b,c))]
-+*3d188
-m@t3:=eqposd(md(pd(a,c),pd(b,c)),md(a,b),t1,satzd182d(pd(a,c),pd(b,c),m)):posd(md(a,b))
--3d188
-m@satzd188a:=satzd182a(a,b,t3".3d188"):mored(a,b)
-c@[e:eq(pd(a,c),pd(b,c))]
-+*3d188
-e@t4:=eqzero(md(pd(a,c),pd(b,c)),md(a,b),t1,satzd182e(pd(a,c),pd(b,c),e)):zero(md(a,b))
--3d188
-e@satzd188b:=satzd182b(a,b,t4".3d188"):eq(a,b)
-c@[l:lessd(pd(a,c),pd(b,c))]
-+*3d188
-l@t5:=eqnegd(md(pd(a,c),pd(b,c)),md(a,b),t1,satzd182f(pd(a,c),pd(b,c),l)):negd(md(a,b))
--3d188
-l@satzd188c:=satzd182c(a,b,t5".3d188"):lessd(a,b)
-c@[m:mored(a,b)]
-+*3d188
-m@t6:=eqposd(md(a,b),md(pd(a,c),pd(b,c)),t2,satzd182d(a,b,m)):posd(md(pd(a,c),pd(b,c)))
--3d188
-m@satzd188d:=satzd182a(pd(a,c),pd(b,c),t6".3d188"):mored(pd(a,c),pd(b,c))
-c@[e:eq(a,b)]
-satzd188e:=eqpd1(a,b,c,e):eq(pd(a,c),pd(b,c))
-c@[l:lessd(a,b)]
-+*3d188
-l@t7:=eqnegd(md(a,b),md(pd(a,c),pd(b,c)),t2,satzd182f(a,b,l)):negd(md(pd(a,c),pd(b,c)))
--3d188
-l@satzd188f:=satzd182c(pd(a,c),pd(b,c),t7".3d188"):lessd(pd(a,c),pd(b,c))
-c@[m:mored(pd(c,a),pd(c,b))]
-satzd188g:=satzd188a(eqmored12(pd(c,a),pd(a,c),pd(c,b),pd(b,c),compd(c,a),compd(c,b),m)):mored(a,b)
-c@[e:eq(pd(c,a),pd(c,b))]
-satzd188h:=satzd188b(tr3eq(pd(a,c),pd(c,a),pd(c,b),pd(b,c),compd(a,c),e,compd(c,b))):eq(a,b)
-[l:lessd(pd(c,a),pd(c,b))]
-satzd188j:=satzd188c(eqlessd12(pd(c,a),pd(a,c),pd(c,b),pd(b,c),compd(c,a),compd(c,b),l)):lessd(a,b)
-c@[m:mored(a,b)]
-satzd188k:=eqmored12(pd(a,c),pd(c,a),pd(b,c),pd(c,b),compd(a,c),compd(b,c),satzd188d(m)):mored(pd(c,a),pd(c,b))
-c@[e:eq(a,b)]
-satzd188l:=eqpd2(a,b,c,e):eq(pd(c,a),pd(c,b))
-c@[l:lessd(a,b)]
-satzd188m:=eqlessd12(pd(a,c),pd(c,a),pd(b,c),pd(c,b),compd(a,c),compd(b,c),satzd188f(l)):lessd(pd(c,a),pd(c,b))
-d@[e:eq(a,b)][m:mored(c,d)]
-satzd188n:=eqmored2(pd(a,d),pd(b,d),pd(a,c),eqpd1(a,b,d,e),satzd188k(c,d,a,m)):mored(pd(a,c),pd(b,d))
-satzd188o:=eqmored12(pd(a,c),pd(c,a),pd(b,d),pd(d,b),compd(a,c),compd(b,d),satzd188n):mored(pd(c,a),pd(d,b))
-e@[l:lessd(c,d)]
-satzd188p:=eqlessd2(pd(a,d),pd(b,d),pd(a,c),eqpd1(a,b,d,e),satzd188m(c,d,a,l)):lessd(pd(a,c),pd(b,d))
-satzd188q:=eqlessd12(pd(a,c),pd(c,a),pd(b,d),pd(d,b),compd(a,c),compd(b,d),satzd188p):lessd(pd(c,a),pd(d,b))
-d@[m:mored(a,b)][n:mored(c,d)]
-satzd189:=trmored(pd(a,c),pd(b,c),pd(b,d),satzd188d(a,b,c,m),satzd188k(c,d,b,n)):mored(pd(a,c),pd(b,d))
-d@[l:lessd(a,b)][k:lessd(c,d)]
-satzd189a:=lemmad5(pd(b,d),pd(a,c),satzd189(b,a,d,c,lemmad6(a,b,l),lemmad6(c,d,k))):lessd(pd(a,c),pd(b,d))
-d@[m:moreq(a,b)][n:mored(c,d)]
-satzd190a:=orapp(mored(a,b),eq(a,b),mored(pd(a,c),pd(b,d)),m,[t:mored(a,b)]satzd189(t,n),[t:eq(a,b)]satzd188n(t,n)):mored(pd(a,c),pd(b,d))
-d@[m:mored(a,b)][n:moreq(c,d)]
-satzd190b:=eqmored12(pd(c,a),pd(a,c),pd(d,b),pd(b,d),compd(c,a),compd(d,b),satzd190a(c,d,a,b,n,m)):mored(pd(a,c),pd(b,d))
-d@[l:lesseq(a,b)][k:lessd(c,d)]
-satzd190c:=lemmad5(pd(b,d),pd(a,c),satzd190a(b,a,d,c,satzd168b(a,b,l),lemmad6(c,d,k))):lessd(pd(a,c),pd(b,d))
-d@[l:lessd(a,b)][k:lesseq(c,d)]
-satzd190d:=lemmad5(pd(b,d),pd(a,c),satzd190b(b,a,d,c,lemmad6(a,b,l),satzd168b(c,d,k))):lessd(pd(a,c),pd(b,d))
-d@[m:moreq(a,b)][n:moreq(c,d)]
-+3d191
-[e:eq(a,b)][f:eq(c,d)]
-t1:=moreqi2(pd(a,c),pd(b,d),eqpd12(a,b,c,d,e,f)):moreq(pd(a,c),pd(b,d))
-e@[o:mored(c,d)]
-t2:=moreqi1(pd(a,c),pd(b,d),satzd190a(m,o)):moreq(pd(a,c),pd(b,d))
-e@t3:=orapp(mored(c,d),eq(c,d),moreq(pd(a,c),pd(b,d)),n,[t:mored(c,d)]t2(t),[t:eq(c,d)]t1(t)):moreq(pd(a,c),pd(b,d))
-n@[o:mored(a,b)]
-t4:=moreqi1(pd(a,c),pd(b,d),satzd190b(o,n)):moreq(pd(a,c),pd(b,d))
--3d191
-satzd191:=orapp(mored(a,b),eq(a,b),moreq(pd(a,c),pd(b,d)),m,[t:mored(a,b)]t4".3d191"(t),[t:eq(a,b)]t3".3d191"(t)):moreq(pd(a,c),pd(b,d))
-d@[l:lesseq(a,b)][k:lesseq(c,d)]
-satzd191a:=satzd168a(pd(b,d),pd(a,c),satzd191(b,a,d,c,satzd168b(a,b,l),satzd168b(c,d,k))):lesseq(pd(a,c),pd(b,d))
-b@td:=df(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b))):dif
-+iv4d
-a2@[r:cut]
-t1:=ists1(stm(df(a1,a2)),a1,r,stmis(a1,a2)):is(ts(stm(df(a1,a2)),r),ts(a1,r))
-t2:=ists2(stm(df(a1,a2)),a1,r,stmis(a1,a2)):is(ts(r,stm(df(a1,a2))),ts(r,a1))
-t3:=ists1(std(df(a1,a2)),a2,r,stdis(a1,a2)):is(ts(std(df(a1,a2)),r),ts(a2,r))
-t4:=ists2(std(df(a1,a2)),a2,r,stdis(a1,a2)):is(ts(r,std(df(a1,a2))),ts(r,a2))
-[s:cut]
-t5:=ispl12(ts(stm(df(a1,a2)),r),ts(a1,r),ts(std(df(a1,a2)),s),ts(a2,s),t1(r),t3(s)):is(pl(ts(stm(df(a1,a2)),r),ts(std(df(a1,a2)),s)),pl(ts(a1,r),ts(a2,s)))
-t6:=ispl12(ts(r,stm(df(a1,a2))),ts(r,a1),ts(s,std(df(a1,a2))),ts(s,a2),t2(r),t4(s)):is(pl(ts(r,stm(df(a1,a2))),ts(s,std(df(a1,a2)))),pl(ts(r,a1),ts(s,a2)))
-t7:=ispl12(ts(std(df(a1,a2)),r),ts(a2,r),ts(stm(df(a1,a2)),s),ts(a1,s),t3(r),t1(s)):is(pl(ts(std(df(a1,a2)),r),ts(stm(df(a1,a2)),s)),pl(ts(a2,r),ts(a1,s)))
-t8:=ispl12(ts(r,std(df(a1,a2))),ts(r,a2),ts(s,stm(df(a1,a2))),ts(s,a1),t4(r),t2(s)):is(pl(ts(r,std(df(a1,a2))),ts(s,stm(df(a1,a2)))),pl(ts(r,a2),ts(s,a1)))
-b2@t9:=tris(cut,pl(ts(stm(df(a1,a2)),stm(df(b1,b2))),ts(std(df(a1,a2)),std(df(b1,b2)))),pl(ts(a1,stm(df(b1,b2))),ts(a2,std(df(b1,b2)))),pl(ts(a1,b1),ts(a2,b2)),t5(a1,a2,stm(df(b1,b2)),std(df(b1,b2))),t6(b1,b2,a1,a2)):is(pl(ts(stm(df(a1,a2)),stm(df(b1,b2))),ts(std(df(a1,a2)),std(df(b1,b2)))),pl(ts(a1,b1),ts(a2,b2)))
-t10:=tris(cut,pl(ts(stm(df(a1,a2)),std(df(b1,b2))),ts(std(df(a1,a2)),stm(df(b1,b2)))),pl(ts(a1,std(df(b1,b2))),ts(a2,stm(df(b1,b2)))),pl(ts(a1,b2),ts(a2,b1)),t5(a1,a2,std(df(b1,b2)),stm(df(b1,b2))),t8(b1,b2,a1,a2)):is(pl(ts(stm(df(a1,a2)),std(df(b1,b2))),ts(std(df(a1,a2)),stm(df(b1,b2)))),pl(ts(a1,b2),ts(a2,b1)))
--iv4d
-b2@td12:=issmsd(pl(ts(stm(df(a1,a2)),stm(df(b1,b2))),ts(std(df(a1,a2)),std(df(b1,b2)))),pl(ts(stm(df(a1,a2)),std(df(b1,b2))),ts(std(df(a1,a2)),stm(df(b1,b2)))),pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1)),t9".iv4d",t10".iv4d"):is"e"(dif,td(df(a1,a2),df(b1,b2)),df(pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1))))
-r2@td1:=issmsd(pl(ts(1a,stm(df(r1,r2))),ts(2a,std(df(r1,r2)))),pl(ts(1a,std(df(r1,r2))),ts(2a,stm(df(r1,r2)))),pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1)),t6".iv4d"(r1,r2,1a,2a),t8".iv4d"(r1,r2,1a,2a)):is"e"(dif,td(a,df(r1,r2)),df(pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1))))
-td2:=issmsd(pl(ts(stm(df(r1,r2)),1a),ts(std(df(r1,r2)),2a)),pl(ts(stm(df(r1,r2)),2a),ts(std(df(r1,r2)),1a)),pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a)),t5".iv4d"(r1,r2,1a,2a),t5".iv4d"(r1,r2,2a,1a)):is"e"(dif,td(df(r1,r2),a),df(pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a))))
-b2@tdeq12a:=refeq1(td(df(a1,a2),df(b1,b2)),df(pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1))),td12):eq(td(df(a1,a2),df(b1,b2)),df(pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1))))
-tdeq12b:=refeq2(td(df(a1,a2),df(b1,b2)),df(pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1))),td12):eq(df(pl(ts(a1,b1),ts(a2,b2)),pl(ts(a1,b2),ts(a2,b1))),td(df(a1,a2),df(b1,b2)))
-r2@tdeq1a:=refeq1(td(a,df(r1,r2)),df(pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1))),td1):eq(td(a,df(r1,r2)),df(pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1))))
-tdeq1b:=refeq2(td(a,df(r1,r2)),df(pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1))),td1):eq(df(pl(ts(1a,r1),ts(2a,r2)),pl(ts(1a,r2),ts(2a,r1))),td(a,df(r1,r2)))
-tdeq2a:=refeq1(td(df(r1,r2),a),df(pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a))),td2):eq(td(df(r1,r2),a),df(pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a))))
-tdeq2b:=refeq2(td(df(r1,r2),a),df(pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a))),td2):eq(df(pl(ts(r1,1a),ts(r2,2a)),pl(ts(r1,2a),ts(r2,1a))),td(df(r1,r2),a))
-+4d194
-b@t1:=ispl12(ts(1a,1b),ts(1b,1a),ts(2a,2b),ts(2b,2a),comts(1a,1b),comts(2a,2b)):is(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1b,1a),ts(2b,2a)))
-t2:=tris(cut,pl(ts(1a,2b),ts(2a,1b)),pl(ts(2a,1b),ts(1a,2b)),pl(ts(1b,2a),ts(2b,1a)),compl(ts(1a,2b),ts(2a,1b)),ispl12(ts(2a,1b),ts(1b,2a),ts(1a,2b),ts(2b,1a),comts(2a,1b),comts(1a,2b))):is(pl(ts(1a,2b),ts(2a,1b)),pl(ts(1b,2a),ts(2b,1a)))
--4d194
-b@satzd194:=eqsmsd(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)),pl(ts(1b,1a),ts(2b,2a)),pl(ts(1b,2a),ts(2b,1a)),t1".4d194",t2".4d194"):eq(td(a,b),td(b,a))
-comtd:=satzd194:eq(td(a,b),td(b,a))
-c@[e:eq(a,b)]
-+*iv4d
-e@[r:cut]
-t11:=tr3is(cut,pl(ts(1a,r),ts(2b,r)),ts(pl(1a,2b),r),ts(pl(1b,2a),r),pl(ts(1b,r),ts(2a,r)),distpt1(1a,2b,r),ists1(pl(1a,2b),pl(1b,2a),r,e),disttp1(1b,2a,r)):is(pl(ts(1a,r),ts(2b,r)),pl(ts(1b,r),ts(2a,r)))
-e@t12:=tr3is(cut,pl(pl(ts(1a,1c),ts(2a,2c)),pl(ts(1b,2c),ts(2b,1c))),pl(pl(ts(1a,1c),ts(2b,1c)),pl(ts(1b,2c),ts(2a,2c))),pl(pl(ts(1b,1c),ts(2a,1c)),pl(ts(1a,2c),ts(2b,2c))),pl(pl(ts(1b,1c),ts(2b,2c)),pl(ts(1a,2c),ts(2a,1c))),4pl24(ts(1a,1c),ts(2a,2c),ts(1b,2c),ts(2b,1c)),ispl12(pl(ts(1a,1c),ts(2b,1c)),pl(ts(1b,1c),ts(2a,1c)),pl(ts(1b,2c),ts(2a,2c)),pl(ts(1a,2c),ts(2b,2c)),t11(1c),t11(b,a,c,symeq(a,b,e),2c)),4pl24(ts(1b,1c),ts(2a,1c),ts(1a,2c),ts(2b,2c))):is(pl(pl(ts(1a,1c),ts(2a,2c)),pl(ts(1b,2c),ts(2b,1c))),pl(pl(ts(1b,1c),ts(2b,2c)),pl(ts(1a,2c),ts(2a,1c))))
--iv4d
-e@eqtd1:=eqi12(pl(ts(1a,1c),ts(2a,2c)),pl(ts(1a,2c),ts(2a,1c)),pl(ts(1b,1c),ts(2b,2c)),pl(ts(1b,2c),ts(2b,1c)),t12".iv4d"):eq(td(a,c),td(b,c))
-eqtd2:=tr3eq(td(c,a),td(a,c),td(b,c),td(c,b),comtd(c,a),eqtd1,comtd(b,c)):eq(td(c,a),td(c,b))
-d@[e:eq(a,b)][f:eq(c,d)]
-eqtd12:=treq(td(a,c),td(b,c),td(b,d),eqtd1(a,b,c,e),eqtd2(c,d,b,f)):eq(td(a,c),td(b,d))
-b@[z:zero(a)]
-+4d192
-t1:=tris(cut,pl(ts(1a,1b),ts(2a,2b)),pl(ts(2a,1b),ts(1a,2b)),pl(ts(1a,2b),ts(2a,1b)),ispl12(ts(1a,1b),ts(2a,1b),ts(2a,2b),ts(1a,2b),ists1(1a,2a,1b,z),ists1(2a,1a,2b,symis(cut,1a,2a,z))),compl(ts(2a,1b),ts(1a,2b))):is(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)))
--4d192
-satzd192a:=zeroi(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)),t1".4d192"):zero(td(a,b))
-b@[z:zero(b)]
-satzd192b:=eqzero(td(b,a),td(a,b),comtd(b,a),satzd192a(b,a,z)):zero(td(a,b))
-b@[z:zero(a)]
-td01:=satzd192a(z):zero(td(a,b))
-b@[z:zero(b)]
-td02:=satzd192b(z):zero(td(a,b))
-b@satzd197a:=tr3eq(td(m0d(a),b),df(pl(ts(2a,1b),ts(1a,2b)),pl(ts(2a,2b),ts(1a,1b))),df(pl(ts(1a,2b),ts(2a,1b)),pl(ts(1a,1b),ts(2a,2b))),m0d(td(a,b)),tdeq2a(b,2a,1a),eqsmsd(pl(ts(2a,1b),ts(1a,2b)),pl(ts(2a,2b),ts(1a,1b)),pl(ts(1a,2b),ts(2a,1b)),pl(ts(1a,1b),ts(2a,2b)),compl(ts(2a,1b),ts(1a,2b)),compl(ts(2a,2b),ts(1a,1b))),m0deqb(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)))):eq(td(m0d(a),b),m0d(td(a,b)))
-satzd197b:=tr3eq(td(a,m0d(b)),td(m0d(b),a),m0d(td(b,a)),m0d(td(a,b)),comtd(a,m0d(b)),satzd197a(b,a),eqm0d(td(b,a),td(a,b),comtd(b,a))):eq(td(a,m0d(b)),m0d(td(a,b)))
-satzd197c:=treq2(td(m0d(a),b),td(a,m0d(b)),m0d(td(a,b)),satzd197a,satzd197b):eq(td(m0d(a),b),td(a,m0d(b)))
-satzd197d:=symeq(td(m0d(a),b),td(a,m0d(b)),satzd197c):eq(td(a,m0d(b)),td(m0d(a),b))
-satzd197e:=symeq(td(m0d(a),b),m0d(td(a,b)),satzd197a):eq(m0d(td(a,b)),td(m0d(a),b))
-satzd197f:=symeq(td(a,m0d(b)),m0d(td(a,b)),satzd197b):eq(m0d(td(a,b)),td(a,m0d(b)))
-satzd198:=treq(td(m0d(a),m0d(b)),td(a,m0d(m0d(b))),td(a,b),satzd197c(a,m0d(b)),eqtd2(m0d(m0d(b)),b,a,satzd177(b))):eq(td(m0d(a),m0d(b)),td(a,b))
-satzd198a:=symeq(td(m0d(a),m0d(b)),td(a,b),satzd198):eq(td(a,b),td(m0d(a),m0d(b)))
-[p:posd(a)][q:posd(b)]
-+*iv4d
-q@[r:cut]
-t13:=tris(cut,pl(ts(r,mn(1b,2b,q)),ts(r,2b)),ts(r,pl(mn(1b,2b,q),2b)),ts(r,1b),distpt2(r,mn(1b,2b,q),2b),ists2(pl(mn(1b,2b,q),2b),1b,r,satz140e(1b,2b,q))):is(pl(ts(r,mn(1b,2b,q)),ts(r,2b)),ts(r,1b))
-[s:cut]
-t14:=tris(cut,pl(ts(r,mn(1b,2b,q)),pl(ts(r,2b),s)),pl(pl(ts(r,mn(1b,2b,q)),ts(r,2b)),s),pl(ts(r,1b),s),asspl2(ts(r,mn(1b,2b,q)),ts(r,2b),s),ispl1(pl(ts(r,mn(1b,2b,q)),ts(r,2b)),ts(r,1b),s,t13)):is(pl(ts(r,mn(1b,2b,q)),pl(ts(r,2b),s)),pl(ts(r,1b),s))
-t15:=tris(cut,pl(ts(r,mn(1b,2b,q)),pl(ts(r,2b),s)),pl(ts(r,1b),s),pl(s,ts(r,1b)),t14,compl(ts(r,1b),s)):is(pl(ts(r,mn(1b,2b,q)),pl(ts(r,2b),s)),pl(s,ts(r,1b)))
-q@t16:=satz135h(pl(ts(1a,2b),ts(2a,2b)),pl(ts(2a,2b),ts(1a,2b)),ts(1a,mn(1b,2b,q)),ts(2a,mn(1b,2b,q)),compl(ts(1a,2b),ts(2a,2b)),satz145a(1a,2a,mn(1b,2b,q),p)):more(pl(ts(1a,mn(1b,2b,q)),pl(ts(1a,2b),ts(2a,2b))),pl(ts(2a,mn(1b,2b,q)),pl(ts(2a,2b),ts(1a,2b))))
-t17:=ismore12(pl(ts(1a,mn(1b,2b,q)),pl(ts(1a,2b),ts(2a,2b))),pl(ts(1a,1b),ts(2a,2b)),pl(ts(2a,mn(1b,2b,q)),pl(ts(2a,2b),ts(1a,2b))),pl(ts(1a,2b),ts(2a,1b)),t14(1a,ts(2a,2b)),t15(2a,ts(1a,2b)),t16):more(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)))
--iv4d
-q@ptdpp:=posdi(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)),t17".iv4d"):posd(td(a,b))
-b@[p:posd(a)][n:negd(b)]
-+*iv4d
-n@t18:=eqposd(td(a,m0d(b)),m0d(td(a,b)),satzd197b(a,b),ptdpp(a,m0d(b),p,satzd176c(b,n))):posd(m0d(td(a,b)))
--iv4d
-n@ntdpn:=satzd176f(td(a,b),t18".iv4d"):negd(td(a,b))
-b@[n:negd(a)][p:posd(b)]
-ntdnp:=eqnegd(td(b,a),td(a,b),comtd(b,a),ntdpn(b,a,p,n)):negd(td(a,b))
-b@[n:negd(a)][o:negd(b)]
-ptdnn:=eqposd(td(m0d(a),m0d(b)),td(a,b),satzd198(a,b),ptdpp(m0d(a),m0d(b),satzd176c(a,n),satzd176c(b,o))):posd(td(a,b))
-b@[n:not(zero(a))][o:not(zero(b))]
-+*4d192
-o@[p:posd(a)][q:posd(b)]
-t2:=pnot0d(td(a,b),ptdpp(a,b,p,q)):not(zero(td(a,b)))
-p@[m:negd(b)]
-t3:=nnot0d(td(a,b),ntdpn(a,b,p,m)):not(zero(td(a,b)))
-p@t4:=rappd(b,not(zero(td(a,b))),[t:posd(b)]t2(t),th2"l.imp"(zero(b),not(zero(td(a,b))),o),[t:negd(b)]t3(t)):not(zero(td(a,b)))
-o@[m:negd(a)][p:posd(b)]
-t5:=nnot0d(td(a,b),ntdnp(a,b,m,p)):not(zero(td(a,b)))
-m@[l:negd(b)]
-t6:=pnot0d(td(a,b),ptdnn(a,b,m,l)):not(zero(td(a,b)))
-m@t7:=rappd(b,not(zero(td(a,b))),[t:posd(b)]t5(t),th2"l.imp"(zero(b),not(zero(td(a,b))),o),[t:negd(b)]t6(t)):not(zero(td(a,b)))
--4d192
-o@satzd192d:=rappd(a,not(zero(td(a,b))),[t:posd(a)]t4".4d192"(t),th2"l.imp"(zero(a),not(zero(td(a,b))),n),[t:negd(a)]t7".4d192"(t)):not(zero(td(a,b)))
-b@[z:zero(td(a,b))]
-+*4d192
-z@[n:not(zero(a))]
-t8:=et(zero(b),th3"l.imp"(not(zero(b)),not(zero(td(a,b))),weli(zero(td(a,b)),z),[t:not(zero(b))]satzd192d(n,t))):zero(b)
--4d192
-z@satzd192c:=[t:not(zero(a))]t8".4d192"(t):or(zero(a),zero(b))
-+4d193
-b@[p:posd(a)][q:posd(b)]
-t1:=treq2(absd(td(a,b)),td(absd(a),absd(b)),td(a,b),absnnd(td(a,b),pnotnd(td(a,b),ptdpp(a,b,p,q))),eqtd12(absd(a),a,absd(b),b,absnnd(a,pnotnd(a,p)),absnnd(b,pnotnd(b,q)))):eq(absd(td(a,b)),td(absd(a),absd(b)))
-p@[n:negd(b)]
-t2:=treq(absd(td(a,b)),m0d(td(a,b)),td(a,m0d(b)),absnd(td(a,b),ntdpn(a,b,p,n)),satzd197f(a,b)):eq(absd(td(a,b)),td(a,m0d(b)))
-t3:=treq2(absd(td(a,b)),td(absd(a),absd(b)),td(a,m0d(b)),t2,eqtd12(absd(a),a,absd(b),m0d(b),absnnd(a,pnotnd(a,p)),absnd(b,n))):eq(absd(td(a,b)),td(absd(a),absd(b)))
-b@[z:zero(a)]
-t4:=zeroeq(absd(td(a,b)),td(absd(a),absd(b)),satzd166f(td(a,b),td01(a,b,z)),td01(absd(a),absd(b),satzd166f(a,z))):eq(absd(td(a,b)),td(absd(a),absd(b)))
-b@[z:zero(b)]
-t5:=zeroeq(absd(td(a,b)),td(absd(a),absd(b)),satzd166f(td(a,b),td02(a,b,z)),td02(absd(a),absd(b),satzd166f(b,z))):eq(absd(td(a,b)),td(absd(a),absd(b)))
-b@[n:negd(a)][p:posd(b)]
-t6:=tr3eq(absd(td(a,b)),absd(td(b,a)),td(absd(b),absd(a)),td(absd(a),absd(b)),eqabsd(td(a,b),td(b,a),comtd(a,b)),t3(b,a,p,n),comtd(absd(b),absd(a))):eq(absd(td(a,b)),td(absd(a),absd(b)))
-n@[o:negd(b)]
-t7:=treq(td(absd(a),absd(b)),td(m0d(a),m0d(b)),td(a,b),eqtd12(absd(a),m0d(a),absd(b),m0d(b),absnd(a,n),absnd(b,o)),satzd198(a,b)):eq(td(absd(a),absd(b)),td(a,b))
-t8:=treq2(absd(td(a,b)),td(absd(a),absd(b)),td(a,b),absnnd(td(a,b),pnotnd(td(a,b),ptdnn(a,b,n,o))),t7):eq(absd(td(a,b)),td(absd(a),absd(b)))
-b@[p:posd(a)]
-t9:=rappd(b,eq(absd(td(a,b)),td(absd(a),absd(b))),[t:posd(b)]t1(p,t),[t:zero(b)]t5(t),[t:negd(b)]t3(p,t)):eq(absd(td(a,b)),td(absd(a),absd(b)))
-b@[n:negd(a)]
-t10:=rappd(b,eq(absd(td(a,b)),td(absd(a),absd(b))),[t:posd(b)]t6(n,t),[t:zero(b)]t5(t),[t:negd(b)]t8(n,t)):eq(absd(td(a,b)),td(absd(a),absd(b)))
--4d193
-b@satzd193:=rappd(a,eq(absd(td(a,b)),td(absd(a),absd(b))),[t:posd(a)]t9".4d193"(t),[t:zero(a)]t4".4d193"(t),[t:negd(a)]t10".4d193"(t)):eq(absd(td(a,b)),td(absd(a),absd(b)))
-satzd103a:=symeq(absd(td(a,b)),td(absd(a),absd(b)),satzd193):eq(td(absd(a),absd(b)),absd(td(a,b)))
-@1df:=pdofrp(1rp):dif
-+4d195
-a@t1:=tris(cut,pl(pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),2a),pl(ts(1a,pl(1rp,1rp)),pl(ts(2a,1rp),2a)),pl(pl(1a,1a),pl(2a,2a)),asspl1(ts(1a,pl(1rp,1rp)),ts(2a,1rp),2a),ispl12(ts(1a,pl(1rp,1rp)),pl(1a,1a),pl(ts(2a,1rp),2a),pl(2a,2a),a2isapa(1a),ispl1(ts(2a,1rp),2a,2a,satz151(2a)))):is(pl(pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),2a),pl(pl(1a,1a),pl(2a,2a)))
-t2:=tris(cut,pl(1a,pl(ts(1a,1rp),ts(2a,pl(1rp,1rp)))),pl(pl(1a,ts(1a,1rp)),ts(2a,pl(1rp,1rp))),pl(pl(1a,1a),pl(2a,2a)),asspl2(1a,ts(1a,1rp),ts(2a,pl(1rp,1rp))),ispl12(pl(1a,ts(1a,1rp)),pl(1a,1a),ts(2a,pl(1rp,1rp)),pl(2a,2a),ispl2(ts(1a,1rp),1a,1a,satz151(1a)),a2isapa(2a))):is(pl(1a,pl(ts(1a,1rp),ts(2a,pl(1rp,1rp)))),pl(pl(1a,1a),pl(2a,2a)))
-t3:=tris2(cut,pl(pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),2a),pl(1a,pl(ts(1a,1rp),ts(2a,pl(1rp,1rp)))),pl(pl(1a,1a),pl(2a,2a)),t1,t2):is(pl(pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),2a),pl(1a,pl(ts(1a,1rp),ts(2a,pl(1rp,1rp)))))
--4d195
-a@satzd195:=treq(td(a,1df),df(pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),pl(ts(1a,1rp),ts(2a,pl(1rp,1rp)))),a,tdeq1a(a,pl(1rp,1rp),1rp),eqi2(a,pl(ts(1a,pl(1rp,1rp)),ts(2a,1rp)),pl(ts(1a,1rp),ts(2a,pl(1rp,1rp))),t3".4d195")):eq(td(a,1df),a)
-satzd195a:=symeq(td(a,1df),a,satzd195):eq(a,td(a,1df))
-satzd195b:=treq(td(1df,a),td(a,1df),a,comtd(1df,a),satzd195):eq(td(1df,a),a)
-satzd195c:=symeq(td(1df,a),a,satzd195b):eq(a,td(1df,a))
-b@[p:posd(a)][q:posd(b)]
-satzd196a:=symeq(td(absd(a),absd(b)),td(a,b),eqtd12(absd(a),a,absd(b),b,absnnd(a,pnotnd(a,p)),absnnd(b,pnotnd(b,q)))):eq(td(a,b),td(absd(a),absd(b)))
-b@[n:negd(a)][o:negd(b)]
-satzd196b:=treq2(td(a,b),td(absd(a),absd(b)),td(m0d(a),m0d(b)),satzd198a(a,b),eqtd12(absd(a),m0d(a),absd(b),m0d(b),absnd(a,n),absnd(b,o))):eq(td(a,b),td(absd(a),absd(b)))
-b@[p:posd(a)][n:negd(b)]
-satzd196c:=treq1(td(a,b),m0d(td(absd(a),absd(b))),td(absd(a),m0d(absd(b))),eqtd12(absd(a),a,m0d(absd(b)),b,absnnd(a,pnotnd(a,p)),satzd177b(absd(b),b,absnd(b,n))),satzd197b(absd(a),absd(b))):eq(td(a,b),m0d(td(absd(a),absd(b))))
-b@[n:negd(a)][p:posd(b)]
-satzd196d:=tr3eq(td(a,b),td(b,a),m0d(td(absd(b),absd(a))),m0d(td(absd(a),absd(b))),comtd(a,b),satzd196c(b,a,p,n),eqm0d(td(absd(b),absd(a)),td(absd(a),absd(b)),comtd(absd(b),absd(a)))):eq(td(a,b),m0d(td(absd(a),absd(b))))
-+4d196
-b@p1p2:=and(posd(a),posd(b)):'prop'
-p1n2:=and(posd(a),negd(b)):'prop'
-n1p2:=and(negd(a),posd(b)):'prop'
-n1n2:=and(negd(a),negd(b)):'prop'
--4d196
-b@[n:not(zero(a))][o:not(zero(b))][e:eq(td(a,b),td(absd(a),absd(b)))]
-+*4d196
-o@t1:=ptdpp(absd(a),absd(b),satzd166e(a,n),satzd166e(b,o)):posd(td(absd(a),absd(b)))
-e@t2:=pnotnd(td(a,b),eqposd(td(absd(a),absd(b)),td(a,b),symeq(td(a,b),td(absd(a),absd(b)),e),t1)):not(negd(td(a,b)))
-[p:posd(a)]
-t3:=th3"l.imp"(negd(b),negd(td(a,b)),t2,[t:negd(b)]ntdpn(a,b,p,t)):not(negd(b))
-t4:=or3e2(zero(b),posd(b),negd(b),axrdo(b),t3,o):posd(b)
-t5:=andi(posd(a),posd(b),p,t4):p1p2
-t6:=ori1(p1p2,n1n2,t5):or(p1p2,n1n2)
-e@[m:negd(a)]
-t7:=th3"l.imp"(posd(b),negd(td(a,b)),t2,[t:posd(b)]ntdnp(a,b,m,t)):not(posd(b))
-t8:=or3e3(zero(b),posd(b),negd(b),axrdo(b),o,t7):negd(b)
-t9:=andi(negd(a),negd(b),m,t8):n1n2
-t10:=ori2(p1p2,n1n2,t9):or(p1p2,n1n2)
--4d196
-e@satzd196e:=rappd(a,or(p1p2".4d196",n1n2".4d196"),[t:posd(a)]t6".4d196"(t),th2"l.imp"(zero(a),or(p1p2".4d196",n1n2".4d196"),n),[t:negd(a)]t10".4d196"(t)):or(and(posd(a),posd(b)),and(negd(a),negd(b)))
-o@[e:eq(td(a,b),m0d(td(absd(a),absd(b))))]
-+*4d196
-o@t11:=satzd176a(td(absd(a),absd(b)),t1):negd(m0d(td(absd(a),absd(b))))
-e@t12:=nnotpd(td(a,b),eqnegd(m0d(td(absd(a),absd(b))),td(a,b),symeq(td(a,b),m0d(td(absd(a),absd(b))),e),t11)):not(posd(td(a,b)))
-[p:posd(a)]
-t13:=th3"l.imp"(posd(b),posd(td(a,b)),t12,[t:posd(b)]ptdpp(a,b,p,t)):not(posd(b))
-t14:=or3e3(zero(b),posd(b),negd(b),axrdo(b),o,t13):negd(b)
-t15:=andi(posd(a),negd(b),p,t14):p1n2
-t16:=ori1(p1n2,n1p2,t15):or(p1n2,n1p2)
-e@[m:negd(a)]
-t17:=th3"l.imp"(negd(b),posd(td(a,b)),t12,[t:negd(b)]ptdnn(a,b,m,t)):not(negd(b))
-t18:=or3e2(zero(b),posd(b),negd(b),axrdo(b),t17,o):posd(b)
-t19:=andi(negd(a),posd(b),m,t18):n1p2
-t20:=ori2(p1n2,n1p2,t19):or(p1n2,n1p2)
--4d196
-e@satzd196f:=rappd(a,or(p1n2".4d196",n1p2".4d196"),[t:posd(a)]t16".4d196"(t),th2"l.imp"(zero(a),or(p1n2".4d196",n1p2".4d196"),n),[t:negd(a)]t20".4d196"(t)):or(and(posd(a),negd(b)),and(negd(a),posd(b)))
-+4d199
-@[p:cut][q:cut][r:cut][s:cut][t:cut][u:cut]
-t1:=tris(cut,ts(pl(ts(p,r),ts(q,s)),t),pl(ts(ts(p,r),t),ts(ts(q,s),t)),pl(ts(p,ts(r,t)),ts(q,ts(s,t))),disttp1(ts(p,r),ts(q,s),t),ispl12(ts(ts(p,r),t),ts(p,ts(r,t)),ts(ts(q,s),t),ts(q,ts(s,t)),assts1(p,r,t),assts1(q,s,t))):is(ts(pl(ts(p,r),ts(q,s)),t),pl(ts(p,ts(r,t)),ts(q,ts(s,t))))
-t2:=tris(cut,pl(ts(q,ts(s,t)),ts(q,ts(r,u))),pl(ts(q,ts(r,u)),ts(q,ts(s,t))),ts(q,pl(ts(r,u),ts(s,t))),compl(ts(q,ts(s,t)),ts(q,ts(r,u))),distpt2(q,ts(r,u),ts(s,t))):is(pl(ts(q,ts(s,t)),ts(q,ts(r,u))),ts(q,pl(ts(r,u),ts(s,t))))
-t3:=tr3is(cut,pl(ts(pl(ts(p,r),ts(q,s)),t),ts(pl(ts(p,s),ts(q,r)),u)),pl(pl(ts(p,ts(r,t)),ts(q,ts(s,t))),pl(ts(p,ts(s,u)),ts(q,ts(r,u)))),pl(pl(ts(p,ts(r,t)),ts(p,ts(s,u))),pl(ts(q,ts(s,t)),ts(q,ts(r,u)))),pl(ts(p,pl(ts(r,t),ts(s,u))),ts(q,pl(ts(r,u),ts(s,t)))),ispl12(ts(pl(ts(p,r),ts(q,s)),t),pl(ts(p,ts(r,t)),ts(q,ts(s,t))),ts(pl(ts(p,s),ts(q,r)),u),pl(ts(p,ts(s,u)),ts(q,ts(r,u))),t1,t1(p,q,s,r,u,t)),4pl23(ts(p,ts(r,t)),ts(q,ts(s,t)),ts(p,ts(s,u)),ts(q,ts(r,u))),ispl12(pl(ts(p,ts(r,t)),ts(p,ts(s,u))),ts(p,pl(ts(r,t),ts(s,u))),pl(ts(q,ts(s,t)),ts(q,ts(r,u))),ts(q,pl(ts(r,u),ts(s,t))),distpt2(p,ts(r,t),ts(s,u)),t2)):is(pl(ts(pl(ts(p,r),ts(q,s)),t),ts(pl(ts(p,s),ts(q,r)),u)),pl(ts(p,pl(ts(r,t),ts(s,u))),ts(q,pl(ts(r,u),ts(s,t)))))
--4d199
-c@satzd199:=tr3eq(td(td(a,b),c),df(pl(ts(pl(ts(1a,1b),ts(2a,2b)),1c),ts(pl(ts(1a,2b),ts(2a,1b)),2c)),pl(ts(pl(ts(1a,1b),ts(2a,2b)),2c),ts(pl(ts(1a,2b),ts(2a,1b)),1c))),df(pl(ts(1a,pl(ts(1b,1c),ts(2b,2c))),ts(2a,pl(ts(1b,2c),ts(2b,1c)))),pl(ts(1a,pl(ts(1b,2c),ts(2b,1c))),ts(2a,pl(ts(1b,1c),ts(2b,2c))))),td(a,td(b,c)),tdeq2a(c,pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b))),eqsmsd(pl(ts(pl(ts(1a,1b),ts(2a,2b)),1c),ts(pl(ts(1a,2b),ts(2a,1b)),2c)),pl(ts(pl(ts(1a,1b),ts(2a,2b)),2c),ts(pl(ts(1a,2b),ts(2a,1b)),1c)),pl(ts(1a,pl(ts(1b,1c),ts(2b,2c))),ts(2a,pl(ts(1b,2c),ts(2b,1c)))),pl(ts(1a,pl(ts(1b,2c),ts(2b,1c))),ts(2a,pl(ts(1b,1c),ts(2b,2c)))),t3".4d199"(1a,2a,1b,2b,1c,2c),t3".4d199"(1a,2a,1b,2b,2c,1c)),tdeq1b(a,pl(ts(1b,1c),ts(2b,2c)),pl(ts(1b,2c),ts(2b,1c)))):eq(td(td(a,b),c),td(a,td(b,c)))
-asstd1:=satzd199:eq(td(td(a,b),c),td(a,td(b,c)))
-asstd2:=symeq(td(td(a,b),c),td(a,td(b,c)),satzd199):eq(td(a,td(b,c)),td(td(a,b),c))
-+4d201
-@[p:cut][q:cut][r:cut][s:cut][t:cut][u:cut]
-t1:=tris(cut,pl(ts(p,pl(r,t)),ts(q,pl(s,u))),pl(pl(ts(p,r),ts(p,t)),pl(ts(q,s),ts(q,u))),pl(pl(ts(p,r),ts(q,s)),pl(ts(p,t),ts(q,u))),ispl12(ts(p,pl(r,t)),pl(ts(p,r),ts(p,t)),ts(q,pl(s,u)),pl(ts(q,s),ts(q,u)),disttp2(p,r,t),disttp2(q,s,u)),4pl23(ts(p,r),ts(p,t),ts(q,s),ts(q,u))):is(pl(ts(p,pl(r,t)),ts(q,pl(s,u))),pl(pl(ts(p,r),ts(q,s)),pl(ts(p,t),ts(q,u))))
--4d201
-satzd201:=tr3eq(td(a,pd(b,c)),df(pl(ts(1a,pl(1b,1c)),ts(2a,pl(2b,2c))),pl(ts(1a,pl(2b,2c)),ts(2a,pl(1b,1c)))),df(pl(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,1c),ts(2a,2c))),pl(pl(ts(1a,2b),ts(2a,1b)),pl(ts(1a,2c),ts(2a,1c)))),pd(td(a,b),td(a,c)),tdeq1a(a,pl(1b,1c),pl(2b,2c)),eqsmsd(pl(ts(1a,pl(1b,1c)),ts(2a,pl(2b,2c))),pl(ts(1a,pl(2b,2c)),ts(2a,pl(1b,1c))),pl(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,1c),ts(2a,2c))),pl(pl(ts(1a,2b),ts(2a,1b)),pl(ts(1a,2c),ts(2a,1c))),t1".4d201"(1a,2a,1b,2b,1c,2c),t1".4d201"(1a,2a,2b,1b,2c,1c)),pdeq12b(pl(ts(1a,1b),ts(2a,2b)),pl(ts(1a,2b),ts(2a,1b)),pl(ts(1a,1c),ts(2a,2c)),pl(ts(1a,2c),ts(2a,1c)))):eq(td(a,pd(b,c)),pd(td(a,b),td(a,c)))
-disttpd1:=tr3eq(td(pd(a,b),c),td(c,pd(a,b)),pd(td(c,a),td(c,b)),pd(td(a,c),td(b,c)),comtd(pd(a,b),c),satzd201(c,a,b),eqpd12(td(c,a),td(a,c),td(c,b),td(b,c),comtd(c,a),comtd(c,b))):eq(td(pd(a,b),c),pd(td(a,c),td(b,c)))
-disttpd2:=satzd201:eq(td(a,pd(b,c)),pd(td(a,b),td(a,c)))
-distptd1:=symeq(td(pd(a,b),c),pd(td(a,c),td(b,c)),disttpd1):eq(pd(td(a,c),td(b,c)),td(pd(a,b),c))
-distptd2:=symeq(td(a,pd(b,c)),pd(td(a,b),td(a,c)),disttpd2):eq(pd(td(a,b),td(a,c)),td(a,pd(b,c)))
-satzd202:=treq(td(a,md(b,c)),pd(td(a,b),td(a,m0d(c))),md(td(a,b),td(a,c)),disttpd2(a,b,m0d(c)),eqpd2(td(a,m0d(c)),m0d(td(a,c)),td(a,b),satzd197b(a,c))):eq(td(a,md(b,c)),md(td(a,b),td(a,c)))
-disttmd1:=treq(td(md(a,b),c),pd(td(a,c),td(m0d(b),c)),md(td(a,c),td(b,c)),disttpd1(a,m0d(b),c),eqpd2(td(m0d(b),c),m0d(td(b,c)),td(a,c),satzd197a(b,c))):eq(td(md(a,b),c),md(td(a,c),td(b,c)))
-disttmd2:=satzd202:eq(td(a,md(b,c)),md(td(a,b),td(a,c)))
-distmtd1:=symeq(td(md(a,b),c),md(td(a,c),td(b,c)),disttmd1):eq(md(td(a,c),td(b,c)),td(md(a,b),c))
-distmtd2:=symeq(td(a,md(b,c)),md(td(a,b),td(a,c)),disttmd2):eq(md(td(a,b),td(a,c)),td(a,md(b,c)))
-satzd200:=satzd202:eq(td(a,md(b,c)),md(td(a,b),td(a,c)))
-[m:mored(a,b)]
-+4d203
-t1:=satzd182d(a,b,m):posd(md(a,b))
--4d203
-[p:posd(c)]
-+*4d203
-p@t2:=eqposd(td(md(a,b),c),md(td(a,c),td(b,c)),disttmd1(a,b,c),ptdpp(md(a,b),c,t1,p)):posd(md(td(a,c),td(b,c)))
--4d203
-p@satzd203a:=satzd182a(td(a,c),td(b,c),t2".4d203"):mored(td(a,c),td(b,c))
-m@[z:zero(c)]
-satzd203b:=zeroeq(td(a,c),td(b,c),td02(a,c,z),td02(b,c,z)):eq(td(a,c),td(b,c))
-m@[n:negd(c)]
-+*4d203
-n@t3:=eqnegd(td(md(a,b),c),md(td(a,c),td(b,c)),disttmd1(a,b,c),ntdpn(md(a,b),c,t1,n)):negd(md(td(a,c),td(b,c)))
--4d203
-n@satzd203c:=satzd182c(td(a,c),td(b,c),t3".4d203"):lessd(td(a,c),td(b,c))
-p@satzd203d:=eqmored12(td(a,c),td(c,a),td(b,c),td(c,b),comtd(a,c),comtd(b,c),satzd203a):mored(td(c,a),td(c,b))
-z@satzd203e:=zeroeq(td(c,a),td(c,b),td01(c,a,z),td01(c,b,z)):eq(td(c,a),td(c,b))
-n@satzd203f:=eqlessd12(td(a,c),td(c,a),td(b,c),td(c,b),comtd(a,c),comtd(b,c),satzd203c):lessd(td(c,a),td(c,b))
-c@[l:lessd(a,b)][p:posd(c)]
-satzd203g:=lemmad5(td(b,c),td(a,c),satzd203a(b,a,c,lemmad6(a,b,l),p)):lessd(td(a,c),td(b,c))
-l@[z:zero(c)]
-satzd203h:=zeroeq(td(a,c),td(b,c),td02(a,c,z),td02(b,c,z)):eq(td(a,c),td(b,c))
-l@[n:negd(c)]
-satzd203j:=lemmad6(td(b,c),td(a,c),satzd203c(b,a,c,lemmad6(a,b,l),n)):mored(td(a,c),td(b,c))
-p@satzd203k:=lemmad5(td(c,b),td(c,a),satzd203d(b,a,c,lemmad6(a,b,l),p)):lessd(td(c,a),td(c,b))
-z@satzd203l:=zeroeq(td(c,a),td(c,b),td01(c,a,z),td01(c,b,z)):eq(td(c,a),td(c,b))
-n@satzd203m:=lemmad6(td(c,b),td(c,a),satzd203f(b,a,c,lemmad6(a,b,l),n)):mored(td(c,a),td(c,b))
-+*iv4d
-@[p:cut][q:cut]
-t19:=tris(cut,ts(q,pl(p,1rp)),pl(ts(q,p),ts(q,1rp)),pl(ts(q,p),q),disttp2(q,p,1rp),ispl2(ts(q,1rp),q,ts(q,p),satz151(q))):is(ts(q,pl(p,1rp)),pl(ts(q,p),q))
-[r:cut]
-t20:=tris(cut,pl(ts(q,pl(p,1rp)),ts(r,1rp)),pl(pl(ts(q,p),q),r),pl(ts(q,p),pl(q,r)),ispl12(ts(q,pl(p,1rp)),pl(ts(q,p),q),ts(r,1rp),r,t19,satz151(r)),asspl1(ts(q,p),q,r)):is(pl(ts(q,pl(p,1rp)),ts(r,1rp)),pl(ts(q,p),pl(q,r)))
-t21:=tr3is(cut,pl(ts(r,1rp),ts(q,pl(p,1rp))),pl(ts(q,pl(p,1rp)),ts(r,1rp)),pl(ts(q,p),pl(q,r)),pl(ts(q,p),pl(r,q)),compl(ts(r,1rp),ts(q,pl(p,1rp))),t20,ispl2(pl(q,r),pl(r,q),ts(q,p),compl(q,r))):is(pl(ts(r,1rp),ts(q,pl(p,1rp))),pl(ts(q,p),pl(r,q)))
-a@[p:posd(a)]
-arp:=rpofpd(a,p):cut
-arpi:=ov(1rp,arp):cut
-ai:=pdofrp(arpi):dif
-t22:=tr3eq(td(a,ai),df(pl(ts(1a,pl(arpi,1rp)),ts(2a,1rp)),pl(ts(1a,1rp),ts(2a,pl(arpi,1rp)))),df(pl(ts(1a,arpi),pl(1a,2a)),pl(ts(2a,arpi),pl(1a,2a))),df(ts(1a,arpi),ts(2a,arpi)),tdeq1a(a,pl(arpi,1rp),1rp),eqsmsd(pl(ts(1a,pl(arpi,1rp)),ts(2a,1rp)),pl(ts(1a,1rp),ts(2a,pl(arpi,1rp))),pl(ts(1a,arpi),pl(1a,2a)),pl(ts(2a,arpi),pl(1a,2a)),t20(arpi,1a,2a),t21(arpi,2a,1a)),lemmad2(ts(1a,arpi),ts(2a,arpi),pl(1a,2a))):eq(td(a,ai),df(ts(1a,arpi),ts(2a,arpi)))
-t23:=tr3is(cut,ts(1a,arpi),ts(pl(2a,arp),arpi),pl(ts(2a,arpi),ts(arp,arpi)),pl(ts(2a,arpi),1rp),ists1(1a,pl(2a,arp),arpi,satz140d(1a,2a,p)),disttp1(2a,arp,arpi),ispl2(ts(arp,arpi),1rp,ts(2a,arpi),satz153c(1rp,arp))):is(ts(1a,arpi),pl(ts(2a,arpi),1rp))
-t24:=tr3is(cut,pl(ts(1a,arpi),1rp),pl(pl(ts(2a,arpi),1rp),1rp),pl(ts(2a,arpi),pl(1rp,1rp)),pl(pl(1rp,1rp),ts(2a,arpi)),ispl1(ts(1a,arpi),pl(ts(2a,arpi),1rp),1rp,t23),asspl1(ts(2a,arpi),1rp,1rp),compl(ts(2a,arpi),pl(1rp,1rp))):is(pl(ts(1a,arpi),1rp),pl(pl(1rp,1rp),ts(2a,arpi)))
-t25:=eqi12(ts(1a,arpi),ts(2a,arpi),pl(1rp,1rp),1rp,t24):eq(df(ts(1a,arpi),ts(2a,arpi)),1df)
-t26:=treq(td(a,ai),df(ts(1a,arpi),ts(2a,arpi)),1df,t22,t25):eq(td(a,ai),1df)
-t27:=somei(dif,[x:dif]eq(td(a,x),1df),ai,t26):some"l"(dif,[x:dif]eq(td(a,x),1df))
-a@[n:negd(a)]
-t28:=satzd176c(a,n):posd(m0d(a))
-[h:dif][e:eq(td(m0d(a),h),1df)]
-t29:=treq(td(a,m0d(h)),td(m0d(a),h),1df,satzd197d(a,h),e):eq(td(a,m0d(h)),1df)
-t30:=somei(dif,[x:dif]eq(td(a,x),1df),m0d(h),t29):some"l"(dif,[x:dif]eq(td(a,x),1df))
-n@t31:=someapp(dif,[x:dif]eq(td(m0d(a),x),1df),t27(m0d(a),t28),some"l"(dif,[x:dif]eq(td(a,x),1df)),[x:dif][t:eq(td(m0d(a),x),1df)]t30(x,t)):some"l"(dif,[x:dif]eq(td(a,x),1df))
--iv4d
-a@[n:not(zero(a))]
-lemmad7:=rappd(a,some"l"(dif,[x:dif]eq(td(a,x),1df)),[t:posd(a)]t27".iv4d"(t),th2"l.imp"(zero(a),some"l"(dif,[x:dif]eq(td(a,x),1df)),n),[t:negd(a)]t31".iv4d"(t)):some"l"(dif,[x:dif]eq(td(a,x),1df))
-b@[n:not(zero(b))][h:dif][k:dif][e:eq(td(b,h),a)][f:eq(td(b,k),a)]
-+4d204
-t1:=treq2(td(b,h),td(b,k),a,e,f):eq(td(b,h),td(b,k))
-t2:=eqzero(md(td(b,h),td(b,k)),td(b,md(h,k)),distmtd2(b,h,k),satzd182e(td(b,h),td(b,k),t1)):zero(td(b,md(h,k)))
-t3:=ore2(zero(b),zero(md(h,k)),satzd192c(b,md(h,k),t2),n):zero(md(h,k))
--4d204
-satzd204b:=satzd182b(h,k,t3".4d204"):eq(h,k)
-+*4d204
-n@[h:dif][e:eq(td(b,h),1df)]
-t4:=tr3eq(td(b,td(h,a)),td(td(b,h),a),td(1df,a),a,asstd2(b,h,a),eqtd1(td(b,h),1df,a,e),satzd195b(a)):eq(td(b,td(h,a)),a)
-t5:=somei(dif,[x:dif]eq(td(b,x),a),td(h,a),t4):some"l"(dif,[x:dif]eq(td(b,x),a))
--4d204
-n@satzd204a:=someapp(dif,[x:dif]eq(td(b,x),1df),lemmad7(b,n),some"l"(dif,[x:dif]eq(td(b,x),a)),[x:dif][t:eq(td(b,x),1df)]t5".4d204"(x,t)):some"l"(dif,[x:dif]eq(td(b,x),a))
-@[r:cut][s:cut][m:more(r,s)]
-+iv5d
-t1:=ismore12(pl(r,pl(1rp,1rp)),pl(pl(r,1rp),1rp),pl(s,pl(1rp,1rp)),pl(pl(s,1rp),1rp),asspl2(r,1rp,1rp),asspl2(s,1rp,1rp),satz134(r,s,pl(1rp,1rp),m)):more(pl(pl(r,1rp),1rp),pl(pl(s,1rp),1rp))
--iv5d
-morerpepd:=moredi12(pl(r,1rp),1rp,pl(s,1rp),1rp,t1".iv5d"):mored(pdofrp(r),pdofrp(s))
-s@[m:mored(pdofrp(r),pdofrp(s))]
-+*iv5d
-m@t2:=morede12(pl(r,1rp),1rp,pl(s,1rp),1rp,m):more(pl(pl(r,1rp),1rp),pl(pl(s,1rp),1rp))
--iv5d
-m@morerpipd:=satz136a(r,s,pl(1rp,1rp),ismore12(pl(pl(r,1rp),1rp),pl(r,pl(1rp,1rp)),pl(pl(s,1rp),1rp),pl(s,pl(1rp,1rp)),asspl1(r,1rp,1rp),asspl1(s,1rp,1rp),t2".iv5d")):more(r,s)
-s@[l:less(r,s)]
-lessrpepd:=lemmad5(pdofrp(s),pdofrp(r),morerpepd(s,r,satz122(r,s,l))):lessd(pdofrp(r),pdofrp(s))
-s@[l:lessd(pdofrp(r),pdofrp(s))]
-lessrpipd:=satz121(s,r,morerpipd(s,r,lemmad6(pdofrp(r),pdofrp(s),l))):less(r,s)
-+*iv5d
-@i:=1rp:cut
-2:=pl(i,i):cut
-r@rp1:=pl(r,i):cut
-s@sp1:=pl(s,i):cut
-rps:=pl(r,s):cut
-rs:=ts(r,s):cut
-t3:=tris(cut,pl(pl(rp1,sp1),i),pl(pl(rps,2),i),pl(pl(rps,i),2),ispl1(pl(rp1,sp1),pl(rps,2),i,4pl23(r,i,s,i)),3pl23(rps,2,i)):is(pl(pl(rp1,sp1),i),pl(pl(rps,i),2))
-t4:=treq(pd(pdofrp(r),pdofrp(s)),df(pl(rp1,sp1),2),pdofrp(rps),pdeq12a(rp1,i,sp1,i),eqi12(pl(rp1,sp1),2,pl(rps,i),i,t3)):eq(pd(pdofrp(r),pdofrp(s)),pdofrp(rps))
--iv5d
-s@lemmad8:=t4".iv5d":eq(pd(pdofrp(r),pdofrp(s)),pdofrp(pl(r,s)))
-+*iv5d
-s@t5:=tris(cut,ts(r,sp1),pl(rs,ts(r,i)),pl(rs,r),disttp2(r,s,i),ispl2(ts(r,i),r,rs,satz151(r))):is(ts(r,sp1),pl(rs,r))
-t6:=tr4is(cut,ts(rp1,sp1),pl(ts(r,sp1),ts(i,sp1)),pl(pl(rs,r),sp1),pl(pl(pl(rs,r),s),i),pl(pl(rs,rps),i),disttp1(r,i,sp1),ispl12(ts(r,sp1),pl(rs,r),ts(i,sp1),sp1,t5,satz151b(sp1)),asspl2(pl(rs,r),s,i),ispl1(pl(pl(rs,r),s),pl(rs,rps),i,asspl1(rs,r,s))):is(ts(rp1,sp1),pl(pl(rs,rps),i))
-t7:=tr3is(cut,pl(ts(rp1,sp1),ts(i,i)),pl(pl(pl(rs,rps),i),i),pl(pl(rs,rps),2),pl(rs,pl(rps,2)),ispl12(ts(rp1,sp1),pl(pl(rs,rps),i),ts(i,i),i,t6,satz151(i)),asspl1(pl(rs,rps),i,i),asspl1(rs,rps,2)):is(pl(ts(rp1,sp1),ts(i,i)),pl(rs,pl(rps,2)))
-t8:=tris(cut,pl(ts(rp1,i),ts(i,sp1)),pl(rp1,sp1),pl(rps,2),ispl12(ts(rp1,i),rp1,ts(i,sp1),sp1,satz151(rp1),satz151b(sp1)),4pl23(r,i,s,i)):is(pl(ts(rp1,i),ts(i,sp1)),pl(rps,2))
-t9:=tris(cut,pl(pl(rs,i),pl(ts(rp1,i),ts(i,sp1))),pl(pl(rs,i),pl(rps,2)),pl(pl(rs,pl(rps,2)),i),ispl2(pl(ts(rp1,i),ts(i,sp1)),pl(rps,2),pl(rs,i),t8),3pl23(rs,i,pl(rps,2))):is(pl(pl(rs,i),pl(ts(rp1,i),ts(i,sp1))),pl(pl(rs,pl(rps,2)),i))
-t10:=tris2(cut,pl(pl(ts(rp1,sp1),ts(i,i)),i),pl(pl(rs,i),pl(ts(rp1,i),ts(i,sp1))),pl(pl(rs,pl(rps,2)),i),ispl1(pl(ts(rp1,sp1),ts(i,i)),pl(rs,pl(rps,2)),i,t7),t9):is(pl(pl(ts(rp1,sp1),ts(i,i)),i),pl(pl(rs,i),pl(ts(rp1,i),ts(i,sp1))))
-t11:=treq(td(pdofrp(r),pdofrp(s)),df(pl(ts(rp1,sp1),ts(i,i)),pl(ts(rp1,i),ts(i,sp1))),pdofrp(rs),tdeq12a(rp1,i,sp1,i),eqi12(pl(ts(rp1,sp1),ts(i,i)),pl(ts(rp1,i),ts(i,sp1)),pl(rs,i),i,t10)):eq(td(pdofrp(r),pdofrp(s)),pdofrp(rs))
--iv5d
-s@lemmad9:=t11".iv5d":eq(td(pdofrp(r),pdofrp(s)),pdofrp(ts(r,s)))
-@[r:cut][s0:set(cut)]
-in:=esti(cut,r,s0):'prop'
-@[s0:set(cut)][t0:set(cut)][p0:all([x:cut]or(in(x,s0),in(x,t0)))][p1a:nonempty(cut,s0)][p1b:nonempty(cut,t0)][p2:all([x:cut][t:in(x,s0)]all([y:cut][u:in(y,t0)]less(x,y)))]
-+5p205
-t0@[r:cut]
-prop1:=all([x:cut][t:less(x,r)]in(x,s0)):'prop'
-prop2:=all([x:cut][t:more(x,r)]in(x,t0)):'prop'
-prop3:=and(prop1,prop2):'prop'
-p2@[r1:cut][r2:cut][pr1:prop3(r1)][pr2:prop3(r2)]
-t1:=ande2(prop1(r1),prop2(r1),pr1):prop2(r1)
-t2:=ande1(prop1(r2),prop2(r2),pr2):prop1(r2)
-[l:less(r1,r2)][x0:rat]
-rx:=rpofrt(x0):cut
-[l1:less(r1,rx)][l2:less(rx,r2)]
-t3:=<l2><rx>t2:in(rx,s0)
-t4:=<satz122(r1,rx,l1)><rx>t1:in(rx,t0)
-t5:=<refis(cut,rx)>ec3e31(is(rx,rx),more(rx,rx),less(rx,rx),satz123b(rx,rx),<t4><rx><t3><rx>p2):con
-l@t6:=satz159app(r1,r2,l,con,[x:rat][t:less(r1,rpofrt(x))][u:less(rpofrt(x),r2)]t5(x,t,u)):con
-pr2@t7:=[t:less(r1,r2)]t6(t):not(less(r1,r2))
-t8:=[t:more(r1,r2)]t6(r2,r1,pr2,pr1,satz121(r1,r2,t)):not(more(r1,r2))
-t9:=or3e1(is(r1,r2),more(r1,r2),less(r1,r2),satz123a(r1,r2),t8,t7):is(r1,r2)
-p2@t10:=[x:cut][y:cut][t:prop3(x)][u:prop3(y)]t9(x,y,t,u):amone(cut,[x:cut]prop3(x))
-[x0:rat]
-schnittprop:=some([y:cut]and(in(y,s0),lrt(y,x0))):'prop'
-p2@schnittset:=setof(rat,[x:rat]schnittprop(x)):set(rat)
-[r:cut][i:in(r,s0)][x0:rat][lx:lrt(r,x0)]
-t11:=andi(in(r,s0),lrt(r,x0),i,lx):and(in(r,s0),lrt(r,x0))
-t12:=somei(cut,[y:cut]and(in(y,s0),lrt(y,x0)),r,t11):schnittprop(x0)
-t13:=estii(rat,[x:rat]schnittprop(x),x0,t12):in"rt"(x0,schnittset)
-r@[i:in(r,t0)][x0:rat][ux:urt(r,x0)][s:cut][j:in(s,s0)]
-t14:=satz122(s,r,<i><r><j><s>p2):more(r,s)
-t15:=satz158b(r,x0,ux):moreis(rpofrt(x0),r)
-t16:=moreisi1(rpofrt(x0),s,satz127c(rpofrt(x0),r,s,t15,t14)):moreis(rpofrt(x0),s)
-t17:=satz158d(s,x0,t16):urt(s,x0)
-s@t18:=weli(ec(in(s,s0),lrt(s,x0)),[t:in(s,s0)]t17(t)):not(and(in(s,s0),lrt(s,x0)))
-ux@t19:=th5"l.some"(cut,[y:cut]and(in(y,s0),lrt(y,x0)),[y:cut]t18(y)):not(schnittprop(x0))
-t20:=th3"l.imp"(in"rt"(x0,schnittset),schnittprop(x0),t19,[t:in"rt"(x0,schnittset)]estie(rat,[x:rat]schnittprop(x),x0,t)):not(in"rt"(x0,schnittset))
-p2@[x0:rat][i:in"rt"(x0,schnittset)][y0:rat][l:less"rt"(y0,x0)]
-i@t21:=estie(rat,[x:rat]schnittprop(x),x0,i):schnittprop(x0)
-l@[r:cut][a:and(in(r,s0),lrt(r,x0))]
-t22:=ande1(in(r,s0),lrt(r,x0),a):in(r,s0)
-t23:=ande2(in(r,s0),lrt(r,x0),a):lrt(r,x0)
-t24:=satz120(r,x0,t23,y0,l):lrt(r,y0)
-t25:=andi(in(r,s0),lrt(r,y0),t22,t24):and(in(r,s0),lrt(r,y0))
-t26:=somei(cut,[y:cut]and(in(y,s0),lrt(y,y0)),r,t25):schnittprop(y0)
-l@t27:=someapp(cut,[y:cut]and(in(y,s0),lrt(y,x0)),t21,schnittprop(y0),[y:cut][r:and(in(y,s0),lrt(y,x0))]t26(y,r)):schnittprop(y0)
-t28:=estii(rat,[x:rat]schnittprop(x),y0,t27):in"rt"(y0,schnittset)
-i@[r:cut][a:and(in(r,s0),lrt(r,x0))]
-t29:=ande1(in(r,s0),lrt(r,x0),a):in(r,s0)
-t30:=ande2(in(r,s0),lrt(r,x0),a):lrt(r,x0)
-[y0:rat][ly:lrt(r,y0)][l:less"rt"(x0,y0)]
-t31:=andi(in(r,s0),lrt(r,y0),t29,ly):and(in(r,s0),lrt(r,y0))
-t32:=somei(cut,[y:cut]and(in(y,s0),lrt(y,y0)),r,t31):schnittprop(y0)
-t33:=estii(rat,[x:rat]schnittprop(x),y0,t32):in"rt"(y0,schnittset)
-t34:=satz83(x0,y0,l):more"rt"(y0,x0)
-t35:=andi(in"rt"(y0,schnittset),more"rt"(y0,x0),t33,t34):and(in"rt"(y0,schnittset),more"rt"(y0,x0))
-t36:=somei(rat,[y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0)),y0,t35):some"rt"([y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0)))
-a@t37:=cutapp3(r,x0,t30,some"rt"([y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0))),[y:rat][t:lrt(r,y)][u:less"rt"(x0,y)]t36(y,t,u)):some"rt"([y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0)))
-i@t38:=someapp(cut,[y:cut]and(in(y,s0),lrt(y,x0)),t21,some"rt"([y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0))),[y:cut][t:and(in(y,s0),lrt(y,x0))]t37(y,t)):some"rt"([y:rat]and(in"rt"(y,schnittset),more"rt"(y,x0)))
-p2@[r:cut][i:in(r,s0)][x0:rat][lx:lrt(r,x0)][s:cut][j:in(s,t0)][y0:rat][uy:urt(s,y0)]
-t39:=cut2(schnittset,x0,t13(r,i,x0,lx),y0,t20(s,j,y0,uy),[x:rat][t:in"rt"(x,schnittset)][y:rat][u:less"rt"(y,x)]t28(x,t,y,u),[x:rat][t:in"rt"(x,schnittset)]t38(x,t)):cutprop(schnittset)
-j@t40:=cutapp1b(s,cutprop(schnittset),[x:rat][t:urt(s,x)]t39(x,t)):cutprop(schnittset)
-lx@t41:=nonemptyapp(cut,t0,p1b,cutprop(schnittset),[y:cut][t:in(y,t0)]t40(y,t)):cutprop(schnittset)
-i@t42:=cutapp1a(r,cutprop(schnittset),[x:rat][t:lrt(r,x)]t41(x,t)):cutprop(schnittset)
-p2@t43:=nonemptyapp(cut,s0,p1a,cutprop(schnittset),[y:cut][t:in(y,s0)]t42(y,t)):cutprop(schnittset)
-snt:=cutof(schnittset,t43):cut
-[r:cut][l:less(r,snt)][x0:rat][ux:urt(r,x0)][lx:lrt(snt,x0)]
-t44:=ini(schnittset,t43,x0,lx):in"rt"(x0,schnittset)
-t45:=estie(rat,[x:rat]schnittprop(x),x0,t44):schnittprop(x0)
-[s:cut][a:and(in(s,s0),lrt(s,x0))]
-t46:=ande1(in(s,s0),lrt(s,x0),a):in(s,s0)
-t47:=ande2(in(s,s0),lrt(s,x0),a):lrt(s,x0)
-t48:=andi(urt(r,x0),lrt(s,x0),ux,t47):and(urt(r,x0),lrt(s,x0))
-t49:=somei(rat,[x:rat]and(urt(r,x),lrt(s,x)),x0,t48):less(r,s)
-t50:=ec3e23(is(s,r),more(s,r),less(s,r),satz123b(s,r),satz122(r,s,t49)):not(less(s,r))
-t51:=th3"l.imp"(in(r,t0),less(s,r),t50,<r><t46><s>p2):not(in(r,t0))
-t52:=ore1(in(r,s0),in(r,t0),<r>p0,t51):in(r,s0)
-lx@t53:=someapp(cut,[y:cut]and(in(y,s0),lrt(y,x0)),t45,in(r,s0),[y:cut][t:and(in(y,s0),lrt(y,x0))]t52(y,t)):in(r,s0)
-l@t54:=lessapp(r,snt,l,in(r,s0),[x:rat][t:urt(r,x)][u:lrt(snt,x)]t53(x,t,u)):in(r,s0)
-r@[m:more(r,snt)][x0:rat][lx:lrt(r,x0)][ux:urt(snt,x0)][i:in(r,s0)]
-t55:=andi(in(r,s0),lrt(r,x0),i,lx):and(in(r,s0),lrt(r,x0))
-t56:=somei(cut,[y:cut]and(in(y,s0),lrt(y,x0)),r,t55):schnittprop(x0)
-t57:=estii(rat,[x:rat]schnittprop(x),x0,t56):in"rt"(x0,schnittset)
-t58:=ine(schnittset,t43,x0,t57):lrt(snt,x0)
-ux@t59:=th3"l.imp"(in(r,s0),lrt(snt,x0),ux,[t:in(r,s0)]t58(t)):not(in(r,s0))
-t60:=ore2(in(r,s0),in(r,t0),<r>p0,t59):in(r,t0)
-m@t61:=moreapp(r,snt,m,in(r,t0),[x:rat][t:lrt(r,x)][u:urt(snt,x)]t60(x,t,u)):in(r,t0)
-p2@t62:=andi(prop1(snt),prop2(snt),[x:cut][t:less(x,snt)]t54(x,t),[x:cut][t:more(x,snt)]t61(x,t)):prop3(snt)
-t63:=somei(cut,[x:cut]prop3(x),snt,t62):some([x:cut]prop3(x))
--5p205
-satzp205:=onei(cut,[x:cut]prop3".5p205"(x),t10".5p205",t63".5p205"):one([x:cut]and(all([y:cut][t:less(y,x)]in(y,s0)),all([y:cut][t:more(y,x)]in(y,t0))))
-schnitt:=ind(cut,[x:cut]prop3".5p205"(x),satzp205):cut
-satzp205a:=ande1(prop1".5p205"(schnitt),prop2".5p205"(schnitt),oneax(cut,[x:cut]prop3".5p205"(x),satzp205)):all([x:cut][t:less(x,schnitt)]in(x,s0))
-satzp205b:=ande2(prop1".5p205"(schnitt),prop2".5p205"(schnitt),oneax(cut,[x:cut]prop3".5p205"(x),satzp205)):all([x:cut][t:more(x,schnitt)]in(x,t0))
-@[r:cut][s:cut]
-+ivad
-@i:=1rp:cut
-r@r1:=pl(r,i):cut
-s@s1:=pl(s,i):cut
-rps:=pl(r,s):cut
-@2:=pl(i,i):cut
-s@t1:=pdeq12a(r1,i,s1,i):eq(pd(pdofrp(r),pdofrp(s)),df(pl(r1,s1),2))
-t2:=tris(cut,pl(r1,s1),pl(rps,2),pl(pl(rps,i),i),4pl23(r,i,s,i),asspl2(rps,i,i)):is(pl(r1,s1),pl(pl(rps,i),i))
-t3:=ispl1(pl(r1,s1),pl(pl(rps,i),i),i,t2):is(pl(pl(r1,s1),i),pl(pl(pl(rps,i),i),i))
-t4:=tris(cut,pl(pl(r1,s1),i),pl(pl(pl(rps,i),i),i),pl(pl(rps,i),2),t3,asspl1(pl(rps,i),i,i)):is(pl(pl(r1,s1),i),pl(pl(rps,i),2))
-t5:=eqi12(pl(r1,s1),2,pl(rps,i),i,t4):eq(df(pl(r1,s1),2),pdofrp(rps))
--ivad
-lemmaivad1:=treq(pd(pdofrp(r),pdofrp(s)),df(pl(pl(r,1rp),pl(s,1rp)),pl(1rp,1rp)),pdofrp(pl(r,s)),t1".ivad",t5".ivad"):eq(pd(pdofrp(r),pdofrp(s)),pdofrp(pl(r,s)))
-+*ivad
-s@rs:=ts(r,s):cut
-t6:=tdeq12a(r1,i,s1,i):eq(td(pdofrp(r),pdofrp(s)),df(pl(ts(r1,s1),ts(i,i)),pl(ts(r1,i),ts(i,s1))))
-t7:=tris(cut,ts(r1,s),pl(rs,ts(i,s)),pl(rs,s),disttp1(r,i,s),ispl2(ts(i,s),s,rs,satz151b(s))):is(ts(r1,s),pl(rs,s))
-t8:=tr3is(cut,ts(r1,s1),pl(ts(r1,s),ts(r1,i)),pl(pl(rs,s),r1),pl(pl(rs,i),rps),disttp2(r1,s,i),ispl12(ts(r1,s),pl(rs,s),ts(r1,i),r1,t7,satz151(r1)),4pl24(rs,s,r,i)):is(ts(r1,s1),pl(pl(rs,i),rps))
-t9:=tris(cut,pl(ts(r1,s1),ts(i,i)),pl(pl(pl(rs,i),rps),i),pl(pl(rs,i),pl(rps,i)),ispl12(ts(r1,s1),pl(pl(rs,i),rps),ts(i,i),i,t8,satz151(i)),asspl1(pl(rs,i),rps,i)):is(pl(ts(r1,s1),ts(i,i)),pl(pl(rs,i),pl(rps,i)))
-t10:=tris(cut,pl(pl(ts(r1,s1),ts(i,i)),i),pl(pl(pl(rs,i),pl(rps,i)),i),pl(pl(rs,i),pl(pl(rps,i),i)),ispl1(pl(ts(r1,s1),ts(i,i)),pl(pl(rs,i),pl(rps,i)),i,t9),asspl1(pl(rs,i),pl(rps,i),i)):is(pl(pl(ts(r1,s1),ts(i,i)),i),pl(pl(rs,i),pl(pl(rps,i),i)))
-t11:=tr3is(cut,pl(pl(rps,i),i),pl(rps,2),pl(r1,s1),pl(ts(r1,i),ts(i,s1)),asspl1(rps,i,i),4pl23(r,s,i,i),ispl12(r1,ts(r1,i),s1,ts(i,s1),satz151a(r1),satz151c(s1))):is(pl(pl(rps,i),i),pl(ts(r1,i),ts(i,s1)))
-t12:=tris(cut,pl(pl(ts(r1,s1),ts(i,i)),i),pl(pl(rs,i),pl(pl(rps,i),i)),pl(pl(rs,i),pl(ts(r1,i),ts(i,s1))),t10,ispl2(pl(pl(rps,i),i),pl(ts(r1,i),ts(i,s1)),pl(rs,i),t11)):is(pl(pl(ts(r1,s1),ts(i,i)),i),pl(pl(rs,i),pl(ts(r1,i),ts(i,s1))))
-t13:=eqi12(pl(ts(r1,s1),ts(i,i)),pl(ts(r1,i),ts(i,s1)),pl(rs,i),i,t12):eq(df(pl(ts(r1,s1),ts(i,i)),pl(ts(r1,i),ts(i,s1))),pdofrp(rs))
--ivad
-s@lemmaivad2:=treq(td(pdofrp(r),pdofrp(s)),df(pl(ts(pl(r,1rp),pl(s,1rp)),ts(1rp,1rp)),pl(ts(pl(r,1rp),1rp),ts(1rp,pl(s,1rp)))),pdofrp(ts(r,s)),t6".ivad",t13".ivad"):eq(td(pdofrp(r),pdofrp(s)),pdofrp(ts(r,s)))
-[m:mored(pdofrp(r),pdofrp(s))]
-+*ivad
-m@t14:=morede12(r1,i,s1,i,m):more(pl(r1,i),pl(s1,i))
-t15:=satz136a(r1,s1,i,t14):more(r1,s1)
--ivad
-m@lemmaivad3:=satz136a(r,s,1rp,t15".ivad"):more(r,s)
-@[c:dif][a:dif][b:dif][n:not(negd(a))][o:not(negd(b))][e:eq(td(a,a),c)][f:eq(td(b,b),c)]
-+d161
-t1:=treq2(td(a,a),td(b,b),c,e,f):eq(td(a,a),td(b,b))
-t2:=treq(pd(md(td(a,a),td(a,b)),td(b,a)),pd(md(td(a,a),td(a,b)),td(a,b)),td(a,a),eqpd2(td(b,a),td(a,b),md(td(a,a),td(a,b)),comtd(b,a)),pdmd(td(a,a),td(a,b))):eq(pd(md(td(a,a),td(a,b)),td(b,a)),td(a,a))
-t3:=tr4eq(td(pd(a,b),md(a,b)),pd(td(a,md(a,b)),td(b,md(a,b))),pd(md(td(a,a),td(a,b)),md(td(b,a),td(b,b))),md(pd(md(td(a,a),td(a,b)),td(b,a)),td(b,b)),md(td(a,a),td(b,b)),disttpd1(a,b,md(a,b)),eqpd12(td(a,md(a,b)),md(td(a,a),td(a,b)),td(b,md(a,b)),md(td(b,a),td(b,b)),disttmd2(a,a,b),disttmd2(b,a,b)),asspd2(md(td(a,a),td(a,b)),td(b,a),m0d(td(b,b))),eqmd1(pd(md(td(a,a),td(a,b)),td(b,a)),td(a,a),td(b,b),t2)):eq(td(pd(a,b),md(a,b)),md(td(a,a),td(b,b)))
-t4:=eqzero(md(td(a,a),td(b,b)),td(pd(a,b),md(a,b)),symeq(td(pd(a,b),md(a,b)),md(td(a,a),td(b,b)),t3),satzd182e(td(a,a),td(b,b),t1)):zero(td(pd(a,b),md(a,b)))
-t5:=satzd192c(pd(a,b),md(a,b),t4):or(zero(pd(a,b)),zero(md(a,b)))
-[z:zero(a)]
-t6:=eqzero(td(a,a),td(b,b),t1,td01(a,a,z)):zero(td(b,b))
-t7:=th1"l.imp"(zero(b),zero(b),refimp(zero(b)),satzd192c(b,b,t6)):zero(b)
-t8:=zeroeq(a,b,z,t7):eq(a,b)
-f@[p:not(zero(a))]
-t9:=or3e2(zero(a),posd(a),negd(a),axrdo(a),n,p):posd(a)
-t10:=th3"l.imp"(zero(b),zero(a),p,[t:zero(b)]t7(b,a,o,n,f,e,t)):not(zero(b))
-t11:=t9(b,a,o,n,f,e,t10):posd(b)
-t12:=pnot0d(pd(a,b),ppd(a,b,t9,t11)):not(zero(pd(a,b)))
-t13:=ore2(zero(pd(a,b)),zero(md(a,b)),t5,t12):zero(md(a,b))
-t14:=satzd182b(a,b,t13):eq(a,b)
--d161
-satzd161b:=th1"l.imp"(zero(a),eq(a,b),[t:zero(a)]t8".d161"(t),[t:not(zero(a))]t14".d161"(t)):eq(a,b)
-c@[n:not(negd(c))]
-+*d161
-n@[z:zero(c)]
-t15:=zeroeq(td(c,c),c,td01(c,c,z),z):eq(td(c,c),c)
-t16:=andi(not(negd(c)),eq(td(c,c),c),n,t15):and(not(negd(c)),eq(td(c,c),c))
-t17:=somei(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c)),c,t16):some"l"(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c)))
-n@[o:not(zero(c))]
-t18:=or3e2(zero(c),posd(c),negd(c),axrdo(c),n,o):posd(c)
-crp:=rpofpd(c,t18):cut
-srp:=sqrt(crp):cut
-s:=pdofrp(srp):dif
-t19:=tr3eq(td(s,s),pdofrp(ts(srp,srp)),pdofrp(crp),c,lemmaivad2(srp,srp),isrpepd(ts(srp,srp),crp,thsqrt1(crp)),eqpdrp2(c,t18)):eq(td(s,s),c)
-t20:=andi(not(negd(s)),eq(td(s,s),c),pnotnd(s,posdirp(srp)),t19):and(not(negd(s)),eq(td(s,s),c))
-t21:=somei(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c)),s,t20):some"l"(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c)))
--d161
-n@satzd161a:=th1"l.imp"(zero(c),some"l"(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c))),[t:zero(c)]t17".d161"(t),[t:not(zero(c))]t21".d161"(t)):some"l"(dif,[x:dif]and(not(negd(x)),eq(td(x,x),c)))
-@[a:dif][i:intd(a)]
-+intd
-[z:zero(a)]
-t1:=ori1(zero(absd(a)),natd(absd(absd(a))),satzd166f(a,z)):intd(absd(a))
-i@[n:natd(absd(a))]
-t2:=natintd(absd(a),n):intd(absd(a))
--intd
-intabsd:=orapp(zero(a),natd(absd(a)),intd(absd(a)),i,[t:zero(a)]t1".intd"(t),[t:natd(absd(a))]t2".intd"(t)):intd(absd(a))
-+*intd
-n@t4:=eqnatd(absd(a),absd(m0d(a)),satzd178a(a),n):natd(absd(m0d(a)))
--intd
-i@intm0d:=th9"l.or"(zero(a),natd(absd(a)),zero(m0d(a)),natd(absd(m0d(a))),i,[t:zero(a)]satzd176b(a,t),[t:natd(absd(a))]t4".intd"(t)):intd(m0d(a))
-a@[b:dif][i:intd(a)][j:intd(b)]
-+*intd
-j@[z:zero(a)]
-t5:=symeq(pd(a,b),b,pd01(a,b,z)):eq(b,pd(a,b))
-t6:=eqintd(b,pd(a,b),t5,j):intd(pd(a,b))
-j@[z:zero(b)]
-t7:=symeq(pd(a,b),a,pd02(a,b,z)):eq(a,pd(a,b))
-t8:=eqintd(a,pd(a,b),t7,i):intd(pd(a,b))
-a@[i:intd(a)][p:posd(a)]
-t9:=<p>ande2(posd(a),[t:posd(a)]natrp(rpofpd(a,t)),posintnatd(a,p,i)):natrp(rpofpd(a,p))
-j@[pp:posd(pd(a,b))]
-apb1:=rpofpd(pd(a,b),pp):cut
-[p:posd(a)]
-a1:=rpofpd(a,p):cut
-[q:posd(b)]
-b1:=rpofpd(b,q):cut
-t10:=natpl(a1,t9(a,i,p),b1,t9(b,j,q)):natrp(pl(a1,b1))
-t11:=eqpd12(a,pdofrp(a1),b,pdofrp(b1),eqpdrp1(a,p),eqpdrp1(b,q)):eq(pd(a,b),pd(pdofrp(a1),pdofrp(b1)))
-t12:=treq(pd(a,b),pd(pdofrp(a1),pdofrp(b1)),pdofrp(pl(a1,b1)),t11,lemmaivad1(a1,b1)):eq(pd(a,b),pdofrp(pl(a1,b1)))
-t13:=tris(cut,apb1,rpofpd(pdofrp(pl(a1,b1)),posdirp(pl(a1,b1))),pl(a1,b1),eqpderp(pd(a,b),pp,pdofrp(pl(a1,b1)),posdirp(pl(a1,b1)),t12),isrppd2(pl(a1,b1))):is(apb1,pl(a1,b1))
-t14:=isp1(cut,[t:cut]natrp(t),pl(a1,b1),apb1,t10,t13):natrp(apb1)
-t15:=andi(posd(pd(a,b)),[t:posd(pd(a,b))]natrp(apb1(t)),pp,[t:posd(pd(a,b))]t14(t,p,q)):natd(pd(a,b))
-t16:=natintd(pd(a,b),t15):intd(pd(a,b))
-p@[n:negd(b)]
-t17:=satzd176c(b,n):posd(m0d(b))
-b2:=rpofpd(m0d(b),t17):cut
-t18:=eqpd2(b,m0d(m0d(b)),a,satzd177a(b)):eq(pd(a,b),md(a,m0d(b)))
-t19:=eqposd(pd(a,b),md(a,m0d(b)),t18,pp):posd(md(a,m0d(b)))
-t20:=satzd182a(a,m0d(b),t19):mored(a,m0d(b))
-t21:=eqmored12(a,pdofrp(a1),m0d(b),pdofrp(b2),eqpdrp1(a,p),eqpdrp1(m0d(b),t17),t20):mored(pdofrp(a1),pdofrp(b2))
-t22:=lemmaivad3(a1,b2,t21):more(a1,b2)
-t23:=natmn(a1,t9(a,i,p),b2,t9(m0d(b),intm0d(b,j),t17),t22):natrp(mn(a1,b2,t22))
-t24:=eqpd12(m0d(b),pdofrp(b2),pd(a,b),pdofrp(apb1),eqpdrp1(m0d(b),t17),eqpdrp1(pd(a,b),pp)):eq(pd(m0d(b),pd(a,b)),pd(pdofrp(b2),pdofrp(apb1)))
-t25:=tr4eq(a,md(pd(a,b),b),pd(m0d(b),pd(a,b)),pd(pdofrp(b2),pdofrp(apb1)),pdofrp(pl(b2,apb1)),symeq(md(pd(a,b),b),a,mdpd(a,b)),compd(pd(a,b),m0d(b)),t24,lemmaivad1(b2,apb1)):eq(a,pdofrp(pl(b2,apb1)))
-t26:=tris2(cut,pl(b2,apb1),a1,rpofpd(pdofrp(pl(b2,apb1)),posdirp(pl(b2,apb1))),isrppd1(pl(b2,apb1)),eqpderp(a,p,pdofrp(pl(b2,apb1)),posdirp(pl(b2,apb1)),t25)):is(pl(b2,apb1),a1)
-t27:=satz140g(a1,b2,apb1,t22,t26):is(apb1,mn(a1,b2,t22))
-t28:=isp1(cut,[t:cut]natrp(t),mn(a1,b2,t22),apb1,t23,t27):natrp(apb1)
-t29:=andi(posd(pd(a,b)),[t:posd(pd(a,b))]natrp(apb1(t)),pp,[t:posd(pd(a,b))]t28(t,p,n)):natd(pd(a,b))
-t30:=natintd(pd(a,b),t29):intd(pd(a,b))
-p@t31:=rappd(b,intd(pd(a,b)),[t:posd(b)]t16(t),[t:zero(b)]t8(t),[t:negd(b)]t30(t)):intd(pd(a,b))
-pp@[n:negd(a)]
-t31a:=th3"l.imp"(negd(b),negd(pd(a,b)),pnotnd(pd(a,b),pp),[t:negd(b)]npd(a,b,n,t)):not(negd(b))
-t32:=th3"l.imp"(zero(b),negd(pd(a,b)),pnotnd(pd(a,b),pp),[t:zero(b)]eqnegd(a,pd(a,b),symeq(pd(a,b),a,pd02(a,b,t)),n)):not(zero(b))
-t33:=or3e2(zero(b),posd(b),negd(b),axrdo(b),t31a,t32):posd(b)
-t34:=eqposd(pd(a,b),pd(b,a),compd(a,b),pp):posd(pd(b,a))
-t35:=t30(b,a,j,i,t34,t33,n):intd(pd(b,a))
-t36:=eqintd(pd(b,a),pd(a,b),compd(b,a),t35):intd(pd(a,b))
-pp@t37:=rappd(a,intd(pd(a,b)),[t:posd(a)]t31(t),[t:zero(a)]t6(t),[t:negd(a)]t36(t)):intd(pd(a,b))
-j@[0p:zero(pd(a,b))]
-t38:=intdi0(pd(a,b),0p):intd(pd(a,b))
-j@[np:negd(pd(a,b))]
-t39:=satzd176c(pd(a,b),np):posd(m0d(pd(a,b)))
-t40:=eqposd(m0d(pd(a,b)),pd(m0d(a),m0d(b)),satzd180(a,b),t39):posd(pd(m0d(a),m0d(b)))
-t41:=t37(m0d(a),m0d(b),intm0d(a,i),intm0d(b,j),t40):intd(pd(m0d(a),m0d(b)))
-t42:=eqintd(pd(m0d(a),m0d(b)),m0d(pd(a,b)),satzd180a(a,b),t41):intd(m0d(pd(a,b)))
-t43:=intm0d(m0d(pd(a,b)),t42):intd(m0d(m0d(pd(a,b))))
-t44:=eqintd(m0d(m0d(pd(a,b))),pd(a,b),satzd177(pd(a,b)),t43):intd(pd(a,b))
--intd
-j@intpd:=rappd(pd(a,b),intd(pd(a,b)),[t:posd(pd(a,b))]t37".intd"(t),[t:zero(pd(a,b))]t38".intd"(t),[t:negd(pd(a,b))]t44".intd"(t)):intd(pd(a,b))
-intmd:=intpd(a,m0d(b),i,intm0d(b,j)):intd(md(a,b))
-+*intd
-j@[n:not(zero(td(a,b)))]
-t45:=th3"l.imp"(zero(a),zero(td(a,b)),n,[t:zero(a)]td01(a,b,t)):not(zero(a))
-t46:=th3"l.imp"(zero(b),zero(td(a,b)),n,[t:zero(b)]td02(a,b,t)):not(zero(b))
-t47:=satzd166e(a,t45):posd(absd(a))
-a3:=rpofpd(absd(a),t47):cut
-t48:=satzd166e(b,t46):posd(absd(b))
-b3:=rpofpd(absd(b),t48):cut
-t49:=natts(a3,t9(absd(a),intabsd(a,i),t47),b3,t9(absd(b),intabsd(b,j),t48)):natrp(ts(a3,b3))
-t50:=satzd166e(td(a,b),n):posd(absd(td(a,b)))
-[p:posd(absd(td(a,b)))]
-atb3:=rpofpd(absd(td(a,b)),p):cut
-t51:=eqtd12(absd(a),pdofrp(a3),absd(b),pdofrp(b3),eqpdrp1(absd(a),t47),eqpdrp1(absd(b),t48)):eq(td(absd(a),absd(b)),td(pdofrp(a3),pdofrp(b3)))
-t52:=tr3eq(absd(td(a,b)),td(absd(a),absd(b)),td(pdofrp(a3),pdofrp(b3)),pdofrp(ts(a3,b3)),satzd193(a,b),t51,lemmaivad2(a3,b3)):eq(absd(td(a,b)),pdofrp(ts(a3,b3)))
-t53:=tris2(cut,atb3,ts(a3,b3),rpofpd(pdofrp(ts(a3,b3)),posdirp(ts(a3,b3))),eqpderp(absd(td(a,b)),p,pdofrp(ts(a3,b3)),posdirp(ts(a3,b3)),t52),isrppd1(ts(a3,b3))):is(atb3,ts(a3,b3))
-t54:=isp1(cut,[t:cut]natrp(t),ts(a3,b3),atb3,t49,t53):natrp(atb3)
-n@t55:=andi(posd(absd(td(a,b))),[t:posd(absd(td(a,b)))]natrp(atb3(t)),t50,[t:posd(absd(td(a,b)))]t54(t)):natd(absd(td(a,b)))
--intd
-j@inttd:=[t:not(zero(td(a,b)))]t55".intd"(t):intd(td(a,b))
-+r
-@eq:=[x:dif][y:dif]eq"rp"(x,y):[x:dif][y:dif]'prop'
-refeq:=[x:dif]refeq"rp"(x):[x:dif]<x><x>eq
-symeq:=[x:dif][y:dif][t:<y><x>eq]symeq"rp"(x,y,t):[x:dif][y:dif][t:<y><x>eq]<x><y>eq
-treq:=[x:dif][y:dif][z:dif][t:<y><x>eq][u:<z><y>eq]treq"rp"(x,y,z,t,u):[x:dif][y:dif][z:dif][t:<y><x>eq][u:<z><y>eq]<z><x>eq
-[a:dif][s:set(dif)]
-inn:=esti(dif,a,s):'prop'
-@real:=ect"eq"(dif,eq,refeq,symeq,treq):'type'
-[r:real][s:real]
-is:=is"e"(real,r,s):'prop'
-nis:=not(is(r,s)):'prop'
-@[p:[x:real]'prop']
-some:=some"l"(real,p):'prop'
-all:=all"l"(real,p):'prop'
-one:=one"e"(real,p):'prop'
-r@[s0:set(real)]
-in:=esti(real,r,s0):'prop'
-a@realof:=ectelt"eq"(dif,eq,refeq,symeq,treq,a):real
-r@class:=ecect"eq"(dif,eq,refeq,symeq,treq,r):set(dif)
-a@innclass:=th5"eq.4"(dif,eq,refeq,symeq,treq,a):inn(a,class(realof(a)))
-r@[a:dif][b:dif][e:eq"rp"(a,b)][air:inn(a,class(r))]
-eqinn:=th8"eq.4"(dif,eq,refeq,symeq,treq,r,a,air,b,e):inn(b,class(r))
-r@[p:'prop'][p1:[x:dif][xi:inn(x,class(r))]p]
-realapp1:=th3"eq.4"(dif,eq,refeq,symeq,treq,r,p,p1):p
-r@[s:real][p:'prop'][p1:[x:dif][y:dif][xi:inn(x,class(r))][yi:inn(y,class(s))]p]
-+ivr1
-[a:dif][air:inn(a,class(r))]
-t1:=realapp1(s,p,[y:dif]<air><y><a>p1):p
--ivr1
-realapp2:=realapp1(r,p,[x:dif][xi:inn(x,class(r))]t1".ivr1"(x,xi)):p
-s@[t:real][p:'prop'][p1:[x:dif][y:dif][z:dif][xi:inn(x,class(r))][yi:inn(y,class(s))][zi:inn(z,class(t))]p]
-+*ivr1
-p1@[a:dif][air:inn(a,class(r))]
-t2:=realapp2(s,t,p,[y:dif][z:dif]<air><z><y><a>p1):p
--ivr1
-p1@realapp3:=realapp1(r,p,[x:dif][xi:inn(x,class(r))]t2".ivr1"(x,xi)):p
-t@[u:real][p:'prop'][p1:[x:dif][y:dif][z:dif][v:dif][xi:inn(x,class(r))][yi:inn(y,class(s))][zi:inn(z,class(t))][vi:inn(v,class(u))]p]
-+*ivr1
-p1@[a:dif][air:inn(a,class(r))]
-t3:=realapp3(s,t,u,p,[y:dif][z:dif][v:dif]<air><v><z><y><a>p1):p
--ivr1
-p1@realapp4:=realapp1(r,p,[x:dif][xi:inn(x,class(r))]t3".ivr1"(x,xi)):p
-s@[a1:dif][b1:dif][a1ir:inn(a1,class(r))][b1is:inn(b1,class(s))][e:eq"rp"(a1,b1)]
-isin:=th3"eq.5"(dif,eq,refeq,symeq,treq,r,s,a1,a1ir,b1,b1is,e):is(r,s)
-b1is@[i:is(r,s)]
-isex:=th5"eq.5"(dif,eq,refeq,symeq,treq,r,s,a1,a1ir,b1,b1is,i):eq"rp"(a1,b1)
-b1is@[n:not(eq"rp"(a1,b1))]
-nisin:=th3"l.imp"(is(r,s),eq"rp"(a1,b1),n,[t:is(r,s)]isex(t)):nis(r,s)
-b1is@[n:nis(r,s)]
-nisex:=th3"l.imp"(eq"rp"(a1,b1),is(r,s),n,[t:eq"rp"(a1,b1)]isin(t)):not(eq"rp"(a1,b1))
-@[alpha:'type'][f:[x:dif]alpha]
-fixf:=fixfu"eq"(dif,eq,refeq,symeq,treq,alpha,f):'prop'
-[ff:fixf(alpha,f)][r0:real]
-indreal:=indeq"eq"(dif,eq,refeq,symeq,treq,alpha,f,ff,r0):alpha
-[a:dif][air:inn(a,class(r0))]
-isindreal:=th2"eq.10"(dif,eq,refeq,symeq,treq,alpha,f,ff,r0,a,air):is"e"(alpha,<a>f,indreal)
-alpha@[g:[x:dif][y:dif]alpha]
-fixf2:=fixfu2"eq"(dif,eq,refeq,symeq,treq,alpha,g):'prop'
-[ff2:fixf2(alpha,g)][r0:real][s0:real]
-indreal2:=indeq2"eq"(dif,eq,refeq,symeq,treq,alpha,g,ff2,r0,s0):alpha
-[a:dif][b:dif][air:inn(a,class(r0))][bis:inn(b,class(s0))]
-isindreal2:=th1"eq.11"(dif,eq,refeq,symeq,treq,alpha,g,ff2,r0,s0,a,air,b,bis):is"e"(alpha,<b><a>g,indreal2)
-@0:=realof(df(1rp,1rp)):real
-r@[a0:dif][a0ir:inn(a0,class(r))][z:zero(a0)]
-0in:=isin(r,0,a0,df(1rp,1rp),a0ir,innclass(df(1rp,1rp)),zeroeq(a0,df(1rp,1rp),z,zeroi(1rp,1rp,refis(cut,1rp)))):is(r,0)
-a0ir@[i:is(r,0)]
-0ex:=eqzero(df(1rp,1rp),a0,isex(0,r,df(1rp,1rp),a0,innclass(df(1rp,1rp)),a0ir,symis(real,r,0,i)),tris(cut,stm(df(1rp,1rp)),1rp,std(df(1rp,1rp)),stmis(1rp,1rp),isstd(1rp,1rp))):zero(a0)
-+*ivr1
-a0@propp:=and(inn(a0,class(r)),posd(a0)):'prop'
--ivr1
-r@pos:=some"l"(dif,[x:dif]propp".ivr1"(x)):'prop'
-a0ir@[p:posd(a0)]
-+*ivr1
-p@t4:=andi(inn(a0,class(r)),posd(a0),a0ir,p):propp(a0)
--ivr1
-p@posin:=somei(dif,[x:dif]propp".ivr1"(x),a0,t4".ivr1"):pos(r)
-a0ir@[p:pos(r)]
-+*ivr1
-p@[a:dif][q1:propp(a)]
-t5:=ande1(inn(a,class(r)),posd(a),q1):inn(a,class(r))
-t6:=ande2(inn(a,class(r)),posd(a),q1):posd(a)
-t7:=eqposd(a,a0,isex(r,r,a,a0,t5,a0ir,refis(real,r)),t6):posd(a0)
--ivr1
-p@posex:=someapp(dif,[x:dif]propp".ivr1"(x),p,posd(a0),[x:dif][t:propp".ivr1"(x)]t7".ivr1"(x,t)):posd(a0)
-+*ivr1
-a0@propn:=and(inn(a0,class(r)),negd(a0)):'prop'
--ivr1
-r@neg:=some"l"(dif,[x:dif]propn".ivr1"(x)):'prop'
-a0ir@[n:negd(a0)]
-+*ivr1
-n@t8:=andi(inn(a0,class(r)),negd(a0),a0ir,n):propn(a0)
--ivr1
-n@negin:=somei(dif,[x:dif]propn".ivr1"(x),a0,t8".ivr1"):neg(r)
-a0ir@[n:neg(r)]
-+*ivr1
-n@[a:dif][pl:propn(a)]
-t9:=ande1(inn(a,class(r)),negd(a),pl):inn(a,class(r))
-t10:=ande2(inn(a,class(r)),negd(a),pl):negd(a)
-t11:=eqnegd(a,a0,isex(r,r,a,a0,t9,a0ir,refis(real,r)),t10):negd(a0)
--ivr1
-n@negex:=someapp(dif,[x:dif]propn".ivr1"(x),n,negd(a0),[x:dif][t:propn".ivr1"(x)]t11".ivr1"(x,t)):negd(a0)
-+*ivr1
-a0ir@[p:posd(a0)]
-t12:=or3i2(is(r,0),pos(r),neg(r),posin(p)):or3(is(r,0),pos(r),neg(r))
-a0ir@[z:zero(a0)]
-t13:=or3i1(is(r,0),pos(r),neg(r),0in(z)):or3(is(r,0),pos(r),neg(r))
-a0ir@[n:negd(a0)]
-t14:=or3i3(is(r,0),pos(r),neg(r),negin(n)):or3(is(r,0),pos(r),neg(r))
-a0ir@t15:=rappd(a0,or3(is(r,0),pos(r),neg(r)),[t:posd(a0)]t12(t),[t:zero(a0)]t13(t),[t:negd(a0)]t14(t)):or3(is(r,0),pos(r),neg(r))
--ivr1
-r@axrlo:=realapp1(r,or3(is(r,0),pos(r),neg(r)),[x:dif][xi:inn(x,class(r))]t15".ivr1"(x,xi)):or3(is(r,0),pos(r),neg(r))
-+*ivr1
-a0ir@[i:is(r,0)]
-t16:=th3"l.imp"(pos(r),posd(a0),0notpd(a0,0ex(i)),[t:pos(r)]posex(t)):not(pos(r))
-a0ir@[p:pos(r)]
-t17:=th3"l.imp"(neg(r),negd(a0),pnotnd(a0,posex(p)),[t:neg(r)]negex(t)):not(neg(r))
-a0ir@[n:neg(r)]
-t18:=th3"l.imp"(is(r,0),zero(a0),nnot0d(a0,negex(n)),[t:is(r,0)]0ex(t)):not(is(r,0))
-a0ir@t19:=th6"l.ec3"(is(r,0),pos(r),neg(r),[t:is(r,0)]t16(t),[t:pos(r)]t17(t),[t:neg(r)]t18(t)):ec3(is(r,0),pos(r),neg(r))
--ivr1
-r@axrle:=realapp1(r,ec3(is(r,0),pos(r),neg(r)),[x:dif][xi:inn(x,class(r))]t19".ivr1"(x,xi)):ec3(is(r,0),pos(r),neg(r))
-axrl:=orec3i(is(r,0),pos(r),neg(r),axrlo,axrle):orec3(is(r,0),pos(r),neg(r))
-[p:'prop'][p1:[t:pos(r)]p][p2:[t:is(r,0)]p][p3:[t:neg(r)]p]
-rapp:=or3app(is(r,0),pos(r),neg(r),p,axrlo,p2,p1,p3):p
-r@[p:pos(r)]
-pnotn:=ec3e23(is(r,0),pos(r),neg(r),axrle,p):not(neg(r))
-pnot0:=ec3e21(is(r,0),pos(r),neg(r),axrle,p):nis(r,0)
-r@[i:is(r,0)]
-0notp:=ec3e12(is(r,0),pos(r),neg(r),axrle,i):not(pos(r))
-0notn:=ec3e13(is(r,0),pos(r),neg(r),axrle,i):not(neg(r))
-r@[n:neg(r)]
-nnotp:=ec3e32(is(r,0),pos(r),neg(r),axrle,n):not(pos(r))
-nnot0:=ec3e31(is(r,0),pos(r),neg(r),axrle,n):nis(r,0)
-s@[i:is(r,s)][p:pos(r)]
-ispos:=isp(real,[x:real]pos(x),r,s,p,i):pos(s)
-i@[n:neg(r)]
-isneg:=isp(real,[x:real]neg(x),r,s,n,i):neg(s)
-@[r0:cut]
-pofrp:=realof(pdofrp(r0)):real
-nofrp:=realof(ndofrp(r0)):real
-[s0:cut][i:is"rp"(r0,s0)]
-isrpep:=isf(cut,real,[x:cut]pofrp(x),r0,s0,i):is(pofrp(r0),pofrp(s0))
-isrpen:=isf(cut,real,[x:cut]nofrp(x),r0,s0,i):is(nofrp(r0),nofrp(s0))
-s0@[i:is(pofrp(r0),pofrp(s0))]
-+*ivr1
-i"r"@t20:=isex(pofrp(r0),pofrp(s0),pdofrp(r0),pdofrp(s0),innclass(pdofrp(r0)),innclass(pdofrp(s0)),i):eq"rp"(pdofrp(r0),pdofrp(s0))
--ivr1
-i@isrpip:=isrpipd(r0,s0,t20".ivr1"):is"rp"(r0,s0)
-s0@[i:is(nofrp(r0),nofrp(s0))]
-+*ivr1
-i"r"@t21:=isex(nofrp(r0),nofrp(s0),ndofrp(r0),ndofrp(s0),innclass(ndofrp(r0)),innclass(ndofrp(s0)),i):eq"rp"(ndofrp(r0),ndofrp(s0))
--ivr1
-i@isrpin:=isrpind(r0,s0,t21".ivr1"):is"rp"(r0,s0)
-r0@posi:=posin(pofrp(r0),pdofrp(r0),innclass(pdofrp(r0)),posdirp(r0)):pos(pofrp(r0))
-negi:=negin(nofrp(r0),ndofrp(r0),innclass(ndofrp(r0)),negdirp(r0)):neg(nofrp(r0))
-s@[r0:cut][s0:cut][i:is(r,pofrp(r0))][j:is(s,pofrp(s0))][k:is(r,s)]
-+*ivr1
-k@t22:=isrpip(r0,s0,tr3is(real,pofrp(r0),r,s,pofrp(s0),symis(real,r,pofrp(r0),i),k,j)):is"rp"(r0,s0)
-r@t23:=[x:cut][y:cut][t:is(r,pofrp(x))][u:is(r,pofrp(y))]t22(r,r,x,y,t,u,refis(real,r)):amone(cut,[x:cut]is(r,pofrp(x)))
-a0ir@[p1:pos(r)]
-t24:=posex(p1):posd(a0)
-pr:=rpofpd(a0,t24):cut
-t25:=isin(r,pofrp(pr),a0,pdofrp(pr),a0ir,innclass(pdofrp(pr)),eqpdrp1(a0,t24)):is(r,pofrp(pr))
-t26:=somei(cut,[x:cut]is(r,pofrp(x)),pr,t25):some"rp"([x:cut]is(r,pofrp(x)))
--ivr1
-r@[p:pos(r)]
-+*ivr1
-p"r"@t27:=realapp1(some"rp"([x:cut]is(r,pofrp(x))),[x:dif][t:inn(x,class(r))]t26(x,t,p)):some"rp"([x:cut]is(r,pofrp(x)))
-t28:=onei(cut,[x:cut]is(r,pofrp(x)),t23,t27):one"rp"([x:cut]is(r,pofrp(x)))
--ivr1
-p@rpofp:=ind(cut,[x:cut]is(r,pofrp(x)),t28".ivr1"):cut
-isprp1:=oneax(cut,[x:cut]is(r,pofrp(x)),t28".ivr1"):is(r,pofrp(rpofp(r,p)))
-isprp2:=symis(real,r,pofrp(rpofp(r,p)),isprp1):is(pofrp(rpofp(r,p)),r)
-@[r1:real][p:pos(r1)][s1:real][q:pos(s1)][i:is(r1,s1)]
-isperp:=t22".ivr1"(r1,s1,rpofp(r1,p),rpofp(s1,q),isprp1(r1,p),isprp1(s1,q),i):is"rp"(rpofp(r1,p),rpofp(s1,q))
-q@[i:is"rp"(rpofp(r1,p),rpofp(s1,q))]
-ispirp:=tr3is(real,r1,pofrp(rpofp(r1,p)),pofrp(rpofp(s1,q)),s1,isprp1(r1,p),isrpep(rpofp(r1,p),rpofp(s1,q),i),isprp2(s1,q)):is(r1,s1)
-@[r0:cut]
-isrpp1:=t22".ivr1"(pofrp(r0),pofrp(r0),r0,rpofp(pofrp(r0),posi(r0)),refis(real,pofrp(r0)),isprp1(pofrp(r0),posi(r0)),refis(real,pofrp(r0))):is"rp"(r0,rpofp(pofrp(r0),posi(r0)))
-isrpp2:=symis(cut,r0,rpofp(pofrp(r0),posi(r0)),isrpp1):is"rp"(rpofp(pofrp(r0),posi(r0)),r0)
-s@[r0:cut][s0:cut][i:is(r,nofrp(r0))][j:is(s,nofrp(s0))][k:is(r,s)]
-+*ivr1
-k@t29:=isrpin(r0,s0,tr3is(real,nofrp(r0),r,s,nofrp(s0),symis(real,r,nofrp(r0),i),k,j)):is"rp"(r0,s0)
-r@t30:=[x:cut][y:cut][t:is(r,nofrp(x))][u:is(r,nofrp(y))]t29(r,r,x,y,t,u,refis(real,r)):amone(cut,[x:cut]is(r,nofrp(x)))
-a0ir@[n1:neg(r)]
-t31:=negex(n1):negd(a0)
-nr:=rpofnd(a0,t31):cut
-t32:=isin(r,nofrp(nr),a0,ndofrp(nr),a0ir,innclass(ndofrp(nr)),eqndrp1(a0,t31)):is(r,nofrp(nr))
-t33:=somei(cut,[x:cut]is(r,nofrp(x)),nr,t32):some"rp"([x:cut]is(r,nofrp(x)))
--ivr1
-r@[n:neg(r)]
-+*ivr1
-n"r"@t34:=realapp1(some"rp"([x:cut]is(r,nofrp(x))),[x:dif][t:inn(x,class(r))]t33(x,t,n)):some"rp"([x:cut]is(r,nofrp(x)))
-t35:=onei(cut,[x:cut]is(r,nofrp(x)),t30,t34):one"rp"([x:cut]is(r,nofrp(x)))
--ivr1
-n@rpofn:=ind(cut,[x:cut]is(r,nofrp(x)),t35".ivr1"):cut
-isnrp1:=oneax(cut,[x:cut]is(r,nofrp(x)),t35".ivr1"):is(r,nofrp(rpofn(r,n)))
-isnrp2:=symis(real,r,nofrp(rpofn(r,n)),isnrp1):is(nofrp(rpofn(r,n)),r)
-@[r1:real][n:neg(r1)][s1:real][m:neg(s1)][i:is(r1,s1)]
-isnerp:=t29".ivr1"(r1,s1,rpofn(r1,n),rpofn(s1,m),isnrp1(r1,n),isnrp1(s1,m),i):is"rp"(rpofn(r1,n),rpofn(s1,m))
-m@[i:is"rp"(rpofn(r1,n),rpofn(s1,m))]
-isnirp:=tr3is(real,r1,nofrp(rpofn(r1,n)),nofrp(rpofn(s1,m)),s1,isnrp1(r1,n),isrpen(rpofn(r1,n),rpofn(s1,m),i),isnrp2(s1,m)):is(r1,s1)
-@[r0:cut]
-isrpn1:=t29".ivr1"(nofrp(r0),nofrp(r0),r0,rpofn(nofrp(r0),negi(r0)),refis(real,nofrp(r0)),isnrp1(nofrp(r0),negi(r0)),refis(real,nofrp(r0))):is"rp"(r0,rpofn(nofrp(r0),negi(r0)))
-isrpn2:=symis(cut,r0,rpofn(nofrp(r0),negi(r0)),isrpn1):is"rp"(rpofn(nofrp(r0),negi(r0)),r0)
-r@satz163:=refis(real,r):is(r,r)
-s@[i:is(r,s)]
-satz164:=symis(real,r,s,i):is(s,r)
-t@[i:is(r,s)][j:is(s,t)]
-satz165:=tris(real,r,s,t,i,j):is(r,t)
-@absdr:=[x:dif]realof(absd(x)):[x:dif]real
-+ivr2
-[a:dif][b:dif][e:eq"rp"(a,b)]
-t1:=isin(realof(absd(a)),realof(absd(b)),absd(a),absd(b),innclass(absd(a)),innclass(absd(b)),eqabsd(a,b,e)):is(<a>absdr,<b>absdr)
--ivr2
-fabsdr:=[x:dif][y:dif][t:<y><x>eq]t1".ivr2"(x,y,t):fixf(real,absdr)
-r@abs:=indreal(real,absdr,fabsdr,r):real
-+*ivr2
-a0ir@t2:=isindreal(real,absdr,fabsdr,r,a0,a0ir):is(realof(absd(a0)),abs(r))
--ivr2
-a0ir@aica:=isp(real,[x:real]inn(absd(a0),class(x)),realof(absd(a0)),abs(r),innclass(absd(a0)),t2".ivr2"):inn(absd(a0),class(abs(r)))
-s@[i:is(r,s)]
-isabs:=isf(real,real,[x:real]abs(x),r,s,i):is(abs(r),abs(s))
-+2r166
-a0ir@[p:pos(r)]
-t1:=satzd166a(a0,posex(p)):posd(absd(a0))
-t2:=posin(abs(r),absd(a0),aica,t1):pos(abs(r))
--2r166
-r@[p:pos(r)]
-satz166a:=realapp1(pos(abs(r)),[x:dif][t:inn(x,class(r))]t2".2r166"(x,t,p)):pos(abs(r))
-+*2r166
-a0ir@[n:neg(r)]
-t3:=satzd166b(a0,negex(n)):posd(absd(a0))
-t4:=posin(abs(r),absd(a0),aica,t3):pos(abs(r))
--2r166
-r@[n:neg(r)]
-satz166b:=realapp1(pos(abs(r)),[x:dif][t:inn(x,class(r))]t4".2r166"(x,t,n)):pos(abs(r))
-+*2r166
-b1is@[p:pos(r)][q:pos(s)][i:is(abs(r),abs(s))]
-t5:=satzd166c(a1,b1,posex(r,a1,a1ir,p),posex(s,b1,b1is,q),isex(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is),i)):eq"rp"(a1,b1)
-t6:=isin(t5):is(r,s)
--2r166
-s@[p:pos(r)][q:pos(s)][i:is(abs(r),abs(s))]
-satz166c:=realapp2(is(r,s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".2r166"(x,y,t,u,p,q,i)):is(r,s)
-+*2r166
-b1is@[n:neg(r)][o:neg(s)][i:is(abs(r),abs(s))]
-t7:=satzd166d(a1,b1,negex(r,a1,a1ir,n),negex(s,b1,b1is,o),isex(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is),i)):eq"rp"(a1,b1)
-t8:=isin(t7):is(r,s)
--2r166
-s@[n:neg(r)][o:neg(s)][i:is(abs(r),abs(s))]
-satz166d:=realapp2(is(r,s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t8".2r166"(x,y,t,u,n,o,i)):is(r,s)
-r@[n:nis(r,0)]
-satz166e:=rapp(r,pos(abs(r)),[t:pos(r)]satz166a(t),th2"l.imp"(is(r,0),pos(abs(r)),n),[t:neg(r)]satz166b(t)):pos(abs(r))
-+*2r166
-a0ir@[i:is(r,0)]
-t9:=satzd166f(a0,0ex(i)):zero(absd(a0))
-t10:=0in(abs(r),absd(a0),aica,t9):is(abs(r),0)
--2r166
-r@[i:is(r,0)]
-satz166f:=realapp1(is(abs(r),0),[x:dif][t:inn(x,class(r))]t10".2r166"(x,t,i)):is(abs(r),0)
-s@more:=some"l"(dif,[x:dif]some"l"(dif,[y:dif]and3(inn(x,class(r)),inn(y,class(s)),mored(x,y)))):'prop'
-+*ivr2
-b1@propm:=and3(inn(a1,class(r)),inn(b1,class(s)),mored(a1,b1)):'prop'
--ivr2
-b1is@[m:mored(a1,b1)]
-+*ivr2
-m@t3:=and3i(inn(a1,class(r)),inn(b1,class(s)),mored(a1,b1),a1ir,b1is,m):propm(a1,b1)
-t4:=somei(dif,[x:dif]propm(a1,x),b1,t3):some"l"(dif,[x:dif]propm(a1,x))
--ivr2
-m@morein:=somei(dif,[x:dif]some"l"(dif,[y:dif]propm".ivr2"(x,y)),a1,t4".ivr2"):more(r,s)
-b1is@[m:more(r,s)]
-+*ivr2
-m@[a:dif][sa:some"l"(dif,[x:dif]propm(a,x))][b:dif][p2:propm(a,b)]
-t5:=and3e1(inn(a,class(r)),inn(b,class(s)),mored(a,b),p2):inn(a,class(r))
-t6:=and3e2(inn(a,class(r)),inn(b,class(s)),mored(a,b),p2):inn(b,class(s))
-t7:=and3e3(inn(a,class(r)),inn(b,class(s)),mored(a,b),p2):mored(a,b)
-t8:=eqmored12(a,a1,b,b1,isex(r,r,a,a1,t5,a1ir,refis(real,r)),isex(s,s,b,b1,t6,b1is,refis(real,s)),t7):mored(a1,b1)
-sa@t9:=someapp(dif,[x:dif]propm(a,x),sa,mored(a1,b1),[x:dif][t:propm(a,x)]t8(x,t)):mored(a1,b1)
--ivr2
-m@moreex:=someapp(dif,[x:dif]some"l"(dif,[y:dif]propm".ivr2"(x,y)),m,mored(a1,b1),[x:dif][t:some"l"(dif,[y:dif]propm".ivr2"(x,y))]t9".ivr2"(x,t)):mored(a1,b1)
-s@less:=some"l"(dif,[x:dif]some"l"(dif,[y:dif]and3(inn(x,class(r)),inn(y,class(s)),lessd(x,y)))):'prop'
-+*ivr2
-b1@propl:=and3(inn(a1,class(r)),inn(b1,class(s)),lessd(a1,b1)):'prop'
--ivr2
-b1is@[l:lessd(a1,b1)]
-+*ivr2
-l@t10:=and3i(inn(a1,class(r)),inn(b1,class(s)),lessd(a1,b1),a1ir,b1is,l):propl(a1,b1)
-t11:=somei(dif,[x:dif]propl(a1,x),b1,t10):some"l"(dif,[x:dif]propl(a1,x))
--ivr2
-l@lessin:=somei(dif,[x:dif]some"l"(dif,[y:dif]propl".ivr2"(x,y)),a1,t11".ivr2"):less(r,s)
-b1is@[l:less(r,s)]
-+*ivr2
-l@[a:dif][sa:some"l"(dif,[x:dif]propl(a,x))][b:dif][p2:propl(a,b)]
-t12:=and3e1(inn(a,class(r)),inn(b,class(s)),lessd(a,b),p2):inn(a,class(r))
-t13:=and3e2(inn(a,class(r)),inn(b,class(s)),lessd(a,b),p2):inn(b,class(s))
-t14:=and3e3(inn(a,class(r)),inn(b,class(s)),lessd(a,b),p2):lessd(a,b)
-t15:=eqlessd12(a,a1,b,b1,isex(r,r,a,a1,t12,a1ir,refis(real,r)),isex(s,s,b,b1,t13,b1is,refis(real,s)),t14):lessd(a1,b1)
-sa@t16:=someapp(dif,[x:dif]propl(a,x),sa,lessd(a1,b1),[x:dif][t:propl(a,x)]t15(x,t)):lessd(a1,b1)
--ivr2
-l@lessex:=someapp(dif,[x:dif]some"l"(dif,[y:dif]propl".ivr2"(x,y)),l,lessd(a1,b1),[x:dif][t:some"l"(dif,[y:dif]propl".ivr2"(x,y))]t16".ivr2"(x,t)):lessd(a1,b1)
-t@[i:is(r,s)][m:more(r,t)]
-ismore1:=isp(real,[x:real]more(x,t),r,s,m,i):more(s,t)
-i@[m:more(t,r)]
-ismore2:=isp(real,[x:real]more(t,x),r,s,m,i):more(t,s)
-i@[l:less(r,t)]
-isless1:=isp(real,[x:real]less(x,t),r,s,l,i):less(s,t)
-i@[l:less(t,r)]
-isless2:=isp(real,[x:real]less(t,x),r,s,l,i):less(t,s)
-u@[i:is(r,s)][j:is(t,u)][m:more(r,t)]
-ismore12:=ismore2(t,u,s,j,ismore1(r,s,t,i,m)):more(s,u)
-j@[l:less(r,t)]
-isless12:=isless2(t,u,s,j,isless1(r,s,t,i,l)):less(s,u)
-+*ivr2
-b1is@[m:more(r,s)]
-t17:=lemmad5(a1,b1,moreex(m)):lessd(b1,a1)
-t18:=lessin(s,r,b1,a1,b1is,a1ir,t17):less(s,r)
--ivr2
-s@[m:more(r,s)]
-lemma1:=realapp2(less(s,r),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t18".ivr2"(x,y,t,u,m)):less(s,r)
-+*ivr2
-b1is@[l:less(r,s)]
-t19:=lemmad6(a1,b1,lessex(l)):mored(b1,a1)
-t20:=morein(s,r,b1,a1,b1is,a1ir,t19):more(s,r)
--ivr2
-s@[l:less(r,s)]
-lemma2:=realapp2(more(s,r),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t20".ivr2"(x,y,t,u,l)):more(s,r)
-+2r167
-b1is@t1:=satzd167a(a1,b1):or3(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1))
-[e:eq"rp"(a1,b1)]
-t2:=or3i1(is(r,s),more(r,s),less(r,s),isin(e)):or3(is(r,s),more(r,s),less(r,s))
-b1is@[m:mored(a1,b1)]
-t3:=or3i2(is(r,s),more(r,s),less(r,s),morein(m)):or3(is(r,s),more(r,s),less(r,s))
-b1is@[l:lessd(a1,b1)]
-t4:=or3i3(is(r,s),more(r,s),less(r,s),lessin(l)):or3(is(r,s),more(r,s),less(r,s))
-b1is@t5:=or3app(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1),or3(is(r,s),more(r,s),less(r,s)),t1,[t:eq"rp"(a1,b1)]t2(t),[t:mored(a1,b1)]t3(t),[t:lessd(a1,b1)]t4(t)):or3(is(r,s),more(r,s),less(r,s))
-t6:=satzd167b(a1,b1):ec3(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1))
-[i:is(r,s)]
-t7:=th3"l.imp"(more(r,s),mored(a1,b1),ec3e12(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1),t6,isex(i)),[t:more(r,s)]moreex(t)):not(more(r,s))
-b1is@[m:more(r,s)]
-t8:=th3"l.imp"(less(r,s),lessd(a1,b1),ec3e23(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1),t6,moreex(m)),[t:less(r,s)]lessex(t)):not(less(r,s))
-b1is@[l:less(r,s)]
-t9:=th3"l.imp"(is(r,s),eq"rp"(a1,b1),ec3e31(eq"rp"(a1,b1),mored(a1,b1),lessd(a1,b1),t6,lessex(l)),[t:is(r,s)]isex(t)):not(is(r,s))
-b1is@t10:=th6"l.ec3"(is(r,s),more(r,s),less(r,s),th1"l.ec"(is(r,s),more(r,s),[t:is(r,s)]t7(t)),th1"l.ec"(more(r,s),less(r,s),[t:more(r,s)]t8(t)),th1"l.ec"(less(r,s),is(r,s),[t:less(r,s)]t9(t))):ec3(is(r,s),more(r,s),less(r,s))
-t11:=orec3i(is(r,s),more(r,s),less(r,s),t5,t10):orec3(is(r,s),more(r,s),less(r,s))
--2r167
-s@satz167:=realapp2(orec3(is(r,s),more(r,s),less(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t11".2r167"(x,y,t,u)):orec3(is(r,s),more(r,s),less(r,s))
-satz167a:=orec3e1(is(r,s),more(r,s),less(r,s),satz167):or3(is(r,s),more(r,s),less(r,s))
-satz167b:=orec3e2(is(r,s),more(r,s),less(r,s),satz167):ec3(is(r,s),more(r,s),less(r,s))
-moreis:=or(more(r,s),is(r,s)):'prop'
-lessis:=or(less(r,s),is(r,s)):'prop'
-[m:moreis(r,s)]
-satz168a:=th9"l.or"(more(r,s),is(r,s),less(s,r),is(s,r),m,[t:more(r,s)]lemma1(t),[t:is(r,s)]symis(real,r,s,t)):lessis(s,r)
-s@[l:lessis(r,s)]
-satz168b:=th9"l.or"(less(r,s),is(r,s),more(s,r),is(s,r),l,[t:less(r,s)]lemma2(t),[t:is(r,s)]symis(real,r,s,t)):moreis(s,r)
-t@[i:is(r,s)][m:moreis(r,t)]
-ismoreis1:=isp(real,[x:real]moreis(x,t),r,s,m,i):moreis(s,t)
-i@[m:moreis(t,r)]
-ismoreis2:=isp(real,[x:real]moreis(t,x),r,s,m,i):moreis(t,s)
-i@[l:lessis(r,t)]
-islessis1:=isp(real,[x:real]lessis(x,t),r,s,l,i):lessis(s,t)
-i@[l:lessis(t,r)]
-islessis2:=isp(real,[x:real]lessis(t,x),r,s,l,i):lessis(t,s)
-u@[i:is(r,s)][j:is(t,u)][m:moreis(r,t)]
-ismoreis12:=ismoreis2(t,u,s,j,ismoreis1(r,s,t,i,m)):moreis(s,u)
-j@[l:lessis(r,t)]
-islessis12:=islessis2(t,u,s,j,islessis1(r,s,t,i,l)):lessis(s,u)
-s@[m:more(r,s)]
-moreisi1:=ori1(more(r,s),is(r,s),m):moreis(r,s)
-s@[l:less(r,s)]
-lessisi1:=ori1(less(r,s),is(r,s),l):lessis(r,s)
-s@[i:is(r,s)]
-moreisi2:=ori2(more(r,s),is(r,s),i):moreis(r,s)
-lessisi2:=ori2(less(r,s),is(r,s),i):lessis(r,s)
-b1is@[m:moreq(a1,b1)]
-moreisin:=orapp(mored(a1,b1),eq"rp"(a1,b1),moreis(r,s),m,[t:mored(a1,b1)]moreisi1(morein(t)),[t:eq"rp"(a1,b1)]moreisi2(isin(t))):moreis(r,s)
-b1is@[m:moreis(r,s)]
-moreisex:=orapp(more(r,s),is(r,s),moreq(a1,b1),m,[t:more(r,s)]moreqi1(a1,b1,moreex(t)),[t:is(r,s)]moreqi2(a1,b1,isex(t))):moreq(a1,b1)
-b1is@[l:lesseq(a1,b1)]
-lessisin:=orapp(lessd(a1,b1),eq"rp"(a1,b1),lessis(r,s),l,[t:lessd(a1,b1)]lessisi1(lessin(t)),[t:eq"rp"(a1,b1)]lessisi2(isin(t))):lessis(r,s)
-b1is@[l:lessis(r,s)]
-lessisex:=orapp(less(r,s),is(r,s),lesseq(a1,b1),l,[t:less(r,s)]lesseqi1(a1,b1,lessex(t)),[t:is(r,s)]lesseqi2(a1,b1,isex(t))):lesseq(a1,b1)
-s@[m:moreis(r,s)]
-satz167c:=th7"l.ec3"(is(r,s),more(r,s),less(r,s),satz167b,comor(more(r,s),is(r,s),m)):not(less(r,s))
-s@[l:lessis(r,s)]
-satz167d:=th9"l.ec3"(is(r,s),more(r,s),less(r,s),satz167b,l):not(more(r,s))
-s@[n:not(more(r,s))]
-satz167e:=th2"l.or3"(is(r,s),more(r,s),less(r,s),satz167a,n):lessis(r,s)
-s@[n:not(less(r,s))]
-s@[n:not(less(r,s))]
-satz167f:=comor(is(r,s),more(r,s),th3"l.or3"(is(r,s),more(r,s),less(r,s),satz167a,n)):moreis(r,s)
-s@[m:more(r,s)]
-satz167g:=th3"l.imp"(lessis(r,s),not(more(r,s)),weli(more(r,s),m),[t:lessis(r,s)]satz167d(t)):not(lessis(r,s))
-s@[l:less(r,s)]
-satz167h:=th3"l.imp"(moreis(r,s),not(less(r,s)),weli(less(r,s),l),[t:moreis(r,s)]satz167c(t)):not(moreis(r,s))
-s@[n:not(moreis(r,s))]
-satz167j:=or3e3(is(r,s),more(r,s),less(r,s),satz167a,th5"l.or"(more(r,s),is(r,s),n),th4"l.or"(more(r,s),is(r,s),n)):less(r,s)
-s@[n:not(lessis(r,s))]
-satz167k:=or3e2(is(r,s),more(r,s),less(r,s),satz167a,th4"l.or"(less(r,s),is(r,s),n),th5"l.or"(less(r,s),is(r,s),n)):more(r,s)
-r@[p:pos(r)]
-+2r169
-[a:dif][b:dif][air:inn(a,class(r))][bi0:inn(b,class(0))]
-t1:=satzd169a(a,b,0ex(0,b,bi0,refis(real,0)),posex(a,air,p)):mored(a,b)
-t2:=morein(r,0,a,b,air,bi0,t1):more(r,0)
--2r169
-satz169a:=realapp2(r,0,more(r,0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(0))]t2".2r169"(x,y,t,u)):more(r,0)
-r@[m:more(r,0)]
-+*2r169
-m@[a:dif][b:dif][air:inn(a,class(r))][bi0:inn(b,class(0))]
-t3:=satzd169b(a,b,0ex(0,b,bi0,refis(real,0)),moreex(r,0,a,b,air,bi0,m)):posd(a)
-t4:=posin(r,a,air,t3):pos(r)
--2r169
-m@satz169b:=realapp2(r,0,pos(r),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(0))]t4".2r169"(x,y,t,u)):pos(r)
-r@[n:neg(r)]
-+*2r169
-n@[a:dif][b:dif][air:inn(a,class(r))][bi0:inn(b,class(0))]
-t5:=satzd169c(a,b,0ex(0,b,bi0,refis(real,0)),negex(a,air,n)):lessd(a,b)
-t6:=lessin(r,0,a,b,air,bi0,t5):less(r,0)
--2r169
-n@satz169c:=realapp2(r,0,less(r,0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(0))]t6".2r169"(x,y,t,u)):less(r,0)
-r@[l:less(r,0)]
-+*2r169
-l@[a:dif][b:dif][air:inn(a,class(r))][bi0:inn(b,class(0))]
-t7:=satzd169d(a,b,0ex(0,b,bi0,refis(real,0)),lessex(r,0,a,b,air,bi0,l)):negd(a)
-t8:=negin(r,a,air,t7):neg(r)
--2r169
-l@satz169d:=realapp2(r,0,neg(r),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(0))]t8".2r169"(x,y,t,u)):neg(r)
-+2r170
-r@[a:dif][b:dif][air:inn(a,class(r))][bi0:inn(b,class(0))]
-t1:=satzd170(a,b,0ex(0,b,bi0,refis(real,0))):moreq(absd(a),b)
-t2:=moreisin(abs(r),0,absd(a),b,aica(r,a,air),bi0,t1):moreis(abs(r),0)
--2r170
-r@satz170:=realapp2(r,0,moreis(abs(r),0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(0))]t2".2r170"(x,y,t,u)):moreis(abs(r),0)
-satz170a:=th3"l.imp"(neg(abs(r)),less(abs(r),0),satz167c(abs(r),0,satz170),[t:neg(abs(r))]satz169c(abs(r),t)):not(neg(abs(r)))
-t@[l:less(r,s)][k:less(s,t)]
-+2r171
-[a:dif][b:dif][c:dif][air:inn(a,class(r))][bis:inn(b,class(s))][cit:inn(c,class(t))]
-t1:=satzd171(a,b,c,lessex(r,s,a,b,air,bis,l),lessex(s,t,b,c,bis,cit,k)):lessd(a,c)
-t2:=lessin(r,t,a,c,air,cit,t1):less(r,t)
--2r171
-satz171:=realapp3(r,s,t,less(r,t),[x:dif][y:dif][z:dif][w:inn(x,class(r))][u:inn(y,class(s))][v:inn(z,class(t))]t2".2r171"(x,y,z,w,u,v)):less(r,t)
-trless:=satz171:less(r,t)
-t@[m:more(r,s)][n:more(s,t)]
-trmore:=lemma2(t,r,trless(t,s,r,lemma1(s,t,n),lemma1(r,s,m))):more(r,t)
-t@[a2:dif][b2:dif][c2:dif][a2ir:inn(a2,class(r))][b2is:inn(b2,class(s))][c2it:inn(c2,class(t))]
-+2r172
-[l:lessis(r,s)][k:less(s,t)]
-t1:=satzd172a(a2,b2,c2,lessisex(a2,b2,a2ir,b2is,l),lessex(s,t,b2,c2,b2is,c2it,k)):lessd(a2,c2)
-t2:=lessin(r,t,a2,c2,a2ir,c2it,t1):less(r,t)
--2r172
-t@[l:lessis(r,s)][k:less(s,t)]
-satz172a:=realapp3(less(r,t),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".2r172"(x,y,z,u,v,w,l,k)):less(r,t)
-+*2r172
-c2it@[l:less(r,s)][k:lessis(s,t)]
-t3:=satzd172b(a2,b2,c2,lessex(a2,b2,a2ir,b2is,l),lessisex(s,t,b2,c2,b2is,c2it,k)):lessd(a2,c2)
-t4:=lessin(r,t,a2,c2,a2ir,c2it,t3):less(r,t)
--2r172
-t@[l:less(r,s)][k:lessis(s,t)]
-satz172b:=realapp3(less(r,t),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t4".2r172"(x,y,z,u,v,w,l,k)):less(r,t)
-t@[m:moreis(r,s)][n:more(s,t)]
-satz172c:=lemma2(t,r,satz172b(t,s,r,lemma1(s,t,n),satz168a(m))):more(r,t)
-t@[m:more(r,s)][n:moreis(s,t)]
-satz172d:=lemma2(t,r,satz172a(t,s,r,satz168a(s,t,n),lemma1(m))):more(r,t)
-+2r173
-c2it@[l:lessis(r,s)][k:lessis(s,t)]
-t1:=satzd173(a2,b2,c2,lessisex(a2,b2,a2ir,b2is,l),lessisex(s,t,b2,c2,b2is,c2it,k)):lesseq(a2,c2)
-t2:=lessisin(r,t,a2,c2,a2ir,c2it,t1):lessis(r,t)
--2r173
-t@[l:lessis(r,s)][k:lessis(s,t)]
-satz173:=realapp3(lessis(r,t),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".2r173"(x,y,z,u,v,w,l,k)):lessis(r,t)
-trlessis:=satz173:lessis(r,t)
-t@[m:moreis(r,s)][n:moreis(s,t)]
-trmoreis:=satz168b(t,r,trlessis(t,s,r,satz168a(s,t,n),satz168a(m))):moreis(r,t)
-r@ratrl:=some"l"(dif,[x:dif]and(inn(x,class(r)),ratd(x))):'prop'
-a0ir@[r1:ratd(a0)]
-+*ivr2
-r1@t21:=andi(inn(a0,class(r)),ratd(a0),a0ir,r1):and(inn(a0,class(r)),ratd(a0))
--ivr2
-r1@ratrlin:=somei(dif,[x:dif]and(inn(x,class(r)),ratd(x)),a0,t21".ivr2"):ratrl(r)
-a0ir@[rr:ratrl(r)]
-+*ivr2
-rr@[a:dif][b:and(inn(a,class(r)),ratd(a))]
-t22:=ande1(inn(a,class(r)),ratd(a),b):inn(a,class(r))
-t23:=ande2(inn(a,class(r)),ratd(a),b):ratd(a)
-t24:=eqratd(a,a0,isex(r,r,a,a0,t22,a0ir,refis(real,r)),t23):ratd(a0)
--ivr2
-rr@ratrlex:=someapp(dif,[x:dif]and(inn(x,class(r)),ratd(x)),rr,ratd(a0),[x:dif][t:and(inn(x,class(r)),ratd(x))]t24".ivr2"(x,t)):ratd(a0)
-r@irratrl:=not(ratrl(r)):'prop'
-@[r0:cut][rr:ratrp(r0)]
-remark2:=ratrlin(pofrp(r0),pdofrp(r0),innclass(pdofrp(r0)),remark2a(r0,rr)):ratrl(pofrp(r0))
-remark3:=ratrlin(nofrp(r0),ndofrp(r0),innclass(ndofrp(r0)),remark3a(r0,rr)):ratrl(nofrp(r0))
-r0@[ir:irratrp(r0)]
-remark4:=th3"l.imp"(ratrl(pofrp(r0)),ratd(pdofrp(r0)),remark4a(r0,ir),[t:ratrl(pofrp(r0))]ratrlex(pofrp(r0),pdofrp(r0),innclass(pdofrp(r0)),t)):irratrl(pofrp(r0))
-remark5:=th3"l.imp"(ratrl(nofrp(r0)),ratd(ndofrp(r0)),remark5a(r0,ir),[t:ratrl(nofrp(r0))]ratrlex(nofrp(r0),ndofrp(r0),innclass(ndofrp(r0)),t)):irratrl(nofrp(r0))
-r@natrl:=some"l"(dif,[x:dif]and(inn(x,class(r)),natd(x))):'prop'
-a0ir@[n:natd(a0)]
-+*ivr2
-n@t25:=andi(inn(a0,class(r)),natd(a0),a0ir,n):and(inn(a0,class(r)),natd(a0))
--ivr2
-n@natrlin:=somei(dif,[x:dif]and(inn(x,class(r)),natd(x)),a0,t25".ivr2"):natrl(r)
-a0ir@[n:natrl(r)]
-+*ivr2
-n@[a:dif][b:and(inn(a,class(r)),natd(a))]
-t26:=ande1(inn(a,class(r)),natd(a),b):inn(a,class(r))
-t27:=ande2(inn(a,class(r)),natd(a),b):natd(a)
-t28:=eqnatd(a,a0,isex(r,r,a,a0,t26,a0ir,refis(real,r)),t27):natd(a0)
--ivr2
-n@natrlex:=someapp(dif,[x:dif]and(inn(x,class(r)),natd(x)),n,natd(a0),[x:dif][t:and(inn(x,class(r)),natd(x))]t28".ivr2"(x,t)):natd(a0)
-+*ivr2
-a0ir@[n:natrl(r)]
-t29:=natposd(a0,natrlex(n)):posd(a0)
-t30:=posin(t29):pos(r)
--ivr2
-r@[n:natrl(r)]
-natpos:=realapp1(pos(r),[x:dif][t:inn(x,class(r))]t30".ivr2"(x,t,n)):pos(r)
-@[x:nat]
-rlofnt:=realof(pdofnt(x)):real
-natrli:=natrlin(rlofnt(x),pdofnt(x),innclass(pdofnt(x)),natdi(x)):natrl(rlofnt(x))
-[y:nat][i:is"n"(x,y)]
-isnterl:=isf(nat,real,[u:nat]rlofnt(u),x,y,i):is(rlofnt(x),rlofnt(y))
-y@[i:is(rlofnt(x),rlofnt(y))]
-isntirl:=isntirp(x,y,isrpip(rpofnt(x),rpofnt(y),i)):is"n"(x,y)
-+*ivr2
-@t31:=[x:nat][y:nat][t:is(rlofnt(x),rlofnt(y))]isntirl(x,y,t):injective(nat,real,[x:nat]rlofnt(x))
-a0ir@[n:natrl(r)]
-t32:=natposd(a0,natrlex(n)):posd(a0)
-ap:=rpofpd(a0,t32):cut
-t33:=natderp(a0,natrlex(n)):natrp(ap)
-x0:=ntofrp(ap,t33):nat
-t34:=isrpepd(ap,rpofnt(x0),isrpnt1(ap,t33)):eq"rp"(pdofrp(ap),pdofnt(x0))
-t35:=treq"rp"(a0,pdofrp(ap),pdofnt(x0),eqpdrp1(a0,t32),t34):eq"rp"(a0,pdofnt(x0))
-t36:=isin(r,rlofnt(x0),a0,pdofnt(x0),a0ir,innclass(pdofnt(x0)),t35):is(r,rlofnt(x0))
-t37:=somei(nat,[x:nat]is(r,rlofnt(x)),x0,t36):image(nat,real,[x:nat]rlofnt(x),r)
--ivr2
-r@[n:natrl(r)]
-natimage:=realapp1(image(nat,real,[x:nat]rlofnt(x),r),[x:dif][t:inn(x,class(r))]t37".ivr2"(x,t,n)):image(nat,real,[x:nat]rlofnt(x),r)
-r@[i:image(nat,real,[x:nat]rlofnt(x),r)]
-+*ivr2
-i"r"@[x:nat][j:is(r,rlofnt(x))]
-t38:=isp1(real,[u:real]natrl(u),rlofnt(x),r,natrli(x),j):natrl(r)
--ivr2
-i@imagenat:=someapp(nat,[u:nat]is(r,rlofnt(u)),i,natrl(r),[u:nat][v:is(r,rlofnt(u))]t38".ivr2"(u,v)):natrl(r)
-r@[n:natrl(r)]
-ntofrl:=soft(nat,real,[x:nat]rlofnt(x),t31".ivr2",r,natimage(r,n)):nat
-@[r1:real][n:natrl(r1)][s1:real][m:natrl(s1)][i:is(r1,s1)]
-isrlent:=isinv(nat,real,[x:nat]rlofnt(x),t31".ivr2",r1,natimage(r1,n),s1,natimage(s1,m),i):is"n"(ntofrl(r1,n),ntofrl(s1,m))
-m@[i:is"n"(ntofrl(r1,n),ntofrl(s1,m))]
-isrlint:=isinve(nat,real,[x:nat]rlofnt(x),t31".ivr2",r1,natimage(r1,n),s1,natimage(s1,m),i):is(r1,s1)
-r@[n:natrl(r)]
-isrlnt1:=ists1"e"(nat,real,[x:nat]rlofnt(x),t31".ivr2",r,natimage(r,n)):is(r,rlofnt(ntofrl(r,n)))
-isrlnt2:=symis(real,r,rlofnt(ntofrl(r,n)),isrlnt1):is(rlofnt(ntofrl(r,n)),r)
-@[x:nat]
-+*ivr2
-x"r"@xn:=soft(nat,real,[u:nat]rlofnt(u),t31,rlofnt(x),imagei(nat,real,[u:nat]rlofnt(u),x)):nat
-t39:=isinv(nat,real,[u:nat]rlofnt(u),t31,rlofnt(x),imagei(nat,real,[u:nat]rlofnt(u),x),rlofnt(x),natimage(rlofnt(x),natrli(x)),refis(real,rlofnt(x))):is"n"(xn,ntofrl(rlofnt(x),natrli(x)))
--ivr2
-x@isntrl1:=tris(nat,x,xn".ivr2",ntofrl(rlofnt(x),natrli(x)),isst1(nat,real,[u:nat]rlofnt(u),t31".ivr2",x),t39".ivr2"):is"n"(x,ntofrl(rlofnt(x),natrli(x)))
-isntrl2:=symis(nat,x,ntofrl(rlofnt(x),natrli(x)),isntrl1):is"n"(ntofrl(rlofnt(x),natrli(x)),x)
-r@intrl:=some"l"(dif,[x:dif]and(inn(x,class(r)),intd(x))):'prop'
-a0ir@[i:intd(a0)]
-+*ivr2
-i@t40:=andi(inn(a0,class(r)),intd(a0),a0ir,i):and(inn(a0,class(r)),intd(a0))
--ivr2
-i@intrlin:=somei(dif,[x:dif]and(inn(x,class(r)),intd(x)),a0,t40".ivr2"):intrl(r)
-a0ir@[i:intrl(r)]
-+*ivr2
-i@[a:dif][b:and(inn(a,class(r)),intd(a))]
-t41:=ande1(inn(a,class(r)),intd(a),b):inn(a,class(r))
-t42:=ande2(inn(a,class(r)),intd(a),b):intd(a)
-t43:=eqintd(a,a0,isex(r,r,a,a0,t41,a0ir,refis(real,r)),t42):intd(a0)
--ivr2
-i@intrlex:=someapp(dif,[x:dif]and(inn(x,class(r)),intd(x)),i,intd(a0),[x:dif][t:and(inn(x,class(r)),intd(x))]t43".ivr2"(x,t)):intd(a0)
-+*ivr2
-a0ir@[n:natrl(r)]
-t44:=natintd(a0,natrlex(n)):intd(a0)
-t45:=intrlin(t44):intrl(r)
--ivr2
-r@[n:natrl(r)]
-natintrl:=realapp1(intrl(r),[x:dif][t:inn(x,class(r))]t45".ivr2"(x,t,n)):intrl(r)
-+*ivr2
-a0ir@[p:pos(r)][i:intrl(r)]
-t46:=posintnatd(a0,posex(p),intrlex(i)):natd(a0)
-t47:=natrlin(t46):natrl(r)
--ivr2
-r@[p:pos(r)][i:intrl(r)]
-posintnatrl:=realapp1(natrl(r),[x:dif][t:inn(x,class(r))]t47".ivr2"(x,t,p,i)):natrl(r)
-+*ivr2
-a0ir@[i2:is(r,0)]
-t48:=intdi0(a0,0ex(i2)):intd(a0)
-t49:=intrlin(t48):intrl(r)
--ivr2
-r@[i:is(r,0)]
-intrli0:=realapp1(intrl(r),[x:dif][t:inn(x,class(r))]t49".ivr2"(x,t,i)):intrl(r)
-r0@[n:natrp(r0)]
-remark6:=intrlin(pofrp(r0),pdofrp(r0),innclass(pdofrp(r0)),remark6"rp"(r0,n)):intrl(pofrp(r0))
-remark7:=intrlin(nofrp(r0),ndofrp(r0),innclass(ndofrp(r0)),remark7"rp"(r0,n)):intrl(nofrp(r0))
-+2r174
-a0ir@[i:intrl(r)]
-t1:=satzd174(a0,intrlex(i)):ratd(a0)
-t2:=ratrlin(t1):ratrl(r)
--2r174
-r@[i:intrl(r)]
-satz174:=realapp1(ratrl(r),[x:dif][t:inn(x,class(r))]t2".2r174"(x,t,i)):ratrl(r)
-@plusdr:=[x:dif][y:dif]realof(pd(x,y)):[x:dif][y:dif]real
-+ivr3
-[a:dif][b:dif][c:dif][d:dif][e:eq"rp"(a,b)][f:eq"rp"(c,d)]
-t1:=isin(realof(pd(a,c)),realof(pd(b,d)),pd(a,c),pd(b,d),innclass(pd(a,c)),innclass(pd(b,d)),eqpd12(a,b,c,d,e,f)):is(<c><a>plusdr,<d><b>plusdr)
--ivr3
-fplusdr:=[x:dif][y:dif][z:dif][v:dif][t:<y><x>eq][u:<v><z>eq]t1".ivr3"(x,y,z,v,t,u):fixf2(real,plusdr)
-s@pl:=indreal2(real,plusdr,fplusdr,r,s):real
-+*ivr3
-b1is@t2:=isindreal2(real,plusdr,fplusdr,r,s,a1,b1,a1ir,b1is):is(realof(pd(a1,b1)),pl(r,s))
--ivr3
-b1is@picp:=isp(real,[x:real]inn(pd(a1,b1),class(x)),realof(pd(a1,b1)),pl(r,s),innclass(pd(a1,b1)),t2".ivr3"):inn(pd(a1,b1),class(pl(r,s)))
-t@[i:is(r,s)]
-ispl1:=isf(real,real,[x:real]pl(x,t),r,s,i):is(pl(r,t),pl(s,t))
-ispl2:=isf(real,real,[x:real]pl(t,x),r,s,i):is(pl(t,r),pl(t,s))
-u@[i:is(r,s)][j:is(t,u)]
-ispl12:=tris(real,pl(r,t),pl(s,t),pl(s,u),ispl1(i),ispl2(t,u,s,j)):is(pl(r,t),pl(s,u))
-+3r175
-b1is@t1:=satzd175(a1,b1):eq"rp"(pd(a1,b1),pd(b1,a1))
-t2:=isin(pl(r,s),pl(s,r),pd(a1,b1),pd(b1,a1),picp,picp(s,r,b1,a1,b1is,a1ir),t1):is(pl(r,s),pl(s,r))
--3r175
-s@satz175:=realapp2(is(pl(r,s),pl(s,r)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".3r175"(x,y,t,u)):is(pl(r,s),pl(s,r))
-compl:=satz175:is(pl(r,s),pl(s,r))
-+*ivr3
-b1is@[i:is(r,0)]
-t3:=pd01(a1,b1,0ex(r,a1,a1ir,i)):eq"rp"(pd(a1,b1),b1)
-t4:=isin(pl(r,s),s,pd(a1,b1),b1,picp,b1is,t3):is(pl(r,s),s)
--ivr3
-s@[i:is(r,0)]
-pl01:=realapp2(is(pl(r,s),s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t4".ivr3"(x,y,t,u,i)):is(pl(r,s),s)
-s@[i:is(s,0)]
-pl02:=tris(real,pl(r,s),pl(s,r),r,compl,pl01(s,r,i)):is(pl(r,s),r)
-+*ivr3
-b1is@[p:pos(r)][q:pos(s)]
-t5:=ppd(a1,b1,posex(r,a1,a1ir,p),posex(s,b1,b1is,q)):posd(pd(a1,b1))
-t6:=posin(pl(r,s),pd(a1,b1),picp,t5):pos(pl(r,s))
--ivr3
-s@[p:pos(r)][q:pos(s)]
-pospl:=realapp2(pos(pl(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".ivr3"(x,y,t,u,p,q)):pos(pl(r,s))
-+*ivr3
-b1is@[n:neg(r)][o:neg(s)]
-t7:=npd(a1,b1,negex(r,a1,a1ir,n),negex(s,b1,b1is,o)):negd(pd(a1,b1))
-t8:=negin(pl(r,s),pd(a1,b1),picp,t7):neg(pl(r,s))
--ivr3
-s@[n:neg(r)][o:neg(s)]
-negpl:=realapp2(neg(pl(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t8".ivr3"(x,y,t,u,n,o)):neg(pl(r,s))
-@m0dr:=[x:dif]realof(m0d(x)):[x:dif]real
-+*ivr3
-@[a:dif][b:dif][e:eq"rp"(a,b)]
-t5a:=isin(realof(m0d(a)),realof(m0d(b)),m0d(a),m0d(b),innclass(m0d(a)),innclass(m0d(b)),eqm0d(a,b,e)):is(<a>m0dr,<b>m0dr)
--ivr3
-@fm0dr:=[x:dif][y:dif][t:<y><x>eq]t5a".ivr3"(x,y,t):fixf(real,m0dr)
-r@m0:=indreal(real,m0dr,fm0dr,r):real
-+*ivr3
-a0ir@t6a:=isindreal(real,m0dr,fm0dr,r,a0,a0ir):is(realof(m0d(a0)),m0(r))
--ivr3
-a0ir@micm0:=isp(real,[x:real]inn(m0d(a0),class(x)),realof(m0d(a0)),m0(r),innclass(m0d(a0)),t6a".ivr3"):inn(m0d(a0),class(m0(r)))
-s@[i:is(r,s)]
-ism0:=isf(real,real,[x:real]m0(x),r,s,i):is(m0(r),m0(s))
-+*ivr3
-a0ir@[n:neg(r)]
-t7a:=absnd(a0,negex(n)):eq"rp"(absd(a0),m0d(a0))
-t8a:=isin(abs(r),m0(r),absd(a0),m0d(a0),aica,micm0,t7a):is(abs(r),m0(r))
--ivr3
-r@[n:neg(r)]
-absn:=realapp1(is(abs(r),m0(r)),[x:dif][t:inn(x,class(r))]t8a".ivr3"(x,t,n)):is(abs(r),m0(r))
-+*ivr3
-a0ir@[nn:not(neg(r))]
-t9:=absnnd(a0,th3"l.imp"(negd(a0),neg(r),nn,[t:negd(a0)]negin(t))):eq"rp"(absd(a0),a0)
-t10:=isin(abs(r),r,absd(a0),a0,aica,a0ir,t9):is(abs(r),r)
--ivr3
-r@[nn:not(neg(r))]
-absnn:=realapp1(is(abs(r),r),[x:dif][t:inn(x,class(r))]t10".ivr3"(x,t,nn)):is(abs(r),r)
-r@[p:pos(r)]
-absp:=absnn(r,pnotn(r,p)):is(abs(r),r)
-r@[i:is(r,0)]
-abs0:=tris(real,abs(r),r,0,absnn(r,0notn(r,i)),i):is(abs(r),0)
-+3r176
-a0ir@[p:pos(r)]
-t1:=satzd176a(a0,posex(p)):negd(m0d(a0))
-t2:=negin(m0(r),m0d(a0),micm0,t1):neg(m0(r))
--3r176
-r@[p:pos(r)]
-satz176a:=realapp1(neg(m0(r)),[x:dif][t:inn(x,class(r))]t2".3r176"(x,t,p)):neg(m0(r))
-+*3r176
-a0ir@[i:is(r,0)]
-t3:=satzd176b(a0,0ex(i)):zero(m0d(a0))
-t4:=0in(m0(r),m0d(a0),micm0,t3):is(m0(r),0)
--3r176
-r@[i:is(r,0)]
-satz176b:=realapp1(is(m0(r),0),[x:dif][t:inn(x,class(r))]t4".3r176"(x,t,i)):is(m0(r),0)
-+*3r176
-a0ir@[n:neg(r)]
-t5:=satzd176c(a0,negex(n)):posd(m0d(a0))
-t6:=posin(m0(r),m0d(a0),micm0,t5):pos(m0(r))
--3r176
-r@[n:neg(r)]
-satz176c:=realapp1(pos(m0(r)),[x:dif][t:inn(x,class(r))]t6".3r176"(x,t,n)):pos(m0(r))
-+*3r176
-a0ir@[n:neg(m0(r))]
-t7:=satzd176d(a0,negex(m0(r),m0d(a0),micm0,n)):posd(a0)
-t8:=posin(t7):pos(r)
--3r176
-r@[n:neg(m0(r))]
-satz176d:=realapp1(pos(r),[x:dif][t:inn(x,class(r))]t8".3r176"(x,t,n)):pos(r)
-+*3r176
-a0ir@[i:is(m0(r),0)]
-t9:=satzd176e(a0,0ex(m0(r),m0d(a0),micm0,i)):zero(a0)
-t10:=0in(t9):is(r,0)
--3r176
-r@[i:is(m0(r),0)]
-satz176e:=realapp1(is(r,0),[x:dif][t:inn(x,class(r))]t10".3r176"(x,t,i)):is(r,0)
-+*3r176
-a0ir@[p:pos(m0(r))]
-t11:=satzd176f(a0,posex(m0(r),m0d(a0),micm0,p)):negd(a0)
-t12:=negin(t11):neg(r)
--3r176
-r@[p:pos(m0(r))]
-satz176f:=realapp1(neg(r),[x:dif][t:inn(x,class(r))]t12".3r176"(x,t,p)):neg(r)
-+3r177
-a0ir@t1:=isin(m0(m0(r)),r,m0d(m0d(a0)),a0,micm0(m0(r),m0d(a0),micm0),a0ir,satzd177(a0)):is(m0(m0(r)),r)
--3r177
-r@satz177:=realapp1(is(m0(m0(r)),r),[x:dif][t:inn(x,class(r))]t1".3r177"(x,t)):is(m0(m0(r)),r)
-satz177a:=symis(real,m0(m0(r)),r,satz177):is(r,m0(m0(r)))
-s@[i:is(r,m0(s))]
-satz177b:=tris(real,m0(r),m0(m0(s)),s,ism0(r,m0(s),i),satz177(s)):is(m0(r),s)
-satz177c:=symis(real,m0(r),s,satz177b):is(s,m0(r))
-s@[i:is(m0(r),s)]
-satz177d:=satz177c(s,r,symis(real,m0(r),s,i)):is(r,m0(s))
-satz177e:=symis(real,r,m0(s),satz177d):is(m0(s),r)
-+3r178
-a0ir@t1:=isin(abs(m0(r)),abs(r),absd(m0d(a0)),absd(a0),aica(m0(r),m0d(a0),micm0),aica,satzd178(a0)):is(abs(m0(r)),abs(r))
--3r178
-r@satz178:=realapp1(is(abs(m0(r)),abs(r)),[x:dif][t:inn(x,class(r))]t1".3r178"(x,t)):is(abs(m0(r)),abs(r))
-satz178a:=symis(real,abs(m0(r)),abs(r),satz178):is(abs(r),abs(m0(r)))
-+3r179
-a0ir@t1:=0in(pl(r,m0(r)),pd(a0,m0d(a0)),picp(r,m0(r),a0,m0d(a0),a0ir,micm0),satzd179(a0)):is(pl(r,m0(r)),0)
--3r179
-satz179:=realapp1(is(pl(r,m0(r)),0),[x:dif][t:inn(x,class(r))]t1".3r179"(x,t)):is(pl(r,m0(r)),0)
-satz179a:=tris(real,pl(m0(r),r),pl(r,m0(r)),0,compl(m0(r),r),satz179):is(pl(m0(r),r),0)
-+3r180
-b1is@t1:=isin(m0(pl(r,s)),pl(m0(r),m0(s)),m0d(pd(a1,b1)),pd(m0d(a1),m0d(b1)),micm0(pl(r,s),pd(a1,b1),picp),picp(m0(r),m0(s),m0d(a1),m0d(b1),micm0(r,a1,a1ir),micm0(s,b1,b1is)),satzd180(a1,b1)):is(m0(pl(r,s)),pl(m0(r),m0(s)))
--3r180
-s@satz180:=realapp2(is(m0(pl(r,s)),pl(m0(r),m0(s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t1".3r180"(x,y,t,u)):is(m0(pl(r,s)),pl(m0(r),m0(s)))
-satz180a:=symis(real,m0(pl(r,s)),pl(m0(r),m0(s)),satz180):is(pl(m0(r),m0(s)),m0(pl(r,s)))
-mn:=pl(r,m0(s)):real
-b1is@micmn:=picp(r,m0(s),a1,m0d(b1),a1ir,micm0(s,b1,b1is)):inn(md(a1,b1),class(mn(r,s)))
-t@[i:is(r,s)]
-ismn1:=ispl1(r,s,m0(t),i):is(mn(r,t),mn(s,t))
-ismn2:=ispl2(m0(r),m0(s),t,ism0(r,s,i)):is(mn(t,r),mn(t,s))
-u@[i:is(r,s)][j:is(t,u)]
-ismn12:=ispl12(r,s,m0(t),m0(u),i,ism0(t,u,j)):is(mn(r,t),mn(s,u))
-s@satz181:=tr3is(real,m0(mn(r,s)),pl(m0(r),m0(m0(s))),pl(m0(r),s),mn(s,r),satz180(r,m0(s)),ispl2(m0(m0(s)),s,m0(r),satz177(s)),compl(m0(r),s)):is(m0(mn(r,s)),mn(s,r))
-satz181a:=symis(real,m0(mn(s,r)),mn(r,s),satz181(s,r)):is(mn(r,s),m0(mn(s,r)))
-+3r182
-b1is@[p:pos(mn(r,s))]
-t1:=satzd182a(a1,b1,posex(mn(r,s),md(a1,b1),micmn,p)):mored(a1,b1)
-t2:=morein(t1):more(r,s)
--3r182
-[p:pos(mn(r,s))]
-satz182a:=realapp2(more(r,s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".3r182"(x,y,t,u,p)):more(r,s)
-+*3r182
-b1is@[i:is(mn(r,s),0)]
-t3:=satzd182b(a1,b1,0ex(mn(r,s),md(a1,b1),micmn,i)):eq"rp"(a1,b1)
-t4:=isin(t3):is(r,s)
--3r182
-s@[i:is(mn(r,s),0)]
-satz182b:=realapp2(is(r,s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t4".3r182"(x,y,t,u,i)):is(r,s)
-+*3r182
-b1is@[n:neg(mn(r,s))]
-t5:=satzd182c(a1,b1,negex(mn(r,s),md(a1,b1),micmn,n)):lessd(a1,b1)
-t6:=lessin(t5):less(r,s)
--3r182
-s@[n:neg(mn(r,s))]
-satz182c:=realapp2(less(r,s),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".3r182"(x,y,t,u,n)):less(r,s)
-+*3r182
-b1is@[m:more(r,s)]
-t7:=satzd182d(a1,b1,moreex(m)):posd(md(a1,b1))
-t8:=posin(mn(r,s),md(a1,b1),micmn,t7):pos(mn(r,s))
--3r182
-s@[m:more(r,s)]
-satz182d:=realapp2(pos(mn(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t8".3r182"(x,y,t,u,m)):pos(mn(r,s))
-+*3r182
-b1is@[i:is(r,s)]
-t9:=satzd182e(a1,b1,isex(i)):zero(md(a1,b1))
-t10:=0in(mn(r,s),md(a1,b1),micmn,t9):is(mn(r,s),0)
--3r182
-s@[i:is(r,s)]
-satz182e:=realapp2(is(mn(r,s),0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t10".3r182"(x,y,t,u,i)):is(mn(r,s),0)
-+*3r182
-b1is@[l:less(r,s)]
-t11:=satzd182f(a1,b1,lessex(l)):negd(md(a1,b1))
-t12:=negin(mn(r,s),md(a1,b1),micmn,t11):neg(mn(r,s))
--3r182
-s@[l:less(r,s)]
-satz182f:=realapp2(neg(mn(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t12".3r182"(x,y,t,u,l)):neg(mn(r,s))
-+3r183
-b1is@[m:more(r,s)]
-t1:=satzd183a(a1,b1,moreex(m)):lessd(m0d(a1),m0d(b1))
-t2:=lessin(m0(r),m0(s),m0d(a1),m0d(b1),micm0(r,a1,a1ir),micm0(s,b1,b1is),t1):less(m0(r),m0(s))
--3r183
-s@[m:more(r,s)]
-satz183a:=realapp2(less(m0(r),m0(s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".3r183"(x,y,t,u,m)):less(m0(r),m0(s))
-s@[i:is(r,s)]
-satz183b:=ism0(r,s,i):is(m0(r),m0(s))
-+*3r183
-b1is@[l:less(r,s)]
-t3:=satzd183c(a1,b1,lessex(l)):mored(m0d(a1),m0d(b1))
-t4:=morein(m0(r),m0(s),m0d(a1),m0d(b1),micm0(r,a1,a1ir),micm0(s,b1,b1is),t3):more(m0(r),m0(s))
--3r183
-s@[l:less(r,s)]
-satz183c:=realapp2(more(m0(r),m0(s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t4".3r183"(x,y,t,u,l)):more(m0(r),m0(s))
-s@[l:less(m0(r),m0(s))]
-satz183d:=ismore12(m0(m0(r)),r,m0(m0(s)),s,satz177(r),satz177(s),satz183c(m0(r),m0(s),l)):more(r,s)
-s@[i:is(m0(r),m0(s))]
-satz183e:=tr3is(real,r,m0(m0(r)),m0(m0(s)),s,satz177a(r),ism0(m0(r),m0(s),i),satz177(s)):is(r,s)
-s@[m:more(m0(r),m0(s))]
-satz183f:=isless12(m0(m0(r)),r,m0(m0(s)),s,satz177(r),satz177(s),satz183a(m0(r),m0(s),m)):less(r,s)
-+3r184
-t@prop1:=and3(pos(s),pos(t),is(r,mn(s,t))):'prop'
-s@prop2:=some([x:real]prop1(x)):'prop'
-r@prop3:=some([x:real]prop2(x)):'prop'
-a0ir@[a:dif][b:dif]
-prop1d:=and3(posd(a),posd(b),eq"rp"(a0,md(a,b))):'prop'
-a@prop2d:=some"l"(dif,[x:dif]prop1d(x)):'prop'
-[p2:prop2d(a)][b:dif][p1:prop1d(a,b)]
-t1:=and3e1(posd(a),posd(b),eq"rp"(a0,md(a,b)),p1):posd(a)
-t2:=and3e2(posd(a),posd(b),eq"rp"(a0,md(a,b)),p1):posd(b)
-t3:=and3e3(posd(a),posd(b),eq"rp"(a0,md(a,b)),p1):eq"rp"(a0,md(a,b))
-p2@ra:=realof(a):real
-p1@rb:=realof(b):real
-t4:=innclass(a):inn(a,class(ra))
-t5:=innclass(b):inn(b,class(rb))
-t6:=isin(r,mn(ra,rb),a0,md(a,b),a0ir,micmn(ra,rb,a,b,t4,t5),t3):is(r,mn(ra,rb))
-t7:=and3i(pos(ra),pos(rb),is(r,mn(ra,rb)),posin(ra,a,t4,t1),posin(rb,b,t5,t2),t6):prop1(ra,rb)
-t8:=somei(real,[x:real]prop1(ra,x),rb,t7):prop2(ra)
-p2@t9:=someapp(dif,[x:dif]prop1d(a,x),p2,prop2(ra),[x:dif][t:prop1d(a,x)]t8(x,t)):prop2(ra)
-t10:=somei(real,[x:real]prop2(x),ra,t9):prop3
-a0ir@t11:=someapp(dif,[x:dif]prop2d(x),satzd184(a0),prop3,[x:dif][t:prop2d(x)]t10(x,t)):prop3
--3r184
-r@satz184:=realapp1(prop3".3r184",[x:dif][t:inn(x,class(r))]t11".3r184"(x,t)):some([x:real]some([y:real]and3(pos(x),pos(y),is(r,mn(x,y)))))
-u@[a3:dif][b3:dif][c3:dif][d3:dif][a3ir:inn(a3,class(r))][b3is:inn(b3,class(s))][c3it:inn(c3,class(t))][d3iu:inn(d3,class(u))]
-+3r185
-t1:=satzd185(a3,b3,c3,d3):eq"rp"(pd(md(a3,b3),md(c3,d3)),md(pd(a3,c3),pd(b3,d3)))
-t2:=isin(pl(mn(r,s),mn(t,u)),mn(pl(r,t),pl(s,u)),pd(md(a3,b3),md(c3,d3)),md(pd(a3,c3),pd(b3,d3)),picp(mn(r,s),mn(t,u),md(a3,b3),md(c3,d3),micmn(r,s,a3,b3,a3ir,b3is),micmn(t,u,c3,d3,c3it,d3iu)),micmn(pl(r,t),pl(s,u),pd(a3,c3),pd(b3,d3),picp(r,t,a3,c3,a3ir,c3it),picp(s,u,b3,d3,b3is,d3iu)),t1):is(pl(mn(r,s),mn(t,u)),mn(pl(r,t),pl(s,u)))
--3r185
-u@satz185:=realapp4(is(pl(mn(r,s),mn(t,u)),mn(pl(r,t),pl(s,u))),[x:dif][y:dif][z:dif][v:dif][xi:inn(x,class(r))][yi:inn(y,class(s))][zi:inn(z,class(t))][vi:inn(v,class(u))]t2".3r185"(x,y,z,v,xi,yi,zi,vi)):is(pl(mn(r,s),mn(t,u)),mn(pl(r,t),pl(s,u)))
-+3r186
-c2it@t1:=satzd186(a2,b2,c2):eq"rp"(pd(pd(a2,b2),c2),pd(a2,pd(b2,c2)))
-t2:=isin(pl(pl(r,s),t),pl(r,pl(s,t)),pd(pd(a2,b2),c2),pd(a2,pd(b2,c2)),picp(pl(r,s),t,pd(a2,b2),c2,picp(r,s,a2,b2,a2ir,b2is),c2it),picp(r,pl(s,t),a2,pd(b2,c2),a2ir,picp(s,t,b2,c2,b2is,c2it)),t1):is(pl(pl(r,s),t),pl(r,pl(s,t)))
--3r186
-t@satz186:=realapp3(is(pl(pl(r,s),t),pl(r,pl(s,t))),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".3r186"(x,y,z,u,v,w)):is(pl(pl(r,s),t),pl(r,pl(s,t)))
-asspl1:=satz186:is(pl(pl(r,s),t),pl(r,pl(s,t)))
-asspl2:=symis(real,pl(pl(r,s),t),pl(r,pl(s,t)),satz186):is(pl(r,pl(s,t)),pl(pl(r,s),t))
-s@plmn:=tris(real,pl(mn(r,s),s),pl(r,pl(m0(s),s)),r,asspl1(r,m0(s),s),pl02(r,pl(m0(s),s),satz179a(s))):is(pl(mn(r,s),s),r)
-mnpl:=tris(real,mn(pl(r,s),s),pl(r,pl(s,m0(s))),r,asspl1(r,s,m0(s)),pl02(r,pl(s,m0(s)),satz179(s))):is(mn(pl(r,s),s),r)
-satz187a:=tris(real,pl(s,mn(r,s)),pl(mn(r,s),s),r,compl(s,mn(r,s)),plmn):is(pl(s,mn(r,s)),r)
-satz187b:=somei(real,[x:real]is(pl(s,x),r),mn(r,s),satz187a):some([x:real]is(pl(s,x),r))
-[x:real][i:is(pl(s,x),r)]
-satz187c:=tris(real,mn(r,s),mn(pl(x,s),s),x,ismn1(r,pl(x,s),s,tris1(real,r,pl(x,s),pl(s,x),i,compl(s,x))),mnpl(x,s)):is(mn(r,s),x)
-satz187d:=symis(real,mn(r,s),x,satz187c):is(x,mn(r,s))
-x@[i:is(pl(x,s),r)]
-satz187e:=satz187c(tris(real,pl(s,x),pl(x,s),r,compl(s,x),i)):is(mn(r,s),x)
-satz187f:=symis(real,mn(r,s),x,satz187e):is(x,mn(r,s))
-+3r187
-s@[x:real][y:real][i:is(pl(s,x),r)][j:is(pl(s,y),r)]
-t1:=tris1(real,x,y,mn(r,s),satz187c(x,i),satz187c(y,j)):is(x,y)
-s@t2:=[x:real][y:real][t:is(pl(s,x),r)][u:is(pl(s,y),r)]t1(x,y,t,u):amone(real,[x:real]is(pl(s,x),r))
--3r187
-s@satz187:=onei(real,[x:real]is(pl(s,x),r),t2".3r187",satz187b):one([x:real]is(pl(s,x),r))
-+3r188
-c2it@[m:more(pl(r,t),pl(s,t))]
-t1:=satzd188a(a2,b2,c2,moreex(pl(r,t),pl(s,t),pd(a2,c2),pd(b2,c2),picp(r,t,a2,c2,a2ir,c2it),picp(s,t,b2,c2,b2is,c2it),m)):mored(a2,b2)
-t2:=morein(r,s,a2,b2,a2ir,b2is,t1):more(r,s)
--3r188
-t@[m:more(pl(r,t),pl(s,t))]
-satz188a:=realapp3(more(r,s),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".3r188"(x,y,z,u,v,w,m)):more(r,s)
-+*3r188
-c2it@[i:is(pl(r,t),pl(s,t))]
-t3:=satzd188b(a2,b2,c2,isex(pl(r,t),pl(s,t),pd(a2,c2),pd(b2,c2),picp(r,t,a2,c2,a2ir,c2it),picp(s,t,b2,c2,b2is,c2it),i)):eq"rp"(a2,b2)
-t4:=isin(r,s,a2,b2,a2ir,b2is,t3):is(r,s)
--3r188
-t@[i:is(pl(r,t),pl(s,t))]
-satz188b:=realapp3(is(r,s),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t4".3r188"(x,y,z,u,v,w,i)):is(r,s)
-+*3r188
-c2it@[l:less(pl(r,t),pl(s,t))]
-t5:=satzd188c(a2,b2,c2,lessex(pl(r,t),pl(s,t),pd(a2,c2),pd(b2,c2),picp(r,t,a2,c2,a2ir,c2it),picp(s,t,b2,c2,b2is,c2it),l)):lessd(a2,b2)
-t6:=lessin(r,s,a2,b2,a2ir,b2is,t5):less(r,s)
--3r188
-t@[l:less(pl(r,t),pl(s,t))]
-satz188c:=realapp3(less(r,s),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t6".3r188"(x,y,z,u,v,w,l)):less(r,s)
-+*3r188
-c2it@[m:more(r,s)]
-t7:=satzd188d(a2,b2,c2,moreex(r,s,a2,b2,a2ir,b2is,m)):mored(pd(a2,c2),pd(b2,c2))
-t8:=morein(pl(r,t),pl(s,t),pd(a2,c2),pd(b2,c2),picp(r,t,a2,c2,a2ir,c2it),picp(s,t,b2,c2,b2is,c2it),t7):more(pl(r,t),pl(s,t))
--3r188
-t@[m:more(r,s)]
-satz188d:=realapp3(more(pl(r,t),pl(s,t)),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t8".3r188"(x,y,z,u,v,w,m)):more(pl(r,t),pl(s,t))
-t@[i:is(r,s)]
-satz188e:=ispl1(r,s,t,i):is(pl(r,t),pl(s,t))
-+*3r188
-c2it@[l:less(r,s)]
-t9:=satzd188f(a2,b2,c2,lessex(r,s,a2,b2,a2ir,b2is,l)):lessd(pd(a2,c2),pd(b2,c2))
-t10:=lessin(pl(r,t),pl(s,t),pd(a2,c2),pd(b2,c2),picp(r,t,a2,c2,a2ir,c2it),picp(s,t,b2,c2,b2is,c2it),t9):less(pl(r,t),pl(s,t))
--3r188
-t@[l:less(r,s)]
-satz188f:=realapp3(less(pl(r,t),pl(s,t)),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t10".3r188"(x,y,z,u,v,w,l)):less(pl(r,t),pl(s,t))
-t@[m:more(pl(t,r),pl(t,s))]
-satz188g:=satz188a(ismore12(pl(t,r),pl(r,t),pl(t,s),pl(s,t),compl(t,r),compl(t,s),m)):more(r,s)
-t@[i:is(pl(t,r),pl(t,s))]
-satz188h:=satz188b(tr3is(real,pl(r,t),pl(t,r),pl(t,s),pl(s,t),compl(r,t),i,compl(t,s))):is(r,s)
-t@[l:less(pl(t,r),pl(t,s))]
-satz188j:=satz188c(isless12(pl(t,r),pl(r,t),pl(t,s),pl(s,t),compl(t,r),compl(t,s),l)):less(r,s)
-t@[m:more(r,s)]
-satz188k:=ismore12(pl(r,t),pl(t,r),pl(s,t),pl(t,s),compl(r,t),compl(s,t),satz188d(m)):more(pl(t,r),pl(t,s))
-t@[i:is(r,s)]
-satz188l:=ispl2(r,s,t,i):is(pl(t,r),pl(t,s))
-t@[l:less(r,s)]
-satz188m:=isless12(pl(r,t),pl(t,r),pl(s,t),pl(t,s),compl(r,t),compl(s,t),satz188f(l)):less(pl(t,r),pl(t,s))
-u@[i:is(r,s)][m:more(t,u)]
-satz188n:=ismore2(pl(r,u),pl(s,u),pl(r,t),ispl1(r,s,u,i),satz188k(t,u,r,m)):more(pl(r,t),pl(s,u))
-satz188o:=ismore12(pl(r,t),pl(t,r),pl(s,u),pl(u,s),compl(r,t),compl(s,u),satz188n):more(pl(t,r),pl(u,s))
-i@[l:less(t,u)]
-satz188p:=isless2(pl(r,u),pl(s,u),pl(r,t),ispl1(r,s,u,i),satz188m(t,u,r,l)):less(pl(r,t),pl(s,u))
-satz188q:=isless12(pl(r,t),pl(t,r),pl(s,u),pl(u,s),compl(r,t),compl(s,u),satz188p):less(pl(t,r),pl(u,s))
-u@[m:more(r,s)][n:more(t,u)]
-satz189:=trmore(pl(r,t),pl(s,t),pl(s,u),satz188d(m),satz188k(t,u,s,n)):more(pl(r,t),pl(s,u))
-u@[l:less(r,s)][k:less(t,u)]
-satz189a:=lemma1(pl(s,u),pl(r,t),satz189(s,r,u,t,lemma2(r,s,l),lemma2(t,u,k))):less(pl(r,t),pl(s,u))
-u@[m:moreis(r,s)][n:more(t,u)]
-satz190a:=orapp(more(r,s),is(r,s),more(pl(r,t),pl(s,u)),m,[v:more(r,s)]satz189(v,n),[v:is(r,s)]satz188n(v,n)):more(pl(r,t),pl(s,u))
-u@[m:more(r,s)][n:moreis(t,u)]
-satz190b:=ismore12(pl(t,r),pl(r,t),pl(u,s),pl(s,u),compl(t,r),compl(u,s),satz190a(t,u,r,s,n,m)):more(pl(r,t),pl(s,u))
-u@[l:lessis(r,s)][k:less(t,u)]
-satz190c:=lemma1(pl(s,u),pl(r,t),satz190a(s,r,u,t,satz168b(l),lemma2(t,u,k))):less(pl(r,t),pl(s,u))
-u@[l:less(r,s)][k:lessis(t,u)]
-satz190d:=lemma1(pl(s,u),pl(r,t),satz190b(s,r,u,t,lemma2(l),satz168b(t,u,k))):less(pl(r,t),pl(s,u))
-+3r191
-d3iu@[m:moreis(r,s)][n:moreis(t,u)]
-t1:=satzd191(a3,b3,c3,d3,moreisex(r,s,a3,b3,a3ir,b3is,m),moreisex(t,u,c3,d3,c3it,d3iu,n)):moreq(pd(a3,c3),pd(b3,d3))
-t2:=moreisin(pl(r,t),pl(s,u),pd(a3,c3),pd(b3,d3),picp(r,t,a3,c3,a3ir,c3it),picp(s,u,b3,d3,b3is,d3iu),t1):moreis(pl(r,t),pl(s,u))
--3r191
-u@[m:moreis(r,s)][n:moreis(t,u)]
-satz191:=realapp4(moreis(pl(r,t),pl(s,u)),[x:dif][y:dif][z:dif][v:dif][xi:inn(x,class(r))][yi:inn(y,class(s))][zi:inn(z,class(t))][vi:inn(v,class(u))]t2".3r191"(x,y,z,v,xi,yi,zi,vi,m,n)):moreis(pl(r,t),pl(s,u))
-u@[l:lessis(r,s)][k:lessis(t,u)]
-satz191a:=satz168a(pl(s,u),pl(r,t),satz191(s,r,u,t,satz168b(l),satz168b(t,u,k))):lessis(pl(r,t),pl(s,u))
-@timesdr:=[x:dif][y:dif]realof(td(x,y)):[x:dif][y:dif]real
-+ivr4
-[a:dif][b:dif][c:dif][d:dif][e:eq"rp"(a,b)][f:eq"rp"(c,d)]
-t1:=isin(realof(td(a,c)),realof(td(b,d)),td(a,c),td(b,d),innclass(td(a,c)),innclass(td(b,d)),eqtd12(a,b,c,d,e,f)):is(<c><a>timesdr,<d><b>timesdr)
--ivr4
-ftimesdr:=[x:dif][y:dif][z:dif][v:dif][t:<y><x>eq][u:<v><z>eq]t1".ivr4"(x,y,z,v,t,u):fixf2(real,timesdr)
-s@ts:=indreal2(real,timesdr,ftimesdr,r,s):real
-+*ivr4
-b1is@t2:=isindreal2(real,timesdr,ftimesdr,r,s,a1,b1,a1ir,b1is):is(realof(td(a1,b1)),ts(r,s))
--ivr4
-b1is@tict:=isp(real,[x:real]inn(td(a1,b1),class(x)),realof(td(a1,b1)),ts(r,s),innclass(td(a1,b1)),t2".ivr4"):inn(td(a1,b1),class(ts(r,s)))
-t@[i:is(r,s)]
-ists1:=isf(real,real,[x:real]ts(x,t),r,s,i):is(ts(r,t),ts(s,t))
-ists2:=isf(real,real,[x:real]ts(t,x),r,s,i):is(ts(t,r),ts(t,s))
-u@[i:is(r,s)][j:is(t,u)]
-ists12:=tris(real,ts(r,t),ts(s,t),ts(s,u),ists1(i),ists2(t,u,s,j)):is(ts(r,t),ts(s,u))
-+4r192
-b1is@[i:is(r,0)]
-t1:=satzd192a(a1,b1,0ex(r,a1,a1ir,i)):zero(td(a1,b1))
-t2:=0in(ts(r,s),td(a1,b1),tict,t1):is(ts(r,s),0)
--4r192
-s@[i:is(r,0)]
-satz192a:=realapp2(is(ts(r,s),0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".4r192"(x,y,t,u,i)):is(ts(r,s),0)
-+*4r192
-b1is@[i:is(s,0)]
-t3:=satzd192b(a1,b1,0ex(s,b1,b1is,i)):zero(td(a1,b1))
-t4:=0in(ts(r,s),td(a1,b1),tict,t3):is(ts(r,s),0)
--4r192
-s@[i:is(s,0)]
-satz192b:=realapp2(is(ts(r,s),0),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t4".4r192"(x,y,t,u,i)):is(ts(r,s),0)
-+*4r192
-b1is@[i:is(ts(r,s),0)]
-t5:=satzd192c(a1,b1,0ex(ts(r,s),td(a1,b1),tict,i)):or(zero(a1),zero(b1))
-t6:=th9"l.or"(zero(a1),zero(b1),is(r,0),is(s,0),t5,[t:zero(a1)]0in(r,a1,a1ir,t),[t:zero(b1)]0in(s,b1,b1is,t)):or(is(r,0),is(s,0))
--4r192
-s@[i:is(ts(r,s),0)]
-satz192c:=realapp2(or(is(r,0),is(s,0)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".4r192"(x,y,t,u,i)):or(is(r,0),is(s,0))
-s@[n:nis(r,0)][o:nis(s,0)]
-satz192d:=th3"l.imp"(is(ts(r,s),0),or(is(r,0),is(s,0)),th3"l.or"(is(r,0),is(s,0),n,o),[t:is(ts(r,s),0)]satz192c(t)):nis(ts(r,s),0)
-s@[i:is(r,0)]
-ts01:=satz192a(i):is(ts(r,s),0)
-s@[i:is(s,0)]
-ts02:=satz192b(i):is(ts(r,s),0)
-+4r193
-b1is@t1:=satzd193(a1,b1):eq"rp"(absd(td(a1,b1)),td(absd(a1),absd(b1)))
-t2:=isin(abs(ts(r,s)),ts(abs(r),abs(s)),absd(td(a1,b1)),td(absd(a1),absd(b1)),aica(ts(r,s),td(a1,b1),tict),tict(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is)),t1):is(abs(ts(r,s)),ts(abs(r),abs(s)))
--4r193
-s@satz193:=realapp2(is(abs(ts(r,s)),ts(abs(r),abs(s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".4r193"(x,y,t,u)):is(abs(ts(r,s)),ts(abs(r),abs(s)))
-satz193a:=symis(real,abs(ts(r,s)),ts(abs(r),abs(s)),satz193):is(ts(abs(r),abs(s)),abs(ts(r,s)))
-+4r194
-b1is@t1:=satzd194(a1,b1):eq"rp"(td(a1,b1),td(b1,a1))
-t2:=isin(ts(r,s),ts(s,r),td(a1,b1),td(b1,a1),tict,tict(s,r,b1,a1,b1is,a1ir),t1):is(ts(r,s),ts(s,r))
--4r194
-satz194:=realapp2(is(ts(r,s),ts(s,r)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".4r194"(x,y,t,u)):is(ts(r,s),ts(s,r))
-comts:=satz194:is(ts(r,s),ts(s,r))
-@1rl:=realof(1df):real
-pos1:=posin(1rl,1df,innclass(1df),posdirp(1rp)):pos(1rl)
-natrl1:=natrli(1):natrl(1rl)
-intrl1:=natintrl(1rl,natrl1):intrl(1rl)
-+4r195
-a0ir@t1:=satzd195(a0):eq"rp"(td(a0,1df),a0)
-t2:=isin(ts(r,1rl),r,td(a0,1df),a0,tict(r,1rl,a0,1df,a0ir,innclass(1df)),a0ir,t1):is(ts(r,1rl),r)
--4r195
-r@satz195:=realapp1(is(ts(r,1rl),r),[x:dif][t:inn(x,class(r))]t2".4r195"(x,t)):is(ts(r,1rl),r)
-satz195a:=symis(real,ts(r,1rl),r,satz195):is(r,ts(r,1rl))
-satz195b:=tris(real,ts(1rl,r),ts(r,1rl),r,comts(1rl,r),satz195):is(ts(1rl,r),r)
-satz195c:=symis(real,ts(1rl,r),r,satz195b):is(r,ts(1rl,r))
-s@[p:pos(r)][q:pos(s)]
-satz196a:=symis(real,ts(abs(r),abs(s)),ts(r,s),ists12(abs(r),r,abs(s),s,absp(r,p),absp(s,q))):is(ts(r,s),ts(abs(r),abs(s)))
-+4r196
-b1is@[n:neg(r)][o:neg(s)]
-t1:=satzd196b(a1,b1,negex(r,a1,a1ir,n),negex(s,b1,b1is,o)):eq"rp"(td(a1,b1),td(absd(a1),absd(b1)))
-t2:=isin(ts(r,s),ts(abs(r),abs(s)),td(a1,b1),td(absd(a1),absd(b1)),tict,tict(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is)),t1):is(ts(r,s),ts(abs(r),abs(s)))
--4r196
-s@[n:neg(r)][o:neg(s)]
-satz196b:=realapp2(is(ts(r,s),ts(abs(r),abs(s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".4r196"(x,y,t,u,n,o)):is(ts(r,s),ts(abs(r),abs(s)))
-+*4r196
-b1is@[p:pos(r)][n:neg(s)]
-t1a:=satzd196c(a1,b1,posex(r,a1,a1ir,p),negex(s,b1,b1is,n)):eq"rp"(td(a1,b1),m0d(td(absd(a1),absd(b1))))
-t2a:=isin(ts(r,s),m0(ts(abs(r),abs(s))),td(a1,b1),m0d(td(absd(a1),absd(b1))),tict,micm0(ts(abs(r),abs(s)),td(absd(a1),absd(b1)),tict(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is))),t1a):is(ts(r,s),m0(ts(abs(r),abs(s))))
--4r196
-s@[p:pos(r)][n:neg(s)]
-satz196c:=realapp2(is(ts(r,s),m0(ts(abs(r),abs(s)))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2a".4r196"(x,y,t,u,p,n)):is(ts(r,s),m0(ts(abs(r),abs(s))))
-s@[n:neg(r)][p:pos(s)]
-satz196d:=tr3is(real,ts(r,s),ts(s,r),m0(ts(abs(s),abs(r))),m0(ts(abs(r),abs(s))),comts(r,s),satz196c(s,r,p,n),ism0(ts(abs(s),abs(r)),ts(abs(r),abs(s)),comts(abs(s),abs(r)))):is(ts(r,s),m0(ts(abs(r),abs(s))))
-+*4r196
-a0ir@[n:not(is(r,0))]
-t3:=th3"l.imp"(zero(a0),is(r,0),n,[t:zero(a0)]0in(t)):not(zero(a0))
-b1is@[n:not(is(r,0))][o:not(is(s,0))][i:is(ts(r,s),ts(abs(r),abs(s)))]
-t4:=satzd196e(a1,b1,t3(r,a1,a1ir,n),t3(s,b1,b1is,o),isex(ts(r,s),ts(abs(r),abs(s)),td(a1,b1),td(absd(a1),absd(b1)),tict,tict(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is)),i)):or(and(posd(a1),posd(b1)),and(negd(a1),negd(b1)))
-[a:and(posd(a1),posd(b1))]
-t5:=andi(pos(r),pos(s),posin(r,a1,a1ir,ande1(posd(a1),posd(b1),a)),posin(s,b1,b1is,ande2(posd(a1),posd(b1),a))):and(pos(r),pos(s))
-i@[a:and(negd(a1),negd(b1))]
-t6:=andi(neg(r),neg(s),negin(r,a1,a1ir,ande1(negd(a1),negd(b1),a)),negin(s,b1,b1is,ande2(negd(a1),negd(b1),a))):and(neg(r),neg(s))
-i@t7:=th9"l.or"(and(posd(a1),posd(b1)),and(negd(a1),negd(b1)),and(pos(r),pos(s)),and(neg(r),neg(s)),t4,[t:and(posd(a1),posd(b1))]t5(t),[t:and(negd(a1),negd(b1))]t6(t)):or(and(pos(r),pos(s)),and(neg(r),neg(s)))
--4r196
-s@[n:not(is(r,0))][o:not(is(s,0))][i:is(ts(r,s),ts(abs(r),abs(s)))]
-satz196e:=realapp2(or(and(pos(r),pos(s)),and(neg(r),neg(s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t7".4r196"(x,y,t,u,n,o,i)):or(and(pos(r),pos(s)),and(neg(r),neg(s)))
-+*4r196
-o@[i:is(ts(r,s),m0(ts(abs(r),abs(s))))]
-t8:=satzd196f(a1,b1,t3(r,a1,a1ir,n),t3(s,b1,b1is,o),isex(ts(r,s),m0(ts(abs(r),abs(s))),td(a1,b1),m0d(td(absd(a1),absd(b1))),tict,micm0(ts(abs(r),abs(s)),td(absd(a1),absd(b1)),tict(abs(r),abs(s),absd(a1),absd(b1),aica(r,a1,a1ir),aica(s,b1,b1is))),i)):or(and(posd(a1),negd(b1)),and(negd(a1),posd(b1)))
-[a:and(posd(a1),negd(b1))]
-t9:=andi(pos(r),neg(s),posin(r,a1,a1ir,ande1(posd(a1),negd(b1),a)),negin(s,b1,b1is,ande2(posd(a1),negd(b1),a))):and(pos(r),neg(s))
-i@[a:and(negd(a1),posd(b1))]
-t10:=andi(neg(r),pos(s),negin(r,a1,a1ir,ande1(negd(a1),posd(b1),a)),posin(s,b1,b1is,ande2(negd(a1),posd(b1),a))):and(neg(r),pos(s))
-i@t11:=th9"l.or"(and(posd(a1),negd(b1)),and(negd(a1),posd(b1)),and(pos(r),neg(s)),and(neg(r),pos(s)),t8,[t:and(posd(a1),negd(b1))]t9(t),[t:and(negd(a1),posd(b1))]t10(t)):or(and(pos(r),neg(s)),and(neg(r),pos(s)))
--4r196
-o@[i:is(ts(r,s),m0(ts(abs(r),abs(s))))]
-satz196f:=realapp2(or(and(pos(r),neg(s)),and(neg(r),pos(s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t11".4r196"(x,y,t,u,n,o,i)):or(and(pos(r),neg(s)),and(neg(r),pos(s)))
-s@[p:pos(ts(r,s))]
-+*4r196
-p"r"@t12:=th3"l.imp"(is(r,0),is(ts(r,s),0),pnot0(ts(r,s),p),[t:is(r,0)]ts01(r,s,t)):nis(r,0)
-t13:=th3"l.imp"(is(s,0),is(ts(r,s),0),pnot0(ts(r,s),p),[t:is(s,0)]ts02(r,s,t)):nis(s,0)
-t14:=tris1(real,ts(r,s),ts(abs(r),abs(s)),abs(ts(r,s)),absp(ts(r,s),p),satz193(r,s)):is(ts(r,s),ts(abs(r),abs(s)))
--4r196
-p@satz196g:=satz196e(t12".4r196",t13".4r196",t14".4r196"):or(and(pos(r),pos(s)),and(neg(r),neg(s)))
-s@[n:neg(ts(r,s))]
-+*4r196
-n"r"@t15:=th3"l.imp"(is(r,0),is(ts(r,s),0),nnot0(ts(r,s),n),[t:is(r,0)]ts01(r,s,t)):nis(r,0)
-t16:=th3"l.imp"(is(s,0),is(ts(r,s),0),nnot0(ts(r,s),n),[t:is(s,0)]ts02(r,s,t)):nis(s,0)
-t17:=satz177c(ts(abs(r),abs(s)),ts(r,s),tris(real,ts(abs(r),abs(s)),abs(ts(r,s)),m0(ts(r,s)),satz193a(r,s),absn(ts(r,s),n))):is(ts(r,s),m0(ts(abs(r),abs(s))))
--4r196
-n@satz196h:=satz196f(t15".4r196",t16".4r196",t17".4r196"):or(and(pos(r),neg(s)),and(neg(r),pos(s)))
-+4r197
-b1is@t1:=satzd197a(a1,b1):eq"rp"(td(m0d(a1),b1),m0d(td(a1,b1)))
-t2:=isin(ts(m0(r),s),m0(ts(r,s)),td(m0d(a1),b1),m0d(td(a1,b1)),tict(m0(r),s,m0d(a1),b1,micm0(r,a1,a1ir),b1is),micm0(ts(r,s),td(a1,b1),tict),t1):is(ts(m0(r),s),m0(ts(r,s)))
--4r197
-s@satz197a:=realapp2(is(ts(m0(r),s),m0(ts(r,s))),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t2".4r197"(x,y,t,u)):is(ts(m0(r),s),m0(ts(r,s)))
-satz197b:=tr3is(real,ts(r,m0(s)),ts(m0(s),r),m0(ts(s,r)),m0(ts(r,s)),comts(r,m0(s)),satz197a(s,r),ism0(ts(s,r),ts(r,s),comts(s,r))):is(ts(r,m0(s)),m0(ts(r,s)))
-satz197c:=tris2(real,ts(m0(r),s),ts(r,m0(s)),m0(ts(r,s)),satz197a,satz197b):is(ts(m0(r),s),ts(r,m0(s)))
-satz197d:=symis(real,ts(m0(r),s),ts(r,m0(s)),satz197c):is(ts(r,m0(s)),ts(m0(r),s))
-satz197e:=symis(real,ts(m0(r),s),m0(ts(r,s)),satz197a):is(m0(ts(r,s)),ts(m0(r),s))
-satz197f:=symis(real,ts(r,m0(s)),m0(ts(r,s)),satz197b):is(m0(ts(r,s)),ts(r,m0(s)))
-satz198:=tris(real,ts(m0(r),m0(s)),ts(r,m0(m0(s))),ts(r,s),satz197c(r,m0(s)),ists2(m0(m0(s)),s,r,satz177(s))):is(ts(m0(r),m0(s)),ts(r,s))
-satz198a:=symis(real,ts(m0(r),m0(s)),ts(r,s),satz198):is(ts(r,s),ts(m0(r),m0(s)))
-+*ivr4
-b1is@[p:pos(r)][q:pos(s)]
-t3:=ptdpp(a1,b1,posex(r,a1,a1ir,p),posex(s,b1,b1is,q)):posd(td(a1,b1))
-t4:=posin(ts(r,s),td(a1,b1),tict,t3):pos(ts(r,s))
--ivr4
-s@[p:pos(r)][q:pos(s)]
-postspp:=realapp2(pos(ts(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t4".ivr4"(x,y,t,u,p,q)):pos(ts(r,s))
-+*ivr4
-p@[n:neg(s)]
-t5:=ntdpn(a1,b1,posex(r,a1,a1ir,p),negex(s,b1,b1is,n)):negd(td(a1,b1))
-t6:=negin(ts(r,s),td(a1,b1),tict,t5):neg(ts(r,s))
--ivr4
-s@[p:pos(r)][n:neg(s)]
-negtspn:=realapp2(neg(ts(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".ivr4"(x,y,t,u,p,n)):neg(ts(r,s))
-s@[n:neg(r)][p:pos(s)]
-negtsnp:=isneg(ts(s,r),ts(r,s),comts(s,r),negtspn(s,r,p,n)):neg(ts(r,s))
-s@[n:neg(r)][o:neg(s)]
-postsnn:=ispos(ts(m0(r),m0(s)),ts(r,s),satz198,postspp(m0(r),m0(s),satz176c(r,n),satz176c(s,o))):pos(ts(r,s))
-r@[n:nis(r,0)]
-possq:=rapp(r,pos(ts(r,r)),[t:pos(r)]postspp(r,r,t,t),th2"l.imp"(is(r,0),pos(ts(r,r)),n),[t:neg(r)]postsnn(r,r,t,t)):pos(ts(r,r))
-r@nnegsq:=th1"l.imp"(is(r,0),not(neg(ts(r,r))),[t:is(r,0)]0notn(ts(r,r),satz192a(r,r,t)),[t:nis(r,0)]pnotn(ts(r,r),possq(r,t))):not(neg(ts(r,r)))
-+4r199
-c2it@t1:=satzd199(a2,b2,c2):eq"rp"(td(td(a2,b2),c2),td(a2,td(b2,c2)))
-t2:=isin(ts(ts(r,s),t),ts(r,ts(s,t)),td(td(a2,b2),c2),td(a2,td(b2,c2)),tict(ts(r,s),t,td(a2,b2),c2,tict(r,s,a2,b2,a2ir,b2is),c2it),tict(r,ts(s,t),a2,td(b2,c2),a2ir,tict(s,t,b2,c2,b2is,c2it)),t1):is(ts(ts(r,s),t),ts(r,ts(s,t)))
--4r199
-t@satz199:=realapp3(is(ts(ts(r,s),t),ts(r,ts(s,t))),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".4r199"(x,y,z,u,v,w)):is(ts(ts(r,s),t),ts(r,ts(s,t)))
-assts1:=satz199:is(ts(ts(r,s),t),ts(r,ts(s,t)))
-assts2:=symis(real,ts(ts(r,s),t),ts(r,ts(s,t)),satz199):is(ts(r,ts(s,t)),ts(ts(r,s),t))
-+4r201
-c2it@t1:=satzd201(a2,b2,c2):eq"rp"(td(a2,pd(b2,c2)),pd(td(a2,b2),td(a2,c2)))
-t2:=isin(ts(r,pl(s,t)),pl(ts(r,s),ts(r,t)),td(a2,pd(b2,c2)),pd(td(a2,b2),td(a2,c2)),tict(r,pl(s,t),a2,pd(b2,c2),a2ir,picp(s,t,b2,c2,b2is,c2it)),picp(ts(r,s),ts(r,t),td(a2,b2),td(a2,c2),tict(r,s,a2,b2,a2ir,b2is),tict(r,t,a2,c2,a2ir,c2it)),t1):is(ts(r,pl(s,t)),pl(ts(r,s),ts(r,t)))
--4r201
-satz201:=realapp3(is(ts(r,pl(s,t)),pl(ts(r,s),ts(r,t))),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".4r201"(x,y,z,u,v,w)):is(ts(r,pl(s,t)),pl(ts(r,s),ts(r,t)))
-disttp1:=tr3is(real,ts(pl(r,s),t),ts(t,pl(r,s)),pl(ts(t,r),ts(t,s)),pl(ts(r,t),ts(s,t)),comts(pl(r,s),t),satz201(t,r,s),ispl12(ts(t,r),ts(r,t),ts(t,s),ts(s,t),comts(t,r),comts(t,s))):is(ts(pl(r,s),t),pl(ts(r,t),ts(s,t)))
-disttp2:=satz201:is(ts(r,pl(s,t)),pl(ts(r,s),ts(r,t)))
-distpt1:=symis(real,ts(pl(r,s),t),pl(ts(r,t),ts(s,t)),disttp1):is(pl(ts(r,t),ts(s,t)),ts(pl(r,s),t))
-distpt2:=symis(real,ts(r,pl(s,t)),pl(ts(r,s),ts(r,t)),disttp2):is(pl(ts(r,s),ts(r,t)),ts(r,pl(s,t)))
-satz202:=tris(real,ts(r,mn(s,t)),pl(ts(r,s),ts(r,m0(t))),mn(ts(r,s),ts(r,t)),disttp2(r,s,m0(t)),ispl2(ts(r,m0(t)),m0(ts(r,t)),ts(r,s),satz197b(r,t))):is(ts(r,mn(s,t)),mn(ts(r,s),ts(r,t)))
-disttm1:=tris(real,ts(mn(r,s),t),pl(ts(r,t),ts(m0(s),t)),mn(ts(r,t),ts(s,t)),disttp1(r,m0(s),t),ispl2(ts(m0(s),t),m0(ts(s,t)),ts(r,t),satz197a(s,t))):is(ts(mn(r,s),t),mn(ts(r,t),ts(s,t)))
-disttm2:=satz202:is(ts(r,mn(s,t)),mn(ts(r,s),ts(r,t)))
-distmt1:=symis(real,ts(mn(r,s),t),mn(ts(r,t),ts(s,t)),disttm1):is(mn(ts(r,t),ts(s,t)),ts(mn(r,s),t))
-distmt2:=symis(real,ts(r,mn(s,t)),mn(ts(r,s),ts(r,t)),disttm2):is(mn(ts(r,s),ts(r,t)),ts(r,mn(s,t)))
-satz200:=satz202:is(ts(r,mn(s,t)),mn(ts(r,s),ts(r,t)))
-+4r203
-c2it@[m:more(r,s)][p:pos(t)]
-t1:=satzd203a(a2,b2,c2,moreex(r,s,a2,b2,a2ir,b2is,m),posex(t,c2,c2it,p)):mored(td(a2,c2),td(b2,c2))
-t2:=morein(ts(r,t),ts(s,t),td(a2,c2),td(b2,c2),tict(r,t,a2,c2,a2ir,c2it),tict(s,t,b2,c2,b2is,c2it),t1):more(ts(r,t),ts(s,t))
--4r203
-[m:more(r,s)][p:pos(t)]
-satz203a:=realapp3(more(ts(r,t),ts(s,t)),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t2".4r203"(x,y,z,u,v,w,m,p)):more(ts(r,t),ts(s,t))
-m@[i:is(t,0)]
-satz203b:=tris2(real,ts(r,t),ts(s,t),0,ts02(r,t,i),ts02(s,t,i)):is(ts(r,t),ts(s,t))
-+*4r203
-m@[n:neg(t)]
-t3:=satzd203c(a2,b2,c2,moreex(r,s,a2,b2,a2ir,b2is,m),negex(t,c2,c2it,n)):lessd(td(a2,c2),td(b2,c2))
-t4:=lessin(ts(r,t),ts(s,t),td(a2,c2),td(b2,c2),tict(r,t,a2,c2,a2ir,c2it),tict(s,t,b2,c2,b2is,c2it),t3):less(ts(r,t),ts(s,t))
--4r203
-m@[n:neg(t)]
-satz203c:=realapp3(less(ts(r,t),ts(s,t)),[x:dif][y:dif][z:dif][u:inn(x,class(r))][v:inn(y,class(s))][w:inn(z,class(t))]t4".4r203"(x,y,z,u,v,w,m,n)):less(ts(r,t),ts(s,t))
-p@satz203d:=ismore12(ts(r,t),ts(t,r),ts(s,t),ts(t,s),comts(r,t),comts(s,t),satz203a):more(ts(t,r),ts(t,s))
-i@satz203e:=tris2(real,ts(t,r),ts(t,s),0,ts01(t,r,i),ts01(t,s,i)):is(ts(t,r),ts(t,s))
-n@satz203f:=isless12(ts(r,t),ts(t,r),ts(s,t),ts(t,s),comts(r,t),comts(s,t),satz203c):less(ts(t,r),ts(t,s))
-t@[l:less(r,s)][p:pos(t)]
-satz203g:=lemma1(ts(s,t),ts(r,t),satz203a(s,r,t,lemma2(r,s,l),p)):less(ts(r,t),ts(s,t))
-l@[i:is(t,0)]
-satz203h:=tris2(real,ts(r,t),ts(s,t),0,ts02(r,t,i),ts02(s,t,i)):is(ts(r,t),ts(s,t))
-l@[n:neg(t)]
-satz203j:=lemma2(ts(s,t),ts(r,t),satz203c(s,r,t,lemma2(r,s,l),n)):more(ts(r,t),ts(s,t))
-p@satz203k:=lemma1(ts(t,s),ts(t,r),satz203d(s,r,t,lemma2(r,s,l),p)):less(ts(t,r),ts(t,s))
-i@satz203l:=tris2(real,ts(t,r),ts(t,s),0,ts01(t,r,i),ts01(t,s,i)):is(ts(t,r),ts(t,s))
-n@satz203m:=lemma2(ts(t,s),ts(t,r),satz203f(s,r,t,lemma2(r,s,l),n)):more(ts(t,r),ts(t,s))
-+4r204
-a0ir@[n1:nis(r,0)]
-t1:=th3"l.imp"(zero(a0),is(r,0),n1,[t:zero(a0)]0in(t)):not(zero(a0))
-d3iu@[n1:nis(s,0)][i:is(ts(s,t),r)][j:is(ts(s,u),r)]
-t2:=satzd204b(a3,b3,t1(s,b3,b3is,n1),c3,d3,isex(ts(s,t),r,td(b3,c3),a3,tict(s,t,b3,c3,b3is,c3it),a3ir,i),isex(ts(s,u),r,td(b3,d3),a3,tict(s,u,b3,d3,b3is,d3iu),a3ir,j)):eq"rp"(c3,d3)
-t3:=isin(t,u,c3,d3,c3it,d3iu,t2):is(t,u)
--4r204
-s@[n:nis(s,0)][x:real][y:real][i:is(ts(s,x),r)][j:is(ts(s,y),r)]
-satz204b:=realapp4(x,y,is(x,y),[z:dif][u:dif][v:dif][w:dif][zi:inn(z,class(r))][ui:inn(u,class(s))][vi:inn(v,class(x))][wi:inn(w,class(y))]t3".4r204"(x,y,z,u,v,w,zi,ui,vi,wi,n,i,j)):is(x,y)
-+*4r204
-b1is@[n1:nis(s,0)]
-t4:=satzd204a(a1,b1,t1(s,b1,b1is,n1)):some"l"(dif,[x:dif]eq"rp"(td(b1,x),a1))
-[a:dif][e:eq"rp"(td(b1,a),a1)]
-ar:=realof(a):real
-t5:=isin(ts(s,ar),r,td(b1,a),a1,tict(s,ar,b1,a,b1is,innclass(a)),a1ir,e):is(ts(s,ar),r)
-t6:=somei(real,[x:real]is(ts(s,x),r),ar,t5):some([x:real]is(ts(s,x),r))
-n1@t7:=someapp(dif,[x:dif]eq"rp"(td(b1,x),a1),t4,some([x:real]is(ts(s,x),r)),[x:dif][t:eq"rp"(td(b1,x),a1)]t6(x,t)):some([x:real]is(ts(s,x),r))
--4r204
-n@satz204a:=realapp2(some([x:real]is(ts(s,x),r)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t7".4r204"(x,y,t,u,n)):some([x:real]is(ts(s,x),r))
-satz204:=onei(real,[x:real]is(ts(s,x),r),[x:real][y:real][t:is(ts(s,x),r)][u:is(ts(s,y),r)]satz204b(x,y,t,u),satz204a):one([x:real]is(ts(s,x),r))
-ov:=ind(real,[x:real]is(ts(s,x),r),satz204):real
-satz204c:=oneax(real,[x:real]is(ts(s,x),r),satz204):is(ts(s,ov(r,s,n)),r)
-satz204d:=symis(real,ts(s,ov(r,s,n)),r,satz204c):is(r,ts(s,ov(r,s,n)))
-satz204e:=tris(real,ts(ov(r,s,n),s),ts(s,ov(r,s,n)),r,comts(ov(r,s,n),s),satz204c):is(ts(ov(r,s,n),s),r)
-satz204f:=symis(real,ts(ov(r,s,n),s),r,satz204e):is(r,ts(ov(r,s,n),s))
-s@[x:real][n:nis(s,0)][i:is(ts(s,x),r)]
-satz204g:=satz204b(n,x,ov(r,s,n),i,satz204c(n)):is(x,ov(r,s,n))
-s@[n:nis(s,0)][p:pos(r)][q:pos(s)]
-+*4r204
-n@ros:=ov(r,s,n):real
-p@t8:=ispos(r,ts(s,ros),satz204d(n),p):pos(ts(s,ros))
-q@t9:=th1"l.and"(neg(s),neg(ros),pnotn(s,q)):not(and(neg(s),neg(ros)))
-t10:=ore1(and(pos(s),pos(ros)),and(neg(s),neg(ros)),satz196g(s,ros,t8),t9):and(pos(s),pos(ros))
--4r204
-q@posovpp:=ande2(pos(s),pos(ov(r,s,n)),t10".4r204"):pos(ov(r,s,n))
-p@[m:neg(s)]
-+*4r204
-m@t11:=th1"l.and"(pos(s),pos(ros),nnotp(s,m)):not(and(pos(s),pos(ros)))
-t12:=ore2(and(pos(s),pos(ros)),and(neg(s),neg(ros)),satz196g(s,ros,t8),t11):and(neg(s),neg(ros))
--4r204
-m@negovpn:=ande2(neg(s),neg(ov(r,s,n)),t12".4r204"):neg(ov(r,s,n))
-n@[m:neg(r)][p:pos(s)]
-+*4r204
-m@t13:=isneg(r,ts(s,ros),satz204d(n),m):neg(ts(s,ros))
-p@t14:=th1"l.and"(neg(s),pos(ros),pnotn(s,p)):not(and(neg(s),pos(ros)))
-t15:=ore1(and(pos(s),neg(ros)),and(neg(s),pos(ros)),satz196h(s,ros,t13),t14):and(pos(s),neg(ros))
--4r204
-p@negovnp:=ande2(pos(s),neg(ov(r,s,n)),t15".4r204"):neg(ov(r,s,n))
-m@[l:neg(s)]
-+*4r204
-l@t16:=th1"l.and"(pos(s),neg(ros),nnotp(s,l)):not(and(pos(s),neg(ros)))
-t17:=ore2(and(pos(s),neg(ros)),and(neg(s),pos(ros)),satz196h(s,ros,t13),t16):and(neg(s),pos(ros))
--4r204
-l@posovnn:=ande2(neg(s),pos(ov(r,s,n)),t17".4r204"):pos(ov(r,s,n))
-@[r0:cut][s0:cut][m:more"rp"(r0,s0)]
-morerpep:=morein(pofrp(r0),pofrp(s0),pdofrp(r0),pdofrp(s0),innclass(pdofrp(r0)),innclass(pdofrp(s0)),morerpepd(r0,s0,m)):more(pofrp(r0),pofrp(s0))
-s0@[m:more(pofrp(r0),pofrp(s0))]
-morerpip:=morerpipd(r0,s0,moreex(pofrp(r0),pofrp(s0),pdofrp(r0),pdofrp(s0),innclass(pdofrp(r0)),innclass(pdofrp(s0)),m)):more"rp"(r0,s0)
-s0@[l:less"rp"(r0,s0)]
-lessrpep:=lemma1(pofrp(s0),pofrp(r0),morerpep(s0,r0,satz122(r0,s0,l))):less(pofrp(r0),pofrp(s0))
-s0@[l:less(pofrp(r0),pofrp(s0))]
-lessrpip:=satz121(s0,r0,morerpip(s0,r0,lemma2(pofrp(r0),pofrp(s0),l))):less"rp"(r0,s0)
-s@[p:pos(r)][q:pos(s)][m:more(r,s)]
-q@[m:more(r,s)]
-+ivr5
-t1:=ismore12(r,pofrp(rpofp(r,p)),s,pofrp(rpofp(s,q)),isprp1(r,p),isprp1(s,q),m):more(pofrp(rpofp(r,p)),pofrp(rpofp(s,q)))
--ivr5
-moreperp:=morerpip(rpofp(r,p),rpofp(s,q),t1".ivr5"):more"rp"(rpofp(r,p),rpofp(s,q))
-q@[m:more"rp"(rpofp(r,p),rpofp(s,q))]
-+*ivr5
-m@t2:=morerpep(rpofp(r,p),rpofp(s,q),m):more(pofrp(rpofp(r,p)),pofrp(rpofp(s,q)))
--ivr5
-m@morepirp:=ismore12(pofrp(rpofp(r,p)),r,pofrp(rpofp(s,q)),s,isprp2(r,p),isprp2(s,q),t2".ivr5"):more(r,s)
-q@[l:less(r,s)]
-lessperp:=satz121(rpofp(s,q),rpofp(r,p),moreperp(s,r,q,p,lemma2(r,s,l))):less"rp"(rpofp(r,p),rpofp(s,q))
-q@[l:less"rp"(rpofp(r,p),rpofp(s,q))]
-lesspirp:=lemma1(s,r,morepirp(s,r,q,p,satz122(rpofp(r,p),rpofp(s,q),l))):less(r,s)
-r@s01:=setof(real,[x:real]lessis(x,r)):set(real)
-s02:=setof(real,[x:real]more(x,r)):set(real)
-+5r205
-s@[n:not(in(s,s01))]
-t1:=th3"l.imp"(lessis(s,r),in(s,s01),n,[t:lessis(s,r)]estii(real,[x:real]lessis(x,r),s,t)):not(lessis(s,r))
-t2:=estii(real,[x:real]more(x,r),s,satz167k(s,r,t1)):in(s,s02)
--5r205
-vb00:=[x:real][t:not(in(x,s01))]t2".5r205"(x,t):all([x:real]or(in(x,s01),in(x,s02)))
-+*5r205
-r@t3:=estii(real,[x:real]lessis(x,r),r,lessisi2(r,r,refis(real,r))):in(r,s01)
--5r205
-r@vb01a:=nonemptyi(real,s01,r,t3".5r205"):nonempty(real,s01)
-+*5r205
-r@t4:=ismore2(pl(r,0),r,pl(r,1rl),pl02(r,0,refis(real,0)),satz188k(1rl,0,r,satz169a(1rl,pos1))):more(pl(r,1rl),r)
-t5:=estii(real,[x:real]more(x,r),pl(r,1rl),t4):in(pl(r,1rl),s02)
--5r205
-r@vb01b:=nonemptyi(real,s02,pl(r,1rl),t5".5r205"):nonempty(real,s02)
-+*5r205
-s@[i:in(s,s01)][t:real][j:in(t,s02)]
-t6:=satz172a(s,r,t,estie(real,[x:real]lessis(x,r),s,i),lemma1(t,r,estie(real,[x:real]more(x,r),t,j))):less(s,t)
--5r205
-r@vb02:=[x:real][t:in(x,s01)][y:real][u:in(y,s02)]t6".5r205"(x,t,y,u):all([x:real][t:in(x,s01)]all([y:real][u:in(y,s02)]less(x,y)))
-s@[l:less(s,r)]
-vb03a:=estii(real,[x:real]lessis(x,r),s,lessisi1(s,r,l)):in(s,s01)
-s@[m:more(s,r)]
-vb03b:=estii(real,[x:real]more(x,r),s,m):in(s,s02)
-r@s11:=setof(real,[x:real]less(x,r)):set(real)
-s12:=setof(real,[x:real]moreis(x,r)):set(real)
-+*5r205
-s@[n:not(in(s,s11))]
-t7:=th3"l.imp"(less(s,r),in(s,s11),n,[t:less(s,r)]estii(real,[x:real]less(x,r),s,t)):not(less(s,r))
-t8:=estii(real,[x:real]moreis(x,r),s,satz167f(s,r,t7)):in(s,s12)
--5r205
-r@vb10:=[x:real][t:not(in(x,s11))]t8".5r205"(x,t):all([x:real]or(in(x,s11),in(x,s12)))
-+*5r205
-r@t9:=isless2(pl(r,0),r,mn(r,1rl),pl02(r,0,refis(real,0)),satz188m(m0(1rl),0,r,satz169c(m0(1rl),satz176a(1rl,pos1)))):less(mn(r,1rl),r)
-t10:=estii(real,[x:real]less(x,r),mn(r,1rl),t9):in(mn(r,1rl),s11)
--5r205
-r@vb11a:=nonemptyi(real,s11,mn(r,1rl),t10".5r205"):nonempty(real,s11)
-+*5r205
-r@t11:=estii(real,[x:real]moreis(x,r),r,moreisi2(r,r,refis(real,r))):in(r,s12)
--5r205
-r@vb11b:=nonemptyi(real,s12,r,t11".5r205"):nonempty(real,s12)
-+*5r205
-s@[i:in(s,s11)][t:real][j:in(t,s12)]
-t12:=satz172b(s,r,t,estie(real,[x:real]less(x,r),s,i),satz168a(t,r,estie(real,[x:real]moreis(x,r),t,j))):less(s,t)
--5r205
-r@vb12:=[x:real][t:in(x,s11)][y:real][u:in(y,s12)]t12".5r205"(x,t,y,u):all([x:real][t:in(x,s11)]all([y:real][u:in(y,s12)]less(x,y)))
-s@[l:less(s,r)]
-vb13a:=estii(real,[x:real]less(x,r),s,l):in(s,s11)
-s@[m:more(s,r)]
-vb13b:=estii(real,[x:real]moreis(x,r),s,moreisi1(s,r,m)):in(s,s12)
-@2rl:=pl(1rl,1rl):real
-pos2:=pospl(1rl,1rl,pos1,pos1):pos(2rl)
-half:=ov(1rl,2rl,pnot0(2rl,pos2)):real
-poshalf:=posovpp(1rl,2rl,pnot0(2rl,pos2),pos1,pos2):pos(half)
-+*ivr5
-r@t3:=tris(real,pl(r,r),pl(ts(1rl,r),ts(1rl,r)),ts(2rl,r),ispl12(r,ts(1rl,r),r,ts(1rl,r),satz195c(r),satz195c(r)),distpt1(1rl,1rl,r)):is(pl(r,r),ts(2rl,r))
-t4:=tr4is(real,ts(half,pl(r,r)),ts(half,ts(2rl,r)),ts(ts(half,2rl),r),ts(1rl,r),r,ists2(pl(r,r),ts(2rl,r),half,t3),assts2(half,2rl,r),ists1(ts(half,2rl),1rl,r,satz204e(1rl,2rl,pnot0(2rl,pos2))),satz195b(r)):is(ts(half,pl(r,r)),r)
--ivr5
-s@[l:less(r,s)]
-+*ivr5
-l@t5:=satz203k(pl(r,r),pl(r,s),half,satz188m(r,s,r,l),poshalf):less(ts(half,pl(r,r)),ts(half,pl(r,s)))
--ivr5
-l@lemma3:=isless1(ts(half,pl(r,r)),r,ts(half,pl(r,s)),t4".ivr5",t5".ivr5"):less(r,ts(half,pl(r,s)))
-+*ivr5
-l@t6:=satz203k(pl(r,s),pl(s,s),half,satz188f(r,s,s,l),poshalf):less(ts(half,pl(r,s)),ts(half,pl(s,s)))
--ivr5
-l@lemma4:=isless2(ts(half,pl(s,s)),s,ts(half,pl(r,s)),t4".ivr5"(s),t6".ivr5"):less(ts(half,pl(r,s)),s)
-[p:pos(r)]
-lemma5:=satz169b(s,trmore(s,r,0,lemma2(r,s,l),satz169a(r,p))):pos(s)
-@[s1:set(real)][s2:set(real)][p0:all([x:real]or(in(x,s1),in(x,s2)))][p1a:nonempty(real,s1)][p1b:nonempty(real,s2)][p2:all([x:real][t:in(x,s1)]all([y:real][u:in(y,s2)]less(x,y)))]
-+*5r205
-s2@[r:real]
-prop1:=all([x:real][t:less(x,r)]in(x,s1)):'prop'
-prop2:=all([x:real][t:more(x,r)]in(x,s2)):'prop'
-prop3:=and(prop1,prop2):'prop'
-p2@[x:real][y:real][px:prop3(x)][py:prop3(y)][l:less(x,y)]
-mxy:=ts(half,pl(x,y)):real
-t13:=lemma2(x,mxy,lemma3(x,y,l)):more(mxy,x)
-t14:=lemma4(x,y,l):less(mxy,y)
-t15:=<t14><mxy>ande1(prop1(y),prop2(y),py):in(mxy,s1)
-t16:=<t13><mxy>ande2(prop1(x),prop2(x),px):in(mxy,s2)
-t17:=<t16><mxy><t15><mxy>p2:less(mxy,mxy)
-t18:=<refis(real,mxy)>ec3e31(is(mxy,mxy),more(mxy,mxy),less(mxy,mxy),satz167b(mxy,mxy),t17):con
-py@t19:=[t:less(x,y)]t18(t):not(less(x,y))
-t20:=[t:more(x,y)]t18(y,x,py,px,lemma1(x,y,t)):not(more(x,y))
-t21:=or3e1(is(x,y),more(x,y),less(x,y),satz167a(x,y),t20,t19):is(x,y)
-p2@t22:=[x:real][y:real][t:prop3(x)][u:prop3(y)]t21(x,y,t,u):amone(real,[x:real]prop3(x))
-[case1:some([x:real]and(pos(x),in(x,s1)))][r:real][a:and(pos(r),in(r,s1))]
-t23:=ande1(pos(r),in(r,s1),a):pos(r)
-t24:=ande2(pos(r),in(r,s1),a):in(r,s1)
-sc1:=setof(cut,[x:cut]in(pofrp(x),s1)):set(cut)
-sc2:=setof(cut,[x:cut]in(pofrp(x),s2)):set(cut)
-[r0:cut][i:in(pofrp(r0),s1)]
-t25:=estii(cut,[x:cut]in(pofrp(x),s1),r0,i):in"rp"(r0,sc1)
-r0@[i:in"rp"(r0,sc1)]
-t26:=estie(cut,[x:cut]in(pofrp(x),s1),r0,i):in(pofrp(r0),s1)
-r0@[i:in(pofrp(r0),s2)]
-t27:=estii(cut,[x:cut]in(pofrp(x),s2),r0,i):in"rp"(r0,sc2)
-r0@[i:in"rp"(r0,sc2)]
-t28:=estie(cut,[x:cut]in(pofrp(x),s2),r0,i):in(pofrp(r0),s2)
-r0@t29:=th9"l.or"(in(pofrp(r0),s1),in(pofrp(r0),s2),in"rp"(r0,sc1),in"rp"(r0,sc2),<pofrp(r0)>p0,[t:in(pofrp(r0),s1)]t25(t),[t:in(pofrp(r0),s2)]t27(t)):or(in"rp"(r0,sc1),in"rp"(r0,sc2))
-a@pr1:=rpofp(r,t23):cut
-t30:=isp(real,[x:real]in(x,s1),r,pofrp(pr1),t24,isprp1(r,t23)):in(pofrp(pr1),s1)
-t31:=nonemptyi(cut,sc1,pr1,t25(pr1,t30)):nonempty(cut,sc1)
-[s:real][i:in(s,s2)]
-t32:=<i><s><t24><r>p2:less(r,s)
-t33:=lemma5(r,s,t32,t23):pos(s)
-ps1:=rpofp(s,t33):cut
-t34:=isp(real,[x:real]in(x,s2),s,pofrp(ps1),i,isprp1(s,t33)):in(pofrp(ps1),s2)
-t35:=nonemptyi(cut,sc2,ps1,t27(ps1,t34)):nonempty(cut,sc2)
-a@t36:=nonemptyapp(real,s2,p1b,nonempty(cut,sc2),[x:real][t:in(x,s2)]t35(x,t)):nonempty(cut,sc2)
-r0@[i:in"rp"(r0,sc1)][s0:cut][j:in"rp"(s0,sc2)]
-t37:=<t28(s0,j)><pofrp(s0)><t26(r0,i)><pofrp(r0)>p2:less(pofrp(r0),pofrp(s0))
-t38:=lessrpip(r0,s0,t37):less"rp"(r0,s0)
-a@stc:=schnitt(sc1,sc2,[x:cut]t29(x),t31,t36,[x:cut][t:in"rp"(x,sc1)][y:cut][u:in"rp"(y,sc2)]t38(x,t,y,u)):cut
-t39:=satzp205a(sc1,sc2,[x:cut]t29(x),t31,t36,[x:cut][t:in"rp"(x,sc1)][y:cut][u:in"rp"(y,sc2)]t38(x,t,y,u)):all"rp"([x:cut][t:less"rp"(x,stc)]in"rp"(x,sc1))
-t40:=satzp205b(sc1,sc2,[x:cut]t29(x),t31,t36,[x:cut][t:in"rp"(x,sc1)][y:cut][u:in"rp"(y,sc2)]t38(x,t,y,u)):all"rp"([x:cut][t:more"rp"(x,stc)]in"rp"(x,sc2))
-stp:=pofrp(stc):real
-t41:=posi(stc):pos(stp)
-[s:real][l:less(s,stp)][p:pos(s)]
-ps2:=rpofp(s,p):cut
-t42:=lessrpip(ps2,stc,isless1(s,pofrp(ps2),stp,isprp1(s,p),l)):less"rp"(ps2,stc)
-t43:=<t42><ps2>t39:in"rp"(ps2,sc1)
-t44:=isp(real,[x:real]in(x,s1),pofrp(ps2),s,t26(ps2,t43),isprp2(s,p)):in(s,s1)
-l@[n:not(pos(s))][i:in(s,s2)]
-t45:=<i><s><t24><r>p2:less(r,s)
-t46:=<lemma5(r,s,t45,t23)>n:con
-n@t47:=ore1(in(s,s1),in(s,s2),<s>p0,[t:in(s,s2)]t46(t)):in(s,s1)
-l@t48:=th1"l.imp"(pos(s),in(s,s1),[t:pos(s)]t44(t),[t:not(pos(s))]t47(t)):in(s,s1)
-s@[m:more(s,stp)]
-t49:=lemma5(stp,s,lemma1(s,stp,m),t41):pos(s)
-ps3:=rpofp(s,t49):cut
-t50:=morerpip(ps3,stc,ismore1(s,pofrp(ps3),stp,isprp1(s,t49),m)):more"rp"(ps3,stc)
-t51:=<t50><ps3>t40:in"rp"(ps3,sc2)
-t52:=isp(real,[x:real]in(x,s2),pofrp(ps3),s,t28(ps3,t51),isprp2(s,t49)):in(s,s2)
-a@t53:=andi(prop1(stp),prop2(stp),[x:real][t:less(x,stp)]t48(x,t),[x:real][t:more(x,stp)]t52(x,t)):prop3(stp)
-t54:=somei(real,[x:real]prop3(x),stp,t53):some([x:real]prop3(x))
-case1@t55:=someapp(real,[x:real]and(pos(x),in(x,s1)),case1,some([x:real]prop3(x)),[x:real][t:and(pos(x),in(x,s1))]t54(x,t)):some([x:real]prop3(x))
-p2@[case2:some([x:real]and(neg(x),in(x,s2)))]
-sp1:=setof(real,[x:real]in(m0(x),s1)):set(real)
-sp2:=setof(real,[x:real]in(m0(x),s2)):set(real)
-[r:real][i:in(m0(r),s1)]
-t56:=estii(real,[x:real]in(m0(x),s1),r,i):in(r,sp1)
-r@[i:in(r,sp1)]
-t57:=estie(real,[x:real]in(m0(x),s1),r,i):in(m0(r),s1)
-r@[i:in(m0(r),s2)]
-t58:=estii(real,[x:real]in(m0(x),s2),r,i):in(r,sp2)
-r@[i:in(r,sp2)]
-t59:=estie(real,[x:real]in(m0(x),s2),r,i):in(m0(r),s2)
-r@t60:=comor(in(r,sp1),in(r,sp2),th9"l.or"(in(m0(r),s1),in(m0(r),s2),in(r,sp1),in(r,sp2),<m0(r)>p0,[t:in(m0(r),s1)]t56(t),[t:in(m0(r),s2)]t58(t))):or(in(r,sp2),in(r,sp1))
-[i:in(r,s2)]
-t61:=t58(m0(r),isp(real,[x:real]in(x,s2),r,m0(m0(r)),i,satz177a(r))):in(m0(r),sp2)
-t62:=nonemptyi(real,sp2,m0(r),t61):nonempty(real,sp2)
-case2@t63:=nonemptyapp(real,s2,p1b,nonempty(real,sp2),[x:real][t:in(x,s2)]t62(x,t)):nonempty(real,sp2)
-r@[i:in(r,s1)]
-t64:=t56(m0(r),isp(real,[x:real]in(x,s1),r,m0(m0(r)),i,satz177a(r))):in(m0(r),sp1)
-t65:=nonemptyi(real,sp1,m0(r),t64):nonempty(real,sp1)
-case2@t66:=nonemptyapp(real,s1,p1a,nonempty(real,sp1),[x:real][t:in(x,s1)]t65(x,t)):nonempty(real,sp1)
-r@[i:in(r,sp2)][s:real][j:in(s,sp1)]
-t67:=<t59(r,i)><m0(r)><t57(s,j)><m0(s)>p2:less(m0(s),m0(r))
-t68:=lemma1(s,r,satz183d(s,r,t67)):less(r,s)
-r@[a:and(neg(r),in(r,s2))]
-t69:=satz176c(r,ande1(neg(r),in(r,s2),a)):pos(m0(r))
-t70:=isp(real,[x:real]in(x,s2),r,m0(m0(r)),ande2(neg(r),in(r,s2),a),satz177a(r)):in(m0(m0(r)),s2)
-t71:=andi(pos(m0(r)),in(m0(r),sp2),t69,t58(m0(r),t70)):and(pos(m0(r)),in(m0(r),sp2))
-t72:=somei(real,[x:real]and(pos(x),in(x,sp2)),m0(r),t71):some([x:real]and(pos(x),in(x,sp2)))
-case2@t73:=someapp(real,[x:real]and(neg(x),in(x,s2)),case2,some([x:real]and(pos(x),in(x,sp2))),[x:real][t:and(neg(x),in(x,s2))]t72(x,t)):some([x:real]and(pos(x),in(x,sp2)))
-t74:=t55(sp2,sp1,[x:real]t60(x),t63,t66,[x:real][t:in(x,sp2)][y:real][u:in(y,sp1)]t68(x,t,y,u),t73):some([x:real]prop3(sp2,sp1,x))
-[r:real][p:prop3(sp2,sp1,r)][s:real][l:less(s,m0(r))]
-t75:=ismore2(m0(m0(r)),r,m0(s),satz177(r),satz183c(s,m0(r),l)):more(m0(s),r)
-t76:=<t75><m0(s)>ande2(prop1(sp2,sp1,r),prop2(sp2,sp1,r),p):in(m0(s),sp1)
-t77:=isp(real,[x:real]in(x,s1),m0(m0(s)),s,t57(m0(s),t76),satz177(s)):in(s,s1)
-s@[m:more(s,m0(r))]
-t78:=isless2(m0(m0(r)),r,m0(s),satz177(r),satz183a(s,m0(r),m)):less(m0(s),r)
-t79:=<t78><m0(s)>ande1(prop1(sp2,sp1,r),prop2(sp2,sp1,r),p):in(m0(s),sp2)
-t80:=isp(real,[x:real]in(x,s2),m0(m0(s)),s,t59(m0(s),t79),satz177(s)):in(s,s2)
-p@t81:=andi(prop1(m0(r)),prop2(m0(r)),[x:real][t:less(x,m0(r))]t77(x,t),[x:real][t:more(x,m0(r))]t80(x,t)):prop3(m0(r))
-t82:=somei(real,[x:real]prop3(x),m0(r),t81):some([x:real]prop3(x))
-case2@t83:=someapp(real,[x:real]prop3(sp2,sp1,x),t74,some([x:real]prop3(x)),[x:real][t:prop3(sp2,sp1,x)]t82(x,t)):some([x:real]prop3(x))
-p2@[notcase1:not(some([x:real]and(pos(x),in(x,s1))))][notcase2:not(some([x:real]and(neg(x),in(x,s2))))][r:real][l:less(r,0)]
-t84:=th4"l.some"(real,[x:real]and(neg(x),in(x,s2)),notcase2,r):not(and(neg(r),in(r,s2)))
-t85:=th3"l.and"(neg(r),in(r,s2),t84,satz169d(r,l)):not(in(r,s2))
-t86:=ore1(in(r,s1),in(r,s2),<r>p0,t85):in(r,s1)
-r@[m:more(r,0)]
-t87:=th4"l.some"(real,[x:real]and(pos(x),in(x,s1)),notcase1,r):not(and(pos(r),in(r,s1)))
-t88:=th3"l.and"(pos(r),in(r,s1),t87,satz169b(r,m)):not(in(r,s1))
-t89:=ore2(in(r,s1),in(r,s2),<r>p0,t88):in(r,s2)
-notcase2@t90:=andi(prop1(0),prop2(0),[x:real][t:less(x,0)]t86(x,t),[x:real][t:more(x,0)]t89(x,t)):prop3(0)
-t91:=somei(real,[x:real]prop3(x),0,t90):some([x:real]prop3(x))
-notcase1@t92:=th1"l.imp"(some([x:real]and(neg(x),in(x,s2))),some([x:real]prop3(x)),[t:some([x:real]and(neg(x),in(x,s2)))]t83(t),[t:not(some([x:real]and(neg(x),in(x,s2))))]t91(t)):some([x:real]prop3(x))
-p2@t93:=th1"l.imp"(some([x:real]and(pos(x),in(x,s1))),some([x:real]prop3(x)),[t:some([x:real]and(pos(x),in(x,s1)))]t55(t),[t:not(some([x:real]and(pos(x),in(x,s1))))]t92(t)):some([x:real]prop3(x))
-t94:=onei(real,[x:real]prop3(x),t22,t93):one([x:real]prop3(x))
--5r205
-p2@satz205:=t94".5r205":one([x:real]and(all([y:real][t:less(y,x)]in(y,s1)),all([y:real][t:more(y,x)]in(y,s2))))
-dedekind:=satz205:one([x:real]and(all([y:real][t:less(y,x)]in(y,s1)),all([y:real][t:more(y,x)]in(y,s2))))
-schnitt:=ind(real,[x:real]prop3".5r205"(x),satz205):real
-[r:real][l:less(r,schnitt)]
-satz205a:=<l><r>ande1(prop1".5r205"(schnitt),prop2".5r205"(schnitt),oneax(real,[x:real]prop3".5r205"(x),satz205)):in(r,s1)
-r@[m:more(r,schnitt)]
-satz205b:=<m><r>ande2(prop1".5r205"(schnitt),prop2".5r205"(schnitt),oneax(real,[x:real]prop3".5r205"(x),satz205)):in(r,s2)
-@[r0:cut][s0:cut]
-+iva
-dr:=pdofrp(r0):dif
-ds:=pdofrp(s0):dif
-t1:=lemmaivad1(r0,s0):eq"rp"(pd(dr,ds),pdofrp(pl"rp"(r0,s0)))
--iva
-lemmaiva1:=isin(pl(pofrp(r0),pofrp(s0)),pofrp(pl"rp"(r0,s0)),pd(pdofrp(r0),pdofrp(s0)),pdofrp(pl"rp"(r0,s0)),picp(pofrp(r0),pofrp(s0),pdofrp(r0),pdofrp(s0),innclass(pdofrp(r0)),innclass(pdofrp(s0))),innclass(pdofrp(pl"rp"(r0,s0))),t1".iva"):is(pl(pofrp(r0),pofrp(s0)),pofrp(pl"rp"(r0,s0)))
-+*iva
-s0@t2:=lemmaivad2(r0,s0):eq"rp"(td(dr,ds),pdofrp(ts"rp"(r0,s0)))
--iva
-s0@lemmaiva2:=isin(ts(pofrp(r0),pofrp(s0)),pofrp(ts"rp"(r0,s0)),td(pdofrp(r0),pdofrp(s0)),pdofrp(ts"rp"(r0,s0)),tict(pofrp(r0),pofrp(s0),pdofrp(r0),pdofrp(s0),innclass(pdofrp(r0)),innclass(pdofrp(s0))),innclass(pdofrp(ts"rp"(r0,s0))),t2".iva"):is(ts(pofrp(r0),pofrp(s0)),pofrp(ts"rp"(r0,s0)))
-[m:more(pofrp(r0),pofrp(s0))]
-+*iva
-m@t3:=moreex(pofrp(r0),pofrp(s0),dr,ds,innclass(dr),innclass(ds),m):mored(dr,ds)
--iva
-m@lemmaiva3:=lemmaivad3(r0,s0,t3".iva"):more"rp"(r0,s0)
-s0@[m:more"rp"(r0,s0)]
-+*iva
-m@[l:less(pofrp(r0),pofrp(s0))]
-t4:=satz121(s0,r0,lemmaiva3(s0,r0,lemma2(pofrp(r0),pofrp(s0),l))):less"rp"(r0,s0)
-m@t5:=ec3e23(is"rp"(r0,s0),more"rp"(r0,s0),less"rp"(r0,s0),satz123b(r0,s0),m):not(less"rp"(r0,s0))
-t6:=th3"l.imp"(less(pofrp(r0),pofrp(s0)),less"rp"(r0,s0),t5,[t:less(pofrp(r0),pofrp(s0))]t4(t)):not(less(pofrp(r0),pofrp(s0)))
-t7:=ec3e21(is"rp"(r0,s0),more"rp"(r0,s0),less"rp"(r0,s0),satz123b(r0,s0),m):nis"rp"(r0,s0)
-t8:=th3"l.imp"(is(pofrp(r0),pofrp(s0)),is"rp"(r0,s0),t7,[t:is(pofrp(r0),pofrp(s0))]isrpip(r0,s0,t)):nis(pofrp(r0),pofrp(s0))
--iva
-m@lemmaiva4:=or3e2(is(pofrp(r0),pofrp(s0)),more(pofrp(r0),pofrp(s0)),less(pofrp(r0),pofrp(s0)),satz167a(pofrp(r0),pofrp(s0)),t6".iva",t8".iva"):more(pofrp(r0),pofrp(s0))
-@[x:nat][y:nat][m:more(rlofnt(x),rlofnt(y))]
-+*iva
-m@t9:=lemmaiva3(rpofnt(x),rpofnt(y),m):more"rp"(rpofnt(x),rpofnt(y))
-t10:=satz154d(rtofn(x),rtofn(y),t9):more"rt"(rtofn(x),rtofn(y))
-t11:=moree"rt"(rtofn(x),rtofn(y),fr(x,1),fr(y,1),inclass"rt"(fr(x,1)),inclass"rt"(fr(y,1)),t10):moref(fr(x,1),fr(y,1))
--iva
-m@lemmaiva5:=satz111a(x,y,t11".iva"):more"n"(x,y)
-y@[m:more"n"(x,y)]
-+*iva
-m@t12:=satz111d(x,y,m):moref(fr(x,1),fr(y,1))
-t13:=morei"rt"(rtofn(x),rtofn(y),fr(x,1),fr(y,1),inclass"rt"(fr(x,1)),inclass"rt"(fr(y,1)),t12):more"rt"(rtofn(x),rtofn(y))
-t14:=satz154a(rtofn(x),rtofn(y),t13):more"rp"(rpofnt(x),rpofnt(y))
--iva
-m@lemmaiva6:=lemmaiva4(rpofnt(x),rpofnt(y),t14".iva"):more(rlofnt(x),rlofnt(y))
-@[r:real]
-+int
-a0ir@[i:intrl(r)]
-t1:=intabsd(a0,intrlex(r,a0,a0ir,i)):intd(absd(a0))
-t2:=intrlin(abs(r),absd(a0),aica,t1):intrl(abs(r))
--int
-[i:intrl(r)]
-intabs:=realapp1(r,intrl(abs(r)),[x:dif][t:inn(x,class(r))]t2".int"(r,x,t,i)):intrl(abs(r))
-+*int
-i@t3:=intm0d(a0,intrlex(r,a0,a0ir,i)):intd(m0d(a0))
-t4:=intrlin(m0(r),m0d(a0),micm0,t3):intrl(m0(r))
--int
-i@intm0:=realapp1(r,intrl(m0(r)),[x:dif][t:inn(x,class(r))]t4".int"(r,x,t,i)):intrl(m0(r))
-+*int
-b1is@[i:intrl(r)][j:intrl(s)]
-t5:=intpd(a1,b1,intrlex(r,a1,a1ir,i),intrlex(s,b1,b1is,j)):intd(pd(a1,b1))
-t6:=intrlin(pl(r,s),pd(a1,b1),picp,t5):intrl(pl(r,s))
--int
-i@[s:real][j:intrl(s)]
-intpl:=realapp2(r,s,intrl(pl(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t6".int"(r,s,x,y,t,u,i,j)):intrl(pl(r,s))
-intmn:=intpl(r,i,m0(s),intm0(s,j)):intrl(mn(r,s))
-+*int
-j@t7:=inttd(a1,b1,intrlex(r,a1,a1ir,i),intrlex(s,b1,b1is,j)):intd(td(a1,b1))
-t8:=intrlin(ts(r,s),td(a1,b1),tict,t7):intrl(ts(r,s))
--int
-j@intts:=realapp2(r,s,intrl(ts(r,s)),[x:dif][y:dif][t:inn(x,class(r))][u:inn(y,class(s))]t8".int"(r,s,x,y,t,u,i,j)):intrl(ts(r,s))
-r@[n:natrl(r)]
-+ivr24
-t1:=satz24a(ntofrl(r,n)):lessis"n"(1,ntofrl(r,n))
-t2:=th3"l.imp"(more(1rl,r),more"n"(1,ntofrl(r,n)),satz10d(1,ntofrl(r,n),t1),[t:more(1rl,r)]lemmaiva5(1,ntofrl(r,n),ismore2(r,rlofnt(ntofrl(r,n)),1rl,isrlnt1(r,n),t))):not(more(1rl,r))
--ivr24
-satzr24:=satz167e(1rl,r,t2".ivr24"):lessis(1rl,r)
-r@[i:intrl(r)][s:real][j:intrl(s)][l:less(r,s)]
-+ivr25
-t1:=satz182d(s,r,lemma2(r,s,l)):pos(mn(s,r))
-t2:=intmn(s,j,r,i):intrl(mn(s,r))
-t3:=posintnatrl(mn(s,r),t1,t2):natrl(mn(s,r))
-t4:=satzr24(mn(s,r),t3):lessis(1rl,mn(s,r))
-t5:=th9"l.or"(less(1rl,mn(s,r)),is(1rl,mn(s,r)),less(pl(1rl,r),pl(mn(s,r),r)),is(pl(1rl,r),pl(mn(s,r),r)),t4,[t:less(1rl,mn(s,r))]satz188f(1rl,mn(s,r),r,t),[t:is(1rl,mn(s,r))]ispl1(1rl,mn(s,r),r,t)):lessis(pl(1rl,r),pl(mn(s,r),r))
--ivr25
-satzr25:=islessis12(pl(1rl,r),pl(r,1rl),pl(mn(s,r),r),s,compl(1rl,r),plmn(s,r),t5".ivr25"):lessis(pl(r,1rl),s)
-@[x:nat][y:nat]
-+ivr155
-t1:=lemmaiva1(rpofnt(x),rpofnt(y)):is(pl(rlofnt(x),rlofnt(y)),pofrp(pl"rp"(rpofnt(x),rpofnt(y))))
-t2:=isrpep(rpofnt(pl"n"(x,y)),pl"rp"(rpofnt(x),rpofnt(y)),satz155e(x,y)):is(rlofnt(pl"n"(x,y)),pofrp(pl"rp"(rpofnt(x),rpofnt(y))))
--ivr155
-satzr155a:=tris2(real,rlofnt(pl"n"(x,y)),pl(rlofnt(x),rlofnt(y)),pofrp(pl"rp"(rpofnt(x),rpofnt(y))),t2".ivr155",t1".ivr155"):is(rlofnt(pl"n"(x,y)),pl(rlofnt(x),rlofnt(y)))
-satzr155b:=symis(real,rlofnt(pl"n"(x,y)),pl(rlofnt(x),rlofnt(y)),satzr155a):is(pl(rlofnt(x),rlofnt(y)),rlofnt(pl"n"(x,y)))
-+*ivr155
-y@t3:=lemmaiva2(rpofnt(x),rpofnt(y)):is(ts(rlofnt(x),rlofnt(y)),pofrp(ts"rp"(rpofnt(x),rpofnt(y))))
-t4:=isrpep(rpofnt(ts"n"(x,y)),ts"rp"(rpofnt(x),rpofnt(y)),satz155f(x,y)):is(rlofnt(ts"n"(x,y)),pofrp(ts"rp"(rpofnt(x),rpofnt(y))))
--ivr155
-y@satzr155c:=tris2(real,rlofnt(ts"n"(x,y)),ts(rlofnt(x),rlofnt(y)),pofrp(ts"rp"(rpofnt(x),rpofnt(y))),t4".ivr155",t3".ivr155"):is(rlofnt(ts"n"(x,y)),ts(rlofnt(x),rlofnt(y)))
-satzr155d:=symis(real,rlofnt(ts"n"(x,y)),ts(rlofnt(x),rlofnt(y)),satzr155c):is(ts(rlofnt(x),rlofnt(y)),rlofnt(ts"n"(x,y)))
-@[t:real][r:real][s:real][a:and(not(neg(r)),is(ts(r,r),t))][b:and(not(neg(s)),is(ts(s,s),t))]
-+7r161
-[c0:dif][cit:inn(c0,class(t))][a0:dif][air:inn(a0,class(r))][b0:dif][bis:inn(b0,class(s))]
-t1:=th3"l.imp"(negd(a0),neg(r),ande1(not(neg(r)),is(ts(r,r),t),a),[u:negd(a0)]negin(r,a0,air,u)):not(negd(a0))
-t2:=th3"l.imp"(negd(b0),neg(s),ande1(not(neg(s)),is(ts(s,s),t),b),[u:negd(b0)]negin(s,b0,bis,u)):not(negd(b0))
-t3:=isex(ts(r,r),t,td(a0,a0),c0,tict(r,r,a0,a0,air,air),cit,ande2(not(neg(r)),is(ts(r,r),t),a)):eq"rp"(td(a0,a0),c0)
-t4:=isex(ts(s,s),t,td(b0,b0),c0,tict(s,s,b0,b0,bis,bis),cit,ande2(not(neg(s)),is(ts(s,s),t),b)):eq"rp"(td(b0,b0),c0)
-t5:=isin(r,s,a0,b0,air,bis,satzd161b(c0,a0,b0,t1,t2,t3,t4)):is(r,s)
--7r161
-satzr161b:=realapp3(t,r,s,is(r,s),[x:dif][y:dif][z:dif][u:inn(x,class(t))][v:inn(y,class(r))][w:inn(z,class(s))]t5".7r161"(x,u,y,v,z,w)):is(r,s)
-t@[n:not(neg(t))]
-+*7r161
-n@[c0:dif][cit:inn(c0,class(t))]
-t6:=th3"l.imp"(negd(c0),neg(t),n,[u:negd(c0)]negin(t,c0,cit,u)):not(negd(c0))
-[a0:dif][a:and(not(negd(a0)),eq"rp"(td(a0,a0),c0))]
-ar:=realof(a0):real
-t7:=th3"l.imp"(neg(ar),negd(a0),ande1(not(negd(a0)),eq"rp"(td(a0,a0),c0),a),[u:neg(ar)]negex(ar,a0,innclass(a0),u)):not(neg(ar))
-t8:=isin(ts(ar,ar),t,td(a0,a0),c0,tict(ar,ar,a0,a0,innclass(a0),innclass(a0)),cit,ande2(not(negd(a0)),eq"rp"(td(a0,a0),c0),a)):is(ts(ar,ar),t)
-t9:=andi(not(neg(ar)),is(ts(ar,ar),t),t7,t8):and(not(neg(ar)),is(ts(ar,ar),t))
-t10:=somei(real,[u:real]and(not(neg(u)),is(ts(u,u),t)),ar,t9):some([u:real]and(not(neg(u)),is(ts(u,u),t)))
-cit@t11:=someapp(dif,[x:dif]and(not(negd(x)),eq"rp"(td(x,x),c0)),satzd161a(c0,t6),some([u:real]and(not(neg(u)),is(ts(u,u),t))),[x:dif][v:and(not(negd(x)),eq"rp"(td(x,x),c0))]t10(x,v)):some([u:real]and(not(neg(u)),is(ts(u,u),t)))
--7r161
-n@satzr161a:=realapp1(t,some([u:real]and(not(neg(u)),is(ts(u,u),t))),[x:dif][v:inn(x,class(t))]t11".7r161"(x,v)):some([u:real]and(not(neg(u)),is(ts(u,u),t)))
-satzr161:=onei(real,[u:real]and(not(neg(u)),is(ts(u,u),t)),[u:real][v:real][a:and(not(neg(u)),is(ts(u,u),t))][b:and(not(neg(v)),is(ts(v,v),t))]satzr161b(u,v,a,b),satzr161a):one([u:real]and(not(neg(u)),is(ts(u,u),t)))
-sqrt:=ind(real,[u:real]and(not(neg(u)),is(ts(u,u),t)),satzr161):real
-+*7r161
-n@t12:=oneax(real,[u:real]and(not(neg(u)),is(ts(u,u),t)),satzr161):and(not(neg(sqrt)),is(ts(sqrt,sqrt),t))
--7r161
-n@thsqrt1a:=ande1(not(neg(sqrt)),is(ts(sqrt,sqrt),t),t12".7r161"):not(neg(sqrt))
-thsqrt1b:=ande2(not(neg(sqrt)),is(ts(sqrt,sqrt),t),t12".7r161"):is(ts(sqrt,sqrt),t)
-[x:real][o:not(neg(x))][i:is(ts(x,x),t)]
-thsqrt2:=satzr161b(x,sqrt,andi(not(neg(x)),is(ts(x,x),t),o,i),t12".7r161"):is(x,sqrt(t,n))
-o@[i:is(t,ts(x,x))]
-thsqrt3:=symis(real,x,sqrt(t,n),thsqrt2(symis(real,t,ts(x,x),i))):is(sqrt(t,n),x)
-@[r:real][s:real][n:not(neg(r))][o:not(neg(s))][i:is(r,s)]
-issqrt:=thsqrt2(s,o,sqrt(r,n),thsqrt1a(r,n),tris(real,ts(sqrt(r,n),sqrt(r,n)),r,s,thsqrt1b(r,n),i)):is(sqrt(r,n),sqrt(s,o))
-r@[n:not(neg(r))][i:is(r,0)]
-sqrt0:=thsqrt3(r,n,0,0notn(0,refis(real,0)),tris2(real,r,ts(0,0),0,i,ts01(0,0,refis(real,0)))):is(sqrt(r,n),0)
-n@[o:nis(r,0)]
-+sqrt
-t1:=th3"l.imp"(is(sqrt(r,n),0),is(r,0),o,[t:is(sqrt(r,n),0)]tris1(real,r,0,ts(sqrt(r,n),sqrt(r,n)),thsqrt1b(r,n),ts01(sqrt(r,n),sqrt(r,n),t))):nis(sqrt(r,n),0)
--sqrt
-sqrtnot0:=or3e2(is(sqrt(r,n),0),pos(sqrt(r,n)),neg(sqrt(r,n)),axrlo(sqrt(r,n)),thsqrt1a(r,n),t1".sqrt"):pos(sqrt(r,n))
-@[r:real][s:real][t:real][n:nis(t,0)]
-+v0
-t1:=tr3is(real,ts(t,ts(r,ov(s,t,n))),ts(ts(r,ov(s,t,n)),t),ts(r,ts(ov(s,t,n),t)),ts(r,s),comts(t,ts(r,ov(s,t,n))),assts1(r,ov(s,t,n),t),ists2(ts(ov(s,t,n),t),s,r,satz204e(s,t,n))):is(ts(t,ts(r,ov(s,t,n))),ts(r,s))
--v0
-lemma6:=satz204g(ts(r,s),t,ts(r,ov(s,t,n)),n,t1".v0"):is(ts(r,ov(s,t,n)),ov(ts(r,s),t,n))
-+*v0
-n@t2:=tris(real,ts(t,pl(ov(r,t,n),ov(s,t,n))),pl(ts(t,ov(r,t,n)),ts(t,ov(s,t,n))),pl(r,s),disttp2(t,ov(r,t,n),ov(s,t,n)),ispl12(ts(t,ov(r,t,n)),r,ts(t,ov(s,t,n)),s,satz204c(r,t,n),satz204c(s,t,n))):is(ts(t,pl(ov(r,t,n),ov(s,t,n))),pl(r,s))
--v0
-n@lemma7:=satz204g(pl(r,s),t,pl(ov(r,t,n),ov(s,t,n)),n,t2".v0"):is(pl(ov(r,t,n),ov(s,t,n)),ov(pl(r,s),t,n))
-r@[n:nis(r,0)]
-lemma8:=satz204b(r,r,n,ov(r,r,n),1rl,satz204c(r,r,n),satz195(r)):is(ov(r,r,n),1rl)
-lemma9:=ore2(is(r,0),is(ov(0,r,n),0),satz192c(r,ov(0,r,n),satz204c(0,r,n)),n):is(ov(0,r,n),0)
-r@[i:is(r,m0(r))]
-+*v0
-i@[p:pos(m0(r))]
-t3:=<isneg(r,m0(r),i,satz176f(r,p))>pnotn(m0(r),p):con
-i@[n:neg(m0(r))]
-t4:=<ispos(r,m0(r),i,satz176d(r,n))>nnotp(m0(r),n):con
--v0
-i@lemma10:=satz176e(r,or3e1(is(m0(r),0),pos(m0(r)),neg(m0(r)),axrlo(m0(r)),[t:pos(m0(r))]t3".v0"(t),[t:neg(m0(r))]t4".v0"(t))):is(r,0)
-r@lemma11:=satz167f(ts(r,r),0,th3"l.imp"(less(ts(r,r),0),neg(ts(r,r)),nnegsq(r),[t:less(ts(r,r),0)]satz169d(ts(r,r),t))):moreis(ts(r,r),0)
-lemma12:=rapp(r,is(ts(r,r),ts(abs(r),abs(r))),[t:pos(r)]satz196a(r,r,t,t),[t:is(r,0)]tris2(real,ts(r,r),ts(abs(r),abs(r)),0,ts01(r,r,t),ts01(abs(r),abs(r),abs0(r,t))),[t:neg(r)]satz196b(r,r,t,t)):is(ts(r,r),ts(abs(r),abs(r)))
-@[x:real][ix:intrl(x)][y:real][iy:intrl(y)][ly:lessis(y,x)]
-+shift
-t1:=satz190a(x,x,1rl,0,moreisi2(x,x,refis(real,x)),satz169a(1rl,natpos(1rl,natrl1))):more(pl(x,1rl),pl(x,0))
-t2:=ismore2(pl(x,0),x,pl(x,1rl),pl02(x,0,refis(real,0)),t1):more(pl(x,1rl),x)
-t3:=satz172d(pl(x,1rl),x,y,t2,satz168b(y,x,ly)):more(pl(x,1rl),y)
-t4:=satz182d(pl(x,1rl),y,t3):pos(mn(pl(x,1rl),y))
-t5:=intmn(pl(x,1rl),intpl(x,ix,1rl,intrl1),y,iy):intrl(mn(pl(x,1rl),y))
-t6:=posintnatrl(mn(pl(x,1rl),y),t4,t5):natrl(mn(pl(x,1rl),y))
--shift
-shiftl:=ntofrl(mn(pl(x,1rl),y),t6".shift"):nat
-[n:1to(shiftl)]
-+*shift
-n@n1:=inn"n"(shiftl,n):nat
-t7:=1top(shiftl,n):lessis"n"(n1,shiftl)
-n2:=rlofnt(n1):real
-t8:=natintrl(n2,natrli(n1)):intrl(n2)
--shift
-n@shiftr:=mn(pl(n2".shift",y),1rl):real
-intshiftr:=intmn(pl(n2".shift",y),intpl(n2".shift",t8".shift",y,iy),1rl,intrl1):intrl(shiftr)
-[m:1to(shiftl)][i:is(shiftr(n),shiftr(m))]
-+*shift
-n@t8a:=tris(real,mn(pl(shiftr(n),1rl),y),mn(pl(n2,y),y),n2,ismn1(pl(mn(pl(n2,y),1rl),1rl),pl(n2,y),y,plmn(pl(n2,y),1rl)),mnpl(n2,y)):is(mn(pl(shiftr(n),1rl),y),n2)
-i@t9a:=ismn1(pl(shiftr(n),1rl),pl(shiftr(m),1rl),y,ispl1(shiftr(n),shiftr(m),1rl,i)):is(mn(pl(shiftr(n),1rl),y),mn(pl(shiftr(m),1rl),y))
-t10a:=tr3is(real,n2(n),mn(pl(shiftr(n),1rl),y),mn(pl(shiftr(m),1rl),y),n2(m),symis(real,mn(pl(shiftr(n),1rl),y),n2,t8a),t9a,t8a(m)):is(n2(n),n2(m))
-t11a:=isntirl(n1(n),n1(m),t10a):is"n"(n1(n),n1(m))
--shift
-i@iseshiftr:=isinne(shiftl,n,m,t11a".shift"):is"e"(1to(shiftl),n,m)
-+*shift
-n@[m:more(shiftr,x)]
-t9:=satz188d(shiftr,x,1rl,m):more(pl(shiftr,1rl),pl(x,1rl))
-t10:=ismore1(pl(shiftr,1rl),pl(n2,y),pl(x,1rl),plmn(pl(n2,y),1rl),t9):more(pl(n2,y),pl(x,1rl))
-t11:=satz188d(pl(n2,y),pl(x,1rl),m0(y),t10):more(mn(pl(n2,y),y),mn(pl(x,1rl),y))
-t12:=ismore1(mn(pl(n2,y),y),n2,mn(pl(x,1rl),y),mnpl(n2,y),t11):more(n2,mn(pl(x,1rl),y))
-t13:=ismore12(n2,rlofnt(ntofrl(n2,natrli(n1))),mn(pl(x,1rl),y),rlofnt(ntofrl(mn(pl(x,1rl),y),t6)),isrlnt1(n2,natrli(n1)),isrlnt1(mn(pl(x,1rl),y),t6),t12):more(rlofnt(ntofrl(n2,natrli(n1))),rlofnt(shiftl))
-t14:=lemmaiva5(ntofrl(n2,natrli(n1)),shiftl,t13):more"n"(ntofrl(n2,natrli(n1)),shiftl)
-t15:=ismore1"n"(ntofrl(n2,natrli(n1)),n1,shiftl,isntrl2(n1),t14):more"n"(n1,shiftl)
-n@t16:=th3"l.imp"(more(shiftr,x),more"n"(n1,shiftl),satz10d(n1,shiftl,t7),[t:more(shiftr,x)]t15(t)):not(more(shiftr,x))
--shift
-n@shiftrls:=satz167e(shiftr,x,t16".shift"):lessis(shiftr,x)
-+*shift
-n@[m:more(y,shiftr)]
-t17:=satz188d(y,shiftr,1rl,m):more(pl(y,1rl),pl(shiftr,1rl))
-t18:=ismore12(pl(y,1rl),pl(1rl,y),pl(shiftr,1rl),pl(n2,y),compl(y,1rl),plmn(pl(n2,y),1rl),t17):more(pl(1rl,y),pl(n2,y))
-t19:=satz188a(1rl,n2,y,t18):more(1rl,n2)
-t20:=lemmaiva5(1,n1,t19):more"n"(1,n1)
-n@t21:=th3"l.imp"(more(y,shiftr),more"n"(1,n1),satz10d(1,n1,satz24a(n1)),[t:more(y,shiftr)]t20(t)):not(more(y,shiftr))
--shift
-n@lsshiftr:=satz167e(y,shiftr,t21".shift"):lessis(y,shiftr)
-ly@[u:real][a:and3(intrl(u),lessis(y,u),lessis(u,x))]
-+*shift
-a@t22:=and3e1(intrl(u),lessis(y,u),lessis(u,x),a):intrl(u)
-t23:=and3e2(intrl(u),lessis(y,u),lessis(u,x),a):lessis(y,u)
-t24:=and3e3(intrl(u),lessis(y,u),lessis(u,x),a):lessis(u,x)
-[l:less(u,x)]
-t25:=satz188f(pl(u,1rl),pl(x,1rl),m0"r"(y),satz188f(u,x,1rl,l)):less(mn(pl(u,1rl),y),mn(pl(x,1rl),y))
-a@[i:is(u,x)]
-t26:=ismn1(pl(u,1rl),pl(x,1rl),y,ispl1(u,x,1rl,i)):is(mn(pl(u,1rl),y),mn(pl(x,1rl),y))
-a@t27:=th9"l.or"(less(u,x),is(u,x),less(mn(pl(u,1rl),y),mn(pl(x,1rl),y)),is(mn(pl(u,1rl),y),mn(pl(x,1rl),y)),t24,[t:less(u,x)]t25(t),[t:is(u,x)]t26(t)):lessis(mn(pl(u,1rl),y),mn(pl(x,1rl),y))
-ul:=shiftl(u,t22,y,iy,t23):nat
-t28:=islessis12(mn(pl(u,1rl),y),rlofnt(ul),mn(pl(x,1rl),y),rlofnt(shiftl),isrlnt1(mn(pl(u,1rl),y),t6(u,t22,y,iy,t23)),isrlnt1(mn(pl(x,1rl),y),t6),t27):lessis(rlofnt(ul),rlofnt(shiftl))
-t29:=th3"l.imp"(more"n"(ul,shiftl),more(rlofnt(ul),rlofnt(shiftl)),satz167d(rlofnt(ul),rlofnt(shiftl),t28),[t:more"n"(ul,shiftl)]lemmaiva6(ul,shiftl,t)):not(more"n"(ul,shiftl))
-t30:=satz10e(ul,shiftl,t29):lessis"n"(ul,shiftl)
--shift
-a@shiftl1:=outn(shiftl,ul".shift",t30".shift"):1to(shiftl)
-+*shift
-a@t31:=isinoutn(shiftl,ul,t30):is"n"(ul,n1(shiftl1))
-t32:=tris(real,mn(pl(u,1rl),y),rlofnt(ul),n2(shiftl1),isrlnt1(mn(pl(u,1rl),y),t6(u,t22,y,iy,t23)),isnterl(ul,n1(shiftl1),t31)):is(mn(pl(u,1rl),y),n2(shiftl1))
-t33:=tris(real,mn(pl(mn(pl(u,1rl),y),y),1rl),mn(pl(u,1rl),1rl),u,ismn1(pl(mn(pl(u,1rl),y),y),pl(u,1rl),1rl,plmn(pl(u,1rl),y)),mnpl(u,1rl)):is(mn(pl(mn(pl(u,1rl),y),y),1rl),u)
--shift
-a@shiftinv1:=tris1(real,u,shiftr(shiftl1),mn(pl(mn(pl(u,1rl),y),y),1rl),t33".shift",ismn1(pl(mn(pl(u,1rl),y),y),pl(n2".shift"(shiftl1),y),1rl,ispl1(mn(pl(u,1rl),y),n2".shift"(shiftl1),y,t32".shift"))):is(u,shiftr(shiftl1))
-shiftinv2:=symis(real,u,shiftr(shiftl1),shiftinv1):is(shiftr(shiftl1),u)
-ly@[alpha:'type']
-seq:=[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]alpha:'type'
-[s:seq]
-proofsirrelevant:=[t:real][it:intrl(t)][lt:lessis(y,t)][tl:lessis(t,x)][u:real][iu:intrl(u)][lu:lessis(y,u)][ul:lessis(u,x)][v:is(t,u)]is"e"(alpha,<tl><lt><it><t>s,<ul><lu><iu><u>s):'prop'
-alpha@[f:seq]
-shiftf:=[t:1to(shiftl)]<shiftrls(t)><lsshiftr(t)><intshiftr(t)><shiftr(t)>f:[t:1to(shiftl)]alpha
-ly@[s:seq(real)]
-inseq:=[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]and3(intrl(<w><v><u><t>s),lessis(y,<w><v><u><t>s),lessis(<w><v><u><t>s,x)):'prop'
-injseq:=[t:real][it:intrl(t)][lt:lessis(y,t)][tl:lessis(t,x)][u:real][iu:intrl(u)][lu:lessis(y,u)][ul:lessis(u,x)][v:is"r"(<tl><lt><it><t>s,<ul><lu><iu><u>s)]is"r"(t,u):'prop'
-[u:real][v:real][a:and3(intrl(v),lessis(y,v),lessis(v,x))]
-+*shift
-a@prop1:=is(u,<t24(v,a)><t23(v,a)><t22(v,a)><v>s):'prop'
--shift
-v@improp:=and(and3(intrl(v),lessis(y,v),lessis(v,x)),[t:and3(intrl(v),lessis(y,v),lessis(v,x))]prop1".shift"(t)):'prop'
-u@imseq:=some([t:real]improp(u,t)):'prop'
-s@surjseq:=[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]imseq(t):'prop'
-perm:=and(injseq,surjseq):'prop'
-[ins:inseq(s)]
-+*shift
-ins@[n:1to(shiftl)]
-ns:=<shiftrls(n)><lsshiftr(n)><intshiftr(n)><shiftr(n)>s:real
-t34:=<shiftrls(n)><lsshiftr(n)><intshiftr(n)><shiftr(n)>ins:and3(intrl(ns),lessis(y,ns),lessis(ns,x))
--shift
-ins@shiftseq:=[t:1to(shiftl)]shiftl1(ns".shift"(t),t34".shift"(t)):[t:1to(shiftl)]1to(shiftl)
-[js:injseq(s)]
-+*shift
-js@[n:1to(shiftl)][m:1to(shiftl)][i:is"e"(1to(shiftl),<n>shiftseq,<m>shiftseq)]
-t35:=isoutne(shiftl,ul(ns(n),t34(n)),t30(ns(n),t34(n)),ul(ns(m),t34(m)),t30(ns(m),t34(m)),i):is"n"(ul(ns(n),t34(n)),ul(ns(m),t34(m)))
-t36:=isrlint(mn(pl(ns(n),1rl),y),t6(ns(n),t22(ns(n),t34(n)),y,iy,t23(ns(n),t34(n))),mn(pl(ns(m),1rl),y),t6(ns(m),t22(ns(m),t34(m)),y,iy,t23(ns(m),t34(m))),t35):is(mn(pl(ns(n),1rl),y),mn(pl(ns(m),1rl),y))
-t37:=satz188b(ns(n),ns(m),1rl,satz188b(pl(ns(n),1rl),pl(ns(m),1rl),m0"r"(y),t36)):is(ns(n),ns(m))
-t38:=<t37><shiftrls(m)><lsshiftr(m)><intshiftr(m)><shiftr(m)><shiftrls(n)><lsshiftr(n)><intshiftr(n)><shiftr(n)>js:is(shiftr(n),shiftr(m))
-t39:=satz188b(n2(n),n2(m),y,satz188b(pl(n2(n),y),pl(n2(m),y),m0(1rl),t38)):is(n2(n),n2(m))
-t40:=isntirl(n1(n),n1(m),t39):is"n"(n1(n),n1(m))
-t41:=isinne(shiftl,n,m,t40):is"e"(1to(shiftl),n,m)
--shift
-js@injshiftseq:=[t:1to(shiftl)][u:1to(shiftl)][v:is"e"(1to(shiftl),<t>shiftseq,<u>shiftseq)]t41".shift"(t,u,v):injective(1to(shiftl),1to(shiftl),shiftseq)
-ins@[pri:proofsirrelevant(real,s)][ss:surjseq(s)]
-+*shift
-ss@[n:1to(shiftl)]
-t42:=<shiftrls(n)><lsshiftr(n)><intshiftr(n)><shiftr(n)>ss:imseq(shiftr(n))
-[u:real][p:improp(shiftr(n),u)]
-t43:=ande1(and3(intrl(u),lessis(y,u),lessis(u,x)),[t:and3(intrl(u),lessis(y,u),lessis(u,x))]prop1(shiftr(n),u,t),p):and3(intrl(u),lessis(y,u),lessis(u,x))
-t44:=ande2"l.r"(and3(intrl(u),lessis(y,u),lessis(u,x)),[t:and3(intrl(u),lessis(y,u),lessis(u,x))]prop1(shiftr(n),u,t),p):is(shiftr(n),<t24(u,t43)><t23(u,t43)><t22(u,t43)><u>s)
-ul1:=shiftl1(u,t43):1to(shiftl)
-t45:=<shiftinv1(u,t43)><shiftrls(ul1)><lsshiftr(ul1)><intshiftr(ul1)><shiftr(ul1)><t24(u,t43)><t23(u,t43)><t22(u,t43)><u>pri:is(<t24(u,t43)><t23(u,t43)><t22(u,t43)><u>s,ns(ul1))
-t46:=shiftinv1(ns(ul1),t34(ul1)):is(ns(ul1),shiftr(<ul1>shiftseq))
-t47:=tr3is(real,shiftr(n),<t24(u,t43)><t23(u,t43)><t22(u,t43)><u>s,ns(ul1),shiftr(<ul1>shiftseq),t44,t45,t46):is(shiftr(n),shiftr(<ul1>shiftseq))
-t48:=iseshiftr(n,<ul1>shiftseq,t47):is"e"(1to(shiftl),n,<ul1>shiftseq)
-t49:=somei(1to(shiftl),[t:1to(shiftl)]is"e"(1to(shiftl),n,<t>shiftseq),ul1,t48):image(1to(shiftl),1to(shiftl),shiftseq,n)
-n@t50:=someapp(real,[t:real]improp(shiftr(n),t),t42,image(1to(shiftl),1to(shiftl),shiftseq,n),[t:real][u:improp(shiftr(n),t)]t49(t,u)):image(1to(shiftl),1to(shiftl),shiftseq,n)
--shift
-ss@surjshiftseq:=[t:1to(shiftl)]t50".shift"(t):surjective(1to(shiftl),1to(shiftl),shiftseq)
-pri@[ps:perm(s)]
-bijshiftseq:=andi(injective(1to(shiftl),1to(shiftl),shiftseq),surjective(1to(shiftl),1to(shiftl),shiftseq),injshiftseq(ande1(injseq(s),surjseq(s),ps)),surjshiftseq(ande2(injseq(s),surjseq(s),ps))):bijective(1to(shiftl),1to(shiftl),shiftseq)
-+c
-@complex:=pair1type(real):'type'
-cx:=complex:'type'
-[x:complex][y:complex]
-is:=is"e"(cx,x,y):'prop'
-nis:=not(is(x,y)):'prop'
-@[p:[t:complex]'prop']
-some:=some"l"(cx,p):'prop'
-all:=all"l"(cx,p):'prop'
-one:=one"e"(cx,p):'prop'
-@[a:real][b:real]
-pli:=pair1(real,a,b):complex
-x@re:=first1(real,x):real
-im:=second1(real,x):real
-b@reis:=first1is1(real,a,b):is"r"(re(pli(a,b)),a)
-isre:=first1is2(real,a,b):is"r"(a,re(pli(a,b)))
-imis:=second1is1(real,a,b):is"r"(im(pli(a,b)),b)
-isim:=second1is2(real,a,b):is"r"(b,im(pli(a,b)))
-x@pliis:=pair1is1(real,x):is(pli(re(x),im(x)),x)
-ispli:=pair1is2(real,x):is(x,pli(re(x),im(x)))
-y@[i:is(x,y)]
-iscere:=isf(cx,real,[t:cx]re(t),x,y,i):is"r"(re(x),re(y))
-isceim:=isf(cx,real,[t:cx]im(t),x,y,i):is"r"(im(x),im(y))
-b@[c:real][i:is"r"(a,b)]
-isrecx1:=isf(real,cx,[t:real]pli(t,c),a,b,i):is(pli(a,c),pli(b,c))
-isrecx2:=isf(real,cx,[t:real]pli(c,t),a,b,i):is(pli(c,a),pli(c,b))
-c@[d:real][i:is"r"(a,b)][j:is"r"(c,d)]
-isrecx12:=tris(cx,pli(a,c),pli(b,c),pli(b,d),isrecx1(a,b,c,i),isrecx2(c,d,b,j)):is(pli(a,c),pli(b,d))
-x@satz206:=refis(cx,x):is(x,x)
-y@[i:is(x,y)]
-satz207:=symis(cx,x,y,i):is(y,x)
-y@[z:complex][i:is(x,y)][j:is(y,z)]
-satz208:=tris(cx,x,y,z,i,j):is(x,z)
-@0c:=pli(0,0):complex
-1c:=pli(1rl,0):complex
-y@pl:=pli(pl"r"(re(x),re(y)),pl"r"(im(x),im(y))):complex
-d@plis12a:=isrecx12(pl"r"(re(pli(a,b)),re(pli(c,d))),pl"r"(a,c),pl"r"(im(pli(a,b)),im(pli(c,d))),pl"r"(b,d),ispl12(re(pli(a,b)),a,re(pli(c,d)),c,reis(a,b),reis(c,d)),ispl12(im(pli(a,b)),b,im(pli(c,d)),d,imis(a,b),imis(c,d))):is(pl(pli(a,b),pli(c,d)),pli(pl"r"(a,c),pl"r"(b,d)))
-plis12b:=symis(cx,pl(pli(a,b),pli(c,d)),pli(pl"r"(a,c),pl"r"(b,d)),plis12a):is(pli(pl"r"(a,c),pl"r"(b,d)),pl(pli(a,b),pli(c,d)))
-x@[r:real][s:real]
-plis1a:=isrecx12(pl"r"(re(pli(r,s)),re(x)),pl"r"(r,re(x)),pl"r"(im(pli(r,s)),im(x)),pl"r"(s,im(x)),ispl1(re(pli(r,s)),r,re(x),reis(r,s)),ispl1(im(pli(r,s)),s,im(x),imis(r,s))):is(pl(pli(r,s),x),pli(pl"r"(r,re(x)),pl"r"(s,im(x))))
-plis1b:=symis(cx,pl(pli(r,s),x),pli(pl"r"(r,re(x)),pl"r"(s,im(x))),plis1a):is(pli(pl"r"(r,re(x)),pl"r"(s,im(x))),pl(pli(r,s),x))
-plis2a:=isrecx12(pl"r"(re(x),re(pli(r,s))),pl"r"(re(x),r),pl"r"(im(x),im(pli(r,s))),pl"r"(im(x),s),ispl2(re(pli(r,s)),r,re(x),reis(r,s)),ispl2(im(pli(r,s)),s,im(x),imis(r,s))):is(pl(x,pli(r,s)),pli(pl"r"(re(x),r),pl"r"(im(x),s)))
-plis2b:=symis(cx,pl(x,pli(r,s)),pli(pl"r"(re(x),r),pl"r"(im(x),s)),plis2a):is(pli(pl"r"(re(x),r),pl"r"(im(x),s)),pl(x,pli(r,s)))
-z@[i:is(x,y)]
-ispl1:=isf(cx,cx,[t:cx]pl(t,z),x,y,i):is(pl(x,z),pl(y,z))
-ispl2:=isf(cx,cx,[t:cx]pl(z,t),x,y,i):is(pl(z,x),pl(z,y))
-z@[u:complex][i:is(x,y)][j:is(z,u)]
-ispl12:=tris(cx,pl(x,z),pl(y,z),pl(y,u),ispl1(x,y,z,i),ispl2(z,u,y,j)):is(pl(x,z),pl(y,u))
-y@satz209:=isrecx12(pl"r"(re(x),re(y)),pl"r"(re(y),re(x)),pl"r"(im(x),im(y)),pl"r"(im(y),im(x)),compl(re(x),re(y)),compl(im(x),im(y))):is(pl(x,y),pl(y,x))
-compl:=satz209:is(pl(x,y),pl(y,x))
-x@satz210:=tr3is(cx,pl(x,0c),pli(pl"r"(re(x),0),pl"r"(im(x),0)),pli(re(x),im(x)),x,plis2a(x,0,0),isrecx12(pl"r"(re(x),0),re(x),pl"r"(im(x),0),im(x),pl02(re(x),0,refis(real,0)),pl02(im(x),0,refis(real,0))),pliis(x)):is(pl(x,0c),x)
-satz210a:=symis(cx,pl(x,0c),x,satz210):is(x,pl(x,0c))
-satz210b:=tris(cx,pl(0c,x),pl(x,0c),x,compl(0c,x),satz210):is(pl(0c,x),x)
-satz210c:=symis(cx,pl(0c,x),x,satz210b):is(x,pl(0c,x))
-z@satz211:=tr3is(cx,pl(pl(x,y),z),pli(pl"r"(pl"r"(re(x),re(y)),re(z)),pl"r"(pl"r"(im(x),im(y)),im(z))),pli(pl"r"(re(x),pl"r"(re(y),re(z))),pl"r"(im(x),pl"r"(im(y),im(z)))),pl(x,pl(y,z)),plis1a(z,pl"r"(re(x),re(y)),pl"r"(im(x),im(y))),isrecx12(pl"r"(pl"r"(re(x),re(y)),re(z)),pl"r"(re(x),pl"r"(re(y),re(z))),pl"r"(pl"r"(im(x),im(y)),im(z)),pl"r"(im(x),pl"r"(im(y),im(z))),asspl1(re(x),re(y),re(z)),asspl1(im(x),im(y),im(z))),plis2b(x,pl"r"(re(y),re(z)),pl"r"(im(y),im(z)))):is(pl(pl(x,y),z),pl(x,pl(y,z)))
-asspl1:=satz211:is(pl(pl(x,y),z),pl(x,pl(y,z)))
-asspl2:=symis(cx,pl(pl(x,y),z),pl(x,pl(y,z)),asspl1):is(pl(x,pl(y,z)),pl(pl(x,y),z))
-y@[u:complex][i:is(pl(y,u),x)]
-+2212
-t1:=tris(real,pl"r"(re(y),re(u)),re(pl(y,u)),re(x),isre(pl"r"(re(y),re(u)),pl"r"(im(y),im(u))),iscere(pl(y,u),x,i)):is"r"(pl"r"(re(y),re(u)),re(x))
-t2:=tris(real,pl"r"(im(y),im(u)),im(pl(y,u)),im(x),isim(pl"r"(re(y),re(u)),pl"r"(im(y),im(u))),isceim(pl(y,u),x,i)):is"r"(pl"r"(im(y),im(u)),im(x))
-t3:=satz187d(re(x),re(y),re(u),t1):is"r"(re(u),mn(re(x),re(y)))
-t4:=satz187d(im(x),im(y),im(u),t2):is"r"(im(u),mn(im(x),im(y)))
--2212
-satz212a:=tris(cx,u,pli(re(u),im(u)),pli(mn(re(x),re(y)),mn(im(x),im(y))),ispli(u),isrecx12(re(u),mn(re(x),re(y)),im(u),mn(im(x),im(y)),t3".2212",t4".2212")):is(u,pli(mn(re(x),re(y)),mn(im(x),im(y))))
-y@satz212b:=tr3is(cx,pl(y,pli(mn(re(x),re(y)),mn(im(x),im(y)))),pli(pl"r"(re(y),mn(re(x),re(y))),pl"r"(im(y),mn(im(x),im(y)))),pli(re(x),im(x)),x,plis2a(y,mn(re(x),re(y)),mn(im(x),im(y))),isrecx12(pl"r"(re(y),mn(re(x),re(y))),re(x),pl"r"(im(y),mn(im(x),im(y))),im(x),satz187a(re(x),re(y)),satz187a(im(x),im(y))),pliis(x)):is(pl(y,pli(mn(re(x),re(y)),mn(im(x),im(y)))),x)
-satz212c:=somei(cx,[t:cx]is(pl(y,t),x),pli(mn(re(x),re(y)),mn(im(x),im(y))),satz212b):some([t:complex]is(pl(y,t),x))
-satz212:=onei(cx,[t:cx]is(pl(y,t),x),[t:cx][u:cx][v:is(pl(y,t),x)][w:is(pl(y,u),x)]tris2(cx,t,u,pli(mn(re(x),re(y)),mn(im(x),im(y))),satz212a(t,v),satz212a(u,w)),satz212c):one([t:complex]is(pl(y,t),x))
-%satz212:=onei(cx,[t:cx]is(pl(y,t),x),[t:cx][u:cx][v:is(pl(y,t),x)][w:is(pl(y,u),x)]tris2(cx,t,u,v),satz212a(u,w)),satz212c):one([t:complex]is(pl(y,t),x))
-mn:=pli(mn"r"(re(x),re(y)),mn"r"(im(x),im(y))):complex
-d@mnis12a:=isrecx12(mn"r"(re(pli(a,b)),re(pli(c,d))),mn"r"(a,c),mn"r"(im(pli(a,b)),im(pli(c,d))),mn"r"(b,d),ismn12(re(pli(a,b)),a,re(pli(c,d)),c,reis(a,b),reis(c,d)),ismn12(im(pli(a,b)),b,im(pli(c,d)),d,imis(a,b),imis(c,d))):is(mn(pli(a,b),pli(c,d)),pli(mn"r"(a,c),mn"r"(b,d)))
-mnis12b:=symis(cx,mn(pli(a,b),pli(c,d)),pli(mn"r"(a,c),mn"r"(b,d)),mnis12a):is(pli(mn"r"(a,c),mn"r"(b,d)),mn(pli(a,b),pli(c,d)))
-x@[r:real][s:real]
-mnis1a:=isrecx12(mn"r"(re(pli(r,s)),re(x)),mn"r"(r,re(x)),mn"r"(im(pli(r,s)),im(x)),mn"r"(s,im(x)),ismn1(re(pli(r,s)),r,re(x),reis(r,s)),ismn1(im(pli(r,s)),s,im(x),imis(r,s))):is(mn(pli(r,s),x),pli(mn"r"(r,re(x)),mn"r"(s,im(x))))
-mnis1b:=symis(cx,mn(pli(r,s),x),pli(mn"r"(r,re(x)),mn"r"(s,im(x))),mnis1a):is(pli(mn"r"(r,re(x)),mn"r"(s,im(x))),mn(pli(r,s),x))
-mnis2a:=isrecx12(mn"r"(re(x),re(pli(r,s))),mn"r"(re(x),r),mn"r"(im(x),im(pli(r,s))),mn"r"(im(x),s),ismn2(re(pli(r,s)),r,re(x),reis(r,s)),ismn2(im(pli(r,s)),s,im(x),imis(r,s))):is(mn(x,pli(r,s)),pli(mn"r"(re(x),r),mn"r"(im(x),s)))
-mnis2b:=symis(cx,mn(x,pli(r,s)),pli(mn"r"(re(x),r),mn"r"(im(x),s)),mnis2a):is(pli(mn"r"(re(x),r),mn"r"(im(x),s)),mn(x,pli(r,s)))
-z@[i:is(x,y)]
-ismn1:=isf(cx,cx,[t:cx]mn(t,z),x,y,i):is(mn(x,z),mn(y,z))
-ismn2:=isf(cx,cx,[t:cx]mn(z,t),x,y,i):is(mn(z,x),mn(z,y))
-z@[u:complex][i:is(x,y)][j:is(z,u)]
-ismn12:=tris(cx,mn(x,z),mn(y,z),mn(y,u),ismn1(x,y,z,i),ismn2(z,u,y,j)):is(mn(x,z),mn(y,u))
-y@[u:complex][i:is(pl(y,u),x)]
-satz212d:=satz212a(u,i):is(u,mn(x,y))
-satz212e:=symis(cx,u,mn(x,y),satz212d):is(mn(x,y),u)
-u@[i:is(pl(u,y),x)]
-satz212f:=satz212d(tris(cx,pl(y,u),pl(u,y),x,compl(y,u),i)):is(u,mn(x,y))
-satz212g:=symis(cx,u,mn(x,y),satz212f):is(mn(x,y),u)
-y@satz212h:=satz212b:is(pl(y,mn(x,y)),x)
-[i:is(mn(x,y),0c)]
-+2213
-t1:=tr3is(real,mn"r"(re(x),re(y)),re(mn(x,y)),re(0c),0,isre(mn"r"(re(x),re(y)),mn"r"(im(x),im(y))),iscere(mn(x,y),0c,i),reis(0,0)):is"r"(mn"r"(re(x),re(y)),0)
-t2:=tr3is(real,mn"r"(im(x),im(y)),im(mn(x,y)),im(0c),0,isim(mn"r"(re(x),re(y)),mn"r"(im(x),im(y))),isceim(mn(x,y),0c,i),imis(0,0)):is"r"(mn"r"(im(x),im(y)),0)
-t3:=satz182b(re(x),re(y),t1):is"r"(re(x),re(y))
-t4:=satz182b(im(x),im(y),t2):is"r"(im(x),im(y))
--2213
-satz213a:=tr3is(cx,x,pli(re(x),im(x)),pli(re(y),im(y)),y,ispli(x),isrecx12(re(x),re(y),im(x),im(y),t3".2213",t4".2213"),pliis(y)):is(x,y)
-y@[i:is(x,y)]
-+*2213
-i@t5:=satz182e(re(x),re(y),iscere(x,y,i)):is"r"(mn"r"(re(x),re(y)),0)
-t6:=satz182e(im(x),im(y),isceim(x,y,i)):is"r"(mn"r"(im(x),im(y)),0)
--2213
-i@satz213b:=isrecx12(mn"r"(re(x),re(y)),0,mn"r"(im(x),im(y)),0,t5".2213",t6".2213"):is(mn(x,y),0c)
-x@m0:=mn(0c,x):complex
-satz214:=isrecx12(mn"r"(re(0c),re(x)),m0"r"(re(x)),mn"r"(im(0c),im(x)),m0"r"(im(x)),pl01(re(0c),m0"r"(re(x)),reis(0,0)),pl01(im(0c),m0"r"(im(x)),imis(0,0))):is(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))))
-satz214a:=symis(cx,m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),satz214):is(pli(m0"r"(re(x)),m0"r"(im(x))),m0(x))
-b@m0isa:=tris(cx,m0(pli(a,b)),pli(m0"r"(re(pli(a,b))),m0"r"(im(pli(a,b)))),pli(m0"r"(a),m0"r"(b)),satz214(pli(a,b)),isrecx12(m0"r"(re(pli(a,b))),m0"r"(a),m0"r"(im(pli(a,b))),m0"r"(b),ism0(re(pli(a,b)),a,reis(a,b)),ism0(im(pli(a,b)),b,imis(a,b)))):is(m0(pli(a,b)),pli(m0"r"(a),m0"r"(b)))
-m0isb:=symis(cx,m0(pli(a,b)),pli(m0"r"(a),m0"r"(b)),m0isa):is(pli(m0"r"(a),m0"r"(b)),m0(pli(a,b)))
-y@[i:is(x,y)]
-ism0:=isf(cx,cx,[t:cx]m0(t),x,y,i):is(m0(x),m0(y))
-x@satz215:=tr4is(cx,m0(m0(x)),m0(pli(m0"r"(re(x)),m0"r"(im(x)))),pli(m0"r"(m0"r"(re(x))),m0"r"(m0"r"(im(x)))),pli(re(x),im(x)),x,ism0(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),satz214),m0isa(m0"r"(re(x)),m0"r"(im(x))),isrecx12(m0"r"(m0"r"(re(x))),re(x),m0"r"(m0"r"(im(x))),im(x),satz177(re(x)),satz177(im(x))),pliis(x)):is(m0(m0(x)),x)
-satz215a:=symis(cx,m0(m0(x)),x,satz215):is(x,m0(m0(x)))
-y@[i:is(x,m0(y))]
-satz215b:=tris(cx,m0(x),m0(m0(y)),y,ism0(x,m0(y),i),satz215(y)):is(m0(x),y)
-satz215c:=symis(cx,m0(x),y,satz215b):is(y,m0(x))
-y@[i:is(m0(x),y)]
-satz215d:=satz215c(y,x,symis(cx,m0(x),y,i)):is(x,m0(y))
-satz215e:=symis(cx,x,m0(y),satz215d):is(m0(y),x)
-x@satz216:=tr3is(cx,pl(x,m0(x)),pl(x,pli(m0"r"(re(x)),m0"r"(im(x)))),pli(pl"r"(re(x),m0"r"(re(x))),pl"r"(im(x),m0"r"(im(x)))),0c,ispl2(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),x,satz214(x)),plis2a(x,m0"r"(re(x)),m0"r"(im(x))),isrecx12(pl"r"(re(x),m0"r"(re(x))),0,pl"r"(im(x),m0"r"(im(x))),0,satz179(re(x)),satz179(im(x)))):is(pl(x,m0(x)),0c)
-+2216
-anders:=satz212h(0c,x):is(pl(x,m0(x)),0c)
--2216
-satz216a:=tris(cx,pl(m0(x),x),pl(x,m0(x)),0c,compl(m0(x),x),satz216):is(pl(m0(x),x),0c)
-y@satz217:=tr4is(cx,m0(pl(x,y)),pli(m0"r"(pl"r"(re(x),re(y))),m0"r"(pl"r"(im(x),im(y)))),pli(pl"r"(m0"r"(re(x)),m0"r"(re(y))),pl"r"(m0"r"(im(x)),m0"r"(im(y)))),pl(pli(m0"r"(re(x)),m0"r"(im(x))),pli(m0"r"(re(y)),m0"r"(im(y)))),pl(m0(x),m0(y)),m0isa(pl"r"(re(x),re(y)),pl"r"(im(x),im(y))),isrecx12(m0"r"(pl"r"(re(x),re(y))),pl"r"(m0"r"(re(x)),m0"r"(re(y))),m0"r"(pl"r"(im(x),im(y))),pl"r"(m0"r"(im(x)),m0"r"(im(y))),satz180(re(x),re(y)),satz180(im(x),im(y))),plis12b(m0"r"(re(x)),m0"r"(im(x)),m0"r"(re(y)),m0"r"(im(y))),ispl12(pli(m0"r"(re(x)),m0"r"(im(x))),m0(x),pli(m0"r"(re(y)),m0"r"(im(y))),m0(y),satz214a(x),satz214a(y))):is(m0(pl(x,y)),pl(m0(x),m0(y)))
-satz217a:=symis(cx,m0(pl(x,y)),pl(m0(x),m0(y)),satz217):is(pl(m0(x),m0(y)),m0(pl(x,y)))
-satz218:=tris(cx,mn(x,y),pl(x,pli(m0"r"(re(y)),m0"r"(im(y)))),pl(x,m0(y)),plis2b(x,m0"r"(re(y)),m0"r"(im(y))),ispl2(pli(m0"r"(re(y)),m0"r"(im(y))),m0(y),x,satz214a(y))):is(mn(x,y),pl(x,m0(y)))
-satz218a:=symis(cx,mn(x,y),pl(x,m0(y)),satz218):is(pl(x,m0(y)),mn(x,y))
-+2219
-t1:=tr3is(cx,m0(mn(x,y)),m0(pl(x,m0(y))),pl(m0(x),m0(m0(y))),pl(m0(x),y),ism0(mn(x,y),pl(x,m0(y)),satz218),satz217(x,m0(y)),ispl2(m0(m0(y)),y,m0(x),satz215(y))):is(m0(mn(x,y)),pl(m0(x),y))
--2219
-satz219:=tr3is(cx,m0(mn(x,y)),pl(m0(x),y),pl(y,m0(x)),mn(y,x),t1".2219",compl(m0(x),y),satz218a(y,x)):is(m0(mn(x,y)),mn(y,x))
-satz219a:=symis(cx,m0(mn(y,x)),mn(x,y),satz219(y,x)):is(mn(x,y),m0(mn(y,x)))
-ts:=pli(mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y))),pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)))):complex
-rets:=mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y))):real
-imts:=pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))):real
-+v3
-d@t1:=ismn12"r"(ts"r"(re(pli(a,b)),re(pli(c,d))),ts"r"(a,c),ts"r"(im(pli(a,b)),im(pli(c,d))),ts"r"(b,d),ists12(re(pli(a,b)),a,re(pli(c,d)),c,reis(a,b),reis(c,d)),ists12(im(pli(a,b)),b,im(pli(c,d)),d,imis(a,b),imis(c,d))):is"r"(rets(pli(a,b),pli(c,d)),mn"r"(ts"r"(a,c),ts"r"(b,d)))
-t2:=ispl12"r"(ts"r"(re(pli(a,b)),im(pli(c,d))),ts"r"(a,d),ts"r"(im(pli(a,b)),re(pli(c,d))),ts"r"(b,c),ists12(re(pli(a,b)),a,im(pli(c,d)),d,reis(a,b),imis(c,d)),ists12(im(pli(a,b)),b,re(pli(c,d)),c,imis(a,b),reis(c,d))):is"r"(imts(pli(a,b),pli(c,d)),pl"r"(ts"r"(a,d),ts"r"(b,c)))
--v3
-d@tsis12a:=isrecx12(rets(pli(a,b),pli(c,d)),mn"r"(ts"r"(a,c),ts"r"(b,d)),imts(pli(a,b),pli(c,d)),pl"r"(ts"r"(a,d),ts"r"(b,c)),t1".v3",t2".v3"):is(ts(pli(a,b),pli(c,d)),pli(mn"r"(ts"r"(a,c),ts"r"(b,d)),pl"r"(ts"r"(a,d),ts"r"(b,c))))
-tsis12b:=symis(cx,ts(pli(a,b),pli(c,d)),pli(mn"r"(ts"r"(a,c),ts"r"(b,d)),pl"r"(ts"r"(a,d),ts"r"(b,c))),tsis12a):is(pli(mn"r"(ts"r"(a,c),ts"r"(b,d)),pl"r"(ts"r"(a,d),ts"r"(b,c))),ts(pli(a,b),pli(c,d)))
-x@[r:real][s:real]
-+*v3
-s@t3:=ismn12"r"(ts"r"(re(pli(r,s)),re(x)),ts"r"(r,re(x)),ts"r"(im(pli(r,s)),im(x)),ts"r"(s,im(x)),ists1(re(pli(r,s)),r,re(x),reis(r,s)),ists1(im(pli(r,s)),s,im(x),imis(r,s))):is"r"(rets(pli(r,s),x),mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))))
-t4:=ispl12"r"(ts"r"(re(pli(r,s)),im(x)),ts"r"(r,im(x)),ts"r"(im(pli(r,s)),re(x)),ts"r"(s,re(x)),ists1(re(pli(r,s)),r,im(x),reis(r,s)),ists1(im(pli(r,s)),s,re(x),imis(r,s))):is"r"(imts(pli(r,s),x),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x))))
--v3
-s@tsis1a:=isrecx12(rets(pli(r,s),x),mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))),imts(pli(r,s),x),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x))),t3".v3",t4".v3"):is(ts(pli(r,s),x),pli(mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x)))))
-tsis1b:=symis(cx,ts(pli(r,s),x),pli(mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x)))),tsis1a):is(pli(mn"r"(ts"r"(r,re(x)),ts"r"(s,im(x))),pl"r"(ts"r"(r,im(x)),ts"r"(s,re(x)))),ts(pli(r,s),x))
-+*v3
-s@t5:=ismn12"r"(ts"r"(re(x),re(pli(r,s))),ts"r"(re(x),r),ts"r"(im(x),im(pli(r,s))),ts"r"(im(x),s),ists2(re(pli(r,s)),r,re(x),reis(r,s)),ists2(im(pli(r,s)),s,im(x),imis(r,s))):is"r"(rets(x,pli(r,s)),mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)))
-t6:=ispl12"r"(ts"r"(re(x),im(pli(r,s))),ts"r"(re(x),s),ts"r"(im(x),re(pli(r,s))),ts"r"(im(x),r),ists2(im(pli(r,s)),s,re(x),imis(r,s)),ists2(re(pli(r,s)),r,im(x),reis(r,s))):is"r"(imts(x,pli(r,s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r)))
--v3
-s@tsis2a:=isrecx12(rets(x,pli(r,s)),mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)),imts(x,pli(r,s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r)),t5".v3",t6".v3"):is(ts(x,pli(r,s)),pli(mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r))))
-tsis2b:=symis(cx,ts(x,pli(r,s)),pli(mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r))),tsis2a):is(pli(mn"r"(ts"r"(re(x),r),ts"r"(im(x),s)),pl"r"(ts"r"(re(x),s),ts"r"(im(x),r))),ts(x,pli(r,s)))
-z@[i:is(x,y)]
-ists1:=isf(cx,cx,[t:cx]ts(t,z),x,y,i):is(ts(x,z),ts(y,z))
-ists2:=isf(cx,cx,[t:cx]ts(z,t),x,y,i):is(ts(z,x),ts(z,y))
-z@[u:complex][i:is(x,y)][j:is(z,u)]
-ists12:=tris(cx,ts(x,z),ts(y,z),ts(y,u),ists1(x,y,z,i),ists2(z,u,y,j)):is(ts(x,z),ts(y,u))
-+3220
-y@t1:=ismn12"r"(ts"r"(re(x),re(y)),ts"r"(re(y),re(x)),ts"r"(im(x),im(y)),ts"r"(im(y),im(x)),comts(re(x),re(y)),comts(im(x),im(y))):is"r"(rets(x,y),rets(y,x))
-t2:=tris(real,imts(x,y),pl"r"(ts"r"(im(x),re(y)),ts"r"(re(x),im(y))),imts(y,x),compl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))),ispl12"r"(ts"r"(im(x),re(y)),ts"r"(re(y),im(x)),ts"r"(re(x),im(y)),ts"r"(im(y),re(x)),comts(im(x),re(y)),comts(re(x),im(y)))):is"r"(imts(x,y),imts(y,x))
--3220
-y@satz220:=isrecx12(rets(x,y),rets(y,x),imts(x,y),imts(y,x),t1".3220",t2".3220"):is(ts(x,y),ts(y,x))
-comts:=satz220:is(ts(x,y),ts(y,x))
-x@[i:is(x,0c)]
-lemma1:=tris(real,re(x),re(0c),0,iscere(x,0c,i),reis(0,0)):is"r"(re(x),0)
-lemma2:=tris(real,im(x),im(0c),0,isceim(x,0c,i),imis(0,0)):is"r"(im(x),0)
-x@mod2:=pl"r"(ts"r"(re(x),re(x)),ts"r"(im(x),im(x))):real
-i@lemma3:=tris(real,mod2,pl"r"(0,0),0,ispl12"r"(ts"r"(re(x),re(x)),0,ts"r"(im(x),im(x)),0,ts01(re(x),re(x),lemma1),ts01(im(x),im(x),lemma2)),pl01(0,0,refis(real,0))):is"r"(mod2(x),0)
-x@[n:nis(x,0c)]
-+*v3
-x@re2:=ts"r"(re(x),re(x)):real
-im2:=ts"r"(im(x),im(x)):real
-n@[i:is"r"(re(x),0)]
-t7:=th3"l.imp"(is"r"(im(x),0),is(x,0c),n,[t:is"r"(im(x),0)]tris(cx,x,pli(re(x),im(x)),0c,ispli(x),isrecx12(re(x),0,im(x),0,i,t))):nis"r"(im(x),0)
-t8:=ispos(im2,mod2,symis(real,mod2,im2,pl01(re2,im2,ts01(re(x),re(x),i))),possq(im(x),t7)):pos(mod2)
-n@[o:nis"r"(re(x),0)][i:is"r"(im(x),0)]
-t9:=ispos(re2,mod2,symis(real,mod2,re2,pl02(re2,im2,ts01(im(x),im(x),i))),possq(re(x),o)):pos(mod2)
-o@[p:nis"r"(im(x),0)]
-t10:=pospl(re2,im2,possq(re(x),o),possq(im(x),p)):pos(mod2)
-o@t11:=th1"l.imp"(is"r"(im(x),0),pos(mod2),[t:is"r"(im(x),0)]t9(t),[t:nis"r"(im(x),0)]t10(t)):pos(mod2)
--v3
-n@lemma4:=th1"l.imp"(is"r"(re(x),0),pos(mod2),[t:is"r"(re(x),0)]t8".v3"(t),[t:nis"r"(re(x),0)]t11".v3"(t)):pos(mod2(x))
-x@lemma5:=th1"l.imp"(is(x,0c),not(neg(mod2)),[t:is(x,0c)]0notn(mod2,lemma3(t)),[t:nis(x,0c)]pnotn(mod2,lemma4(t))):not(neg(mod2(x)))
-y@[i:is(x,0c)]
-+3221
-t1:=lemma1(x,i):is"r"(re(x),0)
-t2:=lemma2(x,i):is"r"(im(x),0)
-t3:=tris(real,rets(x,y),mn"r"(0,0),0,ismn12"r"(ts"r"(re(x),re(y)),0,ts"r"(im(x),im(y)),0,ts01(re(x),re(y),t1),ts01(im(x),im(y),t2)),satz187c(0,0,0,pl02(0,0,refis(real,0)))):is"r"(rets(x,y),0)
-t4:=tris(real,imts(x,y),pl"r"(0,0),0,ispl12"r"(ts"r"(re(x),im(y)),0,ts"r"(im(x),re(y)),0,ts01(re(x),im(y),t1),ts01(im(x),re(y),t2)),pl02(0,0,refis(real,0))):is"r"(imts(x,y),0)
--3221
-satz221a:=isrecx12(rets(x,y),0,imts(x,y),0,t3".3221",t4".3221"):is(ts(x,y),0c)
-y@[i:is(y,0c)]
-satz221b:=tris(cx,ts(x,y),ts(y,x),0c,comts(x,y),satz221a(y,x,i)):is(ts(x,y),0c)
-y@[i:is(ts(x,y),0c)]
-+*3221
-i@[n:nis(y,0c)]
-t5:=lemma4(y,n):pos(mod2(y))
-t6:=tris1(real,rets(x,y),0,re(ts(x,y)),reis(rets(x,y),imts(x,y)),lemma1(ts(x,y),i)):is"r"(rets(x,y),0)
-t7:=tris1(real,imts(x,y),0,im(ts(x,y)),imis(rets(x,y),imts(x,y)),lemma2(ts(x,y),i)):is"r"(imts(x,y),0)
-t8:=tris(real,pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),pl"r"(0,0),0,ispl12"r"(ts"r"(rets(x,y),re(y)),0,ts"r"(imts(x,y),im(y)),0,ts01(rets(x,y),re(y),t6),ts01(imts(x,y),im(y),t7)),pl02(0,0,refis(real,0))):is"r"(pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),0)
-y@ii1r:=ts"r"(ts"r"(im(x),im(y)),re(y)):real
-i1ir:=ts"r"(im(x),ts"r"(im(y),re(y))):real
-ir1i:=ts"r"(ts"r"(im(x),re(y)),im(y)):real
-i1ri:=ts"r"(im(x),ts"r"(re(y),im(y))):real
-rr1r:=ts"r"(ts"r"(re(x),re(y)),re(y)):real
-r1rr:=ts"r"(re(x),ts"r"(re(y),re(y))):real
-ri1r:=ts"r"(ts"r"(re(x),im(y)),re(y)):real
-r1ir:=ts"r"(re(x),ts"r"(im(y),re(y))):real
-ri1i:=ts"r"(ts"r"(re(x),im(y)),im(y)):real
-r1ii:=ts"r"(re(x),ts"r"(im(y),im(y))):real
-n@t9:=tris(real,ii1r,i1ir,i1ri,assts1(im(x),im(y),re(y)),ists2"r"(ts"r"(im(y),re(y)),ts"r"(re(y),im(y)),im(x),comts"r"(im(y),re(y)))):is"r"(ii1r,i1ri)
-t10:=tris(real,ts"r"(rets(x,y),re(y)),mn"r"(rr1r,ii1r),mn"r"(r1rr,i1ri),disttm1(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)),re(y)),ismn12"r"(rr1r,r1rr,ii1r,i1ri,assts1(re(x),re(y),re(y)),t9)):is"r"(ts"r"(rets(x,y),re(y)),mn"r"(r1rr,i1ri))
-t11:=tr3is(real,ts"r"(imts(x,y),im(y)),pl"r"(ri1i,ir1i),pl"r"(r1ii,i1ri),pl"r"(i1ri,r1ii),disttp1(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)),im(y)),ispl12"r"(ri1i,r1ii,ir1i,i1ri,assts1(re(x),im(y),im(y)),assts1(im(x),re(y),im(y))),compl"r"(r1ii,i1ri)):is"r"(ts"r"(imts(x,y),im(y)),pl"r"(i1ri,r1ii))
-t12:=tr4is(real,pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),pl"r"(mn"r"(r1rr,i1ri),pl"r"(i1ri,r1ii)),pl"r"(pl"r"(mn"r"(r1rr,i1ri),i1ri),r1ii),pl"r"(r1rr,r1ii),ts"r"(re(x),mod2(y)),ispl12"r"(ts"r"(rets(x,y),re(y)),mn"r"(r1rr,i1ri),ts"r"(imts(x,y),im(y)),pl"r"(i1ri,r1ii),t10,t11),asspl2"r"(mn"r"(r1rr,i1ri),i1ri,r1ii),ispl1"r"(pl"r"(mn"r"(r1rr,i1ri),i1ri),r1rr,r1ii,plmn(r1rr,i1ri)),distpt2(re(x),ts"r"(re(y),re(y)),ts"r"(im(y),im(y)))):is"r"(pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),ts"r"(re(x),mod2(y)))
-t13:=tris1(real,ts"r"(re(x),mod2(y)),0,pl"r"(ts"r"(rets(x,y),re(y)),ts"r"(imts(x,y),im(y))),t12,t8):is"r"(ts"r"(re(x),mod2(y)),0)
-t14:=ore1(is"r"(re(x),0),is"r"(mod2(y),0),satz192c(re(x),mod2(y),t13),pnot0(mod2(y),t5)):is"r"(re(x),0)
-t15:=tris1(real,ts"r"(im(x),im(y)),0,ts"r"(re(x),re(y)),satz182b(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)),t6),ts01(re(x),re(y),t14)):is"r"(ts"r"(im(x),im(y)),0)
-t16:=tris1(real,ts"r"(im(x),re(y)),0,imts(x,y),pl01(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)),ts01(re(x),im(y),t14)),t7):is"r"(ts"r"(im(x),re(y)),0)
-[j:is"r"(re(y),0)]
-t17:=t7"c.v3"(y,n,j):nis"r"(im(y),0)
-t18:=ore1(is"r"(im(x),0),is"r"(im(y),0),satz192c(im(x),im(y),t15),t17):is"r"(im(x),0)
-n@[o:nis"r"(re(y),0)]
-t19:=ore1(is"r"(im(x),0),is"r"(re(y),0),satz192c(im(x),re(y),t16),o):is"r"(im(x),0)
-n@t20:=th1"l.imp"(is"r"(re(y),0),is"r"(im(x),0),[t:is"r"(re(y),0)]t18(t),[t:nis"r"(re(y),0)]t19(t)):is"r"(im(x),0)
-t21:=tris(cx,x,pli(re(x),im(x)),0c,ispli(x),isrecx12(re(x),0,im(x),0,t14,t20)):is(x,0c)
--3221
-i@satz221c:=th2"l.or"(is(x,0c),is(y,0c),[t:nis(y,0c)]t21".3221"(t)):or(is(x,0c),is(y,0c))
-y@[n:nis(x,0c)][o:nis(y,0c)]
-satz221d:=th3"l.imp"(is(ts(x,y),0c),or(is(x,0c),is(y,0c)),th3"l.or"(is(x,0c),is(y,0c),n,o),[t:is(ts(x,y),0c)]satz221c(t)):nis(ts(x,y),0c)
-+3222
-x@t1:=tris(real,mn"r"(ts"r"(re(x),1rl),ts"r"(im(x),0)),mn"r"(re(x),0),re(x),ismn12"r"(ts"r"(re(x),1rl),re(x),ts"r"(im(x),0),0,satz195(re(x)),ts02(im(x),0,refis(real,0))),pl02(re(x),m0"r"(0),satz176b(0,refis(real,0)))):is"r"(mn"r"(ts"r"(re(x),1rl),ts"r"(im(x),0)),re(x))
-t2:=tris(real,pl"r"(ts"r"(re(x),0),ts"r"(im(x),1rl)),pl"r"(0,im(x)),im(x),ispl12"r"(ts"r"(re(x),0),0,ts"r"(im(x),1rl),im(x),ts02(re(x),0,refis(real,0)),satz195(im(x))),pl01(0,im(x),refis(real,0))):is"r"(pl"r"(ts"r"(re(x),0),ts"r"(im(x),1rl)),im(x))
--3222
-x@satz222:=tr3is(cx,ts(x,1c),pli(mn"r"(ts"r"(re(x),1rl),ts"r"(im(x),0)),pl"r"(ts"r"(re(x),0),ts"r"(im(x),1rl))),pli(re(x),im(x)),x,tsis2a(x,1rl,0),isrecx12(mn"r"(ts"r"(re(x),1rl),ts"r"(im(x),0)),re(x),pl"r"(ts"r"(re(x),0),ts"r"(im(x),1rl)),im(x),t1".3222",t2".3222"),pliis(x)):is(ts(x,1c),x)
-satz222a:=symis(cx,ts(x,1c),x,satz222):is(x,ts(x,1c))
-satz222b:=tris(cx,ts(1c,x),ts(x,1c),x,comts(1c,x),satz222):is(ts(1c,x),x)
-satz222c:=symis(cx,ts(1c,x),x,satz222b):is(x,ts(1c,x))
-+3223
-t1:=tris(real,mn"r"(ts"r"(re(x),m0"r"(1rl)),ts"r"(im(x),m0"r"(0))),mn"r"(m0"r"(re(x)),0),m0"r"(re(x)),ismn12"r"(ts"r"(re(x),m0"r"(1rl)),m0"r"(re(x)),ts"r"(im(x),m0"r"(0)),0,tris(real,ts"r"(re(x),m0"r"(1rl)),m0"r"(ts"r"(re(x),1rl)),m0"r"(re(x)),satz197b(re(x),1rl),ism0"r"(ts"r"(re(x),1rl),re(x),satz195(re(x)))),ts02(im(x),m0"r"(0),satz176b(0,refis(real,0)))),pl02(m0"r"(re(x)),m0"r"(0),satz176b(0,refis(real,0)))):is"r"(mn"r"(ts"r"(re(x),m0"r"(1rl)),ts"r"(im(x),m0"r"(0))),m0"r"(re(x)))
-t2:=tris(real,pl"r"(ts"r"(re(x),m0"r"(0)),ts"r"(im(x),m0"r"(1rl))),pl"r"(0,m0"r"(im(x))),m0"r"(im(x)),ispl12"r"(ts"r"(re(x),m0"r"(0)),0,ts"r"(im(x),m0"r"(1rl)),m0"r"(im(x)),ts02(re(x),m0"r"(0),satz176b(0,refis(real,0))),tris(real,ts"r"(im(x),m0"r"(1rl)),m0"r"(ts"r"(im(x),1rl)),m0"r"(im(x)),satz197b(im(x),1rl),ism0"r"(ts"r"(im(x),1rl),im(x),satz195(im(x))))),pl01(0,m0"r"(im(x)),refis(real,0))):is"r"(pl"r"(ts"r"(re(x),m0"r"(0)),ts"r"(im(x),m0"r"(1rl))),m0"r"(im(x)))
--3223
-satz223:=tr4is(cx,ts(x,m0(1c)),ts(x,pli(m0"r"(1rl),m0"r"(0))),pli(mn"r"(ts"r"(re(x),m0"r"(1rl)),ts"r"(im(x),m0"r"(0))),pl"r"(ts"r"(re(x),m0"r"(0)),ts"r"(im(x),m0"r"(1rl)))),pli(m0"r"(re(x)),m0"r"(im(x))),m0(x),ists2(m0(1c),pli(m0"r"(1rl),m0"r"(0)),x,m0isa(1rl,0)),tsis2a(x,m0"r"(1rl),m0"r"(0)),isrecx12(mn"r"(ts"r"(re(x),m0"r"(1rl)),ts"r"(im(x),m0"r"(0))),m0"r"(re(x)),pl"r"(ts"r"(re(x),m0"r"(0)),ts"r"(im(x),m0"r"(1rl))),m0"r"(im(x)),t1".3223",t2".3223"),satz214a(x)):is(ts(x,m0(1c)),m0(x))
-satz223a:=symis(cx,ts(x,m0(1c)),m0(x),satz223):is(m0(x),ts(x,m0(1c)))
-satz223b:=tris(cx,ts(m0(1c),x),ts(x,m0(1c)),m0(x),comts(m0(1c),x),satz223):is(ts(m0(1c),x),m0(x))
-satz223c:=symis(cx,ts(m0(1c),x),m0(x),satz223b):is(m0(x),ts(m0(1c),x))
-+3224
-y@rxry:=ts"r"(re(x),re(y)):real
-ixiy:=ts"r"(im(x),im(y)):real
-rxiy:=ts"r"(re(x),im(y)):real
-ixry:=ts"r"(im(x),re(y)):real
-t1:=tr4is(real,mn"r"(ts"r"(m0"r"(re(x)),re(y)),ts"r"(m0"r"(im(x)),im(y))),mn"r"(m0"r"(rxry),m0"r"(ixiy)),pl"r"(m0"r"(rxry),ixiy),mn"r"(ixiy,rxry),m0"r"(mn"r"(rxry,ixiy)),ismn12"r"(ts"r"(m0"r"(re(x)),re(y)),m0"r"(rxry),ts"r"(m0"r"(im(x)),im(y)),m0"r"(ixiy),satz197a(re(x),re(y)),satz197a(im(x),im(y))),ispl2"r"(m0"r"(m0"r"(ixiy)),ixiy,m0"r"(rxry),satz177(ixiy)),compl"r"(m0"r"(rxry),ixiy),satz181a(ixiy,rxry)):is"r"(mn"r"(ts"r"(m0"r"(re(x)),re(y)),ts"r"(m0"r"(im(x)),im(y))),m0"r"(mn"r"(rxry,ixiy)))
-t2:=tris(real,pl"r"(ts"r"(m0"r"(re(x)),im(y)),ts"r"(m0"r"(im(x)),re(y))),mn"r"(m0"r"(rxiy),ixry),m0"r"(pl"r"(rxiy,ixry)),ispl12"r"(ts"r"(m0"r"(re(x)),im(y)),m0"r"(rxiy),ts"r"(m0"r"(im(x)),re(y)),m0"r"(ixry),satz197a(re(x),im(y)),satz197a(im(x),re(y))),satz180a(rxiy,ixry)):is"r"(pl"r"(ts"r"(m0"r"(re(x)),im(y)),ts"r"(m0"r"(im(x)),re(y))),m0"r"(pl"r"(rxiy,ixry)))
--3224
-y@satz224a:=tr4is(cx,ts(m0(x),y),ts(pli(m0"r"(re(x)),m0"r"(im(x))),y),pli(mn"r"(ts"r"(m0"r"(re(x)),re(y)),ts"r"(m0"r"(im(x)),im(y))),pl"r"(ts"r"(m0"r"(re(x)),im(y)),ts"r"(m0"r"(im(x)),re(y)))),pli(m0"r"(mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)))),m0"r"(pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))))),m0(ts(x,y)),ists1(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),y,satz214(x)),tsis1a(y,m0"r"(re(x)),m0"r"(im(x))),isrecx12(mn"r"(ts"r"(m0"r"(re(x)),re(y)),ts"r"(m0"r"(im(x)),im(y))),m0"r"(mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)))),pl"r"(ts"r"(m0"r"(re(x)),im(y)),ts"r"(m0"r"(im(x)),re(y))),m0"r"(pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)))),t1".3224",t2".3224"),m0isb(mn"r"(ts"r"(re(x),re(y)),ts"r"(im(x),im(y))),pl"r"(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))))):is(ts(m0(x),y),m0(ts(x,y)))
-satz224b:=tr3is(cx,ts(x,m0(y)),ts(m0(y),x),m0(ts(y,x)),m0(ts(x,y)),comts(x,m0(y)),satz224a(y,x),ism0(ts(y,x),ts(x,y),comts(y,x))):is(ts(x,m0(y)),m0(ts(x,y)))
-satz224c:=tris2(cx,ts(m0(x),y),ts(x,m0(y)),m0(ts(x,y)),satz224a,satz224b):is(ts(m0(x),y),ts(x,m0(y)))
-satz224d:=symis(cx,ts(m0(x),y),ts(x,m0(y)),satz224c):is(ts(x,m0(y)),ts(m0(x),y))
-satz224e:=symis(cx,ts(m0(x),y),m0(ts(x,y)),satz224a):is(m0(ts(x,y)),ts(m0(x),y))
-satz224f:=symis(cx,ts(x,m0(y)),m0(ts(x,y)),satz224b):is(m0(ts(x,y)),ts(x,m0(y)))
-satz225:=tris(cx,ts(m0(x),m0(y)),ts(x,m0(m0(y))),ts(x,y),satz224c(x,m0(y)),ists2(m0(m0(y)),y,x,satz215(y))):is(ts(m0(x),m0(y)),ts(x,y))
-satz225a:=symis(cx,ts(m0(x),m0(y)),ts(x,y),satz225):is(ts(x,y),ts(m0(x),m0(y)))
-+3226
-z@rrr:=ts"r"(ts"r"(re(x),re(y)),re(z)):real
-iir:=ts"r"(ts"r"(im(x),im(y)),re(z)):real
-rii:=ts"r"(ts"r"(re(x),im(y)),im(z)):real
-iri:=ts"r"(ts"r"(im(x),re(y)),im(z)):real
-rri:=ts"r"(ts"r"(re(x),re(y)),im(z)):real
-iii:=ts"r"(ts"r"(im(x),im(y)),im(z)):real
-rir:=ts"r"(ts"r"(re(x),im(y)),re(z)):real
-irr:=ts"r"(ts"r"(im(x),re(y)),re(z)):real
-t1:=tr3is(real,mn"r"(ts"r"(rets(x,y),re(z)),ts"r"(imts(x,y),im(z))),mn"r"(mn"r"(rrr,iir),pl"r"(rii,iri)),pl"r"(rrr,pl"r"(m0"r"(iir),m0"r"(pl"r"(rii,iri)))),mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),ismn12"r"(ts"r"(rets(x,y),re(z)),mn"r"(rrr,iir),ts"r"(imts(x,y),im(z)),pl"r"(rii,iri),disttm1(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)),re(z)),disttp1(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)),im(z))),asspl1"r"(rrr,m0"r"(iir),m0"r"(pl"r"(rii,iri))),ispl2"r"(pl"r"(m0"r"(iir),m0"r"(pl"r"(rii,iri))),m0"r"(pl"r"(iir,pl"r"(rii,iri))),rrr,satz180a(iir,pl"r"(rii,iri)))):is"r"(mn"r"(ts"r"(rets(x,y),re(z)),ts"r"(imts(x,y),im(z))),mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))))
-t2:=tr3is(real,pl"r"(ts"r"(rets(x,y),im(z)),ts"r"(imts(x,y),re(z))),pl"r"(mn"r"(rri,iii),pl"r"(rir,irr)),pl"r"(pl"r"(rir,irr),mn"r"(rri,iii)),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii),ispl12"r"(ts"r"(rets(x,y),im(z)),mn"r"(rri,iii),ts"r"(imts(x,y),re(z)),pl"r"(rir,irr),disttm1(ts"r"(re(x),re(y)),ts"r"(im(x),im(y)),im(z)),disttp1(ts"r"(re(x),im(y)),ts"r"(im(x),re(y)),re(z))),compl"r"(mn"r"(rri,iii),pl"r"(rir,irr)),asspl2"r"(pl"r"(rir,irr),rri,m0"r"(iii))):is"r"(pl"r"(ts"r"(rets(x,y),im(z)),ts"r"(imts(x,y),re(z))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii))
-t3:=tris(cx,ts(ts(x,y),z),pli(mn"r"(ts"r"(rets(x,y),re(z)),ts"r"(imts(x,y),im(z))),pl"r"(ts"r"(rets(x,y),im(z)),ts"r"(imts(x,y),re(z)))),pli(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii)),tsis1a(z,rets(x,y),imts(x,y)),isrecx12(mn"r"(ts"r"(rets(x,y),re(z)),ts"r"(imts(x,y),im(z))),mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),pl"r"(ts"r"(rets(x,y),im(z)),ts"r"(imts(x,y),re(z))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii),t1,t2)):is(ts(ts(x,y),z),pli(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii)))
-c@t4:=tris(real,ts"r"(ts"r"(a,b),c),ts"r"(a,ts"r"(b,c)),ts"r"(ts"r"(b,c),a),assts1(a,b,c),comts"r"(a,ts"r"(b,c))):is"r"(ts"r"(ts"r"(a,b),c),ts"r"(ts"r"(b,c),a))
-t5:=tris(real,pl"r"(pl"r"(a,b),c),pl"r"(c,pl"r"(a,b)),pl"r"(pl"r"(c,a),b),compl"r"(pl"r"(a,b),c),asspl2"r"(c,a,b)):is"r"(pl"r"(pl"r"(a,b),c),pl"r"(pl"r"(c,a),b))
-t6:=tris(real,pl"r"(a,pl"r"(b,c)),pl"r"(pl"r"(b,c),a),pl"r"(b,pl"r"(c,a)),compl"r"(a,pl"r"(b,c)),asspl1"r"(b,c,a)):is"r"(pl"r"(a,pl"r"(b,c)),pl"r"(b,pl"r"(c,a)))
-z@rrr1:=rrr(y,z,x):real
-iir1:=iir(y,z,x):real
-rii1:=rii(y,z,x):real
-iri1:=iri(y,z,x):real
-rri1:=rri(y,z,x):real
-iii1:=iii(y,z,x):real
-rir1:=rir(y,z,x):real
-irr1:=irr(y,z,x):real
-t7:=tris(real,pl"r"(iir,pl"r"(rii,iri)),pl"r"(rii,pl"r"(iri,iir)),pl"r"(iir1,pl"r"(rii1,iri1)),t6(iir,rii,iri),ispl12"r"(rii,iir1,pl"r"(iri,iir),pl"r"(rii1,iri1),t4(re(x),im(y),im(z)),ispl12"r"(iri,rii1,iir,iri1,t4(im(x),re(y),im(z)),t4(im(x),im(y),re(z))))):is"r"(pl"r"(iir,pl"r"(rii,iri)),pl"r"(iir1,pl"r"(rii1,iri1)))
-t8:=tris(real,pl"r"(pl"r"(rir,irr),rri),pl"r"(pl"r"(rri,rir),irr),pl"r"(pl"r"(rir1,irr1),rri1),t5(rir,irr,rri),ispl12"r"(pl"r"(rri,rir),pl"r"(rir1,irr1),irr,rri1,ispl12"r"(rri,rir1,rir,irr1,t4(re(x),re(y),im(z)),t4(re(x),im(y),re(z))),t4(im(x),re(y),re(z)))):is"r"(pl"r"(pl"r"(rir,irr),rri),pl"r"(pl"r"(rir1,irr1),rri1))
-t9:=ismn12"r"(rrr,rrr1,pl"r"(iir,pl"r"(rii,iri)),pl"r"(iir1,pl"r"(rii1,iri1)),t4(re(x),re(y),re(z)),t7):is"r"(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))))
-t10:=ismn12"r"(pl"r"(pl"r"(rir,irr),rri),pl"r"(pl"r"(rir1,irr1),rri1),iii,iii1,t8,t4(im(x),im(y),im(z))):is"r"(mn"r"(pl"r"(pl"r"(rir,irr),rri),iii),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1))
-t11:=tris(cx,ts(ts(x,y),z),pli(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii)),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)),t3,isrecx12(mn"r"(rrr,pl"r"(iir,pl"r"(rii,iri))),mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir,irr),rri),iii),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1),t9,t10)):is(ts(ts(x,y),z),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)))
-t12:=tris(cx,ts(x,ts(y,z)),ts(ts(y,z),x),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)),comts(x,ts(y,z)),t3(y,z,x)):is(ts(x,ts(y,z)),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)))
-t13:=tris2(cx,ts(ts(x,y),z),ts(x,ts(y,z)),pli(mn"r"(rrr1,pl"r"(iir1,pl"r"(rii1,iri1))),mn"r"(pl"r"(pl"r"(rir1,irr1),rri1),iii1)),t11,t12):is(ts(ts(x,y),z),ts(x,ts(y,z)))
--3226
-z@satz226:=t13".3226":is(ts(ts(x,y),z),ts(x,ts(y,z)))
-assts1:=satz226:is(ts(ts(x,y),z),ts(x,ts(y,z)))
-assts2:=symis(cx,ts(ts(x,y),z),ts(x,ts(y,z)),assts1):is(ts(x,ts(y,z)),ts(ts(x,y),z))
-+3227
-c@t1:=tr3is(real,pl"r"(pl"r"(a,b),c),pl"r"(a,pl"r"(b,c)),pl"r"(a,pl"r"(c,b)),pl"r"(pl"r"(a,c),b),asspl1"r"(a,b,c),ispl2"r"(pl"r"(b,c),pl"r"(c,b),a,compl"r"(b,c)),asspl2"r"(a,c,b)):is"r"(pl"r"(pl"r"(a,b),c),pl"r"(pl"r"(a,c),b))
-d@t2:=tr3is(real,pl"r"(pl"r"(a,b),pl"r"(c,d)),pl"r"(pl"r"(pl"r"(a,b),c),d),pl"r"(pl"r"(pl"r"(a,c),b),d),pl"r"(pl"r"(a,c),pl"r"(b,d)),asspl2"r"(pl"r"(a,b),c,d),ispl1"r"(pl"r"(pl"r"(a,b),c),pl"r"(pl"r"(a,c),b),d,t1),asspl1"r"(pl"r"(a,c),b,d)):is"r"(pl"r"(pl"r"(a,b),pl"r"(c,d)),pl"r"(pl"r"(a,c),pl"r"(b,d)))
-t3:=tris(real,mn"r"(pl"r"(a,b),pl"r"(c,d)),pl"r"(pl"r"(a,b),pl"r"(m0"r"(c),m0"r"(d))),pl"r"(mn"r"(a,c),mn"r"(b,d)),ispl2"r"(m0"r"(pl"r"(c,d)),pl"r"(m0"r"(c),m0"r"(d)),pl"r"(a,b),satz180(c,d)),t2(a,b,m0"r"(c),m0"r"(d))):is"r"(mn"r"(pl"r"(a,b),pl"r"(c,d)),pl"r"(mn"r"(a,c),mn"r"(b,d)))
-z@t4:=tris(real,mn"r"(ts"r"(re(x),pl"r"(re(y),re(z))),ts"r"(im(x),pl"r"(im(y),im(z)))),mn"r"(pl"r"(ts"r"(re(x),re(y)),ts"r"(re(x),re(z))),pl"r"(ts"r"(im(x),im(y)),ts"r"(im(x),im(z)))),pl"r"(rets(x,y),rets(x,z)),ismn12"r"(ts"r"(re(x),pl"r"(re(y),re(z))),pl"r"(ts"r"(re(x),re(y)),ts"r"(re(x),re(z))),ts"r"(im(x),pl"r"(im(y),im(z))),pl"r"(ts"r"(im(x),im(y)),ts"r"(im(x),im(z))),disttp2(re(x),re(y),re(z)),disttp2(im(x),im(y),im(z))),t3(ts"r"(re(x),re(y)),ts"r"(re(x),re(z)),ts"r"(im(x),im(y)),ts"r"(im(x),im(z)))):is"r"(mn"r"(ts"r"(re(x),pl"r"(re(y),re(z))),ts"r"(im(x),pl"r"(im(y),im(z)))),pl"r"(rets(x,y),rets(x,z)))
-t5:=tris(real,pl"r"(ts"r"(re(x),pl"r"(im(y),im(z))),ts"r"(im(x),pl"r"(re(y),re(z)))),pl"r"(pl"r"(ts"r"(re(x),im(y)),ts"r"(re(x),im(z))),pl"r"(ts"r"(im(x),re(y)),ts"r"(im(x),re(z)))),pl"r"(imts(x,y),imts(x,z)),ispl12"r"(ts"r"(re(x),pl"r"(im(y),im(z))),pl"r"(ts"r"(re(x),im(y)),ts"r"(re(x),im(z))),ts"r"(im(x),pl"r"(re(y),re(z))),pl"r"(ts"r"(im(x),re(y)),ts"r"(im(x),re(z))),disttp2(re(x),im(y),im(z)),disttp2(im(x),re(y),re(z))),t2(ts"r"(re(x),im(y)),ts"r"(re(x),im(z)),ts"r"(im(x),re(y)),ts"r"(im(x),re(z)))):is"r"(pl"r"(ts"r"(re(x),pl"r"(im(y),im(z))),ts"r"(im(x),pl"r"(re(y),re(z)))),pl"r"(imts(x,y),imts(x,z)))
-t6:=tr3is(cx,ts(x,pl(y,z)),pli(mn"r"(ts"r"(re(x),pl"r"(re(y),re(z))),ts"r"(im(x),pl"r"(im(y),im(z)))),pl"r"(ts"r"(re(x),pl"r"(im(y),im(z))),ts"r"(im(x),pl"r"(re(y),re(z))))),pli(pl"r"(rets(x,y),rets(x,z)),pl"r"(imts(x,y),imts(x,z))),pl(ts(x,y),ts(x,z)),tsis2a(x,pl"r"(re(y),re(z)),pl"r"(im(y),im(z))),isrecx12(mn"r"(ts"r"(re(x),pl"r"(re(y),re(z))),ts"r"(im(x),pl"r"(im(y),im(z)))),pl"r"(rets(x,y),rets(x,z)),pl"r"(ts"r"(re(x),pl"r"(im(y),im(z))),ts"r"(im(x),pl"r"(re(y),re(z)))),pl"r"(imts(x,y),imts(x,z)),t4,t5),plis12b(rets(x,y),imts(x,y),rets(x,z),imts(x,z))):is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
--3227
-satz227:=t6".3227":is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
-disttp1:=tr3is(cx,ts(pl(x,y),z),ts(z,pl(x,y)),pl(ts(z,x),ts(z,y)),pl(ts(x,z),ts(y,z)),comts(pl(x,y),z),satz227(z,x,y),ispl12(ts(z,x),ts(x,z),ts(z,y),ts(y,z),comts(z,x),comts(z,y))):is(ts(pl(x,y),z),pl(ts(x,z),ts(y,z)))
-disttp2:=satz227:is(ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)))
-distpt1:=symis(cx,ts(pl(x,y),z),pl(ts(x,z),ts(y,z)),disttp1):is(pl(ts(x,z),ts(y,z)),ts(pl(x,y),z))
-distpt2:=symis(cx,ts(x,pl(y,z)),pl(ts(x,y),ts(x,z)),disttp2):is(pl(ts(x,y),ts(x,z)),ts(x,pl(y,z)))
-satz228:=tr4is(cx,ts(x,mn(y,z)),ts(x,pl(y,m0(z))),pl(ts(x,y),ts(x,m0(z))),pl(ts(x,y),m0(ts(x,z))),mn(ts(x,y),ts(x,z)),ists2(mn(y,z),pl(y,m0(z)),x,satz218(y,z)),disttp2(x,y,m0(z)),ispl2(ts(x,m0(z)),m0(ts(x,z)),ts(x,y),satz224b(x,z)),satz218a(ts(x,y),ts(x,z))):is(ts(x,mn(y,z)),mn(ts(x,y),ts(x,z)))
-disttm1:=tr3is(cx,ts(mn(x,y),z),ts(z,mn(x,y)),mn(ts(z,x),ts(z,y)),mn(ts(x,z),ts(y,z)),comts(mn(x,y),z),satz228(z,x,y),ismn12(ts(z,x),ts(x,z),ts(z,y),ts(y,z),comts(z,x),comts(z,y))):is(ts(mn(x,y),z),mn(ts(x,z),ts(y,z)))
-disttm2:=satz228:is(ts(x,mn(y,z)),mn(ts(x,y),ts(x,z)))
-distmt1:=symis(cx,ts(mn(x,y),z),mn(ts(x,z),ts(y,z)),disttm1):is(mn(ts(x,z),ts(y,z)),ts(mn(x,y),z))
-distmt2:=symis(cx,ts(x,mn(y,z)),mn(ts(x,y),ts(x,z)),disttm2):is(mn(ts(x,y),ts(x,z)),ts(x,mn(y,z)))
-y@[n:nis(y,0c)][u1:complex][u2:complex][i:is(ts(y,u1),x)][j:is(ts(y,u2),x)]
-+3229
-t1:=tris2(cx,ts(y,u1),ts(y,u2),x,i,j):is(ts(y,u1),ts(y,u2))
-t2:=tris(cx,ts(y,mn(u1,u2)),mn(ts(y,u1),ts(y,u2)),0c,disttm2(y,u1,u2),satz213b(ts(y,u1),ts(y,u2),t1)):is(ts(y,mn(u1,u2)),0c)
-t3:=ore2(is(y,0c),is(mn(u1,u2),0c),satz221c(y,mn(u1,u2),t2),n):is(mn(u1,u2),0c)
--3229
-satz229b:=satz213a(u1,u2,t3".3229"):is(u1,u2)
-+*3229
-n@t4:=pnot0(mod2(y),lemma4(y,n)):nis"r"(mod2(y),0)
-u:=ts(pli(ov(re(y),mod2(y),t4),m0"r"(ov(im(y),mod2(y),t4))),x):complex
-[v:real]
-dd:=ov(v,mod2(y),t4):real
-n@t5:=tr3is(real,m0"r"(ts"r"(im(y),m0"r"(dd(im(y))))),m0"r"(m0"r"(ts"r"(im(y),dd(im(y))))),ts"r"(im(y),dd(im(y))),dd(ts"r"(im(y),im(y))),ism0"r"(ts"r"(im(y),m0"r"(dd(im(y)))),m0"r"(ts"r"(im(y),dd(im(y)))),satz197b(im(y),dd(im(y)))),satz177(ts"r"(im(y),dd(im(y)))),lemma6(im(y),im(y),mod2(y),t4)):is"r"(m0"r"(ts"r"(im(y),m0"r"(dd(im(y))))),dd(ts"r"(im(y),im(y))))
-t6:=tr3is(real,mn"r"(ts"r"(re(y),dd(re(y))),ts"r"(im(y),m0"r"(dd(im(y))))),pl"r"(dd(ts"r"(re(y),re(y))),dd(ts"r"(im(y),im(y)))),dd(mod2(y)),1rl,ispl12"r"(ts"r"(re(y),dd(re(y))),dd(ts"r"(re(y),re(y))),m0"r"(ts"r"(im(y),m0"r"(dd(im(y))))),dd(ts"r"(im(y),im(y))),lemma6(re(y),re(y),mod2(y),t4),t5),lemma7(ts"r"(re(y),re(y)),ts"r"(im(y),im(y)),mod2(y),t4),lemma8(mod2(y),t4)):is"r"(mn"r"(ts"r"(re(y),dd(re(y))),ts"r"(im(y),m0"r"(dd(im(y))))),1rl)
-t7:=tris(real,ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(m0"r"(re(y)),dd(im(y))),dd(ts"r"(m0"r"(re(y)),im(y))),satz197d(re(y),dd(im(y))),lemma6(m0"r"(re(y)),im(y),mod2(y),t4)):is"r"(ts"r"(re(y),m0"r"(dd(im(y)))),dd(ts"r"(m0"r"(re(y)),im(y))))
-t8:=tris(real,pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),pl"r"(dd(ts"r"(m0"r"(re(y)),im(y))),dd(ts"r"(im(y),re(y)))),dd(pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y)))),ispl12"r"(ts"r"(re(y),m0"r"(dd(im(y)))),dd(ts"r"(m0"r"(re(y)),im(y))),ts"r"(im(y),dd(re(y))),dd(ts"r"(im(y),re(y))),t7,lemma6(im(y),re(y),mod2(y),t4)),lemma7(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y)),mod2(y),t4)):is"r"(pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),dd(pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y)))))
-t9:=tr3is(real,pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y))),pl"r"(m0"r"(ts"r"(re(y),im(y))),ts"r"(im(y),re(y))),mn"r"(ts"r"(im(y),re(y)),ts"r"(re(y),im(y))),0,ispl1"r"(ts"r"(m0"r"(re(y)),im(y)),m0"r"(ts"r"(re(y),im(y))),ts"r"(im(y),re(y)),satz197a(re(y),im(y))),compl"r"(m0"r"(ts"r"(re(y),im(y))),ts"r"(im(y),re(y))),satz182e(ts"r"(im(y),re(y)),ts"r"(re(y),im(y)),comts"r"(im(y),re(y)))):is"r"(pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y))),0)
-t10:=tr3is(real,pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),dd(pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y)))),dd(0),0,t8,isf(real,real,[t:real]dd(t),pl"r"(ts"r"(m0"r"(re(y)),im(y)),ts"r"(im(y),re(y))),0,t9),lemma9(mod2(y),t4)):is"r"(pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),0)
-t11:=tris(cx,ts(y,pli(dd(re(y)),m0"r"(dd(im(y))))),pli(mn"r"(ts"r"(re(y),dd(re(y))),ts"r"(im(y),m0"r"(dd(im(y))))),pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y))))),1c,tsis2a(y,dd(re(y)),m0"r"(dd(im(y)))),isrecx12(mn"r"(ts"r"(re(y),dd(re(y))),ts"r"(im(y),m0"r"(dd(im(y))))),1rl,pl"r"(ts"r"(re(y),m0"r"(dd(im(y)))),ts"r"(im(y),dd(re(y)))),0,t6,t10)):is(ts(y,pli(dd(re(y)),m0"r"(dd(im(y))))),1c)
-t12:=tr3is(cx,ts(y,u),ts(ts(y,pli(dd(re(y)),m0"r"(dd(im(y))))),x),ts(1c,x),x,assts2(y,pli(dd(re(y)),m0"r"(dd(im(y)))),x),ists1(ts(y,pli(dd(re(y)),m0"r"(dd(im(y))))),1c,x,t11),satz222b(x)):is(ts(y,u),x)
--3229
-n@satz229a:=somei(cx,[t:cx]is(ts(y,t),x),u".3229",t12".3229"):some([t:cx]is(ts(y,t),x))
-satz229:=onei(cx,[t:cx]is(ts(y,t),x),[t:cx][u:cx][v:is(ts(y,t),x)][w:is(ts(y,u),x)]satz229b(t,u,v,w),satz229a):one([t:cx]is(ts(y,t),x))
-ov:=ind(cx,[t:cx]is(ts(y,t),x),satz229):complex
-satz229c:=oneax(cx,[t:cx]is(ts(y,t),x),satz229):is(ts(y,ov(x,y,n)),x)
-satz229d:=symis(cx,ts(y,ov(x,y,n)),x,satz229c):is(x,ts(y,ov(x,y,n)))
-satz229e:=tris(cx,ts(ov(x,y,n),y),ts(y,ov(x,y,n)),x,comts(ov(x,y,n),y),satz229c):is(ts(ov(x,y,n),y),x)
-satz229f:=symis(cx,ts(ov(x,y,n),y),x,satz229e):is(x,ts(ov(x,y,n),y))
-y@[u:complex][n:nis(y,0c)][i:is(ts(y,u),x)]
-satz229g:=satz229b(n,u,ov(x,y,n),i,satz229c(n)):is(u,ov(x,y,n))
-satz229h:=symis(cx,u,ov(x,y,n),satz229g):is(ov(x,y,n),u)
-n@[i:is(ts(u,y),x)]
-satz229j:=satz229g(tris(cx,ts(y,u),ts(u,y),x,comts(y,u),i)):is(u,ov(x,y,n))
-satz229k:=symis(cx,u,ov(x,y,n),satz229j):is(ov(x,y,n),u)
-z@[i:is(x,y)][n:nis(z,0c)]
-isov1:=isf(cx,cx,[t:cx]ov(t,z,n),x,y,i):is(ov(x,z,n),ov(y,z,n))
-i@[n:nis(x,0c)][o:nis(y,0c)]
-isov2:=satz229h(z,x,ov(z,y,o),n,tris(cx,ts(x,ov(z,y,o)),ts(y,ov(z,y,o)),z,ists1(x,y,ov(z,y,o),i),satz229c(z,y,o))):is(ov(z,x,n),ov(z,y,o))
-z@[u:complex][i:is(x,y)][j:is(z,u)][n:nis(z,0c)][o:nis(u,0c)]
-isov12:=tris(cx,ov(x,z,n),ov(y,z,n),ov(y,u,o),isov1(x,y,z,i,n),isov2(z,u,y,j,n,o)):is(ov(x,z,n),ov(y,u,o))
-y@satz230:=tris(cx,pl(mn(x,y),y),pl(y,mn(x,y)),x,compl(mn(x,y),y),satz212h(x,y)):is(pl(mn(x,y),y),x)
-satz231:=satz212e(pl(x,y),y,x,compl(y,x)):is(mn(pl(x,y),y),x)
-satz232:=satz212e(x,mn(x,y),y,satz230):is(mn(x,mn(x,y)),y)
-+4233
-z@t1:=tr3is(cx,pl(pl(y,z),mn(mn(x,y),z)),pl(mn(mn(x,y),z),pl(y,z)),pl(mn(mn(x,y),z),pl(z,y)),pl(pl(mn(mn(x,y),z),z),y),compl(pl(y,z),mn(mn(x,y),z)),ispl2(pl(y,z),pl(z,y),mn(mn(x,y),z),compl(y,z)),asspl2(mn(mn(x,y),z),z,y)):is(pl(pl(y,z),mn(mn(x,y),z)),pl(pl(mn(mn(x,y),z),z),y))
-t2:=tr3is(cx,pl(pl(y,z),mn(mn(x,y),z)),pl(pl(mn(mn(x,y),z),z),y),pl(mn(x,y),y),x,t1,ispl1(pl(mn(mn(x,y),z),z),mn(x,y),y,satz230(mn(x,y),z)),satz230(x,y)):is(pl(pl(y,z),mn(mn(x,y),z)),x)
--4233
-z@satz233:=satz212d(x,pl(y,z),mn(mn(x,y),z),t2".4233"):is(mn(mn(x,y),z),mn(x,pl(y,z)))
-satz234:=satz212g(pl(x,y),z,pl(x,mn(y,z)),tris(cx,pl(pl(x,mn(y,z)),z),pl(x,pl(mn(y,z),z)),pl(x,y),asspl1(x,mn(y,z),z),ispl2(pl(mn(y,z),z),y,x,satz230(y,z)))):is(mn(pl(x,y),z),pl(x,mn(y,z)))
-satz234a:=symis(cx,mn(pl(x,y),z),pl(x,mn(y,z)),satz234):is(pl(x,mn(y,z)),mn(pl(x,y),z))
-satz234b:=tr3is(cx,mn(pl(x,y),z),mn(pl(y,x),z),pl(y,mn(x,z)),pl(mn(x,z),y),ismn1(pl(x,y),pl(y,x),z,compl(x,y)),satz234(y,x,z),compl(y,mn(x,z))):is(mn(pl(x,y),z),pl(mn(x,z),y))
-satz234c:=symis(cx,mn(pl(x,y),z),pl(mn(x,z),y),satz234b):is(pl(mn(x,z),y),mn(pl(x,y),z))
-satz235:=satz212f(x,mn(y,z),pl(mn(x,y),z),tr3is(cx,pl(pl(mn(x,y),z),mn(y,z)),pl(mn(x,y),pl(z,mn(y,z))),pl(mn(x,y),y),x,asspl1(mn(x,y),z,mn(y,z)),ispl2(pl(z,mn(y,z)),y,mn(x,y),satz212h(y,z)),satz230(x,y))):is(pl(mn(x,y),z),mn(x,mn(y,z)))
-satz235a:=symis(cx,pl(mn(x,y),z),mn(x,mn(y,z)),satz235):is(mn(x,mn(y,z)),pl(mn(x,y),z))
-satz235b:=tris(cx,mn(x,mn(y,z)),pl(mn(x,y),z),mn(pl(x,z),y),satz235a,satz234c(x,z,y)):is(mn(x,mn(y,z)),mn(pl(x,z),y))
-satz235c:=tris(cx,mn(x,mn(y,z)),mn(pl(x,z),y),mn(pl(z,x),y),satz235b,ismn1(pl(x,z),pl(z,x),y,compl(x,z))):is(mn(x,mn(y,z)),mn(pl(z,x),y))
-satz236:=satz212g(pl(x,z),pl(y,z),mn(x,y),tris(cx,pl(mn(x,y),pl(y,z)),pl(pl(mn(x,y),y),z),pl(x,z),asspl2(mn(x,y),y,z),ispl1(pl(mn(x,y),y),x,z,satz230(x,y)))):is(mn(pl(x,z),pl(y,z)),mn(x,y))
-satz236a:=tris(cx,mn(pl(z,x),pl(z,y)),mn(pl(x,z),pl(y,z)),mn(x,y),ismn12(pl(z,x),pl(x,z),pl(z,y),pl(y,z),compl(z,x),compl(z,y)),satz236):is(mn(pl(z,x),pl(z,y)),mn(x,y))
-[u:complex]
-+4237
-t1:=tr3is(cx,pl(mn(z,u),pl(u,y)),pl(pl(mn(z,u),u),y),pl(z,y),pl(y,z),asspl2(mn(z,u),u,y),ispl1(pl(mn(z,u),u),z,y,satz230(z,u)),compl(z,y)):is(pl(mn(z,u),pl(u,y)),pl(y,z))
-t2:=tr3is(cx,pl(pl(mn(x,y),mn(z,u)),pl(y,u)),pl(pl(mn(x,y),mn(z,u)),pl(u,y)),pl(mn(x,y),pl(mn(z,u),pl(u,y))),pl(mn(x,y),pl(y,z)),ispl2(pl(y,u),pl(u,y),pl(mn(x,y),mn(z,u)),compl(y,u)),asspl1(mn(x,y),mn(z,u),pl(u,y)),ispl2(pl(mn(z,u),pl(u,y)),pl(y,z),mn(x,y),t1)):is(pl(pl(mn(x,y),mn(z,u)),pl(y,u)),pl(mn(x,y),pl(y,z)))
-t3:=tr3is(cx,pl(pl(mn(x,y),mn(z,u)),pl(y,u)),pl(mn(x,y),pl(y,z)),pl(pl(mn(x,y),y),z),pl(x,z),t2,asspl2(mn(x,y),y,z),ispl1(pl(mn(x,y),y),x,z,satz230(x,y))):is(pl(pl(mn(x,y),mn(z,u)),pl(y,u)),pl(x,z))
--4237
-satz237:=satz212f(pl(x,z),pl(y,u),pl(mn(x,y),mn(z,u)),t3".4237"):is(pl(mn(x,y),mn(z,u)),mn(pl(x,z),pl(y,u)))
-+4238
-t1:=tris(cx,pl(pl(x,u),z),pl(x,pl(u,z)),pl(x,pl(z,u)),asspl1(x,u,z),ispl2(pl(u,z),pl(z,u),x,compl(u,z))):is(pl(pl(x,u),z),pl(x,pl(z,u)))
-t2:=tr3is(cx,pl(mn(pl(x,u),pl(y,z)),mn(z,u)),mn(pl(pl(x,u),z),pl(pl(y,z),u)),mn(pl(x,pl(z,u)),pl(y,pl(z,u))),mn(x,y),satz237(pl(x,u),pl(y,z),z,u),ismn12(pl(pl(x,u),z),pl(x,pl(z,u)),pl(pl(y,z),u),pl(y,pl(z,u)),t1,asspl1(y,z,u)),satz236(x,y,pl(z,u))):is(pl(mn(pl(x,u),pl(y,z)),mn(z,u)),mn(x,y))
--4238
-satz238:=satz212g(mn(x,y),mn(z,u),mn(pl(x,u),pl(y,z)),t2".4238"):is(mn(mn(x,y),mn(z,u)),mn(pl(x,u),pl(y,z)))
-[i:is(mn(x,y),mn(z,u))]
-+4239
-t1:=tris1(cx,mn(pl(x,u),pl(y,z)),0c,mn(mn(x,y),mn(z,u)),satz238,satz213b(mn(x,y),mn(z,u),i)):is(mn(pl(x,u),pl(y,z)),0c)
--4239
-satz239a:=satz213a(pl(x,u),pl(y,z),t1".4239"):is(pl(x,u),pl(y,z))
-u@[i:is(pl(x,u),pl(y,z))]
-+*4239
-i@t2:=tris(cx,mn(mn(x,y),mn(z,u)),mn(pl(x,u),pl(y,z)),0c,satz238,satz213b(pl(x,u),pl(y,z),i)):is(mn(mn(x,y),mn(z,u)),0c)
--4239
-i@satz239b:=satz213a(mn(x,y),mn(z,u),t2".4239"):is(mn(x,y),mn(z,u))
-y@[n:nis(y,0c)]
-satz240:=tris(cx,ts(ov(x,y,n),y),ts(y,ov(x,y,n)),x,comts(ov(x,y,n),y),satz229c(x,y,n)):is(ts(ov(x,y,n),y),x)
-satz241:=satz229h(ts(x,y),y,x,n,comts(y,x)):is(ov(ts(x,y),y,n),x)
-y@[n:nis(x,0c)][o:nis(y,0c)]
-lemma6:=th3"l.imp"(is(ov(x,y,o),0c),is(x,0c),n,[t:is(ov(x,y,o),0c)]tris1(cx,x,0c,ts(y,ov(x,y,o)),satz229c(x,y,o),satz221b(y,ov(x,y,o),t))):nis(ov(x,y,o),0c)
-satz242:=satz229h(x,ov(x,y,o),y,lemma6,satz240(o)):is(ov(x,ov(x,y,o),lemma6),y)
-z@[n:nis(y,0c)][o:nis(z,0c)]
-+5243
-t1:=tr3is(cx,ts(ts(y,z),ov(ov(x,y,n),z,o)),ts(ov(ov(x,y,n),z,o),ts(y,z)),ts(ov(ov(x,y,n),z,o),ts(z,y)),ts(ts(ov(ov(x,y,n),z,o),z),y),comts(ts(y,z),ov(ov(x,y,n),z,o)),ists2(ts(y,z),ts(z,y),ov(ov(x,y,n),z,o),comts(y,z)),assts2(ov(ov(x,y,n),z,o),z,y)):is(ts(ts(y,z),ov(ov(x,y,n),z,o)),ts(ts(ov(ov(x,y,n),z,o),z),y))
-t2:=tr3is(cx,ts(ts(y,z),ov(ov(x,y,n),z,o)),ts(ts(ov(ov(x,y,n),z,o),z),y),ts(ov(x,y,n),y),x,t1,ists1(ts(ov(ov(x,y,n),z,o),z),ov(x,y,n),y,satz240(ov(x,y,n),z,o)),satz240(x,y,n)):is(ts(ts(y,z),ov(ov(x,y,n),z,o)),x)
--5243
-satz243:=satz229g(x,ts(y,z),ov(ov(x,y,n),z,o),satz221d(y,z,n,o),t2".5243"):is(ov(ov(x,y,n),z,o),ov(x,ts(y,z),satz221d(y,z,n,o)))
-z@[n:nis(z,0c)]
-satz244:=satz229k(ts(x,y),z,ts(x,ov(y,z,n)),n,tris(cx,ts(ts(x,ov(y,z,n)),z),ts(x,ts(ov(y,z,n),z)),ts(x,y),assts1(x,ov(y,z,n),z),ists2(ts(ov(y,z,n),z),y,x,satz240(y,z,n)))):is(ov(ts(x,y),z,n),ts(x,ov(y,z,n)))
-satz244a:=symis(cx,ov(ts(x,y),z,n),ts(x,ov(y,z,n)),satz244):is(ts(x,ov(y,z,n)),ov(ts(x,y),z,n))
-satz244b:=tr3is(cx,ov(ts(x,y),z,n),ov(ts(y,x),z,n),ts(y,ov(x,z,n)),ts(ov(x,z,n),y),isov1(ts(x,y),ts(y,x),z,comts(x,y),n),satz244(y,x,z,n),comts(y,ov(x,z,n))):is(ov(ts(x,y),z,n),ts(ov(x,z,n),y))
-satz244c:=symis(cx,ov(ts(x,y),z,n),ts(ov(x,z,n),y),satz244b):is(ts(ov(x,z,n),y),ov(ts(x,y),z,n))
-z@[n:nis(y,0c)][o:nis(z,0c)]
-satz245:=satz229j(x,ov(y,z,o),ts(ov(x,y,n),z),lemma6(y,z,n,o),tr3is(cx,ts(ts(ov(x,y,n),z),ov(y,z,o)),ts(ov(x,y,n),ts(z,ov(y,z,o))),ts(ov(x,y,n),y),x,assts1(ov(x,y,n),z,ov(y,z,o)),ists2(ts(z,ov(y,z,o)),y,ov(x,y,n),satz229c(y,z,o)),satz240(x,y,n))):is(ts(ov(x,y,n),z),ov(x,ov(y,z,o),lemma6(y,z,n,o)))
-satz245a:=symis(cx,ts(ov(x,y,n),z),ov(x,ov(y,z,o),lemma6(y,z,n,o)),satz245):is(ov(x,ov(y,z,o),lemma6(y,z,n,o)),ts(ov(x,y,n),z))
-satz245b:=tris(cx,ov(x,ov(y,z,o),lemma6(y,z,n,o)),ts(ov(x,y,n),z),ov(ts(x,z),y,n),satz245a,satz244c(x,z,y,n)):is(ov(x,ov(y,z,o),lemma6(y,z,n,o)),ov(ts(x,z),y,n))
-satz245c:=tris(cx,ov(x,ov(y,z,o),lemma6(y,z,n,o)),ov(ts(x,z),y,n),ov(ts(z,x),y,n),satz245b,isov1(ts(x,z),ts(z,x),y,comts(x,z),n)):is(ov(x,ov(y,z,o),lemma6(y,z,n,o)),ov(ts(z,x),y,n))
-satz246:=satz229k(ts(x,z),ts(y,z),ov(x,y,n),satz221d(y,z,n,o),tris(cx,ts(ov(x,y,n),ts(y,z)),ts(ts(ov(x,y,n),y),z),ts(x,z),assts2(ov(x,y,n),y,z),ists1(ts(ov(x,y,n),y),x,z,satz240(x,y,n)))):is(ov(ts(x,z),ts(y,z),satz221d(y,z,n,o)),ov(x,y,n))
-satz246a:=tris(cx,ov(ts(z,x),ts(z,y),satz221d(z,y,o,n)),ov(ts(x,z),ts(y,z),satz221d(y,z,n,o)),ov(x,y,n),isov12(ts(z,x),ts(x,z),ts(z,y),ts(y,z),comts(z,x),comts(z,y),satz221d(z,y,o,n),satz221d(y,z,n,o)),satz246):is(ov(ts(z,x),ts(z,y),satz221d(z,y,o,n)),ov(x,y,n))
-z@[u:complex][n:nis(y,0c)][o:nis(u,0c)]
-+5247
-t1:=tr3is(cx,ts(ov(z,u,o),ts(u,y)),ts(ts(ov(z,u,o),u),y),ts(z,y),ts(y,z),assts2(ov(z,u,o),u,y),ists1(ts(ov(z,u,o),u),z,y,satz240(z,u,o)),comts(z,y)):is(ts(ov(z,u,o),ts(u,y)),ts(y,z))
-t2:=tr3is(cx,ts(ts(ov(x,y,n),ov(z,u,o)),ts(y,u)),ts(ts(ov(x,y,n),ov(z,u,o)),ts(u,y)),ts(ov(x,y,n),ts(ov(z,u,o),ts(u,y))),ts(ov(x,y,n),ts(y,z)),ists2(ts(y,u),ts(u,y),ts(ov(x,y,n),ov(z,u,o)),comts(y,u)),assts1(ov(x,y,n),ov(z,u,o),ts(u,y)),ists2(ts(ov(z,u,o),ts(u,y)),ts(y,z),ov(x,y,n),t1)):is(ts(ts(ov(x,y,n),ov(z,u,o)),ts(y,u)),ts(ov(x,y,n),ts(y,z)))
-t3:=tr3is(cx,ts(ts(ov(x,y,n),ov(z,u,o)),ts(y,u)),ts(ov(x,y,n),ts(y,z)),ts(ts(ov(x,y,n),y),z),ts(x,z),t2,assts2(ov(x,y,n),y,z),ists1(ts(ov(x,y,n),y),x,z,satz240(x,y,n))):is(ts(ts(ov(x,y,n),ov(z,u,o)),ts(y,u)),ts(x,z))
--5247
-satz247:=satz229j(ts(x,z),ts(y,u),ts(ov(x,y,n),ov(z,u,o)),satz221d(y,u,n,o),t3".5247"):is(ts(ov(x,y,n),ov(z,u,o)),ov(ts(x,z),ts(y,u),satz221d(y,u,n,o)))
-u@[n:nis(y,0c)][o:nis(z,0c)][p:nis(u,0c)]
-+5248
-t1:=tris(cx,ts(ts(x,u),z),ts(x,ts(u,z)),ts(x,ts(z,u)),assts1(x,u,z),ists2(ts(u,z),ts(z,u),x,comts(u,z))):is(ts(ts(x,u),z),ts(x,ts(z,u)))
-t2:=tr3is(cx,ts(ov(ts(x,u),ts(y,z),satz221d(y,z,n,o)),ov(z,u,p)),ov(ts(ts(x,u),z),ts(ts(y,z),u),satz221d(ts(y,z),u,satz221d(y,z,n,o),p)),ov(ts(x,ts(z,u)),ts(y,ts(z,u)),satz221d(y,ts(z,u),n,satz221d(z,u,o,p))),ov(x,y,n),satz247(ts(x,u),ts(y,z),z,u,satz221d(y,z,n,o),p),isov12(ts(ts(x,u),z),ts(x,ts(z,u)),ts(ts(y,z),u),ts(y,ts(z,u)),t1,assts1(y,z,u),satz221d(ts(y,z),u,satz221d(y,z,n,o),p),satz221d(y,ts(z,u),n,satz221d(z,u,o,p))),satz246(x,y,ts(z,u),n,satz221d(z,u,o,p))):is(ts(ov(ts(x,u),ts(y,z),satz221d(y,z,n,o)),ov(z,u,p)),ov(x,y,n))
--5248
-satz248:=satz229k(ov(x,y,n),ov(z,u,p),ov(ts(x,u),ts(y,z),satz221d(y,z,n,o)),lemma6(z,u,o,p),t2".5248"):is(ov(ov(x,y,n),ov(z,u,p),lemma6(z,u,o,p)),ov(ts(x,u),ts(y,z),satz221d(y,z,n,o)))
-x@[n:nis(x,0c)]
-satz249:=satz229h(0c,x,0c,n,satz221b(x,0c,refis(cx,0c))):is(ov(0c,x,n),0c)
-satz250:=satz229h(x,x,1c,n,satz222(x)):is(ov(x,x,n),1c)
-y@[n:nis(y,0c)][i:is(x,y)]
-satz251a:=tris(cx,ov(x,y,n),ov(x,x,th2"e.notis"(cx,y,0c,x,n,i)),1c,isov2(y,x,x,symis(cx,x,y,i),n,th2"e.notis"(cx,y,0c,x,n,i)),satz250(x,th2"e.notis"(cx,y,0c,x,n,i))):is(ov(x,y,n),1c)
-n@[i:is(ov(x,y,n),1c)]
-satz251b:=tr3is(cx,x,ts(y,ov(x,y,n)),ts(y,1c),y,satz229d(x,y,n),ists2(ov(x,y,n),1c,y,i),satz222(y)):is(x,y)
-u@[n:nis(y,0c)][o:nis(u,0c)][i:is(ov(x,y,n),ov(z,u,o))]
-+5252
-[j:is(z,0c)]
-t1:=tr3is(cx,ov(x,y,n),ov(z,u,o),ov(0c,u,o),0c,i,isov1(z,0c,u,j,o),satz249(u,o)):is(ov(x,y,n),0c)
-t2:=tris(cx,x,ts(y,ov(x,y,n)),0c,satz229d(x,y,n),satz221b(y,ov(x,y,n),t1)):is(x,0c)
-t3:=tris2(cx,ts(x,u),ts(y,z),0c,satz221a(x,u,t2),satz221b(y,z,j)):is(ts(x,u),ts(y,z))
-i@[p:nis(z,0c)]
-t4:=tris1(cx,ov(ts(x,u),ts(y,z),satz221d(y,z,n,p)),1c,ov(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o)),satz248(x,y,z,u,n,p,o),satz251a(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o),i)):is(ov(ts(x,u),ts(y,z),satz221d(y,z,n,p)),1c)
-t5:=satz251b(ts(x,u),ts(y,z),satz221d(y,z,n,p),t4):is(ts(x,u),ts(y,z))
--5252
-satz252a:=th1"l.imp"(is(z,0c),is(ts(x,u),ts(y,z)),[t:is(z,0c)]t3".5252"(t),[t:nis(z,0c)]t5".5252"(t)):is(ts(x,u),ts(y,z))
-o@[i:is(ts(x,u),ts(y,z))]
-+*5252
-i@[j:is(z,0c)]
-t6:=tris(cx,ts(x,u),ts(y,z),0c,i,satz221b(y,z,j)):is(ts(x,u),0c)
-t7:=ore1(is(x,0c),is(u,0c),satz221c(x,u,t6),o):is(x,0c)
-t8:=tris2(cx,ov(x,y,n),ov(z,u,o),0c,tris(cx,ov(x,y,n),ov(0c,y,n),0c,isov1(x,0c,y,t7,n),satz249(y,n)),tris(cx,ov(z,u,o),ov(0c,u,o),0c,isov1(z,0c,u,j,o),satz249(u,o))):is(ov(x,y,n),ov(z,u,o))
-i@[p:nis(z,0c)]
-t9:=tris(cx,ov(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o)),ov(ts(x,u),ts(y,z),satz221d(y,z,n,p)),1c,satz248(x,y,z,u,n,p,o),satz251a(ts(x,u),ts(y,z),satz221d(y,z,n,p),i)):is(ov(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o)),1c)
-t10:=satz251b(ov(x,y,n),ov(z,u,o),lemma6(z,u,p,o),t9):is(ov(x,y,n),ov(z,u,o))
--5252
-i@satz252b:=th1"l.imp"(is(z,0c),is(ov(x,y,n),ov(z,u,o)),[t:is(z,0c)]t8".5252"(t),[t:nis(z,0c)]t10".5252"(t)):is(ov(x,y,n),ov(z,u,o))
-z@[n:nis(y,0c)]
-satz253:=satz229g(pl(x,z),y,pl(ov(x,y,n),ov(z,y,n)),n,tris(cx,ts(y,pl(ov(x,y,n),ov(z,y,n))),pl(ts(y,ov(x,y,n)),ts(y,ov(z,y,n))),pl(x,z),disttp2(y,ov(x,y,n),ov(z,y,n)),ispl12(ts(y,ov(x,y,n)),x,ts(y,ov(z,y,n)),z,satz229c(x,y,n),satz229c(z,y,n)))):is(pl(ov(x,y,n),ov(z,y,n)),ov(pl(x,z),y,n))
-z@[n:nis(z,0c)]
-distop:=symis(cx,pl(ov(x,z,n),ov(y,z,n)),ov(pl(x,y),z,n),satz253(x,z,y,n)):is(ov(pl(x,y),z,n),pl(ov(x,z,n),ov(y,z,n)))
-distpo:=satz253(x,z,y,n):is(pl(ov(x,z,n),ov(y,z,n)),ov(pl(x,y),z,n))
-u@[n:nis(y,0c)][o:nis(u,0c)]
-satz254:=tris1(cx,pl(ov(x,y,n),ov(z,u,o)),ov(pl(ts(x,u),ts(y,z)),ts(y,u),satz221d(y,u,n,o)),pl(ov(ts(x,u),ts(y,u),satz221d(y,u,n,o)),ov(ts(y,z),ts(y,u),satz221d(y,u,n,o))),ispl12(ov(ts(x,u),ts(y,u),satz221d(y,u,n,o)),ov(x,y,n),ov(ts(y,z),ts(y,u),satz221d(y,u,n,o)),ov(z,u,o),satz246(x,y,u,n,o),satz246a(z,u,y,o,n)),satz253(ts(x,u),ts(y,u),ts(y,z),satz221d(y,u,n,o))):is(pl(ov(x,y,n),ov(z,u,o)),ov(pl(ts(x,u),ts(y,z)),ts(y,u),satz221d(y,u,n,o)))
-z@[n:nis(y,0c)]
-satz255:=satz229g(mn(x,z),y,mn(ov(x,y,n),ov(z,y,n)),n,tris(cx,ts(y,mn(ov(x,y,n),ov(z,y,n))),mn(ts(y,ov(x,y,n)),ts(y,ov(z,y,n))),mn(x,z),disttm2(y,ov(x,y,n),ov(z,y,n)),ismn12(ts(y,ov(x,y,n)),x,ts(y,ov(z,y,n)),z,satz229c(x,y,n),satz229c(z,y,n)))):is(mn(ov(x,y,n),ov(z,y,n)),ov(mn(x,z),y,n))
-z@[n:nis(z,0c)]
-distom:=symis(cx,mn(ov(x,z,n),ov(y,z,n)),ov(mn(x,y),z,n),satz255(x,z,y,n)):is(ov(mn(x,y),z,n),mn(ov(x,z,n),ov(y,z,n)))
-distmo:=satz255(x,z,y,n):is(mn(ov(x,z,n),ov(y,z,n)),ov(mn(x,y),z,n))
-u@[n:nis(y,0c)][o:nis(u,0c)]
-satz256:=tris1(cx,mn(ov(x,y,n),ov(z,u,o)),ov(mn(ts(x,u),ts(y,z)),ts(y,u),satz221d(y,u,n,o)),mn(ov(ts(x,u),ts(y,u),satz221d(y,u,n,o)),ov(ts(y,z),ts(y,u),satz221d(y,u,n,o))),ismn12(ov(ts(x,u),ts(y,u),satz221d(y,u,n,o)),ov(x,y,n),ov(ts(y,z),ts(y,u),satz221d(y,u,n,o)),ov(z,u,o),satz246(x,y,u,n,o),satz246a(z,u,y,o,n)),satz255(ts(x,u),ts(y,u),ts(y,z),satz221d(y,u,n,o))):is(mn(ov(x,y,n),ov(z,u,o)),ov(mn(ts(x,u),ts(y,z)),ts(y,u),satz221d(y,u,n,o)))
-x@conj:=pli(re(x),m0"r"(im(x))):complex
-b@conjisa:=isrecx12(re(pli(a,b)),a,m0"r"(im(pli(a,b))),m0"r"(b),reis(a,b),ism0"r"(im(pli(a,b)),b,imis(a,b))):is(conj(pli(a,b)),pli(a,m0"r"(b)))
-conjisb:=symis(cx,conj(pli(a,b)),pli(a,m0"r"(b)),conjisa):is(pli(a,m0"r"(b)),conj(pli(a,b)))
-y@[i:is(x,y)]
-isconj:=isf(cx,cx,[t:cx]conj(t),x,y,i):is(conj(x),conj(y))
-x@satz257:=tr3is(cx,conj(conj(x)),pli(re(x),m0"r"(m0"r"(im(x)))),pli(re(x),im(x)),x,conjisa(re(x),m0"r"(im(x))),isrecx2(m0"r"(m0"r"(im(x))),im(x),re(x),satz177(im(x))),pliis(x)):is(conj(conj(x)),x)
-[i:is(x,0c)]
-satz258a:=tr3is(cx,conj(x),conj(0c),pli(0,m0"r"(0)),0c,isconj(x,0c,i),conjisa(0,0),isrecx2(m0"r"(0),0,0,satz176b(0,refis(real,0)))):is(conj(x),0c)
-x@[i:is(conj(x),0c)]
-+6258
-t1:=tris(real,re(x),re(conj(x)),0,isre(re(x),m0"r"(im(x))),lemma1(conj(x),i)):is"r"(re(x),0)
-t2:=satz176e(im(x),tris(real,m0"r"(im(x)),im(conj(x)),0,isim(re(x),m0"r"(im(x))),lemma2(conj(x),i))):is"r"(im(x),0)
--6258
-satz258b:=tris(cx,x,pli(re(x),im(x)),0c,ispli(x),isrecx12(re(x),0,im(x),0,t1".6258",t2".6258")):is(x,0c)
-+*6258
-i@anders:=tris1(cx,x,0c,conj(conj(x)),satz257,satz258a(conj(x),i)):is(x,0c)
--6258
-x@[n:nis(x,0c)]
-satz258c:=th3"l.imp"(is(conj(x),0c),is(x,0c),n,[t:is(conj(x),0c)]satz258b(t)):nis(conj(x),0c)
-x@[i:is(conj(x),x)]
-+6259
-t1:=tris(real,m0"r"(im(x)),im(conj(x)),im(x),isim(re(x),m0"r"(im(x))),isceim(conj(x),x,i)):is"r"(m0"r"(im(x)),im(x))
--6259
-satz259a:=lemma10(im(x),symis(real,m0"r"(im(x)),im(x),t1".6259")):is"r"(im(x),0)
-x@[i:is"r"(im(x),0)]
-satz259b:=tris(cx,conj(x),pli(re(x),im(x)),x,isrecx2(m0"r"(im(x)),im(x),re(x),tris2(real,m0"r"(im(x)),im(x),0,satz176b(im(x),i),i)),pliis(x)):is(conj(x),x)
-x@[i:is(x,conj(x))]
-satz269c:=satz259a(x,symis(cx,x,conj(x),i)):is"r"(im(x),0)
-x@[i:is"r"(im(x),0)]
-satz269d:=symis(cx,conj(x),x,satz259b(i)):is(x,conj(x))
-y@satz260:=tr3is(cx,conj(pl(x,y)),pli(pl"r"(re(x),re(y)),m0"r"(pl"r"(im(x),im(y)))),pli(pl"r"(re(x),re(y)),pl"r"(m0"r"(im(x)),m0"r"(im(y)))),pl(conj(x),conj(y)),conjisa(pl"r"(re(x),re(y)),pl"r"(im(x),im(y))),isrecx2(m0"r"(pl"r"(im(x),im(y))),pl"r"(m0"r"(im(x)),m0"r"(im(y))),pl"r"(re(x),re(y)),satz180(im(x),im(y))),plis12b(re(x),m0"r"(im(x)),re(y),m0"r"(im(y)))):is(conj(pl(x,y)),pl(conj(x),conj(y)))
-satz260a:=symis(cx,conj(pl(x,y)),pl(conj(x),conj(y)),satz260):is(pl(conj(x),conj(y)),conj(pl(x,y)))
-+6261
-t1:=tris(real,m0"r"(imts(x,y)),pl"r"(m0"r"(ts"r"(re(x),im(y))),m0"r"(ts"r"(im(x),re(y)))),pl"r"(ts"r"(re(x),m0"r"(im(y))),ts"r"(m0"r"(im(x)),re(y))),satz180(ts"r"(re(x),im(y)),ts"r"(im(x),re(y))),ispl12"r"(m0"r"(ts"r"(re(x),im(y))),ts"r"(re(x),m0"r"(im(y))),m0"r"(ts"r"(im(x),re(y))),ts"r"(m0"r"(im(x)),re(y)),satz197f(re(x),im(y)),satz197e(im(x),re(y)))):is"r"(m0"r"(imts(x,y)),pl"r"(ts"r"(re(x),m0"r"(im(y))),ts"r"(m0"r"(im(x)),re(y))))
--6261
-satz261:=tr3is(cx,conj(ts(x,y)),pli(rets(x,y),m0"r"(imts(x,y))),pli(mn"r"(ts"r"(re(x),re(y)),ts"r"(m0"r"(im(x)),m0"r"(im(y)))),pl"r"(ts"r"(re(x),m0"r"(im(y))),ts"r"(m0"r"(im(x)),re(y)))),ts(conj(x),conj(y)),conjisa(rets(x,y),imts(x,y)),isrecx12(rets(x,y),mn"r"(ts"r"(re(x),re(y)),ts"r"(m0"r"(im(x)),m0"r"(im(y)))),m0"r"(imts(x,y)),pl"r"(ts"r"(re(x),m0"r"(im(y))),ts"r"(m0"r"(im(x)),re(y))),ismn2"r"(ts"r"(im(x),im(y)),ts"r"(m0"r"(im(x)),m0"r"(im(y))),ts"r"(re(x),re(y)),satz198a(im(x),im(y))),t1".6261"),tsis12b(re(x),m0"r"(im(x)),re(y),m0"r"(im(y)))):is(conj(ts(x,y)),ts(conj(x),conj(y)))
-satz261a:=symis(cx,conj(ts(x,y)),ts(conj(x),conj(y)),satz261):is(ts(conj(x),conj(y)),conj(ts(x,y)))
-+6262
-t1:=symis(cx,pl(mn(x,y),y),x,satz230(x,y)):is(x,pl(mn(x,y),y))
-t2:=tris(cx,conj(x),conj(pl(mn(x,y),y)),pl(conj(mn(x,y)),conj(y)),isconj(x,pl(mn(x,y),y),t1),satz260(mn(x,y),y)):is(conj(x),pl(conj(mn(x,y)),conj(y)))
--6262
-satz262:=satz212f(conj(x),conj(y),conj(mn(x,y)),symis(cx,conj(x),pl(conj(mn(x,y)),conj(y)),t2".6262")):is(conj(mn(x,y)),mn(conj(x),conj(y)))
-satz262a:=symis(cx,conj(mn(x,y)),mn(conj(x),conj(y)),satz262):is(mn(conj(x),conj(y)),conj(mn(x,y)))
-[n:nis(y,0c)]
-+6263
-t1:=satz229f(x,y,n):is(x,ts(ov(x,y,n),y))
-t2:=isconj(x,ts(ov(x,y,n),y),t1):is(conj(x),conj(ts(ov(x,y,n),y)))
-t3:=satz261(ov(x,y,n),y):is(conj(ts(ov(x,y,n),y)),ts(conj(ov(x,y,n)),conj(y)))
-t4:=tris(cx,conj(x),conj(ts(ov(x,y,n),y)),ts(conj(ov(x,y,n)),conj(y)),t2,t3):is(conj(x),ts(conj(ov(x,y,n)),conj(y)))
-t5:=satz258c(y,n):nis(conj(y),0c)
--6263
-satz263:=satz229j(conj(x),conj(y),conj(ov(x,y,n)),t5".6263",symis(cx,conj(x),ts(conj(ov(x,y,n)),conj(y)),t4".6263")):is(conj(ov(x,y,n)),ov(conj(x),conj(y),satz258c(y,n)))
-satz263a:=symis(cx,conj(ov(x,y,n)),ov(conj(x),conj(y),satz258c(y,n)),satz263):is(ov(conj(x),conj(y),satz258c(y,n)),conj(ov(x,y,n)))
-x@mod:=sqrt(mod2(x),lemma5(x)):real
-y@[i:is(x,y)]
-ismod:=isf(cx,real,[t:cx]mod(t),x,y,i):is"r"(mod(x),mod(y))
-x@[n:nis(x,0c)]
-satz264a:=sqrtnot0(mod2(x),lemma5(x),pnot0(mod2(x),lemma4(x,n))):pos(mod(x))
-x@[i:is(x,0c)]
-satz264b:=sqrt0(mod2(x),lemma5(x),lemma3(x,i)):is"r"(mod(x),0)
-x@satz264c:=thsqrt1a(mod2(x),lemma5(x)):not(neg(mod(x)))
-satz264d:=satz167f(mod(x),0,th3"l.imp"(less(mod(x),0),neg(mod(x)),satz264c,[t:less(mod(x),0)]satz169d(mod(x),t))):moreis(mod(x),0)
-+7265
-t1:=symis(real,ts"r"(mod(x),mod(x)),mod2(x),thsqrt1b(mod2(x),lemma5(x))):is"r"(mod2(x),ts"r"(mod(x),mod(x)))
-t2:=tris(real,pl"r"(ts"r"(re(x),re(x)),0),ts"r"(re(x),re(x)),ts"r"(abs(re(x)),abs(re(x))),pl02(ts"r"(re(x),re(x)),0,refis(real,0)),lemma12"r"(re(x))):is"r"(pl"r"(ts"r"(re(x),re(x)),0),ts"r"(abs(re(x)),abs(re(x))))
-t3:=satz191(ts"r"(re(x),re(x)),ts"r"(re(x),re(x)),ts"r"(im(x),im(x)),0,moreisi2(ts"r"(re(x),re(x)),ts"r"(re(x),re(x)),refis(real,ts"r"(re(x),re(x)))),lemma11"r"(im(x))):moreis(mod2(x),pl"r"(ts"r"(re(x),re(x)),0))
-t4:=ismoreis12(mod2(x),ts"r"(mod(x),mod(x)),pl"r"(ts"r"(re(x),re(x)),0),ts"r"(abs(re(x)),abs(re(x))),t1,t2,t3):moreis(ts"r"(mod(x),mod(x)),ts"r"(abs(re(x)),abs(re(x))))
-t5:=tris(real,pl"r"(0,ts"r"(im(x),im(x))),ts"r"(im(x),im(x)),ts"r"(abs(im(x)),abs(im(x))),pl01(0,ts"r"(im(x),im(x)),refis(real,0)),lemma12"r"(im(x))):is"r"(pl"r"(0,ts"r"(im(x),im(x))),ts"r"(abs(im(x)),abs(im(x))))
-t6:=satz191(ts"r"(re(x),re(x)),0,ts"r"(im(x),im(x)),ts"r"(im(x),im(x)),lemma11"r"(re(x)),moreisi2(ts"r"(im(x),im(x)),ts"r"(im(x),im(x)),refis(real,ts"r"(im(x),im(x))))):moreis(mod2(x),pl"r"(0,ts"r"(im(x),im(x))))
-t7:=ismoreis12(mod2(x),ts"r"(mod(x),mod(x)),pl"r"(0,ts"r"(im(x),im(x))),ts"r"(abs(im(x)),abs(im(x))),t1,t5,t6):moreis(ts"r"(mod(x),mod(x)),ts"r"(abs(im(x)),abs(im(x))))
-@[r:real][s:real][m:moreis(ts"r"(r,r),ts"r"(s,s))][n:moreis(r,0)][l:less(r,s)]
-t8:=lemma2"r"(r,s,l):more(s,r)
-t9:=satz169b(s,satz172d(s,r,0,t8,n)):pos(s)
-[o:more(r,0)]
-t10:=trmore(ts"r"(s,s),ts"r"(r,s),ts"r"(r,r),satz203a(s,r,s,t8,t9),satz203d(s,r,r,t8,satz169b(r,o))):more(ts"r"(s,s),ts"r"(r,r))
-l@[i:is"r"(r,0)]
-t11:=ismore2(0,ts"r"(r,r),ts"r"(s,s),symis(real,ts"r"(r,r),0,ts01(r,r,i)),satz169a(ts"r"(s,s),possq(s,pnot0(s,t9)))):more(ts"r"(s,s),ts"r"(r,r))
-l@t12:=lemma1"r"(ts"r"(s,s),ts"r"(r,r),orapp(more(r,0),is"r"(r,0),more(ts"r"(s,s),ts"r"(r,r)),n,[t:more(r,0)]t10(t),[t:is"r"(r,0)]t11(t))):less(ts"r"(r,r),ts"r"(s,s))
-n@t13:=satz167f(r,s,[t:less(r,s)]<t12(t)>satz167c(ts"r"(r,r),ts"r"(s,s),m)):moreis(r,s)
--7265
-satz265a:=t13".7265"(mod(x),abs(re(x)),t4".7265",satz264d(x)):moreis(mod(x),abs(re(x)))
-satz265b:=t13".7265"(mod(x),abs(im(x)),t7".7265",satz264d(x)):moreis(mod(x),abs(im(x)))
-@[r:real][s:real][i:is(ts(pli(r,0),pli(r,0)),ts(pli(s,0),pli(s,0)))][n:not(neg(r))][o:not(neg(s))]
-+7266
-@[t:real]
-t1:=pl02(ts"r"(t,t),m0"r"(ts"r"(0,0)),satz176b(ts"r"(0,0),ts01(0,0,refis(real,0)))):is"r"(mn"r"(ts"r"(t,t),ts"r"(0,0)),ts"r"(t,t))
-t2:=tris(real,pl"r"(ts"r"(t,0),ts"r"(0,t)),ts"r"(t,0),0,pl02(ts"r"(t,0),ts"r"(0,t),ts01(0,t,refis(real,0))),ts02(t,0,refis(real,0))):is"r"(pl"r"(ts"r"(t,0),ts"r"(0,t)),0)
-t3:=tris(cx,ts(pli(t,0),pli(t,0)),pli(mn"r"(ts"r"(t,t),ts"r"(0,0)),pl"r"(ts"r"(t,0),ts"r"(0,t))),pli(ts"r"(t,t),0),tsis12a(t,0,t,0),isrecx12(mn"r"(ts"r"(t,t),ts"r"(0,0)),ts"r"(t,t),pl"r"(ts"r"(t,0),ts"r"(0,t)),0,t1,t2)):is(ts(pli(t,0),pli(t,0)),pli(ts"r"(t,t),0))
-o@t4:=tr3is(cx,pli(ts"r"(r,r),0),ts(pli(r,0),pli(r,0)),ts(pli(s,0),pli(s,0)),pli(ts"r"(s,s),0),symis(cx,ts(pli(r,0),pli(r,0)),pli(ts"r"(r,r),0),t3(r)),i,t3(s)):is(pli(ts"r"(r,r),0),pli(ts"r"(s,s),0))
-t5:=tr3is(real,ts"r"(r,r),re(pli(ts"r"(r,r),0)),re(pli(ts"r"(s,s),0)),ts"r"(s,s),isre(ts"r"(r,r),0),iscere(pli(ts"r"(r,r),0),pli(ts"r"(s,s),0),t4),reis(ts"r"(s,s),0)):is"r"(ts"r"(r,r),ts"r"(s,s))
-t6:=andi(not(neg(r)),is"r"(ts"r"(r,r),ts"r"(s,s)),n,t5):and(not(neg(r)),is"r"(ts"r"(r,r),ts"r"(s,s)))
-t7:=andi(not(neg(s)),is"r"(ts"r"(s,s),ts"r"(s,s)),o,refis(real,ts"r"(s,s))):and(not(neg(s)),is"r"(ts"r"(s,s),ts"r"(s,s)))
--7266
-satz266:=satzr161b(ts"r"(s,s),r,s,t6".7266",t7".7266"):is"r"(r,s)
-+7267
-x@t1:=tris(cx,ts(pli(mod(x),0),pli(mod(x),0)),pli(ts"r"(mod(x),mod(x)),0),pli(mod2(x),0),t3"c.7266"(mod(x)),isrecx1(ts"r"(mod(x),mod(x)),mod2(x),0,thsqrt1b(mod2(x),lemma5(x)))):is(ts(pli(mod(x),0),pli(mod(x),0)),pli(mod2(x),0))
-t2:=ispl2"r"(m0"r"(ts"r"(im(x),m0"r"(im(x)))),ts"r"(im(x),im(x)),ts"r"(re(x),re(x)),tris(real,m0"r"(ts"r"(im(x),m0"r"(im(x)))),ts"r"(m0"r"(im(x)),m0"r"(im(x))),ts"r"(im(x),im(x)),satz197e(im(x),m0"r"(im(x))),satz198(im(x),im(x)))):is"r"(mn"r"(ts"r"(re(x),re(x)),ts"r"(im(x),m0"r"(im(x)))),mod2(x))
-t3:=tris(real,pl"r"(ts"r"(re(x),m0"r"(im(x))),ts"r"(im(x),re(x))),pl"r"(m0"r"(ts"r"(re(x),im(x))),ts"r"(re(x),im(x))),0,ispl12"r"(ts"r"(re(x),m0"r"(im(x))),m0"r"(ts"r"(re(x),im(x))),ts"r"(im(x),re(x)),ts"r"(re(x),im(x)),satz197b(re(x),im(x)),comts"r"(im(x),re(x))),satz179a(ts"r"(re(x),im(x)))):is"r"(pl"r"(ts"r"(re(x),m0"r"(im(x))),ts"r"(im(x),re(x))),0)
-t4:=tris(cx,ts(x,conj(x)),pli(mn"r"(ts"r"(re(x),re(x)),ts"r"(im(x),m0"r"(im(x)))),pl"r"(ts"r"(re(x),m0"r"(im(x))),ts"r"(im(x),re(x)))),pli(mod2(x),0),tsis2a(x,re(x),m0"r"(im(x))),isrecx12(mn"r"(ts"r"(re(x),re(x)),ts"r"(im(x),m0"r"(im(x)))),mod2(x),pl"r"(ts"r"(re(x),m0"r"(im(x))),ts"r"(im(x),re(x))),0,t2,t3)):is(ts(x,conj(x)),pli(mod2(x),0))
--7267
-x@satz267:=tris2(cx,ts(pli(mod(x),0),pli(mod(x),0)),ts(x,conj(x)),pli(mod2(x),0),t1".7267",t4".7267"):is(ts(pli(mod(x),0),pli(mod(x),0)),ts(x,conj(x)))
-satz267a:=symis(cx,ts(pli(mod(x),0),pli(mod(x),0)),ts(x,conj(x)),satz267):is(ts(x,conj(x)),ts(pli(mod(x),0),pli(mod(x),0)))
-+7268
-z@t1:=tr3is(cx,ts(x,ts(y,z)),ts(ts(x,y),z),ts(ts(y,x),z),ts(y,ts(x,z)),assts2(x,y,z),ists1(ts(x,y),ts(y,x),z,comts(x,y)),assts1(y,x,z)):is(ts(x,ts(y,z)),ts(y,ts(x,z)))
-[u:complex]
-t2:=tr3is(cx,ts(ts(x,y),ts(z,u)),ts(x,ts(y,ts(z,u))),ts(x,ts(z,ts(y,u))),ts(ts(x,z),ts(y,u)),assts1(x,y,ts(z,u)),ists2(ts(y,ts(z,u)),ts(z,ts(y,u)),x,t1(y,z,u)),assts2(x,z,ts(y,u))):is(ts(ts(x,y),ts(z,u)),ts(ts(x,z),ts(y,u)))
-y@t3:=tr3is(cx,ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(x,y),conj(ts(x,y))),ts(ts(x,y),ts(conj(x),conj(y))),ts(ts(x,conj(x)),ts(y,conj(y))),satz267(ts(x,y)),ists2(conj(ts(x,y)),ts(conj(x),conj(y)),ts(x,y),satz261(x,y)),t2(x,y,conj(x),conj(y))):is(ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(x,conj(x)),ts(y,conj(y))))
-t4:=tr3is(cx,ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(x,conj(x)),ts(y,conj(y))),ts(ts(pli(mod(x),0),pli(mod(x),0)),ts(pli(mod(y),0),pli(mod(y),0))),ts(ts(pli(mod(x),0),pli(mod(y),0)),ts(pli(mod(x),0),pli(mod(y),0))),t3,ists12(ts(x,conj(x)),ts(pli(mod(x),0),pli(mod(x),0)),ts(y,conj(y)),ts(pli(mod(y),0),pli(mod(y),0)),satz267a(x),satz267a(y)),t2(pli(mod(x),0),pli(mod(x),0),pli(mod(y),0),pli(mod(y),0))):is(ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(pli(mod(x),0),pli(mod(y),0)),ts(pli(mod(x),0),pli(mod(y),0))))
-@[r:real][s:real]
-t5:=pl02(ts"r"(r,s),m0"r"(ts"r"(0,0)),satz176b(ts"r"(0,0),ts01(0,0,refis(real,0)))):is"r"(mn"r"(ts"r"(r,s),ts"r"(0,0)),ts"r"(r,s))
-t6:=tris(real,pl"r"(ts"r"(r,0),ts"r"(0,s)),ts"r"(r,0),0,pl02(ts"r"(r,0),ts"r"(0,s),ts01(0,s,refis(real,0))),ts02(r,0,refis(real,0))):is"r"(pl"r"(ts"r"(r,0),ts"r"(0,s)),0)
-t7:=tris(cx,ts(pli(r,0),pli(s,0)),pli(mn"r"(ts"r"(r,s),ts"r"(0,0)),pl"r"(ts"r"(r,0),ts"r"(0,s))),pli(ts"r"(r,s),0),tsis12a(r,0,s,0),isrecx12(mn"r"(ts"r"(r,s),ts"r"(0,0)),ts"r"(r,s),pl"r"(ts"r"(r,0),ts"r"(0,s)),0,t5,t6)):is(ts(pli(r,0),pli(s,0)),pli(ts"r"(r,s),0))
-y@t8:=tris(cx,ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(ts(pli(mod(x),0),pli(mod(y),0)),ts(pli(mod(x),0),pli(mod(y),0))),ts(pli(ts"r"(mod(x),mod(y)),0),pli(ts"r"(mod(x),mod(y)),0)),t4,ists12(ts(pli(mod(x),0),pli(mod(y),0)),pli(ts"r"(mod(x),mod(y)),0),ts(pli(mod(x),0),pli(mod(y),0)),pli(ts"r"(mod(x),mod(y)),0),t7(mod(x),mod(y)),t7(mod(x),mod(y)))):is(ts(pli(mod(ts(x,y)),0),pli(mod(ts(x,y)),0)),ts(pli(ts"r"(mod(x),mod(y)),0),pli(ts"r"(mod(x),mod(y)),0)))
-[n:neg(ts"r"(mod(x),mod(y)))]
-t9:=orapp(and(pos(mod(x)),neg(mod(y))),and(neg(mod(x)),pos(mod(y))),con,satz196h(mod(x),mod(y),n),[t:and(pos(mod(x)),neg(mod(y)))]<ande2(pos(mod(x)),neg(mod(y)),t)>satz264c(y),[t:and(neg(mod(x)),pos(mod(y)))]<ande1(neg(mod(x)),pos(mod(y)),t)>satz264c(x)):con
--7268
-y@satz268:=satz266(mod(ts(x,y)),ts"r"(mod(x),mod(y)),t8".7268",satz264c(ts(x,y)),[t:neg(ts"r"(mod(x),mod(y)))]t9".7268"(t)):is"r"(mod(ts(x,y)),ts"r"(mod(x),mod(y)))
-satz268a:=symis(real,mod(ts(x,y)),ts"r"(mod(x),mod(y)),satz268):is"r"(ts"r"(mod(x),mod(y)),mod(ts(x,y)))
-[n:nis(y,0c)]
-+7269
-t1:=pnot0(mod(y),satz264a(y,n)):nis"r"(mod(y),0)
-t2:=tris1(real,ts"r"(mod(ov(x,y,n)),mod(y)),mod(x),mod(ts(ov(x,y,n),y)),satz268(ov(x,y,n),y),ismod(ts(ov(x,y,n),y),x,satz240(x,y,n))):is"r"(ts"r"(mod(ov(x,y,n)),mod(y)),mod(x))
-t3:=satz204g(mod(x),mod(y),mod(ov(x,y,n)),t1,tris(real,ts"r"(mod(y),mod(ov(x,y,n))),ts"r"(mod(ov(x,y,n)),mod(y)),mod(x),comts"r"(mod(y),mod(ov(x,y,n))),t2)):is"r"(mod(ov(x,y,n)),ov"r"(mod(x),mod(y),t1))
--7269
-satz269:=t3".7269":is"r"(mod(ov(x,y,n)),ov"r"(mod(x),mod(y),pnot0(mod(y),satz264a(y,n))))
-y@[i:is(pl(x,y),1c)]
-+7270
-@[r:real]
-t1:=th1"l.imp"(neg(r),moreis(abs(r),r),[t:neg(r)]moreisi1(abs(r),r,trmore(abs(r),0,r,satz169a(abs(r),satz166b(r,t)),lemma2"r"(r,0,satz169c(r,t)))),[t:not(neg(r))]moreisi2(abs(r),r,absnn(r,t))):moreis(abs(r),r)
-x@t2:=trmoreis(mod(x),abs(re(x)),re(x),satz265a(x),t1(re(x))):moreis(mod(x),re(x))
-i@t3:=tr3is(real,pl"r"(re(x),re(y)),re(pl(x,y)),re(1c),1rl,isre(pl"r"(re(x),re(y)),pl"r"(im(x),im(y))),iscere(pl(x,y),1c,i),reis(1rl,0)):is"r"(pl"r"(re(x),re(y)),1rl)
--7270
-satz270:=ismoreis2(pl"r"(re(x),re(y)),1rl,pl"r"(mod(x),mod(y)),t3".7270",satz191(mod(x),re(x),mod(y),re(y),t2".7270",t2".7270"(y))):moreis(pl"r"(mod(x),mod(y)),1rl)
-+7271
-y@[i:is(pl(x,y),0c)]
-t1:=satz264b(pl(x,y),i):is"r"(mod(pl(x,y)),0)
-t2:=ismoreis2(pl"r"(0,0),mod(pl(x,y)),pl"r"(mod(x),mod(y)),tris2(real,pl"r"(0,0),mod(pl(x,y)),0,pl01(0,0,refis(real,0)),t1),satz191(mod(x),0,mod(y),0,satz264d(x),satz264d(y))):moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y)))
-y@[n:nis(pl(x,y),0c)]
-t3:=pnot0(mod(pl(x,y)),satz264a(pl(x,y),n)):nis"r"(mod(pl(x,y)),0)
-t4:=tris(cx,pl(ov(x,pl(x,y),n),ov(y,pl(x,y),n)),ov(pl(x,y),pl(x,y),n),1c,satz253(x,pl(x,y),y,n),satz250(pl(x,y),n)):is(pl(ov(x,pl(x,y),n),ov(y,pl(x,y),n)),1c)
-t5:=satz270(ov(x,pl(x,y),n),ov(y,pl(x,y),n),t4):moreis(pl"r"(mod(ov(x,pl(x,y),n)),mod(ov(y,pl(x,y),n))),1rl)
-fx:=ov"r"(mod(x),mod(pl(x,y)),t3):real
-fy:=ov"r"(mod(y),mod(pl(x,y)),t3):real
-t6:=ismoreis1(pl"r"(mod(ov(x,pl(x,y),n)),mod(ov(y,pl(x,y),n))),pl"r"(fx,fy),1rl,ispl12"r"(mod(ov(x,pl(x,y),n)),fx,mod(ov(y,pl(x,y),n)),fy,satz269(x,pl(x,y),n),satz269(y,pl(x,y),n)),t5):moreis(pl"r"(fx,fy),1rl)
-prl:=ts"r"(pl"r"(fx,fy),mod(pl(x,y))):real
-prr:=ts"r"(1rl,mod(pl(x,y))):real
-t7:=orapp(more(pl"r"(fx,fy),1rl),is"r"(pl"r"(fx,fy),1rl),moreis(prl,prr),t6,[t:more(pl"r"(fx,fy),1rl)]moreisi1(prl,prr,satz203a(pl"r"(fx,fy),1rl,mod(pl(x,y)),t,satz264a(pl(x,y),n))),[t:is"r"(pl"r"(fx,fy),1rl)]moreisi2(prl,prr,ists1"r"(pl"r"(fx,fy),1rl,mod(pl(x,y)),t))):moreis(prl,prr)
-t8:=tris(real,prl,pl"r"(ts"r"(fx,mod(pl(x,y))),ts"r"(fy,mod(pl(x,y)))),pl"r"(mod(x),mod(y)),disttp1"r"(fx,fy,mod(pl(x,y))),ispl12"r"(ts"r"(fx,mod(pl(x,y))),mod(x),ts"r"(fy,mod(pl(x,y))),mod(y),satz204e(mod(x),mod(pl(x,y)),t3),satz204e(mod(y),mod(pl(x,y)),t3))):is"r"(prl,pl"r"(mod(x),mod(y)))
-t9:=satz195b(mod(pl(x,y))):is"r"(prr,mod(pl(x,y)))
-t10:=ismoreis12(prl,pl"r"(mod(x),mod(y)),prr,mod(pl(x,y)),t8,t9,t7):moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y)))
-y@t11:=th1"l.imp"(is(pl(x,y),0c),moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y))),[t:is(pl(x,y),0c)]t2(t),[t:nis(pl(x,y),0c)]t10(t)):moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y)))
--7271
-y@satz271:=satz168a(pl"r"(mod(x),mod(y)),mod(pl(x,y)),t11".7271"):lessis(mod(pl(x,y)),pl"r"(mod(x),mod(y)))
-satz271a:=t11".7271":moreis(pl"r"(mod(x),mod(y)),mod(pl(x,y)))
-+7272
-x@t1:=tris(real,re(m0(x)),re(pli(m0"r"(re(x)),m0"r"(im(x)))),m0"r"(re(x)),iscere(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),satz214(x)),reis(m0"r"(re(x)),m0"r"(im(x)))):is"r"(re(m0(x)),m0"r"(re(x)))
-t2:=tris(real,ts"r"(re(m0(x)),re(m0(x))),ts"r"(m0"r"(re(x)),m0"r"(re(x))),ts"r"(re(x),re(x)),ists12"r"(re(m0(x)),m0"r"(re(x)),re(m0(x)),m0"r"(re(x)),t1,t1),satz198(re(x),re(x))):is"r"(ts"r"(re(m0(x)),re(m0(x))),ts"r"(re(x),re(x)))
-t3:=tris(real,im(m0(x)),im(pli(m0"r"(re(x)),m0"r"(im(x)))),m0"r"(im(x)),isceim(m0(x),pli(m0"r"(re(x)),m0"r"(im(x))),satz214(x)),imis(m0"r"(re(x)),m0"r"(im(x)))):is"r"(im(m0(x)),m0"r"(im(x)))
-t4:=tris(real,ts"r"(im(m0(x)),im(m0(x))),ts"r"(m0"r"(im(x)),m0"r"(im(x))),ts"r"(im(x),im(x)),ists12"r"(im(m0(x)),m0"r"(im(x)),im(m0(x)),m0"r"(im(x)),t3,t3),satz198(im(x),im(x))):is"r"(ts"r"(im(m0(x)),im(m0(x))),ts"r"(im(x),im(x)))
-t5:=ispl12"r"(ts"r"(re(m0(x)),re(m0(x))),ts"r"(re(x),re(x)),ts"r"(im(m0(x)),im(m0(x))),ts"r"(im(x),im(x)),t2,t4):is"r"(mod2(m0(x)),mod2(x))
--7272
-x@satz272:=issqrt(mod2(m0(x)),mod2(x),lemma5(m0(x)),lemma5(x),t5".7272"):is"r"(mod(m0(x)),mod(x))
-satz272a:=symis(real,mod(m0(x)),mod(x),satz272):is"r"(mod(x),mod(m0(x)))
-+7273
-y@sum:=pl"r"(mod(y),mod(mn(x,y))):real
-t1:=islessis1(mod(pl(y,mn(x,y))),mod(x),sum,ismod(pl(y,mn(x,y)),x,satz212h(x,y)),satz271(y,mn(x,y))):lessis(mod(x),sum)
-t2:=th9"l.or"(less(mod(x),sum),is"r"(mod(x),sum),less(mn"r"(mod(x),mod(y)),mn"r"(sum,mod(y))),is"r"(mn"r"(mod(x),mod(y)),mn"r"(sum,mod(y))),t1,[t:less(mod(x),sum)]satz188f(mod(x),sum,m0"r"(mod(y)),t),[t:is"r"(mod(x),sum)]ismn1"r"(mod(x),sum,mod(y),t)):lessis(mn"r"(mod(x),mod(y)),mn"r"(sum,mod(y)))
-t3:=tris(real,mn"r"(sum,mod(y)),mn"r"(pl"r"(mod(mn(x,y)),mod(y)),mod(y)),mod(mn(x,y)),ismn1"r"(sum,pl"r"(mod(mn(x,y)),mod(y)),mod(y),compl"r"(mod(y),mod(mn(x,y)))),mnpl(mod(mn(x,y)),mod(y))):is"r"(mn"r"(sum,mod(y)),mod(mn(x,y)))
-t4:=satz168b(mn"r"(mod(x),mod(y)),mod(mn(x,y)),islessis2(mn"r"(sum,mod(y)),mod(mn(x,y)),mn"r"(mod(x),mod(y)),t3,t2)):moreis(mod(mn(x,y)),mn"r"(mod(x),mod(y)))
-t5:=ismoreis12(mod(mn(y,x)),mod(mn(x,y)),mn"r"(mod(y),mod(x)),m0"r"(mn"r"(mod(x),mod(y))),tris1(real,mod(mn(y,x)),mod(mn(x,y)),mod(m0(mn(x,y))),ismod(m0(mn(x,y)),mn(y,x),satz219(x,y)),satz272(mn(x,y))),satz181a(mod(y),mod(x)),t4(y,x)):moreis(mod(mn(x,y)),m0"r"(mn"r"(mod(x),mod(y))))
-@[r:real][s:real][m:moreis(r,s)][n:moreis(r,m0"r"(s))]
-r@t6:=th9"l.or"(neg(r),not(neg(r)),is"r"(abs(r),m0"r"(r)),is"r"(abs(r),r),th6"l.or"(neg(r)),[t:neg(r)]absn(r,t),[t:not(neg(r))]absnn(r,t)):or(is"r"(abs(r),m0"r"(r)),is"r"(abs(r),r))
-n@t7:=orapp(is"r"(abs(s),m0"r"(s)),is"r"(abs(s),s),moreis(r,abs(s)),t6(s),[t:is"r"(abs(s),m0"r"(s))]ismoreis2(m0"r"(s),abs(s),r,symis(real,abs(s),m0"r"(s),t),n),[t:is"r"(abs(s),s)]ismoreis2(s,abs(s),r,symis(real,abs(s),s,t),m)):moreis(r,abs(s))
--7273
-y@satz273:=t7".7273"(mod(mn(x,y)),mn"r"(mod(x),mod(y)),t4".7273",t5".7273"):moreis(mod(mn(x,y)),abs(mn"r"(mod(x),mod(y))))
--c
--r
--rp
--rt
-@[x:nat][y:nat]
-+8274
-prop1:=some"l"([t:1to(x)]1to(y),[f:[t:1to(x)]1to(y)]bijective(1to(x),1to(y),f)):'prop'
-x@prop2:=all([y:nat]imp(less(x,y),not(prop1(y)))):'prop'
-@[y:nat][l:less(1,y)][f:[t:1to(1)]1to(y)]
-1y:=1out(y):1to(y)
-yy:=xout(y):1to(y)
-[i:is"e"(1to(y),1y,yy)]
-t1:=isoutne(y,1,satz24a(y),y,lessisi3(y),i):is(1,y)
-f@t2:=ec3e31(is(1,y),more(1,y),less(1,y),satz10b(1,y),l):nis(1,y)
-t3:=th3"l.imp"(is"e"(1to(y),1y,yy),is(1,y),t2,[t:is"e"(1to(y),1y,yy)]t1(t)):not(is"e"(1to(y),1y,yy))
-[u:1to(1)]
-t4:=isf(1to(1),1to(y),f,u,1o,th1"n.singlet"(u)):is"e"(1to(y),<u>f,<1o>f)
-f@[i:is"e"(1to(y),<1o>f,1y)][u:1to(1)]
-t5:=th2"e.notis"(1to(y),1y,yy,<u>f,t3,tris(1to(y),<u>f,<1o>f,1y,t4(u),i)):not(is"e"(1to(y),<u>f,yy))
-i@t6:=th5"l.some"(1to(1),[u:1to(1)]is"e"(1to(y),yy,<u>f),[u:1to(1)]symnotis(1to(y),<u>f,yy,t5(u))):not(image(1to(1),1to(y),f,yy))
-t7:=th1"l.all"(1to(y),[u:1to(y)]image(1to(1),1to(y),f,u),yy,t6):not(surjective(1to(1),1to(y),f))
-f@[n:not(is"e"(1to(y),<1o>f,1y))][u:1to(1)]
-t8:=th2"e.notis"(1to(y),<1o>f,1y,<u>f,n,t4(u)):not(is"e"(1to(y),<u>f,1y))
-n@t9:=th5"l.some"(1to(1),[u:1to(1)]is"e"(1to(y),1y,<u>f),[u:1to(1)]symnotis(1to(y),<u>f,1y,t8(u))):not(image(1to(1),1to(y),f,1y))
-t10:=th1"l.all"(1to(y),[u:1to(y)]image(1to(1),1to(y),f,u),1y,t9):not(surjective(1to(1),1to(y),f))
-f@t11:=th1"l.imp"(is"e"(1to(y),<1o>f,1y),not(surjective(1to(1),1to(y),f)),[t:is"e"(1to(y),<1o>f,1y)]t7(t),[t:not(is"e"(1to(y),<1o>f,1y))]t10(t)):not(surjective(1to(1),1to(y),f))
-t12:=th2"l.and"(injective(1to(1),1to(y),f),surjective(1to(1),1to(y),f),t11):not(bijective(1to(1),1to(y),f))
-l@t13:=th5"l.some"([t:1to(1)]1to(y),[f:[t:1to(1)]1to(y)]bijective(1to(1),1to(y),f),[f:[t:1to(1)]1to(y)]t12(f)):not(prop1(1,y))
-@t14:=[y:nat][t:less(1,y)]t13(y,t):prop2(1)
-x@[p:prop2(x)][y:nat][l:less(<x>suc,y)]
-x@xs:=<x>suc:nat
-l@xxs:=xout(xs):1to(<x>suc)
-yy1:=xout(y):1to(y)
-t15:=trless(1,<x>suc,y,satz24c(x),l):less(1,y)
-ym1:=mn(y,1,t15):nat
-t16:=isless12(<x>suc,pl(x,1),y,pl(ym1,1),satz4e(x),th1c"n.mn"(y,1,t15),l):less(pl(x,1),pl(ym1,1))
-t17:=satz20c(x,ym1,1,t16):less(x,ym1)
-t18:=isless2(pl(ym1,1),y,ym1,th1d"n.mn"(y,1,t15),satz18a(ym1,1)):less(ym1,y)
-[f:[t:1to(xs)]1to(y)][b:bijective(1to(xs),1to(y),f)]
-t19:=ande1(injective(1to(xs),1to(y),f),surjective(1to(xs),1to(y),f),b):injective(1to(xs),1to(y),f)
-t20:=ande2(injective(1to(xs),1to(y),f),surjective(1to(xs),1to(y),f),b):surjective(1to(xs),1to(y),f)
-[i:is"e"(1to(y),<xxs>f,yy1)][u:1to(x)]
-u1:=inn(x,u):nat
-t21:=satz16a(u1,x,xs,1top(x,u),satz18c(x)):less(u1,xs)
-t22:=ec3e31(is(u1,xs),more(u1,xs),less(u1,xs),satz10b(u1,xs),t21):nis(u1,xs)
-t23:=lessisi1(u1,xs,t21):lessis(u1,xs)
-u2:=outn(xs,u1,t23):1to(xs)
-t24:=th3"l.imp"(is"e"(1to(xs),u2,xxs),is(u1,xs),t22,[t:is"e"(1to(xs),u2,xxs)]isoutne(xs,u1,t23,xs,lessisi3(xs),t)):not(is"e"(1to(xs),u2,xxs))
-[j:is"e"(1to(y),<u2>f,yy1)]
-t25:=tris2(1to(y),<u2>f,<xxs>f,yy1,j,i):is"e"(1to(y),<u2>f,<xxs>f)
-t26:=isfe(1to(xs),1to(y),f,t19,u2,xxs,t25):is"e"(1to(xs),u2,xxs)
-u@t27:=th3"l.imp"(is"e"(1to(y),<u2>f,yy1),is"e"(1to(xs),u2,xxs),t24,[t:is"e"(1to(y),<u2>f,yy1)]t26(t)):not(is"e"(1to(y),<u2>f,yy1))
-w1:=inn(y,<u2>f):nat
-[j:is(w1,y)]
-t28:=tris(1to(y),<u2>f,outn(y,w1,1top(y,<u2>f)),yy1,isoutinn(y,<u2>f),isoutni(y,w1,1top(y,<u2>f),y,lessisi3(y),j)):is"e"(1to(y),<u2>f,yy1)
-u@t29:=th3"l.imp"(is(w1,y),is"e"(1to(y),<u2>f,yy1),t27,[t:is(w1,y)]t28(t)):nis(w1,y)
-t30:=ore1(less(w1,y),is(w1,y),1top(y,<u2>f),t29):less(w1,y)
-t31:=islessis2(y,pl(ym1,1),pl(w1,1),th1c"n.mn"(y,1,t15),satz25b(y,w1,t30)):lessis(pl(w1,1),pl(ym1,1))
-t32:=th9"l.or"(less(pl(w1,1),pl(ym1,1)),is(pl(w1,1),pl(ym1,1)),less(w1,ym1),is(w1,ym1),t31,[t:less(pl(w1,1),pl(ym1,1))]satz20c(w1,ym1,1,t),[t:is(pl(w1,1),pl(ym1,1))]satz20b(w1,ym1,1,t)):lessis(w1,ym1)
-w2:=outn(ym1,w1,t32):1to(ym1)
-i@f1:=[t:1to(x)]w2(t):[t:1to(x)]1to(ym1)
-u@[v:1to(x)][j:is"e"(1to(ym1),<u>f1,<v>f1)]
-t33:=isoutne(ym1,w1(u),t32(u),w1(v),t32(v),j):is(w1(u),w1(v))
-t34:=isinne(y,<u2(u)>f,<u2(v)>f,t33):is"e"(1to(y),<u2(u)>f,<u2(v)>f)
-t35:=<t34><u2(v)><u2(u)>t19:is"e"(1to(xs),u2(u),u2(v))
-t36:=isoutne(xs,u1(u),t23(u),u1(v),t23(v),t35):is(u1(u),u1(v))
-t37:=isinne(x,u,v,t36):is"e"(1to(x),u,v)
-i@[v:1to(ym1)]
-v1:=inn(ym1,v):nat
-t38:=satz16a(v1,ym1,y,1top(ym1,v),t18):less(v1,y)
-t39:=ec3e31(is(v1,y),more(v1,y),less(v1,y),satz10b(v1,y),t38):nis(v1,y)
-t40:=lessisi1(v1,y,t38):lessis(v1,y)
-v2:=outn(y,v1,t40):1to(y)
-w3:=<v2>invf(1to(xs),1to(y),f,b):1to(xs)
-t41:=thinvf2(1to(xs),1to(y),f,b,v2):is"e"(1to(y),v2,<w3>f)
-[j:is"e"(1to(xs),w3,xxs)]
-t42:=isf(1to(xs),1to(y),f,w3,xxs,j):is"e"(1to(y),<w3>f,<xxs>f)
-t43:=tr3is(1to(y),v2,<w3>f,<xxs>f,yy1,t41,t42,i):is"e"(1to(y),v2,yy1)
-t44:=isoutne(y,v1,t40,y,lessisi3(y),t43):is(v1,y)
-v@t45:=th3"l.imp"(is"e"(1to(xs),w3,xxs),is(v1,y),t39,[t:is"e"(1to(xs),w3,xxs)]t44(t)):not(is"e"(1to(xs),w3,xxs))
-w4:=inn(xs,w3):nat
-[j:is(w4,xs)]
-t46:=tris(1to(xs),w3,outn(xs,w4,1top(xs,w3)),xxs,isoutinn(xs,w3),isoutni(xs,w4,1top(xs,w3),xs,lessisi3(xs),j)):is"e"(1to(xs),w3,xxs)
-v@t47:=th3"l.imp"(is(w4,xs),is"e"(1to(xs),w3,xxs),t45,[t:is(w4,xs)]t46(t)):nis(w4,xs)
-t48:=ore1(less(w4,xs),is(w4,xs),1top(xs,w3),t47):less(w4,xs)
-t49:=satz26a(x,w4,t48):lessis(w4,x)
-w5:=outn(x,w4,t49):1to(x)
-t50:=isinoutn(x,w4,t49):is(w4,u1(w5))
-t51:=tris(1to(xs),w3,outn(xs,w4,1top(xs,w3)),u2(w5),isoutinn(xs,w3),isoutni(xs,w4,1top(xs,w3),u1(w5),t23(w5),t50)):is"e"(1to(xs),w3,u2(w5))
-t52:=isf(1to(xs),1to(y),f,w3,u2(w5),t51):is"e"(1to(y),<w3>f,<u2(w5)>f)
-t53:=tris(1to(y),v2,<w3>f,<u2(w5)>f,t41,t52):is"e"(1to(y),v2,<u2(w5)>f)
-t54:=tris(nat,v1,inn(y,v2),w1(w5),isinoutn(y,v1,t40),isinni(y,v2,<u2(w5)>f,t53)):is(v1,w1(w5))
-t55:=tris(1to(ym1),v,outn(ym1,v1,1top(ym1,v)),w2(w5),isoutinn(ym1,v),isoutni(ym1,v1,1top(ym1,v),w1(w5),t32(w5),t54)):is"e"(1to(ym1),v,<w5>f1)
-t56:=somei(1to(x),[t:1to(x)]is"e"(1to(ym1),v,<t>f1),w5,t55):image(1to(x),1to(ym1),f1,v)
-i@t57:=andi(injective(1to(x),1to(ym1),f1),surjective(1to(x),1to(ym1),f1),[u:1to(x)][v:1to(x)][t:is"e"(1to(ym1),<u>f1,<v>f1)]t37(u,v,t),[u:1to(ym1)]t56(u)):bijective(1to(x),1to(ym1),f1)
-t58:=somei([t:1to(x)]1to(ym1),[g:[t:1to(x)]1to(ym1)]bijective(1to(x),1to(ym1),g),f1,t57):prop1(ym1)
-t59:=<t58><t17><ym1>p:con
-b@[n:not(is"e"(1to(y),<xxs>f,yy1))]
-m0:=<yy1>invf(1to(xs),1to(y),f,b):1to(xs)
-t60:=thinvf2(1to(xs),1to(y),f,b,yy1):is"e"(1to(y),yy1,<m0>f)
-f2:=changef(1to(xs),1to(y),f,m0,xxs):[t:1to(xs)]1to(y)
-t61:=changef2(1to(xs),1to(y),f,m0,xxs,xxs,refis(1to(xs),xxs)):is"e"(1to(y),<xxs>f2,<m0>f)
-t62:=tris2(1to(y),<xxs>f2,yy1,<m0>f,t61,t60):is"e"(1to(y),<xxs>f2,yy1)
-t63:=th6"e.wissel"(1to(xs),1to(y),f,m0,xxs,b):bijective(1to(xs),1to(y),f2)
-t64:=t59(f2,t63,t62):con
-b@t65:=th1"l.imp"(is"e"(1to(y),<xxs>f,yy1),con,[t:is"e"(1to(y),<xxs>f,yy1)]t59(t),[t:not(is"e"(1to(y),<xxs>f,yy1))]t64(t)):con
-l@t65a:=th5"l.some"([t:1to(xs)]1to(y),[f:[t:1to(xs)]1to(y)]bijective(1to(xs),1to(y),f),[f:[t:1to(xs)]1to(y)][t:bijective(1to(xs),1to(y),f)]t65(f,t)):not(prop1(xs,y))
-p@t66:=[y:nat][t:less(xs,y)]t65a(y,t):prop2(xs)
-x@t67:=induction([t:nat]prop2(t),t14,[t:nat][u:prop2(t)]t66(t,u),x):prop2(x)
--8274
-[l:less(x,y)]
-satz274:=<l><y>t67".8274":not(some"l"([t:1to(x)]1to(y),[f:[t:1to(x)]1to(y)]bijective(1to(x),1to(y),f)))
-[f:[t:1to(x)]1to(y)]
-satz274a:=th4"l.some"([t:1to(x)]1to(y),[g:[t:1to(x)]1to(y)]bijective(1to(x),1to(y),g),satz274,f):not(bijective(1to(x),1to(y),f))
-+*rt
-+*rp
-+*r
-+*c
-@[x:nat][u:1to(x)]
-inn:=inn"n"(x,u):nat
-@[q:[t:cx][u:cx]cx][x:nat][f:[t:1to(x)]cx]
-x@[n:1to(x)][o:not(is"e"(1to(x),n,xout(x)))]
-+8275
-t1:=th3"l.imp"(is"n"(inn(x,n),x),is"e"(1to(x),n,xout(x)),o,[t:is"n"(inn(x,n),x)]tris(1to(x),n,outn(x,inn(x,n),1top(x,n)),xout(x),isoutinn(x,n),isoutni(x,inn(x,n),1top(x,n),x,lessisi3(x),t))):not(is"n"(inn(x,n),x))
-t2:=ore1(less"n"(inn(x,n),x),is"n"(inn(x,n),x),1top(x,n),t1):less"n"(inn(x,n),x)
--8275
-lemma275:=satz25c(x,inn(x,n),t2".8275"):lessis"n"(<inn(x,n)>suc,x)
-f@[g:[t:1to(x)]cx]
-recprop:=and(is(<1out(x)>g,<1out(x)>f),[t:1to(x)][u:not(is"e"(1to(x),t,xout(x)))]is(<outn(x,<inn(x,t)>suc,lemma275(t,u))>g,<<outn(x,<inn(x,t)>suc,lemma275(t,u))>f><<t>g>q)):'prop'
-+*8275
-x@1o:=1out(x):1to(x)
-xo:=xout(x):1to(x)
-[u:nat][l:lessis"n"(<u>suc,x)]
-t11:=satz16b(u,<u>suc,x,satz18c(u),l):less"n"(u,x)
-t12:=lessisi1"n"(u,x,t11):lessis"n"(u,x)
-ux:=outn(x,u,t12):1to(x)
-t13:=ec3e31(is"n"(u,x),more"n"(u,x),less"n"(u,x),satz10b(u,x),t11):nis"n"(u,x)
-t14:=th3"l.imp"(is"e"(1to(x),ux,xo),is"n"(u,x),t13,[t:is"e"(1to(x),ux,xo)]isoutne(x,u,t12,x,lessisi3(x),t)):not(is"e"(1to(x),ux,xo))
-t15:=isf(nat,nat,suc,u,inn(x,ux),isinoutn(x,u,t12)):is"n"(<u>suc,<inn(x,ux)>suc)
-t16:=isoutni(x,<u>suc,l,<inn(x,ux)>suc,lemma275(ux,t14),t15):is"e"(1to(x),outn(x,<u>suc,l),outn(x,<inn(x,ux)>suc,lemma275(ux,t14)))
-x@[n:1to(x)][o:not(is"e"(1to(x),n,xo))]
-ns:=outn(x,<inn(x,n)>suc,lemma275(n,o)):1to(x)
-f@[g:[t:1to(x)]cx]
-prop1:=is(<1o>g,<1o>f):'prop'
-prop2:=[t:1to(x)][u:not(is"e"(1to(x),t,xo))]is(<ns(t,u)>g,<<ns(t,u)>f><<t>g>q):'prop'
-[pg:recprop(g)]
-t3:=ande1(prop1,prop2,pg):prop1
-[n:1to(x)][o:not(is"e"(1to(x),n,xo))]
-t4:=<o><n>ande2(prop1,prop2,pg):is(<ns(n,o)>g,<<ns(n,o)>f><<n>g>q)
-pg@[u:nat][l:lessis"n"(<u>suc,x)]
-t17:=isf(1to(x),cx,g,outn(x,<u>suc,l),ns(ux(u,l),t14(u,l)),t16(u,l)):is(<outn(x,<u>suc,l)>g,<ns(ux(u,l),t14(u,l))>g)
-t18:=tris(cx,<outn(x,<u>suc,l)>g,<ns(ux(u,l),t14(u,l))>g,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>g>q,t17,t4(pg,ux(u,l),t14(u,l))):is(<outn(x,<u>suc,l)>g,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>g>q)
-g@[h:[t:1to(x)]cx][u:nat][l:lessis"n"(u,x)]
-prop3:=is(<outn(x,u,l)>g,<outn(x,u,l)>h):'prop'
-u@prop4:=and(lessis"n"(u,x),[t:lessis"n"(u,x)]prop3(t)):'prop'
-prop5:=or(prop4,more"n"(u,x)):'prop'
-h@[pg:recprop(g)][ph:recprop(h)][l:lessis"n"(1,x)]
-t5:=isoutni(x,1,l,1,satz24a(x),refis(nat,1)):is"e"(1to(x),outn(x,1,l),1o)
-t6:=isf(1to(x),cx,g,outn(x,1,l),1o,t5):is(<outn(x,1,l)>g,<1o>g)
-t7:=tris(cx,<outn(x,1,l)>g,<1o>g,<1o>f,t6,t3(pg)):is(<outn(x,1,l)>g,<1o>f)
-t8:=tris2(cx,<outn(x,1,l)>g,<outn(x,1,l)>h,<1o>f,t7,t7(h,g,ph,pg,l)):prop3(1,l)
-ph@t9:=andi(lessis"n"(1,x),[t:lessis"n"(1,x)]prop3(1,t),satz24a(x),[t:lessis"n"(1,x)]t8(t)):prop4(1)
-t10:=ori1(prop4(1),more"n"(1,x),t9):prop5(1)
-[u:nat][p:prop5(u)][l:lessis"n"(<u>suc,x)]
-t19:=ec3e32(is"n"(u,x),more"n"(u,x),less"n"(u,x),satz10b(u,x),t11(u,l)):not(more"n"(u,x))
-t20:=ore1(prop4(u),more"n"(u,x),p,t19):prop4(u)
-t21:=<t12(u,l)>ande2(lessis"n"(u,x),[t:lessis"n"(u,x)]prop3(u,t),t20):prop3(u,t12(u,l))
-t22:=isf(cx,cx,[t:cx]<<ns(ux(u,l),t14(u,l))>f><t>q,<ux(u,l)>g,<ux(u,l)>h,t21):is(<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>g>q,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>h>q)
-t23:=symis(cx,<outn(x,<u>suc,l)>h,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>h>q,t18(h,ph,u,l)):is(<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>h>q,<outn(x,<u>suc,l)>h)
-t24:=tr3is(cx,<outn(x,<u>suc,l)>g,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>g>q,<<ns(ux(u,l),t14(u,l))>f><<ux(u,l)>h>q,<outn(x,<u>suc,l)>h,t18(g,pg,u,l),t22,t23):prop3(<u>suc,l)
-t25:=andi(lessis"n"(<u>suc,x),[t:lessis"n"(<u>suc,x)]prop3(<u>suc,t),l,[t:lessis"n"(<u>suc,x)]t24(t)):prop4(<u>suc)
-t26:=ori1(prop4(<u>suc),more"n"(<u>suc,x),t25):prop5(<u>suc)
-p@[n:not(lessis"n"(<u>suc,x))]
-t27:=satz10k(<u>suc,x,n):more"n"(<u>suc,x)
-t28:=ori2(prop4(<u>suc),more"n"(<u>suc,x),t27):prop5(<u>suc)
-p@t29:=th1"l.imp"(lessis"n"(<u>suc,x),prop5(<u>suc),[t:lessis"n"(<u>suc,x)]t26(t),[t:not(lessis"n"(<u>suc,x))]t28(t)):prop5(<u>suc)
-u@t30:=induction([v:nat]prop5(v),t10,[v:nat][t:prop5(v)]t29(v,t),u):prop5(u)
-ph@[n:1to(x)]
-t31:=isf(1to(x),cx,g,n,outn(x,inn(x,n),1top(x,n)),isoutinn(x,n)):is(<n>g,<outn(x,inn(x,n),1top(x,n))>g)
-t32:=satz10d(inn(x,n),x,1top(x,n)):not(more"n"(inn(x,n),x))
-t33:=ore1(prop4(inn(x,n)),more"n"(inn(x,n),x),t30(inn(x,n)),t32):prop4(inn(x,n))
-t34:=<1top(x,n)>ande2(lessis"n"(inn(x,n),x),[t:lessis"n"(inn(x,n),x)]prop3(inn(x,n),t),t33):prop3(inn(x,n),1top(x,n))
-t35:=symis(cx,<n>h,<outn(x,inn(x,n),1top(x,n))>h,t31(h,g,ph,pg,n)):is(<outn(x,inn(x,n),1top(x,n))>h,<n>h)
-t36:=tr3is(cx,<n>g,<outn(x,inn(x,n),1top(x,n))>g,<outn(x,inn(x,n),1top(x,n))>h,<n>h,t31,t34,t35):is(<n>g,<n>h)
-ph@t37:=fisi(1to(x),cx,g,h,[t:1to(x)]t36(t)):is"e"([t:1to(x)]cx,g,h)
-f@prop6:=some"l"([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(g)):'prop'
-x@prop7:=all"l"([t:1to(x)]cx,[f:[t:1to(x)]cx]prop6(f)):'prop'
-q@[f:[t:1to(1)]cx]
-t38:=refis(cx,<1o(1)>f):prop1(1,f,f)
-[n:1to(1)][o:not(is"e"(1to(1),n,xo(1)))]
-t39:=<th1"n.singlet"(n)>o:con
-t40:=cone(is(<ns(1,n,o)>f,<<ns(1,n,o)>f><<n>f>q),t39):is(<ns(1,n,o)>f,<<ns(1,n,o)>f><<n>f>q)
-f@t41:=andi(prop1(1,f,f),prop2(1,f,f),t38,[t:1to(1)][u:not(is"e"(1to(1),t,xo(1)))]t40(t,u)):recprop(1,f,f)
-t42:=somei([t:1to(1)]cx,[g:[t:1to(1)]cx]recprop(1,f,g),f,t41):prop6(1,f)
-q@t43:=[f:[t:1to(1)]cx]t42(f):prop7(1)
-x@[p:prop7(x)]
-xs:=<x>suc:nat
-[f:[t:1to(xs)]cx]
-f1:=left(cx,xs,x,lessisi1"n"(x,xs,satz18c(x)),f):[t:1to(x)]cx
-t44:=onei([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f1,g),[g:[t:1to(x)]cx][h:[t:1to(x)]cx][u:recprop(x,f1,g)][v:recprop(x,f1,h)]t37(f1,g,h,u,v),<f1>p):one"e"([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f1,g))
-g1:=ind([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f1,g),t44):[t:1to(x)]cx
-t45:=oneax([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f1,g),t44):recprop(x,f1,g1)
-[n:1to(xs)]
-nxs:=is"e"(1to(xs),n,xo(xs)):'prop'
-[o:not(nxs)]
-t46:=satz26a(x,inn(xs,n),t2(xs,n,o)):lessis"n"(inn(xs,n),x)
-n1:=outn(x,inn(xs,n),t46):1to(x)
-b:=<n1>g1:cx
-[o1:not(nxs)]
-t47:=isoutni(x,inn(xs,n),t46(o),inn(xs,n),t46(o1),refis(nat,inn(xs,n))):is"e"(1to(x),n1(o),n1(o1))
-t48:=isf(1to(x),cx,g1,n1(o),n1(o1),t47):is(b(o),b(o1))
-f@a:=<<xo(xs)>f><<xo(x)>g1>q:cx
-n@c:=ite"l.r"(nxs,cx,[t:nxs]a,[t:not(nxs)]b(t),[t:nxs][u:nxs]refis(cx,a),[t:not(nxs)][u:not(nxs)]t48(t,u)):cx
-[i:nxs]
-t49:=itet"l.r"(nxs,cx,[t:nxs]a,[t:not(nxs)]b(t),[t:nxs][u:nxs]refis(cx,a),[t:not(nxs)][u:not(nxs)]t48(t,u),i):is(c,a)
-o@t50:=itef"l.r"(nxs,cx,[t:nxs]a,[t:not(nxs)]b(t),[t:nxs][u:nxs]refis(cx,a),[t:not(nxs)][u:not(nxs)]t48(t,u),o):is(c,b)
-f@g2:=[t:1to(xs)]c(t):[t:1to(xs)]cx
-t51:=th3"l.imp"(is"e"(1to(xs),1o(xs),xo(xs)),is"n"(1,xs),symnotis(nat,xs,1,<x>ax3),[t:is"e"(1to(xs),1o(xs),xo(xs))]isoutne(xs,1,satz24a(xs),xs,lessisi3(xs),t)):not(is"e"(1to(xs),1o(xs),xo(xs)))
-t52:=t50(1o(xs),t51):is(c(1o(xs)),b(1o(xs),t51))
-t53:=isinoutn(xs,1,satz24a(xs)):is"n"(1,inn(xs,1o(xs)))
-t54:=isoutni(x,1,satz24a(x),inn(xs,1o(xs)),t46(1o(xs),t51),t53):is"e"(1to(x),1o(x),n1(1o(xs),t51))
-t55:=isf(1to(x),cx,g1,1o(x),n1(1o(xs),t51),t54):is(<1o(x)>g1,b(1o(xs),t51))
-t56:=tris2(cx,c(1o(xs)),<1o(x)>g1,b(1o(xs),t51),t52,t55):is(c(1o(xs)),<1o(x)>g1)
-t57:=tris(cx,c(1o(xs)),<1o(x)>g1,<1o(x)>f1,t56,t3(x,f1,g1,t45)):is(c(1o(xs)),<1o(x)>f1)
-t58:=isinoutn(x,1,satz24a(x)):is"n"(1,inn(x,1o(x)))
-t59:=isoutni(xs,1,satz24a(xs),inn(x,1o(x)),trlessis"n"(inn(x,1o(x)),x,xs,1top(x,1o(x)),lessisi1"n"(x,xs,satz18c(x))),t58):is"e"(1to(xs),1o(xs),left1to(xs,x,lessisi1"n"(x,xs,satz18c(x)),1o(x)))
-t60:=isf(1to(xs),cx,f,1o(xs),left1to(xs,x,lessisi1"n"(x,xs,satz18c(x)),1o(x)),t59):is(<1o(xs)>f,<1o(x)>f1)
-t61:=tris2(cx,c(1o(xs)),<1o(xs)>f,<1o(x)>f1,t57,t60):prop1(xs,f,g2)
-o@[i:is"e"(1to(xs),ns(xs,n,o),xo(xs))]
-t62:=isoutne(xs,<inn(xs,n)>suc,lemma275(xs,n,o),xs,lessisi3(xs),i):is"n"(<inn(xs,n)>suc,xs)
-t63:=<t62><x><inn(xs,n)>ax4:is"n"(inn(xs,n),x)
-t64:=isoutni(x,inn(xs,n),t46,x,lessisi3(x),t63):is"e"(1to(x),n1,xo(x))
-t65:=isf(1to(x),cx,g1,xo(x),n1,symis(1to(x),n1,xo(x),t64)):is(<xo(x)>g1,b)
-t66:=tris2(cx,<xo(x)>g1,c,b,t65,t50):is(<xo(x)>g1,c)
-t67:=isf(cx,cx,[t:cx]<<xo(xs)>f><t>q,<xo(x)>g1,c,t66):is(a,<<xo(xs)>f><c>q)
-t68:=isf(1to(xs),cx,f,xo(xs),ns(xs,n,o),symis(1to(xs),ns(xs,n,o),xo(xs),i)):is(<xo(xs)>f,<ns(xs,n,o)>f)
-t69:=isf(cx,cx,<c>q,<xo(xs)>f,<ns(xs,n,o)>f,t68):is(<<xo(xs)>f><c>q,<<ns(xs,n,o)>f><c>q)
-t70:=tr3is(cx,c(ns(xs,n,o)),a,<<xo(xs)>f><c>q,<<ns(xs,n,o)>f><c>q,t49(ns(xs,n,o),i),t67,t69):is(c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q)
-o@[o1:not(is"e"(1to(xs),ns(xs,n,o),xo(xs)))][i:is"e"(1to(x),n1,xo(x))]
-t71:=isoutne(x,inn(xs,n),t46,x,lessisi3(x),i):is"n"(inn(xs,n),x)
-t72:=ax2(inn(xs,n),x,t71):is"n"(<inn(xs,n)>suc,xs)
-t73:=isoutni(xs,<inn(xs,n)>suc,lemma275(xs,n,o),xs,lessisi3(xs),t72):is"e"(1to(xs),ns(xs,n,o),xo(xs))
-o1@t74:=th3"l.imp"(is"e"(1to(x),n1,xo(x)),is"e"(1to(xs),ns(xs,n,o),xo(xs)),o1,[t:is"e"(1to(x),n1,xo(x))]t73(t)):not(is"e"(1to(x),n1,xo(x)))
-t75:=isinoutn(x,inn(xs,n),t46):is"n"(inn(xs,n),inn(x,n1))
-t76:=ax2(inn(xs,n),inn(x,n1),t75):is"n"(<inn(xs,n)>suc,<inn(x,n1)>suc)
-t77:=isinoutn(xs,<inn(xs,n)>suc,lemma275(xs,n,o)):is"n"(<inn(xs,n)>suc,inn(xs,ns(xs,n,o)))
-t78:=tris1(nat,inn(xs,ns(xs,n,o)),<inn(x,n1)>suc,<inn(xs,n)>suc,t77,t76):is"n"(inn(xs,ns(xs,n,o)),<inn(x,n1)>suc)
-t79:=isoutni(x,inn(xs,ns(xs,n,o)),t46(ns(xs,n,o),o1),<inn(x,n1)>suc,lemma275(x,n1,t74),t78):is"e"(1to(x),n1(ns(xs,n,o),o1),ns(n1,t74))
-t80:=isf(1to(x),cx,g1,n1(ns(xs,n,o),o1),ns(n1,t74),t79):is(b(ns(xs,n,o),o1),<ns(n1,t74)>g1)
-t81:=isinoutn(x,<inn(x,n1)>suc,lemma275(x,n1,t74)):is"n"(<inn(x,n1)>suc,inn(x,ns(n1,t74)))
-t82:=tris(nat,<inn(xs,n)>suc,<inn(x,n1)>suc,inn(x,ns(n1,t74)),t76,t81):is"n"(<inn(xs,n)>suc,inn(x,ns(n1,t74)))
-t83:=isoutni(xs,<inn(xs,n)>suc,lemma275(xs,n,o),inn(x,ns(n1,t74)),trlessis"n"(inn(x,ns(n1,t74)),x,xs,1top(x,ns(n1,t74)),lessisi1"n"(x,xs,satz18c(x))),t82):is"e"(1to(xs),ns(xs,n,o),left1to(xs,x,lessisi1"n"(x,xs,satz18c(x)),ns(n1,t74)))
-t84:=isf(1to(xs),cx,f,ns(xs,n,o),left1to(xs,x,lessisi1"n"(x,xs,satz18c(x)),ns(n1,t74)),t83):is(<ns(xs,n,o)>f,<ns(n1,t74)>f1)
-t85:=isf(cx,cx,<b>q,<ns(xs,n,o)>f,<ns(n1,t74)>f1,t84):is(<<ns(xs,n,o)>f><b>q,<<ns(n1,t74)>f1><b>q)
-t86:=isf(cx,cx,[t:cx]<<ns(xs,n,o)>f><t>q,c,b,t50):is(<<ns(xs,n,o)>f><c>q,<<ns(xs,n,o)>f><b>q)
-t87:=tr3is(cx,c(ns(xs,n,o)),b(ns(xs,n,o),o1),<ns(n1,t74)>g1,<<ns(n1,t74)>f1><b>q,t50(ns(xs,n,o),o1),t80,t4(f1,g1,t45,n1,t74)):is(c(ns(xs,n,o)),<<ns(n1,t74)>f1><b>q)
-t88:=tris(cx,<<ns(xs,n,o)>f><c>q,<<ns(xs,n,o)>f><b>q,<<ns(n1,t74)>f1><b>q,t86,t85):is(<<ns(xs,n,o)>f><c>q,<<ns(n1,t74)>f1><b>q)
-t89:=tris2(cx,c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q,<<ns(n1,t74)>f1><b>q,t87,t88):is(c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q)
-o@t90:=th1"l.imp"(is"e"(1to(xs),ns(xs,n,o),xo(xs)),is(c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q),[t:is"e"(1to(xs),ns(xs,n,o),xo(xs))]t70(t),[t:not(is"e"(1to(xs),ns(xs,n,o),xo(xs)))]t89(t)):is(c(ns(xs,n,o)),<<ns(xs,n,o)>f><c>q)
-f@t91:=[t:1to(xs)][u:not(nxs(t))]t90(t,u):prop2(xs,f,g2)
-t92:=andi(prop1(xs,f,g2),prop2(xs,f,g2),t61,t91):recprop(xs,f,g2)
-t93:=somei([t:1to(xs)]cx,[g:[t:1to(xs)]cx]recprop(xs,f,g),g2,t92):prop6(xs,f)
-p@t94:=[f:[t:1to(xs)]cx]t93(f):prop7(xs)
-x@t95:=induction([y:nat]prop7(y),t43,[y:nat][t:prop7(y)]t94(y,t),x):prop7(x)
-[f:[t:1to(x)]cx]
-t96:=<f>t95:prop6(x,f)
-t97:=onei([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g),[g:[t:1to(x)]cx][h:[t:1to(x)]cx][u:recprop(x,f,g)][v:recprop(x,f,h)]t37(f,g,h,u,v),t96):one"e"([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g))
--8275
-f@satz275:=t97".8275"(f):one"e"([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g))
-recf:=ind([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g),satz275):[t:1to(x)]cx
-satz275a:=oneax([t:1to(x)]cx,[g:[t:1to(x)]cx]recprop(x,f,g),satz275):recprop(x,f,recf)
-[n:1to(x)]
-rec:=<n>recf:cx
-f@satz275b:=t3".8275"(x,f,recf,satz275a):is(rec(1out(x)),<1out(x)>f)
-n@[o:not(is"e"(1to(x),n,xout(x)))]
-sucx:=ns".8275"(n,o):1to(x)
-satz275c:=t4".8275"(x,f,recf,satz275a,n,o):is(rec(sucx(n,o)),<<sucx(n,o)>f><rec(n)>q)
-f@[g:[t:1to(x)]cx][r:recprop(x,f,g)]
-satz275d:=t37".8275"(x,f,g,recf,r,satz275a):is"e"([t:1to(x)]cx,g,recf)
-[n:1to(x)]
-satz275e:=fise(1to(x),cx,g,recf,satz275d,n):is(<n>g,rec(n))
-x@[y:nat]
-+*8275
-y@[l:lessis"n"(y,x)][f:[t:1to(x)]cx]
-fl:=left(cx,x,y,l,f):[t:1to(y)]cx
-rf:=recf(x,f):[t:1to(x)]cx
-rfl:=left(cx,x,y,l,rf):[t:1to(y)]cx
-t98:=isinoutn(y,1,satz24a(y)):is"n"(1,inn(y,1out(y)))
-t99:=isoutni(x,1,satz24a(x),inn(y,1out(y)),trlessis"n"(inn(y,1out(y)),y,x,1top(y,1out(y)),l),t98):is"e"(1to(x),1out(x),left1to(x,y,l,1out(y)))
-t100:=isp(1to(x),[t:1to(x)]is(<t>rf,<t>f),1out(x),left1to(x,y,l,1out(y)),t3(x,f,rf,satz275a(x,f)),t99):prop1(y,fl,rfl)
-[n:1to(y)][o:not(is"e"(1to(y),n,xout(y)))]
-t100a:=th3"l.imp"(is"n"(inn(y,n),y),is"e"(1to(y),n,xout(y)),o,[t:is"n"(inn(y,n),y)]tris(1to(y),n,outn(y,inn(y,n),1top(y,n)),xout(y),isoutinn(y,n),isoutni(y,inn(y,n),1top(y,n),y,lessisi3(y),t))):not(is"n"(inn(y,n),y))
-t100b:=ore1(less"n"(inn(y,n),y),is"n"(inn(y,n),y),1top(y,n),t100a):less"n"(inn(y,n),y)
-t101:=satz16b(inn(y,n),y,x,t100b,l):less"n"(inn(y,n),x)
-t102:=ec3e31(is"n"(inn(y,n),x),more"n"(inn(y,n),x),less"n"(inn(y,n),x),satz10b(inn(y,n),x),t101):nis"n"(inn(y,n),x)
-t103:=th3"l.imp"(is"e"(1to(x),left1to(x,y,l,n),xout(x)),is"n"(inn(y,n),x),t102,[t:is"e"(1to(x),left1to(x,y,l,n),xout(x))]isoutne(x,inn(y,n),trlessis"n"(inn(y,n),y,x,1top(y,n),l),x,lessisi3(x),t)):not(is"e"(1to(x),left1to(x,y,l,n),xout(x)))
-t104:=t4(x,f,rf,satz275a(x,f),left1to(x,y,l,n),t103):is(<ns(x,left1to(x,y,l,n),t103)>rf,<<ns(x,left1to(x,y,l,n),t103)>f><<n>rfl>q)
-t105:=isinoutn(x,inn(y,n),trlessis"n"(inn(y,n),y,x,1top(y,n),l)):is"n"(inn(y,n),inn(x,left1to(x,y,l,n)))
-t106:=ax2(inn(y,n),inn(x,left1to(x,y,l,n)),t105):is"n"(<inn(y,n)>suc,<inn(x,left1to(x,y,l,n))>suc)
-t107:=isinoutn(y,<inn(y,n)>suc,lemma275(y,n,o)):is"n"(<inn(y,n)>suc,inn(y,ns(y,n,o)))
-t108:=tris1(nat,<inn(x,left1to(x,y,l,n))>suc,inn(y,ns(y,n,o)),<inn(y,n)>suc,t106,t107):is"n"(<inn(x,left1to(x,y,l,n))>suc,inn(y,ns(y,n,o)))
-t109:=isoutni(x,<inn(x,left1to(x,y,l,n))>suc,lemma275(x,left1to(x,y,l,n),t103),inn(y,ns(y,n,o)),trlessis"n"(inn(y,ns(y,n,o)),y,x,1top(y,ns(y,n,o)),l),t108):is"e"(1to(x),ns(x,left1to(x,y,l,n),t103),left1to(x,y,l,ns(y,n,o)))
-t110:=isp(1to(x),[t:1to(x)]is(<t>rf,<<t>f><<n>rfl>q),ns(x,left1to(x,y,l,n),t103),left1to(x,y,l,ns(y,n,o)),t104,t109):is(<ns(y,n,o)>rfl,<<ns(y,n,o)>fl><<n>rfl>q)
-f@t111:=[t:1to(y)][u:not(is"e"(1to(y),t,xout(y)))]t110(t,u):prop2(y,fl,rfl)
-t112:=andi(prop1(y,fl,rfl),prop2(y,fl,rfl),t100,t111):recprop(y,fl,rfl)
--8275
-y@[l:lessis"n"(y,x)][f:[t:1to(x)]cx]
-satz275f:=satz275d(y,fl".8275"(l,f),rfl".8275"(l,f),t112".8275"(l,f)):is"e"([t:1to(y)]cx,left(cx,x,y,l,recf(x,f)),recf(y,left(cx,x,y,l,f)))
-x@[f:[t:1to(pl"n"(x,1))]cx]
-+8276
-xs:=<x>suc:nat
-x1:=pl"n"(x,1):nat
-t1:=lessisi1"n"(x,x1,satz18a(x,1)):lessis"n"(x,x1)
-t2:=lessisi1"n"(x,xs,satz18c(x)):lessis"n"(x,xs)
-t3:=lessisi2"n"(xs,x1,satz4e(x)):lessis"n"(xs,x1)
-fx:=left(cx,x1,x,t1,f):[t:1to(x)]cx
-f1:=left(cx,x1,xs,t3,f):[t:1to(xs)]cx
-f1x:=f1"c.8275"(x,t95"c.8275"(x),f1):[t:1to(x)]cx
-g1:=g2"c.8275"(x,t95"c.8275"(x),f1):[t:1to(xs)]cx
-g1x:=g1"c.8275"(x,t95"c.8275"(x),f1):[t:1to(x)]cx
-g:=left(cx,x1,xs,t3,recf(x1,f)):[t:1to(xs)]cx
-t4:=t49"c.8275"(x,t95"c.8275"(x),f1,xout(xs),refis(1to(xs),xout(xs))):is(<xout(xs)>g1,<<xout(xs)>f1><<xout(x)>g1x>q)
-t5:=satz275d(xs,f1,g1,t92"c.8275"(x,t95"c.8275"(x),f1)):is"e"([t:1to(xs)]cx,g1,recf(xs,f1))
-t6:=satz275f(x1,xs,t3,f):is"e"([t:1to(xs)]cx,g,recf(xs,f1))
-t7:=tris2([t:1to(xs)]cx,g,g1,recf(xs,f1),t6,t5):is"e"([t:1to(xs)]cx,g,g1)
-t8:=fise(1to(xs),cx,g,g1,t7,xout(xs)):is(<xout(xs)>g,<xout(xs)>g1)
-t9:=tris(cx,<xout(xs)>g,<xout(xs)>g1,<<xout(xs)>f1><<xout(x)>g1x>q,t8,t4):is(<xout(xs)>g,<<xout(xs)>f1><<xout(x)>g1x>q)
-[n:1to(x)]
-t10:=isinoutn(xs,inn(x,n),trlessis"n"(inn(x,n),x,xs,1top(x,n),t2)):is"n"(inn(x,n),inn(xs,left1to(xs,x,t2,n)))
-t11:=isoutni(x1,inn(x,n),trlessis"n"(inn(x,n),x,x1,1top(x,n),t1),inn(xs,left1to(xs,x,t2,n)),trlessis"n"(inn(xs,left1to(xs,x,t2,n)),xs,x1,1top(xs,left1to(xs,x,t2,n)),t3),t10):is"e"(1to(x1),left1to(x1,x,t1,n),left1to(x1,xs,t3,left1to(xs,x,t2,n)))
-t12:=isf(1to(x1),cx,f,left1to(x1,x,t1,n),left1to(x1,xs,t3,left1to(xs,x,t2,n)),t11):is(<n>fx,<n>f1x)
-f@t13:=fisi(1to(x),cx,fx,f1x,[t:1to(x)]t12(t)):is"e"([t:1to(x)]cx,fx,f1x)
-t14:=isf([t:1to(x)]cx,[t:1to(x)]cx,[u:[t:1to(x)]cx]recf(x,u),fx,f1x,t13):is"e"([t:1to(x)]cx,recf(x,fx),recf(x,f1x))
-t15:=satz275d(x,f1x,g1x,t45"c.8275"(x,t95"c.8275"(x),f1)):is"e"([t:1to(x)]cx,g1x,recf(x,f1x))
-t16:=tris2([t:1to(x)]cx,g1x,recf(x,fx),recf(x,f1x),t15,t14):is"e"([t:1to(x)]cx,g1x,recf(x,fx))
-t17:=fise(1to(x),cx,g1x,recf(x,fx),t16,xout(x)):is(<xout(x)>g1x,<xout(x)>recf(x,fx))
-t18:=isinoutn(xs,xs,lessisi3(xs)):is"n"(xs,inn(xs,xout(xs)))
-t19:=tris(nat,x1,xs,inn(xs,xout(xs)),satz4a(x),t18):is"n"(x1,inn(xs,xout(xs)))
-t20:=isoutni(x1,x1,lessisi3(x1),inn(xs,xout(xs)),trlessis"n"(inn(xs,xout(xs)),xs,x1,1top(xs,xout(xs)),t3),t19):is"e"(1to(x1),xout(x1),left1to(x1,xs,t3,xout(xs)))
-t21:=isp1(1to(x1),[t:1to(x1)]is(<t>recf(x1,f),<<t>f><<xout(x)>g1x>q),left1to(x1,xs,t3,xout(xs)),xout(x1),t9,t20):is(<xout(x1)>recf(x1,f),<<xout(x1)>f><<xout(x)>g1x>q)
-t22:=isf(cx,cx,[t:cx]<<xout(x1)>f><t>q,<xout(x)>g1x,<xout(x)>recf(x,fx),t17):is(<<xout(x1)>f><<xout(x)>g1x>q,<<xout(x1)>f><<xout(x)>recf(x,fx)>q)
--8276
-satz276:=tris(cx,<xout(pl"n"(x,1))>recf(pl"n"(x,1),f),<<xout(pl"n"(x,1))>f><<xout(x)>g1x".8276">q,<<xout(pl"n"(x,1))>f><<xout(x)>recf(x,fx".8276")>q,t21".8276",t22".8276"):is(<xout(pl"n"(x,1))>recf(pl"n"(x,1),f),<<xout(pl"n"(x,1))>f><<xout(x)>recf(x,left(cx,pl"n"(x,1),x,lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)),f))>q)
-x@[f:[u:1to(x)]cx]
-smpr:=rec(x,f,xout(x)):cx
-@[x:nat][f:[u:1to(x)]cx]
-sum:=smpr([t:cx][u:cx]pl(t,u),x,f):cx
-prod:=smpr([t:cx][u:cx]ts(t,u),x,f):cx
-q@[f:[u:1to(1)]cx]
-+8277
-t1:=isoutni(1,1,satz24a(1),1,lessisi3(1),refis(nat,1)):is"e"(1to(1),1out(1),xout(1))
--8277
-satz277:=isp(1to(1),[t:1to(1)]is(rec(1,f,t),<t>f),1out(1),xout(1),satz275b(1,f),t1".8277"):is(smpr(1,f),<xout(1)>f)
-q@[x:nat][f:[u:1to(pl"n"(x,1))]cx]
-satz278:=satz276(x,f):is(smpr(pl"n"(x,1),f),<<xout(pl"n"(x,1))>f><smpr(x,left(cx,pl"n"(x,1),x,lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)),f))>q)
-x@[f:[u:1to(x)]cx][y:nat][i:is"n"(y,x)]
-+v8
-t1:=lessisi2"n"(y,x,i):lessis"n"(y,x)
-f0:=left(cx,x,y,t1,f):[t:1to(y)]cx
-t2:=fise(1to(y),cx,left(cx,x,y,t1,recf(x,f)),recf(y,f0),satz275f(x,y,t1,f),xout(y)):is(<left1to(x,y,t1,xout(y))>recf(x,f),smpr(y,f0))
-t3:=tris1(nat,inn(y,xout(y)),x,y,isinoutn(y,y,lessisi3(y)),i):is"n"(inn(y,xout(y)),x)
-t4:=isoutni(x,inn(y,xout(y)),trlessis"n"(inn(y,xout(y)),y,x,1top(y,xout(y)),t1),x,lessisi3(x),t3):is"e"(1to(x),left1to(x,y,t1,xout(y)),xout(x))
-t5:=isf(1to(x),cx,recf(x,f),left1to(x,y,t1,xout(y)),xout(x),t4):is(<left1to(x,y,t1,xout(y))>recf(x,f),smpr(x,f))
--v8
-issmpr:=tris1(cx,smpr(y,f0".v8"),smpr(x,f),<left1to(x,y,t1".v8",xout(y))>recf(x,f),t2".v8",t5".v8"):is(smpr(y,left(cx,x,y,lessisi2"n"(y,x,i),f)),smpr(x,f))
-@[z:complex][x:nat]
-+8279
-xr:=rlofnt(x):real
-prop1:=is(sum(x,[t:1to(x)]z),ts(z,pli(xr,0))):'prop'
-z@t1:=satz277([t:cx][u:cx]pl(t,u),[t:1to(1)]z):is(sum(1,[t:1to(1)]z),z)
-t2:=tris(cx,sum(1,[t:1to(1)]z),z,ts(z,1c),t1,satz222a(z)):prop1(1)
-x@[p:prop1(x)]
-t3:=satz278([t:cx][u:cx]pl(t,u),x,[t:1to(pl"n"(x,1))]z):is(sum(pl"n"(x,1),[t:1to(pl"n"(x,1))]z),pl(sum(x,[t:1to(x)]z),z))
-t4:=ispl12(sum(x,[t:1to(x)]z),ts(z,pli(xr,0)),z,ts(z,1c),p,satz222a(z)):is(pl(sum(x,[t:1to(x)]z),z),pl(ts(z,pli(xr,0)),ts(z,1c)))
-t5:=distpt2(z,pli(xr,0),1c):is(pl(ts(z,pli(xr,0)),ts(z,1c)),ts(z,pl(pli(xr,0),1c)))
-t6:=plis12a(xr,0,1rl,0):is(pl(pli(xr,0),1c),pli(pl"r"(xr,1rl),pl"r"(0,0)))
-t7:=isrecx12(pl"r"(xr,1rl),rlofnt(pl"n"(x,1)),pl"r"(0,0),0,satzr155b(x,1),pl01"r"(0,0,refis(real,0))):is(pli(pl"r"(xr,1rl),pl"r"(0,0)),pli(rlofnt(pl"n"(x,1)),0))
-t8:=tris(cx,pl(pli(xr,0),1c),pli(pl"r"(xr,1rl),pl"r"(0,0)),pli(rlofnt(pl"n"(x,1)),0),t6,t7):is(pl(pli(xr,0),1c),pli(rlofnt(pl"n"(x,1)),0))
-t9:=ists2(pl(pli(xr,0),1c),pli(rlofnt(pl"n"(x,1)),0),z,t8):is(ts(z,pl(pli(xr,0),1c)),ts(z,pli(rlofnt(pl"n"(x,1)),0)))
-t10:=tr4is(cx,sum(pl"n"(x,1),[t:1to(pl"n"(x,1))]z),pl(sum(x,[t:1to(x)]z),z),pl(ts(z,pli(xr,0)),ts(z,1c)),ts(z,pl(pli(xr,0),1c)),ts(z,pli(rlofnt(pl"n"(x,1)),0)),t3,t4,t5,t9):prop1(pl"n"(x,1))
-t11:=isp(nat,[t:nat]prop1(t),pl"n"(x,1),<x>suc,t10,satz4a(x)):prop1(<x>suc)
--8279
-satz279:=induction([t:nat]prop1".8279"(t),t2".8279",[u:nat][t:prop1".8279"(u)]t11".8279"(u,t),x):is(sum(x,[t:1to(x)]z),ts(z,pli(rlofnt(x),0)))
-q@[f:[t:1to(2)]cx]
-+8280
-t1:=lessisi1"n"(1,2,satz18a(1,1)):lessis"n"(1,2)
-f1:=left(cx,2,1,t1,f):[t:1to(1)]cx
-t2:=satz278(q,1,f):is(smpr(2,f),<<xout(2)>f><smpr(1,f1)>q)
-t3:=satz277(q,f1):is(smpr(1,f1),<xout(1)>f1)
-t4:=isinoutn(1,1,lessisi3(1)):is"n"(1,inn(1,xout(1)))
-t5:=isoutni(2,1,satz24a(2),inn(1,xout(1)),trlessis"n"(inn(1,xout(1)),1,2,1top(1,xout(1)),t1),t4):is"e"(1to(2),1out(2),left1to(2,1,t1,xout(1)))
-t6:=isf(1to(2),cx,f,1out(2),left1to(2,1,t1,xout(1)),t5):is(<1out(2)>f,<xout(1)>f1)
-t7:=tris2(cx,smpr(1,f1),<1out(2)>f,<xout(1)>f1,t3,t6):is(smpr(1,f1),<1out(2)>f)
-t8:=isf(cx,cx,[t:cx]<<xout(2)>f><t>q,smpr(1,f1),<1out(2)>f,t7):is(<<xout(2)>f><smpr(1,f1)>q,<<xout(2)>f><<1out(2)>f>q)
--8280
-satz280:=tris(cx,smpr(2,f),<<xout(2)>f><smpr(1,f1".8280")>q,<<xout(2)>f><<1out(2)>f>q,t2".8280",t8".8280"):is(smpr(2,f),<<xout(2)>f><<1out(2)>f>q)
-q@assoc:=[x:cx][y:cx][z:cx]is(<z><<y><x>q>q,<<z><y>q><x>q):'prop'
-@assocp1:=[x:cx][y:cx][z:cx]asspl1(x,y,z):assoc([x:cx][y:cx]pl(x,y))
-assocts:=[x:cx][y:cx][z:cx]assts1(x,y,z):assoc([x:cx][y:cx]ts(x,y))
-q@[a:assoc][z:cx][u:cx][v:cx]
-assq1:=<v><u><z>a:is(<v><<u><z>q>q,<<v><u>q><z>q)
-assq2:=symis(cx,<v><<u><z>q>q,<<v><u>q><z>q,assq1):is(<<v><u>q><z>q,<v><<u><z>q>q)
-q@[a:assoc(q)][x:nat][y:nat][f:[t:1to(pl"n"(x,y))]cx]
-+8281
-y@t1:=lessisi1"n"(x,pl"n"(x,y),satz18a(x,y)):lessis"n"(x,pl"n"(x,y))
-f@f1:=left(cx,pl"n"(x,y),x,t1,f):[t:1to(x)]cx
-f2:=right(cx,x,y,f):[t:1to(y)]cx
-prop1:=is(smpr(pl"n"(x,y),f),<smpr(y,f2)><smpr(x,f1)>q):'prop'
-y@prop2:=all"l"([t:1to(pl"n"(x,y))]cx,[u:[t:1to(pl"n"(x,y))]cx]prop1(u)):'prop'
-x@[f0:[t:1to(pl"n"(x,1))]cx]
-t2:=satz278(q,x,f0):is(smpr(pl"n"(x,1),f0),<<xout(pl"n"(x,1))>f0><smpr(x,f1(1,f0))>q)
-t3:=satz277(q,f2(1,f0)):is(smpr(1,f2(1,f0)),<xout(1)>f2(1,f0))
-t4:=isinoutn(1,1,lessisi3(1)):is"n"(1,inn(1,xout(1)))
-t5:=ispl2"n"(1,inn(1,xout(1)),x,t4):is"n"(pl"n"(x,1),pl"n"(x,inn(1,xout(1))))
-t6:=isoutni(pl"n"(x,1),pl"n"(x,1),lessisi3(pl"n"(x,1)),pl"n"(x,inn(1,xout(1))),satz19o(inn(1,xout(1)),1,x,1top(1,xout(1))),t5):is"e"(1to(pl"n"(x,1)),xout(pl"n"(x,1)),right1to(x,1,xout(1)))
-t7:=isf(1to(pl"n"(x,1)),cx,f0,xout(pl"n"(x,1)),right1to(x,1,xout(1)),t6):is(<xout(pl"n"(x,1))>f0,<xout(1)>f2(1,f0))
-t8:=tris2(cx,<xout(pl"n"(x,1))>f0,smpr(1,f2(1,f0)),<xout(1)>f2(1,f0),t7,t3):is(<xout(pl"n"(x,1))>f0,smpr(1,f2(1,f0)))
-t9:=isf(cx,cx,<smpr(x,f1(1,f0))>q,<xout(pl"n"(x,1))>f0,smpr(1,f2(1,f0)),t8):is(<<xout(pl"n"(x,1))>f0><smpr(x,f1(1,f0))>q,<smpr(1,f2(1,f0))><smpr(x,f1(1,f0))>q)
-t10:=tris(cx,smpr(pl"n"(x,1),f0),<<xout(pl"n"(x,1))>f0><smpr(x,f1(1,f0))>q,<smpr(1,f2(1,f0))><smpr(x,f1(1,f0))>q,t2,t9):prop1(1,f0)
-x@t11:=[u:[t:1to(pl"n"(x,1))]cx]t10(u):prop2(1)
-y@yp1:=pl"n"(y,1):nat
-xpy:=pl"n"(x,y):nat
-xpy1:=pl"n"(x,yp1):nat
-xyp1:=pl"n"(xpy,1):nat
-t12:=lessisi2"n"(xyp1,xpy1,asspl1"n"(x,y,1)):lessis"n"(xyp1,xpy1)
-[p:prop2(y)][f:[t:1to(xpy1)]cx]
-t13:=isinoutn(xyp1,xyp1,lessisi3(xyp1)):is"n"(xyp1,inn(xyp1,xout(xyp1)))
-t14:=tris(nat,xpy1,xyp1,inn(xyp1,xout(xyp1)),asspl2"n"(x,y,1),t13):is"n"(xpy1,inn(xyp1,xout(xyp1)))
-t15:=isoutni(xpy1,xpy1,lessisi3(xpy1),inn(xyp1,xout(xyp1)),trlessis"n"(inn(xyp1,xout(xyp1)),xyp1,xpy1,1top(xyp1,xout(xyp1)),t12),t14):is"e"(1to(xpy1),xout(xpy1),left1to(xpy1,xyp1,t12,xout(xyp1)))
-t16:=isf(1to(xpy1),cx,recf(xpy1,f),xout(xpy1),left1to(xpy1,xyp1,t12,xout(xyp1)),t15):is(smpr(xpy1,f),<xout(xyp1)>left(cx,xpy1,xyp1,t12,recf(xpy1,f)))
-fr:=left(cx,xpy1,xyp1,t12,f):[t:1to(xyp1)]cx
-t17:=satz275f(xpy1,xyp1,t12,f):is"e"([t:1to(xyp1)]cx,left(cx,xpy1,xyp1,t12,recf(xpy1,f)),recf(xyp1,fr))
-t18:=fise(1to(xyp1),cx,left(cx,xpy1,xyp1,t12,recf(xpy1,f)),recf(xyp1,fr),t17,xout(xyp1)):is(<xout(xyp1)>left(cx,xpy1,xyp1,t12,recf(xpy1,f)),smpr(xyp1,fr))
-t19:=lessisi1"n"(xpy,xyp1,satz18a(xpy,1)):lessis"n"(xpy,xyp1)
-frr:=left(cx,xyp1,xpy,t19,fr):[t:1to(xpy)]cx
-t20:=satz278(xpy,fr):is(smpr(xyp1,fr),<<xout(xyp1)>fr><smpr(xpy,frr)>q)
-t21:=isf(cx,cx,[u:cx]<<xout(xyp1)>fr><u>q,smpr(xpy,frr),<smpr(y,f2(frr))><smpr(x,f1(frr))>q,<frr>p):is(<<xout(xyp1)>fr><smpr(xpy,frr)>q,<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q)
-t22:=assq1(a,smpr(x,f1(frr)),smpr(y,f2(frr)),<xout(xyp1)>fr):is(<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q,<<<xout(xyp1)>fr><smpr(y,f2(frr))>q><smpr(x,f1(frr))>q)
-t23:=lessisi1"n"(y,yp1,satz18a(y,1)):lessis"n"(y,yp1)
-fy:=left(cx,yp1,y,t23,f2(yp1,f)):[t:1to(y)]cx
-t24:=satz278(y,f2(yp1,f)):is(smpr(yp1,f2(yp1,f)),<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q)
-t25:=isinoutn(yp1,yp1,lessisi3(yp1)):is"n"(yp1,inn(yp1,xout(yp1)))
-t26:=ispl2"n"(yp1,inn(yp1,xout(yp1)),x,t25):is"n"(xpy1,pl"n"(x,inn(yp1,xout(yp1))))
-t27:=tris1(nat,inn(xyp1,xout(xyp1)),pl"n"(x,inn(yp1,xout(yp1))),xpy1,t14,t26):is"n"(inn(xyp1,xout(xyp1)),pl"n"(x,inn(yp1,xout(yp1))))
-t28:=isoutni(xpy1,inn(xyp1,xout(xyp1)),trlessis"n"(inn(xyp1,xout(xyp1)),xyp1,xpy1,1top(xyp1,xout(xyp1)),t12),pl"n"(x,inn(yp1,xout(yp1))),satz19o(inn(yp1,xout(yp1)),yp1,x,1top(yp1,xout(yp1))),t27):is"e"(1to(xpy1),left1to(xpy1,xyp1,t12,xout(xyp1)),right1to(x,yp1,xout(yp1)))
-t29:=isf(1to(xpy1),cx,f,left1to(xpy1,xyp1,t12,xout(xyp1)),right1to(x,yp1,xout(yp1)),t28):is(<xout(xyp1)>fr,<xout(yp1)>f2(yp1,f))
-t30:=isf(cx,cx,<smpr(y,f2(frr))>q,<xout(xyp1)>fr,<xout(yp1)>f2(yp1,f),t29):is(<<xout(xyp1)>fr><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,f2(frr))>q)
-[n:1to(y)]
-n0:=inn(y,n):nat
-nyp1:=left1to(yp1,y,t23,n):1to(yp1)
-t31:=isinoutn(yp1,n0,trlessis"n"(n0,y,yp1,1top(y,n),t23)):is"n"(n0,inn(yp1,nyp1))
-t32:=ispl2"n"(n0,inn(yp1,nyp1),x,t31):is"n"(pl"n"(x,n0),pl"n"(x,inn(yp1,nyp1)))
-nxpy:=right1to(x,y,n):1to(xpy)
-nxyp1:=left1to(xyp1,xpy,t19,nxpy):1to(xyp1)
-t33:=isinoutn(xyp1,inn(xpy,nxpy),trlessis"n"(inn(xpy,nxpy),xpy,xyp1,1top(xpy,nxpy),t19)):is"n"(inn(xpy,nxpy),inn(xyp1,nxyp1))
-t34:=isinoutn(xpy,pl"n"(x,n0),satz19o(n0,y,x,1top(y,n))):is"n"(pl"n"(x,n0),inn(xpy,nxpy))
-t35:=tris(nat,pl"n"(x,n0),inn(xpy,nxpy),inn(xyp1,nxyp1),t34,t33):is"n"(pl"n"(x,n0),inn(xyp1,nxyp1))
-t36:=tris1(nat,pl"n"(x,inn(yp1,nyp1)),inn(xyp1,nxyp1),pl"n"(x,n0),t32,t35):is"n"(pl"n"(x,inn(yp1,nyp1)),inn(xyp1,nxyp1))
-t37:=isoutni(xpy1,pl"n"(x,inn(yp1,nyp1)),satz19o(inn(yp1,nyp1),yp1,x,1top(yp1,nyp1)),inn(xyp1,nxyp1),trlessis"n"(inn(xyp1,nxyp1),xyp1,xpy1,1top(xyp1,nxyp1),t12),t36):is"e"(1to(xpy1),right1to(x,yp1,nyp1),left1to(xpy1,xyp1,t12,nxyp1))
-t38:=isf(1to(xpy1),cx,f,right1to(x,yp1,nyp1),left1to(xpy1,xyp1,t12,nxyp1),t37):is(<n>fy,<n>f2(frr))
-f@t39:=fisi(1to(y),cx,fy,f2(frr),[u:1to(y)]t38(u)):is"e"([u:1to(y)]cx,fy,f2(frr))
-t40:=isf([u:1to(y)]cx,cx,[t:[u:1to(y)]cx]smpr(y,t),fy,f2(frr),t39):is(smpr(y,fy),smpr(y,f2(frr)))
-t41:=isf(cx,cx,[t:cx]<<xout(yp1)>f2(yp1,f)><t>q,smpr(y,f2(frr)),smpr(y,fy),symis(cx,smpr(y,fy),smpr(y,f2(frr)),t40)):is(<<xout(yp1)>f2(yp1,f)><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q)
-t41a:=tris(cx,<<xout(xyp1)>fr><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q,t30,t41):is(<<xout(xyp1)>fr><smpr(y,f2(frr))>q,<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q)
-t42:=tris2(cx,<<xout(xyp1)>fr><smpr(y,f2(frr))>q,smpr(yp1,f2(yp1,f)),<<xout(yp1)>f2(yp1,f)><smpr(y,fy)>q,t41a,t24):is(<<xout(xyp1)>fr><smpr(y,f2(frr))>q,smpr(yp1,f2(yp1,f)))
-t43:=isf(cx,cx,<smpr(x,f1(frr))>q,<<xout(xyp1)>fr><smpr(y,f2(frr))>q,smpr(yp1,f2(yp1,f)),t42):is(<<<xout(xyp1)>fr><smpr(y,f2(frr))>q><smpr(x,f1(frr))>q,<smpr(yp1,f2(yp1,f))><smpr(x,f1(frr))>q)
-[m:1to(x)]
-m0:=inn(x,m):nat
-mxpy:=left1to(xpy,x,t1,m):1to(xpy)
-mxyp1:=left1to(xyp1,xpy,t19,mxpy):1to(xyp1)
-t44:=isinoutn(xyp1,inn(xpy,mxpy),trlessis"n"(inn(xpy,mxpy),xpy,xyp1,1top(xpy,mxpy),t19)):is"n"(inn(xpy,mxpy),inn(xyp1,mxyp1))
-t45:=isinoutn(xpy,m0,trlessis"n"(m0,x,xpy,1top(x,m),t1)):is"n"(m0,inn(xpy,mxpy))
-t46:=tris(nat,m0,inn(xpy,mxpy),inn(xyp1,mxyp1),t45,t44):is"n"(m0,inn(xyp1,mxyp1))
-t47:=isoutni(xpy1,m0,trlessis"n"(m0,x,xpy1,1top(x,m),t1(yp1)),inn(xyp1,mxyp1),trlessis"n"(inn(xyp1,mxyp1),xyp1,xpy1,1top(xyp1,mxyp1),t12),t46):is"e"(1to(xpy1),left1to(xpy1,x,t1(yp1),m),left1to(xpy1,xyp1,t12,mxyp1))
-t48:=isf(1to(xpy1),cx,f,left1to(xpy1,x,t1(yp1),m),left1to(xpy1,xyp1,t12,mxyp1),t47):is(<m>f1(x,yp1,f),<m>f1(x,y,frr))
-f@t49:=fisi(1to(x),cx,f1(x,yp1,f),f1(x,y,frr),[u:1to(x)]t48(u)):is"e"([u:1to(x)]cx,f1(x,yp1,f),f1(x,y,frr))
-t50:=isf([u:1to(x)]cx,cx,[t:[u:1to(x)]cx]smpr(x,t),f1(yp1,f),f1(frr),t49):is(smpr(x,f1(yp1,f)),smpr(x,f1(frr)))
-t51:=isf(cx,cx,[t:cx]<smpr(yp1,f2(yp1,f))><t>q,smpr(x,f1(frr)),smpr(x,f1(yp1,f)),symis(cx,smpr(x,f1(yp1,f)),smpr(x,f1(frr)),t50)):is(<smpr(yp1,f2(yp1,f))><smpr(x,f1(frr))>q,<smpr(yp1,f2(yp1,f))><smpr(x,f1(yp1,f))>q)
-t52:=tr4is(cx,smpr(xpy1,f),<xout(xyp1)>left(cx,xpy1,xyp1,t12,recf(xpy1,f)),smpr(xyp1,fr),<<xout(xyp1)>fr><smpr(xpy,frr)>q,<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q,t16,t18,t20,t21):is(smpr(xpy1,f),<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q)
-t53:=tr4is(cx,smpr(xpy1,f),<<xout(xyp1)>fr><<smpr(y,f2(frr))><smpr(x,f1(frr))>q>q,<<<xout(xyp1)>fr><smpr(y,f2(frr))>q><smpr(x,f1(frr))>q,<smpr(yp1,f2(yp1,f))><smpr(x,f1(frr))>q,<smpr(yp1,f2(yp1,f))><smpr(x,f1(yp1,f))>q,t52,t22,t43,t51):prop1(yp1,f)
-p@t54:=[u:[t:1to(xpy1)]cx]t53(u):prop2(yp1)
-t55:=isp(nat,[t:nat]prop2(t),yp1,<y>suc,t54,satz4a(y)):prop2(<y>suc)
-y@t56:=induction([t:nat]prop2(t),t11,[z:nat][t:prop2(z)]t55(z,t),y):prop2(y)
--8281
-satz281:=<f>t56".8281":is(smpr(pl"n"(x,y),f),<smpr(y,right(cx,x,y,f))><smpr(x,left(cx,pl"n"(x,y),x,lessisi1"n"(x,pl"n"(x,y),satz18a(x,y)),f))>q)
-q@commut:=[x:cx][y:cx]is(<y><x>q,<x><y>q):'prop'
-@commutpl:=[x:cx][y:cx]compl(x,y):commut([x:cx][y:cx]pl(x,y))
-commutts:=[x:cx][y:cx]comts(x,y):commut([x:cx][y:cx]ts(x,y))
-q@[c:commut][z:cx][u:cx]
-comq:=<u><z>c:is(<u><z>q,<z><u>q)
-a@[c:commut(q)][x:nat][f:[t:1to(x)]cx][g:[t:1to(x)]cx]
-+8282
-prop1:=is(smpr(x,[t:1to(x)]<<t>g><<t>f>q),<smpr(x,g)><smpr(x,f)>q):'prop'
-x@prop2:=all"l"([t:1to(x)]cx,[u:[t:1to(x)]cx]all"l"([t:1to(x)]cx,[v:[t:1to(x)]cx]prop1(u,v))):'prop'
-c@[f0:[t:1to(1)]cx][g0:[t:1to(1)]cx]
-t1:=satz277([t:1to(1)]<<t>g0><<t>f0>q):is(smpr(1,[t:1to(1)]<<t>g0><<t>f0>q),<<xout(1)>g0><<xout(1)>f0>q)
-t2:=isf(cx,cx,<smpr(1,f0)>q,smpr(1,g0),<xout(1)>g0,satz277(g0)):is(<smpr(1,g0)><smpr(1,f0)>q,<<xout(1)>g0><smpr(1,f0)>q)
-t3:=isf(cx,cx,[t:cx]<<xout(1)>g0><t>q,smpr(1,f0),<xout(1)>f0,satz277(f0)):is(<<xout(1)>g0><smpr(1,f0)>q,<<xout(1)>g0><<xout(1)>f0>q)
-t4:=tris(cx,<smpr(1,g0)><smpr(1,f0)>q,<<xout(1)>g0><smpr(1,f0)>q,<<xout(1)>g0><<xout(1)>f0>q,t2,t3):is(<smpr(1,g0)><smpr(1,f0)>q,<<xout(1)>g0><<xout(1)>f0>q)
-t5:=tris2(cx,smpr(1,[t:1to(1)]<<t>g0><<t>f0>q),<smpr(1,g0)><smpr(1,f0)>q,<<xout(1)>g0><<xout(1)>f0>q,t1,t4):prop1(1,f0,g0)
-c@t6:=[u:[t:1to(1)]cx][v:[t:1to(1)]cx]t5(u,v):prop2(1)
-x@xp1:=pl"n"(x,1):nat
-[p:prop2(x)][f:[t:1to(xp1)]cx][g:[t:1to(xp1)]cx]
-c@[u:cx][v:cx][w:cx][z:cx]
-t7:=assq2(a,<v><u>q,w,z):is(<<z><w>q><<v><u>q>q,<z><<w><<v><u>q>q>q)
-t8:=comq(c,<v><u>q,w):is(<w><<v><u>q>q,<<v><u>q><w>q)
-t9:=assq2(a,w,u,v):is(<<v><u>q><w>q,<v><<u><w>q>q)
-t10:=tris(cx,<w><<v><u>q>q,<<v><u>q><w>q,<v><<u><w>q>q,t8,t9):is(<w><<v><u>q>q,<v><<u><w>q>q)
-t11:=isf(cx,cx,[t:cx]<z><t>q,<w><<v><u>q>q,<v><<u><w>q>q,t10):is(<z><<w><<v><u>q>q>q,<z><<v><<u><w>q>q>q)
-t12:=assq1(a,<u><w>q,v,z):is(<z><<v><<u><w>q>q>q,<<z><v>q><<u><w>q>q)
-t13:=comq(c,w,u):is(<u><w>q,<w><u>q)
-t14:=isf(cx,cx,[t:cx]<<z><v>q><t>q,<u><w>q,<w><u>q,t13):is(<<z><v>q><<u><w>q>q,<<z><v>q><<w><u>q>q)
-t15:=tr4is(cx,<<z><w>q><<v><u>q>q,<z><<w><<v><u>q>q>q,<z><<v><<u><w>q>q>q,<<z><v>q><<u><w>q>q,<<z><v>q><<w><u>q>q,t7,t11,t12,t14):is(<<z><w>q><<v><u>q>q,<<z><v>q><<w><u>q>q)
-g@t16:=lessisi1"n"(x,xp1,satz18a(x,1)):lessis"n"(x,xp1)
-sfx:=smpr(x,left(cx,xp1,x,t16,f)):cx
-sgx:=smpr(x,left(cx,xp1,x,t16,g)):cx
-h:=[t:1to(xp1)]<<t>g><<t>f>q:[t:1to(xp1)]cx
-shx:=smpr(x,left(cx,xp1,x,t16,h)):cx
-t17:=satz278(x,h):is(smpr(xp1,h),<<<xout(xp1)>g><<xout(xp1)>f>q><shx>q)
-t18:=<left(cx,xp1,x,t16,g)><left(cx,xp1,x,t16,f)>p:is(shx,<sgx><sfx>q)
-t19:=isf(cx,cx,[t:cx]<<<xout(xp1)>g><<xout(xp1)>f>q><t>q,shx,<sgx><sfx>q,t18):is(<<<xout(xp1)>g><<xout(xp1)>f>q><shx>q,<<<xout(xp1)>g><<xout(xp1)>f>q><<sgx><sfx>q>q)
-t20:=t15(sfx,sgx,<xout(xp1)>f,<xout(xp1)>g):is(<<<xout(xp1)>g><<xout(xp1)>f>q><<sgx><sfx>q>q,<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q)
-t21:=symis(cx,smpr(xp1,f),<<xout(xp1)>f><sfx>q,satz278(x,f)):is(<<xout(xp1)>f><sfx>q,smpr(xp1,f))
-t22:=isf(cx,cx,[t:cx]<<<xout(xp1)>g><sgx>q><t>q,<<xout(xp1)>f><sfx>q,smpr(xp1,f),t21):is(<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q,<<<xout(xp1)>g><sgx>q><smpr(xp1,f)>q)
-t23:=symis(cx,smpr(xp1,g),<<xout(xp1)>g><sgx>q,satz278(x,g)):is(<<xout(xp1)>g><sgx>q,smpr(xp1,g))
-t24:=isf(cx,cx,<smpr(xp1,f)>q,<<xout(xp1)>g><sgx>q,smpr(xp1,g),t23):is(<<<xout(xp1)>g><sgx>q><smpr(xp1,f)>q,<smpr(xp1,g)><smpr(xp1,f)>q)
-t25:=tr3is(cx,smpr(xp1,h),<<<xout(xp1)>g><<xout(xp1)>f>q><shx>q,<<<xout(xp1)>g><<xout(xp1)>f>q><<sgx><sfx>q>q,<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q,t17,t19,t20):is(smpr(xp1,h),<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q)
-t26:=tr3is(cx,smpr(xp1,h),<<<xout(xp1)>g><sgx>q><<<xout(xp1)>f><sfx>q>q,<<<xout(xp1)>g><sgx>q><smpr(xp1,f)>q,<smpr(xp1,g)><smpr(xp1,f)>q,t25,t22,t24):prop1(xp1,f,g)
-p@t27:=[u:[t:1to(xp1)]cx][v:[t:1to(xp1)]cx]t26(u,v):prop2(xp1)
-t28:=isp(nat,[t:nat]prop2(t),xp1,<x>suc,t27,satz4a(x)):prop2(<x>suc)
-x@t29:=induction([t:nat]prop2(t),t6,[y:nat][t:prop2(y)]t28(y,t),x):prop2(x)
--8282
-satz282:=<g><f>t29".8282":is(smpr(x,[t:1to(x)]<<t>g><<t>f>q),<smpr(x,g)><smpr(x,f)>q)
-x@[s:[t:1to(x)]1to(x)][b:bijective(1to(x),1to(x),s)][f:[t:1to(x)]cx]
-+8283
-s@[f:[t:1to(x)]cx]
-g:=[t:1to(x)]<<t>s>f:[t:1to(x)]cx
-prop1:=is(smpr(x,g),smpr(x,f)):'prop'
-x@prop2:=all"l"([t:1to(x)]1to(x),[u:[t:1to(x)]1to(x)]all"l"([t:1to(x)]cx,[v:[t:1to(x)]cx]imp(bijective(1to(x),1to(x),u),prop1(u,v)))):'prop'
-c@[s:[t:1to(1)]1to(1)][f:[t:1to(1)]cx]
-t1:=tris2(1to(1),<xout(1)>s,xout(1),1o"n",th1"n.singlet"(<xout(1)>s),th1"n.singlet"(xout(1))):is"e"(1to(1),<xout(1)>s,xout(1))
-t2:=satz277(g(1,s,f)):is(smpr(1,g(1,s,f)),<xout(1)>g(1,s,f))
-t3:=isf(1to(1),cx,f,<xout(1)>s,xout(1),t1):is(<xout(1)>g(1,s,f),<xout(1)>f)
-t4:=symis(cx,smpr(1,f),<xout(1)>f,satz277(f)):is(<xout(1)>f,smpr(1,f))
-t5:=tr3is(cx,smpr(1,g(1,s,f)),<xout(1)>g(1,s,f),<xout(1)>f,smpr(1,f),t2,t3,t4):prop1(1,s,f)
-c@t6:=[u:[t:1to(1)]1to(1)][v:[t:1to(1)]cx][w:bijective(1to(1),1to(1),u)]t5(u,v):prop2(1)
-x@xp1:=pl"n"(x,1):nat
-t7:=lessisi1"n"(x,xp1,satz18a(x,1)):lessis"n"(x,xp1)
-[p:prop2(x)][s:[t:1to(xp1)]1to(xp1)][f:[t:1to(xp1)]cx][b:bijective(1to(xp1),1to(xp1),s)]
-t8:=ande1(injective(1to(xp1),1to(xp1),s),surjective(1to(xp1),1to(xp1),s),b):injective(1to(xp1),1to(xp1),s)
-[case1:is"e"(1to(xp1),<xout(xp1)>s,xout(xp1))][u:1to(x)]
-u1:=left1to(xp1,x,t7,u):1to(xp1)
-n1:=inn(xp1,<u1>s):nat
-[i:is"n"(n1,xp1)]
-t9:=tr3is(1to(xp1),<u1>s,outn(xp1,n1,1top(xp1,<u1>s)),xout(xp1),<xout(xp1)>s,isoutinn(xp1,<u1>s),isoutni(xp1,n1,1top(xp1,<u1>s),xp1,lessisi3(xp1),i),symis(1to(xp1),<xout(xp1)>s,xout(xp1),case1)):is"e"(1to(xp1),<u1>s,<xout(xp1)>s)
-t10:=isfe(1to(xp1),1to(xp1),s,t8,u1,xout(xp1),t9):is"e"(1to(xp1),u1,xout(xp1))
-t11:=isoutne(xp1,inn(x,u),trlessis"n"(inn(x,u),x,xp1,1top(x,u),t7),xp1,lessisi3(xp1),t10):is"n"(inn(x,u),xp1)
-t12:=satz16a(inn(x,u),x,xp1,1top(x,u),satz18a(x,1)):less"n"(inn(x,u),xp1)
-t13:=<t11>ec3e31(is"n"(inn(x,u),xp1),more"n"(inn(x,u),xp1),less"n"(inn(x,u),xp1),satz10b(inn(x,u),xp1),t12):con
-u@t14:=ore1(less"n"(n1,xp1),is"n"(n1,xp1),1top(xp1,<u1>s),[t:is"n"(n1,xp1)]t13(t)):less"n"(n1,xp1)
-t15:=satz26(x,n1,t14):lessis"n"(n1,x)
-w1:=outn(x,n1,t15):1to(x)
-case1@s01:=[t:1to(x)]w1(t):[t:1to(x)]1to(x)
-u@[v:1to(x)][i:is"e"(1to(x),w1(u),w1(v))]
-t16:=isoutne(x,n1(u),t15(u),n1(v),t15(v),i):is"n"(n1(u),n1(v))
-t17:=<isinne(xp1,<u1(u)>s,<u1(v)>s,t16)><u1(v)><u1(u)>t8:is"e"(1to(xp1),u1(u),u1(v))
-t18:=thleft1(xp1,x,t7,u,v,t17):is"e"(1to(x),u,v)
-u@u2:=<u1>invf(1to(xp1),1to(xp1),s,b):1to(xp1)
-n2:=inn(xp1,u2):nat
-[i:is"n"(n2,xp1)]
-t19:=tris(1to(xp1),u2,outn(xp1,n2,1top(xp1,u2)),xout(xp1),isoutinn(xp1,u2),isoutni(xp1,n2,1top(xp1,u2),xp1,lessisi3(xp1),i)):is"e"(1to(xp1),u2,xout(xp1))
-t20:=tr3is(1to(xp1),u1,<u2>s,<xout(xp1)>s,xout(xp1),thinvf2(1to(xp1),1to(xp1),s,b,u1),isf(1to(xp1),1to(xp1),s,u2,xout(xp1),t19),case1):is"e"(1to(xp1),u1,xout(xp1))
-t21:=isoutne(xp1,inn(x,u),trlessis"n"(inn(x,u),x,xp1,1top(x,u),t7),xp1,lessisi3(xp1),t20):is"n"(inn(x,u),xp1)
-t22:=satz16a(inn(x,u),x,xp1,1top(x,u),satz18a(x,1)):less"n"(inn(x,u),xp1)
-t23:=<t21>ec3e31(is"n"(inn(x,u),xp1),more"n"(inn(x,u),xp1),less"n"(inn(x,u),xp1),satz10b(inn(x,u),xp1),t22):con
-u@t24:=ore1(less"n"(n2,xp1),is"n"(n2,xp1),1top(xp1,u2),[t:is"n"(n2,xp1)]t23(t)):less"n"(n2,xp1)
-t25:=satz26(x,n2,t24):lessis"n"(n2,x)
-w2:=outn(x,n2,t25):1to(x)
-t26:=isinoutn(x,n2,t25):is"n"(n2,inn(x,w2))
-t27:=tris(1to(xp1),u2,outn(xp1,n2,1top(xp1,u2)),u1(w2),isoutinn(xp1,u2),isoutni(xp1,n2,1top(xp1,u2),inn(x,w2),trlessis"n"(inn(x,w2),x,xp1,1top(x,w2),t7),t26)):is"e"(1to(xp1),u2,u1(w2))
-t28:=tris(1to(xp1),u1,<u2>s,<u1(w2)>s,thinvf2(1to(xp1),1to(xp1),s,b,u1),isf(1to(xp1),1to(xp1),s,u2,u1(w2),t27)):is"e"(1to(xp1),u1,<u1(w2)>s)
-t29:=tris(nat,inn(x,u),inn(xp1,u1),n1(w2),isinoutn(xp1,inn(x,u),trlessis"n"(inn(x,u),x,xp1,1top(x,u),t7)),isinni(xp1,u1,<u1(w2)>s,t28)):is"n"(inn(x,u),n1(w2))
-t30:=tris(1to(x),u,outn(x,inn(x,u),1top(x,u)),w1(w2),isoutinn(x,u),isoutni(x,inn(x,u),1top(x,u),n1(w2),t15(w2),t29)):is"e"(1to(x),u,w1(w2))
-t31:=somei(1to(x),[t:1to(x)]is"e"(1to(x),u,w1(t)),w2,t30):image(1to(x),1to(x),s01,u)
-case1@t32:=andi(injective(1to(x),1to(x),s01),surjective(1to(x),1to(x),s01),[t:1to(x)][u:1to(x)][v:is"e"(1to(x),<t>s01,<u>s01)]t18(t,u,v),[t:1to(x)]t31(t)):bijective(1to(x),1to(x),s01)
-f01:=left(cx,xp1,x,t7,f):[t:1to(x)]cx
-t33:=<t32><f01><s01>p:prop1(s01,f01)
-g1:=left(cx,xp1,x,t7,g(xp1,s,f)):[t:1to(x)]cx
-g2:=g(x,s01,f01):[t:1to(x)]cx
-u@t33a:=isoutinn(xp1,<u1>s):is"e"(1to(xp1),<u1>s,outn(xp1,n1,1top(xp1,<u1>s)))
-t34:=isinoutn(x,n1,t15):is"n"(n1,inn(x,w1))
-t35:=isoutni(xp1,n1,1top(xp1,<u1>s),inn(x,w1),trlessis"n"(inn(x,w1),x,xp1,1top(x,w1),t7),t34):is"e"(1to(xp1),outn(xp1,n1,1top(xp1,<u1>s)),left1to(xp1,x,t7,w1))
-t36:=tris(1to(xp1),<u1>s,outn(xp1,n1,1top(xp1,<u1>s)),left1to(xp1,x,t7,w1),t33a,t35):is"e"(1to(xp1),<u1>s,left1to(xp1,x,t7,w1))
-t37:=isf(1to(xp1),cx,f,<u1>s,left1to(xp1,x,t7,w1),t36):is(<u>g1,<u>g2)
-case1@t38:=fisi(1to(x),cx,g1,g2,[t:1to(x)]t37(t)):is"e"([t:1to(x)]cx,g1,g2)
-t39:=isf([t:1to(x)]cx,cx,[u:[t:1to(x)]cx]smpr(x,u),g1,g2,t38):is(smpr(x,g1),smpr(x,g2))
-t40:=tris(cx,smpr(x,g1),smpr(x,g2),smpr(x,f01),t39,t33):is(smpr(x,g1),smpr(x,f01))
-t41:=isf(1to(xp1),cx,f,<xout(xp1)>s,xout(xp1),case1):is(<xout(xp1)>g(xp1,s,f),<xout(xp1)>f)
-t42:=satz278(x,g(xp1,s,f)):is(smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s,f)><smpr(x,g1)>q)
-t43:=isf(cx,cx,<smpr(x,g1)>q,<xout(xp1)>g(xp1,s,f),<xout(xp1)>f,t41):is(<<xout(xp1)>g(xp1,s,f)><smpr(x,g1)>q,<<xout(xp1)>f><smpr(x,g1)>q)
-t44:=isf(cx,cx,[t:cx]<<xout(xp1)>f><t>q,smpr(x,g1),smpr(x,f01),t40):is(<<xout(xp1)>f><smpr(x,g1)>q,<<xout(xp1)>f><smpr(x,f01)>q)
-t45:=symis(cx,smpr(xp1,f),<<xout(xp1)>f><smpr(x,f01)>q,satz278(x,f)):is(<<xout(xp1)>f><smpr(x,f01)>q,smpr(xp1,f))
-t46:=tr4is(cx,smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s,f)><smpr(x,g1)>q,<<xout(xp1)>f><smpr(x,g1)>q,<<xout(xp1)>f><smpr(x,f01)>q,smpr(xp1,f),t42,t43,t44,t45):prop1(xp1,s,f)
-b@1px:=pl"n"(1,x):nat
-[case2:is"e"(1to(xp1),<1out(xp1)>s,1out(xp1))][u:1to(x)]
-u3:=right1to(1,x,u):1to(1px)
-case2@t47:=lessisi2"n"(1px,xp1,compl"n"(1,x)):lessis"n"(1px,xp1)
-s02:=left(1to(xp1),xp1,1px,t47,s):[t:1to(1px)]1to(xp1)
-u@n3:=inn(xp1,<u3>s02):nat
-[i:is"n"(n3,1)]
-t48:=tr3is(1to(xp1),<u3>s02,outn(xp1,n3,1top(xp1,<u3>s02)),1out(xp1),<1out(xp1)>s,isoutinn(xp1,<u3>s02),isoutni(xp1,n3,1top(xp1,<u3>s02),1,satz24a(xp1),i),symis(1to(xp1),<1out(xp1)>s,1out(xp1),case2)):is"e"(1to(xp1),<u3>s02,<1out(xp1)>s)
-t49:=isfe(1to(xp1),1to(xp1),s,t8,left1to(xp1,1px,t47,u3),1out(xp1),t48):is"e"(1to(xp1),left1to(xp1,1px,t47,u3),1out(xp1))
-t50:=isoutne(xp1,inn(1px,u3),trlessis"n"(inn(1px,u3),1px,xp1,1top(1px,u3),t47),1,satz24a(xp1),t49):is"n"(inn(1px,u3),1)
-t51:=isinoutn(1px,pl"n"(1,inn(x,u)),satz19o(inn(x,u),x,1,1top(x,u))):is"n"(pl"n"(1,inn(x,u)),inn(1px,u3))
-t52:=ismore1"n"(pl"n"(1,inn(x,u)),inn(1px,u3),1,t51,satz18(1,inn(x,u))):more"n"(inn(1px,u3),1)
-t53:=<t50>ec3e21(is"n"(inn(1px,u3),1),more"n"(inn(1px,u3),1),less"n"(inn(1px,u3),1),satz10b(inn(1px,u3),1),t52):con
-u@t54:=ore1(more"n"(n3,1),is"n"(n3,1),satz24(n3),[t:is"n"(n3,1)]t53(t)):more"n"(n3,1)
-nm1:=mn"n"(n3,1,t54):nat
-t54a:=islessis1"n"(n3,pl"n"(nm1,1),xp1,th1c"n.mn"(n3,1,t54),1top(xp1,<u3>s02)):lessis"n"(pl"n"(nm1,1),xp1)
-t55:=th9"l.or"(less"n"(pl"n"(nm1,1),xp1),is"n"(pl"n"(nm1,1),xp1),less"n"(nm1,x),is"n"(nm1,x),t54a,[t:less"n"(pl"n"(nm1,1),xp1)]satz20c(nm1,x,1,t),[t:is"n"(pl"n"(nm1,1),xp1)]satz20b(nm1,x,1,t)):lessis"n"(nm1,x)
-w3:=outn(x,nm1,t55):1to(x)
-case2@s03:=[t:1to(x)]w3(t):[t:1to(x)]1to(x)
-u@[v:1to(x)][i:is"e"(1to(x),w3(u),w3(v))]
-t56:=isoutne(x,nm1(u),t55(u),nm1(v),t55(v),i):is"n"(nm1(u),nm1(v))
-t57:=tr3is(nat,n3(u),pl"n"(nm1(u),1),pl"n"(nm1(v),1),n3(v),th1c"n.mn"(n3(u),1,t54(u)),ispl1"n"(nm1(u),nm1(v),1,t56),th1d"n.mn"(n3(v),1,t54(v))):is"n"(n3(u),n3(v))
-t58:=isinne(xp1,<u3(u)>s02,<u3(v)>s02,t57):is"e"(1to(xp1),<u3(u)>s02,<u3(v)>s02)
-t59:=isfe(1to(xp1),1to(xp1),s,t8,left1to(xp1,1px,t47,u3(u)),left1to(xp1,1px,t47,u3(v)),t58):is"e"(1to(xp1),left1to(xp1,1px,t47,u3(u)),left1to(xp1,1px,t47,u3(v)))
-t60:=thleft1(xp1,1px,t47,u3(u),u3(v),t59):is"e"(1to(1px),u3(u),u3(v))
-t61:=thright1(1,x,u,v,t60):is"e"(1to(x),u,v)
-case2@s04:=left(1to(xp1),xp1,1px,t47,invf(1to(xp1),1to(xp1),s,b)):[t:1to(1px)]1to(xp1)
-u@u4:=<u3>s04:1to(xp1)
-n4:=inn(xp1,u4):nat
-[i:is"n"(n4,1)]
-t62:=tris(1to(xp1),u4,outn(xp1,n4,1top(xp1,u4)),1out(xp1),isoutinn(xp1,u4),isoutni(xp1,n4,1top(xp1,u4),1,satz24a(xp1),i)):is"e"(1to(xp1),u4,1out(xp1))
-t63:=tr3is(1to(xp1),left1to(xp1,1px,t47,u3),<u4>s,<1out(xp1)>s,1out(xp1),thinvf2(1to(xp1),1to(xp1),s,b,left1to(xp1,1px,t47,u3)),isf(1to(xp1),1to(xp1),s,u4,1out(xp1),t62),case2):is"e"(1to(xp1),left1to(xp1,1px,t47,u3),1out(xp1))
-t64:=isoutne(xp1,inn(1px,u3),trlessis"n"(inn(1px,u3),1px,xp1,1top(1px,u3),t47),1,satz24a(xp1),t63):is"n"(inn(1px,u3),1)
-t65:=tris(nat,pl"n"(1,inn(x,u)),inn(1px,u3),1,isinoutn(1px,pl"n"(1,inn(x,u)),satz19o(inn(x,u),x,1,1top(x,u))),t64):is"n"(pl"n"(1,inn(x,u)),1)
-t66:=<t65>ec3e21(is"n"(pl"n"(1,inn(x,u)),1),more"n"(pl"n"(1,inn(x,u)),1),less"n"(pl"n"(1,inn(x,u)),1),satz10b(pl"n"(1,inn(x,u)),1),satz18(1,inn(x,u))):con
-u@t67:=ore1(more"n"(n4,1),is"n"(n4,1),satz24(n4),[t:is"n"(n4,1)]t66(t)):more"n"(n4,1)
-nm2:=mn"n"(n4,1,t67):nat
-t68:=islessis1"n"(n4,pl"n"(nm2,1),xp1,th1c"n.mn"(n4,1,t67),1top(xp1,u4)):lessis"n"(pl"n"(nm2,1),xp1)
-t69:=th9"l.or"(less"n"(pl"n"(nm2,1),xp1),is"n"(pl"n"(nm2,1),xp1),less"n"(nm2,x),is"n"(nm2,x),t68,[t:less"n"(pl"n"(nm2,1),xp1)]satz20c(nm2,x,1,t),[t:is"n"(pl"n"(nm2,1),xp1)]satz20b(nm2,x,1,t)):lessis"n"(nm2,x)
-w4:=outn(x,nm2,t69):1to(x)
-t70:=isinoutn(x,nm2,t69):is"n"(nm2,inn(x,w4))
-t71:=tr3is(nat,n4,pl"n"(1,nm2),pl"n"(1,inn(x,w4)),inn(1px,u3(w4)),th1a"n.mn"(n4,1,t67),ispl2"n"(nm2,inn(x,w4),1,t70),isinoutn(1px,pl"n"(1,inn(x,w4)),satz19o(inn(x,w4),x,1,1top(x,w4)))):is"n"(n4,inn(1px,u3(w4)))
-t72:=tris(1to(xp1),u4,outn(xp1,n4,1top(xp1,u4)),left1to(xp1,1px,t47,u3(w4)),isoutinn(xp1,u4),isoutni(xp1,n4,1top(xp1,u4),inn(1px,u3(w4)),trlessis"n"(inn(1px,u3(w4)),1px,xp1,1top(1px,u3(w4)),t47),t71)):is"e"(1to(xp1),u4,left1to(xp1,1px,t47,u3(w4)))
-t73:=tris(1to(xp1),left1to(xp1,1px,t47,u3),<u4>s,<u3(w4)>s02,thinvf2(1to(xp1),1to(xp1),s,b,left1to(xp1,1px,t47,u3)),isf(1to(xp1),1to(xp1),s,u4,left1to(xp1,1px,t47,u3(w4)),t72)):is"e"(1to(xp1),left1to(xp1,1px,t47,u3),<u3(w4)>s02)
-t74:=tr3is(nat,pl"n"(1,inn(x,u)),inn(1px,u3),inn(xp1,left1to(xp1,1px,t47,u3)),n3(w4),isinoutn(1px,pl"n"(1,inn(x,u)),satz19o(inn(x,u),x,1,1top(x,u))),isinoutn(xp1,inn(1px,u3),trlessis"n"(inn(1px,u3),1px,xp1,1top(1px,u3),t47)),isinni(xp1,left1to(xp1,1px,t47,u3),<u3(w4)>s02,t73)):is"n"(pl"n"(1,inn(x,u)),n3(w4))
-t75:=th1e"n.mn"(n3(w4),1,inn(x,u),t54(w4),t74):is"n"(inn(x,u),nm1(w4))
-t76:=tris(1to(x),u,outn(x,inn(x,u),1top(x,u)),w3(w4),isoutinn(x,u),isoutni(x,inn(x,u),1top(x,u),nm1(w4),t55(w4),t75)):is"e"(1to(x),u,w3(w4))
-t77:=somei(1to(x),[t:1to(x)]is"e"(1to(x),u,w3(t)),w4,t76):image(1to(x),1to(x),s03,u)
-case2@t78:=andi(injective(1to(x),1to(x),s03),surjective(1to(x),1to(x),s03),[t:1to(x)][u:1to(x)][v:is"e"(1to(x),<t>s03,<u>s03)]t61(t,u,v),[t:1to(x)]t77(t)):bijective(1to(x),1to(x),s03)
-f02:=left(cx,xp1,1px,t47,f):[t:1to(1px)]cx
-f03:=right(cx,1,x,f02):[t:1to(x)]cx
-t79:=<t78><f03><s03>p:prop1(s03,f03)
-g3:=left(cx,xp1,1px,t47,g(xp1,s,f)):[t:1to(1px)]cx
-g4:=right(cx,1,x,g3):[t:1to(x)]cx
-g5:=g(x,s03,f03):[t:1to(x)]cx
-u@t80:=tr3is(nat,n3,pl"n"(1,nm1),pl"n"(1,inn(x,w3)),inn(1px,right1to(1,x,w3)),th1a"n.mn"(n3,1,t54),ispl2"n"(nm1,inn(x,w3),1,isinoutn(x,nm1,t55)),isinoutn(1px,pl"n"(1,inn(x,w3)),satz19o(inn(x,w3),x,1,1top(x,w3)))):is"n"(n3,inn(1px,right1to(1,x,w3)))
-t81:=tris(1to(xp1),<u3>s02,outn(xp1,n3,1top(xp1,<u3>s02)),left1to(xp1,1px,t47,right1to(1,x,w3)),isoutinn(xp1,<u3>s02),isoutni(xp1,n3,1top(xp1,<u3>s02),inn(1px,right1to(1,x,w3)),trlessis"n"(inn(1px,right1to(1,x,w3)),1px,xp1,1top(1px,right1to(1,x,w3)),t47),t80)):is"e"(1to(xp1),<u3>s02,left1to(xp1,1px,t47,right1to(1,x,w3)))
-t82:=isf(1to(xp1),cx,f,<u3>s02,left1to(xp1,1px,t47,right1to(1,x,w3)),t81):is(<u>g4,<u>g5)
-case2@t83:=fisi(1to(x),cx,g4,g5,[t:1to(x)]t82(t)):is"e"([t:1to(x)]cx,g4,g5)
-t85:=isf([t:1to(x)]cx,cx,[u:[t:1to(x)]cx]smpr(x,u),g4,g5,t83):is(smpr(x,g4),smpr(x,g5))
-t86:=tris(cx,smpr(x,g4),smpr(x,g5),smpr(x,f03),t85,t79):is(smpr(x,g4),smpr(x,f03))
-t87:=lessisi1"n"(1,1px,satz18a(1,x)):lessis"n"(1,1px)
-g6:=left(cx,1px,1,t87,g3):[t:1to(1)]cx
-f04:=left(cx,1px,1,t87,f02):[t:1to(1)]cx
-t87a:=isinoutn(1,1,lessisi3(1)):is"n"(1,inn(1,xout(1)))
-1d:=left1to(1px,1,t87,xout(1)):1to(1px)
-t87b:=isinoutn(1px,inn(1,xout(1)),trlessis"n"(inn(1,xout(1)),1,1px,1top(1,xout(1)),t87)):is"n"(inn(1,xout(1)),inn(1px,1d))
-t88:=tris(nat,1,inn(1,xout(1)),inn(1px,1d),t87a,t87b):is"n"(1,inn(1px,1d))
-1e:=left1to(xp1,1px,t47,1d):1to(xp1)
-t88a:=isoutni(xp1,1,satz24a(xp1),inn(1px,1d),trlessis"n"(inn(1px,1d),1px,xp1,1top(1px,1d),t47),t88):is"e"(1to(xp1),1out(xp1),1e)
-t88b:=isf(1to(xp1),1to(xp1),s,1e,1out(xp1),symis(1to(xp1),1out(xp1),1e,t88a)):is"e"(1to(xp1),<1e>s,<1out(xp1)>s)
-t89:=tr3is(1to(xp1),<1e>s,<1out(xp1)>s,1out(xp1),1e,t88b,case2,t88a):is"e"(1to(xp1),<1e>s,1e)
-t89a:=tr3is(cx,smpr(1,g6),<xout(1)>g6,<xout(1)>f04,smpr(1,f04),satz277(g6),isf(1to(xp1),cx,f,<1e>s,1e,t89),symis(cx,smpr(1,f04),<xout(1)>f04,satz277(f04))):is(smpr(1,g6),smpr(1,f04))
-t90:=satz281(1,x,g3):is(smpr(1px,g3),<smpr(x,g4)><smpr(1,g6)>q)
-t91:=isf(cx,cx,<smpr(1,g6)>q,smpr(x,g4),smpr(x,f03),t86):is(<smpr(x,g4)><smpr(1,g6)>q,<smpr(x,f03)><smpr(1,g6)>q)
-t92:=isf(cx,cx,[t:cx]<smpr(x,f03)><t>q,smpr(1,g6),smpr(1,f04),t89a):is(<smpr(x,f03)><smpr(1,g6)>q,<smpr(x,f03)><smpr(1,f04)>q)
-t93:=symis(cx,smpr(1px,f02),<smpr(x,f03)><smpr(1,f04)>q,satz281(1,x,f02)):is(<smpr(x,f03)><smpr(1,f04)>q,smpr(1px,f02))
-t94:=tr4is(cx,smpr(1px,g3),<smpr(x,g4)><smpr(1,g6)>q,<smpr(x,f03)><smpr(1,g6)>q,<smpr(x,f03)><smpr(1,f04)>q,smpr(1px,f02),t90,t91,t92,t93):is(smpr(1px,g3),smpr(1px,f02))
-t95:=issmpr(xp1,f,1px,compl"n"(1,x)):is(smpr(1px,f02),smpr(xp1,f))
-t96:=symis(cx,smpr(1px,g3),smpr(xp1,g(xp1,s,f)),issmpr(xp1,g(xp1,s,f),1px,compl"n"(1,x))):is(smpr(xp1,g(xp1,s,f)),smpr(1px,g3))
-t97:=tr3is(cx,smpr(xp1,g(xp1,s,f)),smpr(1px,g3),smpr(1px,f02),smpr(xp1,f),t96,t94,t95):prop1(xp1,s,f)
-b@[not1:not(is"e"(1to(xp1),<xout(xp1)>s,xout(xp1)))][not2:not(is"e"(1to(xp1),<1out(xp1)>s,1out(xp1)))]
-a0:=<1out(xp1)>s:1to(xp1)
-b0:=<1out(xp1)>invf(1to(xp1),1to(xp1),s,b):1to(xp1)
-t98:=thinvf2(1to(xp1),1to(xp1),s,b,1out(xp1)):is"e"(1to(xp1),1out(xp1),<b0>s)
-t99:=not2:not(is"e"(1to(xp1),a0,1out(xp1)))
-t100:=symnotis(1to(xp1),<1out(xp1)>s,<b0>s,th3"e.notis"(1to(xp1),<1out(xp1)>s,1out(xp1),<b0>s,not2,t98)):not(is"e"(1to(xp1),<b0>s,<1out(xp1)>s))
-t101:=th3"l.imp"(is"e"(1to(xp1),b0,1out(xp1)),is"e"(1to(xp1),<b0>s,<1out(xp1)>s),t100,[t:is"e"(1to(xp1),b0,1out(xp1))]isf(1to(xp1),1to(xp1),s,b0,1out(xp1),t)):not(is"e"(1to(xp1),b0,1out(xp1)))
-s1:=changef(1to(xp1),1to(xp1),s,1out(xp1),b0):[t:1to(xp1)]1to(xp1)
-[u:1to(xp1)][i:is"e"(1to(xp1),u,1out(xp1))]
-t102:=changef1(1to(xp1),1to(xp1),s,1out(xp1),b0,u,i):is"e"(1to(xp1),<u>s1,<b0>s)
-t103:=tris2(1to(xp1),<u>s1,1out(xp1),<b0>s,t102,t98):is"e"(1to(xp1),<u>s1,1out(xp1))
-u@[i:is"e"(1to(xp1),u,b0)]
-t104:=changef2(1to(xp1),1to(xp1),s,1out(xp1),b0,u,i):is"e"(1to(xp1),<u>s1,a0)
-u@[n:not(is"e"(1to(xp1),u,1out(xp1)))][o:not(is"e"(1to(xp1),u,b0))]
-t105:=changef3(1to(xp1),1to(xp1),s,1out(xp1),b0,u,n,o):is"e"(1to(xp1),<u>s1,<u>s)
-not2@t106:=th6"e.wissel"(1to(xp1),1to(xp1),s,1out(xp1),b0,b):bijective(1to(xp1),1to(xp1),s1)
-[alpha:not(is"e"(1to(xp1),a0,xout(xp1)))]
-s2:=wissel(1to(xp1),1out(xp1),a0):[t:1to(xp1)]1to(xp1)
-t107:=th3"e.wissel"(1to(xp1),1out(xp1),a0):bijective(1to(xp1),1to(xp1),s2)
-[u:1to(xp1)][i:is"e"(1to(xp1),u,1out(xp1))]
-t108:=iswissel1(1to(xp1),1out(xp1),a0,<u>s1,t103(u,i)):is"e"(1to(xp1),<<u>s1>s2,a0)
-t109:=tris2(1to(xp1),<u>s,<<u>s1>s2,a0,isf(1to(xp1),1to(xp1),s,u,1out(xp1),i),t108):is"e"(1to(xp1),<u>s,<<u>s1>s2)
-u@[i:is"e"(1to(xp1),u,b0)]
-t110:=iswissel2(1to(xp1),1out(xp1),a0,<u>s1,t104(u,i)):is"e"(1to(xp1),<<u>s1>s2,1out(xp1))
-t111:=tris2(1to(xp1),<u>s,<<u>s1>s2,1out(xp1),tris2(1to(xp1),<u>s,1out(xp1),<b0>s,isf(1to(xp1),1to(xp1),s,u,b0,i),t98),t110):is"e"(1to(xp1),<u>s,<<u>s1>s2)
-u@[n:not(is"e"(1to(xp1),u,1out(xp1)))][o:not(is"e"(1to(xp1),u,b0))][i:is"e"(1to(xp1),<u>s1,1out(xp1))]
-t112:=isfe(1to(xp1),1to(xp1),s1,t8(s1,f,t106),u,1out(xp1),tris2(1to(xp1),<u>s1,<1out(xp1)>s1,1out(xp1),i,t103(1out(xp1),refis(1to(xp1),1out(xp1))))):is"e"(1to(xp1),u,1out(xp1))
-o@t113:=th3"l.imp"(is"e"(1to(xp1),<u>s1,1out(xp1)),is"e"(1to(xp1),u,1out(xp1)),n,[t:is"e"(1to(xp1),<u>s1,1out(xp1))]t112(t)):not(is"e"(1to(xp1),<u>s1,1out(xp1)))
-[i:is"e"(1to(xp1),<u>s1,a0)]
-t114:=isfe(1to(xp1),1to(xp1),s1,t8(s1,f,t106),u,b0,tris2(1to(xp1),<u>s1,<b0>s1,a0,i,t104(b0,refis(1to(xp1),b0)))):is"e"(1to(xp1),u,b0)
-o@t115:=th3"l.imp"(is"e"(1to(xp1),<u>s1,a0),is"e"(1to(xp1),u,b0),o,[t:is"e"(1to(xp1),<u>s1,a0)]t114(t)):not(is"e"(1to(xp1),<u>s1,a0))
-t116:=iswissel3(1to(xp1),1out(xp1),a0,<u>s1,t113,t115):is"e"(1to(xp1),<<u>s1>s2,<u>s1)
-t117:=symis(1to(xp1),<<u>s1>s2,<u>s,tris(1to(xp1),<<u>s1>s2,<u>s1,<u>s,t116,t105(u,n,o))):is"e"(1to(xp1),<u>s,<<u>s1>s2)
-n@t118:=th1"l.imp"(is"e"(1to(xp1),u,b0),is"e"(1to(xp1),<u>s,<<u>s1>s2),[t:is"e"(1to(xp1),u,b0)]t111(t),[t:not(is"e"(1to(xp1),u,b0))]t117(t)):is"e"(1to(xp1),<u>s,<<u>s1>s2)
-u@t119:=th1"l.imp"(is"e"(1to(xp1),u,1out(xp1)),is"e"(1to(xp1),<u>s,<<u>s1>s2),[t:is"e"(1to(xp1),u,1out(xp1))]t109(t),[t:not(is"e"(1to(xp1),u,1out(xp1)))]t118(t)):is"e"(1to(xp1),<u>s,<<u>s1>s2)
-alpha@t120:=fisi(1to(xp1),1to(xp1),s,[t:1to(xp1)]<<t>s1>s2,[t:1to(xp1)]t119(t)):is"e"([t:1to(xp1)]1to(xp1),s,[t:1to(xp1)]<<t>s1>s2)
-not2@t121:=t103(1out(xp1),refis(1to(xp1),1out(xp1))):is"e"(1to(xp1),<1out(xp1)>s1,1out(xp1))
-t121a:=ec3e21(is"n"(xp1,1),more"n"(xp1,1),less"n"(xp1,1),satz10b(xp1,1),ismore1"n"(1px,xp1,1,compl"n"(1,x),satz18(1,x))):nis"n"(xp1,1)
-t122:=th3"l.imp"(is"e"(1to(xp1),xout(xp1),1out(xp1)),is"n"(xp1,1),t121a,[t:is"e"(1to(xp1),xout(xp1),1out(xp1))]isoutne(xp1,xp1,lessisi3(xp1),1,satz24a(xp1),t)):not(is"e"(1to(xp1),xout(xp1),1out(xp1)))
-alpha@t123:=symnotis(1to(xp1),a0,xout(xp1),alpha):not(is"e"(1to(xp1),xout(xp1),a0))
-t124:=iswissel3(1to(xp1),1out(xp1),a0,xout(xp1),t122,t123):is"e"(1to(xp1),<xout(xp1)>s2,xout(xp1))
-t125:=isf([t:1to(xp1)]1to(xp1),cx,[u:[t:1to(xp1)]1to(xp1)]smpr(xp1,g(xp1,u,f)),s,[t:1to(xp1)]<<t>s1>s2,t120):is(smpr(xp1,g(xp1,s,f)),smpr(xp1,g(xp1,s1,g(xp1,s2,f))))
-t126:=t97(s1,g(xp1,s2,f),t106,t121):is(smpr(xp1,g(xp1,s1,g(xp1,s2,f))),smpr(xp1,g(xp1,s2,f)))
-t127:=t46(s2,f,t107,t124):is(smpr(xp1,g(xp1,s2,f)),smpr(xp1,f))
-t128:=tr3is(cx,smpr(xp1,g(xp1,s,f)),smpr(xp1,g(xp1,s1,g(xp1,s2,f))),smpr(xp1,g(xp1,s2,f)),smpr(xp1,f),t125,t126,t127):prop1(xp1,s,f)
-not2@[i3:is"e"(1to(xp1),a0,xout(xp1))][beta:not(is"e"(1to(xp1),b0,xout(xp1)))]
-s3:=wissel(1to(xp1),1out(xp1),b0):[t:1to(xp1)]1to(xp1)
-t129:=th3"e.wissel"(1to(xp1),1out(xp1),b0):bijective(1to(xp1),1to(xp1),s3)
-[u:1to(xp1)][i:is"e"(1to(xp1),u,1out(xp1))]
-t130:=t104(<u>s3,iswissel1(1to(xp1),1out(xp1),b0,u,i)):is"e"(1to(xp1),<<u>s3>s1,a0)
-t131:=tris2(1to(xp1),<u>s,<<u>s3>s1,a0,isf(1to(xp1),1to(xp1),s,u,1out(xp1),i),t130):is"e"(1to(xp1),<u>s,<<u>s3>s1)
-u@[i:is"e"(1to(xp1),u,b0)]
-t132:=t103(<u>s3,iswissel2(1to(xp1),1out(xp1),b0,u,i)):is"e"(1to(xp1),<<u>s3>s1,1out(xp1))
-t133:=tris2(1to(xp1),<u>s,<<u>s3>s1,<b0>s,isf(1to(xp1),1to(xp1),s,u,b0,i),tris(1to(xp1),<<u>s3>s1,1out(xp1),<b0>s,t132,t98)):is"e"(1to(xp1),<u>s,<<u>s3>s1)
-u@[n:not(is"e"(1to(xp1),u,1out(xp1)))][o:not(is"e"(1to(xp1),u,b0))]
-t134:=iswissel3(1to(xp1),1out(xp1),b0,u,n,o):is"e"(1to(xp1),<u>s3,u)
-t135:=isf(1to(xp1),1to(xp1),s1,<u>s3,u,t134):is"e"(1to(xp1),<<u>s3>s1,<u>s1)
-t136:=t105(u,n,o):is"e"(1to(xp1),<u>s1,<u>s)
-t139:=symis(1to(xp1),<<u>s3>s1,<u>s,tris(1to(xp1),<<u>s3>s1,<u>s1,<u>s,t135,t136)):is"e"(1to(xp1),<u>s,<<u>s3>s1)
-n@t140:=th1"l.imp"(is"e"(1to(xp1),u,b0),is"e"(1to(xp1),<u>s,<<u>s3>s1),[t:is"e"(1to(xp1),u,b0)]t133(t),[t:not(is"e"(1to(xp1),u,b0))]t139(t)):is"e"(1to(xp1),<u>s,<<u>s3>s1)
-u@t141:=th1"l.imp"(is"e"(1to(xp1),u,1out(xp1)),is"e"(1to(xp1),<u>s,<<u>s3>s1),[t:is"e"(1to(xp1),u,1out(xp1))]t131(t),[t:not(is"e"(1to(xp1),u,1out(xp1)))]t140(t)):is"e"(1to(xp1),<u>s,<<u>s3>s1)
-beta@t142:=fisi(1to(xp1),1to(xp1),s,[t:1to(xp1)]<<t>s3>s1,[t:1to(xp1)]t141(t)):is"e"([t:1to(xp1)]1to(xp1),s,[t:1to(xp1)]<<t>s3>s1)
-t143:=symnotis(1to(xp1),b0,xout(xp1),beta):not(is"e"(1to(xp1),xout(xp1),b0))
-t144:=iswissel3(1to(xp1),1out(xp1),b0,xout(xp1),t122,t143):is"e"(1to(xp1),<xout(xp1)>s3,xout(xp1))
-t145:=isf([t:1to(xp1)]1to(xp1),cx,[u:[t:1to(xp1)]1to(xp1)]smpr(xp1,g(xp1,u,f)),s,[t:1to(xp1)]<<t>s3>s1,t142):is(smpr(xp1,g(xp1,s,f)),smpr(xp1,g(xp1,s3,g(xp1,s1,f))))
-t146:=t46(s3,g(xp1,s1,f),t129,t144):is(smpr(xp1,g(xp1,s3,g(xp1,s1,f))),smpr(xp1,g(xp1,s1,f)))
-t147:=t97(s1,f,t106,t121):is(smpr(xp1,g(xp1,s1,f)),smpr(xp1,f))
-t148:=tr3is(cx,smpr(xp1,g(xp1,s,f)),smpr(xp1,g(xp1,s3,g(xp1,s1,f))),smpr(xp1,g(xp1,s1,f)),smpr(xp1,f),t145,t146,t147):prop1(xp1,s,f)
-i3@[gamma:is"e"(1to(xp1),b0,xout(xp1))][i:is"n"(x,1)]
-t149:=ispl1"n"(1,x,1,symis(nat,x,1,i)):is"n"(2,xp1)
-t150:=lessisi2"n"(2,xp1,t149):lessis"n"(2,xp1)
-f05:=left(cx,xp1,2,t150,f):[t:1to(2)]cx
-s05:=left(1to(xp1),xp1,2,t150,s):[t:1to(2)]1to(xp1)
-g7:=left(cx,xp1,2,t150,g(xp1,s,f)):[t:1to(2)]cx
-t151:=issmpr(xp1,f,2,t149):is(smpr(2,f05),smpr(xp1,f))
-t152:=issmpr(xp1,g(xp1,s,f),2,t149):is(smpr(2,g7),smpr(xp1,g(xp1,s,f)))
-t153:=satz280(f05):is(smpr(2,f05),<<xout(2)>f05><<1out(2)>f05>q)
-t154:=satz280(g7):is(smpr(2,g7),<<xout(2)>g7><<1out(2)>g7>q)
-t155:=tris1(nat,inn(2,xout(2)),xp1,2,isinoutn(2,2,lessisi3(2)),t149):is"n"(inn(2,xout(2)),xp1)
-t156:=isoutni(xp1,inn(2,xout(2)),trlessis"n"(inn(2,xout(2)),2,xp1,1top(2,xout(2)),t150),xp1,lessisi3(xp1),t155):is"e"(1to(xp1),left1to(xp1,2,t150,xout(2)),xout(xp1))
-t157:=isf(1to(xp1),1to(xp1),s,left1to(xp1,2,t150,xout(2)),xout(xp1),t156):is"e"(1to(xp1),<xout(2)>s05,<xout(xp1)>s)
-t158:=symis(nat,1,inn(2,1out(2)),isinoutn(2,1,satz24a(2))):is"n"(inn(2,1out(2)),1)
-t159:=isoutni(xp1,inn(2,1out(2)),trlessis"n"(inn(2,1out(2)),2,xp1,1top(2,1out(2)),t150),1,satz24a(xp1),t158):is"e"(1to(xp1),left1to(xp1,2,t150,1out(2)),1out(xp1))
-t160:=tr3is(1to(xp1),left1to(xp1,2,t150,1out(2)),1out(xp1),<b0>s,<xout(xp1)>s,t159,t98,isf(1to(xp1),1to(xp1),s,b0,xout(xp1),gamma)):is"e"(1to(xp1),left1to(xp1,2,t150,1out(2)),<xout(xp1)>s)
-t161:=tris2(1to(xp1),<xout(2)>s05,left1to(xp1,2,t150,1out(2)),<xout(xp1)>s,t157,t160):is"e"(1to(xp1),<xout(2)>s05,left1to(xp1,2,t150,1out(2)))
-t163:=isf(1to(xp1),1to(xp1),s,left1to(xp1,2,t150,1out(2)),1out(xp1),t159):is"e"(1to(xp1),<1out(2)>s05,<1out(xp1)>s)
-t164:=tris(1to(xp1),<1out(2)>s05,<1out(xp1)>s,xout(xp1),t163,i3):is"e"(1to(xp1),<1out(2)>s05,xout(xp1))
-t165:=tris2(1to(xp1),<1out(2)>s05,left1to(xp1,2,t150,xout(2)),xout(xp1),t164,t156):is"e"(1to(xp1),<1out(2)>s05,left1to(xp1,2,t150,xout(2)))
-t166:=isf(1to(xp1),cx,f,<xout(2)>s05,left1to(xp1,2,t150,1out(2)),t161):is(<xout(2)>g7,<1out(2)>f05)
-t167:=isf(1to(xp1),cx,f,<1out(2)>s05,left1to(xp1,2,t150,xout(2)),t165):is(<1out(2)>g7,<xout(2)>f05)
-t168:=isf(cx,cx,<<1out(2)>g7>q,<xout(2)>g7,<1out(2)>f05,t166):is(<<xout(2)>g7><<1out(2)>g7>q,<<1out(2)>f05><<1out(2)>g7>q)
-t169:=comq(c,<1out(2)>g7,<1out(2)>f05):is(<<1out(2)>f05><<1out(2)>g7>q,<<1out(2)>g7><<1out(2)>f05>q)
-t170:=isf(cx,cx,<<1out(2)>f05>q,<1out(2)>g7,<xout(2)>f05,t167):is(<<1out(2)>g7><<1out(2)>f05>q,<<xout(2)>f05><<1out(2)>f05>q)
-t171:=tr4is(cx,smpr(xp1,g(xp1,s,f)),smpr(2,g7),<<xout(2)>g7><<1out(2)>g7>q,<<1out(2)>f05><<1out(2)>g7>q,<<1out(2)>g7><<1out(2)>f05>q,symis(cx,smpr(2,g7),smpr(xp1,g(xp1,s,f)),t152),t154,t168,t169):is(smpr(xp1,g(xp1,s,f)),<<1out(2)>g7><<1out(2)>f05>q)
-t172:=tr4is(cx,smpr(xp1,g(xp1,s,f)),<<1out(2)>g7><<1out(2)>f05>q,<<xout(2)>f05><<1out(2)>f05>q,smpr(2,f05),smpr(xp1,f),t171,t170,symis(cx,smpr(2,f05),<<xout(2)>f05><<1out(2)>f05>q,t153),t151):prop1(xp1,s,f)
-trivial:=t172:prop1(xp1,s,f)
-gamma@[n:nis"n"(x,1)]
-t173:=ore1(more"n"(x,1),is"n"(x,1),satz24(x),n):more"n"(x,1)
-xm1:=mn"n"(x,1,t173):nat
-s4:=changef(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1)):[t:1to(xp1)]1to(xp1)
-t174:=th6"e.wissel"(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1),b):bijective(1to(xp1),1to(xp1),s4)
-t175:=changef2(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1),xout(xp1),refis(1to(xp1),xout(xp1))):is"e"(1to(xp1),<xout(xp1)>s4,<1out(xp1)>s)
-t176:=symis(1to(xp1),a0,xout(xp1),i3):is"e"(1to(xp1),xout(xp1),<1out(xp1)>s)
-t177:=tris2(1to(xp1),<xout(xp1)>s4,xout(xp1),<1out(xp1)>s,t175,t176):is"e"(1to(xp1),<xout(xp1)>s4,xout(xp1))
-t178:=lessisi1"n"(x,xp1,satz18a(x,1)):lessis"n"(x,xp1)
-g8:=left(cx,xp1,x,t178,g(xp1,s,f)):[t:1to(x)]cx
-t179:=satz278(x,g(xp1,s,f)):is(smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s,f)><smpr(x,g8)>q)
-t180:=th1b"n.mn"(x,1,t173):is"n"(pl"n"(1,xm1),x)
-t181:=lessisi2"n"(pl"n"(1,xm1),x,t180):lessis"n"(pl"n"(1,xm1),x)
-g9:=left(cx,x,pl"n"(1,xm1),t181,g8):[t:1to(pl"n"(1,xm1))]cx
-t182:=symis(cx,smpr(pl"n"(1,xm1),g9),smpr(x,g8),issmpr(x,g8,pl"n"(1,xm1),t180)):is(smpr(x,g8),smpr(pl"n"(1,xm1),g9))
-g10:=right(cx,1,xm1,g9):[t:1to(xm1)]cx
-t183:=lessisi1"n"(1,pl"n"(1,xm1),satz18a(1,xm1)):lessis"n"(1,pl"n"(1,xm1))
-g11:=left(cx,pl"n"(1,xm1),1,t183,g9):[t:1to(1)]cx
-t184:=satz281(a,1,xm1,g9):is(smpr(pl"n"(1,xm1),g9),<smpr(xm1,g10)><smpr(1,g11)>q)
-t185:=satz277(g11):is(smpr(1,g11),<xout(1)>g11)
-t186:=isinoutn(1,1,lessisi3(1)):is"n"(1,inn(1,xout(1)))
-1a:=left1to(pl"n"(1,xm1),1,t183,xout(1)):1to(pl"n"(1,xm1))
-t187:=isinoutn(pl"n"(1,xm1),inn(1,xout(1)),trlessis"n"(inn(1,xout(1)),1,pl"n"(1,xm1),1top(1,xout(1)),t183)):is"n"(inn(1,xout(1)),inn(pl"n"(1,xm1),1a))
-1b:=left1to(x,pl"n"(1,xm1),t181,1a):1to(x)
-t188:=isinoutn(x,inn(pl"n"(1,xm1),1a),trlessis"n"(inn(pl"n"(1,xm1),1a),pl"n"(1,xm1),x,1top(pl"n"(1,xm1),1a),t181)):is"n"(inn(pl"n"(1,xm1),1a),inn(x,1b))
-t189:=tr3is(nat,1,inn(1,xout(1)),inn(pl"n"(1,xm1),1a),inn(x,1b),t186,t187,t188):is"n"(1,inn(x,1b))
-1c:=left1to(xp1,x,t178,1b):1to(xp1)
-t190:=isoutni(xp1,1,satz24a(xp1),inn(x,1b),trlessis"n"(inn(x,1b),x,xp1,1top(x,1b),t178),t189):is"e"(1to(xp1),1out(xp1),1c)
-t191:=isf(1to(xp1),cx,g(xp1,s,f),1out(xp1),1c,t190):is(<1out(xp1)>g(xp1,s,f),<xout(1)>g11)
-t192:=tris2(cx,smpr(1,g11),<1out(xp1)>g(xp1,s,f),<xout(1)>g11,t185,t191):is(smpr(1,g11),<1out(xp1)>g(xp1,s,f))
-t193:=symis(1to(xp1),<xout(xp1)>s4,<1out(xp1)>s,t175):is"e"(1to(xp1),<1out(xp1)>s,<xout(xp1)>s4)
-t194:=isf(1to(xp1),cx,f,<1out(xp1)>s,<xout(xp1)>s4,t193):is(<1out(xp1)>g(xp1,s,f),<xout(xp1)>g(xp1,s4,f))
-t195:=tris(cx,smpr(1,g11),<1out(xp1)>g(xp1,s,f),<xout(xp1)>g(xp1,s4,f),t192,t194):is(smpr(1,g11),<xout(xp1)>g(xp1,s4,f))
-t196:=isf(cx,cx,[t:cx]<smpr(xm1,g10)><t>q,smpr(1,g11),<xout(xp1)>g(xp1,s4,f),t195):is(<smpr(xm1,g10)><smpr(1,g11)>q,<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q)
-t197:=tr3is(cx,smpr(x,g8),smpr(pl"n"(1,xm1),g9),<smpr(xm1,g10)><smpr(1,g11)>q,<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q,t182,t184,t196):is(smpr(x,g8),<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q)
-t198:=isf(cx,cx,[t:cx]<<xout(xp1)>g(xp1,s,f)><t>q,smpr(x,g8),<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q,t197):is(<<xout(xp1)>g(xp1,s,f)><smpr(x,g8)>q,<<xout(xp1)>g(xp1,s,f)><<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q>q)
-t199:=assq1(a,<xout(xp1)>g(xp1,s4,f),smpr(xm1,g10),<xout(xp1)>g(xp1,s,f)):is(<<xout(xp1)>g(xp1,s,f)><<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q>q,<<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q><<xout(xp1)>g(xp1,s4,f)>q)
-t200:=comq(c,<xout(xp1)>g(xp1,s4,f),<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q):is(<<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q><<xout(xp1)>g(xp1,s4,f)>q,<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q)
-g12:=left(cx,xp1,x,t178,g(xp1,s4,f)):[t:1to(x)]cx
-g13:=left(cx,x,pl"n"(1,xm1),t181,g12):[t:1to(pl"n"(1,xm1))]cx
-g14:=right(cx,1,xm1,g13):[t:1to(xm1)]cx
-g15:=left(cx,pl"n"(1,xm1),1,lessisi1"n"(1,pl"n"(1,xm1),satz18a(1,xm1)),g13):[t:1to(1)]cx
-t201:=satz278(x,g(xp1,s4,f)):is(smpr(xp1,g(xp1,s4,f)),<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q)
-t202:=symis(cx,smpr(pl"n"(1,xm1),g13),smpr(x,g12),issmpr(x,g12,pl"n"(1,xm1),t180)):is(smpr(x,g12),smpr(pl"n"(1,xm1),g13))
-t203:=satz281(a,1,xm1,g13):is(smpr(pl"n"(1,xm1),g13),<smpr(xm1,g14)><smpr(1,g15)>q)
-t204:=satz277(g15):is(smpr(1,g15),<xout(1)>g15)
-t205:=isf(1to(xp1),cx,g(xp1,s4,f),1out(xp1),1c,t190):is(<1out(xp1)>g(xp1,s4,f),<xout(1)>g15)
-t206:=tris2(cx,smpr(1,g15),<1out(xp1)>g(xp1,s4,f),<xout(1)>g15,t204,t205):is(smpr(1,g15),<1out(xp1)>g(xp1,s4,f))
-t207:=changef1(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1),1out(xp1),refis(1to(xp1),1out(xp1))):is"e"(1to(xp1),<1out(xp1)>s4,<xout(xp1)>s)
-t208:=isf(1to(xp1),cx,f,<1out(xp1)>s4,<xout(xp1)>s,t207):is(<1out(xp1)>g(xp1,s4,f),<xout(xp1)>g(xp1,s,f))
-t209:=tris(cx,smpr(1,g15),<1out(xp1)>g(xp1,s4,f),<xout(xp1)>g(xp1,s,f),t206,t208):is(smpr(1,g15),<xout(xp1)>g(xp1,s,f))
-t210:=isf(cx,cx,[t:cx]<smpr(xm1,g14)><t>q,smpr(1,g15),<xout(xp1)>g(xp1,s,f),t209):is(<smpr(xm1,g14)><smpr(1,g15)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q)
-t211:=tr3is(cx,smpr(x,g12),smpr(pl"n"(1,xm1),g13),<smpr(xm1,g14)><smpr(1,g15)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q,t202,t203,t210):is(smpr(x,g12),<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q)
-[u:1to(xm1)]
-ua:=right1to(1,xm1,u):1to(pl"n"(1,xm1))
-ub:=left1to(x,pl"n"(1,xm1),t181,ua):1to(x)
-uc:=left1to(xp1,x,t178,ub):1to(xp1)
-[i:is"e"(1to(xp1),uc,xout(xp1))]
-t212:=isoutne(xp1,inn(x,ub),trlessis"n"(inn(x,ub),x,xp1,1top(x,ub),t178),xp1,lessisi3(xp1),i):is"n"(inn(x,ub),xp1)
-t213:=satz16a(inn(x,ub),x,xp1,1top(x,ub),satz18a(x,1)):less"n"(inn(x,ub),xp1)
-t214:=<t212>ec3e31(is"n"(inn(x,ub),xp1),more"n"(inn(x,ub),xp1),less"n"(inn(x,ub),xp1),satz10b(inn(x,ub),xp1),t213):con
-u@t215:=[t:is"e"(1to(xp1),uc,xout(xp1))]t214(t):not(is"e"(1to(xp1),uc,xout(xp1)))
-[i:is"e"(1to(xp1),uc,1out(xp1))]
-t216:=isoutne(xp1,inn(x,ub),trlessis"n"(inn(x,ub),x,xp1,1top(x,ub),t178),1,satz24a(xp1),i):is"n"(inn(x,ub),1)
-t217:=isinoutn(x,inn(pl"n"(1,xm1),ua),trlessis"n"(inn(pl"n"(1,xm1),ua),pl"n"(1,xm1),x,1top(pl"n"(1,xm1),ua),t181)):is"n"(inn(pl"n"(1,xm1),ua),inn(x,ub))
-t218:=isinoutn(pl"n"(1,xm1),pl"n"(1,inn(xm1,u)),satz19o(inn(xm1,u),xm1,1,1top(xm1,u))):is"n"(pl"n"(1,inn(xm1,u)),inn(pl"n"(1,xm1),ua))
-t219:=tr3is(nat,pl"n"(1,inn(xm1,u)),inn(pl"n"(1,xm1),ua),inn(x,ub),1,t218,t217,t216):is"n"(pl"n"(1,inn(xm1,u)),1)
-t220:=satz18(1,inn(xm1,u)):more"n"(pl"n"(1,inn(xm1,u)),1)
-t221:=<t219>ec3e21(is"n"(pl"n"(1,inn(xm1,u)),1),more"n"(pl"n"(1,inn(xm1,u)),1),less"n"(pl"n"(1,inn(xm1,u)),1),satz10b(pl"n"(1,inn(xm1,u)),1),t220):con
-u@t222:=[t:is"e"(1to(xp1),uc,1out(xp1))]t221(t):not(is"e"(1to(xp1),uc,1out(xp1)))
-t223:=changef3(1to(xp1),1to(xp1),s,1out(xp1),xout(xp1),uc,t222,t215):is"e"(1to(xp1),<uc>s4,<uc>s)
-t224:=isf(1to(xp1),cx,f,<uc>s4,<uc>s,t223):is(<u>g14,<u>g10)
-n@t225:=fisi(1to(xm1),cx,g10,g14,[t:1to(xm1)]symis(cx,<t>g14,<t>g10,t224(t))):is"e"([t:1to(xm1)]cx,g10,g14)
-t226:=isf([t:1to(xm1)]cx,cx,[u:[t:1to(xm1)]cx]smpr(xm1,u),g10,g14,t225):is(smpr(xm1,g10),smpr(xm1,g14))
-t227:=comq(c,smpr(xm1,g10),<xout(xp1)>g(xp1,s,f)):is(<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,<smpr(xm1,g10)><<xout(xp1)>g(xp1,s,f)>q)
-t228:=isf(cx,cx,<<xout(xp1)>g(xp1,s,f)>q,smpr(xm1,g10),smpr(xm1,g14),t226):is(<smpr(xm1,g10)><<xout(xp1)>g(xp1,s,f)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q)
-t229:=tris(cx,<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,<smpr(xm1,g10)><<xout(xp1)>g(xp1,s,f)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q,t227,t228):is(<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q)
-t230:=tris2(cx,<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,smpr(x,g12),<smpr(xm1,g14)><<xout(xp1)>g(xp1,s,f)>q,t229,t211):is(<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,smpr(x,g12))
-t231:=isf(cx,cx,[t:cx]<<xout(xp1)>g(xp1,s4,f)><t>q,<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q,smpr(x,g12),t230):is(<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q,<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q)
-t232:=symis(cx,smpr(xp1,g(xp1,s4,f)),<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q,t201):is(<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q,smpr(xp1,g(xp1,s4,f)))
-t233:=t46(s4,f,t174,t177):is(smpr(xp1,g(xp1,s4,f)),smpr(xp1,f))
-t234:=tr4is(cx,smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s,f)><smpr(x,g8)>q,<<xout(xp1)>g(xp1,s,f)><<smpr(xm1,g10)><<xout(xp1)>g(xp1,s4,f)>q>q,<<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q><<xout(xp1)>g(xp1,s4,f)>q,<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q,t179,t198,t199,t200):is(smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q)
-t235:=tr4is(cx,smpr(xp1,g(xp1,s,f)),<<xout(xp1)>g(xp1,s4,f)><<<xout(xp1)>g(xp1,s,f)><smpr(xm1,g10)>q>q,<<xout(xp1)>g(xp1,s4,f)><smpr(x,g12)>q,smpr(xp1,g(xp1,s4,f)),smpr(xp1,f),t234,t231,t232,t233):prop1(xp1,s,f)
-gamma@t236:=th1"l.imp"(is"n"(x,1),prop1(xp1,s,f),[t:is"n"(x,1)]t172(t),[t:not(is"n"(x,1))]t235(t)):prop1(xp1,s,f)
-i3@t237:=th1"l.imp"(is"e"(1to(xp1),b0,xout(xp1)),prop1(xp1,s,f),[t:is"e"(1to(xp1),b0,xout(xp1))]t236(t),[t:not(is"e"(1to(xp1),b0,xout(xp1)))]t148(t)):prop1(xp1,s,f)
-not2@t238:=th1"l.imp"(is"e"(1to(xp1),a0,xout(xp1)),prop1(xp1,s,f),[t:is"e"(1to(xp1),a0,xout(xp1))]t237(t),[t:not(is"e"(1to(xp1),a0,xout(xp1)))]t128(t)):prop1(xp1,s,f)
-not1@t239:=th1"l.imp"(is"e"(1to(xp1),<1out(xp1)>s,1out(xp1)),prop1(xp1,s,f),[t:is"e"(1to(xp1),<1out(xp1)>s,1out(xp1))]t97(t),[t:not(is"e"(1to(xp1),<1out(xp1)>s,1out(xp1)))]t238(t)):prop1(xp1,s,f)
-b@t240:=th1"l.imp"(is"e"(1to(xp1),<xout(xp1)>s,xout(xp1)),prop1(xp1,s,f),[t:is"e"(1to(xp1),<xout(xp1)>s,xout(xp1))]t46(t),[t:not(is"e"(1to(xp1),<xout(xp1)>s,xout(xp1)))]t239(t)):prop1(xp1,s,f)
-p@t241:=[u:[t:1to(xp1)]1to(xp1)][v:[t:1to(xp1)]cx][w:bijective(1to(xp1),1to(xp1),u)]t240(u,v,w):prop2(xp1)
-t242:=isp(nat,[t:nat]prop2(t),xp1,<x>suc,t241,satz4a(x)):prop2(<x>suc)
-x@t243:=induction([t:nat]prop2(t),t6,[t:nat][u:prop2(t)]t242(t,u),x):prop2(x)
--8283
-satz283:=<b><f><s>t243".8283":is(smpr(x,[t:1to(x)]<<t>s>f),smpr(x,f))
-@[x:real][ix:intrl(x)][y:real][iy:intrl(y)][ly:lessis(y,x)]
-shiftl:=shiftl"r"(x,ix,y,iy,ly):nat
-[n:1to(shiftl)]
-shiftr:=shiftr"r"(x,ix,y,iy,ly,n):real
-intshiftr:=intshiftr"r"(x,ix,y,iy,ly,n):intrl(shiftr)
-shiftrls:=shiftrls"r"(x,ix,y,iy,ly,n):lessis(shiftr,x)
-lsshiftr:=lsshiftr"r"(x,ix,y,iy,ly,n):lessis(y,shiftr)
-[m:1to(shiftl)][i:is"r"(shiftr(n),shiftr(m))]
-iseshiftr:=iseshiftr"r"(x,ix,y,iy,ly,n,m,i):is"e"(1to(shiftl),n,m)
-ly@[u:real][a:and3(intrl(u),lessis(y,u),lessis(u,x))]
-shiftl1:=shiftl1"r"(x,ix,y,iy,ly,u,a):1to(shiftl)
-shiftinv1:=shiftinv1"r"(x,ix,y,iy,ly,u,a):is"r"(u,shiftr(shiftl1))
-shiftinv2:=shiftinv2"r"(x,ix,y,iy,ly,u,a):is"r"(shiftr(shiftl1),u)
-ly@[f:seq(x,ix,y,iy,ly,cx)]
-shiftf:=shiftf(x,ix,y,iy,ly,cx,f):[t:1to(shiftl)]cx
-[q:[t:cx][u:cx]cx]
-smpri:=smpr(q,shiftl,shiftf):cx
-f@[pi:proofsirrelevant(x,ix,y,iy,ly,cx,f)][q:[t:cx][u:cx]cx][a:assoc(q)][u:real][iu:intrl(u)][l:lessis(y,u)][k:less(u,x)][v:real][iv:intrl(v)][lv:lessis(y,v)][kv:lessis(v,u)]
-+8284
-t1:=lessisi1(v,x,satz172a(v,u,x,kv,k)):lessis(v,x)
--8284
-k@lft:=[t:real][v:intrl(t)][lt:lessis(y,t)][kt:lessis(t,u)]<t1".8284"(t,v,lt,kt)><lt><v><t>f:[t:real][v:intrl(t)][lt:lessis(y,t)][kt:lessis(t,u)]cx
-iv@[lv:lessis(pl"r"(u,1rl),v)][kv:lessis(v,x)]
-+*8284
-x@[y:real]
-pl:=pl"r"(x,y):real
-mn:=mn"r"(x,y):real
-x@p1:=pl"r"(x,1rl):real
-kv@t2:=satz190c(u,u,0,1rl,lessisi2(u,u,refis(real,u)),lemma1"r"(1rl,0,satz169a(1rl,natpos(1rl,natrl1)))):less(pl(u,0),p1(u))
-t3:=isless1(pl(u,0),u,p1(u),pl02"r"(u,0,refis(real,0)),t2):less(u,p1(u))
-t4:=lessisi1(y,v,satz172b(y,p1(u),v,satz172a(y,u,p1(u),l,t3),lv)):lessis(y,v)
--8284
-k@rgt:=[t:real][v:intrl(t)][lt:lessis(pl"r"(u,1rl),t)][kt:lessis(t,x)]<kt><t4".8284"(t,v,lt,kt)><v><t>f:[t:real][v:intrl(t)][lt:lessis(pl"r"(u,1rl),t)][kt:lessis(t,x)]cx
-+*8284
-k@t5:=intpl(u,iu,1rl,intrl1):intrl(p1(u))
-t6:=satzr25(u,iu,x,ix,k):lessis(p1(u),x)
-t7:=tr3is(real,pl(mn(p1(u),y),mn(p1(x),p1(u))),pl(mn(p1(x),p1(u)),mn(p1(u),y)),mn(pl(mn(p1(x),p1(u)),p1(u)),y),mn(p1(x),y),compl"r"(mn(p1(u),y),mn(p1(x),p1(u))),asspl2"r"(mn(p1(x),p1(u)),p1(u),m0"r"(y)),ismn1"r"(pl(mn(p1(x),p1(u)),p1(u)),p1(x),y,plmn(p1(x),p1(u)))):is"r"(pl(mn(p1(u),y),mn(p1(x),p1(u))),mn(p1(x),y))
-sxy:=shiftl(x,ix,y,iy,ly):nat
-suy:=shiftl(u,iu,y,iy,l):nat
-sxu:=shiftl(x,ix,p1(u),t5,t6):nat
-t8:=tr4is(real,rlofnt(pl"n"(suy,sxu)),pl(rlofnt(suy),rlofnt(sxu)),pl(mn(p1(u),y),mn(p1(x),p1(u))),mn(p1(x),y),rlofnt(sxy),satzr155a(suy,sxu),ispl12"r"(rlofnt(suy),mn(p1(u),y),rlofnt(sxu),mn(p1(x),p1(u)),isrlnt2(mn(p1(u),y),t6"r.shift"(u,iu,y,iy,l)),isrlnt2(mn(p1(x),p1(u)),t6"r.shift"(x,ix,p1(u),t5,t6))),t7,isrlnt1(mn(p1(x),y),t6"r.shift"(x,ix,y,iy,ly))):is"r"(rlofnt(pl"n"(suy,sxu)),rlofnt(sxy))
-t9:=isntirl(pl"n"(suy,sxu),sxy,t8):is"n"(pl"n"(suy,sxu),sxy)
-t10:=lessisi2"n"(pl"n"(suy,sxu),sxy,t9):lessis"n"(pl"n"(suy,sxu),sxy)
-f1:=left(cx,sxy,pl"n"(suy,sxu),t10,shiftf(x,ix,y,iy,ly,f)):[t:1to(pl"n"(suy,sxu))]cx
-t11:=issmpr(q,sxy,shiftf(x,ix,y,iy,ly,f),pl"n"(suy,sxu),t9):is(smpr(q,pl"n"(suy,sxu),f1),smpri(x,ix,y,iy,ly,f,q))
-fr:=right(cx,suy,sxu,f1):[t:1to(sxu)]cx
-t12:=lessisi1"n"(suy,pl"n"(suy,sxu),satz18a(suy,sxu)):lessis"n"(suy,pl"n"(suy,sxu))
-fl:=left(cx,pl"n"(suy,sxu),suy,t12,f1):[t:1to(suy)]cx
-t12a:=satz281(q,a,suy,sxu,f1):is(smpr(q,pl"n"(suy,sxu),f1),<smpr(q,sxu,fr)><smpr(q,suy,fl)>q)
-[n:1to(sxu)]
-t13:=isinoutn(pl"n"(suy,sxu),pl"n"(suy,inn(sxu,n)),satz19o(inn(sxu,n),sxu,suy,1top(sxu,n))):is"n"(pl"n"(suy,inn(sxu,n)),inn(pl"n"(suy,sxu),right1to(suy,sxu,n)))
-t14:=isinoutn(sxy,inn(pl"n"(suy,sxu),right1to(suy,sxu,n)),trlessis"n"(inn(pl"n"(suy,sxu),right1to(suy,sxu,n)),pl"n"(suy,sxu),sxy,1top(pl"n"(suy,sxu),right1to(suy,sxu,n)),t10)):is"n"(inn(pl"n"(suy,sxu),right1to(suy,sxu,n)),inn(sxy,left1to(sxy,pl"n"(suy,sxu),t10,right1to(suy,sxu,n))))
-n1:=left1to(sxy,pl"n"(suy,sxu),t10,right1to(suy,sxu,n)):1to(sxy)
-t15:=tris(nat,pl"n"(suy,inn(sxu,n)),inn(pl"n"(suy,sxu),right1to(suy,sxu,n)),inn(sxy,n1),t13,t14):is"n"(pl"n"(suy,inn(sxu,n)),inn(sxy,n1))
-t16:=isnterl(pl"n"(suy,inn(sxu,n)),inn(sxy,n1),t15):is"r"(rlofnt(pl"n"(suy,inn(sxu,n))),rlofnt(inn(sxy,n1)))
-t17:=satzr155b(suy,inn(sxu,n)):is"r"(pl(rlofnt(suy),rlofnt(inn(sxu,n))),rlofnt(pl"n"(suy,inn(sxu,n))))
-t18:=ispl1"r"(mn(p1(u),y),rlofnt(suy),rlofnt(inn(sxu,n)),isrlnt1(mn(p1(u),y),t6"r.shift"(u,iu,y,iy,l))):is"r"(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),pl(rlofnt(suy),rlofnt(inn(sxu,n))))
-t19:=tr3is(real,pl(mn(p1(u),y),rlofnt(inn(sxu,n))),pl(rlofnt(suy),rlofnt(inn(sxu,n))),rlofnt(pl"n"(suy,inn(sxu,n))),rlofnt(inn(sxy,n1)),t18,t17,t16):is"r"(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),rlofnt(inn(sxy,n1)))
-t20:=ispl1"r"(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),rlofnt(inn(sxy,n1)),y,t19):is"r"(pl(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),y),pl(rlofnt(inn(sxy,n1)),y))
-t21:=tr3is(real,pl(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),y),pl(pl(rlofnt(inn(sxu,n)),mn(p1(u),y)),y),pl(rlofnt(inn(sxu,n)),pl(mn(p1(u),y),y)),pl(rlofnt(inn(sxu,n)),p1(u)),ispl1"r"(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),pl(rlofnt(inn(sxu,n)),mn(p1(u),y)),y,compl"r"(mn(p1(u),y),rlofnt(inn(sxu,n)))),asspl1"r"(rlofnt(inn(sxu,n)),mn(p1(u),y),y),ispl2"r"(pl(mn(p1(u),y),y),p1(u),rlofnt(inn(sxu,n)),plmn(p1(u),y))):is"r"(pl(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),y),pl(rlofnt(inn(sxu,n)),p1(u)))
-t22:=tris1(real,pl(rlofnt(inn(sxy,n1)),y),pl(rlofnt(inn(sxu,n)),p1(u)),pl(pl(mn(p1(u),y),rlofnt(inn(sxu,n))),y),t20,t21):is"r"(pl(rlofnt(inn(sxy,n1)),y),pl(rlofnt(inn(sxu,n)),p1(u)))
-t23:=ismn1"r"(pl(rlofnt(inn(sxy,n1)),y),pl(rlofnt(inn(sxu,n)),p1(u)),1rl,t22):is"r"(shiftr(x,ix,y,iy,ly,n1),shiftr(x,ix,p1(u),t5,t6,n))
-t24:=intshiftr(x,ix,y,iy,ly,n1):intrl(shiftr(x,ix,y,iy,ly,n1))
-t25:=lsshiftr(x,ix,y,iy,ly,n1):lessis(y,shiftr(x,ix,y,iy,ly,n1))
-t26:=shiftrls(x,ix,y,iy,ly,n1):lessis(shiftr(x,ix,y,iy,ly,n1),x)
-t27:=intshiftr(x,ix,p1(u),t5,t6,n):intrl(shiftr(x,ix,p1(u),t5,t6,n))
-t28:=lsshiftr(x,ix,p1(u),t5,t6,n):lessis(p1(u),shiftr(x,ix,p1(u),t5,t6,n))
-t29:=shiftrls(x,ix,p1(u),t5,t6,n):lessis(shiftr(x,ix,p1(u),t5,t6,n),x)
-t30:=t4(shiftr(x,ix,p1(u),t5,t6,n),t27,t28,t29):lessis(y,shiftr(x,ix,p1(u),t5,t6,n))
-t31:=<t23><t29><t30><t27><shiftr(x,ix,p1(u),t5,t6,n)><t26><t25><t24><shiftr(x,ix,y,iy,ly,n1)>pi:is(<n>fr,<n>shiftf(x,ix,p1(u),t5,t6,rgt))
-k@t32:=fisi(1to(sxu),cx,fr,shiftf(x,ix,p1(u),t5,t6,rgt),[t:1to(sxu)]t31(t)):is"e"([t:1to(sxu)]cx,fr,shiftf(x,ix,p1(u),t5,t6,rgt))
-t33:=isf([t:1to(sxu)]cx,cx,[v:[t:1to(sxu)]cx]smpr(q,sxu,v),fr,shiftf(x,ix,p1(u),t5,t6,rgt),t32):is(smpr(q,sxu,fr),smpri(x,ix,p1(u),t5,t6,rgt,q))
-t34:=isf(cx,cx,<smpr(q,suy,fl)>q,smpr(q,sxu,fr),smpri(x,ix,p1(u),t5,t6,rgt,q),t33):is(<smpr(q,sxu,fr)><smpr(q,suy,fl)>q,<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpr(q,suy,fl)>q)
-[n:1to(suy)]
-t35:=isinoutn(pl"n"(suy,sxu),inn(suy,n),trlessis"n"(inn(suy,n),suy,pl"n"(suy,sxu),1top(suy,n),t12)):is"n"(inn(suy,n),inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)))
-t36:=isinoutn(sxy,inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),trlessis"n"(inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),pl"n"(suy,sxu),sxy,1top(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),t10)):is"n"(inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),inn(sxy,left1to(sxy,pl"n"(suy,sxu),t10,left1to(pl"n"(suy,sxu),suy,t12,n))))
-n2:=left1to(sxy,pl"n"(suy,sxu),t10,left1to(pl"n"(suy,sxu),suy,t12,n)):1to(sxy)
-t37:=tris(nat,inn(suy,n),inn(pl"n"(suy,sxu),left1to(pl"n"(suy,sxu),suy,t12,n)),inn(sxy,n2),t35,t36):is"n"(inn(suy,n),inn(sxy,n2))
-t38:=isnterl(inn(suy,n),inn(sxy,n2),t37):is"r"(rlofnt(inn(suy,n)),rlofnt(inn(sxy,n2)))
-t39:=ispl1"r"(rlofnt(inn(suy,n)),rlofnt(inn(sxy,n2)),y,t38):is"r"(pl(rlofnt(inn(suy,n)),y),pl(rlofnt(inn(sxy,n2)),y))
-t40:=ismn1"r"(pl(rlofnt(inn(suy,n)),y),pl(rlofnt(inn(sxy,n2)),y),1rl,t39):is"r"(shiftr(u,iu,y,iy,l,n),shiftr(x,ix,y,iy,ly,n2))
-t41:=intshiftr(u,iu,y,iy,l,n):intrl(shiftr(u,iu,y,iy,l,n))
-t42:=lsshiftr(u,iu,y,iy,l,n):lessis(y,shiftr(u,iu,y,iy,l,n))
-t43:=shiftrls(u,iu,y,iy,l,n):lessis(shiftr(u,iu,y,iy,l,n),u)
-t44:=t1(shiftr(u,iu,y,iy,l,n),t41,t42,t43):lessis(shiftr(u,iu,y,iy,l,n),x)
-t45:=intshiftr(x,ix,y,iy,ly,n2):intrl(shiftr(x,ix,y,iy,ly,n2))
-t46:=lsshiftr(x,ix,y,iy,ly,n2):lessis(y,shiftr(x,ix,y,iy,ly,n2))
-t47:=shiftrls(x,ix,y,iy,ly,n2):lessis(shiftr(x,ix,y,iy,ly,n2),x)
-t48:=<t40><t47><t46><t45><shiftr(x,ix,y,iy,ly,n2)><t44><t42><t41><shiftr(u,iu,y,iy,l,n)>pi:is(<n>shiftf(u,iu,y,iy,l,lft),<n>fl)
-t49:=symis(cx,<n>shiftf(u,iu,y,iy,l,lft),<n>fl,t48):is(<n>fl,<n>shiftf(u,iu,y,iy,l,lft))
-k@t50:=fisi(1to(suy),cx,fl,shiftf(u,iu,y,iy,l,lft),[t:1to(suy)]t49(t)):is"e"([t:1to(suy)]cx,fl,shiftf(u,iu,y,iy,l,lft))
-t51:=isf([t:1to(suy)]cx,cx,[v:[t:1to(suy)]cx]smpr(q,suy,v),fl,shiftf(u,iu,y,iy,l,lft),t50):is(smpr(q,suy,fl),smpri(u,iu,y,iy,l,lft,q))
-t52:=isf(cx,cx,[t:cx]<smpri(x,ix,p1(u),t5,t6,rgt,q)><t>q,smpr(q,suy,fl),smpri(u,iu,y,iy,l,lft,q),t51):is(<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpr(q,suy,fl)>q,<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q)
-t53:=tr3is(cx,smpr(q,pl"n"(suy,sxu),f1),<smpr(q,sxu,fr)><smpr(q,suy,fl)>q,<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpr(q,suy,fl)>q,<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q,t12a,t34,t52):is(smpr(q,pl"n"(suy,sxu),f1),<smpri(x,ix,p1(u),t5,t6,rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q)
--8284
-k@satz284:=tris1(cx,smpri(x,ix,y,iy,ly,f,q),<smpri(x,ix,pl"r"(u,1rl),intpl(u,iu,1rl,intrl1),satzr25(u,iu,x,ix,k),rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q,smpr(q,pl"n"(suy".8284",sxu".8284"),f1".8284"),t11".8284",t53".8284"):is(smpri(x,ix,y,iy,ly,f,q),<smpri(x,ix,pl"r"(u,1rl),intpl(u,iu,1rl,intrl1),satzr25(u,iu,x,ix,k),rgt,q)><smpri(u,iu,y,iy,l,lft,q)>q)
-q@[v:real][iv:intrl(v)][w:real][iw:intrl(w)][lw:lessis(pl"r"(y,v),w)][kw:lessis(w,pl"r"(x,v))]
-+8285
-x@[y:real]
-pl:=pl"r"(x,y):real
-mn:=mn"r"(x,y):real
-x@p1:=pl"r"(x,1rl):real
-kw@t1:=th9"l.or"(less(pl(y,v),w),is"r"(pl(y,v),w),less(mn(pl(y,v),v),mn(w,v)),is"r"(mn(pl(y,v),v),mn(w,v)),lw,[t:less(pl(y,v),w)]satz188f(pl(y,v),w,m0"r"(v),t),[t:is"r"(pl(y,v),w)]ismn1"r"(pl(y,v),w,v,t)):lessis(mn(pl(y,v),v),mn(w,v))
-t2:=islessis1(mn(pl(y,v),v),y,mn(w,v),mnpl(y,v),t1):lessis(y,mn(w,v))
-t3:=th9"l.or"(less(w,pl(x,v)),is"r"(w,pl(x,v)),less(mn(w,v),mn(pl(x,v),v)),is"r"(mn(w,v),mn(pl(x,v),v)),kw,[t:less(w,pl(x,v))]satz188f(w,pl(x,v),m0"r"(v),t),[t:is"r"(w,pl(x,v))]ismn1"r"(w,pl(x,v),v,t)):lessis(mn(w,v),mn(pl(x,v),v))
-t4:=islessis2(mn(pl(x,v),v),x,mn(w,v),mnpl(x,v),t3):lessis(mn(w,v),x)
--8285
-iv@sft:=[t:real][w:intrl(t)][lt:lessis(pl"r"(y,v),t)][kt:lessis(t,pl"r"(x,v))]<t4".8285"(t,w,lt,kt)><t2".8285"(t,w,lt,kt)><intmn(t,w,v,iv)><mn"r"(t,v)>f:[t:real][w:intrl(t)][lt:lessis(pl"r"(y,v),t)][kt:lessis(t,pl"r"(x,v))]cx
-+*8285
-iv@t5:=tris(real,m0"r"(pl(y,v)),m0"r"(pl(v,y)),pl(m0"r"(v),m0"r"(y)),ism0"r"(pl(y,v),pl(v,y),compl"r"(y,v)),satz180(v,y)):is"r"(m0"r"(pl(y,v)),pl(m0"r"(v),m0"r"(y)))
-t6:=tr3is(real,mn(pl(1rl,pl(x,v)),v),pl(1rl,mn(pl(x,v),v)),pl(1rl,x),p1(x),asspl1"r"(1rl,pl(x,v),m0"r"(v)),ispl2"r"(mn(pl(x,v),v),x,1rl,mnpl(x,v)),compl"r"(1rl,x)):is"r"(mn(pl(1rl,pl(x,v)),v),p1(x))
-t7:=tr3is(real,mn(p1(pl(x,v)),pl(y,v)),pl(pl(1rl,pl(x,v)),pl(m0"r"(v),m0"r"(y))),mn(mn(pl(1rl,pl(x,v)),v),y),mn(p1(x),y),ispl12"r"(p1(pl(x,v)),pl(1rl,pl(x,v)),m0"r"(pl(y,v)),pl(m0"r"(v),m0"r"(y)),compl"r"(pl(x,v),1rl),t5),asspl2"r"(pl(1rl,pl(x,v)),m0"r"(v),m0"r"(y)),ismn1"r"(mn(pl(1rl,pl(x,v)),v),p1(x),y,t6)):is"r"(mn(p1(pl(x,v)),pl(y,v)),mn(p1(x),y))
-t8:=th9"l.or"(less(y,x),is"r"(y,x),less(pl(y,v),pl(x,v)),is"r"(pl(y,v),pl(x,v)),ly,[t:less(y,x)]satz188f(y,x,v,t),[t:is"r"(y,x)]ispl1"r"(y,x,v,t)):lessis(pl(y,v),pl(x,v))
-s0:=shiftl(x,ix,y,iy,ly):nat
-sv:=shiftl(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8):nat
-t9:=isrlent(mn(p1(pl(x,v)),pl(y,v)),t6"r.shift"(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8),mn(p1(x),y),t6"r.shift"(x,ix,y,iy,ly),t7):is"n"(sv,s0)
-t10:=lessisi2"n"(sv,s0,t9):lessis"n"(sv,s0)
-f1:=left(cx,s0,sv,t10,shiftf(x,ix,y,iy,ly,f)):[t:1to(sv)]cx
-t11:=issmpr(q,s0,shiftf(x,ix,y,iy,ly,f),sv,t9):is(smpr(q,sv,f1),smpri(x,ix,y,iy,ly,f,q))
-[n:1to(sv)]
-t12:=isinoutn(s0,inn(sv,n),trlessis"n"(inn(sv,n),sv,s0,1top(sv,n),t10)):is"n"(inn(sv,n),inn(s0,left1to(s0,sv,t10,n)))
-n1:=left1to(s0,sv,t10,n):1to(s0)
-t13:=isnterl(inn(sv,n),inn(s0,n1),t12):is"r"(rlofnt(inn(sv,n)),rlofnt(inn(s0,n1)))
-t14:=tris(real,mn(pl(rlofnt(inn(sv,n)),pl(y,v)),v),pl(rlofnt(inn(sv,n)),mn(pl(y,v),v)),pl(rlofnt(inn(s0,n1)),y),asspl1"r"(rlofnt(inn(sv,n)),pl(y,v),m0"r"(v)),ispl12"r"(rlofnt(inn(sv,n)),rlofnt(inn(s0,n1)),mn(pl(y,v),v),y,t13,mnpl(y,v))):is"r"(mn(pl(rlofnt(inn(sv,n)),pl(y,v)),v),pl(rlofnt(inn(s0,n1)),y))
-st0:=shiftr(x,ix,y,iy,ly,n1):real
-stv:=shiftr(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,n):real
-t15:=tr4is(real,mn(stv,v),pl(pl(rlofnt(inn(sv,n)),pl(y,v)),pl(m0"r"(1rl),m0"r"(v))),pl(pl(rlofnt(inn(sv,n)),pl(y,v)),pl(m0"r"(v),m0"r"(1rl))),mn(mn(pl(rlofnt(inn(sv,n)),pl(y,v)),v),1rl),st0,asspl1"r"(pl(rlofnt(inn(sv,n)),pl(y,v)),m0"r"(1rl),m0"r"(v)),ispl2"r"(pl(m0"r"(1rl),m0"r"(v)),pl(m0"r"(v),m0"r"(1rl)),pl(rlofnt(inn(sv,n)),pl(y,v)),compl"r"(m0"r"(1rl),m0"r"(v))),asspl2"r"(pl(rlofnt(inn(sv,n)),pl(y,v)),m0"r"(v),m0"r"(1rl)),ismn1"r"(mn(pl(rlofnt(inn(sv,n)),pl(y,v)),v),pl(rlofnt(inn(s0,n1)),y),1rl,t14)):is"r"(mn(stv,v),st0)
-t16:=intshiftr(x,ix,y,iy,ly,n1):intrl(st0)
-t17:=shiftrls(x,ix,y,iy,ly,n1):lessis(st0,x)
-t18:=lsshiftr(x,ix,y,iy,ly,n1):lessis(y,st0)
-t19:=intshiftr(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,n):intrl(stv)
-t20:=shiftrls(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,n):lessis(stv,pl(x,v))
-t21:=lsshiftr(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,n):lessis(pl(y,v),stv)
-t22:=intmn(stv,t19,v,iv):intrl(mn(stv,v))
-t23:=t2(stv,t19,t21,t20):lessis(y,mn(stv,v))
-t24:=t4(stv,t19,t21,t20):lessis(mn(stv,v),x)
-t25:=<t15><t17><t18><t16><st0><t24><t23><t22><mn(stv,v)>pi:is(<n>shiftf(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft),<n>f1)
-iv@t26:=fisi(1to(sv),cx,shiftf(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft),f1,[t:1to(sv)]t25(t)):is"e"([t:1to(sv)]cx,shiftf(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft),f1)
-t27:=isf([t:1to(sv)]cx,cx,[w:[t:1to(sv)]cx]smpr(q,sv,w),shiftf(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft),f1,t26):is(smpri(pl(x,v),intpl(x,ix,v,iv),pl(y,v),intpl(y,iy,v,iv),t8,sft,q),smpr(q,sv,f1))
--8285
-iv@lemma285:=t8".8285":lessis(pl"r"(y,v),pl"r"(x,v))
-satz285:=tris(cx,smpri(pl"r"(x,v),intpl(x,ix,v,iv),pl"r"(y,v),intpl(y,iy,v,iv),lemma285,sft,q),smpr(q,sv".8285",f1".8285"),smpri(x,ix,y,iy,ly,f,q),t27".8285",t11".8285"):is(smpri(pl"r"(x,v),intpl(x,ix,v,iv),pl"r"(y,v),intpl(y,iy,v,iv),lemma285,sft,q),smpri(x,ix,y,iy,ly,f,q))
-ly@[s:seq(x,ix,y,iy,ly,real)][ins:inseq(x,ix,y,iy,ly,s)][f:seq(x,ix,y,iy,ly,cx)][u:real][iu:intrl(u)][lu:lessis(y,u)][ul:lessis(u,x)]
-us:=<ul><lu><iu><u>s:real
-+8286
-t1:=<ul><lu><iu><u>ins:and3(intrl(us),lessis(y,us),lessis(us,x))
--8286
-inseqe1:=t22"r.shift"(x,ix,y,iy,ly,us,t1".8286"):intrl(us)
-inseqe2:=t23"r.shift"(x,ix,y,iy,ly,us,t1".8286"):lessis(y,us)
-inseqe3:=t24"r.shift"(x,ix,y,iy,ly,us,t1".8286"):lessis(us,x)
-usf:=<inseqe3><inseqe2><inseqe1><us>f:cx
-f@permseq:=[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]usf(t,u,v,w):[t:real][u:intrl(t)][v:lessis(y,t)][w:lessis(t,x)]cx
-q@[a:assoc(q)][c:commut(q)][s:seq(x,ix,y,iy,ly,real)][ins:inseq(x,ix,y,iy,ly,s)][pri:proofsirrelevant(x,ix,y,iy,ly,real,s)][ps:perm(x,ix,y,iy,ly,s)]
-+*8286
-ps@ss:=shiftseq(x,ix,y,iy,ly,s,ins):[t:1to(shiftl)]1to(shiftl)
-t2:=satz283(q,a,c,shiftl,ss,bijshiftseq(x,ix,y,iy,ly,s,ins,pri,ps),shiftf(f)):is(smpr(q,shiftl,[t:1to(shiftl)]<<t>ss>shiftf(f)),smpri(f,q))
-[n:1to(shiftl)]
-ns:=us(s,ins,f,shiftr(n),intshiftr(n),lsshiftr(n),shiftrls(n)):real
-t3:=shiftinv1(ns,t34"r.shift"(x,ix,y,iy,ly,s,ins,n)):is"r"(ns,shiftr(<n>ss))
-t4:=inseqe1(s,ins,f,shiftr(n),intshiftr(n),lsshiftr(n),shiftrls(n)):intrl(ns)
-t5:=inseqe2(s,ins,f,shiftr(n),intshiftr(n),lsshiftr(n),shiftrls(n)):lessis(y,ns)
-t6:=inseqe3(s,ins,f,shiftr(n),intshiftr(n),lsshiftr(n),shiftrls(n)):lessis(ns,x)
-t7:=intshiftr(<n>ss):intrl(shiftr(<n>ss))
-t8:=lsshiftr(<n>ss):lessis(y,shiftr(<n>ss))
-t9:=shiftrls(<n>ss):lessis(shiftr(<n>ss),x)
-t10:=<t3><t9><t8><t7><shiftr(<n>ss)><t6><t5><t4><ns>pi:is(<n>shiftf(permseq(s,ins,f)),<<n>ss>shiftf(f))
-ps@t11:=fisi(1to(shiftl),cx,shiftf(permseq(s,ins,f)),[t:1to(shiftl)]<<t>ss>shiftf(f),[t:1to(shiftl)]t10(t)):is"e"([t:1to(shiftl)]cx,shiftf(permseq(s,ins,f)),[t:1to(shiftl)]<<t>ss>shiftf(f))
-t12:=isf([t:1to(shiftl)]cx,cx,[u:[t:1to(shiftl)]cx]smpr(q,shiftl,u),shiftf(permseq(s,ins,f)),[t:1to(shiftl)]<<t>ss>shiftf(f),t11):is(smpri(permseq(s,ins,f),q),smpr(q,shiftl,[t:1to(shiftl)]<<t>ss>shiftf(f)))
--8286
-ps@satz286:=tris(cx,smpri(permseq(s,ins,f),q),smpr(q,shiftl,[t:1to(shiftl)]<<t>ss".8286">shiftf(f)),smpri(f,q),t12".8286",t2".8286"):is(smpri(permseq(s,ins,f),q),smpri(f,q))
-@[x:nat][f:[t:1to(x)]cx]
-modf:=[t:1to(x)]pli(mod(<t>f),0):[t:1to(x)]cx
-+8287
-[r:real]
-prop1:=lessis(mod(sum(x,f)),r):'prop'
-prop2:=is(sum(x,modf(f)),pli(r,0)):'prop'
-prop3:=and(prop1,prop2):'prop'
-f@prop4:=some"r"([t:real]prop3(t)):'prop'
-x@prop5:=[u:[t:1to(x)]cx]prop4(u):'prop'
-@[f:[t:1to(1)]cx]
-t1:=satz277([t:cx][u:cx]pl(t,u),f):is(sum(1,f),<xout(1)>f)
-t2:=ismod(sum(1,f),<xout(1)>f,t1):is"r"(mod(sum(1,f)),mod(<xout(1)>f))
-t3:=lessisi2(mod(sum(1,f)),mod(<xout(1)>f),t2):prop1(1,f,mod(<xout(1)>f))
-t4:=satz277([t:cx][u:cx]pl(t,u),modf(1,f)):prop2(1,f,mod(<xout(1)>f))
-t5:=andi(prop1(1,f,mod(<xout(1)>f)),prop2(1,f,mod(<xout(1)>f)),t3,t4):prop3(1,f,mod(<xout(1)>f))
-t6:=somei(real,[t:real]prop3(1,f,t),mod(<xout(1)>f),t5):prop4(1,f)
-@t7:=[u:[t:1to(1)]cx]t6(u):prop5(1)
-x@[p:prop5(x)][f:[t:1to(pl"n"(x,1))]cx]
-t8:=lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)):lessis"n"(x,pl"n"(x,1))
-lf:=left(cx,pl"n"(x,1),x,t8,f):[t:1to(x)]cx
-[r:real][pr:prop3(lf,r)]
-t9:=ande1(prop1(lf,r),prop2(lf,r),pr):prop1(lf,r)
-t10:=ande2(prop1(lf,r),prop2(lf,r),pr):prop2(lf,r)
-t11:=satz278([t:cx][u:cx]pl(t,u),x,f):is(sum(pl"n"(x,1),f),pl(sum(x,lf),<xout(pl"n"(x,1))>f))
-t12:=ismod(pl(sum(x,lf),<xout(pl"n"(x,1))>f),sum(pl"n"(x,1),f),symis(cx,sum(pl"n"(x,1),f),pl(sum(x,lf),<xout(pl"n"(x,1))>f),t11)):is"r"(mod(pl(sum(x,lf),<xout(pl"n"(x,1))>f)),mod(sum(pl"n"(x,1),f)))
-m:=mod(<xout(pl"n"(x,1))>f):real
-t13:=islessis1(mod(pl(sum(x,lf),<xout(pl"n"(x,1))>f)),mod(sum(pl"n"(x,1),f)),pl"r"(mod(sum(x,lf)),m),t12,satz271(sum(x,lf),<xout(pl"n"(x,1))>f)):lessis(mod(sum(pl"n"(x,1),f)),pl"r"(mod(sum(x,lf)),m))
-t14:=th9"l.or"(less(mod(sum(x,lf)),r),is"r"(mod(sum(x,lf)),r),less(pl"r"(mod(sum(x,lf)),m),pl"r"(r,m)),is"r"(pl"r"(mod(sum(x,lf)),m),pl"r"(r,m)),t9,[t:less(mod(sum(x,lf)),r)]satz188f(mod(sum(x,lf)),r,m,t),[t:is"r"(mod(sum(x,lf)),r)]ispl1"r"(mod(sum(x,lf)),r,m,t)):lessis(pl"r"(mod(sum(x,lf)),m),pl"r"(r,m))
-t15:=trlessis(mod(sum(pl"n"(x,1),f)),pl"r"(mod(sum(x,lf)),m),pl"r"(r,m),t13,t14):prop1(pl"n"(x,1),f,pl"r"(r,m))
-lmf:=left(cx,pl"n"(x,1),x,t8,modf(pl"n"(x,1),f)):[t:1to(x)]cx
-t16:=satz278([t:cx][u:cx]pl(t,u),x,modf(pl"n"(x,1),f)):is(sum(pl"n"(x,1),modf(pl"n"(x,1),f)),pl(sum(x,lmf),pli(m,0)))
-t17:=ispl1(sum(x,lmf),pli(r,0),pli(m,0),t10):is(pl(sum(x,lmf),pli(m,0)),pl(pli(r,0),pli(m,0)))
-t18:=plis12a(r,0,m,0):is(pl(pli(r,0),pli(m,0)),pli(pl"r"(r,m),pl"r"(0,0)))
-t19:=isrecx2(pl"r"(0,0),0,pl"r"(r,m),pl01"r"(0,0,refis(real,0))):is(pli(pl"r"(r,m),pl"r"(0,0)),pli(pl"r"(r,m),0))
-t20:=tr4is(cx,sum(pl"n"(x,1),modf(pl"n"(x,1),f)),pl(sum(x,lmf),pli(m,0)),pl(pli(r,0),pli(m,0)),pli(pl"r"(r,m),pl"r"(0,0)),pli(pl"r"(r,m),0),t16,t17,t18,t19):prop2(pl"n"(x,1),f,pl"r"(r,m))
-t21:=andi(prop1(pl"n"(x,1),f,pl"r"(r,m)),prop2(pl"n"(x,1),f,pl"r"(r,m)),t15,t20):prop3(pl"n"(x,1),f,pl"r"(r,m))
-t22:=somei(real,[t:real]prop3(pl"n"(x,1),f,t),pl"r"(r,m),t21):prop4(pl"n"(x,1),f)
-f@t23:=someapp(real,[t:real]prop3(lf,t),<lf>p,prop4(pl"n"(x,1),f),[t:real][u:prop3(lf,t)]t22(t,u)):prop4(pl"n"(x,1),f)
-p@t25:=[u:[t:1to(pl"n"(x,1))]cx]t23(u):prop5(pl"n"(x,1))
-t26:=isp(nat,[t:nat]prop5(t),pl"n"(x,1),<x>suc,t25,satz4a(x)):prop5(<x>suc)
--8287
-satz287:=<f>induction([t:nat]prop5".8287"(t),t7".8287",[t:nat][u:prop5".8287"(t)]t26".8287"(t,u),x):some"r"([t:real]and(lessis(mod(sum(x,f)),t),is(sum(x,modf(f)),pli(t,0))))
-+8288
-prop1:=is(pli(mod(prod(x,f)),0),prod(x,modf(f))):'prop'
-x@prop2:=[u:[t:1to(x)]cx]prop1(u):'prop'
-@[f:[t:1to(1)]cx]
-t1:=satz277([t:cx][u:cx]ts(t,u),f):is(prod(1,f),<xout(1)>f)
-t2:=ismod(prod(1,f),<xout(1)>f,t1):is"r"(mod(prod(1,f)),mod(<xout(1)>f))
-t3:=isrecx1(mod(prod(1,f)),mod(<xout(1)>f),0,t2):is(pli(mod(prod(1,f)),0),pli(mod(<xout(1)>f),0))
-t4:=satz277([t:cx][u:cx]ts(t,u),modf(1,f)):is(prod(1,modf(1,f)),pli(mod(<xout(1)>f),0))
-t5:=tris2(cx,pli(mod(prod(1,f)),0),prod(1,modf(1,f)),pli(mod(<xout(1)>f),0),t3,t4):prop1(1,f)
-@t6:=[u:[t:1to(1)]cx]t5(u):prop2(1)
-x@[p:prop2(x)][f:[t:1to(pl"n"(x,1))]cx]
-t7:=lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)):lessis"n"(x,pl"n"(x,1))
-lf:=left(cx,pl"n"(x,1),x,t7,f):[t:1to(x)]cx
-t8:=satz278([t:cx][u:cx]ts(t,u),x,f):is(prod(pl"n"(x,1),f),ts(prod(x,lf),<xout(pl"n"(x,1))>f))
-m:=mod(<xout(pl"n"(x,1))>f):real
-t9:=ismod(prod(pl"n"(x,1),f),ts(prod(x,lf),<xout(pl"n"(x,1))>f),t8):is"r"(mod(prod(pl"n"(x,1),f)),mod(ts(prod(x,lf),<xout(pl"n"(x,1))>f)))
-t10:=satz268(prod(x,lf),<xout(pl"n"(x,1))>f):is"r"(mod(ts(prod(x,lf),<xout(pl"n"(x,1))>f)),ts"r"(mod(prod(x,lf)),m))
-t11:=tris(real,mod(prod(pl"n"(x,1),f)),mod(ts(prod(x,lf),<xout(pl"n"(x,1))>f)),ts"r"(mod(prod(x,lf)),m),t9,t10):is"r"(mod(prod(pl"n"(x,1),f)),ts"r"(mod(prod(x,lf)),m))
-t12:=isrecx1(mod(prod(pl"n"(x,1),f)),ts"r"(mod(prod(x,lf)),m),0,t11):is(pli(mod(prod(pl"n"(x,1),f)),0),pli(ts"r"(mod(prod(x,lf)),m),0))
-lmf:=left(cx,pl"n"(x,1),x,t7,modf(pl"n"(x,1),f)):[t:1to(x)]cx
-t13:=satz278([t:cx][u:cx]ts(t,u),x,modf(pl"n"(x,1),f)):is(prod(pl"n"(x,1),modf(pl"n"(x,1),f)),ts(prod(x,lmf),pli(m,0)))
-t14:=symis(cx,pli(mod(prod(x,lf)),0),prod(x,lmf),<lf>p):is(prod(x,lmf),pli(mod(prod(x,lf)),0))
-t15:=ists1(prod(x,lmf),pli(mod(prod(x,lf)),0),pli(m,0),t14):is(ts(prod(x,lmf),pli(m,0)),ts(pli(mod(prod(x,lf)),0),pli(m,0)))
-t16:=tsis12a(mod(prod(x,lf)),0,m,0):is(ts(pli(mod(prod(x,lf)),0),pli(m,0)),pli(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m))))
-t17:=tris(real,mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),mn"r"(ts"r"(mod(prod(x,lf)),m),0),ts"r"(mod(prod(x,lf)),m),ismn2"r"(ts"r"(0,0),0,ts"r"(mod(prod(x,lf)),m),ts01"r"(0,0,refis(real,0))),pl02"r"(ts"r"(mod(prod(x,lf)),m),m0"r"(0),satz176b(0,refis(real,0)))):is"r"(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),ts"r"(mod(prod(x,lf)),m))
-t18:=tris(real,pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m)),pl"r"(0,0),0,ispl12"r"(ts"r"(mod(prod(x,lf)),0),0,ts"r"(0,m),0,ts02"r"(mod(prod(x,lf)),0,refis(real,0)),ts01"r"(0,m,refis(real,0))),pl01"r"(0,0,refis(real,0))):is"r"(pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m)),0)
-t19:=isrecx12(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),ts"r"(mod(prod(x,lf)),m),pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m)),0,t17,t18):is(pli(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m))),pli(ts"r"(mod(prod(x,lf)),m),0))
-t20:=tr4is(cx,prod(pl"n"(x,1),modf(pl"n"(x,1),f)),ts(prod(x,lmf),pli(m,0)),ts(pli(mod(prod(x,lf)),0),pli(m,0)),pli(mn"r"(ts"r"(mod(prod(x,lf)),m),ts"r"(0,0)),pl"r"(ts"r"(mod(prod(x,lf)),0),ts"r"(0,m))),pli(ts"r"(mod(prod(x,lf)),m),0),t13,t15,t16,t19):is(prod(pl"n"(x,1),modf(pl"n"(x,1),f)),pli(ts"r"(mod(prod(x,lf)),m),0))
-t21:=tris2(cx,pli(mod(prod(pl"n"(x,1),f)),0),prod(pl"n"(x,1),modf(pl"n"(x,1),f)),pli(ts"r"(mod(prod(x,lf)),m),0),t12,t20):prop1(pl"n"(x,1),f)
-p@t21a:=[u:[t:1to(pl"n"(x,1))]cx]t21(u):prop2(pl"n"(x,1))
-t22:=isp(nat,[t:nat]prop2(t),pl"n"(x,1),<x>suc,t21a,satz4a(x)):prop2(<x>suc)
--8288
-satz288:=<f>induction([t:nat]prop2".8288"(t),t6".8288",[t:nat][u:prop2".8288"(t)]t22".8288"(t,u),x):is(pli(mod(prod(x,f)),0),prod(x,modf(f)))
-+8289
-prop1:=is(prod(x,f),0c):'prop'
-prop2:=some"l"(1to(x),[t:1to(x)]is(<t>f,0c)):'prop'
-prop3:=iff(prop1,prop2):'prop'
-x@prop4:=[u:[t:1to(x)]cx]prop3(u):'prop'
-@[f:[t:1to(1)]cx]
-t1:=satz277([t:cx][u:cx]ts(t,u),f):is(prod(1,f),<xout(1)>f)
-[p:prop1(1,f)]
-t2:=tris1(cx,<xout(1)>f,0c,prod(1,f),t1,p):is(<xout(1)>f,0c)
-t3:=somei(1to(1),[t:1to(1)]is(<t>f,0c),xout(1),t2):prop2(1,f)
-f@[p:prop2(1,f)][u:1to(1)][i:is(<u>f,0c)]
-t4:=th1"n.singlet"(u):is"e"(1to(1),u,xout(1))
-t5:=tr3is(cx,prod(1,f),<xout(1)>f,<u>f,0c,t1,isf(1to(1),cx,f,xout(1),u,symis(1to(1),u,xout(1),t4)),i):prop1(1,f)
-p@t6:=someapp(1to(1),[t:1to(1)]is(<t>f,0c),p,prop1(1,f),[t:1to(1)][u:is(<t>f,0c)]t5(t,u)):prop1(1,f)
-f@t7:=iffi(prop1(1,f),prop2(1,f),[t:prop1(1,f)]t3(t),[t:prop2(1,f)]t6(t)):prop3(1,f)
-@t8:=[u:[t:1to(1)]cx]t7(u):prop4(1)
-x@[p:prop4(x)][f:[t:1to(pl"n"(x,1))]cx]
-t9:=lessisi1"n"(x,pl"n"(x,1),satz18a(x,1)):lessis"n"(x,pl"n"(x,1))
-lf:=left(cx,pl"n"(x,1),x,t9,f):[t:1to(x)]cx
-t10:=satz278([t:cx][u:cx]ts(t,u),x,f):is(prod(pl"n"(x,1),f),ts(prod(x,lf),<xout(pl"n"(x,1))>f))
-[q:prop1(pl"n"(x,1),f)]
-t11:=tris1(cx,ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c,prod(pl"n"(x,1),f),t10,q):is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c)
-t12:=satz221c(prod(x,lf),<xout(pl"n"(x,1))>f,t11):or(is(prod(x,lf),0c),is(<xout(pl"n"(x,1))>f,0c))
-[i:is(prod(x,lf),0c)]
-t13:=th3"l.iff"(prop1(x,lf),prop2(x,lf),<lf>p,i):prop2(x,lf)
-[n:1to(x)][j:is(<n>lf,0c)]
-t14:=somei(1to(pl"n"(x,1)),[t:1to(pl"n"(x,1))]is(<t>f,0c),left1to(pl"n"(x,1),x,t9,n),j):prop2(pl"n"(x,1),f)
-i@t15:=someapp(1to(x),[t:1to(x)]is(<t>lf,0c),t13,prop2(pl"n"(x,1),f),[t:1to(x)][u:is(<t>lf,0c)]t14(t,u)):prop2(pl"n"(x,1),f)
-q@[i:is(<xout(pl"n"(x,1))>f,0c)]
-t16:=somei(1to(pl"n"(x,1)),[t:1to(pl"n"(x,1))]is(<t>f,0c),xout(pl"n"(x,1)),i):prop2(pl"n"(x,1),f)
-q@t17:=orapp(is(prod(x,lf),0c),is(<xout(pl"n"(x,1))>f,0c),prop2(pl"n"(x,1),f),t12,[t:is(prod(x,lf),0c)]t15(t),[t:is(<xout(pl"n"(x,1))>f,0c)]t16(t)):prop2(pl"n"(x,1),f)
-f@[q:prop2(pl"n"(x,1),f)][n:1to(pl"n"(x,1))][i:is(<n>f,0c)][j:is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1)))]
-t18:=tris1(cx,<xout(pl"n"(x,1))>f,0c,<n>f,isf(1to(pl"n"(x,1)),cx,f,n,xout(pl"n"(x,1)),j),i):is(<xout(pl"n"(x,1))>f,0c)
-t20:=satz221b(prod(x,lf),<xout(pl"n"(x,1))>f,t18):is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c)
-i@[m:not(is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1))))]
-n1:=inn(pl"n"(x,1),n):nat
-[j:is"n"(n1,pl"n"(x,1))]
-t21:=isoutni(pl"n"(x,1),n1,1top(pl"n"(x,1),n),pl"n"(x,1),lessisi3(pl"n"(x,1)),j):is"e"(1to(pl"n"(x,1)),outn(pl"n"(x,1),n1,1top(pl"n"(x,1),n)),xout(pl"n"(x,1)))
-t22:=tris(1to(pl"n"(x,1)),n,outn(pl"n"(x,1),n1,1top(pl"n"(x,1),n)),xout(pl"n"(x,1)),isoutinn(pl"n"(x,1),n),t21):is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1)))
-m@t23:=th3"l.imp"(is"n"(n1,pl"n"(x,1)),is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1))),m,[t:is"n"(n1,pl"n"(x,1))]t22(t)):nis"n"(n1,pl"n"(x,1))
-t24:=ore1(less"n"(n1,pl"n"(x,1)),is"n"(n1,pl"n"(x,1)),1top(pl"n"(x,1),n),t23):less"n"(n1,pl"n"(x,1))
-t25:=satz26(x,n1,t24):lessis"n"(n1,x)
-n2:=outn(x,n1,t25):1to(x)
-t26:=isinoutn(x,n1,t25):is"n"(n1,inn(x,n2))
-t27:=isoutni(pl"n"(x,1),n1,1top(pl"n"(x,1),n),inn(x,n2),trlessis"n"(inn(x,n2),x,pl"n"(x,1),1top(x,n2),t9),t26):is"e"(1to(pl"n"(x,1)),outn(pl"n"(x,1),n1,1top(pl"n"(x,1),n)),left1to(pl"n"(x,1),x,t9,n2))
-t28:=tris(1to(pl"n"(x,1)),n,outn(pl"n"(x,1),n1,1top(pl"n"(x,1),n)),left1to(pl"n"(x,1),x,t9,n2),isoutinn(pl"n"(x,1),n),t27):is"e"(1to(pl"n"(x,1)),n,left1to(pl"n"(x,1),x,t9,n2))
-t29:=isf(1to(pl"n"(x,1)),cx,f,n,left1to(pl"n"(x,1),x,t9,n2),t28):is(<n>f,<n2>lf)
-t30:=tris1(cx,<n2>lf,0c,<n>f,t29,i):is(<n2>lf,0c)
-t31:=somei(1to(x),[t:1to(x)]is(<t>lf,0c),n2,t30):prop2(x,lf)
-t32:=th4"l.iff"(prop1(x,lf),prop2(x,lf),<lf>p,t31):prop1(x,lf)
-t34:=satz221a(prod(x,lf),<xout(pl"n"(x,1))>f,t32):is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c)
-i@t35:=th1"l.imp"(is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1))),is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c),[t:is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1)))]t20(t),[t:not(is"e"(1to(pl"n"(x,1)),n,xout(pl"n"(x,1))))]t34(t)):is(ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c)
-t36:=tris(cx,prod(pl"n"(x,1),f),ts(prod(x,lf),<xout(pl"n"(x,1))>f),0c,t10,t35):prop1(pl"n"(x,1),f)
-q@t37:=someapp(1to(pl"n"(x,1)),[t:1to(pl"n"(x,1))]is(<t>f,0c),q,prop1(pl"n"(x,1),f),[t:1to(pl"n"(x,1))][u:is(<t>f,0c)]t36(t,u)):prop1(pl"n"(x,1),f)
-f@t38:=iffi(prop1(pl"n"(x,1),f),prop2(pl"n"(x,1),f),[t:prop1(pl"n"(x,1),f)]t17(t),[t:prop2(pl"n"(x,1),f)]t37(t)):prop3(pl"n"(x,1),f)
-p@t39:=[u:[t:1to(pl"n"(x,1))]cx]t38(u):prop4(pl"n"(x,1))
-t40:=isp(nat,[t:nat]prop4(t),pl"n"(x,1),<x>suc,t39,satz4a(x)):prop4(<x>suc)
--8289
-satz289:=<f>induction([t:nat]prop4".8289"(t),t8".8289",[t:nat][u:prop4".8289"(t)]t40".8289"(t,u),x):iff(is(prod(x,f),0c),some"l"(1to(x),[t:1to(x)]is(<t>f,0c)))
-[i:is(prod(x,f),0c)]
-satz289a:=th3"l.iff"(prop1".8289",prop2".8289",satz289,i):some"l"(1to(x),[t:1to(x)]is(<t>f,0c))
-f@[n:1to(x)][i:is(<n>f,0c)]
-+*8289
-i"c"@t41:=somei(1to(x),[t:1to(x)]is(<t>f,0c),n,i):prop2
--8289
-i@satz289b:=th4"l.iff"(prop1".8289",prop2".8289",satz289,t41".8289"):is(prod(x,f),0c)
-@[x:complex][m:real][mi:intrl(m)][o:or(nis(x,0c),pos(m))]
-+v9
-[p:pos(m)]
-t1:=posintnatrl(m,p,mi):natrl(m)
-m1:=ntofrl(m,t1):nat
-pw1:=prod(m1,[t:1to(m1)]x):cx
--v9
-x@[y:complex][m:real][n:real][i:is(x,y)][j:is"r"(m,n)][mi1:intrl(m)][ni1:intrl(n)][ox:or(nis(x,0c),pos(m))][oy:or(nis(y,0c),pos(n))]
-+*v9
-oy@[mp:pos(m)][np:pos(n)]
-m0:=m1(x,m,mi1,ox,mp):nat
-n0:=m1(y,n,ni1,oy,np):nat
-t2:=isrlent(m,t1(x,m,mi1,ox,mp),n,t1(y,n,ni1,oy,np),j):is"n"(m0,n0)
-t3:=lessisi2"n"(m0,n0,t2):lessis"n"(m0,n0)
-t4:=issmpr([t:cx][u:cx]ts(t,u),n0,[t:1to(n0)]y,m0,t2):is(prod(m0,left(cx,n0,m0,t3,[t:1to(n0)]y)),pw1(y,n,ni1,oy,np))
-t5:=fisi(1to(m0),cx,[t:1to(m0)]x,left(cx,n0,m0,t3,[t:1to(n0)]y),[t:1to(m0)]i):is"e"([t:1to(m0)]cx,[t:1to(m0)]x,left(cx,n0,m0,t3,[t:1to(n0)]y))
-t6:=isf([t:1to(m0)]cx,cx,[u:[t:1to(m0)]cx]prod(m0,u),[t:1to(m0)]x,left(cx,n0,m0,t3,[t:1to(n0)]y),t5):is(pw1(x,m,mi1,ox,mp),prod(m0,left(cx,n0,m0,t3,[t:1to(n0)]y)))
-t7:=tris(cx,pw1(x,m,mi1,ox,mp),prod(m0,left(cx,n0,m0,t3,[t:1to(n0)]y)),pw1(y,n,ni1,oy,np),t6,t4):is(pw1(x,m,mi1,ox,mp),pw1(y,n,ni1,oy,np))
-p@[p1:pos(m)]
-t8:=t7(x,x,m,m,refis(cx,x),refis(real,m),mi,mi,o,o,p,p1):is(pw1(p),pw1(p1))
-p@[n:nis(x,0c)]
-t9:=th5"l.some"(1to(m1),[t:1to(m1)]is(<t>[u:1to(m1)]x,0c),[t:1to(m1)]n):not(some"l"(1to(m1),[t:1to(m1)]is(<t>[u:1to(m1)]x,0c)))
-t10:=th3"l.imp"(is(pw1,0c),some"l"(1to(m1),[t:1to(m1)]is(<t>[u:1to(m1)]x,0c)),t9,[t:is(pw1,0c)]satz289a(m1,[u:1to(m1)]x,t)):nis(pw1,0c)
-o@[n:neg(m)]
-mi@t11:=intabs(m,mi):intrl(abs(m))
-n@t12:=satz166b(m,n):pos(abs(m))
-t13:=ori2(nis(x,0c),pos(abs(m)),t12):or(nis(x,0c),pos(abs(m)))
-t14:=ore1(nis(x,0c),pos(m),o,nnotp(m,n)):nis(x,0c)
-t15:=t10(abs(m),t11,t13,t12,t14):nis(pw1(abs(m),t11,t13,t12),0c)
-pw2:=ov(1c,pw1(abs(m),t11,t13,t12),t15):cx
-oy@[nm:neg(m)][nn:neg(n)]
-pwm:=pw1(x,abs(m),t11(x,m,mi1),t13(x,m,mi1,ox,nm),t12(x,m,mi1,ox,nm)):cx
-pwn:=pw1(y,abs(n),t11(y,n,ni1),t13(y,n,ni1,oy,nn),t12(y,n,ni1,oy,nn)):cx
-t16:=t7(abs(m),abs(n),i,isabs(m,n,j),t11(x,m,mi1),t11(y,n,ni1),t13(x,m,mi1,ox,nm),t13(y,n,ni1,oy,nn),t12(x,m,mi1,ox,nm),t12(y,n,ni1,oy,nn)):is(pwm,pwn)
-t17:=isov2(pwm,pwn,1c,t16,t15(x,m,mi1,ox,nm),t15(y,n,ni1,oy,nn)):is(pw2(x,m,mi1,ox,nm),pw2(y,n,ni1,oy,nn))
-n@[n1:neg(m)]
-t18:=t17(x,x,m,m,refis(cx,x),refis(real,m),mi,mi,o,o,n,n1):is(pw2(n),pw2(n1))
-o@pw3:=ite"l.r"(neg(m),cx,[t:neg(m)]pw2(t),[t:not(neg(m))]1c,[t:neg(m)][u:neg(m)]t18(t,u),[t:not(neg(m))][u:not(neg(m))]refis(cx,1c)):cx
-n@t19:=itet"l.r"(neg(m),cx,[t:neg(m)]pw2(t),[t:not(neg(m))]1c,[t:neg(m)][u:neg(m)]t18(t,u),[t:not(neg(m))][u:not(neg(m))]refis(cx,1c),n):is(pw3,pw2(n))
-o@[nn:not(neg(m))]
-t20:=itef"l.r"(neg(m),cx,[t:neg(m)]pw2(t),[t:not(neg(m))]1c,[t:neg(m)][u:neg(m)]t18(t,u),[t:not(neg(m))][u:not(neg(m))]refis(cx,1c),nn):is(pw3,1c)
-nm@t21:=isp(real,[t:real]neg(t),m,n,nm,j):neg(n)
-t22:=t19(x,m,mi1,ox,nm):is(pw3(x,m,mi1,ox),pw2(x,m,mi1,ox,nm))
-t23:=symis(cx,pw3(y,n,ni1,oy),pw2(y,n,ni1,oy,t21),t19(y,n,ni1,oy,t21)):is(pw2(y,n,ni1,oy,t21),pw3(y,n,ni1,oy))
-t24:=tr3is(cx,pw3(x,m,mi1,ox),pw2(x,m,mi1,ox,nm),pw2(y,n,ni1,oy,t21),pw3(y,n,ni1,oy),t22,t17(t21),t23):is(pw3(x,m,mi1,ox),pw3(y,n,ni1,oy))
-oy@[nn:not(neg(m))]
-t25:=isp(real,[t:real]not(neg(t)),m,n,nn,j):not(neg(n))
-t26:=t20(x,m,mi1,ox,nn):is(pw3(x,m,mi1,ox),1c)
-t27:=t20(y,n,ni1,oy,t25):is(pw3(y,n,ni1,oy),1c)
-t28:=tris2(cx,pw3(x,m,mi1,ox),pw3(y,n,ni1,oy),1c,t26,t27):is(pw3(x,m,mi1,ox),pw3(y,n,ni1,oy))
-oy@t29:=th1"l.imp"(neg(m),is(pw3(x,m,mi1,ox),pw3(y,n,ni1,oy)),[t:neg(m)]t24(t),[t:not(neg(m))]t28(t)):is(pw3(x,m,mi1,ox),pw3(y,n,ni1,oy))
--v9
-o@pw:=ite"l.r"(pos(m),cx,[t:pos(m)]pw1".v9"(t),[t:not(pos(m))]pw3".v9",[t:pos(m)][u:pos(m)]t8".v9"(t,u),[t:not(pos(m))][u:not(pos(m))]refis(cx,pw3".v9")):cx
-+*v9
-p@t30:=itet"l.r"(pos(m),cx,[t:pos(m)]pw1(t),[t:not(pos(m))]pw3,[t:pos(m)][u:pos(m)]t8(t,u),[t:not(pos(m))][u:not(pos(m))]refis(cx,pw3),p):is(pw,pw1(p))
-o@[n:not(pos(m))]
-t31:=itef"l.r"(pos(m),cx,[t:pos(m)]pw1(t),[t:not(pos(m))]pw3,[t:pos(m)][u:pos(m)]t8(t,u),[t:not(pos(m))][u:not(pos(m))]refis(cx,pw3),n):is(pw,pw3)
-o@[i:is"r"(m,0)]
-t32:=tris(cx,pw,pw3,1c,t31(0notp(m,i)),t20(0notn(m,i))):is(pw,1c)
-o@[n:neg(m)]
-t33:=tris(cx,pw,pw3,pw2(n),t31(nnotp(m,n)),t19(n)):is(pw,pw2(n))
--v9
-o@[p:pos(m)]
-posexp:=t30".v9"(p):is(pw(x,m,mi,o),prod(ntofrl(m,posintnatrl(m,p,mi)),[t:1to(ntofrl(m,posintnatrl(m,p,mi)))]x))
-[n:nis(x,0c)]
-lemmapw1:=th2"e.notis"(cx,pw1".v9"(p),0c,pw,t10".v9"(p,n),posexp):nis(pw(x,m,mi,o),0c)
-o@[i:is"r"(m,0)]
-0exp:=t32".v9"(i):is(pw(x,m,mi,o),1c)
-o@[n:neg(m)]
-lemmapw2:=t14".v9"(n):nis(x,0c)
-lemmapw3:=t13".v9"(n):or(nis(x,0c),pos(abs(m)))
-+*v9
-n@t34:=t30(abs(m),t11,t13(n),t12(n)):is(pw(x,abs(m),t11,t13(n)),pw1(x,abs(m),t11,t13(n),t12(n)))
-t35:=isov2(pw(x,abs(m),t11,t13(n)),pw1(x,abs(m),t11,t13(n),t12(n)),1c,t34,lemmapw1(abs(m),t11,t13(n),t12(n),t14(n)),t15(n)):is(ov(1c,pw(x,abs(m),t11,t13(n)),lemmapw1(abs(m),t11,t13(n),t12(n),t14(n))),pw2(n))
--v9
-n@negexp:=tris2(cx,pw(x,m,mi,o),ov(1c,pw(x,abs(m),intabs(m,mi),lemmapw3),lemmapw1(x,abs(m),intabs(m,mi),lemmapw3,satz166b(m,n),lemmapw2)),pw2".v9"(n),t33".v9"(n),t35".v9"(n)):is(pw(x,m,mi,o),ov(1c,pw(x,abs(m),intabs(m,mi),lemmapw3),lemmapw1(x,abs(m),intabs(m,mi),lemmapw3,satz166b(m,n),lemmapw2)))
-+*v9
-mp@t36:=isp(real,[t:real]pos(t),m,n,mp,j):pos(n)
-t37:=t30(x,m,mi1,ox,mp):is(pw(x,m,mi1,ox),pw1(x,m,mi1,ox,mp))
-t38:=symis(cx,pw(y,n,ni1,oy),pw1(y,n,ni1,oy,t36),t30(y,n,ni1,oy,t36)):is(pw1(y,n,ni1,oy,t36),pw(y,n,ni1,oy))
-t39:=tr3is(cx,pw(x,m,mi1,ox),pw1(x,m,mi1,ox,mp),pw1(y,n,ni1,oy,t36),pw(y,n,ni1,oy),t37,t7(t36),t38):is(pw(x,m,mi1,ox),pw(y,n,ni1,oy))
-oy@[np:not(pos(m))]
-t40:=isp(real,[t:real]not(pos(t)),m,n,np,j):not(pos(n))
-t41:=t31(x,m,mi1,ox,np):is(pw(x,m,mi1,ox),pw3(x,m,mi1,ox))
-t42:=symis(cx,pw(y,n,ni1,oy),pw3(y,n,ni1,oy),t31(y,n,ni1,oy,t40)):is(pw3(y,n,ni1,oy),pw(y,n,ni1,oy))
-t43:=tr3is(cx,pw(x,m,mi1,ox),pw3(x,m,mi1,ox),pw3(y,n,ni1,oy),pw(y,n,ni1,oy),t41,t29,t42):is(pw(x,m,mi1,ox),pw(y,n,ni1,oy))
--v9
-oy@ispw12:=th1"l.imp"(pos(m),is(pw(x,m,mi1,ox),pw(y,n,ni1,oy)),[t:pos(m)]t39".v9"(t),[t:not(pos(m))]t43".v9"(t)):is(pw(x,m,mi1,ox),pw(y,n,ni1,oy))
-m@[i:is(x,y)][mi:intrl(m)][ox:or(nis(x,0c),pos(m))][oy:or(nis(y,0c),pos(m))]
-ispw1:=ispw12(x,y,m,m,i,refis(real,m),mi,mi,ox,oy):is(pw(x,m,mi,ox),pw(y,m,mi,oy))
-x@[m:real][n:real][i:is"r"(m,n)][mi:intrl(m)][ni:intrl(n)][om:or(nis(x,0c),pos(m))][on:or(nis(x,0c),pos(n))]
-ispw2:=ispw12(x,x,m,n,refis(cx,x),i,mi,ni,om,on):is(pw(x,m,mi,om),pw(x,n,ni,on))
-o@[n:nis(x,0c)]
-+9290
-[p:pos(m)]
-t1:=lemmapw1(p,n):nis(pw(x,m,mi,o),0c)
-@[i:is(1c,0c)]
-t2:=tr3is(real,1rl,re(1c),re(0c),0,isre(1rl,0),iscere(1c,0c,i),reis(0,0)):is"r"(1rl,0)
--9290
-@1not0:=th3"l.imp"(is(1c,0c),is"r"(1rl,0),pnot0(1rl,pos1),[t:is(1c,0c)]t2".9290"(t)):nis(1c,0c)
-+*9290
-n@[i:is"r"(m,0)]
-t4:=th2"e.notis"(cx,1c,0c,pw(x,m,mi,o),1not0,0exp(i)):nis(pw(x,m,mi,o),0c)
-n@[nm:neg(m)]
-p0:=pw(x,abs(m),intabs(m,mi),lemmapw3(nm)):cx
-t5:=lemmapw1(x,abs(m),intabs(m,mi),lemmapw3(nm),satz166b(m,nm),lemmapw2(nm)):nis(p0,0c)
-t6:=tris(cx,ts(pw(x,m,mi,o),p0),ts(ov(1c,p0,t5),p0),1c,ists1(pw(x,m,mi,o),ov(1c,p0,t5),p0,negexp(nm)),satz229e(1c,p0,t5)):is(ts(pw(x,m,mi,o),p0),1c)
-t7:=th2"e.notis"(cx,1c,0c,ts(pw(x,m,mi,o),p0),1not0,t6):nis(ts(pw(x,m,mi,o),p0),0c)
-t8:=th3"l.imp"(is(pw(x,m,mi,o),0c),is(ts(pw(x,m,mi,o),p0),0c),t7,[t:is(pw(x,m,mi,o),0c)]satz221a(pw(x,m,mi,o),p0,t)):nis(pw(x,m,mi,o),0c)
--9290
-n@satz290:=rapp(m,nis(pw(x,m,mi,o),0c),[t:pos(m)]t1".9290"(t),[t:is"r"(m,0)]t4".9290"(t),[t:neg(m)]t8".9290"(t)):nis(pw(x,m,mi,o),0c)
-x@lemma291:=ori2(nis(x,0c),pos(1rl),pos1):or(nis(x,0c),pos(1rl))
-+9291
-1a:=ntofrl(1rl,posintnatrl(1rl,pos1,intrl1)):nat
-t1:=posexp(x,1rl,intrl1,lemma291,pos1):is(pw(x,1rl,intrl1,lemma291),prod(1a,[t:1to(1a)]x))
-t2:=tris(nat,1,ntofrl(1rl,natrl1),ntofrl(1rl,posintnatrl(1rl,pos1,intrl1)),isntrl1(1),isrlent(1rl,natrl1,1rl,posintnatrl(1rl,pos1,intrl1),refis(real,1rl))):is"n"(1,1a)
-t3:=lessisi2"n"(1,1a,t2):lessis"n"(1,1a)
-t4:=issmpr([t:cx][u:cx]ts(t,u),1a,[t:1to(1a)]x,1,t2):is(prod(1,left(cx,1a,1,t3,[t:1to(1a)]x)),prod(1a,[t:1to(1a)]x))
-t5:=satz277([t:cx][u:cx]ts(t,u),left(cx,1a,1,t3,[t:1to(1a)]x)):is(prod(1,left(cx,1a,1,t3,[t:1to(1a)]x)),x)
-t6:=tris1(cx,prod(1a,[t:1to(1a)]x),x,prod(1,left(cx,1a,1,t3,[t:1to(1a)]x)),t4,t5):is(prod(1a,[t:1to(1a)]x),x)
--9291
-satz291:=tris(cx,pw(x,1rl,intrl1,lemma291),prod(1a".9291",[t:1to(1a".9291")]x),x,t1".9291",t6".9291"):is(pw(x,1rl,intrl1,lemma291),x)
-[y:cx][m:real][mi:intrl(m)][o:or(and(nis(x,0c),nis(y,0c)),pos(m))]
-+9292
-[a:and(nis(x,0c),nis(y,0c))]
-t1:=ande1(nis(x,0c),nis(y,0c),a):nis(x,0c)
-t2:=ande2(nis(x,0c),nis(y,0c),a):nis(y,0c)
-t3:=satz221d(x,y,t1,t2):nis(ts(x,y),0c)
--9292
-lemma292a:=th7"l.or"(and(nis(x,0c),nis(y,0c)),pos(m),nis(x,0c),o,[t:and(nis(x,0c),nis(y,0c))]t1".9292"(t)):or(nis(x,0c),pos(m))
-lemma292b:=th7"l.or"(and(nis(x,0c),nis(y,0c)),pos(m),nis(y,0c),o,[t:and(nis(x,0c),nis(y,0c))]t2".9292"(t)):or(nis(y,0c),pos(m))
-lemma292c:=th7"l.or"(and(nis(x,0c),nis(y,0c)),pos(m),nis(ts(x,y),0c),o,[t:and(nis(x,0c),nis(y,0c))]t3".9292"(t)):or(nis(ts(x,y),0c),pos(m))
-+*9292
-x@[n:nat]
-nr:=rlofnt(n):real
-t4:=natintrl(nr,natrli(n)):intrl(nr)
-t5:=ori2(nis(x,0c),pos(nr),natpos(nr,natrli(n))):or(nis(x,0c),pos(nr))
-p0:=pw(x,nr,t4,t5):cx
-x@t6:=tris(cx,p0(1),pw(x,1rl,intrl1,lemma291(x)),x,ispw1(x,x,1rl,refis(cx,x),intrl1,t5(1),lemma291(x)),satz291(x)):is(p0(1),x)
-n@n0:=ntofrl(nr,posintnatrl(nr,natpos(nr,natrli(n)),t4)):nat
-t7:=tris(nat,n,ntofrl(nr,natrli(n)),n0,isntrl1(n),isrlent(nr,natrli(n),nr,posintnatrl(nr,natpos(nr,natrli(n)),t4),refis(real,nr))):is"n"(n,n0)
-t8:=lessisi2"n"(n,n0,t7):lessis"n"(n,n0)
-t9:=posexp(x,nr,t4,t5,natpos(nr,natrli(n))):is(p0,prod(n0,[t:1to(n0)]x))
-t10:=issmpr([t:cx][u:cx]ts(t,u),n0,[t:1to(n0)]x,n,t7):is(prod(n,left(cx,n0,n,t8,[t:1to(n0)]x)),prod(n0,[t:1to(n0)]x))
-t11:=tris2(cx,p0,prod(n,[t:1to(n)]x),prod(n0,[t:1to(n0)]x),t9,t10):is(p0,prod(n,[t:1to(n)]x))
-n1:=pl"n"(n,1):nat
-t12:=lessisi1"n"(n,n1,satz18a(n,1)):lessis"n"(n,n1)
-t13:=satz278([t:cx][u:cx]ts(t,u),n,[t:1to(n1)]x):is(prod(n1,[t:1to(n1)]x),ts(prod(n,left(cx,n1,n,t12,[t:1to(n1)]x)),x))
-t14:=ists1(p0,prod(n,[t:1to(n)]x),x,t11):is(ts(p0,x),ts(prod(n,[t:1to(n)]x),x))
-t15:=tris2(cx,prod(n1,[t:1to(n1)]x),ts(p0,x),ts(prod(n,[t:1to(n)]x),x),t13,t14):is(prod(n1,[t:1to(n1)]x),ts(p0,x))
-t16:=tris(cx,p0(n1),prod(n1,[t:1to(n1)]x),ts(p0,x),t11(n1),t15):is(p0(n1),ts(p0(n),x))
-y@[n:nat]
-prop1:=is(p0(ts(x,y),n),ts(p0(x,n),p0(y,n))):'prop'
-y@t17:=ists12(p0(x,1),x,p0(y,1),y,t6(x),t6(y)):is(ts(p0(x,1),p0(y,1)),ts(x,y))
-t18:=tris2(cx,p0(ts(x,y),1),ts(p0(x,1),p0(y,1)),ts(x,y),t6(ts(x,y)),t17):prop1(1)
-n@[p:prop1(n)]
-t19:=ists1(p0(ts(x,y),n),ts(p0(x,n),p0(y,n)),ts(x,y),p):is(ts(p0(ts(x,y),n),ts(x,y)),ts(ts(p0(x,n),p0(y,n)),ts(x,y)))
-t20:=tr3is(cx,ts(ts(p0(x,n),p0(y,n)),x),ts(p0(x,n),ts(p0(y,n),x)),ts(p0(x,n),ts(x,p0(y,n))),ts(ts(p0(x,n),x),p0(y,n)),assts1(p0(x,n),p0(y,n),x),ists2(ts(p0(y,n),x),ts(x,p0(y,n)),p0(x,n),comts(p0(y,n),x)),assts2(p0(x,n),x,p0(y,n))):is(ts(ts(p0(x,n),p0(y,n)),x),ts(ts(p0(x,n),x),p0(y,n)))
-t21:=tr3is(cx,ts(ts(p0(x,n),p0(y,n)),ts(x,y)),ts(ts(ts(p0(x,n),p0(y,n)),x),y),ts(ts(ts(p0(x,n),x),p0(y,n)),y),ts(ts(p0(x,n),x),ts(p0(y,n),y)),assts2(ts(p0(x,n),p0(y,n)),x,y),ists1(ts(ts(p0(x,n),p0(y,n)),x),ts(ts(p0(x,n),x),p0(y,n)),y,t20),assts1(ts(p0(x,n),x),p0(y,n),y)):is(ts(ts(p0(x,n),p0(y,n)),ts(x,y)),ts(ts(p0(x,n),x),ts(p0(y,n),y)))
-t22:=tr3is(cx,p0(ts(x,y),n1(n)),ts(p0(ts(x,y),n),ts(x,y)),ts(ts(p0(x,n),p0(y,n)),ts(x,y)),ts(ts(p0(x,n),x),ts(p0(y,n),y)),t16(ts(x,y),n),t19,t21):is(p0(ts(x,y),n1(n)),ts(ts(p0(x,n),x),ts(p0(y,n),y)))
-t23:=ists12(p0(x,n1(n)),ts(p0(x,n),x),p0(y,n1(n)),ts(p0(y,n),y),t16(x,n),t16(y,n)):is(ts(p0(x,n1(n)),p0(y,n1(n))),ts(ts(p0(x,n),x),ts(p0(y,n),y)))
-t24:=tris2(cx,p0(ts(x,y),n1(n)),ts(p0(x,n1(n)),p0(y,n1(n))),ts(ts(p0(x,n),x),ts(p0(y,n),y)),t22,t23):prop1(n1(n))
-t25:=isp(nat,[t:nat]prop1(t),n1(n),<n>suc,t24,satz4a(n)):prop1(<n>suc)
-n@t26:=induction([t:nat]prop1(t),t18,[t:nat][u:prop1(t)]t25(t,u),n):prop1
-o@prop2:=is(pw(ts(x,y),m,mi,lemma292c),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b))):'prop'
-[p:pos(m)]
-t28:=posintnatrl(m,p,mi):natrl(m)
-m0:=ntofrl(m,t28):nat
-t29:=isrlnt1(m,t28):is"r"(m,nr(m0))
-t30:=isrlnt2(m,t28):is"r"(nr(m0),m)
-t31:=ispw2(ts(x,y),m,nr(m0),t29,mi,t4(ts(x,y),m0),lemma292c,t5(ts(x,y),m0)):is(pw(ts(x,y),m,mi,lemma292c),p0(ts(x,y),m0))
-t32:=ists12(p0(x,m0),pw(x,m,mi,lemma292a),p0(y,m0),pw(y,m,mi,lemma292b),ispw2(x,nr(m0),m,t30,t4(x,m0),mi,t5(x,m0),lemma292a),ispw2(y,nr(m0),m,t30,t4(y,m0),mi,t5(y,m0),lemma292b)):is(ts(p0(x,m0),p0(y,m0)),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)))
-t33:=tr3is(cx,pw(ts(x,y),m,mi,lemma292c),p0(ts(x,y),m0),ts(p0(x,m0),p0(y,m0)),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),t31,t26(m0),t32):prop2
-o@[i:is"r"(m,0)]
-t34:=tris(cx,ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ts(1c,1c),1c,ists12(pw(x,m,mi,lemma292a),1c,pw(y,m,mi,lemma292b),1c,0exp(x,m,mi,lemma292a,i),0exp(y,m,mi,lemma292b,i)),satz222(1c)):is(ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),1c)
-t35:=tris2(cx,pw(ts(x,y),m,mi,lemma292c),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),1c,0exp(ts(x,y),m,mi,lemma292c,i),t34):prop2
-o@[n:neg(m)]
-t36:=intabs(m,mi):intrl(abs(m))
-t37:=ori2(and(nis(x,0c),nis(y,0c)),pos(abs(m)),satz166b(m,n)):or(and(nis(x,0c),nis(y,0c)),pos(abs(m)))
-t38:=lemma292a(abs(m),t36,t37):or(nis(x,0c),pos(abs(m)))
-t39:=lemma292b(abs(m),t36,t37):or(nis(y,0c),pos(abs(m)))
-t40:=lemma292c(abs(m),t36,t37):or(nis(ts(x,y),0c),pos(abs(m)))
-t41:=lemmapw3(x,m,mi,lemma292a,n):or(nis(x,0c),pos(abs(m)))
-t42:=lemmapw3(y,m,mi,lemma292b,n):or(nis(y,0c),pos(abs(m)))
-t43:=lemmapw3(ts(x,y),m,mi,lemma292c,n):or(nis(ts(x,y),0c),pos(abs(m)))
-t44:=ispw2(ts(x,y),abs(m),abs(m),refis(real,abs(m)),t36,t36,t43,t40):is(pw(ts(x,y),abs(m),t36,t43),pw(ts(x,y),abs(m),t36,t40))
-t45:=t33(abs(m),t36,t37,satz166b(m,n)):is(pw(ts(x,y),abs(m),t36,t40),ts(pw(x,abs(m),t36,t38),pw(y,abs(m),t36,t39)))
-t46:=ists12(pw(x,abs(m),t36,t38),pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t39),pw(y,abs(m),t36,t42),ispw2(x,abs(m),abs(m),refis(real,abs(m)),t36,t36,t38,t41),ispw2(y,abs(m),abs(m),refis(real,abs(m)),t36,t36,t39,t42)):is(ts(pw(x,abs(m),t36,t38),pw(y,abs(m),t36,t39)),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)))
-t47:=tr3is(cx,pw(ts(x,y),abs(m),t36,t43),pw(ts(x,y),abs(m),t36,t40),ts(pw(x,abs(m),t36,t38),pw(y,abs(m),t36,t39)),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t44,t45,t46):is(pw(ts(x,y),abs(m),t36,t43),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)))
-t48:=lemmapw1(x,abs(m),t36,t41,satz166b(m,n),lemmapw2(x,m,mi,lemma292a,n)):nis(pw(x,abs(m),t36,t41),0c)
-t49:=lemmapw1(y,abs(m),t36,t42,satz166b(m,n),lemmapw2(y,m,mi,lemma292b,n)):nis(pw(y,abs(m),t36,t42),0c)
-t50:=lemmapw1(ts(x,y),abs(m),t36,t43,satz166b(m,n),lemmapw2(ts(x,y),m,mi,lemma292c,n)):nis(pw(ts(x,y),abs(m),t36,t43),0c)
-t51:=satz221d(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42),t48,t49):nis(ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),0c)
-t52:=negexp(ts(x,y),m,mi,lemma292c,n):is(pw(ts(x,y),m,mi,lemma292c),ov(1c,pw(ts(x,y),abs(m),t36,t43),t50))
-t53:=isov12(1c,ts(1c,1c),pw(ts(x,y),abs(m),t36,t43),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),satz222a(1c),t47,t50,t51):is(ov(1c,pw(ts(x,y),abs(m),t36,t43),t50),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51))
-t54:=tris(cx,pw(ts(x,y),m,mi,lemma292c),ov(1c,pw(ts(x,y),abs(m),t36,t43),t50),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51),t52,t53):is(pw(ts(x,y),m,mi,lemma292c),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51))
-t55:=ists12(pw(x,m,mi,lemma292a),ov(1c,pw(x,abs(m),t36,t41),t48),pw(y,m,mi,lemma292b),ov(1c,pw(y,abs(m),t36,t42),t49),negexp(x,m,mi,lemma292a,n),negexp(y,m,mi,lemma292b,n)):is(ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ts(ov(1c,pw(x,abs(m),t36,t41),t48),ov(1c,pw(y,abs(m),t36,t42),t49)))
-t56:=satz247(1c,pw(x,abs(m),t36,t41),1c,pw(y,abs(m),t36,t42),t48,t49):is(ts(ov(1c,pw(x,abs(m),t36,t41),t48),ov(1c,pw(y,abs(m),t36,t42),t49)),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51))
-t57:=tris(cx,ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ts(ov(1c,pw(x,abs(m),t36,t41),t48),ov(1c,pw(y,abs(m),t36,t42),t49)),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51),t55,t56):is(ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51))
-t58:=tris2(cx,pw(ts(x,y),m,mi,lemma292c),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)),ov(ts(1c,1c),ts(pw(x,abs(m),t36,t41),pw(y,abs(m),t36,t42)),t51),t54,t57):prop2
--9292
-o@satz292:=rapp(m,prop2".9292",[t:pos(m)]t33".9292"(t),[t:is"r"(m,0)]t35".9292"(t),[t:neg(m)]t58".9292"(t)):is(pw(ts(x,y),m,mi,lemma292c),ts(pw(x,m,mi,lemma292a),pw(y,m,mi,lemma292b)))
-@[m:real]
-lemma293:=ori1(nis(1c,0c),pos(m),1not0):or(nis(1c,0c),pos(m))
-[mi:intrl(m)]
-+9293
-t1:=ori1(and(nis(1c,0c),nis(1c,0c)),pos(m),andi(nis(1c,0c),nis(1c,0c),1not0,1not0)):or(and(nis(1c,0c),nis(1c,0c)),pos(m))
-1m:=pw(1c,m,mi,lemma293):cx
-t2:=satz222(1m):is(ts(1m,1c),1m)
-t3:=ispw1(1c,ts(1c,1c),m,satz222a(1c),mi,lemma293,lemma292c(1c,1c,m,mi,t1)):is(1m,pw(ts(1c,1c),m,mi,lemma292c(1c,1c,m,mi,t1)))
-t4:=satz292(1c,1c,m,mi,t1):is(pw(ts(1c,1c),m,mi,lemma292c(1c,1c,m,mi,t1)),ts(pw(1c,m,mi,lemma292a(1c,1c,m,mi,t1)),pw(1c,m,mi,lemma292b(1c,1c,m,mi,t1))))
-t5:=ists12(pw(1c,m,mi,lemma292a(1c,1c,m,mi,t1)),1m,pw(1c,m,mi,lemma292b(1c,1c,m,mi,t1)),1m,ispw1(1c,1c,m,refis(cx,1c),mi,lemma292a(1c,1c,m,mi,t1),lemma293),ispw1(1c,1c,m,refis(cx,1c),mi,lemma292b(1c,1c,m,mi,t1),lemma293)):is(ts(pw(1c,m,mi,lemma292a(1c,1c,m,mi,t1)),pw(1c,m,mi,lemma292b(1c,1c,m,mi,t1))),ts(1m,1m))
-t6:=tr4is(cx,ts(1m,1c),1m,pw(ts(1c,1c),m,mi,lemma292c(1c,1c,m,mi,t1)),ts(pw(1c,m,mi,lemma292a(1c,1c,m,mi,t1)),pw(1c,m,mi,lemma292b(1c,1c,m,mi,t1))),ts(1m,1m),t2,t3,t4,t5):is(ts(1m,1c),ts(1m,1m))
-t7:=tris(cx,ts(1m,mn(1m,1c)),mn(ts(1m,1m),ts(1m,1c)),0c,disttm2(1m,1m,1c),satz213b(ts(1m,1m),ts(1m,1c),symis(cx,ts(1m,1c),ts(1m,1m),t6))):is(ts(1m,mn(1m,1c)),0c)
-t8:=ore2(is(1m,0c),is(mn(1m,1c),0c),satz221c(1m,mn(1m,1c),t7),satz290(1c,m,mi,lemma293,1not0)):is(mn(1m,1c),0c)
--9293
-satz293:=satz213a(1m".9293",1c,t8".9293"):is(pw(1c,m,mi,lemma293),1c)
-x@[m:real][n:real][mi:intrl(m)][ni:intrl(n)][o:or(nis(x,0c),and(pos(m),pos(n)))]
-+9294
-[a:and(pos(m),pos(n))]
-t1:=ande1(pos(m),pos(n),a):pos(m)
-t2:=ande2(pos(m),pos(n),a):pos(n)
-t3:=pospl(m,n,t1,t2):pos(pl"r"(m,n))
--9294
-lemma294a:=th8"l.or"(nis(x,0c),and(pos(m),pos(n)),pos(m),o,[t:and(pos(m),pos(n))]t1".9294"(t)):or(nis(x,0c),pos(m))
-lemma294b:=th8"l.or"(nis(x,0c),and(pos(m),pos(n)),pos(n),o,[t:and(pos(m),pos(n))]t2".9294"(t)):or(nis(x,0c),pos(n))
-lemma294c:=th8"l.or"(nis(x,0c),and(pos(m),pos(n)),pos(pl"r"(m,n)),o,[t:and(pos(m),pos(n))]t3".9294"(t)):or(nis(x,0c),pos(pl"r"(m,n)))
-+*9294
-o@prop1:=is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c)):'prop'
-a@m1:=ntofrl(m,posintnatrl(m,t1,mi)):nat
-n1:=ntofrl(n,posintnatrl(n,t2,ni)):nat
-t4:=ists12(pw(x,m,mi,lemma294a),prod(m1,[t:1to(m1)]x),pw(x,n,ni,lemma294b),prod(n1,[t:1to(n1)]x),posexp(x,m,mi,lemma294a,t1),posexp(x,n,ni,lemma294b,t2)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(prod(m1,[t:1to(m1)]x),prod(n1,[t:1to(n1)]x)))
-p1:=ntofrl(pl"r"(m,n),posintnatrl(pl"r"(m,n),t3,intpl(m,mi,n,ni))):nat
-t5:=posexp(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t3):is(pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),prod(p1,[t:1to(p1)]x))
-t6:=tris(real,pl"r"(m,n),pl"r"(rlofnt(m1),rlofnt(n1)),rlofnt(pl"n"(m1,n1)),ispl12"r"(m,rlofnt(m1),n,rlofnt(n1),isrlnt1(m,posintnatrl(m,t1,mi)),isrlnt1(n,posintnatrl(n,t2,ni))),satzr155b(m1,n1)):is"r"(pl"r"(m,n),rlofnt(pl"n"(m1,n1)))
-t7:=tris2(nat,pl"n"(m1,n1),p1,ntofrl(rlofnt(pl"n"(m1,n1)),natrli(pl"n"(m1,n1))),isntrl1(pl"n"(m1,n1)),isrlent(pl"r"(m,n),posintnatrl(pl"r"(m,n),t3,intpl(m,mi,n,ni)),rlofnt(pl"n"(m1,n1)),natrli(pl"n"(m1,n1)),t6)):is"n"(pl"n"(m1,n1),p1)
-t8:=lessisi2"n"(pl"n"(m1,n1),p1,t7):lessis"n"(pl"n"(m1,n1),p1)
-t9:=issmpr([t:cx][u:cx]ts(t,u),p1,[t:1to(p1)]x,pl"n"(m1,n1),t7):is(prod(pl"n"(m1,n1),left(cx,p1,pl"n"(m1,n1),t8,[t:1to(p1)]x)),prod(p1,[t:1to(p1)]x))
-t10:=tris2(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),prod(pl"n"(m1,n1),[t:1to(pl"n"(m1,n1))]x),prod(p1,[t:1to(p1)]x),t5,t9):is(pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),prod(pl"n"(m1,n1),[t:1to(pl"n"(m1,n1))]x))
-t11:=lessisi1"n"(m1,pl"n"(m1,n1),satz18a(m1,n1)):lessis"n"(m1,pl"n"(m1,n1))
-t12:=satz281([t:cx][u:cx]ts(t,u),assocts,m1,n1,[t:1to(pl"n"(m1,n1))]x):is(prod(pl"n"(m1,n1),[t:1to(pl"n"(m1,n1))]x),ts(prod(m1,left(cx,pl"n"(m1,n1),m1,t11,[t:1to(pl"n"(m1,n1))]x)),prod(n1,right(cx,m1,n1,[t:1to(pl"n"(m1,n1))]x))))
-t13:=tris(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),prod(pl"n"(m1,n1),[t:1to(pl"n"(m1,n1))]x),ts(prod(m1,[t:1to(m1)]x),prod(n1,[t:1to(n1)]x)),t10,t12):is(pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),ts(prod(m1,[t:1to(m1)]x),prod(n1,[t:1to(n1)]x)))
-t14:=tris2(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),ts(prod(m1,[t:1to(m1)]x),prod(n1,[t:1to(n1)]x)),t4,t13):prop1
-o@[na:not(and(pos(m),pos(n)))]
-t15:=ore1(nis(x,0c),and(pos(m),pos(n)),o,na):nis(x,0c)
-t16:=th15"l.or"(pos(m),pos(n),na):or(not(pos(m)),not(pos(n)))
-o@am:=abs(m):real
-an:=abs(n):real
-ap:=abs(pl"r"(m,n)):real
-t17:=intabs(m,mi):intrl(am)
-t18:=intabs(n,ni):intrl(an)
-t19:=intabs(pl"r"(m,n),intpl(m,mi,n,ni)):intrl(ap)
-na@[nm:neg(m)][nn:neg(n)]
-t20:=andi(pos(am),pos(an),satz166e(m,nnot0(m,nm)),satz166e(n,nnot0(n,nn))):and(pos(am),pos(an))
-t21:=ori2(nis(x,0c),and(pos(am),pos(an)),t20):or(nis(x,0c),and(pos(am),pos(an)))
-t22:=lemmapw3(x,m,mi,lemma294a,nm):or(nis(x,0c),pos(am))
-t23:=lemmapw3(x,n,ni,lemma294b,nn):or(nis(x,0c),pos(an))
-t24:=lemma294a(x,am,an,t17,t18,t21):or(nis(x,0c),pos(am))
-t25:=lemma294b(x,am,an,t17,t18,t21):or(nis(x,0c),pos(an))
-t26:=ists12(pw(x,am,t17,t22),pw(x,am,t17,t24),pw(x,an,t18,t23),pw(x,an,t18,t25),ispw1(x,x,am,refis(cx,x),t17,t22,t24),ispw1(x,x,an,refis(cx,x),t18,t23,t25)):is(ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),ts(pw(x,am,t17,t24),pw(x,an,t18,t25)))
-t27:=lemma294c(x,am,an,t17,t18,t21):or(nis(x,0c),pos(pl"r"(am,an)))
-t28:=t14(x,am,an,t17,t18,t21,t20):is(ts(pw(x,am,t17,t24),pw(x,an,t18,t25)),pw(x,pl"r"(am,an),intpl(am,t17,an,t18),t27))
-t29:=tr3is(real,pl"r"(am,an),pl"r"(m0"r"(m),m0"r"(n)),m0"r"(pl"r"(m,n)),ap,ispl12"r"(am,m0"r"(m),an,m0"r"(n),absn(m,nm),absn(n,nn)),satz180a(m,n),symis(real,ap,m0"r"(pl"r"(m,n)),absn(pl"r"(m,n),negpl(m,n,nm,nn)))):is"r"(pl"r"(am,an),ap)
-t30:=lemmapw3(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,negpl(m,n,nm,nn)):or(nis(x,0c),pos(ap))
-t31:=ispw2(x,pl"r"(am,an),ap,t29,intpl(am,t17,an,t18),t19,t27,t30):is(pw(x,pl"r"(am,an),intpl(am,t17,an,t18),t27),pw(x,ap,t19,t30))
-t32:=tr3is(cx,ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),ts(pw(x,am,t17,t24),pw(x,an,t18,t25)),pw(x,pl"r"(am,an),intpl(am,t17,an,t18),t27),pw(x,ap,t19,t30),t26,t28,t31):is(ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),pw(x,ap,t19,t30))
-t33:=lemmapw1(x,am,t17,t22,satz166b(m,nm),lemmapw2(x,m,mi,lemma294a,nm)):nis(pw(x,am,t17,t22),0c)
-t34:=lemmapw1(x,an,t18,t23,satz166b(n,nn),lemmapw2(x,n,ni,lemma294b,nn)):nis(pw(x,an,t18,t23),0c)
-t35:=lemmapw1(x,ap,t19,t30,satz166b(pl"r"(m,n),negpl(m,n,nm,nn)),lemmapw2(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,negpl(m,n,nm,nn))):nis(pw(x,ap,t19,t30),0c)
-t36:=ists12(pw(x,m,mi,lemma294a),ov(1c,pw(x,am,t17,t22),t33),pw(x,n,ni,lemma294b),ov(1c,pw(x,an,t18,t23),t34),negexp(x,m,mi,lemma294a,nm),negexp(x,n,ni,lemma294b,nn)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(ov(1c,pw(x,am,t17,t22),t33),ov(1c,pw(x,an,t18,t23),t34)))
-t37:=satz221d(pw(x,am,t17,t22),pw(x,an,t18,t23),t33,t34):nis(ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),0c)
-t38:=satz247(1c,pw(x,am,t17,t22),1c,pw(x,an,t18,t23),t33,t34):is(ts(ov(1c,pw(x,am,t17,t22),t33),ov(1c,pw(x,an,t18,t23),t34)),ov(ts(1c,1c),ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),t37))
-t39:=isov12(ts(1c,1c),1c,ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),pw(x,ap,t19,t30),satz222(1c),t32,t37,t35):is(ov(ts(1c,1c),ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),t37),ov(1c,pw(x,ap,t19,t30),t35))
-t40:=symis(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),ov(1c,pw(x,ap,t19,t30),t35),negexp(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,negpl(m,n,nm,nn))):is(ov(1c,pw(x,ap,t19,t30),t35),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-t41:=tr4is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(ov(1c,pw(x,am,t17,t22),t33),ov(1c,pw(x,an,t18,t23),t34)),ov(ts(1c,1c),ts(pw(x,am,t17,t22),pw(x,an,t18,t23)),t37),ov(1c,pw(x,ap,t19,t30),t35),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t36,t38,t39,t40):prop1
-na@[pm:pos(m)][nn:neg(n)]
-t42:=lemmapw3(x,n,ni,lemma294b,nn):or(nis(x,0c),pos(an))
-t43:=lemmapw1(x,an,t18,t42,satz166b(n,nn),lemmapw2(x,n,ni,lemma294b,nn)):nis(pw(x,an,t18,t42),0c)
-t44:=ists2(pw(x,n,ni,lemma294b),ov(1c,pw(x,an,t18,t42),t43),pw(x,m,mi,lemma294a),negexp(x,n,ni,lemma294b,nn)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,lemma294a),ov(1c,pw(x,an,t18,t42),t43)))
-t45:=satz244a(pw(x,m,mi,lemma294a),1c,pw(x,an,t18,t42),t43):is(ts(pw(x,m,mi,lemma294a),ov(1c,pw(x,an,t18,t42),t43)),ov(ts(pw(x,m,mi,lemma294a),1c),pw(x,an,t18,t42),t43))
-t46:=isov1(ts(pw(x,m,mi,lemma294a),1c),pw(x,m,mi,lemma294a),pw(x,an,t18,t42),satz222(pw(x,m,mi,lemma294a)),t43):is(ov(ts(pw(x,m,mi,lemma294a),1c),pw(x,an,t18,t42),t43),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43))
-t47:=tr3is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,lemma294a),ov(1c,pw(x,an,t18,t42),t43)),ov(ts(pw(x,m,mi,lemma294a),1c),pw(x,an,t18,t42),t43),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),t44,t45,t46):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43))
-[casea:more(m,an)]
-t48:=satz182d(m,an,casea):pos(mn"r"(m,an))
-t49:=satz166e(n,nnot0(n,nn)):pos(an)
-t50:=andi(pos(an),pos(mn"r"(m,an)),t49,t48):and(pos(an),pos(mn"r"(m,an)))
-t51:=ori2(nis(x,0c),and(pos(an),pos(mn"r"(m,an))),t50):or(nis(x,0c),and(pos(an),pos(mn"r"(m,an))))
-t52:=intmn(m,mi,an,t18):intrl(mn"r"(m,an))
-t53:=lemma294a(x,an,mn"r"(m,an),t18,t52,t51):or(nis(x,0c),pos(an))
-t54:=lemma294b(x,an,mn"r"(m,an),t18,t52,t51):or(nis(x,0c),pos(mn"r"(m,an)))
-t55:=lemma294c(x,an,mn"r"(m,an),t18,t52,t51):or(nis(x,0c),pos(pl"r"(an,mn"r"(m,an))))
-t56:=intpl(an,t18,mn"r"(m,an),t52):intrl(pl"r"(an,mn"r"(m,an)))
-t57:=t14(x,an,mn"r"(m,an),t18,t52,t51,t50):is(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,pl"r"(an,mn"r"(m,an)),t56,t55))
-t58:=satz187a(m,an):is"r"(pl"r"(an,mn"r"(m,an)),m)
-t59:=ispw2(x,pl"r"(an,mn"r"(m,an)),m,t58,t56,mi,t55,lemma294a):is(pw(x,pl"r"(an,mn"r"(m,an)),t56,t55),pw(x,m,mi,lemma294a))
-t60:=tris(cx,ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,pl"r"(an,mn"r"(m,an)),t56,t55),pw(x,m,mi,lemma294a),t57,t59):is(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,m,mi,lemma294a))
-t61:=ispw1(x,x,an,refis(cx,x),t18,t53,t42):is(pw(x,an,t18,t53),pw(x,an,t18,t42))
-t62:=isp1(cx,[t:cx]nis(t,0c),pw(x,an,t18,t42),pw(x,an,t18,t53),t43,t61):nis(pw(x,an,t18,t53),0c)
-t63:=isov12(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,m,mi,lemma294a),pw(x,an,t18,t53),pw(x,an,t18,t42),t60,t61,t62,t43):is(ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43))
-t64:=tris2(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),t47,t63):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62))
-t65:=satz229h(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54),t62,refis(cx,ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)))):is(ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62),pw(x,mn"r"(m,an),t52,t54))
-t66:=tris(real,mn"r"(m,an),mn"r"(m,m0"r"(n)),pl"r"(m,n),ismn2"r"(an,m0"r"(n),m,absn(n,nn)),ispl2"r"(m0"r"(m0"r"(n)),n,m,satz177(n))):is"r"(mn"r"(m,an),pl"r"(m,n))
-t67:=ispw2(x,mn"r"(m,an),pl"r"(m,n),t66,t52,intpl(m,mi,n,ni),t54,lemma294c):is(pw(x,mn"r"(m,an),t52,t54),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-t68:=tr3is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,an,t18,t53),pw(x,mn"r"(m,an),t52,t54)),pw(x,an,t18,t53),t62),pw(x,mn"r"(m,an),t52,t54),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t64,t65,t67):prop1
-nn@[caseb:is"r"(m,an)]
-t69:=ispw2(x,m,an,caseb,mi,t18,lemma294a,t42):is(pw(x,m,mi,lemma294a),pw(x,an,t18,t42))
-t70:=satz251a(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43,t69):is(ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),1c)
-t71:=tr3is(real,pl"r"(m,n),mn"r"(m,m0"r"(n)),mn"r"(m,an),0,ispl2"r"(n,m0"r"(m0"r"(n)),m,satz177a(n)),ismn2"r"(m0"r"(n),an,m,symis(real,an,m0"r"(n),absn(n,nn))),satz182e(m,an,caseb)):is"r"(pl"r"(m,n),0)
-t72:=symis(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),1c,0exp(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t71)):is(1c,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-t73:=tr3is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),1c,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t47,t70,t72):prop1
-nn@[casec:less(m,an)]
-t74:=satz182d(an,m,lemma2"r"(m,an,casec)):pos(mn"r"(an,m))
-t75:=andi(pos(m),pos(mn"r"(an,m)),pm,t74):and(pos(m),pos(mn"r"(an,m)))
-t76:=ori2(nis(x,0c),and(pos(m),pos(mn"r"(an,m))),t75):or(nis(x,0c),and(pos(m),pos(mn"r"(an,m))))
-t77:=intmn(an,t18,m,mi):intrl(mn"r"(an,m))
-t78:=lemma294a(x,m,mn"r"(an,m),mi,t77,t76):or(nis(x,0c),pos(m))
-t79:=lemma294b(x,m,mn"r"(an,m),mi,t77,t76):or(nis(x,0c),pos(mn"r"(an,m)))
-t80:=lemma294c(x,m,mn"r"(an,m),mi,t77,t76):or(nis(x,0c),pos(pl"r"(m,mn"r"(an,m))))
-t81:=intpl(m,mi,mn"r"(an,m),t77):intrl(pl"r"(m,mn"r"(an,m)))
-t81a:=t14(x,m,mn"r"(an,m),mi,t77,t76,t75):is(ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),pw(x,pl"r"(m,mn"r"(an,m)),t81,t80))
-t82:=satz187a(an,m):is"r"(pl"r"(m,mn"r"(an,m)),an)
-t83:=ispw2(x,pl"r"(m,mn"r"(an,m)),an,t82,t81,t18,t80,t42):is(pw(x,pl"r"(m,mn"r"(an,m)),t81,t80),pw(x,an,t18,t42))
-t84:=tris(cx,ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),pw(x,pl"r"(m,mn"r"(an,m)),t81,t80),pw(x,an,t18,t42),t81a,t83):is(ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),pw(x,an,t18,t42))
-t85:=satz290(x,m,mi,t78,t15):nis(pw(x,m,mi,t78),0c)
-t86:=satz290(x,mn"r"(an,m),t77,t79,t15):nis(pw(x,mn"r"(an,m),t77,t79),0c)
-t87:=satz221d(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79),t85,t86):nis(ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),0c)
-t88:=satz222(pw(x,m,mi,t78)):is(ts(pw(x,m,mi,t78),1c),pw(x,m,mi,t78))
-t89:=ispw1(x,x,m,refis(cx,x),mi,t78,lemma294a):is(pw(x,m,mi,t78),pw(x,m,mi,lemma294a))
-t90:=tris(cx,ts(pw(x,m,mi,t78),1c),pw(x,m,mi,t78),pw(x,m,mi,lemma294a),t88,t89):is(ts(pw(x,m,mi,t78),1c),pw(x,m,mi,lemma294a))
-t91:=isov12(ts(pw(x,m,mi,t78),1c),pw(x,m,mi,lemma294a),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),pw(x,an,t18,t42),t90,t84,t87,t43):is(ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43))
-t92:=tris2(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87),ov(pw(x,m,mi,lemma294a),pw(x,an,t18,t42),t43),t47,t91):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87))
-t93:=satz246a(1c,pw(x,mn"r"(an,m),t77,t79),pw(x,m,mi,t78),t86,t85):is(ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87),ov(1c,pw(x,mn"r"(an,m),t77,t79),t86))
-t94:=satz182f(m,an,casec):neg(mn"r"(m,an))
-t94a:=tris(real,mn"r"(m,an),mn"r"(m,m0"r"(n)),pl"r"(m,n),ismn2"r"(an,m0"r"(n),m,absn(n,nn)),ispl2"r"(m0"r"(m0"r"(n)),n,m,satz177(n))):is"r"(mn"r"(m,an),pl"r"(m,n))
-t95:=tr3is(real,mn"r"(an,m),m0"r"(mn"r"(m,an)),abs(mn"r"(m,an)),ap,satz181a(an,m),symis(real,abs(mn"r"(m,an)),m0"r"(mn"r"(m,an)),absn(mn"r"(m,an),t94)),isabs(mn"r"(m,an),pl"r"(m,n),t94a)):is"r"(mn"r"(an,m),ap)
-t96:=isp(real,[t:real]neg(t),mn"r"(m,an),pl"r"(m,n),t94,t94a):neg(pl"r"(m,n))
-t97:=lemmapw3(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t96):or(nis(x,0c),pos(ap))
-t98:=lemmapw1(x,ap,t19,t97,satz166b(pl"r"(m,n),t96),lemmapw2(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t96)):nis(pw(x,ap,t19,t97),0c)
-t99:=ispw2(x,mn"r"(an,m),ap,t95,t77,t19,t79,t97):is(pw(x,mn"r"(an,m),t77,t79),pw(x,ap,t19,t97))
-t100:=isov2(pw(x,mn"r"(an,m),t77,t79),pw(x,ap,t19,t97),1c,t99,t86,t98):is(ov(1c,pw(x,mn"r"(an,m),t77,t79),t86),ov(1c,pw(x,ap,t19,t97),t98))
-t101:=symis(cx,pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),ov(1c,pw(x,ap,t19,t97),t98),negexp(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c,t96)):is(ov(1c,pw(x,ap,t19,t97),t98),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-t102:=tr4is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ov(ts(pw(x,m,mi,t78),1c),ts(pw(x,m,mi,t78),pw(x,mn"r"(an,m),t77,t79)),t87),ov(1c,pw(x,mn"r"(an,m),t77,t79),t86),ov(1c,pw(x,ap,t19,t97),t98),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t92,t93,t100,t101):prop1
-nn@t103:=or3app(is"r"(m,an),more(m,an),less(m,an),prop1,satz167a(m,an),[t:is"r"(m,an)]t73(t),[t:more(m,an)]t68(t),[t:less(m,an)]t102(t)):prop1
-na@[nm:neg(m)][qn:pos(n)]
-na@t104:=ori1(nis(x,0c),and(pos(n),pos(m)),t15):or(nis(x,0c),and(pos(n),pos(m)))
-t104a:=th5"l.and"(pos(m),pos(n),na):not(and(pos(n),pos(m)))
-t105:=lemma294a(x,n,m,ni,mi,t104):or(nis(x,0c),pos(n))
-t106:=lemma294b(x,n,m,ni,mi,t104):or(nis(x,0c),pos(m))
-t107:=lemma294c(x,n,m,ni,mi,t104):or(nis(x,0c),pos(pl"r"(n,m)))
-t108:=ists12(pw(x,m,mi,lemma294a),pw(x,m,mi,t106),pw(x,n,ni,lemma294b),pw(x,n,ni,t105),ispw1(x,x,m,refis(cx,x),mi,lemma294a,t106),ispw1(x,x,n,refis(cx,x),ni,lemma294b,t105)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,t106),pw(x,n,ni,t105)))
-t109:=comts(pw(x,m,mi,t106),pw(x,n,ni,t105)):is(ts(pw(x,m,mi,t106),pw(x,n,ni,t105)),ts(pw(x,n,ni,t105),pw(x,m,mi,t106)))
-qn@t110:=t103(x,n,m,ni,mi,t104,t104a,qn,nm):is(ts(pw(x,n,ni,t105),pw(x,m,mi,t106)),pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107))
-na@t111:=ispw2(x,pl"r"(n,m),pl"r"(m,n),compl"r"(n,m),intpl(n,ni,m,mi),intpl(m,mi,n,ni),t107,lemma294c):is(pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-qn@t112:=tr4is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,t106),pw(x,n,ni,t105)),ts(pw(x,n,ni,t105),pw(x,m,mi,t106)),pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t108,t109,t110,t111):prop1
-na@[i:is"r"(m,0)]
-t113:=ists1(pw(x,m,mi,lemma294a),1c,pw(x,n,ni,lemma294b),0exp(x,m,mi,lemma294a,i)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(1c,pw(x,n,ni,lemma294b)))
-t114:=satz222b(pw(x,n,ni,lemma294b)):is(ts(1c,pw(x,n,ni,lemma294b)),pw(x,n,ni,lemma294b))
-t115:=symis(real,pl"r"(m,n),n,pl01"r"(m,n,i)):is"r"(n,pl"r"(m,n))
-t116:=ispw2(x,n,pl"r"(m,n),t115,ni,intpl(m,mi,n,ni),lemma294b,lemma294c):is(pw(x,n,ni,lemma294b),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-t117:=tr3is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(1c,pw(x,n,ni,lemma294b)),pw(x,n,ni,lemma294b),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t113,t114,t116):prop1
-na@[i:is"r"(n,0)]
-t118:=t117(x,n,m,ni,mi,t104,t104a,i):is(ts(pw(x,n,ni,t105),pw(x,m,mi,t106)),pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107))
-t119:=tr4is(cx,ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),ts(pw(x,m,mi,t106),pw(x,n,ni,t105)),ts(pw(x,n,ni,t105),pw(x,m,mi,t106)),pw(x,pl"r"(n,m),intpl(n,ni,m,mi),t107),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c),t108,t109,t118,t111):prop1
-na@[pm:pos(m)]
-t120:=ore2(not(pos(m)),not(pos(n)),t16,weli(pos(m),pm)):not(pos(n))
-t121:=rapp(n,prop1,th2"l.imp"(pos(n),prop1,t120),[t:is"r"(n,0)]t119(t),[t:neg(n)]t103(pm,t)):prop1
-na@[nm:neg(m)]
-t122:=rapp(n,prop1,[t:pos(n)]t112(nm,t),[t:is"r"(n,0)]t119(t),[t:neg(n)]t41(nm,t)):prop1
-na@t123:=rapp(m,prop1,[t:pos(m)]t121(t),[t:is"r"(m,0)]t117(t),[t:neg(m)]t122(t)):prop1
--9294
-o@satz294:=th1"l.imp"(and(pos(m),pos(n)),prop1".9294",[t:and(pos(m),pos(n))]t14".9294"(t),[t:not(and(pos(m),pos(n)))]t123".9294"(t)):is(ts(pw(x,m,mi,lemma294a),pw(x,n,ni,lemma294b)),pw(x,pl"r"(m,n),intpl(m,mi,n,ni),lemma294c))
-ni@[o:nis(x,0c)]
-lemma295a:=ori1(nis(x,0c),pos(m),o):or(nis(x,0c),pos(m))
-lemma295b:=ori1(nis(x,0c),pos(n),o):or(nis(x,0c),pos(n))
-lemma295c:=ori1(nis(x,0c),pos(mn"r"(m,n)),o):or(nis(x,0c),pos(mn"r"(m,n)))
-+9295
-t1:=ori1(nis(x,0c),and(pos(mn"r"(m,n)),pos(n)),o):or(nis(x,0c),and(pos(mn"r"(m,n)),pos(n)))
-t2:=intmn(m,mi,n,ni):intrl(mn"r"(m,n))
-t3:=lemma294a(x,mn"r"(m,n),n,t2,ni,t1):or(nis(x,0c),pos(mn"r"(m,n)))
-t4:=lemma294b(x,mn"r"(m,n),n,t2,ni,t1):or(nis(x,0c),pos(n))
-t5:=lemma294c(x,mn"r"(m,n),n,t2,ni,t1):or(nis(x,0c),pos(pl"r"(mn"r"(m,n),n)))
-t6:=ists12(pw(x,mn"r"(m,n),t2,lemma295c),pw(x,mn"r"(m,n),t2,t3),pw(x,n,ni,lemma295b),pw(x,n,ni,t4),ispw1(x,x,mn"r"(m,n),refis(cx,x),t2,lemma295c,t3),ispw1(x,x,n,refis(cx,x),ni,lemma295b,t4)):is(ts(pw(x,mn"r"(m,n),t2,lemma295c),pw(x,n,ni,lemma295b)),ts(pw(x,mn"r"(m,n),t2,t3),pw(x,n,ni,t4)))
-t7:=satz294(x,mn"r"(m,n),n,t2,ni,t1):is(ts(pw(x,mn"r"(m,n),t2,t3),pw(x,n,ni,t4)),pw(x,pl"r"(mn"r"(m,n),n),intpl(mn"r"(m,n),t2,n,ni),t5))
-t8:=plmn(m,n):is"r"(pl"r"(mn"r"(m,n),n),m)
-t9:=ispw2(x,pl"r"(mn"r"(m,n),n),m,t8,intpl(mn"r"(m,n),t2,n,ni),mi,t5,lemma295a):is(pw(x,pl"r"(mn"r"(m,n),n),intpl(mn"r"(m,n),t2,n,ni),t5),pw(x,m,mi,lemma295a))
-t10:=tr3is(cx,ts(pw(x,mn"r"(m,n),t2,lemma295c),pw(x,n,ni,lemma295b)),ts(pw(x,mn"r"(m,n),t2,t3),pw(x,n,ni,t4)),pw(x,pl"r"(mn"r"(m,n),n),intpl(mn"r"(m,n),t2,n,ni),t5),pw(x,m,mi,lemma295a),t6,t7,t9):is(ts(pw(x,mn"r"(m,n),t2,lemma295c),pw(x,n,ni,lemma295b)),pw(x,m,mi,lemma295a))
-t11:=satz290(x,n,ni,lemma295b,o):nis(pw(x,n,ni,lemma295b),0c)
--9295
-satz295:=satz229k(pw(x,m,mi,lemma295a),pw(x,n,ni,lemma295b),pw(x,mn"r"(m,n),t2".9295",lemma295c),t11".9295",t10".9295"):is(ov(pw(x,m,mi,lemma295a),pw(x,n,ni,lemma295b),satz290(x,n,ni,lemma295b,o)),pw(x,mn"r"(m,n),intmn(m,mi,n,ni),lemma295c))
-m@[mi:intrl(m)][n:nis(x,0c)]
-lemma296:=ori1(nis(x,0c),pos(m),n):or(nis(x,0c),pos(m))
-+9296
-t1:=intrli0(0,refis(real,0)):intrl(0)
-t2:=lemma295a(x,0,m,t1,mi,n):or(nis(x,0c),pos(0))
-t3:=lemma295b(x,0,m,t1,mi,n):or(nis(x,0c),pos(m))
-t4:=lemma295c(x,0,m,t1,mi,n):or(nis(x,0c),pos(mn"r"(0,m)))
-t5:=satz290(x,m,mi,lemma296,n):nis(pw(x,m,mi,lemma296),0c)
-t6:=satz290(x,m,mi,t3,n):nis(pw(x,m,mi,t3),0c)
-t7:=symis(cx,pw(x,0,t1,t2),1c,0exp(x,0,t1,t2,refis(real,0))):is(1c,pw(x,0,t1,t2))
-t8:=ispw1(x,x,m,refis(cx,x),mi,lemma296,t3):is(pw(x,m,mi,lemma296),pw(x,m,mi,t3))
-t9:=isov12(1c,pw(x,0,t1,t2),pw(x,m,mi,lemma296),pw(x,m,mi,t3),t7,t8,t5,t6):is(ov(1c,pw(x,m,mi,lemma296),t5),ov(pw(x,0,t1,t2),pw(x,m,mi,t3),t6))
-t10:=satz295(x,0,m,t1,mi,n):is(ov(pw(x,0,t1,t2),pw(x,m,mi,t3),t6),pw(x,mn"r"(0,m),intmn(0,t1,m,mi),t4))
-t11:=pl01(0,m0"r"(m),refis(real,0)):is"r"(mn"r"(0,m),m0"r"(m))
-t12:=lemma296(x,m0"r"(m),intm0(m,mi),n):or(nis(x,0c),pos(m0"r"(m)))
-t13:=ispw2(x,mn"r"(0,m),m0"r"(m),t11,intmn(0,t1,m,mi),intm0(m,mi),t4,t12):is(pw(x,mn"r"(0,m),intmn(0,t1,m,mi),t4),pw(x,m0"r"(m),intm0(m,mi),t12))
-t14:=tr3is(cx,ov(1c,pw(x,m,mi,lemma296),t5),ov(pw(x,0,t1,t2),pw(x,m,mi,t3),t6),pw(x,mn"r"(0,m),intmn(0,t1,m,mi),t4),pw(x,m0"r"(m),intm0(m,mi),t12),t9,t10,t13):is(ov(1c,pw(x,m,mi,lemma296),t5),pw(x,m0"r"(m),intm0(m,mi),t12))
--9296
-satz296:=t14".9296":is(ov(1c,pw(x,m,mi,lemma296),satz290(x,m,mi,lemma296,n)),pw(x,m0"r"(m),intm0(m,mi),lemma296(m0"r"(m),intm0(m,mi),n)))
-ni@[o:or(nis(x,0c),and(pos(m),pos(n)))]
-+9297
-[p:nis(x,0c)]
-t1:=satz290(x,m,mi,lemma294a(o),p):nis(pw(x,m,mi,lemma294a(o)),0c)
-o@[a:and(pos(m),pos(n))]
-t2:=ande2(pos(m),pos(n),a):pos(n)
-t3:=postspp(m,n,ande1(pos(m),pos(n),a),t2):pos(ts"r"(m,n))
--9297
-lemma297a:=th9"l.or"(nis(x,0c),and(pos(m),pos(n)),nis(pw(x,m,mi,lemma294a(o)),0c),pos(n),o,[t:nis(x,0c)]t1".9297"(t),[t:and(pos(m),pos(n))]t2".9297"(t)):or(nis(pw(x,m,mi,lemma294a(o)),0c),pos(n))
-lemma297b:=th8"l.or"(nis(x,0c),and(pos(m),pos(n)),pos(ts"r"(m,n)),o,[t:and(pos(m),pos(n))]t3".9297"(t)):or(nis(x,0c),pos(ts"r"(m,n)))
-mi@[o:or(nis(x,0c),pos(m))][i:is(x,0c)]
-+*9297
-i@t4:=ore2(nis(x,0c),pos(m),o,weli(is(x,0c),i)):pos(m)
-m1:=ntofrl(m,posintnatrl(m,t4,mi)):nat
-t5:=posexp(x,m,mi,o,t4):is(pw(x,m,mi,o),prod(m1,[t:1to(m1)]x))
-t6:=satz289b(m1,[t:1to(m1)]x,xout(m1),i):is(prod(m1,[t:1to(m1)]x),0c)
-t7:=tris(cx,pw(x,m,mi,o),prod(m1,[t:1to(m1)]x),0c,t5,t6):is(pw(x,m,mi,o),0c)
--9297
-i@pw0:=t7".9297":is(pw(x,m,mi,o),0c)
-ni@[o:or(nis(x,0c),and(pos(m),pos(n)))]
-+*9297
-ni@t8:=intts(m,mi,n,ni):intrl(ts"r"(m,n))
-o@prop1:=is(pw(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o)),pw(x,ts"r"(m,n),t8,lemma297b(o))):'prop'
-[i:is(x,0c)]
-t9:=pw0(x,m,mi,lemma294a(o),i):is(pw(x,m,mi,lemma294a(o)),0c)
-t10:=pw0(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o),t9):is(pw(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o)),0c)
-t11:=pw0(x,ts"r"(m,n),t8,lemma297b(o),i):is(pw(x,ts"r"(m,n),t8,lemma297b(o)),0c)
-t12:=tris2(cx,pw(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o)),pw(x,ts"r"(m,n),t8,lemma297b(o)),0c,t10,t11):prop1
-m@[mi:intrl(m)][p:nis(x,0c)]
-t13:=ori1(nis(x,0c),pos(m),p):or(nis(x,0c),pos(m))
-p0:=pw(x,m,mi,t13):cx
-[n:nat]
-nr:=rlofnt(n):real
-t14:=natintrl(nr,natrli(n)):intrl(nr)
-t15:=ori2(nis(p0,0c),pos(nr),natpos(nr,natrli(n))):or(nis(p0,0c),pos(nr))
-t16:=ori1(nis(x,0c),pos(ts"r"(m,nr)),p):or(nis(x,0c),pos(ts"r"(m,nr)))
-t17:=intts(m,mi,nr,t14):intrl(ts"r"(m,nr))
-prop2:=is(pw(p0,nr,t14,t15),pw(x,ts"r"(m,nr),t17,t16)):'prop'
-p@t18:=ispw1(p0,p0,1rl,refis(cx,p0),intrl1,t15(1),lemma291(p0)):is(pw(p0,1rl,t14(1),t15(1)),pw(p0,1rl,intrl1,lemma291(p0)))
-t19:=satz291(p0):is(pw(p0,1rl,intrl1,lemma291(p0)),p0)
-t20:=ispw2(x,m,ts"r"(m,1rl),satz195a(m),mi,t17(1),t13,t16(1)):is(p0,pw(x,ts"r"(m,1rl),t17(1),t16(1)))
-t21:=tr3is(cx,pw(p0,1rl,t14(1),t15(1)),pw(p0,1rl,intrl1,lemma291(p0)),p0,pw(x,ts"r"(m,1rl),t17(1),t16(1)),t18,t19,t20):prop2(1)
-n@[p2:prop2(n)]
-n1:=pl"n"(n,1):nat
-t22:=satz290(x,m,mi,t13,p):nis(p0,0c)
-t23:=ori1(nis(p0,0c),and(pos(nr),pos(1rl)),t22):or(nis(p0,0c),and(pos(nr),pos(1rl)))
-t24:=lemma294a(p0,nr,1rl,t14,intrl1,t23):or(nis(p0,0c),pos(nr))
-t25:=lemma294b(p0,nr,1rl,t14,intrl1,t23):or(nis(p0,0c),pos(1rl))
-t26:=lemma294c(p0,nr,1rl,t14,intrl1,t23):or(nis(p0,0c),pos(pl"r"(nr,1rl)))
-t27:=ispw2(p0,nr(n1),pl"r"(nr,1rl),satzr155a(n,1),t14(n1),intpl(nr,t14,1rl,intrl1),t15(n1),t26):is(pw(p0,nr(n1),t14(n1),t15(n1)),pw(p0,pl"r"(nr,1rl),intpl(nr,t14,1rl,intrl1),t26))
-t27a:=satz294(p0,nr,1rl,t14,intrl1,t23):is(ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)),pw(p0,pl"r"(nr,1rl),intpl(nr,t14,1rl,intrl1),t26))
-t28:=tris2(cx,pw(p0,nr(n1),t14(n1),t15(n1)),ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)),pw(p0,pl"r"(nr,1rl),intpl(nr,t14,1rl,intrl1),t26),t27,t27a):is(pw(p0,nr(n1),t14(n1),t15(n1)),ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)))
-t29:=ori1(nis(x,0c),and(pos(ts"r"(m,nr)),pos(m)),p):or(nis(x,0c),and(pos(ts"r"(m,nr)),pos(m)))
-t30:=lemma294a(x,ts"r"(m,nr),m,t17,mi,t29):or(nis(x,0c),pos(ts"r"(m,nr)))
-t31:=lemma294b(x,ts"r"(m,nr),m,t17,mi,t29):or(nis(x,0c),pos(m))
-t32:=lemma294c(x,ts"r"(m,nr),m,t17,mi,t29):or(nis(x,0c),pos(pl"r"(ts"r"(m,nr),m)))
-t33:=tr3is(cx,pw(p0,nr,t14,t24),pw(p0,nr,t14,t15),pw(x,ts"r"(m,nr),t17,t16),pw(x,ts"r"(m,nr),t17,t30),ispw1(p0,p0,nr,refis(cx,p0),t14,t24,t15),p2,ispw1(x,x,ts"r"(m,nr),refis(cx,x),t17,t16,t30)):is(pw(p0,nr,t14,t24),pw(x,ts"r"(m,nr),t17,t30))
-t34:=tr3is(cx,pw(p0,1rl,intrl1,t25),pw(p0,1rl,intrl1,lemma291(p0)),p0,pw(x,m,mi,t31),ispw1(p0,p0,1rl,refis(cx,p0),intrl1,t25,lemma291(p0)),t19,ispw1(x,x,m,refis(cx,x),mi,t13,t31)):is(pw(p0,1rl,intrl1,t25),pw(x,m,mi,t31))
-t35:=ists12(pw(p0,nr,t14,t24),pw(x,ts"r"(m,nr),t17,t30),pw(p0,1rl,intrl1,t25),pw(x,m,mi,t31),t33,t34):is(ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)),ts(pw(x,ts"r"(m,nr),t17,t30),pw(x,m,mi,t31)))
-t36:=satz294(x,ts"r"(m,nr),m,t17,mi,t29):is(ts(pw(x,ts"r"(m,nr),t17,t30),pw(x,m,mi,t31)),pw(x,pl"r"(ts"r"(m,nr),m),intpl(ts"r"(m,nr),t17,m,mi),t32))
-t37:=tr3is(real,pl"r"(ts"r"(m,nr),m),pl"r"(ts"r"(m,nr),ts"r"(m,1rl)),ts"r"(m,pl"r"(nr,1rl)),ts"r"(m,nr(n1)),ispl2"r"(m,ts"r"(m,1rl),ts"r"(m,nr),satz195a(m)),distpt2"r"(m,nr,1rl),ists2"r"(pl"r"(nr,1rl),nr(n1),m,satzr155b(n,1))):is"r"(pl"r"(ts"r"(m,nr),m),ts"r"(m,nr(n1)))
-t38:=ispw2(x,pl"r"(ts"r"(m,nr),m),ts"r"(m,nr(n1)),t37,intpl(ts"r"(m,nr),t17,m,mi),t17(n1),t32,t16(n1)):is(pw(x,pl"r"(ts"r"(m,nr),m),intpl(ts"r"(m,nr),t17,m,mi),t32),pw(x,ts"r"(m,nr(n1)),t17(n1),t16(n1)))
-t39:=tr4is(cx,pw(p0,nr(n1),t14(n1),t15(n1)),ts(pw(p0,nr,t14,t24),pw(p0,1rl,intrl1,t25)),ts(pw(x,ts"r"(m,nr),t17,t30),pw(x,m,mi,t31)),pw(x,pl"r"(ts"r"(m,nr),m),intpl(ts"r"(m,nr),t17,m,mi),t32),pw(x,ts"r"(m,nr(n1)),t17(n1),t16(n1)),t28,t35,t36,t38):prop2(n1)
-t40:=isp(nat,[t:nat]prop2(t),n1,<n>suc,t39,satz4a(n)):prop2(<n>suc)
-n@t41:=induction([t:nat]prop2(t),t21,[t:nat][u:prop2(t)]t40(t,u),n):prop2(n)
-o@[p:nis(x,0c)][q:pos(n)]
-t42:=posintnatrl(n,q,ni):natrl(n)
-n0:=ntofrl(n,t42):nat
-t43:=isrlnt1(n,t42):is"r"(n,rlofnt(n0))
-t44:=isrlnt2(n,t42):is"r"(rlofnt(n0),n)
-o@p1:=pw(x,m,mi,lemma294a(o)):cx
-q@t44a:=ispw2(x,m,m,refis(real,m),mi,mi,lemma294a(o),t13(mi,p)):is(p1,p0(mi,p))
-t45:=ispw12(p1,p0(mi,p),n,rlofnt(n0),t44a,t43,ni,t14(mi,p,n0),lemma297a(o),t15(mi,p,n0)):is(pw(p1,n,ni,lemma297a(o)),pw(p0(mi,p),rlofnt(n0),t14(mi,p,n0),t15(mi,p,n0)))
-t46:=t41(mi,p,n0):is(pw(p0(mi,p),rlofnt(n0),t14(mi,p,n0),t15(mi,p,n0)),pw(x,ts"r"(m,rlofnt(n0)),t17(mi,p,n0),t16(mi,p,n0)))
-t47:=ists2"r"(rlofnt(n0),n,m,t44):is"r"(ts"r"(m,rlofnt(n0)),ts"r"(m,n))
-t48:=ispw2(x,ts"r"(m,rlofnt(n0)),ts"r"(m,n),t47,t17(mi,p,n0),t8,t16(mi,p,n0),lemma297b(o)):is(pw(x,ts"r"(m,rlofnt(n0)),t17(mi,p,n0),t16(mi,p,n0)),pw(x,ts"r"(m,n),t8,lemma297b(o)))
-t49:=tr3is(cx,pw(p1,n,ni,lemma297a(o)),pw(p0(mi,p),rlofnt(n0),t14(mi,p,n0),t15(mi,p,n0)),pw(x,ts"r"(m,rlofnt(n0)),t17(mi,p,n0),t16(mi,p,n0)),pw(x,ts"r"(m,n),t8,lemma297b(o)),t45,t46,t48):prop1
-p@[i:is"r"(n,0)]
-t50:=0exp(p1,n,ni,lemma297a(o),i):is(pw(p1,n,ni,lemma297a(o)),1c)
-t51:=ts02"r"(m,n,i):is"r"(ts"r"(m,n),0)
-t52:=0exp(x,ts"r"(m,n),t8,lemma297b(o),t51):is(pw(x,ts"r"(m,n),t8,lemma297b(o)),1c)
-t53:=tris2(cx,pw(p1,n,ni,lemma297a(o)),pw(x,ts"r"(m,n),t8,lemma297b(o)),1c,t50,t52):prop1
-p@[q:neg(n)]
-an:=abs(n):real
-t54:=intabs(n,ni):intrl(an)
-t55:=ori1(nis(x,0c),and(pos(m),pos(an)),p):or(nis(x,0c),and(pos(m),pos(an)))
-p1t55:=p1(an,mi,t54,t55):cx
-t56:=satz166e(n,nnot0(n,q)):pos(an)
-t56a:=lemma294a(an,mi,t54,t55):or(nis(x,0c),pos(m))
-t57:=lemma297a(an,mi,t54,t55):or(nis(p1t55,0c),pos(an))
-t58:=lemma297b(an,mi,t54,t55):or(nis(x,0c),pos(ts"r"(m,an)))
-t59:=t49(an,mi,t54,t55,p,t56):is(pw(p1t55,an,t54,t57),pw(x,ts"r"(m,an),t8(an,mi,t54),t58))
-t60:=satz177c(an,n,absn(n,q)):is"r"(n,m0"r"(an))
-t61:=intm0(an,t54):intrl(m0"r"(an))
-t62:=satz290(x,m,mi,t56a,p):nis(p1t55,0c)
-t63:=lemma296(p1t55,an,t54,t62):or(nis(p1t55,0c),pos(an))
-t64:=satz290(p1t55,an,t54,t63,t62):nis(pw(p1t55,an,t54,t63),0c)
-t65:=lemma296(p1t55,m0"r"(an),t61,t62):or(nis(p1t55,0c),pos(m0"r"(an)))
-t66:=satz296(p1t55,an,t54,t62):is(ov(1c,pw(p1t55,an,t54,t63),t64),pw(p1t55,m0"r"(an),t61,t65))
-t67:=ispw1(x,x,m,refis(cx,x),mi,lemma294a(o),t56a):is(p1,p1t55)
-t68:=ispw12(p1,p1t55,n,m0"r"(an),t67,t60,ni,t61,lemma297a(o),t65):is(pw(p1,n,ni,lemma297a(o)),pw(p1t55,m0"r"(an),t61,t65))
-t69:=tris2(cx,pw(p1,n,ni,lemma297a(o)),ov(1c,pw(p1t55,an,t54,t63),t64),pw(p1t55,m0"r"(an),t61,t65),t68,t66):is(pw(p1,n,ni,lemma297a(o)),ov(1c,pw(p1t55,an,t54,t63),t64))
-t70:=tris(real,m0"r"(ts"r"(m,an)),ts"r"(m,m0"r"(an)),ts"r"(m,n),satz197f(m,an),ists2"r"(m0"r"(an),n,m,symis(real,n,m0"r"(an),t60))):is"r"(m0"r"(ts"r"(m,an)),ts"r"(m,n))
-t71:=intm0(ts"r"(m,an),t8(an,mi,t54)):intrl(m0"r"(ts"r"(m,an)))
-t72:=lemma296(x,ts"r"(m,an),t8(an,mi,t54),p):or(nis(x,0c),pos(ts"r"(m,an)))
-t73:=satz290(x,ts"r"(m,an),t8(an,mi,t54),t72,p):nis(pw(x,ts"r"(m,an),t8(an,mi,t54),t72),0c)
-t74:=lemma296(x,m0"r"(ts"r"(m,an)),t71,p):or(nis(x,0c),pos(m0"r"(ts"r"(m,an))))
-t75:=satz296(x,ts"r"(m,an),t8(an,mi,t54),p):is(ov(1c,pw(x,ts"r"(m,an),t8(an,mi,t54),t72),t73),pw(x,m0"r"(ts"r"(m,an)),t71,t74))
-t76:=ispw2(x,m0"r"(ts"r"(m,an)),ts"r"(m,n),t70,t71,t8,t74,lemma297b(o)):is(pw(x,m0"r"(ts"r"(m,an)),t71,t74),pw(x,ts"r"(m,n),t8,lemma297b(o)))
-t77:=ispw1(p1t55,p1t55,an,refis(cx,p1t55),t54,t63,t57):is(pw(p1t55,an,t54,t63),pw(p1t55,an,t54,t57))
-t78:=ispw1(x,x,ts"r"(m,an),refis(cx,x),t8(an,mi,t54),t58,t72):is(pw(x,ts"r"(m,an),t8(an,mi,t54),t58),pw(x,ts"r"(m,an),t8(an,mi,t54),t72))
-t79:=tr3is(cx,pw(p1t55,an,t54,t63),pw(p1t55,an,t54,t57),pw(x,ts"r"(m,an),t8(an,mi,t54),t58),pw(x,ts"r"(m,an),t8(an,mi,t54),t72),t77,t59,t78):is(pw(p1t55,an,t54,t63),pw(x,ts"r"(m,an),t8(an,mi,t54),t72))
-t80:=isov2(pw(p1t55,an,t54,t63),pw(x,ts"r"(m,an),t8(an,mi,t54),t72),1c,t79,t64,t73):is(ov(1c,pw(p1t55,an,t54,t63),t64),ov(1c,pw(x,ts"r"(m,an),t8(an,mi,t54),t72),t73))
-t81:=tr4is(cx,pw(p1,n,ni,lemma297a(o)),ov(1c,pw(p1t55,an,t54,t63),t64),ov(1c,pw(x,ts"r"(m,an),t8(an,mi,t54),t72),t73),pw(x,m0"r"(ts"r"(m,an)),t71,t74),pw(x,ts"r"(m,n),t8,lemma297b(o)),t69,t80,t75,t76):prop1
-p@t82:=rapp(n,prop1,[t:pos(n)]t49(t),[t:is"r"(n,0)]t53(t),[t:neg(n)]t81(t)):prop1
--9297
-o@satz297:=th1"l.imp"(is(x,0c),prop1".9297",[t:is(x,0c)]t12".9297"(t),[t:nis(x,0c)]t82".9297"(t)):is(pw(pw(x,m,mi,lemma294a(o)),n,ni,lemma297a(o)),pw(x,ts"r"(m,n),intts(m,mi,n,ni),lemma297b(o)))
-@[r:real][s:real]
-+10298
-t1:=tris(cx,pl(pli(r,0),pli(s,0)),pli(pl"r"(r,s),pl"r"(0,0)),pli(pl"r"(r,s),0),plis12a(r,0,s,0),isrecx2(pl"r"(0,0),0,pl"r"(r,s),pl01(0,0,refis(real,0)))):is(pl(pli(r,0),pli(s,0)),pli(pl"r"(r,s),0))
--10298
-satz298a:=symis(cx,pl(pli(r,0),pli(s,0)),pli(pl"r"(r,s),0),t1".10298"):is(pli(pl"r"(r,s),0),pl(pli(r,0),pli(s,0)))
-satz298b:=t1".10298":is(pl(pli(r,0),pli(s,0)),pli(pl"r"(r,s),0))
-+*10298
-s@t2:=tris(cx,mn(pli(r,0),pli(s,0)),pli(mn"r"(r,s),mn"r"(0,0)),pli(mn"r"(r,s),0),mnis12a(r,0,s,0),isrecx2(mn"r"(0,0),0,mn"r"(r,s),pl02(0,m0"r"(0),satz176b(0,refis(real,0))))):is(mn(pli(r,0),pli(s,0)),pli(mn"r"(r,s),0))
--10298
-s@satz298c:=symis(cx,mn(pli(r,0),pli(s,0)),pli(mn"r"(r,s),0),t2".10298"):is(pli(mn"r"(r,s),0),mn(pli(r,0),pli(s,0)))
-satz298d:=t2".10298":is(mn(pli(r,0),pli(s,0)),pli(mn"r"(r,s),0))
-+*10298
-s@t3:=pl02(ts"r"(r,s),m0"r"(ts"r"(0,0)),satz176b(ts"r"(0,0),ts01(0,0,refis(real,0)))):is"r"(mn"r"(ts"r"(r,s),ts"r"(0,0)),ts"r"(r,s))
-t4:=tris(real,pl"r"(ts"r"(r,0),ts"r"(0,s)),ts"r"(r,0),0,pl02(ts"r"(r,0),ts"r"(0,s),ts01(0,s,refis(real,0))),ts02(r,0,refis(real,0))):is"r"(pl"r"(ts"r"(r,0),ts"r"(0,s)),0)
-t5:=tris(cx,ts(pli(r,0),pli(s,0)),pli(mn"r"(ts"r"(r,s),ts"r"(0,0)),pl"r"(ts"r"(r,0),ts"r"(0,s))),pli(ts"r"(r,s),0),tsis12a(r,0,s,0),isrecx12(mn"r"(ts"r"(r,s),ts"r"(0,0)),ts"r"(r,s),pl"r"(ts"r"(r,0),ts"r"(0,s)),0,t3,t4)):is(ts(pli(r,0),pli(s,0)),pli(ts"r"(r,s),0))
--10298
-s@satz298e:=symis(cx,ts(pli(r,0),pli(s,0)),pli(ts"r"(r,s),0),t5".10298"):is(pli(ts"r"(r,s),0),ts(pli(r,0),pli(s,0)))
-satz298f:=t5".10298":is(ts(pli(r,0),pli(s,0)),pli(ts"r"(r,s),0))
-[n:nis"r"(s,0)]
-+*10298
-n@[i:is(pli(s,0),0c)]
-t6:=tr3is(real,s,re(pli(s,0)),re(0c),0,isre(s,0),iscere(pli(s,0),0c,i),reis(0,0)):is"r"(s,0)
--10298
-n@lemma298:=th3"l.imp"(is(pli(s,0),0c),is"r"(s,0),n,[t:is(pli(s,0),0c)]t6".10298"(t)):nis(pli(s,0),0c)
-+*10298
-n@t7:=tris(cx,ts(pli(s,0),pli(ov"r"(r,s,n),0)),pli(ts"r"(s,ov"r"(r,s,n)),0),pli(r,0),t5(s,ov"r"(r,s,n)),isrecx1(ts"r"(s,ov"r"(r,s,n)),r,0,satz204c(r,s,n))):is(ts(pli(s,0),pli(ov"r"(r,s,n),0)),pli(r,0))
--10298
-n@satz298g:=satz229g(pli(r,0),pli(s,0),pli(ov"r"(r,s,n),0),lemma298,t7".10298"):is(pli(ov"r"(r,s,n),0),ov(pli(r,0),pli(s,0),lemma298))
-satz298h:=satz229h(pli(r,0),pli(s,0),pli(ov"r"(r,s,n),0),lemma298,t7".10298"):is(ov(pli(r,0),pli(s,0),lemma298),pli(ov"r"(r,s,n),0))
-+*10298
-r@t8:=tris(cx,m0(pli(r,0)),pli(m0"r"(r),m0"r"(0)),pli(m0"r"(r),0),m0isa(r,0),isrecx2(m0"r"(0),0,m0"r"(r),satz176b(0,refis(real,0)))):is(m0(pli(r,0)),pli(m0"r"(r),0))
--10298
-r@satz298j:=symis(cx,m0(pli(r,0)),pli(m0"r"(r),0),t8".10298"):is(pli(m0"r"(r),0),m0(pli(r,0)))
-satz298k:=t8".10298":is(m0(pli(r,0)),pli(m0"r"(r),0))
-+*10298
-r@t9:=tris(real,mod2(pli(r,0)),ts"r"(re(pli(r,0)),re(pli(r,0))),ts"r"(r,r),pl02(ts"r"(re(pli(r,0)),re(pli(r,0))),ts"r"(im(pli(r,0)),im(pli(r,0))),ts01(im(pli(r,0)),im(pli(r,0)),imis(r,0))),ists12"r"(re(pli(r,0)),r,re(pli(r,0)),r,reis(r,0),reis(r,0))):is"r"(mod2(pli(r,0)),ts"r"(r,r))
-ar:=abs(r):real
-[p:pos(r)]
-t10:=satz196a(r,r,p,p):is"r"(ts"r"(r,r),ts"r"(ar,ar))
-r@[i:is"r"(r,0)]
-t11:=tris2(real,ts"r"(r,r),ts"r"(ar,ar),0,ts01(r,r,i),ts01(ar,ar,abs0(r,i))):is"r"(ts"r"(r,r),ts"r"(ar,ar))
-r@[n:neg(r)]
-t12:=satz196b(r,r,n,n):is"r"(ts"r"(r,r),ts"r"(ar,ar))
-r@t13:=rapp(r,is"r"(ts"r"(r,r),ts"r"(ar,ar)),[t:pos(r)]t10(t),[t:is"r"(r,0)]t11(t),[t:neg(r)]t12(t)):is"r"(ts"r"(r,r),ts"r"(ar,ar))
-t14:=tris(real,mod2(pli(r,0)),ts"r"(r,r),ts"r"(ar,ar),t9,t13):is"r"(mod2(pli(r,0)),ts"r"(ar,ar))
-t15:=th1"l.imp"(is"r"(r,0),not(neg(ar)),[t:is"r"(r,0)]0notn(ar,abs0(r,t)),[t:nis"r"(r,0)]pnotn(ar,satz166e(r,t))):not(neg(ar))
--10298
-r@satz298l:=thsqrt3(mod2(pli(r,0)),lemma5(pli(r,0)),abs(r),t15".10298",t14".10298"):is"r"(mod(pli(r,0)),abs(r))
-satz298m:=symis(real,mod(pli(r,0)),abs(r),satz298l):is"r"(abs(r),mod(pli(r,0)))
-cofrl:=pli(r,0):complex
-s@[i:is(cofrl(r),cofrl(s))]
-isrlic:=tr3is(real,r,re(cofrl(r)),re(cofrl(s)),s,isre(r,0),iscere(cofrl(r),cofrl(s),i),reis(s,0)):is"r"(r,s)
-s@[i:is"r"(r,s)]
-isrlec:=isrecx1(r,s,0,i):is(cofrl(r),cofrl(s))
-+v10
-@t1:=[t:real][u:real][v:is(cofrl(t),cofrl(u))]isrlic(t,u,v):injective(real,cx,[t:real]cofrl(t))
--v10
-@[x:cx]
-realc:=image(real,cx,[t:real]cofrl(t),x):'prop'
-r@reali:=imagei(real,cx,[t:real]cofrl(t),r):realc(cofrl(r))
-x@[rx:realc(x)]
-rlofc:=soft(real,cx,[t:real]cofrl(t),t1".v10",x,rx):real
-[y:cx][ry:realc(y)][i:is"r"(rlofc(x,rx),rlofc(y,ry))]
-iscirl:=isinve(real,cx,[t:real]cofrl(t),t1".v10",x,rx,y,ry,i):is(x,y)
-ry@[i:is(x,y)]
-iscerl:=isinv(real,cx,[t:real]cofrl(t),t1".v10",x,rx,y,ry,i):is"r"(rlofc(x,rx),rlofc(y,ry))
-r@isrlc1:=isst1(real,cx,[t:real]cofrl(t),t1".v10",r):is"r"(r,rlofc(cofrl(r),reali(r)))
-isrlc2:=isst2(real,cx,[t:real]cofrl(t),t1".v10",r):is"r"(rlofc(cofrl(r),reali(r)),r)
-rx@iscrl1:=ists1"e"(real,cx,[t:real]cofrl(t),t1".v10",x,rx):is(x,cofrl(rlofc(x,rx)))
-iscrl2:=ists2"e"(real,cx,[t:real]cofrl(t),t1".v10",x,rx):is(cofrl(rlofc(x,rx)),x)
-@[n:nat]
-cofn:=cofrl(rlofnt(n)):complex
-[m:nat][i:is"n"(n,m)]
-isnec:=isrlec(rlofnt(n),rlofnt(m),isnterl(n,m,i)):is(cofn(n),cofn(m))
-m@[i:is(cofn(n),cofn(m))]
-isnic:=isntirl(n,m,isrlic(rlofnt(n),rlofnt(m),i)):is"n"(n,m)
-+*v10
-@t2:=[t:nat][u:nat][v:is(cofn(t),cofn(u))]isnic(t,u,v):injective(nat,cx,[t:nat]cofn(t))
--v10
-x@natc:=image(nat,cx,[t:nat]cofn(t),x):'prop'
-n@nati:=imagei(nat,cx,[t:nat]cofn(t),n):natc(cofn(n))
-x@[nx:natc(x)]
-nofc:=soft(nat,cx,[t:nat]cofn(t),t2".v10",x,nx):nat
-[y:cx][ny:natc(y)][i:is(x,y)]
-iscen:=isinv(nat,cx,[t:nat]cofn(t),t2".v10",x,nx,y,ny,i):is"n"(nofc(x,nx),nofc(y,ny))
-ny@[i:is"n"(nofc(x,nx),nofc(y,ny))]
-iscin:=isinve(nat,cx,[t:nat]cofn(t),t2".v10",x,nx,y,ny,i):is(x,y)
-n@isnc1:=isst1(nat,cx,[t:nat]cofn(t),t2".v10",n):is"n"(n,nofc(cofn(n),nati(n)))
-isnc2:=isst2(nat,cx,[t:nat]cofn(t),t2".v10",n):is"n"(nofc(cofn(n),nati(n)),n)
-nx@iscn1:=ists1"e"(nat,cx,[t:nat]cofn(t),t2".v10",x,nx):is(x,cofn(nofc(x,nx)))
-iscn2:=ists2"e"(nat,cx,[t:nat]cofn(t),t2".v10",x,nx):is(cofn(nofc(x,nx)),x)
-@natt:=ot(cx,[t:cx]natc(t)):'type'
-[nt:natt]
-cofnt:=in"e"(cx,[t:cx]natc(t),nt):cx
-natti:=inp(cx,[t:cx]natc(t),nt):natc(cofnt(nt))
-[mt:natt][i:is"e"(natt,nt,mt)]
-isntec:=isini(cx,[t:cx]natc(t),nt,mt,i):is(cofnt(nt),cofnt(mt))
-mt@[i:is(cofnt(nt),cofnt(mt))]
-isntic:=isine(cx,[t:cx]natc(t),nt,mt,i):is"e"(natt,nt,mt)
-nx@ntofc:=out(cx,[t:cx]natc(t),x,nx):natt
-ny@[i:is(x,y)]
-iscent:=isouti(cx,[t:cx]natc(t),x,nx,y,ny,i):is"e"(natt,ntofc(x,nx),ntofc(y,ny))
-ny@[i:is"e"(natt,ntofc(x,nx),ntofc(y,ny))]
-iscint:=isoute(cx,[t:cx]natc(t),x,nx,y,ny,i):is(x,y)
-nt@isntc1:=isoutin(cx,[t:cx]natc(t),nt):is"e"(natt,nt,ntofc(cofnt(nt),natti(nt)))
-isntc2:=symis(natt,nt,ntofc(cofnt(nt),natti(nt)),isntc1):is"e"(natt,ntofc(cofnt(nt),natti(nt)),nt)
-nx@iscnt1:=isinout(cx,[t:cx]natc(t),x,nx):is(x,cofnt(ntofc(x,nx)))
-iscnt2:=symis(cx,x,cofnt(ntofc(x,nx)),iscnt1):is(cofnt(ntofc(x,nx)),x)
-n@ntofn:=ntofc(cofn(n),nati(n)):natt
-m@[i:is"n"(n,m)]
-isnent:=iscent(cofn(n),nati(n),cofn(m),nati(m),isnec(n,m,i)):is"e"(natt,ntofn(n),ntofn(m))
-m@[i:is"e"(natt,ntofn(n),ntofn(m))]
-isnint:=isnic(n,m,iscint(cofn(n),nati(n),cofn(m),nati(m),i)):is"n"(n,m)
-nt@nofnt:=nofc(cofnt(nt),natti(nt)):nat
-mt@[i:is"e"(natt,nt,mt)]
-isnter:=iscen(cofnt(nt),natti(nt),cofnt(mt),natti(mt),isntec(nt,mt,i)):is"n"(nofnt(nt),nofnt(mt))
-mt@[i:is"n"(nofnt(nt),nofnt(mt))]
-isntin:=isntic(nt,mt,iscin(cofnt(nt),natti(nt),cofnt(mt),natti(mt),i)):is"e"(natt,nt,mt)
-+*v10
-n@t3:=iscnt1(cofn(n),nati(n)):is(cofn(n),cofnt(ntofn(n)))
--v10
-n@isnnt1:=tris(nat,n,nofc(cofn(n),nati(n)),nofnt(ntofn(n)),isnc1(n),iscen(cofn(n),nati(n),cofnt(ntofn(n)),natti(ntofn(n)),t3".v10")):is"n"(n,nofnt(ntofn(n)))
-isnnt2:=symis(nat,n,nofnt(ntofn(n)),isnnt1):is"n"(nofnt(ntofn(n)),n)
-+*v10
-nt@t4:=iscn1(cofnt(nt),natti(nt)):is(cofnt(nt),cofn(nofnt(nt)))
--v10
-nt@isntn1:=tris(natt,nt,ntofc(cofnt(nt),natti(nt)),ntofn(nofnt(nt)),isntc1(nt),iscent(cofnt(nt),natti(nt),cofn(nofnt(nt)),nati(nofnt(nt)),t4".v10")):is"e"(natt,nt,ntofn(nofnt(nt)))
-isntn2:=symis(natt,nt,ntofn(nofnt(nt)),isntn1):is"e"(natt,ntofn(nofnt(nt)),nt)
-@1t:=ntofn(1):natt
-suct:=[t:natt]ntofn(<nofnt(t)>suc):[t:natt]natt
-+10299
-nt@[i:is"e"(natt,<nt>suct,1t)]
-t1:=isnint(<nofnt(nt)>suc,1,i):is"n"(<nofnt(nt)>suc,1)
--10299
-nt@satz299a:=th3"l.imp"(is"e"(natt,<nt>suct,1t),is"n"(<nofnt(nt)>suc,1),<nofnt(nt)>ax3,[t:is"e"(natt,<nt>suct,1t)]t1".10299"(t)):not(is"e"(natt,<nt>suct,1t))
-@ax3t:=[t:natt]satz299a(t):[t:natt]not(is"e"(natt,<t>suct,1t))
-mt@[i:is"e"(natt,<nt>suct,<mt>suct)]
-+*10299
-i"c"@t2:=isnint(<nofnt(nt)>suc,<nofnt(mt)>suc,i):is"n"(<nofnt(nt)>suc,<nofnt(mt)>suc)
-t3:=<t2><nofnt(mt)><nofnt(nt)>ax4:is"n"(nofnt(nt),nofnt(mt))
--10299
-i@satz299b:=isntin(nt,mt,t3".10299"):is"e"(natt,nt,mt)
-@ax4t:=[t:natt][u:natt][v:is"e"(natt,<t>suct,<u>suct)]satz299b(t,u,v):[t:natt][u:natt][v:is"e"(natt,<t>suct,<u>suct)]is"e"(natt,t,u)
-[s:set(natt)]
-cond1t:=esti(natt,1t,s):'prop'
-cond2t:=all"l"(natt,[t:natt]imp(esti(natt,t,s),esti(natt,<t>suct,s))):'prop'
-[c1:cond1t][c2:cond2t]
-+*10299
-c2@[n:nat]
-prop1:=esti(natt,ntofn(n),s):'prop'
-c2@t4:=c1:prop1(1)
-n@[p:prop1(n)]
-t5:=<p><ntofn(n)>c2:esti(natt,ntofn(<nofnt(ntofn(n))>suc),s)
-t6:=isp(nat,[t:nat]esti(natt,ntofn(<t>suc),s),nofnt(ntofn(n)),n,t5,isnnt2(n)):prop1(<n>suc)
-c2@[nt:natt]
-t7:=induction([t:nat]prop1(t),t4,[t:nat][u:prop1(t)]t6(t,u),nofnt(nt)):prop1(nofnt(nt))
--10299
-c2@satz299c:=[t:natt]isp(natt,[u:natt]esti(natt,u,s),ntofn(nofnt(t)),t,t7".10299"(t),isntn2(t)):[t:natt]esti(natt,t,s)
-@ax5t:=[t:set(natt)][u:cond1t(t)][v:cond2t(t)]satz299c(t,u,v):[t:set(natt)][u:cond1t(t)][v:cond2t(t)][w:natt]esti(natt,w,t)
-ic:=pli(0,1rl):complex
-+10300
-t1:=tsis12a(0,1rl,0,1rl):is(ts(ic,ic),pli(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),pl"r"(ts"r"(0,1rl),ts"r"(1rl,0))))
-t2:=tris(real,mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),m0"r"(ts"r"(1rl,1rl)),m0"r"(1rl),pl01(ts"r"(0,0),m0"r"(ts"r"(1rl,1rl)),ts01(0,0,refis(real,0))),ism0"r"(ts"r"(1rl,1rl),1rl,satz195(1rl))):is"r"(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),m0"r"(1rl))
-t3:=tris(real,pl"r"(ts"r"(0,1rl),ts"r"(1rl,0)),ts"r"(1rl,0),0,pl01(ts"r"(0,1rl),ts"r"(1rl,0),ts01(0,1rl,refis(real,0))),ts02(1rl,0,refis(real,0))):is"r"(pl"r"(ts"r"(0,1rl),ts"r"(1rl,0)),0)
-t4:=isrecx12(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),m0"r"(1rl),pl"r"(ts"r"(0,1rl),ts"r"(1rl,0)),0,t2,t3):is(pli(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),pl"r"(ts"r"(0,1rl),ts"r"(1rl,0))),cofrl(m0"r"(1rl)))
-t5:=satz298j(1rl):is(cofrl(m0"r"(1rl)),m0(1c))
--10300
-satz2300:=tr3is(cx,ts(ic,ic),pli(mn"r"(ts"r"(0,0),ts"r"(1rl,1rl)),pl"r"(ts"r"(0,1rl),ts"r"(1rl,0))),cofrl(m0"r"(1rl)),m0(1c),t1".10300",t4".10300",t5".10300"):is(ts(ic,ic),m0(1c))
-[r:real][s:real]
-+10301
-t1:=tsis12a(s,0,0,1rl):is(ts(cofrl(s),ic),pli(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),pl"r"(ts"r"(s,1rl),ts"r"(0,0))))
-t2:=tris(real,mn"r"(ts"r"(s,0),ts"r"(0,1rl)),m0"r"(ts"r"(0,1rl)),0,pl01(ts"r"(s,0),m0"r"(ts"r"(0,1rl)),ts02(s,0,refis(real,0))),satz176b(ts"r"(0,1rl),ts01(0,1rl,refis(real,0)))):is"r"(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),0)
-t3:=tris(real,pl"r"(ts"r"(s,1rl),ts"r"(0,0)),ts"r"(s,1rl),s,pl02(ts"r"(s,1rl),ts"r"(0,0),ts01(0,0,refis(real,0))),satz195(s)):is"r"(pl"r"(ts"r"(s,1rl),ts"r"(0,0)),s)
-t4:=isrecx12(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),0,pl"r"(ts"r"(s,1rl),ts"r"(0,0)),s,t2,t3):is(pli(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),pl"r"(ts"r"(s,1rl),ts"r"(0,0))),pli(0,s))
-t5:=tris(cx,ts(cofrl(s),ic),pli(mn"r"(ts"r"(s,0),ts"r"(0,1rl)),pl"r"(ts"r"(s,1rl),ts"r"(0,0))),pli(0,s),t1,t4):is(ts(cofrl(s),ic),pli(0,s))
-t6:=ispl2(ts(cofrl(s),ic),pli(0,s),cofrl(r),t5):is(pl(cofrl(r),ts(cofrl(s),ic)),pl(cofrl(r),pli(0,s)))
-t7:=plis12a(r,0,0,s):is(pl(cofrl(r),pli(0,s)),pli(pl"r"(r,0),pl"r"(0,s)))
-t8:=isrecx12(pl"r"(r,0),r,pl"r"(0,s),s,pl02(r,0,refis(real,0)),pl01(0,s,refis(real,0))):is(pli(pl"r"(r,0),pl"r"(0,s)),pli(r,s))
--10301
-satz301a:=tr3is(cx,pl(cofrl(r),ts(cofrl(s),ic)),pl(cofrl(r),pli(0,s)),pli(pl"r"(r,0),pl"r"(0,s)),pli(r,s),t6".10301",t7".10301",t8".10301"):is"e"(cx,pl(cofrl(r),ts(cofrl(s),ic)),pli(r,s))
-satz301b:=symis(cx,pl(cofrl(r),ts(cofrl(s),ic)),pli(r,s),satz301a):is(pli(r,s),pl(cofrl(r),ts(cofrl(s),ic)))
-@[x:complex]
-satz301c:=tris(cx,x,pli(re(x),im(x)),pl(cofrl(re(x)),ts(cofrl(im(x)),ic)),ispli(x),satz301b(re(x),im(x))):is(x,pl(cofrl(re(x)),ts(cofrl(im(x)),ic)))
-satz301d:=symis(cx,x,pl(cofrl(re(x)),ts(cofrl(im(x)),ic)),satz301c):is(pl(cofrl(re(x)),ts(cofrl(im(x)),ic)),x)
-s@[t:real][u:real][i:is(pl(cofrl(r),ts(cofrl(s),ic)),pl(cofrl(t),ts(cofrl(u),ic)))]
-+*10301
-i@t9:=tr3is(cx,pli(r,s),pl(cofrl(r),ts(cofrl(s),ic)),pl(cofrl(t),ts(cofrl(u),ic)),pli(t,u),satz301b(r,s),i,satz301a(t,u)):is(pli(r,s),pli(t,u))
--10301
-i@satz301e:=tr3is(real,r,re(pli(r,s)),re(pli(t,u)),t,isre(r,s),iscere(pli(r,s),pli(t,u),t9".10301"),reis(t,u)):is"r"(r,t)
-satz301f:=tr3is(real,s,im(pli(r,s)),im(pli(t,u)),u,isim(r,s),isceim(pli(r,s),pli(t,u),t9".10301"),imis(t,u)):is"r"(s,u)
--c
--r
--rp
--rt
--n
--landau
--eq
--st
--e
--l
+++ /dev/null
-# This book is not valid in AUT-QE because [y:'type'] is not allowed
-# This book is not valid in \lambda\delta < 3 because sort inclusion is not allowed
-# This book is not valid in \lambda\delta 3 because of two \upsilon-reductions on layer 1
-
-+l
-@ Delta := [x:[y:'type']'type']<x>x : [x:[y:'type']'type']'type'
-@ Omega := <Delta>Delta : 'type'
--l
+++ /dev/null
-\require preamble
-
-\* Intuitionistic Predicate Logic with Equality *\
-
-\open elements \* [1] 2.1. 2.2. 3.1 *\
-
- \decl "logical false" False: *Prop
-
- \decl "logical conjunction" And: *Prop => *Prop -> *Prop
-
- \decl "logical disjunction" Or: *Prop => *Prop -> *Prop
-
-\* implication and non-dependent abstraction are isomorphic *\
- \def "logical implication"
- Imp = [p:*Prop, q:*Prop] p -> q : *Prop => *Prop -> *Prop
-
-\* comprehension and dependent abstraction are isomorphic *\
- \def "unrestricted logical comprehension"
- All = [q:*Obj->*Prop] [x:*Obj] q(x) : (*Obj -> *Prop) -> *Prop
-
- \decl "unrestricted logical existence" Ex: (*Obj -> *Prop) -> *Prop
-
- \decl "syntactical identity" Id: *Obj => *Obj -> *Prop
-
-\close
-
-\open abbreviations \* [1] 2.3. *\
-
- \def "logical negation"
- Not = [p:*Prop] p -> False : *Prop -> *Prop
-
- \def "logical equivalence"
- Iff = [p:*Prop, q:*Prop] And(p -> q, q -> p) : *Prop => *Prop -> *Prop
-
- \def "unrestricted strict logical existence"
- EX = [p:*Obj->*Prop] Ex([x:*Obj] And(p(x), [y:*Obj] p(y) -> Id(x, y)))
- : (*Obj -> *Prop) -> *Prop
-
- \def "negated syntactical identity"
- NId = [x:*Obj, y:*Obj] Not(Id(x, y)) : *Obj => *Obj -> *Prop
-
-\close
+++ /dev/null
-preamble.hln L.hln T0.hln
+++ /dev/null
-HOME = ../..
-ROOT = exp_math
-HELENAOPTS = -r $(ROOT) -u
-
-H = @
-
-HELENA = $(HOME)/helena.opt
-
-HLNS = $(shell cat Make)
-
-all: $(HLNS)
- @echo " HELENA -u"
- $(H)$(HELENA) $(HELENAOPTS) $^
-
-progress: $(HLNS)
- @echo " HELENA -u -j"
- $(H)$(HELENA) $(HELENAOPTS) -j $^
-
-xml: $(HLNS)
- @echo " HELENA -u -x"
- $(H)$(HELENA) $(HELENAOPTS) -x $(HOME) -s 2 $^
-
-xml-crg: $(HLNS)
- @echo " HELENA -u -x"
- $(H)$(HELENA) $(HELENAOPTS) -x $(HOME) -s 1 $^
+++ /dev/null
-\require L
-
-\* Feferman's system T0 *\
-
-\open elements \* [1] 2.1. 2.2. 2.4. *\
-
- \decl "rule application" App: *Obj => *Obj => *Obj -> *Prop
-
- \decl "classification predicate" Cl: *Obj -> *Prop
-
- \decl "classification membership" Eta: *Obj => *Obj -> *Prop
-
-\* we must make an explicit coercion from *Obj to *Term *\
- \decl "object-to-term-coercion" T: *Obj -> *Term
-
- \decl "term application" At: *Term => *Term -> *Term
-
- \decl "term-object equivalence" E: *Term => *Obj -> *Prop
-
-\close
-
-\open logical_abbreviations \* [1] 2.3. 2.5. *\
-
- \def "logical comprehension restricted to classifications"
- CAll = [q:*Obj->*Prop] [x:*Obj] Cl(x) -> q(x)
- : (*Obj -> *Prop) -> *Prop
-
- \def "logical existence restricted to classifications"
- CEx = [q:*Obj->*Prop] Ex([x:*Obj] And(Cl(x), q(x)))
- : (*Obj -> *Prop) -> *Prop
-
- \def "logical comprehension restricted to a classification"
- EAll = [a:*Obj, q:*Obj->*Prop] [x:*Obj] Eta(x, a) -> q(x)
- : *Obj => (*Obj -> *Prop) -> *Prop
-
- \def "logical existence restricted to a classification"
- EEx = [a:*Obj, q:*Obj->*Prop] Ex([x:*Obj] And(Eta(x, a), q(x)))
- : *Obj => (*Obj -> *Prop) -> *Prop
-
-\close
-
-\open non_logical_abbreviations \* [1] 2.4. 2.7 *\
-
- \def "object application"
- OAt = [f:*Obj, x:*Obj] At(T(f), T(x)) : *Obj => *Obj -> *Term
-
- \def "convergence of a term to an object"
- Conv = [t:*Term] EX([y:*Obj] E(t, y)) : *Term -> *Prop
-
- \def "term-term equivalence"
- Eq = [t1:*Term, t2:*Term] [y:*Obj] Iff(E(t1, y), E(t2, y))
- : *Term => *Term -> *Prop
-
- \def "classification membership of a term"
- TEta = [t:*Term, a:*Obj] EEx(a, [y:*Obj] E(t, y))
- : *Term => *Obj -> *Prop
-
- \def "operation (rule with inhabited domain)"
- Op = [f:*Obj] Ex([x:*Obj] Conv(OAt(f, x))) : *Obj -> *Prop
-
- \def "classification inclusion"
- ESub = [a1:*Obj, a2:*Obj] EAll(a1, [x:*Obj] Eta(x, a2))
- : *Obj => *Obj -> *Prop
-
- \def "classification morphism"
- ETo = [f:*Obj, a:*Obj, b:*Obj] EAll(a, [x:*Obj] TEta(OAt(f, x), b))
- : *Obj => *Obj => *Obj -> *Prop
-
-\close
-
-\open non_logical_axioms \* [1] 2.4. 3.2 *\
-
-\* we axiomatize E because *Term is not inductively generated *\
- \ax e_refl: [y:*Obj] E(T(y), y)
-
- \ax e_at_in: [t1:*Term][t2:*Term][f:*Obj][x:*Obj][y:*Obj]
- E(t1, f) -> E(t2, x) -> App(f, x, y) -> E(At(t1, t2), y)
-\*
- \ax e_at_out: [f:*Obj][x:*Obj][y:*Obj] E(At(T(f), T(x)), y) -> App(f,x,y)
-*\
- \ax "I (i)" id_dec: [x:*Obj][y:*Obj] Or(Id(x, y), NId(x, y))
-
- \ax "I (ii)" at_mono: [f:*Obj][x:*Obj][y1:*Obj][y2:*Obj]
- E(OAt(f, x), y1) -> E(OAt(f, x), y2) -> Id(y1, y2)
-
- \ax "I (iii)" eta_cl: [x:*Obj][a:*Obj] Eta(x, a) -> Cl(a)
-
-\close
+++ /dev/null
-\* Systematic Explicit Mathematics
- * [1] F. Feferman: A language and axioms for explicit mathematics.
- * Lecture Notes in Mathematics, 450. Springer (1975). pp 87-139.
- *\
-
-\* Development started: 2010 Feb 20 *\
-
-\graph Z3
-
-\sorts Prop, Obj, Term
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* This file was generated by Helena 0.8.2 M - December 2014: do not edit *)
-
-include "basics/pts.ma".
-
-(* constant 1 *)
-definition l_imp ≝ λa:Prop.λb:Prop.(∀x:a.b : Prop).
-
-(* constant 2 *)
-definition l_mp ≝ λa:Prop.λb:Prop.λa1:a.λi:l_imp a b.(i a1 : b).
-
-(* constant 3 *)
-definition l_refimp ≝ λa:Prop.(λx:a.x : l_imp a a).
-
-(* constant 4 *)
-definition l_trimp ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_imp a b.λj:l_imp b c.(λx:a.j (i x) : l_imp a c).
-
-(* constant 5 *)
-axiom l_con : Prop.
-
-(* constant 6 *)
-definition l_not ≝ λa:Prop.(l_imp a l_con : Prop).
-
-(* constant 7 *)
-definition l_wel ≝ λa:Prop.(l_not (l_not a) : Prop).
-
-(* constant 8 *)
-definition l_weli ≝ λa:Prop.λa1:a.(λx:l_not a.x a1 : l_wel a).
-
-(* constant 9 *)
-axiom l_et : ∀a:Prop.∀w:l_wel a.a.
-
-(* constant 10 *)
-definition l_cone ≝ λa:Prop.λc1:l_con.(l_et a (λx:l_not a.c1) : a).
-
-(* constant 11 *)
-definition l_imp_th1 ≝ λa:Prop.λb:Prop.λi:l_imp a b.λj:l_imp (l_not a) b.(l_et b (λx:l_not b.x (j (l_trimp a b l_con i x))) : b).
-
-(* constant 12 *)
-definition l_imp_th2 ≝ λa:Prop.λb:Prop.λn:l_not a.(l_trimp a l_con b n (λx:l_con.l_cone b x) : l_imp a b).
-
-(* constant 13 *)
-definition l_imp_th3 ≝ λa:Prop.λb:Prop.λn:l_not b.λi:l_imp a b.(l_trimp a b l_con i n : l_not a).
-
-(* constant 14 *)
-definition l_imp_th4 ≝ λa:Prop.λb:Prop.λa1:a.λn:l_not b.(λx:l_imp a b.l_imp_th3 a b n x a1 : l_not (l_imp a b)).
-
-(* constant 15 *)
-definition l_imp_th5 ≝ λa:Prop.λb:Prop.λn:l_not (l_imp a b).(l_et a (λx:l_not a.n (l_imp_th2 a b x)) : a).
-
-(* constant 16 *)
-definition l_imp_th6 ≝ λa:Prop.λb:Prop.λn:l_not (l_imp a b).(λx:b.n (λy:a.x) : l_not b).
-
-(* constant 17 *)
-definition l_imp_th7 ≝ λa:Prop.λb:Prop.λn:l_not b.λi:l_imp (l_not a) b.(l_et a (l_imp_th3 (l_not a) b n i) : a).
-
-(* constant 18 *)
-definition l_cp ≝ λa:Prop.λb:Prop.λi:l_imp (l_not b) (l_not a).(λx:a.l_imp_th7 b (l_not a) (l_weli a x) i : l_imp a b).
-
-(* constant 19 *)
-definition l_obvious ≝ (l_imp l_con l_con : Prop).
-
-(* constant 20 *)
-definition l_obviousi ≝ (l_refimp l_con : l_obvious).
-
-(* constant 21 *)
-definition l_ec ≝ λa:Prop.λb:Prop.(l_imp a (l_not b) : Prop).
-
-(* constant 22 *)
-definition l_eci1 ≝ λa:Prop.λb:Prop.λn:l_not a.(l_imp_th2 a (l_not b) n : l_ec a b).
-
-(* constant 23 *)
-definition l_eci2 ≝ λa:Prop.λb:Prop.λn:l_not b.(λx:a.n : l_ec a b).
-
-(* constant 24 *)
-definition l_ec_th1 ≝ λa:Prop.λb:Prop.λi:l_imp a (l_not b).(i : l_ec a b).
-
-(* constant 25 *)
-definition l_ec_th2 ≝ λa:Prop.λb:Prop.λi:l_imp b (l_not a).(λx:a.λy:b.i y x : l_ec a b).
-
-(* constant 26 *)
-definition l_comec ≝ λa:Prop.λb:Prop.λe:l_ec a b.(l_ec_th2 b a e : l_ec b a).
-
-(* constant 27 *)
-definition l_ece1 ≝ λa:Prop.λb:Prop.λe:l_ec a b.λa1:a.(e a1 : l_not b).
-
-(* constant 28 *)
-definition l_ece2 ≝ λa:Prop.λb:Prop.λe:l_ec a b.λb1:b.(l_imp_th3 a (l_not b) (l_weli b b1) e : l_not a).
-
-(* constant 29 *)
-definition l_ec_th3 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec a b.λi:l_imp c a.(l_trimp c a (l_not b) i e : l_ec c b).
-
-(* constant 30 *)
-definition l_ec_th4 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec a b.λi:l_imp c b.(l_comec c a (l_ec_th3 b a c (l_comec a b e) i) : l_ec a c).
-
-(* constant 31 *)
-definition l_and ≝ λa:Prop.λb:Prop.(l_not (l_ec a b) : Prop).
-
-(* constant 32 *)
-definition l_andi ≝ λa:Prop.λb:Prop.λa1:a.λb1:b.(l_imp_th4 a (l_not b) a1 (l_weli b b1) : l_and a b).
-
-(* constant 33 *)
-definition l_ande1 ≝ λa:Prop.λb:Prop.λa1:l_and a b.(l_imp_th5 a (l_not b) a1 : a).
-
-(* constant 34 *)
-definition l_ande2 ≝ λa:Prop.λb:Prop.λa1:l_and a b.(l_et b (l_imp_th6 a (l_not b) a1) : b).
-
-(* constant 35 *)
-definition l_comand ≝ λa:Prop.λb:Prop.λa1:l_and a b.(l_andi b a (l_ande2 a b a1) (l_ande1 a b a1) : l_and b a).
-
-(* constant 36 *)
-definition l_and_th1 ≝ λa:Prop.λb:Prop.λn:l_not a.(l_weli (l_ec a b) (l_eci1 a b n) : l_not (l_and a b)).
-
-(* constant 37 *)
-definition l_and_th2 ≝ λa:Prop.λb:Prop.λn:l_not b.(l_weli (l_ec a b) (l_eci2 a b n) : l_not (l_and a b)).
-
-(* constant 38 *)
-definition l_and_th3 ≝ λa:Prop.λb:Prop.λn:l_not (l_and a b).λa1:a.(l_ece1 a b (l_et (l_ec a b) n) a1 : l_not b).
-
-(* constant 39 *)
-definition l_and_th4 ≝ λa:Prop.λb:Prop.λn:l_not (l_and a b).λb1:b.(l_ece2 a b (l_et (l_ec a b) n) b1 : l_not a).
-
-(* constant 40 *)
-definition l_and_th5 ≝ λa:Prop.λb:Prop.λn:l_not (l_and a b).(l_imp_th3 (l_and b a) (l_and a b) n (λx:l_and b a.l_comand b a x) : l_not (l_and b a)).
-
-(* constant 41 *)
-definition l_and_th6 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and a b.λi:l_imp a c.(l_andi c b (i (l_ande1 a b a1)) (l_ande2 a b a1) : l_and c b).
-
-(* constant 42 *)
-definition l_and_th7 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and a b.λi:l_imp b c.(l_andi a c (l_ande1 a b a1) (i (l_ande2 a b a1)) : l_and a c).
-
-(* constant 43 *)
-definition l_or ≝ λa:Prop.λb:Prop.(l_imp (l_not a) b : Prop).
-
-(* constant 44 *)
-definition l_ori1 ≝ λa:Prop.λb:Prop.λa1:a.(l_imp_th2 (l_not a) b (l_weli a a1) : l_or a b).
-
-(* constant 45 *)
-definition l_ori2 ≝ λa:Prop.λb:Prop.λb1:b.(λx:l_not a.b1 : l_or a b).
-
-(* constant 46 *)
-definition l_or_th1 ≝ λa:Prop.λb:Prop.λi:l_imp (l_not a) b.(i : l_or a b).
-
-(* constant 47 *)
-definition l_or_th2 ≝ λa:Prop.λb:Prop.λi:l_imp (l_not b) a.(λx:l_not a.l_et b (l_imp_th3 (l_not b) a x i) : l_or a b).
-
-(* constant 48 *)
-definition l_ore2 ≝ λa:Prop.λb:Prop.λo:l_or a b.λn:l_not a.(o n : b).
-
-(* constant 49 *)
-definition l_ore1 ≝ λa:Prop.λb:Prop.λo:l_or a b.λn:l_not b.(l_et a (l_imp_th3 (l_not a) b n o) : a).
-
-(* constant 50 *)
-definition l_comor ≝ λa:Prop.λb:Prop.λo:l_or a b.(λx:l_not b.l_ore1 a b o x : l_or b a).
-
-(* constant 51 *)
-definition l_or_th3 ≝ λa:Prop.λb:Prop.λn:l_not a.λm:l_not b.(l_imp_th4 (l_not a) b n m : l_not (l_or a b)).
-
-(* constant 52 *)
-definition l_or_th4 ≝ λa:Prop.λb:Prop.λn:l_not (l_or a b).(l_imp_th5 (l_not a) b n : l_not a).
-
-(* constant 53 *)
-definition l_or_th5 ≝ λa:Prop.λb:Prop.λn:l_not (l_or a b).(l_imp_th6 (l_not a) b n : l_not b).
-
-(* constant 54 *)
-definition l_or_th6 ≝ λa:Prop.(l_refimp (l_not a) : l_or a (l_not a)).
-
-(* constant 55 *)
-definition l_orapp ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or a b.λi:l_imp a c.λj:l_imp b c.(l_imp_th1 a c i (l_trimp (l_not a) b c o j) : c).
-
-(* constant 56 *)
-definition l_or_th7 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or a b.λi:l_imp a c.(l_trimp (l_not c) (l_not a) b (λx:l_not c.l_imp_th3 a c x i) o : l_or c b).
-
-(* constant 57 *)
-definition l_or_th8 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or a b.λi:l_imp b c.(l_trimp (l_not a) b c o i : l_or a c).
-
-(* constant 58 *)
-definition l_or_th9 ≝ λa:Prop.λb:Prop.λc:Prop.λd:Prop.λo:l_or a b.λi:l_imp a c.λj:l_imp b d.(l_or_th7 a d c (l_or_th8 a b d o j) i : l_or c d).
-
-(* constant 59 *)
-definition l_or_th10 ≝ λa:Prop.λb:Prop.λo:l_or a b.(o : l_imp (l_not a) b).
-
-(* constant 60 *)
-definition l_or_th11 ≝ λa:Prop.λb:Prop.λo:l_or a b.(l_comor a b o : l_imp (l_not b) a).
-
-(* constant 61 *)
-definition l_or_th12 ≝ λa:Prop.λb:Prop.λo:l_or (l_not a) b.(l_trimp a (l_wel a) b (λx:a.l_weli a x) o : l_imp a b).
-
-(* constant 62 *)
-definition l_or_th13 ≝ λa:Prop.λb:Prop.λi:l_imp a b.(l_trimp (l_wel a) a b (λx:l_wel a.l_et a x) i : l_or (l_not a) b).
-
-(* constant 63 *)
-definition l_or_th14 ≝ λa:Prop.λb:Prop.λo:l_or (l_not a) (l_not b).(l_weli (l_ec a b) (l_or_th12 a (l_not b) o) : l_not (l_and a b)).
-
-(* constant 64 *)
-definition l_or_th15 ≝ λa:Prop.λb:Prop.λn:l_not (l_and a b).(l_or_th13 a (l_not b) (l_et (l_ec a b) n) : l_or (l_not a) (l_not b)).
-
-(* constant 65 *)
-definition l_or_th16 ≝ λa:Prop.λb:Prop.λa1:l_and (l_not a) (l_not b).(l_or_th3 a b (l_ande1 (l_not a) (l_not b) a1) (l_ande2 (l_not a) (l_not b) a1) : l_not (l_or a b)).
-
-(* constant 66 *)
-definition l_or_th17 ≝ λa:Prop.λb:Prop.λn:l_not (l_or a b).(l_andi (l_not a) (l_not b) (l_or_th4 a b n) (l_or_th5 a b n) : l_and (l_not a) (l_not b)).
-
-(* constant 67 *)
-definition l_orec ≝ λa:Prop.λb:Prop.(l_and (l_or a b) (l_ec a b) : Prop).
-
-(* constant 68 *)
-definition l_oreci ≝ λa:Prop.λb:Prop.λo:l_or a b.λe:l_ec a b.(l_andi (l_or a b) (l_ec a b) o e : l_orec a b).
-
-(* constant 69 *)
-definition l_orec_th1 ≝ λa:Prop.λb:Prop.λa1:a.λn:l_not b.(l_oreci a b (l_ori1 a b a1) (l_eci2 a b n) : l_orec a b).
-
-(* constant 70 *)
-definition l_orec_th2 ≝ λa:Prop.λb:Prop.λn:l_not a.λb1:b.(l_oreci a b (l_ori2 a b b1) (l_eci1 a b n) : l_orec a b).
-
-(* constant 71 *)
-definition l_orece1 ≝ λa:Prop.λb:Prop.λo:l_orec a b.(l_ande1 (l_or a b) (l_ec a b) o : l_or a b).
-
-(* constant 72 *)
-definition l_orece2 ≝ λa:Prop.λb:Prop.λo:l_orec a b.(l_ande2 (l_or a b) (l_ec a b) o : l_ec a b).
-
-(* constant 73 *)
-definition l_comorec ≝ λa:Prop.λb:Prop.λo:l_orec a b.(l_oreci b a (l_comor a b (l_orece1 a b o)) (l_comec a b (l_orece2 a b o)) : l_orec b a).
-
-(* constant 74 *)
-definition l_orec_th3 ≝ λa:Prop.λb:Prop.λo:l_orec a b.λa1:a.(l_ece1 a b (l_orece2 a b o) a1 : l_not b).
-
-(* constant 75 *)
-definition l_orec_th4 ≝ λa:Prop.λb:Prop.λo:l_orec a b.λb1:b.(l_ece2 a b (l_orece2 a b o) b1 : l_not a).
-
-(* constant 76 *)
-definition l_orec_th5 ≝ λa:Prop.λb:Prop.λo:l_orec a b.λn:l_not a.(l_ore2 a b (l_orece1 a b o) n : b).
-
-(* constant 77 *)
-definition l_orec_th6 ≝ λa:Prop.λb:Prop.λo:l_orec a b.λn:l_not b.(l_ore1 a b (l_orece1 a b o) n : a).
-
-(* constant 78 *)
-definition l_iff ≝ λa:Prop.λb:Prop.(l_and (l_imp a b) (l_imp b a) : Prop).
-
-(* constant 79 *)
-definition l_iffi ≝ λa:Prop.λb:Prop.λi:l_imp a b.λj:l_imp b a.(l_andi (l_imp a b) (l_imp b a) i j : l_iff a b).
-
-(* constant 80 *)
-definition l_iff_th1 ≝ λa:Prop.λb:Prop.λa1:a.λb1:b.(l_iffi a b (λx:a.b1) (λx:b.a1) : l_iff a b).
-
-(* constant 81 *)
-definition l_iff_th2 ≝ λa:Prop.λb:Prop.λn:l_not a.λm:l_not b.(l_iffi a b (l_imp_th2 a b n) (l_imp_th2 b a m) : l_iff a b).
-
-(* constant 82 *)
-definition l_iffe1 ≝ λa:Prop.λb:Prop.λi:l_iff a b.(l_ande1 (l_imp a b) (l_imp b a) i : l_imp a b).
-
-(* constant 83 *)
-definition l_iffe2 ≝ λa:Prop.λb:Prop.λi:l_iff a b.(l_ande2 (l_imp a b) (l_imp b a) i : l_imp b a).
-
-(* constant 84 *)
-definition l_comiff ≝ λa:Prop.λb:Prop.λi:l_iff a b.(l_iffi b a (l_iffe2 a b i) (l_iffe1 a b i) : l_iff b a).
-
-(* constant 85 *)
-definition l_iff_th3 ≝ λa:Prop.λb:Prop.λi:l_iff a b.λa1:a.(l_iffe1 a b i a1 : b).
-
-(* constant 86 *)
-definition l_iff_th4 ≝ λa:Prop.λb:Prop.λi:l_iff a b.λb1:b.(l_iffe2 a b i b1 : a).
-
-(* constant 87 *)
-definition l_iff_th5 ≝ λa:Prop.λb:Prop.λi:l_iff a b.λn:l_not a.(l_imp_th3 b a n (l_iffe2 a b i) : l_not b).
-
-(* constant 88 *)
-definition l_iff_th6 ≝ λa:Prop.λb:Prop.λi:l_iff a b.λn:l_not b.(l_imp_th3 a b n (l_iffe1 a b i) : l_not a).
-
-(* constant 89 *)
-definition l_iff_th7 ≝ λa:Prop.λb:Prop.λa1:a.λn:l_not b.(l_and_th1 (l_imp a b) (l_imp b a) (l_imp_th4 a b a1 n) : l_not (l_iff a b)).
-
-(* constant 90 *)
-definition l_iff_th8 ≝ λa:Prop.λb:Prop.λn:l_not a.λb1:b.(l_and_th2 (l_imp a b) (l_imp b a) (l_imp_th4 b a b1 n) : l_not (l_iff a b)).
-
-(* constant 91 *)
-definition l_refiff ≝ λa:Prop.(l_iffi a a (l_refimp a) (l_refimp a) : l_iff a a).
-
-(* constant 92 *)
-definition l_symiff ≝ λa:Prop.λb:Prop.λi:l_iff a b.(l_comiff a b i : l_iff b a).
-
-(* constant 93 *)
-definition l_triff ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λj:l_iff b c.(l_iffi a c (l_trimp a b c (l_iffe1 a b i) (l_iffe1 b c j)) (l_trimp c b a (l_iffe2 b c j) (l_iffe2 a b i)) : l_iff a c).
-
-(* constant 94 *)
-definition l_iff_th9 ≝ λa:Prop.λb:Prop.λi:l_iff a b.(λx:l_not a.l_iff_th5 a b i x : l_imp (l_not a) (l_not b)).
-
-(* constant 95 *)
-definition l_iff_th10 ≝ λa:Prop.λb:Prop.λi:l_iff a b.(λx:l_not b.l_iff_th6 a b i x : l_imp (l_not b) (l_not a)).
-
-(* constant 96 *)
-definition l_iff_th11 ≝ λa:Prop.λb:Prop.λi:l_iff a b.(l_iffi (l_not a) (l_not b) (l_iff_th9 a b i) (l_iff_th10 a b i) : l_iff (l_not a) (l_not b)).
-
-(* constant 97 *)
-definition l_iff_th12 ≝ λa:Prop.λb:Prop.λi:l_imp (l_not a) (l_not b).λj:l_imp (l_not b) (l_not a).(l_iffi a b (l_cp a b j) (l_cp b a i) : l_iff a b).
-
-(* constant 98 *)
-definition l_iff_th13 ≝ λa:Prop.λb:Prop.λo:l_orec a b.(l_iffi a (l_not b) (l_orece2 a b o) (l_comor a b (l_orece1 a b o)) : l_iff a (l_not b)).
-
-(* constant 99 *)
-definition l_iff_th14 ≝ λa:Prop.λb:Prop.λo:l_orec a b.(l_iff_th13 b a (l_comorec a b o) : l_iff b (l_not a)).
-
-(* constant 100 *)
-definition l_iff_th15 ≝ λa:Prop.λb:Prop.λi:l_iff a (l_not b).(l_oreci a b (l_comor b a (l_iffe2 a (l_not b) i)) (l_iffe1 a (l_not b) i) : l_orec a b).
-
-(* constant 101 *)
-definition l_iff_th16 ≝ λa:Prop.λb:Prop.λi:l_iff b (l_not a).(l_comorec b a (l_iff_th15 b a i) : l_orec a b).
-
-(* constant 102 *)
-definition l_iff_thimp1 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λj:l_imp a c.(l_trimp b a c (l_iffe2 a b i) j : l_imp b c).
-
-(* constant 103 *)
-definition l_iff_thimp2 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λj:l_imp c a.(l_trimp c a b j (l_iffe1 a b i) : l_imp c b).
-
-(* constant 104 *)
-definition l_iff_thec1 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λe:l_ec a c.(l_ec_th3 a c b e (l_iffe2 a b i) : l_ec b c).
-
-(* constant 105 *)
-definition l_iff_thec2 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λe:l_ec c a.(l_ec_th4 c a b e (l_iffe2 a b i) : l_ec c b).
-
-(* constant 106 *)
-definition l_iff_thand1 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λa1:l_and a c.(l_and_th6 a c b a1 (l_iffe1 a b i) : l_and b c).
-
-(* constant 107 *)
-definition l_iff_thand2 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λa1:l_and c a.(l_and_th7 c a b a1 (l_iffe1 a b i) : l_and c b).
-
-(* constant 108 *)
-definition l_iff_thor1 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λo:l_or a c.(l_or_th7 a c b o (l_iffe1 a b i) : l_or b c).
-
-(* constant 109 *)
-definition l_iff_thor2 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λo:l_or c a.(l_or_th8 c a b o (l_iffe1 a b i) : l_or c b).
-
-(* constant 110 *)
-definition l_iff_thorec1 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λo:l_orec a c.(l_oreci b c (l_iff_thor1 a b c i (l_orece1 a c o)) (l_iff_thec1 a b c i (l_orece2 a c o)) : l_orec b c).
-
-(* constant 111 *)
-definition l_iff_thorec2 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λo:l_orec c a.(l_oreci c b (l_iff_thor2 a b c i (l_orece1 c a o)) (l_iff_thec2 a b c i (l_orece2 c a o)) : l_orec c b).
-
-(* constant 112 *)
-definition l_all ≝ λsigma:Type[0].λp:∀x:sigma.Prop.(∀x:sigma.p x : Prop).
-
-(* constant 113 *)
-definition l_alle ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λa1:l_all sigma p.λs:sigma.(a1 s : p s).
-
-(* constant 114 *)
-definition l_all_th1 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:sigma.λn:l_not (p s).(λx:l_all sigma p.n (x s) : l_not (l_all sigma p)).
-
-(* constant 115 *)
-definition l_non ≝ λsigma:Type[0].λp:∀x:sigma.Prop.(λx:sigma.l_not (p x) : ∀x:sigma.Prop).
-
-(* constant 116 *)
-definition l_none ≝ λsigma:Type[0].λp:∀x:sigma.Prop.(l_all sigma (l_non sigma p) : Prop).
-
-(* constant 117 *)
-definition l_some ≝ λsigma:Type[0].λp:∀x:sigma.Prop.(l_not (l_none sigma p) : Prop).
-
-(* constant 118 *)
-definition l_somei ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:sigma.λsp:p s.(l_all_th1 sigma (l_non sigma p) s (l_weli (p s) sp) : l_some sigma p).
-
-(* constant 119 *)
-definition l_some_t1 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λn:l_not (l_all sigma p).λm:l_none sigma (l_non sigma p).λs:sigma.(l_et (p s) (m s) : p s).
-
-(* constant 120 *)
-definition l_some_t2 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λn:l_not (l_all sigma p).λm:l_none sigma (l_non sigma p).(n (λx:sigma.l_some_t1 sigma p n m x) : l_con).
-
-(* constant 121 *)
-definition l_some_th1 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λn:l_not (l_all sigma p).(λx:l_none sigma (l_non sigma p).l_some_t2 sigma p n x : l_some sigma (l_non sigma p)).
-
-(* constant 122 *)
-definition l_some_t3 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:l_some sigma (l_non sigma p).λa1:l_all sigma p.λt:sigma.(l_weli (p t) (a1 t) : l_not (l_not (p t))).
-
-(* constant 123 *)
-definition l_some_t4 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:l_some sigma (l_non sigma p).λa1:l_all sigma p.(s (λx:sigma.l_some_t3 sigma p s a1 x) : l_con).
-
-(* constant 124 *)
-definition l_some_th2 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:l_some sigma (l_non sigma p).(λx:l_all sigma p.l_some_t4 sigma p s x : l_not (l_all sigma p)).
-
-(* constant 125 *)
-definition l_some_th3 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λn:l_not (l_some sigma p).(l_et (l_none sigma p) n : l_none sigma p).
-
-(* constant 126 *)
-definition l_some_th4 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λn:l_not (l_some sigma p).λs:sigma.(l_some_th3 sigma p n s : l_not (p s)).
-
-(* constant 127 *)
-definition l_some_th5 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λn:l_none sigma p.(l_weli (l_none sigma p) n : l_not (l_some sigma p)).
-
-(* constant 128 *)
-definition l_some_t5 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:l_some sigma p.λx:Prop.λi:∀y:sigma.l_imp (p y) x.λn:l_not x.λt:sigma.(l_imp_th3 (p t) x n (i t) : l_not (p t)).
-
-(* constant 129 *)
-definition l_some_t6 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:l_some sigma p.λx:Prop.λi:∀y:sigma.l_imp (p y) x.λn:l_not x.(l_mp (l_some sigma p) l_con s (l_some_th5 sigma p (λy:sigma.l_some_t5 sigma p s x i n y)) : l_con).
-
-(* constant 130 *)
-definition l_someapp ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:l_some sigma p.λx:Prop.λi:∀y:sigma.l_imp (p y) x.(l_et x (λy:l_not x.l_some_t6 sigma p s x i y) : x).
-
-(* constant 131 *)
-definition l_some_th6 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λq:∀x:sigma.Prop.λs:l_some sigma p.λi:∀x:sigma.l_imp (p x) (q x).(l_someapp sigma p s (l_some sigma q) (λx:sigma.λy:p x.l_somei sigma q x (l_mp (p x) (q x) y (i x))) : l_some sigma q).
-
-(* constant 132 *)
-definition l_or3 ≝ λa:Prop.λb:Prop.λc:Prop.(l_or a (l_or b c) : Prop).
-
-(* constant 133 *)
-definition l_or3_th1 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.λn:l_not a.(l_ore2 a (l_or b c) o n : l_or b c).
-
-(* constant 134 *)
-definition l_or3e3 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.λn:l_not a.λm:l_not b.(l_ore2 b c (l_or3_th1 a b c o n) m : c).
-
-(* constant 135 *)
-definition l_or3_th2 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.λn:l_not b.(l_or_th2 c a (λx:l_not a.l_or3e3 a b c o x n) : l_or c a).
-
-(* constant 136 *)
-definition l_or3e1 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.λn:l_not b.λm:l_not c.(l_ore2 c a (l_or3_th2 a b c o n) m : a).
-
-(* constant 137 *)
-definition l_or3_th3 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.λn:l_not c.(l_or_th2 a b (λx:l_not b.l_or3e1 a b c o x n) : l_or a b).
-
-(* constant 138 *)
-definition l_or3e2 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.λn:l_not c.λm:l_not a.(l_ore2 a b (l_or3_th3 a b c o n) m : b).
-
-(* constant 139 *)
-definition l_or3_th4 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.(l_or_th1 b (l_or c a) (λx:l_not b.l_or3_th2 a b c o x) : l_or3 b c a).
-
-(* constant 140 *)
-definition l_or3_th5 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.(l_or3_th4 b c a (l_or3_th4 a b c o) : l_or3 c a b).
-
-(* constant 141 *)
-definition l_or3i1 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:a.(l_ori1 a (l_or b c) a1 : l_or3 a b c).
-
-(* constant 142 *)
-definition l_or3i2 ≝ λa:Prop.λb:Prop.λc:Prop.λb1:b.(l_ori2 a (l_or b c) (l_ori1 b c b1) : l_or3 a b c).
-
-(* constant 143 *)
-definition l_or3i3 ≝ λa:Prop.λb:Prop.λc:Prop.λc1:c.(l_ori2 a (l_or b c) (l_ori2 b c c1) : l_or3 a b c).
-
-(* constant 144 *)
-definition l_or3_th6 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or a b.(l_or3_th4 c a b (l_ori2 c (l_or a b) o) : l_or3 a b c).
-
-(* constant 145 *)
-definition l_or3_th7 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or b c.(l_ori2 a (l_or b c) o : l_or3 a b c).
-
-(* constant 146 *)
-definition l_or3_th8 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or c a.(l_or3_th4 c a b (l_or3_th6 c a b o) : l_or3 a b c).
-
-(* constant 147 *)
-definition l_or3app ≝ λa:Prop.λb:Prop.λc:Prop.λd:Prop.λo:l_or3 a b c.λi:l_imp a d.λj:l_imp b d.λk:l_imp c d.(l_orapp a (l_or b c) d o i (λx:l_or b c.l_orapp b c d x j k) : d).
-
-(* constant 148 *)
-definition l_and3 ≝ λa:Prop.λb:Prop.λc:Prop.(l_and a (l_and b c) : Prop).
-
-(* constant 149 *)
-definition l_and3e1 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_ande1 a (l_and b c) a1 : a).
-
-(* constant 150 *)
-definition l_and3e2 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_ande1 b c (l_ande2 a (l_and b c) a1) : b).
-
-(* constant 151 *)
-definition l_and3e3 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_ande2 b c (l_ande2 a (l_and b c) a1) : c).
-
-(* constant 152 *)
-definition l_and3i ≝ λa:Prop.λb:Prop.λc:Prop.λa1:a.λb1:b.λc1:c.(l_andi a (l_and b c) a1 (l_andi b c b1 c1) : l_and3 a b c).
-
-(* constant 153 *)
-definition l_and3_th1 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_and3i b c a (l_and3e2 a b c a1) (l_and3e3 a b c a1) (l_and3e1 a b c a1) : l_and3 b c a).
-
-(* constant 154 *)
-definition l_and3_th2 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_and3_th1 b c a (l_and3_th1 a b c a1) : l_and3 c a b).
-
-(* constant 155 *)
-definition l_and3_th3 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_andi a b (l_and3e1 a b c a1) (l_and3e2 a b c a1) : l_and a b).
-
-(* constant 156 *)
-definition l_and3_th4 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_ande2 a (l_and b c) a1 : l_and b c).
-
-(* constant 157 *)
-definition l_and3_th5 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_and3_th3 c a b (l_and3_th2 a b c a1) : l_and c a).
-
-(* constant 158 *)
-definition l_and3_th6 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_and3i c b a (l_and3e3 a b c a1) (l_and3e2 a b c a1) (l_and3e1 a b c a1) : l_and3 c b a).
-
-(* constant 159 *)
-definition l_ec3 ≝ λa:Prop.λb:Prop.λc:Prop.(l_and3 (l_ec a b) (l_ec b c) (l_ec c a) : Prop).
-
-(* constant 160 *)
-definition l_ec3_th1 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.(l_and3e1 (l_ec a b) (l_ec b c) (l_ec c a) e : l_ec a b).
-
-(* constant 161 *)
-definition l_ec3_th2 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.(l_and3e2 (l_ec a b) (l_ec b c) (l_ec c a) e : l_ec b c).
-
-(* constant 162 *)
-definition l_ec3_th3 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.(l_and3e3 (l_ec a b) (l_ec b c) (l_ec c a) e : l_ec c a).
-
-(* constant 163 *)
-definition l_ec3_th4 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.(l_and3_th1 (l_ec a b) (l_ec b c) (l_ec c a) e : l_ec3 b c a).
-
-(* constant 164 *)
-definition l_ec3_th5 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.(l_ec3_th4 b c a (l_ec3_th4 a b c e) : l_ec3 c a b).
-
-(* constant 165 *)
-definition l_ec3_th5a ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.(l_and3i (l_ec c b) (l_ec b a) (l_ec a c) (l_comec b c (l_ec3_th2 a b c e)) (l_comec a b (l_ec3_th1 a b c e)) (l_comec c a (l_ec3_th3 a b c e)) : l_ec3 c b a).
-
-(* constant 166 *)
-definition l_ec3e12 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λa1:a.(l_ece1 a b (l_ec3_th1 a b c e) a1 : l_not b).
-
-(* constant 167 *)
-definition l_ec3e13 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λa1:a.(l_ece2 c a (l_ec3_th3 a b c e) a1 : l_not c).
-
-(* constant 168 *)
-definition l_ec3e23 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λb1:b.(l_ec3e12 b c a (l_ec3_th4 a b c e) b1 : l_not c).
-
-(* constant 169 *)
-definition l_ec3e21 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λb1:b.(l_ec3e13 b c a (l_ec3_th4 a b c e) b1 : l_not a).
-
-(* constant 170 *)
-definition l_ec3e31 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λc1:c.(l_ec3e12 c a b (l_ec3_th5 a b c e) c1 : l_not a).
-
-(* constant 171 *)
-definition l_ec3e32 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λc1:c.(l_ec3e13 c a b (l_ec3_th5 a b c e) c1 : l_not b).
-
-(* constant 172 *)
-definition l_ec3_th6 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec a b.λf:l_ec b c.λg:l_ec c a.(l_and3i (l_ec a b) (l_ec b c) (l_ec c a) e f g : l_ec3 a b c).
-
-(* constant 173 *)
-definition l_ec3_th7 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λo:l_or a b.(l_orapp a b (l_not c) o (λx:a.l_ece2 c a (l_ec3_th3 a b c e) x) (λx:b.l_ece1 b c (l_ec3_th2 a b c e) x) : l_not c).
-
-(* constant 174 *)
-definition l_ec3_th8 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λo:l_or b c.(l_ec3_th7 b c a (l_ec3_th4 a b c e) o : l_not a).
-
-(* constant 175 *)
-definition l_ec3_th9 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λo:l_or c a.(l_ec3_th7 c a b (l_ec3_th5 a b c e) o : l_not b).
-
-(* constant 176 *)
-definition l_ec3i1 ≝ λa:Prop.λb:Prop.λc:Prop.λn:l_not a.λm:l_not b.(l_ec3_th6 a b c (l_eci1 a b n) (l_eci1 b c m) (l_eci2 c a n) : l_ec3 a b c).
-
-(* constant 177 *)
-definition l_ec3i2 ≝ λa:Prop.λb:Prop.λc:Prop.λn:l_not b.λm:l_not c.(l_ec3_th6 a b c (l_eci2 a b n) (l_eci1 b c n) (l_eci1 c a m) : l_ec3 a b c).
-
-(* constant 178 *)
-definition l_ec3i3 ≝ λa:Prop.λb:Prop.λc:Prop.λn:l_not c.λm:l_not a.(l_ec3_th6 a b c (l_eci1 a b m) (l_eci2 b c n) (l_eci1 c a n) : l_ec3 a b c).
-
-(* constant 179 *)
-definition l_ec3_t1 ≝ λa:Prop.λb:Prop.λc:Prop.λd:Prop.λe:Prop.λf:Prop.λo1:l_or3 a b c.λp1:l_ec3 d e f.λi:l_imp a d.λj:l_imp b e.λk:l_imp c f.λd1:d.(λx:b.l_mp e l_con (j x) (l_ec3e12 d e f p1 d1) : l_not b).
-
-(* constant 180 *)
-definition l_ec3_t2 ≝ λa:Prop.λb:Prop.λc:Prop.λd:Prop.λe:Prop.λf:Prop.λo1:l_or3 a b c.λp1:l_ec3 d e f.λi:l_imp a d.λj:l_imp b e.λk:l_imp c f.λd1:d.(λx:c.l_mp f l_con (k x) (l_ec3e13 d e f p1 d1) : l_not c).
-
-(* constant 181 *)
-definition l_ec3_th10 ≝ λa:Prop.λb:Prop.λc:Prop.λd:Prop.λe:Prop.λf:Prop.λo1:l_or3 a b c.λp1:l_ec3 d e f.λi:l_imp a d.λj:l_imp b e.λk:l_imp c f.λd1:d.(l_or3e1 a b c o1 (l_ec3_t1 a b c d e f o1 p1 i j k d1) (l_ec3_t2 a b c d e f o1 p1 i j k d1) : a).
-
-(* constant 182 *)
-definition l_ec3_th11 ≝ λa:Prop.λb:Prop.λc:Prop.λd:Prop.λe:Prop.λf:Prop.λo1:l_or3 a b c.λp1:l_ec3 d e f.λi:l_imp a d.λj:l_imp b e.λk:l_imp c f.λe1:e.(l_ec3_th10 b c a e f d (l_or3_th4 a b c o1) (l_ec3_th4 d e f p1) j k i e1 : b).
-
-(* constant 183 *)
-definition l_ec3_th12 ≝ λa:Prop.λb:Prop.λc:Prop.λd:Prop.λe:Prop.λf:Prop.λo1:l_or3 a b c.λp1:l_ec3 d e f.λi:l_imp a d.λj:l_imp b e.λk:l_imp c f.λf1:f.(l_ec3_th10 c a b f d e (l_or3_th5 a b c o1) (l_ec3_th5 d e f p1) k i j f1 : c).
-
-(* constant 184 *)
-definition l_orec3 ≝ λa:Prop.λb:Prop.λc:Prop.(l_and (l_or3 a b c) (l_ec3 a b c) : Prop).
-
-(* constant 185 *)
-definition l_orec3e1 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_orec3 a b c.(l_ande1 (l_or3 a b c) (l_ec3 a b c) o : l_or3 a b c).
-
-(* constant 186 *)
-definition l_orec3e2 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_orec3 a b c.(l_ande2 (l_or3 a b c) (l_ec3 a b c) o : l_ec3 a b c).
-
-(* constant 187 *)
-definition l_orec3i ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.λe:l_ec3 a b c.(l_andi (l_or3 a b c) (l_ec3 a b c) o e : l_orec3 a b c).
-
-(* constant 188 *)
-definition l_orec3_th1 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_orec3 a b c.(l_orec3i b c a (l_or3_th4 a b c (l_orec3e1 a b c o)) (l_ec3_th4 a b c (l_orec3e2 a b c o)) : l_orec3 b c a).
-
-(* constant 189 *)
-definition l_orec3_th2 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_orec3 a b c.(l_orec3i c a b (l_or3_th5 a b c (l_orec3e1 a b c o)) (l_ec3_th5 a b c (l_orec3e2 a b c o)) : l_orec3 c a b).
-
-(* constant 190 *)
-axiom l_e_is : Πsigma:Type[0].Πs:sigma.Πt:sigma.Prop.
-
-(* constant 191 *)
-axiom l_e_refis : Πsigma:Type[0].Πs:sigma.l_e_is sigma s s.
-
-(* constant 192 *)
-axiom l_e_isp : Πsigma:Type[0].∀p:∀x:sigma.Prop.Πs:sigma.Πt:sigma.∀sp:p s.∀i:l_e_is sigma s t.p t.
-
-(* constant 193 *)
-definition l_e_symis ≝ λsigma:Type[0].λs:sigma.λt:sigma.λi:l_e_is sigma s t.(l_e_isp sigma (λx:sigma.l_e_is sigma x s) s t (l_e_refis sigma s) i : l_e_is sigma t s).
-
-(* constant 194 *)
-definition l_e_tris ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λi:l_e_is sigma s t.λj:l_e_is sigma t u.(l_e_isp sigma (λx:sigma.l_e_is sigma x u) t s j (l_e_symis sigma s t i) : l_e_is sigma s u).
-
-(* constant 195 *)
-definition l_e_tris1 ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λi:l_e_is sigma u s.λj:l_e_is sigma u t.(l_e_tris sigma s u t (l_e_symis sigma u s i) j : l_e_is sigma s t).
-
-(* constant 196 *)
-definition l_e_tris2 ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λi:l_e_is sigma s u.λj:l_e_is sigma t u.(l_e_tris sigma s u t i (l_e_symis sigma t u j) : l_e_is sigma s t).
-
-(* constant 197 *)
-definition l_e_isp1 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:sigma.λt:sigma.λsp:p s.λi:l_e_is sigma t s.(l_e_isp sigma p s t sp (l_e_symis sigma t s i) : p t).
-
-(* constant 198 *)
-definition l_e_symnotis ≝ λsigma:Type[0].λs:sigma.λt:sigma.λn:l_not (l_e_is sigma s t).(l_imp_th3 (l_e_is sigma t s) (l_e_is sigma s t) n (λx:l_e_is sigma t s.l_e_symis sigma t s x) : l_not (l_e_is sigma t s)).
-
-(* constant 199 *)
-definition l_e_notis_th1 ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λn:l_not (l_e_is sigma s t).λi:l_e_is sigma s u.(l_e_isp sigma (λx:sigma.l_not (l_e_is sigma x t)) s u n i : l_not (l_e_is sigma u t)).
-
-(* constant 200 *)
-definition l_e_notis_th2 ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λn:l_not (l_e_is sigma s t).λi:l_e_is sigma u s.(l_e_notis_th1 sigma s t u n (l_e_symis sigma u s i) : l_not (l_e_is sigma u t)).
-
-(* constant 201 *)
-definition l_e_notis_th3 ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λn:l_not (l_e_is sigma s t).λi:l_e_is sigma t u.(l_e_isp sigma (λx:sigma.l_not (l_e_is sigma s x)) t u n i : l_not (l_e_is sigma s u)).
-
-(* constant 202 *)
-definition l_e_notis_th4 ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λn:l_not (l_e_is sigma s t).λi:l_e_is sigma u t.(l_e_notis_th3 sigma s t u n (l_e_symis sigma u t i) : l_not (l_e_is sigma s u)).
-
-(* constant 203 *)
-definition l_e_notis_th5 ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λv:sigma.λn:l_not (l_e_is sigma s t).λi:l_e_is sigma s u.λj:l_e_is sigma t v.(l_e_notis_th3 sigma u t v (l_e_notis_th1 sigma s t u n i) j : l_not (l_e_is sigma u v)).
-
-(* constant 204 *)
-definition l_e_tr3is ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λv:sigma.λi:l_e_is sigma s t.λj:l_e_is sigma t u.λk:l_e_is sigma u v.(l_e_tris sigma s u v (l_e_tris sigma s t u i j) k : l_e_is sigma s v).
-
-(* constant 205 *)
-definition l_e_tr4is ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λv:sigma.λw:sigma.λi:l_e_is sigma s t.λj:l_e_is sigma t u.λk:l_e_is sigma u v.λl:l_e_is sigma v w.(l_e_tris sigma s v w (l_e_tr3is sigma s t u v i j k) l : l_e_is sigma s w).
-
-(* constant 206 *)
-definition l_e_amone ≝ λsigma:Type[0].λp:∀x:sigma.Prop.(∀x:sigma.∀y:sigma.∀u:p x.∀v:p y.l_e_is sigma x y : Prop).
-
-(* constant 207 *)
-definition l_e_amonee ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λa1:l_e_amone sigma p.λs:sigma.λt:sigma.λsp:p s.λtp:p t.(a1 s t sp tp : l_e_is sigma s t).
-
-(* constant 208 *)
-definition l_e_one ≝ λsigma:Type[0].λp:∀x:sigma.Prop.(l_and (l_e_amone sigma p) (l_some sigma p) : Prop).
-
-(* constant 209 *)
-definition l_e_onei ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λa1:l_e_amone sigma p.λs:l_some sigma p.(l_andi (l_e_amone sigma p) (l_some sigma p) a1 s : l_e_one sigma p).
-
-(* constant 210 *)
-definition l_e_onee1 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λo1:l_e_one sigma p.(l_ande1 (l_e_amone sigma p) (l_some sigma p) o1 : l_e_amone sigma p).
-
-(* constant 211 *)
-definition l_e_onee2 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λo1:l_e_one sigma p.(l_ande2 (l_e_amone sigma p) (l_some sigma p) o1 : l_some sigma p).
-
-(* constant 212 *)
-axiom l_e_ind : Πsigma:Type[0].∀p:∀x:sigma.Prop.∀o1:l_e_one sigma p.sigma.
-
-(* constant 213 *)
-axiom l_e_oneax : Πsigma:Type[0].∀p:∀x:sigma.Prop.∀o1:l_e_one sigma p.p (l_e_ind sigma p o1).
-
-(* constant 214 *)
-definition l_e_one_th1 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λo1:l_e_one sigma p.λs:sigma.λsp:p s.(l_e_amonee sigma p (l_e_onee1 sigma p o1) (l_e_ind sigma p o1) s (l_e_oneax sigma p o1) sp : l_e_is sigma (l_e_ind sigma p o1) s).
-
-(* constant 215 *)
-definition l_e_isf ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs:sigma.λt:sigma.λi:l_e_is sigma s t.(l_e_isp sigma (λx:sigma.l_e_is tau (f s) (f x)) s t (l_e_refis tau (f s)) i : l_e_is tau (f s) (f t)).
-
-(* constant 216 *)
-definition l_e_injective ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.(l_all sigma (λx:sigma.l_all sigma (λy:sigma.l_imp (l_e_is tau (f x) (f y)) (l_e_is sigma x y))) : Prop).
-
-(* constant 217 *)
-definition l_e_isfe ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λs:sigma.λt:sigma.λj:l_e_is tau (f s) (f t).(i s t j : l_e_is sigma s t).
-
-(* constant 218 *)
-definition l_e_image ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λt0:tau.(l_some sigma (λx:sigma.l_e_is tau t0 (f x)) : Prop).
-
-(* constant 219 *)
-definition l_e_tofs ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs:sigma.(f s : tau).
-
-(* constant 220 *)
-definition l_e_imagei ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs:sigma.(l_somei sigma (λx:sigma.l_e_is tau (l_e_tofs sigma tau f s) (f x)) s (l_e_refis tau (l_e_tofs sigma tau f s)) : l_e_image sigma tau f (l_e_tofs sigma tau f s)).
-
-(* constant 221 *)
-definition l_e_inj_t1 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λta:tau.λtb:tau.λj:l_e_is tau ta tb.λsa:sigma.λsb:sigma.λja:l_e_is tau ta (l_e_tofs sigma tau f sa).λjb:l_e_is tau tb (l_e_tofs sigma tau f sb).(l_e_tr3is tau (l_e_tofs sigma tau f sa) ta tb (l_e_tofs sigma tau f sb) (l_e_symis tau ta (l_e_tofs sigma tau f sa) ja) j jb : l_e_is tau (l_e_tofs sigma tau f sa) (l_e_tofs sigma tau f sb)).
-
-(* constant 222 *)
-definition l_e_inj_th1 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λta:tau.λtb:tau.λj:l_e_is tau ta tb.λsa:sigma.λsb:sigma.λja:l_e_is tau ta (l_e_tofs sigma tau f sa).λjb:l_e_is tau tb (l_e_tofs sigma tau f sb).(l_e_isfe sigma tau f i sa sb (l_e_inj_t1 sigma tau f i ta tb j sa sb ja jb) : l_e_is sigma sa sb).
-
-(* constant 223 *)
-definition l_e_inj_th2 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λt0:tau.(λx:sigma.λy:sigma.λu:l_e_is tau t0 (f x).λv:l_e_is tau t0 (f y).l_e_inj_th1 sigma tau f i t0 t0 (l_e_refis tau t0) x y u v : l_e_amone sigma (λx:sigma.l_e_is tau t0 (f x))).
-
-(* constant 224 *)
-definition l_e_inj_th3 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λt0:tau.λj:l_e_image sigma tau f t0.(l_e_onei sigma (λx:sigma.l_e_is tau t0 (f x)) (l_e_inj_th2 sigma tau f i t0) j : l_e_one sigma (λx:sigma.l_e_is tau t0 (f x))).
-
-(* constant 225 *)
-definition l_e_soft ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λt0:tau.λj:l_e_image sigma tau f t0.(l_e_ind sigma (λx:sigma.l_e_is tau t0 (f x)) (l_e_inj_th3 sigma tau f i t0 j) : sigma).
-
-(* constant 226 *)
-definition l_e_inverse ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.(λx:tau.λu:l_e_image sigma tau f x.l_e_soft sigma tau f i x u : Πx:tau.Πu:l_e_image sigma tau f x.sigma).
-
-(* constant 227 *)
-definition l_e_ists1 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λt0:tau.λj:l_e_image sigma tau f t0.(l_e_oneax sigma (λx:sigma.l_e_is tau t0 (f x)) (l_e_inj_th3 sigma tau f i t0 j) : l_e_is tau t0 (l_e_tofs sigma tau f (l_e_soft sigma tau f i t0 j))).
-
-(* constant 228 *)
-definition l_e_ists2 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λt0:tau.λj:l_e_image sigma tau f t0.(l_e_symis tau t0 (l_e_tofs sigma tau f (l_e_soft sigma tau f i t0 j)) (l_e_ists1 sigma tau f i t0 j) : l_e_is tau (l_e_tofs sigma tau f (l_e_soft sigma tau f i t0 j)) t0).
-
-(* constant 229 *)
-definition l_e_isinv ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λta:tau.λja:l_e_image sigma tau f ta.λtb:tau.λjb:l_e_image sigma tau f tb.λj:l_e_is tau ta tb.(l_e_inj_th1 sigma tau f i ta tb j (l_e_soft sigma tau f i ta ja) (l_e_soft sigma tau f i tb jb) (l_e_ists1 sigma tau f i ta ja) (l_e_ists1 sigma tau f i tb jb) : l_e_is sigma (l_e_soft sigma tau f i ta ja) (l_e_soft sigma tau f i tb jb)).
-
-(* constant 230 *)
-definition l_e_isinve ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λta:tau.λja:l_e_image sigma tau f ta.λtb:tau.λjb:l_e_image sigma tau f tb.λj:l_e_is sigma (l_e_soft sigma tau f i ta ja) (l_e_soft sigma tau f i tb jb).(l_e_tr3is tau ta (l_e_tofs sigma tau f (l_e_soft sigma tau f i ta ja)) (l_e_tofs sigma tau f (l_e_soft sigma tau f i tb jb)) tb (l_e_ists1 sigma tau f i ta ja) (l_e_isf sigma tau f (l_e_soft sigma tau f i ta ja) (l_e_soft sigma tau f i tb jb) j) (l_e_ists2 sigma tau f i tb jb) : l_e_is tau ta tb).
-
-(* constant 231 *)
-definition l_e_isst1 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λs:sigma.(l_e_isfe sigma tau f i s (l_e_soft sigma tau f i (l_e_tofs sigma tau f s) (l_e_imagei sigma tau f s)) (l_e_ists1 sigma tau f i (l_e_tofs sigma tau f s) (l_e_imagei sigma tau f s)) : l_e_is sigma s (l_e_soft sigma tau f i (l_e_tofs sigma tau f s) (l_e_imagei sigma tau f s))).
-
-(* constant 232 *)
-definition l_e_isst2 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λs:sigma.(l_e_symis sigma s (l_e_soft sigma tau f i (l_e_tofs sigma tau f s) (l_e_imagei sigma tau f s)) (l_e_isst1 sigma tau f i s) : l_e_is sigma (l_e_soft sigma tau f i (l_e_tofs sigma tau f s) (l_e_imagei sigma tau f s)) s).
-
-(* constant 233 *)
-definition l_e_surjective ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.(l_all tau (λx:tau.l_e_image sigma tau f x) : Prop).
-
-(* constant 234 *)
-definition l_e_bijective ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.(l_and (l_e_injective sigma tau f) (l_e_surjective sigma tau f) : Prop).
-
-(* constant 235 *)
-definition l_e_inj_t2 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λb:l_e_bijective sigma tau f.(l_ande1 (l_e_injective sigma tau f) (l_e_surjective sigma tau f) b : l_e_injective sigma tau f).
-
-(* constant 236 *)
-definition l_e_inj_t3 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λb:l_e_bijective sigma tau f.(l_ande2 (l_e_injective sigma tau f) (l_e_surjective sigma tau f) b : l_e_surjective sigma tau f).
-
-(* constant 237 *)
-definition l_e_inj_so ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λb:l_e_bijective sigma tau f.λt:tau.(l_e_soft sigma tau f (l_e_inj_t2 sigma tau f b) t (l_e_inj_t3 sigma tau f b t) : sigma).
-
-(* constant 238 *)
-definition l_e_invf ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λb:l_e_bijective sigma tau f.(λx:tau.l_e_inj_so sigma tau f b x : Πx:tau.sigma).
-
-(* constant 239 *)
-definition l_e_thinvf1 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λb:l_e_bijective sigma tau f.λs:sigma.(l_e_tris sigma s (l_e_soft sigma tau f (l_e_inj_t2 sigma tau f b) (l_e_tofs sigma tau f s) (l_e_imagei sigma tau f s)) (l_e_invf sigma tau f b (f s)) (l_e_isst1 sigma tau f (l_e_inj_t2 sigma tau f b) s) (l_e_isinv sigma tau f (l_e_inj_t2 sigma tau f b) (l_e_tofs sigma tau f s) (l_e_imagei sigma tau f s) (l_e_tofs sigma tau f s) (l_e_inj_t3 sigma tau f b (l_e_tofs sigma tau f s)) (l_e_refis tau (l_e_tofs sigma tau f s))) : l_e_is sigma s (l_e_invf sigma tau f b (f s))).
-
-(* constant 240 *)
-definition l_e_thinvf2 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λb:l_e_bijective sigma tau f.λt:tau.(l_e_ists1 sigma tau f (l_e_inj_t2 sigma tau f b) t (l_e_inj_t3 sigma tau f b t) : l_e_is tau t (f (l_e_invf sigma tau f b t))).
-
-(* constant 241 *)
-definition l_e_inj_h ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λif:l_e_injective sigma tau f.λig:l_e_injective tau upsilon g.(λx:sigma.g (f x) : Πx:sigma.upsilon).
-
-(* constant 242 *)
-definition l_e_inj_t4 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λif:l_e_injective sigma tau f.λig:l_e_injective tau upsilon g.λs:sigma.λt:sigma.λi:l_e_is upsilon (l_e_inj_h sigma tau upsilon f g if ig s) (l_e_inj_h sigma tau upsilon f g if ig t).(l_e_isfe tau upsilon g ig (f s) (f t) i : l_e_is tau (f s) (f t)).
-
-(* constant 243 *)
-definition l_e_inj_t5 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λif:l_e_injective sigma tau f.λig:l_e_injective tau upsilon g.λs:sigma.λt:sigma.λi:l_e_is upsilon (l_e_inj_h sigma tau upsilon f g if ig s) (l_e_inj_h sigma tau upsilon f g if ig t).(l_e_isfe sigma tau f if s t (l_e_inj_t4 sigma tau upsilon f g if ig s t i) : l_e_is sigma s t).
-
-(* constant 244 *)
-definition l_e_inj_th4 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λif:l_e_injective sigma tau f.λig:l_e_injective tau upsilon g.(λx:sigma.λy:sigma.λv:l_e_is upsilon (l_e_inj_h sigma tau upsilon f g if ig x) (l_e_inj_h sigma tau upsilon f g if ig y).l_e_inj_t5 sigma tau upsilon f g if ig x y v : l_e_injective sigma upsilon (λx:sigma.g (f x))).
-
-(* constant 245 *)
-definition l_e_surj_h ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λsf:l_e_surjective sigma tau f.λsg:l_e_surjective tau upsilon g.(λx:sigma.g (f x) : Πx:sigma.upsilon).
-
-(* constant 246 *)
-definition l_e_surj_t1 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λsf:l_e_surjective sigma tau f.λsg:l_e_surjective tau upsilon g.λu:upsilon.(sg u : l_e_image tau upsilon g u).
-
-(* constant 247 *)
-definition l_e_surj_t2 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λsf:l_e_surjective sigma tau f.λsg:l_e_surjective tau upsilon g.λu:upsilon.λt:tau.λi:l_e_is upsilon u (g t).(sf t : l_e_image sigma tau f t).
-
-(* constant 248 *)
-definition l_e_surj_t3 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λsf:l_e_surjective sigma tau f.λsg:l_e_surjective tau upsilon g.λu:upsilon.λt:tau.λi:l_e_is upsilon u (g t).λs:sigma.λj:l_e_is tau t (f s).(l_e_tris upsilon u (g t) (l_e_surj_h sigma tau upsilon f g sf sg s) i (l_e_isf tau upsilon g t (f s) j) : l_e_is upsilon u (l_e_surj_h sigma tau upsilon f g sf sg s)).
-
-(* constant 249 *)
-definition l_e_surj_t4 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λsf:l_e_surjective sigma tau f.λsg:l_e_surjective tau upsilon g.λu:upsilon.λt:tau.λi:l_e_is upsilon u (g t).λs:sigma.λj:l_e_is tau t (f s).(l_somei sigma (λx:sigma.l_e_is upsilon u (l_e_surj_h sigma tau upsilon f g sf sg x)) s (l_e_surj_t3 sigma tau upsilon f g sf sg u t i s j) : l_e_image sigma upsilon (l_e_surj_h sigma tau upsilon f g sf sg) u).
-
-(* constant 250 *)
-definition l_e_surj_t5 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λsf:l_e_surjective sigma tau f.λsg:l_e_surjective tau upsilon g.λu:upsilon.λt:tau.λi:l_e_is upsilon u (g t).(l_someapp sigma (λx:sigma.l_e_is tau t (f x)) (l_e_surj_t2 sigma tau upsilon f g sf sg u t i) (l_e_image sigma upsilon (l_e_surj_h sigma tau upsilon f g sf sg) u) (λx:sigma.λv:l_e_is tau t (f x).l_e_surj_t4 sigma tau upsilon f g sf sg u t i x v) : l_e_image sigma upsilon (l_e_surj_h sigma tau upsilon f g sf sg) u).
-
-(* constant 251 *)
-definition l_e_surj_t6 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λsf:l_e_surjective sigma tau f.λsg:l_e_surjective tau upsilon g.λu:upsilon.(l_someapp tau (λx:tau.l_e_is upsilon u (g x)) (l_e_surj_t1 sigma tau upsilon f g sf sg u) (l_e_image sigma upsilon (l_e_surj_h sigma tau upsilon f g sf sg) u) (λx:tau.λv:l_e_is upsilon u (g x).l_e_surj_t5 sigma tau upsilon f g sf sg u x v) : l_e_image sigma upsilon (l_e_surj_h sigma tau upsilon f g sf sg) u).
-
-(* constant 252 *)
-definition l_e_surj_th1 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λsf:l_e_surjective sigma tau f.λsg:l_e_surjective tau upsilon g.(λx:upsilon.l_e_surj_t6 sigma tau upsilon f g sf sg x : l_e_surjective sigma upsilon (λx:sigma.g (f x))).
-
-(* constant 253 *)
-definition l_e_bij_h ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λbf:l_e_bijective sigma tau f.λbg:l_e_bijective tau upsilon g.(λx:sigma.g (f x) : Πx:sigma.upsilon).
-
-(* constant 254 *)
-definition l_e_bij_t1 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λbf:l_e_bijective sigma tau f.λbg:l_e_bijective tau upsilon g.(l_e_inj_th4 sigma tau upsilon f g (l_ande1 (l_e_injective sigma tau f) (l_e_surjective sigma tau f) bf) (l_ande1 (l_e_injective tau upsilon g) (l_e_surjective tau upsilon g) bg) : l_e_injective sigma upsilon (l_e_bij_h sigma tau upsilon f g bf bg)).
-
-(* constant 255 *)
-definition l_e_bij_t2 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λbf:l_e_bijective sigma tau f.λbg:l_e_bijective tau upsilon g.(l_e_surj_th1 sigma tau upsilon f g (l_ande2 (l_e_injective sigma tau f) (l_e_surjective sigma tau f) bf) (l_ande2 (l_e_injective tau upsilon g) (l_e_surjective tau upsilon g) bg) : l_e_surjective sigma upsilon (l_e_bij_h sigma tau upsilon f g bf bg)).
-
-(* constant 256 *)
-definition l_e_bij_th1 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λbf:l_e_bijective sigma tau f.λbg:l_e_bijective tau upsilon g.(l_andi (l_e_injective sigma upsilon (l_e_bij_h sigma tau upsilon f g bf bg)) (l_e_surjective sigma upsilon (l_e_bij_h sigma tau upsilon f g bf bg)) (l_e_bij_t1 sigma tau upsilon f g bf bg) (l_e_bij_t2 sigma tau upsilon f g bf bg) : l_e_bijective sigma upsilon (λx:sigma.g (f x))).
-
-(* constant 257 *)
-definition l_e_fise ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λg:Πx:sigma.tau.λi:l_e_is (Πx:sigma.tau) f g.λs:sigma.(l_e_isp (Πx:sigma.tau) (λy:Πx:sigma.tau.l_e_is tau (f s) (y s)) f g (l_e_refis tau (f s)) i : l_e_is tau (f s) (g s)).
-
-(* constant 258 *)
-axiom l_e_fisi : Πsigma:Type[0].Πtau:Type[0].Πf:Πx:sigma.tau.Πg:Πx:sigma.tau.∀i:∀x:sigma.l_e_is tau (f x) (g x).l_e_is (Πx:sigma.tau) f g.
-
-(* constant 259 *)
-definition l_e_fis_th1 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λg:Πx:sigma.tau.λi:l_e_is (Πx:sigma.tau) f g.λs:sigma.λt:sigma.λj:l_e_is sigma s t.(l_e_tris tau (f s) (f t) (g t) (l_e_isf sigma tau f s t j) (l_e_fise sigma tau f g i t) : l_e_is tau (f s) (g t)).
-
-(* constant 260 *)
-axiom l_e_ot : Πsigma:Type[0].∀p:∀x:sigma.Prop.Type[0].
-
-(* constant 261 *)
-axiom l_e_in : Πsigma:Type[0].∀p:∀x:sigma.Prop.Πo1:l_e_ot sigma p.sigma.
-
-(* constant 262 *)
-axiom l_e_inp : Πsigma:Type[0].∀p:∀x:sigma.Prop.Πo1:l_e_ot sigma p.p (l_e_in sigma p o1).
-
-(* constant 263 *)
-axiom l_e_otax1 : Πsigma:Type[0].∀p:∀x:sigma.Prop.l_e_injective (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x).
-
-(* constant 264 *)
-axiom l_e_otax2 : Πsigma:Type[0].∀p:∀x:sigma.Prop.Πs:sigma.∀sp:p s.l_e_image (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) s.
-
-(* constant 265 *)
-definition l_e_isini ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λo1:l_e_ot sigma p.λo2:l_e_ot sigma p.λi:l_e_is (l_e_ot sigma p) o1 o2.(l_e_isf (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) o1 o2 i : l_e_is sigma (l_e_in sigma p o1) (l_e_in sigma p o2)).
-
-(* constant 266 *)
-definition l_e_isine ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λo1:l_e_ot sigma p.λo2:l_e_ot sigma p.λi:l_e_is sigma (l_e_in sigma p o1) (l_e_in sigma p o2).(l_e_isfe (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) (l_e_otax1 sigma p) o1 o2 i : l_e_is (l_e_ot sigma p) o1 o2).
-
-(* constant 267 *)
-definition l_e_out ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:sigma.λsp:p s.(l_e_soft (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) (l_e_otax1 sigma p) s (l_e_otax2 sigma p s sp) : l_e_ot sigma p).
-
-(* constant 268 *)
-definition l_e_isouti ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:sigma.λsp:p s.λt:sigma.λtp:p t.λi:l_e_is sigma s t.(l_e_isinv (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) (l_e_otax1 sigma p) s (l_e_otax2 sigma p s sp) t (l_e_otax2 sigma p t tp) i : l_e_is (l_e_ot sigma p) (l_e_out sigma p s sp) (l_e_out sigma p t tp)).
-
-(* constant 269 *)
-definition l_e_isoute ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:sigma.λsp:p s.λt:sigma.λtp:p t.λi:l_e_is (l_e_ot sigma p) (l_e_out sigma p s sp) (l_e_out sigma p t tp).(l_e_isinve (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) (l_e_otax1 sigma p) s (l_e_otax2 sigma p s sp) t (l_e_otax2 sigma p t tp) i : l_e_is sigma s t).
-
-(* constant 270 *)
-definition l_e_isoutin ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λo1:l_e_ot sigma p.(l_e_tris (l_e_ot sigma p) o1 (l_e_soft (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) (l_e_otax1 sigma p) (l_e_in sigma p o1) (l_e_imagei (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) o1)) (l_e_out sigma p (l_e_in sigma p o1) (l_e_inp sigma p o1)) (l_e_isst1 (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) (l_e_otax1 sigma p) o1) (l_e_isinv (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) (l_e_otax1 sigma p) (l_e_in sigma p o1) (l_e_imagei (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) o1) (l_e_in sigma p o1) (l_e_otax2 sigma p (l_e_in sigma p o1) (l_e_inp sigma p o1)) (l_e_refis sigma (l_e_in sigma p o1))) : l_e_is (l_e_ot sigma p) o1 (l_e_out sigma p (l_e_in sigma p o1) (l_e_inp sigma p o1))).
-
-(* constant 271 *)
-definition l_e_isinout ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:sigma.λsp:p s.(l_e_ists1 (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) (l_e_otax1 sigma p) s (l_e_otax2 sigma p s sp) : l_e_is sigma s (l_e_in sigma p (l_e_out sigma p s sp))).
-
-(* constant 272 *)
-axiom l_e_pairtype : Πsigma:Type[0].Πtau:Type[0].Type[0].
-
-(* constant 273 *)
-axiom l_e_pair : Πsigma:Type[0].Πtau:Type[0].Πs:sigma.Πt:tau.l_e_pairtype sigma tau.
-
-(* constant 274 *)
-axiom l_e_first : Πsigma:Type[0].Πtau:Type[0].Πp1:l_e_pairtype sigma tau.sigma.
-
-(* constant 275 *)
-axiom l_e_second : Πsigma:Type[0].Πtau:Type[0].Πp1:l_e_pairtype sigma tau.tau.
-
-(* constant 276 *)
-axiom l_e_pairis1 : Πsigma:Type[0].Πtau:Type[0].Πp1:l_e_pairtype sigma tau.l_e_is (l_e_pairtype sigma tau) (l_e_pair sigma tau (l_e_first sigma tau p1) (l_e_second sigma tau p1)) p1.
-
-(* constant 277 *)
-definition l_e_pairis2 ≝ λsigma:Type[0].λtau:Type[0].λp1:l_e_pairtype sigma tau.(l_e_symis (l_e_pairtype sigma tau) (l_e_pair sigma tau (l_e_first sigma tau p1) (l_e_second sigma tau p1)) p1 (l_e_pairis1 sigma tau p1) : l_e_is (l_e_pairtype sigma tau) p1 (l_e_pair sigma tau (l_e_first sigma tau p1) (l_e_second sigma tau p1))).
-
-(* constant 278 *)
-axiom l_e_firstis1 : Πsigma:Type[0].Πtau:Type[0].Πs:sigma.Πt:tau.l_e_is sigma (l_e_first sigma tau (l_e_pair sigma tau s t)) s.
-
-(* constant 279 *)
-definition l_e_firstis2 ≝ λsigma:Type[0].λtau:Type[0].λs:sigma.λt:tau.(l_e_symis sigma (l_e_first sigma tau (l_e_pair sigma tau s t)) s (l_e_firstis1 sigma tau s t) : l_e_is sigma s (l_e_first sigma tau (l_e_pair sigma tau s t))).
-
-(* constant 280 *)
-axiom l_e_secondis1 : Πsigma:Type[0].Πtau:Type[0].Πs:sigma.Πt:tau.l_e_is tau (l_e_second sigma tau (l_e_pair sigma tau s t)) t.
-
-(* constant 281 *)
-definition l_e_secondis2 ≝ λsigma:Type[0].λtau:Type[0].λs:sigma.λt:tau.(l_e_symis tau (l_e_second sigma tau (l_e_pair sigma tau s t)) t (l_e_secondis1 sigma tau s t) : l_e_is tau t (l_e_second sigma tau (l_e_pair sigma tau s t))).
-
-(* constant 282 *)
-definition l_e_ite_prop1 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λz:ksi.(l_and (l_imp a (l_e_is ksi z x)) (l_imp (l_not a) (l_e_is ksi z y)) : Prop).
-
-(* constant 283 *)
-definition l_e_ite_t1 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.λx1:ksi.λy1:ksi.λpx1:l_e_ite_prop1 a ksi x y x1.λpy1:l_e_ite_prop1 a ksi x y y1.(l_ande1 (l_imp a (l_e_is ksi x1 x)) (l_imp (l_not a) (l_e_is ksi x1 y)) px1 : l_imp a (l_e_is ksi x1 x)).
-
-(* constant 284 *)
-definition l_e_ite_t2 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.λx1:ksi.λy1:ksi.λpx1:l_e_ite_prop1 a ksi x y x1.λpy1:l_e_ite_prop1 a ksi x y y1.(l_mp a (l_e_is ksi x1 x) a1 (l_e_ite_t1 a ksi x y a1 x1 y1 px1 py1) : l_e_is ksi x1 x).
-
-(* constant 285 *)
-definition l_e_ite_t3 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.λx1:ksi.λy1:ksi.λpx1:l_e_ite_prop1 a ksi x y x1.λpy1:l_e_ite_prop1 a ksi x y y1.(l_e_ite_t2 a ksi x y a1 y1 x1 py1 px1 : l_e_is ksi y1 x).
-
-(* constant 286 *)
-definition l_e_ite_t4 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.λx1:ksi.λy1:ksi.λpx1:l_e_ite_prop1 a ksi x y x1.λpy1:l_e_ite_prop1 a ksi x y y1.(l_e_tris2 ksi x1 y1 x (l_e_ite_t2 a ksi x y a1 x1 y1 px1 py1) (l_e_ite_t3 a ksi x y a1 x1 y1 px1 py1) : l_e_is ksi x1 y1).
-
-(* constant 287 *)
-definition l_e_ite_t5 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.(λs:ksi.λt:ksi.λps:l_e_ite_prop1 a ksi x y s.λpt:l_e_ite_prop1 a ksi x y t.l_e_ite_t4 a ksi x y a1 s t ps pt : l_e_amone ksi (λt:ksi.l_e_ite_prop1 a ksi x y t)).
-
-(* constant 288 *)
-definition l_e_ite_t6 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.(λx1:a.l_e_refis ksi x : l_imp a (l_e_is ksi x x)).
-
-(* constant 289 *)
-definition l_e_ite_t7 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.(l_imp_th2 (l_not a) (l_e_is ksi x y) (l_weli a a1) : l_imp (l_not a) (l_e_is ksi x y)).
-
-(* constant 290 *)
-definition l_e_ite_t8 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.(l_andi (l_imp a (l_e_is ksi x x)) (l_imp (l_not a) (l_e_is ksi x y)) (l_e_ite_t6 a ksi x y a1) (l_e_ite_t7 a ksi x y a1) : l_e_ite_prop1 a ksi x y x).
-
-(* constant 291 *)
-definition l_e_ite_t9 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.(l_somei ksi (λt:ksi.l_e_ite_prop1 a ksi x y t) x (l_e_ite_t8 a ksi x y a1) : l_some ksi (λt:ksi.l_e_ite_prop1 a ksi x y t)).
-
-(* constant 292 *)
-definition l_e_ite_t10 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.(l_e_onei ksi (λt:ksi.l_e_ite_prop1 a ksi x y t) (l_e_ite_t5 a ksi x y a1) (l_e_ite_t9 a ksi x y a1) : l_e_one ksi (λt:ksi.l_e_ite_prop1 a ksi x y t)).
-
-(* constant 293 *)
-definition l_e_ite_t11 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.λx1:ksi.λy1:ksi.λpx1:l_e_ite_prop1 a ksi x y x1.λpy1:l_e_ite_prop1 a ksi x y y1.(l_ande2 (l_imp a (l_e_is ksi x1 x)) (l_imp (l_not a) (l_e_is ksi x1 y)) px1 : l_imp (l_not a) (l_e_is ksi x1 y)).
-
-(* constant 294 *)
-definition l_e_ite_t12 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.λx1:ksi.λy1:ksi.λpx1:l_e_ite_prop1 a ksi x y x1.λpy1:l_e_ite_prop1 a ksi x y y1.(l_mp (l_not a) (l_e_is ksi x1 y) n (l_e_ite_t11 a ksi x y n x1 y1 px1 py1) : l_e_is ksi x1 y).
-
-(* constant 295 *)
-definition l_e_ite_t13 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.λx1:ksi.λy1:ksi.λpx1:l_e_ite_prop1 a ksi x y x1.λpy1:l_e_ite_prop1 a ksi x y y1.(l_e_ite_t12 a ksi x y n y1 x1 py1 px1 : l_e_is ksi y1 y).
-
-(* constant 296 *)
-definition l_e_ite_t14 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.λx1:ksi.λy1:ksi.λpx1:l_e_ite_prop1 a ksi x y x1.λpy1:l_e_ite_prop1 a ksi x y y1.(l_e_tris2 ksi x1 y1 y (l_e_ite_t12 a ksi x y n x1 y1 px1 py1) (l_e_ite_t13 a ksi x y n x1 y1 px1 py1) : l_e_is ksi x1 y1).
-
-(* constant 297 *)
-definition l_e_ite_t15 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.(λs:ksi.λt:ksi.λps:l_e_ite_prop1 a ksi x y s.λpt:l_e_ite_prop1 a ksi x y t.l_e_ite_t14 a ksi x y n s t ps pt : l_e_amone ksi (λt:ksi.l_e_ite_prop1 a ksi x y t)).
-
-(* constant 298 *)
-definition l_e_ite_t16 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.(λx1:l_not a.l_e_refis ksi y : l_imp (l_not a) (l_e_is ksi y y)).
-
-(* constant 299 *)
-definition l_e_ite_t17 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.(l_imp_th2 a (l_e_is ksi y x) n : l_imp a (l_e_is ksi y x)).
-
-(* constant 300 *)
-definition l_e_ite_t18 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.(l_andi (l_imp a (l_e_is ksi y x)) (l_imp (l_not a) (l_e_is ksi y y)) (l_e_ite_t17 a ksi x y n) (l_e_ite_t16 a ksi x y n) : l_e_ite_prop1 a ksi x y y).
-
-(* constant 301 *)
-definition l_e_ite_t19 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.(l_somei ksi (λt:ksi.l_e_ite_prop1 a ksi x y t) y (l_e_ite_t18 a ksi x y n) : l_some ksi (λt:ksi.l_e_ite_prop1 a ksi x y t)).
-
-(* constant 302 *)
-definition l_e_ite_t20 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.(l_e_onei ksi (λt:ksi.l_e_ite_prop1 a ksi x y t) (l_e_ite_t15 a ksi x y n) (l_e_ite_t19 a ksi x y n) : l_e_one ksi (λt:ksi.l_e_ite_prop1 a ksi x y t)).
-
-(* constant 303 *)
-definition l_e_ite_t21 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.(l_imp_th1 a (l_e_one ksi (λt:ksi.l_e_ite_prop1 a ksi x y t)) (λt:a.l_e_ite_t10 a ksi x y t) (λt:l_not a.l_e_ite_t20 a ksi x y t) : l_e_one ksi (λt:ksi.l_e_ite_prop1 a ksi x y t)).
-
-(* constant 304 *)
-definition l_e_ite ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.(l_e_ind ksi (λt:ksi.l_e_ite_prop1 a ksi x y t) (l_e_ite_t21 a ksi x y) : ksi).
-
-(* constant 305 *)
-definition l_e_ite_t22 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.(l_e_oneax ksi (λt:ksi.l_e_ite_prop1 a ksi x y t) (l_e_ite_t21 a ksi x y) : l_e_ite_prop1 a ksi x y (l_e_ite a ksi x y)).
-
-(* constant 306 *)
-definition l_e_ite_t23 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.(l_ande1 (l_imp a (l_e_is ksi (l_e_ite a ksi x y) x)) (l_imp (l_not a) (l_e_is ksi (l_e_ite a ksi x y) y)) (l_e_ite_t22 a ksi x y) : l_imp a (l_e_is ksi (l_e_ite a ksi x y) x)).
-
-(* constant 307 *)
-definition l_e_ite_t24 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.(l_ande2 (l_imp a (l_e_is ksi (l_e_ite a ksi x y) x)) (l_imp (l_not a) (l_e_is ksi (l_e_ite a ksi x y) y)) (l_e_ite_t22 a ksi x y) : l_imp (l_not a) (l_e_is ksi (l_e_ite a ksi x y) y)).
-
-(* constant 308 *)
-definition l_e_itet ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.(l_mp a (l_e_is ksi (l_e_ite a ksi x y) x) a1 (l_e_ite_t23 a ksi x y) : l_e_is ksi (l_e_ite a ksi x y) x).
-
-(* constant 309 *)
-definition l_e_itef ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.(l_mp (l_not a) (l_e_is ksi (l_e_ite a ksi x y) y) n (l_e_ite_t24 a ksi x y) : l_e_is ksi (l_e_ite a ksi x y) y).
-
-(* constant 310 *)
-definition l_e_wissel_wa ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.(l_e_ite (l_e_is sigma s s0) sigma t0 s : sigma).
-
-(* constant 311 *)
-definition l_e_wissel_t1 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s s0.(l_e_itet (l_e_is sigma s s0) sigma t0 s i : l_e_is sigma (l_e_wissel_wa sigma s0 t0 s) t0).
-
-(* constant 312 *)
-definition l_e_wissel_t2 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λn:l_not (l_e_is sigma s s0).(l_e_itef (l_e_is sigma s s0) sigma t0 s n : l_e_is sigma (l_e_wissel_wa sigma s0 t0 s) s).
-
-(* constant 313 *)
-definition l_e_wissel_wb ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.(l_e_ite (l_e_is sigma s t0) sigma s0 (l_e_wissel_wa sigma s0 t0 s) : sigma).
-
-(* constant 314 *)
-definition l_e_wissel_t3 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s t0.(l_e_itet (l_e_is sigma s t0) sigma s0 (l_e_wissel_wa sigma s0 t0 s) i : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) s0).
-
-(* constant 315 *)
-definition l_e_wissel_t4 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λn:l_not (l_e_is sigma s t0).(l_e_itef (l_e_is sigma s t0) sigma s0 (l_e_wissel_wa sigma s0 t0 s) n : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wa sigma s0 t0 s)).
-
-(* constant 316 *)
-definition l_e_wissel_t5 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s s0.λj:l_e_is sigma s0 t0.(l_e_tris sigma (l_e_wissel_wb sigma s0 t0 s) s0 t0 (l_e_wissel_t3 sigma s0 t0 s (l_e_tris sigma s s0 t0 i j)) j : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) t0).
-
-(* constant 317 *)
-definition l_e_wissel_t6 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s s0.λn:l_not (l_e_is sigma s0 t0).(l_e_tris sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wa sigma s0 t0 s) t0 (l_e_wissel_t4 sigma s0 t0 s (l_e_notis_th2 sigma s0 t0 s n i)) (l_e_wissel_t1 sigma s0 t0 s i) : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) t0).
-
-(* constant 318 *)
-definition l_e_wissel_t7 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s s0.(l_imp_th1 (l_e_is sigma s0 t0) (l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) t0) (λt:l_e_is sigma s0 t0.l_e_wissel_t5 sigma s0 t0 s i t) (λt:l_not (l_e_is sigma s0 t0).l_e_wissel_t6 sigma s0 t0 s i t) : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) t0).
-
-(* constant 319 *)
-definition l_e_wissel_t8 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λn:l_not (l_e_is sigma s s0).λo:l_not (l_e_is sigma s t0).(l_e_tris sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wa sigma s0 t0 s) s (l_e_wissel_t4 sigma s0 t0 s o) (l_e_wissel_t2 sigma s0 t0 s n) : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) s).
-
-(* constant 320 *)
-definition l_e_wissel ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.(λx:sigma.l_e_wissel_wb sigma s0 t0 x : Πx:sigma.sigma).
-
-(* constant 321 *)
-definition l_e_iswissel1 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s s0.(l_e_wissel_t7 sigma s0 t0 s i : l_e_is sigma (l_e_wissel sigma s0 t0 s) t0).
-
-(* constant 322 *)
-definition l_e_iswissel2 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s t0.(l_e_wissel_t3 sigma s0 t0 s i : l_e_is sigma (l_e_wissel sigma s0 t0 s) s0).
-
-(* constant 323 *)
-definition l_e_iswissel3 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λn:l_not (l_e_is sigma s s0).λo:l_not (l_e_is sigma s t0).(l_e_wissel_t8 sigma s0 t0 s n o : l_e_is sigma (l_e_wissel sigma s0 t0 s) s).
-
-(* constant 324 *)
-definition l_e_wissel_t9 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.(l_e_symnotis sigma s0 t (l_e_notis_th1 sigma s t s0 n j) : l_not (l_e_is sigma t s0)).
-
-(* constant 325 *)
-definition l_e_wissel_t10 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.λk:l_e_is sigma s0 t0.(l_e_notis_th3 sigma t s0 t0 (l_e_wissel_t9 sigma s0 t0 s t i n j) k : l_not (l_e_is sigma t t0)).
-
-(* constant 326 *)
-definition l_e_wissel_t11 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.λk:l_e_is sigma s0 t0.(l_e_tris sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t) t i (l_e_wissel_t8 sigma s0 t0 t (l_e_wissel_t9 sigma s0 t0 s t i n j) (l_e_wissel_t10 sigma s0 t0 s t i n j k)) : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) t).
-
-(* constant 327 *)
-definition l_e_wissel_t12 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.λk:l_e_is sigma s0 t0.(l_e_wissel_t10 sigma s0 t0 s t i n j k (l_e_tris1 sigma t t0 (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_t11 sigma s0 t0 s t i n j k) (l_e_wissel_t7 sigma s0 t0 s j)) : l_con).
-
-(* constant 328 *)
-definition l_e_wissel_t13 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.(λv:l_e_is sigma s0 t0.l_e_wissel_t12 sigma s0 t0 s t i n j v : l_not (l_e_is sigma s0 t0)).
-
-(* constant 329 *)
-definition l_e_wissel_t14 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.λk:l_e_is sigma t t0.(l_e_tris sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t) s0 i (l_e_wissel_t3 sigma s0 t0 t k) : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) s0).
-
-(* constant 330 *)
-definition l_e_wissel_t15 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.λk:l_e_is sigma t t0.(l_e_wissel_t12 sigma s0 t0 s t i n j (l_e_tris1 sigma s0 t0 (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_t14 sigma s0 t0 s t i n j k) (l_e_wissel_t7 sigma s0 t0 s j)) : l_con).
-
-(* constant 331 *)
-definition l_e_wissel_t16 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.(λv:l_e_is sigma t t0.l_e_wissel_t15 sigma s0 t0 s t i n j v : l_not (l_e_is sigma t t0)).
-
-(* constant 332 *)
-definition l_e_wissel_t17 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.(l_e_tris sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t) t i (l_e_wissel_t8 sigma s0 t0 t (l_e_wissel_t9 sigma s0 t0 s t i n j) (l_e_wissel_t16 sigma s0 t0 s t i n j)) : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) t).
-
-(* constant 333 *)
-definition l_e_wissel_t18 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.(l_e_wissel_t15 sigma s0 t0 s t i n j (l_e_tris1 sigma t t0 (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_t17 sigma s0 t0 s t i n j) (l_e_wissel_t7 sigma s0 t0 s j)) : l_con).
-
-(* constant 334 *)
-definition l_e_wissel_t19 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).(λv:l_e_is sigma s s0.l_e_wissel_t18 sigma s0 t0 s t i n v : l_not (l_e_is sigma s s0)).
-
-(* constant 335 *)
-definition l_e_wissel_t20 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).(l_e_wissel_t19 sigma s0 t0 t s (l_e_symis sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t) i) (l_e_symnotis sigma s t n) : l_not (l_e_is sigma t s0)).
-
-(* constant 336 *)
-definition l_e_wissel_t21 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s t0.(l_e_symnotis sigma t0 t (l_e_notis_th1 sigma s t t0 n j) : l_not (l_e_is sigma t t0)).
-
-(* constant 337 *)
-definition l_e_wissel_t22 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s t0.(l_e_tris sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t) t i (l_e_wissel_t8 sigma s0 t0 t (l_e_wissel_t20 sigma s0 t0 s t i n) (l_e_wissel_t21 sigma s0 t0 s t i n j)) : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) t).
-
-(* constant 338 *)
-definition l_e_wissel_t23 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s t0.(l_e_wissel_t20 sigma s0 t0 s t i n (l_e_tris1 sigma t s0 (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_t22 sigma s0 t0 s t i n j) (l_e_wissel_t3 sigma s0 t0 s j)) : l_con).
-
-(* constant 339 *)
-definition l_e_wissel_t24 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).(λv:l_e_is sigma s t0.l_e_wissel_t23 sigma s0 t0 s t i n v : l_not (l_e_is sigma s t0)).
-
-(* constant 340 *)
-definition l_e_wissel_t25 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).(l_e_wissel_t24 sigma s0 t0 t s (l_e_symis sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t) i) (l_e_symnotis sigma s t n) : l_not (l_e_is sigma t t0)).
-
-(* constant 341 *)
-definition l_e_wissel_t26 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).(l_e_tris sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t) t i (l_e_wissel_t8 sigma s0 t0 t (l_e_wissel_t20 sigma s0 t0 s t i n) (l_e_wissel_t25 sigma s0 t0 s t i n)) : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) t).
-
-(* constant 342 *)
-definition l_e_wissel_t27 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).(n (l_e_tris1 sigma s t (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_t8 sigma s0 t0 s (l_e_wissel_t19 sigma s0 t0 s t i n) (l_e_wissel_t24 sigma s0 t0 s t i n)) (l_e_wissel_t26 sigma s0 t0 s t i n)) : l_con).
-
-(* constant 343 *)
-definition l_e_wissel_t28 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).(l_et (l_e_is sigma s t) (λv:l_not (l_e_is sigma s t).l_e_wissel_t27 sigma s0 t0 s t i v) : l_e_is sigma s t).
-
-(* constant 344 *)
-definition l_e_wissel_th1 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.(λx:sigma.λy:sigma.λv:l_e_is sigma (l_e_wissel_wb sigma s0 t0 x) (l_e_wissel_wb sigma s0 t0 y).l_e_wissel_t28 sigma s0 t0 x y v : l_e_injective sigma sigma (l_e_wissel sigma s0 t0)).
-
-(* constant 345 *)
-definition l_e_wissel_t29 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s s0.(l_e_tris2 sigma s (l_e_wissel_wb sigma s0 t0 t0) s0 i (l_e_wissel_t3 sigma s0 t0 t0 (l_e_refis sigma t0)) : l_e_is sigma s (l_e_wissel_wb sigma s0 t0 t0)).
-
-(* constant 346 *)
-definition l_e_wissel_t30 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s s0.(l_somei sigma (λx:sigma.l_e_is sigma s (l_e_wissel_wb sigma s0 t0 x)) t0 (l_e_wissel_t29 sigma s0 t0 s i) : l_e_image sigma sigma (l_e_wissel sigma s0 t0) s).
-
-(* constant 347 *)
-definition l_e_wissel_t31 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s t0.(l_e_tris2 sigma s (l_e_wissel_wb sigma s0 t0 s0) t0 i (l_e_wissel_t7 sigma s0 t0 s0 (l_e_refis sigma s0)) : l_e_is sigma s (l_e_wissel_wb sigma s0 t0 s0)).
-
-(* constant 348 *)
-definition l_e_wissel_t32 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s t0.(l_somei sigma (λx:sigma.l_e_is sigma s (l_e_wissel_wb sigma s0 t0 x)) s0 (l_e_wissel_t31 sigma s0 t0 s i) : l_e_image sigma sigma (l_e_wissel sigma s0 t0) s).
-
-(* constant 349 *)
-definition l_e_wissel_t33 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λn:l_not (l_e_is sigma s s0).λo:l_not (l_e_is sigma s t0).(l_e_symis sigma (l_e_wissel_wb sigma s0 t0 s) s (l_e_wissel_t8 sigma s0 t0 s n o) : l_e_is sigma s (l_e_wissel_wb sigma s0 t0 s)).
-
-(* constant 350 *)
-definition l_e_wissel_t34 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λn:l_not (l_e_is sigma s s0).λo:l_not (l_e_is sigma s t0).(l_somei sigma (λx:sigma.l_e_is sigma s (l_e_wissel_wb sigma s0 t0 x)) s (l_e_wissel_t33 sigma s0 t0 s n o) : l_e_image sigma sigma (l_e_wissel sigma s0 t0) s).
-
-(* constant 351 *)
-definition l_e_wissel_t35 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λn:l_not (l_e_is sigma s s0).(l_imp_th1 (l_e_is sigma s t0) (l_e_image sigma sigma (l_e_wissel sigma s0 t0) s) (λv:l_e_is sigma s t0.l_e_wissel_t32 sigma s0 t0 s v) (λv:l_not (l_e_is sigma s t0).l_e_wissel_t34 sigma s0 t0 s n v) : l_e_image sigma sigma (l_e_wissel sigma s0 t0) s).
-
-(* constant 352 *)
-definition l_e_wissel_t36 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.(l_imp_th1 (l_e_is sigma s s0) (l_e_image sigma sigma (l_e_wissel sigma s0 t0) s) (λv:l_e_is sigma s s0.l_e_wissel_t30 sigma s0 t0 s v) (λv:l_not (l_e_is sigma s s0).l_e_wissel_t35 sigma s0 t0 s v) : l_e_image sigma sigma (l_e_wissel sigma s0 t0) s).
-
-(* constant 353 *)
-definition l_e_wissel_th2 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.(λx:sigma.l_e_wissel_t36 sigma s0 t0 x : l_e_surjective sigma sigma (l_e_wissel sigma s0 t0)).
-
-(* constant 354 *)
-definition l_e_wissel_th3 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.(l_andi (l_e_injective sigma sigma (l_e_wissel sigma s0 t0)) (l_e_surjective sigma sigma (l_e_wissel sigma s0 t0)) (l_e_wissel_th1 sigma s0 t0) (l_e_wissel_th2 sigma s0 t0) : l_e_bijective sigma sigma (l_e_wissel sigma s0 t0)).
-
-(* constant 355 *)
-definition l_e_changef ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs0:sigma.λt0:sigma.(λx:sigma.f (l_e_wissel sigma s0 t0 x) : Πx:sigma.tau).
-
-(* constant 356 *)
-definition l_e_changef1 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s s0.(l_e_isf sigma tau f (l_e_wissel sigma s0 t0 s) t0 (l_e_iswissel1 sigma s0 t0 s i) : l_e_is tau (l_e_changef sigma tau f s0 t0 s) (f t0)).
-
-(* constant 357 *)
-definition l_e_changef2 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s t0.(l_e_isf sigma tau f (l_e_wissel sigma s0 t0 s) s0 (l_e_iswissel2 sigma s0 t0 s i) : l_e_is tau (l_e_changef sigma tau f s0 t0 s) (f s0)).
-
-(* constant 358 *)
-definition l_e_changef3 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs0:sigma.λt0:sigma.λs:sigma.λn:l_not (l_e_is sigma s s0).λo:l_not (l_e_is sigma s t0).(l_e_isf sigma tau f (l_e_wissel sigma s0 t0 s) s (l_e_iswissel3 sigma s0 t0 s n o) : l_e_is tau (l_e_changef sigma tau f s0 t0 s) (f s)).
-
-(* constant 359 *)
-definition l_e_wissel_th4 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs0:sigma.λt0:sigma.λi:l_e_injective sigma tau f.(l_e_inj_th4 sigma sigma tau (l_e_wissel sigma s0 t0) f (l_e_wissel_th1 sigma s0 t0) i : l_e_injective sigma tau (l_e_changef sigma tau f s0 t0)).
-
-(* constant 360 *)
-definition l_e_wissel_th5 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs0:sigma.λt0:sigma.λs:l_e_surjective sigma tau f.(l_e_surj_th1 sigma sigma tau (l_e_wissel sigma s0 t0) f (l_e_wissel_th2 sigma s0 t0) s : l_e_surjective sigma tau (l_e_changef sigma tau f s0 t0)).
-
-(* constant 361 *)
-definition l_e_wissel_th6 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs0:sigma.λt0:sigma.λb:l_e_bijective sigma tau f.(l_e_bij_th1 sigma sigma tau (l_e_wissel sigma s0 t0) f (l_e_wissel_th3 sigma s0 t0) b : l_e_bijective sigma tau (l_e_changef sigma tau f s0 t0)).
-
-(* constant 362 *)
-definition l_r_imp ≝ λa:Prop.λb:∀x:a.Prop.(∀x:a.b x : Prop).
-
-(* constant 363 *)
-definition l_r_mp ≝ λa:Prop.λb:∀x:a.Prop.λa1:a.λi:l_r_imp a b.(i a1 : b a1).
-
-(* constant 364 *)
-definition l_r_imp_th2 ≝ λa:Prop.λb:∀x:a.Prop.λn:l_not a.(λx:a.l_cone (b x) (l_mp a l_con x n) : l_r_imp a b).
-
-(* constant 365 *)
-definition l_r_ec ≝ λa:Prop.λb:∀x:a.Prop.(∀x:a.l_not (b x) : Prop).
-
-(* constant 366 *)
-definition l_r_eci1 ≝ λa:Prop.λb:∀x:a.Prop.λn:l_not a.(λx:a.l_cone (l_not (b x)) (l_mp a l_con x n) : l_r_ec a b).
-
-(* constant 367 *)
-definition l_r_ande2 ≝ λa:Prop.λb:∀x:a.Prop.λa1:l_and a (l_r_imp a b).(l_ande2 a (l_r_imp a b) a1 (l_ande1 a (l_r_imp a b) a1) : b (l_ande1 a (l_r_imp a b) a1)).
-
-(* constant 368 *)
-definition l_r_ite_is ≝ λa:Prop.λksi:Type[0].λx1:ksi.λy1:ksi.(l_e_is ksi x1 y1 : Prop).
-
-(* constant 369 *)
-definition l_r_ite_prop1 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λz:ksi.(l_and (l_r_imp a (λt:a.l_r_ite_is a ksi z (x t))) (l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi z (y t))) : Prop).
-
-(* constant 370 *)
-definition l_r_ite_t1 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.λx1:ksi.λy1:ksi.λpx1:l_r_ite_prop1 a ksi x y i j x1.λpy1:l_r_ite_prop1 a ksi x y i j y1.(l_ande1 (l_r_imp a (λt:a.l_r_ite_is a ksi x1 (x t))) (l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi x1 (y t))) px1 : l_r_imp a (λt:a.l_r_ite_is a ksi x1 (x t))).
-
-(* constant 371 *)
-definition l_r_ite_t2 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.λx1:ksi.λy1:ksi.λpx1:l_r_ite_prop1 a ksi x y i j x1.λpy1:l_r_ite_prop1 a ksi x y i j y1.(l_r_mp a (λt:a.l_r_ite_is a ksi x1 (x t)) a1 (l_r_ite_t1 a ksi x y i j a1 x1 y1 px1 py1) : l_r_ite_is a ksi x1 (x a1)).
-
-(* constant 372 *)
-definition l_r_ite_t3 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.λx1:ksi.λy1:ksi.λpx1:l_r_ite_prop1 a ksi x y i j x1.λpy1:l_r_ite_prop1 a ksi x y i j y1.(l_r_ite_t2 a ksi x y i j a1 y1 x1 py1 px1 : l_r_ite_is a ksi y1 (x a1)).
-
-(* constant 373 *)
-definition l_r_ite_t4 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.λx1:ksi.λy1:ksi.λpx1:l_r_ite_prop1 a ksi x y i j x1.λpy1:l_r_ite_prop1 a ksi x y i j y1.(l_e_tris2 ksi x1 y1 (x a1) (l_r_ite_t2 a ksi x y i j a1 x1 y1 px1 py1) (l_r_ite_t3 a ksi x y i j a1 x1 y1 px1 py1) : l_r_ite_is a ksi x1 y1).
-
-(* constant 374 *)
-definition l_r_ite_t5 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.(λs:ksi.λt:ksi.λps:l_r_ite_prop1 a ksi x y i j s.λpt:l_r_ite_prop1 a ksi x y i j t.l_r_ite_t4 a ksi x y i j a1 s t ps pt : l_e_amone ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t)).
-
-(* constant 375 *)
-definition l_r_ite_t6 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.(i a1 : l_r_imp a (λt:a.l_r_ite_is a ksi (x a1) (x t))).
-
-(* constant 376 *)
-definition l_r_ite_t7 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.(l_r_imp_th2 (l_not a) (λt:l_not a.l_r_ite_is a ksi (x a1) (y t)) (l_weli a a1) : l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi (x a1) (y t))).
-
-(* constant 377 *)
-definition l_r_ite_t8 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.(l_andi (l_r_imp a (λt:a.l_r_ite_is a ksi (x a1) (x t))) (l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi (x a1) (y t))) (l_r_ite_t6 a ksi x y i j a1) (l_r_ite_t7 a ksi x y i j a1) : l_r_ite_prop1 a ksi x y i j (x a1)).
-
-(* constant 378 *)
-definition l_r_ite_t9 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.(l_somei ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t) (x a1) (l_r_ite_t8 a ksi x y i j a1) : l_some ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t)).
-
-(* constant 379 *)
-definition l_r_ite_t10 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.(l_e_onei ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t) (l_r_ite_t5 a ksi x y i j a1) (l_r_ite_t9 a ksi x y i j a1) : l_e_one ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t)).
-
-(* constant 380 *)
-definition l_r_ite_t11 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.λx1:ksi.λy1:ksi.λpx1:l_r_ite_prop1 a ksi x y i j x1.λpy1:l_r_ite_prop1 a ksi x y i j y1.(l_ande2 (l_r_imp a (λt:a.l_r_ite_is a ksi x1 (x t))) (l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi x1 (y t))) px1 : l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi x1 (y t))).
-
-(* constant 381 *)
-definition l_r_ite_t12 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.λx1:ksi.λy1:ksi.λpx1:l_r_ite_prop1 a ksi x y i j x1.λpy1:l_r_ite_prop1 a ksi x y i j y1.(l_r_mp (l_not a) (λt:l_not a.l_r_ite_is a ksi x1 (y t)) n (l_r_ite_t11 a ksi x y i j n x1 y1 px1 py1) : l_r_ite_is a ksi x1 (y n)).
-
-(* constant 382 *)
-definition l_r_ite_t13 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.λx1:ksi.λy1:ksi.λpx1:l_r_ite_prop1 a ksi x y i j x1.λpy1:l_r_ite_prop1 a ksi x y i j y1.(l_r_ite_t12 a ksi x y i j n y1 x1 py1 px1 : l_r_ite_is a ksi y1 (y n)).
-
-(* constant 383 *)
-definition l_r_ite_t14 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.λx1:ksi.λy1:ksi.λpx1:l_r_ite_prop1 a ksi x y i j x1.λpy1:l_r_ite_prop1 a ksi x y i j y1.(l_e_tris2 ksi x1 y1 (y n) (l_r_ite_t12 a ksi x y i j n x1 y1 px1 py1) (l_r_ite_t13 a ksi x y i j n x1 y1 px1 py1) : l_r_ite_is a ksi x1 y1).
-
-(* constant 384 *)
-definition l_r_ite_t15 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.(λs:ksi.λt:ksi.λps:l_r_ite_prop1 a ksi x y i j s.λpt:l_r_ite_prop1 a ksi x y i j t.l_r_ite_t14 a ksi x y i j n s t ps pt : l_e_amone ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t)).
-
-(* constant 385 *)
-definition l_r_ite_t16 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.(j n : l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi (y n) (y t))).
-
-(* constant 386 *)
-definition l_r_ite_t17 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.(l_r_imp_th2 a (λt:a.l_r_ite_is a ksi (y n) (x t)) n : l_r_imp a (λt:a.l_r_ite_is a ksi (y n) (x t))).
-
-(* constant 387 *)
-definition l_r_ite_t18 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.(l_andi (l_r_imp a (λt:a.l_r_ite_is a ksi (y n) (x t))) (l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi (y n) (y t))) (l_r_ite_t17 a ksi x y i j n) (l_r_ite_t16 a ksi x y i j n) : l_r_ite_prop1 a ksi x y i j (y n)).
-
-(* constant 388 *)
-definition l_r_ite_t19 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.(l_somei ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t) (y n) (l_r_ite_t18 a ksi x y i j n) : l_some ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t)).
-
-(* constant 389 *)
-definition l_r_ite_t20 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.(l_e_onei ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t) (l_r_ite_t15 a ksi x y i j n) (l_r_ite_t19 a ksi x y i j n) : l_e_one ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t)).
-
-(* constant 390 *)
-definition l_r_ite_t21 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).(l_imp_th1 a (l_e_one ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t)) (λt:a.l_r_ite_t10 a ksi x y i j t) (λt:l_not a.l_r_ite_t20 a ksi x y i j t) : l_e_one ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t)).
-
-(* constant 391 *)
-definition l_r_ite ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).(l_e_ind ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t) (l_r_ite_t21 a ksi x y i j) : ksi).
-
-(* constant 392 *)
-definition l_r_ite_t22 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).(l_e_oneax ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t) (l_r_ite_t21 a ksi x y i j) : l_r_ite_prop1 a ksi x y i j (l_r_ite a ksi x y i j)).
-
-(* constant 393 *)
-definition l_r_ite_t23 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).(l_ande1 (l_r_imp a (λt:a.l_r_ite_is a ksi (l_r_ite a ksi x y i j) (x t))) (l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi (l_r_ite a ksi x y i j) (y t))) (l_r_ite_t22 a ksi x y i j) : l_r_imp a (λt:a.l_r_ite_is a ksi (l_r_ite a ksi x y i j) (x t))).
-
-(* constant 394 *)
-definition l_r_ite_t24 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).(l_ande2 (l_r_imp a (λt:a.l_r_ite_is a ksi (l_r_ite a ksi x y i j) (x t))) (l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi (l_r_ite a ksi x y i j) (y t))) (l_r_ite_t22 a ksi x y i j) : l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi (l_r_ite a ksi x y i j) (y t))).
-
-(* constant 395 *)
-definition l_r_itet ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.(l_r_mp a (λt:a.l_r_ite_is a ksi (l_r_ite a ksi x y i j) (x t)) a1 (l_r_ite_t23 a ksi x y i j) : l_r_ite_is a ksi (l_r_ite a ksi x y i j) (x a1)).
-
-(* constant 396 *)
-definition l_r_itef ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.(l_r_mp (l_not a) (λt:l_not a.l_r_ite_is a ksi (l_r_ite a ksi x y i j) (y t)) n (l_r_ite_t24 a ksi x y i j) : l_r_ite_is a ksi (l_r_ite a ksi x y i j) (y n)).
-
-(* constant 397 *)
-axiom l_e_st_set : Πsigma:Type[0].Type[0].
-
-(* constant 398 *)
-axiom l_e_st_esti : Πsigma:Type[0].Πs:sigma.Πs0:l_e_st_set sigma.Prop.
-
-(* constant 399 *)
-axiom l_e_st_setof : Πsigma:Type[0].∀p:∀x:sigma.Prop.l_e_st_set sigma.
-
-(* constant 400 *)
-axiom l_e_st_estii : Πsigma:Type[0].∀p:∀x:sigma.Prop.Πs:sigma.∀sp:p s.l_e_st_esti sigma s (l_e_st_setof sigma p).
-
-(* constant 401 *)
-axiom l_e_st_estie : Πsigma:Type[0].∀p:∀x:sigma.Prop.Πs:sigma.∀e:l_e_st_esti sigma s (l_e_st_setof sigma p).p s.
-
-(* constant 402 *)
-definition l_e_st_empty ≝ λsigma:Type[0].λs0:l_e_st_set sigma.(l_none sigma (λx:sigma.l_e_st_esti sigma x s0) : Prop).
-
-(* constant 403 *)
-definition l_e_st_nonempty ≝ λsigma:Type[0].λs0:l_e_st_set sigma.(l_some sigma (λx:sigma.l_e_st_esti sigma x s0) : Prop).
-
-(* constant 404 *)
-definition l_e_st_emptyi ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λn:∀x:sigma.l_not (l_e_st_esti sigma x s0).(n : l_e_st_empty sigma s0).
-
-(* constant 405 *)
-definition l_e_st_emptye ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λe:l_e_st_empty sigma s0.λs:sigma.(e s : l_not (l_e_st_esti sigma s s0)).
-
-(* constant 406 *)
-definition l_e_st_nonemptyi ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λs:sigma.λses0:l_e_st_esti sigma s s0.(l_somei sigma (λx:sigma.l_e_st_esti sigma x s0) s ses0 : l_e_st_nonempty sigma s0).
-
-(* constant 407 *)
-definition l_e_st_nonemptyapp ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λn:l_e_st_nonempty sigma s0.λx:Prop.λx1:∀y:sigma.∀z:l_e_st_esti sigma y s0.x.(l_someapp sigma (λy:sigma.l_e_st_esti sigma y s0) n x x1 : x).
-
-(* constant 408 *)
-definition l_e_st_incl ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.(l_all sigma (λx:sigma.l_imp (l_e_st_esti sigma x s0) (l_e_st_esti sigma x t0)) : Prop).
-
-(* constant 409 *)
-definition l_e_st_incli ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λe:∀x:sigma.∀y:l_e_st_esti sigma x s0.l_e_st_esti sigma x t0.(e : l_e_st_incl sigma s0 t0).
-
-(* constant 410 *)
-definition l_e_st_incle ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λi:l_e_st_incl sigma s0 t0.λs:sigma.λses0:l_e_st_esti sigma s s0.(i s ses0 : l_e_st_esti sigma s t0).
-
-(* constant 411 *)
-definition l_e_st_refincl ≝ λsigma:Type[0].λs0:l_e_st_set sigma.(λx:sigma.λy:l_e_st_esti sigma x s0.y : l_e_st_incl sigma s0 s0).
-
-(* constant 412 *)
-definition l_e_st_disj ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.(l_all sigma (λx:sigma.l_ec (l_e_st_esti sigma x s0) (l_e_st_esti sigma x t0)) : Prop).
-
-(* constant 413 *)
-definition l_e_st_disji1 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λn:∀x:sigma.∀y:l_e_st_esti sigma x s0.l_not (l_e_st_esti sigma x t0).(n : l_e_st_disj sigma s0 t0).
-
-(* constant 414 *)
-definition l_e_st_disji2 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λn:∀x:sigma.∀y:l_e_st_esti sigma x t0.l_not (l_e_st_esti sigma x s0).(λx:sigma.l_ec_th2 (l_e_st_esti sigma x s0) (l_e_st_esti sigma x t0) (n x) : l_e_st_disj sigma s0 t0).
-
-(* constant 415 *)
-definition l_e_st_disje1 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λd:l_e_st_disj sigma s0 t0.λs:sigma.λses0:l_e_st_esti sigma s s0.(l_ece1 (l_e_st_esti sigma s s0) (l_e_st_esti sigma s t0) (d s) ses0 : l_not (l_e_st_esti sigma s t0)).
-
-(* constant 416 *)
-definition l_e_st_disje2 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λd:l_e_st_disj sigma s0 t0.λs:sigma.λset0:l_e_st_esti sigma s t0.(l_ece2 (l_e_st_esti sigma s s0) (l_e_st_esti sigma s t0) (d s) set0 : l_not (l_e_st_esti sigma s s0)).
-
-(* constant 417 *)
-definition l_e_st_symdisj ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λd:l_e_st_disj sigma s0 t0.(λx:sigma.λy:l_e_st_esti sigma x t0.l_e_st_disje2 sigma s0 t0 d x y : l_e_st_disj sigma t0 s0).
-
-(* constant 418 *)
-definition l_e_st_disj_th1 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λs:sigma.λses0:l_e_st_esti sigma s s0.λset0:l_e_st_esti sigma s t0.(l_all_th1 sigma (λx:sigma.l_ec (l_e_st_esti sigma x s0) (l_e_st_esti sigma x t0)) s (l_imp_th4 (l_e_st_esti sigma s s0) (l_not (l_e_st_esti sigma s t0)) ses0 (l_weli (l_e_st_esti sigma s t0) set0)) : l_not (l_e_st_disj sigma s0 t0)).
-
-(* constant 419 *)
-definition l_e_st_disj_th2 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λs:sigma.λses0:l_e_st_esti sigma s s0.λset0:l_e_st_esti sigma s t0.(l_e_st_disj_th1 sigma t0 s0 s set0 ses0 : l_not (l_e_st_disj sigma t0 s0)).
-
-(* constant 420 *)
-definition l_e_st_issete1 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λi:l_e_is (l_e_st_set sigma) s0 t0.λs:sigma.λses0:l_e_st_esti sigma s s0.(l_e_isp (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_esti sigma s x) s0 t0 ses0 i : l_e_st_esti sigma s t0).
-
-(* constant 421 *)
-definition l_e_st_issete2 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λi:l_e_is (l_e_st_set sigma) s0 t0.λs:sigma.λset0:l_e_st_esti sigma s t0.(l_e_isp1 (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_esti sigma s x) t0 s0 set0 i : l_e_st_esti sigma s s0).
-
-(* constant 422 *)
-definition l_e_st_isset_th1 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λi:l_e_is (l_e_st_set sigma) s0 t0.(λx:sigma.λy:l_e_st_esti sigma x s0.l_e_st_issete1 sigma s0 t0 i x y : l_e_st_incl sigma s0 t0).
-
-(* constant 423 *)
-definition l_e_st_isset_th2 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λi:l_e_is (l_e_st_set sigma) s0 t0.(λx:sigma.λy:l_e_st_esti sigma x t0.l_e_st_issete2 sigma s0 t0 i x y : l_e_st_incl sigma t0 s0).
-
-(* constant 424 *)
-axiom l_e_st_isseti : Πsigma:Type[0].Πs0:l_e_st_set sigma.Πt0:l_e_st_set sigma.∀i:l_e_st_incl sigma s0 t0.∀j:l_e_st_incl sigma t0 s0.l_e_is (l_e_st_set sigma) s0 t0.
-
-(* constant 425 *)
-definition l_e_st_isset_th3 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λs:sigma.λses0:l_e_st_esti sigma s s0.λn:l_not (l_e_st_esti sigma s t0).(l_imp_th3 (l_e_is (l_e_st_set sigma) s0 t0) (l_e_st_esti sigma s t0) n (λt:l_e_is (l_e_st_set sigma) s0 t0.l_e_st_issete1 sigma s0 t0 t s ses0) : l_not (l_e_is (l_e_st_set sigma) s0 t0)).
-
-(* constant 426 *)
-definition l_e_st_isset_th4 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λs:sigma.λses0:l_e_st_esti sigma s s0.λn:l_not (l_e_st_esti sigma s t0).(l_e_symnotis (l_e_st_set sigma) s0 t0 (l_e_st_isset_th3 sigma s0 t0 s ses0 n) : l_not (l_e_is (l_e_st_set sigma) t0 s0)).
-
-(* constant 427 *)
-definition l_e_st_isset_nissetprop ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λs:sigma.(l_and (l_e_st_esti sigma s s0) (l_not (l_e_st_esti sigma s t0)) : Prop).
-
-(* constant 428 *)
-definition l_e_st_isset_t1 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λs:sigma.λn:l_not (l_e_st_isset_nissetprop sigma s0 t0 s).λe:l_e_st_esti sigma s s0.(l_et (l_e_st_esti sigma s t0) (l_and_th3 (l_e_st_esti sigma s s0) (l_not (l_e_st_esti sigma s t0)) n e) : l_e_st_esti sigma s t0).
-
-(* constant 429 *)
-definition l_e_st_isset_t2 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λn:l_not (l_e_is (l_e_st_set sigma) s0 t0).λm:l_not (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma s0 t0 x)).λl:l_none sigma (λx:sigma.l_e_st_isset_nissetprop sigma t0 s0 x).λs:sigma.(l_some_th4 sigma (λx:sigma.l_e_st_isset_nissetprop sigma s0 t0 x) m s : l_not (l_e_st_isset_nissetprop sigma s0 t0 s)).
-
-(* constant 430 *)
-definition l_e_st_isset_t3 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λn:l_not (l_e_is (l_e_st_set sigma) s0 t0).λm:l_not (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma s0 t0 x)).λl:l_none sigma (λx:sigma.l_e_st_isset_nissetprop sigma t0 s0 x).λs:sigma.(l s : l_not (l_e_st_isset_nissetprop sigma t0 s0 s)).
-
-(* constant 431 *)
-definition l_e_st_isset_t4 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λn:l_not (l_e_is (l_e_st_set sigma) s0 t0).λm:l_not (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma s0 t0 x)).λl:l_none sigma (λx:sigma.l_e_st_isset_nissetprop sigma t0 s0 x).(l_e_st_isseti sigma s0 t0 (λx:sigma.λy:l_e_st_esti sigma x s0.l_e_st_isset_t1 sigma s0 t0 x (l_e_st_isset_t2 sigma s0 t0 n m l x) y) (λx:sigma.λy:l_e_st_esti sigma x t0.l_e_st_isset_t1 sigma t0 s0 x (l_e_st_isset_t3 sigma s0 t0 n m l x) y) : l_e_is (l_e_st_set sigma) s0 t0).
-
-(* constant 432 *)
-definition l_e_st_isset_t5 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λn:l_not (l_e_is (l_e_st_set sigma) s0 t0).λm:l_not (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma s0 t0 x)).(l_imp_th3 (l_none sigma (λx:sigma.l_e_st_isset_nissetprop sigma t0 s0 x)) (l_e_is (l_e_st_set sigma) s0 t0) n (λy:l_none sigma (λx:sigma.l_e_st_isset_nissetprop sigma t0 s0 x).l_e_st_isset_t4 sigma s0 t0 n m y) : l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma t0 s0 x)).
-
-(* constant 433 *)
-definition l_e_st_isset_th5 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λn:l_not (l_e_is (l_e_st_set sigma) s0 t0).(l_or_th1 (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma s0 t0 x)) (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma t0 s0 x)) (λy:l_not (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma s0 t0 x)).l_e_st_isset_t5 sigma s0 t0 n y) : l_or (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma s0 t0 x)) (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma t0 s0 x))).
-
-(* constant 434 *)
-definition l_e_st_unmore ≝ λsigma:Type[0].λalpha:Type[0].λsa:Πx:alpha.l_e_st_set sigma.(l_e_st_setof sigma (λx:sigma.l_some alpha (λy:alpha.l_e_st_esti sigma x (sa y))) : l_e_st_set sigma).
-
-(* constant 435 *)
-definition l_e_st_eunmore1 ≝ λsigma:Type[0].λalpha:Type[0].λsa:Πx:alpha.l_e_st_set sigma.λs:sigma.λa:alpha.λseasa:l_e_st_esti sigma s (sa a).(l_e_st_estii sigma (λx:sigma.l_some alpha (λy:alpha.l_e_st_esti sigma x (sa y))) s (l_somei alpha (λy:alpha.l_e_st_esti sigma s (sa y)) a seasa) : l_e_st_esti sigma s (l_e_st_unmore sigma alpha sa)).
-
-(* constant 436 *)
-definition l_e_st_unmoreapp ≝ λsigma:Type[0].λalpha:Type[0].λsa:Πx:alpha.l_e_st_set sigma.λs:sigma.λseun:l_e_st_esti sigma s (l_e_st_unmore sigma alpha sa).λx:Prop.λx1:∀y:alpha.∀z:l_e_st_esti sigma s (sa y).x.(l_someapp alpha (λy:alpha.l_e_st_esti sigma s (sa y)) (l_e_st_estie sigma (λz:sigma.l_some alpha (λy:alpha.l_e_st_esti sigma z (sa y))) s seun) x x1 : x).
-
-(* constant 437 *)
-definition l_e_st_eq_refr ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(refr1 s : r s s).
-
-(* constant 438 *)
-definition l_e_st_eq_symr ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λtsr:r s t.(symr1 s t tsr : r t s).
-
-(* constant 439 *)
-definition l_e_st_eq_trr ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λu:sigma.λtsr:r s t.λutr:r t u.(trr1 s t u tsr utr : r s u).
-
-(* constant 440 *)
-definition l_e_st_eq_tr1r ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λu:sigma.λsur:r u s.λtur:r u t.(l_e_st_eq_trr sigma r refr1 symr1 trr1 s u t (l_e_st_eq_symr sigma r refr1 symr1 trr1 u s sur) tur : r s t).
-
-(* constant 441 *)
-definition l_e_st_eq_tr2r ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λu:sigma.λusr:r s u.λutr:r t u.(l_e_st_eq_trr sigma r refr1 symr1 trr1 s u t usr (l_e_st_eq_symr sigma r refr1 symr1 trr1 t u utr) : r s t).
-
-(* constant 442 *)
-definition l_e_st_eq_ecelt ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(l_e_st_setof sigma (r s) : l_e_st_set sigma).
-
-(* constant 443 *)
-definition l_e_st_eq_1_th1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(l_e_st_estii sigma (r s) s (l_e_st_eq_refr sigma r refr1 symr1 trr1 s) : l_e_st_esti sigma s (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)).
-
-(* constant 444 *)
-definition l_e_st_eq_1_th2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λtsr:r s t.(l_e_st_estii sigma (r s) t tsr : l_e_st_esti sigma t (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)).
-
-(* constant 445 *)
-definition l_e_st_eq_1_th3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λe:l_e_st_esti sigma t (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s).(l_e_st_estie sigma (r s) t e : r s t).
-
-(* constant 446 *)
-definition l_e_st_eq_1_t1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λtsr:r s t.λu:sigma.λe:l_e_st_esti sigma u (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s).(l_e_st_eq_1_th2 sigma r refr1 symr1 trr1 t u (l_e_st_eq_tr1r sigma r refr1 symr1 trr1 t u s tsr (l_e_st_eq_1_th3 sigma r refr1 symr1 trr1 s u e)) : l_e_st_esti sigma u (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t)).
-
-(* constant 447 *)
-definition l_e_st_eq_1_th4 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λtsr:r s t.(l_e_st_isseti sigma (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t) (λx:sigma.λy:l_e_st_esti sigma x (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s).l_e_st_eq_1_t1 sigma r refr1 symr1 trr1 s t tsr x y) (λx:sigma.λy:l_e_st_esti sigma x (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t).l_e_st_eq_1_t1 sigma r refr1 symr1 trr1 t s (l_e_st_eq_symr sigma r refr1 symr1 trr1 s t tsr) x y) : l_e_is (l_e_st_set sigma) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t)).
-
-(* constant 448 *)
-definition l_e_st_eq_1_t2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λn:l_not (r s t).λu:sigma.λe:l_e_st_esti sigma u (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s).(l_imp_th3 (l_e_st_esti sigma u (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t)) (r s t) n (λx:l_e_st_esti sigma u (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t).l_e_st_eq_tr2r sigma r refr1 symr1 trr1 s t u (l_e_st_eq_1_th3 sigma r refr1 symr1 trr1 s u e) (l_e_st_eq_1_th3 sigma r refr1 symr1 trr1 t u x)) : l_not (l_e_st_esti sigma u (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t))).
-
-(* constant 449 *)
-definition l_e_st_eq_1_th5 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λn:l_not (r s t).(λx:sigma.λy:l_e_st_esti sigma x (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s).l_e_st_eq_1_t2 sigma r refr1 symr1 trr1 s t n x y : l_e_st_disj sigma (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t)).
-
-(* constant 450 *)
-definition l_e_st_eq_1_th6 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(l_e_st_nonemptyi sigma (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) s (l_e_st_eq_1_th1 sigma r refr1 symr1 trr1 s) : l_e_st_nonempty sigma (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)).
-
-(* constant 451 *)
-definition l_e_st_eq_ecp ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λs:sigma.(l_e_is (l_e_st_set sigma) s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) : Prop).
-
-(* constant 452 *)
-definition l_e_st_eq_anec ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.(l_some sigma (λx:sigma.l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 x) : Prop).
-
-(* constant 453 *)
-definition l_e_st_eq_2_th1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(l_somei sigma (λx:sigma.l_e_st_eq_ecp sigma r refr1 symr1 trr1 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) x) s (l_e_refis (l_e_st_set sigma) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)) : l_e_st_eq_anec sigma r refr1 symr1 trr1 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)).
-
-(* constant 454 *)
-definition l_e_st_eq_2_t1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λs:sigma.λses0:l_e_st_esti sigma s s0.λt:sigma.λe:l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 t.(l_e_st_issete1 sigma s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t) e s ses0 : l_e_st_esti sigma s (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t)).
-
-(* constant 455 *)
-definition l_e_st_eq_2_t2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λs:sigma.λses0:l_e_st_esti sigma s s0.λt:sigma.λe:l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 t.(l_e_st_eq_1_th4 sigma r refr1 symr1 trr1 t s (l_e_st_eq_1_th3 sigma r refr1 symr1 trr1 t s (l_e_st_eq_2_t1 sigma r refr1 symr1 trr1 s0 ecs0 s ses0 t e)) : l_e_is (l_e_st_set sigma) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)).
-
-(* constant 456 *)
-definition l_e_st_eq_2_t3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λs:sigma.λses0:l_e_st_esti sigma s s0.λt:sigma.λe:l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 t.(l_e_tris (l_e_st_set sigma) s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) e (l_e_st_eq_2_t2 sigma r refr1 symr1 trr1 s0 ecs0 s ses0 t e) : l_e_is (l_e_st_set sigma) s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)).
-
-(* constant 457 *)
-definition l_e_st_eq_2_th2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λs:sigma.λses0:l_e_st_esti sigma s s0.(l_someapp sigma (λx:sigma.l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 x) ecs0 (l_e_is (l_e_st_set sigma) s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)) (λx:sigma.λy:l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 x.l_e_st_eq_2_t3 sigma r refr1 symr1 trr1 s0 ecs0 s ses0 x y) : l_e_is (l_e_st_set sigma) s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)).
-
-(* constant 458 *)
-definition l_e_st_eq_2_th3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λs:sigma.λses0:l_e_st_esti sigma s s0.λt:sigma.λtes0:l_e_st_esti sigma t s0.(l_e_st_eq_1_th3 sigma r refr1 symr1 trr1 s t (l_e_st_issete1 sigma s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_2_th2 sigma r refr1 symr1 trr1 s0 ecs0 s ses0) t tes0) : r s t).
-
-(* constant 459 *)
-definition l_e_st_eq_2_th4 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λs:sigma.λses0:l_e_st_esti sigma s s0.λt:sigma.λtsr:r s t.(l_e_st_issete2 sigma s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_2_th2 sigma r refr1 symr1 trr1 s0 ecs0 s ses0) t (l_e_st_eq_1_th2 sigma r refr1 symr1 trr1 s t tsr) : l_e_st_esti sigma t s0).
-
-(* constant 460 *)
-definition l_e_st_eq_2_t4 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λs:sigma.λe:l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 s.(l_e_isp (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_nonempty sigma x) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) s0 (l_e_st_eq_1_th6 sigma r refr1 symr1 trr1 s) (l_e_symis (l_e_st_set sigma) s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) e) : l_e_st_nonempty sigma s0).
-
-(* constant 461 *)
-definition l_e_st_eq_2_th5 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.(l_someapp sigma (λx:sigma.l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 x) ecs0 (l_e_st_nonempty sigma s0) (λx:sigma.λy:l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 x.l_e_st_eq_2_t4 sigma r refr1 symr1 trr1 s0 ecs0 x y) : l_e_st_nonempty sigma s0).
-
-(* constant 462 *)
-definition l_e_st_eq_3_th1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λt0:l_e_st_set sigma.λect0:l_e_st_eq_anec sigma r refr1 symr1 trr1 t0.λs:sigma.λses0:l_e_st_esti sigma s s0.λt:sigma.λtet0:l_e_st_esti sigma t t0.λtsr:r s t.(l_e_tr3is (l_e_st_set sigma) s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t) t0 (l_e_st_eq_2_th2 sigma r refr1 symr1 trr1 s0 ecs0 s ses0) (l_e_st_eq_1_th4 sigma r refr1 symr1 trr1 s t tsr) (l_e_symis (l_e_st_set sigma) t0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t) (l_e_st_eq_2_th2 sigma r refr1 symr1 trr1 t0 ect0 t tet0)) : l_e_is (l_e_st_set sigma) s0 t0).
-
-(* constant 463 *)
-definition l_e_st_eq_3_t1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λt0:l_e_st_set sigma.λect0:l_e_st_eq_anec sigma r refr1 symr1 trr1 t0.λs:sigma.λses0:l_e_st_esti sigma s s0.λt:sigma.λtet0:l_e_st_esti sigma t t0.λn:l_not (r s t).(l_e_isp1 (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_disj sigma x (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t)) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) s0 (l_e_st_eq_1_th5 sigma r refr1 symr1 trr1 s t n) (l_e_st_eq_2_th2 sigma r refr1 symr1 trr1 s0 ecs0 s ses0) : l_e_st_disj sigma s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t)).
-
-(* constant 464 *)
-definition l_e_st_eq_3_th2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λt0:l_e_st_set sigma.λect0:l_e_st_eq_anec sigma r refr1 symr1 trr1 t0.λs:sigma.λses0:l_e_st_esti sigma s s0.λt:sigma.λtet0:l_e_st_esti sigma t t0.λn:l_not (r s t).(l_e_isp1 (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_disj sigma s0 x) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t) t0 (l_e_st_eq_3_t1 sigma r refr1 symr1 trr1 s0 ecs0 t0 ect0 s ses0 t tet0 n) (l_e_st_eq_2_th2 sigma r refr1 symr1 trr1 t0 ect0 t tet0) : l_e_st_disj sigma s0 t0).
-
-(* constant 465 *)
-definition l_e_st_eq_3_t2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λt0:l_e_st_set sigma.λi:l_e_is (l_e_st_set sigma) s0 t0.λs:sigma.λses0:l_e_st_esti sigma s s0.(l_e_st_issete1 sigma s0 t0 i s ses0 : l_e_st_esti sigma s t0).
-
-(* constant 466 *)
-definition l_e_st_eq_3_t3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λt0:l_e_st_set sigma.λi:l_e_is (l_e_st_set sigma) s0 t0.λs:sigma.λses0:l_e_st_esti sigma s s0.(l_e_st_disj_th1 sigma s0 t0 s ses0 (l_e_st_eq_3_t2 sigma r refr1 symr1 trr1 s0 ecs0 t0 i s ses0) : l_not (l_e_st_disj sigma s0 t0)).
-
-(* constant 467 *)
-definition l_e_st_eq_3_th3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λt0:l_e_st_set sigma.λi:l_e_is (l_e_st_set sigma) s0 t0.(l_e_st_nonemptyapp sigma s0 (l_e_st_eq_2_th5 sigma r refr1 symr1 trr1 s0 ecs0) (l_not (l_e_st_disj sigma s0 t0)) (λx:sigma.λy:l_e_st_esti sigma x s0.l_e_st_eq_3_t3 sigma r refr1 symr1 trr1 s0 ecs0 t0 i x y) : l_not (l_e_st_disj sigma s0 t0)).
-
-(* constant 468 *)
-definition l_e_st_eq_ect ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.(l_e_ot (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_eq_anec sigma r refr1 symr1 trr1 x) : Type[0]).
-
-(* constant 469 *)
-definition l_e_st_eq_ectset ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.(l_e_out (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_eq_anec sigma r refr1 symr1 trr1 x) s0 ecs0 : l_e_st_eq_ect sigma r refr1 symr1 trr1).
-
-(* constant 470 *)
-definition l_e_st_eq_ectelt ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(l_e_st_eq_ectset sigma r refr1 symr1 trr1 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_2_th1 sigma r refr1 symr1 trr1 s) : l_e_st_eq_ect sigma r refr1 symr1 trr1).
-
-(* constant 471 *)
-definition l_e_st_eq_ecect ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_in (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_eq_anec sigma r refr1 symr1 trr1 x) e : l_e_st_set sigma).
-
-(* constant 472 *)
-definition l_e_st_eq_4_th1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_inp (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_eq_anec sigma r refr1 symr1 trr1 x) e : l_e_st_eq_anec sigma r refr1 symr1 trr1 (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)).
-
-(* constant 473 *)
-definition l_e_st_eq_4_th2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_st_eq_2_th5 sigma r refr1 symr1 trr1 (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e) (l_e_st_eq_4_th1 sigma r refr1 symr1 trr1 e) : l_e_st_nonempty sigma (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)).
-
-(* constant 474 *)
-definition l_e_st_eq_4_th3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λx:Prop.λx1:∀y:sigma.∀z:l_e_st_esti sigma y (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).x.(l_e_st_nonemptyapp sigma (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e) (l_e_st_eq_4_th2 sigma r refr1 symr1 trr1 e) x x1 : x).
-
-(* constant 475 *)
-definition l_e_st_eq_4_th4 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(l_e_isinout (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_eq_anec sigma r refr1 symr1 trr1 x) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_2_th1 sigma r refr1 symr1 trr1 s) : l_e_is (l_e_st_set sigma) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ecect sigma r refr1 symr1 trr1 (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s))).
-
-(* constant 476 *)
-definition l_e_st_eq_4_th5 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(l_e_st_issete1 sigma (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ecect sigma r refr1 symr1 trr1 (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s)) (l_e_st_eq_4_th4 sigma r refr1 symr1 trr1 s) s (l_e_st_eq_1_th1 sigma r refr1 symr1 trr1 s) : l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s))).
-
-(* constant 477 *)
-definition l_e_st_eq_4_th6 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(l_e_st_eunmore1 sigma (l_e_st_eq_ect sigma r refr1 symr1 trr1) (λx:l_e_st_eq_ect sigma r refr1 symr1 trr1.l_e_st_eq_ecect sigma r refr1 symr1 trr1 x) s (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_4_th5 sigma r refr1 symr1 trr1 s) : l_e_st_esti sigma s (l_e_st_unmore sigma (l_e_st_eq_ect sigma r refr1 symr1 trr1) (λx:l_e_st_eq_ect sigma r refr1 symr1 trr1.l_e_st_eq_ecect sigma r refr1 symr1 trr1 x))).
-
-(* constant 478 *)
-definition l_e_st_eq_4_th7 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λt:sigma.λtee:l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_e_st_eq_2_th3 sigma r refr1 symr1 trr1 (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e) (l_e_st_eq_4_th1 sigma r refr1 symr1 trr1 e) s see t tee : r s t).
-
-(* constant 479 *)
-definition l_e_st_eq_4_th8 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λt:sigma.λtsr:r s t.(l_e_st_eq_2_th4 sigma r refr1 symr1 trr1 (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e) (l_e_st_eq_4_th1 sigma r refr1 symr1 trr1 e) s see t tsr : l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)).
-
-(* constant 480 *)
-definition l_e_st_eq_5_th1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λi:l_e_is (l_e_st_eq_ect sigma r refr1 symr1 trr1) e f.(l_e_isini (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_eq_anec sigma r refr1 symr1 trr1 x) e f i : l_e_is (l_e_st_set sigma) (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e) (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f)).
-
-(* constant 481 *)
-definition l_e_st_eq_5_th2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λi:l_e_is (l_e_st_set sigma) (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e) (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f).(l_e_isine (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_eq_anec sigma r refr1 symr1 trr1 x) e f i : l_e_is (l_e_st_eq_ect sigma r refr1 symr1 trr1) e f).
-
-(* constant 482 *)
-definition l_e_st_eq_5_th3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λt:sigma.λtef:l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f).λtsr:r s t.(l_e_st_eq_5_th2 sigma r refr1 symr1 trr1 e f (l_e_st_eq_3_th1 sigma r refr1 symr1 trr1 (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e) (l_e_st_eq_4_th1 sigma r refr1 symr1 trr1 e) (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f) (l_e_st_eq_4_th1 sigma r refr1 symr1 trr1 f) s see t tef tsr) : l_e_is (l_e_st_eq_ect sigma r refr1 symr1 trr1) e f).
-
-(* constant 483 *)
-definition l_e_st_eq_5_th4 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λi:l_e_is (l_e_st_eq_ect sigma r refr1 symr1 trr1) e f.(l_e_st_issete1 sigma (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e) (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f) (l_e_st_eq_5_th1 sigma r refr1 symr1 trr1 e f i) s see : l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f)).
-
-(* constant 484 *)
-definition l_e_st_eq_5_th5 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λt:sigma.λtef:l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f).λi:l_e_is (l_e_st_eq_ect sigma r refr1 symr1 trr1) e f.(l_e_st_eq_2_th3 sigma r refr1 symr1 trr1 (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f) (l_e_st_eq_4_th1 sigma r refr1 symr1 trr1 f) s (l_e_st_eq_5_th4 sigma r refr1 symr1 trr1 e f s see i) t tef : r s t).
-
-(* constant 485 *)
-definition l_e_st_eq_5_th6 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λtsr:r s t.(l_e_isouti (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_eq_anec sigma r refr1 symr1 trr1 x) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_2_th1 sigma r refr1 symr1 trr1 s) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t) (l_e_st_eq_2_th1 sigma r refr1 symr1 trr1 t) (l_e_st_eq_1_th4 sigma r refr1 symr1 trr1 s t tsr) : l_e_is (l_e_st_eq_ect sigma r refr1 symr1 trr1) (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 t)).
-
-(* constant 486 *)
-definition l_e_st_eq_fixfu ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.(∀x:sigma.∀y:sigma.∀z:r x y.l_e_is alpha (fu x) (fu y) : Prop).
-
-(* constant 487 *)
-definition l_e_st_eq_10_prop1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λs:sigma.(l_and (l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)) (l_e_is alpha (fu s) a1) : Prop).
-
-(* constant 488 *)
-definition l_e_st_eq_10_prop2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.(l_some sigma (λx:sigma.l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 x) : Prop).
-
-(* constant 489 *)
-definition l_e_st_eq_10_t1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_andi (l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)) (l_e_is alpha (fu s) (fu s)) see (l_e_refis alpha (fu s)) : l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e (fu s) s).
-
-(* constant 490 *)
-definition l_e_st_eq_10_t2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_somei sigma (λx:sigma.l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e (fu s) x) s (l_e_st_eq_10_t1 sigma r refr1 symr1 trr1 alpha fu ff e s see) : l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e (fu s)).
-
-(* constant 491 *)
-definition l_e_st_eq_10_t3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_somei alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x) (fu s) (l_e_st_eq_10_t2 sigma r refr1 symr1 trr1 alpha fu ff e s see) : l_some alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x)).
-
-(* constant 492 *)
-definition l_e_st_eq_10_t4 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_st_eq_4_th3 sigma r refr1 symr1 trr1 e (l_some alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x)) (λx:sigma.λy:l_e_st_esti sigma x (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).l_e_st_eq_10_t3 sigma r refr1 symr1 trr1 alpha fu ff e x y) : l_some alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x)).
-
-(* constant 493 *)
-definition l_e_st_eq_10_t5 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λb1:alpha.λpa1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e a1.λpb1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e b1.λs:sigma.λpa1s:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 s.λt:sigma.λpb1t:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e b1 t.(l_ande1 (l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)) (l_e_is alpha (fu s) a1) pa1s : l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)).
-
-(* constant 494 *)
-definition l_e_st_eq_10_t6 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λb1:alpha.λpa1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e a1.λpb1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e b1.λs:sigma.λpa1s:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 s.λt:sigma.λpb1t:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e b1 t.(l_ande1 (l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)) (l_e_is alpha (fu t) b1) pb1t : l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)).
-
-(* constant 495 *)
-definition l_e_st_eq_10_t7 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λb1:alpha.λpa1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e a1.λpb1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e b1.λs:sigma.λpa1s:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 s.λt:sigma.λpb1t:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e b1 t.(l_e_st_eq_4_th7 sigma r refr1 symr1 trr1 e s (l_e_st_eq_10_t5 sigma r refr1 symr1 trr1 alpha fu ff e a1 b1 pa1 pb1 s pa1s t pb1t) t (l_e_st_eq_10_t6 sigma r refr1 symr1 trr1 alpha fu ff e a1 b1 pa1 pb1 s pa1s t pb1t) : r s t).
-
-(* constant 496 *)
-definition l_e_st_eq_10_t8 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λb1:alpha.λpa1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e a1.λpb1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e b1.λs:sigma.λpa1s:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 s.λt:sigma.λpb1t:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e b1 t.(l_ande2 (l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)) (l_e_is alpha (fu s) a1) pa1s : l_e_is alpha (fu s) a1).
-
-(* constant 497 *)
-definition l_e_st_eq_10_t9 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λb1:alpha.λpa1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e a1.λpb1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e b1.λs:sigma.λpa1s:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 s.λt:sigma.λpb1t:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e b1 t.(l_ande2 (l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)) (l_e_is alpha (fu t) b1) pb1t : l_e_is alpha (fu t) b1).
-
-(* constant 498 *)
-definition l_e_st_eq_10_t10 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λb1:alpha.λpa1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e a1.λpb1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e b1.λs:sigma.λpa1s:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 s.λt:sigma.λpb1t:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e b1 t.(l_e_tr3is alpha a1 (fu s) (fu t) b1 (l_e_symis alpha (fu s) a1 (l_e_st_eq_10_t8 sigma r refr1 symr1 trr1 alpha fu ff e a1 b1 pa1 pb1 s pa1s t pb1t)) (ff s t (l_e_st_eq_10_t7 sigma r refr1 symr1 trr1 alpha fu ff e a1 b1 pa1 pb1 s pa1s t pb1t)) (l_e_st_eq_10_t9 sigma r refr1 symr1 trr1 alpha fu ff e a1 b1 pa1 pb1 s pa1s t pb1t) : l_e_is alpha a1 b1).
-
-(* constant 499 *)
-definition l_e_st_eq_10_t11 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λb1:alpha.λpa1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e a1.λpb1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e b1.λs:sigma.λpa1s:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 s.(l_someapp sigma (λx:sigma.l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e b1 x) pb1 (l_e_is alpha a1 b1) (λx:sigma.λy:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e b1 x.l_e_st_eq_10_t10 sigma r refr1 symr1 trr1 alpha fu ff e a1 b1 pa1 pb1 s pa1s x y) : l_e_is alpha a1 b1).
-
-(* constant 500 *)
-definition l_e_st_eq_10_t12 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λb1:alpha.λpa1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e a1.λpb1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e b1.(l_someapp sigma (λx:sigma.l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 x) pa1 (l_e_is alpha a1 b1) (λx:sigma.λy:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 x.l_e_st_eq_10_t11 sigma r refr1 symr1 trr1 alpha fu ff e a1 b1 pa1 pb1 x y) : l_e_is alpha a1 b1).
-
-(* constant 501 *)
-definition l_e_st_eq_10_t13 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(λx:alpha.λy:alpha.λu:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x.λv:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e y.l_e_st_eq_10_t12 sigma r refr1 symr1 trr1 alpha fu ff e x y u v : l_e_amone alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x)).
-
-(* constant 502 *)
-definition l_e_st_eq_10_t14 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_onei alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x) (l_e_st_eq_10_t13 sigma r refr1 symr1 trr1 alpha fu ff e) (l_e_st_eq_10_t4 sigma r refr1 symr1 trr1 alpha fu ff e) : l_e_one alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x)).
-
-(* constant 503 *)
-definition l_e_st_eq_indeq ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_ind alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x) (l_e_st_eq_10_t14 sigma r refr1 symr1 trr1 alpha fu ff e) : alpha).
-
-(* constant 504 *)
-definition l_e_st_eq_10_th1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_oneax alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x) (l_e_st_eq_10_t14 sigma r refr1 symr1 trr1 alpha fu ff e) : l_some sigma (λx:sigma.l_and (l_e_st_esti sigma x (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)) (l_e_is alpha (fu x) (l_e_st_eq_indeq sigma r refr1 symr1 trr1 alpha fu ff e)))).
-
-(* constant 505 *)
-definition l_e_st_eq_10_th2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_e_st_eq_10_t12 sigma r refr1 symr1 trr1 alpha fu ff e (fu s) (l_e_st_eq_indeq sigma r refr1 symr1 trr1 alpha fu ff e) (l_e_st_eq_10_t2 sigma r refr1 symr1 trr1 alpha fu ff e s see) (l_e_st_eq_10_th1 sigma r refr1 symr1 trr1 alpha fu ff e) : l_e_is alpha (fu s) (l_e_st_eq_indeq sigma r refr1 symr1 trr1 alpha fu ff e)).
-
-(* constant 506 *)
-definition l_e_st_eq_10_th3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λs:sigma.(l_e_st_eq_10_th2 sigma r refr1 symr1 trr1 alpha fu ff (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s) s (l_e_st_eq_4_th5 sigma r refr1 symr1 trr1 s) : l_e_is alpha (fu s) (l_e_st_eq_indeq sigma r refr1 symr1 trr1 alpha fu ff (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s))).
-
-(* constant 507 *)
-definition l_e_st_eq_fixfu2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.(∀x:sigma.∀y:sigma.∀z:sigma.∀u:sigma.∀v:r x y.∀w:r z u.l_e_is alpha (fu2 x z) (fu2 y u) : Prop).
-
-(* constant 508 *)
-definition l_e_st_eq_11_t1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λs:sigma.λt:sigma.λtsr:r s t.λu:sigma.(ff2 s t u u tsr (l_e_st_eq_refr sigma r refr1 symr1 trr1 u) : l_e_is alpha (fu2 s u) (fu2 t u)).
-
-(* constant 509 *)
-definition l_e_st_eq_11_t2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λs:sigma.λt:sigma.λtsr:r s t.(l_e_fisi sigma alpha (fu2 s) (fu2 t) (λx:sigma.l_e_st_eq_11_t1 sigma r refr1 symr1 trr1 alpha fu2 ff2 s t tsr x) : l_e_is (Πx:sigma.alpha) (fu2 s) (fu2 t)).
-
-(* constant 510 *)
-definition l_e_st_eq_11_i ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_st_eq_indeq sigma r refr1 symr1 trr1 (Πx:sigma.alpha) fu2 (λx:sigma.λy:sigma.λz:r x y.l_e_st_eq_11_t2 sigma r refr1 symr1 trr1 alpha fu2 ff2 x y z) e : Πx:sigma.alpha).
-
-(* constant 511 *)
-definition l_e_st_eq_11_t3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λt:sigma.λtsr:r s t.λu:sigma.λuee:l_e_st_esti sigma u (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_e_st_eq_10_th2 sigma r refr1 symr1 trr1 (Πx:sigma.alpha) fu2 (λx:sigma.λy:sigma.λz:r x y.l_e_st_eq_11_t2 sigma r refr1 symr1 trr1 alpha fu2 ff2 x y z) e u uee : l_e_is (Πx:sigma.alpha) (fu2 u) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e)).
-
-(* constant 512 *)
-definition l_e_st_eq_11_t4 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λt:sigma.λtsr:r s t.λu:sigma.λuee:l_e_st_esti sigma u (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_e_fise sigma alpha (fu2 u) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e) (l_e_st_eq_11_t3 sigma r refr1 symr1 trr1 alpha fu2 ff2 e s t tsr u uee) s : l_e_is alpha (fu2 u s) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e s)).
-
-(* constant 513 *)
-definition l_e_st_eq_11_t5 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λt:sigma.λtsr:r s t.λu:sigma.λuee:l_e_st_esti sigma u (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_e_fise sigma alpha (fu2 u) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e) (l_e_st_eq_11_t3 sigma r refr1 symr1 trr1 alpha fu2 ff2 e s t tsr u uee) t : l_e_is alpha (fu2 u t) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e t)).
-
-(* constant 514 *)
-definition l_e_st_eq_11_t6 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λt:sigma.λtsr:r s t.λu:sigma.λuee:l_e_st_esti sigma u (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(ff2 u u s t (l_e_st_eq_refr sigma r refr1 symr1 trr1 u) tsr : l_e_is alpha (fu2 u s) (fu2 u t)).
-
-(* constant 515 *)
-definition l_e_st_eq_11_t7 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λt:sigma.λtsr:r s t.λu:sigma.λuee:l_e_st_esti sigma u (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_e_tr3is alpha (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e s) (fu2 u s) (fu2 u t) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e t) (l_e_symis alpha (fu2 u s) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e s) (l_e_st_eq_11_t4 sigma r refr1 symr1 trr1 alpha fu2 ff2 e s t tsr u uee)) (l_e_st_eq_11_t6 sigma r refr1 symr1 trr1 alpha fu2 ff2 e s t tsr u uee) (l_e_st_eq_11_t5 sigma r refr1 symr1 trr1 alpha fu2 ff2 e s t tsr u uee) : l_e_is alpha (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e s) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e t)).
-
-(* constant 516 *)
-definition l_e_st_eq_11_t8 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λt:sigma.λtsr:r s t.(l_e_st_eq_4_th3 sigma r refr1 symr1 trr1 e (l_e_is alpha (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e s) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e t)) (λx:sigma.λy:l_e_st_esti sigma x (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).l_e_st_eq_11_t7 sigma r refr1 symr1 trr1 alpha fu2 ff2 e s t tsr x y) : l_e_is alpha (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e s) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e t)).
-
-(* constant 517 *)
-definition l_e_st_eq_indeq2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_st_eq_indeq sigma r refr1 symr1 trr1 alpha (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e) (λx:sigma.λy:sigma.λz:r x y.l_e_st_eq_11_t8 sigma r refr1 symr1 trr1 alpha fu2 ff2 e x y z) f : alpha).
-
-(* constant 518 *)
-definition l_e_st_eq_11_t9 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λt:sigma.λtef:l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f).(l_e_st_eq_10_th2 sigma r refr1 symr1 trr1 alpha (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e) (λx:sigma.λy:sigma.λz:r x y.l_e_st_eq_11_t8 sigma r refr1 symr1 trr1 alpha fu2 ff2 e x y z) f t tef : l_e_is alpha (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e t) (l_e_st_eq_indeq2 sigma r refr1 symr1 trr1 alpha fu2 ff2 e f)).
-
-(* constant 519 *)
-definition l_e_st_eq_11_t10 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λt:sigma.λtef:l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f).(l_e_st_eq_10_th2 sigma r refr1 symr1 trr1 (Πx:sigma.alpha) fu2 (λx:sigma.λy:sigma.λz:r x y.l_e_st_eq_11_t2 sigma r refr1 symr1 trr1 alpha fu2 ff2 x y z) e s see : l_e_is (Πx:sigma.alpha) (fu2 s) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e)).
-
-(* constant 520 *)
-definition l_e_st_eq_11_t11 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λt:sigma.λtef:l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f).(l_e_fise sigma alpha (fu2 s) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e) (l_e_st_eq_11_t10 sigma r refr1 symr1 trr1 alpha fu2 ff2 e f s see t tef) t : l_e_is alpha (fu2 s t) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e t)).
-
-(* constant 521 *)
-definition l_e_st_eq_11_th1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λt:sigma.λtef:l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f).(l_e_tris alpha (fu2 s t) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e t) (l_e_st_eq_indeq2 sigma r refr1 symr1 trr1 alpha fu2 ff2 e f) (l_e_st_eq_11_t11 sigma r refr1 symr1 trr1 alpha fu2 ff2 e f s see t tef) (l_e_st_eq_11_t9 sigma r refr1 symr1 trr1 alpha fu2 ff2 e f s see t tef) : l_e_is alpha (fu2 s t) (l_e_st_eq_indeq2 sigma r refr1 symr1 trr1 alpha fu2 ff2 e f)).
-
-(* constant 522 *)
-definition l_e_st_eq_11_th2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λs:sigma.λt:sigma.(l_e_st_eq_11_th1 sigma r refr1 symr1 trr1 alpha fu2 ff2 (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 t) s (l_e_st_eq_4_th5 sigma r refr1 symr1 trr1 s) t (l_e_st_eq_4_th5 sigma r refr1 symr1 trr1 t) : l_e_is alpha (fu2 s t) (l_e_st_eq_indeq2 sigma r refr1 symr1 trr1 alpha fu2 ff2 (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 t))).
-
-(* constant 523 *)
-axiom l_e_st_eq_landau_n_nat : Type[0].
-
-(* constant 524 *)
-definition l_e_st_eq_landau_n_is ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_is l_e_st_eq_landau_n_nat x y : Prop).
-
-(* constant 525 *)
-definition l_e_st_eq_landau_n_nis ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_not (l_e_st_eq_landau_n_is x y) : Prop).
-
-(* constant 526 *)
-definition l_e_st_eq_landau_n_in ≝ λx:l_e_st_eq_landau_n_nat.λs:l_e_st_set l_e_st_eq_landau_n_nat.(l_e_st_esti l_e_st_eq_landau_n_nat x s : Prop).
-
-(* constant 527 *)
-definition l_e_st_eq_landau_n_some ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.(l_some l_e_st_eq_landau_n_nat p : Prop).
-
-(* constant 528 *)
-definition l_e_st_eq_landau_n_all ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.(l_all l_e_st_eq_landau_n_nat p : Prop).
-
-(* constant 529 *)
-definition l_e_st_eq_landau_n_one ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.(l_e_one l_e_st_eq_landau_n_nat p : Prop).
-
-(* constant 530 *)
-axiom l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat.
-
-(* constant 531 *)
-axiom l_e_st_eq_landau_n_suc : Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.
-
-(* constant 532 *)
-definition l_e_st_eq_landau_n_ax2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_suc x y i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc y)).
-
-(* constant 533 *)
-axiom l_e_st_eq_landau_n_ax3 : ∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_suc x) l_e_st_eq_landau_n_1.
-
-(* constant 534 *)
-axiom l_e_st_eq_landau_n_ax4 : ∀x:l_e_st_eq_landau_n_nat.∀y:l_e_st_eq_landau_n_nat.∀u:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc y).l_e_st_eq_landau_n_is x y.
-
-(* constant 535 *)
-definition l_e_st_eq_landau_n_cond1 ≝ λs:l_e_st_set l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_in l_e_st_eq_landau_n_1 s : Prop).
-
-(* constant 536 *)
-definition l_e_st_eq_landau_n_cond2 ≝ λs:l_e_st_set l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_all (λx:l_e_st_eq_landau_n_nat.l_imp (l_e_st_eq_landau_n_in x s) (l_e_st_eq_landau_n_in (l_e_st_eq_landau_n_suc x) s)) : Prop).
-
-(* constant 537 *)
-axiom l_e_st_eq_landau_n_ax5 : ∀s:l_e_st_set l_e_st_eq_landau_n_nat.∀u:l_e_st_eq_landau_n_cond1 s.∀v:l_e_st_eq_landau_n_cond2 s.∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_in x s.
-
-(* constant 538 *)
-definition l_e_st_eq_landau_n_i1_s ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn1p:p l_e_st_eq_landau_n_1.λxsp:∀x:l_e_st_eq_landau_n_nat.∀y:p x.p (l_e_st_eq_landau_n_suc x).λx:l_e_st_eq_landau_n_nat.(l_e_st_setof l_e_st_eq_landau_n_nat p : l_e_st_set l_e_st_eq_landau_n_nat).
-
-(* constant 539 *)
-definition l_e_st_eq_landau_n_i1_t1 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn1p:p l_e_st_eq_landau_n_1.λxsp:∀x:l_e_st_eq_landau_n_nat.∀y:p x.p (l_e_st_eq_landau_n_suc x).λx:l_e_st_eq_landau_n_nat.(l_e_st_estii l_e_st_eq_landau_n_nat p l_e_st_eq_landau_n_1 n1p : l_e_st_eq_landau_n_cond1 (l_e_st_eq_landau_n_i1_s p n1p xsp x)).
-
-(* constant 540 *)
-definition l_e_st_eq_landau_n_i1_t2 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn1p:p l_e_st_eq_landau_n_1.λxsp:∀x:l_e_st_eq_landau_n_nat.∀y:p x.p (l_e_st_eq_landau_n_suc x).λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λyes:l_e_st_eq_landau_n_in y (l_e_st_eq_landau_n_i1_s p n1p xsp x).(l_e_st_estie l_e_st_eq_landau_n_nat p y yes : p y).
-
-(* constant 541 *)
-definition l_e_st_eq_landau_n_i1_t3 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn1p:p l_e_st_eq_landau_n_1.λxsp:∀x:l_e_st_eq_landau_n_nat.∀y:p x.p (l_e_st_eq_landau_n_suc x).λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λyes:l_e_st_eq_landau_n_in y (l_e_st_eq_landau_n_i1_s p n1p xsp x).(l_e_st_estii l_e_st_eq_landau_n_nat p (l_e_st_eq_landau_n_suc y) (xsp y (l_e_st_eq_landau_n_i1_t2 p n1p xsp x y yes)) : l_e_st_eq_landau_n_in (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_i1_s p n1p xsp x)).
-
-(* constant 542 *)
-definition l_e_st_eq_landau_n_i1_t4 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn1p:p l_e_st_eq_landau_n_1.λxsp:∀x:l_e_st_eq_landau_n_nat.∀y:p x.p (l_e_st_eq_landau_n_suc x).λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ax5 (l_e_st_eq_landau_n_i1_s p n1p xsp x) (l_e_st_eq_landau_n_i1_t1 p n1p xsp x) (λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_in y (l_e_st_eq_landau_n_i1_s p n1p xsp x).l_e_st_eq_landau_n_i1_t3 p n1p xsp x y u) x : l_e_st_eq_landau_n_in x (l_e_st_eq_landau_n_i1_s p n1p xsp x)).
-
-(* constant 543 *)
-definition l_e_st_eq_landau_n_induction ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn1p:p l_e_st_eq_landau_n_1.λxsp:∀x:l_e_st_eq_landau_n_nat.∀y:p x.p (l_e_st_eq_landau_n_suc x).λx:l_e_st_eq_landau_n_nat.(l_e_st_estie l_e_st_eq_landau_n_nat p x (l_e_st_eq_landau_n_i1_t4 p n1p xsp x) : p x).
-
-(* constant 544 *)
-definition l_e_st_eq_landau_n_21_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x y.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc y).(l_e_st_eq_landau_n_ax4 x y i : l_e_st_eq_landau_n_is x y).
-
-(* constant 545 *)
-definition l_e_st_eq_landau_n_satz1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x y.(l_imp_th3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_is x y) n (λu:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc y).l_e_st_eq_landau_n_21_t1 x y n u) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc y)).
-
-(* constant 546 *)
-definition l_e_st_eq_landau_n_22_prop1 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_suc x) x : Prop).
-
-(* constant 547 *)
-definition l_e_st_eq_landau_n_22_t1 ≝ (l_e_st_eq_landau_n_ax3 l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_22_prop1 l_e_st_eq_landau_n_1).
-
-(* constant 548 *)
-definition l_e_st_eq_landau_n_22_t2 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_22_prop1 x.(l_e_st_eq_landau_n_satz1 (l_e_st_eq_landau_n_suc x) x p : l_e_st_eq_landau_n_22_prop1 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 549 *)
-definition l_e_st_eq_landau_n_satz2 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_22_prop1 y) l_e_st_eq_landau_n_22_t1 (λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_22_prop1 y.l_e_st_eq_landau_n_22_t2 y u) x : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_suc x) x).
-
-(* constant 550 *)
-definition l_e_st_eq_landau_n_23_prop1 ≝ λx:l_e_st_eq_landau_n_nat.(l_or (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u))) : Prop).
-
-(* constant 551 *)
-definition l_e_st_eq_landau_n_23_t1 ≝ (l_ori1 (l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_suc u))) (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_23_prop1 l_e_st_eq_landau_n_1).
-
-(* constant 552 *)
-definition l_e_st_eq_landau_n_23_t2 ≝ λx:l_e_st_eq_landau_n_nat.(l_somei l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc u)) x (l_e_refis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc x)) : l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc u))).
-
-(* constant 553 *)
-definition l_e_st_eq_landau_n_23_t3 ≝ λx:l_e_st_eq_landau_n_nat.(l_ori2 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc u))) (l_e_st_eq_landau_n_23_t2 x) : l_e_st_eq_landau_n_23_prop1 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 554 *)
-definition l_e_st_eq_landau_n_23_t4 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_23_prop1 y) l_e_st_eq_landau_n_23_t1 (λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_23_prop1 y.l_e_st_eq_landau_n_23_t3 y) x : l_e_st_eq_landau_n_23_prop1 x).
-
-(* constant 555 *)
-definition l_e_st_eq_landau_n_satz3 ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_ore2 (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u))) (l_e_st_eq_landau_n_23_t4 x) n : l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u))).
-
-(* constant 556 *)
-definition l_e_st_eq_landau_n_23_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc y).λj:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc z).(l_e_st_eq_landau_n_ax4 y z (l_e_tris1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_suc z) x i j) : l_e_st_eq_landau_n_is y z).
-
-(* constant 557 *)
-definition l_e_st_eq_landau_n_23_t6 ≝ λx:l_e_st_eq_landau_n_nat.(λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc y).λv:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc z).l_e_st_eq_landau_n_23_t5 x y z u v : l_e_amone l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u))).
-
-(* constant 558 *)
-definition l_e_st_eq_landau_n_satz3a ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_onei l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_23_t6 x) (l_e_st_eq_landau_n_satz3 x n) : l_e_st_eq_landau_n_one (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u))).
-
-(* constant 559 *)
-definition l_e_st_eq_landau_n_24_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_all (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (f y))) : Prop).
-
-(* constant 560 *)
-definition l_e_st_eq_landau_n_24_prop2 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.(l_and (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x f) : Prop).
-
-(* constant 561 *)
-definition l_e_st_eq_landau_n_24_prop3 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is (a y) (b y) : Prop).
-
-(* constant 562 *)
-definition l_e_st_eq_landau_n_24_t1 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.(l_ande1 (l_e_st_eq_landau_n_is (a l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x a) pa : l_e_st_eq_landau_n_is (a l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)).
-
-(* constant 563 *)
-definition l_e_st_eq_landau_n_24_t2 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.(l_ande1 (l_e_st_eq_landau_n_is (b l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x b) pb : l_e_st_eq_landau_n_is (b l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)).
-
-(* constant 564 *)
-definition l_e_st_eq_landau_n_24_t3 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.(l_e_tris2 l_e_st_eq_landau_n_nat (a l_e_st_eq_landau_n_1) (b l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_24_t1 x a b pa pb) (l_e_st_eq_landau_n_24_t2 x a b pa pb) : l_e_st_eq_landau_n_24_prop3 x a b pa pb l_e_st_eq_landau_n_1).
-
-(* constant 565 *)
-definition l_e_st_eq_landau_n_24_t4 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop3 x a b pa pb y.(l_e_st_eq_landau_n_ax2 (a y) (b y) p : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (a y)) (l_e_st_eq_landau_n_suc (b y))).
-
-(* constant 566 *)
-definition l_e_st_eq_landau_n_24_t5 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop3 x a b pa pb y.(l_ande2 (l_e_st_eq_landau_n_is (a l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x a) pa : l_e_st_eq_landau_n_24_prop1 x a).
-
-(* constant 567 *)
-definition l_e_st_eq_landau_n_24_t6 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop3 x a b pa pb y.(l_ande2 (l_e_st_eq_landau_n_is (b l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x b) pb : l_e_st_eq_landau_n_24_prop1 x b).
-
-(* constant 568 *)
-definition l_e_st_eq_landau_n_24_t7 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop3 x a b pa pb y.(l_e_st_eq_landau_n_24_t5 x a b pa pb y p y : l_e_st_eq_landau_n_is (a (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (a y))).
-
-(* constant 569 *)
-definition l_e_st_eq_landau_n_24_t8 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop3 x a b pa pb y.(l_e_st_eq_landau_n_24_t6 x a b pa pb y p y : l_e_st_eq_landau_n_is (b (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (b y))).
-
-(* constant 570 *)
-definition l_e_st_eq_landau_n_24_t9 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop3 x a b pa pb y.(l_e_tr3is l_e_st_eq_landau_n_nat (a (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (a y)) (l_e_st_eq_landau_n_suc (b y)) (b (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_24_t7 x a b pa pb y p) (l_e_st_eq_landau_n_24_t4 x a b pa pb y p) (l_e_symis l_e_st_eq_landau_n_nat (b (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (b y)) (l_e_st_eq_landau_n_24_t8 x a b pa pb y p)) : l_e_st_eq_landau_n_24_prop3 x a b pa pb (l_e_st_eq_landau_n_suc y)).
-
-(* constant 571 *)
-definition l_e_st_eq_landau_n_24_t10 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop3 x a b pa pb z) (l_e_st_eq_landau_n_24_t3 x a b pa pb) (λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_24_prop3 x a b pa pb z.l_e_st_eq_landau_n_24_t9 x a b pa pb z u) y : l_e_st_eq_landau_n_24_prop3 x a b pa pb y).
-
-(* constant 572 *)
-definition l_e_st_eq_landau_n_24_t11 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.(l_e_fisi l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat a b (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_t10 x a b pa pb y) : l_e_is (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) a b).
-
-(* constant 573 *)
-definition l_e_st_eq_landau_n_24_aa ≝ λx:l_e_st_eq_landau_n_nat.(λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λu:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_24_prop2 x z.λw:l_e_st_eq_landau_n_24_prop2 x u.l_e_st_eq_landau_n_24_t11 x z u v w : l_e_amone (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop2 x z)).
-
-(* constant 574 *)
-definition l_e_st_eq_landau_n_24_prop4 ≝ λx:l_e_st_eq_landau_n_nat.(l_some (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop2 x z) : Prop).
-
-(* constant 575 *)
-definition l_e_st_eq_landau_n_24_t12 ≝ (λx:l_e_st_eq_landau_n_nat.l_e_refis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_suc x)) : l_e_st_eq_landau_n_24_prop1 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_suc).
-
-(* constant 576 *)
-definition l_e_st_eq_landau_n_24_t13 ≝ (l_andi (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_24_prop1 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_suc) (l_e_refis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_24_t12 : l_e_st_eq_landau_n_24_prop2 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_suc).
-
-(* constant 577 *)
-definition l_e_st_eq_landau_n_24_t14 ≝ (l_somei (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop2 l_e_st_eq_landau_n_1 z) l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_24_t13 : l_e_st_eq_landau_n_24_prop4 l_e_st_eq_landau_n_1).
-
-(* constant 578 *)
-definition l_e_st_eq_landau_n_24_g ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.(λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_suc (f y) : Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat).
-
-(* constant 579 *)
-definition l_e_st_eq_landau_n_24_t15 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_e_refis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_24_g x p f pf y) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_24_g x p f pf y) (l_e_st_eq_landau_n_suc (f y))).
-
-(* constant 580 *)
-definition l_e_st_eq_landau_n_24_t16 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.(l_ande1 (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x f) pf : l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)).
-
-(* constant 581 *)
-definition l_e_st_eq_landau_n_24_t17 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_24_g x p f pf l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (f l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_t15 x p f pf l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ax2 (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_24_t16 x p f pf)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_24_g x p f pf l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_suc x))).
-
-(* constant 582 *)
-definition l_e_st_eq_landau_n_24_t18 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_ande2 (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x f) pf : l_e_st_eq_landau_n_24_prop1 x f).
-
-(* constant 583 *)
-definition l_e_st_eq_landau_n_24_t19 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_24_t18 x p f pf y y : l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (f y))).
-
-(* constant 584 *)
-definition l_e_st_eq_landau_n_24_t20 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_e_tris2 l_e_st_eq_landau_n_nat (f (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_24_g x p f pf y) (l_e_st_eq_landau_n_suc (f y)) (l_e_st_eq_landau_n_24_t19 x p f pf y) (l_e_st_eq_landau_n_24_t15 x p f pf y) : l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_24_g x p f pf y)).
-
-(* constant 585 *)
-definition l_e_st_eq_landau_n_24_t21 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_24_g x p f pf (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (f (l_e_st_eq_landau_n_suc y))) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_24_g x p f pf y)) (l_e_st_eq_landau_n_24_t15 x p f pf (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_ax2 (f (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_24_g x p f pf y) (l_e_st_eq_landau_n_24_t20 x p f pf y)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_24_g x p f pf (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_24_g x p f pf y))).
-
-(* constant 586 *)
-definition l_e_st_eq_landau_n_24_t22 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.(λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_t21 x p f pf y : l_e_st_eq_landau_n_24_prop1 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_24_g x p f pf)).
-
-(* constant 587 *)
-definition l_e_st_eq_landau_n_24_t23 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.(l_andi (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_24_g x p f pf l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_suc x))) (l_e_st_eq_landau_n_24_prop1 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_24_g x p f pf)) (l_e_st_eq_landau_n_24_t17 x p f pf) (l_e_st_eq_landau_n_24_t22 x p f pf) : l_e_st_eq_landau_n_24_prop2 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_24_g x p f pf)).
-
-(* constant 588 *)
-definition l_e_st_eq_landau_n_24_t24 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.(l_somei (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop2 (l_e_st_eq_landau_n_suc x) z) (l_e_st_eq_landau_n_24_g x p f pf) (l_e_st_eq_landau_n_24_t23 x p f pf) : l_e_st_eq_landau_n_24_prop4 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 589 *)
-definition l_e_st_eq_landau_n_24_t25 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.(l_someapp (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop2 x z) p (l_e_st_eq_landau_n_24_prop4 (l_e_st_eq_landau_n_suc x)) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_24_prop2 x z.l_e_st_eq_landau_n_24_t24 x p z u) : l_e_st_eq_landau_n_24_prop4 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 590 *)
-definition l_e_st_eq_landau_n_24_bb ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop4 y) l_e_st_eq_landau_n_24_t14 (λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_24_prop4 y.l_e_st_eq_landau_n_24_t25 y u) x : l_e_st_eq_landau_n_24_prop4 x).
-
-(* constant 591 *)
-definition l_e_st_eq_landau_n_satz4 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_onei (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop2 x z) (l_e_st_eq_landau_n_24_aa x) (l_e_st_eq_landau_n_24_bb x) : l_e_one (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_is (z l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_all (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is (z (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (z y)))))).
-
-(* constant 592 *)
-definition l_e_st_eq_landau_n_plus ≝ λx:l_e_st_eq_landau_n_nat.(l_e_ind (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop2 x z) (l_e_st_eq_landau_n_satz4 x) : Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat).
-
-(* constant 593 *)
-definition l_e_st_eq_landau_n_pl ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_plus x y : l_e_st_eq_landau_n_nat).
-
-(* constant 594 *)
-definition l_e_st_eq_landau_n_24_t26 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_oneax (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop2 x z) (l_e_st_eq_landau_n_satz4 x) : l_e_st_eq_landau_n_24_prop2 x (l_e_st_eq_landau_n_plus x)).
-
-(* constant 595 *)
-definition l_e_st_eq_landau_n_satz4a ≝ λx:l_e_st_eq_landau_n_nat.(l_ande1 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_plus x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x (l_e_st_eq_landau_n_plus x)) (l_e_st_eq_landau_n_24_t26 x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)).
-
-(* constant 596 *)
-definition l_e_st_eq_landau_n_24_t27 ≝ λx:l_e_st_eq_landau_n_nat.(l_ande2 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_plus x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x (l_e_st_eq_landau_n_plus x)) (l_e_st_eq_landau_n_24_t26 x) : l_e_st_eq_landau_n_24_prop1 x (l_e_st_eq_landau_n_plus x)).
-
-(* constant 597 *)
-definition l_e_st_eq_landau_n_satz4b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_24_t27 x y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y))).
-
-(* constant 598 *)
-definition l_e_st_eq_landau_n_24_t28 ≝ (l_e_st_eq_landau_n_24_t11 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_plus l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_24_t26 l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_24_t13 : l_e_is (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (l_e_st_eq_landau_n_plus l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_suc).
-
-(* constant 599 *)
-definition l_e_st_eq_landau_n_satz4c ≝ λx:l_e_st_eq_landau_n_nat.(l_e_fise l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_plus l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_24_t28 x : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 x) (l_e_st_eq_landau_n_suc x)).
-
-(* constant 600 *)
-definition l_e_st_eq_landau_n_24_t29 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_24_t11 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_plus (l_e_st_eq_landau_n_suc x)) (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_plus x y)) (l_e_st_eq_landau_n_24_t26 (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_t23 x (l_e_st_eq_landau_n_24_bb x) (l_e_st_eq_landau_n_plus x) (l_e_st_eq_landau_n_24_t26 x)) : l_e_is (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (l_e_st_eq_landau_n_plus (l_e_st_eq_landau_n_suc x)) (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_plus x y))).
-
-(* constant 601 *)
-definition l_e_st_eq_landau_n_satz4d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_fise l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_plus (l_e_st_eq_landau_n_suc x)) (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_plus x z)) (l_e_st_eq_landau_n_24_t29 x) y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y))).
-
-(* constant 602 *)
-definition l_e_st_eq_landau_n_satz4e ≝ λx:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 603 *)
-definition l_e_st_eq_landau_n_satz4f ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_satz4b x y) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y))).
-
-(* constant 604 *)
-definition l_e_st_eq_landau_n_satz4g ≝ λx:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 x) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_satz4c x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 x)).
-
-(* constant 605 *)
-definition l_e_st_eq_landau_n_satz4h ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_satz4d x y) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc x) y)).
-
-(* constant 606 *)
-definition l_e_st_eq_landau_n_ispl1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_pl u z) x y i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 607 *)
-definition l_e_st_eq_landau_n_ispl2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_pl z u) x y i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y)).
-
-(* constant 608 *)
-definition l_e_st_eq_landau_n_ispl12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_ispl1 x y z i) (l_e_st_eq_landau_n_ispl2 z u y j) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 609 *)
-definition l_e_st_eq_landau_n_25_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y z)) : Prop).
-
-(* constant 610 *)
-definition l_e_st_eq_landau_n_25_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_satz4a (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_satz4f x y) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_satz4e y)) : l_e_st_eq_landau_n_25_prop1 x y l_e_st_eq_landau_n_1).
-
-(* constant 611 *)
-definition l_e_st_eq_landau_n_25_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_25_prop1 x y z.(l_e_st_eq_landau_n_ax2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y z)) p : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) z)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y z)))).
-
-(* constant 612 *)
-definition l_e_st_eq_landau_n_25_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_25_prop1 x y z.(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_suc z)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) z)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y z))) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl y z))) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc z))) (l_e_st_eq_landau_n_satz4b (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_25_t2 x y z p) (l_e_st_eq_landau_n_satz4f x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc z)) x (l_e_st_eq_landau_n_satz4f y z)) : l_e_st_eq_landau_n_25_prop1 x y (l_e_st_eq_landau_n_suc z)).
-
-(* constant 613 *)
-definition l_e_st_eq_landau_n_satz5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_25_prop1 x y u) (l_e_st_eq_landau_n_25_t1 x y) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_25_prop1 x y u.l_e_st_eq_landau_n_25_t3 x y u v) z : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y z))).
-
-(* constant 614 *)
-definition l_e_st_eq_landau_n_asspl1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz5 x y z : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y z))).
-
-(* constant 615 *)
-definition l_e_st_eq_landau_n_asspl2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_satz5 x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) z)).
-
-(* constant 616 *)
-definition l_e_st_eq_landau_n_26_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl y x) : Prop).
-
-(* constant 617 *)
-definition l_e_st_eq_landau_n_26_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz4a y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc y)).
-
-(* constant 618 *)
-definition l_e_st_eq_landau_n_26_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz4c y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 y) (l_e_st_eq_landau_n_suc y)).
-
-(* constant 619 *)
-definition l_e_st_eq_landau_n_26_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tris2 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 y) (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_26_t2 x y) (l_e_st_eq_landau_n_26_t1 x y) : l_e_st_eq_landau_n_26_prop1 l_e_st_eq_landau_n_1 y).
-
-(* constant 620 *)
-definition l_e_st_eq_landau_n_26_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_26_prop1 x y.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl y x)) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_ax2 (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl y x) p) (l_e_st_eq_landau_n_satz4f y x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc x))).
-
-(* constant 621 *)
-definition l_e_st_eq_landau_n_26_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_26_prop1 x y.(l_e_st_eq_landau_n_satz4d x y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y))).
-
-(* constant 622 *)
-definition l_e_st_eq_landau_n_26_t6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_26_prop1 x y.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_26_t5 x y p) (l_e_st_eq_landau_n_26_t4 x y p) : l_e_st_eq_landau_n_26_prop1 (l_e_st_eq_landau_n_suc x) y).
-
-(* constant 623 *)
-definition l_e_st_eq_landau_n_satz6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_26_prop1 z y) (l_e_st_eq_landau_n_26_t3 x y) (λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_26_prop1 z y.l_e_st_eq_landau_n_26_t6 z y u) x : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl y x)).
-
-(* constant 624 *)
-definition l_e_st_eq_landau_n_compl ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz6 x y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl y x)).
-
-(* constant 625 *)
-definition l_e_st_eq_landau_n_26_t7 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 x) (l_e_st_eq_landau_n_satz4a x) (l_e_st_eq_landau_n_satz4g x) : l_e_st_eq_landau_n_26_prop1 x l_e_st_eq_landau_n_1).
-
-(* constant 626 *)
-definition l_e_st_eq_landau_n_26_t8 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_26_prop1 x y.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl y x)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc y) x) (l_e_st_eq_landau_n_satz4b x y) (l_e_st_eq_landau_n_ax2 (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl y x) p) (l_e_st_eq_landau_n_satz4h y x) : l_e_st_eq_landau_n_26_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 627 *)
-definition l_e_st_eq_landau_n_26_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_26_prop1 x z) (l_e_st_eq_landau_n_26_t7 x) (λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_26_prop1 x z.l_e_st_eq_landau_n_26_t8 x z u) y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl y x)).
-
-(* constant 628 *)
-definition l_e_st_eq_landau_n_27_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_nis y (l_e_st_eq_landau_n_pl x y) : Prop).
-
-(* constant 629 *)
-definition l_e_st_eq_landau_n_27_t1 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_symnotis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_ax3 x) : l_e_st_eq_landau_n_nis l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 630 *)
-definition l_e_st_eq_landau_n_27_t2 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_notis_th4 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_27_t1 x) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_27_prop1 x l_e_st_eq_landau_n_1).
-
-(* constant 631 *)
-definition l_e_st_eq_landau_n_27_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_27_prop1 x y.(l_e_st_eq_landau_n_satz1 y (l_e_st_eq_landau_n_pl x y) p : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y))).
-
-(* constant 632 *)
-definition l_e_st_eq_landau_n_27_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_27_prop1 x y.(l_e_notis_th4 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_27_t3 x y p) (l_e_st_eq_landau_n_satz4b x y) : l_e_st_eq_landau_n_27_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 633 *)
-definition l_e_st_eq_landau_n_satz7 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_27_prop1 x z) (l_e_st_eq_landau_n_27_t2 x) (λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_27_prop1 x z.l_e_st_eq_landau_n_27_t4 x z u) y : l_e_st_eq_landau_n_nis y (l_e_st_eq_landau_n_pl x y)).
-
-(* constant 634 *)
-definition l_e_st_eq_landau_n_28_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis y z.(l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl x z) : Prop).
-
-(* constant 635 *)
-definition l_e_st_eq_landau_n_28_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis y z.(l_e_st_eq_landau_n_satz1 y z n : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_suc z)).
-
-(* constant 636 *)
-definition l_e_st_eq_landau_n_28_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis y z.(l_e_notis_th5 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_suc z) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 y) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 z) (l_e_st_eq_landau_n_28_t1 x y z n) (l_e_st_eq_landau_n_satz4g y) (l_e_st_eq_landau_n_satz4g z) : l_e_st_eq_landau_n_28_prop1 l_e_st_eq_landau_n_1 y z n).
-
-(* constant 637 *)
-definition l_e_st_eq_landau_n_28_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis y z.λp:l_e_st_eq_landau_n_28_prop1 x y z n.(l_e_st_eq_landau_n_satz1 (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl x z) p : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x z))).
-
-(* constant 638 *)
-definition l_e_st_eq_landau_n_28_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis y z.λp:l_e_st_eq_landau_n_28_prop1 x y z n.(l_e_notis_th5 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc x) z) (l_e_st_eq_landau_n_28_t3 x y z n p) (l_e_st_eq_landau_n_satz4h x y) (l_e_st_eq_landau_n_satz4h x z) : l_e_st_eq_landau_n_28_prop1 (l_e_st_eq_landau_n_suc x) y z n).
-
-(* constant 639 *)
-definition l_e_st_eq_landau_n_satz8 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis y z.(l_e_st_eq_landau_n_induction (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_28_prop1 u y z n) (l_e_st_eq_landau_n_28_t2 x y z n) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_28_prop1 u y z n.l_e_st_eq_landau_n_28_t4 u y z n v) x : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl x z)).
-
-(* constant 640 *)
-definition l_e_st_eq_landau_n_satz8a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl x z).(l_imp_th7 (l_e_st_eq_landau_n_is y z) (l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl x z)) (l_weli (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl x z)) i) (λu:l_e_st_eq_landau_n_nis y z.l_e_st_eq_landau_n_satz8 x y z u) : l_e_st_eq_landau_n_is y z).
-
-(* constant 641 *)
-definition l_e_st_eq_landau_n_diffprop ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl y z) : Prop).
-
-(* constant 642 *)
-definition l_e_st_eq_landau_n_28_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λdv:l_e_st_eq_landau_n_diffprop x y v.(l_e_st_eq_landau_n_satz8a y u v (l_e_tris1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl y v) x du dv) : l_e_st_eq_landau_n_is u v).
-
-(* constant 643 *)
-definition l_e_st_eq_landau_n_satz8b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λdv:l_e_st_eq_landau_n_diffprop x y v.l_e_st_eq_landau_n_28_t5 x y u v du dv : l_e_amone l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl y z))).
-
-(* constant 644 *)
-definition l_e_st_eq_landau_n_29_i ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is x y : Prop).
-
-(* constant 645 *)
-definition l_e_st_eq_landau_n_29_ii ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u) : Prop).
-
-(* constant 646 *)
-definition l_e_st_eq_landau_n_29_iii ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_some (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop y x v) : Prop).
-
-(* constant 647 *)
-definition l_e_st_eq_landau_n_29_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λone1:l_e_st_eq_landau_n_29_i x y.λu:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl u x) (l_e_st_eq_landau_n_pl x u) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_compl u x) (l_e_st_eq_landau_n_ispl1 x y u one1) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl u x) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 648 *)
-definition l_e_st_eq_landau_n_29_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λone1:l_e_st_eq_landau_n_29_i x y.λu:l_e_st_eq_landau_n_nat.(l_e_notis_th3 l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl u x) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_satz7 u x) (l_e_st_eq_landau_n_29_t1 x y one1 u) : l_e_st_eq_landau_n_nis x (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 649 *)
-definition l_e_st_eq_landau_n_29_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λone1:l_e_st_eq_landau_n_29_i x y.(l_some_th5 l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u) (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_29_t2 x y one1 u) : l_not (l_e_st_eq_landau_n_29_ii x y)).
-
-(* constant 650 *)
-definition l_e_st_eq_landau_n_29_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_ec_th1 (l_e_st_eq_landau_n_29_i x y) (l_e_st_eq_landau_n_29_ii x y) (λz:l_e_st_eq_landau_n_29_i x y.l_e_st_eq_landau_n_29_t3 x y z) : l_ec (l_e_st_eq_landau_n_29_i x y) (l_e_st_eq_landau_n_29_ii x y)).
-
-(* constant 651 *)
-definition l_e_st_eq_landau_n_29_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λone1:l_e_st_eq_landau_n_29_i x y.(l_e_st_eq_landau_n_29_t3 y x (l_e_symis l_e_st_eq_landau_n_nat x y one1) : l_not (l_e_st_eq_landau_n_29_iii x y)).
-
-(* constant 652 *)
-definition l_e_st_eq_landau_n_29_t6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_ec_th2 (l_e_st_eq_landau_n_29_iii x y) (l_e_st_eq_landau_n_29_i x y) (λz:l_e_st_eq_landau_n_29_i x y.l_e_st_eq_landau_n_29_t5 x y z) : l_ec (l_e_st_eq_landau_n_29_iii x y) (l_e_st_eq_landau_n_29_i x y)).
-
-(* constant 653 *)
-definition l_e_st_eq_landau_n_29_t6a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λtwo1:l_e_st_eq_landau_n_29_ii x y.λthree1:l_e_st_eq_landau_n_29_iii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.(l_e_tr4is l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x v) u) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl v u)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl v u) x) du (l_e_st_eq_landau_n_ispl1 y (l_e_st_eq_landau_n_pl x v) u dv) (l_e_st_eq_landau_n_asspl1 x v u) (l_e_st_eq_landau_n_compl x (l_e_st_eq_landau_n_pl v u)) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl v u) x)).
-
-(* constant 654 *)
-definition l_e_st_eq_landau_n_29_t7 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λtwo1:l_e_st_eq_landau_n_29_ii x y.λthree1:l_e_st_eq_landau_n_29_iii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.(l_mp (l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl v u) x)) l_con (l_e_st_eq_landau_n_29_t6a x y two1 three1 u du v dv) (l_e_st_eq_landau_n_satz7 (l_e_st_eq_landau_n_pl v u) x) : l_con).
-
-(* constant 655 *)
-definition l_e_st_eq_landau_n_29_t8 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λtwo1:l_e_st_eq_landau_n_29_ii x y.λthree1:l_e_st_eq_landau_n_29_iii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.(l_someapp l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop y x v) three1 l_con (λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.l_e_st_eq_landau_n_29_t7 x y two1 three1 u du v dv) : l_con).
-
-(* constant 656 *)
-definition l_e_st_eq_landau_n_29_t9 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λtwo1:l_e_st_eq_landau_n_29_ii x y.λthree1:l_e_st_eq_landau_n_29_iii x y.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u) two1 l_con (λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.l_e_st_eq_landau_n_29_t8 x y two1 three1 u du) : l_con).
-
-(* constant 657 *)
-definition l_e_st_eq_landau_n_29_t10 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λtwo1:l_e_st_eq_landau_n_29_ii x y.(λz:l_e_st_eq_landau_n_29_iii x y.l_e_st_eq_landau_n_29_t9 x y two1 z : l_not (l_e_st_eq_landau_n_29_iii x y)).
-
-(* constant 658 *)
-definition l_e_st_eq_landau_n_29_t11 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_ec_th1 (l_e_st_eq_landau_n_29_ii x y) (l_e_st_eq_landau_n_29_iii x y) (λz:l_e_st_eq_landau_n_29_ii x y.l_e_st_eq_landau_n_29_t10 x y z) : l_ec (l_e_st_eq_landau_n_29_ii x y) (l_e_st_eq_landau_n_29_iii x y)).
-
-(* constant 659 *)
-definition l_e_st_eq_landau_n_29_a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_ec3_th6 (l_e_st_eq_landau_n_29_i x y) (l_e_st_eq_landau_n_29_ii x y) (l_e_st_eq_landau_n_29_iii x y) (l_e_st_eq_landau_n_29_t4 x y) (l_e_st_eq_landau_n_29_t11 x y) (l_e_st_eq_landau_n_29_t6 x y) : l_ec3 (l_e_st_eq_landau_n_29_i x y) (l_e_st_eq_landau_n_29_ii x y) (l_e_st_eq_landau_n_29_iii x y)).
-
-(* constant 660 *)
-definition l_e_st_eq_landau_n_29_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_or3 (l_e_st_eq_landau_n_29_i x y) (l_e_st_eq_landau_n_29_ii x y) (l_e_st_eq_landau_n_29_iii x y) : Prop).
-
-(* constant 661 *)
-definition l_e_st_eq_landau_n_29_t12 ≝ λx:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_or3i1 (l_e_st_eq_landau_n_29_i x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_29_ii x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_29_iii x l_e_st_eq_landau_n_1) j : l_e_st_eq_landau_n_29_prop1 x l_e_st_eq_landau_n_1).
-
-(* constant 662 *)
-definition l_e_st_eq_landau_n_29_t13 ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u).(l_e_tris l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_suc u) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 u) j (l_e_st_eq_landau_n_satz4g u) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 u)).
-
-(* constant 663 *)
-definition l_e_st_eq_landau_n_29_t14 ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u).(l_somei l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x l_e_st_eq_landau_n_1 z) u (l_e_st_eq_landau_n_29_t13 x n u j) : l_e_st_eq_landau_n_29_ii x l_e_st_eq_landau_n_1).
-
-(* constant 664 *)
-definition l_e_st_eq_landau_n_29_t15 ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u).(l_someapp l_e_st_eq_landau_n_nat (λu1:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u1)) (l_e_st_eq_landau_n_satz3 x n) (l_e_st_eq_landau_n_29_ii x l_e_st_eq_landau_n_1) (λu1:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u1).l_e_st_eq_landau_n_29_t14 x n u1 z) : l_e_st_eq_landau_n_29_ii x l_e_st_eq_landau_n_1).
-
-(* constant 665 *)
-definition l_e_st_eq_landau_n_29_t16 ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u).(l_or3i2 (l_e_st_eq_landau_n_29_i x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_29_ii x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_29_iii x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_29_t15 x n u j) : l_e_st_eq_landau_n_29_prop1 x l_e_st_eq_landau_n_1).
-
-(* constant 666 *)
-definition l_e_st_eq_landau_n_29_t16a ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_satz3 x n) (l_e_st_eq_landau_n_29_prop1 x l_e_st_eq_landau_n_1) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u).l_e_st_eq_landau_n_29_t16 x n u v) : l_e_st_eq_landau_n_29_prop1 x l_e_st_eq_landau_n_1).
-
-(* constant 667 *)
-definition l_e_st_eq_landau_n_29_t17 ≝ λx:l_e_st_eq_landau_n_nat.(l_imp_th1 (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_29_prop1 x l_e_st_eq_landau_n_1) (λz:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_29_t12 x z) (λz:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_29_t16a x z) : l_e_st_eq_landau_n_29_prop1 x l_e_st_eq_landau_n_1).
-
-(* constant 668 *)
-definition l_e_st_eq_landau_n_29_t18 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λone1:l_e_st_eq_landau_n_29_i x y.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz4e y) (l_e_st_eq_landau_n_ispl1 y x l_e_st_eq_landau_n_1 (l_e_symis l_e_st_eq_landau_n_nat x y one1)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 669 *)
-definition l_e_st_eq_landau_n_29_t19 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λone1:l_e_st_eq_landau_n_29_i x y.(l_somei l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_suc y) x z) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_29_t18 x y p one1) : l_e_st_eq_landau_n_29_iii x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 670 *)
-definition l_e_st_eq_landau_n_29_t20 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λone1:l_e_st_eq_landau_n_29_i x y.(l_or3i3 (l_e_st_eq_landau_n_29_i x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_ii x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_iii x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_t19 x y p one1) : l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 671 *)
-definition l_e_st_eq_landau_n_29_t21 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λj:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_e_tr3is l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc y) du (l_e_st_eq_landau_n_ispl2 u l_e_st_eq_landau_n_1 y j) (l_e_st_eq_landau_n_satz4a y) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 672 *)
-definition l_e_st_eq_landau_n_29_t22 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λj:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_or3i1 (l_e_st_eq_landau_n_29_i x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_ii x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_iii x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_t21 x y p two1 u du j) : l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 673 *)
-definition l_e_st_eq_landau_n_29_t23 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λn:l_e_st_eq_landau_n_nis u l_e_st_eq_landau_n_1.λw:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is u (l_e_st_eq_landau_n_suc w).(l_e_tris l_e_st_eq_landau_n_nat u (l_e_st_eq_landau_n_suc w) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 w) j (l_e_st_eq_landau_n_satz4g w) : l_e_st_eq_landau_n_is u (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 w)).
-
-(* constant 674 *)
-definition l_e_st_eq_landau_n_29_t24 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λn:l_e_st_eq_landau_n_nis u l_e_st_eq_landau_n_1.λw:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is u (l_e_st_eq_landau_n_suc w).(l_e_tr4is l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) w) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc y) w) du (l_e_st_eq_landau_n_ispl2 u (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 w) y (l_e_st_eq_landau_n_29_t23 x y p two1 u du n w j)) (l_e_st_eq_landau_n_asspl2 y l_e_st_eq_landau_n_1 w) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc y) w (l_e_st_eq_landau_n_satz4a y)) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc y) w)).
-
-(* constant 675 *)
-definition l_e_st_eq_landau_n_29_t25 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λn:l_e_st_eq_landau_n_nis u l_e_st_eq_landau_n_1.λw:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is u (l_e_st_eq_landau_n_suc w).(l_somei l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x (l_e_st_eq_landau_n_suc y) z) w (l_e_st_eq_landau_n_29_t24 x y p two1 u du n w j) : l_e_st_eq_landau_n_29_ii x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 676 *)
-definition l_e_st_eq_landau_n_29_t26 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λn:l_e_st_eq_landau_n_nis u l_e_st_eq_landau_n_1.(l_someapp l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is u (l_e_st_eq_landau_n_suc z)) (l_e_st_eq_landau_n_satz3 u n) (l_e_st_eq_landau_n_29_ii x (l_e_st_eq_landau_n_suc y)) (λz:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_is u (l_e_st_eq_landau_n_suc z).l_e_st_eq_landau_n_29_t25 x y p two1 u du n z v) : l_e_st_eq_landau_n_29_ii x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 677 *)
-definition l_e_st_eq_landau_n_29_t27 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λn:l_e_st_eq_landau_n_nis u l_e_st_eq_landau_n_1.(l_or3i2 (l_e_st_eq_landau_n_29_i x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_ii x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_iii x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_t26 x y p two1 u du n) : l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 678 *)
-definition l_e_st_eq_landau_n_29_t28 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.(l_imp_th1 (l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)) (λz:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_29_t22 x y p two1 u du z) (λz:l_e_st_eq_landau_n_nis u l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_29_t27 x y p two1 u du z) : l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 679 *)
-definition l_e_st_eq_landau_n_29_t28a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u) two1 (l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)) (λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.l_e_st_eq_landau_n_29_t28 x y p two1 u du) : l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 680 *)
-definition l_e_st_eq_landau_n_29_t29 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λthree1:l_e_st_eq_landau_n_29_iii x y.λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x v)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc v)) (l_e_st_eq_landau_n_ax2 y (l_e_st_eq_landau_n_pl x v) dv) (l_e_st_eq_landau_n_satz4f x v) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc v))).
-
-(* constant 681 *)
-definition l_e_st_eq_landau_n_29_t30 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λthree1:l_e_st_eq_landau_n_29_iii x y.λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.(l_somei l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_suc y) x z) (l_e_st_eq_landau_n_suc v) (l_e_st_eq_landau_n_29_t29 x y p three1 v dv) : l_e_st_eq_landau_n_29_iii x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 682 *)
-definition l_e_st_eq_landau_n_29_t31 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λthree1:l_e_st_eq_landau_n_29_iii x y.(l_someapp l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop y x v) three1 (l_e_st_eq_landau_n_29_iii x (l_e_st_eq_landau_n_suc y)) (λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.l_e_st_eq_landau_n_29_t30 x y p three1 v dv) : l_e_st_eq_landau_n_29_iii x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 683 *)
-definition l_e_st_eq_landau_n_29_t32 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λthree1:l_e_st_eq_landau_n_29_iii x y.(l_or3i3 (l_e_st_eq_landau_n_29_i x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_ii x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_iii x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_t31 x y p three1) : l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 684 *)
-definition l_e_st_eq_landau_n_29_t33 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.(l_or3app (l_e_st_eq_landau_n_29_i x y) (l_e_st_eq_landau_n_29_ii x y) (l_e_st_eq_landau_n_29_iii x y) (l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)) p (λz:l_e_st_eq_landau_n_29_i x y.l_e_st_eq_landau_n_29_t20 x y p z) (λz:l_e_st_eq_landau_n_29_ii x y.l_e_st_eq_landau_n_29_t28a x y p z) (λz:l_e_st_eq_landau_n_29_iii x y.l_e_st_eq_landau_n_29_t32 x y p z) : l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 685 *)
-definition l_e_st_eq_landau_n_29_b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_29_prop1 x z) (l_e_st_eq_landau_n_29_t17 x) (λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_29_prop1 x z.l_e_st_eq_landau_n_29_t33 x z u) y : l_or3 (l_e_st_eq_landau_n_29_i x y) (l_e_st_eq_landau_n_29_ii x y) (l_e_st_eq_landau_n_29_iii x y)).
-
-(* constant 686 *)
-definition l_e_st_eq_landau_n_satz9 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_orec3i (l_e_st_eq_landau_n_29_i x y) (l_e_st_eq_landau_n_29_ii x y) (l_e_st_eq_landau_n_29_iii x y) (l_e_st_eq_landau_n_29_b x y) (l_e_st_eq_landau_n_29_a x y) : l_orec3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl y u))) (l_e_st_eq_landau_n_some (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is y (l_e_st_eq_landau_n_pl x v)))).
-
-(* constant 687 *)
-definition l_e_st_eq_landau_n_satz9a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_29_b x y : l_or3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u)) (l_e_st_eq_landau_n_some (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop y x v))).
-
-(* constant 688 *)
-definition l_e_st_eq_landau_n_satz9b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_29_a x y : l_ec3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u)) (l_e_st_eq_landau_n_some (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop y x v))).
-
-(* constant 689 *)
-definition l_e_st_eq_landau_n_more ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u) : Prop).
-
-(* constant 690 *)
-definition l_e_st_eq_landau_n_less ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_some (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop y x v) : Prop).
-
-(* constant 691 *)
-definition l_e_st_eq_landau_n_satz10 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz9 x y : l_orec3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y)).
-
-(* constant 692 *)
-definition l_e_st_eq_landau_n_satz10a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz9a x y : l_or3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y)).
-
-(* constant 693 *)
-definition l_e_st_eq_landau_n_satz10b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz9b x y : l_ec3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y)).
-
-(* constant 694 *)
-definition l_e_st_eq_landau_n_satz11 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(m : l_e_st_eq_landau_n_less y x).
-
-(* constant 695 *)
-definition l_e_st_eq_landau_n_satz12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l : l_e_st_eq_landau_n_more y x).
-
-(* constant 696 *)
-definition l_e_st_eq_landau_n_moreis ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_or (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) : Prop).
-
-(* constant 697 *)
-definition l_e_st_eq_landau_n_lessis ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_or (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) : Prop).
-
-(* constant 698 *)
-definition l_e_st_eq_landau_n_satz13 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.(l_or_th9 (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_less y x) (l_e_st_eq_landau_n_is y x) m (λz:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz11 x y z) (λz:l_e_st_eq_landau_n_is x y.l_e_symis l_e_st_eq_landau_n_nat x y z) : l_e_st_eq_landau_n_lessis y x).
-
-(* constant 699 *)
-definition l_e_st_eq_landau_n_satz14 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.(l_or_th9 (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more y x) (l_e_st_eq_landau_n_is y x) l (λz:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_satz12 x y z) (λz:l_e_st_eq_landau_n_is x y.l_e_symis l_e_st_eq_landau_n_nat x y z) : l_e_st_eq_landau_n_moreis y x).
-
-(* constant 700 *)
-definition l_e_st_eq_landau_n_ismore1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λm:l_e_st_eq_landau_n_more x z.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_more u z) x y m i : l_e_st_eq_landau_n_more y z).
-
-(* constant 701 *)
-definition l_e_st_eq_landau_n_ismore2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λm:l_e_st_eq_landau_n_more z x.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_more z u) x y m i : l_e_st_eq_landau_n_more z y).
-
-(* constant 702 *)
-definition l_e_st_eq_landau_n_isless1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λl:l_e_st_eq_landau_n_less x z.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_less u z) x y l i : l_e_st_eq_landau_n_less y z).
-
-(* constant 703 *)
-definition l_e_st_eq_landau_n_isless2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λl:l_e_st_eq_landau_n_less z x.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_less z u) x y l i : l_e_st_eq_landau_n_less z y).
-
-(* constant 704 *)
-definition l_e_st_eq_landau_n_ismoreis1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λm:l_e_st_eq_landau_n_moreis x z.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_moreis u z) x y m i : l_e_st_eq_landau_n_moreis y z).
-
-(* constant 705 *)
-definition l_e_st_eq_landau_n_ismoreis2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λm:l_e_st_eq_landau_n_moreis z x.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_moreis z u) x y m i : l_e_st_eq_landau_n_moreis z y).
-
-(* constant 706 *)
-definition l_e_st_eq_landau_n_islessis1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λl:l_e_st_eq_landau_n_lessis x z.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis u z) x y l i : l_e_st_eq_landau_n_lessis y z).
-
-(* constant 707 *)
-definition l_e_st_eq_landau_n_islessis2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λl:l_e_st_eq_landau_n_lessis z x.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis z u) x y l i : l_e_st_eq_landau_n_lessis z y).
-
-(* constant 708 *)
-definition l_e_st_eq_landau_n_moreisi2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_ori2 (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) i : l_e_st_eq_landau_n_moreis x y).
-
-(* constant 709 *)
-definition l_e_st_eq_landau_n_lessisi2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_ori2 (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) i : l_e_st_eq_landau_n_lessis x y).
-
-(* constant 710 *)
-definition l_e_st_eq_landau_n_moreisi1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_ori1 (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) m : l_e_st_eq_landau_n_moreis x y).
-
-(* constant 711 *)
-definition l_e_st_eq_landau_n_lessisi1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_ori1 (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) l : l_e_st_eq_landau_n_lessis x y).
-
-(* constant 712 *)
-definition l_e_st_eq_landau_n_ismore12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.λm:l_e_st_eq_landau_n_more x z.(l_e_st_eq_landau_n_ismore2 z u y j (l_e_st_eq_landau_n_ismore1 x y z i m) : l_e_st_eq_landau_n_more y u).
-
-(* constant 713 *)
-definition l_e_st_eq_landau_n_isless12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.λl:l_e_st_eq_landau_n_less x z.(l_e_st_eq_landau_n_isless2 z u y j (l_e_st_eq_landau_n_isless1 x y z i l) : l_e_st_eq_landau_n_less y u).
-
-(* constant 714 *)
-definition l_e_st_eq_landau_n_ismoreis12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.λm:l_e_st_eq_landau_n_moreis x z.(l_e_st_eq_landau_n_ismoreis2 z u y j (l_e_st_eq_landau_n_ismoreis1 x y z i m) : l_e_st_eq_landau_n_moreis y u).
-
-(* constant 715 *)
-definition l_e_st_eq_landau_n_islessis12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.λl:l_e_st_eq_landau_n_lessis x z.(l_e_st_eq_landau_n_islessis2 z u y j (l_e_st_eq_landau_n_islessis1 x y z i l) : l_e_st_eq_landau_n_lessis y u).
-
-(* constant 716 *)
-definition l_e_st_eq_landau_n_satz10c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.(l_ec3_th7 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10b x y) (l_comor (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) m) : l_not (l_e_st_eq_landau_n_less x y)).
-
-(* constant 717 *)
-definition l_e_st_eq_landau_n_satz10d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.(l_ec3_th9 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10b x y) l : l_not (l_e_st_eq_landau_n_more x y)).
-
-(* constant 718 *)
-definition l_e_st_eq_landau_n_satz10e ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λn:l_not (l_e_st_eq_landau_n_more x y).(l_or3_th2 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10a x y) n : l_e_st_eq_landau_n_lessis x y).
-
-(* constant 719 *)
-definition l_e_st_eq_landau_n_satz10f ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λn:l_not (l_e_st_eq_landau_n_less x y).(l_comor (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_or3_th3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10a x y) n) : l_e_st_eq_landau_n_moreis x y).
-
-(* constant 720 *)
-definition l_e_st_eq_landau_n_satz10g ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_or_th3 (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) (l_ec3e23 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10b x y) m) (l_ec3e21 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10b x y) m) : l_not (l_e_st_eq_landau_n_lessis x y)).
-
-(* constant 721 *)
-definition l_e_st_eq_landau_n_satz10h ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_or_th3 (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_ec3e32 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10b x y) l) (l_ec3e31 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10b x y) l) : l_not (l_e_st_eq_landau_n_moreis x y)).
-
-(* constant 722 *)
-definition l_e_st_eq_landau_n_satz10j ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λn:l_not (l_e_st_eq_landau_n_moreis x y).(l_or3e3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10a x y) (l_or_th5 (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) n) (l_or_th4 (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) n) : l_e_st_eq_landau_n_less x y).
-
-(* constant 723 *)
-definition l_e_st_eq_landau_n_satz10k ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λn:l_not (l_e_st_eq_landau_n_lessis x y).(l_or3e2 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10a x y) (l_or_th4 (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) n) (l_or_th5 (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) n) : l_e_st_eq_landau_n_more x y).
-
-(* constant 724 *)
-definition l_e_st_eq_landau_n_315_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less y z.λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.λw:l_e_st_eq_landau_n_nat.λdw:l_e_st_eq_landau_n_diffprop z y w.(l_e_tr3is l_e_st_eq_landau_n_nat z (l_e_st_eq_landau_n_pl y w) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x v) w) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl v w)) dw (l_e_st_eq_landau_n_ispl1 y (l_e_st_eq_landau_n_pl x v) w dv) (l_e_st_eq_landau_n_asspl1 x v w) : l_e_st_eq_landau_n_is z (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl v w))).
-
-(* constant 725 *)
-definition l_e_st_eq_landau_n_315_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less y z.λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.λw:l_e_st_eq_landau_n_nat.λdw:l_e_st_eq_landau_n_diffprop z y w.(l_somei l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop z x u) (l_e_st_eq_landau_n_pl v w) (l_e_st_eq_landau_n_315_t1 x y z l k v dv w dw) : l_e_st_eq_landau_n_less x z).
-
-(* constant 726 *)
-definition l_e_st_eq_landau_n_315_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less y z.λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.(l_someapp l_e_st_eq_landau_n_nat (λw:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop z y w) k (l_e_st_eq_landau_n_less x z) (λw:l_e_st_eq_landau_n_nat.λdw:l_e_st_eq_landau_n_diffprop z y w.l_e_st_eq_landau_n_315_t2 x y z l k v dv w dw) : l_e_st_eq_landau_n_less x z).
-
-(* constant 727 *)
-definition l_e_st_eq_landau_n_satz15 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less y z.(l_someapp l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop y x v) l (l_e_st_eq_landau_n_less x z) (λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.l_e_st_eq_landau_n_315_t3 x y z l k v dv) : l_e_st_eq_landau_n_less x z).
-
-(* constant 728 *)
-definition l_e_st_eq_landau_n_trless ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less y z.(l_e_st_eq_landau_n_satz15 x y z l k : l_e_st_eq_landau_n_less x z).
-
-(* constant 729 *)
-definition l_e_st_eq_landau_n_trmore ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more y z.(l_e_st_eq_landau_n_satz15 z y x n m : l_e_st_eq_landau_n_more x z).
-
-(* constant 730 *)
-definition l_e_st_eq_landau_n_315_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more y z.(l_e_st_eq_landau_n_satz12 z x (l_e_st_eq_landau_n_satz15 z y x (l_e_st_eq_landau_n_satz11 y z n) (l_e_st_eq_landau_n_satz11 x y m)) : l_e_st_eq_landau_n_more x z).
-
-(* constant 731 *)
-definition l_e_st_eq_landau_n_satz16a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_less y z.(l_orapp (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_less x z) l (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_trless x y z u k) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_isless1 y x z (l_e_symis l_e_st_eq_landau_n_nat x y u) k) : l_e_st_eq_landau_n_less x z).
-
-(* constant 732 *)
-definition l_e_st_eq_landau_n_satz16b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_lessis y z.(l_orapp (l_e_st_eq_landau_n_less y z) (l_e_st_eq_landau_n_is y z) (l_e_st_eq_landau_n_less x z) k (λu:l_e_st_eq_landau_n_less y z.l_e_st_eq_landau_n_trless x y z l u) (λu:l_e_st_eq_landau_n_is y z.l_e_st_eq_landau_n_isless2 y z x u l) : l_e_st_eq_landau_n_less x z).
-
-(* constant 733 *)
-definition l_e_st_eq_landau_n_satz16c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_more y z.(l_e_st_eq_landau_n_satz16b z y x n (l_e_st_eq_landau_n_satz13 x y m) : l_e_st_eq_landau_n_more x z).
-
-(* constant 734 *)
-definition l_e_st_eq_landau_n_satz16d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_moreis y z.(l_e_st_eq_landau_n_satz16a z y x (l_e_st_eq_landau_n_satz13 y z n) m : l_e_st_eq_landau_n_more x z).
-
-(* constant 735 *)
-definition l_e_st_eq_landau_n_317_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is y z.(l_e_st_eq_landau_n_lessisi2 x z (l_e_tris l_e_st_eq_landau_n_nat x y z i j) : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 736 *)
-definition l_e_st_eq_landau_n_317_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_less y z.(l_e_st_eq_landau_n_lessisi1 x z (l_e_st_eq_landau_n_satz16a x y z l j) : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 737 *)
-definition l_e_st_eq_landau_n_317_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.λi:l_e_st_eq_landau_n_is x y.(l_orapp (l_e_st_eq_landau_n_less y z) (l_e_st_eq_landau_n_is y z) (l_e_st_eq_landau_n_lessis x z) k (λu:l_e_st_eq_landau_n_less y z.l_e_st_eq_landau_n_317_t2 x y z l k i u) (λu:l_e_st_eq_landau_n_is y z.l_e_st_eq_landau_n_317_t1 x y z l k i u) : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 738 *)
-definition l_e_st_eq_landau_n_317_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.λj:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_lessisi1 x z (l_e_st_eq_landau_n_satz16b x y z j k) : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 739 *)
-definition l_e_st_eq_landau_n_satz17 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.(l_orapp (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_lessis x z) l (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_317_t4 x y z l k u) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_317_t3 x y z l k u) : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 740 *)
-definition l_e_st_eq_landau_n_317_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.λj:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_lessisi1 x z (l_e_st_eq_landau_n_satz16b x y z j k) : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 741 *)
-definition l_e_st_eq_landau_n_317_t6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_islessis1 y x z (l_e_symis l_e_st_eq_landau_n_nat x y i) k : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 742 *)
-definition l_e_st_eq_landau_n_317_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.(l_orapp (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_lessis x z) l (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_317_t5 x y z l k u) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_317_t6 x y z l k u) : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 743 *)
-definition l_e_st_eq_landau_n_trlessis ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.(l_e_st_eq_landau_n_satz17 x y z l k : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 744 *)
-definition l_e_st_eq_landau_n_trmoreis ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis y z.(l_e_st_eq_landau_n_satz14 z x (l_e_st_eq_landau_n_satz17 z y x (l_e_st_eq_landau_n_satz13 y z n) (l_e_st_eq_landau_n_satz13 x y m)) : l_e_st_eq_landau_n_moreis x z).
-
-(* constant 745 *)
-definition l_e_st_eq_landau_n_satz18 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_somei l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_pl x y) x u) y (l_e_refis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x y)) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x y) x).
-
-(* constant 746 *)
-definition l_e_st_eq_landau_n_satz18a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz18 x y : l_e_st_eq_landau_n_less x (l_e_st_eq_landau_n_pl x y)).
-
-(* constant 747 *)
-definition l_e_st_eq_landau_n_satz18b ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) x (l_e_st_eq_landau_n_satz4a x) (l_e_st_eq_landau_n_satz18 x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_suc x) x).
-
-(* constant 748 *)
-definition l_e_st_eq_landau_n_satz18c ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz18b x : l_e_st_eq_landau_n_less x (l_e_st_eq_landau_n_suc x)).
-
-(* constant 749 *)
-definition l_e_st_eq_landau_n_319_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.(l_e_tris l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl u y) du (l_e_st_eq_landau_n_compl y u) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl u y)).
-
-(* constant 750 *)
-definition l_e_st_eq_landau_n_319_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl u y) z) (l_e_st_eq_landau_n_pl u (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl y z) u) (l_e_st_eq_landau_n_ispl1 x (l_e_st_eq_landau_n_pl u y) z (l_e_st_eq_landau_n_319_t1 x y z m u du)) (l_e_st_eq_landau_n_asspl1 u y z) (l_e_st_eq_landau_n_compl u (l_e_st_eq_landau_n_pl y z)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl y z) u)).
-
-(* constant 751 *)
-definition l_e_st_eq_landau_n_319_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.(l_somei l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) v) u (l_e_st_eq_landau_n_319_t2 x y z m u du) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 752 *)
-definition l_e_st_eq_landau_n_satz19a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u) m (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_diffprop x y u.l_e_st_eq_landau_n_319_t3 x y z m u v) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 753 *)
-definition l_e_st_eq_landau_n_satz19b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_ispl1 x y z i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 754 *)
-definition l_e_st_eq_landau_n_satz19c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_satz11 (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_satz19a y x z (l_e_st_eq_landau_n_satz12 x y l)) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 755 *)
-definition l_e_st_eq_landau_n_319_anders1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_satz19a y x z l : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 756 *)
-definition l_e_st_eq_landau_n_satz19d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_compl x z) (l_e_st_eq_landau_n_compl y z) (l_e_st_eq_landau_n_satz19a x y z m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y)).
-
-(* constant 757 *)
-definition l_e_st_eq_landau_n_satz19e ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_ispl2 x y z i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y)).
-
-(* constant 758 *)
-definition l_e_st_eq_landau_n_satz19f ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_compl x z) (l_e_st_eq_landau_n_compl y z) (l_e_st_eq_landau_n_satz19c x y z l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y)).
-
-(* constant 759 *)
-definition l_e_st_eq_landau_n_319_anders2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_satz19d y x z l : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y)).
-
-(* constant 760 *)
-definition l_e_st_eq_landau_n_satz19g ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λm:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_ismore2 (l_e_st_eq_landau_n_pl x u) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_ispl1 x y u i) (l_e_st_eq_landau_n_satz19d z u x m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 761 *)
-definition l_e_st_eq_landau_n_satz19h ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λm:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl u y) (l_e_st_eq_landau_n_compl x z) (l_e_st_eq_landau_n_compl y u) (l_e_st_eq_landau_n_satz19g x y z u i m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl u y)).
-
-(* constant 762 *)
-definition l_e_st_eq_landau_n_satz19j ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λl:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_isless2 (l_e_st_eq_landau_n_pl x u) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_ispl1 x y u i) (l_e_st_eq_landau_n_satz19f z u x l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 763 *)
-definition l_e_st_eq_landau_n_satz19k ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λl:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl u y) (l_e_st_eq_landau_n_compl x z) (l_e_st_eq_landau_n_compl y u) (l_e_st_eq_landau_n_satz19j x y z u i l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl u y)).
-
-(* constant 764 *)
-definition l_e_st_eq_landau_n_319_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_moreisi1 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_satz19a x y z n) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 765 *)
-definition l_e_st_eq_landau_n_319_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_moreisi2 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_ispl1 x y z i) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 766 *)
-definition l_e_st_eq_landau_n_satz19l ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.(l_orapp (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) m (λu:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_319_t4 x y z m u) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_319_t5 x y z m u) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 767 *)
-definition l_e_st_eq_landau_n_satz19m ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.(l_e_st_eq_landau_n_ismoreis12 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_compl x z) (l_e_st_eq_landau_n_compl y z) (l_e_st_eq_landau_n_satz19l x y z m) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y)).
-
-(* constant 768 *)
-definition l_e_st_eq_landau_n_satz19n ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.(l_e_st_eq_landau_n_satz13 (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_satz19l y x z (l_e_st_eq_landau_n_satz14 x y l)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 769 *)
-definition l_e_st_eq_landau_n_satz19o ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.(l_e_st_eq_landau_n_satz13 (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_satz19m y x z (l_e_st_eq_landau_n_satz14 x y l)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y)).
-
-(* constant 770 *)
-definition l_e_st_eq_landau_n_320_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz10a x y : l_or3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y)).
-
-(* constant 771 *)
-definition l_e_st_eq_landau_n_320_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) : l_ec3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z))).
-
-(* constant 772 *)
-definition l_e_st_eq_landau_n_satz20a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z).(l_ec3_th11 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_320_t1 x y z) (l_e_st_eq_landau_n_320_t2 x y z) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_satz19b x y z u) (λu:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz19a x y z u) (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_satz19c x y z u) m : l_e_st_eq_landau_n_more x y).
-
-(* constant 773 *)
-definition l_e_st_eq_landau_n_satz20b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z).(l_ec3_th10 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_320_t1 x y z) (l_e_st_eq_landau_n_320_t2 x y z) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_satz19b x y z u) (λu:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz19a x y z u) (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_satz19c x y z u) i : l_e_st_eq_landau_n_is x y).
-
-(* constant 774 *)
-definition l_e_st_eq_landau_n_satz20c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z).(l_ec3_th12 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_320_t1 x y z) (l_e_st_eq_landau_n_320_t2 x y z) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_satz19b x y z u) (λu:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz19a x y z u) (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_satz19c x y z u) l : l_e_st_eq_landau_n_less x y).
-
-(* constant 775 *)
-definition l_e_st_eq_landau_n_320_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z).(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_compl z x) i (l_e_st_eq_landau_n_compl y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y)).
-
-(* constant 776 *)
-definition l_e_st_eq_landau_n_320_andersb ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z).(l_e_st_eq_landau_n_satz8a z x y (l_e_st_eq_landau_n_320_t3 x y z i) : l_e_st_eq_landau_n_is x y).
-
-(* constant 777 *)
-definition l_e_st_eq_landau_n_320_andersc ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z).(l_e_st_eq_landau_n_satz20a y x z l : l_e_st_eq_landau_n_less x y).
-
-(* constant 778 *)
-definition l_e_st_eq_landau_n_satz20d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y).(l_e_st_eq_landau_n_satz20a x y z (l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_compl z x) (l_e_st_eq_landau_n_compl z y) m) : l_e_st_eq_landau_n_more x y).
-
-(* constant 779 *)
-definition l_e_st_eq_landau_n_satz20e ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y).(l_e_st_eq_landau_n_satz20b x y z (l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_compl x z) i (l_e_st_eq_landau_n_compl z y)) : l_e_st_eq_landau_n_is x y).
-
-(* constant 780 *)
-definition l_e_st_eq_landau_n_satz20f ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y).(l_e_st_eq_landau_n_satz20c x y z (l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_compl z x) (l_e_st_eq_landau_n_compl z y) l) : l_e_st_eq_landau_n_less x y).
-
-(* constant 781 *)
-definition l_e_st_eq_landau_n_321_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_satz19a x y z m : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 782 *)
-definition l_e_st_eq_landau_n_321_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl u y) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_compl z y) (l_e_st_eq_landau_n_compl u y) (l_e_st_eq_landau_n_satz19a z u y n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 783 *)
-definition l_e_st_eq_landau_n_satz21 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_trmore (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_321_t1 x y z u m n) (l_e_st_eq_landau_n_321_t2 x y z u m n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 784 *)
-definition l_e_st_eq_landau_n_321_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_trmore (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_satz19a x y z m) (l_e_st_eq_landau_n_satz19d z u y n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 785 *)
-definition l_e_st_eq_landau_n_satz21a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_satz21 y x u z l k : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 786 *)
-definition l_e_st_eq_landau_n_321_andersa ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_satz11 (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_satz21 y x u z (l_e_st_eq_landau_n_satz12 x y l) (l_e_st_eq_landau_n_satz12 z u k)) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 787 *)
-definition l_e_st_eq_landau_n_satz22a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_more z u.(l_orapp (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)) m (λv:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz21 x y z u v n) (λv:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_satz19g x y z u v n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 788 *)
-definition l_e_st_eq_landau_n_satz22b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_moreis z u.(l_orapp (l_e_st_eq_landau_n_more z u) (l_e_st_eq_landau_n_is z u) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)) n (λv:l_e_st_eq_landau_n_more z u.l_e_st_eq_landau_n_satz21 x y z u m v) (λv:l_e_st_eq_landau_n_is z u.l_e_st_eq_landau_n_satz19h z u x y v m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 789 *)
-definition l_e_st_eq_landau_n_satz22c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_satz22a y x u z (l_e_st_eq_landau_n_satz14 x y l) k : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 790 *)
-definition l_e_st_eq_landau_n_satz22d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_lessis z u.(l_e_st_eq_landau_n_satz22b y x u z l (l_e_st_eq_landau_n_satz14 z u k) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 791 *)
-definition l_e_st_eq_landau_n_323_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.(l_e_st_eq_landau_n_moreisi2 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u) (l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_ispl1 x y z i) (l_e_st_eq_landau_n_ispl2 z u y j)) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 792 *)
-definition l_e_st_eq_landau_n_323_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λi:l_e_st_eq_landau_n_is x y.λo:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_moreisi1 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_satz22a x y z u m o) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 793 *)
-definition l_e_st_eq_landau_n_323_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λi:l_e_st_eq_landau_n_is x y.(l_orapp (l_e_st_eq_landau_n_more z u) (l_e_st_eq_landau_n_is z u) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)) n (λv:l_e_st_eq_landau_n_more z u.l_e_st_eq_landau_n_323_t2 x y z u m n i v) (λv:l_e_st_eq_landau_n_is z u.l_e_st_eq_landau_n_323_t1 x y z u m n i v) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 794 *)
-definition l_e_st_eq_landau_n_323_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λo:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_moreisi1 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_satz22b x y z u o n) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 795 *)
-definition l_e_st_eq_landau_n_satz23 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.(l_orapp (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)) m (λv:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_323_t4 x y z u m n v) (λv:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_323_t3 x y z u m n v) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 796 *)
-definition l_e_st_eq_landau_n_323_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λo:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_moreisi1 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_satz22b x y z u o n) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 797 *)
-definition l_e_st_eq_landau_n_323_t6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_ismoreis2 (l_e_st_eq_landau_n_pl x u) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_ispl1 x y u i) (l_e_st_eq_landau_n_satz19m z u x n) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 798 *)
-definition l_e_st_eq_landau_n_323_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.(l_orapp (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)) m (λv:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_323_t5 x y z u m n v) (λv:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_323_t6 x y z u m n v) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 799 *)
-definition l_e_st_eq_landau_n_satz23a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis z u.(l_e_st_eq_landau_n_satz13 (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_satz23 y x u z (l_e_st_eq_landau_n_satz14 x y l) (l_e_st_eq_landau_n_satz14 z u k)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 800 *)
-definition l_e_st_eq_landau_n_324_t1 ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u).(l_e_tris l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_suc u) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 u) i (l_e_st_eq_landau_n_satz4g u) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 u)).
-
-(* constant 801 *)
-definition l_e_st_eq_landau_n_324_t2 ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u).(l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 u) x l_e_st_eq_landau_n_1 (l_e_symis l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 u) (l_e_st_eq_landau_n_324_t1 x n u i)) (l_e_st_eq_landau_n_satz18 l_e_st_eq_landau_n_1 u) : l_e_st_eq_landau_n_more x l_e_st_eq_landau_n_1).
-
-(* constant 802 *)
-definition l_e_st_eq_landau_n_324_t3 ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_satz3 x n) (l_e_st_eq_landau_n_more x l_e_st_eq_landau_n_1) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u).l_e_st_eq_landau_n_324_t2 x n u v) : l_e_st_eq_landau_n_more x l_e_st_eq_landau_n_1).
-
-(* constant 803 *)
-definition l_e_st_eq_landau_n_satz24 ≝ λx:l_e_st_eq_landau_n_nat.(l_or_th2 (l_e_st_eq_landau_n_more x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (λu:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_324_t3 x u) : l_e_st_eq_landau_n_moreis x l_e_st_eq_landau_n_1).
-
-(* constant 804 *)
-definition l_e_st_eq_landau_n_satz24a ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz13 x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24 x) : l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 x).
-
-(* constant 805 *)
-definition l_e_st_eq_landau_n_satz24b ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_324_t3 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_ax3 x) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_suc x) l_e_st_eq_landau_n_1).
-
-(* constant 806 *)
-definition l_e_st_eq_landau_n_satz24c ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz24b x : l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 807 *)
-definition l_e_st_eq_landau_n_325_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more y x.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop y x u.(l_e_st_eq_landau_n_satz19m u l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_satz24 u) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x u) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 808 *)
-definition l_e_st_eq_landau_n_325_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more y x.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop y x u.(l_e_st_eq_landau_n_ismoreis1 (l_e_st_eq_landau_n_pl x u) y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_symis l_e_st_eq_landau_n_nat y (l_e_st_eq_landau_n_pl x u) du) (l_e_st_eq_landau_n_325_t1 x y m u du) : l_e_st_eq_landau_n_moreis y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 809 *)
-definition l_e_st_eq_landau_n_satz25 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more y x.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop y x u) m (l_e_st_eq_landau_n_moreis y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_diffprop y x u.l_e_st_eq_landau_n_325_t2 x y m u v) : l_e_st_eq_landau_n_moreis y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 810 *)
-definition l_e_st_eq_landau_n_satz25a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more y x.(l_e_st_eq_landau_n_ismoreis2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) y (l_e_st_eq_landau_n_satz4a x) (l_e_st_eq_landau_n_satz25 x y m) : l_e_st_eq_landau_n_moreis y (l_e_st_eq_landau_n_suc x)).
-
-(* constant 811 *)
-definition l_e_st_eq_landau_n_satz25b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less y x.(l_e_st_eq_landau_n_satz13 x (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz25 y x l) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) x).
-
-(* constant 812 *)
-definition l_e_st_eq_landau_n_satz25c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less y x.(l_e_st_eq_landau_n_islessis1 (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc y) x (l_e_st_eq_landau_n_satz4a y) (l_e_st_eq_landau_n_satz25b x y l) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc y) x).
-
-(* constant 813 *)
-definition l_e_st_eq_landau_n_326_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λm:l_e_st_eq_landau_n_more y x.(l_e_st_eq_landau_n_satz25 x y m : l_e_st_eq_landau_n_moreis y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 814 *)
-definition l_e_st_eq_landau_n_326_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).(l_imp_th3 (l_e_st_eq_landau_n_more y x) (l_e_st_eq_landau_n_moreis y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_satz10h y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) l) (λv:l_e_st_eq_landau_n_more y x.l_e_st_eq_landau_n_326_t1 x y l v) : l_not (l_e_st_eq_landau_n_more y x)).
-
-(* constant 815 *)
-definition l_e_st_eq_landau_n_satz26 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).(l_e_st_eq_landau_n_satz10e y x (l_e_st_eq_landau_n_326_t2 x y l) : l_e_st_eq_landau_n_lessis y x).
-
-(* constant 816 *)
-definition l_e_st_eq_landau_n_satz26a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less y (l_e_st_eq_landau_n_suc x).(l_e_st_eq_landau_n_satz26 x y (l_e_st_eq_landau_n_isless2 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) y (l_e_st_eq_landau_n_satz4e x) l) : l_e_st_eq_landau_n_lessis y x).
-
-(* constant 817 *)
-definition l_e_st_eq_landau_n_satz26b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) x.(l_e_st_eq_landau_n_satz14 x y (l_e_st_eq_landau_n_satz26 y x m) : l_e_st_eq_landau_n_moreis y x).
-
-(* constant 818 *)
-definition l_e_st_eq_landau_n_satz26c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_suc y) x.(l_e_st_eq_landau_n_satz26b x y (l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_satz4e y) m) : l_e_st_eq_landau_n_moreis y x).
-
-(* constant 819 *)
-definition l_e_st_eq_landau_n_327_lbprop ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.(l_imp (p m) (l_e_st_eq_landau_n_lessis n m) : Prop).
-
-(* constant 820 *)
-definition l_e_st_eq_landau_n_lb ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_all (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_327_lbprop p n x) : Prop).
-
-(* constant 821 *)
-definition l_e_st_eq_landau_n_min ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.(l_and (l_e_st_eq_landau_n_lb p n) (p n) : Prop).
-
-(* constant 822 *)
-definition l_e_st_eq_landau_n_327_t1 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λn:l_e_st_eq_landau_n_nat.(λx:p n.l_e_st_eq_landau_n_satz24a n : l_e_st_eq_landau_n_327_lbprop p l_e_st_eq_landau_n_1 n).
-
-(* constant 823 *)
-definition l_e_st_eq_landau_n_327_t2 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.(λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_327_t1 p s x : l_e_st_eq_landau_n_lb p l_e_st_eq_landau_n_1).
-
-(* constant 824 *)
-definition l_e_st_eq_landau_n_327_t3 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λl:∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x.λy:l_e_st_eq_landau_n_nat.λyp:p y.(l_e_st_eq_landau_n_satz18 y l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) y).
-
-(* constant 825 *)
-definition l_e_st_eq_landau_n_327_t4 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λl:∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x.λy:l_e_st_eq_landau_n_nat.λyp:p y.(l_e_st_eq_landau_n_satz10g (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) y (l_e_st_eq_landau_n_327_t3 p s l y yp) : l_not (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) y)).
-
-(* constant 826 *)
-definition l_e_st_eq_landau_n_327_t5 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λl:∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x.λy:l_e_st_eq_landau_n_nat.λyp:p y.(l_imp_th4 (p y) (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) y) yp (l_e_st_eq_landau_n_327_t4 p s l y yp) : l_not (l_e_st_eq_landau_n_327_lbprop p (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) y)).
-
-(* constant 827 *)
-definition l_e_st_eq_landau_n_327_t6 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λl:∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x.λy:l_e_st_eq_landau_n_nat.λyp:p y.(l_all_th1 l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_327_lbprop p (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) x) y (l_e_st_eq_landau_n_327_t5 p s l y yp) : l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1))).
-
-(* constant 828 *)
-definition l_e_st_eq_landau_n_327_t7 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λl:∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x.λy:l_e_st_eq_landau_n_nat.λyp:p y.(l_mp (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1)) l_con (l (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_327_t6 p s l y yp) : l_con).
-
-(* constant 829 *)
-definition l_e_st_eq_landau_n_327_t8 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λl:∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x.(l_someapp l_e_st_eq_landau_n_nat p s l_con (λx:l_e_st_eq_landau_n_nat.λy:p x.l_e_st_eq_landau_n_327_t7 p s l x y) : l_con).
-
-(* constant 830 *)
-definition l_e_st_eq_landau_n_327_t9 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_lb p x) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))).λm:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p m.(n m : l_not (l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))))).
-
-(* constant 831 *)
-definition l_e_st_eq_landau_n_327_t10 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_lb p x) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))).λm:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p m.(l_et (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1)) (l_and_th3 (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_327_t9 p s n m l) l) : l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1)).
-
-(* constant 832 *)
-definition l_e_st_eq_landau_n_327_t11 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_lb p x) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))).λm:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p m.(l_e_isp l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x) (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc m) (l_e_st_eq_landau_n_327_t10 p s n m l) (l_e_st_eq_landau_n_satz4a m) : l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_suc m)).
-
-(* constant 833 *)
-definition l_e_st_eq_landau_n_327_t12 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_lb p x) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))).(λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_induction (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p y) (l_e_st_eq_landau_n_327_t2 p s) (λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_lb p y.l_e_st_eq_landau_n_327_t11 p s n y z) x : ∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x).
-
-(* constant 834 *)
-definition l_e_st_eq_landau_n_327_t13 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.(λx:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_lb p x) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))).l_e_st_eq_landau_n_327_t8 p s (l_e_st_eq_landau_n_327_t12 p s x) : l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_lb p x) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))).
-
-(* constant 835 *)
-definition l_e_st_eq_landau_n_327_t14 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).(l_ande1 (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))) a : l_e_st_eq_landau_n_lb p m).
-
-(* constant 836 *)
-definition l_e_st_eq_landau_n_327_t15 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).(l_ande2 (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))) a : l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).
-
-(* constant 837 *)
-definition l_e_st_eq_landau_n_327_t16 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).λnmp:l_not (p m).λn:l_e_st_eq_landau_n_nat.λnp:p n.(l_mp (p n) (l_e_st_eq_landau_n_lessis m n) np (l_e_st_eq_landau_n_327_t14 p s m a n) : l_e_st_eq_landau_n_lessis m n).
-
-(* constant 838 *)
-definition l_e_st_eq_landau_n_327_t17 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).λnmp:l_not (p m).λn:l_e_st_eq_landau_n_nat.λnp:p n.(l_imp_th3 (l_e_st_eq_landau_n_is m n) (p m) nmp (λx:l_e_st_eq_landau_n_is m n.l_e_isp l_e_st_eq_landau_n_nat p n m np (l_e_symis l_e_st_eq_landau_n_nat m n x)) : l_not (l_e_st_eq_landau_n_is m n)).
-
-(* constant 839 *)
-definition l_e_st_eq_landau_n_327_t18 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).λnmp:l_not (p m).λn:l_e_st_eq_landau_n_nat.λnp:p n.(l_ore1 (l_e_st_eq_landau_n_less m n) (l_e_st_eq_landau_n_is m n) (l_e_st_eq_landau_n_327_t16 p s m a nmp n np) (l_e_st_eq_landau_n_327_t17 p s m a nmp n np) : l_e_st_eq_landau_n_less m n).
-
-(* constant 840 *)
-definition l_e_st_eq_landau_n_327_t19 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).λnmp:l_not (p m).λn:l_e_st_eq_landau_n_nat.λnp:p n.(l_e_st_eq_landau_n_satz25b n m (l_e_st_eq_landau_n_327_t18 p s m a nmp n np) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1) n).
-
-(* constant 841 *)
-definition l_e_st_eq_landau_n_327_t20 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).λnmp:l_not (p m).(λx:l_e_st_eq_landau_n_nat.λy:p x.l_e_st_eq_landau_n_327_t19 p s m a nmp x y : l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1)).
-
-(* constant 842 *)
-definition l_e_st_eq_landau_n_327_t21 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).λnmp:l_not (p m).(l_mp (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1)) l_con (l_e_st_eq_landau_n_327_t20 p s m a nmp) (l_e_st_eq_landau_n_327_t15 p s m a) : l_con).
-
-(* constant 843 *)
-definition l_e_st_eq_landau_n_327_t22 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).(l_et (p m) (λx:l_not (p m).l_e_st_eq_landau_n_327_t21 p s m a x) : p m).
-
-(* constant 844 *)
-definition l_e_st_eq_landau_n_327_t23 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).(l_andi (l_e_st_eq_landau_n_lb p m) (p m) (l_e_st_eq_landau_n_327_t14 p s m a) (l_e_st_eq_landau_n_327_t22 p s m a) : l_e_st_eq_landau_n_min p m).
-
-(* constant 845 *)
-definition l_e_st_eq_landau_n_satz27 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.(l_some_th6 l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_lb p x) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x) (l_e_st_eq_landau_n_327_t13 p s) (λx:l_e_st_eq_landau_n_nat.λy:l_and (l_e_st_eq_landau_n_lb p x) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).l_e_st_eq_landau_n_327_t23 p s x y) : l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x)).
-
-(* constant 846 *)
-definition l_e_st_eq_landau_n_327_t24 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.(λx:p u.l_e_st_eq_landau_n_satz24a u : l_e_st_eq_landau_n_327_lbprop p l_e_st_eq_landau_n_1 u).
-
-(* constant 847 *)
-definition l_e_st_eq_landau_n_327_t25 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).(λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_327_t24 p n x : l_e_st_eq_landau_n_lb p l_e_st_eq_landau_n_1).
-
-(* constant 848 *)
-definition l_e_st_eq_landau_n_327_t26 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p u.(n u : l_not (l_e_st_eq_landau_n_min p u)).
-
-(* constant 849 *)
-definition l_e_st_eq_landau_n_327_t27 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p u.(l_and_th3 (l_e_st_eq_landau_n_lb p u) (p u) (l_e_st_eq_landau_n_327_t26 p n u l) l : l_not (p u)).
-
-(* constant 850 *)
-definition l_e_st_eq_landau_n_327_t28 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p u.λv:l_e_st_eq_landau_n_nat.λvp:p v.(l_imp_th3 (l_e_st_eq_landau_n_is u v) (p u) (l_e_st_eq_landau_n_327_t27 p n u l) (λx:l_e_st_eq_landau_n_is u v.l_e_isp1 l_e_st_eq_landau_n_nat p v u vp x) : l_e_st_eq_landau_n_nis u v).
-
-(* constant 851 *)
-definition l_e_st_eq_landau_n_327_t29 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p u.λv:l_e_st_eq_landau_n_nat.λvp:p v.(l_mp (p v) (l_e_st_eq_landau_n_lessis u v) vp (l v) : l_e_st_eq_landau_n_lessis u v).
-
-(* constant 852 *)
-definition l_e_st_eq_landau_n_327_t30 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p u.λv:l_e_st_eq_landau_n_nat.λvp:p v.(l_ore1 (l_e_st_eq_landau_n_less u v) (l_e_st_eq_landau_n_is u v) (l_e_st_eq_landau_n_327_t29 p n u l v vp) (l_e_st_eq_landau_n_327_t28 p n u l v vp) : l_e_st_eq_landau_n_less u v).
-
-(* constant 853 *)
-definition l_e_st_eq_landau_n_327_t31 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p u.λv:l_e_st_eq_landau_n_nat.λvp:p v.(l_e_st_eq_landau_n_satz25c v u (l_e_st_eq_landau_n_327_t30 p n u l v vp) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) v).
-
-(* constant 854 *)
-definition l_e_st_eq_landau_n_327_t32 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p u.λv:l_e_st_eq_landau_n_nat.(λx:p v.l_e_st_eq_landau_n_327_t31 p n u l v x : l_e_st_eq_landau_n_327_lbprop p (l_e_st_eq_landau_n_suc u) v).
-
-(* constant 855 *)
-definition l_e_st_eq_landau_n_327_t33 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p u.(λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_327_t32 p n u l x : l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_suc u)).
-
-(* constant 856 *)
-definition l_e_st_eq_landau_n_327_t34 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x) (l_e_st_eq_landau_n_327_t25 p n) (λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_lb p x.l_e_st_eq_landau_n_327_t33 p n x y) u : l_e_st_eq_landau_n_lb p u).
-
-(* constant 857 *)
-definition l_e_st_eq_landau_n_327_t35 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λu:l_e_st_eq_landau_n_nat.λup:p u.(l_e_st_eq_landau_n_satz10g (l_e_st_eq_landau_n_suc u) u (l_e_st_eq_landau_n_satz18b u) : l_not (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) u)).
-
-(* constant 858 *)
-definition l_e_st_eq_landau_n_327_t36 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λu:l_e_st_eq_landau_n_nat.λup:p u.(l_imp_th4 (p u) (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) u) up (l_e_st_eq_landau_n_327_t35 p s u up) : l_not (l_e_st_eq_landau_n_327_lbprop p (l_e_st_eq_landau_n_suc u) u)).
-
-(* constant 859 *)
-definition l_e_st_eq_landau_n_327_t37 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λu:l_e_st_eq_landau_n_nat.λup:p u.(l_all_th1 l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_327_lbprop p (l_e_st_eq_landau_n_suc u) x) u (l_e_st_eq_landau_n_327_t36 p s u up) : l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_suc u))).
-
-(* constant 860 *)
-definition l_e_st_eq_landau_n_327_t38 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λu:l_e_st_eq_landau_n_nat.λup:p u.(λy:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).l_mp (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_suc u)) l_con (l_e_st_eq_landau_n_327_t34 p y (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_327_t37 p s u up) : l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x)).
-
-(* constant 861 *)
-definition l_e_st_eq_landau_n_327_anders ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.(l_someapp l_e_st_eq_landau_n_nat p s (l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x)) (λx:l_e_st_eq_landau_n_nat.λy:p x.l_e_st_eq_landau_n_327_t38 p s x y) : l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x)).
-
-(* constant 862 *)
-definition l_e_st_eq_landau_n_327_t39 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_ande1 (l_e_st_eq_landau_n_lb p n) (p n) mn : l_e_st_eq_landau_n_lb p n).
-
-(* constant 863 *)
-definition l_e_st_eq_landau_n_327_t40 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_ande1 (l_e_st_eq_landau_n_lb p m) (p m) mm : l_e_st_eq_landau_n_lb p m).
-
-(* constant 864 *)
-definition l_e_st_eq_landau_n_327_t41 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_ande2 (l_e_st_eq_landau_n_lb p n) (p n) mn : p n).
-
-(* constant 865 *)
-definition l_e_st_eq_landau_n_327_t42 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_ande2 (l_e_st_eq_landau_n_lb p m) (p m) mm : p m).
-
-(* constant 866 *)
-definition l_e_st_eq_landau_n_327_t43 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_e_st_eq_landau_n_327_t39 p n m mn mm m : l_e_st_eq_landau_n_327_lbprop p n m).
-
-(* constant 867 *)
-definition l_e_st_eq_landau_n_327_t44 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_e_st_eq_landau_n_327_t40 p n m mn mm n : l_e_st_eq_landau_n_327_lbprop p m n).
-
-(* constant 868 *)
-definition l_e_st_eq_landau_n_327_t45 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_mp (p m) (l_e_st_eq_landau_n_lessis n m) (l_e_st_eq_landau_n_327_t42 p n m mn mm) (l_e_st_eq_landau_n_327_t43 p n m mn mm) : l_e_st_eq_landau_n_lessis n m).
-
-(* constant 869 *)
-definition l_e_st_eq_landau_n_327_t46 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_mp (p n) (l_e_st_eq_landau_n_lessis m n) (l_e_st_eq_landau_n_327_t41 p n m mn mm) (l_e_st_eq_landau_n_327_t44 p n m mn mm) : l_e_st_eq_landau_n_lessis m n).
-
-(* constant 870 *)
-definition l_e_st_eq_landau_n_327_t47 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_ore2 (l_e_st_eq_landau_n_more n m) (l_e_st_eq_landau_n_is n m) (l_e_st_eq_landau_n_satz14 m n (l_e_st_eq_landau_n_327_t46 p n m mn mm)) (l_e_st_eq_landau_n_satz10d n m (l_e_st_eq_landau_n_327_t45 p n m mn mm)) : l_e_st_eq_landau_n_is n m).
-
-(* constant 871 *)
-definition l_e_st_eq_landau_n_327_t48 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.(λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_min p x.λv:l_e_st_eq_landau_n_min p y.l_e_st_eq_landau_n_327_t47 p x y u v : l_e_amone l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x)).
-
-(* constant 872 *)
-definition l_e_st_eq_landau_n_satz27a ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.(l_e_onei l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x) (l_e_st_eq_landau_n_327_t48 p) (l_e_st_eq_landau_n_satz27 p s) : l_e_st_eq_landau_n_one (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x)).
-
-(* constant 873 *)
-definition l_e_st_eq_landau_n_428_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_all (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (f y) x)) : Prop).
-
-(* constant 874 *)
-definition l_e_st_eq_landau_n_428_prop2 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.(l_and (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x f) : Prop).
-
-(* constant 875 *)
-definition l_e_st_eq_landau_n_428_prop3 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is (a y) (b y) : Prop).
-
-(* constant 876 *)
-definition l_e_st_eq_landau_n_428_t1 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.(l_ande1 (l_e_st_eq_landau_n_is (a l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x a) pa : l_e_st_eq_landau_n_is (a l_e_st_eq_landau_n_1) x).
-
-(* constant 877 *)
-definition l_e_st_eq_landau_n_428_t2 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.(l_ande1 (l_e_st_eq_landau_n_is (b l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x b) pb : l_e_st_eq_landau_n_is (b l_e_st_eq_landau_n_1) x).
-
-(* constant 878 *)
-definition l_e_st_eq_landau_n_428_t3 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.(l_e_tris2 l_e_st_eq_landau_n_nat (a l_e_st_eq_landau_n_1) (b l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_428_t1 x a b pa pb) (l_e_st_eq_landau_n_428_t2 x a b pa pb) : l_e_st_eq_landau_n_428_prop3 x a b pa pb l_e_st_eq_landau_n_1).
-
-(* constant 879 *)
-definition l_e_st_eq_landau_n_428_t4 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop3 x a b pa pb y.(l_e_st_eq_landau_n_ispl1 (a y) (b y) x p : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (a y) x) (l_e_st_eq_landau_n_pl (b y) x)).
-
-(* constant 880 *)
-definition l_e_st_eq_landau_n_428_t5 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop3 x a b pa pb y.(l_ande2 (l_e_st_eq_landau_n_is (a l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x a) pa : l_e_st_eq_landau_n_428_prop1 x a).
-
-(* constant 881 *)
-definition l_e_st_eq_landau_n_428_t6 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop3 x a b pa pb y.(l_ande2 (l_e_st_eq_landau_n_is (b l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x b) pb : l_e_st_eq_landau_n_428_prop1 x b).
-
-(* constant 882 *)
-definition l_e_st_eq_landau_n_428_t7 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop3 x a b pa pb y.(l_e_st_eq_landau_n_428_t5 x a b pa pb y p y : l_e_st_eq_landau_n_is (a (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (a y) x)).
-
-(* constant 883 *)
-definition l_e_st_eq_landau_n_428_t8 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop3 x a b pa pb y.(l_e_st_eq_landau_n_428_t6 x a b pa pb y p y : l_e_st_eq_landau_n_is (b (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (b y) x)).
-
-(* constant 884 *)
-definition l_e_st_eq_landau_n_428_t9 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop3 x a b pa pb y.(l_e_tr3is l_e_st_eq_landau_n_nat (a (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (a y) x) (l_e_st_eq_landau_n_pl (b y) x) (b (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_428_t7 x a b pa pb y p) (l_e_st_eq_landau_n_428_t4 x a b pa pb y p) (l_e_symis l_e_st_eq_landau_n_nat (b (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (b y) x) (l_e_st_eq_landau_n_428_t8 x a b pa pb y p)) : l_e_st_eq_landau_n_428_prop3 x a b pa pb (l_e_st_eq_landau_n_suc y)).
-
-(* constant 885 *)
-definition l_e_st_eq_landau_n_428_t10 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop3 x a b pa pb z) (l_e_st_eq_landau_n_428_t3 x a b pa pb) (λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_428_prop3 x a b pa pb z.l_e_st_eq_landau_n_428_t9 x a b pa pb z u) y : l_e_st_eq_landau_n_428_prop3 x a b pa pb y).
-
-(* constant 886 *)
-definition l_e_st_eq_landau_n_428_t11 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.(l_e_fisi l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat a b (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_t10 x a b pa pb y) : l_e_is (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) a b).
-
-(* constant 887 *)
-definition l_e_st_eq_landau_n_428_a1 ≝ λx:l_e_st_eq_landau_n_nat.(λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λu:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_428_prop2 x z.λw:l_e_st_eq_landau_n_428_prop2 x u.l_e_st_eq_landau_n_428_t11 x z u v w : l_e_amone (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop2 x z)).
-
-(* constant 888 *)
-definition l_e_st_eq_landau_n_428_prop4 ≝ λx:l_e_st_eq_landau_n_nat.(l_some (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop2 x z) : Prop).
-
-(* constant 889 *)
-definition l_e_st_eq_landau_n_428_id ≝ (λy:l_e_st_eq_landau_n_nat.y : Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat).
-
-(* constant 890 *)
-definition l_e_st_eq_landau_n_428_t12 ≝ (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_satz4e x : l_e_st_eq_landau_n_428_prop1 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_428_id).
-
-(* constant 891 *)
-definition l_e_st_eq_landau_n_428_t13 ≝ (l_andi (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_428_id l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_428_prop1 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_428_id) (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_428_t12 : l_e_st_eq_landau_n_428_prop2 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_428_id).
-
-(* constant 892 *)
-definition l_e_st_eq_landau_n_428_t14 ≝ (l_somei (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop2 l_e_st_eq_landau_n_1 z) l_e_st_eq_landau_n_428_id l_e_st_eq_landau_n_428_t13 : l_e_st_eq_landau_n_428_prop4 l_e_st_eq_landau_n_1).
-
-(* constant 893 *)
-definition l_e_st_eq_landau_n_428_g ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.(λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_pl (f y) y : Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat).
-
-(* constant 894 *)
-definition l_e_st_eq_landau_n_428_t15 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.(l_ande1 (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x f) pf : l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) x).
-
-(* constant 895 *)
-definition l_e_st_eq_landau_n_428_t16 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_428_g x p f pf l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_ispl1 (f l_e_st_eq_landau_n_1) x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_428_t15 x p f pf)) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_428_g x p f pf l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)).
-
-(* constant 896 *)
-definition l_e_st_eq_landau_n_428_t17 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_ande2 (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x f) pf : l_e_st_eq_landau_n_428_prop1 x f).
-
-(* constant 897 *)
-definition l_e_st_eq_landau_n_428_t18 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_428_t17 x p f pf y y : l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (f y) x)).
-
-(* constant 898 *)
-definition l_e_st_eq_landau_n_428_t19 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_428_g x p f pf (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (f y) x) (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (f y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y))) (l_e_st_eq_landau_n_ispl1 (f (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (f y) x) (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_428_t18 x p f pf y)) (l_e_st_eq_landau_n_asspl1 (f y) x (l_e_st_eq_landau_n_suc y)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_428_g x p f pf (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (f y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)))).
-
-(* constant 899 *)
-definition l_e_st_eq_landau_n_428_t20 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_satz4b x y) (l_e_st_eq_landau_n_satz4h x y) (l_e_st_eq_landau_n_compl (l_e_st_eq_landau_n_suc x) y) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc x))).
-
-(* constant 900 *)
-definition l_e_st_eq_landau_n_428_t21 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_428_g x p f pf (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (f y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y))) (l_e_st_eq_landau_n_pl (f y) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc x))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_428_g x p f pf y) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_428_t19 x p f pf y) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc x)) (f y) (l_e_st_eq_landau_n_428_t20 x p f pf y)) (l_e_st_eq_landau_n_asspl2 (f y) y (l_e_st_eq_landau_n_suc x)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_428_g x p f pf (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_428_g x p f pf y) (l_e_st_eq_landau_n_suc x))).
-
-(* constant 901 *)
-definition l_e_st_eq_landau_n_428_t22 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.(λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_t21 x p f pf y : l_e_st_eq_landau_n_428_prop1 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_428_g x p f pf)).
-
-(* constant 902 *)
-definition l_e_st_eq_landau_n_428_t23 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.(l_andi (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_428_g x p f pf l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_428_prop1 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_428_g x p f pf)) (l_e_st_eq_landau_n_428_t16 x p f pf) (l_e_st_eq_landau_n_428_t22 x p f pf) : l_e_st_eq_landau_n_428_prop2 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_428_g x p f pf)).
-
-(* constant 903 *)
-definition l_e_st_eq_landau_n_428_t24 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.(l_somei (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop2 (l_e_st_eq_landau_n_suc x) z) (l_e_st_eq_landau_n_428_g x p f pf) (l_e_st_eq_landau_n_428_t23 x p f pf) : l_e_st_eq_landau_n_428_prop4 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 904 *)
-definition l_e_st_eq_landau_n_428_t25 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.(l_someapp (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop2 x z) p (l_e_st_eq_landau_n_428_prop4 (l_e_st_eq_landau_n_suc x)) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_428_prop2 x z.l_e_st_eq_landau_n_428_t24 x p z u) : l_e_st_eq_landau_n_428_prop4 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 905 *)
-definition l_e_st_eq_landau_n_428_b1 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop4 y) l_e_st_eq_landau_n_428_t14 (λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_428_prop4 y.l_e_st_eq_landau_n_428_t25 y u) x : l_e_st_eq_landau_n_428_prop4 x).
-
-(* constant 906 *)
-definition l_e_st_eq_landau_n_satz28 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_onei (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop2 x z) (l_e_st_eq_landau_n_428_a1 x) (l_e_st_eq_landau_n_428_b1 x) : l_e_one (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_is (z l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_all (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is (z (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (z y) x))))).
-
-(* constant 907 *)
-definition l_e_st_eq_landau_n_times ≝ λx:l_e_st_eq_landau_n_nat.(l_e_ind (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop2 x z) (l_e_st_eq_landau_n_satz28 x) : Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat).
-
-(* constant 908 *)
-definition l_e_st_eq_landau_n_ts ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_times x y : l_e_st_eq_landau_n_nat).
-
-(* constant 909 *)
-definition l_e_st_eq_landau_n_428_t26 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_oneax (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop2 x z) (l_e_st_eq_landau_n_satz28 x) : l_e_st_eq_landau_n_428_prop2 x (l_e_st_eq_landau_n_times x)).
-
-(* constant 910 *)
-definition l_e_st_eq_landau_n_satz28a ≝ λx:l_e_st_eq_landau_n_nat.(l_ande1 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_times x l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x (l_e_st_eq_landau_n_times x)) (l_e_st_eq_landau_n_428_t26 x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x l_e_st_eq_landau_n_1) x).
-
-(* constant 911 *)
-definition l_e_st_eq_landau_n_428_t27 ≝ λx:l_e_st_eq_landau_n_nat.(l_ande2 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_times x l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x (l_e_st_eq_landau_n_times x)) (l_e_st_eq_landau_n_428_t26 x) : l_e_st_eq_landau_n_428_prop1 x (l_e_st_eq_landau_n_times x)).
-
-(* constant 912 *)
-definition l_e_st_eq_landau_n_satz28b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_428_t27 x y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) x)).
-
-(* constant 913 *)
-definition l_e_st_eq_landau_n_428_t28 ≝ (l_e_st_eq_landau_n_428_t11 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_times l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_428_id (l_e_st_eq_landau_n_428_t26 l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_428_t13 : l_e_is (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (l_e_st_eq_landau_n_times l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_428_id).
-
-(* constant 914 *)
-definition l_e_st_eq_landau_n_satz28c ≝ λx:l_e_st_eq_landau_n_nat.(l_e_fise l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_times l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_428_id l_e_st_eq_landau_n_428_t28 x : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 x) x).
-
-(* constant 915 *)
-definition l_e_st_eq_landau_n_428_t29 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_428_t11 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_times (l_e_st_eq_landau_n_suc x)) (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_times x y) y) (l_e_st_eq_landau_n_428_t26 (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_428_t23 x (l_e_st_eq_landau_n_428_b1 x) (l_e_st_eq_landau_n_times x) (l_e_st_eq_landau_n_428_t26 x)) : l_e_is (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (l_e_st_eq_landau_n_times (l_e_st_eq_landau_n_suc x)) (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_times x y) y)).
-
-(* constant 916 *)
-definition l_e_st_eq_landau_n_satz28d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_fise l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_times (l_e_st_eq_landau_n_suc x)) (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_times x z) z) (l_e_st_eq_landau_n_428_t29 x) y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) y)).
-
-(* constant 917 *)
-definition l_e_st_eq_landau_n_satz28e ≝ λx:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_satz28a x) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_ts x l_e_st_eq_landau_n_1)).
-
-(* constant 918 *)
-definition l_e_st_eq_landau_n_satz28f ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) x) (l_e_st_eq_landau_n_satz28b x y) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) x) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_suc y))).
-
-(* constant 919 *)
-definition l_e_st_eq_landau_n_satz28g ≝ λx:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 x) x (l_e_st_eq_landau_n_satz28c x) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 x)).
-
-(* constant 920 *)
-definition l_e_st_eq_landau_n_satz28h ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) y) (l_e_st_eq_landau_n_satz28d x y) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) y) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc x) y)).
-
-(* constant 921 *)
-definition l_e_st_eq_landau_n_ists1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_ts u z) x y i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 922 *)
-definition l_e_st_eq_landau_n_ists2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_ts z u) x y i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts z y)).
-
-(* constant 923 *)
-definition l_e_st_eq_landau_n_ists12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ists1 x y z i) (l_e_st_eq_landau_n_ists2 z u y j) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 924 *)
-definition l_e_st_eq_landau_n_429_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts y x) : Prop).
-
-(* constant 925 *)
-definition l_e_st_eq_landau_n_429_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz28a y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts y l_e_st_eq_landau_n_1) y).
-
-(* constant 926 *)
-definition l_e_st_eq_landau_n_429_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz28c y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 y) y).
-
-(* constant 927 *)
-definition l_e_st_eq_landau_n_429_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tris2 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 y) (l_e_st_eq_landau_n_ts y l_e_st_eq_landau_n_1) y (l_e_st_eq_landau_n_429_t2 x y) (l_e_st_eq_landau_n_429_t1 x y) : l_e_st_eq_landau_n_429_prop1 l_e_st_eq_landau_n_1 y).
-
-(* constant 928 *)
-definition l_e_st_eq_landau_n_429_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_429_prop1 x y.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts y x) y) (l_e_st_eq_landau_n_ts y (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts y x) y p) (l_e_st_eq_landau_n_satz28f y x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) y) (l_e_st_eq_landau_n_ts y (l_e_st_eq_landau_n_suc x))).
-
-(* constant 929 *)
-definition l_e_st_eq_landau_n_429_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_429_prop1 x y.(l_e_st_eq_landau_n_satz28d x y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) y)).
-
-(* constant 930 *)
-definition l_e_st_eq_landau_n_429_t6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_429_prop1 x y.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) y) (l_e_st_eq_landau_n_ts y (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_429_t5 x y p) (l_e_st_eq_landau_n_429_t4 x y p) : l_e_st_eq_landau_n_429_prop1 (l_e_st_eq_landau_n_suc x) y).
-
-(* constant 931 *)
-definition l_e_st_eq_landau_n_satz29 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_429_prop1 z y) (l_e_st_eq_landau_n_429_t3 x y) (λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_429_prop1 z y.l_e_st_eq_landau_n_429_t6 z y u) x : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts y x)).
-
-(* constant 932 *)
-definition l_e_st_eq_landau_n_comts ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz29 x y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts y x)).
-
-(* constant 933 *)
-definition l_e_st_eq_landau_n_429_t7 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 x) (l_e_st_eq_landau_n_satz28a x) (l_e_st_eq_landau_n_satz28g x) : l_e_st_eq_landau_n_429_prop1 x l_e_st_eq_landau_n_1).
-
-(* constant 934 *)
-definition l_e_st_eq_landau_n_429_t8 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_429_prop1 x y.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts y x) x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc y) x) (l_e_st_eq_landau_n_satz28b x y) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts y x) x p) (l_e_st_eq_landau_n_satz28h y x) : l_e_st_eq_landau_n_429_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 935 *)
-definition l_e_st_eq_landau_n_429_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_429_prop1 x z) (l_e_st_eq_landau_n_429_t7 x) (λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_429_prop1 x z.l_e_st_eq_landau_n_429_t8 x z u) y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts y x)).
-
-(* constant 936 *)
-definition l_e_st_eq_landau_n_430_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z)) : Prop).
-
-(* constant 937 *)
-definition l_e_st_eq_landau_n_430_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc y) x (l_e_st_eq_landau_n_satz4a y)) (l_e_st_eq_landau_n_satz28b x y) (l_e_st_eq_landau_n_ispl2 x (l_e_st_eq_landau_n_ts x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_satz28e x)) : l_e_st_eq_landau_n_430_prop1 x y l_e_st_eq_landau_n_1).
-
-(* constant 938 *)
-definition l_e_st_eq_landau_n_430_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_430_prop1 x y z.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc z))) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl y z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y z)) x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z)) x) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc z)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl y z)) x (l_e_st_eq_landau_n_satz4b y z)) (l_e_st_eq_landau_n_satz28b x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z)) x p) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z)) x)).
-
-(* constant 939 *)
-definition l_e_st_eq_landau_n_430_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_430_prop1 x y z.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z)) x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x z) x)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_suc z))) (l_e_st_eq_landau_n_430_t2 x y z p) (l_e_st_eq_landau_n_asspl1 (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z) x) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x z) x) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_suc z)) (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_satz28f x z)) : l_e_st_eq_landau_n_430_prop1 x y (l_e_st_eq_landau_n_suc z)).
-
-(* constant 940 *)
-definition l_e_st_eq_landau_n_satz30 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_430_prop1 x y u) (l_e_st_eq_landau_n_430_t1 x y) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_430_prop1 x y u.l_e_st_eq_landau_n_430_t3 x y u v) z : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z))).
-
-(* constant 941 *)
-definition l_e_st_eq_landau_n_disttp1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_ts z (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts z y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_satz30 z x y) (l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts z y) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_comts z x) (l_e_st_eq_landau_n_comts z y)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z))).
-
-(* constant 942 *)
-definition l_e_st_eq_landau_n_disttp2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz30 x y z : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z))).
-
-(* constant 943 *)
-definition l_e_st_eq_landau_n_distpt1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_disttp1 x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl x y) z)).
-
-(* constant 944 *)
-definition l_e_st_eq_landau_n_distpt2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z)) (l_e_st_eq_landau_n_disttp2 x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z)) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y z))).
-
-(* constant 945 *)
-definition l_e_st_eq_landau_n_431_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) z) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y z)) : Prop).
-
-(* constant 946 *)
-definition l_e_st_eq_landau_n_431_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_satz28a (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_ists2 y (l_e_st_eq_landau_n_ts y l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_satz28e y)) : l_e_st_eq_landau_n_431_prop1 x y l_e_st_eq_landau_n_1).
-
-(* constant 947 *)
-definition l_e_st_eq_landau_n_431_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_431_prop1 x y z.(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_suc z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) z) (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts y z) y)) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y (l_e_st_eq_landau_n_suc z))) (l_e_st_eq_landau_n_satz28b (l_e_st_eq_landau_n_ts x y) z) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) z) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_ts x y) p) (l_e_st_eq_landau_n_distpt2 x (l_e_st_eq_landau_n_ts y z) y) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts y z) y) (l_e_st_eq_landau_n_ts y (l_e_st_eq_landau_n_suc z)) x (l_e_st_eq_landau_n_satz28f y z)) : l_e_st_eq_landau_n_431_prop1 x y (l_e_st_eq_landau_n_suc z)).
-
-(* constant 948 *)
-definition l_e_st_eq_landau_n_satz31 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_431_prop1 x y u) (l_e_st_eq_landau_n_431_t1 x y) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_431_prop1 x y u.l_e_st_eq_landau_n_431_t2 x y u v) z : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) z) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y z))).
-
-(* constant 949 *)
-definition l_e_st_eq_landau_n_assts1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz31 x y z : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) z) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y z))).
-
-(* constant 950 *)
-definition l_e_st_eq_landau_n_assts2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) z) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_assts1 x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) z)).
-
-(* constant 951 *)
-definition l_e_st_eq_landau_n_432_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl y u) z) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts u z)) (l_e_st_eq_landau_n_ists1 x (l_e_st_eq_landau_n_pl y u) z du) (l_e_st_eq_landau_n_disttp1 y u z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts u z))).
-
-(* constant 952 *)
-definition l_e_st_eq_landau_n_432_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.(l_somei l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z) v) (l_e_st_eq_landau_n_ts u z) (l_e_st_eq_landau_n_432_t1 x y z m u du) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 953 *)
-definition l_e_st_eq_landau_n_satz32a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u) m (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_diffprop x y u.l_e_st_eq_landau_n_432_t2 x y z m u v) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 954 *)
-definition l_e_st_eq_landau_n_satz32b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_ists1 x y z i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 955 *)
-definition l_e_st_eq_landau_n_satz32c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_satz11 (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_satz32a y x z (l_e_st_eq_landau_n_satz12 x y l)) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 956 *)
-definition l_e_st_eq_landau_n_432_anders1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_satz32a y x z l : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 957 *)
-definition l_e_st_eq_landau_n_satz32d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts z y) (l_e_st_eq_landau_n_comts x z) (l_e_st_eq_landau_n_comts y z) (l_e_st_eq_landau_n_satz32a x y z m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts z y)).
-
-(* constant 958 *)
-definition l_e_st_eq_landau_n_satz32e ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_ists2 x y z i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts z y)).
-
-(* constant 959 *)
-definition l_e_st_eq_landau_n_satz32f ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts z y) (l_e_st_eq_landau_n_comts x z) (l_e_st_eq_landau_n_comts y z) (l_e_st_eq_landau_n_satz32c x y z l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts z y)).
-
-(* constant 960 *)
-definition l_e_st_eq_landau_n_432_anders2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_satz32d y x z l : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts z y)).
-
-(* constant 961 *)
-definition l_e_st_eq_landau_n_satz32g ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λm:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_ismore2 (l_e_st_eq_landau_n_ts x u) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ists1 x y u i) (l_e_st_eq_landau_n_satz32d z u x m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 962 *)
-definition l_e_st_eq_landau_n_satz32h ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λm:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ts u y) (l_e_st_eq_landau_n_comts x z) (l_e_st_eq_landau_n_comts y u) (l_e_st_eq_landau_n_satz32g x y z u i m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts u y)).
-
-(* constant 963 *)
-definition l_e_st_eq_landau_n_satz32j ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λl:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_isless2 (l_e_st_eq_landau_n_ts x u) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ists1 x y u i) (l_e_st_eq_landau_n_satz32f z u x l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 964 *)
-definition l_e_st_eq_landau_n_satz32k ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λl:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ts u y) (l_e_st_eq_landau_n_comts x z) (l_e_st_eq_landau_n_comts y u) (l_e_st_eq_landau_n_satz32j x y z u i l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts u y)).
-
-(* constant 965 *)
-definition l_e_st_eq_landau_n_432_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_moreisi1 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_satz32a x y z n) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 966 *)
-definition l_e_st_eq_landau_n_432_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_moreisi2 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ists1 x y z i) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 967 *)
-definition l_e_st_eq_landau_n_satz32l ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.(l_orapp (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) m (λu:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_432_t3 x y z m u) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_432_t4 x y z m u) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 968 *)
-definition l_e_st_eq_landau_n_satz32m ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.(l_e_st_eq_landau_n_ismoreis12 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts z y) (l_e_st_eq_landau_n_comts x z) (l_e_st_eq_landau_n_comts y z) (l_e_st_eq_landau_n_satz32l x y z m) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts z y)).
-
-(* constant 969 *)
-definition l_e_st_eq_landau_n_satz32n ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.(l_e_st_eq_landau_n_satz13 (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_satz32l y x z (l_e_st_eq_landau_n_satz14 x y l)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 970 *)
-definition l_e_st_eq_landau_n_satz32o ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.(l_e_st_eq_landau_n_satz13 (l_e_st_eq_landau_n_ts z y) (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_satz32m y x z (l_e_st_eq_landau_n_satz14 x y l)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts z y)).
-
-(* constant 971 *)
-definition l_e_st_eq_landau_n_433_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz10a x y : l_or3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y)).
-
-(* constant 972 *)
-definition l_e_st_eq_landau_n_433_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z) : l_ec3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z))).
-
-(* constant 973 *)
-definition l_e_st_eq_landau_n_satz33a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z).(l_ec3_th11 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_433_t1 x y z) (l_e_st_eq_landau_n_433_t2 x y z) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_satz32b x y z u) (λu:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz32a x y z u) (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_satz32c x y z u) m : l_e_st_eq_landau_n_more x y).
-
-(* constant 974 *)
-definition l_e_st_eq_landau_n_satz33b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z).(l_ec3_th10 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_433_t1 x y z) (l_e_st_eq_landau_n_433_t2 x y z) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_satz32b x y z u) (λu:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz32a x y z u) (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_satz32c x y z u) i : l_e_st_eq_landau_n_is x y).
-
-(* constant 975 *)
-definition l_e_st_eq_landau_n_satz33c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z).(l_ec3_th12 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_433_t1 x y z) (l_e_st_eq_landau_n_433_t2 x y z) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_satz32b x y z u) (λu:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz32a x y z u) (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_satz32c x y z u) l : l_e_st_eq_landau_n_less x y).
-
-(* constant 976 *)
-definition l_e_st_eq_landau_n_433_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z).(l_e_st_eq_landau_n_satz33a y x z l : l_e_st_eq_landau_n_less x y).
-
-(* constant 977 *)
-definition l_e_st_eq_landau_n_434_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_satz32a x y z m : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 978 *)
-definition l_e_st_eq_landau_n_434_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts z y) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts u y) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_comts z y) (l_e_st_eq_landau_n_comts u y) (l_e_st_eq_landau_n_satz32a z u y n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 979 *)
-definition l_e_st_eq_landau_n_satz34 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_trmore (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_434_t1 x y z u m n) (l_e_st_eq_landau_n_434_t2 x y z u m n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 980 *)
-definition l_e_st_eq_landau_n_434_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_trmore (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_satz32a x y z m) (l_e_st_eq_landau_n_satz32d z u y n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 981 *)
-definition l_e_st_eq_landau_n_satz34a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_satz34 y x u z l k : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 982 *)
-definition l_e_st_eq_landau_n_434_andersa ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_satz11 (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_satz34 y x u z (l_e_st_eq_landau_n_satz12 x y l) (l_e_st_eq_landau_n_satz12 z u k)) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 983 *)
-definition l_e_st_eq_landau_n_satz35a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_more z u.(l_orapp (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)) m (λv:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz34 x y z u v n) (λv:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_satz32g x y z u v n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 984 *)
-definition l_e_st_eq_landau_n_satz35b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_moreis z u.(l_orapp (l_e_st_eq_landau_n_more z u) (l_e_st_eq_landau_n_is z u) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)) n (λv:l_e_st_eq_landau_n_more z u.l_e_st_eq_landau_n_satz34 x y z u m v) (λv:l_e_st_eq_landau_n_is z u.l_e_st_eq_landau_n_satz32h z u x y v m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 985 *)
-definition l_e_st_eq_landau_n_satz35c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_satz35a y x u z (l_e_st_eq_landau_n_satz14 x y l) k : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 986 *)
-definition l_e_st_eq_landau_n_satz35d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_lessis z u.(l_e_st_eq_landau_n_satz35b y x u z l (l_e_st_eq_landau_n_satz14 z u k) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 987 *)
-definition l_e_st_eq_landau_n_436_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.(l_e_st_eq_landau_n_moreisi2 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u) (l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ists1 x y z i) (l_e_st_eq_landau_n_ists2 z u y j)) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 988 *)
-definition l_e_st_eq_landau_n_436_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λi:l_e_st_eq_landau_n_is x y.λo:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_moreisi1 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_satz35a x y z u m o) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 989 *)
-definition l_e_st_eq_landau_n_436_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λi:l_e_st_eq_landau_n_is x y.(l_orapp (l_e_st_eq_landau_n_more z u) (l_e_st_eq_landau_n_is z u) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)) n (λv:l_e_st_eq_landau_n_more z u.l_e_st_eq_landau_n_436_t2 x y z u m n i v) (λv:l_e_st_eq_landau_n_is z u.l_e_st_eq_landau_n_436_t1 x y z u m n i v) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 990 *)
-definition l_e_st_eq_landau_n_436_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λo:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_moreisi1 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_satz35b x y z u o n) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 991 *)
-definition l_e_st_eq_landau_n_satz36 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.(l_orapp (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)) m (λv:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_436_t4 x y z u m n v) (λv:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_436_t3 x y z u m n v) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 992 *)
-definition l_e_st_eq_landau_n_436_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λo:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_moreisi1 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_satz35b x y z u o n) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 993 *)
-definition l_e_st_eq_landau_n_436_t6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_ismoreis2 (l_e_st_eq_landau_n_ts x u) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ists1 x y u i) (l_e_st_eq_landau_n_satz32m z u x n) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 994 *)
-definition l_e_st_eq_landau_n_436_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.(l_orapp (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)) m (λv:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_436_t5 x y z u m n v) (λv:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_436_t6 x y z u m n v) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 995 *)
-definition l_e_st_eq_landau_n_satz36a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis z u.(l_e_st_eq_landau_n_satz13 (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_satz36 y x u z (l_e_st_eq_landau_n_satz14 x y l) (l_e_st_eq_landau_n_satz14 z u k)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 996 *)
-definition l_e_st_eq_landau_n_mn_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_onei l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y z) (l_e_st_eq_landau_n_satz8b x y) m : l_e_st_eq_landau_n_one (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y z)).
-
-(* constant 997 *)
-definition l_e_st_eq_landau_n_mn ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_ind l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y z) (l_e_st_eq_landau_n_mn_t1 x y m) : l_e_st_eq_landau_n_nat).
-
-(* constant 998 *)
-definition l_e_st_eq_landau_n_mn_th1a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_oneax l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y z) (l_e_st_eq_landau_n_mn_t1 x y m) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_mn x y m))).
-
-(* constant 999 *)
-definition l_e_st_eq_landau_n_mn_th1b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_symis l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_mn x y m)) (l_e_st_eq_landau_n_mn_th1a x y m) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_mn x y m)) x).
-
-(* constant 1000 *)
-definition l_e_st_eq_landau_n_mn_th1c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_tris l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_mn x y m)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_mn x y m) y) (l_e_st_eq_landau_n_mn_th1a x y m) (l_e_st_eq_landau_n_compl y (l_e_st_eq_landau_n_mn x y m)) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_mn x y m) y)).
-
-(* constant 1001 *)
-definition l_e_st_eq_landau_n_mn_th1d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_symis l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_mn x y m) y) (l_e_st_eq_landau_n_mn_th1c x y m) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_mn x y m) y) x).
-
-(* constant 1002 *)
-definition l_e_st_eq_landau_n_mn_th1e ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl y z) x.(l_e_st_eq_landau_n_satz8b x y z (l_e_st_eq_landau_n_mn x y m) (l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl y z) x i) (l_e_st_eq_landau_n_mn_th1a x y m) : l_e_st_eq_landau_n_is z (l_e_st_eq_landau_n_mn x y m)).
-
-(* constant 1003 *)
-definition l_e_st_eq_landau_n_mn_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x z.λn:l_e_st_eq_landau_n_more y u.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl u (l_e_st_eq_landau_n_mn x z m)) (l_e_st_eq_landau_n_pl z (l_e_st_eq_landau_n_mn x z m)) x y (l_e_st_eq_landau_n_ispl1 u z (l_e_st_eq_landau_n_mn x z m) (l_e_symis l_e_st_eq_landau_n_nat z u j)) (l_e_st_eq_landau_n_mn_th1b x z m) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl u (l_e_st_eq_landau_n_mn x z m)) y).
-
-(* constant 1004 *)
-definition l_e_st_eq_landau_n_ismn12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x z.λn:l_e_st_eq_landau_n_more y u.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.(l_e_st_eq_landau_n_mn_th1e y u (l_e_st_eq_landau_n_mn x z m) n (l_e_st_eq_landau_n_mn_t2 x y z u m n i j) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_mn x z m) (l_e_st_eq_landau_n_mn y u n)).
-
-(* constant 1005 *)
-definition l_e_st_eq_landau_n_1to ≝ λn:l_e_st_eq_landau_n_nat.(l_e_ot l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis x n) : Type[0]).
-
-(* constant 1006 *)
-definition l_e_st_eq_landau_n_outn ≝ λn:l_e_st_eq_landau_n_nat.λx:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x n.(l_e_out l_e_st_eq_landau_n_nat (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis y n) x l : l_e_st_eq_landau_n_1to n).
-
-(* constant 1007 *)
-definition l_e_st_eq_landau_n_inn ≝ λn:l_e_st_eq_landau_n_nat.λxn:l_e_st_eq_landau_n_1to n.(l_e_in l_e_st_eq_landau_n_nat (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis y n) xn : l_e_st_eq_landau_n_nat).
-
-(* constant 1008 *)
-definition l_e_st_eq_landau_n_1top ≝ λn:l_e_st_eq_landau_n_nat.λxn:l_e_st_eq_landau_n_1to n.(l_e_inp l_e_st_eq_landau_n_nat (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis y n) xn : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_inn n xn) n).
-
-(* constant 1009 *)
-definition l_e_st_eq_landau_n_isoutni ≝ λn:l_e_st_eq_landau_n_nat.λx:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x n.λy:l_e_st_eq_landau_n_nat.λk:l_e_st_eq_landau_n_lessis y n.λi:l_e_st_eq_landau_n_is x y.(l_e_isouti l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis z n) x l y k i : l_e_is (l_e_st_eq_landau_n_1to n) (l_e_st_eq_landau_n_outn n x l) (l_e_st_eq_landau_n_outn n y k)).
-
-(* constant 1010 *)
-definition l_e_st_eq_landau_n_isoutne ≝ λn:l_e_st_eq_landau_n_nat.λx:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x n.λy:l_e_st_eq_landau_n_nat.λk:l_e_st_eq_landau_n_lessis y n.λi:l_e_is (l_e_st_eq_landau_n_1to n) (l_e_st_eq_landau_n_outn n x l) (l_e_st_eq_landau_n_outn n y k).(l_e_isoute l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis z n) x l y k i : l_e_st_eq_landau_n_is x y).
-
-(* constant 1011 *)
-definition l_e_st_eq_landau_n_isinni ≝ λn:l_e_st_eq_landau_n_nat.λxn:l_e_st_eq_landau_n_1to n.λyn:l_e_st_eq_landau_n_1to n.λi:l_e_is (l_e_st_eq_landau_n_1to n) xn yn.(l_e_isini l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis z n) xn yn i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_inn n xn) (l_e_st_eq_landau_n_inn n yn)).
-
-(* constant 1012 *)
-definition l_e_st_eq_landau_n_isinne ≝ λn:l_e_st_eq_landau_n_nat.λxn:l_e_st_eq_landau_n_1to n.λyn:l_e_st_eq_landau_n_1to n.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_inn n xn) (l_e_st_eq_landau_n_inn n yn).(l_e_isine l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis z n) xn yn i : l_e_is (l_e_st_eq_landau_n_1to n) xn yn).
-
-(* constant 1013 *)
-definition l_e_st_eq_landau_n_isoutinn ≝ λn:l_e_st_eq_landau_n_nat.λxn:l_e_st_eq_landau_n_1to n.(l_e_isoutin l_e_st_eq_landau_n_nat (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis y n) xn : l_e_is (l_e_st_eq_landau_n_1to n) xn (l_e_st_eq_landau_n_outn n (l_e_st_eq_landau_n_inn n xn) (l_e_st_eq_landau_n_1top n xn))).
-
-(* constant 1014 *)
-definition l_e_st_eq_landau_n_isinoutn ≝ λn:l_e_st_eq_landau_n_nat.λx:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x n.(l_e_isinout l_e_st_eq_landau_n_nat (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis y n) x l : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_inn n (l_e_st_eq_landau_n_outn n x l))).
-
-(* constant 1015 *)
-definition l_e_st_eq_landau_n_1o ≝ (l_e_st_eq_landau_n_outn l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_lessisi2 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1)) : l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1).
-
-(* constant 1016 *)
-definition l_e_st_eq_landau_n_singlet_u0 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_inn l_e_st_eq_landau_n_1 u : l_e_st_eq_landau_n_nat).
-
-(* constant 1017 *)
-definition l_e_st_eq_landau_n_singlet_t1 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_1top l_e_st_eq_landau_n_1 u : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_singlet_u0 u) l_e_st_eq_landau_n_1).
-
-(* constant 1018 *)
-definition l_e_st_eq_landau_n_singlet_t2 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.(l_ore2 (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_singlet_u0 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_singlet_u0 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz24 (l_e_st_eq_landau_n_singlet_u0 u)) (l_e_st_eq_landau_n_satz10d (l_e_st_eq_landau_n_singlet_u0 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_singlet_t1 u)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_singlet_u0 u) l_e_st_eq_landau_n_1).
-
-(* constant 1019 *)
-definition l_e_st_eq_landau_n_singlet_th1 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.(l_e_tris (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) u (l_e_st_eq_landau_n_outn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_singlet_u0 u) (l_e_st_eq_landau_n_singlet_t1 u)) l_e_st_eq_landau_n_1o (l_e_st_eq_landau_n_isoutinn l_e_st_eq_landau_n_1 u) (l_e_st_eq_landau_n_isoutni l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_singlet_u0 u) (l_e_st_eq_landau_n_singlet_t1 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_lessisi2 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_singlet_t2 u)) : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) u l_e_st_eq_landau_n_1o).
-
-(* constant 1020 *)
-definition l_e_st_eq_landau_n_2 ≝ (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat).
-
-(* constant 1021 *)
-definition l_e_st_eq_landau_n_pair_t1 ≝ λx:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x l_e_st_eq_landau_n_2.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_2.(l_e_st_eq_landau_n_satz26 l_e_st_eq_landau_n_1 x (l_ore1 (l_e_st_eq_landau_n_less x l_e_st_eq_landau_n_2) (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_2) l n) : l_e_st_eq_landau_n_lessis x l_e_st_eq_landau_n_1).
-
-(* constant 1022 *)
-definition l_e_st_eq_landau_n_pair_t2 ≝ λx:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x l_e_st_eq_landau_n_2.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_2.(l_ore2 (l_e_st_eq_landau_n_more x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz24 x) (l_e_st_eq_landau_n_satz10d x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_pair_t1 x l n)) : l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1).
-
-(* constant 1023 *)
-definition l_e_st_eq_landau_n_pair_th1 ≝ λx:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x l_e_st_eq_landau_n_2.(l_or_th2 (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_2) (λt:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_pair_t2 x l t) : l_or (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_2)).
-
-(* constant 1024 *)
-definition l_e_st_eq_landau_n_pair_th2 ≝ (l_e_notis_th1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_ax3 l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz4e l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_nis l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1).
-
-(* constant 1025 *)
-definition l_e_st_eq_landau_n_1t ≝ (l_e_st_eq_landau_n_outn l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a l_e_st_eq_landau_n_2) : l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2).
-
-(* constant 1026 *)
-definition l_e_st_eq_landau_n_2t ≝ (l_e_st_eq_landau_n_outn l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_lessisi2 l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_2 (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_2)) : l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2).
-
-(* constant 1027 *)
-definition l_e_st_eq_landau_n_pair_u0 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.(l_e_st_eq_landau_n_inn l_e_st_eq_landau_n_2 u : l_e_st_eq_landau_n_nat).
-
-(* constant 1028 *)
-definition l_e_st_eq_landau_n_pair_t3 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.(l_e_st_eq_landau_n_1top l_e_st_eq_landau_n_2 u : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_2).
-
-(* constant 1029 *)
-definition l_e_st_eq_landau_n_pair_t4 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isoutni l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_pair_u0 u) (l_e_st_eq_landau_n_pair_t3 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a l_e_st_eq_landau_n_2) i : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) (l_e_st_eq_landau_n_outn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_pair_u0 u) (l_e_st_eq_landau_n_pair_t3 u)) l_e_st_eq_landau_n_1t).
-
-(* constant 1030 *)
-definition l_e_st_eq_landau_n_pair_t5 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_1.(l_e_tris (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u (l_e_st_eq_landau_n_outn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_pair_u0 u) (l_e_st_eq_landau_n_pair_t3 u)) l_e_st_eq_landau_n_1t (l_e_st_eq_landau_n_isoutinn l_e_st_eq_landau_n_2 u) (l_e_st_eq_landau_n_pair_t4 u i) : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_1t).
-
-(* constant 1031 *)
-definition l_e_st_eq_landau_n_pair_t6 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_2.(l_e_st_eq_landau_n_isoutni l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_pair_u0 u) (l_e_st_eq_landau_n_pair_t3 u) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_lessisi2 l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_2 (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_2)) i : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) (l_e_st_eq_landau_n_outn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_pair_u0 u) (l_e_st_eq_landau_n_pair_t3 u)) l_e_st_eq_landau_n_2t).
-
-(* constant 1032 *)
-definition l_e_st_eq_landau_n_pair_t7 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_2.(l_e_tris (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u (l_e_st_eq_landau_n_outn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_pair_u0 u) (l_e_st_eq_landau_n_pair_t3 u)) l_e_st_eq_landau_n_2t (l_e_st_eq_landau_n_isoutinn l_e_st_eq_landau_n_2 u) (l_e_st_eq_landau_n_pair_t6 u i) : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_2t).
-
-(* constant 1033 *)
-definition l_e_st_eq_landau_n_pair_th3 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.(l_or_th9 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_2) (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_1t) (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_2t) (l_e_st_eq_landau_n_pair_th1 (l_e_st_eq_landau_n_pair_u0 u) (l_e_st_eq_landau_n_pair_t3 u)) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_pair_t5 u t) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_pair_t7 u t) : l_or (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_1t) (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_2t)).
-
-(* constant 1034 *)
-definition l_e_st_eq_landau_n_pair_t9 ≝ λi:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_2t l_e_st_eq_landau_n_1t.(l_e_isini l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis x l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_2t l_e_st_eq_landau_n_1t i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 l_e_st_eq_landau_n_2t) (l_e_st_eq_landau_n_pair_u0 l_e_st_eq_landau_n_1t)).
-
-(* constant 1035 *)
-definition l_e_st_eq_landau_n_pair_t10 ≝ λi:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_2t l_e_st_eq_landau_n_1t.(l_e_tr3is l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_pair_u0 l_e_st_eq_landau_n_2t) (l_e_st_eq_landau_n_pair_u0 l_e_st_eq_landau_n_1t) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_isinoutn l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_lessisi2 l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_2 (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_2))) (l_e_st_eq_landau_n_pair_t9 i) (l_e_symis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_pair_u0 l_e_st_eq_landau_n_1t) (l_e_st_eq_landau_n_isinoutn l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a l_e_st_eq_landau_n_2))) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1).
-
-(* constant 1036 *)
-definition l_e_st_eq_landau_n_pair_th4 ≝ (l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_2t l_e_st_eq_landau_n_1t) (l_e_st_eq_landau_n_is l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_pair_th2 (λt:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_2t l_e_st_eq_landau_n_1t.l_e_st_eq_landau_n_pair_t10 t) : l_not (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_2t l_e_st_eq_landau_n_1t)).
-
-(* constant 1037 *)
-definition l_e_st_eq_landau_n_pair1type ≝ λalpha:Type[0].(Πx:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.alpha : Type[0]).
-
-(* constant 1038 *)
-definition l_e_st_eq_landau_n_pair1 ≝ λalpha:Type[0].λa:alpha.λb:alpha.(λx:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_ite (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) x l_e_st_eq_landau_n_1t) alpha a b : l_e_st_eq_landau_n_pair1type alpha).
-
-(* constant 1039 *)
-definition l_e_st_eq_landau_n_first1 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.(p l_e_st_eq_landau_n_1t : alpha).
-
-(* constant 1040 *)
-definition l_e_st_eq_landau_n_second1 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.(p l_e_st_eq_landau_n_2t : alpha).
-
-(* constant 1041 *)
-definition l_e_st_eq_landau_n_first1is1 ≝ λalpha:Type[0].λa:alpha.λb:alpha.(l_e_itet (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_1t l_e_st_eq_landau_n_1t) alpha a b (l_e_refis (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_1t) : l_e_is alpha (l_e_st_eq_landau_n_first1 alpha (l_e_st_eq_landau_n_pair1 alpha a b)) a).
-
-(* constant 1042 *)
-definition l_e_st_eq_landau_n_first1is2 ≝ λalpha:Type[0].λa:alpha.λb:alpha.(l_e_symis alpha (l_e_st_eq_landau_n_first1 alpha (l_e_st_eq_landau_n_pair1 alpha a b)) a (l_e_st_eq_landau_n_first1is1 alpha a b) : l_e_is alpha a (l_e_st_eq_landau_n_first1 alpha (l_e_st_eq_landau_n_pair1 alpha a b))).
-
-(* constant 1043 *)
-definition l_e_st_eq_landau_n_second1is1 ≝ λalpha:Type[0].λa:alpha.λb:alpha.(l_e_itef (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_2t l_e_st_eq_landau_n_1t) alpha a b l_e_st_eq_landau_n_pair_th4 : l_e_is alpha (l_e_st_eq_landau_n_second1 alpha (l_e_st_eq_landau_n_pair1 alpha a b)) b).
-
-(* constant 1044 *)
-definition l_e_st_eq_landau_n_second1is2 ≝ λalpha:Type[0].λa:alpha.λb:alpha.(l_e_symis alpha (l_e_st_eq_landau_n_second1 alpha (l_e_st_eq_landau_n_pair1 alpha a b)) b (l_e_st_eq_landau_n_second1is1 alpha a b) : l_e_is alpha b (l_e_st_eq_landau_n_second1 alpha (l_e_st_eq_landau_n_pair1 alpha a b))).
-
-(* constant 1045 *)
-definition l_e_st_eq_landau_n_pair_t11 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.λq:l_e_st_eq_landau_n_pair1type alpha.λi:l_e_is alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q).λj:l_e_is alpha (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λu1:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_1t.(l_e_isf (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) alpha p u l_e_st_eq_landau_n_1t u1 : l_e_is alpha (p u) (l_e_st_eq_landau_n_first1 alpha p)).
-
-(* constant 1046 *)
-definition l_e_st_eq_landau_n_pair_t12 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.λq:l_e_st_eq_landau_n_pair1type alpha.λi:l_e_is alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q).λj:l_e_is alpha (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λu1:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_1t.(l_e_symis alpha (q u) (l_e_st_eq_landau_n_first1 alpha q) (l_e_isf (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) alpha q u l_e_st_eq_landau_n_1t u1) : l_e_is alpha (l_e_st_eq_landau_n_first1 alpha q) (q u)).
-
-(* constant 1047 *)
-definition l_e_st_eq_landau_n_pair_t13 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.λq:l_e_st_eq_landau_n_pair1type alpha.λi:l_e_is alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q).λj:l_e_is alpha (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λu1:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_1t.(l_e_tr3is alpha (p u) (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q) (q u) (l_e_st_eq_landau_n_pair_t11 alpha p q i j u u1) i (l_e_st_eq_landau_n_pair_t12 alpha p q i j u u1) : l_e_is alpha (p u) (q u)).
-
-(* constant 1048 *)
-definition l_e_st_eq_landau_n_pair_t14 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.λq:l_e_st_eq_landau_n_pair1type alpha.λi:l_e_is alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q).λj:l_e_is alpha (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λu2:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_2t.(l_e_isf (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) alpha p u l_e_st_eq_landau_n_2t u2 : l_e_is alpha (p u) (l_e_st_eq_landau_n_second1 alpha p)).
-
-(* constant 1049 *)
-definition l_e_st_eq_landau_n_pair_t15 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.λq:l_e_st_eq_landau_n_pair1type alpha.λi:l_e_is alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q).λj:l_e_is alpha (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λu2:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_2t.(l_e_symis alpha (q u) (l_e_st_eq_landau_n_second1 alpha q) (l_e_isf (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) alpha q u l_e_st_eq_landau_n_2t u2) : l_e_is alpha (l_e_st_eq_landau_n_second1 alpha q) (q u)).
-
-(* constant 1050 *)
-definition l_e_st_eq_landau_n_pair_t16 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.λq:l_e_st_eq_landau_n_pair1type alpha.λi:l_e_is alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q).λj:l_e_is alpha (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λu2:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_2t.(l_e_tr3is alpha (p u) (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q) (q u) (l_e_st_eq_landau_n_pair_t14 alpha p q i j u u2) j (l_e_st_eq_landau_n_pair_t15 alpha p q i j u u2) : l_e_is alpha (p u) (q u)).
-
-(* constant 1051 *)
-definition l_e_st_eq_landau_n_pair_t17 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.λq:l_e_st_eq_landau_n_pair1type alpha.λi:l_e_is alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q).λj:l_e_is alpha (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.(l_orapp (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_1t) (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_2t) (l_e_is alpha (p u) (q u)) (l_e_st_eq_landau_n_pair_th3 u) (λt:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_1t.l_e_st_eq_landau_n_pair_t13 alpha p q i j u t) (λt:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_2t.l_e_st_eq_landau_n_pair_t16 alpha p q i j u t) : l_e_is alpha (p u) (q u)).
-
-(* constant 1052 *)
-definition l_e_st_eq_landau_n_pair_th5 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.λq:l_e_st_eq_landau_n_pair1type alpha.λi:l_e_is alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q).λj:l_e_is alpha (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q).(l_e_fisi (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) alpha p q (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_pair_t17 alpha p q i j t) : l_e_is (l_e_st_eq_landau_n_pair1type alpha) p q).
-
-(* constant 1053 *)
-definition l_e_st_eq_landau_n_pair_q0 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.(l_e_st_eq_landau_n_pair1 alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_second1 alpha p) : l_e_st_eq_landau_n_pair1type alpha).
-
-(* constant 1054 *)
-definition l_e_st_eq_landau_n_pair_t18 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.(l_e_st_eq_landau_n_first1is1 alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_second1 alpha p) : l_e_is alpha (l_e_st_eq_landau_n_first1 alpha (l_e_st_eq_landau_n_pair_q0 alpha p)) (l_e_st_eq_landau_n_first1 alpha p)).
-
-(* constant 1055 *)
-definition l_e_st_eq_landau_n_pair_t19 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.(l_e_st_eq_landau_n_second1is1 alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_second1 alpha p) : l_e_is alpha (l_e_st_eq_landau_n_second1 alpha (l_e_st_eq_landau_n_pair_q0 alpha p)) (l_e_st_eq_landau_n_second1 alpha p)).
-
-(* constant 1056 *)
-definition l_e_st_eq_landau_n_pair1is1 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.(l_e_st_eq_landau_n_pair_th5 alpha (l_e_st_eq_landau_n_pair_q0 alpha p) p (l_e_st_eq_landau_n_pair_t18 alpha p) (l_e_st_eq_landau_n_pair_t19 alpha p) : l_e_is (l_e_st_eq_landau_n_pair1type alpha) (l_e_st_eq_landau_n_pair1 alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_second1 alpha p)) p).
-
-(* constant 1057 *)
-definition l_e_st_eq_landau_n_pair1is2 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.(l_e_symis (l_e_st_eq_landau_n_pair1type alpha) (l_e_st_eq_landau_n_pair1 alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_second1 alpha p)) p (l_e_st_eq_landau_n_pair1is1 alpha p) : l_e_is (l_e_st_eq_landau_n_pair1type alpha) p (l_e_st_eq_landau_n_pair1 alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_second1 alpha p))).
-
-(* constant 1058 *)
-definition l_e_st_eq_landau_n_lessisi3 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_lessisi2 x x (l_e_refis l_e_st_eq_landau_n_nat x) : l_e_st_eq_landau_n_lessis x x).
-
-(* constant 1059 *)
-definition l_e_st_eq_landau_n_1out ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_outn x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a x) : l_e_st_eq_landau_n_1to x).
-
-(* constant 1060 *)
-definition l_e_st_eq_landau_n_xout ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_outn x x (l_e_st_eq_landau_n_lessisi3 x) : l_e_st_eq_landau_n_1to x).
-
-(* constant 1061 *)
-definition l_e_st_eq_landau_n_left_ui ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_inn y u : l_e_st_eq_landau_n_nat).
-
-(* constant 1062 *)
-definition l_e_st_eq_landau_n_left_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_1top y u : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_left_ui x y l u) y).
-
-(* constant 1063 *)
-definition l_e_st_eq_landau_n_left_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_left_ui x y l u) y x (l_e_st_eq_landau_n_left_t1 x y l u) l : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_left_ui x y l u) x).
-
-(* constant 1064 *)
-definition l_e_st_eq_landau_n_left1to ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_left_ui x y l u) (l_e_st_eq_landau_n_left_t2 x y l u) : l_e_st_eq_landau_n_1to x).
-
-(* constant 1065 *)
-definition l_e_st_eq_landau_n_left_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λu:l_e_st_eq_landau_n_1to y.λv:l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_left1to x y l u) (l_e_st_eq_landau_n_left1to x y l v).(l_e_st_eq_landau_n_isoutne x (l_e_st_eq_landau_n_left_ui x y l u) (l_e_st_eq_landau_n_left_t2 x y l u) (l_e_st_eq_landau_n_left_ui x y l v) (l_e_st_eq_landau_n_left_t2 x y l v) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_left_ui x y l u) (l_e_st_eq_landau_n_left_ui x y l v)).
-
-(* constant 1066 *)
-definition l_e_st_eq_landau_n_thleft1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λu:l_e_st_eq_landau_n_1to y.λv:l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_left1to x y l u) (l_e_st_eq_landau_n_left1to x y l v).(l_e_st_eq_landau_n_isinne y u v (l_e_st_eq_landau_n_left_t3 x y l u v i) : l_e_is (l_e_st_eq_landau_n_1to y) u v).
-
-(* constant 1067 *)
-definition l_e_st_eq_landau_n_thleft2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.(λu:l_e_st_eq_landau_n_1to y.λv:l_e_st_eq_landau_n_1to y.λt:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_left1to x y l u) (l_e_st_eq_landau_n_left1to x y l v).l_e_st_eq_landau_n_thleft1 x y l u v t : l_e_injective (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_left1to x y l t)).
-
-(* constant 1068 *)
-definition l_e_st_eq_landau_n_right_ui ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_inn y u : l_e_st_eq_landau_n_nat).
-
-(* constant 1069 *)
-definition l_e_st_eq_landau_n_right_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_1top y u : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_right_ui x y u) y).
-
-(* constant 1070 *)
-definition l_e_st_eq_landau_n_right_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_right_ui x y u) y x (l_e_st_eq_landau_n_right_t4 x y u) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_right_ui x y u)) (l_e_st_eq_landau_n_pl x y)).
-
-(* constant 1071 *)
-definition l_e_st_eq_landau_n_right1to ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_right_ui x y u)) (l_e_st_eq_landau_n_right_t5 x y u) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y)).
-
-(* constant 1072 *)
-definition l_e_st_eq_landau_n_right_t6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_1to y.λv:l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_right1to x y u) (l_e_st_eq_landau_n_right1to x y v).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_right_ui x y u)) (l_e_st_eq_landau_n_right_t5 x y u) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_right_ui x y v)) (l_e_st_eq_landau_n_right_t5 x y v) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_right_ui x y u)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_right_ui x y v))).
-
-(* constant 1073 *)
-definition l_e_st_eq_landau_n_right_t7 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_1to y.λv:l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_right1to x y u) (l_e_st_eq_landau_n_right1to x y v).(l_e_st_eq_landau_n_satz20e (l_e_st_eq_landau_n_right_ui x y u) (l_e_st_eq_landau_n_right_ui x y v) x (l_e_st_eq_landau_n_right_t6 x y u v i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_right_ui x y u) (l_e_st_eq_landau_n_right_ui x y v)).
-
-(* constant 1074 *)
-definition l_e_st_eq_landau_n_thright1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_1to y.λv:l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_right1to x y u) (l_e_st_eq_landau_n_right1to x y v).(l_e_st_eq_landau_n_isinne y u v (l_e_st_eq_landau_n_right_t7 x y u v i) : l_e_is (l_e_st_eq_landau_n_1to y) u v).
-
-(* constant 1075 *)
-definition l_e_st_eq_landau_n_left ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.alpha.(λt:l_e_st_eq_landau_n_1to y.f (l_e_st_eq_landau_n_left1to x y l t) : Πt:l_e_st_eq_landau_n_1to y.alpha).
-
-(* constant 1076 *)
-definition l_e_st_eq_landau_n_right ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y).alpha.(λt:l_e_st_eq_landau_n_1to y.f (l_e_st_eq_landau_n_right1to x y t) : Πt:l_e_st_eq_landau_n_1to y.alpha).
-
-(* constant 1077 *)
-definition l_e_st_eq_landau_n_left_t4 ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.λf:Πt:l_e_st_eq_landau_n_1to y.alpha.(l_e_st_eq_landau_n_lessisi2 y x i : l_e_st_eq_landau_n_lessis y x).
-
-(* constant 1078 *)
-definition l_e_st_eq_landau_n_left_t5 ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.λf:Πt:l_e_st_eq_landau_n_1to y.alpha.(l_e_st_eq_landau_n_lessisi2 x y (l_e_symis l_e_st_eq_landau_n_nat y x i) : l_e_st_eq_landau_n_lessis x y).
-
-(* constant 1079 *)
-definition l_e_st_eq_landau_n_left_f1 ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.λf:Πt:l_e_st_eq_landau_n_1to y.alpha.(l_e_st_eq_landau_n_left alpha y x (l_e_st_eq_landau_n_left_t5 alpha x y i f) f : Πt:l_e_st_eq_landau_n_1to x.alpha).
-
-(* constant 1080 *)
-definition l_e_st_eq_landau_n_left_f2 ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.λf:Πt:l_e_st_eq_landau_n_1to y.alpha.(l_e_st_eq_landau_n_left alpha x y (l_e_st_eq_landau_n_left_t4 alpha x y i f) (l_e_st_eq_landau_n_left_f1 alpha x y i f) : Πt:l_e_st_eq_landau_n_1to y.alpha).
-
-(* constant 1081 *)
-definition l_e_st_eq_landau_n_left_t6 ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.λf:Πt:l_e_st_eq_landau_n_1to y.alpha.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_inn y u) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_inn y u) y x (l_e_st_eq_landau_n_1top y u) (l_e_st_eq_landau_n_left_t4 alpha x y i f)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_inn y u) (l_e_st_eq_landau_n_inn x (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_left_t4 alpha x y i f) u))).
-
-(* constant 1082 *)
-definition l_e_st_eq_landau_n_left_t7 ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.λf:Πt:l_e_st_eq_landau_n_1to y.alpha.λu:l_e_st_eq_landau_n_1to y.(l_e_tris (l_e_st_eq_landau_n_1to y) u (l_e_st_eq_landau_n_outn y (l_e_st_eq_landau_n_inn y u) (l_e_st_eq_landau_n_1top y u)) (l_e_st_eq_landau_n_left1to y x (l_e_st_eq_landau_n_left_t5 alpha x y i f) (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_left_t4 alpha x y i f) u)) (l_e_st_eq_landau_n_isoutinn y u) (l_e_st_eq_landau_n_isoutni y (l_e_st_eq_landau_n_inn y u) (l_e_st_eq_landau_n_1top y u) (l_e_st_eq_landau_n_inn x (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_left_t4 alpha x y i f) u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_inn x (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_left_t4 alpha x y i f) u)) x y (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_left_t4 alpha x y i f) u)) (l_e_st_eq_landau_n_left_t5 alpha x y i f)) (l_e_st_eq_landau_n_left_t6 alpha x y i f u)) : l_e_is (l_e_st_eq_landau_n_1to y) u (l_e_st_eq_landau_n_left1to y x (l_e_st_eq_landau_n_left_t5 alpha x y i f) (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_left_t4 alpha x y i f) u))).
-
-(* constant 1083 *)
-definition l_e_st_eq_landau_n_left_t8 ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.λf:Πt:l_e_st_eq_landau_n_1to y.alpha.λu:l_e_st_eq_landau_n_1to y.(l_e_isf (l_e_st_eq_landau_n_1to y) alpha f u (l_e_st_eq_landau_n_left1to y x (l_e_st_eq_landau_n_left_t5 alpha x y i f) (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_left_t4 alpha x y i f) u)) (l_e_st_eq_landau_n_left_t7 alpha x y i f u) : l_e_is alpha (f u) (l_e_st_eq_landau_n_left_f2 alpha x y i f u)).
-
-(* constant 1084 *)
-definition l_e_st_eq_landau_n_thleft ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.λf:Πt:l_e_st_eq_landau_n_1to y.alpha.(l_e_fisi (l_e_st_eq_landau_n_1to y) alpha f (l_e_st_eq_landau_n_left_f2 alpha x y i f) (λt:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_left_t8 alpha x y i f t) : l_e_is (Πt:l_e_st_eq_landau_n_1to y.alpha) f (l_e_st_eq_landau_n_left alpha x y (l_e_st_eq_landau_n_lessisi2 y x i) (l_e_st_eq_landau_n_left alpha y x (l_e_st_eq_landau_n_lessisi2 x y (l_e_symis l_e_st_eq_landau_n_nat y x i)) f))).
-
-(* constant 1085 *)
-definition l_e_st_eq_landau_n_frac ≝ (l_e_st_eq_landau_n_pair1type l_e_st_eq_landau_n_nat : Type[0]).
-
-(* constant 1086 *)
-definition l_e_st_eq_landau_n_fr ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_pair1 l_e_st_eq_landau_n_nat x1 x2 : l_e_st_eq_landau_n_frac).
-
-(* constant 1087 *)
-definition l_e_st_eq_landau_n_num ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_first1 l_e_st_eq_landau_n_nat x : l_e_st_eq_landau_n_nat).
-
-(* constant 1088 *)
-definition l_e_st_eq_landau_n_den ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_second1 l_e_st_eq_landau_n_nat x : l_e_st_eq_landau_n_nat).
-
-(* constant 1089 *)
-definition l_e_st_eq_landau_n_numis ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_first1is1 l_e_st_eq_landau_n_nat x1 x2 : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) x1).
-
-(* constant 1090 *)
-definition l_e_st_eq_landau_n_isnum ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_first1is2 l_e_st_eq_landau_n_nat x1 x2 : l_e_st_eq_landau_n_is x1 (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2))).
-
-(* constant 1091 *)
-definition l_e_st_eq_landau_n_denis ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_second1is1 l_e_st_eq_landau_n_nat x1 x2 : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)) x2).
-
-(* constant 1092 *)
-definition l_e_st_eq_landau_n_isden ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_second1is2 l_e_st_eq_landau_n_nat x1 x2 : l_e_st_eq_landau_n_is x2 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2))).
-
-(* constant 1093 *)
-definition l_e_st_eq_landau_n_1x ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_num x : l_e_st_eq_landau_n_nat).
-
-(* constant 1094 *)
-definition l_e_st_eq_landau_n_2x ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_den x : l_e_st_eq_landau_n_nat).
-
-(* constant 1095 *)
-definition l_e_st_eq_landau_n_fris ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_pair1is1 l_e_st_eq_landau_n_nat x : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) x).
-
-(* constant 1096 *)
-definition l_e_st_eq_landau_n_isfr ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_pair1is2 l_e_st_eq_landau_n_nat x : l_e_is l_e_st_eq_landau_n_frac x (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1097 *)
-definition l_e_st_eq_landau_n_12isnd ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists12 x1 (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) y2 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_isnum x1 x2) (l_e_st_eq_landau_n_isden y1 y2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2)))).
-
-(* constant 1098 *)
-definition l_e_st_eq_landau_n_ndis12 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_12isnd x1 x2 y1 y2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts x1 y2)).
-
-(* constant 1099 *)
-definition l_e_st_eq_landau_n_1disnd ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists1 n1 (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_isnum n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1100 *)
-definition l_e_st_eq_landau_n_ndis1d ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_1disnd x n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1101 *)
-definition l_e_st_eq_landau_n_n2isnd ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists2 n2 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_isden n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)))).
-
-(* constant 1102 *)
-definition l_e_st_eq_landau_n_ndisn2 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_n2isnd x n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2)).
-
-(* constant 1103 *)
-definition l_e_st_eq_landau_n_isn ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x1 n.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_fr t x2) x1 n i : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr n x2)).
-
-(* constant 1104 *)
-definition l_e_st_eq_landau_n_isd ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x2 n.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_fr x1 t) x2 n i : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr x1 n)).
-
-(* constant 1105 *)
-definition l_e_st_eq_landau_n_isnd ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x1 y1.λj:l_e_st_eq_landau_n_is x2 y2.(l_e_tris l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 x2) (l_e_st_eq_landau_n_fr y1 y2) (l_e_st_eq_landau_n_isn x1 x2 y1 i) (l_e_st_eq_landau_n_isd y1 x2 y2 j) : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)).
-
-(* constant 1106 *)
-definition l_e_st_eq_landau_n_1y ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_num y : l_e_st_eq_landau_n_nat).
-
-(* constant 1107 *)
-definition l_e_st_eq_landau_n_2y ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_den y : l_e_st_eq_landau_n_nat).
-
-(* constant 1108 *)
-definition l_e_st_eq_landau_n_eq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) : Prop).
-
-(* constant 1109 *)
-definition l_e_st_eq_landau_n_eqi12 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2).(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_ndis12 x1 x2 y1 y2) i (l_e_st_eq_landau_n_12isnd y1 y2 x1 x2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)).
-
-(* constant 1110 *)
-definition l_e_st_eq_landau_n_eqi1 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)).(l_e_isp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq t (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) x (l_e_st_eq_landau_n_eqi12 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x) n1 n2 i) (l_e_st_eq_landau_n_fris x) : l_e_st_eq_landau_n_eq x (l_e_st_eq_landau_n_fr n1 n2)).
-
-(* constant 1111 *)
-definition l_e_st_eq_landau_n_eqi2 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2).(l_e_isp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr n1 n2) t) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) x (l_e_st_eq_landau_n_eqi12 n1 n2 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x) i) (l_e_st_eq_landau_n_fris x) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr n1 n2) x).
-
-(* constant 1112 *)
-definition l_e_st_eq_landau_n_satz37 ≝ λx:l_e_st_eq_landau_n_frac.(l_e_refis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) : l_e_st_eq_landau_n_eq x x).
-
-(* constant 1113 *)
-definition l_e_st_eq_landau_n_refeq ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz37 x : l_e_st_eq_landau_n_eq x x).
-
-(* constant 1114 *)
-definition l_e_st_eq_landau_n_refeq1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λi:l_e_is l_e_st_eq_landau_n_frac x y.(l_e_isp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq x t) x y (l_e_st_eq_landau_n_refeq x) i : l_e_st_eq_landau_n_eq x y).
-
-(* constant 1115 *)
-definition l_e_st_eq_landau_n_refeq2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λi:l_e_is l_e_st_eq_landau_n_frac x y.(l_e_isp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq t x) x y (l_e_st_eq_landau_n_refeq x) i : l_e_st_eq_landau_n_eq y x).
-
-(* constant 1116 *)
-definition l_e_st_eq_landau_n_eqnd ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x1 y1.λj:l_e_st_eq_landau_n_is x2 y2.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2) (l_e_st_eq_landau_n_isnd x1 x2 y1 y2 i j) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)).
-
-(* constant 1117 *)
-definition l_e_st_eq_landau_n_eqn ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x1 n.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr n x2) (l_e_st_eq_landau_n_isn x1 x2 n i) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr n x2)).
-
-(* constant 1118 *)
-definition l_e_st_eq_landau_n_eqd ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x2 n.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr x1 n) (l_e_st_eq_landau_n_isd x1 x2 n i) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr x1 n)).
-
-(* constant 1119 *)
-definition l_e_st_eq_landau_n_satz38 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) e : l_e_st_eq_landau_n_eq y x).
-
-(* constant 1120 *)
-definition l_e_st_eq_landau_n_symeq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_satz38 x y e : l_e_st_eq_landau_n_eq y x).
-
-(* constant 1121 *)
-definition l_e_st_eq_landau_n_ii1_t1 ≝ λa:l_e_st_eq_landau_n_nat.λb:l_e_st_eq_landau_n_nat.λc:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts b c) d) (l_e_st_eq_landau_n_ts d (l_e_st_eq_landau_n_ts b c)) (l_e_st_eq_landau_n_assts2 b c d) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_ts b c) d) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts d (l_e_st_eq_landau_n_ts b c))).
-
-(* constant 1122 *)
-definition l_e_st_eq_landau_n_stets ≝ λa:l_e_st_eq_landau_n_nat.λb:l_e_st_eq_landau_n_nat.λc:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_nat.(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts a (l_e_st_eq_landau_n_ts b (l_e_st_eq_landau_n_ts c d))) (l_e_st_eq_landau_n_ts a (l_e_st_eq_landau_n_ts d (l_e_st_eq_landau_n_ts b c))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a d) (l_e_st_eq_landau_n_ts b c)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a d) (l_e_st_eq_landau_n_ts c b)) (l_e_st_eq_landau_n_assts1 a b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts d (l_e_st_eq_landau_n_ts b c)) a (l_e_st_eq_landau_n_ii1_t1 a b c d)) (l_e_st_eq_landau_n_assts2 a d (l_e_st_eq_landau_n_ts b c)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts b c) (l_e_st_eq_landau_n_ts c b) (l_e_st_eq_landau_n_ts a d) (l_e_st_eq_landau_n_comts b c)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a d) (l_e_st_eq_landau_n_ts c b))).
-
-(* constant 1123 *)
-definition l_e_st_eq_landau_n_ii1_t2 ≝ λa:l_e_st_eq_landau_n_nat.λb:l_e_st_eq_landau_n_nat.λc:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts c d) b) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts d c) b) (l_e_st_eq_landau_n_ts d (l_e_st_eq_landau_n_ts c b)) (l_e_st_eq_landau_n_comts b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ists1 (l_e_st_eq_landau_n_ts c d) (l_e_st_eq_landau_n_ts d c) b (l_e_st_eq_landau_n_comts c d)) (l_e_st_eq_landau_n_assts1 d c b) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts d (l_e_st_eq_landau_n_ts c b))).
-
-(* constant 1124 *)
-definition l_e_st_eq_landau_n_ii1_anders ≝ λa:l_e_st_eq_landau_n_nat.λb:l_e_st_eq_landau_n_nat.λc:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts a (l_e_st_eq_landau_n_ts b (l_e_st_eq_landau_n_ts c d))) (l_e_st_eq_landau_n_ts a (l_e_st_eq_landau_n_ts d (l_e_st_eq_landau_n_ts c b))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a d) (l_e_st_eq_landau_n_ts c b)) (l_e_st_eq_landau_n_assts1 a b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts d (l_e_st_eq_landau_n_ts c b)) a (l_e_st_eq_landau_n_ii1_t2 a b c d)) (l_e_st_eq_landau_n_assts2 a d (l_e_st_eq_landau_n_ts c b)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a d) (l_e_st_eq_landau_n_ts c b))).
-
-(* constant 1125 *)
-definition l_e_st_eq_landau_n_1z ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_num z : l_e_st_eq_landau_n_nat).
-
-(* constant 1126 *)
-definition l_e_st_eq_landau_n_2z ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_den z : l_e_st_eq_landau_n_nat).
-
-(* constant 1127 *)
-definition l_e_st_eq_landau_n_139_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.(l_e_st_eq_landau_n_ists12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) e f : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1128 *)
-definition l_e_st_eq_landau_n_139_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.(l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1129 *)
-definition l_e_st_eq_landau_n_139_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1130 *)
-definition l_e_st_eq_landau_n_139_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_139_t2 x y z e f)) (l_e_st_eq_landau_n_139_t1 x y z e f) (l_e_st_eq_landau_n_139_t3 x y z e f) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1131 *)
-definition l_e_st_eq_landau_n_satz39 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.(l_e_st_eq_landau_n_satz33b (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_139_t4 x y z e f) : l_e_st_eq_landau_n_eq x z).
-
-(* constant 1132 *)
-definition l_e_st_eq_landau_n_139_anders ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ists12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) e f) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1133 *)
-definition l_e_st_eq_landau_n_treq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.(l_e_st_eq_landau_n_satz39 x y z e f : l_e_st_eq_landau_n_eq x z).
-
-(* constant 1134 *)
-definition l_e_st_eq_landau_n_treq1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq z x.λf:l_e_st_eq_landau_n_eq z y.(l_e_st_eq_landau_n_treq x z y (l_e_st_eq_landau_n_symeq z x e) f : l_e_st_eq_landau_n_eq x y).
-
-(* constant 1135 *)
-definition l_e_st_eq_landau_n_treq2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y z.(l_e_st_eq_landau_n_treq x z y e (l_e_st_eq_landau_n_symeq y z f) : l_e_st_eq_landau_n_eq x y).
-
-(* constant 1136 *)
-definition l_e_st_eq_landau_n_tr3eq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.λg:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_treq x y u e (l_e_st_eq_landau_n_treq y z u f g) : l_e_st_eq_landau_n_eq x u).
-
-(* constant 1137 *)
-definition l_e_st_eq_landau_n_tr4eq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.λg:l_e_st_eq_landau_n_eq z u.λh:l_e_st_eq_landau_n_eq u v.(l_e_st_eq_landau_n_tr3eq x y z v e f (l_e_st_eq_landau_n_treq z u v g h) : l_e_st_eq_landau_n_eq x v).
-
-(* constant 1138 *)
-definition l_e_st_eq_landau_n_satz40 ≝ λx:l_e_st_eq_landau_n_frac.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_eqi1 x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n) (l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts n (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n) (l_e_st_eq_landau_n_ts n (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2x x) n)) (l_e_st_eq_landau_n_assts2 (l_e_st_eq_landau_n_1x x) n (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_eq x (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n))).
-
-(* constant 1139 *)
-definition l_e_st_eq_landau_n_satz40a ≝ λx:l_e_st_eq_landau_n_frac.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_symeq x (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n)) (l_e_st_eq_landau_n_satz40 x n) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n)) x).
-
-(* constant 1140 *)
-definition l_e_st_eq_landau_n_satz40b ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_eqi12 x1 x2 (l_e_st_eq_landau_n_ts x1 n) (l_e_st_eq_landau_n_ts x2 n) (l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x1 (l_e_st_eq_landau_n_ts x2 n)) (l_e_st_eq_landau_n_ts x1 (l_e_st_eq_landau_n_ts n x2)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x1 n) x2) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts x2 n) (l_e_st_eq_landau_n_ts n x2) x1 (l_e_st_eq_landau_n_comts x2 n)) (l_e_st_eq_landau_n_assts2 x1 n x2)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x1 n) (l_e_st_eq_landau_n_ts x2 n))).
-
-(* constant 1141 *)
-definition l_e_st_eq_landau_n_satz40c ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_symeq (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x1 n) (l_e_st_eq_landau_n_ts x2 n)) (l_e_st_eq_landau_n_satz40b x1 x2 n) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x1 n) (l_e_st_eq_landau_n_ts x2 n)) (l_e_st_eq_landau_n_fr x1 x2)).
-
-(* constant 1142 *)
-definition l_e_st_eq_landau_n_moref ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) : Prop).
-
-(* constant 1143 *)
-definition l_e_st_eq_landau_n_lessf ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) : Prop).
-
-(* constant 1144 *)
-definition l_e_st_eq_landau_n_morefi12 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2).(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts y1 x2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_12isnd x1 x2 y1 y2) (l_e_st_eq_landau_n_12isnd y1 y2 x1 x2) m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)).
-
-(* constant 1145 *)
-definition l_e_st_eq_landau_n_lessfi12 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2).(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts y1 x2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_12isnd x1 x2 y1 y2) (l_e_st_eq_landau_n_12isnd y1 y2 x1 x2) l : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)).
-
-(* constant 1146 *)
-definition l_e_st_eq_landau_n_morefi1 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)).(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_n2isnd x n1 n2) (l_e_st_eq_landau_n_1disnd x n1 n2) m : l_e_st_eq_landau_n_moref x (l_e_st_eq_landau_n_fr n1 n2)).
-
-(* constant 1147 *)
-definition l_e_st_eq_landau_n_morefi2 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2).(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_1disnd x n1 n2) (l_e_st_eq_landau_n_n2isnd x n1 n2) m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr n1 n2) x).
-
-(* constant 1148 *)
-definition l_e_st_eq_landau_n_lessfi1 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)).(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_n2isnd x n1 n2) (l_e_st_eq_landau_n_1disnd x n1 n2) l : l_e_st_eq_landau_n_lessf x (l_e_st_eq_landau_n_fr n1 n2)).
-
-(* constant 1149 *)
-definition l_e_st_eq_landau_n_lessfi2 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2).(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_1disnd x n1 n2) (l_e_st_eq_landau_n_n2isnd x n1 n2) l : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr n1 n2) x).
-
-(* constant 1150 *)
-definition l_e_st_eq_landau_n_satz41 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz10 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) : l_orec3 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y)).
-
-(* constant 1151 *)
-definition l_e_st_eq_landau_n_satz41a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz10a (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) : l_or3 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y)).
-
-(* constant 1152 *)
-definition l_e_st_eq_landau_n_satz41b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) : l_ec3 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y)).
-
-(* constant 1153 *)
-definition l_e_st_eq_landau_n_satz42 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_satz11 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) m : l_e_st_eq_landau_n_lessf y x).
-
-(* constant 1154 *)
-definition l_e_st_eq_landau_n_satz43 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_satz12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) l : l_e_st_eq_landau_n_moref y x).
-
-(* constant 1155 *)
-definition l_e_st_eq_landau_n_1u ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_num u : l_e_st_eq_landau_n_nat).
-
-(* constant 1156 *)
-definition l_e_st_eq_landau_n_2u ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_den u : l_e_st_eq_landau_n_nat).
-
-(* constant 1157 *)
-definition l_e_st_eq_landau_n_244_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.(l_e_st_eq_landau_n_ists12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) f (l_e_st_eq_landau_n_symeq x z e) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1158 *)
-definition l_e_st_eq_landau_n_244_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_244_t1 x y z u m e f) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1159 *)
-definition l_e_st_eq_landau_n_244_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.(l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_244_t2 x y z u m e f)) (l_e_st_eq_landau_n_satz32d (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1160 *)
-definition l_e_st_eq_landau_n_satz44 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.(l_e_st_eq_landau_n_satz33a (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_244_t3 x y z u m e f)) : l_e_st_eq_landau_n_moref z u).
-
-(* constant 1161 *)
-definition l_e_st_eq_landau_n_eqmoref12 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.λm:l_e_st_eq_landau_n_moref x z.(l_e_st_eq_landau_n_satz44 x z y u m e f : l_e_st_eq_landau_n_moref y u).
-
-(* constant 1162 *)
-definition l_e_st_eq_landau_n_eqmoref1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λm:l_e_st_eq_landau_n_moref x z.(l_e_st_eq_landau_n_satz44 x z y z m e (l_e_st_eq_landau_n_refeq z) : l_e_st_eq_landau_n_moref y z).
-
-(* constant 1163 *)
-definition l_e_st_eq_landau_n_eqmoref2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λm:l_e_st_eq_landau_n_moref z x.(l_e_st_eq_landau_n_satz44 z x z y m (l_e_st_eq_landau_n_refeq z) e : l_e_st_eq_landau_n_moref z y).
-
-(* constant 1164 *)
-definition l_e_st_eq_landau_n_satz45 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.(l_e_st_eq_landau_n_satz42 u z (l_e_st_eq_landau_n_satz44 y x u z (l_e_st_eq_landau_n_satz43 x y l) f e) : l_e_st_eq_landau_n_lessf z u).
-
-(* constant 1165 *)
-definition l_e_st_eq_landau_n_eqlessf12 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.λl:l_e_st_eq_landau_n_lessf x z.(l_e_st_eq_landau_n_satz45 x z y u l e f : l_e_st_eq_landau_n_lessf y u).
-
-(* constant 1166 *)
-definition l_e_st_eq_landau_n_eqlessf1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λl:l_e_st_eq_landau_n_lessf x z.(l_e_st_eq_landau_n_satz45 x z y z l e (l_e_st_eq_landau_n_refeq z) : l_e_st_eq_landau_n_lessf y z).
-
-(* constant 1167 *)
-definition l_e_st_eq_landau_n_eqlessf2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λl:l_e_st_eq_landau_n_lessf z x.(l_e_st_eq_landau_n_satz45 z x z y l (l_e_st_eq_landau_n_refeq z) e : l_e_st_eq_landau_n_lessf z y).
-
-(* constant 1168 *)
-definition l_e_st_eq_landau_n_moreq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_or (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) : Prop).
-
-(* constant 1169 *)
-definition l_e_st_eq_landau_n_lesseq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_or (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) : Prop).
-
-(* constant 1170 *)
-definition l_e_st_eq_landau_n_moreqi2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_ori2 (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) e : l_e_st_eq_landau_n_moreq x y).
-
-(* constant 1171 *)
-definition l_e_st_eq_landau_n_lesseqi2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_ori2 (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) e : l_e_st_eq_landau_n_lesseq x y).
-
-(* constant 1172 *)
-definition l_e_st_eq_landau_n_moreqi1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_ori1 (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) m : l_e_st_eq_landau_n_moreq x y).
-
-(* constant 1173 *)
-definition l_e_st_eq_landau_n_lesseqi1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_ori1 (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) l : l_e_st_eq_landau_n_lesseq x y).
-
-(* constant 1174 *)
-definition l_e_st_eq_landau_n_satz41c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.(l_ec3_th7 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41b x y) (l_comor (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) m) : l_not (l_e_st_eq_landau_n_lessf x y)).
-
-(* constant 1175 *)
-definition l_e_st_eq_landau_n_satz41d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.(l_ec3_th9 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41b x y) l : l_not (l_e_st_eq_landau_n_moref x y)).
-
-(* constant 1176 *)
-definition l_e_st_eq_landau_n_satz41e ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λn:l_not (l_e_st_eq_landau_n_moref x y).(l_or3_th2 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41a x y) n : l_e_st_eq_landau_n_lesseq x y).
-
-(* constant 1177 *)
-definition l_e_st_eq_landau_n_satz41f ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λn:l_not (l_e_st_eq_landau_n_lessf x y).(l_comor (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_or3_th3 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41a x y) n) : l_e_st_eq_landau_n_moreq x y).
-
-(* constant 1178 *)
-definition l_e_st_eq_landau_n_satz41g ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_or_th3 (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) (l_ec3e23 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41b x y) m) (l_ec3e21 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41b x y) m) : l_not (l_e_st_eq_landau_n_lesseq x y)).
-
-(* constant 1179 *)
-definition l_e_st_eq_landau_n_satz41h ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_or_th3 (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) (l_ec3e32 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41b x y) l) (l_ec3e31 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41b x y) l) : l_not (l_e_st_eq_landau_n_moreq x y)).
-
-(* constant 1180 *)
-definition l_e_st_eq_landau_n_satz41j ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λn:l_not (l_e_st_eq_landau_n_moreq x y).(l_or3e3 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41a x y) (l_or_th5 (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) n) (l_or_th4 (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) n) : l_e_st_eq_landau_n_lessf x y).
-
-(* constant 1181 *)
-definition l_e_st_eq_landau_n_satz41k ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λn:l_not (l_e_st_eq_landau_n_lesseq x y).(l_or3e2 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41a x y) (l_or_th4 (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) n) (l_or_th5 (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) n) : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1182 *)
-definition l_e_st_eq_landau_n_246_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.λn:l_e_st_eq_landau_n_moref x y.(l_ori1 (l_e_st_eq_landau_n_moref z u) (l_e_st_eq_landau_n_eq z u) (l_e_st_eq_landau_n_satz44 x y z u n e f) : l_e_st_eq_landau_n_moreq z u).
-
-(* constant 1183 *)
-definition l_e_st_eq_landau_n_246_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.λg:l_e_st_eq_landau_n_eq x y.(l_ori2 (l_e_st_eq_landau_n_moref z u) (l_e_st_eq_landau_n_eq z u) (l_e_st_eq_landau_n_tr3eq z x y u (l_e_st_eq_landau_n_symeq x z e) g f) : l_e_st_eq_landau_n_moreq z u).
-
-(* constant 1184 *)
-definition l_e_st_eq_landau_n_satz46 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.(l_orapp (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moreq z u) m (λt:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_246_t1 x y z u m e f t) (λt:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_246_t2 x y z u m e f t) : l_e_st_eq_landau_n_moreq z u).
-
-(* constant 1185 *)
-definition l_e_st_eq_landau_n_eqmoreq12 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.λm:l_e_st_eq_landau_n_moreq x z.(l_e_st_eq_landau_n_satz46 x z y u m e f : l_e_st_eq_landau_n_moreq y u).
-
-(* constant 1186 *)
-definition l_e_st_eq_landau_n_eqmoreq1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λm:l_e_st_eq_landau_n_moreq x z.(l_e_st_eq_landau_n_satz46 x z y z m e (l_e_st_eq_landau_n_refeq z) : l_e_st_eq_landau_n_moreq y z).
-
-(* constant 1187 *)
-definition l_e_st_eq_landau_n_eqmoreq2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λm:l_e_st_eq_landau_n_moreq z x.(l_e_st_eq_landau_n_satz46 z x z y m (l_e_st_eq_landau_n_refeq z) e : l_e_st_eq_landau_n_moreq z y).
-
-(* constant 1188 *)
-definition l_e_st_eq_landau_n_247_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.λk:l_e_st_eq_landau_n_lessf x y.(l_ori1 (l_e_st_eq_landau_n_lessf z u) (l_e_st_eq_landau_n_eq z u) (l_e_st_eq_landau_n_satz45 x y z u k e f) : l_e_st_eq_landau_n_lesseq z u).
-
-(* constant 1189 *)
-definition l_e_st_eq_landau_n_247_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.λg:l_e_st_eq_landau_n_eq x y.(l_ori2 (l_e_st_eq_landau_n_lessf z u) (l_e_st_eq_landau_n_eq z u) (l_e_st_eq_landau_n_tr3eq z x y u (l_e_st_eq_landau_n_symeq x z e) g f) : l_e_st_eq_landau_n_lesseq z u).
-
-(* constant 1190 *)
-definition l_e_st_eq_landau_n_satz47 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.(l_orapp (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_lesseq z u) l (λt:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_247_t1 x y z u l e f t) (λt:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_247_t2 x y z u l e f t) : l_e_st_eq_landau_n_lesseq z u).
-
-(* constant 1191 *)
-definition l_e_st_eq_landau_n_eqlesseq12 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.λl:l_e_st_eq_landau_n_lesseq x z.(l_e_st_eq_landau_n_satz47 x z y u l e f : l_e_st_eq_landau_n_lesseq y u).
-
-(* constant 1192 *)
-definition l_e_st_eq_landau_n_eqlesseq1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λl:l_e_st_eq_landau_n_lesseq x z.(l_e_st_eq_landau_n_satz47 x z y z l e (l_e_st_eq_landau_n_refeq z) : l_e_st_eq_landau_n_lesseq y z).
-
-(* constant 1193 *)
-definition l_e_st_eq_landau_n_eqlesseq2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λl:l_e_st_eq_landau_n_lesseq z x.(l_e_st_eq_landau_n_satz47 z x z y l (l_e_st_eq_landau_n_refeq z) e : l_e_st_eq_landau_n_lesseq z y).
-
-(* constant 1194 *)
-definition l_e_st_eq_landau_n_satz48 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.(l_or_th9 (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_lessf y x) (l_e_st_eq_landau_n_eq y x) m (λt:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz42 x y t) (λt:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz38 x y t) : l_e_st_eq_landau_n_lesseq y x).
-
-(* constant 1195 *)
-definition l_e_st_eq_landau_n_satz49 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.(l_or_th9 (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref y x) (l_e_st_eq_landau_n_eq y x) l (λt:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_satz43 x y t) (λt:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz38 x y t) : l_e_st_eq_landau_n_moreq y x).
-
-(* constant 1196 *)
-definition l_e_st_eq_landau_n_250_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lessf y z.(l_e_st_eq_landau_n_satz34a (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) l k : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1197 *)
-definition l_e_st_eq_landau_n_250_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lessf y z.(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)))) (l_e_st_eq_landau_n_250_t1 x y z l k) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1198 *)
-definition l_e_st_eq_landau_n_satz50 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lessf y z.(l_e_st_eq_landau_n_satz33c (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_250_t2 x y z l k) : l_e_st_eq_landau_n_lessf x z).
-
-(* constant 1199 *)
-definition l_e_st_eq_landau_n_trlessf ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lessf y z.(l_e_st_eq_landau_n_satz50 x y z l k : l_e_st_eq_landau_n_lessf x z).
-
-(* constant 1200 *)
-definition l_e_st_eq_landau_n_trmoref ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moref y z.(l_e_st_eq_landau_n_satz43 z x (l_e_st_eq_landau_n_satz50 z y x (l_e_st_eq_landau_n_satz42 y z n) (l_e_st_eq_landau_n_satz42 x y m)) : l_e_st_eq_landau_n_moref x z).
-
-(* constant 1201 *)
-definition l_e_st_eq_landau_n_satz51a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lessf y z.(l_orapp (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_lessf x z) l (λt:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_satz50 x y z t k) (λt:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_eqlessf1 y x z (l_e_st_eq_landau_n_symeq x y t) k) : l_e_st_eq_landau_n_lessf x z).
-
-(* constant 1202 *)
-definition l_e_st_eq_landau_n_satz51b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lesseq y z.(l_orapp (l_e_st_eq_landau_n_lessf y z) (l_e_st_eq_landau_n_eq y z) (l_e_st_eq_landau_n_lessf x z) k (λt:l_e_st_eq_landau_n_lessf y z.l_e_st_eq_landau_n_satz50 x y z l t) (λt:l_e_st_eq_landau_n_eq y z.l_e_st_eq_landau_n_eqlessf2 y z x t l) : l_e_st_eq_landau_n_lessf x z).
-
-(* constant 1203 *)
-definition l_e_st_eq_landau_n_satz51c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moref y z.(l_e_st_eq_landau_n_satz43 z x (l_e_st_eq_landau_n_satz51b z y x (l_e_st_eq_landau_n_satz42 y z n) (l_e_st_eq_landau_n_satz48 x y m)) : l_e_st_eq_landau_n_moref x z).
-
-(* constant 1204 *)
-definition l_e_st_eq_landau_n_satz51d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moreq y z.(l_e_st_eq_landau_n_satz43 z x (l_e_st_eq_landau_n_satz51a z y x (l_e_st_eq_landau_n_satz48 y z n) (l_e_st_eq_landau_n_satz42 x y m)) : l_e_st_eq_landau_n_moref x z).
-
-(* constant 1205 *)
-definition l_e_st_eq_landau_n_252_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.(l_ori2 (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_eq x z) (l_e_st_eq_landau_n_treq x y z e f) : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1206 *)
-definition l_e_st_eq_landau_n_252_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.λe:l_e_st_eq_landau_n_eq x y.λj:l_e_st_eq_landau_n_lessf y z.(l_ori1 (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_eq x z) (l_e_st_eq_landau_n_satz51a x y z l j) : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1207 *)
-definition l_e_st_eq_landau_n_252_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.λe:l_e_st_eq_landau_n_eq x y.(l_orapp (l_e_st_eq_landau_n_lessf y z) (l_e_st_eq_landau_n_eq y z) (l_e_st_eq_landau_n_lesseq x z) k (λt:l_e_st_eq_landau_n_lessf y z.l_e_st_eq_landau_n_252_t2 x y z l k e t) (λt:l_e_st_eq_landau_n_eq y z.l_e_st_eq_landau_n_252_t1 x y z l k e t) : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1208 *)
-definition l_e_st_eq_landau_n_252_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.λj:l_e_st_eq_landau_n_lessf x y.(l_ori1 (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_eq x z) (l_e_st_eq_landau_n_satz51b x y z j k) : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1209 *)
-definition l_e_st_eq_landau_n_satz52 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.(l_orapp (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_lesseq x z) l (λt:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_252_t4 x y z l k t) (λt:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_252_t3 x y z l k t) : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1210 *)
-definition l_e_st_eq_landau_n_trlesseq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.(l_e_st_eq_landau_n_satz52 x y z l k : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1211 *)
-definition l_e_st_eq_landau_n_252_t5 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.λj:l_e_st_eq_landau_n_lessf x y.(l_ori1 (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_eq x z) (l_e_st_eq_landau_n_satz51b x y z j k) : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1212 *)
-definition l_e_st_eq_landau_n_252_t6 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_eqlesseq1 y x z (l_e_st_eq_landau_n_symeq x y e) k : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1213 *)
-definition l_e_st_eq_landau_n_252_anders ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.(l_orapp (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_lesseq x z) l (λt:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_252_t5 x y z l k t) (λt:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_252_t6 x y z l k t) : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1214 *)
-definition l_e_st_eq_landau_n_trmoreq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq y z.(l_e_st_eq_landau_n_satz49 z x (l_e_st_eq_landau_n_satz52 z y x (l_e_st_eq_landau_n_satz48 y z n) (l_e_st_eq_landau_n_satz48 x y m)) : l_e_st_eq_landau_n_moreq x z).
-
-(* constant 1215 *)
-definition l_e_st_eq_landau_n_253_t1 ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_distpt1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_satz18 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1216 *)
-definition l_e_st_eq_landau_n_253_t2 ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_morefi2 x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_253_t1 x) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_2x x)) x).
-
-(* constant 1217 *)
-definition l_e_st_eq_landau_n_satz53 ≝ λx:l_e_st_eq_landau_n_frac.(l_somei l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_moref t x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_253_t2 x) : l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_moref t x)).
-
-(* constant 1218 *)
-definition l_e_st_eq_landau_n_254_t1 ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_isless2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_distpt2 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_satz18a (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1219 *)
-definition l_e_st_eq_landau_n_254_t2 ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_lessfi2 x (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_254_t1 x) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2x x))) x).
-
-(* constant 1220 *)
-definition l_e_st_eq_landau_n_satz54 ≝ λx:l_e_st_eq_landau_n_frac.(l_somei l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_lessf t x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_254_t2 x) : l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_lessf t x)).
-
-(* constant 1221 *)
-definition l_e_st_eq_landau_n_255_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_satz19f (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) l : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1222 *)
-definition l_e_st_eq_landau_n_255_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_satz19c (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) l : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1223 *)
-definition l_e_st_eq_landau_n_255_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_distpt2 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_distpt1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_255_t1 x y l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1224 *)
-definition l_e_st_eq_landau_n_255_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_lessfi1 x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_255_t3 x y l) : l_e_st_eq_landau_n_lessf x (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1225 *)
-definition l_e_st_eq_landau_n_255_t5 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_distpt1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_distpt2 (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_255_t2 x y l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1226 *)
-definition l_e_st_eq_landau_n_255_t6 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_lessfi2 y (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_255_t5 x y l) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) y).
-
-(* constant 1227 *)
-definition l_e_st_eq_landau_n_255_t7 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_andi (l_e_st_eq_landau_n_lessf x (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) y) (l_e_st_eq_landau_n_255_t4 x y l) (l_e_st_eq_landau_n_255_t6 x y l) : l_and (l_e_st_eq_landau_n_lessf x (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) y)).
-
-(* constant 1228 *)
-definition l_e_st_eq_landau_n_satz55 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_somei l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_and (l_e_st_eq_landau_n_lessf x t) (l_e_st_eq_landau_n_lessf t y)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_255_t7 x y l) : l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_and (l_e_st_eq_landau_n_lessf x t) (l_e_st_eq_landau_n_lessf t y))).
-
-(* constant 1229 *)
-definition l_e_st_eq_landau_n_pf ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) : l_e_st_eq_landau_n_frac).
-
-(* constant 1230 *)
-definition l_e_st_eq_landau_n_ii3_t1 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_ts y1 x2) (l_e_st_eq_landau_n_ndis12 x1 x2 y1 y2) (l_e_st_eq_landau_n_ndis12 y1 y2 x1 x2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2))).
-
-(* constant 1231 *)
-definition l_e_st_eq_landau_n_ii3_t2 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists12 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)) x2 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2)) y2 (l_e_st_eq_landau_n_denis x1 x2) (l_e_st_eq_landau_n_denis y1 y2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts x2 y2)).
-
-(* constant 1232 *)
-definition l_e_st_eq_landau_n_pf12 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_isnd (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2)) (l_e_st_eq_landau_n_ts x2 y2) (l_e_st_eq_landau_n_ii3_t1 x1 x2 y1 y2) (l_e_st_eq_landau_n_ii3_t2 x1 x2 y1 y2) : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2)) (l_e_st_eq_landau_n_ts x2 y2))).
-
-(* constant 1233 *)
-definition l_e_st_eq_landau_n_ii3_t3 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ndisn2 x n1 n2) (l_e_st_eq_landau_n_ndis1d x n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1234 *)
-definition l_e_st_eq_landau_n_ii3_t4 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) n2 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_denis n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2)).
-
-(* constant 1235 *)
-definition l_e_st_eq_landau_n_pf1 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_isnd (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2) (l_e_st_eq_landau_n_ii3_t3 x n1 n2) (l_e_st_eq_landau_n_ii3_t4 x n1 n2) : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2))).
-
-(* constant 1236 *)
-definition l_e_st_eq_landau_n_ii3_t5 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ndis1d x n1 n2) (l_e_st_eq_landau_n_ndisn2 x n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2))).
-
-(* constant 1237 *)
-definition l_e_st_eq_landau_n_ii3_t6 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists1 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) n2 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_denis n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1238 *)
-definition l_e_st_eq_landau_n_pf2 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_isnd (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ii3_t5 x n1 n2) (l_e_st_eq_landau_n_ii3_t6 x n1 n2) : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr n1 n2) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1239 *)
-definition l_e_st_eq_landau_n_pfeq12a ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2)) (l_e_st_eq_landau_n_ts x2 y2)) (l_e_st_eq_landau_n_pf12 x1 x2 y1 y2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2)) (l_e_st_eq_landau_n_ts x2 y2))).
-
-(* constant 1240 *)
-definition l_e_st_eq_landau_n_pfeq12b ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq2 (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2)) (l_e_st_eq_landau_n_ts x2 y2)) (l_e_st_eq_landau_n_pf12 x1 x2 y1 y2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2)) (l_e_st_eq_landau_n_ts x2 y2)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2))).
-
-(* constant 1241 *)
-definition l_e_st_eq_landau_n_pfeq1a ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2)) (l_e_st_eq_landau_n_pf1 x n1 n2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2))).
-
-(* constant 1242 *)
-definition l_e_st_eq_landau_n_pfeq1b ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq2 (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2)) (l_e_st_eq_landau_n_pf1 x n1 n2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2)) (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_fr n1 n2))).
-
-(* constant 1243 *)
-definition l_e_st_eq_landau_n_pfeq2a ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr n1 n2) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_pf2 x n1 n2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr n1 n2) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1244 *)
-definition l_e_st_eq_landau_n_pfeq2b ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq2 (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr n1 n2) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_pf2 x n1 n2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr n1 n2) x)).
-
-(* constant 1245 *)
-definition l_e_st_eq_landau_n_356_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_ists1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u)) e : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u)))).
-
-(* constant 1246 *)
-definition l_e_st_eq_landau_n_356_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_356_t1 z u x y f e : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1247 *)
-definition l_e_st_eq_landau_n_356_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2u x y z u) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2u x y z u) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2u x y z u) (l_e_st_eq_landau_n_2z x y z))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u)))).
-
-(* constant 1248 *)
-definition l_e_st_eq_landau_n_356_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_356_t3 x y z u e f) (l_e_st_eq_landau_n_356_t1 x y z u e f) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1249 *)
-definition l_e_st_eq_landau_n_356_t5 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_356_t2 x y z u e f) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1250 *)
-definition l_e_st_eq_landau_n_356_t6 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_356_t4 x y z u e f) (l_e_st_eq_landau_n_356_t5 x y z u e f) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))))).
-
-(* constant 1251 *)
-definition l_e_st_eq_landau_n_356_t7 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_disttp1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_356_t6 x y z u e f) (l_e_st_eq_landau_n_distpt1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1252 *)
-definition l_e_st_eq_landau_n_satz56 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_eqi12 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_356_t7 x y z u e f) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1253 *)
-definition l_e_st_eq_landau_n_eqpf12 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_satz56 x y z u e f : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1254 *)
-definition l_e_st_eq_landau_n_eqpf1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_eqpf12 x y z z e (l_e_st_eq_landau_n_refeq z) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)).
-
-(* constant 1255 *)
-definition l_e_st_eq_landau_n_eqpf2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_eqpf12 z z x y (l_e_st_eq_landau_n_refeq z) e : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf z y)).
-
-(* constant 1256 *)
-definition l_e_st_eq_landau_n_satz57 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 n) (l_e_st_eq_landau_n_fr x2 n)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 n) (l_e_st_eq_landau_n_ts x2 n)) (l_e_st_eq_landau_n_ts n n)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl x1 x2) n) (l_e_st_eq_landau_n_ts n n)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl x1 x2) n) (l_e_st_eq_landau_n_pfeq12a x1 n x2 n) (l_e_st_eq_landau_n_eqn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 n) (l_e_st_eq_landau_n_ts x2 n)) (l_e_st_eq_landau_n_ts n n) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl x1 x2) n) (l_e_st_eq_landau_n_distpt1 x1 x2 n)) (l_e_st_eq_landau_n_satz40c (l_e_st_eq_landau_n_pl x1 x2) n n) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 n) (l_e_st_eq_landau_n_fr x2 n)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl x1 x2) n)).
-
-(* constant 1257 *)
-definition l_e_st_eq_landau_n_satz57a ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_symeq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 n) (l_e_st_eq_landau_n_fr x2 n)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl x1 x2) n) (l_e_st_eq_landau_n_satz57 x1 x2 n) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl x1 x2) n) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 n) (l_e_st_eq_landau_n_fr x2 n))).
-
-(* constant 1258 *)
-definition l_e_st_eq_landau_n_satz58 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_eqnd (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_compl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x y) (l_e_st_eq_landau_n_pf y x)).
-
-(* constant 1259 *)
-definition l_e_st_eq_landau_n_compf ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz58 x y : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x y) (l_e_st_eq_landau_n_pf y x)).
-
-(* constant 1260 *)
-definition l_e_st_eq_landau_n_359_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ists1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1261 *)
-definition l_e_st_eq_landau_n_359_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_359_t1 x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1262 *)
-definition l_e_st_eq_landau_n_359_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_disttp1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_359_t2 x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1263 *)
-definition l_e_st_eq_landau_n_359_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_assts2 (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1264 *)
-definition l_e_st_eq_landau_n_359_t5 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_359_t3 x y z) (l_e_st_eq_landau_n_359_t4 x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1265 *)
-definition l_e_st_eq_landau_n_359_t6 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_distpt1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1266 *)
-definition l_e_st_eq_landau_n_359_t7 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_359_t5 x y z) (l_e_st_eq_landau_n_asspl1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_359_t6 x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1267 *)
-definition l_e_st_eq_landau_n_satz59 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_pfeq2a z (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_eqnd (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_359_t7 x y z) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_pfeq1b x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_pf y z))).
-
-(* constant 1268 *)
-definition l_e_st_eq_landau_n_asspf1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz59 x y z : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_pf y z))).
-
-(* constant 1269 *)
-definition l_e_st_eq_landau_n_asspf2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_symeq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_asspf1 x y z) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_pf x y) z)).
-
-(* constant 1270 *)
-definition l_e_st_eq_landau_n_stets1 ≝ λa:l_e_st_eq_landau_n_nat.λb:l_e_st_eq_landau_n_nat.λc:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) c) (l_e_st_eq_landau_n_ts a (l_e_st_eq_landau_n_ts b c)) (l_e_st_eq_landau_n_ts a (l_e_st_eq_landau_n_ts c b)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a c) b) (l_e_st_eq_landau_n_assts1 a b c) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts b c) (l_e_st_eq_landau_n_ts c b) a (l_e_st_eq_landau_n_comts b c)) (l_e_st_eq_landau_n_assts2 a c b) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) c) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a c) b)).
-
-(* constant 1271 *)
-definition l_e_st_eq_landau_n_359_t8 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_disttp1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_stets1 (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1272 *)
-definition l_e_st_eq_landau_n_359_t9 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_assts2 (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_stets1 (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1273 *)
-definition l_e_st_eq_landau_n_359_anderst7 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_359_t8 x y z) (l_e_st_eq_landau_n_359_t9 x y z)) (l_e_st_eq_landau_n_asspl1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_distpt1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1274 *)
-definition l_e_st_eq_landau_n_360_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz18 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y))).
-
-(* constant 1275 *)
-definition l_e_st_eq_landau_n_360_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz32a (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_360_t1 x y) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1276 *)
-definition l_e_st_eq_landau_n_360_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1277 *)
-definition l_e_st_eq_landau_n_360_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_ismore2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_360_t3 x y) (l_e_st_eq_landau_n_360_t2 x y) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1278 *)
-definition l_e_st_eq_landau_n_satz60 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_morefi2 x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_360_t4 x y) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x y) x).
-
-(* constant 1279 *)
-definition l_e_st_eq_landau_n_satz60a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_pf x y) x (l_e_st_eq_landau_n_satz60 x y) : l_e_st_eq_landau_n_lessf x (l_e_st_eq_landau_n_pf x y)).
-
-(* constant 1280 *)
-definition l_e_st_eq_landau_n_361_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_satz32a (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z) m : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z))).
-
-(* constant 1281 *)
-definition l_e_st_eq_landau_n_361_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_stets1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_stets1 (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_361_t1 x y z m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1282 *)
-definition l_e_st_eq_landau_n_361_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_stets1 (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1283 *)
-definition l_e_st_eq_landau_n_361_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_satz19h (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_361_t3 x y z m) (l_e_st_eq_landau_n_361_t2 x y z m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1284 *)
-definition l_e_st_eq_landau_n_361_t5 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_distpt1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_distpt1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_361_t4 x y z m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1285 *)
-definition l_e_st_eq_landau_n_361_t6 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_satz32a (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_361_t5 x y z m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z))).
-
-(* constant 1286 *)
-definition l_e_st_eq_landau_n_361_t7 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_361_t6 x y z m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1287 *)
-definition l_e_st_eq_landau_n_satz61 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_morefi12 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_361_t7 x y z m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)).
-
-(* constant 1288 *)
-definition l_e_st_eq_landau_n_satz62a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_satz61 x y z m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)).
-
-(* constant 1289 *)
-definition l_e_st_eq_landau_n_satz62b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_eqpf1 x y z e : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)).
-
-(* constant 1290 *)
-definition l_e_st_eq_landau_n_satz62c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_satz61 y x z (l_e_st_eq_landau_n_satz43 x y l)) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)).
-
-(* constant 1291 *)
-definition l_e_st_eq_landau_n_satz62d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_eqmoref12 (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_pf z y) (l_e_st_eq_landau_n_compf x z) (l_e_st_eq_landau_n_compf y z) (l_e_st_eq_landau_n_satz62a x y z m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf z y)).
-
-(* constant 1292 *)
-definition l_e_st_eq_landau_n_satz62e ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_eqpf2 x y z e : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf z y)).
-
-(* constant 1293 *)
-definition l_e_st_eq_landau_n_satz62f ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_eqlessf12 (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_pf z y) (l_e_st_eq_landau_n_compf x z) (l_e_st_eq_landau_n_compf y z) (l_e_st_eq_landau_n_satz62c x y z l) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf z y)).
-
-(* constant 1294 *)
-definition l_e_st_eq_landau_n_satz62g ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λm:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_eqmoref2 (l_e_st_eq_landau_n_pf x u) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_eqpf1 x y u e) (l_e_st_eq_landau_n_satz62d z u x m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1295 *)
-definition l_e_st_eq_landau_n_satz62h ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λm:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_eqmoref12 (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf u y) (l_e_st_eq_landau_n_compf x z) (l_e_st_eq_landau_n_compf y u) (l_e_st_eq_landau_n_satz62g x y z u e m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf u y)).
-
-(* constant 1296 *)
-definition l_e_st_eq_landau_n_satz62j ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λl:l_e_st_eq_landau_n_lessf z u.(l_e_st_eq_landau_n_eqlessf2 (l_e_st_eq_landau_n_pf x u) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_eqpf1 x y u e) (l_e_st_eq_landau_n_satz62f z u x l) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1297 *)
-definition l_e_st_eq_landau_n_satz62k ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λl:l_e_st_eq_landau_n_lessf z u.(l_e_st_eq_landau_n_eqlessf12 (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf u y) (l_e_st_eq_landau_n_compf x z) (l_e_st_eq_landau_n_compf y u) (l_e_st_eq_landau_n_satz62j x y z u e l) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf u y)).
-
-(* constant 1298 *)
-definition l_e_st_eq_landau_n_363_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz41a x y : l_or3 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y)).
-
-(* constant 1299 *)
-definition l_e_st_eq_landau_n_363_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz41b (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) : l_ec3 (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z))).
-
-(* constant 1300 *)
-definition l_e_st_eq_landau_n_satz63a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z).(l_ec3_th11 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_363_t1 x y z) (l_e_st_eq_landau_n_363_t2 x y z) (λu:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz62b x y z u) (λu:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz62a x y z u) (λu:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_satz62c x y z u) m : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1301 *)
-definition l_e_st_eq_landau_n_satz63b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z).(l_ec3_th10 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_363_t1 x y z) (l_e_st_eq_landau_n_363_t2 x y z) (λu:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz62b x y z u) (λu:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz62a x y z u) (λu:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_satz62c x y z u) e : l_e_st_eq_landau_n_eq x y).
-
-(* constant 1302 *)
-definition l_e_st_eq_landau_n_satz63c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z).(l_ec3_th12 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_363_t1 x y z) (l_e_st_eq_landau_n_363_t2 x y z) (λu:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz62b x y z u) (λu:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz62a x y z u) (λu:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_satz62c x y z u) l : l_e_st_eq_landau_n_lessf x y).
-
-(* constant 1303 *)
-definition l_e_st_eq_landau_n_satz63d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf z y).(l_e_st_eq_landau_n_satz63a x y z (l_e_st_eq_landau_n_eqmoref12 (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf z y) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_compf z x) (l_e_st_eq_landau_n_compf z y) m) : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1304 *)
-definition l_e_st_eq_landau_n_satz63e ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf z y).(l_e_st_eq_landau_n_satz63b x y z (l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf z y) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_compf x z) e (l_e_st_eq_landau_n_compf z y)) : l_e_st_eq_landau_n_eq x y).
-
-(* constant 1305 *)
-definition l_e_st_eq_landau_n_satz63f ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λf:l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf z y).(l_e_st_eq_landau_n_satz63c x y z (l_e_st_eq_landau_n_eqlessf12 (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf z y) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_compf z x) (l_e_st_eq_landau_n_compf z y) f) : l_e_st_eq_landau_n_lessf x y).
-
-(* constant 1306 *)
-definition l_e_st_eq_landau_n_364_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_satz61 x y z m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)).
-
-(* constant 1307 *)
-definition l_e_st_eq_landau_n_364_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_eqmoref12 (l_e_st_eq_landau_n_pf z y) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_pf u y) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_compf z y) (l_e_st_eq_landau_n_compf u y) (l_e_st_eq_landau_n_satz61 z u y n) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1308 *)
-definition l_e_st_eq_landau_n_satz64 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_trmoref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_364_t1 x y z u m n) (l_e_st_eq_landau_n_364_t2 x y z u m n) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1309 *)
-definition l_e_st_eq_landau_n_satz64a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lessf z u.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_satz64 y x u z (l_e_st_eq_landau_n_satz43 x y l) (l_e_st_eq_landau_n_satz43 z u k)) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1310 *)
-definition l_e_st_eq_landau_n_satz65a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moref z u.(l_orapp (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)) m (λv:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz64 x y z u v n) (λv:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz62g x y z u v n) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1311 *)
-definition l_e_st_eq_landau_n_satz65b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moreq z u.(l_orapp (l_e_st_eq_landau_n_moref z u) (l_e_st_eq_landau_n_eq z u) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)) n (λv:l_e_st_eq_landau_n_moref z u.l_e_st_eq_landau_n_satz64 x y z u m v) (λv:l_e_st_eq_landau_n_eq z u.l_e_st_eq_landau_n_eqmoref2 (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_eqpf2 z u y v) (l_e_st_eq_landau_n_satz61 x y z m)) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1312 *)
-definition l_e_st_eq_landau_n_satz65c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lessf z u.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_satz65a y x u z (l_e_st_eq_landau_n_satz49 x y l) (l_e_st_eq_landau_n_satz43 z u k)) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1313 *)
-definition l_e_st_eq_landau_n_satz65d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lesseq z u.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_satz65b y x u z (l_e_st_eq_landau_n_satz43 x y l) (l_e_st_eq_landau_n_satz49 z u k)) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1314 *)
-definition l_e_st_eq_landau_n_366_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_moreqi2 (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_satz56 x y z u e f) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1315 *)
-definition l_e_st_eq_landau_n_366_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.λe:l_e_st_eq_landau_n_eq x y.λo:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_moreqi1 (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_satz65a x y z u m o) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1316 *)
-definition l_e_st_eq_landau_n_366_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.λe:l_e_st_eq_landau_n_eq x y.(l_orapp (l_e_st_eq_landau_n_moref z u) (l_e_st_eq_landau_n_eq z u) (l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)) n (λv:l_e_st_eq_landau_n_moref z u.l_e_st_eq_landau_n_366_t2 x y z u m n e v) (λv:l_e_st_eq_landau_n_eq z u.l_e_st_eq_landau_n_366_t1 x y z u m n e v) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1317 *)
-definition l_e_st_eq_landau_n_366_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.λo:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_moreqi1 (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_satz65b x y z u o n) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1318 *)
-definition l_e_st_eq_landau_n_satz66 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.(l_orapp (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)) m (λv:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_366_t4 x y z u m n v) (λv:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_366_t3 x y z u m n v) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1319 *)
-definition l_e_st_eq_landau_n_satz66a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq z u.(l_e_st_eq_landau_n_satz48 (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_satz66 y x u z (l_e_st_eq_landau_n_satz49 x y l) (l_e_st_eq_landau_n_satz49 z u k)) : l_e_st_eq_landau_n_lesseq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1320 *)
-definition l_e_st_eq_landau_n_367_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λv:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x.(l_e_st_eq_landau_n_eqmoref1 (l_e_st_eq_landau_n_pf y v) x y e (l_e_st_eq_landau_n_satz60 y v) : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1321 *)
-definition l_e_st_eq_landau_n_367_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λv:l_e_st_eq_landau_n_frac.(l_imp_th3 (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_satz41d x y l) (λt:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x.l_e_st_eq_landau_n_367_t1 x y l v t) : l_not (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x)).
-
-(* constant 1322 *)
-definition l_e_st_eq_landau_n_vorbemerkung67 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.(l_some_th5 l_e_st_eq_landau_n_frac (λv:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x) (λv:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_367_t2 x y l v) : l_not (l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y t) x))).
-
-(* constant 1323 *)
-definition l_e_st_eq_landau_n_satz67b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_frac.λw:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x.λf:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y w) x.(l_e_st_eq_landau_n_satz63e v w y (l_e_st_eq_landau_n_treq2 (l_e_st_eq_landau_n_pf y v) (l_e_st_eq_landau_n_pf y w) x e f) : l_e_st_eq_landau_n_eq v w).
-
-(* constant 1324 *)
-definition l_e_st_eq_landau_n_367_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_onei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) t) (l_e_st_eq_landau_n_satz8b (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) m : l_e_st_eq_landau_n_one (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) t)).
-
-(* constant 1325 *)
-definition l_e_st_eq_landau_n_367_vo ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_ind l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) t) (l_e_st_eq_landau_n_367_t3 x y m) : l_e_st_eq_landau_n_nat).
-
-(* constant 1326 *)
-definition l_e_st_eq_landau_n_367_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_oneax l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) t) (l_e_st_eq_landau_n_367_t3 x y m) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_367_vo x y m))).
-
-(* constant 1327 *)
-definition l_e_st_eq_landau_n_367_w ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_367_vo x y m) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) : l_e_st_eq_landau_n_frac).
-
-(* constant 1328 *)
-definition l_e_st_eq_landau_n_367_t5 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_treq y (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_satz40 y (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_eqd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_eq y (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1329 *)
-definition l_e_st_eq_landau_n_367_t6 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_tr4eq (l_e_st_eq_landau_n_pf y (l_e_st_eq_landau_n_367_w x y m)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_367_vo x y m) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_367_vo x y m)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) x (l_e_st_eq_landau_n_eqpf1 y (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_367_w x y m) (l_e_st_eq_landau_n_367_t5 x y m)) (l_e_st_eq_landau_n_satz57 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_367_vo x y m) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_eqn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_367_vo x y m)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_367_vo x y m)) (l_e_st_eq_landau_n_367_t4 x y m))) (l_e_st_eq_landau_n_satz40a x (l_e_st_eq_landau_n_2y x y)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y (l_e_st_eq_landau_n_367_w x y m)) x).
-
-(* constant 1330 *)
-definition l_e_st_eq_landau_n_satz67a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_somei l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y t) x) (l_e_st_eq_landau_n_367_w x y m) (l_e_st_eq_landau_n_367_t6 x y m) : l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y t) x)).
-
-(* constant 1331 *)
-definition l_e_st_eq_landau_n_mf ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_367_w x y m : l_e_st_eq_landau_n_frac).
-
-(* constant 1332 *)
-definition l_e_st_eq_landau_n_satz67c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_367_t6 x y m : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y (l_e_st_eq_landau_n_mf x y m)) x).
-
-(* constant 1333 *)
-definition l_e_st_eq_landau_n_satz67d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_symeq (l_e_st_eq_landau_n_pf y (l_e_st_eq_landau_n_mf x y m)) x (l_e_st_eq_landau_n_satz67c x y m) : l_e_st_eq_landau_n_eq x (l_e_st_eq_landau_n_pf y (l_e_st_eq_landau_n_mf x y m))).
-
-(* constant 1334 *)
-definition l_e_st_eq_landau_n_satz67e ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x.(l_e_st_eq_landau_n_satz67b x y v (l_e_st_eq_landau_n_mf x y m) e (l_e_st_eq_landau_n_satz67c x y m) : l_e_st_eq_landau_n_eq v (l_e_st_eq_landau_n_mf x y m)).
-
-(* constant 1335 *)
-definition l_e_st_eq_landau_n_tf ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) : l_e_st_eq_landau_n_frac).
-
-(* constant 1336 *)
-definition l_e_st_eq_landau_n_ii4_t1 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists12 (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) x1 (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2)) y1 (l_e_st_eq_landau_n_numis x1 x2) (l_e_st_eq_landau_n_numis y1 y2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts x1 y1)).
-
-(* constant 1337 *)
-definition l_e_st_eq_landau_n_ii4_t2 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists12 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)) x2 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2)) y2 (l_e_st_eq_landau_n_denis x1 x2) (l_e_st_eq_landau_n_denis y1 y2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts x2 y2)).
-
-(* constant 1338 *)
-definition l_e_st_eq_landau_n_tf12 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_isnd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts x1 y1) (l_e_st_eq_landau_n_ts x2 y2) (l_e_st_eq_landau_n_ii4_t1 x1 x2 y1 y2) (l_e_st_eq_landau_n_ii4_t2 x1 x2 y1 y2) : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x1 y1) (l_e_st_eq_landau_n_ts x2 y2))).
-
-(* constant 1339 *)
-definition l_e_st_eq_landau_n_ii4_t3 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) n1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_numis n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n1)).
-
-(* constant 1340 *)
-definition l_e_st_eq_landau_n_ii4_t4 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) n2 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_denis n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2)).
-
-(* constant 1341 *)
-definition l_e_st_eq_landau_n_tf1 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_isnd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2) (l_e_st_eq_landau_n_ii4_t3 x n1 n2) (l_e_st_eq_landau_n_ii4_t4 x n1 n2) : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2))).
-
-(* constant 1342 *)
-definition l_e_st_eq_landau_n_ii4_t5 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists1 (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) n1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_numis n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_1x x))).
-
-(* constant 1343 *)
-definition l_e_st_eq_landau_n_ii4_t6 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists1 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) n2 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_denis n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1344 *)
-definition l_e_st_eq_landau_n_tf2 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_isnd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ii4_t5 x n1 n2) (l_e_st_eq_landau_n_ii4_t6 x n1 n2) : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr n1 n2) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1345 *)
-definition l_e_st_eq_landau_n_tfeq12a ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x1 y1) (l_e_st_eq_landau_n_ts x2 y2)) (l_e_st_eq_landau_n_tf12 x1 x2 y1 y2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x1 y1) (l_e_st_eq_landau_n_ts x2 y2))).
-
-(* constant 1346 *)
-definition l_e_st_eq_landau_n_tfeq12b ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq2 (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x1 y1) (l_e_st_eq_landau_n_ts x2 y2)) (l_e_st_eq_landau_n_tf12 x1 x2 y1 y2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x1 y1) (l_e_st_eq_landau_n_ts x2 y2)) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2))).
-
-(* constant 1347 *)
-definition l_e_st_eq_landau_n_tfeq1a ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2)) (l_e_st_eq_landau_n_tf1 x n1 n2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2))).
-
-(* constant 1348 *)
-definition l_e_st_eq_landau_n_tfeq1b ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq2 (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2)) (l_e_st_eq_landau_n_tf1 x n1 n2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2)) (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_fr n1 n2))).
-
-(* constant 1349 *)
-definition l_e_st_eq_landau_n_tfeq2a ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr n1 n2) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_tf2 x n1 n2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr n1 n2) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1350 *)
-definition l_e_st_eq_landau_n_tfeq2b ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq2 (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr n1 n2) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_tf2 x n1 n2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr n1 n2) x)).
-
-(* constant 1351 *)
-definition l_e_st_eq_landau_n_468_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_ists12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) e f : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1352 *)
-definition l_e_st_eq_landau_n_stets2 ≝ λa:l_e_st_eq_landau_n_nat.λb:l_e_st_eq_landau_n_nat.λc:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) (l_e_st_eq_landau_n_ts d c)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a c) (l_e_st_eq_landau_n_ts d b)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a c) (l_e_st_eq_landau_n_ts b d)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts c d) (l_e_st_eq_landau_n_ts d c) (l_e_st_eq_landau_n_ts a b) (l_e_st_eq_landau_n_comts c d)) (l_e_st_eq_landau_n_stets a b d c) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts d b) (l_e_st_eq_landau_n_ts b d) (l_e_st_eq_landau_n_ts a c) (l_e_st_eq_landau_n_comts d b)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a c) (l_e_st_eq_landau_n_ts b d))).
-
-(* constant 1353 *)
-definition l_e_st_eq_landau_n_468_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_stets2 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_468_t1 x y z u e f) (l_e_st_eq_landau_n_stets2 (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1354 *)
-definition l_e_st_eq_landau_n_satz68 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_eqi12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_468_t2 x y z u e f) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1355 *)
-definition l_e_st_eq_landau_n_eqtf12 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_satz68 x y z u e f : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1356 *)
-definition l_e_st_eq_landau_n_eqtf1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_eqtf12 x y z z e (l_e_st_eq_landau_n_refeq z) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)).
-
-(* constant 1357 *)
-definition l_e_st_eq_landau_n_eqtf2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_eqtf12 z z x y (l_e_st_eq_landau_n_refeq z) e : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y)).
-
-(* constant 1358 *)
-definition l_e_st_eq_landau_n_satz69 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_eqnd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf y x)).
-
-(* constant 1359 *)
-definition l_e_st_eq_landau_n_comtf ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz69 x y : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf y x)).
-
-(* constant 1360 *)
-definition l_e_st_eq_landau_n_satz70 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_tf x y) z) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_tfeq2a z (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_eqnd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_tfeq1b x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_tf x y) z) (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_tf y z))).
-
-(* constant 1361 *)
-definition l_e_st_eq_landau_n_asstf1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz70 x y z : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_tf x y) z) (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_tf y z))).
-
-(* constant 1362 *)
-definition l_e_st_eq_landau_n_asstf2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_symeq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_tf x y) z) (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_asstf1 x y z) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_tf x y) z)).
-
-(* constant 1363 *)
-definition l_e_st_eq_landau_n_471_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))))) (l_e_st_eq_landau_n_tfeq1a x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_eqn (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_disttp2 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_satz57a (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))))).
-
-(* constant 1364 *)
-definition l_e_st_eq_landau_n_471_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_treq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_eqnd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_assts2 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_assts2 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_satz40c (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_tf x y)).
-
-(* constant 1365 *)
-definition l_e_st_eq_landau_n_471_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_treq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_eqd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_471_t2 x z y) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_tf x z)).
-
-(* constant 1366 *)
-definition l_e_st_eq_landau_n_satz71 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_treq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))))) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf x z)) (l_e_st_eq_landau_n_471_t1 x y z) (l_e_st_eq_landau_n_eqpf12 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_471_t2 x y z) (l_e_st_eq_landau_n_471_t3 x y z)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf x z))).
-
-(* constant 1367 *)
-definition l_e_st_eq_landau_n_disttpf1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_tf z (l_e_st_eq_landau_n_pf x y)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_comtf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_satz71 z x y) (l_e_st_eq_landau_n_eqpf12 (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf z y) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_comtf z x) (l_e_st_eq_landau_n_comtf z y)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z))).
-
-(* constant 1368 *)
-definition l_e_st_eq_landau_n_disttpf2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz71 x y z : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf x z))).
-
-(* constant 1369 *)
-definition l_e_st_eq_landau_n_distptf1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_symeq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_disttpf1 x y z) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_pf x y) z)).
-
-(* constant 1370 *)
-definition l_e_st_eq_landau_n_distptf2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_symeq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf x z)) (l_e_st_eq_landau_n_disttpf2 x y z) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf x z)) (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z))).
-
-(* constant 1371 *)
-definition l_e_st_eq_landau_n_472_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_satz32a (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2z x y z)) m : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1372 *)
-definition l_e_st_eq_landau_n_472_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_stets2 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_stets2 (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_472_t1 x y z m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1373 *)
-definition l_e_st_eq_landau_n_satz72a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_morefi12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_472_t2 x y z m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)).
-
-(* constant 1374 *)
-definition l_e_st_eq_landau_n_satz72b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_satz68 x y z z e (l_e_st_eq_landau_n_refeq z) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)).
-
-(* constant 1375 *)
-definition l_e_st_eq_landau_n_satz72c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_satz72a y x z (l_e_st_eq_landau_n_satz43 x y l)) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)).
-
-(* constant 1376 *)
-definition l_e_st_eq_landau_n_satz72d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_eqmoref12 (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_tf z y) (l_e_st_eq_landau_n_comtf x z) (l_e_st_eq_landau_n_comtf y z) (l_e_st_eq_landau_n_satz72a x y z m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y)).
-
-(* constant 1377 *)
-definition l_e_st_eq_landau_n_satz72e ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_eqtf2 x y z e : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y)).
-
-(* constant 1378 *)
-definition l_e_st_eq_landau_n_satz72f ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_eqlessf12 (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_tf z y) (l_e_st_eq_landau_n_comtf x z) (l_e_st_eq_landau_n_comtf y z) (l_e_st_eq_landau_n_satz72c x y z l) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y)).
-
-(* constant 1379 *)
-definition l_e_st_eq_landau_n_satz72g ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λm:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_eqmoref2 (l_e_st_eq_landau_n_tf x u) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_eqtf1 x y u e) (l_e_st_eq_landau_n_satz72d z u x m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1380 *)
-definition l_e_st_eq_landau_n_satz72h ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λm:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_eqmoref12 (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf u y) (l_e_st_eq_landau_n_comtf x z) (l_e_st_eq_landau_n_comtf y u) (l_e_st_eq_landau_n_satz72g x y z u e m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf u y)).
-
-(* constant 1381 *)
-definition l_e_st_eq_landau_n_satz72j ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λl:l_e_st_eq_landau_n_lessf z u.(l_e_st_eq_landau_n_eqlessf2 (l_e_st_eq_landau_n_tf x u) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_eqtf1 x y u e) (l_e_st_eq_landau_n_satz72f z u x l) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1382 *)
-definition l_e_st_eq_landau_n_satz72k ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λl:l_e_st_eq_landau_n_lessf z u.(l_e_st_eq_landau_n_eqlessf12 (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf u y) (l_e_st_eq_landau_n_comtf x z) (l_e_st_eq_landau_n_comtf y u) (l_e_st_eq_landau_n_satz72j x y z u e l) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf u y)).
-
-(* constant 1383 *)
-definition l_e_st_eq_landau_n_473_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz41a x y : l_or3 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y)).
-
-(* constant 1384 *)
-definition l_e_st_eq_landau_n_473_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz41b (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z) : l_ec3 (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z))).
-
-(* constant 1385 *)
-definition l_e_st_eq_landau_n_satz73a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z).(l_ec3_th11 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_473_t1 x y z) (l_e_st_eq_landau_n_473_t2 x y z) (λu:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz72b x y z u) (λu:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz72a x y z u) (λu:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_satz72c x y z u) m : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1386 *)
-definition l_e_st_eq_landau_n_satz73b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z).(l_ec3_th10 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_473_t1 x y z) (l_e_st_eq_landau_n_473_t2 x y z) (λu:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz72b x y z u) (λu:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz72a x y z u) (λu:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_satz72c x y z u) e : l_e_st_eq_landau_n_eq x y).
-
-(* constant 1387 *)
-definition l_e_st_eq_landau_n_satz73c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z).(l_ec3_th12 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_473_t1 x y z) (l_e_st_eq_landau_n_473_t2 x y z) (λu:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz72b x y z u) (λu:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz72a x y z u) (λu:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_satz72c x y z u) l : l_e_st_eq_landau_n_lessf x y).
-
-(* constant 1388 *)
-definition l_e_st_eq_landau_n_satz73d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y).(l_e_st_eq_landau_n_satz73a x y z (l_e_st_eq_landau_n_eqmoref12 (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf z y) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_comtf z x) (l_e_st_eq_landau_n_comtf z y) m) : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1389 *)
-definition l_e_st_eq_landau_n_satz73e ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y).(l_e_st_eq_landau_n_satz73b x y z (l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_comtf x z) e (l_e_st_eq_landau_n_comtf z y)) : l_e_st_eq_landau_n_eq x y).
-
-(* constant 1390 *)
-definition l_e_st_eq_landau_n_satz73f ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y).(l_e_st_eq_landau_n_satz73c x y z (l_e_st_eq_landau_n_eqlessf12 (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf z y) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_comtf z x) (l_e_st_eq_landau_n_comtf z y) l) : l_e_st_eq_landau_n_lessf x y).
-
-(* constant 1391 *)
-definition l_e_st_eq_landau_n_474_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_satz72a x y z m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)).
-
-(* constant 1392 *)
-definition l_e_st_eq_landau_n_474_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_eqmoref12 (l_e_st_eq_landau_n_tf z y) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_tf u y) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_comtf z y) (l_e_st_eq_landau_n_comtf u y) (l_e_st_eq_landau_n_satz72a z u y n) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1393 *)
-definition l_e_st_eq_landau_n_satz74 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_trmoref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_474_t1 x y z u m n) (l_e_st_eq_landau_n_474_t2 x y z u m n) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1394 *)
-definition l_e_st_eq_landau_n_satz74a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lessf z u.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_satz74 y x u z (l_e_st_eq_landau_n_satz43 x y l) (l_e_st_eq_landau_n_satz43 z u k)) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1395 *)
-definition l_e_st_eq_landau_n_satz75a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moref z u.(l_orapp (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)) m (λv:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz74 x y z u v n) (λv:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz72g x y z u v n) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1396 *)
-definition l_e_st_eq_landau_n_satz75b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moreq z u.(l_orapp (l_e_st_eq_landau_n_moref z u) (l_e_st_eq_landau_n_eq z u) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)) n (λv:l_e_st_eq_landau_n_moref z u.l_e_st_eq_landau_n_satz74 x y z u m v) (λv:l_e_st_eq_landau_n_eq z u.l_e_st_eq_landau_n_eqmoref2 (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_eqtf2 z u y v) (l_e_st_eq_landau_n_satz72a x y z m)) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1397 *)
-definition l_e_st_eq_landau_n_satz75c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lessf z u.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_satz75a y x u z (l_e_st_eq_landau_n_satz49 x y l) (l_e_st_eq_landau_n_satz43 z u k)) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1398 *)
-definition l_e_st_eq_landau_n_satz75d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lesseq z u.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_satz75b y x u z (l_e_st_eq_landau_n_satz43 x y l) (l_e_st_eq_landau_n_satz49 z u k)) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1399 *)
-definition l_e_st_eq_landau_n_476_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_moreqi2 (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_satz68 x y z u e f) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1400 *)
-definition l_e_st_eq_landau_n_476_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.λe:l_e_st_eq_landau_n_eq x y.λo:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_moreqi1 (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_satz75a x y z u m o) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1401 *)
-definition l_e_st_eq_landau_n_476_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.λe:l_e_st_eq_landau_n_eq x y.(l_orapp (l_e_st_eq_landau_n_moref z u) (l_e_st_eq_landau_n_eq z u) (l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)) n (λv:l_e_st_eq_landau_n_moref z u.l_e_st_eq_landau_n_476_t2 x y z u m n e v) (λv:l_e_st_eq_landau_n_eq z u.l_e_st_eq_landau_n_476_t1 x y z u m n e v) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1402 *)
-definition l_e_st_eq_landau_n_476_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.λo:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_moreqi1 (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_satz75b x y z u o n) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1403 *)
-definition l_e_st_eq_landau_n_satz76 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.(l_orapp (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)) m (λv:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_476_t4 x y z u m n v) (λv:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_476_t3 x y z u m n v) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1404 *)
-definition l_e_st_eq_landau_n_satz76a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq z u.(l_e_st_eq_landau_n_satz48 (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_satz76 y x u z (l_e_st_eq_landau_n_satz49 x y l) (l_e_st_eq_landau_n_satz49 z u k)) : l_e_st_eq_landau_n_lesseq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1405 *)
-definition l_e_st_eq_landau_n_satz77b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_frac.λw:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y v) x.λf:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y w) x.(l_e_st_eq_landau_n_satz73e v w y (l_e_st_eq_landau_n_treq2 (l_e_st_eq_landau_n_tf y v) (l_e_st_eq_landau_n_tf y w) x e f) : l_e_st_eq_landau_n_eq v w).
-
-(* constant 1406 *)
-definition l_e_st_eq_landau_n_477_v ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1y x y)) : l_e_st_eq_landau_n_frac).
-
-(* constant 1407 *)
-definition l_e_st_eq_landau_n_477_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_tr4eq (l_e_st_eq_landau_n_tf y (l_e_st_eq_landau_n_477_v x y)) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_477_v x y) y) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)))) x (l_e_st_eq_landau_n_comtf y (l_e_st_eq_landau_n_477_v x y)) (l_e_st_eq_landau_n_tfeq2a y (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1y x y))) (l_e_st_eq_landau_n_eqnd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_1y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_1y x y)))) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_satz40a x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y (l_e_st_eq_landau_n_477_v x y)) x).
-
-(* constant 1408 *)
-definition l_e_st_eq_landau_n_satz77a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_somei l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y t) x) (l_e_st_eq_landau_n_477_v x y) (l_e_st_eq_landau_n_477_t1 x y) : l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y t) x)).
-
-(* constant 1409 *)
-definition l_e_st_eq_landau_n_rt_eq ≝ (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq x y : ∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.Prop).
-
-(* constant 1410 *)
-definition l_e_st_eq_landau_n_rt_refeq ≝ (λx:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_refeq x : ∀x:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_eq x x).
-
-(* constant 1411 *)
-definition l_e_st_eq_landau_n_rt_symeq ≝ (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λt:l_e_st_eq_landau_n_rt_eq x y.l_e_st_eq_landau_n_symeq x y t : ∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.∀t:l_e_st_eq_landau_n_rt_eq x y.l_e_st_eq_landau_n_rt_eq y x).
-
-(* constant 1412 *)
-definition l_e_st_eq_landau_n_rt_treq ≝ (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λt:l_e_st_eq_landau_n_rt_eq x y.λu:l_e_st_eq_landau_n_rt_eq y z.l_e_st_eq_landau_n_treq x y z t u : ∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.∀z:l_e_st_eq_landau_n_frac.∀t:l_e_st_eq_landau_n_rt_eq x y.∀u:l_e_st_eq_landau_n_rt_eq y z.l_e_st_eq_landau_n_rt_eq x z).
-
-(* constant 1413 *)
-definition l_e_st_eq_landau_n_rt_inf ≝ λx:l_e_st_eq_landau_n_frac.λs:l_e_st_set l_e_st_eq_landau_n_frac.(l_e_st_esti l_e_st_eq_landau_n_frac x s : Prop).
-
-(* constant 1414 *)
-definition l_e_st_eq_landau_n_rt_rat ≝ (l_e_st_eq_ect l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq : Type[0]).
-
-(* constant 1415 *)
-definition l_e_st_eq_landau_n_rt_is ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_is l_e_st_eq_landau_n_rt_rat x0 y0 : Prop).
-
-(* constant 1416 *)
-definition l_e_st_eq_landau_n_rt_nis ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_not (l_e_st_eq_landau_n_rt_is x0 y0) : Prop).
-
-(* constant 1417 *)
-definition l_e_st_eq_landau_n_rt_some ≝ λp:∀x:l_e_st_eq_landau_n_rt_rat.Prop.(l_some l_e_st_eq_landau_n_rt_rat p : Prop).
-
-(* constant 1418 *)
-definition l_e_st_eq_landau_n_rt_all ≝ λp:∀x:l_e_st_eq_landau_n_rt_rat.Prop.(l_all l_e_st_eq_landau_n_rt_rat p : Prop).
-
-(* constant 1419 *)
-definition l_e_st_eq_landau_n_rt_one ≝ λp:∀x:l_e_st_eq_landau_n_rt_rat.Prop.(l_e_one l_e_st_eq_landau_n_rt_rat p : Prop).
-
-(* constant 1420 *)
-definition l_e_st_eq_landau_n_rt_in ≝ λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.(l_e_st_esti l_e_st_eq_landau_n_rt_rat x0 s : Prop).
-
-(* constant 1421 *)
-definition l_e_st_eq_landau_n_rt_ratof ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_ectelt l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq x : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1422 *)
-definition l_e_st_eq_landau_n_rt_class ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_ecect l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq x0 : l_e_st_set l_e_st_eq_landau_n_frac).
-
-(* constant 1423 *)
-definition l_e_st_eq_landau_n_rt_inclass ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_4_th5 l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq x : l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_ratof x))).
-
-(* constant 1424 *)
-definition l_e_st_eq_landau_n_rt_lemmaeq1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_4_th8 l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq x0 x xix0 y e : l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class x0)).
-
-(* constant 1425 *)
-definition l_e_st_eq_landau_n_rt_ratapp1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λa:Prop.λa1:∀x:l_e_st_eq_landau_n_frac.∀xi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).a.(l_e_st_eq_4_th3 l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq x0 a a1 : a).
-
-(* constant 1426 *)
-definition l_e_st_eq_landau_n_rt_ii5_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λa:Prop.λa1:∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.∀xi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).∀yi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).a.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_rt_ratapp1 y0 a (λy:l_e_st_eq_landau_n_frac.λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).a1 x y xix0 yi) : a).
-
-(* constant 1427 *)
-definition l_e_st_eq_landau_n_rt_ratapp2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λa:Prop.λa1:∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.∀xi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).∀yi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).a.(l_e_st_eq_landau_n_rt_ratapp1 x0 a (λx:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).l_e_st_eq_landau_n_rt_ii5_t1 x0 y0 a a1 x xi) : a).
-
-(* constant 1428 *)
-definition l_e_st_eq_landau_n_rt_ii5_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λa:Prop.λa1:∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.∀z:l_e_st_eq_landau_n_frac.∀xi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).∀yi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).∀zi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).a.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_rt_ratapp2 y0 z0 a (λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).a1 x y z xix0 yi zi) : a).
-
-(* constant 1429 *)
-definition l_e_st_eq_landau_n_rt_ratapp3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λa:Prop.λa1:∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.∀z:l_e_st_eq_landau_n_frac.∀xi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).∀yi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).∀zi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).a.(l_e_st_eq_landau_n_rt_ratapp1 x0 a (λx:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).l_e_st_eq_landau_n_rt_ii5_t2 x0 y0 z0 a a1 x xi) : a).
-
-(* constant 1430 *)
-definition l_e_st_eq_landau_n_rt_ii5_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λa:Prop.λa1:∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.∀z:l_e_st_eq_landau_n_frac.∀u:l_e_st_eq_landau_n_frac.∀xi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).∀yi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).∀zi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).∀ui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).a.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_rt_ratapp3 y0 z0 u0 a (λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).a1 x y z u xix0 yi zi ui) : a).
-
-(* constant 1431 *)
-definition l_e_st_eq_landau_n_rt_ratapp4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λa:Prop.λa1:∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.∀z:l_e_st_eq_landau_n_frac.∀u:l_e_st_eq_landau_n_frac.∀xi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).∀yi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).∀zi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).∀ui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).a.(l_e_st_eq_landau_n_rt_ratapp1 x0 a (λx:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).l_e_st_eq_landau_n_rt_ii5_t3 x0 y0 z0 u0 a a1 x xi) : a).
-
-(* constant 1432 *)
-definition l_e_st_eq_landau_n_rt_isi ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λe:l_e_st_eq_landau_n_eq x1 y1.(l_e_st_eq_5_th3 l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq x0 y0 x1 x1ix0 y1 y1iy0 e : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 1433 *)
-definition l_e_st_eq_landau_n_rt_ise ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_5_th5 l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq x0 y0 x1 x1ix0 y1 y1iy0 i : l_e_st_eq_landau_n_eq x1 y1).
-
-(* constant 1434 *)
-definition l_e_st_eq_landau_n_rt_nisi ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λn:l_not (l_e_st_eq_landau_n_eq x1 y1).(l_imp_th3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_eq x1 y1) n (λt:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_rt_ise x0 y0 x1 y1 x1ix0 y1iy0 t) : l_e_st_eq_landau_n_rt_nis x0 y0).
-
-(* constant 1435 *)
-definition l_e_st_eq_landau_n_rt_nise ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λn:l_e_st_eq_landau_n_rt_nis x0 y0.(l_imp_th3 (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_rt_is x0 y0) n (λt:l_e_st_eq_landau_n_eq x1 y1.l_e_st_eq_landau_n_rt_isi x0 y0 x1 y1 x1ix0 y1iy0 t) : l_not (l_e_st_eq_landau_n_eq x1 y1)).
-
-(* constant 1436 *)
-definition l_e_st_eq_landau_n_rt_fixf ≝ λalpha:Type[0].λf:Πx:l_e_st_eq_landau_n_frac.Πy:l_e_st_eq_landau_n_frac.alpha.(l_e_st_eq_fixfu2 l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq alpha f : Prop).
-
-(* constant 1437 *)
-definition l_e_st_eq_landau_n_rt_indrat ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λalpha:Type[0].λf:Πx:l_e_st_eq_landau_n_frac.Πy:l_e_st_eq_landau_n_frac.alpha.λff:l_e_st_eq_landau_n_rt_fixf alpha f.(l_e_st_eq_indeq2 l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq alpha f ff x0 y0 : alpha).
-
-(* constant 1438 *)
-definition l_e_st_eq_landau_n_rt_isindrat ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λalpha:Type[0].λf:Πx:l_e_st_eq_landau_n_frac.Πy:l_e_st_eq_landau_n_frac.alpha.λff:l_e_st_eq_landau_n_rt_fixf alpha f.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_11_th1 l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq alpha f ff x0 y0 x xix0 y yiy0 : l_e_is alpha (f x y) (l_e_st_eq_landau_n_rt_indrat x0 y0 alpha f ff)).
-
-(* constant 1439 *)
-definition l_e_st_eq_landau_n_rt_satz78 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_refis l_e_st_eq_landau_n_rt_rat x0 : l_e_st_eq_landau_n_rt_is x0 x0).
-
-(* constant 1440 *)
-definition l_e_st_eq_landau_n_rt_satz79 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_symis l_e_st_eq_landau_n_rt_rat x0 y0 i : l_e_st_eq_landau_n_rt_is y0 x0).
-
-(* constant 1441 *)
-definition l_e_st_eq_landau_n_rt_satz80 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λj:l_e_st_eq_landau_n_rt_is y0 z0.(l_e_tris l_e_st_eq_landau_n_rt_rat x0 y0 z0 i j : l_e_st_eq_landau_n_rt_is x0 z0).
-
-(* constant 1442 *)
-definition l_e_st_eq_landau_n_rt_more ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_some l_e_st_eq_landau_n_frac (λx:l_e_st_eq_landau_n_frac.l_some l_e_st_eq_landau_n_frac (λy:l_e_st_eq_landau_n_frac.l_and3 (l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_moref x y))) : Prop).
-
-(* constant 1443 *)
-definition l_e_st_eq_landau_n_rt_ii5_propm ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.(l_and3 (l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_moref x1 y1) : Prop).
-
-(* constant 1444 *)
-definition l_e_st_eq_landau_n_rt_ii5_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u).λu:l_e_st_eq_landau_n_frac.λp:l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u.(l_and3e1 (l_e_st_eq_landau_n_rt_inf t (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_moref t u) p : l_e_st_eq_landau_n_rt_inf t (l_e_st_eq_landau_n_rt_class x0)).
-
-(* constant 1445 *)
-definition l_e_st_eq_landau_n_rt_ii5_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u).λu:l_e_st_eq_landau_n_frac.λp:l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u.(l_and3e2 (l_e_st_eq_landau_n_rt_inf t (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_moref t u) p : l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class y0)).
-
-(* constant 1446 *)
-definition l_e_st_eq_landau_n_rt_ii5_t6 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u).λu:l_e_st_eq_landau_n_frac.λp:l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u.(l_and3e3 (l_e_st_eq_landau_n_rt_inf t (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_moref t u) p : l_e_st_eq_landau_n_moref t u).
-
-(* constant 1447 *)
-definition l_e_st_eq_landau_n_rt_ii5_t7 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u).λu:l_e_st_eq_landau_n_frac.λp:l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u.(l_e_st_eq_landau_n_satz44 t u x y (l_e_st_eq_landau_n_rt_ii5_t6 x0 y0 m x y xix0 yiy0 t s u p) (l_e_st_eq_landau_n_rt_ise x0 x0 t x (l_e_st_eq_landau_n_rt_ii5_t4 x0 y0 m x y xix0 yiy0 t s u p) xix0 (l_e_refis l_e_st_eq_landau_n_rt_rat x0)) (l_e_st_eq_landau_n_rt_ise y0 y0 u y (l_e_st_eq_landau_n_rt_ii5_t5 x0 y0 m x y xix0 yiy0 t s u p) yiy0 (l_e_refis l_e_st_eq_landau_n_rt_rat y0)) : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1448 *)
-definition l_e_st_eq_landau_n_rt_ii5_t8 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u).(l_someapp l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u) s (l_e_st_eq_landau_n_moref x y) (λu:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u.l_e_st_eq_landau_n_rt_ii5_t7 x0 y0 m x y xix0 yiy0 t s u v) : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1449 *)
-definition l_e_st_eq_landau_n_rt_also18 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_someapp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u)) m (l_e_st_eq_landau_n_moref x y) (λt:l_e_st_eq_landau_n_frac.λv:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u).l_e_st_eq_landau_n_rt_ii5_t8 x0 y0 m x y xix0 yiy0 t v) : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1450 *)
-definition l_e_st_eq_landau_n_rt_ii5_t9 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λm:l_e_st_eq_landau_n_moref x1 y1.(l_and3i (l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_moref x1 y1) x1ix0 y1iy0 m : l_e_st_eq_landau_n_rt_ii5_propm x0 y0 x1 y1).
-
-(* constant 1451 *)
-definition l_e_st_eq_landau_n_rt_ii5_t10 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λm:l_e_st_eq_landau_n_moref x1 y1.(l_somei l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 x1 t) y1 (l_e_st_eq_landau_n_rt_ii5_t9 x0 y0 x1 y1 x1ix0 y1iy0 m) : l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 x1 t)).
-
-(* constant 1452 *)
-definition l_e_st_eq_landau_n_rt_morei ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λm:l_e_st_eq_landau_n_moref x1 y1.(l_somei l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 u t)) x1 (l_e_st_eq_landau_n_rt_ii5_t10 x0 y0 x1 y1 x1ix0 y1iy0 m) : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 1453 *)
-definition l_e_st_eq_landau_n_rt_moree ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_also18 x0 y0 m x1 y1 x1ix0 y1iy0 : l_e_st_eq_landau_n_moref x1 y1).
-
-(* constant 1454 *)
-definition l_e_st_eq_landau_n_rt_ismore1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λm:l_e_st_eq_landau_n_rt_more x0 z0.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t z0) x0 y0 m i : l_e_st_eq_landau_n_rt_more y0 z0).
-
-(* constant 1455 *)
-definition l_e_st_eq_landau_n_rt_ismore2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λm:l_e_st_eq_landau_n_rt_more z0 x0.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more z0 t) x0 y0 m i : l_e_st_eq_landau_n_rt_more z0 y0).
-
-(* constant 1456 *)
-definition l_e_st_eq_landau_n_rt_ismore12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 u0.λm:l_e_st_eq_landau_n_rt_more x0 z0.(l_e_st_eq_landau_n_rt_ismore2 z0 u0 y0 j (l_e_st_eq_landau_n_rt_ismore1 x0 y0 z0 i m) : l_e_st_eq_landau_n_rt_more y0 u0).
-
-(* constant 1457 *)
-definition l_e_st_eq_landau_n_rt_less ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_some l_e_st_eq_landau_n_frac (λx:l_e_st_eq_landau_n_frac.l_some l_e_st_eq_landau_n_frac (λy:l_e_st_eq_landau_n_frac.l_and3 (l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_lessf x y))) : Prop).
-
-(* constant 1458 *)
-definition l_e_st_eq_landau_n_rt_ii5_propl ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.(l_and3 (l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_lessf x1 y1) : Prop).
-
-(* constant 1459 *)
-definition l_e_st_eq_landau_n_rt_ii5_t11 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u).λu:l_e_st_eq_landau_n_frac.λp:l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u.(l_and3e1 (l_e_st_eq_landau_n_rt_inf t (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_lessf t u) p : l_e_st_eq_landau_n_rt_inf t (l_e_st_eq_landau_n_rt_class x0)).
-
-(* constant 1460 *)
-definition l_e_st_eq_landau_n_rt_ii5_t12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u).λu:l_e_st_eq_landau_n_frac.λp:l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u.(l_and3e2 (l_e_st_eq_landau_n_rt_inf t (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_lessf t u) p : l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class y0)).
-
-(* constant 1461 *)
-definition l_e_st_eq_landau_n_rt_ii5_t13 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u).λu:l_e_st_eq_landau_n_frac.λp:l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u.(l_and3e3 (l_e_st_eq_landau_n_rt_inf t (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_lessf t u) p : l_e_st_eq_landau_n_lessf t u).
-
-(* constant 1462 *)
-definition l_e_st_eq_landau_n_rt_ii5_t14 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u).λu:l_e_st_eq_landau_n_frac.λp:l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u.(l_e_st_eq_landau_n_satz45 t u x y (l_e_st_eq_landau_n_rt_ii5_t13 x0 y0 l x y xix0 yiy0 t s u p) (l_e_st_eq_landau_n_rt_ise x0 x0 t x (l_e_st_eq_landau_n_rt_ii5_t11 x0 y0 l x y xix0 yiy0 t s u p) xix0 (l_e_refis l_e_st_eq_landau_n_rt_rat x0)) (l_e_st_eq_landau_n_rt_ise y0 y0 u y (l_e_st_eq_landau_n_rt_ii5_t12 x0 y0 l x y xix0 yiy0 t s u p) yiy0 (l_e_refis l_e_st_eq_landau_n_rt_rat y0)) : l_e_st_eq_landau_n_lessf x y).
-
-(* constant 1463 *)
-definition l_e_st_eq_landau_n_rt_ii5_t15 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u).(l_someapp l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u) s (l_e_st_eq_landau_n_lessf x y) (λu:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u.l_e_st_eq_landau_n_rt_ii5_t14 x0 y0 l x y xix0 yiy0 t s u v) : l_e_st_eq_landau_n_lessf x y).
-
-(* constant 1464 *)
-definition l_e_st_eq_landau_n_rt_also19 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_someapp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u)) l (l_e_st_eq_landau_n_lessf x y) (λt:l_e_st_eq_landau_n_frac.λv:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u).l_e_st_eq_landau_n_rt_ii5_t15 x0 y0 l x y xix0 yiy0 t v) : l_e_st_eq_landau_n_lessf x y).
-
-(* constant 1465 *)
-definition l_e_st_eq_landau_n_rt_ii5_t16 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λl:l_e_st_eq_landau_n_lessf x1 y1.(l_and3i (l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_lessf x1 y1) x1ix0 y1iy0 l : l_e_st_eq_landau_n_rt_ii5_propl x0 y0 x1 y1).
-
-(* constant 1466 *)
-definition l_e_st_eq_landau_n_rt_ii5_t17 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λl:l_e_st_eq_landau_n_lessf x1 y1.(l_somei l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 x1 t) y1 (l_e_st_eq_landau_n_rt_ii5_t16 x0 y0 x1 y1 x1ix0 y1iy0 l) : l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 x1 t)).
-
-(* constant 1467 *)
-definition l_e_st_eq_landau_n_rt_lessi ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λl:l_e_st_eq_landau_n_lessf x1 y1.(l_somei l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 u t)) x1 (l_e_st_eq_landau_n_rt_ii5_t17 x0 y0 x1 y1 x1ix0 y1iy0 l) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1468 *)
-definition l_e_st_eq_landau_n_rt_lesse ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_also19 x0 y0 l x1 y1 x1ix0 y1iy0 : l_e_st_eq_landau_n_lessf x1 y1).
-
-(* constant 1469 *)
-definition l_e_st_eq_landau_n_rt_isless1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λl:l_e_st_eq_landau_n_rt_less x0 z0.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less t z0) x0 y0 l i : l_e_st_eq_landau_n_rt_less y0 z0).
-
-(* constant 1470 *)
-definition l_e_st_eq_landau_n_rt_isless2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λl:l_e_st_eq_landau_n_rt_less z0 x0.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less z0 t) x0 y0 l i : l_e_st_eq_landau_n_rt_less z0 y0).
-
-(* constant 1471 *)
-definition l_e_st_eq_landau_n_rt_isless12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 u0.λl:l_e_st_eq_landau_n_rt_less x0 z0.(l_e_st_eq_landau_n_rt_isless2 z0 u0 y0 j (l_e_st_eq_landau_n_rt_isless1 x0 y0 z0 i l) : l_e_st_eq_landau_n_rt_less y0 u0).
-
-(* constant 1472 *)
-definition l_e_st_eq_landau_n_rt_581_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_satz41a x1 y1 : l_or3 (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_moref x1 y1) (l_e_st_eq_landau_n_lessf x1 y1)).
-
-(* constant 1473 *)
-definition l_e_st_eq_landau_n_rt_581_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λe:l_e_st_eq_landau_n_eq x1 y1.(l_or3i1 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_isi x0 y0 x1 y1 x1ix0 y1iy0 e) : l_or3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1474 *)
-definition l_e_st_eq_landau_n_rt_581_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λm:l_e_st_eq_landau_n_moref x1 y1.(l_or3i2 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_morei x0 y0 x1 y1 x1ix0 y1iy0 m) : l_or3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1475 *)
-definition l_e_st_eq_landau_n_rt_581_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λl:l_e_st_eq_landau_n_lessf x1 y1.(l_or3i3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_lessi x0 y0 x1 y1 x1ix0 y1iy0 l) : l_or3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1476 *)
-definition l_e_st_eq_landau_n_rt_581_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_or3app (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_moref x1 y1) (l_e_st_eq_landau_n_lessf x1 y1) (l_or3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)) (l_e_st_eq_landau_n_rt_581_t1 x0 y0 x1 y1 x1ix0 y1iy0) (λt:l_e_st_eq_landau_n_eq x1 y1.l_e_st_eq_landau_n_rt_581_t2 x0 y0 x1 y1 x1ix0 y1iy0 t) (λt:l_e_st_eq_landau_n_moref x1 y1.l_e_st_eq_landau_n_rt_581_t3 x0 y0 x1 y1 x1ix0 y1iy0 t) (λt:l_e_st_eq_landau_n_lessf x1 y1.l_e_st_eq_landau_n_rt_581_t4 x0 y0 x1 y1 x1ix0 y1iy0 t) : l_or3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1477 *)
-definition l_e_st_eq_landau_n_rt_581_t6 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_satz41b x1 y1 : l_ec3 (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_moref x1 y1) (l_e_st_eq_landau_n_lessf x1 y1)).
-
-(* constant 1478 *)
-definition l_e_st_eq_landau_n_rt_581_t7 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_imp_th3 (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_moref x1 y1) (l_ec3e12 (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_moref x1 y1) (l_e_st_eq_landau_n_lessf x1 y1) (l_e_st_eq_landau_n_rt_581_t6 x0 y0 x1 y1 x1ix0 y1iy0) (l_e_st_eq_landau_n_rt_ise x0 y0 x1 y1 x1ix0 y1iy0 i)) (λt:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_moree x0 y0 x1 y1 x1ix0 y1iy0 t) : l_not (l_e_st_eq_landau_n_rt_more x0 y0)).
-
-(* constant 1479 *)
-definition l_e_st_eq_landau_n_rt_581_t8 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_imp_th3 (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_lessf x1 y1) (l_ec3e23 (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_moref x1 y1) (l_e_st_eq_landau_n_lessf x1 y1) (l_e_st_eq_landau_n_rt_581_t6 x0 y0 x1 y1 x1ix0 y1iy0) (l_e_st_eq_landau_n_rt_moree x0 y0 x1 y1 x1ix0 y1iy0 m)) (λt:l_e_st_eq_landau_n_rt_less x0 y0.l_e_st_eq_landau_n_rt_lesse x0 y0 x1 y1 x1ix0 y1iy0 t) : l_not (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1480 *)
-definition l_e_st_eq_landau_n_rt_581_t9 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_imp_th3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_eq x1 y1) (l_ec3e31 (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_moref x1 y1) (l_e_st_eq_landau_n_lessf x1 y1) (l_e_st_eq_landau_n_rt_581_t6 x0 y0 x1 y1 x1ix0 y1iy0) (l_e_st_eq_landau_n_rt_lesse x0 y0 x1 y1 x1ix0 y1iy0 l)) (λt:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_rt_ise x0 y0 x1 y1 x1ix0 y1iy0 t) : l_e_st_eq_landau_n_rt_nis x0 y0).
-
-(* constant 1481 *)
-definition l_e_st_eq_landau_n_rt_581_t10 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_ec3_th6 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_ec_th1 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (λt:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_rt_581_t7 x0 y0 x1 y1 x1ix0 y1iy0 t)) (l_ec_th1 (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (λt:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_581_t8 x0 y0 x1 y1 x1ix0 y1iy0 t)) (l_ec_th1 (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) (λt:l_e_st_eq_landau_n_rt_less x0 y0.l_e_st_eq_landau_n_rt_581_t9 x0 y0 x1 y1 x1ix0 y1iy0 t)) : l_ec3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1482 *)
-definition l_e_st_eq_landau_n_rt_581_t11 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_orec3i (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_581_t5 x0 y0 x1 y1 x1ix0 y1iy0) (l_e_st_eq_landau_n_rt_581_t10 x0 y0 x1 y1 x1ix0 y1iy0) : l_orec3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1483 *)
-definition l_e_st_eq_landau_n_rt_satz81 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_orec3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_581_t11 x0 y0 x y xi yi) : l_orec3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1484 *)
-definition l_e_st_eq_landau_n_rt_satz81a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_orec3e1 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81 x0 y0) : l_or3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1485 *)
-definition l_e_st_eq_landau_n_rt_satz81b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_orec3e2 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81 x0 y0) : l_ec3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1486 *)
-definition l_e_st_eq_landau_n_rt_582_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_lessi y0 x0 y x yiy0 xix0 (l_e_st_eq_landau_n_satz42 x y (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m)) : l_e_st_eq_landau_n_rt_less y0 x0).
-
-(* constant 1487 *)
-definition l_e_st_eq_landau_n_rt_satz82 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_less y0 x0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_582_t1 x0 y0 m x y xi yi) : l_e_st_eq_landau_n_rt_less y0 x0).
-
-(* constant 1488 *)
-definition l_e_st_eq_landau_n_rt_583_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_morei y0 x0 y x yiy0 xix0 (l_e_st_eq_landau_n_satz43 x y (l_e_st_eq_landau_n_rt_lesse x0 y0 x y xix0 yiy0 l)) : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 1489 *)
-definition l_e_st_eq_landau_n_rt_satz83 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_more y0 x0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_583_t1 x0 y0 l x y xi yi) : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 1490 *)
-definition l_e_st_eq_landau_n_rt_moreis ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_or (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) : Prop).
-
-(* constant 1491 *)
-definition l_e_st_eq_landau_n_rt_moreisi1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_ori1 (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) m : l_e_st_eq_landau_n_rt_moreis x0 y0).
-
-(* constant 1492 *)
-definition l_e_st_eq_landau_n_rt_moreisi2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_ori2 (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) i : l_e_st_eq_landau_n_rt_moreis x0 y0).
-
-(* constant 1493 *)
-definition l_e_st_eq_landau_n_rt_moreisi ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λm:l_e_st_eq_landau_n_moreq x1 y1.(l_orapp (l_e_st_eq_landau_n_moref x1 y1) (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_rt_moreis x0 y0) m (λt:l_e_st_eq_landau_n_moref x1 y1.l_e_st_eq_landau_n_rt_moreisi1 x0 y0 (l_e_st_eq_landau_n_rt_morei x0 y0 x1 y1 x1ix0 y1iy0 t)) (λt:l_e_st_eq_landau_n_eq x1 y1.l_e_st_eq_landau_n_rt_moreisi2 x0 y0 (l_e_st_eq_landau_n_rt_isi x0 y0 x1 y1 x1ix0 y1iy0 t)) : l_e_st_eq_landau_n_rt_moreis x0 y0).
-
-(* constant 1494 *)
-definition l_e_st_eq_landau_n_rt_moreise ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λm:l_e_st_eq_landau_n_rt_moreis x0 y0.(l_orapp (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_moreq x1 y1) m (λt:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_moreqi1 x1 y1 (l_e_st_eq_landau_n_rt_moree x0 y0 x1 y1 x1ix0 y1iy0 t)) (λt:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_moreqi2 x1 y1 (l_e_st_eq_landau_n_rt_ise x0 y0 x1 y1 x1ix0 y1iy0 t)) : l_e_st_eq_landau_n_moreq x1 y1).
-
-(* constant 1495 *)
-definition l_e_st_eq_landau_n_rt_ismoreis1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λm:l_e_st_eq_landau_n_rt_moreis x0 z0.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_moreis t z0) x0 y0 m i : l_e_st_eq_landau_n_rt_moreis y0 z0).
-
-(* constant 1496 *)
-definition l_e_st_eq_landau_n_rt_ismoreis2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λm:l_e_st_eq_landau_n_rt_moreis z0 x0.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_moreis z0 t) x0 y0 m i : l_e_st_eq_landau_n_rt_moreis z0 y0).
-
-(* constant 1497 *)
-definition l_e_st_eq_landau_n_rt_ismoreis12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 u0.λm:l_e_st_eq_landau_n_rt_moreis x0 z0.(l_e_st_eq_landau_n_rt_ismoreis2 z0 u0 y0 j (l_e_st_eq_landau_n_rt_ismoreis1 x0 y0 z0 i m) : l_e_st_eq_landau_n_rt_moreis y0 u0).
-
-(* constant 1498 *)
-definition l_e_st_eq_landau_n_rt_lessis ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_or (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) : Prop).
-
-(* constant 1499 *)
-definition l_e_st_eq_landau_n_rt_lessisi1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_ori1 (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) l : l_e_st_eq_landau_n_rt_lessis x0 y0).
-
-(* constant 1500 *)
-definition l_e_st_eq_landau_n_rt_lessisi2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_ori2 (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) i : l_e_st_eq_landau_n_rt_lessis x0 y0).
-
-(* constant 1501 *)
-definition l_e_st_eq_landau_n_rt_lessisi ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λl:l_e_st_eq_landau_n_lesseq x1 y1.(l_orapp (l_e_st_eq_landau_n_lessf x1 y1) (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_rt_lessis x0 y0) l (λt:l_e_st_eq_landau_n_lessf x1 y1.l_e_st_eq_landau_n_rt_lessisi1 x0 y0 (l_e_st_eq_landau_n_rt_lessi x0 y0 x1 y1 x1ix0 y1iy0 t)) (λt:l_e_st_eq_landau_n_eq x1 y1.l_e_st_eq_landau_n_rt_lessisi2 x0 y0 (l_e_st_eq_landau_n_rt_isi x0 y0 x1 y1 x1ix0 y1iy0 t)) : l_e_st_eq_landau_n_rt_lessis x0 y0).
-
-(* constant 1502 *)
-definition l_e_st_eq_landau_n_rt_lessise ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λl:l_e_st_eq_landau_n_rt_lessis x0 y0.(l_orapp (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_lesseq x1 y1) l (λt:l_e_st_eq_landau_n_rt_less x0 y0.l_e_st_eq_landau_n_lesseqi1 x1 y1 (l_e_st_eq_landau_n_rt_lesse x0 y0 x1 y1 x1ix0 y1iy0 t)) (λt:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_lesseqi2 x1 y1 (l_e_st_eq_landau_n_rt_ise x0 y0 x1 y1 x1ix0 y1iy0 t)) : l_e_st_eq_landau_n_lesseq x1 y1).
-
-(* constant 1503 *)
-definition l_e_st_eq_landau_n_rt_islessis1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λl:l_e_st_eq_landau_n_rt_lessis x0 z0.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lessis t z0) x0 y0 l i : l_e_st_eq_landau_n_rt_lessis y0 z0).
-
-(* constant 1504 *)
-definition l_e_st_eq_landau_n_rt_islessis2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λl:l_e_st_eq_landau_n_rt_lessis z0 x0.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lessis z0 t) x0 y0 l i : l_e_st_eq_landau_n_rt_lessis z0 y0).
-
-(* constant 1505 *)
-definition l_e_st_eq_landau_n_rt_islessis12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 u0.λl:l_e_st_eq_landau_n_rt_lessis x0 z0.(l_e_st_eq_landau_n_rt_islessis2 z0 u0 y0 j (l_e_st_eq_landau_n_rt_islessis1 x0 y0 z0 i l) : l_e_st_eq_landau_n_rt_lessis y0 u0).
-
-(* constant 1506 *)
-definition l_e_st_eq_landau_n_rt_satz81c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.(l_ec3_th7 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) (l_comor (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) m) : l_not (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1507 *)
-definition l_e_st_eq_landau_n_rt_satz81d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.(l_ec3_th9 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) l : l_not (l_e_st_eq_landau_n_rt_more x0 y0)).
-
-(* constant 1508 *)
-definition l_e_st_eq_landau_n_rt_satz81e ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_more x0 y0).(l_or3_th2 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81a x0 y0) n : l_e_st_eq_landau_n_rt_lessis x0 y0).
-
-(* constant 1509 *)
-definition l_e_st_eq_landau_n_rt_satz81f ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_less x0 y0).(l_comor (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_or3_th3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81a x0 y0) n) : l_e_st_eq_landau_n_rt_moreis x0 y0).
-
-(* constant 1510 *)
-definition l_e_st_eq_landau_n_rt_satz81g ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_or_th3 (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) (l_ec3e23 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) m) (l_ec3e21 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) m) : l_not (l_e_st_eq_landau_n_rt_lessis x0 y0)).
-
-(* constant 1511 *)
-definition l_e_st_eq_landau_n_rt_satz81h ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_or_th3 (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) (l_ec3e32 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) l) (l_ec3e31 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) l) : l_not (l_e_st_eq_landau_n_rt_moreis x0 y0)).
-
-(* constant 1512 *)
-definition l_e_st_eq_landau_n_rt_satz81j ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_moreis x0 y0).(l_or3e3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81a x0 y0) (l_or_th5 (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) n) (l_or_th4 (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) n) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1513 *)
-definition l_e_st_eq_landau_n_rt_satz81k ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_lessis x0 y0).(l_or3e2 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81a x0 y0) (l_or_th4 (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) n) (l_or_th5 (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) n) : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 1514 *)
-definition l_e_st_eq_landau_n_rt_584_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_lessisi y0 x0 y x yiy0 xix0 (l_e_st_eq_landau_n_satz48 x y (l_e_st_eq_landau_n_rt_moreise x0 y0 x y xix0 yiy0 m)) : l_e_st_eq_landau_n_rt_lessis y0 x0).
-
-(* constant 1515 *)
-definition l_e_st_eq_landau_n_rt_satz84 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_lessis y0 x0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_584_t1 x0 y0 m x y xi yi) : l_e_st_eq_landau_n_rt_lessis y0 x0).
-
-(* constant 1516 *)
-definition l_e_st_eq_landau_n_rt_585_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_moreisi y0 x0 y x yiy0 xix0 (l_e_st_eq_landau_n_satz49 x y (l_e_st_eq_landau_n_rt_lessise x0 y0 x y xix0 yiy0 l)) : l_e_st_eq_landau_n_rt_moreis y0 x0).
-
-(* constant 1517 *)
-definition l_e_st_eq_landau_n_rt_satz85 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_moreis y0 x0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_585_t1 x0 y0 l x y xi yi) : l_e_st_eq_landau_n_rt_moreis y0 x0).
-
-(* constant 1518 *)
-definition l_e_st_eq_landau_n_rt_586_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_less y0 z0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_lessi x0 z0 x z xix0 ziz0 (l_e_st_eq_landau_n_satz50 x y z (l_e_st_eq_landau_n_rt_lesse x0 y0 x y xix0 yiy0 l) (l_e_st_eq_landau_n_rt_lesse y0 z0 y z yiy0 ziz0 k)) : l_e_st_eq_landau_n_rt_less x0 z0).
-
-(* constant 1519 *)
-definition l_e_st_eq_landau_n_rt_satz86 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_less y0 z0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_less x0 z0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_586_t1 x0 y0 z0 l k x y z xi yi zi) : l_e_st_eq_landau_n_rt_less x0 z0).
-
-(* constant 1520 *)
-definition l_e_st_eq_landau_n_rt_trless ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_less y0 z0.(l_e_st_eq_landau_n_rt_satz86 x0 y0 z0 l k : l_e_st_eq_landau_n_rt_less x0 z0).
-
-(* constant 1521 *)
-definition l_e_st_eq_landau_n_rt_trmore ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_more y0 z0.(l_e_st_eq_landau_n_rt_satz83 z0 x0 (l_e_st_eq_landau_n_rt_satz86 z0 y0 x0 (l_e_st_eq_landau_n_rt_satz82 y0 z0 n) (l_e_st_eq_landau_n_rt_satz82 x0 y0 m)) : l_e_st_eq_landau_n_rt_more x0 z0).
-
-(* constant 1522 *)
-definition l_e_st_eq_landau_n_rt_587_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_less y0 z0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_lessi x0 z0 x z xix0 ziz0 (l_e_st_eq_landau_n_satz51a x y z (l_e_st_eq_landau_n_rt_lessise x0 y0 x y xix0 yiy0 l) (l_e_st_eq_landau_n_rt_lesse y0 z0 y z yiy0 ziz0 k)) : l_e_st_eq_landau_n_rt_less x0 z0).
-
-(* constant 1523 *)
-definition l_e_st_eq_landau_n_rt_satz87a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_less y0 z0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_less x0 z0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_587_t1 x0 y0 z0 l k x y z xi yi zi) : l_e_st_eq_landau_n_rt_less x0 z0).
-
-(* constant 1524 *)
-definition l_e_st_eq_landau_n_rt_587_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_lessis y0 z0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_lessi x0 z0 x z xix0 ziz0 (l_e_st_eq_landau_n_satz51b x y z (l_e_st_eq_landau_n_rt_lesse x0 y0 x y xix0 yiy0 l) (l_e_st_eq_landau_n_rt_lessise y0 z0 y z yiy0 ziz0 k)) : l_e_st_eq_landau_n_rt_less x0 z0).
-
-(* constant 1525 *)
-definition l_e_st_eq_landau_n_rt_satz87b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_lessis y0 z0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_less x0 z0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_587_t2 x0 y0 z0 l k x y z xi yi zi) : l_e_st_eq_landau_n_rt_less x0 z0).
-
-(* constant 1526 *)
-definition l_e_st_eq_landau_n_rt_satz87c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_more y0 z0.(l_e_st_eq_landau_n_rt_satz83 z0 x0 (l_e_st_eq_landau_n_rt_satz87b z0 y0 x0 (l_e_st_eq_landau_n_rt_satz82 y0 z0 n) (l_e_st_eq_landau_n_rt_satz84 x0 y0 m)) : l_e_st_eq_landau_n_rt_more x0 z0).
-
-(* constant 1527 *)
-definition l_e_st_eq_landau_n_rt_satz87d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_moreis y0 z0.(l_e_st_eq_landau_n_rt_satz83 z0 x0 (l_e_st_eq_landau_n_rt_satz87a z0 y0 x0 (l_e_st_eq_landau_n_rt_satz84 y0 z0 n) (l_e_st_eq_landau_n_rt_satz82 x0 y0 m)) : l_e_st_eq_landau_n_rt_more x0 z0).
-
-(* constant 1528 *)
-definition l_e_st_eq_landau_n_rt_588_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_lessis y0 z0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_lessisi x0 z0 x z xix0 ziz0 (l_e_st_eq_landau_n_satz52 x y z (l_e_st_eq_landau_n_rt_lessise x0 y0 x y xix0 yiy0 l) (l_e_st_eq_landau_n_rt_lessise y0 z0 y z yiy0 ziz0 k)) : l_e_st_eq_landau_n_rt_lessis x0 z0).
-
-(* constant 1529 *)
-definition l_e_st_eq_landau_n_rt_satz88 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_lessis y0 z0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_lessis x0 z0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_588_t1 x0 y0 z0 l k x y z xi yi zi) : l_e_st_eq_landau_n_rt_lessis x0 z0).
-
-(* constant 1530 *)
-definition l_e_st_eq_landau_n_rt_trlessis ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_lessis y0 z0.(l_e_st_eq_landau_n_rt_satz88 x0 y0 z0 l k : l_e_st_eq_landau_n_rt_lessis x0 z0).
-
-(* constant 1531 *)
-definition l_e_st_eq_landau_n_rt_trmoreis ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_moreis y0 z0.(l_e_st_eq_landau_n_rt_satz85 z0 x0 (l_e_st_eq_landau_n_rt_satz88 z0 y0 x0 (l_e_st_eq_landau_n_rt_satz84 y0 z0 n) (l_e_st_eq_landau_n_rt_satz84 x0 y0 m)) : l_e_st_eq_landau_n_rt_moreis x0 z0).
-
-(* constant 1532 *)
-definition l_e_st_eq_landau_n_rt_589_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref z x.(l_somei l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t x0) (l_e_st_eq_landau_n_rt_ratof z) (l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_ratof z) x0 z x (l_e_st_eq_landau_n_rt_inclass z) xix0 m) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t x0)).
-
-(* constant 1533 *)
-definition l_e_st_eq_landau_n_rt_589_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_someapp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_moref t x) (l_e_st_eq_landau_n_satz53 x) (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t x0)) (λt:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_moref t x.l_e_st_eq_landau_n_rt_589_t1 x0 x xix0 t u) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t x0)).
-
-(* constant 1534 *)
-definition l_e_st_eq_landau_n_rt_satz89 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp1 x0 (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t x0)) (λx:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).l_e_st_eq_landau_n_rt_589_t2 x0 x xi) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t x0)).
-
-(* constant 1535 *)
-definition l_e_st_eq_landau_n_rt_590_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf z x.(l_somei l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less t x0) (l_e_st_eq_landau_n_rt_ratof z) (l_e_st_eq_landau_n_rt_lessi (l_e_st_eq_landau_n_rt_ratof z) x0 z x (l_e_st_eq_landau_n_rt_inclass z) xix0 l) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less t x0)).
-
-(* constant 1536 *)
-definition l_e_st_eq_landau_n_rt_590_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_someapp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_lessf t x) (l_e_st_eq_landau_n_satz54 x) (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less t x0)) (λt:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_lessf t x.l_e_st_eq_landau_n_rt_590_t1 x0 x xix0 t u) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less t x0)).
-
-(* constant 1537 *)
-definition l_e_st_eq_landau_n_rt_satz90 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp1 x0 (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less t x0)) (λx:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).l_e_st_eq_landau_n_rt_590_t2 x0 x xi) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less t x0)).
-
-(* constant 1538 *)
-definition l_e_st_eq_landau_n_rt_591_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λz:l_e_st_eq_landau_n_frac.λa:l_and (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_lessf z y).(l_e_st_eq_landau_n_rt_lessi x0 (l_e_st_eq_landau_n_rt_ratof z) x z xix0 (l_e_st_eq_landau_n_rt_inclass z) (l_ande1 (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_lessf z y) a) : l_e_st_eq_landau_n_rt_less x0 (l_e_st_eq_landau_n_rt_ratof z)).
-
-(* constant 1539 *)
-definition l_e_st_eq_landau_n_rt_591_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λz:l_e_st_eq_landau_n_frac.λa:l_and (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_lessf z y).(l_e_st_eq_landau_n_rt_lessi (l_e_st_eq_landau_n_rt_ratof z) y0 z y (l_e_st_eq_landau_n_rt_inclass z) yiy0 (l_ande2 (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_lessf z y) a) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ratof z) y0).
-
-(* constant 1540 *)
-definition l_e_st_eq_landau_n_rt_591_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λz:l_e_st_eq_landau_n_frac.λa:l_and (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_lessf z y).(l_andi (l_e_st_eq_landau_n_rt_less x0 (l_e_st_eq_landau_n_rt_ratof z)) (l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ratof z) y0) (l_e_st_eq_landau_n_rt_591_t1 x0 y0 l x y xix0 yiy0 z a) (l_e_st_eq_landau_n_rt_591_t2 x0 y0 l x y xix0 yiy0 z a) : l_and (l_e_st_eq_landau_n_rt_less x0 (l_e_st_eq_landau_n_rt_ratof z)) (l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ratof z) y0)).
-
-(* constant 1541 *)
-definition l_e_st_eq_landau_n_rt_591_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λz:l_e_st_eq_landau_n_frac.λa:l_and (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_lessf z y).(l_somei l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x0 t) (l_e_st_eq_landau_n_rt_less t y0)) (l_e_st_eq_landau_n_rt_ratof z) (l_e_st_eq_landau_n_rt_591_t3 x0 y0 l x y xix0 yiy0 z a) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x0 t) (l_e_st_eq_landau_n_rt_less t y0))).
-
-(* constant 1542 *)
-definition l_e_st_eq_landau_n_rt_591_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_someapp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_and (l_e_st_eq_landau_n_lessf x t) (l_e_st_eq_landau_n_lessf t y)) (l_e_st_eq_landau_n_satz55 x y (l_e_st_eq_landau_n_rt_lesse x0 y0 x y xix0 yiy0 l)) (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x0 t) (l_e_st_eq_landau_n_rt_less t y0))) (λt:l_e_st_eq_landau_n_frac.λu:l_and (l_e_st_eq_landau_n_lessf x t) (l_e_st_eq_landau_n_lessf t y).l_e_st_eq_landau_n_rt_591_t4 x0 y0 l x y xix0 yiy0 t u) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x0 t) (l_e_st_eq_landau_n_rt_less t y0))).
-
-(* constant 1543 *)
-definition l_e_st_eq_landau_n_rt_satz91 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x0 t) (l_e_st_eq_landau_n_rt_less t y0))) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_591_t5 x0 y0 l x y xi yi) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x0 t) (l_e_st_eq_landau_n_rt_less t y0))).
-
-(* constant 1544 *)
-definition l_e_st_eq_landau_n_rt_plusfrt ≝ (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_pf x y) : Πx:l_e_st_eq_landau_n_frac.Πy:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1545 *)
-definition l_e_st_eq_landau_n_rt_ii5_t18 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_pf x z)) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_pf y u)) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_pf x z)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_pf y u)) (l_e_st_eq_landau_n_satz56 x y z u e f) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_plusfrt x z) (l_e_st_eq_landau_n_rt_plusfrt y u)).
-
-(* constant 1546 *)
-definition l_e_st_eq_landau_n_rt_fplusfrt ≝ (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_rt_eq x y.λw:l_e_st_eq_landau_n_rt_eq z u.l_e_st_eq_landau_n_rt_ii5_t18 x y z u v w : l_e_st_eq_landau_n_rt_fixf l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_plusfrt).
-
-(* constant 1547 *)
-definition l_e_st_eq_landau_n_rt_pl ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_indrat x0 y0 l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_plusfrt l_e_st_eq_landau_n_rt_fplusfrt : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1548 *)
-definition l_e_st_eq_landau_n_rt_ii5_t19 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_isindrat x0 y0 l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_plusfrt l_e_st_eq_landau_n_rt_fplusfrt x1 y1 x1ix0 y1iy0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_pf x1 y1)) (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 1549 *)
-definition l_e_st_eq_landau_n_rt_picp ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_pf x1 y1) (l_e_st_eq_landau_n_rt_class t)) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_pf x1 y1)) (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_pf x1 y1)) (l_e_st_eq_landau_n_rt_ii5_t19 x0 y0 x1 y1 x1ix0 y1iy0) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_pf x1 y1) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_pl x0 y0))).
-
-(* constant 1550 *)
-definition l_e_st_eq_landau_n_rt_ispl1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_isf l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_pl t z0) x0 y0 i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1551 *)
-definition l_e_st_eq_landau_n_rt_ispl2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_isf l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_pl z0 t) x0 y0 i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl z0 x0) (l_e_st_eq_landau_n_rt_pl z0 y0)).
-
-(* constant 1552 *)
-definition l_e_st_eq_landau_n_rt_ispl12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 u0.(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_rt_ispl1 x0 y0 z0 i) (l_e_st_eq_landau_n_rt_ispl2 z0 u0 y0 j) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1553 *)
-definition l_e_st_eq_landau_n_rt_592_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_pl y0 x0) (l_e_st_eq_landau_n_pf x1 y1) (l_e_st_eq_landau_n_pf y1 x1) (l_e_st_eq_landau_n_rt_picp x0 y0 x1 y1 x1ix0 y1iy0) (l_e_st_eq_landau_n_rt_picp y0 x0 y1 x1 y1iy0 x1ix0) (l_e_st_eq_landau_n_satz58 x1 y1) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_pl y0 x0)).
-
-(* constant 1554 *)
-definition l_e_st_eq_landau_n_rt_satz92 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_pl y0 x0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_592_t1 x0 y0 x y xi yi) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_pl y0 x0)).
-
-(* constant 1555 *)
-definition l_e_st_eq_landau_n_rt_compl ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz92 x0 y0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_pl y0 x0)).
-
-(* constant 1556 *)
-definition l_e_st_eq_landau_n_rt_593_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_picp (l_e_st_eq_landau_n_rt_pl x0 y0) z0 (l_e_st_eq_landau_n_pf x y) z (l_e_st_eq_landau_n_rt_picp x0 y0 x y xix0 yiy0) ziz0 : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0))).
-
-(* constant 1557 *)
-definition l_e_st_eq_landau_n_rt_593_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_picp x0 (l_e_st_eq_landau_n_rt_pl y0 z0) x (l_e_st_eq_landau_n_pf y z) xix0 (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0)))).
-
-(* constant 1558 *)
-definition l_e_st_eq_landau_n_rt_593_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_rt_593_t1 x0 y0 z0 x y z xix0 yiy0 ziz0) (l_e_st_eq_landau_n_rt_593_t2 x0 y0 z0 x y z xix0 yiy0 ziz0) (l_e_st_eq_landau_n_satz59 x y z) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0))).
-
-(* constant 1559 *)
-definition l_e_st_eq_landau_n_rt_satz93 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0))) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_593_t3 x0 y0 z0 x y z xi yi zi) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0))).
-
-(* constant 1560 *)
-definition l_e_st_eq_landau_n_rt_asspl1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz93 x0 y0 z0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0))).
-
-(* constant 1561 *)
-definition l_e_st_eq_landau_n_rt_asspl2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_satz93 x0 y0 z0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0)).
-
-(* constant 1562 *)
-definition l_e_st_eq_landau_n_rt_594_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_pl x0 y0) x0 (l_e_st_eq_landau_n_pf x1 y1) x1 (l_e_st_eq_landau_n_rt_picp x0 y0 x1 y1 x1ix0 y1iy0) x1ix0 (l_e_st_eq_landau_n_satz60 x1 y1) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 y0) x0).
-
-(* constant 1563 *)
-definition l_e_st_eq_landau_n_rt_satz94 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 y0) x0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_594_t1 x0 y0 x y xi yi) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 y0) x0).
-
-(* constant 1564 *)
-definition l_e_st_eq_landau_n_rt_satz94a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_pl x0 y0) x0 (l_e_st_eq_landau_n_rt_satz94 x0 y0) : l_e_st_eq_landau_n_rt_less x0 (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 1565 *)
-definition l_e_st_eq_landau_n_rt_595_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) (l_e_st_eq_landau_n_satz61 x y z (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1566 *)
-definition l_e_st_eq_landau_n_rt_satz95 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_595_t1 x0 y0 z0 m x y z xi yi zi) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1567 *)
-definition l_e_st_eq_landau_n_rt_596_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) (l_e_st_eq_landau_n_satz62a x y z (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1568 *)
-definition l_e_st_eq_landau_n_rt_satz96a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_596_t1 x0 y0 z0 m x y z xi yi zi) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1569 *)
-definition l_e_st_eq_landau_n_rt_596_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) (l_e_st_eq_landau_n_satz62b x y z (l_e_st_eq_landau_n_rt_ise x0 y0 x y xix0 yiy0 i)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1570 *)
-definition l_e_st_eq_landau_n_rt_satz96b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_596_t2 x0 y0 z0 i x y z xi yi zi) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1571 *)
-definition l_e_st_eq_landau_n_rt_596_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_lessi (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) (l_e_st_eq_landau_n_satz62c x y z (l_e_st_eq_landau_n_rt_lesse x0 y0 x y xix0 yiy0 l)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1572 *)
-definition l_e_st_eq_landau_n_rt_satz96c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_596_t3 x0 y0 z0 l x y z xi yi zi) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1573 *)
-definition l_e_st_eq_landau_n_rt_596_andersa ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_satz95 x0 y0 z0 m : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1574 *)
-definition l_e_st_eq_landau_n_rt_596_andersb ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_ispl1 x0 y0 z0 i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1575 *)
-definition l_e_st_eq_landau_n_rt_596_andersc ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_satz95 y0 x0 z0 (l_e_st_eq_landau_n_rt_satz83 x0 y0 l)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1576 *)
-definition l_e_st_eq_landau_n_rt_satz96d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_ismore12 (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl z0 x0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_pl z0 y0) (l_e_st_eq_landau_n_rt_compl x0 z0) (l_e_st_eq_landau_n_rt_compl y0 z0) (l_e_st_eq_landau_n_rt_satz96a x0 y0 z0 m) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl z0 x0) (l_e_st_eq_landau_n_rt_pl z0 y0)).
-
-(* constant 1577 *)
-definition l_e_st_eq_landau_n_rt_satz96e ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_ispl2 x0 y0 z0 i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl z0 x0) (l_e_st_eq_landau_n_rt_pl z0 y0)).
-
-(* constant 1578 *)
-definition l_e_st_eq_landau_n_rt_satz96f ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl z0 x0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_pl z0 y0) (l_e_st_eq_landau_n_rt_compl x0 z0) (l_e_st_eq_landau_n_rt_compl y0 z0) (l_e_st_eq_landau_n_rt_satz96c x0 y0 z0 l) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl z0 x0) (l_e_st_eq_landau_n_rt_pl z0 y0)).
-
-(* constant 1579 *)
-definition l_e_st_eq_landau_n_rt_597_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0).λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_morei x0 y0 x y xix0 yiy0 (l_e_st_eq_landau_n_satz63a x y z (l_e_st_eq_landau_n_rt_moree (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) m)) : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 1580 *)
-definition l_e_st_eq_landau_n_rt_satz97a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_more x0 y0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_597_t1 x0 y0 z0 m x y z xi yi zi) : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 1581 *)
-definition l_e_st_eq_landau_n_rt_597_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0).λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_isi x0 y0 x y xix0 yiy0 (l_e_st_eq_landau_n_satz63b x y z (l_e_st_eq_landau_n_rt_ise (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) i)) : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 1582 *)
-definition l_e_st_eq_landau_n_rt_satz97b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_is x0 y0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_597_t2 x0 y0 z0 i x y z xi yi zi) : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 1583 *)
-definition l_e_st_eq_landau_n_rt_597_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0).λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_lessi x0 y0 x y xix0 yiy0 (l_e_st_eq_landau_n_satz63c x y z (l_e_st_eq_landau_n_rt_lesse (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) l)) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1584 *)
-definition l_e_st_eq_landau_n_rt_satz97c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_less x0 y0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_597_t3 x0 y0 z0 l x y z xi yi zi) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1585 *)
-definition l_e_st_eq_landau_n_rt_597_anders ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_satz82 y0 x0 (l_e_st_eq_landau_n_rt_satz97a y0 x0 z0 (l_e_st_eq_landau_n_rt_satz83 (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) l)) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1586 *)
-definition l_e_st_eq_landau_n_rt_598_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_more z0 u0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 u0 y u yiy0 uiu0) (l_e_st_eq_landau_n_satz64 x y z u (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m) (l_e_st_eq_landau_n_rt_moree z0 u0 z u ziz0 uiu0 n)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1587 *)
-definition l_e_st_eq_landau_n_rt_satz98 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_more z0 u0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 z0 u0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_598_t1 x0 y0 z0 u0 m n x y z u xi yi zi ui) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1588 *)
-definition l_e_st_eq_landau_n_rt_satz98a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_less z0 u0.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_satz98 y0 x0 u0 z0 (l_e_st_eq_landau_n_rt_satz83 x0 y0 l) (l_e_st_eq_landau_n_rt_satz83 z0 u0 k)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1589 *)
-definition l_e_st_eq_landau_n_rt_599_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_more z0 u0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 u0 y u yiy0 uiu0) (l_e_st_eq_landau_n_satz65a x y z u (l_e_st_eq_landau_n_rt_moreise x0 y0 x y xix0 yiy0 m) (l_e_st_eq_landau_n_rt_moree z0 u0 z u ziz0 uiu0 n)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1590 *)
-definition l_e_st_eq_landau_n_rt_satz99a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_more z0 u0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 z0 u0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_599_t1 x0 y0 z0 u0 m n x y z u xi yi zi ui) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1591 *)
-definition l_e_st_eq_landau_n_rt_599_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_moreis z0 u0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 u0 y u yiy0 uiu0) (l_e_st_eq_landau_n_satz65b x y z u (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m) (l_e_st_eq_landau_n_rt_moreise z0 u0 z u ziz0 uiu0 n)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1592 *)
-definition l_e_st_eq_landau_n_rt_satz99b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_moreis z0 u0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 z0 u0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_599_t2 x0 y0 z0 u0 m n x y z u xi yi zi ui) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1593 *)
-definition l_e_st_eq_landau_n_rt_satz99c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_less z0 u0.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_satz99a y0 x0 u0 z0 (l_e_st_eq_landau_n_rt_satz85 x0 y0 l) (l_e_st_eq_landau_n_rt_satz83 z0 u0 k)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1594 *)
-definition l_e_st_eq_landau_n_rt_satz99d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_lessis z0 u0.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_satz99b y0 x0 u0 z0 (l_e_st_eq_landau_n_rt_satz83 x0 y0 l) (l_e_st_eq_landau_n_rt_satz85 z0 u0 k)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1595 *)
-definition l_e_st_eq_landau_n_rt_5100_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_moreis z0 u0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_moreisi (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 u0 y u yiy0 uiu0) (l_e_st_eq_landau_n_satz66 x y z u (l_e_st_eq_landau_n_rt_moreise x0 y0 x y xix0 yiy0 m) (l_e_st_eq_landau_n_rt_moreise z0 u0 z u ziz0 uiu0 n)) : l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1596 *)
-definition l_e_st_eq_landau_n_rt_satz100 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_moreis z0 u0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 z0 u0 (l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_5100_t1 x0 y0 z0 u0 m n x y z u xi yi zi ui) : l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1597 *)
-definition l_e_st_eq_landau_n_rt_satz100a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_lessis z0 u0.(l_e_st_eq_landau_n_rt_satz84 (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_satz100 y0 x0 u0 z0 (l_e_st_eq_landau_n_rt_satz85 x0 y0 l) (l_e_st_eq_landau_n_rt_satz85 z0 u0 k)) : l_e_st_eq_landau_n_rt_lessis (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1598 *)
-definition l_e_st_eq_landau_n_rt_5101_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λv0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 v0) x0.(l_e_st_eq_landau_n_rt_ismore1 (l_e_st_eq_landau_n_rt_pl y0 v0) x0 y0 i (l_e_st_eq_landau_n_rt_satz94 y0 v0) : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 1599 *)
-definition l_e_st_eq_landau_n_rt_5101_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λv0:l_e_st_eq_landau_n_rt_rat.(l_imp_th3 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 v0) x0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_satz81d x0 y0 l) (λt:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 v0) x0.l_e_st_eq_landau_n_rt_5101_t1 x0 y0 l v0 t) : l_e_st_eq_landau_n_rt_nis (l_e_st_eq_landau_n_rt_pl y0 v0) x0).
-
-(* constant 1600 *)
-definition l_e_st_eq_landau_n_rt_vorbemerkung101 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.(l_some_th5 l_e_st_eq_landau_n_rt_rat (λv:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 v) x0) (λv:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_5101_t2 x0 y0 l v) : l_not (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0))).
-
-(* constant 1601 *)
-definition l_e_st_eq_landau_n_rt_5101_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λv:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x.(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_ratof v)) x0 (l_e_st_eq_landau_n_pf y v) x (l_e_st_eq_landau_n_rt_picp y0 (l_e_st_eq_landau_n_rt_ratof v) y v yiy0 (l_e_st_eq_landau_n_rt_inclass v)) xix0 e : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_ratof v)) x0).
-
-(* constant 1602 *)
-definition l_e_st_eq_landau_n_rt_5101_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λv:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x.(l_somei l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0) (l_e_st_eq_landau_n_rt_ratof v) (l_e_st_eq_landau_n_rt_5101_t3 x0 y0 m x y xix0 yiy0 v e) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0)).
-
-(* constant 1603 *)
-definition l_e_st_eq_landau_n_rt_5101_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_someapp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y t) x) (l_e_st_eq_landau_n_satz67a x y (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m)) (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0)) (λt:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y t) x.l_e_st_eq_landau_n_rt_5101_t4 x0 y0 m x y xix0 yiy0 t u) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0)).
-
-(* constant 1604 *)
-definition l_e_st_eq_landau_n_rt_satz101a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_5101_t5 x0 y0 m x y xi yi) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0)).
-
-(* constant 1605 *)
-definition l_e_st_eq_landau_n_rt_5101_t6 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λv0:l_e_st_eq_landau_n_rt_rat.λw0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 v0) x0.λj:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 w0) x0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_frac.λw:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λviv0:l_e_st_eq_landau_n_rt_inf v (l_e_st_eq_landau_n_rt_class v0).λwiw0:l_e_st_eq_landau_n_rt_inf w (l_e_st_eq_landau_n_rt_class w0).(l_e_st_eq_landau_n_rt_isi v0 w0 v w viv0 wiw0 (l_e_st_eq_landau_n_satz67b x y v w (l_e_st_eq_landau_n_rt_ise (l_e_st_eq_landau_n_rt_pl y0 v0) x0 (l_e_st_eq_landau_n_pf y v) x (l_e_st_eq_landau_n_rt_picp y0 v0 y v yiy0 viv0) xix0 i) (l_e_st_eq_landau_n_rt_ise (l_e_st_eq_landau_n_rt_pl y0 w0) x0 (l_e_st_eq_landau_n_pf y w) x (l_e_st_eq_landau_n_rt_picp y0 w0 y w yiy0 wiw0) xix0 j)) : l_e_st_eq_landau_n_rt_is v0 w0).
-
-(* constant 1606 *)
-definition l_e_st_eq_landau_n_rt_satz101b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λv0:l_e_st_eq_landau_n_rt_rat.λw0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 v0) x0.λj:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 w0) x0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 v0 w0 (l_e_st_eq_landau_n_rt_is v0 w0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_frac.λw:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λvi:l_e_st_eq_landau_n_rt_inf v (l_e_st_eq_landau_n_rt_class v0).λwi:l_e_st_eq_landau_n_rt_inf w (l_e_st_eq_landau_n_rt_class w0).l_e_st_eq_landau_n_rt_5101_t6 x0 y0 v0 w0 i j x y v w xi yi vi wi) : l_e_st_eq_landau_n_rt_is v0 w0).
-
-(* constant 1607 *)
-definition l_e_st_eq_landau_n_rt_5101_t7 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(λt:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_rat.λv:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0.λw:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 u) x0.l_e_st_eq_landau_n_rt_satz101b x0 y0 t u v w : l_e_amone l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0)).
-
-(* constant 1608 *)
-definition l_e_st_eq_landau_n_rt_satz101 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_onei l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0) (l_e_st_eq_landau_n_rt_5101_t7 x0 y0) (l_e_st_eq_landau_n_rt_satz101a x0 y0 m) : l_e_st_eq_landau_n_rt_one (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0)).
-
-(* constant 1609 *)
-definition l_e_st_eq_landau_n_rt_mn ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_ind l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0) (l_e_st_eq_landau_n_rt_satz101 x0 y0 m) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1610 *)
-definition l_e_st_eq_landau_n_rt_satz101c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_oneax l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0) (l_e_st_eq_landau_n_rt_satz101 x0 y0 m) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_mn x0 y0 m)) x0).
-
-(* constant 1611 *)
-definition l_e_st_eq_landau_n_rt_satz101d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_mn x0 y0 m)) x0 (l_e_st_eq_landau_n_rt_satz101c x0 y0 m) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_mn x0 y0 m))).
-
-(* constant 1612 *)
-definition l_e_st_eq_landau_n_rt_satz101e ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0) (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_mn x0 y0 m)) x0 (l_e_st_eq_landau_n_rt_compl (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0) (l_e_st_eq_landau_n_rt_satz101c x0 y0 m) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0) x0).
-
-(* constant 1613 *)
-definition l_e_st_eq_landau_n_rt_satz101f ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0) x0 (l_e_st_eq_landau_n_rt_satz101e x0 y0 m) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0)).
-
-(* constant 1614 *)
-definition l_e_st_eq_landau_n_rt_satz101g ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λv0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 v0) x0.(l_e_st_eq_landau_n_rt_satz101b x0 y0 v0 (l_e_st_eq_landau_n_rt_mn x0 y0 m) i (l_e_st_eq_landau_n_rt_satz101c x0 y0 m) : l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_mn x0 y0 m)).
-
-(* constant 1615 *)
-definition l_e_st_eq_landau_n_rt_timesfrt ≝ (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_tf x y) : Πx:l_e_st_eq_landau_n_frac.Πy:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1616 *)
-definition l_e_st_eq_landau_n_rt_ii5_t20 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_tf x z)) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_tf y u)) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_tf x z)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_tf y u)) (l_e_st_eq_landau_n_satz68 x y z u e f) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_timesfrt x z) (l_e_st_eq_landau_n_rt_timesfrt y u)).
-
-(* constant 1617 *)
-definition l_e_st_eq_landau_n_rt_ftimesfrt ≝ (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_rt_eq x y.λw:l_e_st_eq_landau_n_rt_eq z u.l_e_st_eq_landau_n_rt_ii5_t20 x y z u v w : l_e_st_eq_landau_n_rt_fixf l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_timesfrt).
-
-(* constant 1618 *)
-definition l_e_st_eq_landau_n_rt_ts ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_indrat x0 y0 l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_timesfrt l_e_st_eq_landau_n_rt_ftimesfrt : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1619 *)
-definition l_e_st_eq_landau_n_rt_ii5_t21 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_isindrat x0 y0 l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_timesfrt l_e_st_eq_landau_n_rt_ftimesfrt x1 y1 x1ix0 y1iy0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_tf x1 y1)) (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 1620 *)
-definition l_e_st_eq_landau_n_rt_tict ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_tf x1 y1) (l_e_st_eq_landau_n_rt_class t)) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_tf x1 y1)) (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_tf x1 y1)) (l_e_st_eq_landau_n_rt_ii5_t21 x0 y0 x1 y1 x1ix0 y1iy0) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_tf x1 y1) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_ts x0 y0))).
-
-(* constant 1621 *)
-definition l_e_st_eq_landau_n_rt_ists1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_isf l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_ts t z0) x0 y0 i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1622 *)
-definition l_e_st_eq_landau_n_rt_ists2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_isf l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_ts z0 t) x0 y0 i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts z0 x0) (l_e_st_eq_landau_n_rt_ts z0 y0)).
-
-(* constant 1623 *)
-definition l_e_st_eq_landau_n_rt_ists12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 u0.(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_rt_ists1 x0 y0 z0 i) (l_e_st_eq_landau_n_rt_ists2 z0 u0 y0 j) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1624 *)
-definition l_e_st_eq_landau_n_rt_5102_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts y0 x0) (l_e_st_eq_landau_n_tf x1 y1) (l_e_st_eq_landau_n_tf y1 x1) (l_e_st_eq_landau_n_rt_tict x0 y0 x1 y1 x1ix0 y1iy0) (l_e_st_eq_landau_n_rt_tict y0 x0 y1 x1 y1iy0 x1ix0) (l_e_st_eq_landau_n_satz69 x1 y1) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts y0 x0)).
-
-(* constant 1625 *)
-definition l_e_st_eq_landau_n_rt_satz102 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts y0 x0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_5102_t1 x0 y0 x y xi yi) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts y0 x0)).
-
-(* constant 1626 *)
-definition l_e_st_eq_landau_n_rt_comts ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz102 x0 y0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts y0 x0)).
-
-(* constant 1627 *)
-definition l_e_st_eq_landau_n_rt_5103_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_tict (l_e_st_eq_landau_n_rt_ts x0 y0) z0 (l_e_st_eq_landau_n_tf x y) z (l_e_st_eq_landau_n_rt_tict x0 y0 x y xix0 yiy0) ziz0 : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_tf x y) z) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0))).
-
-(* constant 1628 *)
-definition l_e_st_eq_landau_n_rt_5103_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_tict x0 (l_e_st_eq_landau_n_rt_ts y0 z0) x (l_e_st_eq_landau_n_tf y z) xix0 (l_e_st_eq_landau_n_rt_tict y0 z0 y z yiy0 ziz0) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0)))).
-
-(* constant 1629 *)
-definition l_e_st_eq_landau_n_rt_5103_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0)) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_tf x y) z) (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_rt_5103_t1 x0 y0 z0 x y z xix0 yiy0 ziz0) (l_e_st_eq_landau_n_rt_5103_t2 x0 y0 z0 x y z xix0 yiy0 ziz0) (l_e_st_eq_landau_n_satz70 x y z) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0))).
-
-(* constant 1630 *)
-definition l_e_st_eq_landau_n_rt_satz103 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0))) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_5103_t3 x0 y0 z0 x y z xi yi zi) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0))).
-
-(* constant 1631 *)
-definition l_e_st_eq_landau_n_rt_assts1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz103 x0 y0 z0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0))).
-
-(* constant 1632 *)
-definition l_e_st_eq_landau_n_rt_assts2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0)) (l_e_st_eq_landau_n_rt_satz103 x0 y0 z0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0)).
-
-(* constant 1633 *)
-definition l_e_st_eq_landau_n_rt_5104_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_tict x0 (l_e_st_eq_landau_n_rt_pl y0 z0) x (l_e_st_eq_landau_n_pf y z) xix0 (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0)))).
-
-(* constant 1634 *)
-definition l_e_st_eq_landau_n_rt_5104_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_picp (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_rt_tict x0 y0 x y xix0 yiy0) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf x z)) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0)))).
-
-(* constant 1635 *)
-definition l_e_st_eq_landau_n_rt_5104_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0)) (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf x z)) (l_e_st_eq_landau_n_rt_5104_t1 x0 y0 z0 x y z xix0 yiy0 ziz0) (l_e_st_eq_landau_n_rt_5104_t2 x0 y0 z0 x y z xix0 yiy0 ziz0) (l_e_st_eq_landau_n_satz71 x y z) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0))).
-
-(* constant 1636 *)
-definition l_e_st_eq_landau_n_rt_satz104 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0))) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_5104_t3 x0 y0 z0 x y z xi yi zi) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0))).
-
-(* constant 1637 *)
-definition l_e_st_eq_landau_n_rt_disttp1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_ts z0 (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts z0 x0) (l_e_st_eq_landau_n_rt_ts z0 y0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)) (l_e_st_eq_landau_n_rt_comts (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_satz104 z0 x0 y0) (l_e_st_eq_landau_n_rt_ispl12 (l_e_st_eq_landau_n_rt_ts z0 x0) (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts z0 y0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_rt_comts z0 x0) (l_e_st_eq_landau_n_rt_comts z0 y0)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0))).
-
-(* constant 1638 *)
-definition l_e_st_eq_landau_n_rt_disttp2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz104 x0 y0 z0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0))).
-
-(* constant 1639 *)
-definition l_e_st_eq_landau_n_rt_distpt1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)) (l_e_st_eq_landau_n_rt_disttp1 x0 y0 z0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_pl x0 y0) z0)).
-
-(* constant 1640 *)
-definition l_e_st_eq_landau_n_rt_distpt2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0)) (l_e_st_eq_landau_n_rt_disttp2 x0 y0 z0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0)) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0))).
-
-(* constant 1641 *)
-definition l_e_st_eq_landau_n_rt_5105_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 z0 y z yiy0 ziz0) (l_e_st_eq_landau_n_satz72a x y z (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1642 *)
-definition l_e_st_eq_landau_n_rt_satz105a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_5105_t1 x0 y0 z0 m x y z xi yi zi) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1643 *)
-definition l_e_st_eq_landau_n_rt_5105_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 z0 y z yiy0 ziz0) (l_e_st_eq_landau_n_satz72b x y z (l_e_st_eq_landau_n_rt_ise x0 y0 x y xix0 yiy0 i)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1644 *)
-definition l_e_st_eq_landau_n_rt_satz105b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_5105_t2 x0 y0 z0 i x y z xi yi zi) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1645 *)
-definition l_e_st_eq_landau_n_rt_5105_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_lessi (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xi zi) (l_e_st_eq_landau_n_rt_tict y0 z0 y z yi zi) (l_e_st_eq_landau_n_satz72c x y z (l_e_st_eq_landau_n_rt_lesse x0 y0 x y xi yi l)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1646 *)
-definition l_e_st_eq_landau_n_rt_satz105c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_5105_t3 x0 y0 z0 l x y z xi yi zi) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1647 *)
-definition l_e_st_eq_landau_n_rt_5105_andersb ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_ists1 x0 y0 z0 i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1648 *)
-definition l_e_st_eq_landau_n_rt_5105_andersc ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_satz105a y0 x0 z0 (l_e_st_eq_landau_n_rt_satz83 x0 y0 l)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1649 *)
-definition l_e_st_eq_landau_n_rt_satz105d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_ismore12 (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts z0 x0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_rt_ts z0 y0) (l_e_st_eq_landau_n_rt_comts x0 z0) (l_e_st_eq_landau_n_rt_comts y0 z0) (l_e_st_eq_landau_n_rt_satz105a x0 y0 z0 m) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts z0 x0) (l_e_st_eq_landau_n_rt_ts z0 y0)).
-
-(* constant 1650 *)
-definition l_e_st_eq_landau_n_rt_satz105e ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_ists2 x0 y0 z0 i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts z0 x0) (l_e_st_eq_landau_n_rt_ts z0 y0)).
-
-(* constant 1651 *)
-definition l_e_st_eq_landau_n_rt_satz105f ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts z0 x0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_rt_ts z0 y0) (l_e_st_eq_landau_n_rt_comts x0 z0) (l_e_st_eq_landau_n_rt_comts y0 z0) (l_e_st_eq_landau_n_rt_satz105c x0 y0 z0 l) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts z0 x0) (l_e_st_eq_landau_n_rt_ts z0 y0)).
-
-(* constant 1652 *)
-definition l_e_st_eq_landau_n_rt_5106_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0).λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_morei x0 y0 x y xix0 yiy0 (l_e_st_eq_landau_n_satz73a x y z (l_e_st_eq_landau_n_rt_moree (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 z0 y z yiy0 ziz0) m)) : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 1653 *)
-definition l_e_st_eq_landau_n_rt_satz106a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0).(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_more x0 y0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_5106_t1 x0 y0 z0 m x y z xi yi zi) : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 1654 *)
-definition l_e_st_eq_landau_n_rt_5106_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0).λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_isi x0 y0 x y xix0 yiy0 (l_e_st_eq_landau_n_satz73b x y z (l_e_st_eq_landau_n_rt_ise (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 z0 y z yiy0 ziz0) i)) : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 1655 *)
-definition l_e_st_eq_landau_n_rt_satz106b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0).(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_is x0 y0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_5106_t2 x0 y0 z0 i x y z xi yi zi) : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 1656 *)
-definition l_e_st_eq_landau_n_rt_5106_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0).λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_lessi x0 y0 x y xix0 yiy0 (l_e_st_eq_landau_n_satz73c x y z (l_e_st_eq_landau_n_rt_lesse (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 z0 y z yiy0 ziz0) l)) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1657 *)
-definition l_e_st_eq_landau_n_rt_satz106c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0).(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_less x0 y0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_5106_t3 x0 y0 z0 l x y z xi yi zi) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1658 *)
-definition l_e_st_eq_landau_n_rt_5106_anders ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0).(l_e_st_eq_landau_n_rt_satz82 y0 x0 (l_e_st_eq_landau_n_rt_satz106a y0 x0 z0 (l_e_st_eq_landau_n_rt_satz83 (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0) l)) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1659 *)
-definition l_e_st_eq_landau_n_rt_5107_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_more z0 u0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 u0 y u yiy0 uiu0) (l_e_st_eq_landau_n_satz74 x y z u (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m) (l_e_st_eq_landau_n_rt_moree z0 u0 z u ziz0 uiu0 n)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1660 *)
-definition l_e_st_eq_landau_n_rt_satz107 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_more z0 u0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 z0 u0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_5107_t1 x0 y0 z0 u0 m n x y z u xi yi zi ui) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1661 *)
-definition l_e_st_eq_landau_n_rt_satz107a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_less z0 u0.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_satz107 y0 x0 u0 z0 (l_e_st_eq_landau_n_rt_satz83 x0 y0 l) (l_e_st_eq_landau_n_rt_satz83 z0 u0 k)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1662 *)
-definition l_e_st_eq_landau_n_rt_5108_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_more z0 u0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 u0 y u yiy0 uiu0) (l_e_st_eq_landau_n_satz75a x y z u (l_e_st_eq_landau_n_rt_moreise x0 y0 x y xix0 yiy0 m) (l_e_st_eq_landau_n_rt_moree z0 u0 z u ziz0 uiu0 n)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1663 *)
-definition l_e_st_eq_landau_n_rt_satz108a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_more z0 u0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 z0 u0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_5108_t1 x0 y0 z0 u0 m n x y z u xi yi zi ui) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1664 *)
-definition l_e_st_eq_landau_n_rt_5108_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_moreis z0 u0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 u0 y u yiy0 uiu0) (l_e_st_eq_landau_n_satz75b x y z u (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m) (l_e_st_eq_landau_n_rt_moreise z0 u0 z u ziz0 uiu0 n)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1665 *)
-definition l_e_st_eq_landau_n_rt_satz108b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_moreis z0 u0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 z0 u0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_5108_t2 x0 y0 z0 u0 m n x y z u xi yi zi ui) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1666 *)
-definition l_e_st_eq_landau_n_rt_satz108c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_less z0 u0.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_satz108a y0 x0 u0 z0 (l_e_st_eq_landau_n_rt_satz85 x0 y0 l) (l_e_st_eq_landau_n_rt_satz83 z0 u0 k)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1667 *)
-definition l_e_st_eq_landau_n_rt_satz108d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_lessis z0 u0.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_satz108b y0 x0 u0 z0 (l_e_st_eq_landau_n_rt_satz83 x0 y0 l) (l_e_st_eq_landau_n_rt_satz85 z0 u0 k)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1668 *)
-definition l_e_st_eq_landau_n_rt_5109_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_moreis z0 u0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_moreisi (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 u0 y u yiy0 uiu0) (l_e_st_eq_landau_n_satz76 x y z u (l_e_st_eq_landau_n_rt_moreise x0 y0 x y xix0 yiy0 m) (l_e_st_eq_landau_n_rt_moreise z0 u0 z u ziz0 uiu0 n)) : l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1669 *)
-definition l_e_st_eq_landau_n_rt_satz109 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_moreis z0 u0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 z0 u0 (l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_5109_t1 x0 y0 z0 u0 m n x y z u xi yi zi ui) : l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1670 *)
-definition l_e_st_eq_landau_n_rt_satz109a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_lessis z0 u0.(l_e_st_eq_landau_n_rt_satz84 (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_satz109 y0 x0 u0 z0 (l_e_st_eq_landau_n_rt_satz85 x0 y0 l) (l_e_st_eq_landau_n_rt_satz85 z0 u0 k)) : l_e_st_eq_landau_n_rt_lessis (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1671 *)
-definition l_e_st_eq_landau_n_rt_5110_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λv:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y1 v) x1.(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ratof v)) x0 (l_e_st_eq_landau_n_tf y1 v) x1 (l_e_st_eq_landau_n_rt_tict y0 (l_e_st_eq_landau_n_rt_ratof v) y1 v y1iy0 (l_e_st_eq_landau_n_rt_inclass v)) x1ix0 e : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ratof v)) x0).
-
-(* constant 1672 *)
-definition l_e_st_eq_landau_n_rt_5110_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λv:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y1 v) x1.(l_somei l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0) (l_e_st_eq_landau_n_rt_ratof v) (l_e_st_eq_landau_n_rt_5110_t1 x0 y0 x1 y1 x1ix0 y1iy0 v e) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0)).
-
-(* constant 1673 *)
-definition l_e_st_eq_landau_n_rt_5110_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_someapp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y1 t) x1) (l_e_st_eq_landau_n_satz77a x1 y1) (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0)) (λt:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y1 t) x1.l_e_st_eq_landau_n_rt_5110_t2 x0 y0 x1 y1 x1ix0 y1iy0 t u) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0)).
-
-(* constant 1674 *)
-definition l_e_st_eq_landau_n_rt_satz110a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_5110_t3 x0 y0 x y xi yi) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0)).
-
-(* constant 1675 *)
-definition l_e_st_eq_landau_n_rt_5110_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λv0:l_e_st_eq_landau_n_rt_rat.λw0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 v0) x0.λj:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 w0) x0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_frac.λw:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λviv0:l_e_st_eq_landau_n_rt_inf v (l_e_st_eq_landau_n_rt_class v0).λwiw0:l_e_st_eq_landau_n_rt_inf w (l_e_st_eq_landau_n_rt_class w0).(l_e_st_eq_landau_n_rt_isi v0 w0 v w viv0 wiw0 (l_e_st_eq_landau_n_satz77b x y v w (l_e_st_eq_landau_n_rt_ise (l_e_st_eq_landau_n_rt_ts y0 v0) x0 (l_e_st_eq_landau_n_tf y v) x (l_e_st_eq_landau_n_rt_tict y0 v0 y v yiy0 viv0) xix0 i) (l_e_st_eq_landau_n_rt_ise (l_e_st_eq_landau_n_rt_ts y0 w0) x0 (l_e_st_eq_landau_n_tf y w) x (l_e_st_eq_landau_n_rt_tict y0 w0 y w yiy0 wiw0) xix0 j)) : l_e_st_eq_landau_n_rt_is v0 w0).
-
-(* constant 1676 *)
-definition l_e_st_eq_landau_n_rt_satz110b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λv0:l_e_st_eq_landau_n_rt_rat.λw0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 v0) x0.λj:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 w0) x0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 v0 w0 (l_e_st_eq_landau_n_rt_is v0 w0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_frac.λw:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λvi:l_e_st_eq_landau_n_rt_inf v (l_e_st_eq_landau_n_rt_class v0).λwi:l_e_st_eq_landau_n_rt_inf w (l_e_st_eq_landau_n_rt_class w0).l_e_st_eq_landau_n_rt_5110_t4 x0 y0 v0 w0 i j x y v w xi yi vi wi) : l_e_st_eq_landau_n_rt_is v0 w0).
-
-(* constant 1677 *)
-definition l_e_st_eq_landau_n_rt_5110_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(λt:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_rat.λv:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0.λw:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 u) x0.l_e_st_eq_landau_n_rt_satz110b x0 y0 t u v w : l_e_amone l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0)).
-
-(* constant 1678 *)
-definition l_e_st_eq_landau_n_rt_satz110 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_onei l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0) (l_e_st_eq_landau_n_rt_5110_t5 x0 y0) (l_e_st_eq_landau_n_rt_satz110a x0 y0) : l_e_st_eq_landau_n_rt_one (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0)).
-
-(* constant 1679 *)
-definition l_e_st_eq_landau_n_5111_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_ts x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_ndis12 x l_e_st_eq_landau_n_1 y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz28a x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) x).
-
-(* constant 1680 *)
-definition l_e_st_eq_landau_n_5111_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) x (l_e_st_eq_landau_n_5111_t1 x y) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)))).
-
-(* constant 1681 *)
-definition l_e_st_eq_landau_n_satz111a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1).(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1))) y (l_e_st_eq_landau_n_5111_t1 x y) (l_e_st_eq_landau_n_5111_t1 y x) m : l_e_st_eq_landau_n_more x y).
-
-(* constant 1682 *)
-definition l_e_st_eq_landau_n_satz111b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1).(l_e_tr3is l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1))) y (l_e_st_eq_landau_n_5111_t2 x y) e (l_e_st_eq_landau_n_5111_t1 y x) : l_e_st_eq_landau_n_is x y).
-
-(* constant 1683 *)
-definition l_e_st_eq_landau_n_satz111c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1).(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1))) y (l_e_st_eq_landau_n_5111_t1 x y) (l_e_st_eq_landau_n_5111_t1 y x) l : l_e_st_eq_landau_n_less x y).
-
-(* constant 1684 *)
-definition l_e_st_eq_landau_n_satz111d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_ismore12 x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) y (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_5111_t2 x y) (l_e_st_eq_landau_n_5111_t2 y x) m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)).
-
-(* constant 1685 *)
-definition l_e_st_eq_landau_n_satz111e ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) x y (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_5111_t1 x y) i (l_e_st_eq_landau_n_5111_t2 y x) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)).
-
-(* constant 1686 *)
-definition l_e_st_eq_landau_n_satz111f ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_isless12 x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) y (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_5111_t2 x y) (l_e_st_eq_landau_n_5111_t2 y x) l : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)).
-
-(* constant 1687 *)
-definition l_e_st_eq_landau_n_rt_natprop ≝ λx0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_class x0) : Prop).
-
-(* constant 1688 *)
-definition l_e_st_eq_landau_n_rt_natrt ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_some (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop x0 t) : Prop).
-
-(* constant 1689 *)
-definition l_e_st_eq_landau_n_rt_ii5_t22 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λnpx:l_e_st_eq_landau_n_rt_natprop x0 x.λnpy:l_e_st_eq_landau_n_rt_natprop y0 y.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_satz111b x y (l_e_st_eq_landau_n_rt_ise x0 y0 (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1) npx npy i) : l_e_st_eq_landau_n_is x y).
-
-(* constant 1690 *)
-definition l_e_st_eq_landau_n_rt_ii5_t23 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_rt_natprop x0 t.λw:l_e_st_eq_landau_n_rt_natprop x0 u.l_e_st_eq_landau_n_rt_ii5_t22 x0 x0 t u v w (l_e_refis l_e_st_eq_landau_n_rt_rat x0) : l_e_amone l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop x0 t)).
-
-(* constant 1691 *)
-definition l_e_st_eq_landau_n_rt_satz111g ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.(l_e_onei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop x0 t) (l_e_st_eq_landau_n_rt_ii5_t23 x0) nx0 : l_e_st_eq_landau_n_one (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop x0 t)).
-
-(* constant 1692 *)
-definition l_e_st_eq_landau_n_rt_nofrt ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.(l_e_ind l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop x0 t) (l_e_st_eq_landau_n_rt_satz111g x0 nx0) : l_e_st_eq_landau_n_nat).
-
-(* constant 1693 *)
-definition l_e_st_eq_landau_n_rt_inclassn ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.(l_e_oneax l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop x0 t) (l_e_st_eq_landau_n_rt_satz111g x0 nx0) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_class x0)).
-
-(* constant 1694 *)
-definition l_e_st_eq_landau_n_rt_isrten ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_ii5_t22 x0 y0 (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) (l_e_st_eq_landau_n_rt_inclassn x0 nx0) (l_e_st_eq_landau_n_rt_inclassn y0 ny0) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)).
-
-(* constant 1695 *)
-definition l_e_st_eq_landau_n_rt_isrtin ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0).(l_e_st_eq_landau_n_rt_isi x0 y0 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt y0 ny0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn x0 nx0) (l_e_st_eq_landau_n_rt_inclassn y0 ny0) (l_e_st_eq_landau_n_eqn (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_nofrt y0 ny0) i) : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 1696 *)
-definition l_e_st_eq_landau_n_rt_rtofn ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1697 *)
-definition l_e_st_eq_landau_n_rt_natrti ≝ λx:l_e_st_eq_landau_n_nat.(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop (l_e_st_eq_landau_n_rt_rtofn x) t) x (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_rtofn x)).
-
-(* constant 1698 *)
-definition l_e_st_eq_landau_n_rt_isnert ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rtofn t) x y i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)).
-
-(* constant 1699 *)
-definition l_e_st_eq_landau_n_rt_isnirt ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y).(l_e_st_eq_landau_n_rt_ii5_t22 (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y) x y (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) i : l_e_st_eq_landau_n_is x y).
-
-(* constant 1700 *)
-definition l_e_st_eq_landau_n_rt_isrtn1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.(l_e_st_eq_landau_n_rt_isi x0 (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_nofrt x0 nx0)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn x0 nx0) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_refeq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1)) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_nofrt x0 nx0))).
-
-(* constant 1701 *)
-definition l_e_st_eq_landau_n_rt_isnrt1 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_ii5_t22 (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn x) x (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x)) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rtofn x)) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x))).
-
-(* constant 1702 *)
-definition l_e_st_eq_landau_n_satz112a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz57 x y l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl x y) l_e_st_eq_landau_n_1)).
-
-(* constant 1703 *)
-definition l_e_st_eq_landau_n_satz112b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_treq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x y) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_tfeq12a x l_e_st_eq_landau_n_1 y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_eqd (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz28a l_e_st_eq_landau_n_1)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x y) l_e_st_eq_landau_n_1)).
-
-(* constant 1704 *)
-definition l_e_st_eq_landau_n_rt_satz112c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.(l_e_st_eq_landau_n_rt_lemmaeq1 (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt y0 ny0) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_picp x0 y0 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt y0 ny0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn x0 nx0) (l_e_st_eq_landau_n_rt_inclassn y0 ny0)) (l_e_st_eq_landau_n_satz112a (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_pl x0 y0))).
-
-(* constant 1705 *)
-definition l_e_st_eq_landau_n_rt_satz112d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop (l_e_st_eq_landau_n_rt_pl x0 y0) t) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)) (l_e_st_eq_landau_n_rt_satz112c x0 nx0 y0 ny0) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 1706 *)
-definition l_e_st_eq_landau_n_rt_satz112e ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.(l_e_st_eq_landau_n_rt_lemmaeq1 (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt y0 ny0) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_tict x0 y0 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt y0 ny0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn x0 nx0) (l_e_st_eq_landau_n_rt_inclassn y0 ny0)) (l_e_st_eq_landau_n_satz112b (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_ts x0 y0))).
-
-(* constant 1707 *)
-definition l_e_st_eq_landau_n_rt_satz112f ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop (l_e_st_eq_landau_n_rt_ts x0 y0) t) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)) (l_e_st_eq_landau_n_rt_satz112e x0 nx0 y0 ny0) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 1708 *)
-definition l_e_st_eq_landau_n_rt_5112_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_satz111a (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) (l_e_st_eq_landau_n_rt_moree x0 y0 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt y0 ny0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn x0 nx0) (l_e_st_eq_landau_n_rt_inclassn y0 ny0) m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)).
-
-(* constant 1709 *)
-definition l_e_st_eq_landau_n_rt_5112_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λz:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) z.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nofrt y0 ny0) z) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nofrt y0 ny0) (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn z) (l_e_st_eq_landau_n_rt_natrti z))) d (l_e_st_eq_landau_n_ispl2 z (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn z) (l_e_st_eq_landau_n_rt_natrti z)) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) (l_e_st_eq_landau_n_rt_isnrt1 z)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nofrt y0 ny0) (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn z) (l_e_st_eq_landau_n_rt_natrti z)))).
-
-(* constant 1710 *)
-definition l_e_st_eq_landau_n_rt_5112_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λz:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) z.(l_e_st_eq_landau_n_rt_isi x0 (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_rtofn z)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nofrt y0 ny0) (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn z) (l_e_st_eq_landau_n_rt_natrti z))) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn x0 nx0) (l_e_st_eq_landau_n_rt_satz112c y0 ny0 (l_e_st_eq_landau_n_rt_rtofn z) (l_e_st_eq_landau_n_rt_natrti z)) (l_e_st_eq_landau_n_eqn (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nofrt y0 ny0) (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn z) (l_e_st_eq_landau_n_rt_natrti z))) (l_e_st_eq_landau_n_rt_5112_t2 x0 nx0 y0 ny0 m z d)) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_rtofn z))).
-
-(* constant 1711 *)
-definition l_e_st_eq_landau_n_rt_5112_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λz:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) z.(l_e_st_eq_landau_n_rt_satz101g x0 y0 (l_e_st_eq_landau_n_rt_rtofn z) m (l_e_symis l_e_st_eq_landau_n_rt_rat x0 (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_rtofn z)) (l_e_st_eq_landau_n_rt_5112_t3 x0 nx0 y0 ny0 m z d)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rtofn z) (l_e_st_eq_landau_n_rt_mn x0 y0 m)).
-
-(* constant 1712 *)
-definition l_e_st_eq_landau_n_rt_5112_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λz:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) z.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) (l_e_st_eq_landau_n_rt_rtofn z) (l_e_st_eq_landau_n_rt_mn x0 y0 m) (l_e_st_eq_landau_n_rt_natrti z) (l_e_st_eq_landau_n_rt_5112_t4 x0 nx0 y0 ny0 m z d) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_mn x0 y0 m)).
-
-(* constant 1713 *)
-definition l_e_st_eq_landau_n_rt_satz112g ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_someapp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) t) (l_e_st_eq_landau_n_rt_5112_t1 x0 nx0 y0 ny0 m) (l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_mn x0 y0 m)) (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) t.l_e_st_eq_landau_n_rt_5112_t5 x0 nx0 y0 ny0 m t u) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_mn x0 y0 m)).
-
-(* constant 1714 *)
-definition l_e_st_eq_landau_n_rt_satz112h ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl x y) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_picp (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y) (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl x y) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_satz112a x y) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_pl x y))).
-
-(* constant 1715 *)
-definition l_e_st_eq_landau_n_rt_satz112j ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x y) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_tict (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y) (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x y) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_satz112b x y) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_ts x y))).
-
-(* constant 1716 *)
-definition l_e_st_eq_landau_n_rt_nt_natt ≝ (l_e_ot l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) : Type[0]).
-
-(* constant 1717 *)
-definition l_e_st_eq_landau_n_rt_nt_ntofrt ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.(l_e_out l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) x0 nx0 : l_e_st_eq_landau_n_rt_nt_natt).
-
-(* constant 1718 *)
-definition l_e_st_eq_landau_n_rt_nt_is ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_is l_e_st_eq_landau_n_rt_nt_natt xt yt : Prop).
-
-(* constant 1719 *)
-definition l_e_st_eq_landau_n_rt_nt_nis ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_not (l_e_st_eq_landau_n_rt_nt_is xt yt) : Prop).
-
-(* constant 1720 *)
-definition l_e_st_eq_landau_n_rt_nt_all ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.(l_all l_e_st_eq_landau_n_rt_nt_natt p : Prop).
-
-(* constant 1721 *)
-definition l_e_st_eq_landau_n_rt_nt_some ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.(l_some l_e_st_eq_landau_n_rt_nt_natt p : Prop).
-
-(* constant 1722 *)
-definition l_e_st_eq_landau_n_rt_nt_one ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.(l_e_one l_e_st_eq_landau_n_rt_nt_natt p : Prop).
-
-(* constant 1723 *)
-definition l_e_st_eq_landau_n_rt_nt_in ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_esti l_e_st_eq_landau_n_rt_nt_natt xt st : Prop).
-
-(* constant 1724 *)
-definition l_e_st_eq_landau_n_rt_nt_rtofnt ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_in l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) xt : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1725 *)
-definition l_e_st_eq_landau_n_rt_nt_natrti ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_inp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) xt : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_nt_rtofnt xt)).
-
-(* constant 1726 *)
-definition l_e_st_eq_landau_n_rt_nt_isrtent ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_isouti l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) x0 nx0 y0 ny0 i : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_ntofrt x0 nx0) (l_e_st_eq_landau_n_rt_nt_ntofrt y0 ny0)).
-
-(* constant 1727 *)
-definition l_e_st_eq_landau_n_rt_nt_isrtint ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λi:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_ntofrt x0 nx0) (l_e_st_eq_landau_n_rt_nt_ntofrt y0 ny0).(l_e_isoute l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) x0 nx0 y0 ny0 i : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 1728 *)
-definition l_e_st_eq_landau_n_rt_nt_isntert ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λi:l_e_st_eq_landau_n_rt_nt_is xt yt.(l_e_isini l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) xt yt i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)).
-
-(* constant 1729 *)
-definition l_e_st_eq_landau_n_rt_nt_isntirt ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt).(l_e_isine l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) xt yt i : l_e_st_eq_landau_n_rt_nt_is xt yt).
-
-(* constant 1730 *)
-definition l_e_st_eq_landau_n_rt_nt_isrtnt1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.(l_e_isinout l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) x0 nx0 : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_nt_rtofnt (l_e_st_eq_landau_n_rt_nt_ntofrt x0 nx0))).
-
-(* constant 1731 *)
-definition l_e_st_eq_landau_n_rt_nt_isntrt1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_isoutin l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) xt : l_e_st_eq_landau_n_rt_nt_is xt (l_e_st_eq_landau_n_rt_nt_ntofrt (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt))).
-
-(* constant 1732 *)
-definition l_e_st_eq_landau_n_rt_nt_ntofn ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_nt_ntofrt (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x) : l_e_st_eq_landau_n_rt_nt_natt).
-
-(* constant 1733 *)
-definition l_e_st_eq_landau_n_rt_nt_isnent ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_rt_nt_isrtent (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x) (l_e_st_eq_landau_n_rt_rtofn y) (l_e_st_eq_landau_n_rt_natrti y) (l_e_st_eq_landau_n_rt_isnert x y i) : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_ntofn x) (l_e_st_eq_landau_n_rt_nt_ntofn y)).
-
-(* constant 1734 *)
-definition l_e_st_eq_landau_n_rt_nt_isnint ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_ntofn x) (l_e_st_eq_landau_n_rt_nt_ntofn y).(l_e_st_eq_landau_n_rt_isnirt x y (l_e_st_eq_landau_n_rt_nt_isrtint (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x) (l_e_st_eq_landau_n_rt_rtofn y) (l_e_st_eq_landau_n_rt_natrti y) i) : l_e_st_eq_landau_n_is x y).
-
-(* constant 1735 *)
-definition l_e_st_eq_landau_n_rt_nt_nofnt ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) : l_e_st_eq_landau_n_nat).
-
-(* constant 1736 *)
-definition l_e_st_eq_landau_n_rt_nt_isnten ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λi:l_e_st_eq_landau_n_rt_nt_is xt yt.(l_e_st_eq_landau_n_rt_isrten (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt) (l_e_st_eq_landau_n_rt_nt_isntert xt yt i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)).
-
-(* constant 1737 *)
-definition l_e_st_eq_landau_n_rt_nt_isntin ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).(l_e_st_eq_landau_n_rt_nt_isntirt xt yt (l_e_st_eq_landau_n_rt_isrtin (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt) i) : l_e_st_eq_landau_n_rt_nt_is xt yt).
-
-(* constant 1738 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t24 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_nt_isrtnt1 (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_nt_rtofnt (l_e_st_eq_landau_n_rt_nt_ntofn x))).
-
-(* constant 1739 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t25 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_isrten (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x) (l_e_st_eq_landau_n_rt_nt_rtofnt (l_e_st_eq_landau_n_rt_nt_ntofn x)) (l_e_st_eq_landau_n_rt_nt_natrti (l_e_st_eq_landau_n_rt_nt_ntofn x)) (l_e_st_eq_landau_n_rt_nt_ii5_t24 x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn x))).
-
-(* constant 1740 *)
-definition l_e_st_eq_landau_n_rt_nt_isnnt1 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn x)) (l_e_st_eq_landau_n_rt_isnrt1 x) (l_e_st_eq_landau_n_rt_nt_ii5_t25 x) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn x))).
-
-(* constant 1741 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t26 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_isrtn1 (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_nt_nofnt xt))).
-
-(* constant 1742 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t27 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_isrtent (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_rt_natrti (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_rt_nt_ii5_t26 xt) : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_ntofrt (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt)) (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_nofnt xt))).
-
-(* constant 1743 *)
-definition l_e_st_eq_landau_n_rt_nt_isntn1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_tris l_e_st_eq_landau_n_rt_nt_natt xt (l_e_st_eq_landau_n_rt_nt_ntofrt (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt)) (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_rt_nt_isntrt1 xt) (l_e_st_eq_landau_n_rt_nt_ii5_t27 xt) : l_e_st_eq_landau_n_rt_nt_is xt (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_nofnt xt))).
-
-(* constant 1744 *)
-definition l_e_st_eq_landau_n_rt_nt_isnnt2 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn x)) (l_e_st_eq_landau_n_rt_nt_isnnt1 x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn x)) x).
-
-(* constant 1745 *)
-definition l_e_st_eq_landau_n_rt_nt_isntn2 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_symis l_e_st_eq_landau_n_rt_nt_natt xt (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_rt_nt_isntn1 xt) : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_nofnt xt)) xt).
-
-(* constant 1746 *)
-definition l_e_st_eq_landau_n_rt_nt_1t ≝ (l_e_st_eq_landau_n_rt_nt_ntofn l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_rt_nt_natt).
-
-(* constant 1747 *)
-definition l_e_st_eq_landau_n_rt_nt_suct ≝ (λx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt x)) : Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt).
-
-(* constant 1748 *)
-definition l_e_st_eq_landau_n_rt_nt_5113_t1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λi:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct xt) l_e_st_eq_landau_n_rt_nt_1t.(l_e_st_eq_landau_n_rt_nt_isnint (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt xt)) l_e_st_eq_landau_n_1 i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt xt)) l_e_st_eq_landau_n_1).
-
-(* constant 1749 *)
-definition l_e_st_eq_landau_n_rt_nt_satz113a ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_imp_th3 (l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct xt) l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt xt)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ax3 (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (λt:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct xt) l_e_st_eq_landau_n_rt_nt_1t.l_e_st_eq_landau_n_rt_nt_5113_t1 xt t) : l_e_st_eq_landau_n_rt_nt_nis (l_e_st_eq_landau_n_rt_nt_suct xt) l_e_st_eq_landau_n_rt_nt_1t).
-
-(* constant 1750 *)
-definition l_e_st_eq_landau_n_rt_nt_5113_t2 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λi:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct xt) (l_e_st_eq_landau_n_rt_nt_suct yt).(l_e_st_eq_landau_n_rt_nt_isnint (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt yt)) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt yt))).
-
-(* constant 1751 *)
-definition l_e_st_eq_landau_n_rt_nt_satz113b ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λi:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct xt) (l_e_st_eq_landau_n_rt_nt_suct yt).(l_e_st_eq_landau_n_rt_nt_isntin xt yt (l_e_st_eq_landau_n_ax4 (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_5113_t2 xt yt i)) : l_e_st_eq_landau_n_rt_nt_is xt yt).
-
-(* constant 1752 *)
-definition l_e_st_eq_landau_n_rt_nt_cond1 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_in l_e_st_eq_landau_n_rt_nt_1t st : Prop).
-
-(* constant 1753 *)
-definition l_e_st_eq_landau_n_rt_nt_cond2 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_all (λx:l_e_st_eq_landau_n_rt_nt_natt.l_imp (l_e_st_eq_landau_n_rt_nt_in x st) (l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_suct x) st)) : Prop).
-
-(* constant 1754 *)
-definition l_e_st_eq_landau_n_rt_nt_5113_prop1 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_ntofn x) st : Prop).
-
-(* constant 1755 *)
-definition l_e_st_eq_landau_n_rt_nt_5113_t3 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_5113_prop1 st c1 c2 x.(c2 (l_e_st_eq_landau_n_rt_nt_ntofn x) : l_imp (l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_ntofn x) st) (l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_ntofn x)) st)).
-
-(* constant 1756 *)
-definition l_e_st_eq_landau_n_rt_nt_5113_t4 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_5113_prop1 st c1 c2 x.(l_mp (l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_ntofn x) st) (l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_ntofn x)) st) p (l_e_st_eq_landau_n_rt_nt_5113_t3 st c1 c2 x p) : l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_ntofn x)) st).
-
-(* constant 1757 *)
-definition l_e_st_eq_landau_n_rt_nt_5113_t5 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_5113_prop1 st c1 c2 x.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_suc t)) st) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn x)) x (l_e_st_eq_landau_n_rt_nt_5113_t4 st c1 c2 x p) (l_e_st_eq_landau_n_rt_nt_isnnt2 x) : l_e_st_eq_landau_n_rt_nt_5113_prop1 st c1 c2 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 1758 *)
-definition l_e_st_eq_landau_n_rt_nt_5113_t6 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_5113_prop1 st c1 c2 t) c1 (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_nt_5113_prop1 st c1 c2 t.l_e_st_eq_landau_n_rt_nt_5113_t5 st c1 c2 t u) (l_e_st_eq_landau_n_rt_nt_nofnt xt) : l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_nofnt xt)) st).
-
-(* constant 1759 *)
-definition l_e_st_eq_landau_n_rt_nt_satz113c ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_isp l_e_st_eq_landau_n_rt_nt_natt (λt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_in t st) (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_nofnt xt)) xt (l_e_st_eq_landau_n_rt_nt_5113_t6 st c1 c2 xt) (l_e_st_eq_landau_n_rt_nt_isntn2 xt) : l_e_st_eq_landau_n_rt_nt_in xt st).
-
-(* constant 1760 *)
-definition l_e_st_eq_landau_n_rt_nt_ax3t ≝ (λx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_satz113a x : ∀x:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_nis (l_e_st_eq_landau_n_rt_nt_suct x) l_e_st_eq_landau_n_rt_nt_1t).
-
-(* constant 1761 *)
-definition l_e_st_eq_landau_n_rt_nt_ax4t ≝ (λx:l_e_st_eq_landau_n_rt_nt_natt.λy:l_e_st_eq_landau_n_rt_nt_natt.λu:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct x) (l_e_st_eq_landau_n_rt_nt_suct y).l_e_st_eq_landau_n_rt_nt_satz113b x y u : ∀x:l_e_st_eq_landau_n_rt_nt_natt.∀y:l_e_st_eq_landau_n_rt_nt_natt.∀u:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct x) (l_e_st_eq_landau_n_rt_nt_suct y).l_e_st_eq_landau_n_rt_nt_is x y).
-
-(* constant 1762 *)
-definition l_e_st_eq_landau_n_rt_nt_ax5t ≝ (λs:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λu:l_e_st_eq_landau_n_rt_nt_cond1 s.λv:l_e_st_eq_landau_n_rt_nt_cond2 s.λx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_satz113c s u v x : ∀s:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.∀u:l_e_st_eq_landau_n_rt_nt_cond1 s.∀v:l_e_st_eq_landau_n_rt_nt_cond2 s.∀x:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_in x s).
-
-(* constant 1763 *)
-definition l_e_st_eq_landau_n_rt_nt_51_t1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λn:l_e_st_eq_landau_n_rt_nt_nis xt yt.(l_imp_th3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_nt_is xt yt) n (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).l_e_st_eq_landau_n_rt_nt_isntin xt yt t) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)).
-
-(* constant 1764 *)
-definition l_e_st_eq_landau_n_rt_nt_51_t2 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λn:l_e_st_eq_landau_n_rt_nt_nis xt yt.(l_e_st_eq_landau_n_satz1 (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_51_t1 xt yt n) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt yt))).
-
-(* constant 1765 *)
-definition l_e_st_eq_landau_n_rt_nt_satz1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λn:l_e_st_eq_landau_n_rt_nt_nis xt yt.(l_imp_th3 (l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct xt) (l_e_st_eq_landau_n_rt_nt_suct yt)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt yt))) (l_e_st_eq_landau_n_rt_nt_51_t2 xt yt n) (λt:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct xt) (l_e_st_eq_landau_n_rt_nt_suct yt).l_e_st_eq_landau_n_rt_nt_isnint (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt yt)) t) : l_e_st_eq_landau_n_rt_nt_nis (l_e_st_eq_landau_n_rt_nt_suct xt) (l_e_st_eq_landau_n_rt_nt_suct yt)).
-
-(* constant 1766 *)
-definition l_e_st_eq_landau_n_rt_nt_54_x ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_nofnt xt : l_e_st_eq_landau_n_nat).
-
-(* constant 1767 *)
-definition l_e_st_eq_landau_n_rt_nt_54_prop1t ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_all (λt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_is (ft (l_e_st_eq_landau_n_rt_nt_suct t)) (l_e_st_eq_landau_n_rt_nt_suct (ft t))) : Prop).
-
-(* constant 1768 *)
-definition l_e_st_eq_landau_n_rt_nt_54_prop2t ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.(l_and (l_e_st_eq_landau_n_rt_nt_is (ft l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_rt_nt_suct xt)) (l_e_st_eq_landau_n_rt_nt_54_prop1t st c1 c2 xt ft) : Prop).
-
-(* constant 1769 *)
-definition l_e_st_eq_landau_n_rt_nt_54_prop1 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_all (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_suc t)) (l_e_st_eq_landau_n_suc (f t))) : Prop).
-
-(* constant 1770 *)
-definition l_e_st_eq_landau_n_rt_nt_54_prop2 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.(l_and (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt))) (l_e_st_eq_landau_n_rt_nt_54_prop1 st c1 c2 xt f) : Prop).
-
-(* constant 1771 *)
-definition l_e_st_eq_landau_n_rt_nt_54_g ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.(λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_nofnt (ft (l_e_st_eq_landau_n_rt_nt_ntofn t)) : Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat).
-
-(* constant 1772 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t1 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.(l_ande1 (l_e_st_eq_landau_n_rt_nt_is (ft l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_rt_nt_suct xt)) (l_e_st_eq_landau_n_rt_nt_54_prop1t st c1 c2 xt ft) p : l_e_st_eq_landau_n_rt_nt_is (ft l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_rt_nt_suct xt)).
-
-(* constant 1773 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t2 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_suct xt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt)) (l_e_st_eq_landau_n_rt_nt_isnten (ft l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_rt_nt_suct xt) (l_e_st_eq_landau_n_rt_nt_54_t1 st c1 c2 xt ft p)) (l_e_st_eq_landau_n_rt_nt_isnnt2 (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt))).
-
-(* constant 1774 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t3 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.(l_ande2 (l_e_st_eq_landau_n_rt_nt_is (ft l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_rt_nt_suct xt)) (l_e_st_eq_landau_n_rt_nt_54_prop1t st c1 c2 xt ft) p : l_e_st_eq_landau_n_rt_nt_54_prop1t st c1 c2 xt ft).
-
-(* constant 1775 *)
-definition l_e_st_eq_landau_n_rt_nt_54_ut ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.λu:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_nt_ntofn u : l_e_st_eq_landau_n_rt_nt_natt).
-
-(* constant 1776 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t4 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.λu:l_e_st_eq_landau_n_nat.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_suc u (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u)) (l_e_st_eq_landau_n_rt_nt_isnnt1 u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc u) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u)))).
-
-(* constant 1777 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t5 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.λu:l_e_st_eq_landau_n_nat.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft) (l_e_st_eq_landau_n_suc u) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u))) (l_e_st_eq_landau_n_rt_nt_54_t4 st c1 c2 xt ft p u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_rt_nt_nofnt (ft (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u))))).
-
-(* constant 1778 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t6 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.λu:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_nt_54_t3 st c1 c2 xt ft p (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u) : l_e_st_eq_landau_n_rt_nt_is (ft (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u))) (l_e_st_eq_landau_n_rt_nt_suct (ft (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u)))).
-
-(* constant 1779 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t7 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.λu:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_nt_isnten (ft (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u))) (l_e_st_eq_landau_n_rt_nt_suct (ft (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u))) (l_e_st_eq_landau_n_rt_nt_54_t6 st c1 c2 xt ft p u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt (ft (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u)))) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_suct (ft (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u))))).
-
-(* constant 1780 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t8 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.λu:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_nt_isnnt2 (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft u)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_suct (ft (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u)))) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft u))).
-
-(* constant 1781 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t9 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.λu:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_rt_nt_nofnt (ft (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u)))) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_suct (ft (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u)))) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft u)) (l_e_st_eq_landau_n_rt_nt_54_t5 st c1 c2 xt ft p u) (l_e_st_eq_landau_n_rt_nt_54_t7 st c1 c2 xt ft p u) (l_e_st_eq_landau_n_rt_nt_54_t8 st c1 c2 xt ft p u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft u))).
-
-(* constant 1782 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t10 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.(λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_54_t9 st c1 c2 xt ft p u : l_e_st_eq_landau_n_rt_nt_54_prop1 st c1 c2 xt (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft)).
-
-(* constant 1783 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t11 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.(l_andi (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt))) (l_e_st_eq_landau_n_rt_nt_54_prop1 st c1 c2 xt (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft)) (l_e_st_eq_landau_n_rt_nt_54_t2 st c1 c2 xt ft p) (l_e_st_eq_landau_n_rt_nt_54_t10 st c1 c2 xt ft p) : l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft)).
-
-(* constant 1784 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t12 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λa:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λb:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λpa:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt a.λpb:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt b.(l_e_onee1 (Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λu:Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt u) (l_e_st_eq_landau_n_satz4 (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt)) : l_e_amone (Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λu:Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt u)).
-
-(* constant 1785 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t13 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λa:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λb:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λpa:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt a.λpb:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt b.(l_e_st_eq_landau_n_rt_nt_54_t12 st c1 c2 xt a b pa pb (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt a) (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt b) (l_e_st_eq_landau_n_rt_nt_54_t11 st c1 c2 xt a pa) (l_e_st_eq_landau_n_rt_nt_54_t11 st c1 c2 xt b pb) : l_e_is (Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt a) (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt b)).
-
-(* constant 1786 *)
-definition l_e_st_eq_landau_n_rt_nt_54_y ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λa:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λb:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λpa:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt a.λpb:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt b.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_nofnt yt : l_e_st_eq_landau_n_nat).
-
-(* constant 1787 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t14 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λa:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λb:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λpa:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt a.λpb:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt b.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_fise l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt a) (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt b) (l_e_st_eq_landau_n_rt_nt_54_t13 st c1 c2 xt a b pa pb) (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt (a (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt)))) (l_e_st_eq_landau_n_rt_nt_nofnt (b (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt))))).
-
-(* constant 1788 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t15 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λa:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λb:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λpa:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt a.λpb:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt b.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_isntin (a (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt))) (b (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt))) (l_e_st_eq_landau_n_rt_nt_54_t14 st c1 c2 xt a b pa pb yt) : l_e_st_eq_landau_n_rt_nt_is (a (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt))) (b (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt)))).
-
-(* constant 1789 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t16 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λa:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λb:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λpa:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt a.λpb:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt b.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_tr3is l_e_st_eq_landau_n_rt_nt_natt (a yt) (a (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt))) (b (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt))) (b yt) (l_e_isf l_e_st_eq_landau_n_rt_nt_natt l_e_st_eq_landau_n_rt_nt_natt a yt (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt)) (l_e_st_eq_landau_n_rt_nt_isntn1 yt)) (l_e_st_eq_landau_n_rt_nt_54_t15 st c1 c2 xt a b pa pb yt) (l_e_isf l_e_st_eq_landau_n_rt_nt_natt l_e_st_eq_landau_n_rt_nt_natt b (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt)) yt (l_e_st_eq_landau_n_rt_nt_isntn2 yt)) : l_e_st_eq_landau_n_rt_nt_is (a yt) (b yt)).
-
-(* constant 1790 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t17 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λa:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λb:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λpa:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt a.λpb:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt b.(l_e_fisi l_e_st_eq_landau_n_rt_nt_natt l_e_st_eq_landau_n_rt_nt_natt a b (λt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_54_t16 st c1 c2 xt a b pa pb t) : l_e_is (Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt) a b).
-
-(* constant 1791 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t18 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.(λu:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λv:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λw:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt u.λz:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt v.l_e_st_eq_landau_n_rt_nt_54_t17 st c1 c2 xt u v w z : l_e_amone (Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt) (λu:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt u)).
-
-(* constant 1792 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t19 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_onee2 (Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λu:Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt u) (l_e_st_eq_landau_n_satz4 (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt)) : l_some (Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λu:Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt u)).
-
-(* constant 1793 *)
-definition l_e_st_eq_landau_n_rt_nt_54_gt ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.(λt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_ntofn (f (l_e_st_eq_landau_n_rt_nt_nofnt t)) : Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt).
-
-(* constant 1794 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t20 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.(l_ande1 (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt))) (l_e_st_eq_landau_n_rt_nt_54_prop1 st c1 c2 xt f) p : l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt))).
-
-(* constant 1795 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t21 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat f (l_e_st_eq_landau_n_rt_nt_nofnt l_e_st_eq_landau_n_rt_nt_1t) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_nt_isnnt2 l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_rt_nt_nofnt l_e_st_eq_landau_n_rt_nt_1t)) (f l_e_st_eq_landau_n_1)).
-
-(* constant 1796 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t22 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.(l_e_st_eq_landau_n_rt_nt_isnent (f (l_e_st_eq_landau_n_rt_nt_nofnt l_e_st_eq_landau_n_rt_nt_1t)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt)) (l_e_tris l_e_st_eq_landau_n_nat (f (l_e_st_eq_landau_n_rt_nt_nofnt l_e_st_eq_landau_n_rt_nt_1t)) (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt)) (l_e_st_eq_landau_n_rt_nt_54_t21 st c1 c2 xt f p) (l_e_st_eq_landau_n_rt_nt_54_t20 st c1 c2 xt f p)) : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_rt_nt_suct xt)).
-
-(* constant 1797 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t23 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.(l_ande2 (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt))) (l_e_st_eq_landau_n_rt_nt_54_prop1 st c1 c2 xt f) p : l_e_st_eq_landau_n_rt_nt_54_prop1 st c1 c2 xt f).
-
-(* constant 1798 *)
-definition l_e_st_eq_landau_n_rt_nt_54_z ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_nofnt zt : l_e_st_eq_landau_n_nat).
-
-(* constant 1799 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t24 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat f (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_suct zt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt)) (l_e_st_eq_landau_n_rt_nt_isnnt2 (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt))) : l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_suct zt))) (f (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt)))).
-
-(* constant 1800 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t25 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_54_t23 st c1 c2 xt f p (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt) : l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt))) (l_e_st_eq_landau_n_suc (f (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt)))).
-
-(* constant 1801 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t26 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_suc (f (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f zt)) (l_e_st_eq_landau_n_rt_nt_isnnt1 (f (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (f (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt))) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f zt)))).
-
-(* constant 1802 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t27 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_isnent (f (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_suct zt))) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f zt))) (l_e_tr3is l_e_st_eq_landau_n_nat (f (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_suct zt))) (f (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt))) (l_e_st_eq_landau_n_suc (f (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt))) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f zt))) (l_e_st_eq_landau_n_rt_nt_54_t24 st c1 c2 xt f p zt) (l_e_st_eq_landau_n_rt_nt_54_t25 st c1 c2 xt f p zt) (l_e_st_eq_landau_n_rt_nt_54_t26 st c1 c2 xt f p zt)) : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f (l_e_st_eq_landau_n_rt_nt_suct zt)) (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f zt))).
-
-(* constant 1803 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t28 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.(λu:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_54_t27 st c1 c2 xt f p u : l_e_st_eq_landau_n_rt_nt_54_prop1t st c1 c2 xt (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f)).
-
-(* constant 1804 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t29 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.(l_andi (l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_rt_nt_suct xt)) (l_e_st_eq_landau_n_rt_nt_54_prop1t st c1 c2 xt (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f)) (l_e_st_eq_landau_n_rt_nt_54_t22 st c1 c2 xt f p) (l_e_st_eq_landau_n_rt_nt_54_t28 st c1 c2 xt f p) : l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f)).
-
-(* constant 1805 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t30 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.(l_somei (Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt) (λu:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt u) (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f) (l_e_st_eq_landau_n_rt_nt_54_t29 st c1 c2 xt f p) : l_some (Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt) (λu:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt u)).
-
-(* constant 1806 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t31 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_someapp (Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λu:Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt u) (l_e_st_eq_landau_n_rt_nt_54_t19 st c1 c2 xt) (l_some (Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt) (λu:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt u)) (λu:Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt u.l_e_st_eq_landau_n_rt_nt_54_t30 st c1 c2 xt u v) : l_some (Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt) (λu:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt u)).
-
-(* constant 1807 *)
-definition l_e_st_eq_landau_n_rt_nt_satz4 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_onei (Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt) (λu:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt u) (l_e_st_eq_landau_n_rt_nt_54_t18 st c1 c2 xt) (l_e_st_eq_landau_n_rt_nt_54_t31 st c1 c2 xt) : l_e_one (Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt) (λu:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.l_and (l_e_st_eq_landau_n_rt_nt_is (u l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_rt_nt_suct xt)) (l_e_st_eq_landau_n_rt_nt_all (λv:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_is (u (l_e_st_eq_landau_n_rt_nt_suct v)) (l_e_st_eq_landau_n_rt_nt_suct (u v)))))).
-
-(* constant 1808 *)
-definition l_e_st_eq_landau_n_rt_nt_pl ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_ntofrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_rt_satz112d (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt)) : l_e_st_eq_landau_n_rt_nt_natt).
-
-(* constant 1809 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t28 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_satz112c (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)))).
-
-(* constant 1810 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t29 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_nt_ii5_t28 xt yt) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_refeq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) l_e_st_eq_landau_n_1)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)))).
-
-(* constant 1811 *)
-definition l_e_st_eq_landau_n_rt_nt_isplnt ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_isrtent (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_rt_satz112d (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt))) (l_e_st_eq_landau_n_rt_natrti (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt))) (l_e_st_eq_landau_n_rt_nt_ii5_t29 xt yt) : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_pl xt yt) (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)))).
-
-(* constant 1812 *)
-definition l_e_st_eq_landau_n_rt_nt_isntpl ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_symis l_e_st_eq_landau_n_rt_nt_natt (l_e_st_eq_landau_n_rt_nt_pl xt yt) (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt))) (l_e_st_eq_landau_n_rt_nt_isplnt xt yt) : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt))) (l_e_st_eq_landau_n_rt_nt_pl xt yt)).
-
-(* constant 1813 *)
-definition l_e_st_eq_landau_n_rt_nt_ispln ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)))) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_rt_nt_isnnt1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt))) (l_e_st_eq_landau_n_rt_nt_isnten (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt))) (l_e_st_eq_landau_n_rt_nt_pl xt yt) (l_e_st_eq_landau_n_rt_nt_isntpl xt yt)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt))).
-
-(* constant 1814 *)
-definition l_e_st_eq_landau_n_rt_nt_isnpl ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_rt_nt_ispln xt yt) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt))).
-
-(* constant 1815 *)
-definition l_e_st_eq_landau_n_rt_nt_55_t1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt zt) (l_e_st_eq_landau_n_rt_nt_isnpl xt yt) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt zt))).
-
-(* constant 1816 *)
-definition l_e_st_eq_landau_n_rt_nt_55_t2 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt)) (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_ispln yt zt) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt)))).
-
-(* constant 1817 *)
-definition l_e_st_eq_landau_n_rt_nt_55_t3 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt))) (l_e_st_eq_landau_n_rt_nt_55_t1 xt yt zt) (l_e_st_eq_landau_n_satz5 (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_rt_nt_55_t2 xt yt zt) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt)))).
-
-(* constant 1818 *)
-definition l_e_st_eq_landau_n_rt_nt_satz5 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_tr3is l_e_st_eq_landau_n_rt_nt_natt (l_e_st_eq_landau_n_rt_nt_pl (l_e_st_eq_landau_n_rt_nt_pl xt yt) zt) (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt zt))) (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt)))) (l_e_st_eq_landau_n_rt_nt_pl xt (l_e_st_eq_landau_n_rt_nt_pl yt zt)) (l_e_st_eq_landau_n_rt_nt_isplnt (l_e_st_eq_landau_n_rt_nt_pl xt yt) zt) (l_e_st_eq_landau_n_rt_nt_isnent (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt))) (l_e_st_eq_landau_n_rt_nt_55_t3 xt yt zt)) (l_e_st_eq_landau_n_rt_nt_isntpl xt (l_e_st_eq_landau_n_rt_nt_pl yt zt)) : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_pl (l_e_st_eq_landau_n_rt_nt_pl xt yt) zt) (l_e_st_eq_landau_n_rt_nt_pl xt (l_e_st_eq_landau_n_rt_nt_pl yt zt))).
-
-(* constant 1819 *)
-definition l_e_st_eq_landau_n_rt_nt_diffprop ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_is xt (l_e_st_eq_landau_n_rt_nt_pl yt zt) : Prop).
-
-(* constant 1820 *)
-definition l_e_st_eq_landau_n_rt_nt_diffprope ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.λd:l_e_st_eq_landau_n_rt_nt_diffprop xt yt zt.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_rt_nt_isnten xt (l_e_st_eq_landau_n_rt_nt_pl yt zt) d) (l_e_st_eq_landau_n_rt_nt_isnpl yt zt) : l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt)).
-
-(* constant 1821 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t30 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.λd:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt)) d (l_e_st_eq_landau_n_rt_nt_ispln yt zt) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt))).
-
-(* constant 1822 *)
-definition l_e_st_eq_landau_n_rt_nt_diffpropi ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.λd:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt).(l_e_st_eq_landau_n_rt_nt_isntin xt (l_e_st_eq_landau_n_rt_nt_pl yt zt) (l_e_st_eq_landau_n_rt_nt_ii5_t30 xt yt zt d) : l_e_st_eq_landau_n_rt_nt_diffprop xt yt zt).
-
-(* constant 1823 *)
-definition l_e_st_eq_landau_n_rt_nt_59_it ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_is xt yt : Prop).
-
-(* constant 1824 *)
-definition l_e_st_eq_landau_n_rt_nt_59_iit ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_some (λu:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_diffprop xt yt u) : Prop).
-
-(* constant 1825 *)
-definition l_e_st_eq_landau_n_rt_nt_59_iiit ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_some (λu:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_diffprop yt xt u) : Prop).
-
-(* constant 1826 *)
-definition l_e_st_eq_landau_n_rt_nt_59_i ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) : Prop).
-
-(* constant 1827 *)
-definition l_e_st_eq_landau_n_rt_nt_59_ii ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) u) : Prop).
-
-(* constant 1828 *)
-definition l_e_st_eq_landau_n_rt_nt_59_iii ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt xt) u) : Prop).
-
-(* constant 1829 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λone:l_e_st_eq_landau_n_rt_nt_59_i xt yt.(l_or3i1 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (l_e_st_eq_landau_n_rt_nt_isntin xt yt one) : l_or3 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt)).
-
-(* constant 1830 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t2 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λtwo:l_e_st_eq_landau_n_rt_nt_59_ii xt yt.λv:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) v.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) u) v (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn v)) d (l_e_st_eq_landau_n_rt_nt_isnnt1 v) : l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn v))).
-
-(* constant 1831 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t3 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λtwo:l_e_st_eq_landau_n_rt_nt_59_ii xt yt.λv:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) v.(l_somei l_e_st_eq_landau_n_rt_nt_natt (λu:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_diffprop xt yt u) (l_e_st_eq_landau_n_rt_nt_ntofn v) (l_e_st_eq_landau_n_rt_nt_diffpropi xt yt (l_e_st_eq_landau_n_rt_nt_ntofn v) (l_e_st_eq_landau_n_rt_nt_59_t2 xt yt two v d)) : l_e_st_eq_landau_n_rt_nt_59_iit xt yt).
-
-(* constant 1832 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t4 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λtwo:l_e_st_eq_landau_n_rt_nt_59_ii xt yt.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) u) two (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) u.l_e_st_eq_landau_n_rt_nt_59_t3 xt yt two u v) : l_e_st_eq_landau_n_rt_nt_59_iit xt yt).
-
-(* constant 1833 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t5 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λtwo:l_e_st_eq_landau_n_rt_nt_59_ii xt yt.(l_or3i2 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (l_e_st_eq_landau_n_rt_nt_59_t4 xt yt two) : l_or3 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt)).
-
-(* constant 1834 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t6 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λthree:l_e_st_eq_landau_n_rt_nt_59_iii xt yt.(l_or3i3 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (l_e_st_eq_landau_n_rt_nt_59_t4 yt xt three) : l_or3 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt)).
-
-(* constant 1835 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t7 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_or3app (l_e_st_eq_landau_n_rt_nt_59_i xt yt) (l_e_st_eq_landau_n_rt_nt_59_ii xt yt) (l_e_st_eq_landau_n_rt_nt_59_iii xt yt) (l_or3 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt)) (l_e_st_eq_landau_n_satz9a (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (λu:l_e_st_eq_landau_n_rt_nt_59_i xt yt.l_e_st_eq_landau_n_rt_nt_59_t1 xt yt u) (λu:l_e_st_eq_landau_n_rt_nt_59_ii xt yt.l_e_st_eq_landau_n_rt_nt_59_t5 xt yt u) (λu:l_e_st_eq_landau_n_rt_nt_59_iii xt yt.l_e_st_eq_landau_n_rt_nt_59_t6 xt yt u) : l_or3 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt)).
-
-(* constant 1836 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t8 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λonet:l_e_st_eq_landau_n_rt_nt_59_it xt yt.(l_e_st_eq_landau_n_rt_nt_isnten xt yt onet : l_e_st_eq_landau_n_rt_nt_59_i xt yt).
-
-(* constant 1837 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t9 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λtwot:l_e_st_eq_landau_n_rt_nt_59_iit xt yt.λvt:l_e_st_eq_landau_n_rt_nt_natt.λd:l_e_st_eq_landau_n_rt_nt_diffprop xt yt vt.(l_somei l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) u) (l_e_st_eq_landau_n_rt_nt_nofnt vt) (l_e_st_eq_landau_n_rt_nt_diffprope xt yt vt d) : l_e_st_eq_landau_n_rt_nt_59_ii xt yt).
-
-(* constant 1838 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t10 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λtwot:l_e_st_eq_landau_n_rt_nt_59_iit xt yt.(l_someapp l_e_st_eq_landau_n_rt_nt_natt (λu:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_diffprop xt yt u) twot (l_e_st_eq_landau_n_rt_nt_59_ii xt yt) (λu:l_e_st_eq_landau_n_rt_nt_natt.λv:l_e_st_eq_landau_n_rt_nt_diffprop xt yt u.l_e_st_eq_landau_n_rt_nt_59_t9 xt yt twot u v) : l_e_st_eq_landau_n_rt_nt_59_ii xt yt).
-
-(* constant 1839 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t11 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λthreet:l_e_st_eq_landau_n_rt_nt_59_iiit xt yt.(l_e_st_eq_landau_n_rt_nt_59_t10 yt xt threet : l_e_st_eq_landau_n_rt_nt_59_iii xt yt).
-
-(* constant 1840 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t12 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_satz9b (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) : l_ec3 (l_e_st_eq_landau_n_rt_nt_59_i xt yt) (l_e_st_eq_landau_n_rt_nt_59_ii xt yt) (l_e_st_eq_landau_n_rt_nt_59_iii xt yt)).
-
-(* constant 1841 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t13 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λonet:l_e_st_eq_landau_n_rt_nt_59_it xt yt.(l_ec3e12 (l_e_st_eq_landau_n_rt_nt_59_i xt yt) (l_e_st_eq_landau_n_rt_nt_59_ii xt yt) (l_e_st_eq_landau_n_rt_nt_59_iii xt yt) (l_e_st_eq_landau_n_rt_nt_59_t12 xt yt) (l_e_st_eq_landau_n_rt_nt_59_t8 xt yt onet) : l_not (l_e_st_eq_landau_n_rt_nt_59_ii xt yt)).
-
-(* constant 1842 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t14 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λonet:l_e_st_eq_landau_n_rt_nt_59_it xt yt.(l_imp_th3 (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_ii xt yt) (l_e_st_eq_landau_n_rt_nt_59_t13 xt yt onet) (λx:l_e_st_eq_landau_n_rt_nt_59_iit xt yt.l_e_st_eq_landau_n_rt_nt_59_t10 xt yt x) : l_not (l_e_st_eq_landau_n_rt_nt_59_iit xt yt)).
-
-(* constant 1843 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t15 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_ec_th1 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (λx:l_e_st_eq_landau_n_rt_nt_59_it xt yt.l_e_st_eq_landau_n_rt_nt_59_t14 xt yt x) : l_ec (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt)).
-
-(* constant 1844 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t16 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λtwot:l_e_st_eq_landau_n_rt_nt_59_iit xt yt.(l_ec3e23 (l_e_st_eq_landau_n_rt_nt_59_i xt yt) (l_e_st_eq_landau_n_rt_nt_59_ii xt yt) (l_e_st_eq_landau_n_rt_nt_59_iii xt yt) (l_e_st_eq_landau_n_rt_nt_59_t12 xt yt) (l_e_st_eq_landau_n_rt_nt_59_t10 xt yt twot) : l_not (l_e_st_eq_landau_n_rt_nt_59_iii xt yt)).
-
-(* constant 1845 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t17 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λtwot:l_e_st_eq_landau_n_rt_nt_59_iit xt yt.(l_imp_th3 (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iii xt yt) (l_e_st_eq_landau_n_rt_nt_59_t16 xt yt twot) (λx:l_e_st_eq_landau_n_rt_nt_59_iiit xt yt.l_e_st_eq_landau_n_rt_nt_59_t11 xt yt x) : l_not (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt)).
-
-(* constant 1846 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t18 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_ec_th1 (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (λx:l_e_st_eq_landau_n_rt_nt_59_iit xt yt.l_e_st_eq_landau_n_rt_nt_59_t17 xt yt x) : l_ec (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt)).
-
-(* constant 1847 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t19 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λthreet:l_e_st_eq_landau_n_rt_nt_59_iiit xt yt.(l_ec3e31 (l_e_st_eq_landau_n_rt_nt_59_i xt yt) (l_e_st_eq_landau_n_rt_nt_59_ii xt yt) (l_e_st_eq_landau_n_rt_nt_59_iii xt yt) (l_e_st_eq_landau_n_rt_nt_59_t12 xt yt) (l_e_st_eq_landau_n_rt_nt_59_t11 xt yt threet) : l_not (l_e_st_eq_landau_n_rt_nt_59_i xt yt)).
-
-(* constant 1848 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t20 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λthreet:l_e_st_eq_landau_n_rt_nt_59_iiit xt yt.(l_imp_th3 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_i xt yt) (l_e_st_eq_landau_n_rt_nt_59_t19 xt yt threet) (λx:l_e_st_eq_landau_n_rt_nt_59_it xt yt.l_e_st_eq_landau_n_rt_nt_59_t8 xt yt x) : l_not (l_e_st_eq_landau_n_rt_nt_59_it xt yt)).
-
-(* constant 1849 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t21 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_ec_th1 (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (λx:l_e_st_eq_landau_n_rt_nt_59_iiit xt yt.l_e_st_eq_landau_n_rt_nt_59_t20 xt yt x) : l_ec (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (l_e_st_eq_landau_n_rt_nt_59_it xt yt)).
-
-(* constant 1850 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t22 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_ec3_th6 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (l_e_st_eq_landau_n_rt_nt_59_t15 xt yt) (l_e_st_eq_landau_n_rt_nt_59_t18 xt yt) (l_e_st_eq_landau_n_rt_nt_59_t21 xt yt) : l_ec3 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt)).
-
-(* constant 1851 *)
-definition l_e_st_eq_landau_n_rt_nt_satz9 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_orec3i (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (l_e_st_eq_landau_n_rt_nt_59_t7 xt yt) (l_e_st_eq_landau_n_rt_nt_59_t22 xt yt) : l_orec3 (l_e_st_eq_landau_n_rt_nt_is xt yt) (l_e_st_eq_landau_n_rt_nt_some (λu:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_is xt (l_e_st_eq_landau_n_rt_nt_pl yt u))) (l_e_st_eq_landau_n_rt_nt_some (λu:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_is yt (l_e_st_eq_landau_n_rt_nt_pl xt u)))).
-
-(* constant 1852 *)
-definition l_e_st_eq_landau_n_rt_nt_more ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) : Prop).
-
-(* constant 1853 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t31 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_rt_nt_more xt yt.(l_e_st_eq_landau_n_rt_moree (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt xt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt yt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt)) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt)) m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt xt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt yt) l_e_st_eq_landau_n_1)).
-
-(* constant 1854 *)
-definition l_e_st_eq_landau_n_rt_nt_moree ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_rt_nt_more xt yt.(l_e_st_eq_landau_n_satz111a (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_ii5_t31 xt yt m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)).
-
-(* constant 1855 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t32 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).(l_e_st_eq_landau_n_satz111d (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt xt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt yt) l_e_st_eq_landau_n_1)).
-
-(* constant 1856 *)
-definition l_e_st_eq_landau_n_rt_nt_morei ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt xt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt yt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt)) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt)) (l_e_st_eq_landau_n_rt_nt_ii5_t32 xt yt m) : l_e_st_eq_landau_n_rt_nt_more xt yt).
-
-(* constant 1857 *)
-definition l_e_st_eq_landau_n_rt_nt_less ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) : Prop).
-
-(* constant 1858 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t33 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λl:l_e_st_eq_landau_n_rt_nt_less xt yt.(l_e_st_eq_landau_n_rt_lesse (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt xt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt yt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt)) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt)) l : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt xt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt yt) l_e_st_eq_landau_n_1)).
-
-(* constant 1859 *)
-definition l_e_st_eq_landau_n_rt_nt_lesse ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λl:l_e_st_eq_landau_n_rt_nt_less xt yt.(l_e_st_eq_landau_n_satz111c (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_ii5_t33 xt yt l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)).
-
-(* constant 1860 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t34 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).(l_e_st_eq_landau_n_satz111f (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) l : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt xt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt yt) l_e_st_eq_landau_n_1)).
-
-(* constant 1861 *)
-definition l_e_st_eq_landau_n_rt_nt_lessi ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).(l_e_st_eq_landau_n_rt_lessi (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt xt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt yt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt)) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt)) (l_e_st_eq_landau_n_rt_nt_ii5_t34 xt yt l) : l_e_st_eq_landau_n_rt_nt_less xt yt).
-
-(* constant 1862 *)
-definition l_e_st_eq_landau_n_rt_nt_moreis ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) : Prop).
-
-(* constant 1863 *)
-definition l_e_st_eq_landau_n_rt_nt_moreise ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_rt_nt_moreis xt yt.(l_or_th9 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) m (λu:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt).l_e_st_eq_landau_n_rt_nt_moree xt yt u) (λu:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt).l_e_st_eq_landau_n_rt_isrten (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt) u) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)).
-
-(* constant 1864 *)
-definition l_e_st_eq_landau_n_rt_nt_moreisi ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).(l_or_th9 (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) m (λu:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).l_e_st_eq_landau_n_rt_nt_morei xt yt u) (λu:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).l_e_st_eq_landau_n_rt_isrtin (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt) u) : l_e_st_eq_landau_n_rt_nt_moreis xt yt).
-
-(* constant 1865 *)
-definition l_e_st_eq_landau_n_rt_nt_lessis ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_lessis (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) : Prop).
-
-(* constant 1866 *)
-definition l_e_st_eq_landau_n_rt_nt_lessise ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λl:l_e_st_eq_landau_n_rt_nt_lessis xt yt.(l_or_th9 (l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) l (λu:l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt).l_e_st_eq_landau_n_rt_nt_lesse xt yt u) (λu:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt).l_e_st_eq_landau_n_rt_isrten (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt) u) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)).
-
-(* constant 1867 *)
-definition l_e_st_eq_landau_n_rt_nt_lessisi ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).(l_or_th9 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) l (λu:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).l_e_st_eq_landau_n_rt_nt_lessi xt yt u) (λu:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).l_e_st_eq_landau_n_rt_isrtin (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt) u) : l_e_st_eq_landau_n_rt_nt_lessis xt yt).
-
-(* constant 1868 *)
-definition l_e_st_eq_landau_n_rt_nt_515_t1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.λl:l_e_st_eq_landau_n_rt_nt_less xt yt.λk:l_e_st_eq_landau_n_rt_nt_less yt zt.(l_e_st_eq_landau_n_satz15 (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt) (l_e_st_eq_landau_n_rt_nt_lesse xt yt l) (l_e_st_eq_landau_n_rt_nt_lesse yt zt k) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt zt)).
-
-(* constant 1869 *)
-definition l_e_st_eq_landau_n_rt_nt_satz15 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.λl:l_e_st_eq_landau_n_rt_nt_less xt yt.λk:l_e_st_eq_landau_n_rt_nt_less yt zt.(l_e_st_eq_landau_n_rt_nt_lessi xt zt (l_e_st_eq_landau_n_rt_nt_515_t1 xt yt zt l k) : l_e_st_eq_landau_n_rt_nt_less xt zt).
-
-(* constant 1870 *)
-definition l_e_st_eq_landau_n_rt_nt_521_t1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.λut:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_rt_nt_more xt yt.λn:l_e_st_eq_landau_n_rt_nt_more zt ut.(l_e_st_eq_landau_n_satz21 (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt) (l_e_st_eq_landau_n_rt_nt_nofnt ut) (l_e_st_eq_landau_n_rt_nt_moree xt yt m) (l_e_st_eq_landau_n_rt_nt_moree zt ut n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt ut))).
-
-(* constant 1871 *)
-definition l_e_st_eq_landau_n_rt_nt_521_t2 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.λut:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_rt_nt_more xt yt.λn:l_e_st_eq_landau_n_rt_nt_more zt ut.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt zt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt ut)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt ut)) (l_e_st_eq_landau_n_rt_nt_ispln xt zt) (l_e_st_eq_landau_n_rt_nt_ispln yt ut) (l_e_st_eq_landau_n_rt_nt_521_t1 xt yt zt ut m n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt zt)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt ut))).
-
-(* constant 1872 *)
-definition l_e_st_eq_landau_n_rt_nt_satz21 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.λut:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_rt_nt_more xt yt.λn:l_e_st_eq_landau_n_rt_nt_more zt ut.(l_e_st_eq_landau_n_rt_nt_morei (l_e_st_eq_landau_n_rt_nt_pl xt zt) (l_e_st_eq_landau_n_rt_nt_pl yt ut) (l_e_st_eq_landau_n_rt_nt_521_t2 xt yt zt ut m n) : l_e_st_eq_landau_n_rt_nt_more (l_e_st_eq_landau_n_rt_nt_pl xt zt) (l_e_st_eq_landau_n_rt_nt_pl yt ut)).
-
-(* constant 1873 *)
-definition l_e_st_eq_landau_n_rt_nt_lb ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λn:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_all (λx:l_e_st_eq_landau_n_rt_nt_natt.l_imp (p x) (l_e_st_eq_landau_n_rt_nt_lessis n x)) : Prop).
-
-(* constant 1874 *)
-definition l_e_st_eq_landau_n_rt_nt_min ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λn:l_e_st_eq_landau_n_rt_nt_natt.(l_and (l_e_st_eq_landau_n_rt_nt_lb p n) (p n) : Prop).
-
-(* constant 1875 *)
-definition l_e_st_eq_landau_n_rt_nt_527_q ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.(λx:l_e_st_eq_landau_n_nat.p (l_e_st_eq_landau_n_rt_nt_ntofn x) : ∀x:l_e_st_eq_landau_n_nat.Prop).
-
-(* constant 1876 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t1 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λn:l_e_st_eq_landau_n_rt_nt_natt.λnp:p n.(l_e_isp l_e_st_eq_landau_n_rt_nt_natt p n (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_nofnt n)) np (l_e_st_eq_landau_n_rt_nt_isntn1 n) : l_e_st_eq_landau_n_rt_nt_527_q p s (l_e_st_eq_landau_n_rt_nt_nofnt n)).
-
-(* constant 1877 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t2 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λn:l_e_st_eq_landau_n_rt_nt_natt.λnp:p n.(l_somei l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_nt_527_q p s) (l_e_st_eq_landau_n_rt_nt_nofnt n) (l_e_st_eq_landau_n_rt_nt_527_t1 p s n np) : l_e_st_eq_landau_n_some (l_e_st_eq_landau_n_rt_nt_527_q p s)).
-
-(* constant 1878 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t3 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.(l_someapp l_e_st_eq_landau_n_rt_nt_natt p s (l_e_st_eq_landau_n_some (l_e_st_eq_landau_n_rt_nt_527_q p s)) (λu:l_e_st_eq_landau_n_rt_nt_natt.λv:p u.l_e_st_eq_landau_n_rt_nt_527_t2 p s u v) : l_e_st_eq_landau_n_some (l_e_st_eq_landau_n_rt_nt_527_q p s)).
-
-(* constant 1879 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t4 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.(l_e_st_eq_landau_n_satz27 (l_e_st_eq_landau_n_rt_nt_527_q p s) (l_e_st_eq_landau_n_rt_nt_527_t3 p s) : l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) x)).
-
-(* constant 1880 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t5 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.(l_ande1 (l_e_st_eq_landau_n_lb (l_e_st_eq_landau_n_rt_nt_527_q p s) m) (l_e_st_eq_landau_n_rt_nt_527_q p s m) mqm : l_e_st_eq_landau_n_lb (l_e_st_eq_landau_n_rt_nt_527_q p s) m).
-
-(* constant 1881 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t6 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.λn:l_e_st_eq_landau_n_nat.λnq:l_e_st_eq_landau_n_rt_nt_527_q p s n.(l_mp (l_e_st_eq_landau_n_rt_nt_527_q p s n) (l_e_st_eq_landau_n_lessis m n) nq (l_e_st_eq_landau_n_rt_nt_527_t5 p s m mqm n) : l_e_st_eq_landau_n_lessis m n).
-
-(* constant 1882 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t7 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.λn:l_e_st_eq_landau_n_rt_nt_natt.λnp:p n.(l_e_st_eq_landau_n_rt_nt_527_t6 p s m mqm (l_e_st_eq_landau_n_rt_nt_nofnt n) (l_e_st_eq_landau_n_rt_nt_527_t1 p s n np) : l_e_st_eq_landau_n_lessis m (l_e_st_eq_landau_n_rt_nt_nofnt n)).
-
-(* constant 1883 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t8 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.λn:l_e_st_eq_landau_n_rt_nt_natt.λnp:p n.(l_e_st_eq_landau_n_islessis1 m (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn m)) (l_e_st_eq_landau_n_rt_nt_nofnt n) (l_e_st_eq_landau_n_rt_nt_isnnt1 m) (l_e_st_eq_landau_n_rt_nt_527_t7 p s m mqm n np) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn m)) (l_e_st_eq_landau_n_rt_nt_nofnt n)).
-
-(* constant 1884 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t9 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.λn:l_e_st_eq_landau_n_rt_nt_natt.λnp:p n.(l_e_st_eq_landau_n_rt_nt_lessisi (l_e_st_eq_landau_n_rt_nt_ntofn m) n (l_e_st_eq_landau_n_rt_nt_527_t8 p s m mqm n np) : l_e_st_eq_landau_n_rt_nt_lessis (l_e_st_eq_landau_n_rt_nt_ntofn m) n).
-
-(* constant 1885 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t10 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.λn:l_e_st_eq_landau_n_rt_nt_natt.(λu:p n.l_e_st_eq_landau_n_rt_nt_527_t9 p s m mqm n u : l_imp (p n) (l_e_st_eq_landau_n_rt_nt_lessis (l_e_st_eq_landau_n_rt_nt_ntofn m) n)).
-
-(* constant 1886 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t11 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.(λx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_527_t10 p s m mqm x : l_e_st_eq_landau_n_rt_nt_lb p (l_e_st_eq_landau_n_rt_nt_ntofn m)).
-
-(* constant 1887 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t12 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.(l_ande2 (l_e_st_eq_landau_n_lb (l_e_st_eq_landau_n_rt_nt_527_q p s) m) (l_e_st_eq_landau_n_rt_nt_527_q p s m) mqm : p (l_e_st_eq_landau_n_rt_nt_ntofn m)).
-
-(* constant 1888 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t13 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.(l_andi (l_e_st_eq_landau_n_rt_nt_lb p (l_e_st_eq_landau_n_rt_nt_ntofn m)) (p (l_e_st_eq_landau_n_rt_nt_ntofn m)) (l_e_st_eq_landau_n_rt_nt_527_t11 p s m mqm) (l_e_st_eq_landau_n_rt_nt_527_t12 p s m mqm) : l_e_st_eq_landau_n_rt_nt_min p (l_e_st_eq_landau_n_rt_nt_ntofn m)).
-
-(* constant 1889 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t14 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.(l_somei l_e_st_eq_landau_n_rt_nt_natt (λx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_min p x) (l_e_st_eq_landau_n_rt_nt_ntofn m) (l_e_st_eq_landau_n_rt_nt_527_t13 p s m mqm) : l_e_st_eq_landau_n_rt_nt_some (λx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_min p x)).
-
-(* constant 1890 *)
-definition l_e_st_eq_landau_n_rt_nt_satz27 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.(l_someapp l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) x) (l_e_st_eq_landau_n_rt_nt_527_t4 p s) (l_e_st_eq_landau_n_rt_nt_some (λx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_min p x)) (λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) x.l_e_st_eq_landau_n_rt_nt_527_t14 p s x y) : l_e_st_eq_landau_n_rt_nt_some (λx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_min p x)).
-
-(* constant 1891 *)
-definition l_e_st_eq_landau_n_rt_1rt ≝ (l_e_st_eq_landau_n_rt_rtofn l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1892 *)
-definition l_e_st_eq_landau_n_rt_ii5_t35 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den x) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) x (l_e_st_eq_landau_n_tfeq1a x l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_eqnd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x) (l_e_st_eq_landau_n_satz28a (l_e_st_eq_landau_n_num x)) (l_e_st_eq_landau_n_satz28a (l_e_st_eq_landau_n_den x))) (l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) x (l_e_st_eq_landau_n_fris x)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1)) x).
-
-(* constant 1893 *)
-definition l_e_st_eq_landau_n_rt_ii5_t36 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt) x0 (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1)) x (l_e_st_eq_landau_n_rt_tict x0 l_e_st_eq_landau_n_rt_1rt x (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1) xix0 (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1))) xix0 (l_e_st_eq_landau_n_rt_ii5_t35 x0 x xix0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt) x0).
-
-(* constant 1894 *)
-definition l_e_st_eq_landau_n_rt_example1a ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp1 x0 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt) x0) (λx:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).l_e_st_eq_landau_n_rt_ii5_t36 x0 x xi) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt) x0).
-
-(* constant 1895 *)
-definition l_e_st_eq_landau_n_rt_example1b ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt) x0 (l_e_st_eq_landau_n_rt_example1a x0) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt)).
-
-(* constant 1896 *)
-definition l_e_st_eq_landau_n_rt_example1c ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt) x0 (l_e_st_eq_landau_n_rt_comts l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_example1a x0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x0) x0).
-
-(* constant 1897 *)
-definition l_e_st_eq_landau_n_rt_example1d ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x0) x0 (l_e_st_eq_landau_n_rt_example1c x0) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x0)).
-
-(* constant 1898 *)
-definition l_e_st_eq_landau_n_rt_5114_t1 ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_den x) l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den x) (l_e_st_eq_landau_n_num x)) (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_den x))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_den x))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_tfeq2a x (l_e_st_eq_landau_n_den x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_eqn (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den x) (l_e_st_eq_landau_n_num x)) (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_den x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_den x) (l_e_st_eq_landau_n_num x))) (l_e_st_eq_landau_n_satz40c (l_e_st_eq_landau_n_num x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_den x)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_den x) l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) l_e_st_eq_landau_n_1)).
-
-(* constant 1899 *)
-definition l_e_st_eq_landau_n_rt_satz114 ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_den x)) (l_e_st_eq_landau_n_rt_ratof x)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_num x)) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_den x) l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_tict (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_den x)) (l_e_st_eq_landau_n_rt_ratof x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_den x) l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_den x) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclass x)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_5114_t1 x) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_den x)) (l_e_st_eq_landau_n_rt_ratof x)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_num x))).
-
-(* constant 1900 *)
-definition l_e_st_eq_landau_n_rt_satz114a ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x2) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_rt_rtofn x1) (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_rtofn x2) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_rt_isnert x2 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_isden x1 x2))) (l_e_st_eq_landau_n_rt_satz114 (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_rt_isnert (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) x1 (l_e_st_eq_landau_n_numis x1 x2)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x2) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_rt_rtofn x1)).
-
-(* constant 1901 *)
-definition l_e_st_eq_landau_n_rt_ov ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_ind l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0) (l_e_st_eq_landau_n_rt_satz110 x0 y0) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1902 *)
-definition l_e_st_eq_landau_n_rt_satz110c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_oneax l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0) (l_e_st_eq_landau_n_rt_satz110 x0 y0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov x0 y0)) x0).
-
-(* constant 1903 *)
-definition l_e_st_eq_landau_n_rt_satz110d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov x0 y0)) x0 (l_e_st_eq_landau_n_rt_satz110c x0 y0) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov x0 y0))).
-
-(* constant 1904 *)
-definition l_e_st_eq_landau_n_rt_satz110e ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov x0 y0) y0) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov x0 y0)) x0 (l_e_st_eq_landau_n_rt_comts (l_e_st_eq_landau_n_rt_ov x0 y0) y0) (l_e_st_eq_landau_n_rt_satz110c x0 y0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov x0 y0) y0) x0).
-
-(* constant 1905 *)
-definition l_e_st_eq_landau_n_rt_satz110f ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov x0 y0) y0) x0 (l_e_st_eq_landau_n_rt_satz110e x0 y0) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov x0 y0) y0)).
-
-(* constant 1906 *)
-definition l_e_st_eq_landau_n_rt_satz110g ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λv0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 v0) x0.(l_e_st_eq_landau_n_rt_satz110b x0 y0 v0 (l_e_st_eq_landau_n_rt_ov x0 y0) i (l_e_st_eq_landau_n_rt_satz110c x0 y0) : l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ov x0 y0)).
-
-(* constant 1907 *)
-definition l_e_st_eq_landau_n_rt_satz114b ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_satz110b (l_e_st_eq_landau_n_rt_rtofn x1) (l_e_st_eq_landau_n_rt_rtofn x2) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn x1) (l_e_st_eq_landau_n_rt_rtofn x2)) (l_e_st_eq_landau_n_rt_satz114a x1 x2) (l_e_st_eq_landau_n_rt_satz110c (l_e_st_eq_landau_n_rt_rtofn x1) (l_e_st_eq_landau_n_rt_rtofn x2)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn x1) (l_e_st_eq_landau_n_rt_rtofn x2))).
-
-(* constant 1908 *)
-definition l_e_st_eq_landau_n_rt_satz114c ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn x1) (l_e_st_eq_landau_n_rt_rtofn x2)) (l_e_st_eq_landau_n_rt_satz114b x1 x2) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn x1) (l_e_st_eq_landau_n_rt_rtofn x2)) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x1 x2))).
-
-(* constant 1909 *)
-definition l_e_st_eq_landau_n_rt_5115_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz89 (l_e_st_eq_landau_n_rt_ov y0 x0) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t (l_e_st_eq_landau_n_rt_ov y0 x0))).
-
-(* constant 1910 *)
-definition l_e_st_eq_landau_n_rt_5115_z ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_num u : l_e_st_eq_landau_n_nat).
-
-(* constant 1911 *)
-definition l_e_st_eq_landau_n_rt_5115_v ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_den u : l_e_st_eq_landau_n_nat).
-
-(* constant 1912 *)
-definition l_e_st_eq_landau_n_rt_5115_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_ismore1 u0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_ov y0 x0) (l_e_tris l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_isi u0 (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) u (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) uiu0 (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_refeq1 u (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_isfr u))) (l_e_st_eq_landau_n_rt_satz114b (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) m : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_ov y0 x0)).
-
-(* constant 1913 *)
-definition l_e_st_eq_landau_n_rt_5115_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_moreisi (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1)) (l_or_th9 (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_satz24 (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) (λt:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_satz111d (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1 t) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_satz111e (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1 t)) : l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 1914 *)
-definition l_e_st_eq_landau_n_rt_5115_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_comts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ists2 (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) x0 (l_e_st_eq_landau_n_rt_satz110f (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) (l_e_st_eq_landau_n_rt_assts2 x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))).
-
-(* constant 1915 *)
-definition l_e_st_eq_landau_n_rt_5115_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).λn:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt.(l_e_st_eq_landau_n_rt_ismore1 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt) (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_5115_t4 x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_satz105d (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) n) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt)).
-
-(* constant 1916 *)
-definition l_e_st_eq_landau_n_rt_5115_t6 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).λn:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt.(l_e_st_eq_landau_n_rt_moreisi1 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt) (l_e_st_eq_landau_n_rt_5115_t5 x0 y0 u0 m u uiu0 n) : l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt)).
-
-(* constant 1917 *)
-definition l_e_st_eq_landau_n_rt_5115_t7 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt.(l_e_st_eq_landau_n_rt_moreisi2 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt) (l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt) (l_e_st_eq_landau_n_rt_5115_t4 x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_ists2 (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) i)) : l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt)).
-
-(* constant 1918 *)
-definition l_e_st_eq_landau_n_rt_5115_t8 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_orapp (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt) (l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt)) (l_e_st_eq_landau_n_rt_5115_t3 x0 y0 u0 m u uiu0) (λt:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt.l_e_st_eq_landau_n_rt_5115_t6 x0 y0 u0 m u uiu0 t) (λt:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt.l_e_st_eq_landau_n_rt_5115_t7 x0 y0 u0 m u uiu0 t) : l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt)).
-
-(* constant 1919 *)
-definition l_e_st_eq_landau_n_rt_5115_t9 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_ismore12 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov y0 x0)) y0 (l_e_st_eq_landau_n_rt_example1b (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))))) (l_e_st_eq_landau_n_rt_satz110c y0 x0) (l_e_st_eq_landau_n_rt_satz105d (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_ov y0 x0) x0 (l_e_st_eq_landau_n_rt_5115_t2 x0 y0 u0 m u uiu0)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt) y0).
-
-(* constant 1920 *)
-definition l_e_st_eq_landau_n_rt_5115_t10 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_satz87c (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt) y0 (l_e_st_eq_landau_n_rt_5115_t8 x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_5115_t9 x0 y0 u0 m u uiu0) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) y0).
-
-(* constant 1921 *)
-definition l_e_st_eq_landau_n_rt_5115_t11 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn t) x0) y0) (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_5115_t10 x0 y0 u0 m u uiu0) : l_e_st_eq_landau_n_some (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn t) x0) y0)).
-
-(* constant 1922 *)
-definition l_e_st_eq_landau_n_rt_5115_t12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).(l_e_st_eq_landau_n_rt_ratapp1 u0 (l_e_st_eq_landau_n_some (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn t) x0) y0)) (λu:l_e_st_eq_landau_n_frac.λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_5115_t11 x0 y0 u0 m u ui) : l_e_st_eq_landau_n_some (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn t) x0) y0)).
-
-(* constant 1923 *)
-definition l_e_st_eq_landau_n_rt_satz115 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_someapp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t (l_e_st_eq_landau_n_rt_ov y0 x0)) (l_e_st_eq_landau_n_rt_5115_t1 x0 y0) (l_e_st_eq_landau_n_some (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn t) x0) y0)) (λt:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_more t (l_e_st_eq_landau_n_rt_ov y0 x0).l_e_st_eq_landau_n_rt_5115_t12 x0 y0 t u) : l_e_st_eq_landau_n_some (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn t) x0) y0)).
-
-(* constant 1924 *)
-definition l_e_st_eq_landau_n_rt_5115_t13 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_andi (l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) y0) (l_e_st_eq_landau_n_rt_natrti (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_5115_t10 x0 y0 u0 m u uiu0) : l_and (l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) y0)).
-
-(* constant 1925 *)
-definition l_e_st_eq_landau_n_rt_5115_t14 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_somei l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_natrt t) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts t x0) y0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_5115_t13 x0 y0 u0 m u uiu0) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_natrt t) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts t x0) y0))).
-
-(* constant 1926 *)
-definition l_e_st_eq_landau_n_rt_5115_t15 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).(l_e_st_eq_landau_n_rt_ratapp1 u0 (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_natrt t) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts t x0) y0))) (λu:l_e_st_eq_landau_n_frac.λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_5115_t14 x0 y0 u0 m u ui) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_natrt t) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts t x0) y0))).
-
-(* constant 1927 *)
-definition l_e_st_eq_landau_n_rt_satz115a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_someapp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t (l_e_st_eq_landau_n_rt_ov y0 x0)) (l_e_st_eq_landau_n_rt_5115_t1 x0 y0) (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_natrt t) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts t x0) y0))) (λt:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_more t (l_e_st_eq_landau_n_rt_ov y0 x0).l_e_st_eq_landau_n_rt_5115_t15 x0 y0 t u) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_natrt t) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts t x0) y0))).
-
-(* constant 1928 *)
-definition l_e_st_eq_landau_n_rt_cutprop1a ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.(l_e_st_nonempty l_e_st_eq_landau_n_rt_rat s : Prop).
-
-(* constant 1929 *)
-definition l_e_st_eq_landau_n_rt_cutprop1b ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.(l_not (l_e_st_eq_landau_n_rt_all (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_in x s)) : Prop).
-
-(* constant 1930 *)
-definition l_e_st_eq_landau_n_rt_cutprop1 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.(l_and (l_e_st_eq_landau_n_rt_cutprop1a s) (l_e_st_eq_landau_n_rt_cutprop1b s) : Prop).
-
-(* constant 1931 *)
-definition l_e_st_eq_landau_n_rt_cutprop2a ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_all (λx:l_e_st_eq_landau_n_rt_rat.l_imp (l_not (l_e_st_eq_landau_n_rt_in x s)) (l_e_st_eq_landau_n_rt_less x0 x)) : Prop).
-
-(* constant 1932 *)
-definition l_e_st_eq_landau_n_rt_cutprop2 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_all (λx:l_e_st_eq_landau_n_rt_rat.l_imp (l_e_st_eq_landau_n_rt_in x s) (l_e_st_eq_landau_n_rt_cutprop2a s x)) : Prop).
-
-(* constant 1933 *)
-definition l_e_st_eq_landau_n_rt_iii1_ubprop ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_imp (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_moreis x0 y0) : Prop).
-
-(* constant 1934 *)
-definition l_e_st_eq_landau_n_rt_ub ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_all (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_iii1_ubprop s x0 x) : Prop).
-
-(* constant 1935 *)
-definition l_e_st_eq_landau_n_rt_max ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.(l_and (l_e_st_eq_landau_n_rt_ub s x0) (l_e_st_eq_landau_n_rt_in x0 s) : Prop).
-
-(* constant 1936 *)
-definition l_e_st_eq_landau_n_rt_cutprop3 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.(l_not (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_max s x)) : Prop).
-
-(* constant 1937 *)
-definition l_e_st_eq_landau_n_rt_cutprop ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.(l_and3 (l_e_st_eq_landau_n_rt_cutprop1 s) (l_e_st_eq_landau_n_rt_cutprop2 s) (l_e_st_eq_landau_n_rt_cutprop3 s) : Prop).
-
-(* constant 1938 *)
-definition l_e_st_eq_landau_n_rt_iii1_lbprop ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_imp (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_lessis x0 y0) : Prop).
-
-(* constant 1939 *)
-definition l_e_st_eq_landau_n_rt_lb ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_all (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_iii1_lbprop s x0 x) : Prop).
-
-(* constant 1940 *)
-definition l_e_st_eq_landau_n_rt_min ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.(l_and (l_e_st_eq_landau_n_rt_lb s x0) (l_e_st_eq_landau_n_rt_in x0 s) : Prop).
-
-(* constant 1941 *)
-definition l_e_st_eq_landau_n_rt_cut ≝ (l_e_ot (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) : Type[0]).
-
-(* constant 1942 *)
-definition l_e_st_eq_landau_n_rt_lcl ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_in (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) ksi : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1943 *)
-definition l_e_st_eq_landau_n_rt_lrt ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_lcl ksi) : Prop).
-
-(* constant 1944 *)
-definition l_e_st_eq_landau_n_rt_urt ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.(l_not (l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_lcl ksi)) : Prop).
-
-(* constant 1945 *)
-definition l_e_st_eq_landau_n_rt_clcl ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_inp (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) ksi : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_lcl ksi)).
-
-(* constant 1946 *)
-definition l_e_st_eq_landau_n_rt_clcl1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_and3e1 (l_e_st_eq_landau_n_rt_cutprop1 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_cutprop2 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_cutprop3 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_clcl ksi) : l_e_st_eq_landau_n_rt_cutprop1 (l_e_st_eq_landau_n_rt_lcl ksi)).
-
-(* constant 1947 *)
-definition l_e_st_eq_landau_n_rt_clcl2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_and3e2 (l_e_st_eq_landau_n_rt_cutprop1 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_cutprop2 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_cutprop3 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_clcl ksi) : l_e_st_eq_landau_n_rt_cutprop2 (l_e_st_eq_landau_n_rt_lcl ksi)).
-
-(* constant 1948 *)
-definition l_e_st_eq_landau_n_rt_clcl3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_and3e3 (l_e_st_eq_landau_n_rt_cutprop1 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_cutprop2 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_cutprop3 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_clcl ksi) : l_e_st_eq_landau_n_rt_cutprop3 (l_e_st_eq_landau_n_rt_lcl ksi)).
-
-(* constant 1949 *)
-definition l_e_st_eq_landau_n_rt_clcl1a ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_ande1 (l_e_st_eq_landau_n_rt_cutprop1a (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_cutprop1b (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_clcl1 ksi) : l_e_st_eq_landau_n_rt_cutprop1a (l_e_st_eq_landau_n_rt_lcl ksi)).
-
-(* constant 1950 *)
-definition l_e_st_eq_landau_n_rt_clcl1b ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_ande2 (l_e_st_eq_landau_n_rt_cutprop1a (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_cutprop1b (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_clcl1 ksi) : l_e_st_eq_landau_n_rt_cutprop1b (l_e_st_eq_landau_n_rt_lcl ksi)).
-
-(* constant 1951 *)
-definition l_e_st_eq_landau_n_rt_cutapp1a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.p.(l_e_st_nonemptyapp l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_clcl1a ksi) p p1 : p).
-
-(* constant 1952 *)
-definition l_e_st_eq_landau_n_rt_iii1_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_some_th1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lrt ksi x) (l_e_st_eq_landau_n_rt_clcl1b ksi) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)).
-
-(* constant 1953 *)
-definition l_e_st_eq_landau_n_rt_cutapp1b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) (l_e_st_eq_landau_n_rt_iii1_t1 ksi) p p1 : p).
-
-(* constant 1954 *)
-definition l_e_st_eq_landau_n_rt_iii1_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_mp (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_cutprop2a (l_e_st_eq_landau_n_rt_lcl ksi) x0) lx (l_e_st_eq_landau_n_rt_clcl2 ksi x0) : l_e_st_eq_landau_n_rt_cutprop2a (l_e_st_eq_landau_n_rt_lcl ksi) x0).
-
-(* constant 1955 *)
-definition l_e_st_eq_landau_n_rt_cutapp2a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_mp (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_less x0 y0) uy (l_e_st_eq_landau_n_rt_iii1_t2 ksi x0 lx y0) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1956 *)
-definition l_e_st_eq_landau_n_rt_cutapp2b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_e_st_eq_landau_n_rt_satz83 x0 y0 (l_e_st_eq_landau_n_rt_cutapp2a ksi x0 lx y0 uy) : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 1957 *)
-definition l_e_st_eq_landau_n_rt_iii1_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_some_th4 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_max (l_e_st_eq_landau_n_rt_lcl ksi) x) (l_e_st_eq_landau_n_rt_clcl3 ksi) x0 : l_not (l_e_st_eq_landau_n_rt_max (l_e_st_eq_landau_n_rt_lcl ksi) x0)).
-
-(* constant 1958 *)
-definition l_e_st_eq_landau_n_rt_iii1_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_and_th4 (l_e_st_eq_landau_n_rt_ub (l_e_st_eq_landau_n_rt_lcl ksi) x0) (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_iii1_t3 ksi x0 lx) lx : l_not (l_e_st_eq_landau_n_rt_ub (l_e_st_eq_landau_n_rt_lcl ksi) x0)).
-
-(* constant 1959 *)
-definition l_e_st_eq_landau_n_rt_iii1_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_some_th1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_iii1_ubprop (l_e_st_eq_landau_n_rt_lcl ksi) x0 x) (l_e_st_eq_landau_n_rt_iii1_t4 ksi x0 lx) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_not (l_e_st_eq_landau_n_rt_iii1_ubprop (l_e_st_eq_landau_n_rt_lcl ksi) x0 x))).
-
-(* constant 1960 *)
-definition l_e_st_eq_landau_n_rt_iii1_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λp:Prop.λp1:∀y:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi y.∀u:l_e_st_eq_landau_n_rt_less x0 y.p.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_iii1_ubprop (l_e_st_eq_landau_n_rt_lcl ksi) x0 y0).(l_imp_th5 (l_e_st_eq_landau_n_rt_lrt ksi y0) (l_e_st_eq_landau_n_rt_moreis x0 y0) n : l_e_st_eq_landau_n_rt_lrt ksi y0).
-
-(* constant 1961 *)
-definition l_e_st_eq_landau_n_rt_iii1_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λp:Prop.λp1:∀y:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi y.∀u:l_e_st_eq_landau_n_rt_less x0 y.p.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_iii1_ubprop (l_e_st_eq_landau_n_rt_lcl ksi) x0 y0).(l_imp_th6 (l_e_st_eq_landau_n_rt_lrt ksi y0) (l_e_st_eq_landau_n_rt_moreis x0 y0) n : l_not (l_e_st_eq_landau_n_rt_moreis x0 y0)).
-
-(* constant 1962 *)
-definition l_e_st_eq_landau_n_rt_iii1_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λp:Prop.λp1:∀y:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi y.∀u:l_e_st_eq_landau_n_rt_less x0 y.p.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_iii1_ubprop (l_e_st_eq_landau_n_rt_lcl ksi) x0 y0).(l_e_st_eq_landau_n_rt_satz81j x0 y0 (l_e_st_eq_landau_n_rt_iii1_t7 ksi x0 lx p p1 y0 n) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1963 *)
-definition l_e_st_eq_landau_n_rt_iii1_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λp:Prop.λp1:∀y:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi y.∀u:l_e_st_eq_landau_n_rt_less x0 y.p.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_iii1_ubprop (l_e_st_eq_landau_n_rt_lcl ksi) x0 y0).(p1 y0 (l_e_st_eq_landau_n_rt_iii1_t6 ksi x0 lx p p1 y0 n) (l_e_st_eq_landau_n_rt_iii1_t8 ksi x0 lx p p1 y0 n) : p).
-
-(* constant 1964 *)
-definition l_e_st_eq_landau_n_rt_cutapp3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λp:Prop.λp1:∀y:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi y.∀u:l_e_st_eq_landau_n_rt_less x0 y.p.(l_someapp l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_not (l_e_st_eq_landau_n_rt_iii1_ubprop (l_e_st_eq_landau_n_rt_lcl ksi) x0 y)) (l_e_st_eq_landau_n_rt_iii1_t5 ksi x0 lx) p (λy:l_e_st_eq_landau_n_rt_rat.λt:l_not (l_e_st_eq_landau_n_rt_iii1_ubprop (l_e_st_eq_landau_n_rt_lcl ksi) x0 y).l_e_st_eq_landau_n_rt_iii1_t9 ksi x0 lx p p1 y t) : p).
-
-(* constant 1965 *)
-definition l_e_st_eq_landau_n_rt_iii1_t10 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).(l_andi (l_e_st_eq_landau_n_rt_cutprop1a s) (l_e_st_eq_landau_n_rt_cutprop1b s) (l_e_st_nonemptyi l_e_st_eq_landau_n_rt_rat s x0 i) (l_all_th1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_in x s) y0 n) : l_e_st_eq_landau_n_rt_cutprop1 s).
-
-(* constant 1966 *)
-definition l_e_st_eq_landau_n_rt_iii1_t11 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λn:∀x:l_e_st_eq_landau_n_rt_rat.l_not (l_e_st_eq_landau_n_rt_max s x).(l_some_th5 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_max s x) n : l_e_st_eq_landau_n_rt_cutprop3 s).
-
-(* constant 1967 *)
-definition l_e_st_eq_landau_n_rt_cut1 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).λl:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_not (l_e_st_eq_landau_n_rt_in y s).l_e_st_eq_landau_n_rt_less x y.λm:∀x:l_e_st_eq_landau_n_rt_rat.l_not (l_e_st_eq_landau_n_rt_max s x).(l_and3i (l_e_st_eq_landau_n_rt_cutprop1 s) (l_e_st_eq_landau_n_rt_cutprop2 s) (l_e_st_eq_landau_n_rt_cutprop3 s) (l_e_st_eq_landau_n_rt_iii1_t10 s x0 i y0 n) l (l_e_st_eq_landau_n_rt_iii1_t11 s m) : l_e_st_eq_landau_n_rt_cutprop s).
-
-(* constant 1968 *)
-definition l_e_st_eq_landau_n_rt_rp_is ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_is l_e_st_eq_landau_n_rt_cut ksi eta : Prop).
-
-(* constant 1969 *)
-definition l_e_st_eq_landau_n_rt_rp_nis ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_not (l_e_st_eq_landau_n_rt_rp_is ksi eta) : Prop).
-
-(* constant 1970 *)
-definition l_e_st_eq_landau_n_rt_rp_ise ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isini (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) ksi eta i : l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta)).
-
-(* constant 1971 *)
-definition l_e_st_eq_landau_n_rt_rp_ise1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_e_st_issete1 l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta) (l_e_st_eq_landau_n_rt_rp_ise ksi eta i) x0 lx : l_e_st_eq_landau_n_rt_lrt eta x0).
-
-(* constant 1972 *)
-definition l_e_st_eq_landau_n_rt_rp_isi ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta).(l_e_isine (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) ksi eta i : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 1973 *)
-definition l_e_st_eq_landau_n_rt_rp_isi1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_lrt eta x.λk:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt eta x.l_e_st_eq_landau_n_rt_lrt ksi x.(l_e_st_eq_landau_n_rt_rp_isi ksi eta (l_e_st_isseti l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta) l k) : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 1974 *)
-definition l_e_st_eq_landau_n_rt_rp_cutof ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λcs:l_e_st_eq_landau_n_rt_cutprop s.(l_e_out (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) s cs : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 1975 *)
-definition l_e_st_eq_landau_n_rt_rp_ine ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λcs:l_e_st_eq_landau_n_rt_cutprop s.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.(l_e_st_issete1 l_e_st_eq_landau_n_rt_rat s (l_e_st_eq_landau_n_rt_lcl (l_e_st_eq_landau_n_rt_rp_cutof s cs)) (l_e_isinout (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) s cs) x0 i : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_cutof s cs) x0).
-
-(* constant 1976 *)
-definition l_e_st_eq_landau_n_rt_rp_ini ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λcs:l_e_st_eq_landau_n_rt_cutprop s.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_cutof s cs) x0.(l_e_st_issete2 l_e_st_eq_landau_n_rt_rat s (l_e_st_eq_landau_n_rt_lcl (l_e_st_eq_landau_n_rt_rp_cutof s cs)) (l_e_isinout (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) s cs) x0 lx : l_e_st_eq_landau_n_rt_in x0 s).
-
-(* constant 1977 *)
-definition l_e_st_eq_landau_n_rt_rp_isi2 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λt:l_e_st_set l_e_st_eq_landau_n_rt_rat.λcs:l_e_st_eq_landau_n_rt_cutprop s.λct:l_e_st_eq_landau_n_rt_cutprop t.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_in x t.λj:∀x:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_in x t.l_e_st_eq_landau_n_rt_in x s.(l_e_isouti (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) s cs t ct (l_e_st_isseti l_e_st_eq_landau_n_rt_rat s t i j) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_cutof s cs) (l_e_st_eq_landau_n_rt_rp_cutof t ct)).
-
-(* constant 1978 *)
-definition l_e_st_eq_landau_n_rt_rp_all ≝ λp:∀x:l_e_st_eq_landau_n_rt_cut.Prop.(l_all l_e_st_eq_landau_n_rt_cut p : Prop).
-
-(* constant 1979 *)
-definition l_e_st_eq_landau_n_rt_rp_some ≝ λp:∀x:l_e_st_eq_landau_n_rt_cut.Prop.(l_some l_e_st_eq_landau_n_rt_cut p : Prop).
-
-(* constant 1980 *)
-definition l_e_st_eq_landau_n_rt_rp_one ≝ λp:∀x:l_e_st_eq_landau_n_rt_cut.Prop.(l_e_one l_e_st_eq_landau_n_rt_cut p : Prop).
-
-(* constant 1981 *)
-definition l_e_st_eq_landau_n_rt_rp_satz116 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_refis l_e_st_eq_landau_n_rt_cut ksi : l_e_st_eq_landau_n_rt_rp_is ksi ksi).
-
-(* constant 1982 *)
-definition l_e_st_eq_landau_n_rt_rp_satz117 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_symis l_e_st_eq_landau_n_rt_cut ksi eta i : l_e_st_eq_landau_n_rt_rp_is eta ksi).
-
-(* constant 1983 *)
-definition l_e_st_eq_landau_n_rt_rp_satz118 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is eta zeta.(l_e_tris l_e_st_eq_landau_n_rt_cut ksi eta zeta i j : l_e_st_eq_landau_n_rt_rp_is ksi zeta).
-
-(* constant 1984 *)
-definition l_e_st_eq_landau_n_rt_rp_1119_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_ec3e23 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) m : l_not (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1985 *)
-definition l_e_st_eq_landau_n_rt_rp_satz119 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more y0 x0.(l_imp_th3 (l_e_st_eq_landau_n_rt_lrt ksi y0) (l_e_st_eq_landau_n_rt_less y0 x0) (l_e_st_eq_landau_n_rt_rp_1119_t1 y0 x0 m) (λt:l_e_st_eq_landau_n_rt_lrt ksi y0.l_e_st_eq_landau_n_rt_cutapp2a ksi y0 t x0 ux) : l_e_st_eq_landau_n_rt_urt ksi y0).
-
-(* constant 1986 *)
-definition l_e_st_eq_landau_n_rt_rp_satz119a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_rp_satz119 ksi x0 ux y0 (l_e_st_eq_landau_n_rt_satz83 x0 y0 l) : l_e_st_eq_landau_n_rt_urt ksi y0).
-
-(* constant 1987 *)
-definition l_e_st_eq_landau_n_rt_rp_1120_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_ec3e32 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) l : l_not (l_e_st_eq_landau_n_rt_more x0 y0)).
-
-(* constant 1988 *)
-definition l_e_st_eq_landau_n_rt_rp_satz120 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_imp_th7 (l_e_st_eq_landau_n_rt_lrt ksi y0) (l_e_st_eq_landau_n_rt_more y0 x0) (l_e_st_eq_landau_n_rt_rp_1120_t1 y0 x0 l) (λt:l_e_st_eq_landau_n_rt_urt ksi y0.l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx y0 t) : l_e_st_eq_landau_n_rt_lrt ksi y0).
-
-(* constant 1989 *)
-definition l_e_st_eq_landau_n_rt_rp_satz120a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_rp_satz120 ksi x0 lx y0 (l_e_st_eq_landau_n_rt_satz82 x0 y0 m) : l_e_st_eq_landau_n_rt_lrt ksi y0).
-
-(* constant 1990 *)
-definition l_e_st_eq_landau_n_rt_iii1_t12 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.λx0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).(i x0 j y0 : ∀u:l_e_st_eq_landau_n_rt_less y0 x0.l_e_st_eq_landau_n_rt_in y0 s).
-
-(* constant 1991 *)
-definition l_e_st_eq_landau_n_rt_iii1_t13 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.λx0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).(l_imp_th3 (l_e_st_eq_landau_n_rt_less y0 x0) (l_e_st_eq_landau_n_rt_in y0 s) n (l_e_st_eq_landau_n_rt_iii1_t12 s i x0 j y0 n) : l_not (l_e_st_eq_landau_n_rt_less y0 x0)).
-
-(* constant 1992 *)
-definition l_e_st_eq_landau_n_rt_iii1_t14 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.λx0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).(l_e_st_eq_landau_n_rt_satz81f y0 x0 (l_e_st_eq_landau_n_rt_iii1_t13 s i x0 j y0 n) : l_e_st_eq_landau_n_rt_moreis y0 x0).
-
-(* constant 1993 *)
-definition l_e_st_eq_landau_n_rt_iii1_t15 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.λx0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).λk:l_e_st_eq_landau_n_rt_is y0 x0.(l_e_isp1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_in x s) x0 y0 j k : l_e_st_eq_landau_n_rt_in y0 s).
-
-(* constant 1994 *)
-definition l_e_st_eq_landau_n_rt_iii1_t16 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.λx0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).(l_imp_th3 (l_e_st_eq_landau_n_rt_is y0 x0) (l_e_st_eq_landau_n_rt_in y0 s) n (λt:l_e_st_eq_landau_n_rt_is y0 x0.l_e_st_eq_landau_n_rt_iii1_t15 s i x0 j y0 n t) : l_e_st_eq_landau_n_rt_nis y0 x0).
-
-(* constant 1995 *)
-definition l_e_st_eq_landau_n_rt_iii1_t17 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.λx0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).(l_ore1 (l_e_st_eq_landau_n_rt_more y0 x0) (l_e_st_eq_landau_n_rt_is y0 x0) (l_e_st_eq_landau_n_rt_iii1_t14 s i x0 j y0 n) (l_e_st_eq_landau_n_rt_iii1_t16 s i x0 j y0 n) : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 1996 *)
-definition l_e_st_eq_landau_n_rt_iii1_t18 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.λx0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).(l_e_st_eq_landau_n_rt_satz82 y0 x0 (l_e_st_eq_landau_n_rt_iii1_t17 s i x0 j y0 n) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1997 *)
-definition l_e_st_eq_landau_n_rt_iii1_t19 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.(λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x s.λy:l_e_st_eq_landau_n_rt_rat.λu:l_not (l_e_st_eq_landau_n_rt_in y s).l_e_st_eq_landau_n_rt_iii1_t18 s i x t y u : l_e_st_eq_landau_n_rt_cutprop2 s).
-
-(* constant 1998 *)
-definition l_e_st_eq_landau_n_rt_iii1_t20 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.(s1 x0 i : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x0))).
-
-(* constant 1999 *)
-definition l_e_st_eq_landau_n_rt_iii1_t21 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0).(l_ande1 (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0) a : l_e_st_eq_landau_n_rt_in y0 s).
-
-(* constant 2000 *)
-definition l_e_st_eq_landau_n_rt_iii1_t22 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0).(l_ande2 (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0) a : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 2001 *)
-definition l_e_st_eq_landau_n_rt_iii1_t23 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0).(l_e_st_eq_landau_n_rt_satz81g y0 x0 (l_e_st_eq_landau_n_rt_iii1_t22 s s1 x0 i y0 a) : l_not (l_e_st_eq_landau_n_rt_lessis y0 x0)).
-
-(* constant 2002 *)
-definition l_e_st_eq_landau_n_rt_iii1_t24 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0).(l_imp_th3 (l_e_st_eq_landau_n_rt_moreis x0 y0) (l_e_st_eq_landau_n_rt_lessis y0 x0) (l_e_st_eq_landau_n_rt_iii1_t23 s s1 x0 i y0 a) (λt:l_e_st_eq_landau_n_rt_moreis x0 y0.l_e_st_eq_landau_n_rt_satz84 x0 y0 t) : l_not (l_e_st_eq_landau_n_rt_moreis x0 y0)).
-
-(* constant 2003 *)
-definition l_e_st_eq_landau_n_rt_iii1_t25 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0).(l_imp_th4 (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_moreis x0 y0) (l_e_st_eq_landau_n_rt_iii1_t21 s s1 x0 i y0 a) (l_e_st_eq_landau_n_rt_iii1_t24 s s1 x0 i y0 a) : l_not (l_e_st_eq_landau_n_rt_iii1_ubprop s x0 y0)).
-
-(* constant 2004 *)
-definition l_e_st_eq_landau_n_rt_iii1_t26 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0).(l_all_th1 l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_iii1_ubprop s x0 y) y0 (l_e_st_eq_landau_n_rt_iii1_t25 s s1 x0 i y0 a) : l_not (l_e_st_eq_landau_n_rt_ub s x0)).
-
-(* constant 2005 *)
-definition l_e_st_eq_landau_n_rt_iii1_t27 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0).(l_and_th1 (l_e_st_eq_landau_n_rt_ub s x0) (l_e_st_eq_landau_n_rt_in x0 s) (l_e_st_eq_landau_n_rt_iii1_t26 s s1 x0 i y0 a) : l_not (l_e_st_eq_landau_n_rt_max s x0)).
-
-(* constant 2006 *)
-definition l_e_st_eq_landau_n_rt_iii1_t28 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.(l_someapp l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x0)) (l_e_st_eq_landau_n_rt_iii1_t20 s s1 x0 i) (l_not (l_e_st_eq_landau_n_rt_max s x0)) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x0).l_e_st_eq_landau_n_rt_iii1_t27 s s1 x0 i y t) : l_not (l_e_st_eq_landau_n_rt_max s x0)).
-
-(* constant 2007 *)
-definition l_e_st_eq_landau_n_rt_iii1_t29 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in x0 s).(l_and_th2 (l_e_st_eq_landau_n_rt_ub s x0) (l_e_st_eq_landau_n_rt_in x0 s) n : l_not (l_e_st_eq_landau_n_rt_max s x0)).
-
-(* constant 2008 *)
-definition l_e_st_eq_landau_n_rt_iii1_t30 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.(l_imp_th1 (l_e_st_eq_landau_n_rt_in x0 s) (l_not (l_e_st_eq_landau_n_rt_max s x0)) (λu:l_e_st_eq_landau_n_rt_in x0 s.l_e_st_eq_landau_n_rt_iii1_t28 s s1 x0 u) (λu:l_not (l_e_st_eq_landau_n_rt_in x0 s).l_e_st_eq_landau_n_rt_iii1_t29 s s1 x0 u) : l_not (l_e_st_eq_landau_n_rt_max s x0)).
-
-(* constant 2009 *)
-definition l_e_st_eq_landau_n_rt_iii1_t31 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).(l_e_st_eq_landau_n_rt_iii1_t11 s (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_iii1_t30 s s1 x) : l_e_st_eq_landau_n_rt_cutprop3 s).
-
-(* constant 2010 *)
-definition l_e_st_eq_landau_n_rt_cut2 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).λj:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).(l_and3i (l_e_st_eq_landau_n_rt_cutprop1 s) (l_e_st_eq_landau_n_rt_cutprop2 s) (l_e_st_eq_landau_n_rt_cutprop3 s) (l_e_st_eq_landau_n_rt_iii1_t10 s x0 i y0 n) (l_e_st_eq_landau_n_rt_iii1_t19 s j) (l_e_st_eq_landau_n_rt_iii1_t31 s s1) : l_e_st_eq_landau_n_rt_cutprop s).
-
-(* constant 2011 *)
-definition l_e_st_eq_landau_n_rt_rp_more ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_lrt ksi x) (l_e_st_eq_landau_n_rt_urt eta x)) : Prop).
-
-(* constant 2012 *)
-definition l_e_st_eq_landau_n_rt_rp_iii2_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀u:l_e_st_eq_landau_n_rt_urt eta x.p.λx0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta x0).(l_ande1 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta x0) a : l_e_st_eq_landau_n_rt_lrt ksi x0).
-
-(* constant 2013 *)
-definition l_e_st_eq_landau_n_rt_rp_iii2_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀u:l_e_st_eq_landau_n_rt_urt eta x.p.λx0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta x0).(l_ande2 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta x0) a : l_e_st_eq_landau_n_rt_urt eta x0).
-
-(* constant 2014 *)
-definition l_e_st_eq_landau_n_rt_rp_iii2_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀u:l_e_st_eq_landau_n_rt_urt eta x.p.λx0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta x0).(p1 x0 (l_e_st_eq_landau_n_rt_rp_iii2_t1 ksi eta m p p1 x0 a) (l_e_st_eq_landau_n_rt_rp_iii2_t2 ksi eta m p p1 x0 a) : p).
-
-(* constant 2015 *)
-definition l_e_st_eq_landau_n_rt_rp_moreapp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀u:l_e_st_eq_landau_n_rt_urt eta x.p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_lrt ksi x) (l_e_st_eq_landau_n_rt_urt eta x)) m p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_and (l_e_st_eq_landau_n_rt_lrt ksi x) (l_e_st_eq_landau_n_rt_urt eta x).l_e_st_eq_landau_n_rt_rp_iii2_t3 ksi eta m p p1 x t) : p).
-
-(* constant 2016 *)
-definition l_e_st_eq_landau_n_rt_rp_less ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_urt ksi x) (l_e_st_eq_landau_n_rt_lrt eta x)) : Prop).
-
-(* constant 2017 *)
-definition l_e_st_eq_landau_n_rt_rp_iii2_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀u:l_e_st_eq_landau_n_rt_lrt eta x.p.λx0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta x0).(l_ande1 (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta x0) a : l_e_st_eq_landau_n_rt_urt ksi x0).
-
-(* constant 2018 *)
-definition l_e_st_eq_landau_n_rt_rp_iii2_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀u:l_e_st_eq_landau_n_rt_lrt eta x.p.λx0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta x0).(l_ande2 (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta x0) a : l_e_st_eq_landau_n_rt_lrt eta x0).
-
-(* constant 2019 *)
-definition l_e_st_eq_landau_n_rt_rp_iii2_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀u:l_e_st_eq_landau_n_rt_lrt eta x.p.λx0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta x0).(p1 x0 (l_e_st_eq_landau_n_rt_rp_iii2_t4 ksi eta l p p1 x0 a) (l_e_st_eq_landau_n_rt_rp_iii2_t5 ksi eta l p p1 x0 a) : p).
-
-(* constant 2020 *)
-definition l_e_st_eq_landau_n_rt_rp_lessapp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀u:l_e_st_eq_landau_n_rt_lrt eta x.p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_urt ksi x) (l_e_st_eq_landau_n_rt_lrt eta x)) l p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_and (l_e_st_eq_landau_n_rt_urt ksi x) (l_e_st_eq_landau_n_rt_lrt eta x).l_e_st_eq_landau_n_rt_rp_iii2_t6 ksi eta l p p1 x t) : p).
-
-(* constant 2021 *)
-definition l_e_st_eq_landau_n_rt_rp_2121_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λux:l_e_st_eq_landau_n_rt_urt eta x0.(l_andi (l_e_st_eq_landau_n_rt_urt eta x0) (l_e_st_eq_landau_n_rt_lrt ksi x0) ux lx : l_and (l_e_st_eq_landau_n_rt_urt eta x0) (l_e_st_eq_landau_n_rt_lrt ksi x0)).
-
-(* constant 2022 *)
-definition l_e_st_eq_landau_n_rt_rp_2121_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λux:l_e_st_eq_landau_n_rt_urt eta x0.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_urt eta x) (l_e_st_eq_landau_n_rt_lrt ksi x)) x0 (l_e_st_eq_landau_n_rt_rp_2121_t1 ksi eta m x0 lx ux) : l_e_st_eq_landau_n_rt_rp_less eta ksi).
-
-(* constant 2023 *)
-definition l_e_st_eq_landau_n_rt_rp_satz121 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_moreapp ksi eta m (l_e_st_eq_landau_n_rt_rp_less eta ksi) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_urt eta x.l_e_st_eq_landau_n_rt_rp_2121_t2 ksi eta m x t u) : l_e_st_eq_landau_n_rt_rp_less eta ksi).
-
-(* constant 2024 *)
-definition l_e_st_eq_landau_n_rt_rp_2122_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.(l_andi (l_e_st_eq_landau_n_rt_lrt eta x0) (l_e_st_eq_landau_n_rt_urt ksi x0) lx ux : l_and (l_e_st_eq_landau_n_rt_lrt eta x0) (l_e_st_eq_landau_n_rt_urt ksi x0)).
-
-(* constant 2025 *)
-definition l_e_st_eq_landau_n_rt_rp_2122_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_lrt eta x) (l_e_st_eq_landau_n_rt_urt ksi x)) x0 (l_e_st_eq_landau_n_rt_rp_2122_t1 ksi eta l x0 ux lx) : l_e_st_eq_landau_n_rt_rp_more eta ksi).
-
-(* constant 2026 *)
-definition l_e_st_eq_landau_n_rt_rp_satz122 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_lessapp ksi eta l (l_e_st_eq_landau_n_rt_rp_more eta ksi) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λu:l_e_st_eq_landau_n_rt_lrt eta x.l_e_st_eq_landau_n_rt_rp_2122_t2 ksi eta l x t u) : l_e_st_eq_landau_n_rt_rp_more eta ksi).
-
-(* constant 2027 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λux:l_e_st_eq_landau_n_rt_urt eta x0.(l_e_st_isset_th3 l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta) x0 lx ux : l_not (l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta))).
-
-(* constant 2028 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λux:l_e_st_eq_landau_n_rt_urt eta x0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta)) (l_e_st_eq_landau_n_rt_rp_2123_t1 ksi eta m x0 lx ux) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_ise ksi eta t) : l_not (l_e_st_eq_landau_n_rt_rp_is ksi eta)).
-
-(* constant 2029 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_moreapp ksi eta m (l_not (l_e_st_eq_landau_n_rt_rp_is ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_urt eta x.l_e_st_eq_landau_n_rt_rp_2123_t2 ksi eta m x t u) : l_not (l_e_st_eq_landau_n_rt_rp_is ksi eta)).
-
-(* constant 2030 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_ec_th2 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_2123_t3 ksi eta t) : l_ec (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta)).
-
-(* constant 2031 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.(l_e_st_isset_th4 l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_lcl eta) (l_e_st_eq_landau_n_rt_lcl ksi) x0 lx ux : l_not (l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta))).
-
-(* constant 2032 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta)) (l_e_st_eq_landau_n_rt_rp_2123_t5 ksi eta l x0 ux lx) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_ise ksi eta t) : l_not (l_e_st_eq_landau_n_rt_rp_is ksi eta)).
-
-(* constant 2033 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_lessapp ksi eta l (l_not (l_e_st_eq_landau_n_rt_rp_is ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λu:l_e_st_eq_landau_n_rt_lrt eta x.l_e_st_eq_landau_n_rt_rp_2123_t6 ksi eta l x t u) : l_not (l_e_st_eq_landau_n_rt_rp_is ksi eta)).
-
-(* constant 2034 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_ec_th1 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (λt:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_2123_t7 ksi eta t) : l_ec (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta)).
-
-(* constant 2035 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λux:l_e_st_eq_landau_n_rt_urt eta x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λly:l_e_st_eq_landau_n_rt_lrt eta y0.(l_e_st_eq_landau_n_rt_cutapp2a ksi x0 lx y0 uy : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 2036 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λux:l_e_st_eq_landau_n_rt_urt eta x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λly:l_e_st_eq_landau_n_rt_lrt eta y0.(l_e_st_eq_landau_n_rt_cutapp2b eta y0 ly x0 ux : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 2037 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λux:l_e_st_eq_landau_n_rt_urt eta x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λly:l_e_st_eq_landau_n_rt_lrt eta y0.(l_mp (l_e_st_eq_landau_n_rt_less x0 y0) l_con (l_e_st_eq_landau_n_rt_rp_2123_t9 ksi eta m l x0 lx ux y0 uy ly) (l_ec3e23 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) (l_e_st_eq_landau_n_rt_rp_2123_t10 ksi eta m l x0 lx ux y0 uy ly)) : l_con).
-
-(* constant 2038 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λux:l_e_st_eq_landau_n_rt_urt eta x0.(l_e_st_eq_landau_n_rt_rp_lessapp ksi eta l l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λu:l_e_st_eq_landau_n_rt_lrt eta x.l_e_st_eq_landau_n_rt_rp_2123_t11 ksi eta m l x0 lx ux x t u) : l_con).
-
-(* constant 2039 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_moreapp ksi eta m l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_urt eta x.l_e_st_eq_landau_n_rt_rp_2123_t12 ksi eta m l x t u) : l_con).
-
-(* constant 2040 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(λt:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_2123_t13 ksi eta m t : l_not (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2041 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_ec_th1 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_2123_t14 ksi eta t) : l_ec (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2042 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_ec3_th6 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_2123_t4 ksi eta) (l_e_st_eq_landau_n_rt_rp_2123_t15 ksi eta) (l_e_st_eq_landau_n_rt_rp_2123_t8 ksi eta) : l_ec3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2043 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_or3i1 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) i : l_or3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2044 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_nis ksi eta.(l_imp_th3 (l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta)) (l_e_st_eq_landau_n_rt_rp_is ksi eta) n (λt:l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta).l_e_st_eq_landau_n_rt_rp_isi ksi eta t) : l_not (l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta))).
-
-(* constant 2045 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_nis ksi eta.(l_e_st_isset_th5 l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta) (l_e_st_eq_landau_n_rt_rp_2123_t17 ksi eta n) : l_or (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_more eta ksi)).
-
-(* constant 2046 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_nis ksi eta.(l_or_th8 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_more eta ksi) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_2123_t18 ksi eta n) (λt:l_e_st_eq_landau_n_rt_rp_more eta ksi.l_e_st_eq_landau_n_rt_rp_satz121 eta ksi t) : l_or (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2047 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_nis ksi eta.(l_or3_th7 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_2123_t19 ksi eta n) : l_or3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2048 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_or3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_2123_t16 ksi eta t) (λt:l_e_st_eq_landau_n_rt_rp_nis ksi eta.l_e_st_eq_landau_n_rt_rp_2123_t20 ksi eta t) : l_or3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2049 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_orec3i (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_2123_b ksi eta) (l_e_st_eq_landau_n_rt_rp_2123_a ksi eta) : l_orec3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2050 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_orec3e1 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123 ksi eta) : l_or3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2051 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_orec3e2 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123 ksi eta) : l_ec3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2052 *)
-definition l_e_st_eq_landau_n_rt_rp_moreis ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_or (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) : Prop).
-
-(* constant 2053 *)
-definition l_e_st_eq_landau_n_rt_rp_lessis ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_or (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) : Prop).
-
-(* constant 2054 *)
-definition l_e_st_eq_landau_n_rt_rp_satz124 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_less eta ksi) (l_e_st_eq_landau_n_rt_rp_is eta ksi) m (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz121 ksi eta t) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_symis l_e_st_eq_landau_n_rt_cut ksi eta t) : l_e_st_eq_landau_n_rt_rp_lessis eta ksi).
-
-(* constant 2055 *)
-definition l_e_st_eq_landau_n_rt_rp_satz125 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more eta ksi) (l_e_st_eq_landau_n_rt_rp_is eta ksi) l (λt:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_satz122 ksi eta t) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_symis l_e_st_eq_landau_n_rt_cut ksi eta t) : l_e_st_eq_landau_n_rt_rp_moreis eta ksi).
-
-(* constant 2056 *)
-definition l_e_st_eq_landau_n_rt_rp_ismore1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi zeta.(l_e_isp l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_more u zeta) ksi eta m i : l_e_st_eq_landau_n_rt_rp_more eta zeta).
-
-(* constant 2057 *)
-definition l_e_st_eq_landau_n_rt_rp_ismore2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λm:l_e_st_eq_landau_n_rt_rp_more zeta ksi.(l_e_isp l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_more zeta u) ksi eta m i : l_e_st_eq_landau_n_rt_rp_more zeta eta).
-
-(* constant 2058 *)
-definition l_e_st_eq_landau_n_rt_rp_isless1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less ksi zeta.(l_e_isp l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_less u zeta) ksi eta l i : l_e_st_eq_landau_n_rt_rp_less eta zeta).
-
-(* constant 2059 *)
-definition l_e_st_eq_landau_n_rt_rp_isless2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less zeta ksi.(l_e_isp l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_less zeta u) ksi eta l i : l_e_st_eq_landau_n_rt_rp_less zeta eta).
-
-(* constant 2060 *)
-definition l_e_st_eq_landau_n_rt_rp_ismoreis1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi zeta.(l_e_isp l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_moreis u zeta) ksi eta m i : l_e_st_eq_landau_n_rt_rp_moreis eta zeta).
-
-(* constant 2061 *)
-definition l_e_st_eq_landau_n_rt_rp_ismoreis2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λm:l_e_st_eq_landau_n_rt_rp_moreis zeta ksi.(l_e_isp l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_moreis zeta u) ksi eta m i : l_e_st_eq_landau_n_rt_rp_moreis zeta eta).
-
-(* constant 2062 *)
-definition l_e_st_eq_landau_n_rt_rp_islessis1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi zeta.(l_e_isp l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_lessis u zeta) ksi eta l i : l_e_st_eq_landau_n_rt_rp_lessis eta zeta).
-
-(* constant 2063 *)
-definition l_e_st_eq_landau_n_rt_rp_islessis2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λl:l_e_st_eq_landau_n_rt_rp_lessis zeta ksi.(l_e_isp l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_lessis zeta u) ksi eta l i : l_e_st_eq_landau_n_rt_rp_lessis zeta eta).
-
-(* constant 2064 *)
-definition l_e_st_eq_landau_n_rt_rp_moreisi2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_ori2 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) i : l_e_st_eq_landau_n_rt_rp_moreis ksi eta).
-
-(* constant 2065 *)
-definition l_e_st_eq_landau_n_rt_rp_lessisi2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_ori2 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) i : l_e_st_eq_landau_n_rt_rp_lessis ksi eta).
-
-(* constant 2066 *)
-definition l_e_st_eq_landau_n_rt_rp_moreisi1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_ori1 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) m : l_e_st_eq_landau_n_rt_rp_moreis ksi eta).
-
-(* constant 2067 *)
-definition l_e_st_eq_landau_n_rt_rp_lessisi1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_ori1 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) l : l_e_st_eq_landau_n_rt_rp_lessis ksi eta).
-
-(* constant 2068 *)
-definition l_e_st_eq_landau_n_rt_rp_ismore12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.λm:l_e_st_eq_landau_n_rt_rp_more ksi zeta.(l_e_st_eq_landau_n_rt_rp_ismore2 zeta upsilon eta j (l_e_st_eq_landau_n_rt_rp_ismore1 ksi eta zeta i m) : l_e_st_eq_landau_n_rt_rp_more eta upsilon).
-
-(* constant 2069 *)
-definition l_e_st_eq_landau_n_rt_rp_isless12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.λl:l_e_st_eq_landau_n_rt_rp_less ksi zeta.(l_e_st_eq_landau_n_rt_rp_isless2 zeta upsilon eta j (l_e_st_eq_landau_n_rt_rp_isless1 ksi eta zeta i l) : l_e_st_eq_landau_n_rt_rp_less eta upsilon).
-
-(* constant 2070 *)
-definition l_e_st_eq_landau_n_rt_rp_ismoreis12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi zeta.(l_e_st_eq_landau_n_rt_rp_ismoreis2 zeta upsilon eta j (l_e_st_eq_landau_n_rt_rp_ismoreis1 ksi eta zeta i m) : l_e_st_eq_landau_n_rt_rp_moreis eta upsilon).
-
-(* constant 2071 *)
-definition l_e_st_eq_landau_n_rt_rp_islessis12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi zeta.(l_e_st_eq_landau_n_rt_rp_islessis2 zeta upsilon eta j (l_e_st_eq_landau_n_rt_rp_islessis1 ksi eta zeta i l) : l_e_st_eq_landau_n_rt_rp_lessis eta upsilon).
-
-(* constant 2072 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.(l_ec3_th7 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123b ksi eta) (l_comor (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) m) : l_not (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2073 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.(l_ec3_th9 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123b ksi eta) l : l_not (l_e_st_eq_landau_n_rt_rp_more ksi eta)).
-
-(* constant 2074 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123e ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λn:l_not (l_e_st_eq_landau_n_rt_rp_more ksi eta).(l_or3_th2 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123a ksi eta) n : l_e_st_eq_landau_n_rt_rp_lessis ksi eta).
-
-(* constant 2075 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123f ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λn:l_not (l_e_st_eq_landau_n_rt_rp_less ksi eta).(l_comor (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_or3_th3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123a ksi eta) n) : l_e_st_eq_landau_n_rt_rp_moreis ksi eta).
-
-(* constant 2076 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123g ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_or_th3 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_ec3e23 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123b ksi eta) m) (l_ec3e21 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123b ksi eta) m) : l_not (l_e_st_eq_landau_n_rt_rp_lessis ksi eta)).
-
-(* constant 2077 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123h ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_or_th3 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_ec3e32 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123b ksi eta) l) (l_ec3e31 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123b ksi eta) l) : l_not (l_e_st_eq_landau_n_rt_rp_moreis ksi eta)).
-
-(* constant 2078 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123j ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λn:l_not (l_e_st_eq_landau_n_rt_rp_moreis ksi eta).(l_or3e3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123a ksi eta) (l_or_th5 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) n) (l_or_th4 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) n) : l_e_st_eq_landau_n_rt_rp_less ksi eta).
-
-(* constant 2079 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123k ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λn:l_not (l_e_st_eq_landau_n_rt_rp_lessis ksi eta).(l_or3e2 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123a ksi eta) (l_or_th4 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) n) (l_or_th5 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) n) : l_e_st_eq_landau_n_rt_rp_more ksi eta).
-
-(* constant 2080 *)
-definition l_e_st_eq_landau_n_rt_rp_2126_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less eta zeta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λly:l_e_st_eq_landau_n_rt_lrt zeta y0.(l_e_st_eq_landau_n_rt_cutapp2a eta x0 lx y0 uy : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 2081 *)
-definition l_e_st_eq_landau_n_rt_rp_2126_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less eta zeta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λly:l_e_st_eq_landau_n_rt_lrt zeta y0.(l_e_st_eq_landau_n_rt_rp_satz119a ksi x0 ux y0 (l_e_st_eq_landau_n_rt_rp_2126_t1 ksi eta zeta l k x0 ux lx y0 uy ly) : l_e_st_eq_landau_n_rt_urt ksi y0).
-
-(* constant 2082 *)
-definition l_e_st_eq_landau_n_rt_rp_2126_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less eta zeta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λly:l_e_st_eq_landau_n_rt_lrt zeta y0.(l_andi (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_lrt zeta y0) (l_e_st_eq_landau_n_rt_rp_2126_t2 ksi eta zeta l k x0 ux lx y0 uy ly) ly : l_and (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_lrt zeta y0)).
-
-(* constant 2083 *)
-definition l_e_st_eq_landau_n_rt_rp_2126_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less eta zeta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λly:l_e_st_eq_landau_n_rt_lrt zeta y0.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_urt ksi x) (l_e_st_eq_landau_n_rt_lrt zeta x)) y0 (l_e_st_eq_landau_n_rt_rp_2126_t3 ksi eta zeta l k x0 ux lx y0 uy ly) : l_e_st_eq_landau_n_rt_rp_less ksi zeta).
-
-(* constant 2084 *)
-definition l_e_st_eq_landau_n_rt_rp_2126_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less eta zeta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.(l_e_st_eq_landau_n_rt_rp_lessapp eta zeta k (l_e_st_eq_landau_n_rt_rp_less ksi zeta) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt eta x.λu:l_e_st_eq_landau_n_rt_lrt zeta x.l_e_st_eq_landau_n_rt_rp_2126_t4 ksi eta zeta l k x0 ux lx x t u) : l_e_st_eq_landau_n_rt_rp_less ksi zeta).
-
-(* constant 2085 *)
-definition l_e_st_eq_landau_n_rt_rp_satz126 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less eta zeta.(l_e_st_eq_landau_n_rt_rp_lessapp ksi eta l (l_e_st_eq_landau_n_rt_rp_less ksi zeta) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λu:l_e_st_eq_landau_n_rt_lrt eta x.l_e_st_eq_landau_n_rt_rp_2126_t5 ksi eta zeta l k x t u) : l_e_st_eq_landau_n_rt_rp_less ksi zeta).
-
-(* constant 2086 *)
-definition l_e_st_eq_landau_n_rt_rp_trless ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less eta zeta.(l_e_st_eq_landau_n_rt_rp_satz126 ksi eta zeta l k : l_e_st_eq_landau_n_rt_rp_less ksi zeta).
-
-(* constant 2087 *)
-definition l_e_st_eq_landau_n_rt_rp_trmore ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more eta zeta.(l_e_st_eq_landau_n_rt_rp_satz122 zeta ksi (l_e_st_eq_landau_n_rt_rp_satz126 zeta eta ksi (l_e_st_eq_landau_n_rt_rp_satz121 eta zeta n) (l_e_st_eq_landau_n_rt_rp_satz121 ksi eta m)) : l_e_st_eq_landau_n_rt_rp_more ksi zeta).
-
-(* constant 2088 *)
-definition l_e_st_eq_landau_n_rt_rp_satz127a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less eta zeta.(l_orapp (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi zeta) l (λu:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_trless ksi eta zeta u k) (λu:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_isless1 eta ksi zeta (l_e_symis l_e_st_eq_landau_n_rt_cut ksi eta u) k) : l_e_st_eq_landau_n_rt_rp_less ksi zeta).
-
-(* constant 2089 *)
-definition l_e_st_eq_landau_n_rt_rp_satz127b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis eta zeta.(l_orapp (l_e_st_eq_landau_n_rt_rp_less eta zeta) (l_e_st_eq_landau_n_rt_rp_is eta zeta) (l_e_st_eq_landau_n_rt_rp_less ksi zeta) k (λu:l_e_st_eq_landau_n_rt_rp_less eta zeta.l_e_st_eq_landau_n_rt_rp_trless ksi eta zeta l u) (λu:l_e_st_eq_landau_n_rt_rp_is eta zeta.l_e_st_eq_landau_n_rt_rp_isless2 eta zeta ksi u l) : l_e_st_eq_landau_n_rt_rp_less ksi zeta).
-
-(* constant 2090 *)
-definition l_e_st_eq_landau_n_rt_rp_satz127c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more eta zeta.(l_e_st_eq_landau_n_rt_rp_satz122 zeta ksi (l_e_st_eq_landau_n_rt_rp_satz127b zeta eta ksi (l_e_st_eq_landau_n_rt_rp_satz121 eta zeta n) (l_e_st_eq_landau_n_rt_rp_satz124 ksi eta m)) : l_e_st_eq_landau_n_rt_rp_more ksi zeta).
-
-(* constant 2091 *)
-definition l_e_st_eq_landau_n_rt_rp_satz127d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis eta zeta.(l_e_st_eq_landau_n_rt_rp_satz122 zeta ksi (l_e_st_eq_landau_n_rt_rp_satz127a zeta eta ksi (l_e_st_eq_landau_n_rt_rp_satz124 eta zeta n) (l_e_st_eq_landau_n_rt_rp_satz121 ksi eta m)) : l_e_st_eq_landau_n_rt_rp_more ksi zeta).
-
-(* constant 2092 *)
-definition l_e_st_eq_landau_n_rt_rp_2128_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis eta zeta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is eta zeta.(l_e_st_eq_landau_n_rt_rp_lessisi2 ksi zeta (l_e_tris l_e_st_eq_landau_n_rt_cut ksi eta zeta i j) : l_e_st_eq_landau_n_rt_rp_lessis ksi zeta).
-
-(* constant 2093 *)
-definition l_e_st_eq_landau_n_rt_rp_2128_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis eta zeta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_less eta zeta.(l_e_st_eq_landau_n_rt_rp_lessisi1 ksi zeta (l_e_st_eq_landau_n_rt_rp_satz127a ksi eta zeta l j) : l_e_st_eq_landau_n_rt_rp_lessis ksi zeta).
-
-(* constant 2094 *)
-definition l_e_st_eq_landau_n_rt_rp_2128_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis eta zeta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_orapp (l_e_st_eq_landau_n_rt_rp_less eta zeta) (l_e_st_eq_landau_n_rt_rp_is eta zeta) (l_e_st_eq_landau_n_rt_rp_lessis ksi zeta) k (λt:l_e_st_eq_landau_n_rt_rp_less eta zeta.l_e_st_eq_landau_n_rt_rp_2128_t2 ksi eta zeta l k i t) (λt:l_e_st_eq_landau_n_rt_rp_is eta zeta.l_e_st_eq_landau_n_rt_rp_2128_t1 ksi eta zeta l k i t) : l_e_st_eq_landau_n_rt_rp_lessis ksi zeta).
-
-(* constant 2095 *)
-definition l_e_st_eq_landau_n_rt_rp_2128_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis eta zeta.λj:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_lessisi1 ksi zeta (l_e_st_eq_landau_n_rt_rp_satz127b ksi eta zeta j k) : l_e_st_eq_landau_n_rt_rp_lessis ksi zeta).
-
-(* constant 2096 *)
-definition l_e_st_eq_landau_n_rt_rp_satz128 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis eta zeta.(l_orapp (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_lessis ksi zeta) l (λt:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_2128_t4 ksi eta zeta l k t) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_2128_t3 ksi eta zeta l k t) : l_e_st_eq_landau_n_rt_rp_lessis ksi zeta).
-
-(* constant 2097 *)
-definition l_e_st_eq_landau_n_rt_rp_trlessis ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis eta zeta.(l_e_st_eq_landau_n_rt_rp_satz128 ksi eta zeta l k : l_e_st_eq_landau_n_rt_rp_lessis ksi zeta).
-
-(* constant 2098 *)
-definition l_e_st_eq_landau_n_rt_rp_trmoreis ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis eta zeta.(l_e_st_eq_landau_n_rt_rp_satz125 zeta ksi (l_e_st_eq_landau_n_rt_rp_satz128 zeta eta ksi (l_e_st_eq_landau_n_rt_rp_satz124 eta zeta n) (l_e_st_eq_landau_n_rt_rp_satz124 ksi eta m)) : l_e_st_eq_landau_n_rt_rp_moreis ksi zeta).
-
-(* constant 2099 *)
-definition l_e_st_eq_landau_n_rt_rp_sumprop1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_and3 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0)) : Prop).
-
-(* constant 2100 *)
-definition l_e_st_eq_landau_n_rt_rp_sumprop ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x y)) : Prop).
-
-(* constant 2101 *)
-definition l_e_st_eq_landau_n_rt_rp_sum ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop ksi eta z) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2102 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_and3i (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0)) lx ly i : l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y0).
-
-(* constant 2103 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y) y0 (l_e_st_eq_landau_n_rt_rp_iii3_t1 ksi eta z0 x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y)).
-
-(* constant 2104 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x y)) x0 (l_e_st_eq_landau_n_rt_rp_iii3_t2 ksi eta z0 x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_rp_sumprop ksi eta z0).
-
-(* constant 2105 *)
-definition l_e_st_eq_landau_n_rt_rp_sum1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop ksi eta z) z0 (l_e_st_eq_landau_n_rt_rp_iii3_t3 ksi eta z0 x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2106 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop ksi eta z) z0 i : l_e_st_eq_landau_n_rt_rp_sumprop ksi eta z0).
-
-(* constant 2107 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y0.(l_and3e1 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0)) py : l_e_st_eq_landau_n_rt_lrt ksi x0).
-
-(* constant 2108 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y0.(l_and3e2 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0)) py : l_e_st_eq_landau_n_rt_lrt eta y0).
-
-(* constant 2109 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y0.(l_and3e3 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0)) py : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 2110 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y0.(p1 x0 (l_e_st_eq_landau_n_rt_rp_iii3_t5 ksi eta z0 i p p1 x0 px y0 py) y0 (l_e_st_eq_landau_n_rt_rp_iii3_t6 ksi eta z0 i p p1 x0 px y0 py) (l_e_st_eq_landau_n_rt_rp_iii3_t7 ksi eta z0 i p p1 x0 px y0 py) : p).
-
-(* constant 2111 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y).(l_someapp l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y) px p (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y.l_e_st_eq_landau_n_rt_rp_iii3_t8 ksi eta z0 i p p1 x0 px y t) : p).
-
-(* constant 2112 *)
-definition l_e_st_eq_landau_n_rt_rp_sumapp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x y)) (l_e_st_eq_landau_n_rt_rp_iii3_t4 ksi eta z0 i p p1) p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x y).l_e_st_eq_landau_n_rt_rp_iii3_t9 ksi eta z0 i p p1 x t) : p).
-
-(* constant 2113 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_cutapp2a ksi x0 lx x1 ux : l_e_st_eq_landau_n_rt_less x0 x1).
-
-(* constant 2114 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_cutapp2a eta y0 ly y1 uy : l_e_st_eq_landau_n_rt_less y0 y1).
-
-(* constant 2115 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_isless1 (l_e_st_eq_landau_n_rt_pl x0 y0) z0 (l_e_st_eq_landau_n_rt_pl x1 y1) (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_pl x0 y0) j) (l_e_st_eq_landau_n_rt_satz98a x0 x1 y0 y1 (l_e_st_eq_landau_n_rt_rp_3129_t1 ksi eta x1 ux y1 uy z0 i x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_rp_3129_t2 ksi eta x1 ux y1 uy z0 i x0 lx y0 ly j)) : l_e_st_eq_landau_n_rt_less z0 (l_e_st_eq_landau_n_rt_pl x1 y1)).
-
-(* constant 2116 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_ec3e31 (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x1 y1)) (l_e_st_eq_landau_n_rt_more z0 (l_e_st_eq_landau_n_rt_pl x1 y1)) (l_e_st_eq_landau_n_rt_less z0 (l_e_st_eq_landau_n_rt_pl x1 y1)) (l_e_st_eq_landau_n_rt_satz81b z0 (l_e_st_eq_landau_n_rt_pl x1 y1)) (l_e_st_eq_landau_n_rt_rp_3129_t3 ksi eta x1 ux y1 uy z0 i x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_nis z0 (l_e_st_eq_landau_n_rt_pl x1 y1)).
-
-(* constant 2117 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).(l_e_st_eq_landau_n_rt_rp_sumapp ksi eta z0 i (l_e_st_eq_landau_n_rt_nis z0 (l_e_st_eq_landau_n_rt_pl x1 y1)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3129_t4 ksi eta x1 ux y1 uy z0 i x t y u v) : l_e_st_eq_landau_n_rt_nis z0 (l_e_st_eq_landau_n_rt_pl x1 y1)).
-
-(* constant 2118 *)
-definition l_e_st_eq_landau_n_rt_rp_satz129a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.(l_imp_th3 (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x1 y1) (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_nis (l_e_st_eq_landau_n_rt_pl x1 y1) (l_e_st_eq_landau_n_rt_pl x1 y1)) (l_weli (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x1 y1) (l_e_st_eq_landau_n_rt_pl x1 y1)) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl x1 y1))) (λt:l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x1 y1) (l_e_st_eq_landau_n_rt_rp_sum ksi eta).l_e_st_eq_landau_n_rt_rp_3129_t5 ksi eta x1 ux y1 uy (l_e_st_eq_landau_n_rt_pl x1 y1) t) : l_not (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x1 y1) (l_e_st_eq_landau_n_rt_rp_sum ksi eta))).
-
-(* constant 2119 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_isless2 u0 (l_e_st_eq_landau_n_rt_pl x0 y0) z0 j l : l_e_st_eq_landau_n_rt_less z0 (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 2120 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_z1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_ov z0 (l_e_st_eq_landau_n_rt_pl x0 y0) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2121 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_isless12 z0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_satz110f z0 (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_example1d (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_rp_3129_t6 ksi eta u0 i z0 l x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_pl x0 y0))).
-
-(* constant 2122 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_satz106c (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_rp_3129_t7 ksi eta u0 i z0 l x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2123 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt) x0 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_example1a x0) (l_e_st_eq_landau_n_rt_satz105f (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j) l_e_st_eq_landau_n_rt_1rt x0 (l_e_st_eq_landau_n_rt_rp_3129_t8 ksi eta u0 i z0 l x0 lx y0 ly j)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) x0).
-
-(* constant 2124 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_ts y0 l_e_st_eq_landau_n_rt_1rt) y0 (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_example1a y0) (l_e_st_eq_landau_n_rt_satz105f (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j) l_e_st_eq_landau_n_rt_1rt y0 (l_e_st_eq_landau_n_rt_rp_3129_t8 ksi eta u0 i z0 l x0 lx y0 ly j)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) y0).
-
-(* constant 2125 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_rp_satz120 ksi x0 lx (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_rp_3129_t9 ksi eta u0 i z0 l x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j))).
-
-(* constant 2126 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_rp_satz120 eta y0 ly (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_rp_3129_t10 ksi eta u0 i z0 l x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_lrt eta (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j))).
-
-(* constant 2127 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j))) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) z0 (l_e_st_eq_landau_n_rt_distpt1 x0 y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_satz110c z0 (l_e_st_eq_landau_n_rt_pl x0 y0)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j))) z0).
-
-(* constant 2128 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j))) z0 (l_e_st_eq_landau_n_rt_rp_3129_t13 ksi eta u0 i z0 l x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)))).
-
-(* constant 2129 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_rp_sum1 ksi eta z0 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_rp_3129_t11 ksi eta u0 i z0 l x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_rp_3129_t12 ksi eta u0 i z0 l x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_rp_3129_t14 ksi eta u0 i z0 l x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2130 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.(l_e_st_eq_landau_n_rt_rp_sumapp ksi eta u0 i (l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3129_t15 ksi eta u0 i z0 l x t y u v) : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2131 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_rp_sum1 ksi eta (l_e_st_eq_landau_n_rt_pl x1 y0) x1 lx1 y0 ly (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl x1 y0)) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x1 y0) (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2132 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_satz96a x1 x0 y0 (l_e_st_eq_landau_n_rt_satz83 x0 x1 l) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x1 y0) (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 2133 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_ismore2 (l_e_st_eq_landau_n_rt_pl x0 y0) z0 (l_e_st_eq_landau_n_rt_pl x1 y0) (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_pl x0 y0) j) (l_e_st_eq_landau_n_rt_rp_3129_t18 ksi eta z0 i x0 lx y0 ly j x1 lx1 l) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x1 y0) z0).
-
-(* constant 2134 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_andi (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x1 y0) (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x1 y0) z0) (l_e_st_eq_landau_n_rt_rp_3129_t17 ksi eta z0 i x0 lx y0 ly j x1 lx1 l) (l_e_st_eq_landau_n_rt_rp_3129_t19 ksi eta z0 i x0 lx y0 ly j x1 lx1 l) : l_and (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x1 y0) (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x1 y0) z0)).
-
-(* constant 2135 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_more y z0)) (l_e_st_eq_landau_n_rt_pl x1 y0) (l_e_st_eq_landau_n_rt_rp_3129_t20 ksi eta z0 i x0 lx y0 ly j x1 lx1 l) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))).
-
-(* constant 2136 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_cutapp3 ksi x0 lx (l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_less x0 x.l_e_st_eq_landau_n_rt_rp_3129_t21 ksi eta z0 i x0 lx y0 ly j x t u) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))).
-
-(* constant 2137 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).(l_e_st_eq_landau_n_rt_rp_sumapp ksi eta z0 i (l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3129_t22 ksi eta z0 i x t y u v) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))).
-
-(* constant 2138 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t24 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.(l_e_st_eq_landau_n_rt_cut2 (l_e_st_eq_landau_n_rt_rp_sum ksi eta) (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_rp_sum1 ksi eta (l_e_st_eq_landau_n_rt_pl x0 y0) x0 lx y0 ly (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl x0 y0))) (l_e_st_eq_landau_n_rt_pl x1 y1) (l_e_st_eq_landau_n_rt_rp_satz129a ksi eta x1 ux y1 uy) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_rp_3129_t16 ksi eta x t y u) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_sum ksi eta).l_e_st_eq_landau_n_rt_rp_3129_t23 ksi eta x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2139 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t25 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.(l_e_st_eq_landau_n_rt_cutapp1b eta (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt eta y.l_e_st_eq_landau_n_rt_rp_3129_t24 ksi eta x0 lx y0 ly x1 ux y t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2140 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t26 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.(l_e_st_eq_landau_n_rt_cutapp1b ksi (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.l_e_st_eq_landau_n_rt_rp_3129_t25 ksi eta x0 lx y0 ly x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2141 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t27 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_e_st_eq_landau_n_rt_cutapp1a eta (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta y.l_e_st_eq_landau_n_rt_rp_3129_t26 ksi eta x0 lx y t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2142 *)
-definition l_e_st_eq_landau_n_rt_rp_satz129 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_cutapp1a ksi (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_rp_3129_t27 ksi eta x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2143 *)
-definition l_e_st_eq_landau_n_rt_rp_pl ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_cutof (l_e_st_eq_landau_n_rt_rp_sum ksi eta) (l_e_st_eq_landau_n_rt_rp_satz129 ksi eta) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2144 *)
-definition l_e_st_eq_landau_n_rt_rp_lrtpl ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_rp_ine (l_e_st_eq_landau_n_rt_rp_sum ksi eta) (l_e_st_eq_landau_n_rt_rp_satz129 ksi eta) z0 (l_e_st_eq_landau_n_rt_rp_sum1 ksi eta z0 x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0).
-
-(* constant 2145 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_isp1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_not (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_sum ksi eta))) (l_e_st_eq_landau_n_rt_pl x0 y0) z0 (l_e_st_eq_landau_n_rt_rp_satz129a ksi eta x0 ux y0 uy) i : l_not (l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta))).
-
-(* constant 2146 *)
-definition l_e_st_eq_landau_n_rt_rp_urtpl ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_imp_th3 (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0) (l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_rp_iii3_t10 ksi eta z0 x0 ux y0 uy i) (λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0.l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_rp_sum ksi eta) (l_e_st_eq_landau_n_rt_rp_satz129 ksi eta) z0 t) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0).
-
-(* constant 2147 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.(l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_rp_sum ksi eta) (l_e_st_eq_landau_n_rt_rp_satz129 ksi eta) z0 lz : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2148 *)
-definition l_e_st_eq_landau_n_rt_rp_plapp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.(l_e_st_eq_landau_n_rt_rp_sumapp ksi eta z0 (l_e_st_eq_landau_n_rt_rp_iii3_t11 ksi eta z0 lz p p1) p p1 : p).
-
-(* constant 2149 *)
-definition l_e_st_eq_landau_n_rt_rp_ispl1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_pl u zeta) ksi eta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2150 *)
-definition l_e_st_eq_landau_n_rt_rp_ispl2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_pl zeta u) ksi eta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl zeta eta)).
-
-(* constant 2151 *)
-definition l_e_st_eq_landau_n_rt_rp_ispl12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_ispl1 ksi eta zeta i) (l_e_st_eq_landau_n_rt_rp_ispl2 zeta upsilon eta j) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2152 *)
-definition l_e_st_eq_landau_n_rt_rp_3130_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_tris l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_pl y0 x0) i (l_e_st_eq_landau_n_rt_compl x0 y0) : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl y0 x0)).
-
-(* constant 2153 *)
-definition l_e_st_eq_landau_n_rt_rp_3130_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_rp_lrtpl eta ksi z0 y0 ly x0 lx (l_e_st_eq_landau_n_rt_rp_3130_t1 ksi eta z0 lz x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta ksi) z0).
-
-(* constant 2154 *)
-definition l_e_st_eq_landau_n_rt_rp_3130_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0.(l_e_st_eq_landau_n_rt_rp_plapp ksi eta z0 lz (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta ksi) z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3130_t2 ksi eta z0 lz x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta ksi) z0).
-
-(* constant 2155 *)
-definition l_e_st_eq_landau_n_rt_rp_satz130 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_pl ksi eta) (l_e_st_eq_landau_n_rt_rp_pl eta ksi) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) x.l_e_st_eq_landau_n_rt_rp_3130_t3 ksi eta x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta ksi) x.l_e_st_eq_landau_n_rt_rp_3130_t3 eta ksi x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi eta) (l_e_st_eq_landau_n_rt_rp_pl eta ksi)).
-
-(* constant 2156 *)
-definition l_e_st_eq_landau_n_rt_rp_compl ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz130 ksi eta : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi eta) (l_e_st_eq_landau_n_rt_rp_pl eta ksi)).
-
-(* constant 2157 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) v0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 z0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_pl v0 z0) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) i (l_e_st_eq_landau_n_rt_ispl1 v0 (l_e_st_eq_landau_n_rt_pl x0 y0) z0 j) (l_e_st_eq_landau_n_rt_asspl1 x0 y0 z0) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0))).
-
-(* constant 2158 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) v0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 z0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_rp_lrtpl eta zeta (l_e_st_eq_landau_n_rt_pl y0 z0) y0 ly z0 lz (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl y0 z0)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 2159 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) v0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 z0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_rp_lrtpl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta) u0 x0 lx (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_rp_3131_t2 ksi eta zeta u0 lu v0 lv z0 lz i x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_rp_3131_t1 ksi eta zeta u0 lu v0 lv z0 lz i x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0).
-
-(* constant 2160 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) v0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 z0).(l_e_st_eq_landau_n_rt_rp_plapp ksi eta v0 lv (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3131_t3 ksi eta zeta u0 lu v0 lv z0 lz i x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0).
-
-(* constant 2161 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0.(l_e_st_eq_landau_n_rt_rp_plapp (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta u0 lu (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt zeta y.λv:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3131_t4 ksi eta zeta u0 lu x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0).
-
-(* constant 2162 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_pl x0 v0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0) i (l_e_st_eq_landau_n_rt_ispl2 v0 (l_e_st_eq_landau_n_rt_pl y0 z0) x0 j) (l_e_st_eq_landau_n_rt_asspl2 x0 y0 z0) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0)).
-
-(* constant 2163 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_rp_lrtpl ksi eta (l_e_st_eq_landau_n_rt_pl x0 y0) x0 lx y0 ly (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl x0 y0)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 2164 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_rp_lrtpl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta u0 (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_rp_3131_t7 ksi eta zeta u0 lu x0 lx v0 lv i y0 ly z0 lz j) z0 lz (l_e_st_eq_landau_n_rt_rp_3131_t6 ksi eta zeta u0 lu x0 lx v0 lv i y0 ly z0 lz j) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0).
-
-(* constant 2165 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 v0).(l_e_st_eq_landau_n_rt_rp_plapp eta zeta v0 lv (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt zeta y.λv:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3131_t8 ksi eta zeta u0 lu x0 lx v0 lv i x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0).
-
-(* constant 2166 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.(l_e_st_eq_landau_n_rt_rp_plapp ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta) u0 lu (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) y.λv:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3131_t9 ksi eta zeta u0 lu x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0).
-
-(* constant 2167 *)
-definition l_e_st_eq_landau_n_rt_rp_satz131 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) x.l_e_st_eq_landau_n_rt_rp_3131_t5 ksi eta zeta x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) x.l_e_st_eq_landau_n_rt_rp_3131_t10 ksi eta zeta x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta))).
-
-(* constant 2168 *)
-definition l_e_st_eq_landau_n_rt_rp_asspl1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz131 ksi eta zeta : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta))).
-
-(* constant 2169 *)
-definition l_e_st_eq_landau_n_rt_rp_asspl2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_satz131 ksi eta zeta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta)).
-
-(* constant 2170 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_prop1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_and (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt ksi y0) : Prop).
-
-(* constant 2171 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λp:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0.(l_e_st_eq_landau_n_rt_cutapp2b ksi x0 (l_ande1 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt ksi y0) p) y0 (l_ande2 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt ksi y0) p) : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 2172 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_prop2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λp:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0.(l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t1 ksi a0 x0 y0 p)) a0 : Prop).
-
-(* constant 2173 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_prop3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_and (l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0) (∀t:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0.l_e_st_eq_landau_n_rt_rp_3132_prop2 ksi a0 x0 y0 t) : Prop).
-
-(* constant 2174 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_prop4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x y)) : Prop).
-
-(* constant 2175 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx y0 uy : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 2176 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy)).(l_e_st_eq_landau_n_rt_satz96d (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy)) x0 m : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0)) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy)))).
-
-(* constant 2177 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy)).(l_e_st_eq_landau_n_rt_ismore2 (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy))) y0 (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0)) (l_e_st_eq_landau_n_rt_satz101c y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy)) (l_e_st_eq_landau_n_rt_rp_3132_t3 ksi a0 x0 lx y0 uy n m) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0)) y0).
-
-(* constant 2178 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy)).(l_e_st_eq_landau_n_rt_rp_satz119 ksi y0 uy (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0)) (l_e_st_eq_landau_n_rt_rp_3132_t4 ksi a0 x0 lx y0 uy n m) : l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0))).
-
-(* constant 2179 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy)).(l_somei l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) n (l_e_st_eq_landau_n_rt_rp_3132_t5 ksi a0 x0 lx y0 uy n m) : l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0)))).
-
-(* constant 2180 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_someapp l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy))) (l_e_st_eq_landau_n_rt_satz115 a0 (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy))) (l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0)))) (λx:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy)).l_e_st_eq_landau_n_rt_rp_3132_t6 ksi a0 x0 lx y0 uy x t) : l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0)))).
-
-(* constant 2181 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.(l_ande1 (l_e_st_eq_landau_n_lb (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u) (l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0))) m : l_e_st_eq_landau_n_lb (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u).
-
-(* constant 2182 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.(l_ande2 (l_e_st_eq_landau_n_lb (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u) (l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0))) m : l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0))).
-
-(* constant 2183 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_u0 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λi:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_pl x0 a0 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2184 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λi:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt a0) (l_e_st_eq_landau_n_rt_ts a0 l_e_st_eq_landau_n_rt_1rt) a0 (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_rtofn u) l_e_st_eq_landau_n_rt_1rt a0 (l_e_st_eq_landau_n_rt_isnert u l_e_st_eq_landau_n_1 i)) (l_e_st_eq_landau_n_rt_comts l_e_st_eq_landau_n_rt_1rt a0) (l_e_st_eq_landau_n_rt_example1a a0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0) a0).
-
-(* constant 2185 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λi:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_e_isp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 x)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0) a0 (l_e_st_eq_landau_n_rt_rp_3132_t9 ksi a0 x0 lx y0 uy u m) (l_e_st_eq_landau_n_rt_rp_3132_t10 ksi a0 x0 lx y0 uy u m i) : l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i)).
-
-(* constant 2186 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λi:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_andi (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i)) lx (l_e_st_eq_landau_n_rt_rp_3132_t11 ksi a0 x0 lx y0 uy u m i) : l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i)).
-
-(* constant 2187 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λi:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.λp:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i).(l_e_symis l_e_st_eq_landau_n_rt_rat a0 (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i) x0 (l_e_st_eq_landau_n_rt_rp_3132_t1 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i) p)) (l_e_st_eq_landau_n_rt_satz101g (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i) x0 a0 (l_e_st_eq_landau_n_rt_rp_3132_t1 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i) p) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i))) : l_e_st_eq_landau_n_rt_rp_3132_prop2 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i) p).
-
-(* constant 2188 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λi:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_andi (l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i)) (∀t:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i).l_e_st_eq_landau_n_rt_rp_3132_prop2 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i) t) (l_e_st_eq_landau_n_rt_rp_3132_t12 ksi a0 x0 lx y0 uy u m i) (λt:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i).l_e_st_eq_landau_n_rt_rp_3132_t13 ksi a0 x0 lx y0 uy u m i t) : l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i)).
-
-(* constant 2189 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λi:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y) (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i) (l_e_st_eq_landau_n_rt_rp_3132_t14 ksi a0 x0 lx y0 uy u m i) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y)).
-
-(* constant 2190 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λi:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x y)) x0 (l_e_st_eq_landau_n_rt_rp_3132_t15 ksi a0 x0 lx y0 uy u m i) : l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0).
-
-(* constant 2191 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_rtofn u) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_fr u l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr u l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_satz111d u l_e_st_eq_landau_n_1 o) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rtofn u) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2192 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_um10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rtofn u) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_3132_t17 ksi a0 x0 lx y0 uy u m o) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2193 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_satz112g (l_e_st_eq_landau_n_rt_rtofn u) (l_e_st_eq_landau_n_rt_natrti u) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_natrti l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_3132_t17 ksi a0 x0 lx y0 uy u m o) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o)).
-
-(* constant 2194 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_um1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t18 ksi a0 x0 lx y0 uy u m o) : l_e_st_eq_landau_n_nat).
-
-(* constant 2195 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_v0 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) a0) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2196 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_w0 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2197 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) l_e_st_eq_landau_n_rt_1rt) (l_e_st_eq_landau_n_rt_rtofn u) (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_satz101e (l_e_st_eq_landau_n_rt_rtofn u) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_3132_t17 ksi a0 x0 lx y0 uy u m o)) (l_e_st_eq_landau_n_rt_satz94a (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) l_e_st_eq_landau_n_rt_1rt) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rtofn u)).
-
-(* constant 2198 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_lesse (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rtofn u) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr u l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t18 ksi a0 x0 lx y0 uy u m o)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr u l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_3132_t19 ksi a0 x0 lx y0 uy u m o) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr u l_e_st_eq_landau_n_1)).
-
-(* constant 2199 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_satz111c (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o) u (l_e_st_eq_landau_n_rt_rp_3132_t20 ksi a0 x0 lx y0 uy u m o) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o) u).
-
-(* constant 2200 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_imp_th3 (l_e_st_eq_landau_n_lessis u (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o)) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o) u) (l_e_st_eq_landau_n_satz10h (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o) u (l_e_st_eq_landau_n_rt_rp_3132_t21 ksi a0 x0 lx y0 uy u m o)) (λt:l_e_st_eq_landau_n_lessis u (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o).l_e_st_eq_landau_n_satz14 u (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o) t) : l_not (l_e_st_eq_landau_n_lessis u (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o))).
-
-(* constant 2201 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_et (l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o)) a0))) (l_imp_th3 (l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o)) a0))) (l_e_st_eq_landau_n_lessis u (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o)) (l_e_st_eq_landau_n_rt_rp_3132_t22 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t8 ksi a0 x0 lx y0 uy u m (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o))) : l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o)) a0))).
-
-(* constant 2202 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t24 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_isp1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts x a0))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o)) (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t23 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_isrtn1 (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t18 ksi a0 x0 lx y0 uy u m o)) : l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o)).
-
-(* constant 2203 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t25 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_andi (l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o)) (l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o)) (l_e_st_eq_landau_n_rt_rp_3132_t24 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t9 ksi a0 x0 lx y0 uy u m) : l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o)).
-
-(* constant 2204 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t26 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) a0) a0) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) a0) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt a0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) l_e_st_eq_landau_n_rt_1rt) a0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0) (l_e_st_eq_landau_n_rt_ispl2 a0 (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt a0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) a0) (l_e_st_eq_landau_n_rt_example1d a0)) (l_e_st_eq_landau_n_rt_distpt1 (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) l_e_st_eq_landau_n_rt_1rt a0) (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) l_e_st_eq_landau_n_rt_1rt) (l_e_st_eq_landau_n_rt_rtofn u) a0 (l_e_st_eq_landau_n_rt_satz101e (l_e_st_eq_landau_n_rt_rtofn u) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_3132_t17 ksi a0 x0 lx y0 uy u m o))) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) a0) a0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0)).
-
-(* constant 2205 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t27 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) a0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) a0) a0)) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_asspl1 x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) a0) a0) (l_e_st_eq_landau_n_rt_ispl2 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) a0) a0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0) x0 (l_e_st_eq_landau_n_rt_rp_3132_t26 ksi a0 x0 lx y0 uy u m o)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) a0) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o)).
-
-(* constant 2206 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t28 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.λp:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o).(l_e_symis l_e_st_eq_landau_n_rt_rat a0 (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t1 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o) p)) (l_e_st_eq_landau_n_rt_satz101g (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) a0 (l_e_st_eq_landau_n_rt_rp_3132_t1 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o) p) (l_e_st_eq_landau_n_rt_rp_3132_t27 ksi a0 x0 lx y0 uy u m o)) : l_e_st_eq_landau_n_rt_rp_3132_prop2 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o) p).
-
-(* constant 2207 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t29 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_andi (l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o)) (∀t:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o).l_e_st_eq_landau_n_rt_rp_3132_prop2 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o) t) (l_e_st_eq_landau_n_rt_rp_3132_t25 ksi a0 x0 lx y0 uy u m o) (λt:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o).l_e_st_eq_landau_n_rt_rp_3132_t28 ksi a0 x0 lx y0 uy u m o t) : l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o)).
-
-(* constant 2208 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t30 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) y) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t29 ksi a0 x0 lx y0 uy u m o) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) y)).
-
-(* constant 2209 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t31 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x y)) (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t30 ksi a0 x0 lx y0 uy u m o) : l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0).
-
-(* constant 2210 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t32 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.(l_orapp (l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0) (l_e_st_eq_landau_n_satz24 u) (λt:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_3132_t31 ksi a0 x0 lx y0 uy u m t) (λt:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_3132_t16 ksi a0 x0 lx y0 uy u m t) : l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0).
-
-(* constant 2211 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t34 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_someapp l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn y) a0))) x) (l_e_st_eq_landau_n_satz27 (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn y) a0))) (l_e_st_eq_landau_n_rt_rp_3132_t7 ksi a0 x0 lx y0 uy)) (l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0) (λx:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_min (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn y) a0))) x.l_e_st_eq_landau_n_rt_rp_3132_t32 ksi a0 x0 lx y0 uy x t) : l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0).
-
-(* constant 2212 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t35 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_e_st_eq_landau_n_rt_cutapp1b ksi (l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi y.l_e_st_eq_landau_n_rt_rp_3132_t34 ksi a0 x0 lx y t) : l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0).
-
-(* constant 2213 *)
-definition l_e_st_eq_landau_n_rt_rp_satz132 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_cutapp1a ksi (l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_rp_3132_t35 ksi a0 x t) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_and (l_e_st_eq_landau_n_rt_lrt ksi x) (l_e_st_eq_landau_n_rt_urt ksi y)) (∀t:l_and (l_e_st_eq_landau_n_rt_lrt ksi x) (l_e_st_eq_landau_n_rt_urt ksi y).l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x (l_ande1 (l_e_st_eq_landau_n_rt_lrt ksi x) (l_e_st_eq_landau_n_rt_urt ksi y) t) y (l_ande2 (l_e_st_eq_landau_n_rt_lrt ksi x) (l_e_st_eq_landau_n_rt_urt ksi y) t))) a0)))).
-
-(* constant 2214 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t36 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λp3:l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y0.(l_ande1 (l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0) (∀t:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0.l_e_st_eq_landau_n_rt_rp_3132_prop2 ksi a0 x0 y0 t) p3 : l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0).
-
-(* constant 2215 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t37 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λp3:l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y0.(l_r_ande2 (l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0) (λt:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0.l_e_st_eq_landau_n_rt_rp_3132_prop2 ksi a0 x0 y0 t) p3 : l_e_st_eq_landau_n_rt_rp_3132_prop2 ksi a0 x0 y0 (l_e_st_eq_landau_n_rt_rp_3132_t36 ksi p a0 p1 x0 s y0 p3)).
-
-(* constant 2216 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t38 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λp3:l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y0.(l_ande1 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_rp_3132_t36 ksi p a0 p1 x0 s y0 p3) : l_e_st_eq_landau_n_rt_lrt ksi x0).
-
-(* constant 2217 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t39 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λp3:l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y0.(l_ande2 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_rp_3132_t36 ksi p a0 p1 x0 s y0 p3) : l_e_st_eq_landau_n_rt_urt ksi y0).
-
-(* constant 2218 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t40 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λp3:l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y0.(l_e_st_eq_landau_n_rt_satz101g y0 x0 (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 (l_e_st_eq_landau_n_rt_rp_3132_t38 ksi p a0 p1 x0 s y0 p3) y0 (l_e_st_eq_landau_n_rt_rp_3132_t39 ksi p a0 p1 x0 s y0 p3))) (l_e_st_eq_landau_n_rt_rp_3132_t1 ksi a0 x0 y0 (l_e_st_eq_landau_n_rt_rp_3132_t36 ksi p a0 p1 x0 s y0 p3)) (l_e_st_eq_landau_n_rt_satz101c y0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 (l_e_st_eq_landau_n_rt_rp_3132_t38 ksi p a0 p1 x0 s y0 p3) y0 (l_e_st_eq_landau_n_rt_rp_3132_t39 ksi p a0 p1 x0 s y0 p3))) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 (l_e_st_eq_landau_n_rt_rp_3132_t38 ksi p a0 p1 x0 s y0 p3) y0 (l_e_st_eq_landau_n_rt_rp_3132_t39 ksi p a0 p1 x0 s y0 p3))) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t1 ksi a0 x0 y0 (l_e_st_eq_landau_n_rt_rp_3132_t36 ksi p a0 p1 x0 s y0 p3)))).
-
-(* constant 2219 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t41 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λp3:l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y0.(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 (l_e_st_eq_landau_n_rt_rp_3132_t38 ksi p a0 p1 x0 s y0 p3) y0 (l_e_st_eq_landau_n_rt_rp_3132_t39 ksi p a0 p1 x0 s y0 p3))) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t1 ksi a0 x0 y0 (l_e_st_eq_landau_n_rt_rp_3132_t36 ksi p a0 p1 x0 s y0 p3))) a0 (l_e_st_eq_landau_n_rt_rp_3132_t40 ksi p a0 p1 x0 s y0 p3) (l_e_st_eq_landau_n_rt_rp_3132_t37 ksi p a0 p1 x0 s y0 p3) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 (l_e_st_eq_landau_n_rt_rp_3132_t38 ksi p a0 p1 x0 s y0 p3) y0 (l_e_st_eq_landau_n_rt_rp_3132_t39 ksi p a0 p1 x0 s y0 p3))) a0).
-
-(* constant 2220 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t42 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λp3:l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y0.(p1 x0 (l_e_st_eq_landau_n_rt_rp_3132_t38 ksi p a0 p1 x0 s y0 p3) y0 (l_e_st_eq_landau_n_rt_rp_3132_t39 ksi p a0 p1 x0 s y0 p3) (l_e_st_eq_landau_n_rt_rp_3132_t41 ksi p a0 p1 x0 s y0 p3) : p).
-
-(* constant 2221 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t43 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y).(l_someapp l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y) s p (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y.l_e_st_eq_landau_n_rt_rp_3132_t42 ksi p a0 p1 x0 s y t) : p).
-
-(* constant 2222 *)
-definition l_e_st_eq_landau_n_rt_rp_satz132app ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x y)) (l_e_st_eq_landau_n_rt_rp_satz132 ksi a0) p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x y).l_e_st_eq_landau_n_rt_rp_3132_t43 ksi p a0 p1 x t) : p).
-
-(* constant 2223 *)
-definition l_e_st_eq_landau_n_rt_rp_3133_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt ksi u0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn u0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx u0 uu)) y0.(l_e_tris l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_mn u0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx u0 uu))) (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_satz101d u0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx u0 uu)) (l_e_st_eq_landau_n_rt_ispl2 (l_e_st_eq_landau_n_rt_mn u0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx u0 uu)) y0 x0 i) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 2224 *)
-definition l_e_st_eq_landau_n_rt_rp_3133_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt ksi u0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn u0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx u0 uu)) y0.(l_e_st_eq_landau_n_rt_rp_lrtpl ksi eta u0 x0 lx y0 ly (l_e_st_eq_landau_n_rt_rp_3133_t1 ksi eta y0 ly x0 lx u0 uu i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) u0).
-
-(* constant 2225 *)
-definition l_e_st_eq_landau_n_rt_rp_3133_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt ksi u0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn u0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx u0 uu)) y0.(l_andi (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) u0) (l_e_st_eq_landau_n_rt_urt ksi u0) (l_e_st_eq_landau_n_rt_rp_3133_t2 ksi eta y0 ly x0 lx u0 uu i) uu : l_and (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) u0) (l_e_st_eq_landau_n_rt_urt ksi u0)).
-
-(* constant 2226 *)
-definition l_e_st_eq_landau_n_rt_rp_3133_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt ksi u0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn u0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx u0 uu)) y0.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) x) (l_e_st_eq_landau_n_rt_urt ksi x)) u0 (l_e_st_eq_landau_n_rt_rp_3133_t3 ksi eta y0 ly x0 lx u0 uu i) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi eta) ksi).
-
-(* constant 2227 *)
-definition l_e_st_eq_landau_n_rt_rp_3133_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.(l_e_st_eq_landau_n_rt_rp_satz132app ksi (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi eta) ksi) y0 (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt ksi y.λv:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) y0.l_e_st_eq_landau_n_rt_rp_3133_t4 ksi eta y0 ly x t y u v) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi eta) ksi).
-
-(* constant 2228 *)
-definition l_e_st_eq_landau_n_rt_rp_satz133 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_cutapp1a eta (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi eta) ksi) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta x.l_e_st_eq_landau_n_rt_rp_3133_t5 ksi eta x t) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi eta) ksi).
-
-(* constant 2229 *)
-definition l_e_st_eq_landau_n_rt_rp_satz133a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_pl ksi eta) ksi (l_e_st_eq_landau_n_rt_rp_satz133 ksi eta) : l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_pl ksi eta)).
-
-(* constant 2230 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_rp_satz119a eta y0 uy x0 l : l_e_st_eq_landau_n_rt_urt eta x0).
-
-(* constant 2231 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_satz83 y0 x0 l : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 2232 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt zeta u0.λz0:l_e_st_eq_landau_n_rt_rat.λuz:l_e_st_eq_landau_n_rt_urt zeta z0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)).(l_e_tris l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) u0) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)) u0) (l_e_st_eq_landau_n_rt_satz101f z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) (l_e_st_eq_landau_n_rt_ispl1 (l_e_st_eq_landau_n_rt_mn z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)) u0 i) : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)) u0)).
-
-(* constant 2233 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt zeta u0.λz0:l_e_st_eq_landau_n_rt_rat.λuz:l_e_st_eq_landau_n_rt_urt zeta z0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)).(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)) u0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l))) u0) (l_e_st_eq_landau_n_rt_pl x0 u0) (l_e_st_eq_landau_n_rt_ispl2 z0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)) u0) y0 (l_e_st_eq_landau_n_rt_rp_3134_t3 ksi eta zeta m y0 ly uy x0 lx l u0 lu z0 uz i)) (l_e_st_eq_landau_n_rt_asspl2 y0 (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)) u0) (l_e_st_eq_landau_n_rt_ispl1 (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l))) x0 u0 (l_e_st_eq_landau_n_rt_satz101c x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l))) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_pl x0 u0)).
-
-(* constant 2234 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt zeta u0.λz0:l_e_st_eq_landau_n_rt_rat.λuz:l_e_st_eq_landau_n_rt_urt zeta z0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)).(l_e_st_eq_landau_n_rt_rp_lrtpl ksi zeta (l_e_st_eq_landau_n_rt_pl y0 z0) x0 lx u0 lu (l_e_st_eq_landau_n_rt_rp_3134_t4 ksi eta zeta m y0 ly uy x0 lx l u0 lu z0 uz i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 2235 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt zeta u0.λz0:l_e_st_eq_landau_n_rt_rat.λuz:l_e_st_eq_landau_n_rt_urt zeta z0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)).(l_e_st_eq_landau_n_rt_rp_urtpl eta zeta (l_e_st_eq_landau_n_rt_pl y0 z0) y0 uy z0 uz (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl y0 z0)) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 2236 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt zeta u0.λz0:l_e_st_eq_landau_n_rt_rat.λuz:l_e_st_eq_landau_n_rt_urt zeta z0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)).(l_andi (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_rp_3134_t5 ksi eta zeta m y0 ly uy x0 lx l u0 lu z0 uz i) (l_e_st_eq_landau_n_rt_rp_3134_t6 ksi eta zeta m y0 ly uy x0 lx l u0 lu z0 uz i) : l_and (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_pl y0 z0))).
-
-(* constant 2237 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt zeta u0.λz0:l_e_st_eq_landau_n_rt_rat.λuz:l_e_st_eq_landau_n_rt_urt zeta z0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) x) (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) x)) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_rp_3134_t7 ksi eta zeta m y0 ly uy x0 lx l u0 lu z0 uz i) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2238 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_rp_satz132app zeta (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt zeta x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt zeta y.λv:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b zeta x t y u)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)).l_e_st_eq_landau_n_rt_rp_3134_t8 ksi eta zeta m y0 ly uy x0 lx l x t y u v) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2239 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.(l_e_st_eq_landau_n_rt_cutapp3 ksi y0 ly (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_less y0 x.l_e_st_eq_landau_n_rt_rp_3134_t9 ksi eta zeta m y0 ly uy x t u) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2240 *)
-definition l_e_st_eq_landau_n_rt_rp_satz134 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_moreapp ksi eta m (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_urt eta x.l_e_st_eq_landau_n_rt_rp_3134_t10 ksi eta zeta m x t u) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2241 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_satz134 ksi eta zeta m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2242 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_st_eq_landau_n_rt_rp_ispl1 ksi eta zeta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2243 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz134 eta ksi zeta (l_e_st_eq_landau_n_rt_rp_satz122 ksi eta l)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2244 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta eta) (l_e_st_eq_landau_n_rt_rp_compl ksi zeta) (l_e_st_eq_landau_n_rt_rp_compl eta zeta) (l_e_st_eq_landau_n_rt_rp_satz135a ksi eta zeta m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl zeta eta)).
-
-(* constant 2245 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135e ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_st_eq_landau_n_rt_rp_ispl2 ksi eta zeta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl zeta eta)).
-
-(* constant 2246 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135f ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta eta) (l_e_st_eq_landau_n_rt_rp_compl ksi zeta) (l_e_st_eq_landau_n_rt_rp_compl eta zeta) (l_e_st_eq_landau_n_rt_rp_satz135c ksi eta zeta l) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl zeta eta)).
-
-(* constant 2247 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135g ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λm:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_ismore2 (l_e_st_eq_landau_n_rt_rp_pl ksi upsilon) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_ispl1 ksi eta upsilon i) (l_e_st_eq_landau_n_rt_rp_satz135d zeta upsilon ksi m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2248 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135h ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λm:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_pl upsilon eta) (l_e_st_eq_landau_n_rt_rp_compl ksi zeta) (l_e_st_eq_landau_n_rt_rp_compl eta upsilon) (l_e_st_eq_landau_n_rt_rp_satz135g ksi eta zeta upsilon i m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl upsilon eta)).
-
-(* constant 2249 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135j ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less zeta upsilon.(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_pl ksi upsilon) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_ispl1 ksi eta upsilon i) (l_e_st_eq_landau_n_rt_rp_satz135f zeta upsilon ksi l) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2250 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135k ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less zeta upsilon.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_pl upsilon eta) (l_e_st_eq_landau_n_rt_rp_compl ksi zeta) (l_e_st_eq_landau_n_rt_rp_compl eta upsilon) (l_e_st_eq_landau_n_rt_rp_satz135j ksi eta zeta upsilon i l) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl upsilon eta)).
-
-(* constant 2251 *)
-definition l_e_st_eq_landau_n_rt_rp_3136_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz123a ksi eta : l_or3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2252 *)
-definition l_e_st_eq_landau_n_rt_rp_3136_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) : l_ec3 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta))).
-
-(* constant 2253 *)
-definition l_e_st_eq_landau_n_rt_rp_satz136a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta).(l_ec3_th11 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_3136_t1 ksi eta zeta) (l_e_st_eq_landau_n_rt_rp_3136_t2 ksi eta zeta) (λu:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_satz135b ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz135a ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_satz135c ksi eta zeta u) m : l_e_st_eq_landau_n_rt_rp_more ksi eta).
-
-(* constant 2254 *)
-definition l_e_st_eq_landau_n_rt_rp_satz136b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta).(l_ec3_th10 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_3136_t1 ksi eta zeta) (l_e_st_eq_landau_n_rt_rp_3136_t2 ksi eta zeta) (λu:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_satz135b ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz135a ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_satz135c ksi eta zeta u) i : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 2255 *)
-definition l_e_st_eq_landau_n_rt_rp_satz136c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta).(l_ec3_th12 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_3136_t1 ksi eta zeta) (l_e_st_eq_landau_n_rt_rp_3136_t2 ksi eta zeta) (λu:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_satz135b ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz135a ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_satz135c ksi eta zeta u) l : l_e_st_eq_landau_n_rt_rp_less ksi eta).
-
-(* constant 2256 *)
-definition l_e_st_eq_landau_n_rt_rp_satz136d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl zeta eta).(l_e_st_eq_landau_n_rt_rp_satz136a ksi eta zeta (l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta eta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_compl zeta ksi) (l_e_st_eq_landau_n_rt_rp_compl zeta eta) m) : l_e_st_eq_landau_n_rt_rp_more ksi eta).
-
-(* constant 2257 *)
-definition l_e_st_eq_landau_n_rt_rp_satz136e ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl zeta eta).(l_e_st_eq_landau_n_rt_rp_satz136b ksi eta zeta (l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl zeta eta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_compl ksi zeta) i (l_e_st_eq_landau_n_rt_rp_compl zeta eta)) : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 2258 *)
-definition l_e_st_eq_landau_n_rt_rp_satz136f ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl zeta eta).(l_e_st_eq_landau_n_rt_rp_satz136c ksi eta zeta (l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta eta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_compl zeta ksi) (l_e_st_eq_landau_n_rt_rp_compl zeta eta) l) : l_e_st_eq_landau_n_rt_rp_less ksi eta).
-
-(* constant 2259 *)
-definition l_e_st_eq_landau_n_rt_rp_3137_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz134 ksi eta zeta m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2260 *)
-definition l_e_st_eq_landau_n_rt_rp_3137_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl zeta eta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_pl upsilon eta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_compl zeta eta) (l_e_st_eq_landau_n_rt_rp_compl upsilon eta) (l_e_st_eq_landau_n_rt_rp_satz134 zeta upsilon eta n) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2261 *)
-definition l_e_st_eq_landau_n_rt_rp_satz137 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_trmore (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_3137_t1 ksi eta zeta upsilon m n) (l_e_st_eq_landau_n_rt_rp_3137_t2 ksi eta zeta upsilon m n) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2262 *)
-definition l_e_st_eq_landau_n_rt_rp_satz137a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz137 eta ksi upsilon zeta (l_e_st_eq_landau_n_rt_rp_satz122 ksi eta l) (l_e_st_eq_landau_n_rt_rp_satz122 zeta upsilon k)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2263 *)
-definition l_e_st_eq_landau_n_rt_rp_satz138a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_orapp (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)) m (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz137 ksi eta zeta upsilon t n) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_satz135g ksi eta zeta upsilon t n) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2264 *)
-definition l_e_st_eq_landau_n_rt_rp_satz138b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.(l_orapp (l_e_st_eq_landau_n_rt_rp_more zeta upsilon) (l_e_st_eq_landau_n_rt_rp_is zeta upsilon) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)) n (λt:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.l_e_st_eq_landau_n_rt_rp_satz137 ksi eta zeta upsilon m t) (λt:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.l_e_st_eq_landau_n_rt_rp_satz135h zeta upsilon ksi eta t m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2265 *)
-definition l_e_st_eq_landau_n_rt_rp_satz138c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz138a eta ksi upsilon zeta (l_e_st_eq_landau_n_rt_rp_satz125 ksi eta l) (l_e_st_eq_landau_n_rt_rp_satz122 zeta upsilon k)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2266 *)
-definition l_e_st_eq_landau_n_rt_rp_satz138d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz138b eta ksi upsilon zeta (l_e_st_eq_landau_n_rt_rp_satz122 ksi eta l) (l_e_st_eq_landau_n_rt_rp_satz125 zeta upsilon k)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2267 *)
-definition l_e_st_eq_landau_n_rt_rp_3139_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.(l_e_st_eq_landau_n_rt_rp_moreisi2 (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_ispl12 ksi eta zeta upsilon i j) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2268 *)
-definition l_e_st_eq_landau_n_rt_rp_3139_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λo:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_moreisi1 (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_satz138a ksi eta zeta upsilon m o) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2269 *)
-definition l_e_st_eq_landau_n_rt_rp_3139_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_orapp (l_e_st_eq_landau_n_rt_rp_more zeta upsilon) (l_e_st_eq_landau_n_rt_rp_is zeta upsilon) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)) n (λt:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.l_e_st_eq_landau_n_rt_rp_3139_t2 ksi eta zeta upsilon m n i t) (λt:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.l_e_st_eq_landau_n_rt_rp_3139_t1 ksi eta zeta upsilon m n i t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2270 *)
-definition l_e_st_eq_landau_n_rt_rp_3139_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.λo:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_moreisi1 (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_satz138b ksi eta zeta upsilon o n) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2271 *)
-definition l_e_st_eq_landau_n_rt_rp_satz139 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.(l_orapp (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)) m (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_3139_t4 ksi eta zeta upsilon m n t) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_3139_t3 ksi eta zeta upsilon m n t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2272 *)
-definition l_e_st_eq_landau_n_rt_rp_satz139a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz124 (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz139 eta ksi upsilon zeta (l_e_st_eq_landau_n_rt_rp_satz125 ksi eta l) (l_e_st_eq_landau_n_rt_rp_satz125 zeta upsilon k)) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2273 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λphi:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta phi) ksi.(l_e_st_eq_landau_n_rt_rp_ismore1 (l_e_st_eq_landau_n_rt_rp_pl eta phi) ksi eta i (l_e_st_eq_landau_n_rt_rp_satz133 eta phi) : l_e_st_eq_landau_n_rt_rp_more ksi eta).
-
-(* constant 2274 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λphi:l_e_st_eq_landau_n_rt_cut.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta phi) ksi) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123d ksi eta l) (λt:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta phi) ksi.l_e_st_eq_landau_n_rt_rp_3140_t1 ksi eta l phi t) : l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_pl eta phi) ksi).
-
-(* constant 2275 *)
-definition l_e_st_eq_landau_n_rt_rp_vorbemerkung140 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.(l_some_th5 l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta a) ksi) (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_3140_t2 ksi eta l a) : l_not (l_e_st_eq_landau_n_rt_rp_some (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta a) ksi))).
-
-(* constant 2276 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more phi psi.(l_e_st_eq_landau_n_rt_rp_satz135d phi psi eta m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)).
-
-(* constant 2277 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more phi psi.(l_ec3e21 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_3140_t3 ksi eta phi psi m) : l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)).
-
-(* constant 2278 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less phi psi.(l_e_st_eq_landau_n_rt_rp_satz135f phi psi eta l : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)).
-
-(* constant 2279 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less phi psi.(l_ec3e31 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_3140_t5 ksi eta phi psi l) : l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)).
-
-(* constant 2280 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_nis phi psi.(l_or3_th1 (l_e_st_eq_landau_n_rt_rp_is phi psi) (l_e_st_eq_landau_n_rt_rp_more phi psi) (l_e_st_eq_landau_n_rt_rp_less phi psi) (l_e_st_eq_landau_n_rt_rp_satz123a phi psi) n : l_or (l_e_st_eq_landau_n_rt_rp_more phi psi) (l_e_st_eq_landau_n_rt_rp_less phi psi)).
-
-(* constant 2281 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_nis phi psi.(l_orapp (l_e_st_eq_landau_n_rt_rp_more phi psi) (l_e_st_eq_landau_n_rt_rp_less phi psi) (l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_3140_t7 ksi eta phi psi n) (λt:l_e_st_eq_landau_n_rt_rp_more phi psi.l_e_st_eq_landau_n_rt_rp_3140_t4 ksi eta phi psi t) (λt:l_e_st_eq_landau_n_rt_rp_less phi psi.l_e_st_eq_landau_n_rt_rp_3140_t6 ksi eta phi psi t) : l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)).
-
-(* constant 2282 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta phi) ksi.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta psi) ksi.(l_imp_th7 (l_e_st_eq_landau_n_rt_rp_is phi psi) (l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_weli (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi) ksi i j)) (λt:l_e_st_eq_landau_n_rt_rp_nis phi psi.l_e_st_eq_landau_n_rt_rp_3140_t8 ksi eta phi psi t) : l_e_st_eq_landau_n_rt_rp_is phi psi).
-
-(* constant 2283 *)
-definition l_e_st_eq_landau_n_rt_rp_diffprop1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_and (l_e_st_eq_landau_n_rt_more x0 y0) (∀t:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 t)) : Prop).
-
-(* constant 2284 *)
-definition l_e_st_eq_landau_n_rt_rp_diffprop2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_and3 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta y0) (l_e_st_eq_landau_n_rt_rp_diffprop1 ksi eta z0 x0 y0) : Prop).
-
-(* constant 2285 *)
-definition l_e_st_eq_landau_n_rt_rp_diffprop ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x y)) : Prop).
-
-(* constant 2286 *)
-definition l_e_st_eq_landau_n_rt_rp_diff ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop ksi eta z) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2287 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t11a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 m).λm1:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_tris l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_mn x0 y0 m) (l_e_st_eq_landau_n_rt_mn x0 y0 m1) i (l_e_st_eq_landau_n_rt_satz101g x0 y0 (l_e_st_eq_landau_n_rt_mn x0 y0 m) m1 (l_e_st_eq_landau_n_rt_satz101c x0 y0 m)) : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 m1)).
-
-(* constant 2288 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 m).(l_andi (l_e_st_eq_landau_n_rt_more x0 y0) (∀t:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 t)) m (λt:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_rp_iii3_t11a ksi eta z0 x0 lx y0 uy m i t) : l_e_st_eq_landau_n_rt_rp_diffprop1 ksi eta z0 x0 y0).
-
-(* constant 2289 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 m).(l_and3i (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta y0) (l_e_st_eq_landau_n_rt_rp_diffprop1 ksi eta z0 x0 y0) lx uy (l_e_st_eq_landau_n_rt_rp_iii3_t12 ksi eta z0 x0 lx y0 uy m i) : l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y0).
-
-(* constant 2290 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 m).(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y) y0 (l_e_st_eq_landau_n_rt_rp_iii3_t13 ksi eta z0 x0 lx y0 uy m i) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y)).
-
-(* constant 2291 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 m).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x y)) x0 (l_e_st_eq_landau_n_rt_rp_iii3_t14 ksi eta z0 x0 lx y0 uy m i) : l_e_st_eq_landau_n_rt_rp_diffprop ksi eta z0).
-
-(* constant 2292 *)
-definition l_e_st_eq_landau_n_rt_rp_diff1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 m).(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop ksi eta z) z0 (l_e_st_eq_landau_n_rt_rp_iii3_t15 ksi eta z0 x0 lx y0 uy m i) : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2293 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop ksi eta z) z0 i : l_e_st_eq_landau_n_rt_rp_diffprop ksi eta z0).
-
-(* constant 2294 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y0.(l_and3e1 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta y0) (l_e_st_eq_landau_n_rt_rp_diffprop1 ksi eta z0 x0 y0) py : l_e_st_eq_landau_n_rt_lrt ksi x0).
-
-(* constant 2295 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y0.(l_and3e2 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta y0) (l_e_st_eq_landau_n_rt_rp_diffprop1 ksi eta z0 x0 y0) py : l_e_st_eq_landau_n_rt_urt eta y0).
-
-(* constant 2296 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y0.(l_and3e3 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta y0) (l_e_st_eq_landau_n_rt_rp_diffprop1 ksi eta z0 x0 y0) py : l_e_st_eq_landau_n_rt_rp_diffprop1 ksi eta z0 x0 y0).
-
-(* constant 2297 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y0.(l_ande1 (l_e_st_eq_landau_n_rt_more x0 y0) (∀t:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 t)) (l_e_st_eq_landau_n_rt_rp_iii3_t19 ksi eta z0 i p p1 x0 px y0 py) : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 2298 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y0.(l_r_ande2 (l_e_st_eq_landau_n_rt_more x0 y0) (λt:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 t)) (l_e_st_eq_landau_n_rt_rp_iii3_t19 ksi eta z0 i p p1 x0 px y0 py) : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_iii3_t20 ksi eta z0 i p p1 x0 px y0 py))).
-
-(* constant 2299 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y0.(p1 x0 (l_e_st_eq_landau_n_rt_rp_iii3_t17 ksi eta z0 i p p1 x0 px y0 py) y0 (l_e_st_eq_landau_n_rt_rp_iii3_t18 ksi eta z0 i p p1 x0 px y0 py) (l_e_st_eq_landau_n_rt_rp_iii3_t20 ksi eta z0 i p p1 x0 px y0 py) (l_e_st_eq_landau_n_rt_rp_iii3_t21 ksi eta z0 i p p1 x0 px y0 py) : p).
-
-(* constant 2300 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y).(l_someapp l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y) px p (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y.l_e_st_eq_landau_n_rt_rp_iii3_t22 ksi eta z0 i p p1 x0 px y t) : p).
-
-(* constant 2301 *)
-definition l_e_st_eq_landau_n_rt_rp_diffapp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x y)) (l_e_st_eq_landau_n_rt_rp_iii3_t16 ksi eta z0 i p p1) p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x y).l_e_st_eq_landau_n_rt_rp_iii3_t23 ksi eta z0 i p p1 x t) : p).
-
-(* constant 2302 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta eta m y0 ly uy x0 lx l : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 2303 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_rp_diff1 ksi eta (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t9 ksi eta m y0 ly uy x0 lx l)) x0 lx y0 uy (l_e_st_eq_landau_n_rt_rp_3140_t9 ksi eta m y0 ly uy x0 lx l) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t9 ksi eta m y0 ly uy x0 lx l))) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t9 ksi eta m y0 ly uy x0 lx l)) (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2304 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_mn x0 y0 n) z0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 n) y0) x0 (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n) j) (l_e_st_eq_landau_n_rt_satz101e x0 y0 n) (l_e_st_eq_landau_n_rt_satz94a (l_e_st_eq_landau_n_rt_mn x0 y0 n) y0) : l_e_st_eq_landau_n_rt_less z0 x0).
-
-(* constant 2305 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_trless z0 x0 x1 (l_e_st_eq_landau_n_rt_rp_3140_t11 ksi eta m x1 ux z0 i x0 lx y0 uy n j) (l_e_st_eq_landau_n_rt_cutapp2a ksi x0 lx x1 ux) : l_e_st_eq_landau_n_rt_less z0 x1).
-
-(* constant 2306 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_ec3e31 (l_e_st_eq_landau_n_rt_is z0 x1) (l_e_st_eq_landau_n_rt_more z0 x1) (l_e_st_eq_landau_n_rt_less z0 x1) (l_e_st_eq_landau_n_rt_satz81b z0 x1) (l_e_st_eq_landau_n_rt_rp_3140_t12 ksi eta m x1 ux z0 i x0 lx y0 uy n j) : l_e_st_eq_landau_n_rt_nis z0 x1).
-
-(* constant 2307 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).(l_e_st_eq_landau_n_rt_rp_diffapp ksi eta z0 i (l_e_st_eq_landau_n_rt_nis z0 x1) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt eta y.λv:l_e_st_eq_landau_n_rt_more x y.λw:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).l_e_st_eq_landau_n_rt_rp_3140_t13 ksi eta m x1 ux z0 i x t y u v w) : l_e_st_eq_landau_n_rt_nis z0 x1).
-
-(* constant 2308 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.(l_imp_th3 (l_e_st_eq_landau_n_rt_in x1 (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_nis x1 x1) (l_weli (l_e_st_eq_landau_n_rt_is x1 x1) (l_e_refis l_e_st_eq_landau_n_rt_rat x1)) (λt:l_e_st_eq_landau_n_rt_in x1 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).l_e_st_eq_landau_n_rt_rp_3140_t14 ksi eta m x1 ux x1 t) : l_not (l_e_st_eq_landau_n_rt_in x1 (l_e_st_eq_landau_n_rt_rp_diff ksi eta))).
-
-(* constant 2309 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl z0 y0) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 n) y0) x0 (l_e_st_eq_landau_n_rt_ispl1 z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n) y0 j) (l_e_st_eq_landau_n_rt_satz101e x0 y0 n) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl z0 y0) x0).
-
-(* constant 2310 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_x2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_pl u0 y0 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2311 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_pl z0 y0) x0 (l_e_st_eq_landau_n_rt_rp_3140_x2 ksi eta m z0 i u0 l x0 lx y0 uy n j) (l_e_st_eq_landau_n_rt_rp_3140_t16 ksi eta m z0 i u0 l x0 lx y0 uy n j) (l_e_st_eq_landau_n_rt_satz96c u0 z0 y0 l) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_rp_3140_x2 ksi eta m z0 i u0 l x0 lx y0 uy n j) x0).
-
-(* constant 2312 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_rp_satz120 ksi x0 lx (l_e_st_eq_landau_n_rt_rp_3140_x2 ksi eta m z0 i u0 l x0 lx y0 uy n j) (l_e_st_eq_landau_n_rt_rp_3140_t17 ksi eta m z0 i u0 l x0 lx y0 uy n j) : l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_rp_3140_x2 ksi eta m z0 i u0 l x0 lx y0 uy n j)).
-
-(* constant 2313 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_ismore1 (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_rt_pl u0 y0) y0 (l_e_st_eq_landau_n_rt_compl y0 u0) (l_e_st_eq_landau_n_rt_satz94 y0 u0) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rp_3140_x2 ksi eta m z0 i u0 l x0 lx y0 uy n j) y0).
-
-(* constant 2314 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_satz101g (l_e_st_eq_landau_n_rt_rp_3140_x2 ksi eta m z0 i u0 l x0 lx y0 uy n j) y0 u0 (l_e_st_eq_landau_n_rt_rp_3140_t19 ksi eta m z0 i u0 l x0 lx y0 uy n j) (l_e_st_eq_landau_n_rt_compl y0 u0) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_3140_x2 ksi eta m z0 i u0 l x0 lx y0 uy n j) y0 (l_e_st_eq_landau_n_rt_rp_3140_t19 ksi eta m z0 i u0 l x0 lx y0 uy n j))).
-
-(* constant 2315 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_rp_diff1 ksi eta u0 (l_e_st_eq_landau_n_rt_rp_3140_x2 ksi eta m z0 i u0 l x0 lx y0 uy n j) (l_e_st_eq_landau_n_rt_rp_3140_t18 ksi eta m z0 i u0 l x0 lx y0 uy n j) y0 uy (l_e_st_eq_landau_n_rt_rp_3140_t19 ksi eta m z0 i u0 l x0 lx y0 uy n j) (l_e_st_eq_landau_n_rt_rp_3140_t20 ksi eta m z0 i u0 l x0 lx y0 uy n j) : l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2316 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.(l_e_st_eq_landau_n_rt_rp_diffapp ksi eta z0 i (l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt eta y.λv:l_e_st_eq_landau_n_rt_more x y.λw:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).l_e_st_eq_landau_n_rt_rp_3140_t21 ksi eta m z0 i u0 l x t y u v w) : l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2317 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).λx3:l_e_st_eq_landau_n_rt_rat.λlx3:l_e_st_eq_landau_n_rt_lrt ksi x3.λl:l_e_st_eq_landau_n_rt_less x0 x3.(l_e_st_eq_landau_n_rt_satz83 x0 x3 l : l_e_st_eq_landau_n_rt_more x3 x0).
-
-(* constant 2318 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t24 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).λx3:l_e_st_eq_landau_n_rt_rat.λlx3:l_e_st_eq_landau_n_rt_lrt ksi x3.λl:l_e_st_eq_landau_n_rt_less x0 x3.(l_e_st_eq_landau_n_rt_trmore x3 x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t23 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l) n : l_e_st_eq_landau_n_rt_more x3 y0).
-
-(* constant 2319 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t25 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).λx3:l_e_st_eq_landau_n_rt_rat.λlx3:l_e_st_eq_landau_n_rt_lrt ksi x3.λl:l_e_st_eq_landau_n_rt_less x0 x3.(l_e_st_eq_landau_n_rt_ismore12 x3 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) y0) x0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 n) y0) (l_e_st_eq_landau_n_rt_satz101f x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) (l_e_st_eq_landau_n_rt_satz101f x0 y0 n) (l_e_st_eq_landau_n_rt_rp_3140_t23 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) y0) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 n) y0)).
-
-(* constant 2320 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t26 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).λx3:l_e_st_eq_landau_n_rt_rat.λlx3:l_e_st_eq_landau_n_rt_lrt ksi x3.λl:l_e_st_eq_landau_n_rt_less x0 x3.(l_e_st_eq_landau_n_rt_satz97a (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) (l_e_st_eq_landau_n_rt_mn x0 y0 n) y0 (l_e_st_eq_landau_n_rt_rp_3140_t25 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) (l_e_st_eq_landau_n_rt_mn x0 y0 n)).
-
-(* constant 2321 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t27 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).λx3:l_e_st_eq_landau_n_rt_rat.λlx3:l_e_st_eq_landau_n_rt_lrt ksi x3.λl:l_e_st_eq_landau_n_rt_less x0 x3.(l_e_st_eq_landau_n_rt_ismore2 (l_e_st_eq_landau_n_rt_mn x0 y0 n) z0 (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n) j) (l_e_st_eq_landau_n_rt_rp_3140_t26 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) z0).
-
-(* constant 2322 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t28 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).λx3:l_e_st_eq_landau_n_rt_rat.λlx3:l_e_st_eq_landau_n_rt_lrt ksi x3.λl:l_e_st_eq_landau_n_rt_less x0 x3.(l_e_st_eq_landau_n_rt_rp_diff1 ksi eta (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) x3 lx3 y0 uy (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l))) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2323 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t29 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).λx3:l_e_st_eq_landau_n_rt_rat.λlx3:l_e_st_eq_landau_n_rt_lrt ksi x3.λl:l_e_st_eq_landau_n_rt_less x0 x3.(l_andi (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) z0) (l_e_st_eq_landau_n_rt_rp_3140_t28 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l) (l_e_st_eq_landau_n_rt_rp_3140_t27 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l) : l_and (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) z0)).
-
-(* constant 2324 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t30 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).λx3:l_e_st_eq_landau_n_rt_rat.λlx3:l_e_st_eq_landau_n_rt_lrt ksi x3.λl:l_e_st_eq_landau_n_rt_less x0 x3.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_more x z0)) (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) (l_e_st_eq_landau_n_rt_rp_3140_t29 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_more x z0))).
-
-(* constant 2325 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t31 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_cutapp3 ksi x0 lx (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_more x z0))) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi y.λu:l_e_st_eq_landau_n_rt_less x0 y.l_e_st_eq_landau_n_rt_rp_3140_t30 ksi eta m z0 i x0 lx y0 uy n j y t u) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_more x z0))).
-
-(* constant 2326 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t32 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).(l_e_st_eq_landau_n_rt_rp_diffapp ksi eta z0 i (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_more x z0))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt eta y.λv:l_e_st_eq_landau_n_rt_more x y.λw:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).l_e_st_eq_landau_n_rt_rp_3140_t31 ksi eta m z0 i x t y u v w) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_more x z0))).
-
-(* constant 2327 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t33 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.(l_e_st_eq_landau_n_rt_cut2 (l_e_st_eq_landau_n_rt_rp_diff ksi eta) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t9 ksi eta m y0 ly uy x0 lx l)) (l_e_st_eq_landau_n_rt_rp_3140_t10 ksi eta m y0 ly uy x0 lx l) x1 (l_e_st_eq_landau_n_rt_rp_3140_t15 ksi eta m x1 ux1) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_rp_3140_t22 ksi eta m x t y u) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_diff ksi eta).l_e_st_eq_landau_n_rt_rp_3140_t32 ksi eta m x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2328 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t34 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_cutapp1b ksi (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.l_e_st_eq_landau_n_rt_rp_3140_t33 ksi eta m y0 ly uy x0 lx l x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2329 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t35 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.(l_e_st_eq_landau_n_rt_cutapp3 ksi y0 ly (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_less y0 x.l_e_st_eq_landau_n_rt_rp_3140_t34 ksi eta m y0 ly uy x t u) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2330 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140h ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_moreapp ksi eta m (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt ksi x.λv:l_e_st_eq_landau_n_rt_urt eta x.l_e_st_eq_landau_n_rt_rp_3140_t35 ksi eta m x u v) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2331 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_chi ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_cutof (l_e_st_eq_landau_n_rt_rp_diff ksi eta) (l_e_st_eq_landau_n_rt_rp_satz140h ksi eta m) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2332 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t36 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) z0.λy1:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y1.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl y1 u0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λo:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_mn x0 y0 o).(l_e_st_eq_landau_n_rt_cutapp2b eta y1 ly y0 uy : l_e_st_eq_landau_n_rt_more y0 y1).
-
-(* constant 2333 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t37 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) z0.λy1:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y1.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl y1 u0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λo:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_mn x0 y0 o).(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t36 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j))) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) (l_e_st_eq_landau_n_rt_pl y1 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t36 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j)))) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y0) x0 (l_e_st_eq_landau_n_rt_asspl1 (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t36 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j))) (l_e_st_eq_landau_n_rt_ispl2 (l_e_st_eq_landau_n_rt_pl y1 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t36 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j))) y0 (l_e_st_eq_landau_n_rt_mn x0 y0 o) (l_e_st_eq_landau_n_rt_satz101c y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t36 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j))) (l_e_st_eq_landau_n_rt_satz101e x0 y0 o) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t36 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j))) x0).
-
-(* constant 2334 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t38 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) z0.λy1:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y1.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl y1 u0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λo:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_mn x0 y0 o).(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t36 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j))) x0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) (l_e_st_eq_landau_n_rt_rp_3140_t37 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j) (l_e_st_eq_landau_n_rt_satz94a (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t36 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j))) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) x0).
-
-(* constant 2335 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t39 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) z0.λy1:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y1.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl y1 u0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λo:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_mn x0 y0 o).(l_e_tr3is l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_pl y1 u0) (l_e_st_eq_landau_n_rt_pl u0 y1) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) i (l_e_st_eq_landau_n_rt_compl y1 u0) (l_e_st_eq_landau_n_rt_ispl1 u0 (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1 j) : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1)).
-
-(* constant 2336 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t40 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) z0.λy1:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y1.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl y1 u0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λo:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_mn x0 y0 o).(l_e_st_eq_landau_n_rt_isless1 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) z0 x0 (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) (l_e_st_eq_landau_n_rt_rp_3140_t39 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j)) (l_e_st_eq_landau_n_rt_rp_3140_t38 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j) : l_e_st_eq_landau_n_rt_less z0 x0).
-
-(* constant 2337 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t41 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) z0.λy1:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y1.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl y1 u0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λo:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_mn x0 y0 o).(l_e_st_eq_landau_n_rt_rp_satz120 ksi x0 lx z0 (l_e_st_eq_landau_n_rt_rp_3140_t40 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j) : l_e_st_eq_landau_n_rt_lrt ksi z0).
-
-(* constant 2338 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t42 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) z0.λy1:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y1.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl y1 u0).(l_e_st_eq_landau_n_rt_rp_diffapp ksi eta u0 (l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_rp_diff ksi eta) (l_e_st_eq_landau_n_rt_rp_satz140h ksi eta m) u0 lu) (l_e_st_eq_landau_n_rt_lrt ksi z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt eta y.λv:l_e_st_eq_landau_n_rt_more x y.λw:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_mn x y v).l_e_st_eq_landau_n_rt_rp_3140_t41 ksi eta m z0 lz y1 ly u0 lu i x t y u v w) : l_e_st_eq_landau_n_rt_lrt ksi z0).
-
-(* constant 2339 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) z0.(l_e_st_eq_landau_n_rt_rp_plapp eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) z0 lz (l_e_st_eq_landau_n_rt_lrt ksi z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3140_t42 ksi eta m z0 lz x t y u v) : l_e_st_eq_landau_n_rt_lrt ksi z0).
-
-(* constant 2340 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t43 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_satz83 y0 x0 l : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 2341 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t44 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.(l_e_st_eq_landau_n_rt_cutapp2b eta y1 ly1 y2 uy2 : l_e_st_eq_landau_n_rt_more y2 y1).
-
-(* constant 2342 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t45 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).(l_e_st_eq_landau_n_rt_cutapp2b eta y1 ly1 y0 uy : l_e_st_eq_landau_n_rt_more y0 y1).
-
-(* constant 2343 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t46 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).(l_e_tris l_e_st_eq_landau_n_rt_rat y2 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) y1) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) y1) (l_e_st_eq_landau_n_rt_satz101f y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_ispl1 (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) y1 i) : l_e_st_eq_landau_n_rt_is y2 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) y1)).
-
-(* constant 2344 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t47 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).(l_e_tr4is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl y2 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) y1) (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) (l_e_st_eq_landau_n_rt_pl y1 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)))) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) y0) x0 (l_e_st_eq_landau_n_rt_ispl1 y2 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) y1) (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) (l_e_st_eq_landau_n_rt_rp_3140_t46 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) (l_e_st_eq_landau_n_rt_asspl1 (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) y1 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) (l_e_st_eq_landau_n_rt_ispl2 (l_e_st_eq_landau_n_rt_pl y1 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) y0 (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) (l_e_st_eq_landau_n_rt_satz101c y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) (l_e_st_eq_landau_n_rt_satz101e x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y2 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) x0).
-
-(* constant 2345 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t48 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).(l_e_st_eq_landau_n_rt_ismore1 (l_e_st_eq_landau_n_rt_pl y2 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t47 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i) (l_e_st_eq_landau_n_rt_satz94 y2 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) : l_e_st_eq_landau_n_rt_more x0 y2).
-
-(* constant 2346 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t49 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).(l_e_st_eq_landau_n_rt_satz101g x0 y2 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i) (l_e_st_eq_landau_n_rt_rp_3140_t47 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))).
-
-(* constant 2347 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t50 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).(l_e_tris l_e_st_eq_landau_n_rt_rat y0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) y1) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) y1) (l_e_st_eq_landau_n_rt_satz101f y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) (l_e_st_eq_landau_n_rt_ispl1 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) y1 (l_e_st_eq_landau_n_rt_rp_3140_t49 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) : l_e_st_eq_landau_n_rt_is y0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) y1)).
-
-(* constant 2348 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t51 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).(l_e_st_eq_landau_n_rt_rp_ine (l_e_st_eq_landau_n_rt_rp_diff ksi eta) (l_e_st_eq_landau_n_rt_rp_satz140h ksi eta m) (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) (l_e_st_eq_landau_n_rt_rp_diff1 ksi eta (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) x0 lx y2 uy2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)))) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))).
-
-(* constant 2349 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t52 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).(l_e_st_eq_landau_n_rt_rp_lrtpl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) y0 y1 ly1 (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) (l_e_st_eq_landau_n_rt_rp_3140_t51 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i) (l_e_tris l_e_st_eq_landau_n_rt_rat y0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) y1) (l_e_st_eq_landau_n_rt_pl y1 (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) (l_e_st_eq_landau_n_rt_rp_3140_t50 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i) (l_e_st_eq_landau_n_rt_compl (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) y1)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0).
-
-(* constant 2350 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t53 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_rp_satz132app eta (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt eta y.λv:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b eta x t y u)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).l_e_st_eq_landau_n_rt_rp_3140_t52 ksi eta m y0 ly uy x0 lx l x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0).
-
-(* constant 2351 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t54 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.(l_e_st_eq_landau_n_rt_cutapp3 ksi y0 ly (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_less y0 x.l_e_st_eq_landau_n_rt_rp_3140_t53 ksi eta m y0 ly uy x t u) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0).
-
-(* constant 2352 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t55 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λly0:l_e_st_eq_landau_n_rt_lrt eta y0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt ksi y1.λuy1:l_e_st_eq_landau_n_rt_urt eta y1.(l_e_st_eq_landau_n_rt_rp_3140_t54 ksi eta m y1 ly1 uy1 : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y1).
-
-(* constant 2353 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t56 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λly0:l_e_st_eq_landau_n_rt_lrt eta y0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt ksi y1.λuy1:l_e_st_eq_landau_n_rt_urt eta y1.(l_e_st_eq_landau_n_rt_rp_satz120 (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y1 (l_e_st_eq_landau_n_rt_rp_3140_t55 ksi eta m y0 ly ly0 y1 ly1 uy1) y0 (l_e_st_eq_landau_n_rt_cutapp2a eta y0 ly0 y1 uy1) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0).
-
-(* constant 2354 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t57 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λly0:l_e_st_eq_landau_n_rt_lrt eta y0.(l_e_st_eq_landau_n_rt_rp_moreapp ksi eta m (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_urt eta x.l_e_st_eq_landau_n_rt_rp_3140_t56 ksi eta m y0 ly ly0 x t u) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0).
-
-(* constant 2355 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.(l_imp_th1 (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0) (λt:l_e_st_eq_landau_n_rt_lrt eta y0.l_e_st_eq_landau_n_rt_rp_3140_t57 ksi eta m y0 ly t) (λt:l_e_st_eq_landau_n_rt_urt eta y0.l_e_st_eq_landau_n_rt_rp_3140_t54 ksi eta m y0 ly t) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0).
-
-(* constant 2356 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t58 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) ksi (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) x.l_e_st_eq_landau_n_rt_rp_3140_a ksi eta m x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_rp_3140_b ksi eta m x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) ksi).
-
-(* constant 2357 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_somei l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta a) ksi) (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) (l_e_st_eq_landau_n_rt_rp_3140_t58 ksi eta m) : l_e_st_eq_landau_n_rt_rp_some (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta a) ksi)).
-
-(* constant 2358 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t59 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(λc:l_e_st_eq_landau_n_rt_cut.λd:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta c) ksi.λu:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta d) ksi.l_e_st_eq_landau_n_rt_rp_satz140b ksi eta c d t u : l_e_amone l_e_st_eq_landau_n_rt_cut (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta c) ksi)).
-
-(* constant 2359 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_onei l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta a) ksi) (l_e_st_eq_landau_n_rt_rp_3140_t59 ksi eta) (l_e_st_eq_landau_n_rt_rp_satz140a ksi eta m) : l_e_st_eq_landau_n_rt_rp_one (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta a) ksi)).
-
-(* constant 2360 *)
-definition l_e_st_eq_landau_n_rt_rp_mn ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_ind l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta a) ksi) (l_e_st_eq_landau_n_rt_rp_satz140 ksi eta m) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2361 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_oneax l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta a) ksi) (l_e_st_eq_landau_n_rt_rp_satz140 ksi eta m) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_mn ksi eta m)) ksi).
-
-(* constant 2362 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_mn ksi eta m)) ksi (l_e_st_eq_landau_n_rt_rp_satz140c ksi eta m) : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_mn ksi eta m))).
-
-(* constant 2363 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140e ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) eta) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_mn ksi eta m)) ksi (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) eta) (l_e_st_eq_landau_n_rt_rp_satz140c ksi eta m) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) eta) ksi).
-
-(* constant 2364 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140f ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) eta) ksi (l_e_st_eq_landau_n_rt_rp_satz140e ksi eta m) : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) eta)).
-
-(* constant 2365 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140g ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta phi) ksi.(l_e_st_eq_landau_n_rt_rp_satz140b ksi eta phi (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) i (l_e_st_eq_landau_n_rt_rp_satz140c ksi eta m) : l_e_st_eq_landau_n_rt_rp_is phi (l_e_st_eq_landau_n_rt_rp_mn ksi eta m)).
-
-(* constant 2366 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t60 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi zeta.λn:l_e_st_eq_landau_n_rt_rp_more eta upsilon.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl upsilon (l_e_st_eq_landau_n_rt_rp_mn ksi zeta m)) (l_e_st_eq_landau_n_rt_rp_pl zeta (l_e_st_eq_landau_n_rt_rp_mn ksi zeta m)) ksi eta (l_e_st_eq_landau_n_rt_rp_ispl1 upsilon zeta (l_e_st_eq_landau_n_rt_rp_mn ksi zeta m) (l_e_symis l_e_st_eq_landau_n_rt_cut zeta upsilon j)) (l_e_st_eq_landau_n_rt_rp_satz140c ksi zeta m) i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl upsilon (l_e_st_eq_landau_n_rt_rp_mn ksi zeta m)) eta).
-
-(* constant 2367 *)
-definition l_e_st_eq_landau_n_rt_rp_ismn12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi zeta.λn:l_e_st_eq_landau_n_rt_rp_more eta upsilon.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz140g eta upsilon (l_e_st_eq_landau_n_rt_rp_mn ksi zeta m) n (l_e_st_eq_landau_n_rt_rp_3140_t60 ksi eta zeta upsilon m n i j) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_mn ksi zeta m) (l_e_st_eq_landau_n_rt_rp_mn eta upsilon n)).
-
-(* constant 2368 *)
-definition l_e_st_eq_landau_n_rt_rp_ismn1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi zeta.λn:l_e_st_eq_landau_n_rt_rp_more eta zeta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_st_eq_landau_n_rt_rp_ismn12 ksi eta zeta zeta m n i (l_e_refis l_e_st_eq_landau_n_rt_cut zeta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_mn ksi zeta m) (l_e_st_eq_landau_n_rt_rp_mn eta zeta n)).
-
-(* constant 2369 *)
-definition l_e_st_eq_landau_n_rt_rp_ismn2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more zeta ksi.λn:l_e_st_eq_landau_n_rt_rp_more zeta eta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_st_eq_landau_n_rt_rp_ismn12 zeta zeta ksi eta m n (l_e_refis l_e_st_eq_landau_n_rt_cut zeta) i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_mn zeta ksi m) (l_e_st_eq_landau_n_rt_rp_mn zeta eta n)).
-
-(* constant 2370 *)
-definition l_e_st_eq_landau_n_rt_rp_prodprop1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_and3 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0)) : Prop).
-
-(* constant 2371 *)
-definition l_e_st_eq_landau_n_rt_rp_prodprop ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x y)) : Prop).
-
-(* constant 2372 *)
-definition l_e_st_eq_landau_n_rt_rp_prod ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop ksi eta z) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2373 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_and3i (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0)) lx ly i : l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y0).
-
-(* constant 2374 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y) y0 (l_e_st_eq_landau_n_rt_rp_iii4_t1 ksi eta z0 x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y)).
-
-(* constant 2375 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x y)) x0 (l_e_st_eq_landau_n_rt_rp_iii4_t2 ksi eta z0 x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_rp_prodprop ksi eta z0).
-
-(* constant 2376 *)
-definition l_e_st_eq_landau_n_rt_rp_prod1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop ksi eta z) z0 (l_e_st_eq_landau_n_rt_rp_iii4_t3 ksi eta z0 x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2377 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop ksi eta z) z0 i : l_e_st_eq_landau_n_rt_rp_prodprop ksi eta z0).
-
-(* constant 2378 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y0.(l_and3e1 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0)) py : l_e_st_eq_landau_n_rt_lrt ksi x0).
-
-(* constant 2379 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y0.(l_and3e2 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0)) py : l_e_st_eq_landau_n_rt_lrt eta y0).
-
-(* constant 2380 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y0.(l_and3e3 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0)) py : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2381 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y0.(p1 x0 (l_e_st_eq_landau_n_rt_rp_iii4_t5 ksi eta z0 i p p1 x0 px y0 py) y0 (l_e_st_eq_landau_n_rt_rp_iii4_t6 ksi eta z0 i p p1 x0 px y0 py) (l_e_st_eq_landau_n_rt_rp_iii4_t7 ksi eta z0 i p p1 x0 px y0 py) : p).
-
-(* constant 2382 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y).(l_someapp l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y) px p (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y.l_e_st_eq_landau_n_rt_rp_iii4_t8 ksi eta z0 i p p1 x0 px y t) : p).
-
-(* constant 2383 *)
-definition l_e_st_eq_landau_n_rt_rp_prodapp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x y)) (l_e_st_eq_landau_n_rt_rp_iii4_t4 ksi eta z0 i p p1) p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x y).l_e_st_eq_landau_n_rt_rp_iii4_t9 ksi eta z0 i p p1 x t) : p).
-
-(* constant 2384 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_cutapp2a ksi x0 lx x1 ux : l_e_st_eq_landau_n_rt_less x0 x1).
-
-(* constant 2385 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_cutapp2a eta y0 ly y1 uy : l_e_st_eq_landau_n_rt_less y0 y1).
-
-(* constant 2386 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_isless1 (l_e_st_eq_landau_n_rt_ts x0 y0) z0 (l_e_st_eq_landau_n_rt_ts x1 y1) (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_ts x0 y0) j) (l_e_st_eq_landau_n_rt_satz107a x0 x1 y0 y1 (l_e_st_eq_landau_n_rt_rp_4141_t1 ksi eta x1 ux y1 uy z0 i x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_rp_4141_t2 ksi eta x1 ux y1 uy z0 i x0 lx y0 ly j)) : l_e_st_eq_landau_n_rt_less z0 (l_e_st_eq_landau_n_rt_ts x1 y1)).
-
-(* constant 2387 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_ec3e31 (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x1 y1)) (l_e_st_eq_landau_n_rt_more z0 (l_e_st_eq_landau_n_rt_ts x1 y1)) (l_e_st_eq_landau_n_rt_less z0 (l_e_st_eq_landau_n_rt_ts x1 y1)) (l_e_st_eq_landau_n_rt_satz81b z0 (l_e_st_eq_landau_n_rt_ts x1 y1)) (l_e_st_eq_landau_n_rt_rp_4141_t3 ksi eta x1 ux y1 uy z0 i x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_nis z0 (l_e_st_eq_landau_n_rt_ts x1 y1)).
-
-(* constant 2388 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).(l_e_st_eq_landau_n_rt_rp_prodapp ksi eta z0 i (l_e_st_eq_landau_n_rt_nis z0 (l_e_st_eq_landau_n_rt_ts x1 y1)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4141_t4 ksi eta x1 ux y1 uy z0 i x t y u v) : l_e_st_eq_landau_n_rt_nis z0 (l_e_st_eq_landau_n_rt_ts x1 y1)).
-
-(* constant 2389 *)
-definition l_e_st_eq_landau_n_rt_rp_satz141a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.(l_imp_th3 (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ts x1 y1) (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_nis (l_e_st_eq_landau_n_rt_ts x1 y1) (l_e_st_eq_landau_n_rt_ts x1 y1)) (l_weli (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x1 y1) (l_e_st_eq_landau_n_rt_ts x1 y1)) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x1 y1))) (λt:l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ts x1 y1) (l_e_st_eq_landau_n_rt_rp_prod ksi eta).l_e_st_eq_landau_n_rt_rp_4141_t5 ksi eta x1 ux y1 uy (l_e_st_eq_landau_n_rt_ts x1 y1) t) : l_not (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ts x1 y1) (l_e_st_eq_landau_n_rt_rp_prod ksi eta))).
-
-(* constant 2390 *)
-definition l_e_st_eq_landau_n_rt_4141_v0 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt y0) x0 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2391 *)
-definition l_e_st_eq_landau_n_rt_4141_t6 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_4141_v0 x0 y0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt y0)) x0) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x0) x0 (l_e_st_eq_landau_n_rt_assts2 y0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt y0) x0) (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt y0)) l_e_st_eq_landau_n_rt_1rt x0 (l_e_st_eq_landau_n_rt_satz110c l_e_st_eq_landau_n_rt_1rt y0)) (l_e_st_eq_landau_n_rt_example1c x0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_4141_v0 x0 y0)) x0).
-
-(* constant 2392 *)
-definition l_e_st_eq_landau_n_rt_satz141b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz110g x0 y0 (l_e_st_eq_landau_n_rt_4141_v0 x0 y0) (l_e_st_eq_landau_n_rt_4141_t6 x0 y0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt y0) x0) (l_e_st_eq_landau_n_rt_ov x0 y0)).
-
-(* constant 2393 *)
-definition l_e_st_eq_landau_n_rt_satz141c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt y0) x0) (l_e_st_eq_landau_n_rt_ov x0 y0) (l_e_st_eq_landau_n_rt_satz141b x0 y0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ov x0 y0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt y0) x0)).
-
-(* constant 2394 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_isless2 u0 (l_e_st_eq_landau_n_rt_ts x0 y0) z0 j l : l_e_st_eq_landau_n_rt_less z0 (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2395 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ts x0 y0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0) y0) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt y0) y0 (l_e_st_eq_landau_n_rt_assts2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0 y0) (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0) l_e_st_eq_landau_n_rt_1rt y0 (l_e_st_eq_landau_n_rt_satz110e l_e_st_eq_landau_n_rt_1rt x0)) (l_e_st_eq_landau_n_rt_example1c y0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ts x0 y0)) y0).
-
-(* constant 2396 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) z0) (l_e_st_eq_landau_n_rt_ov z0 x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ts x0 y0)) y0 (l_e_st_eq_landau_n_rt_satz141b z0 x0) (l_e_st_eq_landau_n_rt_rp_4141_t8 ksi eta u0 i z0 l x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_satz105f z0 (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_rp_4141_t7 ksi eta u0 i z0 l x0 lx y0 ly j)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ov z0 x0) y0).
-
-(* constant 2397 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_satz120 eta y0 ly (l_e_st_eq_landau_n_rt_ov z0 x0) (l_e_st_eq_landau_n_rt_rp_4141_t9 ksi eta u0 i z0 l x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_lrt eta (l_e_st_eq_landau_n_rt_ov z0 x0)).
-
-(* constant 2398 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_prod1 ksi eta z0 x0 lx (l_e_st_eq_landau_n_rt_ov z0 x0) (l_e_st_eq_landau_n_rt_rp_4141_t10 ksi eta u0 i z0 l x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_satz110d z0 x0) : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2399 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.(l_e_st_eq_landau_n_rt_rp_prodapp ksi eta u0 i (l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4141_t11 ksi eta u0 i z0 l x t y u v) : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2400 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_rp_prod1 ksi eta (l_e_st_eq_landau_n_rt_ts x1 y0) x1 lx1 y0 ly (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x1 y0)) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ts x1 y0) (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2401 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_satz105a x1 x0 y0 (l_e_st_eq_landau_n_rt_satz83 x0 x1 l) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x1 y0) (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2402 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_ismore2 (l_e_st_eq_landau_n_rt_ts x0 y0) z0 (l_e_st_eq_landau_n_rt_ts x1 y0) (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_ts x0 y0) j) (l_e_st_eq_landau_n_rt_rp_4141_t14 ksi eta z0 i x0 lx y0 ly j x1 lx1 l) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x1 y0) z0).
-
-(* constant 2403 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_andi (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ts x1 y0) (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x1 y0) z0) (l_e_st_eq_landau_n_rt_rp_4141_t13 ksi eta z0 i x0 lx y0 ly j x1 lx1 l) (l_e_st_eq_landau_n_rt_rp_4141_t15 ksi eta z0 i x0 lx y0 ly j x1 lx1 l) : l_and (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ts x1 y0) (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x1 y0) z0)).
-
-(* constant 2404 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_more y z0)) (l_e_st_eq_landau_n_rt_ts x1 y0) (l_e_st_eq_landau_n_rt_rp_4141_t16 ksi eta z0 i x0 lx y0 ly j x1 lx1 l) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))).
-
-(* constant 2405 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_cutapp3 ksi x0 lx (l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_less x0 x.l_e_st_eq_landau_n_rt_rp_4141_t17 ksi eta z0 i x0 lx y0 ly j x t u) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))).
-
-(* constant 2406 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).(l_e_st_eq_landau_n_rt_rp_prodapp ksi eta z0 i (l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4141_t18 ksi eta z0 i x t y u v) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))).
-
-(* constant 2407 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.(l_e_st_eq_landau_n_rt_cut2 (l_e_st_eq_landau_n_rt_rp_prod ksi eta) (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_rp_prod1 ksi eta (l_e_st_eq_landau_n_rt_ts x0 y0) x0 lx y0 ly (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x0 y0))) (l_e_st_eq_landau_n_rt_ts x1 y1) (l_e_st_eq_landau_n_rt_rp_satz141a ksi eta x1 ux y1 uy) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_rp_4141_t12 ksi eta x t y u) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_prod ksi eta).l_e_st_eq_landau_n_rt_rp_4141_t19 ksi eta x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2408 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.(l_e_st_eq_landau_n_rt_cutapp1b eta (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt eta y.l_e_st_eq_landau_n_rt_rp_4141_t20 ksi eta x0 lx y0 ly x1 ux y t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2409 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.(l_e_st_eq_landau_n_rt_cutapp1b ksi (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.l_e_st_eq_landau_n_rt_rp_4141_t21 ksi eta x0 lx y0 ly x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2410 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_e_st_eq_landau_n_rt_cutapp1a eta (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta y.l_e_st_eq_landau_n_rt_rp_4141_t22 ksi eta x0 lx y t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2411 *)
-definition l_e_st_eq_landau_n_rt_rp_satz141 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_cutapp1a ksi (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_rp_4141_t23 ksi eta x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2412 *)
-definition l_e_st_eq_landau_n_rt_rp_ts ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_cutof (l_e_st_eq_landau_n_rt_rp_prod ksi eta) (l_e_st_eq_landau_n_rt_rp_satz141 ksi eta) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2413 *)
-definition l_e_st_eq_landau_n_rt_rp_lrtts ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_ine (l_e_st_eq_landau_n_rt_rp_prod ksi eta) (l_e_st_eq_landau_n_rt_rp_satz141 ksi eta) z0 (l_e_st_eq_landau_n_rt_rp_prod1 ksi eta z0 x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0).
-
-(* constant 2414 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_isp1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_not (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_prod ksi eta))) (l_e_st_eq_landau_n_rt_ts x0 y0) z0 (l_e_st_eq_landau_n_rt_rp_satz141a ksi eta x0 ux y0 uy) i : l_not (l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta))).
-
-(* constant 2415 *)
-definition l_e_st_eq_landau_n_rt_rp_urtts ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_imp_th3 (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0) (l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_rp_iii4_t10 ksi eta z0 x0 ux y0 uy i) (λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0.l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_rp_prod ksi eta) (l_e_st_eq_landau_n_rt_rp_satz141 ksi eta) z0 t) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0).
-
-(* constant 2416 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.(l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_rp_prod ksi eta) (l_e_st_eq_landau_n_rt_rp_satz141 ksi eta) z0 lz : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2417 *)
-definition l_e_st_eq_landau_n_rt_rp_tsapp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.(l_e_st_eq_landau_n_rt_rp_prodapp ksi eta z0 (l_e_st_eq_landau_n_rt_rp_iii4_t11 ksi eta z0 lz p p1) p p1 : p).
-
-(* constant 2418 *)
-definition l_e_st_eq_landau_n_rt_rp_ists1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ts u zeta) ksi eta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)).
-
-(* constant 2419 *)
-definition l_e_st_eq_landau_n_rt_rp_ists2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ts zeta u) ksi eta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta)).
-
-(* constant 2420 *)
-definition l_e_st_eq_landau_n_rt_rp_ists12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ists1 ksi eta zeta i) (l_e_st_eq_landau_n_rt_rp_ists2 zeta upsilon eta j) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2421 *)
-definition l_e_st_eq_landau_n_rt_rp_4142_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_tris l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts y0 x0) i (l_e_st_eq_landau_n_rt_comts x0 y0) : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts y0 x0)).
-
-(* constant 2422 *)
-definition l_e_st_eq_landau_n_rt_rp_4142_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_lrtts eta ksi z0 y0 ly x0 lx (l_e_st_eq_landau_n_rt_rp_4142_t1 ksi eta z0 lz x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta ksi) z0).
-
-(* constant 2423 *)
-definition l_e_st_eq_landau_n_rt_rp_4142_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0.(l_e_st_eq_landau_n_rt_rp_tsapp ksi eta z0 lz (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta ksi) z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4142_t2 ksi eta z0 lz x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta ksi) z0).
-
-(* constant 2424 *)
-definition l_e_st_eq_landau_n_rt_rp_satz142 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta ksi) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) x.l_e_st_eq_landau_n_rt_rp_4142_t3 ksi eta x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta ksi) x.l_e_st_eq_landau_n_rt_rp_4142_t3 eta ksi x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta ksi)).
-
-(* constant 2425 *)
-definition l_e_st_eq_landau_n_rt_rp_comts ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz142 ksi eta : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta ksi)).
-
-(* constant 2426 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts v0 z0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_ts v0 z0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0)) i (l_e_st_eq_landau_n_rt_ists1 v0 (l_e_st_eq_landau_n_rt_ts x0 y0) z0 j) (l_e_st_eq_landau_n_rt_assts1 x0 y0 z0) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0))).
-
-(* constant 2427 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts v0 z0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_lrtts eta zeta (l_e_st_eq_landau_n_rt_ts y0 z0) y0 ly z0 lz (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts y0 z0)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 2428 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts v0 z0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_lrtts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta) u0 x0 lx (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_rt_rp_4143_t2 ksi eta zeta u0 lu v0 lv z0 lz i x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_rp_4143_t1 ksi eta zeta u0 lu v0 lv z0 lz i x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0).
-
-(* constant 2429 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts v0 z0).(l_e_st_eq_landau_n_rt_rp_tsapp ksi eta v0 lv (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4143_t3 ksi eta zeta u0 lu v0 lv z0 lz i x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0).
-
-(* constant 2430 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0.(l_e_st_eq_landau_n_rt_rp_tsapp (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta u0 lu (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt zeta y.λv:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4143_t4 ksi eta zeta u0 lu x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0).
-
-(* constant 2431 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts y0 z0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_ts x0 v0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0) i (l_e_st_eq_landau_n_rt_ists2 v0 (l_e_st_eq_landau_n_rt_ts y0 z0) x0 j) (l_e_st_eq_landau_n_rt_assts2 x0 y0 z0) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0)).
-
-(* constant 2432 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts y0 z0).(l_e_st_eq_landau_n_rt_rp_lrtts ksi eta (l_e_st_eq_landau_n_rt_ts x0 y0) x0 lx y0 ly (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x0 y0)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2433 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts y0 z0).(l_e_st_eq_landau_n_rt_rp_lrtts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta u0 (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_rp_4143_t7 ksi eta zeta u0 lu x0 lx v0 lv i y0 ly z0 lz j) z0 lz (l_e_st_eq_landau_n_rt_rp_4143_t6 ksi eta zeta u0 lu x0 lx v0 lv i y0 ly z0 lz j) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0).
-
-(* constant 2434 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).(l_e_st_eq_landau_n_rt_rp_tsapp eta zeta v0 lv (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt zeta y.λv:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4143_t8 ksi eta zeta u0 lu x0 lx v0 lv i x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0).
-
-(* constant 2435 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0.(l_e_st_eq_landau_n_rt_rp_tsapp ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta) u0 lu (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta zeta) y.λv:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4143_t9 ksi eta zeta u0 lu x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0).
-
-(* constant 2436 *)
-definition l_e_st_eq_landau_n_rt_rp_satz143 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) x.l_e_st_eq_landau_n_rt_rp_4143_t5 ksi eta zeta x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) x.l_e_st_eq_landau_n_rt_rp_4143_t10 ksi eta zeta x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta))).
-
-(* constant 2437 *)
-definition l_e_st_eq_landau_n_rt_rp_assts1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz143 ksi eta zeta : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta))).
-
-(* constant 2438 *)
-definition l_e_st_eq_landau_n_rt_rp_assts2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_satz143 ksi eta zeta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta)).
-
-(* constant 2439 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_ts x0 v0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0)) i (l_e_st_eq_landau_n_rt_ists2 v0 (l_e_st_eq_landau_n_rt_pl y0 z0) x0 j) (l_e_st_eq_landau_n_rt_disttp2 x0 y0 z0) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0))).
-
-(* constant 2440 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_rp_lrtts ksi eta (l_e_st_eq_landau_n_rt_ts x0 y0) x0 lx y0 ly (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x0 y0)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2441 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_rp_lrtts ksi zeta (l_e_st_eq_landau_n_rt_ts x0 z0) x0 lx z0 lz (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x0 z0)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_ts x0 z0)).
-
-(* constant 2442 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_rp_lrtpl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) u0 (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_rp_4144_t2 ksi eta zeta u0 lu x0 lx v0 lv i y0 ly z0 lz j) (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_rp_4144_t3 ksi eta zeta u0 lu x0 lx v0 lv i y0 ly z0 lz j) (l_e_st_eq_landau_n_rt_rp_4144_t1 ksi eta zeta u0 lu x0 lx v0 lv i y0 ly z0 lz j) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0).
-
-(* constant 2443 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).(l_e_st_eq_landau_n_rt_rp_plapp eta zeta v0 lv (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt zeta y.λv:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_4144_t4 ksi eta zeta u0 lu x0 lx v0 lv i x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0).
-
-(* constant 2444 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.(l_e_st_eq_landau_n_rt_rp_tsapp ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta) u0 lu (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) y.λv:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4144_t5 ksi eta zeta u0 lu x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0).
-
-(* constant 2445 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_e_tris l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_pl v0 w0) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x1 z0)) i (l_e_st_eq_landau_n_rt_ispl12 v0 (l_e_st_eq_landau_n_rt_ts x0 y0) w0 (l_e_st_eq_landau_n_rt_ts x1 z0) j k) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x1 z0))).
-
-(* constant 2446 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_x2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_e_ite (l_e_st_eq_landau_n_rt_moreis x0 x1) l_e_st_eq_landau_n_rt_rat x0 x1 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2447 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).λm:l_e_st_eq_landau_n_rt_moreis x0 x1.(l_e_itet (l_e_st_eq_landau_n_rt_moreis x0 x1) l_e_st_eq_landau_n_rt_rat x0 x1 m : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) x0).
-
-(* constant 2448 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).λm:l_e_st_eq_landau_n_rt_moreis x0 x1.(l_e_isp1 l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lrt ksi t) x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) lx (l_e_st_eq_landau_n_rt_rp_4144_t8 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k m) : l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2449 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).λm:l_e_st_eq_landau_n_rt_moreis x0 x1.(l_e_st_eq_landau_n_rt_lessisi2 x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) x0 (l_e_st_eq_landau_n_rt_rp_4144_t8 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k m)) : l_e_st_eq_landau_n_rt_lessis x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2450 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).λm:l_e_st_eq_landau_n_rt_moreis x0 x1.(l_e_st_eq_landau_n_rt_satz88 x1 x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_satz84 x0 x1 m) (l_e_st_eq_landau_n_rt_rp_4144_t10 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k m) : l_e_st_eq_landau_n_rt_lessis x1 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2451 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).λn:l_not (l_e_st_eq_landau_n_rt_moreis x0 x1).(l_e_itef (l_e_st_eq_landau_n_rt_moreis x0 x1) l_e_st_eq_landau_n_rt_rat x0 x1 n : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) x1).
-
-(* constant 2452 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).λn:l_not (l_e_st_eq_landau_n_rt_moreis x0 x1).(l_e_isp1 l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lrt ksi t) x1 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) lx1 (l_e_st_eq_landau_n_rt_rp_4144_t12 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k n) : l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2453 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).λn:l_not (l_e_st_eq_landau_n_rt_moreis x0 x1).(l_e_st_eq_landau_n_rt_lessisi2 x1 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) x1 (l_e_st_eq_landau_n_rt_rp_4144_t12 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k n)) : l_e_st_eq_landau_n_rt_lessis x1 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2454 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).λn:l_not (l_e_st_eq_landau_n_rt_moreis x0 x1).(l_e_st_eq_landau_n_rt_lessisi1 x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_satz87b x0 x1 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_satz81j x0 x1 n) (l_e_st_eq_landau_n_rt_rp_4144_t14 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k n)) : l_e_st_eq_landau_n_rt_lessis x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2455 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_imp_th1 (l_e_st_eq_landau_n_rt_moreis x0 x1) (l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)) (λt:l_e_st_eq_landau_n_rt_moreis x0 x1.l_e_st_eq_landau_n_rt_rp_4144_t9 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k t) (λt:l_not (l_e_st_eq_landau_n_rt_moreis x0 x1).l_e_st_eq_landau_n_rt_rp_4144_t13 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k t) : l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2456 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_imp_th1 (l_e_st_eq_landau_n_rt_moreis x0 x1) (l_e_st_eq_landau_n_rt_lessis x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)) (λt:l_e_st_eq_landau_n_rt_moreis x0 x1.l_e_st_eq_landau_n_rt_rp_4144_t10 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k t) (λt:l_not (l_e_st_eq_landau_n_rt_moreis x0 x1).l_e_st_eq_landau_n_rt_rp_4144_t15 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k t) : l_e_st_eq_landau_n_rt_lessis x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2457 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_imp_th1 (l_e_st_eq_landau_n_rt_moreis x0 x1) (l_e_st_eq_landau_n_rt_lessis x1 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)) (λt:l_e_st_eq_landau_n_rt_moreis x0 x1.l_e_st_eq_landau_n_rt_rp_4144_t11 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k t) (λt:l_not (l_e_st_eq_landau_n_rt_moreis x0 x1).l_e_st_eq_landau_n_rt_rp_4144_t14 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k t) : l_e_st_eq_landau_n_rt_lessis x1 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2458 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_e_st_eq_landau_n_rt_rp_lrtpl eta zeta (l_e_st_eq_landau_n_rt_pl y0 z0) y0 ly z0 lz (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl y0 z0)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 2459 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_e_st_eq_landau_n_rt_rp_lrtts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_rp_4144_t16 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_rp_4144_t19 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0))) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0))).
-
-(* constant 2460 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_e_st_eq_landau_n_rt_satz109a x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) y0 y0 (l_e_st_eq_landau_n_rt_rp_4144_t17 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_lessisi2 y0 y0 (l_e_refis l_e_st_eq_landau_n_rt_rat y0)) : l_e_st_eq_landau_n_rt_lessis (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) y0)).
-
-(* constant 2461 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_e_st_eq_landau_n_rt_satz109a x1 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) z0 z0 (l_e_st_eq_landau_n_rt_rp_4144_t18 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_lessisi2 z0 z0 (l_e_refis l_e_st_eq_landau_n_rt_rat z0)) : l_e_st_eq_landau_n_rt_lessis (l_e_st_eq_landau_n_rt_ts x1 z0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) z0)).
-
-(* constant 2462 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_e_st_eq_landau_n_rt_islessis12 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x1 z0)) u0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) y0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) z0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_symis l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x1 z0)) (l_e_st_eq_landau_n_rt_rp_4144_t7 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)) (l_e_st_eq_landau_n_rt_distpt2 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) y0 z0) (l_e_st_eq_landau_n_rt_satz100a (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) y0) (l_e_st_eq_landau_n_rt_ts x1 z0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) z0) (l_e_st_eq_landau_n_rt_rp_4144_t21 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_rp_4144_t22 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)) : l_e_st_eq_landau_n_rt_lessis u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0))).
-
-(* constant 2463 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t24 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_orapp (l_e_st_eq_landau_n_rt_less u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0))) (l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0))) (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0) (l_e_st_eq_landau_n_rt_rp_4144_t23 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (λt:l_e_st_eq_landau_n_rt_less u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0)).l_e_st_eq_landau_n_rt_rp_satz120 (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_rp_4144_t20 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) u0 t) (λt:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0)).l_e_isp1 l_e_st_eq_landau_n_rt_rat (λu:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0)) u0 (l_e_st_eq_landau_n_rt_rp_4144_t20 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) t) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0).
-
-(* constant 2464 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t25 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_tsapp ksi zeta w0 lw (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt zeta y.λv:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4144_t24 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0).
-
-(* constant 2465 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t26 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).(l_e_st_eq_landau_n_rt_rp_tsapp ksi eta v0 lv (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4144_t25 ksi eta zeta u0 lu v0 lv w0 lw i x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0).
-
-(* constant 2466 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t27 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.(l_e_st_eq_landau_n_rt_rp_plapp (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) u0 lu (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) y.λv:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_4144_t26 ksi eta zeta u0 lu x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0).
-
-(* constant 2467 *)
-definition l_e_st_eq_landau_n_rt_rp_satz144 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) x.l_e_st_eq_landau_n_rt_rp_4144_t6 ksi eta zeta x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) x.l_e_st_eq_landau_n_rt_rp_4144_t27 ksi eta zeta x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta))).
-
-(* constant 2468 *)
-definition l_e_st_eq_landau_n_rt_rp_disttp1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta (l_e_st_eq_landau_n_rt_rp_pl ksi eta)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_satz144 zeta ksi eta) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta eta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_comts zeta ksi) (l_e_st_eq_landau_n_rt_rp_comts zeta eta)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta))).
-
-(* constant 2469 *)
-definition l_e_st_eq_landau_n_rt_rp_disttp2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz144 ksi eta zeta : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta))).
-
-(* constant 2470 *)
-definition l_e_st_eq_landau_n_rt_rp_distpt1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_disttp1 ksi eta zeta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta)).
-
-(* constant 2471 *)
-definition l_e_st_eq_landau_n_rt_rp_distpt2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) (l_e_st_eq_landau_n_rt_rp_disttp2 ksi eta zeta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta))).
-
-(* constant 2472 *)
-definition l_e_st_eq_landau_n_rt_rp_4145_phi ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_mn ksi eta m : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2473 *)
-definition l_e_st_eq_landau_n_rt_rp_4145_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_satz140d ksi eta m : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m))).
-
-(* constant 2474 *)
-definition l_e_st_eq_landau_n_rt_rp_4145_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m)) zeta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m) zeta)) (l_e_st_eq_landau_n_rt_rp_ists1 ksi (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m)) zeta (l_e_st_eq_landau_n_rt_rp_4145_t1 ksi eta zeta m)) (l_e_st_eq_landau_n_rt_rp_disttp1 eta (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m) zeta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m) zeta))).
-
-(* constant 2475 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_ismore1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m) zeta)) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m) zeta)) (l_e_st_eq_landau_n_rt_rp_4145_t2 ksi eta zeta m)) (l_e_st_eq_landau_n_rt_rp_satz133 (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m) zeta)) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)).
-
-(* constant 2476 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_st_eq_landau_n_rt_rp_ists1 ksi eta zeta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)).
-
-(* constant 2477 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz145a eta ksi zeta (l_e_st_eq_landau_n_rt_rp_satz122 ksi eta l)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)).
-
-(* constant 2478 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta eta) (l_e_st_eq_landau_n_rt_rp_comts ksi zeta) (l_e_st_eq_landau_n_rt_rp_comts eta zeta) (l_e_st_eq_landau_n_rt_rp_satz145a ksi eta zeta m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta)).
-
-(* constant 2479 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145e ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_st_eq_landau_n_rt_rp_ists2 ksi eta zeta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta)).
-
-(* constant 2480 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145f ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta eta) (l_e_st_eq_landau_n_rt_rp_comts ksi zeta) (l_e_st_eq_landau_n_rt_rp_comts eta zeta) (l_e_st_eq_landau_n_rt_rp_satz145c ksi eta zeta l) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta)).
-
-(* constant 2481 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145g ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λm:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_ismore2 (l_e_st_eq_landau_n_rt_rp_ts ksi upsilon) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ists1 ksi eta upsilon i) (l_e_st_eq_landau_n_rt_rp_satz145d zeta upsilon ksi m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2482 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145h ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λm:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ts upsilon eta) (l_e_st_eq_landau_n_rt_rp_comts ksi zeta) (l_e_st_eq_landau_n_rt_rp_comts eta upsilon) (l_e_st_eq_landau_n_rt_rp_satz145g ksi eta zeta upsilon i m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts upsilon eta)).
-
-(* constant 2483 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145j ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less zeta upsilon.(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_ts ksi upsilon) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ists1 ksi eta upsilon i) (l_e_st_eq_landau_n_rt_rp_satz145f zeta upsilon ksi l) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2484 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145k ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less zeta upsilon.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ts upsilon eta) (l_e_st_eq_landau_n_rt_rp_comts ksi zeta) (l_e_st_eq_landau_n_rt_rp_comts eta upsilon) (l_e_st_eq_landau_n_rt_rp_satz145j ksi eta zeta upsilon i l) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts upsilon eta)).
-
-(* constant 2485 *)
-definition l_e_st_eq_landau_n_rt_rp_4146_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz123a ksi eta : l_or3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2486 *)
-definition l_e_st_eq_landau_n_rt_rp_4146_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) : l_ec3 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta))).
-
-(* constant 2487 *)
-definition l_e_st_eq_landau_n_rt_rp_satz146a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta).(l_ec3_th11 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_4146_t1 ksi eta zeta) (l_e_st_eq_landau_n_rt_rp_4146_t2 ksi eta zeta) (λu:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_satz145b ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz145a ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_satz145c ksi eta zeta u) m : l_e_st_eq_landau_n_rt_rp_more ksi eta).
-
-(* constant 2488 *)
-definition l_e_st_eq_landau_n_rt_rp_satz146b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta).(l_ec3_th10 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_4146_t1 ksi eta zeta) (l_e_st_eq_landau_n_rt_rp_4146_t2 ksi eta zeta) (λu:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_satz145b ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz145a ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_satz145c ksi eta zeta u) i : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 2489 *)
-definition l_e_st_eq_landau_n_rt_rp_satz146c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta).(l_ec3_th12 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_4146_t1 ksi eta zeta) (l_e_st_eq_landau_n_rt_rp_4146_t2 ksi eta zeta) (λu:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_satz145b ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz145a ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_satz145c ksi eta zeta u) l : l_e_st_eq_landau_n_rt_rp_less ksi eta).
-
-(* constant 2490 *)
-definition l_e_st_eq_landau_n_rt_rp_satz146d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta).(l_e_st_eq_landau_n_rt_rp_satz146a ksi eta zeta (l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta eta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_comts zeta ksi) (l_e_st_eq_landau_n_rt_rp_comts zeta eta) m) : l_e_st_eq_landau_n_rt_rp_more ksi eta).
-
-(* constant 2491 *)
-definition l_e_st_eq_landau_n_rt_rp_satz146e ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta).(l_e_st_eq_landau_n_rt_rp_satz146b ksi eta zeta (l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_comts ksi zeta) i (l_e_st_eq_landau_n_rt_rp_comts zeta eta)) : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 2492 *)
-definition l_e_st_eq_landau_n_rt_rp_satz146f ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta).(l_e_st_eq_landau_n_rt_rp_satz146c ksi eta zeta (l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta eta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_comts zeta ksi) (l_e_st_eq_landau_n_rt_rp_comts zeta eta) l) : l_e_st_eq_landau_n_rt_rp_less ksi eta).
-
-(* constant 2493 *)
-definition l_e_st_eq_landau_n_rt_rp_4147_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz145a ksi eta zeta m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)).
-
-(* constant 2494 *)
-definition l_e_st_eq_landau_n_rt_rp_4147_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_ts zeta eta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts upsilon eta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_comts zeta eta) (l_e_st_eq_landau_n_rt_rp_comts upsilon eta) (l_e_st_eq_landau_n_rt_rp_satz145a zeta upsilon eta n) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2495 *)
-definition l_e_st_eq_landau_n_rt_rp_satz147 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_trmore (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_4147_t1 ksi eta zeta upsilon m n) (l_e_st_eq_landau_n_rt_rp_4147_t2 ksi eta zeta upsilon m n) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2496 *)
-definition l_e_st_eq_landau_n_rt_rp_satz147a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz147 eta ksi upsilon zeta (l_e_st_eq_landau_n_rt_rp_satz122 ksi eta l) (l_e_st_eq_landau_n_rt_rp_satz122 zeta upsilon k)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2497 *)
-definition l_e_st_eq_landau_n_rt_rp_satz148a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_orapp (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)) m (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz147 ksi eta zeta upsilon t n) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_satz145g ksi eta zeta upsilon t n) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2498 *)
-definition l_e_st_eq_landau_n_rt_rp_satz148b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.(l_orapp (l_e_st_eq_landau_n_rt_rp_more zeta upsilon) (l_e_st_eq_landau_n_rt_rp_is zeta upsilon) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)) n (λt:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.l_e_st_eq_landau_n_rt_rp_satz147 ksi eta zeta upsilon m t) (λt:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.l_e_st_eq_landau_n_rt_rp_satz145h zeta upsilon ksi eta t m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2499 *)
-definition l_e_st_eq_landau_n_rt_rp_satz148c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz148a eta ksi upsilon zeta (l_e_st_eq_landau_n_rt_rp_satz125 ksi eta l) (l_e_st_eq_landau_n_rt_rp_satz122 zeta upsilon k)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2500 *)
-definition l_e_st_eq_landau_n_rt_rp_satz148d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz148b eta ksi upsilon zeta (l_e_st_eq_landau_n_rt_rp_satz122 ksi eta l) (l_e_st_eq_landau_n_rt_rp_satz125 zeta upsilon k)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2501 *)
-definition l_e_st_eq_landau_n_rt_rp_4149_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.(l_e_st_eq_landau_n_rt_rp_moreisi2 (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ists12 ksi eta zeta upsilon i j) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2502 *)
-definition l_e_st_eq_landau_n_rt_rp_4149_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λo:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_moreisi1 (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_satz148a ksi eta zeta upsilon m o) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2503 *)
-definition l_e_st_eq_landau_n_rt_rp_4149_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_orapp (l_e_st_eq_landau_n_rt_rp_more zeta upsilon) (l_e_st_eq_landau_n_rt_rp_is zeta upsilon) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)) n (λt:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.l_e_st_eq_landau_n_rt_rp_4149_t2 ksi eta zeta upsilon m n i t) (λt:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.l_e_st_eq_landau_n_rt_rp_4149_t1 ksi eta zeta upsilon m n i t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2504 *)
-definition l_e_st_eq_landau_n_rt_rp_4149_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.λo:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_moreisi1 (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_satz148b ksi eta zeta upsilon o n) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2505 *)
-definition l_e_st_eq_landau_n_rt_rp_satz149 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.(l_orapp (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)) m (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_4149_t4 ksi eta zeta upsilon m n t) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_4149_t3 ksi eta zeta upsilon m n t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2506 *)
-definition l_e_st_eq_landau_n_rt_rp_satz149a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz124 (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz149 eta ksi upsilon zeta (l_e_st_eq_landau_n_rt_rp_satz125 ksi eta l) (l_e_st_eq_landau_n_rt_rp_satz125 zeta upsilon k)) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2507 *)
-definition l_e_st_eq_landau_n_rt_ratset ≝ λr0:l_e_st_eq_landau_n_rt_rat.(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less x r0) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2508 *)
-definition l_e_st_eq_landau_n_rt_4150_t1 ≝ λr0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz90 r0 : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less x r0)).
-
-(* constant 2509 *)
-definition l_e_st_eq_landau_n_rt_4150_t2 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 r0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less x r0) x0 l : l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_ratset r0)).
-
-(* constant 2510 *)
-definition l_e_st_eq_landau_n_rt_4150_t3 ≝ λr0:l_e_st_eq_landau_n_rt_rat.(l_ec3e13 (l_e_st_eq_landau_n_rt_is r0 r0) (l_e_st_eq_landau_n_rt_more r0 r0) (l_e_st_eq_landau_n_rt_less r0 r0) (l_e_st_eq_landau_n_rt_satz81b r0 r0) (l_e_refis l_e_st_eq_landau_n_rt_rat r0) : l_not (l_e_st_eq_landau_n_rt_less r0 r0)).
-
-(* constant 2511 *)
-definition l_e_st_eq_landau_n_rt_4150_t4 ≝ λr0:l_e_st_eq_landau_n_rt_rat.(l_imp_th3 (l_e_st_eq_landau_n_rt_in r0 (l_e_st_eq_landau_n_rt_ratset r0)) (l_e_st_eq_landau_n_rt_less r0 r0) (l_e_st_eq_landau_n_rt_4150_t3 r0) (λt:l_e_st_eq_landau_n_rt_in r0 (l_e_st_eq_landau_n_rt_ratset r0).l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less x r0) r0 t) : l_not (l_e_st_eq_landau_n_rt_in r0 (l_e_st_eq_landau_n_rt_ratset r0))).
-
-(* constant 2512 *)
-definition l_e_st_eq_landau_n_rt_4150_t5 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_ratset r0).(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less x r0) x0 i : l_e_st_eq_landau_n_rt_less x0 r0).
-
-(* constant 2513 *)
-definition l_e_st_eq_landau_n_rt_4150_t6 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_ratset r0).λx1:l_e_st_eq_landau_n_rt_rat.λk:l_e_st_eq_landau_n_rt_less x1 x0.(l_e_st_eq_landau_n_rt_4150_t2 r0 x1 (l_e_st_eq_landau_n_rt_trless x1 x0 r0 k (l_e_st_eq_landau_n_rt_4150_t5 r0 x0 i)) : l_e_st_eq_landau_n_rt_in x1 (l_e_st_eq_landau_n_rt_ratset r0)).
-
-(* constant 2514 *)
-definition l_e_st_eq_landau_n_rt_4150_t7 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_ratset r0).(l_e_st_eq_landau_n_rt_satz91 x0 r0 (l_e_st_eq_landau_n_rt_4150_t5 r0 x0 i) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x0 x) (l_e_st_eq_landau_n_rt_less x r0))).
-
-(* constant 2515 *)
-definition l_e_st_eq_landau_n_rt_4150_t8 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_ratset r0).λx1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x0 x1) (l_e_st_eq_landau_n_rt_less x1 r0).(l_ande1 (l_e_st_eq_landau_n_rt_less x0 x1) (l_e_st_eq_landau_n_rt_less x1 r0) a : l_e_st_eq_landau_n_rt_less x0 x1).
-
-(* constant 2516 *)
-definition l_e_st_eq_landau_n_rt_4150_t9 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_ratset r0).λx1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x0 x1) (l_e_st_eq_landau_n_rt_less x1 r0).(l_ande2 (l_e_st_eq_landau_n_rt_less x0 x1) (l_e_st_eq_landau_n_rt_less x1 r0) a : l_e_st_eq_landau_n_rt_less x1 r0).
-
-(* constant 2517 *)
-definition l_e_st_eq_landau_n_rt_4150_t10 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_ratset r0).λx1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x0 x1) (l_e_st_eq_landau_n_rt_less x1 r0).(l_andi (l_e_st_eq_landau_n_rt_in x1 (l_e_st_eq_landau_n_rt_ratset r0)) (l_e_st_eq_landau_n_rt_more x1 x0) (l_e_st_eq_landau_n_rt_4150_t2 r0 x1 (l_e_st_eq_landau_n_rt_4150_t9 r0 x0 i x1 a)) (l_e_st_eq_landau_n_rt_satz83 x0 x1 (l_e_st_eq_landau_n_rt_4150_t8 r0 x0 i x1 a)) : l_and (l_e_st_eq_landau_n_rt_in x1 (l_e_st_eq_landau_n_rt_ratset r0)) (l_e_st_eq_landau_n_rt_more x1 x0)).
-
-(* constant 2518 *)
-definition l_e_st_eq_landau_n_rt_4150_t11 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_ratset r0).(l_some_th6 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x0 x) (l_e_st_eq_landau_n_rt_less x r0)) (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_ratset r0)) (l_e_st_eq_landau_n_rt_more x x0)) (l_e_st_eq_landau_n_rt_4150_t7 r0 x0 i) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_and (l_e_st_eq_landau_n_rt_less x0 x) (l_e_st_eq_landau_n_rt_less x r0).l_e_st_eq_landau_n_rt_4150_t10 r0 x0 i x t) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_ratset r0)) (l_e_st_eq_landau_n_rt_more x x0))).
-
-(* constant 2519 *)
-definition l_e_st_eq_landau_n_rt_4150_t12 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 r0.(l_e_st_eq_landau_n_rt_cut2 (l_e_st_eq_landau_n_rt_ratset r0) x0 (l_e_st_eq_landau_n_rt_4150_t2 r0 x0 l) r0 (l_e_st_eq_landau_n_rt_4150_t4 r0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_ratset r0).λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_4150_t6 r0 x t y u) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_ratset r0).l_e_st_eq_landau_n_rt_4150_t11 r0 x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_ratset r0)).
-
-(* constant 2520 *)
-definition l_e_st_eq_landau_n_rt_satz150 ≝ λr0:l_e_st_eq_landau_n_rt_rat.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less x r0) (l_e_st_eq_landau_n_rt_4150_t1 r0) (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_ratset r0)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_less x r0.l_e_st_eq_landau_n_rt_4150_t12 r0 x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_ratset r0)).
-
-(* constant 2521 *)
-definition l_e_st_eq_landau_n_rt_rp_rpofrt ≝ λr0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_cutof (l_e_st_eq_landau_n_rt_ratset r0) (l_e_st_eq_landau_n_rt_satz150 r0) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2522 *)
-definition l_e_st_eq_landau_n_rt_rp_lrtrpofrt ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 r0.(l_e_st_eq_landau_n_rt_rp_ine (l_e_st_eq_landau_n_rt_ratset r0) (l_e_st_eq_landau_n_rt_satz150 r0) x0 (l_e_st_eq_landau_n_rt_4150_t2 r0 x0 l) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt r0) x0).
-
-(* constant 2523 *)
-definition l_e_st_eq_landau_n_rt_rp_lrtrpofrte ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt r0) x0.(l_e_st_eq_landau_n_rt_4150_t5 r0 x0 (l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_ratset r0) (l_e_st_eq_landau_n_rt_satz150 r0) x0 lx) : l_e_st_eq_landau_n_rt_less x0 r0).
-
-(* constant 2524 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t12 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 r0.(l_e_st_eq_landau_n_rt_satz81c x0 r0 m : l_not (l_e_st_eq_landau_n_rt_less x0 r0)).
-
-(* constant 2525 *)
-definition l_e_st_eq_landau_n_rt_rp_urtrpofrt ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 r0.(l_imp_th3 (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt r0) x0) (l_e_st_eq_landau_n_rt_less x0 r0) (l_e_st_eq_landau_n_rt_rp_iii4_t12 r0 x0 m) (λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt r0) x0.l_e_st_eq_landau_n_rt_rp_lrtrpofrte r0 x0 t) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_rpofrt r0) x0).
-
-(* constant 2526 *)
-definition l_e_st_eq_landau_n_rt_rp_1rp ≝ (l_e_st_eq_landau_n_rt_rp_rpofrt l_e_st_eq_landau_n_rt_1rt : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2527 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_lrtrpofrte l_e_st_eq_landau_n_rt_1rt y0 ly : l_e_st_eq_landau_n_rt_less y0 l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2528 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_ts x0 y0) z0 (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt) x0 (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_ts x0 y0) i) (l_e_st_eq_landau_n_rt_example1a x0) (l_e_st_eq_landau_n_rt_satz105f y0 l_e_st_eq_landau_n_rt_1rt x0 (l_e_st_eq_landau_n_rt_rp_4151_t1 ksi z0 lz x0 lx y0 ly i)) : l_e_st_eq_landau_n_rt_less z0 x0).
-
-(* constant 2529 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_satz120 ksi x0 lx z0 (l_e_st_eq_landau_n_rt_rp_4151_t2 ksi z0 lz x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_lrt ksi z0).
-
-(* constant 2530 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) z0.(l_e_st_eq_landau_n_rt_rp_tsapp ksi l_e_st_eq_landau_n_rt_rp_1rp z0 lz (l_e_st_eq_landau_n_rt_lrt ksi z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4151_t3 ksi z0 lz x t y u v) : l_e_st_eq_landau_n_rt_lrt ksi z0).
-
-(* constant 2531 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_y1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) x0 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2532 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) x1) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_4151_y1 ksi x0 lx x1 lx1 l) (l_e_st_eq_landau_n_rt_satz110e l_e_st_eq_landau_n_rt_1rt x1) (l_e_st_eq_landau_n_rt_satz105f x0 x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) l) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_rp_4151_y1 ksi x0 lx x1 lx1 l) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2533 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_rp_lrtrpofrt l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_4151_y1 ksi x0 lx x1 lx1 l) (l_e_st_eq_landau_n_rt_rp_4151_t5 ksi x0 lx x1 lx1 l) : l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_4151_y1 ksi x0 lx x1 lx1 l)).
-
-(* constant 2534 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x1 (l_e_st_eq_landau_n_rt_rp_4151_y1 ksi x0 lx x1 lx1 l)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1)) x0) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x0) x0 (l_e_st_eq_landau_n_rt_assts2 x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) x0) (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_ts x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1)) l_e_st_eq_landau_n_rt_1rt x0 (l_e_st_eq_landau_n_rt_satz110c l_e_st_eq_landau_n_rt_1rt x1)) (l_e_st_eq_landau_n_rt_example1c x0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x1 (l_e_st_eq_landau_n_rt_rp_4151_y1 ksi x0 lx x1 lx1 l)) x0).
-
-(* constant 2535 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_rp_lrtts ksi l_e_st_eq_landau_n_rt_rp_1rp x0 x1 lx1 (l_e_st_eq_landau_n_rt_rp_4151_y1 ksi x0 lx x1 lx1 l) (l_e_st_eq_landau_n_rt_rp_4151_t6 ksi x0 lx x1 lx1 l) (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x1 (l_e_st_eq_landau_n_rt_rp_4151_y1 ksi x0 lx x1 lx1 l)) x0 (l_e_st_eq_landau_n_rt_rp_4151_t7 ksi x0 lx x1 lx1 l)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) x0).
-
-(* constant 2536 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_e_st_eq_landau_n_rt_cutapp3 ksi x0 lx (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) x0) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi y.λu:l_e_st_eq_landau_n_rt_less x0 y.l_e_st_eq_landau_n_rt_rp_4151_t8 ksi x0 lx y t u) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) x0).
-
-(* constant 2537 *)
-definition l_e_st_eq_landau_n_rt_rp_satz151 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) ksi (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) x.l_e_st_eq_landau_n_rt_rp_4151_t4 ksi x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_rp_4151_t9 ksi x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) ksi).
-
-(* constant 2538 *)
-definition l_e_st_eq_landau_n_rt_rp_satz151a ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) ksi (l_e_st_eq_landau_n_rt_rp_satz151 ksi) : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp)).
-
-(* constant 2539 *)
-definition l_e_st_eq_landau_n_rt_rp_satz151b ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_1rp ksi) (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) ksi (l_e_st_eq_landau_n_rt_rp_comts l_e_st_eq_landau_n_rt_rp_1rp ksi) (l_e_st_eq_landau_n_rt_rp_satz151 ksi) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_1rp ksi) ksi).
-
-(* constant 2540 *)
-definition l_e_st_eq_landau_n_rt_rp_satz151c ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_1rp ksi) ksi (l_e_st_eq_landau_n_rt_rp_satz151b ksi) : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_1rp ksi)).
-
-(* constant 2541 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_invprop1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_and (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_less y0 x0) : Prop).
-
-(* constant 2542 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_invprop2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.(l_and3 (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x)) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) : Prop).
-
-(* constant 2543 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_invprop ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x) : Prop).
-
-(* constant 2544 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_inv ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop ksi z) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2545 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_andi (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_less y0 x0) uy l : l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 y0).
-
-(* constant 2546 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x) y0 (l_e_st_eq_landau_n_rt_rp_4152_t1 ksi z0 x0 ux y0 uy l i) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x)).
-
-(* constant 2547 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_and3i (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x)) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) ux (l_e_st_eq_landau_n_rt_rp_4152_t2 ksi z0 x0 ux y0 uy l i) i : l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x0).
-
-(* constant 2548 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x) x0 (l_e_st_eq_landau_n_rt_rp_4152_t3 ksi z0 x0 ux y0 uy l i) : l_e_st_eq_landau_n_rt_rp_4152_invprop ksi z0).
-
-(* constant 2549 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_inv1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop ksi z) z0 (l_e_st_eq_landau_n_rt_rp_4152_t4 ksi z0 x0 ux y0 uy l i) : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2550 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop ksi x) z0 i : l_e_st_eq_landau_n_rt_rp_4152_invprop ksi z0).
-
-(* constant 2551 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x0.(l_and3e1 (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x)) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) px : l_e_st_eq_landau_n_rt_urt ksi x0).
-
-(* constant 2552 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x0.(l_and3e2 (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x)) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) px : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x)).
-
-(* constant 2553 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x0.(l_and3e3 (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x)) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) px : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)).
-
-(* constant 2554 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x0.λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 y0.(l_ande1 (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_less y0 x0) py : l_e_st_eq_landau_n_rt_urt ksi y0).
-
-(* constant 2555 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x0.λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 y0.(l_ande2 (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_less y0 x0) py : l_e_st_eq_landau_n_rt_less y0 x0).
-
-(* constant 2556 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x0.λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 y0.(p1 x0 (l_e_st_eq_landau_n_rt_rp_4152_t6 ksi z0 i p p1 x0 px) y0 (l_e_st_eq_landau_n_rt_rp_4152_t9 ksi z0 i p p1 x0 px y0 py) (l_e_st_eq_landau_n_rt_rp_4152_t10 ksi z0 i p p1 x0 px y0 py) (l_e_st_eq_landau_n_rt_rp_4152_t8 ksi z0 i p p1 x0 px) : p).
-
-(* constant 2557 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x0.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x) (l_e_st_eq_landau_n_rt_rp_4152_t7 ksi z0 i p p1 x0 px) p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x.l_e_st_eq_landau_n_rt_rp_4152_t11 ksi z0 i p p1 x0 px x t) : p).
-
-(* constant 2558 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_invapp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x) (l_e_st_eq_landau_n_rt_rp_4152_t5 ksi z0 i p p1) p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x.l_e_st_eq_landau_n_rt_rp_4152_t12 ksi z0 i p p1 x t) : p).
-
-(* constant 2559 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_2x0 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_e_st_eq_landau_n_rt_pl x0 x0 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2560 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_e_st_eq_landau_n_rt_satz94a x0 x0 : l_e_st_eq_landau_n_rt_less x0 (l_e_st_eq_landau_n_rt_rp_4152_2x0 ksi x0 ux)).
-
-(* constant 2561 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_e_st_eq_landau_n_rt_rp_satz119a ksi x0 ux (l_e_st_eq_landau_n_rt_rp_4152_2x0 ksi x0 ux) (l_e_st_eq_landau_n_rt_rp_4152_t13 ksi x0 ux) : l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_rp_4152_2x0 ksi x0 ux)).
-
-(* constant 2562 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_e_st_eq_landau_n_rt_rp_4152_inv1 ksi (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_4152_2x0 ksi x0 ux)) (l_e_st_eq_landau_n_rt_rp_4152_2x0 ksi x0 ux) (l_e_st_eq_landau_n_rt_rp_4152_t14 ksi x0 ux) x0 ux (l_e_st_eq_landau_n_rt_rp_4152_t13 ksi x0 ux) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_4152_2x0 ksi x0 ux))) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_4152_2x0 ksi x0 ux)) (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2563 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x1.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_imp_th3 (l_e_st_eq_landau_n_rt_is x0 x1) (l_e_st_eq_landau_n_rt_lrt ksi x0) ux (λt:l_e_st_eq_landau_n_rt_is x0 x1.l_e_isp1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lrt ksi x) x1 x0 lx t) : l_e_st_eq_landau_n_rt_nis x0 x1).
-
-(* constant 2564 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x1.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_e_st_eq_landau_n_rt_satz110e l_e_st_eq_landau_n_rt_1rt x0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2565 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x1.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_e_st_eq_landau_n_rt_satz110e l_e_st_eq_landau_n_rt_1rt x1 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) x1) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2566 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x1.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1).(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x1) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) x1) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) x1 i) (l_e_st_eq_landau_n_rt_rp_4152_t18 ksi x1 lx x0 ux) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x1) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2567 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x1.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1).(l_e_st_eq_landau_n_rt_satz110b l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0 x1 (l_e_st_eq_landau_n_rt_rp_4152_t17 ksi x1 lx x0 ux) (l_e_st_eq_landau_n_rt_rp_4152_t19 ksi x1 lx x0 ux i) : l_e_st_eq_landau_n_rt_is x0 x1).
-
-(* constant 2568 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x1.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_imp_th3 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1)) (l_e_st_eq_landau_n_rt_is x0 x1) (l_e_st_eq_landau_n_rt_rp_4152_t16 ksi x1 lx x0 ux) (λt:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1).l_e_st_eq_landau_n_rt_rp_4152_t20 ksi x1 lx x0 ux t) : l_e_st_eq_landau_n_rt_nis (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1)).
-
-(* constant 2569 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x1.λi:l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).(l_e_st_eq_landau_n_rt_rp_4152_invapp ksi (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) i l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt ksi y.λv:l_e_st_eq_landau_n_rt_less y x.λw:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).l_e_st_eq_landau_n_rt_rp_4152_t21 ksi x1 lx x t (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x) w)) : l_con).
-
-(* constant 2570 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x1.(λt:l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).l_e_st_eq_landau_n_rt_rp_4152_t22 ksi x1 lx t : l_not (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) (l_e_st_eq_landau_n_rt_rp_4152_inv ksi))).
-
-(* constant 2571 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t24 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_isless2 z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) u0 j l : l_e_st_eq_landau_n_rt_less u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)).
-
-(* constant 2572 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t25 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ts u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0)) (l_e_st_eq_landau_n_rt_satz110e l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_satz110d l_e_st_eq_landau_n_rt_1rt u0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0) (l_e_st_eq_landau_n_rt_ts u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0))).
-
-(* constant 2573 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t26 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0) (l_e_st_eq_landau_n_rt_ts u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0)) (l_e_st_eq_landau_n_rt_ts u0 x0) (l_e_st_eq_landau_n_rt_rp_4152_t25 ksi z0 i u0 l x0 ux j) (l_e_st_eq_landau_n_rt_satz105c u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0 (l_e_st_eq_landau_n_rt_rp_4152_t24 ksi z0 i u0 l x0 ux j)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts u0 x0) (l_e_st_eq_landau_n_rt_ts u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0))).
-
-(* constant 2574 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t27 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_ts u0 x0) (l_e_st_eq_landau_n_rt_ts x0 u0) (l_e_st_eq_landau_n_rt_ts u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) u0) (l_e_st_eq_landau_n_rt_comts u0 x0) (l_e_st_eq_landau_n_rt_comts u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0)) (l_e_st_eq_landau_n_rt_rp_4152_t26 ksi z0 i u0 l x0 ux j) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 u0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) u0)).
-
-(* constant 2575 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t28 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_satz106c x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) u0 (l_e_st_eq_landau_n_rt_rp_4152_t27 ksi z0 i u0 l x0 ux j) : l_e_st_eq_landau_n_rt_less x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0)).
-
-(* constant 2576 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t29 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_rp_satz119a ksi x0 ux (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) (l_e_st_eq_landau_n_rt_rp_4152_t28 ksi z0 i u0 l x0 ux j) : l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0)).
-
-(* constant 2577 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t30 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_satz110e l_e_st_eq_landau_n_rt_1rt u0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) u0) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2578 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t31 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_satz110g l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) u0 (l_e_st_eq_landau_n_rt_rp_4152_t30 ksi z0 i u0 l x0 ux j) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0))).
-
-(* constant 2579 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t32 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_rp_4152_inv1 ksi u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) (l_e_st_eq_landau_n_rt_rp_4152_t29 ksi z0 i u0 l x0 ux j) x0 ux (l_e_st_eq_landau_n_rt_rp_4152_t28 ksi z0 i u0 l x0 ux j) (l_e_st_eq_landau_n_rt_rp_4152_t31 ksi z0 i u0 l x0 ux j) : l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2580 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t33 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.(l_e_st_eq_landau_n_rt_rp_4152_invapp ksi z0 i (l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt ksi y.λv:l_e_st_eq_landau_n_rt_less y x.λw:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).l_e_st_eq_landau_n_rt_rp_4152_t32 ksi z0 i u0 l x t w) : l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2581 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t34 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_satz91 x1 x0 l : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x1 x) (l_e_st_eq_landau_n_rt_less x x0))).
-
-(* constant 2582 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t35 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_ande1 (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0) a : l_e_st_eq_landau_n_rt_less x1 x2).
-
-(* constant 2583 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t36 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_e_st_eq_landau_n_rt_rp_satz119a ksi x1 ux1 x2 (l_e_st_eq_landau_n_rt_rp_4152_t35 ksi z0 i x0 ux x1 ux1 l j x2 a) : l_e_st_eq_landau_n_rt_urt ksi x2).
-
-(* constant 2584 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t37 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_e_st_eq_landau_n_rt_rp_4152_inv1 ksi (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) x2 (l_e_st_eq_landau_n_rt_rp_4152_t36 ksi z0 i x0 ux x1 ux1 l j x2 a) x1 ux1 (l_e_st_eq_landau_n_rt_rp_4152_t35 ksi z0 i x0 ux x1 ux1 l j x2 a) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2)) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2585 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t38 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_ande2 (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0) a : l_e_st_eq_landau_n_rt_less x2 x0).
-
-(* constant 2586 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t39 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2)) (l_e_st_eq_landau_n_rt_satz110c l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_satz110d l_e_st_eq_landau_n_rt_1rt x2) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) (l_e_st_eq_landau_n_rt_ts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2))).
-
-(* constant 2587 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t40 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) (l_e_st_eq_landau_n_rt_ts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2)) (l_e_st_eq_landau_n_rt_ts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) (l_e_st_eq_landau_n_rt_rp_4152_t39 ksi z0 i x0 ux x1 ux1 l j x2 a) (l_e_st_eq_landau_n_rt_satz105c x2 x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_rp_4152_t38 ksi z0 i x0 ux x1 ux1 l j x2 a)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) (l_e_st_eq_landau_n_rt_ts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2))).
-
-(* constant 2588 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t41 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_ts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x2) (l_e_st_eq_landau_n_rt_ts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) x2) (l_e_st_eq_landau_n_rt_comts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) (l_e_st_eq_landau_n_rt_comts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2)) (l_e_st_eq_landau_n_rt_rp_4152_t40 ksi z0 i x0 ux x1 ux1 l j x2 a) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x2) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) x2)).
-
-(* constant 2589 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t42 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_e_st_eq_landau_n_rt_satz106c (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) x2 (l_e_st_eq_landau_n_rt_rp_4152_t41 ksi z0 i x0 ux x1 ux1 l j x2 a) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2)).
-
-(* constant 2590 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t43 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_e_st_eq_landau_n_rt_ismore2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) j) (l_e_st_eq_landau_n_rt_satz83 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) (l_e_st_eq_landau_n_rt_rp_4152_t42 ksi z0 i x0 ux x1 ux1 l j x2 a)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) z0).
-
-(* constant 2591 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t44 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_andi (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) z0) (l_e_st_eq_landau_n_rt_rp_4152_t37 ksi z0 i x0 ux x1 ux1 l j x2 a) (l_e_st_eq_landau_n_rt_rp_4152_t43 ksi z0 i x0 ux x1 ux1 l j x2 a) : l_and (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) z0)).
-
-(* constant 2592 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t45 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (l_e_st_eq_landau_n_rt_more x z0)) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) (l_e_st_eq_landau_n_rt_rp_4152_t44 ksi z0 i x0 ux x1 ux1 l j x2 a) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (l_e_st_eq_landau_n_rt_more x z0))).
-
-(* constant 2593 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t46 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x1 x) (l_e_st_eq_landau_n_rt_less x x0)) (l_e_st_eq_landau_n_rt_rp_4152_t34 ksi z0 i x0 ux x1 ux1 l j) (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (l_e_st_eq_landau_n_rt_more x z0))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_and (l_e_st_eq_landau_n_rt_less x1 x) (l_e_st_eq_landau_n_rt_less x x0).l_e_st_eq_landau_n_rt_rp_4152_t45 ksi z0 i x0 ux x1 ux1 l j x t) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (l_e_st_eq_landau_n_rt_more x z0))).
-
-(* constant 2594 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t47 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).(l_e_st_eq_landau_n_rt_rp_4152_invapp ksi z0 i (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (l_e_st_eq_landau_n_rt_more x z0))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt ksi y.λv:l_e_st_eq_landau_n_rt_less y x.λw:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).l_e_st_eq_landau_n_rt_rp_4152_t46 ksi z0 i x t y u v w) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (l_e_st_eq_landau_n_rt_more x z0))).
-
-(* constant 2595 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t48 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_e_st_eq_landau_n_rt_cut2 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_pl y0 y0)) (l_e_st_eq_landau_n_rt_rp_4152_t15 ksi y0 uy) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_rp_4152_t23 ksi x0 lx) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_rp_4152_t33 ksi x t y u) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).l_e_st_eq_landau_n_rt_rp_4152_t47 ksi x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2596 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t49 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_e_st_eq_landau_n_rt_cutapp1b ksi (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.l_e_st_eq_landau_n_rt_rp_4152_t48 ksi x0 lx x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2597 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t50 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_cutapp1a ksi (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_rp_4152_t49 ksi x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2598 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_chi ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_cutof (l_e_st_eq_landau_n_rt_rp_4152_inv ksi) (l_e_st_eq_landau_n_rt_rp_4152_t50 ksi) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2599 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t51 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 u0).λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1).(l_e_tris l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_ts x0 u0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1)) i (l_e_st_eq_landau_n_rt_ists2 u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) x0 j) : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1))).
-
-(* constant 2600 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t52 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 u0).λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1).(l_e_st_eq_landau_n_rt_cutapp2a ksi x0 lx x1 ux : l_e_st_eq_landau_n_rt_less x0 x1).
-
-(* constant 2601 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t53 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 u0).λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1).(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1)) z0 (l_e_st_eq_landau_n_rt_ts x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1)) l_e_st_eq_landau_n_rt_1rt (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1)) (l_e_st_eq_landau_n_rt_rp_4152_t51 ksi z0 lz x0 lx u0 lu i x1 ux j)) (l_e_st_eq_landau_n_rt_satz110c l_e_st_eq_landau_n_rt_1rt x1) (l_e_st_eq_landau_n_rt_satz105c x0 x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) (l_e_st_eq_landau_n_rt_rp_4152_t52 ksi z0 lz x0 lx u0 lu i x1 ux j)) : l_e_st_eq_landau_n_rt_less z0 l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2602 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t54 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 u0).λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1).(l_e_st_eq_landau_n_rt_rp_lrtrpofrt l_e_st_eq_landau_n_rt_1rt z0 (l_e_st_eq_landau_n_rt_rp_4152_t53 ksi z0 lz x0 lx u0 lu i x1 ux j) : l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp z0).
-
-(* constant 2603 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_r1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 u0).(l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_rp_4152_inv ksi) (l_e_st_eq_landau_n_rt_rp_4152_t50 ksi) u0 lu : l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2604 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_r2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 u0).(l_e_st_eq_landau_n_rt_rp_4152_invapp ksi u0 (l_e_st_eq_landau_n_rt_rp_4152_r1 ksi z0 lz x0 lx u0 lu i) (l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt ksi y.λv:l_e_st_eq_landau_n_rt_less y x.λw:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).l_e_st_eq_landau_n_rt_rp_4152_t54 ksi z0 lz x0 lx u0 lu i x t w) : l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp z0).
-
-(* constant 2605 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_r3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) z0.(l_e_st_eq_landau_n_rt_rp_tsapp ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) z0 lz (l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4152_r2 ksi z0 lz x t y u v) : l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp z0).
-
-(* constant 2606 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t55 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.(l_e_st_eq_landau_n_rt_rp_lrtrpofrte l_e_st_eq_landau_n_rt_1rt u0 lu : l_e_st_eq_landau_n_rt_less u0 l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2607 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t56 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.(l_e_st_eq_landau_n_rt_satz83 u0 l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_4152_t55 ksi u0 lu) : l_e_st_eq_landau_n_rt_more l_e_st_eq_landau_n_rt_1rt u0).
-
-(* constant 2608 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t57 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.(l_e_st_eq_landau_n_rt_cutapp2b ksi x1 lx1 x2 ux2 : l_e_st_eq_landau_n_rt_more x2 x1).
-
-(* constant 2609 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t58 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_cutapp2a ksi x0 lx x2 ux2 : l_e_st_eq_landau_n_rt_less x0 x2).
-
-(* constant 2610 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t59 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_satz105f x0 x2 (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) (l_e_st_eq_landau_n_rt_rp_4152_t58 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x2)).
-
-(* constant 2611 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t60 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_isless1 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0) (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x2) (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0) i) (l_e_st_eq_landau_n_rt_rp_4152_t59 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x2)).
-
-(* constant 2612 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t61 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_tr4is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x2) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) u0) x2) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x2) x2 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) x1) (l_e_st_eq_landau_n_rt_distpt1 (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) u0 x2) (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) u0) l_e_st_eq_landau_n_rt_1rt x2 (l_e_st_eq_landau_n_rt_satz101e l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu))) (l_e_st_eq_landau_n_rt_example1c x2) (l_e_st_eq_landau_n_rt_satz101f x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x2) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) x1)).
-
-(* constant 2613 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t62 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_satz96c (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x2) (l_e_st_eq_landau_n_rt_ts u0 x2) (l_e_st_eq_landau_n_rt_rp_4152_t60 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x2) (l_e_st_eq_landau_n_rt_ts u0 x2))).
-
-(* constant 2614 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t63 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x2) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) x1) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_rp_4152_t61 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) (l_e_st_eq_landau_n_rt_rp_4152_t62 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) x1)).
-
-(* constant 2615 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t64 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts u0 x2) (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2))) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) x1) (l_e_st_eq_landau_n_rt_pl x1 (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2))) (l_e_st_eq_landau_n_rt_compl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_compl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) x1) (l_e_st_eq_landau_n_rt_rp_4152_t63 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts u0 x2) (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2))) (l_e_st_eq_landau_n_rt_pl x1 (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)))).
-
-(* constant 2616 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t65 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_satz97c (l_e_st_eq_landau_n_rt_ts u0 x2) x1 (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_rp_4152_t64 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts u0 x2) x1).
-
-(* constant 2617 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t66 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) u0) x2) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x2) x2 (l_e_st_eq_landau_n_rt_assts2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) u0 x2) (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) u0) l_e_st_eq_landau_n_rt_1rt x2 (l_e_st_eq_landau_n_rt_satz110e l_e_st_eq_landau_n_rt_1rt u0)) (l_e_st_eq_landau_n_rt_example1c x2) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) (l_e_st_eq_landau_n_rt_ts u0 x2)) x2).
-
-(* constant 2618 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t67 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) (l_e_st_eq_landau_n_rt_ts u0 x2)) x2 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) x1) (l_e_st_eq_landau_n_rt_ov x1 u0) (l_e_st_eq_landau_n_rt_rp_4152_t66 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) (l_e_st_eq_landau_n_rt_satz141b x1 u0) (l_e_st_eq_landau_n_rt_satz105f (l_e_st_eq_landau_n_rt_ts u0 x2) x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) (l_e_st_eq_landau_n_rt_rp_4152_t65 ksi u0 lu x0 lx x1 lx1 x2 ux2 i)) : l_e_st_eq_landau_n_rt_less x2 (l_e_st_eq_landau_n_rt_ov x1 u0)).
-
-(* constant 2619 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t68 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_rp_satz119a ksi x2 ux2 (l_e_st_eq_landau_n_rt_ov x1 u0) (l_e_st_eq_landau_n_rt_rp_4152_t67 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_ov x1 u0)).
-
-(* constant 2620 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t69 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_satz110e x1 u0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov x1 u0) u0) x1).
-
-(* constant 2621 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t70 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_ov x1 (l_e_st_eq_landau_n_rt_ov x1 u0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0)) x1) (l_e_st_eq_landau_n_rt_ts x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0))) (l_e_st_eq_landau_n_rt_satz110g x1 (l_e_st_eq_landau_n_rt_ov x1 u0) u0 (l_e_st_eq_landau_n_rt_rp_4152_t69 ksi u0 lu x0 lx x1 lx1 x2 ux2 i)) (l_e_st_eq_landau_n_rt_satz141c x1 (l_e_st_eq_landau_n_rt_ov x1 u0)) (l_e_st_eq_landau_n_rt_comts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0)) x1) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0)))).
-
-(* constant 2622 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t71 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_rp_4152_inv1 ksi (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0)) (l_e_st_eq_landau_n_rt_ov x1 u0) (l_e_st_eq_landau_n_rt_rp_4152_t68 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) x2 ux2 (l_e_st_eq_landau_n_rt_rp_4152_t67 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0))) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0)) (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2623 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t72 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_rp_ine (l_e_st_eq_landau_n_rt_rp_4152_inv ksi) (l_e_st_eq_landau_n_rt_rp_4152_t50 ksi) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0)) (l_e_st_eq_landau_n_rt_rp_4152_t71 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0))).
-
-(* constant 2624 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t73 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_rp_lrtts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) u0 x1 lx1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0)) (l_e_st_eq_landau_n_rt_rp_4152_t72 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) (l_e_st_eq_landau_n_rt_rp_4152_t70 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) u0).
-
-(* constant 2625 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t74 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_e_st_eq_landau_n_rt_rp_satz132app ksi (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) u0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt ksi y.λv:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).l_e_st_eq_landau_n_rt_rp_4152_t73 ksi u0 lu x0 lx x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) u0).
-
-(* constant 2626 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t75 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.(l_e_st_eq_landau_n_rt_cutapp1a ksi (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_rp_4152_t74 ksi u0 lu x t) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) u0).
-
-(* constant 2627 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t76 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) l_e_st_eq_landau_n_rt_rp_1rp (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) x.l_e_st_eq_landau_n_rt_rp_4152_r3 ksi x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp x.l_e_st_eq_landau_n_rt_rp_4152_t75 ksi x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2628 *)
-definition l_e_st_eq_landau_n_rt_rp_satz152 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_somei l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi t) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) (l_e_st_eq_landau_n_rt_rp_4152_t76 ksi) : l_e_st_eq_landau_n_rt_rp_some (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi c) l_e_st_eq_landau_n_rt_rp_1rp)).
-
-(* constant 2629 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more phi psi.(l_e_st_eq_landau_n_rt_rp_satz145d phi psi eta m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)).
-
-(* constant 2630 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more phi psi.(l_ec3e21 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_4153_t1 ksi eta phi psi m) : l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)).
-
-(* constant 2631 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less phi psi.(l_e_st_eq_landau_n_rt_rp_satz145f phi psi eta l : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)).
-
-(* constant 2632 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less phi psi.(l_ec3e31 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_4153_t3 ksi eta phi psi l) : l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)).
-
-(* constant 2633 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_nis phi psi.(l_or3_th1 (l_e_st_eq_landau_n_rt_rp_is phi psi) (l_e_st_eq_landau_n_rt_rp_more phi psi) (l_e_st_eq_landau_n_rt_rp_less phi psi) (l_e_st_eq_landau_n_rt_rp_satz123a phi psi) n : l_or (l_e_st_eq_landau_n_rt_rp_more phi psi) (l_e_st_eq_landau_n_rt_rp_less phi psi)).
-
-(* constant 2634 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_nis phi psi.(l_orapp (l_e_st_eq_landau_n_rt_rp_more phi psi) (l_e_st_eq_landau_n_rt_rp_less phi psi) (l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_4153_t5 ksi eta phi psi n) (λt:l_e_st_eq_landau_n_rt_rp_more phi psi.l_e_st_eq_landau_n_rt_rp_4153_t2 ksi eta phi psi t) (λt:l_e_st_eq_landau_n_rt_rp_less phi psi.l_e_st_eq_landau_n_rt_rp_4153_t4 ksi eta phi psi t) : l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)).
-
-(* constant 2635 *)
-definition l_e_st_eq_landau_n_rt_rp_satz153b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta phi) ksi.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta psi) ksi.(l_imp_th7 (l_e_st_eq_landau_n_rt_rp_is phi psi) (l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_weli (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi) ksi i j)) (λt:l_e_st_eq_landau_n_rt_rp_nis phi psi.l_e_st_eq_landau_n_rt_rp_4153_t6 ksi eta phi psi t) : l_e_st_eq_landau_n_rt_rp_is phi psi).
-
-(* constant 2636 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_chi ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λtau:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta tau) l_e_st_eq_landau_n_rt_rp_1rp.(l_e_st_eq_landau_n_rt_rp_ts tau ksi : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2637 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λtau:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta tau) l_e_st_eq_landau_n_rt_rp_1rp.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_4153_chi ksi eta tau i)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts eta tau) ksi) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_1rp ksi) ksi (l_e_st_eq_landau_n_rt_rp_assts2 eta tau ksi) (l_e_st_eq_landau_n_rt_rp_ists1 (l_e_st_eq_landau_n_rt_rp_ts eta tau) l_e_st_eq_landau_n_rt_rp_1rp ksi i) (l_e_st_eq_landau_n_rt_rp_satz151b ksi) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_4153_chi ksi eta tau i)) ksi).
-
-(* constant 2638 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λtau:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta tau) l_e_st_eq_landau_n_rt_rp_1rp.(l_somei l_e_st_eq_landau_n_rt_cut (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) ksi) (l_e_st_eq_landau_n_rt_rp_4153_chi ksi eta tau i) (l_e_st_eq_landau_n_rt_rp_4153_t7 ksi eta tau i) : l_e_st_eq_landau_n_rt_rp_some (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) ksi)).
-
-(* constant 2639 *)
-definition l_e_st_eq_landau_n_rt_rp_satz153a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_someapp l_e_st_eq_landau_n_rt_cut (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_satz152 eta) (l_e_st_eq_landau_n_rt_rp_some (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) ksi)) (λc:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) l_e_st_eq_landau_n_rt_rp_1rp.l_e_st_eq_landau_n_rt_rp_4153_t8 ksi eta c t) : l_e_st_eq_landau_n_rt_rp_some (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) ksi)).
-
-(* constant 2640 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(λc:l_e_st_eq_landau_n_rt_cut.λd:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) ksi.λu:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta d) ksi.l_e_st_eq_landau_n_rt_rp_satz153b ksi eta c d t u : l_e_amone l_e_st_eq_landau_n_rt_cut (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) ksi)).
-
-(* constant 2641 *)
-definition l_e_st_eq_landau_n_rt_rp_satz153 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_onei l_e_st_eq_landau_n_rt_cut (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) ksi) (l_e_st_eq_landau_n_rt_rp_4153_t9 ksi eta) (l_e_st_eq_landau_n_rt_rp_satz153a ksi eta) : l_e_st_eq_landau_n_rt_rp_one (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) ksi)).
-
-(* constant 2642 *)
-definition l_e_st_eq_landau_n_rt_rp_ov ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_ind l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta a) ksi) (l_e_st_eq_landau_n_rt_rp_satz153 ksi eta) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2643 *)
-definition l_e_st_eq_landau_n_rt_rp_satz153c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_oneax l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta a) ksi) (l_e_st_eq_landau_n_rt_rp_satz153 ksi eta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_ov ksi eta)) ksi).
-
-(* constant 2644 *)
-definition l_e_st_eq_landau_n_rt_rp_satz153d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_ov ksi eta)) ksi (l_e_st_eq_landau_n_rt_rp_satz153c ksi eta) : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_ov ksi eta))).
-
-(* constant 2645 *)
-definition l_e_st_eq_landau_n_rt_rp_satz153e ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ov ksi eta) eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_ov ksi eta)) ksi (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_ov ksi eta) eta) (l_e_st_eq_landau_n_rt_rp_satz153c ksi eta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ov ksi eta) eta) ksi).
-
-(* constant 2646 *)
-definition l_e_st_eq_landau_n_rt_rp_satz153f ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ov ksi eta) eta) ksi (l_e_st_eq_landau_n_rt_rp_satz153e ksi eta) : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ov ksi eta) eta)).
-
-(* constant 2647 *)
-definition l_e_st_eq_landau_n_rt_rp_satz153g ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta phi) ksi.(l_e_st_eq_landau_n_rt_rp_satz153b ksi eta phi (l_e_st_eq_landau_n_rt_rp_ov ksi eta) i (l_e_st_eq_landau_n_rt_rp_satz153c ksi eta) : l_e_st_eq_landau_n_rt_rp_is phi (l_e_st_eq_landau_n_rt_rp_ov ksi eta)).
-
-(* constant 2648 *)
-definition l_e_st_eq_landau_n_rt_rp_ratrp ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_image l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi : Prop).
-
-(* constant 2649 *)
-definition l_e_st_eq_landau_n_rt_rp_ratrpi ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_imagei l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) x0 : l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).
-
-(* constant 2650 *)
-definition l_e_st_eq_landau_n_rt_rp_rpofnt ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rtofn x) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2651 *)
-definition l_e_st_eq_landau_n_rt_rp_natrp ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_image l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt x) ksi : Prop).
-
-(* constant 2652 *)
-definition l_e_st_eq_landau_n_rt_rp_natrpi ≝ λx:l_e_st_eq_landau_n_nat.(l_e_imagei l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt y) x : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofnt x)).
-
-(* constant 2653 *)
-definition l_e_st_eq_landau_n_rt_rp_iii5_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp ksi.λx:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofnt x).(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofrt y)) (l_e_st_eq_landau_n_rt_rtofn x) i : l_e_st_eq_landau_n_rt_rp_ratrp ksi).
-
-(* constant 2654 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmaiii5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp ksi.(l_someapp l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofnt x)) n (l_e_st_eq_landau_n_rt_rp_ratrp ksi) (λx:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofnt x).l_e_st_eq_landau_n_rt_rp_iii5_t1 ksi n x t) : l_e_st_eq_landau_n_rt_rp_ratrp ksi).
-
-(* constant 2655 *)
-definition l_e_st_eq_landau_n_rt_rp_5154_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_rp_lrtrpofrt x0 y0 (l_e_st_eq_landau_n_rt_satz82 x0 y0 m) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) y0).
-
-(* constant 2656 *)
-definition l_e_st_eq_landau_n_rt_rp_5154_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_rp_urtrpofrt y0 y0 (l_e_st_eq_landau_n_rt_moreisi2 y0 y0 (l_e_refis l_e_st_eq_landau_n_rt_rat y0)) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) y0).
-
-(* constant 2657 *)
-definition l_e_st_eq_landau_n_rt_rp_5154_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_andi (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) y0) (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) y0) (l_e_st_eq_landau_n_rt_rp_5154_t1 x0 y0 m) (l_e_st_eq_landau_n_rt_rp_5154_t2 x0 y0 m) : l_and (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) y0) (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) y0)).
-
-(* constant 2658 *)
-definition l_e_st_eq_landau_n_rt_rp_satz154a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) x) (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) x)) y0 (l_e_st_eq_landau_n_rt_rp_5154_t3 x0 y0 m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)).
-
-(* constant 2659 *)
-definition l_e_st_eq_landau_n_rt_rp_satz154b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_isf l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) x0 y0 i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)).
-
-(* constant 2660 *)
-definition l_e_st_eq_landau_n_rt_rp_satz154c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_satz154a y0 x0 (l_e_st_eq_landau_n_rt_satz83 x0 y0 l)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)).
-
-(* constant 2661 *)
-definition l_e_st_eq_landau_n_rt_rp_5154_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz81a x0 y0 : l_or3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 2662 *)
-definition l_e_st_eq_landau_n_rt_rp_5154_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) : l_ec3 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0))).
-
-(* constant 2663 *)
-definition l_e_st_eq_landau_n_rt_rp_satz154d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_ec3_th11 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_5154_t4 x0 y0) (l_e_st_eq_landau_n_rt_rp_5154_t5 x0 y0) (λu:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_rt_rp_satz154b x0 y0 u) (λu:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_rp_satz154a x0 y0 u) (λu:l_e_st_eq_landau_n_rt_less x0 y0.l_e_st_eq_landau_n_rt_rp_satz154c x0 y0 u) m : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 2664 *)
-definition l_e_st_eq_landau_n_rt_rp_satz154e ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_ec3_th10 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_5154_t4 x0 y0) (l_e_st_eq_landau_n_rt_rp_5154_t5 x0 y0) (λu:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_rt_rp_satz154b x0 y0 u) (λu:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_rp_satz154a x0 y0 u) (λu:l_e_st_eq_landau_n_rt_less x0 y0.l_e_st_eq_landau_n_rt_rp_satz154c x0 y0 u) i : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 2665 *)
-definition l_e_st_eq_landau_n_rt_rp_satz154f ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_ec3_th12 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_5154_t4 x0 y0) (l_e_st_eq_landau_n_rt_rp_5154_t5 x0 y0) (λu:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_rt_rp_satz154b x0 y0 u) (λu:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_rp_satz154a x0 y0 u) (λu:l_e_st_eq_landau_n_rt_less x0 y0.l_e_st_eq_landau_n_rt_rp_satz154c x0 y0 u) l : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 2666 *)
-definition l_e_st_eq_landau_n_rt_rp_iii5_t2 ≝ (λx:l_e_st_eq_landau_n_rt_rat.λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt y).l_e_st_eq_landau_n_rt_rp_satz154e x y t : l_e_injective l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x)).
-
-(* constant 2667 *)
-definition l_e_st_eq_landau_n_rt_rp_isrterp ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_rp_satz154b x0 y0 i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)).
-
-(* constant 2668 *)
-definition l_e_st_eq_landau_n_rt_rp_isrtirp ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_e_st_eq_landau_n_rt_rp_satz154e x0 y0 i : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 2669 *)
-definition l_e_st_eq_landau_n_rt_rp_rtofrp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_soft l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) l_e_st_eq_landau_n_rt_rp_iii5_t2 ksi rtksi : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2670 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpert ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λrteta:l_e_st_eq_landau_n_rt_rp_ratrp eta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isinv l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) l_e_st_eq_landau_n_rt_rp_iii5_t2 ksi rtksi eta rteta i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rp_rtofrp ksi rtksi) (l_e_st_eq_landau_n_rt_rp_rtofrp eta rteta)).
-
-(* constant 2671 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpirt ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λrteta:l_e_st_eq_landau_n_rt_rp_ratrp eta.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rp_rtofrp ksi rtksi) (l_e_st_eq_landau_n_rt_rp_rtofrp eta rteta).(l_e_isinve l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) l_e_st_eq_landau_n_rt_rp_iii5_t2 ksi rtksi eta rteta i : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 2672 *)
-definition l_e_st_eq_landau_n_rt_rp_isrtrp1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_isst1 l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) l_e_st_eq_landau_n_rt_rp_iii5_t2 x0 : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_rp_rtofrp (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0))).
-
-(* constant 2673 *)
-definition l_e_st_eq_landau_n_rt_rp_isrtrp2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_isst2 l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) l_e_st_eq_landau_n_rt_rp_iii5_t2 x0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rp_rtofrp (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0)) x0).
-
-(* constant 2674 *)
-definition l_e_st_eq_landau_n_rt_rp_isrprt1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_ists1 l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) l_e_st_eq_landau_n_rt_rp_iii5_t2 ksi rtksi : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_rtofrp ksi rtksi))).
-
-(* constant 2675 *)
-definition l_e_st_eq_landau_n_rt_rp_isrprt2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_ists2 l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) l_e_st_eq_landau_n_rt_rp_iii5_t2 ksi rtksi : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_rtofrp ksi rtksi)) ksi).
-
-(* constant 2676 *)
-definition l_e_st_eq_landau_n_rt_rp_isnterp ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt z) x y i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)).
-
-(* constant 2677 *)
-definition l_e_st_eq_landau_n_rt_rp_isntirp ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y).(l_e_st_eq_landau_n_rt_isnirt x y (l_e_st_eq_landau_n_rt_rp_isrtirp (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y) i) : l_e_st_eq_landau_n_is x y).
-
-(* constant 2678 *)
-definition l_e_st_eq_landau_n_rt_rp_iii5_t3 ≝ (λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y).l_e_st_eq_landau_n_rt_rp_isntirp x y t : l_e_injective l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt x)).
-
-(* constant 2679 *)
-definition l_e_st_eq_landau_n_rt_rp_ntofrp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λntksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.(l_e_soft l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt x) l_e_st_eq_landau_n_rt_rp_iii5_t3 ksi ntksi : l_e_st_eq_landau_n_nat).
-
-(* constant 2680 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpent ≝ λksi:l_e_st_eq_landau_n_rt_cut.λntksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λnteta:l_e_st_eq_landau_n_rt_rp_natrp eta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isinv l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt x) l_e_st_eq_landau_n_rt_rp_iii5_t3 ksi ntksi eta nteta i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_ntofrp ksi ntksi) (l_e_st_eq_landau_n_rt_rp_ntofrp eta nteta)).
-
-(* constant 2681 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpint ≝ λksi:l_e_st_eq_landau_n_rt_cut.λntksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λnteta:l_e_st_eq_landau_n_rt_rp_natrp eta.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_ntofrp ksi ntksi) (l_e_st_eq_landau_n_rt_rp_ntofrp eta nteta).(l_e_isinve l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt x) l_e_st_eq_landau_n_rt_rp_iii5_t3 ksi ntksi eta nteta i : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 2682 *)
-definition l_e_st_eq_landau_n_rt_rp_isntrp1 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_isst1 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt y) l_e_st_eq_landau_n_rt_rp_iii5_t3 x : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_rt_rp_ntofrp (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x))).
-
-(* constant 2683 *)
-definition l_e_st_eq_landau_n_rt_rp_isntrp2 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_isst2 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt y) l_e_st_eq_landau_n_rt_rp_iii5_t3 x : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_ntofrp (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x)) x).
-
-(* constant 2684 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpnt1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λntksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.(l_e_ists1 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt x) l_e_st_eq_landau_n_rt_rp_iii5_t3 ksi ntksi : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_ntofrp ksi ntksi))).
-
-(* constant 2685 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpnt2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λntksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.(l_e_ists2 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt x) l_e_st_eq_landau_n_rt_rp_iii5_t3 ksi ntksi : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_ntofrp ksi ntksi)) ksi).
-
-(* constant 2686 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl u0 v0).(l_e_st_eq_landau_n_rt_rp_lrtrpofrte x0 u0 lu : l_e_st_eq_landau_n_rt_less u0 x0).
-
-(* constant 2687 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl u0 v0).(l_e_st_eq_landau_n_rt_rp_lrtrpofrte y0 v0 lv : l_e_st_eq_landau_n_rt_less v0 y0).
-
-(* constant 2688 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl u0 v0).(l_e_st_eq_landau_n_rt_satz98a u0 x0 v0 y0 (l_e_st_eq_landau_n_rt_rp_5155_t1 x0 y0 z0 lz u0 lu v0 lv i) (l_e_st_eq_landau_n_rt_rp_5155_t2 x0 y0 z0 lz u0 lu v0 lv i) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl u0 v0) (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 2689 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl u0 v0).(l_e_st_eq_landau_n_rt_isless1 (l_e_st_eq_landau_n_rt_pl u0 v0) z0 (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_pl u0 v0) i) (l_e_st_eq_landau_n_rt_rp_5155_t3 x0 y0 z0 lz u0 lu v0 lv i) : l_e_st_eq_landau_n_rt_less z0 (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 2690 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl u0 v0).(l_e_st_eq_landau_n_rt_rp_lrtrpofrt (l_e_st_eq_landau_n_rt_pl x0 y0) z0 (l_e_st_eq_landau_n_rt_rp_5155_t4 x0 y0 z0 lz u0 lu v0 lv i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) z0).
-
-(* constant 2691 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t6 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.(l_e_st_eq_landau_n_rt_rp_plapp (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) z0 lz (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_5155_t5 x0 y0 z0 lz x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) z0).
-
-(* constant 2692 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t7 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) u0.(l_e_st_eq_landau_n_rt_rp_lrtrpofrte (l_e_st_eq_landau_n_rt_pl x0 y0) u0 lu : l_e_st_eq_landau_n_rt_less u0 (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 2693 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_u01 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) u0.(l_e_st_eq_landau_n_rt_ov u0 (l_e_st_eq_landau_n_rt_pl x0 y0) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2694 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t8 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) u0.(l_e_st_eq_landau_n_rt_isless12 u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu) (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_satz110f u0 (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_example1d (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_rp_5155_t7 x0 y0 u0 lu) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu) (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_pl x0 y0))).
-
-(* constant 2695 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t9 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) u0.(l_e_st_eq_landau_n_rt_satz106c (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_rp_5155_t8 x0 y0 u0 lu) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2696 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t10 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) u0.(l_e_tris l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu)) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu))) (l_e_st_eq_landau_n_rt_satz110d u0 (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_disttp1 x0 y0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu)) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu)) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu)))).
-
-(* constant 2697 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t11 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 l_e_st_eq_landau_n_rt_1rt.(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_ts y0 x0) (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x0) x0 (l_e_st_eq_landau_n_rt_comts y0 x0) (l_e_st_eq_landau_n_rt_example1c x0) (l_e_st_eq_landau_n_rt_satz105c y0 l_e_st_eq_landau_n_rt_1rt x0 l) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 y0) x0).
-
-(* constant 2698 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 l_e_st_eq_landau_n_rt_1rt.(l_e_st_eq_landau_n_rt_rp_lrtrpofrt x0 (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_rp_5155_t11 x0 y0 l) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2699 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t13 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) u0.(l_e_st_eq_landau_n_rt_rp_lrtpl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) u0 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu)) (l_e_st_eq_landau_n_rt_rp_5155_t12 x0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu) (l_e_st_eq_landau_n_rt_rp_5155_t9 x0 y0 u0 lu)) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu)) (l_e_st_eq_landau_n_rt_rp_5155_t12 y0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu) (l_e_st_eq_landau_n_rt_rp_5155_t9 x0 y0 u0 lu)) (l_e_st_eq_landau_n_rt_rp_5155_t10 x0 y0 u0 lu) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) u0).
-
-(* constant 2700 *)
-definition l_e_st_eq_landau_n_rt_rp_satz155a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) x.l_e_st_eq_landau_n_rt_rp_5155_t13 x0 y0 x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) x.l_e_st_eq_landau_n_rt_rp_5155_t6 x0 y0 x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0))).
-
-(* constant 2701 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t14 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_satz101f x0 y0 m : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0)).
-
-(* constant 2702 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t15 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn x0 y0 m)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_isrterp x0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0) (l_e_st_eq_landau_n_rt_rp_5155_t14 x0 y0 m)) (l_e_st_eq_landau_n_rt_rp_satz155a (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn x0 y0 m)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0))).
-
-(* constant 2703 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t16 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn x0 y0 m))) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn x0 y0 m)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn x0 y0 m))) (l_e_st_eq_landau_n_rt_rp_5155_t15 x0 y0 m) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn x0 y0 m))) (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).
-
-(* constant 2704 *)
-definition l_e_st_eq_landau_n_rt_rp_satz155b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_rp_satz140g (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn x0 y0 m)) (l_e_st_eq_landau_n_rt_rp_satz154a x0 y0 m) (l_e_st_eq_landau_n_rt_rp_5155_t16 x0 y0 m) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn x0 y0 m)) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_satz154a x0 y0 m))).
-
-(* constant 2705 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t17 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts u0 v0).(l_e_st_eq_landau_n_rt_rp_lrtrpofrte x0 u0 lu : l_e_st_eq_landau_n_rt_less u0 x0).
-
-(* constant 2706 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t18 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts u0 v0).(l_e_st_eq_landau_n_rt_rp_lrtrpofrte y0 v0 lv : l_e_st_eq_landau_n_rt_less v0 y0).
-
-(* constant 2707 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t19 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts u0 v0).(l_e_st_eq_landau_n_rt_satz107a u0 x0 v0 y0 (l_e_st_eq_landau_n_rt_rp_5155_t17 x0 y0 z0 lz u0 lu v0 lv i) (l_e_st_eq_landau_n_rt_rp_5155_t18 x0 y0 z0 lz u0 lu v0 lv i) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts u0 v0) (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2708 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t20 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts u0 v0).(l_e_st_eq_landau_n_rt_isless1 (l_e_st_eq_landau_n_rt_ts u0 v0) z0 (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_ts u0 v0) i) (l_e_st_eq_landau_n_rt_rp_5155_t19 x0 y0 z0 lz u0 lu v0 lv i) : l_e_st_eq_landau_n_rt_less z0 (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2709 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t21 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts u0 v0).(l_e_st_eq_landau_n_rt_rp_lrtrpofrt (l_e_st_eq_landau_n_rt_ts x0 y0) z0 (l_e_st_eq_landau_n_rt_rp_5155_t20 x0 y0 z0 lz u0 lu v0 lv i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) z0).
-
-(* constant 2710 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t22 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.(l_e_st_eq_landau_n_rt_rp_tsapp (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) z0 lz (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_5155_t21 x0 y0 z0 lz x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) z0).
-
-(* constant 2711 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t23 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.(l_e_st_eq_landau_n_rt_rp_lrtrpofrte (l_e_st_eq_landau_n_rt_ts x0 y0) u0 lu : l_e_st_eq_landau_n_rt_less u0 (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2712 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t24 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.λu1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).(l_ande1 (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)) a : l_e_st_eq_landau_n_rt_less u0 u1).
-
-(* constant 2713 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t25 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.λu1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).(l_ande2 (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)) a : l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2714 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t26 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.λu1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).(l_e_st_eq_landau_n_rt_isless12 u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov u0 u1) u1) u1 (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt u1) (l_e_st_eq_landau_n_rt_satz110f u0 u1) (l_e_st_eq_landau_n_rt_example1d u1) (l_e_st_eq_landau_n_rt_rp_5155_t24 x0 y0 u0 lu u1 a) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov u0 u1) u1) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt u1)).
-
-(* constant 2715 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t27 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.λu1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).(l_e_st_eq_landau_n_rt_satz106c (l_e_st_eq_landau_n_rt_ov u0 u1) l_e_st_eq_landau_n_rt_1rt u1 (l_e_st_eq_landau_n_rt_rp_5155_t26 x0 y0 u0 lu u1 a) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ov u0 u1) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2716 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t28 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.λu1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).(l_e_st_eq_landau_n_rt_isless1 u1 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov u1 y0) y0) (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_satz110f u1 y0) (l_e_st_eq_landau_n_rt_rp_5155_t25 x0 y0 u0 lu u1 a) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov u1 y0) y0) (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2717 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t29 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.λu1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).(l_e_st_eq_landau_n_rt_satz106c (l_e_st_eq_landau_n_rt_ov u1 y0) x0 y0 (l_e_st_eq_landau_n_rt_rp_5155_t28 x0 y0 u0 lu u1 a) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ov u1 y0) x0).
-
-(* constant 2718 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t30 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.λu1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).(l_e_tr3is l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_ts u1 (l_e_st_eq_landau_n_rt_ov u0 u1)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov u1 y0) y0) (l_e_st_eq_landau_n_rt_ov u0 u1)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov u1 y0) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov u0 u1))) (l_e_st_eq_landau_n_rt_satz110d u0 u1) (l_e_st_eq_landau_n_rt_ists1 u1 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov u1 y0) y0) (l_e_st_eq_landau_n_rt_ov u0 u1) (l_e_st_eq_landau_n_rt_satz110f u1 y0)) (l_e_st_eq_landau_n_rt_assts1 (l_e_st_eq_landau_n_rt_ov u1 y0) y0 (l_e_st_eq_landau_n_rt_ov u0 u1)) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov u1 y0) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov u0 u1)))).
-
-(* constant 2719 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t31 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.λu1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).(l_e_st_eq_landau_n_rt_rp_lrtts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) u0 (l_e_st_eq_landau_n_rt_ov u1 y0) (l_e_st_eq_landau_n_rt_rp_lrtrpofrt x0 (l_e_st_eq_landau_n_rt_ov u1 y0) (l_e_st_eq_landau_n_rt_rp_5155_t29 x0 y0 u0 lu u1 a)) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov u0 u1)) (l_e_st_eq_landau_n_rt_rp_5155_t12 y0 (l_e_st_eq_landau_n_rt_ov u0 u1) (l_e_st_eq_landau_n_rt_rp_5155_t27 x0 y0 u0 lu u1 a)) (l_e_st_eq_landau_n_rt_rp_5155_t30 x0 y0 u0 lu u1 a) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) u0).
-
-(* constant 2720 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t32 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less u0 x) (l_e_st_eq_landau_n_rt_less x (l_e_st_eq_landau_n_rt_ts x0 y0))) (l_e_st_eq_landau_n_rt_satz91 u0 (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_rp_5155_t23 x0 y0 u0 lu)) (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_and (l_e_st_eq_landau_n_rt_less u0 x) (l_e_st_eq_landau_n_rt_less x (l_e_st_eq_landau_n_rt_ts x0 y0)).l_e_st_eq_landau_n_rt_rp_5155_t31 x0 y0 u0 lu x t) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) u0).
-
-(* constant 2721 *)
-definition l_e_st_eq_landau_n_rt_rp_satz155c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) x.l_e_st_eq_landau_n_rt_rp_5155_t32 x0 y0 x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) x.l_e_st_eq_landau_n_rt_rp_5155_t22 x0 y0 x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0))).
-
-(* constant 2722 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t33 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz110f x0 y0 : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov x0 y0) y0)).
-
-(* constant 2723 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t34 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov x0 y0) y0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ov x0 y0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_isrterp x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov x0 y0) y0) (l_e_st_eq_landau_n_rt_rp_5155_t33 x0 y0)) (l_e_st_eq_landau_n_rt_rp_satz155c (l_e_st_eq_landau_n_rt_ov x0 y0) y0) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ov x0 y0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0))).
-
-(* constant 2724 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t35 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ov x0 y0))) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ov x0 y0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ov x0 y0))) (l_e_st_eq_landau_n_rt_rp_5155_t34 x0 y0) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ov x0 y0))) (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).
-
-(* constant 2725 *)
-definition l_e_st_eq_landau_n_rt_rp_satz155d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_satz153g (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ov x0 y0)) (l_e_st_eq_landau_n_rt_rp_5155_t35 x0 y0) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ov x0 y0)) (l_e_st_eq_landau_n_rt_rp_ov (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0))).
-
-(* constant 2726 *)
-definition l_e_st_eq_landau_n_rt_rp_satz155e ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)) (l_e_st_eq_landau_n_rt_rp_isrterp (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_satz112h x y))) (l_e_st_eq_landau_n_rt_rp_satz155a (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y))).
-
-(* constant 2727 *)
-definition l_e_st_eq_landau_n_rt_rp_satz155f ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)) (l_e_st_eq_landau_n_rt_rp_isrterp (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_satz112j x y))) (l_e_st_eq_landau_n_rt_rp_satz155c (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y))).
-
-(* constant 2728 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_natt ≝ (l_e_ot l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) : Type[0]).
-
-(* constant 2729 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_nttofrp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.(l_e_out l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) ksi nksi : l_e_st_eq_landau_n_rt_rp_nt_natt).
-
-(* constant 2730 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_is ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λyt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_is l_e_st_eq_landau_n_rt_rp_nt_natt xt yt : Prop).
-
-(* constant 2731 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_nis ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λyt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_not (l_e_st_eq_landau_n_rt_rp_nt_is xt yt) : Prop).
-
-(* constant 2732 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_all ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_nt_natt.Prop.(l_all l_e_st_eq_landau_n_rt_rp_nt_natt p : Prop).
-
-(* constant 2733 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_some ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_nt_natt.Prop.(l_some l_e_st_eq_landau_n_rt_rp_nt_natt p : Prop).
-
-(* constant 2734 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_one ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_nt_natt.Prop.(l_e_one l_e_st_eq_landau_n_rt_rp_nt_natt p : Prop).
-
-(* constant 2735 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_in ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λst:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_st_esti l_e_st_eq_landau_n_rt_rp_nt_natt xt st : Prop).
-
-(* constant 2736 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_rpofntt ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_in l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) xt : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2737 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_natrpi ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_inp l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) xt : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt)).
-
-(* constant 2738 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isrpentt ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λneta:l_e_st_eq_landau_n_rt_rp_natrp eta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isouti l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) ksi nksi eta neta i : l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_nttofrp ksi nksi) (l_e_st_eq_landau_n_rt_rp_nt_nttofrp eta neta)).
-
-(* constant 2739 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isrpintt ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λneta:l_e_st_eq_landau_n_rt_rp_natrp eta.λi:l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_nttofrp ksi nksi) (l_e_st_eq_landau_n_rt_rp_nt_nttofrp eta neta).(l_e_isoute l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) ksi nksi eta neta i : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 2740 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isntterp ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λyt:l_e_st_eq_landau_n_rt_rp_nt_natt.λi:l_e_st_eq_landau_n_rt_rp_nt_is xt yt.(l_e_isini l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) xt yt i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_rpofntt yt)).
-
-(* constant 2741 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isnttirp ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λyt:l_e_st_eq_landau_n_rt_rp_nt_natt.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_rpofntt yt).(l_e_isine l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) xt yt i : l_e_st_eq_landau_n_rt_rp_nt_is xt yt).
-
-(* constant 2742 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isrpntt1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.(l_e_isinout l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) ksi nksi : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_nt_rpofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofrp ksi nksi))).
-
-(* constant 2743 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isnttrp1 ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_isoutin l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) xt : l_e_st_eq_landau_n_rt_rp_nt_is xt (l_e_st_eq_landau_n_rt_rp_nt_nttofrp (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi xt))).
-
-(* constant 2744 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_nttofnt ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_nt_nttofrp (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x) : l_e_st_eq_landau_n_rt_rp_nt_natt).
-
-(* constant 2745 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isntentt ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_rt_rp_nt_isrpentt (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x) (l_e_st_eq_landau_n_rt_rp_rpofnt y) (l_e_st_eq_landau_n_rt_rp_natrpi y) (l_e_st_eq_landau_n_rt_rp_isnterp x y i) : l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x) (l_e_st_eq_landau_n_rt_rp_nt_nttofnt y)).
-
-(* constant 2746 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isntintt ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x) (l_e_st_eq_landau_n_rt_rp_nt_nttofnt y).(l_e_st_eq_landau_n_rt_rp_isntirp x y (l_e_st_eq_landau_n_rt_rp_nt_isrpintt (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x) (l_e_st_eq_landau_n_rt_rp_rpofnt y) (l_e_st_eq_landau_n_rt_rp_natrpi y) i) : l_e_st_eq_landau_n_is x y).
-
-(* constant 2747 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_ntofntt ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_st_eq_landau_n_rt_rp_ntofrp (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi xt) : l_e_st_eq_landau_n_nat).
-
-(* constant 2748 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isnttent ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λyt:l_e_st_eq_landau_n_rt_rp_nt_natt.λi:l_e_st_eq_landau_n_rt_rp_nt_is xt yt.(l_e_st_eq_landau_n_rt_rp_isrpent (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi xt) (l_e_st_eq_landau_n_rt_rp_nt_rpofntt yt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi yt) (l_e_st_eq_landau_n_rt_rp_nt_isntterp xt yt i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_ntofntt yt)).
-
-(* constant 2749 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isnttint ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λyt:l_e_st_eq_landau_n_rt_rp_nt_natt.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_ntofntt yt).(l_e_st_eq_landau_n_rt_rp_nt_isnttirp xt yt (l_e_st_eq_landau_n_rt_rp_isrpint (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi xt) (l_e_st_eq_landau_n_rt_rp_nt_rpofntt yt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi yt) i) : l_e_st_eq_landau_n_rt_rp_nt_is xt yt).
-
-(* constant 2750 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_iii5_t5 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_nt_isrpntt1 (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_nt_rpofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x))).
-
-(* constant 2751 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_iii5_t6 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_isrpent (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x) (l_e_st_eq_landau_n_rt_rp_nt_rpofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x)) (l_e_st_eq_landau_n_rt_rp_nt_natrpi (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x)) (l_e_st_eq_landau_n_rt_rp_nt_iii5_t5 x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_ntofrp (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x)) (l_e_st_eq_landau_n_rt_rp_nt_ntofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x))).
-
-(* constant 2752 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isntntt1 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_rt_rp_ntofrp (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x)) (l_e_st_eq_landau_n_rt_rp_nt_ntofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x)) (l_e_st_eq_landau_n_rt_rp_isntrp1 x) (l_e_st_eq_landau_n_rt_rp_nt_iii5_t6 x) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_rt_rp_nt_ntofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x))).
-
-(* constant 2753 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_iii5_t7 ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_st_eq_landau_n_rt_rp_isrpnt1 (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi xt) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt))).
-
-(* constant 2754 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_iii5_t8 ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_st_eq_landau_n_rt_rp_nt_isrpentt (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi xt) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) (l_e_st_eq_landau_n_rt_rp_natrpi (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) (l_e_st_eq_landau_n_rt_rp_nt_iii5_t7 xt) : l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_nttofrp (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi xt)) (l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt))).
-
-(* constant 2755 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isnttnt1 ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_tris l_e_st_eq_landau_n_rt_rp_nt_natt xt (l_e_st_eq_landau_n_rt_rp_nt_nttofrp (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi xt)) (l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) (l_e_st_eq_landau_n_rt_rp_nt_isnttrp1 xt) (l_e_st_eq_landau_n_rt_rp_nt_iii5_t8 xt) : l_e_st_eq_landau_n_rt_rp_nt_is xt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt))).
-
-(* constant 2756 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isntntt2 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_rt_rp_nt_ntofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x)) (l_e_st_eq_landau_n_rt_rp_nt_isntntt1 x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_nt_ntofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x)) x).
-
-(* constant 2757 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isnttnt2 ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_symis l_e_st_eq_landau_n_rt_rp_nt_natt xt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) (l_e_st_eq_landau_n_rt_rp_nt_isnttnt1 xt) : l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) xt).
-
-(* constant 2758 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_1t ≝ (l_e_st_eq_landau_n_rt_rp_nt_nttofnt l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_rt_rp_nt_natt).
-
-(* constant 2759 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_suct ≝ (λx:l_e_st_eq_landau_n_rt_rp_nt_natt.l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_nt_ntofntt x)) : Πx:l_e_st_eq_landau_n_rt_rp_nt_natt.l_e_st_eq_landau_n_rt_rp_nt_natt).
-
-(* constant 2760 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_5156_t1 ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λj:l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_suct xt) l_e_st_eq_landau_n_rt_rp_nt_1t.(l_e_st_eq_landau_n_rt_rp_nt_isntintt (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) l_e_st_eq_landau_n_1 j : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) l_e_st_eq_landau_n_1).
-
-(* constant 2761 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_satz156a ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_suct xt) l_e_st_eq_landau_n_rt_rp_nt_1t) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ax3 (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) (λt:l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_suct xt) l_e_st_eq_landau_n_rt_rp_nt_1t.l_e_st_eq_landau_n_rt_rp_nt_5156_t1 xt t) : l_e_st_eq_landau_n_rt_rp_nt_nis (l_e_st_eq_landau_n_rt_rp_nt_suct xt) l_e_st_eq_landau_n_rt_rp_nt_1t).
-
-(* constant 2762 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_5156_t2 ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λyt:l_e_st_eq_landau_n_rt_rp_nt_natt.λi:l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_suct xt) (l_e_st_eq_landau_n_rt_rp_nt_suct yt).(l_e_st_eq_landau_n_rt_rp_nt_isntintt (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_nt_ntofntt yt)) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_nt_ntofntt yt))).
-
-(* constant 2763 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_satz156b ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λyt:l_e_st_eq_landau_n_rt_rp_nt_natt.λi:l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_suct xt) (l_e_st_eq_landau_n_rt_rp_nt_suct yt).(l_e_st_eq_landau_n_rt_rp_nt_isnttint xt yt (l_e_st_eq_landau_n_ax4 (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_ntofntt yt) (l_e_st_eq_landau_n_rt_rp_nt_5156_t2 xt yt i)) : l_e_st_eq_landau_n_rt_rp_nt_is xt yt).
-
-(* constant 2764 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_cond1 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_st_eq_landau_n_rt_rp_nt_in l_e_st_eq_landau_n_rt_rp_nt_1t st : Prop).
-
-(* constant 2765 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_cond2 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_st_eq_landau_n_rt_rp_nt_all (λx:l_e_st_eq_landau_n_rt_rp_nt_natt.l_imp (l_e_st_eq_landau_n_rt_rp_nt_in x st) (l_e_st_eq_landau_n_rt_rp_nt_in (l_e_st_eq_landau_n_rt_rp_nt_suct x) st)) : Prop).
-
-(* constant 2766 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_5156_prop1 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.λc1:l_e_st_eq_landau_n_rt_rp_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_rp_nt_cond2 st.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_nt_in (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x) st : Prop).
-
-(* constant 2767 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_5156_t3 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.λc1:l_e_st_eq_landau_n_rt_rp_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_rp_nt_cond2 st.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_nt_5156_prop1 st c1 c2 x.(c2 (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x) p : l_e_st_eq_landau_n_rt_rp_nt_in (l_e_st_eq_landau_n_rt_rp_nt_suct (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x)) st).
-
-(* constant 2768 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_5156_t4 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.λc1:l_e_st_eq_landau_n_rt_rp_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_rp_nt_cond2 st.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_nt_5156_prop1 st c1 c2 x.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_nt_in (l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_suc t)) st) (l_e_st_eq_landau_n_rt_rp_nt_ntofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x)) x (l_e_st_eq_landau_n_rt_rp_nt_5156_t3 st c1 c2 x p) (l_e_st_eq_landau_n_rt_rp_nt_isntntt2 x) : l_e_st_eq_landau_n_rt_rp_nt_5156_prop1 st c1 c2 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 2769 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_5156_t5 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.λc1:l_e_st_eq_landau_n_rt_rp_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_rp_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_nt_5156_prop1 st c1 c2 t) c1 (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_rp_nt_5156_prop1 st c1 c2 t.l_e_st_eq_landau_n_rt_rp_nt_5156_t4 st c1 c2 t u) (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt) : l_e_st_eq_landau_n_rt_rp_nt_in (l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) st).
-
-(* constant 2770 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_satz156c ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.λc1:l_e_st_eq_landau_n_rt_rp_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_rp_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_isp l_e_st_eq_landau_n_rt_rp_nt_natt (λt:l_e_st_eq_landau_n_rt_rp_nt_natt.l_e_st_eq_landau_n_rt_rp_nt_in t st) (l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) xt (l_e_st_eq_landau_n_rt_rp_nt_5156_t5 st c1 c2 xt) (l_e_st_eq_landau_n_rt_rp_nt_isnttnt2 xt) : l_e_st_eq_landau_n_rt_rp_nt_in xt st).
-
-(* constant 2771 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_ax3t ≝ (λx:l_e_st_eq_landau_n_rt_rp_nt_natt.l_e_st_eq_landau_n_rt_rp_nt_satz156a x : ∀x:l_e_st_eq_landau_n_rt_rp_nt_natt.l_e_st_eq_landau_n_rt_rp_nt_nis (l_e_st_eq_landau_n_rt_rp_nt_suct x) l_e_st_eq_landau_n_rt_rp_nt_1t).
-
-(* constant 2772 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_ax4t ≝ (λx:l_e_st_eq_landau_n_rt_rp_nt_natt.λy:l_e_st_eq_landau_n_rt_rp_nt_natt.λu:l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_suct x) (l_e_st_eq_landau_n_rt_rp_nt_suct y).l_e_st_eq_landau_n_rt_rp_nt_satz156b x y u : ∀x:l_e_st_eq_landau_n_rt_rp_nt_natt.∀y:l_e_st_eq_landau_n_rt_rp_nt_natt.∀u:l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_suct x) (l_e_st_eq_landau_n_rt_rp_nt_suct y).l_e_st_eq_landau_n_rt_rp_nt_is x y).
-
-(* constant 2773 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_ax5t ≝ (λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.λu:l_e_st_eq_landau_n_rt_rp_nt_cond1 s.λv:l_e_st_eq_landau_n_rt_rp_nt_cond2 s.λx:l_e_st_eq_landau_n_rt_rp_nt_natt.l_e_st_eq_landau_n_rt_rp_nt_satz156c s u v x : ∀s:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.∀u:l_e_st_eq_landau_n_rt_rp_nt_cond1 s.∀v:l_e_st_eq_landau_n_rt_rp_nt_cond2 s.∀x:l_e_st_eq_landau_n_rt_rp_nt_natt.l_e_st_eq_landau_n_rt_rp_nt_in x s).
-
-(* constant 2774 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_ratt ≝ (l_e_ot l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) : Type[0]).
-
-(* constant 2775 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_rttofrp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_out l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) ksi rtksi : l_e_st_eq_landau_n_rt_rp_rtt_ratt).
-
-(* constant 2776 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_is ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λy0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_e_is l_e_st_eq_landau_n_rt_rp_rtt_ratt x0t y0t : Prop).
-
-(* constant 2777 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_nis ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λy0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_not (l_e_st_eq_landau_n_rt_rp_rtt_is x0t y0t) : Prop).
-
-(* constant 2778 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_all ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_rtt_ratt.Prop.(l_all l_e_st_eq_landau_n_rt_rp_rtt_ratt p : Prop).
-
-(* constant 2779 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_some ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_rtt_ratt.Prop.(l_some l_e_st_eq_landau_n_rt_rp_rtt_ratt p : Prop).
-
-(* constant 2780 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_one ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_rtt_ratt.Prop.(l_e_one l_e_st_eq_landau_n_rt_rp_rtt_ratt p : Prop).
-
-(* constant 2781 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_e_in l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) x0t : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2782 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_ratrpi ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_e_inp l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) x0t : l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t)).
-
-(* constant 2783 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrpertt ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λrteta:l_e_st_eq_landau_n_rt_rp_ratrp eta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isouti l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) ksi rtksi eta rteta i : l_e_st_eq_landau_n_rt_rp_rtt_is (l_e_st_eq_landau_n_rt_rp_rtt_rttofrp ksi rtksi) (l_e_st_eq_landau_n_rt_rp_rtt_rttofrp eta rteta)).
-
-(* constant 2784 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrpirtt ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λrteta:l_e_st_eq_landau_n_rt_rp_ratrp eta.λi:l_e_st_eq_landau_n_rt_rp_rtt_is (l_e_st_eq_landau_n_rt_rp_rtt_rttofrp ksi rtksi) (l_e_st_eq_landau_n_rt_rp_rtt_rttofrp eta rteta).(l_e_isoute l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) ksi rtksi eta rteta i : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 2785 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrtterp ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λy0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λi:l_e_st_eq_landau_n_rt_rp_rtt_is x0t y0t.(l_e_isini l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) x0t y0t i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt y0t)).
-
-(* constant 2786 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrttirp ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λy0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt y0t).(l_e_isine l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) x0t y0t i : l_e_st_eq_landau_n_rt_rp_rtt_is x0t y0t).
-
-(* constant 2787 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrprtt1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_isinout l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) ksi rtksi : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt (l_e_st_eq_landau_n_rt_rp_rtt_rttofrp ksi rtksi))).
-
-(* constant 2788 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrttrp1 ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_e_isoutin l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) x0t : l_e_st_eq_landau_n_rt_rp_rtt_is x0t (l_e_st_eq_landau_n_rt_rp_rtt_rttofrp (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi x0t))).
-
-(* constant 2789 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_rttofrt ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rtt_rttofrp (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0) : l_e_st_eq_landau_n_rt_rp_rtt_ratt).
-
-(* constant 2790 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrtertt ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_rp_rtt_isrpertt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_ratrpi y0) (l_e_st_eq_landau_n_rt_rp_isrterp x0 y0 i) : l_e_st_eq_landau_n_rt_rp_rtt_is (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt x0) (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt y0)).
-
-(* constant 2791 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrtirtt ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_rp_rtt_is (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt x0) (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt y0).(l_e_st_eq_landau_n_rt_rp_isrtirp x0 y0 (l_e_st_eq_landau_n_rt_rp_rtt_isrpirtt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_ratrpi y0) i) : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 2792 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_e_st_eq_landau_n_rt_rp_rtofrp (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi x0t) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2793 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrttert ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λy0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λi:l_e_st_eq_landau_n_rt_rp_rtt_is x0t y0t.(l_e_st_eq_landau_n_rt_rp_isrpert (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi x0t) (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt y0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi y0t) (l_e_st_eq_landau_n_rt_rp_rtt_isrtterp x0t y0t i) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt y0t)).
-
-(* constant 2794 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrttirt ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λy0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt y0t).(l_e_st_eq_landau_n_rt_rp_rtt_isrttirp x0t y0t (l_e_st_eq_landau_n_rt_rp_isrpirt (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi x0t) (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt y0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi y0t) i) : l_e_st_eq_landau_n_rt_rp_rtt_is x0t y0t).
-
-(* constant 2795 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_iii5_t9 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rtt_isrprtt1 (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt x0))).
-
-(* constant 2796 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_iii5_t10 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_isrpert (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0) (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt x0)) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt x0)) (l_e_st_eq_landau_n_rt_rp_rtt_iii5_t9 x0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rp_rtofrp (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0)) (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt x0))).
-
-(* constant 2797 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrtrtt1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_tris l_e_st_eq_landau_n_rt_rat x0 (l_e_st_eq_landau_n_rt_rp_rtofrp (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0)) (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt x0)) (l_e_st_eq_landau_n_rt_rp_isrtrp1 x0) (l_e_st_eq_landau_n_rt_rp_rtt_iii5_t10 x0) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt x0))).
-
-(* constant 2798 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_iii5_t11 ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_e_st_eq_landau_n_rt_rp_isrprt1 (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi x0t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt x0t))).
-
-(* constant 2799 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_iii5_t12 ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_e_st_eq_landau_n_rt_rp_rtt_isrpertt (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi x0t) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt x0t)) (l_e_st_eq_landau_n_rt_rp_ratrpi (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt x0t)) (l_e_st_eq_landau_n_rt_rp_rtt_iii5_t11 x0t) : l_e_st_eq_landau_n_rt_rp_rtt_is (l_e_st_eq_landau_n_rt_rp_rtt_rttofrp (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi x0t)) (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt x0t))).
-
-(* constant 2800 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrttrt1 ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_e_tris l_e_st_eq_landau_n_rt_rp_rtt_ratt x0t (l_e_st_eq_landau_n_rt_rp_rtt_rttofrp (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi x0t)) (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt x0t)) (l_e_st_eq_landau_n_rt_rp_rtt_isrttrp1 x0t) (l_e_st_eq_landau_n_rt_rp_rtt_iii5_t12 x0t) : l_e_st_eq_landau_n_rt_rp_rtt_is x0t (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt x0t))).
-
-(* constant 2801 *)
-definition l_e_st_eq_landau_n_rt_rp_example2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz153c l_e_st_eq_landau_n_rt_rp_1rp ksi : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ov l_e_st_eq_landau_n_rt_rp_1rp ksi)) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2802 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_x01 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_st_eq_landau_n_rt_rp_rtofrp ksi rtksi : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2803 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_s1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2804 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi).(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) y0 i : l_e_st_eq_landau_n_rt_urt ksi y0).
-
-(* constant 2805 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi).λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0.(l_e_st_eq_landau_n_rt_rp_lrtrpofrt (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0 (l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0 m) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)) y0).
-
-(* constant 2806 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi).λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0.(l_e_isp l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_lrt x y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)) ksi (l_e_st_eq_landau_n_rt_rp_5157_t2 ksi rtksi y0 i m) (l_e_st_eq_landau_n_rt_rp_isrprt2 ksi rtksi) : l_e_st_eq_landau_n_rt_lrt ksi y0).
-
-(* constant 2807 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi).(l_imp_th3 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0) (l_e_st_eq_landau_n_rt_lrt ksi y0) (l_e_st_eq_landau_n_rt_rp_5157_t1 ksi rtksi y0 i) (λt:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0.l_e_st_eq_landau_n_rt_rp_5157_t3 ksi rtksi y0 i t) : l_not (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0)).
-
-(* constant 2808 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi).(l_e_st_eq_landau_n_rt_satz81e (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0 (l_e_st_eq_landau_n_rt_rp_5157_t4 ksi rtksi y0 i) : l_e_st_eq_landau_n_rt_lessis (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0).
-
-(* constant 2809 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi).l_e_st_eq_landau_n_rt_rp_5157_t5 ksi rtksi x t : l_e_st_eq_landau_n_rt_lb (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)).
-
-(* constant 2810 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_st_eq_landau_n_rt_rp_urtrpofrt (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) (l_e_st_eq_landau_n_rt_moreisi2 (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi))) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)) (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)).
-
-(* constant 2811 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_isp l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_urt x (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)) ksi (l_e_st_eq_landau_n_rt_rp_5157_t7 ksi rtksi) (l_e_st_eq_landau_n_rt_rp_isrprt2 ksi rtksi) : l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)).
-
-(* constant 2812 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) (l_e_st_eq_landau_n_rt_rp_5157_t8 ksi rtksi) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi)).
-
-(* constant 2813 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_andi (l_e_st_eq_landau_n_rt_lb (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)) (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi)) (l_e_st_eq_landau_n_rt_rp_5157_t6 ksi rtksi) (l_e_st_eq_landau_n_rt_rp_5157_t9 ksi rtksi) : l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)).
-
-(* constant 2814 *)
-definition l_e_st_eq_landau_n_rt_rp_satz157a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_st_eq_landau_n_rt_rp_5157_t10 ksi rtksi : l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) (l_e_st_eq_landau_n_rt_rp_rtofrp ksi rtksi)).
-
-(* constant 2815 *)
-definition l_e_st_eq_landau_n_rt_rp_satz157b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) x) (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) (l_e_st_eq_landau_n_rt_rp_5157_t10 ksi rtksi) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi y)) x)).
-
-(* constant 2816 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.(l_ande1 (l_e_st_eq_landau_n_rt_lb (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) x0) (l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi)) m : l_e_st_eq_landau_n_rt_lb (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) x0).
-
-(* constant 2817 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.(l_ande2 (l_e_st_eq_landau_n_rt_lb (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) x0) (l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi)) m : l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi)).
-
-(* constant 2818 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) x0 (l_e_st_eq_landau_n_rt_rp_5157_t12 ksi x0 m) : l_e_st_eq_landau_n_rt_urt ksi x0).
-
-(* constant 2819 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.(l_e_st_eq_landau_n_rt_cutapp2a ksi y0 ly x0 (l_e_st_eq_landau_n_rt_rp_5157_t13 ksi x0 m) : l_e_st_eq_landau_n_rt_less y0 x0).
-
-(* constant 2820 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.(l_e_st_eq_landau_n_rt_rp_lrtrpofrt x0 y0 (l_e_st_eq_landau_n_rt_rp_5157_t14 ksi x0 m y0 ly) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) y0).
-
-(* constant 2821 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) y0 uy : l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi)).
-
-(* constant 2822 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_e_st_eq_landau_n_rt_satz85 x0 y0 (l_e_st_eq_landau_n_rt_rp_5157_t11 ksi x0 m y0 (l_e_st_eq_landau_n_rt_rp_5157_t17 ksi x0 m y0 uy)) : l_e_st_eq_landau_n_rt_moreis y0 x0).
-
-(* constant 2823 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_e_st_eq_landau_n_rt_rp_urtrpofrt x0 y0 (l_e_st_eq_landau_n_rt_rp_5157_t18 ksi x0 m y0 uy) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) y0).
-
-(* constant 2824 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.λy0:l_e_st_eq_landau_n_rt_rat.(l_cp (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) y0) (l_e_st_eq_landau_n_rt_lrt ksi y0) (λt:l_e_st_eq_landau_n_rt_urt ksi y0.l_e_st_eq_landau_n_rt_rp_5157_t19 ksi x0 m y0 t) : l_imp (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) y0) (l_e_st_eq_landau_n_rt_lrt ksi y0)).
-
-(* constant 2825 *)
-definition l_e_st_eq_landau_n_rt_rp_satz157c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.(l_e_st_eq_landau_n_rt_rp_isi1 ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_rp_5157_t15 ksi x0 m x t) (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5157_t20 ksi x0 m x) : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).
-
-(* constant 2826 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi y)) x).λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) x0.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) x0 (l_e_st_eq_landau_n_rt_rp_satz157c ksi x0 m) : l_e_st_eq_landau_n_rt_rp_ratrp ksi).
-
-(* constant 2827 *)
-definition l_e_st_eq_landau_n_rt_rp_satz157d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi y)) x).(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) x) s (l_e_st_eq_landau_n_rt_rp_ratrp ksi) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) x.l_e_st_eq_landau_n_rt_rp_5157_t21 ksi s x t) : l_e_st_eq_landau_n_rt_rp_ratrp ksi).
-
-(* constant 2828 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_xr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt x0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2829 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_e_st_eq_landau_n_rt_rp_urtrpofrt x0 x0 (l_e_st_eq_landau_n_rt_moreisi2 x0 x0 (l_e_refis l_e_st_eq_landau_n_rt_rat x0)) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) x0).
-
-(* constant 2830 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_andi (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) x0) (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_rp_5158_t1 ksi x0 lx) lx : l_and (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) x0) (l_e_st_eq_landau_n_rt_lrt ksi x0)).
-
-(* constant 2831 *)
-definition l_e_st_eq_landau_n_rt_rp_satz158a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) x) (l_e_st_eq_landau_n_rt_lrt ksi x)) x0 (l_e_st_eq_landau_n_rt_rp_5158_t2 ksi x0 lx) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi).
-
-(* constant 2832 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_s1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2833 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λm:l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0.(l_e_symis l_e_st_eq_landau_n_rt_cut ksi (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) (l_e_st_eq_landau_n_rt_rp_satz157c ksi x0 m) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi).
-
-(* constant 2834 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λm:l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0.(l_e_st_eq_landau_n_rt_rp_moreisi2 (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi (l_e_st_eq_landau_n_rt_rp_5158_t3 ksi x0 ux m) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi).
-
-(* constant 2835 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) x0 ux : l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)).
-
-(* constant 2836 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).(l_and_th4 (l_e_st_eq_landau_n_rt_lb (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0) (l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) n (l_e_st_eq_landau_n_rt_rp_5158_t5 ksi x0 ux n) : l_not (l_e_st_eq_landau_n_rt_lb (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0)).
-
-(* constant 2837 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).(l_some_th1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_imp (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 x)) (l_e_st_eq_landau_n_rt_rp_5158_t6 ksi x0 ux n) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_not (l_imp (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 x)))).
-
-(* constant 2838 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).λy0:l_e_st_eq_landau_n_rt_rat.λo:l_not (l_imp (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0)).(l_imp_th5 (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0) o : l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)).
-
-(* constant 2839 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).λy0:l_e_st_eq_landau_n_rt_rat.λo:l_not (l_imp (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0)).(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) y0 (l_e_st_eq_landau_n_rt_rp_5158_t8 ksi x0 ux n y0 o) : l_e_st_eq_landau_n_rt_urt ksi y0).
-
-(* constant 2840 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).λy0:l_e_st_eq_landau_n_rt_rat.λo:l_not (l_imp (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0)).(l_imp_th6 (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0) o : l_not (l_e_st_eq_landau_n_rt_lessis x0 y0)).
-
-(* constant 2841 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).λy0:l_e_st_eq_landau_n_rt_rat.λo:l_not (l_imp (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0)).(l_e_st_eq_landau_n_rt_satz82 x0 y0 (l_e_st_eq_landau_n_rt_satz81k x0 y0 (l_e_st_eq_landau_n_rt_rp_5158_t10 ksi x0 ux n y0 o)) : l_e_st_eq_landau_n_rt_less y0 x0).
-
-(* constant 2842 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).λy0:l_e_st_eq_landau_n_rt_rat.λo:l_not (l_imp (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0)).(l_e_st_eq_landau_n_rt_rp_lrtrpofrt x0 y0 (l_e_st_eq_landau_n_rt_rp_5158_t11 ksi x0 ux n y0 o) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) y0).
-
-(* constant 2843 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).λy0:l_e_st_eq_landau_n_rt_rat.λo:l_not (l_imp (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0)).(l_andi (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) y0) (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_rp_5158_t12 ksi x0 ux n y0 o) (l_e_st_eq_landau_n_rt_rp_5158_t9 ksi x0 ux n y0 o) : l_and (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) y0) (l_e_st_eq_landau_n_rt_urt ksi y0)).
-
-(* constant 2844 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).λy0:l_e_st_eq_landau_n_rt_rat.λo:l_not (l_imp (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0)).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) x) (l_e_st_eq_landau_n_rt_urt ksi x)) y0 (l_e_st_eq_landau_n_rt_rp_5158_t13 ksi x0 ux n y0 o) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi).
-
-(* constant 2845 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_not (l_imp (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 x))) (l_e_st_eq_landau_n_rt_rp_5158_t7 ksi x0 ux n) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_not (l_imp (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 x)).l_e_st_eq_landau_n_rt_rp_5158_t14 ksi x0 ux n x t) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi).
-
-(* constant 2846 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).(l_e_st_eq_landau_n_rt_rp_moreisi1 (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi (l_e_st_eq_landau_n_rt_rp_5158_t15 ksi x0 ux n) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi).
-
-(* constant 2847 *)
-definition l_e_st_eq_landau_n_rt_rp_satz158b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_imp_th1 (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi) (λt:l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0.l_e_st_eq_landau_n_rt_rp_5158_t4 ksi x0 ux t) (λt:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).l_e_st_eq_landau_n_rt_rp_5158_t16 ksi x0 ux t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi).
-
-(* constant 2848 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi.(l_e_st_eq_landau_n_rt_rp_satz123h (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi l : l_not (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi)).
-
-(* constant 2849 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi.(l_imp_th3 (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi) (l_e_st_eq_landau_n_rt_rp_5158_t17 ksi x0 l) (λt:l_e_st_eq_landau_n_rt_urt ksi x0.l_e_st_eq_landau_n_rt_rp_satz158b ksi x0 t) : l_not (l_e_st_eq_landau_n_rt_urt ksi x0)).
-
-(* constant 2850 *)
-definition l_e_st_eq_landau_n_rt_rp_satz158c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi.(l_et (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_rp_5158_t18 ksi x0 l) : l_e_st_eq_landau_n_rt_lrt ksi x0).
-
-(* constant 2851 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi.(l_e_st_eq_landau_n_rt_rp_satz123c (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi m : l_not (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi)).
-
-(* constant 2852 *)
-definition l_e_st_eq_landau_n_rt_rp_satz158d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi.(l_imp_th3 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi) (l_e_st_eq_landau_n_rt_rp_5158_t19 ksi x0 m) (λt:l_e_st_eq_landau_n_rt_lrt ksi x0.l_e_st_eq_landau_n_rt_rp_satz158a ksi x0 t) : l_e_st_eq_landau_n_rt_urt ksi x0).
-
-(* constant 2853 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_xr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt x0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2854 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_zr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt z0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2855 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt eta z0.λk:l_e_st_eq_landau_n_rt_less x0 z0.(l_e_st_eq_landau_n_rt_rp_satz127a ksi (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0) (l_e_st_eq_landau_n_rt_rp_5159_zr ksi eta l x0 ux lx z0) (l_e_st_eq_landau_n_rt_rp_satz124 (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0) ksi (l_e_st_eq_landau_n_rt_rp_satz158b ksi x0 ux)) (l_e_st_eq_landau_n_rt_rp_satz154c x0 z0 k) : l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_zr ksi eta l x0 ux lx z0)).
-
-(* constant 2856 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt eta z0.λk:l_e_st_eq_landau_n_rt_less x0 z0.(l_andi (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_zr ksi eta l x0 ux lx z0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_zr ksi eta l x0 ux lx z0) eta) (l_e_st_eq_landau_n_rt_rp_5159_t1 ksi eta l x0 ux lx z0 lz k) (l_e_st_eq_landau_n_rt_rp_satz158a eta z0 lz) : l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_zr ksi eta l x0 ux lx z0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_zr ksi eta l x0 ux lx z0) eta)).
-
-(* constant 2857 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt eta z0.λk:l_e_st_eq_landau_n_rt_less x0 z0.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta)) z0 (l_e_st_eq_landau_n_rt_rp_5159_t2 ksi eta l x0 ux lx z0 lz k) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta))).
-
-(* constant 2858 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.(l_e_st_eq_landau_n_rt_cutapp3 eta x0 lx (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta x.λu:l_e_st_eq_landau_n_rt_less x0 x.l_e_st_eq_landau_n_rt_rp_5159_t3 ksi eta l x0 ux lx x t u) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta))).
-
-(* constant 2859 *)
-definition l_e_st_eq_landau_n_rt_rp_satz159 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_lessapp ksi eta l (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λu:l_e_st_eq_landau_n_rt_lrt eta x.l_e_st_eq_landau_n_rt_rp_5159_t4 ksi eta l x t u) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta))).
-
-(* constant 2860 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0) eta).(l_andi (l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0)) (l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0) eta)) (l_e_st_eq_landau_n_rt_rp_ratrpi x0) a : l_and3 (l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0)) (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0) eta)).
-
-(* constant 2861 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0) eta).(l_somei l_e_st_eq_landau_n_rt_cut (λc:l_e_st_eq_landau_n_rt_cut.l_and3 (l_e_st_eq_landau_n_rt_rp_ratrp c) (l_e_st_eq_landau_n_rt_rp_less ksi c) (l_e_st_eq_landau_n_rt_rp_less c eta)) (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0) (l_e_st_eq_landau_n_rt_rp_5159_t5 ksi eta l x0 a) : l_e_st_eq_landau_n_rt_rp_some (λc:l_e_st_eq_landau_n_rt_cut.l_and3 (l_e_st_eq_landau_n_rt_rp_ratrp c) (l_e_st_eq_landau_n_rt_rp_less ksi c) (l_e_st_eq_landau_n_rt_rp_less c eta))).
-
-(* constant 2862 *)
-definition l_e_st_eq_landau_n_rt_rp_satz159a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta)) (l_e_st_eq_landau_n_rt_rp_satz159 ksi eta l) (l_e_st_eq_landau_n_rt_rp_some (λa:l_e_st_eq_landau_n_rt_cut.l_and3 (l_e_st_eq_landau_n_rt_rp_ratrp a) (l_e_st_eq_landau_n_rt_rp_less ksi a) (l_e_st_eq_landau_n_rt_rp_less a eta))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta).l_e_st_eq_landau_n_rt_rp_5159_t6 ksi eta l x t) : l_e_st_eq_landau_n_rt_rp_some (λa:l_e_st_eq_landau_n_rt_cut.l_and3 (l_e_st_eq_landau_n_rt_rp_ratrp a) (l_e_st_eq_landau_n_rt_rp_less ksi a) (l_e_st_eq_landau_n_rt_rp_less a eta))).
-
-(* constant 2863 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_yr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x).∀u:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta.p.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt y0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2864 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x).∀u:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta.p.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0) eta).(l_ande1 (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0) eta) a : l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0)).
-
-(* constant 2865 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x).∀u:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta.p.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0) eta).(l_ande2 (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0) eta) a : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0) eta).
-
-(* constant 2866 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x).∀u:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta.p.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0) eta).(p1 y0 (l_e_st_eq_landau_n_rt_rp_5159_t7 ksi eta l p p1 y0 a) (l_e_st_eq_landau_n_rt_rp_5159_t8 ksi eta l p p1 y0 a) : p).
-
-(* constant 2867 *)
-definition l_e_st_eq_landau_n_rt_rp_satz159app ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x).∀u:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta.p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta)) (l_e_st_eq_landau_n_rt_rp_satz159 ksi eta l) p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta).l_e_st_eq_landau_n_rt_rp_5159_t9 ksi eta l p p1 x t) : p).
-
-(* constant 2868 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_zr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).(l_e_st_eq_landau_n_rt_rp_rpofrt z0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2869 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_nm ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).(l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_5160_zr ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_ts ksi eta) m : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2870 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_dn ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).(l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) l_e_st_eq_landau_n_rt_rp_1rp : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2871 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_fr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).(l_e_st_eq_landau_n_rt_rp_ov (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2872 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_zeta ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).(l_e_ite (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2873 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp.(l_e_itet (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp l : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m)).
-
-(* constant 2874 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp.(l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_t1 ksi eta z0 m l) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m)).
-
-(* constant 2875 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp.(l_e_st_eq_landau_n_rt_rp_lessisi1 (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_satz127a (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5160_t2 ksi eta z0 m l) l) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2876 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λn:l_not (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).(l_e_itef (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp n : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2877 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λn:l_not (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).(l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5160_t4 ksi eta z0 m n) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2878 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λn:l_not (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).(l_e_st_eq_landau_n_rt_rp_trlessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_t5 ksi eta z0 m n) (l_e_st_eq_landau_n_rt_rp_satz124 (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_satz123f (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp n)) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m)).
-
-(* constant 2879 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp) (λt:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp.l_e_st_eq_landau_n_rt_rp_5160_t3 ksi eta z0 m t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).l_e_st_eq_landau_n_rt_rp_5160_t5 ksi eta z0 m t) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2880 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m)) (λt:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp.l_e_st_eq_landau_n_rt_rp_5160_t2 ksi eta z0 m t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).l_e_st_eq_landau_n_rt_rp_5160_t6 ksi eta z0 m t) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m)).
-
-(* constant 2881 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_zr1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt z1 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2882 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_zr2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt z2 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2883 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_disttp2 (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_satz147a (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) l2 l4) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)))).
-
-(* constant 2884 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) eta)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_disttp1 ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) eta) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) eta))) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)))).
-
-(* constant 2885 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_satz149a (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_satz139a ksi ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_lessisi2 ksi ksi (l_e_refis l_e_st_eq_landau_n_rt_cut ksi)) (l_e_st_eq_landau_n_rt_rp_5160_t7 ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))).
-
-(* constant 2886 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_satz139a (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_t10 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_t11 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)))).
-
-(* constant 2887 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_satz127b (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_5160_t9 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_t12 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)))).
-
-(* constant 2888 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl eta ksi) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_asspl2 eta ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl eta ksi) (l_e_st_eq_landau_n_rt_rp_pl ksi eta) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_compl eta ksi)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m)).
-
-(* constant 2889 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_distpt1 eta (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ists1 (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_t14 ksi eta z0 m z1 l1 l2 z2 l3 l4)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))).
-
-(* constant 2890 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_5160_t15 ksi eta z0 m z1 l1 l2 z2 l3 l4)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)))).
-
-(* constant 2891 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_5160_t16 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_t13 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)))).
-
-(* constant 2892 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_islessis12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_satz153e (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_satz149a (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_t8 ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m)))) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m)).
-
-(* constant 2893 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_satz139a (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts ksi eta))) (l_e_st_eq_landau_n_rt_rp_5160_t18 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m))).
-
-(* constant 2894 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_satz127b (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_t17 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_t19 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m))).
-
-(* constant 2895 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_zr ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_satz140c (l_e_st_eq_landau_n_rt_rp_5160_zr ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_ts ksi eta) m) (l_e_st_eq_landau_n_rt_rp_5160_t20 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_5160_zr ksi eta z0 m)).
-
-(* constant 2896 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_satz154f (l_e_st_eq_landau_n_rt_ts z1 z2) z0 (l_e_st_eq_landau_n_rt_rp_isless1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts z1 z2)) (l_e_st_eq_landau_n_rt_rp_5160_zr ksi eta z0 m) (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts z1 z2)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_satz155c z1 z2)) (l_e_st_eq_landau_n_rt_rp_5160_t21 ksi eta z0 m z1 l1 l2 z2 l3 l4)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts z1 z2) z0).
-
-(* constant 2897 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_x0 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_ov z0 z2 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2898 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_xr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2899 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_y0 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(z2 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2900 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_yr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5160_y0 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2901 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_satz110e z0 z2 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_y0 ksi eta z0 m z1 l1 l2 z2 l3 l4)) z0).
-
-(* constant 2902 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t24 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_ismore1 z0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) z2) (l_e_st_eq_landau_n_rt_ts z1 z2) (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) z2) z0 (l_e_st_eq_landau_n_rt_rp_5160_t23 ksi eta z0 m z1 l1 l2 z2 l3 l4)) (l_e_st_eq_landau_n_rt_satz83 (l_e_st_eq_landau_n_rt_ts z1 z2) z0 (l_e_st_eq_landau_n_rt_rp_5160_t22 ksi eta z0 m z1 l1 l2 z2 l3 l4)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) z2) (l_e_st_eq_landau_n_rt_ts z1 z2)).
-
-(* constant 2903 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t25 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_satz106a (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) z1 z2 (l_e_st_eq_landau_n_rt_rp_5160_t24 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) z1).
-
-(* constant 2904 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t26 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_trmore (l_e_st_eq_landau_n_rt_rp_5160_xr ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) ksi (l_e_st_eq_landau_n_rt_rp_satz154a (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) z1 (l_e_st_eq_landau_n_rt_rp_5160_t25 ksi eta z0 m z1 l1 l2 z2 l3 l4)) (l_e_st_eq_landau_n_rt_rp_satz122 ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) l1) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_xr ksi eta z0 m z1 l1 l2 z2 l3 l4) ksi).
-
-(* constant 2905 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t27 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_satz122 eta (l_e_st_eq_landau_n_rt_rp_5160_yr ksi eta z0 m z1 l1 l2 z2 l3 l4) l3 : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_yr ksi eta z0 m z1 l1 l2 z2 l3 l4) eta).
-
-(* constant 2906 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_ur ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt u0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2907 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_vr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λv0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt v0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2908 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_prop1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λv0:l_e_st_eq_landau_n_rt_rat.(l_and3 (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_ur ksi eta z0 u0) ksi) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_vr ksi eta z0 u0 v0) eta) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts u0 v0) z0) : Prop).
-
-(* constant 2909 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_prop2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x y)) : Prop).
-
-(* constant 2910 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t28 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_and3i (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_xr ksi eta z0 m z1 l1 l2 z2 l3 l4) ksi) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_yr ksi eta z0 m z1 l1 l2 z2 l3 l4) eta) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_y0 ksi eta z0 m z1 l1 l2 z2 l3 l4)) z0) (l_e_st_eq_landau_n_rt_rp_5160_t26 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_t27 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_t23 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_y0 ksi eta z0 m z1 l1 l2 z2 l3 l4)).
-
-(* constant 2911 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t29 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) y) (l_e_st_eq_landau_n_rt_rp_5160_y0 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_t28 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) y)).
-
-(* constant 2912 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t30 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x y)) (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_t29 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_rp_5160_prop2 ksi eta z0).
-
-(* constant 2913 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t31 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_satz159app eta (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_satz133a eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_prop2 ksi eta z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_rpofrt x).λu:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).l_e_st_eq_landau_n_rt_rp_5160_t30 ksi eta z0 m z1 l1 l2 x t u) : l_e_st_eq_landau_n_rt_rp_5160_prop2 ksi eta z0).
-
-(* constant 2914 *)
-definition l_e_st_eq_landau_n_rt_rp_satz160 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).(l_e_st_eq_landau_n_rt_rp_satz159app ksi (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_satz133a ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_prop2 ksi eta z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x).λu:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).l_e_st_eq_landau_n_rt_rp_5160_t31 ksi eta z0 m x t u) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and3 (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0)))).
-
-(* constant 2915 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_xr1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0.p.λx1:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt x1 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2916 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_yr1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0.p.λx1:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y).λy1:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt y1 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2917 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t32 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0.p.λx1:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y).λy1:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y1.(l_and3e1 (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_xr1 ksi eta z0 m p p1 x1) ksi) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_yr1 ksi eta z0 m p p1 x1 px y1) eta) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x1 y1) z0) py : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_xr1 ksi eta z0 m p p1 x1) ksi).
-
-(* constant 2918 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t33 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0.p.λx1:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y).λy1:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y1.(l_and3e2 (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_xr1 ksi eta z0 m p p1 x1) ksi) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_yr1 ksi eta z0 m p p1 x1 px y1) eta) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x1 y1) z0) py : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_yr1 ksi eta z0 m p p1 x1 px y1) eta).
-
-(* constant 2919 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t34 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0.p.λx1:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y).λy1:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y1.(l_and3e3 (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_xr1 ksi eta z0 m p p1 x1) ksi) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_yr1 ksi eta z0 m p p1 x1 px y1) eta) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x1 y1) z0) py : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x1 y1) z0).
-
-(* constant 2920 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t35 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0.p.λx1:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y).λy1:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y1.(p1 x1 (l_e_st_eq_landau_n_rt_rp_5160_t32 ksi eta z0 m p p1 x1 px y1 py) y1 (l_e_st_eq_landau_n_rt_rp_5160_t33 ksi eta z0 m p p1 x1 px y1 py) (l_e_st_eq_landau_n_rt_rp_5160_t34 ksi eta z0 m p p1 x1 px y1 py) : p).
-
-(* constant 2921 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t36 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0.p.λx1:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y).(l_someapp l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y) px p (λy:l_e_st_eq_landau_n_rt_rat.λv:l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y.l_e_st_eq_landau_n_rt_rp_5160_t35 ksi eta z0 m p p1 x1 px y v) : p).
-
-(* constant 2922 *)
-definition l_e_st_eq_landau_n_rt_rp_satz160app ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0.p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x y)) (l_e_st_eq_landau_n_rt_rp_satz160 ksi eta z0 m) p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x y).l_e_st_eq_landau_n_rt_rp_5160_t36 ksi eta z0 m p p1 x t) : p).
-
-(* constant 2923 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_min ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_ite (l_e_st_eq_landau_n_rt_rp_less ksi eta) l_e_st_eq_landau_n_rt_cut ksi eta : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2924 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_max ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_ite (l_e_st_eq_landau_n_rt_rp_more ksi eta) l_e_st_eq_landau_n_rt_cut ksi eta : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2925 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_ur ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt u0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2926 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) u0.(l_e_st_eq_landau_n_rt_rp_satz158a (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) u0 lu : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta)).
-
-(* constant 2927 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) u0.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) ksi (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) (l_e_itet (l_e_st_eq_landau_n_rt_rp_less ksi eta) l_e_st_eq_landau_n_rt_cut ksi eta l) (l_e_st_eq_landau_n_rt_rp_5161_t1 ksi eta u0 lu) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi).
-
-(* constant 2928 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) u0.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_trless (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi eta (l_e_st_eq_landau_n_rt_rp_5161_t2 ksi eta u0 lu l) l : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta).
-
-(* constant 2929 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) u0.λn:l_not (l_e_st_eq_landau_n_rt_rp_less ksi eta).(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) eta (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) (l_e_itef (l_e_st_eq_landau_n_rt_rp_less ksi eta) l_e_st_eq_landau_n_rt_cut ksi eta n) (l_e_st_eq_landau_n_rt_rp_5161_t1 ksi eta u0 lu) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta).
-
-(* constant 2930 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) u0.λn:l_not (l_e_st_eq_landau_n_rt_rp_less ksi eta).(l_e_st_eq_landau_n_rt_rp_satz127b (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta ksi (l_e_st_eq_landau_n_rt_rp_5161_t4 ksi eta u0 lu n) (l_e_st_eq_landau_n_rt_rp_satz124 ksi eta (l_e_st_eq_landau_n_rt_rp_satz123f ksi eta n)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi).
-
-(* constant 2931 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) u0.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi) (λt:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_5161_t2 ksi eta u0 lu t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_less ksi eta).l_e_st_eq_landau_n_rt_rp_5161_t5 ksi eta u0 lu t) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi).
-
-(* constant 2932 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) u0.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta) (λt:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_5161_t3 ksi eta u0 lu t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_less ksi eta).l_e_st_eq_landau_n_rt_rp_5161_t4 ksi eta u0 lu t) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta).
-
-(* constant 2933 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) u0.(l_e_st_eq_landau_n_rt_rp_satz158b (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) u0 uu : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta)).
-
-(* constant 2934 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) u0.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_ismoreis2 (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) ksi (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) (l_e_itet (l_e_st_eq_landau_n_rt_rp_more ksi eta) l_e_st_eq_landau_n_rt_cut ksi eta m) (l_e_st_eq_landau_n_rt_rp_5161_t8 ksi eta u0 uu) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi).
-
-(* constant 2935 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) u0.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_trmoreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi eta (l_e_st_eq_landau_n_rt_rp_5161_t9 ksi eta u0 uu m) (l_e_st_eq_landau_n_rt_rp_moreisi1 ksi eta m) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta).
-
-(* constant 2936 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) u0.λn:l_not (l_e_st_eq_landau_n_rt_rp_more ksi eta).(l_e_st_eq_landau_n_rt_rp_ismoreis2 (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) eta (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) (l_e_itef (l_e_st_eq_landau_n_rt_rp_more ksi eta) l_e_st_eq_landau_n_rt_cut ksi eta n) (l_e_st_eq_landau_n_rt_rp_5161_t8 ksi eta u0 uu) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta).
-
-(* constant 2937 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) u0.λn:l_not (l_e_st_eq_landau_n_rt_rp_more ksi eta).(l_e_st_eq_landau_n_rt_rp_trmoreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta ksi (l_e_st_eq_landau_n_rt_rp_5161_t11 ksi eta u0 uu n) (l_e_st_eq_landau_n_rt_rp_satz125 ksi eta (l_e_st_eq_landau_n_rt_rp_satz123e ksi eta n)) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi).
-
-(* constant 2938 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) u0.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi) (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_5161_t9 ksi eta u0 uu t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_more ksi eta).l_e_st_eq_landau_n_rt_rp_5161_t12 ksi eta u0 uu t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi).
-
-(* constant 2939 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) u0.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta) (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_5161_t10 ksi eta u0 uu t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_more ksi eta).l_e_st_eq_landau_n_rt_rp_5161_t11 ksi eta u0 uu t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta).
-
-(* constant 2940 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t15 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi1:l_e_st_eq_landau_n_rt_cut.λksi2:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi1 ksi2.(l_e_st_eq_landau_n_rt_rp_satz147 ksi1 ksi2 ksi1 ksi2 m m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi1 ksi1) (l_e_st_eq_landau_n_rt_rp_ts ksi2 ksi2)).
-
-(* constant 2941 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_sq1 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi1:l_e_st_eq_landau_n_rt_cut.λksi2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ts ksi1 ksi1 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2942 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_sq2 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi1:l_e_st_eq_landau_n_rt_cut.λksi2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ts ksi2 ksi2 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2943 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t16 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi1:l_e_st_eq_landau_n_rt_cut.λksi2:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi1 ksi2.(l_ec3e21 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2)) (l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2)) (l_e_st_eq_landau_n_rt_rp_5161_t15 zeta ksi1 ksi2 m) : l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2)).
-
-(* constant 2944 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t17 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi1:l_e_st_eq_landau_n_rt_cut.λksi2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) zeta.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2) zeta.(l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2) zeta i j : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2)).
-
-(* constant 2945 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t18 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi1:l_e_st_eq_landau_n_rt_cut.λksi2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) zeta.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2) zeta.(λt:l_e_st_eq_landau_n_rt_rp_more ksi1 ksi2.l_e_st_eq_landau_n_rt_rp_5161_t16 zeta ksi1 ksi2 t (l_e_st_eq_landau_n_rt_rp_5161_t17 zeta ksi1 ksi2 i j) : l_not (l_e_st_eq_landau_n_rt_rp_more ksi1 ksi2)).
-
-(* constant 2946 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t19 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi1:l_e_st_eq_landau_n_rt_cut.λksi2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) zeta.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2) zeta.(λt:l_e_st_eq_landau_n_rt_rp_less ksi1 ksi2.l_e_st_eq_landau_n_rt_rp_5161_t16 zeta ksi2 ksi1 (l_e_st_eq_landau_n_rt_rp_satz122 ksi1 ksi2 t) (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_t17 zeta ksi1 ksi2 i j)) : l_not (l_e_st_eq_landau_n_rt_rp_less ksi1 ksi2)).
-
-(* constant 2947 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t20 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi1:l_e_st_eq_landau_n_rt_cut.λksi2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) zeta.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2) zeta.(l_or3e1 (l_e_st_eq_landau_n_rt_rp_is ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_more ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_less ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_satz123a ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_t18 zeta ksi1 ksi2 i j) (l_e_st_eq_landau_n_rt_rp_5161_t19 zeta ksi1 ksi2 i j) : l_e_st_eq_landau_n_rt_rp_is ksi1 ksi2).
-
-(* constant 2948 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t21 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(λa:l_e_st_eq_landau_n_rt_cut.λb:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) zeta.λu:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts b b) zeta.l_e_st_eq_landau_n_rt_rp_5161_t20 zeta a b t u : l_e_amone l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) zeta)).
-
-(* constant 2949 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_sqrtset ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) zeta) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2950 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_xr ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt x0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2951 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t22 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_5161_t6 l_e_st_eq_landau_n_rt_rp_1rp zeta x0 lx : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2952 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t23 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_5161_t7 l_e_st_eq_landau_n_rt_rp_1rp zeta x0 lx : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) zeta).
-
-(* constant 2953 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t24 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_isless1 (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) zeta (l_e_st_eq_landau_n_rt_rp_satz151a (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_5161_t23 zeta x0 lx) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) zeta).
-
-(* constant 2954 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t25 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_trless (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) zeta (l_e_st_eq_landau_n_rt_rp_satz148c (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0))) (l_e_st_eq_landau_n_rt_rp_5161_t22 zeta x0 lx)) (l_e_st_eq_landau_n_rt_rp_5161_t24 zeta x0 lx) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) zeta).
-
-(* constant 2955 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t26 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) zeta) x0 (l_e_st_eq_landau_n_rt_rp_5161_t25 zeta x0 lx) : l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)).
-
-(* constant 2956 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t27 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_5161_t13 l_e_st_eq_landau_n_rt_rp_1rp zeta x0 ux : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2957 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t28 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_5161_t14 l_e_st_eq_landau_n_rt_rp_1rp zeta x0 ux : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) zeta).
-
-(* constant 2958 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t29 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_ismoreis1 (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) zeta (l_e_st_eq_landau_n_rt_rp_satz151a (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_5161_t28 zeta x0 ux) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) zeta).
-
-(* constant 2959 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t30 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_trmoreis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) zeta (l_e_st_eq_landau_n_rt_rp_satz149 (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_moreisi2 (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0))) (l_e_st_eq_landau_n_rt_rp_5161_t27 zeta x0 ux)) (l_e_st_eq_landau_n_rt_rp_5161_t29 zeta x0 ux) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) zeta).
-
-(* constant 2960 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t31 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_satz123c (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) zeta (l_e_st_eq_landau_n_rt_rp_5161_t30 zeta x0 ux) : l_not (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) zeta)).
-
-(* constant 2961 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t32 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_imp_th3 (l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) zeta) (l_e_st_eq_landau_n_rt_rp_5161_t31 zeta x0 ux) (λt:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) zeta) x0 t) : l_not (l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta))).
-
-(* constant 2962 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_yr ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt y0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2963 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t33 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) zeta) x0 i : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) zeta).
-
-(* constant 2964 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t34 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_rp_satz154c y0 x0 l : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_yr zeta x0 i y0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)).
-
-(* constant 2965 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t35 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_rp_trless (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yr zeta x0 i y0) (l_e_st_eq_landau_n_rt_rp_5161_yr zeta x0 i y0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) zeta (l_e_st_eq_landau_n_rt_rp_satz147a (l_e_st_eq_landau_n_rt_rp_5161_yr zeta x0 i y0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_yr zeta x0 i y0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_t34 zeta x0 i y0 l) (l_e_st_eq_landau_n_rt_rp_5161_t34 zeta x0 i y0 l)) (l_e_st_eq_landau_n_rt_rp_5161_t33 zeta x0 i) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yr zeta x0 i y0) (l_e_st_eq_landau_n_rt_rp_5161_yr zeta x0 i y0)) zeta).
-
-(* constant 2966 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t36 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) zeta) y0 (l_e_st_eq_landau_n_rt_rp_5161_t35 zeta x0 i y0 l) : l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)).
-
-(* constant 2967 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t37 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).(l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) zeta (l_e_st_eq_landau_n_rt_rp_5161_t33 zeta x0 i) : l_e_st_eq_landau_n_rt_rp_more zeta (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0))).
-
-(* constant 2968 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_nm ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).(l_e_st_eq_landau_n_rt_rp_mn zeta (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_5161_t37 zeta x0 i) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2969 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_dn ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).(l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2970 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_fr ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).(l_e_st_eq_landau_n_rt_rp_ov (l_e_st_eq_landau_n_rt_rp_5161_nm zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2971 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_zr ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt z0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2972 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t38 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_5161_t6 l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i) z0 lz : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2973 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t39 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_5161_t7 l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i) z0 lz : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)).
-
-(* constant 2974 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t40 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_satz94 x0 z0 : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) x0).
-
-(* constant 2975 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t41 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ists12 (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_satz155a x0 z0) (l_e_st_eq_landau_n_rt_rp_satz155a x0 z0)) (l_e_st_eq_landau_n_rt_rp_disttp2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)))).
-
-(* constant 2976 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t42 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_5161_t41 zeta x0 i z0 lz) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)))).
-
-(* constant 2977 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t43 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_disttp1 (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)))) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)))).
-
-(* constant 2978 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t44 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_satz145c (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) (l_e_st_eq_landau_n_rt_rp_satz138c (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0))) (l_e_st_eq_landau_n_rt_rp_5161_t38 zeta x0 i z0 lz)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))).
-
-(* constant 2979 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t45 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_satz138c (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_t43 zeta x0 i z0 lz) (l_e_st_eq_landau_n_rt_rp_5161_t44 zeta x0 i z0 lz) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)))).
-
-(* constant 2980 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t46 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_distpt1 (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)))).
-
-(* constant 2981 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t47 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_5161_t42 zeta x0 i z0 lz) (l_e_st_eq_landau_n_rt_rp_5161_t46 zeta x0 i z0 lz) (l_e_st_eq_landau_n_rt_rp_5161_t45 zeta x0 i z0 lz) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)))).
-
-(* constant 2982 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t48 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) (l_e_st_eq_landau_n_rt_rp_5161_nm zeta x0 i) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_satz153c (l_e_st_eq_landau_n_rt_rp_5161_nm zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i)) (l_e_st_eq_landau_n_rt_rp_satz148c (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i) (l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i))) (l_e_st_eq_landau_n_rt_rp_5161_t39 zeta x0 i z0 lz)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_nm zeta x0 i)).
-
-(* constant 2983 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t49 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_satz138c (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_nm zeta x0 i) (l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)))) (l_e_st_eq_landau_n_rt_rp_5161_t48 zeta x0 i z0 lz) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_5161_nm zeta x0 i))).
-
-(* constant 2984 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t50 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_5161_nm zeta x0 i)) zeta (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_satz140c zeta (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_5161_t37 zeta x0 i)) (l_e_st_eq_landau_n_rt_rp_5161_t49 zeta x0 i z0 lz) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) zeta).
-
-(* constant 2985 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t51 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_trless (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) zeta (l_e_st_eq_landau_n_rt_rp_5161_t47 zeta x0 i z0 lz) (l_e_st_eq_landau_n_rt_rp_5161_t50 zeta x0 i z0 lz) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0))) zeta).
-
-(* constant 2986 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t52 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) zeta) (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_rp_5161_t51 zeta x0 i z0 lz) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)).
-
-(* constant 2987 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t53 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_andi (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) x0) (l_e_st_eq_landau_n_rt_rp_5161_t52 zeta x0 i z0 lz) (l_e_st_eq_landau_n_rt_rp_5161_t40 zeta x0 i z0 lz) : l_and (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) x0)).
-
-(* constant 2988 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t54 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_more y x0)) (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_rp_5161_t53 zeta x0 i z0 lz) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_more y x0))).
-
-(* constant 2989 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t55 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).(l_e_st_eq_landau_n_rt_cutapp1a (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) (l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_more y x0))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) x.l_e_st_eq_landau_n_rt_rp_5161_t54 zeta x0 i x t) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_more y x0))).
-
-(* constant 2990 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t56 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) y0.(l_e_st_eq_landau_n_rt_cut2 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta) x0 (l_e_st_eq_landau_n_rt_rp_5161_t26 zeta x0 lx) y0 (l_e_st_eq_landau_n_rt_rp_5161_t32 zeta y0 uy) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_rp_5161_t36 zeta x t y u) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).l_e_st_eq_landau_n_rt_rp_5161_t55 zeta x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)).
-
-(* constant 2991 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t57 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_cutapp1b (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) y.l_e_st_eq_landau_n_rt_rp_5161_t56 zeta x0 lx y t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)).
-
-(* constant 2992 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t58 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_cutapp1a (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) x.l_e_st_eq_landau_n_rt_rp_5161_t57 zeta x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)).
-
-(* constant 2993 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_rtc ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_cutof (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta) (l_e_st_eq_landau_n_rt_rp_5161_t58 zeta) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2994 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t59 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.(l_or_th9 (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) l (λt:l_e_st_eq_landau_n_rt_less x0 y0.l_e_st_eq_landau_n_rt_rp_satz154c x0 y0 t) (λt:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_rt_rp_satz154b x0 y0 t) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)).
-
-(* constant 2995 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t60 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.(l_e_st_eq_landau_n_rt_rp_satz125 (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_5161_t59 y0 x0 (l_e_st_eq_landau_n_rt_satz84 x0 y0 m)) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)).
-
-(* constant 2996 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t61 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta m : l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta))).
-
-(* constant 2997 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_zr1 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt z1 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2998 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t62 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).(l_e_st_eq_landau_n_rt_rp_satz158c (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) z1 l2 : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) z1).
-
-(* constant 2999 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_xr1 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt x1 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3000 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_xr2 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt x2 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3001 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_xm ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_ite (l_e_st_eq_landau_n_rt_more x1 x2) l_e_st_eq_landau_n_rt_rat x1 x2 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 3002 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_xrm ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3003 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t63 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).λo:l_e_st_eq_landau_n_rt_more x1 x2.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) x1 (l_e_itet (l_e_st_eq_landau_n_rt_more x1 x2) l_e_st_eq_landau_n_rt_rat x1 x2 o) : l_e_st_eq_landau_n_rt_is x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3004 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t64 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).λo:l_e_st_eq_landau_n_rt_more x1 x2.(l_e_isp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x) x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) lx1 (l_e_st_eq_landau_n_rt_rp_5161_t63 zeta m z1 l1 l2 x1 lx1 x2 lx2 i o) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3005 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t65 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).λo:l_e_st_eq_landau_n_rt_more x1 x2.(l_e_st_eq_landau_n_rt_lessisi2 x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t63 zeta m z1 l1 l2 x1 lx1 x2 lx2 i o) : l_e_st_eq_landau_n_rt_lessis x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3006 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t66 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).λo:l_e_st_eq_landau_n_rt_more x1 x2.(l_e_st_eq_landau_n_rt_lessisi1 x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_satz87b x2 x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_satz82 x1 x2 o) (l_e_st_eq_landau_n_rt_rp_5161_t65 zeta m z1 l1 l2 x1 lx1 x2 lx2 i o)) : l_e_st_eq_landau_n_rt_lessis x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3007 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t67 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).λn:l_not (l_e_st_eq_landau_n_rt_more x1 x2).(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) x2 (l_e_itef (l_e_st_eq_landau_n_rt_more x1 x2) l_e_st_eq_landau_n_rt_rat x1 x2 n) : l_e_st_eq_landau_n_rt_is x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3008 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t68 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).λn:l_not (l_e_st_eq_landau_n_rt_more x1 x2).(l_e_isp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x) x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) lx2 (l_e_st_eq_landau_n_rt_rp_5161_t67 zeta m z1 l1 l2 x1 lx1 x2 lx2 i n) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3009 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t69 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).λn:l_not (l_e_st_eq_landau_n_rt_more x1 x2).(l_e_st_eq_landau_n_rt_lessisi2 x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t67 zeta m z1 l1 l2 x1 lx1 x2 lx2 i n) : l_e_st_eq_landau_n_rt_lessis x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3010 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t70 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).λn:l_not (l_e_st_eq_landau_n_rt_more x1 x2).(l_e_st_eq_landau_n_rt_satz88 x1 x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_satz81e x1 x2 n) (l_e_st_eq_landau_n_rt_rp_5161_t69 zeta m z1 l1 l2 x1 lx1 x2 lx2 i n) : l_e_st_eq_landau_n_rt_lessis x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3011 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t71 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_imp_th1 (l_e_st_eq_landau_n_rt_more x1 x2) (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)) (λt:l_e_st_eq_landau_n_rt_more x1 x2.l_e_st_eq_landau_n_rt_rp_5161_t64 zeta m z1 l1 l2 x1 lx1 x2 lx2 i t) (λt:l_not (l_e_st_eq_landau_n_rt_more x1 x2).l_e_st_eq_landau_n_rt_rp_5161_t68 zeta m z1 l1 l2 x1 lx1 x2 lx2 i t) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3012 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t72 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_imp_th1 (l_e_st_eq_landau_n_rt_more x1 x2) (l_e_st_eq_landau_n_rt_lessis x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)) (λt:l_e_st_eq_landau_n_rt_more x1 x2.l_e_st_eq_landau_n_rt_rp_5161_t65 zeta m z1 l1 l2 x1 lx1 x2 lx2 i t) (λt:l_not (l_e_st_eq_landau_n_rt_more x1 x2).l_e_st_eq_landau_n_rt_rp_5161_t70 zeta m z1 l1 l2 x1 lx1 x2 lx2 i t) : l_e_st_eq_landau_n_rt_lessis x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3013 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t73 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_imp_th1 (l_e_st_eq_landau_n_rt_more x1 x2) (l_e_st_eq_landau_n_rt_lessis x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)) (λt:l_e_st_eq_landau_n_rt_more x1 x2.l_e_st_eq_landau_n_rt_rp_5161_t66 zeta m z1 l1 l2 x1 lx1 x2 lx2 i t) (λt:l_not (l_e_st_eq_landau_n_rt_more x1 x2).l_e_st_eq_landau_n_rt_rp_5161_t69 zeta m z1 l1 l2 x1 lx1 x2 lx2 i t) : l_e_st_eq_landau_n_rt_lessis x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3014 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t74 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta) (l_e_st_eq_landau_n_rt_rp_5161_t58 zeta) (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t71 zeta m z1 l1 l2 x1 lx1 x2 lx2 i) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)).
-
-(* constant 3015 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t75 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_st_eq_landau_n_rt_rp_5161_t59 x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t72 zeta m z1 l1 l2 x1 lx1 x2 lx2 i) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5161_xr1 zeta m z1 l1 l2 x1) (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3016 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t76 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_st_eq_landau_n_rt_rp_5161_t59 x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t73 zeta m z1 l1 l2 x1 lx1 x2 lx2 i) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5161_xr2 zeta m z1 l1 l2 x1 lx1 x2) (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3017 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t77 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x1 x2)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr1 zeta m z1 l1 l2 x1) (l_e_st_eq_landau_n_rt_rp_5161_xr2 zeta m z1 l1 l2 x1 lx1 x2)) (l_e_st_eq_landau_n_rt_rp_satz154b z1 (l_e_st_eq_landau_n_rt_ts x1 x2) i) (l_e_st_eq_landau_n_rt_rp_satz155c x1 x2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr1 zeta m z1 l1 l2 x1) (l_e_st_eq_landau_n_rt_rp_5161_xr2 zeta m z1 l1 l2 x1 lx1 x2))).
-
-(* constant 3018 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t78 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_st_eq_landau_n_rt_rp_islessis1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr1 zeta m z1 l1 l2 x1) (l_e_st_eq_landau_n_rt_rp_5161_xr2 zeta m z1 l1 l2 x1 lx1 x2)) (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)) (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr1 zeta m z1 l1 l2 x1) (l_e_st_eq_landau_n_rt_rp_5161_xr2 zeta m z1 l1 l2 x1 lx1 x2)) (l_e_st_eq_landau_n_rt_rp_5161_t77 zeta m z1 l1 l2 x1 lx1 x2 lx2 i)) (l_e_st_eq_landau_n_rt_rp_satz149a (l_e_st_eq_landau_n_rt_rp_5161_xr1 zeta m z1 l1 l2 x1) (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_xr2 zeta m z1 l1 l2 x1 lx1 x2) (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t75 zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t76 zeta m z1 l1 l2 x1 lx1 x2 lx2 i)) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i))).
-
-(* constant 3019 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t79 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) zeta) (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t74 zeta m z1 l1 l2 x1 lx1 x2 lx2 i) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)) zeta).
-
-(* constant 3020 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t80 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_st_eq_landau_n_rt_rp_satz127a (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)) zeta (l_e_st_eq_landau_n_rt_rp_5161_t78 zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t79 zeta m z1 l1 l2 x1 lx1 x2 lx2 i) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) zeta).
-
-(* constant 3021 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t81 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_ec3e23 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) zeta) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) zeta) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) zeta) (l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) zeta) (l_e_st_eq_landau_n_rt_rp_satz122 zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) l1) (l_e_st_eq_landau_n_rt_rp_5161_t80 zeta m z1 l1 l2 x1 lx1 x2 lx2 i) : l_con).
-
-(* constant 3022 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t82 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_st_eq_landau_n_rt_rp_tsapp (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) z1 (l_e_st_eq_landau_n_rt_rp_5161_t62 zeta m z1 l1 l2) l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) y.λv:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_5161_t81 zeta m z1 l1 l2 x t y u v) : l_con).
-
-(* constant 3023 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t82a ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).(l_e_st_eq_landau_n_rt_rp_tsapp (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) z1 (l_e_st_eq_landau_n_rt_rp_5161_t62 zeta m z1 l1 l2) l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) y.λv:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_5161_t82 zeta m z1 l1 l2 x t y u v) : l_con).
-
-(* constant 3024 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t83 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.(l_e_st_eq_landau_n_rt_rp_satz159app zeta (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_t61 zeta m) l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_rpofrt x).λu:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).l_e_st_eq_landau_n_rt_rp_5161_t82a zeta m x t u) : l_con).
-
-(* constant 3025 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_zr2 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt z2 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3026 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t84 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.(l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) l3 : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta))).
-
-(* constant 3027 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_yr1 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt y1 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3028 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_yr2 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt y2 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3029 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_ym ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_e_ite (l_e_st_eq_landau_n_rt_less y1 y2) l_e_st_eq_landau_n_rt_rat y1 y2 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 3030 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_yrm ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3031 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t85 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λk:l_e_st_eq_landau_n_rt_less y1 y2.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) y1 (l_e_itet (l_e_st_eq_landau_n_rt_less y1 y2) l_e_st_eq_landau_n_rt_rat y1 y2 k) : l_e_st_eq_landau_n_rt_is y1 (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3032 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t86 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λk:l_e_st_eq_landau_n_rt_less y1 y2.(l_e_st_eq_landau_n_rt_rp_satz154b y1 (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_t85 zeta l z2 l3 l4 y1 m1 y2 m2 i k) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3033 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t87 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λk:l_e_st_eq_landau_n_rt_less y1 y2.(l_e_st_eq_landau_n_rt_rp_ismore1 (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_t86 zeta l z2 l3 l4 y1 m1 y2 m2 i k) m1 : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).
-
-(* constant 3034 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t88 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λk:l_e_st_eq_landau_n_rt_less y1 y2.(l_e_st_eq_landau_n_rt_rp_moreisi2 (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_t86 zeta l z2 l3 l4 y1 m1 y2 m2 i k) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3035 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t89 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λk:l_e_st_eq_landau_n_rt_less y1 y2.(l_e_st_eq_landau_n_rt_rp_moreisi1 (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_satz127d (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_satz154c y1 y2 k)) (l_e_st_eq_landau_n_rt_rp_5161_t88 zeta l z2 l3 l4 y1 m1 y2 m2 i k)) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3036 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t90 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λn:l_not (l_e_st_eq_landau_n_rt_less y1 y2).(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) y2 (l_e_itef (l_e_st_eq_landau_n_rt_less y1 y2) l_e_st_eq_landau_n_rt_rat y1 y2 n) : l_e_st_eq_landau_n_rt_is y2 (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3037 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t91 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λn:l_not (l_e_st_eq_landau_n_rt_less y1 y2).(l_e_st_eq_landau_n_rt_rp_satz154b y2 (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_t90 zeta l z2 l3 l4 y1 m1 y2 m2 i n) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3038 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t92 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λn:l_not (l_e_st_eq_landau_n_rt_less y1 y2).(l_e_st_eq_landau_n_rt_rp_ismore1 (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_t91 zeta l z2 l3 l4 y1 m1 y2 m2 i n) m2 : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).
-
-(* constant 3039 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t93 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λn:l_not (l_e_st_eq_landau_n_rt_less y1 y2).(l_e_st_eq_landau_n_rt_rp_moreisi2 (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_t91 zeta l z2 l3 l4 y1 m1 y2 m2 i n) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3040 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t94 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λn:l_not (l_e_st_eq_landau_n_rt_less y1 y2).(l_e_st_eq_landau_n_rt_rp_trmoreis (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_t60 y1 y2 (l_e_st_eq_landau_n_rt_satz81f y1 y2 n)) (l_e_st_eq_landau_n_rt_rp_5161_t93 zeta l z2 l3 l4 y1 m1 y2 m2 i n) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3041 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t95 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_imp_th1 (l_e_st_eq_landau_n_rt_less y1 y2) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (λt:l_e_st_eq_landau_n_rt_less y1 y2.l_e_st_eq_landau_n_rt_rp_5161_t87 zeta l z2 l3 l4 y1 m1 y2 m2 i t) (λt:l_not (l_e_st_eq_landau_n_rt_less y1 y2).l_e_st_eq_landau_n_rt_rp_5161_t92 zeta l z2 l3 l4 y1 m1 y2 m2 i t) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).
-
-(* constant 3042 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t96 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_imp_th1 (l_e_st_eq_landau_n_rt_less y1 y2) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) (λt:l_e_st_eq_landau_n_rt_less y1 y2.l_e_st_eq_landau_n_rt_rp_5161_t88 zeta l z2 l3 l4 y1 m1 y2 m2 i t) (λt:l_not (l_e_st_eq_landau_n_rt_less y1 y2).l_e_st_eq_landau_n_rt_rp_5161_t94 zeta l z2 l3 l4 y1 m1 y2 m2 i t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3043 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t97 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_imp_th1 (l_e_st_eq_landau_n_rt_less y1 y2) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) (λt:l_e_st_eq_landau_n_rt_less y1 y2.l_e_st_eq_landau_n_rt_rp_5161_t89 zeta l z2 l3 l4 y1 m1 y2 m2 i t) (λt:l_not (l_e_st_eq_landau_n_rt_less y1 y2).l_e_st_eq_landau_n_rt_rp_5161_t93 zeta l z2 l3 l4 y1 m1 y2 m2 i t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3044 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t98 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_e_st_eq_landau_n_rt_rp_satz158d (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_moreisi1 (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_t95 zeta l z2 l3 l4 y1 m1 y2 m2 i)) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3045 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t99 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_imp_th3 (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i)) (l_e_st_eq_landau_n_rt_rp_5161_t98 zeta l z2 l3 l4 y1 m1 y2 m2 i) (λt:l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).l_e_st_eq_landau_n_rt_rp_ine (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta) (l_e_st_eq_landau_n_rt_rp_5161_t58 zeta) (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) t) : l_not (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta))).
-
-(* constant 3046 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t100 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) zeta) (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_rp_5161_t99 zeta l z2 l3 l4 y1 m1 y2 m2 i) (λt:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) zeta.l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) zeta) (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) t) : l_not (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) zeta)).
-
-(* constant 3047 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t101 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_e_st_eq_landau_n_rt_rp_satz123f (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) zeta (l_e_st_eq_landau_n_rt_rp_5161_t100 zeta l z2 l3 l4 y1 m1 y2 m2 i) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) zeta).
-
-(* constant 3048 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t101a ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_e_st_eq_landau_n_rt_rp_satz149 (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_t96 zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_t97 zeta l z2 l3 l4 y1 m1 y2 m2 i) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i))).
-
-(* constant 3049 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t102 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_e_st_eq_landau_n_rt_rp_ismoreis1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) (l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts y1 y2)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts y1 y2)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2)) (l_e_st_eq_landau_n_rt_rp_satz155c y1 y2)) (l_e_st_eq_landau_n_rt_rp_satz154b (l_e_st_eq_landau_n_rt_ts y1 y2) z2 i)) (l_e_st_eq_landau_n_rt_rp_5161_t101a zeta l z2 l3 l4 y1 m1 y2 m2 i) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i))).
-
-(* constant 3050 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t103 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_e_st_eq_landau_n_rt_rp_trmoreis (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) zeta (l_e_st_eq_landau_n_rt_rp_5161_t102 zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_t101 zeta l z2 l3 l4 y1 m1 y2 m2 i) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta).
-
-(* constant 3051 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t104 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_e_st_eq_landau_n_rt_rp_satz123c (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta (l_e_st_eq_landau_n_rt_rp_5161_t103 zeta l z2 l3 l4 y1 m1 y2 m2 i) l4 : l_con).
-
-(* constant 3052 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t105 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.(l_e_st_eq_landau_n_rt_rp_satz160app (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) z2 (l_e_st_eq_landau_n_rt_rp_5161_t84 zeta l z2 l3 l4) l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λv:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z2.l_e_st_eq_landau_n_rt_rp_5161_t104 zeta l z2 l3 l4 x t y u v) : l_con).
-
-(* constant 3053 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t106 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.(l_e_st_eq_landau_n_rt_rp_satz159app (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta l l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_rpofrt x).λu:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) zeta.l_e_st_eq_landau_n_rt_rp_5161_t105 zeta l x t u) : l_con).
-
-(* constant 3054 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t107 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(l_or3e1 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta) (l_e_st_eq_landau_n_rt_rp_satz123a (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta) (λt:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.l_e_st_eq_landau_n_rt_rp_5161_t83 zeta t) (λt:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.l_e_st_eq_landau_n_rt_rp_5161_t106 zeta t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta).
-
-(* constant 3055 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t108 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(l_somei l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_t107 zeta) : l_e_st_eq_landau_n_rt_rp_some (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) zeta)).
-
-(* constant 3056 *)
-definition l_e_st_eq_landau_n_rt_rp_satz161 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_onei l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) zeta) (l_e_st_eq_landau_n_rt_rp_5161_t21 zeta) (l_e_st_eq_landau_n_rt_rp_5161_t108 zeta) : l_e_st_eq_landau_n_rt_rp_one (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) zeta)).
-
-(* constant 3057 *)
-definition l_e_st_eq_landau_n_rt_rp_irratrp ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_not (l_e_st_eq_landau_n_rt_rp_ratrp ksi) : Prop).
-
-(* constant 3058 *)
-definition l_e_st_eq_landau_n_5162_t1 ≝ λv:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl v v) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 v) v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) v) (l_e_st_eq_landau_n_ispl1 v (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 v) v (l_e_st_eq_landau_n_satz28g v)) (l_e_st_eq_landau_n_satz28h l_e_st_eq_landau_n_1 v) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) v)).
-
-(* constant 3059 *)
-definition l_e_st_eq_landau_n_5162_t2 ≝ λv:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_isless2 (l_e_st_eq_landau_n_pl v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) v) v (l_e_st_eq_landau_n_5162_t1 v) (l_e_st_eq_landau_n_satz18a v v) : l_e_st_eq_landau_n_less v (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) v)).
-
-(* constant 3060 *)
-definition l_e_st_eq_landau_n_5162_t3 ≝ λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts w w).(l_e_st_eq_landau_n_satz10j v w (l_imp_th3 (l_e_st_eq_landau_n_moreis v w) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts w w)) (l_e_st_eq_landau_n_satz10h (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts w w) l) (λt:l_e_st_eq_landau_n_moreis v w.l_e_st_eq_landau_n_satz36 v w v w t t)) : l_e_st_eq_landau_n_less v w).
-
-(* constant 3061 *)
-definition l_e_st_eq_landau_n_5162_t4 ≝ λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) v) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts w v)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_disttp1 v w v) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_ts w v) (l_e_st_eq_landau_n_ts v w) (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_comts w v)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) v) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w))).
-
-(* constant 3062 *)
-definition l_e_st_eq_landau_n_5162_t5 ≝ λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) (l_e_st_eq_landau_n_pl v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v w) (l_e_st_eq_landau_n_ts w w))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts w w)) (l_e_st_eq_landau_n_disttp2 (l_e_st_eq_landau_n_pl v w) v w) (l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) v) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) w) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v w) (l_e_st_eq_landau_n_ts w w)) (l_e_st_eq_landau_n_5162_t4 v w) (l_e_st_eq_landau_n_disttp1 v w w)) (l_e_st_eq_landau_n_asspl2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts v w) (l_e_st_eq_landau_n_ts w w)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) (l_e_st_eq_landau_n_pl v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts w w))).
-
-(* constant 3063 *)
-definition l_e_st_eq_landau_n_5162_t6 ≝ λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v w) (l_e_st_eq_landau_n_ts v w))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts v w))) (l_e_st_eq_landau_n_asspl1 (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v w) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_5162_t1 (l_e_st_eq_landau_n_ts v w))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts v w)))).
-
-(* constant 3064 *)
-definition l_e_st_eq_landau_n_5162_nun ≝ λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) (l_e_st_eq_landau_n_pl v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts w w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts v w))) (l_e_st_eq_landau_n_ts w w)) (l_e_st_eq_landau_n_5162_t5 v w) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts v w))) (l_e_st_eq_landau_n_ts w w) (l_e_st_eq_landau_n_5162_t6 v w)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) (l_e_st_eq_landau_n_pl v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts v w))) (l_e_st_eq_landau_n_ts w w))).
-
-(* constant 3065 *)
-definition l_e_st_eq_landau_n_5162_nun1 ≝ λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) (l_e_st_eq_landau_n_pl v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts v w))) (l_e_st_eq_landau_n_ts w w)) (l_e_st_eq_landau_n_5162_nun v w) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts v w))) (l_e_st_eq_landau_n_ts w w)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) (l_e_st_eq_landau_n_pl v w))).
-
-(* constant 3066 *)
-definition l_e_st_eq_landau_n_5162_prop1 ≝ λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr w v) (l_e_st_eq_landau_n_fr w v)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) : Prop).
-
-(* constant 3067 *)
-definition l_e_st_eq_landau_n_5162_prop2 ≝ λv:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_some (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop1 v t) : Prop).
-
-(* constant 3068 *)
-definition l_e_st_eq_landau_n_5162_prop3 ≝ (l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) : Prop).
-
-(* constant 3069 *)
-definition l_e_st_eq_landau_n_5162_y ≝ λp:l_e_st_eq_landau_n_5162_prop3.(l_e_ind l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) t) (l_e_st_eq_landau_n_satz27a (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) p) : l_e_st_eq_landau_n_nat).
-
-(* constant 3070 *)
-definition l_e_st_eq_landau_n_5162_t7 ≝ λp:l_e_st_eq_landau_n_5162_prop3.(l_e_oneax l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) t) (l_e_st_eq_landau_n_satz27a (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) p) : l_e_st_eq_landau_n_min (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) (l_e_st_eq_landau_n_5162_y p)).
-
-(* constant 3071 *)
-definition l_e_st_eq_landau_n_5162_t8 ≝ λp:l_e_st_eq_landau_n_5162_prop3.(l_ande1 (l_e_st_eq_landau_n_lb (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_prop2 (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_t7 p) : l_e_st_eq_landau_n_lb (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) (l_e_st_eq_landau_n_5162_y p)).
-
-(* constant 3072 *)
-definition l_e_st_eq_landau_n_5162_t9 ≝ λp:l_e_st_eq_landau_n_5162_prop3.(l_ande2 (l_e_st_eq_landau_n_lb (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_prop2 (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_t7 p) : l_e_st_eq_landau_n_5162_prop2 (l_e_st_eq_landau_n_5162_y p)).
-
-(* constant 3073 *)
-definition l_e_st_eq_landau_n_5162_t10 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.(l_e_st_eq_landau_n_treq1 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_fr x (l_e_st_eq_landau_n_5162_y p))) q (l_e_st_eq_landau_n_tfeq12a x (l_e_st_eq_landau_n_5162_y p) x (l_e_st_eq_landau_n_5162_y p)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)))).
-
-(* constant 3074 *)
-definition l_e_st_eq_landau_n_5162_t11 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)))) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_12isnd (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_5162_t10 p x q) (l_e_st_eq_landau_n_ndis12 (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz28a (l_e_st_eq_landau_n_ts x x)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts x x)).
-
-(* constant 3075 *)
-definition l_e_st_eq_landau_n_5162_t12 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.(l_e_st_eq_landau_n_isless2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_t11 p x q) (l_e_st_eq_landau_n_5162_t2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts x x)).
-
-(* constant 3076 *)
-definition l_e_st_eq_landau_n_5162_t13 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.(l_e_st_eq_landau_n_isless1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p))) (l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_t11 p x q)) (l_e_st_eq_landau_n_satz35c (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_refis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)))) (l_e_st_eq_landau_n_5162_t2 (l_e_st_eq_landau_n_5162_y p))) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)))).
-
-(* constant 3077 *)
-definition l_e_st_eq_landau_n_5162_t14 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.(l_e_st_eq_landau_n_5162_t3 (l_e_st_eq_landau_n_5162_y p) x (l_e_st_eq_landau_n_5162_t12 p x q) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_5162_y p) x).
-
-(* constant 3078 *)
-definition l_e_st_eq_landau_n_5162_t15 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.(l_e_st_eq_landau_n_5162_t3 x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_t13 p x q) : l_e_st_eq_landau_n_less x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p))).
-
-(* constant 3079 *)
-definition l_e_st_eq_landau_n_5162_t16 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).(l_e_st_eq_landau_n_isless12 x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) i (l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_t1 (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_5162_t15 p x q) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))).
-
-(* constant 3080 *)
-definition l_e_st_eq_landau_n_5162_t17 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).(l_e_st_eq_landau_n_satz20f u (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_t16 p x q u i) : l_e_st_eq_landau_n_less u (l_e_st_eq_landau_n_5162_y p)).
-
-(* constant 3081 *)
-definition l_e_st_eq_landau_n_5162_t18 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t) j : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl u t) (l_e_st_eq_landau_n_5162_y p)).
-
-(* constant 3082 *)
-definition l_e_st_eq_landau_n_5162_t19 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ists12 x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u) x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u) i i) (l_e_st_eq_landau_n_5162_nun (l_e_st_eq_landau_n_5162_y p) u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_ts u u))).
-
-(* constant 3083 *)
-definition l_e_st_eq_landau_n_5162_t20 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t))) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_5162_t19 p x q u i t j)) (l_e_st_eq_landau_n_asspl1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t)))).
-
-(* constant 3084 *)
-definition l_e_st_eq_landau_n_5162_t21 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u) (l_e_st_eq_landau_n_ts u (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts u (l_e_st_eq_landau_n_pl u t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_5162_y p) u) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t) u j) (l_e_st_eq_landau_n_disttp2 u u t) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts u t))).
-
-(* constant 3085 *)
-definition l_e_st_eq_landau_n_5162_t22 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts u t))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t))) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_t21 p x q u i t j)) (l_e_st_eq_landau_n_disttp2 (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts u t)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)))).
-
-(* constant 3086 *)
-definition l_e_st_eq_landau_n_5162_t23 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t))) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_t22 p x q u i t j)) (l_e_st_eq_landau_n_asspl2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)))).
-
-(* constant 3087 *)
-definition l_e_st_eq_landau_n_5162_t24 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t)))) (l_e_st_eq_landau_n_5162_t20 p x q u i t j) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_5162_t23 p x q u i t j)) (l_e_st_eq_landau_n_asspl1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t))))).
-
-(* constant 3088 *)
-definition l_e_st_eq_landau_n_5162_t25 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t))) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl u t) (l_e_st_eq_landau_n_pl u t)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_asspl2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t))) (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_compl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_5162_nun1 u t) (l_e_st_eq_landau_n_ists12 (l_e_st_eq_landau_n_pl u t) (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t) (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_t18 p x q u i t j) (l_e_st_eq_landau_n_5162_t18 p x q u i t j)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))).
-
-(* constant 3089 *)
-definition l_e_st_eq_landau_n_5162_t26 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_5162_t24 p x q u i t j) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_5162_t25 p x q u i t j)) (l_e_st_eq_landau_n_compl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_asspl2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)))).
-
-(* constant 3090 *)
-definition l_e_st_eq_landau_n_5162_t27 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_5162_t1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_5162_t11 p x q) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts x x)).
-
-(* constant 3091 *)
-definition l_e_st_eq_landau_n_5162_t28 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_5162_t26 p x q u i t j) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_5162_t27 p x q u i t j)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)))).
-
-(* constant 3092 *)
-definition l_e_st_eq_landau_n_5162_t29 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_st_eq_landau_n_satz20e (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_5162_t28 p x q u i t j) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))).
-
-(* constant 3093 *)
-definition l_e_st_eq_landau_n_5162_t30 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts u u)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts t t) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_ndis12 (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts u u)) (l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_5162_t29 p x q u i t j)) (l_e_st_eq_landau_n_satz28e (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_12isnd (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts u u))).
-
-(* constant 3094 *)
-definition l_e_st_eq_landau_n_5162_t31 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_st_eq_landau_n_treq2 (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr t u) (l_e_st_eq_landau_n_fr t u)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_tfeq12a t u t u) (l_e_st_eq_landau_n_5162_t30 p x q u i t j) : l_e_st_eq_landau_n_5162_prop1 u t).
-
-(* constant 3095 *)
-definition l_e_st_eq_landau_n_5162_t32 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_somei l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop1 u v) t (l_e_st_eq_landau_n_5162_t31 p x q u i t j) : l_e_st_eq_landau_n_5162_prop2 u).
-
-(* constant 3096 *)
-definition l_e_st_eq_landau_n_5162_t33 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_st_eq_landau_n_5162_t8 p u (l_e_st_eq_landau_n_5162_t32 p x q u i t j) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_5162_y p) u).
-
-(* constant 3097 *)
-definition l_e_st_eq_landau_n_5162_t34 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_st_eq_landau_n_satz10g (l_e_st_eq_landau_n_5162_y p) u (l_e_st_eq_landau_n_satz12 u (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_t17 p x q u i)) (l_e_st_eq_landau_n_5162_t33 p x q u i t j) : l_con).
-
-(* constant 3098 *)
-definition l_e_st_eq_landau_n_5162_t35 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).(l_someapp l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_5162_y p) u v) (l_e_st_eq_landau_n_5162_t17 p x q u i) l_con (λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_5162_y p) u v.l_e_st_eq_landau_n_5162_t34 p x q u i v w) : l_con).
-
-(* constant 3099 *)
-definition l_e_st_eq_landau_n_5162_t36 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.(l_someapp l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x (l_e_st_eq_landau_n_5162_y p) v) (l_e_st_eq_landau_n_5162_t14 p x q) l_con (λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_diffprop x (l_e_st_eq_landau_n_5162_y p) v.l_e_st_eq_landau_n_5162_t35 p x q v w) : l_con).
-
-(* constant 3100 *)
-definition l_e_st_eq_landau_n_5162_t37 ≝ λp:l_e_st_eq_landau_n_5162_prop3.(l_someapp l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) v) (l_e_st_eq_landau_n_5162_t9 p) l_con (λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) v.l_e_st_eq_landau_n_5162_t36 p v w) : l_con).
-
-(* constant 3101 *)
-definition l_e_st_eq_landau_n_rt_5162_t38 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)).λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_rt_ise (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_tf x x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_tict x0 x0 x x xix0 xix0) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1)) i : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1)).
-
-(* constant 3102 *)
-definition l_e_st_eq_landau_n_rt_5162_t39 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)).λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) x (l_e_st_eq_landau_n_fris x) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) x).
-
-(* constant 3103 *)
-definition l_e_st_eq_landau_n_rt_5162_t40 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)).λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_eqtf12 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) x (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) x (l_e_st_eq_landau_n_rt_5162_t39 x0 i x xix0) (l_e_st_eq_landau_n_rt_5162_t39 x0 i x xix0) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x))) (l_e_st_eq_landau_n_tf x x)).
-
-(* constant 3104 *)
-definition l_e_st_eq_landau_n_rt_5162_t41 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)).λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_treq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x))) (l_e_st_eq_landau_n_tf x x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_5162_t40 x0 i x xix0) (l_e_st_eq_landau_n_rt_5162_t38 x0 i x xix0) : l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_den x) (l_e_st_eq_landau_n_num x)).
-
-(* constant 3105 *)
-definition l_e_st_eq_landau_n_rt_5162_t42 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)).λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_den x) t) (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_rt_5162_t41 x0 i x xix0) : l_e_st_eq_landau_n_5162_prop2 (l_e_st_eq_landau_n_den x)).
-
-(* constant 3106 *)
-definition l_e_st_eq_landau_n_rt_5162_t43 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)).λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 t) (l_e_st_eq_landau_n_den x) (l_e_st_eq_landau_n_rt_5162_t42 x0 i x xix0) : l_e_st_eq_landau_n_5162_prop3).
-
-(* constant 3107 *)
-definition l_e_st_eq_landau_n_rt_5162_t44 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)).λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_5162_t37 (l_e_st_eq_landau_n_rt_5162_t43 x0 i x xix0) : l_con).
-
-(* constant 3108 *)
-definition l_e_st_eq_landau_n_rt_5162_t45 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)).(l_e_st_eq_landau_n_rt_ratapp1 x0 l_con (λx:l_e_st_eq_landau_n_frac.λt:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).l_e_st_eq_landau_n_rt_5162_t44 x0 i x t) : l_con).
-
-(* constant 3109 *)
-definition l_e_st_eq_landau_n_rt_rp_5162_ksi ≝ (l_e_ind l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_satz161 (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1))) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3110 *)
-definition l_e_st_eq_landau_n_rt_rp_5162_t46 ≝ (l_e_oneax l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_satz161 (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_5162_ksi l_e_st_eq_landau_n_rt_rp_5162_ksi) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1))).
-
-(* constant 3111 *)
-definition l_e_st_eq_landau_n_rt_rp_5162_x0 ≝ λr:l_e_st_eq_landau_n_rt_rp_ratrp l_e_st_eq_landau_n_rt_rp_5162_ksi.(l_e_st_eq_landau_n_rt_rp_rtofrp l_e_st_eq_landau_n_rt_rp_5162_ksi r : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 3112 *)
-definition l_e_st_eq_landau_n_rt_rp_5162_t47 ≝ λr:l_e_st_eq_landau_n_rt_rp_ratrp l_e_st_eq_landau_n_rt_rp_5162_ksi.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5162_x0 r) (l_e_st_eq_landau_n_rt_rp_5162_x0 r))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5162_x0 r)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5162_x0 r))) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_5162_ksi l_e_st_eq_landau_n_rt_rp_5162_ksi) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_satz155c (l_e_st_eq_landau_n_rt_rp_5162_x0 r) (l_e_st_eq_landau_n_rt_rp_5162_x0 r)) (l_e_st_eq_landau_n_rt_rp_ists12 (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5162_x0 r)) l_e_st_eq_landau_n_rt_rp_5162_ksi (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5162_x0 r)) l_e_st_eq_landau_n_rt_rp_5162_ksi (l_e_st_eq_landau_n_rt_rp_isrprt2 l_e_st_eq_landau_n_rt_rp_5162_ksi r) (l_e_st_eq_landau_n_rt_rp_isrprt2 l_e_st_eq_landau_n_rt_rp_5162_ksi r)) l_e_st_eq_landau_n_rt_rp_5162_t46 : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5162_x0 r) (l_e_st_eq_landau_n_rt_rp_5162_x0 r))) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1))).
-
-(* constant 3113 *)
-definition l_e_st_eq_landau_n_rt_rp_5162_t48 ≝ λr:l_e_st_eq_landau_n_rt_rp_ratrp l_e_st_eq_landau_n_rt_rp_5162_ksi.(l_e_st_eq_landau_n_rt_rp_isrtirp (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5162_x0 r) (l_e_st_eq_landau_n_rt_rp_5162_x0 r)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_5162_t47 r) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5162_x0 r) (l_e_st_eq_landau_n_rt_rp_5162_x0 r)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1))).
-
-(* constant 3114 *)
-definition l_e_st_eq_landau_n_rt_rp_5162_t49 ≝ λr:l_e_st_eq_landau_n_rt_rp_ratrp l_e_st_eq_landau_n_rt_rp_5162_ksi.(l_e_st_eq_landau_n_rt_5162_t45 (l_e_st_eq_landau_n_rt_rp_5162_x0 r) (l_e_st_eq_landau_n_rt_rp_5162_t48 r) : l_con).
-
-(* constant 3115 *)
-definition l_e_st_eq_landau_n_rt_rp_satz162 ≝ (l_somei l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_irratrp a) l_e_st_eq_landau_n_rt_rp_5162_ksi (λt:l_e_st_eq_landau_n_rt_rp_ratrp l_e_st_eq_landau_n_rt_rp_5162_ksi.l_e_st_eq_landau_n_rt_rp_5162_t49 t) : l_e_st_eq_landau_n_rt_rp_some (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_irratrp a)).
-
-(* constant 3116 *)
-definition l_e_st_eq_landau_n_rt_rp_sqrt ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_ind l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) zeta) (l_e_st_eq_landau_n_rt_rp_satz161 zeta) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3117 *)
-definition l_e_st_eq_landau_n_rt_rp_thsqrt1 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_oneax l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) zeta) (l_e_st_eq_landau_n_rt_rp_satz161 zeta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_sqrt zeta) (l_e_st_eq_landau_n_rt_rp_sqrt zeta)) zeta).
-
-(* constant 3118 *)
-definition l_e_st_eq_landau_n_rt_rp_thsqrt2 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi ksi) zeta.(l_e_st_eq_landau_n_rt_rp_5161_t20 zeta ksi (l_e_st_eq_landau_n_rt_rp_sqrt zeta) i (l_e_st_eq_landau_n_rt_rp_thsqrt1 zeta) : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_sqrt zeta)).
-
-(* constant 3119 *)
-definition l_e_st_eq_landau_n_rt_rp_issqrt ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_sqrt t) ksi eta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_sqrt ksi) (l_e_st_eq_landau_n_rt_rp_sqrt eta)).
-
-(* constant 3120 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_x ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rp_ntofrp ksi nx : l_e_st_eq_landau_n_nat).
-
-(* constant 3121 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_y ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rp_ntofrp eta ny : l_e_st_eq_landau_n_nat).
-
-(* constant 3122 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rp_isrpnt1 ksi nx : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny))).
-
-(* constant 3123 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rp_isrpnt1 eta ny : l_e_st_eq_landau_n_rt_rp_is eta (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny))).
-
-(* constant 3124 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rp_ispl12 ksi (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) eta (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t1 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t2 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi eta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)))).
-
-(* constant 3125 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_x0 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 3126 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_y0 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 3127 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_natrti (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny)).
-
-(* constant 3128 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_natrti (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)).
-
-(* constant 3129 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_satz155a (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)))).
-
-(* constant 3130 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_satz112d (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t4 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t5 ksi nx eta ny) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny))).
-
-(* constant 3131 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_xpy ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t7 ksi nx eta ny) : l_e_st_eq_landau_n_nat).
-
-(* constant 3132 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_isrtn1 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t7 ksi nx eta ny) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_iiia_xpy ksi nx eta ny))).
-
-(* constant 3133 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rp_isrterp (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_iiia_xpy ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t8 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xpy ksi nx eta ny))).
-
-(* constant 3134 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl ksi eta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xpy ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t3 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t6 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t9 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi eta) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xpy ksi nx eta ny))).
-
-(* constant 3135 *)
-definition l_e_st_eq_landau_n_rt_rp_natpl ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi eta) (l_e_st_eq_landau_n_rt_rp_rpofnt t)) (l_e_st_eq_landau_n_rt_rp_iiia_xpy ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t10 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_pl ksi eta)).
-
-(* constant 3136 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rp_ists12 ksi (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) eta (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t1 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t2 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)))).
-
-(* constant 3137 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_satz155c (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)))).
-
-(* constant 3138 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_satz112f (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t4 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t5 ksi nx eta ny) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny))).
-
-(* constant 3139 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_xty ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t13 ksi nx eta ny) : l_e_st_eq_landau_n_nat).
-
-(* constant 3140 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_isrtn1 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t13 ksi nx eta ny) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_iiia_xty ksi nx eta ny))).
-
-(* constant 3141 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rp_isrterp (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_iiia_xty ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t14 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xty ksi nx eta ny))).
-
-(* constant 3142 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xty ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t11 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t12 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t15 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xty ksi nx eta ny))).
-
-(* constant 3143 *)
-definition l_e_st_eq_landau_n_rt_rp_natts ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_rpofnt t)) (l_e_st_eq_landau_n_rt_rp_iiia_xty ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t16 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_ts ksi eta)).
-
-(* constant 3144 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_ismore12 ksi (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) eta (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t1 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t2 ksi nx eta ny) m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny))).
-
-(* constant 3145 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_satz154d (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t17 ksi nx eta ny m) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)).
-
-(* constant 3146 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_ismn12 ksi (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) eta (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)) m (l_e_st_eq_landau_n_rt_rp_satz154a (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m)) (l_e_st_eq_landau_n_rt_rp_iiia_t1 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t2 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_satz154a (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m)))).
-
-(* constant 3147 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m))) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_satz154a (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m))) (l_e_st_eq_landau_n_rt_rp_satz155b (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_satz154a (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m))) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m)))).
-
-(* constant 3148 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_satz112g (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t4 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t5 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m))).
-
-(* constant 3149 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_xmy ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m)) (l_e_st_eq_landau_n_rt_rp_iiia_t22 ksi nx eta ny m) : l_e_st_eq_landau_n_nat).
-
-(* constant 3150 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_isrtn1 (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m)) (l_e_st_eq_landau_n_rt_rp_iiia_t22 ksi nx eta ny m) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_iiia_xmy ksi nx eta ny m))).
-
-(* constant 3151 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t24 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_isrterp (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_iiia_xmy ksi nx eta ny m)) (l_e_st_eq_landau_n_rt_rp_iiia_t23 ksi nx eta ny m) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m))) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xmy ksi nx eta ny m))).
-
-(* constant 3152 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t25 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_satz154a (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m))) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m))) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xmy ksi nx eta ny m)) (l_e_st_eq_landau_n_rt_rp_iiia_t20 ksi nx eta ny m) (l_e_st_eq_landau_n_rt_rp_iiia_t21 ksi nx eta ny m) (l_e_st_eq_landau_n_rt_rp_iiia_t24 ksi nx eta ny m) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xmy ksi nx eta ny m))).
-
-(* constant 3153 *)
-definition l_e_st_eq_landau_n_rt_rp_natmn ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) (l_e_st_eq_landau_n_rt_rp_rpofnt t)) (l_e_st_eq_landau_n_rt_rp_iiia_xmy ksi nx eta ny m) (l_e_st_eq_landau_n_rt_rp_iiia_t25 ksi nx eta ny m) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_mn ksi eta m)).
-
-(* constant 3154 *)
-definition l_e_st_eq_landau_n_rt_rp_3pl13 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl q r)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl q r) p) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl r q) p) (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_pl q p)) (l_e_st_eq_landau_n_rt_rp_compl p (l_e_st_eq_landau_n_rt_rp_pl q r)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl q r) (l_e_st_eq_landau_n_rt_rp_pl r q) p (l_e_st_eq_landau_n_rt_rp_compl q r)) (l_e_st_eq_landau_n_rt_rp_asspl1 r q p) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl q r)) (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_pl q p))).
-
-(* constant 3155 *)
-definition l_e_st_eq_landau_n_rt_rp_4pl24 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p q) (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl q (l_e_st_eq_landau_n_rt_rp_pl r s))) (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl s (l_e_st_eq_landau_n_rt_rp_pl r q))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p s) (l_e_st_eq_landau_n_rt_rp_pl r q)) (l_e_st_eq_landau_n_rt_rp_asspl1 p q (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl q (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_pl s (l_e_st_eq_landau_n_rt_rp_pl r q)) p (l_e_st_eq_landau_n_rt_rp_3pl13 q r s)) (l_e_st_eq_landau_n_rt_rp_asspl2 p s (l_e_st_eq_landau_n_rt_rp_pl r q)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p q) (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p s) (l_e_st_eq_landau_n_rt_rp_pl r q))).
-
-(* constant 3156 *)
-definition l_e_st_eq_landau_n_rt_rp_3pl12 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl q r)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p q) r) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl q p) r) (l_e_st_eq_landau_n_rt_rp_pl q (l_e_st_eq_landau_n_rt_rp_pl p r)) (l_e_st_eq_landau_n_rt_rp_asspl2 p q r) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl p q) (l_e_st_eq_landau_n_rt_rp_pl q p) r (l_e_st_eq_landau_n_rt_rp_compl p q)) (l_e_st_eq_landau_n_rt_rp_asspl1 q p r) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl q r)) (l_e_st_eq_landau_n_rt_rp_pl q (l_e_st_eq_landau_n_rt_rp_pl p r))).
-
-(* constant 3157 *)
-definition l_e_st_eq_landau_n_rt_rp_4pl23 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p q) (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl q (l_e_st_eq_landau_n_rt_rp_pl r s))) (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_pl q s))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p r) (l_e_st_eq_landau_n_rt_rp_pl q s)) (l_e_st_eq_landau_n_rt_rp_asspl1 p q (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl q (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_pl q s)) p (l_e_st_eq_landau_n_rt_rp_3pl12 q r s)) (l_e_st_eq_landau_n_rt_rp_asspl2 p r (l_e_st_eq_landau_n_rt_rp_pl q s)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p q) (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p r) (l_e_st_eq_landau_n_rt_rp_pl q s))).
-
-(* constant 3158 *)
-definition l_e_st_eq_landau_n_rt_rp_3pl23 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p q) r) (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl q r)) (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl r q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p r) q) (l_e_st_eq_landau_n_rt_rp_asspl1 p q r) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl q r) (l_e_st_eq_landau_n_rt_rp_pl r q) p (l_e_st_eq_landau_n_rt_rp_compl q r)) (l_e_st_eq_landau_n_rt_rp_asspl2 p r q) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p q) r) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p r) q)).
-
-(* constant 3159 *)
-definition l_e_st_eq_landau_n_rt_rp_a2isapa ≝ λp:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts p l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl p p) (l_e_st_eq_landau_n_rt_rp_disttp2 p l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts p l_e_st_eq_landau_n_rt_rp_1rp) p (l_e_st_eq_landau_n_rt_rp_ts p l_e_st_eq_landau_n_rt_rp_1rp) p (l_e_st_eq_landau_n_rt_rp_satz151 p) (l_e_st_eq_landau_n_rt_rp_satz151 p)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl p p)).
-
-(* constant 3160 *)
-definition l_e_st_eq_landau_n_rt_rp_dif ≝ (l_e_st_eq_landau_n_pair1type l_e_st_eq_landau_n_rt_cut : Type[0]).
-
-(* constant 3161 *)
-definition l_e_st_eq_landau_n_rt_rp_df ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_pair1 l_e_st_eq_landau_n_rt_cut a1 a2 : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3162 *)
-definition l_e_st_eq_landau_n_rt_rp_stm ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_first1 l_e_st_eq_landau_n_rt_cut a : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3163 *)
-definition l_e_st_eq_landau_n_rt_rp_std ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_second1 l_e_st_eq_landau_n_rt_cut a : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3164 *)
-definition l_e_st_eq_landau_n_rt_rp_stmis ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_first1is1 l_e_st_eq_landau_n_rt_cut a1 a2 : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a1).
-
-(* constant 3165 *)
-definition l_e_st_eq_landau_n_rt_rp_isstm ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_first1is2 l_e_st_eq_landau_n_rt_cut a1 a2 : l_e_st_eq_landau_n_rt_rp_is a1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2))).
-
-(* constant 3166 *)
-definition l_e_st_eq_landau_n_rt_rp_stdis ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_second1is1 l_e_st_eq_landau_n_rt_cut a1 a2 : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2).
-
-(* constant 3167 *)
-definition l_e_st_eq_landau_n_rt_rp_isstd ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_second1is2 l_e_st_eq_landau_n_rt_cut a1 a2 : l_e_st_eq_landau_n_rt_rp_is a2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))).
-
-(* constant 3168 *)
-definition l_e_st_eq_landau_n_rt_rp_1a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_stm a : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3169 *)
-definition l_e_st_eq_landau_n_rt_rp_2a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_std a : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3170 *)
-definition l_e_st_eq_landau_n_rt_rp_dfis ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_pair1is1 l_e_st_eq_landau_n_rt_cut a : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) a).
-
-(* constant 3171 *)
-definition l_e_st_eq_landau_n_rt_rp_isdf ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_pair1is2 l_e_st_eq_landau_n_rt_cut a : l_e_is l_e_st_eq_landau_n_rt_rp_dif a (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3172 *)
-definition l_e_st_eq_landau_n_rt_rp_12issmsd ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ispl12 a1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) b2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_isstm a1 a2) (l_e_st_eq_landau_n_rt_rp_isstd b1 b2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2)))).
-
-(* constant 3173 *)
-definition l_e_st_eq_landau_n_rt_rp_smsdis12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_12issmsd a1 a2 b1 b2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_pl a1 b2)).
-
-(* constant 3174 *)
-definition l_e_st_eq_landau_n_rt_rp_1sdissmsd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ispl1 r1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_isstm r1 r2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3175 *)
-definition l_e_st_eq_landau_n_rt_rp_smsdis1sd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_1sdissmsd a r1 r2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3176 *)
-definition l_e_st_eq_landau_n_rt_rp_sm2issmsd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ispl2 r2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_isstd r1 r2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2)))).
-
-(* constant 3177 *)
-definition l_e_st_eq_landau_n_rt_rp_smsdissm2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2))) (l_e_st_eq_landau_n_rt_rp_sm2issmsd a r1 r2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2)).
-
-(* constant 3178 *)
-definition l_e_st_eq_landau_n_rt_rp_issm ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is a1 r.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_rp_dif (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_df t a2) a1 r i : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df r a2)).
-
-(* constant 3179 *)
-definition l_e_st_eq_landau_n_rt_rp_issd ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is a2 r.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_rp_dif (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_df a1 t) a2 r i : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df a1 r)).
-
-(* constant 3180 *)
-definition l_e_st_eq_landau_n_rt_rp_issmsd ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is a1 b1.λj:l_e_st_eq_landau_n_rt_rp_is a2 b2.(l_e_tris l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2) (l_e_st_eq_landau_n_rt_rp_issm a1 a2 b1 i) (l_e_st_eq_landau_n_rt_rp_issd b1 a2 b2 j) : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)).
-
-(* constant 3181 *)
-definition l_e_st_eq_landau_n_rt_rp_1b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_stm b : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3182 *)
-definition l_e_st_eq_landau_n_rt_rp_2b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_std b : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3183 *)
-definition l_e_st_eq_landau_n_rt_rp_eq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : Prop).
-
-(* constant 3184 *)
-definition l_e_st_eq_landau_n_rt_rp_eqi12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl b1 a2).(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl b1 a2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_smsdis12 a1 a2 b1 b2) i (l_e_st_eq_landau_n_rt_rp_12issmsd b1 b2 a1 a2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)).
-
-(* constant 3185 *)
-definition l_e_st_eq_landau_n_rt_rp_eqi1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)).(l_e_isp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq x (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) a (l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) r1 r2 i) (l_e_st_eq_landau_n_rt_rp_dfis a) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_df r1 r2)).
-
-(* constant 3186 *)
-definition l_e_st_eq_landau_n_rt_rp_eqi2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2).(l_e_isp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df r1 r2) x) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) a (l_e_st_eq_landau_n_rt_rp_eqi12 r1 r2 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) i) (l_e_st_eq_landau_n_rt_rp_dfis a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df r1 r2) a).
-
-(* constant 3187 *)
-definition l_e_st_eq_landau_n_rt_rp_eqe12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2).(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_pl b1 a2) (l_e_st_eq_landau_n_rt_rp_12issmsd a1 a2 b1 b2) e (l_e_st_eq_landau_n_rt_rp_smsdis12 b1 b2 a1 a2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl b1 a2)).
-
-(* constant 3188 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd163 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_e_st_eq_landau_n_rt_rp_eq a a).
-
-(* constant 3189 *)
-definition l_e_st_eq_landau_n_rt_rp_refeq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satzd163 a : l_e_st_eq_landau_n_rt_rp_eq a a).
-
-(* constant 3190 *)
-definition l_e_st_eq_landau_n_rt_rp_refeq1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_is l_e_st_eq_landau_n_rt_rp_dif a b.(l_e_isp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq a x) a b (l_e_st_eq_landau_n_rt_rp_refeq a) i : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3191 *)
-definition l_e_st_eq_landau_n_rt_rp_refeq2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_is l_e_st_eq_landau_n_rt_rp_dif a b.(l_e_isp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq x a) a b (l_e_st_eq_landau_n_rt_rp_refeq a) i : l_e_st_eq_landau_n_rt_rp_eq b a).
-
-(* constant 3192 *)
-definition l_e_st_eq_landau_n_rt_rp_eqsmsd ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is a1 b1.λj:l_e_st_eq_landau_n_rt_rp_is a2 b2.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2) (l_e_st_eq_landau_n_rt_rp_issmsd a1 a2 b1 b2 i j) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)).
-
-(* constant 3193 *)
-definition l_e_st_eq_landau_n_rt_rp_eqsm ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is a1 r.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df r a2) (l_e_st_eq_landau_n_rt_rp_issm a1 a2 r i) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df r a2)).
-
-(* constant 3194 *)
-definition l_e_st_eq_landau_n_rt_rp_eqsd ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is a2 r.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df a1 r) (l_e_st_eq_landau_n_rt_rp_issd a1 a2 r i) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df a1 r)).
-
-(* constant 3195 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd164 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) e : l_e_st_eq_landau_n_rt_rp_eq b a).
-
-(* constant 3196 *)
-definition l_e_st_eq_landau_n_rt_rp_symeq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_satzd164 a b e : l_e_st_eq_landau_n_rt_rp_eq b a).
-
-(* constant 3197 *)
-definition l_e_st_eq_landau_n_rt_rp_1c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_stm c : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3198 *)
-definition l_e_st_eq_landau_n_rt_rp_2c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_std c : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3199 *)
-definition l_e_st_eq_landau_n_rt_rp_1d165_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq b c.(l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b)) e f : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b)))).
-
-(* constant 3200 *)
-definition l_e_st_eq_landau_n_rt_rp_1d165_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq b c.(l_e_tr4is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_1d165_t1 a b c e f) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)))).
-
-(* constant 3201 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd165 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq b c.(l_e_st_eq_landau_n_rt_rp_satz136b (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_1d165_t2 a b c e f) : l_e_st_eq_landau_n_rt_rp_eq a c).
-
-(* constant 3202 *)
-definition l_e_st_eq_landau_n_rt_rp_treq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq b c.(l_e_st_eq_landau_n_rt_rp_satzd165 a b c e f : l_e_st_eq_landau_n_rt_rp_eq a c).
-
-(* constant 3203 *)
-definition l_e_st_eq_landau_n_rt_rp_treq1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq c a.λf:l_e_st_eq_landau_n_rt_rp_eq c b.(l_e_st_eq_landau_n_rt_rp_treq a c b (l_e_st_eq_landau_n_rt_rp_symeq c a e) f : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3204 *)
-definition l_e_st_eq_landau_n_rt_rp_treq2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a c.λf:l_e_st_eq_landau_n_rt_rp_eq b c.(l_e_st_eq_landau_n_rt_rp_treq a c b e (l_e_st_eq_landau_n_rt_rp_symeq b c f) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3205 *)
-definition l_e_st_eq_landau_n_rt_rp_tr3eq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe1:l_e_st_eq_landau_n_rt_rp_eq a b.λe2:l_e_st_eq_landau_n_rt_rp_eq b c.λe3:l_e_st_eq_landau_n_rt_rp_eq c d.(l_e_st_eq_landau_n_rt_rp_treq a b d e1 (l_e_st_eq_landau_n_rt_rp_treq b c d e2 e3) : l_e_st_eq_landau_n_rt_rp_eq a d).
-
-(* constant 3206 *)
-definition l_e_st_eq_landau_n_rt_rp_tr4eq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_dif.λe1:l_e_st_eq_landau_n_rt_rp_eq a b.λe2:l_e_st_eq_landau_n_rt_rp_eq b c.λe3:l_e_st_eq_landau_n_rt_rp_eq c d.λe4:l_e_st_eq_landau_n_rt_rp_eq d e.(l_e_st_eq_landau_n_rt_rp_tr3eq a b c e e1 e2 (l_e_st_eq_landau_n_rt_rp_treq c d e e3 e4) : l_e_st_eq_landau_n_rt_rp_eq a e).
-
-(* constant 3207 *)
-definition l_e_st_eq_landau_n_rt_rp_posd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) : Prop).
-
-(* constant 3208 *)
-definition l_e_st_eq_landau_n_rt_rp_zero ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) : Prop).
-
-(* constant 3209 *)
-definition l_e_st_eq_landau_n_rt_rp_negd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) : Prop).
-
-(* constant 3210 *)
-definition l_e_st_eq_landau_n_rt_rp_posdi ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more a1 a2.(l_e_st_eq_landau_n_rt_rp_ismore12 a1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_isstm a1 a2) (l_e_st_eq_landau_n_rt_rp_isstd a1 a2) m : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_df a1 a2)).
-
-(* constant 3211 *)
-definition l_e_st_eq_landau_n_rt_rp_zeroi ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is a1 a2.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a1 a2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stmis a1 a2) i (l_e_st_eq_landau_n_rt_rp_isstd a1 a2) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_df a1 a2)).
-
-(* constant 3212 *)
-definition l_e_st_eq_landau_n_rt_rp_negdi ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less a1 a2.(l_e_st_eq_landau_n_rt_rp_isless12 a1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_isstm a1 a2) (l_e_st_eq_landau_n_rt_rp_isstd a1 a2) l : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_df a1 a2)).
-
-(* constant 3213 *)
-definition l_e_st_eq_landau_n_rt_rp_axrde ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) : l_ec3 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a)).
-
-(* constant 3214 *)
-definition l_e_st_eq_landau_n_rt_rp_axrdo ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satz123a (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) : l_or3 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a)).
-
-(* constant 3215 *)
-definition l_e_st_eq_landau_n_rt_rp_axrd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_orec3i (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_axrdo a) (l_e_st_eq_landau_n_rt_rp_axrde a) : l_orec3 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a)).
-
-(* constant 3216 *)
-definition l_e_st_eq_landau_n_rt_rp_rappd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:Prop.λp1:∀t:l_e_st_eq_landau_n_rt_rp_posd a.p.λp2:∀t:l_e_st_eq_landau_n_rt_rp_zero a.p.λp3:∀t:l_e_st_eq_landau_n_rt_rp_negd a.p.(l_or3app (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) p (l_e_st_eq_landau_n_rt_rp_axrdo a) p2 p1 p3 : p).
-
-(* constant 3217 *)
-definition l_e_st_eq_landau_n_rt_rp_pnot0d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_ec3e21 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_axrde a) p : l_not (l_e_st_eq_landau_n_rt_rp_zero a)).
-
-(* constant 3218 *)
-definition l_e_st_eq_landau_n_rt_rp_pnotnd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_ec3e23 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_axrde a) p : l_not (l_e_st_eq_landau_n_rt_rp_negd a)).
-
-(* constant 3219 *)
-definition l_e_st_eq_landau_n_rt_rp_0notpd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_ec3e12 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_axrde a) z : l_not (l_e_st_eq_landau_n_rt_rp_posd a)).
-
-(* constant 3220 *)
-definition l_e_st_eq_landau_n_rt_rp_0notnd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_ec3e13 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_axrde a) z : l_not (l_e_st_eq_landau_n_rt_rp_negd a)).
-
-(* constant 3221 *)
-definition l_e_st_eq_landau_n_rt_rp_nnotpd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_ec3e32 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_axrde a) n : l_not (l_e_st_eq_landau_n_rt_rp_posd a)).
-
-(* constant 3222 *)
-definition l_e_st_eq_landau_n_rt_rp_nnot0d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_ec3e31 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_axrde a) n : l_not (l_e_st_eq_landau_n_rt_rp_zero a)).
-
-(* constant 3223 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) e (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_satz135a (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) p) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3224 *)
-definition l_e_st_eq_landau_n_rt_rp_eqposd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_satz136a (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv1d_t1 a b e p) : l_e_st_eq_landau_n_rt_rp_posd b).
-
-(* constant 3225 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_symeq a b e) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) z) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3226 *)
-definition l_e_st_eq_landau_n_rt_rp_eqzero ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_satz136b (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv1d_t2 a b e z) : l_e_st_eq_landau_n_rt_rp_zero b).
-
-(* constant 3227 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) e (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_satz135c (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) n) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3228 *)
-definition l_e_st_eq_landau_n_rt_rp_eqnegd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_satz136c (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv1d_t3 a b e n) : l_e_st_eq_landau_n_rt_rp_negd b).
-
-(* constant 3229 *)
-definition l_e_st_eq_landau_n_rt_rp_zeroeq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.λy:l_e_st_eq_landau_n_rt_rp_zero b.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b) z (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) y)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3230 *)
-definition l_e_st_eq_landau_n_rt_rp_pdofrp ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3231 *)
-definition l_e_st_eq_landau_n_rt_rp_ndofrp ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3232 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpepd ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is r s.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s) (l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_pdofrp x) r s i) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)).
-
-(* constant 3233 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpend ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is r s.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_ndofrp s) (l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ndofrp x) r s i) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_ndofrp s)).
-
-(* constant 3234 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t4 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s).(l_e_st_eq_landau_n_rt_rp_satz136b (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_eqe12 (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp e) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp)).
-
-(* constant 3235 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpipd ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s).(l_e_st_eq_landau_n_rt_rp_satz136b r s l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_iv1d_t4 r s e) : l_e_st_eq_landau_n_rt_rp_is r s).
-
-(* constant 3236 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t5 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_ndofrp s).(l_e_st_eq_landau_n_rt_rp_satz136e (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_eqe12 l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) e) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp)).
-
-(* constant 3237 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpind ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_ndofrp s).(l_e_symis l_e_st_eq_landau_n_rt_cut s r (l_e_st_eq_landau_n_rt_rp_satz136b s r l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_iv1d_t5 r s e)) : l_e_st_eq_landau_n_rt_rp_is r s).
-
-(* constant 3238 *)
-definition l_e_st_eq_landau_n_rt_rp_posdirp ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_posdi (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_ismore1 (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp r) (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_compl l_e_st_eq_landau_n_rt_rp_1rp r) (l_e_st_eq_landau_n_rt_rp_satz133 l_e_st_eq_landau_n_rt_rp_1rp r)) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3239 *)
-definition l_e_st_eq_landau_n_rt_rp_negdirp ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_negdi l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp r) (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_compl l_e_st_eq_landau_n_rt_rp_1rp r) (l_e_st_eq_landau_n_rt_rp_satz133a l_e_st_eq_landau_n_rt_rp_1rp r)) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_ndofrp r)).
-
-(* constant 3240 *)
-definition l_e_st_eq_landau_n_rt_rp_rpofpd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) p : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3241 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_tr4is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofpd a p) (l_e_st_eq_landau_n_rt_rp_2a a)) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofpd a p) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofpd a p) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofpd a p) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofpd a p) (l_e_st_eq_landau_n_rt_rp_2a a)) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_satz140f (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) p)) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_rpofpd a p) (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_rpofpd a p) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_asspl2 (l_e_st_eq_landau_n_rt_rp_rpofpd a p) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_2a a)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofpd a p) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3242 *)
-definition l_e_st_eq_landau_n_rt_rp_eqpdrp1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_eqi1 a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofpd a p) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_iv1d_t6 a p) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd a p))).
-
-(* constant 3243 *)
-definition l_e_st_eq_landau_n_rt_rp_eqpdrp2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_symeq a (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd a p)) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 a p) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd a p)) a).
-
-(* constant 3244 *)
-definition l_e_st_eq_landau_n_rt_rp_rpofnd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) n) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3245 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnd a n) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_rpofnd a n)) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_asspl2 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_rpofnd a n) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_rpofnd a n)) (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_satz140c (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) n))) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnd a n) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3246 *)
-definition l_e_st_eq_landau_n_rt_rp_eqndrp1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_eqi1 a l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnd a n) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_iv1d_t7 a n) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd a n))).
-
-(* constant 3247 *)
-definition l_e_st_eq_landau_n_rt_rp_eqndrp2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_symeq a (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd a n)) (l_e_st_eq_landau_n_rt_rp_eqndrp1 a n) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd a n)) a).
-
-(* constant 3248 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t8 ≝ λh:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd h.λk:l_e_st_eq_landau_n_rt_rp_dif.λq:l_e_st_eq_landau_n_rt_rp_posd k.λe:l_e_st_eq_landau_n_rt_rp_eq h k.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd h p)) h k (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd k q)) (l_e_st_eq_landau_n_rt_rp_eqpdrp2 h p) e (l_e_st_eq_landau_n_rt_rp_eqpdrp1 k q) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd h p)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd k q))).
-
-(* constant 3249 *)
-definition l_e_st_eq_landau_n_rt_rp_eqpderp ≝ λh:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd h.λk:l_e_st_eq_landau_n_rt_rp_dif.λq:l_e_st_eq_landau_n_rt_rp_posd k.λe:l_e_st_eq_landau_n_rt_rp_eq h k.(l_e_st_eq_landau_n_rt_rp_isrpipd (l_e_st_eq_landau_n_rt_rp_rpofpd h p) (l_e_st_eq_landau_n_rt_rp_rpofpd k q) (l_e_st_eq_landau_n_rt_rp_iv1d_t8 h p k q e) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofpd h p) (l_e_st_eq_landau_n_rt_rp_rpofpd k q)).
-
-(* constant 3250 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t9 ≝ λh:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd h.λk:l_e_st_eq_landau_n_rt_rp_dif.λq:l_e_st_eq_landau_n_rt_rp_posd k.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofpd h p) (l_e_st_eq_landau_n_rt_rp_rpofpd k q).(l_e_st_eq_landau_n_rt_rp_isrpepd (l_e_st_eq_landau_n_rt_rp_rpofpd h p) (l_e_st_eq_landau_n_rt_rp_rpofpd k q) i : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd h p)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd k q))).
-
-(* constant 3251 *)
-definition l_e_st_eq_landau_n_rt_rp_eqpdirp ≝ λh:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd h.λk:l_e_st_eq_landau_n_rt_rp_dif.λq:l_e_st_eq_landau_n_rt_rp_posd k.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofpd h p) (l_e_st_eq_landau_n_rt_rp_rpofpd k q).(l_e_st_eq_landau_n_rt_rp_tr3eq h (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd h p)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd k q)) k (l_e_st_eq_landau_n_rt_rp_eqpdrp1 h p) (l_e_st_eq_landau_n_rt_rp_iv1d_t9 h p k q i) (l_e_st_eq_landau_n_rt_rp_eqpdrp2 k q) : l_e_st_eq_landau_n_rt_rp_eq h k).
-
-(* constant 3252 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t10 ≝ λh:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd h.λk:l_e_st_eq_landau_n_rt_rp_dif.λo:l_e_st_eq_landau_n_rt_rp_negd k.λe:l_e_st_eq_landau_n_rt_rp_eq h k.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd h n)) h k (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd k o)) (l_e_st_eq_landau_n_rt_rp_eqndrp2 h n) e (l_e_st_eq_landau_n_rt_rp_eqndrp1 k o) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd h n)) (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd k o))).
-
-(* constant 3253 *)
-definition l_e_st_eq_landau_n_rt_rp_eqnderp ≝ λh:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd h.λk:l_e_st_eq_landau_n_rt_rp_dif.λo:l_e_st_eq_landau_n_rt_rp_negd k.λe:l_e_st_eq_landau_n_rt_rp_eq h k.(l_e_st_eq_landau_n_rt_rp_isrpind (l_e_st_eq_landau_n_rt_rp_rpofnd h n) (l_e_st_eq_landau_n_rt_rp_rpofnd k o) (l_e_st_eq_landau_n_rt_rp_iv1d_t10 h n k o e) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnd h n) (l_e_st_eq_landau_n_rt_rp_rpofnd k o)).
-
-(* constant 3254 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t11 ≝ λh:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd h.λk:l_e_st_eq_landau_n_rt_rp_dif.λo:l_e_st_eq_landau_n_rt_rp_negd k.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnd h n) (l_e_st_eq_landau_n_rt_rp_rpofnd k o).(l_e_st_eq_landau_n_rt_rp_isrpend (l_e_st_eq_landau_n_rt_rp_rpofnd h n) (l_e_st_eq_landau_n_rt_rp_rpofnd k o) i : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd h n)) (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd k o))).
-
-(* constant 3255 *)
-definition l_e_st_eq_landau_n_rt_rp_eqndirp ≝ λh:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd h.λk:l_e_st_eq_landau_n_rt_rp_dif.λo:l_e_st_eq_landau_n_rt_rp_negd k.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnd h n) (l_e_st_eq_landau_n_rt_rp_rpofnd k o).(l_e_st_eq_landau_n_rt_rp_tr3eq h (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd h n)) (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd k o)) k (l_e_st_eq_landau_n_rt_rp_eqndrp1 h n) (l_e_st_eq_landau_n_rt_rp_iv1d_t11 h n k o i) (l_e_st_eq_landau_n_rt_rp_eqndrp2 k o) : l_e_st_eq_landau_n_rt_rp_eq h k).
-
-(* constant 3256 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t12 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_eqpdrp1 (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_posdirp r) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_posdirp r)))).
-
-(* constant 3257 *)
-definition l_e_st_eq_landau_n_rt_rp_isrppd1 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isrpipd r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_posdirp r)) (l_e_st_eq_landau_n_rt_rp_iv1d_t12 r) : l_e_st_eq_landau_n_rt_rp_is r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_posdirp r))).
-
-(* constant 3258 *)
-definition l_e_st_eq_landau_n_rt_rp_isrppd2 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_posdirp r)) (l_e_st_eq_landau_n_rt_rp_isrppd1 r) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_posdirp r)) r).
-
-(* constant 3259 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t13 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_eqndrp1 (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_negdirp r) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_negdirp r)))).
-
-(* constant 3260 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpnd1 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isrpind r (l_e_st_eq_landau_n_rt_rp_rpofnd (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_negdirp r)) (l_e_st_eq_landau_n_rt_rp_iv1d_t13 r) : l_e_st_eq_landau_n_rt_rp_is r (l_e_st_eq_landau_n_rt_rp_rpofnd (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_negdirp r))).
-
-(* constant 3261 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpnd2 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut r (l_e_st_eq_landau_n_rt_rp_rpofnd (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_negdirp r)) (l_e_st_eq_landau_n_rt_rp_isrpnd1 r) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnd (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_negdirp r)) r).
-
-(* constant 3262 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad1 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_eqi12 a1 a2 (l_e_st_eq_landau_n_rt_rp_pl a1 r) (l_e_st_eq_landau_n_rt_rp_pl a2 r) (l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl a1 (l_e_st_eq_landau_n_rt_rp_pl a2 r)) (l_e_st_eq_landau_n_rt_rp_pl a1 (l_e_st_eq_landau_n_rt_rp_pl r a2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl a1 r) a2) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl a2 r) (l_e_st_eq_landau_n_rt_rp_pl r a2) a1 (l_e_st_eq_landau_n_rt_rp_compl a2 r)) (l_e_st_eq_landau_n_rt_rp_asspl2 a1 r a2)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 r) (l_e_st_eq_landau_n_rt_rp_pl a2 r))).
-
-(* constant 3263 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad2 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 r) (l_e_st_eq_landau_n_rt_rp_pl a2 r)) (l_e_st_eq_landau_n_rt_rp_lemmad1 a1 a2 r) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 r) (l_e_st_eq_landau_n_rt_rp_pl a2 r)) (l_e_st_eq_landau_n_rt_rp_df a1 a2)).
-
-(* constant 3264 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_treq a (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r)) (l_e_st_eq_landau_n_rt_rp_refeq1 a (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_isdf a)) (l_e_st_eq_landau_n_rt_rp_lemmad1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) r) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r))).
-
-(* constant 3265 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_symeq a (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r)) (l_e_st_eq_landau_n_rt_rp_lemmad3 a r) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r)) a).
-
-(* constant 3266 *)
-definition l_e_st_eq_landau_n_rt_rp_absd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_ite (l_e_st_eq_landau_n_rt_rp_negd a) l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) a : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3267 *)
-definition l_e_st_eq_landau_n_rt_rp_absnd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_itet (l_e_st_eq_landau_n_rt_rp_negd a) l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) a n) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))).
-
-(* constant 3268 *)
-definition l_e_st_eq_landau_n_rt_rp_absnnd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_itef (l_e_st_eq_landau_n_rt_rp_negd a) l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) a n) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) a).
-
-(* constant 3269 *)
-definition l_e_st_eq_landau_n_rt_rp_absdeql ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less a1 a2.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_df a2 a1) (l_e_st_eq_landau_n_rt_rp_absnd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_negdi a1 a2 l)) (l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2 a1 (l_e_st_eq_landau_n_rt_rp_stdis a1 a2) (l_e_st_eq_landau_n_rt_rp_stmis a1 a2)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_df a2 a1)).
-
-(* constant 3270 *)
-definition l_e_st_eq_landau_n_rt_rp_absdeqm ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis a1 a2.(l_e_st_eq_landau_n_rt_rp_absnnd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_less a1 a2) (l_e_st_eq_landau_n_rt_rp_satz123c a1 a2 m) (λt:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_df a1 a2).l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a1 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2 (l_e_st_eq_landau_n_rt_rp_stmis a1 a2) (l_e_st_eq_landau_n_rt_rp_stdis a1 a2) t)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_df a1 a2)).
-
-(* constant 3271 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_symeq a b e) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a))).
-
-(* constant 3272 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_absnd a n) (l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_iv2d_t1 a b e n)) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_absnd b (l_e_st_eq_landau_n_rt_rp_eqnegd a b e n))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).
-
-(* constant 3273 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_absd a) a b (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_absnnd a n) e (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd b) b (l_e_st_eq_landau_n_rt_rp_absnnd b (l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_negd a) n (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_eqnegd b a (l_e_st_eq_landau_n_rt_rp_symeq a b e) t)))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).
-
-(* constant 3274 *)
-definition l_e_st_eq_landau_n_rt_rp_eqabsd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_iv2d_t2 a b e t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_negd a).l_e_st_eq_landau_n_rt_rp_iv2d_t3 a b e t) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).
-
-(* constant 3275 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd166a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_eqposd a (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a p))) p : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3276 *)
-definition l_e_st_eq_landau_n_rt_rp_2d166_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_posdi (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) n) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))).
-
-(* constant 3277 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd166b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_absnd a n)) (l_e_st_eq_landau_n_rt_rp_2d166_t1 a n) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3278 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd166c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b).(l_e_st_eq_landau_n_rt_rp_tr3eq a (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b) b (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a p))) e (l_e_st_eq_landau_n_rt_rp_absnnd b (l_e_st_eq_landau_n_rt_rp_pnotnd b q)) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3279 *)
-definition l_e_st_eq_landau_n_rt_rp_2d166_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λo:l_e_st_eq_landau_n_rt_rp_negd b.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b).(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_absnd a n)) e (l_e_st_eq_landau_n_rt_rp_absnd b o) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b))).
-
-(* constant 3280 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd166d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λo:l_e_st_eq_landau_n_rt_rp_negd b.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b).(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_eqe12 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d166_t2 a b n o e))) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3281 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd166e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_e_st_eq_landau_n_rt_rp_rappd a (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a)) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_satzd166a a t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a)) n) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_satzd166b a t) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3282 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd166f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_eqzero a (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_0notnd a z))) z : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3283 *)
-definition l_e_st_eq_landau_n_rt_rp_mored ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : Prop).
-
-(* constant 3284 *)
-definition l_e_st_eq_landau_n_rt_rp_moredi12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl b1 a2).(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_pl b1 a2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_12issmsd a1 a2 b1 b2) (l_e_st_eq_landau_n_rt_rp_12issmsd b1 b2 a1 a2) m : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)).
-
-(* constant 3285 *)
-definition l_e_st_eq_landau_n_rt_rp_moredi1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)).(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2))) (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_sm2issmsd a r1 r2) (l_e_st_eq_landau_n_rt_rp_1sdissmsd a r1 r2) m : l_e_st_eq_landau_n_rt_rp_mored a (l_e_st_eq_landau_n_rt_rp_df r1 r2)).
-
-(* constant 3286 *)
-definition l_e_st_eq_landau_n_rt_rp_moredi2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2).(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2))) (l_e_st_eq_landau_n_rt_rp_1sdissmsd a r1 r2) (l_e_st_eq_landau_n_rt_rp_sm2issmsd a r1 r2) m : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_df r1 r2) a).
-
-(* constant 3287 *)
-definition l_e_st_eq_landau_n_rt_rp_morede12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2).(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_pl b1 a2) (l_e_st_eq_landau_n_rt_rp_smsdis12 a1 a2 b1 b2) (l_e_st_eq_landau_n_rt_rp_smsdis12 b1 b2 a1 a2) m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl b1 a2)).
-
-(* constant 3288 *)
-definition l_e_st_eq_landau_n_rt_rp_lessd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : Prop).
-
-(* constant 3289 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) m : l_e_st_eq_landau_n_rt_rp_lessd b a).
-
-(* constant 3290 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) l : l_e_st_eq_landau_n_rt_rp_mored b a).
-
-(* constant 3291 *)
-definition l_e_st_eq_landau_n_rt_rp_lessdi12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl b1 a2).(l_e_st_eq_landau_n_rt_rp_lemmad5 (l_e_st_eq_landau_n_rt_rp_df b1 b2) (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_moredi12 b1 b2 a1 a2 (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl b1 a2) l)) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)).
-
-(* constant 3292 *)
-definition l_e_st_eq_landau_n_rt_rp_lessdi1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)).(l_e_st_eq_landau_n_rt_rp_lemmad5 (l_e_st_eq_landau_n_rt_rp_df r1 r2) a (l_e_st_eq_landau_n_rt_rp_moredi2 a r1 r2 (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) l)) : l_e_st_eq_landau_n_rt_rp_lessd a (l_e_st_eq_landau_n_rt_rp_df r1 r2)).
-
-(* constant 3293 *)
-definition l_e_st_eq_landau_n_rt_rp_lessdi2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2).(l_e_st_eq_landau_n_rt_rp_lemmad5 a (l_e_st_eq_landau_n_rt_rp_df r1 r2) (l_e_st_eq_landau_n_rt_rp_moredi1 a r1 r2 (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) l)) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_df r1 r2) a).
-
-(* constant 3294 *)
-definition l_e_st_eq_landau_n_rt_rp_lessde12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2).(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_pl b1 a2) (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_morede12 b1 b2 a1 a2 (l_e_st_eq_landau_n_rt_rp_lemmad6 (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2) l)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl b1 a2)).
-
-(* constant 3295 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satz123 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_orec3 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b)).
-
-(* constant 3296 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satz123a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_or3 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b)).
-
-(* constant 3297 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_ec3 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b)).
-
-(* constant 3298 *)
-definition l_e_st_eq_landau_n_rt_rp_1d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_stm d : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3299 *)
-definition l_e_st_eq_landau_n_rt_rp_2d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_std d : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3300 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.λm:l_e_st_eq_landau_n_rt_rp_mored a c.(l_e_tr4is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d a b c d)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2d a b c d))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d a b c d) (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2d a b c d)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_symeq a b e) f) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2b a b))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d a b c d)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)))).
-
-(* constant 3301 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.λm:l_e_st_eq_landau_n_rt_rp_mored a c.(l_e_st_eq_landau_n_rt_rp_ismore2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d a b c d)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d a b c d)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_iv2d_t4 a b c d e f m) (l_e_st_eq_landau_n_rt_rp_satz135d (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d a b c d)) m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d a b c d)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)))).
-
-(* constant 3302 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmored12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.λm:l_e_st_eq_landau_n_rt_rp_mored a c.(l_e_st_eq_landau_n_rt_rp_satz136a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d a b c d)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_iv2d_t5 a b c d e f m) : l_e_st_eq_landau_n_rt_rp_mored b d).
-
-(* constant 3303 *)
-definition l_e_st_eq_landau_n_rt_rp_eqlessd12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.λl:l_e_st_eq_landau_n_rt_rp_lessd a c.(l_e_st_eq_landau_n_rt_rp_lemmad5 d b (l_e_st_eq_landau_n_rt_rp_eqmored12 c d a b f e (l_e_st_eq_landau_n_rt_rp_lemmad6 a c l)) : l_e_st_eq_landau_n_rt_rp_lessd b d).
-
-(* constant 3304 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmored1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λm:l_e_st_eq_landau_n_rt_rp_mored a c.(l_e_st_eq_landau_n_rt_rp_eqmored12 a b c c e (l_e_st_eq_landau_n_rt_rp_refeq c) m : l_e_st_eq_landau_n_rt_rp_mored b c).
-
-(* constant 3305 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmored2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λm:l_e_st_eq_landau_n_rt_rp_mored c a.(l_e_st_eq_landau_n_rt_rp_eqmored12 c c a b (l_e_st_eq_landau_n_rt_rp_refeq c) e m : l_e_st_eq_landau_n_rt_rp_mored c b).
-
-(* constant 3306 *)
-definition l_e_st_eq_landau_n_rt_rp_eqlessd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λl:l_e_st_eq_landau_n_rt_rp_lessd a c.(l_e_st_eq_landau_n_rt_rp_eqlessd12 a b c c e (l_e_st_eq_landau_n_rt_rp_refeq c) l : l_e_st_eq_landau_n_rt_rp_lessd b c).
-
-(* constant 3307 *)
-definition l_e_st_eq_landau_n_rt_rp_eqlessd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λl:l_e_st_eq_landau_n_rt_rp_lessd c a.(l_e_st_eq_landau_n_rt_rp_eqlessd12 c c a b (l_e_st_eq_landau_n_rt_rp_refeq c) e l : l_e_st_eq_landau_n_rt_rp_lessd c b).
-
-(* constant 3308 *)
-definition l_e_st_eq_landau_n_rt_rp_moreq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_or (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) : Prop).
-
-(* constant 3309 *)
-definition l_e_st_eq_landau_n_rt_rp_lesseq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_or (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_eq a b) : Prop).
-
-(* constant 3310 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd168a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_lessd b a) (l_e_st_eq_landau_n_rt_rp_eq b a) m (λt:l_e_st_eq_landau_n_rt_rp_mored a b.l_e_st_eq_landau_n_rt_rp_lemmad5 a b t) (λt:l_e_st_eq_landau_n_rt_rp_eq a b.l_e_st_eq_landau_n_rt_rp_symeq a b t) : l_e_st_eq_landau_n_rt_rp_lesseq b a).
-
-(* constant 3311 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd168b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored b a) (l_e_st_eq_landau_n_rt_rp_eq b a) l (λt:l_e_st_eq_landau_n_rt_rp_lessd a b.l_e_st_eq_landau_n_rt_rp_lemmad6 a b t) (λt:l_e_st_eq_landau_n_rt_rp_eq a b.l_e_st_eq_landau_n_rt_rp_symeq a b t) : l_e_st_eq_landau_n_rt_rp_moreq b a).
-
-(* constant 3312 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmoreq1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λm:l_e_st_eq_landau_n_rt_rp_moreq a c.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_mored a c) (l_e_st_eq_landau_n_rt_rp_eq a c) (l_e_st_eq_landau_n_rt_rp_mored b c) (l_e_st_eq_landau_n_rt_rp_eq b c) m (λt:l_e_st_eq_landau_n_rt_rp_mored a c.l_e_st_eq_landau_n_rt_rp_eqmored1 a b c e t) (λt:l_e_st_eq_landau_n_rt_rp_eq a c.l_e_st_eq_landau_n_rt_rp_treq1 b c a e t) : l_e_st_eq_landau_n_rt_rp_moreq b c).
-
-(* constant 3313 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmoreq2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λm:l_e_st_eq_landau_n_rt_rp_moreq c a.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_mored c a) (l_e_st_eq_landau_n_rt_rp_eq c a) (l_e_st_eq_landau_n_rt_rp_mored c b) (l_e_st_eq_landau_n_rt_rp_eq c b) m (λt:l_e_st_eq_landau_n_rt_rp_mored c a.l_e_st_eq_landau_n_rt_rp_eqmored2 a b c e t) (λt:l_e_st_eq_landau_n_rt_rp_eq c a.l_e_st_eq_landau_n_rt_rp_treq c a b t e) : l_e_st_eq_landau_n_rt_rp_moreq c b).
-
-(* constant 3314 *)
-definition l_e_st_eq_landau_n_rt_rp_eqlesseq1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λl:l_e_st_eq_landau_n_rt_rp_lesseq a c.(l_e_st_eq_landau_n_rt_rp_satzd168a c b (l_e_st_eq_landau_n_rt_rp_eqmoreq2 a b c e (l_e_st_eq_landau_n_rt_rp_satzd168b a c l)) : l_e_st_eq_landau_n_rt_rp_lesseq b c).
-
-(* constant 3315 *)
-definition l_e_st_eq_landau_n_rt_rp_eqlesseq2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λl:l_e_st_eq_landau_n_rt_rp_lesseq c a.(l_e_st_eq_landau_n_rt_rp_satzd168a b c (l_e_st_eq_landau_n_rt_rp_eqmoreq1 a b c e (l_e_st_eq_landau_n_rt_rp_satzd168b c a l)) : l_e_st_eq_landau_n_rt_rp_lesseq c b).
-
-(* constant 3316 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmoreq12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.λm:l_e_st_eq_landau_n_rt_rp_moreq a c.(l_e_st_eq_landau_n_rt_rp_eqmoreq1 a b d e (l_e_st_eq_landau_n_rt_rp_eqmoreq2 c d a f m) : l_e_st_eq_landau_n_rt_rp_moreq b d).
-
-(* constant 3317 *)
-definition l_e_st_eq_landau_n_rt_rp_eqlesseq12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.λl:l_e_st_eq_landau_n_rt_rp_lesseq a c.(l_e_st_eq_landau_n_rt_rp_eqlesseq1 a b d e (l_e_st_eq_landau_n_rt_rp_eqlesseq2 c d a f l) : l_e_st_eq_landau_n_rt_rp_lesseq b d).
-
-(* constant 3318 *)
-definition l_e_st_eq_landau_n_rt_rp_moreqi1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_ori1 (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) m : l_e_st_eq_landau_n_rt_rp_moreq a b).
-
-(* constant 3319 *)
-definition l_e_st_eq_landau_n_rt_rp_lesseqi1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_ori1 (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_eq a b) l : l_e_st_eq_landau_n_rt_rp_lesseq a b).
-
-(* constant 3320 *)
-definition l_e_st_eq_landau_n_rt_rp_moreqi2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_ori2 (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) e : l_e_st_eq_landau_n_rt_rp_moreq a b).
-
-(* constant 3321 *)
-definition l_e_st_eq_landau_n_rt_rp_lesseqi2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_ori2 (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_eq a b) e : l_e_st_eq_landau_n_rt_rp_lesseq a b).
-
-(* constant 3322 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.(l_ec3_th7 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_satzd167b a b) (l_comor (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) m) : l_not (l_e_st_eq_landau_n_rt_rp_lessd a b)).
-
-(* constant 3323 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.(l_ec3_th9 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_satzd167b a b) l : l_not (l_e_st_eq_landau_n_rt_rp_mored a b)).
-
-(* constant 3324 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_mored a b).(l_or3_th2 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_satzd167a a b) n : l_e_st_eq_landau_n_rt_rp_lesseq a b).
-
-(* constant 3325 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_lessd a b).(l_comor (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_or3_th3 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_satzd167a a b) n) : l_e_st_eq_landau_n_rt_rp_moreq a b).
-
-(* constant 3326 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167g ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_lesseq a b) (l_not (l_e_st_eq_landau_n_rt_rp_mored a b)) (l_weli (l_e_st_eq_landau_n_rt_rp_mored a b) m) (λt:l_e_st_eq_landau_n_rt_rp_lesseq a b.l_e_st_eq_landau_n_rt_rp_satzd167d a b t) : l_not (l_e_st_eq_landau_n_rt_rp_lesseq a b)).
-
-(* constant 3327 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167h ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_moreq a b) (l_not (l_e_st_eq_landau_n_rt_rp_lessd a b)) (l_weli (l_e_st_eq_landau_n_rt_rp_lessd a b) l) (λt:l_e_st_eq_landau_n_rt_rp_moreq a b.l_e_st_eq_landau_n_rt_rp_satzd167c a b t) : l_not (l_e_st_eq_landau_n_rt_rp_moreq a b)).
-
-(* constant 3328 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167j ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_moreq a b).(l_or3e3 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_satzd167a a b) (l_or_th5 (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) n) (l_or_th4 (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) n) : l_e_st_eq_landau_n_rt_rp_lessd a b).
-
-(* constant 3329 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167k ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_lesseq a b).(l_or3e2 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_satzd167a a b) (l_or_th4 (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_eq a b) n) (l_or_th5 (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_eq a b) n) : l_e_st_eq_landau_n_rt_rp_mored a b).
-
-(* constant 3330 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd169a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a) z) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_satz135a (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b) p) : l_e_st_eq_landau_n_rt_rp_mored a b).
-
-(* constant 3331 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd169b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_satz136d (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a) z) m) : l_e_st_eq_landau_n_rt_rp_posd a).
-
-(* constant 3332 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd169c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a) z) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_satz135c (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b) n) : l_e_st_eq_landau_n_rt_rp_lessd a b).
-
-(* constant 3333 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd169d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_satz136f (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a) z) l) : l_e_st_eq_landau_n_rt_rp_negd a).
-
-(* constant 3334 *)
-definition l_e_st_eq_landau_n_rt_rp_2d170_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_moreqi1 (l_e_st_eq_landau_n_rt_rp_absd a) b (l_e_st_eq_landau_n_rt_rp_satzd169a (l_e_st_eq_landau_n_rt_rp_absd a) b z (l_e_st_eq_landau_n_rt_rp_satzd166a a p)) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_absd a) b).
-
-(* constant 3335 *)
-definition l_e_st_eq_landau_n_rt_rp_2d170_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.λy:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_moreqi2 (l_e_st_eq_landau_n_rt_rp_absd a) b (l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_absd a) a b (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_0notnd a y)) (l_e_st_eq_landau_n_rt_rp_zeroeq a b y z)) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_absd a) b).
-
-(* constant 3336 *)
-definition l_e_st_eq_landau_n_rt_rp_2d170_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_moreqi1 (l_e_st_eq_landau_n_rt_rp_absd a) b (l_e_st_eq_landau_n_rt_rp_satzd169a (l_e_st_eq_landau_n_rt_rp_absd a) b z (l_e_st_eq_landau_n_rt_rp_satzd166b a n)) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_absd a) b).
-
-(* constant 3337 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd170 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.(l_e_st_eq_landau_n_rt_rp_rappd a (l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_absd a) b) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_2d170_t1 a b z t) (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_2d170_t2 a b z t) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_2d170_t3 a b z t) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_absd a) b).
-
-(* constant 3338 *)
-definition l_e_st_eq_landau_n_rt_rp_2d171_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λk:l_e_st_eq_landau_n_rt_rp_lessd b c.(l_e_st_eq_landau_n_rt_rp_satz137a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b)) l k : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b)))).
-
-(* constant 3339 *)
-definition l_e_st_eq_landau_n_rt_rp_2d171_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λk:l_e_st_eq_landau_n_rt_rp_lessd b c.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_2d171_t1 a b c l k) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)))).
-
-(* constant 3340 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd171 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λk:l_e_st_eq_landau_n_rt_rp_lessd b c.(l_e_st_eq_landau_n_rt_rp_satz136c (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_2d171_t2 a b c l k) : l_e_st_eq_landau_n_rt_rp_lessd a c).
-
-(* constant 3341 *)
-definition l_e_st_eq_landau_n_rt_rp_trlessd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λk:l_e_st_eq_landau_n_rt_rp_lessd b c.(l_e_st_eq_landau_n_rt_rp_satzd171 a b c l k : l_e_st_eq_landau_n_rt_rp_lessd a c).
-
-(* constant 3342 *)
-definition l_e_st_eq_landau_n_rt_rp_trmored ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λn:l_e_st_eq_landau_n_rt_rp_mored b c.(l_e_st_eq_landau_n_rt_rp_lemmad6 c a (l_e_st_eq_landau_n_rt_rp_trlessd c b a (l_e_st_eq_landau_n_rt_rp_lemmad5 b c n) (l_e_st_eq_landau_n_rt_rp_lemmad5 a b m)) : l_e_st_eq_landau_n_rt_rp_mored a c).
-
-(* constant 3343 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd172a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.λk:l_e_st_eq_landau_n_rt_rp_lessd b c.(l_orapp (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_lessd a c) l (λt:l_e_st_eq_landau_n_rt_rp_lessd a b.l_e_st_eq_landau_n_rt_rp_trlessd a b c t k) (λt:l_e_st_eq_landau_n_rt_rp_eq a b.l_e_st_eq_landau_n_rt_rp_eqlessd1 b a c (l_e_st_eq_landau_n_rt_rp_symeq a b t) k) : l_e_st_eq_landau_n_rt_rp_lessd a c).
-
-(* constant 3344 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd172b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λk:l_e_st_eq_landau_n_rt_rp_lesseq b c.(l_orapp (l_e_st_eq_landau_n_rt_rp_lessd b c) (l_e_st_eq_landau_n_rt_rp_eq b c) (l_e_st_eq_landau_n_rt_rp_lessd a c) k (λt:l_e_st_eq_landau_n_rt_rp_lessd b c.l_e_st_eq_landau_n_rt_rp_trlessd a b c l t) (λt:l_e_st_eq_landau_n_rt_rp_eq b c.l_e_st_eq_landau_n_rt_rp_eqlessd2 b c a t l) : l_e_st_eq_landau_n_rt_rp_lessd a c).
-
-(* constant 3345 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd172c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.λn:l_e_st_eq_landau_n_rt_rp_mored b c.(l_e_st_eq_landau_n_rt_rp_lemmad6 c a (l_e_st_eq_landau_n_rt_rp_satzd172b c b a (l_e_st_eq_landau_n_rt_rp_lemmad5 b c n) (l_e_st_eq_landau_n_rt_rp_satzd168a a b m)) : l_e_st_eq_landau_n_rt_rp_mored a c).
-
-(* constant 3346 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd172d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λn:l_e_st_eq_landau_n_rt_rp_moreq b c.(l_e_st_eq_landau_n_rt_rp_lemmad6 c a (l_e_st_eq_landau_n_rt_rp_satzd172a c b a (l_e_st_eq_landau_n_rt_rp_satzd168a b c n) (l_e_st_eq_landau_n_rt_rp_lemmad5 a b m)) : l_e_st_eq_landau_n_rt_rp_mored a c).
-
-(* constant 3347 *)
-definition l_e_st_eq_landau_n_rt_rp_2d173_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.λk:l_e_st_eq_landau_n_rt_rp_lesseq b c.λj:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_lesseqi1 a c (l_e_st_eq_landau_n_rt_rp_satzd172b a b c j k) : l_e_st_eq_landau_n_rt_rp_lesseq a c).
-
-(* constant 3348 *)
-definition l_e_st_eq_landau_n_rt_rp_2d173_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.λk:l_e_st_eq_landau_n_rt_rp_lesseq b c.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqlesseq1 b a c (l_e_st_eq_landau_n_rt_rp_symeq a b e) k : l_e_st_eq_landau_n_rt_rp_lesseq a c).
-
-(* constant 3349 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd173 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.λk:l_e_st_eq_landau_n_rt_rp_lesseq b c.(l_orapp (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_lesseq a c) l (λt:l_e_st_eq_landau_n_rt_rp_lessd a b.l_e_st_eq_landau_n_rt_rp_2d173_t1 a b c l k t) (λt:l_e_st_eq_landau_n_rt_rp_eq a b.l_e_st_eq_landau_n_rt_rp_2d173_t2 a b c l k t) : l_e_st_eq_landau_n_rt_rp_lesseq a c).
-
-(* constant 3350 *)
-definition l_e_st_eq_landau_n_rt_rp_trlesseq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.λk:l_e_st_eq_landau_n_rt_rp_lesseq b c.(l_e_st_eq_landau_n_rt_rp_satzd173 a b c l k : l_e_st_eq_landau_n_rt_rp_lesseq a c).
-
-(* constant 3351 *)
-definition l_e_st_eq_landau_n_rt_rp_trmoreq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.λn:l_e_st_eq_landau_n_rt_rp_moreq b c.(l_e_st_eq_landau_n_rt_rp_satzd168b c a (l_e_st_eq_landau_n_rt_rp_trlesseq c b a (l_e_st_eq_landau_n_rt_rp_satzd168a b c n) (l_e_st_eq_landau_n_rt_rp_satzd168a a b m)) : l_e_st_eq_landau_n_rt_rp_moreq a c).
-
-(* constant 3352 *)
-definition l_e_st_eq_landau_n_rt_rp_ratd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(∀t:l_not (l_e_st_eq_landau_n_rt_rp_zero a).l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_satzd166e a t)) : Prop).
-
-(* constant 3353 *)
-definition l_e_st_eq_landau_n_rt_rp_irratd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_not (l_e_st_eq_landau_n_rt_rp_ratd a) : Prop).
-
-(* constant 3354 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λr:l_e_st_eq_landau_n_rt_rp_ratd a.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_zero b) n (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_eqzero a b e t) : l_not (l_e_st_eq_landau_n_rt_rp_zero a)).
-
-(* constant 3355 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λr:l_e_st_eq_landau_n_rt_rp_ratd a.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).(l_e_st_eq_landau_n_rt_rp_eqpderp (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_satzd166e a (l_e_st_eq_landau_n_rt_rp_iv2d_t6 a b e r n)) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_satzd166e b n) (l_e_st_eq_landau_n_rt_rp_eqabsd a b e) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_satzd166e a (l_e_st_eq_landau_n_rt_rp_iv2d_t6 a b e r n))) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_satzd166e b n))).
-
-(* constant 3356 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t8 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λr:l_e_st_eq_landau_n_rt_rp_ratd a.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).(l_e_isp l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_satzd166e a (l_e_st_eq_landau_n_rt_rp_iv2d_t6 a b e r n))) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_satzd166e b n)) (r (l_e_st_eq_landau_n_rt_rp_iv2d_t6 a b e r n)) (l_e_st_eq_landau_n_rt_rp_iv2d_t7 a b e r n) : l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_satzd166e b n))).
-
-(* constant 3357 *)
-definition l_e_st_eq_landau_n_rt_rp_eqratd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λr:l_e_st_eq_landau_n_rt_rp_ratd a.(λt:l_not (l_e_st_eq_landau_n_rt_rp_zero b).l_e_st_eq_landau_n_rt_rp_iv2d_t8 a b e r t : l_e_st_eq_landau_n_rt_rp_ratd b).
-
-(* constant 3358 *)
-definition l_e_st_eq_landau_n_rt_rp_eqirratd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λi:l_e_st_eq_landau_n_rt_rp_irratd a.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_ratd b) (l_e_st_eq_landau_n_rt_rp_ratd a) i (λt:l_e_st_eq_landau_n_rt_rp_ratd b.l_e_st_eq_landau_n_rt_rp_eqratd b a (l_e_st_eq_landau_n_rt_rp_symeq a b e) t) : l_e_st_eq_landau_n_rt_rp_irratd b).
-
-(* constant 3359 *)
-definition l_e_st_eq_landau_n_rt_rp_ratdi0 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_r_imp_th2 (l_not (l_e_st_eq_landau_n_rt_rp_zero a)) (λt:l_not (l_e_st_eq_landau_n_rt_rp_zero a).l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_satzd166e a t))) (l_weli (l_e_st_eq_landau_n_rt_rp_zero a) z) : l_e_st_eq_landau_n_rt_rp_ratd a).
-
-(* constant 3360 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t9 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).λy0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) r) (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) r) j : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) r) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)).
-
-(* constant 3361 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t10 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).λy0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_e_st_eq_landau_n_rt_rp_ismore1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) r) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_iv2d_t9 r i x0 s y0 j) (l_e_st_eq_landau_n_rt_rp_satz133 (l_e_st_eq_landau_n_rt_rp_rpofrt x0) r) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).
-
-(* constant 3362 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t11 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).λy0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_e_st_eq_landau_n_rt_rp_satz154d y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t10 r i x0 s y0 j) : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 3363 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t12 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).λy0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_e_st_eq_landau_n_rt_rp_satz155b y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j))) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_satz154a y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j)))).
-
-(* constant 3364 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t13 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).λy0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_e_st_eq_landau_n_rt_rp_satz140g (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) r (l_e_st_eq_landau_n_rt_rp_satz154a y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j)) (l_e_st_eq_landau_n_rt_rp_iv2d_t9 r i x0 s y0 j) : l_e_st_eq_landau_n_rt_rp_is r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_satz154a y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j)))).
-
-(* constant 3365 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t14 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).λy0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_e_tris2 l_e_st_eq_landau_n_rt_cut r (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j))) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_satz154a y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j))) (l_e_st_eq_landau_n_rt_rp_iv2d_t13 r i x0 s y0 j) (l_e_st_eq_landau_n_rt_rp_iv2d_t12 r i x0 s y0 j) : l_e_st_eq_landau_n_rt_rp_is r (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j)))).
-
-(* constant 3366 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t15 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).λy0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_is r (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j)) (l_e_st_eq_landau_n_rt_rp_iv2d_t14 r i x0 s y0 j) : l_e_st_eq_landau_n_rt_rp_ratrp r).
-
-(* constant 3367 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t16 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) s l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt x).i (l_e_st_eq_landau_n_rt_rp_iv2d_t15 r i x0 s x t)) : l_con).
-
-(* constant 3368 *)
-definition l_e_st_eq_landau_n_rt_rp_remark1 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.(λt:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).l_e_st_eq_landau_n_rt_rp_iv2d_t16 r i x0 t : l_e_st_eq_landau_n_rt_rp_irratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0))).
-
-(* constant 3369 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_rp ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pdofrp r : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3370 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_rn ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ndofrp r : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3371 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t17 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_posdirp r : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_iv2d_rp r)).
-
-(* constant 3372 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t18 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pnot0d (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t17 r) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_iv2d_rp r))).
-
-(* constant 3373 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t19 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_nnot0d (l_e_st_eq_landau_n_rt_rp_iv2d_rn r) (l_e_st_eq_landau_n_rt_rp_negdirp r) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_iv2d_rn r))).
-
-(* constant 3374 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t20 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_iv2d_rp r)).(l_e_tris2 l_e_st_eq_landau_n_rt_cut r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_iv2d_rp r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) n)) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t17 r)) (l_e_st_eq_landau_n_rt_rp_isrppd1 r) (l_e_st_eq_landau_n_rt_rp_eqpderp (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_iv2d_rp r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) n) (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t17 r) (l_e_st_eq_landau_n_rt_rp_absnnd (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) (l_e_st_eq_landau_n_rt_rp_pnotnd (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t17 r)))) : l_e_st_eq_landau_n_rt_rp_is r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_iv2d_rp r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) n))).
-
-(* constant 3375 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t21 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_iv2d_rn r))) (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) (l_e_st_eq_landau_n_rt_rp_absnd (l_e_st_eq_landau_n_rt_rp_iv2d_rn r) (l_e_st_eq_landau_n_rt_rp_negdirp r)) (l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)) (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_stdis l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_stmis l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)) (l_e_st_eq_landau_n_rt_rp_iv2d_rp r)).
-
-(* constant 3376 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t22 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)).(l_e_tris2 l_e_st_eq_landau_n_rt_cut r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_iv2d_rn r) n)) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t17 r)) (l_e_st_eq_landau_n_rt_rp_isrppd1 r) (l_e_st_eq_landau_n_rt_rp_eqpderp (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_iv2d_rn r) n) (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t17 r) (l_e_st_eq_landau_n_rt_rp_iv2d_t21 r)) : l_e_st_eq_landau_n_rt_rp_is r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_iv2d_rn r) n))).
-
-(* constant 3377 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t23 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is r s.λrr:l_e_st_eq_landau_n_rt_rp_ratrp r.(l_e_isp l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp x) r s rr i : l_e_st_eq_landau_n_rt_rp_ratrp s).
-
-(* constant 3378 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t24 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is r s.λrs:l_e_st_eq_landau_n_rt_rp_ratrp s.(l_e_isp1 l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp x) s r rs i : l_e_st_eq_landau_n_rt_rp_ratrp r).
-
-(* constant 3379 *)
-definition l_e_st_eq_landau_n_rt_rp_remark2a ≝ λr:l_e_st_eq_landau_n_rt_cut.λrr:l_e_st_eq_landau_n_rt_rp_ratrp r.(λt:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_pdofrp r)).l_e_st_eq_landau_n_rt_rp_iv2d_t23 r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_pdofrp r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_pdofrp r) t)) (l_e_st_eq_landau_n_rt_rp_iv2d_t20 r t) rr : l_e_st_eq_landau_n_rt_rp_ratd (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3380 *)
-definition l_e_st_eq_landau_n_rt_rp_remark2b ≝ λr:l_e_st_eq_landau_n_rt_cut.λrr:l_e_st_eq_landau_n_rt_rp_ratrp r.(l_e_st_eq_landau_n_rt_rp_iv2d_t17 r : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3381 *)
-definition l_e_st_eq_landau_n_rt_rp_remark3a ≝ λr:l_e_st_eq_landau_n_rt_cut.λrr:l_e_st_eq_landau_n_rt_rp_ratrp r.(λt:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_ndofrp r)).l_e_st_eq_landau_n_rt_rp_iv2d_t23 r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_ndofrp r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_ndofrp r) t)) (l_e_st_eq_landau_n_rt_rp_iv2d_t22 r t) rr : l_e_st_eq_landau_n_rt_rp_ratd (l_e_st_eq_landau_n_rt_rp_ndofrp r)).
-
-(* constant 3382 *)
-definition l_e_st_eq_landau_n_rt_rp_remark3b ≝ λr:l_e_st_eq_landau_n_rt_cut.λrr:l_e_st_eq_landau_n_rt_rp_ratrp r.(l_e_st_eq_landau_n_rt_rp_negdirp r : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_ndofrp r)).
-
-(* constant 3383 *)
-definition l_e_st_eq_landau_n_rt_rp_remark4a ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_ratd (l_e_st_eq_landau_n_rt_rp_pdofrp r)) (l_e_st_eq_landau_n_rt_rp_ratrp r) i (λt:l_e_st_eq_landau_n_rt_rp_ratd (l_e_st_eq_landau_n_rt_rp_pdofrp r).l_e_st_eq_landau_n_rt_rp_iv2d_t24 r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_pdofrp r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t18 r))) (l_e_st_eq_landau_n_rt_rp_iv2d_t20 r (l_e_st_eq_landau_n_rt_rp_iv2d_t18 r)) (t (l_e_st_eq_landau_n_rt_rp_iv2d_t18 r))) : l_e_st_eq_landau_n_rt_rp_irratd (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3384 *)
-definition l_e_st_eq_landau_n_rt_rp_remark4b ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.(l_e_st_eq_landau_n_rt_rp_iv2d_t17 r : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3385 *)
-definition l_e_st_eq_landau_n_rt_rp_remark5a ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_ratd (l_e_st_eq_landau_n_rt_rp_ndofrp r)) (l_e_st_eq_landau_n_rt_rp_ratrp r) i (λt:l_e_st_eq_landau_n_rt_rp_ratd (l_e_st_eq_landau_n_rt_rp_ndofrp r).l_e_st_eq_landau_n_rt_rp_iv2d_t24 r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_ndofrp r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t19 r))) (l_e_st_eq_landau_n_rt_rp_iv2d_t22 r (l_e_st_eq_landau_n_rt_rp_iv2d_t19 r)) (t (l_e_st_eq_landau_n_rt_rp_iv2d_t19 r))) : l_e_st_eq_landau_n_rt_rp_irratd (l_e_st_eq_landau_n_rt_rp_ndofrp r)).
-
-(* constant 3386 *)
-definition l_e_st_eq_landau_n_rt_rp_remark5b ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.(l_e_st_eq_landau_n_rt_rp_negdirp r : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_ndofrp r)).
-
-(* constant 3387 *)
-definition l_e_st_eq_landau_n_rt_rp_natd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_and (l_e_st_eq_landau_n_rt_rp_posd a) (∀t:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd a t)) : Prop).
-
-(* constant 3388 *)
-definition l_e_st_eq_landau_n_rt_rp_natposd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_natd a.(l_ande1 (l_e_st_eq_landau_n_rt_rp_posd a) (∀t:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd a t)) n : l_e_st_eq_landau_n_rt_rp_posd a).
-
-(* constant 3389 *)
-definition l_e_st_eq_landau_n_rt_rp_natderp ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_natd a.(l_r_ande2 (l_e_st_eq_landau_n_rt_rp_posd a) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd a t)) n : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd a (l_e_st_eq_landau_n_rt_rp_natposd a n))).
-
-(* constant 3390 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t25 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_e_st_eq_landau_n_rt_rp_natd a.(l_e_st_eq_landau_n_rt_rp_eqposd a b e (l_e_st_eq_landau_n_rt_rp_natposd a n) : l_e_st_eq_landau_n_rt_rp_posd b).
-
-(* constant 3391 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t26 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_e_st_eq_landau_n_rt_rp_natd a.λp:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_eqpderp a (l_e_st_eq_landau_n_rt_rp_natposd a n) b p e : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofpd a (l_e_st_eq_landau_n_rt_rp_natposd a n)) (l_e_st_eq_landau_n_rt_rp_rpofpd b p)).
-
-(* constant 3392 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t27 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_e_st_eq_landau_n_rt_rp_natd a.λp:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_isp l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) (l_e_st_eq_landau_n_rt_rp_rpofpd a (l_e_st_eq_landau_n_rt_rp_natposd a n)) (l_e_st_eq_landau_n_rt_rp_rpofpd b p) (l_e_st_eq_landau_n_rt_rp_natderp a n) (l_e_st_eq_landau_n_rt_rp_iv2d_t26 a b e n p) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd b p)).
-
-(* constant 3393 *)
-definition l_e_st_eq_landau_n_rt_rp_eqnatd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_e_st_eq_landau_n_rt_rp_natd a.(l_andi (l_e_st_eq_landau_n_rt_rp_posd b) (∀t:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd b t)) (l_e_st_eq_landau_n_rt_rp_iv2d_t25 a b e n) (λt:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_iv2d_t27 a b e n t) : l_e_st_eq_landau_n_rt_rp_natd b).
-
-(* constant 3394 *)
-definition l_e_st_eq_landau_n_rt_rp_pdofnt ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofnt x) : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3395 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t28 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_rpofnt x) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofnt x)).
-
-(* constant 3396 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t29 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofnt x).(l_e_st_eq_landau_n_rt_rp_isrppd1 (l_e_st_eq_landau_n_rt_rp_rpofnt x) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) (l_e_st_eq_landau_n_rt_rp_iv2d_t28 x))).
-
-(* constant 3397 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t30 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofnt x).(l_e_st_eq_landau_n_rt_rp_eqpderp (l_e_st_eq_landau_n_rt_rp_pdofnt x) (l_e_st_eq_landau_n_rt_rp_iv2d_t28 x) (l_e_st_eq_landau_n_rt_rp_pdofnt x) p (l_e_st_eq_landau_n_rt_rp_refeq (l_e_st_eq_landau_n_rt_rp_pdofnt x)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) (l_e_st_eq_landau_n_rt_rp_iv2d_t28 x)) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) p)).
-
-(* constant 3398 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t31 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofnt x).(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) (l_e_st_eq_landau_n_rt_rp_iv2d_t28 x)) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) p) (l_e_st_eq_landau_n_rt_rp_iv2d_t29 x p) (l_e_st_eq_landau_n_rt_rp_iv2d_t30 x p) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) p)).
-
-(* constant 3399 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t32 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofnt x).(l_e_isp l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) p) (l_e_st_eq_landau_n_rt_rp_natrpi x) (l_e_st_eq_landau_n_rt_rp_iv2d_t31 x p) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) p)).
-
-(* constant 3400 *)
-definition l_e_st_eq_landau_n_rt_rp_natdi ≝ λx:l_e_st_eq_landau_n_nat.(l_andi (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofnt x)) (∀t:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofnt x).l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) t)) (l_e_st_eq_landau_n_rt_rp_iv2d_t28 x) (λt:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofnt x).l_e_st_eq_landau_n_rt_rp_iv2d_t32 x t) : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_pdofnt x)).
-
-(* constant 3401 *)
-definition l_e_st_eq_landau_n_rt_rp_intd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_or (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)) : Prop).
-
-(* constant 3402 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t33 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λi:l_e_st_eq_landau_n_rt_rp_intd a.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_eqzero a b e z : l_e_st_eq_landau_n_rt_rp_zero b).
-
-(* constant 3403 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t34 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λi:l_e_st_eq_landau_n_rt_rp_intd a.λn:l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a).(l_e_st_eq_landau_n_rt_rp_eqnatd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_eqabsd a b e) n : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd b)).
-
-(* constant 3404 *)
-definition l_e_st_eq_landau_n_rt_rp_eqintd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λi:l_e_st_eq_landau_n_rt_rp_intd a.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd b)) i (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_iv2d_t33 a b e i t) (λt:l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a).l_e_st_eq_landau_n_rt_rp_iv2d_t34 a b e i t) : l_e_st_eq_landau_n_rt_rp_intd b).
-
-(* constant 3405 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t34a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_natd a.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a (l_e_st_eq_landau_n_rt_rp_natposd a n))) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3406 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t35 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_natd a.(l_e_st_eq_landau_n_rt_rp_eqnatd a (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_iv2d_t34a a n) n : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3407 *)
-definition l_e_st_eq_landau_n_rt_rp_natintd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_natd a.(l_ori2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_iv2d_t35 a n) : l_e_st_eq_landau_n_rt_rp_intd a).
-
-(* constant 3408 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t36 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λi:l_e_st_eq_landau_n_rt_rp_intd a.(l_ore2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)) i (l_e_st_eq_landau_n_rt_rp_pnot0d a p) : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3409 *)
-definition l_e_st_eq_landau_n_rt_rp_posintnatd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λi:l_e_st_eq_landau_n_rt_rp_intd a.(l_e_st_eq_landau_n_rt_rp_eqnatd (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a p)) (l_e_st_eq_landau_n_rt_rp_iv2d_t36 a p i) : l_e_st_eq_landau_n_rt_rp_natd a).
-
-(* constant 3410 *)
-definition l_e_st_eq_landau_n_rt_rp_intdi0 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_ori1 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)) z : l_e_st_eq_landau_n_rt_rp_intd a).
-
-(* constant 3411 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t37 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r.(l_e_st_eq_landau_n_rt_rp_posdirp r : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3412 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t38 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r).(l_e_tris l_e_st_eq_landau_n_rt_cut r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t37 r n)) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) p) (l_e_st_eq_landau_n_rt_rp_isrppd1 r) (l_e_st_eq_landau_n_rt_rp_eqpderp (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t37 r n) (l_e_st_eq_landau_n_rt_rp_pdofrp r) p (l_e_st_eq_landau_n_rt_rp_refeq (l_e_st_eq_landau_n_rt_rp_pdofrp r))) : l_e_st_eq_landau_n_rt_rp_is r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) p)).
-
-(* constant 3413 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t39 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r).(l_e_isp l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) p) n (l_e_st_eq_landau_n_rt_rp_iv2d_t38 r n p) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) p)).
-
-(* constant 3414 *)
-definition l_e_st_eq_landau_n_rt_rp_remark6a ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r.(l_andi (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r)) (∀t:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r).l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) t)) (l_e_st_eq_landau_n_rt_rp_iv2d_t37 r n) (λt:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r).l_e_st_eq_landau_n_rt_rp_iv2d_t39 r n t) : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3415 *)
-definition l_e_st_eq_landau_n_rt_rp_remark6 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r.(l_e_st_eq_landau_n_rt_rp_natintd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_remark6a r n) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3416 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t40 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r.(l_e_st_eq_landau_n_rt_rp_absdeql l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp r) (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_compl l_e_st_eq_landau_n_rt_rp_1rp r) (l_e_st_eq_landau_n_rt_rp_satz133a l_e_st_eq_landau_n_rt_rp_1rp r)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_ndofrp r)) (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3417 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t41 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r.(l_e_st_eq_landau_n_rt_rp_eqnatd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_ndofrp r)) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_ndofrp r)) (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t40 r n)) (l_e_st_eq_landau_n_rt_rp_remark6a r n) : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_ndofrp r))).
-
-(* constant 3418 *)
-definition l_e_st_eq_landau_n_rt_rp_remark7 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r.(l_ori2 (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_ndofrp r)) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_ndofrp r))) (l_e_st_eq_landau_n_rt_rp_iv2d_t41 r n) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_ndofrp r)).
-
-(* constant 3419 *)
-definition l_e_st_eq_landau_n_rt_rp_2d174_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_ore2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)) i n : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3420 *)
-definition l_e_st_eq_landau_n_rt_rp_2d174_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_ande2 (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a)) (∀t:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a).l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) t)) (l_e_st_eq_landau_n_rt_rp_2d174_t1 a i n) : ∀t:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a).l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) t)).
-
-(* constant 3421 *)
-definition l_e_st_eq_landau_n_rt_rp_2d174_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_e_st_eq_landau_n_rt_rp_lemmaiii5 (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_satzd166e a n)) (l_e_st_eq_landau_n_rt_rp_2d174_t2 a i n (l_e_st_eq_landau_n_rt_rp_satzd166e a n)) : l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_satzd166e a n))).
-
-(* constant 3422 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd174 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.(λt:l_not (l_e_st_eq_landau_n_rt_rp_zero a).l_e_st_eq_landau_n_rt_rp_2d174_t3 a i t : l_e_st_eq_landau_n_rt_rp_ratd a).
-
-(* constant 3423 *)
-definition l_e_st_eq_landau_n_rt_rp_pd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3424 *)
-definition l_e_st_eq_landau_n_rt_rp_pd12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_issmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_pl a1 b1) (l_e_st_eq_landau_n_rt_rp_pl a2 b2) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)) b1 (l_e_st_eq_landau_n_rt_rp_stmis a1 a2) (l_e_st_eq_landau_n_rt_rp_stmis b1 b2)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2)) b2 (l_e_st_eq_landau_n_rt_rp_stdis a1 a2) (l_e_st_eq_landau_n_rt_rp_stdis b1 b2)) : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b1) (l_e_st_eq_landau_n_rt_rp_pl a2 b2))).
-
-(* constant 3425 *)
-definition l_e_st_eq_landau_n_rt_rp_pd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_issmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r2) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) r1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_stmis r1 r2)) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2)) r2 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_stdis r1 r2)) : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r2))).
-
-(* constant 3426 *)
-definition l_e_st_eq_landau_n_rt_rp_pd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_issmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl r2 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) r1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_stmis r1 r2)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2)) r2 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_stdis r1 r2)) : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl r2 (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3427 *)
-definition l_e_st_eq_landau_n_rt_rp_pdeq12a ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b1) (l_e_st_eq_landau_n_rt_rp_pl a2 b2)) (l_e_st_eq_landau_n_rt_rp_pd12 a1 a2 b1 b2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b1) (l_e_st_eq_landau_n_rt_rp_pl a2 b2))).
-
-(* constant 3428 *)
-definition l_e_st_eq_landau_n_rt_rp_pdeq12b ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq2 (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b1) (l_e_st_eq_landau_n_rt_rp_pl a2 b2)) (l_e_st_eq_landau_n_rt_rp_pd12 a1 a2 b1 b2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b1) (l_e_st_eq_landau_n_rt_rp_pl a2 b2)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2))).
-
-(* constant 3429 *)
-definition l_e_st_eq_landau_n_rt_rp_pdeq1a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pd1 a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r2))).
-
-(* constant 3430 *)
-definition l_e_st_eq_landau_n_rt_rp_pdeq1b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq2 (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pd1 a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_df r1 r2))).
-
-(* constant 3431 *)
-definition l_e_st_eq_landau_n_rt_rp_pdeq2a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pd2 a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl r2 (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3432 *)
-definition l_e_st_eq_landau_n_rt_rp_pdeq2b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq2 (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pd2 a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df r1 r2) a)).
-
-(* constant 3433 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd175 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pd b a)).
-
-(* constant 3434 *)
-definition l_e_st_eq_landau_n_rt_rp_compd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satzd175 a b : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pd b a)).
-
-(* constant 3435 *)
-definition l_e_st_eq_landau_n_rt_rp_iv3d_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_4pl23 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2c a b c)) e) (l_e_st_eq_landau_n_rt_rp_4pl23 (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2c a b c)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)))).
-
-(* constant 3436 *)
-definition l_e_st_eq_landau_n_rt_rp_eqpd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_iv3d_t1 a b c e) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)).
-
-(* constant 3437 *)
-definition l_e_st_eq_landau_n_rt_rp_eqpd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_pd c b) (l_e_st_eq_landau_n_rt_rp_compd c a) (l_e_st_eq_landau_n_rt_rp_eqpd1 a b c e) (l_e_st_eq_landau_n_rt_rp_compd b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b)).
-
-(* constant 3438 *)
-definition l_e_st_eq_landau_n_rt_rp_eqpd12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_eqpd1 a b c e) (l_e_st_eq_landau_n_rt_rp_eqpd2 c d b f) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3439 *)
-definition l_e_st_eq_landau_n_rt_rp_iv3d_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_tr4is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b)) z (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_asspl2 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_1b a b)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)))).
-
-(* constant 3440 *)
-definition l_e_st_eq_landau_n_rt_rp_pd01 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_eqi2 b (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_iv3d_t2 a b z) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a b) b).
-
-(* constant 3441 *)
-definition l_e_st_eq_landau_n_rt_rp_pd02 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pd b a) a (l_e_st_eq_landau_n_rt_rp_compd a b) (l_e_st_eq_landau_n_rt_rp_pd01 b a z) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a b) a).
-
-(* constant 3442 *)
-definition l_e_st_eq_landau_n_rt_rp_ppd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_posdi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_satz137 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) p q) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3443 *)
-definition l_e_st_eq_landau_n_rt_rp_npd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λo:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_negdi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_satz137a (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) n o) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3444 *)
-definition l_e_st_eq_landau_n_rt_rp_m0d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3445 *)
-definition l_e_st_eq_landau_n_rt_rp_m0deqa ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2 a1 (l_e_st_eq_landau_n_rt_rp_stdis a1 a2) (l_e_st_eq_landau_n_rt_rp_stmis a1 a2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_df a2 a1)).
-
-(* constant 3446 *)
-definition l_e_st_eq_landau_n_rt_rp_m0deqb ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_df a2 a1) (l_e_st_eq_landau_n_rt_rp_m0deqa a1 a2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df a2 a1) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_df a1 a2))).
-
-(* constant 3447 *)
-definition l_e_st_eq_landau_n_rt_rp_iv3d_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_symeq a b e) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a))).
-
-(* constant 3448 *)
-definition l_e_st_eq_landau_n_rt_rp_eqm0d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_iv3d_t3 a b e) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)).
-
-(* constant 3449 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd176a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_negdi (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) p) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_m0d a)).
-
-(* constant 3450 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd176b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_zeroi (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) z) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_m0d a)).
-
-(* constant 3451 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd176c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_posdi (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) n) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_m0d a)).
-
-(* constant 3452 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd176d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_m0d a).(l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_stmis (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_stdis (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) n) : l_e_st_eq_landau_n_rt_rp_posd a).
-
-(* constant 3453 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd176e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_m0d a).(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_isstm (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) z (l_e_st_eq_landau_n_rt_rp_stdis (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))) : l_e_st_eq_landau_n_rt_rp_zero a).
-
-(* constant 3454 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd176f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_m0d a).(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_stmis (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_stdis (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) p) : l_e_st_eq_landau_n_rt_rp_negd a).
-
-(* constant 3455 *)
-definition l_e_st_eq_landau_n_rt_rp_m0d0 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_zeroeq (l_e_st_eq_landau_n_rt_rp_m0d a) a (l_e_st_eq_landau_n_rt_rp_satzd176b a z) z : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d a) a).
-
-(* constant 3456 *)
-definition l_e_st_eq_landau_n_rt_rp_3d177_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_tris l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) a (l_e_st_eq_landau_n_rt_rp_issmsd (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_stdis (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_stmis (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_dfis a) : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) a).
-
-(* constant 3457 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd177 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) a (l_e_st_eq_landau_n_rt_rp_3d177_t1 a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) a).
-
-(* constant 3458 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd177a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) a (l_e_st_eq_landau_n_rt_rp_satzd177 a) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a))).
-
-(* constant 3459 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd177b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_m0d b).(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b)) b (l_e_st_eq_landau_n_rt_rp_eqm0d a (l_e_st_eq_landau_n_rt_rp_m0d b) e) (l_e_st_eq_landau_n_rt_rp_satzd177 b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d a) b).
-
-(* constant 3460 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd177c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_m0d b).(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_m0d a) b (l_e_st_eq_landau_n_rt_rp_satzd177b a b e) : l_e_st_eq_landau_n_rt_rp_eq b (l_e_st_eq_landau_n_rt_rp_m0d a)).
-
-(* constant 3461 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd177d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d a) b.(l_e_st_eq_landau_n_rt_rp_satzd177c b a (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_m0d a) b e) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_m0d b)).
-
-(* constant 3462 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd177e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d a) b.(l_e_st_eq_landau_n_rt_rp_symeq a (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_satzd177d a b e) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d b) a).
-
-(* constant 3463 *)
-definition l_e_st_eq_landau_n_rt_rp_3d178_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) a (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absnd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_satzd176a a p)) (l_e_st_eq_landau_n_rt_rp_satzd177 a) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a p))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3464 *)
-definition l_e_st_eq_landau_n_rt_rp_3d178_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_m0d a) a (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absnnd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_0notnd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_satzd176b a z))) (l_e_st_eq_landau_n_rt_rp_m0d0 a z) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_0notnd a z))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3465 *)
-definition l_e_st_eq_landau_n_rt_rp_3d178_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absnnd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_pnotnd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_satzd176c a n))) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_absnd a n)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3466 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd178 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_rappd a (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_absd a)) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_3d178_t1 a t) (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_3d178_t2 a t) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_3d178_t3 a t) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3467 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd178a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_satzd178 a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a))).
-
-(* constant 3468 *)
-definition l_e_st_eq_landau_n_rt_rp_3d179_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_pdeq1b a (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_m0d a))).
-
-(* constant 3469 *)
-definition l_e_st_eq_landau_n_rt_rp_3d179_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_zeroi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)))).
-
-(* constant 3470 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd179 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_3d179_t1 a) (l_e_st_eq_landau_n_rt_rp_3d179_t2 a) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_m0d a))).
-
-(* constant 3471 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd179a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) a) (l_e_st_eq_landau_n_rt_rp_compd a (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_satzd179 a) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) a)).
-
-(* constant 3472 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd180 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_m0deqa (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pdeq12b (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3473 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd180a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_satzd180 a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b))).
-
-(* constant 3474 *)
-definition l_e_st_eq_landau_n_rt_rp_md ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_m0d b) : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3475 *)
-definition l_e_st_eq_landau_n_rt_rp_mdeq12a ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b2 b1)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl a2 b1)) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df b2 b1) (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_m0deqa b1 b2)) (l_e_st_eq_landau_n_rt_rp_pdeq12a a1 a2 b2 b1) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl a2 b1))).
-
-(* constant 3476 *)
-definition l_e_st_eq_landau_n_rt_rp_mdeq12b ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl a2 b1)) (l_e_st_eq_landau_n_rt_rp_mdeq12a a1 a2 b1 b2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl a2 b1)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2))).
-
-(* constant 3477 *)
-definition l_e_st_eq_landau_n_rt_rp_mdeq1a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_md a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_df r2 r1)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r1)) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df r2 r1) a (l_e_st_eq_landau_n_rt_rp_m0deqa r1 r2)) (l_e_st_eq_landau_n_rt_rp_pdeq1a a r2 r1) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r1))).
-
-(* constant 3478 *)
-definition l_e_st_eq_landau_n_rt_rp_mdeq1b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_md a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r1)) (l_e_st_eq_landau_n_rt_rp_mdeq1a a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r1)) (l_e_st_eq_landau_n_rt_rp_md a (l_e_st_eq_landau_n_rt_rp_df r1 r2))).
-
-(* constant 3479 *)
-definition l_e_st_eq_landau_n_rt_rp_mdeq2a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pdeq12a r1 r2 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl r2 (l_e_st_eq_landau_n_rt_rp_1a a)))).
-
-(* constant 3480 *)
-definition l_e_st_eq_landau_n_rt_rp_mdeq2b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pdeq12b r1 r2 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl r2 (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_df r1 r2) a)).
-
-(* constant 3481 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqpd1 a b (l_e_st_eq_landau_n_rt_rp_m0d c) e : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md a c) (l_e_st_eq_landau_n_rt_rp_md b c)).
-
-(* constant 3482 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b) c (l_e_st_eq_landau_n_rt_rp_eqm0d a b e) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md c a) (l_e_st_eq_landau_n_rt_rp_md c b)).
-
-(* constant 3483 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmd12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_md a c) (l_e_st_eq_landau_n_rt_rp_md b c) (l_e_st_eq_landau_n_rt_rp_md b d) (l_e_st_eq_landau_n_rt_rp_eqmd1 a b c e) (l_e_st_eq_landau_n_rt_rp_eqmd2 c d b f) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md a c) (l_e_st_eq_landau_n_rt_rp_md b d)).
-
-(* constant 3484 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd181 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b))) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) b) (l_e_st_eq_landau_n_rt_rp_md b a) (l_e_st_eq_landau_n_rt_rp_satzd180 a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b)) b (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_satzd177 b)) (l_e_st_eq_landau_n_rt_rp_compd (l_e_st_eq_landau_n_rt_rp_m0d a) b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_md b a)).
-
-(* constant 3485 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd181a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_md b a)) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_satzd181 b a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_md b a))).
-
-(* constant 3486 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pdeq1a a (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_eqsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3487 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_3d182_t1 a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3488 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_stmis (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))).
-
-(* constant 3489 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_stdis (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3490 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md a b).(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_3d182_t1 a b) p : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3491 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd182a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md a b).(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_3d182_t3 a b) (l_e_st_eq_landau_n_rt_rp_3d182_t4 a b) (l_e_st_eq_landau_n_rt_rp_3d182_t5 a b p) : l_e_st_eq_landau_n_rt_rp_mored a b).
-
-(* constant 3492 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md a b).(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_3d182_t1 a b) z : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3493 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd182b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md a b).(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_isstm (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_3d182_t6 a b z) (l_e_st_eq_landau_n_rt_rp_3d182_t4 a b) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3494 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_md a b).(l_e_st_eq_landau_n_rt_rp_eqnegd (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_3d182_t1 a b) n : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3495 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd182c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_md a b).(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_3d182_t3 a b) (l_e_st_eq_landau_n_rt_rp_3d182_t4 a b) (l_e_st_eq_landau_n_rt_rp_3d182_t7 a b n) : l_e_st_eq_landau_n_rt_rp_lessd a b).
-
-(* constant 3496 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t8 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_posdi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) m : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3497 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd182d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_3d182_t2 a b) (l_e_st_eq_landau_n_rt_rp_3d182_t8 a b m) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3498 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t9 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_zeroi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) e : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3499 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd182e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_3d182_t2 a b) (l_e_st_eq_landau_n_rt_rp_3d182_t9 a b e) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3500 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t10 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_negdi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) l : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3501 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd182f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_eqnegd (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_3d182_t2 a b) (l_e_st_eq_landau_n_rt_rp_3d182_t10 a b l) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3502 *)
-definition l_e_st_eq_landau_n_rt_rp_3d183_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d a))) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_12issmsd (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d a)))).
-
-(* constant 3503 *)
-definition l_e_st_eq_landau_n_rt_rp_3d183_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_3d183_t1 b a : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d b)))).
-
-(* constant 3504 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd183a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d a))) (l_e_st_eq_landau_n_rt_rp_3d183_t2 a b) (l_e_st_eq_landau_n_rt_rp_3d183_t1 a b) (l_e_st_eq_landau_n_rt_rp_lemmad5 a b m) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)).
-
-(* constant 3505 *)
-definition l_e_st_eq_landau_n_rt_rp_staz183b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqm0d a b e : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)).
-
-(* constant 3506 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd183c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d a))) (l_e_st_eq_landau_n_rt_rp_3d183_t2 a b) (l_e_st_eq_landau_n_rt_rp_3d183_t1 a b) (l_e_st_eq_landau_n_rt_rp_lemmad6 a b l) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)).
-
-(* constant 3507 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd183d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b).(l_e_st_eq_landau_n_rt_rp_eqmored12 (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) a (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b)) b (l_e_st_eq_landau_n_rt_rp_satzd177 a) (l_e_st_eq_landau_n_rt_rp_satzd177 b) (l_e_st_eq_landau_n_rt_rp_satzd183c (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b) l) : l_e_st_eq_landau_n_rt_rp_mored a b).
-
-(* constant 3508 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd183e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b).(l_e_st_eq_landau_n_rt_rp_tr3eq a (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b)) b (l_e_st_eq_landau_n_rt_rp_satzd177a a) (l_e_st_eq_landau_n_rt_rp_eqm0d (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b) e) (l_e_st_eq_landau_n_rt_rp_satzd177 b) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3509 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd183f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b).(l_e_st_eq_landau_n_rt_rp_eqlessd12 (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) a (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b)) b (l_e_st_eq_landau_n_rt_rp_satzd177 a) (l_e_st_eq_landau_n_rt_rp_satzd177 b) (l_e_st_eq_landau_n_rt_rp_satzd183a (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b) m) : l_e_st_eq_landau_n_rt_rp_lessd a b).
-
-(* constant 3510 *)
-definition l_e_st_eq_landau_n_rt_rp_3d184_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq a (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_lemmad3 a (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_asspl2 (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_3pl12 (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_mdeq12b (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3511 *)
-definition l_e_st_eq_landau_n_rt_rp_3d184_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_and3i (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_3d184_t1 a) : l_and3 (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_2a a))))).
-
-(* constant 3512 *)
-definition l_e_st_eq_landau_n_rt_rp_3d184_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and3 (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_posd x) (l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a)) x))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_3d184_t2 a) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and3 (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_posd x) (l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a)) x)))).
-
-(* constant 3513 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd184 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_and3 (l_e_st_eq_landau_n_rt_rp_posd x) (l_e_st_eq_landau_n_rt_rp_posd y) (l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_md x y)))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_3d184_t3 a) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_and3 (l_e_st_eq_landau_n_rt_rp_posd x) (l_e_st_eq_landau_n_rt_rp_posd y) (l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_md x y))))).
-
-(* constant 3514 *)
-definition l_e_st_eq_landau_n_rt_rp_asspd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_pdeq2a c (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pdeq1b a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd b c))).
-
-(* constant 3515 *)
-definition l_e_st_eq_landau_n_rt_rp_asspd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_asspd1 a b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c)).
-
-(* constant 3516 *)
-definition l_e_st_eq_landau_n_rt_rp_3pd23 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd c b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a c) b) (l_e_st_eq_landau_n_rt_rp_asspd1 a b c) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_pd c b) a (l_e_st_eq_landau_n_rt_rp_compd b c)) (l_e_st_eq_landau_n_rt_rp_asspd2 a c b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a c) b)).
-
-(* constant 3517 *)
-definition l_e_st_eq_landau_n_rt_rp_4pd23 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pd c d)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c) d) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a c) b) d) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)) (l_e_st_eq_landau_n_rt_rp_asspd2 (l_e_st_eq_landau_n_rt_rp_pd a b) c d) (l_e_st_eq_landau_n_rt_rp_eqpd1 (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a c) b) d (l_e_st_eq_landau_n_rt_rp_3pd23 a b c)) (l_e_st_eq_landau_n_rt_rp_asspd1 (l_e_st_eq_landau_n_rt_rp_pd a c) b d) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pd c d)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d))).
-
-(* constant 3518 *)
-definition l_e_st_eq_landau_n_rt_rp_pdmd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md a b) b) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d b) b)) a (l_e_st_eq_landau_n_rt_rp_asspd1 a (l_e_st_eq_landau_n_rt_rp_m0d b) b) (l_e_st_eq_landau_n_rt_rp_pd02 a (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d b) b) (l_e_st_eq_landau_n_rt_rp_satzd179a b)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md a b) b) a).
-
-(* constant 3519 *)
-definition l_e_st_eq_landau_n_rt_rp_mdpd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a b) b) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd b (l_e_st_eq_landau_n_rt_rp_m0d b))) a (l_e_st_eq_landau_n_rt_rp_asspd1 a b (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_pd02 a (l_e_st_eq_landau_n_rt_rp_pd b (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_satzd179 b)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a b) b) a).
-
-(* constant 3520 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd185 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_md c d)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_m0d d))) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)) (l_e_st_eq_landau_n_rt_rp_4pd23 a (l_e_st_eq_landau_n_rt_rp_m0d b) c (l_e_st_eq_landau_n_rt_rp_m0d d)) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_m0d d)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd b d)) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_satzd180a b d)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_md c d)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d))).
-
-(* constant 3521 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd186 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_asspd1 a b c : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd b c))).
-
-(* constant 3522 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd187a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd b (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md a b) b) a (l_e_st_eq_landau_n_rt_rp_compd b (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_pdmd a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd b (l_e_st_eq_landau_n_rt_rp_md a b)) a).
-
-(* constant 3523 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd187c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λx:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd b x) a.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd x b) b) x (l_e_st_eq_landau_n_rt_rp_eqmd1 a (l_e_st_eq_landau_n_rt_rp_pd x b) b (l_e_st_eq_landau_n_rt_rp_treq1 a (l_e_st_eq_landau_n_rt_rp_pd x b) (l_e_st_eq_landau_n_rt_rp_pd b x) e (l_e_st_eq_landau_n_rt_rp_compd b x))) (l_e_st_eq_landau_n_rt_rp_mdpd x b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md a b) x).
-
-(* constant 3524 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd187d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λx:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd b x) a.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_md a b) x (l_e_st_eq_landau_n_rt_rp_satzd187c a b x e) : l_e_st_eq_landau_n_rt_rp_eq x (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3525 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd187e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λx:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd x b) a.(l_e_st_eq_landau_n_rt_rp_satzd187c a b x (l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd b x) (l_e_st_eq_landau_n_rt_rp_pd x b) a (l_e_st_eq_landau_n_rt_rp_compd b x) e) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md a b) x).
-
-(* constant 3526 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd187f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λx:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd x b) a.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_md a b) x (l_e_st_eq_landau_n_rt_rp_satzd187e a b x e) : l_e_st_eq_landau_n_rt_rp_eq x (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3527 *)
-definition l_e_st_eq_landau_n_rt_rp_3d188_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_m0d c))) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_md c c)) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_m0d c)) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_satzd180 b c)) (l_e_st_eq_landau_n_rt_rp_4pd23 a c (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_m0d c)) (l_e_st_eq_landau_n_rt_rp_pd02 (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_md c c) (l_e_st_eq_landau_n_rt_rp_satzd179 c)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3528 *)
-definition l_e_st_eq_landau_n_rt_rp_3d188_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_3d188_t1 a b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c))).
-
-(* constant 3529 *)
-definition l_e_st_eq_landau_n_rt_rp_3d188_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c).(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_3d188_t1 a b c) (l_e_st_eq_landau_n_rt_rp_satzd182d (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c) m) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3530 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c).(l_e_st_eq_landau_n_rt_rp_satzd182a a b (l_e_st_eq_landau_n_rt_rp_3d188_t3 a b c m) : l_e_st_eq_landau_n_rt_rp_mored a b).
-
-(* constant 3531 *)
-definition l_e_st_eq_landau_n_rt_rp_3d188_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c).(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_3d188_t1 a b c) (l_e_st_eq_landau_n_rt_rp_satzd182e (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c) e) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3532 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c).(l_e_st_eq_landau_n_rt_rp_satzd182b a b (l_e_st_eq_landau_n_rt_rp_3d188_t4 a b c e) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3533 *)
-definition l_e_st_eq_landau_n_rt_rp_3d188_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c).(l_e_st_eq_landau_n_rt_rp_eqnegd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_3d188_t1 a b c) (l_e_st_eq_landau_n_rt_rp_satzd182f (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c) l) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3534 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c).(l_e_st_eq_landau_n_rt_rp_satzd182c a b (l_e_st_eq_landau_n_rt_rp_3d188_t5 a b c l) : l_e_st_eq_landau_n_rt_rp_lessd a b).
-
-(* constant 3535 *)
-definition l_e_st_eq_landau_n_rt_rp_3d188_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_3d188_t2 a b c) (l_e_st_eq_landau_n_rt_rp_satzd182d a b m) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c))).
-
-(* constant 3536 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_satzd182a (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_3d188_t6 a b c m) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)).
-
-(* constant 3537 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqpd1 a b c e : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)).
-
-(* constant 3538 *)
-definition l_e_st_eq_landau_n_rt_rp_3d188_t7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_eqnegd (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_3d188_t2 a b c) (l_e_st_eq_landau_n_rt_rp_satzd182f a b l) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c))).
-
-(* constant 3539 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_satzd182c (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_3d188_t7 a b c l) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)).
-
-(* constant 3540 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188g ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b).(l_e_st_eq_landau_n_rt_rp_satzd188a a b c (l_e_st_eq_landau_n_rt_rp_eqmored12 (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd c b) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_compd c a) (l_e_st_eq_landau_n_rt_rp_compd c b) m) : l_e_st_eq_landau_n_rt_rp_mored a b).
-
-(* constant 3541 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188h ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b).(l_e_st_eq_landau_n_rt_rp_satzd188b a b c (l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_compd a c) e (l_e_st_eq_landau_n_rt_rp_compd c b)) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3542 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188j ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b).λl:l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b).(l_e_st_eq_landau_n_rt_rp_satzd188c a b c (l_e_st_eq_landau_n_rt_rp_eqlessd12 (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd c b) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_compd c a) (l_e_st_eq_landau_n_rt_rp_compd c b) l) : l_e_st_eq_landau_n_rt_rp_lessd a b).
-
-(* constant 3543 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188k ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_eqmored12 (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_pd c b) (l_e_st_eq_landau_n_rt_rp_compd a c) (l_e_st_eq_landau_n_rt_rp_compd b c) (l_e_st_eq_landau_n_rt_rp_satzd188d a b c m) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b)).
-
-(* constant 3544 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188l ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqpd2 a b c e : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b)).
-
-(* constant 3545 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188m ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_eqlessd12 (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_pd c b) (l_e_st_eq_landau_n_rt_rp_compd a c) (l_e_st_eq_landau_n_rt_rp_compd b c) (l_e_st_eq_landau_n_rt_rp_satzd188f a b c l) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b)).
-
-(* constant 3546 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188n ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λm:l_e_st_eq_landau_n_rt_rp_mored c d.(l_e_st_eq_landau_n_rt_rp_eqmored2 (l_e_st_eq_landau_n_rt_rp_pd a d) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_eqpd1 a b d e) (l_e_st_eq_landau_n_rt_rp_satzd188k c d a m) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3547 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188o ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λm:l_e_st_eq_landau_n_rt_rp_mored c d.(l_e_st_eq_landau_n_rt_rp_eqmored12 (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_pd d b) (l_e_st_eq_landau_n_rt_rp_compd a c) (l_e_st_eq_landau_n_rt_rp_compd b d) (l_e_st_eq_landau_n_rt_rp_satzd188n a b c d e m) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd d b)).
-
-(* constant 3548 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188p ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λl:l_e_st_eq_landau_n_rt_rp_lessd c d.(l_e_st_eq_landau_n_rt_rp_eqlessd2 (l_e_st_eq_landau_n_rt_rp_pd a d) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_eqpd1 a b d e) (l_e_st_eq_landau_n_rt_rp_satzd188m c d a l) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3549 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188q ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λl:l_e_st_eq_landau_n_rt_rp_lessd c d.(l_e_st_eq_landau_n_rt_rp_eqlessd12 (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_pd d b) (l_e_st_eq_landau_n_rt_rp_compd a c) (l_e_st_eq_landau_n_rt_rp_compd b d) (l_e_st_eq_landau_n_rt_rp_satzd188p a b c d e l) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd d b)).
-
-(* constant 3550 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd189 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λn:l_e_st_eq_landau_n_rt_rp_mored c d.(l_e_st_eq_landau_n_rt_rp_trmored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_satzd188d a b c m) (l_e_st_eq_landau_n_rt_rp_satzd188k c d b n) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3551 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd189a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λk:l_e_st_eq_landau_n_rt_rp_lessd c d.(l_e_st_eq_landau_n_rt_rp_lemmad5 (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_satzd189 b a d c (l_e_st_eq_landau_n_rt_rp_lemmad6 a b l) (l_e_st_eq_landau_n_rt_rp_lemmad6 c d k)) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3552 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd190a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.λn:l_e_st_eq_landau_n_rt_rp_mored c d.(l_orapp (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)) m (λt:l_e_st_eq_landau_n_rt_rp_mored a b.l_e_st_eq_landau_n_rt_rp_satzd189 a b c d t n) (λt:l_e_st_eq_landau_n_rt_rp_eq a b.l_e_st_eq_landau_n_rt_rp_satzd188n a b c d t n) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3553 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd190b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λn:l_e_st_eq_landau_n_rt_rp_moreq c d.(l_e_st_eq_landau_n_rt_rp_eqmored12 (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd d b) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_compd c a) (l_e_st_eq_landau_n_rt_rp_compd d b) (l_e_st_eq_landau_n_rt_rp_satzd190a c d a b n m) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3554 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd190c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.λk:l_e_st_eq_landau_n_rt_rp_lessd c d.(l_e_st_eq_landau_n_rt_rp_lemmad5 (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_satzd190a b a d c (l_e_st_eq_landau_n_rt_rp_satzd168b a b l) (l_e_st_eq_landau_n_rt_rp_lemmad6 c d k)) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3555 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd190d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λk:l_e_st_eq_landau_n_rt_rp_lesseq c d.(l_e_st_eq_landau_n_rt_rp_lemmad5 (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_satzd190b b a d c (l_e_st_eq_landau_n_rt_rp_lemmad6 a b l) (l_e_st_eq_landau_n_rt_rp_satzd168b c d k)) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3556 *)
-definition l_e_st_eq_landau_n_rt_rp_3d191_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.λn:l_e_st_eq_landau_n_rt_rp_moreq c d.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.(l_e_st_eq_landau_n_rt_rp_moreqi2 (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_eqpd12 a b c d e f) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3557 *)
-definition l_e_st_eq_landau_n_rt_rp_3d191_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.λn:l_e_st_eq_landau_n_rt_rp_moreq c d.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λo:l_e_st_eq_landau_n_rt_rp_mored c d.(l_e_st_eq_landau_n_rt_rp_moreqi1 (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_satzd190a a b c d m o) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3558 *)
-definition l_e_st_eq_landau_n_rt_rp_3d191_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.λn:l_e_st_eq_landau_n_rt_rp_moreq c d.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_orapp (l_e_st_eq_landau_n_rt_rp_mored c d) (l_e_st_eq_landau_n_rt_rp_eq c d) (l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)) n (λt:l_e_st_eq_landau_n_rt_rp_mored c d.l_e_st_eq_landau_n_rt_rp_3d191_t2 a b c d m n e t) (λt:l_e_st_eq_landau_n_rt_rp_eq c d.l_e_st_eq_landau_n_rt_rp_3d191_t1 a b c d m n e t) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3559 *)
-definition l_e_st_eq_landau_n_rt_rp_3d191_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.λn:l_e_st_eq_landau_n_rt_rp_moreq c d.λo:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_moreqi1 (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_satzd190b a b c d o n) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3560 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd191 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.λn:l_e_st_eq_landau_n_rt_rp_moreq c d.(l_orapp (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)) m (λt:l_e_st_eq_landau_n_rt_rp_mored a b.l_e_st_eq_landau_n_rt_rp_3d191_t4 a b c d m n t) (λt:l_e_st_eq_landau_n_rt_rp_eq a b.l_e_st_eq_landau_n_rt_rp_3d191_t3 a b c d m n t) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3561 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd191a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.λk:l_e_st_eq_landau_n_rt_rp_lesseq c d.(l_e_st_eq_landau_n_rt_rp_satzd168a (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_satzd191 b a d c (l_e_st_eq_landau_n_rt_rp_satzd168b a b l) (l_e_st_eq_landau_n_rt_rp_satzd168b c d k)) : l_e_st_eq_landau_n_rt_rp_lesseq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3562 *)
-definition l_e_st_eq_landau_n_rt_rp_td ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3563 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t1 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ists1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a1 r (l_e_st_eq_landau_n_rt_rp_stmis a1 a2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) r) (l_e_st_eq_landau_n_rt_rp_ts a1 r)).
-
-(* constant 3564 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t2 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ists2 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a1 r (l_e_st_eq_landau_n_rt_rp_stmis a1 a2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_ts r a1)).
-
-(* constant 3565 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t3 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ists1 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2 r (l_e_st_eq_landau_n_rt_rp_stdis a1 a2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) r) (l_e_st_eq_landau_n_rt_rp_ts a2 r)).
-
-(* constant 3566 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t4 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ists2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2 r (l_e_st_eq_landau_n_rt_rp_stdis a1 a2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_ts r a2)).
-
-(* constant 3567 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t5 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) r) (l_e_st_eq_landau_n_rt_rp_ts a1 r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) s) (l_e_st_eq_landau_n_rt_rp_ts a2 s) (l_e_st_eq_landau_n_rt_rp_iv4d_t1 a1 a2 r) (l_e_st_eq_landau_n_rt_rp_iv4d_t3 a1 a2 s) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 r) (l_e_st_eq_landau_n_rt_rp_ts a2 s))).
-
-(* constant 3568 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t6 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_ts r a1) (l_e_st_eq_landau_n_rt_rp_ts s (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_ts s a2) (l_e_st_eq_landau_n_rt_rp_iv4d_t2 a1 a2 r) (l_e_st_eq_landau_n_rt_rp_iv4d_t4 a1 a2 s) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_ts s (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r a1) (l_e_st_eq_landau_n_rt_rp_ts s a2))).
-
-(* constant 3569 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t7 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) r) (l_e_st_eq_landau_n_rt_rp_ts a2 r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) s) (l_e_st_eq_landau_n_rt_rp_ts a1 s) (l_e_st_eq_landau_n_rt_rp_iv4d_t3 a1 a2 r) (l_e_st_eq_landau_n_rt_rp_iv4d_t1 a1 a2 s) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a2 r) (l_e_st_eq_landau_n_rt_rp_ts a1 s))).
-
-(* constant 3570 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t8 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_ts r a2) (l_e_st_eq_landau_n_rt_rp_ts s (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_ts s a1) (l_e_st_eq_landau_n_rt_rp_iv4d_t4 a1 a2 r) (l_e_st_eq_landau_n_rt_rp_iv4d_t2 a1 a2 s) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_ts s (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r a2) (l_e_st_eq_landau_n_rt_rp_ts s a1))).
-
-(* constant 3571 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t9 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_ts a2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b1) (l_e_st_eq_landau_n_rt_rp_ts a2 b2)) (l_e_st_eq_landau_n_rt_rp_iv4d_t5 a1 a2 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_iv4d_t6 b1 b2 a1 a2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b1) (l_e_st_eq_landau_n_rt_rp_ts a2 b2))).
-
-(* constant 3572 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t10 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_ts a2 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b2) (l_e_st_eq_landau_n_rt_rp_ts a2 b1)) (l_e_st_eq_landau_n_rt_rp_iv4d_t5 a1 a2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_iv4d_t8 b1 b2 a1 a2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b2) (l_e_st_eq_landau_n_rt_rp_ts a2 b1))).
-
-(* constant 3573 *)
-definition l_e_st_eq_landau_n_rt_rp_td12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_issmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b1) (l_e_st_eq_landau_n_rt_rp_ts a2 b2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b2) (l_e_st_eq_landau_n_rt_rp_ts a2 b1)) (l_e_st_eq_landau_n_rt_rp_iv4d_t9 a1 a2 b1 b2) (l_e_st_eq_landau_n_rt_rp_iv4d_t10 a1 a2 b1 b2) : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b1) (l_e_st_eq_landau_n_rt_rp_ts a2 b2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b2) (l_e_st_eq_landau_n_rt_rp_ts a2 b1)))).
-
-(* constant 3574 *)
-definition l_e_st_eq_landau_n_rt_rp_td1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_issmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r1)) (l_e_st_eq_landau_n_rt_rp_iv4d_t6 r1 r2 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_iv4d_t8 r1 r2 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r1)))).
-
-(* constant 3575 *)
-definition l_e_st_eq_landau_n_rt_rp_td2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_issmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_iv4d_t5 r1 r2 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_iv4d_t5 r1 r2 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_1a a))))).
-
-(* constant 3576 *)
-definition l_e_st_eq_landau_n_rt_rp_tdeq12a ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b1) (l_e_st_eq_landau_n_rt_rp_ts a2 b2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b2) (l_e_st_eq_landau_n_rt_rp_ts a2 b1))) (l_e_st_eq_landau_n_rt_rp_td12 a1 a2 b1 b2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b1) (l_e_st_eq_landau_n_rt_rp_ts a2 b2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b2) (l_e_st_eq_landau_n_rt_rp_ts a2 b1)))).
-
-(* constant 3577 *)
-definition l_e_st_eq_landau_n_rt_rp_tdeq12b ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq2 (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b1) (l_e_st_eq_landau_n_rt_rp_ts a2 b2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b2) (l_e_st_eq_landau_n_rt_rp_ts a2 b1))) (l_e_st_eq_landau_n_rt_rp_td12 a1 a2 b1 b2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b1) (l_e_st_eq_landau_n_rt_rp_ts a2 b2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b2) (l_e_st_eq_landau_n_rt_rp_ts a2 b1))) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2))).
-
-(* constant 3578 *)
-definition l_e_st_eq_landau_n_rt_rp_tdeq1a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r1))) (l_e_st_eq_landau_n_rt_rp_td1 a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r1)))).
-
-(* constant 3579 *)
-definition l_e_st_eq_landau_n_rt_rp_tdeq1b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq2 (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r1))) (l_e_st_eq_landau_n_rt_rp_td1 a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r1))) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_df r1 r2))).
-
-(* constant 3580 *)
-definition l_e_st_eq_landau_n_rt_rp_tdeq2a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_1a a)))) (l_e_st_eq_landau_n_rt_rp_td2 a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_1a a))))).
-
-(* constant 3581 *)
-definition l_e_st_eq_landau_n_rt_rp_tdeq2b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq2 (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_1a a)))) (l_e_st_eq_landau_n_rt_rp_td2 a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_1a a)))) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df r1 r2) a)).
-
-(* constant 3582 *)
-definition l_e_st_eq_landau_n_rt_rp_4d194_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3583 *)
-definition l_e_st_eq_landau_n_rt_rp_4d194_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)))).
-
-(* constant 3584 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd194 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_4d194_t1 a b) (l_e_st_eq_landau_n_rt_rp_4d194_t2 a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td b a)).
-
-(* constant 3585 *)
-definition l_e_st_eq_landau_n_rt_rp_comtd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satzd194 a b : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td b a)).
-
-(* constant 3586 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t11 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λr:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) r)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) r) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r)) (l_e_st_eq_landau_n_rt_rp_distpt1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b) r) (l_e_st_eq_landau_n_rt_rp_ists1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) r e) (l_e_st_eq_landau_n_rt_rp_disttp1 (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a) r) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) r)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r))).
-
-(* constant 3587 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_iv4d_t11 a b c e (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_iv4d_t11 b a c (l_e_st_eq_landau_n_rt_rp_symeq a b e) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c))))).
-
-(* constant 3588 *)
-definition l_e_st_eq_landau_n_rt_rp_eqtd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_iv4d_t12 a b c e) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)).
-
-(* constant 3589 *)
-definition l_e_st_eq_landau_n_rt_rp_eqtd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_td c b) (l_e_st_eq_landau_n_rt_rp_comtd c a) (l_e_st_eq_landau_n_rt_rp_eqtd1 a b c e) (l_e_st_eq_landau_n_rt_rp_comtd b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b)).
-
-(* constant 3590 *)
-definition l_e_st_eq_landau_n_rt_rp_eqtd12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_td b d) (l_e_st_eq_landau_n_rt_rp_eqtd1 a b c e) (l_e_st_eq_landau_n_rt_rp_eqtd2 c d b f) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b d)).
-
-(* constant 3591 *)
-definition l_e_st_eq_landau_n_rt_rp_4d192_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ists1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b) z) (l_e_st_eq_landau_n_rt_rp_ists1 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) z))) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)))).
-
-(* constant 3592 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd192a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_zeroi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_4d192_t1 a b z) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3593 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd192b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_comtd b a) (l_e_st_eq_landau_n_rt_rp_satzd192a b a z) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3594 *)
-definition l_e_st_eq_landau_n_rt_rp_td01 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_satzd192a a b z : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3595 *)
-definition l_e_st_eq_landau_n_rt_rp_td02 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.(l_e_st_eq_landau_n_rt_rp_satzd192b a b z : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3596 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd197a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)))) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)))) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_tdeq2a b (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)))) (l_e_st_eq_landau_n_rt_rp_m0deqb (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3597 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd197b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d b) a) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td b a)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_comtd a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_satzd197a b a) (l_e_st_eq_landau_n_rt_rp_eqm0d (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_comtd b a)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3598 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd197c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq2 (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) b) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_satzd197a a b) (l_e_st_eq_landau_n_rt_rp_satzd197b a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) b) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3599 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd197d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) b) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_satzd197c a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) b)).
-
-(* constant 3600 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd197e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_satzd197a a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) b)).
-
-(* constant 3601 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd197f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_satzd197b a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3602 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd198 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b))) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_satzd197c a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_eqtd2 (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b)) b a (l_e_st_eq_landau_n_rt_rp_satzd177 b)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3603 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd198a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_satzd198 a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3604 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t13 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.λr:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_distpt2 r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ists2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_1b a b) r (l_e_st_eq_landau_n_rt_rp_satz140e (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b))).
-
-(* constant 3605 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t14 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b)) s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b))) s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b)) s) (l_e_st_eq_landau_n_rt_rp_asspl2 (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b)) s) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b)) s (l_e_st_eq_landau_n_rt_rp_iv4d_t13 a b p q r)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b)) s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b)) s)).
-
-(* constant 3606 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t15 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b)) s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b)) s) (l_e_st_eq_landau_n_rt_rp_pl s (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_iv4d_t14 a b p q r s) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b)) s) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b)) s)) (l_e_st_eq_landau_n_rt_rp_pl s (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b)))).
-
-(* constant 3607 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t16 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_satz135h (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_satz145a (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q) p) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))))).
-
-(* constant 3608 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t17 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_iv4d_t14 a b p q (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_iv4d_t15 a b p q (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_iv4d_t16 a b p q) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)))).
-
-(* constant 3609 *)
-definition l_e_st_eq_landau_n_rt_rp_ptdpp ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_posdi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_iv4d_t17 a b p q) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3610 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t18 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_satzd197b a b) (l_e_st_eq_landau_n_rt_rp_ptdpp a (l_e_st_eq_landau_n_rt_rp_m0d b) p (l_e_st_eq_landau_n_rt_rp_satzd176c b n)) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3611 *)
-definition l_e_st_eq_landau_n_rt_rp_ntdpn ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_satzd176f (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_iv4d_t18 a b p n) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3612 *)
-definition l_e_st_eq_landau_n_rt_rp_ntdnp ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λp:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_eqnegd (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_comtd b a) (l_e_st_eq_landau_n_rt_rp_ntdpn b a p n) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3613 *)
-definition l_e_st_eq_landau_n_rt_rp_ptdnn ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λo:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_satzd198 a b) (l_e_st_eq_landau_n_rt_rp_ptdpp (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_satzd176c a n) (l_e_st_eq_landau_n_rt_rp_satzd176c b o)) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3614 *)
-definition l_e_st_eq_landau_n_rt_rp_4d192_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_pnot0d (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_ptdpp a b p q) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3615 *)
-definition l_e_st_eq_landau_n_rt_rp_4d192_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λm:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_nnot0d (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_ntdpn a b p m) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3616 *)
-definition l_e_st_eq_landau_n_rt_rp_4d192_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_rappd b (l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))) (λt:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_4d192_t2 a b n o p t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_zero b) (l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))) o) (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_4d192_t3 a b n o p t) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3617 *)
-definition l_e_st_eq_landau_n_rt_rp_4d192_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λm:l_e_st_eq_landau_n_rt_rp_negd a.λp:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_nnot0d (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_ntdnp a b m p) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3618 *)
-definition l_e_st_eq_landau_n_rt_rp_4d192_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λm:l_e_st_eq_landau_n_rt_rp_negd a.λl:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_pnot0d (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_ptdnn a b m l) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3619 *)
-definition l_e_st_eq_landau_n_rt_rp_4d192_t7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_rappd b (l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))) (λt:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_4d192_t5 a b n o m t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_zero b) (l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))) o) (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_4d192_t6 a b n o m t) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3620 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd192d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).(l_e_st_eq_landau_n_rt_rp_rappd a (l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_4d192_t4 a b n o t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))) n) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_4d192_t7 a b n o t) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3621 *)
-definition l_e_st_eq_landau_n_rt_rp_4d192_t8 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b).λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_et (l_e_st_eq_landau_n_rt_rp_zero b) (l_imp_th3 (l_not (l_e_st_eq_landau_n_rt_rp_zero b)) (l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))) (l_weli (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)) z) (λt:l_not (l_e_st_eq_landau_n_rt_rp_zero b).l_e_st_eq_landau_n_rt_rp_satzd192d a b n t)) : l_e_st_eq_landau_n_rt_rp_zero b).
-
-(* constant 3622 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd192c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b).(λt:l_not (l_e_st_eq_landau_n_rt_rp_zero a).l_e_st_eq_landau_n_rt_rp_4d192_t8 a b z t : l_or (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_zero b)).
-
-(* constant 3623 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_treq2 (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_absnnd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_pnotnd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_ptdpp a b p q))) (l_e_st_eq_landau_n_rt_rp_eqtd12 (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absd b) b (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a p)) (l_e_st_eq_landau_n_rt_rp_absnnd b (l_e_st_eq_landau_n_rt_rp_pnotnd b q))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3624 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_absnd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_ntdpn a b p n)) (l_e_st_eq_landau_n_rt_rp_satzd197f a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3625 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_treq2 (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_4d193_t2 a b p n) (l_e_st_eq_landau_n_rt_rp_eqtd12 (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a p)) (l_e_st_eq_landau_n_rt_rp_absnd b n)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3626 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_zeroeq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_satzd166f (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td01 a b z)) (l_e_st_eq_landau_n_rt_rp_td01 (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_satzd166f a z)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3627 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.(l_e_st_eq_landau_n_rt_rp_zeroeq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_satzd166f (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td02 a b z)) (l_e_st_eq_landau_n_rt_rp_td02 (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_satzd166f b z)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3628 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λp:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td b a)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_eqabsd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_comtd a b)) (l_e_st_eq_landau_n_rt_rp_4d193_t3 b a p n) (l_e_st_eq_landau_n_rt_rp_comtd (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_absd a)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3629 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λo:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_eqtd12 (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_absnd a n) (l_e_st_eq_landau_n_rt_rp_absnd b o)) (l_e_st_eq_landau_n_rt_rp_satzd198 a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3630 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t8 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λo:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_treq2 (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_absnnd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_pnotnd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_ptdnn a b n o))) (l_e_st_eq_landau_n_rt_rp_4d193_t7 a b n o) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3631 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t9 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_rappd b (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))) (λt:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_4d193_t1 a b p t) (λt:l_e_st_eq_landau_n_rt_rp_zero b.l_e_st_eq_landau_n_rt_rp_4d193_t5 a b t) (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_4d193_t3 a b p t) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3632 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t10 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_rappd b (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))) (λt:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_4d193_t6 a b n t) (λt:l_e_st_eq_landau_n_rt_rp_zero b.l_e_st_eq_landau_n_rt_rp_4d193_t5 a b t) (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_4d193_t8 a b n t) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3633 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd193 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_rappd a (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_4d193_t9 a b t) (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_4d193_t4 a b t) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_4d193_t10 a b t) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3634 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd103a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_satzd193 a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3635 *)
-definition l_e_st_eq_landau_n_rt_rp_1df ≝ (l_e_st_eq_landau_n_rt_rp_pdofrp l_e_st_eq_landau_n_rt_rp_1rp : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3636 *)
-definition l_e_st_eq_landau_n_rt_rp_4d195_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_a2isapa (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_satz151 (l_e_st_eq_landau_n_rt_rp_2a a)))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3637 *)
-definition l_e_st_eq_landau_n_rt_rp_4d195_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_asspl2 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_satz151 (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_a2isapa (l_e_st_eq_landau_n_rt_rp_2a a))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3638 *)
-definition l_e_st_eq_landau_n_rt_rp_4d195_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_4d195_t1 a) (l_e_st_eq_landau_n_rt_rp_4d195_t2 a) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp))))).
-
-(* constant 3639 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd195 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td a l_e_st_eq_landau_n_rt_rp_1df) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)))) a (l_e_st_eq_landau_n_rt_rp_tdeq1a a (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_eqi2 a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_4d195_t3 a)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a l_e_st_eq_landau_n_rt_rp_1df) a).
-
-(* constant 3640 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd195a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td a l_e_st_eq_landau_n_rt_rp_1df) a (l_e_st_eq_landau_n_rt_rp_satzd195 a) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_td a l_e_st_eq_landau_n_rt_rp_1df)).
-
-(* constant 3641 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd195b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td l_e_st_eq_landau_n_rt_rp_1df a) (l_e_st_eq_landau_n_rt_rp_td a l_e_st_eq_landau_n_rt_rp_1df) a (l_e_st_eq_landau_n_rt_rp_comtd l_e_st_eq_landau_n_rt_rp_1df a) (l_e_st_eq_landau_n_rt_rp_satzd195 a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td l_e_st_eq_landau_n_rt_rp_1df a) a).
-
-(* constant 3642 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd195c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td l_e_st_eq_landau_n_rt_rp_1df a) a (l_e_st_eq_landau_n_rt_rp_satzd195b a) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_td l_e_st_eq_landau_n_rt_rp_1df a)).
-
-(* constant 3643 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd196a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_eqtd12 (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absd b) b (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a p)) (l_e_st_eq_landau_n_rt_rp_absnnd b (l_e_st_eq_landau_n_rt_rp_pnotnd b q))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3644 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd196b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λo:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_treq2 (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_satzd198a a b) (l_e_st_eq_landau_n_rt_rp_eqtd12 (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_absnd a n) (l_e_st_eq_landau_n_rt_rp_absnd b o)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3645 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd196c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_treq1 (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_absd b))) (l_e_st_eq_landau_n_rt_rp_eqtd12 (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_absd b)) b (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a p)) (l_e_st_eq_landau_n_rt_rp_satzd177b (l_e_st_eq_landau_n_rt_rp_absd b) b (l_e_st_eq_landau_n_rt_rp_absnd b n))) (l_e_st_eq_landau_n_rt_rp_satzd197b (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)))).
-
-(* constant 3646 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd196d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λp:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_absd a))) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))) (l_e_st_eq_landau_n_rt_rp_comtd a b) (l_e_st_eq_landau_n_rt_rp_satzd196c b a p n) (l_e_st_eq_landau_n_rt_rp_eqm0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_comtd (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_absd a))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)))).
-
-(* constant 3647 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_p1p2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_and (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_posd b) : Prop).
-
-(* constant 3648 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_p1n2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_and (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd b) : Prop).
-
-(* constant 3649 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_n1p2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_and (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_posd b) : Prop).
-
-(* constant 3650 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_n1n2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_and (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_negd b) : Prop).
-
-(* constant 3651 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).(l_e_st_eq_landau_n_rt_rp_ptdpp (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_satzd166e a n) (l_e_st_eq_landau_n_rt_rp_satzd166e b o) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3652 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).(l_e_st_eq_landau_n_rt_rp_pnotnd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) e) (l_e_st_eq_landau_n_rt_rp_4d196_t1 a b n o)) : l_not (l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3653 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_4d196_t2 a b n o e) (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_ntdpn a b p t) : l_not (l_e_st_eq_landau_n_rt_rp_negd b)).
-
-(* constant 3654 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_or3e2 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_axrdo b) (l_e_st_eq_landau_n_rt_rp_4d196_t3 a b n o e p) o : l_e_st_eq_landau_n_rt_rp_posd b).
-
-(* constant 3655 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_andi (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_posd b) p (l_e_st_eq_landau_n_rt_rp_4d196_t4 a b n o e p) : l_e_st_eq_landau_n_rt_rp_4d196_p1p2 a b).
-
-(* constant 3656 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_ori1 (l_e_st_eq_landau_n_rt_rp_4d196_p1p2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1n2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_t5 a b n o e p) : l_or (l_e_st_eq_landau_n_rt_rp_4d196_p1p2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1n2 a b)).
-
-(* constant 3657 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_4d196_t2 a b n o e) (λt:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_ntdnp a b m t) : l_not (l_e_st_eq_landau_n_rt_rp_posd b)).
-
-(* constant 3658 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t8 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_or3e3 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_axrdo b) o (l_e_st_eq_landau_n_rt_rp_4d196_t7 a b n o e m) : l_e_st_eq_landau_n_rt_rp_negd b).
-
-(* constant 3659 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t9 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_andi (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_negd b) m (l_e_st_eq_landau_n_rt_rp_4d196_t8 a b n o e m) : l_e_st_eq_landau_n_rt_rp_4d196_n1n2 a b).
-
-(* constant 3660 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t10 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_ori2 (l_e_st_eq_landau_n_rt_rp_4d196_p1p2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1n2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_t9 a b n o e m) : l_or (l_e_st_eq_landau_n_rt_rp_4d196_p1p2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1n2 a b)).
-
-(* constant 3661 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd196e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).(l_e_st_eq_landau_n_rt_rp_rappd a (l_or (l_e_st_eq_landau_n_rt_rp_4d196_p1p2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1n2 a b)) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_4d196_t6 a b n o e t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_or (l_e_st_eq_landau_n_rt_rp_4d196_p1p2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1n2 a b)) n) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_4d196_t10 a b n o e t) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_posd b)) (l_and (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_negd b))).
-
-(* constant 3662 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t11 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).(l_e_st_eq_landau_n_rt_rp_satzd176a (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_4d196_t1 a b n o) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)))).
-
-(* constant 3663 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).(l_e_st_eq_landau_n_rt_rp_nnotpd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_eqnegd (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))) e) (l_e_st_eq_landau_n_rt_rp_4d196_t11 a b n o)) : l_not (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3664 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t13 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_4d196_t12 a b n o e) (λt:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_ptdpp a b p t) : l_not (l_e_st_eq_landau_n_rt_rp_posd b)).
-
-(* constant 3665 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t14 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_or3e3 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_axrdo b) o (l_e_st_eq_landau_n_rt_rp_4d196_t13 a b n o e p) : l_e_st_eq_landau_n_rt_rp_negd b).
-
-(* constant 3666 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t15 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_andi (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd b) p (l_e_st_eq_landau_n_rt_rp_4d196_t14 a b n o e p) : l_e_st_eq_landau_n_rt_rp_4d196_p1n2 a b).
-
-(* constant 3667 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t16 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_ori1 (l_e_st_eq_landau_n_rt_rp_4d196_p1n2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1p2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_t15 a b n o e p) : l_or (l_e_st_eq_landau_n_rt_rp_4d196_p1n2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1p2 a b)).
-
-(* constant 3668 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t17 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_4d196_t12 a b n o e) (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_ptdnn a b m t) : l_not (l_e_st_eq_landau_n_rt_rp_negd b)).
-
-(* constant 3669 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t18 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_or3e2 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_axrdo b) (l_e_st_eq_landau_n_rt_rp_4d196_t17 a b n o e m) o : l_e_st_eq_landau_n_rt_rp_posd b).
-
-(* constant 3670 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t19 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_andi (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_posd b) m (l_e_st_eq_landau_n_rt_rp_4d196_t18 a b n o e m) : l_e_st_eq_landau_n_rt_rp_4d196_n1p2 a b).
-
-(* constant 3671 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t20 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_ori2 (l_e_st_eq_landau_n_rt_rp_4d196_p1n2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1p2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_t19 a b n o e m) : l_or (l_e_st_eq_landau_n_rt_rp_4d196_p1n2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1p2 a b)).
-
-(* constant 3672 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd196f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).(l_e_st_eq_landau_n_rt_rp_rappd a (l_or (l_e_st_eq_landau_n_rt_rp_4d196_p1n2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1p2 a b)) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_4d196_t16 a b n o e t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_or (l_e_st_eq_landau_n_rt_rp_4d196_p1n2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1p2 a b)) n) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_4d196_t20 a b n o e t) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd b)) (l_and (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_posd b))).
-
-(* constant 3673 *)
-definition l_e_st_eq_landau_n_rt_rp_4d199_t1 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_cut.λu:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts q s)) t) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts p r) t) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts q s) t)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts r t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t))) (l_e_st_eq_landau_n_rt_rp_disttp1 (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts q s) t) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts p r) t) (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts r t)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts q s) t) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t)) (l_e_st_eq_landau_n_rt_rp_assts1 p r t) (l_e_st_eq_landau_n_rt_rp_assts1 q s t)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts q s)) t) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts r t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t)))).
-
-(* constant 3674 *)
-definition l_e_st_eq_landau_n_rt_rp_4d199_t2 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_cut.λu:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t))) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r u) (l_e_st_eq_landau_n_rt_rp_ts s t))) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u))) (l_e_st_eq_landau_n_rt_rp_distpt2 q (l_e_st_eq_landau_n_rt_rp_ts r u) (l_e_st_eq_landau_n_rt_rp_ts s t)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u))) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r u) (l_e_st_eq_landau_n_rt_rp_ts s t)))).
-
-(* constant 3675 *)
-definition l_e_st_eq_landau_n_rt_rp_4d199_t3 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_cut.λu:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts q s)) t) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p s) (l_e_st_eq_landau_n_rt_rp_ts q r)) u)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts r t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts s u)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts r t)) (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts s u))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r t) (l_e_st_eq_landau_n_rt_rp_ts s u))) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r u) (l_e_st_eq_landau_n_rt_rp_ts s t)))) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts q s)) t) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts r t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p s) (l_e_st_eq_landau_n_rt_rp_ts q r)) u) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts s u)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u))) (l_e_st_eq_landau_n_rt_rp_4d199_t1 p q r s t u) (l_e_st_eq_landau_n_rt_rp_4d199_t1 p q s r u t)) (l_e_st_eq_landau_n_rt_rp_4pl23 (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts r t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t)) (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts s u)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u))) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts r t)) (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts s u))) (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r t) (l_e_st_eq_landau_n_rt_rp_ts s u))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u))) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r u) (l_e_st_eq_landau_n_rt_rp_ts s t))) (l_e_st_eq_landau_n_rt_rp_distpt2 p (l_e_st_eq_landau_n_rt_rp_ts r t) (l_e_st_eq_landau_n_rt_rp_ts s u)) (l_e_st_eq_landau_n_rt_rp_4d199_t2 p q r s t u)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts q s)) t) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p s) (l_e_st_eq_landau_n_rt_rp_ts q r)) u)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r t) (l_e_st_eq_landau_n_rt_rp_ts s u))) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r u) (l_e_st_eq_landau_n_rt_rp_ts s t))))).
-
-(* constant 3676 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd199 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_td a b) c) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)))))) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_tdeq2a c (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)))) (l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))))) (l_e_st_eq_landau_n_rt_rp_4d199_t3 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_4d199_t3 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_tdeq1b a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_td a b) c) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_td b c))).
-
-(* constant 3677 *)
-definition l_e_st_eq_landau_n_rt_rp_asstd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satzd199 a b c : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_td a b) c) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_td b c))).
-
-(* constant 3678 *)
-definition l_e_st_eq_landau_n_rt_rp_asstd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_td a b) c) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_satzd199 a b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_td a b) c)).
-
-(* constant 3679 *)
-definition l_e_st_eq_landau_n_rt_rp_4d201_t1 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_cut.λu:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_pl r t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl s u))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts p t)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q s) (l_e_st_eq_landau_n_rt_rp_ts q u))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts q s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p t) (l_e_st_eq_landau_n_rt_rp_ts q u))) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_pl r t)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts p t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl s u)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q s) (l_e_st_eq_landau_n_rt_rp_ts q u)) (l_e_st_eq_landau_n_rt_rp_disttp2 p r t) (l_e_st_eq_landau_n_rt_rp_disttp2 q s u)) (l_e_st_eq_landau_n_rt_rp_4pl23 (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts p t) (l_e_st_eq_landau_n_rt_rp_ts q s) (l_e_st_eq_landau_n_rt_rp_ts q u)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_pl r t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl s u))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts q s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p t) (l_e_st_eq_landau_n_rt_rp_ts q u)))).
-
-(* constant 3680 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd201 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))))) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c))))) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_tdeq1a a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) (l_e_st_eq_landau_n_rt_rp_4d201_t1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_4d201_t1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pdeq12b (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c))).
-
-(* constant 3681 *)
-definition l_e_st_eq_landau_n_rt_rp_disttpd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_td c (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_comtd (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_satzd201 c a b) (l_e_st_eq_landau_n_rt_rp_eqpd12 (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td c b) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_comtd c a) (l_e_st_eq_landau_n_rt_rp_comtd c b)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c))).
-
-(* constant 3682 *)
-definition l_e_st_eq_landau_n_rt_rp_disttpd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satzd201 a b c : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c))).
-
-(* constant 3683 *)
-definition l_e_st_eq_landau_n_rt_rp_distptd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_disttpd1 a b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) c)).
-
-(* constant 3684 *)
-definition l_e_st_eq_landau_n_rt_rp_distptd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_disttpd2 a b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_pd b c))).
-
-(* constant 3685 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd202 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_md b c)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d c))) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_disttpd2 a b (l_e_st_eq_landau_n_rt_rp_m0d c)) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d c)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_satzd197b a c)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_md b c)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c))).
-
-(* constant 3686 *)
-definition l_e_st_eq_landau_n_rt_rp_disttmd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_md a b) c) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d b) c)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_disttpd1 a (l_e_st_eq_landau_n_rt_rp_m0d b) c) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d b) c) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_satzd197a b c)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_md a b) c) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c))).
-
-(* constant 3687 *)
-definition l_e_st_eq_landau_n_rt_rp_disttmd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satzd202 a b c : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_md b c)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c))).
-
-(* constant 3688 *)
-definition l_e_st_eq_landau_n_rt_rp_distmtd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_md a b) c) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_disttmd1 a b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_md a b) c)).
-
-(* constant 3689 *)
-definition l_e_st_eq_landau_n_rt_rp_distmtd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_md b c)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_disttmd2 a b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_md b c))).
-
-(* constant 3690 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd200 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satzd202 a b c : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_md b c)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c))).
-
-(* constant 3691 *)
-definition l_e_st_eq_landau_n_rt_rp_4d203_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_satzd182d a b m : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3692 *)
-definition l_e_st_eq_landau_n_rt_rp_4d203_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λp:l_e_st_eq_landau_n_rt_rp_posd c.(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_md a b) c) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_disttmd1 a b c) (l_e_st_eq_landau_n_rt_rp_ptdpp (l_e_st_eq_landau_n_rt_rp_md a b) c (l_e_st_eq_landau_n_rt_rp_4d203_t1 a b c m) p) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c))).
-
-(* constant 3693 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λp:l_e_st_eq_landau_n_rt_rp_posd c.(l_e_st_eq_landau_n_rt_rp_satzd182a (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_4d203_t2 a b c m p) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)).
-
-(* constant 3694 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λz:l_e_st_eq_landau_n_rt_rp_zero c.(l_e_st_eq_landau_n_rt_rp_zeroeq (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_td02 a c z) (l_e_st_eq_landau_n_rt_rp_td02 b c z) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)).
-
-(* constant 3695 *)
-definition l_e_st_eq_landau_n_rt_rp_4d203_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λn:l_e_st_eq_landau_n_rt_rp_negd c.(l_e_st_eq_landau_n_rt_rp_eqnegd (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_md a b) c) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_disttmd1 a b c) (l_e_st_eq_landau_n_rt_rp_ntdpn (l_e_st_eq_landau_n_rt_rp_md a b) c (l_e_st_eq_landau_n_rt_rp_4d203_t1 a b c m) n) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c))).
-
-(* constant 3696 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λn:l_e_st_eq_landau_n_rt_rp_negd c.(l_e_st_eq_landau_n_rt_rp_satzd182c (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_4d203_t3 a b c m n) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)).
-
-(* constant 3697 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λp:l_e_st_eq_landau_n_rt_rp_posd c.(l_e_st_eq_landau_n_rt_rp_eqmored12 (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_td c b) (l_e_st_eq_landau_n_rt_rp_comtd a c) (l_e_st_eq_landau_n_rt_rp_comtd b c) (l_e_st_eq_landau_n_rt_rp_satzd203a a b c m p) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b)).
-
-(* constant 3698 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λz:l_e_st_eq_landau_n_rt_rp_zero c.(l_e_st_eq_landau_n_rt_rp_zeroeq (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b) (l_e_st_eq_landau_n_rt_rp_td01 c a z) (l_e_st_eq_landau_n_rt_rp_td01 c b z) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b)).
-
-(* constant 3699 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λn:l_e_st_eq_landau_n_rt_rp_negd c.(l_e_st_eq_landau_n_rt_rp_eqlessd12 (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_td c b) (l_e_st_eq_landau_n_rt_rp_comtd a c) (l_e_st_eq_landau_n_rt_rp_comtd b c) (l_e_st_eq_landau_n_rt_rp_satzd203c a b c m n) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b)).
-
-(* constant 3700 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203g ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λp:l_e_st_eq_landau_n_rt_rp_posd c.(l_e_st_eq_landau_n_rt_rp_lemmad5 (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_satzd203a b a c (l_e_st_eq_landau_n_rt_rp_lemmad6 a b l) p) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)).
-
-(* constant 3701 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203h ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λz:l_e_st_eq_landau_n_rt_rp_zero c.(l_e_st_eq_landau_n_rt_rp_zeroeq (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_td02 a c z) (l_e_st_eq_landau_n_rt_rp_td02 b c z) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)).
-
-(* constant 3702 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203j ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λn:l_e_st_eq_landau_n_rt_rp_negd c.(l_e_st_eq_landau_n_rt_rp_lemmad6 (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_satzd203c b a c (l_e_st_eq_landau_n_rt_rp_lemmad6 a b l) n) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)).
-
-(* constant 3703 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203k ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λp:l_e_st_eq_landau_n_rt_rp_posd c.(l_e_st_eq_landau_n_rt_rp_lemmad5 (l_e_st_eq_landau_n_rt_rp_td c b) (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_satzd203d b a c (l_e_st_eq_landau_n_rt_rp_lemmad6 a b l) p) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b)).
-
-(* constant 3704 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203l ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λz:l_e_st_eq_landau_n_rt_rp_zero c.(l_e_st_eq_landau_n_rt_rp_zeroeq (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b) (l_e_st_eq_landau_n_rt_rp_td01 c a z) (l_e_st_eq_landau_n_rt_rp_td01 c b z) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b)).
-
-(* constant 3705 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203m ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λn:l_e_st_eq_landau_n_rt_rp_negd c.(l_e_st_eq_landau_n_rt_rp_lemmad6 (l_e_st_eq_landau_n_rt_rp_td c b) (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_satzd203f b a c (l_e_st_eq_landau_n_rt_rp_lemmad6 a b l) n) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b)).
-
-(* constant 3706 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t19 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) (l_e_st_eq_landau_n_rt_rp_ts q l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) q) (l_e_st_eq_landau_n_rt_rp_disttp2 q p l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_ts q l_e_st_eq_landau_n_rt_rp_1rp) q (l_e_st_eq_landau_n_rt_rp_ts q p) (l_e_st_eq_landau_n_rt_rp_satz151 q)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) q)).
-
-(* constant 3707 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t20 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) q) r) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) (l_e_st_eq_landau_n_rt_rp_pl q r)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) q) (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_1rp) r (l_e_st_eq_landau_n_rt_rp_iv4d_t19 p q) (l_e_st_eq_landau_n_rt_rp_satz151 r)) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_ts q p) q r) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) (l_e_st_eq_landau_n_rt_rp_pl q r))).
-
-(* constant 3708 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t21 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) (l_e_st_eq_landau_n_rt_rp_pl q r)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) (l_e_st_eq_landau_n_rt_rp_pl r q)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_iv4d_t20 p q r) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl q r) (l_e_st_eq_landau_n_rt_rp_pl r q) (l_e_st_eq_landau_n_rt_rp_ts q p) (l_e_st_eq_landau_n_rt_rp_compl q r)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) (l_e_st_eq_landau_n_rt_rp_pl r q))).
-
-(* constant 3709 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_arp ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_rpofpd a p : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3710 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_arpi ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_ov l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_iv4d_arp a p) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3711 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_ai ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3712 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t22 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_iv4d_ai a p)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) l_e_st_eq_landau_n_rt_rp_1rp)))) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p))) (l_e_st_eq_landau_n_rt_rp_tdeq1a a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_iv4d_t20 (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_iv4d_t21 (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_lemmad2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_iv4d_ai a p)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)))).
-
-(* constant 3713 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t23 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arp a p)) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv4d_arp a p) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ists1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arp a p)) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) (l_e_st_eq_landau_n_rt_rp_satz140d (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) p)) (l_e_st_eq_landau_n_rt_rp_disttp1 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arp a p) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv4d_arp a p) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_satz153c l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_iv4d_arp a p))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) l_e_st_eq_landau_n_rt_rp_1rp)).
-
-(* constant 3714 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t24 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p))) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_iv4d_t23 a p)) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)))).
-
-(* constant 3715 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t25 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_iv4d_t24 a p) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p))) l_e_st_eq_landau_n_rt_rp_1df).
-
-(* constant 3716 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t26 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_iv4d_ai a p)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p))) l_e_st_eq_landau_n_rt_rp_1df (l_e_st_eq_landau_n_rt_rp_iv4d_t22 a p) (l_e_st_eq_landau_n_rt_rp_iv4d_t25 a p) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_iv4d_ai a p)) l_e_st_eq_landau_n_rt_rp_1df).
-
-(* constant 3717 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t27 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df) (l_e_st_eq_landau_n_rt_rp_iv4d_ai a p) (l_e_st_eq_landau_n_rt_rp_iv4d_t26 a p) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df)).
-
-(* constant 3718 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t28 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_satzd176c a n : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_m0d a)).
-
-(* constant 3719 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t29 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λh:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) h) l_e_st_eq_landau_n_rt_rp_1df.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d h)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) h) l_e_st_eq_landau_n_rt_rp_1df (l_e_st_eq_landau_n_rt_rp_satzd197d a h) e : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d h)) l_e_st_eq_landau_n_rt_rp_1df).
-
-(* constant 3720 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t30 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λh:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) h) l_e_st_eq_landau_n_rt_rp_1df.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df) (l_e_st_eq_landau_n_rt_rp_m0d h) (l_e_st_eq_landau_n_rt_rp_iv4d_t29 a n h e) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df)).
-
-(* constant 3721 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t31 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) x) l_e_st_eq_landau_n_rt_rp_1df) (l_e_st_eq_landau_n_rt_rp_iv4d_t27 (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_iv4d_t28 a n)) (l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) x) l_e_st_eq_landau_n_rt_rp_1df.l_e_st_eq_landau_n_rt_rp_iv4d_t30 a n x t) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df)).
-
-(* constant 3722 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_e_st_eq_landau_n_rt_rp_rappd a (l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df)) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_iv4d_t27 a t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df)) n) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_iv4d_t31 a t) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df)).
-
-(* constant 3723 *)
-definition l_e_st_eq_landau_n_rt_rp_4d204_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λh:l_e_st_eq_landau_n_rt_rp_dif.λk:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b h) a.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b k) a.(l_e_st_eq_landau_n_rt_rp_treq2 (l_e_st_eq_landau_n_rt_rp_td b h) (l_e_st_eq_landau_n_rt_rp_td b k) a e f : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b h) (l_e_st_eq_landau_n_rt_rp_td b k)).
-
-(* constant 3724 *)
-definition l_e_st_eq_landau_n_rt_rp_4d204_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λh:l_e_st_eq_landau_n_rt_rp_dif.λk:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b h) a.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b k) a.(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td b h) (l_e_st_eq_landau_n_rt_rp_td b k)) (l_e_st_eq_landau_n_rt_rp_td b (l_e_st_eq_landau_n_rt_rp_md h k)) (l_e_st_eq_landau_n_rt_rp_distmtd2 b h k) (l_e_st_eq_landau_n_rt_rp_satzd182e (l_e_st_eq_landau_n_rt_rp_td b h) (l_e_st_eq_landau_n_rt_rp_td b k) (l_e_st_eq_landau_n_rt_rp_4d204_t1 a b n h k e f)) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td b (l_e_st_eq_landau_n_rt_rp_md h k))).
-
-(* constant 3725 *)
-definition l_e_st_eq_landau_n_rt_rp_4d204_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λh:l_e_st_eq_landau_n_rt_rp_dif.λk:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b h) a.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b k) a.(l_ore2 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md h k)) (l_e_st_eq_landau_n_rt_rp_satzd192c b (l_e_st_eq_landau_n_rt_rp_md h k) (l_e_st_eq_landau_n_rt_rp_4d204_t2 a b n h k e f)) n : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md h k)).
-
-(* constant 3726 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd204b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λh:l_e_st_eq_landau_n_rt_rp_dif.λk:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b h) a.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b k) a.(l_e_st_eq_landau_n_rt_rp_satzd182b h k (l_e_st_eq_landau_n_rt_rp_4d204_t3 a b n h k e f) : l_e_st_eq_landau_n_rt_rp_eq h k).
-
-(* constant 3727 *)
-definition l_e_st_eq_landau_n_rt_rp_4d204_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λh:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b h) l_e_st_eq_landau_n_rt_rp_1df.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td b (l_e_st_eq_landau_n_rt_rp_td h a)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_td b h) a) (l_e_st_eq_landau_n_rt_rp_td l_e_st_eq_landau_n_rt_rp_1df a) a (l_e_st_eq_landau_n_rt_rp_asstd2 b h a) (l_e_st_eq_landau_n_rt_rp_eqtd1 (l_e_st_eq_landau_n_rt_rp_td b h) l_e_st_eq_landau_n_rt_rp_1df a e) (l_e_st_eq_landau_n_rt_rp_satzd195b a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b (l_e_st_eq_landau_n_rt_rp_td h a)) a).
-
-(* constant 3728 *)
-definition l_e_st_eq_landau_n_rt_rp_4d204_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λh:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b h) l_e_st_eq_landau_n_rt_rp_1df.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b x) a) (l_e_st_eq_landau_n_rt_rp_td h a) (l_e_st_eq_landau_n_rt_rp_4d204_t4 a b n h e) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b x) a)).
-
-(* constant 3729 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd204a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b x) l_e_st_eq_landau_n_rt_rp_1df) (l_e_st_eq_landau_n_rt_rp_lemmad7 b n) (l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b x) a)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b x) l_e_st_eq_landau_n_rt_rp_1df.l_e_st_eq_landau_n_rt_rp_4d204_t5 a b n x t) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b x) a)).
-
-(* constant 3730 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t1 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r s.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl s (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_asspl2 r l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_asspl2 s l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_satz134 r s (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp)).
-
-(* constant 3731 *)
-definition l_e_st_eq_landau_n_rt_rp_morerpepd ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r s.(l_e_st_eq_landau_n_rt_rp_moredi12 (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_iv5d_t1 r s m) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)).
-
-(* constant 3732 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t2 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s).(l_e_st_eq_landau_n_rt_rp_morede12 (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp)).
-
-(* constant 3733 *)
-definition l_e_st_eq_landau_n_rt_rp_morerpipd ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s).(l_e_st_eq_landau_n_rt_rp_satz136a r s (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl s (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_asspl1 r l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_asspl1 s l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_iv5d_t2 r s m)) : l_e_st_eq_landau_n_rt_rp_more r s).
-
-(* constant 3734 *)
-definition l_e_st_eq_landau_n_rt_rp_lessrpepd ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r s.(l_e_st_eq_landau_n_rt_rp_lemmad5 (l_e_st_eq_landau_n_rt_rp_pdofrp s) (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_morerpepd s r (l_e_st_eq_landau_n_rt_rp_satz122 r s l)) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)).
-
-(* constant 3735 *)
-definition l_e_st_eq_landau_n_rt_rp_lessrpipd ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s).(l_e_st_eq_landau_n_rt_rp_satz121 s r (l_e_st_eq_landau_n_rt_rp_morerpipd s r (l_e_st_eq_landau_n_rt_rp_lemmad6 (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s) l)) : l_e_st_eq_landau_n_rt_rp_less r s).
-
-(* constant 3736 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_i ≝ (l_e_st_eq_landau_n_rt_rp_1rp : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3737 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_2 ≝ (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3738 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_rp1 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_iv5d_i : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3739 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_sp1 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_iv5d_i : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3740 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_rps ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pl r s : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3741 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_rs ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ts r s : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3742 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t3 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) l_e_st_eq_landau_n_rt_rp_iv5d_2) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_4pl23 r l_e_st_eq_landau_n_rt_rp_iv5d_i s l_e_st_eq_landau_n_rt_rp_iv5d_i)) (l_e_st_eq_landau_n_rt_rp_3pl23 (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2 l_e_st_eq_landau_n_rt_rp_iv5d_i) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) l_e_st_eq_landau_n_rt_rp_iv5d_2)).
-
-(* constant 3743 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t4 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) l_e_st_eq_landau_n_rt_rp_iv5d_2) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s)) (l_e_st_eq_landau_n_rt_rp_pdeq12a (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) l_e_st_eq_landau_n_rt_rp_iv5d_2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_t3 r s)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s))).
-
-(* constant 3744 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad8 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_iv5d_t4 r s : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl r s))).
-
-(* constant 3745 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t5 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_iv5d_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) r) (l_e_st_eq_landau_n_rt_rp_disttp2 r s l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_iv5d_i) r (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_satz151 r)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) r)).
-
-(* constant 3746 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t6 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tr4is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) r) s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s)) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_disttp1 r l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) r) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s) (l_e_st_eq_landau_n_rt_rp_iv5d_t5 r s) (l_e_st_eq_landau_n_rt_rp_satz151b (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s))) (l_e_st_eq_landau_n_rt_rp_asspl2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) r) s l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) r) s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s)) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) r s)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s)) l_e_st_eq_landau_n_rt_rp_iv5d_i)).
-
-(* constant 3747 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t7 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s)) l_e_st_eq_landau_n_rt_rp_iv5d_i) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s)) l_e_st_eq_landau_n_rt_rp_iv5d_2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s)) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_t6 r s) (l_e_st_eq_landau_n_rt_rp_satz151 l_e_st_eq_landau_n_rt_rp_iv5d_i)) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s)) l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2))).
-
-(* constant 3748 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t8 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s) (l_e_st_eq_landau_n_rt_rp_satz151 (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r)) (l_e_st_eq_landau_n_rt_rp_satz151b (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s))) (l_e_st_eq_landau_n_rt_rp_4pl23 r l_e_st_eq_landau_n_rt_rp_iv5d_i s l_e_st_eq_landau_n_rt_rp_iv5d_i) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2)).
-
-(* constant 3749 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t9 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2)) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_iv5d_t8 r s)) (l_e_st_eq_landau_n_rt_rp_3pl23 (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2)) l_e_st_eq_landau_n_rt_rp_iv5d_i)).
-
-(* constant 3750 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t10 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i)) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2)) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2)) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_t7 r s)) (l_e_st_eq_landau_n_rt_rp_iv5d_t9 r s) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i)) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s))))).
-
-(* constant 3751 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t11 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s)) (l_e_st_eq_landau_n_rt_rp_tdeq12a (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_t10 r s)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s))).
-
-(* constant 3752 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad9 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_iv5d_t11 r s : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts r s))).
-
-(* constant 3753 *)
-definition l_e_st_eq_landau_n_rt_rp_in ≝ λr:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.(l_e_st_esti l_e_st_eq_landau_n_rt_cut r s0 : Prop).
-
-(* constant 3754 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_prop1 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_less x r.l_e_st_eq_landau_n_rt_rp_in x s0) : Prop).
-
-(* constant 3755 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_prop2 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_more x r.l_e_st_eq_landau_n_rt_rp_in x t0) : Prop).
-
-(* constant 3756 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_prop3 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_and (l_e_st_eq_landau_n_rt_rp_5p205_prop1 s0 t0 r) (l_e_st_eq_landau_n_rt_rp_5p205_prop2 s0 t0 r) : Prop).
-
-(* constant 3757 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t1 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.(l_ande2 (l_e_st_eq_landau_n_rt_rp_5p205_prop1 s0 t0 r1) (l_e_st_eq_landau_n_rt_rp_5p205_prop2 s0 t0 r1) pr1 : l_e_st_eq_landau_n_rt_rp_5p205_prop2 s0 t0 r1).
-
-(* constant 3758 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t2 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.(l_ande1 (l_e_st_eq_landau_n_rt_rp_5p205_prop1 s0 t0 r2) (l_e_st_eq_landau_n_rt_rp_5p205_prop2 s0 t0 r2) pr2 : l_e_st_eq_landau_n_rt_rp_5p205_prop1 s0 t0 r2).
-
-(* constant 3759 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_rx ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.λl:l_e_st_eq_landau_n_rt_rp_less r1 r2.λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt x0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3760 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t3 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.λl:l_e_st_eq_landau_n_rt_rp_less r1 r2.λx0:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less r1 (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) r2.(l_e_st_eq_landau_n_rt_rp_5p205_t2 s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) l2 : l_e_st_eq_landau_n_rt_rp_in (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) s0).
-
-(* constant 3761 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t4 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.λl:l_e_st_eq_landau_n_rt_rp_less r1 r2.λx0:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less r1 (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) r2.(l_e_st_eq_landau_n_rt_rp_5p205_t1 s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) (l_e_st_eq_landau_n_rt_rp_satz122 r1 (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) l1) : l_e_st_eq_landau_n_rt_rp_in (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) t0).
-
-(* constant 3762 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t5 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.λl:l_e_st_eq_landau_n_rt_rp_less r1 r2.λx0:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less r1 (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) r2.(l_ec3e31 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0)) (l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0)) (p2 (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) (l_e_st_eq_landau_n_rt_rp_5p205_t3 s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0 l1 l2) (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) (l_e_st_eq_landau_n_rt_rp_5p205_t4 s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0 l1 l2)) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0)) : l_con).
-
-(* constant 3763 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t6 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.λl:l_e_st_eq_landau_n_rt_rp_less r1 r2.(l_e_st_eq_landau_n_rt_rp_satz159app r1 r2 l l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_less r1 (l_e_st_eq_landau_n_rt_rp_rpofrt x).λu:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) r2.l_e_st_eq_landau_n_rt_rp_5p205_t5 s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x t u) : l_con).
-
-(* constant 3764 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t7 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.(λt:l_e_st_eq_landau_n_rt_rp_less r1 r2.l_e_st_eq_landau_n_rt_rp_5p205_t6 s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 t : l_not (l_e_st_eq_landau_n_rt_rp_less r1 r2)).
-
-(* constant 3765 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t8 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.(λt:l_e_st_eq_landau_n_rt_rp_more r1 r2.l_e_st_eq_landau_n_rt_rp_5p205_t6 s0 t0 p0 p1a p1b p2 r2 r1 pr2 pr1 (l_e_st_eq_landau_n_rt_rp_satz121 r1 r2 t) : l_not (l_e_st_eq_landau_n_rt_rp_more r1 r2)).
-
-(* constant 3766 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t9 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.(l_or3e1 (l_e_st_eq_landau_n_rt_rp_is r1 r2) (l_e_st_eq_landau_n_rt_rp_more r1 r2) (l_e_st_eq_landau_n_rt_rp_less r1 r2) (l_e_st_eq_landau_n_rt_rp_satz123a r1 r2) (l_e_st_eq_landau_n_rt_rp_5p205_t8 s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2) (l_e_st_eq_landau_n_rt_rp_5p205_t7 s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2) : l_e_st_eq_landau_n_rt_rp_is r1 r2).
-
-(* constant 3767 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t10 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(λx:l_e_st_eq_landau_n_rt_cut.λy:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 x.λu:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 y.l_e_st_eq_landau_n_rt_rp_5p205_t9 s0 t0 p0 p1a p1b p2 x y t u : l_e_amone l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 x)).
-
-(* constant 3768 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_schnittprop ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_some (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0)) : Prop).
-
-(* constant 3769 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_schnittset ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 3770 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t11 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r s0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.(l_andi (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0) i lx : l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0)).
-
-(* constant 3771 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t12 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r s0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.(l_somei l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0)) r (l_e_st_eq_landau_n_rt_rp_5p205_t11 s0 t0 p0 p1a p1b p2 r i x0 lx) : l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x0).
-
-(* constant 3772 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t13 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r s0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x) x0 (l_e_st_eq_landau_n_rt_rp_5p205_t12 s0 t0 p0 p1a p1b p2 r i x0 lx) : l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3773 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t14 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r t0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λs:l_e_st_eq_landau_n_rt_cut.λj:l_e_st_eq_landau_n_rt_rp_in s s0.(l_e_st_eq_landau_n_rt_rp_satz122 s r (p2 s j r i) : l_e_st_eq_landau_n_rt_rp_more r s).
-
-(* constant 3774 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t15 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r t0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λs:l_e_st_eq_landau_n_rt_cut.λj:l_e_st_eq_landau_n_rt_rp_in s s0.(l_e_st_eq_landau_n_rt_rp_satz158b r x0 ux : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_rpofrt x0) r).
-
-(* constant 3775 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t16 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r t0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λs:l_e_st_eq_landau_n_rt_cut.λj:l_e_st_eq_landau_n_rt_rp_in s s0.(l_e_st_eq_landau_n_rt_rp_moreisi1 (l_e_st_eq_landau_n_rt_rp_rpofrt x0) s (l_e_st_eq_landau_n_rt_rp_satz127c (l_e_st_eq_landau_n_rt_rp_rpofrt x0) r s (l_e_st_eq_landau_n_rt_rp_5p205_t15 s0 t0 p0 p1a p1b p2 r i x0 ux s j) (l_e_st_eq_landau_n_rt_rp_5p205_t14 s0 t0 p0 p1a p1b p2 r i x0 ux s j)) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_rpofrt x0) s).
-
-(* constant 3776 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t17 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r t0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λs:l_e_st_eq_landau_n_rt_cut.λj:l_e_st_eq_landau_n_rt_rp_in s s0.(l_e_st_eq_landau_n_rt_rp_satz158d s x0 (l_e_st_eq_landau_n_rt_rp_5p205_t16 s0 t0 p0 p1a p1b p2 r i x0 ux s j) : l_e_st_eq_landau_n_rt_urt s x0).
-
-(* constant 3777 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t18 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r t0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λs:l_e_st_eq_landau_n_rt_cut.(l_weli (l_ec (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0)) (λt:l_e_st_eq_landau_n_rt_rp_in s s0.l_e_st_eq_landau_n_rt_rp_5p205_t17 s0 t0 p0 p1a p1b p2 r i x0 ux s t) : l_not (l_and (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0))).
-
-(* constant 3778 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t19 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r t0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.(l_some_th5 l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0)) (λy:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_5p205_t18 s0 t0 p0 p1a p1b p2 r i x0 ux y) : l_not (l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x0)).
-
-(* constant 3779 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t20 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r t0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.(l_imp_th3 (l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x0) (l_e_st_eq_landau_n_rt_rp_5p205_t19 s0 t0 p0 p1a p1b p2 r i x0 ux) (λt:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x) x0 t) : l_not (l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2))).
-
-(* constant 3780 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t21 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x) x0 i : l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x0).
-
-(* constant 3781 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t22 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).(l_ande1 (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0) a : l_e_st_eq_landau_n_rt_rp_in r s0).
-
-(* constant 3782 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t23 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).(l_ande2 (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0) a : l_e_st_eq_landau_n_rt_lrt r x0).
-
-(* constant 3783 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t24 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).(l_e_st_eq_landau_n_rt_rp_satz120 r x0 (l_e_st_eq_landau_n_rt_rp_5p205_t23 s0 t0 p0 p1a p1b p2 x0 i y0 l r a) y0 l : l_e_st_eq_landau_n_rt_lrt r y0).
-
-(* constant 3784 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t25 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).(l_andi (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r y0) (l_e_st_eq_landau_n_rt_rp_5p205_t22 s0 t0 p0 p1a p1b p2 x0 i y0 l r a) (l_e_st_eq_landau_n_rt_rp_5p205_t24 s0 t0 p0 p1a p1b p2 x0 i y0 l r a) : l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r y0)).
-
-(* constant 3785 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t26 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).(l_somei l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y y0)) r (l_e_st_eq_landau_n_rt_rp_5p205_t25 s0 t0 p0 p1a p1b p2 x0 i y0 l r a) : l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 y0).
-
-(* constant 3786 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t27 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_someapp l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0)) (l_e_st_eq_landau_n_rt_rp_5p205_t21 s0 t0 p0 p1a p1b p2 x0 i) (l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 y0) (λy:l_e_st_eq_landau_n_rt_cut.λr:l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0).l_e_st_eq_landau_n_rt_rp_5p205_t26 s0 t0 p0 p1a p1b p2 x0 i y0 l y r) : l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 y0).
-
-(* constant 3787 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t28 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x) y0 (l_e_st_eq_landau_n_rt_rp_5p205_t27 s0 t0 p0 p1a p1b p2 x0 i y0 l) : l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3788 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t29 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).(l_ande1 (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0) a : l_e_st_eq_landau_n_rt_rp_in r s0).
-
-(* constant 3789 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t30 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).(l_ande2 (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0) a : l_e_st_eq_landau_n_rt_lrt r x0).
-
-(* constant 3790 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t31 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt r y0.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_andi (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r y0) (l_e_st_eq_landau_n_rt_rp_5p205_t29 s0 t0 p0 p1a p1b p2 x0 i r a) ly : l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r y0)).
-
-(* constant 3791 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t32 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt r y0.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_somei l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y y0)) r (l_e_st_eq_landau_n_rt_rp_5p205_t31 s0 t0 p0 p1a p1b p2 x0 i r a y0 ly l) : l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 y0).
-
-(* constant 3792 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t33 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt r y0.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x) y0 (l_e_st_eq_landau_n_rt_rp_5p205_t32 s0 t0 p0 p1a p1b p2 x0 i r a y0 ly l) : l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3793 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t34 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt r y0.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_satz83 x0 y0 l : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 3794 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t35 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt r y0.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_andi (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_more y0 x0) (l_e_st_eq_landau_n_rt_rp_5p205_t33 s0 t0 p0 p1a p1b p2 x0 i r a y0 ly l) (l_e_st_eq_landau_n_rt_rp_5p205_t34 s0 t0 p0 p1a p1b p2 x0 i r a y0 ly l) : l_and (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_more y0 x0)).
-
-(* constant 3795 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t36 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt r y0.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_more y x0)) y0 (l_e_st_eq_landau_n_rt_rp_5p205_t35 s0 t0 p0 p1a p1b p2 x0 i r a y0 ly l) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_more y x0))).
-
-(* constant 3796 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t37 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).(l_e_st_eq_landau_n_rt_cutapp3 r x0 (l_e_st_eq_landau_n_rt_rp_5p205_t30 s0 t0 p0 p1a p1b p2 x0 i r a) (l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_more y x0))) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt r y.λu:l_e_st_eq_landau_n_rt_less x0 y.l_e_st_eq_landau_n_rt_rp_5p205_t36 s0 t0 p0 p1a p1b p2 x0 i r a y t u) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_more y x0))).
-
-(* constant 3797 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t38 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).(l_someapp l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0)) (l_e_st_eq_landau_n_rt_rp_5p205_t21 s0 t0 p0 p1a p1b p2 x0 i) (l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_more y x0))) (λy:l_e_st_eq_landau_n_rt_cut.λt:l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0).l_e_st_eq_landau_n_rt_rp_5p205_t37 s0 t0 p0 p1a p1b p2 x0 i y t) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_more y x0))).
-
-(* constant 3798 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t39 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r s0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.λs:l_e_st_eq_landau_n_rt_cut.λj:l_e_st_eq_landau_n_rt_rp_in s t0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt s y0.(l_e_st_eq_landau_n_rt_cut2 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2) x0 (l_e_st_eq_landau_n_rt_rp_5p205_t13 s0 t0 p0 p1a p1b p2 r i x0 lx) y0 (l_e_st_eq_landau_n_rt_rp_5p205_t20 s0 t0 p0 p1a p1b p2 s j y0 uy) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_rp_5p205_t28 s0 t0 p0 p1a p1b p2 x t y u) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).l_e_st_eq_landau_n_rt_rp_5p205_t38 s0 t0 p0 p1a p1b p2 x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3799 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t40 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r s0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.λs:l_e_st_eq_landau_n_rt_cut.λj:l_e_st_eq_landau_n_rt_rp_in s t0.(l_e_st_eq_landau_n_rt_cutapp1b s (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt s x.l_e_st_eq_landau_n_rt_rp_5p205_t39 s0 t0 p0 p1a p1b p2 r i x0 lx s j x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3800 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t41 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r s0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.(l_e_st_nonemptyapp l_e_st_eq_landau_n_rt_cut t0 p1b (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (λy:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_5p205_t40 s0 t0 p0 p1a p1b p2 r i x0 lx y t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3801 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t42 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r s0.(l_e_st_eq_landau_n_rt_cutapp1a r (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt r x.l_e_st_eq_landau_n_rt_rp_5p205_t41 s0 t0 p0 p1a p1b p2 r i x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3802 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t43 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_e_st_nonemptyapp l_e_st_eq_landau_n_rt_cut s0 p1a (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (λy:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_in y s0.l_e_st_eq_landau_n_rt_rp_5p205_t42 s0 t0 p0 p1a p1b p2 y t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3803 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_snt ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_e_st_eq_landau_n_rt_rp_cutof (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2) (l_e_st_eq_landau_n_rt_rp_5p205_t43 s0 t0 p0 p1a p1b p2) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3804 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t44 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.(l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2) (l_e_st_eq_landau_n_rt_rp_5p205_t43 s0 t0 p0 p1a p1b p2) x0 lx : l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3805 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t45 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x) x0 (l_e_st_eq_landau_n_rt_rp_5p205_t44 s0 t0 p0 p1a p1b p2 r l x0 ux lx) : l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x0).
-
-(* constant 3806 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t46 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λs:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0).(l_ande1 (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0) a : l_e_st_eq_landau_n_rt_rp_in s s0).
-
-(* constant 3807 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t47 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λs:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0).(l_ande2 (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0) a : l_e_st_eq_landau_n_rt_lrt s x0).
-
-(* constant 3808 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t48 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λs:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0).(l_andi (l_e_st_eq_landau_n_rt_urt r x0) (l_e_st_eq_landau_n_rt_lrt s x0) ux (l_e_st_eq_landau_n_rt_rp_5p205_t47 s0 t0 p0 p1a p1b p2 r l x0 ux lx s a) : l_and (l_e_st_eq_landau_n_rt_urt r x0) (l_e_st_eq_landau_n_rt_lrt s x0)).
-
-(* constant 3809 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t49 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λs:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_urt r x) (l_e_st_eq_landau_n_rt_lrt s x)) x0 (l_e_st_eq_landau_n_rt_rp_5p205_t48 s0 t0 p0 p1a p1b p2 r l x0 ux lx s a) : l_e_st_eq_landau_n_rt_rp_less r s).
-
-(* constant 3810 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t50 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λs:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0).(l_ec3e23 (l_e_st_eq_landau_n_rt_rp_is s r) (l_e_st_eq_landau_n_rt_rp_more s r) (l_e_st_eq_landau_n_rt_rp_less s r) (l_e_st_eq_landau_n_rt_rp_satz123b s r) (l_e_st_eq_landau_n_rt_rp_satz122 r s (l_e_st_eq_landau_n_rt_rp_5p205_t49 s0 t0 p0 p1a p1b p2 r l x0 ux lx s a)) : l_not (l_e_st_eq_landau_n_rt_rp_less s r)).
-
-(* constant 3811 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t51 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λs:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_in r t0) (l_e_st_eq_landau_n_rt_rp_less s r) (l_e_st_eq_landau_n_rt_rp_5p205_t50 s0 t0 p0 p1a p1b p2 r l x0 ux lx s a) (p2 s (l_e_st_eq_landau_n_rt_rp_5p205_t46 s0 t0 p0 p1a p1b p2 r l x0 ux lx s a) r) : l_not (l_e_st_eq_landau_n_rt_rp_in r t0)).
-
-(* constant 3812 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t52 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λs:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0).(l_ore1 (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_rp_in r t0) (p0 r) (l_e_st_eq_landau_n_rt_rp_5p205_t51 s0 t0 p0 p1a p1b p2 r l x0 ux lx s a) : l_e_st_eq_landau_n_rt_rp_in r s0).
-
-(* constant 3813 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t53 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.(l_someapp l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0)) (l_e_st_eq_landau_n_rt_rp_5p205_t45 s0 t0 p0 p1a p1b p2 r l x0 ux lx) (l_e_st_eq_landau_n_rt_rp_in r s0) (λy:l_e_st_eq_landau_n_rt_cut.λt:l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0).l_e_st_eq_landau_n_rt_rp_5p205_t52 s0 t0 p0 p1a p1b p2 r l x0 ux lx y t) : l_e_st_eq_landau_n_rt_rp_in r s0).
-
-(* constant 3814 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t54 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).(l_e_st_eq_landau_n_rt_rp_lessapp r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) l (l_e_st_eq_landau_n_rt_rp_in r s0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt r x.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x.l_e_st_eq_landau_n_rt_rp_5p205_t53 s0 t0 p0 p1a p1b p2 r l x t u) : l_e_st_eq_landau_n_rt_rp_in r s0).
-
-(* constant 3815 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t55 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λi:l_e_st_eq_landau_n_rt_rp_in r s0.(l_andi (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0) i lx : l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0)).
-
-(* constant 3816 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t56 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λi:l_e_st_eq_landau_n_rt_rp_in r s0.(l_somei l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0)) r (l_e_st_eq_landau_n_rt_rp_5p205_t55 s0 t0 p0 p1a p1b p2 r m x0 lx ux i) : l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x0).
-
-(* constant 3817 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t57 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λi:l_e_st_eq_landau_n_rt_rp_in r s0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x) x0 (l_e_st_eq_landau_n_rt_rp_5p205_t56 s0 t0 p0 p1a p1b p2 r m x0 lx ux i) : l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3818 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t58 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λi:l_e_st_eq_landau_n_rt_rp_in r s0.(l_e_st_eq_landau_n_rt_rp_ine (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2) (l_e_st_eq_landau_n_rt_rp_5p205_t43 s0 t0 p0 p1a p1b p2) x0 (l_e_st_eq_landau_n_rt_rp_5p205_t57 s0 t0 p0 p1a p1b p2 r m x0 lx ux i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0).
-
-(* constant 3819 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t59 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0) ux (λt:l_e_st_eq_landau_n_rt_rp_in r s0.l_e_st_eq_landau_n_rt_rp_5p205_t58 s0 t0 p0 p1a p1b p2 r m x0 lx ux t) : l_not (l_e_st_eq_landau_n_rt_rp_in r s0)).
-
-(* constant 3820 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t60 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.(l_ore2 (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_rp_in r t0) (p0 r) (l_e_st_eq_landau_n_rt_rp_5p205_t59 s0 t0 p0 p1a p1b p2 r m x0 lx ux) : l_e_st_eq_landau_n_rt_rp_in r t0).
-
-(* constant 3821 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t61 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).(l_e_st_eq_landau_n_rt_rp_moreapp r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) m (l_e_st_eq_landau_n_rt_rp_in r t0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt r x.λu:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x.l_e_st_eq_landau_n_rt_rp_5p205_t60 s0 t0 p0 p1a p1b p2 r m x t u) : l_e_st_eq_landau_n_rt_rp_in r t0).
-
-(* constant 3822 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t62 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_andi (l_e_st_eq_landau_n_rt_rp_5p205_prop1 s0 t0 (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_rp_5p205_prop2 s0 t0 (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2)) (λx:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_less x (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).l_e_st_eq_landau_n_rt_rp_5p205_t54 s0 t0 p0 p1a p1b p2 x t) (λx:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_more x (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).l_e_st_eq_landau_n_rt_rp_5p205_t61 s0 t0 p0 p1a p1b p2 x t) : l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2)).
-
-(* constant 3823 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t63 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_somei l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 x) (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) (l_e_st_eq_landau_n_rt_rp_5p205_t62 s0 t0 p0 p1a p1b p2) : l_e_st_eq_landau_n_rt_rp_some (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 x)).
-
-(* constant 3824 *)
-definition l_e_st_eq_landau_n_rt_rp_satzp205 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_e_onei l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 x) (l_e_st_eq_landau_n_rt_rp_5p205_t10 s0 t0 p0 p1a p1b p2) (l_e_st_eq_landau_n_rt_rp_5p205_t63 s0 t0 p0 p1a p1b p2) : l_e_st_eq_landau_n_rt_rp_one (λx:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_less y x.l_e_st_eq_landau_n_rt_rp_in y s0)) (l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_more y x.l_e_st_eq_landau_n_rt_rp_in y t0)))).
-
-(* constant 3825 *)
-definition l_e_st_eq_landau_n_rt_rp_schnitt ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_e_ind l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 x) (l_e_st_eq_landau_n_rt_rp_satzp205 s0 t0 p0 p1a p1b p2) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3826 *)
-definition l_e_st_eq_landau_n_rt_rp_satzp205a ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_ande1 (l_e_st_eq_landau_n_rt_rp_5p205_prop1 s0 t0 (l_e_st_eq_landau_n_rt_rp_schnitt s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_rp_5p205_prop2 s0 t0 (l_e_st_eq_landau_n_rt_rp_schnitt s0 t0 p0 p1a p1b p2)) (l_e_oneax l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 x) (l_e_st_eq_landau_n_rt_rp_satzp205 s0 t0 p0 p1a p1b p2)) : l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_less x (l_e_st_eq_landau_n_rt_rp_schnitt s0 t0 p0 p1a p1b p2).l_e_st_eq_landau_n_rt_rp_in x s0)).
-
-(* constant 3827 *)
-definition l_e_st_eq_landau_n_rt_rp_satzp205b ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_ande2 (l_e_st_eq_landau_n_rt_rp_5p205_prop1 s0 t0 (l_e_st_eq_landau_n_rt_rp_schnitt s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_rp_5p205_prop2 s0 t0 (l_e_st_eq_landau_n_rt_rp_schnitt s0 t0 p0 p1a p1b p2)) (l_e_oneax l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 x) (l_e_st_eq_landau_n_rt_rp_satzp205 s0 t0 p0 p1a p1b p2)) : l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_more x (l_e_st_eq_landau_n_rt_rp_schnitt s0 t0 p0 p1a p1b p2).l_e_st_eq_landau_n_rt_rp_in x t0)).
-
-(* constant 3828 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_i ≝ (l_e_st_eq_landau_n_rt_rp_1rp : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3829 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_r1 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_ivad_i : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3830 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_s1 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_ivad_i : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3831 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_rps ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pl r s : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3832 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_2 ≝ (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3833 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t1 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pdeq12a (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s) l_e_st_eq_landau_n_rt_rp_ivad_i : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) l_e_st_eq_landau_n_rt_rp_ivad_2)).
-
-(* constant 3834 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t2 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_4pl23 r l_e_st_eq_landau_n_rt_rp_ivad_i s l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_asspl2 (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i)).
-
-(* constant 3835 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t3 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_t2 r s) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i)).
-
-(* constant 3836 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t4 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_2) (l_e_st_eq_landau_n_rt_rp_ivad_t3 r s) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_2)).
-
-(* constant 3837 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t5 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) l_e_st_eq_landau_n_rt_rp_ivad_2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_t4 r s) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) l_e_st_eq_landau_n_rt_rp_ivad_2) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ivad_rps r s))).
-
-(* constant 3838 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmaivad1 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_ivad_t1 r s) (l_e_st_eq_landau_n_rt_rp_ivad_t5 r s) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl r s))).
-
-(* constant 3839 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_rs ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ts r s : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3840 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t6 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_tdeq12a (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s) l_e_st_eq_landau_n_rt_rp_ivad_i : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s))))).
-
-(* constant 3841 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t7 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) s) (l_e_st_eq_landau_n_rt_rp_disttp1 r l_e_st_eq_landau_n_rt_rp_ivad_i s) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i s) s (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) (l_e_st_eq_landau_n_rt_rp_satz151b s)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) s)).
-
-(* constant 3842 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t8 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) s) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) s) (l_e_st_eq_landau_n_rt_rp_ivad_r1 r)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ivad_rps r s)) (l_e_st_eq_landau_n_rt_rp_disttp2 (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) s l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) s) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_t7 r s) (l_e_st_eq_landau_n_rt_rp_satz151 (l_e_st_eq_landau_n_rt_rp_ivad_r1 r))) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) s r l_e_st_eq_landau_n_rt_rp_ivad_i) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ivad_rps r s))).
-
-(* constant 3843 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t9 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ivad_rps r s)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ivad_rps r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_t8 r s) (l_e_st_eq_landau_n_rt_rp_satz151 l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i))).
-
-(* constant 3844 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t10 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i)) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_t9 r s)) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i))).
-
-(* constant 3845 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t11 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s))) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_4pl23 r s l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_satz151a (l_e_st_eq_landau_n_rt_rp_ivad_r1 r)) (l_e_st_eq_landau_n_rt_rp_satz151c (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)))).
-
-(* constant 3846 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t12 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)))) (l_e_st_eq_landau_n_rt_rp_ivad_t10 r s) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ivad_t11 r s)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s))))).
-
-(* constant 3847 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t13 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_t12 r s) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ivad_rs r s))).
-
-(* constant 3848 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmaivad2 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp)))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts r s)) (l_e_st_eq_landau_n_rt_rp_ivad_t6 r s) (l_e_st_eq_landau_n_rt_rp_ivad_t13 r s) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts r s))).
-
-(* constant 3849 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t14 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s).(l_e_st_eq_landau_n_rt_rp_morede12 (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s) l_e_st_eq_landau_n_rt_rp_ivad_i m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s) l_e_st_eq_landau_n_rt_rp_ivad_i)).
-
-(* constant 3850 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t15 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s).(l_e_st_eq_landau_n_rt_rp_satz136a (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_t14 r s m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)).
-
-(* constant 3851 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmaivad3 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s).(l_e_st_eq_landau_n_rt_rp_satz136a r s l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_ivad_t15 r s m) : l_e_st_eq_landau_n_rt_rp_more r s).
-
-(* constant 3852 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t1 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.(l_e_st_eq_landau_n_rt_rp_treq2 (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b) c e f : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b)).
-
-(* constant 3853 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t2 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td b a)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_comtd b a)) (l_e_st_eq_landau_n_rt_rp_pdmd (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td b a)) (l_e_st_eq_landau_n_rt_rp_td a a)).
-
-(* constant 3854 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t3 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.(l_e_st_eq_landau_n_rt_rp_tr4eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_td b (l_e_st_eq_landau_n_rt_rp_md a b))) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_td b b))) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td b a)) (l_e_st_eq_landau_n_rt_rp_td b b)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b)) (l_e_st_eq_landau_n_rt_rp_disttpd1 a b (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_eqpd12 (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td b (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_td b b)) (l_e_st_eq_landau_n_rt_rp_disttmd2 a a b) (l_e_st_eq_landau_n_rt_rp_disttmd2 b a b)) (l_e_st_eq_landau_n_rt_rp_asspd2 (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td b b))) (l_e_st_eq_landau_n_rt_rp_eqmd1 (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td b a)) (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b) (l_e_st_eq_landau_n_rt_rp_d161_t2 c a b n o e f)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b))).
-
-(* constant 3855 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t4 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b)) (l_e_st_eq_landau_n_rt_rp_d161_t3 c a b n o e f)) (l_e_st_eq_landau_n_rt_rp_satzd182e (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b) (l_e_st_eq_landau_n_rt_rp_d161_t1 c a b n o e f)) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_md a b))).
-
-(* constant 3856 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t5 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.(l_e_st_eq_landau_n_rt_rp_satzd192c (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_d161_t4 c a b n o e f) : l_or (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md a b))).
-
-(* constant 3857 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t6 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b) (l_e_st_eq_landau_n_rt_rp_d161_t1 c a b n o e f) (l_e_st_eq_landau_n_rt_rp_td01 a a z) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td b b)).
-
-(* constant 3858 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t7 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_zero b) (l_refimp (l_e_st_eq_landau_n_rt_rp_zero b)) (l_e_st_eq_landau_n_rt_rp_satzd192c b b (l_e_st_eq_landau_n_rt_rp_d161_t6 c a b n o e f z)) : l_e_st_eq_landau_n_rt_rp_zero b).
-
-(* constant 3859 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t8 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_zeroeq a b z (l_e_st_eq_landau_n_rt_rp_d161_t7 c a b n o e f z) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3860 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t9 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λp:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_or3e2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_axrdo a) n p : l_e_st_eq_landau_n_rt_rp_posd a).
-
-(* constant 3861 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t10 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λp:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_zero a) p (λt:l_e_st_eq_landau_n_rt_rp_zero b.l_e_st_eq_landau_n_rt_rp_d161_t7 c b a o n f e t) : l_not (l_e_st_eq_landau_n_rt_rp_zero b)).
-
-(* constant 3862 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t11 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λp:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_e_st_eq_landau_n_rt_rp_d161_t9 c b a o n f e (l_e_st_eq_landau_n_rt_rp_d161_t10 c a b n o e f p) : l_e_st_eq_landau_n_rt_rp_posd b).
-
-(* constant 3863 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t12 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λp:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_e_st_eq_landau_n_rt_rp_pnot0d (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_ppd a b (l_e_st_eq_landau_n_rt_rp_d161_t9 c a b n o e f p) (l_e_st_eq_landau_n_rt_rp_d161_t11 c a b n o e f p)) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_pd a b))).
-
-(* constant 3864 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t13 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λp:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_ore2 (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_d161_t5 c a b n o e f) (l_e_st_eq_landau_n_rt_rp_d161_t12 c a b n o e f p) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3865 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t14 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λp:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_e_st_eq_landau_n_rt_rp_satzd182b a b (l_e_st_eq_landau_n_rt_rp_d161_t13 c a b n o e f p) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3866 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd161b ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_eq a b) (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_d161_t8 c a b n o e f t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_zero a).l_e_st_eq_landau_n_rt_rp_d161_t14 c a b n o e f t) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3867 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t15 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λz:l_e_st_eq_landau_n_rt_rp_zero c.(l_e_st_eq_landau_n_rt_rp_zeroeq (l_e_st_eq_landau_n_rt_rp_td c c) c (l_e_st_eq_landau_n_rt_rp_td01 c c z) z : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td c c) c).
-
-(* constant 3868 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t16 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λz:l_e_st_eq_landau_n_rt_rp_zero c.(l_andi (l_not (l_e_st_eq_landau_n_rt_rp_negd c)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td c c) c) n (l_e_st_eq_landau_n_rt_rp_d161_t15 c n z) : l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd c)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td c c) c)).
-
-(* constant 3869 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t17 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λz:l_e_st_eq_landau_n_rt_rp_zero c.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd x)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td x x) c)) c (l_e_st_eq_landau_n_rt_rp_d161_t16 c n z) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd x)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td x x) c))).
-
-(* constant 3870 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t18 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero c).(l_or3e2 (l_e_st_eq_landau_n_rt_rp_zero c) (l_e_st_eq_landau_n_rt_rp_posd c) (l_e_st_eq_landau_n_rt_rp_negd c) (l_e_st_eq_landau_n_rt_rp_axrdo c) n o : l_e_st_eq_landau_n_rt_rp_posd c).
-
-(* constant 3871 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_crp ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero c).(l_e_st_eq_landau_n_rt_rp_rpofpd c (l_e_st_eq_landau_n_rt_rp_d161_t18 c n o) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3872 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_srp ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero c).(l_e_st_eq_landau_n_rt_rp_sqrt (l_e_st_eq_landau_n_rt_rp_d161_crp c n o) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3873 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_s ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero c).(l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_d161_srp c n o) : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3874 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t19 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero c).(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_d161_s c n o) (l_e_st_eq_landau_n_rt_rp_d161_s c n o)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_d161_srp c n o) (l_e_st_eq_landau_n_rt_rp_d161_srp c n o))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_d161_crp c n o)) c (l_e_st_eq_landau_n_rt_rp_lemmaivad2 (l_e_st_eq_landau_n_rt_rp_d161_srp c n o) (l_e_st_eq_landau_n_rt_rp_d161_srp c n o)) (l_e_st_eq_landau_n_rt_rp_isrpepd (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_d161_srp c n o) (l_e_st_eq_landau_n_rt_rp_d161_srp c n o)) (l_e_st_eq_landau_n_rt_rp_d161_crp c n o) (l_e_st_eq_landau_n_rt_rp_thsqrt1 (l_e_st_eq_landau_n_rt_rp_d161_crp c n o))) (l_e_st_eq_landau_n_rt_rp_eqpdrp2 c (l_e_st_eq_landau_n_rt_rp_d161_t18 c n o)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_d161_s c n o) (l_e_st_eq_landau_n_rt_rp_d161_s c n o)) c).
-
-(* constant 3875 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t20 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero c).(l_andi (l_not (l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_d161_s c n o))) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_d161_s c n o) (l_e_st_eq_landau_n_rt_rp_d161_s c n o)) c) (l_e_st_eq_landau_n_rt_rp_pnotnd (l_e_st_eq_landau_n_rt_rp_d161_s c n o) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_d161_srp c n o))) (l_e_st_eq_landau_n_rt_rp_d161_t19 c n o) : l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_d161_s c n o))) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_d161_s c n o) (l_e_st_eq_landau_n_rt_rp_d161_s c n o)) c)).
-
-(* constant 3876 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t21 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero c).(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd x)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td x x) c)) (l_e_st_eq_landau_n_rt_rp_d161_s c n o) (l_e_st_eq_landau_n_rt_rp_d161_t20 c n o) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd x)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td x x) c))).
-
-(* constant 3877 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd161a ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_zero c) (l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd x)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td x x) c))) (λt:l_e_st_eq_landau_n_rt_rp_zero c.l_e_st_eq_landau_n_rt_rp_d161_t17 c n t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_zero c).l_e_st_eq_landau_n_rt_rp_d161_t21 c n t) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd x)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td x x) c))).
-
-(* constant 3878 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_ori1 (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_absd a))) (l_e_st_eq_landau_n_rt_rp_satzd166f a z) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3879 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λn:l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a).(l_e_st_eq_landau_n_rt_rp_natintd (l_e_st_eq_landau_n_rt_rp_absd a) n : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3880 *)
-definition l_e_st_eq_landau_n_rt_rp_intabsd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.(l_orapp (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_absd a)) i (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_intd_t1 a i t) (λt:l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a).l_e_st_eq_landau_n_rt_rp_intd_t2 a i t) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3881 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λn:l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a).(l_e_st_eq_landau_n_rt_rp_eqnatd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_satzd178a a) n : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a))).
-
-(* constant 3882 *)
-definition l_e_st_eq_landau_n_rt_rp_intm0d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a))) i (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_satzd176b a t) (λt:l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a).l_e_st_eq_landau_n_rt_rp_intd_t4 a i t) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_m0d a)).
-
-(* constant 3883 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_pd a b) b (l_e_st_eq_landau_n_rt_rp_pd01 a b z) : l_e_st_eq_landau_n_rt_rp_eq b (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3884 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_eqintd b (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_intd_t5 a b i j z) j : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3885 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λz:l_e_st_eq_landau_n_rt_rp_zero b.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_pd a b) a (l_e_st_eq_landau_n_rt_rp_pd02 a b z) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3886 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t8 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λz:l_e_st_eq_landau_n_rt_rp_zero b.(l_e_st_eq_landau_n_rt_rp_eqintd a (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_intd_t7 a b i j z) i : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3887 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t9 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_ande2 (l_e_st_eq_landau_n_rt_rp_posd a) (∀t:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd a t)) (l_e_st_eq_landau_n_rt_rp_posintnatd a p i) p : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd a p)).
-
-(* constant 3888 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_apb1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pd a b) pp : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3889 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_a1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_rpofpd a p : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3890 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_b1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_rpofpd b q : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3891 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t10 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_natpl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_t9 a i p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q) (l_e_st_eq_landau_n_rt_rp_intd_t9 b j q) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q))).
-
-(* constant 3892 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t11 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_eqpd12 a (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p)) b (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q)) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 a p) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 b q) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q)))).
-
-(* constant 3893 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q))) (l_e_st_eq_landau_n_rt_rp_intd_t11 a b i j pp p q) (l_e_st_eq_landau_n_rt_rp_lemmaivad1 (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q)))).
-
-(* constant 3894 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t13 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q))) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q)) (l_e_st_eq_landau_n_rt_rp_eqpderp (l_e_st_eq_landau_n_rt_rp_pd a b) pp (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q))) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q))) (l_e_st_eq_landau_n_rt_rp_intd_t12 a b i j pp p q)) (l_e_st_eq_landau_n_rt_rp_isrppd2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q))).
-
-(* constant 3895 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t14 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_isp1 l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q)) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp) (l_e_st_eq_landau_n_rt_rp_intd_t10 a b i j pp p q) (l_e_st_eq_landau_n_rt_rp_intd_t13 a b i j pp p q) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)).
-
-(* constant 3896 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t15 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_andi (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b)) (∀t:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j t)) pp (λt:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).l_e_st_eq_landau_n_rt_rp_intd_t14 a b i j t p q) : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3897 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t16 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_natintd (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_intd_t15 a b i j pp p q) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3898 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t17 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_satzd176c b n : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_m0d b)).
-
-(* constant 3899 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_b2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_intd_t17 a b i j pp p n) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3900 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t18 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_eqpd2 b (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b)) a (l_e_st_eq_landau_n_rt_rp_satzd177a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_md a (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3901 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t19 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_md a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_intd_t18 a b i j pp p n) pp : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md a (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3902 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t20 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_satzd182a a (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_intd_t19 a b i j pp p n) : l_e_st_eq_landau_n_rt_rp_mored a (l_e_st_eq_landau_n_rt_rp_m0d b)).
-
-(* constant 3903 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t21 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_eqmored12 a (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p)) (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n)) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 a p) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_intd_t17 a b i j pp p n)) (l_e_st_eq_landau_n_rt_rp_intd_t20 a b i j pp p n) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n))).
-
-(* constant 3904 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t22 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_lemmaivad3 (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_t21 a b i j pp p n) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n)).
-
-(* constant 3905 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t23 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_natmn (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_t9 a i p) (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_t9 (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_intm0d b j) (l_e_st_eq_landau_n_rt_rp_intd_t17 a b i j pp p n)) (l_e_st_eq_landau_n_rt_rp_intd_t22 a b i j pp p n) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_t22 a b i j pp p n))).
-
-(* constant 3906 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t24 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_eqpd12 (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n)) (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_intd_t17 a b i j pp p n)) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 (l_e_st_eq_landau_n_rt_rp_pd a b) pp) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)))).
-
-(* constant 3907 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t25 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_tr4eq a (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a b) b) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp))) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a b) b) a (l_e_st_eq_landau_n_rt_rp_mdpd a b)) (l_e_st_eq_landau_n_rt_rp_compd (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_intd_t24 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_lemmaivad1 (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)))).
-
-(* constant 3908 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t26 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)) (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp))) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)))) (l_e_st_eq_landau_n_rt_rp_isrppd1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp))) (l_e_st_eq_landau_n_rt_rp_eqpderp a p (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp))) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp))) (l_e_st_eq_landau_n_rt_rp_intd_t25 a b i j pp p n)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)) (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p)).
-
-(* constant 3909 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t27 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_satz140g (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp) (l_e_st_eq_landau_n_rt_rp_intd_t22 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_t26 a b i j pp p n) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_t22 a b i j pp p n))).
-
-(* constant 3910 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t28 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_isp1 l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_t22 a b i j pp p n)) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp) (l_e_st_eq_landau_n_rt_rp_intd_t23 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_t27 a b i j pp p n) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)).
-
-(* constant 3911 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t29 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_andi (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b)) (∀t:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j t)) pp (λt:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).l_e_st_eq_landau_n_rt_rp_intd_t28 a b i j t p n) : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3912 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t30 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_natintd (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_intd_t29 a b i j pp p n) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3913 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t31 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_rappd b (l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)) (λt:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_intd_t16 a b i j pp p t) (λt:l_e_st_eq_landau_n_rt_rp_zero b.l_e_st_eq_landau_n_rt_rp_intd_t8 a b i j t) (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_intd_t30 a b i j pp p t) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3914 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t31a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_pnotnd (l_e_st_eq_landau_n_rt_rp_pd a b) pp) (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_npd a b n t) : l_not (l_e_st_eq_landau_n_rt_rp_negd b)).
-
-(* constant 3915 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t32 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_pnotnd (l_e_st_eq_landau_n_rt_rp_pd a b) pp) (λt:l_e_st_eq_landau_n_rt_rp_zero b.l_e_st_eq_landau_n_rt_rp_eqnegd a (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_pd a b) a (l_e_st_eq_landau_n_rt_rp_pd02 a b t)) n) : l_not (l_e_st_eq_landau_n_rt_rp_zero b)).
-
-(* constant 3916 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t33 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_or3e2 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_axrdo b) (l_e_st_eq_landau_n_rt_rp_intd_t31a a b i j pp n) (l_e_st_eq_landau_n_rt_rp_intd_t32 a b i j pp n) : l_e_st_eq_landau_n_rt_rp_posd b).
-
-(* constant 3917 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t34 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pd b a) (l_e_st_eq_landau_n_rt_rp_compd a b) pp : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd b a)).
-
-(* constant 3918 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t35 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_intd_t30 b a j i (l_e_st_eq_landau_n_rt_rp_intd_t34 a b i j pp n) (l_e_st_eq_landau_n_rt_rp_intd_t33 a b i j pp n) n : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd b a)).
-
-(* constant 3919 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t36 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_eqintd (l_e_st_eq_landau_n_rt_rp_pd b a) (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_compd b a) (l_e_st_eq_landau_n_rt_rp_intd_t35 a b i j pp n) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3920 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t37 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_rappd a (l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_intd_t31 a b i j pp t) (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_intd_t6 a b i j t) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_intd_t36 a b i j pp t) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3921 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t38 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn0p:l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_intdi0 (l_e_st_eq_landau_n_rt_rp_pd a b) n0p : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3922 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t39 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λnp:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_satzd176c (l_e_st_eq_landau_n_rt_rp_pd a b) np : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b))).
-
-(* constant 3923 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t40 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λnp:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_satzd180 a b) (l_e_st_eq_landau_n_rt_rp_intd_t39 a b i j np) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3924 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t41 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λnp:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_intd_t37 (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_intm0d a i) (l_e_st_eq_landau_n_rt_rp_intm0d b j) (l_e_st_eq_landau_n_rt_rp_intd_t40 a b i j np) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3925 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t42 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λnp:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_eqintd (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_satzd180a a b) (l_e_st_eq_landau_n_rt_rp_intd_t41 a b i j np) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b))).
-
-(* constant 3926 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t43 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λnp:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_intm0d (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_intd_t42 a b i j np) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b)))).
-
-(* constant 3927 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t44 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λnp:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_eqintd (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b))) (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_satzd177 (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_intd_t43 a b i j np) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3928 *)
-definition l_e_st_eq_landau_n_rt_rp_intpd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.(l_e_st_eq_landau_n_rt_rp_rappd (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)) (λt:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).l_e_st_eq_landau_n_rt_rp_intd_t37 a b i j t) (λt:l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_pd a b).l_e_st_eq_landau_n_rt_rp_intd_t38 a b i j t) (λt:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b).l_e_st_eq_landau_n_rt_rp_intd_t44 a b i j t) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3929 *)
-definition l_e_st_eq_landau_n_rt_rp_intmd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.(l_e_st_eq_landau_n_rt_rp_intpd a (l_e_st_eq_landau_n_rt_rp_m0d b) i (l_e_st_eq_landau_n_rt_rp_intm0d b j) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3930 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t45 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)) n (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_td01 a b t) : l_not (l_e_st_eq_landau_n_rt_rp_zero a)).
-
-(* constant 3931 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t46 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)) n (λt:l_e_st_eq_landau_n_rt_rp_zero b.l_e_st_eq_landau_n_rt_rp_td02 a b t) : l_not (l_e_st_eq_landau_n_rt_rp_zero b)).
-
-(* constant 3932 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t47 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_satzd166e a (l_e_st_eq_landau_n_rt_rp_intd_t45 a b i j n) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3933 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_a3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_intd_t47 a b i j n) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3934 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t48 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_satzd166e b (l_e_st_eq_landau_n_rt_rp_intd_t46 a b i j n) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd b)).
-
-(* constant 3935 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_b3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_intd_t48 a b i j n) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3936 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t49 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_natts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_t9 (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_intabsd a i) (l_e_st_eq_landau_n_rt_rp_intd_t47 a b i j n)) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_t9 (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_intabsd b j) (l_e_st_eq_landau_n_rt_rp_intd_t48 a b i j n)) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n))).
-
-(* constant 3937 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t50 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_td a b) n : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3938 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_atb3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) p : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3939 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t51 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_eqtd12 (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n)) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n)) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_intd_t47 a b i j n)) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_intd_t48 a b i j n)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n)))).
-
-(* constant 3940 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t52 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n))) (l_e_st_eq_landau_n_rt_rp_satzd193 a b) (l_e_st_eq_landau_n_rt_rp_intd_t51 a b i j n p) (l_e_st_eq_landau_n_rt_rp_lemmaivad2 (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n)))).
-
-(* constant 3941 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t53 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_intd_atb3 a b i j n p) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n)) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n))) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n)))) (l_e_st_eq_landau_n_rt_rp_eqpderp (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) p (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n))) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n))) (l_e_st_eq_landau_n_rt_rp_intd_t52 a b i j n p)) (l_e_st_eq_landau_n_rt_rp_isrppd1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_intd_atb3 a b i j n p) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n))).
-
-(* constant 3942 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t54 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_isp1 l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n)) (l_e_st_eq_landau_n_rt_rp_intd_atb3 a b i j n p) (l_e_st_eq_landau_n_rt_rp_intd_t49 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_t53 a b i j n p) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_intd_atb3 a b i j n p)).
-
-(* constant 3943 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t55 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_andi (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b))) (∀t:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)).l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_intd_atb3 a b i j n t)) (l_e_st_eq_landau_n_rt_rp_intd_t50 a b i j n) (λt:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)).l_e_st_eq_landau_n_rt_rp_intd_t54 a b i j n t) : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3944 *)
-definition l_e_st_eq_landau_n_rt_rp_inttd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.(λt:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).l_e_st_eq_landau_n_rt_rp_intd_t55 a b i j t : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3945 *)
-definition l_e_st_eq_landau_n_rt_rp_r_eq ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq x y : ∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.Prop).
-
-(* constant 3946 *)
-definition l_e_st_eq_landau_n_rt_rp_r_refeq ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_refeq x : ∀x:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_eq x x).
-
-(* constant 3947 *)
-definition l_e_st_eq_landau_n_rt_rp_r_symeq ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_eq x y.l_e_st_eq_landau_n_rt_rp_symeq x y t : ∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.∀t:l_e_st_eq_landau_n_rt_rp_r_eq x y.l_e_st_eq_landau_n_rt_rp_r_eq y x).
-
-(* constant 3948 *)
-definition l_e_st_eq_landau_n_rt_rp_r_treq ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_eq x y.λu:l_e_st_eq_landau_n_rt_rp_r_eq y z.l_e_st_eq_landau_n_rt_rp_treq x y z t u : ∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.∀z:l_e_st_eq_landau_n_rt_rp_dif.∀t:l_e_st_eq_landau_n_rt_rp_r_eq x y.∀u:l_e_st_eq_landau_n_rt_rp_r_eq y z.l_e_st_eq_landau_n_rt_rp_r_eq x z).
-
-(* constant 3949 *)
-definition l_e_st_eq_landau_n_rt_rp_r_inn ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_esti l_e_st_eq_landau_n_rt_rp_dif a s : Prop).
-
-(* constant 3950 *)
-definition l_e_st_eq_landau_n_rt_rp_r_real ≝ (l_e_st_eq_ect l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq : Type[0]).
-
-(* constant 3951 *)
-definition l_e_st_eq_landau_n_rt_rp_r_is ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_is l_e_st_eq_landau_n_rt_rp_r_real r s : Prop).
-
-(* constant 3952 *)
-definition l_e_st_eq_landau_n_rt_rp_r_nis ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_not (l_e_st_eq_landau_n_rt_rp_r_is r s) : Prop).
-
-(* constant 3953 *)
-definition l_e_st_eq_landau_n_rt_rp_r_some ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_r_real.Prop.(l_some l_e_st_eq_landau_n_rt_rp_r_real p : Prop).
-
-(* constant 3954 *)
-definition l_e_st_eq_landau_n_rt_rp_r_all ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_r_real.Prop.(l_all l_e_st_eq_landau_n_rt_rp_r_real p : Prop).
-
-(* constant 3955 *)
-definition l_e_st_eq_landau_n_rt_rp_r_one ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_r_real.Prop.(l_e_one l_e_st_eq_landau_n_rt_rp_r_real p : Prop).
-
-(* constant 3956 *)
-definition l_e_st_eq_landau_n_rt_rp_r_in ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs0:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_real r s0 : Prop).
-
-(* constant 3957 *)
-definition l_e_st_eq_landau_n_rt_rp_r_realof ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_ectelt l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq a : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 3958 *)
-definition l_e_st_eq_landau_n_rt_rp_r_class ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_ecect l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq r : l_e_st_set l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3959 *)
-definition l_e_st_eq_landau_n_rt_rp_r_innclass ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_4_th5 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq a : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class (l_e_st_eq_landau_n_rt_rp_r_realof a))).
-
-(* constant 3960 *)
-definition l_e_st_eq_landau_n_rt_rp_r_eqinn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_4_th8 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq r a air b e : l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class r)).
-
-(* constant 3961 *)
-definition l_e_st_eq_landau_n_rt_rp_r_realapp1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rp_dif.∀xi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).p.(l_e_st_eq_4_th3 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq r p p1 : p).
-
-(* constant 3962 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.∀xi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).∀yi:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).p.λa:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_realapp1 s p (λy:l_e_st_eq_landau_n_rt_rp_dif.p1 a y air) : p).
-
-(* constant 3963 *)
-definition l_e_st_eq_landau_n_rt_rp_r_realapp2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.∀xi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).∀yi:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).p.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r p (λx:l_e_st_eq_landau_n_rt_rp_dif.λxi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr1_t1 r s p p1 x xi) : p).
-
-(* constant 3964 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.∀z:l_e_st_eq_landau_n_rt_rp_dif.∀xi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).∀yi:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).∀zi:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).p.λa:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_realapp2 s t p (λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.p1 a y z air) : p).
-
-(* constant 3965 *)
-definition l_e_st_eq_landau_n_rt_rp_r_realapp3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.∀z:l_e_st_eq_landau_n_rt_rp_dif.∀xi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).∀yi:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).∀zi:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).p.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r p (λx:l_e_st_eq_landau_n_rt_rp_dif.λxi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr1_t2 r s t p p1 x xi) : p).
-
-(* constant 3966 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.∀z:l_e_st_eq_landau_n_rt_rp_dif.∀v:l_e_st_eq_landau_n_rt_rp_dif.∀xi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).∀yi:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).∀zi:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).∀vi:l_e_st_eq_landau_n_rt_rp_r_inn v (l_e_st_eq_landau_n_rt_rp_r_class u).p.λa:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_realapp3 s t u p (λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λv:l_e_st_eq_landau_n_rt_rp_dif.p1 a y z v air) : p).
-
-(* constant 3967 *)
-definition l_e_st_eq_landau_n_rt_rp_r_realapp4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.∀z:l_e_st_eq_landau_n_rt_rp_dif.∀v:l_e_st_eq_landau_n_rt_rp_dif.∀xi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).∀yi:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).∀zi:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).∀vi:l_e_st_eq_landau_n_rt_rp_r_inn v (l_e_st_eq_landau_n_rt_rp_r_class u).p.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r p (λx:l_e_st_eq_landau_n_rt_rp_dif.λxi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr1_t3 r s t u p p1 x xi) : p).
-
-(* constant 3968 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λe:l_e_st_eq_landau_n_rt_rp_eq a1 b1.(l_e_st_eq_5_th3 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq r s a1 a1ir b1 b1is e : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 3969 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_5_th5 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq r s a1 a1ir b1 b1is i : l_e_st_eq_landau_n_rt_rp_eq a1 b1).
-
-(* constant 3970 *)
-definition l_e_st_eq_landau_n_rt_rp_r_nisin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_eq a1 b1).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_eq a1 b1) n (λt:l_e_st_eq_landau_n_rt_rp_r_is r s.l_e_st_eq_landau_n_rt_rp_r_isex r s a1 b1 a1ir b1is t) : l_e_st_eq_landau_n_rt_rp_r_nis r s).
-
-(* constant 3971 *)
-definition l_e_st_eq_landau_n_rt_rp_r_nisex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_nis r s.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_r_is r s) n (λt:l_e_st_eq_landau_n_rt_rp_eq a1 b1.l_e_st_eq_landau_n_rt_rp_r_isin r s a1 b1 a1ir b1is t) : l_not (l_e_st_eq_landau_n_rt_rp_eq a1 b1)).
-
-(* constant 3972 *)
-definition l_e_st_eq_landau_n_rt_rp_r_fixf ≝ λalpha:Type[0].λf:Πx:l_e_st_eq_landau_n_rt_rp_dif.alpha.(l_e_st_eq_fixfu l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq alpha f : Prop).
-
-(* constant 3973 *)
-definition l_e_st_eq_landau_n_rt_rp_r_indreal ≝ λalpha:Type[0].λf:Πx:l_e_st_eq_landau_n_rt_rp_dif.alpha.λff:l_e_st_eq_landau_n_rt_rp_r_fixf alpha f.λr0:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_indeq l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq alpha f ff r0 : alpha).
-
-(* constant 3974 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isindreal ≝ λalpha:Type[0].λf:Πx:l_e_st_eq_landau_n_rt_rp_dif.alpha.λff:l_e_st_eq_landau_n_rt_rp_r_fixf alpha f.λr0:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r0).(l_e_st_eq_10_th2 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq alpha f ff r0 a air : l_e_is alpha (f a) (l_e_st_eq_landau_n_rt_rp_r_indreal alpha f ff r0)).
-
-(* constant 3975 *)
-definition l_e_st_eq_landau_n_rt_rp_r_fixf2 ≝ λalpha:Type[0].λg:Πx:l_e_st_eq_landau_n_rt_rp_dif.Πy:l_e_st_eq_landau_n_rt_rp_dif.alpha.(l_e_st_eq_fixfu2 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq alpha g : Prop).
-
-(* constant 3976 *)
-definition l_e_st_eq_landau_n_rt_rp_r_indreal2 ≝ λalpha:Type[0].λg:Πx:l_e_st_eq_landau_n_rt_rp_dif.Πy:l_e_st_eq_landau_n_rt_rp_dif.alpha.λff2:l_e_st_eq_landau_n_rt_rp_r_fixf2 alpha g.λr0:l_e_st_eq_landau_n_rt_rp_r_real.λs0:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_indeq2 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq alpha g ff2 r0 s0 : alpha).
-
-(* constant 3977 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isindreal2 ≝ λalpha:Type[0].λg:Πx:l_e_st_eq_landau_n_rt_rp_dif.Πy:l_e_st_eq_landau_n_rt_rp_dif.alpha.λff2:l_e_st_eq_landau_n_rt_rp_r_fixf2 alpha g.λr0:l_e_st_eq_landau_n_rt_rp_r_real.λs0:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r0).λbis:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s0).(l_e_st_eq_11_th1 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq alpha g ff2 r0 s0 a air b bis : l_e_is alpha (g a b) (l_e_st_eq_landau_n_rt_rp_r_indreal2 alpha g ff2 r0 s0)).
-
-(* constant 3978 *)
-definition l_e_st_eq_landau_n_rt_rp_r_0 ≝ (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 3979 *)
-definition l_e_st_eq_landau_n_rt_rp_r_0in ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λz:l_e_st_eq_landau_n_rt_rp_zero a0.(l_e_st_eq_landau_n_rt_rp_r_isin r l_e_st_eq_landau_n_rt_rp_r_0 a0 (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) a0ir (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_zeroeq a0 (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) z (l_e_st_eq_landau_n_rt_rp_zeroi l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp (l_e_refis l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_rp_1rp))) : l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 3980 *)
-definition l_e_st_eq_landau_n_rt_rp_r_0ex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) a0 (l_e_st_eq_landau_n_rt_rp_r_isex l_e_st_eq_landau_n_rt_rp_r_0 r (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) a0 (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) a0ir (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r l_e_st_eq_landau_n_rt_rp_r_0 i)) (l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_stmis l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_isstd l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) : l_e_st_eq_landau_n_rt_rp_zero a0).
-
-(* constant 3981 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_propp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.(l_and (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_posd a0) : Prop).
-
-(* constant 3982 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pos ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr1_propp r x) : Prop).
-
-(* constant 3983 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_posd a0.(l_andi (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_posd a0) a0ir p : l_e_st_eq_landau_n_rt_rp_r_ivr1_propp r a0).
-
-(* constant 3984 *)
-definition l_e_st_eq_landau_n_rt_rp_r_posin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_posd a0.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr1_propp r x) a0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t4 r a0 a0ir p) : l_e_st_eq_landau_n_rt_rp_r_pos r).
-
-(* constant 3985 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λa:l_e_st_eq_landau_n_rt_rp_dif.λq1:l_e_st_eq_landau_n_rt_rp_r_ivr1_propp r a.(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_posd a) q1 : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)).
-
-(* constant 3986 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λa:l_e_st_eq_landau_n_rt_rp_dif.λq1:l_e_st_eq_landau_n_rt_rp_r_ivr1_propp r a.(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_posd a) q1 : l_e_st_eq_landau_n_rt_rp_posd a).
-
-(* constant 3987 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λa:l_e_st_eq_landau_n_rt_rp_dif.λq1:l_e_st_eq_landau_n_rt_rp_r_ivr1_propp r a.(l_e_st_eq_landau_n_rt_rp_eqposd a a0 (l_e_st_eq_landau_n_rt_rp_r_isex r r a a0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t5 r a0 a0ir p a q1) a0ir (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t6 r a0 a0ir p a q1) : l_e_st_eq_landau_n_rt_rp_posd a0).
-
-(* constant 3988 *)
-definition l_e_st_eq_landau_n_rt_rp_r_posex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr1_propp r x) p (l_e_st_eq_landau_n_rt_rp_posd a0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_ivr1_propp r x.l_e_st_eq_landau_n_rt_rp_r_ivr1_t7 r a0 a0ir p x t) : l_e_st_eq_landau_n_rt_rp_posd a0).
-
-(* constant 3989 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_propn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.(l_and (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_negd a0) : Prop).
-
-(* constant 3990 *)
-definition l_e_st_eq_landau_n_rt_rp_r_neg ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr1_propn r x) : Prop).
-
-(* constant 3991 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_negd a0.(l_andi (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_negd a0) a0ir n : l_e_st_eq_landau_n_rt_rp_r_ivr1_propn r a0).
-
-(* constant 3992 *)
-definition l_e_st_eq_landau_n_rt_rp_r_negin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_negd a0.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr1_propn r x) a0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t8 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_neg r).
-
-(* constant 3993 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λa:l_e_st_eq_landau_n_rt_rp_dif.λpl:l_e_st_eq_landau_n_rt_rp_r_ivr1_propn r a.(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_negd a) pl : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)).
-
-(* constant 3994 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λa:l_e_st_eq_landau_n_rt_rp_dif.λpl:l_e_st_eq_landau_n_rt_rp_r_ivr1_propn r a.(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_negd a) pl : l_e_st_eq_landau_n_rt_rp_negd a).
-
-(* constant 3995 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λa:l_e_st_eq_landau_n_rt_rp_dif.λpl:l_e_st_eq_landau_n_rt_rp_r_ivr1_propn r a.(l_e_st_eq_landau_n_rt_rp_eqnegd a a0 (l_e_st_eq_landau_n_rt_rp_r_isex r r a a0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t9 r a0 a0ir n a pl) a0ir (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t10 r a0 a0ir n a pl) : l_e_st_eq_landau_n_rt_rp_negd a0).
-
-(* constant 3996 *)
-definition l_e_st_eq_landau_n_rt_rp_r_negex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr1_propn r x) n (l_e_st_eq_landau_n_rt_rp_negd a0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_ivr1_propn r x.l_e_st_eq_landau_n_rt_rp_r_ivr1_t11 r a0 a0ir n x t) : l_e_st_eq_landau_n_rt_rp_negd a0).
-
-(* constant 3997 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_posd a0.(l_or3i2 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_posin r a0 a0ir p) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 3998 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t13 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λz:l_e_st_eq_landau_n_rt_rp_zero a0.(l_or3i1 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_0in r a0 a0ir z) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 3999 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t14 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_negd a0.(l_or3i3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_negin r a0 a0ir n) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4000 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t15 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_rappd a0 (l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)) (λt:l_e_st_eq_landau_n_rt_rp_posd a0.l_e_st_eq_landau_n_rt_rp_r_ivr1_t12 r a0 a0ir t) (λt:l_e_st_eq_landau_n_rt_rp_zero a0.l_e_st_eq_landau_n_rt_rp_r_ivr1_t13 r a0 a0ir t) (λt:l_e_st_eq_landau_n_rt_rp_negd a0.l_e_st_eq_landau_n_rt_rp_r_ivr1_t14 r a0 a0ir t) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4001 *)
-definition l_e_st_eq_landau_n_rt_rp_r_axrlo ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λxi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr1_t15 r x xi) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4002 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t16 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_posd a0) (l_e_st_eq_landau_n_rt_rp_0notpd a0 (l_e_st_eq_landau_n_rt_rp_r_0ex r a0 a0ir i)) (λt:l_e_st_eq_landau_n_rt_rp_r_pos r.l_e_st_eq_landau_n_rt_rp_r_posex r a0 a0ir t) : l_not (l_e_st_eq_landau_n_rt_rp_r_pos r)).
-
-(* constant 4003 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t17 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_negd a0) (l_e_st_eq_landau_n_rt_rp_pnotnd a0 (l_e_st_eq_landau_n_rt_rp_r_posex r a0 a0ir p)) (λt:l_e_st_eq_landau_n_rt_rp_r_neg r.l_e_st_eq_landau_n_rt_rp_r_negex r a0 a0ir t) : l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4004 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t18 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_zero a0) (l_e_st_eq_landau_n_rt_rp_nnot0d a0 (l_e_st_eq_landau_n_rt_rp_r_negex r a0 a0ir n)) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_0ex r a0 a0ir t) : l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 4005 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t19 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_ec3_th6 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_ivr1_t16 r a0 a0ir t) (λt:l_e_st_eq_landau_n_rt_rp_r_pos r.l_e_st_eq_landau_n_rt_rp_r_ivr1_t17 r a0 a0ir t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg r.l_e_st_eq_landau_n_rt_rp_r_ivr1_t18 r a0 a0ir t) : l_ec3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4006 *)
-definition l_e_st_eq_landau_n_rt_rp_r_axrle ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_ec3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λxi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr1_t19 r x xi) : l_ec3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4007 *)
-definition l_e_st_eq_landau_n_rt_rp_r_axrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_orec3i (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_axrlo r) (l_e_st_eq_landau_n_rt_rp_r_axrle r) : l_orec3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4008 *)
-definition l_e_st_eq_landau_n_rt_rp_r_rapp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:Prop.λp1:∀t:l_e_st_eq_landau_n_rt_rp_r_pos r.p.λp2:∀t:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.p.λp3:∀t:l_e_st_eq_landau_n_rt_rp_r_neg r.p.(l_or3app (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) p (l_e_st_eq_landau_n_rt_rp_r_axrlo r) p2 p1 p3 : p).
-
-(* constant 4009 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pnotn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_ec3e23 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_axrle r) p : l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4010 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pnot0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_ec3e21 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_axrle r) p : l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4011 *)
-definition l_e_st_eq_landau_n_rt_rp_r_0notp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_ec3e12 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_axrle r) i : l_not (l_e_st_eq_landau_n_rt_rp_r_pos r)).
-
-(* constant 4012 *)
-definition l_e_st_eq_landau_n_rt_rp_r_0notn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_ec3e13 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_axrle r) i : l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4013 *)
-definition l_e_st_eq_landau_n_rt_rp_r_nnotp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_ec3e32 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_axrle r) n : l_not (l_e_st_eq_landau_n_rt_rp_r_pos r)).
-
-(* constant 4014 *)
-definition l_e_st_eq_landau_n_rt_rp_r_nnot0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_ec3e31 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_axrle r) n : l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4015 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ispos ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_pos x) r s p i : l_e_st_eq_landau_n_rt_rp_r_pos s).
-
-(* constant 4016 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isneg ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_neg x) r s n i : l_e_st_eq_landau_n_rt_rp_r_neg s).
-
-(* constant 4017 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pofrp ≝ λr0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_pdofrp r0) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4018 *)
-definition l_e_st_eq_landau_n_rt_rp_r_nofrp ≝ λr0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_ndofrp r0) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4019 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrpep ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is r0 s0.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_pofrp x) r0 s0 i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)).
-
-(* constant 4020 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrpen ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is r0 s0.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_nofrp x) r0 s0 i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_nofrp s0)).
-
-(* constant 4021 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t20 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).(l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp s0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp s0)) i : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp s0)).
-
-(* constant 4022 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrpip ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).(l_e_st_eq_landau_n_rt_rp_isrpipd r0 s0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t20 r0 s0 i) : l_e_st_eq_landau_n_rt_rp_is r0 s0).
-
-(* constant 4023 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t21 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_nofrp s0).(l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_nofrp s0) (l_e_st_eq_landau_n_rt_rp_ndofrp r0) (l_e_st_eq_landau_n_rt_rp_ndofrp s0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_ndofrp r0)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_ndofrp s0)) i : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_ndofrp r0) (l_e_st_eq_landau_n_rt_rp_ndofrp s0)).
-
-(* constant 4024 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrpin ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_nofrp s0).(l_e_st_eq_landau_n_rt_rp_isrpind r0 s0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t21 r0 s0 i) : l_e_st_eq_landau_n_rt_rp_is r0 s0).
-
-(* constant 4025 *)
-definition l_e_st_eq_landau_n_rt_rp_r_posi ≝ λr0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_posdirp r0) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pofrp r0)).
-
-(* constant 4026 *)
-definition l_e_st_eq_landau_n_rt_rp_r_negi ≝ λr0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_r_negin (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_ndofrp r0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_ndofrp r0)) (l_e_st_eq_landau_n_rt_rp_negdirp r0) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_nofrp r0)).
-
-(* constant 4027 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t22 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp r0).λj:l_e_st_eq_landau_n_rt_rp_r_is s (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).λk:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_isrpip r0 s0 (l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) r s (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) i) k j) : l_e_st_eq_landau_n_rt_rp_is r0 s0).
-
-(* constant 4028 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t23 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(λx:l_e_st_eq_landau_n_rt_cut.λy:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x).λu:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp y).l_e_st_eq_landau_n_rt_rp_r_ivr1_t22 r r x y t u (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r) : l_e_amone l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x))).
-
-(* constant 4029 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t24 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp1:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_posex r a0 a0ir p1 : l_e_st_eq_landau_n_rt_rp_posd a0).
-
-(* constant 4030 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_pr ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp1:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_rpofpd a0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t24 r a0 a0ir p1) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4031 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t25 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp1:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_isin r (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_ivr1_pr r a0 a0ir p1)) a0 (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_r_ivr1_pr r a0 a0ir p1)) a0ir (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_r_ivr1_pr r a0 a0ir p1))) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 a0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t24 r a0 a0ir p1)) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_ivr1_pr r a0 a0ir p1))).
-
-(* constant 4032 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t26 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp1:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_somei l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_pr r a0 a0ir p1) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t25 r a0 a0ir p1) : l_e_st_eq_landau_n_rt_rp_some (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x))).
-
-(* constant 4033 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t27 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_some (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr1_t26 r x t p) : l_e_st_eq_landau_n_rt_rp_some (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x))).
-
-(* constant 4034 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t28 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_onei l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t23 r) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t27 r p) : l_e_st_eq_landau_n_rt_rp_one (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x))).
-
-(* constant 4035 *)
-definition l_e_st_eq_landau_n_rt_rp_r_rpofp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_ind l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t28 r p) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4036 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isprp1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_oneax l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t28 r p) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp r p))).
-
-(* constant 4037 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isprp2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp r p)) (l_e_st_eq_landau_n_rt_rp_r_isprp1 r p) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp r p)) r).
-
-(* constant 4038 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isperp ≝ λr1:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r1.λs1:l_e_st_eq_landau_n_rt_rp_r_real.λq:l_e_st_eq_landau_n_rt_rp_r_pos s1.λi:l_e_st_eq_landau_n_rt_rp_r_is r1 s1.(l_e_st_eq_landau_n_rt_rp_r_ivr1_t22 r1 s1 (l_e_st_eq_landau_n_rt_rp_r_rpofp r1 p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s1 q) (l_e_st_eq_landau_n_rt_rp_r_isprp1 r1 p) (l_e_st_eq_landau_n_rt_rp_r_isprp1 s1 q) i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_r_rpofp r1 p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s1 q)).
-
-(* constant 4039 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ispirp ≝ λr1:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r1.λs1:l_e_st_eq_landau_n_rt_rp_r_real.λq:l_e_st_eq_landau_n_rt_rp_r_pos s1.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_r_rpofp r1 p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s1 q).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real r1 (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp r1 p)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp s1 q)) s1 (l_e_st_eq_landau_n_rt_rp_r_isprp1 r1 p) (l_e_st_eq_landau_n_rt_rp_r_isrpep (l_e_st_eq_landau_n_rt_rp_r_rpofp r1 p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s1 q) i) (l_e_st_eq_landau_n_rt_rp_r_isprp2 s1 q) : l_e_st_eq_landau_n_rt_rp_r_is r1 s1).
-
-(* constant 4040 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrpp1 ≝ λr0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_r_ivr1_t22 (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) r0 (l_e_st_eq_landau_n_rt_rp_r_rpofp (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_posi r0)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pofrp r0)) (l_e_st_eq_landau_n_rt_rp_r_isprp1 (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_posi r0)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pofrp r0)) : l_e_st_eq_landau_n_rt_rp_is r0 (l_e_st_eq_landau_n_rt_rp_r_rpofp (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_posi r0))).
-
-(* constant 4041 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrpp2 ≝ λr0:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut r0 (l_e_st_eq_landau_n_rt_rp_r_rpofp (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_posi r0)) (l_e_st_eq_landau_n_rt_rp_r_isrpp1 r0) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_r_rpofp (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_posi r0)) r0).
-
-(* constant 4042 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t29 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp r0).λj:l_e_st_eq_landau_n_rt_rp_r_is s (l_e_st_eq_landau_n_rt_rp_r_nofrp s0).λk:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_isrpin r0 s0 (l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) r s (l_e_st_eq_landau_n_rt_rp_r_nofrp s0) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) i) k j) : l_e_st_eq_landau_n_rt_rp_is r0 s0).
-
-(* constant 4043 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t30 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(λx:l_e_st_eq_landau_n_rt_cut.λy:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x).λu:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp y).l_e_st_eq_landau_n_rt_rp_r_ivr1_t29 r r x y t u (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r) : l_e_amone l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x))).
-
-(* constant 4044 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t31 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn1:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_negex r a0 a0ir n1 : l_e_st_eq_landau_n_rt_rp_negd a0).
-
-(* constant 4045 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_nr ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn1:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_rpofnd a0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t31 r a0 a0ir n1) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4046 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t32 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn1:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_isin r (l_e_st_eq_landau_n_rt_rp_r_nofrp (l_e_st_eq_landau_n_rt_rp_r_ivr1_nr r a0 a0ir n1)) a0 (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_r_ivr1_nr r a0 a0ir n1)) a0ir (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_r_ivr1_nr r a0 a0ir n1))) (l_e_st_eq_landau_n_rt_rp_eqndrp1 a0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t31 r a0 a0ir n1)) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp (l_e_st_eq_landau_n_rt_rp_r_ivr1_nr r a0 a0ir n1))).
-
-(* constant 4047 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t33 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn1:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_somei l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_nr r a0 a0ir n1) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t32 r a0 a0ir n1) : l_e_st_eq_landau_n_rt_rp_some (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x))).
-
-(* constant 4048 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t34 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_some (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr1_t33 r x t n) : l_e_st_eq_landau_n_rt_rp_some (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x))).
-
-(* constant 4049 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t35 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_onei l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t30 r) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t34 r n) : l_e_st_eq_landau_n_rt_rp_one (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x))).
-
-(* constant 4050 *)
-definition l_e_st_eq_landau_n_rt_rp_r_rpofn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_ind l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t35 r n) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4051 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isnrp1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_oneax l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t35 r n) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp (l_e_st_eq_landau_n_rt_rp_r_rpofn r n))).
-
-(* constant 4052 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isnrp2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_nofrp (l_e_st_eq_landau_n_rt_rp_r_rpofn r n)) (l_e_st_eq_landau_n_rt_rp_r_isnrp1 r n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_nofrp (l_e_st_eq_landau_n_rt_rp_r_rpofn r n)) r).
-
-(* constant 4053 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isnerp ≝ λr1:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r1.λs1:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_neg s1.λi:l_e_st_eq_landau_n_rt_rp_r_is r1 s1.(l_e_st_eq_landau_n_rt_rp_r_ivr1_t29 r1 s1 (l_e_st_eq_landau_n_rt_rp_r_rpofn r1 n) (l_e_st_eq_landau_n_rt_rp_r_rpofn s1 m) (l_e_st_eq_landau_n_rt_rp_r_isnrp1 r1 n) (l_e_st_eq_landau_n_rt_rp_r_isnrp1 s1 m) i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_r_rpofn r1 n) (l_e_st_eq_landau_n_rt_rp_r_rpofn s1 m)).
-
-(* constant 4054 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isnirp ≝ λr1:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r1.λs1:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_neg s1.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_r_rpofn r1 n) (l_e_st_eq_landau_n_rt_rp_r_rpofn s1 m).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real r1 (l_e_st_eq_landau_n_rt_rp_r_nofrp (l_e_st_eq_landau_n_rt_rp_r_rpofn r1 n)) (l_e_st_eq_landau_n_rt_rp_r_nofrp (l_e_st_eq_landau_n_rt_rp_r_rpofn s1 m)) s1 (l_e_st_eq_landau_n_rt_rp_r_isnrp1 r1 n) (l_e_st_eq_landau_n_rt_rp_r_isrpen (l_e_st_eq_landau_n_rt_rp_r_rpofn r1 n) (l_e_st_eq_landau_n_rt_rp_r_rpofn s1 m) i) (l_e_st_eq_landau_n_rt_rp_r_isnrp2 s1 m) : l_e_st_eq_landau_n_rt_rp_r_is r1 s1).
-
-(* constant 4055 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrpn1 ≝ λr0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_r_ivr1_t29 (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) r0 (l_e_st_eq_landau_n_rt_rp_r_rpofn (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_negi r0)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_nofrp r0)) (l_e_st_eq_landau_n_rt_rp_r_isnrp1 (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_negi r0)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_nofrp r0)) : l_e_st_eq_landau_n_rt_rp_is r0 (l_e_st_eq_landau_n_rt_rp_r_rpofn (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_negi r0))).
-
-(* constant 4056 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrpn2 ≝ λr0:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut r0 (l_e_st_eq_landau_n_rt_rp_r_rpofn (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_negi r0)) (l_e_st_eq_landau_n_rt_rp_r_isrpn1 r0) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_r_rpofn (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_negi r0)) r0).
-
-(* constant 4057 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz163 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r : l_e_st_eq_landau_n_rt_rp_r_is r r).
-
-(* constant 4058 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz164 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r s i : l_e_st_eq_landau_n_rt_rp_r_is s r).
-
-(* constant 4059 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz165 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λj:l_e_st_eq_landau_n_rt_rp_r_is s t.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real r s t i j : l_e_st_eq_landau_n_rt_rp_r_is r t).
-
-(* constant 4060 *)
-definition l_e_st_eq_landau_n_rt_rp_r_absdr ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_absd x) : Πx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4061 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_eqabsd a b e) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_absdr a) (l_e_st_eq_landau_n_rt_rp_r_absdr b)).
-
-(* constant 4062 *)
-definition l_e_st_eq_landau_n_rt_rp_r_fabsdr ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_eq x y.l_e_st_eq_landau_n_rt_rp_r_ivr2_t1 x y t : l_e_st_eq_landau_n_rt_rp_r_fixf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_absdr).
-
-(* constant 4063 *)
-definition l_e_st_eq_landau_n_rt_rp_r_abs ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_indreal l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_absdr l_e_st_eq_landau_n_rt_rp_r_fabsdr r : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4064 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_isindreal l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_absdr l_e_st_eq_landau_n_rt_rp_r_fabsdr r a0 a0ir : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_absd a0)) (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4065 *)
-definition l_e_st_eq_landau_n_rt_rp_r_aica ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_r_class x)) (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_absd a0)) (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_absd a0)) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t2 r a0 a0ir) : l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_r_class (l_e_st_eq_landau_n_rt_rp_r_abs r))).
-
-(* constant 4066 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isabs ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_abs x) r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)).
-
-(* constant 4067 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_satzd166a a0 (l_e_st_eq_landau_n_rt_rp_r_posex r a0 a0ir p) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a0)).
-
-(* constant 4068 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_r_aica r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_2r166_t1 r a0 a0ir p) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4069 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz166a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_2r166_t2 r x t p) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4070 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_satzd166b a0 (l_e_st_eq_landau_n_rt_rp_r_negex r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a0)).
-
-(* constant 4071 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_r_aica r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_2r166_t3 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4072 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz166b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_2r166_t4 r x t n) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4073 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s).(l_e_st_eq_landau_n_rt_rp_satzd166c a1 b1 (l_e_st_eq_landau_n_rt_rp_r_posex r a1 a1ir p) (l_e_st_eq_landau_n_rt_rp_r_posex s b1 b1is q) (l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1) (l_e_st_eq_landau_n_rt_rp_r_aica r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_aica s b1 b1is) i) : l_e_st_eq_landau_n_rt_rp_eq a1 b1).
-
-(* constant 4074 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s).(l_e_st_eq_landau_n_rt_rp_r_isin r s a1 b1 a1ir b1is (l_e_st_eq_landau_n_rt_rp_r_2r166_t5 r s a1 b1 a1ir b1is p q i) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4075 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz166c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s).(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_2r166_t6 r s x y t u p q i) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4076 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s).(l_e_st_eq_landau_n_rt_rp_satzd166d a1 b1 (l_e_st_eq_landau_n_rt_rp_r_negex r a1 a1ir n) (l_e_st_eq_landau_n_rt_rp_r_negex s b1 b1is o) (l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1) (l_e_st_eq_landau_n_rt_rp_r_aica r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_aica s b1 b1is) i) : l_e_st_eq_landau_n_rt_rp_eq a1 b1).
-
-(* constant 4077 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s).(l_e_st_eq_landau_n_rt_rp_r_isin r s a1 b1 a1ir b1is (l_e_st_eq_landau_n_rt_rp_r_2r166_t7 r s a1 b1 a1ir b1is n o i) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4078 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz166d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s).(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_2r166_t8 r s x y t u n o i) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4079 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz166e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_rapp r (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)) (λt:l_e_st_eq_landau_n_rt_rp_r_pos r.l_e_st_eq_landau_n_rt_rp_r_satz166a r t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)) n) (λt:l_e_st_eq_landau_n_rt_rp_r_neg r.l_e_st_eq_landau_n_rt_rp_r_satz166b r t) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4080 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_satzd166f a0 (l_e_st_eq_landau_n_rt_rp_r_0ex r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_absd a0)).
-
-(* constant 4081 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_0in (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_r_aica r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_2r166_t9 r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4082 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz166f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_2r166_t10 r x t i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4083 *)
-definition l_e_st_eq_landau_n_rt_rp_r_more ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_and3 (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_mored x y))) : Prop).
-
-(* constant 4084 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_propm ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.(l_and3 (l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) : Prop).
-
-(* constant 4085 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_mored a1 b1.(l_and3i (l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) a1ir b1is m : l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a1 b1).
-
-(* constant 4086 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_mored a1 b1.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a1 x) b1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t3 r s a1 b1 a1ir b1is m) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a1 x)).
-
-(* constant 4087 *)
-definition l_e_st_eq_landau_n_rt_rp_r_morein ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_mored a1 b1.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s x y)) a1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t4 r s a1 b1 a1ir b1is m) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4088 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a x).λb:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a b.(l_and3e1 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_mored a b) p2 : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)).
-
-(* constant 4089 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a x).λb:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a b.(l_and3e2 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_mored a b) p2 : l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s)).
-
-(* constant 4090 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a x).λb:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a b.(l_and3e3 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_mored a b) p2 : l_e_st_eq_landau_n_rt_rp_mored a b).
-
-(* constant 4091 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a x).λb:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a b.(l_e_st_eq_landau_n_rt_rp_eqmored12 a a1 b b1 (l_e_st_eq_landau_n_rt_rp_r_isex r r a a1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t5 r s a1 b1 a1ir b1is m a sa b p2) a1ir (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) (l_e_st_eq_landau_n_rt_rp_r_isex s s b b1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t6 r s a1 b1 a1ir b1is m a sa b p2) b1is (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real s)) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t7 r s a1 b1 a1ir b1is m a sa b p2) : l_e_st_eq_landau_n_rt_rp_mored a1 b1).
-
-(* constant 4092 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a x).(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a x) sa (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a x.l_e_st_eq_landau_n_rt_rp_r_ivr2_t8 r s a1 b1 a1ir b1is m a sa x t) : l_e_st_eq_landau_n_rt_rp_mored a1 b1).
-
-(* constant 4093 *)
-definition l_e_st_eq_landau_n_rt_rp_r_moreex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s x y)) m (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s x y).l_e_st_eq_landau_n_rt_rp_r_ivr2_t9 r s a1 b1 a1ir b1is m x t) : l_e_st_eq_landau_n_rt_rp_mored a1 b1).
-
-(* constant 4094 *)
-definition l_e_st_eq_landau_n_rt_rp_r_less ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_and3 (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_lessd x y))) : Prop).
-
-(* constant 4095 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_propl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.(l_and3 (l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) : Prop).
-
-(* constant 4096 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_lessd a1 b1.(l_and3i (l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) a1ir b1is l : l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a1 b1).
-
-(* constant 4097 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_lessd a1 b1.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a1 x) b1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t10 r s a1 b1 a1ir b1is l) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a1 x)).
-
-(* constant 4098 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_lessd a1 b1.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s x y)) a1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t11 r s a1 b1 a1ir b1is l) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4099 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a x).λb:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a b.(l_and3e1 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_lessd a b) p2 : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)).
-
-(* constant 4100 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t13 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a x).λb:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a b.(l_and3e2 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_lessd a b) p2 : l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s)).
-
-(* constant 4101 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t14 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a x).λb:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a b.(l_and3e3 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_lessd a b) p2 : l_e_st_eq_landau_n_rt_rp_lessd a b).
-
-(* constant 4102 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t15 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a x).λb:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a b.(l_e_st_eq_landau_n_rt_rp_eqlessd12 a a1 b b1 (l_e_st_eq_landau_n_rt_rp_r_isex r r a a1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t12 r s a1 b1 a1ir b1is l a sa b p2) a1ir (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) (l_e_st_eq_landau_n_rt_rp_r_isex s s b b1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t13 r s a1 b1 a1ir b1is l a sa b p2) b1is (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real s)) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t14 r s a1 b1 a1ir b1is l a sa b p2) : l_e_st_eq_landau_n_rt_rp_lessd a1 b1).
-
-(* constant 4103 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t16 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a x).(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a x) sa (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a x.l_e_st_eq_landau_n_rt_rp_r_ivr2_t15 r s a1 b1 a1ir b1is l a sa x t) : l_e_st_eq_landau_n_rt_rp_lessd a1 b1).
-
-(* constant 4104 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s x y)) l (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s x y).l_e_st_eq_landau_n_rt_rp_r_ivr2_t16 r s a1 b1 a1ir b1is l x t) : l_e_st_eq_landau_n_rt_rp_lessd a1 b1).
-
-(* constant 4105 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismore1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λm:l_e_st_eq_landau_n_rt_rp_r_more r t.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_more x t) r s m i : l_e_st_eq_landau_n_rt_rp_r_more s t).
-
-(* constant 4106 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismore2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λm:l_e_st_eq_landau_n_rt_rp_r_more t r.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_more t x) r s m i : l_e_st_eq_landau_n_rt_rp_r_more t s).
-
-(* constant 4107 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isless1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λl:l_e_st_eq_landau_n_rt_rp_r_less r t.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_less x t) r s l i : l_e_st_eq_landau_n_rt_rp_r_less s t).
-
-(* constant 4108 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isless2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λl:l_e_st_eq_landau_n_rt_rp_r_less t r.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_less t x) r s l i : l_e_st_eq_landau_n_rt_rp_r_less t s).
-
-(* constant 4109 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismore12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λj:l_e_st_eq_landau_n_rt_rp_r_is t u.λm:l_e_st_eq_landau_n_rt_rp_r_more r t.(l_e_st_eq_landau_n_rt_rp_r_ismore2 t u s j (l_e_st_eq_landau_n_rt_rp_r_ismore1 r s t i m) : l_e_st_eq_landau_n_rt_rp_r_more s u).
-
-(* constant 4110 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isless12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λj:l_e_st_eq_landau_n_rt_rp_r_is t u.λl:l_e_st_eq_landau_n_rt_rp_r_less r t.(l_e_st_eq_landau_n_rt_rp_r_isless2 t u s j (l_e_st_eq_landau_n_rt_rp_r_isless1 r s t i l) : l_e_st_eq_landau_n_rt_rp_r_less s u).
-
-(* constant 4111 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t17 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_lemmad5 a1 b1 (l_e_st_eq_landau_n_rt_rp_r_moreex r s a1 b1 a1ir b1is m) : l_e_st_eq_landau_n_rt_rp_lessd b1 a1).
-
-(* constant 4112 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t18 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_lessin s r b1 a1 b1is a1ir (l_e_st_eq_landau_n_rt_rp_r_ivr2_t17 r s a1 b1 a1ir b1is m) : l_e_st_eq_landau_n_rt_rp_r_less s r).
-
-(* constant 4113 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_less s r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_ivr2_t18 r s x y t u m) : l_e_st_eq_landau_n_rt_rp_r_less s r).
-
-(* constant 4114 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t19 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_lemmad6 a1 b1 (l_e_st_eq_landau_n_rt_rp_r_lessex r s a1 b1 a1ir b1is l) : l_e_st_eq_landau_n_rt_rp_mored b1 a1).
-
-(* constant 4115 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t20 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_morein s r b1 a1 b1is a1ir (l_e_st_eq_landau_n_rt_rp_r_ivr2_t19 r s a1 b1 a1ir b1is l) : l_e_st_eq_landau_n_rt_rp_r_more s r).
-
-(* constant 4116 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_more s r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_ivr2_t20 r s x y t u l) : l_e_st_eq_landau_n_rt_rp_r_more s r).
-
-(* constant 4117 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_satzd167a a1 b1 : l_or3 (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1)).
-
-(* constant 4118 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λe:l_e_st_eq_landau_n_rt_rp_eq a1 b1.(l_or3i1 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_isin r s a1 b1 a1ir b1is e) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4119 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_mored a1 b1.(l_or3i2 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_morein r s a1 b1 a1ir b1is m) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4120 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_lessd a1 b1.(l_or3i3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_lessin r s a1 b1 a1ir b1is l) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4121 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_or3app (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) (l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)) (l_e_st_eq_landau_n_rt_rp_r_2r167_t1 r s a1 b1 a1ir b1is) (λt:l_e_st_eq_landau_n_rt_rp_eq a1 b1.l_e_st_eq_landau_n_rt_rp_r_2r167_t2 r s a1 b1 a1ir b1is t) (λt:l_e_st_eq_landau_n_rt_rp_mored a1 b1.l_e_st_eq_landau_n_rt_rp_r_2r167_t3 r s a1 b1 a1ir b1is t) (λt:l_e_st_eq_landau_n_rt_rp_lessd a1 b1.l_e_st_eq_landau_n_rt_rp_r_2r167_t4 r s a1 b1 a1ir b1is t) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4122 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_satzd167b a1 b1 : l_ec3 (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1)).
-
-(* constant 4123 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (l_ec3e12 (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_2r167_t6 r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_isex r s a1 b1 a1ir b1is i)) (λt:l_e_st_eq_landau_n_rt_rp_r_more r s.l_e_st_eq_landau_n_rt_rp_r_moreex r s a1 b1 a1ir b1is t) : l_not (l_e_st_eq_landau_n_rt_rp_r_more r s)).
-
-(* constant 4124 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) (l_ec3e23 (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_2r167_t6 r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_moreex r s a1 b1 a1ir b1is m)) (λt:l_e_st_eq_landau_n_rt_rp_r_less r s.l_e_st_eq_landau_n_rt_rp_r_lessex r s a1 b1 a1ir b1is t) : l_not (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4125 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_ec3e31 (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_2r167_t6 r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_lessex r s a1 b1 a1ir b1is l)) (λt:l_e_st_eq_landau_n_rt_rp_r_is r s.l_e_st_eq_landau_n_rt_rp_r_isex r s a1 b1 a1ir b1is t) : l_not (l_e_st_eq_landau_n_rt_rp_r_is r s)).
-
-(* constant 4126 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_ec3_th6 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_ec_th1 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (λt:l_e_st_eq_landau_n_rt_rp_r_is r s.l_e_st_eq_landau_n_rt_rp_r_2r167_t7 r s a1 b1 a1ir b1is t)) (l_ec_th1 (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (λt:l_e_st_eq_landau_n_rt_rp_r_more r s.l_e_st_eq_landau_n_rt_rp_r_2r167_t8 r s a1 b1 a1ir b1is t)) (l_ec_th1 (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) (λt:l_e_st_eq_landau_n_rt_rp_r_less r s.l_e_st_eq_landau_n_rt_rp_r_2r167_t9 r s a1 b1 a1ir b1is t)) : l_ec3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4127 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_orec3i (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_2r167_t5 r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_2r167_t10 r s a1 b1 a1ir b1is) : l_orec3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4128 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_orec3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_2r167_t11 r s x y t u) : l_orec3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4129 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_orec3e1 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_satz167 r s) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4130 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_orec3e2 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_satz167 r s) : l_ec3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4131 *)
-definition l_e_st_eq_landau_n_rt_rp_r_moreis ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_or (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) : Prop).
-
-(* constant 4132 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessis ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_or (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) : Prop).
-
-(* constant 4133 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz168a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_less s r) (l_e_st_eq_landau_n_rt_rp_r_is s r) m (λt:l_e_st_eq_landau_n_rt_rp_r_more r s.l_e_st_eq_landau_n_rt_rp_r_lemma1 r s t) (λt:l_e_st_eq_landau_n_rt_rp_r_is r s.l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r s t) : l_e_st_eq_landau_n_rt_rp_r_lessis s r).
-
-(* constant 4134 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz168b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more s r) (l_e_st_eq_landau_n_rt_rp_r_is s r) l (λt:l_e_st_eq_landau_n_rt_rp_r_less r s.l_e_st_eq_landau_n_rt_rp_r_lemma2 r s t) (λt:l_e_st_eq_landau_n_rt_rp_r_is r s.l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r s t) : l_e_st_eq_landau_n_rt_rp_r_moreis s r).
-
-(* constant 4135 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismoreis1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r t.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_moreis x t) r s m i : l_e_st_eq_landau_n_rt_rp_r_moreis s t).
-
-(* constant 4136 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismoreis2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λm:l_e_st_eq_landau_n_rt_rp_r_moreis t r.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_moreis t x) r s m i : l_e_st_eq_landau_n_rt_rp_r_moreis t s).
-
-(* constant 4137 *)
-definition l_e_st_eq_landau_n_rt_rp_r_islessis1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r t.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_lessis x t) r s l i : l_e_st_eq_landau_n_rt_rp_r_lessis s t).
-
-(* constant 4138 *)
-definition l_e_st_eq_landau_n_rt_rp_r_islessis2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λl:l_e_st_eq_landau_n_rt_rp_r_lessis t r.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_lessis t x) r s l i : l_e_st_eq_landau_n_rt_rp_r_lessis t s).
-
-(* constant 4139 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismoreis12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λj:l_e_st_eq_landau_n_rt_rp_r_is t u.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r t.(l_e_st_eq_landau_n_rt_rp_r_ismoreis2 t u s j (l_e_st_eq_landau_n_rt_rp_r_ismoreis1 r s t i m) : l_e_st_eq_landau_n_rt_rp_r_moreis s u).
-
-(* constant 4140 *)
-definition l_e_st_eq_landau_n_rt_rp_r_islessis12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λj:l_e_st_eq_landau_n_rt_rp_r_is t u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r t.(l_e_st_eq_landau_n_rt_rp_r_islessis2 t u s j (l_e_st_eq_landau_n_rt_rp_r_islessis1 r s t i l) : l_e_st_eq_landau_n_rt_rp_r_lessis s u).
-
-(* constant 4141 *)
-definition l_e_st_eq_landau_n_rt_rp_r_moreisi1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) m : l_e_st_eq_landau_n_rt_rp_r_moreis r s).
-
-(* constant 4142 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessisi1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) l : l_e_st_eq_landau_n_rt_rp_r_lessis r s).
-
-(* constant 4143 *)
-definition l_e_st_eq_landau_n_rt_rp_r_moreisi2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) i : l_e_st_eq_landau_n_rt_rp_r_moreis r s).
-
-(* constant 4144 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessisi2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) i : l_e_st_eq_landau_n_rt_rp_r_lessis r s).
-
-(* constant 4145 *)
-definition l_e_st_eq_landau_n_rt_rp_r_moreisin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_moreq a1 b1.(l_orapp (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_r_moreis r s) m (λt:l_e_st_eq_landau_n_rt_rp_mored a1 b1.l_e_st_eq_landau_n_rt_rp_r_moreisi1 r s (l_e_st_eq_landau_n_rt_rp_r_morein r s a1 b1 a1ir b1is t)) (λt:l_e_st_eq_landau_n_rt_rp_eq a1 b1.l_e_st_eq_landau_n_rt_rp_r_moreisi2 r s (l_e_st_eq_landau_n_rt_rp_r_isin r s a1 b1 a1ir b1is t)) : l_e_st_eq_landau_n_rt_rp_r_moreis r s).
-
-(* constant 4146 *)
-definition l_e_st_eq_landau_n_rt_rp_r_moreisex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.(l_orapp (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_moreq a1 b1) m (λt:l_e_st_eq_landau_n_rt_rp_r_more r s.l_e_st_eq_landau_n_rt_rp_moreqi1 a1 b1 (l_e_st_eq_landau_n_rt_rp_r_moreex r s a1 b1 a1ir b1is t)) (λt:l_e_st_eq_landau_n_rt_rp_r_is r s.l_e_st_eq_landau_n_rt_rp_moreqi2 a1 b1 (l_e_st_eq_landau_n_rt_rp_r_isex r s a1 b1 a1ir b1is t)) : l_e_st_eq_landau_n_rt_rp_moreq a1 b1).
-
-(* constant 4147 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessisin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_lesseq a1 b1.(l_orapp (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_r_lessis r s) l (λt:l_e_st_eq_landau_n_rt_rp_lessd a1 b1.l_e_st_eq_landau_n_rt_rp_r_lessisi1 r s (l_e_st_eq_landau_n_rt_rp_r_lessin r s a1 b1 a1ir b1is t)) (λt:l_e_st_eq_landau_n_rt_rp_eq a1 b1.l_e_st_eq_landau_n_rt_rp_r_lessisi2 r s (l_e_st_eq_landau_n_rt_rp_r_isin r s a1 b1 a1ir b1is t)) : l_e_st_eq_landau_n_rt_rp_r_lessis r s).
-
-(* constant 4148 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessisex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.(l_orapp (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_lesseq a1 b1) l (λt:l_e_st_eq_landau_n_rt_rp_r_less r s.l_e_st_eq_landau_n_rt_rp_lesseqi1 a1 b1 (l_e_st_eq_landau_n_rt_rp_r_lessex r s a1 b1 a1ir b1is t)) (λt:l_e_st_eq_landau_n_rt_rp_r_is r s.l_e_st_eq_landau_n_rt_rp_lesseqi2 a1 b1 (l_e_st_eq_landau_n_rt_rp_r_isex r s a1 b1 a1ir b1is t)) : l_e_st_eq_landau_n_rt_rp_lesseq a1 b1).
-
-(* constant 4149 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.(l_ec3_th7 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_satz167b r s) (l_comor (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) m) : l_not (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4150 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.(l_ec3_th9 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_satz167b r s) l : l_not (l_e_st_eq_landau_n_rt_rp_r_more r s)).
-
-(* constant 4151 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_more r s).(l_or3_th2 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_satz167a r s) n : l_e_st_eq_landau_n_rt_rp_r_lessis r s).
-
-(* constant 4152 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_less r s).(l_comor (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_or3_th3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_satz167a r s) n) : l_e_st_eq_landau_n_rt_rp_r_moreis r s).
-
-(* constant 4153 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167g ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_lessis r s) (l_not (l_e_st_eq_landau_n_rt_rp_r_more r s)) (l_weli (l_e_st_eq_landau_n_rt_rp_r_more r s) m) (λt:l_e_st_eq_landau_n_rt_rp_r_lessis r s.l_e_st_eq_landau_n_rt_rp_r_satz167d r s t) : l_not (l_e_st_eq_landau_n_rt_rp_r_lessis r s)).
-
-(* constant 4154 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167h ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_moreis r s) (l_not (l_e_st_eq_landau_n_rt_rp_r_less r s)) (l_weli (l_e_st_eq_landau_n_rt_rp_r_less r s) l) (λt:l_e_st_eq_landau_n_rt_rp_r_moreis r s.l_e_st_eq_landau_n_rt_rp_r_satz167c r s t) : l_not (l_e_st_eq_landau_n_rt_rp_r_moreis r s)).
-
-(* constant 4155 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167j ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_moreis r s).(l_or3e3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_satz167a r s) (l_or_th5 (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) n) (l_or_th4 (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) n) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4156 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167k ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_lessis r s).(l_or3e2 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_satz167a r s) (l_or_th4 (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) n) (l_or_th5 (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) n) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4157 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r169_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_satzd169a a b (l_e_st_eq_landau_n_rt_rp_r_0ex l_e_st_eq_landau_n_rt_rp_r_0 b bi0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_posex r a air p) : l_e_st_eq_landau_n_rt_rp_mored a b).
-
-(* constant 4158 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r169_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_r_morein r l_e_st_eq_landau_n_rt_rp_r_0 a b air bi0 (l_e_st_eq_landau_n_rt_rp_r_2r169_t1 r p a b air bi0) : l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4159 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz169a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).l_e_st_eq_landau_n_rt_rp_r_2r169_t2 r p x y t u) : l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4160 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r169_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_satzd169b a b (l_e_st_eq_landau_n_rt_rp_r_0ex l_e_st_eq_landau_n_rt_rp_r_0 b bi0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_moreex r l_e_st_eq_landau_n_rt_rp_r_0 a b air bi0 m) : l_e_st_eq_landau_n_rt_rp_posd a).
-
-(* constant 4161 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r169_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_r_posin r a air (l_e_st_eq_landau_n_rt_rp_r_2r169_t3 r m a b air bi0) : l_e_st_eq_landau_n_rt_rp_r_pos r).
-
-(* constant 4162 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz169b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pos r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).l_e_st_eq_landau_n_rt_rp_r_2r169_t4 r m x y t u) : l_e_st_eq_landau_n_rt_rp_r_pos r).
-
-(* constant 4163 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r169_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_satzd169c a b (l_e_st_eq_landau_n_rt_rp_r_0ex l_e_st_eq_landau_n_rt_rp_r_0 b bi0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_negex r a air n) : l_e_st_eq_landau_n_rt_rp_lessd a b).
-
-(* constant 4164 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r169_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_r_lessin r l_e_st_eq_landau_n_rt_rp_r_0 a b air bi0 (l_e_st_eq_landau_n_rt_rp_r_2r169_t5 r n a b air bi0) : l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4165 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz169c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).l_e_st_eq_landau_n_rt_rp_r_2r169_t6 r n x y t u) : l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4166 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r169_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_satzd169d a b (l_e_st_eq_landau_n_rt_rp_r_0ex l_e_st_eq_landau_n_rt_rp_r_0 b bi0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_lessex r l_e_st_eq_landau_n_rt_rp_r_0 a b air bi0 l) : l_e_st_eq_landau_n_rt_rp_negd a).
-
-(* constant 4167 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r169_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_r_negin r a air (l_e_st_eq_landau_n_rt_rp_r_2r169_t7 r l a b air bi0) : l_e_st_eq_landau_n_rt_rp_r_neg r).
-
-(* constant 4168 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz169d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_neg r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).l_e_st_eq_landau_n_rt_rp_r_2r169_t8 r l x y t u) : l_e_st_eq_landau_n_rt_rp_r_neg r).
-
-(* constant 4169 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r170_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_satzd170 a b (l_e_st_eq_landau_n_rt_rp_r_0ex l_e_st_eq_landau_n_rt_rp_r_0 b bi0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_absd a) b).
-
-(* constant 4170 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r170_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_r_moreisin (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_absd a) b (l_e_st_eq_landau_n_rt_rp_r_aica r a air) bi0 (l_e_st_eq_landau_n_rt_rp_r_2r170_t1 r a b air bi0) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4171 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz170 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).l_e_st_eq_landau_n_rt_rp_r_2r170_t2 r x y t u) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4172 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz170a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_abs r)) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz167c (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satz170 r)) (λt:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_abs r).l_e_st_eq_landau_n_rt_rp_r_satz169c (l_e_st_eq_landau_n_rt_rp_r_abs r) t) : l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_abs r))).
-
-(* constant 4173 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r171_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_less s t.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbis:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s).λcit:l_e_st_eq_landau_n_rt_rp_r_inn c (l_e_st_eq_landau_n_rt_rp_r_class t).(l_e_st_eq_landau_n_rt_rp_satzd171 a b c (l_e_st_eq_landau_n_rt_rp_r_lessex r s a b air bis l) (l_e_st_eq_landau_n_rt_rp_r_lessex s t b c bis cit k) : l_e_st_eq_landau_n_rt_rp_lessd a c).
-
-(* constant 4174 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r171_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_less s t.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbis:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s).λcit:l_e_st_eq_landau_n_rt_rp_r_inn c (l_e_st_eq_landau_n_rt_rp_r_class t).(l_e_st_eq_landau_n_rt_rp_r_lessin r t a c air cit (l_e_st_eq_landau_n_rt_rp_r_2r171_t1 r s t l k a b c air bis cit) : l_e_st_eq_landau_n_rt_rp_r_less r t).
-
-(* constant 4175 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz171 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_less s t.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_less r t) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λw:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λv:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_2r171_t2 r s t l k x y z w u v) : l_e_st_eq_landau_n_rt_rp_r_less r t).
-
-(* constant 4176 *)
-definition l_e_st_eq_landau_n_rt_rp_r_trless ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_less s t.(l_e_st_eq_landau_n_rt_rp_r_satz171 r s t l k : l_e_st_eq_landau_n_rt_rp_r_less r t).
-
-(* constant 4177 *)
-definition l_e_st_eq_landau_n_rt_rp_r_trmore ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λn:l_e_st_eq_landau_n_rt_rp_r_more s t.(l_e_st_eq_landau_n_rt_rp_r_lemma2 t r (l_e_st_eq_landau_n_rt_rp_r_trless t s r (l_e_st_eq_landau_n_rt_rp_r_lemma1 s t n) (l_e_st_eq_landau_n_rt_rp_r_lemma1 r s m)) : l_e_st_eq_landau_n_rt_rp_r_more r t).
-
-(* constant 4178 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r172_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_less s t.(l_e_st_eq_landau_n_rt_rp_satzd172a a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_lessisex r s a2 b2 a2ir b2is l) (l_e_st_eq_landau_n_rt_rp_r_lessex s t b2 c2 b2is c2it k) : l_e_st_eq_landau_n_rt_rp_lessd a2 c2).
-
-(* constant 4179 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r172_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_less s t.(l_e_st_eq_landau_n_rt_rp_r_lessin r t a2 c2 a2ir c2it (l_e_st_eq_landau_n_rt_rp_r_2r172_t1 r s t a2 b2 c2 a2ir b2is c2it l k) : l_e_st_eq_landau_n_rt_rp_r_less r t).
-
-(* constant 4180 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz172a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_less s t.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_less r t) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_2r172_t2 r s t x y z u v w l k) : l_e_st_eq_landau_n_rt_rp_r_less r t).
-
-(* constant 4181 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r172_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis s t.(l_e_st_eq_landau_n_rt_rp_satzd172b a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_lessex r s a2 b2 a2ir b2is l) (l_e_st_eq_landau_n_rt_rp_r_lessisex s t b2 c2 b2is c2it k) : l_e_st_eq_landau_n_rt_rp_lessd a2 c2).
-
-(* constant 4182 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r172_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis s t.(l_e_st_eq_landau_n_rt_rp_r_lessin r t a2 c2 a2ir c2it (l_e_st_eq_landau_n_rt_rp_r_2r172_t3 r s t a2 b2 c2 a2ir b2is c2it l k) : l_e_st_eq_landau_n_rt_rp_r_less r t).
-
-(* constant 4183 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz172b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis s t.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_less r t) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_2r172_t4 r s t x y z u v w l k) : l_e_st_eq_landau_n_rt_rp_r_less r t).
-
-(* constant 4184 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz172c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.λn:l_e_st_eq_landau_n_rt_rp_r_more s t.(l_e_st_eq_landau_n_rt_rp_r_lemma2 t r (l_e_st_eq_landau_n_rt_rp_r_satz172b t s r (l_e_st_eq_landau_n_rt_rp_r_lemma1 s t n) (l_e_st_eq_landau_n_rt_rp_r_satz168a r s m)) : l_e_st_eq_landau_n_rt_rp_r_more r t).
-
-(* constant 4185 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz172d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λn:l_e_st_eq_landau_n_rt_rp_r_moreis s t.(l_e_st_eq_landau_n_rt_rp_r_lemma2 t r (l_e_st_eq_landau_n_rt_rp_r_satz172a t s r (l_e_st_eq_landau_n_rt_rp_r_satz168a s t n) (l_e_st_eq_landau_n_rt_rp_r_lemma1 r s m)) : l_e_st_eq_landau_n_rt_rp_r_more r t).
-
-(* constant 4186 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r173_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis s t.(l_e_st_eq_landau_n_rt_rp_satzd173 a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_lessisex r s a2 b2 a2ir b2is l) (l_e_st_eq_landau_n_rt_rp_r_lessisex s t b2 c2 b2is c2it k) : l_e_st_eq_landau_n_rt_rp_lesseq a2 c2).
-
-(* constant 4187 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r173_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis s t.(l_e_st_eq_landau_n_rt_rp_r_lessisin r t a2 c2 a2ir c2it (l_e_st_eq_landau_n_rt_rp_r_2r173_t1 r s t a2 b2 c2 a2ir b2is c2it l k) : l_e_st_eq_landau_n_rt_rp_r_lessis r t).
-
-(* constant 4188 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz173 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis s t.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_lessis r t) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_2r173_t2 r s t x y z u v w l k) : l_e_st_eq_landau_n_rt_rp_r_lessis r t).
-
-(* constant 4189 *)
-definition l_e_st_eq_landau_n_rt_rp_r_trlessis ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis s t.(l_e_st_eq_landau_n_rt_rp_r_satz173 r s t l k : l_e_st_eq_landau_n_rt_rp_r_lessis r t).
-
-(* constant 4190 *)
-definition l_e_st_eq_landau_n_rt_rp_r_trmoreis ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.λn:l_e_st_eq_landau_n_rt_rp_r_moreis s t.(l_e_st_eq_landau_n_rt_rp_r_satz168b t r (l_e_st_eq_landau_n_rt_rp_r_trlessis t s r (l_e_st_eq_landau_n_rt_rp_r_satz168a s t n) (l_e_st_eq_landau_n_rt_rp_r_satz168a r s m)) : l_e_st_eq_landau_n_rt_rp_r_moreis r t).
-
-(* constant 4191 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ratrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd x)) : Prop).
-
-(* constant 4192 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t21 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λr1:l_e_st_eq_landau_n_rt_rp_ratd a0.(l_andi (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd a0) a0ir r1 : l_and (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd a0)).
-
-(* constant 4193 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ratrlin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λr1:l_e_st_eq_landau_n_rt_rp_ratd a0.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd x)) a0 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t21 r a0 a0ir r1) : l_e_st_eq_landau_n_rt_rp_r_ratrl r).
-
-(* constant 4194 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t22 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λrr:l_e_st_eq_landau_n_rt_rp_r_ratrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd a).(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd a) b : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)).
-
-(* constant 4195 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t23 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λrr:l_e_st_eq_landau_n_rt_rp_r_ratrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd a).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd a) b : l_e_st_eq_landau_n_rt_rp_ratd a).
-
-(* constant 4196 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t24 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λrr:l_e_st_eq_landau_n_rt_rp_r_ratrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd a).(l_e_st_eq_landau_n_rt_rp_eqratd a a0 (l_e_st_eq_landau_n_rt_rp_r_isex r r a a0 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t22 r a0 a0ir rr a b) a0ir (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t23 r a0 a0ir rr a b) : l_e_st_eq_landau_n_rt_rp_ratd a0).
-
-(* constant 4197 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ratrlex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λrr:l_e_st_eq_landau_n_rt_rp_r_ratrl r.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd x)) rr (l_e_st_eq_landau_n_rt_rp_ratd a0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd x).l_e_st_eq_landau_n_rt_rp_r_ivr2_t24 r a0 a0ir rr x t) : l_e_st_eq_landau_n_rt_rp_ratd a0).
-
-(* constant 4198 *)
-definition l_e_st_eq_landau_n_rt_rp_r_irratrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_not (l_e_st_eq_landau_n_rt_rp_r_ratrl r) : Prop).
-
-(* constant 4199 *)
-definition l_e_st_eq_landau_n_rt_rp_r_remark2 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λrr:l_e_st_eq_landau_n_rt_rp_ratrp r0.(l_e_st_eq_landau_n_rt_rp_r_ratrlin (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_remark2a r0 rr) : l_e_st_eq_landau_n_rt_rp_r_ratrl (l_e_st_eq_landau_n_rt_rp_r_pofrp r0)).
-
-(* constant 4200 *)
-definition l_e_st_eq_landau_n_rt_rp_r_remark3 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λrr:l_e_st_eq_landau_n_rt_rp_ratrp r0.(l_e_st_eq_landau_n_rt_rp_r_ratrlin (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_ndofrp r0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_ndofrp r0)) (l_e_st_eq_landau_n_rt_rp_remark3a r0 rr) : l_e_st_eq_landau_n_rt_rp_r_ratrl (l_e_st_eq_landau_n_rt_rp_r_nofrp r0)).
-
-(* constant 4201 *)
-definition l_e_st_eq_landau_n_rt_rp_r_remark4 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λir:l_e_st_eq_landau_n_rt_rp_irratrp r0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_ratrl (l_e_st_eq_landau_n_rt_rp_r_pofrp r0)) (l_e_st_eq_landau_n_rt_rp_ratd (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_remark4a r0 ir) (λt:l_e_st_eq_landau_n_rt_rp_r_ratrl (l_e_st_eq_landau_n_rt_rp_r_pofrp r0).l_e_st_eq_landau_n_rt_rp_r_ratrlex (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) t) : l_e_st_eq_landau_n_rt_rp_r_irratrl (l_e_st_eq_landau_n_rt_rp_r_pofrp r0)).
-
-(* constant 4202 *)
-definition l_e_st_eq_landau_n_rt_rp_r_remark5 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λir:l_e_st_eq_landau_n_rt_rp_irratrp r0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_ratrl (l_e_st_eq_landau_n_rt_rp_r_nofrp r0)) (l_e_st_eq_landau_n_rt_rp_ratd (l_e_st_eq_landau_n_rt_rp_ndofrp r0)) (l_e_st_eq_landau_n_rt_rp_remark5a r0 ir) (λt:l_e_st_eq_landau_n_rt_rp_r_ratrl (l_e_st_eq_landau_n_rt_rp_r_nofrp r0).l_e_st_eq_landau_n_rt_rp_r_ratrlex (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_ndofrp r0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_ndofrp r0)) t) : l_e_st_eq_landau_n_rt_rp_r_irratrl (l_e_st_eq_landau_n_rt_rp_r_nofrp r0)).
-
-(* constant 4203 *)
-definition l_e_st_eq_landau_n_rt_rp_r_natrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd x)) : Prop).
-
-(* constant 4204 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t25 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_natd a0.(l_andi (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd a0) a0ir n : l_and (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd a0)).
-
-(* constant 4205 *)
-definition l_e_st_eq_landau_n_rt_rp_r_natrlin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_natd a0.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd x)) a0 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t25 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_natrl r).
-
-(* constant 4206 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t26 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd a).(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd a) b : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)).
-
-(* constant 4207 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t27 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd a).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd a) b : l_e_st_eq_landau_n_rt_rp_natd a).
-
-(* constant 4208 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t28 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd a).(l_e_st_eq_landau_n_rt_rp_eqnatd a a0 (l_e_st_eq_landau_n_rt_rp_r_isex r r a a0 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t26 r a0 a0ir n a b) a0ir (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t27 r a0 a0ir n a b) : l_e_st_eq_landau_n_rt_rp_natd a0).
-
-(* constant 4209 *)
-definition l_e_st_eq_landau_n_rt_rp_r_natrlex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd x)) n (l_e_st_eq_landau_n_rt_rp_natd a0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd x).l_e_st_eq_landau_n_rt_rp_r_ivr2_t28 r a0 a0ir n x t) : l_e_st_eq_landau_n_rt_rp_natd a0).
-
-(* constant 4210 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t29 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_natposd a0 (l_e_st_eq_landau_n_rt_rp_r_natrlex r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_posd a0).
-
-(* constant 4211 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t30 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_r_posin r a0 a0ir (l_e_st_eq_landau_n_rt_rp_r_ivr2_t29 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_pos r).
-
-(* constant 4212 *)
-definition l_e_st_eq_landau_n_rt_rp_r_natpos ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_pos r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr2_t30 r x t n) : l_e_st_eq_landau_n_rt_rp_r_pos r).
-
-(* constant 4213 *)
-definition l_e_st_eq_landau_n_rt_rp_r_rlofnt ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_pdofnt x) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4214 *)
-definition l_e_st_eq_landau_n_rt_rp_r_natrli ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_natrlin (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_pdofnt x) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofnt x)) (l_e_st_eq_landau_n_rt_rp_natdi x) : l_e_st_eq_landau_n_rt_rp_r_natrl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x)).
-
-(* constant 4215 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isnterl ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt u) x y i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)).
-
-(* constant 4216 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isntirl ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y).(l_e_st_eq_landau_n_rt_rp_isntirp x y (l_e_st_eq_landau_n_rt_rp_r_isrpip (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y) i) : l_e_st_eq_landau_n_is x y).
-
-(* constant 4217 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t31 ≝ (λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y).l_e_st_eq_landau_n_rt_rp_r_isntirl x y t : l_e_injective l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x)).
-
-(* constant 4218 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t32 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_natposd a0 (l_e_st_eq_landau_n_rt_rp_r_natrlex r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_posd a0).
-
-(* constant 4219 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_ap ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_rpofpd a0 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t32 r a0 a0ir n) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4220 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t33 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_natderp a0 (l_e_st_eq_landau_n_rt_rp_r_natrlex r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_r_ivr2_ap r a0 a0ir n)).
-
-(* constant 4221 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_ntofrp (l_e_st_eq_landau_n_rt_rp_r_ivr2_ap r a0 a0ir n) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t33 r a0 a0ir n) : l_e_st_eq_landau_n_nat).
-
-(* constant 4222 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t34 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_isrpepd (l_e_st_eq_landau_n_rt_rp_r_ivr2_ap r a0 a0ir n) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n)) (l_e_st_eq_landau_n_rt_rp_isrpnt1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_ap r a0 a0ir n) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t33 r a0 a0ir n)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_r_ivr2_ap r a0 a0ir n)) (l_e_st_eq_landau_n_rt_rp_pdofnt (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n))).
-
-(* constant 4223 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t35 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_treq a0 (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_r_ivr2_ap r a0 a0ir n)) (l_e_st_eq_landau_n_rt_rp_pdofnt (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n)) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 a0 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t32 r a0 a0ir n)) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t34 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_eq a0 (l_e_st_eq_landau_n_rt_rp_pdofnt (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n))).
-
-(* constant 4224 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t36 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_r_isin r (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n)) a0 (l_e_st_eq_landau_n_rt_rp_pdofnt (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n)) a0ir (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofnt (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n))) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t35 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n))).
-
-(* constant 4225 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t37 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_somei l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_rlofnt x)) (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t36 r a0 a0ir n) : l_e_image l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) r).
-
-(* constant 4226 *)
-definition l_e_st_eq_landau_n_rt_rp_r_natimage ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_image l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr2_t37 r x t n) : l_e_image l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) r).
-
-(* constant 4227 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t38 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_image l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) r.λx:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_rlofnt x).(l_e_isp1 l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_natrl u) (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) r (l_e_st_eq_landau_n_rt_rp_r_natrli x) j : l_e_st_eq_landau_n_rt_rp_r_natrl r).
-
-(* constant 4228 *)
-definition l_e_st_eq_landau_n_rt_rp_r_imagenat ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_image l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) r.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_rlofnt u)) i (l_e_st_eq_landau_n_rt_rp_r_natrl r) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_rlofnt u).l_e_st_eq_landau_n_rt_rp_r_ivr2_t38 r i u v) : l_e_st_eq_landau_n_rt_rp_r_natrl r).
-
-(* constant 4229 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ntofrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_soft l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) l_e_st_eq_landau_n_rt_rp_r_ivr2_t31 r (l_e_st_eq_landau_n_rt_rp_r_natimage r n) : l_e_st_eq_landau_n_nat).
-
-(* constant 4230 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrlent ≝ λr1:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r1.λs1:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_natrl s1.λi:l_e_st_eq_landau_n_rt_rp_r_is r1 s1.(l_e_isinv l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) l_e_st_eq_landau_n_rt_rp_r_ivr2_t31 r1 (l_e_st_eq_landau_n_rt_rp_r_natimage r1 n) s1 (l_e_st_eq_landau_n_rt_rp_r_natimage s1 m) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_ntofrl r1 n) (l_e_st_eq_landau_n_rt_rp_r_ntofrl s1 m)).
-
-(* constant 4231 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrlint ≝ λr1:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r1.λs1:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_natrl s1.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_ntofrl r1 n) (l_e_st_eq_landau_n_rt_rp_r_ntofrl s1 m).(l_e_isinve l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) l_e_st_eq_landau_n_rt_rp_r_ivr2_t31 r1 (l_e_st_eq_landau_n_rt_rp_r_natimage r1 n) s1 (l_e_st_eq_landau_n_rt_rp_r_natimage s1 m) i : l_e_st_eq_landau_n_rt_rp_r_is r1 s1).
-
-(* constant 4232 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrlnt1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_ists1 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) l_e_st_eq_landau_n_rt_rp_r_ivr2_t31 r (l_e_st_eq_landau_n_rt_rp_r_natimage r n) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n))).
-
-(* constant 4233 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrlnt2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n)) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 r n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n)) r).
-
-(* constant 4234 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_xn ≝ λx:l_e_st_eq_landau_n_nat.(l_e_soft l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt u) l_e_st_eq_landau_n_rt_rp_r_ivr2_t31 (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_imagei l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt u) x) : l_e_st_eq_landau_n_nat).
-
-(* constant 4235 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t39 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_isinv l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt u) l_e_st_eq_landau_n_rt_rp_r_ivr2_t31 (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_imagei l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt u) x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_natimage (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_natrli x)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_rlofnt x)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_ivr2_xn x) (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_natrli x))).
-
-(* constant 4236 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isntrl1 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_rt_rp_r_ivr2_xn x) (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_natrli x)) (l_e_isst1 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt u) l_e_st_eq_landau_n_rt_rp_r_ivr2_t31 x) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t39 x) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_natrli x))).
-
-(* constant 4237 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isntrl2 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_natrli x)) (l_e_st_eq_landau_n_rt_rp_r_isntrl1 x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_natrli x)) x).
-
-(* constant 4238 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd x)) : Prop).
-
-(* constant 4239 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t40 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_intd a0.(l_andi (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd a0) a0ir i : l_and (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd a0)).
-
-(* constant 4240 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intrlin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_intd a0.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd x)) a0 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t40 r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_r_intrl r).
-
-(* constant 4241 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t41 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd a).(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd a) b : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)).
-
-(* constant 4242 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t42 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd a).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd a) b : l_e_st_eq_landau_n_rt_rp_intd a).
-
-(* constant 4243 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t43 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd a).(l_e_st_eq_landau_n_rt_rp_eqintd a a0 (l_e_st_eq_landau_n_rt_rp_r_isex r r a a0 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t41 r a0 a0ir i a b) a0ir (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t42 r a0 a0ir i a b) : l_e_st_eq_landau_n_rt_rp_intd a0).
-
-(* constant 4244 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intrlex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd x)) i (l_e_st_eq_landau_n_rt_rp_intd a0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd x).l_e_st_eq_landau_n_rt_rp_r_ivr2_t43 r a0 a0ir i x t) : l_e_st_eq_landau_n_rt_rp_intd a0).
-
-(* constant 4245 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t44 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_natintd a0 (l_e_st_eq_landau_n_rt_rp_r_natrlex r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_intd a0).
-
-(* constant 4246 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t45 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_r_intrlin r a0 a0ir (l_e_st_eq_landau_n_rt_rp_r_ivr2_t44 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_intrl r).
-
-(* constant 4247 *)
-definition l_e_st_eq_landau_n_rt_rp_r_natintrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_intrl r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr2_t45 r x t n) : l_e_st_eq_landau_n_rt_rp_r_intrl r).
-
-(* constant 4248 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t46 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_posintnatd a0 (l_e_st_eq_landau_n_rt_rp_r_posex r a0 a0ir p) (l_e_st_eq_landau_n_rt_rp_r_intrlex r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_natd a0).
-
-(* constant 4249 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t47 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_r_natrlin r a0 a0ir (l_e_st_eq_landau_n_rt_rp_r_ivr2_t46 r a0 a0ir p i) : l_e_st_eq_landau_n_rt_rp_r_natrl r).
-
-(* constant 4250 *)
-definition l_e_st_eq_landau_n_rt_rp_r_posintnatrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_natrl r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr2_t47 r x t p i) : l_e_st_eq_landau_n_rt_rp_r_natrl r).
-
-(* constant 4251 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t48 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi2:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_intdi0 a0 (l_e_st_eq_landau_n_rt_rp_r_0ex r a0 a0ir i2) : l_e_st_eq_landau_n_rt_rp_intd a0).
-
-(* constant 4252 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t49 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi2:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_intrlin r a0 a0ir (l_e_st_eq_landau_n_rt_rp_r_ivr2_t48 r a0 a0ir i2) : l_e_st_eq_landau_n_rt_rp_r_intrl r).
-
-(* constant 4253 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intrli0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_intrl r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr2_t49 r x t i) : l_e_st_eq_landau_n_rt_rp_r_intrl r).
-
-(* constant 4254 *)
-definition l_e_st_eq_landau_n_rt_rp_r_remark6 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r0.(l_e_st_eq_landau_n_rt_rp_r_intrlin (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_remark6 r0 n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_pofrp r0)).
-
-(* constant 4255 *)
-definition l_e_st_eq_landau_n_rt_rp_r_remark7 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r0.(l_e_st_eq_landau_n_rt_rp_r_intrlin (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_ndofrp r0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_ndofrp r0)) (l_e_st_eq_landau_n_rt_rp_remark7 r0 n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_nofrp r0)).
-
-(* constant 4256 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r174_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_satzd174 a0 (l_e_st_eq_landau_n_rt_rp_r_intrlex r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_ratd a0).
-
-(* constant 4257 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r174_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_r_ratrlin r a0 a0ir (l_e_st_eq_landau_n_rt_rp_r_2r174_t1 r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_r_ratrl r).
-
-(* constant 4258 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz174 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_ratrl r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_2r174_t2 r x t i) : l_e_st_eq_landau_n_rt_rp_r_ratrl r).
-
-(* constant 4259 *)
-definition l_e_st_eq_landau_n_rt_rp_r_plusdr ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_pd x y) : Πx:l_e_st_eq_landau_n_rt_rp_dif.Πy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4260 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_pd a c)) (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_pd b d)) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pd a c)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pd b d)) (l_e_st_eq_landau_n_rt_rp_eqpd12 a b c d e f) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_plusdr a c) (l_e_st_eq_landau_n_rt_rp_r_plusdr b d)).
-
-(* constant 4261 *)
-definition l_e_st_eq_landau_n_rt_rp_r_fplusdr ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λv:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_eq x y.λu:l_e_st_eq_landau_n_rt_rp_r_eq z v.l_e_st_eq_landau_n_rt_rp_r_ivr3_t1 x y z v t u : l_e_st_eq_landau_n_rt_rp_r_fixf2 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_plusdr).
-
-(* constant 4262 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_indreal2 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_plusdr l_e_st_eq_landau_n_rt_rp_r_fplusdr r s : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4263 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isindreal2 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_plusdr l_e_st_eq_landau_n_rt_rp_r_fplusdr r s a1 b1 a1ir b1is : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_pd a1 b1)) (l_e_st_eq_landau_n_rt_rp_r_pl r s)).
-
-(* constant 4264 *)
-definition l_e_st_eq_landau_n_rt_rp_r_picp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_pd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_class x)) (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_pd a1 b1)) (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pd a1 b1)) (l_e_st_eq_landau_n_rt_rp_r_ivr3_t2 r s a1 b1 a1ir b1is) : l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_pd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_class (l_e_st_eq_landau_n_rt_rp_r_pl r s))).
-
-(* constant 4265 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ispl1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_pl x t) r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t)).
-
-(* constant 4266 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ispl2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_pl t x) r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl t s)).
-
-(* constant 4267 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ispl12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λj:l_e_st_eq_landau_n_rt_rp_r_is t u.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_ispl1 r s t i) (l_e_st_eq_landau_n_rt_rp_r_ispl2 t u s j) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4268 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r175_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_satzd175 a1 b1 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a1 b1) (l_e_st_eq_landau_n_rt_rp_pd b1 a1)).
-
-(* constant 4269 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r175_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl s r) (l_e_st_eq_landau_n_rt_rp_pd a1 b1) (l_e_st_eq_landau_n_rt_rp_pd b1 a1) (l_e_st_eq_landau_n_rt_rp_r_picp r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_picp s r b1 a1 b1is a1ir) (l_e_st_eq_landau_n_rt_rp_r_3r175_t1 r s a1 b1 a1ir b1is) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl s r)).
-
-(* constant 4270 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz175 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl s r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r175_t2 r s x y t u) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl s r)).
-
-(* constant 4271 *)
-definition l_e_st_eq_landau_n_rt_rp_r_compl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_satz175 r s : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl s r)).
-
-(* constant 4272 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_pd01 a1 b1 (l_e_st_eq_landau_n_rt_rp_r_0ex r a1 a1ir i) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a1 b1) b1).
-
-(* constant 4273 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_pl r s) s (l_e_st_eq_landau_n_rt_rp_pd a1 b1) b1 (l_e_st_eq_landau_n_rt_rp_r_picp r s a1 b1 a1ir b1is) b1is (l_e_st_eq_landau_n_rt_rp_r_ivr3_t3 r s a1 b1 a1ir b1is i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r s) s).
-
-(* constant 4274 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pl01 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r s) s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_ivr3_t4 r s x y t u i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r s) s).
-
-(* constant 4275 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pl02 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl s r) r (l_e_st_eq_landau_n_rt_rp_r_compl r s) (l_e_st_eq_landau_n_rt_rp_r_pl01 s r i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r s) r).
-
-(* constant 4276 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_ppd a1 b1 (l_e_st_eq_landau_n_rt_rp_r_posex r a1 a1ir p) (l_e_st_eq_landau_n_rt_rp_r_posex s b1 b1is q) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a1 b1)).
-
-(* constant 4277 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_pd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_picp r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_ivr3_t5 r s a1 b1 a1ir b1is p q) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl r s)).
-
-(* constant 4278 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pospl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_ivr3_t6 r s x y t u p q) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl r s)).
-
-(* constant 4279 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_npd a1 b1 (l_e_st_eq_landau_n_rt_rp_r_negex r a1 a1ir n) (l_e_st_eq_landau_n_rt_rp_r_negex s b1 b1is o) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a1 b1)).
-
-(* constant 4280 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_negin (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_pd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_picp r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_ivr3_t7 r s a1 b1 a1ir b1is n o) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_pl r s)).
-
-(* constant 4281 *)
-definition l_e_st_eq_landau_n_rt_rp_r_negpl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_ivr3_t8 r s x y t u n o) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_pl r s)).
-
-(* constant 4282 *)
-definition l_e_st_eq_landau_n_rt_rp_r_m0dr ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_m0d x) : Πx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4283 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t5a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_eqm0d a b e) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0dr a) (l_e_st_eq_landau_n_rt_rp_r_m0dr b)).
-
-(* constant 4284 *)
-definition l_e_st_eq_landau_n_rt_rp_r_fm0dr ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_eq x y.l_e_st_eq_landau_n_rt_rp_r_ivr3_t5a x y t : l_e_st_eq_landau_n_rt_rp_r_fixf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_m0dr).
-
-(* constant 4285 *)
-definition l_e_st_eq_landau_n_rt_rp_r_m0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_indreal l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_m0dr l_e_st_eq_landau_n_rt_rp_r_fm0dr r : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4286 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t6a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_isindreal l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_m0dr l_e_st_eq_landau_n_rt_rp_r_fm0dr r a0 a0ir : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_m0d a0)) (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4287 *)
-definition l_e_st_eq_landau_n_rt_rp_r_micm0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_class x)) (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_m0d a0)) (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_m0d a0)) (l_e_st_eq_landau_n_rt_rp_r_ivr3_t6a r a0 a0ir) : l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_class (l_e_st_eq_landau_n_rt_rp_r_m0 r))).
-
-(* constant 4288 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ism0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_m0 x) r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)).
-
-(* constant 4289 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t7a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_absnd a0 (l_e_st_eq_landau_n_rt_rp_r_negex r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_m0d a0)).
-
-(* constant 4290 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t8a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_aica r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_ivr3_t7a r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4291 *)
-definition l_e_st_eq_landau_n_rt_rp_r_absn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr3_t8a r x t n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4292 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λnn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).(l_e_st_eq_landau_n_rt_rp_absnnd a0 (l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd a0) (l_e_st_eq_landau_n_rt_rp_r_neg r) nn (λt:l_e_st_eq_landau_n_rt_rp_negd a0.l_e_st_eq_landau_n_rt_rp_r_negin r a0 a0ir t)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a0) a0).
-
-(* constant 4293 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λnn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_abs r) r (l_e_st_eq_landau_n_rt_rp_absd a0) a0 (l_e_st_eq_landau_n_rt_rp_r_aica r a0 a0ir) a0ir (l_e_st_eq_landau_n_rt_rp_r_ivr3_t9 r a0 a0ir nn) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) r).
-
-(* constant 4294 *)
-definition l_e_st_eq_landau_n_rt_rp_r_absnn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λnn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr3_t10 r x t nn) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) r).
-
-(* constant 4295 *)
-definition l_e_st_eq_landau_n_rt_rp_r_absp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_absnn r (l_e_st_eq_landau_n_rt_rp_r_pnotn r p) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) r).
-
-(* constant 4296 *)
-definition l_e_st_eq_landau_n_rt_rp_r_abs0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs r) r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_absnn r (l_e_st_eq_landau_n_rt_rp_r_0notn r i)) i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4297 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_satzd176a a0 (l_e_st_eq_landau_n_rt_rp_r_posex r a0 a0ir p) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_m0d a0)).
-
-(* constant 4298 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_negin (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_3r176_t1 r a0 a0ir p) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4299 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz176a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r176_t2 r x t p) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4300 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_satzd176b a0 (l_e_st_eq_landau_n_rt_rp_r_0ex r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_m0d a0)).
-
-(* constant 4301 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_0in (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_3r176_t3 r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4302 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz176b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r176_t4 r x t i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4303 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_satzd176c a0 (l_e_st_eq_landau_n_rt_rp_r_negex r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_m0d a0)).
-
-(* constant 4304 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_3r176_t5 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4305 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz176c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r176_t6 r x t n) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4306 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_satzd176d a0 (l_e_st_eq_landau_n_rt_rp_r_negex (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir) n) : l_e_st_eq_landau_n_rt_rp_posd a0).
-
-(* constant 4307 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_posin r a0 a0ir (l_e_st_eq_landau_n_rt_rp_r_3r176_t7 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_pos r).
-
-(* constant 4308 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz176d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_pos r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r176_t8 r x t n) : l_e_st_eq_landau_n_rt_rp_r_pos r).
-
-(* constant 4309 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_satzd176e a0 (l_e_st_eq_landau_n_rt_rp_r_0ex (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir) i) : l_e_st_eq_landau_n_rt_rp_zero a0).
-
-(* constant 4310 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_0in r a0 a0ir (l_e_st_eq_landau_n_rt_rp_r_3r176_t9 r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4311 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz176e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r176_t10 r x t i) : l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4312 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_satzd176f a0 (l_e_st_eq_landau_n_rt_rp_r_posex (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir) p) : l_e_st_eq_landau_n_rt_rp_negd a0).
-
-(* constant 4313 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_negin r a0 a0ir (l_e_st_eq_landau_n_rt_rp_r_3r176_t11 r a0 a0ir p) : l_e_st_eq_landau_n_rt_rp_r_neg r).
-
-(* constant 4314 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz176f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_neg r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r176_t12 r x t p) : l_e_st_eq_landau_n_rt_rp_r_neg r).
-
-(* constant 4315 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r177_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a0)) a0 (l_e_st_eq_landau_n_rt_rp_r_micm0 (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir)) a0ir (l_e_st_eq_landau_n_rt_rp_satzd177 a0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r).
-
-(* constant 4316 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz177 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r177_t1 r x t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r).
-
-(* constant 4317 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz177a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r (l_e_st_eq_landau_n_rt_rp_r_satz177 r) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r))).
-
-(* constant 4318 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz177b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_m0 s).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s)) s (l_e_st_eq_landau_n_rt_rp_r_ism0 r (l_e_st_eq_landau_n_rt_rp_r_m0 s) i) (l_e_st_eq_landau_n_rt_rp_r_satz177 s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) s).
-
-(* constant 4319 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz177c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_m0 s).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 r) s (l_e_st_eq_landau_n_rt_rp_r_satz177b r s i) : l_e_st_eq_landau_n_rt_rp_r_is s (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4320 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz177d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) s.(l_e_st_eq_landau_n_rt_rp_r_satz177c s r (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 r) s i) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_m0 s)).
-
-(* constant 4321 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz177e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) s.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_satz177d r s i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 s) r).
-
-(* constant 4322 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r178_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a0)) (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_r_aica (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir)) (l_e_st_eq_landau_n_rt_rp_r_aica r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_satzd178 a0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4323 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz178 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_abs r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r178_t1 r x t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4324 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz178a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_satz178 r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_m0 r))).
-
-(* constant 4325 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r179_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_0in (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_pd a0 (l_e_st_eq_landau_n_rt_rp_m0d a0)) (l_e_st_eq_landau_n_rt_rp_r_picp r (l_e_st_eq_landau_n_rt_rp_r_m0 r) a0 (l_e_st_eq_landau_n_rt_rp_m0d a0) a0ir (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir)) (l_e_st_eq_landau_n_rt_rp_satzd179 a0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_m0 r)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4326 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz179 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_m0 r)) l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r179_t1 r x t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_m0 r)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4327 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz179a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) r) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_m0 r)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_m0 r) r) (l_e_st_eq_landau_n_rt_rp_r_satz179 r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4328 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r180_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a1 b1)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a1) (l_e_st_eq_landau_n_rt_rp_m0d b1)) (l_e_st_eq_landau_n_rt_rp_r_micm0 (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_pd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_picp r s a1 b1 a1ir b1is)) (l_e_st_eq_landau_n_rt_rp_r_picp (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_m0d a1) (l_e_st_eq_landau_n_rt_rp_m0d b1) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_micm0 s b1 b1is)) (l_e_st_eq_landau_n_rt_rp_satzd180 a1 b1) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s))).
-
-(* constant 4329 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz180 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r180_t1 r s x y t u) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s))).
-
-(* constant 4330 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz180a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_satz180 r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl r s))).
-
-(* constant 4331 *)
-definition l_e_st_eq_landau_n_rt_rp_r_mn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_m0 s) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4332 *)
-definition l_e_st_eq_landau_n_rt_rp_r_micmn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_picp r (l_e_st_eq_landau_n_rt_rp_r_m0 s) a1 (l_e_st_eq_landau_n_rt_rp_m0d b1) a1ir (l_e_st_eq_landau_n_rt_rp_r_micm0 s b1 b1is) : l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_md a1 b1) (l_e_st_eq_landau_n_rt_rp_r_class (l_e_st_eq_landau_n_rt_rp_r_mn r s))).
-
-(* constant 4333 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismn1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_ispl1 r s (l_e_st_eq_landau_n_rt_rp_r_m0 t) i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r t) (l_e_st_eq_landau_n_rt_rp_r_mn s t)).
-
-(* constant 4334 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismn2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s) t (l_e_st_eq_landau_n_rt_rp_r_ism0 r s i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn t r) (l_e_st_eq_landau_n_rt_rp_r_mn t s)).
-
-(* constant 4335 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismn12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λj:l_e_st_eq_landau_n_rt_rp_r_is t u.(l_e_st_eq_landau_n_rt_rp_r_ispl12 r s (l_e_st_eq_landau_n_rt_rp_r_m0 t) (l_e_st_eq_landau_n_rt_rp_r_m0 u) i (l_e_st_eq_landau_n_rt_rp_r_ism0 t u j) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r t) (l_e_st_eq_landau_n_rt_rp_r_mn s u)).
-
-(* constant 4336 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz181 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_mn s r) (l_e_st_eq_landau_n_rt_rp_r_satz180 r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s)) s (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_satz177 s)) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn r s)) (l_e_st_eq_landau_n_rt_rp_r_mn s r)).
-
-(* constant 4337 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz181a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn s r)) (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_satz181 s r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn s r))).
-
-(* constant 4338 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn r s).(l_e_st_eq_landau_n_rt_rp_satzd182a a1 b1 (l_e_st_eq_landau_n_rt_rp_r_posex (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_md a1 b1) (l_e_st_eq_landau_n_rt_rp_r_micmn r s a1 b1 a1ir b1is) p) : l_e_st_eq_landau_n_rt_rp_mored a1 b1).
-
-(* constant 4339 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn r s).(l_e_st_eq_landau_n_rt_rp_r_morein r s a1 b1 a1ir b1is (l_e_st_eq_landau_n_rt_rp_r_3r182_t1 r s a1 b1 a1ir b1is p) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4340 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz182a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn r s).(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_more r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r182_t2 r s x y t u p) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4341 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_satzd182b a1 b1 (l_e_st_eq_landau_n_rt_rp_r_0ex (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_md a1 b1) (l_e_st_eq_landau_n_rt_rp_r_micmn r s a1 b1 a1ir b1is) i) : l_e_st_eq_landau_n_rt_rp_eq a1 b1).
-
-(* constant 4342 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_isin r s a1 b1 a1ir b1is (l_e_st_eq_landau_n_rt_rp_r_3r182_t3 r s a1 b1 a1ir b1is i) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4343 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz182b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r182_t4 r s x y t u i) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4344 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_mn r s).(l_e_st_eq_landau_n_rt_rp_satzd182c a1 b1 (l_e_st_eq_landau_n_rt_rp_r_negex (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_md a1 b1) (l_e_st_eq_landau_n_rt_rp_r_micmn r s a1 b1 a1ir b1is) n) : l_e_st_eq_landau_n_rt_rp_lessd a1 b1).
-
-(* constant 4345 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_mn r s).(l_e_st_eq_landau_n_rt_rp_r_lessin r s a1 b1 a1ir b1is (l_e_st_eq_landau_n_rt_rp_r_3r182_t5 r s a1 b1 a1ir b1is n) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4346 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz182c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_mn r s).(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_less r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r182_t6 r s x y t u n) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4347 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_satzd182d a1 b1 (l_e_st_eq_landau_n_rt_rp_r_moreex r s a1 b1 a1ir b1is m) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md a1 b1)).
-
-(* constant 4348 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_md a1 b1) (l_e_st_eq_landau_n_rt_rp_r_micmn r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_3r182_t7 r s a1 b1 a1ir b1is m) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn r s)).
-
-(* constant 4349 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz182d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r182_t8 r s x y t u m) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn r s)).
-
-(* constant 4350 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_satzd182e a1 b1 (l_e_st_eq_landau_n_rt_rp_r_isex r s a1 b1 a1ir b1is i) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md a1 b1)).
-
-(* constant 4351 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_0in (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_md a1 b1) (l_e_st_eq_landau_n_rt_rp_r_micmn r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_3r182_t9 r s a1 b1 a1ir b1is i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4352 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz182e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r182_t10 r s x y t u i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4353 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_satzd182f a1 b1 (l_e_st_eq_landau_n_rt_rp_r_lessex r s a1 b1 a1ir b1is l) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_md a1 b1)).
-
-(* constant 4354 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_negin (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_md a1 b1) (l_e_st_eq_landau_n_rt_rp_r_micmn r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_3r182_t11 r s a1 b1 a1ir b1is l) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_mn r s)).
-
-(* constant 4355 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz182f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_mn r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r182_t12 r s x y t u l) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_mn r s)).
-
-(* constant 4356 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r183_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_satzd183a a1 b1 (l_e_st_eq_landau_n_rt_rp_r_moreex r s a1 b1 a1ir b1is m) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_m0d a1) (l_e_st_eq_landau_n_rt_rp_m0d b1)).
-
-(* constant 4357 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r183_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_lessin (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_m0d a1) (l_e_st_eq_landau_n_rt_rp_m0d b1) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_micm0 s b1 b1is) (l_e_st_eq_landau_n_rt_rp_r_3r183_t1 r s a1 b1 a1ir b1is m) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)).
-
-(* constant 4358 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz183a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r183_t2 r s x y t u m) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)).
-
-(* constant 4359 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz183b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_ism0 r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)).
-
-(* constant 4360 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r183_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_satzd183c a1 b1 (l_e_st_eq_landau_n_rt_rp_r_lessex r s a1 b1 a1ir b1is l) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_m0d a1) (l_e_st_eq_landau_n_rt_rp_m0d b1)).
-
-(* constant 4361 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r183_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_morein (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_m0d a1) (l_e_st_eq_landau_n_rt_rp_m0d b1) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_micm0 s b1 b1is) (l_e_st_eq_landau_n_rt_rp_r_3r183_t3 r s a1 b1 a1ir b1is l) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)).
-
-(* constant 4362 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz183c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r183_t4 r s x y t u l) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)).
-
-(* constant 4363 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz183d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s).(l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s)) s (l_e_st_eq_landau_n_rt_rp_r_satz177 r) (l_e_st_eq_landau_n_rt_rp_r_satz177 s) (l_e_st_eq_landau_n_rt_rp_r_satz183c (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s) l) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4364 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz183e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s)) s (l_e_st_eq_landau_n_rt_rp_r_satz177a r) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s) i) (l_e_st_eq_landau_n_rt_rp_r_satz177 s) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4365 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz183f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s).(l_e_st_eq_landau_n_rt_rp_r_isless12 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s)) s (l_e_st_eq_landau_n_rt_rp_r_satz177 r) (l_e_st_eq_landau_n_rt_rp_r_satz177 s) (l_e_st_eq_landau_n_rt_rp_r_satz183a (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s) m) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4366 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_prop1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_and3 (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_pos t) (l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_mn s t)) : Prop).
-
-(* constant 4367 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_prop2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_3r184_prop1 r s x) : Prop).
-
-(* constant 4368 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_prop3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_3r184_prop2 r x) : Prop).
-
-(* constant 4369 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_and3 (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_eq a0 (l_e_st_eq_landau_n_rt_rp_md a b)) : Prop).
-
-(* constant 4370 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.(l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a x) : Prop).
-
-(* constant 4371 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_and3e1 (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_eq a0 (l_e_st_eq_landau_n_rt_rp_md a b)) p1 : l_e_st_eq_landau_n_rt_rp_posd a).
-
-(* constant 4372 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_and3e2 (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_eq a0 (l_e_st_eq_landau_n_rt_rp_md a b)) p1 : l_e_st_eq_landau_n_rt_rp_posd b).
-
-(* constant 4373 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_and3e3 (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_eq a0 (l_e_st_eq_landau_n_rt_rp_md a b)) p1 : l_e_st_eq_landau_n_rt_rp_eq a0 (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 4374 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_ra ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.(l_e_st_eq_landau_n_rt_rp_r_realof a : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4375 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_rb ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_e_st_eq_landau_n_rt_rp_r_realof b : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4376 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_e_st_eq_landau_n_rt_rp_r_innclass a : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2))).
-
-(* constant 4377 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_e_st_eq_landau_n_rt_rp_r_innclass b : l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1))).
-
-(* constant 4378 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_e_st_eq_landau_n_rt_rp_r_isin r (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2) (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1)) a0 (l_e_st_eq_landau_n_rt_rp_md a b) a0ir (l_e_st_eq_landau_n_rt_rp_r_micmn (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2) (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1) a b (l_e_st_eq_landau_n_rt_rp_r_3r184_t4 r a0 a0ir a p2 b p1) (l_e_st_eq_landau_n_rt_rp_r_3r184_t5 r a0 a0ir a p2 b p1)) (l_e_st_eq_landau_n_rt_rp_r_3r184_t3 r a0 a0ir a p2 b p1) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2) (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1))).
-
-(* constant 4379 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_and3i (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1)) (l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2) (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1))) (l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2) a (l_e_st_eq_landau_n_rt_rp_r_3r184_t4 r a0 a0ir a p2 b p1) (l_e_st_eq_landau_n_rt_rp_r_3r184_t1 r a0 a0ir a p2 b p1)) (l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1) b (l_e_st_eq_landau_n_rt_rp_r_3r184_t5 r a0 a0ir a p2 b p1) (l_e_st_eq_landau_n_rt_rp_r_3r184_t2 r a0 a0ir a p2 b p1)) (l_e_st_eq_landau_n_rt_rp_r_3r184_t6 r a0 a0ir a p2 b p1) : l_e_st_eq_landau_n_rt_rp_r_3r184_prop1 r (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2) (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1)).
-
-(* constant 4380 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_3r184_prop1 r (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2) x) (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1) (l_e_st_eq_landau_n_rt_rp_r_3r184_t7 r a0 a0ir a p2 b p1) : l_e_st_eq_landau_n_rt_rp_r_3r184_prop2 r (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2)).
-
-(* constant 4381 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a x) p2 (l_e_st_eq_landau_n_rt_rp_r_3r184_prop2 r (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a x.l_e_st_eq_landau_n_rt_rp_r_3r184_t8 r a0 a0ir a p2 x t) : l_e_st_eq_landau_n_rt_rp_r_3r184_prop2 r (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2)).
-
-(* constant 4382 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_3r184_prop2 r x) (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2) (l_e_st_eq_landau_n_rt_rp_r_3r184_t9 r a0 a0ir a p2) : l_e_st_eq_landau_n_rt_rp_r_3r184_prop3 r).
-
-(* constant 4383 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir x) (l_e_st_eq_landau_n_rt_rp_satzd184 a0) (l_e_st_eq_landau_n_rt_rp_r_3r184_prop3 r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir x.l_e_st_eq_landau_n_rt_rp_r_3r184_t10 r a0 a0ir x t) : l_e_st_eq_landau_n_rt_rp_r_3r184_prop3 r).
-
-(* constant 4384 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz184 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_3r184_prop3 r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r184_t11 r x t) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_some (λy:l_e_st_eq_landau_n_rt_rp_r_real.l_and3 (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_pos y) (l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_mn x y))))).
-
-(* constant 4385 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r185_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa3:l_e_st_eq_landau_n_rt_rp_dif.λb3:l_e_st_eq_landau_n_rt_rp_dif.λc3:l_e_st_eq_landau_n_rt_rp_dif.λd3:l_e_st_eq_landau_n_rt_rp_dif.λa3ir:l_e_st_eq_landau_n_rt_rp_r_inn a3 (l_e_st_eq_landau_n_rt_rp_r_class r).λb3is:l_e_st_eq_landau_n_rt_rp_r_inn b3 (l_e_st_eq_landau_n_rt_rp_r_class s).λc3it:l_e_st_eq_landau_n_rt_rp_r_inn c3 (l_e_st_eq_landau_n_rt_rp_r_class t).λd3iu:l_e_st_eq_landau_n_rt_rp_r_inn d3 (l_e_st_eq_landau_n_rt_rp_r_class u).(l_e_st_eq_landau_n_rt_rp_satzd185 a3 b3 c3 d3 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md a3 b3) (l_e_st_eq_landau_n_rt_rp_md c3 d3)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a3 c3) (l_e_st_eq_landau_n_rt_rp_pd b3 d3))).
-
-(* constant 4386 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r185_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa3:l_e_st_eq_landau_n_rt_rp_dif.λb3:l_e_st_eq_landau_n_rt_rp_dif.λc3:l_e_st_eq_landau_n_rt_rp_dif.λd3:l_e_st_eq_landau_n_rt_rp_dif.λa3ir:l_e_st_eq_landau_n_rt_rp_r_inn a3 (l_e_st_eq_landau_n_rt_rp_r_class r).λb3is:l_e_st_eq_landau_n_rt_rp_r_inn b3 (l_e_st_eq_landau_n_rt_rp_r_class s).λc3it:l_e_st_eq_landau_n_rt_rp_r_inn c3 (l_e_st_eq_landau_n_rt_rp_r_class t).λd3iu:l_e_st_eq_landau_n_rt_rp_r_inn d3 (l_e_st_eq_landau_n_rt_rp_r_class u).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_mn t u)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md a3 b3) (l_e_st_eq_landau_n_rt_rp_md c3 d3)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a3 c3) (l_e_st_eq_landau_n_rt_rp_pd b3 d3)) (l_e_st_eq_landau_n_rt_rp_r_picp (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_mn t u) (l_e_st_eq_landau_n_rt_rp_md a3 b3) (l_e_st_eq_landau_n_rt_rp_md c3 d3) (l_e_st_eq_landau_n_rt_rp_r_micmn r s a3 b3 a3ir b3is) (l_e_st_eq_landau_n_rt_rp_r_micmn t u c3 d3 c3it d3iu)) (l_e_st_eq_landau_n_rt_rp_r_micmn (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_pd a3 c3) (l_e_st_eq_landau_n_rt_rp_pd b3 d3) (l_e_st_eq_landau_n_rt_rp_r_picp r t a3 c3 a3ir c3it) (l_e_st_eq_landau_n_rt_rp_r_picp s u b3 d3 b3is d3iu)) (l_e_st_eq_landau_n_rt_rp_r_3r185_t1 r s t u a3 b3 c3 d3 a3ir b3is c3it d3iu) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_mn t u)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u))).
-
-(* constant 4387 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz185 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp4 r s t u (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_mn t u)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λv:l_e_st_eq_landau_n_rt_rp_dif.λxi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λyi:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λzi:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).λvi:l_e_st_eq_landau_n_rt_rp_r_inn v (l_e_st_eq_landau_n_rt_rp_r_class u).l_e_st_eq_landau_n_rt_rp_r_3r185_t2 r s t u x y z v xi yi zi vi) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_mn t u)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u))).
-
-(* constant 4388 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r186_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).(l_e_st_eq_landau_n_rt_rp_satzd186 a2 b2 c2 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a2 b2) c2) (l_e_st_eq_landau_n_rt_rp_pd a2 (l_e_st_eq_landau_n_rt_rp_pd b2 c2))).
-
-(* constant 4389 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r186_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a2 b2) c2) (l_e_st_eq_landau_n_rt_rp_pd a2 (l_e_st_eq_landau_n_rt_rp_pd b2 c2)) (l_e_st_eq_landau_n_rt_rp_r_picp (l_e_st_eq_landau_n_rt_rp_r_pl r s) t (l_e_st_eq_landau_n_rt_rp_pd a2 b2) c2 (l_e_st_eq_landau_n_rt_rp_r_picp r s a2 b2 a2ir b2is) c2it) (l_e_st_eq_landau_n_rt_rp_r_picp r (l_e_st_eq_landau_n_rt_rp_r_pl s t) a2 (l_e_st_eq_landau_n_rt_rp_pd b2 c2) a2ir (l_e_st_eq_landau_n_rt_rp_r_picp s t b2 c2 b2is c2it)) (l_e_st_eq_landau_n_rt_rp_r_3r186_t1 r s t a2 b2 c2 a2ir b2is c2it) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl s t))).
-
-(* constant 4390 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz186 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl s t))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_3r186_t2 r s t x y z u v w) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl s t))).
-
-(* constant 4391 *)
-definition l_e_st_eq_landau_n_rt_rp_r_asspl1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_satz186 r s t : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl s t))).
-
-(* constant 4392 *)
-definition l_e_st_eq_landau_n_rt_rp_r_asspl2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_r_satz186 r s t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl r s) t)).
-
-(* constant 4393 *)
-definition l_e_st_eq_landau_n_rt_rp_r_plmn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn r s) s) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 s) s)) r (l_e_st_eq_landau_n_rt_rp_r_asspl1 r (l_e_st_eq_landau_n_rt_rp_r_m0 s) s) (l_e_st_eq_landau_n_rt_rp_r_pl02 r (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 s) s) (l_e_st_eq_landau_n_rt_rp_r_satz179a s)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn r s) s) r).
-
-(* constant 4394 *)
-definition l_e_st_eq_landau_n_rt_rp_r_mnpl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl r s) s) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl s (l_e_st_eq_landau_n_rt_rp_r_m0 s))) r (l_e_st_eq_landau_n_rt_rp_r_asspl1 r s (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_pl02 r (l_e_st_eq_landau_n_rt_rp_r_pl s (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_satz179 s)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl r s) s) r).
-
-(* constant 4395 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz187a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl s (l_e_st_eq_landau_n_rt_rp_r_mn r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn r s) s) r (l_e_st_eq_landau_n_rt_rp_r_compl s (l_e_st_eq_landau_n_rt_rp_r_mn r s)) (l_e_st_eq_landau_n_rt_rp_r_plmn r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s (l_e_st_eq_landau_n_rt_rp_r_mn r s)) r).
-
-(* constant 4396 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz187b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r) (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_satz187a r s) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r)).
-
-(* constant 4397 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz187c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λx:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x s) s) x (l_e_st_eq_landau_n_rt_rp_r_ismn1 r (l_e_st_eq_landau_n_rt_rp_r_pl x s) s (l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_pl x s) (l_e_st_eq_landau_n_rt_rp_r_pl s x) i (l_e_st_eq_landau_n_rt_rp_r_compl s x))) (l_e_st_eq_landau_n_rt_rp_r_mnpl x s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) x).
-
-(* constant 4398 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz187d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λx:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn r s) x (l_e_st_eq_landau_n_rt_rp_r_satz187c r s x i) : l_e_st_eq_landau_n_rt_rp_r_is x (l_e_st_eq_landau_n_rt_rp_r_mn r s)).
-
-(* constant 4399 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz187e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λx:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl x s) r.(l_e_st_eq_landau_n_rt_rp_r_satz187c r s x (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl s x) (l_e_st_eq_landau_n_rt_rp_r_pl x s) r (l_e_st_eq_landau_n_rt_rp_r_compl s x) i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) x).
-
-(* constant 4400 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz187f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λx:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl x s) r.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn r s) x (l_e_st_eq_landau_n_rt_rp_r_satz187e r s x i) : l_e_st_eq_landau_n_rt_rp_r_is x (l_e_st_eq_landau_n_rt_rp_r_mn r s)).
-
-(* constant 4401 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r187_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r.λj:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s y) r.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real x y (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_satz187c r s x i) (l_e_st_eq_landau_n_rt_rp_r_satz187c r s y j) : l_e_st_eq_landau_n_rt_rp_r_is x y).
-
-(* constant 4402 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r187_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r.λu:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s y) r.l_e_st_eq_landau_n_rt_rp_r_3r187_t1 r s x y t u : l_e_amone l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r)).
-
-(* constant 4403 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz187 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_onei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r) (l_e_st_eq_landau_n_rt_rp_r_3r187_t2 r s) (l_e_st_eq_landau_n_rt_rp_r_satz187b r s) : l_e_st_eq_landau_n_rt_rp_r_one (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r)).
-
-(* constant 4404 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_satzd188a a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_moreex (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_pd a2 c2) (l_e_st_eq_landau_n_rt_rp_pd b2 c2) (l_e_st_eq_landau_n_rt_rp_r_picp r t a2 c2 a2ir c2it) (l_e_st_eq_landau_n_rt_rp_r_picp s t b2 c2 b2is c2it) m) : l_e_st_eq_landau_n_rt_rp_mored a2 b2).
-
-(* constant 4405 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_r_morein r s a2 b2 a2ir b2is (l_e_st_eq_landau_n_rt_rp_r_3r188_t1 r s t a2 b2 c2 a2ir b2is c2it m) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4406 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_more r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_3r188_t2 r s t x y z u v w m) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4407 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_satzd188b a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_pd a2 c2) (l_e_st_eq_landau_n_rt_rp_pd b2 c2) (l_e_st_eq_landau_n_rt_rp_r_picp r t a2 c2 a2ir c2it) (l_e_st_eq_landau_n_rt_rp_r_picp s t b2 c2 b2is c2it) i) : l_e_st_eq_landau_n_rt_rp_eq a2 b2).
-
-(* constant 4408 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_r_isin r s a2 b2 a2ir b2is (l_e_st_eq_landau_n_rt_rp_r_3r188_t3 r s t a2 b2 c2 a2ir b2is c2it i) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4409 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_is r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_3r188_t4 r s t x y z u v w i) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4410 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_satzd188c a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_lessex (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_pd a2 c2) (l_e_st_eq_landau_n_rt_rp_pd b2 c2) (l_e_st_eq_landau_n_rt_rp_r_picp r t a2 c2 a2ir c2it) (l_e_st_eq_landau_n_rt_rp_r_picp s t b2 c2 b2is c2it) l) : l_e_st_eq_landau_n_rt_rp_lessd a2 b2).
-
-(* constant 4411 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_r_lessin r s a2 b2 a2ir b2is (l_e_st_eq_landau_n_rt_rp_r_3r188_t5 r s t a2 b2 c2 a2ir b2is c2it l) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4412 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_less r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_3r188_t6 r s t x y z u v w l) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4413 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_satzd188d a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_moreex r s a2 b2 a2ir b2is m) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a2 c2) (l_e_st_eq_landau_n_rt_rp_pd b2 c2)).
-
-(* constant 4414 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_morein (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_pd a2 c2) (l_e_st_eq_landau_n_rt_rp_pd b2 c2) (l_e_st_eq_landau_n_rt_rp_r_picp r t a2 c2 a2ir c2it) (l_e_st_eq_landau_n_rt_rp_r_picp s t b2 c2 b2is c2it) (l_e_st_eq_landau_n_rt_rp_r_3r188_t7 r s t a2 b2 c2 a2ir b2is c2it m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t)).
-
-(* constant 4415 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_3r188_t8 r s t x y z u v w m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t)).
-
-(* constant 4416 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_ispl1 r s t i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t)).
-
-(* constant 4417 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_satzd188f a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_lessex r s a2 b2 a2ir b2is l) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd a2 c2) (l_e_st_eq_landau_n_rt_rp_pd b2 c2)).
-
-(* constant 4418 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_lessin (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_pd a2 c2) (l_e_st_eq_landau_n_rt_rp_pd b2 c2) (l_e_st_eq_landau_n_rt_rp_r_picp r t a2 c2 a2ir c2it) (l_e_st_eq_landau_n_rt_rp_r_picp s t b2 c2 b2is c2it) (l_e_st_eq_landau_n_rt_rp_r_3r188_t9 r s t a2 b2 c2 a2ir b2is c2it l) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t)).
-
-(* constant 4419 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_3r188_t10 r s t x y z u v w l) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t)).
-
-(* constant 4420 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188g ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl t s).(l_e_st_eq_landau_n_rt_rp_r_satz188a r s t (l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl t s) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_r_compl t r) (l_e_st_eq_landau_n_rt_rp_r_compl t s) m) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4421 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188h ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl t s).(l_e_st_eq_landau_n_rt_rp_r_satz188b r s t (l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl t s) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_r_compl r t) i (l_e_st_eq_landau_n_rt_rp_r_compl t s)) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4422 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188j ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl t s).(l_e_st_eq_landau_n_rt_rp_r_satz188c r s t (l_e_st_eq_landau_n_rt_rp_r_isless12 (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl t s) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_r_compl t r) (l_e_st_eq_landau_n_rt_rp_r_compl t s) l) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4423 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188k ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_r_pl t s) (l_e_st_eq_landau_n_rt_rp_r_compl r t) (l_e_st_eq_landau_n_rt_rp_r_compl s t) (l_e_st_eq_landau_n_rt_rp_r_satz188d r s t m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl t s)).
-
-(* constant 4424 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188l ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_ispl2 r s t i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl t s)).
-
-(* constant 4425 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188m ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_isless12 (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_r_pl t s) (l_e_st_eq_landau_n_rt_rp_r_compl r t) (l_e_st_eq_landau_n_rt_rp_r_compl s t) (l_e_st_eq_landau_n_rt_rp_r_satz188f r s t l) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl t s)).
-
-(* constant 4426 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188n ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λm:l_e_st_eq_landau_n_rt_rp_r_more t u.(l_e_st_eq_landau_n_rt_rp_r_ismore2 (l_e_st_eq_landau_n_rt_rp_r_pl r u) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_ispl1 r s u i) (l_e_st_eq_landau_n_rt_rp_r_satz188k t u r m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4427 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188o ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λm:l_e_st_eq_landau_n_rt_rp_r_more t u.(l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_pl u s) (l_e_st_eq_landau_n_rt_rp_r_compl r t) (l_e_st_eq_landau_n_rt_rp_r_compl s u) (l_e_st_eq_landau_n_rt_rp_r_satz188n r s t u i m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl u s)).
-
-(* constant 4428 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188p ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λl:l_e_st_eq_landau_n_rt_rp_r_less t u.(l_e_st_eq_landau_n_rt_rp_r_isless2 (l_e_st_eq_landau_n_rt_rp_r_pl r u) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_ispl1 r s u i) (l_e_st_eq_landau_n_rt_rp_r_satz188m t u r l) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4429 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188q ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λl:l_e_st_eq_landau_n_rt_rp_r_less t u.(l_e_st_eq_landau_n_rt_rp_r_isless12 (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_pl u s) (l_e_st_eq_landau_n_rt_rp_r_compl r t) (l_e_st_eq_landau_n_rt_rp_r_compl s u) (l_e_st_eq_landau_n_rt_rp_r_satz188p r s t u i l) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl u s)).
-
-(* constant 4430 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz189 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λn:l_e_st_eq_landau_n_rt_rp_r_more t u.(l_e_st_eq_landau_n_rt_rp_r_trmore (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_satz188d r s t m) (l_e_st_eq_landau_n_rt_rp_r_satz188k t u s n) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4431 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz189a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_less t u.(l_e_st_eq_landau_n_rt_rp_r_lemma1 (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_satz189 s r u t (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l) (l_e_st_eq_landau_n_rt_rp_r_lemma2 t u k)) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4432 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz190a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.λn:l_e_st_eq_landau_n_rt_rp_r_more t u.(l_orapp (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)) m (λv:l_e_st_eq_landau_n_rt_rp_r_more r s.l_e_st_eq_landau_n_rt_rp_r_satz189 r s t u v n) (λv:l_e_st_eq_landau_n_rt_rp_r_is r s.l_e_st_eq_landau_n_rt_rp_r_satz188n r s t u v n) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4433 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz190b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λn:l_e_st_eq_landau_n_rt_rp_r_moreis t u.(l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl u s) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_compl t r) (l_e_st_eq_landau_n_rt_rp_r_compl u s) (l_e_st_eq_landau_n_rt_rp_r_satz190a t u r s n m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4434 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz190c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_less t u.(l_e_st_eq_landau_n_rt_rp_r_lemma1 (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_satz190a s r u t (l_e_st_eq_landau_n_rt_rp_r_satz168b r s l) (l_e_st_eq_landau_n_rt_rp_r_lemma2 t u k)) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4435 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz190d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis t u.(l_e_st_eq_landau_n_rt_rp_r_lemma1 (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_satz190b s r u t (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l) (l_e_st_eq_landau_n_rt_rp_r_satz168b t u k)) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4436 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r191_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa3:l_e_st_eq_landau_n_rt_rp_dif.λb3:l_e_st_eq_landau_n_rt_rp_dif.λc3:l_e_st_eq_landau_n_rt_rp_dif.λd3:l_e_st_eq_landau_n_rt_rp_dif.λa3ir:l_e_st_eq_landau_n_rt_rp_r_inn a3 (l_e_st_eq_landau_n_rt_rp_r_class r).λb3is:l_e_st_eq_landau_n_rt_rp_r_inn b3 (l_e_st_eq_landau_n_rt_rp_r_class s).λc3it:l_e_st_eq_landau_n_rt_rp_r_inn c3 (l_e_st_eq_landau_n_rt_rp_r_class t).λd3iu:l_e_st_eq_landau_n_rt_rp_r_inn d3 (l_e_st_eq_landau_n_rt_rp_r_class u).λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.λn:l_e_st_eq_landau_n_rt_rp_r_moreis t u.(l_e_st_eq_landau_n_rt_rp_satzd191 a3 b3 c3 d3 (l_e_st_eq_landau_n_rt_rp_r_moreisex r s a3 b3 a3ir b3is m) (l_e_st_eq_landau_n_rt_rp_r_moreisex t u c3 d3 c3it d3iu n) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_pd a3 c3) (l_e_st_eq_landau_n_rt_rp_pd b3 d3)).
-
-(* constant 4437 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r191_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa3:l_e_st_eq_landau_n_rt_rp_dif.λb3:l_e_st_eq_landau_n_rt_rp_dif.λc3:l_e_st_eq_landau_n_rt_rp_dif.λd3:l_e_st_eq_landau_n_rt_rp_dif.λa3ir:l_e_st_eq_landau_n_rt_rp_r_inn a3 (l_e_st_eq_landau_n_rt_rp_r_class r).λb3is:l_e_st_eq_landau_n_rt_rp_r_inn b3 (l_e_st_eq_landau_n_rt_rp_r_class s).λc3it:l_e_st_eq_landau_n_rt_rp_r_inn c3 (l_e_st_eq_landau_n_rt_rp_r_class t).λd3iu:l_e_st_eq_landau_n_rt_rp_r_inn d3 (l_e_st_eq_landau_n_rt_rp_r_class u).λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.λn:l_e_st_eq_landau_n_rt_rp_r_moreis t u.(l_e_st_eq_landau_n_rt_rp_r_moreisin (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_pd a3 c3) (l_e_st_eq_landau_n_rt_rp_pd b3 d3) (l_e_st_eq_landau_n_rt_rp_r_picp r t a3 c3 a3ir c3it) (l_e_st_eq_landau_n_rt_rp_r_picp s u b3 d3 b3is d3iu) (l_e_st_eq_landau_n_rt_rp_r_3r191_t1 r s t u a3 b3 c3 d3 a3ir b3is c3it d3iu m n) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4438 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz191 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.λn:l_e_st_eq_landau_n_rt_rp_r_moreis t u.(l_e_st_eq_landau_n_rt_rp_r_realapp4 r s t u (l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λv:l_e_st_eq_landau_n_rt_rp_dif.λxi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λyi:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λzi:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).λvi:l_e_st_eq_landau_n_rt_rp_r_inn v (l_e_st_eq_landau_n_rt_rp_r_class u).l_e_st_eq_landau_n_rt_rp_r_3r191_t2 r s t u x y z v xi yi zi vi m n) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4439 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz191a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis t u.(l_e_st_eq_landau_n_rt_rp_r_satz168a (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_satz191 s r u t (l_e_st_eq_landau_n_rt_rp_r_satz168b r s l) (l_e_st_eq_landau_n_rt_rp_r_satz168b t u k)) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4440 *)
-definition l_e_st_eq_landau_n_rt_rp_r_timesdr ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_td x y) : Πx:l_e_st_eq_landau_n_rt_rp_dif.Πy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4441 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr4_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_td b d)) (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b d) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_td b d)) (l_e_st_eq_landau_n_rt_rp_eqtd12 a b c d e f) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_timesdr a c) (l_e_st_eq_landau_n_rt_rp_r_timesdr b d)).
-
-(* constant 4442 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ftimesdr ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λv:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_eq x y.λu:l_e_st_eq_landau_n_rt_rp_r_eq z v.l_e_st_eq_landau_n_rt_rp_r_ivr4_t1 x y z v t u : l_e_st_eq_landau_n_rt_rp_r_fixf2 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_timesdr).
-
-(* constant 4443 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ts ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_indreal2 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_timesdr l_e_st_eq_landau_n_rt_rp_r_ftimesdr r s : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4444 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr4_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isindreal2 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_timesdr l_e_st_eq_landau_n_rt_rp_r_ftimesdr r s a1 b1 a1ir b1is : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_td a1 b1)) (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4445 *)
-definition l_e_st_eq_landau_n_rt_rp_r_tict ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_class x)) (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_td a1 b1)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_td a1 b1)) (l_e_st_eq_landau_n_rt_rp_r_ivr4_t2 r s a1 b1 a1ir b1is) : l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_class (l_e_st_eq_landau_n_rt_rp_r_ts r s))).
-
-(* constant 4446 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ists1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_ts x t) r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4447 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ists2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_ts t x) r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s)).
-
-(* constant 4448 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ists12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λj:l_e_st_eq_landau_n_rt_rp_r_is t u.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t) (l_e_st_eq_landau_n_rt_rp_r_ts s u) (l_e_st_eq_landau_n_rt_rp_r_ists1 r s t i) (l_e_st_eq_landau_n_rt_rp_r_ists2 t u s j) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s u)).
-
-(* constant 4449 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r192_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_satzd192a a1 b1 (l_e_st_eq_landau_n_rt_rp_r_0ex r a1 a1ir i) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a1 b1)).
-
-(* constant 4450 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r192_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_0in (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_4r192_t1 r s a1 b1 a1ir b1is i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4451 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz192a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r192_t2 r s x y t u i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4452 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r192_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_satzd192b a1 b1 (l_e_st_eq_landau_n_rt_rp_r_0ex s b1 b1is i) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a1 b1)).
-
-(* constant 4453 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r192_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_0in (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_4r192_t3 r s a1 b1 a1ir b1is i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4454 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz192b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r192_t4 r s x y t u i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4455 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r192_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_satzd192c a1 b1 (l_e_st_eq_landau_n_rt_rp_r_0ex (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) i) : l_or (l_e_st_eq_landau_n_rt_rp_zero a1) (l_e_st_eq_landau_n_rt_rp_zero b1)).
-
-(* constant 4456 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r192_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_zero a1) (l_e_st_eq_landau_n_rt_rp_zero b1) (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_4r192_t5 r s a1 b1 a1ir b1is i) (λt:l_e_st_eq_landau_n_rt_rp_zero a1.l_e_st_eq_landau_n_rt_rp_r_0in r a1 a1ir t) (λt:l_e_st_eq_landau_n_rt_rp_zero b1.l_e_st_eq_landau_n_rt_rp_r_0in s b1 b1is t) : l_or (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 4457 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz192c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_or (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r192_t6 r s x y t u i) : l_or (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 4458 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz192d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.λo:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_or (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0)) (l_or_th3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0) n o) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_satz192c r s t) : l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4459 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ts01 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_satz192a r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4460 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ts02 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_satz192b r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4461 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r193_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_satzd193 a1 b1 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a1 b1)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1))).
-
-(* constant 4462 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r193_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a1 b1)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1)) (l_e_st_eq_landau_n_rt_rp_r_aica (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is)) (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1) (l_e_st_eq_landau_n_rt_rp_r_aica r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_aica s b1 b1is)) (l_e_st_eq_landau_n_rt_rp_r_4r193_t1 r s a1 b1 a1ir b1is) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).
-
-(* constant 4463 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz193 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r193_t2 r s x y t u) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).
-
-(* constant 4464 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz193a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_r_satz193 r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_ts r s))).
-
-(* constant 4465 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r194_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_satzd194 a1 b1 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_td b1 a1)).
-
-(* constant 4466 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r194_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts s r) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_td b1 a1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_tict s r b1 a1 b1is a1ir) (l_e_st_eq_landau_n_rt_rp_r_4r194_t1 r s a1 b1 a1ir b1is) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts s r)).
-
-(* constant 4467 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz194 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts s r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r194_t2 r s x y t u) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts s r)).
-
-(* constant 4468 *)
-definition l_e_st_eq_landau_n_rt_rp_r_comts ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_satz194 r s : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts s r)).
-
-(* constant 4469 *)
-definition l_e_st_eq_landau_n_rt_rp_r_1rl ≝ (l_e_st_eq_landau_n_rt_rp_r_realof l_e_st_eq_landau_n_rt_rp_1df : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4470 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pos1 ≝ (l_e_st_eq_landau_n_rt_rp_r_posin l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_1df (l_e_st_eq_landau_n_rt_rp_r_innclass l_e_st_eq_landau_n_rt_rp_1df) (l_e_st_eq_landau_n_rt_rp_posdirp l_e_st_eq_landau_n_rt_rp_1rp) : l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 4471 *)
-definition l_e_st_eq_landau_n_rt_rp_r_natrl1 ≝ (l_e_st_eq_landau_n_rt_rp_r_natrli l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_rt_rp_r_natrl l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 4472 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intrl1 ≝ (l_e_st_eq_landau_n_rt_rp_r_natintrl l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_natrl1 : l_e_st_eq_landau_n_rt_rp_r_intrl l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 4473 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r195_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_satzd195 a0 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 l_e_st_eq_landau_n_rt_rp_1df) a0).
-
-(* constant 4474 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r195_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_1rl) r (l_e_st_eq_landau_n_rt_rp_td a0 l_e_st_eq_landau_n_rt_rp_1df) a0 (l_e_st_eq_landau_n_rt_rp_r_tict r l_e_st_eq_landau_n_rt_rp_r_1rl a0 l_e_st_eq_landau_n_rt_rp_1df a0ir (l_e_st_eq_landau_n_rt_rp_r_innclass l_e_st_eq_landau_n_rt_rp_1df)) a0ir (l_e_st_eq_landau_n_rt_rp_r_4r195_t1 r a0 a0ir) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_1rl) r).
-
-(* constant 4475 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz195 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_1rl) r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_4r195_t2 r x t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_1rl) r).
-
-(* constant 4476 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz195a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_1rl) r (l_e_st_eq_landau_n_rt_rp_r_satz195 r) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_1rl)).
-
-(* constant 4477 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz195b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_1rl) r (l_e_st_eq_landau_n_rt_rp_r_comts l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_satz195 r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r) r).
-
-(* constant 4478 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz195c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r) r (l_e_st_eq_landau_n_rt_rp_r_satz195b r) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r)).
-
-(* constant 4479 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz196a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ists12 (l_e_st_eq_landau_n_rt_rp_r_abs r) r (l_e_st_eq_landau_n_rt_rp_r_abs s) s (l_e_st_eq_landau_n_rt_rp_r_absp r p) (l_e_st_eq_landau_n_rt_rp_r_absp s q)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).
-
-(* constant 4480 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_satzd196b a1 b1 (l_e_st_eq_landau_n_rt_rp_r_negex r a1 a1ir n) (l_e_st_eq_landau_n_rt_rp_r_negex s b1 b1is o) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1))).
-
-(* constant 4481 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1)) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1) (l_e_st_eq_landau_n_rt_rp_r_aica r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_aica s b1 b1is)) (l_e_st_eq_landau_n_rt_rp_r_4r196_t1 r s a1 b1 a1ir b1is n o) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).
-
-(* constant 4482 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz196b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r196_t2 r s x y t u n o) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).
-
-(* constant 4483 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t1a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λn:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_satzd196c a1 b1 (l_e_st_eq_landau_n_rt_rp_r_posex r a1 a1ir p) (l_e_st_eq_landau_n_rt_rp_r_negex s b1 b1is n) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1)))).
-
-(* constant 4484 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t2a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λn:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1))) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_micm0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1)) (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1) (l_e_st_eq_landau_n_rt_rp_r_aica r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_aica s b1 b1is))) (l_e_st_eq_landau_n_rt_rp_r_4r196_t1a r s a1 b1 a1ir b1is p n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)))).
-
-(* constant 4485 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz196c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λn:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r196_t2a r s x y t u p n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)))).
-
-(* constant 4486 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz196d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts s r) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_r_abs r))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))) (l_e_st_eq_landau_n_rt_rp_r_comts r s) (l_e_st_eq_landau_n_rt_rp_r_satz196c s r p n) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_r_abs r)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_r_abs r))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)))).
-
-(* constant 4487 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_zero a0) (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) n (λt:l_e_st_eq_landau_n_rt_rp_zero a0.l_e_st_eq_landau_n_rt_rp_r_0in r a0 a0ir t) : l_not (l_e_st_eq_landau_n_rt_rp_zero a0)).
-
-(* constant 4488 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)).(l_e_st_eq_landau_n_rt_rp_satzd196e a1 b1 (l_e_st_eq_landau_n_rt_rp_r_4r196_t3 r a1 a1ir n) (l_e_st_eq_landau_n_rt_rp_r_4r196_t3 s b1 b1is o) (l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1)) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1) (l_e_st_eq_landau_n_rt_rp_r_aica r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_aica s b1 b1is)) i) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_posd b1)) (l_and (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_negd b1))).
-
-(* constant 4489 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)).λa:l_and (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_posd b1).(l_andi (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_posin r a1 a1ir (l_ande1 (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_posd b1) a)) (l_e_st_eq_landau_n_rt_rp_r_posin s b1 b1is (l_ande2 (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_posd b1) a)) : l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_pos s)).
-
-(* constant 4490 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)).λa:l_and (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_negd b1).(l_andi (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_negin r a1 a1ir (l_ande1 (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_negd b1) a)) (l_e_st_eq_landau_n_rt_rp_r_negin s b1 b1is (l_ande2 (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_negd b1) a)) : l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_neg s)).
-
-(* constant 4491 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)).(l_or_th9 (l_and (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_posd b1)) (l_and (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_negd b1)) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_pos s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_4r196_t4 r s a1 b1 a1ir b1is n o i) (λt:l_and (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_posd b1).l_e_st_eq_landau_n_rt_rp_r_4r196_t5 r s a1 b1 a1ir b1is n o i t) (λt:l_and (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_negd b1).l_e_st_eq_landau_n_rt_rp_r_4r196_t6 r s a1 b1 a1ir b1is n o i t) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_pos s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_neg s))).
-
-(* constant 4492 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz196e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)).(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_pos s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_neg s))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r196_t7 r s x y t u n o i) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_pos s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_neg s))).
-
-(* constant 4493 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).(l_e_st_eq_landau_n_rt_rp_satzd196f a1 b1 (l_e_st_eq_landau_n_rt_rp_r_4r196_t3 r a1 a1ir n) (l_e_st_eq_landau_n_rt_rp_r_4r196_t3 s b1 b1is o) (l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1))) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_micm0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1)) (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1) (l_e_st_eq_landau_n_rt_rp_r_aica r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_aica s b1 b1is))) i) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_negd b1)) (l_and (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_posd b1))).
-
-(* constant 4494 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).λa:l_and (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_negd b1).(l_andi (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_posin r a1 a1ir (l_ande1 (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_negd b1) a)) (l_e_st_eq_landau_n_rt_rp_r_negin s b1 b1is (l_ande2 (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_negd b1) a)) : l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg s)).
-
-(* constant 4495 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).λa:l_and (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_posd b1).(l_andi (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_negin r a1 a1ir (l_ande1 (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_posd b1) a)) (l_e_st_eq_landau_n_rt_rp_r_posin s b1 b1is (l_ande2 (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_posd b1) a)) : l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_pos s)).
-
-(* constant 4496 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).(l_or_th9 (l_and (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_negd b1)) (l_and (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_posd b1)) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_pos s)) (l_e_st_eq_landau_n_rt_rp_r_4r196_t8 r s a1 b1 a1ir b1is n o i) (λt:l_and (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_negd b1).l_e_st_eq_landau_n_rt_rp_r_4r196_t9 r s a1 b1 a1ir b1is n o i t) (λt:l_and (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_posd b1).l_e_st_eq_landau_n_rt_rp_r_4r196_t10 r s a1 b1 a1ir b1is n o i t) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_pos s))).
-
-(* constant 4497 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz196f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_pos s))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r196_t11 r s x y t u n o i) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_pos s))).
-
-(* constant 4498 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r s).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pnot0 (l_e_st_eq_landau_n_rt_rp_r_ts r s) p) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_ts01 r s t) : l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4499 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t13 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r s).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pnot0 (l_e_st_eq_landau_n_rt_rp_r_ts r s) p) (λt:l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_ts02 r s t) : l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4500 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t14 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r s).(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_absp (l_e_st_eq_landau_n_rt_rp_r_ts r s) p) (l_e_st_eq_landau_n_rt_rp_r_satz193 r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).
-
-(* constant 4501 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz196g ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r s).(l_e_st_eq_landau_n_rt_rp_r_satz196e r s (l_e_st_eq_landau_n_rt_rp_r_4r196_t12 r s p) (l_e_st_eq_landau_n_rt_rp_r_4r196_t13 r s p) (l_e_st_eq_landau_n_rt_rp_r_4r196_t14 r s p) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_pos s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_neg s))).
-
-(* constant 4502 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t15 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r s).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_nnot0 (l_e_st_eq_landau_n_rt_rp_r_ts r s) n) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_ts01 r s t) : l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4503 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t16 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r s).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_nnot0 (l_e_st_eq_landau_n_rt_rp_r_ts r s) n) (λt:l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_ts02 r s t) : l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4504 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t17 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r s).(l_e_st_eq_landau_n_rt_rp_r_satz177c (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_satz193a r s) (l_e_st_eq_landau_n_rt_rp_r_absn (l_e_st_eq_landau_n_rt_rp_r_ts r s) n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)))).
-
-(* constant 4505 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz196h ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r s).(l_e_st_eq_landau_n_rt_rp_r_satz196f r s (l_e_st_eq_landau_n_rt_rp_r_4r196_t15 r s n) (l_e_st_eq_landau_n_rt_rp_r_4r196_t16 r s n) (l_e_st_eq_landau_n_rt_rp_r_4r196_t17 r s n) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_pos s))).
-
-(* constant 4506 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r197_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_satzd197a a1 b1 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a1) b1) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a1 b1))).
-
-(* constant 4507 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r197_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a1) b1) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a1 b1)) (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_m0 r) s (l_e_st_eq_landau_n_rt_rp_m0d a1) b1 (l_e_st_eq_landau_n_rt_rp_r_micm0 r a1 a1ir) b1is) (l_e_st_eq_landau_n_rt_rp_r_micm0 (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is)) (l_e_st_eq_landau_n_rt_rp_r_4r197_t1 r s a1 b1 a1ir b1is) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s))).
-
-(* constant 4508 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz197a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r197_t2 r s x y t u) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s))).
-
-(* constant 4509 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz197b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 s) r) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts s r)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_comts r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_satz197a s r) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_ts s r) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_comts s r)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s))).
-
-(* constant 4510 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz197c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_satz197a r s) (l_e_st_eq_landau_n_rt_rp_r_satz197b r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 s))).
-
-(* constant 4511 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz197d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_satz197c r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s)).
-
-(* constant 4512 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz197e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_satz197a r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s)).
-
-(* constant 4513 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz197f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_satz197b r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 s))).
-
-(* constant 4514 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz198 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s))) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_satz197c r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s)) s r (l_e_st_eq_landau_n_rt_rp_r_satz177 s)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4515 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz198a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_satz198 r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s))).
-
-(* constant 4516 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr4_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_ptdpp a1 b1 (l_e_st_eq_landau_n_rt_rp_r_posex r a1 a1ir p) (l_e_st_eq_landau_n_rt_rp_r_posex s b1 b1is q) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_td a1 b1)).
-
-(* constant 4517 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr4_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_ivr4_t3 r s a1 b1 a1ir b1is p q) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4518 *)
-definition l_e_st_eq_landau_n_rt_rp_r_postspp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_ivr4_t4 r s x y t u p q) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4519 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr4_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λn:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_ntdpn a1 b1 (l_e_st_eq_landau_n_rt_rp_r_posex r a1 a1ir p) (l_e_st_eq_landau_n_rt_rp_r_negex s b1 b1is n) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_td a1 b1)).
-
-(* constant 4520 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr4_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λn:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_negin (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_ivr4_t5 r s a1 b1 a1ir b1is p n) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4521 *)
-definition l_e_st_eq_landau_n_rt_rp_r_negtspn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λn:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_ivr4_t6 r s x y t u p n) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4522 *)
-definition l_e_st_eq_landau_n_rt_rp_r_negtsnp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_r_isneg (l_e_st_eq_landau_n_rt_rp_r_ts s r) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_comts s r) (l_e_st_eq_landau_n_rt_rp_r_negtspn s r p n) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4523 *)
-definition l_e_st_eq_landau_n_rt_rp_r_postsnn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_ispos (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_satz198 r s) (l_e_st_eq_landau_n_rt_rp_r_postspp (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_satz176c r n) (l_e_st_eq_landau_n_rt_rp_r_satz176c s o)) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4524 *)
-definition l_e_st_eq_landau_n_rt_rp_r_possq ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_rapp r (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r r)) (λt:l_e_st_eq_landau_n_rt_rp_r_pos r.l_e_st_eq_landau_n_rt_rp_r_postspp r r t t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r r)) n) (λt:l_e_st_eq_landau_n_rt_rp_r_neg r.l_e_st_eq_landau_n_rt_rp_r_postsnn r r t t) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r r)).
-
-(* constant 4525 *)
-definition l_e_st_eq_landau_n_rt_rp_r_nnegsq ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r r))) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_0notn (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_satz192a r r t)) (λt:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_pnotn (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_possq r t)) : l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r r))).
-
-(* constant 4526 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r199_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).(l_e_st_eq_landau_n_rt_rp_satzd199 a2 b2 c2 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_td a2 b2) c2) (l_e_st_eq_landau_n_rt_rp_td a2 (l_e_st_eq_landau_n_rt_rp_td b2 c2))).
-
-(* constant 4527 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r199_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts r s) t) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_td a2 b2) c2) (l_e_st_eq_landau_n_rt_rp_td a2 (l_e_st_eq_landau_n_rt_rp_td b2 c2)) (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_ts r s) t (l_e_st_eq_landau_n_rt_rp_td a2 b2) c2 (l_e_st_eq_landau_n_rt_rp_r_tict r s a2 b2 a2ir b2is) c2it) (l_e_st_eq_landau_n_rt_rp_r_tict r (l_e_st_eq_landau_n_rt_rp_r_ts s t) a2 (l_e_st_eq_landau_n_rt_rp_td b2 c2) a2ir (l_e_st_eq_landau_n_rt_rp_r_tict s t b2 c2 b2is c2it)) (l_e_st_eq_landau_n_rt_rp_r_4r199_t1 r s t a2 b2 c2 a2ir b2is c2it) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts r s) t) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ts s t))).
-
-(* constant 4528 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz199 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts r s) t) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ts s t))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_4r199_t2 r s t x y z u v w) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts r s) t) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ts s t))).
-
-(* constant 4529 *)
-definition l_e_st_eq_landau_n_rt_rp_r_assts1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_satz199 r s t : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts r s) t) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ts s t))).
-
-(* constant 4530 *)
-definition l_e_st_eq_landau_n_rt_rp_r_assts2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts r s) t) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_satz199 r s t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts r s) t)).
-
-(* constant 4531 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r201_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).(l_e_st_eq_landau_n_rt_rp_satzd201 a2 b2 c2 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a2 (l_e_st_eq_landau_n_rt_rp_pd b2 c2)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a2 b2) (l_e_st_eq_landau_n_rt_rp_td a2 c2))).
-
-(* constant 4532 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r201_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t)) (l_e_st_eq_landau_n_rt_rp_td a2 (l_e_st_eq_landau_n_rt_rp_pd b2 c2)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a2 b2) (l_e_st_eq_landau_n_rt_rp_td a2 c2)) (l_e_st_eq_landau_n_rt_rp_r_tict r (l_e_st_eq_landau_n_rt_rp_r_pl s t) a2 (l_e_st_eq_landau_n_rt_rp_pd b2 c2) a2ir (l_e_st_eq_landau_n_rt_rp_r_picp s t b2 c2 b2is c2it)) (l_e_st_eq_landau_n_rt_rp_r_picp (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_td a2 b2) (l_e_st_eq_landau_n_rt_rp_td a2 c2) (l_e_st_eq_landau_n_rt_rp_r_tict r s a2 b2 a2ir b2is) (l_e_st_eq_landau_n_rt_rp_r_tict r t a2 c2 a2ir c2it)) (l_e_st_eq_landau_n_rt_rp_r_4r201_t1 r s t a2 b2 c2 a2ir b2is c2it) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t))).
-
-(* constant 4533 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz201 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_4r201_t2 r s t x y z u v w) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t))).
-
-(* constant 4534 *)
-definition l_e_st_eq_landau_n_rt_rp_r_disttp1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_satz201 t r s) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts t s) (l_e_st_eq_landau_n_rt_rp_r_ts s t) (l_e_st_eq_landau_n_rt_rp_r_comts t r) (l_e_st_eq_landau_n_rt_rp_r_comts t s)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t))).
-
-(* constant 4535 *)
-definition l_e_st_eq_landau_n_rt_rp_r_disttp2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_satz201 r s t : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t))).
-
-(* constant 4536 *)
-definition l_e_st_eq_landau_n_rt_rp_r_distpt1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_disttp1 r s t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_pl r s) t)).
-
-(* constant 4537 *)
-definition l_e_st_eq_landau_n_rt_rp_r_distpt2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t)) (l_e_st_eq_landau_n_rt_rp_r_disttp2 r s t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t)) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_pl s t))).
-
-(* constant 4538 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz202 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_mn s t)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 t))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t)) (l_e_st_eq_landau_n_rt_rp_r_disttp2 r s (l_e_st_eq_landau_n_rt_rp_r_m0 t)) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 t)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r t)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_satz197b r t)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_mn s t)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t))).
-
-(* constant 4539 *)
-definition l_e_st_eq_landau_n_rt_rp_r_disttm1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_mn r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 s) t)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_disttp1 r (l_e_st_eq_landau_n_rt_rp_r_m0 s) t) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 s) t) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_satz197a s t)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_mn r s) t) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t))).
-
-(* constant 4540 *)
-definition l_e_st_eq_landau_n_rt_rp_r_disttm2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_satz202 r s t : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_mn s t)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t))).
-
-(* constant 4541 *)
-definition l_e_st_eq_landau_n_rt_rp_r_distmt1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_mn r s) t) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_disttm1 r s t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_mn r s) t)).
-
-(* constant 4542 *)
-definition l_e_st_eq_landau_n_rt_rp_r_distmt2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_mn s t)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t)) (l_e_st_eq_landau_n_rt_rp_r_disttm2 r s t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t)) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_mn s t))).
-
-(* constant 4543 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz200 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_satz202 r s t : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_mn s t)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t))).
-
-(* constant 4544 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r203_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λp:l_e_st_eq_landau_n_rt_rp_r_pos t.(l_e_st_eq_landau_n_rt_rp_satzd203a a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_moreex r s a2 b2 a2ir b2is m) (l_e_st_eq_landau_n_rt_rp_r_posex t c2 c2it p) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_td a2 c2) (l_e_st_eq_landau_n_rt_rp_td b2 c2)).
-
-(* constant 4545 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r203_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λp:l_e_st_eq_landau_n_rt_rp_r_pos t.(l_e_st_eq_landau_n_rt_rp_r_morein (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t) (l_e_st_eq_landau_n_rt_rp_td a2 c2) (l_e_st_eq_landau_n_rt_rp_td b2 c2) (l_e_st_eq_landau_n_rt_rp_r_tict r t a2 c2 a2ir c2it) (l_e_st_eq_landau_n_rt_rp_r_tict s t b2 c2 b2is c2it) (l_e_st_eq_landau_n_rt_rp_r_4r203_t1 r s t a2 b2 c2 a2ir b2is c2it m p) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4546 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λp:l_e_st_eq_landau_n_rt_rp_r_pos t.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_4r203_t2 r s t x y z u v w m p) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4547 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λi:l_e_st_eq_landau_n_rt_rp_r_is t l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts02 r t i) (l_e_st_eq_landau_n_rt_rp_r_ts02 s t i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4548 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r203_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λn:l_e_st_eq_landau_n_rt_rp_r_neg t.(l_e_st_eq_landau_n_rt_rp_satzd203c a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_moreex r s a2 b2 a2ir b2is m) (l_e_st_eq_landau_n_rt_rp_r_negex t c2 c2it n) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_td a2 c2) (l_e_st_eq_landau_n_rt_rp_td b2 c2)).
-
-(* constant 4549 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r203_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λn:l_e_st_eq_landau_n_rt_rp_r_neg t.(l_e_st_eq_landau_n_rt_rp_r_lessin (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t) (l_e_st_eq_landau_n_rt_rp_td a2 c2) (l_e_st_eq_landau_n_rt_rp_td b2 c2) (l_e_st_eq_landau_n_rt_rp_r_tict r t a2 c2 a2ir c2it) (l_e_st_eq_landau_n_rt_rp_r_tict s t b2 c2 b2is c2it) (l_e_st_eq_landau_n_rt_rp_r_4r203_t3 r s t a2 b2 c2 a2ir b2is c2it m n) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4550 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λn:l_e_st_eq_landau_n_rt_rp_r_neg t.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_4r203_t4 r s t x y z u v w m n) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4551 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λp:l_e_st_eq_landau_n_rt_rp_r_pos t.(l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts s t) (l_e_st_eq_landau_n_rt_rp_r_ts t s) (l_e_st_eq_landau_n_rt_rp_r_comts r t) (l_e_st_eq_landau_n_rt_rp_r_comts s t) (l_e_st_eq_landau_n_rt_rp_r_satz203a r s t m p) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s)).
-
-(* constant 4552 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λi:l_e_st_eq_landau_n_rt_rp_r_is t l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 t r i) (l_e_st_eq_landau_n_rt_rp_r_ts01 t s i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s)).
-
-(* constant 4553 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λn:l_e_st_eq_landau_n_rt_rp_r_neg t.(l_e_st_eq_landau_n_rt_rp_r_isless12 (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts s t) (l_e_st_eq_landau_n_rt_rp_r_ts t s) (l_e_st_eq_landau_n_rt_rp_r_comts r t) (l_e_st_eq_landau_n_rt_rp_r_comts s t) (l_e_st_eq_landau_n_rt_rp_r_satz203c r s t m n) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s)).
-
-(* constant 4554 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203g ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λp:l_e_st_eq_landau_n_rt_rp_r_pos t.(l_e_st_eq_landau_n_rt_rp_r_lemma1 (l_e_st_eq_landau_n_rt_rp_r_ts s t) (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_satz203a s r t (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l) p) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4555 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203h ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λi:l_e_st_eq_landau_n_rt_rp_r_is t l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts02 r t i) (l_e_st_eq_landau_n_rt_rp_r_ts02 s t i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4556 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203j ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λn:l_e_st_eq_landau_n_rt_rp_r_neg t.(l_e_st_eq_landau_n_rt_rp_r_lemma2 (l_e_st_eq_landau_n_rt_rp_r_ts s t) (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_satz203c s r t (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l) n) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4557 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203k ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λp:l_e_st_eq_landau_n_rt_rp_r_pos t.(l_e_st_eq_landau_n_rt_rp_r_lemma1 (l_e_st_eq_landau_n_rt_rp_r_ts t s) (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_satz203d s r t (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l) p) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s)).
-
-(* constant 4558 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203l ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λi:l_e_st_eq_landau_n_rt_rp_r_is t l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 t r i) (l_e_st_eq_landau_n_rt_rp_r_ts01 t s i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s)).
-
-(* constant 4559 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203m ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λn:l_e_st_eq_landau_n_rt_rp_r_neg t.(l_e_st_eq_landau_n_rt_rp_r_lemma2 (l_e_st_eq_landau_n_rt_rp_r_ts t s) (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_satz203f s r t (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l) n) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s)).
-
-(* constant 4560 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn1:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_zero a0) (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) n1 (λt:l_e_st_eq_landau_n_rt_rp_zero a0.l_e_st_eq_landau_n_rt_rp_r_0in r a0 a0ir t) : l_not (l_e_st_eq_landau_n_rt_rp_zero a0)).
-
-(* constant 4561 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa3:l_e_st_eq_landau_n_rt_rp_dif.λb3:l_e_st_eq_landau_n_rt_rp_dif.λc3:l_e_st_eq_landau_n_rt_rp_dif.λd3:l_e_st_eq_landau_n_rt_rp_dif.λa3ir:l_e_st_eq_landau_n_rt_rp_r_inn a3 (l_e_st_eq_landau_n_rt_rp_r_class r).λb3is:l_e_st_eq_landau_n_rt_rp_r_inn b3 (l_e_st_eq_landau_n_rt_rp_r_class s).λc3it:l_e_st_eq_landau_n_rt_rp_r_inn c3 (l_e_st_eq_landau_n_rt_rp_r_class t).λd3iu:l_e_st_eq_landau_n_rt_rp_r_inn d3 (l_e_st_eq_landau_n_rt_rp_r_class u).λn1:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s t) r.λj:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s u) r.(l_e_st_eq_landau_n_rt_rp_satzd204b a3 b3 (l_e_st_eq_landau_n_rt_rp_r_4r204_t1 s b3 b3is n1) c3 d3 (l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_ts s t) r (l_e_st_eq_landau_n_rt_rp_td b3 c3) a3 (l_e_st_eq_landau_n_rt_rp_r_tict s t b3 c3 b3is c3it) a3ir i) (l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_ts s u) r (l_e_st_eq_landau_n_rt_rp_td b3 d3) a3 (l_e_st_eq_landau_n_rt_rp_r_tict s u b3 d3 b3is d3iu) a3ir j) : l_e_st_eq_landau_n_rt_rp_eq c3 d3).
-
-(* constant 4562 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa3:l_e_st_eq_landau_n_rt_rp_dif.λb3:l_e_st_eq_landau_n_rt_rp_dif.λc3:l_e_st_eq_landau_n_rt_rp_dif.λd3:l_e_st_eq_landau_n_rt_rp_dif.λa3ir:l_e_st_eq_landau_n_rt_rp_r_inn a3 (l_e_st_eq_landau_n_rt_rp_r_class r).λb3is:l_e_st_eq_landau_n_rt_rp_r_inn b3 (l_e_st_eq_landau_n_rt_rp_r_class s).λc3it:l_e_st_eq_landau_n_rt_rp_r_inn c3 (l_e_st_eq_landau_n_rt_rp_r_class t).λd3iu:l_e_st_eq_landau_n_rt_rp_r_inn d3 (l_e_st_eq_landau_n_rt_rp_r_class u).λn1:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s t) r.λj:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s u) r.(l_e_st_eq_landau_n_rt_rp_r_isin t u c3 d3 c3it d3iu (l_e_st_eq_landau_n_rt_rp_r_4r204_t2 r s t u a3 b3 c3 d3 a3ir b3is c3it d3iu n1 i j) : l_e_st_eq_landau_n_rt_rp_r_is t u).
-
-(* constant 4563 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz204b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r.λj:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s y) r.(l_e_st_eq_landau_n_rt_rp_r_realapp4 r s x y (l_e_st_eq_landau_n_rt_rp_r_is x y) (λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_dif.λv:l_e_st_eq_landau_n_rt_rp_dif.λw:l_e_st_eq_landau_n_rt_rp_dif.λzi:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class r).λui:l_e_st_eq_landau_n_rt_rp_r_inn u (l_e_st_eq_landau_n_rt_rp_r_class s).λvi:l_e_st_eq_landau_n_rt_rp_r_inn v (l_e_st_eq_landau_n_rt_rp_r_class x).λwi:l_e_st_eq_landau_n_rt_rp_r_inn w (l_e_st_eq_landau_n_rt_rp_r_class y).l_e_st_eq_landau_n_rt_rp_r_4r204_t3 r s x y z u v w zi ui vi wi n i j) : l_e_st_eq_landau_n_rt_rp_r_is x y).
-
-(* constant 4564 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn1:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_satzd204a a1 b1 (l_e_st_eq_landau_n_rt_rp_r_4r204_t1 s b1 b1is n1) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b1 x) a1)).
-
-(* constant 4565 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_ar ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn1:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λa:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b1 a) a1.(l_e_st_eq_landau_n_rt_rp_r_realof a : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4566 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn1:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λa:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b1 a) a1.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_4r204_ar r s a1 b1 a1ir b1is n1 a e)) r (l_e_st_eq_landau_n_rt_rp_td b1 a) a1 (l_e_st_eq_landau_n_rt_rp_r_tict s (l_e_st_eq_landau_n_rt_rp_r_4r204_ar r s a1 b1 a1ir b1is n1 a e) b1 a b1is (l_e_st_eq_landau_n_rt_rp_r_innclass a)) a1ir e : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_4r204_ar r s a1 b1 a1ir b1is n1 a e)) r).
-
-(* constant 4567 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn1:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λa:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b1 a) a1.(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r) (l_e_st_eq_landau_n_rt_rp_r_4r204_ar r s a1 b1 a1ir b1is n1 a e) (l_e_st_eq_landau_n_rt_rp_r_4r204_t5 r s a1 b1 a1ir b1is n1 a e) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r)).
-
-(* constant 4568 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn1:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b1 x) a1) (l_e_st_eq_landau_n_rt_rp_r_4r204_t4 r s a1 b1 a1ir b1is n1) (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b1 x) a1.l_e_st_eq_landau_n_rt_rp_r_4r204_t6 r s a1 b1 a1ir b1is n1 x t) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r)).
-
-(* constant 4569 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz204a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r204_t7 r s x y t u n) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r)).
-
-(* constant 4570 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz204 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_onei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r.λu:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s y) r.l_e_st_eq_landau_n_rt_rp_r_satz204b r s n x y t u) (l_e_st_eq_landau_n_rt_rp_r_satz204a r s n) : l_e_st_eq_landau_n_rt_rp_r_one (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r)).
-
-(* constant 4571 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ov ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_ind l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r) (l_e_st_eq_landau_n_rt_rp_r_satz204 r s n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4572 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz204c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_oneax l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r) (l_e_st_eq_landau_n_rt_rp_r_satz204 r s n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) r).
-
-(* constant 4573 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz204d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) r (l_e_st_eq_landau_n_rt_rp_r_satz204c r s n) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_ov r s n))).
-
-(* constant 4574 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz204e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ov r s n) s) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) r (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_ov r s n) s) (l_e_st_eq_landau_n_rt_rp_r_satz204c r s n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ov r s n) s) r).
-
-(* constant 4575 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz204f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ov r s n) s) r (l_e_st_eq_landau_n_rt_rp_r_satz204e r s n) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ov r s n) s)).
-
-(* constant 4576 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz204g ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λx:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r.(l_e_st_eq_landau_n_rt_rp_r_satz204b r s n x (l_e_st_eq_landau_n_rt_rp_r_ov r s n) i (l_e_st_eq_landau_n_rt_rp_r_satz204c r s n) : l_e_st_eq_landau_n_rt_rp_r_is x (l_e_st_eq_landau_n_rt_rp_r_ov r s n)).
-
-(* constant 4577 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_ros ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_ov r s n : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4578 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_ispos r (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)) (l_e_st_eq_landau_n_rt_rp_r_satz204d r s n) p : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))).
-
-(* constant 4579 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_and_th1 (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)) (l_e_st_eq_landau_n_rt_rp_r_pnotn s q) : l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)))).
-
-(* constant 4580 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_ore1 (l_and (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))) (l_e_st_eq_landau_n_rt_rp_r_satz196g s (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n) (l_e_st_eq_landau_n_rt_rp_r_4r204_t8 r s n p)) (l_e_st_eq_landau_n_rt_rp_r_4r204_t9 r s n p q) : l_and (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))).
-
-(* constant 4581 *)
-definition l_e_st_eq_landau_n_rt_rp_r_posovpp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) (l_e_st_eq_landau_n_rt_rp_r_4r204_t10 r s n p q) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ov r s n)).
-
-(* constant 4582 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λm:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_and_th1 (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)) (l_e_st_eq_landau_n_rt_rp_r_nnotp s m) : l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)))).
-
-(* constant 4583 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λm:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_ore2 (l_and (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))) (l_e_st_eq_landau_n_rt_rp_r_satz196g s (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n) (l_e_st_eq_landau_n_rt_rp_r_4r204_t8 r s n p)) (l_e_st_eq_landau_n_rt_rp_r_4r204_t11 r s n p m) : l_and (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))).
-
-(* constant 4584 *)
-definition l_e_st_eq_landau_n_rt_rp_r_negovpn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λm:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) (l_e_st_eq_landau_n_rt_rp_r_4r204_t12 r s n p m) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ov r s n)).
-
-(* constant 4585 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t13 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λm:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_isneg r (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)) (l_e_st_eq_landau_n_rt_rp_r_satz204d r s n) m : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))).
-
-(* constant 4586 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t14 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λm:l_e_st_eq_landau_n_rt_rp_r_neg r.λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_and_th1 (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)) (l_e_st_eq_landau_n_rt_rp_r_pnotn s p) : l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)))).
-
-(* constant 4587 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t15 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λm:l_e_st_eq_landau_n_rt_rp_r_neg r.λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_ore1 (l_and (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))) (l_e_st_eq_landau_n_rt_rp_r_satz196h s (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n) (l_e_st_eq_landau_n_rt_rp_r_4r204_t13 r s n m)) (l_e_st_eq_landau_n_rt_rp_r_4r204_t14 r s n m p) : l_and (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))).
-
-(* constant 4588 *)
-definition l_e_st_eq_landau_n_rt_rp_r_negovnp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λm:l_e_st_eq_landau_n_rt_rp_r_neg r.λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) (l_e_st_eq_landau_n_rt_rp_r_4r204_t15 r s n m p) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ov r s n)).
-
-(* constant 4589 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t16 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λm:l_e_st_eq_landau_n_rt_rp_r_neg r.λl:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_and_th1 (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)) (l_e_st_eq_landau_n_rt_rp_r_nnotp s l) : l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)))).
-
-(* constant 4590 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t17 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λm:l_e_st_eq_landau_n_rt_rp_r_neg r.λl:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_ore2 (l_and (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))) (l_e_st_eq_landau_n_rt_rp_r_satz196h s (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n) (l_e_st_eq_landau_n_rt_rp_r_4r204_t13 r s n m)) (l_e_st_eq_landau_n_rt_rp_r_4r204_t16 r s n m l) : l_and (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))).
-
-(* constant 4591 *)
-definition l_e_st_eq_landau_n_rt_rp_r_posovnn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λm:l_e_st_eq_landau_n_rt_rp_r_neg r.λl:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) (l_e_st_eq_landau_n_rt_rp_r_4r204_t17 r s n m l) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ov r s n)).
-
-(* constant 4592 *)
-definition l_e_st_eq_landau_n_rt_rp_r_morerpep ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r0 s0.(l_e_st_eq_landau_n_rt_rp_r_morein (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp s0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp s0)) (l_e_st_eq_landau_n_rt_rp_morerpepd r0 s0 m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)).
-
-(* constant 4593 *)
-definition l_e_st_eq_landau_n_rt_rp_r_morerpip ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).(l_e_st_eq_landau_n_rt_rp_morerpipd r0 s0 (l_e_st_eq_landau_n_rt_rp_r_moreex (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp s0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp s0)) m) : l_e_st_eq_landau_n_rt_rp_more r0 s0).
-
-(* constant 4594 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessrpep ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r0 s0.(l_e_st_eq_landau_n_rt_rp_r_lemma1 (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_morerpep s0 r0 (l_e_st_eq_landau_n_rt_rp_satz122 r0 s0 l)) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)).
-
-(* constant 4595 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessrpip ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).(l_e_st_eq_landau_n_rt_rp_satz121 s0 r0 (l_e_st_eq_landau_n_rt_rp_r_morerpip s0 r0 (l_e_st_eq_landau_n_rt_rp_r_lemma2 (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) l)) : l_e_st_eq_landau_n_rt_rp_less r0 s0).
-
-(* constant 4596 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr5_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_ismore12 r (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp r p)) s (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp s q)) (l_e_st_eq_landau_n_rt_rp_r_isprp1 r p) (l_e_st_eq_landau_n_rt_rp_r_isprp1 s q) m : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp r p)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp s q))).
-
-(* constant 4597 *)
-definition l_e_st_eq_landau_n_rt_rp_r_moreperp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_morerpip (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s q) (l_e_st_eq_landau_n_rt_rp_r_ivr5_t1 r s p q m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s q)).
-
-(* constant 4598 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr5_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s q).(l_e_st_eq_landau_n_rt_rp_r_morerpep (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s q) m : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp r p)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp s q))).
-
-(* constant 4599 *)
-definition l_e_st_eq_landau_n_rt_rp_r_morepirp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s q).(l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp r p)) r (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp s q)) s (l_e_st_eq_landau_n_rt_rp_r_isprp2 r p) (l_e_st_eq_landau_n_rt_rp_r_isprp2 s q) (l_e_st_eq_landau_n_rt_rp_r_ivr5_t2 r s p q m) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4600 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessperp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_r_rpofp s q) (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_moreperp s r q p (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s q)).
-
-(* constant 4601 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lesspirp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s q).(l_e_st_eq_landau_n_rt_rp_r_lemma1 s r (l_e_st_eq_landau_n_rt_rp_r_morepirp s r q p (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s q) l)) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4602 *)
-definition l_e_st_eq_landau_n_rt_rp_r_s01 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_setof l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_lessis x r) : l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4603 *)
-definition l_e_st_eq_landau_n_rt_rp_r_s02 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_setof l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_more x r) : l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4604 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s01 r)).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_lessis s r) (l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s01 r)) n (λt:l_e_st_eq_landau_n_rt_rp_r_lessis s r.l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_lessis x r) s t) : l_not (l_e_st_eq_landau_n_rt_rp_r_lessis s r)).
-
-(* constant 4605 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s01 r)).(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_more x r) s (l_e_st_eq_landau_n_rt_rp_r_satz167k s r (l_e_st_eq_landau_n_rt_rp_r_5r205_t1 r s n)) : l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s02 r)).
-
-(* constant 4606 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb00 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_not (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s01 r)).l_e_st_eq_landau_n_rt_rp_r_5r205_t2 r x t : l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s01 r)) (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s02 r)))).
-
-(* constant 4607 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_lessis x r) r (l_e_st_eq_landau_n_rt_rp_r_lessisi2 r r (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) : l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_s01 r)).
-
-(* constant 4608 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb01a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_nonemptyi l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_s01 r) r (l_e_st_eq_landau_n_rt_rp_r_5r205_t3 r) : l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_s01 r)).
-
-(* constant 4609 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_ismore2 (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_0) r (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl02 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_satz188k l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0 r (l_e_st_eq_landau_n_rt_rp_r_satz169a l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_pos1)) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_1rl) r).
-
-(* constant 4610 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_more x r) (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_5r205_t4 r) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_s02 r)).
-
-(* constant 4611 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb01b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_nonemptyi l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_s02 r) (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_5r205_t5 r) : l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_s02 r)).
-
-(* constant 4612 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s01 r).λt:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_in t (l_e_st_eq_landau_n_rt_rp_r_s02 r).(l_e_st_eq_landau_n_rt_rp_r_satz172a s r t (l_e_st_estie l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_lessis x r) s i) (l_e_st_eq_landau_n_rt_rp_r_lemma1 t r (l_e_st_estie l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_more x r) t j)) : l_e_st_eq_landau_n_rt_rp_r_less s t).
-
-(* constant 4613 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb02 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s01 r).λy:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_in y (l_e_st_eq_landau_n_rt_rp_r_s02 r).l_e_st_eq_landau_n_rt_rp_r_5r205_t6 r x t y u : l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s01 r).l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y (l_e_st_eq_landau_n_rt_rp_r_s02 r).l_e_st_eq_landau_n_rt_rp_r_less x y))).
-
-(* constant 4614 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb03a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s r.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_lessis x r) s (l_e_st_eq_landau_n_rt_rp_r_lessisi1 s r l) : l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s01 r)).
-
-(* constant 4615 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb03b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s r.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_more x r) s m : l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s02 r)).
-
-(* constant 4616 *)
-definition l_e_st_eq_landau_n_rt_rp_r_s11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_setof l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_less x r) : l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4617 *)
-definition l_e_st_eq_landau_n_rt_rp_r_s12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_setof l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_moreis x r) : l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4618 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s11 r)).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_less s r) (l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s11 r)) n (λt:l_e_st_eq_landau_n_rt_rp_r_less s r.l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_less x r) s t) : l_not (l_e_st_eq_landau_n_rt_rp_r_less s r)).
-
-(* constant 4619 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s11 r)).(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_moreis x r) s (l_e_st_eq_landau_n_rt_rp_r_satz167f s r (l_e_st_eq_landau_n_rt_rp_r_5r205_t7 r s n)) : l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s12 r)).
-
-(* constant 4620 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_not (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s11 r)).l_e_st_eq_landau_n_rt_rp_r_5r205_t8 r x t : l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s11 r)) (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s12 r)))).
-
-(* constant 4621 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_isless2 (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_0) r (l_e_st_eq_landau_n_rt_rp_r_mn r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl02 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_satz188m (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) l_e_st_eq_landau_n_rt_rp_r_0 r (l_e_st_eq_landau_n_rt_rp_r_satz169c (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_satz176a l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_pos1))) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_mn r l_e_st_eq_landau_n_rt_rp_r_1rl) r).
-
-(* constant 4622 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_less x r) (l_e_st_eq_landau_n_rt_rp_r_mn r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_5r205_t9 r) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_mn r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_s11 r)).
-
-(* constant 4623 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb11a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_nonemptyi l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_s11 r) (l_e_st_eq_landau_n_rt_rp_r_mn r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_5r205_t10 r) : l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_s11 r)).
-
-(* constant 4624 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_moreis x r) r (l_e_st_eq_landau_n_rt_rp_r_moreisi2 r r (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) : l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_s12 r)).
-
-(* constant 4625 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb11b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_nonemptyi l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_s12 r) r (l_e_st_eq_landau_n_rt_rp_r_5r205_t11 r) : l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_s12 r)).
-
-(* constant 4626 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s11 r).λt:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_in t (l_e_st_eq_landau_n_rt_rp_r_s12 r).(l_e_st_eq_landau_n_rt_rp_r_satz172b s r t (l_e_st_estie l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_less x r) s i) (l_e_st_eq_landau_n_rt_rp_r_satz168a t r (l_e_st_estie l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_moreis x r) t j)) : l_e_st_eq_landau_n_rt_rp_r_less s t).
-
-(* constant 4627 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s11 r).λy:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_in y (l_e_st_eq_landau_n_rt_rp_r_s12 r).l_e_st_eq_landau_n_rt_rp_r_5r205_t12 r x t y u : l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s11 r).l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y (l_e_st_eq_landau_n_rt_rp_r_s12 r).l_e_st_eq_landau_n_rt_rp_r_less x y))).
-
-(* constant 4628 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb13a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s r.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_less x r) s l : l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s11 r)).
-
-(* constant 4629 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb13b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s r.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_moreis x r) s (l_e_st_eq_landau_n_rt_rp_r_moreisi1 s r m) : l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s12 r)).
-
-(* constant 4630 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2rl ≝ (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4631 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pos2 ≝ (l_e_st_eq_landau_n_rt_rp_r_pospl l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_pos1 l_e_st_eq_landau_n_rt_rp_r_pos1 : l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_2rl).
-
-(* constant 4632 *)
-definition l_e_st_eq_landau_n_rt_rp_r_half ≝ (l_e_st_eq_landau_n_rt_rp_r_ov l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_2rl (l_e_st_eq_landau_n_rt_rp_r_pnot0 l_e_st_eq_landau_n_rt_rp_r_2rl l_e_st_eq_landau_n_rt_rp_r_pos2) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4633 *)
-definition l_e_st_eq_landau_n_rt_rp_r_poshalf ≝ (l_e_st_eq_landau_n_rt_rp_r_posovpp l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_2rl (l_e_st_eq_landau_n_rt_rp_r_pnot0 l_e_st_eq_landau_n_rt_rp_r_2rl l_e_st_eq_landau_n_rt_rp_r_pos2) l_e_st_eq_landau_n_rt_rp_r_pos1 l_e_st_eq_landau_n_rt_rp_r_pos2 : l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_half).
-
-(* constant 4634 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr5_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl r r) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_2rl r) (l_e_st_eq_landau_n_rt_rp_r_ispl12 r (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r) r (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_satz195c r) (l_e_st_eq_landau_n_rt_rp_r_satz195c r)) (l_e_st_eq_landau_n_rt_rp_r_distpt1 l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r r) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_2rl r)).
-
-(* constant 4635 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr5_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r r)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_2rl r)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half l_e_st_eq_landau_n_rt_rp_r_2rl) r) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r) r (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_pl r r) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_2rl r) l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_ivr5_t3 r)) (l_e_st_eq_landau_n_rt_rp_r_assts2 l_e_st_eq_landau_n_rt_rp_r_half l_e_st_eq_landau_n_rt_rp_r_2rl r) (l_e_st_eq_landau_n_rt_rp_r_ists1 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half l_e_st_eq_landau_n_rt_rp_r_2rl) l_e_st_eq_landau_n_rt_rp_r_1rl r (l_e_st_eq_landau_n_rt_rp_r_satz204e l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_2rl (l_e_st_eq_landau_n_rt_rp_r_pnot0 l_e_st_eq_landau_n_rt_rp_r_2rl l_e_st_eq_landau_n_rt_rp_r_pos2))) (l_e_st_eq_landau_n_rt_rp_r_satz195b r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r r)) r).
-
-(* constant 4636 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr5_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_satz203k (l_e_st_eq_landau_n_rt_rp_r_pl r r) (l_e_st_eq_landau_n_rt_rp_r_pl r s) l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_satz188m r s r l) l_e_st_eq_landau_n_rt_rp_r_poshalf : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r r)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r s))).
-
-(* constant 4637 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_isless1 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r r)) r (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_ivr5_t4 r) (l_e_st_eq_landau_n_rt_rp_r_ivr5_t5 r s l) : l_e_st_eq_landau_n_rt_rp_r_less r (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r s))).
-
-(* constant 4638 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr5_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_satz203k (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl s s) l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_satz188f r s s l) l_e_st_eq_landau_n_rt_rp_r_poshalf : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl s s))).
-
-(* constant 4639 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_isless2 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl s s)) s (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_ivr5_t4 s) (l_e_st_eq_landau_n_rt_rp_r_ivr5_t6 r s l) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r s)) s).
-
-(* constant 4640 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_satz169b s (l_e_st_eq_landau_n_rt_rp_r_trmore s r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l) (l_e_st_eq_landau_n_rt_rp_r_satz169a r p)) : l_e_st_eq_landau_n_rt_rp_r_pos s).
-
-(* constant 4641 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_less x r.l_e_st_eq_landau_n_rt_rp_r_in x s1) : Prop).
-
-(* constant 4642 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_more x r.l_e_st_eq_landau_n_rt_rp_r_in x s2) : Prop).
-
-(* constant 4643 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_and (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 s1 s2 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 s1 s2 r) : Prop).
-
-(* constant 4644 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_mxy ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.λl:l_e_st_eq_landau_n_rt_rp_r_less x y.(l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl x y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4645 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t13 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.λl:l_e_st_eq_landau_n_rt_rp_r_less x y.(l_e_st_eq_landau_n_rt_rp_r_lemma2 x (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_lemma3 x y l) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) x).
-
-(* constant 4646 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t14 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.λl:l_e_st_eq_landau_n_rt_rp_r_less x y.(l_e_st_eq_landau_n_rt_rp_r_lemma4 x y l : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) y).
-
-(* constant 4647 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t15 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.λl:l_e_st_eq_landau_n_rt_rp_r_less x y.(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 s1 s2 y) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 s1 s2 y) py (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_t14 s1 s2 p0 p1a p1b p2 x y px py l) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) s1).
-
-(* constant 4648 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t16 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.λl:l_e_st_eq_landau_n_rt_rp_r_less x y.(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 s1 s2 x) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 s1 s2 x) px (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_t13 s1 s2 p0 p1a p1b p2 x y px py l) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) s2).
-
-(* constant 4649 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t17 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.λl:l_e_st_eq_landau_n_rt_rp_r_less x y.(p2 (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_t15 s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_t16 s1 s2 p0 p1a p1b p2 x y px py l) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l)).
-
-(* constant 4650 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t18 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.λl:l_e_st_eq_landau_n_rt_rp_r_less x y.(l_ec3e31 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l)) (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l)) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l)) (l_e_st_eq_landau_n_rt_rp_r_satz167b (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l)) (l_e_st_eq_landau_n_rt_rp_r_5r205_t17 s1 s2 p0 p1a p1b p2 x y px py l) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l)) : l_con).
-
-(* constant 4651 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t19 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.(λt:l_e_st_eq_landau_n_rt_rp_r_less x y.l_e_st_eq_landau_n_rt_rp_r_5r205_t18 s1 s2 p0 p1a p1b p2 x y px py t : l_not (l_e_st_eq_landau_n_rt_rp_r_less x y)).
-
-(* constant 4652 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t20 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.(λt:l_e_st_eq_landau_n_rt_rp_r_more x y.l_e_st_eq_landau_n_rt_rp_r_5r205_t18 s1 s2 p0 p1a p1b p2 y x py px (l_e_st_eq_landau_n_rt_rp_r_lemma1 x y t) : l_not (l_e_st_eq_landau_n_rt_rp_r_more x y)).
-
-(* constant 4653 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t21 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.(l_or3e1 (l_e_st_eq_landau_n_rt_rp_r_is x y) (l_e_st_eq_landau_n_rt_rp_r_more x y) (l_e_st_eq_landau_n_rt_rp_r_less x y) (l_e_st_eq_landau_n_rt_rp_r_satz167a x y) (l_e_st_eq_landau_n_rt_rp_r_5r205_t20 s1 s2 p0 p1a p1b p2 x y px py) (l_e_st_eq_landau_n_rt_rp_r_5r205_t19 s1 s2 p0 p1a p1b p2 x y px py) : l_e_st_eq_landau_n_rt_rp_r_is x y).
-
-(* constant 4654 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t22 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).(λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λu:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.l_e_st_eq_landau_n_rt_rp_r_5r205_t21 s1 s2 p0 p1a p1b p2 x y t u : l_e_amone l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4655 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t23 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1) a : l_e_st_eq_landau_n_rt_rp_r_pos r).
-
-(* constant 4656 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t24 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1) a : l_e_st_eq_landau_n_rt_rp_r_in r s1).
-
-(* constant 4657 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_setof l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp x) s1) : l_e_st_set l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4658 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_setof l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp x) s2) : l_e_st_set l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4659 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t25 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λr0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) s1.(l_e_st_estii l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp x) s1) r0 i : l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4660 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t26 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λr0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a).(l_e_st_estie l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp x) s1) r0 i : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) s1).
-
-(* constant 4661 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t27 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λr0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) s2.(l_e_st_estii l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp x) s2) r0 i : l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4662 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t28 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λr0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a).(l_e_st_estie l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp x) s2) r0 i : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) s2).
-
-(* constant 4663 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t29 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λr0:l_e_st_eq_landau_n_rt_cut.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) s1) (l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) s2) (l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a)) (l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a)) (p0 (l_e_st_eq_landau_n_rt_rp_r_pofrp r0)) (λt:l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) s1.l_e_st_eq_landau_n_rt_rp_r_5r205_t25 s1 s2 p0 p1a p1b p2 case1 r a r0 t) (λt:l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) s2.l_e_st_eq_landau_n_rt_rp_r_5r205_t27 s1 s2 p0 p1a p1b p2 case1 r a r0 t) : l_or (l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a)) (l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a))).
-
-(* constant 4664 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_pr1 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_eq_landau_n_rt_rp_r_rpofp r (l_e_st_eq_landau_n_rt_rp_r_5r205_t23 s1 s2 p0 p1a p1b p2 case1 r a) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4665 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t30 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s1) r (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_pr1 s1 s2 p0 p1a p1b p2 case1 r a)) (l_e_st_eq_landau_n_rt_rp_r_5r205_t24 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_isprp1 r (l_e_st_eq_landau_n_rt_rp_r_5r205_t23 s1 s2 p0 p1a p1b p2 case1 r a)) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_pr1 s1 s2 p0 p1a p1b p2 case1 r a)) s1).
-
-(* constant 4666 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t31 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_nonemptyi l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_pr1 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_t25 s1 s2 p0 p1a p1b p2 case1 r a (l_e_st_eq_landau_n_rt_rp_r_5r205_pr1 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_t30 s1 s2 p0 p1a p1b p2 case1 r a)) : l_e_st_nonempty l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4667 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t32 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in s s2.(p2 r (l_e_st_eq_landau_n_rt_rp_r_5r205_t24 s1 s2 p0 p1a p1b p2 case1 r a) s i : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4668 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t33 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in s s2.(l_e_st_eq_landau_n_rt_rp_r_lemma5 r s (l_e_st_eq_landau_n_rt_rp_r_5r205_t32 s1 s2 p0 p1a p1b p2 case1 r a s i) (l_e_st_eq_landau_n_rt_rp_r_5r205_t23 s1 s2 p0 p1a p1b p2 case1 r a) : l_e_st_eq_landau_n_rt_rp_r_pos s).
-
-(* constant 4669 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_ps1 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in s s2.(l_e_st_eq_landau_n_rt_rp_r_rpofp s (l_e_st_eq_landau_n_rt_rp_r_5r205_t33 s1 s2 p0 p1a p1b p2 case1 r a s i) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4670 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t34 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in s s2.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s2) s (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_ps1 s1 s2 p0 p1a p1b p2 case1 r a s i)) i (l_e_st_eq_landau_n_rt_rp_r_isprp1 s (l_e_st_eq_landau_n_rt_rp_r_5r205_t33 s1 s2 p0 p1a p1b p2 case1 r a s i)) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_ps1 s1 s2 p0 p1a p1b p2 case1 r a s i)) s2).
-
-(* constant 4671 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t35 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in s s2.(l_e_st_nonemptyi l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_ps1 s1 s2 p0 p1a p1b p2 case1 r a s i) (l_e_st_eq_landau_n_rt_rp_r_5r205_t27 s1 s2 p0 p1a p1b p2 case1 r a (l_e_st_eq_landau_n_rt_rp_r_5r205_ps1 s1 s2 p0 p1a p1b p2 case1 r a s i) (l_e_st_eq_landau_n_rt_rp_r_5r205_t34 s1 s2 p0 p1a p1b p2 case1 r a s i)) : l_e_st_nonempty l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4672 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t36 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_nonemptyapp l_e_st_eq_landau_n_rt_rp_r_real s2 p1b (l_e_st_nonempty l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a)) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_in x s2.l_e_st_eq_landau_n_rt_rp_r_5r205_t35 s1 s2 p0 p1a p1b p2 case1 r a x t) : l_e_st_nonempty l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4673 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t37 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λr0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a).λs0:l_e_st_eq_landau_n_rt_cut.λj:l_e_st_eq_landau_n_rt_rp_in s0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a).(p2 (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_5r205_t26 s1 s2 p0 p1a p1b p2 case1 r a r0 i) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_st_eq_landau_n_rt_rp_r_5r205_t28 s1 s2 p0 p1a p1b p2 case1 r a s0 j) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)).
-
-(* constant 4674 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t38 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λr0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a).λs0:l_e_st_eq_landau_n_rt_cut.λj:l_e_st_eq_landau_n_rt_rp_in s0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a).(l_e_st_eq_landau_n_rt_rp_r_lessrpip r0 s0 (l_e_st_eq_landau_n_rt_rp_r_5r205_t37 s1 s2 p0 p1a p1b p2 case1 r a r0 i s0 j) : l_e_st_eq_landau_n_rt_rp_less r0 s0).
-
-(* constant 4675 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_stc ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_eq_landau_n_rt_rp_schnitt (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a) (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_5r205_t29 s1 s2 p0 p1a p1b p2 case1 r a x) (l_e_st_eq_landau_n_rt_rp_r_5r205_t31 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_t36 s1 s2 p0 p1a p1b p2 case1 r a) (λx:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a).λy:l_e_st_eq_landau_n_rt_cut.λu:l_e_st_eq_landau_n_rt_rp_in y (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a).l_e_st_eq_landau_n_rt_rp_r_5r205_t38 s1 s2 p0 p1a p1b p2 case1 r a x t y u) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4676 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t39 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_eq_landau_n_rt_rp_satzp205a (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a) (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_5r205_t29 s1 s2 p0 p1a p1b p2 case1 r a x) (l_e_st_eq_landau_n_rt_rp_r_5r205_t31 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_t36 s1 s2 p0 p1a p1b p2 case1 r a) (λx:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a).λy:l_e_st_eq_landau_n_rt_cut.λu:l_e_st_eq_landau_n_rt_rp_in y (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a).l_e_st_eq_landau_n_rt_rp_r_5r205_t38 s1 s2 p0 p1a p1b p2 case1 r a x t y u) : l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_less x (l_e_st_eq_landau_n_rt_rp_r_5r205_stc s1 s2 p0 p1a p1b p2 case1 r a).l_e_st_eq_landau_n_rt_rp_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a))).
-
-(* constant 4677 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t40 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_eq_landau_n_rt_rp_satzp205b (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a) (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_5r205_t29 s1 s2 p0 p1a p1b p2 case1 r a x) (l_e_st_eq_landau_n_rt_rp_r_5r205_t31 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_t36 s1 s2 p0 p1a p1b p2 case1 r a) (λx:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a).λy:l_e_st_eq_landau_n_rt_cut.λu:l_e_st_eq_landau_n_rt_rp_in y (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a).l_e_st_eq_landau_n_rt_rp_r_5r205_t38 s1 s2 p0 p1a p1b p2 case1 r a x t y u) : l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_more x (l_e_st_eq_landau_n_rt_rp_r_5r205_stc s1 s2 p0 p1a p1b p2 case1 r a).l_e_st_eq_landau_n_rt_rp_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a))).
-
-(* constant 4678 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_stp ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_stc s1 s2 p0 p1a p1b p2 case1 r a) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4679 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t41 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_eq_landau_n_rt_rp_r_posi (l_e_st_eq_landau_n_rt_rp_r_5r205_stc s1 s2 p0 p1a p1b p2 case1 r a) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4680 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_ps2 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_r_rpofp s p : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4681 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t42 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_r_lessrpip (l_e_st_eq_landau_n_rt_rp_r_5r205_ps2 s1 s2 p0 p1a p1b p2 case1 r a s l p) (l_e_st_eq_landau_n_rt_rp_r_5r205_stc s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_isless1 s (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_ps2 s1 s2 p0 p1a p1b p2 case1 r a s l p)) (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_isprp1 s p) l) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_r_5r205_ps2 s1 s2 p0 p1a p1b p2 case1 r a s l p) (l_e_st_eq_landau_n_rt_rp_r_5r205_stc s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4682 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t43 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_r_5r205_t39 s1 s2 p0 p1a p1b p2 case1 r a (l_e_st_eq_landau_n_rt_rp_r_5r205_ps2 s1 s2 p0 p1a p1b p2 case1 r a s l p) (l_e_st_eq_landau_n_rt_rp_r_5r205_t42 s1 s2 p0 p1a p1b p2 case1 r a s l p) : l_e_st_eq_landau_n_rt_rp_in (l_e_st_eq_landau_n_rt_rp_r_5r205_ps2 s1 s2 p0 p1a p1b p2 case1 r a s l p) (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4683 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t44 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_ps2 s1 s2 p0 p1a p1b p2 case1 r a s l p)) s (l_e_st_eq_landau_n_rt_rp_r_5r205_t26 s1 s2 p0 p1a p1b p2 case1 r a (l_e_st_eq_landau_n_rt_rp_r_5r205_ps2 s1 s2 p0 p1a p1b p2 case1 r a s l p) (l_e_st_eq_landau_n_rt_rp_r_5r205_t43 s1 s2 p0 p1a p1b p2 case1 r a s l p)) (l_e_st_eq_landau_n_rt_rp_r_isprp2 s p) : l_e_st_eq_landau_n_rt_rp_r_in s s1).
-
-(* constant 4684 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t45 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_pos s).λi:l_e_st_eq_landau_n_rt_rp_r_in s s2.(p2 r (l_e_st_eq_landau_n_rt_rp_r_5r205_t24 s1 s2 p0 p1a p1b p2 case1 r a) s i : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4685 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t46 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_pos s).λi:l_e_st_eq_landau_n_rt_rp_r_in s s2.(n (l_e_st_eq_landau_n_rt_rp_r_lemma5 r s (l_e_st_eq_landau_n_rt_rp_r_5r205_t45 s1 s2 p0 p1a p1b p2 case1 r a s l n i) (l_e_st_eq_landau_n_rt_rp_r_5r205_t23 s1 s2 p0 p1a p1b p2 case1 r a)) : l_con).
-
-(* constant 4686 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t47 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_pos s).(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_in s s1) (l_e_st_eq_landau_n_rt_rp_r_in s s2) (p0 s) (λt:l_e_st_eq_landau_n_rt_rp_r_in s s2.l_e_st_eq_landau_n_rt_rp_r_5r205_t46 s1 s2 p0 p1a p1b p2 case1 r a s l n t) : l_e_st_eq_landau_n_rt_rp_r_in s s1).
-
-(* constant 4687 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t48 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_in s s1) (λt:l_e_st_eq_landau_n_rt_rp_r_pos s.l_e_st_eq_landau_n_rt_rp_r_5r205_t44 s1 s2 p0 p1a p1b p2 case1 r a s l t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_pos s).l_e_st_eq_landau_n_rt_rp_r_5r205_t47 s1 s2 p0 p1a p1b p2 case1 r a s l t) : l_e_st_eq_landau_n_rt_rp_r_in s s1).
-
-(* constant 4688 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t49 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).(l_e_st_eq_landau_n_rt_rp_r_lemma5 (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a) s (l_e_st_eq_landau_n_rt_rp_r_lemma1 s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a) m) (l_e_st_eq_landau_n_rt_rp_r_5r205_t41 s1 s2 p0 p1a p1b p2 case1 r a) : l_e_st_eq_landau_n_rt_rp_r_pos s).
-
-(* constant 4689 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_ps3 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).(l_e_st_eq_landau_n_rt_rp_r_rpofp s (l_e_st_eq_landau_n_rt_rp_r_5r205_t49 s1 s2 p0 p1a p1b p2 case1 r a s m) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4690 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t50 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).(l_e_st_eq_landau_n_rt_rp_r_morerpip (l_e_st_eq_landau_n_rt_rp_r_5r205_ps3 s1 s2 p0 p1a p1b p2 case1 r a s m) (l_e_st_eq_landau_n_rt_rp_r_5r205_stc s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_ismore1 s (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_ps3 s1 s2 p0 p1a p1b p2 case1 r a s m)) (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_isprp1 s (l_e_st_eq_landau_n_rt_rp_r_5r205_t49 s1 s2 p0 p1a p1b p2 case1 r a s m)) m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_r_5r205_ps3 s1 s2 p0 p1a p1b p2 case1 r a s m) (l_e_st_eq_landau_n_rt_rp_r_5r205_stc s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4691 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t51 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).(l_e_st_eq_landau_n_rt_rp_r_5r205_t40 s1 s2 p0 p1a p1b p2 case1 r a (l_e_st_eq_landau_n_rt_rp_r_5r205_ps3 s1 s2 p0 p1a p1b p2 case1 r a s m) (l_e_st_eq_landau_n_rt_rp_r_5r205_t50 s1 s2 p0 p1a p1b p2 case1 r a s m) : l_e_st_eq_landau_n_rt_rp_in (l_e_st_eq_landau_n_rt_rp_r_5r205_ps3 s1 s2 p0 p1a p1b p2 case1 r a s m) (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4692 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t52 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s2) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_ps3 s1 s2 p0 p1a p1b p2 case1 r a s m)) s (l_e_st_eq_landau_n_rt_rp_r_5r205_t28 s1 s2 p0 p1a p1b p2 case1 r a (l_e_st_eq_landau_n_rt_rp_r_5r205_ps3 s1 s2 p0 p1a p1b p2 case1 r a s m) (l_e_st_eq_landau_n_rt_rp_r_5r205_t51 s1 s2 p0 p1a p1b p2 case1 r a s m)) (l_e_st_eq_landau_n_rt_rp_r_isprp2 s (l_e_st_eq_landau_n_rt_rp_r_5r205_t49 s1 s2 p0 p1a p1b p2 case1 r a s m)) : l_e_st_eq_landau_n_rt_rp_r_in s s2).
-
-(* constant 4693 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t53 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_andi (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a)) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a)) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_less x (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).l_e_st_eq_landau_n_rt_rp_r_5r205_t48 s1 s2 p0 p1a p1b p2 case1 r a x t) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_more x (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).l_e_st_eq_landau_n_rt_rp_r_5r205_t52 s1 s2 p0 p1a p1b p2 case1 r a x t) : l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4694 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t54 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x) (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_t53 s1 s2 p0 p1a p1b p2 case1 r a) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4695 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t55 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).(l_someapp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)) case1 (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1).l_e_st_eq_landau_n_rt_rp_r_5r205_t54 s1 s2 p0 p1a p1b p2 case1 x t) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4696 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).(l_e_st_setof l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 x) s1) : l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4697 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).(l_e_st_setof l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 x) s2) : l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4698 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t56 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) s1.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 x) s1) r i : l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4699 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t57 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2).(l_e_st_estie l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 x) s1) r i : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) s1).
-
-(* constant 4700 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t58 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) s2.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 x) s2) r i : l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4701 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t59 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2).(l_e_st_estie l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 x) s2) r i : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) s2).
-
-(* constant 4702 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t60 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_comor (l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2)) (l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)) (l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) s1) (l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) s2) (l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2)) (l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)) (p0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (λt:l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) s1.l_e_st_eq_landau_n_rt_rp_r_5r205_t56 s1 s2 p0 p1a p1b p2 case2 r t) (λt:l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) s2.l_e_st_eq_landau_n_rt_rp_r_5r205_t58 s1 s2 p0 p1a p1b p2 case2 r t)) : l_or (l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)) (l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2))).
-
-(* constant 4703 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t61 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in r s2.(l_e_st_eq_landau_n_rt_rp_r_5r205_t58 s1 s2 p0 p1a p1b p2 case2 (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s2) r (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) i (l_e_st_eq_landau_n_rt_rp_r_satz177a r)) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4704 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t62 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in r s2.(l_e_st_nonemptyi l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_t61 s1 s2 p0 p1a p1b p2 case2 r i) : l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4705 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t63 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).(l_e_st_nonemptyapp l_e_st_eq_landau_n_rt_rp_r_real s2 p1b (l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_in x s2.l_e_st_eq_landau_n_rt_rp_r_5r205_t62 s1 s2 p0 p1a p1b p2 case2 x t) : l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4706 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t64 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in r s1.(l_e_st_eq_landau_n_rt_rp_r_5r205_t56 s1 s2 p0 p1a p1b p2 case2 (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s1) r (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) i (l_e_st_eq_landau_n_rt_rp_r_satz177a r)) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4707 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t65 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in r s1.(l_e_st_nonemptyi l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_t64 s1 s2 p0 p1a p1b p2 case2 r i) : l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4708 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t66 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).(l_e_st_nonemptyapp l_e_st_eq_landau_n_rt_rp_r_real s1 p1a (l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2)) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_5r205_t65 s1 s2 p0 p1a p1b p2 case2 x t) : l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4709 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t67 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2).λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2).(p2 (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_5r205_t57 s1 s2 p0 p1a p1b p2 case2 s j) (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_t59 s1 s2 p0 p1a p1b p2 case2 r i) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4710 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t68 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2).λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2).(l_e_st_eq_landau_n_rt_rp_r_lemma1 s r (l_e_st_eq_landau_n_rt_rp_r_satz183d s r (l_e_st_eq_landau_n_rt_rp_r_5r205_t67 s1 s2 p0 p1a p1b p2 case2 r i s j)) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4711 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t69 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_in r s2).(l_e_st_eq_landau_n_rt_rp_r_satz176c r (l_ande1 (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_in r s2) a) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4712 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t70 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_in r s2).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s2) r (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_ande2 (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_in r s2) a) (l_e_st_eq_landau_n_rt_rp_r_satz177a r) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) s2).
-
-(* constant 4713 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t71 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_in r s2).(l_andi (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)) (l_e_st_eq_landau_n_rt_rp_r_5r205_t69 s1 s2 p0 p1a p1b p2 case2 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_t58 s1 s2 p0 p1a p1b p2 case2 (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_t70 s1 s2 p0 p1a p1b p2 case2 r a)) : l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2))).
-
-(* constant 4714 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t72 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_in r s2).(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2))) (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_t71 s1 s2 p0 p1a p1b p2 case2 r a) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)))).
-
-(* constant 4715 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t73 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).(l_someapp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)) case2 (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)))) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2).l_e_st_eq_landau_n_rt_rp_r_5r205_t72 s1 s2 p0 p1a p1b p2 case2 x t) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)))).
-
-(* constant 4716 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t74 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).(l_e_st_eq_landau_n_rt_rp_r_5r205_t55 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_t60 s1 s2 p0 p1a p1b p2 case2 x) (l_e_st_eq_landau_n_rt_rp_r_5r205_t63 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_t66 s1 s2 p0 p1a p1b p2 case2) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2).λy:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_in y (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2).l_e_st_eq_landau_n_rt_rp_r_5r205_t68 s1 s2 p0 p1a p1b p2 case2 x t y u) (l_e_st_eq_landau_n_rt_rp_r_5r205_t73 s1 s2 p0 p1a p1b p2 case2) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) x)).
-
-(* constant 4717 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t75 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_ismore2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_satz177 r) (l_e_st_eq_landau_n_rt_rp_r_satz183c s (l_e_st_eq_landau_n_rt_rp_r_m0 r) l) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_m0 s) r).
-
-(* constant 4718 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t76 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r) p (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_5r205_t75 s1 s2 p0 p1a p1b p2 case2 r p s l) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4719 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t77 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s)) s (l_e_st_eq_landau_n_rt_rp_r_5r205_t57 s1 s2 p0 p1a p1b p2 case2 (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_5r205_t76 s1 s2 p0 p1a p1b p2 case2 r p s l)) (l_e_st_eq_landau_n_rt_rp_r_satz177 s) : l_e_st_eq_landau_n_rt_rp_r_in s s1).
-
-(* constant 4720 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t78 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_isless2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_satz177 r) (l_e_st_eq_landau_n_rt_rp_r_satz183a s (l_e_st_eq_landau_n_rt_rp_r_m0 r) m) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_m0 s) r).
-
-(* constant 4721 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t79 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r) p (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_5r205_t78 s1 s2 p0 p1a p1b p2 case2 r p s m) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4722 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t80 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s2) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s)) s (l_e_st_eq_landau_n_rt_rp_r_5r205_t59 s1 s2 p0 p1a p1b p2 case2 (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_5r205_t79 s1 s2 p0 p1a p1b p2 case2 r p s m)) (l_e_st_eq_landau_n_rt_rp_r_satz177 s) : l_e_st_eq_landau_n_rt_rp_r_in s s2).
-
-(* constant 4723 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t81 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r.(l_andi (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_less x (l_e_st_eq_landau_n_rt_rp_r_m0 r).l_e_st_eq_landau_n_rt_rp_r_5r205_t77 s1 s2 p0 p1a p1b p2 case2 r p x t) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_more x (l_e_st_eq_landau_n_rt_rp_r_m0 r).l_e_st_eq_landau_n_rt_rp_r_5r205_t80 s1 s2 p0 p1a p1b p2 case2 r p x t) : l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4724 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t82 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r.(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x) (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_t81 s1 s2 p0 p1a p1b p2 case2 r p) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4725 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t83 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).(l_someapp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) x) (l_e_st_eq_landau_n_rt_rp_r_5r205_t74 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) x.l_e_st_eq_landau_n_rt_rp_r_5r205_t82 s1 s2 p0 p1a p1b p2 case2 x t) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4726 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t84 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).λnotcase2:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).λr:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0.(l_some_th4 l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)) notcase2 r : l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_in r s2))).
-
-(* constant 4727 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t85 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).λnotcase2:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).λr:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0.(l_and_th3 (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_in r s2) (l_e_st_eq_landau_n_rt_rp_r_5r205_t84 s1 s2 p0 p1a p1b p2 notcase1 notcase2 r l) (l_e_st_eq_landau_n_rt_rp_r_satz169d r l) : l_not (l_e_st_eq_landau_n_rt_rp_r_in r s2)).
-
-(* constant 4728 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t86 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).λnotcase2:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).λr:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0.(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_in r s1) (l_e_st_eq_landau_n_rt_rp_r_in r s2) (p0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_t85 s1 s2 p0 p1a p1b p2 notcase1 notcase2 r l) : l_e_st_eq_landau_n_rt_rp_r_in r s1).
-
-(* constant 4729 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t87 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).λnotcase2:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).λr:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0.(l_some_th4 l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)) notcase1 r : l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1))).
-
-(* constant 4730 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t88 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).λnotcase2:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).λr:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0.(l_and_th3 (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1) (l_e_st_eq_landau_n_rt_rp_r_5r205_t87 s1 s2 p0 p1a p1b p2 notcase1 notcase2 r m) (l_e_st_eq_landau_n_rt_rp_r_satz169b r m) : l_not (l_e_st_eq_landau_n_rt_rp_r_in r s1)).
-
-(* constant 4731 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t89 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).λnotcase2:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).λr:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0.(l_ore2 (l_e_st_eq_landau_n_rt_rp_r_in r s1) (l_e_st_eq_landau_n_rt_rp_r_in r s2) (p0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_t88 s1 s2 p0 p1a p1b p2 notcase1 notcase2 r m) : l_e_st_eq_landau_n_rt_rp_r_in r s2).
-
-(* constant 4732 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t90 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).λnotcase2:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).(l_andi (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 s1 s2 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 s1 s2 l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_less x l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_5r205_t86 s1 s2 p0 p1a p1b p2 notcase1 notcase2 x t) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_more x l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_5r205_t89 s1 s2 p0 p1a p1b p2 notcase1 notcase2 x t) : l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4733 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t91 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).λnotcase2:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_5r205_t90 s1 s2 p0 p1a p1b p2 notcase1 notcase2) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4734 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t92 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))) (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)) (λt:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).l_e_st_eq_landau_n_rt_rp_r_5r205_t83 s1 s2 p0 p1a p1b p2 t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).l_e_st_eq_landau_n_rt_rp_r_5r205_t91 s1 s2 p0 p1a p1b p2 notcase1 t) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4735 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t93 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))) (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)) (λt:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).l_e_st_eq_landau_n_rt_rp_r_5r205_t55 s1 s2 p0 p1a p1b p2 t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).l_e_st_eq_landau_n_rt_rp_r_5r205_t92 s1 s2 p0 p1a p1b p2 t) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4736 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t94 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).(l_e_onei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x) (l_e_st_eq_landau_n_rt_rp_r_5r205_t22 s1 s2 p0 p1a p1b p2) (l_e_st_eq_landau_n_rt_rp_r_5r205_t93 s1 s2 p0 p1a p1b p2) : l_e_st_eq_landau_n_rt_rp_r_one (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4737 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz205 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).(l_e_st_eq_landau_n_rt_rp_r_5r205_t94 s1 s2 p0 p1a p1b p2 : l_e_st_eq_landau_n_rt_rp_r_one (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_less y x.l_e_st_eq_landau_n_rt_rp_r_in y s1)) (l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_more y x.l_e_st_eq_landau_n_rt_rp_r_in y s2)))).
-
-(* constant 4738 *)
-definition l_e_st_eq_landau_n_rt_rp_r_dedekind ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).(l_e_st_eq_landau_n_rt_rp_r_satz205 s1 s2 p0 p1a p1b p2 : l_e_st_eq_landau_n_rt_rp_r_one (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_less y x.l_e_st_eq_landau_n_rt_rp_r_in y s1)) (l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_more y x.l_e_st_eq_landau_n_rt_rp_r_in y s2)))).
-
-(* constant 4739 *)
-definition l_e_st_eq_landau_n_rt_rp_r_schnitt ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).(l_e_ind l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x) (l_e_st_eq_landau_n_rt_rp_r_satz205 s1 s2 p0 p1a p1b p2) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4740 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz205a ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r (l_e_st_eq_landau_n_rt_rp_r_schnitt s1 s2 p0 p1a p1b p2).(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_schnitt s1 s2 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_schnitt s1 s2 p0 p1a p1b p2)) (l_e_oneax l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x) (l_e_st_eq_landau_n_rt_rp_r_satz205 s1 s2 p0 p1a p1b p2)) r l : l_e_st_eq_landau_n_rt_rp_r_in r s1).
-
-(* constant 4741 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz205b ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r (l_e_st_eq_landau_n_rt_rp_r_schnitt s1 s2 p0 p1a p1b p2).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_schnitt s1 s2 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_schnitt s1 s2 p0 p1a p1b p2)) (l_e_oneax l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x) (l_e_st_eq_landau_n_rt_rp_r_satz205 s1 s2 p0 p1a p1b p2)) r m : l_e_st_eq_landau_n_rt_rp_r_in r s2).
-
-(* constant 4742 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_dr ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pdofrp r0 : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 4743 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_ds ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pdofrp s0 : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 4744 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t1 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_lemmaivad1 r0 s0 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_r_iva_dr r0 s0) (l_e_st_eq_landau_n_rt_rp_r_iva_ds r0 s0)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl r0 s0))).
-
-(* constant 4745 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemmaiva1 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_pl r0 s0)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp s0)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl r0 s0)) (l_e_st_eq_landau_n_rt_rp_r_picp (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp s0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp s0))) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl r0 s0))) (l_e_st_eq_landau_n_rt_rp_r_iva_t1 r0 s0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_pl r0 s0))).
-
-(* constant 4746 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t2 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_lemmaivad2 r0 s0 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_r_iva_dr r0 s0) (l_e_st_eq_landau_n_rt_rp_r_iva_ds r0 s0)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts r0 s0))).
-
-(* constant 4747 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemmaiva2 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_ts r0 s0)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp s0)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts r0 s0)) (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp s0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp s0))) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts r0 s0))) (l_e_st_eq_landau_n_rt_rp_r_iva_t2 r0 s0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_ts r0 s0))).
-
-(* constant 4748 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t3 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).(l_e_st_eq_landau_n_rt_rp_r_moreex (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_st_eq_landau_n_rt_rp_r_iva_dr r0 s0) (l_e_st_eq_landau_n_rt_rp_r_iva_ds r0 s0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_r_iva_dr r0 s0)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_r_iva_ds r0 s0)) m : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_r_iva_dr r0 s0) (l_e_st_eq_landau_n_rt_rp_r_iva_ds r0 s0)).
-
-(* constant 4749 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemmaiva3 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).(l_e_st_eq_landau_n_rt_rp_lemmaivad3 r0 s0 (l_e_st_eq_landau_n_rt_rp_r_iva_t3 r0 s0 m) : l_e_st_eq_landau_n_rt_rp_more r0 s0).
-
-(* constant 4750 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t4 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r0 s0.λl:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).(l_e_st_eq_landau_n_rt_rp_satz121 s0 r0 (l_e_st_eq_landau_n_rt_rp_r_lemmaiva3 s0 r0 (l_e_st_eq_landau_n_rt_rp_r_lemma2 (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) l)) : l_e_st_eq_landau_n_rt_rp_less r0 s0).
-
-(* constant 4751 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t5 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r0 s0.(l_ec3e23 (l_e_st_eq_landau_n_rt_rp_is r0 s0) (l_e_st_eq_landau_n_rt_rp_more r0 s0) (l_e_st_eq_landau_n_rt_rp_less r0 s0) (l_e_st_eq_landau_n_rt_rp_satz123b r0 s0) m : l_not (l_e_st_eq_landau_n_rt_rp_less r0 s0)).
-
-(* constant 4752 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t6 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r0 s0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_less r0 s0) (l_e_st_eq_landau_n_rt_rp_r_iva_t5 r0 s0 m) (λt:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).l_e_st_eq_landau_n_rt_rp_r_iva_t4 r0 s0 m t) : l_not (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0))).
-
-(* constant 4753 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t7 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r0 s0.(l_ec3e21 (l_e_st_eq_landau_n_rt_rp_is r0 s0) (l_e_st_eq_landau_n_rt_rp_more r0 s0) (l_e_st_eq_landau_n_rt_rp_less r0 s0) (l_e_st_eq_landau_n_rt_rp_satz123b r0 s0) m : l_e_st_eq_landau_n_rt_rp_nis r0 s0).
-
-(* constant 4754 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t8 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r0 s0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_is r0 s0) (l_e_st_eq_landau_n_rt_rp_r_iva_t7 r0 s0 m) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).l_e_st_eq_landau_n_rt_rp_r_isrpip r0 s0 t) : l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)).
-
-(* constant 4755 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemmaiva4 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r0 s0.(l_or3e2 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_r_satz167a (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_r_iva_t6 r0 s0 m) (l_e_st_eq_landau_n_rt_rp_r_iva_t8 r0 s0 m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)).
-
-(* constant 4756 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t9 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y).(l_e_st_eq_landau_n_rt_rp_r_lemmaiva3 (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y) m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)).
-
-(* constant 4757 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t10 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y).(l_e_st_eq_landau_n_rt_rp_satz154d (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y) (l_e_st_eq_landau_n_rt_rp_r_iva_t9 x y m) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)).
-
-(* constant 4758 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t11 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y).(l_e_st_eq_landau_n_rt_moree (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y) (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_iva_t10 x y m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)).
-
-(* constant 4759 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemmaiva5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y).(l_e_st_eq_landau_n_satz111a x y (l_e_st_eq_landau_n_rt_rp_r_iva_t11 x y m) : l_e_st_eq_landau_n_more x y).
-
-(* constant 4760 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_satz111d x y m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)).
-
-(* constant 4761 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t13 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y) (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_iva_t12 x y m) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)).
-
-(* constant 4762 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t14 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_rt_rp_satz154a (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y) (l_e_st_eq_landau_n_rt_rp_r_iva_t13 x y m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)).
-
-(* constant 4763 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemmaiva6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_rt_rp_r_lemmaiva4 (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y) (l_e_st_eq_landau_n_rt_rp_r_iva_t14 x y m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)).
-
-(* constant 4764 *)
-definition l_e_st_eq_landau_n_rt_rp_r_int_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_intabsd a0 (l_e_st_eq_landau_n_rt_rp_r_intrlex r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_absd a0)).
-
-(* constant 4765 *)
-definition l_e_st_eq_landau_n_rt_rp_r_int_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_r_intrlin (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_r_aica r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_int_t1 r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4766 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intabs ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_abs r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_int_t2 r x t i) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4767 *)
-definition l_e_st_eq_landau_n_rt_rp_r_int_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_intm0d a0 (l_e_st_eq_landau_n_rt_rp_r_intrlex r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_m0d a0)).
-
-(* constant 4768 *)
-definition l_e_st_eq_landau_n_rt_rp_r_int_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_r_intrlin (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_int_t3 r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4769 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intm0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_int_t4 r x t i) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4770 *)
-definition l_e_st_eq_landau_n_rt_rp_r_int_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.(l_e_st_eq_landau_n_rt_rp_intpd a1 b1 (l_e_st_eq_landau_n_rt_rp_r_intrlex r a1 a1ir i) (l_e_st_eq_landau_n_rt_rp_r_intrlex s b1 b1is j) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a1 b1)).
-
-(* constant 4771 *)
-definition l_e_st_eq_landau_n_rt_rp_r_int_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.(l_e_st_eq_landau_n_rt_rp_r_intrlin (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_pd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_picp r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_int_t5 r s a1 b1 a1ir b1is i j) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_pl r s)).
-
-(* constant 4772 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intpl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_int_t6 r s x y t u i j) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_pl r s)).
-
-(* constant 4773 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intmn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.(l_e_st_eq_landau_n_rt_rp_r_intpl r i (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_intm0 s j) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_mn r s)).
-
-(* constant 4774 *)
-definition l_e_st_eq_landau_n_rt_rp_r_int_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.(l_e_st_eq_landau_n_rt_rp_inttd a1 b1 (l_e_st_eq_landau_n_rt_rp_r_intrlex r a1 a1ir i) (l_e_st_eq_landau_n_rt_rp_r_intrlex s b1 b1is j) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_td a1 b1)).
-
-(* constant 4775 *)
-definition l_e_st_eq_landau_n_rt_rp_r_int_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.(l_e_st_eq_landau_n_rt_rp_r_intrlin (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_int_t7 r s a1 b1 a1ir b1is i j) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4776 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intts ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_int_t8 r s x y t u i j) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4777 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr24_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n) : l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n)).
-
-(* constant 4778 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr24_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_more l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_more l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n)) (l_e_st_eq_landau_n_satz10d l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n) (l_e_st_eq_landau_n_rt_rp_r_ivr24_t1 r n)) (λt:l_e_st_eq_landau_n_rt_rp_r_more l_e_st_eq_landau_n_rt_rp_r_1rl r.l_e_st_eq_landau_n_rt_rp_r_lemmaiva5 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n) (l_e_st_eq_landau_n_rt_rp_r_ismore2 r (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n)) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 r n) t)) : l_not (l_e_st_eq_landau_n_rt_rp_r_more l_e_st_eq_landau_n_rt_rp_r_1rl r)).
-
-(* constant 4779 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr24 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_r_satz167e l_e_st_eq_landau_n_rt_rp_r_1rl r (l_e_st_eq_landau_n_rt_rp_r_ivr24_t2 r n) : l_e_st_eq_landau_n_rt_rp_r_lessis l_e_st_eq_landau_n_rt_rp_r_1rl r).
-
-(* constant 4780 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr25_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_satz182d s r (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn s r)).
-
-(* constant 4781 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr25_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_intmn s j r i : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_mn s r)).
-
-(* constant 4782 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr25_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_posintnatrl (l_e_st_eq_landau_n_rt_rp_r_mn s r) (l_e_st_eq_landau_n_rt_rp_r_ivr25_t1 r i s j l) (l_e_st_eq_landau_n_rt_rp_r_ivr25_t2 r i s j l) : l_e_st_eq_landau_n_rt_rp_r_natrl (l_e_st_eq_landau_n_rt_rp_r_mn s r)).
-
-(* constant 4783 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr25_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_satzr24 (l_e_st_eq_landau_n_rt_rp_r_mn s r) (l_e_st_eq_landau_n_rt_rp_r_ivr25_t3 r i s j l) : l_e_st_eq_landau_n_rt_rp_r_lessis l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_mn s r)).
-
-(* constant 4784 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr25_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_less l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_mn s r)) (l_e_st_eq_landau_n_rt_rp_r_is l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_mn s r)) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn s r) r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn s r) r)) (l_e_st_eq_landau_n_rt_rp_r_ivr25_t4 r i s j l) (λt:l_e_st_eq_landau_n_rt_rp_r_less l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_mn s r).l_e_st_eq_landau_n_rt_rp_r_satz188f l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_mn s r) r t) (λt:l_e_st_eq_landau_n_rt_rp_r_is l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_mn s r).l_e_st_eq_landau_n_rt_rp_r_ispl1 l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_mn s r) r t) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn s r) r)).
-
-(* constant 4785 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr25 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_islessis12 (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn s r) r) s (l_e_st_eq_landau_n_rt_rp_r_compl l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_plmn s r) (l_e_st_eq_landau_n_rt_rp_r_ivr25_t5 r i s j l) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_1rl) s).
-
-(* constant 4786 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr155_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_lemmaiva1 (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)))).
-
-(* constant 4787 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr155_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_isrpep (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)) (l_e_st_eq_landau_n_rt_rp_satz155e x y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)))).
-
-(* constant 4788 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr155a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y))) (l_e_st_eq_landau_n_rt_rp_r_ivr155_t2 x y) (l_e_st_eq_landau_n_rt_rp_r_ivr155_t1 x y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y))).
-
-(* constant 4789 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr155b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)) (l_e_st_eq_landau_n_rt_rp_r_satzr155a x y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x y))).
-
-(* constant 4790 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr155_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_lemmaiva2 (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)))).
-
-(* constant 4791 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr155_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_isrpep (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)) (l_e_st_eq_landau_n_rt_rp_satz155f x y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)))).
-
-(* constant 4792 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr155c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y))) (l_e_st_eq_landau_n_rt_rp_r_ivr155_t4 x y) (l_e_st_eq_landau_n_rt_rp_r_ivr155_t3 x y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y))).
-
-(* constant 4793 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr155d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)) (l_e_st_eq_landau_n_rt_rp_r_satzr155c x y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_ts x y))).
-
-(* constant 4794 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t1 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) t).λb:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λb0:l_e_st_eq_landau_n_rt_rp_dif.λbis:l_e_st_eq_landau_n_rt_rp_r_inn b0 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd a0) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_ande1 (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) t) a) (λu:l_e_st_eq_landau_n_rt_rp_negd a0.l_e_st_eq_landau_n_rt_rp_r_negin r a0 air u) : l_not (l_e_st_eq_landau_n_rt_rp_negd a0)).
-
-(* constant 4795 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t2 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) t).λb:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λb0:l_e_st_eq_landau_n_rt_rp_dif.λbis:l_e_st_eq_landau_n_rt_rp_r_inn b0 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd b0) (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_ande1 (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) t) b) (λu:l_e_st_eq_landau_n_rt_rp_negd b0.l_e_st_eq_landau_n_rt_rp_r_negin s b0 bis u) : l_not (l_e_st_eq_landau_n_rt_rp_negd b0)).
-
-(* constant 4796 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t3 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) t).λb:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λb0:l_e_st_eq_landau_n_rt_rp_dif.λbis:l_e_st_eq_landau_n_rt_rp_r_inn b0 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_ts r r) t (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0 (l_e_st_eq_landau_n_rt_rp_r_tict r r a0 a0 air air) cit (l_ande2 (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) t) a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0).
-
-(* constant 4797 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t4 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) t).λb:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λb0:l_e_st_eq_landau_n_rt_rp_dif.λbis:l_e_st_eq_landau_n_rt_rp_r_inn b0 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_ts s s) t (l_e_st_eq_landau_n_rt_rp_td b0 b0) c0 (l_e_st_eq_landau_n_rt_rp_r_tict s s b0 b0 bis bis) cit (l_ande2 (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) t) b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b0 b0) c0).
-
-(* constant 4798 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t5 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) t).λb:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λb0:l_e_st_eq_landau_n_rt_rp_dif.λbis:l_e_st_eq_landau_n_rt_rp_r_inn b0 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isin r s a0 b0 air bis (l_e_st_eq_landau_n_rt_rp_satzd161b c0 a0 b0 (l_e_st_eq_landau_n_rt_rp_r_7r161_t1 t r s a b c0 cit a0 air b0 bis) (l_e_st_eq_landau_n_rt_rp_r_7r161_t2 t r s a b c0 cit a0 air b0 bis) (l_e_st_eq_landau_n_rt_rp_r_7r161_t3 t r s a b c0 cit a0 air b0 bis) (l_e_st_eq_landau_n_rt_rp_r_7r161_t4 t r s a b c0 cit a0 air b0 bis)) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4799 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr161b ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) t).λb:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) t).(l_e_st_eq_landau_n_rt_rp_r_realapp3 t r s (l_e_st_eq_landau_n_rt_rp_r_is r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class t).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class r).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_7r161_t5 t r s a b x u y v z w) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4800 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t6 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd c0) (l_e_st_eq_landau_n_rt_rp_r_neg t) n (λu:l_e_st_eq_landau_n_rt_rp_negd c0.l_e_st_eq_landau_n_rt_rp_r_negin t c0 cit u) : l_not (l_e_st_eq_landau_n_rt_rp_negd c0)).
-
-(* constant 4801 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_ar ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd a0)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0).(l_e_st_eq_landau_n_rt_rp_r_realof a0 : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4802 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t7 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd a0)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a)) (l_e_st_eq_landau_n_rt_rp_negd a0) (l_ande1 (l_not (l_e_st_eq_landau_n_rt_rp_negd a0)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0) a) (λu:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a).l_e_st_eq_landau_n_rt_rp_r_negex (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a) a0 (l_e_st_eq_landau_n_rt_rp_r_innclass a0) u) : l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a))).
-
-(* constant 4803 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t8 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd a0)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a) (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a)) t (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0 (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a) (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a) a0 a0 (l_e_st_eq_landau_n_rt_rp_r_innclass a0) (l_e_st_eq_landau_n_rt_rp_r_innclass a0)) cit (l_ande2 (l_not (l_e_st_eq_landau_n_rt_rp_negd a0)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0) a) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a) (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a)) t).
-
-(* constant 4804 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t9 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd a0)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0).(l_andi (l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a))) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a) (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a)) t) (l_e_st_eq_landau_n_rt_rp_r_7r161_t7 t n c0 cit a0 a) (l_e_st_eq_landau_n_rt_rp_r_7r161_t8 t n c0 cit a0 a) : l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a))) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a) (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a)) t)).
-
-(* constant 4805 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t10 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd a0)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0).(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t)) (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a) (l_e_st_eq_landau_n_rt_rp_r_7r161_t9 t n c0 cit a0 a) : l_e_st_eq_landau_n_rt_rp_r_some (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t))).
-
-(* constant 4806 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t11 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd x)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td x x) c0)) (l_e_st_eq_landau_n_rt_rp_satzd161a c0 (l_e_st_eq_landau_n_rt_rp_r_7r161_t6 t n c0 cit)) (l_e_st_eq_landau_n_rt_rp_r_some (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λv:l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd x)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td x x) c0).l_e_st_eq_landau_n_rt_rp_r_7r161_t10 t n c0 cit x v) : l_e_st_eq_landau_n_rt_rp_r_some (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t))).
-
-(* constant 4807 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr161a ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).(l_e_st_eq_landau_n_rt_rp_r_realapp1 t (l_e_st_eq_landau_n_rt_rp_r_some (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λv:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_7r161_t11 t n x v) : l_e_st_eq_landau_n_rt_rp_r_some (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t))).
-
-(* constant 4808 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr161 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).(l_e_onei l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t)) (λu:l_e_st_eq_landau_n_rt_rp_r_real.λv:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t).λb:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg v)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts v v) t).l_e_st_eq_landau_n_rt_rp_r_satzr161b t u v a b) (l_e_st_eq_landau_n_rt_rp_r_satzr161a t n) : l_e_st_eq_landau_n_rt_rp_r_one (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t))).
-
-(* constant 4809 *)
-definition l_e_st_eq_landau_n_rt_rp_r_sqrt ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).(l_e_ind l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t)) (l_e_st_eq_landau_n_rt_rp_r_satzr161 t n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4810 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t12 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).(l_e_oneax l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t)) (l_e_st_eq_landau_n_rt_rp_r_satzr161 t n) : l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_sqrt t n))) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_sqrt t n) (l_e_st_eq_landau_n_rt_rp_r_sqrt t n)) t)).
-
-(* constant 4811 *)
-definition l_e_st_eq_landau_n_rt_rp_r_thsqrt1a ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).(l_ande1 (l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_sqrt t n))) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_sqrt t n) (l_e_st_eq_landau_n_rt_rp_r_sqrt t n)) t) (l_e_st_eq_landau_n_rt_rp_r_7r161_t12 t n) : l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_sqrt t n))).
-
-(* constant 4812 *)
-definition l_e_st_eq_landau_n_rt_rp_r_thsqrt1b ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).(l_ande2 (l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_sqrt t n))) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_sqrt t n) (l_e_st_eq_landau_n_rt_rp_r_sqrt t n)) t) (l_e_st_eq_landau_n_rt_rp_r_7r161_t12 t n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_sqrt t n) (l_e_st_eq_landau_n_rt_rp_r_sqrt t n)) t).
-
-(* constant 4813 *)
-definition l_e_st_eq_landau_n_rt_rp_r_thsqrt2 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λx:l_e_st_eq_landau_n_rt_rp_r_real.λo:l_not (l_e_st_eq_landau_n_rt_rp_r_neg x).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts x x) t.(l_e_st_eq_landau_n_rt_rp_r_satzr161b t x (l_e_st_eq_landau_n_rt_rp_r_sqrt t n) (l_andi (l_not (l_e_st_eq_landau_n_rt_rp_r_neg x)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts x x) t) o i) (l_e_st_eq_landau_n_rt_rp_r_7r161_t12 t n) : l_e_st_eq_landau_n_rt_rp_r_is x (l_e_st_eq_landau_n_rt_rp_r_sqrt t n)).
-
-(* constant 4814 *)
-definition l_e_st_eq_landau_n_rt_rp_r_thsqrt3 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λx:l_e_st_eq_landau_n_rt_rp_r_real.λo:l_not (l_e_st_eq_landau_n_rt_rp_r_neg x).λi:l_e_st_eq_landau_n_rt_rp_r_is t (l_e_st_eq_landau_n_rt_rp_r_ts x x).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real x (l_e_st_eq_landau_n_rt_rp_r_sqrt t n) (l_e_st_eq_landau_n_rt_rp_r_thsqrt2 t n x o (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real t (l_e_st_eq_landau_n_rt_rp_r_ts x x) i)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_sqrt t n) x).
-
-(* constant 4815 *)
-definition l_e_st_eq_landau_n_rt_rp_r_issqrt ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_neg s).λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_thsqrt2 s o (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) (l_e_st_eq_landau_n_rt_rp_r_thsqrt1a r n) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) (l_e_st_eq_landau_n_rt_rp_r_sqrt r n)) r s (l_e_st_eq_landau_n_rt_rp_r_thsqrt1b r n) i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) (l_e_st_eq_landau_n_rt_rp_r_sqrt s o)).
-
-(* constant 4816 *)
-definition l_e_st_eq_landau_n_rt_rp_r_sqrt0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_thsqrt3 r n l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_0notn l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 i (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4817 *)
-definition l_e_st_eq_landau_n_rt_rp_r_sqrt_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λo:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) o (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) l_e_st_eq_landau_n_rt_rp_r_0.l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) (l_e_st_eq_landau_n_rt_rp_r_sqrt r n)) (l_e_st_eq_landau_n_rt_rp_r_thsqrt1b r n) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) t)) : l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4818 *)
-definition l_e_st_eq_landau_n_rt_rp_r_sqrtnot0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λo:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.(l_or3e2 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_sqrt r n)) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_sqrt r n)) (l_e_st_eq_landau_n_rt_rp_r_axrlo (l_e_st_eq_landau_n_rt_rp_r_sqrt r n)) (l_e_st_eq_landau_n_rt_rp_r_thsqrt1a r n) (l_e_st_eq_landau_n_rt_rp_r_sqrt_t1 r n o) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_sqrt r n)).
-
-(* constant 4819 *)
-definition l_e_st_eq_landau_n_rt_rp_r_v0_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis t l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ov s t n))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ov s t n)) t) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ov s t n) t)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_comts t (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ov s t n))) (l_e_st_eq_landau_n_rt_rp_r_assts1 r (l_e_st_eq_landau_n_rt_rp_r_ov s t n) t) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ov s t n) t) s r (l_e_st_eq_landau_n_rt_rp_r_satz204e s t n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ov s t n))) (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4820 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis t l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_satz204g (l_e_st_eq_landau_n_rt_rp_r_ts r s) t (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ov s t n)) n (l_e_st_eq_landau_n_rt_rp_r_v0_t1 r s t n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ov s t n)) (l_e_st_eq_landau_n_rt_rp_r_ov (l_e_st_eq_landau_n_rt_rp_r_ts r s) t n)).
-
-(* constant 4821 *)
-definition l_e_st_eq_landau_n_rt_rp_r_v0_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis t l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ov r t n) (l_e_st_eq_landau_n_rt_rp_r_ov s t n))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_ov r t n)) (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_ov s t n))) (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_disttp2 t (l_e_st_eq_landau_n_rt_rp_r_ov r t n) (l_e_st_eq_landau_n_rt_rp_r_ov s t n)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_ov r t n)) r (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_ov s t n)) s (l_e_st_eq_landau_n_rt_rp_r_satz204c r t n) (l_e_st_eq_landau_n_rt_rp_r_satz204c s t n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ov r t n) (l_e_st_eq_landau_n_rt_rp_r_ov s t n))) (l_e_st_eq_landau_n_rt_rp_r_pl r s)).
-
-(* constant 4822 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis t l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_satz204g (l_e_st_eq_landau_n_rt_rp_r_pl r s) t (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ov r t n) (l_e_st_eq_landau_n_rt_rp_r_ov s t n)) n (l_e_st_eq_landau_n_rt_rp_r_v0_t2 r s t n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ov r t n) (l_e_st_eq_landau_n_rt_rp_r_ov s t n)) (l_e_st_eq_landau_n_rt_rp_r_ov (l_e_st_eq_landau_n_rt_rp_r_pl r s) t n)).
-
-(* constant 4823 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_satz204b r r n (l_e_st_eq_landau_n_rt_rp_r_ov r r n) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_satz204c r r n) (l_e_st_eq_landau_n_rt_rp_r_satz195 r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ov r r n) l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 4824 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.(l_ore2 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ov l_e_st_eq_landau_n_rt_rp_r_0 r n) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz192c r (l_e_st_eq_landau_n_rt_rp_r_ov l_e_st_eq_landau_n_rt_rp_r_0 r n) (l_e_st_eq_landau_n_rt_rp_r_satz204c l_e_st_eq_landau_n_rt_rp_r_0 r n)) n : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ov l_e_st_eq_landau_n_rt_rp_r_0 r n) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4825 *)
-definition l_e_st_eq_landau_n_rt_rp_r_v0_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_m0 r).λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_pnotn (l_e_st_eq_landau_n_rt_rp_r_m0 r) p (l_e_st_eq_landau_n_rt_rp_r_isneg r (l_e_st_eq_landau_n_rt_rp_r_m0 r) i (l_e_st_eq_landau_n_rt_rp_r_satz176f r p)) : l_con).
-
-(* constant 4826 *)
-definition l_e_st_eq_landau_n_rt_rp_r_v0_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_m0 r).λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_nnotp (l_e_st_eq_landau_n_rt_rp_r_m0 r) n (l_e_st_eq_landau_n_rt_rp_r_ispos r (l_e_st_eq_landau_n_rt_rp_r_m0 r) i (l_e_st_eq_landau_n_rt_rp_r_satz176d r n)) : l_con).
-
-(* constant 4827 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_satz176e r (l_or3e1 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_axrlo (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (λt:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r).l_e_st_eq_landau_n_rt_rp_r_v0_t3 r i t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r).l_e_st_eq_landau_n_rt_rp_r_v0_t4 r i t)) : l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4828 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_satz167f (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0 (l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r r)) (l_e_st_eq_landau_n_rt_rp_r_nnegsq r) (λt:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_satz169d (l_e_st_eq_landau_n_rt_rp_r_ts r r) t)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4829 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_rapp r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs r))) (λt:l_e_st_eq_landau_n_rt_rp_r_pos r.l_e_st_eq_landau_n_rt_rp_r_satz196a r r t t) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs r)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 r r t) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs0 r t))) (λt:l_e_st_eq_landau_n_rt_rp_r_neg r.l_e_st_eq_landau_n_rt_rp_r_satz196b r r t t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs r))).
-
-(* constant 4830 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.(l_e_st_eq_landau_n_rt_rp_r_satz190a x x l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_moreisi2 x x (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real x)) (l_e_st_eq_landau_n_rt_rp_r_satz169a l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_natpos l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_natrl1)) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 4831 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.(l_e_st_eq_landau_n_rt_rp_r_ismore2 (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_0) x (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl02 x l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_shift_t1 x ix y iy ly) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) x).
-
-(* constant 4832 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.(l_e_st_eq_landau_n_rt_rp_r_satz172d (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) x y (l_e_st_eq_landau_n_rt_rp_r_shift_t2 x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_satz168b y x ly) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y).
-
-(* constant 4833 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.(l_e_st_eq_landau_n_rt_rp_r_satz182d (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y (l_e_st_eq_landau_n_rt_rp_r_shift_t3 x ix y iy ly) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4834 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.(l_e_st_eq_landau_n_rt_rp_r_intmn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1) y iy : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4835 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.(l_e_st_eq_landau_n_rt_rp_r_posintnatrl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t4 x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_shift_t5 x ix y iy ly) : l_e_st_eq_landau_n_rt_rp_r_natrl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4836 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shiftl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.(l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 x ix y iy ly) : l_e_st_eq_landau_n_nat).
-
-(* constant 4837 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_n1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_st_eq_landau_n_inn (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) n : l_e_st_eq_landau_n_nat).
-
-(* constant 4838 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) n : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)).
-
-(* constant 4839 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_n2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4840 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_natintrl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n)) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n)).
-
-(* constant 4841 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shiftr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) l_e_st_eq_landau_n_rt_rp_r_1rl : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4842 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intshiftr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_intmn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_t8 x ix y iy ly n) y iy) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n)).
-
-(* constant 4843 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t8a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) y) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) l_e_st_eq_landau_n_rt_rp_r_1rl) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) y (l_e_st_eq_landau_n_rt_rp_r_plmn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_mnpl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n)).
-
-(* constant 4844 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t9a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m).(l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m) l_e_st_eq_landau_n_rt_rp_r_1rl) y (l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m) l_e_st_eq_landau_n_rt_rp_r_1rl i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m) l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4845 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t10a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly m) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_t8a x ix y iy ly n)) (l_e_st_eq_landau_n_rt_rp_r_shift_t9a x ix y iy ly n m i) (l_e_st_eq_landau_n_rt_rp_r_shift_t8a x ix y iy ly m) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly m)).
-
-(* constant 4846 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t11a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m).(l_e_st_eq_landau_n_rt_rp_r_isntirl (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly m) (l_e_st_eq_landau_n_rt_rp_r_shift_t10a x ix y iy ly n m i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly m)).
-
-(* constant 4847 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iseshiftr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m).(l_e_st_eq_landau_n_isinne (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) n m (l_e_st_eq_landau_n_rt_rp_r_shift_t11a x ix y iy ly n m i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) n m).
-
-(* constant 4848 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x.(l_e_st_eq_landau_n_rt_rp_r_satz188d (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x l_e_st_eq_landau_n_rt_rp_r_1rl m : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl)).
-
-(* constant 4849 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x.(l_e_st_eq_landau_n_rt_rp_r_ismore1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_plmn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_shift_t9 x ix y iy ly n m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl)).
-
-(* constant 4850 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x.(l_e_st_eq_landau_n_rt_rp_r_satz188d (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 y) (l_e_st_eq_landau_n_rt_rp_r_shift_t10 x ix y iy ly n m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4851 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x.(l_e_st_eq_landau_n_rt_rp_r_ismore1 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) y) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mnpl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t11 x ix y iy ly n m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4852 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x.(l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 x ix y iy ly))) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n))) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shift_t12 x ix y iy ly n m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n)))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly))).
-
-(* constant 4853 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x.(l_e_st_eq_landau_n_rt_rp_r_lemmaiva5 (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n))) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_shift_t13 x ix y iy ly n m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n))) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)).
-
-(* constant 4854 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t15 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x.(l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n))) (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_isntrl2 (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n)) (l_e_st_eq_landau_n_rt_rp_r_shift_t14 x ix y iy ly n m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)).
-
-(* constant 4855 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t16 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_satz10d (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_shift_t7 x ix y iy ly n)) (λt:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x.l_e_st_eq_landau_n_rt_rp_r_shift_t15 x ix y iy ly n t) : l_not (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x)).
-
-(* constant 4856 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shiftrls ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_satz167e (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x (l_e_st_eq_landau_n_rt_rp_r_shift_t16 x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x).
-
-(* constant 4857 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t17 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n).(l_e_st_eq_landau_n_rt_rp_r_satz188d y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl m : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl y l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl)).
-
-(* constant 4858 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t18 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n).(l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_pl y l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_1rl y) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) (l_e_st_eq_landau_n_rt_rp_r_compl y l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_plmn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_shift_t17 x ix y iy ly n m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_1rl y) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y)).
-
-(* constant 4859 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t19 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n).(l_e_st_eq_landau_n_rt_rp_r_satz188a l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y (l_e_st_eq_landau_n_rt_rp_r_shift_t18 x ix y iy ly n m) : l_e_st_eq_landau_n_rt_rp_r_more l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n)).
-
-(* constant 4860 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t20 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n).(l_e_st_eq_landau_n_rt_rp_r_lemmaiva5 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_t19 x ix y iy ly n m) : l_e_st_eq_landau_n_more l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n)).
-
-(* constant 4861 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t21 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_more y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n)) (l_e_st_eq_landau_n_more l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n)) (l_e_st_eq_landau_n_satz10d l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n))) (λt:l_e_st_eq_landau_n_rt_rp_r_more y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n).l_e_st_eq_landau_n_rt_rp_r_shift_t20 x ix y iy ly n t) : l_not (l_e_st_eq_landau_n_rt_rp_r_more y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n))).
-
-(* constant 4862 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lsshiftr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_satz167e y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_t21 x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n)).
-
-(* constant 4863 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t22 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_and3e1 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x) a : l_e_st_eq_landau_n_rt_rp_r_intrl u).
-
-(* constant 4864 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t23 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_and3e2 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x) a : l_e_st_eq_landau_n_rt_rp_r_lessis y u).
-
-(* constant 4865 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t24 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_and3e3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x) a : l_e_st_eq_landau_n_rt_rp_r_lessis u x).
-
-(* constant 4866 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t25 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).λl:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_satz188f (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 y) (l_e_st_eq_landau_n_rt_rp_r_satz188f u x l_e_st_eq_landau_n_rt_rp_r_1rl l) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4867 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t26 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).λi:l_e_st_eq_landau_n_rt_rp_r_is u x.(l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y (l_e_st_eq_landau_n_rt_rp_r_ispl1 u x l_e_st_eq_landau_n_rt_rp_r_1rl i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4868 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t27 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_less u x) (l_e_st_eq_landau_n_rt_rp_r_is u x) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)) (l_e_st_eq_landau_n_rt_rp_r_shift_t24 x ix y iy ly u a) (λt:l_e_st_eq_landau_n_rt_rp_r_less u x.l_e_st_eq_landau_n_rt_rp_r_shift_t25 x ix y iy ly u a t) (λt:l_e_st_eq_landau_n_rt_rp_r_is u x.l_e_st_eq_landau_n_rt_rp_r_shift_t26 x ix y iy ly u a t) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4869 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_ul ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_st_eq_landau_n_rt_rp_r_shiftl u (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly u a) y iy (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly u a) : l_e_st_eq_landau_n_nat).
-
-(* constant 4870 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t28 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_st_eq_landau_n_rt_rp_r_islessis12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 u (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly u a) y iy (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly u a))) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shift_t27 x ix y iy ly u a) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly))).
-
-(* constant 4871 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t29 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_imp_th3 (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly))) (l_e_st_eq_landau_n_rt_rp_r_satz167d (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shift_t28 x ix y iy ly u a)) (λt:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_lemmaiva6 (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) t) : l_not (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly))).
-
-(* constant 4872 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t30 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_st_eq_landau_n_satz10e (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_shift_t29 x ix y iy ly u a) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)).
-
-(* constant 4873 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shiftl1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shift_t30 x ix y iy ly u a) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)).
-
-(* constant 4874 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t31 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shift_t30 x ix y iy ly u a) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a))).
-
-(* constant 4875 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t32 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 u (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly u a) y iy (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly u a))) (l_e_st_eq_landau_n_rt_rp_r_isnterl (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_shift_t31 x ix y iy ly u a)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a))).
-
-(* constant 4876 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t33 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) y) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) l_e_st_eq_landau_n_rt_rp_r_1rl) u (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) y) (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_plmn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y)) (l_e_st_eq_landau_n_rt_rp_r_mnpl u l_e_st_eq_landau_n_rt_rp_r_1rl) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) y) l_e_st_eq_landau_n_rt_rp_r_1rl) u).
-
-(* constant 4877 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shiftinv1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real u (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) y) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_shift_t33 x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) y) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a)) y) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a)) y (l_e_st_eq_landau_n_rt_rp_r_shift_t32 x ix y iy ly u a))) : l_e_st_eq_landau_n_rt_rp_r_is u (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a))).
-
-(* constant 4878 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shiftinv2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real u (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_shiftinv1 x ix y iy ly u a) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a)) u).
-
-(* constant 4879 *)
-definition l_e_st_eq_landau_n_rt_rp_r_seq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λalpha:Type[0].(Πt:l_e_st_eq_landau_n_rt_rp_r_real.Πu:l_e_st_eq_landau_n_rt_rp_r_intrl t.Πv:l_e_st_eq_landau_n_rt_rp_r_lessis y t.Πw:l_e_st_eq_landau_n_rt_rp_r_lessis t x.alpha : Type[0]).
-
-(* constant 4880 *)
-definition l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λalpha:Type[0].λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly alpha.(∀t:l_e_st_eq_landau_n_rt_rp_r_real.∀it:l_e_st_eq_landau_n_rt_rp_r_intrl t.∀lt:l_e_st_eq_landau_n_rt_rp_r_lessis y t.∀tl:l_e_st_eq_landau_n_rt_rp_r_lessis t x.∀u:l_e_st_eq_landau_n_rt_rp_r_real.∀iu:l_e_st_eq_landau_n_rt_rp_r_intrl u.∀lu:l_e_st_eq_landau_n_rt_rp_r_lessis y u.∀ul:l_e_st_eq_landau_n_rt_rp_r_lessis u x.∀v:l_e_st_eq_landau_n_rt_rp_r_is t u.l_e_is alpha (s t it lt tl) (s u iu lu ul) : Prop).
-
-(* constant 4881 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shiftf ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λalpha:Type[0].λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly alpha.(λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).f (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly t) (l_e_st_eq_landau_n_rt_rp_r_intshiftr x ix y iy ly t) (l_e_st_eq_landau_n_rt_rp_r_lsshiftr x ix y iy ly t) (l_e_st_eq_landau_n_rt_rp_r_shiftrls x ix y iy ly t) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).alpha).
-
-(* constant 4882 *)
-definition l_e_st_eq_landau_n_rt_rp_r_inseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.(∀t:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_intrl t.∀v:l_e_st_eq_landau_n_rt_rp_r_lessis y t.∀w:l_e_st_eq_landau_n_rt_rp_r_lessis t x.l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl (s t u v w)) (l_e_st_eq_landau_n_rt_rp_r_lessis y (s t u v w)) (l_e_st_eq_landau_n_rt_rp_r_lessis (s t u v w) x) : Prop).
-
-(* constant 4883 *)
-definition l_e_st_eq_landau_n_rt_rp_r_injseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.(∀t:l_e_st_eq_landau_n_rt_rp_r_real.∀it:l_e_st_eq_landau_n_rt_rp_r_intrl t.∀lt:l_e_st_eq_landau_n_rt_rp_r_lessis y t.∀tl:l_e_st_eq_landau_n_rt_rp_r_lessis t x.∀u:l_e_st_eq_landau_n_rt_rp_r_real.∀iu:l_e_st_eq_landau_n_rt_rp_r_intrl u.∀lu:l_e_st_eq_landau_n_rt_rp_r_lessis y u.∀ul:l_e_st_eq_landau_n_rt_rp_r_lessis u x.∀v:l_e_st_eq_landau_n_rt_rp_r_is (s t it lt tl) (s u iu lu ul).l_e_st_eq_landau_n_rt_rp_r_is t u : Prop).
-
-(* constant 4884 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_prop1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λv:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl v) (l_e_st_eq_landau_n_rt_rp_r_lessis y v) (l_e_st_eq_landau_n_rt_rp_r_lessis v x).(l_e_st_eq_landau_n_rt_rp_r_is u (s v (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly v a) (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly v a) (l_e_st_eq_landau_n_rt_rp_r_shift_t24 x ix y iy ly v a)) : Prop).
-
-(* constant 4885 *)
-definition l_e_st_eq_landau_n_rt_rp_r_improp ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λv:l_e_st_eq_landau_n_rt_rp_r_real.(l_and (l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl v) (l_e_st_eq_landau_n_rt_rp_r_lessis y v) (l_e_st_eq_landau_n_rt_rp_r_lessis v x)) (∀t:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl v) (l_e_st_eq_landau_n_rt_rp_r_lessis y v) (l_e_st_eq_landau_n_rt_rp_r_lessis v x).l_e_st_eq_landau_n_rt_rp_r_shift_prop1 x ix y iy ly s u v t) : Prop).
-
-(* constant 4886 *)
-definition l_e_st_eq_landau_n_rt_rp_r_imseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_some (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s u t) : Prop).
-
-(* constant 4887 *)
-definition l_e_st_eq_landau_n_rt_rp_r_surjseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.(∀t:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_intrl t.∀v:l_e_st_eq_landau_n_rt_rp_r_lessis y t.∀w:l_e_st_eq_landau_n_rt_rp_r_lessis t x.l_e_st_eq_landau_n_rt_rp_r_imseq x ix y iy ly s t : Prop).
-
-(* constant 4888 *)
-definition l_e_st_eq_landau_n_rt_rp_r_perm ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.(l_and (l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s) (l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s) : Prop).
-
-(* constant 4889 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_ns ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_intshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_lsshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftrls x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4890 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t34 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(ins (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_intshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_lsshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftrls x ix y iy ly n) : l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n)) (l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n)) (l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) x)).
-
-(* constant 4891 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shiftseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.(λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins t) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins t) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)).
-
-(* constant 4892 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t35 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λjs:l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins m).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins n)) (l_e_st_eq_landau_n_rt_rp_r_shift_t30 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins n)) (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins m)) (l_e_st_eq_landau_n_rt_rp_r_shift_t30 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins m)) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins n)) (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins m))).
-
-(* constant 4893 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t36 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λjs:l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins m).(l_e_st_eq_landau_n_rt_rp_r_isrlint (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins n)) y iy (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins n))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins m)) y iy (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins m))) (l_e_st_eq_landau_n_rt_rp_r_shift_t35 x ix y iy ly s ins js n m i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4894 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t37 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λjs:l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins m).(l_e_st_eq_landau_n_rt_rp_r_satz188b (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_satz188b (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 y) (l_e_st_eq_landau_n_rt_rp_r_shift_t36 x ix y iy ly s ins js n m i)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m)).
-
-(* constant 4895 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t38 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λjs:l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins m).(js (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_intshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_lsshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftrls x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m) (l_e_st_eq_landau_n_rt_rp_r_intshiftr x ix y iy ly m) (l_e_st_eq_landau_n_rt_rp_r_lsshiftr x ix y iy ly m) (l_e_st_eq_landau_n_rt_rp_r_shiftrls x ix y iy ly m) (l_e_st_eq_landau_n_rt_rp_r_shift_t37 x ix y iy ly s ins js n m i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m)).
-
-(* constant 4896 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t39 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λjs:l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins m).(l_e_st_eq_landau_n_rt_rp_r_satz188b (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly m) y (l_e_st_eq_landau_n_rt_rp_r_satz188b (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly m) y) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_shift_t38 x ix y iy ly s ins js n m i)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly m)).
-
-(* constant 4897 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t40 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λjs:l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins m).(l_e_st_eq_landau_n_rt_rp_r_isntirl (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly m) (l_e_st_eq_landau_n_rt_rp_r_shift_t39 x ix y iy ly s ins js n m i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly m)).
-
-(* constant 4898 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t41 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λjs:l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins m).(l_e_st_eq_landau_n_isinne (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) n m (l_e_st_eq_landau_n_rt_rp_r_shift_t40 x ix y iy ly s ins js n m i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) n m).
-
-(* constant 4899 *)
-definition l_e_st_eq_landau_n_rt_rp_r_injshiftseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λjs:l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s.(λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λv:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins t) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins u).l_e_st_eq_landau_n_rt_rp_r_shift_t41 x ix y iy ly s ins js t u v : l_e_injective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins)).
-
-(* constant 4900 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t42 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(ss (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_intshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_lsshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftrls x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_imseq x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n)).
-
-(* constant 4901 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t43 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u.(l_ande1 (l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x)) (∀t:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).l_e_st_eq_landau_n_rt_rp_r_shift_prop1 x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u t) p : l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x)).
-
-(* constant 4902 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t44 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u.(l_r_ande2 (l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x)) (λt:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).l_e_st_eq_landau_n_rt_rp_r_shift_prop1 x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u t) p : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (s u (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t24 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)))).
-
-(* constant 4903 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_ul1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u.(l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)).
-
-(* constant 4904 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t45 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u.(pri u (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t24 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_intshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_lsshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shiftrls x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shiftinv1 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) : l_e_st_eq_landau_n_rt_rp_r_is (s u (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t24 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p))) (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p))).
-
-(* constant 4905 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t46 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u.(l_e_st_eq_landau_n_rt_rp_r_shiftinv1 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)))).
-
-(* constant 4906 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t47 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (s u (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t24 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p))) (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p))) (l_e_st_eq_landau_n_rt_rp_r_shift_t44 x ix y iy ly s ins pri ss n u p) (l_e_st_eq_landau_n_rt_rp_r_shift_t45 x ix y iy ly s ins pri ss n u p) (l_e_st_eq_landau_n_rt_rp_r_shift_t46 x ix y iy ly s ins pri ss n u p) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)))).
-
-(* constant 4907 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t48 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u.(l_e_st_eq_landau_n_rt_rp_r_iseshiftr x ix y iy ly n (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t47 x ix y iy ly s ins pri ss n u p) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) n (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p))).
-
-(* constant 4908 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t49 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u.(l_somei (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) n (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins t)) (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p) (l_e_st_eq_landau_n_rt_rp_r_shift_t48 x ix y iy ly s ins pri ss n u p) : l_e_image (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins) n).
-
-(* constant 4909 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t50 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_someapp l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) t) (l_e_st_eq_landau_n_rt_rp_r_shift_t42 x ix y iy ly s ins pri ss n) (l_e_image (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins) n) (λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) t.l_e_st_eq_landau_n_rt_rp_r_shift_t49 x ix y iy ly s ins pri ss n t u) : l_e_image (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins) n).
-
-(* constant 4910 *)
-definition l_e_st_eq_landau_n_rt_rp_r_surjshiftseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.(λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_shift_t50 x ix y iy ly s ins pri ss t : l_e_surjective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins)).
-
-(* constant 4911 *)
-definition l_e_st_eq_landau_n_rt_rp_r_bijshiftseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.(l_andi (l_e_injective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins)) (l_e_surjective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins)) (l_e_st_eq_landau_n_rt_rp_r_injshiftseq x ix y iy ly s ins (l_ande1 (l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s) (l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s) ps)) (l_e_st_eq_landau_n_rt_rp_r_surjshiftseq x ix y iy ly s ins pri (l_ande2 (l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s) (l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s) ps)) : l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins)).
-
-(* constant 4912 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_complex ≝ (l_e_st_eq_landau_n_pair1type l_e_st_eq_landau_n_rt_rp_r_real : Type[0]).
-
-(* constant 4913 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_cx ≝ (l_e_st_eq_landau_n_rt_rp_r_c_complex : Type[0]).
-
-(* constant 4914 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_is ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_is l_e_st_eq_landau_n_rt_rp_r_c_cx x y : Prop).
-
-(* constant 4915 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_nis ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_not (l_e_st_eq_landau_n_rt_rp_r_c_is x y) : Prop).
-
-(* constant 4916 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_some ≝ λp:∀t:l_e_st_eq_landau_n_rt_rp_r_c_complex.Prop.(l_some l_e_st_eq_landau_n_rt_rp_r_c_cx p : Prop).
-
-(* constant 4917 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_all ≝ λp:∀t:l_e_st_eq_landau_n_rt_rp_r_c_complex.Prop.(l_all l_e_st_eq_landau_n_rt_rp_r_c_cx p : Prop).
-
-(* constant 4918 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_one ≝ λp:∀t:l_e_st_eq_landau_n_rt_rp_r_c_complex.Prop.(l_e_one l_e_st_eq_landau_n_rt_rp_r_c_cx p : Prop).
-
-(* constant 4919 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_pli ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_pair1 l_e_st_eq_landau_n_rt_rp_r_real a b : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 4920 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_re ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_first1 l_e_st_eq_landau_n_rt_rp_r_real x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4921 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_im ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_second1 l_e_st_eq_landau_n_rt_rp_r_real x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4922 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_reis ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_first1is1 l_e_st_eq_landau_n_rt_rp_r_real a b : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) a).
-
-(* constant 4923 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isre ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_first1is2 l_e_st_eq_landau_n_rt_rp_r_real a b : l_e_st_eq_landau_n_rt_rp_r_is a (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b))).
-
-(* constant 4924 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_imis ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_second1is1 l_e_st_eq_landau_n_rt_rp_r_real a b : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) b).
-
-(* constant 4925 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isim ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_second1is2 l_e_st_eq_landau_n_rt_rp_r_real a b : l_e_st_eq_landau_n_rt_rp_r_is b (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b))).
-
-(* constant 4926 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_pliis ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_pair1is1 l_e_st_eq_landau_n_rt_rp_r_real x : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) x).
-
-(* constant 4927 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ispli ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_pair1is2 l_e_st_eq_landau_n_rt_rp_r_real x : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))).
-
-(* constant 4928 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscere ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_re t) x y i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)).
-
-(* constant 4929 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isceim ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_im t) x y i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)).
-
-(* constant 4930 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isrecx1 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is a b.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_pli t c) a b i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli a c) (l_e_st_eq_landau_n_rt_rp_r_c_pli b c)).
-
-(* constant 4931 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is a b.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_pli c t) a b i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli c a) (l_e_st_eq_landau_n_rt_rp_r_c_pli c b)).
-
-(* constant 4932 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is a b.λj:l_e_st_eq_landau_n_rt_rp_r_is c d.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pli a c) (l_e_st_eq_landau_n_rt_rp_r_c_pli b c) (l_e_st_eq_landau_n_rt_rp_r_c_pli b d) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx1 a b c i) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 c d b j) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli a c) (l_e_st_eq_landau_n_rt_rp_r_c_pli b d)).
-
-(* constant 4933 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz206 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x : l_e_st_eq_landau_n_rt_rp_r_c_is x x).
-
-(* constant 4934 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz207 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx x y i : l_e_st_eq_landau_n_rt_rp_r_c_is y x).
-
-(* constant 4935 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz208 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_c_is y z.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx x y z i j : l_e_st_eq_landau_n_rt_rp_r_c_is x z).
-
-(* constant 4936 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_0c ≝ (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 4937 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_1c ≝ (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0 : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 4938 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_pl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 4939 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_plis12a ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))) (l_e_st_eq_landau_n_rt_rp_r_pl a c) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))) (l_e_st_eq_landau_n_rt_rp_r_pl b d) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) a (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) c (l_e_st_eq_landau_n_rt_rp_r_c_reis a b) (l_e_st_eq_landau_n_rt_rp_r_c_reis c d)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) b (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) d (l_e_st_eq_landau_n_rt_rp_r_c_imis a b) (l_e_st_eq_landau_n_rt_rp_r_c_imis c d)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl a c) (l_e_st_eq_landau_n_rt_rp_r_pl b d))).
-
-(* constant 4940 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_plis12b ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl a c) (l_e_st_eq_landau_n_rt_rp_r_pl b d)) (l_e_st_eq_landau_n_rt_rp_r_c_plis12a a b c d) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl a c) (l_e_st_eq_landau_n_rt_rp_r_pl b d)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))).
-
-(* constant 4941 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_plis1a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_pl s (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) r (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_reis r s)) (l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) s (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_imis r s)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_pl s (l_e_st_eq_landau_n_rt_rp_r_c_im x)))).
-
-(* constant 4942 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_plis1b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_pl s (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_plis1a x r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_pl s (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x)).
-
-(* constant 4943 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_plis2a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) s) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) r (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_reis r s)) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) s (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_imis r s)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) s))).
-
-(* constant 4944 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_plis2b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) s)) (l_e_st_eq_landau_n_rt_rp_r_c_plis2a x r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) s)) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))).
-
-(* constant 4945 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ispl1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl t z) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)).
-
-(* constant 4946 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ispl2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl z t) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl z x) (l_e_st_eq_landau_n_rt_rp_r_c_pl z y)).
-
-(* constant 4947 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ispl12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_c_is z u.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) (l_e_st_eq_landau_n_rt_rp_r_c_ispl1 x y z i) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 z u y j) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y u)).
-
-(* constant 4948 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz209 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y x)).
-
-(* constant 4949 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_compl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz209 x y : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y x)).
-
-(* constant 4950 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz210 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) x (l_e_st_eq_landau_n_rt_rp_r_c_plis2a x l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_pliis x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x l_e_st_eq_landau_n_rt_rp_r_c_0c) x).
-
-(* constant 4951 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz210a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl x l_e_st_eq_landau_n_rt_rp_r_c_0c) x (l_e_st_eq_landau_n_rt_rp_r_c_satz210 x) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_pl x l_e_st_eq_landau_n_rt_rp_r_c_0c)).
-
-(* constant 4952 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz210b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl l_e_st_eq_landau_n_rt_rp_r_c_0c x) (l_e_st_eq_landau_n_rt_rp_r_c_pl x l_e_st_eq_landau_n_rt_rp_r_c_0c) x (l_e_st_eq_landau_n_rt_rp_r_c_compl l_e_st_eq_landau_n_rt_rp_r_c_0c x) (l_e_st_eq_landau_n_rt_rp_r_c_satz210 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl l_e_st_eq_landau_n_rt_rp_r_c_0c x) x).
-
-(* constant 4953 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz210c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl l_e_st_eq_landau_n_rt_rp_r_c_0c x) x (l_e_st_eq_landau_n_rt_rp_r_c_satz210b x) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_pl l_e_st_eq_landau_n_rt_rp_r_c_0c x)).
-
-(* constant 4954 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz211 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)))) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_plis1a z (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_asspl1 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_asspl1 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_c_plis2b x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z))).
-
-(* constant 4955 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_asspl1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz211 x y z : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z))).
-
-(* constant 4956 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_asspl2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_asspl1 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z)).
-
-(* constant 4957 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2212_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re u)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pl y u)) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_isre (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re u)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im u))) (l_e_st_eq_landau_n_rt_rp_r_c_iscere (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re u)) (l_e_st_eq_landau_n_rt_rp_r_c_re x)).
-
-(* constant 4958 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2212_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im u)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pl y u)) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_isim (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re u)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im u))) (l_e_st_eq_landau_n_rt_rp_r_c_isceim (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im u)) (l_e_st_eq_landau_n_rt_rp_r_c_im x)).
-
-(* constant 4959 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2212_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x.(l_e_st_eq_landau_n_rt_rp_r_satz187d (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re u) (l_e_st_eq_landau_n_rt_rp_r_c_2212_t1 x y u i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re u) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))).
-
-(* constant 4960 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2212_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x.(l_e_st_eq_landau_n_rt_rp_r_satz187d (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im u) (l_e_st_eq_landau_n_rt_rp_r_c_2212_t2 x y u i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im u) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))).
-
-(* constant 4961 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx u (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re u) (l_e_st_eq_landau_n_rt_rp_r_c_im u)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_ispli u) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_re u) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im u) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_2212_t3 x y u i) (l_e_st_eq_landau_n_rt_rp_r_c_2212_t4 x y u i)) : l_e_st_eq_landau_n_rt_rp_r_c_is u (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))).
-
-(* constant 4962 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) x (l_e_st_eq_landau_n_rt_rp_r_c_plis2a y (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_satz187a (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_satz187a (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_pliis x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) x).
-
-(* constant 4963 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_somei l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y t) x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_satz212b x y) : l_e_st_eq_landau_n_rt_rp_r_c_some (λt:l_e_st_eq_landau_n_rt_rp_r_c_complex.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y t) x)).
-
-(* constant 4964 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_onei l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y t) x) (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y t) x.λw:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x.l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx t u (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_satz212a x y t v) (l_e_st_eq_landau_n_rt_rp_r_c_satz212a x y u w)) (l_e_st_eq_landau_n_rt_rp_r_c_satz212c x y) : l_e_st_eq_landau_n_rt_rp_r_c_one (λt:l_e_st_eq_landau_n_rt_rp_r_c_complex.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y t) x)).
-
-(* constant 4965 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mn ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 4966 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mnis12a ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))) (l_e_st_eq_landau_n_rt_rp_r_mn a c) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))) (l_e_st_eq_landau_n_rt_rp_r_mn b d) (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) a (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) c (l_e_st_eq_landau_n_rt_rp_r_c_reis a b) (l_e_st_eq_landau_n_rt_rp_r_c_reis c d)) (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) b (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) d (l_e_st_eq_landau_n_rt_rp_r_c_imis a b) (l_e_st_eq_landau_n_rt_rp_r_c_imis c d)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn a c) (l_e_st_eq_landau_n_rt_rp_r_mn b d))).
-
-(* constant 4967 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mnis12b ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn a c) (l_e_st_eq_landau_n_rt_rp_r_mn b d)) (l_e_st_eq_landau_n_rt_rp_r_c_mnis12a a b c d) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn a c) (l_e_st_eq_landau_n_rt_rp_r_mn b d)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))).
-
-(* constant 4968 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mnis1a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_mn r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_mn s (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) r (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_reis r s)) (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) s (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_imis r s)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_mn s (l_e_st_eq_landau_n_rt_rp_r_c_im x)))).
-
-(* constant 4969 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mnis1b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_mn s (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_mnis1a x r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_mn s (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x)).
-
-(* constant 4970 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mnis2a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) s) (l_e_st_eq_landau_n_rt_rp_r_ismn2 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) r (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_reis r s)) (l_e_st_eq_landau_n_rt_rp_r_ismn2 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) s (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_imis r s)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) s))).
-
-(* constant 4971 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mnis2b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) s)) (l_e_st_eq_landau_n_rt_rp_r_c_mnis2a x r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) s)) (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))).
-
-(* constant 4972 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ismn1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_mn t z) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)).
-
-(* constant 4973 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ismn2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_mn z t) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn z x) (l_e_st_eq_landau_n_rt_rp_r_c_mn z y)).
-
-(* constant 4974 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ismn12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_c_is z u.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) (l_e_st_eq_landau_n_rt_rp_r_c_mn y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn y u) (l_e_st_eq_landau_n_rt_rp_r_c_ismn1 x y z i) (l_e_st_eq_landau_n_rt_rp_r_c_ismn2 z u y j) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) (l_e_st_eq_landau_n_rt_rp_r_c_mn y u)).
-
-(* constant 4975 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212d ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x.(l_e_st_eq_landau_n_rt_rp_r_c_satz212a x y u i : l_e_st_eq_landau_n_rt_rp_r_c_is u (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)).
-
-(* constant 4976 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212e ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx u (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz212d x y u i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) u).
-
-(* constant 4977 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212f ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl u y) x.(l_e_st_eq_landau_n_rt_rp_r_c_satz212d x y u (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) (l_e_st_eq_landau_n_rt_rp_r_c_pl u y) x (l_e_st_eq_landau_n_rt_rp_r_c_compl y u) i) : l_e_st_eq_landau_n_rt_rp_r_c_is u (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)).
-
-(* constant 4978 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212g ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl u y) x.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx u (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz212f x y u i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) u).
-
-(* constant 4979 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212h ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212b x y : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) x).
-
-(* constant 4980 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2213_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_re l_e_st_eq_landau_n_rt_rp_r_c_0c) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_isre (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_iscere (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) l_e_st_eq_landau_n_rt_rp_r_c_0c i) (l_e_st_eq_landau_n_rt_rp_r_c_reis l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4981 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2213_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_im l_e_st_eq_landau_n_rt_rp_r_c_0c) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_isim (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_isceim (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) l_e_st_eq_landau_n_rt_rp_r_c_0c i) (l_e_st_eq_landau_n_rt_rp_r_c_imis l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4982 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2213_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_satz182b (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_2213_t1 x y i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)).
-
-(* constant 4983 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2213_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_satz182b (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_2213_t2 x y i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)).
-
-(* constant 4984 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz213a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) y (l_e_st_eq_landau_n_rt_rp_r_c_ispli x) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_2213_t3 x y i) (l_e_st_eq_landau_n_rt_rp_r_c_2213_t4 x y i)) (l_e_st_eq_landau_n_rt_rp_r_c_pliis y) : l_e_st_eq_landau_n_rt_rp_r_c_is x y).
-
-(* constant 4985 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2213_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_st_eq_landau_n_rt_rp_r_satz182e (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_iscere x y i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4986 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2213_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_st_eq_landau_n_rt_rp_r_satz182e (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_isceim x y i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4987 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz213b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_2213_t5 x y i) (l_e_st_eq_landau_n_rt_rp_r_c_2213_t6 x y i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 4988 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_m0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_mn l_e_st_eq_landau_n_rt_rp_r_c_0c x : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 4989 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz214 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_pl01 (l_e_st_eq_landau_n_rt_rp_r_c_re l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_reis l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl01 (l_e_st_eq_landau_n_rt_rp_r_c_im l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_imis l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))).
-
-(* constant 4990 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz214a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_satz214 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)).
-
-(* constant 4991 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_m0isa ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 a) (l_e_st_eq_landau_n_rt_rp_r_m0 b)) (l_e_st_eq_landau_n_rt_rp_r_c_satz214 (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b))) (l_e_st_eq_landau_n_rt_rp_r_m0 a) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b))) (l_e_st_eq_landau_n_rt_rp_r_m0 b) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) a (l_e_st_eq_landau_n_rt_rp_r_c_reis a b)) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) b (l_e_st_eq_landau_n_rt_rp_r_c_imis a b))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 a) (l_e_st_eq_landau_n_rt_rp_r_m0 b))).
-
-(* constant 4992 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_m0isb ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 a) (l_e_st_eq_landau_n_rt_rp_r_m0 b)) (l_e_st_eq_landau_n_rt_rp_r_c_m0isa a b) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 a) (l_e_st_eq_landau_n_rt_rp_r_m0 b)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli a b))).
-
-(* constant 4993 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ism0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_m0 t) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)).
-
-(* constant 4994 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz215 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) x (l_e_st_eq_landau_n_rt_rp_r_c_ism0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_satz214 x)) (l_e_st_eq_landau_n_rt_rp_r_c_m0isa (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_satz177 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_satz177 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_pliis x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) x).
-
-(* constant 4995 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz215a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) x (l_e_st_eq_landau_n_rt_rp_r_c_satz215 x) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x))).
-
-(* constant 4996 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz215b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) y (l_e_st_eq_landau_n_rt_rp_r_c_ism0 x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y) i) (l_e_st_eq_landau_n_rt_rp_r_c_satz215 y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y).
-
-(* constant 4997 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz215c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y (l_e_st_eq_landau_n_rt_rp_r_c_satz215b x y i) : l_e_st_eq_landau_n_rt_rp_r_c_is y (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)).
-
-(* constant 4998 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz215d ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y.(l_e_st_eq_landau_n_rt_rp_r_c_satz215c y x (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y i) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)).
-
-(* constant 4999 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz215e ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y) (l_e_st_eq_landau_n_rt_rp_r_c_satz215d x y i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 y) x).
-
-(* constant 5000 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz216 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) x (l_e_st_eq_landau_n_rt_rp_r_c_satz214 x)) (l_e_st_eq_landau_n_rt_rp_r_c_plis2a x (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satz179 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_satz179 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5001 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2216_anders ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212h l_e_st_eq_landau_n_rt_rp_r_c_0c x : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5002 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz216a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) x) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_compl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) x) (l_e_st_eq_landau_n_rt_rp_r_c_satz216 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) x) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5003 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz217 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_m0isa (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_satz180 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_satz180 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_plis12b (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y) (l_e_st_eq_landau_n_rt_rp_r_c_satz214a x) (l_e_st_eq_landau_n_rt_rp_r_c_satz214a y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y))).
-
-(* constant 5004 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz217a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz217 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))).
-
-(* constant 5005 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz218 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_plis2b x (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y) x (l_e_st_eq_landau_n_rt_rp_r_c_satz214a y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y))).
-
-(* constant 5006 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz218a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz218 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)).
-
-(* constant 5007 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2219_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 y))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_ism0 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz218 x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz217 x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) y (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_satz215 y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y)).
-
-(* constant 5008 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz219 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_mn y x) (l_e_st_eq_landau_n_rt_rp_r_c_2219_t1 x y) (l_e_st_eq_landau_n_rt_rp_r_c_compl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_satz218a y x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn y x)).
-
-(* constant 5009 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz219a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mn y x)) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz219 y x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mn y x))).
-
-(* constant 5010 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ts ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 5011 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_rets ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5012 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_imts ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5013 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))) (l_e_st_eq_landau_n_rt_rp_r_ts a c) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))) (l_e_st_eq_landau_n_rt_rp_r_ts b d) (l_e_st_eq_landau_n_rt_rp_r_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) a (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) c (l_e_st_eq_landau_n_rt_rp_r_c_reis a b) (l_e_st_eq_landau_n_rt_rp_r_c_reis c d)) (l_e_st_eq_landau_n_rt_rp_r_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) b (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) d (l_e_st_eq_landau_n_rt_rp_r_c_imis a b) (l_e_st_eq_landau_n_rt_rp_r_c_imis c d)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rets (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts a c) (l_e_st_eq_landau_n_rt_rp_r_ts b d))).
-
-(* constant 5014 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))) (l_e_st_eq_landau_n_rt_rp_r_ts a d) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))) (l_e_st_eq_landau_n_rt_rp_r_ts b c) (l_e_st_eq_landau_n_rt_rp_r_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) a (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) d (l_e_st_eq_landau_n_rt_rp_r_c_reis a b) (l_e_st_eq_landau_n_rt_rp_r_c_imis c d)) (l_e_st_eq_landau_n_rt_rp_r_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) b (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) c (l_e_st_eq_landau_n_rt_rp_r_c_imis a b) (l_e_st_eq_landau_n_rt_rp_r_c_reis c d)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_imts (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts a d) (l_e_st_eq_landau_n_rt_rp_r_ts b c))).
-
-(* constant 5015 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_tsis12a ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_rets (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts a c) (l_e_st_eq_landau_n_rt_rp_r_ts b d)) (l_e_st_eq_landau_n_rt_rp_r_c_imts (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts a d) (l_e_st_eq_landau_n_rt_rp_r_ts b c)) (l_e_st_eq_landau_n_rt_rp_r_c_v3_t1 a b c d) (l_e_st_eq_landau_n_rt_rp_r_c_v3_t2 a b c d) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts a c) (l_e_st_eq_landau_n_rt_rp_r_ts b d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts a d) (l_e_st_eq_landau_n_rt_rp_r_ts b c)))).
-
-(* constant 5016 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_tsis12b ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts a c) (l_e_st_eq_landau_n_rt_rp_r_ts b d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts a d) (l_e_st_eq_landau_n_rt_rp_r_ts b c))) (l_e_st_eq_landau_n_rt_rp_r_c_tsis12a a b c d) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts a c) (l_e_st_eq_landau_n_rt_rp_r_ts b d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts a d) (l_e_st_eq_landau_n_rt_rp_r_ts b c))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))).
-
-(* constant 5017 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) r (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_reis r s)) (l_e_st_eq_landau_n_rt_rp_r_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) s (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_imis r s)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rets (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_im x)))).
-
-(* constant 5018 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) r (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_reis r s)) (l_e_st_eq_landau_n_rt_rp_r_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) s (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_imis r s)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_imts (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_re x)))).
-
-(* constant 5019 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_tsis1a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_rets (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_imts (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_c_v3_t3 x r s) (l_e_st_eq_landau_n_rt_rp_r_c_v3_t4 x r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_re x))))).
-
-(* constant 5020 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_tsis1b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_re x)))) (l_e_st_eq_landau_n_rt_rp_r_c_tsis1a x r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_re x)))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x)).
-
-(* constant 5021 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) s) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) r (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_reis r s)) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) s (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_imis r s)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rets x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) s))).
-
-(* constant 5022 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) r) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) s (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_imis r s)) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) r (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_reis r s)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_imts x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) r))).
-
-(* constant 5023 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_tsis2a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_rets x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) s)) (l_e_st_eq_landau_n_rt_rp_r_c_imts x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) r)) (l_e_st_eq_landau_n_rt_rp_r_c_v3_t5 x r s) (l_e_st_eq_landau_n_rt_rp_r_c_v3_t6 x r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) r)))).
-
-(* constant 5024 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_tsis2b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) r))) (l_e_st_eq_landau_n_rt_rp_r_c_tsis2a x r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) r))) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))).
-
-(* constant 5025 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ists1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t z) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)).
-
-(* constant 5026 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ists2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts z t) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y)).
-
-(* constant 5027 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ists12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_c_is z u.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 x y z i) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 z u y j) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u)).
-
-(* constant 5028 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3220_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_rets y x)).
-
-(* constant 5029 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3220_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_imts y x) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts y x)).
-
-(* constant 5030 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz220 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_rets y x) (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts y x) (l_e_st_eq_landau_n_rt_rp_r_c_3220_t1 x y) (l_e_st_eq_landau_n_rt_rp_r_c_3220_t2 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y x)).
-
-(* constant 5031 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_comts ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz220 x y : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y x)).
-
-(* constant 5032 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re l_e_st_eq_landau_n_rt_rp_r_c_0c) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_iscere x l_e_st_eq_landau_n_rt_rp_r_c_0c i) (l_e_st_eq_landau_n_rt_rp_r_c_reis l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5033 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im l_e_st_eq_landau_n_rt_rp_r_c_0c) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_isceim x l_e_st_eq_landau_n_rt_rp_r_c_0c i) (l_e_st_eq_landau_n_rt_rp_r_c_imis l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5034 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mod2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5035 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma1 x i)) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma2 x i))) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5036 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_re2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5037 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_im2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5038 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) n (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0.l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_ispli x) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0 i t)) : l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5039 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_ispos (l_e_st_eq_landau_n_rt_rp_r_c_v3_im2 x) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_v3_im2 x) (l_e_st_eq_landau_n_rt_rp_r_pl01 (l_e_st_eq_landau_n_rt_rp_r_c_v3_re2 x) (l_e_st_eq_landau_n_rt_rp_r_c_v3_im2 x) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x) i))) (l_e_st_eq_landau_n_rt_rp_r_possq (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_v3_t7 x n i)) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)).
-
-(* constant 5040 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_ispos (l_e_st_eq_landau_n_rt_rp_r_c_v3_re2 x) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_v3_re2 x) (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_c_v3_re2 x) (l_e_st_eq_landau_n_rt_rp_r_c_v3_im2 x) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x) i))) (l_e_st_eq_landau_n_rt_rp_r_possq (l_e_st_eq_landau_n_rt_rp_r_c_re x) o) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)).
-
-(* constant 5041 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0.λp:l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_pospl (l_e_st_eq_landau_n_rt_rp_r_c_v3_re2 x) (l_e_st_eq_landau_n_rt_rp_r_c_v3_im2 x) (l_e_st_eq_landau_n_rt_rp_r_possq (l_e_st_eq_landau_n_rt_rp_r_c_re x) o) (l_e_st_eq_landau_n_rt_rp_r_possq (l_e_st_eq_landau_n_rt_rp_r_c_im x) p) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)).
-
-(* constant 5042 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_v3_t9 x n o t) (λt:l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_v3_t10 x n o t) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)).
-
-(* constant 5043 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_v3_t8 x n t) (λt:l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_v3_t11 x n t) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)).
-
-(* constant 5044 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x))) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_0notn (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma3 x t)) (λt:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_pnotn (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma4 x t)) : l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x))).
-
-(* constant 5045 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma1 x i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5046 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma2 x i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5047 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t1 x y i)) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t2 x y i))) (l_e_st_eq_landau_n_rt_rp_r_satz187c l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl02 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5048 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t1 x y i)) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t2 x y i))) (l_e_st_eq_landau_n_rt_rp_r_pl02 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5049 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz221a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_3221_t3 x y i) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t4 x y i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5050 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz221b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y x) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_comts x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz221a y x i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5051 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma4 y n : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y)).
-
-(* constant 5052 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_reis (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma1 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5053 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_imis (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma2 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5054 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t6 x y i n)) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t7 x y i n))) (l_e_st_eq_landau_n_rt_rp_r_pl02 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5055 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_ii1r ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_re y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5056 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ir ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5057 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_ir1i ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5058 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5059 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_rr1r ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_re y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5060 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5061 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_ri1r ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_re y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5062 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ir ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5063 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_ri1i ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5064 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5065 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_3221_ii1r x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ir x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y) (l_e_st_eq_landau_n_rt_rp_r_assts1 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_3221_ii1r x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)).
-
-(* constant 5066 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3221_rr1r x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_ii1r x y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_disttm1 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_3221_rr1r x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_ii1r x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y) (l_e_st_eq_landau_n_rt_rp_r_assts1 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t9 x y i n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y))).
-
-(* constant 5067 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3221_ri1i x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_ir1i x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y)) (l_e_st_eq_landau_n_rt_rp_r_disttp1 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_3221_ri1i x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_ir1i x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y) (l_e_st_eq_landau_n_rt_rp_r_assts1 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_assts1 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y))).
-
-(* constant 5068 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t10 x y i n) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t11 x y i n)) (l_e_st_eq_landau_n_rt_rp_r_asspl2 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y)) (l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y) (l_e_st_eq_landau_n_rt_rp_r_plmn (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y))) (l_e_st_eq_landau_n_rt_rp_r_distpt2 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y))).
-
-(* constant 5069 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t12 x y i n) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t8 x y i n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5070 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz192c (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t13 x y i n)) (l_e_st_eq_landau_n_rt_rp_r_pnot0 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t5 x y i n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5071 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t15 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_satz182b (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t6 x y i n)) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t14 x y i n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5072 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t16 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_pl01 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t14 x y i n))) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t7 x y i n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5073 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t17 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λj:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re y) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_v3_t7 y n j : l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_im y) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5074 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t18 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λj:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re y) l_e_st_eq_landau_n_rt_rp_r_0.(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im y) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz192c (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t15 x y i n)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t17 x y i n j) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5075 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t19 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_re y) l_e_st_eq_landau_n_rt_rp_r_0.(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re y) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz192c (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t16 x y i n)) o : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5076 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t20 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re y) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re y) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_3221_t18 x y i n t) (λt:l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_re y) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_3221_t19 x y i n t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5077 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t21 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_ispli x) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_3221_t14 x y i n) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t20 x y i n)) : l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5078 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz221c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_or_th2 (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is y l_e_st_eq_landau_n_rt_rp_r_c_0c) (λt:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_3221_t21 x y i t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is y l_e_st_eq_landau_n_rt_rp_r_c_0c)).
-
-(* constant 5079 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz221d ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_or (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_or_th3 (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is y l_e_st_eq_landau_n_rt_rp_r_c_0c) n o) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_satz221c x y t) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5080 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3222_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satz195 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts02 (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz176b l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_re x)).
-
-(* constant 5081 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3222_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_ts02 (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_satz195 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_c_im x)).
-
-(* constant 5082 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz222 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_1rl))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) x (l_e_st_eq_landau_n_rt_rp_r_c_tsis2a x l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_3222_t1 x) (l_e_st_eq_landau_n_rt_rp_r_c_3222_t2 x)) (l_e_st_eq_landau_n_rt_rp_r_c_pliis x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x l_e_st_eq_landau_n_rt_rp_r_c_1c) x).
-
-(* constant 5083 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz222a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x l_e_st_eq_landau_n_rt_rp_r_c_1c) x (l_e_st_eq_landau_n_rt_rp_r_c_satz222 x) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_ts x l_e_st_eq_landau_n_rt_rp_r_c_1c)).
-
-(* constant 5084 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz222b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c x) (l_e_st_eq_landau_n_rt_rp_r_c_ts x l_e_st_eq_landau_n_rt_rp_r_c_1c) x (l_e_st_eq_landau_n_rt_rp_r_c_comts l_e_st_eq_landau_n_rt_rp_r_c_1c x) (l_e_st_eq_landau_n_rt_rp_r_c_satz222 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c x) x).
-
-(* constant 5085 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz222c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c x) x (l_e_st_eq_landau_n_rt_rp_r_c_satz222b x) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c x)).
-
-(* constant 5086 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3223_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_satz197b (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_satz195 (l_e_st_eq_landau_n_rt_rp_r_c_re x)))) (l_e_st_eq_landau_n_rt_rp_r_ts02 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz176b l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)))) (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz176b l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x))).
-
-(* constant 5087 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3223_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl))) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts02 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz176b l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_satz197b (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_satz195 (l_e_st_eq_landau_n_rt_rp_r_c_im x))))) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))).
-
-(* constant 5088 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz223 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) x (l_e_st_eq_landau_n_rt_rp_r_c_m0isa l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_tsis2a x (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_3223_t1 x) (l_e_st_eq_landau_n_rt_rp_r_c_3223_t2 x)) (l_e_st_eq_landau_n_rt_rp_r_c_satz214a x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)).
-
-(* constant 5089 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz223a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_satz223 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c))).
-
-(* constant 5090 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz223b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_comts (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c) x) (l_e_st_eq_landau_n_rt_rp_r_c_satz223 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c) x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)).
-
-(* constant 5091 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz223c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c) x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_satz223b x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c) x)).
-
-(* constant 5092 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5093 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5094 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3224_rxiy ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5095 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3224_ixry ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5096 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3224_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y) (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y))) (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y)) (l_e_st_eq_landau_n_rt_rp_r_satz197a (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_satz197a (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y))) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y)) (l_e_st_eq_landau_n_rt_rp_r_satz177 (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y))) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y)) (l_e_st_eq_landau_n_rt_rp_r_satz181a (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y) (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y)))).
-
-(* constant 5097 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3224_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxiy x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixry x y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxiy x y) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixry x y))) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxiy x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixry x y)) (l_e_st_eq_landau_n_rt_rp_r_satz197a (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_satz197a (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_satz180a (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxiy x y) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixry x y)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxiy x y) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixry x y)))).
-
-(* constant 5098 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz224a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) y) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))))) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) y (l_e_st_eq_landau_n_rt_rp_r_c_satz214 x)) (l_e_st_eq_landau_n_rt_rp_r_c_tsis1a y (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_c_3224_t1 x y) (l_e_st_eq_landau_n_rt_rp_r_c_3224_t2 x y)) (l_e_st_eq_landau_n_rt_rp_r_c_m0isb (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y))).
-
-(* constant 5099 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz224b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 y) x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts y x)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_comts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz224a y x) (l_e_st_eq_landau_n_rt_rp_r_c_ism0 (l_e_st_eq_landau_n_rt_rp_r_c_ts y x) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_comts y x)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y))).
-
-(* constant 5100 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz224c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz224a x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz224b x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y))).
-
-(* constant 5101 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz224d ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz224c x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y)).
-
-(* constant 5102 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz224e ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz224a x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y)).
-
-(* constant 5103 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz224f ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz224b x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y))).
-
-(* constant 5104 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz225 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 y))) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz224c x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) y x (l_e_st_eq_landau_n_rt_rp_r_c_satz215 y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)).
-
-(* constant 5105 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz225a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz225 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y))).
-
-(* constant 5106 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_re z) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5107 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_iir ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_re z) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5108 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_rii ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_im z) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5109 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_iri ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im z) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5110 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_rri ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im z) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5111 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_iii ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_im z) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5112 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_rir ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_re z) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5113 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_irr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_re z) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5114 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z))))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)) (l_e_st_eq_landau_n_rt_rp_r_disttm1 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_disttp1 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_asspl1 (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_satz180a (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z))))).
-
-(* constant 5115 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_disttm1 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_disttp1 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z))) (l_e_st_eq_landau_n_rt_rp_r_asspl2 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z))).
-
-(* constant 5116 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z))) (l_e_st_eq_landau_n_rt_rp_r_c_tsis1a z (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t2 x y z)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z)))).
-
-(* constant 5117 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts a b) c) (l_e_st_eq_landau_n_rt_rp_r_ts a (l_e_st_eq_landau_n_rt_rp_r_ts b c)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts b c) a) (l_e_st_eq_landau_n_rt_rp_r_assts1 a b c) (l_e_st_eq_landau_n_rt_rp_r_comts a (l_e_st_eq_landau_n_rt_rp_r_ts b c)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts a b) c) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts b c) a)).
-
-(* constant 5118 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) c) (l_e_st_eq_landau_n_rt_rp_r_pl c (l_e_st_eq_landau_n_rt_rp_r_pl a b)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl c a) b) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_pl a b) c) (l_e_st_eq_landau_n_rt_rp_r_asspl2 c a b) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) c) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl c a) b)).
-
-(* constant 5119 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl a (l_e_st_eq_landau_n_rt_rp_r_pl b c)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl b c) a) (l_e_st_eq_landau_n_rt_rp_r_pl b (l_e_st_eq_landau_n_rt_rp_r_pl c a)) (l_e_st_eq_landau_n_rt_rp_r_compl a (l_e_st_eq_landau_n_rt_rp_r_pl b c)) (l_e_st_eq_landau_n_rt_rp_r_asspl1 b c a) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl a (l_e_st_eq_landau_n_rt_rp_r_pl b c)) (l_e_st_eq_landau_n_rt_rp_r_pl b (l_e_st_eq_landau_n_rt_rp_r_pl c a))).
-
-(* constant 5120 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr y z x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5121 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_iir y z x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5122 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_rii y z x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5123 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_iri y z x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5124 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_rri y z x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5125 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_iii y z x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5126 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_rir y z x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5127 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_irr y z x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5128 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z))) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t6 (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z)))).
-
-(* constant 5129 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t5 (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z))).
-
-(* constant 5130 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z))) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t7 x y z) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z))))).
-
-(* constant 5131 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t8 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 x y z))).
-
-(* constant 5132 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 x y z))) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t3 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t9 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t10 x y z)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 x y z)))).
-
-(* constant 5133 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 x y z))) (l_e_st_eq_landau_n_rt_rp_r_c_comts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t3 y z x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 x y z)))).
-
-(* constant 5134 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 x y z))) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t11 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t12 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z))).
-
-(* constant 5135 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz226 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_t13 x y z : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z))).
-
-(* constant 5136 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_assts1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz226 x y z : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z))).
-
-(* constant 5137 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_assts2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z)).
-
-(* constant 5138 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3227_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) c) (l_e_st_eq_landau_n_rt_rp_r_pl a (l_e_st_eq_landau_n_rt_rp_r_pl b c)) (l_e_st_eq_landau_n_rt_rp_r_pl a (l_e_st_eq_landau_n_rt_rp_r_pl c b)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a c) b) (l_e_st_eq_landau_n_rt_rp_r_asspl1 a b c) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_pl b c) (l_e_st_eq_landau_n_rt_rp_r_pl c b) a (l_e_st_eq_landau_n_rt_rp_r_compl b c)) (l_e_st_eq_landau_n_rt_rp_r_asspl2 a c b) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) c) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a c) b)).
-
-(* constant 5139 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3227_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) (l_e_st_eq_landau_n_rt_rp_r_pl c d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) c) d) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a c) b) d) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a c) (l_e_st_eq_landau_n_rt_rp_r_pl b d)) (l_e_st_eq_landau_n_rt_rp_r_asspl2 (l_e_st_eq_landau_n_rt_rp_r_pl a b) c d) (l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) c) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a c) b) d (l_e_st_eq_landau_n_rt_rp_r_c_3227_t1 a b c)) (l_e_st_eq_landau_n_rt_rp_r_asspl1 (l_e_st_eq_landau_n_rt_rp_r_pl a c) b d) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) (l_e_st_eq_landau_n_rt_rp_r_pl c d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a c) (l_e_st_eq_landau_n_rt_rp_r_pl b d))).
-
-(* constant 5140 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3227_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl a b) (l_e_st_eq_landau_n_rt_rp_r_pl c d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 c) (l_e_st_eq_landau_n_rt_rp_r_m0 d))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn a c) (l_e_st_eq_landau_n_rt_rp_r_mn b d)) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl c d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 c) (l_e_st_eq_landau_n_rt_rp_r_m0 d)) (l_e_st_eq_landau_n_rt_rp_r_pl a b) (l_e_st_eq_landau_n_rt_rp_r_satz180 c d)) (l_e_st_eq_landau_n_rt_rp_r_c_3227_t2 a b (l_e_st_eq_landau_n_rt_rp_r_m0 c) (l_e_st_eq_landau_n_rt_rp_r_m0 d)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl a b) (l_e_st_eq_landau_n_rt_rp_r_pl c d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn a c) (l_e_st_eq_landau_n_rt_rp_r_mn b d))).
-
-(* constant 5141 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3227_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_rets x z)) (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_disttp2 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_disttp2 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_c_3227_t3 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_rets x z))).
-
-(* constant 5142 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3227_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x z)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_disttp2 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_disttp2 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_c_3227_t2 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x z))).
-
-(* constant 5143 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3227_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_rets x z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x z))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_tsis2a x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_rets x z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_3227_t4 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3227_t5 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_plis12b (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_rets x z) (l_e_st_eq_landau_n_rt_rp_r_c_imts x z)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z))).
-
-(* constant 5144 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz227 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3227_t6 x y z : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z))).
-
-(* constant 5145 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_disttp1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_comts (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_satz227 z x y) (l_e_st_eq_landau_n_rt_rp_r_c_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_comts z x) (l_e_st_eq_landau_n_rt_rp_r_c_comts z y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z))).
-
-(* constant 5146 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_disttp2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz227 x y z : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z))).
-
-(* constant 5147 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_distpt1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_disttp1 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z)).
-
-(* constant 5148 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_distpt2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_disttp2 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z))).
-
-(* constant 5149 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz228 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_m0 z))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 z))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x z))) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_mn y z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_m0 z)) x (l_e_st_eq_landau_n_rt_rp_r_c_satz218 y z)) (l_e_st_eq_landau_n_rt_rp_r_c_disttp2 x y (l_e_st_eq_landau_n_rt_rp_r_c_m0 z)) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 z)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz224b x z)) (l_e_st_eq_landau_n_rt_rp_r_c_satz218a (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z))).
-
-(* constant 5150 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_disttm1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_comts (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_satz228 z x y) (l_e_st_eq_landau_n_rt_rp_r_c_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_comts z x) (l_e_st_eq_landau_n_rt_rp_r_c_comts z y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z))).
-
-(* constant 5151 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_disttm2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz228 x y z : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z))).
-
-(* constant 5152 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_distmt1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_disttm1 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z)).
-
-(* constant 5153 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_distmt2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_disttm2 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z))).
-
-(* constant 5154 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λu1:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu2:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u1) x.λj:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u2) x.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts y u1) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u2) x i j : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u1) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u2)).
-
-(* constant 5155 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λu1:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu2:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u1) x.λj:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u2) x.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_mn u1 u2)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts y u1) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u2)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_disttm2 y u1 u2) (l_e_st_eq_landau_n_rt_rp_r_c_satz213b (l_e_st_eq_landau_n_rt_rp_r_c_ts y u1) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u2) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t1 x y n u1 u2 i j)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_mn u1 u2)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5156 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λu1:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu2:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u1) x.λj:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u2) x.(l_ore2 (l_e_st_eq_landau_n_rt_rp_r_c_is y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn u1 u2) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_satz221c y (l_e_st_eq_landau_n_rt_rp_r_c_mn u1 u2) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t2 x y n u1 u2 i j)) n : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn u1 u2) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5157 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λu1:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu2:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u1) x.λj:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u2) x.(l_e_st_eq_landau_n_rt_rp_r_c_satz213a u1 u2 (l_e_st_eq_landau_n_rt_rp_r_c_3229_t3 x y n u1 u2 i j) : l_e_st_eq_landau_n_rt_rp_r_c_is u1 u2).
-
-(* constant 5158 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_pnot0 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_lemma4 y n) : l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5159 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_u ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ov (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ov (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)))) x : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 5160 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_dd ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λv:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_ov v (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5161 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_satz197b (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_satz177 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_lemma6 (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))).
-
-(* constant 5162 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y)) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_lemma6 (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t5 x y n)) (l_e_st_eq_landau_n_rt_rp_r_lemma7 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)) (l_e_st_eq_landau_n_rt_rp_r_lemma8 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 5163 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_satz197d (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_lemma6 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))).
-
-(* constant 5164 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t7 x y n) (l_e_st_eq_landau_n_rt_rp_r_lemma6 (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n))) (l_e_st_eq_landau_n_rt_rp_r_lemma7 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))))).
-
-(* constant 5165 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_satz197a (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_satz182e (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5166 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_t8 x y n) (l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n t) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_t9 x y n)) (l_e_st_eq_landau_n_rt_rp_r_lemma9 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5167 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y))))) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_tsis2a y (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_t6 x y n) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t10 x y n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 5168 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_3229_u x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c x) x (l_e_st_eq_landau_n_rt_rp_r_c_assts2 y (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) x) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) l_e_st_eq_landau_n_rt_rp_r_c_1c x (l_e_st_eq_landau_n_rt_rp_r_c_3229_t11 x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_satz222b x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_3229_u x y n)) x).
-
-(* constant 5169 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_somei l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y t) x) (l_e_st_eq_landau_n_rt_rp_r_c_3229_u x y n) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t12 x y n) : l_e_st_eq_landau_n_rt_rp_r_c_some (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y t) x)).
-
-(* constant 5170 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_onei l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y t) x) (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y t) x.λw:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) x.l_e_st_eq_landau_n_rt_rp_r_c_satz229b x y n t u v w) (l_e_st_eq_landau_n_rt_rp_r_c_satz229a x y n) : l_e_st_eq_landau_n_rt_rp_r_c_one (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y t) x)).
-
-(* constant 5171 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ov ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_ind l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y t) x) (l_e_st_eq_landau_n_rt_rp_r_c_satz229 x y n) : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 5172 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_oneax l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y t) x) (l_e_st_eq_landau_n_rt_rp_r_c_satz229 x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) x).
-
-(* constant 5173 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229d ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) x (l_e_st_eq_landau_n_rt_rp_r_c_satz229c x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n))).
-
-(* constant 5174 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229e ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) x (l_e_st_eq_landau_n_rt_rp_r_c_comts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) (l_e_st_eq_landau_n_rt_rp_r_c_satz229c x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) x).
-
-(* constant 5175 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229f ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) x (l_e_st_eq_landau_n_rt_rp_r_c_satz229e x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y)).
-
-(* constant 5176 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229g ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) x.(l_e_st_eq_landau_n_rt_rp_r_c_satz229b x y n u (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) i (l_e_st_eq_landau_n_rt_rp_r_c_satz229c x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is u (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)).
-
-(* constant 5177 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229h ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) x.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx u (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz229g x y u n i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) u).
-
-(* constant 5178 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229j ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts u y) x.(l_e_st_eq_landau_n_rt_rp_r_c_satz229g x y u n (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_ts u y) x (l_e_st_eq_landau_n_rt_rp_r_c_comts y u) i) : l_e_st_eq_landau_n_rt_rp_r_c_is u (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)).
-
-(* constant 5179 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229k ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts u y) x.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx u (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz229j x y u n i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) u).
-
-(* constant 5180 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isov1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ov t z n) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)).
-
-(* constant 5181 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isov2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229h z x (l_e_st_eq_landau_n_rt_rp_r_c_ov z y o) n (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ov z y o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov z y o)) z (l_e_st_eq_landau_n_rt_rp_r_c_ists1 x y (l_e_st_eq_landau_n_rt_rp_r_c_ov z y o) i) (l_e_st_eq_landau_n_rt_rp_r_c_satz229c z y o)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov z x n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y o)).
-
-(* constant 5182 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isov12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_c_is z u.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y u o) (l_e_st_eq_landau_n_rt_rp_r_c_isov1 x y z i n) (l_e_st_eq_landau_n_rt_rp_r_c_isov2 z u y j n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y u o)).
-
-(* constant 5183 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz230 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) x (l_e_st_eq_landau_n_rt_rp_r_c_compl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) (l_e_st_eq_landau_n_rt_rp_r_c_satz212h x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) x).
-
-(* constant 5184 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz231 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212e (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) y x (l_e_st_eq_landau_n_rt_rp_r_c_compl y x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) y) x).
-
-(* constant 5185 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz232 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212e x (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y (l_e_st_eq_landau_n_rt_rp_r_c_satz230 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) y).
-
-(* constant 5186 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4233_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl z y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) z) y) (l_e_st_eq_landau_n_rt_rp_r_c_compl (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z)) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_pl z y) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_compl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_asspl2 (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) z y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) z) y)).
-
-(* constant 5187 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4233_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) z) y) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) x (l_e_st_eq_landau_n_rt_rp_r_c_4233_t1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y (l_e_st_eq_landau_n_rt_rp_r_c_satz230 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z)) (l_e_st_eq_landau_n_rt_rp_r_c_satz230 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z)) x).
-
-(* constant 5188 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz233 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212d x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_4233_t2 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z))).
-
-(* constant 5189 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz234 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212g (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn y z) z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) (l_e_st_eq_landau_n_rt_rp_r_c_asspl1 x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z) z) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn y z) z) y x (l_e_st_eq_landau_n_rt_rp_r_c_satz230 y z))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z))).
-
-(* constant 5190 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz234a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_satz234 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z)).
-
-(* constant 5191 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz234b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl y x) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_mn x z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) y) (l_e_st_eq_landau_n_rt_rp_r_c_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y x) z (l_e_st_eq_landau_n_rt_rp_r_c_compl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz234 y x z) (l_e_st_eq_landau_n_rt_rp_r_c_compl y (l_e_st_eq_landau_n_rt_rp_r_c_mn x z)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) y)).
-
-(* constant 5192 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz234c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) y) (l_e_st_eq_landau_n_rt_rp_r_c_satz234b x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) y) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z)).
-
-(* constant 5193 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz235 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212f x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl z (l_e_st_eq_landau_n_rt_rp_r_c_mn y z))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) x (l_e_st_eq_landau_n_rt_rp_r_c_asspl1 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_pl z (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) y (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz212h y z)) (l_e_st_eq_landau_n_rt_rp_r_c_satz230 x y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z))).
-
-(* constant 5194 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz235a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_satz235 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z)).
-
-(* constant 5195 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz235b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) y) (l_e_st_eq_landau_n_rt_rp_r_c_satz235a x y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz234c x z y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) y)).
-
-(* constant 5196 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz235c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) y) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl z x) y) (l_e_st_eq_landau_n_rt_rp_r_c_satz235b x y z) (l_e_st_eq_landau_n_rt_rp_r_c_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl z x) y (l_e_st_eq_landau_n_rt_rp_r_c_compl x z)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl z x) y)).
-
-(* constant 5197 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz236 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212g (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_asspl2 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y z) (l_e_st_eq_landau_n_rt_rp_r_c_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) x z (l_e_st_eq_landau_n_rt_rp_r_c_satz230 x y))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)).
-
-(* constant 5198 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz236a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl z x) (l_e_st_eq_landau_n_rt_rp_r_c_pl z y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_pl z x) (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl z y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_compl z x) (l_e_st_eq_landau_n_rt_rp_r_c_compl z y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz236 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl z x) (l_e_st_eq_landau_n_rt_rp_r_c_pl z y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)).
-
-(* constant 5199 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4237_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) (l_e_st_eq_landau_n_rt_rp_r_c_pl u y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) u) y) (l_e_st_eq_landau_n_rt_rp_r_c_pl z y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_asspl2 (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) u y) (l_e_st_eq_landau_n_rt_rp_r_c_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) u) z y (l_e_st_eq_landau_n_rt_rp_r_c_satz230 z u)) (l_e_st_eq_landau_n_rt_rp_r_c_compl z y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) (l_e_st_eq_landau_n_rt_rp_r_c_pl u y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)).
-
-(* constant 5200 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4237_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl y u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl u y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) (l_e_st_eq_landau_n_rt_rp_r_c_pl u y))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) (l_e_st_eq_landau_n_rt_rp_r_c_pl u y) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_compl y u)) (l_e_st_eq_landau_n_rt_rp_r_c_asspl1 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) (l_e_st_eq_landau_n_rt_rp_r_c_pl u y)) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) (l_e_st_eq_landau_n_rt_rp_r_c_pl u y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_4237_t1 x y z u)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl y u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z))).
-
-(* constant 5201 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4237_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl y u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_4237_t2 x y z u) (l_e_st_eq_landau_n_rt_rp_r_c_asspl2 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y z) (l_e_st_eq_landau_n_rt_rp_r_c_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) x z (l_e_st_eq_landau_n_rt_rp_r_c_satz230 x y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl y u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl x z)).
-
-(* constant 5202 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz237 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212f (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_4237_t3 x y z u) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y u))).
-
-(* constant 5203 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4238_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl u z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl z u)) (l_e_st_eq_landau_n_rt_rp_r_c_asspl1 x u z) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_pl u z) (l_e_st_eq_landau_n_rt_rp_r_c_pl z u) x (l_e_st_eq_landau_n_rt_rp_r_c_compl u z)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl z u))).
-
-(* constant 5204 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4238_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) u)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl z u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_pl z u))) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz237 (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) z u) (l_e_st_eq_landau_n_rt_rp_r_c_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl z u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_pl z u)) (l_e_st_eq_landau_n_rt_rp_r_c_4238_t1 x y z u) (l_e_st_eq_landau_n_rt_rp_r_c_asspl1 y z u)) (l_e_st_eq_landau_n_rt_rp_r_c_satz236 x y (l_e_st_eq_landau_n_rt_rp_r_c_pl z u)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)).
-
-(* constant 5205 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz238 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212g (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_4238_t2 x y z u) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z))).
-
-(* constant 5206 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4239_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u).(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_satz238 x y z u) (l_e_st_eq_landau_n_rt_rp_r_c_satz213b (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5207 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz239a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u).(l_e_st_eq_landau_n_rt_rp_r_c_satz213a (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_4239_t1 x y z u i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)).
-
-(* constant 5208 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4239_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_satz238 x y z u) (l_e_st_eq_landau_n_rt_rp_r_c_satz213b (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5209 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz239b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z).(l_e_st_eq_landau_n_rt_rp_r_c_satz213a (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) (l_e_st_eq_landau_n_rt_rp_r_c_4239_t2 x y z u i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)).
-
-(* constant 5210 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz240 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) x (l_e_st_eq_landau_n_rt_rp_r_c_comts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) (l_e_st_eq_landau_n_rt_rp_r_c_satz229c x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) x).
-
-(* constant 5211 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz241 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229h (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) y x n (l_e_st_eq_landau_n_rt_rp_r_c_comts y x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) y n) x).
-
-(* constant 5212 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y o) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) n (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y o) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx x l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y o)) (l_e_st_eq_landau_n_rt_rp_r_c_satz229c x y o) (l_e_st_eq_landau_n_rt_rp_r_c_satz221b y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y o) t)) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ov x y o) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5213 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz242 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229h x (l_e_st_eq_landau_n_rt_rp_r_c_ov x y o) y (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 x y n o) (l_e_st_eq_landau_n_rt_rp_r_c_satz240 x y o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ov x y o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 x y n o)) y).
-
-(* constant 5214 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5243_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) z) y) (l_e_st_eq_landau_n_rt_rp_r_c_comts (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o)) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) (l_e_st_eq_landau_n_rt_rp_r_c_comts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_assts2 (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) z y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) z) y)).
-
-(* constant 5215 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5243_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) z) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) x (l_e_st_eq_landau_n_rt_rp_r_c_5243_t1 x y z n o) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) z) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y (l_e_st_eq_landau_n_rt_rp_r_c_satz240 (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o)) (l_e_st_eq_landau_n_rt_rp_r_c_satz240 x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o)) x).
-
-(* constant 5216 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz243 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229g x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o) (l_e_st_eq_landau_n_rt_rp_r_c_5243_t2 x y z n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o))).
-
-(* constant 5217 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz244 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229k (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)) n (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n) z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n) z) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n) z) y x (l_e_st_eq_landau_n_rt_rp_r_c_satz240 y z n))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n))).
-
-(* constant 5218 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz244a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)) (l_e_st_eq_landau_n_rt_rp_r_c_satz244 x y z n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z n)).
-
-(* constant 5219 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz244b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts y x) z n) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) y) (l_e_st_eq_landau_n_rt_rp_r_c_isov1 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y x) z (l_e_st_eq_landau_n_rt_rp_r_c_comts x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_satz244 y x z n) (l_e_st_eq_landau_n_rt_rp_r_c_comts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) y)).
-
-(* constant 5220 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz244c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) y) (l_e_st_eq_landau_n_rt_rp_r_c_satz244b x y z n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) y) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z n)).
-
-(* constant 5221 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz245 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229j x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 y z n o) (l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) x (l_e_st_eq_landau_n_rt_rp_r_c_assts1 (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o)) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o)) y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz229c y z o)) (l_e_st_eq_landau_n_rt_rp_r_c_satz240 x y n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z) (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 y z n o))).
-
-(* constant 5222 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz245a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z) (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_satz245 x y z n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z)).
-
-(* constant 5223 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz245b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz245a x y z n o) (l_e_st_eq_landau_n_rt_rp_r_c_satz244c x z y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) y n)).
-
-(* constant 5224 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz245c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz245b x y z n o) (l_e_st_eq_landau_n_rt_rp_r_c_isov1 (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) y (l_e_st_eq_landau_n_rt_rp_r_c_comts x z) n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) y n)).
-
-(* constant 5225 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz246 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229k (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_assts2 (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y z) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) x z (l_e_st_eq_landau_n_rt_rp_r_c_satz240 x y n))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)).
-
-(* constant 5226 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz246a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d z y o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_isov12 (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_comts z x) (l_e_st_eq_landau_n_rt_rp_r_c_comts z y) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d z y o n) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_satz246 x y z n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d z y o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)).
-
-(* constant 5227 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5247_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_ts u y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) u) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_assts2 (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) u y) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) u) z y (l_e_st_eq_landau_n_rt_rp_r_c_satz240 z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_comts z y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_ts u y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)).
-
-(* constant 5228 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5247_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts u y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_ts u y))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_ts u y) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_comts y u)) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_ts u y)) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_ts u y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_5247_t1 x y z u n o)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z))).
-
-(* constant 5229 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5247_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_5247_t2 x y z u n o) (l_e_st_eq_landau_n_rt_rp_r_c_assts2 (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y z) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) x z (l_e_st_eq_landau_n_rt_rp_r_c_satz240 x y n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)).
-
-(* constant 5230 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz247 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229j (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o) (l_e_st_eq_landau_n_rt_rp_r_c_5247_t3 x y z u n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o))).
-
-(* constant 5231 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5248_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts u z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 x u z) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ts u z) (l_e_st_eq_landau_n_rt_rp_r_c_ts z u) x (l_e_st_eq_landau_n_rt_rp_r_c_comts u z)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts z u))).
-
-(* constant 5232 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5248_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u p)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) u (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o) p)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y (l_e_st_eq_landau_n_rt_rp_r_c_ts z u) n (l_e_st_eq_landau_n_rt_rp_r_c_satz221d z u o p))) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz247 (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) z u (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o) p) (l_e_st_eq_landau_n_rt_rp_r_c_isov12 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_5248_t1 x y z u n o p) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 y z u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) u (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o) p) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y (l_e_st_eq_landau_n_rt_rp_r_c_ts z u) n (l_e_st_eq_landau_n_rt_rp_r_c_satz221d z u o p))) (l_e_st_eq_landau_n_rt_rp_r_c_satz246 x y (l_e_st_eq_landau_n_rt_rp_r_c_ts z u) n (l_e_st_eq_landau_n_rt_rp_r_c_satz221d z u o p)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u p)) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)).
-
-(* constant 5233 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz248 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229k (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u p) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 z u o p) (l_e_st_eq_landau_n_rt_rp_r_c_5248_t2 x y z u n o p) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u p) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 z u o p)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o))).
-
-(* constant 5234 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz249 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229h l_e_st_eq_landau_n_rt_rp_r_c_0c x l_e_st_eq_landau_n_rt_rp_r_c_0c n (l_e_st_eq_landau_n_rt_rp_r_c_satz221b x l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_0c)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_0c x n) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5235 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz250 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229h x x l_e_st_eq_landau_n_rt_rp_r_c_1c n (l_e_st_eq_landau_n_rt_rp_r_c_satz222 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x x n) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 5236 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz251a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov x x (l_e_notis_th2 l_e_st_eq_landau_n_rt_rp_r_c_cx y l_e_st_eq_landau_n_rt_rp_r_c_0c x n i)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_isov2 y x x (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx x y i) n (l_e_notis_th2 l_e_st_eq_landau_n_rt_rp_r_c_cx y l_e_st_eq_landau_n_rt_rp_r_c_0c x n i)) (l_e_st_eq_landau_n_rt_rp_r_c_satz250 x (l_e_notis_th2 l_e_st_eq_landau_n_rt_rp_r_c_cx y l_e_st_eq_landau_n_rt_rp_r_c_0c x n i)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 5237 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz251b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) l_e_st_eq_landau_n_rt_rp_r_c_1c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y l_e_st_eq_landau_n_rt_rp_r_c_1c) y (l_e_st_eq_landau_n_rt_rp_r_c_satz229d x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) l_e_st_eq_landau_n_rt_rp_r_c_1c y i) (l_e_st_eq_landau_n_rt_rp_r_c_satz222 y) : l_e_st_eq_landau_n_rt_rp_r_c_is x y).
-
-(* constant 5238 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o).λj:l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_0c u o) l_e_st_eq_landau_n_rt_rp_r_c_0c i (l_e_st_eq_landau_n_rt_rp_r_c_isov1 z l_e_st_eq_landau_n_rt_rp_r_c_0c u j o) (l_e_st_eq_landau_n_rt_rp_r_c_satz249 u o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5239 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o).λj:l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_satz229d x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz221b y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_5252_t1 x y z u n o i j)) : l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5240 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o).λj:l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_satz221a x u (l_e_st_eq_landau_n_rt_rp_r_c_5252_t2 x y z u n o i j)) (l_e_st_eq_landau_n_rt_rp_r_c_satz221b y z j) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)).
-
-(* constant 5241 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n p)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 z u p o)) (l_e_st_eq_landau_n_rt_rp_r_c_satz248 x y z u n p o) (l_e_st_eq_landau_n_rt_rp_r_c_satz251a (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 z u p o) i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n p)) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 5242 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz251b (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n p) (l_e_st_eq_landau_n_rt_rp_r_c_5252_t4 x y z u n o i p) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)).
-
-(* constant 5243 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz252a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_5252_t3 x y z u n o i t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_5252_t5 x y z u n o i t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)).
-
-(* constant 5244 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z).λj:l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) l_e_st_eq_landau_n_rt_rp_r_c_0c i (l_e_st_eq_landau_n_rt_rp_r_c_satz221b y z j) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5245 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z).λj:l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is u l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_satz221c x u (l_e_st_eq_landau_n_rt_rp_r_c_5252_t6 x y z u n o i j)) o : l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5246 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z).λj:l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_0c y n) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_isov1 x l_e_st_eq_landau_n_rt_rp_r_c_0c y (l_e_st_eq_landau_n_rt_rp_r_c_5252_t7 x y z u n o i j) n) (l_e_st_eq_landau_n_rt_rp_r_c_satz249 y n)) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_0c u o) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_isov1 z l_e_st_eq_landau_n_rt_rp_r_c_0c u j o) (l_e_st_eq_landau_n_rt_rp_r_c_satz249 u o)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)).
-
-(* constant 5247 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 z u p o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n p)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_satz248 x y z u n p o) (l_e_st_eq_landau_n_rt_rp_r_c_satz251a (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n p) i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 z u p o)) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 5248 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz251b (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 z u p o) (l_e_st_eq_landau_n_rt_rp_r_c_5252_t9 x y z u n o i p) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)).
-
-(* constant 5249 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz252b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_5252_t8 x y z u n o i t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_5252_t10 x y z u n o i t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)).
-
-(* constant 5250 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz253 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229g (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) y (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n)) n (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n))) (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_disttp2 y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) x (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n)) z (l_e_st_eq_landau_n_rt_rp_r_c_satz229c x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz229c z y n))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) y n)).
-
-(* constant 5251 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_distop ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_satz253 x z y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n))).
-
-(* constant 5252 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_distpo ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz253 x z y n : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z n)).
-
-(* constant 5253 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz254 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o))) (l_e_st_eq_landau_n_rt_rp_r_c_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_satz246 x y u n o) (l_e_st_eq_landau_n_rt_rp_r_c_satz246a z u y o n)) (l_e_st_eq_landau_n_rt_rp_r_c_satz253 (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o))).
-
-(* constant 5254 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz255 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229g (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) y (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n)) n (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n))) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n))) (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) (l_e_st_eq_landau_n_rt_rp_r_c_disttm2 y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) x (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n)) z (l_e_st_eq_landau_n_rt_rp_r_c_satz229c x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz229c z y n))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) y n)).
-
-(* constant 5255 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_distom ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_satz255 x z y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n))).
-
-(* constant 5256 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_distmo ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz255 x z y n : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z n)).
-
-(* constant 5257 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz256 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o))) (l_e_st_eq_landau_n_rt_rp_r_c_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_satz246 x y u n o) (l_e_st_eq_landau_n_rt_rp_r_c_satz246a z u y o n)) (l_e_st_eq_landau_n_rt_rp_r_c_satz255 (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o))).
-
-(* constant 5258 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_conj ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 5259 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_conjisa ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) a (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b))) (l_e_st_eq_landau_n_rt_rp_r_m0 b) (l_e_st_eq_landau_n_rt_rp_r_c_reis a b) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) b (l_e_st_eq_landau_n_rt_rp_r_c_imis a b)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_pli a (l_e_st_eq_landau_n_rt_rp_r_m0 b))).
-
-(* constant 5260 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_conjisb ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_pli a (l_e_st_eq_landau_n_rt_rp_r_m0 b)) (l_e_st_eq_landau_n_rt_rp_r_c_conjisa a b) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli a (l_e_st_eq_landau_n_rt_rp_r_m0 b)) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_pli a b))).
-
-(* constant 5261 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isconj ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_conj t) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)).
-
-(* constant 5262 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz257 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) x (l_e_st_eq_landau_n_rt_rp_r_c_conjisa (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_satz177 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_pliis x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) x).
-
-(* constant 5263 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz258a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_isconj x l_e_st_eq_landau_n_rt_rp_r_c_0c i) (l_e_st_eq_landau_n_rt_rp_r_c_conjisa l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satz176b l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5264 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6258_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_isre (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_lemma1 (l_e_st_eq_landau_n_rt_rp_r_c_conj x) i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5265 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6258_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_satz176e (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_isim (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_lemma2 (l_e_st_eq_landau_n_rt_rp_r_c_conj x) i)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5266 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz258b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_ispli x) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_6258_t1 x i) (l_e_st_eq_landau_n_rt_rp_r_c_6258_t2 x i)) : l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5267 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6258_anders ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx x l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_satz257 x) (l_e_st_eq_landau_n_rt_rp_r_c_satz258a (l_e_st_eq_landau_n_rt_rp_r_c_conj x) i) : l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5268 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz258c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) n (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_satz258b x t) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_conj x) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5269 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6259_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) x.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_isim (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_isceim (l_e_st_eq_landau_n_rt_rp_r_c_conj x) x i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im x)).
-
-(* constant 5270 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz259a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) x.(l_e_st_eq_landau_n_rt_rp_r_lemma10 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_6259_t1 x i)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5271 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz259b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) x (l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satz176b (l_e_st_eq_landau_n_rt_rp_r_c_im x) i) i)) (l_e_st_eq_landau_n_rt_rp_r_c_pliis x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) x).
-
-(* constant 5272 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz269c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_conj x).(l_e_st_eq_landau_n_rt_rp_r_c_satz259a x (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_conj x) i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5273 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz269d ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj x) x (l_e_st_eq_landau_n_rt_rp_r_c_satz259b x i) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)).
-
-(* constant 5274 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz260 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_conjisa (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_satz180 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_plis12b (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y))).
-
-(* constant 5275 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz260a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz260 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))).
-
-(* constant 5276 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6261_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_imts x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_satz180 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_satz197f (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_satz197e (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_imts x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))).
-
-(* constant 5277 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz261 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_imts x y))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_conjisa (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_imts x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_ismn2 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_satz198a (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_6261_t1 x y)) (l_e_st_eq_landau_n_rt_rp_r_c_tsis12b (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y))).
-
-(* constant 5278 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz261a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz261 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts x y))).
-
-(* constant 5279 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6262_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) x (l_e_st_eq_landau_n_rt_rp_r_c_satz230 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y)).
-
-(* constant 5280 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6262_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_isconj x (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) (l_e_st_eq_landau_n_rt_rp_r_c_6262_t1 x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz260 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_conj y))).
-
-(* constant 5281 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz262 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212f (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_6262_t2 x y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y))).
-
-(* constant 5282 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz262a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz262 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_mn x y))).
-
-(* constant 5283 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6263_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229f x y n : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y)).
-
-(* constant 5284 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6263_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_isconj x (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) (l_e_st_eq_landau_n_rt_rp_r_c_6263_t1 x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y))).
-
-(* constant 5285 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6263_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz261 (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_conj y))).
-
-(* constant 5286 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6263_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_6263_t2 x y n) (l_e_st_eq_landau_n_rt_rp_r_c_6263_t3 x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_conj y))).
-
-(* constant 5287 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6263_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz258c y n : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_conj y) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5288 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz263 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229j (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_6263_t5 x y n) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_6263_t4 x y n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y) (l_e_st_eq_landau_n_rt_rp_r_c_satz258c y n))).
-
-(* constant 5289 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz263a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y) (l_e_st_eq_landau_n_rt_rp_r_c_satz258c y n)) (l_e_st_eq_landau_n_rt_rp_r_c_satz263 x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y) (l_e_st_eq_landau_n_rt_rp_r_c_satz258c y n)) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n))).
-
-(* constant 5290 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mod ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_sqrt (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 x) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5291 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ismod ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_mod t) x y i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)).
-
-(* constant 5292 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz264a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_sqrtnot0 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 x) (l_e_st_eq_landau_n_rt_rp_r_pnot0 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma4 x n)) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod x)).
-
-(* constant 5293 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz264b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_sqrt0 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma3 x i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5294 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz264c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_thsqrt1a (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 x) : l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod x))).
-
-(* constant 5295 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz264d ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_satz167f (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0 (l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_c_satz264c x) (λt:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_satz169d (l_e_st_eq_landau_n_rt_rp_r_c_mod x) t)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5296 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_thsqrt1b (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 x)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod x))).
-
-(* constant 5297 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_lemma12 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x)))).
-
-(* constant 5298 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_satz191 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_moreisi2 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)))) (l_e_st_eq_landau_n_rt_rp_r_lemma11 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 5299 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ismoreis12 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t1 x) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t2 x) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t3 x) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x)))).
-
-(* constant 5300 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_lemma12 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x)))).
-
-(* constant 5301 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_satz191 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_lemma11 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_moreisi2 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)))).
-
-(* constant 5302 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ismoreis12 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t1 x) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t5 x) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t6 x) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x)))).
-
-(* constant 5303 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s).λn:l_e_st_eq_landau_n_rt_rp_r_moreis r l_e_st_eq_landau_n_rt_rp_r_0.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l : l_e_st_eq_landau_n_rt_rp_r_more s r).
-
-(* constant 5304 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s).λn:l_e_st_eq_landau_n_rt_rp_r_moreis r l_e_st_eq_landau_n_rt_rp_r_0.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_satz169b s (l_e_st_eq_landau_n_rt_rp_r_satz172d s r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_7265_t8 r s m n l) n) : l_e_st_eq_landau_n_rt_rp_r_pos s).
-
-(* constant 5305 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s).λn:l_e_st_eq_landau_n_rt_rp_r_moreis r l_e_st_eq_landau_n_rt_rp_r_0.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λo:l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_trmore (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_satz203a s r s (l_e_st_eq_landau_n_rt_rp_r_c_7265_t8 r s m n l) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t9 r s m n l)) (l_e_st_eq_landau_n_rt_rp_r_satz203d s r r (l_e_st_eq_landau_n_rt_rp_r_c_7265_t8 r s m n l) (l_e_st_eq_landau_n_rt_rp_r_satz169b r o)) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_ts r r)).
-
-(* constant 5306 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s).λn:l_e_st_eq_landau_n_rt_rp_r_moreis r l_e_st_eq_landau_n_rt_rp_r_0.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_ismore2 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 r r i)) (l_e_st_eq_landau_n_rt_rp_r_satz169a (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_possq s (l_e_st_eq_landau_n_rt_rp_r_pnot0 s (l_e_st_eq_landau_n_rt_rp_r_c_7265_t9 r s m n l)))) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_ts r r)).
-
-(* constant 5307 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s).λn:l_e_st_eq_landau_n_rt_rp_r_moreis r l_e_st_eq_landau_n_rt_rp_r_0.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_lemma1 (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_orapp (l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_ts r r)) n (λt:l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_7265_t10 r s m n l t) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_7265_t11 r s m n l t)) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s)).
-
-(* constant 5308 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t13 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s).λn:l_e_st_eq_landau_n_rt_rp_r_moreis r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_satz167f r s (λt:l_e_st_eq_landau_n_rt_rp_r_less r s.l_e_st_eq_landau_n_rt_rp_r_satz167c (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s) m (l_e_st_eq_landau_n_rt_rp_r_c_7265_t12 r s m n t)) : l_e_st_eq_landau_n_rt_rp_r_moreis r s).
-
-(* constant 5309 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz265a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_7265_t13 (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t4 x) (l_e_st_eq_landau_n_rt_rp_r_c_satz264d x) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x))).
-
-(* constant 5310 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz265b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_7265_t13 (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t7 x) (l_e_st_eq_landau_n_rt_rp_r_c_satz264d x) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x))).
-
-(* constant 5311 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7266_t1 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts t t) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_satz176b (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts t t) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts t t)).
-
-(* constant 5312 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7266_t2 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts t l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 t)) (l_e_st_eq_landau_n_rt_rp_r_ts t l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts t l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 t) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 t (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ts02 t l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts t l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 t)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5313 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7266_t3 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli t l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli t l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts t t) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts t l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 t))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts t t) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_tsis12a t l_e_st_eq_landau_n_rt_rp_r_0 t l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts t t) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts t t) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts t l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 t)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_7266_t1 t) (l_e_st_eq_landau_n_rt_rp_r_c_7266_t2 t)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli t l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli t l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts t t) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 5314 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7266_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_neg s).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts s s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_7266_t3 r)) i (l_e_st_eq_landau_n_rt_rp_r_c_7266_t3 s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts s s) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 5315 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7266_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_neg s).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts s s) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_c_isre (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_iscere (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts s s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_7266_t4 r s i n o)) (l_e_st_eq_landau_n_rt_rp_r_c_reis (l_e_st_eq_landau_n_rt_rp_r_ts s s) l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s)).
-
-(* constant 5316 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7266_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_neg s).(l_andi (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s)) n (l_e_st_eq_landau_n_rt_rp_r_c_7266_t5 r s i n o) : l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s))).
-
-(* constant 5317 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7266_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_neg s).(l_andi (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_ts s s)) o (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts s s)) : l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_ts s s))).
-
-(* constant 5318 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz266 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_neg s).(l_e_st_eq_landau_n_rt_rp_r_satzr161b (l_e_st_eq_landau_n_rt_rp_r_ts s s) r s (l_e_st_eq_landau_n_rt_rp_r_c_7266_t6 r s i n o) (l_e_st_eq_landau_n_rt_rp_r_c_7266_t7 r s i n o) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 5319 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7267_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_7266_t3 (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx1 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_thsqrt1b (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 x))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 5320 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7267_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_satz197e (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_satz198 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)).
-
-(* constant 5321 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7267_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_satz197b (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_satz179a (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re x))) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5322 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7267_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_tsis2a x (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re x))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_7267_t2 x) (l_e_st_eq_landau_n_rt_rp_r_c_7267_t3 x)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 5323 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz267 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_7267_t1 x) (l_e_st_eq_landau_n_rt_rp_r_c_7267_t4 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x))).
-
-(* constant 5324 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz267a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_satz267 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 5325 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y x) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_assts2 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y x) z (l_e_st_eq_landau_n_rt_rp_r_c_comts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 y x z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ts x z))).
-
-(* constant 5326 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ts z u))) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_ts y u))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u)) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 x y (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_ts y u)) x (l_e_st_eq_landau_n_rt_rp_r_c_7268_t1 y z u)) (l_e_st_eq_landau_n_rt_rp_r_c_assts2 x z (l_e_st_eq_landau_n_rt_rp_r_c_ts y u)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u))).
-
-(* constant 5327 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts x y))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_conj y))) (l_e_st_eq_landau_n_rt_rp_r_c_satz267 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz261 x y)) (l_e_st_eq_landau_n_rt_rp_r_c_7268_t2 x y (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_conj y)))).
-
-(* constant 5328 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_conj y))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_7268_t3 x y) (l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_satz267a x) (l_e_st_eq_landau_n_rt_rp_r_c_satz267a y)) (l_e_st_eq_landau_n_rt_rp_r_c_7268_t2 (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0)))).
-
-(* constant 5329 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_satz176b (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 5330 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s)) (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 s (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ts02 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5331 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_tsis12a r l_e_st_eq_landau_n_rt_rp_r_0 s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_7268_t5 r s) (l_e_st_eq_landau_n_rt_rp_r_c_7268_t6 r s)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 5332 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_7268_t4 x y) (l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_7268_t7 (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_7268_t7 (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 5333 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)).(l_orapp (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod y))) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod y))) l_con (l_e_st_eq_landau_n_rt_rp_r_satz196h (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y) n) (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod y)).l_e_st_eq_landau_n_rt_rp_r_c_satz264c y (l_ande2 (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) t)) (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod y)).l_e_st_eq_landau_n_rt_rp_r_c_satz264c x (l_ande1 (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) t)) : l_con).
-
-(* constant 5334 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz268 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz266 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_7268_t8 x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz264c (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (λt:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)).l_e_st_eq_landau_n_rt_rp_r_c_7268_t9 x y t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))).
-
-(* constant 5335 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz268a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz268 x y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y))).
-
-(* constant 5336 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7269_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_pnot0 (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_satz264a y n) : l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5337 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7269_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz268 (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) (l_e_st_eq_landau_n_rt_rp_r_c_ismod (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) x (l_e_st_eq_landau_n_rt_rp_r_c_satz240 x y n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)).
-
-(* constant 5338 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7269_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_satz204g (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_7269_t1 x y n) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n))) (l_e_st_eq_landau_n_rt_rp_r_c_7269_t2 x y n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_ov (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_7269_t1 x y n))).
-
-(* constant 5339 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz269 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_7269_t3 x y n : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_ov (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_pnot0 (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_satz264a y n)))).
-
-(* constant 5340 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7270_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_abs r) r) (λt:l_e_st_eq_landau_n_rt_rp_r_neg r.l_e_st_eq_landau_n_rt_rp_r_moreisi1 (l_e_st_eq_landau_n_rt_rp_r_abs r) r (l_e_st_eq_landau_n_rt_rp_r_trmore (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0 r (l_e_st_eq_landau_n_rt_rp_r_satz169a (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_satz166b r t)) (l_e_st_eq_landau_n_rt_rp_r_lemma2 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satz169c r t)))) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).l_e_st_eq_landau_n_rt_rp_r_moreisi2 (l_e_st_eq_landau_n_rt_rp_r_abs r) r (l_e_st_eq_landau_n_rt_rp_r_absnn r t)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_abs r) r).
-
-(* constant 5341 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7270_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_trmoreis (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_satz265a x) (l_e_st_eq_landau_n_rt_rp_r_c_7270_t1 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)).
-
-(* constant 5342 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7270_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_1c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_re l_e_st_eq_landau_n_rt_rp_r_c_1c) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_isre (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_iscere (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_1c i) (l_e_st_eq_landau_n_rt_rp_r_c_reis l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 5343 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz270 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_1c.(l_e_st_eq_landau_n_rt_rp_r_ismoreis2 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_7270_t3 x y i) (l_e_st_eq_landau_n_rt_rp_r_satz191 (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_7270_t2 x) (l_e_st_eq_landau_n_rt_rp_r_c_7270_t2 y)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 5344 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz264b (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5345 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_ismoreis2 (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t1 x y i)) (l_e_st_eq_landau_n_rt_rp_r_satz191 (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_satz264d x) (l_e_st_eq_landau_n_rt_rp_r_c_satz264d y)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))).
-
-(* constant 5346 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_pnot0 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz264a (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n) : l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5347 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_satz253 x (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz250 (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n)) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 5348 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz270 (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t4 x y n) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov y (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n))) l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 5349 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_fx ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_ov (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t3 x y n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5350 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_fy ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_ov (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t3 x y n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5351 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_ismoreis1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov y (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov y (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz269 x (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_satz269 y (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t5 x y n) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 5352 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_prl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5353 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_prr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5354 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_orapp (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_7271_prl x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_prr x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t6 x y n) (λt:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) l_e_st_eq_landau_n_rt_rp_r_1rl.l_e_st_eq_landau_n_rt_rp_r_moreisi1 (l_e_st_eq_landau_n_rt_rp_r_c_7271_prl x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_prr x y n) (l_e_st_eq_landau_n_rt_rp_r_satz203a (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) t (l_e_st_eq_landau_n_rt_rp_r_c_satz264a (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n))) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) l_e_st_eq_landau_n_rt_rp_r_1rl.l_e_st_eq_landau_n_rt_rp_r_moreisi2 (l_e_st_eq_landau_n_rt_rp_r_c_7271_prl x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_prr x y n) (l_e_st_eq_landau_n_rt_rp_r_ists1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) t)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_7271_prl x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_prr x y n)).
-
-(* constant 5355 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_7271_prl x y n) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_disttp1 (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))) (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))) (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_satz204e (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t3 x y n)) (l_e_st_eq_landau_n_rt_rp_r_satz204e (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t3 x y n))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_7271_prl x y n) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))).
-
-(* constant 5356 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_satz195b (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_7271_prr x y n) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))).
-
-(* constant 5357 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_ismoreis12 (l_e_st_eq_landau_n_rt_rp_r_c_7271_prl x y n) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_prr x y n) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t8 x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t9 x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t7 x y n) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))).
-
-(* constant 5358 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_7271_t2 x y t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_7271_t10 x y t) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))).
-
-(* constant 5359 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz271 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_satz168a (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t11 x y) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))).
-
-(* constant 5360 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz271a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_7271_t11 x y : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))).
-
-(* constant 5361 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7272_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_iscere (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_satz214 x)) (l_e_st_eq_landau_n_rt_rp_r_c_reis (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x))).
-
-(* constant 5362 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7272_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_7272_t1 x) (l_e_st_eq_landau_n_rt_rp_r_c_7272_t1 x)) (l_e_st_eq_landau_n_rt_rp_r_satz198 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x))).
-
-(* constant 5363 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7272_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_isceim (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_satz214 x)) (l_e_st_eq_landau_n_rt_rp_r_c_imis (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))).
-
-(* constant 5364 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7272_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_7272_t3 x) (l_e_st_eq_landau_n_rt_rp_r_c_7272_t3 x)) (l_e_st_eq_landau_n_rt_rp_r_satz198 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))).
-
-(* constant 5365 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7272_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_7272_t2 x) (l_e_st_eq_landau_n_rt_rp_r_c_7272_t4 x) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod2 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)).
-
-(* constant 5366 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz272 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_issqrt (l_e_st_eq_landau_n_rt_rp_r_c_mod2 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 x) (l_e_st_eq_landau_n_rt_rp_r_c_7272_t5 x) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)).
-
-(* constant 5367 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz272a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_satz272 x) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_m0 x))).
-
-(* constant 5368 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7273_sum ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5369 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7273_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_islessis1 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_mn x y))) (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_c_ismod (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) x (l_e_st_eq_landau_n_rt_rp_r_c_satz212h x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz271 y (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y)).
-
-(* constant 5370 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7273_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y)) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))) (l_e_st_eq_landau_n_rt_rp_r_c_7273_t1 x y) (λt:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y).l_e_st_eq_landau_n_rt_rp_r_satz188f (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) t) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y).l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_c_mod y) t) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))).
-
-(* constant 5371 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7273_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)))) (l_e_st_eq_landau_n_rt_rp_r_mnpl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y))).
-
-(* constant 5372 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7273_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_satz168b (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_islessis2 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_7273_t3 x y) (l_e_st_eq_landau_n_rt_rp_r_c_7273_t2 x y)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))).
-
-(* constant 5373 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7273_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ismoreis12 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn y x)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))) (l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn y x)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y))) (l_e_st_eq_landau_n_rt_rp_r_c_ismod (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn y x) (l_e_st_eq_landau_n_rt_rp_r_c_satz219 x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz272 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y))) (l_e_st_eq_landau_n_rt_rp_r_satz181a (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_c_7273_t4 y x) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)))).
-
-(* constant 5374 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7273_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) r) (l_or_th6 (l_e_st_eq_landau_n_rt_rp_r_neg r)) (λt:l_e_st_eq_landau_n_rt_rp_r_neg r.l_e_st_eq_landau_n_rt_rp_r_absn r t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).l_e_st_eq_landau_n_rt_rp_r_absnn r t) : l_or (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) r)).
-
-(* constant 5375 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7273_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.λn:l_e_st_eq_landau_n_rt_rp_r_moreis r (l_e_st_eq_landau_n_rt_rp_r_m0 s).(l_orapp (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs s) s) (l_e_st_eq_landau_n_rt_rp_r_moreis r (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_r_c_7273_t6 s) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_r_m0 s).l_e_st_eq_landau_n_rt_rp_r_ismoreis2 (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_abs s) r (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_r_m0 s) t) n) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs s) s.l_e_st_eq_landau_n_rt_rp_r_ismoreis2 s (l_e_st_eq_landau_n_rt_rp_r_abs s) r (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs s) s t) m) : l_e_st_eq_landau_n_rt_rp_r_moreis r (l_e_st_eq_landau_n_rt_rp_r_abs s)).
-
-(* constant 5376 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz273 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_7273_t7 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_7273_t4 x y) (l_e_st_eq_landau_n_rt_rp_r_c_7273_t5 x y) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)))).
-
-(* constant 5377 *)
-definition l_e_st_eq_landau_n_8274_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_some (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to y) (λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to y.l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to y) f) : Prop).
-
-(* constant 5378 *)
-definition l_e_st_eq_landau_n_8274_prop2 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_all (λy:l_e_st_eq_landau_n_nat.l_imp (l_e_st_eq_landau_n_less x y) (l_not (l_e_st_eq_landau_n_8274_prop1 x y))) : Prop).
-
-(* constant 5379 *)
-definition l_e_st_eq_landau_n_8274_1y ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_1out y : l_e_st_eq_landau_n_1to y).
-
-(* constant 5380 *)
-definition l_e_st_eq_landau_n_8274_yy ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_xout y : l_e_st_eq_landau_n_1to y).
-
-(* constant 5381 *)
-definition l_e_st_eq_landau_n_8274_t1 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_1y y l f) (l_e_st_eq_landau_n_8274_yy y l f).(l_e_st_eq_landau_n_isoutne y l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a y) y (l_e_st_eq_landau_n_lessisi3 y) i : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 y).
-
-(* constant 5382 *)
-definition l_e_st_eq_landau_n_8274_t2 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.(l_ec3e31 (l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 y) (l_e_st_eq_landau_n_more l_e_st_eq_landau_n_1 y) (l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y) (l_e_st_eq_landau_n_satz10b l_e_st_eq_landau_n_1 y) l : l_e_st_eq_landau_n_nis l_e_st_eq_landau_n_1 y).
-
-(* constant 5383 *)
-definition l_e_st_eq_landau_n_8274_t3 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_1y y l f) (l_e_st_eq_landau_n_8274_yy y l f)) (l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 y) (l_e_st_eq_landau_n_8274_t2 y l f) (λt:l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_1y y l f) (l_e_st_eq_landau_n_8274_yy y l f).l_e_st_eq_landau_n_8274_t1 y l f t) : l_not (l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_1y y l f) (l_e_st_eq_landau_n_8274_yy y l f))).
-
-(* constant 5384 *)
-definition l_e_st_eq_landau_n_8274_t4 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f u l_e_st_eq_landau_n_1o (l_e_st_eq_landau_n_singlet_th1 u) : l_e_is (l_e_st_eq_landau_n_1to y) (f u) (f l_e_st_eq_landau_n_1o)).
-
-(* constant 5385 *)
-definition l_e_st_eq_landau_n_8274_t5 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.(l_e_notis_th2 (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_1y y l f) (l_e_st_eq_landau_n_8274_yy y l f) (f u) (l_e_st_eq_landau_n_8274_t3 y l f) (l_e_tris (l_e_st_eq_landau_n_1to y) (f u) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f) (l_e_st_eq_landau_n_8274_t4 y l f u) i) : l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f u) (l_e_st_eq_landau_n_8274_yy y l f))).
-
-(* constant 5386 *)
-definition l_e_st_eq_landau_n_8274_t6 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f).(l_some_th5 (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_yy y l f) (f u)) (λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_symnotis (l_e_st_eq_landau_n_1to y) (f u) (l_e_st_eq_landau_n_8274_yy y l f) (l_e_st_eq_landau_n_8274_t5 y l f i u)) : l_not (l_e_image (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f (l_e_st_eq_landau_n_8274_yy y l f))).
-
-(* constant 5387 *)
-definition l_e_st_eq_landau_n_8274_t7 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f).(l_all_th1 (l_e_st_eq_landau_n_1to y) (λu:l_e_st_eq_landau_n_1to y.l_e_image (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f u) (l_e_st_eq_landau_n_8274_yy y l f) (l_e_st_eq_landau_n_8274_t6 y l f i) : l_not (l_e_surjective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f)).
-
-(* constant 5388 *)
-definition l_e_st_eq_landau_n_8274_t8 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f)).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.(l_e_notis_th2 (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f) (f u) n (l_e_st_eq_landau_n_8274_t4 y l f u) : l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f u) (l_e_st_eq_landau_n_8274_1y y l f))).
-
-(* constant 5389 *)
-definition l_e_st_eq_landau_n_8274_t9 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f)).(l_some_th5 (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_1y y l f) (f u)) (λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_symnotis (l_e_st_eq_landau_n_1to y) (f u) (l_e_st_eq_landau_n_8274_1y y l f) (l_e_st_eq_landau_n_8274_t8 y l f n u)) : l_not (l_e_image (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f (l_e_st_eq_landau_n_8274_1y y l f))).
-
-(* constant 5390 *)
-definition l_e_st_eq_landau_n_8274_t10 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f)).(l_all_th1 (l_e_st_eq_landau_n_1to y) (λu:l_e_st_eq_landau_n_1to y.l_e_image (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f u) (l_e_st_eq_landau_n_8274_1y y l f) (l_e_st_eq_landau_n_8274_t9 y l f n) : l_not (l_e_surjective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f)).
-
-(* constant 5391 *)
-definition l_e_st_eq_landau_n_8274_t11 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f)) (l_not (l_e_surjective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f)) (λt:l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f).l_e_st_eq_landau_n_8274_t7 y l f t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f)).l_e_st_eq_landau_n_8274_t10 y l f t) : l_not (l_e_surjective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f)).
-
-(* constant 5392 *)
-definition l_e_st_eq_landau_n_8274_t12 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.(l_and_th2 (l_e_injective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f) (l_e_surjective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f) (l_e_st_eq_landau_n_8274_t11 y l f) : l_not (l_e_bijective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f)).
-
-(* constant 5393 *)
-definition l_e_st_eq_landau_n_8274_t13 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.(l_some_th5 (Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y) (λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.l_e_bijective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f) (λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_8274_t12 y l f) : l_not (l_e_st_eq_landau_n_8274_prop1 l_e_st_eq_landau_n_1 y)).
-
-(* constant 5394 *)
-definition l_e_st_eq_landau_n_8274_t14 ≝ (λy:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.l_e_st_eq_landau_n_8274_t13 y t : l_e_st_eq_landau_n_8274_prop2 l_e_st_eq_landau_n_1).
-
-(* constant 5395 *)
-definition l_e_st_eq_landau_n_8274_xs ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_suc x : l_e_st_eq_landau_n_nat).
-
-(* constant 5396 *)
-definition l_e_st_eq_landau_n_8274_xxs ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.(l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_8274_xs x) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_suc x)).
-
-(* constant 5397 *)
-definition l_e_st_eq_landau_n_8274_yy1 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.(l_e_st_eq_landau_n_xout y : l_e_st_eq_landau_n_1to y).
-
-(* constant 5398 *)
-definition l_e_st_eq_landau_n_8274_t15 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.(l_e_st_eq_landau_n_trless l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_suc x) y (l_e_st_eq_landau_n_satz24c x) l : l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y).
-
-(* constant 5399 *)
-definition l_e_st_eq_landau_n_8274_ym1 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.(l_e_st_eq_landau_n_mn y l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_8274_t15 x p y l) : l_e_st_eq_landau_n_nat).
-
-(* constant 5400 *)
-definition l_e_st_eq_landau_n_8274_t16 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) y (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz4e x) (l_e_st_eq_landau_n_mn_th1c y l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_8274_t15 x p y l)) l : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1)).
-
-(* constant 5401 *)
-definition l_e_st_eq_landau_n_8274_t17 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.(l_e_st_eq_landau_n_satz20c x (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_8274_t16 x p y l) : l_e_st_eq_landau_n_less x (l_e_st_eq_landau_n_8274_ym1 x p y l)).
-
-(* constant 5402 *)
-definition l_e_st_eq_landau_n_8274_t18 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.(l_e_st_eq_landau_n_isless2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1) y (l_e_st_eq_landau_n_8274_ym1 x p y l) (l_e_st_eq_landau_n_mn_th1d y l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_8274_t15 x p y l)) (l_e_st_eq_landau_n_satz18a (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_ym1 x p y l) y).
-
-(* constant 5403 *)
-definition l_e_st_eq_landau_n_8274_t19 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.(l_ande1 (l_e_injective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f) (l_e_surjective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f) b : l_e_injective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f).
-
-(* constant 5404 *)
-definition l_e_st_eq_landau_n_8274_t20 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.(l_ande2 (l_e_injective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f) (l_e_surjective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f) b : l_e_surjective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f).
-
-(* constant 5405 *)
-definition l_e_st_eq_landau_n_8274_u1 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_inn x u : l_e_st_eq_landau_n_nat).
-
-(* constant 5406 *)
-definition l_e_st_eq_landau_n_8274_t21 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_satz16a (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) x (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_1top x u) (l_e_st_eq_landau_n_satz18c x) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5407 *)
-definition l_e_st_eq_landau_n_8274_t22 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_ec3e31 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_t21 x p y l f b i u) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5408 *)
-definition l_e_st_eq_landau_n_8274_t23 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_lessisi1 (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_t21 x p y l f b i u) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5409 *)
-definition l_e_st_eq_landau_n_8274_u2 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_t23 x p y l f b i u) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5410 *)
-definition l_e_st_eq_landau_n_8274_t24 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_u2 x p y l f b i u) (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_t22 x p y l f b i u) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_u2 x p y l f b i u) (l_e_st_eq_landau_n_8274_xxs x p y l).l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_t23 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_8274_xs x)) t) : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_u2 x p y l f b i u) (l_e_st_eq_landau_n_8274_xxs x p y l))).
-
-(* constant 5411 *)
-definition l_e_st_eq_landau_n_8274_t25 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.λj:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (l_e_st_eq_landau_n_8274_yy1 x p y l).(l_e_tris2 (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l) j i : l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (f (l_e_st_eq_landau_n_8274_xxs x p y l))).
-
-(* constant 5412 *)
-definition l_e_st_eq_landau_n_8274_t26 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.λj:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (l_e_st_eq_landau_n_8274_yy1 x p y l).(l_e_isfe (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f (l_e_st_eq_landau_n_8274_t19 x p y l f b) (l_e_st_eq_landau_n_8274_u2 x p y l f b i u) (l_e_st_eq_landau_n_8274_xxs x p y l) (l_e_st_eq_landau_n_8274_t25 x p y l f b i u j) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_u2 x p y l f b i u) (l_e_st_eq_landau_n_8274_xxs x p y l)).
-
-(* constant 5413 *)
-definition l_e_st_eq_landau_n_8274_t27 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (l_e_st_eq_landau_n_8274_yy1 x p y l)) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_u2 x p y l f b i u) (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_t24 x p y l f b i u) (λt:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (l_e_st_eq_landau_n_8274_yy1 x p y l).l_e_st_eq_landau_n_8274_t26 x p y l f b i u t) : l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (l_e_st_eq_landau_n_8274_yy1 x p y l))).
-
-(* constant 5414 *)
-definition l_e_st_eq_landau_n_8274_w1 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_inn y (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) : l_e_st_eq_landau_n_nat).
-
-(* constant 5415 *)
-definition l_e_st_eq_landau_n_8274_t28 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) y.(l_e_tris (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (l_e_st_eq_landau_n_outn y (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_1top y (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)))) (l_e_st_eq_landau_n_8274_yy1 x p y l) (l_e_st_eq_landau_n_isoutinn y (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u))) (l_e_st_eq_landau_n_isoutni y (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_1top y (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u))) y (l_e_st_eq_landau_n_lessisi3 y) j) : l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).
-
-(* constant 5416 *)
-definition l_e_st_eq_landau_n_8274_t29 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_imp_th3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) y) (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (l_e_st_eq_landau_n_8274_yy1 x p y l)) (l_e_st_eq_landau_n_8274_t27 x p y l f b i u) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) y.l_e_st_eq_landau_n_8274_t28 x p y l f b i u t) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) y).
-
-(* constant 5417 *)
-definition l_e_st_eq_landau_n_8274_t30 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_ore1 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) y) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) y) (l_e_st_eq_landau_n_1top y (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u))) (l_e_st_eq_landau_n_8274_t29 x p y l f b i u) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) y).
-
-(* constant 5418 *)
-definition l_e_st_eq_landau_n_8274_t31 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_islessis2 y (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_mn_th1c y l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_8274_t15 x p y l)) (l_e_st_eq_landau_n_satz25b y (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_t30 x p y l f b i u)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1)).
-
-(* constant 5419 *)
-definition l_e_st_eq_landau_n_8274_t32 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_or_th9 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_t31 x p y l f b i u) (λt:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_satz20c (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1 t) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_satz20b (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1 t) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_ym1 x p y l)).
-
-(* constant 5420 *)
-definition l_e_st_eq_landau_n_8274_w2 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_8274_ym1 x p y l) (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_t32 x p y l f b i u) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)).
-
-(* constant 5421 *)
-definition l_e_st_eq_landau_n_8274_f1 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).(λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_8274_w2 x p y l f b i t : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)).
-
-(* constant 5422 *)
-definition l_e_st_eq_landau_n_8274_t33 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i u) (l_e_st_eq_landau_n_8274_f1 x p y l f b i v).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_8274_ym1 x p y l) (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_t32 x p y l f b i u) (l_e_st_eq_landau_n_8274_w1 x p y l f b i v) (l_e_st_eq_landau_n_8274_t32 x p y l f b i v) j : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_w1 x p y l f b i v)).
-
-(* constant 5423 *)
-definition l_e_st_eq_landau_n_8274_t34 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i u) (l_e_st_eq_landau_n_8274_f1 x p y l f b i v).(l_e_st_eq_landau_n_isinne y (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i v)) (l_e_st_eq_landau_n_8274_t33 x p y l f b i u v j) : l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i v))).
-
-(* constant 5424 *)
-definition l_e_st_eq_landau_n_8274_t35 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i u) (l_e_st_eq_landau_n_8274_f1 x p y l f b i v).(l_e_st_eq_landau_n_8274_t19 x p y l f b (l_e_st_eq_landau_n_8274_u2 x p y l f b i u) (l_e_st_eq_landau_n_8274_u2 x p y l f b i v) (l_e_st_eq_landau_n_8274_t34 x p y l f b i u v j) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_u2 x p y l f b i u) (l_e_st_eq_landau_n_8274_u2 x p y l f b i v)).
-
-(* constant 5425 *)
-definition l_e_st_eq_landau_n_8274_t36 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i u) (l_e_st_eq_landau_n_8274_f1 x p y l f b i v).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_t23 x p y l f b i u) (l_e_st_eq_landau_n_8274_u1 x p y l f b i v) (l_e_st_eq_landau_n_8274_t23 x p y l f b i v) (l_e_st_eq_landau_n_8274_t35 x p y l f b i u v j) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_u1 x p y l f b i v)).
-
-(* constant 5426 *)
-definition l_e_st_eq_landau_n_8274_t37 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i u) (l_e_st_eq_landau_n_8274_f1 x p y l f b i v).(l_e_st_eq_landau_n_isinne x u v (l_e_st_eq_landau_n_8274_t36 x p y l f b i u v j) : l_e_is (l_e_st_eq_landau_n_1to x) u v).
-
-(* constant 5427 *)
-definition l_e_st_eq_landau_n_8274_v1 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_st_eq_landau_n_inn (l_e_st_eq_landau_n_8274_ym1 x p y l) v : l_e_st_eq_landau_n_nat).
-
-(* constant 5428 *)
-definition l_e_st_eq_landau_n_8274_t38 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_st_eq_landau_n_satz16a (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) (l_e_st_eq_landau_n_8274_ym1 x p y l) y (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_8274_ym1 x p y l) v) (l_e_st_eq_landau_n_8274_t18 x p y l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y).
-
-(* constant 5429 *)
-definition l_e_st_eq_landau_n_8274_t39 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_ec3e31 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y) (l_e_st_eq_landau_n_8274_t38 x p y l f b i v) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y).
-
-(* constant 5430 *)
-definition l_e_st_eq_landau_n_8274_t40 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_st_eq_landau_n_lessisi1 (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y (l_e_st_eq_landau_n_8274_t38 x p y l f b i v) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y).
-
-(* constant 5431 *)
-definition l_e_st_eq_landau_n_8274_v2 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_st_eq_landau_n_outn y (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) (l_e_st_eq_landau_n_8274_t40 x p y l f b i v) : l_e_st_eq_landau_n_1to y).
-
-(* constant 5432 *)
-definition l_e_st_eq_landau_n_8274_w3 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_invf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f b (l_e_st_eq_landau_n_8274_v2 x p y l f b i v) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5433 *)
-definition l_e_st_eq_landau_n_8274_t41 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_thinvf2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f b (l_e_st_eq_landau_n_8274_v2 x p y l f b i v) : l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_v2 x p y l f b i v) (f (l_e_st_eq_landau_n_8274_w3 x p y l f b i v))).
-
-(* constant 5434 *)
-definition l_e_st_eq_landau_n_8274_t42 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l) j : l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (f (l_e_st_eq_landau_n_8274_xxs x p y l))).
-
-(* constant 5435 *)
-definition l_e_st_eq_landau_n_8274_t43 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l).(l_e_tr3is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_v2 x p y l f b i v) (f (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l) (l_e_st_eq_landau_n_8274_t41 x p y l f b i v) (l_e_st_eq_landau_n_8274_t42 x p y l f b i v j) i : l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_v2 x p y l f b i v) (l_e_st_eq_landau_n_8274_yy1 x p y l)).
-
-(* constant 5436 *)
-definition l_e_st_eq_landau_n_8274_t44 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l).(l_e_st_eq_landau_n_isoutne y (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) (l_e_st_eq_landau_n_8274_t40 x p y l f b i v) y (l_e_st_eq_landau_n_lessisi3 y) (l_e_st_eq_landau_n_8274_t43 x p y l f b i v j) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y).
-
-(* constant 5437 *)
-definition l_e_st_eq_landau_n_8274_t45 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y) (l_e_st_eq_landau_n_8274_t39 x p y l f b i v) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l).l_e_st_eq_landau_n_8274_t44 x p y l f b i v t) : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l))).
-
-(* constant 5438 *)
-definition l_e_st_eq_landau_n_8274_w4 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_st_eq_landau_n_inn (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) : l_e_st_eq_landau_n_nat).
-
-(* constant 5439 *)
-definition l_e_st_eq_landau_n_8274_t46 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_xs x).(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v))) (l_e_st_eq_landau_n_8274_xxs x p y l) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_8274_xs x)) j) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l)).
-
-(* constant 5440 *)
-definition l_e_st_eq_landau_n_8274_t47 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_imp_th3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_xs x)) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_t45 x p y l f b i v) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_8274_t46 x p y l f b i v t) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5441 *)
-definition l_e_st_eq_landau_n_8274_t48 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_ore1 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (l_e_st_eq_landau_n_8274_t47 x p y l f b i v) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5442 *)
-definition l_e_st_eq_landau_n_8274_t49 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_st_eq_landau_n_satz26a x (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_t48 x p y l f b i v) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) x).
-
-(* constant 5443 *)
-definition l_e_st_eq_landau_n_8274_w5 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_t49 x p y l f b i v) : l_e_st_eq_landau_n_1to x).
-
-(* constant 5444 *)
-definition l_e_st_eq_landau_n_8274_t50 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_t49 x p y l f b i v) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_u1 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v))).
-
-(* constant 5445 *)
-definition l_e_st_eq_landau_n_8274_t51 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v))) (l_e_st_eq_landau_n_8274_u2 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (l_e_st_eq_landau_n_8274_u1 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)) (l_e_st_eq_landau_n_8274_t23 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)) (l_e_st_eq_landau_n_8274_t50 x p y l f b i v)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_u2 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v))).
-
-(* constant 5446 *)
-definition l_e_st_eq_landau_n_8274_t52 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_u2 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)) (l_e_st_eq_landau_n_8274_t51 x p y l f b i v) : l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)))).
-
-(* constant 5447 *)
-definition l_e_st_eq_landau_n_8274_t53 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_tris (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_v2 x p y l f b i v) (f (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v))) (l_e_st_eq_landau_n_8274_t41 x p y l f b i v) (l_e_st_eq_landau_n_8274_t52 x p y l f b i v) : l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_v2 x p y l f b i v) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)))).
-
-(* constant 5448 *)
-definition l_e_st_eq_landau_n_8274_t54 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) (l_e_st_eq_landau_n_inn y (l_e_st_eq_landau_n_8274_v2 x p y l f b i v)) (l_e_st_eq_landau_n_8274_w1 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)) (l_e_st_eq_landau_n_isinoutn y (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) (l_e_st_eq_landau_n_8274_t40 x p y l f b i v)) (l_e_st_eq_landau_n_isinni y (l_e_st_eq_landau_n_8274_v2 x p y l f b i v) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v))) (l_e_st_eq_landau_n_8274_t53 x p y l f b i v)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) (l_e_st_eq_landau_n_8274_w1 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v))).
-
-(* constant 5449 *)
-definition l_e_st_eq_landau_n_8274_t55 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) v (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_8274_ym1 x p y l) (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_8274_ym1 x p y l) v)) (l_e_st_eq_landau_n_8274_w2 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_8274_ym1 x p y l) v) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_8274_ym1 x p y l) (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_8274_ym1 x p y l) v) (l_e_st_eq_landau_n_8274_w1 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)) (l_e_st_eq_landau_n_8274_t32 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)) (l_e_st_eq_landau_n_8274_t54 x p y l f b i v)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) v (l_e_st_eq_landau_n_8274_f1 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v))).
-
-(* constant 5450 *)
-definition l_e_st_eq_landau_n_8274_t56 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_somei (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) v (l_e_st_eq_landau_n_8274_f1 x p y l f b i t)) (l_e_st_eq_landau_n_8274_w5 x p y l f b i v) (l_e_st_eq_landau_n_8274_t55 x p y l f b i v) : l_e_image (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i) v).
-
-(* constant 5451 *)
-definition l_e_st_eq_landau_n_8274_t57 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).(l_andi (l_e_injective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i)) (l_e_surjective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i)) (λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i u) (l_e_st_eq_landau_n_8274_f1 x p y l f b i v).l_e_st_eq_landau_n_8274_t37 x p y l f b i u v t) (λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).l_e_st_eq_landau_n_8274_t56 x p y l f b i u) : l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i)).
-
-(* constant 5452 *)
-definition l_e_st_eq_landau_n_8274_t58 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).(l_somei (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) g) (l_e_st_eq_landau_n_8274_f1 x p y l f b i) (l_e_st_eq_landau_n_8274_t57 x p y l f b i) : l_e_st_eq_landau_n_8274_prop1 x (l_e_st_eq_landau_n_8274_ym1 x p y l)).
-
-(* constant 5453 *)
-definition l_e_st_eq_landau_n_8274_t59 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).(p (l_e_st_eq_landau_n_8274_ym1 x p y l) (l_e_st_eq_landau_n_8274_t17 x p y l) (l_e_st_eq_landau_n_8274_t58 x p y l f b i) : l_con).
-
-(* constant 5454 *)
-definition l_e_st_eq_landau_n_8274_m0 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).(l_e_invf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f b (l_e_st_eq_landau_n_8274_yy1 x p y l) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5455 *)
-definition l_e_st_eq_landau_n_8274_t60 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).(l_e_thinvf2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f b (l_e_st_eq_landau_n_8274_yy1 x p y l) : l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_yy1 x p y l) (f (l_e_st_eq_landau_n_8274_m0 x p y l f b n))).
-
-(* constant 5456 *)
-definition l_e_st_eq_landau_n_8274_f2 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).(l_e_changef (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f (l_e_st_eq_landau_n_8274_m0 x p y l f b n) (l_e_st_eq_landau_n_8274_xxs x p y l) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y).
-
-(* constant 5457 *)
-definition l_e_st_eq_landau_n_8274_t61 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).(l_e_changef2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f (l_e_st_eq_landau_n_8274_m0 x p y l f b n) (l_e_st_eq_landau_n_8274_xxs x p y l) (l_e_st_eq_landau_n_8274_xxs x p y l) (l_e_refis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_xxs x p y l)) : l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_f2 x p y l f b n (l_e_st_eq_landau_n_8274_xxs x p y l)) (f (l_e_st_eq_landau_n_8274_m0 x p y l f b n))).
-
-(* constant 5458 *)
-definition l_e_st_eq_landau_n_8274_t62 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).(l_e_tris2 (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_f2 x p y l f b n (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l) (f (l_e_st_eq_landau_n_8274_m0 x p y l f b n)) (l_e_st_eq_landau_n_8274_t61 x p y l f b n) (l_e_st_eq_landau_n_8274_t60 x p y l f b n) : l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_f2 x p y l f b n (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).
-
-(* constant 5459 *)
-definition l_e_st_eq_landau_n_8274_t63 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).(l_e_wissel_th6 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f (l_e_st_eq_landau_n_8274_m0 x p y l f b n) (l_e_st_eq_landau_n_8274_xxs x p y l) b : l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_f2 x p y l f b n)).
-
-(* constant 5460 *)
-definition l_e_st_eq_landau_n_8274_t64 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).(l_e_st_eq_landau_n_8274_t59 x p y l (l_e_st_eq_landau_n_8274_f2 x p y l f b n) (l_e_st_eq_landau_n_8274_t63 x p y l f b n) (l_e_st_eq_landau_n_8274_t62 x p y l f b n) : l_con).
-
-(* constant 5461 *)
-definition l_e_st_eq_landau_n_8274_t65 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)) l_con (λt:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).l_e_st_eq_landau_n_8274_t59 x p y l f b t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).l_e_st_eq_landau_n_8274_t64 x p y l f b t) : l_con).
-
-(* constant 5462 *)
-definition l_e_st_eq_landau_n_8274_t65a ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.(l_some_th5 (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y) (λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f) (λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λt:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.l_e_st_eq_landau_n_8274_t65 x p y l f t) : l_not (l_e_st_eq_landau_n_8274_prop1 (l_e_st_eq_landau_n_8274_xs x) y)).
-
-(* constant 5463 *)
-definition l_e_st_eq_landau_n_8274_t66 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.(λy:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_xs x) y.l_e_st_eq_landau_n_8274_t65a x p y t : l_e_st_eq_landau_n_8274_prop2 (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5464 *)
-definition l_e_st_eq_landau_n_8274_t67 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_8274_prop2 t) l_e_st_eq_landau_n_8274_t14 (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_8274_prop2 t.l_e_st_eq_landau_n_8274_t66 t u) x : l_e_st_eq_landau_n_8274_prop2 x).
-
-(* constant 5465 *)
-definition l_e_st_eq_landau_n_satz274 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_8274_t67 x y l : l_not (l_some (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to y) (λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to y.l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to y) f))).
-
-(* constant 5466 *)
-definition l_e_st_eq_landau_n_satz274a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to y.(l_some_th4 (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to y) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to y.l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to y) g) (l_e_st_eq_landau_n_satz274 x y l) f : l_not (l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to y) f)).
-
-(* constant 5467 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_inn ≝ λx:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_inn x u : l_e_st_eq_landau_n_nat).
-
-(* constant 5468 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_1to x.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_xout x)).(l_imp_th3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x) (l_e_is (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_xout x)) o (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x.l_e_tris (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n)) (l_e_st_eq_landau_n_xout x) (l_e_st_eq_landau_n_isoutinn x n) (l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n) x (l_e_st_eq_landau_n_lessisi3 x) t)) : l_not (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x)).
-
-(* constant 5469 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_1to x.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_xout x)).(l_ore1 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x) (l_e_st_eq_landau_n_1top x n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t1 q x n o) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x).
-
-(* constant 5470 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma275 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_1to x.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_xout x)).(l_e_st_eq_landau_n_satz25c x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t2 q x n o) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x n)) x).
-
-(* constant 5471 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_recprop ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_and (l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_1out x)) (f (l_e_st_eq_landau_n_1out x))) (∀t:l_e_st_eq_landau_n_1to x.∀u:l_not (l_e_is (l_e_st_eq_landau_n_1to x) t (l_e_st_eq_landau_n_xout x)).l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x t)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q x t u))) (q (g t) (f (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x t)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q x t u))))) : Prop).
-
-(* constant 5472 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_1o ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_1out x : l_e_st_eq_landau_n_1to x).
-
-(* constant 5473 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_xo ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_xout x : l_e_st_eq_landau_n_1to x).
-
-(* constant 5474 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t11 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_st_eq_landau_n_satz16b u (l_e_st_eq_landau_n_suc u) x (l_e_st_eq_landau_n_satz18c u) l : l_e_st_eq_landau_n_less u x).
-
-(* constant 5475 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t12 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_st_eq_landau_n_lessisi1 u x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t11 q x u l) : l_e_st_eq_landau_n_lessis u x).
-
-(* constant 5476 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_ux ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_st_eq_landau_n_outn x u (l_e_st_eq_landau_n_rt_rp_r_c_8275_t12 q x u l) : l_e_st_eq_landau_n_1to x).
-
-(* constant 5477 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t13 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_ec3e31 (l_e_st_eq_landau_n_is u x) (l_e_st_eq_landau_n_more u x) (l_e_st_eq_landau_n_less u x) (l_e_st_eq_landau_n_satz10b u x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t11 q x u l) : l_e_st_eq_landau_n_nis u x).
-
-(* constant 5478 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)) (l_e_st_eq_landau_n_is u x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t13 q x u l) (λt:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x).l_e_st_eq_landau_n_isoutne x u (l_e_st_eq_landau_n_rt_rp_r_c_8275_t12 q x u l) x (l_e_st_eq_landau_n_lessisi3 x) t) : l_not (l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x))).
-
-(* constant 5479 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t15 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_suc u (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (l_e_st_eq_landau_n_isinoutn x u (l_e_st_eq_landau_n_rt_rp_r_c_8275_t12 q x u l)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc u) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)))).
-
-(* constant 5480 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t16 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_suc u) l (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l))) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t15 q x u l) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l) (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l))) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))).
-
-(* constant 5481 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_ns ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_1to x.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)).(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q x n o) : l_e_st_eq_landau_n_1to x).
-
-(* constant 5482 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) : Prop).
-
-(* constant 5483 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_prop2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(∀t:l_e_st_eq_landau_n_1to x.∀u:l_not (l_e_is (l_e_st_eq_landau_n_1to x) t (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)).l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x t u)) (q (g t) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x t u))) : Prop).
-
-(* constant 5484 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q x f g) (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop2 q x f g) pg : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q x f g).
-
-(* constant 5485 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λn:l_e_st_eq_landau_n_1to x.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q x f g) (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop2 q x f g) pg n o : l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x n o)) (q (g n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x n o)))).
-
-(* constant 5486 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t17 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_isf (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx g (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t16 q x u l) : l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l)) (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))).
-
-(* constant 5487 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t18 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (g (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l)) (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l))) (q (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t17 q x f g pg u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t4 q x f g pg (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)) : l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l)) (q (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l))))).
-
-(* constant 5488 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis u x.(l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_outn x u l)) (h (l_e_st_eq_landau_n_outn x u l)) : Prop).
-
-(* constant 5489 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_nat.(l_and (l_e_st_eq_landau_n_lessis u x) (∀t:l_e_st_eq_landau_n_lessis u x.l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h u t) : Prop).
-
-(* constant 5490 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_nat.(l_or (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h u) (l_e_st_eq_landau_n_more u x) : Prop).
-
-(* constant 5491 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λl:l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 x.(l_e_st_eq_landau_n_isoutni x l_e_st_eq_landau_n_1 l l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a x) (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_outn x l_e_st_eq_landau_n_1 l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)).
-
-(* constant 5492 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t6 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λl:l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 x.(l_e_isf (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx g (l_e_st_eq_landau_n_outn x l_e_st_eq_landau_n_1 l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t5 q x f g h pg ph l) : l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_outn x l_e_st_eq_landau_n_1 l)) (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x))).
-
-(* constant 5493 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t7 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λl:l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 x.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (g (l_e_st_eq_landau_n_outn x l_e_st_eq_landau_n_1 l)) (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t6 q x f g h pg ph l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t3 q x f g pg) : l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_outn x l_e_st_eq_landau_n_1 l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x))).
-
-(* constant 5494 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t8 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λl:l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 x.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (g (l_e_st_eq_landau_n_outn x l_e_st_eq_landau_n_1 l)) (h (l_e_st_eq_landau_n_outn x l_e_st_eq_landau_n_1 l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t7 q x f g h pg ph l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t7 q x f h g ph pg l) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h l_e_st_eq_landau_n_1 l).
-
-(* constant 5495 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t9 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.(l_andi (l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 x) (∀t:l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 x.l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h l_e_st_eq_landau_n_1 t) (l_e_st_eq_landau_n_satz24a x) (λt:l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 x.l_e_st_eq_landau_n_rt_rp_r_c_8275_t8 q x f g h pg ph t) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h l_e_st_eq_landau_n_1).
-
-(* constant 5496 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t10 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_more l_e_st_eq_landau_n_1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t9 q x f g h pg ph) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h l_e_st_eq_landau_n_1).
-
-(* constant 5497 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t19 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_ec3e32 (l_e_st_eq_landau_n_is u x) (l_e_st_eq_landau_n_more u x) (l_e_st_eq_landau_n_less u x) (l_e_st_eq_landau_n_satz10b u x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t11 q x u l) : l_not (l_e_st_eq_landau_n_more u x)).
-
-(* constant 5498 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t20 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h u) (l_e_st_eq_landau_n_more u x) p (l_e_st_eq_landau_n_rt_rp_r_c_8275_t19 q x f g h pg ph u p l) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h u).
-
-(* constant 5499 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t21 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_ande2 (l_e_st_eq_landau_n_lessis u x) (∀t:l_e_st_eq_landau_n_lessis u x.l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h u t) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t20 q x f g h pg ph u p l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t12 q x u l) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h u (l_e_st_eq_landau_n_rt_rp_r_c_8275_t12 q x u l)).
-
-(* constant 5500 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t22 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))) (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (h (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t21 q x f g h pg ph u p l) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))) (q (h (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l))))).
-
-(* constant 5501 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t23 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (h (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l)) (q (h (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t18 q x f h ph u l) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (h (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))) (h (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l))).
-
-(* constant 5502 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t24 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (g (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l)) (q (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))) (q (h (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))) (h (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t18 q x f g pg u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t22 q x f g h pg ph u p l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t23 q x f g h pg ph u p l) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h (l_e_st_eq_landau_n_suc u) l).
-
-(* constant 5503 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t25 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_andi (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x) (∀t:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h (l_e_st_eq_landau_n_suc u) t) l (λt:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.l_e_st_eq_landau_n_rt_rp_r_c_8275_t24 q x f g h pg ph u p t) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h (l_e_st_eq_landau_n_suc u)).
-
-(* constant 5504 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t26 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_suc u) x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t25 q x f g h pg ph u p l) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h (l_e_st_eq_landau_n_suc u)).
-
-(* constant 5505 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t27 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λn:l_not (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x).(l_e_st_eq_landau_n_satz10k (l_e_st_eq_landau_n_suc u) x n : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_suc u) x).
-
-(* constant 5506 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t28 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λn:l_not (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x).(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_suc u) x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t27 q x f g h pg ph u p n) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h (l_e_st_eq_landau_n_suc u)).
-
-(* constant 5507 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t29 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.(l_imp_th1 (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h (l_e_st_eq_landau_n_suc u)) (λt:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.l_e_st_eq_landau_n_rt_rp_r_c_8275_t26 q x f g h pg ph u p t) (λt:l_not (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x).l_e_st_eq_landau_n_rt_rp_r_c_8275_t28 q x f g h pg ph u p t) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h (l_e_st_eq_landau_n_suc u)).
-
-(* constant 5508 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t30 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h v) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t10 q x f g h pg ph) (λv:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h v.l_e_st_eq_landau_n_rt_rp_r_c_8275_t29 q x f g h pg ph v t) u : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u).
-
-(* constant 5509 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t31 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λn:l_e_st_eq_landau_n_1to x.(l_e_isf (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx g n (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n)) (l_e_st_eq_landau_n_isoutinn x n) : l_e_st_eq_landau_n_rt_rp_r_c_is (g n) (g (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n)))).
-
-(* constant 5510 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t32 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λn:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_satz10d (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x (l_e_st_eq_landau_n_1top x n) : l_not (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x)).
-
-(* constant 5511 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t33 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λn:l_e_st_eq_landau_n_1to x.(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h (l_e_st_eq_landau_n_rt_rp_r_c_inn x n)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t30 q x f g h pg ph (l_e_st_eq_landau_n_rt_rp_r_c_inn x n)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t32 q x f g h pg ph n) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h (l_e_st_eq_landau_n_rt_rp_r_c_inn x n)).
-
-(* constant 5512 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t34 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λn:l_e_st_eq_landau_n_1to x.(l_ande2 (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x) (∀t:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x.l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) t) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t33 q x f g h pg ph n) (l_e_st_eq_landau_n_1top x n) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n)).
-
-(* constant 5513 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t35 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λn:l_e_st_eq_landau_n_1to x.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (h n) (h (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t31 q x f h g ph pg n) : l_e_st_eq_landau_n_rt_rp_r_c_is (h (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n))) (h n)).
-
-(* constant 5514 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t36 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λn:l_e_st_eq_landau_n_1to x.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (g n) (g (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n))) (h (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n))) (h n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t31 q x f g h pg ph n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t34 q x f g h pg ph n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t35 q x f g h pg ph n) : l_e_st_eq_landau_n_rt_rp_r_c_is (g n) (h n)).
-
-(* constant 5515 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t37 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.(l_e_fisi (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx g h (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8275_t36 q x f g h pg ph t) : l_e_is (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) g h).
-
-(* constant 5516 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_prop6 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_some (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g) : Prop).
-
-(* constant 5517 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.(l_all (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8275_prop6 q x f) : Prop).
-
-(* constant 5518 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t38 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q l_e_st_eq_landau_n_1)) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q l_e_st_eq_landau_n_1 f f).
-
-(* constant 5519 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t39 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) n (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q l_e_st_eq_landau_n_1)).(o (l_e_st_eq_landau_n_singlet_th1 n) : l_con).
-
-(* constant 5520 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t40 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) n (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q l_e_st_eq_landau_n_1)).(l_cone (l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q l_e_st_eq_landau_n_1 n o)) (q (f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q l_e_st_eq_landau_n_1 n o)))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t39 q f n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q l_e_st_eq_landau_n_1 n o)) (q (f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q l_e_st_eq_landau_n_1 n o)))).
-
-(* constant 5521 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t41 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_andi (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q l_e_st_eq_landau_n_1 f f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop2 q l_e_st_eq_landau_n_1 f f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t38 q f) (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λu:l_not (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) t (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q l_e_st_eq_landau_n_1)).l_e_st_eq_landau_n_rt_rp_r_c_8275_t40 q f t u) : l_e_st_eq_landau_n_rt_rp_r_c_recprop q l_e_st_eq_landau_n_1 f f).
-
-(* constant 5522 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t42 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_somei (Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q l_e_st_eq_landau_n_1 f g) f (l_e_st_eq_landau_n_rt_rp_r_c_8275_t41 q f) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop6 q l_e_st_eq_landau_n_1 f).
-
-(* constant 5523 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t43 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.(λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8275_t42 q f : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q l_e_st_eq_landau_n_1).
-
-(* constant 5524 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_xs ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.(l_e_st_eq_landau_n_suc x : l_e_st_eq_landau_n_nat).
-
-(* constant 5525 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) x (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_satz18c x)) f : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5526 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t44 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_onei (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) g) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) g.λv:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) h.l_e_st_eq_landau_n_rt_rp_r_c_8275_t37 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) g h u v) (p (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f)) : l_e_one (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) g)).
-
-(* constant 5527 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_ind (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) g) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t44 q x p f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5528 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t45 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_oneax (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) g) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t44 q x p f) : l_e_st_eq_landau_n_rt_rp_r_c_recprop q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f)).
-
-(* constant 5529 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).(l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) n (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) : Prop).
-
-(* constant 5530 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).(l_e_st_eq_landau_n_satz26a x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t2 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) x).
-
-(* constant 5531 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 q x p f n o) : l_e_st_eq_landau_n_1to x).
-
-(* constant 5532 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_b ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).(l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5533 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t47 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).(l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 q x p f n o1) (l_e_refis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o1)).
-
-(* constant 5534 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t48 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).(l_e_isf (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t47 q x p f n o o1) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o1)).
-
-(* constant 5535 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(q (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5536 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_c ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).(l_r_ite (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.λu:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f)) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).l_e_st_eq_landau_n_rt_rp_r_c_8275_t48 q x p f n t u) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5537 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t49 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λi:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.(l_r_itet (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.λu:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f)) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).l_e_st_eq_landau_n_rt_rp_r_c_8275_t48 q x p f n t u) i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f)).
-
-(* constant 5538 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t50 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).(l_r_itef (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.λu:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f)) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).l_e_st_eq_landau_n_rt_rp_r_c_8275_t48 q x p f n t u) o : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o)).
-
-(* constant 5539 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_g2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f t : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5540 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t51 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_symnotis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_ax3 x)) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) t) : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)))).
-
-(* constant 5541 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t52 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8275_t50 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t51 q x p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t51 q x p f))).
-
-(* constant 5542 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t53 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)))).
-
-(* constant 5543 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t54 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a x) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t51 q x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t53 q x p f) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t51 q x p f))).
-
-(* constant 5544 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t55 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t51 q x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t54 q x p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t51 q x p f))).
-
-(* constant 5545 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t56 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t51 q x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t52 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t55 q x p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x))).
-
-(* constant 5546 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t57 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t56 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t3 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t45 q x p f)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x))).
-
-(* constant 5547 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t58 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isinoutn x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a x) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x))).
-
-(* constant 5548 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t59 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_satz18c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t58 q x p f) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) x (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_satz18c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x))).
-
-(* constant 5549 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t60 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) x (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_satz18c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t59 q x p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x))).
-
-(* constant 5550 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t61 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t57 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t60 q x p f) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) f (l_e_st_eq_landau_n_rt_rp_r_c_8275_g2 q x p f)).
-
-(* constant 5551 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t62 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).
-
-(* constant 5552 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t63 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_st_eq_landau_n_ax4 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t62 q x p f n o i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) x).
-
-(* constant 5553 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t64 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 q x p f n o) x (l_e_st_eq_landau_n_lessisi3 x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t63 q x p f n o i) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)).
-
-(* constant 5554 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t65 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_isf (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_symis (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t64 q x p f n o i)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o)).
-
-(* constant 5555 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t66 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t65 q x p f n o i) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t50 q x p f n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n)).
-
-(* constant 5556 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t67 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t66 q x p f n o i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))))).
-
-(* constant 5557 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t68 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_symis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) i) : l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))).
-
-(* constant 5558 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t69 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t68 q x p f n o i) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)))).
-
-(* constant 5559 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t70 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t49 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) i) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t67 q x p f n o i) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t69 q x p f n o i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)))).
-
-(* constant 5560 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t71 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x).(l_e_st_eq_landau_n_isoutne x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 q x p f n o) x (l_e_st_eq_landau_n_lessisi3 x) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) x).
-
-(* constant 5561 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t72 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x).(l_e_st_eq_landau_n_ax2 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t71 q x p f n o o1 i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).
-
-(* constant 5562 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t73 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x).(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t72 q x p f n o o1 i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).
-
-(* constant 5563 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) o1 (λt:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x).l_e_st_eq_landau_n_rt_rp_r_c_8275_t73 q x p f n o o1 t) : l_not (l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x))).
-
-(* constant 5564 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t75 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 q x p f n o) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o))).
-
-(* constant 5565 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t76 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_st_eq_landau_n_ax2 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t75 q x p f n o o1) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o)))).
-
-(* constant 5566 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t77 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))).
-
-(* constant 5567 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t78 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_tris1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o))) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t77 q x p f n o o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t76 q x p f n o o1) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o)))).
-
-(* constant 5568 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t79 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) o1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o))) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t78 q x p f n o o1) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))).
-
-(* constant 5569 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t80 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_isf (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t79 q x p f n o o1) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)))).
-
-(* constant 5570 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t81 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o))) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o))) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)))).
-
-(* constant 5571 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t82 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o))) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t76 q x p f n o o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t81 q x p f n o o1) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)))).
-
-(* constant 5572 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t83 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))) x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))) (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_satz18c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t82 q x p f n o o1) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) x (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_satz18c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)))).
-
-(* constant 5573 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t84 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) x (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_satz18c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t83 q x p f n o o1) : l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)))).
-
-(* constant 5574 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t85 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t84 q x p f n o o1) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))))).
-
-(* constant 5575 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t86 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t50 q x p f n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)))).
-
-(* constant 5576 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t87 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t50 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t80 q x p f n o o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t4 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t45 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))))).
-
-(* constant 5577 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t88 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t86 q x p f n o o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t85 q x p f n o o1) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))))).
-
-(* constant 5578 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t89 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t87 q x p f n o o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t88 q x p f n o o1) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)))).
-
-(* constant 5579 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t90 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)))) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).l_e_st_eq_landau_n_rt_rp_r_c_8275_t70 q x p f n o t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).l_e_st_eq_landau_n_rt_rp_r_c_8275_t89 q x p f n o t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)))).
-
-(* constant 5580 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t91 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f t).l_e_st_eq_landau_n_rt_rp_r_c_8275_t90 q x p f t u : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop2 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) f (l_e_st_eq_landau_n_rt_rp_r_c_8275_g2 q x p f)).
-
-(* constant 5581 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t92 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_andi (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) f (l_e_st_eq_landau_n_rt_rp_r_c_8275_g2 q x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop2 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) f (l_e_st_eq_landau_n_rt_rp_r_c_8275_g2 q x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t61 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t91 q x p f) : l_e_st_eq_landau_n_rt_rp_r_c_recprop q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) f (l_e_st_eq_landau_n_rt_rp_r_c_8275_g2 q x p f)).
-
-(* constant 5582 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t93 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_somei (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) f g) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g2 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t92 q x p f) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop6 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) f).
-
-(* constant 5583 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t94 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.(λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8275_t93 q x p f : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).
-
-(* constant 5584 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t95 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q y) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t43 q) (λy:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q y.l_e_st_eq_landau_n_rt_rp_r_c_8275_t94 q y t) x : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x).
-
-(* constant 5585 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t96 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8275_t95 q x f : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop6 q x f).
-
-(* constant 5586 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t97 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_onei (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λv:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.l_e_st_eq_landau_n_rt_rp_r_c_8275_t37 q x f g h u v) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t96 q x f) : l_e_one (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g)).
-
-(* constant 5587 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz275 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8275_t97 q x f : l_e_one (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g)).
-
-(* constant 5588 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_recf ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_ind (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g) (l_e_st_eq_landau_n_rt_rp_r_c_satz275 q x f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5589 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz275a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_oneax (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g) (l_e_st_eq_landau_n_rt_rp_r_c_satz275 q x f) : l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f)).
-
-(* constant 5590 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_rec ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_rt_rp_r_c_recf q x f n : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5591 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz275b ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8275_t3 q x f (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f) (l_e_st_eq_landau_n_rt_rp_r_c_satz275a q x f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_rec q x f (l_e_st_eq_landau_n_1out x)) (f (l_e_st_eq_landau_n_1out x))).
-
-(* constant 5592 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_sucx ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to x.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_xout x)).(l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x n o : l_e_st_eq_landau_n_1to x).
-
-(* constant 5593 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz275c ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to x.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_xout x)).(l_e_st_eq_landau_n_rt_rp_r_c_8275_t4 q x f (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f) (l_e_st_eq_landau_n_rt_rp_r_c_satz275a q x f) n o : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_rec q x f (l_e_st_eq_landau_n_rt_rp_r_c_sucx q x f n o)) (q (l_e_st_eq_landau_n_rt_rp_r_c_rec q x f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_sucx q x f n o)))).
-
-(* constant 5594 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz275d ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.(l_e_st_eq_landau_n_rt_rp_r_c_8275_t37 q x f g (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f) r (l_e_st_eq_landau_n_rt_rp_r_c_satz275a q x f) : l_e_is (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) g (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f)).
-
-(* constant 5595 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz275e ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λn:l_e_st_eq_landau_n_1to x.(l_e_fise (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx g (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f) (l_e_st_eq_landau_n_rt_rp_r_c_satz275d q x f g r) n : l_e_st_eq_landau_n_rt_rp_r_c_is (g n) (l_e_st_eq_landau_n_rt_rp_r_c_rec q x f n)).
-
-(* constant 5596 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_fl ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x y l f : Πt:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5597 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_rf ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_recf q x f : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5598 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x y l (l_e_st_eq_landau_n_rt_rp_r_c_8275_rf q x y l f) : Πt:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5599 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t98 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isinoutn y l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a y) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_1out y))).
-
-(* constant 5600 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t99 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a x) (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_1out y)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_1out y)) y x (l_e_st_eq_landau_n_1top y (l_e_st_eq_landau_n_1out y)) l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t98 q x y l f) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1out x) (l_e_st_eq_landau_n_left1to x y l (l_e_st_eq_landau_n_1out y))).
-
-(* constant 5601 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t100 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isp (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_rf q x y l f t) (f t)) (l_e_st_eq_landau_n_1out x) (l_e_st_eq_landau_n_left1to x y l (l_e_st_eq_landau_n_1out y)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t3 q x f (l_e_st_eq_landau_n_rt_rp_r_c_8275_rf q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_satz275a q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t99 q x y l f) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q y (l_e_st_eq_landau_n_rt_rp_r_c_8275_fl q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f)).
-
-(* constant 5602 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t100a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_imp_th3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y) (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)) o (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y.l_e_tris (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_outn y (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) (l_e_st_eq_landau_n_1top y n)) (l_e_st_eq_landau_n_xout y) (l_e_st_eq_landau_n_isoutinn y n) (l_e_st_eq_landau_n_isoutni y (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) (l_e_st_eq_landau_n_1top y n) y (l_e_st_eq_landau_n_lessisi3 y) t)) : l_not (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y)).
-
-(* constant 5603 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t100b ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_ore1 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y) (l_e_st_eq_landau_n_1top y n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t100a q x y l f n o) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y).
-
-(* constant 5604 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t101 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_e_st_eq_landau_n_satz16b (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t100b q x y l f n o) l : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) x).
-
-(* constant 5605 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t102 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_ec3e31 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) x) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) x) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) x) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t101 q x y l f n o) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) x).
-
-(* constant 5606 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t103 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_xout x)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t102 q x y l f n o) (λt:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_xout x).l_e_st_eq_landau_n_isoutne x (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y x (l_e_st_eq_landau_n_1top y n) l) x (l_e_st_eq_landau_n_lessisi3 x) t) : l_not (l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_xout x))).
-
-(* constant 5607 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t104 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_e_st_eq_landau_n_rt_rp_r_c_8275_t4 q x f (l_e_st_eq_landau_n_rt_rp_r_c_8275_rf q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_satz275a q x f) (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t103 q x y l f n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_rf q x y l f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t103 q x y l f n o))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t103 q x y l f n o))))).
-
-(* constant 5608 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t105 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y x (l_e_st_eq_landau_n_1top y n) l) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_left1to x y l n))).
-
-(* constant 5609 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t106 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_e_st_eq_landau_n_ax2 (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_left1to x y l n)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t105 q x y l f n o) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn y n)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_left1to x y l n)))).
-
-(* constant 5610 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t107 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_e_st_eq_landau_n_isinoutn y (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn y n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q y n o) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn y n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o))).
-
-(* constant 5611 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t108 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_e_tris1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_left1to x y l n))) (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn y n)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t106 q x y l f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t107 q x y l f n o) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_left1to x y l n))) (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o))).
-
-(* constant 5612 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t109 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_left1to x y l n))) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q x (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t103 q x y l f n o)) (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o)) y x (l_e_st_eq_landau_n_1top y (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o)) l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t108 q x y l f n o) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t103 q x y l f n o)) (l_e_st_eq_landau_n_left1to x y l (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o))).
-
-(* constant 5613 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t110 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_e_isp (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_rf q x y l f t) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f n) (f t))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t103 q x y l f n o)) (l_e_st_eq_landau_n_left1to x y l (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t104 q x y l f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t109 q x y l f n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_fl q x y l f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o)))).
-
-(* constant 5614 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t111 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(λt:l_e_st_eq_landau_n_1to y.λu:l_not (l_e_is (l_e_st_eq_landau_n_1to y) t (l_e_st_eq_landau_n_xout y)).l_e_st_eq_landau_n_rt_rp_r_c_8275_t110 q x y l f t u : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop2 q y (l_e_st_eq_landau_n_rt_rp_r_c_8275_fl q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f)).
-
-(* constant 5615 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t112 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_andi (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q y (l_e_st_eq_landau_n_rt_rp_r_c_8275_fl q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop2 q y (l_e_st_eq_landau_n_rt_rp_r_c_8275_fl q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t100 q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t111 q x y l f) : l_e_st_eq_landau_n_rt_rp_r_c_recprop q y (l_e_st_eq_landau_n_rt_rp_r_c_8275_fl q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f)).
-
-(* constant 5616 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz275f ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz275d q y (l_e_st_eq_landau_n_rt_rp_r_c_8275_fl q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t112 q x y l f) : l_e_is (Πt:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x y l (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_recf q y (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x y l f))).
-
-(* constant 5617 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_xs ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_suc x : l_e_st_eq_landau_n_nat).
-
-(* constant 5618 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat).
-
-(* constant 5619 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)).
-
-(* constant 5620 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_satz18c x) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)).
-
-(* constant 5621 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_satz4e x) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)).
-
-(* constant 5622 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_fx ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t1 q x f) f : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5623 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f) f : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5624 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t95 q x) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5625 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8275_g2 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t95 q x) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5626 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t95 q x) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5627 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_g ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) f) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5628 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8275_t49 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t95 q x) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)) (l_e_refis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))))).
-
-(* constant 5629 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz275d q (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t92 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t95 q x) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f)) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f))).
-
-(* constant 5630 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t6 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz275f q (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f) f : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f))).
-
-(* constant 5631 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t7 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t6 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t5 q x f) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 q x f)).
-
-(* constant 5632 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t8 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_fise (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8276_g q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t7 q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8276_g q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)))).
-
-(* constant 5633 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t9 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8276_g q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)))) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t8 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t4 q x f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8276_g q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))))).
-
-(* constant 5634 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t10 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_1top x n) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t2 q x f)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t2 q x f) n))).
-
-(* constant 5635 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t11 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_1top x n) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t1 q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t2 q x f) n)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t2 q x f) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t2 q x f) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t10 q x f n) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t1 q x f) n) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t2 q x f) n))).
-
-(* constant 5636 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t12 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to x.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t1 q x f) n) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t2 q x f) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t11 q x f n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f n) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x q x f n)).
-
-(* constant 5637 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t13 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_fisi (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x q x f) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8276_t12 q x f t) : l_e_is (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x q x f)).
-
-(* constant 5638 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t14 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λu:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recf q x u) (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t13 q x f) : l_e_is (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x q x f))).
-
-(* constant 5639 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t15 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz275d q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t45 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t95 q x) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f)) : l_e_is (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x q x f))).
-
-(* constant 5640 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t16 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t15 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t14 q x f) : l_e_is (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f))).
-
-(* constant 5641 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t17 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_fise (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t16 q x f) (l_e_st_eq_landau_n_xout x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f) (l_e_st_eq_landau_n_xout x))).
-
-(* constant 5642 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t18 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)))).
-
-(* constant 5643 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t19 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (l_e_st_eq_landau_n_satz4a x) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t18 q x f) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)))).
-
-(* constant 5644 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t20 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t19 q x f) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)))).
-
-(* constant 5645 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t21 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isp1 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f).l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) f t) (q (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (f t))) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t9 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t20 q x f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f))))).
-
-(* constant 5646 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t22 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)))) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f) (l_e_st_eq_landau_n_xout x)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t17 q x f) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f) (l_e_st_eq_landau_n_xout x)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f))))).
-
-(* constant 5647 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz276 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f) (l_e_st_eq_landau_n_xout x)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t21 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t22 q x f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (q (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1)) f) (l_e_st_eq_landau_n_xout x)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))).
-
-(* constant 5648 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_smpr ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_rec q x f (l_e_st_eq_landau_n_xout x) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5649 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_sum ≝ λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_smpr (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl t u) x f : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5650 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_prod ≝ λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_smpr (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) x f : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5651 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8277_t1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_lessisi3 l_e_st_eq_landau_n_1) (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1) : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)).
-
-(* constant 5652 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz277 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isp (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_rec q l_e_st_eq_landau_n_1 f t) (f t)) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_satz275b q l_e_st_eq_landau_n_1 f) (l_e_st_eq_landau_n_rt_rp_r_c_8277_t1 q f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5653 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz278 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz276 q x f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1)) f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))).
-
-(* constant 5654 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.(l_e_st_eq_landau_n_lessisi2 y x i : l_e_st_eq_landau_n_lessis y x).
-
-(* constant 5655 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v8_f0 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x y (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i) f : Πt:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5656 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v8_t2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.(l_e_fise (l_e_st_eq_landau_n_1to y) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x y (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_recf q y (l_e_st_eq_landau_n_rt_rp_r_c_v8_f0 q x f y i)) (l_e_st_eq_landau_n_rt_rp_r_c_satz275f q x y (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i) f) (l_e_st_eq_landau_n_xout y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i) (l_e_st_eq_landau_n_xout y))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_v8_f0 q x f y i))).
-
-(* constant 5657 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v8_t3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.(l_e_tris1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_xout y)) x y (l_e_st_eq_landau_n_isinoutn y y (l_e_st_eq_landau_n_lessisi3 y)) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_xout y)) x).
-
-(* constant 5658 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v8_t4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.(l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_xout y)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_xout y)) y x (l_e_st_eq_landau_n_1top y (l_e_st_eq_landau_n_xout y)) (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i)) x (l_e_st_eq_landau_n_lessisi3 x) (l_e_st_eq_landau_n_rt_rp_r_c_v8_t3 q x f y i) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i) (l_e_st_eq_landau_n_xout y)) (l_e_st_eq_landau_n_xout x)).
-
-(* constant 5659 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v8_t5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.(l_e_isf (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f) (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i) (l_e_st_eq_landau_n_xout y)) (l_e_st_eq_landau_n_xout x) (l_e_st_eq_landau_n_rt_rp_r_c_v8_t4 q x f y i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i) (l_e_st_eq_landau_n_xout y))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x f)).
-
-(* constant 5660 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_issmpr ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_v8_f0 q x f y i)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i) (l_e_st_eq_landau_n_xout y))) (l_e_st_eq_landau_n_rt_rp_r_c_v8_t2 q x f y i) (l_e_st_eq_landau_n_rt_rp_r_c_v8_t5 q x f y i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x y (l_e_st_eq_landau_n_lessisi2 y x i) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x f)).
-
-(* constant 5661 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_xr ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_rlofnt x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5662 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum x (λt:l_e_st_eq_landau_n_1to x.z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0)) : Prop).
-
-(* constant 5663 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t1 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl t u) (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum l_e_st_eq_landau_n_1 (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.z)) z).
-
-(* constant 5664 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t2 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_sum l_e_st_eq_landau_n_1 (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.z)) z (l_e_st_eq_landau_n_rt_rp_r_c_ts z l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t1 z) (l_e_st_eq_landau_n_rt_rp_r_c_satz222a z) : l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z l_e_st_eq_landau_n_1).
-
-(* constant 5665 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t3 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl t u) x (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (λt:l_e_st_eq_landau_n_1to x.z)) z)).
-
-(* constant 5666 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t4 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_st_eq_landau_n_rt_rp_r_c_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_sum x (λt:l_e_st_eq_landau_n_1to x.z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0)) z (l_e_st_eq_landau_n_rt_rp_r_c_ts z l_e_st_eq_landau_n_rt_rp_r_c_1c) p (l_e_st_eq_landau_n_rt_rp_r_c_satz222a z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (λt:l_e_st_eq_landau_n_1to x.z)) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z l_e_st_eq_landau_n_rt_rp_r_c_1c))).
-
-(* constant 5667 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t5 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_st_eq_landau_n_rt_rp_r_c_distpt2 z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_1c : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_1c))).
-
-(* constant 5668 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t6 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_st_eq_landau_n_rt_rp_r_c_plis12a (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 5669 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t7 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satzr155b x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 5670 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t8 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t6 z x p) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t7 z x p) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 5671 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t9 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_0) z (l_e_st_eq_landau_n_rt_rp_r_c_8279_t8 z x p) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 5672 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t10 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (λt:l_e_st_eq_landau_n_1to x.z)) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t3 z x p) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t4 z x p) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t5 z x p) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t9 z x p) : l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 5673 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t11 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z t) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t10 z x p) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z (l_e_st_eq_landau_n_suc x)).
-
-(* constant 5674 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz279 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z t) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t2 z) (λu:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z u.l_e_st_eq_landau_n_rt_rp_r_c_8279_t11 z u t) x : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum x (λt:l_e_st_eq_landau_n_1to x.z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 5675 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_t1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_satz18a l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_2).
-
-(* constant 5676 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_t1 q f) f : Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5677 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_t2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 q l_e_st_eq_landau_n_1 f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 f) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f)) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)))).
-
-(* constant 5678 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_t3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 q (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f)) (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5679 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_t4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isinoutn l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_lessisi3 l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5680 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_t5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a l_e_st_eq_landau_n_2) (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_1top l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8280_t1 q f)) (l_e_st_eq_landau_n_rt_rp_r_c_8280_t4 q f) : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2) (l_e_st_eq_landau_n_left1to l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_t1 q f) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5681 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_t6 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2) (l_e_st_eq_landau_n_left1to l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_t1 q f) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8280_t5 q f) : l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5682 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_t7 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f)) (f (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8280_t3 q f) (l_e_st_eq_landau_n_rt_rp_r_c_8280_t6 q f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f)) (f (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))).
-
-(* constant 5683 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_t8 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f)) (f (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8280_t7 q f) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f)) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))) (q (f (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)))).
-
-(* constant 5684 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz280 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 f) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f)) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))) (q (f (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))) (l_e_st_eq_landau_n_rt_rp_r_c_8280_t2 q f) (l_e_st_eq_landau_n_rt_rp_r_c_8280_t8 q f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 f) (q (f (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)))).
-
-(* constant 5685 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_assoc ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.(∀x:l_e_st_eq_landau_n_rt_rp_r_c_cx.∀y:l_e_st_eq_landau_n_rt_rp_r_c_cx.∀z:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (q (q x y) z) (q x (q y z)) : Prop).
-
-(* constant 5686 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_assocp1 ≝ (λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_asspl1 x y z : l_e_st_eq_landau_n_rt_rp_r_c_assoc (λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl x y)).
-
-(* constant 5687 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_assocts ≝ (λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_assts1 x y z : l_e_st_eq_landau_n_rt_rp_r_c_assoc (λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts x y)).
-
-(* constant 5688 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_assq1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.(a z u v : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q z u) v) (q z (q u v))).
-
-(* constant 5689 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_assq2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (q (q z u) v) (q z (q u v)) (l_e_st_eq_landau_n_rt_rp_r_c_assq1 q a z u v) : l_e_st_eq_landau_n_rt_rp_r_c_is (q z (q u v)) (q (q z u) v)).
-
-(* constant 5690 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_satz18a x y) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_pl x y)).
-
-(* constant 5691 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x y) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_t1 q a x y) f : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5692 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_right l_e_st_eq_landau_n_rt_rp_r_c_cx x y f : Πt:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5693 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_prop1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl x y) f) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y f))) : Prop).
-
-(* constant 5694 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_all (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y).l_e_st_eq_landau_n_rt_rp_r_c_cx) (λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8281_prop1 q a x y u) : Prop).
-
-(* constant 5695 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 q x f0 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f0) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x l_e_st_eq_landau_n_1 f0)) (f0 (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))).
-
-(* constant 5696 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 q (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5697 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isinoutn l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_lessisi3 l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5698 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_ispl2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_t4 q a x f0) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 5699 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t6 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_1top l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t5 q a x f0) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_right1to x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5700 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t7 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_c_cx f0 (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_right1to x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t6 q a x f0) : l_e_st_eq_landau_n_rt_rp_r_c_is (f0 (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5701 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t8 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (f0 (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t7 q a x f0) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t3 q a x f0) : l_e_st_eq_landau_n_rt_rp_r_c_is (f0 (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0))).
-
-(* constant 5702 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t9 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x l_e_st_eq_landau_n_1 f0))) (f0 (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t8 q a x f0) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x l_e_st_eq_landau_n_1 f0)) (f0 (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x l_e_st_eq_landau_n_1 f0)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0)))).
-
-(* constant 5703 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t10 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f0) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x l_e_st_eq_landau_n_1 f0)) (f0 (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x l_e_st_eq_landau_n_1 f0)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t2 q a x f0) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t9 q a x f0) : l_e_st_eq_landau_n_rt_rp_r_c_8281_prop1 q a x l_e_st_eq_landau_n_1 f0).
-
-(* constant 5704 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t11 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.(λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8281_t10 q a x u : l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x l_e_st_eq_landau_n_1).
-
-(* constant 5705 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat).
-
-(* constant 5706 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_pl x y : l_e_st_eq_landau_n_nat).
-
-(* constant 5707 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) : l_e_st_eq_landau_n_nat).
-
-(* constant 5708 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat).
-
-(* constant 5709 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_asspl1 x y l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)).
-
-(* constant 5710 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t13 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))).
-
-(* constant 5711 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t14 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_asspl2 x y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t13 q a x y p f) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))).
-
-(* constant 5712 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t15 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t14 q a x y p f) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))).
-
-(* constant 5713 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t16 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t15 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))).
-
-(* constant 5714 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_fr ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) f : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5715 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t17 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz275f q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) f : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f)) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f))).
-
-(* constant 5716 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t18 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_fise (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f)) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t17 q a x y p f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f))).
-
-(* constant 5717 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t19 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_satz18a (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)).
-
-(* constant 5718 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_frr ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t19 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5719 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t20 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))))).
-
-(* constant 5720 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t21 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.q u (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))) (p (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))))).
-
-(* constant 5721 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t22 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_assq1 q a (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))))).
-
-(* constant 5722 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t23 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 y (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_satz18a y l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)).
-
-(* constant 5723 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_fy ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) y (l_e_st_eq_landau_n_rt_rp_r_c_8281_t23 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f) : Πt:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5724 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t24 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))))).
-
-(* constant 5725 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t25 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))).
-
-(* constant 5726 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t26 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_t25 q a x y p f) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))))).
-
-(* constant 5727 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t27 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t14 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t26 q a x y p f) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))))).
-
-(* constant 5728 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t28 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) x (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t27 q a x y p f) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_right1to x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))).
-
-(* constant 5729 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t29 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_right1to x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t28 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))).
-
-(* constant 5730 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t30 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t29 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))))).
-
-(* constant 5731 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_rt_rp_r_c_inn y n : l_e_st_eq_landau_n_nat).
-
-(* constant 5732 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) y (l_e_st_eq_landau_n_rt_rp_r_c_8281_t23 q a x y p f) n : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)).
-
-(* constant 5733 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t31 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n) y (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_1top y n) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t23 q a x y p f)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n))).
-
-(* constant 5734 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t32 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n)) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_t31 q a x y p f n) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n)))).
-
-(* constant 5735 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_nxpy ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_right1to x y n : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y)).
-
-(* constant 5736 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t19 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxpy q a x y p f n) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)).
-
-(* constant 5737 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t33 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxpy q a x y p f n)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxpy q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxpy q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t19 q a x y p f)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxpy q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n))).
-
-(* constant 5738 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t34 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n)) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n) y x (l_e_st_eq_landau_n_1top y n)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxpy q a x y p f n))).
-
-(* constant 5739 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t35 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxpy q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t34 q a x y p f n) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t33 q a x y p f n) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n))).
-
-(* constant 5740 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t36 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_tris1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n))) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t32 q a x y p f n) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t35 q a x y p f n) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n))) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n))).
-
-(* constant 5741 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t37 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n))) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) x (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n))) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t36 q a x y p f n) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) (l_e_st_eq_landau_n_right1to x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n))).
-
-(* constant 5742 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t38 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_right1to x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t37 q a x y p f n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f n) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f) n)).
-
-(* constant 5743 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t39 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_fisi (l_e_st_eq_landau_n_1to y) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) (λu:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_8281_t38 q a x y p f u) : l_e_is (Πu:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))).
-
-(* constant 5744 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t40 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (Πu:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:Πu:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q y t) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t39 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))).
-
-(* constant 5745 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t41 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f)) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t40 q a x y p f)) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))))).
-
-(* constant 5746 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t41a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t30 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t41 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))))).
-
-(* constant 5747 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t42 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t41a q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t24 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f))).
-
-(* constant 5748 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t43 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t42 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)))).
-
-(* constant 5749 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_m0 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_rt_rp_r_c_inn x m : l_e_st_eq_landau_n_nat).
-
-(* constant 5750 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_mxpy ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_t1 q a x y) m : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y)).
-
-(* constant 5751 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t19 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxpy q a x y p f m) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)).
-
-(* constant 5752 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t44 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxpy q a x y p f m)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxpy q a x y p f m)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxpy q a x y p f m)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t19 q a x y p f)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxpy q a x y p f m)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 q a x y p f m))).
-
-(* constant 5753 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t45 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_m0 q a x y p f m) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_8281_m0 q a x y p f m) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_1top x m) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t1 q a x y)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_m0 q a x y p f m) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxpy q a x y p f m))).
-
-(* constant 5754 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t46 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_1to x.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_8281_m0 q a x y p f m) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxpy q a x y p f m)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 q a x y p f m)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t45 q a x y p f m) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t44 q a x y p f m) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_m0 q a x y p f m) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 q a x y p f m))).
-
-(* constant 5755 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t47 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_m0 q a x y p f m) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_8281_m0 q a x y p f m) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_1top x m) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 q a x y p f m)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 q a x y p f m)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 q a x y p f m)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t46 q a x y p f m) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_t1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)) m) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 q a x y p f m))).
-
-(* constant 5756 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t48 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_1to x.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_t1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)) m) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 q a x y p f m)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t47 q a x y p f m) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f m) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f) m)).
-
-(* constant 5757 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t49 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_fisi (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) (λu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8281_t48 q a x y p f u) : l_e_is (Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))).
-
-(* constant 5758 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t50 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q x t) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t49 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))).
-
-(* constant 5759 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t51 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t50 q a x y p f)) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)))).
-
-(* constant 5760 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t52 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t16 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t18 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t20 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t21 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))))).
-
-(* constant 5761 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t53 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t52 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t22 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t43 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t51 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_8281_prop1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f).
-
-(* constant 5762 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t54 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.(λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8281_t53 q a x y p u : l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)).
-
-(* constant 5763 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t55 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x t) (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t54 q a x y p) (l_e_st_eq_landau_n_satz4a y) : l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 5764 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t56 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x t) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t11 q a x) (λz:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x z.l_e_st_eq_landau_n_rt_rp_r_c_8281_t55 q a x z t) y : l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y).
-
-(* constant 5765 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz281 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8281_t56 q a x y f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl x y) f) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x y) x (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_satz18a x y)) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_right l_e_st_eq_landau_n_rt_rp_r_c_cx x y f)))).
-
-(* constant 5766 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_commut ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.(∀x:l_e_st_eq_landau_n_rt_rp_r_c_cx.∀y:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (q x y) (q y x) : Prop).
-
-(* constant 5767 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_commutpl ≝ (λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_compl x y : l_e_st_eq_landau_n_rt_rp_r_c_commut (λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl x y)).
-
-(* constant 5768 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_commutts ≝ (λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_comts x y : l_e_st_eq_landau_n_rt_rp_r_c_commut (λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts x y)).
-
-(* constant 5769 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_comq ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.(c z u : l_e_st_eq_landau_n_rt_rp_r_c_is (q z u) (q u z)).
-
-(* constant 5770 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_prop1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (λt:l_e_st_eq_landau_n_1to x.q (f t) (g t))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x f) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x g)) : Prop).
-
-(* constant 5771 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.(l_all (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λu:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_all (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λv:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8282_prop1 q a c x u v)) : Prop).
-
-(* constant 5772 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λf0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 q (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.q (f0 t) (g0 t)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.q (f0 t) (g0 t))) (q (f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 5773 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λf0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 g0) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_satz277 q g0) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 g0)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 5774 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λf0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0) (f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_satz277 q f0) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (q (f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 5775 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λf0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 g0)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (q (f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t2 q a c f0 g0) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t3 q a c f0 g0) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 g0)) (q (f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 5776 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λf0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.q (f0 t) (g0 t))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 g0)) (q (f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t1 q a c f0 g0) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t4 q a c f0 g0) : l_e_st_eq_landau_n_rt_rp_r_c_8282_prop1 q a c l_e_st_eq_landau_n_1 f0 g0).
-
-(* constant 5777 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t6 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.(λu:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8282_t5 q a c u v : l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c l_e_st_eq_landau_n_1).
-
-(* constant 5778 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat).
-
-(* constant 5779 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t7 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_assq2 q a (q u v) w z : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q u v) (q w z)) (q (q (q u v) w) z)).
-
-(* constant 5780 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t8 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_comq q c (q u v) w : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q u v) w) (q w (q u v))).
-
-(* constant 5781 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t9 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_assq2 q a w u v : l_e_st_eq_landau_n_rt_rp_r_c_is (q w (q u v)) (q (q w u) v)).
-
-(* constant 5782 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t10 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (q (q u v) w) (q w (q u v)) (q (q w u) v) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t8 q a c u v w z) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t9 q a c u v w z) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q u v) w) (q (q w u) v)).
-
-(* constant 5783 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t11 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t z) (q (q u v) w) (q (q w u) v) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t10 q a c u v w z) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q (q u v) w) z) (q (q (q w u) v) z)).
-
-(* constant 5784 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t12 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_assq1 q a (q w u) v z : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q (q w u) v) z) (q (q w u) (q v z))).
-
-(* constant 5785 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t13 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_comq q c w u : l_e_st_eq_landau_n_rt_rp_r_c_is (q w u) (q u w)).
-
-(* constant 5786 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t14 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (q v z)) (q w u) (q u w) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t13 q a c u v w z) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q w u) (q v z)) (q (q u w) (q v z))).
-
-(* constant 5787 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t15 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (q (q u v) (q w z)) (q (q (q u v) w) z) (q (q (q w u) v) z) (q (q w u) (q v z)) (q (q u w) (q v z)) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t7 q a c u v w z) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t11 q a c u v w z) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t12 q a c u v w z) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t14 q a c u v w z) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q u v) (q w z)) (q (q u w) (q v z))).
-
-(* constant 5788 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t16 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)).
-
-(* constant 5789 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8282_t16 q a c x p f g) f) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5790 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8282_t16 q a c x p f g) g) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5791 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_h ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).q (f t) (g t) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5792 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_shx ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8282_t16 q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_h q a c x p f g)) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5793 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t17 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 q x (l_e_st_eq_landau_n_rt_rp_r_c_8282_h q a c x p f g) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8282_h q a c x p f g)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_shx q a c x p f g) (q (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))))).
-
-(* constant 5794 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t18 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(p (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8282_t16 q a c x p f g) f) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8282_t16 q a c x p f g) g) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8282_shx q a c x p f g) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g))).
-
-(* constant 5795 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t19 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (q (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (l_e_st_eq_landau_n_rt_rp_r_c_8282_shx q a c x p f g) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g)) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t18 q a c x p f g) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_shx q a c x p f g) (q (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g)) (q (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))))).
-
-(* constant 5796 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t20 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8282_t15 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g)) (q (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))))).
-
-(* constant 5797 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t21 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_satz278 q x f) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f)).
-
-(* constant 5798 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t22 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t21 q a c x p f g) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))))).
-
-(* constant 5799 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t23 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) g) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_satz278 q x g) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) g)).
-
-(* constant 5800 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t24 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t23 q a c x p f g) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) g))).
-
-(* constant 5801 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t25 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8282_h q a c x p f g)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_shx q a c x p f g) (q (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g)) (q (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t17 q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t19 q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t20 q a c x p f g) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8282_h q a c x p f g)) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))))).
-
-(* constant 5802 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t26 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8282_h q a c x p f g)) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) g)) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t25 q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t22 q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t24 q a c x p f g) : l_e_st_eq_landau_n_rt_rp_r_c_8282_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f g).
-
-(* constant 5803 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t27 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.(λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8282_t26 q a c x p u v : l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)).
-
-(* constant 5804 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t28 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c t) (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t27 q a c x p) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c (l_e_st_eq_landau_n_suc x)).
-
-(* constant 5805 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t29 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c t) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t6 q a c) (λy:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c y.l_e_st_eq_landau_n_rt_rp_r_c_8282_t28 q a c y t) x : l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x).
-
-(* constant 5806 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz282 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8282_t29 q a c x f g : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (λt:l_e_st_eq_landau_n_1to x.q (f t) (g t))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x f) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x g))).
-
-(* constant 5807 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λs:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(λt:l_e_st_eq_landau_n_1to x.f (s t) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5808 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λs:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c x s f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x f) : Prop).
-
-(* constant 5809 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.(l_all (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to x) (λu:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to x.l_all (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λv:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_imp (l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c x u v))) : Prop).
-
-(* constant 5810 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (s (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1o (l_e_st_eq_landau_n_singlet_th1 (s (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_singlet_th1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (s (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)).
-
-(* constant 5811 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c l_e_st_eq_landau_n_1 s f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c l_e_st_eq_landau_n_1 s f)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c l_e_st_eq_landau_n_1 s f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5812 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_rt_rp_r_c_cx f (s (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t1 q a c s f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c l_e_st_eq_landau_n_1 s f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5813 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_satz277 q f) : l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f)).
-
-(* constant 5814 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c l_e_st_eq_landau_n_1 s f)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c l_e_st_eq_landau_n_1 s f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t2 q a c s f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t3 q a c s f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t4 q a c s f) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c l_e_st_eq_landau_n_1 s f).
-
-(* constant 5815 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t6 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.(λu:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λv:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_bijective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) u.l_e_st_eq_landau_n_rt_rp_r_c_8283_t5 q a c u v : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c l_e_st_eq_landau_n_1).
-
-(* constant 5816 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat).
-
-(* constant 5817 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5818 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t8 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.(l_ande1 (l_e_injective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s) (l_e_surjective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s) b : l_e_injective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s).
-
-(* constant 5819 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x) u : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5820 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) : l_e_st_eq_landau_n_nat).
-
-(* constant 5821 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t9 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_e_tr3is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u))) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i) (l_e_symis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) case1) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 5822 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t10 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_e_isfe (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_t8 q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t9 q a c x p s f b case1 u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5823 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t11 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t10 q a c x p s f b case1 u i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5824 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t12 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_e_st_eq_landau_n_satz16a (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x u) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5825 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t13 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_ec3e31 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t12 q a c x p s f b case1 u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t11 q a c x p s f b case1 u i) : l_con).
-
-(* constant 5826 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t14 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_ore1 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u))) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_t13 q a c x p s f b case1 u t) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5827 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t15 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_satz26 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t14 q a c x p s f b case1 u) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) x).
-
-(* constant 5828 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t15 q a c x p s f b case1 u) : l_e_st_eq_landau_n_1to x).
-
-(* constant 5829 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 t : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to x).
-
-(* constant 5830 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t16 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 v).(l_e_st_eq_landau_n_isoutne x (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t15 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 v) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t15 q a c x p s f b case1 v) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 v)).
-
-(* constant 5831 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t17 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 v).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t8 q a c x p s f b (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 v) (l_e_st_eq_landau_n_isinne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 v)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t16 q a c x p s f b case1 u v i)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 v)).
-
-(* constant 5832 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t18 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 v).(l_e_st_eq_landau_n_thleft1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x) u v (l_e_st_eq_landau_n_rt_rp_r_c_8283_t17 q a c x p s f b case1 u v i) : l_e_is (l_e_st_eq_landau_n_1to x) u v).
-
-(* constant 5833 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_invf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s b (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5834 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u) : l_e_st_eq_landau_n_nat).
-
-(* constant 5835 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t19 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5836 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t20 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_e_tr3is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_thinvf2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s b (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t19 q a c x p s f b case1 u i)) case1 : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5837 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t21 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t20 q a c x p s f b case1 u i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5838 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t22 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_e_st_eq_landau_n_satz16a (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x u) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5839 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t23 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_ec3e31 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t22 q a c x p s f b case1 u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t21 q a c x p s f b case1 u i) : l_con).
-
-(* constant 5840 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t24 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_ore1 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u)) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_t23 q a c x p s f b case1 u t) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5841 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t25 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_satz26 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t24 q a c x p s f b case1 u) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) x).
-
-(* constant 5842 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t25 q a c x p s f b case1 u) : l_e_st_eq_landau_n_1to x).
-
-(* constant 5843 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t26 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t25 q a c x p s f b case1 u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u))).
-
-(* constant 5844 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t27 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t26 q a c x p s f b case1 u)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u))).
-
-(* constant 5845 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t28 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u))) (l_e_thinvf2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s b (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t27 q a c x p s f b case1 u)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)))).
-
-(* constant 5846 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t29 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x))) (l_e_st_eq_landau_n_isinni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t28 q a c x p s f b case1 u)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u))).
-
-(* constant 5847 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t30 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris (l_e_st_eq_landau_n_1to x) u (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_1top x u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_isoutinn x u) (l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_1top x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t15 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t29 q a c x p s f b case1 u)) : l_e_is (l_e_st_eq_landau_n_1to x) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u))).
-
-(* constant 5848 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t31 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_somei (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_is (l_e_st_eq_landau_n_1to x) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 t)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t30 q a c x p s f b case1 u) : l_e_image (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1) u).
-
-(* constant 5849 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t32 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_andi (l_e_injective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1)) (l_e_surjective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1)) (λt:l_e_st_eq_landau_n_1to x.λu:l_e_st_eq_landau_n_1to x.λv:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1 t) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1 u).l_e_st_eq_landau_n_rt_rp_r_c_8283_t18 q a c x p s f b case1 t u v) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8283_t31 q a c x p s f b case1 t) : l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1)).
-
-(* constant 5850 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x) f : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5851 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t33 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t32 q a c x p s f b case1) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c x (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1)).
-
-(* constant 5852 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5853 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c x (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5854 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t33a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u))))).
-
-(* constant 5855 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t34 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t15 q a c x p s f b case1 u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u))).
-
-(* constant 5856 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t35 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u))) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u)) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t34 q a c x p s f b case1 u) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)))) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u))).
-
-(* constant 5857 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t36 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)))) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t33a q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t35 q a c x p s f b case1 u) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u))).
-
-(* constant 5858 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t37 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t36 q a c x p s f b case1 u) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g2 q a c x p s f b case1 u)).
-
-(* constant 5859 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t38 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_fisi (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g2 q a c x p s f b case1) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8283_t37 q a c x p s f b case1 t) : l_e_is (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g2 q a c x p s f b case1)).
-
-(* constant 5860 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t39 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isf (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λu:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g2 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t38 q a c x p s f b case1) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g2 q a c x p s f b case1))).
-
-(* constant 5861 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t40 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g2 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t39 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t33 q a c x p s f b case1) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1))).
-
-(* constant 5862 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t41 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) case1 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 5863 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t42 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_rt_rp_r_c_satz278 q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 5864 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t43 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t41 q a c x p s f b case1) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 5865 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t44 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t40 q a c x p s f b case1) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 5866 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t45 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_satz278 q x f) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f)).
-
-(* constant 5867 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t46 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t42 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t43 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t44 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t45 q a c x p s f b case1) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 5868 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_1px ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.(l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 x : l_e_st_eq_landau_n_nat).
-
-(* constant 5869 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x u : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b)).
-
-(* constant 5870 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_compl l_e_st_eq_landau_n_1 x) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5871 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) s : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5872 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) : l_e_st_eq_landau_n_nat).
-
-(* constant 5873 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t48 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_tr3is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i) (l_e_symis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) case2) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 5874 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t49 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_isfe (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_t8 q a c x p s f b) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t48 q a c x p s f b case2 u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5875 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t50 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t49 q a c x p s f b case2 u i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1).
-
-(* constant 5876 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t51 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_1top x u)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))).
-
-(* constant 5877 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t52 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t51 q a c x p s f b case2 u i) (l_e_st_eq_landau_n_satz18 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1).
-
-(* constant 5878 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t53 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_ec3e21 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t52 q a c x p s f b case2 u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t50 q a c x p s f b case2 u i) : l_con).
-
-(* constant 5879 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t54 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_ore1 (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz24 (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u)) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_8283_t53 q a c x p s f b case2 u t) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1).
-
-(* constant 5880 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_mn (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t54 q a c x p s f b case2 u) : l_e_st_eq_landau_n_nat).
-
-(* constant 5881 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t54a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_islessis1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_mn_th1c (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t54 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5882 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t55 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_or_th9 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) x) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t54a q a c x p s f b case2 u) (λt:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_satz20c (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) x l_e_st_eq_landau_n_1 t) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_satz20b (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) x l_e_st_eq_landau_n_1 t) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) x).
-
-(* constant 5883 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t55 q a c x p s f b case2 u) : l_e_st_eq_landau_n_1to x).
-
-(* constant 5884 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 t : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to x).
-
-(* constant 5885 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t56 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 v).(l_e_st_eq_landau_n_isoutne x (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t55 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 v) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t55 q a c x p s f b case2 v) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 v)).
-
-(* constant 5886 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t57 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 v).(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 v) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 v) (l_e_st_eq_landau_n_mn_th1c (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t54 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 v) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t56 q a c x p s f b case2 u v i)) (l_e_st_eq_landau_n_mn_th1d (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 v) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t54 q a c x p s f b case2 v)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 v)).
-
-(* constant 5887 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t58 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 v).(l_e_st_eq_landau_n_isinne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 v)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t57 q a c x p s f b case2 u v i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 v))).
-
-(* constant 5888 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t59 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 v).(l_e_isfe (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_t8 q a c x p s f b) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 v)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t58 q a c x p s f b case2 u v i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 v))).
-
-(* constant 5889 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t60 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 v).(l_e_st_eq_landau_n_thleft1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 v) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t59 q a c x p s f b case2 u v i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 v)).
-
-(* constant 5890 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t61 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 v).(l_e_st_eq_landau_n_thright1 l_e_st_eq_landau_n_1 x u v (l_e_st_eq_landau_n_rt_rp_r_c_8283_t60 q a c x p s f b case2 u v i) : l_e_is (l_e_st_eq_landau_n_1to x) u v).
-
-(* constant 5891 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s04 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_invf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s b) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5892 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_rt_rp_r_c_8283_s04 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5893 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u) : l_e_st_eq_landau_n_nat).
-
-(* constant 5894 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t62 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5895 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t63 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_tr3is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_thinvf2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s b (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t62 q a c x p s f b case2 u i)) case2 : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5896 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t64 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t63 q a c x p s f b case2 u i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1).
-
-(* constant 5897 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t65 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_1top x u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t64 q a c x p s f b case2 u i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) l_e_st_eq_landau_n_1).
-
-(* constant 5898 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t66 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_ec3e21 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz18 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t65 q a c x p s f b case2 u i) : l_con).
-
-(* constant 5899 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t67 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_ore1 (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz24 (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u)) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_8283_t66 q a c x p s f b case2 u t) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1).
-
-(* constant 5900 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_mn (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t67 q a c x p s f b case2 u) : l_e_st_eq_landau_n_nat).
-
-(* constant 5901 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t68 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_islessis1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_mn_th1c (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t67 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5902 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t69 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_or_th9 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) x) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t68 q a c x p s f b case2 u) (λt:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_satz20c (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) x l_e_st_eq_landau_n_1 t) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_satz20b (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) x l_e_st_eq_landau_n_1 t) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) x).
-
-(* constant 5903 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t69 q a c x p s f b case2 u) : l_e_st_eq_landau_n_1to x).
-
-(* constant 5904 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t70 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t69 q a c x p s f b case2 u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))).
-
-(* constant 5905 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t71 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_mn_th1a (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t67 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t70 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)) x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)))).
-
-(* constant 5906 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t72 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t71 q a c x p s f b case2 u)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)))).
-
-(* constant 5907 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t73 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_thinvf2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s b (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t72 q a c x p s f b case2 u)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)))).
-
-(* constant 5908 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t74 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_1top x u))) (l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2))) (l_e_st_eq_landau_n_isinni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t73 q a c x p s f b case2 u)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))).
-
-(* constant 5909 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t75 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_mn_th1e (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t54 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t74 q a c x p s f b case2 u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))).
-
-(* constant 5910 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t76 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris (l_e_st_eq_landau_n_1to x) u (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_1top x u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_isoutinn x u) (l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_1top x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t55 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t75 q a c x p s f b case2 u)) : l_e_is (l_e_st_eq_landau_n_1to x) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))).
-
-(* constant 5911 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t77 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_somei (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_is (l_e_st_eq_landau_n_1to x) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 t)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t76 q a c x p s f b case2 u) : l_e_image (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2) u).
-
-(* constant 5912 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t78 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_andi (l_e_injective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2)) (l_e_surjective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2)) (λt:l_e_st_eq_landau_n_1to x.λu:l_e_st_eq_landau_n_1to x.λv:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2 t) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2 u).l_e_st_eq_landau_n_rt_rp_r_c_8283_t61 q a c x p s f b case2 t u v) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8283_t77 q a c x p s f b case2 t) : l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2)).
-
-(* constant 5913 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) f : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5914 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_right l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5915 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t79 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t78 q a c x p s f b case2) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c x (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2)).
-
-(* constant 5916 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5917 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_right l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5918 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c x (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5919 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t80 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_mn_th1a (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t54 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t55 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u)) x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u)))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u)))).
-
-(* constant 5920 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t81 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)))) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t80 q a c x p s f b case2 u)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u)))).
-
-(* constant 5921 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t82 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t81 q a c x p s f b case2 u) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g5 q a c x p s f b case2 u)).
-
-(* constant 5922 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t83 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_fisi (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g5 q a c x p s f b case2) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8283_t82 q a c x p s f b case2 t) : l_e_is (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g5 q a c x p s f b case2)).
-
-(* constant 5923 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t85 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isf (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λu:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g5 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t83 q a c x p s f b case2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g5 q a c x p s f b case2))).
-
-(* constant 5924 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t86 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g5 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t85 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t79 q a c x p s f b case2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2))).
-
-(* constant 5925 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t87 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_lessisi1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_satz18a l_e_st_eq_landau_n_1 x) : l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b)).
-
-(* constant 5926 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t87 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2) : Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5927 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t87 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2) : Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5928 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t87a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_isinoutn l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_lessisi3 l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5929 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_1d ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t87 q a c x p s f b case2) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b)).
-
-(* constant 5930 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t87b ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_1top l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t87 q a c x p s f b case2)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1d q a c x p s f b case2))).
-
-(* constant 5931 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t88 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tris l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1d q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t87a q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t87b q a c x p s f b case2) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1d q a c x p s f b case2))).
-
-(* constant 5932 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_1e ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1d q a c x p s f b case2) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5933 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t88a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1d q a c x p s f b case2)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1d q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1d q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t88 q a c x p s f b case2) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2)).
-
-(* constant 5934 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t88b ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_symis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t88a q a c x p s f b case2)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 5935 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t89 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tr3is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t88b q a c x p s f b case2) case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t88a q a c x p s f b case2) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2)).
-
-(* constant 5936 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t89a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_satz277 q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t89 q a c x p s f b case2)) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_satz277 q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2))).
-
-(* constant 5937 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t90 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_rt_rp_r_c_satz281 q a l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2)))).
-
-(* constant 5938 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t91 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t86 q a c x p s f b case2) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2)))).
-
-(* constant 5939 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t92 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t89a q a c x p s f b case2) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2)))).
-
-(* constant 5940 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t93 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2))) (l_e_st_eq_landau_n_rt_rp_r_c_satz281 q a l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2)) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2))).
-
-(* constant 5941 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t94 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t90 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t91 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t92 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t93 q a c x p s f b case2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2))).
-
-(* constant 5942 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t95 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_rt_rp_r_c_issmpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_compl l_e_st_eq_landau_n_1 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f)).
-
-(* constant 5943 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t96 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_issmpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_compl l_e_st_eq_landau_n_1 x)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2))).
-
-(* constant 5944 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t97 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t96 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t94 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t95 q a c x p s f b case2) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 5945 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5946 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_invf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s b (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5947 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t98 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_thinvf2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s b (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2))).
-
-(* constant 5948 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t99 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(not2 : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 5949 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t100 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_symnotis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (l_e_notis_th3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t98 q a c x p s f b not1 not2)) : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 5950 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t101 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t100 q a c x p s f b not1 not2) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) t) : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 5951 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_changef (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5952 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t102 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_changef1 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) u i : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2))).
-
-(* constant 5953 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t103 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t102 q a c x p s f b not1 not2 u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t98 q a c x p s f b not1 not2) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5954 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t104 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2).(l_e_changef2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) u i : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2)).
-
-(* constant 5955 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t105 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_e_changef3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) u n o : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (s u)).
-
-(* constant 5956 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t106 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_wissel_th6 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) b : l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2)).
-
-(* constant 5957 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_wissel (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5958 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t107 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_wissel_th3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) : l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha)).
-
-(* constant 5959 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t108 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_iswissel1 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t103 q a c x p s f b not1 not2 u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2)).
-
-(* constant 5960 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t109 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t108 q a c x p s f b not1 not2 alpha u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u))).
-
-(* constant 5961 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t110 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2).(l_e_iswissel2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t104 q a c x p s f b not1 not2 u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5962 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t111 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2).(l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t98 q a c x p s f b not1 not2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t110 q a c x p s f b not1 not2 alpha u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u))).
-
-(* constant 5963 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t112 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isfe (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t8 q a c x p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f (l_e_st_eq_landau_n_rt_rp_r_c_8283_t106 q a c x p s f b not1 not2)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i (l_e_st_eq_landau_n_rt_rp_r_c_8283_t103 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_refis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5964 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t113 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) n (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t112 q a c x p s f b not1 not2 alpha u n o t) : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 5965 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t114 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2).(l_e_isfe (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t8 q a c x p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f (l_e_st_eq_landau_n_rt_rp_r_c_8283_t106 q a c x p s f b not1 not2)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) i (l_e_st_eq_landau_n_rt_rp_r_c_8283_t104 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_refis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)))) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).
-
-(* constant 5966 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t115 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2)) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) o (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2).l_e_st_eq_landau_n_rt_rp_r_c_8283_t114 q a c x p s f b not1 not2 alpha u n o t) : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2))).
-
-(* constant 5967 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t116 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_e_iswissel3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t113 q a c x p s f b not1 not2 alpha u n o) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t115 q a c x p s f b not1 not2 alpha u n o) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)).
-
-(* constant 5968 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t117 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_e_symis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)) (s u) (l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t116 q a c x p s f b not1 not2 alpha u n o) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t105 q a c x p s f b not1 not2 u n o)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u))).
-
-(* constant 5969 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t118 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u))) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2).l_e_st_eq_landau_n_rt_rp_r_c_8283_t111 q a c x p s f b not1 not2 alpha u t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t117 q a c x p s f b not1 not2 alpha u n t) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u))).
-
-(* constant 5970 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t119 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u))) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t109 q a c x p s f b not1 not2 alpha u t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).l_e_st_eq_landau_n_rt_rp_r_c_8283_t118 q a c x p s f b not1 not2 alpha u t) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u))).
-
-(* constant 5971 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t120 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_fisi (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 t)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_t119 q a c x p s f b not1 not2 alpha t) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 t))).
-
-(* constant 5972 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t121 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t103 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_refis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5973 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t121a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_ec3e21 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_compl l_e_st_eq_landau_n_1 x) (l_e_st_eq_landau_n_satz18 l_e_st_eq_landau_n_1 x)) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1).
-
-(* constant 5974 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t122 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t121a q a c x p s f b not1 not2) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) t) : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 5975 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t123 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_symnotis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) alpha : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2))).
-
-(* constant 5976 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t124 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_iswissel3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t122 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t123 q a c x p s f b not1 not2 alpha) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5977 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t125 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_isf (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx (λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) u f)) s (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 t)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t120 q a c x p s f b not1 not2 alpha) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha) f)))).
-
-(* constant 5978 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t126 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t97 q a c x p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha) f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t106 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t121 q a c x p s f b not1 not2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha) f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha) f))).
-
-(* constant 5979 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t127 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t46 q a c x p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha) f (l_e_st_eq_landau_n_rt_rp_r_c_8283_t107 q a c x p s f b not1 not2 alpha) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t124 q a c x p s f b not1 not2 alpha) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f)).
-
-(* constant 5980 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t128 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha) f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t125 q a c x p s f b not1 not2 alpha) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t126 q a c x p s f b not1 not2 alpha) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t127 q a c x p s f b not1 not2 alpha) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 5981 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_wissel (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5982 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t129 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_wissel_th3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) : l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta)).
-
-(* constant 5983 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t130 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t104 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u) (l_e_iswissel1 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2)).
-
-(* constant 5984 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t131 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t130 q a c x p s f b not1 not2 i3 beta u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u))).
-
-(* constant 5985 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t132 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t103 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u) (l_e_iswissel2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5986 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t133 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2).(l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) i) (l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t132 q a c x p s f b not1 not2 i3 beta u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t98 q a c x p s f b not1 not2)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u))).
-
-(* constant 5987 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t134 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_e_iswissel3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) u n o : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u) u).
-
-(* constant 5988 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t135 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_t134 q a c x p s f b not1 not2 i3 beta u n o) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)).
-
-(* constant 5989 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t136 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t105 q a c x p s f b not1 not2 u n o : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (s u)).
-
-(* constant 5990 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t139 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_e_symis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u)) (s u) (l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t135 q a c x p s f b not1 not2 i3 beta u n o) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t136 q a c x p s f b not1 not2 i3 beta u n o)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u))).
-
-(* constant 5991 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t140 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u))) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2).l_e_st_eq_landau_n_rt_rp_r_c_8283_t133 q a c x p s f b not1 not2 i3 beta u t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t139 q a c x p s f b not1 not2 i3 beta u n t) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u))).
-
-(* constant 5992 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t141 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u))) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t131 q a c x p s f b not1 not2 i3 beta u t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).l_e_st_eq_landau_n_rt_rp_r_c_8283_t140 q a c x p s f b not1 not2 i3 beta u t) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u))).
-
-(* constant 5993 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t142 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_fisi (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta t)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_t141 q a c x p s f b not1 not2 i3 beta t) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta t))).
-
-(* constant 5994 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t143 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_symnotis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) beta : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2))).
-
-(* constant 5995 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t144 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_iswissel3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t122 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t143 q a c x p s f b not1 not2 i3 beta) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5996 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t145 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_isf (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx (λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) u f)) s (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta t)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t142 q a c x p s f b not1 not2 i3 beta) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f)))).
-
-(* constant 5997 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t146 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t46 q a c x p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t129 q a c x p s f b not1 not2 i3 beta) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t144 q a c x p s f b not1 not2 i3 beta) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f))).
-
-(* constant 5998 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t147 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t97 q a c x p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f (l_e_st_eq_landau_n_rt_rp_r_c_8283_t106 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t121 q a c x p s f b not1 not2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f)).
-
-(* constant 5999 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t148 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t145 q a c x p s f b not1 not2 i3 beta) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t146 q a c x p s f b not1 not2 i3 beta) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t147 q a c x p s f b not1 not2 i3 beta) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6000 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t149 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_ispl1 l_e_st_eq_landau_n_1 x l_e_st_eq_landau_n_1 (l_e_symis l_e_st_eq_landau_n_nat x l_e_st_eq_landau_n_1 i) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6001 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_lessisi2 l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t149 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6002 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) f : Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6003 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) s : Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6004 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) : Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6005 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t151 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_issmpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t149 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f)).
-
-(* constant 6006 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t152 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_issmpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t149 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f))).
-
-(* constant 6007 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t153 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_satz280 q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)))).
-
-(* constant 6008 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t154 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_satz280 q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)))).
-
-(* constant 6009 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t155 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_tris1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_isinoutn l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_lessisi3 l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t149 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6010 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t156 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t155 q a c x p s f b not1 not2 i3 gamma i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 6011 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t157 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t156 q a c x p s f b not1 not2 i3 gamma i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6012 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t158 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_symis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_isinoutn l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a l_e_st_eq_landau_n_2)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) l_e_st_eq_landau_n_1).
-
-(* constant 6013 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t159 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t158 q a c x p s f b not1 not2 i3 gamma i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 6014 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t160 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_tr3is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t159 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t98 q a c x p s f b not1 not2) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) gamma) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6015 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t161 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t157 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t160 q a c x p s f b not1 not2 i3 gamma i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))).
-
-(* constant 6016 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t163 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t159 q a c x p s f b not1 not2 i3 gamma i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6017 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t164 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t163 q a c x p s f b not1 not2 i3 gamma i) i3 : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 6018 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t165 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t164 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t156 q a c x p s f b not1 not2 i3 gamma i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))).
-
-(* constant 6019 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t166 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t161 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))).
-
-(* constant 6020 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t167 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t165 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))).
-
-(* constant 6021 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t168 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t166 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)))).
-
-(* constant 6022 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t169 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_comq q c (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)))).
-
-(* constant 6023 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t170 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t167 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)))).
-
-(* constant 6024 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t171 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t152 q a c x p s f b not1 not2 i3 gamma i)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t154 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t168 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t169 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)))).
-
-(* constant 6025 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t172 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t171 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t170 q a c x p s f b not1 not2 i3 gamma i) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t153 q a c x p s f b not1 not2 i3 gamma i)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t151 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6026 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_trivial ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_8283_t172 q a c x p s f b not1 not2 i3 gamma i : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6027 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t173 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_ore1 (l_e_st_eq_landau_n_more x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz24 x) n : l_e_st_eq_landau_n_more x l_e_st_eq_landau_n_1).
-
-(* constant 6028 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_mn x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t173 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_nat).
-
-(* constant 6029 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_changef (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6030 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t174 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_wissel_th6 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) b : l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n)).
-
-(* constant 6031 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t175 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_changef2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_refis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6032 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t176 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_symis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i3 : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6033 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t177 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t175 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t176 q a c x p s f b not1 not2 i3 gamma n) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 6034 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t178 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6035 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t178 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6036 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t179 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 6037 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t180 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_mn_th1b x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t173 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) x).
-
-(* constant 6038 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t181 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t180 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) x).
-
-(* constant 6039 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g9 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t181 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6040 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t182 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g9 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_issmpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t180 q a c x p s f b not1 not2 i3 gamma n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g9 q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6041 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_right l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g9 q a c x p s f b not1 not2 i3 gamma n) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6042 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t183 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_lessisi1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_satz18a l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) : l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6043 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t183 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g9 q a c x p s f b not1 not2 i3 gamma n) : Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6044 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t184 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_satz281 q a l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g9 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g9 q a c x p s f b not1 not2 i3 gamma n)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6045 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t185 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 6046 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t186 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isinoutn l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_lessisi3 l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 6047 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_1a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t183 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6048 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t187 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_1top l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t183 q a c x p s f b not1 not2 i3 gamma n)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1a q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6049 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_1b ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left1to x (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t181 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1a q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_1to x).
-
-(* constant 6050 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t188 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1a q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1a q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) x (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1a q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t181 q a c x p s f b not1 not2 i3 gamma n)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1a q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_1b q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6051 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t189 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tr3is l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1a q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_1b q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t186 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t187 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t188 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_1b q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6052 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_1c ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t178 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1b q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6053 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t190 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_1b q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_1b q a c x p s f b not1 not2 i3 gamma n)) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8283_1b q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t178 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t189 q a c x p s f b not1 not2 i3 gamma n) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1c q a c x p s f b not1 not2 i3 gamma n)).
-
-(* constant 6054 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t191 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1c q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t190 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 6055 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t192 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t185 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t191 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6056 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t193 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_symis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t175 q a c x p s f b not1 not2 i3 gamma n) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6057 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t194 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t193 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6058 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t195 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t192 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t194 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6059 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t196 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t195 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6060 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t197 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g9 q a c x p s f b not1 not2 i3 gamma n)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t182 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t184 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t196 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6061 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t198 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t197 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 6062 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t199 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_assq1 q a (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))))).
-
-(* constant 6063 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t200 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_comq q c (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 6064 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t178 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6065 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g13 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t181 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6066 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_right l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g13 q a c x p s f b not1 not2 i3 gamma n) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6067 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_lessisi1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_satz18a l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g13 q a c x p s f b not1 not2 i3 gamma n) : Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6068 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t201 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 6069 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t202 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g13 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_issmpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t180 q a c x p s f b not1 not2 i3 gamma n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g13 q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6070 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t203 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_satz281 q a l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g13 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g13 q a c x p s f b not1 not2 i3 gamma n)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6071 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t204 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 6072 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t205 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1c q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t190 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 6073 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t206 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t204 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t205 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6074 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t207 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_changef1 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_refis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6075 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t208 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t207 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6076 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t209 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t206 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t208 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6077 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t210 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t209 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6078 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t211 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g13 q a c x p s f b not1 not2 i3 gamma n)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t202 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t203 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t210 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6079 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_ua ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).(l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6080 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_ub ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).(l_e_st_eq_landau_n_left1to x (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t181 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_ua q a c x p s f b not1 not2 i3 gamma n u) : l_e_st_eq_landau_n_1to x).
-
-(* constant 6081 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_uc ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t178 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6082 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t212 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t178 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6083 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t213 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_satz16a (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6084 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t214 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_ec3e31 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t213 q a c x p s f b not1 not2 i3 gamma n u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t212 q a c x p s f b not1 not2 i3 gamma n u i) : l_con).
-
-(* constant 6085 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t215 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).(λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t214 q a c x p s f b not1 not2 i3 gamma n u t : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6086 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t216 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t178 q a c x p s f b not1 not2 i3 gamma n)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) l_e_st_eq_landau_n_1).
-
-(* constant 6087 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t217 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_ua q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_ua q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) x (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_ua q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t181 q a c x p s f b not1 not2 i3 gamma n)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_ua q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u))).
-
-(* constant 6088 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t218 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_ua q a c x p s f b not1 not2 i3 gamma n u))).
-
-(* constant 6089 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t219 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_ua q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t218 q a c x p s f b not1 not2 i3 gamma n u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t217 q a c x p s f b not1 not2 i3 gamma n u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t216 q a c x p s f b not1 not2 i3 gamma n u i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) l_e_st_eq_landau_n_1).
-
-(* constant 6090 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t220 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_satz18 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) l_e_st_eq_landau_n_1).
-
-(* constant 6091 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t221 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_ec3e21 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t220 q a c x p s f b not1 not2 i3 gamma n u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t219 q a c x p s f b not1 not2 i3 gamma n u i) : l_con).
-
-(* constant 6092 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t222 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).(λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t221 q a c x p s f b not1 not2 i3 gamma n u t : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6093 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t223 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).(l_e_changef3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t222 q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t215 q a c x p s f b not1 not2 i3 gamma n u) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u))).
-
-(* constant 6094 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t224 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t223 q a c x p s f b not1 not2 i3 gamma n u) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n u)).
-
-(* constant 6095 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t225 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_fisi (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n t) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n t) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t224 q a c x p s f b not1 not2 i3 gamma n t)) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n)).
-
-(* constant 6096 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t226 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t225 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6097 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t227 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_comq q c (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6098 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t228 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t226 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6099 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t229 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t227 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t228 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6100 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t230 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t229 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t211 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6101 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t231 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t230 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 6102 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t232 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t201 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f))).
-
-(* constant 6103 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t233 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_8283_t46 q a c x p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_rt_rp_r_c_8283_t174 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t177 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f)).
-
-(* constant 6104 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t234 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t179 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t198 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t199 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t200 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 6105 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t235 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t234 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t231 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t232 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t233 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6106 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t236 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_imp_th1 (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) (λt:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_8283_t172 q a c x p s f b not1 not2 i3 gamma t) (λt:l_not (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_8283_t235 q a c x p s f b not1 not2 i3 gamma t) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6107 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t237 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t236 q a c x p s f b not1 not2 i3 t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).l_e_st_eq_landau_n_rt_rp_r_c_8283_t148 q a c x p s f b not1 not2 i3 t) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6108 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t238 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t237 q a c x p s f b not1 not2 t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).l_e_st_eq_landau_n_rt_rp_r_c_8283_t128 q a c x p s f b not1 not2 t) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6109 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t239 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t97 q a c x p s f b t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).l_e_st_eq_landau_n_rt_rp_r_c_8283_t238 q a c x p s f b not1 t) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6110 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t240 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t46 q a c x p s f b t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).l_e_st_eq_landau_n_rt_rp_r_c_8283_t239 q a c x p s f b t) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6111 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t241 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.(λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λv:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u.l_e_st_eq_landau_n_rt_rp_r_c_8283_t240 q a c x p u v w : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6112 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t242 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c t) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t241 q a c x p) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c (l_e_st_eq_landau_n_suc x)).
-
-(* constant 6113 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t243 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c t) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t6 q a c) (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c t.l_e_st_eq_landau_n_rt_rp_r_c_8283_t242 q a c t u) x : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x).
-
-(* constant 6114 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz283 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λs:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to x.λb:l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) s.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8283_t243 q a c x s f b : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (λt:l_e_st_eq_landau_n_1to x.f (s t))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x f)).
-
-(* constant 6115 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_shiftl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.(l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly : l_e_st_eq_landau_n_nat).
-
-(* constant 6116 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_shiftr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6117 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_intshiftr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_intshiftr x ix y iy ly n : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly n)).
-
-(* constant 6118 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_shiftrls ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_shiftrls x ix y iy ly n : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly n) x).
-
-(* constant 6119 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_lsshiftr x ix y iy ly n : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly n)).
-
-(* constant 6120 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iseshiftr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly m).(l_e_st_eq_landau_n_rt_rp_r_iseshiftr x ix y iy ly n m i : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly)) n m).
-
-(* constant 6121 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_shiftl1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly)).
-
-(* constant 6122 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_shiftinv1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_st_eq_landau_n_rt_rp_r_shiftinv1 x ix y iy ly u a : l_e_st_eq_landau_n_rt_rp_r_is u (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_shiftl1 x ix y iy ly u a))).
-
-(* constant 6123 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_shiftinv2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_st_eq_landau_n_rt_rp_r_shiftinv2 x ix y iy ly u a : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_shiftl1 x ix y iy ly u a)) u).
-
-(* constant 6124 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_shiftf ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_shiftf x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6125 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_smpri ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6126 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λlv:l_e_st_eq_landau_n_rt_rp_r_lessis y v.λkv:l_e_st_eq_landau_n_rt_rp_r_lessis v u.(l_e_st_eq_landau_n_rt_rp_r_lessisi1 v x (l_e_st_eq_landau_n_rt_rp_r_satz172a v u x kv k) : l_e_st_eq_landau_n_rt_rp_r_lessis v x).
-
-(* constant 6127 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lft ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(λt:l_e_st_eq_landau_n_rt_rp_r_real.λv:l_e_st_eq_landau_n_rt_rp_r_intrl t.λlt:l_e_st_eq_landau_n_rt_rp_r_lessis y t.λkt:l_e_st_eq_landau_n_rt_rp_r_lessis t u.f t v lt (l_e_st_eq_landau_n_rt_rp_r_c_8284_t1 x ix y iy ly f pi q a u iu l k t v lt kt) : Πt:l_e_st_eq_landau_n_rt_rp_r_real.Πv:l_e_st_eq_landau_n_rt_rp_r_intrl t.Πlt:l_e_st_eq_landau_n_rt_rp_r_lessis y t.Πkt:l_e_st_eq_landau_n_rt_rp_r_lessis t u.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6128 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_pl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_pl x y : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6129 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_mn ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_mn x y : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6130 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6131 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λlv:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) v.λkv:l_e_st_eq_landau_n_rt_rp_r_lessis v x.(l_e_st_eq_landau_n_rt_rp_r_satz190c u u l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_lessisi2 u u (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real u)) (l_e_st_eq_landau_n_rt_rp_r_lemma1 l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satz169a l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_natpos l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_natrl1))) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl u l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)).
-
-(* constant 6132 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λlv:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) v.λkv:l_e_st_eq_landau_n_rt_rp_r_lessis v x.(l_e_st_eq_landau_n_rt_rp_r_isless1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl u l_e_st_eq_landau_n_rt_rp_r_0) u (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_pl02 u l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t2 x ix y iy ly f pi q a u iu l k v iv lv kv) : l_e_st_eq_landau_n_rt_rp_r_less u (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)).
-
-(* constant 6133 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λlv:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) v.λkv:l_e_st_eq_landau_n_rt_rp_r_lessis v x.(l_e_st_eq_landau_n_rt_rp_r_lessisi1 y v (l_e_st_eq_landau_n_rt_rp_r_satz172b y (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) v (l_e_st_eq_landau_n_rt_rp_r_satz172a y u (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) l (l_e_st_eq_landau_n_rt_rp_r_c_8284_t3 x ix y iy ly f pi q a u iu l k v iv lv kv)) lv) : l_e_st_eq_landau_n_rt_rp_r_lessis y v).
-
-(* constant 6134 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_rgt ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(λt:l_e_st_eq_landau_n_rt_rp_r_real.λv:l_e_st_eq_landau_n_rt_rp_r_intrl t.λlt:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) t.λkt:l_e_st_eq_landau_n_rt_rp_r_lessis t x.f t v (l_e_st_eq_landau_n_rt_rp_r_c_8284_t4 x ix y iy ly f pi q a u iu l k t v lt kt) kt : Πt:l_e_st_eq_landau_n_rt_rp_r_real.Πv:l_e_st_eq_landau_n_rt_rp_r_intrl t.Πlt:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) t.Πkt:l_e_st_eq_landau_n_rt_rp_r_lessis t x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6135 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_intpl u iu l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)).
-
-(* constant 6136 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_satzr25 u iu x ix k : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) x).
-
-(* constant 6137 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) y) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u))) (l_e_st_eq_landau_n_rt_rp_r_asspl2 (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) y (l_e_st_eq_landau_n_rt_rp_r_plmn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) y)).
-
-(* constant 6138 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly : l_e_st_eq_landau_n_nat).
-
-(* constant 6139 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_suy ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_c_shiftl u iu y iy l : l_e_st_eq_landau_n_nat).
-
-(* constant 6140 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_nat).
-
-(* constant 6141 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_satzr155a (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_isrlnt2 (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 u iu y iy l)) (l_e_st_eq_landau_n_rt_rp_r_isrlnt2 (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k)))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t7 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 x ix y iy ly)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k))).
-
-(* constant 6142 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_isntirl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t8 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k)).
-
-(* constant 6143 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t9 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k)).
-
-(* constant 6144 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t10 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6145 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_c_issmpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t9 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q)).
-
-(* constant 6146 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_fr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_right l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 x ix y iy ly f pi q a u iu l k) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6147 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_lessisi1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_satz18a (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k))).
-
-(* constant 6148 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_fl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 x ix y iy ly f pi q a u iu l k) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6149 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t12a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_c_satz281 q a (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 x ix y iy ly f pi q a u iu l k)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k)))).
-
-(* constant 6150 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_right1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))).
-
-(* constant 6151 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_right1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_right1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_right1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t10 x ix y iy ly f pi q a u iu l k)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_right1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t10 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_right1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)))).
-
-(* constant 6152 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t10 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_right1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k)).
-
-(* constant 6153 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t15 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_right1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t13 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t14 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))).
-
-(* constant 6154 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t16 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_isnterl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t15 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n)))).
-
-(* constant 6155 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t17 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_satzr155b (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)))).
-
-(* constant 6156 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t18 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 u iu y iy l)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)))).
-
-(* constant 6157 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t19 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t18 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t17 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t16 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n)))).
-
-(* constant 6158 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t20 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))) y (l_e_st_eq_landau_n_rt_rp_r_c_8284_t19 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))) y)).
-
-(* constant 6159 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t21 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y)) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) y)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y)) y (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)))) (l_e_st_eq_landau_n_rt_rp_r_asspl1 (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) y) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_plmn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u))).
-
-(* constant 6160 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t22 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t20 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t21 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u))).
-
-(* constant 6161 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t23 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8284_t22 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n)) (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n)).
-
-(* constant 6162 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t24 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))).
-
-(* constant 6163 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t25 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))).
-
-(* constant 6164 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t26 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n)) x).
-
-(* constant 6165 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t27 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n)).
-
-(* constant 6166 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t28 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n)).
-
-(* constant 6167 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t29 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n) x).
-
-(* constant 6168 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t30 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_8284_t4 x ix y iy ly f pi q a u iu l k (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t27 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t28 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t29 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n)).
-
-(* constant 6169 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t31 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(pi (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t24 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t25 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t26 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t27 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t30 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t29 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t23 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) n)).
-
-(* constant 6170 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t32 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_fisi (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_8284_t31 x ix y iy ly f pi q a u iu l k t) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k))).
-
-(* constant 6171 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t33 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_isf (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λv:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) v) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t32 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q)).
-
-(* constant 6172 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t34 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t33 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q))).
-
-(* constant 6173 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t35 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) n))).
-
-(* constant 6174 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t36 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t10 x ix y iy ly f pi q a u iu l k)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t10 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) n)))).
-
-(* constant 6175 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t10 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) n) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k)).
-
-(* constant 6176 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t37 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t35 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t36 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n))).
-
-(* constant 6177 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t38 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_isnterl (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t37 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n)))).
-
-(* constant 6178 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t39 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n))) y (l_e_st_eq_landau_n_rt_rp_r_c_8284_t38 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n)) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n))) y)).
-
-(* constant 6179 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t40 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n)) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n))) y) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8284_t39 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_shiftr u iu y iy l n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n))).
-
-(* constant 6180 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t41 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_intshiftr u iu y iy l n : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_shiftr u iu y iy l n)).
-
-(* constant 6181 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t42 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr u iu y iy l n : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_shiftr u iu y iy l n)).
-
-(* constant 6182 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t43 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_shiftrls u iu y iy l n : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_shiftr u iu y iy l n) u).
-
-(* constant 6183 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t44 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_8284_t1 x ix y iy ly f pi q a u iu l k (l_e_st_eq_landau_n_rt_rp_r_c_shiftr u iu y iy l n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t41 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t42 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t43 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_shiftr u iu y iy l n) x).
-
-(* constant 6184 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t45 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n))).
-
-(* constant 6185 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t46 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n))).
-
-(* constant 6186 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t47 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n)) x).
-
-(* constant 6187 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t48 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(pi (l_e_st_eq_landau_n_rt_rp_r_c_shiftr u iu y iy l n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t41 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t42 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t44 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t45 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t46 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t47 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t40 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_shiftf u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k n)).
-
-(* constant 6188 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t49 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_shiftf u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t48 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) n)).
-
-(* constant 6189 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t50 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_fisi (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_8284_t49 x ix y iy ly f pi q a u iu l k t) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k))).
-
-(* constant 6190 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t51 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_isf (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λv:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) v) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t50 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) q)).
-
-(* constant 6191 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t52 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) q) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t51 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpri u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q))).
-
-(* constant 6192 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t53 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 x ix y iy ly f pi q a u iu l k)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpri u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12a x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t34 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t52 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 x ix y iy ly f pi q a u iu l k)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpri u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q))).
-
-(* constant 6193 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz284 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpri u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_intpl u iu l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1) (l_e_st_eq_landau_n_rt_rp_r_satzr25 u iu x ix k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t11 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t53 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpri u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_intpl u iu l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1) (l_e_st_eq_landau_n_rt_rp_r_satzr25 u iu x ix k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q))).
-
-(* constant 6194 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_pl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_pl x y : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6195 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_mn ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_mn x y : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6196 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6197 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λw:l_e_st_eq_landau_n_rt_rp_r_real.λiw:l_e_st_eq_landau_n_rt_rp_r_intrl w.λlw:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl y v) w.λkw:l_e_st_eq_landau_n_rt_rp_r_lessis w (l_e_st_eq_landau_n_rt_rp_r_pl x v).(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) w) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) w) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v)) lw (λt:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) w.l_e_st_eq_landau_n_rt_rp_r_satz188f (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) w (l_e_st_eq_landau_n_rt_rp_r_m0 v) t) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) w.l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) w v t) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v)).
-
-(* constant 6198 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λw:l_e_st_eq_landau_n_rt_rp_r_real.λiw:l_e_st_eq_landau_n_rt_rp_r_intrl w.λlw:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl y v) w.λkw:l_e_st_eq_landau_n_rt_rp_r_lessis w (l_e_st_eq_landau_n_rt_rp_r_pl x v).(l_e_st_eq_landau_n_rt_rp_r_islessis1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) v) y (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v) (l_e_st_eq_landau_n_rt_rp_r_mnpl y v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t1 x ix y iy ly f pi q v iv w iw lw kw) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v)).
-
-(* constant 6199 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λw:l_e_st_eq_landau_n_rt_rp_r_real.λiw:l_e_st_eq_landau_n_rt_rp_r_intrl w.λlw:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl y v) w.λkw:l_e_st_eq_landau_n_rt_rp_r_lessis w (l_e_st_eq_landau_n_rt_rp_r_pl x v).(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_less w (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_is w (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) v)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) v)) kw (λt:l_e_st_eq_landau_n_rt_rp_r_less w (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v).l_e_st_eq_landau_n_rt_rp_r_satz188f w (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_m0 v) t) (λt:l_e_st_eq_landau_n_rt_rp_r_is w (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v).l_e_st_eq_landau_n_rt_rp_r_ismn1 w (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) v t) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) v)).
-
-(* constant 6200 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λw:l_e_st_eq_landau_n_rt_rp_r_real.λiw:l_e_st_eq_landau_n_rt_rp_r_intrl w.λlw:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl y v) w.λkw:l_e_st_eq_landau_n_rt_rp_r_lessis w (l_e_st_eq_landau_n_rt_rp_r_pl x v).(l_e_st_eq_landau_n_rt_rp_r_islessis2 (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) v) x (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v) (l_e_st_eq_landau_n_rt_rp_r_mnpl x v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t3 x ix y iy ly f pi q v iv w iw lw kw) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v) x).
-
-(* constant 6201 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_sft ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(λt:l_e_st_eq_landau_n_rt_rp_r_real.λw:l_e_st_eq_landau_n_rt_rp_r_intrl t.λlt:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl y v) t.λkt:l_e_st_eq_landau_n_rt_rp_r_lessis t (l_e_st_eq_landau_n_rt_rp_r_pl x v).f (l_e_st_eq_landau_n_rt_rp_r_mn t v) (l_e_st_eq_landau_n_rt_rp_r_intmn t w v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t2 x ix y iy ly f pi q v iv t w lt kt) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t4 x ix y iy ly f pi q v iv t w lt kt) : Πt:l_e_st_eq_landau_n_rt_rp_r_real.Πw:l_e_st_eq_landau_n_rt_rp_r_intrl t.Πlt:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl y v) t.Πkt:l_e_st_eq_landau_n_rt_rp_r_lessis t (l_e_st_eq_landau_n_rt_rp_r_pl x v).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6202 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl v y)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_m0 v) (l_e_st_eq_landau_n_rt_rp_r_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl v y) (l_e_st_eq_landau_n_rt_rp_r_compl y v)) (l_e_st_eq_landau_n_rt_rp_r_satz180 v y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_m0 v) (l_e_st_eq_landau_n_rt_rp_r_m0 y))).
-
-(* constant 6203 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl x) (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 x) (l_e_st_eq_landau_n_rt_rp_r_asspl1 l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_m0 v)) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) v) x l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_mnpl x v)) (l_e_st_eq_landau_n_rt_rp_r_compl l_e_st_eq_landau_n_rt_rp_r_1rl x) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 x)).
-
-(* constant 6204 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_m0 v) (l_e_st_eq_landau_n_rt_rp_r_m0 y))) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) v) y) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 x) y) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_m0 v) (l_e_st_eq_landau_n_rt_rp_r_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t5 x ix y iy ly f pi q v iv)) (l_e_st_eq_landau_n_rt_rp_r_asspl2 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_m0 v) (l_e_st_eq_landau_n_rt_rp_r_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 x) y (l_e_st_eq_landau_n_rt_rp_r_c_8285_t6 x ix y iy ly f pi q v iv)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 x) y)).
-
-(* constant 6205 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_less y x) (l_e_st_eq_landau_n_rt_rp_r_is y x) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) ly (λt:l_e_st_eq_landau_n_rt_rp_r_less y x.l_e_st_eq_landau_n_rt_rp_r_satz188f y x v t) (λt:l_e_st_eq_landau_n_rt_rp_r_is y x.l_e_st_eq_landau_n_rt_rp_r_ispl1 y x v t) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)).
-
-(* constant 6206 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly : l_e_st_eq_landau_n_nat).
-
-(* constant 6207 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_sv ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_st_eq_landau_n_rt_rp_r_c_shiftl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) : l_e_st_eq_landau_n_nat).
-
-(* constant 6208 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_st_eq_landau_n_rt_rp_r_isrlent (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 x) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t7 x ix y iy ly f pi q v iv) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv)).
-
-(* constant 6209 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t9 x ix y iy ly f pi q v iv) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv)).
-
-(* constant 6210 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_f1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t10 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6211 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_st_eq_landau_n_rt_rp_r_c_issmpr q (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f) (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t9 x ix y iy ly f pi q v iv) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_f1 x ix y iy ly f pi q v iv)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q)).
-
-(* constant 6212 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t10 x ix y iy ly f pi q v iv)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t10 x ix y iy ly f pi q v iv) n))).
-
-(* constant 6213 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t10 x ix y iy ly f pi q v iv) n : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv)).
-
-(* constant 6214 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_isnterl (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t12 x ix y iy ly f pi q v iv n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n)))).
-
-(* constant 6215 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n))) y) (l_e_st_eq_landau_n_rt_rp_r_asspl1 (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_m0 v)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n))) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) v) y (l_e_st_eq_landau_n_rt_rp_r_c_8285_t13 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_mnpl y v)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n))) y)).
-
-(* constant 6216 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_st0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6217 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_stv ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_shiftr (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) n : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6218 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t15 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 v))) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_m0 v) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl))) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) v) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_8285_st0 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_asspl1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 v)) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_m0 v) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 v))) (l_e_st_eq_landau_n_rt_rp_r_asspl2 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_m0 v) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n))) y) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_t14 x ix y iy ly f pi q v iv n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_st0 x ix y iy ly f pi q v iv n)).
-
-(* constant 6219 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t16 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_8285_st0 x ix y iy ly f pi q v iv n)).
-
-(* constant 6220 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t17 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_st0 x ix y iy ly f pi q v iv n) x).
-
-(* constant 6221 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t18 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_8285_st0 x ix y iy ly f pi q v iv n)).
-
-(* constant 6222 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t19 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_intshiftr (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) n : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n)).
-
-(* constant 6223 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t20 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_shiftrls (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) n : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)).
-
-(* constant 6224 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t21 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) n : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n)).
-
-(* constant 6225 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t22 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_intmn (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t19 x ix y iy ly f pi q v iv n) v iv : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) v)).
-
-(* constant 6226 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t23 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_8285_t2 x ix y iy ly f pi q v iv (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t19 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t21 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t20 x ix y iy ly f pi q v iv n) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) v)).
-
-(* constant 6227 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t24 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_8285_t4 x ix y iy ly f pi q v iv (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t19 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t21 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t20 x ix y iy ly f pi q v iv n) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) v) x).
-
-(* constant 6228 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t25 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(pi (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t22 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t23 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t24 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_st0 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t16 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t18 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t17 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t15 x ix y iy ly f pi q v iv n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_shiftf (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_sft x ix y iy ly f pi q v iv) n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_f1 x ix y iy ly f pi q v iv n)).
-
-(* constant 6229 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t26 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_fisi (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_shiftf (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_sft x ix y iy ly f pi q v iv)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_f1 x ix y iy ly f pi q v iv) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).l_e_st_eq_landau_n_rt_rp_r_c_8285_t25 x ix y iy ly f pi q v iv t) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_sft x ix y iy ly f pi q v iv)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_f1 x ix y iy ly f pi q v iv)).
-
-(* constant 6230 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t27 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_isf (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λw:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) w) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_sft x ix y iy ly f pi q v iv)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_f1 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t26 x ix y iy ly f pi q v iv) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpri (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_sft x ix y iy ly f pi q v iv) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_f1 x ix y iy ly f pi q v iv))).
-
-(* constant 6231 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma285 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl y v) (l_e_st_eq_landau_n_rt_rp_r_pl x v)).
-
-(* constant 6232 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz285 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpri (l_e_st_eq_landau_n_rt_rp_r_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_lemma285 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_sft x ix y iy ly f pi q v iv) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_f1 x ix y iy ly f pi q v iv)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t27 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t11 x ix y iy ly f pi q v iv) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpri (l_e_st_eq_landau_n_rt_rp_r_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_lemma285 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_sft x ix y iy ly f pi q v iv) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q)).
-
-(* constant 6233 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_us ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λlu:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λul:l_e_st_eq_landau_n_rt_rp_r_lessis u x.(s u iu lu ul : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6234 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λlu:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λul:l_e_st_eq_landau_n_rt_rp_r_lessis u x.(ins u iu lu ul : l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul)) (l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul)) (l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul) x)).
-
-(* constant 6235 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_inseqe1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λlu:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λul:l_e_st_eq_landau_n_rt_rp_r_lessis u x.(l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t1 x ix y iy ly s ins f u iu lu ul) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul)).
-
-(* constant 6236 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_inseqe2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λlu:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λul:l_e_st_eq_landau_n_rt_rp_r_lessis u x.(l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t1 x ix y iy ly s ins f u iu lu ul) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul)).
-
-(* constant 6237 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_inseqe3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λlu:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λul:l_e_st_eq_landau_n_rt_rp_r_lessis u x.(l_e_st_eq_landau_n_rt_rp_r_shift_t24 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t1 x ix y iy ly s ins f u iu lu ul) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul) x).
-
-(* constant 6238 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_usf ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λlu:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λul:l_e_st_eq_landau_n_rt_rp_r_lessis u x.(f (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul) (l_e_st_eq_landau_n_rt_rp_r_c_inseqe1 x ix y iy ly s ins f u iu lu ul) (l_e_st_eq_landau_n_rt_rp_r_c_inseqe2 x ix y iy ly s ins f u iu lu ul) (l_e_st_eq_landau_n_rt_rp_r_c_inseqe3 x ix y iy ly s ins f u iu lu ul) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6239 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_permseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.(λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_intrl t.λv:l_e_st_eq_landau_n_rt_rp_r_lessis y t.λw:l_e_st_eq_landau_n_rt_rp_r_lessis t x.l_e_st_eq_landau_n_rt_rp_r_c_usf x ix y iy ly s ins f t u v w : Πt:l_e_st_eq_landau_n_rt_rp_r_real.Πu:l_e_st_eq_landau_n_rt_rp_r_intrl t.Πv:l_e_st_eq_landau_n_rt_rp_r_lessis y t.Πw:l_e_st_eq_landau_n_rt_rp_r_lessis t x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6240 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_ss ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.(l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly)).
-
-(* constant 6241 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.(l_e_st_eq_landau_n_rt_rp_r_c_satz283 q a c (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps) (l_e_st_eq_landau_n_rt_rp_r_bijshiftseq x ix y iy ly s ins pri ps) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps t))) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q)).
-
-(* constant 6242 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_ns ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6243 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_c_shiftinv1 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ns x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8286_ns x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n))).
-
-(* constant 6244 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_c_inseqe1 x ix y iy ly s ins f (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_8286_ns x ix y iy ly f pi q a c s ins pri ps n)).
-
-(* constant 6245 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_c_inseqe2 x ix y iy ly s ins f (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_8286_ns x ix y iy ly f pi q a c s ins pri ps n)).
-
-(* constant 6246 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_c_inseqe3 x ix y iy ly s ins f (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8286_ns x ix y iy ly f pi q a c s ins pri ps n) x).
-
-(* constant 6247 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n))).
-
-(* constant 6248 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n))).
-
-(* constant 6249 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n)) x).
-
-(* constant 6250 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(pi (l_e_st_eq_landau_n_rt_rp_r_c_8286_ns x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t4 x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t5 x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t6 x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n)) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t7 x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t8 x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t9 x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t3 x ix y iy ly f pi q a c s ins pri ps n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_permseq x ix y iy ly s ins f) n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n))).
-
-(* constant 6251 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.(l_e_fisi (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_permseq x ix y iy ly s ins f)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps t)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_8286_t10 x ix y iy ly f pi q a c s ins pri ps t) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_permseq x ix y iy ly s ins f)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps t))).
-
-(* constant 6252 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.(l_e_isf (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly) u) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_permseq x ix y iy ly s ins f)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps t)) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t11 x ix y iy ly f pi q a c s ins pri ps) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_permseq x ix y iy ly s ins f) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps t)))).
-
-(* constant 6253 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz286 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_permseq x ix y iy ly s ins f) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps t))) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t12 x ix y iy ly f pi q a c s ins pri ps) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t2 x ix y iy ly f pi q a c s ins pri ps) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_permseq x ix y iy ly s ins f) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q)).
-
-(* constant 6254 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_modf ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (f t)) l_e_st_eq_landau_n_rt_rp_r_0 : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6255 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x f)) r : Prop).
-
-(* constant 6256 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_modf x f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) : Prop).
-
-(* constant 6257 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_and (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 x f r) (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 x f r) : Prop).
-
-(* constant 6258 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_prop4 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_some (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x f t) : Prop).
-
-(* constant 6259 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 ≝ λx:l_e_st_eq_landau_n_nat.(∀u:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8287_prop4 x u : Prop).
-
-(* constant 6260 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t1 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl t u) f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum l_e_st_eq_landau_n_1 f) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 6261 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t2 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_ismod (l_e_st_eq_landau_n_rt_rp_r_c_sum l_e_st_eq_landau_n_1 f) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t1 f) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum l_e_st_eq_landau_n_1 f)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 6262 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t3 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_lessisi2 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum l_e_st_eq_landau_n_1 f)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t2 f) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 l_e_st_eq_landau_n_1 f (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 6263 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t4 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl t u) (l_e_st_eq_landau_n_rt_rp_r_c_modf l_e_st_eq_landau_n_1 f) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 l_e_st_eq_landau_n_1 f (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 6264 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t5 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_andi (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 l_e_st_eq_landau_n_1 f (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 l_e_st_eq_landau_n_1 f (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t3 f) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t4 f) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 l_e_st_eq_landau_n_1 f (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 6265 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t6 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 l_e_st_eq_landau_n_1 f t) (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t5 f) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop4 l_e_st_eq_landau_n_1 f).
-
-(* constant 6266 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t7 ≝ (λu:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8287_t6 u : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 l_e_st_eq_landau_n_1).
-
-(* constant 6267 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t8 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 6268 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_lf ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8287_t8 x p f) f : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6269 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t9 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r) (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r) pr : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r).
-
-(* constant 6270 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t10 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r) (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r) pr : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r).
-
-(* constant 6271 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t11 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl t u) x f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))).
-
-(* constant 6272 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t12 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_c_ismod (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t11 x p f r pr)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f))).
-
-(* constant 6273 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_m ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6274 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t13 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_islessis1 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t12 x p f r pr) (l_e_st_eq_landau_n_rt_rp_r_c_satz271 (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))).
-
-(* constant 6275 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t14 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) r) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) r) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t9 x p f r pr) (λt:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) r.l_e_st_eq_landau_n_rt_rp_r_satz188f (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) t) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) r.l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) t) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))).
-
-(* constant 6276 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t15 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t13 x p f r pr) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t14 x p f r pr) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))).
-
-(* constant 6277 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_lmf ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8287_t8 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6278 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t16 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl t u) x (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lmf x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6279 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t17 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_c_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lmf x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t10 x p f r pr) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lmf x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6280 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t18 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_c_plis12a r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) l_e_st_eq_landau_n_rt_rp_r_0 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6281 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t19 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6282 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t20 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lmf x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t16 x p f r pr) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t17 x p f r pr) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t18 x p f r pr) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t19 x p f r pr) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))).
-
-(* constant 6283 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t21 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_andi (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t15 x p f r pr) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t20 x p f r pr) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))).
-
-(* constant 6284 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t22 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f t) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t21 x p f r pr) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop4 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6285 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t23 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_someapp l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) t) (p (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop4 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) t.l_e_st_eq_landau_n_rt_rp_r_c_8287_t22 x p f t u) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop4 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6286 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t25 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.(λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8287_t23 x p u : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 6287 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t26 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 t) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t25 x p) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 6288 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz287 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 t) l_e_st_eq_landau_n_rt_rp_r_c_8287_t7 (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 t.l_e_st_eq_landau_n_rt_rp_r_c_8287_t26 t u) x f : l_e_st_eq_landau_n_rt_rp_r_some (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x f)) t) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_modf x f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli t l_e_st_eq_landau_n_rt_rp_r_0)))).
-
-(* constant 6289 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_modf x f)) : Prop).
-
-(* constant 6290 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 ≝ λx:l_e_st_eq_landau_n_nat.(∀u:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8288_prop1 x u : Prop).
-
-(* constant 6291 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t1 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 6292 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t2 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_ismod (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t1 f) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 6293 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t3 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx1 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_t2 f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6294 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t4 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) (l_e_st_eq_landau_n_rt_rp_r_c_modf l_e_st_eq_landau_n_1 f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_modf l_e_st_eq_landau_n_1 f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6295 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t5 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_modf l_e_st_eq_landau_n_1 f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t3 f) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t4 f) : l_e_st_eq_landau_n_rt_rp_r_c_8288_prop1 l_e_st_eq_landau_n_1 f).
-
-(* constant 6296 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t6 ≝ (λu:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8288_t5 u : l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 l_e_st_eq_landau_n_1).
-
-(* constant 6297 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t7 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 6298 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_lf ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8288_t7 x p f) f : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6299 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t8 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) x f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))).
-
-(* constant 6300 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_m ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6301 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t9 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_ismod (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t8 x p f) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))))).
-
-(* constant 6302 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t10 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz268 (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f))).
-
-(* constant 6303 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t11 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t9 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t10 x p f) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f))).
-
-(* constant 6304 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t12 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx1 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_t11 x p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6305 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_lmf ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8288_t7 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6306 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t13 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) x (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lmf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6307 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t14 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lmf x p f)) (p (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lmf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6308 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t15 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lmf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t14 x p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lmf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6309 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t16 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_tsis12a (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) l_e_st_eq_landau_n_rt_rp_r_0 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f))))).
-
-(* constant 6310 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t17 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_ismn2 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz176b l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f))).
-
-(* constant 6311 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t18 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f))) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts02 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f))) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6312 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t19 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_t17 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t18 x p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6313 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t20 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lmf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t13 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t15 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t16 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t19 x p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6314 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t21 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t12 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t20 x p f) : l_e_st_eq_landau_n_rt_rp_r_c_8288_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6315 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t21a ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.(λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8288_t21 x p u : l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 6316 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t22 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 t) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t21a x p) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 6317 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz288 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 t) l_e_st_eq_landau_n_rt_rp_r_c_8288_t6 (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 t.l_e_st_eq_landau_n_rt_rp_r_c_8288_t22 t u) x f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_modf x f))).
-
-(* constant 6318 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x f) l_e_st_eq_landau_n_rt_rp_r_c_0c : Prop).
-
-(* constant 6319 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_some (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) : Prop).
-
-(* constant 6320 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_prop3 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_iff (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 x f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 x f) : Prop).
-
-(* constant 6321 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 ≝ λx:l_e_st_eq_landau_n_nat.(∀u:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8289_prop3 x u : Prop).
-
-(* constant 6322 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t1 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 6323 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t2 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 l_e_st_eq_landau_n_1 f.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t1 f) p : l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6324 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t3 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 l_e_st_eq_landau_n_1 f.(l_somei (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t2 f p) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 l_e_st_eq_landau_n_1 f).
-
-(* constant 6325 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t4 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 l_e_st_eq_landau_n_1 f.λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f u) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_singlet_th1 u : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) u (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)).
-
-(* constant 6326 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t5 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 l_e_st_eq_landau_n_1 f.λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f u) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (f u) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_8289_t1 f) (l_e_isf (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1) u (l_e_symis (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) u (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t4 f p u i))) i : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 l_e_st_eq_landau_n_1 f).
-
-(* constant 6327 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t6 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 l_e_st_eq_landau_n_1 f.(l_someapp (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) p (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 l_e_st_eq_landau_n_1 f) (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_8289_t5 f p t u) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 l_e_st_eq_landau_n_1 f).
-
-(* constant 6328 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t7 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_iffi (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 l_e_st_eq_landau_n_1 f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 l_e_st_eq_landau_n_1 f) (λt:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 l_e_st_eq_landau_n_1 f.l_e_st_eq_landau_n_rt_rp_r_c_8289_t3 f t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 l_e_st_eq_landau_n_1 f.l_e_st_eq_landau_n_rt_rp_r_c_8289_t6 f t) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop3 l_e_st_eq_landau_n_1 f).
-
-(* constant 6329 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t8 ≝ (λu:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8289_t7 u : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 l_e_st_eq_landau_n_1).
-
-(* constant 6330 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t9 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 6331 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_lf ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8289_t9 x p f) f : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6332 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t10 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) x f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))).
-
-(* constant 6333 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t11 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t10 x p f) q : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6334 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t12 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.(l_e_st_eq_landau_n_rt_rp_r_c_satz221c (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t11 x p f q) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_c_0c)).
-
-(* constant 6335 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t13 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_iff_th3 (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (p (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) i : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)).
-
-(* constant 6336 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t14 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_1to x.λj:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_somei (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8289_t9 x p f) n) j : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6337 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t15 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_someapp (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t13 x p f q i) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (λt:l_e_st_eq_landau_n_1to x.λu:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f t) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_8289_t14 x p f q i t u) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6338 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t16 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_somei (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) i : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6339 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t17 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.(l_orapp (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t12 x p f q) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_8289_t15 x p f q t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_8289_t16 x p f q t) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6340 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t18 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_c_0c (f n) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_c_cx f n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) j) i : l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6341 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t20 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).(l_e_st_eq_landau_n_rt_rp_r_c_satz221b (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t18 x p f q n i j) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6342 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n : l_e_st_eq_landau_n_nat).
-
-(* constant 6343 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t21 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) j : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).
-
-(* constant 6344 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t22 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t21 x p f q n i m j) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).
-
-(* constant 6345 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t23 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_imp_th3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) m (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_8289_t22 x p f q n i m t) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 6346 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t24 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_ore1 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t23 x p f q n i m) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 6347 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t25 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_st_eq_landau_n_satz26 x (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t24 x p f q n i m) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) x).
-
-(* constant 6348 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t25 x p f q n i m) : l_e_st_eq_landau_n_1to x).
-
-(* constant 6349 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t26 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t25 x p f q n i m) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m))).
-
-(* constant 6350 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t27 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m)) x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m)) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t9 x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t26 x p f q n i m) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8289_t9 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m))).
-
-(* constant 6351 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t28 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8289_t9 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m)) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t27 x p f q n i m) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8289_t9 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m))).
-
-(* constant 6352 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t29 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_c_cx f n (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8289_t9 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m)) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t28 x p f q n i m) : l_e_st_eq_landau_n_rt_rp_r_c_is (f n) (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m))).
-
-(* constant 6353 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t30 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m)) l_e_st_eq_landau_n_rt_rp_r_c_0c (f n) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t29 x p f q n i m) i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6354 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t31 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_somei (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t30 x p f q n i m) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)).
-
-(* constant 6355 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t32 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_iff_th4 (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (p (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t31 x p f q n i m) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)).
-
-(* constant 6356 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t34 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_st_eq_landau_n_rt_rp_r_c_satz221a (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t32 x p f q n i m) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6357 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t35 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) l_e_st_eq_landau_n_rt_rp_r_c_0c) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).l_e_st_eq_landau_n_rt_rp_r_c_8289_t20 x p f q n i t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).l_e_st_eq_landau_n_rt_rp_r_c_8289_t34 x p f q n i t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6358 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t36 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_8289_t10 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t35 x p f q n i) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6359 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t37 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.(l_someapp (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) q (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λu:l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_8289_t36 x p f q t u) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6360 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t38 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_iffi (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (λt:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.l_e_st_eq_landau_n_rt_rp_r_c_8289_t17 x p f t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.l_e_st_eq_landau_n_rt_rp_r_c_8289_t37 x p f t) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop3 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6361 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t39 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.(λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8289_t38 x p u : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 6362 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t40 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 t) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t39 x p) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 6363 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz289 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 t) l_e_st_eq_landau_n_rt_rp_r_c_8289_t8 (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 t.l_e_st_eq_landau_n_rt_rp_r_c_8289_t40 t u) x f : l_iff (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x f) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_some (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c))).
-
-(* constant 6364 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz289a ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x f) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_iff_th3 (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 x f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 x f) (l_e_st_eq_landau_n_rt_rp_r_c_satz289 x f) i : l_some (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c)).
-
-(* constant 6365 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t41 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_somei (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) n i : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 x f).
-
-(* constant 6366 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz289b ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_iff_th4 (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 x f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 x f) (l_e_st_eq_landau_n_rt_rp_r_c_satz289 x f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t41 x f n i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x f) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6367 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_posintnatrl m p mi : l_e_st_eq_landau_n_rt_rp_r_natrl m).
-
-(* constant 6368 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_ntofrl m (l_e_st_eq_landau_n_rt_rp_r_c_v9_t1 x m mi o p) : l_e_st_eq_landau_n_nat).
-
-(* constant 6369 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).x) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6370 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.λnp:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi1 ox mp : l_e_st_eq_landau_n_nat).
-
-(* constant 6371 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.λnp:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 y n ni1 oy np : l_e_st_eq_landau_n_nat).
-
-(* constant 6372 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.λnp:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_isrlent m (l_e_st_eq_landau_n_rt_rp_r_c_v9_t1 x m mi1 ox mp) n (l_e_st_eq_landau_n_rt_rp_r_c_v9_t1 y n ni1 oy np) j : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np)).
-
-(* constant 6373 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.λnp:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t2 x y m n i j mi1 ni1 ox oy mp np) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np)).
-
-(* constant 6374 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.λnp:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_c_issmpr (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np).y) (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t2 x y m n i j mi1 ni1 ox oy mp np) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t3 x y m n i j mi1 ni1 ox oy mp np) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np).y))) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 y n ni1 oy np)).
-
-(* constant 6375 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.λnp:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_fisi (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np)) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np).x) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t3 x y m n i j mi1 ni1 ox oy mp np) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np).y)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np).i) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np).l_e_st_eq_landau_n_rt_rp_r_c_cx) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np).x) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t3 x y m n i j mi1 ni1 ox oy mp np) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np).y))).
-
-(* constant 6376 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.λnp:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_isf (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np).l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) u) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np).x) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t3 x y m n i j mi1 ni1 ox oy mp np) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np).y)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t5 x y m n i j mi1 ni1 ox oy mp np) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi1 ox mp) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t3 x y m n i j mi1 ni1 ox oy mp np) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np).y)))).
-
-(* constant 6377 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.λnp:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi1 ox mp) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t3 x y m n i j mi1 ni1 ox oy mp np) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np).y))) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 y n ni1 oy np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t6 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t4 x y m n i j mi1 ni1 ox oy mp np) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi1 ox mp) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 y n ni1 oy np)).
-
-(* constant 6378 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.λp1:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t7 x x m m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real m) mi mi o o p p1 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o p) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o p1)).
-
-(* constant 6379 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_some_th5 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).l_e_st_eq_landau_n_rt_rp_r_c_is ((λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).x) t) l_e_st_eq_landau_n_rt_rp_r_c_0c) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).n) : l_not (l_some (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).l_e_st_eq_landau_n_rt_rp_r_c_is ((λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).x) t) l_e_st_eq_landau_n_rt_rp_r_c_0c))).
-
-(* constant 6380 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o p) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_some (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).l_e_st_eq_landau_n_rt_rp_r_c_is ((λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).x) t) l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t9 x m mi o p n) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o p) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_satz289a (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p) (λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).x) t) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o p) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6381 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_st_eq_landau_n_rt_rp_r_intabs m mi : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_abs m)).
-
-(* constant 6382 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_satz166b m n : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m)).
-
-(* constant 6383 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6384 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m) o (l_e_st_eq_landau_n_rt_rp_r_nnotp m n) : l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6385 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t15 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t10 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t14 x m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6386 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t15 x m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6387 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_pwm ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi1) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi1 ox nm) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi1 ox nm) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6388 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_pwn ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 y (l_e_st_eq_landau_n_rt_rp_r_abs n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 y n ni1) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 y n ni1 oy nn) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 y n ni1 oy nn) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6389 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t16 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t7 x y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_abs n) i (l_e_st_eq_landau_n_rt_rp_r_isabs m n j) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi1) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 y n ni1) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi1 ox nm) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 y n ni1 oy nn) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi1 ox nm) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 y n ni1 oy nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pwm x y m n i j mi1 ni1 ox oy nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pwn x y m n i j mi1 ni1 ox oy nm nn)).
-
-(* constant 6390 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t17 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_isov2 (l_e_st_eq_landau_n_rt_rp_r_c_v9_pwm x y m n i j mi1 ni1 ox oy nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pwn x y m n i j mi1 ni1 ox oy nm nn) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_v9_t16 x y m n i j mi1 ni1 ox oy nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t15 x m mi1 ox nm) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t15 y n ni1 oy nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi1 ox nm) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 y n ni1 oy nn)).
-
-(* constant 6391 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t18 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.λn1:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t17 x x m m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real m) mi mi o o n n1 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o n1)).
-
-(* constant 6392 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_r_ite (l_e_st_eq_landau_n_rt_rp_r_neg m) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).l_e_st_eq_landau_n_rt_rp_r_c_1c) (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.λu:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_v9_t18 x m mi o t u) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_1c) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6393 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t19 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_r_itet (l_e_st_eq_landau_n_rt_rp_r_neg m) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).l_e_st_eq_landau_n_rt_rp_r_c_1c) (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.λu:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_v9_t18 x m mi o t u) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_1c) n : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o n)).
-
-(* constant 6394 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t20 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λnn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).(l_r_itef (l_e_st_eq_landau_n_rt_rp_r_neg m) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).l_e_st_eq_landau_n_rt_rp_r_c_1c) (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.λu:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_v9_t18 x m mi o t u) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_1c) nn : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6395 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t21 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_neg t) m n nm j : l_e_st_eq_landau_n_rt_rp_r_neg n).
-
-(* constant 6396 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t22 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t19 x m mi1 ox nm : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi1 ox nm)).
-
-(* constant 6397 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t23 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t21 x y m n i j mi1 ni1 ox oy nm)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t19 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t21 x y m n i j mi1 ni1 ox oy nm)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t21 x y m n i j mi1 ni1 ox oy nm)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy)).
-
-(* constant 6398 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t24 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi1 ox nm) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t21 x y m n i j mi1 ni1 ox oy nm)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t22 x y m n i j mi1 ni1 ox oy nm) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t17 x y m n i j mi1 ni1 ox oy nm (l_e_st_eq_landau_n_rt_rp_r_c_v9_t21 x y m n i j mi1 ni1 ox oy nm)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t23 x y m n i j mi1 ni1 ox oy nm) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy)).
-
-(* constant 6399 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t25 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_not (l_e_st_eq_landau_n_rt_rp_r_neg t)) m n nn j : l_not (l_e_st_eq_landau_n_rt_rp_r_neg n)).
-
-(* constant 6400 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t26 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).(l_e_st_eq_landau_n_rt_rp_r_c_v9_t20 x m mi1 ox nn : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6401 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t27 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).(l_e_st_eq_landau_n_rt_rp_r_c_v9_t20 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t25 x y m n i j mi1 ni1 ox oy nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6402 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t28 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_v9_t26 x y m n i j mi1 ni1 ox oy nn) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t27 x y m n i j mi1 ni1 ox oy nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy)).
-
-(* constant 6403 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t29 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_neg m) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy)) (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_v9_t24 x y m n i j mi1 ni1 ox oy t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).l_e_st_eq_landau_n_rt_rp_r_c_v9_t28 x y m n i j mi1 ni1 ox oy t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy)).
-
-(* constant 6404 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_pw ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_r_ite (l_e_st_eq_landau_n_rt_rp_r_pos m) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o) (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.λu:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_v9_t8 x m mi o t u) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o)) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6405 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t30 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_r_itet (l_e_st_eq_landau_n_rt_rp_r_pos m) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o) (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.λu:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_v9_t8 x m mi o t u) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o)) p : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o p)).
-
-(* constant 6406 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t31 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_r_itef (l_e_st_eq_landau_n_rt_rp_r_pos m) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o) (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.λu:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_v9_t8 x m mi o t u) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o)) n : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o)).
-
-(* constant 6407 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t32 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_v9_t31 x m mi o (l_e_st_eq_landau_n_rt_rp_r_0notp m i)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t20 x m mi o (l_e_st_eq_landau_n_rt_rp_r_0notn m i)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6408 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t33 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t31 x m mi o (l_e_st_eq_landau_n_rt_rp_r_nnotp m n)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t19 x m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o n)).
-
-(* constant 6409 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_posexp ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t30 x m mi o p : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_ntofrl m (l_e_st_eq_landau_n_rt_rp_r_posintnatrl m p mi)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_ntofrl m (l_e_st_eq_landau_n_rt_rp_r_posintnatrl m p mi)).x))).
-
-(* constant 6410 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_notis_th2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o p) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t10 x m mi o p n) (l_e_st_eq_landau_n_rt_rp_r_c_posexp x m mi o p) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6411 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_0exp ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t32 x m mi o i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6412 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t14 x m mi o n : l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6413 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6414 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t34 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t30 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n))).
-
-(* constant 6415 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t35 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_isov2 (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_v9_t34 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t14 x m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t15 x m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t14 x m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o n)).
-
-(* constant 6416 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_negexp ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_intabs m mi) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_intabs m mi) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_satz166b m n) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t33 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t35 x m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_intabs m mi) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_intabs m mi) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_satz166b m n) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x m mi o n)))).
-
-(* constant 6417 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t36 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_pos t) m n mp j : l_e_st_eq_landau_n_rt_rp_r_pos n).
-
-(* constant 6418 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t37 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t30 x m mi1 ox mp : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi1 ox mp)).
-
-(* constant 6419 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t38 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t36 x y m n i j mi1 ni1 ox oy mp)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t30 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t36 x y m n i j mi1 ni1 ox oy mp)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t36 x y m n i j mi1 ni1 ox oy mp)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy)).
-
-(* constant 6420 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t39 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi1 ox mp) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t36 x y m n i j mi1 ni1 ox oy mp)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t37 x y m n i j mi1 ni1 ox oy mp) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t7 x y m n i j mi1 ni1 ox oy mp (l_e_st_eq_landau_n_rt_rp_r_c_v9_t36 x y m n i j mi1 ni1 ox oy mp)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t38 x y m n i j mi1 ni1 ox oy mp) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy)).
-
-(* constant 6421 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t40 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnp:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_not (l_e_st_eq_landau_n_rt_rp_r_pos t)) m n np j : l_not (l_e_st_eq_landau_n_rt_rp_r_pos n)).
-
-(* constant 6422 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t41 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnp:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_e_st_eq_landau_n_rt_rp_r_c_v9_t31 x m mi1 ox np : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox)).
-
-(* constant 6423 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t42 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnp:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t31 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t40 x y m n i j mi1 ni1 ox oy np)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy)).
-
-(* constant 6424 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t43 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnp:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t41 x y m n i j mi1 ni1 ox oy np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t29 x y m n i j mi1 ni1 ox oy) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t42 x y m n i j mi1 ni1 ox oy np) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy)).
-
-(* constant 6425 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ispw12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy)) (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_v9_t39 x y m n i j mi1 ni1 ox oy t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).l_e_st_eq_landau_n_rt_rp_r_c_v9_t43 x y m n i j mi1 ni1 ox oy t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy)).
-
-(* constant 6426 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ispw1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_e_st_eq_landau_n_rt_rp_r_c_ispw12 x y m m i (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real m) mi mi ox oy : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi ox) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi oy)).
-
-(* constant 6427 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ispw2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λom:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λon:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_c_ispw12 x x m n (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) i mi ni om on : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi om) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni on)).
-
-(* constant 6428 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9290_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x m mi o p n : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6429 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9290_t2 ≝ λi:l_e_st_eq_landau_n_rt_rp_r_c_is l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_re l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_re l_e_st_eq_landau_n_rt_rp_r_c_0c) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_isre l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_iscere l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c i) (l_e_st_eq_landau_n_rt_rp_r_c_reis l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6430 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_1not0 ≝ (l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_c_is l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_is l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pnot0 l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_pos1) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_9290_t2 t) : l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6431 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9290_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_notis_th2 l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_1not0 (l_e_st_eq_landau_n_rt_rp_r_c_0exp x m mi o i) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6432 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_intabs m mi) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x m mi o nm) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6433 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9290_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_intabs m mi) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x m mi o nm) (l_e_st_eq_landau_n_rt_rp_r_satz166b m nm) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x m mi o nm) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6434 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9290_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm) (l_e_st_eq_landau_n_rt_rp_r_c_9290_t5 x m mi o n nm)) (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm) (l_e_st_eq_landau_n_rt_rp_r_c_9290_t5 x m mi o n nm)) (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm) (l_e_st_eq_landau_n_rt_rp_r_c_negexp x m mi o nm)) (l_e_st_eq_landau_n_rt_rp_r_c_satz229e l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm) (l_e_st_eq_landau_n_rt_rp_r_c_9290_t5 x m mi o n nm)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm)) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6435 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9290_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_notis_th2 l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm)) l_e_st_eq_landau_n_rt_rp_r_c_1not0 (l_e_st_eq_landau_n_rt_rp_r_c_9290_t6 x m mi o n nm) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6436 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9290_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm)) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_9290_t7 x m mi o n nm) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_satz221a (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm) t) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6437 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz290 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_rapp m (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c) (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_9290_t1 x m mi o n t) (λt:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_9290_t4 x m mi o n t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_9290_t8 x m mi o n t) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6438 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma291 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_1rl) l_e_st_eq_landau_n_rt_rp_r_pos1 : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_1rl)).
-
-(* constant 6439 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9291_1a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ntofrl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_posintnatrl l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_pos1 l_e_st_eq_landau_n_rt_rp_r_intrl1) : l_e_st_eq_landau_n_nat).
-
-(* constant 6440 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9291_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_posexp x l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 x) l_e_st_eq_landau_n_rt_rp_r_pos1 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 x)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x))).
-
-(* constant 6441 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9291_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_ntofrl l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_natrl1) (l_e_st_eq_landau_n_rt_rp_r_ntofrl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_posintnatrl l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_pos1 l_e_st_eq_landau_n_rt_rp_r_intrl1)) (l_e_st_eq_landau_n_rt_rp_r_isntrl1 l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_isrlent l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_natrl1 l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_posintnatrl l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_pos1 l_e_st_eq_landau_n_rt_rp_r_intrl1) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_1rl)) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x)).
-
-(* constant 6442 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9291_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_lessisi2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) (l_e_st_eq_landau_n_rt_rp_r_c_9291_t2 x) : l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x)).
-
-(* constant 6443 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9291_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_issmpr (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_9291_t2 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_9291_t3 x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x))) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x))).
-
-(* constant 6444 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9291_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_9291_t3 x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_9291_t3 x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x))) x).
-
-(* constant 6445 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9291_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x)) x (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_9291_t3 x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x))) (l_e_st_eq_landau_n_rt_rp_r_c_9291_t4 x) (l_e_st_eq_landau_n_rt_rp_r_c_9291_t5 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x)) x).
-
-(* constant 6446 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz291 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 x)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x)) x (l_e_st_eq_landau_n_rt_rp_r_c_9291_t1 x) (l_e_st_eq_landau_n_rt_rp_r_c_9291_t6 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 x)) x).
-
-(* constant 6447 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c).(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) a : l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6448 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) a : l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6449 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c).(l_e_st_eq_landau_n_rt_rp_r_c_satz221d x y (l_e_st_eq_landau_n_rt_rp_r_c_9292_t1 x y m mi o a) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t2 x y m mi o a) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6450 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma292a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_or_th7 (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) o (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c).l_e_st_eq_landau_n_rt_rp_r_c_9292_t1 x y m mi o t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6451 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma292b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_or_th7 (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) o (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c).l_e_st_eq_landau_n_rt_rp_r_c_9292_t2 x y m mi o t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6452 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma292c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_or_th7 (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c) o (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c).l_e_st_eq_landau_n_rt_rp_r_c_9292_t3 x y m mi o t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6453 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_nr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_rlofnt n : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6454 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_natintrl (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natrli n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n)).
-
-(* constant 6455 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n)) (l_e_st_eq_landau_n_rt_rp_r_natpos (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natrli n)) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n))).
-
-(* constant 6456 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t4 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t5 x n) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6457 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 x)) x (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9292_t5 x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 x)) (l_e_st_eq_landau_n_rt_rp_r_c_satz291 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x l_e_st_eq_landau_n_1) x).
-
-(* constant 6458 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_posintnatrl (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natpos (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natrli n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t4 x n)) : l_e_st_eq_landau_n_nat).
-
-(* constant 6459 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat n (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natrli n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n) (l_e_st_eq_landau_n_rt_rp_r_isntrl1 n) (l_e_st_eq_landau_n_rt_rp_r_isrlent (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natrli n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_posintnatrl (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natpos (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natrli n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t4 x n)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n))) : l_e_st_eq_landau_n_is n (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n)).
-
-(* constant 6460 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_lessisi2 n (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t7 x n) : l_e_st_eq_landau_n_lessis n (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n)).
-
-(* constant 6461 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_posexp x (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t4 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t5 x n) (l_e_st_eq_landau_n_rt_rp_r_natpos (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natrli n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n).x))).
-
-(* constant 6462 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_issmpr (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n).x) n (l_e_st_eq_landau_n_rt_rp_r_c_9292_t7 x n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod n (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n) n (l_e_st_eq_landau_n_rt_rp_r_c_9292_t8 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n).x))) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n).x))).
-
-(* constant 6463 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_prod n (λt:l_e_st_eq_landau_n_1to n.x)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n).x)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t9 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t10 x n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_prod n (λt:l_e_st_eq_landau_n_1to n.x))).
-
-(* constant 6464 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_pl n l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat).
-
-(* constant 6465 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_lessisi1 n (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n) (l_e_st_eq_landau_n_satz18a n l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis n (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)).
-
-(* constant 6466 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) n (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n).x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n).x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod n (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n) n (l_e_st_eq_landau_n_rt_rp_r_c_9292_t12 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n).x))) x)).
-
-(* constant 6467 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_prod n (λt:l_e_st_eq_landau_n_1to n.x)) x (l_e_st_eq_landau_n_rt_rp_r_c_9292_t11 x n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod n (λt:l_e_st_eq_landau_n_1to n.x)) x)).
-
-(* constant 6468 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t15 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n).x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod n (λt:l_e_st_eq_landau_n_1to n.x)) x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t13 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t14 x n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n).x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x)).
-
-(* constant 6469 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t16 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n).x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t11 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t15 x n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x)).
-
-(* constant 6470 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) : Prop).
-
-(* constant 6471 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t17 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y l_e_st_eq_landau_n_1) y (l_e_st_eq_landau_n_rt_rp_r_c_9292_t6 x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t6 y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)).
-
-(* constant 6472 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t18 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t6 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t17 x y) : l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y l_e_st_eq_landau_n_1).
-
-(* constant 6473 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t19 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y n.(l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) p : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y))).
-
-(* constant 6474 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t20 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_comts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) x)) (l_e_st_eq_landau_n_rt_rp_r_c_assts2 (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n))).
-
-(* constant 6475 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t21 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) x) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) y)) (l_e_st_eq_landau_n_rt_rp_r_c_assts2 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) x y) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) y (l_e_st_eq_landau_n_rt_rp_r_c_9292_t20 x y n p)) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) y))).
-
-(* constant 6476 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t22 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) y)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t16 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t19 x y n p) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t21 x y n p) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) y))).
-
-(* constant 6477 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t23 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y n.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t16 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t16 y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) y))).
-
-(* constant 6478 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t24 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y n.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) y)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t22 x y n p) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t23 x y n p) : l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)).
-
-(* constant 6479 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t25 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y n.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y t) (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n) (l_e_st_eq_landau_n_suc n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t24 x y n p) (l_e_st_eq_landau_n_satz4a n) : l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y (l_e_st_eq_landau_n_suc n)).
-
-(* constant 6480 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t26 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y t) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t18 x y) (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y t.l_e_st_eq_landau_n_rt_rp_r_c_9292_t25 x y t u) n : l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y n).
-
-(* constant 6481 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_prop2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) : Prop).
-
-(* constant 6482 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t28 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_posintnatrl m p mi : l_e_st_eq_landau_n_rt_rp_r_natrl m).
-
-(* constant 6483 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_ntofrl m (l_e_st_eq_landau_n_rt_rp_r_c_9292_t28 x y m mi o p) : l_e_st_eq_landau_n_nat).
-
-(* constant 6484 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t29 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_isrlnt1 m (l_e_st_eq_landau_n_rt_rp_r_c_9292_t28 x y m mi o p) : l_e_st_eq_landau_n_rt_rp_r_is m (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p))).
-
-(* constant 6485 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t30 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_isrlnt2 m (l_e_st_eq_landau_n_rt_rp_r_c_9292_t28 x y m mi o p) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) m).
-
-(* constant 6486 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t31 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t29 x y m mi o p) mi (l_e_st_eq_landau_n_rt_rp_r_c_9292_t4 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t5 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p))).
-
-(* constant 6487 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t32 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) m (l_e_st_eq_landau_n_rt_rp_r_c_9292_t30 x y m mi o p) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t4 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) mi (l_e_st_eq_landau_n_rt_rp_r_c_9292_t5 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw2 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) m (l_e_st_eq_landau_n_rt_rp_r_c_9292_t30 x y m mi o p) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t4 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) mi (l_e_st_eq_landau_n_rt_rp_r_c_9292_t5 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o)))).
-
-(* constant 6488 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t33 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t31 x y m mi o p) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t26 x y (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t32 x y m mi o p) : l_e_st_eq_landau_n_rt_rp_r_c_9292_prop2 x y m mi o).
-
-(* constant 6489 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t34 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_0exp x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o) i) (l_e_st_eq_landau_n_rt_rp_r_c_0exp y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o) i)) (l_e_st_eq_landau_n_rt_rp_r_c_satz222 l_e_st_eq_landau_n_rt_rp_r_c_1c) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6490 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t35 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_0exp (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o) i) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t34 x y m mi o i) : l_e_st_eq_landau_n_rt_rp_r_c_9292_prop2 x y m mi o).
-
-(* constant 6491 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_intabs m mi : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_abs m)).
-
-(* constant 6492 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t37 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_ori2 (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m)) (l_e_st_eq_landau_n_rt_rp_r_satz166b m n) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6493 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t38 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t37 x y m mi o n) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6494 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t39 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t37 x y m mi o n) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6495 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t40 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t37 x y m mi o n) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6496 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o) n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6497 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o) n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6498 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o) n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6499 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t44 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs m)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t40 x y m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t40 x y m mi o n))).
-
-(* constant 6500 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t45 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_9292_t33 x y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t37 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_satz166b m n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t40 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t38 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t39 x y m mi o n)))).
-
-(* constant 6501 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t46 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t38 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t39 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs m)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t38 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw2 y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs m)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t39 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t38 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t39 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)))).
-
-(* constant 6502 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t47 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t40 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t38 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t39 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t44 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t45 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t46 x y m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)))).
-
-(* constant 6503 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t48 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_satz166b m n) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o) n) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6504 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t49 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_satz166b m n) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o) n) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6505 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t50 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_satz166b m n) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o) n) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6506 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_satz221d (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t48 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t49 x y m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6507 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t52 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_negexp (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o) n : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t50 x y m mi o n))).
-
-(* constant 6508 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t53 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_isov12 l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_satz222a l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t47 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t50 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 x y m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t50 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 x y m mi o n))).
-
-(* constant 6509 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t54 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t50 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t52 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t53 x y m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 x y m mi o n))).
-
-(* constant 6510 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t55 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t48 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t49 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_negexp x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o) n) (l_e_st_eq_landau_n_rt_rp_r_c_negexp y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o) n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t48 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t49 x y m mi o n)))).
-
-(* constant 6511 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t56 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_satz247 l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t48 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t49 x y m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t48 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t49 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 x y m mi o n))).
-
-(* constant 6512 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t57 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t48 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t49 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t55 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t56 x y m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 x y m mi o n))).
-
-(* constant 6513 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t58 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t54 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t57 x y m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_9292_prop2 x y m mi o).
-
-(* constant 6514 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz292 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_e_st_eq_landau_n_rt_rp_r_rapp m (l_e_st_eq_landau_n_rt_rp_r_c_9292_prop2 x y m mi o) (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_9292_t33 x y m mi o t) (λt:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_9292_t35 x y m mi o t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_9292_t58 x y m mi o t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o)))).
-
-(* constant 6515 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma293 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m) l_e_st_eq_landau_n_rt_rp_r_c_1not0 : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6516 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_ori1 (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_andi (l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c) l_e_st_eq_landau_n_rt_rp_r_c_1not0 l_e_st_eq_landau_n_rt_rp_r_c_1not0) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6517 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_1m ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma293 m) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6518 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_t2 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_st_eq_landau_n_rt_rp_r_c_satz222 (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi)).
-
-(* constant 6519 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_t3 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_st_eq_landau_n_rt_rp_r_c_ispw1 l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) m (l_e_st_eq_landau_n_rt_rp_r_c_satz222a l_e_st_eq_landau_n_rt_rp_r_c_1c) mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma293 m) (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi)))).
-
-(* constant 6520 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_t4 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_st_eq_landau_n_rt_rp_r_c_satz292 l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi))) (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi))))).
-
-(* constant 6521 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_t5 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi))) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi))) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_1c) mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma293 m)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_1c) mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma293 m)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi))) (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi)))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi))).
-
-(* constant 6522 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_t6 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi))) (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi)))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi)) (l_e_st_eq_landau_n_rt_rp_r_c_9293_t2 m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_t3 m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_t4 m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_t5 m mi) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi))).
-
-(* constant 6523 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_t7 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_disttm2 (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_satz213b (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi)) (l_e_st_eq_landau_n_rt_rp_r_c_9293_t6 m mi))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6524 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_t8 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_ore2 (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_satz221c (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_9293_t7 m mi)) (l_e_st_eq_landau_n_rt_rp_r_c_satz290 l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma293 m) l_e_st_eq_landau_n_rt_rp_r_c_1not0) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6525 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz293 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_st_eq_landau_n_rt_rp_r_c_satz213a (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_9293_t8 m mi) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma293 m)) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6526 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n) a : l_e_st_eq_landau_n_rt_rp_r_pos m).
-
-(* constant 6527 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n) a : l_e_st_eq_landau_n_rt_rp_r_pos n).
-
-(* constant 6528 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_pospl m n (l_e_st_eq_landau_n_rt_rp_r_c_9294_t1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t2 x m n mi ni o a) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl m n)).
-
-(* constant 6529 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma294a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_or_th8 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)) (l_e_st_eq_landau_n_rt_rp_r_pos m) o (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).l_e_st_eq_landau_n_rt_rp_r_c_9294_t1 x m n mi ni o t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6530 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma294b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_or_th8 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)) (l_e_st_eq_landau_n_rt_rp_r_pos n) o (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).l_e_st_eq_landau_n_rt_rp_r_c_9294_t2 x m n mi ni o t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n)).
-
-(* constant 6531 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma294c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_or_th8 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl m n)) o (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).l_e_st_eq_landau_n_rt_rp_r_c_9294_t3 x m n mi ni o t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl m n))).
-
-(* constant 6532 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) : Prop).
-
-(* constant 6533 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_ntofrl m (l_e_st_eq_landau_n_rt_rp_r_posintnatrl m (l_e_st_eq_landau_n_rt_rp_r_c_9294_t1 x m n mi ni o a) mi) : l_e_st_eq_landau_n_nat).
-
-(* constant 6534 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_ntofrl n (l_e_st_eq_landau_n_rt_rp_r_posintnatrl n (l_e_st_eq_landau_n_rt_rp_r_c_9294_t2 x m n mi ni o a) ni) : l_e_st_eq_landau_n_nat).
-
-(* constant 6535 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a).x)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a).x)) (l_e_st_eq_landau_n_rt_rp_r_c_posexp x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_c_posexp x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t2 x m n mi ni o a)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a).x)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a).x)))).
-
-(* constant 6536 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_posintnatrl (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t3 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni)) : l_e_st_eq_landau_n_nat).
-
-(* constant 6537 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_c_posexp x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t3 x m n mi ni o a) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a).x))).
-
-(* constant 6538 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a))) (l_e_st_eq_landau_n_rt_rp_r_ispl12 m (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a)) n (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 m (l_e_st_eq_landau_n_rt_rp_r_posintnatrl m (l_e_st_eq_landau_n_rt_rp_r_c_9294_t1 x m n mi ni o a) mi)) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 n (l_e_st_eq_landau_n_rt_rp_r_posintnatrl n (l_e_st_eq_landau_n_rt_rp_r_c_9294_t2 x m n mi ni o a) ni))) (l_e_st_eq_landau_n_rt_rp_r_satzr155b (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)))).
-
-(* constant 6539 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_tris2 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a))) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)))) (l_e_st_eq_landau_n_rt_rp_r_isntrl1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a))) (l_e_st_eq_landau_n_rt_rp_r_isrlent (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_posintnatrl (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t3 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a))) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t6 x m n mi ni o a)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a)).
-
-(* constant 6540 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t7 x m n mi ni o a) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a)).
-
-(* constant 6541 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_c_issmpr (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a).x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t7 x m n mi ni o a) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t8 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a).x))) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a).x))).
-
-(* constant 6542 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)).x)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a).x)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t5 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t9 x m n mi ni o a) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)).x))).
-
-(* constant 6543 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_lessisi1 (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_satz18a (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a))).
-
-(* constant 6544 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_c_satz281 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) l_e_st_eq_landau_n_rt_rp_r_c_assocts (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)).x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)).x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t11 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)).x))) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a) (l_e_st_eq_landau_n_right l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)).x))))).
-
-(* constant 6545 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)).x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a).x)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a).x))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t10 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t12 x m n mi ni o a) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a).x)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a).x)))).
-
-(* constant 6546 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a).x)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a).x))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t4 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t13 x m n mi ni o a) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6547 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t15 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)) o na : l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6548 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t16 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_or_th15 (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n) na : l_or (l_not (l_e_st_eq_landau_n_rt_rp_r_pos m)) (l_not (l_e_st_eq_landau_n_rt_rp_r_pos n))).
-
-(* constant 6549 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_am ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_abs m : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6550 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_an ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_abs n : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6551 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_ap ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_pl m n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6552 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_intabs m mi : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o)).
-
-(* constant 6553 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_intabs n ni : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)).
-
-(* constant 6554 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_intabs (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o)).
-
-(* constant 6555 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t20 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_andi (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_satz166e m (l_e_st_eq_landau_n_rt_rp_r_nnot0 m nm)) (l_e_st_eq_landau_n_rt_rp_r_satz166e n (l_e_st_eq_landau_n_rt_rp_r_nnot0 n nn)) : l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))).
-
-(* constant 6556 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t21 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t20 x m n mi ni o na nm nn) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)))).
-
-(* constant 6557 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) nm : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o))).
-
-(* constant 6558 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) nn : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))).
-
-(* constant 6559 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t24 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t21 x m n mi ni o na nm nn) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o))).
-
-(* constant 6560 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t25 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t21 x m n mi ni o na nm nn) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))).
-
-(* constant 6561 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t26 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t24 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t25 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t24 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t25 x m n mi ni o na nm nn)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t24 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t25 x m n mi ni o na nm nn)))).
-
-(* constant 6562 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t27 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t21 x m n mi ni o na nm nn) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)))).
-
-(* constant 6563 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t28 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_9294_t14 x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t21 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t20 x m n mi ni o na nm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t24 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t25 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t27 x m n mi ni o na nm nn))).
-
-(* constant 6564 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t29 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_m0 n)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl m n)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_m0 n) (l_e_st_eq_landau_n_rt_rp_r_absn m nm) (l_e_st_eq_landau_n_rt_rp_r_absn n nn)) (l_e_st_eq_landau_n_rt_rp_r_satz180a m n) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl m n)) (l_e_st_eq_landau_n_rt_rp_r_absn (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_negpl m n nm nn))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o)).
-
-(* constant 6565 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_negpl m n nm nn) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o))).
-
-(* constant 6566 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t31 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t29 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t27 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t27 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn))).
-
-(* constant 6567 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t32 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t24 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t25 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t27 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t26 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t28 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t31 x m n mi ni o na nm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn))).
-
-(* constant 6568 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t33 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_satz166b m nm) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) nm) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6569 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t34 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_satz166b n nn) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) nn) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6570 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t35 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_satz166b (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_negpl m n nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_negpl m n nm nn)) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6571 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t36 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t33 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t34 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_negexp x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) nm) (l_e_st_eq_landau_n_rt_rp_r_c_negexp x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t33 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t34 x m n mi ni o na nm nn)))).
-
-(* constant 6572 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t37 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_satz221d (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t33 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t34 x m n mi ni o na nm nn) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn))) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6573 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t38 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_satz247 l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t33 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t34 x m n mi ni o na nm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t33 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t34 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t37 x m n mi ni o na nm nn))).
-
-(* constant 6574 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t39 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_isov12 (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_satz222 l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t32 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t37 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t35 x m n mi ni o na nm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t37 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t35 x m n mi ni o na nm nn))).
-
-(* constant 6575 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t40 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t35 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_negexp x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_negpl m n nm nn)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t35 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o))).
-
-(* constant 6576 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t41 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t33 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t34 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t37 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t35 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t36 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t38 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t39 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t40 x m n mi ni o na nm nn) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6577 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) nn : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))).
-
-(* constant 6578 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn) (l_e_st_eq_landau_n_rt_rp_r_satz166b n nn) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) nn) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6579 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t44 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_negexp x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)))).
-
-(* constant 6580 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t45 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_satz244a (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn))).
-
-(* constant 6581 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t46 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_isov1 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_satz222 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn))).
-
-(* constant 6582 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t47 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t44 x m n mi ni o na pm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t45 x m n mi ni o na pm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t46 x m n mi ni o na pm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn))).
-
-(* constant 6583 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t48 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_satz182d m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) casea : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))).
-
-(* constant 6584 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t49 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_satz166e n (l_e_st_eq_landau_n_rt_rp_r_nnot0 n nn) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)).
-
-(* constant 6585 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t50 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_andi (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t49 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t48 x m n mi ni o na pm nn casea) : l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)))).
-
-(* constant 6586 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t51 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t50 x m n mi ni o na pm nn casea) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))))).
-
-(* constant 6587 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_intmn m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))).
-
-(* constant 6588 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t51 x m n mi ni o na pm nn casea) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))).
-
-(* constant 6589 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t51 x m n mi ni o na pm nn casea) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)))).
-
-(* constant 6590 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t55 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t51 x m n mi ni o na pm nn casea) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))))).
-
-(* constant 6591 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t56 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)))).
-
-(* constant 6592 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t57 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_9294_t14 x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t51 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t50 x m n mi ni o na pm nn casea) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t56 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t55 x m n mi ni o na pm nn casea))).
-
-(* constant 6593 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t58 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_satz187a m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) m).
-
-(* constant 6594 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t59 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) m (l_e_st_eq_landau_n_rt_rp_r_c_9294_t58 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t56 x m n mi ni o na pm nn casea) mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t55 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t56 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t55 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o))).
-
-(* constant 6595 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t60 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t56 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t55 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t57 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t59 x m n mi ni o na pm nn casea) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o))).
-
-(* constant 6596 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t61 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn))).
-
-(* constant 6597 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t62 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_isp1 l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_nis t l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t61 x m n mi ni o na pm nn casea) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6598 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t63 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_isov12 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t60 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t61 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t62 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t62 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn))).
-
-(* constant 6599 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t64 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t62 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t47 x m n mi ni o na pm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t63 x m n mi ni o na pm nn casea) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t62 x m n mi ni o na pm nn casea))).
-
-(* constant 6600 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t65 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_satz229h (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t62 x m n mi ni o na pm nn casea) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea)))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t62 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))).
-
-(* constant 6601 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t66 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_m0 n)) (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_ismn2 (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_m0 n) m (l_e_st_eq_landau_n_rt_rp_r_absn n nn)) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 n)) n m (l_e_st_eq_landau_n_rt_rp_r_satz177 n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pl m n)).
-
-(* constant 6602 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t67 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t66 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o))).
-
-(* constant 6603 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t68 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t62 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t64 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t65 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t67 x m n mi ni o na pm nn casea) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6604 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t69 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcaseb:l_e_st_eq_landau_n_rt_rp_r_is m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) caseb mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn))).
-
-(* constant 6605 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t70 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcaseb:l_e_st_eq_landau_n_rt_rp_r_is m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_satz251a (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t69 x m n mi ni o na pm nn caseb) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6606 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t71 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcaseb:l_e_st_eq_landau_n_rt_rp_r_is m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_m0 n)) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ispl2 n (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 n)) m (l_e_st_eq_landau_n_rt_rp_r_satz177a n)) (l_e_st_eq_landau_n_rt_rp_r_ismn2 (l_e_st_eq_landau_n_rt_rp_r_m0 n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_m0 n) (l_e_st_eq_landau_n_rt_rp_r_absn n nn))) (l_e_st_eq_landau_n_rt_rp_r_satz182e m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) caseb) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl m n) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6607 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t72 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcaseb:l_e_st_eq_landau_n_rt_rp_r_is m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_0exp x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t71 x m n mi ni o na pm nn caseb)) : l_e_st_eq_landau_n_rt_rp_r_c_is l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o))).
-
-(* constant 6608 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t73 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcaseb:l_e_st_eq_landau_n_rt_rp_r_is m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t47 x m n mi ni o na pm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t70 x m n mi ni o na pm nn caseb) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t72 x m n mi ni o na pm nn caseb) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6609 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t74 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_satz182d (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m (l_e_st_eq_landau_n_rt_rp_r_lemma2 m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) casec) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)).
-
-(* constant 6610 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t75 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_andi (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)) pm (l_e_st_eq_landau_n_rt_rp_r_c_9294_t74 x m n mi ni o na pm nn casec) : l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m))).
-
-(* constant 6611 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t76 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t75 x m n mi ni o na pm nn casec) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)))).
-
-(* constant 6612 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_intmn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) m mi : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)).
-
-(* constant 6613 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t76 x m n mi ni o na pm nn casec) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6614 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t76 x m n mi ni o na pm nn casec) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m))).
-
-(* constant 6615 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t80 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t76 x m n mi ni o na pm nn casec) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)))).
-
-(* constant 6616 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t81 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_intpl m mi (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_pl m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m))).
-
-(* constant 6617 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t81a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_9294_t14 x m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t76 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t75 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t81 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t80 x m n mi ni o na pm nn casec))).
-
-(* constant 6618 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t82 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_satz187a (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)).
-
-(* constant 6619 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t83 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_pl m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t82 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t81 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t80 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t81 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t80 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn))).
-
-(* constant 6620 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t84 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t81 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t80 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t81a x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t83 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn))).
-
-(* constant 6621 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t85 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t15 x m n mi ni o na) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6622 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t86 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t15 x m n mi ni o na) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6623 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t87 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_satz221d (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t85 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t86 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6624 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t88 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_satz222 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec))).
-
-(* constant 6625 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t89 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o))).
-
-(* constant 6626 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t90 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t88 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t89 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o))).
-
-(* constant 6627 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t91 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_isov12 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t90 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t84 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t87 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t87 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn))).
-
-(* constant 6628 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t92 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t87 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t47 x m n mi ni o na pm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t91 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t87 x m n mi ni o na pm nn casec))).
-
-(* constant 6629 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t93 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_satz246a l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t86 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t85 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t87 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t86 x m n mi ni o na pm nn casec))).
-
-(* constant 6630 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t94 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_satz182f m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) casec : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))).
-
-(* constant 6631 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t94a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_m0 n)) (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_ismn2 (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_m0 n) m (l_e_st_eq_landau_n_rt_rp_r_absn n nn)) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 n)) n m (l_e_st_eq_landau_n_rt_rp_r_satz177 n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pl m n)).
-
-(* constant 6632 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t95 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_satz181a (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_absn (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t94 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_isabs (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t94a x m n mi ni o na pm nn casec)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o)).
-
-(* constant 6633 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t96 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_neg t) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t94 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t94a x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_pl m n)).
-
-(* constant 6634 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t96 x m n mi ni o na pm nn casec) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o))).
-
-(* constant 6635 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t98 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_satz166b (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t96 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t96 x m n mi ni o na pm nn casec)) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6636 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t99 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t95 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec))).
-
-(* constant 6637 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t100 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_isov2 (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_9294_t99 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t86 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t98 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t86 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t98 x m n mi ni o na pm nn casec))).
-
-(* constant 6638 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t101 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t98 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_negexp x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t96 x m n mi ni o na pm nn casec)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t98 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o))).
-
-(* constant 6639 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t102 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t87 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t86 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t98 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t92 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t93 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t100 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t101 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6640 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t103 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_or3app (l_e_st_eq_landau_n_rt_rp_r_is m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_satz167a m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (λt:l_e_st_eq_landau_n_rt_rp_r_is m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).l_e_st_eq_landau_n_rt_rp_r_c_9294_t73 x m n mi ni o na pm nn t) (λt:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).l_e_st_eq_landau_n_rt_rp_r_c_9294_t68 x m n mi ni o na pm nn t) (λt:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).l_e_st_eq_landau_n_rt_rp_r_c_9294_t102 x m n mi ni o na pm nn t) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6641 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t104 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos n) (l_e_st_eq_landau_n_rt_rp_r_pos m)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t15 x m n mi ni o na) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos n) (l_e_st_eq_landau_n_rt_rp_r_pos m))).
-
-(* constant 6642 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t104a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_and_th5 (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n) na : l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos n) (l_e_st_eq_landau_n_rt_rp_r_pos m))).
-
-(* constant 6643 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x n m ni mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t104 x m n mi ni o na) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n)).
-
-(* constant 6644 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x n m ni mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t104 x m n mi ni o na) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6645 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t107 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x n m ni mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t104 x m n mi ni o na) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl n m))).
-
-(* constant 6646 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t108 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x n (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)))).
-
-(* constant 6647 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t109 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_comts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na)))).
-
-(* constant 6648 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t110 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λqn:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_c_9294_t103 x n m ni mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t104 x m n mi ni o na) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t104a x m n mi ni o na) qn nm : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl n m) (l_e_st_eq_landau_n_rt_rp_r_intpl n ni m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t107 x m n mi ni o na))).
-
-(* constant 6649 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t111 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_pl n m) (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_compl n m) (l_e_st_eq_landau_n_rt_rp_r_intpl n ni m mi) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t107 x m n mi ni o na) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl n m) (l_e_st_eq_landau_n_rt_rp_r_intpl n ni m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t107 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o))).
-
-(* constant 6650 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t112 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λqn:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl n m) (l_e_st_eq_landau_n_rt_rp_r_intpl n ni m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t107 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t108 x m n mi ni o na) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t109 x m n mi ni o na) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t110 x m n mi ni o na nm qn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t111 x m n mi ni o na) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6651 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t113 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_0exp x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)))).
-
-(* constant 6652 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t114 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_satz222b (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))).
-
-(* constant 6653 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t115 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl m n) n (l_e_st_eq_landau_n_rt_rp_r_pl01 m n i) : l_e_st_eq_landau_n_rt_rp_r_is n (l_e_st_eq_landau_n_rt_rp_r_pl m n)).
-
-(* constant 6654 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t116 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x n (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t115 x m n mi ni o na i) ni (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o))).
-
-(* constant 6655 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t117 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t113 x m n mi ni o na i) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t114 x m n mi ni o na i) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t116 x m n mi ni o na i) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6656 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t118 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_9294_t117 x n m ni mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t104 x m n mi ni o na) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t104a x m n mi ni o na) i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl n m) (l_e_st_eq_landau_n_rt_rp_r_intpl n ni m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t107 x m n mi ni o na))).
-
-(* constant 6657 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t119 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl n m) (l_e_st_eq_landau_n_rt_rp_r_intpl n ni m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t107 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t108 x m n mi ni o na) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t109 x m n mi ni o na) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t118 x m n mi ni o na i) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t111 x m n mi ni o na) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6658 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t120 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_ore2 (l_not (l_e_st_eq_landau_n_rt_rp_r_pos m)) (l_not (l_e_st_eq_landau_n_rt_rp_r_pos n)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t16 x m n mi ni o na) (l_weli (l_e_st_eq_landau_n_rt_rp_r_pos m) pm) : l_not (l_e_st_eq_landau_n_rt_rp_r_pos n)).
-
-(* constant 6659 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t121 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_rapp n (l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_r_pos n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t120 x m n mi ni o na pm)) (λt:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_9294_t119 x m n mi ni o na t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg n.l_e_st_eq_landau_n_rt_rp_r_c_9294_t103 x m n mi ni o na pm t) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6660 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t122 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_rapp n (l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o) (λt:l_e_st_eq_landau_n_rt_rp_r_pos n.l_e_st_eq_landau_n_rt_rp_r_c_9294_t112 x m n mi ni o na nm t) (λt:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_9294_t119 x m n mi ni o na t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg n.l_e_st_eq_landau_n_rt_rp_r_c_9294_t41 x m n mi ni o na nm t) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6661 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t123 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_rapp m (l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o) (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_9294_t121 x m n mi ni o na t) (λt:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_9294_t117 x m n mi ni o na t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_9294_t122 x m n mi ni o na t) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6662 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz294 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_imp_th1 (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o) (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).l_e_st_eq_landau_n_rt_rp_r_c_9294_t14 x m n mi ni o t) (λt:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).l_e_st_eq_landau_n_rt_rp_r_c_9294_t123 x m n mi ni o t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o))).
-
-(* constant 6663 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma295a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m) o : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6664 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma295b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n) o : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n)).
-
-(* constant 6665 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma295c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m n)) o : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m n))).
-
-(* constant 6666 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m n)) (l_e_st_eq_landau_n_rt_rp_r_pos n)) o : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m n)) (l_e_st_eq_landau_n_rt_rp_r_pos n))).
-
-(* constant 6667 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_intmn m mi n ni : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_mn m n)).
-
-(* constant 6668 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x (l_e_st_eq_landau_n_rt_rp_r_mn m n) n (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) ni (l_e_st_eq_landau_n_rt_rp_r_c_9295_t1 x m n mi ni o) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m n))).
-
-(* constant 6669 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x (l_e_st_eq_landau_n_rt_rp_r_mn m n) n (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) ni (l_e_st_eq_landau_n_rt_rp_r_c_9295_t1 x m n mi ni o) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n)).
-
-(* constant 6670 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x (l_e_st_eq_landau_n_rt_rp_r_mn m n) n (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) ni (l_e_st_eq_landau_n_rt_rp_r_c_9295_t1 x m n mi ni o) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn m n) n))).
-
-(* constant 6671 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma295c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t3 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9295_t4 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma295c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t3 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x n (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t4 x m n mi ni o)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma295c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t3 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9295_t4 x m n mi ni o)))).
-
-(* constant 6672 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz294 x (l_e_st_eq_landau_n_rt_rp_r_mn m n) n (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) ni (l_e_st_eq_landau_n_rt_rp_r_c_9295_t1 x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t3 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9295_t4 x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn m n) n) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) n ni) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t5 x m n mi ni o))).
-
-(* constant 6673 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_plmn m n : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn m n) n) m).
-
-(* constant 6674 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn m n) n) m (l_e_st_eq_landau_n_rt_rp_r_c_9295_t8 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) n ni) mi (l_e_st_eq_landau_n_rt_rp_r_c_9295_t5 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma295a x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn m n) n) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) n ni) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t5 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma295a x m n mi ni o))).
-
-(* constant 6675 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma295c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t3 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9295_t4 x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn m n) n) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) n ni) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t5 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma295a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t6 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t7 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t9 x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma295c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma295a x m n mi ni o))).
-
-(* constant 6676 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o) o : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6677 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz295 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229k (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma295a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma295c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t11 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t10 x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma295a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_satz290 x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o) o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_intmn m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma295c x m n mi ni o))).
-
-(* constant 6678 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma296 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m) n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6679 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_intrli0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_intrl l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6680 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma295a x l_e_st_eq_landau_n_rt_rp_r_0 m (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) mi n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6681 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x l_e_st_eq_landau_n_rt_rp_r_0 m (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) mi n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6682 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma295c x l_e_st_eq_landau_n_rt_rp_r_0 m (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) mi n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 m))).
-
-(* constant 6683 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n) n : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6684 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 x m mi n) n : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 x m mi n)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6685 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t2 x m mi n)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_0exp x l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t2 x m mi n) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_c_is l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t2 x m mi n))).
-
-(* constant 6686 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 x m mi n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 x m mi n))).
-
-(* constant 6687 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_isov12 l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t2 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t7 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t8 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t5 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t6 x m mi n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t5 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t2 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t6 x m mi n))).
-
-(* constant 6688 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz295 x l_e_st_eq_landau_n_rt_rp_r_0 m (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) mi n : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t2 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t6 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 m) (l_e_st_eq_landau_n_rt_rp_r_intmn l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t4 x m mi n))).
-
-(* constant 6689 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 m) (l_e_st_eq_landau_n_rt_rp_r_m0 m)).
-
-(* constant 6690 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_intm0 m mi) n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 m))).
-
-(* constant 6691 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 m) (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t11 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_intmn l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) m mi) (l_e_st_eq_landau_n_rt_rp_r_intm0 m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t4 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t12 x m mi n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 m) (l_e_st_eq_landau_n_rt_rp_r_intmn l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t4 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_intm0 m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t12 x m mi n))).
-
-(* constant 6692 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t5 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t2 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t6 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 m) (l_e_st_eq_landau_n_rt_rp_r_intmn l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t4 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_intm0 m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t12 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t9 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t10 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t13 x m mi n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t5 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_intm0 m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t12 x m mi n))).
-
-(* constant 6693 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz296 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_9296_t14 x m mi n : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_satz290 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n) n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_intm0 m mi) (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_intm0 m mi) n))).
-
-(* constant 6694 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) p : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6695 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n) a : l_e_st_eq_landau_n_rt_rp_r_pos n).
-
-(* constant 6696 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_postspp m n (l_ande1 (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n) a) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t2 x m n mi ni o a) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m n)).
-
-(* constant 6697 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma297a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)) (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n) o (λt:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_9297_t1 x m n mi ni o t) (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).l_e_st_eq_landau_n_rt_rp_r_c_9297_t2 x m n mi ni o t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n)).
-
-(* constant 6698 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma297b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_or_th8 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m n)) o (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).l_e_st_eq_landau_n_rt_rp_r_c_9297_t3 x m n mi ni o t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m n))).
-
-(* constant 6699 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ore2 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m) o (l_weli (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) i) : l_e_st_eq_landau_n_rt_rp_r_pos m).
-
-(* constant 6700 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_ntofrl m (l_e_st_eq_landau_n_rt_rp_r_posintnatrl m (l_e_st_eq_landau_n_rt_rp_r_c_9297_t4 x m mi o i) mi) : l_e_st_eq_landau_n_nat).
-
-(* constant 6701 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_posexp x m mi o (l_e_st_eq_landau_n_rt_rp_r_c_9297_t4 x m mi o i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i).x))).
-
-(* constant 6702 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz289b (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i).x) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i)) i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i).x)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6703 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i).x)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_9297_t5 x m mi o i) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t6 x m mi o i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6704 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_pw0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_9297_t7 x m mi o i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6705 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.(l_e_st_eq_landau_n_rt_rp_r_intts m mi n ni : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_ts m n)).
-
-(* constant 6706 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_prop1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o)) : Prop).
-
-(* constant 6707 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_pw0 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6708 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_pw0 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t9 x m n mi ni o i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6709 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_pw0 x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o) i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6710 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_9297_t10 x m n mi ni o i) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t11 x m n mi ni o i) : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop1 x m n mi ni o).
-
-(* constant 6711 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m) p : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6712 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t13 x m mi p) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6713 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_nr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_rlofnt n : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6714 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_natintrl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_natrli n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)).
-
-(* constant 6715 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_natpos (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_natrli n)) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n))).
-
-(* constant 6716 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n))) p : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)))).
-
-(* constant 6717 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_intts m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n))).
-
-(* constant 6718 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p n)) : Prop).
-
-(* constant 6719 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t18 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_ispw1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p)) l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p)))).
-
-(* constant 6720 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t19 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz291 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p)).
-
-(* constant 6721 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t20 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x m (l_e_st_eq_landau_n_rt_rp_r_ts m l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_satz195a m) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t13 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p l_e_st_eq_landau_n_1))).
-
-(* constant 6722 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t21 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t18 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t19 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t20 x m mi p) : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p l_e_st_eq_landau_n_1).
-
-(* constant 6723 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_pl n l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat).
-
-(* constant 6724 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t22 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t13 x m mi p) p : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6725 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t23 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t22 x m mi p n p2) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_1rl))).
-
-(* constant 6726 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294a (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t23 x m mi p n p2) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n))).
-
-(* constant 6727 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294b (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t23 x m mi p n p2) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_1rl)).
-
-(* constant 6728 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t26 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294c (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t23 x m mi p n p2) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl))).
-
-(* constant 6729 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t27 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_satzr155a n l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t26 x m mi p n p2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t26 x m mi p n p2))).
-
-(* constant 6730 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t27a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_satz294 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t23 x m mi p n p2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t26 x m mi p n p2))).
-
-(* constant 6731 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t28 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t26 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t27 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t27a x m mi p n p2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2)))).
-
-(* constant 6732 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t29 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n))) (l_e_st_eq_landau_n_rt_rp_r_pos m)) p : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n))) (l_e_st_eq_landau_n_rt_rp_r_pos m))).
-
-(* constant 6733 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t30 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t29 x m mi p n p2) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)))).
-
-(* constant 6734 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t31 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t29 x m mi p n p2) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6735 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t32 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t29 x m mi p n p2) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m))).
-
-(* constant 6736 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t33 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t30 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p n)) p2 (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t30 x m mi p n p2)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t30 x m mi p n p2))).
-
-(* constant 6737 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t34 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t31 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p)) l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t19 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t13 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t31 x m mi p n p2)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t31 x m mi p n p2))).
-
-(* constant 6738 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t35 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t30 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t31 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t33 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t34 x m mi p n p2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t30 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t31 x m mi p n p2)))).
-
-(* constant 6739 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t36 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_satz294 x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t29 x m mi p n p2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t30 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t31 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t32 x m mi p n p2))).
-
-(* constant 6740 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t37 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_ts m l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_ispl2 m (l_e_st_eq_landau_n_rt_rp_r_ts m l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_satz195a m)) (l_e_st_eq_landau_n_rt_rp_r_distpt2 m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) m (l_e_st_eq_landau_n_rt_rp_r_satzr155b n l_e_st_eq_landau_n_1)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m) (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)))).
-
-(* constant 6741 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t38 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m) (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t37 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t32 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t32 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)))).
-
-(* constant 6742 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t39 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t30 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t31 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t32 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t28 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t35 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t36 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t38 x m mi p n p2) : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)).
-
-(* constant 6743 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t40 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p t) (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2) (l_e_st_eq_landau_n_suc n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t39 x m mi p n p2) (l_e_st_eq_landau_n_satz4a n) : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p (l_e_st_eq_landau_n_suc n)).
-
-(* constant 6744 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t41 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p t) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t21 x m mi p) (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p t.l_e_st_eq_landau_n_rt_rp_r_c_9297_t40 x m mi p t u) n : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n).
-
-(* constant 6745 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t42 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_posintnatrl n q ni : l_e_st_eq_landau_n_rt_rp_r_natrl n).
-
-(* constant 6746 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_ntofrl n (l_e_st_eq_landau_n_rt_rp_r_c_9297_t42 x m n mi ni o p q) : l_e_st_eq_landau_n_nat).
-
-(* constant 6747 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t43 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_isrlnt1 n (l_e_st_eq_landau_n_rt_rp_r_c_9297_t42 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_is n (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))).
-
-(* constant 6748 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t44 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_isrlnt2 n (l_e_st_eq_landau_n_rt_rp_r_c_9297_t42 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) n).
-
-(* constant 6749 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6750 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t44a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x m m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real m) mi mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t13 x m mi p) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p)).
-
-(* constant 6751 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t45 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw12 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) n (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t44a x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t43 x m n mi ni o p q) ni (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)))).
-
-(* constant 6752 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t46 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_c_9297_t41 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)))).
-
-(* constant 6753 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t47 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) n m (l_e_st_eq_landau_n_rt_rp_r_c_9297_t44 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_ts m n)).
-
-(* constant 6754 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t48 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t47 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o))).
-
-(* constant 6755 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t49 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t45 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t46 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t48 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop1 x m n mi ni o).
-
-(* constant 6756 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t50 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_0exp (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o) i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6757 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t51 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_ts02 m n i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts m n) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6758 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t52 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_0exp x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t51 x m n mi ni o p i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6759 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t53 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_9297_t50 x m n mi ni o p i) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t52 x m n mi ni o p i) : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop1 x m n mi ni o).
-
-(* constant 6760 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_an ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_abs n : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6761 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_intabs n ni : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)).
-
-(* constant 6762 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t55 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) p : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)))).
-
-(* constant 6763 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t55 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6764 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t56 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_satz166e n (l_e_st_eq_landau_n_rt_rp_r_nnot0 n q) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)).
-
-(* constant 6765 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t56a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t55 x m n mi ni o p q) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6766 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t57 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t55 x m n mi ni o p q) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))).
-
-(* constant 6767 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t58 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t55 x m n mi ni o p q) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)))).
-
-(* constant 6768 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t59 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_9297_t49 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t55 x m n mi ni o p q) p (l_e_st_eq_landau_n_rt_rp_r_c_9297_t56 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t57 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t58 x m n mi ni o p q))).
-
-(* constant 6769 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t60 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_satz177c (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) n (l_e_st_eq_landau_n_rt_rp_r_absn n q) : l_e_st_eq_landau_n_rt_rp_r_is n (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))).
-
-(* constant 6770 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t61 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_intm0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))).
-
-(* constant 6771 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t62 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t56a x m n mi ni o p q) p : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6772 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma296 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t62 x m n mi ni o p q) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))).
-
-(* constant 6773 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t64 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_satz290 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t62 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6774 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t65 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma296 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t61 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t62 x m n mi ni o p q) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)))).
-
-(* constant 6775 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t66 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_satz296 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t62 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t64 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t61 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t65 x m n mi ni o p q))).
-
-(* constant 6776 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t67 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t56a x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q)).
-
-(* constant 6777 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t68 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw12 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) n (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t67 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t60 x m n mi ni o p q) ni (l_e_st_eq_landau_n_rt_rp_r_c_9297_t61 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t65 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t61 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t65 x m n mi ni o p q))).
-
-(* constant 6778 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t69 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t64 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t61 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t65 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t68 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t66 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t64 x m n mi ni o p q))).
-
-(* constant 6779 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t70 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_satz197f m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) n m (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real n (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t60 x m n mi ni o p q))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_ts m n)).
-
-(* constant 6780 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t71 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_intm0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)))).
-
-(* constant 6781 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) p : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)))).
-
-(* constant 6782 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t73 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q) p : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6783 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t74 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t71 x m n mi ni o p q) p : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))))).
-
-(* constant 6784 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t75 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_satz296 x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) p : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t73 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t71 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t74 x m n mi ni o p q))).
-
-(* constant 6785 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t76 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t70 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t71 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t74 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t71 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t74 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o))).
-
-(* constant 6786 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t77 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t57 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t57 x m n mi ni o p q))).
-
-(* constant 6787 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t78 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t58 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t58 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q))).
-
-(* constant 6788 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t79 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t57 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t58 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t77 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t59 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t78 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q))).
-
-(* constant 6789 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t80 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_isov2 (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_9297_t79 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t64 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t73 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t64 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t73 x m n mi ni o p q))).
-
-(* constant 6790 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t81 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t64 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t73 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t71 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t74 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t69 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t80 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t75 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t76 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop1 x m n mi ni o).
-
-(* constant 6791 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t82 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_rapp n (l_e_st_eq_landau_n_rt_rp_r_c_9297_prop1 x m n mi ni o) (λt:l_e_st_eq_landau_n_rt_rp_r_pos n.l_e_st_eq_landau_n_rt_rp_r_c_9297_t49 x m n mi ni o p t) (λt:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_9297_t53 x m n mi ni o p t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg n.l_e_st_eq_landau_n_rt_rp_r_c_9297_t81 x m n mi ni o p t) : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop1 x m n mi ni o).
-
-(* constant 6792 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz297 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_9297_prop1 x m n mi ni o) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_9297_t12 x m n mi ni o t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_9297_t82 x m n mi ni o t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_intts m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o))).
-
-(* constant 6793 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_plis12a r l_e_st_eq_landau_n_rt_rp_r_0 s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r s) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6794 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t1 r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6795 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_10298_t1 r s : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r s) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6796 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_mnis12a r l_e_st_eq_landau_n_rt_rp_r_0 s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_pl02 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz176b l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6797 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t2 r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6798 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_10298_t2 r s : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6799 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_satz176b (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 6800 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s)) (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 s (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ts02 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6801 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_tsis12a r l_e_st_eq_landau_n_rt_rp_r_0 s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_10298_t3 r s) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t4 r s)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6802 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t5 r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6803 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_10298_t5 r s : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6804 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real s (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_re l_e_st_eq_landau_n_rt_rp_r_c_0c) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_isre s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_iscere (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_0c i) (l_e_st_eq_landau_n_rt_rp_r_c_reis l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6805 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma298 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0) n (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_10298_t6 r s n t) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6806 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ov r s n) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t5 s (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx1 (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satz204c r s n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ov r s n) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6807 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298g ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_satz229g (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ov r s n) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_lemma298 r s n) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t7 r s n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ov r s n) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_lemma298 r s n))).
-
-(* constant 6808 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298h ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_satz229h (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ov r s n) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_lemma298 r s n) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t7 r s n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_lemma298 r s n)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ov r s n) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6809 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_m0isa r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_satz176b l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6810 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298j ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t8 r) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6811 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298k ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_10298_t8 r : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6812 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod2 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_imis r l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) r (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) r (l_e_st_eq_landau_n_rt_rp_r_c_reis r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_reis r l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod2 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts r r)).
-
-(* constant 6813 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_ar ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_abs r : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6814 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_satz196a r r p p : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r))).
-
-(* constant 6815 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 r r i) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_abs0 r i)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r))).
-
-(* constant 6816 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_satz196b r r n n : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r))).
-
-(* constant 6817 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t13 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_rapp r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r))) (λt:l_e_st_eq_landau_n_rt_rp_r_pos r.l_e_st_eq_landau_n_rt_rp_r_c_10298_t10 r t) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_10298_t11 r t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg r.l_e_st_eq_landau_n_rt_rp_r_c_10298_t12 r t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r))).
-
-(* constant 6818 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t14 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod2 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r)) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t9 r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t13 r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod2 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r))).
-
-(* constant 6819 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t15 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r))) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_0notn (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_abs0 r t)) (λt:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_pnotn (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_satz166e r t)) : l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r))).
-
-(* constant 6820 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298l ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_thsqrt3 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t15 r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t14 r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 6821 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298m ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_c_satz298l r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6822 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_cofrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0 : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 6823 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isrlic ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s)) s (l_e_st_eq_landau_n_rt_rp_r_c_isre r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_iscere (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) i) (l_e_st_eq_landau_n_rt_rp_r_c_reis s l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 6824 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isrlec ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx1 r s l_e_st_eq_landau_n_rt_rp_r_0 i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s)).
-
-(* constant 6825 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v10_t1 ≝ (λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λv:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) (l_e_st_eq_landau_n_rt_rp_r_c_cofrl u).l_e_st_eq_landau_n_rt_rp_r_c_isrlic t u v : l_e_injective l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t)).
-
-(* constant 6826 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_realc ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_image l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) x : Prop).
-
-(* constant 6827 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_reali ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_imagei l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) r : l_e_st_eq_landau_n_rt_rp_r_c_realc (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r)).
-
-(* constant 6828 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_rlofc ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λrx:l_e_st_eq_landau_n_rt_rp_r_c_realc x.(l_e_soft l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t1 x rx : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6829 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscirl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λrx:l_e_st_eq_landau_n_rt_rp_r_c_realc x.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λry:l_e_st_eq_landau_n_rt_rp_r_c_realc y.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rlofc x rx) (l_e_st_eq_landau_n_rt_rp_r_c_rlofc y ry).(l_e_isinve l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t1 x rx y ry i : l_e_st_eq_landau_n_rt_rp_r_c_is x y).
-
-(* constant 6830 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscerl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λrx:l_e_st_eq_landau_n_rt_rp_r_c_realc x.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λry:l_e_st_eq_landau_n_rt_rp_r_c_realc y.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isinv l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t1 x rx y ry i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rlofc x rx) (l_e_st_eq_landau_n_rt_rp_r_c_rlofc y ry)).
-
-(* constant 6831 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isrlc1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_isst1 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t1 r : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_c_rlofc (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_reali r))).
-
-(* constant 6832 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isrlc2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_isst2 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t1 r : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rlofc (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_reali r)) r).
-
-(* constant 6833 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscrl1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λrx:l_e_st_eq_landau_n_rt_rp_r_c_realc x.(l_e_ists1 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t1 x rx : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_rlofc x rx))).
-
-(* constant 6834 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscrl2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λrx:l_e_st_eq_landau_n_rt_rp_r_c_realc x.(l_e_ists2 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t1 x rx : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_rlofc x rx)) x).
-
-(* constant 6835 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_cofn ≝ λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_rlofnt n) : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 6836 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnec ≝ λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is n m.(l_e_st_eq_landau_n_rt_rp_r_c_isrlec (l_e_st_eq_landau_n_rt_rp_r_rlofnt n) (l_e_st_eq_landau_n_rt_rp_r_rlofnt m) (l_e_st_eq_landau_n_rt_rp_r_isnterl n m i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_cofn m)).
-
-(* constant 6837 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnic ≝ λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_cofn m).(l_e_st_eq_landau_n_rt_rp_r_isntirl n m (l_e_st_eq_landau_n_rt_rp_r_c_isrlic (l_e_st_eq_landau_n_rt_rp_r_rlofnt n) (l_e_st_eq_landau_n_rt_rp_r_rlofnt m) i) : l_e_st_eq_landau_n_is n m).
-
-(* constant 6838 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v10_t2 ≝ (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofn t) (l_e_st_eq_landau_n_rt_rp_r_c_cofn u).l_e_st_eq_landau_n_rt_rp_r_c_isnic t u v : l_e_injective l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t)).
-
-(* constant 6839 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_natc ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_image l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) x : Prop).
-
-(* constant 6840 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_nati ≝ λn:l_e_st_eq_landau_n_nat.(l_e_imagei l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) n : l_e_st_eq_landau_n_rt_rp_r_c_natc (l_e_st_eq_landau_n_rt_rp_r_c_cofn n)).
-
-(* constant 6841 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_nofc ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.(l_e_soft l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t2 x nx : l_e_st_eq_landau_n_nat).
-
-(* constant 6842 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscen ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λny:l_e_st_eq_landau_n_rt_rp_r_c_natc y.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isinv l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t2 x nx y ny i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_nofc x nx) (l_e_st_eq_landau_n_rt_rp_r_c_nofc y ny)).
-
-(* constant 6843 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscin ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λny:l_e_st_eq_landau_n_rt_rp_r_c_natc y.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_nofc x nx) (l_e_st_eq_landau_n_rt_rp_r_c_nofc y ny).(l_e_isinve l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t2 x nx y ny i : l_e_st_eq_landau_n_rt_rp_r_c_is x y).
-
-(* constant 6844 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnc1 ≝ λn:l_e_st_eq_landau_n_nat.(l_e_isst1 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t2 n : l_e_st_eq_landau_n_is n (l_e_st_eq_landau_n_rt_rp_r_c_nofc (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_nati n))).
-
-(* constant 6845 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnc2 ≝ λn:l_e_st_eq_landau_n_nat.(l_e_isst2 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t2 n : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_nofc (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_nati n)) n).
-
-(* constant 6846 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscn1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.(l_e_ists1 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t2 x nx : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_cofn (l_e_st_eq_landau_n_rt_rp_r_c_nofc x nx))).
-
-(* constant 6847 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscn2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.(l_e_ists2 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t2 x nx : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofn (l_e_st_eq_landau_n_rt_rp_r_c_nofc x nx)) x).
-
-(* constant 6848 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_natt ≝ (l_e_ot l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) : Type[0]).
-
-(* constant 6849 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_cofnt ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_in l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) nt : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6850 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_natti ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_inp l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) nt : l_e_st_eq_landau_n_rt_rp_r_c_natc (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt)).
-
-(* constant 6851 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isntec ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λmt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λi:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt nt mt.(l_e_isini l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) nt mt i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_cofnt mt)).
-
-(* constant 6852 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isntic ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λmt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_cofnt mt).(l_e_isine l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) nt mt i : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt nt mt).
-
-(* constant 6853 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ntofc ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.(l_e_out l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) x nx : l_e_st_eq_landau_n_rt_rp_r_c_natt).
-
-(* constant 6854 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscent ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λny:l_e_st_eq_landau_n_rt_rp_r_c_natc y.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isouti l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) x nx y ny i : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc x nx) (l_e_st_eq_landau_n_rt_rp_r_c_ntofc y ny)).
-
-(* constant 6855 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscint ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λny:l_e_st_eq_landau_n_rt_rp_r_c_natc y.λi:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc x nx) (l_e_st_eq_landau_n_rt_rp_r_c_ntofc y ny).(l_e_isoute l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) x nx y ny i : l_e_st_eq_landau_n_rt_rp_r_c_is x y).
-
-(* constant 6856 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isntc1 ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_isoutin l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) nt : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt nt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt))).
-
-(* constant 6857 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isntc2 ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_natt nt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt)) (l_e_st_eq_landau_n_rt_rp_r_c_isntc1 nt) : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt)) nt).
-
-(* constant 6858 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscnt1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.(l_e_isinout l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) x nx : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_cofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc x nx))).
-
-(* constant 6859 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscnt2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_cofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc x nx)) (l_e_st_eq_landau_n_rt_rp_r_c_iscnt1 x nx) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc x nx)) x).
-
-(* constant 6860 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ntofn ≝ λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_ntofc (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_nati n) : l_e_st_eq_landau_n_rt_rp_r_c_natt).
-
-(* constant 6861 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnent ≝ λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is n m.(l_e_st_eq_landau_n_rt_rp_r_c_iscent (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_nati n) (l_e_st_eq_landau_n_rt_rp_r_c_cofn m) (l_e_st_eq_landau_n_rt_rp_r_c_nati m) (l_e_st_eq_landau_n_rt_rp_r_c_isnec n m i) : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n) (l_e_st_eq_landau_n_rt_rp_r_c_ntofn m)).
-
-(* constant 6862 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnint ≝ λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λi:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n) (l_e_st_eq_landau_n_rt_rp_r_c_ntofn m).(l_e_st_eq_landau_n_rt_rp_r_c_isnic n m (l_e_st_eq_landau_n_rt_rp_r_c_iscint (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_nati n) (l_e_st_eq_landau_n_rt_rp_r_c_cofn m) (l_e_st_eq_landau_n_rt_rp_r_c_nati m) i) : l_e_st_eq_landau_n_is n m).
-
-(* constant 6863 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_nofnt ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_st_eq_landau_n_rt_rp_r_c_nofc (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt) : l_e_st_eq_landau_n_nat).
-
-(* constant 6864 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnter ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λmt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λi:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt nt mt.(l_e_st_eq_landau_n_rt_rp_r_c_iscen (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt) (l_e_st_eq_landau_n_rt_rp_r_c_cofnt mt) (l_e_st_eq_landau_n_rt_rp_r_c_natti mt) (l_e_st_eq_landau_n_rt_rp_r_c_isntec nt mt i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_nofnt mt)).
-
-(* constant 6865 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isntin ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λmt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_nofnt mt).(l_e_st_eq_landau_n_rt_rp_r_c_isntic nt mt (l_e_st_eq_landau_n_rt_rp_r_c_iscin (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt) (l_e_st_eq_landau_n_rt_rp_r_c_cofnt mt) (l_e_st_eq_landau_n_rt_rp_r_c_natti mt) i) : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt nt mt).
-
-(* constant 6866 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v10_t3 ≝ λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_iscnt1 (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_nati n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_cofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n))).
-
-(* constant 6867 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnnt1 ≝ λn:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat n (l_e_st_eq_landau_n_rt_rp_r_c_nofc (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_nati n)) (l_e_st_eq_landau_n_rt_rp_r_c_nofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n)) (l_e_st_eq_landau_n_rt_rp_r_c_isnc1 n) (l_e_st_eq_landau_n_rt_rp_r_c_iscen (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_nati n) (l_e_st_eq_landau_n_rt_rp_r_c_cofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n)) (l_e_st_eq_landau_n_rt_rp_r_c_natti (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n)) (l_e_st_eq_landau_n_rt_rp_r_c_v10_t3 n)) : l_e_st_eq_landau_n_is n (l_e_st_eq_landau_n_rt_rp_r_c_nofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n))).
-
-(* constant 6868 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnnt2 ≝ λn:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat n (l_e_st_eq_landau_n_rt_rp_r_c_nofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n)) (l_e_st_eq_landau_n_rt_rp_r_c_isnnt1 n) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_nofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n)) n).
-
-(* constant 6869 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v10_t4 ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_st_eq_landau_n_rt_rp_r_c_iscn1 (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_cofn (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt))).
-
-(* constant 6870 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isntn1 ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_natt nt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt)) (l_e_st_eq_landau_n_rt_rp_r_c_ntofn (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) (l_e_st_eq_landau_n_rt_rp_r_c_isntc1 nt) (l_e_st_eq_landau_n_rt_rp_r_c_iscent (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt) (l_e_st_eq_landau_n_rt_rp_r_c_cofn (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) (l_e_st_eq_landau_n_rt_rp_r_c_nati (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) (l_e_st_eq_landau_n_rt_rp_r_c_v10_t4 nt)) : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt nt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt))).
-
-(* constant 6871 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isntn2 ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_natt nt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) (l_e_st_eq_landau_n_rt_rp_r_c_isntn1 nt) : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) nt).
-
-(* constant 6872 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_1t ≝ (l_e_st_eq_landau_n_rt_rp_r_c_ntofn l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_rt_rp_r_c_natt).
-
-(* constant 6873 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_suct ≝ (λt:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_e_st_eq_landau_n_rt_rp_r_c_ntofn (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt t)) : Πt:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_e_st_eq_landau_n_rt_rp_r_c_natt).
-
-(* constant 6874 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10299_t1 ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λi:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct nt) l_e_st_eq_landau_n_rt_rp_r_c_1t.(l_e_st_eq_landau_n_rt_rp_r_c_isnint (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) l_e_st_eq_landau_n_1 i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) l_e_st_eq_landau_n_1).
-
-(* constant 6875 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz299a ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_imp_th3 (l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct nt) l_e_st_eq_landau_n_rt_rp_r_c_1t) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ax3 (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) (λt:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct nt) l_e_st_eq_landau_n_rt_rp_r_c_1t.l_e_st_eq_landau_n_rt_rp_r_c_10299_t1 nt t) : l_not (l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct nt) l_e_st_eq_landau_n_rt_rp_r_c_1t)).
-
-(* constant 6876 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ax3t ≝ (λt:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_e_st_eq_landau_n_rt_rp_r_c_satz299a t : ∀t:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_not (l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct t) l_e_st_eq_landau_n_rt_rp_r_c_1t)).
-
-(* constant 6877 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10299_t2 ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λmt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λi:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct nt) (l_e_st_eq_landau_n_rt_rp_r_c_suct mt).(l_e_st_eq_landau_n_rt_rp_r_c_isnint (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt mt)) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt mt))).
-
-(* constant 6878 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10299_t3 ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λmt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λi:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct nt) (l_e_st_eq_landau_n_rt_rp_r_c_suct mt).(l_e_st_eq_landau_n_ax4 (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_nofnt mt) (l_e_st_eq_landau_n_rt_rp_r_c_10299_t2 nt mt i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_nofnt mt)).
-
-(* constant 6879 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz299b ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λmt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λi:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct nt) (l_e_st_eq_landau_n_rt_rp_r_c_suct mt).(l_e_st_eq_landau_n_rt_rp_r_c_isntin nt mt (l_e_st_eq_landau_n_rt_rp_r_c_10299_t3 nt mt i) : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt nt mt).
-
-(* constant 6880 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ax4t ≝ (λt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λu:l_e_st_eq_landau_n_rt_rp_r_c_natt.λv:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct t) (l_e_st_eq_landau_n_rt_rp_r_c_suct u).l_e_st_eq_landau_n_rt_rp_r_c_satz299b t u v : ∀t:l_e_st_eq_landau_n_rt_rp_r_c_natt.∀u:l_e_st_eq_landau_n_rt_rp_r_c_natt.∀v:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct t) (l_e_st_eq_landau_n_rt_rp_r_c_suct u).l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt t u).
-
-(* constant 6881 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_cond1t ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt l_e_st_eq_landau_n_rt_rp_r_c_1t s : Prop).
-
-(* constant 6882 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_cond2t ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_all l_e_st_eq_landau_n_rt_rp_r_c_natt (λt:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_imp (l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt t s) (l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct t) s)) : Prop).
-
-(* constant 6883 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10299_prop1 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.λc1:l_e_st_eq_landau_n_rt_rp_r_c_cond1t s.λc2:l_e_st_eq_landau_n_rt_rp_r_c_cond2t s.λn:l_e_st_eq_landau_n_nat.(l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n) s : Prop).
-
-(* constant 6884 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10299_t4 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.λc1:l_e_st_eq_landau_n_rt_rp_r_c_cond1t s.λc2:l_e_st_eq_landau_n_rt_rp_r_c_cond2t s.(c1 : l_e_st_eq_landau_n_rt_rp_r_c_10299_prop1 s c1 c2 l_e_st_eq_landau_n_1).
-
-(* constant 6885 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10299_t5 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.λc1:l_e_st_eq_landau_n_rt_rp_r_c_cond1t s.λc2:l_e_st_eq_landau_n_rt_rp_r_c_cond2t s.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_10299_prop1 s c1 c2 n.(c2 (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n) p : l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n)))) s).
-
-(* constant 6886 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10299_t6 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.λc1:l_e_st_eq_landau_n_rt_rp_r_c_cond1t s.λc2:l_e_st_eq_landau_n_rt_rp_r_c_cond2t s.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_10299_prop1 s c1 c2 n.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn (l_e_st_eq_landau_n_suc t)) s) (l_e_st_eq_landau_n_rt_rp_r_c_nofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n)) n (l_e_st_eq_landau_n_rt_rp_r_c_10299_t5 s c1 c2 n p) (l_e_st_eq_landau_n_rt_rp_r_c_isnnt2 n) : l_e_st_eq_landau_n_rt_rp_r_c_10299_prop1 s c1 c2 (l_e_st_eq_landau_n_suc n)).
-
-(* constant 6887 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10299_t7 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.λc1:l_e_st_eq_landau_n_rt_rp_r_c_cond1t s.λc2:l_e_st_eq_landau_n_rt_rp_r_c_cond2t s.λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_10299_prop1 s c1 c2 t) (l_e_st_eq_landau_n_rt_rp_r_c_10299_t4 s c1 c2) (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_rp_r_c_10299_prop1 s c1 c2 t.l_e_st_eq_landau_n_rt_rp_r_c_10299_t6 s c1 c2 t u) (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt) : l_e_st_eq_landau_n_rt_rp_r_c_10299_prop1 s c1 c2 (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)).
-
-(* constant 6888 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz299c ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.λc1:l_e_st_eq_landau_n_rt_rp_r_c_cond1t s.λc2:l_e_st_eq_landau_n_rt_rp_r_c_cond2t s.(λt:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_e_isp l_e_st_eq_landau_n_rt_rp_r_c_natt (λu:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt u s) (l_e_st_eq_landau_n_rt_rp_r_c_ntofn (l_e_st_eq_landau_n_rt_rp_r_c_nofnt t)) t (l_e_st_eq_landau_n_rt_rp_r_c_10299_t7 s c1 c2 t) (l_e_st_eq_landau_n_rt_rp_r_c_isntn2 t) : ∀t:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt t s).
-
-(* constant 6889 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ax5t ≝ (λt:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.λu:l_e_st_eq_landau_n_rt_rp_r_c_cond1t t.λv:l_e_st_eq_landau_n_rt_rp_r_c_cond2t t.l_e_st_eq_landau_n_rt_rp_r_c_satz299c t u v : ∀t:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.∀u:l_e_st_eq_landau_n_rt_rp_r_c_cond1t t.∀v:l_e_st_eq_landau_n_rt_rp_r_c_cond2t t.∀w:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt w t).
-
-(* constant 6890 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ic ≝ (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 6891 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10300_t1 ≝ (l_e_st_eq_landau_n_rt_rp_r_c_tsis12a l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_ic l_e_st_eq_landau_n_rt_rp_r_c_ic) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0)))).
-
-(* constant 6892 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10300_t2 ≝ (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl01 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_satz195 l_e_st_eq_landau_n_rt_rp_r_1rl)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)).
-
-(* constant 6893 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10300_t3 ≝ (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl01 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ts02 l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6894 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10300_t4 ≝ (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0)) l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_c_10300_t2 l_e_st_eq_landau_n_rt_rp_r_c_10300_t3 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl))).
-
-(* constant 6895 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10300_t5 ≝ (l_e_st_eq_landau_n_rt_rp_r_c_satz298j l_e_st_eq_landau_n_rt_rp_r_1rl : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c)).
-
-(* constant 6896 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz2300 ≝ (l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_ic l_e_st_eq_landau_n_rt_rp_r_c_ic) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c) l_e_st_eq_landau_n_rt_rp_r_c_10300_t1 l_e_st_eq_landau_n_rt_rp_r_c_10300_t4 l_e_st_eq_landau_n_rt_rp_r_c_10300_t5 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_ic l_e_st_eq_landau_n_rt_rp_r_c_ic) (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c)).
-
-(* constant 6897 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_tsis12a s l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)))).
-
-(* constant 6898 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl01 (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ts02 s l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_satz176b (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6899 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_1rl) s (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_satz195 s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) s).
-
-(* constant 6900 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) s (l_e_st_eq_landau_n_rt_rp_r_c_10301_t2 r s) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t3 r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 s)).
-
-(* constant 6901 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 s) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t1 r s) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t4 r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic) (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 s)).
-
-(* constant 6902 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic) (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 s) (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t5 r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 s))).
-
-(* constant 6903 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_plis12a r l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 s : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 s))).
-
-(* constant 6904 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_0) r (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 s) s (l_e_st_eq_landau_n_rt_rp_r_pl02 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 s (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)).
-
-(* constant 6905 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz301a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t6 r s) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t7 r s) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t8 r s) : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)).
-
-(* constant 6906 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz301b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) (l_e_st_eq_landau_n_rt_rp_r_c_satz301a r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic))).
-
-(* constant 6907 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz301c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_ispli x) (l_e_st_eq_landau_n_rt_rp_r_c_satz301b (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_c_ic))).
-
-(* constant 6908 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz301d ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_satz301c x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_c_ic)) x).
-
-(* constant 6909 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl u) l_e_st_eq_landau_n_rt_rp_r_c_ic)).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl u) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pli t u) (l_e_st_eq_landau_n_rt_rp_r_c_satz301b r s) i (l_e_st_eq_landau_n_rt_rp_r_c_satz301a t u) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) (l_e_st_eq_landau_n_rt_rp_r_c_pli t u)).
-
-(* constant 6910 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz301e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl u) l_e_st_eq_landau_n_rt_rp_r_c_ic)).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli t u)) t (l_e_st_eq_landau_n_rt_rp_r_c_isre r s) (l_e_st_eq_landau_n_rt_rp_r_c_iscere (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) (l_e_st_eq_landau_n_rt_rp_r_c_pli t u) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t9 r s t u i)) (l_e_st_eq_landau_n_rt_rp_r_c_reis t u) : l_e_st_eq_landau_n_rt_rp_r_is r t).
-
-(* constant 6911 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz301f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl u) l_e_st_eq_landau_n_rt_rp_r_c_ic)).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real s (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli t u)) u (l_e_st_eq_landau_n_rt_rp_r_c_isim r s) (l_e_st_eq_landau_n_rt_rp_r_c_isceim (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) (l_e_st_eq_landau_n_rt_rp_r_c_pli t u) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t9 r s t u i)) (l_e_st_eq_landau_n_rt_rp_r_c_imis t u) : l_e_st_eq_landau_n_rt_rp_r_is s u).
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "basics/pts.ma".
-
-(* constant 1 *)
-definition l_imp ≝ λa:Prop.λb:Prop.(∀x:a.b : Prop).
-
-(* constant 2 *)
-definition l_mp ≝ λa:Prop.λb:Prop.λa1:a.λi:l_imp a b.(i a1 : b).
-
-(* constant 3 *)
-definition l_refimp ≝ λa:Prop.(λx:a.x : l_imp a a).
-
-(* constant 4 *)
-definition l_trimp ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_imp a b.λj:l_imp b c.(λx:a.j (i x) : l_imp a c).
-
-(* constant 5 *)
-axiom l_con : Prop.
-
-(* constant 6 *)
-definition l_not ≝ λa:Prop.(l_imp a l_con : Prop).
-
-(* constant 7 *)
-definition l_wel ≝ λa:Prop.(l_not (l_not a) : Prop).
-
-(* constant 8 *)
-definition l_weli ≝ λa:Prop.λa1:a.(λx:l_not a.x a1 : l_wel a).
-
-(* constant 9 *)
-axiom l_et : ∀a:Prop.∀w:l_wel a.a.
-
-(* constant 10 *)
-definition l_cone ≝ λa:Prop.λc1:l_con.(l_et a (λx:l_not a.c1) : a).
-
-(* constant 11 *)
-definition l_imp_th1 ≝ λa:Prop.λb:Prop.λi:l_imp a b.λj:l_imp (l_not a) b.(l_et b (λx:l_not b.x (j (l_trimp a b l_con i x))) : b).
-
-(* constant 12 *)
-definition l_imp_th2 ≝ λa:Prop.λb:Prop.λn:l_not a.(l_trimp a l_con b n (λx:l_con.l_cone b x) : l_imp a b).
-
-(* constant 13 *)
-definition l_imp_th3 ≝ λa:Prop.λb:Prop.λn:l_not b.λi:l_imp a b.(l_trimp a b l_con i n : l_not a).
-
-(* constant 14 *)
-definition l_imp_th4 ≝ λa:Prop.λb:Prop.λa1:a.λn:l_not b.(λx:l_imp a b.l_imp_th3 a b n x a1 : l_not (l_imp a b)).
-
-(* constant 15 *)
-definition l_imp_th5 ≝ λa:Prop.λb:Prop.λn:l_not (l_imp a b).(l_et a (λx:l_not a.n (l_imp_th2 a b x)) : a).
-
-(* constant 16 *)
-definition l_imp_th6 ≝ λa:Prop.λb:Prop.λn:l_not (l_imp a b).(λx:b.n (λy:a.x) : l_not b).
-
-(* constant 17 *)
-definition l_imp_th7 ≝ λa:Prop.λb:Prop.λn:l_not b.λi:l_imp (l_not a) b.(l_et a (l_imp_th3 (l_not a) b n i) : a).
-
-(* constant 18 *)
-definition l_cp ≝ λa:Prop.λb:Prop.λi:l_imp (l_not b) (l_not a).(λx:a.l_imp_th7 b (l_not a) (l_weli a x) i : l_imp a b).
-
-(* constant 19 *)
-definition l_obvious ≝ (l_imp l_con l_con : Prop).
-
-(* constant 20 *)
-definition l_obviousi ≝ (l_refimp l_con : l_obvious).
-
-(* constant 21 *)
-definition l_ec ≝ λa:Prop.λb:Prop.(l_imp a (l_not b) : Prop).
-
-(* constant 22 *)
-definition l_eci1 ≝ λa:Prop.λb:Prop.λn:l_not a.(l_imp_th2 a (l_not b) n : l_ec a b).
-
-(* constant 23 *)
-definition l_eci2 ≝ λa:Prop.λb:Prop.λn:l_not b.(λx:a.n : l_ec a b).
-
-(* constant 24 *)
-definition l_ec_th1 ≝ λa:Prop.λb:Prop.λi:l_imp a (l_not b).(i : l_ec a b).
-
-(* constant 25 *)
-definition l_ec_th2 ≝ λa:Prop.λb:Prop.λi:l_imp b (l_not a).(λx:a.λy:b.i y x : l_ec a b).
-
-(* constant 26 *)
-definition l_comec ≝ λa:Prop.λb:Prop.λe:l_ec a b.(l_ec_th2 b a e : l_ec b a).
-
-(* constant 27 *)
-definition l_ece1 ≝ λa:Prop.λb:Prop.λe:l_ec a b.λa1:a.(e a1 : l_not b).
-
-(* constant 28 *)
-definition l_ece2 ≝ λa:Prop.λb:Prop.λe:l_ec a b.λb1:b.(l_imp_th3 a (l_not b) (l_weli b b1) e : l_not a).
-
-(* constant 29 *)
-definition l_ec_th3 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec a b.λi:l_imp c a.(l_trimp c a (l_not b) i e : l_ec c b).
-
-(* constant 30 *)
-definition l_ec_th4 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec a b.λi:l_imp c b.(l_comec c a (l_ec_th3 b a c (l_comec a b e) i) : l_ec a c).
-
-(* constant 31 *)
-definition l_and ≝ λa:Prop.λb:Prop.(l_not (l_ec a b) : Prop).
-
-(* constant 32 *)
-definition l_andi ≝ λa:Prop.λb:Prop.λa1:a.λb1:b.(l_imp_th4 a (l_not b) a1 (l_weli b b1) : l_and a b).
-
-(* constant 33 *)
-definition l_ande1 ≝ λa:Prop.λb:Prop.λa1:l_and a b.(l_imp_th5 a (l_not b) a1 : a).
-
-(* constant 34 *)
-definition l_ande2 ≝ λa:Prop.λb:Prop.λa1:l_and a b.(l_et b (l_imp_th6 a (l_not b) a1) : b).
-
-(* constant 35 *)
-definition l_comand ≝ λa:Prop.λb:Prop.λa1:l_and a b.(l_andi b a (l_ande2 a b a1) (l_ande1 a b a1) : l_and b a).
-
-(* constant 36 *)
-definition l_and_th1 ≝ λa:Prop.λb:Prop.λn:l_not a.(l_weli (l_ec a b) (l_eci1 a b n) : l_not (l_and a b)).
-
-(* constant 37 *)
-definition l_and_th2 ≝ λa:Prop.λb:Prop.λn:l_not b.(l_weli (l_ec a b) (l_eci2 a b n) : l_not (l_and a b)).
-
-(* constant 38 *)
-definition l_and_th3 ≝ λa:Prop.λb:Prop.λn:l_not (l_and a b).λa1:a.(l_ece1 a b (l_et (l_ec a b) n) a1 : l_not b).
-
-(* constant 39 *)
-definition l_and_th4 ≝ λa:Prop.λb:Prop.λn:l_not (l_and a b).λb1:b.(l_ece2 a b (l_et (l_ec a b) n) b1 : l_not a).
-
-(* constant 40 *)
-definition l_and_th5 ≝ λa:Prop.λb:Prop.λn:l_not (l_and a b).(l_imp_th3 (l_and b a) (l_and a b) n (λx:l_and b a.l_comand b a x) : l_not (l_and b a)).
-
-(* constant 41 *)
-definition l_and_th6 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and a b.λi:l_imp a c.(l_andi c b (i (l_ande1 a b a1)) (l_ande2 a b a1) : l_and c b).
-
-(* constant 42 *)
-definition l_and_th7 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and a b.λi:l_imp b c.(l_andi a c (l_ande1 a b a1) (i (l_ande2 a b a1)) : l_and a c).
-
-(* constant 43 *)
-definition l_or ≝ λa:Prop.λb:Prop.(l_imp (l_not a) b : Prop).
-
-(* constant 44 *)
-definition l_ori1 ≝ λa:Prop.λb:Prop.λa1:a.(l_imp_th2 (l_not a) b (l_weli a a1) : l_or a b).
-
-(* constant 45 *)
-definition l_ori2 ≝ λa:Prop.λb:Prop.λb1:b.(λx:l_not a.b1 : l_or a b).
-
-(* constant 46 *)
-definition l_or_th1 ≝ λa:Prop.λb:Prop.λi:l_imp (l_not a) b.(i : l_or a b).
-
-(* constant 47 *)
-definition l_or_th2 ≝ λa:Prop.λb:Prop.λi:l_imp (l_not b) a.(λx:l_not a.l_et b (l_imp_th3 (l_not b) a x i) : l_or a b).
-
-(* constant 48 *)
-definition l_ore2 ≝ λa:Prop.λb:Prop.λo:l_or a b.λn:l_not a.(o n : b).
-
-(* constant 49 *)
-definition l_ore1 ≝ λa:Prop.λb:Prop.λo:l_or a b.λn:l_not b.(l_et a (l_imp_th3 (l_not a) b n o) : a).
-
-(* constant 50 *)
-definition l_comor ≝ λa:Prop.λb:Prop.λo:l_or a b.(λx:l_not b.l_ore1 a b o x : l_or b a).
-
-(* constant 51 *)
-definition l_or_th3 ≝ λa:Prop.λb:Prop.λn:l_not a.λm:l_not b.(l_imp_th4 (l_not a) b n m : l_not (l_or a b)).
-
-(* constant 52 *)
-definition l_or_th4 ≝ λa:Prop.λb:Prop.λn:l_not (l_or a b).(l_imp_th5 (l_not a) b n : l_not a).
-
-(* constant 53 *)
-definition l_or_th5 ≝ λa:Prop.λb:Prop.λn:l_not (l_or a b).(l_imp_th6 (l_not a) b n : l_not b).
-
-(* constant 54 *)
-definition l_or_th6 ≝ λa:Prop.(l_refimp (l_not a) : l_or a (l_not a)).
-
-(* constant 55 *)
-definition l_orapp ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or a b.λi:l_imp a c.λj:l_imp b c.(l_imp_th1 a c i (l_trimp (l_not a) b c o j) : c).
-
-(* constant 56 *)
-definition l_or_th7 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or a b.λi:l_imp a c.(l_trimp (l_not c) (l_not a) b (λx:l_not c.l_imp_th3 a c x i) o : l_or c b).
-
-(* constant 57 *)
-definition l_or_th8 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or a b.λi:l_imp b c.(l_trimp (l_not a) b c o i : l_or a c).
-
-(* constant 58 *)
-definition l_or_th9 ≝ λa:Prop.λb:Prop.λc:Prop.λd:Prop.λo:l_or a b.λi:l_imp a c.λj:l_imp b d.(l_or_th7 a d c (l_or_th8 a b d o j) i : l_or c d).
-
-(* constant 59 *)
-definition l_or_th10 ≝ λa:Prop.λb:Prop.λo:l_or a b.(o : l_imp (l_not a) b).
-
-(* constant 60 *)
-definition l_or_th11 ≝ λa:Prop.λb:Prop.λo:l_or a b.(l_comor a b o : l_imp (l_not b) a).
-
-(* constant 61 *)
-definition l_or_th12 ≝ λa:Prop.λb:Prop.λo:l_or (l_not a) b.(l_trimp a (l_wel a) b (λx:a.l_weli a x) o : l_imp a b).
-
-(* constant 62 *)
-definition l_or_th13 ≝ λa:Prop.λb:Prop.λi:l_imp a b.(l_trimp (l_wel a) a b (λx:l_wel a.l_et a x) i : l_or (l_not a) b).
-
-(* constant 63 *)
-definition l_or_th14 ≝ λa:Prop.λb:Prop.λo:l_or (l_not a) (l_not b).(l_weli (l_ec a b) (l_or_th12 a (l_not b) o) : l_not (l_and a b)).
-
-(* constant 64 *)
-definition l_or_th15 ≝ λa:Prop.λb:Prop.λn:l_not (l_and a b).(l_or_th13 a (l_not b) (l_et (l_ec a b) n) : l_or (l_not a) (l_not b)).
-
-(* constant 65 *)
-definition l_or_th16 ≝ λa:Prop.λb:Prop.λa1:l_and (l_not a) (l_not b).(l_or_th3 a b (l_ande1 (l_not a) (l_not b) a1) (l_ande2 (l_not a) (l_not b) a1) : l_not (l_or a b)).
-
-(* constant 66 *)
-definition l_or_th17 ≝ λa:Prop.λb:Prop.λn:l_not (l_or a b).(l_andi (l_not a) (l_not b) (l_or_th4 a b n) (l_or_th5 a b n) : l_and (l_not a) (l_not b)).
-
-(* constant 67 *)
-definition l_orec ≝ λa:Prop.λb:Prop.(l_and (l_or a b) (l_ec a b) : Prop).
-
-(* constant 68 *)
-definition l_oreci ≝ λa:Prop.λb:Prop.λo:l_or a b.λe:l_ec a b.(l_andi (l_or a b) (l_ec a b) o e : l_orec a b).
-
-(* constant 69 *)
-definition l_orec_th1 ≝ λa:Prop.λb:Prop.λa1:a.λn:l_not b.(l_oreci a b (l_ori1 a b a1) (l_eci2 a b n) : l_orec a b).
-
-(* constant 70 *)
-definition l_orec_th2 ≝ λa:Prop.λb:Prop.λn:l_not a.λb1:b.(l_oreci a b (l_ori2 a b b1) (l_eci1 a b n) : l_orec a b).
-
-(* constant 71 *)
-definition l_orece1 ≝ λa:Prop.λb:Prop.λo:l_orec a b.(l_ande1 (l_or a b) (l_ec a b) o : l_or a b).
-
-(* constant 72 *)
-definition l_orece2 ≝ λa:Prop.λb:Prop.λo:l_orec a b.(l_ande2 (l_or a b) (l_ec a b) o : l_ec a b).
-
-(* constant 73 *)
-definition l_comorec ≝ λa:Prop.λb:Prop.λo:l_orec a b.(l_oreci b a (l_comor a b (l_orece1 a b o)) (l_comec a b (l_orece2 a b o)) : l_orec b a).
-
-(* constant 74 *)
-definition l_orec_th3 ≝ λa:Prop.λb:Prop.λo:l_orec a b.λa1:a.(l_ece1 a b (l_orece2 a b o) a1 : l_not b).
-
-(* constant 75 *)
-definition l_orec_th4 ≝ λa:Prop.λb:Prop.λo:l_orec a b.λb1:b.(l_ece2 a b (l_orece2 a b o) b1 : l_not a).
-
-(* constant 76 *)
-definition l_orec_th5 ≝ λa:Prop.λb:Prop.λo:l_orec a b.λn:l_not a.(l_ore2 a b (l_orece1 a b o) n : b).
-
-(* constant 77 *)
-definition l_orec_th6 ≝ λa:Prop.λb:Prop.λo:l_orec a b.λn:l_not b.(l_ore1 a b (l_orece1 a b o) n : a).
-
-(* constant 78 *)
-definition l_iff ≝ λa:Prop.λb:Prop.(l_and (l_imp a b) (l_imp b a) : Prop).
-
-(* constant 79 *)
-definition l_iffi ≝ λa:Prop.λb:Prop.λi:l_imp a b.λj:l_imp b a.(l_andi (l_imp a b) (l_imp b a) i j : l_iff a b).
-
-(* constant 80 *)
-definition l_iff_th1 ≝ λa:Prop.λb:Prop.λa1:a.λb1:b.(l_iffi a b (λx:a.b1) (λx:b.a1) : l_iff a b).
-
-(* constant 81 *)
-definition l_iff_th2 ≝ λa:Prop.λb:Prop.λn:l_not a.λm:l_not b.(l_iffi a b (l_imp_th2 a b n) (l_imp_th2 b a m) : l_iff a b).
-
-(* constant 82 *)
-definition l_iffe1 ≝ λa:Prop.λb:Prop.λi:l_iff a b.(l_ande1 (l_imp a b) (l_imp b a) i : l_imp a b).
-
-(* constant 83 *)
-definition l_iffe2 ≝ λa:Prop.λb:Prop.λi:l_iff a b.(l_ande2 (l_imp a b) (l_imp b a) i : l_imp b a).
-
-(* constant 84 *)
-definition l_comiff ≝ λa:Prop.λb:Prop.λi:l_iff a b.(l_iffi b a (l_iffe2 a b i) (l_iffe1 a b i) : l_iff b a).
-
-(* constant 85 *)
-definition l_iff_th3 ≝ λa:Prop.λb:Prop.λi:l_iff a b.λa1:a.(l_iffe1 a b i a1 : b).
-
-(* constant 86 *)
-definition l_iff_th4 ≝ λa:Prop.λb:Prop.λi:l_iff a b.λb1:b.(l_iffe2 a b i b1 : a).
-
-(* constant 87 *)
-definition l_iff_th5 ≝ λa:Prop.λb:Prop.λi:l_iff a b.λn:l_not a.(l_imp_th3 b a n (l_iffe2 a b i) : l_not b).
-
-(* constant 88 *)
-definition l_iff_th6 ≝ λa:Prop.λb:Prop.λi:l_iff a b.λn:l_not b.(l_imp_th3 a b n (l_iffe1 a b i) : l_not a).
-
-(* constant 89 *)
-definition l_iff_th7 ≝ λa:Prop.λb:Prop.λa1:a.λn:l_not b.(l_and_th1 (l_imp a b) (l_imp b a) (l_imp_th4 a b a1 n) : l_not (l_iff a b)).
-
-(* constant 90 *)
-definition l_iff_th8 ≝ λa:Prop.λb:Prop.λn:l_not a.λb1:b.(l_and_th2 (l_imp a b) (l_imp b a) (l_imp_th4 b a b1 n) : l_not (l_iff a b)).
-
-(* constant 91 *)
-definition l_refiff ≝ λa:Prop.(l_iffi a a (l_refimp a) (l_refimp a) : l_iff a a).
-
-(* constant 92 *)
-definition l_symiff ≝ λa:Prop.λb:Prop.λi:l_iff a b.(l_comiff a b i : l_iff b a).
-
-(* constant 93 *)
-definition l_triff ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λj:l_iff b c.(l_iffi a c (l_trimp a b c (l_iffe1 a b i) (l_iffe1 b c j)) (l_trimp c b a (l_iffe2 b c j) (l_iffe2 a b i)) : l_iff a c).
-
-(* constant 94 *)
-definition l_iff_th9 ≝ λa:Prop.λb:Prop.λi:l_iff a b.(λx:l_not a.l_iff_th5 a b i x : l_imp (l_not a) (l_not b)).
-
-(* constant 95 *)
-definition l_iff_th10 ≝ λa:Prop.λb:Prop.λi:l_iff a b.(λx:l_not b.l_iff_th6 a b i x : l_imp (l_not b) (l_not a)).
-
-(* constant 96 *)
-definition l_iff_th11 ≝ λa:Prop.λb:Prop.λi:l_iff a b.(l_iffi (l_not a) (l_not b) (l_iff_th9 a b i) (l_iff_th10 a b i) : l_iff (l_not a) (l_not b)).
-
-(* constant 97 *)
-definition l_iff_th12 ≝ λa:Prop.λb:Prop.λi:l_imp (l_not a) (l_not b).λj:l_imp (l_not b) (l_not a).(l_iffi a b (l_cp a b j) (l_cp b a i) : l_iff a b).
-
-(* constant 98 *)
-definition l_iff_th13 ≝ λa:Prop.λb:Prop.λo:l_orec a b.(l_iffi a (l_not b) (l_orece2 a b o) (l_comor a b (l_orece1 a b o)) : l_iff a (l_not b)).
-
-(* constant 99 *)
-definition l_iff_th14 ≝ λa:Prop.λb:Prop.λo:l_orec a b.(l_iff_th13 b a (l_comorec a b o) : l_iff b (l_not a)).
-
-(* constant 100 *)
-definition l_iff_th15 ≝ λa:Prop.λb:Prop.λi:l_iff a (l_not b).(l_oreci a b (l_comor b a (l_iffe2 a (l_not b) i)) (l_iffe1 a (l_not b) i) : l_orec a b).
-
-(* constant 101 *)
-definition l_iff_th16 ≝ λa:Prop.λb:Prop.λi:l_iff b (l_not a).(l_comorec b a (l_iff_th15 b a i) : l_orec a b).
-
-(* constant 102 *)
-definition l_iff_thimp1 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λj:l_imp a c.(l_trimp b a c (l_iffe2 a b i) j : l_imp b c).
-
-(* constant 103 *)
-definition l_iff_thimp2 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λj:l_imp c a.(l_trimp c a b j (l_iffe1 a b i) : l_imp c b).
-
-(* constant 104 *)
-definition l_iff_thec1 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λe:l_ec a c.(l_ec_th3 a c b e (l_iffe2 a b i) : l_ec b c).
-
-(* constant 105 *)
-definition l_iff_thec2 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λe:l_ec c a.(l_ec_th4 c a b e (l_iffe2 a b i) : l_ec c b).
-
-(* constant 106 *)
-definition l_iff_thand1 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λa1:l_and a c.(l_and_th6 a c b a1 (l_iffe1 a b i) : l_and b c).
-
-(* constant 107 *)
-definition l_iff_thand2 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λa1:l_and c a.(l_and_th7 c a b a1 (l_iffe1 a b i) : l_and c b).
-
-(* constant 108 *)
-definition l_iff_thor1 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λo:l_or a c.(l_or_th7 a c b o (l_iffe1 a b i) : l_or b c).
-
-(* constant 109 *)
-definition l_iff_thor2 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λo:l_or c a.(l_or_th8 c a b o (l_iffe1 a b i) : l_or c b).
-
-(* constant 110 *)
-definition l_iff_thorec1 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λo:l_orec a c.(l_oreci b c (l_iff_thor1 a b c i (l_orece1 a c o)) (l_iff_thec1 a b c i (l_orece2 a c o)) : l_orec b c).
-
-(* constant 111 *)
-definition l_iff_thorec2 ≝ λa:Prop.λb:Prop.λc:Prop.λi:l_iff a b.λo:l_orec c a.(l_oreci c b (l_iff_thor2 a b c i (l_orece1 c a o)) (l_iff_thec2 a b c i (l_orece2 c a o)) : l_orec c b).
-
-(* constant 112 *)
-definition l_all ≝ λsigma:Type[0].λp:∀x:sigma.Prop.(∀x:sigma.p x : Prop).
-
-(* constant 113 *)
-definition l_alle ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λa1:l_all sigma p.λs:sigma.(a1 s : p s).
-
-(* constant 114 *)
-definition l_all_th1 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:sigma.λn:l_not (p s).(λx:l_all sigma p.n (x s) : l_not (l_all sigma p)).
-
-(* constant 115 *)
-definition l_non ≝ λsigma:Type[0].λp:∀x:sigma.Prop.(λx:sigma.l_not (p x) : ∀x:sigma.Prop).
-
-(* constant 116 *)
-definition l_none ≝ λsigma:Type[0].λp:∀x:sigma.Prop.(l_all sigma (l_non sigma p) : Prop).
-
-(* constant 117 *)
-definition l_some ≝ λsigma:Type[0].λp:∀x:sigma.Prop.(l_not (l_none sigma p) : Prop).
-
-(* constant 118 *)
-definition l_somei ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:sigma.λsp:p s.(l_all_th1 sigma (l_non sigma p) s (l_weli (p s) sp) : l_some sigma p).
-
-(* constant 119 *)
-definition l_some_t1 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λn:l_not (l_all sigma p).λm:l_none sigma (l_non sigma p).λs:sigma.(l_et (p s) (m s) : p s).
-
-(* constant 120 *)
-definition l_some_t2 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λn:l_not (l_all sigma p).λm:l_none sigma (l_non sigma p).(n (λx:sigma.l_some_t1 sigma p n m x) : l_con).
-
-(* constant 121 *)
-definition l_some_th1 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λn:l_not (l_all sigma p).(λx:l_none sigma (l_non sigma p).l_some_t2 sigma p n x : l_some sigma (l_non sigma p)).
-
-(* constant 122 *)
-definition l_some_t3 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:l_some sigma (l_non sigma p).λa1:l_all sigma p.λt:sigma.(l_weli (p t) (a1 t) : l_not (l_not (p t))).
-
-(* constant 123 *)
-definition l_some_t4 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:l_some sigma (l_non sigma p).λa1:l_all sigma p.(s (λx:sigma.l_some_t3 sigma p s a1 x) : l_con).
-
-(* constant 124 *)
-definition l_some_th2 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:l_some sigma (l_non sigma p).(λx:l_all sigma p.l_some_t4 sigma p s x : l_not (l_all sigma p)).
-
-(* constant 125 *)
-definition l_some_th3 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λn:l_not (l_some sigma p).(l_et (l_none sigma p) n : l_none sigma p).
-
-(* constant 126 *)
-definition l_some_th4 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λn:l_not (l_some sigma p).λs:sigma.(l_some_th3 sigma p n s : l_not (p s)).
-
-(* constant 127 *)
-definition l_some_th5 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λn:l_none sigma p.(l_weli (l_none sigma p) n : l_not (l_some sigma p)).
-
-(* constant 128 *)
-definition l_some_t5 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:l_some sigma p.λx:Prop.λi:∀y:sigma.l_imp (p y) x.λn:l_not x.λt:sigma.(l_imp_th3 (p t) x n (i t) : l_not (p t)).
-
-(* constant 129 *)
-definition l_some_t6 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:l_some sigma p.λx:Prop.λi:∀y:sigma.l_imp (p y) x.λn:l_not x.(l_mp (l_some sigma p) l_con s (l_some_th5 sigma p (λy:sigma.l_some_t5 sigma p s x i n y)) : l_con).
-
-(* constant 130 *)
-definition l_someapp ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:l_some sigma p.λx:Prop.λi:∀y:sigma.l_imp (p y) x.(l_et x (λy:l_not x.l_some_t6 sigma p s x i y) : x).
-
-(* constant 131 *)
-definition l_some_th6 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λq:∀x:sigma.Prop.λs:l_some sigma p.λi:∀x:sigma.l_imp (p x) (q x).(l_someapp sigma p s (l_some sigma q) (λx:sigma.λy:p x.l_somei sigma q x (l_mp (p x) (q x) y (i x))) : l_some sigma q).
-
-(* constant 132 *)
-definition l_or3 ≝ λa:Prop.λb:Prop.λc:Prop.(l_or a (l_or b c) : Prop).
-
-(* constant 133 *)
-definition l_or3_th1 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.λn:l_not a.(l_ore2 a (l_or b c) o n : l_or b c).
-
-(* constant 134 *)
-definition l_or3e3 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.λn:l_not a.λm:l_not b.(l_ore2 b c (l_or3_th1 a b c o n) m : c).
-
-(* constant 135 *)
-definition l_or3_th2 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.λn:l_not b.(l_or_th2 c a (λx:l_not a.l_or3e3 a b c o x n) : l_or c a).
-
-(* constant 136 *)
-definition l_or3e1 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.λn:l_not b.λm:l_not c.(l_ore2 c a (l_or3_th2 a b c o n) m : a).
-
-(* constant 137 *)
-definition l_or3_th3 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.λn:l_not c.(l_or_th2 a b (λx:l_not b.l_or3e1 a b c o x n) : l_or a b).
-
-(* constant 138 *)
-definition l_or3e2 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.λn:l_not c.λm:l_not a.(l_ore2 a b (l_or3_th3 a b c o n) m : b).
-
-(* constant 139 *)
-definition l_or3_th4 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.(l_or_th1 b (l_or c a) (λx:l_not b.l_or3_th2 a b c o x) : l_or3 b c a).
-
-(* constant 140 *)
-definition l_or3_th5 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.(l_or3_th4 b c a (l_or3_th4 a b c o) : l_or3 c a b).
-
-(* constant 141 *)
-definition l_or3i1 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:a.(l_ori1 a (l_or b c) a1 : l_or3 a b c).
-
-(* constant 142 *)
-definition l_or3i2 ≝ λa:Prop.λb:Prop.λc:Prop.λb1:b.(l_ori2 a (l_or b c) (l_ori1 b c b1) : l_or3 a b c).
-
-(* constant 143 *)
-definition l_or3i3 ≝ λa:Prop.λb:Prop.λc:Prop.λc1:c.(l_ori2 a (l_or b c) (l_ori2 b c c1) : l_or3 a b c).
-
-(* constant 144 *)
-definition l_or3_th6 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or a b.(l_or3_th4 c a b (l_ori2 c (l_or a b) o) : l_or3 a b c).
-
-(* constant 145 *)
-definition l_or3_th7 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or b c.(l_ori2 a (l_or b c) o : l_or3 a b c).
-
-(* constant 146 *)
-definition l_or3_th8 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or c a.(l_or3_th4 c a b (l_or3_th6 c a b o) : l_or3 a b c).
-
-(* constant 147 *)
-definition l_or3app ≝ λa:Prop.λb:Prop.λc:Prop.λd:Prop.λo:l_or3 a b c.λi:l_imp a d.λj:l_imp b d.λk:l_imp c d.(l_orapp a (l_or b c) d o i (λx:l_or b c.l_orapp b c d x j k) : d).
-
-(* constant 148 *)
-definition l_and3 ≝ λa:Prop.λb:Prop.λc:Prop.(l_and a (l_and b c) : Prop).
-
-(* constant 149 *)
-definition l_and3e1 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_ande1 a (l_and b c) a1 : a).
-
-(* constant 150 *)
-definition l_and3e2 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_ande1 b c (l_ande2 a (l_and b c) a1) : b).
-
-(* constant 151 *)
-definition l_and3e3 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_ande2 b c (l_ande2 a (l_and b c) a1) : c).
-
-(* constant 152 *)
-definition l_and3i ≝ λa:Prop.λb:Prop.λc:Prop.λa1:a.λb1:b.λc1:c.(l_andi a (l_and b c) a1 (l_andi b c b1 c1) : l_and3 a b c).
-
-(* constant 153 *)
-definition l_and3_th1 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_and3i b c a (l_and3e2 a b c a1) (l_and3e3 a b c a1) (l_and3e1 a b c a1) : l_and3 b c a).
-
-(* constant 154 *)
-definition l_and3_th2 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_and3_th1 b c a (l_and3_th1 a b c a1) : l_and3 c a b).
-
-(* constant 155 *)
-definition l_and3_th3 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_andi a b (l_and3e1 a b c a1) (l_and3e2 a b c a1) : l_and a b).
-
-(* constant 156 *)
-definition l_and3_th4 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_ande2 a (l_and b c) a1 : l_and b c).
-
-(* constant 157 *)
-definition l_and3_th5 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_and3_th3 c a b (l_and3_th2 a b c a1) : l_and c a).
-
-(* constant 158 *)
-definition l_and3_th6 ≝ λa:Prop.λb:Prop.λc:Prop.λa1:l_and3 a b c.(l_and3i c b a (l_and3e3 a b c a1) (l_and3e2 a b c a1) (l_and3e1 a b c a1) : l_and3 c b a).
-
-(* constant 159 *)
-definition l_ec3 ≝ λa:Prop.λb:Prop.λc:Prop.(l_and3 (l_ec a b) (l_ec b c) (l_ec c a) : Prop).
-
-(* constant 160 *)
-definition l_ec3_th1 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.(l_and3e1 (l_ec a b) (l_ec b c) (l_ec c a) e : l_ec a b).
-
-(* constant 161 *)
-definition l_ec3_th2 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.(l_and3e2 (l_ec a b) (l_ec b c) (l_ec c a) e : l_ec b c).
-
-(* constant 162 *)
-definition l_ec3_th3 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.(l_and3e3 (l_ec a b) (l_ec b c) (l_ec c a) e : l_ec c a).
-
-(* constant 163 *)
-definition l_ec3_th4 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.(l_and3_th1 (l_ec a b) (l_ec b c) (l_ec c a) e : l_ec3 b c a).
-
-(* constant 164 *)
-definition l_ec3_th5 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.(l_ec3_th4 b c a (l_ec3_th4 a b c e) : l_ec3 c a b).
-
-(* constant 165 *)
-definition l_ec3_th5a ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.(l_and3i (l_ec c b) (l_ec b a) (l_ec a c) (l_comec b c (l_ec3_th2 a b c e)) (l_comec a b (l_ec3_th1 a b c e)) (l_comec c a (l_ec3_th3 a b c e)) : l_ec3 c b a).
-
-(* constant 166 *)
-definition l_ec3e12 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λa1:a.(l_ece1 a b (l_ec3_th1 a b c e) a1 : l_not b).
-
-(* constant 167 *)
-definition l_ec3e13 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λa1:a.(l_ece2 c a (l_ec3_th3 a b c e) a1 : l_not c).
-
-(* constant 168 *)
-definition l_ec3e23 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λb1:b.(l_ec3e12 b c a (l_ec3_th4 a b c e) b1 : l_not c).
-
-(* constant 169 *)
-definition l_ec3e21 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λb1:b.(l_ec3e13 b c a (l_ec3_th4 a b c e) b1 : l_not a).
-
-(* constant 170 *)
-definition l_ec3e31 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λc1:c.(l_ec3e12 c a b (l_ec3_th5 a b c e) c1 : l_not a).
-
-(* constant 171 *)
-definition l_ec3e32 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λc1:c.(l_ec3e13 c a b (l_ec3_th5 a b c e) c1 : l_not b).
-
-(* constant 172 *)
-definition l_ec3_th6 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec a b.λf:l_ec b c.λg:l_ec c a.(l_and3i (l_ec a b) (l_ec b c) (l_ec c a) e f g : l_ec3 a b c).
-
-(* constant 173 *)
-definition l_ec3_th7 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λo:l_or a b.(l_orapp a b (l_not c) o (λx:a.l_ece2 c a (l_ec3_th3 a b c e) x) (λx:b.l_ece1 b c (l_ec3_th2 a b c e) x) : l_not c).
-
-(* constant 174 *)
-definition l_ec3_th8 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λo:l_or b c.(l_ec3_th7 b c a (l_ec3_th4 a b c e) o : l_not a).
-
-(* constant 175 *)
-definition l_ec3_th9 ≝ λa:Prop.λb:Prop.λc:Prop.λe:l_ec3 a b c.λo:l_or c a.(l_ec3_th7 c a b (l_ec3_th5 a b c e) o : l_not b).
-
-(* constant 176 *)
-definition l_ec3i1 ≝ λa:Prop.λb:Prop.λc:Prop.λn:l_not a.λm:l_not b.(l_ec3_th6 a b c (l_eci1 a b n) (l_eci1 b c m) (l_eci2 c a n) : l_ec3 a b c).
-
-(* constant 177 *)
-definition l_ec3i2 ≝ λa:Prop.λb:Prop.λc:Prop.λn:l_not b.λm:l_not c.(l_ec3_th6 a b c (l_eci2 a b n) (l_eci1 b c n) (l_eci1 c a m) : l_ec3 a b c).
-
-(* constant 178 *)
-definition l_ec3i3 ≝ λa:Prop.λb:Prop.λc:Prop.λn:l_not c.λm:l_not a.(l_ec3_th6 a b c (l_eci1 a b m) (l_eci2 b c n) (l_eci1 c a n) : l_ec3 a b c).
-
-(* constant 179 *)
-definition l_ec3_t1 ≝ λa:Prop.λb:Prop.λc:Prop.λd:Prop.λe:Prop.λf:Prop.λo1:l_or3 a b c.λp1:l_ec3 d e f.λi:l_imp a d.λj:l_imp b e.λk:l_imp c f.λd1:d.(λx:b.l_mp e l_con (j x) (l_ec3e12 d e f p1 d1) : l_not b).
-
-(* constant 180 *)
-definition l_ec3_t2 ≝ λa:Prop.λb:Prop.λc:Prop.λd:Prop.λe:Prop.λf:Prop.λo1:l_or3 a b c.λp1:l_ec3 d e f.λi:l_imp a d.λj:l_imp b e.λk:l_imp c f.λd1:d.(λx:c.l_mp f l_con (k x) (l_ec3e13 d e f p1 d1) : l_not c).
-
-(* constant 181 *)
-definition l_ec3_th10 ≝ λa:Prop.λb:Prop.λc:Prop.λd:Prop.λe:Prop.λf:Prop.λo1:l_or3 a b c.λp1:l_ec3 d e f.λi:l_imp a d.λj:l_imp b e.λk:l_imp c f.λd1:d.(l_or3e1 a b c o1 (l_ec3_t1 a b c d e f o1 p1 i j k d1) (l_ec3_t2 a b c d e f o1 p1 i j k d1) : a).
-
-(* constant 182 *)
-definition l_ec3_th11 ≝ λa:Prop.λb:Prop.λc:Prop.λd:Prop.λe:Prop.λf:Prop.λo1:l_or3 a b c.λp1:l_ec3 d e f.λi:l_imp a d.λj:l_imp b e.λk:l_imp c f.λe1:e.(l_ec3_th10 b c a e f d (l_or3_th4 a b c o1) (l_ec3_th4 d e f p1) j k i e1 : b).
-
-(* constant 183 *)
-definition l_ec3_th12 ≝ λa:Prop.λb:Prop.λc:Prop.λd:Prop.λe:Prop.λf:Prop.λo1:l_or3 a b c.λp1:l_ec3 d e f.λi:l_imp a d.λj:l_imp b e.λk:l_imp c f.λf1:f.(l_ec3_th10 c a b f d e (l_or3_th5 a b c o1) (l_ec3_th5 d e f p1) k i j f1 : c).
-
-(* constant 184 *)
-definition l_orec3 ≝ λa:Prop.λb:Prop.λc:Prop.(l_and (l_or3 a b c) (l_ec3 a b c) : Prop).
-
-(* constant 185 *)
-definition l_orec3e1 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_orec3 a b c.(l_ande1 (l_or3 a b c) (l_ec3 a b c) o : l_or3 a b c).
-
-(* constant 186 *)
-definition l_orec3e2 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_orec3 a b c.(l_ande2 (l_or3 a b c) (l_ec3 a b c) o : l_ec3 a b c).
-
-(* constant 187 *)
-definition l_orec3i ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_or3 a b c.λe:l_ec3 a b c.(l_andi (l_or3 a b c) (l_ec3 a b c) o e : l_orec3 a b c).
-
-(* constant 188 *)
-definition l_orec3_th1 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_orec3 a b c.(l_orec3i b c a (l_or3_th4 a b c (l_orec3e1 a b c o)) (l_ec3_th4 a b c (l_orec3e2 a b c o)) : l_orec3 b c a).
-
-(* constant 189 *)
-definition l_orec3_th2 ≝ λa:Prop.λb:Prop.λc:Prop.λo:l_orec3 a b c.(l_orec3i c a b (l_or3_th5 a b c (l_orec3e1 a b c o)) (l_ec3_th5 a b c (l_orec3e2 a b c o)) : l_orec3 c a b).
-
-(* constant 190 *)
-axiom l_e_is : Πsigma:Type[0].Πs:sigma.Πt:sigma.Prop.
-
-(* constant 191 *)
-axiom l_e_refis : Πsigma:Type[0].Πs:sigma.l_e_is sigma s s.
-
-(* constant 192 *)
-axiom l_e_isp : Πsigma:Type[0].∀p:∀x:sigma.Prop.Πs:sigma.Πt:sigma.∀sp:p s.∀i:l_e_is sigma s t.p t.
-
-(* constant 193 *)
-definition l_e_symis ≝ λsigma:Type[0].λs:sigma.λt:sigma.λi:l_e_is sigma s t.(l_e_isp sigma (λx:sigma.l_e_is sigma x s) s t (l_e_refis sigma s) i : l_e_is sigma t s).
-
-(* constant 194 *)
-definition l_e_tris ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λi:l_e_is sigma s t.λj:l_e_is sigma t u.(l_e_isp sigma (λx:sigma.l_e_is sigma x u) t s j (l_e_symis sigma s t i) : l_e_is sigma s u).
-
-(* constant 195 *)
-definition l_e_tris1 ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λi:l_e_is sigma u s.λj:l_e_is sigma u t.(l_e_tris sigma s u t (l_e_symis sigma u s i) j : l_e_is sigma s t).
-
-(* constant 196 *)
-definition l_e_tris2 ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λi:l_e_is sigma s u.λj:l_e_is sigma t u.(l_e_tris sigma s u t i (l_e_symis sigma t u j) : l_e_is sigma s t).
-
-(* constant 197 *)
-definition l_e_isp1 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:sigma.λt:sigma.λsp:p s.λi:l_e_is sigma t s.(l_e_isp sigma p s t sp (l_e_symis sigma t s i) : p t).
-
-(* constant 198 *)
-definition l_e_symnotis ≝ λsigma:Type[0].λs:sigma.λt:sigma.λn:l_not (l_e_is sigma s t).(l_imp_th3 (l_e_is sigma t s) (l_e_is sigma s t) n (λx:l_e_is sigma t s.l_e_symis sigma t s x) : l_not (l_e_is sigma t s)).
-
-(* constant 199 *)
-definition l_e_notis_th1 ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λn:l_not (l_e_is sigma s t).λi:l_e_is sigma s u.(l_e_isp sigma (λx:sigma.l_not (l_e_is sigma x t)) s u n i : l_not (l_e_is sigma u t)).
-
-(* constant 200 *)
-definition l_e_notis_th2 ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λn:l_not (l_e_is sigma s t).λi:l_e_is sigma u s.(l_e_notis_th1 sigma s t u n (l_e_symis sigma u s i) : l_not (l_e_is sigma u t)).
-
-(* constant 201 *)
-definition l_e_notis_th3 ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λn:l_not (l_e_is sigma s t).λi:l_e_is sigma t u.(l_e_isp sigma (λx:sigma.l_not (l_e_is sigma s x)) t u n i : l_not (l_e_is sigma s u)).
-
-(* constant 202 *)
-definition l_e_notis_th4 ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λn:l_not (l_e_is sigma s t).λi:l_e_is sigma u t.(l_e_notis_th3 sigma s t u n (l_e_symis sigma u t i) : l_not (l_e_is sigma s u)).
-
-(* constant 203 *)
-definition l_e_notis_th5 ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λv:sigma.λn:l_not (l_e_is sigma s t).λi:l_e_is sigma s u.λj:l_e_is sigma t v.(l_e_notis_th3 sigma u t v (l_e_notis_th1 sigma s t u n i) j : l_not (l_e_is sigma u v)).
-
-(* constant 204 *)
-definition l_e_tr3is ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λv:sigma.λi:l_e_is sigma s t.λj:l_e_is sigma t u.λk:l_e_is sigma u v.(l_e_tris sigma s u v (l_e_tris sigma s t u i j) k : l_e_is sigma s v).
-
-(* constant 205 *)
-definition l_e_tr4is ≝ λsigma:Type[0].λs:sigma.λt:sigma.λu:sigma.λv:sigma.λw:sigma.λi:l_e_is sigma s t.λj:l_e_is sigma t u.λk:l_e_is sigma u v.λl:l_e_is sigma v w.(l_e_tris sigma s v w (l_e_tr3is sigma s t u v i j k) l : l_e_is sigma s w).
-
-(* constant 206 *)
-definition l_e_amone ≝ λsigma:Type[0].λp:∀x:sigma.Prop.(∀x:sigma.∀y:sigma.∀u:p x.∀v:p y.l_e_is sigma x y : Prop).
-
-(* constant 207 *)
-definition l_e_amonee ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λa1:l_e_amone sigma p.λs:sigma.λt:sigma.λsp:p s.λtp:p t.(a1 s t sp tp : l_e_is sigma s t).
-
-(* constant 208 *)
-definition l_e_one ≝ λsigma:Type[0].λp:∀x:sigma.Prop.(l_and (l_e_amone sigma p) (l_some sigma p) : Prop).
-
-(* constant 209 *)
-definition l_e_onei ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λa1:l_e_amone sigma p.λs:l_some sigma p.(l_andi (l_e_amone sigma p) (l_some sigma p) a1 s : l_e_one sigma p).
-
-(* constant 210 *)
-definition l_e_onee1 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λo1:l_e_one sigma p.(l_ande1 (l_e_amone sigma p) (l_some sigma p) o1 : l_e_amone sigma p).
-
-(* constant 211 *)
-definition l_e_onee2 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λo1:l_e_one sigma p.(l_ande2 (l_e_amone sigma p) (l_some sigma p) o1 : l_some sigma p).
-
-(* constant 212 *)
-axiom l_e_ind : Πsigma:Type[0].∀p:∀x:sigma.Prop.∀o1:l_e_one sigma p.sigma.
-
-(* constant 213 *)
-axiom l_e_oneax : Πsigma:Type[0].∀p:∀x:sigma.Prop.∀o1:l_e_one sigma p.p (l_e_ind sigma p o1).
-
-(* constant 214 *)
-definition l_e_one_th1 ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λo1:l_e_one sigma p.λs:sigma.λsp:p s.(l_e_amonee sigma p (l_e_onee1 sigma p o1) (l_e_ind sigma p o1) s (l_e_oneax sigma p o1) sp : l_e_is sigma (l_e_ind sigma p o1) s).
-
-(* constant 215 *)
-definition l_e_isf ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs:sigma.λt:sigma.λi:l_e_is sigma s t.(l_e_isp sigma (λx:sigma.l_e_is tau (f s) (f x)) s t (l_e_refis tau (f s)) i : l_e_is tau (f s) (f t)).
-
-(* constant 216 *)
-definition l_e_injective ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.(l_all sigma (λx:sigma.l_all sigma (λy:sigma.l_imp (l_e_is tau (f x) (f y)) (l_e_is sigma x y))) : Prop).
-
-(* constant 217 *)
-definition l_e_isfe ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λs:sigma.λt:sigma.λj:l_e_is tau (f s) (f t).(i s t j : l_e_is sigma s t).
-
-(* constant 218 *)
-definition l_e_image ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λt0:tau.(l_some sigma (λx:sigma.l_e_is tau t0 (f x)) : Prop).
-
-(* constant 219 *)
-definition l_e_tofs ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs:sigma.(f s : tau).
-
-(* constant 220 *)
-definition l_e_imagei ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs:sigma.(l_somei sigma (λx:sigma.l_e_is tau (l_e_tofs sigma tau f s) (f x)) s (l_e_refis tau (l_e_tofs sigma tau f s)) : l_e_image sigma tau f (l_e_tofs sigma tau f s)).
-
-(* constant 221 *)
-definition l_e_inj_t1 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λta:tau.λtb:tau.λj:l_e_is tau ta tb.λsa:sigma.λsb:sigma.λja:l_e_is tau ta (l_e_tofs sigma tau f sa).λjb:l_e_is tau tb (l_e_tofs sigma tau f sb).(l_e_tr3is tau (l_e_tofs sigma tau f sa) ta tb (l_e_tofs sigma tau f sb) (l_e_symis tau ta (l_e_tofs sigma tau f sa) ja) j jb : l_e_is tau (l_e_tofs sigma tau f sa) (l_e_tofs sigma tau f sb)).
-
-(* constant 222 *)
-definition l_e_inj_th1 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λta:tau.λtb:tau.λj:l_e_is tau ta tb.λsa:sigma.λsb:sigma.λja:l_e_is tau ta (l_e_tofs sigma tau f sa).λjb:l_e_is tau tb (l_e_tofs sigma tau f sb).(l_e_isfe sigma tau f i sa sb (l_e_inj_t1 sigma tau f i ta tb j sa sb ja jb) : l_e_is sigma sa sb).
-
-(* constant 223 *)
-definition l_e_inj_th2 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λt0:tau.(λx:sigma.λy:sigma.λu:l_e_is tau t0 (f x).λv:l_e_is tau t0 (f y).l_e_inj_th1 sigma tau f i t0 t0 (l_e_refis tau t0) x y u v : l_e_amone sigma (λx:sigma.l_e_is tau t0 (f x))).
-
-(* constant 224 *)
-definition l_e_inj_th3 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λt0:tau.λj:l_e_image sigma tau f t0.(l_e_onei sigma (λx:sigma.l_e_is tau t0 (f x)) (l_e_inj_th2 sigma tau f i t0) j : l_e_one sigma (λx:sigma.l_e_is tau t0 (f x))).
-
-(* constant 225 *)
-definition l_e_soft ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λt0:tau.λj:l_e_image sigma tau f t0.(l_e_ind sigma (λx:sigma.l_e_is tau t0 (f x)) (l_e_inj_th3 sigma tau f i t0 j) : sigma).
-
-(* constant 226 *)
-definition l_e_inverse ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.(λx:tau.λu:l_e_image sigma tau f x.l_e_soft sigma tau f i x u : Πx:tau.Πu:l_e_image sigma tau f x.sigma).
-
-(* constant 227 *)
-definition l_e_ists1 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λt0:tau.λj:l_e_image sigma tau f t0.(l_e_oneax sigma (λx:sigma.l_e_is tau t0 (f x)) (l_e_inj_th3 sigma tau f i t0 j) : l_e_is tau t0 (l_e_tofs sigma tau f (l_e_soft sigma tau f i t0 j))).
-
-(* constant 228 *)
-definition l_e_ists2 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λt0:tau.λj:l_e_image sigma tau f t0.(l_e_symis tau t0 (l_e_tofs sigma tau f (l_e_soft sigma tau f i t0 j)) (l_e_ists1 sigma tau f i t0 j) : l_e_is tau (l_e_tofs sigma tau f (l_e_soft sigma tau f i t0 j)) t0).
-
-(* constant 229 *)
-definition l_e_isinv ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λta:tau.λja:l_e_image sigma tau f ta.λtb:tau.λjb:l_e_image sigma tau f tb.λj:l_e_is tau ta tb.(l_e_inj_th1 sigma tau f i ta tb j (l_e_soft sigma tau f i ta ja) (l_e_soft sigma tau f i tb jb) (l_e_ists1 sigma tau f i ta ja) (l_e_ists1 sigma tau f i tb jb) : l_e_is sigma (l_e_soft sigma tau f i ta ja) (l_e_soft sigma tau f i tb jb)).
-
-(* constant 230 *)
-definition l_e_isinve ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λta:tau.λja:l_e_image sigma tau f ta.λtb:tau.λjb:l_e_image sigma tau f tb.λj:l_e_is sigma (l_e_soft sigma tau f i ta ja) (l_e_soft sigma tau f i tb jb).(l_e_tr3is tau ta (l_e_tofs sigma tau f (l_e_soft sigma tau f i ta ja)) (l_e_tofs sigma tau f (l_e_soft sigma tau f i tb jb)) tb (l_e_ists1 sigma tau f i ta ja) (l_e_isf sigma tau f (l_e_soft sigma tau f i ta ja) (l_e_soft sigma tau f i tb jb) j) (l_e_ists2 sigma tau f i tb jb) : l_e_is tau ta tb).
-
-(* constant 231 *)
-definition l_e_isst1 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λs:sigma.(l_e_isfe sigma tau f i s (l_e_soft sigma tau f i (l_e_tofs sigma tau f s) (l_e_imagei sigma tau f s)) (l_e_ists1 sigma tau f i (l_e_tofs sigma tau f s) (l_e_imagei sigma tau f s)) : l_e_is sigma s (l_e_soft sigma tau f i (l_e_tofs sigma tau f s) (l_e_imagei sigma tau f s))).
-
-(* constant 232 *)
-definition l_e_isst2 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λi:l_e_injective sigma tau f.λs:sigma.(l_e_symis sigma s (l_e_soft sigma tau f i (l_e_tofs sigma tau f s) (l_e_imagei sigma tau f s)) (l_e_isst1 sigma tau f i s) : l_e_is sigma (l_e_soft sigma tau f i (l_e_tofs sigma tau f s) (l_e_imagei sigma tau f s)) s).
-
-(* constant 233 *)
-definition l_e_surjective ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.(l_all tau (λx:tau.l_e_image sigma tau f x) : Prop).
-
-(* constant 234 *)
-definition l_e_bijective ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.(l_and (l_e_injective sigma tau f) (l_e_surjective sigma tau f) : Prop).
-
-(* constant 235 *)
-definition l_e_inj_t2 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λb:l_e_bijective sigma tau f.(l_ande1 (l_e_injective sigma tau f) (l_e_surjective sigma tau f) b : l_e_injective sigma tau f).
-
-(* constant 236 *)
-definition l_e_inj_t3 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λb:l_e_bijective sigma tau f.(l_ande2 (l_e_injective sigma tau f) (l_e_surjective sigma tau f) b : l_e_surjective sigma tau f).
-
-(* constant 237 *)
-definition l_e_inj_so ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λb:l_e_bijective sigma tau f.λt:tau.(l_e_soft sigma tau f (l_e_inj_t2 sigma tau f b) t (l_e_inj_t3 sigma tau f b t) : sigma).
-
-(* constant 238 *)
-definition l_e_invf ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λb:l_e_bijective sigma tau f.(λx:tau.l_e_inj_so sigma tau f b x : Πx:tau.sigma).
-
-(* constant 239 *)
-definition l_e_thinvf1 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λb:l_e_bijective sigma tau f.λs:sigma.(l_e_tris sigma s (l_e_soft sigma tau f (l_e_inj_t2 sigma tau f b) (l_e_tofs sigma tau f s) (l_e_imagei sigma tau f s)) (l_e_invf sigma tau f b (f s)) (l_e_isst1 sigma tau f (l_e_inj_t2 sigma tau f b) s) (l_e_isinv sigma tau f (l_e_inj_t2 sigma tau f b) (l_e_tofs sigma tau f s) (l_e_imagei sigma tau f s) (l_e_tofs sigma tau f s) (l_e_inj_t3 sigma tau f b (l_e_tofs sigma tau f s)) (l_e_refis tau (l_e_tofs sigma tau f s))) : l_e_is sigma s (l_e_invf sigma tau f b (f s))).
-
-(* constant 240 *)
-definition l_e_thinvf2 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λb:l_e_bijective sigma tau f.λt:tau.(l_e_ists1 sigma tau f (l_e_inj_t2 sigma tau f b) t (l_e_inj_t3 sigma tau f b t) : l_e_is tau t (f (l_e_invf sigma tau f b t))).
-
-(* constant 241 *)
-definition l_e_inj_h ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λif:l_e_injective sigma tau f.λig:l_e_injective tau upsilon g.(λx:sigma.g (f x) : Πx:sigma.upsilon).
-
-(* constant 242 *)
-definition l_e_inj_t4 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λif:l_e_injective sigma tau f.λig:l_e_injective tau upsilon g.λs:sigma.λt:sigma.λi:l_e_is upsilon (l_e_inj_h sigma tau upsilon f g if ig s) (l_e_inj_h sigma tau upsilon f g if ig t).(l_e_isfe tau upsilon g ig (f s) (f t) i : l_e_is tau (f s) (f t)).
-
-(* constant 243 *)
-definition l_e_inj_t5 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λif:l_e_injective sigma tau f.λig:l_e_injective tau upsilon g.λs:sigma.λt:sigma.λi:l_e_is upsilon (l_e_inj_h sigma tau upsilon f g if ig s) (l_e_inj_h sigma tau upsilon f g if ig t).(l_e_isfe sigma tau f if s t (l_e_inj_t4 sigma tau upsilon f g if ig s t i) : l_e_is sigma s t).
-
-(* constant 244 *)
-definition l_e_inj_th4 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λif:l_e_injective sigma tau f.λig:l_e_injective tau upsilon g.(λx:sigma.λy:sigma.λv:l_e_is upsilon (l_e_inj_h sigma tau upsilon f g if ig x) (l_e_inj_h sigma tau upsilon f g if ig y).l_e_inj_t5 sigma tau upsilon f g if ig x y v : l_e_injective sigma upsilon (λx:sigma.g (f x))).
-
-(* constant 245 *)
-definition l_e_surj_h ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λsf:l_e_surjective sigma tau f.λsg:l_e_surjective tau upsilon g.(λx:sigma.g (f x) : Πx:sigma.upsilon).
-
-(* constant 246 *)
-definition l_e_surj_t1 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λsf:l_e_surjective sigma tau f.λsg:l_e_surjective tau upsilon g.λu:upsilon.(sg u : l_e_image tau upsilon g u).
-
-(* constant 247 *)
-definition l_e_surj_t2 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λsf:l_e_surjective sigma tau f.λsg:l_e_surjective tau upsilon g.λu:upsilon.λt:tau.λi:l_e_is upsilon u (g t).(sf t : l_e_image sigma tau f t).
-
-(* constant 248 *)
-definition l_e_surj_t3 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λsf:l_e_surjective sigma tau f.λsg:l_e_surjective tau upsilon g.λu:upsilon.λt:tau.λi:l_e_is upsilon u (g t).λs:sigma.λj:l_e_is tau t (f s).(l_e_tris upsilon u (g t) (l_e_surj_h sigma tau upsilon f g sf sg s) i (l_e_isf tau upsilon g t (f s) j) : l_e_is upsilon u (l_e_surj_h sigma tau upsilon f g sf sg s)).
-
-(* constant 249 *)
-definition l_e_surj_t4 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λsf:l_e_surjective sigma tau f.λsg:l_e_surjective tau upsilon g.λu:upsilon.λt:tau.λi:l_e_is upsilon u (g t).λs:sigma.λj:l_e_is tau t (f s).(l_somei sigma (λx:sigma.l_e_is upsilon u (l_e_surj_h sigma tau upsilon f g sf sg x)) s (l_e_surj_t3 sigma tau upsilon f g sf sg u t i s j) : l_e_image sigma upsilon (l_e_surj_h sigma tau upsilon f g sf sg) u).
-
-(* constant 250 *)
-definition l_e_surj_t5 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λsf:l_e_surjective sigma tau f.λsg:l_e_surjective tau upsilon g.λu:upsilon.λt:tau.λi:l_e_is upsilon u (g t).(l_someapp sigma (λx:sigma.l_e_is tau t (f x)) (l_e_surj_t2 sigma tau upsilon f g sf sg u t i) (l_e_image sigma upsilon (l_e_surj_h sigma tau upsilon f g sf sg) u) (λx:sigma.λv:l_e_is tau t (f x).l_e_surj_t4 sigma tau upsilon f g sf sg u t i x v) : l_e_image sigma upsilon (l_e_surj_h sigma tau upsilon f g sf sg) u).
-
-(* constant 251 *)
-definition l_e_surj_t6 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λsf:l_e_surjective sigma tau f.λsg:l_e_surjective tau upsilon g.λu:upsilon.(l_someapp tau (λx:tau.l_e_is upsilon u (g x)) (l_e_surj_t1 sigma tau upsilon f g sf sg u) (l_e_image sigma upsilon (l_e_surj_h sigma tau upsilon f g sf sg) u) (λx:tau.λv:l_e_is upsilon u (g x).l_e_surj_t5 sigma tau upsilon f g sf sg u x v) : l_e_image sigma upsilon (l_e_surj_h sigma tau upsilon f g sf sg) u).
-
-(* constant 252 *)
-definition l_e_surj_th1 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λsf:l_e_surjective sigma tau f.λsg:l_e_surjective tau upsilon g.(λx:upsilon.l_e_surj_t6 sigma tau upsilon f g sf sg x : l_e_surjective sigma upsilon (λx:sigma.g (f x))).
-
-(* constant 253 *)
-definition l_e_bij_h ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λbf:l_e_bijective sigma tau f.λbg:l_e_bijective tau upsilon g.(λx:sigma.g (f x) : Πx:sigma.upsilon).
-
-(* constant 254 *)
-definition l_e_bij_t1 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λbf:l_e_bijective sigma tau f.λbg:l_e_bijective tau upsilon g.(l_e_inj_th4 sigma tau upsilon f g (l_ande1 (l_e_injective sigma tau f) (l_e_surjective sigma tau f) bf) (l_ande1 (l_e_injective tau upsilon g) (l_e_surjective tau upsilon g) bg) : l_e_injective sigma upsilon (l_e_bij_h sigma tau upsilon f g bf bg)).
-
-(* constant 255 *)
-definition l_e_bij_t2 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λbf:l_e_bijective sigma tau f.λbg:l_e_bijective tau upsilon g.(l_e_surj_th1 sigma tau upsilon f g (l_ande2 (l_e_injective sigma tau f) (l_e_surjective sigma tau f) bf) (l_ande2 (l_e_injective tau upsilon g) (l_e_surjective tau upsilon g) bg) : l_e_surjective sigma upsilon (l_e_bij_h sigma tau upsilon f g bf bg)).
-
-(* constant 256 *)
-definition l_e_bij_th1 ≝ λsigma:Type[0].λtau:Type[0].λupsilon:Type[0].λf:Πx:sigma.tau.λg:Πx:tau.upsilon.λbf:l_e_bijective sigma tau f.λbg:l_e_bijective tau upsilon g.(l_andi (l_e_injective sigma upsilon (l_e_bij_h sigma tau upsilon f g bf bg)) (l_e_surjective sigma upsilon (l_e_bij_h sigma tau upsilon f g bf bg)) (l_e_bij_t1 sigma tau upsilon f g bf bg) (l_e_bij_t2 sigma tau upsilon f g bf bg) : l_e_bijective sigma upsilon (λx:sigma.g (f x))).
-
-(* constant 257 *)
-definition l_e_fise ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λg:Πx:sigma.tau.λi:l_e_is (Πx:sigma.tau) f g.λs:sigma.(l_e_isp (Πx:sigma.tau) (λy:Πx:sigma.tau.l_e_is tau (f s) (y s)) f g (l_e_refis tau (f s)) i : l_e_is tau (f s) (g s)).
-
-(* constant 258 *)
-axiom l_e_fisi : Πsigma:Type[0].Πtau:Type[0].Πf:Πx:sigma.tau.Πg:Πx:sigma.tau.∀i:∀x:sigma.l_e_is tau (f x) (g x).l_e_is (Πx:sigma.tau) f g.
-
-(* constant 259 *)
-definition l_e_fis_th1 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λg:Πx:sigma.tau.λi:l_e_is (Πx:sigma.tau) f g.λs:sigma.λt:sigma.λj:l_e_is sigma s t.(l_e_tris tau (f s) (f t) (g t) (l_e_isf sigma tau f s t j) (l_e_fise sigma tau f g i t) : l_e_is tau (f s) (g t)).
-
-(* constant 260 *)
-axiom l_e_ot : Πsigma:Type[0].∀p:∀x:sigma.Prop.Type[0].
-
-(* constant 261 *)
-axiom l_e_in : Πsigma:Type[0].∀p:∀x:sigma.Prop.Πo1:l_e_ot sigma p.sigma.
-
-(* constant 262 *)
-axiom l_e_inp : Πsigma:Type[0].∀p:∀x:sigma.Prop.Πo1:l_e_ot sigma p.p (l_e_in sigma p o1).
-
-(* constant 263 *)
-axiom l_e_otax1 : Πsigma:Type[0].∀p:∀x:sigma.Prop.l_e_injective (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x).
-
-(* constant 264 *)
-axiom l_e_otax2 : Πsigma:Type[0].∀p:∀x:sigma.Prop.Πs:sigma.∀sp:p s.l_e_image (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) s.
-
-(* constant 265 *)
-definition l_e_isini ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λo1:l_e_ot sigma p.λo2:l_e_ot sigma p.λi:l_e_is (l_e_ot sigma p) o1 o2.(l_e_isf (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) o1 o2 i : l_e_is sigma (l_e_in sigma p o1) (l_e_in sigma p o2)).
-
-(* constant 266 *)
-definition l_e_isine ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λo1:l_e_ot sigma p.λo2:l_e_ot sigma p.λi:l_e_is sigma (l_e_in sigma p o1) (l_e_in sigma p o2).(l_e_isfe (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) (l_e_otax1 sigma p) o1 o2 i : l_e_is (l_e_ot sigma p) o1 o2).
-
-(* constant 267 *)
-definition l_e_out ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:sigma.λsp:p s.(l_e_soft (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) (l_e_otax1 sigma p) s (l_e_otax2 sigma p s sp) : l_e_ot sigma p).
-
-(* constant 268 *)
-definition l_e_isouti ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:sigma.λsp:p s.λt:sigma.λtp:p t.λi:l_e_is sigma s t.(l_e_isinv (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) (l_e_otax1 sigma p) s (l_e_otax2 sigma p s sp) t (l_e_otax2 sigma p t tp) i : l_e_is (l_e_ot sigma p) (l_e_out sigma p s sp) (l_e_out sigma p t tp)).
-
-(* constant 269 *)
-definition l_e_isoute ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:sigma.λsp:p s.λt:sigma.λtp:p t.λi:l_e_is (l_e_ot sigma p) (l_e_out sigma p s sp) (l_e_out sigma p t tp).(l_e_isinve (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) (l_e_otax1 sigma p) s (l_e_otax2 sigma p s sp) t (l_e_otax2 sigma p t tp) i : l_e_is sigma s t).
-
-(* constant 270 *)
-definition l_e_isoutin ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λo1:l_e_ot sigma p.(l_e_tris (l_e_ot sigma p) o1 (l_e_soft (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) (l_e_otax1 sigma p) (l_e_in sigma p o1) (l_e_imagei (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) o1)) (l_e_out sigma p (l_e_in sigma p o1) (l_e_inp sigma p o1)) (l_e_isst1 (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) (l_e_otax1 sigma p) o1) (l_e_isinv (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) (l_e_otax1 sigma p) (l_e_in sigma p o1) (l_e_imagei (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) o1) (l_e_in sigma p o1) (l_e_otax2 sigma p (l_e_in sigma p o1) (l_e_inp sigma p o1)) (l_e_refis sigma (l_e_in sigma p o1))) : l_e_is (l_e_ot sigma p) o1 (l_e_out sigma p (l_e_in sigma p o1) (l_e_inp sigma p o1))).
-
-(* constant 271 *)
-definition l_e_isinout ≝ λsigma:Type[0].λp:∀x:sigma.Prop.λs:sigma.λsp:p s.(l_e_ists1 (l_e_ot sigma p) sigma (λx:l_e_ot sigma p.l_e_in sigma p x) (l_e_otax1 sigma p) s (l_e_otax2 sigma p s sp) : l_e_is sigma s (l_e_in sigma p (l_e_out sigma p s sp))).
-
-(* constant 272 *)
-axiom l_e_pairtype : Πsigma:Type[0].Πtau:Type[0].Type[0].
-
-(* constant 273 *)
-axiom l_e_pair : Πsigma:Type[0].Πtau:Type[0].Πs:sigma.Πt:tau.l_e_pairtype sigma tau.
-
-(* constant 274 *)
-axiom l_e_first : Πsigma:Type[0].Πtau:Type[0].Πp1:l_e_pairtype sigma tau.sigma.
-
-(* constant 275 *)
-axiom l_e_second : Πsigma:Type[0].Πtau:Type[0].Πp1:l_e_pairtype sigma tau.tau.
-
-(* constant 276 *)
-axiom l_e_pairis1 : Πsigma:Type[0].Πtau:Type[0].Πp1:l_e_pairtype sigma tau.l_e_is (l_e_pairtype sigma tau) (l_e_pair sigma tau (l_e_first sigma tau p1) (l_e_second sigma tau p1)) p1.
-
-(* constant 277 *)
-definition l_e_pairis2 ≝ λsigma:Type[0].λtau:Type[0].λp1:l_e_pairtype sigma tau.(l_e_symis (l_e_pairtype sigma tau) (l_e_pair sigma tau (l_e_first sigma tau p1) (l_e_second sigma tau p1)) p1 (l_e_pairis1 sigma tau p1) : l_e_is (l_e_pairtype sigma tau) p1 (l_e_pair sigma tau (l_e_first sigma tau p1) (l_e_second sigma tau p1))).
-
-(* constant 278 *)
-axiom l_e_firstis1 : Πsigma:Type[0].Πtau:Type[0].Πs:sigma.Πt:tau.l_e_is sigma (l_e_first sigma tau (l_e_pair sigma tau s t)) s.
-
-(* constant 279 *)
-definition l_e_firstis2 ≝ λsigma:Type[0].λtau:Type[0].λs:sigma.λt:tau.(l_e_symis sigma (l_e_first sigma tau (l_e_pair sigma tau s t)) s (l_e_firstis1 sigma tau s t) : l_e_is sigma s (l_e_first sigma tau (l_e_pair sigma tau s t))).
-
-(* constant 280 *)
-axiom l_e_secondis1 : Πsigma:Type[0].Πtau:Type[0].Πs:sigma.Πt:tau.l_e_is tau (l_e_second sigma tau (l_e_pair sigma tau s t)) t.
-
-(* constant 281 *)
-definition l_e_secondis2 ≝ λsigma:Type[0].λtau:Type[0].λs:sigma.λt:tau.(l_e_symis tau (l_e_second sigma tau (l_e_pair sigma tau s t)) t (l_e_secondis1 sigma tau s t) : l_e_is tau t (l_e_second sigma tau (l_e_pair sigma tau s t))).
-
-(* constant 282 *)
-definition l_e_ite_prop1 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λz:ksi.(l_and (l_imp a (l_e_is ksi z x)) (l_imp (l_not a) (l_e_is ksi z y)) : Prop).
-
-(* constant 283 *)
-definition l_e_ite_t1 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.λx1:ksi.λy1:ksi.λpx1:l_e_ite_prop1 a ksi x y x1.λpy1:l_e_ite_prop1 a ksi x y y1.(l_ande1 (l_imp a (l_e_is ksi x1 x)) (l_imp (l_not a) (l_e_is ksi x1 y)) px1 : l_imp a (l_e_is ksi x1 x)).
-
-(* constant 284 *)
-definition l_e_ite_t2 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.λx1:ksi.λy1:ksi.λpx1:l_e_ite_prop1 a ksi x y x1.λpy1:l_e_ite_prop1 a ksi x y y1.(l_mp a (l_e_is ksi x1 x) a1 (l_e_ite_t1 a ksi x y a1 x1 y1 px1 py1) : l_e_is ksi x1 x).
-
-(* constant 285 *)
-definition l_e_ite_t3 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.λx1:ksi.λy1:ksi.λpx1:l_e_ite_prop1 a ksi x y x1.λpy1:l_e_ite_prop1 a ksi x y y1.(l_e_ite_t2 a ksi x y a1 y1 x1 py1 px1 : l_e_is ksi y1 x).
-
-(* constant 286 *)
-definition l_e_ite_t4 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.λx1:ksi.λy1:ksi.λpx1:l_e_ite_prop1 a ksi x y x1.λpy1:l_e_ite_prop1 a ksi x y y1.(l_e_tris2 ksi x1 y1 x (l_e_ite_t2 a ksi x y a1 x1 y1 px1 py1) (l_e_ite_t3 a ksi x y a1 x1 y1 px1 py1) : l_e_is ksi x1 y1).
-
-(* constant 287 *)
-definition l_e_ite_t5 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.(λs:ksi.λt:ksi.λps:l_e_ite_prop1 a ksi x y s.λpt:l_e_ite_prop1 a ksi x y t.l_e_ite_t4 a ksi x y a1 s t ps pt : l_e_amone ksi (λt:ksi.l_e_ite_prop1 a ksi x y t)).
-
-(* constant 288 *)
-definition l_e_ite_t6 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.(λx1:a.l_e_refis ksi x : l_imp a (l_e_is ksi x x)).
-
-(* constant 289 *)
-definition l_e_ite_t7 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.(l_imp_th2 (l_not a) (l_e_is ksi x y) (l_weli a a1) : l_imp (l_not a) (l_e_is ksi x y)).
-
-(* constant 290 *)
-definition l_e_ite_t8 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.(l_andi (l_imp a (l_e_is ksi x x)) (l_imp (l_not a) (l_e_is ksi x y)) (l_e_ite_t6 a ksi x y a1) (l_e_ite_t7 a ksi x y a1) : l_e_ite_prop1 a ksi x y x).
-
-(* constant 291 *)
-definition l_e_ite_t9 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.(l_somei ksi (λt:ksi.l_e_ite_prop1 a ksi x y t) x (l_e_ite_t8 a ksi x y a1) : l_some ksi (λt:ksi.l_e_ite_prop1 a ksi x y t)).
-
-(* constant 292 *)
-definition l_e_ite_t10 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.(l_e_onei ksi (λt:ksi.l_e_ite_prop1 a ksi x y t) (l_e_ite_t5 a ksi x y a1) (l_e_ite_t9 a ksi x y a1) : l_e_one ksi (λt:ksi.l_e_ite_prop1 a ksi x y t)).
-
-(* constant 293 *)
-definition l_e_ite_t11 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.λx1:ksi.λy1:ksi.λpx1:l_e_ite_prop1 a ksi x y x1.λpy1:l_e_ite_prop1 a ksi x y y1.(l_ande2 (l_imp a (l_e_is ksi x1 x)) (l_imp (l_not a) (l_e_is ksi x1 y)) px1 : l_imp (l_not a) (l_e_is ksi x1 y)).
-
-(* constant 294 *)
-definition l_e_ite_t12 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.λx1:ksi.λy1:ksi.λpx1:l_e_ite_prop1 a ksi x y x1.λpy1:l_e_ite_prop1 a ksi x y y1.(l_mp (l_not a) (l_e_is ksi x1 y) n (l_e_ite_t11 a ksi x y n x1 y1 px1 py1) : l_e_is ksi x1 y).
-
-(* constant 295 *)
-definition l_e_ite_t13 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.λx1:ksi.λy1:ksi.λpx1:l_e_ite_prop1 a ksi x y x1.λpy1:l_e_ite_prop1 a ksi x y y1.(l_e_ite_t12 a ksi x y n y1 x1 py1 px1 : l_e_is ksi y1 y).
-
-(* constant 296 *)
-definition l_e_ite_t14 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.λx1:ksi.λy1:ksi.λpx1:l_e_ite_prop1 a ksi x y x1.λpy1:l_e_ite_prop1 a ksi x y y1.(l_e_tris2 ksi x1 y1 y (l_e_ite_t12 a ksi x y n x1 y1 px1 py1) (l_e_ite_t13 a ksi x y n x1 y1 px1 py1) : l_e_is ksi x1 y1).
-
-(* constant 297 *)
-definition l_e_ite_t15 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.(λs:ksi.λt:ksi.λps:l_e_ite_prop1 a ksi x y s.λpt:l_e_ite_prop1 a ksi x y t.l_e_ite_t14 a ksi x y n s t ps pt : l_e_amone ksi (λt:ksi.l_e_ite_prop1 a ksi x y t)).
-
-(* constant 298 *)
-definition l_e_ite_t16 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.(λx1:l_not a.l_e_refis ksi y : l_imp (l_not a) (l_e_is ksi y y)).
-
-(* constant 299 *)
-definition l_e_ite_t17 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.(l_imp_th2 a (l_e_is ksi y x) n : l_imp a (l_e_is ksi y x)).
-
-(* constant 300 *)
-definition l_e_ite_t18 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.(l_andi (l_imp a (l_e_is ksi y x)) (l_imp (l_not a) (l_e_is ksi y y)) (l_e_ite_t17 a ksi x y n) (l_e_ite_t16 a ksi x y n) : l_e_ite_prop1 a ksi x y y).
-
-(* constant 301 *)
-definition l_e_ite_t19 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.(l_somei ksi (λt:ksi.l_e_ite_prop1 a ksi x y t) y (l_e_ite_t18 a ksi x y n) : l_some ksi (λt:ksi.l_e_ite_prop1 a ksi x y t)).
-
-(* constant 302 *)
-definition l_e_ite_t20 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.(l_e_onei ksi (λt:ksi.l_e_ite_prop1 a ksi x y t) (l_e_ite_t15 a ksi x y n) (l_e_ite_t19 a ksi x y n) : l_e_one ksi (λt:ksi.l_e_ite_prop1 a ksi x y t)).
-
-(* constant 303 *)
-definition l_e_ite_t21 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.(l_imp_th1 a (l_e_one ksi (λt:ksi.l_e_ite_prop1 a ksi x y t)) (λt:a.l_e_ite_t10 a ksi x y t) (λt:l_not a.l_e_ite_t20 a ksi x y t) : l_e_one ksi (λt:ksi.l_e_ite_prop1 a ksi x y t)).
-
-(* constant 304 *)
-definition l_e_ite ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.(l_e_ind ksi (λt:ksi.l_e_ite_prop1 a ksi x y t) (l_e_ite_t21 a ksi x y) : ksi).
-
-(* constant 305 *)
-definition l_e_ite_t22 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.(l_e_oneax ksi (λt:ksi.l_e_ite_prop1 a ksi x y t) (l_e_ite_t21 a ksi x y) : l_e_ite_prop1 a ksi x y (l_e_ite a ksi x y)).
-
-(* constant 306 *)
-definition l_e_ite_t23 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.(l_ande1 (l_imp a (l_e_is ksi (l_e_ite a ksi x y) x)) (l_imp (l_not a) (l_e_is ksi (l_e_ite a ksi x y) y)) (l_e_ite_t22 a ksi x y) : l_imp a (l_e_is ksi (l_e_ite a ksi x y) x)).
-
-(* constant 307 *)
-definition l_e_ite_t24 ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.(l_ande2 (l_imp a (l_e_is ksi (l_e_ite a ksi x y) x)) (l_imp (l_not a) (l_e_is ksi (l_e_ite a ksi x y) y)) (l_e_ite_t22 a ksi x y) : l_imp (l_not a) (l_e_is ksi (l_e_ite a ksi x y) y)).
-
-(* constant 308 *)
-definition l_e_itet ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λa1:a.(l_mp a (l_e_is ksi (l_e_ite a ksi x y) x) a1 (l_e_ite_t23 a ksi x y) : l_e_is ksi (l_e_ite a ksi x y) x).
-
-(* constant 309 *)
-definition l_e_itef ≝ λa:Prop.λksi:Type[0].λx:ksi.λy:ksi.λn:l_not a.(l_mp (l_not a) (l_e_is ksi (l_e_ite a ksi x y) y) n (l_e_ite_t24 a ksi x y) : l_e_is ksi (l_e_ite a ksi x y) y).
-
-(* constant 310 *)
-definition l_e_wissel_wa ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.(l_e_ite (l_e_is sigma s s0) sigma t0 s : sigma).
-
-(* constant 311 *)
-definition l_e_wissel_t1 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s s0.(l_e_itet (l_e_is sigma s s0) sigma t0 s i : l_e_is sigma (l_e_wissel_wa sigma s0 t0 s) t0).
-
-(* constant 312 *)
-definition l_e_wissel_t2 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λn:l_not (l_e_is sigma s s0).(l_e_itef (l_e_is sigma s s0) sigma t0 s n : l_e_is sigma (l_e_wissel_wa sigma s0 t0 s) s).
-
-(* constant 313 *)
-definition l_e_wissel_wb ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.(l_e_ite (l_e_is sigma s t0) sigma s0 (l_e_wissel_wa sigma s0 t0 s) : sigma).
-
-(* constant 314 *)
-definition l_e_wissel_t3 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s t0.(l_e_itet (l_e_is sigma s t0) sigma s0 (l_e_wissel_wa sigma s0 t0 s) i : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) s0).
-
-(* constant 315 *)
-definition l_e_wissel_t4 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λn:l_not (l_e_is sigma s t0).(l_e_itef (l_e_is sigma s t0) sigma s0 (l_e_wissel_wa sigma s0 t0 s) n : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wa sigma s0 t0 s)).
-
-(* constant 316 *)
-definition l_e_wissel_t5 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s s0.λj:l_e_is sigma s0 t0.(l_e_tris sigma (l_e_wissel_wb sigma s0 t0 s) s0 t0 (l_e_wissel_t3 sigma s0 t0 s (l_e_tris sigma s s0 t0 i j)) j : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) t0).
-
-(* constant 317 *)
-definition l_e_wissel_t6 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s s0.λn:l_not (l_e_is sigma s0 t0).(l_e_tris sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wa sigma s0 t0 s) t0 (l_e_wissel_t4 sigma s0 t0 s (l_e_notis_th2 sigma s0 t0 s n i)) (l_e_wissel_t1 sigma s0 t0 s i) : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) t0).
-
-(* constant 318 *)
-definition l_e_wissel_t7 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s s0.(l_imp_th1 (l_e_is sigma s0 t0) (l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) t0) (λt:l_e_is sigma s0 t0.l_e_wissel_t5 sigma s0 t0 s i t) (λt:l_not (l_e_is sigma s0 t0).l_e_wissel_t6 sigma s0 t0 s i t) : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) t0).
-
-(* constant 319 *)
-definition l_e_wissel_t8 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λn:l_not (l_e_is sigma s s0).λo:l_not (l_e_is sigma s t0).(l_e_tris sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wa sigma s0 t0 s) s (l_e_wissel_t4 sigma s0 t0 s o) (l_e_wissel_t2 sigma s0 t0 s n) : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) s).
-
-(* constant 320 *)
-definition l_e_wissel ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.(λx:sigma.l_e_wissel_wb sigma s0 t0 x : Πx:sigma.sigma).
-
-(* constant 321 *)
-definition l_e_iswissel1 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s s0.(l_e_wissel_t7 sigma s0 t0 s i : l_e_is sigma (l_e_wissel sigma s0 t0 s) t0).
-
-(* constant 322 *)
-definition l_e_iswissel2 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s t0.(l_e_wissel_t3 sigma s0 t0 s i : l_e_is sigma (l_e_wissel sigma s0 t0 s) s0).
-
-(* constant 323 *)
-definition l_e_iswissel3 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λn:l_not (l_e_is sigma s s0).λo:l_not (l_e_is sigma s t0).(l_e_wissel_t8 sigma s0 t0 s n o : l_e_is sigma (l_e_wissel sigma s0 t0 s) s).
-
-(* constant 324 *)
-definition l_e_wissel_t9 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.(l_e_symnotis sigma s0 t (l_e_notis_th1 sigma s t s0 n j) : l_not (l_e_is sigma t s0)).
-
-(* constant 325 *)
-definition l_e_wissel_t10 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.λk:l_e_is sigma s0 t0.(l_e_notis_th3 sigma t s0 t0 (l_e_wissel_t9 sigma s0 t0 s t i n j) k : l_not (l_e_is sigma t t0)).
-
-(* constant 326 *)
-definition l_e_wissel_t11 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.λk:l_e_is sigma s0 t0.(l_e_tris sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t) t i (l_e_wissel_t8 sigma s0 t0 t (l_e_wissel_t9 sigma s0 t0 s t i n j) (l_e_wissel_t10 sigma s0 t0 s t i n j k)) : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) t).
-
-(* constant 327 *)
-definition l_e_wissel_t12 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.λk:l_e_is sigma s0 t0.(l_e_wissel_t10 sigma s0 t0 s t i n j k (l_e_tris1 sigma t t0 (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_t11 sigma s0 t0 s t i n j k) (l_e_wissel_t7 sigma s0 t0 s j)) : l_con).
-
-(* constant 328 *)
-definition l_e_wissel_t13 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.(λv:l_e_is sigma s0 t0.l_e_wissel_t12 sigma s0 t0 s t i n j v : l_not (l_e_is sigma s0 t0)).
-
-(* constant 329 *)
-definition l_e_wissel_t14 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.λk:l_e_is sigma t t0.(l_e_tris sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t) s0 i (l_e_wissel_t3 sigma s0 t0 t k) : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) s0).
-
-(* constant 330 *)
-definition l_e_wissel_t15 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.λk:l_e_is sigma t t0.(l_e_wissel_t12 sigma s0 t0 s t i n j (l_e_tris1 sigma s0 t0 (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_t14 sigma s0 t0 s t i n j k) (l_e_wissel_t7 sigma s0 t0 s j)) : l_con).
-
-(* constant 331 *)
-definition l_e_wissel_t16 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.(λv:l_e_is sigma t t0.l_e_wissel_t15 sigma s0 t0 s t i n j v : l_not (l_e_is sigma t t0)).
-
-(* constant 332 *)
-definition l_e_wissel_t17 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.(l_e_tris sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t) t i (l_e_wissel_t8 sigma s0 t0 t (l_e_wissel_t9 sigma s0 t0 s t i n j) (l_e_wissel_t16 sigma s0 t0 s t i n j)) : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) t).
-
-(* constant 333 *)
-definition l_e_wissel_t18 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s s0.(l_e_wissel_t15 sigma s0 t0 s t i n j (l_e_tris1 sigma t t0 (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_t17 sigma s0 t0 s t i n j) (l_e_wissel_t7 sigma s0 t0 s j)) : l_con).
-
-(* constant 334 *)
-definition l_e_wissel_t19 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).(λv:l_e_is sigma s s0.l_e_wissel_t18 sigma s0 t0 s t i n v : l_not (l_e_is sigma s s0)).
-
-(* constant 335 *)
-definition l_e_wissel_t20 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).(l_e_wissel_t19 sigma s0 t0 t s (l_e_symis sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t) i) (l_e_symnotis sigma s t n) : l_not (l_e_is sigma t s0)).
-
-(* constant 336 *)
-definition l_e_wissel_t21 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s t0.(l_e_symnotis sigma t0 t (l_e_notis_th1 sigma s t t0 n j) : l_not (l_e_is sigma t t0)).
-
-(* constant 337 *)
-definition l_e_wissel_t22 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s t0.(l_e_tris sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t) t i (l_e_wissel_t8 sigma s0 t0 t (l_e_wissel_t20 sigma s0 t0 s t i n) (l_e_wissel_t21 sigma s0 t0 s t i n j)) : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) t).
-
-(* constant 338 *)
-definition l_e_wissel_t23 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).λj:l_e_is sigma s t0.(l_e_wissel_t20 sigma s0 t0 s t i n (l_e_tris1 sigma t s0 (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_t22 sigma s0 t0 s t i n j) (l_e_wissel_t3 sigma s0 t0 s j)) : l_con).
-
-(* constant 339 *)
-definition l_e_wissel_t24 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).(λv:l_e_is sigma s t0.l_e_wissel_t23 sigma s0 t0 s t i n v : l_not (l_e_is sigma s t0)).
-
-(* constant 340 *)
-definition l_e_wissel_t25 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).(l_e_wissel_t24 sigma s0 t0 t s (l_e_symis sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t) i) (l_e_symnotis sigma s t n) : l_not (l_e_is sigma t t0)).
-
-(* constant 341 *)
-definition l_e_wissel_t26 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).(l_e_tris sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t) t i (l_e_wissel_t8 sigma s0 t0 t (l_e_wissel_t20 sigma s0 t0 s t i n) (l_e_wissel_t25 sigma s0 t0 s t i n)) : l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) t).
-
-(* constant 342 *)
-definition l_e_wissel_t27 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).λn:l_not (l_e_is sigma s t).(n (l_e_tris1 sigma s t (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_t8 sigma s0 t0 s (l_e_wissel_t19 sigma s0 t0 s t i n) (l_e_wissel_t24 sigma s0 t0 s t i n)) (l_e_wissel_t26 sigma s0 t0 s t i n)) : l_con).
-
-(* constant 343 *)
-definition l_e_wissel_t28 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λt:sigma.λi:l_e_is sigma (l_e_wissel_wb sigma s0 t0 s) (l_e_wissel_wb sigma s0 t0 t).(l_et (l_e_is sigma s t) (λv:l_not (l_e_is sigma s t).l_e_wissel_t27 sigma s0 t0 s t i v) : l_e_is sigma s t).
-
-(* constant 344 *)
-definition l_e_wissel_th1 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.(λx:sigma.λy:sigma.λv:l_e_is sigma (l_e_wissel_wb sigma s0 t0 x) (l_e_wissel_wb sigma s0 t0 y).l_e_wissel_t28 sigma s0 t0 x y v : l_e_injective sigma sigma (l_e_wissel sigma s0 t0)).
-
-(* constant 345 *)
-definition l_e_wissel_t29 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s s0.(l_e_tris2 sigma s (l_e_wissel_wb sigma s0 t0 t0) s0 i (l_e_wissel_t3 sigma s0 t0 t0 (l_e_refis sigma t0)) : l_e_is sigma s (l_e_wissel_wb sigma s0 t0 t0)).
-
-(* constant 346 *)
-definition l_e_wissel_t30 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s s0.(l_somei sigma (λx:sigma.l_e_is sigma s (l_e_wissel_wb sigma s0 t0 x)) t0 (l_e_wissel_t29 sigma s0 t0 s i) : l_e_image sigma sigma (l_e_wissel sigma s0 t0) s).
-
-(* constant 347 *)
-definition l_e_wissel_t31 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s t0.(l_e_tris2 sigma s (l_e_wissel_wb sigma s0 t0 s0) t0 i (l_e_wissel_t7 sigma s0 t0 s0 (l_e_refis sigma s0)) : l_e_is sigma s (l_e_wissel_wb sigma s0 t0 s0)).
-
-(* constant 348 *)
-definition l_e_wissel_t32 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s t0.(l_somei sigma (λx:sigma.l_e_is sigma s (l_e_wissel_wb sigma s0 t0 x)) s0 (l_e_wissel_t31 sigma s0 t0 s i) : l_e_image sigma sigma (l_e_wissel sigma s0 t0) s).
-
-(* constant 349 *)
-definition l_e_wissel_t33 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λn:l_not (l_e_is sigma s s0).λo:l_not (l_e_is sigma s t0).(l_e_symis sigma (l_e_wissel_wb sigma s0 t0 s) s (l_e_wissel_t8 sigma s0 t0 s n o) : l_e_is sigma s (l_e_wissel_wb sigma s0 t0 s)).
-
-(* constant 350 *)
-definition l_e_wissel_t34 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λn:l_not (l_e_is sigma s s0).λo:l_not (l_e_is sigma s t0).(l_somei sigma (λx:sigma.l_e_is sigma s (l_e_wissel_wb sigma s0 t0 x)) s (l_e_wissel_t33 sigma s0 t0 s n o) : l_e_image sigma sigma (l_e_wissel sigma s0 t0) s).
-
-(* constant 351 *)
-definition l_e_wissel_t35 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.λn:l_not (l_e_is sigma s s0).(l_imp_th1 (l_e_is sigma s t0) (l_e_image sigma sigma (l_e_wissel sigma s0 t0) s) (λv:l_e_is sigma s t0.l_e_wissel_t32 sigma s0 t0 s v) (λv:l_not (l_e_is sigma s t0).l_e_wissel_t34 sigma s0 t0 s n v) : l_e_image sigma sigma (l_e_wissel sigma s0 t0) s).
-
-(* constant 352 *)
-definition l_e_wissel_t36 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.λs:sigma.(l_imp_th1 (l_e_is sigma s s0) (l_e_image sigma sigma (l_e_wissel sigma s0 t0) s) (λv:l_e_is sigma s s0.l_e_wissel_t30 sigma s0 t0 s v) (λv:l_not (l_e_is sigma s s0).l_e_wissel_t35 sigma s0 t0 s v) : l_e_image sigma sigma (l_e_wissel sigma s0 t0) s).
-
-(* constant 353 *)
-definition l_e_wissel_th2 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.(λx:sigma.l_e_wissel_t36 sigma s0 t0 x : l_e_surjective sigma sigma (l_e_wissel sigma s0 t0)).
-
-(* constant 354 *)
-definition l_e_wissel_th3 ≝ λsigma:Type[0].λs0:sigma.λt0:sigma.(l_andi (l_e_injective sigma sigma (l_e_wissel sigma s0 t0)) (l_e_surjective sigma sigma (l_e_wissel sigma s0 t0)) (l_e_wissel_th1 sigma s0 t0) (l_e_wissel_th2 sigma s0 t0) : l_e_bijective sigma sigma (l_e_wissel sigma s0 t0)).
-
-(* constant 355 *)
-definition l_e_changef ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs0:sigma.λt0:sigma.(λx:sigma.f (l_e_wissel sigma s0 t0 x) : Πx:sigma.tau).
-
-(* constant 356 *)
-definition l_e_changef1 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s s0.(l_e_isf sigma tau f (l_e_wissel sigma s0 t0 s) t0 (l_e_iswissel1 sigma s0 t0 s i) : l_e_is tau (l_e_changef sigma tau f s0 t0 s) (f t0)).
-
-(* constant 357 *)
-definition l_e_changef2 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs0:sigma.λt0:sigma.λs:sigma.λi:l_e_is sigma s t0.(l_e_isf sigma tau f (l_e_wissel sigma s0 t0 s) s0 (l_e_iswissel2 sigma s0 t0 s i) : l_e_is tau (l_e_changef sigma tau f s0 t0 s) (f s0)).
-
-(* constant 358 *)
-definition l_e_changef3 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs0:sigma.λt0:sigma.λs:sigma.λn:l_not (l_e_is sigma s s0).λo:l_not (l_e_is sigma s t0).(l_e_isf sigma tau f (l_e_wissel sigma s0 t0 s) s (l_e_iswissel3 sigma s0 t0 s n o) : l_e_is tau (l_e_changef sigma tau f s0 t0 s) (f s)).
-
-(* constant 359 *)
-definition l_e_wissel_th4 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs0:sigma.λt0:sigma.λi:l_e_injective sigma tau f.(l_e_inj_th4 sigma sigma tau (l_e_wissel sigma s0 t0) f (l_e_wissel_th1 sigma s0 t0) i : l_e_injective sigma tau (l_e_changef sigma tau f s0 t0)).
-
-(* constant 360 *)
-definition l_e_wissel_th5 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs0:sigma.λt0:sigma.λs:l_e_surjective sigma tau f.(l_e_surj_th1 sigma sigma tau (l_e_wissel sigma s0 t0) f (l_e_wissel_th2 sigma s0 t0) s : l_e_surjective sigma tau (l_e_changef sigma tau f s0 t0)).
-
-(* constant 361 *)
-definition l_e_wissel_th6 ≝ λsigma:Type[0].λtau:Type[0].λf:Πx:sigma.tau.λs0:sigma.λt0:sigma.λb:l_e_bijective sigma tau f.(l_e_bij_th1 sigma sigma tau (l_e_wissel sigma s0 t0) f (l_e_wissel_th3 sigma s0 t0) b : l_e_bijective sigma tau (l_e_changef sigma tau f s0 t0)).
-
-(* constant 362 *)
-definition l_r_imp ≝ λa:Prop.λb:∀x:a.Prop.(∀x:a.b x : Prop).
-
-(* constant 363 *)
-definition l_r_mp ≝ λa:Prop.λb:∀x:a.Prop.λa1:a.λi:l_r_imp a b.(i a1 : b a1).
-
-(* constant 364 *)
-definition l_r_imp_th2 ≝ λa:Prop.λb:∀x:a.Prop.λn:l_not a.(λx:a.l_cone (b x) (l_mp a l_con x n) : l_r_imp a b).
-
-(* constant 365 *)
-definition l_r_ec ≝ λa:Prop.λb:∀x:a.Prop.(∀x:a.l_not (b x) : Prop).
-
-(* constant 366 *)
-definition l_r_eci1 ≝ λa:Prop.λb:∀x:a.Prop.λn:l_not a.(λx:a.l_cone (l_not (b x)) (l_mp a l_con x n) : l_r_ec a b).
-
-(* constant 367 *)
-definition l_r_ande2 ≝ λa:Prop.λb:∀x:a.Prop.λa1:l_and a (l_r_imp a b).(l_ande2 a (l_r_imp a b) a1 (l_ande1 a (l_r_imp a b) a1) : b (l_ande1 a (l_r_imp a b) a1)).
-
-(* constant 368 *)
-definition l_r_ite_is ≝ λa:Prop.λksi:Type[0].λx1:ksi.λy1:ksi.(l_e_is ksi x1 y1 : Prop).
-
-(* constant 369 *)
-definition l_r_ite_prop1 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λz:ksi.(l_and (l_r_imp a (λt:a.l_r_ite_is a ksi z (x t))) (l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi z (y t))) : Prop).
-
-(* constant 370 *)
-definition l_r_ite_t1 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.λx1:ksi.λy1:ksi.λpx1:l_r_ite_prop1 a ksi x y i j x1.λpy1:l_r_ite_prop1 a ksi x y i j y1.(l_ande1 (l_r_imp a (λt:a.l_r_ite_is a ksi x1 (x t))) (l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi x1 (y t))) px1 : l_r_imp a (λt:a.l_r_ite_is a ksi x1 (x t))).
-
-(* constant 371 *)
-definition l_r_ite_t2 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.λx1:ksi.λy1:ksi.λpx1:l_r_ite_prop1 a ksi x y i j x1.λpy1:l_r_ite_prop1 a ksi x y i j y1.(l_r_mp a (λt:a.l_r_ite_is a ksi x1 (x t)) a1 (l_r_ite_t1 a ksi x y i j a1 x1 y1 px1 py1) : l_r_ite_is a ksi x1 (x a1)).
-
-(* constant 372 *)
-definition l_r_ite_t3 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.λx1:ksi.λy1:ksi.λpx1:l_r_ite_prop1 a ksi x y i j x1.λpy1:l_r_ite_prop1 a ksi x y i j y1.(l_r_ite_t2 a ksi x y i j a1 y1 x1 py1 px1 : l_r_ite_is a ksi y1 (x a1)).
-
-(* constant 373 *)
-definition l_r_ite_t4 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.λx1:ksi.λy1:ksi.λpx1:l_r_ite_prop1 a ksi x y i j x1.λpy1:l_r_ite_prop1 a ksi x y i j y1.(l_e_tris2 ksi x1 y1 (x a1) (l_r_ite_t2 a ksi x y i j a1 x1 y1 px1 py1) (l_r_ite_t3 a ksi x y i j a1 x1 y1 px1 py1) : l_r_ite_is a ksi x1 y1).
-
-(* constant 374 *)
-definition l_r_ite_t5 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.(λs:ksi.λt:ksi.λps:l_r_ite_prop1 a ksi x y i j s.λpt:l_r_ite_prop1 a ksi x y i j t.l_r_ite_t4 a ksi x y i j a1 s t ps pt : l_e_amone ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t)).
-
-(* constant 375 *)
-definition l_r_ite_t6 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.(i a1 : l_r_imp a (λt:a.l_r_ite_is a ksi (x a1) (x t))).
-
-(* constant 376 *)
-definition l_r_ite_t7 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.(l_r_imp_th2 (l_not a) (λt:l_not a.l_r_ite_is a ksi (x a1) (y t)) (l_weli a a1) : l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi (x a1) (y t))).
-
-(* constant 377 *)
-definition l_r_ite_t8 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.(l_andi (l_r_imp a (λt:a.l_r_ite_is a ksi (x a1) (x t))) (l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi (x a1) (y t))) (l_r_ite_t6 a ksi x y i j a1) (l_r_ite_t7 a ksi x y i j a1) : l_r_ite_prop1 a ksi x y i j (x a1)).
-
-(* constant 378 *)
-definition l_r_ite_t9 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.(l_somei ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t) (x a1) (l_r_ite_t8 a ksi x y i j a1) : l_some ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t)).
-
-(* constant 379 *)
-definition l_r_ite_t10 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.(l_e_onei ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t) (l_r_ite_t5 a ksi x y i j a1) (l_r_ite_t9 a ksi x y i j a1) : l_e_one ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t)).
-
-(* constant 380 *)
-definition l_r_ite_t11 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.λx1:ksi.λy1:ksi.λpx1:l_r_ite_prop1 a ksi x y i j x1.λpy1:l_r_ite_prop1 a ksi x y i j y1.(l_ande2 (l_r_imp a (λt:a.l_r_ite_is a ksi x1 (x t))) (l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi x1 (y t))) px1 : l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi x1 (y t))).
-
-(* constant 381 *)
-definition l_r_ite_t12 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.λx1:ksi.λy1:ksi.λpx1:l_r_ite_prop1 a ksi x y i j x1.λpy1:l_r_ite_prop1 a ksi x y i j y1.(l_r_mp (l_not a) (λt:l_not a.l_r_ite_is a ksi x1 (y t)) n (l_r_ite_t11 a ksi x y i j n x1 y1 px1 py1) : l_r_ite_is a ksi x1 (y n)).
-
-(* constant 382 *)
-definition l_r_ite_t13 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.λx1:ksi.λy1:ksi.λpx1:l_r_ite_prop1 a ksi x y i j x1.λpy1:l_r_ite_prop1 a ksi x y i j y1.(l_r_ite_t12 a ksi x y i j n y1 x1 py1 px1 : l_r_ite_is a ksi y1 (y n)).
-
-(* constant 383 *)
-definition l_r_ite_t14 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.λx1:ksi.λy1:ksi.λpx1:l_r_ite_prop1 a ksi x y i j x1.λpy1:l_r_ite_prop1 a ksi x y i j y1.(l_e_tris2 ksi x1 y1 (y n) (l_r_ite_t12 a ksi x y i j n x1 y1 px1 py1) (l_r_ite_t13 a ksi x y i j n x1 y1 px1 py1) : l_r_ite_is a ksi x1 y1).
-
-(* constant 384 *)
-definition l_r_ite_t15 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.(λs:ksi.λt:ksi.λps:l_r_ite_prop1 a ksi x y i j s.λpt:l_r_ite_prop1 a ksi x y i j t.l_r_ite_t14 a ksi x y i j n s t ps pt : l_e_amone ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t)).
-
-(* constant 385 *)
-definition l_r_ite_t16 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.(j n : l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi (y n) (y t))).
-
-(* constant 386 *)
-definition l_r_ite_t17 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.(l_r_imp_th2 a (λt:a.l_r_ite_is a ksi (y n) (x t)) n : l_r_imp a (λt:a.l_r_ite_is a ksi (y n) (x t))).
-
-(* constant 387 *)
-definition l_r_ite_t18 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.(l_andi (l_r_imp a (λt:a.l_r_ite_is a ksi (y n) (x t))) (l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi (y n) (y t))) (l_r_ite_t17 a ksi x y i j n) (l_r_ite_t16 a ksi x y i j n) : l_r_ite_prop1 a ksi x y i j (y n)).
-
-(* constant 388 *)
-definition l_r_ite_t19 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.(l_somei ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t) (y n) (l_r_ite_t18 a ksi x y i j n) : l_some ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t)).
-
-(* constant 389 *)
-definition l_r_ite_t20 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.(l_e_onei ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t) (l_r_ite_t15 a ksi x y i j n) (l_r_ite_t19 a ksi x y i j n) : l_e_one ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t)).
-
-(* constant 390 *)
-definition l_r_ite_t21 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).(l_imp_th1 a (l_e_one ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t)) (λt:a.l_r_ite_t10 a ksi x y i j t) (λt:l_not a.l_r_ite_t20 a ksi x y i j t) : l_e_one ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t)).
-
-(* constant 391 *)
-definition l_r_ite ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).(l_e_ind ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t) (l_r_ite_t21 a ksi x y i j) : ksi).
-
-(* constant 392 *)
-definition l_r_ite_t22 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).(l_e_oneax ksi (λt:ksi.l_r_ite_prop1 a ksi x y i j t) (l_r_ite_t21 a ksi x y i j) : l_r_ite_prop1 a ksi x y i j (l_r_ite a ksi x y i j)).
-
-(* constant 393 *)
-definition l_r_ite_t23 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).(l_ande1 (l_r_imp a (λt:a.l_r_ite_is a ksi (l_r_ite a ksi x y i j) (x t))) (l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi (l_r_ite a ksi x y i j) (y t))) (l_r_ite_t22 a ksi x y i j) : l_r_imp a (λt:a.l_r_ite_is a ksi (l_r_ite a ksi x y i j) (x t))).
-
-(* constant 394 *)
-definition l_r_ite_t24 ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).(l_ande2 (l_r_imp a (λt:a.l_r_ite_is a ksi (l_r_ite a ksi x y i j) (x t))) (l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi (l_r_ite a ksi x y i j) (y t))) (l_r_ite_t22 a ksi x y i j) : l_r_imp (l_not a) (λt:l_not a.l_r_ite_is a ksi (l_r_ite a ksi x y i j) (y t))).
-
-(* constant 395 *)
-definition l_r_itet ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λa1:a.(l_r_mp a (λt:a.l_r_ite_is a ksi (l_r_ite a ksi x y i j) (x t)) a1 (l_r_ite_t23 a ksi x y i j) : l_r_ite_is a ksi (l_r_ite a ksi x y i j) (x a1)).
-
-(* constant 396 *)
-definition l_r_itef ≝ λa:Prop.λksi:Type[0].λx:Πt:a.ksi.λy:Πt:l_not a.ksi.λi:∀t:a.∀u:a.l_r_ite_is a ksi (x t) (x u).λj:∀t:l_not a.∀u:l_not a.l_r_ite_is a ksi (y t) (y u).λn:l_not a.(l_r_mp (l_not a) (λt:l_not a.l_r_ite_is a ksi (l_r_ite a ksi x y i j) (y t)) n (l_r_ite_t24 a ksi x y i j) : l_r_ite_is a ksi (l_r_ite a ksi x y i j) (y n)).
-
-(* constant 397 *)
-axiom l_e_st_set : Πsigma:Type[0].Type[0].
-
-(* constant 398 *)
-axiom l_e_st_esti : Πsigma:Type[0].Πs:sigma.Πs0:l_e_st_set sigma.Prop.
-
-(* constant 399 *)
-axiom l_e_st_setof : Πsigma:Type[0].∀p:∀x:sigma.Prop.l_e_st_set sigma.
-
-(* constant 400 *)
-axiom l_e_st_estii : Πsigma:Type[0].∀p:∀x:sigma.Prop.Πs:sigma.∀sp:p s.l_e_st_esti sigma s (l_e_st_setof sigma p).
-
-(* constant 401 *)
-axiom l_e_st_estie : Πsigma:Type[0].∀p:∀x:sigma.Prop.Πs:sigma.∀e:l_e_st_esti sigma s (l_e_st_setof sigma p).p s.
-
-(* constant 402 *)
-definition l_e_st_empty ≝ λsigma:Type[0].λs0:l_e_st_set sigma.(l_none sigma (λx:sigma.l_e_st_esti sigma x s0) : Prop).
-
-(* constant 403 *)
-definition l_e_st_nonempty ≝ λsigma:Type[0].λs0:l_e_st_set sigma.(l_some sigma (λx:sigma.l_e_st_esti sigma x s0) : Prop).
-
-(* constant 404 *)
-definition l_e_st_emptyi ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λn:∀x:sigma.l_not (l_e_st_esti sigma x s0).(n : l_e_st_empty sigma s0).
-
-(* constant 405 *)
-definition l_e_st_emptye ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λe:l_e_st_empty sigma s0.λs:sigma.(e s : l_not (l_e_st_esti sigma s s0)).
-
-(* constant 406 *)
-definition l_e_st_nonemptyi ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λs:sigma.λses0:l_e_st_esti sigma s s0.(l_somei sigma (λx:sigma.l_e_st_esti sigma x s0) s ses0 : l_e_st_nonempty sigma s0).
-
-(* constant 407 *)
-definition l_e_st_nonemptyapp ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λn:l_e_st_nonempty sigma s0.λx:Prop.λx1:∀y:sigma.∀z:l_e_st_esti sigma y s0.x.(l_someapp sigma (λy:sigma.l_e_st_esti sigma y s0) n x x1 : x).
-
-(* constant 408 *)
-definition l_e_st_incl ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.(l_all sigma (λx:sigma.l_imp (l_e_st_esti sigma x s0) (l_e_st_esti sigma x t0)) : Prop).
-
-(* constant 409 *)
-definition l_e_st_incli ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λe:∀x:sigma.∀y:l_e_st_esti sigma x s0.l_e_st_esti sigma x t0.(e : l_e_st_incl sigma s0 t0).
-
-(* constant 410 *)
-definition l_e_st_incle ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λi:l_e_st_incl sigma s0 t0.λs:sigma.λses0:l_e_st_esti sigma s s0.(i s ses0 : l_e_st_esti sigma s t0).
-
-(* constant 411 *)
-definition l_e_st_refincl ≝ λsigma:Type[0].λs0:l_e_st_set sigma.(λx:sigma.λy:l_e_st_esti sigma x s0.y : l_e_st_incl sigma s0 s0).
-
-(* constant 412 *)
-definition l_e_st_disj ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.(l_all sigma (λx:sigma.l_ec (l_e_st_esti sigma x s0) (l_e_st_esti sigma x t0)) : Prop).
-
-(* constant 413 *)
-definition l_e_st_disji1 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λn:∀x:sigma.∀y:l_e_st_esti sigma x s0.l_not (l_e_st_esti sigma x t0).(n : l_e_st_disj sigma s0 t0).
-
-(* constant 414 *)
-definition l_e_st_disji2 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λn:∀x:sigma.∀y:l_e_st_esti sigma x t0.l_not (l_e_st_esti sigma x s0).(λx:sigma.l_ec_th2 (l_e_st_esti sigma x s0) (l_e_st_esti sigma x t0) (n x) : l_e_st_disj sigma s0 t0).
-
-(* constant 415 *)
-definition l_e_st_disje1 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λd:l_e_st_disj sigma s0 t0.λs:sigma.λses0:l_e_st_esti sigma s s0.(l_ece1 (l_e_st_esti sigma s s0) (l_e_st_esti sigma s t0) (d s) ses0 : l_not (l_e_st_esti sigma s t0)).
-
-(* constant 416 *)
-definition l_e_st_disje2 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λd:l_e_st_disj sigma s0 t0.λs:sigma.λset0:l_e_st_esti sigma s t0.(l_ece2 (l_e_st_esti sigma s s0) (l_e_st_esti sigma s t0) (d s) set0 : l_not (l_e_st_esti sigma s s0)).
-
-(* constant 417 *)
-definition l_e_st_symdisj ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λd:l_e_st_disj sigma s0 t0.(λx:sigma.λy:l_e_st_esti sigma x t0.l_e_st_disje2 sigma s0 t0 d x y : l_e_st_disj sigma t0 s0).
-
-(* constant 418 *)
-definition l_e_st_disj_th1 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λs:sigma.λses0:l_e_st_esti sigma s s0.λset0:l_e_st_esti sigma s t0.(l_all_th1 sigma (λx:sigma.l_ec (l_e_st_esti sigma x s0) (l_e_st_esti sigma x t0)) s (l_imp_th4 (l_e_st_esti sigma s s0) (l_not (l_e_st_esti sigma s t0)) ses0 (l_weli (l_e_st_esti sigma s t0) set0)) : l_not (l_e_st_disj sigma s0 t0)).
-
-(* constant 419 *)
-definition l_e_st_disj_th2 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λs:sigma.λses0:l_e_st_esti sigma s s0.λset0:l_e_st_esti sigma s t0.(l_e_st_disj_th1 sigma t0 s0 s set0 ses0 : l_not (l_e_st_disj sigma t0 s0)).
-
-(* constant 420 *)
-definition l_e_st_issete1 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λi:l_e_is (l_e_st_set sigma) s0 t0.λs:sigma.λses0:l_e_st_esti sigma s s0.(l_e_isp (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_esti sigma s x) s0 t0 ses0 i : l_e_st_esti sigma s t0).
-
-(* constant 421 *)
-definition l_e_st_issete2 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λi:l_e_is (l_e_st_set sigma) s0 t0.λs:sigma.λset0:l_e_st_esti sigma s t0.(l_e_isp1 (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_esti sigma s x) t0 s0 set0 i : l_e_st_esti sigma s s0).
-
-(* constant 422 *)
-definition l_e_st_isset_th1 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λi:l_e_is (l_e_st_set sigma) s0 t0.(λx:sigma.λy:l_e_st_esti sigma x s0.l_e_st_issete1 sigma s0 t0 i x y : l_e_st_incl sigma s0 t0).
-
-(* constant 423 *)
-definition l_e_st_isset_th2 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λi:l_e_is (l_e_st_set sigma) s0 t0.(λx:sigma.λy:l_e_st_esti sigma x t0.l_e_st_issete2 sigma s0 t0 i x y : l_e_st_incl sigma t0 s0).
-
-(* constant 424 *)
-axiom l_e_st_isseti : Πsigma:Type[0].Πs0:l_e_st_set sigma.Πt0:l_e_st_set sigma.∀i:l_e_st_incl sigma s0 t0.∀j:l_e_st_incl sigma t0 s0.l_e_is (l_e_st_set sigma) s0 t0.
-
-(* constant 425 *)
-definition l_e_st_isset_th3 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λs:sigma.λses0:l_e_st_esti sigma s s0.λn:l_not (l_e_st_esti sigma s t0).(l_imp_th3 (l_e_is (l_e_st_set sigma) s0 t0) (l_e_st_esti sigma s t0) n (λt:l_e_is (l_e_st_set sigma) s0 t0.l_e_st_issete1 sigma s0 t0 t s ses0) : l_not (l_e_is (l_e_st_set sigma) s0 t0)).
-
-(* constant 426 *)
-definition l_e_st_isset_th4 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λs:sigma.λses0:l_e_st_esti sigma s s0.λn:l_not (l_e_st_esti sigma s t0).(l_e_symnotis (l_e_st_set sigma) s0 t0 (l_e_st_isset_th3 sigma s0 t0 s ses0 n) : l_not (l_e_is (l_e_st_set sigma) t0 s0)).
-
-(* constant 427 *)
-definition l_e_st_isset_nissetprop ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λs:sigma.(l_and (l_e_st_esti sigma s s0) (l_not (l_e_st_esti sigma s t0)) : Prop).
-
-(* constant 428 *)
-definition l_e_st_isset_t1 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λs:sigma.λn:l_not (l_e_st_isset_nissetprop sigma s0 t0 s).λe:l_e_st_esti sigma s s0.(l_et (l_e_st_esti sigma s t0) (l_and_th3 (l_e_st_esti sigma s s0) (l_not (l_e_st_esti sigma s t0)) n e) : l_e_st_esti sigma s t0).
-
-(* constant 429 *)
-definition l_e_st_isset_t2 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λn:l_not (l_e_is (l_e_st_set sigma) s0 t0).λm:l_not (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma s0 t0 x)).λl:l_none sigma (λx:sigma.l_e_st_isset_nissetprop sigma t0 s0 x).λs:sigma.(l_some_th4 sigma (λx:sigma.l_e_st_isset_nissetprop sigma s0 t0 x) m s : l_not (l_e_st_isset_nissetprop sigma s0 t0 s)).
-
-(* constant 430 *)
-definition l_e_st_isset_t3 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λn:l_not (l_e_is (l_e_st_set sigma) s0 t0).λm:l_not (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma s0 t0 x)).λl:l_none sigma (λx:sigma.l_e_st_isset_nissetprop sigma t0 s0 x).λs:sigma.(l s : l_not (l_e_st_isset_nissetprop sigma t0 s0 s)).
-
-(* constant 431 *)
-definition l_e_st_isset_t4 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λn:l_not (l_e_is (l_e_st_set sigma) s0 t0).λm:l_not (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma s0 t0 x)).λl:l_none sigma (λx:sigma.l_e_st_isset_nissetprop sigma t0 s0 x).(l_e_st_isseti sigma s0 t0 (λx:sigma.λy:l_e_st_esti sigma x s0.l_e_st_isset_t1 sigma s0 t0 x (l_e_st_isset_t2 sigma s0 t0 n m l x) y) (λx:sigma.λy:l_e_st_esti sigma x t0.l_e_st_isset_t1 sigma t0 s0 x (l_e_st_isset_t3 sigma s0 t0 n m l x) y) : l_e_is (l_e_st_set sigma) s0 t0).
-
-(* constant 432 *)
-definition l_e_st_isset_t5 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λn:l_not (l_e_is (l_e_st_set sigma) s0 t0).λm:l_not (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma s0 t0 x)).(l_imp_th3 (l_none sigma (λx:sigma.l_e_st_isset_nissetprop sigma t0 s0 x)) (l_e_is (l_e_st_set sigma) s0 t0) n (λy:l_none sigma (λx:sigma.l_e_st_isset_nissetprop sigma t0 s0 x).l_e_st_isset_t4 sigma s0 t0 n m y) : l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma t0 s0 x)).
-
-(* constant 433 *)
-definition l_e_st_isset_th5 ≝ λsigma:Type[0].λs0:l_e_st_set sigma.λt0:l_e_st_set sigma.λn:l_not (l_e_is (l_e_st_set sigma) s0 t0).(l_or_th1 (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma s0 t0 x)) (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma t0 s0 x)) (λy:l_not (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma s0 t0 x)).l_e_st_isset_t5 sigma s0 t0 n y) : l_or (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma s0 t0 x)) (l_some sigma (λx:sigma.l_e_st_isset_nissetprop sigma t0 s0 x))).
-
-(* constant 434 *)
-definition l_e_st_unmore ≝ λsigma:Type[0].λalpha:Type[0].λsa:Πx:alpha.l_e_st_set sigma.(l_e_st_setof sigma (λx:sigma.l_some alpha (λy:alpha.l_e_st_esti sigma x (sa y))) : l_e_st_set sigma).
-
-(* constant 435 *)
-definition l_e_st_eunmore1 ≝ λsigma:Type[0].λalpha:Type[0].λsa:Πx:alpha.l_e_st_set sigma.λs:sigma.λa:alpha.λseasa:l_e_st_esti sigma s (sa a).(l_e_st_estii sigma (λx:sigma.l_some alpha (λy:alpha.l_e_st_esti sigma x (sa y))) s (l_somei alpha (λy:alpha.l_e_st_esti sigma s (sa y)) a seasa) : l_e_st_esti sigma s (l_e_st_unmore sigma alpha sa)).
-
-(* constant 436 *)
-definition l_e_st_unmoreapp ≝ λsigma:Type[0].λalpha:Type[0].λsa:Πx:alpha.l_e_st_set sigma.λs:sigma.λseun:l_e_st_esti sigma s (l_e_st_unmore sigma alpha sa).λx:Prop.λx1:∀y:alpha.∀z:l_e_st_esti sigma s (sa y).x.(l_someapp alpha (λy:alpha.l_e_st_esti sigma s (sa y)) (l_e_st_estie sigma (λz:sigma.l_some alpha (λy:alpha.l_e_st_esti sigma z (sa y))) s seun) x x1 : x).
-
-(* constant 437 *)
-definition l_e_st_eq_refr ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(refr1 s : r s s).
-
-(* constant 438 *)
-definition l_e_st_eq_symr ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λtsr:r s t.(symr1 s t tsr : r t s).
-
-(* constant 439 *)
-definition l_e_st_eq_trr ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λu:sigma.λtsr:r s t.λutr:r t u.(trr1 s t u tsr utr : r s u).
-
-(* constant 440 *)
-definition l_e_st_eq_tr1r ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λu:sigma.λsur:r u s.λtur:r u t.(l_e_st_eq_trr sigma r refr1 symr1 trr1 s u t (l_e_st_eq_symr sigma r refr1 symr1 trr1 u s sur) tur : r s t).
-
-(* constant 441 *)
-definition l_e_st_eq_tr2r ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λu:sigma.λusr:r s u.λutr:r t u.(l_e_st_eq_trr sigma r refr1 symr1 trr1 s u t usr (l_e_st_eq_symr sigma r refr1 symr1 trr1 t u utr) : r s t).
-
-(* constant 442 *)
-definition l_e_st_eq_ecelt ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(l_e_st_setof sigma (r s) : l_e_st_set sigma).
-
-(* constant 443 *)
-definition l_e_st_eq_1_th1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(l_e_st_estii sigma (r s) s (l_e_st_eq_refr sigma r refr1 symr1 trr1 s) : l_e_st_esti sigma s (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)).
-
-(* constant 444 *)
-definition l_e_st_eq_1_th2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λtsr:r s t.(l_e_st_estii sigma (r s) t tsr : l_e_st_esti sigma t (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)).
-
-(* constant 445 *)
-definition l_e_st_eq_1_th3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λe:l_e_st_esti sigma t (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s).(l_e_st_estie sigma (r s) t e : r s t).
-
-(* constant 446 *)
-definition l_e_st_eq_1_t1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λtsr:r s t.λu:sigma.λe:l_e_st_esti sigma u (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s).(l_e_st_eq_1_th2 sigma r refr1 symr1 trr1 t u (l_e_st_eq_tr1r sigma r refr1 symr1 trr1 t u s tsr (l_e_st_eq_1_th3 sigma r refr1 symr1 trr1 s u e)) : l_e_st_esti sigma u (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t)).
-
-(* constant 447 *)
-definition l_e_st_eq_1_th4 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λtsr:r s t.(l_e_st_isseti sigma (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t) (λx:sigma.λy:l_e_st_esti sigma x (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s).l_e_st_eq_1_t1 sigma r refr1 symr1 trr1 s t tsr x y) (λx:sigma.λy:l_e_st_esti sigma x (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t).l_e_st_eq_1_t1 sigma r refr1 symr1 trr1 t s (l_e_st_eq_symr sigma r refr1 symr1 trr1 s t tsr) x y) : l_e_is (l_e_st_set sigma) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t)).
-
-(* constant 448 *)
-definition l_e_st_eq_1_t2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λn:l_not (r s t).λu:sigma.λe:l_e_st_esti sigma u (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s).(l_imp_th3 (l_e_st_esti sigma u (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t)) (r s t) n (λx:l_e_st_esti sigma u (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t).l_e_st_eq_tr2r sigma r refr1 symr1 trr1 s t u (l_e_st_eq_1_th3 sigma r refr1 symr1 trr1 s u e) (l_e_st_eq_1_th3 sigma r refr1 symr1 trr1 t u x)) : l_not (l_e_st_esti sigma u (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t))).
-
-(* constant 449 *)
-definition l_e_st_eq_1_th5 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λn:l_not (r s t).(λx:sigma.λy:l_e_st_esti sigma x (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s).l_e_st_eq_1_t2 sigma r refr1 symr1 trr1 s t n x y : l_e_st_disj sigma (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t)).
-
-(* constant 450 *)
-definition l_e_st_eq_1_th6 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(l_e_st_nonemptyi sigma (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) s (l_e_st_eq_1_th1 sigma r refr1 symr1 trr1 s) : l_e_st_nonempty sigma (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)).
-
-(* constant 451 *)
-definition l_e_st_eq_ecp ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λs:sigma.(l_e_is (l_e_st_set sigma) s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) : Prop).
-
-(* constant 452 *)
-definition l_e_st_eq_anec ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.(l_some sigma (λx:sigma.l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 x) : Prop).
-
-(* constant 453 *)
-definition l_e_st_eq_2_th1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(l_somei sigma (λx:sigma.l_e_st_eq_ecp sigma r refr1 symr1 trr1 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) x) s (l_e_refis (l_e_st_set sigma) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)) : l_e_st_eq_anec sigma r refr1 symr1 trr1 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)).
-
-(* constant 454 *)
-definition l_e_st_eq_2_t1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λs:sigma.λses0:l_e_st_esti sigma s s0.λt:sigma.λe:l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 t.(l_e_st_issete1 sigma s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t) e s ses0 : l_e_st_esti sigma s (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t)).
-
-(* constant 455 *)
-definition l_e_st_eq_2_t2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λs:sigma.λses0:l_e_st_esti sigma s s0.λt:sigma.λe:l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 t.(l_e_st_eq_1_th4 sigma r refr1 symr1 trr1 t s (l_e_st_eq_1_th3 sigma r refr1 symr1 trr1 t s (l_e_st_eq_2_t1 sigma r refr1 symr1 trr1 s0 ecs0 s ses0 t e)) : l_e_is (l_e_st_set sigma) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)).
-
-(* constant 456 *)
-definition l_e_st_eq_2_t3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λs:sigma.λses0:l_e_st_esti sigma s s0.λt:sigma.λe:l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 t.(l_e_tris (l_e_st_set sigma) s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) e (l_e_st_eq_2_t2 sigma r refr1 symr1 trr1 s0 ecs0 s ses0 t e) : l_e_is (l_e_st_set sigma) s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)).
-
-(* constant 457 *)
-definition l_e_st_eq_2_th2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λs:sigma.λses0:l_e_st_esti sigma s s0.(l_someapp sigma (λx:sigma.l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 x) ecs0 (l_e_is (l_e_st_set sigma) s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)) (λx:sigma.λy:l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 x.l_e_st_eq_2_t3 sigma r refr1 symr1 trr1 s0 ecs0 s ses0 x y) : l_e_is (l_e_st_set sigma) s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s)).
-
-(* constant 458 *)
-definition l_e_st_eq_2_th3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λs:sigma.λses0:l_e_st_esti sigma s s0.λt:sigma.λtes0:l_e_st_esti sigma t s0.(l_e_st_eq_1_th3 sigma r refr1 symr1 trr1 s t (l_e_st_issete1 sigma s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_2_th2 sigma r refr1 symr1 trr1 s0 ecs0 s ses0) t tes0) : r s t).
-
-(* constant 459 *)
-definition l_e_st_eq_2_th4 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λs:sigma.λses0:l_e_st_esti sigma s s0.λt:sigma.λtsr:r s t.(l_e_st_issete2 sigma s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_2_th2 sigma r refr1 symr1 trr1 s0 ecs0 s ses0) t (l_e_st_eq_1_th2 sigma r refr1 symr1 trr1 s t tsr) : l_e_st_esti sigma t s0).
-
-(* constant 460 *)
-definition l_e_st_eq_2_t4 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λs:sigma.λe:l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 s.(l_e_isp (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_nonempty sigma x) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) s0 (l_e_st_eq_1_th6 sigma r refr1 symr1 trr1 s) (l_e_symis (l_e_st_set sigma) s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) e) : l_e_st_nonempty sigma s0).
-
-(* constant 461 *)
-definition l_e_st_eq_2_th5 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.(l_someapp sigma (λx:sigma.l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 x) ecs0 (l_e_st_nonempty sigma s0) (λx:sigma.λy:l_e_st_eq_ecp sigma r refr1 symr1 trr1 s0 x.l_e_st_eq_2_t4 sigma r refr1 symr1 trr1 s0 ecs0 x y) : l_e_st_nonempty sigma s0).
-
-(* constant 462 *)
-definition l_e_st_eq_3_th1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λt0:l_e_st_set sigma.λect0:l_e_st_eq_anec sigma r refr1 symr1 trr1 t0.λs:sigma.λses0:l_e_st_esti sigma s s0.λt:sigma.λtet0:l_e_st_esti sigma t t0.λtsr:r s t.(l_e_tr3is (l_e_st_set sigma) s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t) t0 (l_e_st_eq_2_th2 sigma r refr1 symr1 trr1 s0 ecs0 s ses0) (l_e_st_eq_1_th4 sigma r refr1 symr1 trr1 s t tsr) (l_e_symis (l_e_st_set sigma) t0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t) (l_e_st_eq_2_th2 sigma r refr1 symr1 trr1 t0 ect0 t tet0)) : l_e_is (l_e_st_set sigma) s0 t0).
-
-(* constant 463 *)
-definition l_e_st_eq_3_t1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λt0:l_e_st_set sigma.λect0:l_e_st_eq_anec sigma r refr1 symr1 trr1 t0.λs:sigma.λses0:l_e_st_esti sigma s s0.λt:sigma.λtet0:l_e_st_esti sigma t t0.λn:l_not (r s t).(l_e_isp1 (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_disj sigma x (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t)) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) s0 (l_e_st_eq_1_th5 sigma r refr1 symr1 trr1 s t n) (l_e_st_eq_2_th2 sigma r refr1 symr1 trr1 s0 ecs0 s ses0) : l_e_st_disj sigma s0 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t)).
-
-(* constant 464 *)
-definition l_e_st_eq_3_th2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λt0:l_e_st_set sigma.λect0:l_e_st_eq_anec sigma r refr1 symr1 trr1 t0.λs:sigma.λses0:l_e_st_esti sigma s s0.λt:sigma.λtet0:l_e_st_esti sigma t t0.λn:l_not (r s t).(l_e_isp1 (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_disj sigma s0 x) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t) t0 (l_e_st_eq_3_t1 sigma r refr1 symr1 trr1 s0 ecs0 t0 ect0 s ses0 t tet0 n) (l_e_st_eq_2_th2 sigma r refr1 symr1 trr1 t0 ect0 t tet0) : l_e_st_disj sigma s0 t0).
-
-(* constant 465 *)
-definition l_e_st_eq_3_t2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λt0:l_e_st_set sigma.λi:l_e_is (l_e_st_set sigma) s0 t0.λs:sigma.λses0:l_e_st_esti sigma s s0.(l_e_st_issete1 sigma s0 t0 i s ses0 : l_e_st_esti sigma s t0).
-
-(* constant 466 *)
-definition l_e_st_eq_3_t3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λt0:l_e_st_set sigma.λi:l_e_is (l_e_st_set sigma) s0 t0.λs:sigma.λses0:l_e_st_esti sigma s s0.(l_e_st_disj_th1 sigma s0 t0 s ses0 (l_e_st_eq_3_t2 sigma r refr1 symr1 trr1 s0 ecs0 t0 i s ses0) : l_not (l_e_st_disj sigma s0 t0)).
-
-(* constant 467 *)
-definition l_e_st_eq_3_th3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.λt0:l_e_st_set sigma.λi:l_e_is (l_e_st_set sigma) s0 t0.(l_e_st_nonemptyapp sigma s0 (l_e_st_eq_2_th5 sigma r refr1 symr1 trr1 s0 ecs0) (l_not (l_e_st_disj sigma s0 t0)) (λx:sigma.λy:l_e_st_esti sigma x s0.l_e_st_eq_3_t3 sigma r refr1 symr1 trr1 s0 ecs0 t0 i x y) : l_not (l_e_st_disj sigma s0 t0)).
-
-(* constant 468 *)
-definition l_e_st_eq_ect ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.(l_e_ot (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_eq_anec sigma r refr1 symr1 trr1 x) : Type[0]).
-
-(* constant 469 *)
-definition l_e_st_eq_ectset ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs0:l_e_st_set sigma.λecs0:l_e_st_eq_anec sigma r refr1 symr1 trr1 s0.(l_e_out (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_eq_anec sigma r refr1 symr1 trr1 x) s0 ecs0 : l_e_st_eq_ect sigma r refr1 symr1 trr1).
-
-(* constant 470 *)
-definition l_e_st_eq_ectelt ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(l_e_st_eq_ectset sigma r refr1 symr1 trr1 (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_2_th1 sigma r refr1 symr1 trr1 s) : l_e_st_eq_ect sigma r refr1 symr1 trr1).
-
-(* constant 471 *)
-definition l_e_st_eq_ecect ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_in (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_eq_anec sigma r refr1 symr1 trr1 x) e : l_e_st_set sigma).
-
-(* constant 472 *)
-definition l_e_st_eq_4_th1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_inp (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_eq_anec sigma r refr1 symr1 trr1 x) e : l_e_st_eq_anec sigma r refr1 symr1 trr1 (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)).
-
-(* constant 473 *)
-definition l_e_st_eq_4_th2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_st_eq_2_th5 sigma r refr1 symr1 trr1 (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e) (l_e_st_eq_4_th1 sigma r refr1 symr1 trr1 e) : l_e_st_nonempty sigma (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)).
-
-(* constant 474 *)
-definition l_e_st_eq_4_th3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λx:Prop.λx1:∀y:sigma.∀z:l_e_st_esti sigma y (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).x.(l_e_st_nonemptyapp sigma (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e) (l_e_st_eq_4_th2 sigma r refr1 symr1 trr1 e) x x1 : x).
-
-(* constant 475 *)
-definition l_e_st_eq_4_th4 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(l_e_isinout (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_eq_anec sigma r refr1 symr1 trr1 x) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_2_th1 sigma r refr1 symr1 trr1 s) : l_e_is (l_e_st_set sigma) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ecect sigma r refr1 symr1 trr1 (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s))).
-
-(* constant 476 *)
-definition l_e_st_eq_4_th5 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(l_e_st_issete1 sigma (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ecect sigma r refr1 symr1 trr1 (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s)) (l_e_st_eq_4_th4 sigma r refr1 symr1 trr1 s) s (l_e_st_eq_1_th1 sigma r refr1 symr1 trr1 s) : l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s))).
-
-(* constant 477 *)
-definition l_e_st_eq_4_th6 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.(l_e_st_eunmore1 sigma (l_e_st_eq_ect sigma r refr1 symr1 trr1) (λx:l_e_st_eq_ect sigma r refr1 symr1 trr1.l_e_st_eq_ecect sigma r refr1 symr1 trr1 x) s (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_4_th5 sigma r refr1 symr1 trr1 s) : l_e_st_esti sigma s (l_e_st_unmore sigma (l_e_st_eq_ect sigma r refr1 symr1 trr1) (λx:l_e_st_eq_ect sigma r refr1 symr1 trr1.l_e_st_eq_ecect sigma r refr1 symr1 trr1 x))).
-
-(* constant 478 *)
-definition l_e_st_eq_4_th7 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λt:sigma.λtee:l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_e_st_eq_2_th3 sigma r refr1 symr1 trr1 (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e) (l_e_st_eq_4_th1 sigma r refr1 symr1 trr1 e) s see t tee : r s t).
-
-(* constant 479 *)
-definition l_e_st_eq_4_th8 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λt:sigma.λtsr:r s t.(l_e_st_eq_2_th4 sigma r refr1 symr1 trr1 (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e) (l_e_st_eq_4_th1 sigma r refr1 symr1 trr1 e) s see t tsr : l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)).
-
-(* constant 480 *)
-definition l_e_st_eq_5_th1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λi:l_e_is (l_e_st_eq_ect sigma r refr1 symr1 trr1) e f.(l_e_isini (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_eq_anec sigma r refr1 symr1 trr1 x) e f i : l_e_is (l_e_st_set sigma) (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e) (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f)).
-
-(* constant 481 *)
-definition l_e_st_eq_5_th2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λi:l_e_is (l_e_st_set sigma) (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e) (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f).(l_e_isine (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_eq_anec sigma r refr1 symr1 trr1 x) e f i : l_e_is (l_e_st_eq_ect sigma r refr1 symr1 trr1) e f).
-
-(* constant 482 *)
-definition l_e_st_eq_5_th3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λt:sigma.λtef:l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f).λtsr:r s t.(l_e_st_eq_5_th2 sigma r refr1 symr1 trr1 e f (l_e_st_eq_3_th1 sigma r refr1 symr1 trr1 (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e) (l_e_st_eq_4_th1 sigma r refr1 symr1 trr1 e) (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f) (l_e_st_eq_4_th1 sigma r refr1 symr1 trr1 f) s see t tef tsr) : l_e_is (l_e_st_eq_ect sigma r refr1 symr1 trr1) e f).
-
-(* constant 483 *)
-definition l_e_st_eq_5_th4 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λi:l_e_is (l_e_st_eq_ect sigma r refr1 symr1 trr1) e f.(l_e_st_issete1 sigma (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e) (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f) (l_e_st_eq_5_th1 sigma r refr1 symr1 trr1 e f i) s see : l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f)).
-
-(* constant 484 *)
-definition l_e_st_eq_5_th5 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λt:sigma.λtef:l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f).λi:l_e_is (l_e_st_eq_ect sigma r refr1 symr1 trr1) e f.(l_e_st_eq_2_th3 sigma r refr1 symr1 trr1 (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f) (l_e_st_eq_4_th1 sigma r refr1 symr1 trr1 f) s (l_e_st_eq_5_th4 sigma r refr1 symr1 trr1 e f s see i) t tef : r s t).
-
-(* constant 485 *)
-definition l_e_st_eq_5_th6 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λs:sigma.λt:sigma.λtsr:r s t.(l_e_isouti (l_e_st_set sigma) (λx:l_e_st_set sigma.l_e_st_eq_anec sigma r refr1 symr1 trr1 x) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_2_th1 sigma r refr1 symr1 trr1 s) (l_e_st_eq_ecelt sigma r refr1 symr1 trr1 t) (l_e_st_eq_2_th1 sigma r refr1 symr1 trr1 t) (l_e_st_eq_1_th4 sigma r refr1 symr1 trr1 s t tsr) : l_e_is (l_e_st_eq_ect sigma r refr1 symr1 trr1) (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 t)).
-
-(* constant 486 *)
-definition l_e_st_eq_fixfu ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.(∀x:sigma.∀y:sigma.∀z:r x y.l_e_is alpha (fu x) (fu y) : Prop).
-
-(* constant 487 *)
-definition l_e_st_eq_10_prop1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λs:sigma.(l_and (l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)) (l_e_is alpha (fu s) a1) : Prop).
-
-(* constant 488 *)
-definition l_e_st_eq_10_prop2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.(l_some sigma (λx:sigma.l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 x) : Prop).
-
-(* constant 489 *)
-definition l_e_st_eq_10_t1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_andi (l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)) (l_e_is alpha (fu s) (fu s)) see (l_e_refis alpha (fu s)) : l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e (fu s) s).
-
-(* constant 490 *)
-definition l_e_st_eq_10_t2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_somei sigma (λx:sigma.l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e (fu s) x) s (l_e_st_eq_10_t1 sigma r refr1 symr1 trr1 alpha fu ff e s see) : l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e (fu s)).
-
-(* constant 491 *)
-definition l_e_st_eq_10_t3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_somei alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x) (fu s) (l_e_st_eq_10_t2 sigma r refr1 symr1 trr1 alpha fu ff e s see) : l_some alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x)).
-
-(* constant 492 *)
-definition l_e_st_eq_10_t4 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_st_eq_4_th3 sigma r refr1 symr1 trr1 e (l_some alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x)) (λx:sigma.λy:l_e_st_esti sigma x (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).l_e_st_eq_10_t3 sigma r refr1 symr1 trr1 alpha fu ff e x y) : l_some alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x)).
-
-(* constant 493 *)
-definition l_e_st_eq_10_t5 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λb1:alpha.λpa1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e a1.λpb1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e b1.λs:sigma.λpa1s:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 s.λt:sigma.λpb1t:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e b1 t.(l_ande1 (l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)) (l_e_is alpha (fu s) a1) pa1s : l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)).
-
-(* constant 494 *)
-definition l_e_st_eq_10_t6 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λb1:alpha.λpa1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e a1.λpb1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e b1.λs:sigma.λpa1s:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 s.λt:sigma.λpb1t:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e b1 t.(l_ande1 (l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)) (l_e_is alpha (fu t) b1) pb1t : l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)).
-
-(* constant 495 *)
-definition l_e_st_eq_10_t7 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λb1:alpha.λpa1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e a1.λpb1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e b1.λs:sigma.λpa1s:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 s.λt:sigma.λpb1t:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e b1 t.(l_e_st_eq_4_th7 sigma r refr1 symr1 trr1 e s (l_e_st_eq_10_t5 sigma r refr1 symr1 trr1 alpha fu ff e a1 b1 pa1 pb1 s pa1s t pb1t) t (l_e_st_eq_10_t6 sigma r refr1 symr1 trr1 alpha fu ff e a1 b1 pa1 pb1 s pa1s t pb1t) : r s t).
-
-(* constant 496 *)
-definition l_e_st_eq_10_t8 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λb1:alpha.λpa1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e a1.λpb1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e b1.λs:sigma.λpa1s:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 s.λt:sigma.λpb1t:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e b1 t.(l_ande2 (l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)) (l_e_is alpha (fu s) a1) pa1s : l_e_is alpha (fu s) a1).
-
-(* constant 497 *)
-definition l_e_st_eq_10_t9 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λb1:alpha.λpa1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e a1.λpb1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e b1.λs:sigma.λpa1s:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 s.λt:sigma.λpb1t:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e b1 t.(l_ande2 (l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)) (l_e_is alpha (fu t) b1) pb1t : l_e_is alpha (fu t) b1).
-
-(* constant 498 *)
-definition l_e_st_eq_10_t10 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λb1:alpha.λpa1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e a1.λpb1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e b1.λs:sigma.λpa1s:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 s.λt:sigma.λpb1t:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e b1 t.(l_e_tr3is alpha a1 (fu s) (fu t) b1 (l_e_symis alpha (fu s) a1 (l_e_st_eq_10_t8 sigma r refr1 symr1 trr1 alpha fu ff e a1 b1 pa1 pb1 s pa1s t pb1t)) (ff s t (l_e_st_eq_10_t7 sigma r refr1 symr1 trr1 alpha fu ff e a1 b1 pa1 pb1 s pa1s t pb1t)) (l_e_st_eq_10_t9 sigma r refr1 symr1 trr1 alpha fu ff e a1 b1 pa1 pb1 s pa1s t pb1t) : l_e_is alpha a1 b1).
-
-(* constant 499 *)
-definition l_e_st_eq_10_t11 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λb1:alpha.λpa1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e a1.λpb1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e b1.λs:sigma.λpa1s:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 s.(l_someapp sigma (λx:sigma.l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e b1 x) pb1 (l_e_is alpha a1 b1) (λx:sigma.λy:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e b1 x.l_e_st_eq_10_t10 sigma r refr1 symr1 trr1 alpha fu ff e a1 b1 pa1 pb1 s pa1s x y) : l_e_is alpha a1 b1).
-
-(* constant 500 *)
-definition l_e_st_eq_10_t12 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λa1:alpha.λb1:alpha.λpa1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e a1.λpb1:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e b1.(l_someapp sigma (λx:sigma.l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 x) pa1 (l_e_is alpha a1 b1) (λx:sigma.λy:l_e_st_eq_10_prop1 sigma r refr1 symr1 trr1 alpha fu ff e a1 x.l_e_st_eq_10_t11 sigma r refr1 symr1 trr1 alpha fu ff e a1 b1 pa1 pb1 x y) : l_e_is alpha a1 b1).
-
-(* constant 501 *)
-definition l_e_st_eq_10_t13 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(λx:alpha.λy:alpha.λu:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x.λv:l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e y.l_e_st_eq_10_t12 sigma r refr1 symr1 trr1 alpha fu ff e x y u v : l_e_amone alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x)).
-
-(* constant 502 *)
-definition l_e_st_eq_10_t14 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_onei alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x) (l_e_st_eq_10_t13 sigma r refr1 symr1 trr1 alpha fu ff e) (l_e_st_eq_10_t4 sigma r refr1 symr1 trr1 alpha fu ff e) : l_e_one alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x)).
-
-(* constant 503 *)
-definition l_e_st_eq_indeq ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_ind alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x) (l_e_st_eq_10_t14 sigma r refr1 symr1 trr1 alpha fu ff e) : alpha).
-
-(* constant 504 *)
-definition l_e_st_eq_10_th1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_oneax alpha (λx:alpha.l_e_st_eq_10_prop2 sigma r refr1 symr1 trr1 alpha fu ff e x) (l_e_st_eq_10_t14 sigma r refr1 symr1 trr1 alpha fu ff e) : l_some sigma (λx:sigma.l_and (l_e_st_esti sigma x (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e)) (l_e_is alpha (fu x) (l_e_st_eq_indeq sigma r refr1 symr1 trr1 alpha fu ff e)))).
-
-(* constant 505 *)
-definition l_e_st_eq_10_th2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_e_st_eq_10_t12 sigma r refr1 symr1 trr1 alpha fu ff e (fu s) (l_e_st_eq_indeq sigma r refr1 symr1 trr1 alpha fu ff e) (l_e_st_eq_10_t2 sigma r refr1 symr1 trr1 alpha fu ff e s see) (l_e_st_eq_10_th1 sigma r refr1 symr1 trr1 alpha fu ff e) : l_e_is alpha (fu s) (l_e_st_eq_indeq sigma r refr1 symr1 trr1 alpha fu ff e)).
-
-(* constant 506 *)
-definition l_e_st_eq_10_th3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu:Πx:sigma.alpha.λff:l_e_st_eq_fixfu sigma r refr1 symr1 trr1 alpha fu.λs:sigma.(l_e_st_eq_10_th2 sigma r refr1 symr1 trr1 alpha fu ff (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s) s (l_e_st_eq_4_th5 sigma r refr1 symr1 trr1 s) : l_e_is alpha (fu s) (l_e_st_eq_indeq sigma r refr1 symr1 trr1 alpha fu ff (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s))).
-
-(* constant 507 *)
-definition l_e_st_eq_fixfu2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.(∀x:sigma.∀y:sigma.∀z:sigma.∀u:sigma.∀v:r x y.∀w:r z u.l_e_is alpha (fu2 x z) (fu2 y u) : Prop).
-
-(* constant 508 *)
-definition l_e_st_eq_11_t1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λs:sigma.λt:sigma.λtsr:r s t.λu:sigma.(ff2 s t u u tsr (l_e_st_eq_refr sigma r refr1 symr1 trr1 u) : l_e_is alpha (fu2 s u) (fu2 t u)).
-
-(* constant 509 *)
-definition l_e_st_eq_11_t2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λs:sigma.λt:sigma.λtsr:r s t.(l_e_fisi sigma alpha (fu2 s) (fu2 t) (λx:sigma.l_e_st_eq_11_t1 sigma r refr1 symr1 trr1 alpha fu2 ff2 s t tsr x) : l_e_is (Πx:sigma.alpha) (fu2 s) (fu2 t)).
-
-(* constant 510 *)
-definition l_e_st_eq_11_i ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_st_eq_indeq sigma r refr1 symr1 trr1 (Πx:sigma.alpha) fu2 (λx:sigma.λy:sigma.λz:r x y.l_e_st_eq_11_t2 sigma r refr1 symr1 trr1 alpha fu2 ff2 x y z) e : Πx:sigma.alpha).
-
-(* constant 511 *)
-definition l_e_st_eq_11_t3 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λt:sigma.λtsr:r s t.λu:sigma.λuee:l_e_st_esti sigma u (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_e_st_eq_10_th2 sigma r refr1 symr1 trr1 (Πx:sigma.alpha) fu2 (λx:sigma.λy:sigma.λz:r x y.l_e_st_eq_11_t2 sigma r refr1 symr1 trr1 alpha fu2 ff2 x y z) e u uee : l_e_is (Πx:sigma.alpha) (fu2 u) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e)).
-
-(* constant 512 *)
-definition l_e_st_eq_11_t4 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λt:sigma.λtsr:r s t.λu:sigma.λuee:l_e_st_esti sigma u (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_e_fise sigma alpha (fu2 u) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e) (l_e_st_eq_11_t3 sigma r refr1 symr1 trr1 alpha fu2 ff2 e s t tsr u uee) s : l_e_is alpha (fu2 u s) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e s)).
-
-(* constant 513 *)
-definition l_e_st_eq_11_t5 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λt:sigma.λtsr:r s t.λu:sigma.λuee:l_e_st_esti sigma u (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_e_fise sigma alpha (fu2 u) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e) (l_e_st_eq_11_t3 sigma r refr1 symr1 trr1 alpha fu2 ff2 e s t tsr u uee) t : l_e_is alpha (fu2 u t) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e t)).
-
-(* constant 514 *)
-definition l_e_st_eq_11_t6 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λt:sigma.λtsr:r s t.λu:sigma.λuee:l_e_st_esti sigma u (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(ff2 u u s t (l_e_st_eq_refr sigma r refr1 symr1 trr1 u) tsr : l_e_is alpha (fu2 u s) (fu2 u t)).
-
-(* constant 515 *)
-definition l_e_st_eq_11_t7 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λt:sigma.λtsr:r s t.λu:sigma.λuee:l_e_st_esti sigma u (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).(l_e_tr3is alpha (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e s) (fu2 u s) (fu2 u t) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e t) (l_e_symis alpha (fu2 u s) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e s) (l_e_st_eq_11_t4 sigma r refr1 symr1 trr1 alpha fu2 ff2 e s t tsr u uee)) (l_e_st_eq_11_t6 sigma r refr1 symr1 trr1 alpha fu2 ff2 e s t tsr u uee) (l_e_st_eq_11_t5 sigma r refr1 symr1 trr1 alpha fu2 ff2 e s t tsr u uee) : l_e_is alpha (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e s) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e t)).
-
-(* constant 516 *)
-definition l_e_st_eq_11_t8 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λt:sigma.λtsr:r s t.(l_e_st_eq_4_th3 sigma r refr1 symr1 trr1 e (l_e_is alpha (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e s) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e t)) (λx:sigma.λy:l_e_st_esti sigma x (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).l_e_st_eq_11_t7 sigma r refr1 symr1 trr1 alpha fu2 ff2 e s t tsr x y) : l_e_is alpha (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e s) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e t)).
-
-(* constant 517 *)
-definition l_e_st_eq_indeq2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.(l_e_st_eq_indeq sigma r refr1 symr1 trr1 alpha (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e) (λx:sigma.λy:sigma.λz:r x y.l_e_st_eq_11_t8 sigma r refr1 symr1 trr1 alpha fu2 ff2 e x y z) f : alpha).
-
-(* constant 518 *)
-definition l_e_st_eq_11_t9 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λt:sigma.λtef:l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f).(l_e_st_eq_10_th2 sigma r refr1 symr1 trr1 alpha (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e) (λx:sigma.λy:sigma.λz:r x y.l_e_st_eq_11_t8 sigma r refr1 symr1 trr1 alpha fu2 ff2 e x y z) f t tef : l_e_is alpha (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e t) (l_e_st_eq_indeq2 sigma r refr1 symr1 trr1 alpha fu2 ff2 e f)).
-
-(* constant 519 *)
-definition l_e_st_eq_11_t10 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λt:sigma.λtef:l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f).(l_e_st_eq_10_th2 sigma r refr1 symr1 trr1 (Πx:sigma.alpha) fu2 (λx:sigma.λy:sigma.λz:r x y.l_e_st_eq_11_t2 sigma r refr1 symr1 trr1 alpha fu2 ff2 x y z) e s see : l_e_is (Πx:sigma.alpha) (fu2 s) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e)).
-
-(* constant 520 *)
-definition l_e_st_eq_11_t11 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λt:sigma.λtef:l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f).(l_e_fise sigma alpha (fu2 s) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e) (l_e_st_eq_11_t10 sigma r refr1 symr1 trr1 alpha fu2 ff2 e f s see t tef) t : l_e_is alpha (fu2 s t) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e t)).
-
-(* constant 521 *)
-definition l_e_st_eq_11_th1 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λe:l_e_st_eq_ect sigma r refr1 symr1 trr1.λf:l_e_st_eq_ect sigma r refr1 symr1 trr1.λs:sigma.λsee:l_e_st_esti sigma s (l_e_st_eq_ecect sigma r refr1 symr1 trr1 e).λt:sigma.λtef:l_e_st_esti sigma t (l_e_st_eq_ecect sigma r refr1 symr1 trr1 f).(l_e_tris alpha (fu2 s t) (l_e_st_eq_11_i sigma r refr1 symr1 trr1 alpha fu2 ff2 e t) (l_e_st_eq_indeq2 sigma r refr1 symr1 trr1 alpha fu2 ff2 e f) (l_e_st_eq_11_t11 sigma r refr1 symr1 trr1 alpha fu2 ff2 e f s see t tef) (l_e_st_eq_11_t9 sigma r refr1 symr1 trr1 alpha fu2 ff2 e f s see t tef) : l_e_is alpha (fu2 s t) (l_e_st_eq_indeq2 sigma r refr1 symr1 trr1 alpha fu2 ff2 e f)).
-
-(* constant 522 *)
-definition l_e_st_eq_11_th2 ≝ λsigma:Type[0].λr:∀x:sigma.∀y:sigma.Prop.λrefr1:∀x:sigma.r x x.λsymr1:∀x:sigma.∀y:sigma.∀t:r x y.r y x.λtrr1:∀x:sigma.∀y:sigma.∀z:sigma.∀t:r x y.∀u:r y z.r x z.λalpha:Type[0].λfu2:Πx:sigma.Πy:sigma.alpha.λff2:l_e_st_eq_fixfu2 sigma r refr1 symr1 trr1 alpha fu2.λs:sigma.λt:sigma.(l_e_st_eq_11_th1 sigma r refr1 symr1 trr1 alpha fu2 ff2 (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 t) s (l_e_st_eq_4_th5 sigma r refr1 symr1 trr1 s) t (l_e_st_eq_4_th5 sigma r refr1 symr1 trr1 t) : l_e_is alpha (fu2 s t) (l_e_st_eq_indeq2 sigma r refr1 symr1 trr1 alpha fu2 ff2 (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 s) (l_e_st_eq_ectelt sigma r refr1 symr1 trr1 t))).
-
-(* constant 523 *)
-axiom l_e_st_eq_landau_n_nat : Type[0].
-
-(* constant 524 *)
-definition l_e_st_eq_landau_n_is ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_is l_e_st_eq_landau_n_nat x y : Prop).
-
-(* constant 525 *)
-definition l_e_st_eq_landau_n_nis ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_not (l_e_st_eq_landau_n_is x y) : Prop).
-
-(* constant 526 *)
-definition l_e_st_eq_landau_n_in ≝ λx:l_e_st_eq_landau_n_nat.λs:l_e_st_set l_e_st_eq_landau_n_nat.(l_e_st_esti l_e_st_eq_landau_n_nat x s : Prop).
-
-(* constant 527 *)
-definition l_e_st_eq_landau_n_some ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.(l_some l_e_st_eq_landau_n_nat p : Prop).
-
-(* constant 528 *)
-definition l_e_st_eq_landau_n_all ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.(l_all l_e_st_eq_landau_n_nat p : Prop).
-
-(* constant 529 *)
-definition l_e_st_eq_landau_n_one ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.(l_e_one l_e_st_eq_landau_n_nat p : Prop).
-
-(* constant 530 *)
-axiom l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat.
-
-(* constant 531 *)
-axiom l_e_st_eq_landau_n_suc : Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.
-
-(* constant 532 *)
-definition l_e_st_eq_landau_n_ax2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_suc x y i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc y)).
-
-(* constant 533 *)
-axiom l_e_st_eq_landau_n_ax3 : ∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_suc x) l_e_st_eq_landau_n_1.
-
-(* constant 534 *)
-axiom l_e_st_eq_landau_n_ax4 : ∀x:l_e_st_eq_landau_n_nat.∀y:l_e_st_eq_landau_n_nat.∀u:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc y).l_e_st_eq_landau_n_is x y.
-
-(* constant 535 *)
-definition l_e_st_eq_landau_n_cond1 ≝ λs:l_e_st_set l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_in l_e_st_eq_landau_n_1 s : Prop).
-
-(* constant 536 *)
-definition l_e_st_eq_landau_n_cond2 ≝ λs:l_e_st_set l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_all (λx:l_e_st_eq_landau_n_nat.l_imp (l_e_st_eq_landau_n_in x s) (l_e_st_eq_landau_n_in (l_e_st_eq_landau_n_suc x) s)) : Prop).
-
-(* constant 537 *)
-axiom l_e_st_eq_landau_n_ax5 : ∀s:l_e_st_set l_e_st_eq_landau_n_nat.∀u:l_e_st_eq_landau_n_cond1 s.∀v:l_e_st_eq_landau_n_cond2 s.∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_in x s.
-
-(* constant 538 *)
-definition l_e_st_eq_landau_n_i1_s ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn1p:p l_e_st_eq_landau_n_1.λxsp:∀x:l_e_st_eq_landau_n_nat.∀y:p x.p (l_e_st_eq_landau_n_suc x).λx:l_e_st_eq_landau_n_nat.(l_e_st_setof l_e_st_eq_landau_n_nat p : l_e_st_set l_e_st_eq_landau_n_nat).
-
-(* constant 539 *)
-definition l_e_st_eq_landau_n_i1_t1 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn1p:p l_e_st_eq_landau_n_1.λxsp:∀x:l_e_st_eq_landau_n_nat.∀y:p x.p (l_e_st_eq_landau_n_suc x).λx:l_e_st_eq_landau_n_nat.(l_e_st_estii l_e_st_eq_landau_n_nat p l_e_st_eq_landau_n_1 n1p : l_e_st_eq_landau_n_cond1 (l_e_st_eq_landau_n_i1_s p n1p xsp x)).
-
-(* constant 540 *)
-definition l_e_st_eq_landau_n_i1_t2 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn1p:p l_e_st_eq_landau_n_1.λxsp:∀x:l_e_st_eq_landau_n_nat.∀y:p x.p (l_e_st_eq_landau_n_suc x).λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λyes:l_e_st_eq_landau_n_in y (l_e_st_eq_landau_n_i1_s p n1p xsp x).(l_e_st_estie l_e_st_eq_landau_n_nat p y yes : p y).
-
-(* constant 541 *)
-definition l_e_st_eq_landau_n_i1_t3 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn1p:p l_e_st_eq_landau_n_1.λxsp:∀x:l_e_st_eq_landau_n_nat.∀y:p x.p (l_e_st_eq_landau_n_suc x).λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λyes:l_e_st_eq_landau_n_in y (l_e_st_eq_landau_n_i1_s p n1p xsp x).(l_e_st_estii l_e_st_eq_landau_n_nat p (l_e_st_eq_landau_n_suc y) (xsp y (l_e_st_eq_landau_n_i1_t2 p n1p xsp x y yes)) : l_e_st_eq_landau_n_in (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_i1_s p n1p xsp x)).
-
-(* constant 542 *)
-definition l_e_st_eq_landau_n_i1_t4 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn1p:p l_e_st_eq_landau_n_1.λxsp:∀x:l_e_st_eq_landau_n_nat.∀y:p x.p (l_e_st_eq_landau_n_suc x).λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ax5 (l_e_st_eq_landau_n_i1_s p n1p xsp x) (l_e_st_eq_landau_n_i1_t1 p n1p xsp x) (λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_in y (l_e_st_eq_landau_n_i1_s p n1p xsp x).l_e_st_eq_landau_n_i1_t3 p n1p xsp x y u) x : l_e_st_eq_landau_n_in x (l_e_st_eq_landau_n_i1_s p n1p xsp x)).
-
-(* constant 543 *)
-definition l_e_st_eq_landau_n_induction ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn1p:p l_e_st_eq_landau_n_1.λxsp:∀x:l_e_st_eq_landau_n_nat.∀y:p x.p (l_e_st_eq_landau_n_suc x).λx:l_e_st_eq_landau_n_nat.(l_e_st_estie l_e_st_eq_landau_n_nat p x (l_e_st_eq_landau_n_i1_t4 p n1p xsp x) : p x).
-
-(* constant 544 *)
-definition l_e_st_eq_landau_n_21_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x y.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc y).(l_e_st_eq_landau_n_ax4 x y i : l_e_st_eq_landau_n_is x y).
-
-(* constant 545 *)
-definition l_e_st_eq_landau_n_satz1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x y.(l_imp_th3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_is x y) n (λu:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc y).l_e_st_eq_landau_n_21_t1 x y n u) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc y)).
-
-(* constant 546 *)
-definition l_e_st_eq_landau_n_22_prop1 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_suc x) x : Prop).
-
-(* constant 547 *)
-definition l_e_st_eq_landau_n_22_t1 ≝ (l_e_st_eq_landau_n_ax3 l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_22_prop1 l_e_st_eq_landau_n_1).
-
-(* constant 548 *)
-definition l_e_st_eq_landau_n_22_t2 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_22_prop1 x.(l_e_st_eq_landau_n_satz1 (l_e_st_eq_landau_n_suc x) x p : l_e_st_eq_landau_n_22_prop1 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 549 *)
-definition l_e_st_eq_landau_n_satz2 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_22_prop1 y) l_e_st_eq_landau_n_22_t1 (λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_22_prop1 y.l_e_st_eq_landau_n_22_t2 y u) x : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_suc x) x).
-
-(* constant 550 *)
-definition l_e_st_eq_landau_n_23_prop1 ≝ λx:l_e_st_eq_landau_n_nat.(l_or (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u))) : Prop).
-
-(* constant 551 *)
-definition l_e_st_eq_landau_n_23_t1 ≝ (l_ori1 (l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_suc u))) (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_23_prop1 l_e_st_eq_landau_n_1).
-
-(* constant 552 *)
-definition l_e_st_eq_landau_n_23_t2 ≝ λx:l_e_st_eq_landau_n_nat.(l_somei l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc u)) x (l_e_refis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc x)) : l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc u))).
-
-(* constant 553 *)
-definition l_e_st_eq_landau_n_23_t3 ≝ λx:l_e_st_eq_landau_n_nat.(l_ori2 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_suc u))) (l_e_st_eq_landau_n_23_t2 x) : l_e_st_eq_landau_n_23_prop1 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 554 *)
-definition l_e_st_eq_landau_n_23_t4 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_23_prop1 y) l_e_st_eq_landau_n_23_t1 (λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_23_prop1 y.l_e_st_eq_landau_n_23_t3 y) x : l_e_st_eq_landau_n_23_prop1 x).
-
-(* constant 555 *)
-definition l_e_st_eq_landau_n_satz3 ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_ore2 (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u))) (l_e_st_eq_landau_n_23_t4 x) n : l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u))).
-
-(* constant 556 *)
-definition l_e_st_eq_landau_n_23_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc y).λj:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc z).(l_e_st_eq_landau_n_ax4 y z (l_e_tris1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_suc z) x i j) : l_e_st_eq_landau_n_is y z).
-
-(* constant 557 *)
-definition l_e_st_eq_landau_n_23_t6 ≝ λx:l_e_st_eq_landau_n_nat.(λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc y).λv:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc z).l_e_st_eq_landau_n_23_t5 x y z u v : l_e_amone l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u))).
-
-(* constant 558 *)
-definition l_e_st_eq_landau_n_satz3a ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_onei l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_23_t6 x) (l_e_st_eq_landau_n_satz3 x n) : l_e_st_eq_landau_n_one (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u))).
-
-(* constant 559 *)
-definition l_e_st_eq_landau_n_24_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_all (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (f y))) : Prop).
-
-(* constant 560 *)
-definition l_e_st_eq_landau_n_24_prop2 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.(l_and (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x f) : Prop).
-
-(* constant 561 *)
-definition l_e_st_eq_landau_n_24_prop3 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is (a y) (b y) : Prop).
-
-(* constant 562 *)
-definition l_e_st_eq_landau_n_24_t1 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.(l_ande1 (l_e_st_eq_landau_n_is (a l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x a) pa : l_e_st_eq_landau_n_is (a l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)).
-
-(* constant 563 *)
-definition l_e_st_eq_landau_n_24_t2 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.(l_ande1 (l_e_st_eq_landau_n_is (b l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x b) pb : l_e_st_eq_landau_n_is (b l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)).
-
-(* constant 564 *)
-definition l_e_st_eq_landau_n_24_t3 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.(l_e_tris2 l_e_st_eq_landau_n_nat (a l_e_st_eq_landau_n_1) (b l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_24_t1 x a b pa pb) (l_e_st_eq_landau_n_24_t2 x a b pa pb) : l_e_st_eq_landau_n_24_prop3 x a b pa pb l_e_st_eq_landau_n_1).
-
-(* constant 565 *)
-definition l_e_st_eq_landau_n_24_t4 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop3 x a b pa pb y.(l_e_st_eq_landau_n_ax2 (a y) (b y) p : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (a y)) (l_e_st_eq_landau_n_suc (b y))).
-
-(* constant 566 *)
-definition l_e_st_eq_landau_n_24_t5 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop3 x a b pa pb y.(l_ande2 (l_e_st_eq_landau_n_is (a l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x a) pa : l_e_st_eq_landau_n_24_prop1 x a).
-
-(* constant 567 *)
-definition l_e_st_eq_landau_n_24_t6 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop3 x a b pa pb y.(l_ande2 (l_e_st_eq_landau_n_is (b l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x b) pb : l_e_st_eq_landau_n_24_prop1 x b).
-
-(* constant 568 *)
-definition l_e_st_eq_landau_n_24_t7 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop3 x a b pa pb y.(l_e_st_eq_landau_n_24_t5 x a b pa pb y p y : l_e_st_eq_landau_n_is (a (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (a y))).
-
-(* constant 569 *)
-definition l_e_st_eq_landau_n_24_t8 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop3 x a b pa pb y.(l_e_st_eq_landau_n_24_t6 x a b pa pb y p y : l_e_st_eq_landau_n_is (b (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (b y))).
-
-(* constant 570 *)
-definition l_e_st_eq_landau_n_24_t9 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop3 x a b pa pb y.(l_e_tr3is l_e_st_eq_landau_n_nat (a (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (a y)) (l_e_st_eq_landau_n_suc (b y)) (b (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_24_t7 x a b pa pb y p) (l_e_st_eq_landau_n_24_t4 x a b pa pb y p) (l_e_symis l_e_st_eq_landau_n_nat (b (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (b y)) (l_e_st_eq_landau_n_24_t8 x a b pa pb y p)) : l_e_st_eq_landau_n_24_prop3 x a b pa pb (l_e_st_eq_landau_n_suc y)).
-
-(* constant 571 *)
-definition l_e_st_eq_landau_n_24_t10 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop3 x a b pa pb z) (l_e_st_eq_landau_n_24_t3 x a b pa pb) (λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_24_prop3 x a b pa pb z.l_e_st_eq_landau_n_24_t9 x a b pa pb z u) y : l_e_st_eq_landau_n_24_prop3 x a b pa pb y).
-
-(* constant 572 *)
-definition l_e_st_eq_landau_n_24_t11 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_24_prop2 x a.λpb:l_e_st_eq_landau_n_24_prop2 x b.(l_e_fisi l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat a b (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_t10 x a b pa pb y) : l_e_is (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) a b).
-
-(* constant 573 *)
-definition l_e_st_eq_landau_n_24_aa ≝ λx:l_e_st_eq_landau_n_nat.(λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λu:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_24_prop2 x z.λw:l_e_st_eq_landau_n_24_prop2 x u.l_e_st_eq_landau_n_24_t11 x z u v w : l_e_amone (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop2 x z)).
-
-(* constant 574 *)
-definition l_e_st_eq_landau_n_24_prop4 ≝ λx:l_e_st_eq_landau_n_nat.(l_some (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop2 x z) : Prop).
-
-(* constant 575 *)
-definition l_e_st_eq_landau_n_24_t12 ≝ (λx:l_e_st_eq_landau_n_nat.l_e_refis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_suc x)) : l_e_st_eq_landau_n_24_prop1 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_suc).
-
-(* constant 576 *)
-definition l_e_st_eq_landau_n_24_t13 ≝ (l_andi (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_24_prop1 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_suc) (l_e_refis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_24_t12 : l_e_st_eq_landau_n_24_prop2 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_suc).
-
-(* constant 577 *)
-definition l_e_st_eq_landau_n_24_t14 ≝ (l_somei (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop2 l_e_st_eq_landau_n_1 z) l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_24_t13 : l_e_st_eq_landau_n_24_prop4 l_e_st_eq_landau_n_1).
-
-(* constant 578 *)
-definition l_e_st_eq_landau_n_24_g ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.(λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_suc (f y) : Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat).
-
-(* constant 579 *)
-definition l_e_st_eq_landau_n_24_t15 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_e_refis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_24_g x p f pf y) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_24_g x p f pf y) (l_e_st_eq_landau_n_suc (f y))).
-
-(* constant 580 *)
-definition l_e_st_eq_landau_n_24_t16 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.(l_ande1 (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x f) pf : l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)).
-
-(* constant 581 *)
-definition l_e_st_eq_landau_n_24_t17 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_24_g x p f pf l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (f l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_t15 x p f pf l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ax2 (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_24_t16 x p f pf)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_24_g x p f pf l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_suc x))).
-
-(* constant 582 *)
-definition l_e_st_eq_landau_n_24_t18 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_ande2 (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x f) pf : l_e_st_eq_landau_n_24_prop1 x f).
-
-(* constant 583 *)
-definition l_e_st_eq_landau_n_24_t19 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_24_t18 x p f pf y y : l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (f y))).
-
-(* constant 584 *)
-definition l_e_st_eq_landau_n_24_t20 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_e_tris2 l_e_st_eq_landau_n_nat (f (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_24_g x p f pf y) (l_e_st_eq_landau_n_suc (f y)) (l_e_st_eq_landau_n_24_t19 x p f pf y) (l_e_st_eq_landau_n_24_t15 x p f pf y) : l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_24_g x p f pf y)).
-
-(* constant 585 *)
-definition l_e_st_eq_landau_n_24_t21 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_24_g x p f pf (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (f (l_e_st_eq_landau_n_suc y))) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_24_g x p f pf y)) (l_e_st_eq_landau_n_24_t15 x p f pf (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_ax2 (f (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_24_g x p f pf y) (l_e_st_eq_landau_n_24_t20 x p f pf y)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_24_g x p f pf (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_24_g x p f pf y))).
-
-(* constant 586 *)
-definition l_e_st_eq_landau_n_24_t22 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.(λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_t21 x p f pf y : l_e_st_eq_landau_n_24_prop1 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_24_g x p f pf)).
-
-(* constant 587 *)
-definition l_e_st_eq_landau_n_24_t23 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.(l_andi (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_24_g x p f pf l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_suc x))) (l_e_st_eq_landau_n_24_prop1 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_24_g x p f pf)) (l_e_st_eq_landau_n_24_t17 x p f pf) (l_e_st_eq_landau_n_24_t22 x p f pf) : l_e_st_eq_landau_n_24_prop2 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_24_g x p f pf)).
-
-(* constant 588 *)
-definition l_e_st_eq_landau_n_24_t24 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_24_prop2 x f.(l_somei (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop2 (l_e_st_eq_landau_n_suc x) z) (l_e_st_eq_landau_n_24_g x p f pf) (l_e_st_eq_landau_n_24_t23 x p f pf) : l_e_st_eq_landau_n_24_prop4 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 589 *)
-definition l_e_st_eq_landau_n_24_t25 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_24_prop4 x.(l_someapp (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop2 x z) p (l_e_st_eq_landau_n_24_prop4 (l_e_st_eq_landau_n_suc x)) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_24_prop2 x z.l_e_st_eq_landau_n_24_t24 x p z u) : l_e_st_eq_landau_n_24_prop4 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 590 *)
-definition l_e_st_eq_landau_n_24_bb ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop4 y) l_e_st_eq_landau_n_24_t14 (λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_24_prop4 y.l_e_st_eq_landau_n_24_t25 y u) x : l_e_st_eq_landau_n_24_prop4 x).
-
-(* constant 591 *)
-definition l_e_st_eq_landau_n_satz4 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_onei (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop2 x z) (l_e_st_eq_landau_n_24_aa x) (l_e_st_eq_landau_n_24_bb x) : l_e_one (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_is (z l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_all (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is (z (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (z y)))))).
-
-(* constant 592 *)
-definition l_e_st_eq_landau_n_plus ≝ λx:l_e_st_eq_landau_n_nat.(l_e_ind (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop2 x z) (l_e_st_eq_landau_n_satz4 x) : Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat).
-
-(* constant 593 *)
-definition l_e_st_eq_landau_n_pl ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_plus x y : l_e_st_eq_landau_n_nat).
-
-(* constant 594 *)
-definition l_e_st_eq_landau_n_24_t26 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_oneax (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_24_prop2 x z) (l_e_st_eq_landau_n_satz4 x) : l_e_st_eq_landau_n_24_prop2 x (l_e_st_eq_landau_n_plus x)).
-
-(* constant 595 *)
-definition l_e_st_eq_landau_n_satz4a ≝ λx:l_e_st_eq_landau_n_nat.(l_ande1 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_plus x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x (l_e_st_eq_landau_n_plus x)) (l_e_st_eq_landau_n_24_t26 x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)).
-
-(* constant 596 *)
-definition l_e_st_eq_landau_n_24_t27 ≝ λx:l_e_st_eq_landau_n_nat.(l_ande2 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_plus x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_prop1 x (l_e_st_eq_landau_n_plus x)) (l_e_st_eq_landau_n_24_t26 x) : l_e_st_eq_landau_n_24_prop1 x (l_e_st_eq_landau_n_plus x)).
-
-(* constant 597 *)
-definition l_e_st_eq_landau_n_satz4b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_24_t27 x y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y))).
-
-(* constant 598 *)
-definition l_e_st_eq_landau_n_24_t28 ≝ (l_e_st_eq_landau_n_24_t11 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_plus l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_24_t26 l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_24_t13 : l_e_is (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (l_e_st_eq_landau_n_plus l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_suc).
-
-(* constant 599 *)
-definition l_e_st_eq_landau_n_satz4c ≝ λx:l_e_st_eq_landau_n_nat.(l_e_fise l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_plus l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_24_t28 x : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 x) (l_e_st_eq_landau_n_suc x)).
-
-(* constant 600 *)
-definition l_e_st_eq_landau_n_24_t29 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_24_t11 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_plus (l_e_st_eq_landau_n_suc x)) (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_plus x y)) (l_e_st_eq_landau_n_24_t26 (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_24_t23 x (l_e_st_eq_landau_n_24_bb x) (l_e_st_eq_landau_n_plus x) (l_e_st_eq_landau_n_24_t26 x)) : l_e_is (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (l_e_st_eq_landau_n_plus (l_e_st_eq_landau_n_suc x)) (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_plus x y))).
-
-(* constant 601 *)
-definition l_e_st_eq_landau_n_satz4d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_fise l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_plus (l_e_st_eq_landau_n_suc x)) (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_plus x z)) (l_e_st_eq_landau_n_24_t29 x) y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y))).
-
-(* constant 602 *)
-definition l_e_st_eq_landau_n_satz4e ≝ λx:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 603 *)
-definition l_e_st_eq_landau_n_satz4f ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_satz4b x y) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y))).
-
-(* constant 604 *)
-definition l_e_st_eq_landau_n_satz4g ≝ λx:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 x) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_satz4c x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 x)).
-
-(* constant 605 *)
-definition l_e_st_eq_landau_n_satz4h ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_satz4d x y) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc x) y)).
-
-(* constant 606 *)
-definition l_e_st_eq_landau_n_ispl1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_pl u z) x y i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 607 *)
-definition l_e_st_eq_landau_n_ispl2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_pl z u) x y i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y)).
-
-(* constant 608 *)
-definition l_e_st_eq_landau_n_ispl12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_ispl1 x y z i) (l_e_st_eq_landau_n_ispl2 z u y j) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 609 *)
-definition l_e_st_eq_landau_n_25_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y z)) : Prop).
-
-(* constant 610 *)
-definition l_e_st_eq_landau_n_25_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_satz4a (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_satz4f x y) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_satz4e y)) : l_e_st_eq_landau_n_25_prop1 x y l_e_st_eq_landau_n_1).
-
-(* constant 611 *)
-definition l_e_st_eq_landau_n_25_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_25_prop1 x y z.(l_e_st_eq_landau_n_ax2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y z)) p : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) z)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y z)))).
-
-(* constant 612 *)
-definition l_e_st_eq_landau_n_25_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_25_prop1 x y z.(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_suc z)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) z)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y z))) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl y z))) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc z))) (l_e_st_eq_landau_n_satz4b (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_25_t2 x y z p) (l_e_st_eq_landau_n_satz4f x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc z)) x (l_e_st_eq_landau_n_satz4f y z)) : l_e_st_eq_landau_n_25_prop1 x y (l_e_st_eq_landau_n_suc z)).
-
-(* constant 613 *)
-definition l_e_st_eq_landau_n_satz5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_25_prop1 x y u) (l_e_st_eq_landau_n_25_t1 x y) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_25_prop1 x y u.l_e_st_eq_landau_n_25_t3 x y u v) z : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y z))).
-
-(* constant 614 *)
-definition l_e_st_eq_landau_n_asspl1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz5 x y z : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y z))).
-
-(* constant 615 *)
-definition l_e_st_eq_landau_n_asspl2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_satz5 x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x y) z)).
-
-(* constant 616 *)
-definition l_e_st_eq_landau_n_26_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl y x) : Prop).
-
-(* constant 617 *)
-definition l_e_st_eq_landau_n_26_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz4a y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc y)).
-
-(* constant 618 *)
-definition l_e_st_eq_landau_n_26_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz4c y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 y) (l_e_st_eq_landau_n_suc y)).
-
-(* constant 619 *)
-definition l_e_st_eq_landau_n_26_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tris2 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 y) (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_26_t2 x y) (l_e_st_eq_landau_n_26_t1 x y) : l_e_st_eq_landau_n_26_prop1 l_e_st_eq_landau_n_1 y).
-
-(* constant 620 *)
-definition l_e_st_eq_landau_n_26_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_26_prop1 x y.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl y x)) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_ax2 (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl y x) p) (l_e_st_eq_landau_n_satz4f y x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc x))).
-
-(* constant 621 *)
-definition l_e_st_eq_landau_n_26_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_26_prop1 x y.(l_e_st_eq_landau_n_satz4d x y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y))).
-
-(* constant 622 *)
-definition l_e_st_eq_landau_n_26_t6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_26_prop1 x y.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_26_t5 x y p) (l_e_st_eq_landau_n_26_t4 x y p) : l_e_st_eq_landau_n_26_prop1 (l_e_st_eq_landau_n_suc x) y).
-
-(* constant 623 *)
-definition l_e_st_eq_landau_n_satz6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_26_prop1 z y) (l_e_st_eq_landau_n_26_t3 x y) (λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_26_prop1 z y.l_e_st_eq_landau_n_26_t6 z y u) x : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl y x)).
-
-(* constant 624 *)
-definition l_e_st_eq_landau_n_compl ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz6 x y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl y x)).
-
-(* constant 625 *)
-definition l_e_st_eq_landau_n_26_t7 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 x) (l_e_st_eq_landau_n_satz4a x) (l_e_st_eq_landau_n_satz4g x) : l_e_st_eq_landau_n_26_prop1 x l_e_st_eq_landau_n_1).
-
-(* constant 626 *)
-definition l_e_st_eq_landau_n_26_t8 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_26_prop1 x y.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl y x)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc y) x) (l_e_st_eq_landau_n_satz4b x y) (l_e_st_eq_landau_n_ax2 (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl y x) p) (l_e_st_eq_landau_n_satz4h y x) : l_e_st_eq_landau_n_26_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 627 *)
-definition l_e_st_eq_landau_n_26_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_26_prop1 x z) (l_e_st_eq_landau_n_26_t7 x) (λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_26_prop1 x z.l_e_st_eq_landau_n_26_t8 x z u) y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl y x)).
-
-(* constant 628 *)
-definition l_e_st_eq_landau_n_27_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_nis y (l_e_st_eq_landau_n_pl x y) : Prop).
-
-(* constant 629 *)
-definition l_e_st_eq_landau_n_27_t1 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_symnotis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_ax3 x) : l_e_st_eq_landau_n_nis l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 630 *)
-definition l_e_st_eq_landau_n_27_t2 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_notis_th4 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_27_t1 x) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_27_prop1 x l_e_st_eq_landau_n_1).
-
-(* constant 631 *)
-definition l_e_st_eq_landau_n_27_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_27_prop1 x y.(l_e_st_eq_landau_n_satz1 y (l_e_st_eq_landau_n_pl x y) p : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y))).
-
-(* constant 632 *)
-definition l_e_st_eq_landau_n_27_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_27_prop1 x y.(l_e_notis_th4 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_27_t3 x y p) (l_e_st_eq_landau_n_satz4b x y) : l_e_st_eq_landau_n_27_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 633 *)
-definition l_e_st_eq_landau_n_satz7 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_27_prop1 x z) (l_e_st_eq_landau_n_27_t2 x) (λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_27_prop1 x z.l_e_st_eq_landau_n_27_t4 x z u) y : l_e_st_eq_landau_n_nis y (l_e_st_eq_landau_n_pl x y)).
-
-(* constant 634 *)
-definition l_e_st_eq_landau_n_28_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis y z.(l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl x z) : Prop).
-
-(* constant 635 *)
-definition l_e_st_eq_landau_n_28_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis y z.(l_e_st_eq_landau_n_satz1 y z n : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_suc z)).
-
-(* constant 636 *)
-definition l_e_st_eq_landau_n_28_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis y z.(l_e_notis_th5 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_suc z) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 y) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 z) (l_e_st_eq_landau_n_28_t1 x y z n) (l_e_st_eq_landau_n_satz4g y) (l_e_st_eq_landau_n_satz4g z) : l_e_st_eq_landau_n_28_prop1 l_e_st_eq_landau_n_1 y z n).
-
-(* constant 637 *)
-definition l_e_st_eq_landau_n_28_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis y z.λp:l_e_st_eq_landau_n_28_prop1 x y z n.(l_e_st_eq_landau_n_satz1 (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl x z) p : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x z))).
-
-(* constant 638 *)
-definition l_e_st_eq_landau_n_28_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis y z.λp:l_e_st_eq_landau_n_28_prop1 x y z n.(l_e_notis_th5 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc x) z) (l_e_st_eq_landau_n_28_t3 x y z n p) (l_e_st_eq_landau_n_satz4h x y) (l_e_st_eq_landau_n_satz4h x z) : l_e_st_eq_landau_n_28_prop1 (l_e_st_eq_landau_n_suc x) y z n).
-
-(* constant 639 *)
-definition l_e_st_eq_landau_n_satz8 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis y z.(l_e_st_eq_landau_n_induction (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_28_prop1 u y z n) (l_e_st_eq_landau_n_28_t2 x y z n) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_28_prop1 u y z n.l_e_st_eq_landau_n_28_t4 u y z n v) x : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl x z)).
-
-(* constant 640 *)
-definition l_e_st_eq_landau_n_satz8a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl x z).(l_imp_th7 (l_e_st_eq_landau_n_is y z) (l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl x z)) (l_weli (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl x z)) i) (λu:l_e_st_eq_landau_n_nis y z.l_e_st_eq_landau_n_satz8 x y z u) : l_e_st_eq_landau_n_is y z).
-
-(* constant 641 *)
-definition l_e_st_eq_landau_n_diffprop ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl y z) : Prop).
-
-(* constant 642 *)
-definition l_e_st_eq_landau_n_28_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λdv:l_e_st_eq_landau_n_diffprop x y v.(l_e_st_eq_landau_n_satz8a y u v (l_e_tris1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl y v) x du dv) : l_e_st_eq_landau_n_is u v).
-
-(* constant 643 *)
-definition l_e_st_eq_landau_n_satz8b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λdv:l_e_st_eq_landau_n_diffprop x y v.l_e_st_eq_landau_n_28_t5 x y u v du dv : l_e_amone l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl y z))).
-
-(* constant 644 *)
-definition l_e_st_eq_landau_n_29_i ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is x y : Prop).
-
-(* constant 645 *)
-definition l_e_st_eq_landau_n_29_ii ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u) : Prop).
-
-(* constant 646 *)
-definition l_e_st_eq_landau_n_29_iii ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_some (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop y x v) : Prop).
-
-(* constant 647 *)
-definition l_e_st_eq_landau_n_29_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λone1:l_e_st_eq_landau_n_29_i x y.λu:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl u x) (l_e_st_eq_landau_n_pl x u) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_compl u x) (l_e_st_eq_landau_n_ispl1 x y u one1) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl u x) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 648 *)
-definition l_e_st_eq_landau_n_29_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λone1:l_e_st_eq_landau_n_29_i x y.λu:l_e_st_eq_landau_n_nat.(l_e_notis_th3 l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl u x) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_satz7 u x) (l_e_st_eq_landau_n_29_t1 x y one1 u) : l_e_st_eq_landau_n_nis x (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 649 *)
-definition l_e_st_eq_landau_n_29_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λone1:l_e_st_eq_landau_n_29_i x y.(l_some_th5 l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u) (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_29_t2 x y one1 u) : l_not (l_e_st_eq_landau_n_29_ii x y)).
-
-(* constant 650 *)
-definition l_e_st_eq_landau_n_29_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_ec_th1 (l_e_st_eq_landau_n_29_i x y) (l_e_st_eq_landau_n_29_ii x y) (λz:l_e_st_eq_landau_n_29_i x y.l_e_st_eq_landau_n_29_t3 x y z) : l_ec (l_e_st_eq_landau_n_29_i x y) (l_e_st_eq_landau_n_29_ii x y)).
-
-(* constant 651 *)
-definition l_e_st_eq_landau_n_29_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λone1:l_e_st_eq_landau_n_29_i x y.(l_e_st_eq_landau_n_29_t3 y x (l_e_symis l_e_st_eq_landau_n_nat x y one1) : l_not (l_e_st_eq_landau_n_29_iii x y)).
-
-(* constant 652 *)
-definition l_e_st_eq_landau_n_29_t6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_ec_th2 (l_e_st_eq_landau_n_29_iii x y) (l_e_st_eq_landau_n_29_i x y) (λz:l_e_st_eq_landau_n_29_i x y.l_e_st_eq_landau_n_29_t5 x y z) : l_ec (l_e_st_eq_landau_n_29_iii x y) (l_e_st_eq_landau_n_29_i x y)).
-
-(* constant 653 *)
-definition l_e_st_eq_landau_n_29_t6a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λtwo1:l_e_st_eq_landau_n_29_ii x y.λthree1:l_e_st_eq_landau_n_29_iii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.(l_e_tr4is l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x v) u) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl v u)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl v u) x) du (l_e_st_eq_landau_n_ispl1 y (l_e_st_eq_landau_n_pl x v) u dv) (l_e_st_eq_landau_n_asspl1 x v u) (l_e_st_eq_landau_n_compl x (l_e_st_eq_landau_n_pl v u)) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl v u) x)).
-
-(* constant 654 *)
-definition l_e_st_eq_landau_n_29_t7 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λtwo1:l_e_st_eq_landau_n_29_ii x y.λthree1:l_e_st_eq_landau_n_29_iii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.(l_mp (l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl v u) x)) l_con (l_e_st_eq_landau_n_29_t6a x y two1 three1 u du v dv) (l_e_st_eq_landau_n_satz7 (l_e_st_eq_landau_n_pl v u) x) : l_con).
-
-(* constant 655 *)
-definition l_e_st_eq_landau_n_29_t8 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λtwo1:l_e_st_eq_landau_n_29_ii x y.λthree1:l_e_st_eq_landau_n_29_iii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.(l_someapp l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop y x v) three1 l_con (λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.l_e_st_eq_landau_n_29_t7 x y two1 three1 u du v dv) : l_con).
-
-(* constant 656 *)
-definition l_e_st_eq_landau_n_29_t9 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λtwo1:l_e_st_eq_landau_n_29_ii x y.λthree1:l_e_st_eq_landau_n_29_iii x y.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u) two1 l_con (λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.l_e_st_eq_landau_n_29_t8 x y two1 three1 u du) : l_con).
-
-(* constant 657 *)
-definition l_e_st_eq_landau_n_29_t10 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λtwo1:l_e_st_eq_landau_n_29_ii x y.(λz:l_e_st_eq_landau_n_29_iii x y.l_e_st_eq_landau_n_29_t9 x y two1 z : l_not (l_e_st_eq_landau_n_29_iii x y)).
-
-(* constant 658 *)
-definition l_e_st_eq_landau_n_29_t11 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_ec_th1 (l_e_st_eq_landau_n_29_ii x y) (l_e_st_eq_landau_n_29_iii x y) (λz:l_e_st_eq_landau_n_29_ii x y.l_e_st_eq_landau_n_29_t10 x y z) : l_ec (l_e_st_eq_landau_n_29_ii x y) (l_e_st_eq_landau_n_29_iii x y)).
-
-(* constant 659 *)
-definition l_e_st_eq_landau_n_29_a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_ec3_th6 (l_e_st_eq_landau_n_29_i x y) (l_e_st_eq_landau_n_29_ii x y) (l_e_st_eq_landau_n_29_iii x y) (l_e_st_eq_landau_n_29_t4 x y) (l_e_st_eq_landau_n_29_t11 x y) (l_e_st_eq_landau_n_29_t6 x y) : l_ec3 (l_e_st_eq_landau_n_29_i x y) (l_e_st_eq_landau_n_29_ii x y) (l_e_st_eq_landau_n_29_iii x y)).
-
-(* constant 660 *)
-definition l_e_st_eq_landau_n_29_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_or3 (l_e_st_eq_landau_n_29_i x y) (l_e_st_eq_landau_n_29_ii x y) (l_e_st_eq_landau_n_29_iii x y) : Prop).
-
-(* constant 661 *)
-definition l_e_st_eq_landau_n_29_t12 ≝ λx:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_or3i1 (l_e_st_eq_landau_n_29_i x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_29_ii x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_29_iii x l_e_st_eq_landau_n_1) j : l_e_st_eq_landau_n_29_prop1 x l_e_st_eq_landau_n_1).
-
-(* constant 662 *)
-definition l_e_st_eq_landau_n_29_t13 ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u).(l_e_tris l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_suc u) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 u) j (l_e_st_eq_landau_n_satz4g u) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 u)).
-
-(* constant 663 *)
-definition l_e_st_eq_landau_n_29_t14 ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u).(l_somei l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x l_e_st_eq_landau_n_1 z) u (l_e_st_eq_landau_n_29_t13 x n u j) : l_e_st_eq_landau_n_29_ii x l_e_st_eq_landau_n_1).
-
-(* constant 664 *)
-definition l_e_st_eq_landau_n_29_t15 ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u).(l_someapp l_e_st_eq_landau_n_nat (λu1:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u1)) (l_e_st_eq_landau_n_satz3 x n) (l_e_st_eq_landau_n_29_ii x l_e_st_eq_landau_n_1) (λu1:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u1).l_e_st_eq_landau_n_29_t14 x n u1 z) : l_e_st_eq_landau_n_29_ii x l_e_st_eq_landau_n_1).
-
-(* constant 665 *)
-definition l_e_st_eq_landau_n_29_t16 ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u).(l_or3i2 (l_e_st_eq_landau_n_29_i x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_29_ii x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_29_iii x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_29_t15 x n u j) : l_e_st_eq_landau_n_29_prop1 x l_e_st_eq_landau_n_1).
-
-(* constant 666 *)
-definition l_e_st_eq_landau_n_29_t16a ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_satz3 x n) (l_e_st_eq_landau_n_29_prop1 x l_e_st_eq_landau_n_1) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u).l_e_st_eq_landau_n_29_t16 x n u v) : l_e_st_eq_landau_n_29_prop1 x l_e_st_eq_landau_n_1).
-
-(* constant 667 *)
-definition l_e_st_eq_landau_n_29_t17 ≝ λx:l_e_st_eq_landau_n_nat.(l_imp_th1 (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_29_prop1 x l_e_st_eq_landau_n_1) (λz:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_29_t12 x z) (λz:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_29_t16a x z) : l_e_st_eq_landau_n_29_prop1 x l_e_st_eq_landau_n_1).
-
-(* constant 668 *)
-definition l_e_st_eq_landau_n_29_t18 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λone1:l_e_st_eq_landau_n_29_i x y.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz4e y) (l_e_st_eq_landau_n_ispl1 y x l_e_st_eq_landau_n_1 (l_e_symis l_e_st_eq_landau_n_nat x y one1)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 669 *)
-definition l_e_st_eq_landau_n_29_t19 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λone1:l_e_st_eq_landau_n_29_i x y.(l_somei l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_suc y) x z) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_29_t18 x y p one1) : l_e_st_eq_landau_n_29_iii x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 670 *)
-definition l_e_st_eq_landau_n_29_t20 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λone1:l_e_st_eq_landau_n_29_i x y.(l_or3i3 (l_e_st_eq_landau_n_29_i x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_ii x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_iii x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_t19 x y p one1) : l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 671 *)
-definition l_e_st_eq_landau_n_29_t21 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λj:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_e_tr3is l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc y) du (l_e_st_eq_landau_n_ispl2 u l_e_st_eq_landau_n_1 y j) (l_e_st_eq_landau_n_satz4a y) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 672 *)
-definition l_e_st_eq_landau_n_29_t22 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λj:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_or3i1 (l_e_st_eq_landau_n_29_i x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_ii x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_iii x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_t21 x y p two1 u du j) : l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 673 *)
-definition l_e_st_eq_landau_n_29_t23 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λn:l_e_st_eq_landau_n_nis u l_e_st_eq_landau_n_1.λw:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is u (l_e_st_eq_landau_n_suc w).(l_e_tris l_e_st_eq_landau_n_nat u (l_e_st_eq_landau_n_suc w) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 w) j (l_e_st_eq_landau_n_satz4g w) : l_e_st_eq_landau_n_is u (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 w)).
-
-(* constant 674 *)
-definition l_e_st_eq_landau_n_29_t24 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λn:l_e_st_eq_landau_n_nis u l_e_st_eq_landau_n_1.λw:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is u (l_e_st_eq_landau_n_suc w).(l_e_tr4is l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) w) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc y) w) du (l_e_st_eq_landau_n_ispl2 u (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 w) y (l_e_st_eq_landau_n_29_t23 x y p two1 u du n w j)) (l_e_st_eq_landau_n_asspl2 y l_e_st_eq_landau_n_1 w) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc y) w (l_e_st_eq_landau_n_satz4a y)) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc y) w)).
-
-(* constant 675 *)
-definition l_e_st_eq_landau_n_29_t25 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λn:l_e_st_eq_landau_n_nis u l_e_st_eq_landau_n_1.λw:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is u (l_e_st_eq_landau_n_suc w).(l_somei l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x (l_e_st_eq_landau_n_suc y) z) w (l_e_st_eq_landau_n_29_t24 x y p two1 u du n w j) : l_e_st_eq_landau_n_29_ii x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 676 *)
-definition l_e_st_eq_landau_n_29_t26 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λn:l_e_st_eq_landau_n_nis u l_e_st_eq_landau_n_1.(l_someapp l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is u (l_e_st_eq_landau_n_suc z)) (l_e_st_eq_landau_n_satz3 u n) (l_e_st_eq_landau_n_29_ii x (l_e_st_eq_landau_n_suc y)) (λz:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_is u (l_e_st_eq_landau_n_suc z).l_e_st_eq_landau_n_29_t25 x y p two1 u du n z v) : l_e_st_eq_landau_n_29_ii x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 677 *)
-definition l_e_st_eq_landau_n_29_t27 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.λn:l_e_st_eq_landau_n_nis u l_e_st_eq_landau_n_1.(l_or3i2 (l_e_st_eq_landau_n_29_i x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_ii x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_iii x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_t26 x y p two1 u du n) : l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 678 *)
-definition l_e_st_eq_landau_n_29_t28 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.(l_imp_th1 (l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)) (λz:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_29_t22 x y p two1 u du z) (λz:l_e_st_eq_landau_n_nis u l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_29_t27 x y p two1 u du z) : l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 679 *)
-definition l_e_st_eq_landau_n_29_t28a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λtwo1:l_e_st_eq_landau_n_29_ii x y.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u) two1 (l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)) (λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.l_e_st_eq_landau_n_29_t28 x y p two1 u du) : l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 680 *)
-definition l_e_st_eq_landau_n_29_t29 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λthree1:l_e_st_eq_landau_n_29_iii x y.λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x v)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc v)) (l_e_st_eq_landau_n_ax2 y (l_e_st_eq_landau_n_pl x v) dv) (l_e_st_eq_landau_n_satz4f x v) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc v))).
-
-(* constant 681 *)
-definition l_e_st_eq_landau_n_29_t30 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λthree1:l_e_st_eq_landau_n_29_iii x y.λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.(l_somei l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_suc y) x z) (l_e_st_eq_landau_n_suc v) (l_e_st_eq_landau_n_29_t29 x y p three1 v dv) : l_e_st_eq_landau_n_29_iii x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 682 *)
-definition l_e_st_eq_landau_n_29_t31 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λthree1:l_e_st_eq_landau_n_29_iii x y.(l_someapp l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop y x v) three1 (l_e_st_eq_landau_n_29_iii x (l_e_st_eq_landau_n_suc y)) (λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.l_e_st_eq_landau_n_29_t30 x y p three1 v dv) : l_e_st_eq_landau_n_29_iii x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 683 *)
-definition l_e_st_eq_landau_n_29_t32 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.λthree1:l_e_st_eq_landau_n_29_iii x y.(l_or3i3 (l_e_st_eq_landau_n_29_i x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_ii x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_iii x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_29_t31 x y p three1) : l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 684 *)
-definition l_e_st_eq_landau_n_29_t33 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_29_prop1 x y.(l_or3app (l_e_st_eq_landau_n_29_i x y) (l_e_st_eq_landau_n_29_ii x y) (l_e_st_eq_landau_n_29_iii x y) (l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)) p (λz:l_e_st_eq_landau_n_29_i x y.l_e_st_eq_landau_n_29_t20 x y p z) (λz:l_e_st_eq_landau_n_29_ii x y.l_e_st_eq_landau_n_29_t28a x y p z) (λz:l_e_st_eq_landau_n_29_iii x y.l_e_st_eq_landau_n_29_t32 x y p z) : l_e_st_eq_landau_n_29_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 685 *)
-definition l_e_st_eq_landau_n_29_b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_29_prop1 x z) (l_e_st_eq_landau_n_29_t17 x) (λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_29_prop1 x z.l_e_st_eq_landau_n_29_t33 x z u) y : l_or3 (l_e_st_eq_landau_n_29_i x y) (l_e_st_eq_landau_n_29_ii x y) (l_e_st_eq_landau_n_29_iii x y)).
-
-(* constant 686 *)
-definition l_e_st_eq_landau_n_satz9 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_orec3i (l_e_st_eq_landau_n_29_i x y) (l_e_st_eq_landau_n_29_ii x y) (l_e_st_eq_landau_n_29_iii x y) (l_e_st_eq_landau_n_29_b x y) (l_e_st_eq_landau_n_29_a x y) : l_orec3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl y u))) (l_e_st_eq_landau_n_some (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is y (l_e_st_eq_landau_n_pl x v)))).
-
-(* constant 687 *)
-definition l_e_st_eq_landau_n_satz9a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_29_b x y : l_or3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u)) (l_e_st_eq_landau_n_some (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop y x v))).
-
-(* constant 688 *)
-definition l_e_st_eq_landau_n_satz9b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_29_a x y : l_ec3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u)) (l_e_st_eq_landau_n_some (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop y x v))).
-
-(* constant 689 *)
-definition l_e_st_eq_landau_n_more ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u) : Prop).
-
-(* constant 690 *)
-definition l_e_st_eq_landau_n_less ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_some (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop y x v) : Prop).
-
-(* constant 691 *)
-definition l_e_st_eq_landau_n_satz10 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz9 x y : l_orec3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y)).
-
-(* constant 692 *)
-definition l_e_st_eq_landau_n_satz10a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz9a x y : l_or3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y)).
-
-(* constant 693 *)
-definition l_e_st_eq_landau_n_satz10b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz9b x y : l_ec3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y)).
-
-(* constant 694 *)
-definition l_e_st_eq_landau_n_satz11 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(m : l_e_st_eq_landau_n_less y x).
-
-(* constant 695 *)
-definition l_e_st_eq_landau_n_satz12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l : l_e_st_eq_landau_n_more y x).
-
-(* constant 696 *)
-definition l_e_st_eq_landau_n_moreis ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_or (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) : Prop).
-
-(* constant 697 *)
-definition l_e_st_eq_landau_n_lessis ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_or (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) : Prop).
-
-(* constant 698 *)
-definition l_e_st_eq_landau_n_satz13 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.(l_or_th9 (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_less y x) (l_e_st_eq_landau_n_is y x) m (λz:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz11 x y z) (λz:l_e_st_eq_landau_n_is x y.l_e_symis l_e_st_eq_landau_n_nat x y z) : l_e_st_eq_landau_n_lessis y x).
-
-(* constant 699 *)
-definition l_e_st_eq_landau_n_satz14 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.(l_or_th9 (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more y x) (l_e_st_eq_landau_n_is y x) l (λz:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_satz12 x y z) (λz:l_e_st_eq_landau_n_is x y.l_e_symis l_e_st_eq_landau_n_nat x y z) : l_e_st_eq_landau_n_moreis y x).
-
-(* constant 700 *)
-definition l_e_st_eq_landau_n_ismore1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λm:l_e_st_eq_landau_n_more x z.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_more u z) x y m i : l_e_st_eq_landau_n_more y z).
-
-(* constant 701 *)
-definition l_e_st_eq_landau_n_ismore2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λm:l_e_st_eq_landau_n_more z x.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_more z u) x y m i : l_e_st_eq_landau_n_more z y).
-
-(* constant 702 *)
-definition l_e_st_eq_landau_n_isless1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λl:l_e_st_eq_landau_n_less x z.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_less u z) x y l i : l_e_st_eq_landau_n_less y z).
-
-(* constant 703 *)
-definition l_e_st_eq_landau_n_isless2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λl:l_e_st_eq_landau_n_less z x.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_less z u) x y l i : l_e_st_eq_landau_n_less z y).
-
-(* constant 704 *)
-definition l_e_st_eq_landau_n_ismoreis1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λm:l_e_st_eq_landau_n_moreis x z.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_moreis u z) x y m i : l_e_st_eq_landau_n_moreis y z).
-
-(* constant 705 *)
-definition l_e_st_eq_landau_n_ismoreis2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λm:l_e_st_eq_landau_n_moreis z x.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_moreis z u) x y m i : l_e_st_eq_landau_n_moreis z y).
-
-(* constant 706 *)
-definition l_e_st_eq_landau_n_islessis1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λl:l_e_st_eq_landau_n_lessis x z.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis u z) x y l i : l_e_st_eq_landau_n_lessis y z).
-
-(* constant 707 *)
-definition l_e_st_eq_landau_n_islessis2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λl:l_e_st_eq_landau_n_lessis z x.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis z u) x y l i : l_e_st_eq_landau_n_lessis z y).
-
-(* constant 708 *)
-definition l_e_st_eq_landau_n_moreisi2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_ori2 (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) i : l_e_st_eq_landau_n_moreis x y).
-
-(* constant 709 *)
-definition l_e_st_eq_landau_n_lessisi2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_ori2 (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) i : l_e_st_eq_landau_n_lessis x y).
-
-(* constant 710 *)
-definition l_e_st_eq_landau_n_moreisi1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_ori1 (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) m : l_e_st_eq_landau_n_moreis x y).
-
-(* constant 711 *)
-definition l_e_st_eq_landau_n_lessisi1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_ori1 (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) l : l_e_st_eq_landau_n_lessis x y).
-
-(* constant 712 *)
-definition l_e_st_eq_landau_n_ismore12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.λm:l_e_st_eq_landau_n_more x z.(l_e_st_eq_landau_n_ismore2 z u y j (l_e_st_eq_landau_n_ismore1 x y z i m) : l_e_st_eq_landau_n_more y u).
-
-(* constant 713 *)
-definition l_e_st_eq_landau_n_isless12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.λl:l_e_st_eq_landau_n_less x z.(l_e_st_eq_landau_n_isless2 z u y j (l_e_st_eq_landau_n_isless1 x y z i l) : l_e_st_eq_landau_n_less y u).
-
-(* constant 714 *)
-definition l_e_st_eq_landau_n_ismoreis12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.λm:l_e_st_eq_landau_n_moreis x z.(l_e_st_eq_landau_n_ismoreis2 z u y j (l_e_st_eq_landau_n_ismoreis1 x y z i m) : l_e_st_eq_landau_n_moreis y u).
-
-(* constant 715 *)
-definition l_e_st_eq_landau_n_islessis12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.λl:l_e_st_eq_landau_n_lessis x z.(l_e_st_eq_landau_n_islessis2 z u y j (l_e_st_eq_landau_n_islessis1 x y z i l) : l_e_st_eq_landau_n_lessis y u).
-
-(* constant 716 *)
-definition l_e_st_eq_landau_n_satz10c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.(l_ec3_th7 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10b x y) (l_comor (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) m) : l_not (l_e_st_eq_landau_n_less x y)).
-
-(* constant 717 *)
-definition l_e_st_eq_landau_n_satz10d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.(l_ec3_th9 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10b x y) l : l_not (l_e_st_eq_landau_n_more x y)).
-
-(* constant 718 *)
-definition l_e_st_eq_landau_n_satz10e ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λn:l_not (l_e_st_eq_landau_n_more x y).(l_or3_th2 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10a x y) n : l_e_st_eq_landau_n_lessis x y).
-
-(* constant 719 *)
-definition l_e_st_eq_landau_n_satz10f ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λn:l_not (l_e_st_eq_landau_n_less x y).(l_comor (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_or3_th3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10a x y) n) : l_e_st_eq_landau_n_moreis x y).
-
-(* constant 720 *)
-definition l_e_st_eq_landau_n_satz10g ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_or_th3 (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) (l_ec3e23 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10b x y) m) (l_ec3e21 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10b x y) m) : l_not (l_e_st_eq_landau_n_lessis x y)).
-
-(* constant 721 *)
-definition l_e_st_eq_landau_n_satz10h ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_or_th3 (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_ec3e32 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10b x y) l) (l_ec3e31 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10b x y) l) : l_not (l_e_st_eq_landau_n_moreis x y)).
-
-(* constant 722 *)
-definition l_e_st_eq_landau_n_satz10j ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λn:l_not (l_e_st_eq_landau_n_moreis x y).(l_or3e3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10a x y) (l_or_th5 (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) n) (l_or_th4 (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) n) : l_e_st_eq_landau_n_less x y).
-
-(* constant 723 *)
-definition l_e_st_eq_landau_n_satz10k ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λn:l_not (l_e_st_eq_landau_n_lessis x y).(l_or3e2 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_satz10a x y) (l_or_th4 (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) n) (l_or_th5 (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) n) : l_e_st_eq_landau_n_more x y).
-
-(* constant 724 *)
-definition l_e_st_eq_landau_n_315_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less y z.λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.λw:l_e_st_eq_landau_n_nat.λdw:l_e_st_eq_landau_n_diffprop z y w.(l_e_tr3is l_e_st_eq_landau_n_nat z (l_e_st_eq_landau_n_pl y w) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl x v) w) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl v w)) dw (l_e_st_eq_landau_n_ispl1 y (l_e_st_eq_landau_n_pl x v) w dv) (l_e_st_eq_landau_n_asspl1 x v w) : l_e_st_eq_landau_n_is z (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_pl v w))).
-
-(* constant 725 *)
-definition l_e_st_eq_landau_n_315_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less y z.λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.λw:l_e_st_eq_landau_n_nat.λdw:l_e_st_eq_landau_n_diffprop z y w.(l_somei l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop z x u) (l_e_st_eq_landau_n_pl v w) (l_e_st_eq_landau_n_315_t1 x y z l k v dv w dw) : l_e_st_eq_landau_n_less x z).
-
-(* constant 726 *)
-definition l_e_st_eq_landau_n_315_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less y z.λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.(l_someapp l_e_st_eq_landau_n_nat (λw:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop z y w) k (l_e_st_eq_landau_n_less x z) (λw:l_e_st_eq_landau_n_nat.λdw:l_e_st_eq_landau_n_diffprop z y w.l_e_st_eq_landau_n_315_t2 x y z l k v dv w dw) : l_e_st_eq_landau_n_less x z).
-
-(* constant 727 *)
-definition l_e_st_eq_landau_n_satz15 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less y z.(l_someapp l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop y x v) l (l_e_st_eq_landau_n_less x z) (λv:l_e_st_eq_landau_n_nat.λdv:l_e_st_eq_landau_n_diffprop y x v.l_e_st_eq_landau_n_315_t3 x y z l k v dv) : l_e_st_eq_landau_n_less x z).
-
-(* constant 728 *)
-definition l_e_st_eq_landau_n_trless ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less y z.(l_e_st_eq_landau_n_satz15 x y z l k : l_e_st_eq_landau_n_less x z).
-
-(* constant 729 *)
-definition l_e_st_eq_landau_n_trmore ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more y z.(l_e_st_eq_landau_n_satz15 z y x n m : l_e_st_eq_landau_n_more x z).
-
-(* constant 730 *)
-definition l_e_st_eq_landau_n_315_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more y z.(l_e_st_eq_landau_n_satz12 z x (l_e_st_eq_landau_n_satz15 z y x (l_e_st_eq_landau_n_satz11 y z n) (l_e_st_eq_landau_n_satz11 x y m)) : l_e_st_eq_landau_n_more x z).
-
-(* constant 731 *)
-definition l_e_st_eq_landau_n_satz16a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_less y z.(l_orapp (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_less x z) l (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_trless x y z u k) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_isless1 y x z (l_e_symis l_e_st_eq_landau_n_nat x y u) k) : l_e_st_eq_landau_n_less x z).
-
-(* constant 732 *)
-definition l_e_st_eq_landau_n_satz16b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_lessis y z.(l_orapp (l_e_st_eq_landau_n_less y z) (l_e_st_eq_landau_n_is y z) (l_e_st_eq_landau_n_less x z) k (λu:l_e_st_eq_landau_n_less y z.l_e_st_eq_landau_n_trless x y z l u) (λu:l_e_st_eq_landau_n_is y z.l_e_st_eq_landau_n_isless2 y z x u l) : l_e_st_eq_landau_n_less x z).
-
-(* constant 733 *)
-definition l_e_st_eq_landau_n_satz16c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_more y z.(l_e_st_eq_landau_n_satz16b z y x n (l_e_st_eq_landau_n_satz13 x y m) : l_e_st_eq_landau_n_more x z).
-
-(* constant 734 *)
-definition l_e_st_eq_landau_n_satz16d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_moreis y z.(l_e_st_eq_landau_n_satz16a z y x (l_e_st_eq_landau_n_satz13 y z n) m : l_e_st_eq_landau_n_more x z).
-
-(* constant 735 *)
-definition l_e_st_eq_landau_n_317_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is y z.(l_e_st_eq_landau_n_lessisi2 x z (l_e_tris l_e_st_eq_landau_n_nat x y z i j) : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 736 *)
-definition l_e_st_eq_landau_n_317_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_less y z.(l_e_st_eq_landau_n_lessisi1 x z (l_e_st_eq_landau_n_satz16a x y z l j) : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 737 *)
-definition l_e_st_eq_landau_n_317_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.λi:l_e_st_eq_landau_n_is x y.(l_orapp (l_e_st_eq_landau_n_less y z) (l_e_st_eq_landau_n_is y z) (l_e_st_eq_landau_n_lessis x z) k (λu:l_e_st_eq_landau_n_less y z.l_e_st_eq_landau_n_317_t2 x y z l k i u) (λu:l_e_st_eq_landau_n_is y z.l_e_st_eq_landau_n_317_t1 x y z l k i u) : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 738 *)
-definition l_e_st_eq_landau_n_317_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.λj:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_lessisi1 x z (l_e_st_eq_landau_n_satz16b x y z j k) : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 739 *)
-definition l_e_st_eq_landau_n_satz17 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.(l_orapp (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_lessis x z) l (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_317_t4 x y z l k u) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_317_t3 x y z l k u) : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 740 *)
-definition l_e_st_eq_landau_n_317_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.λj:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_lessisi1 x z (l_e_st_eq_landau_n_satz16b x y z j k) : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 741 *)
-definition l_e_st_eq_landau_n_317_t6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_islessis1 y x z (l_e_symis l_e_st_eq_landau_n_nat x y i) k : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 742 *)
-definition l_e_st_eq_landau_n_317_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.(l_orapp (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_lessis x z) l (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_317_t5 x y z l k u) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_317_t6 x y z l k u) : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 743 *)
-definition l_e_st_eq_landau_n_trlessis ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis y z.(l_e_st_eq_landau_n_satz17 x y z l k : l_e_st_eq_landau_n_lessis x z).
-
-(* constant 744 *)
-definition l_e_st_eq_landau_n_trmoreis ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis y z.(l_e_st_eq_landau_n_satz14 z x (l_e_st_eq_landau_n_satz17 z y x (l_e_st_eq_landau_n_satz13 y z n) (l_e_st_eq_landau_n_satz13 x y m)) : l_e_st_eq_landau_n_moreis x z).
-
-(* constant 745 *)
-definition l_e_st_eq_landau_n_satz18 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_somei l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_pl x y) x u) y (l_e_refis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x y)) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x y) x).
-
-(* constant 746 *)
-definition l_e_st_eq_landau_n_satz18a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz18 x y : l_e_st_eq_landau_n_less x (l_e_st_eq_landau_n_pl x y)).
-
-(* constant 747 *)
-definition l_e_st_eq_landau_n_satz18b ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) x (l_e_st_eq_landau_n_satz4a x) (l_e_st_eq_landau_n_satz18 x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_suc x) x).
-
-(* constant 748 *)
-definition l_e_st_eq_landau_n_satz18c ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz18b x : l_e_st_eq_landau_n_less x (l_e_st_eq_landau_n_suc x)).
-
-(* constant 749 *)
-definition l_e_st_eq_landau_n_319_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.(l_e_tris l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl u y) du (l_e_st_eq_landau_n_compl y u) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl u y)).
-
-(* constant 750 *)
-definition l_e_st_eq_landau_n_319_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl u y) z) (l_e_st_eq_landau_n_pl u (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl y z) u) (l_e_st_eq_landau_n_ispl1 x (l_e_st_eq_landau_n_pl u y) z (l_e_st_eq_landau_n_319_t1 x y z m u du)) (l_e_st_eq_landau_n_asspl1 u y z) (l_e_st_eq_landau_n_compl u (l_e_st_eq_landau_n_pl y z)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl y z) u)).
-
-(* constant 751 *)
-definition l_e_st_eq_landau_n_319_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.(l_somei l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) v) u (l_e_st_eq_landau_n_319_t2 x y z m u du) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 752 *)
-definition l_e_st_eq_landau_n_satz19a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u) m (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_diffprop x y u.l_e_st_eq_landau_n_319_t3 x y z m u v) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 753 *)
-definition l_e_st_eq_landau_n_satz19b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_ispl1 x y z i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 754 *)
-definition l_e_st_eq_landau_n_satz19c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_satz11 (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_satz19a y x z (l_e_st_eq_landau_n_satz12 x y l)) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 755 *)
-definition l_e_st_eq_landau_n_319_anders1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_satz19a y x z l : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 756 *)
-definition l_e_st_eq_landau_n_satz19d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_compl x z) (l_e_st_eq_landau_n_compl y z) (l_e_st_eq_landau_n_satz19a x y z m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y)).
-
-(* constant 757 *)
-definition l_e_st_eq_landau_n_satz19e ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_ispl2 x y z i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y)).
-
-(* constant 758 *)
-definition l_e_st_eq_landau_n_satz19f ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_compl x z) (l_e_st_eq_landau_n_compl y z) (l_e_st_eq_landau_n_satz19c x y z l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y)).
-
-(* constant 759 *)
-definition l_e_st_eq_landau_n_319_anders2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_satz19d y x z l : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y)).
-
-(* constant 760 *)
-definition l_e_st_eq_landau_n_satz19g ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λm:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_ismore2 (l_e_st_eq_landau_n_pl x u) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_ispl1 x y u i) (l_e_st_eq_landau_n_satz19d z u x m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 761 *)
-definition l_e_st_eq_landau_n_satz19h ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λm:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl u y) (l_e_st_eq_landau_n_compl x z) (l_e_st_eq_landau_n_compl y u) (l_e_st_eq_landau_n_satz19g x y z u i m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl u y)).
-
-(* constant 762 *)
-definition l_e_st_eq_landau_n_satz19j ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λl:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_isless2 (l_e_st_eq_landau_n_pl x u) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_ispl1 x y u i) (l_e_st_eq_landau_n_satz19f z u x l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 763 *)
-definition l_e_st_eq_landau_n_satz19k ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λl:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl u y) (l_e_st_eq_landau_n_compl x z) (l_e_st_eq_landau_n_compl y u) (l_e_st_eq_landau_n_satz19j x y z u i l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl u y)).
-
-(* constant 764 *)
-definition l_e_st_eq_landau_n_319_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_moreisi1 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_satz19a x y z n) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 765 *)
-definition l_e_st_eq_landau_n_319_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_moreisi2 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_ispl1 x y z i) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 766 *)
-definition l_e_st_eq_landau_n_satz19l ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.(l_orapp (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) m (λu:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_319_t4 x y z m u) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_319_t5 x y z m u) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 767 *)
-definition l_e_st_eq_landau_n_satz19m ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.(l_e_st_eq_landau_n_ismoreis12 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_compl x z) (l_e_st_eq_landau_n_compl y z) (l_e_st_eq_landau_n_satz19l x y z m) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y)).
-
-(* constant 768 *)
-definition l_e_st_eq_landau_n_satz19n ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.(l_e_st_eq_landau_n_satz13 (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_satz19l y x z (l_e_st_eq_landau_n_satz14 x y l)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 769 *)
-definition l_e_st_eq_landau_n_satz19o ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.(l_e_st_eq_landau_n_satz13 (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_satz19m y x z (l_e_st_eq_landau_n_satz14 x y l)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y)).
-
-(* constant 770 *)
-definition l_e_st_eq_landau_n_320_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz10a x y : l_or3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y)).
-
-(* constant 771 *)
-definition l_e_st_eq_landau_n_320_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) : l_ec3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z))).
-
-(* constant 772 *)
-definition l_e_st_eq_landau_n_satz20a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z).(l_ec3_th11 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_320_t1 x y z) (l_e_st_eq_landau_n_320_t2 x y z) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_satz19b x y z u) (λu:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz19a x y z u) (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_satz19c x y z u) m : l_e_st_eq_landau_n_more x y).
-
-(* constant 773 *)
-definition l_e_st_eq_landau_n_satz20b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z).(l_ec3_th10 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_320_t1 x y z) (l_e_st_eq_landau_n_320_t2 x y z) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_satz19b x y z u) (λu:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz19a x y z u) (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_satz19c x y z u) i : l_e_st_eq_landau_n_is x y).
-
-(* constant 774 *)
-definition l_e_st_eq_landau_n_satz20c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z).(l_ec3_th12 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_320_t1 x y z) (l_e_st_eq_landau_n_320_t2 x y z) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_satz19b x y z u) (λu:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz19a x y z u) (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_satz19c x y z u) l : l_e_st_eq_landau_n_less x y).
-
-(* constant 775 *)
-definition l_e_st_eq_landau_n_320_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z).(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_compl z x) i (l_e_st_eq_landau_n_compl y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y)).
-
-(* constant 776 *)
-definition l_e_st_eq_landau_n_320_andersb ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z).(l_e_st_eq_landau_n_satz8a z x y (l_e_st_eq_landau_n_320_t3 x y z i) : l_e_st_eq_landau_n_is x y).
-
-(* constant 777 *)
-definition l_e_st_eq_landau_n_320_andersc ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z).(l_e_st_eq_landau_n_satz20a y x z l : l_e_st_eq_landau_n_less x y).
-
-(* constant 778 *)
-definition l_e_st_eq_landau_n_satz20d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y).(l_e_st_eq_landau_n_satz20a x y z (l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_compl z x) (l_e_st_eq_landau_n_compl z y) m) : l_e_st_eq_landau_n_more x y).
-
-(* constant 779 *)
-definition l_e_st_eq_landau_n_satz20e ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y).(l_e_st_eq_landau_n_satz20b x y z (l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_compl x z) i (l_e_st_eq_landau_n_compl z y)) : l_e_st_eq_landau_n_is x y).
-
-(* constant 780 *)
-definition l_e_st_eq_landau_n_satz20f ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl z y).(l_e_st_eq_landau_n_satz20c x y z (l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_pl z x) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_compl z x) (l_e_st_eq_landau_n_compl z y) l) : l_e_st_eq_landau_n_less x y).
-
-(* constant 781 *)
-definition l_e_st_eq_landau_n_321_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_satz19a x y z m : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z)).
-
-(* constant 782 *)
-definition l_e_st_eq_landau_n_321_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_pl z y) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl u y) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_compl z y) (l_e_st_eq_landau_n_compl u y) (l_e_st_eq_landau_n_satz19a z u y n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 783 *)
-definition l_e_st_eq_landau_n_satz21 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_trmore (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_321_t1 x y z u m n) (l_e_st_eq_landau_n_321_t2 x y z u m n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 784 *)
-definition l_e_st_eq_landau_n_321_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_trmore (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_satz19a x y z m) (l_e_st_eq_landau_n_satz19d z u y n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 785 *)
-definition l_e_st_eq_landau_n_satz21a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_satz21 y x u z l k : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 786 *)
-definition l_e_st_eq_landau_n_321_andersa ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_satz11 (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_satz21 y x u z (l_e_st_eq_landau_n_satz12 x y l) (l_e_st_eq_landau_n_satz12 z u k)) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 787 *)
-definition l_e_st_eq_landau_n_satz22a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_more z u.(l_orapp (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)) m (λv:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz21 x y z u v n) (λv:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_satz19g x y z u v n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 788 *)
-definition l_e_st_eq_landau_n_satz22b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_moreis z u.(l_orapp (l_e_st_eq_landau_n_more z u) (l_e_st_eq_landau_n_is z u) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)) n (λv:l_e_st_eq_landau_n_more z u.l_e_st_eq_landau_n_satz21 x y z u m v) (λv:l_e_st_eq_landau_n_is z u.l_e_st_eq_landau_n_satz19h z u x y v m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 789 *)
-definition l_e_st_eq_landau_n_satz22c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_satz22a y x u z (l_e_st_eq_landau_n_satz14 x y l) k : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 790 *)
-definition l_e_st_eq_landau_n_satz22d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_lessis z u.(l_e_st_eq_landau_n_satz22b y x u z l (l_e_st_eq_landau_n_satz14 z u k) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 791 *)
-definition l_e_st_eq_landau_n_323_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.(l_e_st_eq_landau_n_moreisi2 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u) (l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y z) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_ispl1 x y z i) (l_e_st_eq_landau_n_ispl2 z u y j)) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 792 *)
-definition l_e_st_eq_landau_n_323_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λi:l_e_st_eq_landau_n_is x y.λo:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_moreisi1 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_satz22a x y z u m o) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 793 *)
-definition l_e_st_eq_landau_n_323_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λi:l_e_st_eq_landau_n_is x y.(l_orapp (l_e_st_eq_landau_n_more z u) (l_e_st_eq_landau_n_is z u) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)) n (λv:l_e_st_eq_landau_n_more z u.l_e_st_eq_landau_n_323_t2 x y z u m n i v) (λv:l_e_st_eq_landau_n_is z u.l_e_st_eq_landau_n_323_t1 x y z u m n i v) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 794 *)
-definition l_e_st_eq_landau_n_323_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λo:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_moreisi1 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_satz22b x y z u o n) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 795 *)
-definition l_e_st_eq_landau_n_satz23 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.(l_orapp (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)) m (λv:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_323_t4 x y z u m n v) (λv:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_323_t3 x y z u m n v) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 796 *)
-definition l_e_st_eq_landau_n_323_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λo:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_moreisi1 (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_satz22b x y z u o n) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 797 *)
-definition l_e_st_eq_landau_n_323_t6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_ismoreis2 (l_e_st_eq_landau_n_pl x u) (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_ispl1 x y u i) (l_e_st_eq_landau_n_satz19m z u x n) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 798 *)
-definition l_e_st_eq_landau_n_323_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.(l_orapp (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)) m (λv:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_323_t5 x y z u m n v) (λv:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_323_t6 x y z u m n v) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 799 *)
-definition l_e_st_eq_landau_n_satz23a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis z u.(l_e_st_eq_landau_n_satz13 (l_e_st_eq_landau_n_pl y u) (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_satz23 y x u z (l_e_st_eq_landau_n_satz14 x y l) (l_e_st_eq_landau_n_satz14 z u k)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl x z) (l_e_st_eq_landau_n_pl y u)).
-
-(* constant 800 *)
-definition l_e_st_eq_landau_n_324_t1 ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u).(l_e_tris l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_suc u) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 u) i (l_e_st_eq_landau_n_satz4g u) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 u)).
-
-(* constant 801 *)
-definition l_e_st_eq_landau_n_324_t2 ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u).(l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 u) x l_e_st_eq_landau_n_1 (l_e_symis l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 u) (l_e_st_eq_landau_n_324_t1 x n u i)) (l_e_st_eq_landau_n_satz18 l_e_st_eq_landau_n_1 u) : l_e_st_eq_landau_n_more x l_e_st_eq_landau_n_1).
-
-(* constant 802 *)
-definition l_e_st_eq_landau_n_324_t3 ≝ λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_satz3 x n) (l_e_st_eq_landau_n_more x l_e_st_eq_landau_n_1) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_suc u).l_e_st_eq_landau_n_324_t2 x n u v) : l_e_st_eq_landau_n_more x l_e_st_eq_landau_n_1).
-
-(* constant 803 *)
-definition l_e_st_eq_landau_n_satz24 ≝ λx:l_e_st_eq_landau_n_nat.(l_or_th2 (l_e_st_eq_landau_n_more x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (λu:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_324_t3 x u) : l_e_st_eq_landau_n_moreis x l_e_st_eq_landau_n_1).
-
-(* constant 804 *)
-definition l_e_st_eq_landau_n_satz24a ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz13 x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24 x) : l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 x).
-
-(* constant 805 *)
-definition l_e_st_eq_landau_n_satz24b ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_324_t3 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_ax3 x) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_suc x) l_e_st_eq_landau_n_1).
-
-(* constant 806 *)
-definition l_e_st_eq_landau_n_satz24c ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz24b x : l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 807 *)
-definition l_e_st_eq_landau_n_325_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more y x.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop y x u.(l_e_st_eq_landau_n_satz19m u l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_satz24 u) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_pl x u) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 808 *)
-definition l_e_st_eq_landau_n_325_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more y x.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop y x u.(l_e_st_eq_landau_n_ismoreis1 (l_e_st_eq_landau_n_pl x u) y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_symis l_e_st_eq_landau_n_nat y (l_e_st_eq_landau_n_pl x u) du) (l_e_st_eq_landau_n_325_t1 x y m u du) : l_e_st_eq_landau_n_moreis y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 809 *)
-definition l_e_st_eq_landau_n_satz25 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more y x.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop y x u) m (l_e_st_eq_landau_n_moreis y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_diffprop y x u.l_e_st_eq_landau_n_325_t2 x y m u v) : l_e_st_eq_landau_n_moreis y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 810 *)
-definition l_e_st_eq_landau_n_satz25a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more y x.(l_e_st_eq_landau_n_ismoreis2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) y (l_e_st_eq_landau_n_satz4a x) (l_e_st_eq_landau_n_satz25 x y m) : l_e_st_eq_landau_n_moreis y (l_e_st_eq_landau_n_suc x)).
-
-(* constant 811 *)
-definition l_e_st_eq_landau_n_satz25b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less y x.(l_e_st_eq_landau_n_satz13 x (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz25 y x l) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) x).
-
-(* constant 812 *)
-definition l_e_st_eq_landau_n_satz25c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less y x.(l_e_st_eq_landau_n_islessis1 (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc y) x (l_e_st_eq_landau_n_satz4a y) (l_e_st_eq_landau_n_satz25b x y l) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc y) x).
-
-(* constant 813 *)
-definition l_e_st_eq_landau_n_326_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λm:l_e_st_eq_landau_n_more y x.(l_e_st_eq_landau_n_satz25 x y m : l_e_st_eq_landau_n_moreis y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 814 *)
-definition l_e_st_eq_landau_n_326_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).(l_imp_th3 (l_e_st_eq_landau_n_more y x) (l_e_st_eq_landau_n_moreis y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_satz10h y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) l) (λv:l_e_st_eq_landau_n_more y x.l_e_st_eq_landau_n_326_t1 x y l v) : l_not (l_e_st_eq_landau_n_more y x)).
-
-(* constant 815 *)
-definition l_e_st_eq_landau_n_satz26 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less y (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).(l_e_st_eq_landau_n_satz10e y x (l_e_st_eq_landau_n_326_t2 x y l) : l_e_st_eq_landau_n_lessis y x).
-
-(* constant 816 *)
-definition l_e_st_eq_landau_n_satz26a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less y (l_e_st_eq_landau_n_suc x).(l_e_st_eq_landau_n_satz26 x y (l_e_st_eq_landau_n_isless2 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) y (l_e_st_eq_landau_n_satz4e x) l) : l_e_st_eq_landau_n_lessis y x).
-
-(* constant 817 *)
-definition l_e_st_eq_landau_n_satz26b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) x.(l_e_st_eq_landau_n_satz14 x y (l_e_st_eq_landau_n_satz26 y x m) : l_e_st_eq_landau_n_moreis y x).
-
-(* constant 818 *)
-definition l_e_st_eq_landau_n_satz26c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_suc y) x.(l_e_st_eq_landau_n_satz26b x y (l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_satz4e y) m) : l_e_st_eq_landau_n_moreis y x).
-
-(* constant 819 *)
-definition l_e_st_eq_landau_n_327_lbprop ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.(l_imp (p m) (l_e_st_eq_landau_n_lessis n m) : Prop).
-
-(* constant 820 *)
-definition l_e_st_eq_landau_n_lb ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_all (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_327_lbprop p n x) : Prop).
-
-(* constant 821 *)
-definition l_e_st_eq_landau_n_min ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.(l_and (l_e_st_eq_landau_n_lb p n) (p n) : Prop).
-
-(* constant 822 *)
-definition l_e_st_eq_landau_n_327_t1 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λn:l_e_st_eq_landau_n_nat.(λx:p n.l_e_st_eq_landau_n_satz24a n : l_e_st_eq_landau_n_327_lbprop p l_e_st_eq_landau_n_1 n).
-
-(* constant 823 *)
-definition l_e_st_eq_landau_n_327_t2 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.(λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_327_t1 p s x : l_e_st_eq_landau_n_lb p l_e_st_eq_landau_n_1).
-
-(* constant 824 *)
-definition l_e_st_eq_landau_n_327_t3 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λl:∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x.λy:l_e_st_eq_landau_n_nat.λyp:p y.(l_e_st_eq_landau_n_satz18 y l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) y).
-
-(* constant 825 *)
-definition l_e_st_eq_landau_n_327_t4 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λl:∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x.λy:l_e_st_eq_landau_n_nat.λyp:p y.(l_e_st_eq_landau_n_satz10g (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) y (l_e_st_eq_landau_n_327_t3 p s l y yp) : l_not (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) y)).
-
-(* constant 826 *)
-definition l_e_st_eq_landau_n_327_t5 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λl:∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x.λy:l_e_st_eq_landau_n_nat.λyp:p y.(l_imp_th4 (p y) (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) y) yp (l_e_st_eq_landau_n_327_t4 p s l y yp) : l_not (l_e_st_eq_landau_n_327_lbprop p (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) y)).
-
-(* constant 827 *)
-definition l_e_st_eq_landau_n_327_t6 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λl:∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x.λy:l_e_st_eq_landau_n_nat.λyp:p y.(l_all_th1 l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_327_lbprop p (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) x) y (l_e_st_eq_landau_n_327_t5 p s l y yp) : l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1))).
-
-(* constant 828 *)
-definition l_e_st_eq_landau_n_327_t7 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λl:∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x.λy:l_e_st_eq_landau_n_nat.λyp:p y.(l_mp (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1)) l_con (l (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_327_t6 p s l y yp) : l_con).
-
-(* constant 829 *)
-definition l_e_st_eq_landau_n_327_t8 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λl:∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x.(l_someapp l_e_st_eq_landau_n_nat p s l_con (λx:l_e_st_eq_landau_n_nat.λy:p x.l_e_st_eq_landau_n_327_t7 p s l x y) : l_con).
-
-(* constant 830 *)
-definition l_e_st_eq_landau_n_327_t9 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_lb p x) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))).λm:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p m.(n m : l_not (l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))))).
-
-(* constant 831 *)
-definition l_e_st_eq_landau_n_327_t10 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_lb p x) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))).λm:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p m.(l_et (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1)) (l_and_th3 (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_327_t9 p s n m l) l) : l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1)).
-
-(* constant 832 *)
-definition l_e_st_eq_landau_n_327_t11 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_lb p x) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))).λm:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p m.(l_e_isp l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x) (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc m) (l_e_st_eq_landau_n_327_t10 p s n m l) (l_e_st_eq_landau_n_satz4a m) : l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_suc m)).
-
-(* constant 833 *)
-definition l_e_st_eq_landau_n_327_t12 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_lb p x) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))).(λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_induction (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p y) (l_e_st_eq_landau_n_327_t2 p s) (λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_lb p y.l_e_st_eq_landau_n_327_t11 p s n y z) x : ∀x:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x).
-
-(* constant 834 *)
-definition l_e_st_eq_landau_n_327_t13 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.(λx:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_lb p x) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))).l_e_st_eq_landau_n_327_t8 p s (l_e_st_eq_landau_n_327_t12 p s x) : l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_lb p x) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))).
-
-(* constant 835 *)
-definition l_e_st_eq_landau_n_327_t14 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).(l_ande1 (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))) a : l_e_st_eq_landau_n_lb p m).
-
-(* constant 836 *)
-definition l_e_st_eq_landau_n_327_t15 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).(l_ande2 (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))) a : l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).
-
-(* constant 837 *)
-definition l_e_st_eq_landau_n_327_t16 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).λnmp:l_not (p m).λn:l_e_st_eq_landau_n_nat.λnp:p n.(l_mp (p n) (l_e_st_eq_landau_n_lessis m n) np (l_e_st_eq_landau_n_327_t14 p s m a n) : l_e_st_eq_landau_n_lessis m n).
-
-(* constant 838 *)
-definition l_e_st_eq_landau_n_327_t17 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).λnmp:l_not (p m).λn:l_e_st_eq_landau_n_nat.λnp:p n.(l_imp_th3 (l_e_st_eq_landau_n_is m n) (p m) nmp (λx:l_e_st_eq_landau_n_is m n.l_e_isp l_e_st_eq_landau_n_nat p n m np (l_e_symis l_e_st_eq_landau_n_nat m n x)) : l_not (l_e_st_eq_landau_n_is m n)).
-
-(* constant 839 *)
-definition l_e_st_eq_landau_n_327_t18 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).λnmp:l_not (p m).λn:l_e_st_eq_landau_n_nat.λnp:p n.(l_ore1 (l_e_st_eq_landau_n_less m n) (l_e_st_eq_landau_n_is m n) (l_e_st_eq_landau_n_327_t16 p s m a nmp n np) (l_e_st_eq_landau_n_327_t17 p s m a nmp n np) : l_e_st_eq_landau_n_less m n).
-
-(* constant 840 *)
-definition l_e_st_eq_landau_n_327_t19 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).λnmp:l_not (p m).λn:l_e_st_eq_landau_n_nat.λnp:p n.(l_e_st_eq_landau_n_satz25b n m (l_e_st_eq_landau_n_327_t18 p s m a nmp n np) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1) n).
-
-(* constant 841 *)
-definition l_e_st_eq_landau_n_327_t20 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).λnmp:l_not (p m).(λx:l_e_st_eq_landau_n_nat.λy:p x.l_e_st_eq_landau_n_327_t19 p s m a nmp x y : l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1)).
-
-(* constant 842 *)
-definition l_e_st_eq_landau_n_327_t21 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).λnmp:l_not (p m).(l_mp (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1)) l_con (l_e_st_eq_landau_n_327_t20 p s m a nmp) (l_e_st_eq_landau_n_327_t15 p s m a) : l_con).
-
-(* constant 843 *)
-definition l_e_st_eq_landau_n_327_t22 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).(l_et (p m) (λx:l_not (p m).l_e_st_eq_landau_n_327_t21 p s m a x) : p m).
-
-(* constant 844 *)
-definition l_e_st_eq_landau_n_327_t23 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λm:l_e_st_eq_landau_n_nat.λa:l_and (l_e_st_eq_landau_n_lb p m) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl m l_e_st_eq_landau_n_1))).(l_andi (l_e_st_eq_landau_n_lb p m) (p m) (l_e_st_eq_landau_n_327_t14 p s m a) (l_e_st_eq_landau_n_327_t22 p s m a) : l_e_st_eq_landau_n_min p m).
-
-(* constant 845 *)
-definition l_e_st_eq_landau_n_satz27 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.(l_some_th6 l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_lb p x) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x) (l_e_st_eq_landau_n_327_t13 p s) (λx:l_e_st_eq_landau_n_nat.λy:l_and (l_e_st_eq_landau_n_lb p x) (l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).l_e_st_eq_landau_n_327_t23 p s x y) : l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x)).
-
-(* constant 846 *)
-definition l_e_st_eq_landau_n_327_t24 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.(λx:p u.l_e_st_eq_landau_n_satz24a u : l_e_st_eq_landau_n_327_lbprop p l_e_st_eq_landau_n_1 u).
-
-(* constant 847 *)
-definition l_e_st_eq_landau_n_327_t25 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).(λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_327_t24 p n x : l_e_st_eq_landau_n_lb p l_e_st_eq_landau_n_1).
-
-(* constant 848 *)
-definition l_e_st_eq_landau_n_327_t26 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p u.(n u : l_not (l_e_st_eq_landau_n_min p u)).
-
-(* constant 849 *)
-definition l_e_st_eq_landau_n_327_t27 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p u.(l_and_th3 (l_e_st_eq_landau_n_lb p u) (p u) (l_e_st_eq_landau_n_327_t26 p n u l) l : l_not (p u)).
-
-(* constant 850 *)
-definition l_e_st_eq_landau_n_327_t28 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p u.λv:l_e_st_eq_landau_n_nat.λvp:p v.(l_imp_th3 (l_e_st_eq_landau_n_is u v) (p u) (l_e_st_eq_landau_n_327_t27 p n u l) (λx:l_e_st_eq_landau_n_is u v.l_e_isp1 l_e_st_eq_landau_n_nat p v u vp x) : l_e_st_eq_landau_n_nis u v).
-
-(* constant 851 *)
-definition l_e_st_eq_landau_n_327_t29 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p u.λv:l_e_st_eq_landau_n_nat.λvp:p v.(l_mp (p v) (l_e_st_eq_landau_n_lessis u v) vp (l v) : l_e_st_eq_landau_n_lessis u v).
-
-(* constant 852 *)
-definition l_e_st_eq_landau_n_327_t30 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p u.λv:l_e_st_eq_landau_n_nat.λvp:p v.(l_ore1 (l_e_st_eq_landau_n_less u v) (l_e_st_eq_landau_n_is u v) (l_e_st_eq_landau_n_327_t29 p n u l v vp) (l_e_st_eq_landau_n_327_t28 p n u l v vp) : l_e_st_eq_landau_n_less u v).
-
-(* constant 853 *)
-definition l_e_st_eq_landau_n_327_t31 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p u.λv:l_e_st_eq_landau_n_nat.λvp:p v.(l_e_st_eq_landau_n_satz25c v u (l_e_st_eq_landau_n_327_t30 p n u l v vp) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) v).
-
-(* constant 854 *)
-definition l_e_st_eq_landau_n_327_t32 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p u.λv:l_e_st_eq_landau_n_nat.(λx:p v.l_e_st_eq_landau_n_327_t31 p n u l v x : l_e_st_eq_landau_n_327_lbprop p (l_e_st_eq_landau_n_suc u) v).
-
-(* constant 855 *)
-definition l_e_st_eq_landau_n_327_t33 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lb p u.(λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_327_t32 p n u l x : l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_suc u)).
-
-(* constant 856 *)
-definition l_e_st_eq_landau_n_327_t34 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).λu:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lb p x) (l_e_st_eq_landau_n_327_t25 p n) (λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_lb p x.l_e_st_eq_landau_n_327_t33 p n x y) u : l_e_st_eq_landau_n_lb p u).
-
-(* constant 857 *)
-definition l_e_st_eq_landau_n_327_t35 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λu:l_e_st_eq_landau_n_nat.λup:p u.(l_e_st_eq_landau_n_satz10g (l_e_st_eq_landau_n_suc u) u (l_e_st_eq_landau_n_satz18b u) : l_not (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) u)).
-
-(* constant 858 *)
-definition l_e_st_eq_landau_n_327_t36 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λu:l_e_st_eq_landau_n_nat.λup:p u.(l_imp_th4 (p u) (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) u) up (l_e_st_eq_landau_n_327_t35 p s u up) : l_not (l_e_st_eq_landau_n_327_lbprop p (l_e_st_eq_landau_n_suc u) u)).
-
-(* constant 859 *)
-definition l_e_st_eq_landau_n_327_t37 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λu:l_e_st_eq_landau_n_nat.λup:p u.(l_all_th1 l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_327_lbprop p (l_e_st_eq_landau_n_suc u) x) u (l_e_st_eq_landau_n_327_t36 p s u up) : l_not (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_suc u))).
-
-(* constant 860 *)
-definition l_e_st_eq_landau_n_327_t38 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.λu:l_e_st_eq_landau_n_nat.λup:p u.(λy:l_none l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x).l_mp (l_e_st_eq_landau_n_lb p (l_e_st_eq_landau_n_suc u)) l_con (l_e_st_eq_landau_n_327_t34 p y (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_327_t37 p s u up) : l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x)).
-
-(* constant 861 *)
-definition l_e_st_eq_landau_n_327_anders ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.(l_someapp l_e_st_eq_landau_n_nat p s (l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x)) (λx:l_e_st_eq_landau_n_nat.λy:p x.l_e_st_eq_landau_n_327_t38 p s x y) : l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x)).
-
-(* constant 862 *)
-definition l_e_st_eq_landau_n_327_t39 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_ande1 (l_e_st_eq_landau_n_lb p n) (p n) mn : l_e_st_eq_landau_n_lb p n).
-
-(* constant 863 *)
-definition l_e_st_eq_landau_n_327_t40 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_ande1 (l_e_st_eq_landau_n_lb p m) (p m) mm : l_e_st_eq_landau_n_lb p m).
-
-(* constant 864 *)
-definition l_e_st_eq_landau_n_327_t41 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_ande2 (l_e_st_eq_landau_n_lb p n) (p n) mn : p n).
-
-(* constant 865 *)
-definition l_e_st_eq_landau_n_327_t42 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_ande2 (l_e_st_eq_landau_n_lb p m) (p m) mm : p m).
-
-(* constant 866 *)
-definition l_e_st_eq_landau_n_327_t43 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_e_st_eq_landau_n_327_t39 p n m mn mm m : l_e_st_eq_landau_n_327_lbprop p n m).
-
-(* constant 867 *)
-definition l_e_st_eq_landau_n_327_t44 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_e_st_eq_landau_n_327_t40 p n m mn mm n : l_e_st_eq_landau_n_327_lbprop p m n).
-
-(* constant 868 *)
-definition l_e_st_eq_landau_n_327_t45 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_mp (p m) (l_e_st_eq_landau_n_lessis n m) (l_e_st_eq_landau_n_327_t42 p n m mn mm) (l_e_st_eq_landau_n_327_t43 p n m mn mm) : l_e_st_eq_landau_n_lessis n m).
-
-(* constant 869 *)
-definition l_e_st_eq_landau_n_327_t46 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_mp (p n) (l_e_st_eq_landau_n_lessis m n) (l_e_st_eq_landau_n_327_t41 p n m mn mm) (l_e_st_eq_landau_n_327_t44 p n m mn mm) : l_e_st_eq_landau_n_lessis m n).
-
-(* constant 870 *)
-definition l_e_st_eq_landau_n_327_t47 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λmn:l_e_st_eq_landau_n_min p n.λmm:l_e_st_eq_landau_n_min p m.(l_ore2 (l_e_st_eq_landau_n_more n m) (l_e_st_eq_landau_n_is n m) (l_e_st_eq_landau_n_satz14 m n (l_e_st_eq_landau_n_327_t46 p n m mn mm)) (l_e_st_eq_landau_n_satz10d n m (l_e_st_eq_landau_n_327_t45 p n m mn mm)) : l_e_st_eq_landau_n_is n m).
-
-(* constant 871 *)
-definition l_e_st_eq_landau_n_327_t48 ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.(λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_min p x.λv:l_e_st_eq_landau_n_min p y.l_e_st_eq_landau_n_327_t47 p x y u v : l_e_amone l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x)).
-
-(* constant 872 *)
-definition l_e_st_eq_landau_n_satz27a ≝ λp:∀x:l_e_st_eq_landau_n_nat.Prop.λs:l_e_st_eq_landau_n_some p.(l_e_onei l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x) (l_e_st_eq_landau_n_327_t48 p) (l_e_st_eq_landau_n_satz27 p s) : l_e_st_eq_landau_n_one (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min p x)).
-
-(* constant 873 *)
-definition l_e_st_eq_landau_n_428_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_all (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (f y) x)) : Prop).
-
-(* constant 874 *)
-definition l_e_st_eq_landau_n_428_prop2 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.(l_and (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x f) : Prop).
-
-(* constant 875 *)
-definition l_e_st_eq_landau_n_428_prop3 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is (a y) (b y) : Prop).
-
-(* constant 876 *)
-definition l_e_st_eq_landau_n_428_t1 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.(l_ande1 (l_e_st_eq_landau_n_is (a l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x a) pa : l_e_st_eq_landau_n_is (a l_e_st_eq_landau_n_1) x).
-
-(* constant 877 *)
-definition l_e_st_eq_landau_n_428_t2 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.(l_ande1 (l_e_st_eq_landau_n_is (b l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x b) pb : l_e_st_eq_landau_n_is (b l_e_st_eq_landau_n_1) x).
-
-(* constant 878 *)
-definition l_e_st_eq_landau_n_428_t3 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.(l_e_tris2 l_e_st_eq_landau_n_nat (a l_e_st_eq_landau_n_1) (b l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_428_t1 x a b pa pb) (l_e_st_eq_landau_n_428_t2 x a b pa pb) : l_e_st_eq_landau_n_428_prop3 x a b pa pb l_e_st_eq_landau_n_1).
-
-(* constant 879 *)
-definition l_e_st_eq_landau_n_428_t4 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop3 x a b pa pb y.(l_e_st_eq_landau_n_ispl1 (a y) (b y) x p : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (a y) x) (l_e_st_eq_landau_n_pl (b y) x)).
-
-(* constant 880 *)
-definition l_e_st_eq_landau_n_428_t5 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop3 x a b pa pb y.(l_ande2 (l_e_st_eq_landau_n_is (a l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x a) pa : l_e_st_eq_landau_n_428_prop1 x a).
-
-(* constant 881 *)
-definition l_e_st_eq_landau_n_428_t6 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop3 x a b pa pb y.(l_ande2 (l_e_st_eq_landau_n_is (b l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x b) pb : l_e_st_eq_landau_n_428_prop1 x b).
-
-(* constant 882 *)
-definition l_e_st_eq_landau_n_428_t7 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop3 x a b pa pb y.(l_e_st_eq_landau_n_428_t5 x a b pa pb y p y : l_e_st_eq_landau_n_is (a (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (a y) x)).
-
-(* constant 883 *)
-definition l_e_st_eq_landau_n_428_t8 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop3 x a b pa pb y.(l_e_st_eq_landau_n_428_t6 x a b pa pb y p y : l_e_st_eq_landau_n_is (b (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (b y) x)).
-
-(* constant 884 *)
-definition l_e_st_eq_landau_n_428_t9 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop3 x a b pa pb y.(l_e_tr3is l_e_st_eq_landau_n_nat (a (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (a y) x) (l_e_st_eq_landau_n_pl (b y) x) (b (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_428_t7 x a b pa pb y p) (l_e_st_eq_landau_n_428_t4 x a b pa pb y p) (l_e_symis l_e_st_eq_landau_n_nat (b (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (b y) x) (l_e_st_eq_landau_n_428_t8 x a b pa pb y p)) : l_e_st_eq_landau_n_428_prop3 x a b pa pb (l_e_st_eq_landau_n_suc y)).
-
-(* constant 885 *)
-definition l_e_st_eq_landau_n_428_t10 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop3 x a b pa pb z) (l_e_st_eq_landau_n_428_t3 x a b pa pb) (λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_428_prop3 x a b pa pb z.l_e_st_eq_landau_n_428_t9 x a b pa pb z u) y : l_e_st_eq_landau_n_428_prop3 x a b pa pb y).
-
-(* constant 886 *)
-definition l_e_st_eq_landau_n_428_t11 ≝ λx:l_e_st_eq_landau_n_nat.λa:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λb:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpa:l_e_st_eq_landau_n_428_prop2 x a.λpb:l_e_st_eq_landau_n_428_prop2 x b.(l_e_fisi l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat a b (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_t10 x a b pa pb y) : l_e_is (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) a b).
-
-(* constant 887 *)
-definition l_e_st_eq_landau_n_428_a1 ≝ λx:l_e_st_eq_landau_n_nat.(λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λu:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_428_prop2 x z.λw:l_e_st_eq_landau_n_428_prop2 x u.l_e_st_eq_landau_n_428_t11 x z u v w : l_e_amone (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop2 x z)).
-
-(* constant 888 *)
-definition l_e_st_eq_landau_n_428_prop4 ≝ λx:l_e_st_eq_landau_n_nat.(l_some (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop2 x z) : Prop).
-
-(* constant 889 *)
-definition l_e_st_eq_landau_n_428_id ≝ (λy:l_e_st_eq_landau_n_nat.y : Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat).
-
-(* constant 890 *)
-definition l_e_st_eq_landau_n_428_t12 ≝ (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_satz4e x : l_e_st_eq_landau_n_428_prop1 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_428_id).
-
-(* constant 891 *)
-definition l_e_st_eq_landau_n_428_t13 ≝ (l_andi (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_428_id l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_428_prop1 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_428_id) (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_428_t12 : l_e_st_eq_landau_n_428_prop2 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_428_id).
-
-(* constant 892 *)
-definition l_e_st_eq_landau_n_428_t14 ≝ (l_somei (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop2 l_e_st_eq_landau_n_1 z) l_e_st_eq_landau_n_428_id l_e_st_eq_landau_n_428_t13 : l_e_st_eq_landau_n_428_prop4 l_e_st_eq_landau_n_1).
-
-(* constant 893 *)
-definition l_e_st_eq_landau_n_428_g ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.(λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_pl (f y) y : Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat).
-
-(* constant 894 *)
-definition l_e_st_eq_landau_n_428_t15 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.(l_ande1 (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x f) pf : l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) x).
-
-(* constant 895 *)
-definition l_e_st_eq_landau_n_428_t16 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_428_g x p f pf l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_ispl1 (f l_e_st_eq_landau_n_1) x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_428_t15 x p f pf)) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_428_g x p f pf l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)).
-
-(* constant 896 *)
-definition l_e_st_eq_landau_n_428_t17 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_ande2 (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x f) pf : l_e_st_eq_landau_n_428_prop1 x f).
-
-(* constant 897 *)
-definition l_e_st_eq_landau_n_428_t18 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_428_t17 x p f pf y y : l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (f y) x)).
-
-(* constant 898 *)
-definition l_e_st_eq_landau_n_428_t19 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_428_g x p f pf (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (f y) x) (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (f y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y))) (l_e_st_eq_landau_n_ispl1 (f (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (f y) x) (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_428_t18 x p f pf y)) (l_e_st_eq_landau_n_asspl1 (f y) x (l_e_st_eq_landau_n_suc y)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_428_g x p f pf (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (f y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)))).
-
-(* constant 899 *)
-definition l_e_st_eq_landau_n_428_t20 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_satz4b x y) (l_e_st_eq_landau_n_satz4h x y) (l_e_st_eq_landau_n_compl (l_e_st_eq_landau_n_suc x) y) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc x))).
-
-(* constant 900 *)
-definition l_e_st_eq_landau_n_428_t21 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.λy:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_428_g x p f pf (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (f y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y))) (l_e_st_eq_landau_n_pl (f y) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc x))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_428_g x p f pf y) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_428_t19 x p f pf y) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc x)) (f y) (l_e_st_eq_landau_n_428_t20 x p f pf y)) (l_e_st_eq_landau_n_asspl2 (f y) y (l_e_st_eq_landau_n_suc x)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_428_g x p f pf (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_428_g x p f pf y) (l_e_st_eq_landau_n_suc x))).
-
-(* constant 901 *)
-definition l_e_st_eq_landau_n_428_t22 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.(λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_t21 x p f pf y : l_e_st_eq_landau_n_428_prop1 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_428_g x p f pf)).
-
-(* constant 902 *)
-definition l_e_st_eq_landau_n_428_t23 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.(l_andi (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_428_g x p f pf l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_428_prop1 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_428_g x p f pf)) (l_e_st_eq_landau_n_428_t16 x p f pf) (l_e_st_eq_landau_n_428_t22 x p f pf) : l_e_st_eq_landau_n_428_prop2 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_428_g x p f pf)).
-
-(* constant 903 *)
-definition l_e_st_eq_landau_n_428_t24 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.λf:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λpf:l_e_st_eq_landau_n_428_prop2 x f.(l_somei (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop2 (l_e_st_eq_landau_n_suc x) z) (l_e_st_eq_landau_n_428_g x p f pf) (l_e_st_eq_landau_n_428_t23 x p f pf) : l_e_st_eq_landau_n_428_prop4 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 904 *)
-definition l_e_st_eq_landau_n_428_t25 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_428_prop4 x.(l_someapp (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop2 x z) p (l_e_st_eq_landau_n_428_prop4 (l_e_st_eq_landau_n_suc x)) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_428_prop2 x z.l_e_st_eq_landau_n_428_t24 x p z u) : l_e_st_eq_landau_n_428_prop4 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 905 *)
-definition l_e_st_eq_landau_n_428_b1 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop4 y) l_e_st_eq_landau_n_428_t14 (λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_428_prop4 y.l_e_st_eq_landau_n_428_t25 y u) x : l_e_st_eq_landau_n_428_prop4 x).
-
-(* constant 906 *)
-definition l_e_st_eq_landau_n_satz28 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_onei (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop2 x z) (l_e_st_eq_landau_n_428_a1 x) (l_e_st_eq_landau_n_428_b1 x) : l_e_one (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_and (l_e_st_eq_landau_n_is (z l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_all (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is (z (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (z y) x))))).
-
-(* constant 907 *)
-definition l_e_st_eq_landau_n_times ≝ λx:l_e_st_eq_landau_n_nat.(l_e_ind (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop2 x z) (l_e_st_eq_landau_n_satz28 x) : Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat).
-
-(* constant 908 *)
-definition l_e_st_eq_landau_n_ts ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_times x y : l_e_st_eq_landau_n_nat).
-
-(* constant 909 *)
-definition l_e_st_eq_landau_n_428_t26 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_oneax (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λz:Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_428_prop2 x z) (l_e_st_eq_landau_n_satz28 x) : l_e_st_eq_landau_n_428_prop2 x (l_e_st_eq_landau_n_times x)).
-
-(* constant 910 *)
-definition l_e_st_eq_landau_n_satz28a ≝ λx:l_e_st_eq_landau_n_nat.(l_ande1 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_times x l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x (l_e_st_eq_landau_n_times x)) (l_e_st_eq_landau_n_428_t26 x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x l_e_st_eq_landau_n_1) x).
-
-(* constant 911 *)
-definition l_e_st_eq_landau_n_428_t27 ≝ λx:l_e_st_eq_landau_n_nat.(l_ande2 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_times x l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_428_prop1 x (l_e_st_eq_landau_n_times x)) (l_e_st_eq_landau_n_428_t26 x) : l_e_st_eq_landau_n_428_prop1 x (l_e_st_eq_landau_n_times x)).
-
-(* constant 912 *)
-definition l_e_st_eq_landau_n_satz28b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_428_t27 x y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) x)).
-
-(* constant 913 *)
-definition l_e_st_eq_landau_n_428_t28 ≝ (l_e_st_eq_landau_n_428_t11 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_times l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_428_id (l_e_st_eq_landau_n_428_t26 l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_428_t13 : l_e_is (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (l_e_st_eq_landau_n_times l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_428_id).
-
-(* constant 914 *)
-definition l_e_st_eq_landau_n_satz28c ≝ λx:l_e_st_eq_landau_n_nat.(l_e_fise l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_times l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_428_id l_e_st_eq_landau_n_428_t28 x : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 x) x).
-
-(* constant 915 *)
-definition l_e_st_eq_landau_n_428_t29 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_428_t11 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_times (l_e_st_eq_landau_n_suc x)) (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_times x y) y) (l_e_st_eq_landau_n_428_t26 (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_428_t23 x (l_e_st_eq_landau_n_428_b1 x) (l_e_st_eq_landau_n_times x) (l_e_st_eq_landau_n_428_t26 x)) : l_e_is (Πy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (l_e_st_eq_landau_n_times (l_e_st_eq_landau_n_suc x)) (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_times x y) y)).
-
-(* constant 916 *)
-definition l_e_st_eq_landau_n_satz28d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_fise l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_times (l_e_st_eq_landau_n_suc x)) (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_times x z) z) (l_e_st_eq_landau_n_428_t29 x) y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) y)).
-
-(* constant 917 *)
-definition l_e_st_eq_landau_n_satz28e ≝ λx:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_satz28a x) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_ts x l_e_st_eq_landau_n_1)).
-
-(* constant 918 *)
-definition l_e_st_eq_landau_n_satz28f ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) x) (l_e_st_eq_landau_n_satz28b x y) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) x) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_suc y))).
-
-(* constant 919 *)
-definition l_e_st_eq_landau_n_satz28g ≝ λx:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 x) x (l_e_st_eq_landau_n_satz28c x) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 x)).
-
-(* constant 920 *)
-definition l_e_st_eq_landau_n_satz28h ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) y) (l_e_st_eq_landau_n_satz28d x y) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) y) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc x) y)).
-
-(* constant 921 *)
-definition l_e_st_eq_landau_n_ists1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_ts u z) x y i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 922 *)
-definition l_e_st_eq_landau_n_ists2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_ts z u) x y i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts z y)).
-
-(* constant 923 *)
-definition l_e_st_eq_landau_n_ists12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ists1 x y z i) (l_e_st_eq_landau_n_ists2 z u y j) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 924 *)
-definition l_e_st_eq_landau_n_429_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts y x) : Prop).
-
-(* constant 925 *)
-definition l_e_st_eq_landau_n_429_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz28a y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts y l_e_st_eq_landau_n_1) y).
-
-(* constant 926 *)
-definition l_e_st_eq_landau_n_429_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz28c y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 y) y).
-
-(* constant 927 *)
-definition l_e_st_eq_landau_n_429_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tris2 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 y) (l_e_st_eq_landau_n_ts y l_e_st_eq_landau_n_1) y (l_e_st_eq_landau_n_429_t2 x y) (l_e_st_eq_landau_n_429_t1 x y) : l_e_st_eq_landau_n_429_prop1 l_e_st_eq_landau_n_1 y).
-
-(* constant 928 *)
-definition l_e_st_eq_landau_n_429_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_429_prop1 x y.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts y x) y) (l_e_st_eq_landau_n_ts y (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts y x) y p) (l_e_st_eq_landau_n_satz28f y x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) y) (l_e_st_eq_landau_n_ts y (l_e_st_eq_landau_n_suc x))).
-
-(* constant 929 *)
-definition l_e_st_eq_landau_n_429_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_429_prop1 x y.(l_e_st_eq_landau_n_satz28d x y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) y)).
-
-(* constant 930 *)
-definition l_e_st_eq_landau_n_429_t6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_429_prop1 x y.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc x) y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) y) (l_e_st_eq_landau_n_ts y (l_e_st_eq_landau_n_suc x)) (l_e_st_eq_landau_n_429_t5 x y p) (l_e_st_eq_landau_n_429_t4 x y p) : l_e_st_eq_landau_n_429_prop1 (l_e_st_eq_landau_n_suc x) y).
-
-(* constant 931 *)
-definition l_e_st_eq_landau_n_satz29 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_429_prop1 z y) (l_e_st_eq_landau_n_429_t3 x y) (λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_429_prop1 z y.l_e_st_eq_landau_n_429_t6 z y u) x : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts y x)).
-
-(* constant 932 *)
-definition l_e_st_eq_landau_n_comts ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz29 x y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts y x)).
-
-(* constant 933 *)
-definition l_e_st_eq_landau_n_429_t7 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 x) (l_e_st_eq_landau_n_satz28a x) (l_e_st_eq_landau_n_satz28g x) : l_e_st_eq_landau_n_429_prop1 x l_e_st_eq_landau_n_1).
-
-(* constant 934 *)
-definition l_e_st_eq_landau_n_429_t8 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_429_prop1 x y.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts y x) x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc y) x) (l_e_st_eq_landau_n_satz28b x y) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts y x) x p) (l_e_st_eq_landau_n_satz28h y x) : l_e_st_eq_landau_n_429_prop1 x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 935 *)
-definition l_e_st_eq_landau_n_429_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_429_prop1 x z) (l_e_st_eq_landau_n_429_t7 x) (λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_429_prop1 x z.l_e_st_eq_landau_n_429_t8 x z u) y : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts y x)).
-
-(* constant 936 *)
-definition l_e_st_eq_landau_n_430_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z)) : Prop).
-
-(* constant 937 *)
-definition l_e_st_eq_landau_n_430_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_suc y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc y) x (l_e_st_eq_landau_n_satz4a y)) (l_e_st_eq_landau_n_satz28b x y) (l_e_st_eq_landau_n_ispl2 x (l_e_st_eq_landau_n_ts x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_satz28e x)) : l_e_st_eq_landau_n_430_prop1 x y l_e_st_eq_landau_n_1).
-
-(* constant 938 *)
-definition l_e_st_eq_landau_n_430_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_430_prop1 x y z.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc z))) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl y z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y z)) x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z)) x) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc z)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_pl y z)) x (l_e_st_eq_landau_n_satz4b y z)) (l_e_st_eq_landau_n_satz28b x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z)) x p) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z)) x)).
-
-(* constant 939 *)
-definition l_e_st_eq_landau_n_430_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_430_prop1 x y z.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_suc z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z)) x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x z) x)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_suc z))) (l_e_st_eq_landau_n_430_t2 x y z p) (l_e_st_eq_landau_n_asspl1 (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z) x) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x z) x) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_suc z)) (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_satz28f x z)) : l_e_st_eq_landau_n_430_prop1 x y (l_e_st_eq_landau_n_suc z)).
-
-(* constant 940 *)
-definition l_e_st_eq_landau_n_satz30 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_430_prop1 x y u) (l_e_st_eq_landau_n_430_t1 x y) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_430_prop1 x y u.l_e_st_eq_landau_n_430_t3 x y u v) z : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z))).
-
-(* constant 941 *)
-definition l_e_st_eq_landau_n_disttp1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_ts z (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts z y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_satz30 z x y) (l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts z y) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_comts z x) (l_e_st_eq_landau_n_comts z y)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z))).
-
-(* constant 942 *)
-definition l_e_st_eq_landau_n_disttp2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz30 x y z : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z))).
-
-(* constant 943 *)
-definition l_e_st_eq_landau_n_distpt1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl x y) z) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_disttp1 x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl x y) z)).
-
-(* constant 944 *)
-definition l_e_st_eq_landau_n_distpt2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z)) (l_e_st_eq_landau_n_disttp2 x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x z)) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl y z))).
-
-(* constant 945 *)
-definition l_e_st_eq_landau_n_431_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) z) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y z)) : Prop).
-
-(* constant 946 *)
-definition l_e_st_eq_landau_n_431_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_satz28a (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_ists2 y (l_e_st_eq_landau_n_ts y l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_satz28e y)) : l_e_st_eq_landau_n_431_prop1 x y l_e_st_eq_landau_n_1).
-
-(* constant 947 *)
-definition l_e_st_eq_landau_n_431_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_431_prop1 x y z.(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_suc z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) z) (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts y z) y)) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y (l_e_st_eq_landau_n_suc z))) (l_e_st_eq_landau_n_satz28b (l_e_st_eq_landau_n_ts x y) z) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) z) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_ts x y) p) (l_e_st_eq_landau_n_distpt2 x (l_e_st_eq_landau_n_ts y z) y) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts y z) y) (l_e_st_eq_landau_n_ts y (l_e_st_eq_landau_n_suc z)) x (l_e_st_eq_landau_n_satz28f y z)) : l_e_st_eq_landau_n_431_prop1 x y (l_e_st_eq_landau_n_suc z)).
-
-(* constant 948 *)
-definition l_e_st_eq_landau_n_satz31 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_431_prop1 x y u) (l_e_st_eq_landau_n_431_t1 x y) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_431_prop1 x y u.l_e_st_eq_landau_n_431_t2 x y u v) z : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) z) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y z))).
-
-(* constant 949 *)
-definition l_e_st_eq_landau_n_assts1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz31 x y z : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) z) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y z))).
-
-(* constant 950 *)
-definition l_e_st_eq_landau_n_assts2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) z) (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_assts1 x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x y) z)).
-
-(* constant 951 *)
-definition l_e_st_eq_landau_n_432_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl y u) z) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts u z)) (l_e_st_eq_landau_n_ists1 x (l_e_st_eq_landau_n_pl y u) z du) (l_e_st_eq_landau_n_disttp1 y u z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts u z))).
-
-(* constant 952 *)
-definition l_e_st_eq_landau_n_432_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λu:l_e_st_eq_landau_n_nat.λdu:l_e_st_eq_landau_n_diffprop x y u.(l_somei l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z) v) (l_e_st_eq_landau_n_ts u z) (l_e_st_eq_landau_n_432_t1 x y z m u du) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 953 *)
-definition l_e_st_eq_landau_n_satz32a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y u) m (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_diffprop x y u.l_e_st_eq_landau_n_432_t2 x y z m u v) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 954 *)
-definition l_e_st_eq_landau_n_satz32b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_ists1 x y z i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 955 *)
-definition l_e_st_eq_landau_n_satz32c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_satz11 (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_satz32a y x z (l_e_st_eq_landau_n_satz12 x y l)) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 956 *)
-definition l_e_st_eq_landau_n_432_anders1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_satz32a y x z l : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 957 *)
-definition l_e_st_eq_landau_n_satz32d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts z y) (l_e_st_eq_landau_n_comts x z) (l_e_st_eq_landau_n_comts y z) (l_e_st_eq_landau_n_satz32a x y z m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts z y)).
-
-(* constant 958 *)
-definition l_e_st_eq_landau_n_satz32e ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_ists2 x y z i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts z y)).
-
-(* constant 959 *)
-definition l_e_st_eq_landau_n_satz32f ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts z y) (l_e_st_eq_landau_n_comts x z) (l_e_st_eq_landau_n_comts y z) (l_e_st_eq_landau_n_satz32c x y z l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts z y)).
-
-(* constant 960 *)
-definition l_e_st_eq_landau_n_432_anders2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_satz32d y x z l : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts z y)).
-
-(* constant 961 *)
-definition l_e_st_eq_landau_n_satz32g ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λm:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_ismore2 (l_e_st_eq_landau_n_ts x u) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ists1 x y u i) (l_e_st_eq_landau_n_satz32d z u x m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 962 *)
-definition l_e_st_eq_landau_n_satz32h ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λm:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ts u y) (l_e_st_eq_landau_n_comts x z) (l_e_st_eq_landau_n_comts y u) (l_e_st_eq_landau_n_satz32g x y z u i m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts u y)).
-
-(* constant 963 *)
-definition l_e_st_eq_landau_n_satz32j ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λl:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_isless2 (l_e_st_eq_landau_n_ts x u) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ists1 x y u i) (l_e_st_eq_landau_n_satz32f z u x l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 964 *)
-definition l_e_st_eq_landau_n_satz32k ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.λl:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ts u y) (l_e_st_eq_landau_n_comts x z) (l_e_st_eq_landau_n_comts y u) (l_e_st_eq_landau_n_satz32j x y z u i l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts u y)).
-
-(* constant 965 *)
-definition l_e_st_eq_landau_n_432_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_moreisi1 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_satz32a x y z n) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 966 *)
-definition l_e_st_eq_landau_n_432_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_moreisi2 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ists1 x y z i) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 967 *)
-definition l_e_st_eq_landau_n_satz32l ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.(l_orapp (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) m (λu:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_432_t3 x y z m u) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_432_t4 x y z m u) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 968 *)
-definition l_e_st_eq_landau_n_satz32m ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.(l_e_st_eq_landau_n_ismoreis12 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts z y) (l_e_st_eq_landau_n_comts x z) (l_e_st_eq_landau_n_comts y z) (l_e_st_eq_landau_n_satz32l x y z m) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts z y)).
-
-(* constant 969 *)
-definition l_e_st_eq_landau_n_satz32n ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.(l_e_st_eq_landau_n_satz13 (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_satz32l y x z (l_e_st_eq_landau_n_satz14 x y l)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 970 *)
-definition l_e_st_eq_landau_n_satz32o ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.(l_e_st_eq_landau_n_satz13 (l_e_st_eq_landau_n_ts z y) (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_satz32m y x z (l_e_st_eq_landau_n_satz14 x y l)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_ts z x) (l_e_st_eq_landau_n_ts z y)).
-
-(* constant 971 *)
-definition l_e_st_eq_landau_n_433_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz10a x y : l_or3 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y)).
-
-(* constant 972 *)
-definition l_e_st_eq_landau_n_433_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z) : l_ec3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z))).
-
-(* constant 973 *)
-definition l_e_st_eq_landau_n_satz33a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z).(l_ec3_th11 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_433_t1 x y z) (l_e_st_eq_landau_n_433_t2 x y z) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_satz32b x y z u) (λu:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz32a x y z u) (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_satz32c x y z u) m : l_e_st_eq_landau_n_more x y).
-
-(* constant 974 *)
-definition l_e_st_eq_landau_n_satz33b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z).(l_ec3_th10 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_433_t1 x y z) (l_e_st_eq_landau_n_433_t2 x y z) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_satz32b x y z u) (λu:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz32a x y z u) (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_satz32c x y z u) i : l_e_st_eq_landau_n_is x y).
-
-(* constant 975 *)
-definition l_e_st_eq_landau_n_satz33c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z).(l_ec3_th12 (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_less x y) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)) (l_e_st_eq_landau_n_433_t1 x y z) (l_e_st_eq_landau_n_433_t2 x y z) (λu:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_satz32b x y z u) (λu:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz32a x y z u) (λu:l_e_st_eq_landau_n_less x y.l_e_st_eq_landau_n_satz32c x y z u) l : l_e_st_eq_landau_n_less x y).
-
-(* constant 976 *)
-definition l_e_st_eq_landau_n_433_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z).(l_e_st_eq_landau_n_satz33a y x z l : l_e_st_eq_landau_n_less x y).
-
-(* constant 977 *)
-definition l_e_st_eq_landau_n_434_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_satz32a x y z m : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z)).
-
-(* constant 978 *)
-definition l_e_st_eq_landau_n_434_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts z y) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts u y) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_comts z y) (l_e_st_eq_landau_n_comts u y) (l_e_st_eq_landau_n_satz32a z u y n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 979 *)
-definition l_e_st_eq_landau_n_satz34 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_trmore (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_434_t1 x y z u m n) (l_e_st_eq_landau_n_434_t2 x y z u m n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 980 *)
-definition l_e_st_eq_landau_n_434_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_trmore (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_satz32a x y z m) (l_e_st_eq_landau_n_satz32d z u y n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 981 *)
-definition l_e_st_eq_landau_n_satz34a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_satz34 y x u z l k : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 982 *)
-definition l_e_st_eq_landau_n_434_andersa ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_satz11 (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_satz34 y x u z (l_e_st_eq_landau_n_satz12 x y l) (l_e_st_eq_landau_n_satz12 z u k)) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 983 *)
-definition l_e_st_eq_landau_n_satz35a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_more z u.(l_orapp (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)) m (λv:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_satz34 x y z u v n) (λv:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_satz32g x y z u v n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 984 *)
-definition l_e_st_eq_landau_n_satz35b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λn:l_e_st_eq_landau_n_moreis z u.(l_orapp (l_e_st_eq_landau_n_more z u) (l_e_st_eq_landau_n_is z u) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)) n (λv:l_e_st_eq_landau_n_more z u.l_e_st_eq_landau_n_satz34 x y z u m v) (λv:l_e_st_eq_landau_n_is z u.l_e_st_eq_landau_n_satz32h z u x y v m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 985 *)
-definition l_e_st_eq_landau_n_satz35c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_less z u.(l_e_st_eq_landau_n_satz35a y x u z (l_e_st_eq_landau_n_satz14 x y l) k : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 986 *)
-definition l_e_st_eq_landau_n_satz35d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λk:l_e_st_eq_landau_n_lessis z u.(l_e_st_eq_landau_n_satz35b y x u z l (l_e_st_eq_landau_n_satz14 z u k) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 987 *)
-definition l_e_st_eq_landau_n_436_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.(l_e_st_eq_landau_n_moreisi2 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u) (l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y z) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ists1 x y z i) (l_e_st_eq_landau_n_ists2 z u y j)) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 988 *)
-definition l_e_st_eq_landau_n_436_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λi:l_e_st_eq_landau_n_is x y.λo:l_e_st_eq_landau_n_more z u.(l_e_st_eq_landau_n_moreisi1 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_satz35a x y z u m o) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 989 *)
-definition l_e_st_eq_landau_n_436_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λi:l_e_st_eq_landau_n_is x y.(l_orapp (l_e_st_eq_landau_n_more z u) (l_e_st_eq_landau_n_is z u) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)) n (λv:l_e_st_eq_landau_n_more z u.l_e_st_eq_landau_n_436_t2 x y z u m n i v) (λv:l_e_st_eq_landau_n_is z u.l_e_st_eq_landau_n_436_t1 x y z u m n i v) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 990 *)
-definition l_e_st_eq_landau_n_436_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λo:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_moreisi1 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_satz35b x y z u o n) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 991 *)
-definition l_e_st_eq_landau_n_satz36 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.(l_orapp (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)) m (λv:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_436_t4 x y z u m n v) (λv:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_436_t3 x y z u m n v) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 992 *)
-definition l_e_st_eq_landau_n_436_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λo:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_moreisi1 (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_satz35b x y z u o n) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 993 *)
-definition l_e_st_eq_landau_n_436_t6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_ismoreis2 (l_e_st_eq_landau_n_ts x u) (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ists1 x y u i) (l_e_st_eq_landau_n_satz32m z u x n) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 994 *)
-definition l_e_st_eq_landau_n_436_anders ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moreis x y.λn:l_e_st_eq_landau_n_moreis z u.(l_orapp (l_e_st_eq_landau_n_more x y) (l_e_st_eq_landau_n_is x y) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)) m (λv:l_e_st_eq_landau_n_more x y.l_e_st_eq_landau_n_436_t5 x y z u m n v) (λv:l_e_st_eq_landau_n_is x y.l_e_st_eq_landau_n_436_t6 x y z u m n v) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 995 *)
-definition l_e_st_eq_landau_n_satz36a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x y.λk:l_e_st_eq_landau_n_lessis z u.(l_e_st_eq_landau_n_satz13 (l_e_st_eq_landau_n_ts y u) (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_satz36 y x u z (l_e_st_eq_landau_n_satz14 x y l) (l_e_st_eq_landau_n_satz14 z u k)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_ts x z) (l_e_st_eq_landau_n_ts y u)).
-
-(* constant 996 *)
-definition l_e_st_eq_landau_n_mn_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_onei l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y z) (l_e_st_eq_landau_n_satz8b x y) m : l_e_st_eq_landau_n_one (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y z)).
-
-(* constant 997 *)
-definition l_e_st_eq_landau_n_mn ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_ind l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y z) (l_e_st_eq_landau_n_mn_t1 x y m) : l_e_st_eq_landau_n_nat).
-
-(* constant 998 *)
-definition l_e_st_eq_landau_n_mn_th1a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_oneax l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x y z) (l_e_st_eq_landau_n_mn_t1 x y m) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_mn x y m))).
-
-(* constant 999 *)
-definition l_e_st_eq_landau_n_mn_th1b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_symis l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_mn x y m)) (l_e_st_eq_landau_n_mn_th1a x y m) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_mn x y m)) x).
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "grundlagen_2_0.ma".
-
-(* constant 1000 *)
-definition l_e_st_eq_landau_n_mn_th1c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_tris l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl y (l_e_st_eq_landau_n_mn x y m)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_mn x y m) y) (l_e_st_eq_landau_n_mn_th1a x y m) (l_e_st_eq_landau_n_compl y (l_e_st_eq_landau_n_mn x y m)) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_mn x y m) y)).
-
-(* constant 1001 *)
-definition l_e_st_eq_landau_n_mn_th1d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_symis l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_mn x y m) y) (l_e_st_eq_landau_n_mn_th1c x y m) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_mn x y m) y) x).
-
-(* constant 1002 *)
-definition l_e_st_eq_landau_n_mn_th1e ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl y z) x.(l_e_st_eq_landau_n_satz8b x y z (l_e_st_eq_landau_n_mn x y m) (l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl y z) x i) (l_e_st_eq_landau_n_mn_th1a x y m) : l_e_st_eq_landau_n_is z (l_e_st_eq_landau_n_mn x y m)).
-
-(* constant 1003 *)
-definition l_e_st_eq_landau_n_mn_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x z.λn:l_e_st_eq_landau_n_more y u.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl u (l_e_st_eq_landau_n_mn x z m)) (l_e_st_eq_landau_n_pl z (l_e_st_eq_landau_n_mn x z m)) x y (l_e_st_eq_landau_n_ispl1 u z (l_e_st_eq_landau_n_mn x z m) (l_e_symis l_e_st_eq_landau_n_nat z u j)) (l_e_st_eq_landau_n_mn_th1b x z m) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl u (l_e_st_eq_landau_n_mn x z m)) y).
-
-(* constant 1004 *)
-definition l_e_st_eq_landau_n_ismn12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λz:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x z.λn:l_e_st_eq_landau_n_more y u.λi:l_e_st_eq_landau_n_is x y.λj:l_e_st_eq_landau_n_is z u.(l_e_st_eq_landau_n_mn_th1e y u (l_e_st_eq_landau_n_mn x z m) n (l_e_st_eq_landau_n_mn_t2 x y z u m n i j) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_mn x z m) (l_e_st_eq_landau_n_mn y u n)).
-
-(* constant 1005 *)
-definition l_e_st_eq_landau_n_1to ≝ λn:l_e_st_eq_landau_n_nat.(l_e_ot l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis x n) : Type[0]).
-
-(* constant 1006 *)
-definition l_e_st_eq_landau_n_outn ≝ λn:l_e_st_eq_landau_n_nat.λx:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x n.(l_e_out l_e_st_eq_landau_n_nat (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis y n) x l : l_e_st_eq_landau_n_1to n).
-
-(* constant 1007 *)
-definition l_e_st_eq_landau_n_inn ≝ λn:l_e_st_eq_landau_n_nat.λxn:l_e_st_eq_landau_n_1to n.(l_e_in l_e_st_eq_landau_n_nat (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis y n) xn : l_e_st_eq_landau_n_nat).
-
-(* constant 1008 *)
-definition l_e_st_eq_landau_n_1top ≝ λn:l_e_st_eq_landau_n_nat.λxn:l_e_st_eq_landau_n_1to n.(l_e_inp l_e_st_eq_landau_n_nat (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis y n) xn : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_inn n xn) n).
-
-(* constant 1009 *)
-definition l_e_st_eq_landau_n_isoutni ≝ λn:l_e_st_eq_landau_n_nat.λx:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x n.λy:l_e_st_eq_landau_n_nat.λk:l_e_st_eq_landau_n_lessis y n.λi:l_e_st_eq_landau_n_is x y.(l_e_isouti l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis z n) x l y k i : l_e_is (l_e_st_eq_landau_n_1to n) (l_e_st_eq_landau_n_outn n x l) (l_e_st_eq_landau_n_outn n y k)).
-
-(* constant 1010 *)
-definition l_e_st_eq_landau_n_isoutne ≝ λn:l_e_st_eq_landau_n_nat.λx:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x n.λy:l_e_st_eq_landau_n_nat.λk:l_e_st_eq_landau_n_lessis y n.λi:l_e_is (l_e_st_eq_landau_n_1to n) (l_e_st_eq_landau_n_outn n x l) (l_e_st_eq_landau_n_outn n y k).(l_e_isoute l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis z n) x l y k i : l_e_st_eq_landau_n_is x y).
-
-(* constant 1011 *)
-definition l_e_st_eq_landau_n_isinni ≝ λn:l_e_st_eq_landau_n_nat.λxn:l_e_st_eq_landau_n_1to n.λyn:l_e_st_eq_landau_n_1to n.λi:l_e_is (l_e_st_eq_landau_n_1to n) xn yn.(l_e_isini l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis z n) xn yn i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_inn n xn) (l_e_st_eq_landau_n_inn n yn)).
-
-(* constant 1012 *)
-definition l_e_st_eq_landau_n_isinne ≝ λn:l_e_st_eq_landau_n_nat.λxn:l_e_st_eq_landau_n_1to n.λyn:l_e_st_eq_landau_n_1to n.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_inn n xn) (l_e_st_eq_landau_n_inn n yn).(l_e_isine l_e_st_eq_landau_n_nat (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis z n) xn yn i : l_e_is (l_e_st_eq_landau_n_1to n) xn yn).
-
-(* constant 1013 *)
-definition l_e_st_eq_landau_n_isoutinn ≝ λn:l_e_st_eq_landau_n_nat.λxn:l_e_st_eq_landau_n_1to n.(l_e_isoutin l_e_st_eq_landau_n_nat (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis y n) xn : l_e_is (l_e_st_eq_landau_n_1to n) xn (l_e_st_eq_landau_n_outn n (l_e_st_eq_landau_n_inn n xn) (l_e_st_eq_landau_n_1top n xn))).
-
-(* constant 1014 *)
-definition l_e_st_eq_landau_n_isinoutn ≝ λn:l_e_st_eq_landau_n_nat.λx:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x n.(l_e_isinout l_e_st_eq_landau_n_nat (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis y n) x l : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_inn n (l_e_st_eq_landau_n_outn n x l))).
-
-(* constant 1015 *)
-definition l_e_st_eq_landau_n_1o ≝ (l_e_st_eq_landau_n_outn l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_lessisi2 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1)) : l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1).
-
-(* constant 1016 *)
-definition l_e_st_eq_landau_n_singlet_u0 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_inn l_e_st_eq_landau_n_1 u : l_e_st_eq_landau_n_nat).
-
-(* constant 1017 *)
-definition l_e_st_eq_landau_n_singlet_t1 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_1top l_e_st_eq_landau_n_1 u : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_singlet_u0 u) l_e_st_eq_landau_n_1).
-
-(* constant 1018 *)
-definition l_e_st_eq_landau_n_singlet_t2 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.(l_ore2 (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_singlet_u0 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_singlet_u0 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz24 (l_e_st_eq_landau_n_singlet_u0 u)) (l_e_st_eq_landau_n_satz10d (l_e_st_eq_landau_n_singlet_u0 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_singlet_t1 u)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_singlet_u0 u) l_e_st_eq_landau_n_1).
-
-(* constant 1019 *)
-definition l_e_st_eq_landau_n_singlet_th1 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.(l_e_tris (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) u (l_e_st_eq_landau_n_outn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_singlet_u0 u) (l_e_st_eq_landau_n_singlet_t1 u)) l_e_st_eq_landau_n_1o (l_e_st_eq_landau_n_isoutinn l_e_st_eq_landau_n_1 u) (l_e_st_eq_landau_n_isoutni l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_singlet_u0 u) (l_e_st_eq_landau_n_singlet_t1 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_lessisi2 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_singlet_t2 u)) : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) u l_e_st_eq_landau_n_1o).
-
-(* constant 1020 *)
-definition l_e_st_eq_landau_n_2 ≝ (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat).
-
-(* constant 1021 *)
-definition l_e_st_eq_landau_n_pair_t1 ≝ λx:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x l_e_st_eq_landau_n_2.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_2.(l_e_st_eq_landau_n_satz26 l_e_st_eq_landau_n_1 x (l_ore1 (l_e_st_eq_landau_n_less x l_e_st_eq_landau_n_2) (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_2) l n) : l_e_st_eq_landau_n_lessis x l_e_st_eq_landau_n_1).
-
-(* constant 1022 *)
-definition l_e_st_eq_landau_n_pair_t2 ≝ λx:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x l_e_st_eq_landau_n_2.λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_2.(l_ore2 (l_e_st_eq_landau_n_more x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz24 x) (l_e_st_eq_landau_n_satz10d x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_pair_t1 x l n)) : l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1).
-
-(* constant 1023 *)
-definition l_e_st_eq_landau_n_pair_th1 ≝ λx:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis x l_e_st_eq_landau_n_2.(l_or_th2 (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_2) (λt:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_pair_t2 x l t) : l_or (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_2)).
-
-(* constant 1024 *)
-definition l_e_st_eq_landau_n_pair_th2 ≝ (l_e_notis_th1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_ax3 l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz4e l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_nis l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1).
-
-(* constant 1025 *)
-definition l_e_st_eq_landau_n_1t ≝ (l_e_st_eq_landau_n_outn l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a l_e_st_eq_landau_n_2) : l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2).
-
-(* constant 1026 *)
-definition l_e_st_eq_landau_n_2t ≝ (l_e_st_eq_landau_n_outn l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_lessisi2 l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_2 (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_2)) : l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2).
-
-(* constant 1027 *)
-definition l_e_st_eq_landau_n_pair_u0 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.(l_e_st_eq_landau_n_inn l_e_st_eq_landau_n_2 u : l_e_st_eq_landau_n_nat).
-
-(* constant 1028 *)
-definition l_e_st_eq_landau_n_pair_t3 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.(l_e_st_eq_landau_n_1top l_e_st_eq_landau_n_2 u : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_2).
-
-(* constant 1029 *)
-definition l_e_st_eq_landau_n_pair_t4 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isoutni l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_pair_u0 u) (l_e_st_eq_landau_n_pair_t3 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a l_e_st_eq_landau_n_2) i : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) (l_e_st_eq_landau_n_outn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_pair_u0 u) (l_e_st_eq_landau_n_pair_t3 u)) l_e_st_eq_landau_n_1t).
-
-(* constant 1030 *)
-definition l_e_st_eq_landau_n_pair_t5 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_1.(l_e_tris (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u (l_e_st_eq_landau_n_outn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_pair_u0 u) (l_e_st_eq_landau_n_pair_t3 u)) l_e_st_eq_landau_n_1t (l_e_st_eq_landau_n_isoutinn l_e_st_eq_landau_n_2 u) (l_e_st_eq_landau_n_pair_t4 u i) : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_1t).
-
-(* constant 1031 *)
-definition l_e_st_eq_landau_n_pair_t6 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_2.(l_e_st_eq_landau_n_isoutni l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_pair_u0 u) (l_e_st_eq_landau_n_pair_t3 u) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_lessisi2 l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_2 (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_2)) i : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) (l_e_st_eq_landau_n_outn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_pair_u0 u) (l_e_st_eq_landau_n_pair_t3 u)) l_e_st_eq_landau_n_2t).
-
-(* constant 1032 *)
-definition l_e_st_eq_landau_n_pair_t7 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_2.(l_e_tris (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u (l_e_st_eq_landau_n_outn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_pair_u0 u) (l_e_st_eq_landau_n_pair_t3 u)) l_e_st_eq_landau_n_2t (l_e_st_eq_landau_n_isoutinn l_e_st_eq_landau_n_2 u) (l_e_st_eq_landau_n_pair_t6 u i) : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_2t).
-
-(* constant 1033 *)
-definition l_e_st_eq_landau_n_pair_th3 ≝ λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.(l_or_th9 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_2) (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_1t) (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_2t) (l_e_st_eq_landau_n_pair_th1 (l_e_st_eq_landau_n_pair_u0 u) (l_e_st_eq_landau_n_pair_t3 u)) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_pair_t5 u t) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 u) l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_pair_t7 u t) : l_or (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_1t) (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_2t)).
-
-(* constant 1034 *)
-definition l_e_st_eq_landau_n_pair_t9 ≝ λi:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_2t l_e_st_eq_landau_n_1t.(l_e_isini l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_lessis x l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_2t l_e_st_eq_landau_n_1t i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pair_u0 l_e_st_eq_landau_n_2t) (l_e_st_eq_landau_n_pair_u0 l_e_st_eq_landau_n_1t)).
-
-(* constant 1035 *)
-definition l_e_st_eq_landau_n_pair_t10 ≝ λi:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_2t l_e_st_eq_landau_n_1t.(l_e_tr3is l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_pair_u0 l_e_st_eq_landau_n_2t) (l_e_st_eq_landau_n_pair_u0 l_e_st_eq_landau_n_1t) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_isinoutn l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_lessisi2 l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_2 (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_2))) (l_e_st_eq_landau_n_pair_t9 i) (l_e_symis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_pair_u0 l_e_st_eq_landau_n_1t) (l_e_st_eq_landau_n_isinoutn l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a l_e_st_eq_landau_n_2))) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1).
-
-(* constant 1036 *)
-definition l_e_st_eq_landau_n_pair_th4 ≝ (l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_2t l_e_st_eq_landau_n_1t) (l_e_st_eq_landau_n_is l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_pair_th2 (λt:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_2t l_e_st_eq_landau_n_1t.l_e_st_eq_landau_n_pair_t10 t) : l_not (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_2t l_e_st_eq_landau_n_1t)).
-
-(* constant 1037 *)
-definition l_e_st_eq_landau_n_pair1type ≝ λalpha:Type[0].(Πx:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.alpha : Type[0]).
-
-(* constant 1038 *)
-definition l_e_st_eq_landau_n_pair1 ≝ λalpha:Type[0].λa:alpha.λb:alpha.(λx:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_ite (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) x l_e_st_eq_landau_n_1t) alpha a b : l_e_st_eq_landau_n_pair1type alpha).
-
-(* constant 1039 *)
-definition l_e_st_eq_landau_n_first1 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.(p l_e_st_eq_landau_n_1t : alpha).
-
-(* constant 1040 *)
-definition l_e_st_eq_landau_n_second1 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.(p l_e_st_eq_landau_n_2t : alpha).
-
-(* constant 1041 *)
-definition l_e_st_eq_landau_n_first1is1 ≝ λalpha:Type[0].λa:alpha.λb:alpha.(l_e_itet (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_1t l_e_st_eq_landau_n_1t) alpha a b (l_e_refis (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_1t) : l_e_is alpha (l_e_st_eq_landau_n_first1 alpha (l_e_st_eq_landau_n_pair1 alpha a b)) a).
-
-(* constant 1042 *)
-definition l_e_st_eq_landau_n_first1is2 ≝ λalpha:Type[0].λa:alpha.λb:alpha.(l_e_symis alpha (l_e_st_eq_landau_n_first1 alpha (l_e_st_eq_landau_n_pair1 alpha a b)) a (l_e_st_eq_landau_n_first1is1 alpha a b) : l_e_is alpha a (l_e_st_eq_landau_n_first1 alpha (l_e_st_eq_landau_n_pair1 alpha a b))).
-
-(* constant 1043 *)
-definition l_e_st_eq_landau_n_second1is1 ≝ λalpha:Type[0].λa:alpha.λb:alpha.(l_e_itef (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_2t l_e_st_eq_landau_n_1t) alpha a b l_e_st_eq_landau_n_pair_th4 : l_e_is alpha (l_e_st_eq_landau_n_second1 alpha (l_e_st_eq_landau_n_pair1 alpha a b)) b).
-
-(* constant 1044 *)
-definition l_e_st_eq_landau_n_second1is2 ≝ λalpha:Type[0].λa:alpha.λb:alpha.(l_e_symis alpha (l_e_st_eq_landau_n_second1 alpha (l_e_st_eq_landau_n_pair1 alpha a b)) b (l_e_st_eq_landau_n_second1is1 alpha a b) : l_e_is alpha b (l_e_st_eq_landau_n_second1 alpha (l_e_st_eq_landau_n_pair1 alpha a b))).
-
-(* constant 1045 *)
-definition l_e_st_eq_landau_n_pair_t11 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.λq:l_e_st_eq_landau_n_pair1type alpha.λi:l_e_is alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q).λj:l_e_is alpha (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λu1:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_1t.(l_e_isf (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) alpha p u l_e_st_eq_landau_n_1t u1 : l_e_is alpha (p u) (l_e_st_eq_landau_n_first1 alpha p)).
-
-(* constant 1046 *)
-definition l_e_st_eq_landau_n_pair_t12 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.λq:l_e_st_eq_landau_n_pair1type alpha.λi:l_e_is alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q).λj:l_e_is alpha (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λu1:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_1t.(l_e_symis alpha (q u) (l_e_st_eq_landau_n_first1 alpha q) (l_e_isf (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) alpha q u l_e_st_eq_landau_n_1t u1) : l_e_is alpha (l_e_st_eq_landau_n_first1 alpha q) (q u)).
-
-(* constant 1047 *)
-definition l_e_st_eq_landau_n_pair_t13 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.λq:l_e_st_eq_landau_n_pair1type alpha.λi:l_e_is alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q).λj:l_e_is alpha (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λu1:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_1t.(l_e_tr3is alpha (p u) (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q) (q u) (l_e_st_eq_landau_n_pair_t11 alpha p q i j u u1) i (l_e_st_eq_landau_n_pair_t12 alpha p q i j u u1) : l_e_is alpha (p u) (q u)).
-
-(* constant 1048 *)
-definition l_e_st_eq_landau_n_pair_t14 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.λq:l_e_st_eq_landau_n_pair1type alpha.λi:l_e_is alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q).λj:l_e_is alpha (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λu2:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_2t.(l_e_isf (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) alpha p u l_e_st_eq_landau_n_2t u2 : l_e_is alpha (p u) (l_e_st_eq_landau_n_second1 alpha p)).
-
-(* constant 1049 *)
-definition l_e_st_eq_landau_n_pair_t15 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.λq:l_e_st_eq_landau_n_pair1type alpha.λi:l_e_is alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q).λj:l_e_is alpha (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λu2:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_2t.(l_e_symis alpha (q u) (l_e_st_eq_landau_n_second1 alpha q) (l_e_isf (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) alpha q u l_e_st_eq_landau_n_2t u2) : l_e_is alpha (l_e_st_eq_landau_n_second1 alpha q) (q u)).
-
-(* constant 1050 *)
-definition l_e_st_eq_landau_n_pair_t16 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.λq:l_e_st_eq_landau_n_pair1type alpha.λi:l_e_is alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q).λj:l_e_is alpha (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.λu2:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_2t.(l_e_tr3is alpha (p u) (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q) (q u) (l_e_st_eq_landau_n_pair_t14 alpha p q i j u u2) j (l_e_st_eq_landau_n_pair_t15 alpha p q i j u u2) : l_e_is alpha (p u) (q u)).
-
-(* constant 1051 *)
-definition l_e_st_eq_landau_n_pair_t17 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.λq:l_e_st_eq_landau_n_pair1type alpha.λi:l_e_is alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q).λj:l_e_is alpha (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.(l_orapp (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_1t) (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_2t) (l_e_is alpha (p u) (q u)) (l_e_st_eq_landau_n_pair_th3 u) (λt:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_1t.l_e_st_eq_landau_n_pair_t13 alpha p q i j u t) (λt:l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) u l_e_st_eq_landau_n_2t.l_e_st_eq_landau_n_pair_t16 alpha p q i j u t) : l_e_is alpha (p u) (q u)).
-
-(* constant 1052 *)
-definition l_e_st_eq_landau_n_pair_th5 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.λq:l_e_st_eq_landau_n_pair1type alpha.λi:l_e_is alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_first1 alpha q).λj:l_e_is alpha (l_e_st_eq_landau_n_second1 alpha p) (l_e_st_eq_landau_n_second1 alpha q).(l_e_fisi (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) alpha p q (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_pair_t17 alpha p q i j t) : l_e_is (l_e_st_eq_landau_n_pair1type alpha) p q).
-
-(* constant 1053 *)
-definition l_e_st_eq_landau_n_pair_q0 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.(l_e_st_eq_landau_n_pair1 alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_second1 alpha p) : l_e_st_eq_landau_n_pair1type alpha).
-
-(* constant 1054 *)
-definition l_e_st_eq_landau_n_pair_t18 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.(l_e_st_eq_landau_n_first1is1 alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_second1 alpha p) : l_e_is alpha (l_e_st_eq_landau_n_first1 alpha (l_e_st_eq_landau_n_pair_q0 alpha p)) (l_e_st_eq_landau_n_first1 alpha p)).
-
-(* constant 1055 *)
-definition l_e_st_eq_landau_n_pair_t19 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.(l_e_st_eq_landau_n_second1is1 alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_second1 alpha p) : l_e_is alpha (l_e_st_eq_landau_n_second1 alpha (l_e_st_eq_landau_n_pair_q0 alpha p)) (l_e_st_eq_landau_n_second1 alpha p)).
-
-(* constant 1056 *)
-definition l_e_st_eq_landau_n_pair1is1 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.(l_e_st_eq_landau_n_pair_th5 alpha (l_e_st_eq_landau_n_pair_q0 alpha p) p (l_e_st_eq_landau_n_pair_t18 alpha p) (l_e_st_eq_landau_n_pair_t19 alpha p) : l_e_is (l_e_st_eq_landau_n_pair1type alpha) (l_e_st_eq_landau_n_pair1 alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_second1 alpha p)) p).
-
-(* constant 1057 *)
-definition l_e_st_eq_landau_n_pair1is2 ≝ λalpha:Type[0].λp:l_e_st_eq_landau_n_pair1type alpha.(l_e_symis (l_e_st_eq_landau_n_pair1type alpha) (l_e_st_eq_landau_n_pair1 alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_second1 alpha p)) p (l_e_st_eq_landau_n_pair1is1 alpha p) : l_e_is (l_e_st_eq_landau_n_pair1type alpha) p (l_e_st_eq_landau_n_pair1 alpha (l_e_st_eq_landau_n_first1 alpha p) (l_e_st_eq_landau_n_second1 alpha p))).
-
-(* constant 1058 *)
-definition l_e_st_eq_landau_n_lessisi3 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_lessisi2 x x (l_e_refis l_e_st_eq_landau_n_nat x) : l_e_st_eq_landau_n_lessis x x).
-
-(* constant 1059 *)
-definition l_e_st_eq_landau_n_1out ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_outn x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a x) : l_e_st_eq_landau_n_1to x).
-
-(* constant 1060 *)
-definition l_e_st_eq_landau_n_xout ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_outn x x (l_e_st_eq_landau_n_lessisi3 x) : l_e_st_eq_landau_n_1to x).
-
-(* constant 1061 *)
-definition l_e_st_eq_landau_n_left_ui ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_inn y u : l_e_st_eq_landau_n_nat).
-
-(* constant 1062 *)
-definition l_e_st_eq_landau_n_left_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_1top y u : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_left_ui x y l u) y).
-
-(* constant 1063 *)
-definition l_e_st_eq_landau_n_left_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_left_ui x y l u) y x (l_e_st_eq_landau_n_left_t1 x y l u) l : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_left_ui x y l u) x).
-
-(* constant 1064 *)
-definition l_e_st_eq_landau_n_left1to ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_left_ui x y l u) (l_e_st_eq_landau_n_left_t2 x y l u) : l_e_st_eq_landau_n_1to x).
-
-(* constant 1065 *)
-definition l_e_st_eq_landau_n_left_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λu:l_e_st_eq_landau_n_1to y.λv:l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_left1to x y l u) (l_e_st_eq_landau_n_left1to x y l v).(l_e_st_eq_landau_n_isoutne x (l_e_st_eq_landau_n_left_ui x y l u) (l_e_st_eq_landau_n_left_t2 x y l u) (l_e_st_eq_landau_n_left_ui x y l v) (l_e_st_eq_landau_n_left_t2 x y l v) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_left_ui x y l u) (l_e_st_eq_landau_n_left_ui x y l v)).
-
-(* constant 1066 *)
-definition l_e_st_eq_landau_n_thleft1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λu:l_e_st_eq_landau_n_1to y.λv:l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_left1to x y l u) (l_e_st_eq_landau_n_left1to x y l v).(l_e_st_eq_landau_n_isinne y u v (l_e_st_eq_landau_n_left_t3 x y l u v i) : l_e_is (l_e_st_eq_landau_n_1to y) u v).
-
-(* constant 1067 *)
-definition l_e_st_eq_landau_n_thleft2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.(λu:l_e_st_eq_landau_n_1to y.λv:l_e_st_eq_landau_n_1to y.λt:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_left1to x y l u) (l_e_st_eq_landau_n_left1to x y l v).l_e_st_eq_landau_n_thleft1 x y l u v t : l_e_injective (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_left1to x y l t)).
-
-(* constant 1068 *)
-definition l_e_st_eq_landau_n_right_ui ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_inn y u : l_e_st_eq_landau_n_nat).
-
-(* constant 1069 *)
-definition l_e_st_eq_landau_n_right_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_1top y u : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_right_ui x y u) y).
-
-(* constant 1070 *)
-definition l_e_st_eq_landau_n_right_t5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_right_ui x y u) y x (l_e_st_eq_landau_n_right_t4 x y u) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_right_ui x y u)) (l_e_st_eq_landau_n_pl x y)).
-
-(* constant 1071 *)
-definition l_e_st_eq_landau_n_right1to ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_right_ui x y u)) (l_e_st_eq_landau_n_right_t5 x y u) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y)).
-
-(* constant 1072 *)
-definition l_e_st_eq_landau_n_right_t6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_1to y.λv:l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_right1to x y u) (l_e_st_eq_landau_n_right1to x y v).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_right_ui x y u)) (l_e_st_eq_landau_n_right_t5 x y u) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_right_ui x y v)) (l_e_st_eq_landau_n_right_t5 x y v) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_right_ui x y u)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_right_ui x y v))).
-
-(* constant 1073 *)
-definition l_e_st_eq_landau_n_right_t7 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_1to y.λv:l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_right1to x y u) (l_e_st_eq_landau_n_right1to x y v).(l_e_st_eq_landau_n_satz20e (l_e_st_eq_landau_n_right_ui x y u) (l_e_st_eq_landau_n_right_ui x y v) x (l_e_st_eq_landau_n_right_t6 x y u v i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_right_ui x y u) (l_e_st_eq_landau_n_right_ui x y v)).
-
-(* constant 1074 *)
-definition l_e_st_eq_landau_n_thright1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_1to y.λv:l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_right1to x y u) (l_e_st_eq_landau_n_right1to x y v).(l_e_st_eq_landau_n_isinne y u v (l_e_st_eq_landau_n_right_t7 x y u v i) : l_e_is (l_e_st_eq_landau_n_1to y) u v).
-
-(* constant 1075 *)
-definition l_e_st_eq_landau_n_left ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.alpha.(λt:l_e_st_eq_landau_n_1to y.f (l_e_st_eq_landau_n_left1to x y l t) : Πt:l_e_st_eq_landau_n_1to y.alpha).
-
-(* constant 1076 *)
-definition l_e_st_eq_landau_n_right ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y).alpha.(λt:l_e_st_eq_landau_n_1to y.f (l_e_st_eq_landau_n_right1to x y t) : Πt:l_e_st_eq_landau_n_1to y.alpha).
-
-(* constant 1077 *)
-definition l_e_st_eq_landau_n_left_t4 ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.λf:Πt:l_e_st_eq_landau_n_1to y.alpha.(l_e_st_eq_landau_n_lessisi2 y x i : l_e_st_eq_landau_n_lessis y x).
-
-(* constant 1078 *)
-definition l_e_st_eq_landau_n_left_t5 ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.λf:Πt:l_e_st_eq_landau_n_1to y.alpha.(l_e_st_eq_landau_n_lessisi2 x y (l_e_symis l_e_st_eq_landau_n_nat y x i) : l_e_st_eq_landau_n_lessis x y).
-
-(* constant 1079 *)
-definition l_e_st_eq_landau_n_left_f1 ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.λf:Πt:l_e_st_eq_landau_n_1to y.alpha.(l_e_st_eq_landau_n_left alpha y x (l_e_st_eq_landau_n_left_t5 alpha x y i f) f : Πt:l_e_st_eq_landau_n_1to x.alpha).
-
-(* constant 1080 *)
-definition l_e_st_eq_landau_n_left_f2 ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.λf:Πt:l_e_st_eq_landau_n_1to y.alpha.(l_e_st_eq_landau_n_left alpha x y (l_e_st_eq_landau_n_left_t4 alpha x y i f) (l_e_st_eq_landau_n_left_f1 alpha x y i f) : Πt:l_e_st_eq_landau_n_1to y.alpha).
-
-(* constant 1081 *)
-definition l_e_st_eq_landau_n_left_t6 ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.λf:Πt:l_e_st_eq_landau_n_1to y.alpha.λu:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_inn y u) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_inn y u) y x (l_e_st_eq_landau_n_1top y u) (l_e_st_eq_landau_n_left_t4 alpha x y i f)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_inn y u) (l_e_st_eq_landau_n_inn x (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_left_t4 alpha x y i f) u))).
-
-(* constant 1082 *)
-definition l_e_st_eq_landau_n_left_t7 ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.λf:Πt:l_e_st_eq_landau_n_1to y.alpha.λu:l_e_st_eq_landau_n_1to y.(l_e_tris (l_e_st_eq_landau_n_1to y) u (l_e_st_eq_landau_n_outn y (l_e_st_eq_landau_n_inn y u) (l_e_st_eq_landau_n_1top y u)) (l_e_st_eq_landau_n_left1to y x (l_e_st_eq_landau_n_left_t5 alpha x y i f) (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_left_t4 alpha x y i f) u)) (l_e_st_eq_landau_n_isoutinn y u) (l_e_st_eq_landau_n_isoutni y (l_e_st_eq_landau_n_inn y u) (l_e_st_eq_landau_n_1top y u) (l_e_st_eq_landau_n_inn x (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_left_t4 alpha x y i f) u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_inn x (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_left_t4 alpha x y i f) u)) x y (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_left_t4 alpha x y i f) u)) (l_e_st_eq_landau_n_left_t5 alpha x y i f)) (l_e_st_eq_landau_n_left_t6 alpha x y i f u)) : l_e_is (l_e_st_eq_landau_n_1to y) u (l_e_st_eq_landau_n_left1to y x (l_e_st_eq_landau_n_left_t5 alpha x y i f) (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_left_t4 alpha x y i f) u))).
-
-(* constant 1083 *)
-definition l_e_st_eq_landau_n_left_t8 ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.λf:Πt:l_e_st_eq_landau_n_1to y.alpha.λu:l_e_st_eq_landau_n_1to y.(l_e_isf (l_e_st_eq_landau_n_1to y) alpha f u (l_e_st_eq_landau_n_left1to y x (l_e_st_eq_landau_n_left_t5 alpha x y i f) (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_left_t4 alpha x y i f) u)) (l_e_st_eq_landau_n_left_t7 alpha x y i f u) : l_e_is alpha (f u) (l_e_st_eq_landau_n_left_f2 alpha x y i f u)).
-
-(* constant 1084 *)
-definition l_e_st_eq_landau_n_thleft ≝ λalpha:Type[0].λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.λf:Πt:l_e_st_eq_landau_n_1to y.alpha.(l_e_fisi (l_e_st_eq_landau_n_1to y) alpha f (l_e_st_eq_landau_n_left_f2 alpha x y i f) (λt:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_left_t8 alpha x y i f t) : l_e_is (Πt:l_e_st_eq_landau_n_1to y.alpha) f (l_e_st_eq_landau_n_left alpha x y (l_e_st_eq_landau_n_lessisi2 y x i) (l_e_st_eq_landau_n_left alpha y x (l_e_st_eq_landau_n_lessisi2 x y (l_e_symis l_e_st_eq_landau_n_nat y x i)) f))).
-
-(* constant 1085 *)
-definition l_e_st_eq_landau_n_frac ≝ (l_e_st_eq_landau_n_pair1type l_e_st_eq_landau_n_nat : Type[0]).
-
-(* constant 1086 *)
-definition l_e_st_eq_landau_n_fr ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_pair1 l_e_st_eq_landau_n_nat x1 x2 : l_e_st_eq_landau_n_frac).
-
-(* constant 1087 *)
-definition l_e_st_eq_landau_n_num ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_first1 l_e_st_eq_landau_n_nat x : l_e_st_eq_landau_n_nat).
-
-(* constant 1088 *)
-definition l_e_st_eq_landau_n_den ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_second1 l_e_st_eq_landau_n_nat x : l_e_st_eq_landau_n_nat).
-
-(* constant 1089 *)
-definition l_e_st_eq_landau_n_numis ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_first1is1 l_e_st_eq_landau_n_nat x1 x2 : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) x1).
-
-(* constant 1090 *)
-definition l_e_st_eq_landau_n_isnum ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_first1is2 l_e_st_eq_landau_n_nat x1 x2 : l_e_st_eq_landau_n_is x1 (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2))).
-
-(* constant 1091 *)
-definition l_e_st_eq_landau_n_denis ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_second1is1 l_e_st_eq_landau_n_nat x1 x2 : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)) x2).
-
-(* constant 1092 *)
-definition l_e_st_eq_landau_n_isden ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_second1is2 l_e_st_eq_landau_n_nat x1 x2 : l_e_st_eq_landau_n_is x2 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2))).
-
-(* constant 1093 *)
-definition l_e_st_eq_landau_n_1x ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_num x : l_e_st_eq_landau_n_nat).
-
-(* constant 1094 *)
-definition l_e_st_eq_landau_n_2x ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_den x : l_e_st_eq_landau_n_nat).
-
-(* constant 1095 *)
-definition l_e_st_eq_landau_n_fris ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_pair1is1 l_e_st_eq_landau_n_nat x : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) x).
-
-(* constant 1096 *)
-definition l_e_st_eq_landau_n_isfr ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_pair1is2 l_e_st_eq_landau_n_nat x : l_e_is l_e_st_eq_landau_n_frac x (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1097 *)
-definition l_e_st_eq_landau_n_12isnd ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists12 x1 (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) y2 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_isnum x1 x2) (l_e_st_eq_landau_n_isden y1 y2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2)))).
-
-(* constant 1098 *)
-definition l_e_st_eq_landau_n_ndis12 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_12isnd x1 x2 y1 y2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts x1 y2)).
-
-(* constant 1099 *)
-definition l_e_st_eq_landau_n_1disnd ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists1 n1 (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_isnum n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1100 *)
-definition l_e_st_eq_landau_n_ndis1d ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_1disnd x n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1101 *)
-definition l_e_st_eq_landau_n_n2isnd ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists2 n2 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_isden n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)))).
-
-(* constant 1102 *)
-definition l_e_st_eq_landau_n_ndisn2 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_n2isnd x n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2)).
-
-(* constant 1103 *)
-definition l_e_st_eq_landau_n_isn ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x1 n.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_fr t x2) x1 n i : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr n x2)).
-
-(* constant 1104 *)
-definition l_e_st_eq_landau_n_isd ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x2 n.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_fr x1 t) x2 n i : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr x1 n)).
-
-(* constant 1105 *)
-definition l_e_st_eq_landau_n_isnd ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x1 y1.λj:l_e_st_eq_landau_n_is x2 y2.(l_e_tris l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 x2) (l_e_st_eq_landau_n_fr y1 y2) (l_e_st_eq_landau_n_isn x1 x2 y1 i) (l_e_st_eq_landau_n_isd y1 x2 y2 j) : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)).
-
-(* constant 1106 *)
-definition l_e_st_eq_landau_n_1y ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_num y : l_e_st_eq_landau_n_nat).
-
-(* constant 1107 *)
-definition l_e_st_eq_landau_n_2y ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_den y : l_e_st_eq_landau_n_nat).
-
-(* constant 1108 *)
-definition l_e_st_eq_landau_n_eq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) : Prop).
-
-(* constant 1109 *)
-definition l_e_st_eq_landau_n_eqi12 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2).(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_ndis12 x1 x2 y1 y2) i (l_e_st_eq_landau_n_12isnd y1 y2 x1 x2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)).
-
-(* constant 1110 *)
-definition l_e_st_eq_landau_n_eqi1 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)).(l_e_isp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq t (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) x (l_e_st_eq_landau_n_eqi12 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x) n1 n2 i) (l_e_st_eq_landau_n_fris x) : l_e_st_eq_landau_n_eq x (l_e_st_eq_landau_n_fr n1 n2)).
-
-(* constant 1111 *)
-definition l_e_st_eq_landau_n_eqi2 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2).(l_e_isp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr n1 n2) t) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) x (l_e_st_eq_landau_n_eqi12 n1 n2 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x) i) (l_e_st_eq_landau_n_fris x) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr n1 n2) x).
-
-(* constant 1112 *)
-definition l_e_st_eq_landau_n_satz37 ≝ λx:l_e_st_eq_landau_n_frac.(l_e_refis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) : l_e_st_eq_landau_n_eq x x).
-
-(* constant 1113 *)
-definition l_e_st_eq_landau_n_refeq ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz37 x : l_e_st_eq_landau_n_eq x x).
-
-(* constant 1114 *)
-definition l_e_st_eq_landau_n_refeq1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λi:l_e_is l_e_st_eq_landau_n_frac x y.(l_e_isp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq x t) x y (l_e_st_eq_landau_n_refeq x) i : l_e_st_eq_landau_n_eq x y).
-
-(* constant 1115 *)
-definition l_e_st_eq_landau_n_refeq2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λi:l_e_is l_e_st_eq_landau_n_frac x y.(l_e_isp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq t x) x y (l_e_st_eq_landau_n_refeq x) i : l_e_st_eq_landau_n_eq y x).
-
-(* constant 1116 *)
-definition l_e_st_eq_landau_n_eqnd ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x1 y1.λj:l_e_st_eq_landau_n_is x2 y2.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2) (l_e_st_eq_landau_n_isnd x1 x2 y1 y2 i j) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)).
-
-(* constant 1117 *)
-definition l_e_st_eq_landau_n_eqn ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x1 n.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr n x2) (l_e_st_eq_landau_n_isn x1 x2 n i) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr n x2)).
-
-(* constant 1118 *)
-definition l_e_st_eq_landau_n_eqd ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x2 n.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr x1 n) (l_e_st_eq_landau_n_isd x1 x2 n i) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr x1 n)).
-
-(* constant 1119 *)
-definition l_e_st_eq_landau_n_satz38 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) e : l_e_st_eq_landau_n_eq y x).
-
-(* constant 1120 *)
-definition l_e_st_eq_landau_n_symeq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_satz38 x y e : l_e_st_eq_landau_n_eq y x).
-
-(* constant 1121 *)
-definition l_e_st_eq_landau_n_ii1_t1 ≝ λa:l_e_st_eq_landau_n_nat.λb:l_e_st_eq_landau_n_nat.λc:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts b c) d) (l_e_st_eq_landau_n_ts d (l_e_st_eq_landau_n_ts b c)) (l_e_st_eq_landau_n_assts2 b c d) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_ts b c) d) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts d (l_e_st_eq_landau_n_ts b c))).
-
-(* constant 1122 *)
-definition l_e_st_eq_landau_n_stets ≝ λa:l_e_st_eq_landau_n_nat.λb:l_e_st_eq_landau_n_nat.λc:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_nat.(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts a (l_e_st_eq_landau_n_ts b (l_e_st_eq_landau_n_ts c d))) (l_e_st_eq_landau_n_ts a (l_e_st_eq_landau_n_ts d (l_e_st_eq_landau_n_ts b c))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a d) (l_e_st_eq_landau_n_ts b c)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a d) (l_e_st_eq_landau_n_ts c b)) (l_e_st_eq_landau_n_assts1 a b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts d (l_e_st_eq_landau_n_ts b c)) a (l_e_st_eq_landau_n_ii1_t1 a b c d)) (l_e_st_eq_landau_n_assts2 a d (l_e_st_eq_landau_n_ts b c)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts b c) (l_e_st_eq_landau_n_ts c b) (l_e_st_eq_landau_n_ts a d) (l_e_st_eq_landau_n_comts b c)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a d) (l_e_st_eq_landau_n_ts c b))).
-
-(* constant 1123 *)
-definition l_e_st_eq_landau_n_ii1_t2 ≝ λa:l_e_st_eq_landau_n_nat.λb:l_e_st_eq_landau_n_nat.λc:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts c d) b) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts d c) b) (l_e_st_eq_landau_n_ts d (l_e_st_eq_landau_n_ts c b)) (l_e_st_eq_landau_n_comts b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ists1 (l_e_st_eq_landau_n_ts c d) (l_e_st_eq_landau_n_ts d c) b (l_e_st_eq_landau_n_comts c d)) (l_e_st_eq_landau_n_assts1 d c b) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts d (l_e_st_eq_landau_n_ts c b))).
-
-(* constant 1124 *)
-definition l_e_st_eq_landau_n_ii1_anders ≝ λa:l_e_st_eq_landau_n_nat.λb:l_e_st_eq_landau_n_nat.λc:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts a (l_e_st_eq_landau_n_ts b (l_e_st_eq_landau_n_ts c d))) (l_e_st_eq_landau_n_ts a (l_e_st_eq_landau_n_ts d (l_e_st_eq_landau_n_ts c b))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a d) (l_e_st_eq_landau_n_ts c b)) (l_e_st_eq_landau_n_assts1 a b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts b (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts d (l_e_st_eq_landau_n_ts c b)) a (l_e_st_eq_landau_n_ii1_t2 a b c d)) (l_e_st_eq_landau_n_assts2 a d (l_e_st_eq_landau_n_ts c b)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a d) (l_e_st_eq_landau_n_ts c b))).
-
-(* constant 1125 *)
-definition l_e_st_eq_landau_n_1z ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_num z : l_e_st_eq_landau_n_nat).
-
-(* constant 1126 *)
-definition l_e_st_eq_landau_n_2z ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_den z : l_e_st_eq_landau_n_nat).
-
-(* constant 1127 *)
-definition l_e_st_eq_landau_n_139_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.(l_e_st_eq_landau_n_ists12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) e f : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1128 *)
-definition l_e_st_eq_landau_n_139_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.(l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1129 *)
-definition l_e_st_eq_landau_n_139_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1130 *)
-definition l_e_st_eq_landau_n_139_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_139_t2 x y z e f)) (l_e_st_eq_landau_n_139_t1 x y z e f) (l_e_st_eq_landau_n_139_t3 x y z e f) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1131 *)
-definition l_e_st_eq_landau_n_satz39 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.(l_e_st_eq_landau_n_satz33b (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_139_t4 x y z e f) : l_e_st_eq_landau_n_eq x z).
-
-(* constant 1132 *)
-definition l_e_st_eq_landau_n_139_anders ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ists12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) e f) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1133 *)
-definition l_e_st_eq_landau_n_treq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.(l_e_st_eq_landau_n_satz39 x y z e f : l_e_st_eq_landau_n_eq x z).
-
-(* constant 1134 *)
-definition l_e_st_eq_landau_n_treq1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq z x.λf:l_e_st_eq_landau_n_eq z y.(l_e_st_eq_landau_n_treq x z y (l_e_st_eq_landau_n_symeq z x e) f : l_e_st_eq_landau_n_eq x y).
-
-(* constant 1135 *)
-definition l_e_st_eq_landau_n_treq2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y z.(l_e_st_eq_landau_n_treq x z y e (l_e_st_eq_landau_n_symeq y z f) : l_e_st_eq_landau_n_eq x y).
-
-(* constant 1136 *)
-definition l_e_st_eq_landau_n_tr3eq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.λg:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_treq x y u e (l_e_st_eq_landau_n_treq y z u f g) : l_e_st_eq_landau_n_eq x u).
-
-(* constant 1137 *)
-definition l_e_st_eq_landau_n_tr4eq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.λg:l_e_st_eq_landau_n_eq z u.λh:l_e_st_eq_landau_n_eq u v.(l_e_st_eq_landau_n_tr3eq x y z v e f (l_e_st_eq_landau_n_treq z u v g h) : l_e_st_eq_landau_n_eq x v).
-
-(* constant 1138 *)
-definition l_e_st_eq_landau_n_satz40 ≝ λx:l_e_st_eq_landau_n_frac.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_eqi1 x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n) (l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts n (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n) (l_e_st_eq_landau_n_ts n (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2x x) n)) (l_e_st_eq_landau_n_assts2 (l_e_st_eq_landau_n_1x x) n (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_eq x (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n))).
-
-(* constant 1139 *)
-definition l_e_st_eq_landau_n_satz40a ≝ λx:l_e_st_eq_landau_n_frac.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_symeq x (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n)) (l_e_st_eq_landau_n_satz40 x n) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n)) x).
-
-(* constant 1140 *)
-definition l_e_st_eq_landau_n_satz40b ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_eqi12 x1 x2 (l_e_st_eq_landau_n_ts x1 n) (l_e_st_eq_landau_n_ts x2 n) (l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x1 (l_e_st_eq_landau_n_ts x2 n)) (l_e_st_eq_landau_n_ts x1 (l_e_st_eq_landau_n_ts n x2)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x1 n) x2) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts x2 n) (l_e_st_eq_landau_n_ts n x2) x1 (l_e_st_eq_landau_n_comts x2 n)) (l_e_st_eq_landau_n_assts2 x1 n x2)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x1 n) (l_e_st_eq_landau_n_ts x2 n))).
-
-(* constant 1141 *)
-definition l_e_st_eq_landau_n_satz40c ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_symeq (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x1 n) (l_e_st_eq_landau_n_ts x2 n)) (l_e_st_eq_landau_n_satz40b x1 x2 n) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x1 n) (l_e_st_eq_landau_n_ts x2 n)) (l_e_st_eq_landau_n_fr x1 x2)).
-
-(* constant 1142 *)
-definition l_e_st_eq_landau_n_moref ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) : Prop).
-
-(* constant 1143 *)
-definition l_e_st_eq_landau_n_lessf ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) : Prop).
-
-(* constant 1144 *)
-definition l_e_st_eq_landau_n_morefi12 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2).(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts y1 x2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_12isnd x1 x2 y1 y2) (l_e_st_eq_landau_n_12isnd y1 y2 x1 x2) m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)).
-
-(* constant 1145 *)
-definition l_e_st_eq_landau_n_lessfi12 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2).(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts y1 x2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_12isnd x1 x2 y1 y2) (l_e_st_eq_landau_n_12isnd y1 y2 x1 x2) l : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)).
-
-(* constant 1146 *)
-definition l_e_st_eq_landau_n_morefi1 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)).(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_n2isnd x n1 n2) (l_e_st_eq_landau_n_1disnd x n1 n2) m : l_e_st_eq_landau_n_moref x (l_e_st_eq_landau_n_fr n1 n2)).
-
-(* constant 1147 *)
-definition l_e_st_eq_landau_n_morefi2 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2).(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_1disnd x n1 n2) (l_e_st_eq_landau_n_n2isnd x n1 n2) m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr n1 n2) x).
-
-(* constant 1148 *)
-definition l_e_st_eq_landau_n_lessfi1 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)).(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_n2isnd x n1 n2) (l_e_st_eq_landau_n_1disnd x n1 n2) l : l_e_st_eq_landau_n_lessf x (l_e_st_eq_landau_n_fr n1 n2)).
-
-(* constant 1149 *)
-definition l_e_st_eq_landau_n_lessfi2 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2).(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_1disnd x n1 n2) (l_e_st_eq_landau_n_n2isnd x n1 n2) l : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr n1 n2) x).
-
-(* constant 1150 *)
-definition l_e_st_eq_landau_n_satz41 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz10 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) : l_orec3 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y)).
-
-(* constant 1151 *)
-definition l_e_st_eq_landau_n_satz41a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz10a (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) : l_or3 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y)).
-
-(* constant 1152 *)
-definition l_e_st_eq_landau_n_satz41b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) : l_ec3 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y)).
-
-(* constant 1153 *)
-definition l_e_st_eq_landau_n_satz42 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_satz11 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) m : l_e_st_eq_landau_n_lessf y x).
-
-(* constant 1154 *)
-definition l_e_st_eq_landau_n_satz43 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_satz12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) l : l_e_st_eq_landau_n_moref y x).
-
-(* constant 1155 *)
-definition l_e_st_eq_landau_n_1u ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_num u : l_e_st_eq_landau_n_nat).
-
-(* constant 1156 *)
-definition l_e_st_eq_landau_n_2u ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_den u : l_e_st_eq_landau_n_nat).
-
-(* constant 1157 *)
-definition l_e_st_eq_landau_n_244_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.(l_e_st_eq_landau_n_ists12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) f (l_e_st_eq_landau_n_symeq x z e) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1158 *)
-definition l_e_st_eq_landau_n_244_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_244_t1 x y z u m e f) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1159 *)
-definition l_e_st_eq_landau_n_244_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.(l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_244_t2 x y z u m e f)) (l_e_st_eq_landau_n_satz32d (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1160 *)
-definition l_e_st_eq_landau_n_satz44 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.(l_e_st_eq_landau_n_satz33a (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_244_t3 x y z u m e f)) : l_e_st_eq_landau_n_moref z u).
-
-(* constant 1161 *)
-definition l_e_st_eq_landau_n_eqmoref12 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.λm:l_e_st_eq_landau_n_moref x z.(l_e_st_eq_landau_n_satz44 x z y u m e f : l_e_st_eq_landau_n_moref y u).
-
-(* constant 1162 *)
-definition l_e_st_eq_landau_n_eqmoref1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λm:l_e_st_eq_landau_n_moref x z.(l_e_st_eq_landau_n_satz44 x z y z m e (l_e_st_eq_landau_n_refeq z) : l_e_st_eq_landau_n_moref y z).
-
-(* constant 1163 *)
-definition l_e_st_eq_landau_n_eqmoref2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λm:l_e_st_eq_landau_n_moref z x.(l_e_st_eq_landau_n_satz44 z x z y m (l_e_st_eq_landau_n_refeq z) e : l_e_st_eq_landau_n_moref z y).
-
-(* constant 1164 *)
-definition l_e_st_eq_landau_n_satz45 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.(l_e_st_eq_landau_n_satz42 u z (l_e_st_eq_landau_n_satz44 y x u z (l_e_st_eq_landau_n_satz43 x y l) f e) : l_e_st_eq_landau_n_lessf z u).
-
-(* constant 1165 *)
-definition l_e_st_eq_landau_n_eqlessf12 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.λl:l_e_st_eq_landau_n_lessf x z.(l_e_st_eq_landau_n_satz45 x z y u l e f : l_e_st_eq_landau_n_lessf y u).
-
-(* constant 1166 *)
-definition l_e_st_eq_landau_n_eqlessf1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λl:l_e_st_eq_landau_n_lessf x z.(l_e_st_eq_landau_n_satz45 x z y z l e (l_e_st_eq_landau_n_refeq z) : l_e_st_eq_landau_n_lessf y z).
-
-(* constant 1167 *)
-definition l_e_st_eq_landau_n_eqlessf2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λl:l_e_st_eq_landau_n_lessf z x.(l_e_st_eq_landau_n_satz45 z x z y l (l_e_st_eq_landau_n_refeq z) e : l_e_st_eq_landau_n_lessf z y).
-
-(* constant 1168 *)
-definition l_e_st_eq_landau_n_moreq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_or (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) : Prop).
-
-(* constant 1169 *)
-definition l_e_st_eq_landau_n_lesseq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_or (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) : Prop).
-
-(* constant 1170 *)
-definition l_e_st_eq_landau_n_moreqi2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_ori2 (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) e : l_e_st_eq_landau_n_moreq x y).
-
-(* constant 1171 *)
-definition l_e_st_eq_landau_n_lesseqi2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_ori2 (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) e : l_e_st_eq_landau_n_lesseq x y).
-
-(* constant 1172 *)
-definition l_e_st_eq_landau_n_moreqi1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_ori1 (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) m : l_e_st_eq_landau_n_moreq x y).
-
-(* constant 1173 *)
-definition l_e_st_eq_landau_n_lesseqi1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_ori1 (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) l : l_e_st_eq_landau_n_lesseq x y).
-
-(* constant 1174 *)
-definition l_e_st_eq_landau_n_satz41c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.(l_ec3_th7 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41b x y) (l_comor (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) m) : l_not (l_e_st_eq_landau_n_lessf x y)).
-
-(* constant 1175 *)
-definition l_e_st_eq_landau_n_satz41d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.(l_ec3_th9 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41b x y) l : l_not (l_e_st_eq_landau_n_moref x y)).
-
-(* constant 1176 *)
-definition l_e_st_eq_landau_n_satz41e ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λn:l_not (l_e_st_eq_landau_n_moref x y).(l_or3_th2 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41a x y) n : l_e_st_eq_landau_n_lesseq x y).
-
-(* constant 1177 *)
-definition l_e_st_eq_landau_n_satz41f ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λn:l_not (l_e_st_eq_landau_n_lessf x y).(l_comor (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_or3_th3 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41a x y) n) : l_e_st_eq_landau_n_moreq x y).
-
-(* constant 1178 *)
-definition l_e_st_eq_landau_n_satz41g ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_or_th3 (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) (l_ec3e23 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41b x y) m) (l_ec3e21 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41b x y) m) : l_not (l_e_st_eq_landau_n_lesseq x y)).
-
-(* constant 1179 *)
-definition l_e_st_eq_landau_n_satz41h ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_or_th3 (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) (l_ec3e32 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41b x y) l) (l_ec3e31 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41b x y) l) : l_not (l_e_st_eq_landau_n_moreq x y)).
-
-(* constant 1180 *)
-definition l_e_st_eq_landau_n_satz41j ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λn:l_not (l_e_st_eq_landau_n_moreq x y).(l_or3e3 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41a x y) (l_or_th5 (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) n) (l_or_th4 (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) n) : l_e_st_eq_landau_n_lessf x y).
-
-(* constant 1181 *)
-definition l_e_st_eq_landau_n_satz41k ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λn:l_not (l_e_st_eq_landau_n_lesseq x y).(l_or3e2 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_satz41a x y) (l_or_th4 (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) n) (l_or_th5 (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) n) : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1182 *)
-definition l_e_st_eq_landau_n_246_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.λn:l_e_st_eq_landau_n_moref x y.(l_ori1 (l_e_st_eq_landau_n_moref z u) (l_e_st_eq_landau_n_eq z u) (l_e_st_eq_landau_n_satz44 x y z u n e f) : l_e_st_eq_landau_n_moreq z u).
-
-(* constant 1183 *)
-definition l_e_st_eq_landau_n_246_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.λg:l_e_st_eq_landau_n_eq x y.(l_ori2 (l_e_st_eq_landau_n_moref z u) (l_e_st_eq_landau_n_eq z u) (l_e_st_eq_landau_n_tr3eq z x y u (l_e_st_eq_landau_n_symeq x z e) g f) : l_e_st_eq_landau_n_moreq z u).
-
-(* constant 1184 *)
-definition l_e_st_eq_landau_n_satz46 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.(l_orapp (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moreq z u) m (λt:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_246_t1 x y z u m e f t) (λt:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_246_t2 x y z u m e f t) : l_e_st_eq_landau_n_moreq z u).
-
-(* constant 1185 *)
-definition l_e_st_eq_landau_n_eqmoreq12 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.λm:l_e_st_eq_landau_n_moreq x z.(l_e_st_eq_landau_n_satz46 x z y u m e f : l_e_st_eq_landau_n_moreq y u).
-
-(* constant 1186 *)
-definition l_e_st_eq_landau_n_eqmoreq1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λm:l_e_st_eq_landau_n_moreq x z.(l_e_st_eq_landau_n_satz46 x z y z m e (l_e_st_eq_landau_n_refeq z) : l_e_st_eq_landau_n_moreq y z).
-
-(* constant 1187 *)
-definition l_e_st_eq_landau_n_eqmoreq2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λm:l_e_st_eq_landau_n_moreq z x.(l_e_st_eq_landau_n_satz46 z x z y m (l_e_st_eq_landau_n_refeq z) e : l_e_st_eq_landau_n_moreq z y).
-
-(* constant 1188 *)
-definition l_e_st_eq_landau_n_247_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.λk:l_e_st_eq_landau_n_lessf x y.(l_ori1 (l_e_st_eq_landau_n_lessf z u) (l_e_st_eq_landau_n_eq z u) (l_e_st_eq_landau_n_satz45 x y z u k e f) : l_e_st_eq_landau_n_lesseq z u).
-
-(* constant 1189 *)
-definition l_e_st_eq_landau_n_247_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.λg:l_e_st_eq_landau_n_eq x y.(l_ori2 (l_e_st_eq_landau_n_lessf z u) (l_e_st_eq_landau_n_eq z u) (l_e_st_eq_landau_n_tr3eq z x y u (l_e_st_eq_landau_n_symeq x z e) g f) : l_e_st_eq_landau_n_lesseq z u).
-
-(* constant 1190 *)
-definition l_e_st_eq_landau_n_satz47 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λe:l_e_st_eq_landau_n_eq x z.λf:l_e_st_eq_landau_n_eq y u.(l_orapp (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_lesseq z u) l (λt:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_247_t1 x y z u l e f t) (λt:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_247_t2 x y z u l e f t) : l_e_st_eq_landau_n_lesseq z u).
-
-(* constant 1191 *)
-definition l_e_st_eq_landau_n_eqlesseq12 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.λl:l_e_st_eq_landau_n_lesseq x z.(l_e_st_eq_landau_n_satz47 x z y u l e f : l_e_st_eq_landau_n_lesseq y u).
-
-(* constant 1192 *)
-definition l_e_st_eq_landau_n_eqlesseq1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λl:l_e_st_eq_landau_n_lesseq x z.(l_e_st_eq_landau_n_satz47 x z y z l e (l_e_st_eq_landau_n_refeq z) : l_e_st_eq_landau_n_lesseq y z).
-
-(* constant 1193 *)
-definition l_e_st_eq_landau_n_eqlesseq2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λl:l_e_st_eq_landau_n_lesseq z x.(l_e_st_eq_landau_n_satz47 z x z y l (l_e_st_eq_landau_n_refeq z) e : l_e_st_eq_landau_n_lesseq z y).
-
-(* constant 1194 *)
-definition l_e_st_eq_landau_n_satz48 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.(l_or_th9 (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_lessf y x) (l_e_st_eq_landau_n_eq y x) m (λt:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz42 x y t) (λt:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz38 x y t) : l_e_st_eq_landau_n_lesseq y x).
-
-(* constant 1195 *)
-definition l_e_st_eq_landau_n_satz49 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.(l_or_th9 (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref y x) (l_e_st_eq_landau_n_eq y x) l (λt:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_satz43 x y t) (λt:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz38 x y t) : l_e_st_eq_landau_n_moreq y x).
-
-(* constant 1196 *)
-definition l_e_st_eq_landau_n_250_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lessf y z.(l_e_st_eq_landau_n_satz34a (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) l k : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1197 *)
-definition l_e_st_eq_landau_n_250_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lessf y z.(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)))) (l_e_st_eq_landau_n_250_t1 x y z l k) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1198 *)
-definition l_e_st_eq_landau_n_satz50 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lessf y z.(l_e_st_eq_landau_n_satz33c (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_250_t2 x y z l k) : l_e_st_eq_landau_n_lessf x z).
-
-(* constant 1199 *)
-definition l_e_st_eq_landau_n_trlessf ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lessf y z.(l_e_st_eq_landau_n_satz50 x y z l k : l_e_st_eq_landau_n_lessf x z).
-
-(* constant 1200 *)
-definition l_e_st_eq_landau_n_trmoref ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moref y z.(l_e_st_eq_landau_n_satz43 z x (l_e_st_eq_landau_n_satz50 z y x (l_e_st_eq_landau_n_satz42 y z n) (l_e_st_eq_landau_n_satz42 x y m)) : l_e_st_eq_landau_n_moref x z).
-
-(* constant 1201 *)
-definition l_e_st_eq_landau_n_satz51a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lessf y z.(l_orapp (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_lessf x z) l (λt:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_satz50 x y z t k) (λt:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_eqlessf1 y x z (l_e_st_eq_landau_n_symeq x y t) k) : l_e_st_eq_landau_n_lessf x z).
-
-(* constant 1202 *)
-definition l_e_st_eq_landau_n_satz51b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lesseq y z.(l_orapp (l_e_st_eq_landau_n_lessf y z) (l_e_st_eq_landau_n_eq y z) (l_e_st_eq_landau_n_lessf x z) k (λt:l_e_st_eq_landau_n_lessf y z.l_e_st_eq_landau_n_satz50 x y z l t) (λt:l_e_st_eq_landau_n_eq y z.l_e_st_eq_landau_n_eqlessf2 y z x t l) : l_e_st_eq_landau_n_lessf x z).
-
-(* constant 1203 *)
-definition l_e_st_eq_landau_n_satz51c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moref y z.(l_e_st_eq_landau_n_satz43 z x (l_e_st_eq_landau_n_satz51b z y x (l_e_st_eq_landau_n_satz42 y z n) (l_e_st_eq_landau_n_satz48 x y m)) : l_e_st_eq_landau_n_moref x z).
-
-(* constant 1204 *)
-definition l_e_st_eq_landau_n_satz51d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moreq y z.(l_e_st_eq_landau_n_satz43 z x (l_e_st_eq_landau_n_satz51a z y x (l_e_st_eq_landau_n_satz48 y z n) (l_e_st_eq_landau_n_satz42 x y m)) : l_e_st_eq_landau_n_moref x z).
-
-(* constant 1205 *)
-definition l_e_st_eq_landau_n_252_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq y z.(l_ori2 (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_eq x z) (l_e_st_eq_landau_n_treq x y z e f) : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1206 *)
-definition l_e_st_eq_landau_n_252_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.λe:l_e_st_eq_landau_n_eq x y.λj:l_e_st_eq_landau_n_lessf y z.(l_ori1 (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_eq x z) (l_e_st_eq_landau_n_satz51a x y z l j) : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1207 *)
-definition l_e_st_eq_landau_n_252_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.λe:l_e_st_eq_landau_n_eq x y.(l_orapp (l_e_st_eq_landau_n_lessf y z) (l_e_st_eq_landau_n_eq y z) (l_e_st_eq_landau_n_lesseq x z) k (λt:l_e_st_eq_landau_n_lessf y z.l_e_st_eq_landau_n_252_t2 x y z l k e t) (λt:l_e_st_eq_landau_n_eq y z.l_e_st_eq_landau_n_252_t1 x y z l k e t) : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1208 *)
-definition l_e_st_eq_landau_n_252_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.λj:l_e_st_eq_landau_n_lessf x y.(l_ori1 (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_eq x z) (l_e_st_eq_landau_n_satz51b x y z j k) : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1209 *)
-definition l_e_st_eq_landau_n_satz52 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.(l_orapp (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_lesseq x z) l (λt:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_252_t4 x y z l k t) (λt:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_252_t3 x y z l k t) : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1210 *)
-definition l_e_st_eq_landau_n_trlesseq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.(l_e_st_eq_landau_n_satz52 x y z l k : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1211 *)
-definition l_e_st_eq_landau_n_252_t5 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.λj:l_e_st_eq_landau_n_lessf x y.(l_ori1 (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_eq x z) (l_e_st_eq_landau_n_satz51b x y z j k) : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1212 *)
-definition l_e_st_eq_landau_n_252_t6 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_eqlesseq1 y x z (l_e_st_eq_landau_n_symeq x y e) k : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1213 *)
-definition l_e_st_eq_landau_n_252_anders ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq y z.(l_orapp (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_lesseq x z) l (λt:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_252_t5 x y z l k t) (λt:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_252_t6 x y z l k t) : l_e_st_eq_landau_n_lesseq x z).
-
-(* constant 1214 *)
-definition l_e_st_eq_landau_n_trmoreq ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq y z.(l_e_st_eq_landau_n_satz49 z x (l_e_st_eq_landau_n_satz52 z y x (l_e_st_eq_landau_n_satz48 y z n) (l_e_st_eq_landau_n_satz48 x y m)) : l_e_st_eq_landau_n_moreq x z).
-
-(* constant 1215 *)
-definition l_e_st_eq_landau_n_253_t1 ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_distpt1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_satz18 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1216 *)
-definition l_e_st_eq_landau_n_253_t2 ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_morefi2 x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_253_t1 x) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_2x x)) x).
-
-(* constant 1217 *)
-definition l_e_st_eq_landau_n_satz53 ≝ λx:l_e_st_eq_landau_n_frac.(l_somei l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_moref t x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_253_t2 x) : l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_moref t x)).
-
-(* constant 1218 *)
-definition l_e_st_eq_landau_n_254_t1 ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_isless2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_distpt2 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_satz18a (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1219 *)
-definition l_e_st_eq_landau_n_254_t2 ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_lessfi2 x (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_254_t1 x) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2x x))) x).
-
-(* constant 1220 *)
-definition l_e_st_eq_landau_n_satz54 ≝ λx:l_e_st_eq_landau_n_frac.(l_somei l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_lessf t x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_254_t2 x) : l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_lessf t x)).
-
-(* constant 1221 *)
-definition l_e_st_eq_landau_n_255_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_satz19f (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) l : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1222 *)
-definition l_e_st_eq_landau_n_255_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_satz19c (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) l : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1223 *)
-definition l_e_st_eq_landau_n_255_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_distpt2 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_distpt1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_255_t1 x y l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1224 *)
-definition l_e_st_eq_landau_n_255_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_lessfi1 x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_255_t3 x y l) : l_e_st_eq_landau_n_lessf x (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1225 *)
-definition l_e_st_eq_landau_n_255_t5 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_distpt1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_distpt2 (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_255_t2 x y l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1226 *)
-definition l_e_st_eq_landau_n_255_t6 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_lessfi2 y (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_255_t5 x y l) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) y).
-
-(* constant 1227 *)
-definition l_e_st_eq_landau_n_255_t7 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_andi (l_e_st_eq_landau_n_lessf x (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) y) (l_e_st_eq_landau_n_255_t4 x y l) (l_e_st_eq_landau_n_255_t6 x y l) : l_and (l_e_st_eq_landau_n_lessf x (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) y)).
-
-(* constant 1228 *)
-definition l_e_st_eq_landau_n_satz55 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_somei l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_and (l_e_st_eq_landau_n_lessf x t) (l_e_st_eq_landau_n_lessf t y)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_255_t7 x y l) : l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_and (l_e_st_eq_landau_n_lessf x t) (l_e_st_eq_landau_n_lessf t y))).
-
-(* constant 1229 *)
-definition l_e_st_eq_landau_n_pf ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) : l_e_st_eq_landau_n_frac).
-
-(* constant 1230 *)
-definition l_e_st_eq_landau_n_ii3_t1 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_ts y1 x2) (l_e_st_eq_landau_n_ndis12 x1 x2 y1 y2) (l_e_st_eq_landau_n_ndis12 y1 y2 x1 x2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2))).
-
-(* constant 1231 *)
-definition l_e_st_eq_landau_n_ii3_t2 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists12 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)) x2 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2)) y2 (l_e_st_eq_landau_n_denis x1 x2) (l_e_st_eq_landau_n_denis y1 y2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts x2 y2)).
-
-(* constant 1232 *)
-definition l_e_st_eq_landau_n_pf12 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_isnd (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2)) (l_e_st_eq_landau_n_ts x2 y2) (l_e_st_eq_landau_n_ii3_t1 x1 x2 y1 y2) (l_e_st_eq_landau_n_ii3_t2 x1 x2 y1 y2) : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2)) (l_e_st_eq_landau_n_ts x2 y2))).
-
-(* constant 1233 *)
-definition l_e_st_eq_landau_n_ii3_t3 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ndisn2 x n1 n2) (l_e_st_eq_landau_n_ndis1d x n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1234 *)
-definition l_e_st_eq_landau_n_ii3_t4 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) n2 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_denis n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2)).
-
-(* constant 1235 *)
-definition l_e_st_eq_landau_n_pf1 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_isnd (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2) (l_e_st_eq_landau_n_ii3_t3 x n1 n2) (l_e_st_eq_landau_n_ii3_t4 x n1 n2) : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2))).
-
-(* constant 1236 *)
-definition l_e_st_eq_landau_n_ii3_t5 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ndis1d x n1 n2) (l_e_st_eq_landau_n_ndisn2 x n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2))).
-
-(* constant 1237 *)
-definition l_e_st_eq_landau_n_ii3_t6 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists1 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) n2 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_denis n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1238 *)
-definition l_e_st_eq_landau_n_pf2 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_isnd (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ii3_t5 x n1 n2) (l_e_st_eq_landau_n_ii3_t6 x n1 n2) : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr n1 n2) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1239 *)
-definition l_e_st_eq_landau_n_pfeq12a ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2)) (l_e_st_eq_landau_n_ts x2 y2)) (l_e_st_eq_landau_n_pf12 x1 x2 y1 y2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2)) (l_e_st_eq_landau_n_ts x2 y2))).
-
-(* constant 1240 *)
-definition l_e_st_eq_landau_n_pfeq12b ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq2 (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2)) (l_e_st_eq_landau_n_ts x2 y2)) (l_e_st_eq_landau_n_pf12 x1 x2 y1 y2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 y2) (l_e_st_eq_landau_n_ts y1 x2)) (l_e_st_eq_landau_n_ts x2 y2)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2))).
-
-(* constant 1241 *)
-definition l_e_st_eq_landau_n_pfeq1a ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2)) (l_e_st_eq_landau_n_pf1 x n1 n2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2))).
-
-(* constant 1242 *)
-definition l_e_st_eq_landau_n_pfeq1b ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq2 (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2)) (l_e_st_eq_landau_n_pf1 x n1 n2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2)) (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_fr n1 n2))).
-
-(* constant 1243 *)
-definition l_e_st_eq_landau_n_pfeq2a ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr n1 n2) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_pf2 x n1 n2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr n1 n2) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1244 *)
-definition l_e_st_eq_landau_n_pfeq2b ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq2 (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr n1 n2) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_pf2 x n1 n2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n2)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr n1 n2) x)).
-
-(* constant 1245 *)
-definition l_e_st_eq_landau_n_356_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_ists1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u)) e : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u)))).
-
-(* constant 1246 *)
-definition l_e_st_eq_landau_n_356_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_356_t1 z u x y f e : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1247 *)
-definition l_e_st_eq_landau_n_356_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2u x y z u) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2u x y z u) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2u x y z u) (l_e_st_eq_landau_n_2z x y z))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u)))).
-
-(* constant 1248 *)
-definition l_e_st_eq_landau_n_356_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_356_t3 x y z u e f) (l_e_st_eq_landau_n_356_t1 x y z u e f) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1249 *)
-definition l_e_st_eq_landau_n_356_t5 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_356_t2 x y z u e f) (l_e_st_eq_landau_n_stets (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1250 *)
-definition l_e_st_eq_landau_n_356_t6 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_356_t4 x y z u e f) (l_e_st_eq_landau_n_356_t5 x y z u e f) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))))).
-
-(* constant 1251 *)
-definition l_e_st_eq_landau_n_356_t7 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_disttp1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_356_t6 x y z u e f) (l_e_st_eq_landau_n_distpt1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1252 *)
-definition l_e_st_eq_landau_n_satz56 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_eqi12 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_356_t7 x y z u e f) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1253 *)
-definition l_e_st_eq_landau_n_eqpf12 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_satz56 x y z u e f : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1254 *)
-definition l_e_st_eq_landau_n_eqpf1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_eqpf12 x y z z e (l_e_st_eq_landau_n_refeq z) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)).
-
-(* constant 1255 *)
-definition l_e_st_eq_landau_n_eqpf2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_eqpf12 z z x y (l_e_st_eq_landau_n_refeq z) e : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf z y)).
-
-(* constant 1256 *)
-definition l_e_st_eq_landau_n_satz57 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 n) (l_e_st_eq_landau_n_fr x2 n)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 n) (l_e_st_eq_landau_n_ts x2 n)) (l_e_st_eq_landau_n_ts n n)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl x1 x2) n) (l_e_st_eq_landau_n_ts n n)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl x1 x2) n) (l_e_st_eq_landau_n_pfeq12a x1 n x2 n) (l_e_st_eq_landau_n_eqn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x1 n) (l_e_st_eq_landau_n_ts x2 n)) (l_e_st_eq_landau_n_ts n n) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl x1 x2) n) (l_e_st_eq_landau_n_distpt1 x1 x2 n)) (l_e_st_eq_landau_n_satz40c (l_e_st_eq_landau_n_pl x1 x2) n n) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 n) (l_e_st_eq_landau_n_fr x2 n)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl x1 x2) n)).
-
-(* constant 1257 *)
-definition l_e_st_eq_landau_n_satz57a ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_symeq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 n) (l_e_st_eq_landau_n_fr x2 n)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl x1 x2) n) (l_e_st_eq_landau_n_satz57 x1 x2 n) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl x1 x2) n) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x1 n) (l_e_st_eq_landau_n_fr x2 n))).
-
-(* constant 1258 *)
-definition l_e_st_eq_landau_n_satz58 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_eqnd (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_compl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x y) (l_e_st_eq_landau_n_pf y x)).
-
-(* constant 1259 *)
-definition l_e_st_eq_landau_n_compf ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz58 x y : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x y) (l_e_st_eq_landau_n_pf y x)).
-
-(* constant 1260 *)
-definition l_e_st_eq_landau_n_359_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ists1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1261 *)
-definition l_e_st_eq_landau_n_359_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_359_t1 x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1262 *)
-definition l_e_st_eq_landau_n_359_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_disttp1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_359_t2 x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1263 *)
-definition l_e_st_eq_landau_n_359_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_assts2 (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1264 *)
-definition l_e_st_eq_landau_n_359_t5 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_359_t3 x y z) (l_e_st_eq_landau_n_359_t4 x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1265 *)
-definition l_e_st_eq_landau_n_359_t6 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_distpt1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1266 *)
-definition l_e_st_eq_landau_n_359_t7 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_359_t5 x y z) (l_e_st_eq_landau_n_asspl1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_359_t6 x y z) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1267 *)
-definition l_e_st_eq_landau_n_satz59 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_pfeq2a z (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_eqnd (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_359_t7 x y z) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_pfeq1b x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_pf y z))).
-
-(* constant 1268 *)
-definition l_e_st_eq_landau_n_asspf1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz59 x y z : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_pf y z))).
-
-(* constant 1269 *)
-definition l_e_st_eq_landau_n_asspf2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_symeq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_asspf1 x y z) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_pf x y) z)).
-
-(* constant 1270 *)
-definition l_e_st_eq_landau_n_stets1 ≝ λa:l_e_st_eq_landau_n_nat.λb:l_e_st_eq_landau_n_nat.λc:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) c) (l_e_st_eq_landau_n_ts a (l_e_st_eq_landau_n_ts b c)) (l_e_st_eq_landau_n_ts a (l_e_st_eq_landau_n_ts c b)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a c) b) (l_e_st_eq_landau_n_assts1 a b c) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts b c) (l_e_st_eq_landau_n_ts c b) a (l_e_st_eq_landau_n_comts b c)) (l_e_st_eq_landau_n_assts2 a c b) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) c) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a c) b)).
-
-(* constant 1271 *)
-definition l_e_st_eq_landau_n_359_t8 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_disttp1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_stets1 (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1272 *)
-definition l_e_st_eq_landau_n_359_t9 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_assts2 (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_stets1 (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1273 *)
-definition l_e_st_eq_landau_n_359_anderst7 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_359_t8 x y z) (l_e_st_eq_landau_n_359_t9 x y z)) (l_e_st_eq_landau_n_asspl1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_distpt1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1274 *)
-definition l_e_st_eq_landau_n_360_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz18 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y))).
-
-(* constant 1275 *)
-definition l_e_st_eq_landau_n_360_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz32a (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_360_t1 x y) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1276 *)
-definition l_e_st_eq_landau_n_360_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1277 *)
-definition l_e_st_eq_landau_n_360_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_ismore2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_360_t3 x y) (l_e_st_eq_landau_n_360_t2 x y) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1278 *)
-definition l_e_st_eq_landau_n_satz60 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_morefi2 x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_360_t4 x y) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x y) x).
-
-(* constant 1279 *)
-definition l_e_st_eq_landau_n_satz60a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_pf x y) x (l_e_st_eq_landau_n_satz60 x y) : l_e_st_eq_landau_n_lessf x (l_e_st_eq_landau_n_pf x y)).
-
-(* constant 1280 *)
-definition l_e_st_eq_landau_n_361_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_satz32a (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z) m : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z))).
-
-(* constant 1281 *)
-definition l_e_st_eq_landau_n_361_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_stets1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_stets1 (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_361_t1 x y z m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1282 *)
-definition l_e_st_eq_landau_n_361_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_stets1 (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1283 *)
-definition l_e_st_eq_landau_n_361_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_satz19h (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_361_t3 x y z m) (l_e_st_eq_landau_n_361_t2 x y z m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1284 *)
-definition l_e_st_eq_landau_n_361_t5 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_distpt1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_distpt1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_361_t4 x y z m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1285 *)
-definition l_e_st_eq_landau_n_361_t6 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_satz32a (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_361_t5 x y z m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z))).
-
-(* constant 1286 *)
-definition l_e_st_eq_landau_n_361_t7 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_361_t6 x y z m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1287 *)
-definition l_e_st_eq_landau_n_satz61 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_morefi12 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_361_t7 x y z m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)).
-
-(* constant 1288 *)
-definition l_e_st_eq_landau_n_satz62a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_satz61 x y z m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)).
-
-(* constant 1289 *)
-definition l_e_st_eq_landau_n_satz62b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_eqpf1 x y z e : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)).
-
-(* constant 1290 *)
-definition l_e_st_eq_landau_n_satz62c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_satz61 y x z (l_e_st_eq_landau_n_satz43 x y l)) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)).
-
-(* constant 1291 *)
-definition l_e_st_eq_landau_n_satz62d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_eqmoref12 (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_pf z y) (l_e_st_eq_landau_n_compf x z) (l_e_st_eq_landau_n_compf y z) (l_e_st_eq_landau_n_satz62a x y z m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf z y)).
-
-(* constant 1292 *)
-definition l_e_st_eq_landau_n_satz62e ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_eqpf2 x y z e : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf z y)).
-
-(* constant 1293 *)
-definition l_e_st_eq_landau_n_satz62f ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_eqlessf12 (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_pf z y) (l_e_st_eq_landau_n_compf x z) (l_e_st_eq_landau_n_compf y z) (l_e_st_eq_landau_n_satz62c x y z l) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf z y)).
-
-(* constant 1294 *)
-definition l_e_st_eq_landau_n_satz62g ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λm:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_eqmoref2 (l_e_st_eq_landau_n_pf x u) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_eqpf1 x y u e) (l_e_st_eq_landau_n_satz62d z u x m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1295 *)
-definition l_e_st_eq_landau_n_satz62h ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λm:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_eqmoref12 (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf u y) (l_e_st_eq_landau_n_compf x z) (l_e_st_eq_landau_n_compf y u) (l_e_st_eq_landau_n_satz62g x y z u e m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf u y)).
-
-(* constant 1296 *)
-definition l_e_st_eq_landau_n_satz62j ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λl:l_e_st_eq_landau_n_lessf z u.(l_e_st_eq_landau_n_eqlessf2 (l_e_st_eq_landau_n_pf x u) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_eqpf1 x y u e) (l_e_st_eq_landau_n_satz62f z u x l) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1297 *)
-definition l_e_st_eq_landau_n_satz62k ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λl:l_e_st_eq_landau_n_lessf z u.(l_e_st_eq_landau_n_eqlessf12 (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf u y) (l_e_st_eq_landau_n_compf x z) (l_e_st_eq_landau_n_compf y u) (l_e_st_eq_landau_n_satz62j x y z u e l) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf u y)).
-
-(* constant 1298 *)
-definition l_e_st_eq_landau_n_363_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz41a x y : l_or3 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y)).
-
-(* constant 1299 *)
-definition l_e_st_eq_landau_n_363_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz41b (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) : l_ec3 (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z))).
-
-(* constant 1300 *)
-definition l_e_st_eq_landau_n_satz63a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z).(l_ec3_th11 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_363_t1 x y z) (l_e_st_eq_landau_n_363_t2 x y z) (λu:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz62b x y z u) (λu:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz62a x y z u) (λu:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_satz62c x y z u) m : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1301 *)
-definition l_e_st_eq_landau_n_satz63b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z).(l_ec3_th10 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_363_t1 x y z) (l_e_st_eq_landau_n_363_t2 x y z) (λu:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz62b x y z u) (λu:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz62a x y z u) (λu:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_satz62c x y z u) e : l_e_st_eq_landau_n_eq x y).
-
-(* constant 1302 *)
-definition l_e_st_eq_landau_n_satz63c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z).(l_ec3_th12 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_363_t1 x y z) (l_e_st_eq_landau_n_363_t2 x y z) (λu:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz62b x y z u) (λu:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz62a x y z u) (λu:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_satz62c x y z u) l : l_e_st_eq_landau_n_lessf x y).
-
-(* constant 1303 *)
-definition l_e_st_eq_landau_n_satz63d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf z y).(l_e_st_eq_landau_n_satz63a x y z (l_e_st_eq_landau_n_eqmoref12 (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf z y) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_compf z x) (l_e_st_eq_landau_n_compf z y) m) : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1304 *)
-definition l_e_st_eq_landau_n_satz63e ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf z y).(l_e_st_eq_landau_n_satz63b x y z (l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf z y) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_compf x z) e (l_e_st_eq_landau_n_compf z y)) : l_e_st_eq_landau_n_eq x y).
-
-(* constant 1305 *)
-definition l_e_st_eq_landau_n_satz63f ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λf:l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf z y).(l_e_st_eq_landau_n_satz63c x y z (l_e_st_eq_landau_n_eqlessf12 (l_e_st_eq_landau_n_pf z x) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf z y) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_compf z x) (l_e_st_eq_landau_n_compf z y) f) : l_e_st_eq_landau_n_lessf x y).
-
-(* constant 1306 *)
-definition l_e_st_eq_landau_n_364_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_satz61 x y z m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z)).
-
-(* constant 1307 *)
-definition l_e_st_eq_landau_n_364_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_eqmoref12 (l_e_st_eq_landau_n_pf z y) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_pf u y) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_compf z y) (l_e_st_eq_landau_n_compf u y) (l_e_st_eq_landau_n_satz61 z u y n) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1308 *)
-definition l_e_st_eq_landau_n_satz64 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_trmoref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_364_t1 x y z u m n) (l_e_st_eq_landau_n_364_t2 x y z u m n) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1309 *)
-definition l_e_st_eq_landau_n_satz64a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lessf z u.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_satz64 y x u z (l_e_st_eq_landau_n_satz43 x y l) (l_e_st_eq_landau_n_satz43 z u k)) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1310 *)
-definition l_e_st_eq_landau_n_satz65a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moref z u.(l_orapp (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)) m (λv:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz64 x y z u v n) (λv:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz62g x y z u v n) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1311 *)
-definition l_e_st_eq_landau_n_satz65b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moreq z u.(l_orapp (l_e_st_eq_landau_n_moref z u) (l_e_st_eq_landau_n_eq z u) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)) n (λv:l_e_st_eq_landau_n_moref z u.l_e_st_eq_landau_n_satz64 x y z u m v) (λv:l_e_st_eq_landau_n_eq z u.l_e_st_eq_landau_n_eqmoref2 (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_eqpf2 z u y v) (l_e_st_eq_landau_n_satz61 x y z m)) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1312 *)
-definition l_e_st_eq_landau_n_satz65c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lessf z u.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_satz65a y x u z (l_e_st_eq_landau_n_satz49 x y l) (l_e_st_eq_landau_n_satz43 z u k)) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1313 *)
-definition l_e_st_eq_landau_n_satz65d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lesseq z u.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_satz65b y x u z (l_e_st_eq_landau_n_satz43 x y l) (l_e_st_eq_landau_n_satz49 z u k)) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1314 *)
-definition l_e_st_eq_landau_n_366_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_moreqi2 (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_satz56 x y z u e f) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1315 *)
-definition l_e_st_eq_landau_n_366_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.λe:l_e_st_eq_landau_n_eq x y.λo:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_moreqi1 (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_satz65a x y z u m o) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1316 *)
-definition l_e_st_eq_landau_n_366_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.λe:l_e_st_eq_landau_n_eq x y.(l_orapp (l_e_st_eq_landau_n_moref z u) (l_e_st_eq_landau_n_eq z u) (l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)) n (λv:l_e_st_eq_landau_n_moref z u.l_e_st_eq_landau_n_366_t2 x y z u m n e v) (λv:l_e_st_eq_landau_n_eq z u.l_e_st_eq_landau_n_366_t1 x y z u m n e v) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1317 *)
-definition l_e_st_eq_landau_n_366_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.λo:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_moreqi1 (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_satz65b x y z u o n) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1318 *)
-definition l_e_st_eq_landau_n_satz66 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.(l_orapp (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)) m (λv:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_366_t4 x y z u m n v) (λv:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_366_t3 x y z u m n v) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1319 *)
-definition l_e_st_eq_landau_n_satz66a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq z u.(l_e_st_eq_landau_n_satz48 (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_satz66 y x u z (l_e_st_eq_landau_n_satz49 x y l) (l_e_st_eq_landau_n_satz49 z u k)) : l_e_st_eq_landau_n_lesseq (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u)).
-
-(* constant 1320 *)
-definition l_e_st_eq_landau_n_367_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λv:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x.(l_e_st_eq_landau_n_eqmoref1 (l_e_st_eq_landau_n_pf y v) x y e (l_e_st_eq_landau_n_satz60 y v) : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1321 *)
-definition l_e_st_eq_landau_n_367_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λv:l_e_st_eq_landau_n_frac.(l_imp_th3 (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_satz41d x y l) (λt:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x.l_e_st_eq_landau_n_367_t1 x y l v t) : l_not (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x)).
-
-(* constant 1322 *)
-definition l_e_st_eq_landau_n_vorbemerkung67 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.(l_some_th5 l_e_st_eq_landau_n_frac (λv:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x) (λv:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_367_t2 x y l v) : l_not (l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y t) x))).
-
-(* constant 1323 *)
-definition l_e_st_eq_landau_n_satz67b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_frac.λw:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x.λf:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y w) x.(l_e_st_eq_landau_n_satz63e v w y (l_e_st_eq_landau_n_treq2 (l_e_st_eq_landau_n_pf y v) (l_e_st_eq_landau_n_pf y w) x e f) : l_e_st_eq_landau_n_eq v w).
-
-(* constant 1324 *)
-definition l_e_st_eq_landau_n_367_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_onei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) t) (l_e_st_eq_landau_n_satz8b (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x))) m : l_e_st_eq_landau_n_one (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) t)).
-
-(* constant 1325 *)
-definition l_e_st_eq_landau_n_367_vo ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_ind l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) t) (l_e_st_eq_landau_n_367_t3 x y m) : l_e_st_eq_landau_n_nat).
-
-(* constant 1326 *)
-definition l_e_st_eq_landau_n_367_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_oneax l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) t) (l_e_st_eq_landau_n_367_t3 x y m) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_367_vo x y m))).
-
-(* constant 1327 *)
-definition l_e_st_eq_landau_n_367_w ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_367_vo x y m) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) : l_e_st_eq_landau_n_frac).
-
-(* constant 1328 *)
-definition l_e_st_eq_landau_n_367_t5 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_treq y (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_satz40 y (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_eqd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x))) : l_e_st_eq_landau_n_eq y (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))).
-
-(* constant 1329 *)
-definition l_e_st_eq_landau_n_367_t6 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_tr4eq (l_e_st_eq_landau_n_pf y (l_e_st_eq_landau_n_367_w x y m)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_367_vo x y m) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_367_vo x y m)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) x (l_e_st_eq_landau_n_eqpf1 y (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_367_w x y m) (l_e_st_eq_landau_n_367_t5 x y m)) (l_e_st_eq_landau_n_satz57 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_367_vo x y m) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_eqn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_367_vo x y m)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_367_vo x y m)) (l_e_st_eq_landau_n_367_t4 x y m))) (l_e_st_eq_landau_n_satz40a x (l_e_st_eq_landau_n_2y x y)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y (l_e_st_eq_landau_n_367_w x y m)) x).
-
-(* constant 1330 *)
-definition l_e_st_eq_landau_n_satz67a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_somei l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y t) x) (l_e_st_eq_landau_n_367_w x y m) (l_e_st_eq_landau_n_367_t6 x y m) : l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y t) x)).
-
-(* constant 1331 *)
-definition l_e_st_eq_landau_n_mf ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_367_w x y m : l_e_st_eq_landau_n_frac).
-
-(* constant 1332 *)
-definition l_e_st_eq_landau_n_satz67c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_367_t6 x y m : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y (l_e_st_eq_landau_n_mf x y m)) x).
-
-(* constant 1333 *)
-definition l_e_st_eq_landau_n_satz67d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_symeq (l_e_st_eq_landau_n_pf y (l_e_st_eq_landau_n_mf x y m)) x (l_e_st_eq_landau_n_satz67c x y m) : l_e_st_eq_landau_n_eq x (l_e_st_eq_landau_n_pf y (l_e_st_eq_landau_n_mf x y m))).
-
-(* constant 1334 *)
-definition l_e_st_eq_landau_n_satz67e ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x.(l_e_st_eq_landau_n_satz67b x y v (l_e_st_eq_landau_n_mf x y m) e (l_e_st_eq_landau_n_satz67c x y m) : l_e_st_eq_landau_n_eq v (l_e_st_eq_landau_n_mf x y m)).
-
-(* constant 1335 *)
-definition l_e_st_eq_landau_n_tf ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) : l_e_st_eq_landau_n_frac).
-
-(* constant 1336 *)
-definition l_e_st_eq_landau_n_ii4_t1 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists12 (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) x1 (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2)) y1 (l_e_st_eq_landau_n_numis x1 x2) (l_e_st_eq_landau_n_numis y1 y2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts x1 y1)).
-
-(* constant 1337 *)
-definition l_e_st_eq_landau_n_ii4_t2 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists12 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)) x2 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2)) y2 (l_e_st_eq_landau_n_denis x1 x2) (l_e_st_eq_landau_n_denis y1 y2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts x2 y2)).
-
-(* constant 1338 *)
-definition l_e_st_eq_landau_n_tf12 ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_isnd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y1 y2))) (l_e_st_eq_landau_n_ts x1 y1) (l_e_st_eq_landau_n_ts x2 y2) (l_e_st_eq_landau_n_ii4_t1 x1 x2 y1 y2) (l_e_st_eq_landau_n_ii4_t2 x1 x2 y1 y2) : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x1 y1) (l_e_st_eq_landau_n_ts x2 y2))).
-
-(* constant 1339 *)
-definition l_e_st_eq_landau_n_ii4_t3 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) n1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_numis n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n1)).
-
-(* constant 1340 *)
-definition l_e_st_eq_landau_n_ii4_t4 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) n2 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_denis n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2)).
-
-(* constant 1341 *)
-definition l_e_st_eq_landau_n_tf1 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_isnd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2) (l_e_st_eq_landau_n_ii4_t3 x n1 n2) (l_e_st_eq_landau_n_ii4_t4 x n1 n2) : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2))).
-
-(* constant 1342 *)
-definition l_e_st_eq_landau_n_ii4_t5 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists1 (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) n1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_numis n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_1x x))).
-
-(* constant 1343 *)
-definition l_e_st_eq_landau_n_ii4_t6 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_ists1 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) n2 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_denis n1 n2) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x))).
-
-(* constant 1344 *)
-definition l_e_st_eq_landau_n_tf2 ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_isnd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ii4_t5 x n1 n2) (l_e_st_eq_landau_n_ii4_t6 x n1 n2) : l_e_is l_e_st_eq_landau_n_frac (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr n1 n2) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1345 *)
-definition l_e_st_eq_landau_n_tfeq12a ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x1 y1) (l_e_st_eq_landau_n_ts x2 y2)) (l_e_st_eq_landau_n_tf12 x1 x2 y1 y2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x1 y1) (l_e_st_eq_landau_n_ts x2 y2))).
-
-(* constant 1346 *)
-definition l_e_st_eq_landau_n_tfeq12b ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.λy1:l_e_st_eq_landau_n_nat.λy2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq2 (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x1 y1) (l_e_st_eq_landau_n_ts x2 y2)) (l_e_st_eq_landau_n_tf12 x1 x2 y1 y2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x1 y1) (l_e_st_eq_landau_n_ts x2 y2)) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x1 x2) (l_e_st_eq_landau_n_fr y1 y2))).
-
-(* constant 1347 *)
-definition l_e_st_eq_landau_n_tfeq1a ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2)) (l_e_st_eq_landau_n_tf1 x n1 n2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2))).
-
-(* constant 1348 *)
-definition l_e_st_eq_landau_n_tfeq1b ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq2 (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_fr n1 n2)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2)) (l_e_st_eq_landau_n_tf1 x n1 n2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) n1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) n2)) (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_fr n1 n2))).
-
-(* constant 1349 *)
-definition l_e_st_eq_landau_n_tfeq2a ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr n1 n2) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_tf2 x n1 n2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr n1 n2) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x)))).
-
-(* constant 1350 *)
-definition l_e_st_eq_landau_n_tfeq2b ≝ λx:l_e_st_eq_landau_n_frac.λn1:l_e_st_eq_landau_n_nat.λn2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_refeq2 (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr n1 n2) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_tf2 x n1 n2) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts n1 (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts n2 (l_e_st_eq_landau_n_2x x))) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr n1 n2) x)).
-
-(* constant 1351 *)
-definition l_e_st_eq_landau_n_468_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_ists12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) e f : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1352 *)
-definition l_e_st_eq_landau_n_stets2 ≝ λa:l_e_st_eq_landau_n_nat.λb:l_e_st_eq_landau_n_nat.λc:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) (l_e_st_eq_landau_n_ts d c)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a c) (l_e_st_eq_landau_n_ts d b)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a c) (l_e_st_eq_landau_n_ts b d)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts c d) (l_e_st_eq_landau_n_ts d c) (l_e_st_eq_landau_n_ts a b) (l_e_st_eq_landau_n_comts c d)) (l_e_st_eq_landau_n_stets a b d c) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts d b) (l_e_st_eq_landau_n_ts b d) (l_e_st_eq_landau_n_ts a c) (l_e_st_eq_landau_n_comts d b)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a b) (l_e_st_eq_landau_n_ts c d)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts a c) (l_e_st_eq_landau_n_ts b d))).
-
-(* constant 1353 *)
-definition l_e_st_eq_landau_n_468_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_stets2 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_468_t1 x y z u e f) (l_e_st_eq_landau_n_stets2 (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1u x y z u) (l_e_st_eq_landau_n_2z x y z)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1354 *)
-definition l_e_st_eq_landau_n_satz68 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_eqi12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1u x y z u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2u x y z u)) (l_e_st_eq_landau_n_468_t2 x y z u e f) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1355 *)
-definition l_e_st_eq_landau_n_eqtf12 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_satz68 x y z u e f : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1356 *)
-definition l_e_st_eq_landau_n_eqtf1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_eqtf12 x y z z e (l_e_st_eq_landau_n_refeq z) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)).
-
-(* constant 1357 *)
-definition l_e_st_eq_landau_n_eqtf2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_eqtf12 z z x y (l_e_st_eq_landau_n_refeq z) e : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y)).
-
-(* constant 1358 *)
-definition l_e_st_eq_landau_n_satz69 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_eqnd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf y x)).
-
-(* constant 1359 *)
-definition l_e_st_eq_landau_n_comtf ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz69 x y : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf y x)).
-
-(* constant 1360 *)
-definition l_e_st_eq_landau_n_satz70 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_tf x y) z) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_tfeq2a z (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_eqnd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_tfeq1b x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_tf x y) z) (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_tf y z))).
-
-(* constant 1361 *)
-definition l_e_st_eq_landau_n_asstf1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz70 x y z : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_tf x y) z) (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_tf y z))).
-
-(* constant 1362 *)
-definition l_e_st_eq_landau_n_asstf2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_symeq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_tf x y) z) (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_asstf1 x y z) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_tf x y) z)).
-
-(* constant 1363 *)
-definition l_e_st_eq_landau_n_471_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))))) (l_e_st_eq_landau_n_tfeq1a x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_eqn (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_disttp2 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_satz57a (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))))).
-
-(* constant 1364 *)
-definition l_e_st_eq_landau_n_471_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_treq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_eqnd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_assts2 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_assts2 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_satz40c (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2z x y z)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_tf x y)).
-
-(* constant 1365 *)
-definition l_e_st_eq_landau_n_471_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_treq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2y x y)))) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_eqd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2z x y z) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_471_t2 x z y) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_tf x z)).
-
-(* constant 1366 *)
-definition l_e_st_eq_landau_n_satz71 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_treq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))))) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf x z)) (l_e_st_eq_landau_n_471_t1 x y z) (l_e_st_eq_landau_n_eqpf12 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)))) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_471_t2 x y z) (l_e_st_eq_landau_n_471_t3 x y z)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf x z))).
-
-(* constant 1367 *)
-definition l_e_st_eq_landau_n_disttpf1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_tf z (l_e_st_eq_landau_n_pf x y)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_comtf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_satz71 z x y) (l_e_st_eq_landau_n_eqpf12 (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf z y) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_comtf z x) (l_e_st_eq_landau_n_comtf z y)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z))).
-
-(* constant 1368 *)
-definition l_e_st_eq_landau_n_disttpf2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz71 x y z : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf x z))).
-
-(* constant 1369 *)
-definition l_e_st_eq_landau_n_distptf1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_symeq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_disttpf1 x y z) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_pf x y) z)).
-
-(* constant 1370 *)
-definition l_e_st_eq_landau_n_distptf2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_symeq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf x z)) (l_e_st_eq_landau_n_disttpf2 x y z) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf x z)) (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z))).
-
-(* constant 1371 *)
-definition l_e_st_eq_landau_n_472_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_satz32a (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2z x y z)) m : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1372 *)
-definition l_e_st_eq_landau_n_472_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_stets2 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_stets2 (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1z x y z) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_472_t1 x y z m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)))).
-
-(* constant 1373 *)
-definition l_e_st_eq_landau_n_satz72a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_morefi12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_1z x y z)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_2z x y z)) (l_e_st_eq_landau_n_472_t2 x y z m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)).
-
-(* constant 1374 *)
-definition l_e_st_eq_landau_n_satz72b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_satz68 x y z z e (l_e_st_eq_landau_n_refeq z) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)).
-
-(* constant 1375 *)
-definition l_e_st_eq_landau_n_satz72c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_satz72a y x z (l_e_st_eq_landau_n_satz43 x y l)) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)).
-
-(* constant 1376 *)
-definition l_e_st_eq_landau_n_satz72d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_eqmoref12 (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_tf z y) (l_e_st_eq_landau_n_comtf x z) (l_e_st_eq_landau_n_comtf y z) (l_e_st_eq_landau_n_satz72a x y z m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y)).
-
-(* constant 1377 *)
-definition l_e_st_eq_landau_n_satz72e ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_landau_n_eqtf2 x y z e : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y)).
-
-(* constant 1378 *)
-definition l_e_st_eq_landau_n_satz72f ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.(l_e_st_eq_landau_n_eqlessf12 (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_tf z y) (l_e_st_eq_landau_n_comtf x z) (l_e_st_eq_landau_n_comtf y z) (l_e_st_eq_landau_n_satz72c x y z l) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y)).
-
-(* constant 1379 *)
-definition l_e_st_eq_landau_n_satz72g ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λm:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_eqmoref2 (l_e_st_eq_landau_n_tf x u) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_eqtf1 x y u e) (l_e_st_eq_landau_n_satz72d z u x m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1380 *)
-definition l_e_st_eq_landau_n_satz72h ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λm:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_eqmoref12 (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf u y) (l_e_st_eq_landau_n_comtf x z) (l_e_st_eq_landau_n_comtf y u) (l_e_st_eq_landau_n_satz72g x y z u e m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf u y)).
-
-(* constant 1381 *)
-definition l_e_st_eq_landau_n_satz72j ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λl:l_e_st_eq_landau_n_lessf z u.(l_e_st_eq_landau_n_eqlessf2 (l_e_st_eq_landau_n_tf x u) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_eqtf1 x y u e) (l_e_st_eq_landau_n_satz72f z u x l) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1382 *)
-definition l_e_st_eq_landau_n_satz72k ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λl:l_e_st_eq_landau_n_lessf z u.(l_e_st_eq_landau_n_eqlessf12 (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf u y) (l_e_st_eq_landau_n_comtf x z) (l_e_st_eq_landau_n_comtf y u) (l_e_st_eq_landau_n_satz72j x y z u e l) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf u y)).
-
-(* constant 1383 *)
-definition l_e_st_eq_landau_n_473_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz41a x y : l_or3 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y)).
-
-(* constant 1384 *)
-definition l_e_st_eq_landau_n_473_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_satz41b (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z) : l_ec3 (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z))).
-
-(* constant 1385 *)
-definition l_e_st_eq_landau_n_satz73a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z).(l_ec3_th11 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_473_t1 x y z) (l_e_st_eq_landau_n_473_t2 x y z) (λu:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz72b x y z u) (λu:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz72a x y z u) (λu:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_satz72c x y z u) m : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1386 *)
-definition l_e_st_eq_landau_n_satz73b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z).(l_ec3_th10 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_473_t1 x y z) (l_e_st_eq_landau_n_473_t2 x y z) (λu:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz72b x y z u) (λu:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz72a x y z u) (λu:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_satz72c x y z u) e : l_e_st_eq_landau_n_eq x y).
-
-(* constant 1387 *)
-definition l_e_st_eq_landau_n_satz73c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z).(l_ec3_th12 (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_lessf x y) (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_473_t1 x y z) (l_e_st_eq_landau_n_473_t2 x y z) (λu:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz72b x y z u) (λu:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz72a x y z u) (λu:l_e_st_eq_landau_n_lessf x y.l_e_st_eq_landau_n_satz72c x y z u) l : l_e_st_eq_landau_n_lessf x y).
-
-(* constant 1388 *)
-definition l_e_st_eq_landau_n_satz73d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y).(l_e_st_eq_landau_n_satz73a x y z (l_e_st_eq_landau_n_eqmoref12 (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf z y) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_comtf z x) (l_e_st_eq_landau_n_comtf z y) m) : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1389 *)
-definition l_e_st_eq_landau_n_satz73e ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y).(l_e_st_eq_landau_n_satz73b x y z (l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_comtf x z) e (l_e_st_eq_landau_n_comtf z y)) : l_e_st_eq_landau_n_eq x y).
-
-(* constant 1390 *)
-definition l_e_st_eq_landau_n_satz73f ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf z y).(l_e_st_eq_landau_n_satz73c x y z (l_e_st_eq_landau_n_eqlessf12 (l_e_st_eq_landau_n_tf z x) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf z y) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_comtf z x) (l_e_st_eq_landau_n_comtf z y) l) : l_e_st_eq_landau_n_lessf x y).
-
-(* constant 1391 *)
-definition l_e_st_eq_landau_n_474_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_satz72a x y z m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z)).
-
-(* constant 1392 *)
-definition l_e_st_eq_landau_n_474_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_eqmoref12 (l_e_st_eq_landau_n_tf z y) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_tf u y) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_comtf z y) (l_e_st_eq_landau_n_comtf u y) (l_e_st_eq_landau_n_satz72a z u y n) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1393 *)
-definition l_e_st_eq_landau_n_satz74 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_trmoref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_474_t1 x y z u m n) (l_e_st_eq_landau_n_474_t2 x y z u m n) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1394 *)
-definition l_e_st_eq_landau_n_satz74a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lessf z u.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_satz74 y x u z (l_e_st_eq_landau_n_satz43 x y l) (l_e_st_eq_landau_n_satz43 z u k)) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1395 *)
-definition l_e_st_eq_landau_n_satz75a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moref z u.(l_orapp (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)) m (λv:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_satz74 x y z u v n) (λv:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_satz72g x y z u v n) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1396 *)
-definition l_e_st_eq_landau_n_satz75b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref x y.λn:l_e_st_eq_landau_n_moreq z u.(l_orapp (l_e_st_eq_landau_n_moref z u) (l_e_st_eq_landau_n_eq z u) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)) n (λv:l_e_st_eq_landau_n_moref z u.l_e_st_eq_landau_n_satz74 x y z u m v) (λv:l_e_st_eq_landau_n_eq z u.l_e_st_eq_landau_n_eqmoref2 (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_eqtf2 z u y v) (l_e_st_eq_landau_n_satz72a x y z m)) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1397 *)
-definition l_e_st_eq_landau_n_satz75c ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lessf z u.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_satz75a y x u z (l_e_st_eq_landau_n_satz49 x y l) (l_e_st_eq_landau_n_satz43 z u k)) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1398 *)
-definition l_e_st_eq_landau_n_satz75d ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf x y.λk:l_e_st_eq_landau_n_lesseq z u.(l_e_st_eq_landau_n_satz42 (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_satz75b y x u z (l_e_st_eq_landau_n_satz43 x y l) (l_e_st_eq_landau_n_satz49 z u k)) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1399 *)
-definition l_e_st_eq_landau_n_476_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_moreqi2 (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_satz68 x y z u e f) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1400 *)
-definition l_e_st_eq_landau_n_476_t2 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.λe:l_e_st_eq_landau_n_eq x y.λo:l_e_st_eq_landau_n_moref z u.(l_e_st_eq_landau_n_moreqi1 (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_satz75a x y z u m o) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1401 *)
-definition l_e_st_eq_landau_n_476_t3 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.λe:l_e_st_eq_landau_n_eq x y.(l_orapp (l_e_st_eq_landau_n_moref z u) (l_e_st_eq_landau_n_eq z u) (l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)) n (λv:l_e_st_eq_landau_n_moref z u.l_e_st_eq_landau_n_476_t2 x y z u m n e v) (λv:l_e_st_eq_landau_n_eq z u.l_e_st_eq_landau_n_476_t1 x y z u m n e v) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1402 *)
-definition l_e_st_eq_landau_n_476_t4 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.λo:l_e_st_eq_landau_n_moref x y.(l_e_st_eq_landau_n_moreqi1 (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_satz75b x y z u o n) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1403 *)
-definition l_e_st_eq_landau_n_satz76 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moreq x y.λn:l_e_st_eq_landau_n_moreq z u.(l_orapp (l_e_st_eq_landau_n_moref x y) (l_e_st_eq_landau_n_eq x y) (l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)) m (λv:l_e_st_eq_landau_n_moref x y.l_e_st_eq_landau_n_476_t4 x y z u m n v) (λv:l_e_st_eq_landau_n_eq x y.l_e_st_eq_landau_n_476_t3 x y z u m n v) : l_e_st_eq_landau_n_moreq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1404 *)
-definition l_e_st_eq_landau_n_satz76a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lesseq x y.λk:l_e_st_eq_landau_n_lesseq z u.(l_e_st_eq_landau_n_satz48 (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_satz76 y x u z (l_e_st_eq_landau_n_satz49 x y l) (l_e_st_eq_landau_n_satz49 z u k)) : l_e_st_eq_landau_n_lesseq (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u)).
-
-(* constant 1405 *)
-definition l_e_st_eq_landau_n_satz77b ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_frac.λw:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y v) x.λf:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y w) x.(l_e_st_eq_landau_n_satz73e v w y (l_e_st_eq_landau_n_treq2 (l_e_st_eq_landau_n_tf y v) (l_e_st_eq_landau_n_tf y w) x e f) : l_e_st_eq_landau_n_eq v w).
-
-(* constant 1406 *)
-definition l_e_st_eq_landau_n_477_v ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1y x y)) : l_e_st_eq_landau_n_frac).
-
-(* constant 1407 *)
-definition l_e_st_eq_landau_n_477_t1 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_tr4eq (l_e_st_eq_landau_n_tf y (l_e_st_eq_landau_n_477_v x y)) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_477_v x y) y) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)))) x (l_e_st_eq_landau_n_comtf y (l_e_st_eq_landau_n_477_v x y)) (l_e_st_eq_landau_n_tfeq2a y (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1y x y))) (l_e_st_eq_landau_n_eqnd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_1y x y))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_1y x y)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y)) (l_e_st_eq_landau_n_1x x) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_2y x y) (l_e_st_eq_landau_n_1y x y)))) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_2x x) (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) (l_e_st_eq_landau_n_satz40a x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_1y x y) (l_e_st_eq_landau_n_2y x y))) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y (l_e_st_eq_landau_n_477_v x y)) x).
-
-(* constant 1408 *)
-definition l_e_st_eq_landau_n_satz77a ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.(l_somei l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y t) x) (l_e_st_eq_landau_n_477_v x y) (l_e_st_eq_landau_n_477_t1 x y) : l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y t) x)).
-
-(* constant 1409 *)
-definition l_e_st_eq_landau_n_rt_eq ≝ (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq x y : ∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.Prop).
-
-(* constant 1410 *)
-definition l_e_st_eq_landau_n_rt_refeq ≝ (λx:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_refeq x : ∀x:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_eq x x).
-
-(* constant 1411 *)
-definition l_e_st_eq_landau_n_rt_symeq ≝ (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λt:l_e_st_eq_landau_n_rt_eq x y.l_e_st_eq_landau_n_symeq x y t : ∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.∀t:l_e_st_eq_landau_n_rt_eq x y.l_e_st_eq_landau_n_rt_eq y x).
-
-(* constant 1412 *)
-definition l_e_st_eq_landau_n_rt_treq ≝ (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λt:l_e_st_eq_landau_n_rt_eq x y.λu:l_e_st_eq_landau_n_rt_eq y z.l_e_st_eq_landau_n_treq x y z t u : ∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.∀z:l_e_st_eq_landau_n_frac.∀t:l_e_st_eq_landau_n_rt_eq x y.∀u:l_e_st_eq_landau_n_rt_eq y z.l_e_st_eq_landau_n_rt_eq x z).
-
-(* constant 1413 *)
-definition l_e_st_eq_landau_n_rt_inf ≝ λx:l_e_st_eq_landau_n_frac.λs:l_e_st_set l_e_st_eq_landau_n_frac.(l_e_st_esti l_e_st_eq_landau_n_frac x s : Prop).
-
-(* constant 1414 *)
-definition l_e_st_eq_landau_n_rt_rat ≝ (l_e_st_eq_ect l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq : Type[0]).
-
-(* constant 1415 *)
-definition l_e_st_eq_landau_n_rt_is ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_is l_e_st_eq_landau_n_rt_rat x0 y0 : Prop).
-
-(* constant 1416 *)
-definition l_e_st_eq_landau_n_rt_nis ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_not (l_e_st_eq_landau_n_rt_is x0 y0) : Prop).
-
-(* constant 1417 *)
-definition l_e_st_eq_landau_n_rt_some ≝ λp:∀x:l_e_st_eq_landau_n_rt_rat.Prop.(l_some l_e_st_eq_landau_n_rt_rat p : Prop).
-
-(* constant 1418 *)
-definition l_e_st_eq_landau_n_rt_all ≝ λp:∀x:l_e_st_eq_landau_n_rt_rat.Prop.(l_all l_e_st_eq_landau_n_rt_rat p : Prop).
-
-(* constant 1419 *)
-definition l_e_st_eq_landau_n_rt_one ≝ λp:∀x:l_e_st_eq_landau_n_rt_rat.Prop.(l_e_one l_e_st_eq_landau_n_rt_rat p : Prop).
-
-(* constant 1420 *)
-definition l_e_st_eq_landau_n_rt_in ≝ λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.(l_e_st_esti l_e_st_eq_landau_n_rt_rat x0 s : Prop).
-
-(* constant 1421 *)
-definition l_e_st_eq_landau_n_rt_ratof ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_ectelt l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq x : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1422 *)
-definition l_e_st_eq_landau_n_rt_class ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_ecect l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq x0 : l_e_st_set l_e_st_eq_landau_n_frac).
-
-(* constant 1423 *)
-definition l_e_st_eq_landau_n_rt_inclass ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_4_th5 l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq x : l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_ratof x))).
-
-(* constant 1424 *)
-definition l_e_st_eq_landau_n_rt_lemmaeq1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λe:l_e_st_eq_landau_n_eq x y.(l_e_st_eq_4_th8 l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq x0 x xix0 y e : l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class x0)).
-
-(* constant 1425 *)
-definition l_e_st_eq_landau_n_rt_ratapp1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λa:Prop.λa1:∀x:l_e_st_eq_landau_n_frac.∀xi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).a.(l_e_st_eq_4_th3 l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq x0 a a1 : a).
-
-(* constant 1426 *)
-definition l_e_st_eq_landau_n_rt_ii5_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λa:Prop.λa1:∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.∀xi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).∀yi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).a.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_rt_ratapp1 y0 a (λy:l_e_st_eq_landau_n_frac.λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).a1 x y xix0 yi) : a).
-
-(* constant 1427 *)
-definition l_e_st_eq_landau_n_rt_ratapp2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λa:Prop.λa1:∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.∀xi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).∀yi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).a.(l_e_st_eq_landau_n_rt_ratapp1 x0 a (λx:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).l_e_st_eq_landau_n_rt_ii5_t1 x0 y0 a a1 x xi) : a).
-
-(* constant 1428 *)
-definition l_e_st_eq_landau_n_rt_ii5_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λa:Prop.λa1:∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.∀z:l_e_st_eq_landau_n_frac.∀xi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).∀yi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).∀zi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).a.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_rt_ratapp2 y0 z0 a (λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).a1 x y z xix0 yi zi) : a).
-
-(* constant 1429 *)
-definition l_e_st_eq_landau_n_rt_ratapp3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λa:Prop.λa1:∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.∀z:l_e_st_eq_landau_n_frac.∀xi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).∀yi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).∀zi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).a.(l_e_st_eq_landau_n_rt_ratapp1 x0 a (λx:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).l_e_st_eq_landau_n_rt_ii5_t2 x0 y0 z0 a a1 x xi) : a).
-
-(* constant 1430 *)
-definition l_e_st_eq_landau_n_rt_ii5_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λa:Prop.λa1:∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.∀z:l_e_st_eq_landau_n_frac.∀u:l_e_st_eq_landau_n_frac.∀xi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).∀yi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).∀zi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).∀ui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).a.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_rt_ratapp3 y0 z0 u0 a (λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).a1 x y z u xix0 yi zi ui) : a).
-
-(* constant 1431 *)
-definition l_e_st_eq_landau_n_rt_ratapp4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λa:Prop.λa1:∀x:l_e_st_eq_landau_n_frac.∀y:l_e_st_eq_landau_n_frac.∀z:l_e_st_eq_landau_n_frac.∀u:l_e_st_eq_landau_n_frac.∀xi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).∀yi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).∀zi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).∀ui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).a.(l_e_st_eq_landau_n_rt_ratapp1 x0 a (λx:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).l_e_st_eq_landau_n_rt_ii5_t3 x0 y0 z0 u0 a a1 x xi) : a).
-
-(* constant 1432 *)
-definition l_e_st_eq_landau_n_rt_isi ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λe:l_e_st_eq_landau_n_eq x1 y1.(l_e_st_eq_5_th3 l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq x0 y0 x1 x1ix0 y1 y1iy0 e : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 1433 *)
-definition l_e_st_eq_landau_n_rt_ise ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_5_th5 l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq x0 y0 x1 x1ix0 y1 y1iy0 i : l_e_st_eq_landau_n_eq x1 y1).
-
-(* constant 1434 *)
-definition l_e_st_eq_landau_n_rt_nisi ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λn:l_not (l_e_st_eq_landau_n_eq x1 y1).(l_imp_th3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_eq x1 y1) n (λt:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_rt_ise x0 y0 x1 y1 x1ix0 y1iy0 t) : l_e_st_eq_landau_n_rt_nis x0 y0).
-
-(* constant 1435 *)
-definition l_e_st_eq_landau_n_rt_nise ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λn:l_e_st_eq_landau_n_rt_nis x0 y0.(l_imp_th3 (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_rt_is x0 y0) n (λt:l_e_st_eq_landau_n_eq x1 y1.l_e_st_eq_landau_n_rt_isi x0 y0 x1 y1 x1ix0 y1iy0 t) : l_not (l_e_st_eq_landau_n_eq x1 y1)).
-
-(* constant 1436 *)
-definition l_e_st_eq_landau_n_rt_fixf ≝ λalpha:Type[0].λf:Πx:l_e_st_eq_landau_n_frac.Πy:l_e_st_eq_landau_n_frac.alpha.(l_e_st_eq_fixfu2 l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq alpha f : Prop).
-
-(* constant 1437 *)
-definition l_e_st_eq_landau_n_rt_indrat ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λalpha:Type[0].λf:Πx:l_e_st_eq_landau_n_frac.Πy:l_e_st_eq_landau_n_frac.alpha.λff:l_e_st_eq_landau_n_rt_fixf alpha f.(l_e_st_eq_indeq2 l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq alpha f ff x0 y0 : alpha).
-
-(* constant 1438 *)
-definition l_e_st_eq_landau_n_rt_isindrat ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λalpha:Type[0].λf:Πx:l_e_st_eq_landau_n_frac.Πy:l_e_st_eq_landau_n_frac.alpha.λff:l_e_st_eq_landau_n_rt_fixf alpha f.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_11_th1 l_e_st_eq_landau_n_frac l_e_st_eq_landau_n_rt_eq l_e_st_eq_landau_n_rt_refeq l_e_st_eq_landau_n_rt_symeq l_e_st_eq_landau_n_rt_treq alpha f ff x0 y0 x xix0 y yiy0 : l_e_is alpha (f x y) (l_e_st_eq_landau_n_rt_indrat x0 y0 alpha f ff)).
-
-(* constant 1439 *)
-definition l_e_st_eq_landau_n_rt_satz78 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_refis l_e_st_eq_landau_n_rt_rat x0 : l_e_st_eq_landau_n_rt_is x0 x0).
-
-(* constant 1440 *)
-definition l_e_st_eq_landau_n_rt_satz79 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_symis l_e_st_eq_landau_n_rt_rat x0 y0 i : l_e_st_eq_landau_n_rt_is y0 x0).
-
-(* constant 1441 *)
-definition l_e_st_eq_landau_n_rt_satz80 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λj:l_e_st_eq_landau_n_rt_is y0 z0.(l_e_tris l_e_st_eq_landau_n_rt_rat x0 y0 z0 i j : l_e_st_eq_landau_n_rt_is x0 z0).
-
-(* constant 1442 *)
-definition l_e_st_eq_landau_n_rt_more ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_some l_e_st_eq_landau_n_frac (λx:l_e_st_eq_landau_n_frac.l_some l_e_st_eq_landau_n_frac (λy:l_e_st_eq_landau_n_frac.l_and3 (l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_moref x y))) : Prop).
-
-(* constant 1443 *)
-definition l_e_st_eq_landau_n_rt_ii5_propm ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.(l_and3 (l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_moref x1 y1) : Prop).
-
-(* constant 1444 *)
-definition l_e_st_eq_landau_n_rt_ii5_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u).λu:l_e_st_eq_landau_n_frac.λp:l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u.(l_and3e1 (l_e_st_eq_landau_n_rt_inf t (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_moref t u) p : l_e_st_eq_landau_n_rt_inf t (l_e_st_eq_landau_n_rt_class x0)).
-
-(* constant 1445 *)
-definition l_e_st_eq_landau_n_rt_ii5_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u).λu:l_e_st_eq_landau_n_frac.λp:l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u.(l_and3e2 (l_e_st_eq_landau_n_rt_inf t (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_moref t u) p : l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class y0)).
-
-(* constant 1446 *)
-definition l_e_st_eq_landau_n_rt_ii5_t6 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u).λu:l_e_st_eq_landau_n_frac.λp:l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u.(l_and3e3 (l_e_st_eq_landau_n_rt_inf t (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_moref t u) p : l_e_st_eq_landau_n_moref t u).
-
-(* constant 1447 *)
-definition l_e_st_eq_landau_n_rt_ii5_t7 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u).λu:l_e_st_eq_landau_n_frac.λp:l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u.(l_e_st_eq_landau_n_satz44 t u x y (l_e_st_eq_landau_n_rt_ii5_t6 x0 y0 m x y xix0 yiy0 t s u p) (l_e_st_eq_landau_n_rt_ise x0 x0 t x (l_e_st_eq_landau_n_rt_ii5_t4 x0 y0 m x y xix0 yiy0 t s u p) xix0 (l_e_refis l_e_st_eq_landau_n_rt_rat x0)) (l_e_st_eq_landau_n_rt_ise y0 y0 u y (l_e_st_eq_landau_n_rt_ii5_t5 x0 y0 m x y xix0 yiy0 t s u p) yiy0 (l_e_refis l_e_st_eq_landau_n_rt_rat y0)) : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1448 *)
-definition l_e_st_eq_landau_n_rt_ii5_t8 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u).(l_someapp l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u) s (l_e_st_eq_landau_n_moref x y) (λu:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u.l_e_st_eq_landau_n_rt_ii5_t7 x0 y0 m x y xix0 yiy0 t s u v) : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1449 *)
-definition l_e_st_eq_landau_n_rt_also18 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_someapp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u)) m (l_e_st_eq_landau_n_moref x y) (λt:l_e_st_eq_landau_n_frac.λv:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 t u).l_e_st_eq_landau_n_rt_ii5_t8 x0 y0 m x y xix0 yiy0 t v) : l_e_st_eq_landau_n_moref x y).
-
-(* constant 1450 *)
-definition l_e_st_eq_landau_n_rt_ii5_t9 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λm:l_e_st_eq_landau_n_moref x1 y1.(l_and3i (l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_moref x1 y1) x1ix0 y1iy0 m : l_e_st_eq_landau_n_rt_ii5_propm x0 y0 x1 y1).
-
-(* constant 1451 *)
-definition l_e_st_eq_landau_n_rt_ii5_t10 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λm:l_e_st_eq_landau_n_moref x1 y1.(l_somei l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 x1 t) y1 (l_e_st_eq_landau_n_rt_ii5_t9 x0 y0 x1 y1 x1ix0 y1iy0 m) : l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 x1 t)).
-
-(* constant 1452 *)
-definition l_e_st_eq_landau_n_rt_morei ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λm:l_e_st_eq_landau_n_moref x1 y1.(l_somei l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propm x0 y0 u t)) x1 (l_e_st_eq_landau_n_rt_ii5_t10 x0 y0 x1 y1 x1ix0 y1iy0 m) : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 1453 *)
-definition l_e_st_eq_landau_n_rt_moree ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_also18 x0 y0 m x1 y1 x1ix0 y1iy0 : l_e_st_eq_landau_n_moref x1 y1).
-
-(* constant 1454 *)
-definition l_e_st_eq_landau_n_rt_ismore1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λm:l_e_st_eq_landau_n_rt_more x0 z0.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t z0) x0 y0 m i : l_e_st_eq_landau_n_rt_more y0 z0).
-
-(* constant 1455 *)
-definition l_e_st_eq_landau_n_rt_ismore2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λm:l_e_st_eq_landau_n_rt_more z0 x0.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more z0 t) x0 y0 m i : l_e_st_eq_landau_n_rt_more z0 y0).
-
-(* constant 1456 *)
-definition l_e_st_eq_landau_n_rt_ismore12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 u0.λm:l_e_st_eq_landau_n_rt_more x0 z0.(l_e_st_eq_landau_n_rt_ismore2 z0 u0 y0 j (l_e_st_eq_landau_n_rt_ismore1 x0 y0 z0 i m) : l_e_st_eq_landau_n_rt_more y0 u0).
-
-(* constant 1457 *)
-definition l_e_st_eq_landau_n_rt_less ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_some l_e_st_eq_landau_n_frac (λx:l_e_st_eq_landau_n_frac.l_some l_e_st_eq_landau_n_frac (λy:l_e_st_eq_landau_n_frac.l_and3 (l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_lessf x y))) : Prop).
-
-(* constant 1458 *)
-definition l_e_st_eq_landau_n_rt_ii5_propl ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.(l_and3 (l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_lessf x1 y1) : Prop).
-
-(* constant 1459 *)
-definition l_e_st_eq_landau_n_rt_ii5_t11 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u).λu:l_e_st_eq_landau_n_frac.λp:l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u.(l_and3e1 (l_e_st_eq_landau_n_rt_inf t (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_lessf t u) p : l_e_st_eq_landau_n_rt_inf t (l_e_st_eq_landau_n_rt_class x0)).
-
-(* constant 1460 *)
-definition l_e_st_eq_landau_n_rt_ii5_t12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u).λu:l_e_st_eq_landau_n_frac.λp:l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u.(l_and3e2 (l_e_st_eq_landau_n_rt_inf t (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_lessf t u) p : l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class y0)).
-
-(* constant 1461 *)
-definition l_e_st_eq_landau_n_rt_ii5_t13 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u).λu:l_e_st_eq_landau_n_frac.λp:l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u.(l_and3e3 (l_e_st_eq_landau_n_rt_inf t (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_lessf t u) p : l_e_st_eq_landau_n_lessf t u).
-
-(* constant 1462 *)
-definition l_e_st_eq_landau_n_rt_ii5_t14 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u).λu:l_e_st_eq_landau_n_frac.λp:l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u.(l_e_st_eq_landau_n_satz45 t u x y (l_e_st_eq_landau_n_rt_ii5_t13 x0 y0 l x y xix0 yiy0 t s u p) (l_e_st_eq_landau_n_rt_ise x0 x0 t x (l_e_st_eq_landau_n_rt_ii5_t11 x0 y0 l x y xix0 yiy0 t s u p) xix0 (l_e_refis l_e_st_eq_landau_n_rt_rat x0)) (l_e_st_eq_landau_n_rt_ise y0 y0 u y (l_e_st_eq_landau_n_rt_ii5_t12 x0 y0 l x y xix0 yiy0 t s u p) yiy0 (l_e_refis l_e_st_eq_landau_n_rt_rat y0)) : l_e_st_eq_landau_n_lessf x y).
-
-(* constant 1463 *)
-definition l_e_st_eq_landau_n_rt_ii5_t15 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λt:l_e_st_eq_landau_n_frac.λs:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u).(l_someapp l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u) s (l_e_st_eq_landau_n_lessf x y) (λu:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u.l_e_st_eq_landau_n_rt_ii5_t14 x0 y0 l x y xix0 yiy0 t s u v) : l_e_st_eq_landau_n_lessf x y).
-
-(* constant 1464 *)
-definition l_e_st_eq_landau_n_rt_also19 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_someapp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u)) l (l_e_st_eq_landau_n_lessf x y) (λt:l_e_st_eq_landau_n_frac.λv:l_some l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 t u).l_e_st_eq_landau_n_rt_ii5_t15 x0 y0 l x y xix0 yiy0 t v) : l_e_st_eq_landau_n_lessf x y).
-
-(* constant 1465 *)
-definition l_e_st_eq_landau_n_rt_ii5_t16 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λl:l_e_st_eq_landau_n_lessf x1 y1.(l_and3i (l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0)) (l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0)) (l_e_st_eq_landau_n_lessf x1 y1) x1ix0 y1iy0 l : l_e_st_eq_landau_n_rt_ii5_propl x0 y0 x1 y1).
-
-(* constant 1466 *)
-definition l_e_st_eq_landau_n_rt_ii5_t17 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λl:l_e_st_eq_landau_n_lessf x1 y1.(l_somei l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 x1 t) y1 (l_e_st_eq_landau_n_rt_ii5_t16 x0 y0 x1 y1 x1ix0 y1iy0 l) : l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 x1 t)).
-
-(* constant 1467 *)
-definition l_e_st_eq_landau_n_rt_lessi ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λl:l_e_st_eq_landau_n_lessf x1 y1.(l_somei l_e_st_eq_landau_n_frac (λu:l_e_st_eq_landau_n_frac.l_some l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ii5_propl x0 y0 u t)) x1 (l_e_st_eq_landau_n_rt_ii5_t17 x0 y0 x1 y1 x1ix0 y1iy0 l) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1468 *)
-definition l_e_st_eq_landau_n_rt_lesse ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_also19 x0 y0 l x1 y1 x1ix0 y1iy0 : l_e_st_eq_landau_n_lessf x1 y1).
-
-(* constant 1469 *)
-definition l_e_st_eq_landau_n_rt_isless1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λl:l_e_st_eq_landau_n_rt_less x0 z0.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less t z0) x0 y0 l i : l_e_st_eq_landau_n_rt_less y0 z0).
-
-(* constant 1470 *)
-definition l_e_st_eq_landau_n_rt_isless2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λl:l_e_st_eq_landau_n_rt_less z0 x0.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less z0 t) x0 y0 l i : l_e_st_eq_landau_n_rt_less z0 y0).
-
-(* constant 1471 *)
-definition l_e_st_eq_landau_n_rt_isless12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 u0.λl:l_e_st_eq_landau_n_rt_less x0 z0.(l_e_st_eq_landau_n_rt_isless2 z0 u0 y0 j (l_e_st_eq_landau_n_rt_isless1 x0 y0 z0 i l) : l_e_st_eq_landau_n_rt_less y0 u0).
-
-(* constant 1472 *)
-definition l_e_st_eq_landau_n_rt_581_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_satz41a x1 y1 : l_or3 (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_moref x1 y1) (l_e_st_eq_landau_n_lessf x1 y1)).
-
-(* constant 1473 *)
-definition l_e_st_eq_landau_n_rt_581_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λe:l_e_st_eq_landau_n_eq x1 y1.(l_or3i1 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_isi x0 y0 x1 y1 x1ix0 y1iy0 e) : l_or3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1474 *)
-definition l_e_st_eq_landau_n_rt_581_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λm:l_e_st_eq_landau_n_moref x1 y1.(l_or3i2 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_morei x0 y0 x1 y1 x1ix0 y1iy0 m) : l_or3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1475 *)
-definition l_e_st_eq_landau_n_rt_581_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λl:l_e_st_eq_landau_n_lessf x1 y1.(l_or3i3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_lessi x0 y0 x1 y1 x1ix0 y1iy0 l) : l_or3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1476 *)
-definition l_e_st_eq_landau_n_rt_581_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_or3app (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_moref x1 y1) (l_e_st_eq_landau_n_lessf x1 y1) (l_or3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)) (l_e_st_eq_landau_n_rt_581_t1 x0 y0 x1 y1 x1ix0 y1iy0) (λt:l_e_st_eq_landau_n_eq x1 y1.l_e_st_eq_landau_n_rt_581_t2 x0 y0 x1 y1 x1ix0 y1iy0 t) (λt:l_e_st_eq_landau_n_moref x1 y1.l_e_st_eq_landau_n_rt_581_t3 x0 y0 x1 y1 x1ix0 y1iy0 t) (λt:l_e_st_eq_landau_n_lessf x1 y1.l_e_st_eq_landau_n_rt_581_t4 x0 y0 x1 y1 x1ix0 y1iy0 t) : l_or3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1477 *)
-definition l_e_st_eq_landau_n_rt_581_t6 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_satz41b x1 y1 : l_ec3 (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_moref x1 y1) (l_e_st_eq_landau_n_lessf x1 y1)).
-
-(* constant 1478 *)
-definition l_e_st_eq_landau_n_rt_581_t7 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_imp_th3 (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_moref x1 y1) (l_ec3e12 (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_moref x1 y1) (l_e_st_eq_landau_n_lessf x1 y1) (l_e_st_eq_landau_n_rt_581_t6 x0 y0 x1 y1 x1ix0 y1iy0) (l_e_st_eq_landau_n_rt_ise x0 y0 x1 y1 x1ix0 y1iy0 i)) (λt:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_moree x0 y0 x1 y1 x1ix0 y1iy0 t) : l_not (l_e_st_eq_landau_n_rt_more x0 y0)).
-
-(* constant 1479 *)
-definition l_e_st_eq_landau_n_rt_581_t8 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_imp_th3 (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_lessf x1 y1) (l_ec3e23 (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_moref x1 y1) (l_e_st_eq_landau_n_lessf x1 y1) (l_e_st_eq_landau_n_rt_581_t6 x0 y0 x1 y1 x1ix0 y1iy0) (l_e_st_eq_landau_n_rt_moree x0 y0 x1 y1 x1ix0 y1iy0 m)) (λt:l_e_st_eq_landau_n_rt_less x0 y0.l_e_st_eq_landau_n_rt_lesse x0 y0 x1 y1 x1ix0 y1iy0 t) : l_not (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1480 *)
-definition l_e_st_eq_landau_n_rt_581_t9 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_imp_th3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_eq x1 y1) (l_ec3e31 (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_moref x1 y1) (l_e_st_eq_landau_n_lessf x1 y1) (l_e_st_eq_landau_n_rt_581_t6 x0 y0 x1 y1 x1ix0 y1iy0) (l_e_st_eq_landau_n_rt_lesse x0 y0 x1 y1 x1ix0 y1iy0 l)) (λt:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_rt_ise x0 y0 x1 y1 x1ix0 y1iy0 t) : l_e_st_eq_landau_n_rt_nis x0 y0).
-
-(* constant 1481 *)
-definition l_e_st_eq_landau_n_rt_581_t10 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_ec3_th6 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_ec_th1 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (λt:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_rt_581_t7 x0 y0 x1 y1 x1ix0 y1iy0 t)) (l_ec_th1 (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (λt:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_581_t8 x0 y0 x1 y1 x1ix0 y1iy0 t)) (l_ec_th1 (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) (λt:l_e_st_eq_landau_n_rt_less x0 y0.l_e_st_eq_landau_n_rt_581_t9 x0 y0 x1 y1 x1ix0 y1iy0 t)) : l_ec3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1482 *)
-definition l_e_st_eq_landau_n_rt_581_t11 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_orec3i (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_581_t5 x0 y0 x1 y1 x1ix0 y1iy0) (l_e_st_eq_landau_n_rt_581_t10 x0 y0 x1 y1 x1ix0 y1iy0) : l_orec3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1483 *)
-definition l_e_st_eq_landau_n_rt_satz81 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_orec3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_581_t11 x0 y0 x y xi yi) : l_orec3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1484 *)
-definition l_e_st_eq_landau_n_rt_satz81a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_orec3e1 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81 x0 y0) : l_or3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1485 *)
-definition l_e_st_eq_landau_n_rt_satz81b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_orec3e2 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81 x0 y0) : l_ec3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1486 *)
-definition l_e_st_eq_landau_n_rt_582_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_lessi y0 x0 y x yiy0 xix0 (l_e_st_eq_landau_n_satz42 x y (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m)) : l_e_st_eq_landau_n_rt_less y0 x0).
-
-(* constant 1487 *)
-definition l_e_st_eq_landau_n_rt_satz82 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_less y0 x0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_582_t1 x0 y0 m x y xi yi) : l_e_st_eq_landau_n_rt_less y0 x0).
-
-(* constant 1488 *)
-definition l_e_st_eq_landau_n_rt_583_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_morei y0 x0 y x yiy0 xix0 (l_e_st_eq_landau_n_satz43 x y (l_e_st_eq_landau_n_rt_lesse x0 y0 x y xix0 yiy0 l)) : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 1489 *)
-definition l_e_st_eq_landau_n_rt_satz83 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_more y0 x0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_583_t1 x0 y0 l x y xi yi) : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 1490 *)
-definition l_e_st_eq_landau_n_rt_moreis ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_or (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) : Prop).
-
-(* constant 1491 *)
-definition l_e_st_eq_landau_n_rt_moreisi1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_ori1 (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) m : l_e_st_eq_landau_n_rt_moreis x0 y0).
-
-(* constant 1492 *)
-definition l_e_st_eq_landau_n_rt_moreisi2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_ori2 (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) i : l_e_st_eq_landau_n_rt_moreis x0 y0).
-
-(* constant 1493 *)
-definition l_e_st_eq_landau_n_rt_moreisi ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λm:l_e_st_eq_landau_n_moreq x1 y1.(l_orapp (l_e_st_eq_landau_n_moref x1 y1) (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_rt_moreis x0 y0) m (λt:l_e_st_eq_landau_n_moref x1 y1.l_e_st_eq_landau_n_rt_moreisi1 x0 y0 (l_e_st_eq_landau_n_rt_morei x0 y0 x1 y1 x1ix0 y1iy0 t)) (λt:l_e_st_eq_landau_n_eq x1 y1.l_e_st_eq_landau_n_rt_moreisi2 x0 y0 (l_e_st_eq_landau_n_rt_isi x0 y0 x1 y1 x1ix0 y1iy0 t)) : l_e_st_eq_landau_n_rt_moreis x0 y0).
-
-(* constant 1494 *)
-definition l_e_st_eq_landau_n_rt_moreise ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λm:l_e_st_eq_landau_n_rt_moreis x0 y0.(l_orapp (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_moreq x1 y1) m (λt:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_moreqi1 x1 y1 (l_e_st_eq_landau_n_rt_moree x0 y0 x1 y1 x1ix0 y1iy0 t)) (λt:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_moreqi2 x1 y1 (l_e_st_eq_landau_n_rt_ise x0 y0 x1 y1 x1ix0 y1iy0 t)) : l_e_st_eq_landau_n_moreq x1 y1).
-
-(* constant 1495 *)
-definition l_e_st_eq_landau_n_rt_ismoreis1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λm:l_e_st_eq_landau_n_rt_moreis x0 z0.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_moreis t z0) x0 y0 m i : l_e_st_eq_landau_n_rt_moreis y0 z0).
-
-(* constant 1496 *)
-definition l_e_st_eq_landau_n_rt_ismoreis2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λm:l_e_st_eq_landau_n_rt_moreis z0 x0.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_moreis z0 t) x0 y0 m i : l_e_st_eq_landau_n_rt_moreis z0 y0).
-
-(* constant 1497 *)
-definition l_e_st_eq_landau_n_rt_ismoreis12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 u0.λm:l_e_st_eq_landau_n_rt_moreis x0 z0.(l_e_st_eq_landau_n_rt_ismoreis2 z0 u0 y0 j (l_e_st_eq_landau_n_rt_ismoreis1 x0 y0 z0 i m) : l_e_st_eq_landau_n_rt_moreis y0 u0).
-
-(* constant 1498 *)
-definition l_e_st_eq_landau_n_rt_lessis ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_or (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) : Prop).
-
-(* constant 1499 *)
-definition l_e_st_eq_landau_n_rt_lessisi1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_ori1 (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) l : l_e_st_eq_landau_n_rt_lessis x0 y0).
-
-(* constant 1500 *)
-definition l_e_st_eq_landau_n_rt_lessisi2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_ori2 (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) i : l_e_st_eq_landau_n_rt_lessis x0 y0).
-
-(* constant 1501 *)
-definition l_e_st_eq_landau_n_rt_lessisi ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λl:l_e_st_eq_landau_n_lesseq x1 y1.(l_orapp (l_e_st_eq_landau_n_lessf x1 y1) (l_e_st_eq_landau_n_eq x1 y1) (l_e_st_eq_landau_n_rt_lessis x0 y0) l (λt:l_e_st_eq_landau_n_lessf x1 y1.l_e_st_eq_landau_n_rt_lessisi1 x0 y0 (l_e_st_eq_landau_n_rt_lessi x0 y0 x1 y1 x1ix0 y1iy0 t)) (λt:l_e_st_eq_landau_n_eq x1 y1.l_e_st_eq_landau_n_rt_lessisi2 x0 y0 (l_e_st_eq_landau_n_rt_isi x0 y0 x1 y1 x1ix0 y1iy0 t)) : l_e_st_eq_landau_n_rt_lessis x0 y0).
-
-(* constant 1502 *)
-definition l_e_st_eq_landau_n_rt_lessise ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λl:l_e_st_eq_landau_n_rt_lessis x0 y0.(l_orapp (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_lesseq x1 y1) l (λt:l_e_st_eq_landau_n_rt_less x0 y0.l_e_st_eq_landau_n_lesseqi1 x1 y1 (l_e_st_eq_landau_n_rt_lesse x0 y0 x1 y1 x1ix0 y1iy0 t)) (λt:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_lesseqi2 x1 y1 (l_e_st_eq_landau_n_rt_ise x0 y0 x1 y1 x1ix0 y1iy0 t)) : l_e_st_eq_landau_n_lesseq x1 y1).
-
-(* constant 1503 *)
-definition l_e_st_eq_landau_n_rt_islessis1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λl:l_e_st_eq_landau_n_rt_lessis x0 z0.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lessis t z0) x0 y0 l i : l_e_st_eq_landau_n_rt_lessis y0 z0).
-
-(* constant 1504 *)
-definition l_e_st_eq_landau_n_rt_islessis2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λl:l_e_st_eq_landau_n_rt_lessis z0 x0.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lessis z0 t) x0 y0 l i : l_e_st_eq_landau_n_rt_lessis z0 y0).
-
-(* constant 1505 *)
-definition l_e_st_eq_landau_n_rt_islessis12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 u0.λl:l_e_st_eq_landau_n_rt_lessis x0 z0.(l_e_st_eq_landau_n_rt_islessis2 z0 u0 y0 j (l_e_st_eq_landau_n_rt_islessis1 x0 y0 z0 i l) : l_e_st_eq_landau_n_rt_lessis y0 u0).
-
-(* constant 1506 *)
-definition l_e_st_eq_landau_n_rt_satz81c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.(l_ec3_th7 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) (l_comor (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) m) : l_not (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1507 *)
-definition l_e_st_eq_landau_n_rt_satz81d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.(l_ec3_th9 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) l : l_not (l_e_st_eq_landau_n_rt_more x0 y0)).
-
-(* constant 1508 *)
-definition l_e_st_eq_landau_n_rt_satz81e ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_more x0 y0).(l_or3_th2 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81a x0 y0) n : l_e_st_eq_landau_n_rt_lessis x0 y0).
-
-(* constant 1509 *)
-definition l_e_st_eq_landau_n_rt_satz81f ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_less x0 y0).(l_comor (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_or3_th3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81a x0 y0) n) : l_e_st_eq_landau_n_rt_moreis x0 y0).
-
-(* constant 1510 *)
-definition l_e_st_eq_landau_n_rt_satz81g ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_or_th3 (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) (l_ec3e23 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) m) (l_ec3e21 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) m) : l_not (l_e_st_eq_landau_n_rt_lessis x0 y0)).
-
-(* constant 1511 *)
-definition l_e_st_eq_landau_n_rt_satz81h ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_or_th3 (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) (l_ec3e32 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) l) (l_ec3e31 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) l) : l_not (l_e_st_eq_landau_n_rt_moreis x0 y0)).
-
-(* constant 1512 *)
-definition l_e_st_eq_landau_n_rt_satz81j ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_moreis x0 y0).(l_or3e3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81a x0 y0) (l_or_th5 (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) n) (l_or_th4 (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) n) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1513 *)
-definition l_e_st_eq_landau_n_rt_satz81k ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_lessis x0 y0).(l_or3e2 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81a x0 y0) (l_or_th4 (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) n) (l_or_th5 (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) n) : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 1514 *)
-definition l_e_st_eq_landau_n_rt_584_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_lessisi y0 x0 y x yiy0 xix0 (l_e_st_eq_landau_n_satz48 x y (l_e_st_eq_landau_n_rt_moreise x0 y0 x y xix0 yiy0 m)) : l_e_st_eq_landau_n_rt_lessis y0 x0).
-
-(* constant 1515 *)
-definition l_e_st_eq_landau_n_rt_satz84 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_lessis y0 x0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_584_t1 x0 y0 m x y xi yi) : l_e_st_eq_landau_n_rt_lessis y0 x0).
-
-(* constant 1516 *)
-definition l_e_st_eq_landau_n_rt_585_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_moreisi y0 x0 y x yiy0 xix0 (l_e_st_eq_landau_n_satz49 x y (l_e_st_eq_landau_n_rt_lessise x0 y0 x y xix0 yiy0 l)) : l_e_st_eq_landau_n_rt_moreis y0 x0).
-
-(* constant 1517 *)
-definition l_e_st_eq_landau_n_rt_satz85 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_moreis y0 x0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_585_t1 x0 y0 l x y xi yi) : l_e_st_eq_landau_n_rt_moreis y0 x0).
-
-(* constant 1518 *)
-definition l_e_st_eq_landau_n_rt_586_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_less y0 z0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_lessi x0 z0 x z xix0 ziz0 (l_e_st_eq_landau_n_satz50 x y z (l_e_st_eq_landau_n_rt_lesse x0 y0 x y xix0 yiy0 l) (l_e_st_eq_landau_n_rt_lesse y0 z0 y z yiy0 ziz0 k)) : l_e_st_eq_landau_n_rt_less x0 z0).
-
-(* constant 1519 *)
-definition l_e_st_eq_landau_n_rt_satz86 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_less y0 z0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_less x0 z0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_586_t1 x0 y0 z0 l k x y z xi yi zi) : l_e_st_eq_landau_n_rt_less x0 z0).
-
-(* constant 1520 *)
-definition l_e_st_eq_landau_n_rt_trless ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_less y0 z0.(l_e_st_eq_landau_n_rt_satz86 x0 y0 z0 l k : l_e_st_eq_landau_n_rt_less x0 z0).
-
-(* constant 1521 *)
-definition l_e_st_eq_landau_n_rt_trmore ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_more y0 z0.(l_e_st_eq_landau_n_rt_satz83 z0 x0 (l_e_st_eq_landau_n_rt_satz86 z0 y0 x0 (l_e_st_eq_landau_n_rt_satz82 y0 z0 n) (l_e_st_eq_landau_n_rt_satz82 x0 y0 m)) : l_e_st_eq_landau_n_rt_more x0 z0).
-
-(* constant 1522 *)
-definition l_e_st_eq_landau_n_rt_587_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_less y0 z0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_lessi x0 z0 x z xix0 ziz0 (l_e_st_eq_landau_n_satz51a x y z (l_e_st_eq_landau_n_rt_lessise x0 y0 x y xix0 yiy0 l) (l_e_st_eq_landau_n_rt_lesse y0 z0 y z yiy0 ziz0 k)) : l_e_st_eq_landau_n_rt_less x0 z0).
-
-(* constant 1523 *)
-definition l_e_st_eq_landau_n_rt_satz87a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_less y0 z0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_less x0 z0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_587_t1 x0 y0 z0 l k x y z xi yi zi) : l_e_st_eq_landau_n_rt_less x0 z0).
-
-(* constant 1524 *)
-definition l_e_st_eq_landau_n_rt_587_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_lessis y0 z0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_lessi x0 z0 x z xix0 ziz0 (l_e_st_eq_landau_n_satz51b x y z (l_e_st_eq_landau_n_rt_lesse x0 y0 x y xix0 yiy0 l) (l_e_st_eq_landau_n_rt_lessise y0 z0 y z yiy0 ziz0 k)) : l_e_st_eq_landau_n_rt_less x0 z0).
-
-(* constant 1525 *)
-definition l_e_st_eq_landau_n_rt_satz87b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_lessis y0 z0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_less x0 z0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_587_t2 x0 y0 z0 l k x y z xi yi zi) : l_e_st_eq_landau_n_rt_less x0 z0).
-
-(* constant 1526 *)
-definition l_e_st_eq_landau_n_rt_satz87c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_more y0 z0.(l_e_st_eq_landau_n_rt_satz83 z0 x0 (l_e_st_eq_landau_n_rt_satz87b z0 y0 x0 (l_e_st_eq_landau_n_rt_satz82 y0 z0 n) (l_e_st_eq_landau_n_rt_satz84 x0 y0 m)) : l_e_st_eq_landau_n_rt_more x0 z0).
-
-(* constant 1527 *)
-definition l_e_st_eq_landau_n_rt_satz87d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_moreis y0 z0.(l_e_st_eq_landau_n_rt_satz83 z0 x0 (l_e_st_eq_landau_n_rt_satz87a z0 y0 x0 (l_e_st_eq_landau_n_rt_satz84 y0 z0 n) (l_e_st_eq_landau_n_rt_satz82 x0 y0 m)) : l_e_st_eq_landau_n_rt_more x0 z0).
-
-(* constant 1528 *)
-definition l_e_st_eq_landau_n_rt_588_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_lessis y0 z0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_lessisi x0 z0 x z xix0 ziz0 (l_e_st_eq_landau_n_satz52 x y z (l_e_st_eq_landau_n_rt_lessise x0 y0 x y xix0 yiy0 l) (l_e_st_eq_landau_n_rt_lessise y0 z0 y z yiy0 ziz0 k)) : l_e_st_eq_landau_n_rt_lessis x0 z0).
-
-(* constant 1529 *)
-definition l_e_st_eq_landau_n_rt_satz88 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_lessis y0 z0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_lessis x0 z0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_588_t1 x0 y0 z0 l k x y z xi yi zi) : l_e_st_eq_landau_n_rt_lessis x0 z0).
-
-(* constant 1530 *)
-definition l_e_st_eq_landau_n_rt_trlessis ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_lessis y0 z0.(l_e_st_eq_landau_n_rt_satz88 x0 y0 z0 l k : l_e_st_eq_landau_n_rt_lessis x0 z0).
-
-(* constant 1531 *)
-definition l_e_st_eq_landau_n_rt_trmoreis ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_moreis y0 z0.(l_e_st_eq_landau_n_rt_satz85 z0 x0 (l_e_st_eq_landau_n_rt_satz88 z0 y0 x0 (l_e_st_eq_landau_n_rt_satz84 y0 z0 n) (l_e_st_eq_landau_n_rt_satz84 x0 y0 m)) : l_e_st_eq_landau_n_rt_moreis x0 z0).
-
-(* constant 1532 *)
-definition l_e_st_eq_landau_n_rt_589_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λz:l_e_st_eq_landau_n_frac.λm:l_e_st_eq_landau_n_moref z x.(l_somei l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t x0) (l_e_st_eq_landau_n_rt_ratof z) (l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_ratof z) x0 z x (l_e_st_eq_landau_n_rt_inclass z) xix0 m) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t x0)).
-
-(* constant 1533 *)
-definition l_e_st_eq_landau_n_rt_589_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_someapp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_moref t x) (l_e_st_eq_landau_n_satz53 x) (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t x0)) (λt:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_moref t x.l_e_st_eq_landau_n_rt_589_t1 x0 x xix0 t u) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t x0)).
-
-(* constant 1534 *)
-definition l_e_st_eq_landau_n_rt_satz89 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp1 x0 (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t x0)) (λx:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).l_e_st_eq_landau_n_rt_589_t2 x0 x xi) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t x0)).
-
-(* constant 1535 *)
-definition l_e_st_eq_landau_n_rt_590_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λz:l_e_st_eq_landau_n_frac.λl:l_e_st_eq_landau_n_lessf z x.(l_somei l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less t x0) (l_e_st_eq_landau_n_rt_ratof z) (l_e_st_eq_landau_n_rt_lessi (l_e_st_eq_landau_n_rt_ratof z) x0 z x (l_e_st_eq_landau_n_rt_inclass z) xix0 l) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less t x0)).
-
-(* constant 1536 *)
-definition l_e_st_eq_landau_n_rt_590_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_someapp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_lessf t x) (l_e_st_eq_landau_n_satz54 x) (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less t x0)) (λt:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_lessf t x.l_e_st_eq_landau_n_rt_590_t1 x0 x xix0 t u) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less t x0)).
-
-(* constant 1537 *)
-definition l_e_st_eq_landau_n_rt_satz90 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp1 x0 (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less t x0)) (λx:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).l_e_st_eq_landau_n_rt_590_t2 x0 x xi) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less t x0)).
-
-(* constant 1538 *)
-definition l_e_st_eq_landau_n_rt_591_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λz:l_e_st_eq_landau_n_frac.λa:l_and (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_lessf z y).(l_e_st_eq_landau_n_rt_lessi x0 (l_e_st_eq_landau_n_rt_ratof z) x z xix0 (l_e_st_eq_landau_n_rt_inclass z) (l_ande1 (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_lessf z y) a) : l_e_st_eq_landau_n_rt_less x0 (l_e_st_eq_landau_n_rt_ratof z)).
-
-(* constant 1539 *)
-definition l_e_st_eq_landau_n_rt_591_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λz:l_e_st_eq_landau_n_frac.λa:l_and (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_lessf z y).(l_e_st_eq_landau_n_rt_lessi (l_e_st_eq_landau_n_rt_ratof z) y0 z y (l_e_st_eq_landau_n_rt_inclass z) yiy0 (l_ande2 (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_lessf z y) a) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ratof z) y0).
-
-(* constant 1540 *)
-definition l_e_st_eq_landau_n_rt_591_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λz:l_e_st_eq_landau_n_frac.λa:l_and (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_lessf z y).(l_andi (l_e_st_eq_landau_n_rt_less x0 (l_e_st_eq_landau_n_rt_ratof z)) (l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ratof z) y0) (l_e_st_eq_landau_n_rt_591_t1 x0 y0 l x y xix0 yiy0 z a) (l_e_st_eq_landau_n_rt_591_t2 x0 y0 l x y xix0 yiy0 z a) : l_and (l_e_st_eq_landau_n_rt_less x0 (l_e_st_eq_landau_n_rt_ratof z)) (l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ratof z) y0)).
-
-(* constant 1541 *)
-definition l_e_st_eq_landau_n_rt_591_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λz:l_e_st_eq_landau_n_frac.λa:l_and (l_e_st_eq_landau_n_lessf x z) (l_e_st_eq_landau_n_lessf z y).(l_somei l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x0 t) (l_e_st_eq_landau_n_rt_less t y0)) (l_e_st_eq_landau_n_rt_ratof z) (l_e_st_eq_landau_n_rt_591_t3 x0 y0 l x y xix0 yiy0 z a) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x0 t) (l_e_st_eq_landau_n_rt_less t y0))).
-
-(* constant 1542 *)
-definition l_e_st_eq_landau_n_rt_591_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_someapp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_and (l_e_st_eq_landau_n_lessf x t) (l_e_st_eq_landau_n_lessf t y)) (l_e_st_eq_landau_n_satz55 x y (l_e_st_eq_landau_n_rt_lesse x0 y0 x y xix0 yiy0 l)) (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x0 t) (l_e_st_eq_landau_n_rt_less t y0))) (λt:l_e_st_eq_landau_n_frac.λu:l_and (l_e_st_eq_landau_n_lessf x t) (l_e_st_eq_landau_n_lessf t y).l_e_st_eq_landau_n_rt_591_t4 x0 y0 l x y xix0 yiy0 t u) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x0 t) (l_e_st_eq_landau_n_rt_less t y0))).
-
-(* constant 1543 *)
-definition l_e_st_eq_landau_n_rt_satz91 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x0 t) (l_e_st_eq_landau_n_rt_less t y0))) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_591_t5 x0 y0 l x y xi yi) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x0 t) (l_e_st_eq_landau_n_rt_less t y0))).
-
-(* constant 1544 *)
-definition l_e_st_eq_landau_n_rt_plusfrt ≝ (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_pf x y) : Πx:l_e_st_eq_landau_n_frac.Πy:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1545 *)
-definition l_e_st_eq_landau_n_rt_ii5_t18 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_pf x z)) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_pf y u)) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_pf x z)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_pf y u)) (l_e_st_eq_landau_n_satz56 x y z u e f) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_plusfrt x z) (l_e_st_eq_landau_n_rt_plusfrt y u)).
-
-(* constant 1546 *)
-definition l_e_st_eq_landau_n_rt_fplusfrt ≝ (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_rt_eq x y.λw:l_e_st_eq_landau_n_rt_eq z u.l_e_st_eq_landau_n_rt_ii5_t18 x y z u v w : l_e_st_eq_landau_n_rt_fixf l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_plusfrt).
-
-(* constant 1547 *)
-definition l_e_st_eq_landau_n_rt_pl ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_indrat x0 y0 l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_plusfrt l_e_st_eq_landau_n_rt_fplusfrt : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1548 *)
-definition l_e_st_eq_landau_n_rt_ii5_t19 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_isindrat x0 y0 l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_plusfrt l_e_st_eq_landau_n_rt_fplusfrt x1 y1 x1ix0 y1iy0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_pf x1 y1)) (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 1549 *)
-definition l_e_st_eq_landau_n_rt_picp ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_pf x1 y1) (l_e_st_eq_landau_n_rt_class t)) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_pf x1 y1)) (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_pf x1 y1)) (l_e_st_eq_landau_n_rt_ii5_t19 x0 y0 x1 y1 x1ix0 y1iy0) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_pf x1 y1) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_pl x0 y0))).
-
-(* constant 1550 *)
-definition l_e_st_eq_landau_n_rt_ispl1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_isf l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_pl t z0) x0 y0 i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1551 *)
-definition l_e_st_eq_landau_n_rt_ispl2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_isf l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_pl z0 t) x0 y0 i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl z0 x0) (l_e_st_eq_landau_n_rt_pl z0 y0)).
-
-(* constant 1552 *)
-definition l_e_st_eq_landau_n_rt_ispl12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 u0.(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_rt_ispl1 x0 y0 z0 i) (l_e_st_eq_landau_n_rt_ispl2 z0 u0 y0 j) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1553 *)
-definition l_e_st_eq_landau_n_rt_592_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_pl y0 x0) (l_e_st_eq_landau_n_pf x1 y1) (l_e_st_eq_landau_n_pf y1 x1) (l_e_st_eq_landau_n_rt_picp x0 y0 x1 y1 x1ix0 y1iy0) (l_e_st_eq_landau_n_rt_picp y0 x0 y1 x1 y1iy0 x1ix0) (l_e_st_eq_landau_n_satz58 x1 y1) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_pl y0 x0)).
-
-(* constant 1554 *)
-definition l_e_st_eq_landau_n_rt_satz92 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_pl y0 x0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_592_t1 x0 y0 x y xi yi) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_pl y0 x0)).
-
-(* constant 1555 *)
-definition l_e_st_eq_landau_n_rt_compl ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz92 x0 y0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_pl y0 x0)).
-
-(* constant 1556 *)
-definition l_e_st_eq_landau_n_rt_593_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_picp (l_e_st_eq_landau_n_rt_pl x0 y0) z0 (l_e_st_eq_landau_n_pf x y) z (l_e_st_eq_landau_n_rt_picp x0 y0 x y xix0 yiy0) ziz0 : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0))).
-
-(* constant 1557 *)
-definition l_e_st_eq_landau_n_rt_593_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_picp x0 (l_e_st_eq_landau_n_rt_pl y0 z0) x (l_e_st_eq_landau_n_pf y z) xix0 (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0)))).
-
-(* constant 1558 *)
-definition l_e_st_eq_landau_n_rt_593_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_pf x y) z) (l_e_st_eq_landau_n_pf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_rt_593_t1 x0 y0 z0 x y z xix0 yiy0 ziz0) (l_e_st_eq_landau_n_rt_593_t2 x0 y0 z0 x y z xix0 yiy0 ziz0) (l_e_st_eq_landau_n_satz59 x y z) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0))).
-
-(* constant 1559 *)
-definition l_e_st_eq_landau_n_rt_satz93 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0))) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_593_t3 x0 y0 z0 x y z xi yi zi) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0))).
-
-(* constant 1560 *)
-definition l_e_st_eq_landau_n_rt_asspl1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz93 x0 y0 z0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0))).
-
-(* constant 1561 *)
-definition l_e_st_eq_landau_n_rt_asspl2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_satz93 x0 y0 z0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0)).
-
-(* constant 1562 *)
-definition l_e_st_eq_landau_n_rt_594_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_pl x0 y0) x0 (l_e_st_eq_landau_n_pf x1 y1) x1 (l_e_st_eq_landau_n_rt_picp x0 y0 x1 y1 x1ix0 y1iy0) x1ix0 (l_e_st_eq_landau_n_satz60 x1 y1) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 y0) x0).
-
-(* constant 1563 *)
-definition l_e_st_eq_landau_n_rt_satz94 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 y0) x0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_594_t1 x0 y0 x y xi yi) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 y0) x0).
-
-(* constant 1564 *)
-definition l_e_st_eq_landau_n_rt_satz94a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_pl x0 y0) x0 (l_e_st_eq_landau_n_rt_satz94 x0 y0) : l_e_st_eq_landau_n_rt_less x0 (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 1565 *)
-definition l_e_st_eq_landau_n_rt_595_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) (l_e_st_eq_landau_n_satz61 x y z (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1566 *)
-definition l_e_st_eq_landau_n_rt_satz95 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_595_t1 x0 y0 z0 m x y z xi yi zi) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1567 *)
-definition l_e_st_eq_landau_n_rt_596_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) (l_e_st_eq_landau_n_satz62a x y z (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1568 *)
-definition l_e_st_eq_landau_n_rt_satz96a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_596_t1 x0 y0 z0 m x y z xi yi zi) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1569 *)
-definition l_e_st_eq_landau_n_rt_596_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) (l_e_st_eq_landau_n_satz62b x y z (l_e_st_eq_landau_n_rt_ise x0 y0 x y xix0 yiy0 i)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1570 *)
-definition l_e_st_eq_landau_n_rt_satz96b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_596_t2 x0 y0 z0 i x y z xi yi zi) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1571 *)
-definition l_e_st_eq_landau_n_rt_596_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_lessi (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) (l_e_st_eq_landau_n_satz62c x y z (l_e_st_eq_landau_n_rt_lesse x0 y0 x y xix0 yiy0 l)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1572 *)
-definition l_e_st_eq_landau_n_rt_satz96c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_596_t3 x0 y0 z0 l x y z xi yi zi) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1573 *)
-definition l_e_st_eq_landau_n_rt_596_andersa ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_satz95 x0 y0 z0 m : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1574 *)
-definition l_e_st_eq_landau_n_rt_596_andersb ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_ispl1 x0 y0 z0 i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1575 *)
-definition l_e_st_eq_landau_n_rt_596_andersc ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_satz95 y0 x0 z0 (l_e_st_eq_landau_n_rt_satz83 x0 y0 l)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 1576 *)
-definition l_e_st_eq_landau_n_rt_satz96d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_ismore12 (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl z0 x0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_pl z0 y0) (l_e_st_eq_landau_n_rt_compl x0 z0) (l_e_st_eq_landau_n_rt_compl y0 z0) (l_e_st_eq_landau_n_rt_satz96a x0 y0 z0 m) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl z0 x0) (l_e_st_eq_landau_n_rt_pl z0 y0)).
-
-(* constant 1577 *)
-definition l_e_st_eq_landau_n_rt_satz96e ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_ispl2 x0 y0 z0 i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl z0 x0) (l_e_st_eq_landau_n_rt_pl z0 y0)).
-
-(* constant 1578 *)
-definition l_e_st_eq_landau_n_rt_satz96f ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl z0 x0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_pl z0 y0) (l_e_st_eq_landau_n_rt_compl x0 z0) (l_e_st_eq_landau_n_rt_compl y0 z0) (l_e_st_eq_landau_n_rt_satz96c x0 y0 z0 l) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl z0 x0) (l_e_st_eq_landau_n_rt_pl z0 y0)).
-
-(* constant 1579 *)
-definition l_e_st_eq_landau_n_rt_597_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0).λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_morei x0 y0 x y xix0 yiy0 (l_e_st_eq_landau_n_satz63a x y z (l_e_st_eq_landau_n_rt_moree (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) m)) : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 1580 *)
-definition l_e_st_eq_landau_n_rt_satz97a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_more x0 y0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_597_t1 x0 y0 z0 m x y z xi yi zi) : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 1581 *)
-definition l_e_st_eq_landau_n_rt_597_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0).λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_isi x0 y0 x y xix0 yiy0 (l_e_st_eq_landau_n_satz63b x y z (l_e_st_eq_landau_n_rt_ise (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) i)) : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 1582 *)
-definition l_e_st_eq_landau_n_rt_satz97b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_is x0 y0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_597_t2 x0 y0 z0 i x y z xi yi zi) : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 1583 *)
-definition l_e_st_eq_landau_n_rt_597_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0).λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_lessi x0 y0 x y xix0 yiy0 (l_e_st_eq_landau_n_satz63c x y z (l_e_st_eq_landau_n_rt_lesse (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y z) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) l)) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1584 *)
-definition l_e_st_eq_landau_n_rt_satz97c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_less x0 y0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_597_t3 x0 y0 z0 l x y z xi yi zi) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1585 *)
-definition l_e_st_eq_landau_n_rt_597_anders ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_satz82 y0 x0 (l_e_st_eq_landau_n_rt_satz97a y0 x0 z0 (l_e_st_eq_landau_n_rt_satz83 (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 z0) l)) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1586 *)
-definition l_e_st_eq_landau_n_rt_598_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_more z0 u0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 u0 y u yiy0 uiu0) (l_e_st_eq_landau_n_satz64 x y z u (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m) (l_e_st_eq_landau_n_rt_moree z0 u0 z u ziz0 uiu0 n)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1587 *)
-definition l_e_st_eq_landau_n_rt_satz98 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_more z0 u0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 z0 u0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_598_t1 x0 y0 z0 u0 m n x y z u xi yi zi ui) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1588 *)
-definition l_e_st_eq_landau_n_rt_satz98a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_less z0 u0.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_satz98 y0 x0 u0 z0 (l_e_st_eq_landau_n_rt_satz83 x0 y0 l) (l_e_st_eq_landau_n_rt_satz83 z0 u0 k)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1589 *)
-definition l_e_st_eq_landau_n_rt_599_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_more z0 u0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 u0 y u yiy0 uiu0) (l_e_st_eq_landau_n_satz65a x y z u (l_e_st_eq_landau_n_rt_moreise x0 y0 x y xix0 yiy0 m) (l_e_st_eq_landau_n_rt_moree z0 u0 z u ziz0 uiu0 n)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1590 *)
-definition l_e_st_eq_landau_n_rt_satz99a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_more z0 u0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 z0 u0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_599_t1 x0 y0 z0 u0 m n x y z u xi yi zi ui) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1591 *)
-definition l_e_st_eq_landau_n_rt_599_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_moreis z0 u0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 u0 y u yiy0 uiu0) (l_e_st_eq_landau_n_satz65b x y z u (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m) (l_e_st_eq_landau_n_rt_moreise z0 u0 z u ziz0 uiu0 n)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1592 *)
-definition l_e_st_eq_landau_n_rt_satz99b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_moreis z0 u0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 z0 u0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_599_t2 x0 y0 z0 u0 m n x y z u xi yi zi ui) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1593 *)
-definition l_e_st_eq_landau_n_rt_satz99c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_less z0 u0.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_satz99a y0 x0 u0 z0 (l_e_st_eq_landau_n_rt_satz85 x0 y0 l) (l_e_st_eq_landau_n_rt_satz83 z0 u0 k)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1594 *)
-definition l_e_st_eq_landau_n_rt_satz99d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_lessis z0 u0.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_satz99b y0 x0 u0 z0 (l_e_st_eq_landau_n_rt_satz83 x0 y0 l) (l_e_st_eq_landau_n_rt_satz85 z0 u0 k)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1595 *)
-definition l_e_st_eq_landau_n_rt_5100_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_moreis z0 u0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_moreisi (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_pf x z) (l_e_st_eq_landau_n_pf y u) (l_e_st_eq_landau_n_rt_picp x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_picp y0 u0 y u yiy0 uiu0) (l_e_st_eq_landau_n_satz66 x y z u (l_e_st_eq_landau_n_rt_moreise x0 y0 x y xix0 yiy0 m) (l_e_st_eq_landau_n_rt_moreise z0 u0 z u ziz0 uiu0 n)) : l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1596 *)
-definition l_e_st_eq_landau_n_rt_satz100 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_moreis z0 u0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 z0 u0 (l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_5100_t1 x0 y0 z0 u0 m n x y z u xi yi zi ui) : l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1597 *)
-definition l_e_st_eq_landau_n_rt_satz100a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_lessis z0 u0.(l_e_st_eq_landau_n_rt_satz84 (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_satz100 y0 x0 u0 z0 (l_e_st_eq_landau_n_rt_satz85 x0 y0 l) (l_e_st_eq_landau_n_rt_satz85 z0 u0 k)) : l_e_st_eq_landau_n_rt_lessis (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_pl y0 u0)).
-
-(* constant 1598 *)
-definition l_e_st_eq_landau_n_rt_5101_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λv0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 v0) x0.(l_e_st_eq_landau_n_rt_ismore1 (l_e_st_eq_landau_n_rt_pl y0 v0) x0 y0 i (l_e_st_eq_landau_n_rt_satz94 y0 v0) : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 1599 *)
-definition l_e_st_eq_landau_n_rt_5101_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λv0:l_e_st_eq_landau_n_rt_rat.(l_imp_th3 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 v0) x0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_satz81d x0 y0 l) (λt:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 v0) x0.l_e_st_eq_landau_n_rt_5101_t1 x0 y0 l v0 t) : l_e_st_eq_landau_n_rt_nis (l_e_st_eq_landau_n_rt_pl y0 v0) x0).
-
-(* constant 1600 *)
-definition l_e_st_eq_landau_n_rt_vorbemerkung101 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.(l_some_th5 l_e_st_eq_landau_n_rt_rat (λv:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 v) x0) (λv:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_5101_t2 x0 y0 l v) : l_not (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0))).
-
-(* constant 1601 *)
-definition l_e_st_eq_landau_n_rt_5101_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λv:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x.(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_ratof v)) x0 (l_e_st_eq_landau_n_pf y v) x (l_e_st_eq_landau_n_rt_picp y0 (l_e_st_eq_landau_n_rt_ratof v) y v yiy0 (l_e_st_eq_landau_n_rt_inclass v)) xix0 e : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_ratof v)) x0).
-
-(* constant 1602 *)
-definition l_e_st_eq_landau_n_rt_5101_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λv:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y v) x.(l_somei l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0) (l_e_st_eq_landau_n_rt_ratof v) (l_e_st_eq_landau_n_rt_5101_t3 x0 y0 m x y xix0 yiy0 v e) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0)).
-
-(* constant 1603 *)
-definition l_e_st_eq_landau_n_rt_5101_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).(l_someapp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y t) x) (l_e_st_eq_landau_n_satz67a x y (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m)) (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0)) (λt:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf y t) x.l_e_st_eq_landau_n_rt_5101_t4 x0 y0 m x y xix0 yiy0 t u) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0)).
-
-(* constant 1604 *)
-definition l_e_st_eq_landau_n_rt_satz101a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_5101_t5 x0 y0 m x y xi yi) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0)).
-
-(* constant 1605 *)
-definition l_e_st_eq_landau_n_rt_5101_t6 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λv0:l_e_st_eq_landau_n_rt_rat.λw0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 v0) x0.λj:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 w0) x0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_frac.λw:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λviv0:l_e_st_eq_landau_n_rt_inf v (l_e_st_eq_landau_n_rt_class v0).λwiw0:l_e_st_eq_landau_n_rt_inf w (l_e_st_eq_landau_n_rt_class w0).(l_e_st_eq_landau_n_rt_isi v0 w0 v w viv0 wiw0 (l_e_st_eq_landau_n_satz67b x y v w (l_e_st_eq_landau_n_rt_ise (l_e_st_eq_landau_n_rt_pl y0 v0) x0 (l_e_st_eq_landau_n_pf y v) x (l_e_st_eq_landau_n_rt_picp y0 v0 y v yiy0 viv0) xix0 i) (l_e_st_eq_landau_n_rt_ise (l_e_st_eq_landau_n_rt_pl y0 w0) x0 (l_e_st_eq_landau_n_pf y w) x (l_e_st_eq_landau_n_rt_picp y0 w0 y w yiy0 wiw0) xix0 j)) : l_e_st_eq_landau_n_rt_is v0 w0).
-
-(* constant 1606 *)
-definition l_e_st_eq_landau_n_rt_satz101b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λv0:l_e_st_eq_landau_n_rt_rat.λw0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 v0) x0.λj:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 w0) x0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 v0 w0 (l_e_st_eq_landau_n_rt_is v0 w0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_frac.λw:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λvi:l_e_st_eq_landau_n_rt_inf v (l_e_st_eq_landau_n_rt_class v0).λwi:l_e_st_eq_landau_n_rt_inf w (l_e_st_eq_landau_n_rt_class w0).l_e_st_eq_landau_n_rt_5101_t6 x0 y0 v0 w0 i j x y v w xi yi vi wi) : l_e_st_eq_landau_n_rt_is v0 w0).
-
-(* constant 1607 *)
-definition l_e_st_eq_landau_n_rt_5101_t7 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(λt:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_rat.λv:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0.λw:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 u) x0.l_e_st_eq_landau_n_rt_satz101b x0 y0 t u v w : l_e_amone l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0)).
-
-(* constant 1608 *)
-definition l_e_st_eq_landau_n_rt_satz101 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_onei l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0) (l_e_st_eq_landau_n_rt_5101_t7 x0 y0) (l_e_st_eq_landau_n_rt_satz101a x0 y0 m) : l_e_st_eq_landau_n_rt_one (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0)).
-
-(* constant 1609 *)
-definition l_e_st_eq_landau_n_rt_mn ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_ind l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0) (l_e_st_eq_landau_n_rt_satz101 x0 y0 m) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1610 *)
-definition l_e_st_eq_landau_n_rt_satz101c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_oneax l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 t) x0) (l_e_st_eq_landau_n_rt_satz101 x0 y0 m) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_mn x0 y0 m)) x0).
-
-(* constant 1611 *)
-definition l_e_st_eq_landau_n_rt_satz101d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_mn x0 y0 m)) x0 (l_e_st_eq_landau_n_rt_satz101c x0 y0 m) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_mn x0 y0 m))).
-
-(* constant 1612 *)
-definition l_e_st_eq_landau_n_rt_satz101e ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0) (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_mn x0 y0 m)) x0 (l_e_st_eq_landau_n_rt_compl (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0) (l_e_st_eq_landau_n_rt_satz101c x0 y0 m) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0) x0).
-
-(* constant 1613 *)
-definition l_e_st_eq_landau_n_rt_satz101f ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0) x0 (l_e_st_eq_landau_n_rt_satz101e x0 y0 m) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0)).
-
-(* constant 1614 *)
-definition l_e_st_eq_landau_n_rt_satz101g ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λv0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 v0) x0.(l_e_st_eq_landau_n_rt_satz101b x0 y0 v0 (l_e_st_eq_landau_n_rt_mn x0 y0 m) i (l_e_st_eq_landau_n_rt_satz101c x0 y0 m) : l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_mn x0 y0 m)).
-
-(* constant 1615 *)
-definition l_e_st_eq_landau_n_rt_timesfrt ≝ (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_tf x y) : Πx:l_e_st_eq_landau_n_frac.Πy:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1616 *)
-definition l_e_st_eq_landau_n_rt_ii5_t20 ≝ λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq x y.λf:l_e_st_eq_landau_n_eq z u.(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_tf x z)) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_tf y u)) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_tf x z)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_tf y u)) (l_e_st_eq_landau_n_satz68 x y z u e f) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_timesfrt x z) (l_e_st_eq_landau_n_rt_timesfrt y u)).
-
-(* constant 1617 *)
-definition l_e_st_eq_landau_n_rt_ftimesfrt ≝ (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_rt_eq x y.λw:l_e_st_eq_landau_n_rt_eq z u.l_e_st_eq_landau_n_rt_ii5_t20 x y z u v w : l_e_st_eq_landau_n_rt_fixf l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_timesfrt).
-
-(* constant 1618 *)
-definition l_e_st_eq_landau_n_rt_ts ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_indrat x0 y0 l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_timesfrt l_e_st_eq_landau_n_rt_ftimesfrt : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1619 *)
-definition l_e_st_eq_landau_n_rt_ii5_t21 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_isindrat x0 y0 l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_timesfrt l_e_st_eq_landau_n_rt_ftimesfrt x1 y1 x1ix0 y1iy0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_tf x1 y1)) (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 1620 *)
-definition l_e_st_eq_landau_n_rt_tict ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_tf x1 y1) (l_e_st_eq_landau_n_rt_class t)) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_tf x1 y1)) (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_tf x1 y1)) (l_e_st_eq_landau_n_rt_ii5_t21 x0 y0 x1 y1 x1ix0 y1iy0) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_tf x1 y1) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_ts x0 y0))).
-
-(* constant 1621 *)
-definition l_e_st_eq_landau_n_rt_ists1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_isf l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_ts t z0) x0 y0 i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1622 *)
-definition l_e_st_eq_landau_n_rt_ists2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_isf l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_ts z0 t) x0 y0 i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts z0 x0) (l_e_st_eq_landau_n_rt_ts z0 y0)).
-
-(* constant 1623 *)
-definition l_e_st_eq_landau_n_rt_ists12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 u0.(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_rt_ists1 x0 y0 z0 i) (l_e_st_eq_landau_n_rt_ists2 z0 u0 y0 j) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1624 *)
-definition l_e_st_eq_landau_n_rt_5102_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts y0 x0) (l_e_st_eq_landau_n_tf x1 y1) (l_e_st_eq_landau_n_tf y1 x1) (l_e_st_eq_landau_n_rt_tict x0 y0 x1 y1 x1ix0 y1iy0) (l_e_st_eq_landau_n_rt_tict y0 x0 y1 x1 y1iy0 x1ix0) (l_e_st_eq_landau_n_satz69 x1 y1) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts y0 x0)).
-
-(* constant 1625 *)
-definition l_e_st_eq_landau_n_rt_satz102 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts y0 x0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_5102_t1 x0 y0 x y xi yi) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts y0 x0)).
-
-(* constant 1626 *)
-definition l_e_st_eq_landau_n_rt_comts ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz102 x0 y0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts y0 x0)).
-
-(* constant 1627 *)
-definition l_e_st_eq_landau_n_rt_5103_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_tict (l_e_st_eq_landau_n_rt_ts x0 y0) z0 (l_e_st_eq_landau_n_tf x y) z (l_e_st_eq_landau_n_rt_tict x0 y0 x y xix0 yiy0) ziz0 : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_tf x y) z) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0))).
-
-(* constant 1628 *)
-definition l_e_st_eq_landau_n_rt_5103_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_tict x0 (l_e_st_eq_landau_n_rt_ts y0 z0) x (l_e_st_eq_landau_n_tf y z) xix0 (l_e_st_eq_landau_n_rt_tict y0 z0 y z yiy0 ziz0) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0)))).
-
-(* constant 1629 *)
-definition l_e_st_eq_landau_n_rt_5103_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0)) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_tf x y) z) (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_tf y z)) (l_e_st_eq_landau_n_rt_5103_t1 x0 y0 z0 x y z xix0 yiy0 ziz0) (l_e_st_eq_landau_n_rt_5103_t2 x0 y0 z0 x y z xix0 yiy0 ziz0) (l_e_st_eq_landau_n_satz70 x y z) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0))).
-
-(* constant 1630 *)
-definition l_e_st_eq_landau_n_rt_satz103 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0))) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_5103_t3 x0 y0 z0 x y z xi yi zi) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0))).
-
-(* constant 1631 *)
-definition l_e_st_eq_landau_n_rt_assts1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz103 x0 y0 z0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0))).
-
-(* constant 1632 *)
-definition l_e_st_eq_landau_n_rt_assts2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0)) (l_e_st_eq_landau_n_rt_satz103 x0 y0 z0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0)).
-
-(* constant 1633 *)
-definition l_e_st_eq_landau_n_rt_5104_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_tict x0 (l_e_st_eq_landau_n_rt_pl y0 z0) x (l_e_st_eq_landau_n_pf y z) xix0 (l_e_st_eq_landau_n_rt_picp y0 z0 y z yiy0 ziz0) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0)))).
-
-(* constant 1634 *)
-definition l_e_st_eq_landau_n_rt_5104_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_picp (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_rt_tict x0 y0 x y xix0 yiy0) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf x z)) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0)))).
-
-(* constant 1635 *)
-definition l_e_st_eq_landau_n_rt_5104_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0)) (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_pf y z)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_tf x y) (l_e_st_eq_landau_n_tf x z)) (l_e_st_eq_landau_n_rt_5104_t1 x0 y0 z0 x y z xix0 yiy0 ziz0) (l_e_st_eq_landau_n_rt_5104_t2 x0 y0 z0 x y z xix0 yiy0 ziz0) (l_e_st_eq_landau_n_satz71 x y z) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0))).
-
-(* constant 1636 *)
-definition l_e_st_eq_landau_n_rt_satz104 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0))) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_5104_t3 x0 y0 z0 x y z xi yi zi) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0))).
-
-(* constant 1637 *)
-definition l_e_st_eq_landau_n_rt_disttp1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_ts z0 (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts z0 x0) (l_e_st_eq_landau_n_rt_ts z0 y0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)) (l_e_st_eq_landau_n_rt_comts (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_satz104 z0 x0 y0) (l_e_st_eq_landau_n_rt_ispl12 (l_e_st_eq_landau_n_rt_ts z0 x0) (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts z0 y0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_rt_comts z0 x0) (l_e_st_eq_landau_n_rt_comts z0 y0)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0))).
-
-(* constant 1638 *)
-definition l_e_st_eq_landau_n_rt_disttp2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz104 x0 y0 z0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0))).
-
-(* constant 1639 *)
-definition l_e_st_eq_landau_n_rt_distpt1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)) (l_e_st_eq_landau_n_rt_disttp1 x0 y0 z0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_pl x0 y0) z0)).
-
-(* constant 1640 *)
-definition l_e_st_eq_landau_n_rt_distpt2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0)) (l_e_st_eq_landau_n_rt_disttp2 x0 y0 z0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0)) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0))).
-
-(* constant 1641 *)
-definition l_e_st_eq_landau_n_rt_5105_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 z0 y z yiy0 ziz0) (l_e_st_eq_landau_n_satz72a x y z (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1642 *)
-definition l_e_st_eq_landau_n_rt_satz105a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_5105_t1 x0 y0 z0 m x y z xi yi zi) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1643 *)
-definition l_e_st_eq_landau_n_rt_5105_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 z0 y z yiy0 ziz0) (l_e_st_eq_landau_n_satz72b x y z (l_e_st_eq_landau_n_rt_ise x0 y0 x y xix0 yiy0 i)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1644 *)
-definition l_e_st_eq_landau_n_rt_satz105b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_5105_t2 x0 y0 z0 i x y z xi yi zi) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1645 *)
-definition l_e_st_eq_landau_n_rt_5105_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_lessi (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xi zi) (l_e_st_eq_landau_n_rt_tict y0 z0 y z yi zi) (l_e_st_eq_landau_n_satz72c x y z (l_e_st_eq_landau_n_rt_lesse x0 y0 x y xi yi l)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1646 *)
-definition l_e_st_eq_landau_n_rt_satz105c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_5105_t3 x0 y0 z0 l x y z xi yi zi) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1647 *)
-definition l_e_st_eq_landau_n_rt_5105_andersb ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_ists1 x0 y0 z0 i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1648 *)
-definition l_e_st_eq_landau_n_rt_5105_andersc ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_satz105a y0 x0 z0 (l_e_st_eq_landau_n_rt_satz83 x0 y0 l)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 1649 *)
-definition l_e_st_eq_landau_n_rt_satz105d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_ismore12 (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts z0 x0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_rt_ts z0 y0) (l_e_st_eq_landau_n_rt_comts x0 z0) (l_e_st_eq_landau_n_rt_comts y0 z0) (l_e_st_eq_landau_n_rt_satz105a x0 y0 z0 m) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts z0 x0) (l_e_st_eq_landau_n_rt_ts z0 y0)).
-
-(* constant 1650 *)
-definition l_e_st_eq_landau_n_rt_satz105e ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_ists2 x0 y0 z0 i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts z0 x0) (l_e_st_eq_landau_n_rt_ts z0 y0)).
-
-(* constant 1651 *)
-definition l_e_st_eq_landau_n_rt_satz105f ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts z0 x0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_rt_ts z0 y0) (l_e_st_eq_landau_n_rt_comts x0 z0) (l_e_st_eq_landau_n_rt_comts y0 z0) (l_e_st_eq_landau_n_rt_satz105c x0 y0 z0 l) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts z0 x0) (l_e_st_eq_landau_n_rt_ts z0 y0)).
-
-(* constant 1652 *)
-definition l_e_st_eq_landau_n_rt_5106_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0).λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_morei x0 y0 x y xix0 yiy0 (l_e_st_eq_landau_n_satz73a x y z (l_e_st_eq_landau_n_rt_moree (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 z0 y z yiy0 ziz0) m)) : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 1653 *)
-definition l_e_st_eq_landau_n_rt_satz106a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0).(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_more x0 y0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_5106_t1 x0 y0 z0 m x y z xi yi zi) : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 1654 *)
-definition l_e_st_eq_landau_n_rt_5106_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0).λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_isi x0 y0 x y xix0 yiy0 (l_e_st_eq_landau_n_satz73b x y z (l_e_st_eq_landau_n_rt_ise (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 z0 y z yiy0 ziz0) i)) : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 1655 *)
-definition l_e_st_eq_landau_n_rt_satz106b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0).(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_is x0 y0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_5106_t2 x0 y0 z0 i x y z xi yi zi) : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 1656 *)
-definition l_e_st_eq_landau_n_rt_5106_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0).λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).(l_e_st_eq_landau_n_rt_lessi x0 y0 x y xix0 yiy0 (l_e_st_eq_landau_n_satz73c x y z (l_e_st_eq_landau_n_rt_lesse (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y z) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 z0 y z yiy0 ziz0) l)) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1657 *)
-definition l_e_st_eq_landau_n_rt_satz106c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0).(l_e_st_eq_landau_n_rt_ratapp3 x0 y0 z0 (l_e_st_eq_landau_n_rt_less x0 y0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).l_e_st_eq_landau_n_rt_5106_t3 x0 y0 z0 l x y z xi yi zi) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1658 *)
-definition l_e_st_eq_landau_n_rt_5106_anders ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0).(l_e_st_eq_landau_n_rt_satz82 y0 x0 (l_e_st_eq_landau_n_rt_satz106a y0 x0 z0 (l_e_st_eq_landau_n_rt_satz83 (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 z0) l)) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1659 *)
-definition l_e_st_eq_landau_n_rt_5107_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_more z0 u0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 u0 y u yiy0 uiu0) (l_e_st_eq_landau_n_satz74 x y z u (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m) (l_e_st_eq_landau_n_rt_moree z0 u0 z u ziz0 uiu0 n)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1660 *)
-definition l_e_st_eq_landau_n_rt_satz107 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_more z0 u0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 z0 u0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_5107_t1 x0 y0 z0 u0 m n x y z u xi yi zi ui) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1661 *)
-definition l_e_st_eq_landau_n_rt_satz107a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_less z0 u0.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_satz107 y0 x0 u0 z0 (l_e_st_eq_landau_n_rt_satz83 x0 y0 l) (l_e_st_eq_landau_n_rt_satz83 z0 u0 k)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1662 *)
-definition l_e_st_eq_landau_n_rt_5108_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_more z0 u0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 u0 y u yiy0 uiu0) (l_e_st_eq_landau_n_satz75a x y z u (l_e_st_eq_landau_n_rt_moreise x0 y0 x y xix0 yiy0 m) (l_e_st_eq_landau_n_rt_moree z0 u0 z u ziz0 uiu0 n)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1663 *)
-definition l_e_st_eq_landau_n_rt_satz108a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_more z0 u0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 z0 u0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_5108_t1 x0 y0 z0 u0 m n x y z u xi yi zi ui) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1664 *)
-definition l_e_st_eq_landau_n_rt_5108_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_moreis z0 u0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 u0 y u yiy0 uiu0) (l_e_st_eq_landau_n_satz75b x y z u (l_e_st_eq_landau_n_rt_moree x0 y0 x y xix0 yiy0 m) (l_e_st_eq_landau_n_rt_moreise z0 u0 z u ziz0 uiu0 n)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1665 *)
-definition l_e_st_eq_landau_n_rt_satz108b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.λn:l_e_st_eq_landau_n_rt_moreis z0 u0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 z0 u0 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_5108_t2 x0 y0 z0 u0 m n x y z u xi yi zi ui) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1666 *)
-definition l_e_st_eq_landau_n_rt_satz108c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_less z0 u0.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_satz108a y0 x0 u0 z0 (l_e_st_eq_landau_n_rt_satz85 x0 y0 l) (l_e_st_eq_landau_n_rt_satz83 z0 u0 k)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1667 *)
-definition l_e_st_eq_landau_n_rt_satz108d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.λk:l_e_st_eq_landau_n_rt_lessis z0 u0.(l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_satz108b y0 x0 u0 z0 (l_e_st_eq_landau_n_rt_satz83 x0 y0 l) (l_e_st_eq_landau_n_rt_satz85 z0 u0 k)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1668 *)
-definition l_e_st_eq_landau_n_rt_5109_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_moreis z0 u0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λziz0:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_moreisi (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_tf x z) (l_e_st_eq_landau_n_tf y u) (l_e_st_eq_landau_n_rt_tict x0 z0 x z xix0 ziz0) (l_e_st_eq_landau_n_rt_tict y0 u0 y u yiy0 uiu0) (l_e_st_eq_landau_n_satz76 x y z u (l_e_st_eq_landau_n_rt_moreise x0 y0 x y xix0 yiy0 m) (l_e_st_eq_landau_n_rt_moreise z0 u0 z u ziz0 uiu0 n)) : l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1669 *)
-definition l_e_st_eq_landau_n_rt_satz109 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.λn:l_e_st_eq_landau_n_rt_moreis z0 u0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 z0 u0 (l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λz:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λzi:l_e_st_eq_landau_n_rt_inf z (l_e_st_eq_landau_n_rt_class z0).λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_5109_t1 x0 y0 z0 u0 m n x y z u xi yi zi ui) : l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1670 *)
-definition l_e_st_eq_landau_n_rt_satz109a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.λk:l_e_st_eq_landau_n_rt_lessis z0 u0.(l_e_st_eq_landau_n_rt_satz84 (l_e_st_eq_landau_n_rt_ts y0 u0) (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_satz109 y0 x0 u0 z0 (l_e_st_eq_landau_n_rt_satz85 x0 y0 l) (l_e_st_eq_landau_n_rt_satz85 z0 u0 k)) : l_e_st_eq_landau_n_rt_lessis (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_ts y0 u0)).
-
-(* constant 1671 *)
-definition l_e_st_eq_landau_n_rt_5110_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λv:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y1 v) x1.(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ratof v)) x0 (l_e_st_eq_landau_n_tf y1 v) x1 (l_e_st_eq_landau_n_rt_tict y0 (l_e_st_eq_landau_n_rt_ratof v) y1 v y1iy0 (l_e_st_eq_landau_n_rt_inclass v)) x1ix0 e : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ratof v)) x0).
-
-(* constant 1672 *)
-definition l_e_st_eq_landau_n_rt_5110_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).λv:l_e_st_eq_landau_n_frac.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y1 v) x1.(l_somei l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0) (l_e_st_eq_landau_n_rt_ratof v) (l_e_st_eq_landau_n_rt_5110_t1 x0 y0 x1 y1 x1ix0 y1iy0 v e) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0)).
-
-(* constant 1673 *)
-definition l_e_st_eq_landau_n_rt_5110_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx1:l_e_st_eq_landau_n_frac.λy1:l_e_st_eq_landau_n_frac.λx1ix0:l_e_st_eq_landau_n_rt_inf x1 (l_e_st_eq_landau_n_rt_class x0).λy1iy0:l_e_st_eq_landau_n_rt_inf y1 (l_e_st_eq_landau_n_rt_class y0).(l_someapp l_e_st_eq_landau_n_frac (λt:l_e_st_eq_landau_n_frac.l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y1 t) x1) (l_e_st_eq_landau_n_satz77a x1 y1) (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0)) (λt:l_e_st_eq_landau_n_frac.λu:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf y1 t) x1.l_e_st_eq_landau_n_rt_5110_t2 x0 y0 x1 y1 x1ix0 y1iy0 t u) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0)).
-
-(* constant 1674 *)
-definition l_e_st_eq_landau_n_rt_satz110a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp2 x0 y0 (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0)) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).l_e_st_eq_landau_n_rt_5110_t3 x0 y0 x y xi yi) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0)).
-
-(* constant 1675 *)
-definition l_e_st_eq_landau_n_rt_5110_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λv0:l_e_st_eq_landau_n_rt_rat.λw0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 v0) x0.λj:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 w0) x0.λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_frac.λw:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyiy0:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λviv0:l_e_st_eq_landau_n_rt_inf v (l_e_st_eq_landau_n_rt_class v0).λwiw0:l_e_st_eq_landau_n_rt_inf w (l_e_st_eq_landau_n_rt_class w0).(l_e_st_eq_landau_n_rt_isi v0 w0 v w viv0 wiw0 (l_e_st_eq_landau_n_satz77b x y v w (l_e_st_eq_landau_n_rt_ise (l_e_st_eq_landau_n_rt_ts y0 v0) x0 (l_e_st_eq_landau_n_tf y v) x (l_e_st_eq_landau_n_rt_tict y0 v0 y v yiy0 viv0) xix0 i) (l_e_st_eq_landau_n_rt_ise (l_e_st_eq_landau_n_rt_ts y0 w0) x0 (l_e_st_eq_landau_n_tf y w) x (l_e_st_eq_landau_n_rt_tict y0 w0 y w yiy0 wiw0) xix0 j)) : l_e_st_eq_landau_n_rt_is v0 w0).
-
-(* constant 1676 *)
-definition l_e_st_eq_landau_n_rt_satz110b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λv0:l_e_st_eq_landau_n_rt_rat.λw0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 v0) x0.λj:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 w0) x0.(l_e_st_eq_landau_n_rt_ratapp4 x0 y0 v0 w0 (l_e_st_eq_landau_n_rt_is v0 w0) (λx:l_e_st_eq_landau_n_frac.λy:l_e_st_eq_landau_n_frac.λv:l_e_st_eq_landau_n_frac.λw:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).λyi:l_e_st_eq_landau_n_rt_inf y (l_e_st_eq_landau_n_rt_class y0).λvi:l_e_st_eq_landau_n_rt_inf v (l_e_st_eq_landau_n_rt_class v0).λwi:l_e_st_eq_landau_n_rt_inf w (l_e_st_eq_landau_n_rt_class w0).l_e_st_eq_landau_n_rt_5110_t4 x0 y0 v0 w0 i j x y v w xi yi vi wi) : l_e_st_eq_landau_n_rt_is v0 w0).
-
-(* constant 1677 *)
-definition l_e_st_eq_landau_n_rt_5110_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(λt:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_rat.λv:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0.λw:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 u) x0.l_e_st_eq_landau_n_rt_satz110b x0 y0 t u v w : l_e_amone l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0)).
-
-(* constant 1678 *)
-definition l_e_st_eq_landau_n_rt_satz110 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_onei l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0) (l_e_st_eq_landau_n_rt_5110_t5 x0 y0) (l_e_st_eq_landau_n_rt_satz110a x0 y0) : l_e_st_eq_landau_n_rt_one (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0)).
-
-(* constant 1679 *)
-definition l_e_st_eq_landau_n_5111_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_ts x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_ndis12 x l_e_st_eq_landau_n_1 y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz28a x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) x).
-
-(* constant 1680 *)
-definition l_e_st_eq_landau_n_5111_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) x (l_e_st_eq_landau_n_5111_t1 x y) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)))).
-
-(* constant 1681 *)
-definition l_e_st_eq_landau_n_satz111a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1).(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1))) y (l_e_st_eq_landau_n_5111_t1 x y) (l_e_st_eq_landau_n_5111_t1 y x) m : l_e_st_eq_landau_n_more x y).
-
-(* constant 1682 *)
-definition l_e_st_eq_landau_n_satz111b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λe:l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1).(l_e_tr3is l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1))) y (l_e_st_eq_landau_n_5111_t2 x y) e (l_e_st_eq_landau_n_5111_t1 y x) : l_e_st_eq_landau_n_is x y).
-
-(* constant 1683 *)
-definition l_e_st_eq_landau_n_satz111c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1).(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1))) y (l_e_st_eq_landau_n_5111_t1 x y) (l_e_st_eq_landau_n_5111_t1 y x) l : l_e_st_eq_landau_n_less x y).
-
-(* constant 1684 *)
-definition l_e_st_eq_landau_n_satz111d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_ismore12 x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) y (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_5111_t2 x y) (l_e_st_eq_landau_n_5111_t2 y x) m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)).
-
-(* constant 1685 *)
-definition l_e_st_eq_landau_n_satz111e ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) x y (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_5111_t1 x y) i (l_e_st_eq_landau_n_5111_t2 y x) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)).
-
-(* constant 1686 *)
-definition l_e_st_eq_landau_n_satz111f ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_isless12 x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) y (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_5111_t2 x y) (l_e_st_eq_landau_n_5111_t2 y x) l : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)).
-
-(* constant 1687 *)
-definition l_e_st_eq_landau_n_rt_natprop ≝ λx0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_class x0) : Prop).
-
-(* constant 1688 *)
-definition l_e_st_eq_landau_n_rt_natrt ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_some (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop x0 t) : Prop).
-
-(* constant 1689 *)
-definition l_e_st_eq_landau_n_rt_ii5_t22 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λnpx:l_e_st_eq_landau_n_rt_natprop x0 x.λnpy:l_e_st_eq_landau_n_rt_natprop y0 y.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_satz111b x y (l_e_st_eq_landau_n_rt_ise x0 y0 (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1) npx npy i) : l_e_st_eq_landau_n_is x y).
-
-(* constant 1690 *)
-definition l_e_st_eq_landau_n_rt_ii5_t23 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_rt_natprop x0 t.λw:l_e_st_eq_landau_n_rt_natprop x0 u.l_e_st_eq_landau_n_rt_ii5_t22 x0 x0 t u v w (l_e_refis l_e_st_eq_landau_n_rt_rat x0) : l_e_amone l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop x0 t)).
-
-(* constant 1691 *)
-definition l_e_st_eq_landau_n_rt_satz111g ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.(l_e_onei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop x0 t) (l_e_st_eq_landau_n_rt_ii5_t23 x0) nx0 : l_e_st_eq_landau_n_one (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop x0 t)).
-
-(* constant 1692 *)
-definition l_e_st_eq_landau_n_rt_nofrt ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.(l_e_ind l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop x0 t) (l_e_st_eq_landau_n_rt_satz111g x0 nx0) : l_e_st_eq_landau_n_nat).
-
-(* constant 1693 *)
-definition l_e_st_eq_landau_n_rt_inclassn ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.(l_e_oneax l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop x0 t) (l_e_st_eq_landau_n_rt_satz111g x0 nx0) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_class x0)).
-
-(* constant 1694 *)
-definition l_e_st_eq_landau_n_rt_isrten ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_ii5_t22 x0 y0 (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) (l_e_st_eq_landau_n_rt_inclassn x0 nx0) (l_e_st_eq_landau_n_rt_inclassn y0 ny0) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)).
-
-(* constant 1695 *)
-definition l_e_st_eq_landau_n_rt_isrtin ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0).(l_e_st_eq_landau_n_rt_isi x0 y0 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt y0 ny0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn x0 nx0) (l_e_st_eq_landau_n_rt_inclassn y0 ny0) (l_e_st_eq_landau_n_eqn (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_nofrt y0 ny0) i) : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 1696 *)
-definition l_e_st_eq_landau_n_rt_rtofn ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1697 *)
-definition l_e_st_eq_landau_n_rt_natrti ≝ λx:l_e_st_eq_landau_n_nat.(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop (l_e_st_eq_landau_n_rt_rtofn x) t) x (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_rtofn x)).
-
-(* constant 1698 *)
-definition l_e_st_eq_landau_n_rt_isnert ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rtofn t) x y i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)).
-
-(* constant 1699 *)
-definition l_e_st_eq_landau_n_rt_isnirt ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y).(l_e_st_eq_landau_n_rt_ii5_t22 (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y) x y (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) i : l_e_st_eq_landau_n_is x y).
-
-(* constant 1700 *)
-definition l_e_st_eq_landau_n_rt_isrtn1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.(l_e_st_eq_landau_n_rt_isi x0 (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_nofrt x0 nx0)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn x0 nx0) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_refeq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1)) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_nofrt x0 nx0))).
-
-(* constant 1701 *)
-definition l_e_st_eq_landau_n_rt_isnrt1 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_ii5_t22 (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn x) x (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x)) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rtofn x)) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x))).
-
-(* constant 1702 *)
-definition l_e_st_eq_landau_n_satz112a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_satz57 x y l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl x y) l_e_st_eq_landau_n_1)).
-
-(* constant 1703 *)
-definition l_e_st_eq_landau_n_satz112b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_treq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x y) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_tfeq12a x l_e_st_eq_landau_n_1 y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_eqd (l_e_st_eq_landau_n_ts x y) (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz28a l_e_st_eq_landau_n_1)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x y) l_e_st_eq_landau_n_1)).
-
-(* constant 1704 *)
-definition l_e_st_eq_landau_n_rt_satz112c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.(l_e_st_eq_landau_n_rt_lemmaeq1 (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt y0 ny0) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_picp x0 y0 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt y0 ny0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn x0 nx0) (l_e_st_eq_landau_n_rt_inclassn y0 ny0)) (l_e_st_eq_landau_n_satz112a (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_pl x0 y0))).
-
-(* constant 1705 *)
-definition l_e_st_eq_landau_n_rt_satz112d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop (l_e_st_eq_landau_n_rt_pl x0 y0) t) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)) (l_e_st_eq_landau_n_rt_satz112c x0 nx0 y0 ny0) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 1706 *)
-definition l_e_st_eq_landau_n_rt_satz112e ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.(l_e_st_eq_landau_n_rt_lemmaeq1 (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt y0 ny0) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_tict x0 y0 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt y0 ny0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn x0 nx0) (l_e_st_eq_landau_n_rt_inclassn y0 ny0)) (l_e_st_eq_landau_n_satz112b (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_ts x0 y0))).
-
-(* constant 1707 *)
-definition l_e_st_eq_landau_n_rt_satz112f ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_natprop (l_e_st_eq_landau_n_rt_ts x0 y0) t) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)) (l_e_st_eq_landau_n_rt_satz112e x0 nx0 y0 ny0) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 1708 *)
-definition l_e_st_eq_landau_n_rt_5112_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_satz111a (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) (l_e_st_eq_landau_n_rt_moree x0 y0 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt y0 ny0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn x0 nx0) (l_e_st_eq_landau_n_rt_inclassn y0 ny0) m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0)).
-
-(* constant 1709 *)
-definition l_e_st_eq_landau_n_rt_5112_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λz:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) z.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nofrt y0 ny0) z) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nofrt y0 ny0) (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn z) (l_e_st_eq_landau_n_rt_natrti z))) d (l_e_st_eq_landau_n_ispl2 z (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn z) (l_e_st_eq_landau_n_rt_natrti z)) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) (l_e_st_eq_landau_n_rt_isnrt1 z)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nofrt y0 ny0) (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn z) (l_e_st_eq_landau_n_rt_natrti z)))).
-
-(* constant 1710 *)
-definition l_e_st_eq_landau_n_rt_5112_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λz:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) z.(l_e_st_eq_landau_n_rt_isi x0 (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_rtofn z)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nofrt y0 ny0) (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn z) (l_e_st_eq_landau_n_rt_natrti z))) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn x0 nx0) (l_e_st_eq_landau_n_rt_satz112c y0 ny0 (l_e_st_eq_landau_n_rt_rtofn z) (l_e_st_eq_landau_n_rt_natrti z)) (l_e_st_eq_landau_n_eqn (l_e_st_eq_landau_n_rt_nofrt x0 nx0) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nofrt y0 ny0) (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn z) (l_e_st_eq_landau_n_rt_natrti z))) (l_e_st_eq_landau_n_rt_5112_t2 x0 nx0 y0 ny0 m z d)) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_rtofn z))).
-
-(* constant 1711 *)
-definition l_e_st_eq_landau_n_rt_5112_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λz:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) z.(l_e_st_eq_landau_n_rt_satz101g x0 y0 (l_e_st_eq_landau_n_rt_rtofn z) m (l_e_symis l_e_st_eq_landau_n_rt_rat x0 (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_rtofn z)) (l_e_st_eq_landau_n_rt_5112_t3 x0 nx0 y0 ny0 m z d)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rtofn z) (l_e_st_eq_landau_n_rt_mn x0 y0 m)).
-
-(* constant 1712 *)
-definition l_e_st_eq_landau_n_rt_5112_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λz:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) z.(l_e_isp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) (l_e_st_eq_landau_n_rt_rtofn z) (l_e_st_eq_landau_n_rt_mn x0 y0 m) (l_e_st_eq_landau_n_rt_natrti z) (l_e_st_eq_landau_n_rt_5112_t4 x0 nx0 y0 ny0 m z d) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_mn x0 y0 m)).
-
-(* constant 1713 *)
-definition l_e_st_eq_landau_n_rt_satz112g ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_someapp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) t) (l_e_st_eq_landau_n_rt_5112_t1 x0 nx0 y0 ny0 m) (l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_mn x0 y0 m)) (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nofrt x0 nx0) (l_e_st_eq_landau_n_rt_nofrt y0 ny0) t.l_e_st_eq_landau_n_rt_5112_t5 x0 nx0 y0 ny0 m t u) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_mn x0 y0 m)).
-
-(* constant 1714 *)
-definition l_e_st_eq_landau_n_rt_satz112h ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_pf (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl x y) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_picp (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y) (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl x y) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_satz112a x y) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_pl x y))).
-
-(* constant 1715 *)
-definition l_e_st_eq_landau_n_rt_satz112j ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x y) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_tict (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y) (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x y) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_satz112b x y) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_ts x y))).
-
-(* constant 1716 *)
-definition l_e_st_eq_landau_n_rt_nt_natt ≝ (l_e_ot l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) : Type[0]).
-
-(* constant 1717 *)
-definition l_e_st_eq_landau_n_rt_nt_ntofrt ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.(l_e_out l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) x0 nx0 : l_e_st_eq_landau_n_rt_nt_natt).
-
-(* constant 1718 *)
-definition l_e_st_eq_landau_n_rt_nt_is ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_is l_e_st_eq_landau_n_rt_nt_natt xt yt : Prop).
-
-(* constant 1719 *)
-definition l_e_st_eq_landau_n_rt_nt_nis ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_not (l_e_st_eq_landau_n_rt_nt_is xt yt) : Prop).
-
-(* constant 1720 *)
-definition l_e_st_eq_landau_n_rt_nt_all ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.(l_all l_e_st_eq_landau_n_rt_nt_natt p : Prop).
-
-(* constant 1721 *)
-definition l_e_st_eq_landau_n_rt_nt_some ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.(l_some l_e_st_eq_landau_n_rt_nt_natt p : Prop).
-
-(* constant 1722 *)
-definition l_e_st_eq_landau_n_rt_nt_one ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.(l_e_one l_e_st_eq_landau_n_rt_nt_natt p : Prop).
-
-(* constant 1723 *)
-definition l_e_st_eq_landau_n_rt_nt_in ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_esti l_e_st_eq_landau_n_rt_nt_natt xt st : Prop).
-
-(* constant 1724 *)
-definition l_e_st_eq_landau_n_rt_nt_rtofnt ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_in l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) xt : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1725 *)
-definition l_e_st_eq_landau_n_rt_nt_natrti ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_inp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) xt : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_nt_rtofnt xt)).
-
-(* constant 1726 *)
-definition l_e_st_eq_landau_n_rt_nt_isrtent ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_isouti l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) x0 nx0 y0 ny0 i : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_ntofrt x0 nx0) (l_e_st_eq_landau_n_rt_nt_ntofrt y0 ny0)).
-
-(* constant 1727 *)
-definition l_e_st_eq_landau_n_rt_nt_isrtint ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.λy0:l_e_st_eq_landau_n_rt_rat.λny0:l_e_st_eq_landau_n_rt_natrt y0.λi:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_ntofrt x0 nx0) (l_e_st_eq_landau_n_rt_nt_ntofrt y0 ny0).(l_e_isoute l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) x0 nx0 y0 ny0 i : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 1728 *)
-definition l_e_st_eq_landau_n_rt_nt_isntert ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λi:l_e_st_eq_landau_n_rt_nt_is xt yt.(l_e_isini l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) xt yt i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)).
-
-(* constant 1729 *)
-definition l_e_st_eq_landau_n_rt_nt_isntirt ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt).(l_e_isine l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) xt yt i : l_e_st_eq_landau_n_rt_nt_is xt yt).
-
-(* constant 1730 *)
-definition l_e_st_eq_landau_n_rt_nt_isrtnt1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λnx0:l_e_st_eq_landau_n_rt_natrt x0.(l_e_isinout l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) x0 nx0 : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_nt_rtofnt (l_e_st_eq_landau_n_rt_nt_ntofrt x0 nx0))).
-
-(* constant 1731 *)
-definition l_e_st_eq_landau_n_rt_nt_isntrt1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_isoutin l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_natrt t) xt : l_e_st_eq_landau_n_rt_nt_is xt (l_e_st_eq_landau_n_rt_nt_ntofrt (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt))).
-
-(* constant 1732 *)
-definition l_e_st_eq_landau_n_rt_nt_ntofn ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_nt_ntofrt (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x) : l_e_st_eq_landau_n_rt_nt_natt).
-
-(* constant 1733 *)
-definition l_e_st_eq_landau_n_rt_nt_isnent ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_rt_nt_isrtent (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x) (l_e_st_eq_landau_n_rt_rtofn y) (l_e_st_eq_landau_n_rt_natrti y) (l_e_st_eq_landau_n_rt_isnert x y i) : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_ntofn x) (l_e_st_eq_landau_n_rt_nt_ntofn y)).
-
-(* constant 1734 *)
-definition l_e_st_eq_landau_n_rt_nt_isnint ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_ntofn x) (l_e_st_eq_landau_n_rt_nt_ntofn y).(l_e_st_eq_landau_n_rt_isnirt x y (l_e_st_eq_landau_n_rt_nt_isrtint (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x) (l_e_st_eq_landau_n_rt_rtofn y) (l_e_st_eq_landau_n_rt_natrti y) i) : l_e_st_eq_landau_n_is x y).
-
-(* constant 1735 *)
-definition l_e_st_eq_landau_n_rt_nt_nofnt ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) : l_e_st_eq_landau_n_nat).
-
-(* constant 1736 *)
-definition l_e_st_eq_landau_n_rt_nt_isnten ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λi:l_e_st_eq_landau_n_rt_nt_is xt yt.(l_e_st_eq_landau_n_rt_isrten (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt) (l_e_st_eq_landau_n_rt_nt_isntert xt yt i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)).
-
-(* constant 1737 *)
-definition l_e_st_eq_landau_n_rt_nt_isntin ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).(l_e_st_eq_landau_n_rt_nt_isntirt xt yt (l_e_st_eq_landau_n_rt_isrtin (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt) i) : l_e_st_eq_landau_n_rt_nt_is xt yt).
-
-(* constant 1738 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t24 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_nt_isrtnt1 (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_nt_rtofnt (l_e_st_eq_landau_n_rt_nt_ntofn x))).
-
-(* constant 1739 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t25 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_isrten (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x) (l_e_st_eq_landau_n_rt_nt_rtofnt (l_e_st_eq_landau_n_rt_nt_ntofn x)) (l_e_st_eq_landau_n_rt_nt_natrti (l_e_st_eq_landau_n_rt_nt_ntofn x)) (l_e_st_eq_landau_n_rt_nt_ii5_t24 x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn x))).
-
-(* constant 1740 *)
-definition l_e_st_eq_landau_n_rt_nt_isnnt1 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_natrti x)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn x)) (l_e_st_eq_landau_n_rt_isnrt1 x) (l_e_st_eq_landau_n_rt_nt_ii5_t25 x) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn x))).
-
-(* constant 1741 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t26 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_isrtn1 (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_nt_nofnt xt))).
-
-(* constant 1742 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t27 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_isrtent (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_rt_natrti (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_rt_nt_ii5_t26 xt) : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_ntofrt (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt)) (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_nofnt xt))).
-
-(* constant 1743 *)
-definition l_e_st_eq_landau_n_rt_nt_isntn1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_tris l_e_st_eq_landau_n_rt_nt_natt xt (l_e_st_eq_landau_n_rt_nt_ntofrt (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt)) (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_rt_nt_isntrt1 xt) (l_e_st_eq_landau_n_rt_nt_ii5_t27 xt) : l_e_st_eq_landau_n_rt_nt_is xt (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_nofnt xt))).
-
-(* constant 1744 *)
-definition l_e_st_eq_landau_n_rt_nt_isnnt2 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn x)) (l_e_st_eq_landau_n_rt_nt_isnnt1 x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn x)) x).
-
-(* constant 1745 *)
-definition l_e_st_eq_landau_n_rt_nt_isntn2 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_symis l_e_st_eq_landau_n_rt_nt_natt xt (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_rt_nt_isntn1 xt) : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_nofnt xt)) xt).
-
-(* constant 1746 *)
-definition l_e_st_eq_landau_n_rt_nt_1t ≝ (l_e_st_eq_landau_n_rt_nt_ntofn l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_rt_nt_natt).
-
-(* constant 1747 *)
-definition l_e_st_eq_landau_n_rt_nt_suct ≝ (λx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt x)) : Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt).
-
-(* constant 1748 *)
-definition l_e_st_eq_landau_n_rt_nt_5113_t1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λi:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct xt) l_e_st_eq_landau_n_rt_nt_1t.(l_e_st_eq_landau_n_rt_nt_isnint (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt xt)) l_e_st_eq_landau_n_1 i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt xt)) l_e_st_eq_landau_n_1).
-
-(* constant 1749 *)
-definition l_e_st_eq_landau_n_rt_nt_satz113a ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_imp_th3 (l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct xt) l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt xt)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ax3 (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (λt:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct xt) l_e_st_eq_landau_n_rt_nt_1t.l_e_st_eq_landau_n_rt_nt_5113_t1 xt t) : l_e_st_eq_landau_n_rt_nt_nis (l_e_st_eq_landau_n_rt_nt_suct xt) l_e_st_eq_landau_n_rt_nt_1t).
-
-(* constant 1750 *)
-definition l_e_st_eq_landau_n_rt_nt_5113_t2 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λi:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct xt) (l_e_st_eq_landau_n_rt_nt_suct yt).(l_e_st_eq_landau_n_rt_nt_isnint (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt yt)) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt yt))).
-
-(* constant 1751 *)
-definition l_e_st_eq_landau_n_rt_nt_satz113b ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λi:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct xt) (l_e_st_eq_landau_n_rt_nt_suct yt).(l_e_st_eq_landau_n_rt_nt_isntin xt yt (l_e_st_eq_landau_n_ax4 (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_5113_t2 xt yt i)) : l_e_st_eq_landau_n_rt_nt_is xt yt).
-
-(* constant 1752 *)
-definition l_e_st_eq_landau_n_rt_nt_cond1 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_in l_e_st_eq_landau_n_rt_nt_1t st : Prop).
-
-(* constant 1753 *)
-definition l_e_st_eq_landau_n_rt_nt_cond2 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_all (λx:l_e_st_eq_landau_n_rt_nt_natt.l_imp (l_e_st_eq_landau_n_rt_nt_in x st) (l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_suct x) st)) : Prop).
-
-(* constant 1754 *)
-definition l_e_st_eq_landau_n_rt_nt_5113_prop1 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_ntofn x) st : Prop).
-
-(* constant 1755 *)
-definition l_e_st_eq_landau_n_rt_nt_5113_t3 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_5113_prop1 st c1 c2 x.(c2 (l_e_st_eq_landau_n_rt_nt_ntofn x) : l_imp (l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_ntofn x) st) (l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_ntofn x)) st)).
-
-(* constant 1756 *)
-definition l_e_st_eq_landau_n_rt_nt_5113_t4 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_5113_prop1 st c1 c2 x.(l_mp (l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_ntofn x) st) (l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_ntofn x)) st) p (l_e_st_eq_landau_n_rt_nt_5113_t3 st c1 c2 x p) : l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_ntofn x)) st).
-
-(* constant 1757 *)
-definition l_e_st_eq_landau_n_rt_nt_5113_t5 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_5113_prop1 st c1 c2 x.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_suc t)) st) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn x)) x (l_e_st_eq_landau_n_rt_nt_5113_t4 st c1 c2 x p) (l_e_st_eq_landau_n_rt_nt_isnnt2 x) : l_e_st_eq_landau_n_rt_nt_5113_prop1 st c1 c2 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 1758 *)
-definition l_e_st_eq_landau_n_rt_nt_5113_t6 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_5113_prop1 st c1 c2 t) c1 (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_nt_5113_prop1 st c1 c2 t.l_e_st_eq_landau_n_rt_nt_5113_t5 st c1 c2 t u) (l_e_st_eq_landau_n_rt_nt_nofnt xt) : l_e_st_eq_landau_n_rt_nt_in (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_nofnt xt)) st).
-
-(* constant 1759 *)
-definition l_e_st_eq_landau_n_rt_nt_satz113c ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_isp l_e_st_eq_landau_n_rt_nt_natt (λt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_in t st) (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_nofnt xt)) xt (l_e_st_eq_landau_n_rt_nt_5113_t6 st c1 c2 xt) (l_e_st_eq_landau_n_rt_nt_isntn2 xt) : l_e_st_eq_landau_n_rt_nt_in xt st).
-
-(* constant 1760 *)
-definition l_e_st_eq_landau_n_rt_nt_ax3t ≝ (λx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_satz113a x : ∀x:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_nis (l_e_st_eq_landau_n_rt_nt_suct x) l_e_st_eq_landau_n_rt_nt_1t).
-
-(* constant 1761 *)
-definition l_e_st_eq_landau_n_rt_nt_ax4t ≝ (λx:l_e_st_eq_landau_n_rt_nt_natt.λy:l_e_st_eq_landau_n_rt_nt_natt.λu:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct x) (l_e_st_eq_landau_n_rt_nt_suct y).l_e_st_eq_landau_n_rt_nt_satz113b x y u : ∀x:l_e_st_eq_landau_n_rt_nt_natt.∀y:l_e_st_eq_landau_n_rt_nt_natt.∀u:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct x) (l_e_st_eq_landau_n_rt_nt_suct y).l_e_st_eq_landau_n_rt_nt_is x y).
-
-(* constant 1762 *)
-definition l_e_st_eq_landau_n_rt_nt_ax5t ≝ (λs:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λu:l_e_st_eq_landau_n_rt_nt_cond1 s.λv:l_e_st_eq_landau_n_rt_nt_cond2 s.λx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_satz113c s u v x : ∀s:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.∀u:l_e_st_eq_landau_n_rt_nt_cond1 s.∀v:l_e_st_eq_landau_n_rt_nt_cond2 s.∀x:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_in x s).
-
-(* constant 1763 *)
-definition l_e_st_eq_landau_n_rt_nt_51_t1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λn:l_e_st_eq_landau_n_rt_nt_nis xt yt.(l_imp_th3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_nt_is xt yt) n (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).l_e_st_eq_landau_n_rt_nt_isntin xt yt t) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)).
-
-(* constant 1764 *)
-definition l_e_st_eq_landau_n_rt_nt_51_t2 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λn:l_e_st_eq_landau_n_rt_nt_nis xt yt.(l_e_st_eq_landau_n_satz1 (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_51_t1 xt yt n) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt yt))).
-
-(* constant 1765 *)
-definition l_e_st_eq_landau_n_rt_nt_satz1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λn:l_e_st_eq_landau_n_rt_nt_nis xt yt.(l_imp_th3 (l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct xt) (l_e_st_eq_landau_n_rt_nt_suct yt)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt yt))) (l_e_st_eq_landau_n_rt_nt_51_t2 xt yt n) (λt:l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_suct xt) (l_e_st_eq_landau_n_rt_nt_suct yt).l_e_st_eq_landau_n_rt_nt_isnint (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt xt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt yt)) t) : l_e_st_eq_landau_n_rt_nt_nis (l_e_st_eq_landau_n_rt_nt_suct xt) (l_e_st_eq_landau_n_rt_nt_suct yt)).
-
-(* constant 1766 *)
-definition l_e_st_eq_landau_n_rt_nt_54_x ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_nofnt xt : l_e_st_eq_landau_n_nat).
-
-(* constant 1767 *)
-definition l_e_st_eq_landau_n_rt_nt_54_prop1t ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_all (λt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_is (ft (l_e_st_eq_landau_n_rt_nt_suct t)) (l_e_st_eq_landau_n_rt_nt_suct (ft t))) : Prop).
-
-(* constant 1768 *)
-definition l_e_st_eq_landau_n_rt_nt_54_prop2t ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.(l_and (l_e_st_eq_landau_n_rt_nt_is (ft l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_rt_nt_suct xt)) (l_e_st_eq_landau_n_rt_nt_54_prop1t st c1 c2 xt ft) : Prop).
-
-(* constant 1769 *)
-definition l_e_st_eq_landau_n_rt_nt_54_prop1 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_all (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_suc t)) (l_e_st_eq_landau_n_suc (f t))) : Prop).
-
-(* constant 1770 *)
-definition l_e_st_eq_landau_n_rt_nt_54_prop2 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.(l_and (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt))) (l_e_st_eq_landau_n_rt_nt_54_prop1 st c1 c2 xt f) : Prop).
-
-(* constant 1771 *)
-definition l_e_st_eq_landau_n_rt_nt_54_g ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.(λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_nofnt (ft (l_e_st_eq_landau_n_rt_nt_ntofn t)) : Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat).
-
-(* constant 1772 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t1 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.(l_ande1 (l_e_st_eq_landau_n_rt_nt_is (ft l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_rt_nt_suct xt)) (l_e_st_eq_landau_n_rt_nt_54_prop1t st c1 c2 xt ft) p : l_e_st_eq_landau_n_rt_nt_is (ft l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_rt_nt_suct xt)).
-
-(* constant 1773 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t2 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_suct xt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt)) (l_e_st_eq_landau_n_rt_nt_isnten (ft l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_rt_nt_suct xt) (l_e_st_eq_landau_n_rt_nt_54_t1 st c1 c2 xt ft p)) (l_e_st_eq_landau_n_rt_nt_isnnt2 (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt))).
-
-(* constant 1774 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t3 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.(l_ande2 (l_e_st_eq_landau_n_rt_nt_is (ft l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_rt_nt_suct xt)) (l_e_st_eq_landau_n_rt_nt_54_prop1t st c1 c2 xt ft) p : l_e_st_eq_landau_n_rt_nt_54_prop1t st c1 c2 xt ft).
-
-(* constant 1775 *)
-definition l_e_st_eq_landau_n_rt_nt_54_ut ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.λu:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_nt_ntofn u : l_e_st_eq_landau_n_rt_nt_natt).
-
-(* constant 1776 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t4 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.λu:l_e_st_eq_landau_n_nat.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_suc u (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u)) (l_e_st_eq_landau_n_rt_nt_isnnt1 u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc u) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u)))).
-
-(* constant 1777 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t5 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.λu:l_e_st_eq_landau_n_nat.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft) (l_e_st_eq_landau_n_suc u) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u))) (l_e_st_eq_landau_n_rt_nt_54_t4 st c1 c2 xt ft p u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_rt_nt_nofnt (ft (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u))))).
-
-(* constant 1778 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t6 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.λu:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_nt_54_t3 st c1 c2 xt ft p (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u) : l_e_st_eq_landau_n_rt_nt_is (ft (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u))) (l_e_st_eq_landau_n_rt_nt_suct (ft (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u)))).
-
-(* constant 1779 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t7 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.λu:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_nt_isnten (ft (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u))) (l_e_st_eq_landau_n_rt_nt_suct (ft (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u))) (l_e_st_eq_landau_n_rt_nt_54_t6 st c1 c2 xt ft p u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt (ft (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u)))) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_suct (ft (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u))))).
-
-(* constant 1780 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t8 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.λu:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_nt_isnnt2 (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft u)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_suct (ft (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u)))) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft u))).
-
-(* constant 1781 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t9 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.λu:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_rt_nt_nofnt (ft (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u)))) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_suct (ft (l_e_st_eq_landau_n_rt_nt_54_ut st c1 c2 xt ft p u)))) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft u)) (l_e_st_eq_landau_n_rt_nt_54_t5 st c1 c2 xt ft p u) (l_e_st_eq_landau_n_rt_nt_54_t7 st c1 c2 xt ft p u) (l_e_st_eq_landau_n_rt_nt_54_t8 st c1 c2 xt ft p u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft u))).
-
-(* constant 1782 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t10 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.(λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_54_t9 st c1 c2 xt ft p u : l_e_st_eq_landau_n_rt_nt_54_prop1 st c1 c2 xt (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft)).
-
-(* constant 1783 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t11 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λft:Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λp:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt ft.(l_andi (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt))) (l_e_st_eq_landau_n_rt_nt_54_prop1 st c1 c2 xt (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft)) (l_e_st_eq_landau_n_rt_nt_54_t2 st c1 c2 xt ft p) (l_e_st_eq_landau_n_rt_nt_54_t10 st c1 c2 xt ft p) : l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt ft)).
-
-(* constant 1784 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t12 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λa:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λb:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λpa:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt a.λpb:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt b.(l_e_onee1 (Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λu:Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt u) (l_e_st_eq_landau_n_satz4 (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt)) : l_e_amone (Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λu:Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt u)).
-
-(* constant 1785 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t13 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λa:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λb:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λpa:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt a.λpb:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt b.(l_e_st_eq_landau_n_rt_nt_54_t12 st c1 c2 xt a b pa pb (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt a) (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt b) (l_e_st_eq_landau_n_rt_nt_54_t11 st c1 c2 xt a pa) (l_e_st_eq_landau_n_rt_nt_54_t11 st c1 c2 xt b pb) : l_e_is (Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt a) (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt b)).
-
-(* constant 1786 *)
-definition l_e_st_eq_landau_n_rt_nt_54_y ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λa:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λb:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λpa:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt a.λpb:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt b.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_nofnt yt : l_e_st_eq_landau_n_nat).
-
-(* constant 1787 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t14 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λa:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λb:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λpa:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt a.λpb:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt b.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_fise l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt a) (l_e_st_eq_landau_n_rt_nt_54_g st c1 c2 xt b) (l_e_st_eq_landau_n_rt_nt_54_t13 st c1 c2 xt a b pa pb) (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt (a (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt)))) (l_e_st_eq_landau_n_rt_nt_nofnt (b (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt))))).
-
-(* constant 1788 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t15 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λa:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λb:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λpa:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt a.λpb:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt b.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_isntin (a (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt))) (b (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt))) (l_e_st_eq_landau_n_rt_nt_54_t14 st c1 c2 xt a b pa pb yt) : l_e_st_eq_landau_n_rt_nt_is (a (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt))) (b (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt)))).
-
-(* constant 1789 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t16 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λa:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λb:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λpa:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt a.λpb:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt b.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_tr3is l_e_st_eq_landau_n_rt_nt_natt (a yt) (a (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt))) (b (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt))) (b yt) (l_e_isf l_e_st_eq_landau_n_rt_nt_natt l_e_st_eq_landau_n_rt_nt_natt a yt (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt)) (l_e_st_eq_landau_n_rt_nt_isntn1 yt)) (l_e_st_eq_landau_n_rt_nt_54_t15 st c1 c2 xt a b pa pb yt) (l_e_isf l_e_st_eq_landau_n_rt_nt_natt l_e_st_eq_landau_n_rt_nt_natt b (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_54_y st c1 c2 xt a b pa pb yt)) yt (l_e_st_eq_landau_n_rt_nt_isntn2 yt)) : l_e_st_eq_landau_n_rt_nt_is (a yt) (b yt)).
-
-(* constant 1790 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t17 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λa:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λb:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λpa:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt a.λpb:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt b.(l_e_fisi l_e_st_eq_landau_n_rt_nt_natt l_e_st_eq_landau_n_rt_nt_natt a b (λt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_54_t16 st c1 c2 xt a b pa pb t) : l_e_is (Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt) a b).
-
-(* constant 1791 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t18 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.(λu:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λv:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.λw:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt u.λz:l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt v.l_e_st_eq_landau_n_rt_nt_54_t17 st c1 c2 xt u v w z : l_e_amone (Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt) (λu:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt u)).
-
-(* constant 1792 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t19 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_onee2 (Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λu:Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt u) (l_e_st_eq_landau_n_satz4 (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt)) : l_some (Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λu:Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt u)).
-
-(* constant 1793 *)
-definition l_e_st_eq_landau_n_rt_nt_54_gt ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.(λt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_ntofn (f (l_e_st_eq_landau_n_rt_nt_nofnt t)) : Πx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt).
-
-(* constant 1794 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t20 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.(l_ande1 (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt))) (l_e_st_eq_landau_n_rt_nt_54_prop1 st c1 c2 xt f) p : l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt))).
-
-(* constant 1795 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t21 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat f (l_e_st_eq_landau_n_rt_nt_nofnt l_e_st_eq_landau_n_rt_nt_1t) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_nt_isnnt2 l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_rt_nt_nofnt l_e_st_eq_landau_n_rt_nt_1t)) (f l_e_st_eq_landau_n_1)).
-
-(* constant 1796 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t22 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.(l_e_st_eq_landau_n_rt_nt_isnent (f (l_e_st_eq_landau_n_rt_nt_nofnt l_e_st_eq_landau_n_rt_nt_1t)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt)) (l_e_tris l_e_st_eq_landau_n_nat (f (l_e_st_eq_landau_n_rt_nt_nofnt l_e_st_eq_landau_n_rt_nt_1t)) (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt)) (l_e_st_eq_landau_n_rt_nt_54_t21 st c1 c2 xt f p) (l_e_st_eq_landau_n_rt_nt_54_t20 st c1 c2 xt f p)) : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_rt_nt_suct xt)).
-
-(* constant 1797 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t23 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.(l_ande2 (l_e_st_eq_landau_n_is (f l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_x st c1 c2 xt))) (l_e_st_eq_landau_n_rt_nt_54_prop1 st c1 c2 xt f) p : l_e_st_eq_landau_n_rt_nt_54_prop1 st c1 c2 xt f).
-
-(* constant 1798 *)
-definition l_e_st_eq_landau_n_rt_nt_54_z ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_nofnt zt : l_e_st_eq_landau_n_nat).
-
-(* constant 1799 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t24 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat f (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_suct zt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt)) (l_e_st_eq_landau_n_rt_nt_isnnt2 (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt))) : l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_suct zt))) (f (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt)))).
-
-(* constant 1800 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t25 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_54_t23 st c1 c2 xt f p (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt) : l_e_st_eq_landau_n_is (f (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt))) (l_e_st_eq_landau_n_suc (f (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt)))).
-
-(* constant 1801 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t26 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_suc (f (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f zt)) (l_e_st_eq_landau_n_rt_nt_isnnt1 (f (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (f (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt))) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f zt)))).
-
-(* constant 1802 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t27 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_isnent (f (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_suct zt))) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f zt))) (l_e_tr3is l_e_st_eq_landau_n_nat (f (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_suct zt))) (f (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt))) (l_e_st_eq_landau_n_suc (f (l_e_st_eq_landau_n_rt_nt_54_z st c1 c2 xt f p zt))) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f zt))) (l_e_st_eq_landau_n_rt_nt_54_t24 st c1 c2 xt f p zt) (l_e_st_eq_landau_n_rt_nt_54_t25 st c1 c2 xt f p zt) (l_e_st_eq_landau_n_rt_nt_54_t26 st c1 c2 xt f p zt)) : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f (l_e_st_eq_landau_n_rt_nt_suct zt)) (l_e_st_eq_landau_n_rt_nt_suct (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f zt))).
-
-(* constant 1803 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t28 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.(λu:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_54_t27 st c1 c2 xt f p u : l_e_st_eq_landau_n_rt_nt_54_prop1t st c1 c2 xt (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f)).
-
-(* constant 1804 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t29 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.(l_andi (l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_rt_nt_suct xt)) (l_e_st_eq_landau_n_rt_nt_54_prop1t st c1 c2 xt (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f)) (l_e_st_eq_landau_n_rt_nt_54_t22 st c1 c2 xt f p) (l_e_st_eq_landau_n_rt_nt_54_t28 st c1 c2 xt f p) : l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f)).
-
-(* constant 1805 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t30 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.λf:Πx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt f.(l_somei (Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt) (λu:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt u) (l_e_st_eq_landau_n_rt_nt_54_gt st c1 c2 xt f) (l_e_st_eq_landau_n_rt_nt_54_t29 st c1 c2 xt f p) : l_some (Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt) (λu:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt u)).
-
-(* constant 1806 *)
-definition l_e_st_eq_landau_n_rt_nt_54_t31 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_someapp (Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat) (λu:Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt u) (l_e_st_eq_landau_n_rt_nt_54_t19 st c1 c2 xt) (l_some (Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt) (λu:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt u)) (λu:Πt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_rt_nt_54_prop2 st c1 c2 xt u.l_e_st_eq_landau_n_rt_nt_54_t30 st c1 c2 xt u v) : l_some (Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt) (λu:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt u)).
-
-(* constant 1807 *)
-definition l_e_st_eq_landau_n_rt_nt_satz4 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_nt_natt.λc1:l_e_st_eq_landau_n_rt_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_onei (Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt) (λu:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_54_prop2t st c1 c2 xt u) (l_e_st_eq_landau_n_rt_nt_54_t18 st c1 c2 xt) (l_e_st_eq_landau_n_rt_nt_54_t31 st c1 c2 xt) : l_e_one (Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt) (λu:Πt:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_natt.l_and (l_e_st_eq_landau_n_rt_nt_is (u l_e_st_eq_landau_n_rt_nt_1t) (l_e_st_eq_landau_n_rt_nt_suct xt)) (l_e_st_eq_landau_n_rt_nt_all (λv:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_is (u (l_e_st_eq_landau_n_rt_nt_suct v)) (l_e_st_eq_landau_n_rt_nt_suct (u v)))))).
-
-(* constant 1808 *)
-definition l_e_st_eq_landau_n_rt_nt_pl ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_ntofrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_rt_satz112d (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt)) : l_e_st_eq_landau_n_rt_nt_natt).
-
-(* constant 1809 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t28 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_satz112c (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt) : l_e_st_eq_landau_n_rt_inf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_class (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)))).
-
-(* constant 1810 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t29 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_nt_ii5_t28 xt yt) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_refeq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) l_e_st_eq_landau_n_1)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)))).
-
-(* constant 1811 *)
-definition l_e_st_eq_landau_n_rt_nt_isplnt ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_isrtent (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_rt_satz112d (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt))) (l_e_st_eq_landau_n_rt_natrti (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt))) (l_e_st_eq_landau_n_rt_nt_ii5_t29 xt yt) : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_pl xt yt) (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)))).
-
-(* constant 1812 *)
-definition l_e_st_eq_landau_n_rt_nt_isntpl ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_symis l_e_st_eq_landau_n_rt_nt_natt (l_e_st_eq_landau_n_rt_nt_pl xt yt) (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt))) (l_e_st_eq_landau_n_rt_nt_isplnt xt yt) : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt))) (l_e_st_eq_landau_n_rt_nt_pl xt yt)).
-
-(* constant 1813 *)
-definition l_e_st_eq_landau_n_rt_nt_ispln ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)))) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_rt_nt_isnnt1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt))) (l_e_st_eq_landau_n_rt_nt_isnten (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt))) (l_e_st_eq_landau_n_rt_nt_pl xt yt) (l_e_st_eq_landau_n_rt_nt_isntpl xt yt)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt))).
-
-(* constant 1814 *)
-definition l_e_st_eq_landau_n_rt_nt_isnpl ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_rt_nt_ispln xt yt) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt))).
-
-(* constant 1815 *)
-definition l_e_st_eq_landau_n_rt_nt_55_t1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt zt) (l_e_st_eq_landau_n_rt_nt_isnpl xt yt) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt zt))).
-
-(* constant 1816 *)
-definition l_e_st_eq_landau_n_rt_nt_55_t2 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt)) (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_ispln yt zt) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt)))).
-
-(* constant 1817 *)
-definition l_e_st_eq_landau_n_rt_nt_55_t3 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt))) (l_e_st_eq_landau_n_rt_nt_55_t1 xt yt zt) (l_e_st_eq_landau_n_satz5 (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_rt_nt_55_t2 xt yt zt) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt)))).
-
-(* constant 1818 *)
-definition l_e_st_eq_landau_n_rt_nt_satz5 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_tr3is l_e_st_eq_landau_n_rt_nt_natt (l_e_st_eq_landau_n_rt_nt_pl (l_e_st_eq_landau_n_rt_nt_pl xt yt) zt) (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt zt))) (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt)))) (l_e_st_eq_landau_n_rt_nt_pl xt (l_e_st_eq_landau_n_rt_nt_pl yt zt)) (l_e_st_eq_landau_n_rt_nt_isplnt (l_e_st_eq_landau_n_rt_nt_pl xt yt) zt) (l_e_st_eq_landau_n_rt_nt_isnent (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt yt)) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt))) (l_e_st_eq_landau_n_rt_nt_55_t3 xt yt zt)) (l_e_st_eq_landau_n_rt_nt_isntpl xt (l_e_st_eq_landau_n_rt_nt_pl yt zt)) : l_e_st_eq_landau_n_rt_nt_is (l_e_st_eq_landau_n_rt_nt_pl (l_e_st_eq_landau_n_rt_nt_pl xt yt) zt) (l_e_st_eq_landau_n_rt_nt_pl xt (l_e_st_eq_landau_n_rt_nt_pl yt zt))).
-
-(* constant 1819 *)
-definition l_e_st_eq_landau_n_rt_nt_diffprop ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_is xt (l_e_st_eq_landau_n_rt_nt_pl yt zt) : Prop).
-
-(* constant 1820 *)
-definition l_e_st_eq_landau_n_rt_nt_diffprope ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.λd:l_e_st_eq_landau_n_rt_nt_diffprop xt yt zt.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_rt_nt_isnten xt (l_e_st_eq_landau_n_rt_nt_pl yt zt) d) (l_e_st_eq_landau_n_rt_nt_isnpl yt zt) : l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt)).
-
-(* constant 1821 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t30 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.λd:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt)) d (l_e_st_eq_landau_n_rt_nt_ispln yt zt) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt zt))).
-
-(* constant 1822 *)
-definition l_e_st_eq_landau_n_rt_nt_diffpropi ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.λd:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt).(l_e_st_eq_landau_n_rt_nt_isntin xt (l_e_st_eq_landau_n_rt_nt_pl yt zt) (l_e_st_eq_landau_n_rt_nt_ii5_t30 xt yt zt d) : l_e_st_eq_landau_n_rt_nt_diffprop xt yt zt).
-
-(* constant 1823 *)
-definition l_e_st_eq_landau_n_rt_nt_59_it ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_is xt yt : Prop).
-
-(* constant 1824 *)
-definition l_e_st_eq_landau_n_rt_nt_59_iit ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_some (λu:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_diffprop xt yt u) : Prop).
-
-(* constant 1825 *)
-definition l_e_st_eq_landau_n_rt_nt_59_iiit ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_some (λu:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_diffprop yt xt u) : Prop).
-
-(* constant 1826 *)
-definition l_e_st_eq_landau_n_rt_nt_59_i ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) : Prop).
-
-(* constant 1827 *)
-definition l_e_st_eq_landau_n_rt_nt_59_ii ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) u) : Prop).
-
-(* constant 1828 *)
-definition l_e_st_eq_landau_n_rt_nt_59_iii ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt xt) u) : Prop).
-
-(* constant 1829 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λone:l_e_st_eq_landau_n_rt_nt_59_i xt yt.(l_or3i1 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (l_e_st_eq_landau_n_rt_nt_isntin xt yt one) : l_or3 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt)).
-
-(* constant 1830 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t2 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λtwo:l_e_st_eq_landau_n_rt_nt_59_ii xt yt.λv:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) v.(l_e_isp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) u) v (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn v)) d (l_e_st_eq_landau_n_rt_nt_isnnt1 v) : l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn v))).
-
-(* constant 1831 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t3 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λtwo:l_e_st_eq_landau_n_rt_nt_59_ii xt yt.λv:l_e_st_eq_landau_n_nat.λd:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) v.(l_somei l_e_st_eq_landau_n_rt_nt_natt (λu:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_diffprop xt yt u) (l_e_st_eq_landau_n_rt_nt_ntofn v) (l_e_st_eq_landau_n_rt_nt_diffpropi xt yt (l_e_st_eq_landau_n_rt_nt_ntofn v) (l_e_st_eq_landau_n_rt_nt_59_t2 xt yt two v d)) : l_e_st_eq_landau_n_rt_nt_59_iit xt yt).
-
-(* constant 1832 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t4 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λtwo:l_e_st_eq_landau_n_rt_nt_59_ii xt yt.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) u) two (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) u.l_e_st_eq_landau_n_rt_nt_59_t3 xt yt two u v) : l_e_st_eq_landau_n_rt_nt_59_iit xt yt).
-
-(* constant 1833 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t5 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λtwo:l_e_st_eq_landau_n_rt_nt_59_ii xt yt.(l_or3i2 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (l_e_st_eq_landau_n_rt_nt_59_t4 xt yt two) : l_or3 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt)).
-
-(* constant 1834 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t6 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λthree:l_e_st_eq_landau_n_rt_nt_59_iii xt yt.(l_or3i3 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (l_e_st_eq_landau_n_rt_nt_59_t4 yt xt three) : l_or3 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt)).
-
-(* constant 1835 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t7 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_or3app (l_e_st_eq_landau_n_rt_nt_59_i xt yt) (l_e_st_eq_landau_n_rt_nt_59_ii xt yt) (l_e_st_eq_landau_n_rt_nt_59_iii xt yt) (l_or3 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt)) (l_e_st_eq_landau_n_satz9a (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (λu:l_e_st_eq_landau_n_rt_nt_59_i xt yt.l_e_st_eq_landau_n_rt_nt_59_t1 xt yt u) (λu:l_e_st_eq_landau_n_rt_nt_59_ii xt yt.l_e_st_eq_landau_n_rt_nt_59_t5 xt yt u) (λu:l_e_st_eq_landau_n_rt_nt_59_iii xt yt.l_e_st_eq_landau_n_rt_nt_59_t6 xt yt u) : l_or3 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt)).
-
-(* constant 1836 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t8 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λonet:l_e_st_eq_landau_n_rt_nt_59_it xt yt.(l_e_st_eq_landau_n_rt_nt_isnten xt yt onet : l_e_st_eq_landau_n_rt_nt_59_i xt yt).
-
-(* constant 1837 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t9 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λtwot:l_e_st_eq_landau_n_rt_nt_59_iit xt yt.λvt:l_e_st_eq_landau_n_rt_nt_natt.λd:l_e_st_eq_landau_n_rt_nt_diffprop xt yt vt.(l_somei l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) u) (l_e_st_eq_landau_n_rt_nt_nofnt vt) (l_e_st_eq_landau_n_rt_nt_diffprope xt yt vt d) : l_e_st_eq_landau_n_rt_nt_59_ii xt yt).
-
-(* constant 1838 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t10 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λtwot:l_e_st_eq_landau_n_rt_nt_59_iit xt yt.(l_someapp l_e_st_eq_landau_n_rt_nt_natt (λu:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_diffprop xt yt u) twot (l_e_st_eq_landau_n_rt_nt_59_ii xt yt) (λu:l_e_st_eq_landau_n_rt_nt_natt.λv:l_e_st_eq_landau_n_rt_nt_diffprop xt yt u.l_e_st_eq_landau_n_rt_nt_59_t9 xt yt twot u v) : l_e_st_eq_landau_n_rt_nt_59_ii xt yt).
-
-(* constant 1839 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t11 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λthreet:l_e_st_eq_landau_n_rt_nt_59_iiit xt yt.(l_e_st_eq_landau_n_rt_nt_59_t10 yt xt threet : l_e_st_eq_landau_n_rt_nt_59_iii xt yt).
-
-(* constant 1840 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t12 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_satz9b (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) : l_ec3 (l_e_st_eq_landau_n_rt_nt_59_i xt yt) (l_e_st_eq_landau_n_rt_nt_59_ii xt yt) (l_e_st_eq_landau_n_rt_nt_59_iii xt yt)).
-
-(* constant 1841 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t13 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λonet:l_e_st_eq_landau_n_rt_nt_59_it xt yt.(l_ec3e12 (l_e_st_eq_landau_n_rt_nt_59_i xt yt) (l_e_st_eq_landau_n_rt_nt_59_ii xt yt) (l_e_st_eq_landau_n_rt_nt_59_iii xt yt) (l_e_st_eq_landau_n_rt_nt_59_t12 xt yt) (l_e_st_eq_landau_n_rt_nt_59_t8 xt yt onet) : l_not (l_e_st_eq_landau_n_rt_nt_59_ii xt yt)).
-
-(* constant 1842 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t14 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λonet:l_e_st_eq_landau_n_rt_nt_59_it xt yt.(l_imp_th3 (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_ii xt yt) (l_e_st_eq_landau_n_rt_nt_59_t13 xt yt onet) (λx:l_e_st_eq_landau_n_rt_nt_59_iit xt yt.l_e_st_eq_landau_n_rt_nt_59_t10 xt yt x) : l_not (l_e_st_eq_landau_n_rt_nt_59_iit xt yt)).
-
-(* constant 1843 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t15 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_ec_th1 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (λx:l_e_st_eq_landau_n_rt_nt_59_it xt yt.l_e_st_eq_landau_n_rt_nt_59_t14 xt yt x) : l_ec (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt)).
-
-(* constant 1844 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t16 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λtwot:l_e_st_eq_landau_n_rt_nt_59_iit xt yt.(l_ec3e23 (l_e_st_eq_landau_n_rt_nt_59_i xt yt) (l_e_st_eq_landau_n_rt_nt_59_ii xt yt) (l_e_st_eq_landau_n_rt_nt_59_iii xt yt) (l_e_st_eq_landau_n_rt_nt_59_t12 xt yt) (l_e_st_eq_landau_n_rt_nt_59_t10 xt yt twot) : l_not (l_e_st_eq_landau_n_rt_nt_59_iii xt yt)).
-
-(* constant 1845 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t17 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λtwot:l_e_st_eq_landau_n_rt_nt_59_iit xt yt.(l_imp_th3 (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iii xt yt) (l_e_st_eq_landau_n_rt_nt_59_t16 xt yt twot) (λx:l_e_st_eq_landau_n_rt_nt_59_iiit xt yt.l_e_st_eq_landau_n_rt_nt_59_t11 xt yt x) : l_not (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt)).
-
-(* constant 1846 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t18 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_ec_th1 (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (λx:l_e_st_eq_landau_n_rt_nt_59_iit xt yt.l_e_st_eq_landau_n_rt_nt_59_t17 xt yt x) : l_ec (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt)).
-
-(* constant 1847 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t19 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λthreet:l_e_st_eq_landau_n_rt_nt_59_iiit xt yt.(l_ec3e31 (l_e_st_eq_landau_n_rt_nt_59_i xt yt) (l_e_st_eq_landau_n_rt_nt_59_ii xt yt) (l_e_st_eq_landau_n_rt_nt_59_iii xt yt) (l_e_st_eq_landau_n_rt_nt_59_t12 xt yt) (l_e_st_eq_landau_n_rt_nt_59_t11 xt yt threet) : l_not (l_e_st_eq_landau_n_rt_nt_59_i xt yt)).
-
-(* constant 1848 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t20 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λthreet:l_e_st_eq_landau_n_rt_nt_59_iiit xt yt.(l_imp_th3 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_i xt yt) (l_e_st_eq_landau_n_rt_nt_59_t19 xt yt threet) (λx:l_e_st_eq_landau_n_rt_nt_59_it xt yt.l_e_st_eq_landau_n_rt_nt_59_t8 xt yt x) : l_not (l_e_st_eq_landau_n_rt_nt_59_it xt yt)).
-
-(* constant 1849 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t21 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_ec_th1 (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (λx:l_e_st_eq_landau_n_rt_nt_59_iiit xt yt.l_e_st_eq_landau_n_rt_nt_59_t20 xt yt x) : l_ec (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (l_e_st_eq_landau_n_rt_nt_59_it xt yt)).
-
-(* constant 1850 *)
-definition l_e_st_eq_landau_n_rt_nt_59_t22 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_ec3_th6 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (l_e_st_eq_landau_n_rt_nt_59_t15 xt yt) (l_e_st_eq_landau_n_rt_nt_59_t18 xt yt) (l_e_st_eq_landau_n_rt_nt_59_t21 xt yt) : l_ec3 (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt)).
-
-(* constant 1851 *)
-definition l_e_st_eq_landau_n_rt_nt_satz9 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_orec3i (l_e_st_eq_landau_n_rt_nt_59_it xt yt) (l_e_st_eq_landau_n_rt_nt_59_iit xt yt) (l_e_st_eq_landau_n_rt_nt_59_iiit xt yt) (l_e_st_eq_landau_n_rt_nt_59_t7 xt yt) (l_e_st_eq_landau_n_rt_nt_59_t22 xt yt) : l_orec3 (l_e_st_eq_landau_n_rt_nt_is xt yt) (l_e_st_eq_landau_n_rt_nt_some (λu:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_is xt (l_e_st_eq_landau_n_rt_nt_pl yt u))) (l_e_st_eq_landau_n_rt_nt_some (λu:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_is yt (l_e_st_eq_landau_n_rt_nt_pl xt u)))).
-
-(* constant 1852 *)
-definition l_e_st_eq_landau_n_rt_nt_more ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) : Prop).
-
-(* constant 1853 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t31 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_rt_nt_more xt yt.(l_e_st_eq_landau_n_rt_moree (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt xt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt yt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt)) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt)) m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt xt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt yt) l_e_st_eq_landau_n_1)).
-
-(* constant 1854 *)
-definition l_e_st_eq_landau_n_rt_nt_moree ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_rt_nt_more xt yt.(l_e_st_eq_landau_n_satz111a (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_ii5_t31 xt yt m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)).
-
-(* constant 1855 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t32 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).(l_e_st_eq_landau_n_satz111d (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt xt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt yt) l_e_st_eq_landau_n_1)).
-
-(* constant 1856 *)
-definition l_e_st_eq_landau_n_rt_nt_morei ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt xt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt yt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt)) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt)) (l_e_st_eq_landau_n_rt_nt_ii5_t32 xt yt m) : l_e_st_eq_landau_n_rt_nt_more xt yt).
-
-(* constant 1857 *)
-definition l_e_st_eq_landau_n_rt_nt_less ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) : Prop).
-
-(* constant 1858 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t33 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λl:l_e_st_eq_landau_n_rt_nt_less xt yt.(l_e_st_eq_landau_n_rt_lesse (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt xt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt yt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt)) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt)) l : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt xt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt yt) l_e_st_eq_landau_n_1)).
-
-(* constant 1859 *)
-definition l_e_st_eq_landau_n_rt_nt_lesse ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λl:l_e_st_eq_landau_n_rt_nt_less xt yt.(l_e_st_eq_landau_n_satz111c (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_ii5_t33 xt yt l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)).
-
-(* constant 1860 *)
-definition l_e_st_eq_landau_n_rt_nt_ii5_t34 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).(l_e_st_eq_landau_n_satz111f (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) l : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt xt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt yt) l_e_st_eq_landau_n_1)).
-
-(* constant 1861 *)
-definition l_e_st_eq_landau_n_rt_nt_lessi ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).(l_e_st_eq_landau_n_rt_lessi (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt xt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_nt_nofnt yt) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt)) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt)) (l_e_st_eq_landau_n_rt_nt_ii5_t34 xt yt l) : l_e_st_eq_landau_n_rt_nt_less xt yt).
-
-(* constant 1862 *)
-definition l_e_st_eq_landau_n_rt_nt_moreis ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) : Prop).
-
-(* constant 1863 *)
-definition l_e_st_eq_landau_n_rt_nt_moreise ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_rt_nt_moreis xt yt.(l_or_th9 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) m (λu:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt).l_e_st_eq_landau_n_rt_nt_moree xt yt u) (λu:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt).l_e_st_eq_landau_n_rt_isrten (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt) u) : l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)).
-
-(* constant 1864 *)
-definition l_e_st_eq_landau_n_rt_nt_moreisi ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).(l_or_th9 (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) m (λu:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).l_e_st_eq_landau_n_rt_nt_morei xt yt u) (λu:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).l_e_st_eq_landau_n_rt_isrtin (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt) u) : l_e_st_eq_landau_n_rt_nt_moreis xt yt).
-
-(* constant 1865 *)
-definition l_e_st_eq_landau_n_rt_nt_lessis ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_lessis (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) : Prop).
-
-(* constant 1866 *)
-definition l_e_st_eq_landau_n_rt_nt_lessise ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λl:l_e_st_eq_landau_n_rt_nt_lessis xt yt.(l_or_th9 (l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) l (λu:l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt).l_e_st_eq_landau_n_rt_nt_lesse xt yt u) (λu:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt).l_e_st_eq_landau_n_rt_isrten (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt) u) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)).
-
-(* constant 1867 *)
-definition l_e_st_eq_landau_n_rt_nt_lessisi ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).(l_or_th9 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt)) (l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt)) l (λu:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).l_e_st_eq_landau_n_rt_nt_lessi xt yt u) (λu:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt).l_e_st_eq_landau_n_rt_isrtin (l_e_st_eq_landau_n_rt_nt_rtofnt xt) (l_e_st_eq_landau_n_rt_nt_natrti xt) (l_e_st_eq_landau_n_rt_nt_rtofnt yt) (l_e_st_eq_landau_n_rt_nt_natrti yt) u) : l_e_st_eq_landau_n_rt_nt_lessis xt yt).
-
-(* constant 1868 *)
-definition l_e_st_eq_landau_n_rt_nt_515_t1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.λl:l_e_st_eq_landau_n_rt_nt_less xt yt.λk:l_e_st_eq_landau_n_rt_nt_less yt zt.(l_e_st_eq_landau_n_satz15 (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt) (l_e_st_eq_landau_n_rt_nt_lesse xt yt l) (l_e_st_eq_landau_n_rt_nt_lesse yt zt k) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt zt)).
-
-(* constant 1869 *)
-definition l_e_st_eq_landau_n_rt_nt_satz15 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.λl:l_e_st_eq_landau_n_rt_nt_less xt yt.λk:l_e_st_eq_landau_n_rt_nt_less yt zt.(l_e_st_eq_landau_n_rt_nt_lessi xt zt (l_e_st_eq_landau_n_rt_nt_515_t1 xt yt zt l k) : l_e_st_eq_landau_n_rt_nt_less xt zt).
-
-(* constant 1870 *)
-definition l_e_st_eq_landau_n_rt_nt_521_t1 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.λut:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_rt_nt_more xt yt.λn:l_e_st_eq_landau_n_rt_nt_more zt ut.(l_e_st_eq_landau_n_satz21 (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt zt) (l_e_st_eq_landau_n_rt_nt_nofnt ut) (l_e_st_eq_landau_n_rt_nt_moree xt yt m) (l_e_st_eq_landau_n_rt_nt_moree zt ut n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt ut))).
-
-(* constant 1871 *)
-definition l_e_st_eq_landau_n_rt_nt_521_t2 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.λut:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_rt_nt_more xt yt.λn:l_e_st_eq_landau_n_rt_nt_more zt ut.(l_e_st_eq_landau_n_ismore12 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt xt) (l_e_st_eq_landau_n_rt_nt_nofnt zt)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt zt)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_nt_nofnt yt) (l_e_st_eq_landau_n_rt_nt_nofnt ut)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt ut)) (l_e_st_eq_landau_n_rt_nt_ispln xt zt) (l_e_st_eq_landau_n_rt_nt_ispln yt ut) (l_e_st_eq_landau_n_rt_nt_521_t1 xt yt zt ut m n) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl xt zt)) (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_pl yt ut))).
-
-(* constant 1872 *)
-definition l_e_st_eq_landau_n_rt_nt_satz21 ≝ λxt:l_e_st_eq_landau_n_rt_nt_natt.λyt:l_e_st_eq_landau_n_rt_nt_natt.λzt:l_e_st_eq_landau_n_rt_nt_natt.λut:l_e_st_eq_landau_n_rt_nt_natt.λm:l_e_st_eq_landau_n_rt_nt_more xt yt.λn:l_e_st_eq_landau_n_rt_nt_more zt ut.(l_e_st_eq_landau_n_rt_nt_morei (l_e_st_eq_landau_n_rt_nt_pl xt zt) (l_e_st_eq_landau_n_rt_nt_pl yt ut) (l_e_st_eq_landau_n_rt_nt_521_t2 xt yt zt ut m n) : l_e_st_eq_landau_n_rt_nt_more (l_e_st_eq_landau_n_rt_nt_pl xt zt) (l_e_st_eq_landau_n_rt_nt_pl yt ut)).
-
-(* constant 1873 *)
-definition l_e_st_eq_landau_n_rt_nt_lb ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λn:l_e_st_eq_landau_n_rt_nt_natt.(l_e_st_eq_landau_n_rt_nt_all (λx:l_e_st_eq_landau_n_rt_nt_natt.l_imp (p x) (l_e_st_eq_landau_n_rt_nt_lessis n x)) : Prop).
-
-(* constant 1874 *)
-definition l_e_st_eq_landau_n_rt_nt_min ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λn:l_e_st_eq_landau_n_rt_nt_natt.(l_and (l_e_st_eq_landau_n_rt_nt_lb p n) (p n) : Prop).
-
-(* constant 1875 *)
-definition l_e_st_eq_landau_n_rt_nt_527_q ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.(λx:l_e_st_eq_landau_n_nat.p (l_e_st_eq_landau_n_rt_nt_ntofn x) : ∀x:l_e_st_eq_landau_n_nat.Prop).
-
-(* constant 1876 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t1 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λn:l_e_st_eq_landau_n_rt_nt_natt.λnp:p n.(l_e_isp l_e_st_eq_landau_n_rt_nt_natt p n (l_e_st_eq_landau_n_rt_nt_ntofn (l_e_st_eq_landau_n_rt_nt_nofnt n)) np (l_e_st_eq_landau_n_rt_nt_isntn1 n) : l_e_st_eq_landau_n_rt_nt_527_q p s (l_e_st_eq_landau_n_rt_nt_nofnt n)).
-
-(* constant 1877 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t2 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λn:l_e_st_eq_landau_n_rt_nt_natt.λnp:p n.(l_somei l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_nt_527_q p s) (l_e_st_eq_landau_n_rt_nt_nofnt n) (l_e_st_eq_landau_n_rt_nt_527_t1 p s n np) : l_e_st_eq_landau_n_some (l_e_st_eq_landau_n_rt_nt_527_q p s)).
-
-(* constant 1878 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t3 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.(l_someapp l_e_st_eq_landau_n_rt_nt_natt p s (l_e_st_eq_landau_n_some (l_e_st_eq_landau_n_rt_nt_527_q p s)) (λu:l_e_st_eq_landau_n_rt_nt_natt.λv:p u.l_e_st_eq_landau_n_rt_nt_527_t2 p s u v) : l_e_st_eq_landau_n_some (l_e_st_eq_landau_n_rt_nt_527_q p s)).
-
-(* constant 1879 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t4 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.(l_e_st_eq_landau_n_satz27 (l_e_st_eq_landau_n_rt_nt_527_q p s) (l_e_st_eq_landau_n_rt_nt_527_t3 p s) : l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) x)).
-
-(* constant 1880 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t5 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.(l_ande1 (l_e_st_eq_landau_n_lb (l_e_st_eq_landau_n_rt_nt_527_q p s) m) (l_e_st_eq_landau_n_rt_nt_527_q p s m) mqm : l_e_st_eq_landau_n_lb (l_e_st_eq_landau_n_rt_nt_527_q p s) m).
-
-(* constant 1881 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t6 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.λn:l_e_st_eq_landau_n_nat.λnq:l_e_st_eq_landau_n_rt_nt_527_q p s n.(l_mp (l_e_st_eq_landau_n_rt_nt_527_q p s n) (l_e_st_eq_landau_n_lessis m n) nq (l_e_st_eq_landau_n_rt_nt_527_t5 p s m mqm n) : l_e_st_eq_landau_n_lessis m n).
-
-(* constant 1882 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t7 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.λn:l_e_st_eq_landau_n_rt_nt_natt.λnp:p n.(l_e_st_eq_landau_n_rt_nt_527_t6 p s m mqm (l_e_st_eq_landau_n_rt_nt_nofnt n) (l_e_st_eq_landau_n_rt_nt_527_t1 p s n np) : l_e_st_eq_landau_n_lessis m (l_e_st_eq_landau_n_rt_nt_nofnt n)).
-
-(* constant 1883 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t8 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.λn:l_e_st_eq_landau_n_rt_nt_natt.λnp:p n.(l_e_st_eq_landau_n_islessis1 m (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn m)) (l_e_st_eq_landau_n_rt_nt_nofnt n) (l_e_st_eq_landau_n_rt_nt_isnnt1 m) (l_e_st_eq_landau_n_rt_nt_527_t7 p s m mqm n np) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_nt_nofnt (l_e_st_eq_landau_n_rt_nt_ntofn m)) (l_e_st_eq_landau_n_rt_nt_nofnt n)).
-
-(* constant 1884 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t9 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.λn:l_e_st_eq_landau_n_rt_nt_natt.λnp:p n.(l_e_st_eq_landau_n_rt_nt_lessisi (l_e_st_eq_landau_n_rt_nt_ntofn m) n (l_e_st_eq_landau_n_rt_nt_527_t8 p s m mqm n np) : l_e_st_eq_landau_n_rt_nt_lessis (l_e_st_eq_landau_n_rt_nt_ntofn m) n).
-
-(* constant 1885 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t10 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.λn:l_e_st_eq_landau_n_rt_nt_natt.(λu:p n.l_e_st_eq_landau_n_rt_nt_527_t9 p s m mqm n u : l_imp (p n) (l_e_st_eq_landau_n_rt_nt_lessis (l_e_st_eq_landau_n_rt_nt_ntofn m) n)).
-
-(* constant 1886 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t11 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.(λx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_527_t10 p s m mqm x : l_e_st_eq_landau_n_rt_nt_lb p (l_e_st_eq_landau_n_rt_nt_ntofn m)).
-
-(* constant 1887 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t12 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.(l_ande2 (l_e_st_eq_landau_n_lb (l_e_st_eq_landau_n_rt_nt_527_q p s) m) (l_e_st_eq_landau_n_rt_nt_527_q p s m) mqm : p (l_e_st_eq_landau_n_rt_nt_ntofn m)).
-
-(* constant 1888 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t13 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.(l_andi (l_e_st_eq_landau_n_rt_nt_lb p (l_e_st_eq_landau_n_rt_nt_ntofn m)) (p (l_e_st_eq_landau_n_rt_nt_ntofn m)) (l_e_st_eq_landau_n_rt_nt_527_t11 p s m mqm) (l_e_st_eq_landau_n_rt_nt_527_t12 p s m mqm) : l_e_st_eq_landau_n_rt_nt_min p (l_e_st_eq_landau_n_rt_nt_ntofn m)).
-
-(* constant 1889 *)
-definition l_e_st_eq_landau_n_rt_nt_527_t14 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.λm:l_e_st_eq_landau_n_nat.λmqm:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) m.(l_somei l_e_st_eq_landau_n_rt_nt_natt (λx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_min p x) (l_e_st_eq_landau_n_rt_nt_ntofn m) (l_e_st_eq_landau_n_rt_nt_527_t13 p s m mqm) : l_e_st_eq_landau_n_rt_nt_some (λx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_min p x)).
-
-(* constant 1890 *)
-definition l_e_st_eq_landau_n_rt_nt_satz27 ≝ λp:∀x:l_e_st_eq_landau_n_rt_nt_natt.Prop.λs:l_e_st_eq_landau_n_rt_nt_some p.(l_someapp l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) x) (l_e_st_eq_landau_n_rt_nt_527_t4 p s) (l_e_st_eq_landau_n_rt_nt_some (λx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_min p x)) (λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_min (l_e_st_eq_landau_n_rt_nt_527_q p s) x.l_e_st_eq_landau_n_rt_nt_527_t14 p s x y) : l_e_st_eq_landau_n_rt_nt_some (λx:l_e_st_eq_landau_n_rt_nt_natt.l_e_st_eq_landau_n_rt_nt_min p x)).
-
-(* constant 1891 *)
-definition l_e_st_eq_landau_n_rt_1rt ≝ (l_e_st_eq_landau_n_rt_rtofn l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1892 *)
-definition l_e_st_eq_landau_n_rt_ii5_t35 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den x) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) x (l_e_st_eq_landau_n_tfeq1a x l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_eqnd (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x) (l_e_st_eq_landau_n_satz28a (l_e_st_eq_landau_n_num x)) (l_e_st_eq_landau_n_satz28a (l_e_st_eq_landau_n_den x))) (l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) x (l_e_st_eq_landau_n_fris x)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1)) x).
-
-(* constant 1893 *)
-definition l_e_st_eq_landau_n_rt_ii5_t36 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt) x0 (l_e_st_eq_landau_n_tf x (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1)) x (l_e_st_eq_landau_n_rt_tict x0 l_e_st_eq_landau_n_rt_1rt x (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1) xix0 (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1))) xix0 (l_e_st_eq_landau_n_rt_ii5_t35 x0 x xix0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt) x0).
-
-(* constant 1894 *)
-definition l_e_st_eq_landau_n_rt_example1a ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ratapp1 x0 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt) x0) (λx:l_e_st_eq_landau_n_frac.λxi:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).l_e_st_eq_landau_n_rt_ii5_t36 x0 x xi) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt) x0).
-
-(* constant 1895 *)
-definition l_e_st_eq_landau_n_rt_example1b ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt) x0 (l_e_st_eq_landau_n_rt_example1a x0) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt)).
-
-(* constant 1896 *)
-definition l_e_st_eq_landau_n_rt_example1c ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt) x0 (l_e_st_eq_landau_n_rt_comts l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_example1a x0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x0) x0).
-
-(* constant 1897 *)
-definition l_e_st_eq_landau_n_rt_example1d ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x0) x0 (l_e_st_eq_landau_n_rt_example1c x0) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x0)).
-
-(* constant 1898 *)
-definition l_e_st_eq_landau_n_rt_5114_t1 ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_tr3eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_den x) l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den x) (l_e_st_eq_landau_n_num x)) (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_den x))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_den x))) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_tfeq2a x (l_e_st_eq_landau_n_den x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_eqn (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_den x) (l_e_st_eq_landau_n_num x)) (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_den x)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_den x) (l_e_st_eq_landau_n_num x))) (l_e_st_eq_landau_n_satz40c (l_e_st_eq_landau_n_num x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_den x)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_den x) l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) l_e_st_eq_landau_n_1)).
-
-(* constant 1899 *)
-definition l_e_st_eq_landau_n_rt_satz114 ≝ λx:l_e_st_eq_landau_n_frac.(l_e_st_eq_landau_n_rt_isi (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_den x)) (l_e_st_eq_landau_n_rt_ratof x)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_num x)) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_den x) l_e_st_eq_landau_n_1) x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_tict (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_den x)) (l_e_st_eq_landau_n_rt_ratof x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_den x) l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_den x) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclass x)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_5114_t1 x) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_den x)) (l_e_st_eq_landau_n_rt_ratof x)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_num x))).
-
-(* constant 1900 *)
-definition l_e_st_eq_landau_n_rt_satz114a ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x2) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_rt_rtofn x1) (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_rtofn x2) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_rt_isnert x2 (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_isden x1 x2))) (l_e_st_eq_landau_n_rt_satz114 (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_rt_isnert (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr x1 x2)) x1 (l_e_st_eq_landau_n_numis x1 x2)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x2) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x1 x2))) (l_e_st_eq_landau_n_rt_rtofn x1)).
-
-(* constant 1901 *)
-definition l_e_st_eq_landau_n_rt_ov ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_ind l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0) (l_e_st_eq_landau_n_rt_satz110 x0 y0) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1902 *)
-definition l_e_st_eq_landau_n_rt_satz110c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_oneax l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 t) x0) (l_e_st_eq_landau_n_rt_satz110 x0 y0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov x0 y0)) x0).
-
-(* constant 1903 *)
-definition l_e_st_eq_landau_n_rt_satz110d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov x0 y0)) x0 (l_e_st_eq_landau_n_rt_satz110c x0 y0) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov x0 y0))).
-
-(* constant 1904 *)
-definition l_e_st_eq_landau_n_rt_satz110e ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov x0 y0) y0) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov x0 y0)) x0 (l_e_st_eq_landau_n_rt_comts (l_e_st_eq_landau_n_rt_ov x0 y0) y0) (l_e_st_eq_landau_n_rt_satz110c x0 y0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov x0 y0) y0) x0).
-
-(* constant 1905 *)
-definition l_e_st_eq_landau_n_rt_satz110f ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov x0 y0) y0) x0 (l_e_st_eq_landau_n_rt_satz110e x0 y0) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov x0 y0) y0)).
-
-(* constant 1906 *)
-definition l_e_st_eq_landau_n_rt_satz110g ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λv0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 v0) x0.(l_e_st_eq_landau_n_rt_satz110b x0 y0 v0 (l_e_st_eq_landau_n_rt_ov x0 y0) i (l_e_st_eq_landau_n_rt_satz110c x0 y0) : l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ov x0 y0)).
-
-(* constant 1907 *)
-definition l_e_st_eq_landau_n_rt_satz114b ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_satz110b (l_e_st_eq_landau_n_rt_rtofn x1) (l_e_st_eq_landau_n_rt_rtofn x2) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn x1) (l_e_st_eq_landau_n_rt_rtofn x2)) (l_e_st_eq_landau_n_rt_satz114a x1 x2) (l_e_st_eq_landau_n_rt_satz110c (l_e_st_eq_landau_n_rt_rtofn x1) (l_e_st_eq_landau_n_rt_rtofn x2)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn x1) (l_e_st_eq_landau_n_rt_rtofn x2))).
-
-(* constant 1908 *)
-definition l_e_st_eq_landau_n_rt_satz114c ≝ λx1:l_e_st_eq_landau_n_nat.λx2:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x1 x2)) (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn x1) (l_e_st_eq_landau_n_rt_rtofn x2)) (l_e_st_eq_landau_n_rt_satz114b x1 x2) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn x1) (l_e_st_eq_landau_n_rt_rtofn x2)) (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr x1 x2))).
-
-(* constant 1909 *)
-definition l_e_st_eq_landau_n_rt_5115_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz89 (l_e_st_eq_landau_n_rt_ov y0 x0) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t (l_e_st_eq_landau_n_rt_ov y0 x0))).
-
-(* constant 1910 *)
-definition l_e_st_eq_landau_n_rt_5115_z ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_num u : l_e_st_eq_landau_n_nat).
-
-(* constant 1911 *)
-definition l_e_st_eq_landau_n_rt_5115_v ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_den u : l_e_st_eq_landau_n_nat).
-
-(* constant 1912 *)
-definition l_e_st_eq_landau_n_rt_5115_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_ismore1 u0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_ov y0 x0) (l_e_tris l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_isi u0 (l_e_st_eq_landau_n_rt_ratof (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) u (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) uiu0 (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_refeq1 u (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_isfr u))) (l_e_st_eq_landau_n_rt_satz114b (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) m : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_ov y0 x0)).
-
-(* constant 1913 *)
-definition l_e_st_eq_landau_n_rt_5115_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_moreisi (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1)) (l_or_th9 (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_satz24 (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) (λt:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_satz111d (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1 t) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_satz111e (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0) l_e_st_eq_landau_n_1 t)) : l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 1914 *)
-definition l_e_st_eq_landau_n_rt_5115_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_comts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ists2 (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) x0 (l_e_st_eq_landau_n_rt_satz110f (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) (l_e_st_eq_landau_n_rt_assts2 x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))).
-
-(* constant 1915 *)
-definition l_e_st_eq_landau_n_rt_5115_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).λn:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt.(l_e_st_eq_landau_n_rt_ismore1 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt) (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_5115_t4 x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_satz105d (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) n) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt)).
-
-(* constant 1916 *)
-definition l_e_st_eq_landau_n_rt_5115_t6 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).λn:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt.(l_e_st_eq_landau_n_rt_moreisi1 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt) (l_e_st_eq_landau_n_rt_5115_t5 x0 y0 u0 m u uiu0 n) : l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt)).
-
-(* constant 1917 *)
-definition l_e_st_eq_landau_n_rt_5115_t7 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt.(l_e_st_eq_landau_n_rt_moreisi2 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt) (l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt) (l_e_st_eq_landau_n_rt_5115_t4 x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_ists2 (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) i)) : l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt)).
-
-(* constant 1918 *)
-definition l_e_st_eq_landau_n_rt_5115_t8 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_orapp (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt) (l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt)) (l_e_st_eq_landau_n_rt_5115_t3 x0 y0 u0 m u uiu0) (λt:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt.l_e_st_eq_landau_n_rt_5115_t6 x0 y0 u0 m u uiu0 t) (λt:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)) l_e_st_eq_landau_n_rt_1rt.l_e_st_eq_landau_n_rt_5115_t7 x0 y0 u0 m u uiu0 t) : l_e_st_eq_landau_n_rt_moreis (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt)).
-
-(* constant 1919 *)
-definition l_e_st_eq_landau_n_rt_5115_t9 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_ismore12 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov y0 x0)) y0 (l_e_st_eq_landau_n_rt_example1b (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))))) (l_e_st_eq_landau_n_rt_satz110c y0 x0) (l_e_st_eq_landau_n_rt_satz105d (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_ov y0 x0) x0 (l_e_st_eq_landau_n_rt_5115_t2 x0 y0 u0 m u uiu0)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt) y0).
-
-(* constant 1920 *)
-definition l_e_st_eq_landau_n_rt_5115_t10 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_e_st_eq_landau_n_rt_satz87c (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_v x0 y0 u0 m u uiu0)))) l_e_st_eq_landau_n_rt_1rt) y0 (l_e_st_eq_landau_n_rt_5115_t8 x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_5115_t9 x0 y0 u0 m u uiu0) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) y0).
-
-(* constant 1921 *)
-definition l_e_st_eq_landau_n_rt_5115_t11 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn t) x0) y0) (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0) (l_e_st_eq_landau_n_rt_5115_t10 x0 y0 u0 m u uiu0) : l_e_st_eq_landau_n_some (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn t) x0) y0)).
-
-(* constant 1922 *)
-definition l_e_st_eq_landau_n_rt_5115_t12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).(l_e_st_eq_landau_n_rt_ratapp1 u0 (l_e_st_eq_landau_n_some (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn t) x0) y0)) (λu:l_e_st_eq_landau_n_frac.λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_5115_t11 x0 y0 u0 m u ui) : l_e_st_eq_landau_n_some (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn t) x0) y0)).
-
-(* constant 1923 *)
-definition l_e_st_eq_landau_n_rt_satz115 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_someapp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t (l_e_st_eq_landau_n_rt_ov y0 x0)) (l_e_st_eq_landau_n_rt_5115_t1 x0 y0) (l_e_st_eq_landau_n_some (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn t) x0) y0)) (λt:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_more t (l_e_st_eq_landau_n_rt_ov y0 x0).l_e_st_eq_landau_n_rt_5115_t12 x0 y0 t u) : l_e_st_eq_landau_n_some (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn t) x0) y0)).
-
-(* constant 1924 *)
-definition l_e_st_eq_landau_n_rt_5115_t13 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_andi (l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) y0) (l_e_st_eq_landau_n_rt_natrti (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_5115_t10 x0 y0 u0 m u uiu0) : l_and (l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0))) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) x0) y0)).
-
-(* constant 1925 *)
-definition l_e_st_eq_landau_n_rt_5115_t14 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).λu:l_e_st_eq_landau_n_frac.λuiu0:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).(l_somei l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_natrt t) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts t x0) y0)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_5115_z x0 y0 u0 m u uiu0)) (l_e_st_eq_landau_n_rt_5115_t13 x0 y0 u0 m u uiu0) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_natrt t) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts t x0) y0))).
-
-(* constant 1926 *)
-definition l_e_st_eq_landau_n_rt_5115_t15 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more u0 (l_e_st_eq_landau_n_rt_ov y0 x0).(l_e_st_eq_landau_n_rt_ratapp1 u0 (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_natrt t) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts t x0) y0))) (λu:l_e_st_eq_landau_n_frac.λui:l_e_st_eq_landau_n_rt_inf u (l_e_st_eq_landau_n_rt_class u0).l_e_st_eq_landau_n_rt_5115_t14 x0 y0 u0 m u ui) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_natrt t) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts t x0) y0))).
-
-(* constant 1927 *)
-definition l_e_st_eq_landau_n_rt_satz115a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_someapp l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_more t (l_e_st_eq_landau_n_rt_ov y0 x0)) (l_e_st_eq_landau_n_rt_5115_t1 x0 y0) (l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_natrt t) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts t x0) y0))) (λt:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_more t (l_e_st_eq_landau_n_rt_ov y0 x0).l_e_st_eq_landau_n_rt_5115_t15 x0 y0 t u) : l_e_st_eq_landau_n_rt_some (λt:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_natrt t) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts t x0) y0))).
-
-(* constant 1928 *)
-definition l_e_st_eq_landau_n_rt_cutprop1a ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.(l_e_st_nonempty l_e_st_eq_landau_n_rt_rat s : Prop).
-
-(* constant 1929 *)
-definition l_e_st_eq_landau_n_rt_cutprop1b ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.(l_not (l_e_st_eq_landau_n_rt_all (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_in x s)) : Prop).
-
-(* constant 1930 *)
-definition l_e_st_eq_landau_n_rt_cutprop1 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.(l_and (l_e_st_eq_landau_n_rt_cutprop1a s) (l_e_st_eq_landau_n_rt_cutprop1b s) : Prop).
-
-(* constant 1931 *)
-definition l_e_st_eq_landau_n_rt_cutprop2a ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_all (λx:l_e_st_eq_landau_n_rt_rat.l_imp (l_not (l_e_st_eq_landau_n_rt_in x s)) (l_e_st_eq_landau_n_rt_less x0 x)) : Prop).
-
-(* constant 1932 *)
-definition l_e_st_eq_landau_n_rt_cutprop2 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_all (λx:l_e_st_eq_landau_n_rt_rat.l_imp (l_e_st_eq_landau_n_rt_in x s) (l_e_st_eq_landau_n_rt_cutprop2a s x)) : Prop).
-
-(* constant 1933 *)
-definition l_e_st_eq_landau_n_rt_iii1_ubprop ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_imp (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_moreis x0 y0) : Prop).
-
-(* constant 1934 *)
-definition l_e_st_eq_landau_n_rt_ub ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_all (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_iii1_ubprop s x0 x) : Prop).
-
-(* constant 1935 *)
-definition l_e_st_eq_landau_n_rt_max ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.(l_and (l_e_st_eq_landau_n_rt_ub s x0) (l_e_st_eq_landau_n_rt_in x0 s) : Prop).
-
-(* constant 1936 *)
-definition l_e_st_eq_landau_n_rt_cutprop3 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.(l_not (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_max s x)) : Prop).
-
-(* constant 1937 *)
-definition l_e_st_eq_landau_n_rt_cutprop ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.(l_and3 (l_e_st_eq_landau_n_rt_cutprop1 s) (l_e_st_eq_landau_n_rt_cutprop2 s) (l_e_st_eq_landau_n_rt_cutprop3 s) : Prop).
-
-(* constant 1938 *)
-definition l_e_st_eq_landau_n_rt_iii1_lbprop ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_imp (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_lessis x0 y0) : Prop).
-
-(* constant 1939 *)
-definition l_e_st_eq_landau_n_rt_lb ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_all (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_iii1_lbprop s x0 x) : Prop).
-
-(* constant 1940 *)
-definition l_e_st_eq_landau_n_rt_min ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.(l_and (l_e_st_eq_landau_n_rt_lb s x0) (l_e_st_eq_landau_n_rt_in x0 s) : Prop).
-
-(* constant 1941 *)
-definition l_e_st_eq_landau_n_rt_cut ≝ (l_e_ot (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) : Type[0]).
-
-(* constant 1942 *)
-definition l_e_st_eq_landau_n_rt_lcl ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_in (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) ksi : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 1943 *)
-definition l_e_st_eq_landau_n_rt_lrt ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_lcl ksi) : Prop).
-
-(* constant 1944 *)
-definition l_e_st_eq_landau_n_rt_urt ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.(l_not (l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_lcl ksi)) : Prop).
-
-(* constant 1945 *)
-definition l_e_st_eq_landau_n_rt_clcl ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_inp (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) ksi : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_lcl ksi)).
-
-(* constant 1946 *)
-definition l_e_st_eq_landau_n_rt_clcl1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_and3e1 (l_e_st_eq_landau_n_rt_cutprop1 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_cutprop2 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_cutprop3 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_clcl ksi) : l_e_st_eq_landau_n_rt_cutprop1 (l_e_st_eq_landau_n_rt_lcl ksi)).
-
-(* constant 1947 *)
-definition l_e_st_eq_landau_n_rt_clcl2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_and3e2 (l_e_st_eq_landau_n_rt_cutprop1 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_cutprop2 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_cutprop3 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_clcl ksi) : l_e_st_eq_landau_n_rt_cutprop2 (l_e_st_eq_landau_n_rt_lcl ksi)).
-
-(* constant 1948 *)
-definition l_e_st_eq_landau_n_rt_clcl3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_and3e3 (l_e_st_eq_landau_n_rt_cutprop1 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_cutprop2 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_cutprop3 (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_clcl ksi) : l_e_st_eq_landau_n_rt_cutprop3 (l_e_st_eq_landau_n_rt_lcl ksi)).
-
-(* constant 1949 *)
-definition l_e_st_eq_landau_n_rt_clcl1a ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_ande1 (l_e_st_eq_landau_n_rt_cutprop1a (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_cutprop1b (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_clcl1 ksi) : l_e_st_eq_landau_n_rt_cutprop1a (l_e_st_eq_landau_n_rt_lcl ksi)).
-
-(* constant 1950 *)
-definition l_e_st_eq_landau_n_rt_clcl1b ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_ande2 (l_e_st_eq_landau_n_rt_cutprop1a (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_cutprop1b (l_e_st_eq_landau_n_rt_lcl ksi)) (l_e_st_eq_landau_n_rt_clcl1 ksi) : l_e_st_eq_landau_n_rt_cutprop1b (l_e_st_eq_landau_n_rt_lcl ksi)).
-
-(* constant 1951 *)
-definition l_e_st_eq_landau_n_rt_cutapp1a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.p.(l_e_st_nonemptyapp l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_clcl1a ksi) p p1 : p).
-
-(* constant 1952 *)
-definition l_e_st_eq_landau_n_rt_iii1_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_some_th1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lrt ksi x) (l_e_st_eq_landau_n_rt_clcl1b ksi) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)).
-
-(* constant 1953 *)
-definition l_e_st_eq_landau_n_rt_cutapp1b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) (l_e_st_eq_landau_n_rt_iii1_t1 ksi) p p1 : p).
-
-(* constant 1954 *)
-definition l_e_st_eq_landau_n_rt_iii1_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_mp (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_cutprop2a (l_e_st_eq_landau_n_rt_lcl ksi) x0) lx (l_e_st_eq_landau_n_rt_clcl2 ksi x0) : l_e_st_eq_landau_n_rt_cutprop2a (l_e_st_eq_landau_n_rt_lcl ksi) x0).
-
-(* constant 1955 *)
-definition l_e_st_eq_landau_n_rt_cutapp2a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_mp (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_less x0 y0) uy (l_e_st_eq_landau_n_rt_iii1_t2 ksi x0 lx y0) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1956 *)
-definition l_e_st_eq_landau_n_rt_cutapp2b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_e_st_eq_landau_n_rt_satz83 x0 y0 (l_e_st_eq_landau_n_rt_cutapp2a ksi x0 lx y0 uy) : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 1957 *)
-definition l_e_st_eq_landau_n_rt_iii1_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_some_th4 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_max (l_e_st_eq_landau_n_rt_lcl ksi) x) (l_e_st_eq_landau_n_rt_clcl3 ksi) x0 : l_not (l_e_st_eq_landau_n_rt_max (l_e_st_eq_landau_n_rt_lcl ksi) x0)).
-
-(* constant 1958 *)
-definition l_e_st_eq_landau_n_rt_iii1_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_and_th4 (l_e_st_eq_landau_n_rt_ub (l_e_st_eq_landau_n_rt_lcl ksi) x0) (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_iii1_t3 ksi x0 lx) lx : l_not (l_e_st_eq_landau_n_rt_ub (l_e_st_eq_landau_n_rt_lcl ksi) x0)).
-
-(* constant 1959 *)
-definition l_e_st_eq_landau_n_rt_iii1_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_some_th1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_iii1_ubprop (l_e_st_eq_landau_n_rt_lcl ksi) x0 x) (l_e_st_eq_landau_n_rt_iii1_t4 ksi x0 lx) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_not (l_e_st_eq_landau_n_rt_iii1_ubprop (l_e_st_eq_landau_n_rt_lcl ksi) x0 x))).
-
-(* constant 1960 *)
-definition l_e_st_eq_landau_n_rt_iii1_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λp:Prop.λp1:∀y:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi y.∀u:l_e_st_eq_landau_n_rt_less x0 y.p.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_iii1_ubprop (l_e_st_eq_landau_n_rt_lcl ksi) x0 y0).(l_imp_th5 (l_e_st_eq_landau_n_rt_lrt ksi y0) (l_e_st_eq_landau_n_rt_moreis x0 y0) n : l_e_st_eq_landau_n_rt_lrt ksi y0).
-
-(* constant 1961 *)
-definition l_e_st_eq_landau_n_rt_iii1_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λp:Prop.λp1:∀y:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi y.∀u:l_e_st_eq_landau_n_rt_less x0 y.p.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_iii1_ubprop (l_e_st_eq_landau_n_rt_lcl ksi) x0 y0).(l_imp_th6 (l_e_st_eq_landau_n_rt_lrt ksi y0) (l_e_st_eq_landau_n_rt_moreis x0 y0) n : l_not (l_e_st_eq_landau_n_rt_moreis x0 y0)).
-
-(* constant 1962 *)
-definition l_e_st_eq_landau_n_rt_iii1_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λp:Prop.λp1:∀y:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi y.∀u:l_e_st_eq_landau_n_rt_less x0 y.p.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_iii1_ubprop (l_e_st_eq_landau_n_rt_lcl ksi) x0 y0).(l_e_st_eq_landau_n_rt_satz81j x0 y0 (l_e_st_eq_landau_n_rt_iii1_t7 ksi x0 lx p p1 y0 n) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1963 *)
-definition l_e_st_eq_landau_n_rt_iii1_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λp:Prop.λp1:∀y:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi y.∀u:l_e_st_eq_landau_n_rt_less x0 y.p.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_iii1_ubprop (l_e_st_eq_landau_n_rt_lcl ksi) x0 y0).(p1 y0 (l_e_st_eq_landau_n_rt_iii1_t6 ksi x0 lx p p1 y0 n) (l_e_st_eq_landau_n_rt_iii1_t8 ksi x0 lx p p1 y0 n) : p).
-
-(* constant 1964 *)
-definition l_e_st_eq_landau_n_rt_cutapp3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λp:Prop.λp1:∀y:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi y.∀u:l_e_st_eq_landau_n_rt_less x0 y.p.(l_someapp l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_not (l_e_st_eq_landau_n_rt_iii1_ubprop (l_e_st_eq_landau_n_rt_lcl ksi) x0 y)) (l_e_st_eq_landau_n_rt_iii1_t5 ksi x0 lx) p (λy:l_e_st_eq_landau_n_rt_rat.λt:l_not (l_e_st_eq_landau_n_rt_iii1_ubprop (l_e_st_eq_landau_n_rt_lcl ksi) x0 y).l_e_st_eq_landau_n_rt_iii1_t9 ksi x0 lx p p1 y t) : p).
-
-(* constant 1965 *)
-definition l_e_st_eq_landau_n_rt_iii1_t10 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).(l_andi (l_e_st_eq_landau_n_rt_cutprop1a s) (l_e_st_eq_landau_n_rt_cutprop1b s) (l_e_st_nonemptyi l_e_st_eq_landau_n_rt_rat s x0 i) (l_all_th1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_in x s) y0 n) : l_e_st_eq_landau_n_rt_cutprop1 s).
-
-(* constant 1966 *)
-definition l_e_st_eq_landau_n_rt_iii1_t11 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λn:∀x:l_e_st_eq_landau_n_rt_rat.l_not (l_e_st_eq_landau_n_rt_max s x).(l_some_th5 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_max s x) n : l_e_st_eq_landau_n_rt_cutprop3 s).
-
-(* constant 1967 *)
-definition l_e_st_eq_landau_n_rt_cut1 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).λl:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_not (l_e_st_eq_landau_n_rt_in y s).l_e_st_eq_landau_n_rt_less x y.λm:∀x:l_e_st_eq_landau_n_rt_rat.l_not (l_e_st_eq_landau_n_rt_max s x).(l_and3i (l_e_st_eq_landau_n_rt_cutprop1 s) (l_e_st_eq_landau_n_rt_cutprop2 s) (l_e_st_eq_landau_n_rt_cutprop3 s) (l_e_st_eq_landau_n_rt_iii1_t10 s x0 i y0 n) l (l_e_st_eq_landau_n_rt_iii1_t11 s m) : l_e_st_eq_landau_n_rt_cutprop s).
-
-(* constant 1968 *)
-definition l_e_st_eq_landau_n_rt_rp_is ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_is l_e_st_eq_landau_n_rt_cut ksi eta : Prop).
-
-(* constant 1969 *)
-definition l_e_st_eq_landau_n_rt_rp_nis ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_not (l_e_st_eq_landau_n_rt_rp_is ksi eta) : Prop).
-
-(* constant 1970 *)
-definition l_e_st_eq_landau_n_rt_rp_ise ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isini (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) ksi eta i : l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta)).
-
-(* constant 1971 *)
-definition l_e_st_eq_landau_n_rt_rp_ise1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_e_st_issete1 l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta) (l_e_st_eq_landau_n_rt_rp_ise ksi eta i) x0 lx : l_e_st_eq_landau_n_rt_lrt eta x0).
-
-(* constant 1972 *)
-definition l_e_st_eq_landau_n_rt_rp_isi ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta).(l_e_isine (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) ksi eta i : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 1973 *)
-definition l_e_st_eq_landau_n_rt_rp_isi1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_lrt eta x.λk:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt eta x.l_e_st_eq_landau_n_rt_lrt ksi x.(l_e_st_eq_landau_n_rt_rp_isi ksi eta (l_e_st_isseti l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta) l k) : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 1974 *)
-definition l_e_st_eq_landau_n_rt_rp_cutof ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λcs:l_e_st_eq_landau_n_rt_cutprop s.(l_e_out (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) s cs : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 1975 *)
-definition l_e_st_eq_landau_n_rt_rp_ine ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λcs:l_e_st_eq_landau_n_rt_cutprop s.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.(l_e_st_issete1 l_e_st_eq_landau_n_rt_rat s (l_e_st_eq_landau_n_rt_lcl (l_e_st_eq_landau_n_rt_rp_cutof s cs)) (l_e_isinout (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) s cs) x0 i : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_cutof s cs) x0).
-
-(* constant 1976 *)
-definition l_e_st_eq_landau_n_rt_rp_ini ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λcs:l_e_st_eq_landau_n_rt_cutprop s.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_cutof s cs) x0.(l_e_st_issete2 l_e_st_eq_landau_n_rt_rat s (l_e_st_eq_landau_n_rt_lcl (l_e_st_eq_landau_n_rt_rp_cutof s cs)) (l_e_isinout (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) s cs) x0 lx : l_e_st_eq_landau_n_rt_in x0 s).
-
-(* constant 1977 *)
-definition l_e_st_eq_landau_n_rt_rp_isi2 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λt:l_e_st_set l_e_st_eq_landau_n_rt_rat.λcs:l_e_st_eq_landau_n_rt_cutprop s.λct:l_e_st_eq_landau_n_rt_cutprop t.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_in x t.λj:∀x:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_in x t.l_e_st_eq_landau_n_rt_in x s.(l_e_isouti (l_e_st_set l_e_st_eq_landau_n_rt_rat) (λx:l_e_st_set l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_cutprop x) s cs t ct (l_e_st_isseti l_e_st_eq_landau_n_rt_rat s t i j) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_cutof s cs) (l_e_st_eq_landau_n_rt_rp_cutof t ct)).
-
-(* constant 1978 *)
-definition l_e_st_eq_landau_n_rt_rp_all ≝ λp:∀x:l_e_st_eq_landau_n_rt_cut.Prop.(l_all l_e_st_eq_landau_n_rt_cut p : Prop).
-
-(* constant 1979 *)
-definition l_e_st_eq_landau_n_rt_rp_some ≝ λp:∀x:l_e_st_eq_landau_n_rt_cut.Prop.(l_some l_e_st_eq_landau_n_rt_cut p : Prop).
-
-(* constant 1980 *)
-definition l_e_st_eq_landau_n_rt_rp_one ≝ λp:∀x:l_e_st_eq_landau_n_rt_cut.Prop.(l_e_one l_e_st_eq_landau_n_rt_cut p : Prop).
-
-(* constant 1981 *)
-definition l_e_st_eq_landau_n_rt_rp_satz116 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_refis l_e_st_eq_landau_n_rt_cut ksi : l_e_st_eq_landau_n_rt_rp_is ksi ksi).
-
-(* constant 1982 *)
-definition l_e_st_eq_landau_n_rt_rp_satz117 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_symis l_e_st_eq_landau_n_rt_cut ksi eta i : l_e_st_eq_landau_n_rt_rp_is eta ksi).
-
-(* constant 1983 *)
-definition l_e_st_eq_landau_n_rt_rp_satz118 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is eta zeta.(l_e_tris l_e_st_eq_landau_n_rt_cut ksi eta zeta i j : l_e_st_eq_landau_n_rt_rp_is ksi zeta).
-
-(* constant 1984 *)
-definition l_e_st_eq_landau_n_rt_rp_1119_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_ec3e23 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) m : l_not (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 1985 *)
-definition l_e_st_eq_landau_n_rt_rp_satz119 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more y0 x0.(l_imp_th3 (l_e_st_eq_landau_n_rt_lrt ksi y0) (l_e_st_eq_landau_n_rt_less y0 x0) (l_e_st_eq_landau_n_rt_rp_1119_t1 y0 x0 m) (λt:l_e_st_eq_landau_n_rt_lrt ksi y0.l_e_st_eq_landau_n_rt_cutapp2a ksi y0 t x0 ux) : l_e_st_eq_landau_n_rt_urt ksi y0).
-
-(* constant 1986 *)
-definition l_e_st_eq_landau_n_rt_rp_satz119a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_rp_satz119 ksi x0 ux y0 (l_e_st_eq_landau_n_rt_satz83 x0 y0 l) : l_e_st_eq_landau_n_rt_urt ksi y0).
-
-(* constant 1987 *)
-definition l_e_st_eq_landau_n_rt_rp_1120_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_ec3e32 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) l : l_not (l_e_st_eq_landau_n_rt_more x0 y0)).
-
-(* constant 1988 *)
-definition l_e_st_eq_landau_n_rt_rp_satz120 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_imp_th7 (l_e_st_eq_landau_n_rt_lrt ksi y0) (l_e_st_eq_landau_n_rt_more y0 x0) (l_e_st_eq_landau_n_rt_rp_1120_t1 y0 x0 l) (λt:l_e_st_eq_landau_n_rt_urt ksi y0.l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx y0 t) : l_e_st_eq_landau_n_rt_lrt ksi y0).
-
-(* constant 1989 *)
-definition l_e_st_eq_landau_n_rt_rp_satz120a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_rp_satz120 ksi x0 lx y0 (l_e_st_eq_landau_n_rt_satz82 x0 y0 m) : l_e_st_eq_landau_n_rt_lrt ksi y0).
-
-(* constant 1990 *)
-definition l_e_st_eq_landau_n_rt_iii1_t12 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.λx0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).(i x0 j y0 : ∀u:l_e_st_eq_landau_n_rt_less y0 x0.l_e_st_eq_landau_n_rt_in y0 s).
-
-(* constant 1991 *)
-definition l_e_st_eq_landau_n_rt_iii1_t13 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.λx0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).(l_imp_th3 (l_e_st_eq_landau_n_rt_less y0 x0) (l_e_st_eq_landau_n_rt_in y0 s) n (l_e_st_eq_landau_n_rt_iii1_t12 s i x0 j y0 n) : l_not (l_e_st_eq_landau_n_rt_less y0 x0)).
-
-(* constant 1992 *)
-definition l_e_st_eq_landau_n_rt_iii1_t14 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.λx0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).(l_e_st_eq_landau_n_rt_satz81f y0 x0 (l_e_st_eq_landau_n_rt_iii1_t13 s i x0 j y0 n) : l_e_st_eq_landau_n_rt_moreis y0 x0).
-
-(* constant 1993 *)
-definition l_e_st_eq_landau_n_rt_iii1_t15 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.λx0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).λk:l_e_st_eq_landau_n_rt_is y0 x0.(l_e_isp1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_in x s) x0 y0 j k : l_e_st_eq_landau_n_rt_in y0 s).
-
-(* constant 1994 *)
-definition l_e_st_eq_landau_n_rt_iii1_t16 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.λx0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).(l_imp_th3 (l_e_st_eq_landau_n_rt_is y0 x0) (l_e_st_eq_landau_n_rt_in y0 s) n (λt:l_e_st_eq_landau_n_rt_is y0 x0.l_e_st_eq_landau_n_rt_iii1_t15 s i x0 j y0 n t) : l_e_st_eq_landau_n_rt_nis y0 x0).
-
-(* constant 1995 *)
-definition l_e_st_eq_landau_n_rt_iii1_t17 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.λx0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).(l_ore1 (l_e_st_eq_landau_n_rt_more y0 x0) (l_e_st_eq_landau_n_rt_is y0 x0) (l_e_st_eq_landau_n_rt_iii1_t14 s i x0 j y0 n) (l_e_st_eq_landau_n_rt_iii1_t16 s i x0 j y0 n) : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 1996 *)
-definition l_e_st_eq_landau_n_rt_iii1_t18 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.λx0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).(l_e_st_eq_landau_n_rt_satz82 y0 x0 (l_e_st_eq_landau_n_rt_iii1_t17 s i x0 j y0 n) : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 1997 *)
-definition l_e_st_eq_landau_n_rt_iii1_t19 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λi:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.(λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x s.λy:l_e_st_eq_landau_n_rt_rat.λu:l_not (l_e_st_eq_landau_n_rt_in y s).l_e_st_eq_landau_n_rt_iii1_t18 s i x t y u : l_e_st_eq_landau_n_rt_cutprop2 s).
-
-(* constant 1998 *)
-definition l_e_st_eq_landau_n_rt_iii1_t20 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.(s1 x0 i : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x0))).
-
-(* constant 1999 *)
-definition l_e_st_eq_landau_n_rt_iii1_t21 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0).(l_ande1 (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0) a : l_e_st_eq_landau_n_rt_in y0 s).
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "grundlagen_2_1.ma".
-
-(* constant 2000 *)
-definition l_e_st_eq_landau_n_rt_iii1_t22 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0).(l_ande2 (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0) a : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 2001 *)
-definition l_e_st_eq_landau_n_rt_iii1_t23 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0).(l_e_st_eq_landau_n_rt_satz81g y0 x0 (l_e_st_eq_landau_n_rt_iii1_t22 s s1 x0 i y0 a) : l_not (l_e_st_eq_landau_n_rt_lessis y0 x0)).
-
-(* constant 2002 *)
-definition l_e_st_eq_landau_n_rt_iii1_t24 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0).(l_imp_th3 (l_e_st_eq_landau_n_rt_moreis x0 y0) (l_e_st_eq_landau_n_rt_lessis y0 x0) (l_e_st_eq_landau_n_rt_iii1_t23 s s1 x0 i y0 a) (λt:l_e_st_eq_landau_n_rt_moreis x0 y0.l_e_st_eq_landau_n_rt_satz84 x0 y0 t) : l_not (l_e_st_eq_landau_n_rt_moreis x0 y0)).
-
-(* constant 2003 *)
-definition l_e_st_eq_landau_n_rt_iii1_t25 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0).(l_imp_th4 (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_moreis x0 y0) (l_e_st_eq_landau_n_rt_iii1_t21 s s1 x0 i y0 a) (l_e_st_eq_landau_n_rt_iii1_t24 s s1 x0 i y0 a) : l_not (l_e_st_eq_landau_n_rt_iii1_ubprop s x0 y0)).
-
-(* constant 2004 *)
-definition l_e_st_eq_landau_n_rt_iii1_t26 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0).(l_all_th1 l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_iii1_ubprop s x0 y) y0 (l_e_st_eq_landau_n_rt_iii1_t25 s s1 x0 i y0 a) : l_not (l_e_st_eq_landau_n_rt_ub s x0)).
-
-(* constant 2005 *)
-definition l_e_st_eq_landau_n_rt_iii1_t27 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_in y0 s) (l_e_st_eq_landau_n_rt_more y0 x0).(l_and_th1 (l_e_st_eq_landau_n_rt_ub s x0) (l_e_st_eq_landau_n_rt_in x0 s) (l_e_st_eq_landau_n_rt_iii1_t26 s s1 x0 i y0 a) : l_not (l_e_st_eq_landau_n_rt_max s x0)).
-
-(* constant 2006 *)
-definition l_e_st_eq_landau_n_rt_iii1_t28 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.(l_someapp l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x0)) (l_e_st_eq_landau_n_rt_iii1_t20 s s1 x0 i) (l_not (l_e_st_eq_landau_n_rt_max s x0)) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x0).l_e_st_eq_landau_n_rt_iii1_t27 s s1 x0 i y t) : l_not (l_e_st_eq_landau_n_rt_max s x0)).
-
-(* constant 2007 *)
-definition l_e_st_eq_landau_n_rt_iii1_t29 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in x0 s).(l_and_th2 (l_e_st_eq_landau_n_rt_ub s x0) (l_e_st_eq_landau_n_rt_in x0 s) n : l_not (l_e_st_eq_landau_n_rt_max s x0)).
-
-(* constant 2008 *)
-definition l_e_st_eq_landau_n_rt_iii1_t30 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).λx0:l_e_st_eq_landau_n_rt_rat.(l_imp_th1 (l_e_st_eq_landau_n_rt_in x0 s) (l_not (l_e_st_eq_landau_n_rt_max s x0)) (λu:l_e_st_eq_landau_n_rt_in x0 s.l_e_st_eq_landau_n_rt_iii1_t28 s s1 x0 u) (λu:l_not (l_e_st_eq_landau_n_rt_in x0 s).l_e_st_eq_landau_n_rt_iii1_t29 s s1 x0 u) : l_not (l_e_st_eq_landau_n_rt_max s x0)).
-
-(* constant 2009 *)
-definition l_e_st_eq_landau_n_rt_iii1_t31 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).(l_e_st_eq_landau_n_rt_iii1_t11 s (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_iii1_t30 s s1 x) : l_e_st_eq_landau_n_rt_cutprop3 s).
-
-(* constant 2010 *)
-definition l_e_st_eq_landau_n_rt_cut2 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 s.λy0:l_e_st_eq_landau_n_rt_rat.λn:l_not (l_e_st_eq_landau_n_rt_in y0 s).λj:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_in y s.λs1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_in x s.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y s) (l_e_st_eq_landau_n_rt_more y x)).(l_and3i (l_e_st_eq_landau_n_rt_cutprop1 s) (l_e_st_eq_landau_n_rt_cutprop2 s) (l_e_st_eq_landau_n_rt_cutprop3 s) (l_e_st_eq_landau_n_rt_iii1_t10 s x0 i y0 n) (l_e_st_eq_landau_n_rt_iii1_t19 s j) (l_e_st_eq_landau_n_rt_iii1_t31 s s1) : l_e_st_eq_landau_n_rt_cutprop s).
-
-(* constant 2011 *)
-definition l_e_st_eq_landau_n_rt_rp_more ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_lrt ksi x) (l_e_st_eq_landau_n_rt_urt eta x)) : Prop).
-
-(* constant 2012 *)
-definition l_e_st_eq_landau_n_rt_rp_iii2_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀u:l_e_st_eq_landau_n_rt_urt eta x.p.λx0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta x0).(l_ande1 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta x0) a : l_e_st_eq_landau_n_rt_lrt ksi x0).
-
-(* constant 2013 *)
-definition l_e_st_eq_landau_n_rt_rp_iii2_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀u:l_e_st_eq_landau_n_rt_urt eta x.p.λx0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta x0).(l_ande2 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta x0) a : l_e_st_eq_landau_n_rt_urt eta x0).
-
-(* constant 2014 *)
-definition l_e_st_eq_landau_n_rt_rp_iii2_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀u:l_e_st_eq_landau_n_rt_urt eta x.p.λx0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta x0).(p1 x0 (l_e_st_eq_landau_n_rt_rp_iii2_t1 ksi eta m p p1 x0 a) (l_e_st_eq_landau_n_rt_rp_iii2_t2 ksi eta m p p1 x0 a) : p).
-
-(* constant 2015 *)
-definition l_e_st_eq_landau_n_rt_rp_moreapp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀u:l_e_st_eq_landau_n_rt_urt eta x.p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_lrt ksi x) (l_e_st_eq_landau_n_rt_urt eta x)) m p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_and (l_e_st_eq_landau_n_rt_lrt ksi x) (l_e_st_eq_landau_n_rt_urt eta x).l_e_st_eq_landau_n_rt_rp_iii2_t3 ksi eta m p p1 x t) : p).
-
-(* constant 2016 *)
-definition l_e_st_eq_landau_n_rt_rp_less ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_urt ksi x) (l_e_st_eq_landau_n_rt_lrt eta x)) : Prop).
-
-(* constant 2017 *)
-definition l_e_st_eq_landau_n_rt_rp_iii2_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀u:l_e_st_eq_landau_n_rt_lrt eta x.p.λx0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta x0).(l_ande1 (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta x0) a : l_e_st_eq_landau_n_rt_urt ksi x0).
-
-(* constant 2018 *)
-definition l_e_st_eq_landau_n_rt_rp_iii2_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀u:l_e_st_eq_landau_n_rt_lrt eta x.p.λx0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta x0).(l_ande2 (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta x0) a : l_e_st_eq_landau_n_rt_lrt eta x0).
-
-(* constant 2019 *)
-definition l_e_st_eq_landau_n_rt_rp_iii2_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀u:l_e_st_eq_landau_n_rt_lrt eta x.p.λx0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta x0).(p1 x0 (l_e_st_eq_landau_n_rt_rp_iii2_t4 ksi eta l p p1 x0 a) (l_e_st_eq_landau_n_rt_rp_iii2_t5 ksi eta l p p1 x0 a) : p).
-
-(* constant 2020 *)
-definition l_e_st_eq_landau_n_rt_rp_lessapp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀u:l_e_st_eq_landau_n_rt_lrt eta x.p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_urt ksi x) (l_e_st_eq_landau_n_rt_lrt eta x)) l p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_and (l_e_st_eq_landau_n_rt_urt ksi x) (l_e_st_eq_landau_n_rt_lrt eta x).l_e_st_eq_landau_n_rt_rp_iii2_t6 ksi eta l p p1 x t) : p).
-
-(* constant 2021 *)
-definition l_e_st_eq_landau_n_rt_rp_2121_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λux:l_e_st_eq_landau_n_rt_urt eta x0.(l_andi (l_e_st_eq_landau_n_rt_urt eta x0) (l_e_st_eq_landau_n_rt_lrt ksi x0) ux lx : l_and (l_e_st_eq_landau_n_rt_urt eta x0) (l_e_st_eq_landau_n_rt_lrt ksi x0)).
-
-(* constant 2022 *)
-definition l_e_st_eq_landau_n_rt_rp_2121_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λux:l_e_st_eq_landau_n_rt_urt eta x0.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_urt eta x) (l_e_st_eq_landau_n_rt_lrt ksi x)) x0 (l_e_st_eq_landau_n_rt_rp_2121_t1 ksi eta m x0 lx ux) : l_e_st_eq_landau_n_rt_rp_less eta ksi).
-
-(* constant 2023 *)
-definition l_e_st_eq_landau_n_rt_rp_satz121 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_moreapp ksi eta m (l_e_st_eq_landau_n_rt_rp_less eta ksi) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_urt eta x.l_e_st_eq_landau_n_rt_rp_2121_t2 ksi eta m x t u) : l_e_st_eq_landau_n_rt_rp_less eta ksi).
-
-(* constant 2024 *)
-definition l_e_st_eq_landau_n_rt_rp_2122_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.(l_andi (l_e_st_eq_landau_n_rt_lrt eta x0) (l_e_st_eq_landau_n_rt_urt ksi x0) lx ux : l_and (l_e_st_eq_landau_n_rt_lrt eta x0) (l_e_st_eq_landau_n_rt_urt ksi x0)).
-
-(* constant 2025 *)
-definition l_e_st_eq_landau_n_rt_rp_2122_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_lrt eta x) (l_e_st_eq_landau_n_rt_urt ksi x)) x0 (l_e_st_eq_landau_n_rt_rp_2122_t1 ksi eta l x0 ux lx) : l_e_st_eq_landau_n_rt_rp_more eta ksi).
-
-(* constant 2026 *)
-definition l_e_st_eq_landau_n_rt_rp_satz122 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_lessapp ksi eta l (l_e_st_eq_landau_n_rt_rp_more eta ksi) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λu:l_e_st_eq_landau_n_rt_lrt eta x.l_e_st_eq_landau_n_rt_rp_2122_t2 ksi eta l x t u) : l_e_st_eq_landau_n_rt_rp_more eta ksi).
-
-(* constant 2027 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λux:l_e_st_eq_landau_n_rt_urt eta x0.(l_e_st_isset_th3 l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta) x0 lx ux : l_not (l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta))).
-
-(* constant 2028 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λux:l_e_st_eq_landau_n_rt_urt eta x0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta)) (l_e_st_eq_landau_n_rt_rp_2123_t1 ksi eta m x0 lx ux) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_ise ksi eta t) : l_not (l_e_st_eq_landau_n_rt_rp_is ksi eta)).
-
-(* constant 2029 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_moreapp ksi eta m (l_not (l_e_st_eq_landau_n_rt_rp_is ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_urt eta x.l_e_st_eq_landau_n_rt_rp_2123_t2 ksi eta m x t u) : l_not (l_e_st_eq_landau_n_rt_rp_is ksi eta)).
-
-(* constant 2030 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_ec_th2 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_2123_t3 ksi eta t) : l_ec (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta)).
-
-(* constant 2031 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.(l_e_st_isset_th4 l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_lcl eta) (l_e_st_eq_landau_n_rt_lcl ksi) x0 lx ux : l_not (l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta))).
-
-(* constant 2032 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta)) (l_e_st_eq_landau_n_rt_rp_2123_t5 ksi eta l x0 ux lx) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_ise ksi eta t) : l_not (l_e_st_eq_landau_n_rt_rp_is ksi eta)).
-
-(* constant 2033 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_lessapp ksi eta l (l_not (l_e_st_eq_landau_n_rt_rp_is ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λu:l_e_st_eq_landau_n_rt_lrt eta x.l_e_st_eq_landau_n_rt_rp_2123_t6 ksi eta l x t u) : l_not (l_e_st_eq_landau_n_rt_rp_is ksi eta)).
-
-(* constant 2034 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_ec_th1 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (λt:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_2123_t7 ksi eta t) : l_ec (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta)).
-
-(* constant 2035 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λux:l_e_st_eq_landau_n_rt_urt eta x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λly:l_e_st_eq_landau_n_rt_lrt eta y0.(l_e_st_eq_landau_n_rt_cutapp2a ksi x0 lx y0 uy : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 2036 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λux:l_e_st_eq_landau_n_rt_urt eta x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λly:l_e_st_eq_landau_n_rt_lrt eta y0.(l_e_st_eq_landau_n_rt_cutapp2b eta y0 ly x0 ux : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 2037 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λux:l_e_st_eq_landau_n_rt_urt eta x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λly:l_e_st_eq_landau_n_rt_lrt eta y0.(l_mp (l_e_st_eq_landau_n_rt_less x0 y0) l_con (l_e_st_eq_landau_n_rt_rp_2123_t9 ksi eta m l x0 lx ux y0 uy ly) (l_ec3e23 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_satz81b x0 y0) (l_e_st_eq_landau_n_rt_rp_2123_t10 ksi eta m l x0 lx ux y0 uy ly)) : l_con).
-
-(* constant 2038 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λux:l_e_st_eq_landau_n_rt_urt eta x0.(l_e_st_eq_landau_n_rt_rp_lessapp ksi eta l l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λu:l_e_st_eq_landau_n_rt_lrt eta x.l_e_st_eq_landau_n_rt_rp_2123_t11 ksi eta m l x0 lx ux x t u) : l_con).
-
-(* constant 2039 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_moreapp ksi eta m l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_urt eta x.l_e_st_eq_landau_n_rt_rp_2123_t12 ksi eta m l x t u) : l_con).
-
-(* constant 2040 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(λt:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_2123_t13 ksi eta m t : l_not (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2041 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_ec_th1 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_2123_t14 ksi eta t) : l_ec (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2042 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_ec3_th6 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_2123_t4 ksi eta) (l_e_st_eq_landau_n_rt_rp_2123_t15 ksi eta) (l_e_st_eq_landau_n_rt_rp_2123_t8 ksi eta) : l_ec3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2043 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_or3i1 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) i : l_or3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2044 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_nis ksi eta.(l_imp_th3 (l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta)) (l_e_st_eq_landau_n_rt_rp_is ksi eta) n (λt:l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta).l_e_st_eq_landau_n_rt_rp_isi ksi eta t) : l_not (l_e_is (l_e_st_set l_e_st_eq_landau_n_rt_rat) (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta))).
-
-(* constant 2045 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_nis ksi eta.(l_e_st_isset_th5 l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_lcl ksi) (l_e_st_eq_landau_n_rt_lcl eta) (l_e_st_eq_landau_n_rt_rp_2123_t17 ksi eta n) : l_or (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_more eta ksi)).
-
-(* constant 2046 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_nis ksi eta.(l_or_th8 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_more eta ksi) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_2123_t18 ksi eta n) (λt:l_e_st_eq_landau_n_rt_rp_more eta ksi.l_e_st_eq_landau_n_rt_rp_satz121 eta ksi t) : l_or (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2047 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_nis ksi eta.(l_or3_th7 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_2123_t19 ksi eta n) : l_or3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2048 *)
-definition l_e_st_eq_landau_n_rt_rp_2123_b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_or3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_2123_t16 ksi eta t) (λt:l_e_st_eq_landau_n_rt_rp_nis ksi eta.l_e_st_eq_landau_n_rt_rp_2123_t20 ksi eta t) : l_or3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2049 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_orec3i (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_2123_b ksi eta) (l_e_st_eq_landau_n_rt_rp_2123_a ksi eta) : l_orec3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2050 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_orec3e1 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123 ksi eta) : l_or3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2051 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_orec3e2 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123 ksi eta) : l_ec3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2052 *)
-definition l_e_st_eq_landau_n_rt_rp_moreis ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_or (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) : Prop).
-
-(* constant 2053 *)
-definition l_e_st_eq_landau_n_rt_rp_lessis ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_or (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) : Prop).
-
-(* constant 2054 *)
-definition l_e_st_eq_landau_n_rt_rp_satz124 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_less eta ksi) (l_e_st_eq_landau_n_rt_rp_is eta ksi) m (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz121 ksi eta t) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_symis l_e_st_eq_landau_n_rt_cut ksi eta t) : l_e_st_eq_landau_n_rt_rp_lessis eta ksi).
-
-(* constant 2055 *)
-definition l_e_st_eq_landau_n_rt_rp_satz125 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more eta ksi) (l_e_st_eq_landau_n_rt_rp_is eta ksi) l (λt:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_satz122 ksi eta t) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_symis l_e_st_eq_landau_n_rt_cut ksi eta t) : l_e_st_eq_landau_n_rt_rp_moreis eta ksi).
-
-(* constant 2056 *)
-definition l_e_st_eq_landau_n_rt_rp_ismore1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi zeta.(l_e_isp l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_more u zeta) ksi eta m i : l_e_st_eq_landau_n_rt_rp_more eta zeta).
-
-(* constant 2057 *)
-definition l_e_st_eq_landau_n_rt_rp_ismore2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λm:l_e_st_eq_landau_n_rt_rp_more zeta ksi.(l_e_isp l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_more zeta u) ksi eta m i : l_e_st_eq_landau_n_rt_rp_more zeta eta).
-
-(* constant 2058 *)
-definition l_e_st_eq_landau_n_rt_rp_isless1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less ksi zeta.(l_e_isp l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_less u zeta) ksi eta l i : l_e_st_eq_landau_n_rt_rp_less eta zeta).
-
-(* constant 2059 *)
-definition l_e_st_eq_landau_n_rt_rp_isless2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less zeta ksi.(l_e_isp l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_less zeta u) ksi eta l i : l_e_st_eq_landau_n_rt_rp_less zeta eta).
-
-(* constant 2060 *)
-definition l_e_st_eq_landau_n_rt_rp_ismoreis1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi zeta.(l_e_isp l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_moreis u zeta) ksi eta m i : l_e_st_eq_landau_n_rt_rp_moreis eta zeta).
-
-(* constant 2061 *)
-definition l_e_st_eq_landau_n_rt_rp_ismoreis2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λm:l_e_st_eq_landau_n_rt_rp_moreis zeta ksi.(l_e_isp l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_moreis zeta u) ksi eta m i : l_e_st_eq_landau_n_rt_rp_moreis zeta eta).
-
-(* constant 2062 *)
-definition l_e_st_eq_landau_n_rt_rp_islessis1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi zeta.(l_e_isp l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_lessis u zeta) ksi eta l i : l_e_st_eq_landau_n_rt_rp_lessis eta zeta).
-
-(* constant 2063 *)
-definition l_e_st_eq_landau_n_rt_rp_islessis2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λl:l_e_st_eq_landau_n_rt_rp_lessis zeta ksi.(l_e_isp l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_lessis zeta u) ksi eta l i : l_e_st_eq_landau_n_rt_rp_lessis zeta eta).
-
-(* constant 2064 *)
-definition l_e_st_eq_landau_n_rt_rp_moreisi2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_ori2 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) i : l_e_st_eq_landau_n_rt_rp_moreis ksi eta).
-
-(* constant 2065 *)
-definition l_e_st_eq_landau_n_rt_rp_lessisi2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_ori2 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) i : l_e_st_eq_landau_n_rt_rp_lessis ksi eta).
-
-(* constant 2066 *)
-definition l_e_st_eq_landau_n_rt_rp_moreisi1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_ori1 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) m : l_e_st_eq_landau_n_rt_rp_moreis ksi eta).
-
-(* constant 2067 *)
-definition l_e_st_eq_landau_n_rt_rp_lessisi1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_ori1 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) l : l_e_st_eq_landau_n_rt_rp_lessis ksi eta).
-
-(* constant 2068 *)
-definition l_e_st_eq_landau_n_rt_rp_ismore12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.λm:l_e_st_eq_landau_n_rt_rp_more ksi zeta.(l_e_st_eq_landau_n_rt_rp_ismore2 zeta upsilon eta j (l_e_st_eq_landau_n_rt_rp_ismore1 ksi eta zeta i m) : l_e_st_eq_landau_n_rt_rp_more eta upsilon).
-
-(* constant 2069 *)
-definition l_e_st_eq_landau_n_rt_rp_isless12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.λl:l_e_st_eq_landau_n_rt_rp_less ksi zeta.(l_e_st_eq_landau_n_rt_rp_isless2 zeta upsilon eta j (l_e_st_eq_landau_n_rt_rp_isless1 ksi eta zeta i l) : l_e_st_eq_landau_n_rt_rp_less eta upsilon).
-
-(* constant 2070 *)
-definition l_e_st_eq_landau_n_rt_rp_ismoreis12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi zeta.(l_e_st_eq_landau_n_rt_rp_ismoreis2 zeta upsilon eta j (l_e_st_eq_landau_n_rt_rp_ismoreis1 ksi eta zeta i m) : l_e_st_eq_landau_n_rt_rp_moreis eta upsilon).
-
-(* constant 2071 *)
-definition l_e_st_eq_landau_n_rt_rp_islessis12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi zeta.(l_e_st_eq_landau_n_rt_rp_islessis2 zeta upsilon eta j (l_e_st_eq_landau_n_rt_rp_islessis1 ksi eta zeta i l) : l_e_st_eq_landau_n_rt_rp_lessis eta upsilon).
-
-(* constant 2072 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.(l_ec3_th7 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123b ksi eta) (l_comor (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) m) : l_not (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2073 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.(l_ec3_th9 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123b ksi eta) l : l_not (l_e_st_eq_landau_n_rt_rp_more ksi eta)).
-
-(* constant 2074 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123e ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λn:l_not (l_e_st_eq_landau_n_rt_rp_more ksi eta).(l_or3_th2 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123a ksi eta) n : l_e_st_eq_landau_n_rt_rp_lessis ksi eta).
-
-(* constant 2075 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123f ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λn:l_not (l_e_st_eq_landau_n_rt_rp_less ksi eta).(l_comor (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_or3_th3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123a ksi eta) n) : l_e_st_eq_landau_n_rt_rp_moreis ksi eta).
-
-(* constant 2076 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123g ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_or_th3 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_ec3e23 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123b ksi eta) m) (l_ec3e21 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123b ksi eta) m) : l_not (l_e_st_eq_landau_n_rt_rp_lessis ksi eta)).
-
-(* constant 2077 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123h ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_or_th3 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_ec3e32 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123b ksi eta) l) (l_ec3e31 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123b ksi eta) l) : l_not (l_e_st_eq_landau_n_rt_rp_moreis ksi eta)).
-
-(* constant 2078 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123j ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λn:l_not (l_e_st_eq_landau_n_rt_rp_moreis ksi eta).(l_or3e3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123a ksi eta) (l_or_th5 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) n) (l_or_th4 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) n) : l_e_st_eq_landau_n_rt_rp_less ksi eta).
-
-(* constant 2079 *)
-definition l_e_st_eq_landau_n_rt_rp_satz123k ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λn:l_not (l_e_st_eq_landau_n_rt_rp_lessis ksi eta).(l_or3e2 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123a ksi eta) (l_or_th4 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) n) (l_or_th5 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) n) : l_e_st_eq_landau_n_rt_rp_more ksi eta).
-
-(* constant 2080 *)
-definition l_e_st_eq_landau_n_rt_rp_2126_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less eta zeta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λly:l_e_st_eq_landau_n_rt_lrt zeta y0.(l_e_st_eq_landau_n_rt_cutapp2a eta x0 lx y0 uy : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 2081 *)
-definition l_e_st_eq_landau_n_rt_rp_2126_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less eta zeta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λly:l_e_st_eq_landau_n_rt_lrt zeta y0.(l_e_st_eq_landau_n_rt_rp_satz119a ksi x0 ux y0 (l_e_st_eq_landau_n_rt_rp_2126_t1 ksi eta zeta l k x0 ux lx y0 uy ly) : l_e_st_eq_landau_n_rt_urt ksi y0).
-
-(* constant 2082 *)
-definition l_e_st_eq_landau_n_rt_rp_2126_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less eta zeta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λly:l_e_st_eq_landau_n_rt_lrt zeta y0.(l_andi (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_lrt zeta y0) (l_e_st_eq_landau_n_rt_rp_2126_t2 ksi eta zeta l k x0 ux lx y0 uy ly) ly : l_and (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_lrt zeta y0)).
-
-(* constant 2083 *)
-definition l_e_st_eq_landau_n_rt_rp_2126_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less eta zeta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λly:l_e_st_eq_landau_n_rt_lrt zeta y0.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_urt ksi x) (l_e_st_eq_landau_n_rt_lrt zeta x)) y0 (l_e_st_eq_landau_n_rt_rp_2126_t3 ksi eta zeta l k x0 ux lx y0 uy ly) : l_e_st_eq_landau_n_rt_rp_less ksi zeta).
-
-(* constant 2084 *)
-definition l_e_st_eq_landau_n_rt_rp_2126_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less eta zeta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.(l_e_st_eq_landau_n_rt_rp_lessapp eta zeta k (l_e_st_eq_landau_n_rt_rp_less ksi zeta) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt eta x.λu:l_e_st_eq_landau_n_rt_lrt zeta x.l_e_st_eq_landau_n_rt_rp_2126_t4 ksi eta zeta l k x0 ux lx x t u) : l_e_st_eq_landau_n_rt_rp_less ksi zeta).
-
-(* constant 2085 *)
-definition l_e_st_eq_landau_n_rt_rp_satz126 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less eta zeta.(l_e_st_eq_landau_n_rt_rp_lessapp ksi eta l (l_e_st_eq_landau_n_rt_rp_less ksi zeta) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λu:l_e_st_eq_landau_n_rt_lrt eta x.l_e_st_eq_landau_n_rt_rp_2126_t5 ksi eta zeta l k x t u) : l_e_st_eq_landau_n_rt_rp_less ksi zeta).
-
-(* constant 2086 *)
-definition l_e_st_eq_landau_n_rt_rp_trless ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less eta zeta.(l_e_st_eq_landau_n_rt_rp_satz126 ksi eta zeta l k : l_e_st_eq_landau_n_rt_rp_less ksi zeta).
-
-(* constant 2087 *)
-definition l_e_st_eq_landau_n_rt_rp_trmore ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more eta zeta.(l_e_st_eq_landau_n_rt_rp_satz122 zeta ksi (l_e_st_eq_landau_n_rt_rp_satz126 zeta eta ksi (l_e_st_eq_landau_n_rt_rp_satz121 eta zeta n) (l_e_st_eq_landau_n_rt_rp_satz121 ksi eta m)) : l_e_st_eq_landau_n_rt_rp_more ksi zeta).
-
-(* constant 2088 *)
-definition l_e_st_eq_landau_n_rt_rp_satz127a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less eta zeta.(l_orapp (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi zeta) l (λu:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_trless ksi eta zeta u k) (λu:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_isless1 eta ksi zeta (l_e_symis l_e_st_eq_landau_n_rt_cut ksi eta u) k) : l_e_st_eq_landau_n_rt_rp_less ksi zeta).
-
-(* constant 2089 *)
-definition l_e_st_eq_landau_n_rt_rp_satz127b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis eta zeta.(l_orapp (l_e_st_eq_landau_n_rt_rp_less eta zeta) (l_e_st_eq_landau_n_rt_rp_is eta zeta) (l_e_st_eq_landau_n_rt_rp_less ksi zeta) k (λu:l_e_st_eq_landau_n_rt_rp_less eta zeta.l_e_st_eq_landau_n_rt_rp_trless ksi eta zeta l u) (λu:l_e_st_eq_landau_n_rt_rp_is eta zeta.l_e_st_eq_landau_n_rt_rp_isless2 eta zeta ksi u l) : l_e_st_eq_landau_n_rt_rp_less ksi zeta).
-
-(* constant 2090 *)
-definition l_e_st_eq_landau_n_rt_rp_satz127c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more eta zeta.(l_e_st_eq_landau_n_rt_rp_satz122 zeta ksi (l_e_st_eq_landau_n_rt_rp_satz127b zeta eta ksi (l_e_st_eq_landau_n_rt_rp_satz121 eta zeta n) (l_e_st_eq_landau_n_rt_rp_satz124 ksi eta m)) : l_e_st_eq_landau_n_rt_rp_more ksi zeta).
-
-(* constant 2091 *)
-definition l_e_st_eq_landau_n_rt_rp_satz127d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis eta zeta.(l_e_st_eq_landau_n_rt_rp_satz122 zeta ksi (l_e_st_eq_landau_n_rt_rp_satz127a zeta eta ksi (l_e_st_eq_landau_n_rt_rp_satz124 eta zeta n) (l_e_st_eq_landau_n_rt_rp_satz121 ksi eta m)) : l_e_st_eq_landau_n_rt_rp_more ksi zeta).
-
-(* constant 2092 *)
-definition l_e_st_eq_landau_n_rt_rp_2128_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis eta zeta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is eta zeta.(l_e_st_eq_landau_n_rt_rp_lessisi2 ksi zeta (l_e_tris l_e_st_eq_landau_n_rt_cut ksi eta zeta i j) : l_e_st_eq_landau_n_rt_rp_lessis ksi zeta).
-
-(* constant 2093 *)
-definition l_e_st_eq_landau_n_rt_rp_2128_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis eta zeta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_less eta zeta.(l_e_st_eq_landau_n_rt_rp_lessisi1 ksi zeta (l_e_st_eq_landau_n_rt_rp_satz127a ksi eta zeta l j) : l_e_st_eq_landau_n_rt_rp_lessis ksi zeta).
-
-(* constant 2094 *)
-definition l_e_st_eq_landau_n_rt_rp_2128_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis eta zeta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_orapp (l_e_st_eq_landau_n_rt_rp_less eta zeta) (l_e_st_eq_landau_n_rt_rp_is eta zeta) (l_e_st_eq_landau_n_rt_rp_lessis ksi zeta) k (λt:l_e_st_eq_landau_n_rt_rp_less eta zeta.l_e_st_eq_landau_n_rt_rp_2128_t2 ksi eta zeta l k i t) (λt:l_e_st_eq_landau_n_rt_rp_is eta zeta.l_e_st_eq_landau_n_rt_rp_2128_t1 ksi eta zeta l k i t) : l_e_st_eq_landau_n_rt_rp_lessis ksi zeta).
-
-(* constant 2095 *)
-definition l_e_st_eq_landau_n_rt_rp_2128_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis eta zeta.λj:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_lessisi1 ksi zeta (l_e_st_eq_landau_n_rt_rp_satz127b ksi eta zeta j k) : l_e_st_eq_landau_n_rt_rp_lessis ksi zeta).
-
-(* constant 2096 *)
-definition l_e_st_eq_landau_n_rt_rp_satz128 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis eta zeta.(l_orapp (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_lessis ksi zeta) l (λt:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_2128_t4 ksi eta zeta l k t) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_2128_t3 ksi eta zeta l k t) : l_e_st_eq_landau_n_rt_rp_lessis ksi zeta).
-
-(* constant 2097 *)
-definition l_e_st_eq_landau_n_rt_rp_trlessis ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis eta zeta.(l_e_st_eq_landau_n_rt_rp_satz128 ksi eta zeta l k : l_e_st_eq_landau_n_rt_rp_lessis ksi zeta).
-
-(* constant 2098 *)
-definition l_e_st_eq_landau_n_rt_rp_trmoreis ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis eta zeta.(l_e_st_eq_landau_n_rt_rp_satz125 zeta ksi (l_e_st_eq_landau_n_rt_rp_satz128 zeta eta ksi (l_e_st_eq_landau_n_rt_rp_satz124 eta zeta n) (l_e_st_eq_landau_n_rt_rp_satz124 ksi eta m)) : l_e_st_eq_landau_n_rt_rp_moreis ksi zeta).
-
-(* constant 2099 *)
-definition l_e_st_eq_landau_n_rt_rp_sumprop1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_and3 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0)) : Prop).
-
-(* constant 2100 *)
-definition l_e_st_eq_landau_n_rt_rp_sumprop ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x y)) : Prop).
-
-(* constant 2101 *)
-definition l_e_st_eq_landau_n_rt_rp_sum ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop ksi eta z) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2102 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_and3i (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0)) lx ly i : l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y0).
-
-(* constant 2103 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y) y0 (l_e_st_eq_landau_n_rt_rp_iii3_t1 ksi eta z0 x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y)).
-
-(* constant 2104 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x y)) x0 (l_e_st_eq_landau_n_rt_rp_iii3_t2 ksi eta z0 x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_rp_sumprop ksi eta z0).
-
-(* constant 2105 *)
-definition l_e_st_eq_landau_n_rt_rp_sum1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop ksi eta z) z0 (l_e_st_eq_landau_n_rt_rp_iii3_t3 ksi eta z0 x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2106 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop ksi eta z) z0 i : l_e_st_eq_landau_n_rt_rp_sumprop ksi eta z0).
-
-(* constant 2107 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y0.(l_and3e1 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0)) py : l_e_st_eq_landau_n_rt_lrt ksi x0).
-
-(* constant 2108 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y0.(l_and3e2 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0)) py : l_e_st_eq_landau_n_rt_lrt eta y0).
-
-(* constant 2109 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y0.(l_and3e3 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0)) py : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 2110 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y0.(p1 x0 (l_e_st_eq_landau_n_rt_rp_iii3_t5 ksi eta z0 i p p1 x0 px y0 py) y0 (l_e_st_eq_landau_n_rt_rp_iii3_t6 ksi eta z0 i p p1 x0 px y0 py) (l_e_st_eq_landau_n_rt_rp_iii3_t7 ksi eta z0 i p p1 x0 px y0 py) : p).
-
-(* constant 2111 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y).(l_someapp l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y) px p (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x0 y.l_e_st_eq_landau_n_rt_rp_iii3_t8 ksi eta z0 i p p1 x0 px y t) : p).
-
-(* constant 2112 *)
-definition l_e_st_eq_landau_n_rt_rp_sumapp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x y)) (l_e_st_eq_landau_n_rt_rp_iii3_t4 ksi eta z0 i p p1) p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_sumprop1 ksi eta z0 x y).l_e_st_eq_landau_n_rt_rp_iii3_t9 ksi eta z0 i p p1 x t) : p).
-
-(* constant 2113 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_cutapp2a ksi x0 lx x1 ux : l_e_st_eq_landau_n_rt_less x0 x1).
-
-(* constant 2114 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_cutapp2a eta y0 ly y1 uy : l_e_st_eq_landau_n_rt_less y0 y1).
-
-(* constant 2115 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_isless1 (l_e_st_eq_landau_n_rt_pl x0 y0) z0 (l_e_st_eq_landau_n_rt_pl x1 y1) (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_pl x0 y0) j) (l_e_st_eq_landau_n_rt_satz98a x0 x1 y0 y1 (l_e_st_eq_landau_n_rt_rp_3129_t1 ksi eta x1 ux y1 uy z0 i x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_rp_3129_t2 ksi eta x1 ux y1 uy z0 i x0 lx y0 ly j)) : l_e_st_eq_landau_n_rt_less z0 (l_e_st_eq_landau_n_rt_pl x1 y1)).
-
-(* constant 2116 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_ec3e31 (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x1 y1)) (l_e_st_eq_landau_n_rt_more z0 (l_e_st_eq_landau_n_rt_pl x1 y1)) (l_e_st_eq_landau_n_rt_less z0 (l_e_st_eq_landau_n_rt_pl x1 y1)) (l_e_st_eq_landau_n_rt_satz81b z0 (l_e_st_eq_landau_n_rt_pl x1 y1)) (l_e_st_eq_landau_n_rt_rp_3129_t3 ksi eta x1 ux y1 uy z0 i x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_nis z0 (l_e_st_eq_landau_n_rt_pl x1 y1)).
-
-(* constant 2117 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).(l_e_st_eq_landau_n_rt_rp_sumapp ksi eta z0 i (l_e_st_eq_landau_n_rt_nis z0 (l_e_st_eq_landau_n_rt_pl x1 y1)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3129_t4 ksi eta x1 ux y1 uy z0 i x t y u v) : l_e_st_eq_landau_n_rt_nis z0 (l_e_st_eq_landau_n_rt_pl x1 y1)).
-
-(* constant 2118 *)
-definition l_e_st_eq_landau_n_rt_rp_satz129a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.(l_imp_th3 (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x1 y1) (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_nis (l_e_st_eq_landau_n_rt_pl x1 y1) (l_e_st_eq_landau_n_rt_pl x1 y1)) (l_weli (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl x1 y1) (l_e_st_eq_landau_n_rt_pl x1 y1)) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl x1 y1))) (λt:l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x1 y1) (l_e_st_eq_landau_n_rt_rp_sum ksi eta).l_e_st_eq_landau_n_rt_rp_3129_t5 ksi eta x1 ux y1 uy (l_e_st_eq_landau_n_rt_pl x1 y1) t) : l_not (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x1 y1) (l_e_st_eq_landau_n_rt_rp_sum ksi eta))).
-
-(* constant 2119 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_isless2 u0 (l_e_st_eq_landau_n_rt_pl x0 y0) z0 j l : l_e_st_eq_landau_n_rt_less z0 (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 2120 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_z1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_ov z0 (l_e_st_eq_landau_n_rt_pl x0 y0) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2121 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_isless12 z0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_satz110f z0 (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_example1d (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_rp_3129_t6 ksi eta u0 i z0 l x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_pl x0 y0))).
-
-(* constant 2122 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_satz106c (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_rp_3129_t7 ksi eta u0 i z0 l x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2123 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt) x0 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_example1a x0) (l_e_st_eq_landau_n_rt_satz105f (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j) l_e_st_eq_landau_n_rt_1rt x0 (l_e_st_eq_landau_n_rt_rp_3129_t8 ksi eta u0 i z0 l x0 lx y0 ly j)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) x0).
-
-(* constant 2124 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_ts y0 l_e_st_eq_landau_n_rt_1rt) y0 (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_example1a y0) (l_e_st_eq_landau_n_rt_satz105f (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j) l_e_st_eq_landau_n_rt_1rt y0 (l_e_st_eq_landau_n_rt_rp_3129_t8 ksi eta u0 i z0 l x0 lx y0 ly j)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) y0).
-
-(* constant 2125 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_rp_satz120 ksi x0 lx (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_rp_3129_t9 ksi eta u0 i z0 l x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j))).
-
-(* constant 2126 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_rp_satz120 eta y0 ly (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_rp_3129_t10 ksi eta u0 i z0 l x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_lrt eta (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j))).
-
-(* constant 2127 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j))) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) z0 (l_e_st_eq_landau_n_rt_distpt1 x0 y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_satz110c z0 (l_e_st_eq_landau_n_rt_pl x0 y0)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j))) z0).
-
-(* constant 2128 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j))) z0 (l_e_st_eq_landau_n_rt_rp_3129_t13 ksi eta u0 i z0 l x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)))).
-
-(* constant 2129 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_rp_sum1 ksi eta z0 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_rp_3129_t11 ksi eta u0 i z0 l x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_3129_z1 ksi eta u0 i z0 l x0 lx y0 ly j)) (l_e_st_eq_landau_n_rt_rp_3129_t12 ksi eta u0 i z0 l x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_rp_3129_t14 ksi eta u0 i z0 l x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2130 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.(l_e_st_eq_landau_n_rt_rp_sumapp ksi eta u0 i (l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3129_t15 ksi eta u0 i z0 l x t y u v) : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2131 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_rp_sum1 ksi eta (l_e_st_eq_landau_n_rt_pl x1 y0) x1 lx1 y0 ly (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl x1 y0)) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x1 y0) (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2132 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_satz96a x1 x0 y0 (l_e_st_eq_landau_n_rt_satz83 x0 x1 l) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x1 y0) (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 2133 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_ismore2 (l_e_st_eq_landau_n_rt_pl x0 y0) z0 (l_e_st_eq_landau_n_rt_pl x1 y0) (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_pl x0 y0) j) (l_e_st_eq_landau_n_rt_rp_3129_t18 ksi eta z0 i x0 lx y0 ly j x1 lx1 l) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x1 y0) z0).
-
-(* constant 2134 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_andi (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x1 y0) (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x1 y0) z0) (l_e_st_eq_landau_n_rt_rp_3129_t17 ksi eta z0 i x0 lx y0 ly j x1 lx1 l) (l_e_st_eq_landau_n_rt_rp_3129_t19 ksi eta z0 i x0 lx y0 ly j x1 lx1 l) : l_and (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x1 y0) (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x1 y0) z0)).
-
-(* constant 2135 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_more y z0)) (l_e_st_eq_landau_n_rt_pl x1 y0) (l_e_st_eq_landau_n_rt_rp_3129_t20 ksi eta z0 i x0 lx y0 ly j x1 lx1 l) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))).
-
-(* constant 2136 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_cutapp3 ksi x0 lx (l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_less x0 x.l_e_st_eq_landau_n_rt_rp_3129_t21 ksi eta z0 i x0 lx y0 ly j x t u) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))).
-
-(* constant 2137 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta).(l_e_st_eq_landau_n_rt_rp_sumapp ksi eta z0 i (l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3129_t22 ksi eta z0 i x t y u v) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))).
-
-(* constant 2138 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t24 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.(l_e_st_eq_landau_n_rt_cut2 (l_e_st_eq_landau_n_rt_rp_sum ksi eta) (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_rp_sum1 ksi eta (l_e_st_eq_landau_n_rt_pl x0 y0) x0 lx y0 ly (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl x0 y0))) (l_e_st_eq_landau_n_rt_pl x1 y1) (l_e_st_eq_landau_n_rt_rp_satz129a ksi eta x1 ux y1 uy) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_sum ksi eta).λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_rp_3129_t16 ksi eta x t y u) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_sum ksi eta).l_e_st_eq_landau_n_rt_rp_3129_t23 ksi eta x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2139 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t25 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.(l_e_st_eq_landau_n_rt_cutapp1b eta (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt eta y.l_e_st_eq_landau_n_rt_rp_3129_t24 ksi eta x0 lx y0 ly x1 ux y t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2140 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t26 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.(l_e_st_eq_landau_n_rt_cutapp1b ksi (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.l_e_st_eq_landau_n_rt_rp_3129_t25 ksi eta x0 lx y0 ly x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2141 *)
-definition l_e_st_eq_landau_n_rt_rp_3129_t27 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_e_st_eq_landau_n_rt_cutapp1a eta (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta y.l_e_st_eq_landau_n_rt_rp_3129_t26 ksi eta x0 lx y t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2142 *)
-definition l_e_st_eq_landau_n_rt_rp_satz129 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_cutapp1a ksi (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_rp_3129_t27 ksi eta x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2143 *)
-definition l_e_st_eq_landau_n_rt_rp_pl ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_cutof (l_e_st_eq_landau_n_rt_rp_sum ksi eta) (l_e_st_eq_landau_n_rt_rp_satz129 ksi eta) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2144 *)
-definition l_e_st_eq_landau_n_rt_rp_lrtpl ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_rp_ine (l_e_st_eq_landau_n_rt_rp_sum ksi eta) (l_e_st_eq_landau_n_rt_rp_satz129 ksi eta) z0 (l_e_st_eq_landau_n_rt_rp_sum1 ksi eta z0 x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0).
-
-(* constant 2145 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_isp1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_not (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_sum ksi eta))) (l_e_st_eq_landau_n_rt_pl x0 y0) z0 (l_e_st_eq_landau_n_rt_rp_satz129a ksi eta x0 ux y0 uy) i : l_not (l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta))).
-
-(* constant 2146 *)
-definition l_e_st_eq_landau_n_rt_rp_urtpl ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_imp_th3 (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0) (l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta)) (l_e_st_eq_landau_n_rt_rp_iii3_t10 ksi eta z0 x0 ux y0 uy i) (λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0.l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_rp_sum ksi eta) (l_e_st_eq_landau_n_rt_rp_satz129 ksi eta) z0 t) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0).
-
-(* constant 2147 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.(l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_rp_sum ksi eta) (l_e_st_eq_landau_n_rt_rp_satz129 ksi eta) z0 lz : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_sum ksi eta)).
-
-(* constant 2148 *)
-definition l_e_st_eq_landau_n_rt_rp_plapp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).p.(l_e_st_eq_landau_n_rt_rp_sumapp ksi eta z0 (l_e_st_eq_landau_n_rt_rp_iii3_t11 ksi eta z0 lz p p1) p p1 : p).
-
-(* constant 2149 *)
-definition l_e_st_eq_landau_n_rt_rp_ispl1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_pl u zeta) ksi eta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2150 *)
-definition l_e_st_eq_landau_n_rt_rp_ispl2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_pl zeta u) ksi eta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl zeta eta)).
-
-(* constant 2151 *)
-definition l_e_st_eq_landau_n_rt_rp_ispl12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_ispl1 ksi eta zeta i) (l_e_st_eq_landau_n_rt_rp_ispl2 zeta upsilon eta j) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2152 *)
-definition l_e_st_eq_landau_n_rt_rp_3130_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_tris l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_pl y0 x0) i (l_e_st_eq_landau_n_rt_compl x0 y0) : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl y0 x0)).
-
-(* constant 2153 *)
-definition l_e_st_eq_landau_n_rt_rp_3130_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_rp_lrtpl eta ksi z0 y0 ly x0 lx (l_e_st_eq_landau_n_rt_rp_3130_t1 ksi eta z0 lz x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta ksi) z0).
-
-(* constant 2154 *)
-definition l_e_st_eq_landau_n_rt_rp_3130_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) z0.(l_e_st_eq_landau_n_rt_rp_plapp ksi eta z0 lz (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta ksi) z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3130_t2 ksi eta z0 lz x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta ksi) z0).
-
-(* constant 2155 *)
-definition l_e_st_eq_landau_n_rt_rp_satz130 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_pl ksi eta) (l_e_st_eq_landau_n_rt_rp_pl eta ksi) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) x.l_e_st_eq_landau_n_rt_rp_3130_t3 ksi eta x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta ksi) x.l_e_st_eq_landau_n_rt_rp_3130_t3 eta ksi x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi eta) (l_e_st_eq_landau_n_rt_rp_pl eta ksi)).
-
-(* constant 2156 *)
-definition l_e_st_eq_landau_n_rt_rp_compl ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz130 ksi eta : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi eta) (l_e_st_eq_landau_n_rt_rp_pl eta ksi)).
-
-(* constant 2157 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) v0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 z0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_pl v0 z0) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) i (l_e_st_eq_landau_n_rt_ispl1 v0 (l_e_st_eq_landau_n_rt_pl x0 y0) z0 j) (l_e_st_eq_landau_n_rt_asspl1 x0 y0 z0) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0))).
-
-(* constant 2158 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) v0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 z0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_rp_lrtpl eta zeta (l_e_st_eq_landau_n_rt_pl y0 z0) y0 ly z0 lz (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl y0 z0)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 2159 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) v0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 z0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl x0 y0).(l_e_st_eq_landau_n_rt_rp_lrtpl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta) u0 x0 lx (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_rp_3131_t2 ksi eta zeta u0 lu v0 lv z0 lz i x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_rp_3131_t1 ksi eta zeta u0 lu v0 lv z0 lz i x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0).
-
-(* constant 2160 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) v0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 z0).(l_e_st_eq_landau_n_rt_rp_plapp ksi eta v0 lv (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3131_t3 ksi eta zeta u0 lu v0 lv z0 lz i x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0).
-
-(* constant 2161 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0.(l_e_st_eq_landau_n_rt_rp_plapp (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta u0 lu (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt zeta y.λv:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3131_t4 ksi eta zeta u0 lu x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0).
-
-(* constant 2162 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_pl x0 v0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0) i (l_e_st_eq_landau_n_rt_ispl2 v0 (l_e_st_eq_landau_n_rt_pl y0 z0) x0 j) (l_e_st_eq_landau_n_rt_asspl2 x0 y0 z0) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl x0 y0) z0)).
-
-(* constant 2163 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_rp_lrtpl ksi eta (l_e_st_eq_landau_n_rt_pl x0 y0) x0 lx y0 ly (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl x0 y0)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 2164 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_rp_lrtpl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta u0 (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_rp_3131_t7 ksi eta zeta u0 lu x0 lx v0 lv i y0 ly z0 lz j) z0 lz (l_e_st_eq_landau_n_rt_rp_3131_t6 ksi eta zeta u0 lu x0 lx v0 lv i y0 ly z0 lz j) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0).
-
-(* constant 2165 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 v0).(l_e_st_eq_landau_n_rt_rp_plapp eta zeta v0 lv (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt zeta y.λv:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3131_t8 ksi eta zeta u0 lu x0 lx v0 lv i x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0).
-
-(* constant 2166 *)
-definition l_e_st_eq_landau_n_rt_rp_3131_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.(l_e_st_eq_landau_n_rt_rp_plapp ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta) u0 lu (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) y.λv:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3131_t9 ksi eta zeta u0 lu x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) u0).
-
-(* constant 2167 *)
-definition l_e_st_eq_landau_n_rt_rp_satz131 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) x.l_e_st_eq_landau_n_rt_rp_3131_t5 ksi eta zeta x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) x.l_e_st_eq_landau_n_rt_rp_3131_t10 ksi eta zeta x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta))).
-
-(* constant 2168 *)
-definition l_e_st_eq_landau_n_rt_rp_asspl1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz131 ksi eta zeta : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta))).
-
-(* constant 2169 *)
-definition l_e_st_eq_landau_n_rt_rp_asspl2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_satz131 ksi eta zeta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta)).
-
-(* constant 2170 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_prop1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_and (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt ksi y0) : Prop).
-
-(* constant 2171 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λp:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0.(l_e_st_eq_landau_n_rt_cutapp2b ksi x0 (l_ande1 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt ksi y0) p) y0 (l_ande2 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt ksi y0) p) : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 2172 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_prop2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λp:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0.(l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t1 ksi a0 x0 y0 p)) a0 : Prop).
-
-(* constant 2173 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_prop3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_and (l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0) (∀t:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0.l_e_st_eq_landau_n_rt_rp_3132_prop2 ksi a0 x0 y0 t) : Prop).
-
-(* constant 2174 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_prop4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x y)) : Prop).
-
-(* constant 2175 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx y0 uy : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 2176 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy)).(l_e_st_eq_landau_n_rt_satz96d (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy)) x0 m : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0)) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy)))).
-
-(* constant 2177 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy)).(l_e_st_eq_landau_n_rt_ismore2 (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy))) y0 (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0)) (l_e_st_eq_landau_n_rt_satz101c y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy)) (l_e_st_eq_landau_n_rt_rp_3132_t3 ksi a0 x0 lx y0 uy n m) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0)) y0).
-
-(* constant 2178 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy)).(l_e_st_eq_landau_n_rt_rp_satz119 ksi y0 uy (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0)) (l_e_st_eq_landau_n_rt_rp_3132_t4 ksi a0 x0 lx y0 uy n m) : l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0))).
-
-(* constant 2179 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn n) a0) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy)).(l_somei l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) n (l_e_st_eq_landau_n_rt_rp_3132_t5 ksi a0 x0 lx y0 uy n m) : l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0)))).
-
-(* constant 2180 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_someapp l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy))) (l_e_st_eq_landau_n_rt_satz115 a0 (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy))) (l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0)))) (λx:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t2 ksi a0 x0 lx y0 uy)).l_e_st_eq_landau_n_rt_rp_3132_t6 ksi a0 x0 lx y0 uy x t) : l_e_st_eq_landau_n_some (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0)))).
-
-(* constant 2181 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.(l_ande1 (l_e_st_eq_landau_n_lb (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u) (l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0))) m : l_e_st_eq_landau_n_lb (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u).
-
-(* constant 2182 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.(l_ande2 (l_e_st_eq_landau_n_lb (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u) (l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0))) m : l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0))).
-
-(* constant 2183 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_u0 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λi:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_pl x0 a0 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2184 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λi:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt a0) (l_e_st_eq_landau_n_rt_ts a0 l_e_st_eq_landau_n_rt_1rt) a0 (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_rtofn u) l_e_st_eq_landau_n_rt_1rt a0 (l_e_st_eq_landau_n_rt_isnert u l_e_st_eq_landau_n_1 i)) (l_e_st_eq_landau_n_rt_comts l_e_st_eq_landau_n_rt_1rt a0) (l_e_st_eq_landau_n_rt_example1a a0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0) a0).
-
-(* constant 2185 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λi:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_e_isp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 x)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0) a0 (l_e_st_eq_landau_n_rt_rp_3132_t9 ksi a0 x0 lx y0 uy u m) (l_e_st_eq_landau_n_rt_rp_3132_t10 ksi a0 x0 lx y0 uy u m i) : l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i)).
-
-(* constant 2186 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λi:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_andi (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i)) lx (l_e_st_eq_landau_n_rt_rp_3132_t11 ksi a0 x0 lx y0 uy u m i) : l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i)).
-
-(* constant 2187 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λi:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.λp:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i).(l_e_symis l_e_st_eq_landau_n_rt_rat a0 (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i) x0 (l_e_st_eq_landau_n_rt_rp_3132_t1 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i) p)) (l_e_st_eq_landau_n_rt_satz101g (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i) x0 a0 (l_e_st_eq_landau_n_rt_rp_3132_t1 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i) p) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i))) : l_e_st_eq_landau_n_rt_rp_3132_prop2 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i) p).
-
-(* constant 2188 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λi:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_andi (l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i)) (∀t:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i).l_e_st_eq_landau_n_rt_rp_3132_prop2 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i) t) (l_e_st_eq_landau_n_rt_rp_3132_t12 ksi a0 x0 lx y0 uy u m i) (λt:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i).l_e_st_eq_landau_n_rt_rp_3132_t13 ksi a0 x0 lx y0 uy u m i t) : l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i)).
-
-(* constant 2189 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λi:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y) (l_e_st_eq_landau_n_rt_rp_3132_u0 ksi a0 x0 lx y0 uy u m i) (l_e_st_eq_landau_n_rt_rp_3132_t14 ksi a0 x0 lx y0 uy u m i) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y)).
-
-(* constant 2190 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λi:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x y)) x0 (l_e_st_eq_landau_n_rt_rp_3132_t15 ksi a0 x0 lx y0 uy u m i) : l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0).
-
-(* constant 2191 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_rtofn u) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_fr u l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr u l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_satz111d u l_e_st_eq_landau_n_1 o) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rtofn u) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2192 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_um10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rtofn u) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_3132_t17 ksi a0 x0 lx y0 uy u m o) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2193 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_satz112g (l_e_st_eq_landau_n_rt_rtofn u) (l_e_st_eq_landau_n_rt_natrti u) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_natrti l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_3132_t17 ksi a0 x0 lx y0 uy u m o) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o)).
-
-(* constant 2194 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_um1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t18 ksi a0 x0 lx y0 uy u m o) : l_e_st_eq_landau_n_nat).
-
-(* constant 2195 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_v0 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) a0) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2196 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_w0 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2197 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) l_e_st_eq_landau_n_rt_1rt) (l_e_st_eq_landau_n_rt_rtofn u) (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_satz101e (l_e_st_eq_landau_n_rt_rtofn u) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_3132_t17 ksi a0 x0 lx y0 uy u m o)) (l_e_st_eq_landau_n_rt_satz94a (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) l_e_st_eq_landau_n_rt_1rt) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rtofn u)).
-
-(* constant 2198 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_lesse (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rtofn u) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr u l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclassn (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t18 ksi a0 x0 lx y0 uy u m o)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr u l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_3132_t19 ksi a0 x0 lx y0 uy u m o) : l_e_st_eq_landau_n_lessf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr u l_e_st_eq_landau_n_1)).
-
-(* constant 2199 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_satz111c (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o) u (l_e_st_eq_landau_n_rt_rp_3132_t20 ksi a0 x0 lx y0 uy u m o) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o) u).
-
-(* constant 2200 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_imp_th3 (l_e_st_eq_landau_n_lessis u (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o)) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o) u) (l_e_st_eq_landau_n_satz10h (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o) u (l_e_st_eq_landau_n_rt_rp_3132_t21 ksi a0 x0 lx y0 uy u m o)) (λt:l_e_st_eq_landau_n_lessis u (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o).l_e_st_eq_landau_n_satz14 u (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o) t) : l_not (l_e_st_eq_landau_n_lessis u (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o))).
-
-(* constant 2201 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_et (l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o)) a0))) (l_imp_th3 (l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o)) a0))) (l_e_st_eq_landau_n_lessis u (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o)) (l_e_st_eq_landau_n_rt_rp_3132_t22 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t8 ksi a0 x0 lx y0 uy u m (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o))) : l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o)) a0))).
-
-(* constant 2202 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t24 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_isp1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts x a0))) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_3132_um1 ksi a0 x0 lx y0 uy u m o)) (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t23 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_isrtn1 (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t18 ksi a0 x0 lx y0 uy u m o)) : l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o)).
-
-(* constant 2203 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t25 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_andi (l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o)) (l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o)) (l_e_st_eq_landau_n_rt_rp_3132_t24 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t9 ksi a0 x0 lx y0 uy u m) : l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o)).
-
-(* constant 2204 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t26 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) a0) a0) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) a0) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt a0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) l_e_st_eq_landau_n_rt_1rt) a0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0) (l_e_st_eq_landau_n_rt_ispl2 a0 (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt a0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) a0) (l_e_st_eq_landau_n_rt_example1d a0)) (l_e_st_eq_landau_n_rt_distpt1 (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) l_e_st_eq_landau_n_rt_1rt a0) (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) l_e_st_eq_landau_n_rt_1rt) (l_e_st_eq_landau_n_rt_rtofn u) a0 (l_e_st_eq_landau_n_rt_satz101e (l_e_st_eq_landau_n_rt_rtofn u) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_3132_t17 ksi a0 x0 lx y0 uy u m o))) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) a0) a0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0)).
-
-(* constant 2205 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t27 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) a0) (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) a0) a0)) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_asspl1 x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) a0) a0) (l_e_st_eq_landau_n_rt_ispl2 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_3132_um10 ksi a0 x0 lx y0 uy u m o) a0) a0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn u) a0) x0 (l_e_st_eq_landau_n_rt_rp_3132_t26 ksi a0 x0 lx y0 uy u m o)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) a0) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o)).
-
-(* constant 2206 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t28 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.λp:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o).(l_e_symis l_e_st_eq_landau_n_rt_rat a0 (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t1 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o) p)) (l_e_st_eq_landau_n_rt_satz101g (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) a0 (l_e_st_eq_landau_n_rt_rp_3132_t1 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o) p) (l_e_st_eq_landau_n_rt_rp_3132_t27 ksi a0 x0 lx y0 uy u m o)) : l_e_st_eq_landau_n_rt_rp_3132_prop2 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o) p).
-
-(* constant 2207 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t29 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_andi (l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o)) (∀t:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o).l_e_st_eq_landau_n_rt_rp_3132_prop2 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o) t) (l_e_st_eq_landau_n_rt_rp_3132_t25 ksi a0 x0 lx y0 uy u m o) (λt:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o).l_e_st_eq_landau_n_rt_rp_3132_t28 ksi a0 x0 lx y0 uy u m o t) : l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o)).
-
-(* constant 2208 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t30 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) y) (l_e_st_eq_landau_n_rt_rp_3132_w0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t29 ksi a0 x0 lx y0 uy u m o) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) y)).
-
-(* constant 2209 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t31 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.λo:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x y)) (l_e_st_eq_landau_n_rt_rp_3132_v0 ksi a0 x0 lx y0 uy u m o) (l_e_st_eq_landau_n_rt_rp_3132_t30 ksi a0 x0 lx y0 uy u m o) : l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0).
-
-(* constant 2210 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t32 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λu:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_min (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) a0))) u.(l_orapp (l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0) (l_e_st_eq_landau_n_satz24 u) (λt:l_e_st_eq_landau_n_more u l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_3132_t31 ksi a0 x0 lx y0 uy u m t) (λt:l_e_st_eq_landau_n_is u l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_3132_t16 ksi a0 x0 lx y0 uy u m t) : l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0).
-
-(* constant 2211 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t34 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_someapp l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn y) a0))) x) (l_e_st_eq_landau_n_satz27 (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn y) a0))) (l_e_st_eq_landau_n_rt_rp_3132_t7 ksi a0 x0 lx y0 uy)) (l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0) (λx:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_min (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn y) a0))) x.l_e_st_eq_landau_n_rt_rp_3132_t32 ksi a0 x0 lx y0 uy x t) : l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0).
-
-(* constant 2212 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t35 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_e_st_eq_landau_n_rt_cutapp1b ksi (l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi y.l_e_st_eq_landau_n_rt_rp_3132_t34 ksi a0 x0 lx y t) : l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0).
-
-(* constant 2213 *)
-definition l_e_st_eq_landau_n_rt_rp_satz132 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λa0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_cutapp1a ksi (l_e_st_eq_landau_n_rt_rp_3132_prop4 ksi a0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_rp_3132_t35 ksi a0 x t) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_and (l_e_st_eq_landau_n_rt_lrt ksi x) (l_e_st_eq_landau_n_rt_urt ksi y)) (∀t:l_and (l_e_st_eq_landau_n_rt_lrt ksi x) (l_e_st_eq_landau_n_rt_urt ksi y).l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x (l_ande1 (l_e_st_eq_landau_n_rt_lrt ksi x) (l_e_st_eq_landau_n_rt_urt ksi y) t) y (l_ande2 (l_e_st_eq_landau_n_rt_lrt ksi x) (l_e_st_eq_landau_n_rt_urt ksi y) t))) a0)))).
-
-(* constant 2214 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t36 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λp3:l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y0.(l_ande1 (l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0) (∀t:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0.l_e_st_eq_landau_n_rt_rp_3132_prop2 ksi a0 x0 y0 t) p3 : l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0).
-
-(* constant 2215 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t37 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λp3:l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y0.(l_r_ande2 (l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0) (λt:l_e_st_eq_landau_n_rt_rp_3132_prop1 ksi a0 x0 y0.l_e_st_eq_landau_n_rt_rp_3132_prop2 ksi a0 x0 y0 t) p3 : l_e_st_eq_landau_n_rt_rp_3132_prop2 ksi a0 x0 y0 (l_e_st_eq_landau_n_rt_rp_3132_t36 ksi p a0 p1 x0 s y0 p3)).
-
-(* constant 2216 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t38 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λp3:l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y0.(l_ande1 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_rp_3132_t36 ksi p a0 p1 x0 s y0 p3) : l_e_st_eq_landau_n_rt_lrt ksi x0).
-
-(* constant 2217 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t39 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λp3:l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y0.(l_ande2 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_rp_3132_t36 ksi p a0 p1 x0 s y0 p3) : l_e_st_eq_landau_n_rt_urt ksi y0).
-
-(* constant 2218 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t40 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λp3:l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y0.(l_e_st_eq_landau_n_rt_satz101g y0 x0 (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 (l_e_st_eq_landau_n_rt_rp_3132_t38 ksi p a0 p1 x0 s y0 p3) y0 (l_e_st_eq_landau_n_rt_rp_3132_t39 ksi p a0 p1 x0 s y0 p3))) (l_e_st_eq_landau_n_rt_rp_3132_t1 ksi a0 x0 y0 (l_e_st_eq_landau_n_rt_rp_3132_t36 ksi p a0 p1 x0 s y0 p3)) (l_e_st_eq_landau_n_rt_satz101c y0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 (l_e_st_eq_landau_n_rt_rp_3132_t38 ksi p a0 p1 x0 s y0 p3) y0 (l_e_st_eq_landau_n_rt_rp_3132_t39 ksi p a0 p1 x0 s y0 p3))) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 (l_e_st_eq_landau_n_rt_rp_3132_t38 ksi p a0 p1 x0 s y0 p3) y0 (l_e_st_eq_landau_n_rt_rp_3132_t39 ksi p a0 p1 x0 s y0 p3))) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t1 ksi a0 x0 y0 (l_e_st_eq_landau_n_rt_rp_3132_t36 ksi p a0 p1 x0 s y0 p3)))).
-
-(* constant 2219 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t41 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λp3:l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y0.(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 (l_e_st_eq_landau_n_rt_rp_3132_t38 ksi p a0 p1 x0 s y0 p3) y0 (l_e_st_eq_landau_n_rt_rp_3132_t39 ksi p a0 p1 x0 s y0 p3))) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_3132_t1 ksi a0 x0 y0 (l_e_st_eq_landau_n_rt_rp_3132_t36 ksi p a0 p1 x0 s y0 p3))) a0 (l_e_st_eq_landau_n_rt_rp_3132_t40 ksi p a0 p1 x0 s y0 p3) (l_e_st_eq_landau_n_rt_rp_3132_t37 ksi p a0 p1 x0 s y0 p3) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 (l_e_st_eq_landau_n_rt_rp_3132_t38 ksi p a0 p1 x0 s y0 p3) y0 (l_e_st_eq_landau_n_rt_rp_3132_t39 ksi p a0 p1 x0 s y0 p3))) a0).
-
-(* constant 2220 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t42 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λp3:l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y0.(p1 x0 (l_e_st_eq_landau_n_rt_rp_3132_t38 ksi p a0 p1 x0 s y0 p3) y0 (l_e_st_eq_landau_n_rt_rp_3132_t39 ksi p a0 p1 x0 s y0 p3) (l_e_st_eq_landau_n_rt_rp_3132_t41 ksi p a0 p1 x0 s y0 p3) : p).
-
-(* constant 2221 *)
-definition l_e_st_eq_landau_n_rt_rp_3132_t43 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y).(l_someapp l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y) s p (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x0 y.l_e_st_eq_landau_n_rt_rp_3132_t42 ksi p a0 p1 x0 s y t) : p).
-
-(* constant 2222 *)
-definition l_e_st_eq_landau_n_rt_rp_satz132app ≝ λksi:l_e_st_eq_landau_n_rt_cut.λp:Prop.λa0:l_e_st_eq_landau_n_rt_rat.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) a0.p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x y)) (l_e_st_eq_landau_n_rt_rp_satz132 ksi a0) p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_3132_prop3 ksi a0 x y).l_e_st_eq_landau_n_rt_rp_3132_t43 ksi p a0 p1 x t) : p).
-
-(* constant 2223 *)
-definition l_e_st_eq_landau_n_rt_rp_3133_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt ksi u0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn u0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx u0 uu)) y0.(l_e_tris l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_pl x0 (l_e_st_eq_landau_n_rt_mn u0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx u0 uu))) (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_satz101d u0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx u0 uu)) (l_e_st_eq_landau_n_rt_ispl2 (l_e_st_eq_landau_n_rt_mn u0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx u0 uu)) y0 x0 i) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 2224 *)
-definition l_e_st_eq_landau_n_rt_rp_3133_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt ksi u0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn u0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx u0 uu)) y0.(l_e_st_eq_landau_n_rt_rp_lrtpl ksi eta u0 x0 lx y0 ly (l_e_st_eq_landau_n_rt_rp_3133_t1 ksi eta y0 ly x0 lx u0 uu i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) u0).
-
-(* constant 2225 *)
-definition l_e_st_eq_landau_n_rt_rp_3133_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt ksi u0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn u0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx u0 uu)) y0.(l_andi (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) u0) (l_e_st_eq_landau_n_rt_urt ksi u0) (l_e_st_eq_landau_n_rt_rp_3133_t2 ksi eta y0 ly x0 lx u0 uu i) uu : l_and (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) u0) (l_e_st_eq_landau_n_rt_urt ksi u0)).
-
-(* constant 2226 *)
-definition l_e_st_eq_landau_n_rt_rp_3133_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt ksi u0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn u0 x0 (l_e_st_eq_landau_n_rt_cutapp2b ksi x0 lx u0 uu)) y0.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi eta) x) (l_e_st_eq_landau_n_rt_urt ksi x)) u0 (l_e_st_eq_landau_n_rt_rp_3133_t3 ksi eta y0 ly x0 lx u0 uu i) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi eta) ksi).
-
-(* constant 2227 *)
-definition l_e_st_eq_landau_n_rt_rp_3133_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.(l_e_st_eq_landau_n_rt_rp_satz132app ksi (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi eta) ksi) y0 (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt ksi y.λv:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) y0.l_e_st_eq_landau_n_rt_rp_3133_t4 ksi eta y0 ly x t y u v) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi eta) ksi).
-
-(* constant 2228 *)
-definition l_e_st_eq_landau_n_rt_rp_satz133 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_cutapp1a eta (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi eta) ksi) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta x.l_e_st_eq_landau_n_rt_rp_3133_t5 ksi eta x t) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi eta) ksi).
-
-(* constant 2229 *)
-definition l_e_st_eq_landau_n_rt_rp_satz133a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_pl ksi eta) ksi (l_e_st_eq_landau_n_rt_rp_satz133 ksi eta) : l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_pl ksi eta)).
-
-(* constant 2230 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_rp_satz119a eta y0 uy x0 l : l_e_st_eq_landau_n_rt_urt eta x0).
-
-(* constant 2231 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_satz83 y0 x0 l : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 2232 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt zeta u0.λz0:l_e_st_eq_landau_n_rt_rat.λuz:l_e_st_eq_landau_n_rt_urt zeta z0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)).(l_e_tris l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) u0) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)) u0) (l_e_st_eq_landau_n_rt_satz101f z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) (l_e_st_eq_landau_n_rt_ispl1 (l_e_st_eq_landau_n_rt_mn z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)) u0 i) : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)) u0)).
-
-(* constant 2233 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt zeta u0.λz0:l_e_st_eq_landau_n_rt_rat.λuz:l_e_st_eq_landau_n_rt_urt zeta z0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)).(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)) u0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l))) u0) (l_e_st_eq_landau_n_rt_pl x0 u0) (l_e_st_eq_landau_n_rt_ispl2 z0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)) u0) y0 (l_e_st_eq_landau_n_rt_rp_3134_t3 ksi eta zeta m y0 ly uy x0 lx l u0 lu z0 uz i)) (l_e_st_eq_landau_n_rt_asspl2 y0 (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)) u0) (l_e_st_eq_landau_n_rt_ispl1 (l_e_st_eq_landau_n_rt_pl y0 (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l))) x0 u0 (l_e_st_eq_landau_n_rt_satz101c x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l))) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_pl x0 u0)).
-
-(* constant 2234 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt zeta u0.λz0:l_e_st_eq_landau_n_rt_rat.λuz:l_e_st_eq_landau_n_rt_urt zeta z0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)).(l_e_st_eq_landau_n_rt_rp_lrtpl ksi zeta (l_e_st_eq_landau_n_rt_pl y0 z0) x0 lx u0 lu (l_e_st_eq_landau_n_rt_rp_3134_t4 ksi eta zeta m y0 ly uy x0 lx l u0 lu z0 uz i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 2235 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt zeta u0.λz0:l_e_st_eq_landau_n_rt_rat.λuz:l_e_st_eq_landau_n_rt_urt zeta z0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)).(l_e_st_eq_landau_n_rt_rp_urtpl eta zeta (l_e_st_eq_landau_n_rt_pl y0 z0) y0 uy z0 uz (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl y0 z0)) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 2236 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt zeta u0.λz0:l_e_st_eq_landau_n_rt_rat.λuz:l_e_st_eq_landau_n_rt_urt zeta z0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)).(l_andi (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_rp_3134_t5 ksi eta zeta m y0 ly uy x0 lx l u0 lu z0 uz i) (l_e_st_eq_landau_n_rt_rp_3134_t6 ksi eta zeta m y0 ly uy x0 lx l u0 lu z0 uz i) : l_and (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_pl y0 z0))).
-
-(* constant 2237 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt zeta u0.λz0:l_e_st_eq_landau_n_rt_rat.λuz:l_e_st_eq_landau_n_rt_urt zeta z0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn z0 u0 (l_e_st_eq_landau_n_rt_cutapp2b zeta u0 lu z0 uz)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) x) (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) x)) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_rp_3134_t7 ksi eta zeta m y0 ly uy x0 lx l u0 lu z0 uz i) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2238 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_rp_satz132app zeta (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt zeta x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt zeta y.λv:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b zeta x t y u)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta zeta m y0 ly uy x0 lx l)).l_e_st_eq_landau_n_rt_rp_3134_t8 ksi eta zeta m y0 ly uy x0 lx l x t y u v) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2239 *)
-definition l_e_st_eq_landau_n_rt_rp_3134_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.(l_e_st_eq_landau_n_rt_cutapp3 ksi y0 ly (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_less y0 x.l_e_st_eq_landau_n_rt_rp_3134_t9 ksi eta zeta m y0 ly uy x t u) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2240 *)
-definition l_e_st_eq_landau_n_rt_rp_satz134 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_moreapp ksi eta m (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_urt eta x.l_e_st_eq_landau_n_rt_rp_3134_t10 ksi eta zeta m x t u) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2241 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_satz134 ksi eta zeta m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2242 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_st_eq_landau_n_rt_rp_ispl1 ksi eta zeta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2243 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz134 eta ksi zeta (l_e_st_eq_landau_n_rt_rp_satz122 ksi eta l)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2244 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta eta) (l_e_st_eq_landau_n_rt_rp_compl ksi zeta) (l_e_st_eq_landau_n_rt_rp_compl eta zeta) (l_e_st_eq_landau_n_rt_rp_satz135a ksi eta zeta m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl zeta eta)).
-
-(* constant 2245 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135e ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_st_eq_landau_n_rt_rp_ispl2 ksi eta zeta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl zeta eta)).
-
-(* constant 2246 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135f ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta eta) (l_e_st_eq_landau_n_rt_rp_compl ksi zeta) (l_e_st_eq_landau_n_rt_rp_compl eta zeta) (l_e_st_eq_landau_n_rt_rp_satz135c ksi eta zeta l) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl zeta eta)).
-
-(* constant 2247 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135g ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λm:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_ismore2 (l_e_st_eq_landau_n_rt_rp_pl ksi upsilon) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_ispl1 ksi eta upsilon i) (l_e_st_eq_landau_n_rt_rp_satz135d zeta upsilon ksi m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2248 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135h ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λm:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_pl upsilon eta) (l_e_st_eq_landau_n_rt_rp_compl ksi zeta) (l_e_st_eq_landau_n_rt_rp_compl eta upsilon) (l_e_st_eq_landau_n_rt_rp_satz135g ksi eta zeta upsilon i m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl upsilon eta)).
-
-(* constant 2249 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135j ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less zeta upsilon.(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_pl ksi upsilon) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_ispl1 ksi eta upsilon i) (l_e_st_eq_landau_n_rt_rp_satz135f zeta upsilon ksi l) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2250 *)
-definition l_e_st_eq_landau_n_rt_rp_satz135k ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less zeta upsilon.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_pl upsilon eta) (l_e_st_eq_landau_n_rt_rp_compl ksi zeta) (l_e_st_eq_landau_n_rt_rp_compl eta upsilon) (l_e_st_eq_landau_n_rt_rp_satz135j ksi eta zeta upsilon i l) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl upsilon eta)).
-
-(* constant 2251 *)
-definition l_e_st_eq_landau_n_rt_rp_3136_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz123a ksi eta : l_or3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2252 *)
-definition l_e_st_eq_landau_n_rt_rp_3136_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) : l_ec3 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta))).
-
-(* constant 2253 *)
-definition l_e_st_eq_landau_n_rt_rp_satz136a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta).(l_ec3_th11 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_3136_t1 ksi eta zeta) (l_e_st_eq_landau_n_rt_rp_3136_t2 ksi eta zeta) (λu:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_satz135b ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz135a ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_satz135c ksi eta zeta u) m : l_e_st_eq_landau_n_rt_rp_more ksi eta).
-
-(* constant 2254 *)
-definition l_e_st_eq_landau_n_rt_rp_satz136b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta).(l_ec3_th10 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_3136_t1 ksi eta zeta) (l_e_st_eq_landau_n_rt_rp_3136_t2 ksi eta zeta) (λu:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_satz135b ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz135a ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_satz135c ksi eta zeta u) i : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 2255 *)
-definition l_e_st_eq_landau_n_rt_rp_satz136c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta).(l_ec3_th12 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_3136_t1 ksi eta zeta) (l_e_st_eq_landau_n_rt_rp_3136_t2 ksi eta zeta) (λu:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_satz135b ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz135a ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_satz135c ksi eta zeta u) l : l_e_st_eq_landau_n_rt_rp_less ksi eta).
-
-(* constant 2256 *)
-definition l_e_st_eq_landau_n_rt_rp_satz136d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl zeta eta).(l_e_st_eq_landau_n_rt_rp_satz136a ksi eta zeta (l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta eta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_compl zeta ksi) (l_e_st_eq_landau_n_rt_rp_compl zeta eta) m) : l_e_st_eq_landau_n_rt_rp_more ksi eta).
-
-(* constant 2257 *)
-definition l_e_st_eq_landau_n_rt_rp_satz136e ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl zeta eta).(l_e_st_eq_landau_n_rt_rp_satz136b ksi eta zeta (l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl zeta eta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_compl ksi zeta) i (l_e_st_eq_landau_n_rt_rp_compl zeta eta)) : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 2258 *)
-definition l_e_st_eq_landau_n_rt_rp_satz136f ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl zeta eta).(l_e_st_eq_landau_n_rt_rp_satz136c ksi eta zeta (l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl zeta ksi) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl zeta eta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_compl zeta ksi) (l_e_st_eq_landau_n_rt_rp_compl zeta eta) l) : l_e_st_eq_landau_n_rt_rp_less ksi eta).
-
-(* constant 2259 *)
-definition l_e_st_eq_landau_n_rt_rp_3137_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz134 ksi eta zeta m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta)).
-
-(* constant 2260 *)
-definition l_e_st_eq_landau_n_rt_rp_3137_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl zeta eta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_pl upsilon eta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_compl zeta eta) (l_e_st_eq_landau_n_rt_rp_compl upsilon eta) (l_e_st_eq_landau_n_rt_rp_satz134 zeta upsilon eta n) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2261 *)
-definition l_e_st_eq_landau_n_rt_rp_satz137 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_trmore (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_3137_t1 ksi eta zeta upsilon m n) (l_e_st_eq_landau_n_rt_rp_3137_t2 ksi eta zeta upsilon m n) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2262 *)
-definition l_e_st_eq_landau_n_rt_rp_satz137a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz137 eta ksi upsilon zeta (l_e_st_eq_landau_n_rt_rp_satz122 ksi eta l) (l_e_st_eq_landau_n_rt_rp_satz122 zeta upsilon k)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2263 *)
-definition l_e_st_eq_landau_n_rt_rp_satz138a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_orapp (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)) m (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz137 ksi eta zeta upsilon t n) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_satz135g ksi eta zeta upsilon t n) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2264 *)
-definition l_e_st_eq_landau_n_rt_rp_satz138b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.(l_orapp (l_e_st_eq_landau_n_rt_rp_more zeta upsilon) (l_e_st_eq_landau_n_rt_rp_is zeta upsilon) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)) n (λt:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.l_e_st_eq_landau_n_rt_rp_satz137 ksi eta zeta upsilon m t) (λt:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.l_e_st_eq_landau_n_rt_rp_satz135h zeta upsilon ksi eta t m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2265 *)
-definition l_e_st_eq_landau_n_rt_rp_satz138c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz138a eta ksi upsilon zeta (l_e_st_eq_landau_n_rt_rp_satz125 ksi eta l) (l_e_st_eq_landau_n_rt_rp_satz122 zeta upsilon k)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2266 *)
-definition l_e_st_eq_landau_n_rt_rp_satz138d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz138b eta ksi upsilon zeta (l_e_st_eq_landau_n_rt_rp_satz122 ksi eta l) (l_e_st_eq_landau_n_rt_rp_satz125 zeta upsilon k)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2267 *)
-definition l_e_st_eq_landau_n_rt_rp_3139_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.(l_e_st_eq_landau_n_rt_rp_moreisi2 (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_ispl12 ksi eta zeta upsilon i j) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2268 *)
-definition l_e_st_eq_landau_n_rt_rp_3139_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λo:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_moreisi1 (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_satz138a ksi eta zeta upsilon m o) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2269 *)
-definition l_e_st_eq_landau_n_rt_rp_3139_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_orapp (l_e_st_eq_landau_n_rt_rp_more zeta upsilon) (l_e_st_eq_landau_n_rt_rp_is zeta upsilon) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)) n (λt:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.l_e_st_eq_landau_n_rt_rp_3139_t2 ksi eta zeta upsilon m n i t) (λt:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.l_e_st_eq_landau_n_rt_rp_3139_t1 ksi eta zeta upsilon m n i t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2270 *)
-definition l_e_st_eq_landau_n_rt_rp_3139_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.λo:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_moreisi1 (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_satz138b ksi eta zeta upsilon o n) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2271 *)
-definition l_e_st_eq_landau_n_rt_rp_satz139 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.(l_orapp (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)) m (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_3139_t4 ksi eta zeta upsilon m n t) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_3139_t3 ksi eta zeta upsilon m n t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2272 *)
-definition l_e_st_eq_landau_n_rt_rp_satz139a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz124 (l_e_st_eq_landau_n_rt_rp_pl eta upsilon) (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz139 eta ksi upsilon zeta (l_e_st_eq_landau_n_rt_rp_satz125 ksi eta l) (l_e_st_eq_landau_n_rt_rp_satz125 zeta upsilon k)) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_pl ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl eta upsilon)).
-
-(* constant 2273 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λphi:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta phi) ksi.(l_e_st_eq_landau_n_rt_rp_ismore1 (l_e_st_eq_landau_n_rt_rp_pl eta phi) ksi eta i (l_e_st_eq_landau_n_rt_rp_satz133 eta phi) : l_e_st_eq_landau_n_rt_rp_more ksi eta).
-
-(* constant 2274 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λphi:l_e_st_eq_landau_n_rt_cut.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta phi) ksi) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_satz123d ksi eta l) (λt:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta phi) ksi.l_e_st_eq_landau_n_rt_rp_3140_t1 ksi eta l phi t) : l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_pl eta phi) ksi).
-
-(* constant 2275 *)
-definition l_e_st_eq_landau_n_rt_rp_vorbemerkung140 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.(l_some_th5 l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta a) ksi) (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_3140_t2 ksi eta l a) : l_not (l_e_st_eq_landau_n_rt_rp_some (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta a) ksi))).
-
-(* constant 2276 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more phi psi.(l_e_st_eq_landau_n_rt_rp_satz135d phi psi eta m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)).
-
-(* constant 2277 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more phi psi.(l_ec3e21 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_3140_t3 ksi eta phi psi m) : l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)).
-
-(* constant 2278 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less phi psi.(l_e_st_eq_landau_n_rt_rp_satz135f phi psi eta l : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)).
-
-(* constant 2279 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less phi psi.(l_ec3e31 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_3140_t5 ksi eta phi psi l) : l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)).
-
-(* constant 2280 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_nis phi psi.(l_or3_th1 (l_e_st_eq_landau_n_rt_rp_is phi psi) (l_e_st_eq_landau_n_rt_rp_more phi psi) (l_e_st_eq_landau_n_rt_rp_less phi psi) (l_e_st_eq_landau_n_rt_rp_satz123a phi psi) n : l_or (l_e_st_eq_landau_n_rt_rp_more phi psi) (l_e_st_eq_landau_n_rt_rp_less phi psi)).
-
-(* constant 2281 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_nis phi psi.(l_orapp (l_e_st_eq_landau_n_rt_rp_more phi psi) (l_e_st_eq_landau_n_rt_rp_less phi psi) (l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_st_eq_landau_n_rt_rp_3140_t7 ksi eta phi psi n) (λt:l_e_st_eq_landau_n_rt_rp_more phi psi.l_e_st_eq_landau_n_rt_rp_3140_t4 ksi eta phi psi t) (λt:l_e_st_eq_landau_n_rt_rp_less phi psi.l_e_st_eq_landau_n_rt_rp_3140_t6 ksi eta phi psi t) : l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)).
-
-(* constant 2282 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta phi) ksi.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta psi) ksi.(l_imp_th7 (l_e_st_eq_landau_n_rt_rp_is phi psi) (l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_weli (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi)) (l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl eta phi) (l_e_st_eq_landau_n_rt_rp_pl eta psi) ksi i j)) (λt:l_e_st_eq_landau_n_rt_rp_nis phi psi.l_e_st_eq_landau_n_rt_rp_3140_t8 ksi eta phi psi t) : l_e_st_eq_landau_n_rt_rp_is phi psi).
-
-(* constant 2283 *)
-definition l_e_st_eq_landau_n_rt_rp_diffprop1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_and (l_e_st_eq_landau_n_rt_more x0 y0) (∀t:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 t)) : Prop).
-
-(* constant 2284 *)
-definition l_e_st_eq_landau_n_rt_rp_diffprop2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_and3 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta y0) (l_e_st_eq_landau_n_rt_rp_diffprop1 ksi eta z0 x0 y0) : Prop).
-
-(* constant 2285 *)
-definition l_e_st_eq_landau_n_rt_rp_diffprop ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x y)) : Prop).
-
-(* constant 2286 *)
-definition l_e_st_eq_landau_n_rt_rp_diff ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop ksi eta z) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2287 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t11a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 m).λm1:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_tris l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_mn x0 y0 m) (l_e_st_eq_landau_n_rt_mn x0 y0 m1) i (l_e_st_eq_landau_n_rt_satz101g x0 y0 (l_e_st_eq_landau_n_rt_mn x0 y0 m) m1 (l_e_st_eq_landau_n_rt_satz101c x0 y0 m)) : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 m1)).
-
-(* constant 2288 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 m).(l_andi (l_e_st_eq_landau_n_rt_more x0 y0) (∀t:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 t)) m (λt:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_rp_iii3_t11a ksi eta z0 x0 lx y0 uy m i t) : l_e_st_eq_landau_n_rt_rp_diffprop1 ksi eta z0 x0 y0).
-
-(* constant 2289 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 m).(l_and3i (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta y0) (l_e_st_eq_landau_n_rt_rp_diffprop1 ksi eta z0 x0 y0) lx uy (l_e_st_eq_landau_n_rt_rp_iii3_t12 ksi eta z0 x0 lx y0 uy m i) : l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y0).
-
-(* constant 2290 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 m).(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y) y0 (l_e_st_eq_landau_n_rt_rp_iii3_t13 ksi eta z0 x0 lx y0 uy m i) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y)).
-
-(* constant 2291 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 m).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x y)) x0 (l_e_st_eq_landau_n_rt_rp_iii3_t14 ksi eta z0 x0 lx y0 uy m i) : l_e_st_eq_landau_n_rt_rp_diffprop ksi eta z0).
-
-(* constant 2292 *)
-definition l_e_st_eq_landau_n_rt_rp_diff1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λm:l_e_st_eq_landau_n_rt_more x0 y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 m).(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop ksi eta z) z0 (l_e_st_eq_landau_n_rt_rp_iii3_t15 ksi eta z0 x0 lx y0 uy m i) : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2293 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop ksi eta z) z0 i : l_e_st_eq_landau_n_rt_rp_diffprop ksi eta z0).
-
-(* constant 2294 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y0.(l_and3e1 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta y0) (l_e_st_eq_landau_n_rt_rp_diffprop1 ksi eta z0 x0 y0) py : l_e_st_eq_landau_n_rt_lrt ksi x0).
-
-(* constant 2295 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y0.(l_and3e2 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta y0) (l_e_st_eq_landau_n_rt_rp_diffprop1 ksi eta z0 x0 y0) py : l_e_st_eq_landau_n_rt_urt eta y0).
-
-(* constant 2296 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y0.(l_and3e3 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_urt eta y0) (l_e_st_eq_landau_n_rt_rp_diffprop1 ksi eta z0 x0 y0) py : l_e_st_eq_landau_n_rt_rp_diffprop1 ksi eta z0 x0 y0).
-
-(* constant 2297 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y0.(l_ande1 (l_e_st_eq_landau_n_rt_more x0 y0) (∀t:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 t)) (l_e_st_eq_landau_n_rt_rp_iii3_t19 ksi eta z0 i p p1 x0 px y0 py) : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 2298 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y0.(l_r_ande2 (l_e_st_eq_landau_n_rt_more x0 y0) (λt:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 t)) (l_e_st_eq_landau_n_rt_rp_iii3_t19 ksi eta z0 i p p1 x0 px y0 py) : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_iii3_t20 ksi eta z0 i p p1 x0 px y0 py))).
-
-(* constant 2299 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y0.(p1 x0 (l_e_st_eq_landau_n_rt_rp_iii3_t17 ksi eta z0 i p p1 x0 px y0 py) y0 (l_e_st_eq_landau_n_rt_rp_iii3_t18 ksi eta z0 i p p1 x0 px y0 py) (l_e_st_eq_landau_n_rt_rp_iii3_t20 ksi eta z0 i p p1 x0 px y0 py) (l_e_st_eq_landau_n_rt_rp_iii3_t21 ksi eta z0 i p p1 x0 px y0 py) : p).
-
-(* constant 2300 *)
-definition l_e_st_eq_landau_n_rt_rp_iii3_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y).(l_someapp l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y) px p (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x0 y.l_e_st_eq_landau_n_rt_rp_iii3_t22 ksi eta z0 i p p1 x0 px y t) : p).
-
-(* constant 2301 *)
-definition l_e_st_eq_landau_n_rt_rp_diffapp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt eta y.∀v:l_e_st_eq_landau_n_rt_more x y.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x y)) (l_e_st_eq_landau_n_rt_rp_iii3_t16 ksi eta z0 i p p1) p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_diffprop2 ksi eta z0 x y).l_e_st_eq_landau_n_rt_rp_iii3_t23 ksi eta z0 i p p1 x t) : p).
-
-(* constant 2302 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_rp_3134_t2 ksi eta eta m y0 ly uy x0 lx l : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 2303 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_rp_diff1 ksi eta (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t9 ksi eta m y0 ly uy x0 lx l)) x0 lx y0 uy (l_e_st_eq_landau_n_rt_rp_3140_t9 ksi eta m y0 ly uy x0 lx l) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t9 ksi eta m y0 ly uy x0 lx l))) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t9 ksi eta m y0 ly uy x0 lx l)) (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2304 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_mn x0 y0 n) z0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 n) y0) x0 (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n) j) (l_e_st_eq_landau_n_rt_satz101e x0 y0 n) (l_e_st_eq_landau_n_rt_satz94a (l_e_st_eq_landau_n_rt_mn x0 y0 n) y0) : l_e_st_eq_landau_n_rt_less z0 x0).
-
-(* constant 2305 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_trless z0 x0 x1 (l_e_st_eq_landau_n_rt_rp_3140_t11 ksi eta m x1 ux z0 i x0 lx y0 uy n j) (l_e_st_eq_landau_n_rt_cutapp2a ksi x0 lx x1 ux) : l_e_st_eq_landau_n_rt_less z0 x1).
-
-(* constant 2306 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_ec3e31 (l_e_st_eq_landau_n_rt_is z0 x1) (l_e_st_eq_landau_n_rt_more z0 x1) (l_e_st_eq_landau_n_rt_less z0 x1) (l_e_st_eq_landau_n_rt_satz81b z0 x1) (l_e_st_eq_landau_n_rt_rp_3140_t12 ksi eta m x1 ux z0 i x0 lx y0 uy n j) : l_e_st_eq_landau_n_rt_nis z0 x1).
-
-(* constant 2307 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).(l_e_st_eq_landau_n_rt_rp_diffapp ksi eta z0 i (l_e_st_eq_landau_n_rt_nis z0 x1) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt eta y.λv:l_e_st_eq_landau_n_rt_more x y.λw:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).l_e_st_eq_landau_n_rt_rp_3140_t13 ksi eta m x1 ux z0 i x t y u v w) : l_e_st_eq_landau_n_rt_nis z0 x1).
-
-(* constant 2308 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.(l_imp_th3 (l_e_st_eq_landau_n_rt_in x1 (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_nis x1 x1) (l_weli (l_e_st_eq_landau_n_rt_is x1 x1) (l_e_refis l_e_st_eq_landau_n_rt_rat x1)) (λt:l_e_st_eq_landau_n_rt_in x1 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).l_e_st_eq_landau_n_rt_rp_3140_t14 ksi eta m x1 ux x1 t) : l_not (l_e_st_eq_landau_n_rt_in x1 (l_e_st_eq_landau_n_rt_rp_diff ksi eta))).
-
-(* constant 2309 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl z0 y0) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 n) y0) x0 (l_e_st_eq_landau_n_rt_ispl1 z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n) y0 j) (l_e_st_eq_landau_n_rt_satz101e x0 y0 n) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl z0 y0) x0).
-
-(* constant 2310 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_x2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_pl u0 y0 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2311 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_pl z0 y0) x0 (l_e_st_eq_landau_n_rt_rp_3140_x2 ksi eta m z0 i u0 l x0 lx y0 uy n j) (l_e_st_eq_landau_n_rt_rp_3140_t16 ksi eta m z0 i u0 l x0 lx y0 uy n j) (l_e_st_eq_landau_n_rt_satz96c u0 z0 y0 l) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_rp_3140_x2 ksi eta m z0 i u0 l x0 lx y0 uy n j) x0).
-
-(* constant 2312 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_rp_satz120 ksi x0 lx (l_e_st_eq_landau_n_rt_rp_3140_x2 ksi eta m z0 i u0 l x0 lx y0 uy n j) (l_e_st_eq_landau_n_rt_rp_3140_t17 ksi eta m z0 i u0 l x0 lx y0 uy n j) : l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_rp_3140_x2 ksi eta m z0 i u0 l x0 lx y0 uy n j)).
-
-(* constant 2313 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_ismore1 (l_e_st_eq_landau_n_rt_pl y0 u0) (l_e_st_eq_landau_n_rt_pl u0 y0) y0 (l_e_st_eq_landau_n_rt_compl y0 u0) (l_e_st_eq_landau_n_rt_satz94 y0 u0) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rp_3140_x2 ksi eta m z0 i u0 l x0 lx y0 uy n j) y0).
-
-(* constant 2314 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_satz101g (l_e_st_eq_landau_n_rt_rp_3140_x2 ksi eta m z0 i u0 l x0 lx y0 uy n j) y0 u0 (l_e_st_eq_landau_n_rt_rp_3140_t19 ksi eta m z0 i u0 l x0 lx y0 uy n j) (l_e_st_eq_landau_n_rt_compl y0 u0) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_3140_x2 ksi eta m z0 i u0 l x0 lx y0 uy n j) y0 (l_e_st_eq_landau_n_rt_rp_3140_t19 ksi eta m z0 i u0 l x0 lx y0 uy n j))).
-
-(* constant 2315 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_rp_diff1 ksi eta u0 (l_e_st_eq_landau_n_rt_rp_3140_x2 ksi eta m z0 i u0 l x0 lx y0 uy n j) (l_e_st_eq_landau_n_rt_rp_3140_t18 ksi eta m z0 i u0 l x0 lx y0 uy n j) y0 uy (l_e_st_eq_landau_n_rt_rp_3140_t19 ksi eta m z0 i u0 l x0 lx y0 uy n j) (l_e_st_eq_landau_n_rt_rp_3140_t20 ksi eta m z0 i u0 l x0 lx y0 uy n j) : l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2316 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.(l_e_st_eq_landau_n_rt_rp_diffapp ksi eta z0 i (l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt eta y.λv:l_e_st_eq_landau_n_rt_more x y.λw:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).l_e_st_eq_landau_n_rt_rp_3140_t21 ksi eta m z0 i u0 l x t y u v w) : l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2317 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).λx3:l_e_st_eq_landau_n_rt_rat.λlx3:l_e_st_eq_landau_n_rt_lrt ksi x3.λl:l_e_st_eq_landau_n_rt_less x0 x3.(l_e_st_eq_landau_n_rt_satz83 x0 x3 l : l_e_st_eq_landau_n_rt_more x3 x0).
-
-(* constant 2318 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t24 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).λx3:l_e_st_eq_landau_n_rt_rat.λlx3:l_e_st_eq_landau_n_rt_lrt ksi x3.λl:l_e_st_eq_landau_n_rt_less x0 x3.(l_e_st_eq_landau_n_rt_trmore x3 x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t23 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l) n : l_e_st_eq_landau_n_rt_more x3 y0).
-
-(* constant 2319 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t25 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).λx3:l_e_st_eq_landau_n_rt_rat.λlx3:l_e_st_eq_landau_n_rt_lrt ksi x3.λl:l_e_st_eq_landau_n_rt_less x0 x3.(l_e_st_eq_landau_n_rt_ismore12 x3 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) y0) x0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 n) y0) (l_e_st_eq_landau_n_rt_satz101f x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) (l_e_st_eq_landau_n_rt_satz101f x0 y0 n) (l_e_st_eq_landau_n_rt_rp_3140_t23 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) y0) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 n) y0)).
-
-(* constant 2320 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t26 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).λx3:l_e_st_eq_landau_n_rt_rat.λlx3:l_e_st_eq_landau_n_rt_lrt ksi x3.λl:l_e_st_eq_landau_n_rt_less x0 x3.(l_e_st_eq_landau_n_rt_satz97a (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) (l_e_st_eq_landau_n_rt_mn x0 y0 n) y0 (l_e_st_eq_landau_n_rt_rp_3140_t25 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) (l_e_st_eq_landau_n_rt_mn x0 y0 n)).
-
-(* constant 2321 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t27 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).λx3:l_e_st_eq_landau_n_rt_rat.λlx3:l_e_st_eq_landau_n_rt_lrt ksi x3.λl:l_e_st_eq_landau_n_rt_less x0 x3.(l_e_st_eq_landau_n_rt_ismore2 (l_e_st_eq_landau_n_rt_mn x0 y0 n) z0 (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n) j) (l_e_st_eq_landau_n_rt_rp_3140_t26 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) z0).
-
-(* constant 2322 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t28 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).λx3:l_e_st_eq_landau_n_rt_rat.λlx3:l_e_st_eq_landau_n_rt_lrt ksi x3.λl:l_e_st_eq_landau_n_rt_less x0 x3.(l_e_st_eq_landau_n_rt_rp_diff1 ksi eta (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) x3 lx3 y0 uy (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l))) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2323 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t29 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).λx3:l_e_st_eq_landau_n_rt_rat.λlx3:l_e_st_eq_landau_n_rt_lrt ksi x3.λl:l_e_st_eq_landau_n_rt_less x0 x3.(l_andi (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) z0) (l_e_st_eq_landau_n_rt_rp_3140_t28 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l) (l_e_st_eq_landau_n_rt_rp_3140_t27 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l) : l_and (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) z0)).
-
-(* constant 2324 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t30 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).λx3:l_e_st_eq_landau_n_rt_rat.λlx3:l_e_st_eq_landau_n_rt_lrt ksi x3.λl:l_e_st_eq_landau_n_rt_less x0 x3.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_more x z0)) (l_e_st_eq_landau_n_rt_mn x3 y0 (l_e_st_eq_landau_n_rt_rp_3140_t24 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l)) (l_e_st_eq_landau_n_rt_rp_3140_t29 ksi eta m z0 i x0 lx y0 uy n j x3 lx3 l) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_more x z0))).
-
-(* constant 2325 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t31 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λn:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x0 y0 n).(l_e_st_eq_landau_n_rt_cutapp3 ksi x0 lx (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_more x z0))) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi y.λu:l_e_st_eq_landau_n_rt_less x0 y.l_e_st_eq_landau_n_rt_rp_3140_t30 ksi eta m z0 i x0 lx y0 uy n j y t u) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_more x z0))).
-
-(* constant 2326 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t32 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_diff ksi eta).(l_e_st_eq_landau_n_rt_rp_diffapp ksi eta z0 i (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_more x z0))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt eta y.λv:l_e_st_eq_landau_n_rt_more x y.λw:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_mn x y v).l_e_st_eq_landau_n_rt_rp_3140_t31 ksi eta m z0 i x t y u v w) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (l_e_st_eq_landau_n_rt_more x z0))).
-
-(* constant 2327 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t33 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.(l_e_st_eq_landau_n_rt_cut2 (l_e_st_eq_landau_n_rt_rp_diff ksi eta) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t9 ksi eta m y0 ly uy x0 lx l)) (l_e_st_eq_landau_n_rt_rp_3140_t10 ksi eta m y0 ly uy x0 lx l) x1 (l_e_st_eq_landau_n_rt_rp_3140_t15 ksi eta m x1 ux1) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_diff ksi eta).λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_rp_3140_t22 ksi eta m x t y u) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_diff ksi eta).l_e_st_eq_landau_n_rt_rp_3140_t32 ksi eta m x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2328 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t34 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_cutapp1b ksi (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.l_e_st_eq_landau_n_rt_rp_3140_t33 ksi eta m y0 ly uy x0 lx l x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2329 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t35 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.(l_e_st_eq_landau_n_rt_cutapp3 ksi y0 ly (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_less y0 x.l_e_st_eq_landau_n_rt_rp_3140_t34 ksi eta m y0 ly uy x t u) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2330 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140h ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_moreapp ksi eta m (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_diff ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt ksi x.λv:l_e_st_eq_landau_n_rt_urt eta x.l_e_st_eq_landau_n_rt_rp_3140_t35 ksi eta m x u v) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_diff ksi eta)).
-
-(* constant 2331 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_chi ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_cutof (l_e_st_eq_landau_n_rt_rp_diff ksi eta) (l_e_st_eq_landau_n_rt_rp_satz140h ksi eta m) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2332 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t36 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) z0.λy1:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y1.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl y1 u0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λo:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_mn x0 y0 o).(l_e_st_eq_landau_n_rt_cutapp2b eta y1 ly y0 uy : l_e_st_eq_landau_n_rt_more y0 y1).
-
-(* constant 2333 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t37 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) z0.λy1:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y1.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl y1 u0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λo:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_mn x0 y0 o).(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t36 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j))) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) (l_e_st_eq_landau_n_rt_pl y1 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t36 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j)))) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y0) x0 (l_e_st_eq_landau_n_rt_asspl1 (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t36 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j))) (l_e_st_eq_landau_n_rt_ispl2 (l_e_st_eq_landau_n_rt_pl y1 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t36 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j))) y0 (l_e_st_eq_landau_n_rt_mn x0 y0 o) (l_e_st_eq_landau_n_rt_satz101c y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t36 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j))) (l_e_st_eq_landau_n_rt_satz101e x0 y0 o) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t36 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j))) x0).
-
-(* constant 2334 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t38 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) z0.λy1:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y1.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl y1 u0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λo:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_mn x0 y0 o).(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t36 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j))) x0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) (l_e_st_eq_landau_n_rt_rp_3140_t37 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j) (l_e_st_eq_landau_n_rt_satz94a (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t36 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j))) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) x0).
-
-(* constant 2335 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t39 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) z0.λy1:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y1.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl y1 u0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λo:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_mn x0 y0 o).(l_e_tr3is l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_pl y1 u0) (l_e_st_eq_landau_n_rt_pl u0 y1) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) i (l_e_st_eq_landau_n_rt_compl y1 u0) (l_e_st_eq_landau_n_rt_ispl1 u0 (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1 j) : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1)).
-
-(* constant 2336 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t40 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) z0.λy1:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y1.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl y1 u0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λo:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_mn x0 y0 o).(l_e_st_eq_landau_n_rt_isless1 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) z0 x0 (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 o) y1) (l_e_st_eq_landau_n_rt_rp_3140_t39 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j)) (l_e_st_eq_landau_n_rt_rp_3140_t38 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j) : l_e_st_eq_landau_n_rt_less z0 x0).
-
-(* constant 2337 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t41 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) z0.λy1:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y1.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl y1 u0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λo:l_e_st_eq_landau_n_rt_more x0 y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_mn x0 y0 o).(l_e_st_eq_landau_n_rt_rp_satz120 ksi x0 lx z0 (l_e_st_eq_landau_n_rt_rp_3140_t40 ksi eta m z0 lz y1 ly u0 lu i x0 lx y0 uy o j) : l_e_st_eq_landau_n_rt_lrt ksi z0).
-
-(* constant 2338 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t42 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) z0.λy1:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y1.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl y1 u0).(l_e_st_eq_landau_n_rt_rp_diffapp ksi eta u0 (l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_rp_diff ksi eta) (l_e_st_eq_landau_n_rt_rp_satz140h ksi eta m) u0 lu) (l_e_st_eq_landau_n_rt_lrt ksi z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt eta y.λv:l_e_st_eq_landau_n_rt_more x y.λw:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_mn x y v).l_e_st_eq_landau_n_rt_rp_3140_t41 ksi eta m z0 lz y1 ly u0 lu i x t y u v w) : l_e_st_eq_landau_n_rt_lrt ksi z0).
-
-(* constant 2339 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) z0.(l_e_st_eq_landau_n_rt_rp_plapp eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) z0 lz (l_e_st_eq_landau_n_rt_lrt ksi z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_3140_t42 ksi eta m z0 lz x t y u v) : l_e_st_eq_landau_n_rt_lrt ksi z0).
-
-(* constant 2340 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t43 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_satz83 y0 x0 l : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 2341 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t44 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.(l_e_st_eq_landau_n_rt_cutapp2b eta y1 ly1 y2 uy2 : l_e_st_eq_landau_n_rt_more y2 y1).
-
-(* constant 2342 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t45 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).(l_e_st_eq_landau_n_rt_cutapp2b eta y1 ly1 y0 uy : l_e_st_eq_landau_n_rt_more y0 y1).
-
-(* constant 2343 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t46 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).(l_e_tris l_e_st_eq_landau_n_rt_rat y2 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) y1) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) y1) (l_e_st_eq_landau_n_rt_satz101f y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_ispl1 (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) y1 i) : l_e_st_eq_landau_n_rt_is y2 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) y1)).
-
-(* constant 2344 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t47 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).(l_e_tr4is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl y2 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) y1) (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) (l_e_st_eq_landau_n_rt_pl y1 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)))) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) y0) x0 (l_e_st_eq_landau_n_rt_ispl1 y2 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) y1) (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) (l_e_st_eq_landau_n_rt_rp_3140_t46 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) (l_e_st_eq_landau_n_rt_asspl1 (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) y1 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) (l_e_st_eq_landau_n_rt_ispl2 (l_e_st_eq_landau_n_rt_pl y1 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) y0 (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) (l_e_st_eq_landau_n_rt_satz101c y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) (l_e_st_eq_landau_n_rt_satz101e x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl y2 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) x0).
-
-(* constant 2345 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t48 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).(l_e_st_eq_landau_n_rt_ismore1 (l_e_st_eq_landau_n_rt_pl y2 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t47 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i) (l_e_st_eq_landau_n_rt_satz94 y2 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) : l_e_st_eq_landau_n_rt_more x0 y2).
-
-(* constant 2346 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t49 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).(l_e_st_eq_landau_n_rt_satz101g x0 y2 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i) (l_e_st_eq_landau_n_rt_rp_3140_t47 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))).
-
-(* constant 2347 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t50 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).(l_e_tris l_e_st_eq_landau_n_rt_rat y0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) y1) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) y1) (l_e_st_eq_landau_n_rt_satz101f y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) (l_e_st_eq_landau_n_rt_ispl1 (l_e_st_eq_landau_n_rt_mn y0 y1 (l_e_st_eq_landau_n_rt_rp_3140_t45 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) y1 (l_e_st_eq_landau_n_rt_rp_3140_t49 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) : l_e_st_eq_landau_n_rt_is y0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) y1)).
-
-(* constant 2348 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t51 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).(l_e_st_eq_landau_n_rt_rp_ine (l_e_st_eq_landau_n_rt_rp_diff ksi eta) (l_e_st_eq_landau_n_rt_rp_satz140h ksi eta m) (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) (l_e_st_eq_landau_n_rt_rp_diff1 ksi eta (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) x0 lx y2 uy2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)))) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))).
-
-(* constant 2349 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t52 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt eta y1.λy2:l_e_st_eq_landau_n_rt_rat.λuy2:l_e_st_eq_landau_n_rt_urt eta y2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y2 y1 (l_e_st_eq_landau_n_rt_rp_3140_t44 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).(l_e_st_eq_landau_n_rt_rp_lrtpl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) y0 y1 ly1 (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) (l_e_st_eq_landau_n_rt_rp_3140_t51 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i) (l_e_tris l_e_st_eq_landau_n_rt_rat y0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) y1) (l_e_st_eq_landau_n_rt_pl y1 (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i))) (l_e_st_eq_landau_n_rt_rp_3140_t50 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i) (l_e_st_eq_landau_n_rt_compl (l_e_st_eq_landau_n_rt_mn x0 y2 (l_e_st_eq_landau_n_rt_rp_3140_t48 ksi eta m y0 ly uy x0 lx l y1 ly1 y2 uy2 i)) y1)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0).
-
-(* constant 2350 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t53 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_rp_satz132app eta (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt eta y.λv:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b eta x t y u)) (l_e_st_eq_landau_n_rt_mn x0 y0 (l_e_st_eq_landau_n_rt_rp_3140_t43 ksi eta m y0 ly uy x0 lx l)).l_e_st_eq_landau_n_rt_rp_3140_t52 ksi eta m y0 ly uy x0 lx l x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0).
-
-(* constant 2351 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t54 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λuy:l_e_st_eq_landau_n_rt_urt eta y0.(l_e_st_eq_landau_n_rt_cutapp3 ksi y0 ly (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_less y0 x.l_e_st_eq_landau_n_rt_rp_3140_t53 ksi eta m y0 ly uy x t u) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0).
-
-(* constant 2352 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t55 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λly0:l_e_st_eq_landau_n_rt_lrt eta y0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt ksi y1.λuy1:l_e_st_eq_landau_n_rt_urt eta y1.(l_e_st_eq_landau_n_rt_rp_3140_t54 ksi eta m y1 ly1 uy1 : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y1).
-
-(* constant 2353 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t56 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λly0:l_e_st_eq_landau_n_rt_lrt eta y0.λy1:l_e_st_eq_landau_n_rt_rat.λly1:l_e_st_eq_landau_n_rt_lrt ksi y1.λuy1:l_e_st_eq_landau_n_rt_urt eta y1.(l_e_st_eq_landau_n_rt_rp_satz120 (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y1 (l_e_st_eq_landau_n_rt_rp_3140_t55 ksi eta m y0 ly ly0 y1 ly1 uy1) y0 (l_e_st_eq_landau_n_rt_cutapp2a eta y0 ly0 y1 uy1) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0).
-
-(* constant 2354 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t57 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.λly0:l_e_st_eq_landau_n_rt_lrt eta y0.(l_e_st_eq_landau_n_rt_rp_moreapp ksi eta m (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_urt eta x.l_e_st_eq_landau_n_rt_rp_3140_t56 ksi eta m y0 ly ly0 x t u) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0).
-
-(* constant 2355 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.(l_imp_th1 (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0) (λt:l_e_st_eq_landau_n_rt_lrt eta y0.l_e_st_eq_landau_n_rt_rp_3140_t57 ksi eta m y0 ly t) (λt:l_e_st_eq_landau_n_rt_urt eta y0.l_e_st_eq_landau_n_rt_rp_3140_t54 ksi eta m y0 ly t) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) y0).
-
-(* constant 2356 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t58 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) ksi (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) x.l_e_st_eq_landau_n_rt_rp_3140_a ksi eta m x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_rp_3140_b ksi eta m x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m)) ksi).
-
-(* constant 2357 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_somei l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta a) ksi) (l_e_st_eq_landau_n_rt_rp_3140_chi ksi eta m) (l_e_st_eq_landau_n_rt_rp_3140_t58 ksi eta m) : l_e_st_eq_landau_n_rt_rp_some (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta a) ksi)).
-
-(* constant 2358 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t59 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(λc:l_e_st_eq_landau_n_rt_cut.λd:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta c) ksi.λu:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta d) ksi.l_e_st_eq_landau_n_rt_rp_satz140b ksi eta c d t u : l_e_amone l_e_st_eq_landau_n_rt_cut (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta c) ksi)).
-
-(* constant 2359 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_onei l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta a) ksi) (l_e_st_eq_landau_n_rt_rp_3140_t59 ksi eta) (l_e_st_eq_landau_n_rt_rp_satz140a ksi eta m) : l_e_st_eq_landau_n_rt_rp_one (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta a) ksi)).
-
-(* constant 2360 *)
-definition l_e_st_eq_landau_n_rt_rp_mn ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_ind l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta a) ksi) (l_e_st_eq_landau_n_rt_rp_satz140 ksi eta m) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2361 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_oneax l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta a) ksi) (l_e_st_eq_landau_n_rt_rp_satz140 ksi eta m) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_mn ksi eta m)) ksi).
-
-(* constant 2362 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_mn ksi eta m)) ksi (l_e_st_eq_landau_n_rt_rp_satz140c ksi eta m) : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_mn ksi eta m))).
-
-(* constant 2363 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140e ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) eta) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_mn ksi eta m)) ksi (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) eta) (l_e_st_eq_landau_n_rt_rp_satz140c ksi eta m) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) eta) ksi).
-
-(* constant 2364 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140f ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) eta) ksi (l_e_st_eq_landau_n_rt_rp_satz140e ksi eta m) : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) eta)).
-
-(* constant 2365 *)
-definition l_e_st_eq_landau_n_rt_rp_satz140g ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta phi) ksi.(l_e_st_eq_landau_n_rt_rp_satz140b ksi eta phi (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) i (l_e_st_eq_landau_n_rt_rp_satz140c ksi eta m) : l_e_st_eq_landau_n_rt_rp_is phi (l_e_st_eq_landau_n_rt_rp_mn ksi eta m)).
-
-(* constant 2366 *)
-definition l_e_st_eq_landau_n_rt_rp_3140_t60 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi zeta.λn:l_e_st_eq_landau_n_rt_rp_more eta upsilon.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl upsilon (l_e_st_eq_landau_n_rt_rp_mn ksi zeta m)) (l_e_st_eq_landau_n_rt_rp_pl zeta (l_e_st_eq_landau_n_rt_rp_mn ksi zeta m)) ksi eta (l_e_st_eq_landau_n_rt_rp_ispl1 upsilon zeta (l_e_st_eq_landau_n_rt_rp_mn ksi zeta m) (l_e_symis l_e_st_eq_landau_n_rt_cut zeta upsilon j)) (l_e_st_eq_landau_n_rt_rp_satz140c ksi zeta m) i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl upsilon (l_e_st_eq_landau_n_rt_rp_mn ksi zeta m)) eta).
-
-(* constant 2367 *)
-definition l_e_st_eq_landau_n_rt_rp_ismn12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi zeta.λn:l_e_st_eq_landau_n_rt_rp_more eta upsilon.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz140g eta upsilon (l_e_st_eq_landau_n_rt_rp_mn ksi zeta m) n (l_e_st_eq_landau_n_rt_rp_3140_t60 ksi eta zeta upsilon m n i j) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_mn ksi zeta m) (l_e_st_eq_landau_n_rt_rp_mn eta upsilon n)).
-
-(* constant 2368 *)
-definition l_e_st_eq_landau_n_rt_rp_ismn1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi zeta.λn:l_e_st_eq_landau_n_rt_rp_more eta zeta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_st_eq_landau_n_rt_rp_ismn12 ksi eta zeta zeta m n i (l_e_refis l_e_st_eq_landau_n_rt_cut zeta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_mn ksi zeta m) (l_e_st_eq_landau_n_rt_rp_mn eta zeta n)).
-
-(* constant 2369 *)
-definition l_e_st_eq_landau_n_rt_rp_ismn2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more zeta ksi.λn:l_e_st_eq_landau_n_rt_rp_more zeta eta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_st_eq_landau_n_rt_rp_ismn12 zeta zeta ksi eta m n (l_e_refis l_e_st_eq_landau_n_rt_cut zeta) i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_mn zeta ksi m) (l_e_st_eq_landau_n_rt_rp_mn zeta eta n)).
-
-(* constant 2370 *)
-definition l_e_st_eq_landau_n_rt_rp_prodprop1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_and3 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0)) : Prop).
-
-(* constant 2371 *)
-definition l_e_st_eq_landau_n_rt_rp_prodprop ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x y)) : Prop).
-
-(* constant 2372 *)
-definition l_e_st_eq_landau_n_rt_rp_prod ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop ksi eta z) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2373 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_and3i (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0)) lx ly i : l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y0).
-
-(* constant 2374 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y) y0 (l_e_st_eq_landau_n_rt_rp_iii4_t1 ksi eta z0 x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y)).
-
-(* constant 2375 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x y)) x0 (l_e_st_eq_landau_n_rt_rp_iii4_t2 ksi eta z0 x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_rp_prodprop ksi eta z0).
-
-(* constant 2376 *)
-definition l_e_st_eq_landau_n_rt_rp_prod1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop ksi eta z) z0 (l_e_st_eq_landau_n_rt_rp_iii4_t3 ksi eta z0 x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2377 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop ksi eta z) z0 i : l_e_st_eq_landau_n_rt_rp_prodprop ksi eta z0).
-
-(* constant 2378 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y0.(l_and3e1 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0)) py : l_e_st_eq_landau_n_rt_lrt ksi x0).
-
-(* constant 2379 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y0.(l_and3e2 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0)) py : l_e_st_eq_landau_n_rt_lrt eta y0).
-
-(* constant 2380 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y0.(l_and3e3 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_lrt eta y0) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0)) py : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2381 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y).λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y0.(p1 x0 (l_e_st_eq_landau_n_rt_rp_iii4_t5 ksi eta z0 i p p1 x0 px y0 py) y0 (l_e_st_eq_landau_n_rt_rp_iii4_t6 ksi eta z0 i p p1 x0 px y0 py) (l_e_st_eq_landau_n_rt_rp_iii4_t7 ksi eta z0 i p p1 x0 px y0 py) : p).
-
-(* constant 2382 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y).(l_someapp l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y) px p (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x0 y.l_e_st_eq_landau_n_rt_rp_iii4_t8 ksi eta z0 i p p1 x0 px y t) : p).
-
-(* constant 2383 *)
-definition l_e_st_eq_landau_n_rt_rp_prodapp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x y)) (l_e_st_eq_landau_n_rt_rp_iii4_t4 ksi eta z0 i p p1) p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_prodprop1 ksi eta z0 x y).l_e_st_eq_landau_n_rt_rp_iii4_t9 ksi eta z0 i p p1 x t) : p).
-
-(* constant 2384 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_cutapp2a ksi x0 lx x1 ux : l_e_st_eq_landau_n_rt_less x0 x1).
-
-(* constant 2385 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_cutapp2a eta y0 ly y1 uy : l_e_st_eq_landau_n_rt_less y0 y1).
-
-(* constant 2386 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_isless1 (l_e_st_eq_landau_n_rt_ts x0 y0) z0 (l_e_st_eq_landau_n_rt_ts x1 y1) (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_ts x0 y0) j) (l_e_st_eq_landau_n_rt_satz107a x0 x1 y0 y1 (l_e_st_eq_landau_n_rt_rp_4141_t1 ksi eta x1 ux y1 uy z0 i x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_rp_4141_t2 ksi eta x1 ux y1 uy z0 i x0 lx y0 ly j)) : l_e_st_eq_landau_n_rt_less z0 (l_e_st_eq_landau_n_rt_ts x1 y1)).
-
-(* constant 2387 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_ec3e31 (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x1 y1)) (l_e_st_eq_landau_n_rt_more z0 (l_e_st_eq_landau_n_rt_ts x1 y1)) (l_e_st_eq_landau_n_rt_less z0 (l_e_st_eq_landau_n_rt_ts x1 y1)) (l_e_st_eq_landau_n_rt_satz81b z0 (l_e_st_eq_landau_n_rt_ts x1 y1)) (l_e_st_eq_landau_n_rt_rp_4141_t3 ksi eta x1 ux y1 uy z0 i x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_nis z0 (l_e_st_eq_landau_n_rt_ts x1 y1)).
-
-(* constant 2388 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).(l_e_st_eq_landau_n_rt_rp_prodapp ksi eta z0 i (l_e_st_eq_landau_n_rt_nis z0 (l_e_st_eq_landau_n_rt_ts x1 y1)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4141_t4 ksi eta x1 ux y1 uy z0 i x t y u v) : l_e_st_eq_landau_n_rt_nis z0 (l_e_st_eq_landau_n_rt_ts x1 y1)).
-
-(* constant 2389 *)
-definition l_e_st_eq_landau_n_rt_rp_satz141a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.(l_imp_th3 (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ts x1 y1) (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_nis (l_e_st_eq_landau_n_rt_ts x1 y1) (l_e_st_eq_landau_n_rt_ts x1 y1)) (l_weli (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x1 y1) (l_e_st_eq_landau_n_rt_ts x1 y1)) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x1 y1))) (λt:l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ts x1 y1) (l_e_st_eq_landau_n_rt_rp_prod ksi eta).l_e_st_eq_landau_n_rt_rp_4141_t5 ksi eta x1 ux y1 uy (l_e_st_eq_landau_n_rt_ts x1 y1) t) : l_not (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ts x1 y1) (l_e_st_eq_landau_n_rt_rp_prod ksi eta))).
-
-(* constant 2390 *)
-definition l_e_st_eq_landau_n_rt_4141_v0 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt y0) x0 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2391 *)
-definition l_e_st_eq_landau_n_rt_4141_t6 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_4141_v0 x0 y0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt y0)) x0) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x0) x0 (l_e_st_eq_landau_n_rt_assts2 y0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt y0) x0) (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt y0)) l_e_st_eq_landau_n_rt_1rt x0 (l_e_st_eq_landau_n_rt_satz110c l_e_st_eq_landau_n_rt_1rt y0)) (l_e_st_eq_landau_n_rt_example1c x0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_4141_v0 x0 y0)) x0).
-
-(* constant 2392 *)
-definition l_e_st_eq_landau_n_rt_satz141b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz110g x0 y0 (l_e_st_eq_landau_n_rt_4141_v0 x0 y0) (l_e_st_eq_landau_n_rt_4141_t6 x0 y0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt y0) x0) (l_e_st_eq_landau_n_rt_ov x0 y0)).
-
-(* constant 2393 *)
-definition l_e_st_eq_landau_n_rt_satz141c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt y0) x0) (l_e_st_eq_landau_n_rt_ov x0 y0) (l_e_st_eq_landau_n_rt_satz141b x0 y0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ov x0 y0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt y0) x0)).
-
-(* constant 2394 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_isless2 u0 (l_e_st_eq_landau_n_rt_ts x0 y0) z0 j l : l_e_st_eq_landau_n_rt_less z0 (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2395 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ts x0 y0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0) y0) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt y0) y0 (l_e_st_eq_landau_n_rt_assts2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0 y0) (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0) l_e_st_eq_landau_n_rt_1rt y0 (l_e_st_eq_landau_n_rt_satz110e l_e_st_eq_landau_n_rt_1rt x0)) (l_e_st_eq_landau_n_rt_example1c y0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ts x0 y0)) y0).
-
-(* constant 2396 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) z0) (l_e_st_eq_landau_n_rt_ov z0 x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ts x0 y0)) y0 (l_e_st_eq_landau_n_rt_satz141b z0 x0) (l_e_st_eq_landau_n_rt_rp_4141_t8 ksi eta u0 i z0 l x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_satz105f z0 (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_rp_4141_t7 ksi eta u0 i z0 l x0 lx y0 ly j)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ov z0 x0) y0).
-
-(* constant 2397 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_satz120 eta y0 ly (l_e_st_eq_landau_n_rt_ov z0 x0) (l_e_st_eq_landau_n_rt_rp_4141_t9 ksi eta u0 i z0 l x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_lrt eta (l_e_st_eq_landau_n_rt_ov z0 x0)).
-
-(* constant 2398 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_prod1 ksi eta z0 x0 lx (l_e_st_eq_landau_n_rt_ov z0 x0) (l_e_st_eq_landau_n_rt_rp_4141_t10 ksi eta u0 i z0 l x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_satz110d z0 x0) : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2399 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λz0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less z0 u0.(l_e_st_eq_landau_n_rt_rp_prodapp ksi eta u0 i (l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4141_t11 ksi eta u0 i z0 l x t y u v) : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2400 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_rp_prod1 ksi eta (l_e_st_eq_landau_n_rt_ts x1 y0) x1 lx1 y0 ly (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x1 y0)) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ts x1 y0) (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2401 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_satz105a x1 x0 y0 (l_e_st_eq_landau_n_rt_satz83 x0 x1 l) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x1 y0) (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2402 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_ismore2 (l_e_st_eq_landau_n_rt_ts x0 y0) z0 (l_e_st_eq_landau_n_rt_ts x1 y0) (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_ts x0 y0) j) (l_e_st_eq_landau_n_rt_rp_4141_t14 ksi eta z0 i x0 lx y0 ly j x1 lx1 l) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x1 y0) z0).
-
-(* constant 2403 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_andi (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ts x1 y0) (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x1 y0) z0) (l_e_st_eq_landau_n_rt_rp_4141_t13 ksi eta z0 i x0 lx y0 ly j x1 lx1 l) (l_e_st_eq_landau_n_rt_rp_4141_t15 ksi eta z0 i x0 lx y0 ly j x1 lx1 l) : l_and (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ts x1 y0) (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts x1 y0) z0)).
-
-(* constant 2404 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_more y z0)) (l_e_st_eq_landau_n_rt_ts x1 y0) (l_e_st_eq_landau_n_rt_rp_4141_t16 ksi eta z0 i x0 lx y0 ly j x1 lx1 l) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))).
-
-(* constant 2405 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_cutapp3 ksi x0 lx (l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λu:l_e_st_eq_landau_n_rt_less x0 x.l_e_st_eq_landau_n_rt_rp_4141_t17 ksi eta z0 i x0 lx y0 ly j x t u) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))).
-
-(* constant 2406 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta).(l_e_st_eq_landau_n_rt_rp_prodapp ksi eta z0 i (l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4141_t18 ksi eta z0 i x t y u v) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_more y z0))).
-
-(* constant 2407 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λy1:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y1.(l_e_st_eq_landau_n_rt_cut2 (l_e_st_eq_landau_n_rt_rp_prod ksi eta) (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_rp_prod1 ksi eta (l_e_st_eq_landau_n_rt_ts x0 y0) x0 lx y0 ly (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x0 y0))) (l_e_st_eq_landau_n_rt_ts x1 y1) (l_e_st_eq_landau_n_rt_rp_satz141a ksi eta x1 ux y1 uy) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_prod ksi eta).λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_rp_4141_t12 ksi eta x t y u) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_prod ksi eta).l_e_st_eq_landau_n_rt_rp_4141_t19 ksi eta x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2408 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.(l_e_st_eq_landau_n_rt_cutapp1b eta (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt eta y.l_e_st_eq_landau_n_rt_rp_4141_t20 ksi eta x0 lx y0 ly x1 ux y t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2409 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.(l_e_st_eq_landau_n_rt_cutapp1b ksi (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.l_e_st_eq_landau_n_rt_rp_4141_t21 ksi eta x0 lx y0 ly x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2410 *)
-definition l_e_st_eq_landau_n_rt_rp_4141_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_e_st_eq_landau_n_rt_cutapp1a eta (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta y.l_e_st_eq_landau_n_rt_rp_4141_t22 ksi eta x0 lx y t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2411 *)
-definition l_e_st_eq_landau_n_rt_rp_satz141 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_cutapp1a ksi (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_rp_4141_t23 ksi eta x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2412 *)
-definition l_e_st_eq_landau_n_rt_rp_ts ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_cutof (l_e_st_eq_landau_n_rt_rp_prod ksi eta) (l_e_st_eq_landau_n_rt_rp_satz141 ksi eta) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2413 *)
-definition l_e_st_eq_landau_n_rt_rp_lrtts ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_ine (l_e_st_eq_landau_n_rt_rp_prod ksi eta) (l_e_st_eq_landau_n_rt_rp_satz141 ksi eta) z0 (l_e_st_eq_landau_n_rt_rp_prod1 ksi eta z0 x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0).
-
-(* constant 2414 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_isp1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_not (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_prod ksi eta))) (l_e_st_eq_landau_n_rt_ts x0 y0) z0 (l_e_st_eq_landau_n_rt_rp_satz141a ksi eta x0 ux y0 uy) i : l_not (l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta))).
-
-(* constant 2415 *)
-definition l_e_st_eq_landau_n_rt_rp_urtts ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_imp_th3 (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0) (l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta)) (l_e_st_eq_landau_n_rt_rp_iii4_t10 ksi eta z0 x0 ux y0 uy i) (λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0.l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_rp_prod ksi eta) (l_e_st_eq_landau_n_rt_rp_satz141 ksi eta) z0 t) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0).
-
-(* constant 2416 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.(l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_rp_prod ksi eta) (l_e_st_eq_landau_n_rt_rp_satz141 ksi eta) z0 lz : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_prod ksi eta)).
-
-(* constant 2417 *)
-definition l_e_st_eq_landau_n_rt_rp_tsapp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_lrt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_lrt eta y.∀v:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).p.(l_e_st_eq_landau_n_rt_rp_prodapp ksi eta z0 (l_e_st_eq_landau_n_rt_rp_iii4_t11 ksi eta z0 lz p p1) p p1 : p).
-
-(* constant 2418 *)
-definition l_e_st_eq_landau_n_rt_rp_ists1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ts u zeta) ksi eta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)).
-
-(* constant 2419 *)
-definition l_e_st_eq_landau_n_rt_rp_ists2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_cut (λu:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ts zeta u) ksi eta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta)).
-
-(* constant 2420 *)
-definition l_e_st_eq_landau_n_rt_rp_ists12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ists1 ksi eta zeta i) (l_e_st_eq_landau_n_rt_rp_ists2 zeta upsilon eta j) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2421 *)
-definition l_e_st_eq_landau_n_rt_rp_4142_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_tris l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts y0 x0) i (l_e_st_eq_landau_n_rt_comts x0 y0) : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts y0 x0)).
-
-(* constant 2422 *)
-definition l_e_st_eq_landau_n_rt_rp_4142_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_lrtts eta ksi z0 y0 ly x0 lx (l_e_st_eq_landau_n_rt_rp_4142_t1 ksi eta z0 lz x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta ksi) z0).
-
-(* constant 2423 *)
-definition l_e_st_eq_landau_n_rt_rp_4142_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) z0.(l_e_st_eq_landau_n_rt_rp_tsapp ksi eta z0 lz (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta ksi) z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4142_t2 ksi eta z0 lz x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta ksi) z0).
-
-(* constant 2424 *)
-definition l_e_st_eq_landau_n_rt_rp_satz142 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta ksi) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) x.l_e_st_eq_landau_n_rt_rp_4142_t3 ksi eta x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta ksi) x.l_e_st_eq_landau_n_rt_rp_4142_t3 eta ksi x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta ksi)).
-
-(* constant 2425 *)
-definition l_e_st_eq_landau_n_rt_rp_comts ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz142 ksi eta : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta ksi)).
-
-(* constant 2426 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts v0 z0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_ts v0 z0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0)) i (l_e_st_eq_landau_n_rt_ists1 v0 (l_e_st_eq_landau_n_rt_ts x0 y0) z0 j) (l_e_st_eq_landau_n_rt_assts1 x0 y0 z0) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0))).
-
-(* constant 2427 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts v0 z0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_lrtts eta zeta (l_e_st_eq_landau_n_rt_ts y0 z0) y0 ly z0 lz (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts y0 z0)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_ts y0 z0)).
-
-(* constant 2428 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts v0 z0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_lrtts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta) u0 x0 lx (l_e_st_eq_landau_n_rt_ts y0 z0) (l_e_st_eq_landau_n_rt_rp_4143_t2 ksi eta zeta u0 lu v0 lv z0 lz i x0 lx y0 ly j) (l_e_st_eq_landau_n_rt_rp_4143_t1 ksi eta zeta u0 lu v0 lv z0 lz i x0 lx y0 ly j) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0).
-
-(* constant 2429 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts v0 z0).(l_e_st_eq_landau_n_rt_rp_tsapp ksi eta v0 lv (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4143_t3 ksi eta zeta u0 lu v0 lv z0 lz i x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0).
-
-(* constant 2430 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0.(l_e_st_eq_landau_n_rt_rp_tsapp (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta u0 lu (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt zeta y.λv:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4143_t4 ksi eta zeta u0 lu x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0).
-
-(* constant 2431 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts y0 z0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_ts x0 v0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ts y0 z0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0) i (l_e_st_eq_landau_n_rt_ists2 v0 (l_e_st_eq_landau_n_rt_ts y0 z0) x0 j) (l_e_st_eq_landau_n_rt_assts2 x0 y0 z0) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x0 y0) z0)).
-
-(* constant 2432 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts y0 z0).(l_e_st_eq_landau_n_rt_rp_lrtts ksi eta (l_e_st_eq_landau_n_rt_ts x0 y0) x0 lx y0 ly (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x0 y0)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2433 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts y0 z0).(l_e_st_eq_landau_n_rt_rp_lrtts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta u0 (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_rp_4143_t7 ksi eta zeta u0 lu x0 lx v0 lv i y0 ly z0 lz j) z0 lz (l_e_st_eq_landau_n_rt_rp_4143_t6 ksi eta zeta u0 lu x0 lx v0 lv i y0 ly z0 lz j) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0).
-
-(* constant 2434 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).(l_e_st_eq_landau_n_rt_rp_tsapp eta zeta v0 lv (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt zeta y.λv:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4143_t8 ksi eta zeta u0 lu x0 lx v0 lv i x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0).
-
-(* constant 2435 *)
-definition l_e_st_eq_landau_n_rt_rp_4143_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) u0.(l_e_st_eq_landau_n_rt_rp_tsapp ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta) u0 lu (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts eta zeta) y.λv:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4143_t9 ksi eta zeta u0 lu x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) u0).
-
-(* constant 2436 *)
-definition l_e_st_eq_landau_n_rt_rp_satz143 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) x.l_e_st_eq_landau_n_rt_rp_4143_t5 ksi eta zeta x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) x.l_e_st_eq_landau_n_rt_rp_4143_t10 ksi eta zeta x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta))).
-
-(* constant 2437 *)
-definition l_e_st_eq_landau_n_rt_rp_assts1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz143 ksi eta zeta : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta))).
-
-(* constant 2438 *)
-definition l_e_st_eq_landau_n_rt_rp_assts2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_satz143 ksi eta zeta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts ksi eta) zeta)).
-
-(* constant 2439 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_ts x0 v0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0)) i (l_e_st_eq_landau_n_rt_ists2 v0 (l_e_st_eq_landau_n_rt_pl y0 z0) x0 j) (l_e_st_eq_landau_n_rt_disttp2 x0 y0 z0) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x0 z0))).
-
-(* constant 2440 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_rp_lrtts ksi eta (l_e_st_eq_landau_n_rt_ts x0 y0) x0 lx y0 ly (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x0 y0)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2441 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_rp_lrtts ksi zeta (l_e_st_eq_landau_n_rt_ts x0 z0) x0 lx z0 lz (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x0 z0)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_ts x0 z0)).
-
-(* constant 2442 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl y0 z0).(l_e_st_eq_landau_n_rt_rp_lrtpl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) u0 (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_rp_4144_t2 ksi eta zeta u0 lu x0 lx v0 lv i y0 ly z0 lz j) (l_e_st_eq_landau_n_rt_ts x0 z0) (l_e_st_eq_landau_n_rt_rp_4144_t3 ksi eta zeta u0 lu x0 lx v0 lv i y0 ly z0 lz j) (l_e_st_eq_landau_n_rt_rp_4144_t1 ksi eta zeta u0 lu x0 lx v0 lv i y0 ly z0 lz j) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0).
-
-(* constant 2443 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) v0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x0 v0).(l_e_st_eq_landau_n_rt_rp_plapp eta zeta v0 lv (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt zeta y.λv:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_4144_t4 ksi eta zeta u0 lu x0 lx v0 lv i x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0).
-
-(* constant 2444 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0.(l_e_st_eq_landau_n_rt_rp_tsapp ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta) u0 lu (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) y.λv:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4144_t5 ksi eta zeta u0 lu x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0).
-
-(* constant 2445 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_e_tris l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_pl v0 w0) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x1 z0)) i (l_e_st_eq_landau_n_rt_ispl12 v0 (l_e_st_eq_landau_n_rt_ts x0 y0) w0 (l_e_st_eq_landau_n_rt_ts x1 z0) j k) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x1 z0))).
-
-(* constant 2446 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_x2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_e_ite (l_e_st_eq_landau_n_rt_moreis x0 x1) l_e_st_eq_landau_n_rt_rat x0 x1 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2447 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).λm:l_e_st_eq_landau_n_rt_moreis x0 x1.(l_e_itet (l_e_st_eq_landau_n_rt_moreis x0 x1) l_e_st_eq_landau_n_rt_rat x0 x1 m : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) x0).
-
-(* constant 2448 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).λm:l_e_st_eq_landau_n_rt_moreis x0 x1.(l_e_isp1 l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lrt ksi t) x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) lx (l_e_st_eq_landau_n_rt_rp_4144_t8 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k m) : l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2449 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).λm:l_e_st_eq_landau_n_rt_moreis x0 x1.(l_e_st_eq_landau_n_rt_lessisi2 x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) x0 (l_e_st_eq_landau_n_rt_rp_4144_t8 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k m)) : l_e_st_eq_landau_n_rt_lessis x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2450 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).λm:l_e_st_eq_landau_n_rt_moreis x0 x1.(l_e_st_eq_landau_n_rt_satz88 x1 x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_satz84 x0 x1 m) (l_e_st_eq_landau_n_rt_rp_4144_t10 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k m) : l_e_st_eq_landau_n_rt_lessis x1 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2451 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).λn:l_not (l_e_st_eq_landau_n_rt_moreis x0 x1).(l_e_itef (l_e_st_eq_landau_n_rt_moreis x0 x1) l_e_st_eq_landau_n_rt_rat x0 x1 n : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) x1).
-
-(* constant 2452 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).λn:l_not (l_e_st_eq_landau_n_rt_moreis x0 x1).(l_e_isp1 l_e_st_eq_landau_n_rt_rat (λt:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lrt ksi t) x1 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) lx1 (l_e_st_eq_landau_n_rt_rp_4144_t12 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k n) : l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2453 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).λn:l_not (l_e_st_eq_landau_n_rt_moreis x0 x1).(l_e_st_eq_landau_n_rt_lessisi2 x1 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) x1 (l_e_st_eq_landau_n_rt_rp_4144_t12 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k n)) : l_e_st_eq_landau_n_rt_lessis x1 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2454 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).λn:l_not (l_e_st_eq_landau_n_rt_moreis x0 x1).(l_e_st_eq_landau_n_rt_lessisi1 x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_satz87b x0 x1 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_satz81j x0 x1 n) (l_e_st_eq_landau_n_rt_rp_4144_t14 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k n)) : l_e_st_eq_landau_n_rt_lessis x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2455 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_imp_th1 (l_e_st_eq_landau_n_rt_moreis x0 x1) (l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)) (λt:l_e_st_eq_landau_n_rt_moreis x0 x1.l_e_st_eq_landau_n_rt_rp_4144_t9 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k t) (λt:l_not (l_e_st_eq_landau_n_rt_moreis x0 x1).l_e_st_eq_landau_n_rt_rp_4144_t13 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k t) : l_e_st_eq_landau_n_rt_lrt ksi (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2456 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_imp_th1 (l_e_st_eq_landau_n_rt_moreis x0 x1) (l_e_st_eq_landau_n_rt_lessis x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)) (λt:l_e_st_eq_landau_n_rt_moreis x0 x1.l_e_st_eq_landau_n_rt_rp_4144_t10 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k t) (λt:l_not (l_e_st_eq_landau_n_rt_moreis x0 x1).l_e_st_eq_landau_n_rt_rp_4144_t15 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k t) : l_e_st_eq_landau_n_rt_lessis x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2457 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_imp_th1 (l_e_st_eq_landau_n_rt_moreis x0 x1) (l_e_st_eq_landau_n_rt_lessis x1 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)) (λt:l_e_st_eq_landau_n_rt_moreis x0 x1.l_e_st_eq_landau_n_rt_rp_4144_t11 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k t) (λt:l_not (l_e_st_eq_landau_n_rt_moreis x0 x1).l_e_st_eq_landau_n_rt_rp_4144_t14 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k t) : l_e_st_eq_landau_n_rt_lessis x1 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)).
-
-(* constant 2458 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_e_st_eq_landau_n_rt_rp_lrtpl eta zeta (l_e_st_eq_landau_n_rt_pl y0 z0) y0 ly z0 lz (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl y0 z0)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_pl y0 z0)).
-
-(* constant 2459 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_e_st_eq_landau_n_rt_rp_lrtts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_rp_4144_t16 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0) (l_e_st_eq_landau_n_rt_rp_4144_t19 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0))) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0))).
-
-(* constant 2460 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_e_st_eq_landau_n_rt_satz109a x0 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) y0 y0 (l_e_st_eq_landau_n_rt_rp_4144_t17 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_lessisi2 y0 y0 (l_e_refis l_e_st_eq_landau_n_rt_rat y0)) : l_e_st_eq_landau_n_rt_lessis (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) y0)).
-
-(* constant 2461 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_e_st_eq_landau_n_rt_satz109a x1 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) z0 z0 (l_e_st_eq_landau_n_rt_rp_4144_t18 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_lessisi2 z0 z0 (l_e_refis l_e_st_eq_landau_n_rt_rat z0)) : l_e_st_eq_landau_n_rt_lessis (l_e_st_eq_landau_n_rt_ts x1 z0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) z0)).
-
-(* constant 2462 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_e_st_eq_landau_n_rt_islessis12 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x1 z0)) u0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) y0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) z0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_symis l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts x1 z0)) (l_e_st_eq_landau_n_rt_rp_4144_t7 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)) (l_e_st_eq_landau_n_rt_distpt2 (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) y0 z0) (l_e_st_eq_landau_n_rt_satz100a (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) y0) (l_e_st_eq_landau_n_rt_ts x1 z0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) z0) (l_e_st_eq_landau_n_rt_rp_4144_t21 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_rp_4144_t22 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k)) : l_e_st_eq_landau_n_rt_lessis u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0))).
-
-(* constant 2463 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t24 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt zeta z0.λk:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x1 z0).(l_orapp (l_e_st_eq_landau_n_rt_less u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0))) (l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0))) (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0) (l_e_st_eq_landau_n_rt_rp_4144_t23 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (λt:l_e_st_eq_landau_n_rt_less u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0)).l_e_st_eq_landau_n_rt_rp_satz120 (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0)) (l_e_st_eq_landau_n_rt_rp_4144_t20 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) u0 t) (λt:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0)).l_e_isp1 l_e_st_eq_landau_n_rt_rat (λu:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_4144_x2 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) (l_e_st_eq_landau_n_rt_pl y0 z0)) u0 (l_e_st_eq_landau_n_rt_rp_4144_t20 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x1 lx1 z0 lz k) t) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0).
-
-(* constant 2464 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t25 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt eta y0.λj:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_tsapp ksi zeta w0 lw (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt zeta y.λv:l_e_st_eq_landau_n_rt_is w0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4144_t24 ksi eta zeta u0 lu v0 lv w0 lw i x0 lx y0 ly j x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0).
-
-(* constant 2465 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t26 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) v0.λw0:l_e_st_eq_landau_n_rt_rat.λlw:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) w0.λi:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl v0 w0).(l_e_st_eq_landau_n_rt_rp_tsapp ksi eta v0 lv (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt eta y.λv:l_e_st_eq_landau_n_rt_is v0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4144_t25 ksi eta zeta u0 lu v0 lv w0 lw i x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0).
-
-(* constant 2466 *)
-definition l_e_st_eq_landau_n_rt_rp_4144_t27 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) u0.(l_e_st_eq_landau_n_rt_rp_plapp (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) u0 lu (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi eta) x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) y.λv:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_4144_t26 ksi eta zeta u0 lu x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) u0).
-
-(* constant 2467 *)
-definition l_e_st_eq_landau_n_rt_rp_satz144 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) x.l_e_st_eq_landau_n_rt_rp_4144_t6 ksi eta zeta x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) x.l_e_st_eq_landau_n_rt_rp_4144_t27 ksi eta zeta x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta))).
-
-(* constant 2468 *)
-definition l_e_st_eq_landau_n_rt_rp_disttp1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta (l_e_st_eq_landau_n_rt_rp_pl ksi eta)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_satz144 zeta ksi eta) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta eta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_comts zeta ksi) (l_e_st_eq_landau_n_rt_rp_comts zeta eta)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta))).
-
-(* constant 2469 *)
-definition l_e_st_eq_landau_n_rt_rp_disttp2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz144 ksi eta zeta : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta))).
-
-(* constant 2470 *)
-definition l_e_st_eq_landau_n_rt_rp_distpt1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_disttp1 ksi eta zeta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi eta) zeta)).
-
-(* constant 2471 *)
-definition l_e_st_eq_landau_n_rt_rp_distpt2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) (l_e_st_eq_landau_n_rt_rp_disttp2 ksi eta zeta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta)) (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_pl eta zeta))).
-
-(* constant 2472 *)
-definition l_e_st_eq_landau_n_rt_rp_4145_phi ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_mn ksi eta m : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2473 *)
-definition l_e_st_eq_landau_n_rt_rp_4145_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_satz140d ksi eta m : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m))).
-
-(* constant 2474 *)
-definition l_e_st_eq_landau_n_rt_rp_4145_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m)) zeta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m) zeta)) (l_e_st_eq_landau_n_rt_rp_ists1 ksi (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m)) zeta (l_e_st_eq_landau_n_rt_rp_4145_t1 ksi eta zeta m)) (l_e_st_eq_landau_n_rt_rp_disttp1 eta (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m) zeta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m) zeta))).
-
-(* constant 2475 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_ismore1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m) zeta)) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m) zeta)) (l_e_st_eq_landau_n_rt_rp_4145_t2 ksi eta zeta m)) (l_e_st_eq_landau_n_rt_rp_satz133 (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_4145_phi ksi eta zeta m) zeta)) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)).
-
-(* constant 2476 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_st_eq_landau_n_rt_rp_ists1 ksi eta zeta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)).
-
-(* constant 2477 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz145a eta ksi zeta (l_e_st_eq_landau_n_rt_rp_satz122 ksi eta l)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)).
-
-(* constant 2478 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta eta) (l_e_st_eq_landau_n_rt_rp_comts ksi zeta) (l_e_st_eq_landau_n_rt_rp_comts eta zeta) (l_e_st_eq_landau_n_rt_rp_satz145a ksi eta zeta m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta)).
-
-(* constant 2479 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145e ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_st_eq_landau_n_rt_rp_ists2 ksi eta zeta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta)).
-
-(* constant 2480 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145f ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta eta) (l_e_st_eq_landau_n_rt_rp_comts ksi zeta) (l_e_st_eq_landau_n_rt_rp_comts eta zeta) (l_e_st_eq_landau_n_rt_rp_satz145c ksi eta zeta l) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta)).
-
-(* constant 2481 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145g ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λm:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_ismore2 (l_e_st_eq_landau_n_rt_rp_ts ksi upsilon) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ists1 ksi eta upsilon i) (l_e_st_eq_landau_n_rt_rp_satz145d zeta upsilon ksi m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2482 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145h ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λm:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ts upsilon eta) (l_e_st_eq_landau_n_rt_rp_comts ksi zeta) (l_e_st_eq_landau_n_rt_rp_comts eta upsilon) (l_e_st_eq_landau_n_rt_rp_satz145g ksi eta zeta upsilon i m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts upsilon eta)).
-
-(* constant 2483 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145j ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less zeta upsilon.(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_ts ksi upsilon) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ists1 ksi eta upsilon i) (l_e_st_eq_landau_n_rt_rp_satz145f zeta upsilon ksi l) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2484 *)
-definition l_e_st_eq_landau_n_rt_rp_satz145k ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λl:l_e_st_eq_landau_n_rt_rp_less zeta upsilon.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ts upsilon eta) (l_e_st_eq_landau_n_rt_rp_comts ksi zeta) (l_e_st_eq_landau_n_rt_rp_comts eta upsilon) (l_e_st_eq_landau_n_rt_rp_satz145j ksi eta zeta upsilon i l) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts upsilon eta)).
-
-(* constant 2485 *)
-definition l_e_st_eq_landau_n_rt_rp_4146_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz123a ksi eta : l_or3 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta)).
-
-(* constant 2486 *)
-definition l_e_st_eq_landau_n_rt_rp_4146_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) : l_ec3 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta))).
-
-(* constant 2487 *)
-definition l_e_st_eq_landau_n_rt_rp_satz146a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta).(l_ec3_th11 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_4146_t1 ksi eta zeta) (l_e_st_eq_landau_n_rt_rp_4146_t2 ksi eta zeta) (λu:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_satz145b ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz145a ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_satz145c ksi eta zeta u) m : l_e_st_eq_landau_n_rt_rp_more ksi eta).
-
-(* constant 2488 *)
-definition l_e_st_eq_landau_n_rt_rp_satz146b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta).(l_ec3_th10 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_4146_t1 ksi eta zeta) (l_e_st_eq_landau_n_rt_rp_4146_t2 ksi eta zeta) (λu:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_satz145b ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz145a ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_satz145c ksi eta zeta u) i : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 2489 *)
-definition l_e_st_eq_landau_n_rt_rp_satz146c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta).(l_ec3_th12 (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)) (l_e_st_eq_landau_n_rt_rp_4146_t1 ksi eta zeta) (l_e_st_eq_landau_n_rt_rp_4146_t2 ksi eta zeta) (λu:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_satz145b ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz145a ksi eta zeta u) (λu:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_satz145c ksi eta zeta u) l : l_e_st_eq_landau_n_rt_rp_less ksi eta).
-
-(* constant 2490 *)
-definition l_e_st_eq_landau_n_rt_rp_satz146d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta).(l_e_st_eq_landau_n_rt_rp_satz146a ksi eta zeta (l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta eta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_comts zeta ksi) (l_e_st_eq_landau_n_rt_rp_comts zeta eta) m) : l_e_st_eq_landau_n_rt_rp_more ksi eta).
-
-(* constant 2491 *)
-definition l_e_st_eq_landau_n_rt_rp_satz146e ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta).(l_e_st_eq_landau_n_rt_rp_satz146b ksi eta zeta (l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_comts ksi zeta) i (l_e_st_eq_landau_n_rt_rp_comts zeta eta)) : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 2492 *)
-definition l_e_st_eq_landau_n_rt_rp_satz146f ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts zeta eta).(l_e_st_eq_landau_n_rt_rp_satz146c ksi eta zeta (l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_ts zeta ksi) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts zeta eta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_comts zeta ksi) (l_e_st_eq_landau_n_rt_rp_comts zeta eta) l) : l_e_st_eq_landau_n_rt_rp_less ksi eta).
-
-(* constant 2493 *)
-definition l_e_st_eq_landau_n_rt_rp_4147_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz145a ksi eta zeta m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta)).
-
-(* constant 2494 *)
-definition l_e_st_eq_landau_n_rt_rp_4147_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_ts zeta eta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts upsilon eta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_comts zeta eta) (l_e_st_eq_landau_n_rt_rp_comts upsilon eta) (l_e_st_eq_landau_n_rt_rp_satz145a zeta upsilon eta n) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2495 *)
-definition l_e_st_eq_landau_n_rt_rp_satz147 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_trmore (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_4147_t1 ksi eta zeta upsilon m n) (l_e_st_eq_landau_n_rt_rp_4147_t2 ksi eta zeta upsilon m n) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2496 *)
-definition l_e_st_eq_landau_n_rt_rp_satz147a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz147 eta ksi upsilon zeta (l_e_st_eq_landau_n_rt_rp_satz122 ksi eta l) (l_e_st_eq_landau_n_rt_rp_satz122 zeta upsilon k)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2497 *)
-definition l_e_st_eq_landau_n_rt_rp_satz148a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_orapp (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)) m (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_satz147 ksi eta zeta upsilon t n) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_satz145g ksi eta zeta upsilon t n) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2498 *)
-definition l_e_st_eq_landau_n_rt_rp_satz148b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.(l_orapp (l_e_st_eq_landau_n_rt_rp_more zeta upsilon) (l_e_st_eq_landau_n_rt_rp_is zeta upsilon) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)) n (λt:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.l_e_st_eq_landau_n_rt_rp_satz147 ksi eta zeta upsilon m t) (λt:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.l_e_st_eq_landau_n_rt_rp_satz145h zeta upsilon ksi eta t m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2499 *)
-definition l_e_st_eq_landau_n_rt_rp_satz148c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_less zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz148a eta ksi upsilon zeta (l_e_st_eq_landau_n_rt_rp_satz125 ksi eta l) (l_e_st_eq_landau_n_rt_rp_satz122 zeta upsilon k)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2500 *)
-definition l_e_st_eq_landau_n_rt_rp_satz148d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz148b eta ksi upsilon zeta (l_e_st_eq_landau_n_rt_rp_satz122 ksi eta l) (l_e_st_eq_landau_n_rt_rp_satz125 zeta upsilon k)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2501 *)
-definition l_e_st_eq_landau_n_rt_rp_4149_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λj:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.(l_e_st_eq_landau_n_rt_rp_moreisi2 (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ists12 ksi eta zeta upsilon i j) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2502 *)
-definition l_e_st_eq_landau_n_rt_rp_4149_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.λo:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.(l_e_st_eq_landau_n_rt_rp_moreisi1 (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_satz148a ksi eta zeta upsilon m o) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2503 *)
-definition l_e_st_eq_landau_n_rt_rp_4149_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_orapp (l_e_st_eq_landau_n_rt_rp_more zeta upsilon) (l_e_st_eq_landau_n_rt_rp_is zeta upsilon) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)) n (λt:l_e_st_eq_landau_n_rt_rp_more zeta upsilon.l_e_st_eq_landau_n_rt_rp_4149_t2 ksi eta zeta upsilon m n i t) (λt:l_e_st_eq_landau_n_rt_rp_is zeta upsilon.l_e_st_eq_landau_n_rt_rp_4149_t1 ksi eta zeta upsilon m n i t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2504 *)
-definition l_e_st_eq_landau_n_rt_rp_4149_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.λo:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_moreisi1 (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_satz148b ksi eta zeta upsilon o n) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2505 *)
-definition l_e_st_eq_landau_n_rt_rp_satz149 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis ksi eta.λn:l_e_st_eq_landau_n_rt_rp_moreis zeta upsilon.(l_orapp (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_is ksi eta) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)) m (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_4149_t4 ksi eta zeta upsilon m n t) (λt:l_e_st_eq_landau_n_rt_rp_is ksi eta.l_e_st_eq_landau_n_rt_rp_4149_t3 ksi eta zeta upsilon m n t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2506 *)
-definition l_e_st_eq_landau_n_rt_rp_satz149a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λzeta:l_e_st_eq_landau_n_rt_cut.λupsilon:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessis ksi eta.λk:l_e_st_eq_landau_n_rt_rp_lessis zeta upsilon.(l_e_st_eq_landau_n_rt_rp_satz124 (l_e_st_eq_landau_n_rt_rp_ts eta upsilon) (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_satz149 eta ksi upsilon zeta (l_e_st_eq_landau_n_rt_rp_satz125 ksi eta l) (l_e_st_eq_landau_n_rt_rp_satz125 zeta upsilon k)) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_ts ksi zeta) (l_e_st_eq_landau_n_rt_rp_ts eta upsilon)).
-
-(* constant 2507 *)
-definition l_e_st_eq_landau_n_rt_ratset ≝ λr0:l_e_st_eq_landau_n_rt_rat.(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less x r0) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2508 *)
-definition l_e_st_eq_landau_n_rt_4150_t1 ≝ λr0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz90 r0 : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less x r0)).
-
-(* constant 2509 *)
-definition l_e_st_eq_landau_n_rt_4150_t2 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 r0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less x r0) x0 l : l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_ratset r0)).
-
-(* constant 2510 *)
-definition l_e_st_eq_landau_n_rt_4150_t3 ≝ λr0:l_e_st_eq_landau_n_rt_rat.(l_ec3e13 (l_e_st_eq_landau_n_rt_is r0 r0) (l_e_st_eq_landau_n_rt_more r0 r0) (l_e_st_eq_landau_n_rt_less r0 r0) (l_e_st_eq_landau_n_rt_satz81b r0 r0) (l_e_refis l_e_st_eq_landau_n_rt_rat r0) : l_not (l_e_st_eq_landau_n_rt_less r0 r0)).
-
-(* constant 2511 *)
-definition l_e_st_eq_landau_n_rt_4150_t4 ≝ λr0:l_e_st_eq_landau_n_rt_rat.(l_imp_th3 (l_e_st_eq_landau_n_rt_in r0 (l_e_st_eq_landau_n_rt_ratset r0)) (l_e_st_eq_landau_n_rt_less r0 r0) (l_e_st_eq_landau_n_rt_4150_t3 r0) (λt:l_e_st_eq_landau_n_rt_in r0 (l_e_st_eq_landau_n_rt_ratset r0).l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less x r0) r0 t) : l_not (l_e_st_eq_landau_n_rt_in r0 (l_e_st_eq_landau_n_rt_ratset r0))).
-
-(* constant 2512 *)
-definition l_e_st_eq_landau_n_rt_4150_t5 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_ratset r0).(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less x r0) x0 i : l_e_st_eq_landau_n_rt_less x0 r0).
-
-(* constant 2513 *)
-definition l_e_st_eq_landau_n_rt_4150_t6 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_ratset r0).λx1:l_e_st_eq_landau_n_rt_rat.λk:l_e_st_eq_landau_n_rt_less x1 x0.(l_e_st_eq_landau_n_rt_4150_t2 r0 x1 (l_e_st_eq_landau_n_rt_trless x1 x0 r0 k (l_e_st_eq_landau_n_rt_4150_t5 r0 x0 i)) : l_e_st_eq_landau_n_rt_in x1 (l_e_st_eq_landau_n_rt_ratset r0)).
-
-(* constant 2514 *)
-definition l_e_st_eq_landau_n_rt_4150_t7 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_ratset r0).(l_e_st_eq_landau_n_rt_satz91 x0 r0 (l_e_st_eq_landau_n_rt_4150_t5 r0 x0 i) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x0 x) (l_e_st_eq_landau_n_rt_less x r0))).
-
-(* constant 2515 *)
-definition l_e_st_eq_landau_n_rt_4150_t8 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_ratset r0).λx1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x0 x1) (l_e_st_eq_landau_n_rt_less x1 r0).(l_ande1 (l_e_st_eq_landau_n_rt_less x0 x1) (l_e_st_eq_landau_n_rt_less x1 r0) a : l_e_st_eq_landau_n_rt_less x0 x1).
-
-(* constant 2516 *)
-definition l_e_st_eq_landau_n_rt_4150_t9 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_ratset r0).λx1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x0 x1) (l_e_st_eq_landau_n_rt_less x1 r0).(l_ande2 (l_e_st_eq_landau_n_rt_less x0 x1) (l_e_st_eq_landau_n_rt_less x1 r0) a : l_e_st_eq_landau_n_rt_less x1 r0).
-
-(* constant 2517 *)
-definition l_e_st_eq_landau_n_rt_4150_t10 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_ratset r0).λx1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x0 x1) (l_e_st_eq_landau_n_rt_less x1 r0).(l_andi (l_e_st_eq_landau_n_rt_in x1 (l_e_st_eq_landau_n_rt_ratset r0)) (l_e_st_eq_landau_n_rt_more x1 x0) (l_e_st_eq_landau_n_rt_4150_t2 r0 x1 (l_e_st_eq_landau_n_rt_4150_t9 r0 x0 i x1 a)) (l_e_st_eq_landau_n_rt_satz83 x0 x1 (l_e_st_eq_landau_n_rt_4150_t8 r0 x0 i x1 a)) : l_and (l_e_st_eq_landau_n_rt_in x1 (l_e_st_eq_landau_n_rt_ratset r0)) (l_e_st_eq_landau_n_rt_more x1 x0)).
-
-(* constant 2518 *)
-definition l_e_st_eq_landau_n_rt_4150_t11 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_ratset r0).(l_some_th6 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x0 x) (l_e_st_eq_landau_n_rt_less x r0)) (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_ratset r0)) (l_e_st_eq_landau_n_rt_more x x0)) (l_e_st_eq_landau_n_rt_4150_t7 r0 x0 i) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_and (l_e_st_eq_landau_n_rt_less x0 x) (l_e_st_eq_landau_n_rt_less x r0).l_e_st_eq_landau_n_rt_4150_t10 r0 x0 i x t) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_ratset r0)) (l_e_st_eq_landau_n_rt_more x x0))).
-
-(* constant 2519 *)
-definition l_e_st_eq_landau_n_rt_4150_t12 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 r0.(l_e_st_eq_landau_n_rt_cut2 (l_e_st_eq_landau_n_rt_ratset r0) x0 (l_e_st_eq_landau_n_rt_4150_t2 r0 x0 l) r0 (l_e_st_eq_landau_n_rt_4150_t4 r0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_ratset r0).λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_4150_t6 r0 x t y u) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_ratset r0).l_e_st_eq_landau_n_rt_4150_t11 r0 x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_ratset r0)).
-
-(* constant 2520 *)
-definition l_e_st_eq_landau_n_rt_satz150 ≝ λr0:l_e_st_eq_landau_n_rt_rat.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_less x r0) (l_e_st_eq_landau_n_rt_4150_t1 r0) (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_ratset r0)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_less x r0.l_e_st_eq_landau_n_rt_4150_t12 r0 x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_ratset r0)).
-
-(* constant 2521 *)
-definition l_e_st_eq_landau_n_rt_rp_rpofrt ≝ λr0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_cutof (l_e_st_eq_landau_n_rt_ratset r0) (l_e_st_eq_landau_n_rt_satz150 r0) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2522 *)
-definition l_e_st_eq_landau_n_rt_rp_lrtrpofrt ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 r0.(l_e_st_eq_landau_n_rt_rp_ine (l_e_st_eq_landau_n_rt_ratset r0) (l_e_st_eq_landau_n_rt_satz150 r0) x0 (l_e_st_eq_landau_n_rt_4150_t2 r0 x0 l) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt r0) x0).
-
-(* constant 2523 *)
-definition l_e_st_eq_landau_n_rt_rp_lrtrpofrte ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt r0) x0.(l_e_st_eq_landau_n_rt_4150_t5 r0 x0 (l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_ratset r0) (l_e_st_eq_landau_n_rt_satz150 r0) x0 lx) : l_e_st_eq_landau_n_rt_less x0 r0).
-
-(* constant 2524 *)
-definition l_e_st_eq_landau_n_rt_rp_iii4_t12 ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 r0.(l_e_st_eq_landau_n_rt_satz81c x0 r0 m : l_not (l_e_st_eq_landau_n_rt_less x0 r0)).
-
-(* constant 2525 *)
-definition l_e_st_eq_landau_n_rt_rp_urtrpofrt ≝ λr0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 r0.(l_imp_th3 (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt r0) x0) (l_e_st_eq_landau_n_rt_less x0 r0) (l_e_st_eq_landau_n_rt_rp_iii4_t12 r0 x0 m) (λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt r0) x0.l_e_st_eq_landau_n_rt_rp_lrtrpofrte r0 x0 t) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_rpofrt r0) x0).
-
-(* constant 2526 *)
-definition l_e_st_eq_landau_n_rt_rp_1rp ≝ (l_e_st_eq_landau_n_rt_rp_rpofrt l_e_st_eq_landau_n_rt_1rt : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2527 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_lrtrpofrte l_e_st_eq_landau_n_rt_1rt y0 ly : l_e_st_eq_landau_n_rt_less y0 l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2528 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_ts x0 y0) z0 (l_e_st_eq_landau_n_rt_ts x0 l_e_st_eq_landau_n_rt_1rt) x0 (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_ts x0 y0) i) (l_e_st_eq_landau_n_rt_example1a x0) (l_e_st_eq_landau_n_rt_satz105f y0 l_e_st_eq_landau_n_rt_1rt x0 (l_e_st_eq_landau_n_rt_rp_4151_t1 ksi z0 lz x0 lx y0 ly i)) : l_e_st_eq_landau_n_rt_less z0 x0).
-
-(* constant 2529 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp y0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 y0).(l_e_st_eq_landau_n_rt_rp_satz120 ksi x0 lx z0 (l_e_st_eq_landau_n_rt_rp_4151_t2 ksi z0 lz x0 lx y0 ly i) : l_e_st_eq_landau_n_rt_lrt ksi z0).
-
-(* constant 2530 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) z0.(l_e_st_eq_landau_n_rt_rp_tsapp ksi l_e_st_eq_landau_n_rt_rp_1rp z0 lz (l_e_st_eq_landau_n_rt_lrt ksi z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4151_t3 ksi z0 lz x t y u v) : l_e_st_eq_landau_n_rt_lrt ksi z0).
-
-(* constant 2531 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_y1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) x0 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2532 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) x1) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_4151_y1 ksi x0 lx x1 lx1 l) (l_e_st_eq_landau_n_rt_satz110e l_e_st_eq_landau_n_rt_1rt x1) (l_e_st_eq_landau_n_rt_satz105f x0 x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) l) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_rp_4151_y1 ksi x0 lx x1 lx1 l) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2533 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_rp_lrtrpofrt l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_4151_y1 ksi x0 lx x1 lx1 l) (l_e_st_eq_landau_n_rt_rp_4151_t5 ksi x0 lx x1 lx1 l) : l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_4151_y1 ksi x0 lx x1 lx1 l)).
-
-(* constant 2534 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x1 (l_e_st_eq_landau_n_rt_rp_4151_y1 ksi x0 lx x1 lx1 l)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1)) x0) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x0) x0 (l_e_st_eq_landau_n_rt_assts2 x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) x0) (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_ts x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1)) l_e_st_eq_landau_n_rt_1rt x0 (l_e_st_eq_landau_n_rt_satz110c l_e_st_eq_landau_n_rt_1rt x1)) (l_e_st_eq_landau_n_rt_example1c x0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x1 (l_e_st_eq_landau_n_rt_rp_4151_y1 ksi x0 lx x1 lx1 l)) x0).
-
-(* constant 2535 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λl:l_e_st_eq_landau_n_rt_less x0 x1.(l_e_st_eq_landau_n_rt_rp_lrtts ksi l_e_st_eq_landau_n_rt_rp_1rp x0 x1 lx1 (l_e_st_eq_landau_n_rt_rp_4151_y1 ksi x0 lx x1 lx1 l) (l_e_st_eq_landau_n_rt_rp_4151_t6 ksi x0 lx x1 lx1 l) (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x1 (l_e_st_eq_landau_n_rt_rp_4151_y1 ksi x0 lx x1 lx1 l)) x0 (l_e_st_eq_landau_n_rt_rp_4151_t7 ksi x0 lx x1 lx1 l)) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) x0).
-
-(* constant 2536 *)
-definition l_e_st_eq_landau_n_rt_rp_4151_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_e_st_eq_landau_n_rt_cutapp3 ksi x0 lx (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) x0) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi y.λu:l_e_st_eq_landau_n_rt_less x0 y.l_e_st_eq_landau_n_rt_rp_4151_t8 ksi x0 lx y t u) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) x0).
-
-(* constant 2537 *)
-definition l_e_st_eq_landau_n_rt_rp_satz151 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) ksi (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) x.l_e_st_eq_landau_n_rt_rp_4151_t4 ksi x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_rp_4151_t9 ksi x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) ksi).
-
-(* constant 2538 *)
-definition l_e_st_eq_landau_n_rt_rp_satz151a ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) ksi (l_e_st_eq_landau_n_rt_rp_satz151 ksi) : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp)).
-
-(* constant 2539 *)
-definition l_e_st_eq_landau_n_rt_rp_satz151b ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_1rp ksi) (l_e_st_eq_landau_n_rt_rp_ts ksi l_e_st_eq_landau_n_rt_rp_1rp) ksi (l_e_st_eq_landau_n_rt_rp_comts l_e_st_eq_landau_n_rt_rp_1rp ksi) (l_e_st_eq_landau_n_rt_rp_satz151 ksi) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_1rp ksi) ksi).
-
-(* constant 2540 *)
-definition l_e_st_eq_landau_n_rt_rp_satz151c ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_1rp ksi) ksi (l_e_st_eq_landau_n_rt_rp_satz151b ksi) : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_1rp ksi)).
-
-(* constant 2541 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_invprop1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_and (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_less y0 x0) : Prop).
-
-(* constant 2542 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_invprop2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.(l_and3 (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x)) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) : Prop).
-
-(* constant 2543 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_invprop ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x) : Prop).
-
-(* constant 2544 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_inv ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop ksi z) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2545 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_andi (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_less y0 x0) uy l : l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 y0).
-
-(* constant 2546 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x) y0 (l_e_st_eq_landau_n_rt_rp_4152_t1 ksi z0 x0 ux y0 uy l i) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x)).
-
-(* constant 2547 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_and3i (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x)) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) ux (l_e_st_eq_landau_n_rt_rp_4152_t2 ksi z0 x0 ux y0 uy l i) i : l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x0).
-
-(* constant 2548 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x) x0 (l_e_st_eq_landau_n_rt_rp_4152_t3 ksi z0 x0 ux y0 uy l i) : l_e_st_eq_landau_n_rt_rp_4152_invprop ksi z0).
-
-(* constant 2549 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_inv1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.λl:l_e_st_eq_landau_n_rt_less y0 x0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λz:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop ksi z) z0 (l_e_st_eq_landau_n_rt_rp_4152_t4 ksi z0 x0 ux y0 uy l i) : l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2550 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop ksi x) z0 i : l_e_st_eq_landau_n_rt_rp_4152_invprop ksi z0).
-
-(* constant 2551 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x0.(l_and3e1 (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x)) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) px : l_e_st_eq_landau_n_rt_urt ksi x0).
-
-(* constant 2552 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x0.(l_and3e2 (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x)) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) px : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x)).
-
-(* constant 2553 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x0.(l_and3e3 (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x)) (l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) px : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)).
-
-(* constant 2554 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x0.λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 y0.(l_ande1 (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_less y0 x0) py : l_e_st_eq_landau_n_rt_urt ksi y0).
-
-(* constant 2555 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x0.λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 y0.(l_ande2 (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_less y0 x0) py : l_e_st_eq_landau_n_rt_less y0 x0).
-
-(* constant 2556 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x0.λy0:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 y0.(p1 x0 (l_e_st_eq_landau_n_rt_rp_4152_t6 ksi z0 i p p1 x0 px) y0 (l_e_st_eq_landau_n_rt_rp_4152_t9 ksi z0 i p p1 x0 px y0 py) (l_e_st_eq_landau_n_rt_rp_4152_t10 ksi z0 i p p1 x0 px y0 py) (l_e_st_eq_landau_n_rt_rp_4152_t8 ksi z0 i p p1 x0 px) : p).
-
-(* constant 2557 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.λx0:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x0.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x) (l_e_st_eq_landau_n_rt_rp_4152_t7 ksi z0 i p p1 x0 px) p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_4152_invprop1 ksi x0 x.l_e_st_eq_landau_n_rt_rp_4152_t11 ksi z0 i p p1 x0 px x t) : p).
-
-(* constant 2558 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_invapp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_urt ksi x.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_urt ksi y.∀v:l_e_st_eq_landau_n_rt_less y x.∀w:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x) (l_e_st_eq_landau_n_rt_rp_4152_t5 ksi z0 i p p1) p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_4152_invprop2 ksi z0 x.l_e_st_eq_landau_n_rt_rp_4152_t12 ksi z0 i p p1 x t) : p).
-
-(* constant 2559 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_2x0 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_e_st_eq_landau_n_rt_pl x0 x0 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2560 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_e_st_eq_landau_n_rt_satz94a x0 x0 : l_e_st_eq_landau_n_rt_less x0 (l_e_st_eq_landau_n_rt_rp_4152_2x0 ksi x0 ux)).
-
-(* constant 2561 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_e_st_eq_landau_n_rt_rp_satz119a ksi x0 ux (l_e_st_eq_landau_n_rt_rp_4152_2x0 ksi x0 ux) (l_e_st_eq_landau_n_rt_rp_4152_t13 ksi x0 ux) : l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_rp_4152_2x0 ksi x0 ux)).
-
-(* constant 2562 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_e_st_eq_landau_n_rt_rp_4152_inv1 ksi (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_4152_2x0 ksi x0 ux)) (l_e_st_eq_landau_n_rt_rp_4152_2x0 ksi x0 ux) (l_e_st_eq_landau_n_rt_rp_4152_t14 ksi x0 ux) x0 ux (l_e_st_eq_landau_n_rt_rp_4152_t13 ksi x0 ux) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_4152_2x0 ksi x0 ux))) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_4152_2x0 ksi x0 ux)) (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2563 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x1.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_imp_th3 (l_e_st_eq_landau_n_rt_is x0 x1) (l_e_st_eq_landau_n_rt_lrt ksi x0) ux (λt:l_e_st_eq_landau_n_rt_is x0 x1.l_e_isp1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lrt ksi x) x1 x0 lx t) : l_e_st_eq_landau_n_rt_nis x0 x1).
-
-(* constant 2564 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x1.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_e_st_eq_landau_n_rt_satz110e l_e_st_eq_landau_n_rt_1rt x0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2565 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x1.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_e_st_eq_landau_n_rt_satz110e l_e_st_eq_landau_n_rt_1rt x1 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) x1) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2566 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x1.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1).(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x1) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) x1) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) x1 i) (l_e_st_eq_landau_n_rt_rp_4152_t18 ksi x1 lx x0 ux) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x1) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2567 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x1.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1).(l_e_st_eq_landau_n_rt_satz110b l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0 x1 (l_e_st_eq_landau_n_rt_rp_4152_t17 ksi x1 lx x0 ux) (l_e_st_eq_landau_n_rt_rp_4152_t19 ksi x1 lx x0 ux i) : l_e_st_eq_landau_n_rt_is x0 x1).
-
-(* constant 2568 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x1.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_imp_th3 (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1)) (l_e_st_eq_landau_n_rt_is x0 x1) (l_e_st_eq_landau_n_rt_rp_4152_t16 ksi x1 lx x0 ux) (λt:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1).l_e_st_eq_landau_n_rt_rp_4152_t20 ksi x1 lx x0 ux t) : l_e_st_eq_landau_n_rt_nis (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1)).
-
-(* constant 2569 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x1.λi:l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).(l_e_st_eq_landau_n_rt_rp_4152_invapp ksi (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) i l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt ksi y.λv:l_e_st_eq_landau_n_rt_less y x.λw:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).l_e_st_eq_landau_n_rt_rp_4152_t21 ksi x1 lx x t (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x) w)) : l_con).
-
-(* constant 2570 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx1:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x1.(λt:l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).l_e_st_eq_landau_n_rt_rp_4152_t22 ksi x1 lx t : l_not (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) (l_e_st_eq_landau_n_rt_rp_4152_inv ksi))).
-
-(* constant 2571 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t24 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_isless2 z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) u0 j l : l_e_st_eq_landau_n_rt_less u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)).
-
-(* constant 2572 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t25 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ts u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0)) (l_e_st_eq_landau_n_rt_satz110e l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_satz110d l_e_st_eq_landau_n_rt_1rt u0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0) (l_e_st_eq_landau_n_rt_ts u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0))).
-
-(* constant 2573 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t26 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0) (l_e_st_eq_landau_n_rt_ts u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0)) (l_e_st_eq_landau_n_rt_ts u0 x0) (l_e_st_eq_landau_n_rt_rp_4152_t25 ksi z0 i u0 l x0 ux j) (l_e_st_eq_landau_n_rt_satz105c u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x0 (l_e_st_eq_landau_n_rt_rp_4152_t24 ksi z0 i u0 l x0 ux j)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts u0 x0) (l_e_st_eq_landau_n_rt_ts u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0))).
-
-(* constant 2574 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t27 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_ts u0 x0) (l_e_st_eq_landau_n_rt_ts x0 u0) (l_e_st_eq_landau_n_rt_ts u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) u0) (l_e_st_eq_landau_n_rt_comts u0 x0) (l_e_st_eq_landau_n_rt_comts u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0)) (l_e_st_eq_landau_n_rt_rp_4152_t26 ksi z0 i u0 l x0 ux j) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 u0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) u0)).
-
-(* constant 2575 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t28 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_satz106c x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) u0 (l_e_st_eq_landau_n_rt_rp_4152_t27 ksi z0 i u0 l x0 ux j) : l_e_st_eq_landau_n_rt_less x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0)).
-
-(* constant 2576 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t29 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_rp_satz119a ksi x0 ux (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) (l_e_st_eq_landau_n_rt_rp_4152_t28 ksi z0 i u0 l x0 ux j) : l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0)).
-
-(* constant 2577 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t30 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_satz110e l_e_st_eq_landau_n_rt_1rt u0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) u0) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2578 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t31 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_satz110g l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) u0 (l_e_st_eq_landau_n_rt_rp_4152_t30 ksi z0 i u0 l x0 ux j) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0))).
-
-(* constant 2579 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t32 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_rp_4152_inv1 ksi u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) (l_e_st_eq_landau_n_rt_rp_4152_t29 ksi z0 i u0 l x0 ux j) x0 ux (l_e_st_eq_landau_n_rt_rp_4152_t28 ksi z0 i u0 l x0 ux j) (l_e_st_eq_landau_n_rt_rp_4152_t31 ksi z0 i u0 l x0 ux j) : l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2580 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t33 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λu0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less u0 z0.(l_e_st_eq_landau_n_rt_rp_4152_invapp ksi z0 i (l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt ksi y.λv:l_e_st_eq_landau_n_rt_less y x.λw:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).l_e_st_eq_landau_n_rt_rp_4152_t32 ksi z0 i u0 l x t w) : l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2581 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t34 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_e_st_eq_landau_n_rt_satz91 x1 x0 l : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x1 x) (l_e_st_eq_landau_n_rt_less x x0))).
-
-(* constant 2582 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t35 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_ande1 (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0) a : l_e_st_eq_landau_n_rt_less x1 x2).
-
-(* constant 2583 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t36 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_e_st_eq_landau_n_rt_rp_satz119a ksi x1 ux1 x2 (l_e_st_eq_landau_n_rt_rp_4152_t35 ksi z0 i x0 ux x1 ux1 l j x2 a) : l_e_st_eq_landau_n_rt_urt ksi x2).
-
-(* constant 2584 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t37 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_e_st_eq_landau_n_rt_rp_4152_inv1 ksi (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) x2 (l_e_st_eq_landau_n_rt_rp_4152_t36 ksi z0 i x0 ux x1 ux1 l j x2 a) x1 ux1 (l_e_st_eq_landau_n_rt_rp_4152_t35 ksi z0 i x0 ux x1 ux1 l j x2 a) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2)) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2585 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t38 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_ande2 (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0) a : l_e_st_eq_landau_n_rt_less x2 x0).
-
-(* constant 2586 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t39 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_e_tris l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2)) (l_e_st_eq_landau_n_rt_satz110c l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_satz110d l_e_st_eq_landau_n_rt_1rt x2) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) (l_e_st_eq_landau_n_rt_ts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2))).
-
-(* constant 2587 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t40 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) (l_e_st_eq_landau_n_rt_ts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2)) (l_e_st_eq_landau_n_rt_ts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) (l_e_st_eq_landau_n_rt_rp_4152_t39 ksi z0 i x0 ux x1 ux1 l j x2 a) (l_e_st_eq_landau_n_rt_satz105c x2 x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_rp_4152_t38 ksi z0 i x0 ux x1 ux1 l j x2 a)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) (l_e_st_eq_landau_n_rt_ts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2))).
-
-(* constant 2588 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t41 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_ts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x2) (l_e_st_eq_landau_n_rt_ts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) x2) (l_e_st_eq_landau_n_rt_comts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0)) (l_e_st_eq_landau_n_rt_comts x2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2)) (l_e_st_eq_landau_n_rt_rp_4152_t40 ksi z0 i x0 ux x1 ux1 l j x2 a) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) x2) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) x2)).
-
-(* constant 2589 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t42 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_e_st_eq_landau_n_rt_satz106c (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) x2 (l_e_st_eq_landau_n_rt_rp_4152_t41 ksi z0 i x0 ux x1 ux1 l j x2 a) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2)).
-
-(* constant 2590 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t43 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_e_st_eq_landau_n_rt_ismore2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) j) (l_e_st_eq_landau_n_rt_satz83 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) (l_e_st_eq_landau_n_rt_rp_4152_t42 ksi z0 i x0 ux x1 ux1 l j x2 a)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) z0).
-
-(* constant 2591 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t44 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_andi (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) z0) (l_e_st_eq_landau_n_rt_rp_4152_t37 ksi z0 i x0 ux x1 ux1 l j x2 a) (l_e_st_eq_landau_n_rt_rp_4152_t43 ksi z0 i x0 ux x1 ux1 l j x2 a) : l_and (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) z0)).
-
-(* constant 2592 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t45 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).λx2:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less x1 x2) (l_e_st_eq_landau_n_rt_less x2 x0).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (l_e_st_eq_landau_n_rt_more x z0)) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x2) (l_e_st_eq_landau_n_rt_rp_4152_t44 ksi z0 i x0 ux x1 ux1 l j x2 a) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (l_e_st_eq_landau_n_rt_more x z0))).
-
-(* constant 2593 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t46 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λux1:l_e_st_eq_landau_n_rt_urt ksi x1.λl:l_e_st_eq_landau_n_rt_less x1 x0.λj:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0).(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less x1 x) (l_e_st_eq_landau_n_rt_less x x0)) (l_e_st_eq_landau_n_rt_rp_4152_t34 ksi z0 i x0 ux x1 ux1 l j) (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (l_e_st_eq_landau_n_rt_more x z0))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_and (l_e_st_eq_landau_n_rt_less x1 x) (l_e_st_eq_landau_n_rt_less x x0).l_e_st_eq_landau_n_rt_rp_4152_t45 ksi z0 i x0 ux x1 ux1 l j x t) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (l_e_st_eq_landau_n_rt_more x z0))).
-
-(* constant 2594 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t47 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in z0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).(l_e_st_eq_landau_n_rt_rp_4152_invapp ksi z0 i (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (l_e_st_eq_landau_n_rt_more x z0))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt ksi y.λv:l_e_st_eq_landau_n_rt_less y x.λw:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).l_e_st_eq_landau_n_rt_rp_4152_t46 ksi z0 i x t y u v w) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (l_e_st_eq_landau_n_rt_more x z0))).
-
-(* constant 2595 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t48 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_e_st_eq_landau_n_rt_cut2 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_pl y0 y0)) (l_e_st_eq_landau_n_rt_rp_4152_t15 ksi y0 uy) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x0) (l_e_st_eq_landau_n_rt_rp_4152_t23 ksi x0 lx) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_rp_4152_t33 ksi x t y u) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_4152_inv ksi).l_e_st_eq_landau_n_rt_rp_4152_t47 ksi x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2596 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t49 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_e_st_eq_landau_n_rt_cutapp1b ksi (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.l_e_st_eq_landau_n_rt_rp_4152_t48 ksi x0 lx x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2597 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t50 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_cutapp1a ksi (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_rp_4152_t49 ksi x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2598 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_chi ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_cutof (l_e_st_eq_landau_n_rt_rp_4152_inv ksi) (l_e_st_eq_landau_n_rt_rp_4152_t50 ksi) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2599 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t51 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 u0).λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1).(l_e_tris l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_ts x0 u0) (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1)) i (l_e_st_eq_landau_n_rt_ists2 u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) x0 j) : l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1))).
-
-(* constant 2600 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t52 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 u0).λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1).(l_e_st_eq_landau_n_rt_cutapp2a ksi x0 lx x1 ux : l_e_st_eq_landau_n_rt_less x0 x1).
-
-(* constant 2601 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t53 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 u0).λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1).(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1)) z0 (l_e_st_eq_landau_n_rt_ts x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1)) l_e_st_eq_landau_n_rt_1rt (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1)) (l_e_st_eq_landau_n_rt_rp_4152_t51 ksi z0 lz x0 lx u0 lu i x1 ux j)) (l_e_st_eq_landau_n_rt_satz110c l_e_st_eq_landau_n_rt_1rt x1) (l_e_st_eq_landau_n_rt_satz105c x0 x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1) (l_e_st_eq_landau_n_rt_rp_4152_t52 ksi z0 lz x0 lx u0 lu i x1 ux j)) : l_e_st_eq_landau_n_rt_less z0 l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2602 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t54 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 u0).λx1:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x1.λj:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x1).(l_e_st_eq_landau_n_rt_rp_lrtrpofrt l_e_st_eq_landau_n_rt_1rt z0 (l_e_st_eq_landau_n_rt_rp_4152_t53 ksi z0 lz x0 lx u0 lu i x1 ux j) : l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp z0).
-
-(* constant 2603 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_r1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 u0).(l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_rp_4152_inv ksi) (l_e_st_eq_landau_n_rt_rp_4152_t50 ksi) u0 lu : l_e_st_eq_landau_n_rt_in u0 (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2604 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_r2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) z0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) u0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x0 u0).(l_e_st_eq_landau_n_rt_rp_4152_invapp ksi u0 (l_e_st_eq_landau_n_rt_rp_4152_r1 ksi z0 lz x0 lx u0 lu i) (l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt ksi y.λv:l_e_st_eq_landau_n_rt_less y x.λw:l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt x).l_e_st_eq_landau_n_rt_rp_4152_t54 ksi z0 lz x0 lx u0 lu i x t w) : l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp z0).
-
-(* constant 2605 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_r3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) z0.(l_e_st_eq_landau_n_rt_rp_tsapp ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) z0 lz (l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_4152_r2 ksi z0 lz x t y u v) : l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp z0).
-
-(* constant 2606 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t55 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.(l_e_st_eq_landau_n_rt_rp_lrtrpofrte l_e_st_eq_landau_n_rt_1rt u0 lu : l_e_st_eq_landau_n_rt_less u0 l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2607 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t56 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.(l_e_st_eq_landau_n_rt_satz83 u0 l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_rp_4152_t55 ksi u0 lu) : l_e_st_eq_landau_n_rt_more l_e_st_eq_landau_n_rt_1rt u0).
-
-(* constant 2608 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t57 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.(l_e_st_eq_landau_n_rt_cutapp2b ksi x1 lx1 x2 ux2 : l_e_st_eq_landau_n_rt_more x2 x1).
-
-(* constant 2609 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t58 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_cutapp2a ksi x0 lx x2 ux2 : l_e_st_eq_landau_n_rt_less x0 x2).
-
-(* constant 2610 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t59 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_satz105f x0 x2 (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) (l_e_st_eq_landau_n_rt_rp_4152_t58 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x2)).
-
-(* constant 2611 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t60 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_isless1 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0) (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x2) (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0) i) (l_e_st_eq_landau_n_rt_rp_4152_t59 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x2)).
-
-(* constant 2612 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t61 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_tr4is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x2) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) u0) x2) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x2) x2 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) x1) (l_e_st_eq_landau_n_rt_distpt1 (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) u0 x2) (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) u0) l_e_st_eq_landau_n_rt_1rt x2 (l_e_st_eq_landau_n_rt_satz101e l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu))) (l_e_st_eq_landau_n_rt_example1c x2) (l_e_st_eq_landau_n_rt_satz101f x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x2) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) x1)).
-
-(* constant 2613 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t62 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_satz96c (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x2) (l_e_st_eq_landau_n_rt_ts u0 x2) (l_e_st_eq_landau_n_rt_rp_4152_t60 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x2) (l_e_st_eq_landau_n_rt_ts u0 x2))).
-
-(* constant 2614 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t63 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_isless2 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x2) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) x1) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_rp_4152_t61 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) (l_e_st_eq_landau_n_rt_rp_4152_t62 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) x1)).
-
-(* constant 2615 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t64 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts u0 x2) (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2))) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) x1) (l_e_st_eq_landau_n_rt_pl x1 (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2))) (l_e_st_eq_landau_n_rt_compl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_compl (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) x1) (l_e_st_eq_landau_n_rt_rp_4152_t63 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts u0 x2) (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2))) (l_e_st_eq_landau_n_rt_pl x1 (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)))).
-
-(* constant 2616 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t65 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_satz97c (l_e_st_eq_landau_n_rt_ts u0 x2) x1 (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_rp_4152_t64 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts u0 x2) x1).
-
-(* constant 2617 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t66 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) (l_e_st_eq_landau_n_rt_ts u0 x2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) u0) x2) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x2) x2 (l_e_st_eq_landau_n_rt_assts2 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) u0 x2) (l_e_st_eq_landau_n_rt_ists1 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) u0) l_e_st_eq_landau_n_rt_1rt x2 (l_e_st_eq_landau_n_rt_satz110e l_e_st_eq_landau_n_rt_1rt u0)) (l_e_st_eq_landau_n_rt_example1c x2) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) (l_e_st_eq_landau_n_rt_ts u0 x2)) x2).
-
-(* constant 2618 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t67 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) (l_e_st_eq_landau_n_rt_ts u0 x2)) x2 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) x1) (l_e_st_eq_landau_n_rt_ov x1 u0) (l_e_st_eq_landau_n_rt_rp_4152_t66 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) (l_e_st_eq_landau_n_rt_satz141b x1 u0) (l_e_st_eq_landau_n_rt_satz105f (l_e_st_eq_landau_n_rt_ts u0 x2) x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt u0) (l_e_st_eq_landau_n_rt_rp_4152_t65 ksi u0 lu x0 lx x1 lx1 x2 ux2 i)) : l_e_st_eq_landau_n_rt_less x2 (l_e_st_eq_landau_n_rt_ov x1 u0)).
-
-(* constant 2619 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t68 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_rp_satz119a ksi x2 ux2 (l_e_st_eq_landau_n_rt_ov x1 u0) (l_e_st_eq_landau_n_rt_rp_4152_t67 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_ov x1 u0)).
-
-(* constant 2620 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t69 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_satz110e x1 u0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov x1 u0) u0) x1).
-
-(* constant 2621 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t70 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_tr3is l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_ov x1 (l_e_st_eq_landau_n_rt_ov x1 u0)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0)) x1) (l_e_st_eq_landau_n_rt_ts x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0))) (l_e_st_eq_landau_n_rt_satz110g x1 (l_e_st_eq_landau_n_rt_ov x1 u0) u0 (l_e_st_eq_landau_n_rt_rp_4152_t69 ksi u0 lu x0 lx x1 lx1 x2 ux2 i)) (l_e_st_eq_landau_n_rt_satz141c x1 (l_e_st_eq_landau_n_rt_ov x1 u0)) (l_e_st_eq_landau_n_rt_comts (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0)) x1) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts x1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0)))).
-
-(* constant 2622 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t71 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_rp_4152_inv1 ksi (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0)) (l_e_st_eq_landau_n_rt_ov x1 u0) (l_e_st_eq_landau_n_rt_rp_4152_t68 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) x2 ux2 (l_e_st_eq_landau_n_rt_rp_4152_t67 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0))) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0)) (l_e_st_eq_landau_n_rt_rp_4152_inv ksi)).
-
-(* constant 2623 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t72 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_rp_ine (l_e_st_eq_landau_n_rt_rp_4152_inv ksi) (l_e_st_eq_landau_n_rt_rp_4152_t50 ksi) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0)) (l_e_st_eq_landau_n_rt_rp_4152_t71 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0))).
-
-(* constant 2624 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t73 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt ksi x1.λx2:l_e_st_eq_landau_n_rt_rat.λux2:l_e_st_eq_landau_n_rt_urt ksi x2.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn x2 x1 (l_e_st_eq_landau_n_rt_rp_4152_t57 ksi u0 lu x0 lx x1 lx1 x2 ux2)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).(l_e_st_eq_landau_n_rt_rp_lrtts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) u0 x1 lx1 (l_e_st_eq_landau_n_rt_ov l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_ov x1 u0)) (l_e_st_eq_landau_n_rt_rp_4152_t72 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) (l_e_st_eq_landau_n_rt_rp_4152_t70 ksi u0 lu x0 lx x1 lx1 x2 ux2 i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) u0).
-
-(* constant 2625 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t74 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_e_st_eq_landau_n_rt_rp_satz132app ksi (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) u0) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_urt ksi y.λv:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn y x (l_e_st_eq_landau_n_rt_cutapp2b ksi x t y u)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_mn l_e_st_eq_landau_n_rt_1rt u0 (l_e_st_eq_landau_n_rt_rp_4152_t56 ksi u0 lu)) x0).l_e_st_eq_landau_n_rt_rp_4152_t73 ksi u0 lu x0 lx x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) u0).
-
-(* constant 2626 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t75 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp u0.(l_e_st_eq_landau_n_rt_cutapp1a ksi (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_rp_4152_t74 ksi u0 lu x t) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) u0).
-
-(* constant 2627 *)
-definition l_e_st_eq_landau_n_rt_rp_4152_t76 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) l_e_st_eq_landau_n_rt_rp_1rp (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) x.l_e_st_eq_landau_n_rt_rp_4152_r3 ksi x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt l_e_st_eq_landau_n_rt_rp_1rp x.l_e_st_eq_landau_n_rt_rp_4152_t75 ksi x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_4152_chi ksi)) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2628 *)
-definition l_e_st_eq_landau_n_rt_rp_satz152 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_somei l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi t) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_4152_chi ksi) (l_e_st_eq_landau_n_rt_rp_4152_t76 ksi) : l_e_st_eq_landau_n_rt_rp_some (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi c) l_e_st_eq_landau_n_rt_rp_1rp)).
-
-(* constant 2629 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more phi psi.(l_e_st_eq_landau_n_rt_rp_satz145d phi psi eta m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)).
-
-(* constant 2630 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more phi psi.(l_ec3e21 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_4153_t1 ksi eta phi psi m) : l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)).
-
-(* constant 2631 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less phi psi.(l_e_st_eq_landau_n_rt_rp_satz145f phi psi eta l : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)).
-
-(* constant 2632 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less phi psi.(l_ec3e31 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_4153_t3 ksi eta phi psi l) : l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)).
-
-(* constant 2633 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_nis phi psi.(l_or3_th1 (l_e_st_eq_landau_n_rt_rp_is phi psi) (l_e_st_eq_landau_n_rt_rp_more phi psi) (l_e_st_eq_landau_n_rt_rp_less phi psi) (l_e_st_eq_landau_n_rt_rp_satz123a phi psi) n : l_or (l_e_st_eq_landau_n_rt_rp_more phi psi) (l_e_st_eq_landau_n_rt_rp_less phi psi)).
-
-(* constant 2634 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_nis phi psi.(l_orapp (l_e_st_eq_landau_n_rt_rp_more phi psi) (l_e_st_eq_landau_n_rt_rp_less phi psi) (l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_st_eq_landau_n_rt_rp_4153_t5 ksi eta phi psi n) (λt:l_e_st_eq_landau_n_rt_rp_more phi psi.l_e_st_eq_landau_n_rt_rp_4153_t2 ksi eta phi psi t) (λt:l_e_st_eq_landau_n_rt_rp_less phi psi.l_e_st_eq_landau_n_rt_rp_4153_t4 ksi eta phi psi t) : l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)).
-
-(* constant 2635 *)
-definition l_e_st_eq_landau_n_rt_rp_satz153b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λpsi:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta phi) ksi.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta psi) ksi.(l_imp_th7 (l_e_st_eq_landau_n_rt_rp_is phi psi) (l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_weli (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi)) (l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts eta phi) (l_e_st_eq_landau_n_rt_rp_ts eta psi) ksi i j)) (λt:l_e_st_eq_landau_n_rt_rp_nis phi psi.l_e_st_eq_landau_n_rt_rp_4153_t6 ksi eta phi psi t) : l_e_st_eq_landau_n_rt_rp_is phi psi).
-
-(* constant 2636 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_chi ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λtau:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta tau) l_e_st_eq_landau_n_rt_rp_1rp.(l_e_st_eq_landau_n_rt_rp_ts tau ksi : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2637 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λtau:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta tau) l_e_st_eq_landau_n_rt_rp_1rp.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_4153_chi ksi eta tau i)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts eta tau) ksi) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_1rp ksi) ksi (l_e_st_eq_landau_n_rt_rp_assts2 eta tau ksi) (l_e_st_eq_landau_n_rt_rp_ists1 (l_e_st_eq_landau_n_rt_rp_ts eta tau) l_e_st_eq_landau_n_rt_rp_1rp ksi i) (l_e_st_eq_landau_n_rt_rp_satz151b ksi) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_4153_chi ksi eta tau i)) ksi).
-
-(* constant 2638 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λtau:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta tau) l_e_st_eq_landau_n_rt_rp_1rp.(l_somei l_e_st_eq_landau_n_rt_cut (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) ksi) (l_e_st_eq_landau_n_rt_rp_4153_chi ksi eta tau i) (l_e_st_eq_landau_n_rt_rp_4153_t7 ksi eta tau i) : l_e_st_eq_landau_n_rt_rp_some (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) ksi)).
-
-(* constant 2639 *)
-definition l_e_st_eq_landau_n_rt_rp_satz153a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_someapp l_e_st_eq_landau_n_rt_cut (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_satz152 eta) (l_e_st_eq_landau_n_rt_rp_some (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) ksi)) (λc:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) l_e_st_eq_landau_n_rt_rp_1rp.l_e_st_eq_landau_n_rt_rp_4153_t8 ksi eta c t) : l_e_st_eq_landau_n_rt_rp_some (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) ksi)).
-
-(* constant 2640 *)
-definition l_e_st_eq_landau_n_rt_rp_4153_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(λc:l_e_st_eq_landau_n_rt_cut.λd:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) ksi.λu:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta d) ksi.l_e_st_eq_landau_n_rt_rp_satz153b ksi eta c d t u : l_e_amone l_e_st_eq_landau_n_rt_cut (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) ksi)).
-
-(* constant 2641 *)
-definition l_e_st_eq_landau_n_rt_rp_satz153 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_onei l_e_st_eq_landau_n_rt_cut (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) ksi) (l_e_st_eq_landau_n_rt_rp_4153_t9 ksi eta) (l_e_st_eq_landau_n_rt_rp_satz153a ksi eta) : l_e_st_eq_landau_n_rt_rp_one (λc:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta c) ksi)).
-
-(* constant 2642 *)
-definition l_e_st_eq_landau_n_rt_rp_ov ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_ind l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta a) ksi) (l_e_st_eq_landau_n_rt_rp_satz153 ksi eta) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2643 *)
-definition l_e_st_eq_landau_n_rt_rp_satz153c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_oneax l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta a) ksi) (l_e_st_eq_landau_n_rt_rp_satz153 ksi eta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_ov ksi eta)) ksi).
-
-(* constant 2644 *)
-definition l_e_st_eq_landau_n_rt_rp_satz153d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_ov ksi eta)) ksi (l_e_st_eq_landau_n_rt_rp_satz153c ksi eta) : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_ov ksi eta))).
-
-(* constant 2645 *)
-definition l_e_st_eq_landau_n_rt_rp_satz153e ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ov ksi eta) eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_ov ksi eta)) ksi (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_ov ksi eta) eta) (l_e_st_eq_landau_n_rt_rp_satz153c ksi eta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ov ksi eta) eta) ksi).
-
-(* constant 2646 *)
-definition l_e_st_eq_landau_n_rt_rp_satz153f ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ov ksi eta) eta) ksi (l_e_st_eq_landau_n_rt_rp_satz153e ksi eta) : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ov ksi eta) eta)).
-
-(* constant 2647 *)
-definition l_e_st_eq_landau_n_rt_rp_satz153g ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λphi:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts eta phi) ksi.(l_e_st_eq_landau_n_rt_rp_satz153b ksi eta phi (l_e_st_eq_landau_n_rt_rp_ov ksi eta) i (l_e_st_eq_landau_n_rt_rp_satz153c ksi eta) : l_e_st_eq_landau_n_rt_rp_is phi (l_e_st_eq_landau_n_rt_rp_ov ksi eta)).
-
-(* constant 2648 *)
-definition l_e_st_eq_landau_n_rt_rp_ratrp ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_image l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi : Prop).
-
-(* constant 2649 *)
-definition l_e_st_eq_landau_n_rt_rp_ratrpi ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_imagei l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) x0 : l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).
-
-(* constant 2650 *)
-definition l_e_st_eq_landau_n_rt_rp_rpofnt ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rtofn x) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2651 *)
-definition l_e_st_eq_landau_n_rt_rp_natrp ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_image l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt x) ksi : Prop).
-
-(* constant 2652 *)
-definition l_e_st_eq_landau_n_rt_rp_natrpi ≝ λx:l_e_st_eq_landau_n_nat.(l_e_imagei l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt y) x : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofnt x)).
-
-(* constant 2653 *)
-definition l_e_st_eq_landau_n_rt_rp_iii5_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp ksi.λx:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofnt x).(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofrt y)) (l_e_st_eq_landau_n_rt_rtofn x) i : l_e_st_eq_landau_n_rt_rp_ratrp ksi).
-
-(* constant 2654 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmaiii5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp ksi.(l_someapp l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofnt x)) n (l_e_st_eq_landau_n_rt_rp_ratrp ksi) (λx:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofnt x).l_e_st_eq_landau_n_rt_rp_iii5_t1 ksi n x t) : l_e_st_eq_landau_n_rt_rp_ratrp ksi).
-
-(* constant 2655 *)
-definition l_e_st_eq_landau_n_rt_rp_5154_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_rp_lrtrpofrt x0 y0 (l_e_st_eq_landau_n_rt_satz82 x0 y0 m) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) y0).
-
-(* constant 2656 *)
-definition l_e_st_eq_landau_n_rt_rp_5154_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_rp_urtrpofrt y0 y0 (l_e_st_eq_landau_n_rt_moreisi2 y0 y0 (l_e_refis l_e_st_eq_landau_n_rt_rat y0)) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) y0).
-
-(* constant 2657 *)
-definition l_e_st_eq_landau_n_rt_rp_5154_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_andi (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) y0) (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) y0) (l_e_st_eq_landau_n_rt_rp_5154_t1 x0 y0 m) (l_e_st_eq_landau_n_rt_rp_5154_t2 x0 y0 m) : l_and (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) y0) (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) y0)).
-
-(* constant 2658 *)
-definition l_e_st_eq_landau_n_rt_rp_satz154a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) x) (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) x)) y0 (l_e_st_eq_landau_n_rt_rp_5154_t3 x0 y0 m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)).
-
-(* constant 2659 *)
-definition l_e_st_eq_landau_n_rt_rp_satz154b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_isf l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) x0 y0 i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)).
-
-(* constant 2660 *)
-definition l_e_st_eq_landau_n_rt_rp_satz154c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_satz154a y0 x0 (l_e_st_eq_landau_n_rt_satz83 x0 y0 l)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)).
-
-(* constant 2661 *)
-definition l_e_st_eq_landau_n_rt_rp_5154_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz81a x0 y0 : l_or3 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0)).
-
-(* constant 2662 *)
-definition l_e_st_eq_landau_n_rt_rp_5154_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) : l_ec3 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0))).
-
-(* constant 2663 *)
-definition l_e_st_eq_landau_n_rt_rp_satz154d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_ec3_th11 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_5154_t4 x0 y0) (l_e_st_eq_landau_n_rt_rp_5154_t5 x0 y0) (λu:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_rt_rp_satz154b x0 y0 u) (λu:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_rp_satz154a x0 y0 u) (λu:l_e_st_eq_landau_n_rt_less x0 y0.l_e_st_eq_landau_n_rt_rp_satz154c x0 y0 u) m : l_e_st_eq_landau_n_rt_more x0 y0).
-
-(* constant 2664 *)
-definition l_e_st_eq_landau_n_rt_rp_satz154e ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_ec3_th10 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_5154_t4 x0 y0) (l_e_st_eq_landau_n_rt_rp_5154_t5 x0 y0) (λu:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_rt_rp_satz154b x0 y0 u) (λu:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_rp_satz154a x0 y0 u) (λu:l_e_st_eq_landau_n_rt_less x0 y0.l_e_st_eq_landau_n_rt_rp_satz154c x0 y0 u) i : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 2665 *)
-definition l_e_st_eq_landau_n_rt_rp_satz154f ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_ec3_th12 (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_more x0 y0) (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_5154_t4 x0 y0) (l_e_st_eq_landau_n_rt_rp_5154_t5 x0 y0) (λu:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_rt_rp_satz154b x0 y0 u) (λu:l_e_st_eq_landau_n_rt_more x0 y0.l_e_st_eq_landau_n_rt_rp_satz154a x0 y0 u) (λu:l_e_st_eq_landau_n_rt_less x0 y0.l_e_st_eq_landau_n_rt_rp_satz154c x0 y0 u) l : l_e_st_eq_landau_n_rt_less x0 y0).
-
-(* constant 2666 *)
-definition l_e_st_eq_landau_n_rt_rp_iii5_t2 ≝ (λx:l_e_st_eq_landau_n_rt_rat.λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt y).l_e_st_eq_landau_n_rt_rp_satz154e x y t : l_e_injective l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x)).
-
-(* constant 2667 *)
-definition l_e_st_eq_landau_n_rt_rp_isrterp ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_rp_satz154b x0 y0 i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)).
-
-(* constant 2668 *)
-definition l_e_st_eq_landau_n_rt_rp_isrtirp ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_e_st_eq_landau_n_rt_rp_satz154e x0 y0 i : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 2669 *)
-definition l_e_st_eq_landau_n_rt_rp_rtofrp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_soft l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) l_e_st_eq_landau_n_rt_rp_iii5_t2 ksi rtksi : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2670 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpert ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λrteta:l_e_st_eq_landau_n_rt_rp_ratrp eta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isinv l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) l_e_st_eq_landau_n_rt_rp_iii5_t2 ksi rtksi eta rteta i : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rp_rtofrp ksi rtksi) (l_e_st_eq_landau_n_rt_rp_rtofrp eta rteta)).
-
-(* constant 2671 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpirt ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λrteta:l_e_st_eq_landau_n_rt_rp_ratrp eta.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rp_rtofrp ksi rtksi) (l_e_st_eq_landau_n_rt_rp_rtofrp eta rteta).(l_e_isinve l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) l_e_st_eq_landau_n_rt_rp_iii5_t2 ksi rtksi eta rteta i : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 2672 *)
-definition l_e_st_eq_landau_n_rt_rp_isrtrp1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_isst1 l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) l_e_st_eq_landau_n_rt_rp_iii5_t2 x0 : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_rp_rtofrp (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0))).
-
-(* constant 2673 *)
-definition l_e_st_eq_landau_n_rt_rp_isrtrp2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_isst2 l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) l_e_st_eq_landau_n_rt_rp_iii5_t2 x0 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rp_rtofrp (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0)) x0).
-
-(* constant 2674 *)
-definition l_e_st_eq_landau_n_rt_rp_isrprt1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_ists1 l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) l_e_st_eq_landau_n_rt_rp_iii5_t2 ksi rtksi : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_rtofrp ksi rtksi))).
-
-(* constant 2675 *)
-definition l_e_st_eq_landau_n_rt_rp_isrprt2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_ists2 l_e_st_eq_landau_n_rt_rat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_rpofrt x) l_e_st_eq_landau_n_rt_rp_iii5_t2 ksi rtksi : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_rtofrp ksi rtksi)) ksi).
-
-(* constant 2676 *)
-definition l_e_st_eq_landau_n_rt_rp_isnterp ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λz:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt z) x y i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)).
-
-(* constant 2677 *)
-definition l_e_st_eq_landau_n_rt_rp_isntirp ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y).(l_e_st_eq_landau_n_rt_isnirt x y (l_e_st_eq_landau_n_rt_rp_isrtirp (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y) i) : l_e_st_eq_landau_n_is x y).
-
-(* constant 2678 *)
-definition l_e_st_eq_landau_n_rt_rp_iii5_t3 ≝ (λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y).l_e_st_eq_landau_n_rt_rp_isntirp x y t : l_e_injective l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt x)).
-
-(* constant 2679 *)
-definition l_e_st_eq_landau_n_rt_rp_ntofrp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λntksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.(l_e_soft l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt x) l_e_st_eq_landau_n_rt_rp_iii5_t3 ksi ntksi : l_e_st_eq_landau_n_nat).
-
-(* constant 2680 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpent ≝ λksi:l_e_st_eq_landau_n_rt_cut.λntksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λnteta:l_e_st_eq_landau_n_rt_rp_natrp eta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isinv l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt x) l_e_st_eq_landau_n_rt_rp_iii5_t3 ksi ntksi eta nteta i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_ntofrp ksi ntksi) (l_e_st_eq_landau_n_rt_rp_ntofrp eta nteta)).
-
-(* constant 2681 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpint ≝ λksi:l_e_st_eq_landau_n_rt_cut.λntksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λnteta:l_e_st_eq_landau_n_rt_rp_natrp eta.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_ntofrp ksi ntksi) (l_e_st_eq_landau_n_rt_rp_ntofrp eta nteta).(l_e_isinve l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt x) l_e_st_eq_landau_n_rt_rp_iii5_t3 ksi ntksi eta nteta i : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 2682 *)
-definition l_e_st_eq_landau_n_rt_rp_isntrp1 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_isst1 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt y) l_e_st_eq_landau_n_rt_rp_iii5_t3 x : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_rt_rp_ntofrp (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x))).
-
-(* constant 2683 *)
-definition l_e_st_eq_landau_n_rt_rp_isntrp2 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_isst2 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt y) l_e_st_eq_landau_n_rt_rp_iii5_t3 x : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_ntofrp (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x)) x).
-
-(* constant 2684 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpnt1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λntksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.(l_e_ists1 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt x) l_e_st_eq_landau_n_rt_rp_iii5_t3 ksi ntksi : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_ntofrp ksi ntksi))).
-
-(* constant 2685 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpnt2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λntksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.(l_e_ists2 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_rpofnt x) l_e_st_eq_landau_n_rt_rp_iii5_t3 ksi ntksi : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_ntofrp ksi ntksi)) ksi).
-
-(* constant 2686 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl u0 v0).(l_e_st_eq_landau_n_rt_rp_lrtrpofrte x0 u0 lu : l_e_st_eq_landau_n_rt_less u0 x0).
-
-(* constant 2687 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t2 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl u0 v0).(l_e_st_eq_landau_n_rt_rp_lrtrpofrte y0 v0 lv : l_e_st_eq_landau_n_rt_less v0 y0).
-
-(* constant 2688 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t3 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl u0 v0).(l_e_st_eq_landau_n_rt_satz98a u0 x0 v0 y0 (l_e_st_eq_landau_n_rt_rp_5155_t1 x0 y0 z0 lz u0 lu v0 lv i) (l_e_st_eq_landau_n_rt_rp_5155_t2 x0 y0 z0 lz u0 lu v0 lv i) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_pl u0 v0) (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 2689 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t4 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl u0 v0).(l_e_st_eq_landau_n_rt_isless1 (l_e_st_eq_landau_n_rt_pl u0 v0) z0 (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_pl u0 v0) i) (l_e_st_eq_landau_n_rt_rp_5155_t3 x0 y0 z0 lz u0 lu v0 lv i) : l_e_st_eq_landau_n_rt_less z0 (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 2690 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t5 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl u0 v0).(l_e_st_eq_landau_n_rt_rp_lrtrpofrt (l_e_st_eq_landau_n_rt_pl x0 y0) z0 (l_e_st_eq_landau_n_rt_rp_5155_t4 x0 y0 z0 lz u0 lu v0 lv i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) z0).
-
-(* constant 2691 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t6 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.(l_e_st_eq_landau_n_rt_rp_plapp (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) z0 lz (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_pl x y).l_e_st_eq_landau_n_rt_rp_5155_t5 x0 y0 z0 lz x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) z0).
-
-(* constant 2692 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t7 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) u0.(l_e_st_eq_landau_n_rt_rp_lrtrpofrte (l_e_st_eq_landau_n_rt_pl x0 y0) u0 lu : l_e_st_eq_landau_n_rt_less u0 (l_e_st_eq_landau_n_rt_pl x0 y0)).
-
-(* constant 2693 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_u01 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) u0.(l_e_st_eq_landau_n_rt_ov u0 (l_e_st_eq_landau_n_rt_pl x0 y0) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2694 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t8 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) u0.(l_e_st_eq_landau_n_rt_isless12 u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu) (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_satz110f u0 (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_example1d (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_rp_5155_t7 x0 y0 u0 lu) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu) (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_pl x0 y0))).
-
-(* constant 2695 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t9 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) u0.(l_e_st_eq_landau_n_rt_satz106c (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu) l_e_st_eq_landau_n_rt_1rt (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_rp_5155_t8 x0 y0 u0 lu) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2696 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t10 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) u0.(l_e_tris l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_pl x0 y0) (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu)) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu))) (l_e_st_eq_landau_n_rt_satz110d u0 (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_disttp1 x0 y0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu)) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu)) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu)))).
-
-(* constant 2697 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t11 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 l_e_st_eq_landau_n_rt_1rt.(l_e_st_eq_landau_n_rt_isless12 (l_e_st_eq_landau_n_rt_ts y0 x0) (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt x0) x0 (l_e_st_eq_landau_n_rt_comts y0 x0) (l_e_st_eq_landau_n_rt_example1c x0) (l_e_st_eq_landau_n_rt_satz105c y0 l_e_st_eq_landau_n_rt_1rt x0 l) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts x0 y0) x0).
-
-(* constant 2698 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t12 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 l_e_st_eq_landau_n_rt_1rt.(l_e_st_eq_landau_n_rt_rp_lrtrpofrt x0 (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_rp_5155_t11 x0 y0 l) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2699 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t13 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) u0.(l_e_st_eq_landau_n_rt_rp_lrtpl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) u0 (l_e_st_eq_landau_n_rt_ts x0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu)) (l_e_st_eq_landau_n_rt_rp_5155_t12 x0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu) (l_e_st_eq_landau_n_rt_rp_5155_t9 x0 y0 u0 lu)) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu)) (l_e_st_eq_landau_n_rt_rp_5155_t12 y0 (l_e_st_eq_landau_n_rt_rp_5155_u01 x0 y0 u0 lu) (l_e_st_eq_landau_n_rt_rp_5155_t9 x0 y0 u0 lu)) (l_e_st_eq_landau_n_rt_rp_5155_t10 x0 y0 u0 lu) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) u0).
-
-(* constant 2700 *)
-definition l_e_st_eq_landau_n_rt_rp_satz155a ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) x.l_e_st_eq_landau_n_rt_rp_5155_t13 x0 y0 x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) x.l_e_st_eq_landau_n_rt_rp_5155_t6 x0 y0 x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 y0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0))).
-
-(* constant 2701 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t14 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_satz101f x0 y0 m : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0)).
-
-(* constant 2702 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t15 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn x0 y0 m)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_isrterp x0 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0) (l_e_st_eq_landau_n_rt_rp_5155_t14 x0 y0 m)) (l_e_st_eq_landau_n_rt_rp_satz155a (l_e_st_eq_landau_n_rt_mn x0 y0 m) y0) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn x0 y0 m)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0))).
-
-(* constant 2703 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t16 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn x0 y0 m))) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn x0 y0 m)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn x0 y0 m))) (l_e_st_eq_landau_n_rt_rp_5155_t15 x0 y0 m) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn x0 y0 m))) (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).
-
-(* constant 2704 *)
-definition l_e_st_eq_landau_n_rt_rp_satz155b ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_more x0 y0.(l_e_st_eq_landau_n_rt_rp_satz140g (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn x0 y0 m)) (l_e_st_eq_landau_n_rt_rp_satz154a x0 y0 m) (l_e_st_eq_landau_n_rt_rp_5155_t16 x0 y0 m) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn x0 y0 m)) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_satz154a x0 y0 m))).
-
-(* constant 2705 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t17 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts u0 v0).(l_e_st_eq_landau_n_rt_rp_lrtrpofrte x0 u0 lu : l_e_st_eq_landau_n_rt_less u0 x0).
-
-(* constant 2706 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t18 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts u0 v0).(l_e_st_eq_landau_n_rt_rp_lrtrpofrte y0 v0 lv : l_e_st_eq_landau_n_rt_less v0 y0).
-
-(* constant 2707 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t19 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts u0 v0).(l_e_st_eq_landau_n_rt_satz107a u0 x0 v0 y0 (l_e_st_eq_landau_n_rt_rp_5155_t17 x0 y0 z0 lz u0 lu v0 lv i) (l_e_st_eq_landau_n_rt_rp_5155_t18 x0 y0 z0 lz u0 lu v0 lv i) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts u0 v0) (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2708 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t20 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts u0 v0).(l_e_st_eq_landau_n_rt_isless1 (l_e_st_eq_landau_n_rt_ts u0 v0) z0 (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_symis l_e_st_eq_landau_n_rt_rat z0 (l_e_st_eq_landau_n_rt_ts u0 v0) i) (l_e_st_eq_landau_n_rt_rp_5155_t19 x0 y0 z0 lz u0 lu v0 lv i) : l_e_st_eq_landau_n_rt_less z0 (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2709 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t21 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) u0.λv0:l_e_st_eq_landau_n_rt_rat.λlv:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) v0.λi:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts u0 v0).(l_e_st_eq_landau_n_rt_rp_lrtrpofrt (l_e_st_eq_landau_n_rt_ts x0 y0) z0 (l_e_st_eq_landau_n_rt_rp_5155_t20 x0 y0 z0 lz u0 lu v0 lv i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) z0).
-
-(* constant 2710 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t22 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) z0.(l_e_st_eq_landau_n_rt_rp_tsapp (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) z0 lz (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt y0) y.λv:l_e_st_eq_landau_n_rt_is z0 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_5155_t21 x0 y0 z0 lz x t y u v) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) z0).
-
-(* constant 2711 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t23 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.(l_e_st_eq_landau_n_rt_rp_lrtrpofrte (l_e_st_eq_landau_n_rt_ts x0 y0) u0 lu : l_e_st_eq_landau_n_rt_less u0 (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2712 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t24 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.λu1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).(l_ande1 (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)) a : l_e_st_eq_landau_n_rt_less u0 u1).
-
-(* constant 2713 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t25 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.λu1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).(l_ande2 (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)) a : l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2714 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t26 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.λu1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).(l_e_st_eq_landau_n_rt_isless12 u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov u0 u1) u1) u1 (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt u1) (l_e_st_eq_landau_n_rt_satz110f u0 u1) (l_e_st_eq_landau_n_rt_example1d u1) (l_e_st_eq_landau_n_rt_rp_5155_t24 x0 y0 u0 lu u1 a) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov u0 u1) u1) (l_e_st_eq_landau_n_rt_ts l_e_st_eq_landau_n_rt_1rt u1)).
-
-(* constant 2715 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t27 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.λu1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).(l_e_st_eq_landau_n_rt_satz106c (l_e_st_eq_landau_n_rt_ov u0 u1) l_e_st_eq_landau_n_rt_1rt u1 (l_e_st_eq_landau_n_rt_rp_5155_t26 x0 y0 u0 lu u1 a) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ov u0 u1) l_e_st_eq_landau_n_rt_1rt).
-
-(* constant 2716 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t28 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.λu1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).(l_e_st_eq_landau_n_rt_isless1 u1 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov u1 y0) y0) (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_satz110f u1 y0) (l_e_st_eq_landau_n_rt_rp_5155_t25 x0 y0 u0 lu u1 a) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov u1 y0) y0) (l_e_st_eq_landau_n_rt_ts x0 y0)).
-
-(* constant 2717 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t29 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.λu1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).(l_e_st_eq_landau_n_rt_satz106c (l_e_st_eq_landau_n_rt_ov u1 y0) x0 y0 (l_e_st_eq_landau_n_rt_rp_5155_t28 x0 y0 u0 lu u1 a) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ov u1 y0) x0).
-
-(* constant 2718 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t30 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.λu1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).(l_e_tr3is l_e_st_eq_landau_n_rt_rat u0 (l_e_st_eq_landau_n_rt_ts u1 (l_e_st_eq_landau_n_rt_ov u0 u1)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov u1 y0) y0) (l_e_st_eq_landau_n_rt_ov u0 u1)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov u1 y0) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov u0 u1))) (l_e_st_eq_landau_n_rt_satz110d u0 u1) (l_e_st_eq_landau_n_rt_ists1 u1 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov u1 y0) y0) (l_e_st_eq_landau_n_rt_ov u0 u1) (l_e_st_eq_landau_n_rt_satz110f u1 y0)) (l_e_st_eq_landau_n_rt_assts1 (l_e_st_eq_landau_n_rt_ov u1 y0) y0 (l_e_st_eq_landau_n_rt_ov u0 u1)) : l_e_st_eq_landau_n_rt_is u0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov u1 y0) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov u0 u1)))).
-
-(* constant 2719 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t31 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.λu1:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_less u0 u1) (l_e_st_eq_landau_n_rt_less u1 (l_e_st_eq_landau_n_rt_ts x0 y0)).(l_e_st_eq_landau_n_rt_rp_lrtts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) u0 (l_e_st_eq_landau_n_rt_ov u1 y0) (l_e_st_eq_landau_n_rt_rp_lrtrpofrt x0 (l_e_st_eq_landau_n_rt_ov u1 y0) (l_e_st_eq_landau_n_rt_rp_5155_t29 x0 y0 u0 lu u1 a)) (l_e_st_eq_landau_n_rt_ts y0 (l_e_st_eq_landau_n_rt_ov u0 u1)) (l_e_st_eq_landau_n_rt_rp_5155_t12 y0 (l_e_st_eq_landau_n_rt_ov u0 u1) (l_e_st_eq_landau_n_rt_rp_5155_t27 x0 y0 u0 lu u1 a)) (l_e_st_eq_landau_n_rt_rp_5155_t30 x0 y0 u0 lu u1 a) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) u0).
-
-(* constant 2720 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t32 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) u0.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_less u0 x) (l_e_st_eq_landau_n_rt_less x (l_e_st_eq_landau_n_rt_ts x0 y0))) (l_e_st_eq_landau_n_rt_satz91 u0 (l_e_st_eq_landau_n_rt_ts x0 y0) (l_e_st_eq_landau_n_rt_rp_5155_t23 x0 y0 u0 lu)) (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) u0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_and (l_e_st_eq_landau_n_rt_less u0 x) (l_e_st_eq_landau_n_rt_less x (l_e_st_eq_landau_n_rt_ts x0 y0)).l_e_st_eq_landau_n_rt_rp_5155_t31 x0 y0 u0 lu x t) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) u0).
-
-(* constant 2721 *)
-definition l_e_st_eq_landau_n_rt_rp_satz155c ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_isi1 (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) x.l_e_st_eq_landau_n_rt_rp_5155_t32 x0 y0 x t) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) x.l_e_st_eq_landau_n_rt_rp_5155_t22 x0 y0 x t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x0 y0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0))).
-
-(* constant 2722 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t33 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_satz110f x0 y0 : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov x0 y0) y0)).
-
-(* constant 2723 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t34 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov x0 y0) y0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ov x0 y0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_isrterp x0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_ov x0 y0) y0) (l_e_st_eq_landau_n_rt_rp_5155_t33 x0 y0)) (l_e_st_eq_landau_n_rt_rp_satz155c (l_e_st_eq_landau_n_rt_ov x0 y0) y0) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ov x0 y0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0))).
-
-(* constant 2724 *)
-definition l_e_st_eq_landau_n_rt_rp_5155_t35 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ov x0 y0))) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ov x0 y0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ov x0 y0))) (l_e_st_eq_landau_n_rt_rp_5155_t34 x0 y0) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ov x0 y0))) (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).
-
-(* constant 2725 *)
-definition l_e_st_eq_landau_n_rt_rp_satz155d ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_satz153g (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ov x0 y0)) (l_e_st_eq_landau_n_rt_rp_5155_t35 x0 y0) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ov x0 y0)) (l_e_st_eq_landau_n_rt_rp_ov (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0))).
-
-(* constant 2726 *)
-definition l_e_st_eq_landau_n_rt_rp_satz155e ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)) (l_e_st_eq_landau_n_rt_rp_isrterp (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_satz112h x y))) (l_e_st_eq_landau_n_rt_rp_satz155a (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y))).
-
-(* constant 2727 *)
-definition l_e_st_eq_landau_n_rt_rp_satz155f ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)) (l_e_st_eq_landau_n_rt_rp_isrterp (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_satz112j x y))) (l_e_st_eq_landau_n_rt_rp_satz155c (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y))).
-
-(* constant 2728 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_natt ≝ (l_e_ot l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) : Type[0]).
-
-(* constant 2729 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_nttofrp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.(l_e_out l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) ksi nksi : l_e_st_eq_landau_n_rt_rp_nt_natt).
-
-(* constant 2730 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_is ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λyt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_is l_e_st_eq_landau_n_rt_rp_nt_natt xt yt : Prop).
-
-(* constant 2731 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_nis ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λyt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_not (l_e_st_eq_landau_n_rt_rp_nt_is xt yt) : Prop).
-
-(* constant 2732 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_all ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_nt_natt.Prop.(l_all l_e_st_eq_landau_n_rt_rp_nt_natt p : Prop).
-
-(* constant 2733 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_some ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_nt_natt.Prop.(l_some l_e_st_eq_landau_n_rt_rp_nt_natt p : Prop).
-
-(* constant 2734 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_one ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_nt_natt.Prop.(l_e_one l_e_st_eq_landau_n_rt_rp_nt_natt p : Prop).
-
-(* constant 2735 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_in ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λst:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_st_esti l_e_st_eq_landau_n_rt_rp_nt_natt xt st : Prop).
-
-(* constant 2736 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_rpofntt ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_in l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) xt : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2737 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_natrpi ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_inp l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) xt : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt)).
-
-(* constant 2738 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isrpentt ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λneta:l_e_st_eq_landau_n_rt_rp_natrp eta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isouti l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) ksi nksi eta neta i : l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_nttofrp ksi nksi) (l_e_st_eq_landau_n_rt_rp_nt_nttofrp eta neta)).
-
-(* constant 2739 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isrpintt ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λneta:l_e_st_eq_landau_n_rt_rp_natrp eta.λi:l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_nttofrp ksi nksi) (l_e_st_eq_landau_n_rt_rp_nt_nttofrp eta neta).(l_e_isoute l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) ksi nksi eta neta i : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 2740 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isntterp ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λyt:l_e_st_eq_landau_n_rt_rp_nt_natt.λi:l_e_st_eq_landau_n_rt_rp_nt_is xt yt.(l_e_isini l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) xt yt i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_rpofntt yt)).
-
-(* constant 2741 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isnttirp ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λyt:l_e_st_eq_landau_n_rt_rp_nt_natt.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_rpofntt yt).(l_e_isine l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) xt yt i : l_e_st_eq_landau_n_rt_rp_nt_is xt yt).
-
-(* constant 2742 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isrpntt1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnksi:l_e_st_eq_landau_n_rt_rp_natrp ksi.(l_e_isinout l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) ksi nksi : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_nt_rpofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofrp ksi nksi))).
-
-(* constant 2743 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isnttrp1 ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_isoutin l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) xt : l_e_st_eq_landau_n_rt_rp_nt_is xt (l_e_st_eq_landau_n_rt_rp_nt_nttofrp (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi xt))).
-
-(* constant 2744 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_nttofnt ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_nt_nttofrp (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x) : l_e_st_eq_landau_n_rt_rp_nt_natt).
-
-(* constant 2745 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isntentt ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_st_eq_landau_n_rt_rp_nt_isrpentt (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x) (l_e_st_eq_landau_n_rt_rp_rpofnt y) (l_e_st_eq_landau_n_rt_rp_natrpi y) (l_e_st_eq_landau_n_rt_rp_isnterp x y i) : l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x) (l_e_st_eq_landau_n_rt_rp_nt_nttofnt y)).
-
-(* constant 2746 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isntintt ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x) (l_e_st_eq_landau_n_rt_rp_nt_nttofnt y).(l_e_st_eq_landau_n_rt_rp_isntirp x y (l_e_st_eq_landau_n_rt_rp_nt_isrpintt (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x) (l_e_st_eq_landau_n_rt_rp_rpofnt y) (l_e_st_eq_landau_n_rt_rp_natrpi y) i) : l_e_st_eq_landau_n_is x y).
-
-(* constant 2747 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_ntofntt ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_st_eq_landau_n_rt_rp_ntofrp (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi xt) : l_e_st_eq_landau_n_nat).
-
-(* constant 2748 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isnttent ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λyt:l_e_st_eq_landau_n_rt_rp_nt_natt.λi:l_e_st_eq_landau_n_rt_rp_nt_is xt yt.(l_e_st_eq_landau_n_rt_rp_isrpent (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi xt) (l_e_st_eq_landau_n_rt_rp_nt_rpofntt yt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi yt) (l_e_st_eq_landau_n_rt_rp_nt_isntterp xt yt i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_ntofntt yt)).
-
-(* constant 2749 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isnttint ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λyt:l_e_st_eq_landau_n_rt_rp_nt_natt.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_ntofntt yt).(l_e_st_eq_landau_n_rt_rp_nt_isnttirp xt yt (l_e_st_eq_landau_n_rt_rp_isrpint (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi xt) (l_e_st_eq_landau_n_rt_rp_nt_rpofntt yt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi yt) i) : l_e_st_eq_landau_n_rt_rp_nt_is xt yt).
-
-(* constant 2750 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_iii5_t5 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_nt_isrpntt1 (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_nt_rpofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x))).
-
-(* constant 2751 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_iii5_t6 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_isrpent (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x) (l_e_st_eq_landau_n_rt_rp_nt_rpofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x)) (l_e_st_eq_landau_n_rt_rp_nt_natrpi (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x)) (l_e_st_eq_landau_n_rt_rp_nt_iii5_t5 x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_ntofrp (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x)) (l_e_st_eq_landau_n_rt_rp_nt_ntofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x))).
-
-(* constant 2752 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isntntt1 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_rt_rp_ntofrp (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_natrpi x)) (l_e_st_eq_landau_n_rt_rp_nt_ntofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x)) (l_e_st_eq_landau_n_rt_rp_isntrp1 x) (l_e_st_eq_landau_n_rt_rp_nt_iii5_t6 x) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_rt_rp_nt_ntofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x))).
-
-(* constant 2753 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_iii5_t7 ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_st_eq_landau_n_rt_rp_isrpnt1 (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi xt) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt))).
-
-(* constant 2754 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_iii5_t8 ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_st_eq_landau_n_rt_rp_nt_isrpentt (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi xt) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) (l_e_st_eq_landau_n_rt_rp_natrpi (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) (l_e_st_eq_landau_n_rt_rp_nt_iii5_t7 xt) : l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_nttofrp (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi xt)) (l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt))).
-
-(* constant 2755 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isnttnt1 ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_tris l_e_st_eq_landau_n_rt_rp_nt_natt xt (l_e_st_eq_landau_n_rt_rp_nt_nttofrp (l_e_st_eq_landau_n_rt_rp_nt_rpofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_natrpi xt)) (l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) (l_e_st_eq_landau_n_rt_rp_nt_isnttrp1 xt) (l_e_st_eq_landau_n_rt_rp_nt_iii5_t8 xt) : l_e_st_eq_landau_n_rt_rp_nt_is xt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt))).
-
-(* constant 2756 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isntntt2 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_rt_rp_nt_ntofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x)) (l_e_st_eq_landau_n_rt_rp_nt_isntntt1 x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_nt_ntofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x)) x).
-
-(* constant 2757 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_isnttnt2 ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_symis l_e_st_eq_landau_n_rt_rp_nt_natt xt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) (l_e_st_eq_landau_n_rt_rp_nt_isnttnt1 xt) : l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) xt).
-
-(* constant 2758 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_1t ≝ (l_e_st_eq_landau_n_rt_rp_nt_nttofnt l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_rt_rp_nt_natt).
-
-(* constant 2759 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_suct ≝ (λx:l_e_st_eq_landau_n_rt_rp_nt_natt.l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_nt_ntofntt x)) : Πx:l_e_st_eq_landau_n_rt_rp_nt_natt.l_e_st_eq_landau_n_rt_rp_nt_natt).
-
-(* constant 2760 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_5156_t1 ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λj:l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_suct xt) l_e_st_eq_landau_n_rt_rp_nt_1t.(l_e_st_eq_landau_n_rt_rp_nt_isntintt (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) l_e_st_eq_landau_n_1 j : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) l_e_st_eq_landau_n_1).
-
-(* constant 2761 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_satz156a ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_suct xt) l_e_st_eq_landau_n_rt_rp_nt_1t) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ax3 (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) (λt:l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_suct xt) l_e_st_eq_landau_n_rt_rp_nt_1t.l_e_st_eq_landau_n_rt_rp_nt_5156_t1 xt t) : l_e_st_eq_landau_n_rt_rp_nt_nis (l_e_st_eq_landau_n_rt_rp_nt_suct xt) l_e_st_eq_landau_n_rt_rp_nt_1t).
-
-(* constant 2762 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_5156_t2 ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λyt:l_e_st_eq_landau_n_rt_rp_nt_natt.λi:l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_suct xt) (l_e_st_eq_landau_n_rt_rp_nt_suct yt).(l_e_st_eq_landau_n_rt_rp_nt_isntintt (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_nt_ntofntt yt)) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_nt_ntofntt yt))).
-
-(* constant 2763 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_satz156b ≝ λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.λyt:l_e_st_eq_landau_n_rt_rp_nt_natt.λi:l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_suct xt) (l_e_st_eq_landau_n_rt_rp_nt_suct yt).(l_e_st_eq_landau_n_rt_rp_nt_isnttint xt yt (l_e_st_eq_landau_n_ax4 (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt) (l_e_st_eq_landau_n_rt_rp_nt_ntofntt yt) (l_e_st_eq_landau_n_rt_rp_nt_5156_t2 xt yt i)) : l_e_st_eq_landau_n_rt_rp_nt_is xt yt).
-
-(* constant 2764 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_cond1 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_st_eq_landau_n_rt_rp_nt_in l_e_st_eq_landau_n_rt_rp_nt_1t st : Prop).
-
-(* constant 2765 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_cond2 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_st_eq_landau_n_rt_rp_nt_all (λx:l_e_st_eq_landau_n_rt_rp_nt_natt.l_imp (l_e_st_eq_landau_n_rt_rp_nt_in x st) (l_e_st_eq_landau_n_rt_rp_nt_in (l_e_st_eq_landau_n_rt_rp_nt_suct x) st)) : Prop).
-
-(* constant 2766 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_5156_prop1 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.λc1:l_e_st_eq_landau_n_rt_rp_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_rp_nt_cond2 st.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_nt_in (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x) st : Prop).
-
-(* constant 2767 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_5156_t3 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.λc1:l_e_st_eq_landau_n_rt_rp_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_rp_nt_cond2 st.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_nt_5156_prop1 st c1 c2 x.(c2 (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x) p : l_e_st_eq_landau_n_rt_rp_nt_in (l_e_st_eq_landau_n_rt_rp_nt_suct (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x)) st).
-
-(* constant 2768 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_5156_t4 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.λc1:l_e_st_eq_landau_n_rt_rp_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_rp_nt_cond2 st.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_nt_5156_prop1 st c1 c2 x.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_nt_in (l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_suc t)) st) (l_e_st_eq_landau_n_rt_rp_nt_ntofntt (l_e_st_eq_landau_n_rt_rp_nt_nttofnt x)) x (l_e_st_eq_landau_n_rt_rp_nt_5156_t3 st c1 c2 x p) (l_e_st_eq_landau_n_rt_rp_nt_isntntt2 x) : l_e_st_eq_landau_n_rt_rp_nt_5156_prop1 st c1 c2 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 2769 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_5156_t5 ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.λc1:l_e_st_eq_landau_n_rt_rp_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_rp_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_nt_5156_prop1 st c1 c2 t) c1 (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_rp_nt_5156_prop1 st c1 c2 t.l_e_st_eq_landau_n_rt_rp_nt_5156_t4 st c1 c2 t u) (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt) : l_e_st_eq_landau_n_rt_rp_nt_in (l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) st).
-
-(* constant 2770 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_satz156c ≝ λst:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.λc1:l_e_st_eq_landau_n_rt_rp_nt_cond1 st.λc2:l_e_st_eq_landau_n_rt_rp_nt_cond2 st.λxt:l_e_st_eq_landau_n_rt_rp_nt_natt.(l_e_isp l_e_st_eq_landau_n_rt_rp_nt_natt (λt:l_e_st_eq_landau_n_rt_rp_nt_natt.l_e_st_eq_landau_n_rt_rp_nt_in t st) (l_e_st_eq_landau_n_rt_rp_nt_nttofnt (l_e_st_eq_landau_n_rt_rp_nt_ntofntt xt)) xt (l_e_st_eq_landau_n_rt_rp_nt_5156_t5 st c1 c2 xt) (l_e_st_eq_landau_n_rt_rp_nt_isnttnt2 xt) : l_e_st_eq_landau_n_rt_rp_nt_in xt st).
-
-(* constant 2771 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_ax3t ≝ (λx:l_e_st_eq_landau_n_rt_rp_nt_natt.l_e_st_eq_landau_n_rt_rp_nt_satz156a x : ∀x:l_e_st_eq_landau_n_rt_rp_nt_natt.l_e_st_eq_landau_n_rt_rp_nt_nis (l_e_st_eq_landau_n_rt_rp_nt_suct x) l_e_st_eq_landau_n_rt_rp_nt_1t).
-
-(* constant 2772 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_ax4t ≝ (λx:l_e_st_eq_landau_n_rt_rp_nt_natt.λy:l_e_st_eq_landau_n_rt_rp_nt_natt.λu:l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_suct x) (l_e_st_eq_landau_n_rt_rp_nt_suct y).l_e_st_eq_landau_n_rt_rp_nt_satz156b x y u : ∀x:l_e_st_eq_landau_n_rt_rp_nt_natt.∀y:l_e_st_eq_landau_n_rt_rp_nt_natt.∀u:l_e_st_eq_landau_n_rt_rp_nt_is (l_e_st_eq_landau_n_rt_rp_nt_suct x) (l_e_st_eq_landau_n_rt_rp_nt_suct y).l_e_st_eq_landau_n_rt_rp_nt_is x y).
-
-(* constant 2773 *)
-definition l_e_st_eq_landau_n_rt_rp_nt_ax5t ≝ (λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.λu:l_e_st_eq_landau_n_rt_rp_nt_cond1 s.λv:l_e_st_eq_landau_n_rt_rp_nt_cond2 s.λx:l_e_st_eq_landau_n_rt_rp_nt_natt.l_e_st_eq_landau_n_rt_rp_nt_satz156c s u v x : ∀s:l_e_st_set l_e_st_eq_landau_n_rt_rp_nt_natt.∀u:l_e_st_eq_landau_n_rt_rp_nt_cond1 s.∀v:l_e_st_eq_landau_n_rt_rp_nt_cond2 s.∀x:l_e_st_eq_landau_n_rt_rp_nt_natt.l_e_st_eq_landau_n_rt_rp_nt_in x s).
-
-(* constant 2774 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_ratt ≝ (l_e_ot l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) : Type[0]).
-
-(* constant 2775 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_rttofrp ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_out l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) ksi rtksi : l_e_st_eq_landau_n_rt_rp_rtt_ratt).
-
-(* constant 2776 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_is ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λy0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_e_is l_e_st_eq_landau_n_rt_rp_rtt_ratt x0t y0t : Prop).
-
-(* constant 2777 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_nis ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λy0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_not (l_e_st_eq_landau_n_rt_rp_rtt_is x0t y0t) : Prop).
-
-(* constant 2778 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_all ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_rtt_ratt.Prop.(l_all l_e_st_eq_landau_n_rt_rp_rtt_ratt p : Prop).
-
-(* constant 2779 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_some ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_rtt_ratt.Prop.(l_some l_e_st_eq_landau_n_rt_rp_rtt_ratt p : Prop).
-
-(* constant 2780 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_one ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_rtt_ratt.Prop.(l_e_one l_e_st_eq_landau_n_rt_rp_rtt_ratt p : Prop).
-
-(* constant 2781 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_e_in l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) x0t : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2782 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_ratrpi ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_e_inp l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) x0t : l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t)).
-
-(* constant 2783 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrpertt ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λrteta:l_e_st_eq_landau_n_rt_rp_ratrp eta.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isouti l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) ksi rtksi eta rteta i : l_e_st_eq_landau_n_rt_rp_rtt_is (l_e_st_eq_landau_n_rt_rp_rtt_rttofrp ksi rtksi) (l_e_st_eq_landau_n_rt_rp_rtt_rttofrp eta rteta)).
-
-(* constant 2784 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrpirtt ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λrteta:l_e_st_eq_landau_n_rt_rp_ratrp eta.λi:l_e_st_eq_landau_n_rt_rp_rtt_is (l_e_st_eq_landau_n_rt_rp_rtt_rttofrp ksi rtksi) (l_e_st_eq_landau_n_rt_rp_rtt_rttofrp eta rteta).(l_e_isoute l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) ksi rtksi eta rteta i : l_e_st_eq_landau_n_rt_rp_is ksi eta).
-
-(* constant 2785 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrtterp ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λy0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λi:l_e_st_eq_landau_n_rt_rp_rtt_is x0t y0t.(l_e_isini l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) x0t y0t i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt y0t)).
-
-(* constant 2786 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrttirp ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λy0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt y0t).(l_e_isine l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) x0t y0t i : l_e_st_eq_landau_n_rt_rp_rtt_is x0t y0t).
-
-(* constant 2787 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrprtt1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_isinout l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) ksi rtksi : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt (l_e_st_eq_landau_n_rt_rp_rtt_rttofrp ksi rtksi))).
-
-(* constant 2788 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrttrp1 ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_e_isoutin l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) x0t : l_e_st_eq_landau_n_rt_rp_rtt_is x0t (l_e_st_eq_landau_n_rt_rp_rtt_rttofrp (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi x0t))).
-
-(* constant 2789 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_rttofrt ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rtt_rttofrp (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0) : l_e_st_eq_landau_n_rt_rp_rtt_ratt).
-
-(* constant 2790 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrtertt ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is x0 y0.(l_e_st_eq_landau_n_rt_rp_rtt_isrpertt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_ratrpi y0) (l_e_st_eq_landau_n_rt_rp_isrterp x0 y0 i) : l_e_st_eq_landau_n_rt_rp_rtt_is (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt x0) (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt y0)).
-
-(* constant 2791 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrtirtt ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_rp_rtt_is (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt x0) (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt y0).(l_e_st_eq_landau_n_rt_rp_isrtirp x0 y0 (l_e_st_eq_landau_n_rt_rp_rtt_isrpirtt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_ratrpi y0) i) : l_e_st_eq_landau_n_rt_is x0 y0).
-
-(* constant 2792 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_e_st_eq_landau_n_rt_rp_rtofrp (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi x0t) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2793 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrttert ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λy0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λi:l_e_st_eq_landau_n_rt_rp_rtt_is x0t y0t.(l_e_st_eq_landau_n_rt_rp_isrpert (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi x0t) (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt y0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi y0t) (l_e_st_eq_landau_n_rt_rp_rtt_isrtterp x0t y0t i) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt y0t)).
-
-(* constant 2794 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrttirt ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λy0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt y0t).(l_e_st_eq_landau_n_rt_rp_rtt_isrttirp x0t y0t (l_e_st_eq_landau_n_rt_rp_isrpirt (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi x0t) (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt y0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi y0t) i) : l_e_st_eq_landau_n_rt_rp_rtt_is x0t y0t).
-
-(* constant 2795 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_iii5_t9 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rtt_isrprtt1 (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt x0))).
-
-(* constant 2796 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_iii5_t10 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_isrpert (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0) (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt x0)) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt x0)) (l_e_st_eq_landau_n_rt_rp_rtt_iii5_t9 x0) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_rp_rtofrp (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0)) (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt x0))).
-
-(* constant 2797 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrtrtt1 ≝ λx0:l_e_st_eq_landau_n_rt_rat.(l_e_tris l_e_st_eq_landau_n_rt_rat x0 (l_e_st_eq_landau_n_rt_rp_rtofrp (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_ratrpi x0)) (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt x0)) (l_e_st_eq_landau_n_rt_rp_isrtrp1 x0) (l_e_st_eq_landau_n_rt_rp_rtt_iii5_t10 x0) : l_e_st_eq_landau_n_rt_is x0 (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt x0))).
-
-(* constant 2798 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_iii5_t11 ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_e_st_eq_landau_n_rt_rp_isrprt1 (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi x0t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt x0t))).
-
-(* constant 2799 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_iii5_t12 ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_e_st_eq_landau_n_rt_rp_rtt_isrpertt (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi x0t) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt x0t)) (l_e_st_eq_landau_n_rt_rp_ratrpi (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt x0t)) (l_e_st_eq_landau_n_rt_rp_rtt_iii5_t11 x0t) : l_e_st_eq_landau_n_rt_rp_rtt_is (l_e_st_eq_landau_n_rt_rp_rtt_rttofrp (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi x0t)) (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt x0t))).
-
-(* constant 2800 *)
-definition l_e_st_eq_landau_n_rt_rp_rtt_isrttrt1 ≝ λx0t:l_e_st_eq_landau_n_rt_rp_rtt_ratt.(l_e_tris l_e_st_eq_landau_n_rt_rp_rtt_ratt x0t (l_e_st_eq_landau_n_rt_rp_rtt_rttofrp (l_e_st_eq_landau_n_rt_rp_rtt_rpofrtt x0t) (l_e_st_eq_landau_n_rt_rp_rtt_ratrpi x0t)) (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt x0t)) (l_e_st_eq_landau_n_rt_rp_rtt_isrttrp1 x0t) (l_e_st_eq_landau_n_rt_rp_rtt_iii5_t12 x0t) : l_e_st_eq_landau_n_rt_rp_rtt_is x0t (l_e_st_eq_landau_n_rt_rp_rtt_rttofrt (l_e_st_eq_landau_n_rt_rp_rtt_rtofrtt x0t))).
-
-(* constant 2801 *)
-definition l_e_st_eq_landau_n_rt_rp_example2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_satz153c l_e_st_eq_landau_n_rt_rp_1rp ksi : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi (l_e_st_eq_landau_n_rt_rp_ov l_e_st_eq_landau_n_rt_rp_1rp ksi)) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2802 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_x01 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_st_eq_landau_n_rt_rp_rtofrp ksi rtksi : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2803 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_s1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2804 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi).(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) y0 i : l_e_st_eq_landau_n_rt_urt ksi y0).
-
-(* constant 2805 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi).λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0.(l_e_st_eq_landau_n_rt_rp_lrtrpofrt (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0 (l_e_st_eq_landau_n_rt_satz82 (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0 m) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)) y0).
-
-(* constant 2806 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi).λm:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0.(l_e_isp l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_lrt x y0) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)) ksi (l_e_st_eq_landau_n_rt_rp_5157_t2 ksi rtksi y0 i m) (l_e_st_eq_landau_n_rt_rp_isrprt2 ksi rtksi) : l_e_st_eq_landau_n_rt_lrt ksi y0).
-
-(* constant 2807 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi).(l_imp_th3 (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0) (l_e_st_eq_landau_n_rt_lrt ksi y0) (l_e_st_eq_landau_n_rt_rp_5157_t1 ksi rtksi y0 i) (λt:l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0.l_e_st_eq_landau_n_rt_rp_5157_t3 ksi rtksi y0 i t) : l_not (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0)).
-
-(* constant 2808 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.λy0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi).(l_e_st_eq_landau_n_rt_satz81e (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0 (l_e_st_eq_landau_n_rt_rp_5157_t4 ksi rtksi y0 i) : l_e_st_eq_landau_n_rt_lessis (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) y0).
-
-(* constant 2809 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi).l_e_st_eq_landau_n_rt_rp_5157_t5 ksi rtksi x t : l_e_st_eq_landau_n_rt_lb (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)).
-
-(* constant 2810 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_st_eq_landau_n_rt_rp_urtrpofrt (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) (l_e_st_eq_landau_n_rt_moreisi2 (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) (l_e_refis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi))) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)) (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)).
-
-(* constant 2811 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_isp l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_urt x (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)) ksi (l_e_st_eq_landau_n_rt_rp_5157_t7 ksi rtksi) (l_e_st_eq_landau_n_rt_rp_isrprt2 ksi rtksi) : l_e_st_eq_landau_n_rt_urt ksi (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)).
-
-(* constant 2812 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) (l_e_st_eq_landau_n_rt_rp_5157_t8 ksi rtksi) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi)).
-
-(* constant 2813 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_andi (l_e_st_eq_landau_n_rt_lb (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)) (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi)) (l_e_st_eq_landau_n_rt_rp_5157_t6 ksi rtksi) (l_e_st_eq_landau_n_rt_rp_5157_t9 ksi rtksi) : l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi)).
-
-(* constant 2814 *)
-definition l_e_st_eq_landau_n_rt_rp_satz157a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_e_st_eq_landau_n_rt_rp_5157_t10 ksi rtksi : l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) (l_e_st_eq_landau_n_rt_rp_rtofrp ksi rtksi)).
-
-(* constant 2815 *)
-definition l_e_st_eq_landau_n_rt_rp_satz157b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λrtksi:l_e_st_eq_landau_n_rt_rp_ratrp ksi.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) x) (l_e_st_eq_landau_n_rt_rp_5157_x01 ksi rtksi) (l_e_st_eq_landau_n_rt_rp_5157_t10 ksi rtksi) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi y)) x)).
-
-(* constant 2816 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.(l_ande1 (l_e_st_eq_landau_n_rt_lb (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) x0) (l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi)) m : l_e_st_eq_landau_n_rt_lb (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) x0).
-
-(* constant 2817 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.(l_ande2 (l_e_st_eq_landau_n_rt_lb (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) x0) (l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi)) m : l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi)).
-
-(* constant 2818 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) x0 (l_e_st_eq_landau_n_rt_rp_5157_t12 ksi x0 m) : l_e_st_eq_landau_n_rt_urt ksi x0).
-
-(* constant 2819 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.(l_e_st_eq_landau_n_rt_cutapp2a ksi y0 ly x0 (l_e_st_eq_landau_n_rt_rp_5157_t13 ksi x0 m) : l_e_st_eq_landau_n_rt_less y0 x0).
-
-(* constant 2820 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt ksi y0.(l_e_st_eq_landau_n_rt_rp_lrtrpofrt x0 y0 (l_e_st_eq_landau_n_rt_rp_5157_t14 ksi x0 m y0 ly) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) y0).
-
-(* constant 2821 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) y0 uy : l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi)).
-
-(* constant 2822 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_e_st_eq_landau_n_rt_satz85 x0 y0 (l_e_st_eq_landau_n_rt_rp_5157_t11 ksi x0 m y0 (l_e_st_eq_landau_n_rt_rp_5157_t17 ksi x0 m y0 uy)) : l_e_st_eq_landau_n_rt_moreis y0 x0).
-
-(* constant 2823 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt ksi y0.(l_e_st_eq_landau_n_rt_rp_urtrpofrt x0 y0 (l_e_st_eq_landau_n_rt_rp_5157_t18 ksi x0 m y0 uy) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) y0).
-
-(* constant 2824 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.λy0:l_e_st_eq_landau_n_rt_rat.(l_cp (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) y0) (l_e_st_eq_landau_n_rt_lrt ksi y0) (λt:l_e_st_eq_landau_n_rt_urt ksi y0.l_e_st_eq_landau_n_rt_rp_5157_t19 ksi x0 m y0 t) : l_imp (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) y0) (l_e_st_eq_landau_n_rt_lrt ksi y0)).
-
-(* constant 2825 *)
-definition l_e_st_eq_landau_n_rt_rp_satz157c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x)) x0.(l_e_st_eq_landau_n_rt_rp_isi1 ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt ksi x.l_e_st_eq_landau_n_rt_rp_5157_t15 ksi x0 m x t) (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5157_t20 ksi x0 m x) : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).
-
-(* constant 2826 *)
-definition l_e_st_eq_landau_n_rt_rp_5157_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi y)) x).λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) x0.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) x0 (l_e_st_eq_landau_n_rt_rp_satz157c ksi x0 m) : l_e_st_eq_landau_n_rt_rp_ratrp ksi).
-
-(* constant 2827 *)
-definition l_e_st_eq_landau_n_rt_rp_satz157d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_min (l_e_st_setof l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi y)) x).(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) x) s (l_e_st_eq_landau_n_rt_rp_ratrp ksi) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5157_s1 ksi) x.l_e_st_eq_landau_n_rt_rp_5157_t21 ksi s x t) : l_e_st_eq_landau_n_rt_rp_ratrp ksi).
-
-(* constant 2828 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_xr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt x0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2829 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_e_st_eq_landau_n_rt_rp_urtrpofrt x0 x0 (l_e_st_eq_landau_n_rt_moreisi2 x0 x0 (l_e_refis l_e_st_eq_landau_n_rt_rat x0)) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) x0).
-
-(* constant 2830 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_andi (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) x0) (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_rp_5158_t1 ksi x0 lx) lx : l_and (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) x0) (l_e_st_eq_landau_n_rt_lrt ksi x0)).
-
-(* constant 2831 *)
-definition l_e_st_eq_landau_n_rt_rp_satz158a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt ksi x0.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_rpofrt x0) x) (l_e_st_eq_landau_n_rt_lrt ksi x)) x0 (l_e_st_eq_landau_n_rt_rp_5158_t2 ksi x0 lx) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi).
-
-(* constant 2832 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_s1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2833 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λm:l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0.(l_e_symis l_e_st_eq_landau_n_rt_cut ksi (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) (l_e_st_eq_landau_n_rt_rp_satz157c ksi x0 m) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi).
-
-(* constant 2834 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λm:l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0.(l_e_st_eq_landau_n_rt_rp_moreisi2 (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi (l_e_st_eq_landau_n_rt_rp_5158_t3 ksi x0 ux m) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi).
-
-(* constant 2835 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) x0 ux : l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)).
-
-(* constant 2836 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).(l_and_th4 (l_e_st_eq_landau_n_rt_lb (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0) (l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) n (l_e_st_eq_landau_n_rt_rp_5158_t5 ksi x0 ux n) : l_not (l_e_st_eq_landau_n_rt_lb (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0)).
-
-(* constant 2837 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).(l_some_th1 l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_imp (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 x)) (l_e_st_eq_landau_n_rt_rp_5158_t6 ksi x0 ux n) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_not (l_imp (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 x)))).
-
-(* constant 2838 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).λy0:l_e_st_eq_landau_n_rt_rat.λo:l_not (l_imp (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0)).(l_imp_th5 (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0) o : l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)).
-
-(* constant 2839 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).λy0:l_e_st_eq_landau_n_rt_rat.λo:l_not (l_imp (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0)).(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_urt ksi x) y0 (l_e_st_eq_landau_n_rt_rp_5158_t8 ksi x0 ux n y0 o) : l_e_st_eq_landau_n_rt_urt ksi y0).
-
-(* constant 2840 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).λy0:l_e_st_eq_landau_n_rt_rat.λo:l_not (l_imp (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0)).(l_imp_th6 (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0) o : l_not (l_e_st_eq_landau_n_rt_lessis x0 y0)).
-
-(* constant 2841 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).λy0:l_e_st_eq_landau_n_rt_rat.λo:l_not (l_imp (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0)).(l_e_st_eq_landau_n_rt_satz82 x0 y0 (l_e_st_eq_landau_n_rt_satz81k x0 y0 (l_e_st_eq_landau_n_rt_rp_5158_t10 ksi x0 ux n y0 o)) : l_e_st_eq_landau_n_rt_less y0 x0).
-
-(* constant 2842 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).λy0:l_e_st_eq_landau_n_rt_rat.λo:l_not (l_imp (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0)).(l_e_st_eq_landau_n_rt_rp_lrtrpofrt x0 y0 (l_e_st_eq_landau_n_rt_rp_5158_t11 ksi x0 ux n y0 o) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) y0).
-
-(* constant 2843 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).λy0:l_e_st_eq_landau_n_rt_rat.λo:l_not (l_imp (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0)).(l_andi (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) y0) (l_e_st_eq_landau_n_rt_urt ksi y0) (l_e_st_eq_landau_n_rt_rp_5158_t12 ksi x0 ux n y0 o) (l_e_st_eq_landau_n_rt_rp_5158_t9 ksi x0 ux n y0 o) : l_and (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) y0) (l_e_st_eq_landau_n_rt_urt ksi y0)).
-
-(* constant 2844 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).λy0:l_e_st_eq_landau_n_rt_rat.λo:l_not (l_imp (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 y0)).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) x) (l_e_st_eq_landau_n_rt_urt ksi x)) y0 (l_e_st_eq_landau_n_rt_rp_5158_t13 ksi x0 ux n y0 o) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi).
-
-(* constant 2845 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_not (l_imp (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 x))) (l_e_st_eq_landau_n_rt_rp_5158_t7 ksi x0 ux n) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_not (l_imp (l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux)) (l_e_st_eq_landau_n_rt_lessis x0 x)).l_e_st_eq_landau_n_rt_rp_5158_t14 ksi x0 ux n x t) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi).
-
-(* constant 2846 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λn:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).(l_e_st_eq_landau_n_rt_rp_moreisi1 (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi (l_e_st_eq_landau_n_rt_rp_5158_t15 ksi x0 ux n) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi).
-
-(* constant 2847 *)
-definition l_e_st_eq_landau_n_rt_rp_satz158b ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.(l_imp_th1 (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi) (λt:l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0.l_e_st_eq_landau_n_rt_rp_5158_t4 ksi x0 ux t) (λt:l_not (l_e_st_eq_landau_n_rt_min (l_e_st_eq_landau_n_rt_rp_5158_s1 ksi x0 ux) x0).l_e_st_eq_landau_n_rt_rp_5158_t16 ksi x0 ux t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi).
-
-(* constant 2848 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi.(l_e_st_eq_landau_n_rt_rp_satz123h (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi l : l_not (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi)).
-
-(* constant 2849 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi.(l_imp_th3 (l_e_st_eq_landau_n_rt_urt ksi x0) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi) (l_e_st_eq_landau_n_rt_rp_5158_t17 ksi x0 l) (λt:l_e_st_eq_landau_n_rt_urt ksi x0.l_e_st_eq_landau_n_rt_rp_satz158b ksi x0 t) : l_not (l_e_st_eq_landau_n_rt_urt ksi x0)).
-
-(* constant 2850 *)
-definition l_e_st_eq_landau_n_rt_rp_satz158c ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi.(l_et (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_rp_5158_t18 ksi x0 l) : l_e_st_eq_landau_n_rt_lrt ksi x0).
-
-(* constant 2851 *)
-definition l_e_st_eq_landau_n_rt_rp_5158_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi.(l_e_st_eq_landau_n_rt_rp_satz123c (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi m : l_not (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5158_xr ksi x0) ksi)).
-
-(* constant 2852 *)
-definition l_e_st_eq_landau_n_rt_rp_satz158d ≝ λksi:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi.(l_imp_th3 (l_e_st_eq_landau_n_rt_lrt ksi x0) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) ksi) (l_e_st_eq_landau_n_rt_rp_5158_t19 ksi x0 m) (λt:l_e_st_eq_landau_n_rt_lrt ksi x0.l_e_st_eq_landau_n_rt_rp_satz158a ksi x0 t) : l_e_st_eq_landau_n_rt_urt ksi x0).
-
-(* constant 2853 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_xr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt x0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2854 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_zr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt z0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2855 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt eta z0.λk:l_e_st_eq_landau_n_rt_less x0 z0.(l_e_st_eq_landau_n_rt_rp_satz127a ksi (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0) (l_e_st_eq_landau_n_rt_rp_5159_zr ksi eta l x0 ux lx z0) (l_e_st_eq_landau_n_rt_rp_satz124 (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0) ksi (l_e_st_eq_landau_n_rt_rp_satz158b ksi x0 ux)) (l_e_st_eq_landau_n_rt_rp_satz154c x0 z0 k) : l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_zr ksi eta l x0 ux lx z0)).
-
-(* constant 2856 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt eta z0.λk:l_e_st_eq_landau_n_rt_less x0 z0.(l_andi (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_zr ksi eta l x0 ux lx z0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_zr ksi eta l x0 ux lx z0) eta) (l_e_st_eq_landau_n_rt_rp_5159_t1 ksi eta l x0 ux lx z0 lz k) (l_e_st_eq_landau_n_rt_rp_satz158a eta z0 lz) : l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_zr ksi eta l x0 ux lx z0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_zr ksi eta l x0 ux lx z0) eta)).
-
-(* constant 2857 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt eta z0.λk:l_e_st_eq_landau_n_rt_less x0 z0.(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta)) z0 (l_e_st_eq_landau_n_rt_rp_5159_t2 ksi eta l x0 ux lx z0 lz k) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta))).
-
-(* constant 2858 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt ksi x0.λlx:l_e_st_eq_landau_n_rt_lrt eta x0.(l_e_st_eq_landau_n_rt_cutapp3 eta x0 lx (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt eta x.λu:l_e_st_eq_landau_n_rt_less x0 x.l_e_st_eq_landau_n_rt_rp_5159_t3 ksi eta l x0 ux lx x t u) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta))).
-
-(* constant 2859 *)
-definition l_e_st_eq_landau_n_rt_rp_satz159 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_lessapp ksi eta l (l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt ksi x.λu:l_e_st_eq_landau_n_rt_lrt eta x.l_e_st_eq_landau_n_rt_rp_5159_t4 ksi eta l x t u) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta))).
-
-(* constant 2860 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0) eta).(l_andi (l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0)) (l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0) eta)) (l_e_st_eq_landau_n_rt_rp_ratrpi x0) a : l_and3 (l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0)) (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0) eta)).
-
-(* constant 2861 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λx0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0) eta).(l_somei l_e_st_eq_landau_n_rt_cut (λc:l_e_st_eq_landau_n_rt_cut.l_and3 (l_e_st_eq_landau_n_rt_rp_ratrp c) (l_e_st_eq_landau_n_rt_rp_less ksi c) (l_e_st_eq_landau_n_rt_rp_less c eta)) (l_e_st_eq_landau_n_rt_rp_5159_xr ksi eta l x0) (l_e_st_eq_landau_n_rt_rp_5159_t5 ksi eta l x0 a) : l_e_st_eq_landau_n_rt_rp_some (λc:l_e_st_eq_landau_n_rt_cut.l_and3 (l_e_st_eq_landau_n_rt_rp_ratrp c) (l_e_st_eq_landau_n_rt_rp_less ksi c) (l_e_st_eq_landau_n_rt_rp_less c eta))).
-
-(* constant 2862 *)
-definition l_e_st_eq_landau_n_rt_rp_satz159a ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta)) (l_e_st_eq_landau_n_rt_rp_satz159 ksi eta l) (l_e_st_eq_landau_n_rt_rp_some (λa:l_e_st_eq_landau_n_rt_cut.l_and3 (l_e_st_eq_landau_n_rt_rp_ratrp a) (l_e_st_eq_landau_n_rt_rp_less ksi a) (l_e_st_eq_landau_n_rt_rp_less a eta))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta).l_e_st_eq_landau_n_rt_rp_5159_t6 ksi eta l x t) : l_e_st_eq_landau_n_rt_rp_some (λa:l_e_st_eq_landau_n_rt_cut.l_and3 (l_e_st_eq_landau_n_rt_rp_ratrp a) (l_e_st_eq_landau_n_rt_rp_less ksi a) (l_e_st_eq_landau_n_rt_rp_less a eta))).
-
-(* constant 2863 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_yr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x).∀u:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta.p.λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt y0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2864 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x).∀u:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta.p.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0) eta).(l_ande1 (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0) eta) a : l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0)).
-
-(* constant 2865 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x).∀u:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta.p.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0) eta).(l_ande2 (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0) eta) a : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0) eta).
-
-(* constant 2866 *)
-definition l_e_st_eq_landau_n_rt_rp_5159_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x).∀u:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta.p.λy0:l_e_st_eq_landau_n_rt_rat.λa:l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5159_yr ksi eta l p p1 y0) eta).(p1 y0 (l_e_st_eq_landau_n_rt_rp_5159_t7 ksi eta l p p1 y0 a) (l_e_st_eq_landau_n_rt_rp_5159_t8 ksi eta l p p1 y0 a) : p).
-
-(* constant 2867 *)
-definition l_e_st_eq_landau_n_rt_rp_satz159app ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x).∀u:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta.p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta)) (l_e_st_eq_landau_n_rt_rp_satz159 ksi eta l) p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_and (l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) eta).l_e_st_eq_landau_n_rt_rp_5159_t9 ksi eta l p p1 x t) : p).
-
-(* constant 2868 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_zr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).(l_e_st_eq_landau_n_rt_rp_rpofrt z0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2869 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_nm ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).(l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_5160_zr ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_ts ksi eta) m : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2870 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_dn ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).(l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) l_e_st_eq_landau_n_rt_rp_1rp : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2871 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_fr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).(l_e_st_eq_landau_n_rt_rp_ov (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2872 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_zeta ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).(l_e_ite (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2873 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp.(l_e_itet (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp l : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m)).
-
-(* constant 2874 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp.(l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_t1 ksi eta z0 m l) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m)).
-
-(* constant 2875 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp.(l_e_st_eq_landau_n_rt_rp_lessisi1 (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_satz127a (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5160_t2 ksi eta z0 m l) l) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2876 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λn:l_not (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).(l_e_itef (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp n : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2877 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λn:l_not (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).(l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5160_t4 ksi eta z0 m n) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2878 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λn:l_not (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).(l_e_st_eq_landau_n_rt_rp_trlessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_t5 ksi eta z0 m n) (l_e_st_eq_landau_n_rt_rp_satz124 (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_satz123f (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp n)) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m)).
-
-(* constant 2879 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp) (λt:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp.l_e_st_eq_landau_n_rt_rp_5160_t3 ksi eta z0 m t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).l_e_st_eq_landau_n_rt_rp_5160_t5 ksi eta z0 m t) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2880 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m)) (λt:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp.l_e_st_eq_landau_n_rt_rp_5160_t2 ksi eta z0 m t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp).l_e_st_eq_landau_n_rt_rp_5160_t6 ksi eta z0 m t) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m)).
-
-(* constant 2881 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_zr1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt z1 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2882 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_zr2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt z2 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2883 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_disttp2 (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_satz147a (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) l2 l4) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)))).
-
-(* constant 2884 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) eta)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_disttp1 ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) eta) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) eta))) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)))).
-
-(* constant 2885 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_satz149a (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_satz139a ksi ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_lessisi2 ksi ksi (l_e_refis l_e_st_eq_landau_n_rt_cut ksi)) (l_e_st_eq_landau_n_rt_rp_5160_t7 ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))).
-
-(* constant 2886 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_satz139a (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_t10 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_t11 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)))).
-
-(* constant 2887 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_satz127b (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_5160_t9 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_t12 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)))).
-
-(* constant 2888 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl eta ksi) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl ksi eta) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_asspl2 eta ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl eta ksi) (l_e_st_eq_landau_n_rt_rp_pl ksi eta) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_compl eta ksi)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m)).
-
-(* constant 2889 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_distpt1 eta (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ists1 (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_t14 ksi eta z0 m z1 l1 l2 z2 l3 l4)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))).
-
-(* constant 2890 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_5160_t15 ksi eta z0 m z1 l1 l2 z2 l3 l4)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)))).
-
-(* constant 2891 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl ksi l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_5160_t16 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_t13 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)))).
-
-(* constant 2892 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_islessis12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_satz153e (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_satz149a (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_fr ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_t8 ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m)))) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m)).
-
-(* constant 2893 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t19 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_satz139a (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts ksi eta))) (l_e_st_eq_landau_n_rt_rp_5160_t18 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m))).
-
-(* constant 2894 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_satz127b (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_dn ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_t17 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_t19 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m))).
-
-(* constant 2895 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_5160_nm ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_zr ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_satz140c (l_e_st_eq_landau_n_rt_rp_5160_zr ksi eta z0 m) (l_e_st_eq_landau_n_rt_rp_ts ksi eta) m) (l_e_st_eq_landau_n_rt_rp_5160_t20 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_5160_zr ksi eta z0 m)).
-
-(* constant 2896 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_satz154f (l_e_st_eq_landau_n_rt_ts z1 z2) z0 (l_e_st_eq_landau_n_rt_rp_isless1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts z1 z2)) (l_e_st_eq_landau_n_rt_rp_5160_zr ksi eta z0 m) (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts z1 z2)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2)) (l_e_st_eq_landau_n_rt_rp_satz155c z1 z2)) (l_e_st_eq_landau_n_rt_rp_5160_t21 ksi eta z0 m z1 l1 l2 z2 l3 l4)) : l_e_st_eq_landau_n_rt_less (l_e_st_eq_landau_n_rt_ts z1 z2) z0).
-
-(* constant 2897 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_x0 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_ov z0 z2 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2898 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_xr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2899 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_y0 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(z2 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2900 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_yr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5160_y0 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2901 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_satz110e z0 z2 : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_y0 ksi eta z0 m z1 l1 l2 z2 l3 l4)) z0).
-
-(* constant 2902 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t24 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_ismore1 z0 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) z2) (l_e_st_eq_landau_n_rt_ts z1 z2) (l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) z2) z0 (l_e_st_eq_landau_n_rt_rp_5160_t23 ksi eta z0 m z1 l1 l2 z2 l3 l4)) (l_e_st_eq_landau_n_rt_satz83 (l_e_st_eq_landau_n_rt_ts z1 z2) z0 (l_e_st_eq_landau_n_rt_rp_5160_t22 ksi eta z0 m z1 l1 l2 z2 l3 l4)) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) z2) (l_e_st_eq_landau_n_rt_ts z1 z2)).
-
-(* constant 2903 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t25 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_satz106a (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) z1 z2 (l_e_st_eq_landau_n_rt_rp_5160_t24 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) z1).
-
-(* constant 2904 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t26 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_trmore (l_e_st_eq_landau_n_rt_rp_5160_xr ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) ksi (l_e_st_eq_landau_n_rt_rp_satz154a (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) z1 (l_e_st_eq_landau_n_rt_rp_5160_t25 ksi eta z0 m z1 l1 l2 z2 l3 l4)) (l_e_st_eq_landau_n_rt_rp_satz122 ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) l1) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_xr ksi eta z0 m z1 l1 l2 z2 l3 l4) ksi).
-
-(* constant 2905 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t27 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_satz122 eta (l_e_st_eq_landau_n_rt_rp_5160_yr ksi eta z0 m z1 l1 l2 z2 l3 l4) l3 : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_yr ksi eta z0 m z1 l1 l2 z2 l3 l4) eta).
-
-(* constant 2906 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_ur ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt u0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2907 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_vr ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λv0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt v0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2908 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_prop1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λu0:l_e_st_eq_landau_n_rt_rat.λv0:l_e_st_eq_landau_n_rt_rat.(l_and3 (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_ur ksi eta z0 u0) ksi) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_vr ksi eta z0 u0 v0) eta) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts u0 v0) z0) : Prop).
-
-(* constant 2909 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_prop2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x y)) : Prop).
-
-(* constant 2910 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t28 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_and3i (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_xr ksi eta z0 m z1 l1 l2 z2 l3 l4) ksi) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_yr ksi eta z0 m z1 l1 l2 z2 l3 l4) eta) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_y0 ksi eta z0 m z1 l1 l2 z2 l3 l4)) z0) (l_e_st_eq_landau_n_rt_rp_5160_t26 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_t27 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_t23 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_y0 ksi eta z0 m z1 l1 l2 z2 l3 l4)).
-
-(* constant 2911 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t29 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) y) (l_e_st_eq_landau_n_rt_rp_5160_y0 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_t28 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) y)).
-
-(* constant 2912 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t30 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr2 ksi eta z0 m z1 l1 l2 z2) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x y)) (l_e_st_eq_landau_n_rt_rp_5160_x0 ksi eta z0 m z1 l1 l2 z2 l3 l4) (l_e_st_eq_landau_n_rt_rp_5160_t29 ksi eta z0 m z1 l1 l2 z2 l3 l4) : l_e_st_eq_landau_n_rt_rp_5160_prop2 ksi eta z0).
-
-(* constant 2913 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t31 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5160_zr1 ksi eta z0 m z1) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).(l_e_st_eq_landau_n_rt_rp_satz159app eta (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_satz133a eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_prop2 ksi eta z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_less eta (l_e_st_eq_landau_n_rt_rp_rpofrt x).λu:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_pl eta (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).l_e_st_eq_landau_n_rt_rp_5160_t30 ksi eta z0 m z1 l1 l2 x t u) : l_e_st_eq_landau_n_rt_rp_5160_prop2 ksi eta z0).
-
-(* constant 2914 *)
-definition l_e_st_eq_landau_n_rt_rp_satz160 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).(l_e_st_eq_landau_n_rt_rp_satz159app ksi (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_satz133a ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)) (l_e_st_eq_landau_n_rt_rp_5160_prop2 ksi eta z0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_less ksi (l_e_st_eq_landau_n_rt_rp_rpofrt x).λu:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_pl ksi (l_e_st_eq_landau_n_rt_rp_5160_zeta ksi eta z0 m)).l_e_st_eq_landau_n_rt_rp_5160_t31 ksi eta z0 m x t u) : l_e_st_eq_landau_n_rt_some (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and3 (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0)))).
-
-(* constant 2915 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_xr1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0.p.λx1:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt x1 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2916 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_yr1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0.p.λx1:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y).λy1:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt y1 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2917 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t32 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0.p.λx1:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y).λy1:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y1.(l_and3e1 (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_xr1 ksi eta z0 m p p1 x1) ksi) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_yr1 ksi eta z0 m p p1 x1 px y1) eta) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x1 y1) z0) py : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_xr1 ksi eta z0 m p p1 x1) ksi).
-
-(* constant 2918 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t33 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0.p.λx1:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y).λy1:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y1.(l_and3e2 (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_xr1 ksi eta z0 m p p1 x1) ksi) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_yr1 ksi eta z0 m p p1 x1 px y1) eta) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x1 y1) z0) py : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_yr1 ksi eta z0 m p p1 x1 px y1) eta).
-
-(* constant 2919 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t34 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0.p.λx1:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y).λy1:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y1.(l_and3e3 (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_xr1 ksi eta z0 m p p1 x1) ksi) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5160_yr1 ksi eta z0 m p p1 x1 px y1) eta) (l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x1 y1) z0) py : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x1 y1) z0).
-
-(* constant 2920 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t35 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0.p.λx1:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y).λy1:l_e_st_eq_landau_n_rt_rat.λpy:l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y1.(p1 x1 (l_e_st_eq_landau_n_rt_rp_5160_t32 ksi eta z0 m p p1 x1 px y1 py) y1 (l_e_st_eq_landau_n_rt_rp_5160_t33 ksi eta z0 m p p1 x1 px y1 py) (l_e_st_eq_landau_n_rt_rp_5160_t34 ksi eta z0 m p p1 x1 px y1 py) : p).
-
-(* constant 2921 *)
-definition l_e_st_eq_landau_n_rt_rp_5160_t36 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0.p.λx1:l_e_st_eq_landau_n_rt_rat.λpx:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y).(l_someapp l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y) px p (λy:l_e_st_eq_landau_n_rt_rat.λv:l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x1 y.l_e_st_eq_landau_n_rt_rp_5160_t35 ksi eta z0 m p p1 x1 px y v) : p).
-
-(* constant 2922 *)
-definition l_e_st_eq_landau_n_rt_rp_satz160app ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λz0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt z0) (l_e_st_eq_landau_n_rt_rp_ts ksi eta).λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rat.∀t:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) ksi.∀y:l_e_st_eq_landau_n_rt_rat.∀u:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) eta.∀v:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z0.p.(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x y)) (l_e_st_eq_landau_n_rt_rp_satz160 ksi eta z0 m) p (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5160_prop1 ksi eta z0 x y).l_e_st_eq_landau_n_rt_rp_5160_t36 ksi eta z0 m p p1 x t) : p).
-
-(* constant 2923 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_min ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_ite (l_e_st_eq_landau_n_rt_rp_less ksi eta) l_e_st_eq_landau_n_rt_cut ksi eta : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2924 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_max ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.(l_e_ite (l_e_st_eq_landau_n_rt_rp_more ksi eta) l_e_st_eq_landau_n_rt_cut ksi eta : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2925 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_ur ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt u0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2926 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) u0.(l_e_st_eq_landau_n_rt_rp_satz158a (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) u0 lu : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta)).
-
-(* constant 2927 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) u0.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) ksi (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) (l_e_itet (l_e_st_eq_landau_n_rt_rp_less ksi eta) l_e_st_eq_landau_n_rt_cut ksi eta l) (l_e_st_eq_landau_n_rt_rp_5161_t1 ksi eta u0 lu) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi).
-
-(* constant 2928 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) u0.λl:l_e_st_eq_landau_n_rt_rp_less ksi eta.(l_e_st_eq_landau_n_rt_rp_trless (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi eta (l_e_st_eq_landau_n_rt_rp_5161_t2 ksi eta u0 lu l) l : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta).
-
-(* constant 2929 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) u0.λn:l_not (l_e_st_eq_landau_n_rt_rp_less ksi eta).(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) eta (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) (l_e_itef (l_e_st_eq_landau_n_rt_rp_less ksi eta) l_e_st_eq_landau_n_rt_cut ksi eta n) (l_e_st_eq_landau_n_rt_rp_5161_t1 ksi eta u0 lu) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta).
-
-(* constant 2930 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) u0.λn:l_not (l_e_st_eq_landau_n_rt_rp_less ksi eta).(l_e_st_eq_landau_n_rt_rp_satz127b (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta ksi (l_e_st_eq_landau_n_rt_rp_5161_t4 ksi eta u0 lu n) (l_e_st_eq_landau_n_rt_rp_satz124 ksi eta (l_e_st_eq_landau_n_rt_rp_satz123f ksi eta n)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi).
-
-(* constant 2931 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) u0.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi) (λt:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_5161_t2 ksi eta u0 lu t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_less ksi eta).l_e_st_eq_landau_n_rt_rp_5161_t5 ksi eta u0 lu t) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi).
-
-(* constant 2932 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λlu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min ksi eta) u0.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_less ksi eta) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta) (λt:l_e_st_eq_landau_n_rt_rp_less ksi eta.l_e_st_eq_landau_n_rt_rp_5161_t3 ksi eta u0 lu t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_less ksi eta).l_e_st_eq_landau_n_rt_rp_5161_t4 ksi eta u0 lu t) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta).
-
-(* constant 2933 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) u0.(l_e_st_eq_landau_n_rt_rp_satz158b (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) u0 uu : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta)).
-
-(* constant 2934 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) u0.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_ismoreis2 (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) ksi (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) (l_e_itet (l_e_st_eq_landau_n_rt_rp_more ksi eta) l_e_st_eq_landau_n_rt_cut ksi eta m) (l_e_st_eq_landau_n_rt_rp_5161_t8 ksi eta u0 uu) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi).
-
-(* constant 2935 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) u0.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_trmoreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi eta (l_e_st_eq_landau_n_rt_rp_5161_t9 ksi eta u0 uu m) (l_e_st_eq_landau_n_rt_rp_moreisi1 ksi eta m) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta).
-
-(* constant 2936 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) u0.λn:l_not (l_e_st_eq_landau_n_rt_rp_more ksi eta).(l_e_st_eq_landau_n_rt_rp_ismoreis2 (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) eta (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) (l_e_itef (l_e_st_eq_landau_n_rt_rp_more ksi eta) l_e_st_eq_landau_n_rt_cut ksi eta n) (l_e_st_eq_landau_n_rt_rp_5161_t8 ksi eta u0 uu) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta).
-
-(* constant 2937 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) u0.λn:l_not (l_e_st_eq_landau_n_rt_rp_more ksi eta).(l_e_st_eq_landau_n_rt_rp_trmoreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta ksi (l_e_st_eq_landau_n_rt_rp_5161_t11 ksi eta u0 uu n) (l_e_st_eq_landau_n_rt_rp_satz125 ksi eta (l_e_st_eq_landau_n_rt_rp_satz123e ksi eta n)) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi).
-
-(* constant 2938 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) u0.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi) (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_5161_t9 ksi eta u0 uu t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_more ksi eta).l_e_st_eq_landau_n_rt_rp_5161_t12 ksi eta u0 uu t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) ksi).
-
-(* constant 2939 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λu0:l_e_st_eq_landau_n_rt_rat.λuu:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max ksi eta) u0.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_more ksi eta) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta) (λt:l_e_st_eq_landau_n_rt_rp_more ksi eta.l_e_st_eq_landau_n_rt_rp_5161_t10 ksi eta u0 uu t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_more ksi eta).l_e_st_eq_landau_n_rt_rp_5161_t11 ksi eta u0 uu t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_ur ksi eta u0) eta).
-
-(* constant 2940 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t15 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi1:l_e_st_eq_landau_n_rt_cut.λksi2:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi1 ksi2.(l_e_st_eq_landau_n_rt_rp_satz147 ksi1 ksi2 ksi1 ksi2 m m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts ksi1 ksi1) (l_e_st_eq_landau_n_rt_rp_ts ksi2 ksi2)).
-
-(* constant 2941 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_sq1 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi1:l_e_st_eq_landau_n_rt_cut.λksi2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ts ksi1 ksi1 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2942 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_sq2 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi1:l_e_st_eq_landau_n_rt_cut.λksi2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ts ksi2 ksi2 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2943 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t16 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi1:l_e_st_eq_landau_n_rt_cut.λksi2:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more ksi1 ksi2.(l_ec3e21 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2)) (l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2)) (l_e_st_eq_landau_n_rt_rp_5161_t15 zeta ksi1 ksi2 m) : l_e_st_eq_landau_n_rt_rp_nis (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2)).
-
-(* constant 2944 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t17 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi1:l_e_st_eq_landau_n_rt_cut.λksi2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) zeta.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2) zeta.(l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2) zeta i j : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2)).
-
-(* constant 2945 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t18 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi1:l_e_st_eq_landau_n_rt_cut.λksi2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) zeta.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2) zeta.(λt:l_e_st_eq_landau_n_rt_rp_more ksi1 ksi2.l_e_st_eq_landau_n_rt_rp_5161_t16 zeta ksi1 ksi2 t (l_e_st_eq_landau_n_rt_rp_5161_t17 zeta ksi1 ksi2 i j) : l_not (l_e_st_eq_landau_n_rt_rp_more ksi1 ksi2)).
-
-(* constant 2946 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t19 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi1:l_e_st_eq_landau_n_rt_cut.λksi2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) zeta.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2) zeta.(λt:l_e_st_eq_landau_n_rt_rp_less ksi1 ksi2.l_e_st_eq_landau_n_rt_rp_5161_t16 zeta ksi2 ksi1 (l_e_st_eq_landau_n_rt_rp_satz122 ksi1 ksi2 t) (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_t17 zeta ksi1 ksi2 i j)) : l_not (l_e_st_eq_landau_n_rt_rp_less ksi1 ksi2)).
-
-(* constant 2947 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t20 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi1:l_e_st_eq_landau_n_rt_cut.λksi2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq1 zeta ksi1 ksi2) zeta.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_sq2 zeta ksi1 ksi2) zeta.(l_or3e1 (l_e_st_eq_landau_n_rt_rp_is ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_more ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_less ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_satz123a ksi1 ksi2) (l_e_st_eq_landau_n_rt_rp_5161_t18 zeta ksi1 ksi2 i j) (l_e_st_eq_landau_n_rt_rp_5161_t19 zeta ksi1 ksi2 i j) : l_e_st_eq_landau_n_rt_rp_is ksi1 ksi2).
-
-(* constant 2948 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t21 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(λa:l_e_st_eq_landau_n_rt_cut.λb:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) zeta.λu:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts b b) zeta.l_e_st_eq_landau_n_rt_rp_5161_t20 zeta a b t u : l_e_amone l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) zeta)).
-
-(* constant 2949 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_sqrtset ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) zeta) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 2950 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_xr ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt x0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2951 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t22 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_5161_t6 l_e_st_eq_landau_n_rt_rp_1rp zeta x0 lx : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2952 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t23 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_5161_t7 l_e_st_eq_landau_n_rt_rp_1rp zeta x0 lx : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) zeta).
-
-(* constant 2953 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t24 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_isless1 (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) zeta (l_e_st_eq_landau_n_rt_rp_satz151a (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_5161_t23 zeta x0 lx) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) zeta).
-
-(* constant 2954 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t25 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_trless (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) zeta (l_e_st_eq_landau_n_rt_rp_satz148c (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0))) (l_e_st_eq_landau_n_rt_rp_5161_t22 zeta x0 lx)) (l_e_st_eq_landau_n_rt_rp_5161_t24 zeta x0 lx) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) zeta).
-
-(* constant 2955 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t26 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) zeta) x0 (l_e_st_eq_landau_n_rt_rp_5161_t25 zeta x0 lx) : l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)).
-
-(* constant 2956 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t27 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_5161_t13 l_e_st_eq_landau_n_rt_rp_1rp zeta x0 ux : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2957 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t28 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_5161_t14 l_e_st_eq_landau_n_rt_rp_1rp zeta x0 ux : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) zeta).
-
-(* constant 2958 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t29 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_ismoreis1 (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) zeta (l_e_st_eq_landau_n_rt_rp_satz151a (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_5161_t28 zeta x0 ux) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) zeta).
-
-(* constant 2959 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t30 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_trmoreis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) zeta (l_e_st_eq_landau_n_rt_rp_satz149 (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_moreisi2 (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0))) (l_e_st_eq_landau_n_rt_rp_5161_t27 zeta x0 ux)) (l_e_st_eq_landau_n_rt_rp_5161_t29 zeta x0 ux) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) zeta).
-
-(* constant 2960 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t31 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_rp_satz123c (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) zeta (l_e_st_eq_landau_n_rt_rp_5161_t30 zeta x0 ux) : l_not (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) zeta)).
-
-(* constant 2961 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t32 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_imp_th3 (l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) zeta) (l_e_st_eq_landau_n_rt_rp_5161_t31 zeta x0 ux) (λt:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) zeta) x0 t) : l_not (l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta))).
-
-(* constant 2962 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_yr ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λy0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt y0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2963 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t33 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) zeta) x0 i : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) zeta).
-
-(* constant 2964 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t34 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_rp_satz154c y0 x0 l : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_yr zeta x0 i y0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)).
-
-(* constant 2965 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t35 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_eq_landau_n_rt_rp_trless (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yr zeta x0 i y0) (l_e_st_eq_landau_n_rt_rp_5161_yr zeta x0 i y0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) zeta (l_e_st_eq_landau_n_rt_rp_satz147a (l_e_st_eq_landau_n_rt_rp_5161_yr zeta x0 i y0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_yr zeta x0 i y0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_t34 zeta x0 i y0 l) (l_e_st_eq_landau_n_rt_rp_5161_t34 zeta x0 i y0 l)) (l_e_st_eq_landau_n_rt_rp_5161_t33 zeta x0 i) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yr zeta x0 i y0) (l_e_st_eq_landau_n_rt_rp_5161_yr zeta x0 i y0)) zeta).
-
-(* constant 2966 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t36 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) zeta) y0 (l_e_st_eq_landau_n_rt_rp_5161_t35 zeta x0 i y0 l) : l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)).
-
-(* constant 2967 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t37 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).(l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) zeta (l_e_st_eq_landau_n_rt_rp_5161_t33 zeta x0 i) : l_e_st_eq_landau_n_rt_rp_more zeta (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0))).
-
-(* constant 2968 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_nm ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).(l_e_st_eq_landau_n_rt_rp_mn zeta (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_5161_t37 zeta x0 i) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2969 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_dn ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).(l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2970 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_fr ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).(l_e_st_eq_landau_n_rt_rp_ov (l_e_st_eq_landau_n_rt_rp_5161_nm zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2971 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_zr ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt z0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2972 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t38 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_5161_t6 l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i) z0 lz : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) l_e_st_eq_landau_n_rt_rp_1rp).
-
-(* constant 2973 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t39 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_5161_t7 l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i) z0 lz : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)).
-
-(* constant 2974 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t40 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_satz94 x0 z0 : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) x0).
-
-(* constant 2975 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t41 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ists12 (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_satz155a x0 z0) (l_e_st_eq_landau_n_rt_rp_satz155a x0 z0)) (l_e_st_eq_landau_n_rt_rp_disttp2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)))).
-
-(* constant 2976 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t42 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_5161_t41 zeta x0 i z0 lz) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)))).
-
-(* constant 2977 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t43 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_disttp1 (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)))) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)))).
-
-(* constant 2978 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t44 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_satz145c (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) (l_e_st_eq_landau_n_rt_rp_satz138c (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0))) (l_e_st_eq_landau_n_rt_rp_5161_t38 zeta x0 i z0 lz)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))).
-
-(* constant 2979 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t45 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_satz138c (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_t43 zeta x0 i z0 lz) (l_e_st_eq_landau_n_rt_rp_5161_t44 zeta x0 i z0 lz) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)))).
-
-(* constant 2980 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t46 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_distpt1 (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)))).
-
-(* constant 2981 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t47 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_5161_t42 zeta x0 i z0 lz) (l_e_st_eq_landau_n_rt_rp_5161_t46 zeta x0 i z0 lz) (l_e_st_eq_landau_n_rt_rp_5161_t45 zeta x0 i z0 lz) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)))).
-
-(* constant 2982 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t48 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) (l_e_st_eq_landau_n_rt_rp_5161_nm zeta x0 i) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_satz153c (l_e_st_eq_landau_n_rt_rp_5161_nm zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i)) (l_e_st_eq_landau_n_rt_rp_satz148c (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0) (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i) (l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i))) (l_e_st_eq_landau_n_rt_rp_5161_t39 zeta x0 i z0 lz)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_nm zeta x0 i)).
-
-(* constant 2983 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t49 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_satz138c (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0)) (l_e_st_eq_landau_n_rt_rp_5161_nm zeta x0 i) (l_e_st_eq_landau_n_rt_rp_lessisi2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)))) (l_e_st_eq_landau_n_rt_rp_5161_t48 zeta x0 i z0 lz) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_5161_nm zeta x0 i))).
-
-(* constant 2984 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t50 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_5161_nm zeta x0 i)) zeta (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) (l_e_st_eq_landau_n_rt_rp_satz140c zeta (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_5161_t37 zeta x0 i)) (l_e_st_eq_landau_n_rt_rp_5161_t49 zeta x0 i z0 lz) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) zeta).
-
-(* constant 2985 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t51 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_eq_landau_n_rt_rp_trless (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0) (l_e_st_eq_landau_n_rt_rp_5161_xr zeta x0)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_dn zeta x0 i) (l_e_st_eq_landau_n_rt_rp_5161_zr zeta x0 i z0))) zeta (l_e_st_eq_landau_n_rt_rp_5161_t47 zeta x0 i z0 lz) (l_e_st_eq_landau_n_rt_rp_5161_t50 zeta x0 i z0 lz) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl x0 z0))) zeta).
-
-(* constant 2986 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t52 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) zeta) (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_rp_5161_t51 zeta x0 i z0 lz) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)).
-
-(* constant 2987 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t53 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_andi (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) x0) (l_e_st_eq_landau_n_rt_rp_5161_t52 zeta x0 i z0 lz) (l_e_st_eq_landau_n_rt_rp_5161_t40 zeta x0 i z0 lz) : l_and (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_pl x0 z0) x0)).
-
-(* constant 2988 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t54 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λz0:l_e_st_eq_landau_n_rt_rat.λlz:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) z0.(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_more y x0)) (l_e_st_eq_landau_n_rt_pl x0 z0) (l_e_st_eq_landau_n_rt_rp_5161_t53 zeta x0 i z0 lz) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_more y x0))).
-
-(* constant 2989 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t55 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).(l_e_st_eq_landau_n_rt_cutapp1a (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) (l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_more y x0))) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_5161_fr zeta x0 i)) x.l_e_st_eq_landau_n_rt_rp_5161_t54 zeta x0 i x t) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_more y x0))).
-
-(* constant 2990 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t56 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) y0.(l_e_st_eq_landau_n_rt_cut2 (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta) x0 (l_e_st_eq_landau_n_rt_rp_5161_t26 zeta x0 lx) y0 (l_e_st_eq_landau_n_rt_rp_5161_t32 zeta y0 uy) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_rp_5161_t36 zeta x t y u) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).l_e_st_eq_landau_n_rt_rp_5161_t55 zeta x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)).
-
-(* constant 2991 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t57 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) x0.(l_e_st_eq_landau_n_rt_cutapp1b (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_max l_e_st_eq_landau_n_rt_rp_1rp zeta) y.l_e_st_eq_landau_n_rt_rp_5161_t56 zeta x0 lx y t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)).
-
-(* constant 2992 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t58 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_cutapp1a (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_min l_e_st_eq_landau_n_rt_rp_1rp zeta) x.l_e_st_eq_landau_n_rt_rp_5161_t57 zeta x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)).
-
-(* constant 2993 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_rtc ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_cutof (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta) (l_e_st_eq_landau_n_rt_rp_5161_t58 zeta) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2994 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t59 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_lessis x0 y0.(l_or_th9 (l_e_st_eq_landau_n_rt_less x0 y0) (l_e_st_eq_landau_n_rt_is x0 y0) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)) l (λt:l_e_st_eq_landau_n_rt_less x0 y0.l_e_st_eq_landau_n_rt_rp_satz154c x0 y0 t) (λt:l_e_st_eq_landau_n_rt_is x0 y0.l_e_st_eq_landau_n_rt_rp_satz154b x0 y0 t) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)).
-
-(* constant 2995 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t60 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λy0:l_e_st_eq_landau_n_rt_rat.λm:l_e_st_eq_landau_n_rt_moreis x0 y0.(l_e_st_eq_landau_n_rt_rp_satz125 (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_5161_t59 y0 x0 (l_e_st_eq_landau_n_rt_satz84 x0 y0 m)) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)).
-
-(* constant 2996 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t61 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta m : l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta))).
-
-(* constant 2997 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_zr1 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt z1 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 2998 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t62 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).(l_e_st_eq_landau_n_rt_rp_satz158c (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) z1 l2 : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) z1).
-
-(* constant 2999 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_xr1 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt x1 : l_e_st_eq_landau_n_rt_cut).
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "grundlagen_2_2.ma".
-
-(* constant 3000 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_xr2 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt x2 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3001 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_xm ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_ite (l_e_st_eq_landau_n_rt_more x1 x2) l_e_st_eq_landau_n_rt_rat x1 x2 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 3002 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_xrm ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3003 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t63 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).λo:l_e_st_eq_landau_n_rt_more x1 x2.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) x1 (l_e_itet (l_e_st_eq_landau_n_rt_more x1 x2) l_e_st_eq_landau_n_rt_rat x1 x2 o) : l_e_st_eq_landau_n_rt_is x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3004 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t64 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).λo:l_e_st_eq_landau_n_rt_more x1 x2.(l_e_isp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x) x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) lx1 (l_e_st_eq_landau_n_rt_rp_5161_t63 zeta m z1 l1 l2 x1 lx1 x2 lx2 i o) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3005 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t65 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).λo:l_e_st_eq_landau_n_rt_more x1 x2.(l_e_st_eq_landau_n_rt_lessisi2 x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t63 zeta m z1 l1 l2 x1 lx1 x2 lx2 i o) : l_e_st_eq_landau_n_rt_lessis x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3006 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t66 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).λo:l_e_st_eq_landau_n_rt_more x1 x2.(l_e_st_eq_landau_n_rt_lessisi1 x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_satz87b x2 x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_satz82 x1 x2 o) (l_e_st_eq_landau_n_rt_rp_5161_t65 zeta m z1 l1 l2 x1 lx1 x2 lx2 i o)) : l_e_st_eq_landau_n_rt_lessis x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3007 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t67 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).λn:l_not (l_e_st_eq_landau_n_rt_more x1 x2).(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) x2 (l_e_itef (l_e_st_eq_landau_n_rt_more x1 x2) l_e_st_eq_landau_n_rt_rat x1 x2 n) : l_e_st_eq_landau_n_rt_is x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3008 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t68 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).λn:l_not (l_e_st_eq_landau_n_rt_more x1 x2).(l_e_isp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x) x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) lx2 (l_e_st_eq_landau_n_rt_rp_5161_t67 zeta m z1 l1 l2 x1 lx1 x2 lx2 i n) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3009 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t69 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).λn:l_not (l_e_st_eq_landau_n_rt_more x1 x2).(l_e_st_eq_landau_n_rt_lessisi2 x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t67 zeta m z1 l1 l2 x1 lx1 x2 lx2 i n) : l_e_st_eq_landau_n_rt_lessis x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3010 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t70 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).λn:l_not (l_e_st_eq_landau_n_rt_more x1 x2).(l_e_st_eq_landau_n_rt_satz88 x1 x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_satz81e x1 x2 n) (l_e_st_eq_landau_n_rt_rp_5161_t69 zeta m z1 l1 l2 x1 lx1 x2 lx2 i n) : l_e_st_eq_landau_n_rt_lessis x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3011 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t71 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_imp_th1 (l_e_st_eq_landau_n_rt_more x1 x2) (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)) (λt:l_e_st_eq_landau_n_rt_more x1 x2.l_e_st_eq_landau_n_rt_rp_5161_t64 zeta m z1 l1 l2 x1 lx1 x2 lx2 i t) (λt:l_not (l_e_st_eq_landau_n_rt_more x1 x2).l_e_st_eq_landau_n_rt_rp_5161_t68 zeta m z1 l1 l2 x1 lx1 x2 lx2 i t) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3012 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t72 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_imp_th1 (l_e_st_eq_landau_n_rt_more x1 x2) (l_e_st_eq_landau_n_rt_lessis x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)) (λt:l_e_st_eq_landau_n_rt_more x1 x2.l_e_st_eq_landau_n_rt_rp_5161_t65 zeta m z1 l1 l2 x1 lx1 x2 lx2 i t) (λt:l_not (l_e_st_eq_landau_n_rt_more x1 x2).l_e_st_eq_landau_n_rt_rp_5161_t70 zeta m z1 l1 l2 x1 lx1 x2 lx2 i t) : l_e_st_eq_landau_n_rt_lessis x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3013 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t73 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_imp_th1 (l_e_st_eq_landau_n_rt_more x1 x2) (l_e_st_eq_landau_n_rt_lessis x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)) (λt:l_e_st_eq_landau_n_rt_more x1 x2.l_e_st_eq_landau_n_rt_rp_5161_t66 zeta m z1 l1 l2 x1 lx1 x2 lx2 i t) (λt:l_not (l_e_st_eq_landau_n_rt_more x1 x2).l_e_st_eq_landau_n_rt_rp_5161_t69 zeta m z1 l1 l2 x1 lx1 x2 lx2 i t) : l_e_st_eq_landau_n_rt_lessis x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3014 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t74 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta) (l_e_st_eq_landau_n_rt_rp_5161_t58 zeta) (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t71 zeta m z1 l1 l2 x1 lx1 x2 lx2 i) : l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)).
-
-(* constant 3015 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t75 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_st_eq_landau_n_rt_rp_5161_t59 x1 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t72 zeta m z1 l1 l2 x1 lx1 x2 lx2 i) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5161_xr1 zeta m z1 l1 l2 x1) (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3016 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t76 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_st_eq_landau_n_rt_rp_5161_t59 x2 (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t73 zeta m z1 l1 l2 x1 lx1 x2 lx2 i) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5161_xr2 zeta m z1 l1 l2 x1 lx1 x2) (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)).
-
-(* constant 3017 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t77 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts x1 x2)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr1 zeta m z1 l1 l2 x1) (l_e_st_eq_landau_n_rt_rp_5161_xr2 zeta m z1 l1 l2 x1 lx1 x2)) (l_e_st_eq_landau_n_rt_rp_satz154b z1 (l_e_st_eq_landau_n_rt_ts x1 x2) i) (l_e_st_eq_landau_n_rt_rp_satz155c x1 x2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr1 zeta m z1 l1 l2 x1) (l_e_st_eq_landau_n_rt_rp_5161_xr2 zeta m z1 l1 l2 x1 lx1 x2))).
-
-(* constant 3018 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t78 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_st_eq_landau_n_rt_rp_islessis1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr1 zeta m z1 l1 l2 x1) (l_e_st_eq_landau_n_rt_rp_5161_xr2 zeta m z1 l1 l2 x1 lx1 x2)) (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)) (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xr1 zeta m z1 l1 l2 x1) (l_e_st_eq_landau_n_rt_rp_5161_xr2 zeta m z1 l1 l2 x1 lx1 x2)) (l_e_st_eq_landau_n_rt_rp_5161_t77 zeta m z1 l1 l2 x1 lx1 x2 lx2 i)) (l_e_st_eq_landau_n_rt_rp_satz149a (l_e_st_eq_landau_n_rt_rp_5161_xr1 zeta m z1 l1 l2 x1) (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_xr2 zeta m z1 l1 l2 x1 lx1 x2) (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t75 zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t76 zeta m z1 l1 l2 x1 lx1 x2 lx2 i)) : l_e_st_eq_landau_n_rt_rp_lessis (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i))).
-
-(* constant 3019 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t79 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) zeta) (l_e_st_eq_landau_n_rt_rp_5161_xm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t74 zeta m z1 l1 l2 x1 lx1 x2 lx2 i) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)) zeta).
-
-(* constant 3020 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t80 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_st_eq_landau_n_rt_rp_satz127a (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_xrm zeta m z1 l1 l2 x1 lx1 x2 lx2 i)) zeta (l_e_st_eq_landau_n_rt_rp_5161_t78 zeta m z1 l1 l2 x1 lx1 x2 lx2 i) (l_e_st_eq_landau_n_rt_rp_5161_t79 zeta m z1 l1 l2 x1 lx1 x2 lx2 i) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) zeta).
-
-(* constant 3021 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t81 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_ec3e23 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) zeta) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) zeta) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) zeta) (l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) zeta) (l_e_st_eq_landau_n_rt_rp_satz122 zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) l1) (l_e_st_eq_landau_n_rt_rp_5161_t80 zeta m z1 l1 l2 x1 lx1 x2 lx2 i) : l_con).
-
-(* constant 3022 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t82 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).λx1:l_e_st_eq_landau_n_rt_rat.λlx1:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x1.λx2:l_e_st_eq_landau_n_rt_rat.λlx2:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x2.λi:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x1 x2).(l_e_st_eq_landau_n_rt_rp_tsapp (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) z1 (l_e_st_eq_landau_n_rt_rp_5161_t62 zeta m z1 l1 l2) l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) y.λv:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_5161_t81 zeta m z1 l1 l2 x t y u v) : l_con).
-
-(* constant 3023 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t82a ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz1:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr1 zeta m z1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).(l_e_st_eq_landau_n_rt_rp_tsapp (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) z1 (l_e_st_eq_landau_n_rt_rp_5161_t62 zeta m z1 l1 l2) l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) x.λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) y.λv:l_e_st_eq_landau_n_rt_is z1 (l_e_st_eq_landau_n_rt_ts x y).l_e_st_eq_landau_n_rt_rp_5161_t82 zeta m z1 l1 l2 x t y u v) : l_con).
-
-(* constant 3024 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t83 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.(l_e_st_eq_landau_n_rt_rp_satz159app zeta (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_t61 zeta m) l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_less zeta (l_e_st_eq_landau_n_rt_rp_rpofrt x).λu:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).l_e_st_eq_landau_n_rt_rp_5161_t82a zeta m x t u) : l_con).
-
-(* constant 3025 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_zr2 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt z2 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3026 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t84 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.(l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) l3 : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta))).
-
-(* constant 3027 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_yr1 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt y1 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3028 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_yr2 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt y2 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3029 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_ym ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_e_ite (l_e_st_eq_landau_n_rt_less y1 y2) l_e_st_eq_landau_n_rt_rat y1 y2 : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 3030 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_yrm ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3031 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t85 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λk:l_e_st_eq_landau_n_rt_less y1 y2.(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) y1 (l_e_itet (l_e_st_eq_landau_n_rt_less y1 y2) l_e_st_eq_landau_n_rt_rat y1 y2 k) : l_e_st_eq_landau_n_rt_is y1 (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3032 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t86 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λk:l_e_st_eq_landau_n_rt_less y1 y2.(l_e_st_eq_landau_n_rt_rp_satz154b y1 (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_t85 zeta l z2 l3 l4 y1 m1 y2 m2 i k) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3033 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t87 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λk:l_e_st_eq_landau_n_rt_less y1 y2.(l_e_st_eq_landau_n_rt_rp_ismore1 (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_t86 zeta l z2 l3 l4 y1 m1 y2 m2 i k) m1 : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).
-
-(* constant 3034 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t88 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λk:l_e_st_eq_landau_n_rt_less y1 y2.(l_e_st_eq_landau_n_rt_rp_moreisi2 (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_t86 zeta l z2 l3 l4 y1 m1 y2 m2 i k) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3035 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t89 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λk:l_e_st_eq_landau_n_rt_less y1 y2.(l_e_st_eq_landau_n_rt_rp_moreisi1 (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_satz127d (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_satz154c y1 y2 k)) (l_e_st_eq_landau_n_rt_rp_5161_t88 zeta l z2 l3 l4 y1 m1 y2 m2 i k)) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3036 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t90 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λn:l_not (l_e_st_eq_landau_n_rt_less y1 y2).(l_e_symis l_e_st_eq_landau_n_rt_rat (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) y2 (l_e_itef (l_e_st_eq_landau_n_rt_less y1 y2) l_e_st_eq_landau_n_rt_rat y1 y2 n) : l_e_st_eq_landau_n_rt_is y2 (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3037 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t91 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λn:l_not (l_e_st_eq_landau_n_rt_less y1 y2).(l_e_st_eq_landau_n_rt_rp_satz154b y2 (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_t90 zeta l z2 l3 l4 y1 m1 y2 m2 i n) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3038 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t92 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λn:l_not (l_e_st_eq_landau_n_rt_less y1 y2).(l_e_st_eq_landau_n_rt_rp_ismore1 (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_t91 zeta l z2 l3 l4 y1 m1 y2 m2 i n) m2 : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).
-
-(* constant 3039 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t93 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λn:l_not (l_e_st_eq_landau_n_rt_less y1 y2).(l_e_st_eq_landau_n_rt_rp_moreisi2 (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_t91 zeta l z2 l3 l4 y1 m1 y2 m2 i n) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3040 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t94 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.λn:l_not (l_e_st_eq_landau_n_rt_less y1 y2).(l_e_st_eq_landau_n_rt_rp_trmoreis (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_t60 y1 y2 (l_e_st_eq_landau_n_rt_satz81f y1 y2 n)) (l_e_st_eq_landau_n_rt_rp_5161_t93 zeta l z2 l3 l4 y1 m1 y2 m2 i n) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3041 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t95 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_imp_th1 (l_e_st_eq_landau_n_rt_less y1 y2) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (λt:l_e_st_eq_landau_n_rt_less y1 y2.l_e_st_eq_landau_n_rt_rp_5161_t87 zeta l z2 l3 l4 y1 m1 y2 m2 i t) (λt:l_not (l_e_st_eq_landau_n_rt_less y1 y2).l_e_st_eq_landau_n_rt_rp_5161_t92 zeta l z2 l3 l4 y1 m1 y2 m2 i t) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)).
-
-(* constant 3042 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t96 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_imp_th1 (l_e_st_eq_landau_n_rt_less y1 y2) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) (λt:l_e_st_eq_landau_n_rt_less y1 y2.l_e_st_eq_landau_n_rt_rp_5161_t88 zeta l z2 l3 l4 y1 m1 y2 m2 i t) (λt:l_not (l_e_st_eq_landau_n_rt_less y1 y2).l_e_st_eq_landau_n_rt_rp_5161_t94 zeta l z2 l3 l4 y1 m1 y2 m2 i t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3043 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t97 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_imp_th1 (l_e_st_eq_landau_n_rt_less y1 y2) (l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) (λt:l_e_st_eq_landau_n_rt_less y1 y2.l_e_st_eq_landau_n_rt_rp_5161_t89 zeta l z2 l3 l4 y1 m1 y2 m2 i t) (λt:l_not (l_e_st_eq_landau_n_rt_less y1 y2).l_e_st_eq_landau_n_rt_rp_5161_t93 zeta l z2 l3 l4 y1 m1 y2 m2 i t) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3044 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t98 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_e_st_eq_landau_n_rt_rp_satz158d (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_moreisi1 (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_t95 zeta l z2 l3 l4 y1 m1 y2 m2 i)) : l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i)).
-
-(* constant 3045 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t99 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_imp_th3 (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i)) (l_e_st_eq_landau_n_rt_rp_5161_t98 zeta l z2 l3 l4 y1 m1 y2 m2 i) (λt:l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta).l_e_st_eq_landau_n_rt_rp_ine (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta) (l_e_st_eq_landau_n_rt_rp_5161_t58 zeta) (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) t) : l_not (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta))).
-
-(* constant 3046 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t100 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) zeta) (l_e_st_eq_landau_n_rt_in (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_sqrtset zeta)) (l_e_st_eq_landau_n_rt_rp_5161_t99 zeta l z2 l3 l4 y1 m1 y2 m2 i) (λt:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) zeta.l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) zeta) (l_e_st_eq_landau_n_rt_rp_5161_ym zeta l z2 l3 l4 y1 m1 y2 m2 i) t) : l_not (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) zeta)).
-
-(* constant 3047 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t101 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_e_st_eq_landau_n_rt_rp_satz123f (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) zeta (l_e_st_eq_landau_n_rt_rp_5161_t100 zeta l z2 l3 l4 y1 m1 y2 m2 i) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) zeta).
-
-(* constant 3048 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t101a ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_e_st_eq_landau_n_rt_rp_satz149 (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_t96 zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_t97 zeta l z2 l3 l4 y1 m1 y2 m2 i) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i))).
-
-(* constant 3049 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t102 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_e_st_eq_landau_n_rt_rp_ismoreis1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) (l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts y1 y2)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts y1 y2)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2)) (l_e_st_eq_landau_n_rt_rp_satz155c y1 y2)) (l_e_st_eq_landau_n_rt_rp_satz154b (l_e_st_eq_landau_n_rt_ts y1 y2) z2 i)) (l_e_st_eq_landau_n_rt_rp_5161_t101a zeta l z2 l3 l4 y1 m1 y2 m2 i) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i))).
-
-(* constant 3050 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t103 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_e_st_eq_landau_n_rt_rp_trmoreis (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_yrm zeta l z2 l3 l4 y1 m1 y2 m2 i)) zeta (l_e_st_eq_landau_n_rt_rp_5161_t102 zeta l z2 l3 l4 y1 m1 y2 m2 i) (l_e_st_eq_landau_n_rt_rp_5161_t101 zeta l z2 l3 l4 y1 m1 y2 m2 i) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta).
-
-(* constant 3051 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t104 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.λy1:l_e_st_eq_landau_n_rt_rat.λm1:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr1 zeta l z2 l3 l4 y1) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy2:l_e_st_eq_landau_n_rt_rat.λm2:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5161_yr2 zeta l z2 l3 l4 y1 m1 y2) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts y1 y2) z2.(l_e_st_eq_landau_n_rt_rp_satz123c (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta (l_e_st_eq_landau_n_rt_rp_5161_t103 zeta l z2 l3 l4 y1 m1 y2 m2 i) l4 : l_con).
-
-(* constant 3052 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t105 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.λz2:l_e_st_eq_landau_n_rt_rat.λl3:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2).λl4:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5161_zr2 zeta l z2) zeta.(l_e_st_eq_landau_n_rt_rp_satz160app (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) z2 (l_e_st_eq_landau_n_rt_rp_5161_t84 zeta l z2 l3 l4) l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt x) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta).λv:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x y) z2.l_e_st_eq_landau_n_rt_rp_5161_t104 zeta l z2 l3 l4 x t y u v) : l_con).
-
-(* constant 3053 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t106 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.(l_e_st_eq_landau_n_rt_rp_satz159app (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta l l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) (l_e_st_eq_landau_n_rt_rp_rpofrt x).λu:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) zeta.l_e_st_eq_landau_n_rt_rp_5161_t105 zeta l x t u) : l_con).
-
-(* constant 3054 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t107 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(l_or3e1 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta) (l_e_st_eq_landau_n_rt_rp_satz123a (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta) (λt:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.l_e_st_eq_landau_n_rt_rp_5161_t83 zeta t) (λt:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta.l_e_st_eq_landau_n_rt_rp_5161_t106 zeta t) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta)) zeta).
-
-(* constant 3055 *)
-definition l_e_st_eq_landau_n_rt_rp_5161_t108 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(l_somei l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) zeta) (l_e_st_eq_landau_n_rt_rp_5161_rtc zeta) (l_e_st_eq_landau_n_rt_rp_5161_t107 zeta) : l_e_st_eq_landau_n_rt_rp_some (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) zeta)).
-
-(* constant 3056 *)
-definition l_e_st_eq_landau_n_rt_rp_satz161 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_onei l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) zeta) (l_e_st_eq_landau_n_rt_rp_5161_t21 zeta) (l_e_st_eq_landau_n_rt_rp_5161_t108 zeta) : l_e_st_eq_landau_n_rt_rp_one (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) zeta)).
-
-(* constant 3057 *)
-definition l_e_st_eq_landau_n_rt_rp_irratrp ≝ λksi:l_e_st_eq_landau_n_rt_cut.(l_not (l_e_st_eq_landau_n_rt_rp_ratrp ksi) : Prop).
-
-(* constant 3058 *)
-definition l_e_st_eq_landau_n_5162_t1 ≝ λv:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl v v) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 v) v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) v) (l_e_st_eq_landau_n_ispl1 v (l_e_st_eq_landau_n_ts l_e_st_eq_landau_n_1 v) v (l_e_st_eq_landau_n_satz28g v)) (l_e_st_eq_landau_n_satz28h l_e_st_eq_landau_n_1 v) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) v)).
-
-(* constant 3059 *)
-definition l_e_st_eq_landau_n_5162_t2 ≝ λv:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_isless2 (l_e_st_eq_landau_n_pl v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) v) v (l_e_st_eq_landau_n_5162_t1 v) (l_e_st_eq_landau_n_satz18a v v) : l_e_st_eq_landau_n_less v (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) v)).
-
-(* constant 3060 *)
-definition l_e_st_eq_landau_n_5162_t3 ≝ λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts w w).(l_e_st_eq_landau_n_satz10j v w (l_imp_th3 (l_e_st_eq_landau_n_moreis v w) (l_e_st_eq_landau_n_moreis (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts w w)) (l_e_st_eq_landau_n_satz10h (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts w w) l) (λt:l_e_st_eq_landau_n_moreis v w.l_e_st_eq_landau_n_satz36 v w v w t t)) : l_e_st_eq_landau_n_less v w).
-
-(* constant 3061 *)
-definition l_e_st_eq_landau_n_5162_t4 ≝ λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) v) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts w v)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_disttp1 v w v) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_ts w v) (l_e_st_eq_landau_n_ts v w) (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_comts w v)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) v) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w))).
-
-(* constant 3062 *)
-definition l_e_st_eq_landau_n_5162_t5 ≝ λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_nat.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) (l_e_st_eq_landau_n_pl v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v w) (l_e_st_eq_landau_n_ts w w))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts w w)) (l_e_st_eq_landau_n_disttp2 (l_e_st_eq_landau_n_pl v w) v w) (l_e_st_eq_landau_n_ispl12 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) v) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) w) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v w) (l_e_st_eq_landau_n_ts w w)) (l_e_st_eq_landau_n_5162_t4 v w) (l_e_st_eq_landau_n_disttp1 v w w)) (l_e_st_eq_landau_n_asspl2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts v w) (l_e_st_eq_landau_n_ts w w)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) (l_e_st_eq_landau_n_pl v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts w w))).
-
-(* constant 3063 *)
-definition l_e_st_eq_landau_n_5162_t6 ≝ λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v w) (l_e_st_eq_landau_n_ts v w))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts v w))) (l_e_st_eq_landau_n_asspl1 (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v w) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_5162_t1 (l_e_st_eq_landau_n_ts v w))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts v w)))).
-
-(* constant 3064 *)
-definition l_e_st_eq_landau_n_5162_nun ≝ λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) (l_e_st_eq_landau_n_pl v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts w w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts v w))) (l_e_st_eq_landau_n_ts w w)) (l_e_st_eq_landau_n_5162_t5 v w) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_ts v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts v w))) (l_e_st_eq_landau_n_ts w w) (l_e_st_eq_landau_n_5162_t6 v w)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) (l_e_st_eq_landau_n_pl v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts v w))) (l_e_st_eq_landau_n_ts w w))).
-
-(* constant 3065 *)
-definition l_e_st_eq_landau_n_5162_nun1 ≝ λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) (l_e_st_eq_landau_n_pl v w)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts v w))) (l_e_st_eq_landau_n_ts w w)) (l_e_st_eq_landau_n_5162_nun v w) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts v v) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts v w))) (l_e_st_eq_landau_n_ts w w)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl v w) (l_e_st_eq_landau_n_pl v w))).
-
-(* constant 3066 *)
-definition l_e_st_eq_landau_n_5162_prop1 ≝ λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr w v) (l_e_st_eq_landau_n_fr w v)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) : Prop).
-
-(* constant 3067 *)
-definition l_e_st_eq_landau_n_5162_prop2 ≝ λv:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_some (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop1 v t) : Prop).
-
-(* constant 3068 *)
-definition l_e_st_eq_landau_n_5162_prop3 ≝ (l_e_st_eq_landau_n_some (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) : Prop).
-
-(* constant 3069 *)
-definition l_e_st_eq_landau_n_5162_y ≝ λp:l_e_st_eq_landau_n_5162_prop3.(l_e_ind l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) t) (l_e_st_eq_landau_n_satz27a (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) p) : l_e_st_eq_landau_n_nat).
-
-(* constant 3070 *)
-definition l_e_st_eq_landau_n_5162_t7 ≝ λp:l_e_st_eq_landau_n_5162_prop3.(l_e_oneax l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_min (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) t) (l_e_st_eq_landau_n_satz27a (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) p) : l_e_st_eq_landau_n_min (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) (l_e_st_eq_landau_n_5162_y p)).
-
-(* constant 3071 *)
-definition l_e_st_eq_landau_n_5162_t8 ≝ λp:l_e_st_eq_landau_n_5162_prop3.(l_ande1 (l_e_st_eq_landau_n_lb (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_prop2 (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_t7 p) : l_e_st_eq_landau_n_lb (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) (l_e_st_eq_landau_n_5162_y p)).
-
-(* constant 3072 *)
-definition l_e_st_eq_landau_n_5162_t9 ≝ λp:l_e_st_eq_landau_n_5162_prop3.(l_ande2 (l_e_st_eq_landau_n_lb (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 u) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_prop2 (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_t7 p) : l_e_st_eq_landau_n_5162_prop2 (l_e_st_eq_landau_n_5162_y p)).
-
-(* constant 3073 *)
-definition l_e_st_eq_landau_n_5162_t10 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.(l_e_st_eq_landau_n_treq1 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr x (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_fr x (l_e_st_eq_landau_n_5162_y p))) q (l_e_st_eq_landau_n_tfeq12a x (l_e_st_eq_landau_n_5162_y p) x (l_e_st_eq_landau_n_5162_y p)) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)))).
-
-(* constant 3074 *)
-definition l_e_st_eq_landau_n_5162_t11 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)))) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts x x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_12isnd (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_5162_t10 p x q) (l_e_st_eq_landau_n_ndis12 (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz28a (l_e_st_eq_landau_n_ts x x)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts x x)).
-
-(* constant 3075 *)
-definition l_e_st_eq_landau_n_5162_t12 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.(l_e_st_eq_landau_n_isless2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_t11 p x q) (l_e_st_eq_landau_n_5162_t2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts x x)).
-
-(* constant 3076 *)
-definition l_e_st_eq_landau_n_5162_t13 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.(l_e_st_eq_landau_n_isless1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p))) (l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_assts1 (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_t11 p x q)) (l_e_st_eq_landau_n_satz35c (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_refis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)))) (l_e_st_eq_landau_n_5162_t2 (l_e_st_eq_landau_n_5162_y p))) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)))).
-
-(* constant 3077 *)
-definition l_e_st_eq_landau_n_5162_t14 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.(l_e_st_eq_landau_n_5162_t3 (l_e_st_eq_landau_n_5162_y p) x (l_e_st_eq_landau_n_5162_t12 p x q) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_5162_y p) x).
-
-(* constant 3078 *)
-definition l_e_st_eq_landau_n_5162_t15 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.(l_e_st_eq_landau_n_5162_t3 x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_t13 p x q) : l_e_st_eq_landau_n_less x (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p))).
-
-(* constant 3079 *)
-definition l_e_st_eq_landau_n_5162_t16 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).(l_e_st_eq_landau_n_isless12 x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) i (l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_t1 (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_5162_t15 p x q) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))).
-
-(* constant 3080 *)
-definition l_e_st_eq_landau_n_5162_t17 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).(l_e_st_eq_landau_n_satz20f u (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_t16 p x q u i) : l_e_st_eq_landau_n_less u (l_e_st_eq_landau_n_5162_y p)).
-
-(* constant 3081 *)
-definition l_e_st_eq_landau_n_5162_t18 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t) j : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl u t) (l_e_st_eq_landau_n_5162_y p)).
-
-(* constant 3082 *)
-definition l_e_st_eq_landau_n_5162_t19 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ists12 x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u) x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u) i i) (l_e_st_eq_landau_n_5162_nun (l_e_st_eq_landau_n_5162_y p) u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_ts u u))).
-
-(* constant 3083 *)
-definition l_e_st_eq_landau_n_5162_t20 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t))) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_5162_t19 p x q u i t j)) (l_e_st_eq_landau_n_asspl1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t)))).
-
-(* constant 3084 *)
-definition l_e_st_eq_landau_n_5162_t21 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u) (l_e_st_eq_landau_n_ts u (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts u (l_e_st_eq_landau_n_pl u t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_comts (l_e_st_eq_landau_n_5162_y p) u) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t) u j) (l_e_st_eq_landau_n_disttp2 u u t) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts u t))).
-
-(* constant 3085 *)
-definition l_e_st_eq_landau_n_5162_t22 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts u t))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t))) (l_e_st_eq_landau_n_ists2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_5162_t21 p x q u i t j)) (l_e_st_eq_landau_n_disttp2 (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts u t)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)))).
-
-(* constant 3086 *)
-definition l_e_st_eq_landau_n_5162_t23 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t))) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_5162_t22 p x q u i t j)) (l_e_st_eq_landau_n_asspl2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)))).
-
-(* constant 3087 *)
-definition l_e_st_eq_landau_n_5162_t24 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t)))) (l_e_st_eq_landau_n_5162_t20 p x q u i t j) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_5162_t23 p x q u i t j)) (l_e_st_eq_landau_n_asspl1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t))))).
-
-(* constant 3088 *)
-definition l_e_st_eq_landau_n_5162_t25 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t))) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_pl u t) (l_e_st_eq_landau_n_pl u t)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_asspl2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t))) (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_compl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_5162_nun1 u t) (l_e_st_eq_landau_n_ists12 (l_e_st_eq_landau_n_pl u t) (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t) (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_t18 p x q u i t j) (l_e_st_eq_landau_n_5162_t18 p x q u i t j)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))).
-
-(* constant 3089 *)
-definition l_e_st_eq_landau_n_5162_t26 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_5162_t24 p x q u i t j) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_ts t t))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_5162_t25 p x q u i t j)) (l_e_st_eq_landau_n_compl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_asspl2 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)))).
-
-(* constant 3090 *)
-definition l_e_st_eq_landau_n_5162_t27 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_5162_t1 (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_5162_t11 p x q) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts x x)).
-
-(* constant 3091 *)
-definition l_e_st_eq_landau_n_5162_t28 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_5162_t26 p x q u i t j) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p)) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_y p))) (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_5162_t27 p x q u i t j)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)))).
-
-(* constant 3092 *)
-definition l_e_st_eq_landau_n_5162_t29 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_st_eq_landau_n_satz20e (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts x x) (l_e_st_eq_landau_n_5162_t28 p x q u i t j) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u))).
-
-(* constant 3093 *)
-definition l_e_st_eq_landau_n_5162_t30 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_tr4is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts u u)))) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_ts t t) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_num (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts u u))) (l_e_st_eq_landau_n_den (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_ndis12 (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts u u)) (l_e_symis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_5162_t29 p x q u i t j)) (l_e_st_eq_landau_n_satz28e (l_e_st_eq_landau_n_ts t t)) (l_e_st_eq_landau_n_12isnd (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts u u) (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts u u))).
-
-(* constant 3094 *)
-definition l_e_st_eq_landau_n_5162_t31 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_st_eq_landau_n_treq2 (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr t u) (l_e_st_eq_landau_n_fr t u)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_ts t t) (l_e_st_eq_landau_n_ts u u)) (l_e_st_eq_landau_n_tfeq12a t u t u) (l_e_st_eq_landau_n_5162_t30 p x q u i t j) : l_e_st_eq_landau_n_5162_prop1 u t).
-
-(* constant 3095 *)
-definition l_e_st_eq_landau_n_5162_t32 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_somei l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop1 u v) t (l_e_st_eq_landau_n_5162_t31 p x q u i t j) : l_e_st_eq_landau_n_5162_prop2 u).
-
-(* constant 3096 *)
-definition l_e_st_eq_landau_n_5162_t33 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_st_eq_landau_n_5162_t8 p u (l_e_st_eq_landau_n_5162_t32 p x q u i t j) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_5162_y p) u).
-
-(* constant 3097 *)
-definition l_e_st_eq_landau_n_5162_t34 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).λt:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_pl u t).(l_e_st_eq_landau_n_satz10g (l_e_st_eq_landau_n_5162_y p) u (l_e_st_eq_landau_n_satz12 u (l_e_st_eq_landau_n_5162_y p) (l_e_st_eq_landau_n_5162_t17 p x q u i)) (l_e_st_eq_landau_n_5162_t33 p x q u i t j) : l_con).
-
-(* constant 3098 *)
-definition l_e_st_eq_landau_n_5162_t35 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.λu:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_5162_y p) u).(l_someapp l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_5162_y p) u v) (l_e_st_eq_landau_n_5162_t17 p x q u i) l_con (λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_diffprop (l_e_st_eq_landau_n_5162_y p) u v.l_e_st_eq_landau_n_5162_t34 p x q u i v w) : l_con).
-
-(* constant 3099 *)
-definition l_e_st_eq_landau_n_5162_t36 ≝ λp:l_e_st_eq_landau_n_5162_prop3.λx:l_e_st_eq_landau_n_nat.λq:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) x.(l_someapp l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_diffprop x (l_e_st_eq_landau_n_5162_y p) v) (l_e_st_eq_landau_n_5162_t14 p x q) l_con (λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_diffprop x (l_e_st_eq_landau_n_5162_y p) v.l_e_st_eq_landau_n_5162_t35 p x q v w) : l_con).
-
-(* constant 3100 *)
-definition l_e_st_eq_landau_n_5162_t37 ≝ λp:l_e_st_eq_landau_n_5162_prop3.(l_someapp l_e_st_eq_landau_n_nat (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) v) (l_e_st_eq_landau_n_5162_t9 p) l_con (λv:l_e_st_eq_landau_n_nat.λw:l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_5162_y p) v.l_e_st_eq_landau_n_5162_t36 p v w) : l_con).
-
-(* constant 3101 *)
-definition l_e_st_eq_landau_n_rt_5162_t38 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)).λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_rt_ise (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_tf x x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_tict x0 x0 x x xix0 xix0) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1)) i : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf x x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1)).
-
-(* constant 3102 *)
-definition l_e_st_eq_landau_n_rt_5162_t39 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)).λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_refeq1 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) x (l_e_st_eq_landau_n_fris x) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) x).
-
-(* constant 3103 *)
-definition l_e_st_eq_landau_n_rt_5162_t40 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)).λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_eqtf12 (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) x (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) x (l_e_st_eq_landau_n_rt_5162_t39 x0 i x xix0) (l_e_st_eq_landau_n_rt_5162_t39 x0 i x xix0) : l_e_st_eq_landau_n_eq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x))) (l_e_st_eq_landau_n_tf x x)).
-
-(* constant 3104 *)
-definition l_e_st_eq_landau_n_rt_5162_t41 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)).λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_treq (l_e_st_eq_landau_n_tf (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x)) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_den x))) (l_e_st_eq_landau_n_tf x x) (l_e_st_eq_landau_n_fr (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_5162_t40 x0 i x xix0) (l_e_st_eq_landau_n_rt_5162_t38 x0 i x xix0) : l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_den x) (l_e_st_eq_landau_n_num x)).
-
-(* constant 3105 *)
-definition l_e_st_eq_landau_n_rt_5162_t42 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)).λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop1 (l_e_st_eq_landau_n_den x) t) (l_e_st_eq_landau_n_num x) (l_e_st_eq_landau_n_rt_5162_t41 x0 i x xix0) : l_e_st_eq_landau_n_5162_prop2 (l_e_st_eq_landau_n_den x)).
-
-(* constant 3106 *)
-definition l_e_st_eq_landau_n_rt_5162_t43 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)).λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_5162_prop2 t) (l_e_st_eq_landau_n_den x) (l_e_st_eq_landau_n_rt_5162_t42 x0 i x xix0) : l_e_st_eq_landau_n_5162_prop3).
-
-(* constant 3107 *)
-definition l_e_st_eq_landau_n_rt_5162_t44 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)).λx:l_e_st_eq_landau_n_frac.λxix0:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).(l_e_st_eq_landau_n_5162_t37 (l_e_st_eq_landau_n_rt_5162_t43 x0 i x xix0) : l_con).
-
-(* constant 3108 *)
-definition l_e_st_eq_landau_n_rt_5162_t45 ≝ λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts x0 x0) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)).(l_e_st_eq_landau_n_rt_ratapp1 x0 l_con (λx:l_e_st_eq_landau_n_frac.λt:l_e_st_eq_landau_n_rt_inf x (l_e_st_eq_landau_n_rt_class x0).l_e_st_eq_landau_n_rt_5162_t44 x0 i x t) : l_con).
-
-(* constant 3109 *)
-definition l_e_st_eq_landau_n_rt_rp_5162_ksi ≝ (l_e_ind l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_satz161 (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1))) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3110 *)
-definition l_e_st_eq_landau_n_rt_rp_5162_t46 ≝ (l_e_oneax l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_satz161 (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_5162_ksi l_e_st_eq_landau_n_rt_rp_5162_ksi) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1))).
-
-(* constant 3111 *)
-definition l_e_st_eq_landau_n_rt_rp_5162_x0 ≝ λr:l_e_st_eq_landau_n_rt_rp_ratrp l_e_st_eq_landau_n_rt_rp_5162_ksi.(l_e_st_eq_landau_n_rt_rp_rtofrp l_e_st_eq_landau_n_rt_rp_5162_ksi r : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 3112 *)
-definition l_e_st_eq_landau_n_rt_rp_5162_t47 ≝ λr:l_e_st_eq_landau_n_rt_rp_ratrp l_e_st_eq_landau_n_rt_rp_5162_ksi.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5162_x0 r) (l_e_st_eq_landau_n_rt_rp_5162_x0 r))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5162_x0 r)) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5162_x0 r))) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_5162_ksi l_e_st_eq_landau_n_rt_rp_5162_ksi) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_satz155c (l_e_st_eq_landau_n_rt_rp_5162_x0 r) (l_e_st_eq_landau_n_rt_rp_5162_x0 r)) (l_e_st_eq_landau_n_rt_rp_ists12 (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5162_x0 r)) l_e_st_eq_landau_n_rt_rp_5162_ksi (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_rp_5162_x0 r)) l_e_st_eq_landau_n_rt_rp_5162_ksi (l_e_st_eq_landau_n_rt_rp_isrprt2 l_e_st_eq_landau_n_rt_rp_5162_ksi r) (l_e_st_eq_landau_n_rt_rp_isrprt2 l_e_st_eq_landau_n_rt_rp_5162_ksi r)) l_e_st_eq_landau_n_rt_rp_5162_t46 : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5162_x0 r) (l_e_st_eq_landau_n_rt_rp_5162_x0 r))) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1))).
-
-(* constant 3113 *)
-definition l_e_st_eq_landau_n_rt_rp_5162_t48 ≝ λr:l_e_st_eq_landau_n_rt_rp_ratrp l_e_st_eq_landau_n_rt_rp_5162_ksi.(l_e_st_eq_landau_n_rt_rp_isrtirp (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5162_x0 r) (l_e_st_eq_landau_n_rt_rp_5162_x0 r)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_5162_t47 r) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_5162_x0 r) (l_e_st_eq_landau_n_rt_rp_5162_x0 r)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_suc l_e_st_eq_landau_n_1))).
-
-(* constant 3114 *)
-definition l_e_st_eq_landau_n_rt_rp_5162_t49 ≝ λr:l_e_st_eq_landau_n_rt_rp_ratrp l_e_st_eq_landau_n_rt_rp_5162_ksi.(l_e_st_eq_landau_n_rt_5162_t45 (l_e_st_eq_landau_n_rt_rp_5162_x0 r) (l_e_st_eq_landau_n_rt_rp_5162_t48 r) : l_con).
-
-(* constant 3115 *)
-definition l_e_st_eq_landau_n_rt_rp_satz162 ≝ (l_somei l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_irratrp a) l_e_st_eq_landau_n_rt_rp_5162_ksi (λt:l_e_st_eq_landau_n_rt_rp_ratrp l_e_st_eq_landau_n_rt_rp_5162_ksi.l_e_st_eq_landau_n_rt_rp_5162_t49 t) : l_e_st_eq_landau_n_rt_rp_some (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_irratrp a)).
-
-(* constant 3116 *)
-definition l_e_st_eq_landau_n_rt_rp_sqrt ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_ind l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) zeta) (l_e_st_eq_landau_n_rt_rp_satz161 zeta) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3117 *)
-definition l_e_st_eq_landau_n_rt_rp_thsqrt1 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.(l_e_oneax l_e_st_eq_landau_n_rt_cut (λa:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts a a) zeta) (l_e_st_eq_landau_n_rt_rp_satz161 zeta) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_sqrt zeta) (l_e_st_eq_landau_n_rt_rp_sqrt zeta)) zeta).
-
-(* constant 3118 *)
-definition l_e_st_eq_landau_n_rt_rp_thsqrt2 ≝ λzeta:l_e_st_eq_landau_n_rt_cut.λksi:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi ksi) zeta.(l_e_st_eq_landau_n_rt_rp_5161_t20 zeta ksi (l_e_st_eq_landau_n_rt_rp_sqrt zeta) i (l_e_st_eq_landau_n_rt_rp_thsqrt1 zeta) : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_sqrt zeta)).
-
-(* constant 3119 *)
-definition l_e_st_eq_landau_n_rt_rp_issqrt ≝ λksi:l_e_st_eq_landau_n_rt_cut.λeta:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is ksi eta.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_sqrt t) ksi eta i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_sqrt ksi) (l_e_st_eq_landau_n_rt_rp_sqrt eta)).
-
-(* constant 3120 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_x ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rp_ntofrp ksi nx : l_e_st_eq_landau_n_nat).
-
-(* constant 3121 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_y ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rp_ntofrp eta ny : l_e_st_eq_landau_n_nat).
-
-(* constant 3122 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t1 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rp_isrpnt1 ksi nx : l_e_st_eq_landau_n_rt_rp_is ksi (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny))).
-
-(* constant 3123 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t2 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rp_isrpnt1 eta ny : l_e_st_eq_landau_n_rt_rp_is eta (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny))).
-
-(* constant 3124 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t3 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rp_ispl12 ksi (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) eta (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t1 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t2 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi eta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)))).
-
-(* constant 3125 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_x0 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 3126 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_y0 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny) : l_e_st_eq_landau_n_rt_rat).
-
-(* constant 3127 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t4 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_natrti (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny)).
-
-(* constant 3128 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t5 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_natrti (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)).
-
-(* constant 3129 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t6 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_satz155a (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)))).
-
-(* constant 3130 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t7 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_satz112d (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t4 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t5 ksi nx eta ny) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny))).
-
-(* constant 3131 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_xpy ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t7 ksi nx eta ny) : l_e_st_eq_landau_n_nat).
-
-(* constant 3132 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t8 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_isrtn1 (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t7 ksi nx eta ny) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_iiia_xpy ksi nx eta ny))).
-
-(* constant 3133 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t9 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rp_isrterp (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_iiia_xpy ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t8 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xpy ksi nx eta ny))).
-
-(* constant 3134 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t10 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl ksi eta) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_pl (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xpy ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t3 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t6 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t9 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi eta) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xpy ksi nx eta ny))).
-
-(* constant 3135 *)
-definition l_e_st_eq_landau_n_rt_rp_natpl ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl ksi eta) (l_e_st_eq_landau_n_rt_rp_rpofnt t)) (l_e_st_eq_landau_n_rt_rp_iiia_xpy ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t10 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_pl ksi eta)).
-
-(* constant 3136 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t11 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rp_ists12 ksi (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) eta (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t1 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t2 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)))).
-
-(* constant 3137 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t12 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_satz155c (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)))).
-
-(* constant 3138 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t13 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_satz112f (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t4 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t5 ksi nx eta ny) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny))).
-
-(* constant 3139 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_xty ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t13 ksi nx eta ny) : l_e_st_eq_landau_n_nat).
-
-(* constant 3140 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t14 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_isrtn1 (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t13 ksi nx eta ny) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_iiia_xty ksi nx eta ny))).
-
-(* constant 3141 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t15 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_st_eq_landau_n_rt_rp_isrterp (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_iiia_xty ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t14 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xty ksi nx eta ny))).
-
-(* constant 3142 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t16 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_ts (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny))) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xty ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t11 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t12 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t15 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xty ksi nx eta ny))).
-
-(* constant 3143 *)
-definition l_e_st_eq_landau_n_rt_rp_natts ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts ksi eta) (l_e_st_eq_landau_n_rt_rp_rpofnt t)) (l_e_st_eq_landau_n_rt_rp_iiia_xty ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t16 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_ts ksi eta)).
-
-(* constant 3144 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t17 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_ismore12 ksi (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) eta (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_iiia_t1 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t2 ksi nx eta ny) m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny))).
-
-(* constant 3145 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t18 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_satz154d (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t17 ksi nx eta ny m) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny)).
-
-(* constant 3146 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t20 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_ismn12 ksi (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) eta (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)) m (l_e_st_eq_landau_n_rt_rp_satz154a (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m)) (l_e_st_eq_landau_n_rt_rp_iiia_t1 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t2 ksi nx eta ny) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_satz154a (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m)))).
-
-(* constant 3147 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t21 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m))) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_satz154a (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m))) (l_e_st_eq_landau_n_rt_rp_satz155b (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_satz154a (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m))) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m)))).
-
-(* constant 3148 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t22 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_satz112g (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t4 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t5 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m) : l_e_st_eq_landau_n_rt_natrt (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m))).
-
-(* constant 3149 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_xmy ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_nofrt (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m)) (l_e_st_eq_landau_n_rt_rp_iiia_t22 ksi nx eta ny m) : l_e_st_eq_landau_n_nat).
-
-(* constant 3150 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t23 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_isrtn1 (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m)) (l_e_st_eq_landau_n_rt_rp_iiia_t22 ksi nx eta ny m) : l_e_st_eq_landau_n_rt_is (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_iiia_xmy ksi nx eta ny m))).
-
-(* constant 3151 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t24 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_st_eq_landau_n_rt_rp_isrterp (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m)) (l_e_st_eq_landau_n_rt_rtofn (l_e_st_eq_landau_n_rt_rp_iiia_xmy ksi nx eta ny m)) (l_e_st_eq_landau_n_rt_rp_iiia_t23 ksi nx eta ny m) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m))) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xmy ksi nx eta ny m))).
-
-(* constant 3152 *)
-definition l_e_st_eq_landau_n_rt_rp_iiia_t25 ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_x ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_y ksi nx eta ny)) (l_e_st_eq_landau_n_rt_rp_satz154a (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m))) (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn (l_e_st_eq_landau_n_rt_rp_iiia_x0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_y0 ksi nx eta ny) (l_e_st_eq_landau_n_rt_rp_iiia_t18 ksi nx eta ny m))) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xmy ksi nx eta ny m)) (l_e_st_eq_landau_n_rt_rp_iiia_t20 ksi nx eta ny m) (l_e_st_eq_landau_n_rt_rp_iiia_t21 ksi nx eta ny m) (l_e_st_eq_landau_n_rt_rp_iiia_t24 ksi nx eta ny m) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_iiia_xmy ksi nx eta ny m))).
-
-(* constant 3153 *)
-definition l_e_st_eq_landau_n_rt_rp_natmn ≝ λksi:l_e_st_eq_landau_n_rt_cut.λnx:l_e_st_eq_landau_n_rt_rp_natrp ksi.λeta:l_e_st_eq_landau_n_rt_cut.λny:l_e_st_eq_landau_n_rt_rp_natrp eta.λm:l_e_st_eq_landau_n_rt_rp_more ksi eta.(l_somei l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_mn ksi eta m) (l_e_st_eq_landau_n_rt_rp_rpofnt t)) (l_e_st_eq_landau_n_rt_rp_iiia_xmy ksi nx eta ny m) (l_e_st_eq_landau_n_rt_rp_iiia_t25 ksi nx eta ny m) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_mn ksi eta m)).
-
-(* constant 3154 *)
-definition l_e_st_eq_landau_n_rt_rp_3pl13 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl q r)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl q r) p) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl r q) p) (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_pl q p)) (l_e_st_eq_landau_n_rt_rp_compl p (l_e_st_eq_landau_n_rt_rp_pl q r)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl q r) (l_e_st_eq_landau_n_rt_rp_pl r q) p (l_e_st_eq_landau_n_rt_rp_compl q r)) (l_e_st_eq_landau_n_rt_rp_asspl1 r q p) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl q r)) (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_pl q p))).
-
-(* constant 3155 *)
-definition l_e_st_eq_landau_n_rt_rp_4pl24 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p q) (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl q (l_e_st_eq_landau_n_rt_rp_pl r s))) (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl s (l_e_st_eq_landau_n_rt_rp_pl r q))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p s) (l_e_st_eq_landau_n_rt_rp_pl r q)) (l_e_st_eq_landau_n_rt_rp_asspl1 p q (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl q (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_pl s (l_e_st_eq_landau_n_rt_rp_pl r q)) p (l_e_st_eq_landau_n_rt_rp_3pl13 q r s)) (l_e_st_eq_landau_n_rt_rp_asspl2 p s (l_e_st_eq_landau_n_rt_rp_pl r q)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p q) (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p s) (l_e_st_eq_landau_n_rt_rp_pl r q))).
-
-(* constant 3156 *)
-definition l_e_st_eq_landau_n_rt_rp_3pl12 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl q r)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p q) r) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl q p) r) (l_e_st_eq_landau_n_rt_rp_pl q (l_e_st_eq_landau_n_rt_rp_pl p r)) (l_e_st_eq_landau_n_rt_rp_asspl2 p q r) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl p q) (l_e_st_eq_landau_n_rt_rp_pl q p) r (l_e_st_eq_landau_n_rt_rp_compl p q)) (l_e_st_eq_landau_n_rt_rp_asspl1 q p r) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl q r)) (l_e_st_eq_landau_n_rt_rp_pl q (l_e_st_eq_landau_n_rt_rp_pl p r))).
-
-(* constant 3157 *)
-definition l_e_st_eq_landau_n_rt_rp_4pl23 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p q) (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl q (l_e_st_eq_landau_n_rt_rp_pl r s))) (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_pl q s))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p r) (l_e_st_eq_landau_n_rt_rp_pl q s)) (l_e_st_eq_landau_n_rt_rp_asspl1 p q (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl q (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_pl q s)) p (l_e_st_eq_landau_n_rt_rp_3pl12 q r s)) (l_e_st_eq_landau_n_rt_rp_asspl2 p r (l_e_st_eq_landau_n_rt_rp_pl q s)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p q) (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p r) (l_e_st_eq_landau_n_rt_rp_pl q s))).
-
-(* constant 3158 *)
-definition l_e_st_eq_landau_n_rt_rp_3pl23 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p q) r) (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl q r)) (l_e_st_eq_landau_n_rt_rp_pl p (l_e_st_eq_landau_n_rt_rp_pl r q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p r) q) (l_e_st_eq_landau_n_rt_rp_asspl1 p q r) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl q r) (l_e_st_eq_landau_n_rt_rp_pl r q) p (l_e_st_eq_landau_n_rt_rp_compl q r)) (l_e_st_eq_landau_n_rt_rp_asspl2 p r q) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p q) r) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl p r) q)).
-
-(* constant 3159 *)
-definition l_e_st_eq_landau_n_rt_rp_a2isapa ≝ λp:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts p l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl p p) (l_e_st_eq_landau_n_rt_rp_disttp2 p l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts p l_e_st_eq_landau_n_rt_rp_1rp) p (l_e_st_eq_landau_n_rt_rp_ts p l_e_st_eq_landau_n_rt_rp_1rp) p (l_e_st_eq_landau_n_rt_rp_satz151 p) (l_e_st_eq_landau_n_rt_rp_satz151 p)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl p p)).
-
-(* constant 3160 *)
-definition l_e_st_eq_landau_n_rt_rp_dif ≝ (l_e_st_eq_landau_n_pair1type l_e_st_eq_landau_n_rt_cut : Type[0]).
-
-(* constant 3161 *)
-definition l_e_st_eq_landau_n_rt_rp_df ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_pair1 l_e_st_eq_landau_n_rt_cut a1 a2 : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3162 *)
-definition l_e_st_eq_landau_n_rt_rp_stm ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_first1 l_e_st_eq_landau_n_rt_cut a : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3163 *)
-definition l_e_st_eq_landau_n_rt_rp_std ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_second1 l_e_st_eq_landau_n_rt_cut a : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3164 *)
-definition l_e_st_eq_landau_n_rt_rp_stmis ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_first1is1 l_e_st_eq_landau_n_rt_cut a1 a2 : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a1).
-
-(* constant 3165 *)
-definition l_e_st_eq_landau_n_rt_rp_isstm ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_first1is2 l_e_st_eq_landau_n_rt_cut a1 a2 : l_e_st_eq_landau_n_rt_rp_is a1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2))).
-
-(* constant 3166 *)
-definition l_e_st_eq_landau_n_rt_rp_stdis ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_second1is1 l_e_st_eq_landau_n_rt_cut a1 a2 : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2).
-
-(* constant 3167 *)
-definition l_e_st_eq_landau_n_rt_rp_isstd ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_second1is2 l_e_st_eq_landau_n_rt_cut a1 a2 : l_e_st_eq_landau_n_rt_rp_is a2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))).
-
-(* constant 3168 *)
-definition l_e_st_eq_landau_n_rt_rp_1a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_stm a : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3169 *)
-definition l_e_st_eq_landau_n_rt_rp_2a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_std a : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3170 *)
-definition l_e_st_eq_landau_n_rt_rp_dfis ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_pair1is1 l_e_st_eq_landau_n_rt_cut a : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) a).
-
-(* constant 3171 *)
-definition l_e_st_eq_landau_n_rt_rp_isdf ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_pair1is2 l_e_st_eq_landau_n_rt_cut a : l_e_is l_e_st_eq_landau_n_rt_rp_dif a (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3172 *)
-definition l_e_st_eq_landau_n_rt_rp_12issmsd ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ispl12 a1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) b2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_isstm a1 a2) (l_e_st_eq_landau_n_rt_rp_isstd b1 b2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2)))).
-
-(* constant 3173 *)
-definition l_e_st_eq_landau_n_rt_rp_smsdis12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_12issmsd a1 a2 b1 b2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_pl a1 b2)).
-
-(* constant 3174 *)
-definition l_e_st_eq_landau_n_rt_rp_1sdissmsd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ispl1 r1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_isstm r1 r2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3175 *)
-definition l_e_st_eq_landau_n_rt_rp_smsdis1sd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_1sdissmsd a r1 r2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3176 *)
-definition l_e_st_eq_landau_n_rt_rp_sm2issmsd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ispl2 r2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_isstd r1 r2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2)))).
-
-(* constant 3177 *)
-definition l_e_st_eq_landau_n_rt_rp_smsdissm2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2))) (l_e_st_eq_landau_n_rt_rp_sm2issmsd a r1 r2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2)).
-
-(* constant 3178 *)
-definition l_e_st_eq_landau_n_rt_rp_issm ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is a1 r.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_rp_dif (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_df t a2) a1 r i : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df r a2)).
-
-(* constant 3179 *)
-definition l_e_st_eq_landau_n_rt_rp_issd ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is a2 r.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_rp_dif (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_df a1 t) a2 r i : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df a1 r)).
-
-(* constant 3180 *)
-definition l_e_st_eq_landau_n_rt_rp_issmsd ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is a1 b1.λj:l_e_st_eq_landau_n_rt_rp_is a2 b2.(l_e_tris l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2) (l_e_st_eq_landau_n_rt_rp_issm a1 a2 b1 i) (l_e_st_eq_landau_n_rt_rp_issd b1 a2 b2 j) : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)).
-
-(* constant 3181 *)
-definition l_e_st_eq_landau_n_rt_rp_1b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_stm b : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3182 *)
-definition l_e_st_eq_landau_n_rt_rp_2b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_std b : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3183 *)
-definition l_e_st_eq_landau_n_rt_rp_eq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : Prop).
-
-(* constant 3184 *)
-definition l_e_st_eq_landau_n_rt_rp_eqi12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl b1 a2).(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl b1 a2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_smsdis12 a1 a2 b1 b2) i (l_e_st_eq_landau_n_rt_rp_12issmsd b1 b2 a1 a2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)).
-
-(* constant 3185 *)
-definition l_e_st_eq_landau_n_rt_rp_eqi1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)).(l_e_isp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq x (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) a (l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) r1 r2 i) (l_e_st_eq_landau_n_rt_rp_dfis a) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_df r1 r2)).
-
-(* constant 3186 *)
-definition l_e_st_eq_landau_n_rt_rp_eqi2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2).(l_e_isp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df r1 r2) x) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) a (l_e_st_eq_landau_n_rt_rp_eqi12 r1 r2 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) i) (l_e_st_eq_landau_n_rt_rp_dfis a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df r1 r2) a).
-
-(* constant 3187 *)
-definition l_e_st_eq_landau_n_rt_rp_eqe12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2).(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_pl b1 a2) (l_e_st_eq_landau_n_rt_rp_12issmsd a1 a2 b1 b2) e (l_e_st_eq_landau_n_rt_rp_smsdis12 b1 b2 a1 a2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl b1 a2)).
-
-(* constant 3188 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd163 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_e_st_eq_landau_n_rt_rp_eq a a).
-
-(* constant 3189 *)
-definition l_e_st_eq_landau_n_rt_rp_refeq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satzd163 a : l_e_st_eq_landau_n_rt_rp_eq a a).
-
-(* constant 3190 *)
-definition l_e_st_eq_landau_n_rt_rp_refeq1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_is l_e_st_eq_landau_n_rt_rp_dif a b.(l_e_isp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq a x) a b (l_e_st_eq_landau_n_rt_rp_refeq a) i : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3191 *)
-definition l_e_st_eq_landau_n_rt_rp_refeq2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_is l_e_st_eq_landau_n_rt_rp_dif a b.(l_e_isp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq x a) a b (l_e_st_eq_landau_n_rt_rp_refeq a) i : l_e_st_eq_landau_n_rt_rp_eq b a).
-
-(* constant 3192 *)
-definition l_e_st_eq_landau_n_rt_rp_eqsmsd ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is a1 b1.λj:l_e_st_eq_landau_n_rt_rp_is a2 b2.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2) (l_e_st_eq_landau_n_rt_rp_issmsd a1 a2 b1 b2 i j) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)).
-
-(* constant 3193 *)
-definition l_e_st_eq_landau_n_rt_rp_eqsm ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is a1 r.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df r a2) (l_e_st_eq_landau_n_rt_rp_issm a1 a2 r i) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df r a2)).
-
-(* constant 3194 *)
-definition l_e_st_eq_landau_n_rt_rp_eqsd ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is a2 r.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df a1 r) (l_e_st_eq_landau_n_rt_rp_issd a1 a2 r i) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df a1 r)).
-
-(* constant 3195 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd164 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) e : l_e_st_eq_landau_n_rt_rp_eq b a).
-
-(* constant 3196 *)
-definition l_e_st_eq_landau_n_rt_rp_symeq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_satzd164 a b e : l_e_st_eq_landau_n_rt_rp_eq b a).
-
-(* constant 3197 *)
-definition l_e_st_eq_landau_n_rt_rp_1c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_stm c : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3198 *)
-definition l_e_st_eq_landau_n_rt_rp_2c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_std c : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3199 *)
-definition l_e_st_eq_landau_n_rt_rp_1d165_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq b c.(l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b)) e f : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b)))).
-
-(* constant 3200 *)
-definition l_e_st_eq_landau_n_rt_rp_1d165_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq b c.(l_e_tr4is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_1d165_t1 a b c e f) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)))).
-
-(* constant 3201 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd165 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq b c.(l_e_st_eq_landau_n_rt_rp_satz136b (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_1d165_t2 a b c e f) : l_e_st_eq_landau_n_rt_rp_eq a c).
-
-(* constant 3202 *)
-definition l_e_st_eq_landau_n_rt_rp_treq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq b c.(l_e_st_eq_landau_n_rt_rp_satzd165 a b c e f : l_e_st_eq_landau_n_rt_rp_eq a c).
-
-(* constant 3203 *)
-definition l_e_st_eq_landau_n_rt_rp_treq1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq c a.λf:l_e_st_eq_landau_n_rt_rp_eq c b.(l_e_st_eq_landau_n_rt_rp_treq a c b (l_e_st_eq_landau_n_rt_rp_symeq c a e) f : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3204 *)
-definition l_e_st_eq_landau_n_rt_rp_treq2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a c.λf:l_e_st_eq_landau_n_rt_rp_eq b c.(l_e_st_eq_landau_n_rt_rp_treq a c b e (l_e_st_eq_landau_n_rt_rp_symeq b c f) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3205 *)
-definition l_e_st_eq_landau_n_rt_rp_tr3eq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe1:l_e_st_eq_landau_n_rt_rp_eq a b.λe2:l_e_st_eq_landau_n_rt_rp_eq b c.λe3:l_e_st_eq_landau_n_rt_rp_eq c d.(l_e_st_eq_landau_n_rt_rp_treq a b d e1 (l_e_st_eq_landau_n_rt_rp_treq b c d e2 e3) : l_e_st_eq_landau_n_rt_rp_eq a d).
-
-(* constant 3206 *)
-definition l_e_st_eq_landau_n_rt_rp_tr4eq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_dif.λe1:l_e_st_eq_landau_n_rt_rp_eq a b.λe2:l_e_st_eq_landau_n_rt_rp_eq b c.λe3:l_e_st_eq_landau_n_rt_rp_eq c d.λe4:l_e_st_eq_landau_n_rt_rp_eq d e.(l_e_st_eq_landau_n_rt_rp_tr3eq a b c e e1 e2 (l_e_st_eq_landau_n_rt_rp_treq c d e e3 e4) : l_e_st_eq_landau_n_rt_rp_eq a e).
-
-(* constant 3207 *)
-definition l_e_st_eq_landau_n_rt_rp_posd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) : Prop).
-
-(* constant 3208 *)
-definition l_e_st_eq_landau_n_rt_rp_zero ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) : Prop).
-
-(* constant 3209 *)
-definition l_e_st_eq_landau_n_rt_rp_negd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) : Prop).
-
-(* constant 3210 *)
-definition l_e_st_eq_landau_n_rt_rp_posdi ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more a1 a2.(l_e_st_eq_landau_n_rt_rp_ismore12 a1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_isstm a1 a2) (l_e_st_eq_landau_n_rt_rp_isstd a1 a2) m : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_df a1 a2)).
-
-(* constant 3211 *)
-definition l_e_st_eq_landau_n_rt_rp_zeroi ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is a1 a2.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a1 a2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stmis a1 a2) i (l_e_st_eq_landau_n_rt_rp_isstd a1 a2) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_df a1 a2)).
-
-(* constant 3212 *)
-definition l_e_st_eq_landau_n_rt_rp_negdi ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less a1 a2.(l_e_st_eq_landau_n_rt_rp_isless12 a1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_isstm a1 a2) (l_e_st_eq_landau_n_rt_rp_isstd a1 a2) l : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_df a1 a2)).
-
-(* constant 3213 *)
-definition l_e_st_eq_landau_n_rt_rp_axrde ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) : l_ec3 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a)).
-
-(* constant 3214 *)
-definition l_e_st_eq_landau_n_rt_rp_axrdo ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satz123a (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) : l_or3 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a)).
-
-(* constant 3215 *)
-definition l_e_st_eq_landau_n_rt_rp_axrd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_orec3i (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_axrdo a) (l_e_st_eq_landau_n_rt_rp_axrde a) : l_orec3 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a)).
-
-(* constant 3216 *)
-definition l_e_st_eq_landau_n_rt_rp_rappd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:Prop.λp1:∀t:l_e_st_eq_landau_n_rt_rp_posd a.p.λp2:∀t:l_e_st_eq_landau_n_rt_rp_zero a.p.λp3:∀t:l_e_st_eq_landau_n_rt_rp_negd a.p.(l_or3app (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) p (l_e_st_eq_landau_n_rt_rp_axrdo a) p2 p1 p3 : p).
-
-(* constant 3217 *)
-definition l_e_st_eq_landau_n_rt_rp_pnot0d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_ec3e21 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_axrde a) p : l_not (l_e_st_eq_landau_n_rt_rp_zero a)).
-
-(* constant 3218 *)
-definition l_e_st_eq_landau_n_rt_rp_pnotnd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_ec3e23 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_axrde a) p : l_not (l_e_st_eq_landau_n_rt_rp_negd a)).
-
-(* constant 3219 *)
-definition l_e_st_eq_landau_n_rt_rp_0notpd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_ec3e12 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_axrde a) z : l_not (l_e_st_eq_landau_n_rt_rp_posd a)).
-
-(* constant 3220 *)
-definition l_e_st_eq_landau_n_rt_rp_0notnd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_ec3e13 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_axrde a) z : l_not (l_e_st_eq_landau_n_rt_rp_negd a)).
-
-(* constant 3221 *)
-definition l_e_st_eq_landau_n_rt_rp_nnotpd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_ec3e32 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_axrde a) n : l_not (l_e_st_eq_landau_n_rt_rp_posd a)).
-
-(* constant 3222 *)
-definition l_e_st_eq_landau_n_rt_rp_nnot0d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_ec3e31 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_axrde a) n : l_not (l_e_st_eq_landau_n_rt_rp_zero a)).
-
-(* constant 3223 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) e (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_satz135a (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) p) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3224 *)
-definition l_e_st_eq_landau_n_rt_rp_eqposd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_satz136a (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv1d_t1 a b e p) : l_e_st_eq_landau_n_rt_rp_posd b).
-
-(* constant 3225 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_symeq a b e) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) z) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3226 *)
-definition l_e_st_eq_landau_n_rt_rp_eqzero ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_satz136b (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv1d_t2 a b e z) : l_e_st_eq_landau_n_rt_rp_zero b).
-
-(* constant 3227 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) e (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_satz135c (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) n) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3228 *)
-definition l_e_st_eq_landau_n_rt_rp_eqnegd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_satz136c (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv1d_t3 a b e n) : l_e_st_eq_landau_n_rt_rp_negd b).
-
-(* constant 3229 *)
-definition l_e_st_eq_landau_n_rt_rp_zeroeq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.λy:l_e_st_eq_landau_n_rt_rp_zero b.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b) z (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) y)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3230 *)
-definition l_e_st_eq_landau_n_rt_rp_pdofrp ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3231 *)
-definition l_e_st_eq_landau_n_rt_rp_ndofrp ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3232 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpepd ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is r s.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s) (l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_pdofrp x) r s i) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)).
-
-(* constant 3233 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpend ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is r s.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_ndofrp s) (l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ndofrp x) r s i) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_ndofrp s)).
-
-(* constant 3234 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t4 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s).(l_e_st_eq_landau_n_rt_rp_satz136b (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_eqe12 (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp e) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp)).
-
-(* constant 3235 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpipd ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s).(l_e_st_eq_landau_n_rt_rp_satz136b r s l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_iv1d_t4 r s e) : l_e_st_eq_landau_n_rt_rp_is r s).
-
-(* constant 3236 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t5 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_ndofrp s).(l_e_st_eq_landau_n_rt_rp_satz136e (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_eqe12 l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) e) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp)).
-
-(* constant 3237 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpind ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_ndofrp s).(l_e_symis l_e_st_eq_landau_n_rt_cut s r (l_e_st_eq_landau_n_rt_rp_satz136b s r l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_iv1d_t5 r s e)) : l_e_st_eq_landau_n_rt_rp_is r s).
-
-(* constant 3238 *)
-definition l_e_st_eq_landau_n_rt_rp_posdirp ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_posdi (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_ismore1 (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp r) (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_compl l_e_st_eq_landau_n_rt_rp_1rp r) (l_e_st_eq_landau_n_rt_rp_satz133 l_e_st_eq_landau_n_rt_rp_1rp r)) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3239 *)
-definition l_e_st_eq_landau_n_rt_rp_negdirp ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_negdi l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp r) (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_compl l_e_st_eq_landau_n_rt_rp_1rp r) (l_e_st_eq_landau_n_rt_rp_satz133a l_e_st_eq_landau_n_rt_rp_1rp r)) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_ndofrp r)).
-
-(* constant 3240 *)
-definition l_e_st_eq_landau_n_rt_rp_rpofpd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) p : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3241 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_tr4is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofpd a p) (l_e_st_eq_landau_n_rt_rp_2a a)) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofpd a p) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofpd a p) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofpd a p) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofpd a p) (l_e_st_eq_landau_n_rt_rp_2a a)) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_satz140f (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) p)) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_rpofpd a p) (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_rpofpd a p) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_asspl2 (l_e_st_eq_landau_n_rt_rp_rpofpd a p) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_2a a)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofpd a p) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3242 *)
-definition l_e_st_eq_landau_n_rt_rp_eqpdrp1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_eqi1 a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofpd a p) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_iv1d_t6 a p) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd a p))).
-
-(* constant 3243 *)
-definition l_e_st_eq_landau_n_rt_rp_eqpdrp2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_symeq a (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd a p)) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 a p) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd a p)) a).
-
-(* constant 3244 *)
-definition l_e_st_eq_landau_n_rt_rp_rpofnd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) n) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3245 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnd a n) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_rpofnd a n)) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_asspl2 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_rpofnd a n) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_rpofnd a n)) (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_satz140c (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) n))) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnd a n) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3246 *)
-definition l_e_st_eq_landau_n_rt_rp_eqndrp1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_eqi1 a l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnd a n) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_iv1d_t7 a n) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd a n))).
-
-(* constant 3247 *)
-definition l_e_st_eq_landau_n_rt_rp_eqndrp2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_symeq a (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd a n)) (l_e_st_eq_landau_n_rt_rp_eqndrp1 a n) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd a n)) a).
-
-(* constant 3248 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t8 ≝ λh:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd h.λk:l_e_st_eq_landau_n_rt_rp_dif.λq:l_e_st_eq_landau_n_rt_rp_posd k.λe:l_e_st_eq_landau_n_rt_rp_eq h k.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd h p)) h k (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd k q)) (l_e_st_eq_landau_n_rt_rp_eqpdrp2 h p) e (l_e_st_eq_landau_n_rt_rp_eqpdrp1 k q) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd h p)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd k q))).
-
-(* constant 3249 *)
-definition l_e_st_eq_landau_n_rt_rp_eqpderp ≝ λh:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd h.λk:l_e_st_eq_landau_n_rt_rp_dif.λq:l_e_st_eq_landau_n_rt_rp_posd k.λe:l_e_st_eq_landau_n_rt_rp_eq h k.(l_e_st_eq_landau_n_rt_rp_isrpipd (l_e_st_eq_landau_n_rt_rp_rpofpd h p) (l_e_st_eq_landau_n_rt_rp_rpofpd k q) (l_e_st_eq_landau_n_rt_rp_iv1d_t8 h p k q e) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofpd h p) (l_e_st_eq_landau_n_rt_rp_rpofpd k q)).
-
-(* constant 3250 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t9 ≝ λh:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd h.λk:l_e_st_eq_landau_n_rt_rp_dif.λq:l_e_st_eq_landau_n_rt_rp_posd k.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofpd h p) (l_e_st_eq_landau_n_rt_rp_rpofpd k q).(l_e_st_eq_landau_n_rt_rp_isrpepd (l_e_st_eq_landau_n_rt_rp_rpofpd h p) (l_e_st_eq_landau_n_rt_rp_rpofpd k q) i : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd h p)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd k q))).
-
-(* constant 3251 *)
-definition l_e_st_eq_landau_n_rt_rp_eqpdirp ≝ λh:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd h.λk:l_e_st_eq_landau_n_rt_rp_dif.λq:l_e_st_eq_landau_n_rt_rp_posd k.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofpd h p) (l_e_st_eq_landau_n_rt_rp_rpofpd k q).(l_e_st_eq_landau_n_rt_rp_tr3eq h (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd h p)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd k q)) k (l_e_st_eq_landau_n_rt_rp_eqpdrp1 h p) (l_e_st_eq_landau_n_rt_rp_iv1d_t9 h p k q i) (l_e_st_eq_landau_n_rt_rp_eqpdrp2 k q) : l_e_st_eq_landau_n_rt_rp_eq h k).
-
-(* constant 3252 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t10 ≝ λh:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd h.λk:l_e_st_eq_landau_n_rt_rp_dif.λo:l_e_st_eq_landau_n_rt_rp_negd k.λe:l_e_st_eq_landau_n_rt_rp_eq h k.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd h n)) h k (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd k o)) (l_e_st_eq_landau_n_rt_rp_eqndrp2 h n) e (l_e_st_eq_landau_n_rt_rp_eqndrp1 k o) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd h n)) (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd k o))).
-
-(* constant 3253 *)
-definition l_e_st_eq_landau_n_rt_rp_eqnderp ≝ λh:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd h.λk:l_e_st_eq_landau_n_rt_rp_dif.λo:l_e_st_eq_landau_n_rt_rp_negd k.λe:l_e_st_eq_landau_n_rt_rp_eq h k.(l_e_st_eq_landau_n_rt_rp_isrpind (l_e_st_eq_landau_n_rt_rp_rpofnd h n) (l_e_st_eq_landau_n_rt_rp_rpofnd k o) (l_e_st_eq_landau_n_rt_rp_iv1d_t10 h n k o e) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnd h n) (l_e_st_eq_landau_n_rt_rp_rpofnd k o)).
-
-(* constant 3254 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t11 ≝ λh:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd h.λk:l_e_st_eq_landau_n_rt_rp_dif.λo:l_e_st_eq_landau_n_rt_rp_negd k.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnd h n) (l_e_st_eq_landau_n_rt_rp_rpofnd k o).(l_e_st_eq_landau_n_rt_rp_isrpend (l_e_st_eq_landau_n_rt_rp_rpofnd h n) (l_e_st_eq_landau_n_rt_rp_rpofnd k o) i : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd h n)) (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd k o))).
-
-(* constant 3255 *)
-definition l_e_st_eq_landau_n_rt_rp_eqndirp ≝ λh:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd h.λk:l_e_st_eq_landau_n_rt_rp_dif.λo:l_e_st_eq_landau_n_rt_rp_negd k.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnd h n) (l_e_st_eq_landau_n_rt_rp_rpofnd k o).(l_e_st_eq_landau_n_rt_rp_tr3eq h (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd h n)) (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd k o)) k (l_e_st_eq_landau_n_rt_rp_eqndrp1 h n) (l_e_st_eq_landau_n_rt_rp_iv1d_t11 h n k o i) (l_e_st_eq_landau_n_rt_rp_eqndrp2 k o) : l_e_st_eq_landau_n_rt_rp_eq h k).
-
-(* constant 3256 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t12 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_eqpdrp1 (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_posdirp r) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_posdirp r)))).
-
-(* constant 3257 *)
-definition l_e_st_eq_landau_n_rt_rp_isrppd1 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isrpipd r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_posdirp r)) (l_e_st_eq_landau_n_rt_rp_iv1d_t12 r) : l_e_st_eq_landau_n_rt_rp_is r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_posdirp r))).
-
-(* constant 3258 *)
-definition l_e_st_eq_landau_n_rt_rp_isrppd2 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_posdirp r)) (l_e_st_eq_landau_n_rt_rp_isrppd1 r) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_posdirp r)) r).
-
-(* constant 3259 *)
-definition l_e_st_eq_landau_n_rt_rp_iv1d_t13 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_eqndrp1 (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_negdirp r) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_rpofnd (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_negdirp r)))).
-
-(* constant 3260 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpnd1 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_isrpind r (l_e_st_eq_landau_n_rt_rp_rpofnd (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_negdirp r)) (l_e_st_eq_landau_n_rt_rp_iv1d_t13 r) : l_e_st_eq_landau_n_rt_rp_is r (l_e_st_eq_landau_n_rt_rp_rpofnd (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_negdirp r))).
-
-(* constant 3261 *)
-definition l_e_st_eq_landau_n_rt_rp_isrpnd2 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut r (l_e_st_eq_landau_n_rt_rp_rpofnd (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_negdirp r)) (l_e_st_eq_landau_n_rt_rp_isrpnd1 r) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnd (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_negdirp r)) r).
-
-(* constant 3262 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad1 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_eqi12 a1 a2 (l_e_st_eq_landau_n_rt_rp_pl a1 r) (l_e_st_eq_landau_n_rt_rp_pl a2 r) (l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl a1 (l_e_st_eq_landau_n_rt_rp_pl a2 r)) (l_e_st_eq_landau_n_rt_rp_pl a1 (l_e_st_eq_landau_n_rt_rp_pl r a2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl a1 r) a2) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl a2 r) (l_e_st_eq_landau_n_rt_rp_pl r a2) a1 (l_e_st_eq_landau_n_rt_rp_compl a2 r)) (l_e_st_eq_landau_n_rt_rp_asspl2 a1 r a2)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 r) (l_e_st_eq_landau_n_rt_rp_pl a2 r))).
-
-(* constant 3263 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad2 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 r) (l_e_st_eq_landau_n_rt_rp_pl a2 r)) (l_e_st_eq_landau_n_rt_rp_lemmad1 a1 a2 r) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 r) (l_e_st_eq_landau_n_rt_rp_pl a2 r)) (l_e_st_eq_landau_n_rt_rp_df a1 a2)).
-
-(* constant 3264 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_treq a (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r)) (l_e_st_eq_landau_n_rt_rp_refeq1 a (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_isdf a)) (l_e_st_eq_landau_n_rt_rp_lemmad1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) r) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r))).
-
-(* constant 3265 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_symeq a (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r)) (l_e_st_eq_landau_n_rt_rp_lemmad3 a r) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r)) a).
-
-(* constant 3266 *)
-definition l_e_st_eq_landau_n_rt_rp_absd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_ite (l_e_st_eq_landau_n_rt_rp_negd a) l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) a : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3267 *)
-definition l_e_st_eq_landau_n_rt_rp_absnd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_itet (l_e_st_eq_landau_n_rt_rp_negd a) l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) a n) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))).
-
-(* constant 3268 *)
-definition l_e_st_eq_landau_n_rt_rp_absnnd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_itef (l_e_st_eq_landau_n_rt_rp_negd a) l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) a n) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) a).
-
-(* constant 3269 *)
-definition l_e_st_eq_landau_n_rt_rp_absdeql ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less a1 a2.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_df a2 a1) (l_e_st_eq_landau_n_rt_rp_absnd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_negdi a1 a2 l)) (l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2 a1 (l_e_st_eq_landau_n_rt_rp_stdis a1 a2) (l_e_st_eq_landau_n_rt_rp_stmis a1 a2)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_df a2 a1)).
-
-(* constant 3270 *)
-definition l_e_st_eq_landau_n_rt_rp_absdeqm ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_moreis a1 a2.(l_e_st_eq_landau_n_rt_rp_absnnd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_less a1 a2) (l_e_st_eq_landau_n_rt_rp_satz123c a1 a2 m) (λt:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_df a1 a2).l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a1 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2 (l_e_st_eq_landau_n_rt_rp_stmis a1 a2) (l_e_st_eq_landau_n_rt_rp_stdis a1 a2) t)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_df a1 a2)).
-
-(* constant 3271 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_symeq a b e) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a))).
-
-(* constant 3272 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_absnd a n) (l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_iv2d_t1 a b e n)) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_absnd b (l_e_st_eq_landau_n_rt_rp_eqnegd a b e n))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).
-
-(* constant 3273 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_absd a) a b (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_absnnd a n) e (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd b) b (l_e_st_eq_landau_n_rt_rp_absnnd b (l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_negd a) n (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_eqnegd b a (l_e_st_eq_landau_n_rt_rp_symeq a b e) t)))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).
-
-(* constant 3274 *)
-definition l_e_st_eq_landau_n_rt_rp_eqabsd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_iv2d_t2 a b e t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_negd a).l_e_st_eq_landau_n_rt_rp_iv2d_t3 a b e t) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).
-
-(* constant 3275 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd166a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_eqposd a (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a p))) p : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3276 *)
-definition l_e_st_eq_landau_n_rt_rp_2d166_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_posdi (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) n) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))).
-
-(* constant 3277 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd166b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_absnd a n)) (l_e_st_eq_landau_n_rt_rp_2d166_t1 a n) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3278 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd166c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b).(l_e_st_eq_landau_n_rt_rp_tr3eq a (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b) b (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a p))) e (l_e_st_eq_landau_n_rt_rp_absnnd b (l_e_st_eq_landau_n_rt_rp_pnotnd b q)) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3279 *)
-definition l_e_st_eq_landau_n_rt_rp_2d166_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λo:l_e_st_eq_landau_n_rt_rp_negd b.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b).(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_absnd a n)) e (l_e_st_eq_landau_n_rt_rp_absnd b o) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b))).
-
-(* constant 3280 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd166d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λo:l_e_st_eq_landau_n_rt_rp_negd b.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b).(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_eqe12 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d166_t2 a b n o e))) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3281 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd166e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_e_st_eq_landau_n_rt_rp_rappd a (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a)) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_satzd166a a t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a)) n) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_satzd166b a t) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3282 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd166f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_eqzero a (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_0notnd a z))) z : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3283 *)
-definition l_e_st_eq_landau_n_rt_rp_mored ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : Prop).
-
-(* constant 3284 *)
-definition l_e_st_eq_landau_n_rt_rp_moredi12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl b1 a2).(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_pl b1 a2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_12issmsd a1 a2 b1 b2) (l_e_st_eq_landau_n_rt_rp_12issmsd b1 b2 a1 a2) m : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)).
-
-(* constant 3285 *)
-definition l_e_st_eq_landau_n_rt_rp_moredi1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)).(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2))) (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_sm2issmsd a r1 r2) (l_e_st_eq_landau_n_rt_rp_1sdissmsd a r1 r2) m : l_e_st_eq_landau_n_rt_rp_mored a (l_e_st_eq_landau_n_rt_rp_df r1 r2)).
-
-(* constant 3286 *)
-definition l_e_st_eq_landau_n_rt_rp_moredi2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2).(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2))) (l_e_st_eq_landau_n_rt_rp_1sdissmsd a r1 r2) (l_e_st_eq_landau_n_rt_rp_sm2issmsd a r1 r2) m : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_df r1 r2) a).
-
-(* constant 3287 *)
-definition l_e_st_eq_landau_n_rt_rp_morede12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2).(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_pl b1 a2) (l_e_st_eq_landau_n_rt_rp_smsdis12 a1 a2 b1 b2) (l_e_st_eq_landau_n_rt_rp_smsdis12 b1 b2 a1 a2) m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl b1 a2)).
-
-(* constant 3288 *)
-definition l_e_st_eq_landau_n_rt_rp_lessd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : Prop).
-
-(* constant 3289 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) m : l_e_st_eq_landau_n_rt_rp_lessd b a).
-
-(* constant 3290 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) l : l_e_st_eq_landau_n_rt_rp_mored b a).
-
-(* constant 3291 *)
-definition l_e_st_eq_landau_n_rt_rp_lessdi12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl b1 a2).(l_e_st_eq_landau_n_rt_rp_lemmad5 (l_e_st_eq_landau_n_rt_rp_df b1 b2) (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_moredi12 b1 b2 a1 a2 (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl b1 a2) l)) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)).
-
-(* constant 3292 *)
-definition l_e_st_eq_landau_n_rt_rp_lessdi1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)).(l_e_st_eq_landau_n_rt_rp_lemmad5 (l_e_st_eq_landau_n_rt_rp_df r1 r2) a (l_e_st_eq_landau_n_rt_rp_moredi2 a r1 r2 (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) l)) : l_e_st_eq_landau_n_rt_rp_lessd a (l_e_st_eq_landau_n_rt_rp_df r1 r2)).
-
-(* constant 3293 *)
-definition l_e_st_eq_landau_n_rt_rp_lessdi2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2).(l_e_st_eq_landau_n_rt_rp_lemmad5 a (l_e_st_eq_landau_n_rt_rp_df r1 r2) (l_e_st_eq_landau_n_rt_rp_moredi1 a r1 r2 (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) l)) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_df r1 r2) a).
-
-(* constant 3294 *)
-definition l_e_st_eq_landau_n_rt_rp_lessde12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2).(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_pl b1 a2) (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_morede12 b1 b2 a1 a2 (l_e_st_eq_landau_n_rt_rp_lemmad6 (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2) l)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl b1 a2)).
-
-(* constant 3295 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satz123 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_orec3 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b)).
-
-(* constant 3296 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satz123a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_or3 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b)).
-
-(* constant 3297 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_ec3 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b)).
-
-(* constant 3298 *)
-definition l_e_st_eq_landau_n_rt_rp_1d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_stm d : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3299 *)
-definition l_e_st_eq_landau_n_rt_rp_2d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_std d : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3300 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.λm:l_e_st_eq_landau_n_rt_rp_mored a c.(l_e_tr4is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d a b c d)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2d a b c d))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d a b c d) (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2d a b c d)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_symeq a b e) f) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2b a b))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d a b c d)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)))).
-
-(* constant 3301 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.λm:l_e_st_eq_landau_n_rt_rp_mored a c.(l_e_st_eq_landau_n_rt_rp_ismore2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d a b c d)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d a b c d)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_iv2d_t4 a b c d e f m) (l_e_st_eq_landau_n_rt_rp_satz135d (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d a b c d)) m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d a b c d)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)))).
-
-(* constant 3302 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmored12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.λm:l_e_st_eq_landau_n_rt_rp_mored a c.(l_e_st_eq_landau_n_rt_rp_satz136a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2d a b c d)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1d a b c d) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_iv2d_t5 a b c d e f m) : l_e_st_eq_landau_n_rt_rp_mored b d).
-
-(* constant 3303 *)
-definition l_e_st_eq_landau_n_rt_rp_eqlessd12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.λl:l_e_st_eq_landau_n_rt_rp_lessd a c.(l_e_st_eq_landau_n_rt_rp_lemmad5 d b (l_e_st_eq_landau_n_rt_rp_eqmored12 c d a b f e (l_e_st_eq_landau_n_rt_rp_lemmad6 a c l)) : l_e_st_eq_landau_n_rt_rp_lessd b d).
-
-(* constant 3304 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmored1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λm:l_e_st_eq_landau_n_rt_rp_mored a c.(l_e_st_eq_landau_n_rt_rp_eqmored12 a b c c e (l_e_st_eq_landau_n_rt_rp_refeq c) m : l_e_st_eq_landau_n_rt_rp_mored b c).
-
-(* constant 3305 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmored2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λm:l_e_st_eq_landau_n_rt_rp_mored c a.(l_e_st_eq_landau_n_rt_rp_eqmored12 c c a b (l_e_st_eq_landau_n_rt_rp_refeq c) e m : l_e_st_eq_landau_n_rt_rp_mored c b).
-
-(* constant 3306 *)
-definition l_e_st_eq_landau_n_rt_rp_eqlessd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λl:l_e_st_eq_landau_n_rt_rp_lessd a c.(l_e_st_eq_landau_n_rt_rp_eqlessd12 a b c c e (l_e_st_eq_landau_n_rt_rp_refeq c) l : l_e_st_eq_landau_n_rt_rp_lessd b c).
-
-(* constant 3307 *)
-definition l_e_st_eq_landau_n_rt_rp_eqlessd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λl:l_e_st_eq_landau_n_rt_rp_lessd c a.(l_e_st_eq_landau_n_rt_rp_eqlessd12 c c a b (l_e_st_eq_landau_n_rt_rp_refeq c) e l : l_e_st_eq_landau_n_rt_rp_lessd c b).
-
-(* constant 3308 *)
-definition l_e_st_eq_landau_n_rt_rp_moreq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_or (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) : Prop).
-
-(* constant 3309 *)
-definition l_e_st_eq_landau_n_rt_rp_lesseq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_or (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_eq a b) : Prop).
-
-(* constant 3310 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd168a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_lessd b a) (l_e_st_eq_landau_n_rt_rp_eq b a) m (λt:l_e_st_eq_landau_n_rt_rp_mored a b.l_e_st_eq_landau_n_rt_rp_lemmad5 a b t) (λt:l_e_st_eq_landau_n_rt_rp_eq a b.l_e_st_eq_landau_n_rt_rp_symeq a b t) : l_e_st_eq_landau_n_rt_rp_lesseq b a).
-
-(* constant 3311 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd168b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored b a) (l_e_st_eq_landau_n_rt_rp_eq b a) l (λt:l_e_st_eq_landau_n_rt_rp_lessd a b.l_e_st_eq_landau_n_rt_rp_lemmad6 a b t) (λt:l_e_st_eq_landau_n_rt_rp_eq a b.l_e_st_eq_landau_n_rt_rp_symeq a b t) : l_e_st_eq_landau_n_rt_rp_moreq b a).
-
-(* constant 3312 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmoreq1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λm:l_e_st_eq_landau_n_rt_rp_moreq a c.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_mored a c) (l_e_st_eq_landau_n_rt_rp_eq a c) (l_e_st_eq_landau_n_rt_rp_mored b c) (l_e_st_eq_landau_n_rt_rp_eq b c) m (λt:l_e_st_eq_landau_n_rt_rp_mored a c.l_e_st_eq_landau_n_rt_rp_eqmored1 a b c e t) (λt:l_e_st_eq_landau_n_rt_rp_eq a c.l_e_st_eq_landau_n_rt_rp_treq1 b c a e t) : l_e_st_eq_landau_n_rt_rp_moreq b c).
-
-(* constant 3313 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmoreq2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λm:l_e_st_eq_landau_n_rt_rp_moreq c a.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_mored c a) (l_e_st_eq_landau_n_rt_rp_eq c a) (l_e_st_eq_landau_n_rt_rp_mored c b) (l_e_st_eq_landau_n_rt_rp_eq c b) m (λt:l_e_st_eq_landau_n_rt_rp_mored c a.l_e_st_eq_landau_n_rt_rp_eqmored2 a b c e t) (λt:l_e_st_eq_landau_n_rt_rp_eq c a.l_e_st_eq_landau_n_rt_rp_treq c a b t e) : l_e_st_eq_landau_n_rt_rp_moreq c b).
-
-(* constant 3314 *)
-definition l_e_st_eq_landau_n_rt_rp_eqlesseq1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λl:l_e_st_eq_landau_n_rt_rp_lesseq a c.(l_e_st_eq_landau_n_rt_rp_satzd168a c b (l_e_st_eq_landau_n_rt_rp_eqmoreq2 a b c e (l_e_st_eq_landau_n_rt_rp_satzd168b a c l)) : l_e_st_eq_landau_n_rt_rp_lesseq b c).
-
-(* constant 3315 *)
-definition l_e_st_eq_landau_n_rt_rp_eqlesseq2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λl:l_e_st_eq_landau_n_rt_rp_lesseq c a.(l_e_st_eq_landau_n_rt_rp_satzd168a b c (l_e_st_eq_landau_n_rt_rp_eqmoreq1 a b c e (l_e_st_eq_landau_n_rt_rp_satzd168b c a l)) : l_e_st_eq_landau_n_rt_rp_lesseq c b).
-
-(* constant 3316 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmoreq12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.λm:l_e_st_eq_landau_n_rt_rp_moreq a c.(l_e_st_eq_landau_n_rt_rp_eqmoreq1 a b d e (l_e_st_eq_landau_n_rt_rp_eqmoreq2 c d a f m) : l_e_st_eq_landau_n_rt_rp_moreq b d).
-
-(* constant 3317 *)
-definition l_e_st_eq_landau_n_rt_rp_eqlesseq12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.λl:l_e_st_eq_landau_n_rt_rp_lesseq a c.(l_e_st_eq_landau_n_rt_rp_eqlesseq1 a b d e (l_e_st_eq_landau_n_rt_rp_eqlesseq2 c d a f l) : l_e_st_eq_landau_n_rt_rp_lesseq b d).
-
-(* constant 3318 *)
-definition l_e_st_eq_landau_n_rt_rp_moreqi1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_ori1 (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) m : l_e_st_eq_landau_n_rt_rp_moreq a b).
-
-(* constant 3319 *)
-definition l_e_st_eq_landau_n_rt_rp_lesseqi1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_ori1 (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_eq a b) l : l_e_st_eq_landau_n_rt_rp_lesseq a b).
-
-(* constant 3320 *)
-definition l_e_st_eq_landau_n_rt_rp_moreqi2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_ori2 (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) e : l_e_st_eq_landau_n_rt_rp_moreq a b).
-
-(* constant 3321 *)
-definition l_e_st_eq_landau_n_rt_rp_lesseqi2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_ori2 (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_eq a b) e : l_e_st_eq_landau_n_rt_rp_lesseq a b).
-
-(* constant 3322 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.(l_ec3_th7 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_satzd167b a b) (l_comor (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) m) : l_not (l_e_st_eq_landau_n_rt_rp_lessd a b)).
-
-(* constant 3323 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.(l_ec3_th9 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_satzd167b a b) l : l_not (l_e_st_eq_landau_n_rt_rp_mored a b)).
-
-(* constant 3324 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_mored a b).(l_or3_th2 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_satzd167a a b) n : l_e_st_eq_landau_n_rt_rp_lesseq a b).
-
-(* constant 3325 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_lessd a b).(l_comor (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_or3_th3 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_satzd167a a b) n) : l_e_st_eq_landau_n_rt_rp_moreq a b).
-
-(* constant 3326 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167g ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_lesseq a b) (l_not (l_e_st_eq_landau_n_rt_rp_mored a b)) (l_weli (l_e_st_eq_landau_n_rt_rp_mored a b) m) (λt:l_e_st_eq_landau_n_rt_rp_lesseq a b.l_e_st_eq_landau_n_rt_rp_satzd167d a b t) : l_not (l_e_st_eq_landau_n_rt_rp_lesseq a b)).
-
-(* constant 3327 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167h ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_moreq a b) (l_not (l_e_st_eq_landau_n_rt_rp_lessd a b)) (l_weli (l_e_st_eq_landau_n_rt_rp_lessd a b) l) (λt:l_e_st_eq_landau_n_rt_rp_moreq a b.l_e_st_eq_landau_n_rt_rp_satzd167c a b t) : l_not (l_e_st_eq_landau_n_rt_rp_moreq a b)).
-
-(* constant 3328 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167j ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_moreq a b).(l_or3e3 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_satzd167a a b) (l_or_th5 (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) n) (l_or_th4 (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) n) : l_e_st_eq_landau_n_rt_rp_lessd a b).
-
-(* constant 3329 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd167k ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_lesseq a b).(l_or3e2 (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_satzd167a a b) (l_or_th4 (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_eq a b) n) (l_or_th5 (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_eq a b) n) : l_e_st_eq_landau_n_rt_rp_mored a b).
-
-(* constant 3330 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd169a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a) z) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_satz135a (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b) p) : l_e_st_eq_landau_n_rt_rp_mored a b).
-
-(* constant 3331 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd169b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_satz136d (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a) z) m) : l_e_st_eq_landau_n_rt_rp_posd a).
-
-(* constant 3332 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd169c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a) z) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_satz135c (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b) n) : l_e_st_eq_landau_n_rt_rp_lessd a b).
-
-(* constant 3333 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd169d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_satz136f (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a) z) l) : l_e_st_eq_landau_n_rt_rp_negd a).
-
-(* constant 3334 *)
-definition l_e_st_eq_landau_n_rt_rp_2d170_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_moreqi1 (l_e_st_eq_landau_n_rt_rp_absd a) b (l_e_st_eq_landau_n_rt_rp_satzd169a (l_e_st_eq_landau_n_rt_rp_absd a) b z (l_e_st_eq_landau_n_rt_rp_satzd166a a p)) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_absd a) b).
-
-(* constant 3335 *)
-definition l_e_st_eq_landau_n_rt_rp_2d170_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.λy:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_moreqi2 (l_e_st_eq_landau_n_rt_rp_absd a) b (l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_absd a) a b (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_0notnd a y)) (l_e_st_eq_landau_n_rt_rp_zeroeq a b y z)) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_absd a) b).
-
-(* constant 3336 *)
-definition l_e_st_eq_landau_n_rt_rp_2d170_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_moreqi1 (l_e_st_eq_landau_n_rt_rp_absd a) b (l_e_st_eq_landau_n_rt_rp_satzd169a (l_e_st_eq_landau_n_rt_rp_absd a) b z (l_e_st_eq_landau_n_rt_rp_satzd166b a n)) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_absd a) b).
-
-(* constant 3337 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd170 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.(l_e_st_eq_landau_n_rt_rp_rappd a (l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_absd a) b) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_2d170_t1 a b z t) (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_2d170_t2 a b z t) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_2d170_t3 a b z t) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_absd a) b).
-
-(* constant 3338 *)
-definition l_e_st_eq_landau_n_rt_rp_2d171_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λk:l_e_st_eq_landau_n_rt_rp_lessd b c.(l_e_st_eq_landau_n_rt_rp_satz137a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b)) l k : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b)))).
-
-(* constant 3339 *)
-definition l_e_st_eq_landau_n_rt_rp_2d171_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λk:l_e_st_eq_landau_n_rt_rp_lessd b c.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_2d171_t1 a b c l k) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)))).
-
-(* constant 3340 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd171 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λk:l_e_st_eq_landau_n_rt_rp_lessd b c.(l_e_st_eq_landau_n_rt_rp_satz136c (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_2d171_t2 a b c l k) : l_e_st_eq_landau_n_rt_rp_lessd a c).
-
-(* constant 3341 *)
-definition l_e_st_eq_landau_n_rt_rp_trlessd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λk:l_e_st_eq_landau_n_rt_rp_lessd b c.(l_e_st_eq_landau_n_rt_rp_satzd171 a b c l k : l_e_st_eq_landau_n_rt_rp_lessd a c).
-
-(* constant 3342 *)
-definition l_e_st_eq_landau_n_rt_rp_trmored ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λn:l_e_st_eq_landau_n_rt_rp_mored b c.(l_e_st_eq_landau_n_rt_rp_lemmad6 c a (l_e_st_eq_landau_n_rt_rp_trlessd c b a (l_e_st_eq_landau_n_rt_rp_lemmad5 b c n) (l_e_st_eq_landau_n_rt_rp_lemmad5 a b m)) : l_e_st_eq_landau_n_rt_rp_mored a c).
-
-(* constant 3343 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd172a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.λk:l_e_st_eq_landau_n_rt_rp_lessd b c.(l_orapp (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_lessd a c) l (λt:l_e_st_eq_landau_n_rt_rp_lessd a b.l_e_st_eq_landau_n_rt_rp_trlessd a b c t k) (λt:l_e_st_eq_landau_n_rt_rp_eq a b.l_e_st_eq_landau_n_rt_rp_eqlessd1 b a c (l_e_st_eq_landau_n_rt_rp_symeq a b t) k) : l_e_st_eq_landau_n_rt_rp_lessd a c).
-
-(* constant 3344 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd172b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λk:l_e_st_eq_landau_n_rt_rp_lesseq b c.(l_orapp (l_e_st_eq_landau_n_rt_rp_lessd b c) (l_e_st_eq_landau_n_rt_rp_eq b c) (l_e_st_eq_landau_n_rt_rp_lessd a c) k (λt:l_e_st_eq_landau_n_rt_rp_lessd b c.l_e_st_eq_landau_n_rt_rp_trlessd a b c l t) (λt:l_e_st_eq_landau_n_rt_rp_eq b c.l_e_st_eq_landau_n_rt_rp_eqlessd2 b c a t l) : l_e_st_eq_landau_n_rt_rp_lessd a c).
-
-(* constant 3345 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd172c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.λn:l_e_st_eq_landau_n_rt_rp_mored b c.(l_e_st_eq_landau_n_rt_rp_lemmad6 c a (l_e_st_eq_landau_n_rt_rp_satzd172b c b a (l_e_st_eq_landau_n_rt_rp_lemmad5 b c n) (l_e_st_eq_landau_n_rt_rp_satzd168a a b m)) : l_e_st_eq_landau_n_rt_rp_mored a c).
-
-(* constant 3346 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd172d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λn:l_e_st_eq_landau_n_rt_rp_moreq b c.(l_e_st_eq_landau_n_rt_rp_lemmad6 c a (l_e_st_eq_landau_n_rt_rp_satzd172a c b a (l_e_st_eq_landau_n_rt_rp_satzd168a b c n) (l_e_st_eq_landau_n_rt_rp_lemmad5 a b m)) : l_e_st_eq_landau_n_rt_rp_mored a c).
-
-(* constant 3347 *)
-definition l_e_st_eq_landau_n_rt_rp_2d173_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.λk:l_e_st_eq_landau_n_rt_rp_lesseq b c.λj:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_lesseqi1 a c (l_e_st_eq_landau_n_rt_rp_satzd172b a b c j k) : l_e_st_eq_landau_n_rt_rp_lesseq a c).
-
-(* constant 3348 *)
-definition l_e_st_eq_landau_n_rt_rp_2d173_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.λk:l_e_st_eq_landau_n_rt_rp_lesseq b c.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqlesseq1 b a c (l_e_st_eq_landau_n_rt_rp_symeq a b e) k : l_e_st_eq_landau_n_rt_rp_lesseq a c).
-
-(* constant 3349 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd173 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.λk:l_e_st_eq_landau_n_rt_rp_lesseq b c.(l_orapp (l_e_st_eq_landau_n_rt_rp_lessd a b) (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_lesseq a c) l (λt:l_e_st_eq_landau_n_rt_rp_lessd a b.l_e_st_eq_landau_n_rt_rp_2d173_t1 a b c l k t) (λt:l_e_st_eq_landau_n_rt_rp_eq a b.l_e_st_eq_landau_n_rt_rp_2d173_t2 a b c l k t) : l_e_st_eq_landau_n_rt_rp_lesseq a c).
-
-(* constant 3350 *)
-definition l_e_st_eq_landau_n_rt_rp_trlesseq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.λk:l_e_st_eq_landau_n_rt_rp_lesseq b c.(l_e_st_eq_landau_n_rt_rp_satzd173 a b c l k : l_e_st_eq_landau_n_rt_rp_lesseq a c).
-
-(* constant 3351 *)
-definition l_e_st_eq_landau_n_rt_rp_trmoreq ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.λn:l_e_st_eq_landau_n_rt_rp_moreq b c.(l_e_st_eq_landau_n_rt_rp_satzd168b c a (l_e_st_eq_landau_n_rt_rp_trlesseq c b a (l_e_st_eq_landau_n_rt_rp_satzd168a b c n) (l_e_st_eq_landau_n_rt_rp_satzd168a a b m)) : l_e_st_eq_landau_n_rt_rp_moreq a c).
-
-(* constant 3352 *)
-definition l_e_st_eq_landau_n_rt_rp_ratd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(∀t:l_not (l_e_st_eq_landau_n_rt_rp_zero a).l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_satzd166e a t)) : Prop).
-
-(* constant 3353 *)
-definition l_e_st_eq_landau_n_rt_rp_irratd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_not (l_e_st_eq_landau_n_rt_rp_ratd a) : Prop).
-
-(* constant 3354 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λr:l_e_st_eq_landau_n_rt_rp_ratd a.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_zero b) n (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_eqzero a b e t) : l_not (l_e_st_eq_landau_n_rt_rp_zero a)).
-
-(* constant 3355 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λr:l_e_st_eq_landau_n_rt_rp_ratd a.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).(l_e_st_eq_landau_n_rt_rp_eqpderp (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_satzd166e a (l_e_st_eq_landau_n_rt_rp_iv2d_t6 a b e r n)) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_satzd166e b n) (l_e_st_eq_landau_n_rt_rp_eqabsd a b e) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_satzd166e a (l_e_st_eq_landau_n_rt_rp_iv2d_t6 a b e r n))) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_satzd166e b n))).
-
-(* constant 3356 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t8 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λr:l_e_st_eq_landau_n_rt_rp_ratd a.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).(l_e_isp l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp t) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_satzd166e a (l_e_st_eq_landau_n_rt_rp_iv2d_t6 a b e r n))) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_satzd166e b n)) (r (l_e_st_eq_landau_n_rt_rp_iv2d_t6 a b e r n)) (l_e_st_eq_landau_n_rt_rp_iv2d_t7 a b e r n) : l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_satzd166e b n))).
-
-(* constant 3357 *)
-definition l_e_st_eq_landau_n_rt_rp_eqratd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λr:l_e_st_eq_landau_n_rt_rp_ratd a.(λt:l_not (l_e_st_eq_landau_n_rt_rp_zero b).l_e_st_eq_landau_n_rt_rp_iv2d_t8 a b e r t : l_e_st_eq_landau_n_rt_rp_ratd b).
-
-(* constant 3358 *)
-definition l_e_st_eq_landau_n_rt_rp_eqirratd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λi:l_e_st_eq_landau_n_rt_rp_irratd a.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_ratd b) (l_e_st_eq_landau_n_rt_rp_ratd a) i (λt:l_e_st_eq_landau_n_rt_rp_ratd b.l_e_st_eq_landau_n_rt_rp_eqratd b a (l_e_st_eq_landau_n_rt_rp_symeq a b e) t) : l_e_st_eq_landau_n_rt_rp_irratd b).
-
-(* constant 3359 *)
-definition l_e_st_eq_landau_n_rt_rp_ratdi0 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_r_imp_th2 (l_not (l_e_st_eq_landau_n_rt_rp_zero a)) (λt:l_not (l_e_st_eq_landau_n_rt_rp_zero a).l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_satzd166e a t))) (l_weli (l_e_st_eq_landau_n_rt_rp_zero a) z) : l_e_st_eq_landau_n_rt_rp_ratd a).
-
-(* constant 3360 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t9 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).λy0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) r) (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) r) j : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) r) (l_e_st_eq_landau_n_rt_rp_rpofrt y0)).
-
-(* constant 3361 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t10 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).λy0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_e_st_eq_landau_n_rt_rp_ismore1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofrt x0) r) (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_iv2d_t9 r i x0 s y0 j) (l_e_st_eq_landau_n_rt_rp_satz133 (l_e_st_eq_landau_n_rt_rp_rpofrt x0) r) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).
-
-(* constant 3362 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t11 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).λy0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_e_st_eq_landau_n_rt_rp_satz154d y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t10 r i x0 s y0 j) : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 3363 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t12 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).λy0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_e_st_eq_landau_n_rt_rp_satz155b y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j))) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_satz154a y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j)))).
-
-(* constant 3364 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t13 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).λy0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_e_st_eq_landau_n_rt_rp_satz140g (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) r (l_e_st_eq_landau_n_rt_rp_satz154a y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j)) (l_e_st_eq_landau_n_rt_rp_iv2d_t9 r i x0 s y0 j) : l_e_st_eq_landau_n_rt_rp_is r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_satz154a y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j)))).
-
-(* constant 3365 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t14 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).λy0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_e_tris2 l_e_st_eq_landau_n_rt_cut r (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j))) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_rpofrt y0) (l_e_st_eq_landau_n_rt_rp_rpofrt x0) (l_e_st_eq_landau_n_rt_rp_satz154a y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j))) (l_e_st_eq_landau_n_rt_rp_iv2d_t13 r i x0 s y0 j) (l_e_st_eq_landau_n_rt_rp_iv2d_t12 r i x0 s y0 j) : l_e_st_eq_landau_n_rt_rp_is r (l_e_st_eq_landau_n_rt_rp_rpofrt (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j)))).
-
-(* constant 3366 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t15 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).λy0:l_e_st_eq_landau_n_rt_rat.λj:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt y0).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_is r (l_e_st_eq_landau_n_rt_rp_rpofrt x)) (l_e_st_eq_landau_n_rt_mn y0 x0 (l_e_st_eq_landau_n_rt_rp_iv2d_t11 r i x0 s y0 j)) (l_e_st_eq_landau_n_rt_rp_iv2d_t14 r i x0 s y0 j) : l_e_st_eq_landau_n_rt_rp_ratrp r).
-
-(* constant 3367 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t16 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.λs:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).(l_someapp l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt x)) s l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)) (l_e_st_eq_landau_n_rt_rp_rpofrt x).i (l_e_st_eq_landau_n_rt_rp_iv2d_t15 r i x0 s x t)) : l_con).
-
-(* constant 3368 *)
-definition l_e_st_eq_landau_n_rt_rp_remark1 ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.λx0:l_e_st_eq_landau_n_rt_rat.(λt:l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0)).l_e_st_eq_landau_n_rt_rp_iv2d_t16 r i x0 t : l_e_st_eq_landau_n_rt_rp_irratrp (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_rpofrt x0))).
-
-(* constant 3369 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_rp ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pdofrp r : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3370 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_rn ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ndofrp r : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3371 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t17 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_posdirp r : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_iv2d_rp r)).
-
-(* constant 3372 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t18 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pnot0d (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t17 r) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_iv2d_rp r))).
-
-(* constant 3373 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t19 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_nnot0d (l_e_st_eq_landau_n_rt_rp_iv2d_rn r) (l_e_st_eq_landau_n_rt_rp_negdirp r) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_iv2d_rn r))).
-
-(* constant 3374 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t20 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_iv2d_rp r)).(l_e_tris2 l_e_st_eq_landau_n_rt_cut r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_iv2d_rp r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) n)) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t17 r)) (l_e_st_eq_landau_n_rt_rp_isrppd1 r) (l_e_st_eq_landau_n_rt_rp_eqpderp (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_iv2d_rp r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) n) (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t17 r) (l_e_st_eq_landau_n_rt_rp_absnnd (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) (l_e_st_eq_landau_n_rt_rp_pnotnd (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t17 r)))) : l_e_st_eq_landau_n_rt_rp_is r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_iv2d_rp r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) n))).
-
-(* constant 3375 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t21 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_iv2d_rn r))) (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) (l_e_st_eq_landau_n_rt_rp_absnd (l_e_st_eq_landau_n_rt_rp_iv2d_rn r) (l_e_st_eq_landau_n_rt_rp_negdirp r)) (l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)) (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_stdis l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_stmis l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)) (l_e_st_eq_landau_n_rt_rp_iv2d_rp r)).
-
-(* constant 3376 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t22 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)).(l_e_tris2 l_e_st_eq_landau_n_rt_cut r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_iv2d_rn r) n)) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t17 r)) (l_e_st_eq_landau_n_rt_rp_isrppd1 r) (l_e_st_eq_landau_n_rt_rp_eqpderp (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_iv2d_rn r) n) (l_e_st_eq_landau_n_rt_rp_iv2d_rp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t17 r) (l_e_st_eq_landau_n_rt_rp_iv2d_t21 r)) : l_e_st_eq_landau_n_rt_rp_is r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_iv2d_rn r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_iv2d_rn r) n))).
-
-(* constant 3377 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t23 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is r s.λrr:l_e_st_eq_landau_n_rt_rp_ratrp r.(l_e_isp l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp x) r s rr i : l_e_st_eq_landau_n_rt_rp_ratrp s).
-
-(* constant 3378 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t24 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is r s.λrs:l_e_st_eq_landau_n_rt_rp_ratrp s.(l_e_isp1 l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_ratrp x) s r rs i : l_e_st_eq_landau_n_rt_rp_ratrp r).
-
-(* constant 3379 *)
-definition l_e_st_eq_landau_n_rt_rp_remark2a ≝ λr:l_e_st_eq_landau_n_rt_cut.λrr:l_e_st_eq_landau_n_rt_rp_ratrp r.(λt:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_pdofrp r)).l_e_st_eq_landau_n_rt_rp_iv2d_t23 r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_pdofrp r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_pdofrp r) t)) (l_e_st_eq_landau_n_rt_rp_iv2d_t20 r t) rr : l_e_st_eq_landau_n_rt_rp_ratd (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3380 *)
-definition l_e_st_eq_landau_n_rt_rp_remark2b ≝ λr:l_e_st_eq_landau_n_rt_cut.λrr:l_e_st_eq_landau_n_rt_rp_ratrp r.(l_e_st_eq_landau_n_rt_rp_iv2d_t17 r : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3381 *)
-definition l_e_st_eq_landau_n_rt_rp_remark3a ≝ λr:l_e_st_eq_landau_n_rt_cut.λrr:l_e_st_eq_landau_n_rt_rp_ratrp r.(λt:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_ndofrp r)).l_e_st_eq_landau_n_rt_rp_iv2d_t23 r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_ndofrp r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_ndofrp r) t)) (l_e_st_eq_landau_n_rt_rp_iv2d_t22 r t) rr : l_e_st_eq_landau_n_rt_rp_ratd (l_e_st_eq_landau_n_rt_rp_ndofrp r)).
-
-(* constant 3382 *)
-definition l_e_st_eq_landau_n_rt_rp_remark3b ≝ λr:l_e_st_eq_landau_n_rt_cut.λrr:l_e_st_eq_landau_n_rt_rp_ratrp r.(l_e_st_eq_landau_n_rt_rp_negdirp r : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_ndofrp r)).
-
-(* constant 3383 *)
-definition l_e_st_eq_landau_n_rt_rp_remark4a ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_ratd (l_e_st_eq_landau_n_rt_rp_pdofrp r)) (l_e_st_eq_landau_n_rt_rp_ratrp r) i (λt:l_e_st_eq_landau_n_rt_rp_ratd (l_e_st_eq_landau_n_rt_rp_pdofrp r).l_e_st_eq_landau_n_rt_rp_iv2d_t24 r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_pdofrp r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t18 r))) (l_e_st_eq_landau_n_rt_rp_iv2d_t20 r (l_e_st_eq_landau_n_rt_rp_iv2d_t18 r)) (t (l_e_st_eq_landau_n_rt_rp_iv2d_t18 r))) : l_e_st_eq_landau_n_rt_rp_irratd (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3384 *)
-definition l_e_st_eq_landau_n_rt_rp_remark4b ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.(l_e_st_eq_landau_n_rt_rp_iv2d_t17 r : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3385 *)
-definition l_e_st_eq_landau_n_rt_rp_remark5a ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_ratd (l_e_st_eq_landau_n_rt_rp_ndofrp r)) (l_e_st_eq_landau_n_rt_rp_ratrp r) i (λt:l_e_st_eq_landau_n_rt_rp_ratd (l_e_st_eq_landau_n_rt_rp_ndofrp r).l_e_st_eq_landau_n_rt_rp_iv2d_t24 r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_ndofrp r)) (l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_ndofrp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t19 r))) (l_e_st_eq_landau_n_rt_rp_iv2d_t22 r (l_e_st_eq_landau_n_rt_rp_iv2d_t19 r)) (t (l_e_st_eq_landau_n_rt_rp_iv2d_t19 r))) : l_e_st_eq_landau_n_rt_rp_irratd (l_e_st_eq_landau_n_rt_rp_ndofrp r)).
-
-(* constant 3386 *)
-definition l_e_st_eq_landau_n_rt_rp_remark5b ≝ λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_irratrp r.(l_e_st_eq_landau_n_rt_rp_negdirp r : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_ndofrp r)).
-
-(* constant 3387 *)
-definition l_e_st_eq_landau_n_rt_rp_natd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_and (l_e_st_eq_landau_n_rt_rp_posd a) (∀t:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd a t)) : Prop).
-
-(* constant 3388 *)
-definition l_e_st_eq_landau_n_rt_rp_natposd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_natd a.(l_ande1 (l_e_st_eq_landau_n_rt_rp_posd a) (∀t:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd a t)) n : l_e_st_eq_landau_n_rt_rp_posd a).
-
-(* constant 3389 *)
-definition l_e_st_eq_landau_n_rt_rp_natderp ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_natd a.(l_r_ande2 (l_e_st_eq_landau_n_rt_rp_posd a) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd a t)) n : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd a (l_e_st_eq_landau_n_rt_rp_natposd a n))).
-
-(* constant 3390 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t25 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_e_st_eq_landau_n_rt_rp_natd a.(l_e_st_eq_landau_n_rt_rp_eqposd a b e (l_e_st_eq_landau_n_rt_rp_natposd a n) : l_e_st_eq_landau_n_rt_rp_posd b).
-
-(* constant 3391 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t26 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_e_st_eq_landau_n_rt_rp_natd a.λp:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_eqpderp a (l_e_st_eq_landau_n_rt_rp_natposd a n) b p e : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofpd a (l_e_st_eq_landau_n_rt_rp_natposd a n)) (l_e_st_eq_landau_n_rt_rp_rpofpd b p)).
-
-(* constant 3392 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t27 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_e_st_eq_landau_n_rt_rp_natd a.λp:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_isp l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) (l_e_st_eq_landau_n_rt_rp_rpofpd a (l_e_st_eq_landau_n_rt_rp_natposd a n)) (l_e_st_eq_landau_n_rt_rp_rpofpd b p) (l_e_st_eq_landau_n_rt_rp_natderp a n) (l_e_st_eq_landau_n_rt_rp_iv2d_t26 a b e n p) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd b p)).
-
-(* constant 3393 *)
-definition l_e_st_eq_landau_n_rt_rp_eqnatd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λn:l_e_st_eq_landau_n_rt_rp_natd a.(l_andi (l_e_st_eq_landau_n_rt_rp_posd b) (∀t:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd b t)) (l_e_st_eq_landau_n_rt_rp_iv2d_t25 a b e n) (λt:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_iv2d_t27 a b e n t) : l_e_st_eq_landau_n_rt_rp_natd b).
-
-(* constant 3394 *)
-definition l_e_st_eq_landau_n_rt_rp_pdofnt ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_rpofnt x) : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3395 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t28 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_rpofnt x) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofnt x)).
-
-(* constant 3396 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t29 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofnt x).(l_e_st_eq_landau_n_rt_rp_isrppd1 (l_e_st_eq_landau_n_rt_rp_rpofnt x) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) (l_e_st_eq_landau_n_rt_rp_iv2d_t28 x))).
-
-(* constant 3397 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t30 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofnt x).(l_e_st_eq_landau_n_rt_rp_eqpderp (l_e_st_eq_landau_n_rt_rp_pdofnt x) (l_e_st_eq_landau_n_rt_rp_iv2d_t28 x) (l_e_st_eq_landau_n_rt_rp_pdofnt x) p (l_e_st_eq_landau_n_rt_rp_refeq (l_e_st_eq_landau_n_rt_rp_pdofnt x)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) (l_e_st_eq_landau_n_rt_rp_iv2d_t28 x)) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) p)).
-
-(* constant 3398 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t31 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofnt x).(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) (l_e_st_eq_landau_n_rt_rp_iv2d_t28 x)) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) p) (l_e_st_eq_landau_n_rt_rp_iv2d_t29 x p) (l_e_st_eq_landau_n_rt_rp_iv2d_t30 x p) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) p)).
-
-(* constant 3399 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t32 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofnt x).(l_e_isp l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) p) (l_e_st_eq_landau_n_rt_rp_natrpi x) (l_e_st_eq_landau_n_rt_rp_iv2d_t31 x p) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) p)).
-
-(* constant 3400 *)
-definition l_e_st_eq_landau_n_rt_rp_natdi ≝ λx:l_e_st_eq_landau_n_nat.(l_andi (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofnt x)) (∀t:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofnt x).l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofnt x) t)) (l_e_st_eq_landau_n_rt_rp_iv2d_t28 x) (λt:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofnt x).l_e_st_eq_landau_n_rt_rp_iv2d_t32 x t) : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_pdofnt x)).
-
-(* constant 3401 *)
-definition l_e_st_eq_landau_n_rt_rp_intd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_or (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)) : Prop).
-
-(* constant 3402 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t33 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λi:l_e_st_eq_landau_n_rt_rp_intd a.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_eqzero a b e z : l_e_st_eq_landau_n_rt_rp_zero b).
-
-(* constant 3403 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t34 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λi:l_e_st_eq_landau_n_rt_rp_intd a.λn:l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a).(l_e_st_eq_landau_n_rt_rp_eqnatd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_eqabsd a b e) n : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd b)).
-
-(* constant 3404 *)
-definition l_e_st_eq_landau_n_rt_rp_eqintd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λi:l_e_st_eq_landau_n_rt_rp_intd a.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd b)) i (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_iv2d_t33 a b e i t) (λt:l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a).l_e_st_eq_landau_n_rt_rp_iv2d_t34 a b e i t) : l_e_st_eq_landau_n_rt_rp_intd b).
-
-(* constant 3405 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t34a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_natd a.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a (l_e_st_eq_landau_n_rt_rp_natposd a n))) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3406 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t35 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_natd a.(l_e_st_eq_landau_n_rt_rp_eqnatd a (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_iv2d_t34a a n) n : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3407 *)
-definition l_e_st_eq_landau_n_rt_rp_natintd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_natd a.(l_ori2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_iv2d_t35 a n) : l_e_st_eq_landau_n_rt_rp_intd a).
-
-(* constant 3408 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t36 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λi:l_e_st_eq_landau_n_rt_rp_intd a.(l_ore2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)) i (l_e_st_eq_landau_n_rt_rp_pnot0d a p) : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3409 *)
-definition l_e_st_eq_landau_n_rt_rp_posintnatd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λi:l_e_st_eq_landau_n_rt_rp_intd a.(l_e_st_eq_landau_n_rt_rp_eqnatd (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a p)) (l_e_st_eq_landau_n_rt_rp_iv2d_t36 a p i) : l_e_st_eq_landau_n_rt_rp_natd a).
-
-(* constant 3410 *)
-definition l_e_st_eq_landau_n_rt_rp_intdi0 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_ori1 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)) z : l_e_st_eq_landau_n_rt_rp_intd a).
-
-(* constant 3411 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t37 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r.(l_e_st_eq_landau_n_rt_rp_posdirp r : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3412 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t38 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r).(l_e_tris l_e_st_eq_landau_n_rt_cut r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t37 r n)) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) p) (l_e_st_eq_landau_n_rt_rp_isrppd1 r) (l_e_st_eq_landau_n_rt_rp_eqpderp (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t37 r n) (l_e_st_eq_landau_n_rt_rp_pdofrp r) p (l_e_st_eq_landau_n_rt_rp_refeq (l_e_st_eq_landau_n_rt_rp_pdofrp r))) : l_e_st_eq_landau_n_rt_rp_is r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) p)).
-
-(* constant 3413 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t39 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r).(l_e_isp l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) r (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) p) n (l_e_st_eq_landau_n_rt_rp_iv2d_t38 r n p) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) p)).
-
-(* constant 3414 *)
-definition l_e_st_eq_landau_n_rt_rp_remark6a ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r.(l_andi (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r)) (∀t:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r).l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp r) t)) (l_e_st_eq_landau_n_rt_rp_iv2d_t37 r n) (λt:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp r).l_e_st_eq_landau_n_rt_rp_iv2d_t39 r n t) : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3415 *)
-definition l_e_st_eq_landau_n_rt_rp_remark6 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r.(l_e_st_eq_landau_n_rt_rp_natintd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_remark6a r n) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3416 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t40 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r.(l_e_st_eq_landau_n_rt_rp_absdeql l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_isless2 (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp r) (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_compl l_e_st_eq_landau_n_rt_rp_1rp r) (l_e_st_eq_landau_n_rt_rp_satz133a l_e_st_eq_landau_n_rt_rp_1rp r)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_ndofrp r)) (l_e_st_eq_landau_n_rt_rp_pdofrp r)).
-
-(* constant 3417 *)
-definition l_e_st_eq_landau_n_rt_rp_iv2d_t41 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r.(l_e_st_eq_landau_n_rt_rp_eqnatd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_ndofrp r)) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_ndofrp r)) (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_iv2d_t40 r n)) (l_e_st_eq_landau_n_rt_rp_remark6a r n) : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_ndofrp r))).
-
-(* constant 3418 *)
-definition l_e_st_eq_landau_n_rt_rp_remark7 ≝ λr:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r.(l_ori2 (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_ndofrp r)) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_ndofrp r))) (l_e_st_eq_landau_n_rt_rp_iv2d_t41 r n) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_ndofrp r)).
-
-(* constant 3419 *)
-definition l_e_st_eq_landau_n_rt_rp_2d174_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_ore2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)) i n : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3420 *)
-definition l_e_st_eq_landau_n_rt_rp_2d174_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_ande2 (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a)) (∀t:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a).l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) t)) (l_e_st_eq_landau_n_rt_rp_2d174_t1 a i n) : ∀t:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a).l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) t)).
-
-(* constant 3421 *)
-definition l_e_st_eq_landau_n_rt_rp_2d174_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_e_st_eq_landau_n_rt_rp_lemmaiii5 (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_satzd166e a n)) (l_e_st_eq_landau_n_rt_rp_2d174_t2 a i n (l_e_st_eq_landau_n_rt_rp_satzd166e a n)) : l_e_st_eq_landau_n_rt_rp_ratrp (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_satzd166e a n))).
-
-(* constant 3422 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd174 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.(λt:l_not (l_e_st_eq_landau_n_rt_rp_zero a).l_e_st_eq_landau_n_rt_rp_2d174_t3 a i t : l_e_st_eq_landau_n_rt_rp_ratd a).
-
-(* constant 3423 *)
-definition l_e_st_eq_landau_n_rt_rp_pd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3424 *)
-definition l_e_st_eq_landau_n_rt_rp_pd12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_issmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_pl a1 b1) (l_e_st_eq_landau_n_rt_rp_pl a2 b2) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)) b1 (l_e_st_eq_landau_n_rt_rp_stmis a1 a2) (l_e_st_eq_landau_n_rt_rp_stmis b1 b2)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2)) b2 (l_e_st_eq_landau_n_rt_rp_stdis a1 a2) (l_e_st_eq_landau_n_rt_rp_stdis b1 b2)) : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b1) (l_e_st_eq_landau_n_rt_rp_pl a2 b2))).
-
-(* constant 3425 *)
-definition l_e_st_eq_landau_n_rt_rp_pd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_issmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r2) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) r1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_stmis r1 r2)) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2)) r2 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_stdis r1 r2)) : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r2))).
-
-(* constant 3426 *)
-definition l_e_st_eq_landau_n_rt_rp_pd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_issmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl r2 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) r1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_stmis r1 r2)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2)) r2 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_stdis r1 r2)) : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl r2 (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3427 *)
-definition l_e_st_eq_landau_n_rt_rp_pdeq12a ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b1) (l_e_st_eq_landau_n_rt_rp_pl a2 b2)) (l_e_st_eq_landau_n_rt_rp_pd12 a1 a2 b1 b2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b1) (l_e_st_eq_landau_n_rt_rp_pl a2 b2))).
-
-(* constant 3428 *)
-definition l_e_st_eq_landau_n_rt_rp_pdeq12b ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq2 (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b1) (l_e_st_eq_landau_n_rt_rp_pl a2 b2)) (l_e_st_eq_landau_n_rt_rp_pd12 a1 a2 b1 b2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b1) (l_e_st_eq_landau_n_rt_rp_pl a2 b2)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2))).
-
-(* constant 3429 *)
-definition l_e_st_eq_landau_n_rt_rp_pdeq1a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pd1 a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r2))).
-
-(* constant 3430 *)
-definition l_e_st_eq_landau_n_rt_rp_pdeq1b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq2 (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pd1 a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_df r1 r2))).
-
-(* constant 3431 *)
-definition l_e_st_eq_landau_n_rt_rp_pdeq2a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pd2 a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl r2 (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3432 *)
-definition l_e_st_eq_landau_n_rt_rp_pdeq2b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq2 (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pd2 a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df r1 r2) a)).
-
-(* constant 3433 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd175 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pd b a)).
-
-(* constant 3434 *)
-definition l_e_st_eq_landau_n_rt_rp_compd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satzd175 a b : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pd b a)).
-
-(* constant 3435 *)
-definition l_e_st_eq_landau_n_rt_rp_iv3d_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_4pl23 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2c a b c)) e) (l_e_st_eq_landau_n_rt_rp_4pl23 (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2c a b c)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)))).
-
-(* constant 3436 *)
-definition l_e_st_eq_landau_n_rt_rp_eqpd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_iv3d_t1 a b c e) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)).
-
-(* constant 3437 *)
-definition l_e_st_eq_landau_n_rt_rp_eqpd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_pd c b) (l_e_st_eq_landau_n_rt_rp_compd c a) (l_e_st_eq_landau_n_rt_rp_eqpd1 a b c e) (l_e_st_eq_landau_n_rt_rp_compd b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b)).
-
-(* constant 3438 *)
-definition l_e_st_eq_landau_n_rt_rp_eqpd12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_eqpd1 a b c e) (l_e_st_eq_landau_n_rt_rp_eqpd2 c d b f) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3439 *)
-definition l_e_st_eq_landau_n_rt_rp_iv3d_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_tr4is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b)) z (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_asspl2 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_1b a b)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)))).
-
-(* constant 3440 *)
-definition l_e_st_eq_landau_n_rt_rp_pd01 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_eqi2 b (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_iv3d_t2 a b z) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a b) b).
-
-(* constant 3441 *)
-definition l_e_st_eq_landau_n_rt_rp_pd02 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pd b a) a (l_e_st_eq_landau_n_rt_rp_compd a b) (l_e_st_eq_landau_n_rt_rp_pd01 b a z) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a b) a).
-
-(* constant 3442 *)
-definition l_e_st_eq_landau_n_rt_rp_ppd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_posdi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_satz137 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) p q) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3443 *)
-definition l_e_st_eq_landau_n_rt_rp_npd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λo:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_negdi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_satz137a (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) n o) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3444 *)
-definition l_e_st_eq_landau_n_rt_rp_m0d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3445 *)
-definition l_e_st_eq_landau_n_rt_rp_m0deqa ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2 a1 (l_e_st_eq_landau_n_rt_rp_stdis a1 a2) (l_e_st_eq_landau_n_rt_rp_stmis a1 a2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_df a2 a1)).
-
-(* constant 3446 *)
-definition l_e_st_eq_landau_n_rt_rp_m0deqb ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_df a2 a1) (l_e_st_eq_landau_n_rt_rp_m0deqa a1 a2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df a2 a1) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_df a1 a2))).
-
-(* constant 3447 *)
-definition l_e_st_eq_landau_n_rt_rp_iv3d_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_symeq a b e) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a))).
-
-(* constant 3448 *)
-definition l_e_st_eq_landau_n_rt_rp_eqm0d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_iv3d_t3 a b e) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)).
-
-(* constant 3449 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd176a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_negdi (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) p) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_m0d a)).
-
-(* constant 3450 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd176b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_zeroi (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) z) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_m0d a)).
-
-(* constant 3451 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd176c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_posdi (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) n) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_m0d a)).
-
-(* constant 3452 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd176d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_m0d a).(l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_stmis (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_stdis (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) n) : l_e_st_eq_landau_n_rt_rp_posd a).
-
-(* constant 3453 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd176e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_m0d a).(l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_isstm (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) z (l_e_st_eq_landau_n_rt_rp_stdis (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))) : l_e_st_eq_landau_n_rt_rp_zero a).
-
-(* constant 3454 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd176f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_m0d a).(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_stmis (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_stdis (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) p) : l_e_st_eq_landau_n_rt_rp_negd a).
-
-(* constant 3455 *)
-definition l_e_st_eq_landau_n_rt_rp_m0d0 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_zeroeq (l_e_st_eq_landau_n_rt_rp_m0d a) a (l_e_st_eq_landau_n_rt_rp_satzd176b a z) z : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d a) a).
-
-(* constant 3456 *)
-definition l_e_st_eq_landau_n_rt_rp_3d177_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_tris l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) a (l_e_st_eq_landau_n_rt_rp_issmsd (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_stdis (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_stmis (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_dfis a) : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) a).
-
-(* constant 3457 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd177 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) a (l_e_st_eq_landau_n_rt_rp_3d177_t1 a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) a).
-
-(* constant 3458 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd177a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) a (l_e_st_eq_landau_n_rt_rp_satzd177 a) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a))).
-
-(* constant 3459 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd177b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_m0d b).(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b)) b (l_e_st_eq_landau_n_rt_rp_eqm0d a (l_e_st_eq_landau_n_rt_rp_m0d b) e) (l_e_st_eq_landau_n_rt_rp_satzd177 b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d a) b).
-
-(* constant 3460 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd177c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_m0d b).(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_m0d a) b (l_e_st_eq_landau_n_rt_rp_satzd177b a b e) : l_e_st_eq_landau_n_rt_rp_eq b (l_e_st_eq_landau_n_rt_rp_m0d a)).
-
-(* constant 3461 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd177d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d a) b.(l_e_st_eq_landau_n_rt_rp_satzd177c b a (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_m0d a) b e) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_m0d b)).
-
-(* constant 3462 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd177e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d a) b.(l_e_st_eq_landau_n_rt_rp_symeq a (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_satzd177d a b e) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d b) a).
-
-(* constant 3463 *)
-definition l_e_st_eq_landau_n_rt_rp_3d178_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) a (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absnd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_satzd176a a p)) (l_e_st_eq_landau_n_rt_rp_satzd177 a) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a p))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3464 *)
-definition l_e_st_eq_landau_n_rt_rp_3d178_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_m0d a) a (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absnnd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_0notnd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_satzd176b a z))) (l_e_st_eq_landau_n_rt_rp_m0d0 a z) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_0notnd a z))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3465 *)
-definition l_e_st_eq_landau_n_rt_rp_3d178_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absnnd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_pnotnd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_satzd176c a n))) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_absnd a n)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3466 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd178 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_rappd a (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_absd a)) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_3d178_t1 a t) (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_3d178_t2 a t) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_3d178_t3 a t) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3467 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd178a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_satzd178 a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a))).
-
-(* constant 3468 *)
-definition l_e_st_eq_landau_n_rt_rp_3d179_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_pdeq1b a (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_m0d a))).
-
-(* constant 3469 *)
-definition l_e_st_eq_landau_n_rt_rp_3d179_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_zeroi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)))).
-
-(* constant 3470 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd179 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_3d179_t1 a) (l_e_st_eq_landau_n_rt_rp_3d179_t2 a) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_m0d a))).
-
-(* constant 3471 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd179a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) a) (l_e_st_eq_landau_n_rt_rp_compd a (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_satzd179 a) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) a)).
-
-(* constant 3472 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd180 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_m0deqa (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pdeq12b (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3473 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd180a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_satzd180 a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b))).
-
-(* constant 3474 *)
-definition l_e_st_eq_landau_n_rt_rp_md ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_m0d b) : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3475 *)
-definition l_e_st_eq_landau_n_rt_rp_mdeq12a ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b2 b1)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl a2 b1)) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df b2 b1) (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_m0deqa b1 b2)) (l_e_st_eq_landau_n_rt_rp_pdeq12a a1 a2 b2 b1) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl a2 b1))).
-
-(* constant 3476 *)
-definition l_e_st_eq_landau_n_rt_rp_mdeq12b ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl a2 b1)) (l_e_st_eq_landau_n_rt_rp_mdeq12a a1 a2 b1 b2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl a1 b2) (l_e_st_eq_landau_n_rt_rp_pl a2 b1)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2))).
-
-(* constant 3477 *)
-definition l_e_st_eq_landau_n_rt_rp_mdeq1a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_md a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_df r2 r1)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r1)) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df r2 r1) a (l_e_st_eq_landau_n_rt_rp_m0deqa r1 r2)) (l_e_st_eq_landau_n_rt_rp_pdeq1a a r2 r1) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r1))).
-
-(* constant 3478 *)
-definition l_e_st_eq_landau_n_rt_rp_mdeq1b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_md a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r1)) (l_e_st_eq_landau_n_rt_rp_mdeq1a a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) r1)) (l_e_st_eq_landau_n_rt_rp_md a (l_e_st_eq_landau_n_rt_rp_df r1 r2))).
-
-(* constant 3479 *)
-definition l_e_st_eq_landau_n_rt_rp_mdeq2a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pdeq12a r1 r2 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl r2 (l_e_st_eq_landau_n_rt_rp_1a a)))).
-
-(* constant 3480 *)
-definition l_e_st_eq_landau_n_rt_rp_mdeq2b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pdeq12b r1 r2 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl r2 (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_df r1 r2) a)).
-
-(* constant 3481 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqpd1 a b (l_e_st_eq_landau_n_rt_rp_m0d c) e : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md a c) (l_e_st_eq_landau_n_rt_rp_md b c)).
-
-(* constant 3482 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b) c (l_e_st_eq_landau_n_rt_rp_eqm0d a b e) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md c a) (l_e_st_eq_landau_n_rt_rp_md c b)).
-
-(* constant 3483 *)
-definition l_e_st_eq_landau_n_rt_rp_eqmd12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_md a c) (l_e_st_eq_landau_n_rt_rp_md b c) (l_e_st_eq_landau_n_rt_rp_md b d) (l_e_st_eq_landau_n_rt_rp_eqmd1 a b c e) (l_e_st_eq_landau_n_rt_rp_eqmd2 c d b f) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md a c) (l_e_st_eq_landau_n_rt_rp_md b d)).
-
-(* constant 3484 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd181 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b))) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) b) (l_e_st_eq_landau_n_rt_rp_md b a) (l_e_st_eq_landau_n_rt_rp_satzd180 a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b)) b (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_satzd177 b)) (l_e_st_eq_landau_n_rt_rp_compd (l_e_st_eq_landau_n_rt_rp_m0d a) b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_md b a)).
-
-(* constant 3485 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd181a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_md b a)) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_satzd181 b a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_md b a))).
-
-(* constant 3486 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pdeq1a a (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_eqsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3487 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_3d182_t1 a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3488 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_stmis (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))).
-
-(* constant 3489 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_stdis (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))).
-
-(* constant 3490 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md a b).(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_3d182_t1 a b) p : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3491 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd182a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md a b).(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_3d182_t3 a b) (l_e_st_eq_landau_n_rt_rp_3d182_t4 a b) (l_e_st_eq_landau_n_rt_rp_3d182_t5 a b p) : l_e_st_eq_landau_n_rt_rp_mored a b).
-
-(* constant 3492 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md a b).(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_3d182_t1 a b) z : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3493 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd182b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md a b).(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_isstm (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_3d182_t6 a b z) (l_e_st_eq_landau_n_rt_rp_3d182_t4 a b) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3494 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_md a b).(l_e_st_eq_landau_n_rt_rp_eqnegd (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_3d182_t1 a b) n : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3495 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd182c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_md a b).(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_3d182_t3 a b) (l_e_st_eq_landau_n_rt_rp_3d182_t4 a b) (l_e_st_eq_landau_n_rt_rp_3d182_t7 a b n) : l_e_st_eq_landau_n_rt_rp_lessd a b).
-
-(* constant 3496 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t8 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_posdi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) m : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3497 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd182d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_3d182_t2 a b) (l_e_st_eq_landau_n_rt_rp_3d182_t8 a b m) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3498 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t9 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_zeroi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) e : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3499 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd182e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_3d182_t2 a b) (l_e_st_eq_landau_n_rt_rp_3d182_t9 a b e) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3500 *)
-definition l_e_st_eq_landau_n_rt_rp_3d182_t10 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_negdi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) l : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3501 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd182f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_eqnegd (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_3d182_t2 a b) (l_e_st_eq_landau_n_rt_rp_3d182_t10 a b l) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3502 *)
-definition l_e_st_eq_landau_n_rt_rp_3d183_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d a))) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_12issmsd (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d a)))).
-
-(* constant 3503 *)
-definition l_e_st_eq_landau_n_rt_rp_3d183_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_3d183_t1 b a : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d b)))).
-
-(* constant 3504 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd183a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_isless12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d a))) (l_e_st_eq_landau_n_rt_rp_3d183_t2 a b) (l_e_st_eq_landau_n_rt_rp_3d183_t1 a b) (l_e_st_eq_landau_n_rt_rp_lemmad5 a b m) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)).
-
-(* constant 3505 *)
-definition l_e_st_eq_landau_n_rt_rp_staz183b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqm0d a b e : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)).
-
-(* constant 3506 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd183c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_m0d a))) (l_e_st_eq_landau_n_rt_rp_3d183_t2 a b) (l_e_st_eq_landau_n_rt_rp_3d183_t1 a b) (l_e_st_eq_landau_n_rt_rp_lemmad6 a b l) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)).
-
-(* constant 3507 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd183d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b).(l_e_st_eq_landau_n_rt_rp_eqmored12 (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) a (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b)) b (l_e_st_eq_landau_n_rt_rp_satzd177 a) (l_e_st_eq_landau_n_rt_rp_satzd177 b) (l_e_st_eq_landau_n_rt_rp_satzd183c (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b) l) : l_e_st_eq_landau_n_rt_rp_mored a b).
-
-(* constant 3508 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd183e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b).(l_e_st_eq_landau_n_rt_rp_tr3eq a (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b)) b (l_e_st_eq_landau_n_rt_rp_satzd177a a) (l_e_st_eq_landau_n_rt_rp_eqm0d (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b) e) (l_e_st_eq_landau_n_rt_rp_satzd177 b) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3509 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd183f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b).(l_e_st_eq_landau_n_rt_rp_eqlessd12 (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a)) a (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b)) b (l_e_st_eq_landau_n_rt_rp_satzd177 a) (l_e_st_eq_landau_n_rt_rp_satzd177 b) (l_e_st_eq_landau_n_rt_rp_satzd183a (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b) m) : l_e_st_eq_landau_n_rt_rp_lessd a b).
-
-(* constant 3510 *)
-definition l_e_st_eq_landau_n_rt_rp_3d184_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq a (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_lemmad3 a (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_asspl2 (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_3pl12 (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_mdeq12b (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3511 *)
-definition l_e_st_eq_landau_n_rt_rp_3d184_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_and3i (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_3d184_t1 a) : l_and3 (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_2a a))))).
-
-(* constant 3512 *)
-definition l_e_st_eq_landau_n_rt_rp_3d184_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and3 (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_posd x) (l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a)) x))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_3d184_t2 a) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and3 (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_posd x) (l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a)) x)))).
-
-(* constant 3513 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd184 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_and3 (l_e_st_eq_landau_n_rt_rp_posd x) (l_e_st_eq_landau_n_rt_rp_posd y) (l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_md x y)))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_3d184_t3 a) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_and3 (l_e_st_eq_landau_n_rt_rp_posd x) (l_e_st_eq_landau_n_rt_rp_posd y) (l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_md x y))))).
-
-(* constant 3514 *)
-definition l_e_st_eq_landau_n_rt_rp_asspd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_pdeq2a c (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pdeq1b a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd b c))).
-
-(* constant 3515 *)
-definition l_e_st_eq_landau_n_rt_rp_asspd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_asspd1 a b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c)).
-
-(* constant 3516 *)
-definition l_e_st_eq_landau_n_rt_rp_3pd23 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd c b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a c) b) (l_e_st_eq_landau_n_rt_rp_asspd1 a b c) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_pd c b) a (l_e_st_eq_landau_n_rt_rp_compd b c)) (l_e_st_eq_landau_n_rt_rp_asspd2 a c b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a c) b)).
-
-(* constant 3517 *)
-definition l_e_st_eq_landau_n_rt_rp_4pd23 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pd c d)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c) d) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a c) b) d) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)) (l_e_st_eq_landau_n_rt_rp_asspd2 (l_e_st_eq_landau_n_rt_rp_pd a b) c d) (l_e_st_eq_landau_n_rt_rp_eqpd1 (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a c) b) d (l_e_st_eq_landau_n_rt_rp_3pd23 a b c)) (l_e_st_eq_landau_n_rt_rp_asspd1 (l_e_st_eq_landau_n_rt_rp_pd a c) b d) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pd c d)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d))).
-
-(* constant 3518 *)
-definition l_e_st_eq_landau_n_rt_rp_pdmd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md a b) b) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d b) b)) a (l_e_st_eq_landau_n_rt_rp_asspd1 a (l_e_st_eq_landau_n_rt_rp_m0d b) b) (l_e_st_eq_landau_n_rt_rp_pd02 a (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d b) b) (l_e_st_eq_landau_n_rt_rp_satzd179a b)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md a b) b) a).
-
-(* constant 3519 *)
-definition l_e_st_eq_landau_n_rt_rp_mdpd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a b) b) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd b (l_e_st_eq_landau_n_rt_rp_m0d b))) a (l_e_st_eq_landau_n_rt_rp_asspd1 a b (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_pd02 a (l_e_st_eq_landau_n_rt_rp_pd b (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_satzd179 b)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a b) b) a).
-
-(* constant 3520 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd185 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_md c d)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_m0d d))) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)) (l_e_st_eq_landau_n_rt_rp_4pd23 a (l_e_st_eq_landau_n_rt_rp_m0d b) c (l_e_st_eq_landau_n_rt_rp_m0d d)) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_m0d d)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd b d)) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_satzd180a b d)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_md c d)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d))).
-
-(* constant 3521 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd186 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_asspd1 a b c : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_pd a (l_e_st_eq_landau_n_rt_rp_pd b c))).
-
-(* constant 3522 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd187a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd b (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md a b) b) a (l_e_st_eq_landau_n_rt_rp_compd b (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_pdmd a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd b (l_e_st_eq_landau_n_rt_rp_md a b)) a).
-
-(* constant 3523 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd187c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λx:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd b x) a.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd x b) b) x (l_e_st_eq_landau_n_rt_rp_eqmd1 a (l_e_st_eq_landau_n_rt_rp_pd x b) b (l_e_st_eq_landau_n_rt_rp_treq1 a (l_e_st_eq_landau_n_rt_rp_pd x b) (l_e_st_eq_landau_n_rt_rp_pd b x) e (l_e_st_eq_landau_n_rt_rp_compd b x))) (l_e_st_eq_landau_n_rt_rp_mdpd x b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md a b) x).
-
-(* constant 3524 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd187d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λx:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd b x) a.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_md a b) x (l_e_st_eq_landau_n_rt_rp_satzd187c a b x e) : l_e_st_eq_landau_n_rt_rp_eq x (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3525 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd187e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λx:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd x b) a.(l_e_st_eq_landau_n_rt_rp_satzd187c a b x (l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd b x) (l_e_st_eq_landau_n_rt_rp_pd x b) a (l_e_st_eq_landau_n_rt_rp_compd b x) e) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md a b) x).
-
-(* constant 3526 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd187f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λx:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd x b) a.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_md a b) x (l_e_st_eq_landau_n_rt_rp_satzd187e a b x e) : l_e_st_eq_landau_n_rt_rp_eq x (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3527 *)
-definition l_e_st_eq_landau_n_rt_rp_3d188_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_m0d c))) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_md c c)) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_m0d c)) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_satzd180 b c)) (l_e_st_eq_landau_n_rt_rp_4pd23 a c (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_m0d c)) (l_e_st_eq_landau_n_rt_rp_pd02 (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_md c c) (l_e_st_eq_landau_n_rt_rp_satzd179 c)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3528 *)
-definition l_e_st_eq_landau_n_rt_rp_3d188_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_3d188_t1 a b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c))).
-
-(* constant 3529 *)
-definition l_e_st_eq_landau_n_rt_rp_3d188_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c).(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_3d188_t1 a b c) (l_e_st_eq_landau_n_rt_rp_satzd182d (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c) m) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3530 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c).(l_e_st_eq_landau_n_rt_rp_satzd182a a b (l_e_st_eq_landau_n_rt_rp_3d188_t3 a b c m) : l_e_st_eq_landau_n_rt_rp_mored a b).
-
-(* constant 3531 *)
-definition l_e_st_eq_landau_n_rt_rp_3d188_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c).(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_3d188_t1 a b c) (l_e_st_eq_landau_n_rt_rp_satzd182e (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c) e) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3532 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c).(l_e_st_eq_landau_n_rt_rp_satzd182b a b (l_e_st_eq_landau_n_rt_rp_3d188_t4 a b c e) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3533 *)
-definition l_e_st_eq_landau_n_rt_rp_3d188_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c).(l_e_st_eq_landau_n_rt_rp_eqnegd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_3d188_t1 a b c) (l_e_st_eq_landau_n_rt_rp_satzd182f (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c) l) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3534 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c).(l_e_st_eq_landau_n_rt_rp_satzd182c a b (l_e_st_eq_landau_n_rt_rp_3d188_t5 a b c l) : l_e_st_eq_landau_n_rt_rp_lessd a b).
-
-(* constant 3535 *)
-definition l_e_st_eq_landau_n_rt_rp_3d188_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_3d188_t2 a b c) (l_e_st_eq_landau_n_rt_rp_satzd182d a b m) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c))).
-
-(* constant 3536 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_satzd182a (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_3d188_t6 a b c m) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)).
-
-(* constant 3537 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqpd1 a b c e : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)).
-
-(* constant 3538 *)
-definition l_e_st_eq_landau_n_rt_rp_3d188_t7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_eqnegd (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_3d188_t2 a b c) (l_e_st_eq_landau_n_rt_rp_satzd182f a b l) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c))).
-
-(* constant 3539 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_satzd182c (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_3d188_t7 a b c l) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c)).
-
-(* constant 3540 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188g ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b).(l_e_st_eq_landau_n_rt_rp_satzd188a a b c (l_e_st_eq_landau_n_rt_rp_eqmored12 (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd c b) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_compd c a) (l_e_st_eq_landau_n_rt_rp_compd c b) m) : l_e_st_eq_landau_n_rt_rp_mored a b).
-
-(* constant 3541 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188h ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b).(l_e_st_eq_landau_n_rt_rp_satzd188b a b c (l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_compd a c) e (l_e_st_eq_landau_n_rt_rp_compd c b)) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3542 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188j ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b).λl:l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b).(l_e_st_eq_landau_n_rt_rp_satzd188c a b c (l_e_st_eq_landau_n_rt_rp_eqlessd12 (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd c b) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_compd c a) (l_e_st_eq_landau_n_rt_rp_compd c b) l) : l_e_st_eq_landau_n_rt_rp_lessd a b).
-
-(* constant 3543 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188k ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_eqmored12 (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_pd c b) (l_e_st_eq_landau_n_rt_rp_compd a c) (l_e_st_eq_landau_n_rt_rp_compd b c) (l_e_st_eq_landau_n_rt_rp_satzd188d a b c m) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b)).
-
-(* constant 3544 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188l ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqpd2 a b c e : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b)).
-
-(* constant 3545 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188m ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.(l_e_st_eq_landau_n_rt_rp_eqlessd12 (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_pd c b) (l_e_st_eq_landau_n_rt_rp_compd a c) (l_e_st_eq_landau_n_rt_rp_compd b c) (l_e_st_eq_landau_n_rt_rp_satzd188f a b c l) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd c b)).
-
-(* constant 3546 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188n ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λm:l_e_st_eq_landau_n_rt_rp_mored c d.(l_e_st_eq_landau_n_rt_rp_eqmored2 (l_e_st_eq_landau_n_rt_rp_pd a d) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_eqpd1 a b d e) (l_e_st_eq_landau_n_rt_rp_satzd188k c d a m) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3547 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188o ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λm:l_e_st_eq_landau_n_rt_rp_mored c d.(l_e_st_eq_landau_n_rt_rp_eqmored12 (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_pd d b) (l_e_st_eq_landau_n_rt_rp_compd a c) (l_e_st_eq_landau_n_rt_rp_compd b d) (l_e_st_eq_landau_n_rt_rp_satzd188n a b c d e m) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd d b)).
-
-(* constant 3548 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188p ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λl:l_e_st_eq_landau_n_rt_rp_lessd c d.(l_e_st_eq_landau_n_rt_rp_eqlessd2 (l_e_st_eq_landau_n_rt_rp_pd a d) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_eqpd1 a b d e) (l_e_st_eq_landau_n_rt_rp_satzd188m c d a l) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3549 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd188q ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λl:l_e_st_eq_landau_n_rt_rp_lessd c d.(l_e_st_eq_landau_n_rt_rp_eqlessd12 (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_pd d b) (l_e_st_eq_landau_n_rt_rp_compd a c) (l_e_st_eq_landau_n_rt_rp_compd b d) (l_e_st_eq_landau_n_rt_rp_satzd188p a b c d e l) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd d b)).
-
-(* constant 3550 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd189 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λn:l_e_st_eq_landau_n_rt_rp_mored c d.(l_e_st_eq_landau_n_rt_rp_trmored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b c) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_satzd188d a b c m) (l_e_st_eq_landau_n_rt_rp_satzd188k c d b n) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3551 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd189a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λk:l_e_st_eq_landau_n_rt_rp_lessd c d.(l_e_st_eq_landau_n_rt_rp_lemmad5 (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_satzd189 b a d c (l_e_st_eq_landau_n_rt_rp_lemmad6 a b l) (l_e_st_eq_landau_n_rt_rp_lemmad6 c d k)) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3552 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd190a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.λn:l_e_st_eq_landau_n_rt_rp_mored c d.(l_orapp (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)) m (λt:l_e_st_eq_landau_n_rt_rp_mored a b.l_e_st_eq_landau_n_rt_rp_satzd189 a b c d t n) (λt:l_e_st_eq_landau_n_rt_rp_eq a b.l_e_st_eq_landau_n_rt_rp_satzd188n a b c d t n) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3553 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd190b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λn:l_e_st_eq_landau_n_rt_rp_moreq c d.(l_e_st_eq_landau_n_rt_rp_eqmored12 (l_e_st_eq_landau_n_rt_rp_pd c a) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd d b) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_compd c a) (l_e_st_eq_landau_n_rt_rp_compd d b) (l_e_st_eq_landau_n_rt_rp_satzd190a c d a b n m) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3554 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd190c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.λk:l_e_st_eq_landau_n_rt_rp_lessd c d.(l_e_st_eq_landau_n_rt_rp_lemmad5 (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_satzd190a b a d c (l_e_st_eq_landau_n_rt_rp_satzd168b a b l) (l_e_st_eq_landau_n_rt_rp_lemmad6 c d k)) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3555 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd190d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λk:l_e_st_eq_landau_n_rt_rp_lesseq c d.(l_e_st_eq_landau_n_rt_rp_lemmad5 (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_satzd190b b a d c (l_e_st_eq_landau_n_rt_rp_lemmad6 a b l) (l_e_st_eq_landau_n_rt_rp_satzd168b c d k)) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3556 *)
-definition l_e_st_eq_landau_n_rt_rp_3d191_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.λn:l_e_st_eq_landau_n_rt_rp_moreq c d.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.(l_e_st_eq_landau_n_rt_rp_moreqi2 (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_eqpd12 a b c d e f) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3557 *)
-definition l_e_st_eq_landau_n_rt_rp_3d191_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.λn:l_e_st_eq_landau_n_rt_rp_moreq c d.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λo:l_e_st_eq_landau_n_rt_rp_mored c d.(l_e_st_eq_landau_n_rt_rp_moreqi1 (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_satzd190a a b c d m o) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3558 *)
-definition l_e_st_eq_landau_n_rt_rp_3d191_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.λn:l_e_st_eq_landau_n_rt_rp_moreq c d.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_orapp (l_e_st_eq_landau_n_rt_rp_mored c d) (l_e_st_eq_landau_n_rt_rp_eq c d) (l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)) n (λt:l_e_st_eq_landau_n_rt_rp_mored c d.l_e_st_eq_landau_n_rt_rp_3d191_t2 a b c d m n e t) (λt:l_e_st_eq_landau_n_rt_rp_eq c d.l_e_st_eq_landau_n_rt_rp_3d191_t1 a b c d m n e t) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3559 *)
-definition l_e_st_eq_landau_n_rt_rp_3d191_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.λn:l_e_st_eq_landau_n_rt_rp_moreq c d.λo:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_moreqi1 (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_satzd190b a b c d o n) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3560 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd191 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_moreq a b.λn:l_e_st_eq_landau_n_rt_rp_moreq c d.(l_orapp (l_e_st_eq_landau_n_rt_rp_mored a b) (l_e_st_eq_landau_n_rt_rp_eq a b) (l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)) m (λt:l_e_st_eq_landau_n_rt_rp_mored a b.l_e_st_eq_landau_n_rt_rp_3d191_t4 a b c d m n t) (λt:l_e_st_eq_landau_n_rt_rp_eq a b.l_e_st_eq_landau_n_rt_rp_3d191_t3 a b c d m n t) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3561 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd191a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lesseq a b.λk:l_e_st_eq_landau_n_rt_rp_lesseq c d.(l_e_st_eq_landau_n_rt_rp_satzd168a (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_satzd191 b a d c (l_e_st_eq_landau_n_rt_rp_satzd168b a b l) (l_e_st_eq_landau_n_rt_rp_satzd168b c d k)) : l_e_st_eq_landau_n_rt_rp_lesseq (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d)).
-
-(* constant 3562 *)
-definition l_e_st_eq_landau_n_rt_rp_td ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3563 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t1 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ists1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a1 r (l_e_st_eq_landau_n_rt_rp_stmis a1 a2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) r) (l_e_st_eq_landau_n_rt_rp_ts a1 r)).
-
-(* constant 3564 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t2 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ists2 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a1 r (l_e_st_eq_landau_n_rt_rp_stmis a1 a2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_ts r a1)).
-
-(* constant 3565 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t3 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ists1 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2 r (l_e_st_eq_landau_n_rt_rp_stdis a1 a2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) r) (l_e_st_eq_landau_n_rt_rp_ts a2 r)).
-
-(* constant 3566 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t4 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ists2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) a2 r (l_e_st_eq_landau_n_rt_rp_stdis a1 a2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_ts r a2)).
-
-(* constant 3567 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t5 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) r) (l_e_st_eq_landau_n_rt_rp_ts a1 r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) s) (l_e_st_eq_landau_n_rt_rp_ts a2 s) (l_e_st_eq_landau_n_rt_rp_iv4d_t1 a1 a2 r) (l_e_st_eq_landau_n_rt_rp_iv4d_t3 a1 a2 s) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 r) (l_e_st_eq_landau_n_rt_rp_ts a2 s))).
-
-(* constant 3568 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t6 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_ts r a1) (l_e_st_eq_landau_n_rt_rp_ts s (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_ts s a2) (l_e_st_eq_landau_n_rt_rp_iv4d_t2 a1 a2 r) (l_e_st_eq_landau_n_rt_rp_iv4d_t4 a1 a2 s) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_ts s (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r a1) (l_e_st_eq_landau_n_rt_rp_ts s a2))).
-
-(* constant 3569 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t7 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) r) (l_e_st_eq_landau_n_rt_rp_ts a2 r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) s) (l_e_st_eq_landau_n_rt_rp_ts a1 s) (l_e_st_eq_landau_n_rt_rp_iv4d_t3 a1 a2 r) (l_e_st_eq_landau_n_rt_rp_iv4d_t1 a1 a2 s) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a2 r) (l_e_st_eq_landau_n_rt_rp_ts a1 s))).
-
-(* constant 3570 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t8 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_ts r a2) (l_e_st_eq_landau_n_rt_rp_ts s (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_ts s a1) (l_e_st_eq_landau_n_rt_rp_iv4d_t4 a1 a2 r) (l_e_st_eq_landau_n_rt_rp_iv4d_t2 a1 a2 s) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2))) (l_e_st_eq_landau_n_rt_rp_ts s (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r a2) (l_e_st_eq_landau_n_rt_rp_ts s a1))).
-
-(* constant 3571 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t9 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_ts a2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b1) (l_e_st_eq_landau_n_rt_rp_ts a2 b2)) (l_e_st_eq_landau_n_rt_rp_iv4d_t5 a1 a2 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_iv4d_t6 b1 b2 a1 a2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b1) (l_e_st_eq_landau_n_rt_rp_ts a2 b2))).
-
-(* constant 3572 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t10 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_ts a2 (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b2) (l_e_st_eq_landau_n_rt_rp_ts a2 b1)) (l_e_st_eq_landau_n_rt_rp_iv4d_t5 a1 a2 (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_iv4d_t8 b1 b2 a1 a2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b2) (l_e_st_eq_landau_n_rt_rp_ts a2 b1))).
-
-(* constant 3573 *)
-definition l_e_st_eq_landau_n_rt_rp_td12 ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_issmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df b1 b2))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df a1 a2)) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df b1 b2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b1) (l_e_st_eq_landau_n_rt_rp_ts a2 b2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b2) (l_e_st_eq_landau_n_rt_rp_ts a2 b1)) (l_e_st_eq_landau_n_rt_rp_iv4d_t9 a1 a2 b1 b2) (l_e_st_eq_landau_n_rt_rp_iv4d_t10 a1 a2 b1 b2) : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b1) (l_e_st_eq_landau_n_rt_rp_ts a2 b2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b2) (l_e_st_eq_landau_n_rt_rp_ts a2 b1)))).
-
-(* constant 3574 *)
-definition l_e_st_eq_landau_n_rt_rp_td1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_issmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r1)) (l_e_st_eq_landau_n_rt_rp_iv4d_t6 r1 r2 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_iv4d_t8 r1 r2 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r1)))).
-
-(* constant 3575 *)
-definition l_e_st_eq_landau_n_rt_rp_td2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_issmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_iv4d_t5 r1 r2 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_iv4d_t5 r1 r2 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) : l_e_is l_e_st_eq_landau_n_rt_rp_dif (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_1a a))))).
-
-(* constant 3576 *)
-definition l_e_st_eq_landau_n_rt_rp_tdeq12a ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b1) (l_e_st_eq_landau_n_rt_rp_ts a2 b2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b2) (l_e_st_eq_landau_n_rt_rp_ts a2 b1))) (l_e_st_eq_landau_n_rt_rp_td12 a1 a2 b1 b2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b1) (l_e_st_eq_landau_n_rt_rp_ts a2 b2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b2) (l_e_st_eq_landau_n_rt_rp_ts a2 b1)))).
-
-(* constant 3577 *)
-definition l_e_st_eq_landau_n_rt_rp_tdeq12b ≝ λa1:l_e_st_eq_landau_n_rt_cut.λa2:l_e_st_eq_landau_n_rt_cut.λb1:l_e_st_eq_landau_n_rt_cut.λb2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq2 (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b1) (l_e_st_eq_landau_n_rt_rp_ts a2 b2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b2) (l_e_st_eq_landau_n_rt_rp_ts a2 b1))) (l_e_st_eq_landau_n_rt_rp_td12 a1 a2 b1 b2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b1) (l_e_st_eq_landau_n_rt_rp_ts a2 b2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts a1 b2) (l_e_st_eq_landau_n_rt_rp_ts a2 b1))) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df a1 a2) (l_e_st_eq_landau_n_rt_rp_df b1 b2))).
-
-(* constant 3578 *)
-definition l_e_st_eq_landau_n_rt_rp_tdeq1a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r1))) (l_e_st_eq_landau_n_rt_rp_td1 a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r1)))).
-
-(* constant 3579 *)
-definition l_e_st_eq_landau_n_rt_rp_tdeq1b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq2 (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_df r1 r2)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r1))) (l_e_st_eq_landau_n_rt_rp_td1 a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r1) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r2) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r1))) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_df r1 r2))).
-
-(* constant 3580 *)
-definition l_e_st_eq_landau_n_rt_rp_tdeq2a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq1 (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_1a a)))) (l_e_st_eq_landau_n_rt_rp_td2 a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_1a a))))).
-
-(* constant 3581 *)
-definition l_e_st_eq_landau_n_rt_rp_tdeq2b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_refeq2 (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df r1 r2) a) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_1a a)))) (l_e_st_eq_landau_n_rt_rp_td2 a r1 r2) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r1 (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts r2 (l_e_st_eq_landau_n_rt_rp_1a a)))) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_df r1 r2) a)).
-
-(* constant 3582 *)
-definition l_e_st_eq_landau_n_rt_rp_4d194_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3583 *)
-definition l_e_st_eq_landau_n_rt_rp_4d194_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_comts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a)))).
-
-(* constant 3584 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd194 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_4d194_t1 a b) (l_e_st_eq_landau_n_rt_rp_4d194_t2 a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td b a)).
-
-(* constant 3585 *)
-definition l_e_st_eq_landau_n_rt_rp_comtd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satzd194 a b : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td b a)).
-
-(* constant 3586 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t11 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λr:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) r)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) r) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r)) (l_e_st_eq_landau_n_rt_rp_distpt1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b) r) (l_e_st_eq_landau_n_rt_rp_ists1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a)) r e) (l_e_st_eq_landau_n_rt_rp_disttp1 (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2a a) r) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) r)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) r))).
-
-(* constant 3587 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_iv4d_t11 a b c e (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_iv4d_t11 b a c (l_e_st_eq_landau_n_rt_rp_symeq a b e) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c))))).
-
-(* constant 3588 *)
-definition l_e_st_eq_landau_n_rt_rp_eqtd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_iv4d_t12 a b c e) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)).
-
-(* constant 3589 *)
-definition l_e_st_eq_landau_n_rt_rp_eqtd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_td c b) (l_e_st_eq_landau_n_rt_rp_comtd c a) (l_e_st_eq_landau_n_rt_rp_eqtd1 a b c e) (l_e_st_eq_landau_n_rt_rp_comtd b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b)).
-
-(* constant 3590 *)
-definition l_e_st_eq_landau_n_rt_rp_eqtd12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_td b d) (l_e_st_eq_landau_n_rt_rp_eqtd1 a b c e) (l_e_st_eq_landau_n_rt_rp_eqtd2 c d b f) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b d)).
-
-(* constant 3591 *)
-definition l_e_st_eq_landau_n_rt_rp_4d192_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ists1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b) z) (l_e_st_eq_landau_n_rt_rp_ists1 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_symis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) z))) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)))).
-
-(* constant 3592 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd192a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_zeroi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_4d192_t1 a b z) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3593 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd192b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_comtd b a) (l_e_st_eq_landau_n_rt_rp_satzd192a b a z) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3594 *)
-definition l_e_st_eq_landau_n_rt_rp_td01 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_satzd192a a b z : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3595 *)
-definition l_e_st_eq_landau_n_rt_rp_td02 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.(l_e_st_eq_landau_n_rt_rp_satzd192b a b z : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3596 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd197a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) b) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)))) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)))) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_tdeq2a b (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)))) (l_e_st_eq_landau_n_rt_rp_m0deqb (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3597 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd197b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d b) a) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td b a)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_comtd a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_satzd197a b a) (l_e_st_eq_landau_n_rt_rp_eqm0d (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_comtd b a)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3598 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd197c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq2 (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) b) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_satzd197a a b) (l_e_st_eq_landau_n_rt_rp_satzd197b a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) b) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3599 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd197d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) b) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_satzd197c a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) b)).
-
-(* constant 3600 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd197e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_satzd197a a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) b)).
-
-(* constant 3601 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd197f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_satzd197b a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3602 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd198 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b))) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_satzd197c a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_eqtd2 (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b)) b a (l_e_st_eq_landau_n_rt_rp_satzd177 b)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3603 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd198a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_satzd198 a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3604 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t13 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.λr:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_distpt2 r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ists2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_1b a b) r (l_e_st_eq_landau_n_rt_rp_satz140e (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b))).
-
-(* constant 3605 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t14 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b)) s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b))) s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b)) s) (l_e_st_eq_landau_n_rt_rp_asspl2 (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b)) s) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b)) s (l_e_st_eq_landau_n_rt_rp_iv4d_t13 a b p q r)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b)) s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b)) s)).
-
-(* constant 3606 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t15 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b)) s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b)) s) (l_e_st_eq_landau_n_rt_rp_pl s (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_iv4d_t14 a b p q r s) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b)) s) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_2b a b)) s)) (l_e_st_eq_landau_n_rt_rp_pl s (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_1b a b)))).
-
-(* constant 3607 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t16 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_satz135h (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_satz145a (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q) p) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))))).
-
-(* constant 3608 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t17 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) q)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_iv4d_t14 a b p q (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_iv4d_t15 a b p q (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_iv4d_t16 a b p q) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)))).
-
-(* constant 3609 *)
-definition l_e_st_eq_landau_n_rt_rp_ptdpp ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_posdi (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_iv4d_t17 a b p q) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3610 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t18 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_satzd197b a b) (l_e_st_eq_landau_n_rt_rp_ptdpp a (l_e_st_eq_landau_n_rt_rp_m0d b) p (l_e_st_eq_landau_n_rt_rp_satzd176c b n)) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3611 *)
-definition l_e_st_eq_landau_n_rt_rp_ntdpn ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_satzd176f (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_iv4d_t18 a b p n) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3612 *)
-definition l_e_st_eq_landau_n_rt_rp_ntdnp ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λp:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_eqnegd (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_comtd b a) (l_e_st_eq_landau_n_rt_rp_ntdpn b a p n) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3613 *)
-definition l_e_st_eq_landau_n_rt_rp_ptdnn ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λo:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_satzd198 a b) (l_e_st_eq_landau_n_rt_rp_ptdpp (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_satzd176c a n) (l_e_st_eq_landau_n_rt_rp_satzd176c b o)) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3614 *)
-definition l_e_st_eq_landau_n_rt_rp_4d192_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_pnot0d (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_ptdpp a b p q) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3615 *)
-definition l_e_st_eq_landau_n_rt_rp_4d192_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λm:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_nnot0d (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_ntdpn a b p m) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3616 *)
-definition l_e_st_eq_landau_n_rt_rp_4d192_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_rappd b (l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))) (λt:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_4d192_t2 a b n o p t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_zero b) (l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))) o) (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_4d192_t3 a b n o p t) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3617 *)
-definition l_e_st_eq_landau_n_rt_rp_4d192_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λm:l_e_st_eq_landau_n_rt_rp_negd a.λp:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_nnot0d (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_ntdnp a b m p) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3618 *)
-definition l_e_st_eq_landau_n_rt_rp_4d192_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λm:l_e_st_eq_landau_n_rt_rp_negd a.λl:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_pnot0d (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_ptdnn a b m l) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3619 *)
-definition l_e_st_eq_landau_n_rt_rp_4d192_t7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_rappd b (l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))) (λt:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_4d192_t5 a b n o m t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_zero b) (l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))) o) (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_4d192_t6 a b n o m t) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3620 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd192d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).(l_e_st_eq_landau_n_rt_rp_rappd a (l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_4d192_t4 a b n o t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))) n) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_4d192_t7 a b n o t) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3621 *)
-definition l_e_st_eq_landau_n_rt_rp_4d192_t8 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b).λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_et (l_e_st_eq_landau_n_rt_rp_zero b) (l_imp_th3 (l_not (l_e_st_eq_landau_n_rt_rp_zero b)) (l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b))) (l_weli (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)) z) (λt:l_not (l_e_st_eq_landau_n_rt_rp_zero b).l_e_st_eq_landau_n_rt_rp_satzd192d a b n t)) : l_e_st_eq_landau_n_rt_rp_zero b).
-
-(* constant 3622 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd192c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b).(λt:l_not (l_e_st_eq_landau_n_rt_rp_zero a).l_e_st_eq_landau_n_rt_rp_4d192_t8 a b z t : l_or (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_zero b)).
-
-(* constant 3623 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_treq2 (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_absnnd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_pnotnd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_ptdpp a b p q))) (l_e_st_eq_landau_n_rt_rp_eqtd12 (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absd b) b (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a p)) (l_e_st_eq_landau_n_rt_rp_absnnd b (l_e_st_eq_landau_n_rt_rp_pnotnd b q))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3624 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_absnd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_ntdpn a b p n)) (l_e_st_eq_landau_n_rt_rp_satzd197f a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3625 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_treq2 (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_4d193_t2 a b p n) (l_e_st_eq_landau_n_rt_rp_eqtd12 (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a p)) (l_e_st_eq_landau_n_rt_rp_absnd b n)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3626 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_zeroeq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_satzd166f (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td01 a b z)) (l_e_st_eq_landau_n_rt_rp_td01 (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_satzd166f a z)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3627 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_zero b.(l_e_st_eq_landau_n_rt_rp_zeroeq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_satzd166f (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td02 a b z)) (l_e_st_eq_landau_n_rt_rp_td02 (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_satzd166f b z)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3628 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λp:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td b a)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_eqabsd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_comtd a b)) (l_e_st_eq_landau_n_rt_rp_4d193_t3 b a p n) (l_e_st_eq_landau_n_rt_rp_comtd (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_absd a)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3629 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λo:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_eqtd12 (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_absnd a n) (l_e_st_eq_landau_n_rt_rp_absnd b o)) (l_e_st_eq_landau_n_rt_rp_satzd198 a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3630 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t8 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λo:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_treq2 (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_absnnd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_pnotnd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_ptdnn a b n o))) (l_e_st_eq_landau_n_rt_rp_4d193_t7 a b n o) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3631 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t9 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_rappd b (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))) (λt:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_4d193_t1 a b p t) (λt:l_e_st_eq_landau_n_rt_rp_zero b.l_e_st_eq_landau_n_rt_rp_4d193_t5 a b t) (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_4d193_t3 a b p t) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3632 *)
-definition l_e_st_eq_landau_n_rt_rp_4d193_t10 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_rappd b (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))) (λt:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_4d193_t6 a b n t) (λt:l_e_st_eq_landau_n_rt_rp_zero b.l_e_st_eq_landau_n_rt_rp_4d193_t5 a b t) (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_4d193_t8 a b n t) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3633 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd193 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_rappd a (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_4d193_t9 a b t) (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_4d193_t4 a b t) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_4d193_t10 a b t) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3634 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd103a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_satzd193 a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3635 *)
-definition l_e_st_eq_landau_n_rt_rp_1df ≝ (l_e_st_eq_landau_n_rt_rp_pdofrp l_e_st_eq_landau_n_rt_rp_1rp : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3636 *)
-definition l_e_st_eq_landau_n_rt_rp_4d195_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_a2isapa (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_satz151 (l_e_st_eq_landau_n_rt_rp_2a a)))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3637 *)
-definition l_e_st_eq_landau_n_rt_rp_4d195_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_asspl2 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_satz151 (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_a2isapa (l_e_st_eq_landau_n_rt_rp_2a a))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2a a)))).
-
-(* constant 3638 *)
-definition l_e_st_eq_landau_n_rt_rp_4d195_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_4d195_t1 a) (l_e_st_eq_landau_n_rt_rp_4d195_t2 a) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp))))).
-
-(* constant 3639 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd195 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td a l_e_st_eq_landau_n_rt_rp_1df) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)))) a (l_e_st_eq_landau_n_rt_rp_tdeq1a a (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_eqi2 a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_4d195_t3 a)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a l_e_st_eq_landau_n_rt_rp_1df) a).
-
-(* constant 3640 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd195a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td a l_e_st_eq_landau_n_rt_rp_1df) a (l_e_st_eq_landau_n_rt_rp_satzd195 a) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_td a l_e_st_eq_landau_n_rt_rp_1df)).
-
-(* constant 3641 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd195b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td l_e_st_eq_landau_n_rt_rp_1df a) (l_e_st_eq_landau_n_rt_rp_td a l_e_st_eq_landau_n_rt_rp_1df) a (l_e_st_eq_landau_n_rt_rp_comtd l_e_st_eq_landau_n_rt_rp_1df a) (l_e_st_eq_landau_n_rt_rp_satzd195 a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td l_e_st_eq_landau_n_rt_rp_1df a) a).
-
-(* constant 3642 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd195c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td l_e_st_eq_landau_n_rt_rp_1df a) a (l_e_st_eq_landau_n_rt_rp_satzd195b a) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_td l_e_st_eq_landau_n_rt_rp_1df a)).
-
-(* constant 3643 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd196a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_eqtd12 (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_absd b) b (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a p)) (l_e_st_eq_landau_n_rt_rp_absnnd b (l_e_st_eq_landau_n_rt_rp_pnotnd b q))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3644 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd196b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λo:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_treq2 (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_satzd198a a b) (l_e_st_eq_landau_n_rt_rp_eqtd12 (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_absnd a n) (l_e_st_eq_landau_n_rt_rp_absnd b o)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3645 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd196c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_treq1 (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_absd b))) (l_e_st_eq_landau_n_rt_rp_eqtd12 (l_e_st_eq_landau_n_rt_rp_absd a) a (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_absd b)) b (l_e_st_eq_landau_n_rt_rp_absnnd a (l_e_st_eq_landau_n_rt_rp_pnotnd a p)) (l_e_st_eq_landau_n_rt_rp_satzd177b (l_e_st_eq_landau_n_rt_rp_absd b) b (l_e_st_eq_landau_n_rt_rp_absnd b n))) (l_e_st_eq_landau_n_rt_rp_satzd197b (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)))).
-
-(* constant 3646 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd196d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λp:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_absd a))) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))) (l_e_st_eq_landau_n_rt_rp_comtd a b) (l_e_st_eq_landau_n_rt_rp_satzd196c b a p n) (l_e_st_eq_landau_n_rt_rp_eqm0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_comtd (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_absd a))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)))).
-
-(* constant 3647 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_p1p2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_and (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_posd b) : Prop).
-
-(* constant 3648 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_p1n2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_and (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd b) : Prop).
-
-(* constant 3649 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_n1p2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_and (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_posd b) : Prop).
-
-(* constant 3650 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_n1n2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_and (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_negd b) : Prop).
-
-(* constant 3651 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).(l_e_st_eq_landau_n_rt_rp_ptdpp (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_satzd166e a n) (l_e_st_eq_landau_n_rt_rp_satzd166e b o) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).
-
-(* constant 3652 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).(l_e_st_eq_landau_n_rt_rp_pnotnd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) e) (l_e_st_eq_landau_n_rt_rp_4d196_t1 a b n o)) : l_not (l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3653 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_4d196_t2 a b n o e) (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_ntdpn a b p t) : l_not (l_e_st_eq_landau_n_rt_rp_negd b)).
-
-(* constant 3654 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_or3e2 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_axrdo b) (l_e_st_eq_landau_n_rt_rp_4d196_t3 a b n o e p) o : l_e_st_eq_landau_n_rt_rp_posd b).
-
-(* constant 3655 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_andi (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_posd b) p (l_e_st_eq_landau_n_rt_rp_4d196_t4 a b n o e p) : l_e_st_eq_landau_n_rt_rp_4d196_p1p2 a b).
-
-(* constant 3656 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_ori1 (l_e_st_eq_landau_n_rt_rp_4d196_p1p2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1n2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_t5 a b n o e p) : l_or (l_e_st_eq_landau_n_rt_rp_4d196_p1p2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1n2 a b)).
-
-(* constant 3657 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_4d196_t2 a b n o e) (λt:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_ntdnp a b m t) : l_not (l_e_st_eq_landau_n_rt_rp_posd b)).
-
-(* constant 3658 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t8 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_or3e3 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_axrdo b) o (l_e_st_eq_landau_n_rt_rp_4d196_t7 a b n o e m) : l_e_st_eq_landau_n_rt_rp_negd b).
-
-(* constant 3659 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t9 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_andi (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_negd b) m (l_e_st_eq_landau_n_rt_rp_4d196_t8 a b n o e m) : l_e_st_eq_landau_n_rt_rp_4d196_n1n2 a b).
-
-(* constant 3660 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t10 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_ori2 (l_e_st_eq_landau_n_rt_rp_4d196_p1p2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1n2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_t9 a b n o e m) : l_or (l_e_st_eq_landau_n_rt_rp_4d196_p1p2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1n2 a b)).
-
-(* constant 3661 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd196e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)).(l_e_st_eq_landau_n_rt_rp_rappd a (l_or (l_e_st_eq_landau_n_rt_rp_4d196_p1p2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1n2 a b)) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_4d196_t6 a b n o e t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_or (l_e_st_eq_landau_n_rt_rp_4d196_p1p2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1n2 a b)) n) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_4d196_t10 a b n o e t) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_posd b)) (l_and (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_negd b))).
-
-(* constant 3662 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t11 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).(l_e_st_eq_landau_n_rt_rp_satzd176a (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_4d196_t1 a b n o) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)))).
-
-(* constant 3663 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).(l_e_st_eq_landau_n_rt_rp_nnotpd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_eqnegd (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))) e) (l_e_st_eq_landau_n_rt_rp_4d196_t11 a b n o)) : l_not (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3664 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t13 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_4d196_t12 a b n o e) (λt:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_ptdpp a b p t) : l_not (l_e_st_eq_landau_n_rt_rp_posd b)).
-
-(* constant 3665 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t14 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_or3e3 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_axrdo b) o (l_e_st_eq_landau_n_rt_rp_4d196_t13 a b n o e p) : l_e_st_eq_landau_n_rt_rp_negd b).
-
-(* constant 3666 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t15 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_andi (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd b) p (l_e_st_eq_landau_n_rt_rp_4d196_t14 a b n o e p) : l_e_st_eq_landau_n_rt_rp_4d196_p1n2 a b).
-
-(* constant 3667 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t16 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_ori1 (l_e_st_eq_landau_n_rt_rp_4d196_p1n2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1p2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_t15 a b n o e p) : l_or (l_e_st_eq_landau_n_rt_rp_4d196_p1n2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1p2 a b)).
-
-(* constant 3668 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t17 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_4d196_t12 a b n o e) (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_ptdnn a b m t) : l_not (l_e_st_eq_landau_n_rt_rp_negd b)).
-
-(* constant 3669 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t18 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_or3e2 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_axrdo b) (l_e_st_eq_landau_n_rt_rp_4d196_t17 a b n o e m) o : l_e_st_eq_landau_n_rt_rp_posd b).
-
-(* constant 3670 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t19 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_andi (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_posd b) m (l_e_st_eq_landau_n_rt_rp_4d196_t18 a b n o e m) : l_e_st_eq_landau_n_rt_rp_4d196_n1p2 a b).
-
-(* constant 3671 *)
-definition l_e_st_eq_landau_n_rt_rp_4d196_t20 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).λm:l_e_st_eq_landau_n_rt_rp_negd a.(l_ori2 (l_e_st_eq_landau_n_rt_rp_4d196_p1n2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1p2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_t19 a b n o e m) : l_or (l_e_st_eq_landau_n_rt_rp_4d196_p1n2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1p2 a b)).
-
-(* constant 3672 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd196f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b))).(l_e_st_eq_landau_n_rt_rp_rappd a (l_or (l_e_st_eq_landau_n_rt_rp_4d196_p1n2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1p2 a b)) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_4d196_t16 a b n o e t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_or (l_e_st_eq_landau_n_rt_rp_4d196_p1n2 a b) (l_e_st_eq_landau_n_rt_rp_4d196_n1p2 a b)) n) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_4d196_t20 a b n o e t) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd b)) (l_and (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_posd b))).
-
-(* constant 3673 *)
-definition l_e_st_eq_landau_n_rt_rp_4d199_t1 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_cut.λu:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts q s)) t) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts p r) t) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts q s) t)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts r t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t))) (l_e_st_eq_landau_n_rt_rp_disttp1 (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts q s) t) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts p r) t) (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts r t)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ts q s) t) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t)) (l_e_st_eq_landau_n_rt_rp_assts1 p r t) (l_e_st_eq_landau_n_rt_rp_assts1 q s t)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts q s)) t) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts r t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t)))).
-
-(* constant 3674 *)
-definition l_e_st_eq_landau_n_rt_rp_4d199_t2 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_cut.λu:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t))) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r u) (l_e_st_eq_landau_n_rt_rp_ts s t))) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u))) (l_e_st_eq_landau_n_rt_rp_distpt2 q (l_e_st_eq_landau_n_rt_rp_ts r u) (l_e_st_eq_landau_n_rt_rp_ts s t)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u))) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r u) (l_e_st_eq_landau_n_rt_rp_ts s t)))).
-
-(* constant 3675 *)
-definition l_e_st_eq_landau_n_rt_rp_4d199_t3 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_cut.λu:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts q s)) t) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p s) (l_e_st_eq_landau_n_rt_rp_ts q r)) u)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts r t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts s u)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts r t)) (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts s u))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r t) (l_e_st_eq_landau_n_rt_rp_ts s u))) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r u) (l_e_st_eq_landau_n_rt_rp_ts s t)))) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts q s)) t) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts r t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p s) (l_e_st_eq_landau_n_rt_rp_ts q r)) u) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts s u)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u))) (l_e_st_eq_landau_n_rt_rp_4d199_t1 p q r s t u) (l_e_st_eq_landau_n_rt_rp_4d199_t1 p q s r u t)) (l_e_st_eq_landau_n_rt_rp_4pl23 (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts r t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t)) (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts s u)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u))) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts r t)) (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_ts s u))) (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r t) (l_e_st_eq_landau_n_rt_rp_ts s u))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts s t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_ts r u))) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r u) (l_e_st_eq_landau_n_rt_rp_ts s t))) (l_e_st_eq_landau_n_rt_rp_distpt2 p (l_e_st_eq_landau_n_rt_rp_ts r t) (l_e_st_eq_landau_n_rt_rp_ts s u)) (l_e_st_eq_landau_n_rt_rp_4d199_t2 p q r s t u)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts q s)) t) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p s) (l_e_st_eq_landau_n_rt_rp_ts q r)) u)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r t) (l_e_st_eq_landau_n_rt_rp_ts s u))) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r u) (l_e_st_eq_landau_n_rt_rp_ts s t))))).
-
-(* constant 3676 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd199 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_td a b) c) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)))))) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_tdeq2a c (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b)))) (l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))))) (l_e_st_eq_landau_n_rt_rp_4d199_t3 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_4d199_t3 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_tdeq1b a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_td a b) c) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_td b c))).
-
-(* constant 3677 *)
-definition l_e_st_eq_landau_n_rt_rp_asstd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satzd199 a b c : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_td a b) c) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_td b c))).
-
-(* constant 3678 *)
-definition l_e_st_eq_landau_n_rt_rp_asstd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_td a b) c) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_satzd199 a b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_td a b) c)).
-
-(* constant 3679 *)
-definition l_e_st_eq_landau_n_rt_rp_4d201_t1 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_cut.λu:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_pl r t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl s u))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts p t)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q s) (l_e_st_eq_landau_n_rt_rp_ts q u))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts q s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p t) (l_e_st_eq_landau_n_rt_rp_ts q u))) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_pl r t)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts p t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl s u)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q s) (l_e_st_eq_landau_n_rt_rp_ts q u)) (l_e_st_eq_landau_n_rt_rp_disttp2 p r t) (l_e_st_eq_landau_n_rt_rp_disttp2 q s u)) (l_e_st_eq_landau_n_rt_rp_4pl23 (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts p t) (l_e_st_eq_landau_n_rt_rp_ts q s) (l_e_st_eq_landau_n_rt_rp_ts q u)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p (l_e_st_eq_landau_n_rt_rp_pl r t)) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl s u))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p r) (l_e_st_eq_landau_n_rt_rp_ts q s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts p t) (l_e_st_eq_landau_n_rt_rp_ts q u)))).
-
-(* constant 3680 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd201 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))))) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c))))) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_tdeq1a a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) (l_e_st_eq_landau_n_rt_rp_4d201_t1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1c a b c) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_4d201_t1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b) (l_e_st_eq_landau_n_rt_rp_1b a b) (l_e_st_eq_landau_n_rt_rp_2c a b c) (l_e_st_eq_landau_n_rt_rp_1c a b c))) (l_e_st_eq_landau_n_rt_rp_pdeq12b (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2b a b)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1b a b))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_2c a b c))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2c a b c)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1c a b c)))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c))).
-
-(* constant 3681 *)
-definition l_e_st_eq_landau_n_rt_rp_disttpd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_td c (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_comtd (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_satzd201 c a b) (l_e_st_eq_landau_n_rt_rp_eqpd12 (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td c b) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_comtd c a) (l_e_st_eq_landau_n_rt_rp_comtd c b)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c))).
-
-(* constant 3682 *)
-definition l_e_st_eq_landau_n_rt_rp_disttpd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satzd201 a b c : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c))).
-
-(* constant 3683 *)
-definition l_e_st_eq_landau_n_rt_rp_distptd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) c) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_disttpd1 a b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) c)).
-
-(* constant 3684 *)
-definition l_e_st_eq_landau_n_rt_rp_distptd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_pd b c)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_disttpd2 a b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_pd b c))).
-
-(* constant 3685 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd202 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_md b c)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d c))) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_disttpd2 a b (l_e_st_eq_landau_n_rt_rp_m0d c)) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d c)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_satzd197b a c)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_md b c)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c))).
-
-(* constant 3686 *)
-definition l_e_st_eq_landau_n_rt_rp_disttmd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_md a b) c) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d b) c)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_disttpd1 a (l_e_st_eq_landau_n_rt_rp_m0d b) c) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d b) c) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_satzd197a b c)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_md a b) c) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c))).
-
-(* constant 3687 *)
-definition l_e_st_eq_landau_n_rt_rp_disttmd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satzd202 a b c : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_md b c)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c))).
-
-(* constant 3688 *)
-definition l_e_st_eq_landau_n_rt_rp_distmtd1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_md a b) c) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_disttmd1 a b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_md a b) c)).
-
-(* constant 3689 *)
-definition l_e_st_eq_landau_n_rt_rp_distmtd2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_md b c)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_disttmd2 a b c) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_md b c))).
-
-(* constant 3690 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd200 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_landau_n_rt_rp_satzd202 a b c : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_md b c)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_td a c))).
-
-(* constant 3691 *)
-definition l_e_st_eq_landau_n_rt_rp_4d203_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.(l_e_st_eq_landau_n_rt_rp_satzd182d a b m : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3692 *)
-definition l_e_st_eq_landau_n_rt_rp_4d203_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λp:l_e_st_eq_landau_n_rt_rp_posd c.(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_md a b) c) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_disttmd1 a b c) (l_e_st_eq_landau_n_rt_rp_ptdpp (l_e_st_eq_landau_n_rt_rp_md a b) c (l_e_st_eq_landau_n_rt_rp_4d203_t1 a b c m) p) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c))).
-
-(* constant 3693 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λp:l_e_st_eq_landau_n_rt_rp_posd c.(l_e_st_eq_landau_n_rt_rp_satzd182a (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_4d203_t2 a b c m p) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)).
-
-(* constant 3694 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λz:l_e_st_eq_landau_n_rt_rp_zero c.(l_e_st_eq_landau_n_rt_rp_zeroeq (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_td02 a c z) (l_e_st_eq_landau_n_rt_rp_td02 b c z) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)).
-
-(* constant 3695 *)
-definition l_e_st_eq_landau_n_rt_rp_4d203_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λn:l_e_st_eq_landau_n_rt_rp_negd c.(l_e_st_eq_landau_n_rt_rp_eqnegd (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_md a b) c) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)) (l_e_st_eq_landau_n_rt_rp_disttmd1 a b c) (l_e_st_eq_landau_n_rt_rp_ntdpn (l_e_st_eq_landau_n_rt_rp_md a b) c (l_e_st_eq_landau_n_rt_rp_4d203_t1 a b c m) n) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c))).
-
-(* constant 3696 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203c ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λn:l_e_st_eq_landau_n_rt_rp_negd c.(l_e_st_eq_landau_n_rt_rp_satzd182c (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_4d203_t3 a b c m n) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)).
-
-(* constant 3697 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λp:l_e_st_eq_landau_n_rt_rp_posd c.(l_e_st_eq_landau_n_rt_rp_eqmored12 (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_td c b) (l_e_st_eq_landau_n_rt_rp_comtd a c) (l_e_st_eq_landau_n_rt_rp_comtd b c) (l_e_st_eq_landau_n_rt_rp_satzd203a a b c m p) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b)).
-
-(* constant 3698 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203e ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λz:l_e_st_eq_landau_n_rt_rp_zero c.(l_e_st_eq_landau_n_rt_rp_zeroeq (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b) (l_e_st_eq_landau_n_rt_rp_td01 c a z) (l_e_st_eq_landau_n_rt_rp_td01 c b z) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b)).
-
-(* constant 3699 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203f ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λm:l_e_st_eq_landau_n_rt_rp_mored a b.λn:l_e_st_eq_landau_n_rt_rp_negd c.(l_e_st_eq_landau_n_rt_rp_eqlessd12 (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_td c b) (l_e_st_eq_landau_n_rt_rp_comtd a c) (l_e_st_eq_landau_n_rt_rp_comtd b c) (l_e_st_eq_landau_n_rt_rp_satzd203c a b c m n) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b)).
-
-(* constant 3700 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203g ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λp:l_e_st_eq_landau_n_rt_rp_posd c.(l_e_st_eq_landau_n_rt_rp_lemmad5 (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_satzd203a b a c (l_e_st_eq_landau_n_rt_rp_lemmad6 a b l) p) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)).
-
-(* constant 3701 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203h ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λz:l_e_st_eq_landau_n_rt_rp_zero c.(l_e_st_eq_landau_n_rt_rp_zeroeq (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_td02 a c z) (l_e_st_eq_landau_n_rt_rp_td02 b c z) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)).
-
-(* constant 3702 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203j ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λn:l_e_st_eq_landau_n_rt_rp_negd c.(l_e_st_eq_landau_n_rt_rp_lemmad6 (l_e_st_eq_landau_n_rt_rp_td b c) (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_satzd203c b a c (l_e_st_eq_landau_n_rt_rp_lemmad6 a b l) n) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b c)).
-
-(* constant 3703 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203k ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λp:l_e_st_eq_landau_n_rt_rp_posd c.(l_e_st_eq_landau_n_rt_rp_lemmad5 (l_e_st_eq_landau_n_rt_rp_td c b) (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_satzd203d b a c (l_e_st_eq_landau_n_rt_rp_lemmad6 a b l) p) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b)).
-
-(* constant 3704 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203l ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λz:l_e_st_eq_landau_n_rt_rp_zero c.(l_e_st_eq_landau_n_rt_rp_zeroeq (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b) (l_e_st_eq_landau_n_rt_rp_td01 c a z) (l_e_st_eq_landau_n_rt_rp_td01 c b z) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b)).
-
-(* constant 3705 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd203m ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λl:l_e_st_eq_landau_n_rt_rp_lessd a b.λn:l_e_st_eq_landau_n_rt_rp_negd c.(l_e_st_eq_landau_n_rt_rp_lemmad6 (l_e_st_eq_landau_n_rt_rp_td c b) (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_satzd203f b a c (l_e_st_eq_landau_n_rt_rp_lemmad6 a b l) n) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_td c a) (l_e_st_eq_landau_n_rt_rp_td c b)).
-
-(* constant 3706 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t19 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) (l_e_st_eq_landau_n_rt_rp_ts q l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) q) (l_e_st_eq_landau_n_rt_rp_disttp2 q p l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_ts q l_e_st_eq_landau_n_rt_rp_1rp) q (l_e_st_eq_landau_n_rt_rp_ts q p) (l_e_st_eq_landau_n_rt_rp_satz151 q)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) q)).
-
-(* constant 3707 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t20 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) q) r) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) (l_e_st_eq_landau_n_rt_rp_pl q r)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) q) (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_1rp) r (l_e_st_eq_landau_n_rt_rp_iv4d_t19 p q) (l_e_st_eq_landau_n_rt_rp_satz151 r)) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_ts q p) q r) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) (l_e_st_eq_landau_n_rt_rp_pl q r))).
-
-(* constant 3708 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t21 ≝ λp:l_e_st_eq_landau_n_rt_cut.λq:l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) (l_e_st_eq_landau_n_rt_rp_pl q r)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) (l_e_st_eq_landau_n_rt_rp_pl r q)) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_iv4d_t20 p q r) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl q r) (l_e_st_eq_landau_n_rt_rp_pl r q) (l_e_st_eq_landau_n_rt_rp_ts q p) (l_e_st_eq_landau_n_rt_rp_compl q r)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts q (l_e_st_eq_landau_n_rt_rp_pl p l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts q p) (l_e_st_eq_landau_n_rt_rp_pl r q))).
-
-(* constant 3709 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_arp ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_rpofpd a p : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3710 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_arpi ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_ov l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_iv4d_arp a p) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3711 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_ai ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3712 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t22 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_iv4d_ai a p)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) l_e_st_eq_landau_n_rt_rp_1rp)))) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)))) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p))) (l_e_st_eq_landau_n_rt_rp_tdeq1a a (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_eqsmsd (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) l_e_st_eq_landau_n_rt_rp_1rp))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a))) (l_e_st_eq_landau_n_rt_rp_iv4d_t20 (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a)) (l_e_st_eq_landau_n_rt_rp_iv4d_t21 (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_1a a))) (l_e_st_eq_landau_n_rt_rp_lemmad2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a))) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_iv4d_ai a p)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)))).
-
-(* constant 3713 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t23 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arp a p)) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv4d_arp a p) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ists1 (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arp a p)) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p) (l_e_st_eq_landau_n_rt_rp_satz140d (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_2a a) p)) (l_e_st_eq_landau_n_rt_rp_disttp1 (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arp a p) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv4d_arp a p) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_satz153c l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_iv4d_arp a p))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) l_e_st_eq_landau_n_rt_rp_1rp)).
-
-(* constant 3714 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t24 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p))) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_iv4d_t23 a p)) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_compl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)))).
-
-(* constant 3715 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t25 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_iv4d_t24 a p) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p))) l_e_st_eq_landau_n_rt_rp_1df).
-
-(* constant 3716 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t26 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_iv4d_ai a p)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_1a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_2a a) (l_e_st_eq_landau_n_rt_rp_iv4d_arpi a p))) l_e_st_eq_landau_n_rt_rp_1df (l_e_st_eq_landau_n_rt_rp_iv4d_t22 a p) (l_e_st_eq_landau_n_rt_rp_iv4d_t25 a p) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_iv4d_ai a p)) l_e_st_eq_landau_n_rt_rp_1df).
-
-(* constant 3717 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t27 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df) (l_e_st_eq_landau_n_rt_rp_iv4d_ai a p) (l_e_st_eq_landau_n_rt_rp_iv4d_t26 a p) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df)).
-
-(* constant 3718 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t28 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_satzd176c a n : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_m0d a)).
-
-(* constant 3719 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t29 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λh:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) h) l_e_st_eq_landau_n_rt_rp_1df.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d h)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) h) l_e_st_eq_landau_n_rt_rp_1df (l_e_st_eq_landau_n_rt_rp_satzd197d a h) e : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_m0d h)) l_e_st_eq_landau_n_rt_rp_1df).
-
-(* constant 3720 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t30 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.λh:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) h) l_e_st_eq_landau_n_rt_rp_1df.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df) (l_e_st_eq_landau_n_rt_rp_m0d h) (l_e_st_eq_landau_n_rt_rp_iv4d_t29 a n h e) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df)).
-
-(* constant 3721 *)
-definition l_e_st_eq_landau_n_rt_rp_iv4d_t31 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) x) l_e_st_eq_landau_n_rt_rp_1df) (l_e_st_eq_landau_n_rt_rp_iv4d_t27 (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_iv4d_t28 a n)) (l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a) x) l_e_st_eq_landau_n_rt_rp_1df.l_e_st_eq_landau_n_rt_rp_iv4d_t30 a n x t) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df)).
-
-(* constant 3722 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_e_st_eq_landau_n_rt_rp_rappd a (l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df)) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_iv4d_t27 a t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df)) n) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_iv4d_t31 a t) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a x) l_e_st_eq_landau_n_rt_rp_1df)).
-
-(* constant 3723 *)
-definition l_e_st_eq_landau_n_rt_rp_4d204_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λh:l_e_st_eq_landau_n_rt_rp_dif.λk:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b h) a.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b k) a.(l_e_st_eq_landau_n_rt_rp_treq2 (l_e_st_eq_landau_n_rt_rp_td b h) (l_e_st_eq_landau_n_rt_rp_td b k) a e f : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b h) (l_e_st_eq_landau_n_rt_rp_td b k)).
-
-(* constant 3724 *)
-definition l_e_st_eq_landau_n_rt_rp_4d204_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λh:l_e_st_eq_landau_n_rt_rp_dif.λk:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b h) a.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b k) a.(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td b h) (l_e_st_eq_landau_n_rt_rp_td b k)) (l_e_st_eq_landau_n_rt_rp_td b (l_e_st_eq_landau_n_rt_rp_md h k)) (l_e_st_eq_landau_n_rt_rp_distmtd2 b h k) (l_e_st_eq_landau_n_rt_rp_satzd182e (l_e_st_eq_landau_n_rt_rp_td b h) (l_e_st_eq_landau_n_rt_rp_td b k) (l_e_st_eq_landau_n_rt_rp_4d204_t1 a b n h k e f)) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td b (l_e_st_eq_landau_n_rt_rp_md h k))).
-
-(* constant 3725 *)
-definition l_e_st_eq_landau_n_rt_rp_4d204_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λh:l_e_st_eq_landau_n_rt_rp_dif.λk:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b h) a.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b k) a.(l_ore2 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md h k)) (l_e_st_eq_landau_n_rt_rp_satzd192c b (l_e_st_eq_landau_n_rt_rp_md h k) (l_e_st_eq_landau_n_rt_rp_4d204_t2 a b n h k e f)) n : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md h k)).
-
-(* constant 3726 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd204b ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λh:l_e_st_eq_landau_n_rt_rp_dif.λk:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b h) a.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b k) a.(l_e_st_eq_landau_n_rt_rp_satzd182b h k (l_e_st_eq_landau_n_rt_rp_4d204_t3 a b n h k e f) : l_e_st_eq_landau_n_rt_rp_eq h k).
-
-(* constant 3727 *)
-definition l_e_st_eq_landau_n_rt_rp_4d204_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λh:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b h) l_e_st_eq_landau_n_rt_rp_1df.(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td b (l_e_st_eq_landau_n_rt_rp_td h a)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_td b h) a) (l_e_st_eq_landau_n_rt_rp_td l_e_st_eq_landau_n_rt_rp_1df a) a (l_e_st_eq_landau_n_rt_rp_asstd2 b h a) (l_e_st_eq_landau_n_rt_rp_eqtd1 (l_e_st_eq_landau_n_rt_rp_td b h) l_e_st_eq_landau_n_rt_rp_1df a e) (l_e_st_eq_landau_n_rt_rp_satzd195b a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b (l_e_st_eq_landau_n_rt_rp_td h a)) a).
-
-(* constant 3728 *)
-definition l_e_st_eq_landau_n_rt_rp_4d204_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).λh:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b h) l_e_st_eq_landau_n_rt_rp_1df.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b x) a) (l_e_st_eq_landau_n_rt_rp_td h a) (l_e_st_eq_landau_n_rt_rp_4d204_t4 a b n h e) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b x) a)).
-
-(* constant 3729 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd204a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero b).(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b x) l_e_st_eq_landau_n_rt_rp_1df) (l_e_st_eq_landau_n_rt_rp_lemmad7 b n) (l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b x) a)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b x) l_e_st_eq_landau_n_rt_rp_1df.l_e_st_eq_landau_n_rt_rp_4d204_t5 a b n x t) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b x) a)).
-
-(* constant 3730 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t1 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r s.(l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl s (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_asspl2 r l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_asspl2 s l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_satz134 r s (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp)).
-
-(* constant 3731 *)
-definition l_e_st_eq_landau_n_rt_rp_morerpepd ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r s.(l_e_st_eq_landau_n_rt_rp_moredi12 (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_iv5d_t1 r s m) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)).
-
-(* constant 3732 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t2 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s).(l_e_st_eq_landau_n_rt_rp_morede12 (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp)).
-
-(* constant 3733 *)
-definition l_e_st_eq_landau_n_rt_rp_morerpipd ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s).(l_e_st_eq_landau_n_rt_rp_satz136a r s (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ismore12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl r (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl s (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_asspl1 r l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_asspl1 s l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_iv5d_t2 r s m)) : l_e_st_eq_landau_n_rt_rp_more r s).
-
-(* constant 3734 *)
-definition l_e_st_eq_landau_n_rt_rp_lessrpepd ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r s.(l_e_st_eq_landau_n_rt_rp_lemmad5 (l_e_st_eq_landau_n_rt_rp_pdofrp s) (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_morerpepd s r (l_e_st_eq_landau_n_rt_rp_satz122 r s l)) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)).
-
-(* constant 3735 *)
-definition l_e_st_eq_landau_n_rt_rp_lessrpipd ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s).(l_e_st_eq_landau_n_rt_rp_satz121 s r (l_e_st_eq_landau_n_rt_rp_morerpipd s r (l_e_st_eq_landau_n_rt_rp_lemmad6 (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s) l)) : l_e_st_eq_landau_n_rt_rp_less r s).
-
-(* constant 3736 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_i ≝ (l_e_st_eq_landau_n_rt_rp_1rp : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3737 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_2 ≝ (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3738 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_rp1 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_iv5d_i : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3739 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_sp1 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_iv5d_i : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3740 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_rps ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pl r s : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3741 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_rs ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ts r s : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3742 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t3 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) l_e_st_eq_landau_n_rt_rp_iv5d_2) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_4pl23 r l_e_st_eq_landau_n_rt_rp_iv5d_i s l_e_st_eq_landau_n_rt_rp_iv5d_i)) (l_e_st_eq_landau_n_rt_rp_3pl23 (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2 l_e_st_eq_landau_n_rt_rp_iv5d_i) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) l_e_st_eq_landau_n_rt_rp_iv5d_2)).
-
-(* constant 3743 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t4 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) l_e_st_eq_landau_n_rt_rp_iv5d_2) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s)) (l_e_st_eq_landau_n_rt_rp_pdeq12a (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) l_e_st_eq_landau_n_rt_rp_iv5d_2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_t3 r s)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s))).
-
-(* constant 3744 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad8 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_iv5d_t4 r s : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl r s))).
-
-(* constant 3745 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t5 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_iv5d_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) r) (l_e_st_eq_landau_n_rt_rp_disttp2 r s l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_ts r l_e_st_eq_landau_n_rt_rp_iv5d_i) r (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_satz151 r)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) r)).
-
-(* constant 3746 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t6 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tr4is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) r) s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s)) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_disttp1 r l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts r (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) r) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s) (l_e_st_eq_landau_n_rt_rp_iv5d_t5 r s) (l_e_st_eq_landau_n_rt_rp_satz151b (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s))) (l_e_st_eq_landau_n_rt_rp_asspl2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) r) s l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) r) s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s)) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) r s)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s)) l_e_st_eq_landau_n_rt_rp_iv5d_i)).
-
-(* constant 3747 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t7 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s)) l_e_st_eq_landau_n_rt_rp_iv5d_i) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s)) l_e_st_eq_landau_n_rt_rp_iv5d_2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s)) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_t6 r s) (l_e_st_eq_landau_n_rt_rp_satz151 l_e_st_eq_landau_n_rt_rp_iv5d_i)) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s)) l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2))).
-
-(* constant 3748 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t8 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s) (l_e_st_eq_landau_n_rt_rp_satz151 (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r)) (l_e_st_eq_landau_n_rt_rp_satz151b (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s))) (l_e_st_eq_landau_n_rt_rp_4pl23 r l_e_st_eq_landau_n_rt_rp_iv5d_i s l_e_st_eq_landau_n_rt_rp_iv5d_i) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2)).
-
-(* constant 3749 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t9 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2)) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_iv5d_t8 r s)) (l_e_st_eq_landau_n_rt_rp_3pl23 (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2)) l_e_st_eq_landau_n_rt_rp_iv5d_i)).
-
-(* constant 3750 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t10 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i)) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2)) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rps r s) l_e_st_eq_landau_n_rt_rp_iv5d_2)) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_t7 r s)) (l_e_st_eq_landau_n_rt_rp_iv5d_t9 r s) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i)) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s))))).
-
-(* constant 3751 *)
-definition l_e_st_eq_landau_n_rt_rp_iv5d_t11 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s)) (l_e_st_eq_landau_n_rt_rp_tdeq12a (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i l_e_st_eq_landau_n_rt_rp_iv5d_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_iv5d_rp1 r) l_e_st_eq_landau_n_rt_rp_iv5d_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_sp1 r s))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s) l_e_st_eq_landau_n_rt_rp_iv5d_i) l_e_st_eq_landau_n_rt_rp_iv5d_i (l_e_st_eq_landau_n_rt_rp_iv5d_t10 r s)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_iv5d_rs r s))).
-
-(* constant 3752 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmad9 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_iv5d_t11 r s : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts r s))).
-
-(* constant 3753 *)
-definition l_e_st_eq_landau_n_rt_rp_in ≝ λr:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.(l_e_st_esti l_e_st_eq_landau_n_rt_cut r s0 : Prop).
-
-(* constant 3754 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_prop1 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_less x r.l_e_st_eq_landau_n_rt_rp_in x s0) : Prop).
-
-(* constant 3755 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_prop2 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_more x r.l_e_st_eq_landau_n_rt_rp_in x t0) : Prop).
-
-(* constant 3756 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_prop3 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λr:l_e_st_eq_landau_n_rt_cut.(l_and (l_e_st_eq_landau_n_rt_rp_5p205_prop1 s0 t0 r) (l_e_st_eq_landau_n_rt_rp_5p205_prop2 s0 t0 r) : Prop).
-
-(* constant 3757 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t1 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.(l_ande2 (l_e_st_eq_landau_n_rt_rp_5p205_prop1 s0 t0 r1) (l_e_st_eq_landau_n_rt_rp_5p205_prop2 s0 t0 r1) pr1 : l_e_st_eq_landau_n_rt_rp_5p205_prop2 s0 t0 r1).
-
-(* constant 3758 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t2 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.(l_ande1 (l_e_st_eq_landau_n_rt_rp_5p205_prop1 s0 t0 r2) (l_e_st_eq_landau_n_rt_rp_5p205_prop2 s0 t0 r2) pr2 : l_e_st_eq_landau_n_rt_rp_5p205_prop1 s0 t0 r2).
-
-(* constant 3759 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_rx ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.λl:l_e_st_eq_landau_n_rt_rp_less r1 r2.λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_rpofrt x0 : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3760 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t3 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.λl:l_e_st_eq_landau_n_rt_rp_less r1 r2.λx0:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less r1 (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) r2.(l_e_st_eq_landau_n_rt_rp_5p205_t2 s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) l2 : l_e_st_eq_landau_n_rt_rp_in (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) s0).
-
-(* constant 3761 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t4 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.λl:l_e_st_eq_landau_n_rt_rp_less r1 r2.λx0:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less r1 (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) r2.(l_e_st_eq_landau_n_rt_rp_5p205_t1 s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) (l_e_st_eq_landau_n_rt_rp_satz122 r1 (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) l1) : l_e_st_eq_landau_n_rt_rp_in (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) t0).
-
-(* constant 3762 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t5 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.λl:l_e_st_eq_landau_n_rt_rp_less r1 r2.λx0:l_e_st_eq_landau_n_rt_rat.λl1:l_e_st_eq_landau_n_rt_rp_less r1 (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0).λl2:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) r2.(l_ec3e31 (l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0)) (l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0)) (l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0)) (l_e_st_eq_landau_n_rt_rp_satz123b (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0)) (p2 (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) (l_e_st_eq_landau_n_rt_rp_5p205_t3 s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0 l1 l2) (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0) (l_e_st_eq_landau_n_rt_rp_5p205_t4 s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0 l1 l2)) (l_e_refis l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_5p205_rx s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x0)) : l_con).
-
-(* constant 3763 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t6 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.λl:l_e_st_eq_landau_n_rt_rp_less r1 r2.(l_e_st_eq_landau_n_rt_rp_satz159app r1 r2 l l_con (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_rp_less r1 (l_e_st_eq_landau_n_rt_rp_rpofrt x).λu:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_rpofrt x) r2.l_e_st_eq_landau_n_rt_rp_5p205_t5 s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 l x t u) : l_con).
-
-(* constant 3764 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t7 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.(λt:l_e_st_eq_landau_n_rt_rp_less r1 r2.l_e_st_eq_landau_n_rt_rp_5p205_t6 s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2 t : l_not (l_e_st_eq_landau_n_rt_rp_less r1 r2)).
-
-(* constant 3765 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t8 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.(λt:l_e_st_eq_landau_n_rt_rp_more r1 r2.l_e_st_eq_landau_n_rt_rp_5p205_t6 s0 t0 p0 p1a p1b p2 r2 r1 pr2 pr1 (l_e_st_eq_landau_n_rt_rp_satz121 r1 r2 t) : l_not (l_e_st_eq_landau_n_rt_rp_more r1 r2)).
-
-(* constant 3766 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t9 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr1:l_e_st_eq_landau_n_rt_cut.λr2:l_e_st_eq_landau_n_rt_cut.λpr1:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r1.λpr2:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 r2.(l_or3e1 (l_e_st_eq_landau_n_rt_rp_is r1 r2) (l_e_st_eq_landau_n_rt_rp_more r1 r2) (l_e_st_eq_landau_n_rt_rp_less r1 r2) (l_e_st_eq_landau_n_rt_rp_satz123a r1 r2) (l_e_st_eq_landau_n_rt_rp_5p205_t8 s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2) (l_e_st_eq_landau_n_rt_rp_5p205_t7 s0 t0 p0 p1a p1b p2 r1 r2 pr1 pr2) : l_e_st_eq_landau_n_rt_rp_is r1 r2).
-
-(* constant 3767 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t10 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(λx:l_e_st_eq_landau_n_rt_cut.λy:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 x.λu:l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 y.l_e_st_eq_landau_n_rt_rp_5p205_t9 s0 t0 p0 p1a p1b p2 x y t u : l_e_amone l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 x)).
-
-(* constant 3768 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_schnittprop ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.(l_e_st_eq_landau_n_rt_rp_some (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0)) : Prop).
-
-(* constant 3769 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_schnittset ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_e_st_setof l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x) : l_e_st_set l_e_st_eq_landau_n_rt_rat).
-
-(* constant 3770 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t11 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r s0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.(l_andi (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0) i lx : l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0)).
-
-(* constant 3771 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t12 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r s0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.(l_somei l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0)) r (l_e_st_eq_landau_n_rt_rp_5p205_t11 s0 t0 p0 p1a p1b p2 r i x0 lx) : l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x0).
-
-(* constant 3772 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t13 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r s0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x) x0 (l_e_st_eq_landau_n_rt_rp_5p205_t12 s0 t0 p0 p1a p1b p2 r i x0 lx) : l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3773 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t14 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r t0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λs:l_e_st_eq_landau_n_rt_cut.λj:l_e_st_eq_landau_n_rt_rp_in s s0.(l_e_st_eq_landau_n_rt_rp_satz122 s r (p2 s j r i) : l_e_st_eq_landau_n_rt_rp_more r s).
-
-(* constant 3774 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t15 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r t0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λs:l_e_st_eq_landau_n_rt_cut.λj:l_e_st_eq_landau_n_rt_rp_in s s0.(l_e_st_eq_landau_n_rt_rp_satz158b r x0 ux : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_rpofrt x0) r).
-
-(* constant 3775 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t16 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r t0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λs:l_e_st_eq_landau_n_rt_cut.λj:l_e_st_eq_landau_n_rt_rp_in s s0.(l_e_st_eq_landau_n_rt_rp_moreisi1 (l_e_st_eq_landau_n_rt_rp_rpofrt x0) s (l_e_st_eq_landau_n_rt_rp_satz127c (l_e_st_eq_landau_n_rt_rp_rpofrt x0) r s (l_e_st_eq_landau_n_rt_rp_5p205_t15 s0 t0 p0 p1a p1b p2 r i x0 ux s j) (l_e_st_eq_landau_n_rt_rp_5p205_t14 s0 t0 p0 p1a p1b p2 r i x0 ux s j)) : l_e_st_eq_landau_n_rt_rp_moreis (l_e_st_eq_landau_n_rt_rp_rpofrt x0) s).
-
-(* constant 3776 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t17 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r t0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λs:l_e_st_eq_landau_n_rt_cut.λj:l_e_st_eq_landau_n_rt_rp_in s s0.(l_e_st_eq_landau_n_rt_rp_satz158d s x0 (l_e_st_eq_landau_n_rt_rp_5p205_t16 s0 t0 p0 p1a p1b p2 r i x0 ux s j) : l_e_st_eq_landau_n_rt_urt s x0).
-
-(* constant 3777 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t18 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r t0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λs:l_e_st_eq_landau_n_rt_cut.(l_weli (l_ec (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0)) (λt:l_e_st_eq_landau_n_rt_rp_in s s0.l_e_st_eq_landau_n_rt_rp_5p205_t17 s0 t0 p0 p1a p1b p2 r i x0 ux s t) : l_not (l_and (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0))).
-
-(* constant 3778 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t19 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r t0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.(l_some_th5 l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0)) (λy:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_5p205_t18 s0 t0 p0 p1a p1b p2 r i x0 ux y) : l_not (l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x0)).
-
-(* constant 3779 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t20 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r t0.λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.(l_imp_th3 (l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x0) (l_e_st_eq_landau_n_rt_rp_5p205_t19 s0 t0 p0 p1a p1b p2 r i x0 ux) (λt:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x) x0 t) : l_not (l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2))).
-
-(* constant 3780 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t21 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x) x0 i : l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x0).
-
-(* constant 3781 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t22 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).(l_ande1 (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0) a : l_e_st_eq_landau_n_rt_rp_in r s0).
-
-(* constant 3782 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t23 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).(l_ande2 (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0) a : l_e_st_eq_landau_n_rt_lrt r x0).
-
-(* constant 3783 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t24 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).(l_e_st_eq_landau_n_rt_rp_satz120 r x0 (l_e_st_eq_landau_n_rt_rp_5p205_t23 s0 t0 p0 p1a p1b p2 x0 i y0 l r a) y0 l : l_e_st_eq_landau_n_rt_lrt r y0).
-
-(* constant 3784 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t25 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).(l_andi (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r y0) (l_e_st_eq_landau_n_rt_rp_5p205_t22 s0 t0 p0 p1a p1b p2 x0 i y0 l r a) (l_e_st_eq_landau_n_rt_rp_5p205_t24 s0 t0 p0 p1a p1b p2 x0 i y0 l r a) : l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r y0)).
-
-(* constant 3785 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t26 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).(l_somei l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y y0)) r (l_e_st_eq_landau_n_rt_rp_5p205_t25 s0 t0 p0 p1a p1b p2 x0 i y0 l r a) : l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 y0).
-
-(* constant 3786 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t27 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_someapp l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0)) (l_e_st_eq_landau_n_rt_rp_5p205_t21 s0 t0 p0 p1a p1b p2 x0 i) (l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 y0) (λy:l_e_st_eq_landau_n_rt_cut.λr:l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0).l_e_st_eq_landau_n_rt_rp_5p205_t26 s0 t0 p0 p1a p1b p2 x0 i y0 l y r) : l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 y0).
-
-(* constant 3787 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t28 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λy0:l_e_st_eq_landau_n_rt_rat.λl:l_e_st_eq_landau_n_rt_less y0 x0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x) y0 (l_e_st_eq_landau_n_rt_rp_5p205_t27 s0 t0 p0 p1a p1b p2 x0 i y0 l) : l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3788 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t29 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).(l_ande1 (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0) a : l_e_st_eq_landau_n_rt_rp_in r s0).
-
-(* constant 3789 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t30 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).(l_ande2 (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0) a : l_e_st_eq_landau_n_rt_lrt r x0).
-
-(* constant 3790 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t31 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt r y0.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_andi (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r y0) (l_e_st_eq_landau_n_rt_rp_5p205_t29 s0 t0 p0 p1a p1b p2 x0 i r a) ly : l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r y0)).
-
-(* constant 3791 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t32 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt r y0.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_somei l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y y0)) r (l_e_st_eq_landau_n_rt_rp_5p205_t31 s0 t0 p0 p1a p1b p2 x0 i r a y0 ly l) : l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 y0).
-
-(* constant 3792 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t33 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt r y0.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x) y0 (l_e_st_eq_landau_n_rt_rp_5p205_t32 s0 t0 p0 p1a p1b p2 x0 i r a y0 ly l) : l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3793 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t34 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt r y0.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_e_st_eq_landau_n_rt_satz83 x0 y0 l : l_e_st_eq_landau_n_rt_more y0 x0).
-
-(* constant 3794 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t35 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt r y0.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_andi (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_more y0 x0) (l_e_st_eq_landau_n_rt_rp_5p205_t33 s0 t0 p0 p1a p1b p2 x0 i r a y0 ly l) (l_e_st_eq_landau_n_rt_rp_5p205_t34 s0 t0 p0 p1a p1b p2 x0 i r a y0 ly l) : l_and (l_e_st_eq_landau_n_rt_in y0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_more y0 x0)).
-
-(* constant 3795 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t36 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).λy0:l_e_st_eq_landau_n_rt_rat.λly:l_e_st_eq_landau_n_rt_lrt r y0.λl:l_e_st_eq_landau_n_rt_less x0 y0.(l_somei l_e_st_eq_landau_n_rt_rat (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_more y x0)) y0 (l_e_st_eq_landau_n_rt_rp_5p205_t35 s0 t0 p0 p1a p1b p2 x0 i r a y0 ly l) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_more y x0))).
-
-(* constant 3796 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t37 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λr:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0).(l_e_st_eq_landau_n_rt_cutapp3 r x0 (l_e_st_eq_landau_n_rt_rp_5p205_t30 s0 t0 p0 p1a p1b p2 x0 i r a) (l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_more y x0))) (λy:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt r y.λu:l_e_st_eq_landau_n_rt_less x0 y.l_e_st_eq_landau_n_rt_rp_5p205_t36 s0 t0 p0 p1a p1b p2 x0 i r a y t u) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_more y x0))).
-
-(* constant 3797 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t38 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λx0:l_e_st_eq_landau_n_rt_rat.λi:l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).(l_someapp l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0)) (l_e_st_eq_landau_n_rt_rp_5p205_t21 s0 t0 p0 p1a p1b p2 x0 i) (l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_more y x0))) (λy:l_e_st_eq_landau_n_rt_cut.λt:l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0).l_e_st_eq_landau_n_rt_rp_5p205_t37 s0 t0 p0 p1a p1b p2 x0 i y t) : l_e_st_eq_landau_n_rt_some (λy:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_in y (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_more y x0))).
-
-(* constant 3798 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t39 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r s0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.λs:l_e_st_eq_landau_n_rt_cut.λj:l_e_st_eq_landau_n_rt_rp_in s t0.λy0:l_e_st_eq_landau_n_rt_rat.λuy:l_e_st_eq_landau_n_rt_urt s y0.(l_e_st_eq_landau_n_rt_cut2 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2) x0 (l_e_st_eq_landau_n_rt_rp_5p205_t13 s0 t0 p0 p1a p1b p2 r i x0 lx) y0 (l_e_st_eq_landau_n_rt_rp_5p205_t20 s0 t0 p0 p1a p1b p2 s j y0 uy) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).λy:l_e_st_eq_landau_n_rt_rat.λu:l_e_st_eq_landau_n_rt_less y x.l_e_st_eq_landau_n_rt_rp_5p205_t28 s0 t0 p0 p1a p1b p2 x t y u) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_in x (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2).l_e_st_eq_landau_n_rt_rp_5p205_t38 s0 t0 p0 p1a p1b p2 x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3799 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t40 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r s0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.λs:l_e_st_eq_landau_n_rt_cut.λj:l_e_st_eq_landau_n_rt_rp_in s t0.(l_e_st_eq_landau_n_rt_cutapp1b s (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt s x.l_e_st_eq_landau_n_rt_rp_5p205_t39 s0 t0 p0 p1a p1b p2 r i x0 lx s j x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3800 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t41 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r s0.λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.(l_e_st_nonemptyapp l_e_st_eq_landau_n_rt_cut t0 p1b (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (λy:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_5p205_t40 s0 t0 p0 p1a p1b p2 r i x0 lx y t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3801 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t42 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r s0.(l_e_st_eq_landau_n_rt_cutapp1a r (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt r x.l_e_st_eq_landau_n_rt_rp_5p205_t41 s0 t0 p0 p1a p1b p2 r i x t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3802 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t43 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_e_st_nonemptyapp l_e_st_eq_landau_n_rt_cut s0 p1a (l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)) (λy:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_in y s0.l_e_st_eq_landau_n_rt_rp_5p205_t42 s0 t0 p0 p1a p1b p2 y t) : l_e_st_eq_landau_n_rt_cutprop (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3803 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_snt ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_e_st_eq_landau_n_rt_rp_cutof (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2) (l_e_st_eq_landau_n_rt_rp_5p205_t43 s0 t0 p0 p1a p1b p2) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3804 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t44 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.(l_e_st_eq_landau_n_rt_rp_ini (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2) (l_e_st_eq_landau_n_rt_rp_5p205_t43 s0 t0 p0 p1a p1b p2) x0 lx : l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3805 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t45 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.(l_e_st_estie l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x) x0 (l_e_st_eq_landau_n_rt_rp_5p205_t44 s0 t0 p0 p1a p1b p2 r l x0 ux lx) : l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x0).
-
-(* constant 3806 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t46 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λs:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0).(l_ande1 (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0) a : l_e_st_eq_landau_n_rt_rp_in s s0).
-
-(* constant 3807 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t47 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λs:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0).(l_ande2 (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0) a : l_e_st_eq_landau_n_rt_lrt s x0).
-
-(* constant 3808 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t48 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λs:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0).(l_andi (l_e_st_eq_landau_n_rt_urt r x0) (l_e_st_eq_landau_n_rt_lrt s x0) ux (l_e_st_eq_landau_n_rt_rp_5p205_t47 s0 t0 p0 p1a p1b p2 r l x0 ux lx s a) : l_and (l_e_st_eq_landau_n_rt_urt r x0) (l_e_st_eq_landau_n_rt_lrt s x0)).
-
-(* constant 3809 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t49 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λs:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0).(l_somei l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_and (l_e_st_eq_landau_n_rt_urt r x) (l_e_st_eq_landau_n_rt_lrt s x)) x0 (l_e_st_eq_landau_n_rt_rp_5p205_t48 s0 t0 p0 p1a p1b p2 r l x0 ux lx s a) : l_e_st_eq_landau_n_rt_rp_less r s).
-
-(* constant 3810 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t50 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λs:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0).(l_ec3e23 (l_e_st_eq_landau_n_rt_rp_is s r) (l_e_st_eq_landau_n_rt_rp_more s r) (l_e_st_eq_landau_n_rt_rp_less s r) (l_e_st_eq_landau_n_rt_rp_satz123b s r) (l_e_st_eq_landau_n_rt_rp_satz122 r s (l_e_st_eq_landau_n_rt_rp_5p205_t49 s0 t0 p0 p1a p1b p2 r l x0 ux lx s a)) : l_not (l_e_st_eq_landau_n_rt_rp_less s r)).
-
-(* constant 3811 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t51 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λs:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_in r t0) (l_e_st_eq_landau_n_rt_rp_less s r) (l_e_st_eq_landau_n_rt_rp_5p205_t50 s0 t0 p0 p1a p1b p2 r l x0 ux lx s a) (p2 s (l_e_st_eq_landau_n_rt_rp_5p205_t46 s0 t0 p0 p1a p1b p2 r l x0 ux lx s a) r) : l_not (l_e_st_eq_landau_n_rt_rp_in r t0)).
-
-(* constant 3812 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t52 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λs:l_e_st_eq_landau_n_rt_cut.λa:l_and (l_e_st_eq_landau_n_rt_rp_in s s0) (l_e_st_eq_landau_n_rt_lrt s x0).(l_ore1 (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_rp_in r t0) (p0 r) (l_e_st_eq_landau_n_rt_rp_5p205_t51 s0 t0 p0 p1a p1b p2 r l x0 ux lx s a) : l_e_st_eq_landau_n_rt_rp_in r s0).
-
-(* constant 3813 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t53 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λux:l_e_st_eq_landau_n_rt_urt r x0.λlx:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.(l_someapp l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0)) (l_e_st_eq_landau_n_rt_rp_5p205_t45 s0 t0 p0 p1a p1b p2 r l x0 ux lx) (l_e_st_eq_landau_n_rt_rp_in r s0) (λy:l_e_st_eq_landau_n_rt_cut.λt:l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0).l_e_st_eq_landau_n_rt_rp_5p205_t52 s0 t0 p0 p1a p1b p2 r l x0 ux lx y t) : l_e_st_eq_landau_n_rt_rp_in r s0).
-
-(* constant 3814 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t54 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).(l_e_st_eq_landau_n_rt_rp_lessapp r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) l (l_e_st_eq_landau_n_rt_rp_in r s0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_urt r x.λu:l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x.l_e_st_eq_landau_n_rt_rp_5p205_t53 s0 t0 p0 p1a p1b p2 r l x t u) : l_e_st_eq_landau_n_rt_rp_in r s0).
-
-(* constant 3815 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t55 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λi:l_e_st_eq_landau_n_rt_rp_in r s0.(l_andi (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0) i lx : l_and (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt r x0)).
-
-(* constant 3816 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t56 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λi:l_e_st_eq_landau_n_rt_rp_in r s0.(l_somei l_e_st_eq_landau_n_rt_cut (λy:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_in y s0) (l_e_st_eq_landau_n_rt_lrt y x0)) r (l_e_st_eq_landau_n_rt_rp_5p205_t55 s0 t0 p0 p1a p1b p2 r m x0 lx ux i) : l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x0).
-
-(* constant 3817 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t57 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λi:l_e_st_eq_landau_n_rt_rp_in r s0.(l_e_st_estii l_e_st_eq_landau_n_rt_rat (λx:l_e_st_eq_landau_n_rt_rat.l_e_st_eq_landau_n_rt_rp_5p205_schnittprop s0 t0 p0 p1a p1b p2 x) x0 (l_e_st_eq_landau_n_rt_rp_5p205_t56 s0 t0 p0 p1a p1b p2 r m x0 lx ux i) : l_e_st_eq_landau_n_rt_in x0 (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2)).
-
-(* constant 3818 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t58 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.λi:l_e_st_eq_landau_n_rt_rp_in r s0.(l_e_st_eq_landau_n_rt_rp_ine (l_e_st_eq_landau_n_rt_rp_5p205_schnittset s0 t0 p0 p1a p1b p2) (l_e_st_eq_landau_n_rt_rp_5p205_t43 s0 t0 p0 p1a p1b p2) x0 (l_e_st_eq_landau_n_rt_rp_5p205_t57 s0 t0 p0 p1a p1b p2 r m x0 lx ux i) : l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0).
-
-(* constant 3819 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t59 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_lrt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0) ux (λt:l_e_st_eq_landau_n_rt_rp_in r s0.l_e_st_eq_landau_n_rt_rp_5p205_t58 s0 t0 p0 p1a p1b p2 r m x0 lx ux t) : l_not (l_e_st_eq_landau_n_rt_rp_in r s0)).
-
-(* constant 3820 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t60 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).λx0:l_e_st_eq_landau_n_rt_rat.λlx:l_e_st_eq_landau_n_rt_lrt r x0.λux:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x0.(l_ore2 (l_e_st_eq_landau_n_rt_rp_in r s0) (l_e_st_eq_landau_n_rt_rp_in r t0) (p0 r) (l_e_st_eq_landau_n_rt_rp_5p205_t59 s0 t0 p0 p1a p1b p2 r m x0 lx ux) : l_e_st_eq_landau_n_rt_rp_in r t0).
-
-(* constant 3821 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t61 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).λr:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).(l_e_st_eq_landau_n_rt_rp_moreapp r (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) m (l_e_st_eq_landau_n_rt_rp_in r t0) (λx:l_e_st_eq_landau_n_rt_rat.λt:l_e_st_eq_landau_n_rt_lrt r x.λu:l_e_st_eq_landau_n_rt_urt (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) x.l_e_st_eq_landau_n_rt_rp_5p205_t60 s0 t0 p0 p1a p1b p2 r m x t u) : l_e_st_eq_landau_n_rt_rp_in r t0).
-
-(* constant 3822 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t62 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_andi (l_e_st_eq_landau_n_rt_rp_5p205_prop1 s0 t0 (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_rp_5p205_prop2 s0 t0 (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2)) (λx:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_less x (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).l_e_st_eq_landau_n_rt_rp_5p205_t54 s0 t0 p0 p1a p1b p2 x t) (λx:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_more x (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2).l_e_st_eq_landau_n_rt_rp_5p205_t61 s0 t0 p0 p1a p1b p2 x t) : l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2)).
-
-(* constant 3823 *)
-definition l_e_st_eq_landau_n_rt_rp_5p205_t63 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_somei l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 x) (l_e_st_eq_landau_n_rt_rp_5p205_snt s0 t0 p0 p1a p1b p2) (l_e_st_eq_landau_n_rt_rp_5p205_t62 s0 t0 p0 p1a p1b p2) : l_e_st_eq_landau_n_rt_rp_some (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 x)).
-
-(* constant 3824 *)
-definition l_e_st_eq_landau_n_rt_rp_satzp205 ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_e_onei l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 x) (l_e_st_eq_landau_n_rt_rp_5p205_t10 s0 t0 p0 p1a p1b p2) (l_e_st_eq_landau_n_rt_rp_5p205_t63 s0 t0 p0 p1a p1b p2) : l_e_st_eq_landau_n_rt_rp_one (λx:l_e_st_eq_landau_n_rt_cut.l_and (l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_less y x.l_e_st_eq_landau_n_rt_rp_in y s0)) (l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_more y x.l_e_st_eq_landau_n_rt_rp_in y t0)))).
-
-(* constant 3825 *)
-definition l_e_st_eq_landau_n_rt_rp_schnitt ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_e_ind l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 x) (l_e_st_eq_landau_n_rt_rp_satzp205 s0 t0 p0 p1a p1b p2) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3826 *)
-definition l_e_st_eq_landau_n_rt_rp_satzp205a ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_ande1 (l_e_st_eq_landau_n_rt_rp_5p205_prop1 s0 t0 (l_e_st_eq_landau_n_rt_rp_schnitt s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_rp_5p205_prop2 s0 t0 (l_e_st_eq_landau_n_rt_rp_schnitt s0 t0 p0 p1a p1b p2)) (l_e_oneax l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 x) (l_e_st_eq_landau_n_rt_rp_satzp205 s0 t0 p0 p1a p1b p2)) : l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_less x (l_e_st_eq_landau_n_rt_rp_schnitt s0 t0 p0 p1a p1b p2).l_e_st_eq_landau_n_rt_rp_in x s0)).
-
-(* constant 3827 *)
-definition l_e_st_eq_landau_n_rt_rp_satzp205b ≝ λs0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λt0:l_e_st_set l_e_st_eq_landau_n_rt_cut.λp0:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.l_or (l_e_st_eq_landau_n_rt_rp_in x s0) (l_e_st_eq_landau_n_rt_rp_in x t0)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut s0.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_cut t0.λp2:l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_in x s0.l_e_st_eq_landau_n_rt_rp_all (λy:l_e_st_eq_landau_n_rt_cut.∀u:l_e_st_eq_landau_n_rt_rp_in y t0.l_e_st_eq_landau_n_rt_rp_less x y)).(l_ande2 (l_e_st_eq_landau_n_rt_rp_5p205_prop1 s0 t0 (l_e_st_eq_landau_n_rt_rp_schnitt s0 t0 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_rp_5p205_prop2 s0 t0 (l_e_st_eq_landau_n_rt_rp_schnitt s0 t0 p0 p1a p1b p2)) (l_e_oneax l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_5p205_prop3 s0 t0 x) (l_e_st_eq_landau_n_rt_rp_satzp205 s0 t0 p0 p1a p1b p2)) : l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_more x (l_e_st_eq_landau_n_rt_rp_schnitt s0 t0 p0 p1a p1b p2).l_e_st_eq_landau_n_rt_rp_in x t0)).
-
-(* constant 3828 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_i ≝ (l_e_st_eq_landau_n_rt_rp_1rp : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3829 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_r1 ≝ λr:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_ivad_i : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3830 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_s1 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_ivad_i : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3831 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_rps ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pl r s : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3832 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_2 ≝ (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3833 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t1 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pdeq12a (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s) l_e_st_eq_landau_n_rt_rp_ivad_i : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) l_e_st_eq_landau_n_rt_rp_ivad_2)).
-
-(* constant 3834 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t2 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_4pl23 r l_e_st_eq_landau_n_rt_rp_ivad_i s l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_asspl2 (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i)).
-
-(* constant 3835 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t3 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_t2 r s) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i)).
-
-(* constant 3836 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t4 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_2) (l_e_st_eq_landau_n_rt_rp_ivad_t3 r s) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_2)).
-
-(* constant 3837 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t5 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) l_e_st_eq_landau_n_rt_rp_ivad_2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_t4 r s) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) l_e_st_eq_landau_n_rt_rp_ivad_2) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ivad_rps r s))).
-
-(* constant 3838 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmaivad1 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl r s)) (l_e_st_eq_landau_n_rt_rp_ivad_t1 r s) (l_e_st_eq_landau_n_rt_rp_ivad_t5 r s) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl r s))).
-
-(* constant 3839 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_rs ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_ts r s : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3840 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t6 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_tdeq12a (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s) l_e_st_eq_landau_n_rt_rp_ivad_i : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s))))).
-
-(* constant 3841 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t7 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) s) (l_e_st_eq_landau_n_rt_rp_disttp1 r l_e_st_eq_landau_n_rt_rp_ivad_i s) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i s) s (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) (l_e_st_eq_landau_n_rt_rp_satz151b s)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) s)).
-
-(* constant 3842 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t8 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) s) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) s) (l_e_st_eq_landau_n_rt_rp_ivad_r1 r)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ivad_rps r s)) (l_e_st_eq_landau_n_rt_rp_disttp2 (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) s l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) s) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) s) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_t7 r s) (l_e_st_eq_landau_n_rt_rp_satz151 (l_e_st_eq_landau_n_rt_rp_ivad_r1 r))) (l_e_st_eq_landau_n_rt_rp_4pl24 (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) s r l_e_st_eq_landau_n_rt_rp_ivad_i) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ivad_rps r s))).
-
-(* constant 3843 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t9 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ivad_rps r s)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ivad_rps r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_t8 r s) (l_e_st_eq_landau_n_rt_rp_satz151 l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i))).
-
-(* constant 3844 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t10 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_ispl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i)) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_t9 r s)) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i))).
-
-(* constant 3845 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t11 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tr3is l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_2) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s))) (l_e_st_eq_landau_n_rt_rp_asspl1 (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_4pl23 r s l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ispl12 (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_satz151a (l_e_st_eq_landau_n_rt_rp_ivad_r1 r)) (l_e_st_eq_landau_n_rt_rp_satz151c (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)))).
-
-(* constant 3846 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t12 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)))) (l_e_st_eq_landau_n_rt_rp_ivad_t10 r s) (l_e_st_eq_landau_n_rt_rp_ispl2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rps r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ivad_t11 r s)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s))))).
-
-(* constant 3847 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t13 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_eqi12 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_rs r s) l_e_st_eq_landau_n_rt_rp_ivad_i) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_t12 r s) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i l_e_st_eq_landau_n_rt_rp_ivad_i)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ivad_rs r s))).
-
-(* constant 3848 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmaivad2 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_df (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_pl r l_e_st_eq_landau_n_rt_rp_1rp) l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_ts l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_pl s l_e_st_eq_landau_n_rt_rp_1rp)))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts r s)) (l_e_st_eq_landau_n_rt_rp_ivad_t6 r s) (l_e_st_eq_landau_n_rt_rp_ivad_t13 r s) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts r s))).
-
-(* constant 3849 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t14 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s).(l_e_st_eq_landau_n_rt_rp_morede12 (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s) l_e_st_eq_landau_n_rt_rp_ivad_i m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) l_e_st_eq_landau_n_rt_rp_ivad_i) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s) l_e_st_eq_landau_n_rt_rp_ivad_i)).
-
-(* constant 3850 *)
-definition l_e_st_eq_landau_n_rt_rp_ivad_t15 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s).(l_e_st_eq_landau_n_rt_rp_satz136a (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s) l_e_st_eq_landau_n_rt_rp_ivad_i (l_e_st_eq_landau_n_rt_rp_ivad_t14 r s m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_ivad_r1 r) (l_e_st_eq_landau_n_rt_rp_ivad_s1 r s)).
-
-(* constant 3851 *)
-definition l_e_st_eq_landau_n_rt_rp_lemmaivad3 ≝ λr:l_e_st_eq_landau_n_rt_cut.λs:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pdofrp r) (l_e_st_eq_landau_n_rt_rp_pdofrp s).(l_e_st_eq_landau_n_rt_rp_satz136a r s l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_ivad_t15 r s m) : l_e_st_eq_landau_n_rt_rp_more r s).
-
-(* constant 3852 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t1 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.(l_e_st_eq_landau_n_rt_rp_treq2 (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b) c e f : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b)).
-
-(* constant 3853 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t2 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td b a)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_eqpd2 (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_td a b) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_comtd b a)) (l_e_st_eq_landau_n_rt_rp_pdmd (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td b a)) (l_e_st_eq_landau_n_rt_rp_td a a)).
-
-(* constant 3854 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t3 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.(l_e_st_eq_landau_n_rt_rp_tr4eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_td b (l_e_st_eq_landau_n_rt_rp_md a b))) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_td b b))) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td b a)) (l_e_st_eq_landau_n_rt_rp_td b b)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b)) (l_e_st_eq_landau_n_rt_rp_disttpd1 a b (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_eqpd12 (l_e_st_eq_landau_n_rt_rp_td a (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td b (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_td b b)) (l_e_st_eq_landau_n_rt_rp_disttmd2 a a b) (l_e_st_eq_landau_n_rt_rp_disttmd2 b a b)) (l_e_st_eq_landau_n_rt_rp_asspd2 (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td b a) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td b b))) (l_e_st_eq_landau_n_rt_rp_eqmd1 (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td b a)) (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b) (l_e_st_eq_landau_n_rt_rp_d161_t2 c a b n o e f)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b))).
-
-(* constant 3855 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t4 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b)) (l_e_st_eq_landau_n_rt_rp_d161_t3 c a b n o e f)) (l_e_st_eq_landau_n_rt_rp_satzd182e (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b) (l_e_st_eq_landau_n_rt_rp_d161_t1 c a b n o e f)) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_md a b))).
-
-(* constant 3856 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t5 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.(l_e_st_eq_landau_n_rt_rp_satzd192c (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_md a b) (l_e_st_eq_landau_n_rt_rp_d161_t4 c a b n o e f) : l_or (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md a b))).
-
-(* constant 3857 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t6 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_td a a) (l_e_st_eq_landau_n_rt_rp_td b b) (l_e_st_eq_landau_n_rt_rp_d161_t1 c a b n o e f) (l_e_st_eq_landau_n_rt_rp_td01 a a z) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td b b)).
-
-(* constant 3858 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t7 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_zero b) (l_refimp (l_e_st_eq_landau_n_rt_rp_zero b)) (l_e_st_eq_landau_n_rt_rp_satzd192c b b (l_e_st_eq_landau_n_rt_rp_d161_t6 c a b n o e f z)) : l_e_st_eq_landau_n_rt_rp_zero b).
-
-(* constant 3859 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t8 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_zeroeq a b z (l_e_st_eq_landau_n_rt_rp_d161_t7 c a b n o e f z) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3860 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t9 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λp:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_or3e2 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_negd a) (l_e_st_eq_landau_n_rt_rp_axrdo a) n p : l_e_st_eq_landau_n_rt_rp_posd a).
-
-(* constant 3861 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t10 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λp:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_zero a) p (λt:l_e_st_eq_landau_n_rt_rp_zero b.l_e_st_eq_landau_n_rt_rp_d161_t7 c b a o n f e t) : l_not (l_e_st_eq_landau_n_rt_rp_zero b)).
-
-(* constant 3862 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t11 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λp:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_e_st_eq_landau_n_rt_rp_d161_t9 c b a o n f e (l_e_st_eq_landau_n_rt_rp_d161_t10 c a b n o e f p) : l_e_st_eq_landau_n_rt_rp_posd b).
-
-(* constant 3863 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t12 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λp:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_e_st_eq_landau_n_rt_rp_pnot0d (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_ppd a b (l_e_st_eq_landau_n_rt_rp_d161_t9 c a b n o e f p) (l_e_st_eq_landau_n_rt_rp_d161_t11 c a b n o e f p)) : l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_pd a b))).
-
-(* constant 3864 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t13 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λp:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_ore2 (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md a b)) (l_e_st_eq_landau_n_rt_rp_d161_t5 c a b n o e f) (l_e_st_eq_landau_n_rt_rp_d161_t12 c a b n o e f p) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3865 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t14 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.λp:l_not (l_e_st_eq_landau_n_rt_rp_zero a).(l_e_st_eq_landau_n_rt_rp_satzd182b a b (l_e_st_eq_landau_n_rt_rp_d161_t13 c a b n o e f p) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3866 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd161b ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd a).λo:l_not (l_e_st_eq_landau_n_rt_rp_negd b).λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a a) c.λf:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b b) c.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_eq a b) (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_d161_t8 c a b n o e f t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_zero a).l_e_st_eq_landau_n_rt_rp_d161_t14 c a b n o e f t) : l_e_st_eq_landau_n_rt_rp_eq a b).
-
-(* constant 3867 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t15 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λz:l_e_st_eq_landau_n_rt_rp_zero c.(l_e_st_eq_landau_n_rt_rp_zeroeq (l_e_st_eq_landau_n_rt_rp_td c c) c (l_e_st_eq_landau_n_rt_rp_td01 c c z) z : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td c c) c).
-
-(* constant 3868 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t16 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λz:l_e_st_eq_landau_n_rt_rp_zero c.(l_andi (l_not (l_e_st_eq_landau_n_rt_rp_negd c)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td c c) c) n (l_e_st_eq_landau_n_rt_rp_d161_t15 c n z) : l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd c)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td c c) c)).
-
-(* constant 3869 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t17 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λz:l_e_st_eq_landau_n_rt_rp_zero c.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd x)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td x x) c)) c (l_e_st_eq_landau_n_rt_rp_d161_t16 c n z) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd x)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td x x) c))).
-
-(* constant 3870 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t18 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero c).(l_or3e2 (l_e_st_eq_landau_n_rt_rp_zero c) (l_e_st_eq_landau_n_rt_rp_posd c) (l_e_st_eq_landau_n_rt_rp_negd c) (l_e_st_eq_landau_n_rt_rp_axrdo c) n o : l_e_st_eq_landau_n_rt_rp_posd c).
-
-(* constant 3871 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_crp ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero c).(l_e_st_eq_landau_n_rt_rp_rpofpd c (l_e_st_eq_landau_n_rt_rp_d161_t18 c n o) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3872 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_srp ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero c).(l_e_st_eq_landau_n_rt_rp_sqrt (l_e_st_eq_landau_n_rt_rp_d161_crp c n o) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3873 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_s ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero c).(l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_d161_srp c n o) : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3874 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t19 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero c).(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_d161_s c n o) (l_e_st_eq_landau_n_rt_rp_d161_s c n o)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_d161_srp c n o) (l_e_st_eq_landau_n_rt_rp_d161_srp c n o))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_d161_crp c n o)) c (l_e_st_eq_landau_n_rt_rp_lemmaivad2 (l_e_st_eq_landau_n_rt_rp_d161_srp c n o) (l_e_st_eq_landau_n_rt_rp_d161_srp c n o)) (l_e_st_eq_landau_n_rt_rp_isrpepd (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_d161_srp c n o) (l_e_st_eq_landau_n_rt_rp_d161_srp c n o)) (l_e_st_eq_landau_n_rt_rp_d161_crp c n o) (l_e_st_eq_landau_n_rt_rp_thsqrt1 (l_e_st_eq_landau_n_rt_rp_d161_crp c n o))) (l_e_st_eq_landau_n_rt_rp_eqpdrp2 c (l_e_st_eq_landau_n_rt_rp_d161_t18 c n o)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_d161_s c n o) (l_e_st_eq_landau_n_rt_rp_d161_s c n o)) c).
-
-(* constant 3875 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t20 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero c).(l_andi (l_not (l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_d161_s c n o))) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_d161_s c n o) (l_e_st_eq_landau_n_rt_rp_d161_s c n o)) c) (l_e_st_eq_landau_n_rt_rp_pnotnd (l_e_st_eq_landau_n_rt_rp_d161_s c n o) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_d161_srp c n o))) (l_e_st_eq_landau_n_rt_rp_d161_t19 c n o) : l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_d161_s c n o))) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_d161_s c n o) (l_e_st_eq_landau_n_rt_rp_d161_s c n o)) c)).
-
-(* constant 3876 *)
-definition l_e_st_eq_landau_n_rt_rp_d161_t21 ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).λo:l_not (l_e_st_eq_landau_n_rt_rp_zero c).(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd x)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td x x) c)) (l_e_st_eq_landau_n_rt_rp_d161_s c n o) (l_e_st_eq_landau_n_rt_rp_d161_t20 c n o) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd x)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td x x) c))).
-
-(* constant 3877 *)
-definition l_e_st_eq_landau_n_rt_rp_satzd161a ≝ λc:l_e_st_eq_landau_n_rt_rp_dif.λn:l_not (l_e_st_eq_landau_n_rt_rp_negd c).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_zero c) (l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd x)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td x x) c))) (λt:l_e_st_eq_landau_n_rt_rp_zero c.l_e_st_eq_landau_n_rt_rp_d161_t17 c n t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_zero c).l_e_st_eq_landau_n_rt_rp_d161_t21 c n t) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd x)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td x x) c))).
-
-(* constant 3878 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_ori1 (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_absd a))) (l_e_st_eq_landau_n_rt_rp_satzd166f a z) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3879 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λn:l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a).(l_e_st_eq_landau_n_rt_rp_natintd (l_e_st_eq_landau_n_rt_rp_absd a) n : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3880 *)
-definition l_e_st_eq_landau_n_rt_rp_intabsd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.(l_orapp (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_absd a)) i (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_intd_t1 a i t) (λt:l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a).l_e_st_eq_landau_n_rt_rp_intd_t2 a i t) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3881 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λn:l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a).(l_e_st_eq_landau_n_rt_rp_eqnatd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_satzd178a a) n : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a))).
-
-(* constant 3882 *)
-definition l_e_st_eq_landau_n_rt_rp_intm0d ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a))) i (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_satzd176b a t) (λt:l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd a).l_e_st_eq_landau_n_rt_rp_intd_t4 a i t) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_m0d a)).
-
-(* constant 3883 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_pd a b) b (l_e_st_eq_landau_n_rt_rp_pd01 a b z) : l_e_st_eq_landau_n_rt_rp_eq b (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3884 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λz:l_e_st_eq_landau_n_rt_rp_zero a.(l_e_st_eq_landau_n_rt_rp_eqintd b (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_intd_t5 a b i j z) j : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3885 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t7 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λz:l_e_st_eq_landau_n_rt_rp_zero b.(l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_pd a b) a (l_e_st_eq_landau_n_rt_rp_pd02 a b z) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3886 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t8 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λz:l_e_st_eq_landau_n_rt_rp_zero b.(l_e_st_eq_landau_n_rt_rp_eqintd a (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_intd_t7 a b i j z) i : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3887 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t9 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_ande2 (l_e_st_eq_landau_n_rt_rp_posd a) (∀t:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd a t)) (l_e_st_eq_landau_n_rt_rp_posintnatd a p i) p : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_rpofpd a p)).
-
-(* constant 3888 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_apb1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pd a b) pp : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3889 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_a1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_rpofpd a p : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3890 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_b1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_rpofpd b q : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3891 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t10 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_natpl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_t9 a i p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q) (l_e_st_eq_landau_n_rt_rp_intd_t9 b j q) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q))).
-
-(* constant 3892 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t11 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_eqpd12 a (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p)) b (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q)) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 a p) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 b q) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q)))).
-
-(* constant 3893 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t12 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_treq (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q))) (l_e_st_eq_landau_n_rt_rp_intd_t11 a b i j pp p q) (l_e_st_eq_landau_n_rt_rp_lemmaivad1 (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q)))).
-
-(* constant 3894 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t13 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q))) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q)))) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q)) (l_e_st_eq_landau_n_rt_rp_eqpderp (l_e_st_eq_landau_n_rt_rp_pd a b) pp (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q))) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q))) (l_e_st_eq_landau_n_rt_rp_intd_t12 a b i j pp p q)) (l_e_st_eq_landau_n_rt_rp_isrppd2 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q))).
-
-(* constant 3895 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t14 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_isp1 l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b1 a b i j pp p q)) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp) (l_e_st_eq_landau_n_rt_rp_intd_t10 a b i j pp p q) (l_e_st_eq_landau_n_rt_rp_intd_t13 a b i j pp p q) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)).
-
-(* constant 3896 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t15 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_andi (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b)) (∀t:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j t)) pp (λt:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).l_e_st_eq_landau_n_rt_rp_intd_t14 a b i j t p q) : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3897 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t16 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λq:l_e_st_eq_landau_n_rt_rp_posd b.(l_e_st_eq_landau_n_rt_rp_natintd (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_intd_t15 a b i j pp p q) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3898 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t17 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_satzd176c b n : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_m0d b)).
-
-(* constant 3899 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_b2 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_intd_t17 a b i j pp p n) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3900 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t18 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_eqpd2 b (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d b)) a (l_e_st_eq_landau_n_rt_rp_satzd177a b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_md a (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3901 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t19 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_md a (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_intd_t18 a b i j pp p n) pp : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md a (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3902 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t20 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_satzd182a a (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_intd_t19 a b i j pp p n) : l_e_st_eq_landau_n_rt_rp_mored a (l_e_st_eq_landau_n_rt_rp_m0d b)).
-
-(* constant 3903 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t21 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_eqmored12 a (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p)) (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n)) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 a p) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_intd_t17 a b i j pp p n)) (l_e_st_eq_landau_n_rt_rp_intd_t20 a b i j pp p n) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n))).
-
-(* constant 3904 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t22 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_lemmaivad3 (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_t21 a b i j pp p n) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n)).
-
-(* constant 3905 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t23 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_natmn (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_t9 a i p) (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_t9 (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_intm0d b j) (l_e_st_eq_landau_n_rt_rp_intd_t17 a b i j pp p n)) (l_e_st_eq_landau_n_rt_rp_intd_t22 a b i j pp p n) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_t22 a b i j pp p n))).
-
-(* constant 3906 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t24 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_eqpd12 (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n)) (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_intd_t17 a b i j pp p n)) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 (l_e_st_eq_landau_n_rt_rp_pd a b) pp) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)))).
-
-(* constant 3907 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t25 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_tr4eq a (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a b) b) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp))) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a b) b) a (l_e_st_eq_landau_n_rt_rp_mdpd a b)) (l_e_st_eq_landau_n_rt_rp_compd (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_intd_t24 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_lemmaivad1 (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)) : l_e_st_eq_landau_n_rt_rp_eq a (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)))).
-
-(* constant 3908 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t26 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)) (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp))) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)))) (l_e_st_eq_landau_n_rt_rp_isrppd1 (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp))) (l_e_st_eq_landau_n_rt_rp_eqpderp a p (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp))) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp))) (l_e_st_eq_landau_n_rt_rp_intd_t25 a b i j pp p n)) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)) (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p)).
-
-(* constant 3909 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t27 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_satz140g (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp) (l_e_st_eq_landau_n_rt_rp_intd_t22 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_t26 a b i j pp p n) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_t22 a b i j pp p n))).
-
-(* constant 3910 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t28 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_isp1 l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) (l_e_st_eq_landau_n_rt_rp_mn (l_e_st_eq_landau_n_rt_rp_intd_a1 a b i j pp p) (l_e_st_eq_landau_n_rt_rp_intd_b2 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_t22 a b i j pp p n)) (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp) (l_e_st_eq_landau_n_rt_rp_intd_t23 a b i j pp p n) (l_e_st_eq_landau_n_rt_rp_intd_t27 a b i j pp p n) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j pp)).
-
-(* constant 3911 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t29 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_andi (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b)) (∀t:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_intd_apb1 a b i j t)) pp (λt:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).l_e_st_eq_landau_n_rt_rp_intd_t28 a b i j t p n) : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3912 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t30 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.λn:l_e_st_eq_landau_n_rt_rp_negd b.(l_e_st_eq_landau_n_rt_rp_natintd (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_intd_t29 a b i j pp p n) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3913 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t31 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λp:l_e_st_eq_landau_n_rt_rp_posd a.(l_e_st_eq_landau_n_rt_rp_rappd b (l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)) (λt:l_e_st_eq_landau_n_rt_rp_posd b.l_e_st_eq_landau_n_rt_rp_intd_t16 a b i j pp p t) (λt:l_e_st_eq_landau_n_rt_rp_zero b.l_e_st_eq_landau_n_rt_rp_intd_t8 a b i j t) (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_intd_t30 a b i j pp p t) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3914 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t31a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_pnotnd (l_e_st_eq_landau_n_rt_rp_pd a b) pp) (λt:l_e_st_eq_landau_n_rt_rp_negd b.l_e_st_eq_landau_n_rt_rp_npd a b n t) : l_not (l_e_st_eq_landau_n_rt_rp_negd b)).
-
-(* constant 3915 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t32 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_pnotnd (l_e_st_eq_landau_n_rt_rp_pd a b) pp) (λt:l_e_st_eq_landau_n_rt_rp_zero b.l_e_st_eq_landau_n_rt_rp_eqnegd a (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_symeq (l_e_st_eq_landau_n_rt_rp_pd a b) a (l_e_st_eq_landau_n_rt_rp_pd02 a b t)) n) : l_not (l_e_st_eq_landau_n_rt_rp_zero b)).
-
-(* constant 3916 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t33 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_or3e2 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_negd b) (l_e_st_eq_landau_n_rt_rp_axrdo b) (l_e_st_eq_landau_n_rt_rp_intd_t31a a b i j pp n) (l_e_st_eq_landau_n_rt_rp_intd_t32 a b i j pp n) : l_e_st_eq_landau_n_rt_rp_posd b).
-
-(* constant 3917 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t34 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_pd b a) (l_e_st_eq_landau_n_rt_rp_compd a b) pp : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd b a)).
-
-(* constant 3918 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t35 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_intd_t30 b a j i (l_e_st_eq_landau_n_rt_rp_intd_t34 a b i j pp n) (l_e_st_eq_landau_n_rt_rp_intd_t33 a b i j pp n) n : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd b a)).
-
-(* constant 3919 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t36 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).λn:l_e_st_eq_landau_n_rt_rp_negd a.(l_e_st_eq_landau_n_rt_rp_eqintd (l_e_st_eq_landau_n_rt_rp_pd b a) (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_compd b a) (l_e_st_eq_landau_n_rt_rp_intd_t35 a b i j pp n) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3920 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t37 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λpp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_rappd a (l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)) (λt:l_e_st_eq_landau_n_rt_rp_posd a.l_e_st_eq_landau_n_rt_rp_intd_t31 a b i j pp t) (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_intd_t6 a b i j t) (λt:l_e_st_eq_landau_n_rt_rp_negd a.l_e_st_eq_landau_n_rt_rp_intd_t36 a b i j pp t) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3921 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t38 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn0p:l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_intdi0 (l_e_st_eq_landau_n_rt_rp_pd a b) n0p : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3922 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t39 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λnp:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_satzd176c (l_e_st_eq_landau_n_rt_rp_pd a b) np : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b))).
-
-(* constant 3923 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t40 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λnp:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_eqposd (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_satzd180 a b) (l_e_st_eq_landau_n_rt_rp_intd_t39 a b i j np) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3924 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t41 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λnp:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_intd_t37 (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_intm0d a i) (l_e_st_eq_landau_n_rt_rp_intm0d b j) (l_e_st_eq_landau_n_rt_rp_intd_t40 a b i j np) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b))).
-
-(* constant 3925 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t42 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λnp:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_eqintd (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_satzd180a a b) (l_e_st_eq_landau_n_rt_rp_intd_t41 a b i j np) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b))).
-
-(* constant 3926 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t43 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λnp:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_intm0d (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_intd_t42 a b i j np) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b)))).
-
-(* constant 3927 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t44 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λnp:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b).(l_e_st_eq_landau_n_rt_rp_eqintd (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a b))) (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_satzd177 (l_e_st_eq_landau_n_rt_rp_pd a b)) (l_e_st_eq_landau_n_rt_rp_intd_t43 a b i j np) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3928 *)
-definition l_e_st_eq_landau_n_rt_rp_intpd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.(l_e_st_eq_landau_n_rt_rp_rappd (l_e_st_eq_landau_n_rt_rp_pd a b) (l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)) (λt:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a b).l_e_st_eq_landau_n_rt_rp_intd_t37 a b i j t) (λt:l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_pd a b).l_e_st_eq_landau_n_rt_rp_intd_t38 a b i j t) (λt:l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a b).l_e_st_eq_landau_n_rt_rp_intd_t44 a b i j t) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a b)).
-
-(* constant 3929 *)
-definition l_e_st_eq_landau_n_rt_rp_intmd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.(l_e_st_eq_landau_n_rt_rp_intpd a (l_e_st_eq_landau_n_rt_rp_m0d b) i (l_e_st_eq_landau_n_rt_rp_intm0d b j) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 3930 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t45 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_zero a) (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)) n (λt:l_e_st_eq_landau_n_rt_rp_zero a.l_e_st_eq_landau_n_rt_rp_td01 a b t) : l_not (l_e_st_eq_landau_n_rt_rp_zero a)).
-
-(* constant 3931 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t46 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_zero b) (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)) n (λt:l_e_st_eq_landau_n_rt_rp_zero b.l_e_st_eq_landau_n_rt_rp_td02 a b t) : l_not (l_e_st_eq_landau_n_rt_rp_zero b)).
-
-(* constant 3932 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t47 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_satzd166e a (l_e_st_eq_landau_n_rt_rp_intd_t45 a b i j n) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a)).
-
-(* constant 3933 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_a3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_intd_t47 a b i j n) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3934 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t48 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_satzd166e b (l_e_st_eq_landau_n_rt_rp_intd_t46 a b i j n) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd b)).
-
-(* constant 3935 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_b3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_intd_t48 a b i j n) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3936 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t49 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_natts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_t9 (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_intabsd a i) (l_e_st_eq_landau_n_rt_rp_intd_t47 a b i j n)) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_t9 (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_intabsd b j) (l_e_st_eq_landau_n_rt_rp_intd_t48 a b i j n)) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n))).
-
-(* constant 3937 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t50 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_satzd166e (l_e_st_eq_landau_n_rt_rp_td a b) n : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3938 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_atb3 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) p : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 3939 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t51 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_eqtd12 (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n)) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n)) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_intd_t47 a b i j n)) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_intd_t48 a b i j n)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n)))).
-
-(* constant 3940 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t52 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_st_eq_landau_n_rt_rp_tr3eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n))) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n))) (l_e_st_eq_landau_n_rt_rp_satzd193 a b) (l_e_st_eq_landau_n_rt_rp_intd_t51 a b i j n p) (l_e_st_eq_landau_n_rt_rp_lemmaivad2 (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n)))).
-
-(* constant 3941 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t53 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_tris2 l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_intd_atb3 a b i j n p) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n)) (l_e_st_eq_landau_n_rt_rp_rpofpd (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n))) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n)))) (l_e_st_eq_landau_n_rt_rp_eqpderp (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)) p (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n))) (l_e_st_eq_landau_n_rt_rp_posdirp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n))) (l_e_st_eq_landau_n_rt_rp_intd_t52 a b i j n p)) (l_e_st_eq_landau_n_rt_rp_isrppd1 (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n))) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_intd_atb3 a b i j n p) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n))).
-
-(* constant 3942 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t54 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).λp:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)).(l_e_isp1 l_e_st_eq_landau_n_rt_cut (λt:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_natrp t) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_intd_a3 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_b3 a b i j n)) (l_e_st_eq_landau_n_rt_rp_intd_atb3 a b i j n p) (l_e_st_eq_landau_n_rt_rp_intd_t49 a b i j n) (l_e_st_eq_landau_n_rt_rp_intd_t53 a b i j n p) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_intd_atb3 a b i j n p)).
-
-(* constant 3943 *)
-definition l_e_st_eq_landau_n_rt_rp_intd_t55 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.λn:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).(l_andi (l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b))) (∀t:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)).l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_intd_atb3 a b i j n t)) (l_e_st_eq_landau_n_rt_rp_intd_t50 a b i j n) (λt:l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b)).l_e_st_eq_landau_n_rt_rp_intd_t54 a b i j n t) : l_e_st_eq_landau_n_rt_rp_natd (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a b))).
-
-(* constant 3944 *)
-definition l_e_st_eq_landau_n_rt_rp_inttd ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λi:l_e_st_eq_landau_n_rt_rp_intd a.λj:l_e_st_eq_landau_n_rt_rp_intd b.(λt:l_not (l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a b)).l_e_st_eq_landau_n_rt_rp_intd_t55 a b i j t : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_td a b)).
-
-(* constant 3945 *)
-definition l_e_st_eq_landau_n_rt_rp_r_eq ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq x y : ∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.Prop).
-
-(* constant 3946 *)
-definition l_e_st_eq_landau_n_rt_rp_r_refeq ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_refeq x : ∀x:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_eq x x).
-
-(* constant 3947 *)
-definition l_e_st_eq_landau_n_rt_rp_r_symeq ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_eq x y.l_e_st_eq_landau_n_rt_rp_symeq x y t : ∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.∀t:l_e_st_eq_landau_n_rt_rp_r_eq x y.l_e_st_eq_landau_n_rt_rp_r_eq y x).
-
-(* constant 3948 *)
-definition l_e_st_eq_landau_n_rt_rp_r_treq ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_eq x y.λu:l_e_st_eq_landau_n_rt_rp_r_eq y z.l_e_st_eq_landau_n_rt_rp_treq x y z t u : ∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.∀z:l_e_st_eq_landau_n_rt_rp_dif.∀t:l_e_st_eq_landau_n_rt_rp_r_eq x y.∀u:l_e_st_eq_landau_n_rt_rp_r_eq y z.l_e_st_eq_landau_n_rt_rp_r_eq x z).
-
-(* constant 3949 *)
-definition l_e_st_eq_landau_n_rt_rp_r_inn ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_esti l_e_st_eq_landau_n_rt_rp_dif a s : Prop).
-
-(* constant 3950 *)
-definition l_e_st_eq_landau_n_rt_rp_r_real ≝ (l_e_st_eq_ect l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq : Type[0]).
-
-(* constant 3951 *)
-definition l_e_st_eq_landau_n_rt_rp_r_is ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_is l_e_st_eq_landau_n_rt_rp_r_real r s : Prop).
-
-(* constant 3952 *)
-definition l_e_st_eq_landau_n_rt_rp_r_nis ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_not (l_e_st_eq_landau_n_rt_rp_r_is r s) : Prop).
-
-(* constant 3953 *)
-definition l_e_st_eq_landau_n_rt_rp_r_some ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_r_real.Prop.(l_some l_e_st_eq_landau_n_rt_rp_r_real p : Prop).
-
-(* constant 3954 *)
-definition l_e_st_eq_landau_n_rt_rp_r_all ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_r_real.Prop.(l_all l_e_st_eq_landau_n_rt_rp_r_real p : Prop).
-
-(* constant 3955 *)
-definition l_e_st_eq_landau_n_rt_rp_r_one ≝ λp:∀x:l_e_st_eq_landau_n_rt_rp_r_real.Prop.(l_e_one l_e_st_eq_landau_n_rt_rp_r_real p : Prop).
-
-(* constant 3956 *)
-definition l_e_st_eq_landau_n_rt_rp_r_in ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs0:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_real r s0 : Prop).
-
-(* constant 3957 *)
-definition l_e_st_eq_landau_n_rt_rp_r_realof ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_ectelt l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq a : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 3958 *)
-definition l_e_st_eq_landau_n_rt_rp_r_class ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_ecect l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq r : l_e_st_set l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 3959 *)
-definition l_e_st_eq_landau_n_rt_rp_r_innclass ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.(l_e_st_eq_4_th5 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq a : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class (l_e_st_eq_landau_n_rt_rp_r_realof a))).
-
-(* constant 3960 *)
-definition l_e_st_eq_landau_n_rt_rp_r_eqinn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_4_th8 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq r a air b e : l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class r)).
-
-(* constant 3961 *)
-definition l_e_st_eq_landau_n_rt_rp_r_realapp1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rp_dif.∀xi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).p.(l_e_st_eq_4_th3 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq r p p1 : p).
-
-(* constant 3962 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.∀xi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).∀yi:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).p.λa:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_realapp1 s p (λy:l_e_st_eq_landau_n_rt_rp_dif.p1 a y air) : p).
-
-(* constant 3963 *)
-definition l_e_st_eq_landau_n_rt_rp_r_realapp2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.∀xi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).∀yi:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).p.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r p (λx:l_e_st_eq_landau_n_rt_rp_dif.λxi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr1_t1 r s p p1 x xi) : p).
-
-(* constant 3964 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.∀z:l_e_st_eq_landau_n_rt_rp_dif.∀xi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).∀yi:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).∀zi:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).p.λa:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_realapp2 s t p (λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.p1 a y z air) : p).
-
-(* constant 3965 *)
-definition l_e_st_eq_landau_n_rt_rp_r_realapp3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.∀z:l_e_st_eq_landau_n_rt_rp_dif.∀xi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).∀yi:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).∀zi:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).p.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r p (λx:l_e_st_eq_landau_n_rt_rp_dif.λxi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr1_t2 r s t p p1 x xi) : p).
-
-(* constant 3966 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.∀z:l_e_st_eq_landau_n_rt_rp_dif.∀v:l_e_st_eq_landau_n_rt_rp_dif.∀xi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).∀yi:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).∀zi:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).∀vi:l_e_st_eq_landau_n_rt_rp_r_inn v (l_e_st_eq_landau_n_rt_rp_r_class u).p.λa:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_realapp3 s t u p (λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λv:l_e_st_eq_landau_n_rt_rp_dif.p1 a y z v air) : p).
-
-(* constant 3967 *)
-definition l_e_st_eq_landau_n_rt_rp_r_realapp4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:Prop.λp1:∀x:l_e_st_eq_landau_n_rt_rp_dif.∀y:l_e_st_eq_landau_n_rt_rp_dif.∀z:l_e_st_eq_landau_n_rt_rp_dif.∀v:l_e_st_eq_landau_n_rt_rp_dif.∀xi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).∀yi:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).∀zi:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).∀vi:l_e_st_eq_landau_n_rt_rp_r_inn v (l_e_st_eq_landau_n_rt_rp_r_class u).p.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r p (λx:l_e_st_eq_landau_n_rt_rp_dif.λxi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr1_t3 r s t u p p1 x xi) : p).
-
-(* constant 3968 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λe:l_e_st_eq_landau_n_rt_rp_eq a1 b1.(l_e_st_eq_5_th3 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq r s a1 a1ir b1 b1is e : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 3969 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_5_th5 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq r s a1 a1ir b1 b1is i : l_e_st_eq_landau_n_rt_rp_eq a1 b1).
-
-(* constant 3970 *)
-definition l_e_st_eq_landau_n_rt_rp_r_nisin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_eq a1 b1).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_eq a1 b1) n (λt:l_e_st_eq_landau_n_rt_rp_r_is r s.l_e_st_eq_landau_n_rt_rp_r_isex r s a1 b1 a1ir b1is t) : l_e_st_eq_landau_n_rt_rp_r_nis r s).
-
-(* constant 3971 *)
-definition l_e_st_eq_landau_n_rt_rp_r_nisex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_nis r s.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_r_is r s) n (λt:l_e_st_eq_landau_n_rt_rp_eq a1 b1.l_e_st_eq_landau_n_rt_rp_r_isin r s a1 b1 a1ir b1is t) : l_not (l_e_st_eq_landau_n_rt_rp_eq a1 b1)).
-
-(* constant 3972 *)
-definition l_e_st_eq_landau_n_rt_rp_r_fixf ≝ λalpha:Type[0].λf:Πx:l_e_st_eq_landau_n_rt_rp_dif.alpha.(l_e_st_eq_fixfu l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq alpha f : Prop).
-
-(* constant 3973 *)
-definition l_e_st_eq_landau_n_rt_rp_r_indreal ≝ λalpha:Type[0].λf:Πx:l_e_st_eq_landau_n_rt_rp_dif.alpha.λff:l_e_st_eq_landau_n_rt_rp_r_fixf alpha f.λr0:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_indeq l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq alpha f ff r0 : alpha).
-
-(* constant 3974 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isindreal ≝ λalpha:Type[0].λf:Πx:l_e_st_eq_landau_n_rt_rp_dif.alpha.λff:l_e_st_eq_landau_n_rt_rp_r_fixf alpha f.λr0:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r0).(l_e_st_eq_10_th2 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq alpha f ff r0 a air : l_e_is alpha (f a) (l_e_st_eq_landau_n_rt_rp_r_indreal alpha f ff r0)).
-
-(* constant 3975 *)
-definition l_e_st_eq_landau_n_rt_rp_r_fixf2 ≝ λalpha:Type[0].λg:Πx:l_e_st_eq_landau_n_rt_rp_dif.Πy:l_e_st_eq_landau_n_rt_rp_dif.alpha.(l_e_st_eq_fixfu2 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq alpha g : Prop).
-
-(* constant 3976 *)
-definition l_e_st_eq_landau_n_rt_rp_r_indreal2 ≝ λalpha:Type[0].λg:Πx:l_e_st_eq_landau_n_rt_rp_dif.Πy:l_e_st_eq_landau_n_rt_rp_dif.alpha.λff2:l_e_st_eq_landau_n_rt_rp_r_fixf2 alpha g.λr0:l_e_st_eq_landau_n_rt_rp_r_real.λs0:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_indeq2 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq alpha g ff2 r0 s0 : alpha).
-
-(* constant 3977 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isindreal2 ≝ λalpha:Type[0].λg:Πx:l_e_st_eq_landau_n_rt_rp_dif.Πy:l_e_st_eq_landau_n_rt_rp_dif.alpha.λff2:l_e_st_eq_landau_n_rt_rp_r_fixf2 alpha g.λr0:l_e_st_eq_landau_n_rt_rp_r_real.λs0:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r0).λbis:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s0).(l_e_st_eq_11_th1 l_e_st_eq_landau_n_rt_rp_dif l_e_st_eq_landau_n_rt_rp_r_eq l_e_st_eq_landau_n_rt_rp_r_refeq l_e_st_eq_landau_n_rt_rp_r_symeq l_e_st_eq_landau_n_rt_rp_r_treq alpha g ff2 r0 s0 a air b bis : l_e_is alpha (g a b) (l_e_st_eq_landau_n_rt_rp_r_indreal2 alpha g ff2 r0 s0)).
-
-(* constant 3978 *)
-definition l_e_st_eq_landau_n_rt_rp_r_0 ≝ (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 3979 *)
-definition l_e_st_eq_landau_n_rt_rp_r_0in ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λz:l_e_st_eq_landau_n_rt_rp_zero a0.(l_e_st_eq_landau_n_rt_rp_r_isin r l_e_st_eq_landau_n_rt_rp_r_0 a0 (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) a0ir (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_zeroeq a0 (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) z (l_e_st_eq_landau_n_rt_rp_zeroi l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp (l_e_refis l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_rp_1rp))) : l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 3980 *)
-definition l_e_st_eq_landau_n_rt_rp_r_0ex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_eqzero (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) a0 (l_e_st_eq_landau_n_rt_rp_r_isex l_e_st_eq_landau_n_rt_rp_r_0 r (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) a0 (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) a0ir (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r l_e_st_eq_landau_n_rt_rp_r_0 i)) (l_e_tris l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_stm (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) l_e_st_eq_landau_n_rt_rp_1rp (l_e_st_eq_landau_n_rt_rp_std (l_e_st_eq_landau_n_rt_rp_df l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) (l_e_st_eq_landau_n_rt_rp_stmis l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp) (l_e_st_eq_landau_n_rt_rp_isstd l_e_st_eq_landau_n_rt_rp_1rp l_e_st_eq_landau_n_rt_rp_1rp)) : l_e_st_eq_landau_n_rt_rp_zero a0).
-
-(* constant 3981 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_propp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.(l_and (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_posd a0) : Prop).
-
-(* constant 3982 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pos ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr1_propp r x) : Prop).
-
-(* constant 3983 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_posd a0.(l_andi (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_posd a0) a0ir p : l_e_st_eq_landau_n_rt_rp_r_ivr1_propp r a0).
-
-(* constant 3984 *)
-definition l_e_st_eq_landau_n_rt_rp_r_posin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_posd a0.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr1_propp r x) a0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t4 r a0 a0ir p) : l_e_st_eq_landau_n_rt_rp_r_pos r).
-
-(* constant 3985 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λa:l_e_st_eq_landau_n_rt_rp_dif.λq1:l_e_st_eq_landau_n_rt_rp_r_ivr1_propp r a.(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_posd a) q1 : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)).
-
-(* constant 3986 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λa:l_e_st_eq_landau_n_rt_rp_dif.λq1:l_e_st_eq_landau_n_rt_rp_r_ivr1_propp r a.(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_posd a) q1 : l_e_st_eq_landau_n_rt_rp_posd a).
-
-(* constant 3987 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λa:l_e_st_eq_landau_n_rt_rp_dif.λq1:l_e_st_eq_landau_n_rt_rp_r_ivr1_propp r a.(l_e_st_eq_landau_n_rt_rp_eqposd a a0 (l_e_st_eq_landau_n_rt_rp_r_isex r r a a0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t5 r a0 a0ir p a q1) a0ir (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t6 r a0 a0ir p a q1) : l_e_st_eq_landau_n_rt_rp_posd a0).
-
-(* constant 3988 *)
-definition l_e_st_eq_landau_n_rt_rp_r_posex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr1_propp r x) p (l_e_st_eq_landau_n_rt_rp_posd a0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_ivr1_propp r x.l_e_st_eq_landau_n_rt_rp_r_ivr1_t7 r a0 a0ir p x t) : l_e_st_eq_landau_n_rt_rp_posd a0).
-
-(* constant 3989 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_propn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.(l_and (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_negd a0) : Prop).
-
-(* constant 3990 *)
-definition l_e_st_eq_landau_n_rt_rp_r_neg ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr1_propn r x) : Prop).
-
-(* constant 3991 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_negd a0.(l_andi (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_negd a0) a0ir n : l_e_st_eq_landau_n_rt_rp_r_ivr1_propn r a0).
-
-(* constant 3992 *)
-definition l_e_st_eq_landau_n_rt_rp_r_negin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_negd a0.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr1_propn r x) a0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t8 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_neg r).
-
-(* constant 3993 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λa:l_e_st_eq_landau_n_rt_rp_dif.λpl:l_e_st_eq_landau_n_rt_rp_r_ivr1_propn r a.(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_negd a) pl : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)).
-
-(* constant 3994 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λa:l_e_st_eq_landau_n_rt_rp_dif.λpl:l_e_st_eq_landau_n_rt_rp_r_ivr1_propn r a.(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_negd a) pl : l_e_st_eq_landau_n_rt_rp_negd a).
-
-(* constant 3995 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λa:l_e_st_eq_landau_n_rt_rp_dif.λpl:l_e_st_eq_landau_n_rt_rp_r_ivr1_propn r a.(l_e_st_eq_landau_n_rt_rp_eqnegd a a0 (l_e_st_eq_landau_n_rt_rp_r_isex r r a a0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t9 r a0 a0ir n a pl) a0ir (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t10 r a0 a0ir n a pl) : l_e_st_eq_landau_n_rt_rp_negd a0).
-
-(* constant 3996 *)
-definition l_e_st_eq_landau_n_rt_rp_r_negex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr1_propn r x) n (l_e_st_eq_landau_n_rt_rp_negd a0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_ivr1_propn r x.l_e_st_eq_landau_n_rt_rp_r_ivr1_t11 r a0 a0ir n x t) : l_e_st_eq_landau_n_rt_rp_negd a0).
-
-(* constant 3997 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_posd a0.(l_or3i2 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_posin r a0 a0ir p) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 3998 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t13 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λz:l_e_st_eq_landau_n_rt_rp_zero a0.(l_or3i1 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_0in r a0 a0ir z) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 3999 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t14 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_negd a0.(l_or3i3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_negin r a0 a0ir n) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "grundlagen_2_3.ma".
-
-(* constant 4000 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t15 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_rappd a0 (l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)) (λt:l_e_st_eq_landau_n_rt_rp_posd a0.l_e_st_eq_landau_n_rt_rp_r_ivr1_t12 r a0 a0ir t) (λt:l_e_st_eq_landau_n_rt_rp_zero a0.l_e_st_eq_landau_n_rt_rp_r_ivr1_t13 r a0 a0ir t) (λt:l_e_st_eq_landau_n_rt_rp_negd a0.l_e_st_eq_landau_n_rt_rp_r_ivr1_t14 r a0 a0ir t) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4001 *)
-definition l_e_st_eq_landau_n_rt_rp_r_axrlo ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λxi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr1_t15 r x xi) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4002 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t16 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_posd a0) (l_e_st_eq_landau_n_rt_rp_0notpd a0 (l_e_st_eq_landau_n_rt_rp_r_0ex r a0 a0ir i)) (λt:l_e_st_eq_landau_n_rt_rp_r_pos r.l_e_st_eq_landau_n_rt_rp_r_posex r a0 a0ir t) : l_not (l_e_st_eq_landau_n_rt_rp_r_pos r)).
-
-(* constant 4003 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t17 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_negd a0) (l_e_st_eq_landau_n_rt_rp_pnotnd a0 (l_e_st_eq_landau_n_rt_rp_r_posex r a0 a0ir p)) (λt:l_e_st_eq_landau_n_rt_rp_r_neg r.l_e_st_eq_landau_n_rt_rp_r_negex r a0 a0ir t) : l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4004 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t18 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_zero a0) (l_e_st_eq_landau_n_rt_rp_nnot0d a0 (l_e_st_eq_landau_n_rt_rp_r_negex r a0 a0ir n)) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_0ex r a0 a0ir t) : l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 4005 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t19 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_ec3_th6 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_ivr1_t16 r a0 a0ir t) (λt:l_e_st_eq_landau_n_rt_rp_r_pos r.l_e_st_eq_landau_n_rt_rp_r_ivr1_t17 r a0 a0ir t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg r.l_e_st_eq_landau_n_rt_rp_r_ivr1_t18 r a0 a0ir t) : l_ec3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4006 *)
-definition l_e_st_eq_landau_n_rt_rp_r_axrle ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_ec3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λxi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr1_t19 r x xi) : l_ec3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4007 *)
-definition l_e_st_eq_landau_n_rt_rp_r_axrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_orec3i (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_axrlo r) (l_e_st_eq_landau_n_rt_rp_r_axrle r) : l_orec3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4008 *)
-definition l_e_st_eq_landau_n_rt_rp_r_rapp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:Prop.λp1:∀t:l_e_st_eq_landau_n_rt_rp_r_pos r.p.λp2:∀t:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.p.λp3:∀t:l_e_st_eq_landau_n_rt_rp_r_neg r.p.(l_or3app (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) p (l_e_st_eq_landau_n_rt_rp_r_axrlo r) p2 p1 p3 : p).
-
-(* constant 4009 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pnotn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_ec3e23 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_axrle r) p : l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4010 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pnot0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_ec3e21 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_axrle r) p : l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4011 *)
-definition l_e_st_eq_landau_n_rt_rp_r_0notp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_ec3e12 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_axrle r) i : l_not (l_e_st_eq_landau_n_rt_rp_r_pos r)).
-
-(* constant 4012 *)
-definition l_e_st_eq_landau_n_rt_rp_r_0notn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_ec3e13 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_axrle r) i : l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)).
-
-(* constant 4013 *)
-definition l_e_st_eq_landau_n_rt_rp_r_nnotp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_ec3e32 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_axrle r) n : l_not (l_e_st_eq_landau_n_rt_rp_r_pos r)).
-
-(* constant 4014 *)
-definition l_e_st_eq_landau_n_rt_rp_r_nnot0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_ec3e31 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_axrle r) n : l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4015 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ispos ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_pos x) r s p i : l_e_st_eq_landau_n_rt_rp_r_pos s).
-
-(* constant 4016 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isneg ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_neg x) r s n i : l_e_st_eq_landau_n_rt_rp_r_neg s).
-
-(* constant 4017 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pofrp ≝ λr0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_pdofrp r0) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4018 *)
-definition l_e_st_eq_landau_n_rt_rp_r_nofrp ≝ λr0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_ndofrp r0) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4019 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrpep ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is r0 s0.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_pofrp x) r0 s0 i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)).
-
-(* constant 4020 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrpen ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_is r0 s0.(l_e_isf l_e_st_eq_landau_n_rt_cut l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_nofrp x) r0 s0 i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_nofrp s0)).
-
-(* constant 4021 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t20 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).(l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp s0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp s0)) i : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp s0)).
-
-(* constant 4022 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrpip ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).(l_e_st_eq_landau_n_rt_rp_isrpipd r0 s0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t20 r0 s0 i) : l_e_st_eq_landau_n_rt_rp_is r0 s0).
-
-(* constant 4023 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t21 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_nofrp s0).(l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_nofrp s0) (l_e_st_eq_landau_n_rt_rp_ndofrp r0) (l_e_st_eq_landau_n_rt_rp_ndofrp s0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_ndofrp r0)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_ndofrp s0)) i : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_ndofrp r0) (l_e_st_eq_landau_n_rt_rp_ndofrp s0)).
-
-(* constant 4024 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrpin ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_nofrp s0).(l_e_st_eq_landau_n_rt_rp_isrpind r0 s0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t21 r0 s0 i) : l_e_st_eq_landau_n_rt_rp_is r0 s0).
-
-(* constant 4025 *)
-definition l_e_st_eq_landau_n_rt_rp_r_posi ≝ λr0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_posdirp r0) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pofrp r0)).
-
-(* constant 4026 *)
-definition l_e_st_eq_landau_n_rt_rp_r_negi ≝ λr0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_r_negin (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_ndofrp r0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_ndofrp r0)) (l_e_st_eq_landau_n_rt_rp_negdirp r0) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_nofrp r0)).
-
-(* constant 4027 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t22 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp r0).λj:l_e_st_eq_landau_n_rt_rp_r_is s (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).λk:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_isrpip r0 s0 (l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) r s (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) i) k j) : l_e_st_eq_landau_n_rt_rp_is r0 s0).
-
-(* constant 4028 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t23 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(λx:l_e_st_eq_landau_n_rt_cut.λy:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x).λu:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp y).l_e_st_eq_landau_n_rt_rp_r_ivr1_t22 r r x y t u (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r) : l_e_amone l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x))).
-
-(* constant 4029 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t24 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp1:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_posex r a0 a0ir p1 : l_e_st_eq_landau_n_rt_rp_posd a0).
-
-(* constant 4030 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_pr ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp1:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_rpofpd a0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t24 r a0 a0ir p1) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4031 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t25 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp1:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_isin r (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_ivr1_pr r a0 a0ir p1)) a0 (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_r_ivr1_pr r a0 a0ir p1)) a0ir (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_r_ivr1_pr r a0 a0ir p1))) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 a0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t24 r a0 a0ir p1)) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_ivr1_pr r a0 a0ir p1))).
-
-(* constant 4032 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t26 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp1:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_somei l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_pr r a0 a0ir p1) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t25 r a0 a0ir p1) : l_e_st_eq_landau_n_rt_rp_some (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x))).
-
-(* constant 4033 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t27 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_some (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr1_t26 r x t p) : l_e_st_eq_landau_n_rt_rp_some (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x))).
-
-(* constant 4034 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t28 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_onei l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t23 r) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t27 r p) : l_e_st_eq_landau_n_rt_rp_one (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x))).
-
-(* constant 4035 *)
-definition l_e_st_eq_landau_n_rt_rp_r_rpofp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_ind l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t28 r p) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4036 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isprp1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_oneax l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp x)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t28 r p) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp r p))).
-
-(* constant 4037 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isprp2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp r p)) (l_e_st_eq_landau_n_rt_rp_r_isprp1 r p) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp r p)) r).
-
-(* constant 4038 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isperp ≝ λr1:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r1.λs1:l_e_st_eq_landau_n_rt_rp_r_real.λq:l_e_st_eq_landau_n_rt_rp_r_pos s1.λi:l_e_st_eq_landau_n_rt_rp_r_is r1 s1.(l_e_st_eq_landau_n_rt_rp_r_ivr1_t22 r1 s1 (l_e_st_eq_landau_n_rt_rp_r_rpofp r1 p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s1 q) (l_e_st_eq_landau_n_rt_rp_r_isprp1 r1 p) (l_e_st_eq_landau_n_rt_rp_r_isprp1 s1 q) i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_r_rpofp r1 p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s1 q)).
-
-(* constant 4039 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ispirp ≝ λr1:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r1.λs1:l_e_st_eq_landau_n_rt_rp_r_real.λq:l_e_st_eq_landau_n_rt_rp_r_pos s1.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_r_rpofp r1 p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s1 q).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real r1 (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp r1 p)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp s1 q)) s1 (l_e_st_eq_landau_n_rt_rp_r_isprp1 r1 p) (l_e_st_eq_landau_n_rt_rp_r_isrpep (l_e_st_eq_landau_n_rt_rp_r_rpofp r1 p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s1 q) i) (l_e_st_eq_landau_n_rt_rp_r_isprp2 s1 q) : l_e_st_eq_landau_n_rt_rp_r_is r1 s1).
-
-(* constant 4040 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrpp1 ≝ λr0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_r_ivr1_t22 (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) r0 (l_e_st_eq_landau_n_rt_rp_r_rpofp (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_posi r0)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pofrp r0)) (l_e_st_eq_landau_n_rt_rp_r_isprp1 (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_posi r0)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pofrp r0)) : l_e_st_eq_landau_n_rt_rp_is r0 (l_e_st_eq_landau_n_rt_rp_r_rpofp (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_posi r0))).
-
-(* constant 4041 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrpp2 ≝ λr0:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut r0 (l_e_st_eq_landau_n_rt_rp_r_rpofp (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_posi r0)) (l_e_st_eq_landau_n_rt_rp_r_isrpp1 r0) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_r_rpofp (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_posi r0)) r0).
-
-(* constant 4042 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t29 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp r0).λj:l_e_st_eq_landau_n_rt_rp_r_is s (l_e_st_eq_landau_n_rt_rp_r_nofrp s0).λk:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_isrpin r0 s0 (l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) r s (l_e_st_eq_landau_n_rt_rp_r_nofrp s0) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) i) k j) : l_e_st_eq_landau_n_rt_rp_is r0 s0).
-
-(* constant 4043 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t30 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(λx:l_e_st_eq_landau_n_rt_cut.λy:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x).λu:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp y).l_e_st_eq_landau_n_rt_rp_r_ivr1_t29 r r x y t u (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r) : l_e_amone l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x))).
-
-(* constant 4044 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t31 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn1:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_negex r a0 a0ir n1 : l_e_st_eq_landau_n_rt_rp_negd a0).
-
-(* constant 4045 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_nr ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn1:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_rpofnd a0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t31 r a0 a0ir n1) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4046 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t32 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn1:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_isin r (l_e_st_eq_landau_n_rt_rp_r_nofrp (l_e_st_eq_landau_n_rt_rp_r_ivr1_nr r a0 a0ir n1)) a0 (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_r_ivr1_nr r a0 a0ir n1)) a0ir (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_ndofrp (l_e_st_eq_landau_n_rt_rp_r_ivr1_nr r a0 a0ir n1))) (l_e_st_eq_landau_n_rt_rp_eqndrp1 a0 (l_e_st_eq_landau_n_rt_rp_r_ivr1_t31 r a0 a0ir n1)) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp (l_e_st_eq_landau_n_rt_rp_r_ivr1_nr r a0 a0ir n1))).
-
-(* constant 4047 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t33 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn1:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_somei l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_nr r a0 a0ir n1) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t32 r a0 a0ir n1) : l_e_st_eq_landau_n_rt_rp_some (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x))).
-
-(* constant 4048 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t34 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_some (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr1_t33 r x t n) : l_e_st_eq_landau_n_rt_rp_some (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x))).
-
-(* constant 4049 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr1_t35 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_onei l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t30 r) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t34 r n) : l_e_st_eq_landau_n_rt_rp_one (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x))).
-
-(* constant 4050 *)
-definition l_e_st_eq_landau_n_rt_rp_r_rpofn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_ind l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t35 r n) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4051 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isnrp1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_oneax l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp x)) (l_e_st_eq_landau_n_rt_rp_r_ivr1_t35 r n) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_nofrp (l_e_st_eq_landau_n_rt_rp_r_rpofn r n))).
-
-(* constant 4052 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isnrp2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_nofrp (l_e_st_eq_landau_n_rt_rp_r_rpofn r n)) (l_e_st_eq_landau_n_rt_rp_r_isnrp1 r n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_nofrp (l_e_st_eq_landau_n_rt_rp_r_rpofn r n)) r).
-
-(* constant 4053 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isnerp ≝ λr1:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r1.λs1:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_neg s1.λi:l_e_st_eq_landau_n_rt_rp_r_is r1 s1.(l_e_st_eq_landau_n_rt_rp_r_ivr1_t29 r1 s1 (l_e_st_eq_landau_n_rt_rp_r_rpofn r1 n) (l_e_st_eq_landau_n_rt_rp_r_rpofn s1 m) (l_e_st_eq_landau_n_rt_rp_r_isnrp1 r1 n) (l_e_st_eq_landau_n_rt_rp_r_isnrp1 s1 m) i : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_r_rpofn r1 n) (l_e_st_eq_landau_n_rt_rp_r_rpofn s1 m)).
-
-(* constant 4054 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isnirp ≝ λr1:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r1.λs1:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_neg s1.λi:l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_r_rpofn r1 n) (l_e_st_eq_landau_n_rt_rp_r_rpofn s1 m).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real r1 (l_e_st_eq_landau_n_rt_rp_r_nofrp (l_e_st_eq_landau_n_rt_rp_r_rpofn r1 n)) (l_e_st_eq_landau_n_rt_rp_r_nofrp (l_e_st_eq_landau_n_rt_rp_r_rpofn s1 m)) s1 (l_e_st_eq_landau_n_rt_rp_r_isnrp1 r1 n) (l_e_st_eq_landau_n_rt_rp_r_isrpen (l_e_st_eq_landau_n_rt_rp_r_rpofn r1 n) (l_e_st_eq_landau_n_rt_rp_r_rpofn s1 m) i) (l_e_st_eq_landau_n_rt_rp_r_isnrp2 s1 m) : l_e_st_eq_landau_n_rt_rp_r_is r1 s1).
-
-(* constant 4055 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrpn1 ≝ λr0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_r_ivr1_t29 (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) r0 (l_e_st_eq_landau_n_rt_rp_r_rpofn (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_negi r0)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_nofrp r0)) (l_e_st_eq_landau_n_rt_rp_r_isnrp1 (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_negi r0)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_nofrp r0)) : l_e_st_eq_landau_n_rt_rp_is r0 (l_e_st_eq_landau_n_rt_rp_r_rpofn (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_negi r0))).
-
-(* constant 4056 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrpn2 ≝ λr0:l_e_st_eq_landau_n_rt_cut.(l_e_symis l_e_st_eq_landau_n_rt_cut r0 (l_e_st_eq_landau_n_rt_rp_r_rpofn (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_negi r0)) (l_e_st_eq_landau_n_rt_rp_r_isrpn1 r0) : l_e_st_eq_landau_n_rt_rp_is (l_e_st_eq_landau_n_rt_rp_r_rpofn (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_r_negi r0)) r0).
-
-(* constant 4057 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz163 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r : l_e_st_eq_landau_n_rt_rp_r_is r r).
-
-(* constant 4058 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz164 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r s i : l_e_st_eq_landau_n_rt_rp_r_is s r).
-
-(* constant 4059 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz165 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λj:l_e_st_eq_landau_n_rt_rp_r_is s t.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real r s t i j : l_e_st_eq_landau_n_rt_rp_r_is r t).
-
-(* constant 4060 *)
-definition l_e_st_eq_landau_n_rt_rp_r_absdr ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_absd x) : Πx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4061 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_absd a) (l_e_st_eq_landau_n_rt_rp_absd b) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_absd a)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_absd b)) (l_e_st_eq_landau_n_rt_rp_eqabsd a b e) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_absdr a) (l_e_st_eq_landau_n_rt_rp_r_absdr b)).
-
-(* constant 4062 *)
-definition l_e_st_eq_landau_n_rt_rp_r_fabsdr ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_eq x y.l_e_st_eq_landau_n_rt_rp_r_ivr2_t1 x y t : l_e_st_eq_landau_n_rt_rp_r_fixf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_absdr).
-
-(* constant 4063 *)
-definition l_e_st_eq_landau_n_rt_rp_r_abs ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_indreal l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_absdr l_e_st_eq_landau_n_rt_rp_r_fabsdr r : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4064 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_isindreal l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_absdr l_e_st_eq_landau_n_rt_rp_r_fabsdr r a0 a0ir : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_absd a0)) (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4065 *)
-definition l_e_st_eq_landau_n_rt_rp_r_aica ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_r_class x)) (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_absd a0)) (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_absd a0)) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t2 r a0 a0ir) : l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_r_class (l_e_st_eq_landau_n_rt_rp_r_abs r))).
-
-(* constant 4066 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isabs ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_abs x) r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)).
-
-(* constant 4067 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_satzd166a a0 (l_e_st_eq_landau_n_rt_rp_r_posex r a0 a0ir p) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a0)).
-
-(* constant 4068 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_r_aica r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_2r166_t1 r a0 a0ir p) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4069 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz166a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_2r166_t2 r x t p) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4070 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_satzd166b a0 (l_e_st_eq_landau_n_rt_rp_r_negex r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_absd a0)).
-
-(* constant 4071 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_r_aica r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_2r166_t3 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4072 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz166b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_2r166_t4 r x t n) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4073 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s).(l_e_st_eq_landau_n_rt_rp_satzd166c a1 b1 (l_e_st_eq_landau_n_rt_rp_r_posex r a1 a1ir p) (l_e_st_eq_landau_n_rt_rp_r_posex s b1 b1is q) (l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1) (l_e_st_eq_landau_n_rt_rp_r_aica r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_aica s b1 b1is) i) : l_e_st_eq_landau_n_rt_rp_eq a1 b1).
-
-(* constant 4074 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s).(l_e_st_eq_landau_n_rt_rp_r_isin r s a1 b1 a1ir b1is (l_e_st_eq_landau_n_rt_rp_r_2r166_t5 r s a1 b1 a1ir b1is p q i) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4075 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz166c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s).(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_2r166_t6 r s x y t u p q i) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4076 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s).(l_e_st_eq_landau_n_rt_rp_satzd166d a1 b1 (l_e_st_eq_landau_n_rt_rp_r_negex r a1 a1ir n) (l_e_st_eq_landau_n_rt_rp_r_negex s b1 b1is o) (l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1) (l_e_st_eq_landau_n_rt_rp_r_aica r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_aica s b1 b1is) i) : l_e_st_eq_landau_n_rt_rp_eq a1 b1).
-
-(* constant 4077 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s).(l_e_st_eq_landau_n_rt_rp_r_isin r s a1 b1 a1ir b1is (l_e_st_eq_landau_n_rt_rp_r_2r166_t7 r s a1 b1 a1ir b1is n o i) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4078 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz166d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s).(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_2r166_t8 r s x y t u n o i) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4079 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz166e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_rapp r (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)) (λt:l_e_st_eq_landau_n_rt_rp_r_pos r.l_e_st_eq_landau_n_rt_rp_r_satz166a r t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)) n) (λt:l_e_st_eq_landau_n_rt_rp_r_neg r.l_e_st_eq_landau_n_rt_rp_r_satz166b r t) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4080 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_satzd166f a0 (l_e_st_eq_landau_n_rt_rp_r_0ex r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_absd a0)).
-
-(* constant 4081 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r166_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_0in (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_r_aica r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_2r166_t9 r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4082 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz166f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_2r166_t10 r x t i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4083 *)
-definition l_e_st_eq_landau_n_rt_rp_r_more ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_and3 (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_mored x y))) : Prop).
-
-(* constant 4084 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_propm ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.(l_and3 (l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) : Prop).
-
-(* constant 4085 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_mored a1 b1.(l_and3i (l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) a1ir b1is m : l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a1 b1).
-
-(* constant 4086 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_mored a1 b1.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a1 x) b1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t3 r s a1 b1 a1ir b1is m) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a1 x)).
-
-(* constant 4087 *)
-definition l_e_st_eq_landau_n_rt_rp_r_morein ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_mored a1 b1.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s x y)) a1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t4 r s a1 b1 a1ir b1is m) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4088 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a x).λb:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a b.(l_and3e1 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_mored a b) p2 : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)).
-
-(* constant 4089 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a x).λb:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a b.(l_and3e2 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_mored a b) p2 : l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s)).
-
-(* constant 4090 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a x).λb:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a b.(l_and3e3 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_mored a b) p2 : l_e_st_eq_landau_n_rt_rp_mored a b).
-
-(* constant 4091 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a x).λb:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a b.(l_e_st_eq_landau_n_rt_rp_eqmored12 a a1 b b1 (l_e_st_eq_landau_n_rt_rp_r_isex r r a a1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t5 r s a1 b1 a1ir b1is m a sa b p2) a1ir (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) (l_e_st_eq_landau_n_rt_rp_r_isex s s b b1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t6 r s a1 b1 a1ir b1is m a sa b p2) b1is (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real s)) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t7 r s a1 b1 a1ir b1is m a sa b p2) : l_e_st_eq_landau_n_rt_rp_mored a1 b1).
-
-(* constant 4092 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a x).(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a x) sa (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s a x.l_e_st_eq_landau_n_rt_rp_r_ivr2_t8 r s a1 b1 a1ir b1is m a sa x t) : l_e_st_eq_landau_n_rt_rp_mored a1 b1).
-
-(* constant 4093 *)
-definition l_e_st_eq_landau_n_rt_rp_r_moreex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s x y)) m (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propm r s x y).l_e_st_eq_landau_n_rt_rp_r_ivr2_t9 r s a1 b1 a1ir b1is m x t) : l_e_st_eq_landau_n_rt_rp_mored a1 b1).
-
-(* constant 4094 *)
-definition l_e_st_eq_landau_n_rt_rp_r_less ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_and3 (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_lessd x y))) : Prop).
-
-(* constant 4095 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_propl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.(l_and3 (l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) : Prop).
-
-(* constant 4096 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_lessd a1 b1.(l_and3i (l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) a1ir b1is l : l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a1 b1).
-
-(* constant 4097 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_lessd a1 b1.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a1 x) b1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t10 r s a1 b1 a1ir b1is l) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a1 x)).
-
-(* constant 4098 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_lessd a1 b1.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s x y)) a1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t11 r s a1 b1 a1ir b1is l) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4099 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a x).λb:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a b.(l_and3e1 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_lessd a b) p2 : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)).
-
-(* constant 4100 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t13 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a x).λb:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a b.(l_and3e2 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_lessd a b) p2 : l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s)).
-
-(* constant 4101 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t14 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a x).λb:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a b.(l_and3e3 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s)) (l_e_st_eq_landau_n_rt_rp_lessd a b) p2 : l_e_st_eq_landau_n_rt_rp_lessd a b).
-
-(* constant 4102 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t15 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a x).λb:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a b.(l_e_st_eq_landau_n_rt_rp_eqlessd12 a a1 b b1 (l_e_st_eq_landau_n_rt_rp_r_isex r r a a1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t12 r s a1 b1 a1ir b1is l a sa b p2) a1ir (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) (l_e_st_eq_landau_n_rt_rp_r_isex s s b b1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t13 r s a1 b1 a1ir b1is l a sa b p2) b1is (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real s)) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t14 r s a1 b1 a1ir b1is l a sa b p2) : l_e_st_eq_landau_n_rt_rp_lessd a1 b1).
-
-(* constant 4103 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t16 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λa:l_e_st_eq_landau_n_rt_rp_dif.λsa:l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a x).(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a x) sa (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s a x.l_e_st_eq_landau_n_rt_rp_r_ivr2_t15 r s a1 b1 a1ir b1is l a sa x t) : l_e_st_eq_landau_n_rt_rp_lessd a1 b1).
-
-(* constant 4104 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s x y)) l (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_some l_e_st_eq_landau_n_rt_rp_dif (λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_ivr2_propl r s x y).l_e_st_eq_landau_n_rt_rp_r_ivr2_t16 r s a1 b1 a1ir b1is l x t) : l_e_st_eq_landau_n_rt_rp_lessd a1 b1).
-
-(* constant 4105 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismore1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λm:l_e_st_eq_landau_n_rt_rp_r_more r t.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_more x t) r s m i : l_e_st_eq_landau_n_rt_rp_r_more s t).
-
-(* constant 4106 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismore2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λm:l_e_st_eq_landau_n_rt_rp_r_more t r.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_more t x) r s m i : l_e_st_eq_landau_n_rt_rp_r_more t s).
-
-(* constant 4107 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isless1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λl:l_e_st_eq_landau_n_rt_rp_r_less r t.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_less x t) r s l i : l_e_st_eq_landau_n_rt_rp_r_less s t).
-
-(* constant 4108 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isless2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λl:l_e_st_eq_landau_n_rt_rp_r_less t r.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_less t x) r s l i : l_e_st_eq_landau_n_rt_rp_r_less t s).
-
-(* constant 4109 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismore12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λj:l_e_st_eq_landau_n_rt_rp_r_is t u.λm:l_e_st_eq_landau_n_rt_rp_r_more r t.(l_e_st_eq_landau_n_rt_rp_r_ismore2 t u s j (l_e_st_eq_landau_n_rt_rp_r_ismore1 r s t i m) : l_e_st_eq_landau_n_rt_rp_r_more s u).
-
-(* constant 4110 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isless12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λj:l_e_st_eq_landau_n_rt_rp_r_is t u.λl:l_e_st_eq_landau_n_rt_rp_r_less r t.(l_e_st_eq_landau_n_rt_rp_r_isless2 t u s j (l_e_st_eq_landau_n_rt_rp_r_isless1 r s t i l) : l_e_st_eq_landau_n_rt_rp_r_less s u).
-
-(* constant 4111 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t17 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_lemmad5 a1 b1 (l_e_st_eq_landau_n_rt_rp_r_moreex r s a1 b1 a1ir b1is m) : l_e_st_eq_landau_n_rt_rp_lessd b1 a1).
-
-(* constant 4112 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t18 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_lessin s r b1 a1 b1is a1ir (l_e_st_eq_landau_n_rt_rp_r_ivr2_t17 r s a1 b1 a1ir b1is m) : l_e_st_eq_landau_n_rt_rp_r_less s r).
-
-(* constant 4113 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_less s r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_ivr2_t18 r s x y t u m) : l_e_st_eq_landau_n_rt_rp_r_less s r).
-
-(* constant 4114 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t19 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_lemmad6 a1 b1 (l_e_st_eq_landau_n_rt_rp_r_lessex r s a1 b1 a1ir b1is l) : l_e_st_eq_landau_n_rt_rp_mored b1 a1).
-
-(* constant 4115 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t20 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_morein s r b1 a1 b1is a1ir (l_e_st_eq_landau_n_rt_rp_r_ivr2_t19 r s a1 b1 a1ir b1is l) : l_e_st_eq_landau_n_rt_rp_r_more s r).
-
-(* constant 4116 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_more s r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_ivr2_t20 r s x y t u l) : l_e_st_eq_landau_n_rt_rp_r_more s r).
-
-(* constant 4117 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_satzd167a a1 b1 : l_or3 (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1)).
-
-(* constant 4118 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λe:l_e_st_eq_landau_n_rt_rp_eq a1 b1.(l_or3i1 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_isin r s a1 b1 a1ir b1is e) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4119 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_mored a1 b1.(l_or3i2 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_morein r s a1 b1 a1ir b1is m) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4120 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_lessd a1 b1.(l_or3i3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_lessin r s a1 b1 a1ir b1is l) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4121 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_or3app (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) (l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)) (l_e_st_eq_landau_n_rt_rp_r_2r167_t1 r s a1 b1 a1ir b1is) (λt:l_e_st_eq_landau_n_rt_rp_eq a1 b1.l_e_st_eq_landau_n_rt_rp_r_2r167_t2 r s a1 b1 a1ir b1is t) (λt:l_e_st_eq_landau_n_rt_rp_mored a1 b1.l_e_st_eq_landau_n_rt_rp_r_2r167_t3 r s a1 b1 a1ir b1is t) (λt:l_e_st_eq_landau_n_rt_rp_lessd a1 b1.l_e_st_eq_landau_n_rt_rp_r_2r167_t4 r s a1 b1 a1ir b1is t) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4122 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_satzd167b a1 b1 : l_ec3 (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1)).
-
-(* constant 4123 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (l_ec3e12 (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_2r167_t6 r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_isex r s a1 b1 a1ir b1is i)) (λt:l_e_st_eq_landau_n_rt_rp_r_more r s.l_e_st_eq_landau_n_rt_rp_r_moreex r s a1 b1 a1ir b1is t) : l_not (l_e_st_eq_landau_n_rt_rp_r_more r s)).
-
-(* constant 4124 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) (l_ec3e23 (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_2r167_t6 r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_moreex r s a1 b1 a1ir b1is m)) (λt:l_e_st_eq_landau_n_rt_rp_r_less r s.l_e_st_eq_landau_n_rt_rp_r_lessex r s a1 b1 a1ir b1is t) : l_not (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4125 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_ec3e31 (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_2r167_t6 r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_lessex r s a1 b1 a1ir b1is l)) (λt:l_e_st_eq_landau_n_rt_rp_r_is r s.l_e_st_eq_landau_n_rt_rp_r_isex r s a1 b1 a1ir b1is t) : l_not (l_e_st_eq_landau_n_rt_rp_r_is r s)).
-
-(* constant 4126 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_ec3_th6 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_ec_th1 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (λt:l_e_st_eq_landau_n_rt_rp_r_is r s.l_e_st_eq_landau_n_rt_rp_r_2r167_t7 r s a1 b1 a1ir b1is t)) (l_ec_th1 (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (λt:l_e_st_eq_landau_n_rt_rp_r_more r s.l_e_st_eq_landau_n_rt_rp_r_2r167_t8 r s a1 b1 a1ir b1is t)) (l_ec_th1 (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) (λt:l_e_st_eq_landau_n_rt_rp_r_less r s.l_e_st_eq_landau_n_rt_rp_r_2r167_t9 r s a1 b1 a1ir b1is t)) : l_ec3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4127 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r167_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_orec3i (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_2r167_t5 r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_2r167_t10 r s a1 b1 a1ir b1is) : l_orec3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4128 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_orec3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_2r167_t11 r s x y t u) : l_orec3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4129 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_orec3e1 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_satz167 r s) : l_or3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4130 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_orec3e2 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_satz167 r s) : l_ec3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4131 *)
-definition l_e_st_eq_landau_n_rt_rp_r_moreis ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_or (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) : Prop).
-
-(* constant 4132 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessis ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_or (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) : Prop).
-
-(* constant 4133 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz168a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_less s r) (l_e_st_eq_landau_n_rt_rp_r_is s r) m (λt:l_e_st_eq_landau_n_rt_rp_r_more r s.l_e_st_eq_landau_n_rt_rp_r_lemma1 r s t) (λt:l_e_st_eq_landau_n_rt_rp_r_is r s.l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r s t) : l_e_st_eq_landau_n_rt_rp_r_lessis s r).
-
-(* constant 4134 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz168b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more s r) (l_e_st_eq_landau_n_rt_rp_r_is s r) l (λt:l_e_st_eq_landau_n_rt_rp_r_less r s.l_e_st_eq_landau_n_rt_rp_r_lemma2 r s t) (λt:l_e_st_eq_landau_n_rt_rp_r_is r s.l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r s t) : l_e_st_eq_landau_n_rt_rp_r_moreis s r).
-
-(* constant 4135 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismoreis1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r t.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_moreis x t) r s m i : l_e_st_eq_landau_n_rt_rp_r_moreis s t).
-
-(* constant 4136 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismoreis2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λm:l_e_st_eq_landau_n_rt_rp_r_moreis t r.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_moreis t x) r s m i : l_e_st_eq_landau_n_rt_rp_r_moreis t s).
-
-(* constant 4137 *)
-definition l_e_st_eq_landau_n_rt_rp_r_islessis1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r t.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_lessis x t) r s l i : l_e_st_eq_landau_n_rt_rp_r_lessis s t).
-
-(* constant 4138 *)
-definition l_e_st_eq_landau_n_rt_rp_r_islessis2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λl:l_e_st_eq_landau_n_rt_rp_r_lessis t r.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_lessis t x) r s l i : l_e_st_eq_landau_n_rt_rp_r_lessis t s).
-
-(* constant 4139 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismoreis12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λj:l_e_st_eq_landau_n_rt_rp_r_is t u.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r t.(l_e_st_eq_landau_n_rt_rp_r_ismoreis2 t u s j (l_e_st_eq_landau_n_rt_rp_r_ismoreis1 r s t i m) : l_e_st_eq_landau_n_rt_rp_r_moreis s u).
-
-(* constant 4140 *)
-definition l_e_st_eq_landau_n_rt_rp_r_islessis12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λj:l_e_st_eq_landau_n_rt_rp_r_is t u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r t.(l_e_st_eq_landau_n_rt_rp_r_islessis2 t u s j (l_e_st_eq_landau_n_rt_rp_r_islessis1 r s t i l) : l_e_st_eq_landau_n_rt_rp_r_lessis s u).
-
-(* constant 4141 *)
-definition l_e_st_eq_landau_n_rt_rp_r_moreisi1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) m : l_e_st_eq_landau_n_rt_rp_r_moreis r s).
-
-(* constant 4142 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessisi1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) l : l_e_st_eq_landau_n_rt_rp_r_lessis r s).
-
-(* constant 4143 *)
-definition l_e_st_eq_landau_n_rt_rp_r_moreisi2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) i : l_e_st_eq_landau_n_rt_rp_r_moreis r s).
-
-(* constant 4144 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessisi2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) i : l_e_st_eq_landau_n_rt_rp_r_lessis r s).
-
-(* constant 4145 *)
-definition l_e_st_eq_landau_n_rt_rp_r_moreisin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_moreq a1 b1.(l_orapp (l_e_st_eq_landau_n_rt_rp_mored a1 b1) (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_r_moreis r s) m (λt:l_e_st_eq_landau_n_rt_rp_mored a1 b1.l_e_st_eq_landau_n_rt_rp_r_moreisi1 r s (l_e_st_eq_landau_n_rt_rp_r_morein r s a1 b1 a1ir b1is t)) (λt:l_e_st_eq_landau_n_rt_rp_eq a1 b1.l_e_st_eq_landau_n_rt_rp_r_moreisi2 r s (l_e_st_eq_landau_n_rt_rp_r_isin r s a1 b1 a1ir b1is t)) : l_e_st_eq_landau_n_rt_rp_r_moreis r s).
-
-(* constant 4146 *)
-definition l_e_st_eq_landau_n_rt_rp_r_moreisex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.(l_orapp (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_moreq a1 b1) m (λt:l_e_st_eq_landau_n_rt_rp_r_more r s.l_e_st_eq_landau_n_rt_rp_moreqi1 a1 b1 (l_e_st_eq_landau_n_rt_rp_r_moreex r s a1 b1 a1ir b1is t)) (λt:l_e_st_eq_landau_n_rt_rp_r_is r s.l_e_st_eq_landau_n_rt_rp_moreqi2 a1 b1 (l_e_st_eq_landau_n_rt_rp_r_isex r s a1 b1 a1ir b1is t)) : l_e_st_eq_landau_n_rt_rp_moreq a1 b1).
-
-(* constant 4147 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessisin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_lesseq a1 b1.(l_orapp (l_e_st_eq_landau_n_rt_rp_lessd a1 b1) (l_e_st_eq_landau_n_rt_rp_eq a1 b1) (l_e_st_eq_landau_n_rt_rp_r_lessis r s) l (λt:l_e_st_eq_landau_n_rt_rp_lessd a1 b1.l_e_st_eq_landau_n_rt_rp_r_lessisi1 r s (l_e_st_eq_landau_n_rt_rp_r_lessin r s a1 b1 a1ir b1is t)) (λt:l_e_st_eq_landau_n_rt_rp_eq a1 b1.l_e_st_eq_landau_n_rt_rp_r_lessisi2 r s (l_e_st_eq_landau_n_rt_rp_r_isin r s a1 b1 a1ir b1is t)) : l_e_st_eq_landau_n_rt_rp_r_lessis r s).
-
-(* constant 4148 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessisex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.(l_orapp (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_lesseq a1 b1) l (λt:l_e_st_eq_landau_n_rt_rp_r_less r s.l_e_st_eq_landau_n_rt_rp_lesseqi1 a1 b1 (l_e_st_eq_landau_n_rt_rp_r_lessex r s a1 b1 a1ir b1is t)) (λt:l_e_st_eq_landau_n_rt_rp_r_is r s.l_e_st_eq_landau_n_rt_rp_lesseqi2 a1 b1 (l_e_st_eq_landau_n_rt_rp_r_isex r s a1 b1 a1ir b1is t)) : l_e_st_eq_landau_n_rt_rp_lesseq a1 b1).
-
-(* constant 4149 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.(l_ec3_th7 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_satz167b r s) (l_comor (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) m) : l_not (l_e_st_eq_landau_n_rt_rp_r_less r s)).
-
-(* constant 4150 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.(l_ec3_th9 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_satz167b r s) l : l_not (l_e_st_eq_landau_n_rt_rp_r_more r s)).
-
-(* constant 4151 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_more r s).(l_or3_th2 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_satz167a r s) n : l_e_st_eq_landau_n_rt_rp_r_lessis r s).
-
-(* constant 4152 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_less r s).(l_comor (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_or3_th3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_satz167a r s) n) : l_e_st_eq_landau_n_rt_rp_r_moreis r s).
-
-(* constant 4153 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167g ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_lessis r s) (l_not (l_e_st_eq_landau_n_rt_rp_r_more r s)) (l_weli (l_e_st_eq_landau_n_rt_rp_r_more r s) m) (λt:l_e_st_eq_landau_n_rt_rp_r_lessis r s.l_e_st_eq_landau_n_rt_rp_r_satz167d r s t) : l_not (l_e_st_eq_landau_n_rt_rp_r_lessis r s)).
-
-(* constant 4154 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167h ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_moreis r s) (l_not (l_e_st_eq_landau_n_rt_rp_r_less r s)) (l_weli (l_e_st_eq_landau_n_rt_rp_r_less r s) l) (λt:l_e_st_eq_landau_n_rt_rp_r_moreis r s.l_e_st_eq_landau_n_rt_rp_r_satz167c r s t) : l_not (l_e_st_eq_landau_n_rt_rp_r_moreis r s)).
-
-(* constant 4155 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167j ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_moreis r s).(l_or3e3 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_satz167a r s) (l_or_th5 (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) n) (l_or_th4 (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) n) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4156 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz167k ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_lessis r s).(l_or3e2 (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_satz167a r s) (l_or_th4 (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) n) (l_or_th5 (l_e_st_eq_landau_n_rt_rp_r_less r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) n) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4157 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r169_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_satzd169a a b (l_e_st_eq_landau_n_rt_rp_r_0ex l_e_st_eq_landau_n_rt_rp_r_0 b bi0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_posex r a air p) : l_e_st_eq_landau_n_rt_rp_mored a b).
-
-(* constant 4158 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r169_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_r_morein r l_e_st_eq_landau_n_rt_rp_r_0 a b air bi0 (l_e_st_eq_landau_n_rt_rp_r_2r169_t1 r p a b air bi0) : l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4159 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz169a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).l_e_st_eq_landau_n_rt_rp_r_2r169_t2 r p x y t u) : l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4160 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r169_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_satzd169b a b (l_e_st_eq_landau_n_rt_rp_r_0ex l_e_st_eq_landau_n_rt_rp_r_0 b bi0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_moreex r l_e_st_eq_landau_n_rt_rp_r_0 a b air bi0 m) : l_e_st_eq_landau_n_rt_rp_posd a).
-
-(* constant 4161 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r169_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_r_posin r a air (l_e_st_eq_landau_n_rt_rp_r_2r169_t3 r m a b air bi0) : l_e_st_eq_landau_n_rt_rp_r_pos r).
-
-(* constant 4162 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz169b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pos r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).l_e_st_eq_landau_n_rt_rp_r_2r169_t4 r m x y t u) : l_e_st_eq_landau_n_rt_rp_r_pos r).
-
-(* constant 4163 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r169_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_satzd169c a b (l_e_st_eq_landau_n_rt_rp_r_0ex l_e_st_eq_landau_n_rt_rp_r_0 b bi0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_negex r a air n) : l_e_st_eq_landau_n_rt_rp_lessd a b).
-
-(* constant 4164 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r169_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_r_lessin r l_e_st_eq_landau_n_rt_rp_r_0 a b air bi0 (l_e_st_eq_landau_n_rt_rp_r_2r169_t5 r n a b air bi0) : l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4165 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz169c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).l_e_st_eq_landau_n_rt_rp_r_2r169_t6 r n x y t u) : l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4166 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r169_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_satzd169d a b (l_e_st_eq_landau_n_rt_rp_r_0ex l_e_st_eq_landau_n_rt_rp_r_0 b bi0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_lessex r l_e_st_eq_landau_n_rt_rp_r_0 a b air bi0 l) : l_e_st_eq_landau_n_rt_rp_negd a).
-
-(* constant 4167 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r169_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_r_negin r a air (l_e_st_eq_landau_n_rt_rp_r_2r169_t7 r l a b air bi0) : l_e_st_eq_landau_n_rt_rp_r_neg r).
-
-(* constant 4168 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz169d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_neg r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).l_e_st_eq_landau_n_rt_rp_r_2r169_t8 r l x y t u) : l_e_st_eq_landau_n_rt_rp_r_neg r).
-
-(* constant 4169 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r170_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_satzd170 a b (l_e_st_eq_landau_n_rt_rp_r_0ex l_e_st_eq_landau_n_rt_rp_r_0 b bi0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_absd a) b).
-
-(* constant 4170 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r170_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbi0:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).(l_e_st_eq_landau_n_rt_rp_r_moreisin (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_absd a) b (l_e_st_eq_landau_n_rt_rp_r_aica r a air) bi0 (l_e_st_eq_landau_n_rt_rp_r_2r170_t1 r a b air bi0) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4171 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz170 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class l_e_st_eq_landau_n_rt_rp_r_0).l_e_st_eq_landau_n_rt_rp_r_2r170_t2 r x y t u) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4172 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz170a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_abs r)) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz167c (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satz170 r)) (λt:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_abs r).l_e_st_eq_landau_n_rt_rp_r_satz169c (l_e_st_eq_landau_n_rt_rp_r_abs r) t) : l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_abs r))).
-
-(* constant 4173 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r171_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_less s t.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbis:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s).λcit:l_e_st_eq_landau_n_rt_rp_r_inn c (l_e_st_eq_landau_n_rt_rp_r_class t).(l_e_st_eq_landau_n_rt_rp_satzd171 a b c (l_e_st_eq_landau_n_rt_rp_r_lessex r s a b air bis l) (l_e_st_eq_landau_n_rt_rp_r_lessex s t b c bis cit k) : l_e_st_eq_landau_n_rt_rp_lessd a c).
-
-(* constant 4174 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r171_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_less s t.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r).λbis:l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class s).λcit:l_e_st_eq_landau_n_rt_rp_r_inn c (l_e_st_eq_landau_n_rt_rp_r_class t).(l_e_st_eq_landau_n_rt_rp_r_lessin r t a c air cit (l_e_st_eq_landau_n_rt_rp_r_2r171_t1 r s t l k a b c air bis cit) : l_e_st_eq_landau_n_rt_rp_r_less r t).
-
-(* constant 4175 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz171 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_less s t.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_less r t) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λw:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λv:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_2r171_t2 r s t l k x y z w u v) : l_e_st_eq_landau_n_rt_rp_r_less r t).
-
-(* constant 4176 *)
-definition l_e_st_eq_landau_n_rt_rp_r_trless ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_less s t.(l_e_st_eq_landau_n_rt_rp_r_satz171 r s t l k : l_e_st_eq_landau_n_rt_rp_r_less r t).
-
-(* constant 4177 *)
-definition l_e_st_eq_landau_n_rt_rp_r_trmore ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λn:l_e_st_eq_landau_n_rt_rp_r_more s t.(l_e_st_eq_landau_n_rt_rp_r_lemma2 t r (l_e_st_eq_landau_n_rt_rp_r_trless t s r (l_e_st_eq_landau_n_rt_rp_r_lemma1 s t n) (l_e_st_eq_landau_n_rt_rp_r_lemma1 r s m)) : l_e_st_eq_landau_n_rt_rp_r_more r t).
-
-(* constant 4178 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r172_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_less s t.(l_e_st_eq_landau_n_rt_rp_satzd172a a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_lessisex r s a2 b2 a2ir b2is l) (l_e_st_eq_landau_n_rt_rp_r_lessex s t b2 c2 b2is c2it k) : l_e_st_eq_landau_n_rt_rp_lessd a2 c2).
-
-(* constant 4179 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r172_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_less s t.(l_e_st_eq_landau_n_rt_rp_r_lessin r t a2 c2 a2ir c2it (l_e_st_eq_landau_n_rt_rp_r_2r172_t1 r s t a2 b2 c2 a2ir b2is c2it l k) : l_e_st_eq_landau_n_rt_rp_r_less r t).
-
-(* constant 4180 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz172a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_less s t.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_less r t) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_2r172_t2 r s t x y z u v w l k) : l_e_st_eq_landau_n_rt_rp_r_less r t).
-
-(* constant 4181 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r172_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis s t.(l_e_st_eq_landau_n_rt_rp_satzd172b a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_lessex r s a2 b2 a2ir b2is l) (l_e_st_eq_landau_n_rt_rp_r_lessisex s t b2 c2 b2is c2it k) : l_e_st_eq_landau_n_rt_rp_lessd a2 c2).
-
-(* constant 4182 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r172_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis s t.(l_e_st_eq_landau_n_rt_rp_r_lessin r t a2 c2 a2ir c2it (l_e_st_eq_landau_n_rt_rp_r_2r172_t3 r s t a2 b2 c2 a2ir b2is c2it l k) : l_e_st_eq_landau_n_rt_rp_r_less r t).
-
-(* constant 4183 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz172b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis s t.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_less r t) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_2r172_t4 r s t x y z u v w l k) : l_e_st_eq_landau_n_rt_rp_r_less r t).
-
-(* constant 4184 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz172c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.λn:l_e_st_eq_landau_n_rt_rp_r_more s t.(l_e_st_eq_landau_n_rt_rp_r_lemma2 t r (l_e_st_eq_landau_n_rt_rp_r_satz172b t s r (l_e_st_eq_landau_n_rt_rp_r_lemma1 s t n) (l_e_st_eq_landau_n_rt_rp_r_satz168a r s m)) : l_e_st_eq_landau_n_rt_rp_r_more r t).
-
-(* constant 4185 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz172d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λn:l_e_st_eq_landau_n_rt_rp_r_moreis s t.(l_e_st_eq_landau_n_rt_rp_r_lemma2 t r (l_e_st_eq_landau_n_rt_rp_r_satz172a t s r (l_e_st_eq_landau_n_rt_rp_r_satz168a s t n) (l_e_st_eq_landau_n_rt_rp_r_lemma1 r s m)) : l_e_st_eq_landau_n_rt_rp_r_more r t).
-
-(* constant 4186 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r173_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis s t.(l_e_st_eq_landau_n_rt_rp_satzd173 a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_lessisex r s a2 b2 a2ir b2is l) (l_e_st_eq_landau_n_rt_rp_r_lessisex s t b2 c2 b2is c2it k) : l_e_st_eq_landau_n_rt_rp_lesseq a2 c2).
-
-(* constant 4187 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r173_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis s t.(l_e_st_eq_landau_n_rt_rp_r_lessisin r t a2 c2 a2ir c2it (l_e_st_eq_landau_n_rt_rp_r_2r173_t1 r s t a2 b2 c2 a2ir b2is c2it l k) : l_e_st_eq_landau_n_rt_rp_r_lessis r t).
-
-(* constant 4188 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz173 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis s t.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_lessis r t) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_2r173_t2 r s t x y z u v w l k) : l_e_st_eq_landau_n_rt_rp_r_lessis r t).
-
-(* constant 4189 *)
-definition l_e_st_eq_landau_n_rt_rp_r_trlessis ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis s t.(l_e_st_eq_landau_n_rt_rp_r_satz173 r s t l k : l_e_st_eq_landau_n_rt_rp_r_lessis r t).
-
-(* constant 4190 *)
-definition l_e_st_eq_landau_n_rt_rp_r_trmoreis ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.λn:l_e_st_eq_landau_n_rt_rp_r_moreis s t.(l_e_st_eq_landau_n_rt_rp_r_satz168b t r (l_e_st_eq_landau_n_rt_rp_r_trlessis t s r (l_e_st_eq_landau_n_rt_rp_r_satz168a s t n) (l_e_st_eq_landau_n_rt_rp_r_satz168a r s m)) : l_e_st_eq_landau_n_rt_rp_r_moreis r t).
-
-(* constant 4191 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ratrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd x)) : Prop).
-
-(* constant 4192 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t21 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λr1:l_e_st_eq_landau_n_rt_rp_ratd a0.(l_andi (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd a0) a0ir r1 : l_and (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd a0)).
-
-(* constant 4193 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ratrlin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λr1:l_e_st_eq_landau_n_rt_rp_ratd a0.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd x)) a0 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t21 r a0 a0ir r1) : l_e_st_eq_landau_n_rt_rp_r_ratrl r).
-
-(* constant 4194 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t22 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λrr:l_e_st_eq_landau_n_rt_rp_r_ratrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd a).(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd a) b : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)).
-
-(* constant 4195 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t23 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λrr:l_e_st_eq_landau_n_rt_rp_r_ratrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd a).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd a) b : l_e_st_eq_landau_n_rt_rp_ratd a).
-
-(* constant 4196 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t24 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λrr:l_e_st_eq_landau_n_rt_rp_r_ratrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd a).(l_e_st_eq_landau_n_rt_rp_eqratd a a0 (l_e_st_eq_landau_n_rt_rp_r_isex r r a a0 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t22 r a0 a0ir rr a b) a0ir (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t23 r a0 a0ir rr a b) : l_e_st_eq_landau_n_rt_rp_ratd a0).
-
-(* constant 4197 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ratrlex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λrr:l_e_st_eq_landau_n_rt_rp_r_ratrl r.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd x)) rr (l_e_st_eq_landau_n_rt_rp_ratd a0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_ratd x).l_e_st_eq_landau_n_rt_rp_r_ivr2_t24 r a0 a0ir rr x t) : l_e_st_eq_landau_n_rt_rp_ratd a0).
-
-(* constant 4198 *)
-definition l_e_st_eq_landau_n_rt_rp_r_irratrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_not (l_e_st_eq_landau_n_rt_rp_r_ratrl r) : Prop).
-
-(* constant 4199 *)
-definition l_e_st_eq_landau_n_rt_rp_r_remark2 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λrr:l_e_st_eq_landau_n_rt_rp_ratrp r0.(l_e_st_eq_landau_n_rt_rp_r_ratrlin (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_remark2a r0 rr) : l_e_st_eq_landau_n_rt_rp_r_ratrl (l_e_st_eq_landau_n_rt_rp_r_pofrp r0)).
-
-(* constant 4200 *)
-definition l_e_st_eq_landau_n_rt_rp_r_remark3 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λrr:l_e_st_eq_landau_n_rt_rp_ratrp r0.(l_e_st_eq_landau_n_rt_rp_r_ratrlin (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_ndofrp r0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_ndofrp r0)) (l_e_st_eq_landau_n_rt_rp_remark3a r0 rr) : l_e_st_eq_landau_n_rt_rp_r_ratrl (l_e_st_eq_landau_n_rt_rp_r_nofrp r0)).
-
-(* constant 4201 *)
-definition l_e_st_eq_landau_n_rt_rp_r_remark4 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λir:l_e_st_eq_landau_n_rt_rp_irratrp r0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_ratrl (l_e_st_eq_landau_n_rt_rp_r_pofrp r0)) (l_e_st_eq_landau_n_rt_rp_ratd (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_remark4a r0 ir) (λt:l_e_st_eq_landau_n_rt_rp_r_ratrl (l_e_st_eq_landau_n_rt_rp_r_pofrp r0).l_e_st_eq_landau_n_rt_rp_r_ratrlex (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) t) : l_e_st_eq_landau_n_rt_rp_r_irratrl (l_e_st_eq_landau_n_rt_rp_r_pofrp r0)).
-
-(* constant 4202 *)
-definition l_e_st_eq_landau_n_rt_rp_r_remark5 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λir:l_e_st_eq_landau_n_rt_rp_irratrp r0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_ratrl (l_e_st_eq_landau_n_rt_rp_r_nofrp r0)) (l_e_st_eq_landau_n_rt_rp_ratd (l_e_st_eq_landau_n_rt_rp_ndofrp r0)) (l_e_st_eq_landau_n_rt_rp_remark5a r0 ir) (λt:l_e_st_eq_landau_n_rt_rp_r_ratrl (l_e_st_eq_landau_n_rt_rp_r_nofrp r0).l_e_st_eq_landau_n_rt_rp_r_ratrlex (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_ndofrp r0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_ndofrp r0)) t) : l_e_st_eq_landau_n_rt_rp_r_irratrl (l_e_st_eq_landau_n_rt_rp_r_nofrp r0)).
-
-(* constant 4203 *)
-definition l_e_st_eq_landau_n_rt_rp_r_natrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd x)) : Prop).
-
-(* constant 4204 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t25 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_natd a0.(l_andi (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd a0) a0ir n : l_and (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd a0)).
-
-(* constant 4205 *)
-definition l_e_st_eq_landau_n_rt_rp_r_natrlin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_natd a0.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd x)) a0 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t25 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_natrl r).
-
-(* constant 4206 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t26 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd a).(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd a) b : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)).
-
-(* constant 4207 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t27 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd a).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd a) b : l_e_st_eq_landau_n_rt_rp_natd a).
-
-(* constant 4208 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t28 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd a).(l_e_st_eq_landau_n_rt_rp_eqnatd a a0 (l_e_st_eq_landau_n_rt_rp_r_isex r r a a0 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t26 r a0 a0ir n a b) a0ir (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t27 r a0 a0ir n a b) : l_e_st_eq_landau_n_rt_rp_natd a0).
-
-(* constant 4209 *)
-definition l_e_st_eq_landau_n_rt_rp_r_natrlex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd x)) n (l_e_st_eq_landau_n_rt_rp_natd a0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_natd x).l_e_st_eq_landau_n_rt_rp_r_ivr2_t28 r a0 a0ir n x t) : l_e_st_eq_landau_n_rt_rp_natd a0).
-
-(* constant 4210 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t29 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_natposd a0 (l_e_st_eq_landau_n_rt_rp_r_natrlex r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_posd a0).
-
-(* constant 4211 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t30 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_r_posin r a0 a0ir (l_e_st_eq_landau_n_rt_rp_r_ivr2_t29 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_pos r).
-
-(* constant 4212 *)
-definition l_e_st_eq_landau_n_rt_rp_r_natpos ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_pos r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr2_t30 r x t n) : l_e_st_eq_landau_n_rt_rp_r_pos r).
-
-(* constant 4213 *)
-definition l_e_st_eq_landau_n_rt_rp_r_rlofnt ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_pdofnt x) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4214 *)
-definition l_e_st_eq_landau_n_rt_rp_r_natrli ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_natrlin (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_pdofnt x) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofnt x)) (l_e_st_eq_landau_n_rt_rp_natdi x) : l_e_st_eq_landau_n_rt_rp_r_natrl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x)).
-
-(* constant 4215 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isnterl ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is x y.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt u) x y i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)).
-
-(* constant 4216 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isntirl ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y).(l_e_st_eq_landau_n_rt_rp_isntirp x y (l_e_st_eq_landau_n_rt_rp_r_isrpip (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y) i) : l_e_st_eq_landau_n_is x y).
-
-(* constant 4217 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t31 ≝ (λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y).l_e_st_eq_landau_n_rt_rp_r_isntirl x y t : l_e_injective l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x)).
-
-(* constant 4218 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t32 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_natposd a0 (l_e_st_eq_landau_n_rt_rp_r_natrlex r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_posd a0).
-
-(* constant 4219 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_ap ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_rpofpd a0 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t32 r a0 a0ir n) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4220 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t33 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_natderp a0 (l_e_st_eq_landau_n_rt_rp_r_natrlex r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_natrp (l_e_st_eq_landau_n_rt_rp_r_ivr2_ap r a0 a0ir n)).
-
-(* constant 4221 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_ntofrp (l_e_st_eq_landau_n_rt_rp_r_ivr2_ap r a0 a0ir n) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t33 r a0 a0ir n) : l_e_st_eq_landau_n_nat).
-
-(* constant 4222 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t34 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_isrpepd (l_e_st_eq_landau_n_rt_rp_r_ivr2_ap r a0 a0ir n) (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n)) (l_e_st_eq_landau_n_rt_rp_isrpnt1 (l_e_st_eq_landau_n_rt_rp_r_ivr2_ap r a0 a0ir n) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t33 r a0 a0ir n)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_r_ivr2_ap r a0 a0ir n)) (l_e_st_eq_landau_n_rt_rp_pdofnt (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n))).
-
-(* constant 4223 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t35 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_treq a0 (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_r_ivr2_ap r a0 a0ir n)) (l_e_st_eq_landau_n_rt_rp_pdofnt (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n)) (l_e_st_eq_landau_n_rt_rp_eqpdrp1 a0 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t32 r a0 a0ir n)) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t34 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_eq a0 (l_e_st_eq_landau_n_rt_rp_pdofnt (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n))).
-
-(* constant 4224 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t36 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_r_isin r (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n)) a0 (l_e_st_eq_landau_n_rt_rp_pdofnt (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n)) a0ir (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofnt (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n))) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t35 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n))).
-
-(* constant 4225 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t37 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_somei l_e_st_eq_landau_n_nat (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_rlofnt x)) (l_e_st_eq_landau_n_rt_rp_r_ivr2_x0 r a0 a0ir n) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t36 r a0 a0ir n) : l_e_image l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) r).
-
-(* constant 4226 *)
-definition l_e_st_eq_landau_n_rt_rp_r_natimage ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_image l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr2_t37 r x t n) : l_e_image l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) r).
-
-(* constant 4227 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t38 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_image l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) r.λx:l_e_st_eq_landau_n_nat.λj:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_rlofnt x).(l_e_isp1 l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_natrl u) (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) r (l_e_st_eq_landau_n_rt_rp_r_natrli x) j : l_e_st_eq_landau_n_rt_rp_r_natrl r).
-
-(* constant 4228 *)
-definition l_e_st_eq_landau_n_rt_rp_r_imagenat ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_image l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) r.(l_someapp l_e_st_eq_landau_n_nat (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_rlofnt u)) i (l_e_st_eq_landau_n_rt_rp_r_natrl r) (λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_rlofnt u).l_e_st_eq_landau_n_rt_rp_r_ivr2_t38 r i u v) : l_e_st_eq_landau_n_rt_rp_r_natrl r).
-
-(* constant 4229 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ntofrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_soft l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) l_e_st_eq_landau_n_rt_rp_r_ivr2_t31 r (l_e_st_eq_landau_n_rt_rp_r_natimage r n) : l_e_st_eq_landau_n_nat).
-
-(* constant 4230 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrlent ≝ λr1:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r1.λs1:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_natrl s1.λi:l_e_st_eq_landau_n_rt_rp_r_is r1 s1.(l_e_isinv l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) l_e_st_eq_landau_n_rt_rp_r_ivr2_t31 r1 (l_e_st_eq_landau_n_rt_rp_r_natimage r1 n) s1 (l_e_st_eq_landau_n_rt_rp_r_natimage s1 m) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_ntofrl r1 n) (l_e_st_eq_landau_n_rt_rp_r_ntofrl s1 m)).
-
-(* constant 4231 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrlint ≝ λr1:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r1.λs1:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_natrl s1.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_ntofrl r1 n) (l_e_st_eq_landau_n_rt_rp_r_ntofrl s1 m).(l_e_isinve l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) l_e_st_eq_landau_n_rt_rp_r_ivr2_t31 r1 (l_e_st_eq_landau_n_rt_rp_r_natimage r1 n) s1 (l_e_st_eq_landau_n_rt_rp_r_natimage s1 m) i : l_e_st_eq_landau_n_rt_rp_r_is r1 s1).
-
-(* constant 4232 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrlnt1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_ists1 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt x) l_e_st_eq_landau_n_rt_rp_r_ivr2_t31 r (l_e_st_eq_landau_n_rt_rp_r_natimage r n) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n))).
-
-(* constant 4233 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isrlnt2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n)) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 r n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n)) r).
-
-(* constant 4234 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_xn ≝ λx:l_e_st_eq_landau_n_nat.(l_e_soft l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt u) l_e_st_eq_landau_n_rt_rp_r_ivr2_t31 (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_imagei l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt u) x) : l_e_st_eq_landau_n_nat).
-
-(* constant 4235 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t39 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_isinv l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt u) l_e_st_eq_landau_n_rt_rp_r_ivr2_t31 (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_imagei l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt u) x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_natimage (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_natrli x)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_rlofnt x)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_ivr2_xn x) (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_natrli x))).
-
-(* constant 4236 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isntrl1 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_rt_rp_r_ivr2_xn x) (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_natrli x)) (l_e_isst1 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_rlofnt u) l_e_st_eq_landau_n_rt_rp_r_ivr2_t31 x) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t39 x) : l_e_st_eq_landau_n_is x (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_natrli x))).
-
-(* constant 4237 *)
-definition l_e_st_eq_landau_n_rt_rp_r_isntrl2 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat x (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_natrli x)) (l_e_st_eq_landau_n_rt_rp_r_isntrl1 x) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_natrli x)) x).
-
-(* constant 4238 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd x)) : Prop).
-
-(* constant 4239 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t40 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_intd a0.(l_andi (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd a0) a0ir i : l_and (l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd a0)).
-
-(* constant 4240 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intrlin ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_intd a0.(l_somei l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd x)) a0 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t40 r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_r_intrl r).
-
-(* constant 4241 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t41 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd a).(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd a) b : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)).
-
-(* constant 4242 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t42 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd a).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd a) b : l_e_st_eq_landau_n_rt_rp_intd a).
-
-(* constant 4243 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t43 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_and (l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd a).(l_e_st_eq_landau_n_rt_rp_eqintd a a0 (l_e_st_eq_landau_n_rt_rp_r_isex r r a a0 (l_e_st_eq_landau_n_rt_rp_r_ivr2_t41 r a0 a0ir i a b) a0ir (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) (l_e_st_eq_landau_n_rt_rp_r_ivr2_t42 r a0 a0ir i a b) : l_e_st_eq_landau_n_rt_rp_intd a0).
-
-(* constant 4244 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intrlex ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd x)) i (l_e_st_eq_landau_n_rt_rp_intd a0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_and (l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r)) (l_e_st_eq_landau_n_rt_rp_intd x).l_e_st_eq_landau_n_rt_rp_r_ivr2_t43 r a0 a0ir i x t) : l_e_st_eq_landau_n_rt_rp_intd a0).
-
-(* constant 4245 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t44 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_natintd a0 (l_e_st_eq_landau_n_rt_rp_r_natrlex r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_intd a0).
-
-(* constant 4246 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t45 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_r_intrlin r a0 a0ir (l_e_st_eq_landau_n_rt_rp_r_ivr2_t44 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_intrl r).
-
-(* constant 4247 *)
-definition l_e_st_eq_landau_n_rt_rp_r_natintrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_intrl r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr2_t45 r x t n) : l_e_st_eq_landau_n_rt_rp_r_intrl r).
-
-(* constant 4248 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t46 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_posintnatd a0 (l_e_st_eq_landau_n_rt_rp_r_posex r a0 a0ir p) (l_e_st_eq_landau_n_rt_rp_r_intrlex r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_natd a0).
-
-(* constant 4249 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t47 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_r_natrlin r a0 a0ir (l_e_st_eq_landau_n_rt_rp_r_ivr2_t46 r a0 a0ir p i) : l_e_st_eq_landau_n_rt_rp_r_natrl r).
-
-(* constant 4250 *)
-definition l_e_st_eq_landau_n_rt_rp_r_posintnatrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_natrl r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr2_t47 r x t p i) : l_e_st_eq_landau_n_rt_rp_r_natrl r).
-
-(* constant 4251 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t48 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi2:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_intdi0 a0 (l_e_st_eq_landau_n_rt_rp_r_0ex r a0 a0ir i2) : l_e_st_eq_landau_n_rt_rp_intd a0).
-
-(* constant 4252 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr2_t49 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi2:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_intrlin r a0 a0ir (l_e_st_eq_landau_n_rt_rp_r_ivr2_t48 r a0 a0ir i2) : l_e_st_eq_landau_n_rt_rp_r_intrl r).
-
-(* constant 4253 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intrli0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_intrl r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr2_t49 r x t i) : l_e_st_eq_landau_n_rt_rp_r_intrl r).
-
-(* constant 4254 *)
-definition l_e_st_eq_landau_n_rt_rp_r_remark6 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r0.(l_e_st_eq_landau_n_rt_rp_r_intrlin (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_remark6 r0 n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_pofrp r0)).
-
-(* constant 4255 *)
-definition l_e_st_eq_landau_n_rt_rp_r_remark7 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λn:l_e_st_eq_landau_n_rt_rp_natrp r0.(l_e_st_eq_landau_n_rt_rp_r_intrlin (l_e_st_eq_landau_n_rt_rp_r_nofrp r0) (l_e_st_eq_landau_n_rt_rp_ndofrp r0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_ndofrp r0)) (l_e_st_eq_landau_n_rt_rp_remark7 r0 n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_nofrp r0)).
-
-(* constant 4256 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r174_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_satzd174 a0 (l_e_st_eq_landau_n_rt_rp_r_intrlex r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_ratd a0).
-
-(* constant 4257 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2r174_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_r_ratrlin r a0 a0ir (l_e_st_eq_landau_n_rt_rp_r_2r174_t1 r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_r_ratrl r).
-
-(* constant 4258 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz174 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_ratrl r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_2r174_t2 r x t i) : l_e_st_eq_landau_n_rt_rp_r_ratrl r).
-
-(* constant 4259 *)
-definition l_e_st_eq_landau_n_rt_rp_r_plusdr ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_pd x y) : Πx:l_e_st_eq_landau_n_rt_rp_dif.Πy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4260 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_pd a c)) (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_pd b d)) (l_e_st_eq_landau_n_rt_rp_pd a c) (l_e_st_eq_landau_n_rt_rp_pd b d) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pd a c)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pd b d)) (l_e_st_eq_landau_n_rt_rp_eqpd12 a b c d e f) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_plusdr a c) (l_e_st_eq_landau_n_rt_rp_r_plusdr b d)).
-
-(* constant 4261 *)
-definition l_e_st_eq_landau_n_rt_rp_r_fplusdr ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λv:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_eq x y.λu:l_e_st_eq_landau_n_rt_rp_r_eq z v.l_e_st_eq_landau_n_rt_rp_r_ivr3_t1 x y z v t u : l_e_st_eq_landau_n_rt_rp_r_fixf2 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_plusdr).
-
-(* constant 4262 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_indreal2 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_plusdr l_e_st_eq_landau_n_rt_rp_r_fplusdr r s : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4263 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isindreal2 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_plusdr l_e_st_eq_landau_n_rt_rp_r_fplusdr r s a1 b1 a1ir b1is : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_pd a1 b1)) (l_e_st_eq_landau_n_rt_rp_r_pl r s)).
-
-(* constant 4264 *)
-definition l_e_st_eq_landau_n_rt_rp_r_picp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_pd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_class x)) (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_pd a1 b1)) (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pd a1 b1)) (l_e_st_eq_landau_n_rt_rp_r_ivr3_t2 r s a1 b1 a1ir b1is) : l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_pd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_class (l_e_st_eq_landau_n_rt_rp_r_pl r s))).
-
-(* constant 4265 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ispl1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_pl x t) r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t)).
-
-(* constant 4266 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ispl2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_pl t x) r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl t s)).
-
-(* constant 4267 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ispl12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λj:l_e_st_eq_landau_n_rt_rp_r_is t u.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_ispl1 r s t i) (l_e_st_eq_landau_n_rt_rp_r_ispl2 t u s j) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4268 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r175_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_satzd175 a1 b1 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a1 b1) (l_e_st_eq_landau_n_rt_rp_pd b1 a1)).
-
-(* constant 4269 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r175_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl s r) (l_e_st_eq_landau_n_rt_rp_pd a1 b1) (l_e_st_eq_landau_n_rt_rp_pd b1 a1) (l_e_st_eq_landau_n_rt_rp_r_picp r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_picp s r b1 a1 b1is a1ir) (l_e_st_eq_landau_n_rt_rp_r_3r175_t1 r s a1 b1 a1ir b1is) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl s r)).
-
-(* constant 4270 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz175 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl s r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r175_t2 r s x y t u) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl s r)).
-
-(* constant 4271 *)
-definition l_e_st_eq_landau_n_rt_rp_r_compl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_satz175 r s : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl s r)).
-
-(* constant 4272 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_pd01 a1 b1 (l_e_st_eq_landau_n_rt_rp_r_0ex r a1 a1ir i) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd a1 b1) b1).
-
-(* constant 4273 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_pl r s) s (l_e_st_eq_landau_n_rt_rp_pd a1 b1) b1 (l_e_st_eq_landau_n_rt_rp_r_picp r s a1 b1 a1ir b1is) b1is (l_e_st_eq_landau_n_rt_rp_r_ivr3_t3 r s a1 b1 a1ir b1is i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r s) s).
-
-(* constant 4274 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pl01 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r s) s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_ivr3_t4 r s x y t u i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r s) s).
-
-(* constant 4275 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pl02 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl s r) r (l_e_st_eq_landau_n_rt_rp_r_compl r s) (l_e_st_eq_landau_n_rt_rp_r_pl01 s r i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r s) r).
-
-(* constant 4276 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_ppd a1 b1 (l_e_st_eq_landau_n_rt_rp_r_posex r a1 a1ir p) (l_e_st_eq_landau_n_rt_rp_r_posex s b1 b1is q) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_pd a1 b1)).
-
-(* constant 4277 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_pd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_picp r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_ivr3_t5 r s a1 b1 a1ir b1is p q) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl r s)).
-
-(* constant 4278 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pospl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_ivr3_t6 r s x y t u p q) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl r s)).
-
-(* constant 4279 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_npd a1 b1 (l_e_st_eq_landau_n_rt_rp_r_negex r a1 a1ir n) (l_e_st_eq_landau_n_rt_rp_r_negex s b1 b1is o) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_pd a1 b1)).
-
-(* constant 4280 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_negin (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_pd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_picp r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_ivr3_t7 r s a1 b1 a1ir b1is n o) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_pl r s)).
-
-(* constant 4281 *)
-definition l_e_st_eq_landau_n_rt_rp_r_negpl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_ivr3_t8 r s x y t u n o) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_pl r s)).
-
-(* constant 4282 *)
-definition l_e_st_eq_landau_n_rt_rp_r_m0dr ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_m0d x) : Πx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4283 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t5a ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_m0d a) (l_e_st_eq_landau_n_rt_rp_m0d b) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_m0d a)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_m0d b)) (l_e_st_eq_landau_n_rt_rp_eqm0d a b e) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0dr a) (l_e_st_eq_landau_n_rt_rp_r_m0dr b)).
-
-(* constant 4284 *)
-definition l_e_st_eq_landau_n_rt_rp_r_fm0dr ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_eq x y.l_e_st_eq_landau_n_rt_rp_r_ivr3_t5a x y t : l_e_st_eq_landau_n_rt_rp_r_fixf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_m0dr).
-
-(* constant 4285 *)
-definition l_e_st_eq_landau_n_rt_rp_r_m0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_indreal l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_m0dr l_e_st_eq_landau_n_rt_rp_r_fm0dr r : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4286 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t6a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_isindreal l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_m0dr l_e_st_eq_landau_n_rt_rp_r_fm0dr r a0 a0ir : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_m0d a0)) (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4287 *)
-definition l_e_st_eq_landau_n_rt_rp_r_micm0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_class x)) (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_m0d a0)) (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_m0d a0)) (l_e_st_eq_landau_n_rt_rp_r_ivr3_t6a r a0 a0ir) : l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_class (l_e_st_eq_landau_n_rt_rp_r_m0 r))).
-
-(* constant 4288 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ism0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_m0 x) r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)).
-
-(* constant 4289 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t7a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_absnd a0 (l_e_st_eq_landau_n_rt_rp_r_negex r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_m0d a0)).
-
-(* constant 4290 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t8a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_aica r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_ivr3_t7a r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4291 *)
-definition l_e_st_eq_landau_n_rt_rp_r_absn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr3_t8a r x t n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4292 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λnn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).(l_e_st_eq_landau_n_rt_rp_absnnd a0 (l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd a0) (l_e_st_eq_landau_n_rt_rp_r_neg r) nn (λt:l_e_st_eq_landau_n_rt_rp_negd a0.l_e_st_eq_landau_n_rt_rp_r_negin r a0 a0ir t)) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd a0) a0).
-
-(* constant 4293 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr3_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λnn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_abs r) r (l_e_st_eq_landau_n_rt_rp_absd a0) a0 (l_e_st_eq_landau_n_rt_rp_r_aica r a0 a0ir) a0ir (l_e_st_eq_landau_n_rt_rp_r_ivr3_t9 r a0 a0ir nn) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) r).
-
-(* constant 4294 *)
-definition l_e_st_eq_landau_n_rt_rp_r_absnn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λnn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_ivr3_t10 r x t nn) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) r).
-
-(* constant 4295 *)
-definition l_e_st_eq_landau_n_rt_rp_r_absp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_absnn r (l_e_st_eq_landau_n_rt_rp_r_pnotn r p) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) r).
-
-(* constant 4296 *)
-definition l_e_st_eq_landau_n_rt_rp_r_abs0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs r) r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_absnn r (l_e_st_eq_landau_n_rt_rp_r_0notn r i)) i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4297 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_satzd176a a0 (l_e_st_eq_landau_n_rt_rp_r_posex r a0 a0ir p) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_m0d a0)).
-
-(* constant 4298 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_negin (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_3r176_t1 r a0 a0ir p) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4299 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz176a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r176_t2 r x t p) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4300 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_satzd176b a0 (l_e_st_eq_landau_n_rt_rp_r_0ex r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_m0d a0)).
-
-(* constant 4301 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_0in (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_3r176_t3 r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4302 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz176b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r176_t4 r x t i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4303 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_satzd176c a0 (l_e_st_eq_landau_n_rt_rp_r_negex r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_m0d a0)).
-
-(* constant 4304 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_3r176_t5 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4305 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz176c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r176_t6 r x t n) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4306 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_satzd176d a0 (l_e_st_eq_landau_n_rt_rp_r_negex (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir) n) : l_e_st_eq_landau_n_rt_rp_posd a0).
-
-(* constant 4307 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_posin r a0 a0ir (l_e_st_eq_landau_n_rt_rp_r_3r176_t7 r a0 a0ir n) : l_e_st_eq_landau_n_rt_rp_r_pos r).
-
-(* constant 4308 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz176d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_pos r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r176_t8 r x t n) : l_e_st_eq_landau_n_rt_rp_r_pos r).
-
-(* constant 4309 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_satzd176e a0 (l_e_st_eq_landau_n_rt_rp_r_0ex (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir) i) : l_e_st_eq_landau_n_rt_rp_zero a0).
-
-(* constant 4310 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_0in r a0 a0ir (l_e_st_eq_landau_n_rt_rp_r_3r176_t9 r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4311 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz176e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r176_t10 r x t i) : l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4312 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_satzd176f a0 (l_e_st_eq_landau_n_rt_rp_r_posex (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir) p) : l_e_st_eq_landau_n_rt_rp_negd a0).
-
-(* constant 4313 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r176_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_negin r a0 a0ir (l_e_st_eq_landau_n_rt_rp_r_3r176_t11 r a0 a0ir p) : l_e_st_eq_landau_n_rt_rp_r_neg r).
-
-(* constant 4314 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz176f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_neg r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r176_t12 r x t p) : l_e_st_eq_landau_n_rt_rp_r_neg r).
-
-(* constant 4315 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r177_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_m0d a0)) a0 (l_e_st_eq_landau_n_rt_rp_r_micm0 (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir)) a0ir (l_e_st_eq_landau_n_rt_rp_satzd177 a0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r).
-
-(* constant 4316 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz177 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r177_t1 r x t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r).
-
-(* constant 4317 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz177a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r (l_e_st_eq_landau_n_rt_rp_r_satz177 r) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r))).
-
-(* constant 4318 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz177b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_m0 s).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s)) s (l_e_st_eq_landau_n_rt_rp_r_ism0 r (l_e_st_eq_landau_n_rt_rp_r_m0 s) i) (l_e_st_eq_landau_n_rt_rp_r_satz177 s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) s).
-
-(* constant 4319 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz177c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_m0 s).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 r) s (l_e_st_eq_landau_n_rt_rp_r_satz177b r s i) : l_e_st_eq_landau_n_rt_rp_r_is s (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4320 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz177d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) s.(l_e_st_eq_landau_n_rt_rp_r_satz177c s r (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 r) s i) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_m0 s)).
-
-(* constant 4321 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz177e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) s.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_satz177d r s i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 s) r).
-
-(* constant 4322 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r178_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_m0d a0)) (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_r_aica (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir)) (l_e_st_eq_landau_n_rt_rp_r_aica r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_satzd178 a0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4323 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz178 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_abs r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r178_t1 r x t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4324 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz178a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_satz178 r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_m0 r))).
-
-(* constant 4325 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r179_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_0in (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_pd a0 (l_e_st_eq_landau_n_rt_rp_m0d a0)) (l_e_st_eq_landau_n_rt_rp_r_picp r (l_e_st_eq_landau_n_rt_rp_r_m0 r) a0 (l_e_st_eq_landau_n_rt_rp_m0d a0) a0ir (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir)) (l_e_st_eq_landau_n_rt_rp_satzd179 a0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_m0 r)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4326 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz179 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_m0 r)) l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r179_t1 r x t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_m0 r)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4327 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz179a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) r) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_m0 r)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_m0 r) r) (l_e_st_eq_landau_n_rt_rp_r_satz179 r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4328 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r180_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_pd a1 b1)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_m0d a1) (l_e_st_eq_landau_n_rt_rp_m0d b1)) (l_e_st_eq_landau_n_rt_rp_r_micm0 (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_pd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_picp r s a1 b1 a1ir b1is)) (l_e_st_eq_landau_n_rt_rp_r_picp (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_m0d a1) (l_e_st_eq_landau_n_rt_rp_m0d b1) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_micm0 s b1 b1is)) (l_e_st_eq_landau_n_rt_rp_satzd180 a1 b1) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s))).
-
-(* constant 4329 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz180 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r180_t1 r s x y t u) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s))).
-
-(* constant 4330 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz180a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_satz180 r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl r s))).
-
-(* constant 4331 *)
-definition l_e_st_eq_landau_n_rt_rp_r_mn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_m0 s) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4332 *)
-definition l_e_st_eq_landau_n_rt_rp_r_micmn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_picp r (l_e_st_eq_landau_n_rt_rp_r_m0 s) a1 (l_e_st_eq_landau_n_rt_rp_m0d b1) a1ir (l_e_st_eq_landau_n_rt_rp_r_micm0 s b1 b1is) : l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_md a1 b1) (l_e_st_eq_landau_n_rt_rp_r_class (l_e_st_eq_landau_n_rt_rp_r_mn r s))).
-
-(* constant 4333 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismn1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_ispl1 r s (l_e_st_eq_landau_n_rt_rp_r_m0 t) i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r t) (l_e_st_eq_landau_n_rt_rp_r_mn s t)).
-
-(* constant 4334 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismn2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s) t (l_e_st_eq_landau_n_rt_rp_r_ism0 r s i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn t r) (l_e_st_eq_landau_n_rt_rp_r_mn t s)).
-
-(* constant 4335 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ismn12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λj:l_e_st_eq_landau_n_rt_rp_r_is t u.(l_e_st_eq_landau_n_rt_rp_r_ispl12 r s (l_e_st_eq_landau_n_rt_rp_r_m0 t) (l_e_st_eq_landau_n_rt_rp_r_m0 u) i (l_e_st_eq_landau_n_rt_rp_r_ism0 t u j) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r t) (l_e_st_eq_landau_n_rt_rp_r_mn s u)).
-
-(* constant 4336 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz181 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_mn s r) (l_e_st_eq_landau_n_rt_rp_r_satz180 r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s)) s (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_satz177 s)) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn r s)) (l_e_st_eq_landau_n_rt_rp_r_mn s r)).
-
-(* constant 4337 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz181a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn s r)) (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_satz181 s r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn s r))).
-
-(* constant 4338 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn r s).(l_e_st_eq_landau_n_rt_rp_satzd182a a1 b1 (l_e_st_eq_landau_n_rt_rp_r_posex (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_md a1 b1) (l_e_st_eq_landau_n_rt_rp_r_micmn r s a1 b1 a1ir b1is) p) : l_e_st_eq_landau_n_rt_rp_mored a1 b1).
-
-(* constant 4339 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn r s).(l_e_st_eq_landau_n_rt_rp_r_morein r s a1 b1 a1ir b1is (l_e_st_eq_landau_n_rt_rp_r_3r182_t1 r s a1 b1 a1ir b1is p) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4340 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz182a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn r s).(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_more r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r182_t2 r s x y t u p) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4341 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_satzd182b a1 b1 (l_e_st_eq_landau_n_rt_rp_r_0ex (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_md a1 b1) (l_e_st_eq_landau_n_rt_rp_r_micmn r s a1 b1 a1ir b1is) i) : l_e_st_eq_landau_n_rt_rp_eq a1 b1).
-
-(* constant 4342 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_isin r s a1 b1 a1ir b1is (l_e_st_eq_landau_n_rt_rp_r_3r182_t3 r s a1 b1 a1ir b1is i) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4343 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz182b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r182_t4 r s x y t u i) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4344 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_mn r s).(l_e_st_eq_landau_n_rt_rp_satzd182c a1 b1 (l_e_st_eq_landau_n_rt_rp_r_negex (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_md a1 b1) (l_e_st_eq_landau_n_rt_rp_r_micmn r s a1 b1 a1ir b1is) n) : l_e_st_eq_landau_n_rt_rp_lessd a1 b1).
-
-(* constant 4345 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_mn r s).(l_e_st_eq_landau_n_rt_rp_r_lessin r s a1 b1 a1ir b1is (l_e_st_eq_landau_n_rt_rp_r_3r182_t5 r s a1 b1 a1ir b1is n) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4346 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz182c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_mn r s).(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_less r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r182_t6 r s x y t u n) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4347 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_satzd182d a1 b1 (l_e_st_eq_landau_n_rt_rp_r_moreex r s a1 b1 a1ir b1is m) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_md a1 b1)).
-
-(* constant 4348 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_md a1 b1) (l_e_st_eq_landau_n_rt_rp_r_micmn r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_3r182_t7 r s a1 b1 a1ir b1is m) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn r s)).
-
-(* constant 4349 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz182d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r182_t8 r s x y t u m) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn r s)).
-
-(* constant 4350 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_satzd182e a1 b1 (l_e_st_eq_landau_n_rt_rp_r_isex r s a1 b1 a1ir b1is i) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_md a1 b1)).
-
-(* constant 4351 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_0in (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_md a1 b1) (l_e_st_eq_landau_n_rt_rp_r_micmn r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_3r182_t9 r s a1 b1 a1ir b1is i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4352 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz182e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r182_t10 r s x y t u i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4353 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_satzd182f a1 b1 (l_e_st_eq_landau_n_rt_rp_r_lessex r s a1 b1 a1ir b1is l) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_md a1 b1)).
-
-(* constant 4354 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r182_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_negin (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_md a1 b1) (l_e_st_eq_landau_n_rt_rp_r_micmn r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_3r182_t11 r s a1 b1 a1ir b1is l) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_mn r s)).
-
-(* constant 4355 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz182f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_mn r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r182_t12 r s x y t u l) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_mn r s)).
-
-(* constant 4356 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r183_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_satzd183a a1 b1 (l_e_st_eq_landau_n_rt_rp_r_moreex r s a1 b1 a1ir b1is m) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_m0d a1) (l_e_st_eq_landau_n_rt_rp_m0d b1)).
-
-(* constant 4357 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r183_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_lessin (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_m0d a1) (l_e_st_eq_landau_n_rt_rp_m0d b1) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_micm0 s b1 b1is) (l_e_st_eq_landau_n_rt_rp_r_3r183_t1 r s a1 b1 a1ir b1is m) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)).
-
-(* constant 4358 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz183a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r183_t2 r s x y t u m) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)).
-
-(* constant 4359 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz183b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_ism0 r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)).
-
-(* constant 4360 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r183_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_satzd183c a1 b1 (l_e_st_eq_landau_n_rt_rp_r_lessex r s a1 b1 a1ir b1is l) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_m0d a1) (l_e_st_eq_landau_n_rt_rp_m0d b1)).
-
-(* constant 4361 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r183_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_morein (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_m0d a1) (l_e_st_eq_landau_n_rt_rp_m0d b1) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_micm0 s b1 b1is) (l_e_st_eq_landau_n_rt_rp_r_3r183_t3 r s a1 b1 a1ir b1is l) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)).
-
-(* constant 4362 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz183c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_3r183_t4 r s x y t u l) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)).
-
-(* constant 4363 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz183d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s).(l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s)) s (l_e_st_eq_landau_n_rt_rp_r_satz177 r) (l_e_st_eq_landau_n_rt_rp_r_satz177 s) (l_e_st_eq_landau_n_rt_rp_r_satz183c (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s) l) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4364 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz183e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s)) s (l_e_st_eq_landau_n_rt_rp_r_satz177a r) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s) i) (l_e_st_eq_landau_n_rt_rp_r_satz177 s) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4365 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz183f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s).(l_e_st_eq_landau_n_rt_rp_r_isless12 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s)) s (l_e_st_eq_landau_n_rt_rp_r_satz177 r) (l_e_st_eq_landau_n_rt_rp_r_satz177 s) (l_e_st_eq_landau_n_rt_rp_r_satz183a (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s) m) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4366 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_prop1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_and3 (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_pos t) (l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_mn s t)) : Prop).
-
-(* constant 4367 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_prop2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_3r184_prop1 r s x) : Prop).
-
-(* constant 4368 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_prop3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_3r184_prop2 r x) : Prop).
-
-(* constant 4369 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.(l_and3 (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_eq a0 (l_e_st_eq_landau_n_rt_rp_md a b)) : Prop).
-
-(* constant 4370 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.(l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a x) : Prop).
-
-(* constant 4371 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_and3e1 (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_eq a0 (l_e_st_eq_landau_n_rt_rp_md a b)) p1 : l_e_st_eq_landau_n_rt_rp_posd a).
-
-(* constant 4372 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_and3e2 (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_eq a0 (l_e_st_eq_landau_n_rt_rp_md a b)) p1 : l_e_st_eq_landau_n_rt_rp_posd b).
-
-(* constant 4373 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_and3e3 (l_e_st_eq_landau_n_rt_rp_posd a) (l_e_st_eq_landau_n_rt_rp_posd b) (l_e_st_eq_landau_n_rt_rp_eq a0 (l_e_st_eq_landau_n_rt_rp_md a b)) p1 : l_e_st_eq_landau_n_rt_rp_eq a0 (l_e_st_eq_landau_n_rt_rp_md a b)).
-
-(* constant 4374 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_ra ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.(l_e_st_eq_landau_n_rt_rp_r_realof a : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4375 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_rb ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_e_st_eq_landau_n_rt_rp_r_realof b : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4376 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_e_st_eq_landau_n_rt_rp_r_innclass a : l_e_st_eq_landau_n_rt_rp_r_inn a (l_e_st_eq_landau_n_rt_rp_r_class (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2))).
-
-(* constant 4377 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_e_st_eq_landau_n_rt_rp_r_innclass b : l_e_st_eq_landau_n_rt_rp_r_inn b (l_e_st_eq_landau_n_rt_rp_r_class (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1))).
-
-(* constant 4378 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_e_st_eq_landau_n_rt_rp_r_isin r (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2) (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1)) a0 (l_e_st_eq_landau_n_rt_rp_md a b) a0ir (l_e_st_eq_landau_n_rt_rp_r_micmn (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2) (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1) a b (l_e_st_eq_landau_n_rt_rp_r_3r184_t4 r a0 a0ir a p2 b p1) (l_e_st_eq_landau_n_rt_rp_r_3r184_t5 r a0 a0ir a p2 b p1)) (l_e_st_eq_landau_n_rt_rp_r_3r184_t3 r a0 a0ir a p2 b p1) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2) (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1))).
-
-(* constant 4379 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_and3i (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1)) (l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2) (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1))) (l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2) a (l_e_st_eq_landau_n_rt_rp_r_3r184_t4 r a0 a0ir a p2 b p1) (l_e_st_eq_landau_n_rt_rp_r_3r184_t1 r a0 a0ir a p2 b p1)) (l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1) b (l_e_st_eq_landau_n_rt_rp_r_3r184_t5 r a0 a0ir a p2 b p1) (l_e_st_eq_landau_n_rt_rp_r_3r184_t2 r a0 a0ir a p2 b p1)) (l_e_st_eq_landau_n_rt_rp_r_3r184_t6 r a0 a0ir a p2 b p1) : l_e_st_eq_landau_n_rt_rp_r_3r184_prop1 r (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2) (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1)).
-
-(* constant 4380 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.λb:l_e_st_eq_landau_n_rt_rp_dif.λp1:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a b.(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_3r184_prop1 r (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2) x) (l_e_st_eq_landau_n_rt_rp_r_3r184_rb r a0 a0ir a p2 b p1) (l_e_st_eq_landau_n_rt_rp_r_3r184_t7 r a0 a0ir a p2 b p1) : l_e_st_eq_landau_n_rt_rp_r_3r184_prop2 r (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2)).
-
-(* constant 4381 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a x) p2 (l_e_st_eq_landau_n_rt_rp_r_3r184_prop2 r (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_3r184_prop1d r a0 a0ir a x.l_e_st_eq_landau_n_rt_rp_r_3r184_t8 r a0 a0ir a p2 x t) : l_e_st_eq_landau_n_rt_rp_r_3r184_prop2 r (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2)).
-
-(* constant 4382 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λa:l_e_st_eq_landau_n_rt_rp_dif.λp2:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir a.(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_3r184_prop2 r x) (l_e_st_eq_landau_n_rt_rp_r_3r184_ra r a0 a0ir a p2) (l_e_st_eq_landau_n_rt_rp_r_3r184_t9 r a0 a0ir a p2) : l_e_st_eq_landau_n_rt_rp_r_3r184_prop3 r).
-
-(* constant 4383 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r184_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir x) (l_e_st_eq_landau_n_rt_rp_satzd184 a0) (l_e_st_eq_landau_n_rt_rp_r_3r184_prop3 r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_3r184_prop2d r a0 a0ir x.l_e_st_eq_landau_n_rt_rp_r_3r184_t10 r a0 a0ir x t) : l_e_st_eq_landau_n_rt_rp_r_3r184_prop3 r).
-
-(* constant 4384 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz184 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_3r184_prop3 r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_3r184_t11 r x t) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_some (λy:l_e_st_eq_landau_n_rt_rp_r_real.l_and3 (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_pos y) (l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_mn x y))))).
-
-(* constant 4385 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r185_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa3:l_e_st_eq_landau_n_rt_rp_dif.λb3:l_e_st_eq_landau_n_rt_rp_dif.λc3:l_e_st_eq_landau_n_rt_rp_dif.λd3:l_e_st_eq_landau_n_rt_rp_dif.λa3ir:l_e_st_eq_landau_n_rt_rp_r_inn a3 (l_e_st_eq_landau_n_rt_rp_r_class r).λb3is:l_e_st_eq_landau_n_rt_rp_r_inn b3 (l_e_st_eq_landau_n_rt_rp_r_class s).λc3it:l_e_st_eq_landau_n_rt_rp_r_inn c3 (l_e_st_eq_landau_n_rt_rp_r_class t).λd3iu:l_e_st_eq_landau_n_rt_rp_r_inn d3 (l_e_st_eq_landau_n_rt_rp_r_class u).(l_e_st_eq_landau_n_rt_rp_satzd185 a3 b3 c3 d3 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md a3 b3) (l_e_st_eq_landau_n_rt_rp_md c3 d3)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a3 c3) (l_e_st_eq_landau_n_rt_rp_pd b3 d3))).
-
-(* constant 4386 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r185_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa3:l_e_st_eq_landau_n_rt_rp_dif.λb3:l_e_st_eq_landau_n_rt_rp_dif.λc3:l_e_st_eq_landau_n_rt_rp_dif.λd3:l_e_st_eq_landau_n_rt_rp_dif.λa3ir:l_e_st_eq_landau_n_rt_rp_r_inn a3 (l_e_st_eq_landau_n_rt_rp_r_class r).λb3is:l_e_st_eq_landau_n_rt_rp_r_inn b3 (l_e_st_eq_landau_n_rt_rp_r_class s).λc3it:l_e_st_eq_landau_n_rt_rp_r_inn c3 (l_e_st_eq_landau_n_rt_rp_r_class t).λd3iu:l_e_st_eq_landau_n_rt_rp_r_inn d3 (l_e_st_eq_landau_n_rt_rp_r_class u).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_mn t u)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_md a3 b3) (l_e_st_eq_landau_n_rt_rp_md c3 d3)) (l_e_st_eq_landau_n_rt_rp_md (l_e_st_eq_landau_n_rt_rp_pd a3 c3) (l_e_st_eq_landau_n_rt_rp_pd b3 d3)) (l_e_st_eq_landau_n_rt_rp_r_picp (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_mn t u) (l_e_st_eq_landau_n_rt_rp_md a3 b3) (l_e_st_eq_landau_n_rt_rp_md c3 d3) (l_e_st_eq_landau_n_rt_rp_r_micmn r s a3 b3 a3ir b3is) (l_e_st_eq_landau_n_rt_rp_r_micmn t u c3 d3 c3it d3iu)) (l_e_st_eq_landau_n_rt_rp_r_micmn (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_pd a3 c3) (l_e_st_eq_landau_n_rt_rp_pd b3 d3) (l_e_st_eq_landau_n_rt_rp_r_picp r t a3 c3 a3ir c3it) (l_e_st_eq_landau_n_rt_rp_r_picp s u b3 d3 b3is d3iu)) (l_e_st_eq_landau_n_rt_rp_r_3r185_t1 r s t u a3 b3 c3 d3 a3ir b3is c3it d3iu) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_mn t u)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u))).
-
-(* constant 4387 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz185 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp4 r s t u (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_mn t u)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λv:l_e_st_eq_landau_n_rt_rp_dif.λxi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λyi:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λzi:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).λvi:l_e_st_eq_landau_n_rt_rp_r_inn v (l_e_st_eq_landau_n_rt_rp_r_class u).l_e_st_eq_landau_n_rt_rp_r_3r185_t2 r s t u x y z v xi yi zi vi) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_mn t u)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u))).
-
-(* constant 4388 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r186_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).(l_e_st_eq_landau_n_rt_rp_satzd186 a2 b2 c2 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a2 b2) c2) (l_e_st_eq_landau_n_rt_rp_pd a2 (l_e_st_eq_landau_n_rt_rp_pd b2 c2))).
-
-(* constant 4389 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r186_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pd a2 b2) c2) (l_e_st_eq_landau_n_rt_rp_pd a2 (l_e_st_eq_landau_n_rt_rp_pd b2 c2)) (l_e_st_eq_landau_n_rt_rp_r_picp (l_e_st_eq_landau_n_rt_rp_r_pl r s) t (l_e_st_eq_landau_n_rt_rp_pd a2 b2) c2 (l_e_st_eq_landau_n_rt_rp_r_picp r s a2 b2 a2ir b2is) c2it) (l_e_st_eq_landau_n_rt_rp_r_picp r (l_e_st_eq_landau_n_rt_rp_r_pl s t) a2 (l_e_st_eq_landau_n_rt_rp_pd b2 c2) a2ir (l_e_st_eq_landau_n_rt_rp_r_picp s t b2 c2 b2is c2it)) (l_e_st_eq_landau_n_rt_rp_r_3r186_t1 r s t a2 b2 c2 a2ir b2is c2it) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl s t))).
-
-(* constant 4390 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz186 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl s t))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_3r186_t2 r s t x y z u v w) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl s t))).
-
-(* constant 4391 *)
-definition l_e_st_eq_landau_n_rt_rp_r_asspl1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_satz186 r s t : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl s t))).
-
-(* constant 4392 *)
-definition l_e_st_eq_landau_n_rt_rp_r_asspl2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_r_satz186 r s t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl r s) t)).
-
-(* constant 4393 *)
-definition l_e_st_eq_landau_n_rt_rp_r_plmn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn r s) s) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 s) s)) r (l_e_st_eq_landau_n_rt_rp_r_asspl1 r (l_e_st_eq_landau_n_rt_rp_r_m0 s) s) (l_e_st_eq_landau_n_rt_rp_r_pl02 r (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 s) s) (l_e_st_eq_landau_n_rt_rp_r_satz179a s)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn r s) s) r).
-
-(* constant 4394 *)
-definition l_e_st_eq_landau_n_rt_rp_r_mnpl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl r s) s) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_pl s (l_e_st_eq_landau_n_rt_rp_r_m0 s))) r (l_e_st_eq_landau_n_rt_rp_r_asspl1 r s (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_pl02 r (l_e_st_eq_landau_n_rt_rp_r_pl s (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_satz179 s)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl r s) s) r).
-
-(* constant 4395 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz187a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl s (l_e_st_eq_landau_n_rt_rp_r_mn r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn r s) s) r (l_e_st_eq_landau_n_rt_rp_r_compl s (l_e_st_eq_landau_n_rt_rp_r_mn r s)) (l_e_st_eq_landau_n_rt_rp_r_plmn r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s (l_e_st_eq_landau_n_rt_rp_r_mn r s)) r).
-
-(* constant 4396 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz187b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r) (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_satz187a r s) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r)).
-
-(* constant 4397 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz187c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λx:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x s) s) x (l_e_st_eq_landau_n_rt_rp_r_ismn1 r (l_e_st_eq_landau_n_rt_rp_r_pl x s) s (l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_pl x s) (l_e_st_eq_landau_n_rt_rp_r_pl s x) i (l_e_st_eq_landau_n_rt_rp_r_compl s x))) (l_e_st_eq_landau_n_rt_rp_r_mnpl x s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) x).
-
-(* constant 4398 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz187d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λx:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn r s) x (l_e_st_eq_landau_n_rt_rp_r_satz187c r s x i) : l_e_st_eq_landau_n_rt_rp_r_is x (l_e_st_eq_landau_n_rt_rp_r_mn r s)).
-
-(* constant 4399 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz187e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λx:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl x s) r.(l_e_st_eq_landau_n_rt_rp_r_satz187c r s x (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl s x) (l_e_st_eq_landau_n_rt_rp_r_pl x s) r (l_e_st_eq_landau_n_rt_rp_r_compl s x) i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn r s) x).
-
-(* constant 4400 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz187f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λx:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl x s) r.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn r s) x (l_e_st_eq_landau_n_rt_rp_r_satz187e r s x i) : l_e_st_eq_landau_n_rt_rp_r_is x (l_e_st_eq_landau_n_rt_rp_r_mn r s)).
-
-(* constant 4401 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r187_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r.λj:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s y) r.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real x y (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_satz187c r s x i) (l_e_st_eq_landau_n_rt_rp_r_satz187c r s y j) : l_e_st_eq_landau_n_rt_rp_r_is x y).
-
-(* constant 4402 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r187_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r.λu:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s y) r.l_e_st_eq_landau_n_rt_rp_r_3r187_t1 r s x y t u : l_e_amone l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r)).
-
-(* constant 4403 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz187 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_onei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r) (l_e_st_eq_landau_n_rt_rp_r_3r187_t2 r s) (l_e_st_eq_landau_n_rt_rp_r_satz187b r s) : l_e_st_eq_landau_n_rt_rp_r_one (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl s x) r)).
-
-(* constant 4404 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_satzd188a a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_moreex (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_pd a2 c2) (l_e_st_eq_landau_n_rt_rp_pd b2 c2) (l_e_st_eq_landau_n_rt_rp_r_picp r t a2 c2 a2ir c2it) (l_e_st_eq_landau_n_rt_rp_r_picp s t b2 c2 b2is c2it) m) : l_e_st_eq_landau_n_rt_rp_mored a2 b2).
-
-(* constant 4405 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_r_morein r s a2 b2 a2ir b2is (l_e_st_eq_landau_n_rt_rp_r_3r188_t1 r s t a2 b2 c2 a2ir b2is c2it m) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4406 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_more r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_3r188_t2 r s t x y z u v w m) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4407 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_satzd188b a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_pd a2 c2) (l_e_st_eq_landau_n_rt_rp_pd b2 c2) (l_e_st_eq_landau_n_rt_rp_r_picp r t a2 c2 a2ir c2it) (l_e_st_eq_landau_n_rt_rp_r_picp s t b2 c2 b2is c2it) i) : l_e_st_eq_landau_n_rt_rp_eq a2 b2).
-
-(* constant 4408 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_r_isin r s a2 b2 a2ir b2is (l_e_st_eq_landau_n_rt_rp_r_3r188_t3 r s t a2 b2 c2 a2ir b2is c2it i) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4409 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_is r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_3r188_t4 r s t x y z u v w i) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4410 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_satzd188c a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_lessex (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_pd a2 c2) (l_e_st_eq_landau_n_rt_rp_pd b2 c2) (l_e_st_eq_landau_n_rt_rp_r_picp r t a2 c2 a2ir c2it) (l_e_st_eq_landau_n_rt_rp_r_picp s t b2 c2 b2is c2it) l) : l_e_st_eq_landau_n_rt_rp_lessd a2 b2).
-
-(* constant 4411 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_r_lessin r s a2 b2 a2ir b2is (l_e_st_eq_landau_n_rt_rp_r_3r188_t5 r s t a2 b2 c2 a2ir b2is c2it l) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4412 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t).(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_less r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_3r188_t6 r s t x y z u v w l) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4413 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_satzd188d a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_moreex r s a2 b2 a2ir b2is m) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_pd a2 c2) (l_e_st_eq_landau_n_rt_rp_pd b2 c2)).
-
-(* constant 4414 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_morein (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_pd a2 c2) (l_e_st_eq_landau_n_rt_rp_pd b2 c2) (l_e_st_eq_landau_n_rt_rp_r_picp r t a2 c2 a2ir c2it) (l_e_st_eq_landau_n_rt_rp_r_picp s t b2 c2 b2is c2it) (l_e_st_eq_landau_n_rt_rp_r_3r188_t7 r s t a2 b2 c2 a2ir b2is c2it m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t)).
-
-(* constant 4415 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_3r188_t8 r s t x y z u v w m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t)).
-
-(* constant 4416 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_ispl1 r s t i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t)).
-
-(* constant 4417 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_satzd188f a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_lessex r s a2 b2 a2ir b2is l) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_pd a2 c2) (l_e_st_eq_landau_n_rt_rp_pd b2 c2)).
-
-(* constant 4418 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r188_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_lessin (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_pd a2 c2) (l_e_st_eq_landau_n_rt_rp_pd b2 c2) (l_e_st_eq_landau_n_rt_rp_r_picp r t a2 c2 a2ir c2it) (l_e_st_eq_landau_n_rt_rp_r_picp s t b2 c2 b2is c2it) (l_e_st_eq_landau_n_rt_rp_r_3r188_t9 r s t a2 b2 c2 a2ir b2is c2it l) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t)).
-
-(* constant 4419 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_3r188_t10 r s t x y z u v w l) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t)).
-
-(* constant 4420 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188g ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl t s).(l_e_st_eq_landau_n_rt_rp_r_satz188a r s t (l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl t s) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_r_compl t r) (l_e_st_eq_landau_n_rt_rp_r_compl t s) m) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4421 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188h ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl t s).(l_e_st_eq_landau_n_rt_rp_r_satz188b r s t (l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl t s) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_r_compl r t) i (l_e_st_eq_landau_n_rt_rp_r_compl t s)) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4422 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188j ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl t s).(l_e_st_eq_landau_n_rt_rp_r_satz188c r s t (l_e_st_eq_landau_n_rt_rp_r_isless12 (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl t s) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_r_compl t r) (l_e_st_eq_landau_n_rt_rp_r_compl t s) l) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4423 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188k ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_r_pl t s) (l_e_st_eq_landau_n_rt_rp_r_compl r t) (l_e_st_eq_landau_n_rt_rp_r_compl s t) (l_e_st_eq_landau_n_rt_rp_r_satz188d r s t m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl t s)).
-
-(* constant 4424 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188l ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_ispl2 r s t i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl t s)).
-
-(* constant 4425 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188m ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_isless12 (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_r_pl t s) (l_e_st_eq_landau_n_rt_rp_r_compl r t) (l_e_st_eq_landau_n_rt_rp_r_compl s t) (l_e_st_eq_landau_n_rt_rp_r_satz188f r s t l) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl t s)).
-
-(* constant 4426 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188n ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λm:l_e_st_eq_landau_n_rt_rp_r_more t u.(l_e_st_eq_landau_n_rt_rp_r_ismore2 (l_e_st_eq_landau_n_rt_rp_r_pl r u) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_ispl1 r s u i) (l_e_st_eq_landau_n_rt_rp_r_satz188k t u r m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4427 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188o ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λm:l_e_st_eq_landau_n_rt_rp_r_more t u.(l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_pl u s) (l_e_st_eq_landau_n_rt_rp_r_compl r t) (l_e_st_eq_landau_n_rt_rp_r_compl s u) (l_e_st_eq_landau_n_rt_rp_r_satz188n r s t u i m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl u s)).
-
-(* constant 4428 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188p ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λl:l_e_st_eq_landau_n_rt_rp_r_less t u.(l_e_st_eq_landau_n_rt_rp_r_isless2 (l_e_st_eq_landau_n_rt_rp_r_pl r u) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_ispl1 r s u i) (l_e_st_eq_landau_n_rt_rp_r_satz188m t u r l) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4429 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz188q ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λl:l_e_st_eq_landau_n_rt_rp_r_less t u.(l_e_st_eq_landau_n_rt_rp_r_isless12 (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_pl u s) (l_e_st_eq_landau_n_rt_rp_r_compl r t) (l_e_st_eq_landau_n_rt_rp_r_compl s u) (l_e_st_eq_landau_n_rt_rp_r_satz188p r s t u i l) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl u s)).
-
-(* constant 4430 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz189 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λn:l_e_st_eq_landau_n_rt_rp_r_more t u.(l_e_st_eq_landau_n_rt_rp_r_trmore (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s t) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_satz188d r s t m) (l_e_st_eq_landau_n_rt_rp_r_satz188k t u s n) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4431 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz189a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_less t u.(l_e_st_eq_landau_n_rt_rp_r_lemma1 (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_satz189 s r u t (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l) (l_e_st_eq_landau_n_rt_rp_r_lemma2 t u k)) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4432 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz190a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.λn:l_e_st_eq_landau_n_rt_rp_r_more t u.(l_orapp (l_e_st_eq_landau_n_rt_rp_r_more r s) (l_e_st_eq_landau_n_rt_rp_r_is r s) (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)) m (λv:l_e_st_eq_landau_n_rt_rp_r_more r s.l_e_st_eq_landau_n_rt_rp_r_satz189 r s t u v n) (λv:l_e_st_eq_landau_n_rt_rp_r_is r s.l_e_st_eq_landau_n_rt_rp_r_satz188n r s t u v n) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4433 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz190b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λn:l_e_st_eq_landau_n_rt_rp_r_moreis t u.(l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_pl t r) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl u s) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_compl t r) (l_e_st_eq_landau_n_rt_rp_r_compl u s) (l_e_st_eq_landau_n_rt_rp_r_satz190a t u r s n m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4434 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz190c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_less t u.(l_e_st_eq_landau_n_rt_rp_r_lemma1 (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_satz190a s r u t (l_e_st_eq_landau_n_rt_rp_r_satz168b r s l) (l_e_st_eq_landau_n_rt_rp_r_lemma2 t u k)) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4435 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz190d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis t u.(l_e_st_eq_landau_n_rt_rp_r_lemma1 (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_satz190b s r u t (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l) (l_e_st_eq_landau_n_rt_rp_r_satz168b t u k)) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4436 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r191_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa3:l_e_st_eq_landau_n_rt_rp_dif.λb3:l_e_st_eq_landau_n_rt_rp_dif.λc3:l_e_st_eq_landau_n_rt_rp_dif.λd3:l_e_st_eq_landau_n_rt_rp_dif.λa3ir:l_e_st_eq_landau_n_rt_rp_r_inn a3 (l_e_st_eq_landau_n_rt_rp_r_class r).λb3is:l_e_st_eq_landau_n_rt_rp_r_inn b3 (l_e_st_eq_landau_n_rt_rp_r_class s).λc3it:l_e_st_eq_landau_n_rt_rp_r_inn c3 (l_e_st_eq_landau_n_rt_rp_r_class t).λd3iu:l_e_st_eq_landau_n_rt_rp_r_inn d3 (l_e_st_eq_landau_n_rt_rp_r_class u).λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.λn:l_e_st_eq_landau_n_rt_rp_r_moreis t u.(l_e_st_eq_landau_n_rt_rp_satzd191 a3 b3 c3 d3 (l_e_st_eq_landau_n_rt_rp_r_moreisex r s a3 b3 a3ir b3is m) (l_e_st_eq_landau_n_rt_rp_r_moreisex t u c3 d3 c3it d3iu n) : l_e_st_eq_landau_n_rt_rp_moreq (l_e_st_eq_landau_n_rt_rp_pd a3 c3) (l_e_st_eq_landau_n_rt_rp_pd b3 d3)).
-
-(* constant 4437 *)
-definition l_e_st_eq_landau_n_rt_rp_r_3r191_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa3:l_e_st_eq_landau_n_rt_rp_dif.λb3:l_e_st_eq_landau_n_rt_rp_dif.λc3:l_e_st_eq_landau_n_rt_rp_dif.λd3:l_e_st_eq_landau_n_rt_rp_dif.λa3ir:l_e_st_eq_landau_n_rt_rp_r_inn a3 (l_e_st_eq_landau_n_rt_rp_r_class r).λb3is:l_e_st_eq_landau_n_rt_rp_r_inn b3 (l_e_st_eq_landau_n_rt_rp_r_class s).λc3it:l_e_st_eq_landau_n_rt_rp_r_inn c3 (l_e_st_eq_landau_n_rt_rp_r_class t).λd3iu:l_e_st_eq_landau_n_rt_rp_r_inn d3 (l_e_st_eq_landau_n_rt_rp_r_class u).λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.λn:l_e_st_eq_landau_n_rt_rp_r_moreis t u.(l_e_st_eq_landau_n_rt_rp_r_moreisin (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_pd a3 c3) (l_e_st_eq_landau_n_rt_rp_pd b3 d3) (l_e_st_eq_landau_n_rt_rp_r_picp r t a3 c3 a3ir c3it) (l_e_st_eq_landau_n_rt_rp_r_picp s u b3 d3 b3is d3iu) (l_e_st_eq_landau_n_rt_rp_r_3r191_t1 r s t u a3 b3 c3 d3 a3ir b3is c3it d3iu m n) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4438 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz191 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.λn:l_e_st_eq_landau_n_rt_rp_r_moreis t u.(l_e_st_eq_landau_n_rt_rp_r_realapp4 r s t u (l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λv:l_e_st_eq_landau_n_rt_rp_dif.λxi:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λyi:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λzi:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).λvi:l_e_st_eq_landau_n_rt_rp_r_inn v (l_e_st_eq_landau_n_rt_rp_r_class u).l_e_st_eq_landau_n_rt_rp_r_3r191_t2 r s t u x y z v xi yi zi vi m n) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4439 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz191a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_lessis r s.λk:l_e_st_eq_landau_n_rt_rp_r_lessis t u.(l_e_st_eq_landau_n_rt_rp_r_satz168a (l_e_st_eq_landau_n_rt_rp_r_pl s u) (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_satz191 s r u t (l_e_st_eq_landau_n_rt_rp_r_satz168b r s l) (l_e_st_eq_landau_n_rt_rp_r_satz168b t u k)) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl r t) (l_e_st_eq_landau_n_rt_rp_r_pl s u)).
-
-(* constant 4440 *)
-definition l_e_st_eq_landau_n_rt_rp_r_timesdr ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_td x y) : Πx:l_e_st_eq_landau_n_rt_rp_dif.Πy:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4441 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr4_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_dif.λb:l_e_st_eq_landau_n_rt_rp_dif.λc:l_e_st_eq_landau_n_rt_rp_dif.λd:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq a b.λf:l_e_st_eq_landau_n_rt_rp_eq c d.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_td b d)) (l_e_st_eq_landau_n_rt_rp_td a c) (l_e_st_eq_landau_n_rt_rp_td b d) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_td a c)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_td b d)) (l_e_st_eq_landau_n_rt_rp_eqtd12 a b c d e f) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_timesdr a c) (l_e_st_eq_landau_n_rt_rp_r_timesdr b d)).
-
-(* constant 4442 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ftimesdr ≝ (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λv:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_eq x y.λu:l_e_st_eq_landau_n_rt_rp_r_eq z v.l_e_st_eq_landau_n_rt_rp_r_ivr4_t1 x y z v t u : l_e_st_eq_landau_n_rt_rp_r_fixf2 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_timesdr).
-
-(* constant 4443 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ts ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_indreal2 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_timesdr l_e_st_eq_landau_n_rt_rp_r_ftimesdr r s : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4444 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr4_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isindreal2 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_timesdr l_e_st_eq_landau_n_rt_rp_r_ftimesdr r s a1 b1 a1ir b1is : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_td a1 b1)) (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4445 *)
-definition l_e_st_eq_landau_n_rt_rp_r_tict ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_class x)) (l_e_st_eq_landau_n_rt_rp_r_realof (l_e_st_eq_landau_n_rt_rp_td a1 b1)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_td a1 b1)) (l_e_st_eq_landau_n_rt_rp_r_ivr4_t2 r s a1 b1 a1ir b1is) : l_e_st_eq_landau_n_rt_rp_r_inn (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_class (l_e_st_eq_landau_n_rt_rp_r_ts r s))).
-
-(* constant 4446 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ists1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_ts x t) r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4447 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ists2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_ts t x) r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s)).
-
-(* constant 4448 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ists12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.λj:l_e_st_eq_landau_n_rt_rp_r_is t u.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t) (l_e_st_eq_landau_n_rt_rp_r_ts s u) (l_e_st_eq_landau_n_rt_rp_r_ists1 r s t i) (l_e_st_eq_landau_n_rt_rp_r_ists2 t u s j) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s u)).
-
-(* constant 4449 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r192_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_satzd192a a1 b1 (l_e_st_eq_landau_n_rt_rp_r_0ex r a1 a1ir i) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a1 b1)).
-
-(* constant 4450 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r192_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_0in (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_4r192_t1 r s a1 b1 a1ir b1is i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4451 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz192a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r192_t2 r s x y t u i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4452 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r192_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_satzd192b a1 b1 (l_e_st_eq_landau_n_rt_rp_r_0ex s b1 b1is i) : l_e_st_eq_landau_n_rt_rp_zero (l_e_st_eq_landau_n_rt_rp_td a1 b1)).
-
-(* constant 4453 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r192_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_0in (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_4r192_t3 r s a1 b1 a1ir b1is i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4454 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz192b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r192_t4 r s x y t u i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4455 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r192_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_satzd192c a1 b1 (l_e_st_eq_landau_n_rt_rp_r_0ex (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) i) : l_or (l_e_st_eq_landau_n_rt_rp_zero a1) (l_e_st_eq_landau_n_rt_rp_zero b1)).
-
-(* constant 4456 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r192_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_zero a1) (l_e_st_eq_landau_n_rt_rp_zero b1) (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_4r192_t5 r s a1 b1 a1ir b1is i) (λt:l_e_st_eq_landau_n_rt_rp_zero a1.l_e_st_eq_landau_n_rt_rp_r_0in r a1 a1ir t) (λt:l_e_st_eq_landau_n_rt_rp_zero b1.l_e_st_eq_landau_n_rt_rp_r_0in s b1 b1is t) : l_or (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 4457 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz192c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_or (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r192_t6 r s x y t u i) : l_or (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 4458 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz192d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.λo:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_or (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0)) (l_or_th3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0) n o) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_satz192c r s t) : l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4459 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ts01 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_satz192a r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4460 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ts02 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_satz192b r s i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4461 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r193_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_satzd193 a1 b1 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a1 b1)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1))).
-
-(* constant 4462 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r193_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_absd (l_e_st_eq_landau_n_rt_rp_td a1 b1)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1)) (l_e_st_eq_landau_n_rt_rp_r_aica (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is)) (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1) (l_e_st_eq_landau_n_rt_rp_r_aica r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_aica s b1 b1is)) (l_e_st_eq_landau_n_rt_rp_r_4r193_t1 r s a1 b1 a1ir b1is) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).
-
-(* constant 4463 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz193 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r193_t2 r s x y t u) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).
-
-(* constant 4464 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz193a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_r_satz193 r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_ts r s))).
-
-(* constant 4465 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r194_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_satzd194 a1 b1 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_td b1 a1)).
-
-(* constant 4466 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r194_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts s r) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_td b1 a1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_tict s r b1 a1 b1is a1ir) (l_e_st_eq_landau_n_rt_rp_r_4r194_t1 r s a1 b1 a1ir b1is) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts s r)).
-
-(* constant 4467 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz194 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts s r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r194_t2 r s x y t u) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts s r)).
-
-(* constant 4468 *)
-definition l_e_st_eq_landau_n_rt_rp_r_comts ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_satz194 r s : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts s r)).
-
-(* constant 4469 *)
-definition l_e_st_eq_landau_n_rt_rp_r_1rl ≝ (l_e_st_eq_landau_n_rt_rp_r_realof l_e_st_eq_landau_n_rt_rp_1df : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4470 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pos1 ≝ (l_e_st_eq_landau_n_rt_rp_r_posin l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_1df (l_e_st_eq_landau_n_rt_rp_r_innclass l_e_st_eq_landau_n_rt_rp_1df) (l_e_st_eq_landau_n_rt_rp_posdirp l_e_st_eq_landau_n_rt_rp_1rp) : l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 4471 *)
-definition l_e_st_eq_landau_n_rt_rp_r_natrl1 ≝ (l_e_st_eq_landau_n_rt_rp_r_natrli l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_rt_rp_r_natrl l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 4472 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intrl1 ≝ (l_e_st_eq_landau_n_rt_rp_r_natintrl l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_natrl1 : l_e_st_eq_landau_n_rt_rp_r_intrl l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 4473 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r195_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_satzd195 a0 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 l_e_st_eq_landau_n_rt_rp_1df) a0).
-
-(* constant 4474 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r195_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_1rl) r (l_e_st_eq_landau_n_rt_rp_td a0 l_e_st_eq_landau_n_rt_rp_1df) a0 (l_e_st_eq_landau_n_rt_rp_r_tict r l_e_st_eq_landau_n_rt_rp_r_1rl a0 l_e_st_eq_landau_n_rt_rp_1df a0ir (l_e_st_eq_landau_n_rt_rp_r_innclass l_e_st_eq_landau_n_rt_rp_1df)) a0ir (l_e_st_eq_landau_n_rt_rp_r_4r195_t1 r a0 a0ir) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_1rl) r).
-
-(* constant 4475 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz195 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_1rl) r) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_4r195_t2 r x t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_1rl) r).
-
-(* constant 4476 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz195a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_1rl) r (l_e_st_eq_landau_n_rt_rp_r_satz195 r) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_1rl)).
-
-(* constant 4477 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz195b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_1rl) r (l_e_st_eq_landau_n_rt_rp_r_comts l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_satz195 r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r) r).
-
-(* constant 4478 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz195c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r) r (l_e_st_eq_landau_n_rt_rp_r_satz195b r) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r)).
-
-(* constant 4479 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz196a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ists12 (l_e_st_eq_landau_n_rt_rp_r_abs r) r (l_e_st_eq_landau_n_rt_rp_r_abs s) s (l_e_st_eq_landau_n_rt_rp_r_absp r p) (l_e_st_eq_landau_n_rt_rp_r_absp s q)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).
-
-(* constant 4480 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_satzd196b a1 b1 (l_e_st_eq_landau_n_rt_rp_r_negex r a1 a1ir n) (l_e_st_eq_landau_n_rt_rp_r_negex s b1 b1is o) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1))).
-
-(* constant 4481 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1)) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1) (l_e_st_eq_landau_n_rt_rp_r_aica r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_aica s b1 b1is)) (l_e_st_eq_landau_n_rt_rp_r_4r196_t1 r s a1 b1 a1ir b1is n o) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).
-
-(* constant 4482 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz196b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r196_t2 r s x y t u n o) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).
-
-(* constant 4483 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t1a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λn:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_satzd196c a1 b1 (l_e_st_eq_landau_n_rt_rp_r_posex r a1 a1ir p) (l_e_st_eq_landau_n_rt_rp_r_negex s b1 b1is n) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1)))).
-
-(* constant 4484 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t2a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λn:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1))) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_micm0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1)) (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1) (l_e_st_eq_landau_n_rt_rp_r_aica r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_aica s b1 b1is))) (l_e_st_eq_landau_n_rt_rp_r_4r196_t1a r s a1 b1 a1ir b1is p n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)))).
-
-(* constant 4485 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz196c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λn:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r196_t2a r s x y t u p n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)))).
-
-(* constant 4486 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz196d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts s r) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_r_abs r))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))) (l_e_st_eq_landau_n_rt_rp_r_comts r s) (l_e_st_eq_landau_n_rt_rp_r_satz196c s r p n) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_r_abs r)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_r_abs r))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)))).
-
-(* constant 4487 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_zero a0) (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) n (λt:l_e_st_eq_landau_n_rt_rp_zero a0.l_e_st_eq_landau_n_rt_rp_r_0in r a0 a0ir t) : l_not (l_e_st_eq_landau_n_rt_rp_zero a0)).
-
-(* constant 4488 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)).(l_e_st_eq_landau_n_rt_rp_satzd196e a1 b1 (l_e_st_eq_landau_n_rt_rp_r_4r196_t3 r a1 a1ir n) (l_e_st_eq_landau_n_rt_rp_r_4r196_t3 s b1 b1is o) (l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1)) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1) (l_e_st_eq_landau_n_rt_rp_r_aica r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_aica s b1 b1is)) i) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_posd b1)) (l_and (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_negd b1))).
-
-(* constant 4489 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)).λa:l_and (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_posd b1).(l_andi (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_posin r a1 a1ir (l_ande1 (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_posd b1) a)) (l_e_st_eq_landau_n_rt_rp_r_posin s b1 b1is (l_ande2 (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_posd b1) a)) : l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_pos s)).
-
-(* constant 4490 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)).λa:l_and (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_negd b1).(l_andi (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_negin r a1 a1ir (l_ande1 (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_negd b1) a)) (l_e_st_eq_landau_n_rt_rp_r_negin s b1 b1is (l_ande2 (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_negd b1) a)) : l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_neg s)).
-
-(* constant 4491 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)).(l_or_th9 (l_and (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_posd b1)) (l_and (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_negd b1)) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_pos s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_4r196_t4 r s a1 b1 a1ir b1is n o i) (λt:l_and (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_posd b1).l_e_st_eq_landau_n_rt_rp_r_4r196_t5 r s a1 b1 a1ir b1is n o i t) (λt:l_and (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_negd b1).l_e_st_eq_landau_n_rt_rp_r_4r196_t6 r s a1 b1 a1ir b1is n o i t) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_pos s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_neg s))).
-
-(* constant 4492 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz196e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)).(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_pos s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_neg s))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r196_t7 r s x y t u n o i) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_pos s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_neg s))).
-
-(* constant 4493 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).(l_e_st_eq_landau_n_rt_rp_satzd196f a1 b1 (l_e_st_eq_landau_n_rt_rp_r_4r196_t3 r a1 a1ir n) (l_e_st_eq_landau_n_rt_rp_r_4r196_t3 s b1 b1is o) (l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1))) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_micm0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1)) (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_absd a1) (l_e_st_eq_landau_n_rt_rp_absd b1) (l_e_st_eq_landau_n_rt_rp_r_aica r a1 a1ir) (l_e_st_eq_landau_n_rt_rp_r_aica s b1 b1is))) i) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_negd b1)) (l_and (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_posd b1))).
-
-(* constant 4494 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).λa:l_and (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_negd b1).(l_andi (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_posin r a1 a1ir (l_ande1 (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_negd b1) a)) (l_e_st_eq_landau_n_rt_rp_r_negin s b1 b1is (l_ande2 (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_negd b1) a)) : l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg s)).
-
-(* constant 4495 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).λa:l_and (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_posd b1).(l_andi (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_negin r a1 a1ir (l_ande1 (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_posd b1) a)) (l_e_st_eq_landau_n_rt_rp_r_posin s b1 b1is (l_ande2 (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_posd b1) a)) : l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_pos s)).
-
-(* constant 4496 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).(l_or_th9 (l_and (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_negd b1)) (l_and (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_posd b1)) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_pos s)) (l_e_st_eq_landau_n_rt_rp_r_4r196_t8 r s a1 b1 a1ir b1is n o i) (λt:l_and (l_e_st_eq_landau_n_rt_rp_posd a1) (l_e_st_eq_landau_n_rt_rp_negd b1).l_e_st_eq_landau_n_rt_rp_r_4r196_t9 r s a1 b1 a1ir b1is n o i t) (λt:l_and (l_e_st_eq_landau_n_rt_rp_negd a1) (l_e_st_eq_landau_n_rt_rp_posd b1).l_e_st_eq_landau_n_rt_rp_r_4r196_t10 r s a1 b1 a1ir b1is n o i t) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_pos s))).
-
-(* constant 4497 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz196f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_pos s))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r196_t11 r s x y t u n o i) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_pos s))).
-
-(* constant 4498 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r s).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pnot0 (l_e_st_eq_landau_n_rt_rp_r_ts r s) p) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_ts01 r s t) : l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4499 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t13 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r s).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pnot0 (l_e_st_eq_landau_n_rt_rp_r_ts r s) p) (λt:l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_ts02 r s t) : l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4500 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t14 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r s).(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_absp (l_e_st_eq_landau_n_rt_rp_r_ts r s) p) (l_e_st_eq_landau_n_rt_rp_r_satz193 r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s))).
-
-(* constant 4501 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz196g ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r s).(l_e_st_eq_landau_n_rt_rp_r_satz196e r s (l_e_st_eq_landau_n_rt_rp_r_4r196_t12 r s p) (l_e_st_eq_landau_n_rt_rp_r_4r196_t13 r s p) (l_e_st_eq_landau_n_rt_rp_r_4r196_t14 r s p) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_pos s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_neg s))).
-
-(* constant 4502 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t15 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r s).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_nnot0 (l_e_st_eq_landau_n_rt_rp_r_ts r s) n) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_ts01 r s t) : l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4503 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t16 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r s).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_nnot0 (l_e_st_eq_landau_n_rt_rp_r_ts r s) n) (λt:l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_ts02 r s t) : l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4504 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r196_t17 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r s).(l_e_st_eq_landau_n_rt_rp_r_satz177c (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_satz193a r s) (l_e_st_eq_landau_n_rt_rp_r_absn (l_e_st_eq_landau_n_rt_rp_r_ts r s) n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs s)))).
-
-(* constant 4505 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz196h ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r s).(l_e_st_eq_landau_n_rt_rp_r_satz196f r s (l_e_st_eq_landau_n_rt_rp_r_4r196_t15 r s n) (l_e_st_eq_landau_n_rt_rp_r_4r196_t16 r s n) (l_e_st_eq_landau_n_rt_rp_r_4r196_t17 r s n) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_pos s))).
-
-(* constant 4506 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r197_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_satzd197a a1 b1 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a1) b1) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a1 b1))).
-
-(* constant 4507 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r197_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_m0d a1) b1) (l_e_st_eq_landau_n_rt_rp_m0d (l_e_st_eq_landau_n_rt_rp_td a1 b1)) (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_m0 r) s (l_e_st_eq_landau_n_rt_rp_m0d a1) b1 (l_e_st_eq_landau_n_rt_rp_r_micm0 r a1 a1ir) b1is) (l_e_st_eq_landau_n_rt_rp_r_micm0 (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is)) (l_e_st_eq_landau_n_rt_rp_r_4r197_t1 r s a1 b1 a1ir b1is) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s))).
-
-(* constant 4508 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz197a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r197_t2 r s x y t u) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s))).
-
-(* constant 4509 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz197b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 s) r) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts s r)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_comts r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_satz197a s r) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_ts s r) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_comts s r)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s))).
-
-(* constant 4510 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz197c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_satz197a r s) (l_e_st_eq_landau_n_rt_rp_r_satz197b r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 s))).
-
-(* constant 4511 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz197d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_satz197c r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s)).
-
-(* constant 4512 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz197e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_satz197a r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) s)).
-
-(* constant 4513 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz197f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_satz197b r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 s))).
-
-(* constant 4514 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz198 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s))) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_satz197c r (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s)) s r (l_e_st_eq_landau_n_rt_rp_r_satz177 s)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4515 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz198a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_satz198 r s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s))).
-
-(* constant 4516 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr4_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_ptdpp a1 b1 (l_e_st_eq_landau_n_rt_rp_r_posex r a1 a1ir p) (l_e_st_eq_landau_n_rt_rp_r_posex s b1 b1is q) : l_e_st_eq_landau_n_rt_rp_posd (l_e_st_eq_landau_n_rt_rp_td a1 b1)).
-
-(* constant 4517 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr4_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_r_posin (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_ivr4_t3 r s a1 b1 a1ir b1is p q) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4518 *)
-definition l_e_st_eq_landau_n_rt_rp_r_postspp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_ivr4_t4 r s x y t u p q) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4519 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr4_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λn:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_ntdpn a1 b1 (l_e_st_eq_landau_n_rt_rp_r_posex r a1 a1ir p) (l_e_st_eq_landau_n_rt_rp_r_negex s b1 b1is n) : l_e_st_eq_landau_n_rt_rp_negd (l_e_st_eq_landau_n_rt_rp_td a1 b1)).
-
-(* constant 4520 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr4_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λn:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_negin (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_ivr4_t5 r s a1 b1 a1ir b1is p n) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4521 *)
-definition l_e_st_eq_landau_n_rt_rp_r_negtspn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λn:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_ivr4_t6 r s x y t u p n) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4522 *)
-definition l_e_st_eq_landau_n_rt_rp_r_negtsnp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_r_isneg (l_e_st_eq_landau_n_rt_rp_r_ts s r) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_comts s r) (l_e_st_eq_landau_n_rt_rp_r_negtspn s r p n) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4523 *)
-definition l_e_st_eq_landau_n_rt_rp_r_postsnn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.λo:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_e_st_eq_landau_n_rt_rp_r_ispos (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_satz198 r s) (l_e_st_eq_landau_n_rt_rp_r_postspp (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_satz176c r n) (l_e_st_eq_landau_n_rt_rp_r_satz176c s o)) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4524 *)
-definition l_e_st_eq_landau_n_rt_rp_r_possq ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_rapp r (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r r)) (λt:l_e_st_eq_landau_n_rt_rp_r_pos r.l_e_st_eq_landau_n_rt_rp_r_postspp r r t t) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r r)) n) (λt:l_e_st_eq_landau_n_rt_rp_r_neg r.l_e_st_eq_landau_n_rt_rp_r_postsnn r r t t) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts r r)).
-
-(* constant 4525 *)
-definition l_e_st_eq_landau_n_rt_rp_r_nnegsq ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r r))) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_0notn (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_satz192a r r t)) (λt:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_pnotn (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_possq r t)) : l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r r))).
-
-(* constant 4526 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r199_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).(l_e_st_eq_landau_n_rt_rp_satzd199 a2 b2 c2 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_td a2 b2) c2) (l_e_st_eq_landau_n_rt_rp_td a2 (l_e_st_eq_landau_n_rt_rp_td b2 c2))).
-
-(* constant 4527 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r199_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts r s) t) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_td a2 b2) c2) (l_e_st_eq_landau_n_rt_rp_td a2 (l_e_st_eq_landau_n_rt_rp_td b2 c2)) (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_ts r s) t (l_e_st_eq_landau_n_rt_rp_td a2 b2) c2 (l_e_st_eq_landau_n_rt_rp_r_tict r s a2 b2 a2ir b2is) c2it) (l_e_st_eq_landau_n_rt_rp_r_tict r (l_e_st_eq_landau_n_rt_rp_r_ts s t) a2 (l_e_st_eq_landau_n_rt_rp_td b2 c2) a2ir (l_e_st_eq_landau_n_rt_rp_r_tict s t b2 c2 b2is c2it)) (l_e_st_eq_landau_n_rt_rp_r_4r199_t1 r s t a2 b2 c2 a2ir b2is c2it) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts r s) t) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ts s t))).
-
-(* constant 4528 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz199 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts r s) t) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ts s t))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_4r199_t2 r s t x y z u v w) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts r s) t) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ts s t))).
-
-(* constant 4529 *)
-definition l_e_st_eq_landau_n_rt_rp_r_assts1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_satz199 r s t : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts r s) t) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ts s t))).
-
-(* constant 4530 *)
-definition l_e_st_eq_landau_n_rt_rp_r_assts2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts r s) t) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_satz199 r s t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts r s) t)).
-
-(* constant 4531 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r201_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).(l_e_st_eq_landau_n_rt_rp_satzd201 a2 b2 c2 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a2 (l_e_st_eq_landau_n_rt_rp_pd b2 c2)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a2 b2) (l_e_st_eq_landau_n_rt_rp_td a2 c2))).
-
-(* constant 4532 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r201_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t)) (l_e_st_eq_landau_n_rt_rp_td a2 (l_e_st_eq_landau_n_rt_rp_pd b2 c2)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_td a2 b2) (l_e_st_eq_landau_n_rt_rp_td a2 c2)) (l_e_st_eq_landau_n_rt_rp_r_tict r (l_e_st_eq_landau_n_rt_rp_r_pl s t) a2 (l_e_st_eq_landau_n_rt_rp_pd b2 c2) a2ir (l_e_st_eq_landau_n_rt_rp_r_picp s t b2 c2 b2is c2it)) (l_e_st_eq_landau_n_rt_rp_r_picp (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_td a2 b2) (l_e_st_eq_landau_n_rt_rp_td a2 c2) (l_e_st_eq_landau_n_rt_rp_r_tict r s a2 b2 a2ir b2is) (l_e_st_eq_landau_n_rt_rp_r_tict r t a2 c2 a2ir c2it)) (l_e_st_eq_landau_n_rt_rp_r_4r201_t1 r s t a2 b2 c2 a2ir b2is c2it) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t))).
-
-(* constant 4533 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz201 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_4r201_t2 r s t x y z u v w) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t))).
-
-(* constant 4534 *)
-definition l_e_st_eq_landau_n_rt_rp_r_disttp1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_satz201 t r s) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts t s) (l_e_st_eq_landau_n_rt_rp_r_ts s t) (l_e_st_eq_landau_n_rt_rp_r_comts t r) (l_e_st_eq_landau_n_rt_rp_r_comts t s)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t))).
-
-(* constant 4535 *)
-definition l_e_st_eq_landau_n_rt_rp_r_disttp2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_satz201 r s t : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t))).
-
-(* constant 4536 *)
-definition l_e_st_eq_landau_n_rt_rp_r_distpt1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_pl r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_disttp1 r s t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_pl r s) t)).
-
-(* constant 4537 *)
-definition l_e_st_eq_landau_n_rt_rp_r_distpt2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_pl s t)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t)) (l_e_st_eq_landau_n_rt_rp_r_disttp2 r s t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t)) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_pl s t))).
-
-(* constant 4538 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz202 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_mn s t)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 t))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t)) (l_e_st_eq_landau_n_rt_rp_r_disttp2 r s (l_e_st_eq_landau_n_rt_rp_r_m0 t)) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_m0 t)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts r t)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_satz197b r t)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_mn s t)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t))).
-
-(* constant 4539 *)
-definition l_e_st_eq_landau_n_rt_rp_r_disttm1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_mn r s) t) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 s) t)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_disttp1 r (l_e_st_eq_landau_n_rt_rp_r_m0 s) t) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 s) t) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_satz197a s t)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_mn r s) t) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t))).
-
-(* constant 4540 *)
-definition l_e_st_eq_landau_n_rt_rp_r_disttm2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_satz202 r s t : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_mn s t)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t))).
-
-(* constant 4541 *)
-definition l_e_st_eq_landau_n_rt_rp_r_distmt1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_mn r s) t) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_disttm1 r s t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_mn r s) t)).
-
-(* constant 4542 *)
-definition l_e_st_eq_landau_n_rt_rp_r_distmt2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_mn s t)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t)) (l_e_st_eq_landau_n_rt_rp_r_disttm2 r s t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t)) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_mn s t))).
-
-(* constant 4543 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz200 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_satz202 r s t : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_mn s t)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r t))).
-
-(* constant 4544 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r203_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λp:l_e_st_eq_landau_n_rt_rp_r_pos t.(l_e_st_eq_landau_n_rt_rp_satzd203a a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_moreex r s a2 b2 a2ir b2is m) (l_e_st_eq_landau_n_rt_rp_r_posex t c2 c2it p) : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_td a2 c2) (l_e_st_eq_landau_n_rt_rp_td b2 c2)).
-
-(* constant 4545 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r203_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λp:l_e_st_eq_landau_n_rt_rp_r_pos t.(l_e_st_eq_landau_n_rt_rp_r_morein (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t) (l_e_st_eq_landau_n_rt_rp_td a2 c2) (l_e_st_eq_landau_n_rt_rp_td b2 c2) (l_e_st_eq_landau_n_rt_rp_r_tict r t a2 c2 a2ir c2it) (l_e_st_eq_landau_n_rt_rp_r_tict s t b2 c2 b2is c2it) (l_e_st_eq_landau_n_rt_rp_r_4r203_t1 r s t a2 b2 c2 a2ir b2is c2it m p) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4546 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λp:l_e_st_eq_landau_n_rt_rp_r_pos t.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_4r203_t2 r s t x y z u v w m p) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4547 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λi:l_e_st_eq_landau_n_rt_rp_r_is t l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts02 r t i) (l_e_st_eq_landau_n_rt_rp_r_ts02 s t i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4548 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r203_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λn:l_e_st_eq_landau_n_rt_rp_r_neg t.(l_e_st_eq_landau_n_rt_rp_satzd203c a2 b2 c2 (l_e_st_eq_landau_n_rt_rp_r_moreex r s a2 b2 a2ir b2is m) (l_e_st_eq_landau_n_rt_rp_r_negex t c2 c2it n) : l_e_st_eq_landau_n_rt_rp_lessd (l_e_st_eq_landau_n_rt_rp_td a2 c2) (l_e_st_eq_landau_n_rt_rp_td b2 c2)).
-
-(* constant 4549 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r203_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λa2:l_e_st_eq_landau_n_rt_rp_dif.λb2:l_e_st_eq_landau_n_rt_rp_dif.λc2:l_e_st_eq_landau_n_rt_rp_dif.λa2ir:l_e_st_eq_landau_n_rt_rp_r_inn a2 (l_e_st_eq_landau_n_rt_rp_r_class r).λb2is:l_e_st_eq_landau_n_rt_rp_r_inn b2 (l_e_st_eq_landau_n_rt_rp_r_class s).λc2it:l_e_st_eq_landau_n_rt_rp_r_inn c2 (l_e_st_eq_landau_n_rt_rp_r_class t).λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λn:l_e_st_eq_landau_n_rt_rp_r_neg t.(l_e_st_eq_landau_n_rt_rp_r_lessin (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t) (l_e_st_eq_landau_n_rt_rp_td a2 c2) (l_e_st_eq_landau_n_rt_rp_td b2 c2) (l_e_st_eq_landau_n_rt_rp_r_tict r t a2 c2 a2ir c2it) (l_e_st_eq_landau_n_rt_rp_r_tict s t b2 c2 b2is c2it) (l_e_st_eq_landau_n_rt_rp_r_4r203_t3 r s t a2 b2 c2 a2ir b2is c2it m n) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4550 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λn:l_e_st_eq_landau_n_rt_rp_r_neg t.(l_e_st_eq_landau_n_rt_rp_r_realapp3 r s t (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_4r203_t4 r s t x y z u v w m n) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4551 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λp:l_e_st_eq_landau_n_rt_rp_r_pos t.(l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts s t) (l_e_st_eq_landau_n_rt_rp_r_ts t s) (l_e_st_eq_landau_n_rt_rp_r_comts r t) (l_e_st_eq_landau_n_rt_rp_r_comts s t) (l_e_st_eq_landau_n_rt_rp_r_satz203a r s t m p) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s)).
-
-(* constant 4552 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λi:l_e_st_eq_landau_n_rt_rp_r_is t l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 t r i) (l_e_st_eq_landau_n_rt_rp_r_ts01 t s i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s)).
-
-(* constant 4553 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.λn:l_e_st_eq_landau_n_rt_rp_r_neg t.(l_e_st_eq_landau_n_rt_rp_r_isless12 (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts s t) (l_e_st_eq_landau_n_rt_rp_r_ts t s) (l_e_st_eq_landau_n_rt_rp_r_comts r t) (l_e_st_eq_landau_n_rt_rp_r_comts s t) (l_e_st_eq_landau_n_rt_rp_r_satz203c r s t m n) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s)).
-
-(* constant 4554 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203g ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λp:l_e_st_eq_landau_n_rt_rp_r_pos t.(l_e_st_eq_landau_n_rt_rp_r_lemma1 (l_e_st_eq_landau_n_rt_rp_r_ts s t) (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_satz203a s r t (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l) p) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4555 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203h ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λi:l_e_st_eq_landau_n_rt_rp_r_is t l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts02 r t i) (l_e_st_eq_landau_n_rt_rp_r_ts02 s t i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4556 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203j ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λn:l_e_st_eq_landau_n_rt_rp_r_neg t.(l_e_st_eq_landau_n_rt_rp_r_lemma2 (l_e_st_eq_landau_n_rt_rp_r_ts s t) (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_satz203c s r t (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l) n) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts r t) (l_e_st_eq_landau_n_rt_rp_r_ts s t)).
-
-(* constant 4557 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203k ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λp:l_e_st_eq_landau_n_rt_rp_r_pos t.(l_e_st_eq_landau_n_rt_rp_r_lemma1 (l_e_st_eq_landau_n_rt_rp_r_ts t s) (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_satz203d s r t (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l) p) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s)).
-
-(* constant 4558 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203l ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λi:l_e_st_eq_landau_n_rt_rp_r_is t l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 t r i) (l_e_st_eq_landau_n_rt_rp_r_ts01 t s i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s)).
-
-(* constant 4559 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz203m ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λn:l_e_st_eq_landau_n_rt_rp_r_neg t.(l_e_st_eq_landau_n_rt_rp_r_lemma2 (l_e_st_eq_landau_n_rt_rp_r_ts t s) (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_satz203f s r t (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l) n) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts t r) (l_e_st_eq_landau_n_rt_rp_r_ts t s)).
-
-(* constant 4560 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λn1:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_zero a0) (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) n1 (λt:l_e_st_eq_landau_n_rt_rp_zero a0.l_e_st_eq_landau_n_rt_rp_r_0in r a0 a0ir t) : l_not (l_e_st_eq_landau_n_rt_rp_zero a0)).
-
-(* constant 4561 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa3:l_e_st_eq_landau_n_rt_rp_dif.λb3:l_e_st_eq_landau_n_rt_rp_dif.λc3:l_e_st_eq_landau_n_rt_rp_dif.λd3:l_e_st_eq_landau_n_rt_rp_dif.λa3ir:l_e_st_eq_landau_n_rt_rp_r_inn a3 (l_e_st_eq_landau_n_rt_rp_r_class r).λb3is:l_e_st_eq_landau_n_rt_rp_r_inn b3 (l_e_st_eq_landau_n_rt_rp_r_class s).λc3it:l_e_st_eq_landau_n_rt_rp_r_inn c3 (l_e_st_eq_landau_n_rt_rp_r_class t).λd3iu:l_e_st_eq_landau_n_rt_rp_r_inn d3 (l_e_st_eq_landau_n_rt_rp_r_class u).λn1:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s t) r.λj:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s u) r.(l_e_st_eq_landau_n_rt_rp_satzd204b a3 b3 (l_e_st_eq_landau_n_rt_rp_r_4r204_t1 s b3 b3is n1) c3 d3 (l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_ts s t) r (l_e_st_eq_landau_n_rt_rp_td b3 c3) a3 (l_e_st_eq_landau_n_rt_rp_r_tict s t b3 c3 b3is c3it) a3ir i) (l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_ts s u) r (l_e_st_eq_landau_n_rt_rp_td b3 d3) a3 (l_e_st_eq_landau_n_rt_rp_r_tict s u b3 d3 b3is d3iu) a3ir j) : l_e_st_eq_landau_n_rt_rp_eq c3 d3).
-
-(* constant 4562 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa3:l_e_st_eq_landau_n_rt_rp_dif.λb3:l_e_st_eq_landau_n_rt_rp_dif.λc3:l_e_st_eq_landau_n_rt_rp_dif.λd3:l_e_st_eq_landau_n_rt_rp_dif.λa3ir:l_e_st_eq_landau_n_rt_rp_r_inn a3 (l_e_st_eq_landau_n_rt_rp_r_class r).λb3is:l_e_st_eq_landau_n_rt_rp_r_inn b3 (l_e_st_eq_landau_n_rt_rp_r_class s).λc3it:l_e_st_eq_landau_n_rt_rp_r_inn c3 (l_e_st_eq_landau_n_rt_rp_r_class t).λd3iu:l_e_st_eq_landau_n_rt_rp_r_inn d3 (l_e_st_eq_landau_n_rt_rp_r_class u).λn1:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s t) r.λj:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s u) r.(l_e_st_eq_landau_n_rt_rp_r_isin t u c3 d3 c3it d3iu (l_e_st_eq_landau_n_rt_rp_r_4r204_t2 r s t u a3 b3 c3 d3 a3ir b3is c3it d3iu n1 i j) : l_e_st_eq_landau_n_rt_rp_r_is t u).
-
-(* constant 4563 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz204b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r.λj:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s y) r.(l_e_st_eq_landau_n_rt_rp_r_realapp4 r s x y (l_e_st_eq_landau_n_rt_rp_r_is x y) (λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_dif.λv:l_e_st_eq_landau_n_rt_rp_dif.λw:l_e_st_eq_landau_n_rt_rp_dif.λzi:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class r).λui:l_e_st_eq_landau_n_rt_rp_r_inn u (l_e_st_eq_landau_n_rt_rp_r_class s).λvi:l_e_st_eq_landau_n_rt_rp_r_inn v (l_e_st_eq_landau_n_rt_rp_r_class x).λwi:l_e_st_eq_landau_n_rt_rp_r_inn w (l_e_st_eq_landau_n_rt_rp_r_class y).l_e_st_eq_landau_n_rt_rp_r_4r204_t3 r s x y z u v w zi ui vi wi n i j) : l_e_st_eq_landau_n_rt_rp_r_is x y).
-
-(* constant 4564 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn1:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_satzd204a a1 b1 (l_e_st_eq_landau_n_rt_rp_r_4r204_t1 s b1 b1is n1) : l_some l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b1 x) a1)).
-
-(* constant 4565 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_ar ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn1:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λa:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b1 a) a1.(l_e_st_eq_landau_n_rt_rp_r_realof a : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4566 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn1:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λa:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b1 a) a1.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_4r204_ar r s a1 b1 a1ir b1is n1 a e)) r (l_e_st_eq_landau_n_rt_rp_td b1 a) a1 (l_e_st_eq_landau_n_rt_rp_r_tict s (l_e_st_eq_landau_n_rt_rp_r_4r204_ar r s a1 b1 a1ir b1is n1 a e) b1 a b1is (l_e_st_eq_landau_n_rt_rp_r_innclass a)) a1ir e : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_4r204_ar r s a1 b1 a1ir b1is n1 a e)) r).
-
-(* constant 4567 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn1:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λa:l_e_st_eq_landau_n_rt_rp_dif.λe:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b1 a) a1.(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r) (l_e_st_eq_landau_n_rt_rp_r_4r204_ar r s a1 b1 a1ir b1is n1 a e) (l_e_st_eq_landau_n_rt_rp_r_4r204_t5 r s a1 b1 a1ir b1is n1 a e) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r)).
-
-(* constant 4568 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λn1:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b1 x) a1) (l_e_st_eq_landau_n_rt_rp_r_4r204_t4 r s a1 b1 a1ir b1is n1) (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b1 x) a1.l_e_st_eq_landau_n_rt_rp_r_4r204_t6 r s a1 b1 a1ir b1is n1 x t) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r)).
-
-(* constant 4569 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz204a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_4r204_t7 r s x y t u n) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r)).
-
-(* constant 4570 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz204 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_onei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r.λu:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s y) r.l_e_st_eq_landau_n_rt_rp_r_satz204b r s n x y t u) (l_e_st_eq_landau_n_rt_rp_r_satz204a r s n) : l_e_st_eq_landau_n_rt_rp_r_one (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r)).
-
-(* constant 4571 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ov ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_ind l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r) (l_e_st_eq_landau_n_rt_rp_r_satz204 r s n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4572 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz204c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_oneax l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r) (l_e_st_eq_landau_n_rt_rp_r_satz204 r s n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) r).
-
-(* constant 4573 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz204d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) r (l_e_st_eq_landau_n_rt_rp_r_satz204c r s n) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_ov r s n))).
-
-(* constant 4574 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz204e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ov r s n) s) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) r (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_ov r s n) s) (l_e_st_eq_landau_n_rt_rp_r_satz204c r s n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ov r s n) s) r).
-
-(* constant 4575 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz204f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ov r s n) s) r (l_e_st_eq_landau_n_rt_rp_r_satz204e r s n) : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ov r s n) s)).
-
-(* constant 4576 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz204g ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λx:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s x) r.(l_e_st_eq_landau_n_rt_rp_r_satz204b r s n x (l_e_st_eq_landau_n_rt_rp_r_ov r s n) i (l_e_st_eq_landau_n_rt_rp_r_satz204c r s n) : l_e_st_eq_landau_n_rt_rp_r_is x (l_e_st_eq_landau_n_rt_rp_r_ov r s n)).
-
-(* constant 4577 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_ros ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_ov r s n : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4578 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_ispos r (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)) (l_e_st_eq_landau_n_rt_rp_r_satz204d r s n) p : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))).
-
-(* constant 4579 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_and_th1 (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)) (l_e_st_eq_landau_n_rt_rp_r_pnotn s q) : l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)))).
-
-(* constant 4580 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_ore1 (l_and (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))) (l_e_st_eq_landau_n_rt_rp_r_satz196g s (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n) (l_e_st_eq_landau_n_rt_rp_r_4r204_t8 r s n p)) (l_e_st_eq_landau_n_rt_rp_r_4r204_t9 r s n p q) : l_and (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))).
-
-(* constant 4581 *)
-definition l_e_st_eq_landau_n_rt_rp_r_posovpp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) (l_e_st_eq_landau_n_rt_rp_r_4r204_t10 r s n p q) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ov r s n)).
-
-(* constant 4582 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λm:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_and_th1 (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)) (l_e_st_eq_landau_n_rt_rp_r_nnotp s m) : l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)))).
-
-(* constant 4583 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λm:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_ore2 (l_and (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))) (l_e_st_eq_landau_n_rt_rp_r_satz196g s (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n) (l_e_st_eq_landau_n_rt_rp_r_4r204_t8 r s n p)) (l_e_st_eq_landau_n_rt_rp_r_4r204_t11 r s n p m) : l_and (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))).
-
-(* constant 4584 *)
-definition l_e_st_eq_landau_n_rt_rp_r_negovpn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λm:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) (l_e_st_eq_landau_n_rt_rp_r_4r204_t12 r s n p m) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ov r s n)).
-
-(* constant 4585 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t13 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λm:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_isneg r (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)) (l_e_st_eq_landau_n_rt_rp_r_satz204d r s n) m : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))).
-
-(* constant 4586 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t14 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λm:l_e_st_eq_landau_n_rt_rp_r_neg r.λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_and_th1 (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)) (l_e_st_eq_landau_n_rt_rp_r_pnotn s p) : l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)))).
-
-(* constant 4587 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t15 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λm:l_e_st_eq_landau_n_rt_rp_r_neg r.λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_ore1 (l_and (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))) (l_e_st_eq_landau_n_rt_rp_r_satz196h s (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n) (l_e_st_eq_landau_n_rt_rp_r_4r204_t13 r s n m)) (l_e_st_eq_landau_n_rt_rp_r_4r204_t14 r s n m p) : l_and (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))).
-
-(* constant 4588 *)
-definition l_e_st_eq_landau_n_rt_rp_r_negovnp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λm:l_e_st_eq_landau_n_rt_rp_r_neg r.λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) (l_e_st_eq_landau_n_rt_rp_r_4r204_t15 r s n m p) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ov r s n)).
-
-(* constant 4589 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t16 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λm:l_e_st_eq_landau_n_rt_rp_r_neg r.λl:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_and_th1 (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)) (l_e_st_eq_landau_n_rt_rp_r_nnotp s l) : l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n)))).
-
-(* constant 4590 *)
-definition l_e_st_eq_landau_n_rt_rp_r_4r204_t17 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λm:l_e_st_eq_landau_n_rt_rp_r_neg r.λl:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_ore2 (l_and (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))) (l_e_st_eq_landau_n_rt_rp_r_satz196h s (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n) (l_e_st_eq_landau_n_rt_rp_r_4r204_t13 r s n m)) (l_e_st_eq_landau_n_rt_rp_r_4r204_t16 r s n m l) : l_and (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_4r204_ros r s n))).
-
-(* constant 4591 *)
-definition l_e_st_eq_landau_n_rt_rp_r_posovnn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λm:l_e_st_eq_landau_n_rt_rp_r_neg r.λl:l_e_st_eq_landau_n_rt_rp_r_neg s.(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) (l_e_st_eq_landau_n_rt_rp_r_4r204_t17 r s n m l) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ov r s n)).
-
-(* constant 4592 *)
-definition l_e_st_eq_landau_n_rt_rp_r_morerpep ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r0 s0.(l_e_st_eq_landau_n_rt_rp_r_morein (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp s0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp s0)) (l_e_st_eq_landau_n_rt_rp_morerpepd r0 s0 m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)).
-
-(* constant 4593 *)
-definition l_e_st_eq_landau_n_rt_rp_r_morerpip ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).(l_e_st_eq_landau_n_rt_rp_morerpipd r0 s0 (l_e_st_eq_landau_n_rt_rp_r_moreex (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp s0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp s0)) m) : l_e_st_eq_landau_n_rt_rp_more r0 s0).
-
-(* constant 4594 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessrpep ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_less r0 s0.(l_e_st_eq_landau_n_rt_rp_r_lemma1 (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_morerpep s0 r0 (l_e_st_eq_landau_n_rt_rp_satz122 r0 s0 l)) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)).
-
-(* constant 4595 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessrpip ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λl:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).(l_e_st_eq_landau_n_rt_rp_satz121 s0 r0 (l_e_st_eq_landau_n_rt_rp_r_morerpip s0 r0 (l_e_st_eq_landau_n_rt_rp_r_lemma2 (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) l)) : l_e_st_eq_landau_n_rt_rp_less r0 s0).
-
-(* constant 4596 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr5_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_ismore12 r (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp r p)) s (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp s q)) (l_e_st_eq_landau_n_rt_rp_r_isprp1 r p) (l_e_st_eq_landau_n_rt_rp_r_isprp1 s q) m : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp r p)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp s q))).
-
-(* constant 4597 *)
-definition l_e_st_eq_landau_n_rt_rp_r_moreperp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λm:l_e_st_eq_landau_n_rt_rp_r_more r s.(l_e_st_eq_landau_n_rt_rp_r_morerpip (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s q) (l_e_st_eq_landau_n_rt_rp_r_ivr5_t1 r s p q m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s q)).
-
-(* constant 4598 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr5_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s q).(l_e_st_eq_landau_n_rt_rp_r_morerpep (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s q) m : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp r p)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp s q))).
-
-(* constant 4599 *)
-definition l_e_st_eq_landau_n_rt_rp_r_morepirp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λm:l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s q).(l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp r p)) r (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_rpofp s q)) s (l_e_st_eq_landau_n_rt_rp_r_isprp2 r p) (l_e_st_eq_landau_n_rt_rp_r_isprp2 s q) (l_e_st_eq_landau_n_rt_rp_r_ivr5_t2 r s p q m) : l_e_st_eq_landau_n_rt_rp_r_more r s).
-
-(* constant 4600 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lessperp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_satz121 (l_e_st_eq_landau_n_rt_rp_r_rpofp s q) (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_moreperp s r q p (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l)) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s q)).
-
-(* constant 4601 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lesspirp ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.λq:l_e_st_eq_landau_n_rt_rp_r_pos s.λl:l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s q).(l_e_st_eq_landau_n_rt_rp_r_lemma1 s r (l_e_st_eq_landau_n_rt_rp_r_morepirp s r q p (l_e_st_eq_landau_n_rt_rp_satz122 (l_e_st_eq_landau_n_rt_rp_r_rpofp r p) (l_e_st_eq_landau_n_rt_rp_r_rpofp s q) l)) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4602 *)
-definition l_e_st_eq_landau_n_rt_rp_r_s01 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_setof l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_lessis x r) : l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4603 *)
-definition l_e_st_eq_landau_n_rt_rp_r_s02 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_setof l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_more x r) : l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4604 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s01 r)).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_lessis s r) (l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s01 r)) n (λt:l_e_st_eq_landau_n_rt_rp_r_lessis s r.l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_lessis x r) s t) : l_not (l_e_st_eq_landau_n_rt_rp_r_lessis s r)).
-
-(* constant 4605 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s01 r)).(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_more x r) s (l_e_st_eq_landau_n_rt_rp_r_satz167k s r (l_e_st_eq_landau_n_rt_rp_r_5r205_t1 r s n)) : l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s02 r)).
-
-(* constant 4606 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb00 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_not (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s01 r)).l_e_st_eq_landau_n_rt_rp_r_5r205_t2 r x t : l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s01 r)) (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s02 r)))).
-
-(* constant 4607 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_lessis x r) r (l_e_st_eq_landau_n_rt_rp_r_lessisi2 r r (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) : l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_s01 r)).
-
-(* constant 4608 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb01a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_nonemptyi l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_s01 r) r (l_e_st_eq_landau_n_rt_rp_r_5r205_t3 r) : l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_s01 r)).
-
-(* constant 4609 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_ismore2 (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_0) r (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl02 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_satz188k l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0 r (l_e_st_eq_landau_n_rt_rp_r_satz169a l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_pos1)) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_1rl) r).
-
-(* constant 4610 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_more x r) (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_5r205_t4 r) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_s02 r)).
-
-(* constant 4611 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb01b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_nonemptyi l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_s02 r) (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_5r205_t5 r) : l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_s02 r)).
-
-(* constant 4612 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s01 r).λt:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_in t (l_e_st_eq_landau_n_rt_rp_r_s02 r).(l_e_st_eq_landau_n_rt_rp_r_satz172a s r t (l_e_st_estie l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_lessis x r) s i) (l_e_st_eq_landau_n_rt_rp_r_lemma1 t r (l_e_st_estie l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_more x r) t j)) : l_e_st_eq_landau_n_rt_rp_r_less s t).
-
-(* constant 4613 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb02 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s01 r).λy:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_in y (l_e_st_eq_landau_n_rt_rp_r_s02 r).l_e_st_eq_landau_n_rt_rp_r_5r205_t6 r x t y u : l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s01 r).l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y (l_e_st_eq_landau_n_rt_rp_r_s02 r).l_e_st_eq_landau_n_rt_rp_r_less x y))).
-
-(* constant 4614 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb03a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s r.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_lessis x r) s (l_e_st_eq_landau_n_rt_rp_r_lessisi1 s r l) : l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s01 r)).
-
-(* constant 4615 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb03b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s r.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_more x r) s m : l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s02 r)).
-
-(* constant 4616 *)
-definition l_e_st_eq_landau_n_rt_rp_r_s11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_setof l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_less x r) : l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4617 *)
-definition l_e_st_eq_landau_n_rt_rp_r_s12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_setof l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_moreis x r) : l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4618 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s11 r)).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_less s r) (l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s11 r)) n (λt:l_e_st_eq_landau_n_rt_rp_r_less s r.l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_less x r) s t) : l_not (l_e_st_eq_landau_n_rt_rp_r_less s r)).
-
-(* constant 4619 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s11 r)).(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_moreis x r) s (l_e_st_eq_landau_n_rt_rp_r_satz167f s r (l_e_st_eq_landau_n_rt_rp_r_5r205_t7 r s n)) : l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s12 r)).
-
-(* constant 4620 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_not (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s11 r)).l_e_st_eq_landau_n_rt_rp_r_5r205_t8 r x t : l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s11 r)) (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s12 r)))).
-
-(* constant 4621 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_isless2 (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_0) r (l_e_st_eq_landau_n_rt_rp_r_mn r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl02 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_satz188m (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) l_e_st_eq_landau_n_rt_rp_r_0 r (l_e_st_eq_landau_n_rt_rp_r_satz169c (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_satz176a l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_pos1))) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_mn r l_e_st_eq_landau_n_rt_rp_r_1rl) r).
-
-(* constant 4622 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_less x r) (l_e_st_eq_landau_n_rt_rp_r_mn r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_5r205_t9 r) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_mn r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_s11 r)).
-
-(* constant 4623 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb11a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_nonemptyi l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_s11 r) (l_e_st_eq_landau_n_rt_rp_r_mn r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_5r205_t10 r) : l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_s11 r)).
-
-(* constant 4624 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_moreis x r) r (l_e_st_eq_landau_n_rt_rp_r_moreisi2 r r (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real r)) : l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_s12 r)).
-
-(* constant 4625 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb11b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_nonemptyi l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_s12 r) r (l_e_st_eq_landau_n_rt_rp_r_5r205_t11 r) : l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_s12 r)).
-
-(* constant 4626 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s11 r).λt:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_in t (l_e_st_eq_landau_n_rt_rp_r_s12 r).(l_e_st_eq_landau_n_rt_rp_r_satz172b s r t (l_e_st_estie l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_less x r) s i) (l_e_st_eq_landau_n_rt_rp_r_satz168a t r (l_e_st_estie l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_moreis x r) t j)) : l_e_st_eq_landau_n_rt_rp_r_less s t).
-
-(* constant 4627 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s11 r).λy:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_in y (l_e_st_eq_landau_n_rt_rp_r_s12 r).l_e_st_eq_landau_n_rt_rp_r_5r205_t12 r x t y u : l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_s11 r).l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y (l_e_st_eq_landau_n_rt_rp_r_s12 r).l_e_st_eq_landau_n_rt_rp_r_less x y))).
-
-(* constant 4628 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb13a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s r.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_less x r) s l : l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s11 r)).
-
-(* constant 4629 *)
-definition l_e_st_eq_landau_n_rt_rp_r_vb13b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s r.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_moreis x r) s (l_e_st_eq_landau_n_rt_rp_r_moreisi1 s r m) : l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_s12 r)).
-
-(* constant 4630 *)
-definition l_e_st_eq_landau_n_rt_rp_r_2rl ≝ (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4631 *)
-definition l_e_st_eq_landau_n_rt_rp_r_pos2 ≝ (l_e_st_eq_landau_n_rt_rp_r_pospl l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_pos1 l_e_st_eq_landau_n_rt_rp_r_pos1 : l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_2rl).
-
-(* constant 4632 *)
-definition l_e_st_eq_landau_n_rt_rp_r_half ≝ (l_e_st_eq_landau_n_rt_rp_r_ov l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_2rl (l_e_st_eq_landau_n_rt_rp_r_pnot0 l_e_st_eq_landau_n_rt_rp_r_2rl l_e_st_eq_landau_n_rt_rp_r_pos2) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4633 *)
-definition l_e_st_eq_landau_n_rt_rp_r_poshalf ≝ (l_e_st_eq_landau_n_rt_rp_r_posovpp l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_2rl (l_e_st_eq_landau_n_rt_rp_r_pnot0 l_e_st_eq_landau_n_rt_rp_r_2rl l_e_st_eq_landau_n_rt_rp_r_pos2) l_e_st_eq_landau_n_rt_rp_r_pos1 l_e_st_eq_landau_n_rt_rp_r_pos2 : l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_half).
-
-(* constant 4634 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr5_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl r r) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_2rl r) (l_e_st_eq_landau_n_rt_rp_r_ispl12 r (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r) r (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_satz195c r) (l_e_st_eq_landau_n_rt_rp_r_satz195c r)) (l_e_st_eq_landau_n_rt_rp_r_distpt1 l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl r r) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_2rl r)).
-
-(* constant 4635 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr5_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r r)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_2rl r)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half l_e_st_eq_landau_n_rt_rp_r_2rl) r) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl r) r (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_pl r r) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_2rl r) l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_ivr5_t3 r)) (l_e_st_eq_landau_n_rt_rp_r_assts2 l_e_st_eq_landau_n_rt_rp_r_half l_e_st_eq_landau_n_rt_rp_r_2rl r) (l_e_st_eq_landau_n_rt_rp_r_ists1 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half l_e_st_eq_landau_n_rt_rp_r_2rl) l_e_st_eq_landau_n_rt_rp_r_1rl r (l_e_st_eq_landau_n_rt_rp_r_satz204e l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_2rl (l_e_st_eq_landau_n_rt_rp_r_pnot0 l_e_st_eq_landau_n_rt_rp_r_2rl l_e_st_eq_landau_n_rt_rp_r_pos2))) (l_e_st_eq_landau_n_rt_rp_r_satz195b r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r r)) r).
-
-(* constant 4636 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr5_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_satz203k (l_e_st_eq_landau_n_rt_rp_r_pl r r) (l_e_st_eq_landau_n_rt_rp_r_pl r s) l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_satz188m r s r l) l_e_st_eq_landau_n_rt_rp_r_poshalf : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r r)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r s))).
-
-(* constant 4637 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_isless1 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r r)) r (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_ivr5_t4 r) (l_e_st_eq_landau_n_rt_rp_r_ivr5_t5 r s l) : l_e_st_eq_landau_n_rt_rp_r_less r (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r s))).
-
-(* constant 4638 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr5_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_satz203k (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl s s) l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_satz188f r s s l) l_e_st_eq_landau_n_rt_rp_r_poshalf : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl s s))).
-
-(* constant 4639 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_isless2 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl s s)) s (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (l_e_st_eq_landau_n_rt_rp_r_ivr5_t4 s) (l_e_st_eq_landau_n_rt_rp_r_ivr5_t6 r s l) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl r s)) s).
-
-(* constant 4640 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_satz169b s (l_e_st_eq_landau_n_rt_rp_r_trmore s r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l) (l_e_st_eq_landau_n_rt_rp_r_satz169a r p)) : l_e_st_eq_landau_n_rt_rp_r_pos s).
-
-(* constant 4641 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_less x r.l_e_st_eq_landau_n_rt_rp_r_in x s1) : Prop).
-
-(* constant 4642 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_more x r.l_e_st_eq_landau_n_rt_rp_r_in x s2) : Prop).
-
-(* constant 4643 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_and (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 s1 s2 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 s1 s2 r) : Prop).
-
-(* constant 4644 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_mxy ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.λl:l_e_st_eq_landau_n_rt_rp_r_less x y.(l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_half (l_e_st_eq_landau_n_rt_rp_r_pl x y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4645 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t13 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.λl:l_e_st_eq_landau_n_rt_rp_r_less x y.(l_e_st_eq_landau_n_rt_rp_r_lemma2 x (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_lemma3 x y l) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) x).
-
-(* constant 4646 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t14 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.λl:l_e_st_eq_landau_n_rt_rp_r_less x y.(l_e_st_eq_landau_n_rt_rp_r_lemma4 x y l : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) y).
-
-(* constant 4647 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t15 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.λl:l_e_st_eq_landau_n_rt_rp_r_less x y.(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 s1 s2 y) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 s1 s2 y) py (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_t14 s1 s2 p0 p1a p1b p2 x y px py l) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) s1).
-
-(* constant 4648 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t16 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.λl:l_e_st_eq_landau_n_rt_rp_r_less x y.(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 s1 s2 x) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 s1 s2 x) px (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_t13 s1 s2 p0 p1a p1b p2 x y px py l) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) s2).
-
-(* constant 4649 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t17 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.λl:l_e_st_eq_landau_n_rt_rp_r_less x y.(p2 (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_t15 s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_t16 s1 s2 p0 p1a p1b p2 x y px py l) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l)).
-
-(* constant 4650 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t18 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.λl:l_e_st_eq_landau_n_rt_rp_r_less x y.(l_ec3e31 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l)) (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l)) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l)) (l_e_st_eq_landau_n_rt_rp_r_satz167b (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l) (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l)) (l_e_st_eq_landau_n_rt_rp_r_5r205_t17 s1 s2 p0 p1a p1b p2 x y px py l) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_mxy s1 s2 p0 p1a p1b p2 x y px py l)) : l_con).
-
-(* constant 4651 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t19 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.(λt:l_e_st_eq_landau_n_rt_rp_r_less x y.l_e_st_eq_landau_n_rt_rp_r_5r205_t18 s1 s2 p0 p1a p1b p2 x y px py t : l_not (l_e_st_eq_landau_n_rt_rp_r_less x y)).
-
-(* constant 4652 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t20 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.(λt:l_e_st_eq_landau_n_rt_rp_r_more x y.l_e_st_eq_landau_n_rt_rp_r_5r205_t18 s1 s2 p0 p1a p1b p2 y x py px (l_e_st_eq_landau_n_rt_rp_r_lemma1 x y t) : l_not (l_e_st_eq_landau_n_rt_rp_r_more x y)).
-
-(* constant 4653 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t21 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λpx:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λpy:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.(l_or3e1 (l_e_st_eq_landau_n_rt_rp_r_is x y) (l_e_st_eq_landau_n_rt_rp_r_more x y) (l_e_st_eq_landau_n_rt_rp_r_less x y) (l_e_st_eq_landau_n_rt_rp_r_satz167a x y) (l_e_st_eq_landau_n_rt_rp_r_5r205_t20 s1 s2 p0 p1a p1b p2 x y px py) (l_e_st_eq_landau_n_rt_rp_r_5r205_t19 s1 s2 p0 p1a p1b p2 x y px py) : l_e_st_eq_landau_n_rt_rp_r_is x y).
-
-(* constant 4654 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t22 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).(λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x.λu:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 y.l_e_st_eq_landau_n_rt_rp_r_5r205_t21 s1 s2 p0 p1a p1b p2 x y t u : l_e_amone l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4655 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t23 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1) a : l_e_st_eq_landau_n_rt_rp_r_pos r).
-
-(* constant 4656 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t24 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1) a : l_e_st_eq_landau_n_rt_rp_r_in r s1).
-
-(* constant 4657 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_setof l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp x) s1) : l_e_st_set l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4658 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_setof l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp x) s2) : l_e_st_set l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4659 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t25 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λr0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) s1.(l_e_st_estii l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp x) s1) r0 i : l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4660 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t26 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λr0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a).(l_e_st_estie l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp x) s1) r0 i : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) s1).
-
-(* constant 4661 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t27 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λr0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) s2.(l_e_st_estii l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp x) s2) r0 i : l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4662 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t28 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λr0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a).(l_e_st_estie l_e_st_eq_landau_n_rt_cut (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp x) s2) r0 i : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) s2).
-
-(* constant 4663 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t29 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λr0:l_e_st_eq_landau_n_rt_cut.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) s1) (l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) s2) (l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a)) (l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a)) (p0 (l_e_st_eq_landau_n_rt_rp_r_pofrp r0)) (λt:l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) s1.l_e_st_eq_landau_n_rt_rp_r_5r205_t25 s1 s2 p0 p1a p1b p2 case1 r a r0 t) (λt:l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) s2.l_e_st_eq_landau_n_rt_rp_r_5r205_t27 s1 s2 p0 p1a p1b p2 case1 r a r0 t) : l_or (l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a)) (l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a))).
-
-(* constant 4664 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_pr1 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_eq_landau_n_rt_rp_r_rpofp r (l_e_st_eq_landau_n_rt_rp_r_5r205_t23 s1 s2 p0 p1a p1b p2 case1 r a) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4665 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t30 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s1) r (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_pr1 s1 s2 p0 p1a p1b p2 case1 r a)) (l_e_st_eq_landau_n_rt_rp_r_5r205_t24 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_isprp1 r (l_e_st_eq_landau_n_rt_rp_r_5r205_t23 s1 s2 p0 p1a p1b p2 case1 r a)) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_pr1 s1 s2 p0 p1a p1b p2 case1 r a)) s1).
-
-(* constant 4666 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t31 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_nonemptyi l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_pr1 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_t25 s1 s2 p0 p1a p1b p2 case1 r a (l_e_st_eq_landau_n_rt_rp_r_5r205_pr1 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_t30 s1 s2 p0 p1a p1b p2 case1 r a)) : l_e_st_nonempty l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4667 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t32 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in s s2.(p2 r (l_e_st_eq_landau_n_rt_rp_r_5r205_t24 s1 s2 p0 p1a p1b p2 case1 r a) s i : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4668 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t33 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in s s2.(l_e_st_eq_landau_n_rt_rp_r_lemma5 r s (l_e_st_eq_landau_n_rt_rp_r_5r205_t32 s1 s2 p0 p1a p1b p2 case1 r a s i) (l_e_st_eq_landau_n_rt_rp_r_5r205_t23 s1 s2 p0 p1a p1b p2 case1 r a) : l_e_st_eq_landau_n_rt_rp_r_pos s).
-
-(* constant 4669 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_ps1 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in s s2.(l_e_st_eq_landau_n_rt_rp_r_rpofp s (l_e_st_eq_landau_n_rt_rp_r_5r205_t33 s1 s2 p0 p1a p1b p2 case1 r a s i) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4670 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t34 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in s s2.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s2) s (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_ps1 s1 s2 p0 p1a p1b p2 case1 r a s i)) i (l_e_st_eq_landau_n_rt_rp_r_isprp1 s (l_e_st_eq_landau_n_rt_rp_r_5r205_t33 s1 s2 p0 p1a p1b p2 case1 r a s i)) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_ps1 s1 s2 p0 p1a p1b p2 case1 r a s i)) s2).
-
-(* constant 4671 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t35 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in s s2.(l_e_st_nonemptyi l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_ps1 s1 s2 p0 p1a p1b p2 case1 r a s i) (l_e_st_eq_landau_n_rt_rp_r_5r205_t27 s1 s2 p0 p1a p1b p2 case1 r a (l_e_st_eq_landau_n_rt_rp_r_5r205_ps1 s1 s2 p0 p1a p1b p2 case1 r a s i) (l_e_st_eq_landau_n_rt_rp_r_5r205_t34 s1 s2 p0 p1a p1b p2 case1 r a s i)) : l_e_st_nonempty l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4672 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t36 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_nonemptyapp l_e_st_eq_landau_n_rt_rp_r_real s2 p1b (l_e_st_nonempty l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a)) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_in x s2.l_e_st_eq_landau_n_rt_rp_r_5r205_t35 s1 s2 p0 p1a p1b p2 case1 r a x t) : l_e_st_nonempty l_e_st_eq_landau_n_rt_cut (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4673 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t37 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λr0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a).λs0:l_e_st_eq_landau_n_rt_cut.λj:l_e_st_eq_landau_n_rt_rp_in s0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a).(p2 (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_5r205_t26 s1 s2 p0 p1a p1b p2 case1 r a r0 i) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_st_eq_landau_n_rt_rp_r_5r205_t28 s1 s2 p0 p1a p1b p2 case1 r a s0 j) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)).
-
-(* constant 4674 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t38 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λr0:l_e_st_eq_landau_n_rt_cut.λi:l_e_st_eq_landau_n_rt_rp_in r0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a).λs0:l_e_st_eq_landau_n_rt_cut.λj:l_e_st_eq_landau_n_rt_rp_in s0 (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a).(l_e_st_eq_landau_n_rt_rp_r_lessrpip r0 s0 (l_e_st_eq_landau_n_rt_rp_r_5r205_t37 s1 s2 p0 p1a p1b p2 case1 r a r0 i s0 j) : l_e_st_eq_landau_n_rt_rp_less r0 s0).
-
-(* constant 4675 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_stc ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_eq_landau_n_rt_rp_schnitt (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a) (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_5r205_t29 s1 s2 p0 p1a p1b p2 case1 r a x) (l_e_st_eq_landau_n_rt_rp_r_5r205_t31 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_t36 s1 s2 p0 p1a p1b p2 case1 r a) (λx:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a).λy:l_e_st_eq_landau_n_rt_cut.λu:l_e_st_eq_landau_n_rt_rp_in y (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a).l_e_st_eq_landau_n_rt_rp_r_5r205_t38 s1 s2 p0 p1a p1b p2 case1 r a x t y u) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4676 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t39 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_eq_landau_n_rt_rp_satzp205a (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a) (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_5r205_t29 s1 s2 p0 p1a p1b p2 case1 r a x) (l_e_st_eq_landau_n_rt_rp_r_5r205_t31 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_t36 s1 s2 p0 p1a p1b p2 case1 r a) (λx:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a).λy:l_e_st_eq_landau_n_rt_cut.λu:l_e_st_eq_landau_n_rt_rp_in y (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a).l_e_st_eq_landau_n_rt_rp_r_5r205_t38 s1 s2 p0 p1a p1b p2 case1 r a x t y u) : l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_less x (l_e_st_eq_landau_n_rt_rp_r_5r205_stc s1 s2 p0 p1a p1b p2 case1 r a).l_e_st_eq_landau_n_rt_rp_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a))).
-
-(* constant 4677 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t40 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_eq_landau_n_rt_rp_satzp205b (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a) (λx:l_e_st_eq_landau_n_rt_cut.l_e_st_eq_landau_n_rt_rp_r_5r205_t29 s1 s2 p0 p1a p1b p2 case1 r a x) (l_e_st_eq_landau_n_rt_rp_r_5r205_t31 s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_t36 s1 s2 p0 p1a p1b p2 case1 r a) (λx:l_e_st_eq_landau_n_rt_cut.λt:l_e_st_eq_landau_n_rt_rp_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a).λy:l_e_st_eq_landau_n_rt_cut.λu:l_e_st_eq_landau_n_rt_rp_in y (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a).l_e_st_eq_landau_n_rt_rp_r_5r205_t38 s1 s2 p0 p1a p1b p2 case1 r a x t y u) : l_e_st_eq_landau_n_rt_rp_all (λx:l_e_st_eq_landau_n_rt_cut.∀t:l_e_st_eq_landau_n_rt_rp_more x (l_e_st_eq_landau_n_rt_rp_r_5r205_stc s1 s2 p0 p1a p1b p2 case1 r a).l_e_st_eq_landau_n_rt_rp_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a))).
-
-(* constant 4678 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_stp ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_stc s1 s2 p0 p1a p1b p2 case1 r a) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4679 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t41 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_e_st_eq_landau_n_rt_rp_r_posi (l_e_st_eq_landau_n_rt_rp_r_5r205_stc s1 s2 p0 p1a p1b p2 case1 r a) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4680 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_ps2 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_r_rpofp s p : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4681 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t42 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_r_lessrpip (l_e_st_eq_landau_n_rt_rp_r_5r205_ps2 s1 s2 p0 p1a p1b p2 case1 r a s l p) (l_e_st_eq_landau_n_rt_rp_r_5r205_stc s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_isless1 s (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_ps2 s1 s2 p0 p1a p1b p2 case1 r a s l p)) (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_isprp1 s p) l) : l_e_st_eq_landau_n_rt_rp_less (l_e_st_eq_landau_n_rt_rp_r_5r205_ps2 s1 s2 p0 p1a p1b p2 case1 r a s l p) (l_e_st_eq_landau_n_rt_rp_r_5r205_stc s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4682 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t43 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_st_eq_landau_n_rt_rp_r_5r205_t39 s1 s2 p0 p1a p1b p2 case1 r a (l_e_st_eq_landau_n_rt_rp_r_5r205_ps2 s1 s2 p0 p1a p1b p2 case1 r a s l p) (l_e_st_eq_landau_n_rt_rp_r_5r205_t42 s1 s2 p0 p1a p1b p2 case1 r a s l p) : l_e_st_eq_landau_n_rt_rp_in (l_e_st_eq_landau_n_rt_rp_r_5r205_ps2 s1 s2 p0 p1a p1b p2 case1 r a s l p) (l_e_st_eq_landau_n_rt_rp_r_5r205_sc1 s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4683 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t44 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).λp:l_e_st_eq_landau_n_rt_rp_r_pos s.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_ps2 s1 s2 p0 p1a p1b p2 case1 r a s l p)) s (l_e_st_eq_landau_n_rt_rp_r_5r205_t26 s1 s2 p0 p1a p1b p2 case1 r a (l_e_st_eq_landau_n_rt_rp_r_5r205_ps2 s1 s2 p0 p1a p1b p2 case1 r a s l p) (l_e_st_eq_landau_n_rt_rp_r_5r205_t43 s1 s2 p0 p1a p1b p2 case1 r a s l p)) (l_e_st_eq_landau_n_rt_rp_r_isprp2 s p) : l_e_st_eq_landau_n_rt_rp_r_in s s1).
-
-(* constant 4684 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t45 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_pos s).λi:l_e_st_eq_landau_n_rt_rp_r_in s s2.(p2 r (l_e_st_eq_landau_n_rt_rp_r_5r205_t24 s1 s2 p0 p1a p1b p2 case1 r a) s i : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4685 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t46 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_pos s).λi:l_e_st_eq_landau_n_rt_rp_r_in s s2.(n (l_e_st_eq_landau_n_rt_rp_r_lemma5 r s (l_e_st_eq_landau_n_rt_rp_r_5r205_t45 s1 s2 p0 p1a p1b p2 case1 r a s l n i) (l_e_st_eq_landau_n_rt_rp_r_5r205_t23 s1 s2 p0 p1a p1b p2 case1 r a)) : l_con).
-
-(* constant 4686 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t47 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_pos s).(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_in s s1) (l_e_st_eq_landau_n_rt_rp_r_in s s2) (p0 s) (λt:l_e_st_eq_landau_n_rt_rp_r_in s s2.l_e_st_eq_landau_n_rt_rp_r_5r205_t46 s1 s2 p0 p1a p1b p2 case1 r a s l n t) : l_e_st_eq_landau_n_rt_rp_r_in s s1).
-
-(* constant 4687 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t48 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_pos s) (l_e_st_eq_landau_n_rt_rp_r_in s s1) (λt:l_e_st_eq_landau_n_rt_rp_r_pos s.l_e_st_eq_landau_n_rt_rp_r_5r205_t44 s1 s2 p0 p1a p1b p2 case1 r a s l t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_pos s).l_e_st_eq_landau_n_rt_rp_r_5r205_t47 s1 s2 p0 p1a p1b p2 case1 r a s l t) : l_e_st_eq_landau_n_rt_rp_r_in s s1).
-
-(* constant 4688 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t49 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).(l_e_st_eq_landau_n_rt_rp_r_lemma5 (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a) s (l_e_st_eq_landau_n_rt_rp_r_lemma1 s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a) m) (l_e_st_eq_landau_n_rt_rp_r_5r205_t41 s1 s2 p0 p1a p1b p2 case1 r a) : l_e_st_eq_landau_n_rt_rp_r_pos s).
-
-(* constant 4689 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_ps3 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).(l_e_st_eq_landau_n_rt_rp_r_rpofp s (l_e_st_eq_landau_n_rt_rp_r_5r205_t49 s1 s2 p0 p1a p1b p2 case1 r a s m) : l_e_st_eq_landau_n_rt_cut).
-
-(* constant 4690 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t50 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).(l_e_st_eq_landau_n_rt_rp_r_morerpip (l_e_st_eq_landau_n_rt_rp_r_5r205_ps3 s1 s2 p0 p1a p1b p2 case1 r a s m) (l_e_st_eq_landau_n_rt_rp_r_5r205_stc s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_ismore1 s (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_ps3 s1 s2 p0 p1a p1b p2 case1 r a s m)) (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_isprp1 s (l_e_st_eq_landau_n_rt_rp_r_5r205_t49 s1 s2 p0 p1a p1b p2 case1 r a s m)) m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_r_5r205_ps3 s1 s2 p0 p1a p1b p2 case1 r a s m) (l_e_st_eq_landau_n_rt_rp_r_5r205_stc s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4691 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t51 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).(l_e_st_eq_landau_n_rt_rp_r_5r205_t40 s1 s2 p0 p1a p1b p2 case1 r a (l_e_st_eq_landau_n_rt_rp_r_5r205_ps3 s1 s2 p0 p1a p1b p2 case1 r a s m) (l_e_st_eq_landau_n_rt_rp_r_5r205_t50 s1 s2 p0 p1a p1b p2 case1 r a s m) : l_e_st_eq_landau_n_rt_rp_in (l_e_st_eq_landau_n_rt_rp_r_5r205_ps3 s1 s2 p0 p1a p1b p2 case1 r a s m) (l_e_st_eq_landau_n_rt_rp_r_5r205_sc2 s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4692 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t52 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s2) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_r_5r205_ps3 s1 s2 p0 p1a p1b p2 case1 r a s m)) s (l_e_st_eq_landau_n_rt_rp_r_5r205_t28 s1 s2 p0 p1a p1b p2 case1 r a (l_e_st_eq_landau_n_rt_rp_r_5r205_ps3 s1 s2 p0 p1a p1b p2 case1 r a s m) (l_e_st_eq_landau_n_rt_rp_r_5r205_t51 s1 s2 p0 p1a p1b p2 case1 r a s m)) (l_e_st_eq_landau_n_rt_rp_r_isprp2 s (l_e_st_eq_landau_n_rt_rp_r_5r205_t49 s1 s2 p0 p1a p1b p2 case1 r a s m)) : l_e_st_eq_landau_n_rt_rp_r_in s s2).
-
-(* constant 4693 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t53 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_andi (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a)) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a)) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_less x (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).l_e_st_eq_landau_n_rt_rp_r_5r205_t48 s1 s2 p0 p1a p1b p2 case1 r a x t) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_more x (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a).l_e_st_eq_landau_n_rt_rp_r_5r205_t52 s1 s2 p0 p1a p1b p2 case1 r a x t) : l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a)).
-
-(* constant 4694 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t54 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1).(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x) (l_e_st_eq_landau_n_rt_rp_r_5r205_stp s1 s2 p0 p1a p1b p2 case1 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_t53 s1 s2 p0 p1a p1b p2 case1 r a) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4695 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t55 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase1:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).(l_someapp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)) case1 (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1).l_e_st_eq_landau_n_rt_rp_r_5r205_t54 s1 s2 p0 p1a p1b p2 case1 x t) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4696 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).(l_e_st_setof l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 x) s1) : l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4697 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).(l_e_st_setof l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 x) s2) : l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4698 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t56 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) s1.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 x) s1) r i : l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4699 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t57 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2).(l_e_st_estie l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 x) s1) r i : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) s1).
-
-(* constant 4700 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t58 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) s2.(l_e_st_estii l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 x) s2) r i : l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4701 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t59 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2).(l_e_st_estie l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 x) s2) r i : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) s2).
-
-(* constant 4702 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t60 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_comor (l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2)) (l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)) (l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) s1) (l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) s2) (l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2)) (l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)) (p0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (λt:l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) s1.l_e_st_eq_landau_n_rt_rp_r_5r205_t56 s1 s2 p0 p1a p1b p2 case2 r t) (λt:l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) s2.l_e_st_eq_landau_n_rt_rp_r_5r205_t58 s1 s2 p0 p1a p1b p2 case2 r t)) : l_or (l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)) (l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2))).
-
-(* constant 4703 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t61 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in r s2.(l_e_st_eq_landau_n_rt_rp_r_5r205_t58 s1 s2 p0 p1a p1b p2 case2 (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s2) r (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) i (l_e_st_eq_landau_n_rt_rp_r_satz177a r)) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4704 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t62 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in r s2.(l_e_st_nonemptyi l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_t61 s1 s2 p0 p1a p1b p2 case2 r i) : l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4705 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t63 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).(l_e_st_nonemptyapp l_e_st_eq_landau_n_rt_rp_r_real s2 p1b (l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_in x s2.l_e_st_eq_landau_n_rt_rp_r_5r205_t62 s1 s2 p0 p1a p1b p2 case2 x t) : l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4706 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t64 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in r s1.(l_e_st_eq_landau_n_rt_rp_r_5r205_t56 s1 s2 p0 p1a p1b p2 case2 (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s1) r (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) i (l_e_st_eq_landau_n_rt_rp_r_satz177a r)) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4707 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t65 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in r s1.(l_e_st_nonemptyi l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_t64 s1 s2 p0 p1a p1b p2 case2 r i) : l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4708 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t66 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).(l_e_st_nonemptyapp l_e_st_eq_landau_n_rt_rp_r_real s1 p1a (l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2)) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_5r205_t65 s1 s2 p0 p1a p1b p2 case2 x t) : l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4709 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t67 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2).λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2).(p2 (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_5r205_t57 s1 s2 p0 p1a p1b p2 case2 s j) (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_t59 s1 s2 p0 p1a p1b p2 case2 r i) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4710 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t68 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_in r (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2).λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_in s (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2).(l_e_st_eq_landau_n_rt_rp_r_lemma1 s r (l_e_st_eq_landau_n_rt_rp_r_satz183d s r (l_e_st_eq_landau_n_rt_rp_r_5r205_t67 s1 s2 p0 p1a p1b p2 case2 r i s j)) : l_e_st_eq_landau_n_rt_rp_r_less r s).
-
-(* constant 4711 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t69 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_in r s2).(l_e_st_eq_landau_n_rt_rp_r_satz176c r (l_ande1 (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_in r s2) a) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4712 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t70 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_in r s2).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s2) r (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_ande2 (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_in r s2) a) (l_e_st_eq_landau_n_rt_rp_r_satz177a r) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) s2).
-
-(* constant 4713 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t71 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_in r s2).(l_andi (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)) (l_e_st_eq_landau_n_rt_rp_r_5r205_t69 s1 s2 p0 p1a p1b p2 case2 r a) (l_e_st_eq_landau_n_rt_rp_r_5r205_t58 s1 s2 p0 p1a p1b p2 case2 (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_t70 s1 s2 p0 p1a p1b p2 case2 r a)) : l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2))).
-
-(* constant 4714 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t72 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_in r s2).(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2))) (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_t71 s1 s2 p0 p1a p1b p2 case2 r a) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)))).
-
-(* constant 4715 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t73 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).(l_someapp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)) case2 (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)))) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2).l_e_st_eq_landau_n_rt_rp_r_5r205_t72 s1 s2 p0 p1a p1b p2 case2 x t) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)))).
-
-(* constant 4716 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t74 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).(l_e_st_eq_landau_n_rt_rp_r_5r205_t55 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_t60 s1 s2 p0 p1a p1b p2 case2 x) (l_e_st_eq_landau_n_rt_rp_r_5r205_t63 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_t66 s1 s2 p0 p1a p1b p2 case2) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_in x (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2).λy:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_in y (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2).l_e_st_eq_landau_n_rt_rp_r_5r205_t68 s1 s2 p0 p1a p1b p2 case2 x t y u) (l_e_st_eq_landau_n_rt_rp_r_5r205_t73 s1 s2 p0 p1a p1b p2 case2) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) x)).
-
-(* constant 4717 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t75 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_ismore2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_satz177 r) (l_e_st_eq_landau_n_rt_rp_r_satz183c s (l_e_st_eq_landau_n_rt_rp_r_m0 r) l) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_m0 s) r).
-
-(* constant 4718 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t76 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r) p (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_5r205_t75 s1 s2 p0 p1a p1b p2 case2 r p s l) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4719 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t77 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less s (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s)) s (l_e_st_eq_landau_n_rt_rp_r_5r205_t57 s1 s2 p0 p1a p1b p2 case2 (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_5r205_t76 s1 s2 p0 p1a p1b p2 case2 r p s l)) (l_e_st_eq_landau_n_rt_rp_r_satz177 s) : l_e_st_eq_landau_n_rt_rp_r_in s s1).
-
-(* constant 4720 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t78 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_isless2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) r (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_satz177 r) (l_e_st_eq_landau_n_rt_rp_r_satz183a s (l_e_st_eq_landau_n_rt_rp_r_m0 r) m) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_m0 s) r).
-
-(* constant 4721 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t79 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r) p (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_5r205_t78 s1 s2 p0 p1a p1b p2 case2 r p s m) : l_e_st_eq_landau_n_rt_rp_r_in (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2)).
-
-(* constant 4722 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t80 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more s (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_in x s2) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 s)) s (l_e_st_eq_landau_n_rt_rp_r_5r205_t59 s1 s2 p0 p1a p1b p2 case2 (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_5r205_t79 s1 s2 p0 p1a p1b p2 case2 r p s m)) (l_e_st_eq_landau_n_rt_rp_r_satz177 s) : l_e_st_eq_landau_n_rt_rp_r_in s s2).
-
-(* constant 4723 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t81 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r.(l_andi (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_less x (l_e_st_eq_landau_n_rt_rp_r_m0 r).l_e_st_eq_landau_n_rt_rp_r_5r205_t77 s1 s2 p0 p1a p1b p2 case2 r p x t) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_more x (l_e_st_eq_landau_n_rt_rp_r_m0 r).l_e_st_eq_landau_n_rt_rp_r_5r205_t80 s1 s2 p0 p1a p1b p2 case2 r p x t) : l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4724 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t82 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) r.(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x) (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_t81 s1 s2 p0 p1a p1b p2 case2 r p) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4725 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t83 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λcase2:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).(l_someapp l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) x) (l_e_st_eq_landau_n_rt_rp_r_5r205_t74 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 (l_e_st_eq_landau_n_rt_rp_r_5r205_sp2 s1 s2 p0 p1a p1b p2 case2) (l_e_st_eq_landau_n_rt_rp_r_5r205_sp1 s1 s2 p0 p1a p1b p2 case2) x.l_e_st_eq_landau_n_rt_rp_r_5r205_t82 s1 s2 p0 p1a p1b p2 case2 x t) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4726 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t84 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).λnotcase2:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).λr:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0.(l_some_th4 l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)) notcase2 r : l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_in r s2))).
-
-(* constant 4727 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t85 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).λnotcase2:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).λr:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0.(l_and_th3 (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_in r s2) (l_e_st_eq_landau_n_rt_rp_r_5r205_t84 s1 s2 p0 p1a p1b p2 notcase1 notcase2 r l) (l_e_st_eq_landau_n_rt_rp_r_satz169d r l) : l_not (l_e_st_eq_landau_n_rt_rp_r_in r s2)).
-
-(* constant 4728 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t86 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).λnotcase2:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).λr:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r l_e_st_eq_landau_n_rt_rp_r_0.(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_in r s1) (l_e_st_eq_landau_n_rt_rp_r_in r s2) (p0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_t85 s1 s2 p0 p1a p1b p2 notcase1 notcase2 r l) : l_e_st_eq_landau_n_rt_rp_r_in r s1).
-
-(* constant 4729 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t87 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).λnotcase2:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).λr:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0.(l_some_th4 l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)) notcase1 r : l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1))).
-
-(* constant 4730 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t88 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).λnotcase2:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).λr:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0.(l_and_th3 (l_e_st_eq_landau_n_rt_rp_r_pos r) (l_e_st_eq_landau_n_rt_rp_r_in r s1) (l_e_st_eq_landau_n_rt_rp_r_5r205_t87 s1 s2 p0 p1a p1b p2 notcase1 notcase2 r m) (l_e_st_eq_landau_n_rt_rp_r_satz169b r m) : l_not (l_e_st_eq_landau_n_rt_rp_r_in r s1)).
-
-(* constant 4731 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t89 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).λnotcase2:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).λr:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0.(l_ore2 (l_e_st_eq_landau_n_rt_rp_r_in r s1) (l_e_st_eq_landau_n_rt_rp_r_in r s2) (p0 r) (l_e_st_eq_landau_n_rt_rp_r_5r205_t88 s1 s2 p0 p1a p1b p2 notcase1 notcase2 r m) : l_e_st_eq_landau_n_rt_rp_r_in r s2).
-
-(* constant 4732 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t90 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).λnotcase2:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).(l_andi (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 s1 s2 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 s1 s2 l_e_st_eq_landau_n_rt_rp_r_0) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_less x l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_5r205_t86 s1 s2 p0 p1a p1b p2 notcase1 notcase2 x t) (λx:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_more x l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_5r205_t89 s1 s2 p0 p1a p1b p2 notcase1 notcase2 x t) : l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4733 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t91 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).λnotcase2:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_5r205_t90 s1 s2 p0 p1a p1b p2 notcase1 notcase2) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4734 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t92 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λnotcase1:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))) (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)) (λt:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).l_e_st_eq_landau_n_rt_rp_r_5r205_t83 s1 s2 p0 p1a p1b p2 t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_neg x) (l_e_st_eq_landau_n_rt_rp_r_in x s2))).l_e_st_eq_landau_n_rt_rp_r_5r205_t91 s1 s2 p0 p1a p1b p2 notcase1 t) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4735 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t93 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))) (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)) (λt:l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1)).l_e_st_eq_landau_n_rt_rp_r_5r205_t55 s1 s2 p0 p1a p1b p2 t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_pos x) (l_e_st_eq_landau_n_rt_rp_r_in x s1))).l_e_st_eq_landau_n_rt_rp_r_5r205_t92 s1 s2 p0 p1a p1b p2 t) : l_e_st_eq_landau_n_rt_rp_r_some (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4736 *)
-definition l_e_st_eq_landau_n_rt_rp_r_5r205_t94 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).(l_e_onei l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x) (l_e_st_eq_landau_n_rt_rp_r_5r205_t22 s1 s2 p0 p1a p1b p2) (l_e_st_eq_landau_n_rt_rp_r_5r205_t93 s1 s2 p0 p1a p1b p2) : l_e_st_eq_landau_n_rt_rp_r_one (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x)).
-
-(* constant 4737 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz205 ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).(l_e_st_eq_landau_n_rt_rp_r_5r205_t94 s1 s2 p0 p1a p1b p2 : l_e_st_eq_landau_n_rt_rp_r_one (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_less y x.l_e_st_eq_landau_n_rt_rp_r_in y s1)) (l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_more y x.l_e_st_eq_landau_n_rt_rp_r_in y s2)))).
-
-(* constant 4738 *)
-definition l_e_st_eq_landau_n_rt_rp_r_dedekind ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).(l_e_st_eq_landau_n_rt_rp_r_satz205 s1 s2 p0 p1a p1b p2 : l_e_st_eq_landau_n_rt_rp_r_one (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_less y x.l_e_st_eq_landau_n_rt_rp_r_in y s1)) (l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_more y x.l_e_st_eq_landau_n_rt_rp_r_in y s2)))).
-
-(* constant 4739 *)
-definition l_e_st_eq_landau_n_rt_rp_r_schnitt ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).(l_e_ind l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x) (l_e_st_eq_landau_n_rt_rp_r_satz205 s1 s2 p0 p1a p1b p2) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4740 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz205a ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λl:l_e_st_eq_landau_n_rt_rp_r_less r (l_e_st_eq_landau_n_rt_rp_r_schnitt s1 s2 p0 p1a p1b p2).(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_schnitt s1 s2 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_schnitt s1 s2 p0 p1a p1b p2)) (l_e_oneax l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x) (l_e_st_eq_landau_n_rt_rp_r_satz205 s1 s2 p0 p1a p1b p2)) r l : l_e_st_eq_landau_n_rt_rp_r_in r s1).
-
-(* constant 4741 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satz205b ≝ λs1:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λs2:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_real.λp0:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_or (l_e_st_eq_landau_n_rt_rp_r_in x s1) (l_e_st_eq_landau_n_rt_rp_r_in x s2)).λp1a:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s1.λp1b:l_e_st_nonempty l_e_st_eq_landau_n_rt_rp_r_real s2.λp2:l_e_st_eq_landau_n_rt_rp_r_all (λx:l_e_st_eq_landau_n_rt_rp_r_real.∀t:l_e_st_eq_landau_n_rt_rp_r_in x s1.l_e_st_eq_landau_n_rt_rp_r_all (λy:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_in y s2.l_e_st_eq_landau_n_rt_rp_r_less x y)).λr:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_more r (l_e_st_eq_landau_n_rt_rp_r_schnitt s1 s2 p0 p1a p1b p2).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_5r205_prop1 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_schnitt s1 s2 p0 p1a p1b p2)) (l_e_st_eq_landau_n_rt_rp_r_5r205_prop2 s1 s2 (l_e_st_eq_landau_n_rt_rp_r_schnitt s1 s2 p0 p1a p1b p2)) (l_e_oneax l_e_st_eq_landau_n_rt_rp_r_real (λx:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_5r205_prop3 s1 s2 x) (l_e_st_eq_landau_n_rt_rp_r_satz205 s1 s2 p0 p1a p1b p2)) r m : l_e_st_eq_landau_n_rt_rp_r_in r s2).
-
-(* constant 4742 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_dr ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pdofrp r0 : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 4743 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_ds ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_pdofrp s0 : l_e_st_eq_landau_n_rt_rp_dif).
-
-(* constant 4744 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t1 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_lemmaivad1 r0 s0 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_r_iva_dr r0 s0) (l_e_st_eq_landau_n_rt_rp_r_iva_ds r0 s0)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl r0 s0))).
-
-(* constant 4745 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemmaiva1 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_pl r0 s0)) (l_e_st_eq_landau_n_rt_rp_pd (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp s0)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl r0 s0)) (l_e_st_eq_landau_n_rt_rp_r_picp (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp s0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp s0))) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_pl r0 s0))) (l_e_st_eq_landau_n_rt_rp_r_iva_t1 r0 s0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_pl r0 s0))).
-
-(* constant 4746 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t2 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_lemmaivad2 r0 s0 : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_r_iva_dr r0 s0) (l_e_st_eq_landau_n_rt_rp_r_iva_ds r0 s0)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts r0 s0))).
-
-(* constant 4747 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemmaiva2 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_ts r0 s0)) (l_e_st_eq_landau_n_rt_rp_td (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp s0)) (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts r0 s0)) (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_st_eq_landau_n_rt_rp_pdofrp r0) (l_e_st_eq_landau_n_rt_rp_pdofrp s0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp r0)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp s0))) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_pdofrp (l_e_st_eq_landau_n_rt_rp_ts r0 s0))) (l_e_st_eq_landau_n_rt_rp_r_iva_t2 r0 s0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_ts r0 s0))).
-
-(* constant 4748 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t3 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).(l_e_st_eq_landau_n_rt_rp_r_moreex (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) (l_e_st_eq_landau_n_rt_rp_r_iva_dr r0 s0) (l_e_st_eq_landau_n_rt_rp_r_iva_ds r0 s0) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_r_iva_dr r0 s0)) (l_e_st_eq_landau_n_rt_rp_r_innclass (l_e_st_eq_landau_n_rt_rp_r_iva_ds r0 s0)) m : l_e_st_eq_landau_n_rt_rp_mored (l_e_st_eq_landau_n_rt_rp_r_iva_dr r0 s0) (l_e_st_eq_landau_n_rt_rp_r_iva_ds r0 s0)).
-
-(* constant 4749 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemmaiva3 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).(l_e_st_eq_landau_n_rt_rp_lemmaivad3 r0 s0 (l_e_st_eq_landau_n_rt_rp_r_iva_t3 r0 s0 m) : l_e_st_eq_landau_n_rt_rp_more r0 s0).
-
-(* constant 4750 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t4 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r0 s0.λl:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).(l_e_st_eq_landau_n_rt_rp_satz121 s0 r0 (l_e_st_eq_landau_n_rt_rp_r_lemmaiva3 s0 r0 (l_e_st_eq_landau_n_rt_rp_r_lemma2 (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0) l)) : l_e_st_eq_landau_n_rt_rp_less r0 s0).
-
-(* constant 4751 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t5 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r0 s0.(l_ec3e23 (l_e_st_eq_landau_n_rt_rp_is r0 s0) (l_e_st_eq_landau_n_rt_rp_more r0 s0) (l_e_st_eq_landau_n_rt_rp_less r0 s0) (l_e_st_eq_landau_n_rt_rp_satz123b r0 s0) m : l_not (l_e_st_eq_landau_n_rt_rp_less r0 s0)).
-
-(* constant 4752 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t6 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r0 s0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_less r0 s0) (l_e_st_eq_landau_n_rt_rp_r_iva_t5 r0 s0 m) (λt:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).l_e_st_eq_landau_n_rt_rp_r_iva_t4 r0 s0 m t) : l_not (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0))).
-
-(* constant 4753 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t7 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r0 s0.(l_ec3e21 (l_e_st_eq_landau_n_rt_rp_is r0 s0) (l_e_st_eq_landau_n_rt_rp_more r0 s0) (l_e_st_eq_landau_n_rt_rp_less r0 s0) (l_e_st_eq_landau_n_rt_rp_satz123b r0 s0) m : l_e_st_eq_landau_n_rt_rp_nis r0 s0).
-
-(* constant 4754 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t8 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r0 s0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_is r0 s0) (l_e_st_eq_landau_n_rt_rp_r_iva_t7 r0 s0 m) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0).l_e_st_eq_landau_n_rt_rp_r_isrpip r0 s0 t) : l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)).
-
-(* constant 4755 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemmaiva4 ≝ λr0:l_e_st_eq_landau_n_rt_cut.λs0:l_e_st_eq_landau_n_rt_cut.λm:l_e_st_eq_landau_n_rt_rp_more r0 s0.(l_or3e2 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_r_satz167a (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)) (l_e_st_eq_landau_n_rt_rp_r_iva_t6 r0 s0 m) (l_e_st_eq_landau_n_rt_rp_r_iva_t8 r0 s0 m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pofrp r0) (l_e_st_eq_landau_n_rt_rp_r_pofrp s0)).
-
-(* constant 4756 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t9 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y).(l_e_st_eq_landau_n_rt_rp_r_lemmaiva3 (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y) m : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)).
-
-(* constant 4757 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t10 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y).(l_e_st_eq_landau_n_rt_rp_satz154d (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y) (l_e_st_eq_landau_n_rt_rp_r_iva_t9 x y m) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)).
-
-(* constant 4758 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t11 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y).(l_e_st_eq_landau_n_rt_moree (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y) (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_iva_t10 x y m) : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)).
-
-(* constant 4759 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemmaiva5 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y).(l_e_st_eq_landau_n_satz111a x y (l_e_st_eq_landau_n_rt_rp_r_iva_t11 x y m) : l_e_st_eq_landau_n_more x y).
-
-(* constant 4760 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t12 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_satz111d x y m : l_e_st_eq_landau_n_moref (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)).
-
-(* constant 4761 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t13 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_rt_morei (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y) (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_inclass (l_e_st_eq_landau_n_fr y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_iva_t12 x y m) : l_e_st_eq_landau_n_rt_more (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y)).
-
-(* constant 4762 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iva_t14 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_rt_rp_satz154a (l_e_st_eq_landau_n_rt_rtofn x) (l_e_st_eq_landau_n_rt_rtofn y) (l_e_st_eq_landau_n_rt_rp_r_iva_t13 x y m) : l_e_st_eq_landau_n_rt_rp_more (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)).
-
-(* constant 4763 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemmaiva6 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_more x y.(l_e_st_eq_landau_n_rt_rp_r_lemmaiva4 (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y) (l_e_st_eq_landau_n_rt_rp_r_iva_t14 x y m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)).
-
-(* constant 4764 *)
-definition l_e_st_eq_landau_n_rt_rp_r_int_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_intabsd a0 (l_e_st_eq_landau_n_rt_rp_r_intrlex r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_absd a0)).
-
-(* constant 4765 *)
-definition l_e_st_eq_landau_n_rt_rp_r_int_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_r_intrlin (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_absd a0) (l_e_st_eq_landau_n_rt_rp_r_aica r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_int_t1 r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4766 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intabs ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_abs r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_int_t2 r x t i) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 4767 *)
-definition l_e_st_eq_landau_n_rt_rp_r_int_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_intm0d a0 (l_e_st_eq_landau_n_rt_rp_r_intrlex r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_m0d a0)).
-
-(* constant 4768 *)
-definition l_e_st_eq_landau_n_rt_rp_r_int_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λa0:l_e_st_eq_landau_n_rt_rp_dif.λa0ir:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_r_intrlin (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_m0d a0) (l_e_st_eq_landau_n_rt_rp_r_micm0 r a0 a0ir) (l_e_st_eq_landau_n_rt_rp_r_int_t3 r a0 a0ir i) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4769 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intm0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.(l_e_st_eq_landau_n_rt_rp_r_realapp1 r (l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).l_e_st_eq_landau_n_rt_rp_r_int_t4 r x t i) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_m0 r)).
-
-(* constant 4770 *)
-definition l_e_st_eq_landau_n_rt_rp_r_int_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.(l_e_st_eq_landau_n_rt_rp_intpd a1 b1 (l_e_st_eq_landau_n_rt_rp_r_intrlex r a1 a1ir i) (l_e_st_eq_landau_n_rt_rp_r_intrlex s b1 b1is j) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_pd a1 b1)).
-
-(* constant 4771 *)
-definition l_e_st_eq_landau_n_rt_rp_r_int_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.(l_e_st_eq_landau_n_rt_rp_r_intrlin (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_pd a1 b1) (l_e_st_eq_landau_n_rt_rp_r_picp r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_int_t5 r s a1 b1 a1ir b1is i j) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_pl r s)).
-
-(* constant 4772 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intpl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_pl r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_int_t6 r s x y t u i j) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_pl r s)).
-
-(* constant 4773 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intmn ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.(l_e_st_eq_landau_n_rt_rp_r_intpl r i (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_intm0 s j) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_mn r s)).
-
-(* constant 4774 *)
-definition l_e_st_eq_landau_n_rt_rp_r_int_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.(l_e_st_eq_landau_n_rt_rp_inttd a1 b1 (l_e_st_eq_landau_n_rt_rp_r_intrlex r a1 a1ir i) (l_e_st_eq_landau_n_rt_rp_r_intrlex s b1 b1is j) : l_e_st_eq_landau_n_rt_rp_intd (l_e_st_eq_landau_n_rt_rp_td a1 b1)).
-
-(* constant 4775 *)
-definition l_e_st_eq_landau_n_rt_rp_r_int_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa1:l_e_st_eq_landau_n_rt_rp_dif.λb1:l_e_st_eq_landau_n_rt_rp_dif.λa1ir:l_e_st_eq_landau_n_rt_rp_r_inn a1 (l_e_st_eq_landau_n_rt_rp_r_class r).λb1is:l_e_st_eq_landau_n_rt_rp_r_inn b1 (l_e_st_eq_landau_n_rt_rp_r_class s).λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.(l_e_st_eq_landau_n_rt_rp_r_intrlin (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_td a1 b1) (l_e_st_eq_landau_n_rt_rp_r_tict r s a1 b1 a1ir b1is) (l_e_st_eq_landau_n_rt_rp_r_int_t7 r s a1 b1 a1ir b1is i j) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4776 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intts ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.(l_e_st_eq_landau_n_rt_rp_r_realapp2 r s (l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_ts r s)) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λt:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class r).λu:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_int_t8 r s x y t u i j) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4777 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr24_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n) : l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n)).
-
-(* constant 4778 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr24_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_more l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_more l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n)) (l_e_st_eq_landau_n_satz10d l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n) (l_e_st_eq_landau_n_rt_rp_r_ivr24_t1 r n)) (λt:l_e_st_eq_landau_n_rt_rp_r_more l_e_st_eq_landau_n_rt_rp_r_1rl r.l_e_st_eq_landau_n_rt_rp_r_lemmaiva5 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n) (l_e_st_eq_landau_n_rt_rp_r_ismore2 r (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ntofrl r n)) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 r n) t)) : l_not (l_e_st_eq_landau_n_rt_rp_r_more l_e_st_eq_landau_n_rt_rp_r_1rl r)).
-
-(* constant 4779 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr24 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_natrl r.(l_e_st_eq_landau_n_rt_rp_r_satz167e l_e_st_eq_landau_n_rt_rp_r_1rl r (l_e_st_eq_landau_n_rt_rp_r_ivr24_t2 r n) : l_e_st_eq_landau_n_rt_rp_r_lessis l_e_st_eq_landau_n_rt_rp_r_1rl r).
-
-(* constant 4780 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr25_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_satz182d s r (l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn s r)).
-
-(* constant 4781 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr25_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_intmn s j r i : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_mn s r)).
-
-(* constant 4782 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr25_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_posintnatrl (l_e_st_eq_landau_n_rt_rp_r_mn s r) (l_e_st_eq_landau_n_rt_rp_r_ivr25_t1 r i s j l) (l_e_st_eq_landau_n_rt_rp_r_ivr25_t2 r i s j l) : l_e_st_eq_landau_n_rt_rp_r_natrl (l_e_st_eq_landau_n_rt_rp_r_mn s r)).
-
-(* constant 4783 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr25_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_satzr24 (l_e_st_eq_landau_n_rt_rp_r_mn s r) (l_e_st_eq_landau_n_rt_rp_r_ivr25_t3 r i s j l) : l_e_st_eq_landau_n_rt_rp_r_lessis l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_mn s r)).
-
-(* constant 4784 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr25_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_less l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_mn s r)) (l_e_st_eq_landau_n_rt_rp_r_is l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_mn s r)) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn s r) r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn s r) r)) (l_e_st_eq_landau_n_rt_rp_r_ivr25_t4 r i s j l) (λt:l_e_st_eq_landau_n_rt_rp_r_less l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_mn s r).l_e_st_eq_landau_n_rt_rp_r_satz188f l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_mn s r) r t) (λt:l_e_st_eq_landau_n_rt_rp_r_is l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_mn s r).l_e_st_eq_landau_n_rt_rp_r_ispl1 l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_mn s r) r t) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn s r) r)).
-
-(* constant 4785 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr25 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_intrl r.λs:l_e_st_eq_landau_n_rt_rp_r_real.λj:l_e_st_eq_landau_n_rt_rp_r_intrl s.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_islessis12 (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn s r) r) s (l_e_st_eq_landau_n_rt_rp_r_compl l_e_st_eq_landau_n_rt_rp_r_1rl r) (l_e_st_eq_landau_n_rt_rp_r_plmn s r) (l_e_st_eq_landau_n_rt_rp_r_ivr25_t5 r i s j l) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_1rl) s).
-
-(* constant 4786 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr155_t1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_lemmaiva1 (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)))).
-
-(* constant 4787 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr155_t2 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_isrpep (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)) (l_e_st_eq_landau_n_rt_rp_satz155e x y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)))).
-
-(* constant 4788 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr155a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_pl (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y))) (l_e_st_eq_landau_n_rt_rp_r_ivr155_t2 x y) (l_e_st_eq_landau_n_rt_rp_r_ivr155_t1 x y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y))).
-
-(* constant 4789 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr155b ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)) (l_e_st_eq_landau_n_rt_rp_r_satzr155a x y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x y))).
-
-(* constant 4790 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr155_t3 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_lemmaiva2 (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)))).
-
-(* constant 4791 *)
-definition l_e_st_eq_landau_n_rt_rp_r_ivr155_t4 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_isrpep (l_e_st_eq_landau_n_rt_rp_rpofnt (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)) (l_e_st_eq_landau_n_rt_rp_satz155f x y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y)))).
-
-(* constant 4792 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr155c ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)) (l_e_st_eq_landau_n_rt_rp_r_pofrp (l_e_st_eq_landau_n_rt_rp_ts (l_e_st_eq_landau_n_rt_rp_rpofnt x) (l_e_st_eq_landau_n_rt_rp_rpofnt y))) (l_e_st_eq_landau_n_rt_rp_r_ivr155_t4 x y) (l_e_st_eq_landau_n_rt_rp_r_ivr155_t3 x y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y))).
-
-(* constant 4793 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr155d ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)) (l_e_st_eq_landau_n_rt_rp_r_satzr155c x y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) (l_e_st_eq_landau_n_rt_rp_r_rlofnt y)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_ts x y))).
-
-(* constant 4794 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t1 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) t).λb:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λb0:l_e_st_eq_landau_n_rt_rp_dif.λbis:l_e_st_eq_landau_n_rt_rp_r_inn b0 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd a0) (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_ande1 (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) t) a) (λu:l_e_st_eq_landau_n_rt_rp_negd a0.l_e_st_eq_landau_n_rt_rp_r_negin r a0 air u) : l_not (l_e_st_eq_landau_n_rt_rp_negd a0)).
-
-(* constant 4795 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t2 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) t).λb:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λb0:l_e_st_eq_landau_n_rt_rp_dif.λbis:l_e_st_eq_landau_n_rt_rp_r_inn b0 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd b0) (l_e_st_eq_landau_n_rt_rp_r_neg s) (l_ande1 (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) t) b) (λu:l_e_st_eq_landau_n_rt_rp_negd b0.l_e_st_eq_landau_n_rt_rp_r_negin s b0 bis u) : l_not (l_e_st_eq_landau_n_rt_rp_negd b0)).
-
-(* constant 4796 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t3 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) t).λb:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λb0:l_e_st_eq_landau_n_rt_rp_dif.λbis:l_e_st_eq_landau_n_rt_rp_r_inn b0 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_ts r r) t (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0 (l_e_st_eq_landau_n_rt_rp_r_tict r r a0 a0 air air) cit (l_ande2 (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) t) a) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0).
-
-(* constant 4797 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t4 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) t).λb:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λb0:l_e_st_eq_landau_n_rt_rp_dif.λbis:l_e_st_eq_landau_n_rt_rp_r_inn b0 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isex (l_e_st_eq_landau_n_rt_rp_r_ts s s) t (l_e_st_eq_landau_n_rt_rp_td b0 b0) c0 (l_e_st_eq_landau_n_rt_rp_r_tict s s b0 b0 bis bis) cit (l_ande2 (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) t) b) : l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td b0 b0) c0).
-
-(* constant 4798 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t5 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) t).λb:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λair:l_e_st_eq_landau_n_rt_rp_r_inn a0 (l_e_st_eq_landau_n_rt_rp_r_class r).λb0:l_e_st_eq_landau_n_rt_rp_dif.λbis:l_e_st_eq_landau_n_rt_rp_r_inn b0 (l_e_st_eq_landau_n_rt_rp_r_class s).(l_e_st_eq_landau_n_rt_rp_r_isin r s a0 b0 air bis (l_e_st_eq_landau_n_rt_rp_satzd161b c0 a0 b0 (l_e_st_eq_landau_n_rt_rp_r_7r161_t1 t r s a b c0 cit a0 air b0 bis) (l_e_st_eq_landau_n_rt_rp_r_7r161_t2 t r s a b c0 cit a0 air b0 bis) (l_e_st_eq_landau_n_rt_rp_r_7r161_t3 t r s a b c0 cit a0 air b0 bis) (l_e_st_eq_landau_n_rt_rp_r_7r161_t4 t r s a b c0 cit a0 air b0 bis)) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4799 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr161b ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) t).λb:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) t).(l_e_st_eq_landau_n_rt_rp_r_realapp3 t r s (l_e_st_eq_landau_n_rt_rp_r_is r s) (λx:l_e_st_eq_landau_n_rt_rp_dif.λy:l_e_st_eq_landau_n_rt_rp_dif.λz:l_e_st_eq_landau_n_rt_rp_dif.λu:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class t).λv:l_e_st_eq_landau_n_rt_rp_r_inn y (l_e_st_eq_landau_n_rt_rp_r_class r).λw:l_e_st_eq_landau_n_rt_rp_r_inn z (l_e_st_eq_landau_n_rt_rp_r_class s).l_e_st_eq_landau_n_rt_rp_r_7r161_t5 t r s a b x u y v z w) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 4800 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t6 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_negd c0) (l_e_st_eq_landau_n_rt_rp_r_neg t) n (λu:l_e_st_eq_landau_n_rt_rp_negd c0.l_e_st_eq_landau_n_rt_rp_r_negin t c0 cit u) : l_not (l_e_st_eq_landau_n_rt_rp_negd c0)).
-
-(* constant 4801 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_ar ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd a0)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0).(l_e_st_eq_landau_n_rt_rp_r_realof a0 : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4802 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t7 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd a0)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a)) (l_e_st_eq_landau_n_rt_rp_negd a0) (l_ande1 (l_not (l_e_st_eq_landau_n_rt_rp_negd a0)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0) a) (λu:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a).l_e_st_eq_landau_n_rt_rp_r_negex (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a) a0 (l_e_st_eq_landau_n_rt_rp_r_innclass a0) u) : l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a))).
-
-(* constant 4803 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t8 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd a0)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0).(l_e_st_eq_landau_n_rt_rp_r_isin (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a) (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a)) t (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0 (l_e_st_eq_landau_n_rt_rp_r_tict (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a) (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a) a0 a0 (l_e_st_eq_landau_n_rt_rp_r_innclass a0) (l_e_st_eq_landau_n_rt_rp_r_innclass a0)) cit (l_ande2 (l_not (l_e_st_eq_landau_n_rt_rp_negd a0)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0) a) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a) (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a)) t).
-
-(* constant 4804 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t9 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd a0)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0).(l_andi (l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a))) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a) (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a)) t) (l_e_st_eq_landau_n_rt_rp_r_7r161_t7 t n c0 cit a0 a) (l_e_st_eq_landau_n_rt_rp_r_7r161_t8 t n c0 cit a0 a) : l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a))) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a) (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a)) t)).
-
-(* constant 4805 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t10 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).λa0:l_e_st_eq_landau_n_rt_rp_dif.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd a0)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td a0 a0) c0).(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t)) (l_e_st_eq_landau_n_rt_rp_r_7r161_ar t n c0 cit a0 a) (l_e_st_eq_landau_n_rt_rp_r_7r161_t9 t n c0 cit a0 a) : l_e_st_eq_landau_n_rt_rp_r_some (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t))).
-
-(* constant 4806 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t11 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λc0:l_e_st_eq_landau_n_rt_rp_dif.λcit:l_e_st_eq_landau_n_rt_rp_r_inn c0 (l_e_st_eq_landau_n_rt_rp_r_class t).(l_someapp l_e_st_eq_landau_n_rt_rp_dif (λx:l_e_st_eq_landau_n_rt_rp_dif.l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd x)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td x x) c0)) (l_e_st_eq_landau_n_rt_rp_satzd161a c0 (l_e_st_eq_landau_n_rt_rp_r_7r161_t6 t n c0 cit)) (l_e_st_eq_landau_n_rt_rp_r_some (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λv:l_and (l_not (l_e_st_eq_landau_n_rt_rp_negd x)) (l_e_st_eq_landau_n_rt_rp_eq (l_e_st_eq_landau_n_rt_rp_td x x) c0).l_e_st_eq_landau_n_rt_rp_r_7r161_t10 t n c0 cit x v) : l_e_st_eq_landau_n_rt_rp_r_some (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t))).
-
-(* constant 4807 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr161a ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).(l_e_st_eq_landau_n_rt_rp_r_realapp1 t (l_e_st_eq_landau_n_rt_rp_r_some (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t))) (λx:l_e_st_eq_landau_n_rt_rp_dif.λv:l_e_st_eq_landau_n_rt_rp_r_inn x (l_e_st_eq_landau_n_rt_rp_r_class t).l_e_st_eq_landau_n_rt_rp_r_7r161_t11 t n x v) : l_e_st_eq_landau_n_rt_rp_r_some (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t))).
-
-(* constant 4808 *)
-definition l_e_st_eq_landau_n_rt_rp_r_satzr161 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).(l_e_onei l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t)) (λu:l_e_st_eq_landau_n_rt_rp_r_real.λv:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t).λb:l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg v)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts v v) t).l_e_st_eq_landau_n_rt_rp_r_satzr161b t u v a b) (l_e_st_eq_landau_n_rt_rp_r_satzr161a t n) : l_e_st_eq_landau_n_rt_rp_r_one (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t))).
-
-(* constant 4809 *)
-definition l_e_st_eq_landau_n_rt_rp_r_sqrt ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).(l_e_ind l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t)) (l_e_st_eq_landau_n_rt_rp_r_satzr161 t n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4810 *)
-definition l_e_st_eq_landau_n_rt_rp_r_7r161_t12 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).(l_e_oneax l_e_st_eq_landau_n_rt_rp_r_real (λu:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg u)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts u u) t)) (l_e_st_eq_landau_n_rt_rp_r_satzr161 t n) : l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_sqrt t n))) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_sqrt t n) (l_e_st_eq_landau_n_rt_rp_r_sqrt t n)) t)).
-
-(* constant 4811 *)
-definition l_e_st_eq_landau_n_rt_rp_r_thsqrt1a ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).(l_ande1 (l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_sqrt t n))) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_sqrt t n) (l_e_st_eq_landau_n_rt_rp_r_sqrt t n)) t) (l_e_st_eq_landau_n_rt_rp_r_7r161_t12 t n) : l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_sqrt t n))).
-
-(* constant 4812 *)
-definition l_e_st_eq_landau_n_rt_rp_r_thsqrt1b ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).(l_ande2 (l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_sqrt t n))) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_sqrt t n) (l_e_st_eq_landau_n_rt_rp_r_sqrt t n)) t) (l_e_st_eq_landau_n_rt_rp_r_7r161_t12 t n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_sqrt t n) (l_e_st_eq_landau_n_rt_rp_r_sqrt t n)) t).
-
-(* constant 4813 *)
-definition l_e_st_eq_landau_n_rt_rp_r_thsqrt2 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λx:l_e_st_eq_landau_n_rt_rp_r_real.λo:l_not (l_e_st_eq_landau_n_rt_rp_r_neg x).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts x x) t.(l_e_st_eq_landau_n_rt_rp_r_satzr161b t x (l_e_st_eq_landau_n_rt_rp_r_sqrt t n) (l_andi (l_not (l_e_st_eq_landau_n_rt_rp_r_neg x)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts x x) t) o i) (l_e_st_eq_landau_n_rt_rp_r_7r161_t12 t n) : l_e_st_eq_landau_n_rt_rp_r_is x (l_e_st_eq_landau_n_rt_rp_r_sqrt t n)).
-
-(* constant 4814 *)
-definition l_e_st_eq_landau_n_rt_rp_r_thsqrt3 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg t).λx:l_e_st_eq_landau_n_rt_rp_r_real.λo:l_not (l_e_st_eq_landau_n_rt_rp_r_neg x).λi:l_e_st_eq_landau_n_rt_rp_r_is t (l_e_st_eq_landau_n_rt_rp_r_ts x x).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real x (l_e_st_eq_landau_n_rt_rp_r_sqrt t n) (l_e_st_eq_landau_n_rt_rp_r_thsqrt2 t n x o (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real t (l_e_st_eq_landau_n_rt_rp_r_ts x x) i)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_sqrt t n) x).
-
-(* constant 4815 *)
-definition l_e_st_eq_landau_n_rt_rp_r_issqrt ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_neg s).λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_thsqrt2 s o (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) (l_e_st_eq_landau_n_rt_rp_r_thsqrt1a r n) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) (l_e_st_eq_landau_n_rt_rp_r_sqrt r n)) r s (l_e_st_eq_landau_n_rt_rp_r_thsqrt1b r n) i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) (l_e_st_eq_landau_n_rt_rp_r_sqrt s o)).
-
-(* constant 4816 *)
-definition l_e_st_eq_landau_n_rt_rp_r_sqrt0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_thsqrt3 r n l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_0notn l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 i (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4817 *)
-definition l_e_st_eq_landau_n_rt_rp_r_sqrt_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λo:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) o (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) l_e_st_eq_landau_n_rt_rp_r_0.l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) (l_e_st_eq_landau_n_rt_rp_r_sqrt r n)) (l_e_st_eq_landau_n_rt_rp_r_thsqrt1b r n) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) t)) : l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4818 *)
-definition l_e_st_eq_landau_n_rt_rp_r_sqrtnot0 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λo:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.(l_or3e2 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_sqrt r n) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_sqrt r n)) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_sqrt r n)) (l_e_st_eq_landau_n_rt_rp_r_axrlo (l_e_st_eq_landau_n_rt_rp_r_sqrt r n)) (l_e_st_eq_landau_n_rt_rp_r_thsqrt1a r n) (l_e_st_eq_landau_n_rt_rp_r_sqrt_t1 r n o) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_sqrt r n)).
-
-(* constant 4819 *)
-definition l_e_st_eq_landau_n_rt_rp_r_v0_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis t l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ov s t n))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ov s t n)) t) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ov s t n) t)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_comts t (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ov s t n))) (l_e_st_eq_landau_n_rt_rp_r_assts1 r (l_e_st_eq_landau_n_rt_rp_r_ov s t n) t) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ov s t n) t) s r (l_e_st_eq_landau_n_rt_rp_r_satz204e s t n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ov s t n))) (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 4820 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis t l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_satz204g (l_e_st_eq_landau_n_rt_rp_r_ts r s) t (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ov s t n)) n (l_e_st_eq_landau_n_rt_rp_r_v0_t1 r s t n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_ov s t n)) (l_e_st_eq_landau_n_rt_rp_r_ov (l_e_st_eq_landau_n_rt_rp_r_ts r s) t n)).
-
-(* constant 4821 *)
-definition l_e_st_eq_landau_n_rt_rp_r_v0_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis t l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ov r t n) (l_e_st_eq_landau_n_rt_rp_r_ov s t n))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_ov r t n)) (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_ov s t n))) (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_disttp2 t (l_e_st_eq_landau_n_rt_rp_r_ov r t n) (l_e_st_eq_landau_n_rt_rp_r_ov s t n)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_ov r t n)) r (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_ov s t n)) s (l_e_st_eq_landau_n_rt_rp_r_satz204c r t n) (l_e_st_eq_landau_n_rt_rp_r_satz204c s t n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts t (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ov r t n) (l_e_st_eq_landau_n_rt_rp_r_ov s t n))) (l_e_st_eq_landau_n_rt_rp_r_pl r s)).
-
-(* constant 4822 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis t l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_satz204g (l_e_st_eq_landau_n_rt_rp_r_pl r s) t (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ov r t n) (l_e_st_eq_landau_n_rt_rp_r_ov s t n)) n (l_e_st_eq_landau_n_rt_rp_r_v0_t2 r s t n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ov r t n) (l_e_st_eq_landau_n_rt_rp_r_ov s t n)) (l_e_st_eq_landau_n_rt_rp_r_ov (l_e_st_eq_landau_n_rt_rp_r_pl r s) t n)).
-
-(* constant 4823 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_satz204b r r n (l_e_st_eq_landau_n_rt_rp_r_ov r r n) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_satz204c r r n) (l_e_st_eq_landau_n_rt_rp_r_satz195 r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ov r r n) l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 4824 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.(l_ore2 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ov l_e_st_eq_landau_n_rt_rp_r_0 r n) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz192c r (l_e_st_eq_landau_n_rt_rp_r_ov l_e_st_eq_landau_n_rt_rp_r_0 r n) (l_e_st_eq_landau_n_rt_rp_r_satz204c l_e_st_eq_landau_n_rt_rp_r_0 r n)) n : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ov l_e_st_eq_landau_n_rt_rp_r_0 r n) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4825 *)
-definition l_e_st_eq_landau_n_rt_rp_r_v0_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_m0 r).λp:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_pnotn (l_e_st_eq_landau_n_rt_rp_r_m0 r) p (l_e_st_eq_landau_n_rt_rp_r_isneg r (l_e_st_eq_landau_n_rt_rp_r_m0 r) i (l_e_st_eq_landau_n_rt_rp_r_satz176f r p)) : l_con).
-
-(* constant 4826 *)
-definition l_e_st_eq_landau_n_rt_rp_r_v0_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_m0 r).λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_nnotp (l_e_st_eq_landau_n_rt_rp_r_m0 r) n (l_e_st_eq_landau_n_rt_rp_r_ispos r (l_e_st_eq_landau_n_rt_rp_r_m0 r) i (l_e_st_eq_landau_n_rt_rp_r_satz176d r n)) : l_con).
-
-(* constant 4827 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_m0 r).(l_e_st_eq_landau_n_rt_rp_r_satz176e r (l_or3e1 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_axrlo (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (λt:l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 r).l_e_st_eq_landau_n_rt_rp_r_v0_t3 r i t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_m0 r).l_e_st_eq_landau_n_rt_rp_r_v0_t4 r i t)) : l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4828 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_satz167f (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0 (l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts r r)) (l_e_st_eq_landau_n_rt_rp_r_nnegsq r) (λt:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_satz169d (l_e_st_eq_landau_n_rt_rp_r_ts r r) t)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4829 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lemma12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_rapp r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs r))) (λt:l_e_st_eq_landau_n_rt_rp_r_pos r.l_e_st_eq_landau_n_rt_rp_r_satz196a r r t t) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs r)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 r r t) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs0 r t))) (λt:l_e_st_eq_landau_n_rt_rp_r_neg r.l_e_st_eq_landau_n_rt_rp_r_satz196b r r t t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_abs r))).
-
-(* constant 4830 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.(l_e_st_eq_landau_n_rt_rp_r_satz190a x x l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_moreisi2 x x (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real x)) (l_e_st_eq_landau_n_rt_rp_r_satz169a l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_natpos l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_natrl1)) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 4831 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.(l_e_st_eq_landau_n_rt_rp_r_ismore2 (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_0) x (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl02 x l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_shift_t1 x ix y iy ly) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) x).
-
-(* constant 4832 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.(l_e_st_eq_landau_n_rt_rp_r_satz172d (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) x y (l_e_st_eq_landau_n_rt_rp_r_shift_t2 x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_satz168b y x ly) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y).
-
-(* constant 4833 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.(l_e_st_eq_landau_n_rt_rp_r_satz182d (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y (l_e_st_eq_landau_n_rt_rp_r_shift_t3 x ix y iy ly) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4834 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.(l_e_st_eq_landau_n_rt_rp_r_intmn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1) y iy : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4835 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.(l_e_st_eq_landau_n_rt_rp_r_posintnatrl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t4 x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_shift_t5 x ix y iy ly) : l_e_st_eq_landau_n_rt_rp_r_natrl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4836 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shiftl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.(l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 x ix y iy ly) : l_e_st_eq_landau_n_nat).
-
-(* constant 4837 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_n1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_st_eq_landau_n_inn (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) n : l_e_st_eq_landau_n_nat).
-
-(* constant 4838 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) n : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)).
-
-(* constant 4839 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_n2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4840 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_natintrl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n)) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n)).
-
-(* constant 4841 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shiftr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) l_e_st_eq_landau_n_rt_rp_r_1rl : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4842 *)
-definition l_e_st_eq_landau_n_rt_rp_r_intshiftr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_intmn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_t8 x ix y iy ly n) y iy) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n)).
-
-(* constant 4843 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t8a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) y) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) l_e_st_eq_landau_n_rt_rp_r_1rl) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) y (l_e_st_eq_landau_n_rt_rp_r_plmn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_mnpl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n)).
-
-(* constant 4844 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t9a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m).(l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m) l_e_st_eq_landau_n_rt_rp_r_1rl) y (l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m) l_e_st_eq_landau_n_rt_rp_r_1rl i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m) l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4845 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t10a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly m) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_t8a x ix y iy ly n)) (l_e_st_eq_landau_n_rt_rp_r_shift_t9a x ix y iy ly n m i) (l_e_st_eq_landau_n_rt_rp_r_shift_t8a x ix y iy ly m) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly m)).
-
-(* constant 4846 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t11a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m).(l_e_st_eq_landau_n_rt_rp_r_isntirl (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly m) (l_e_st_eq_landau_n_rt_rp_r_shift_t10a x ix y iy ly n m i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly m)).
-
-(* constant 4847 *)
-definition l_e_st_eq_landau_n_rt_rp_r_iseshiftr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m).(l_e_st_eq_landau_n_isinne (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) n m (l_e_st_eq_landau_n_rt_rp_r_shift_t11a x ix y iy ly n m i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) n m).
-
-(* constant 4848 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x.(l_e_st_eq_landau_n_rt_rp_r_satz188d (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x l_e_st_eq_landau_n_rt_rp_r_1rl m : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl)).
-
-(* constant 4849 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x.(l_e_st_eq_landau_n_rt_rp_r_ismore1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_plmn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_shift_t9 x ix y iy ly n m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl)).
-
-(* constant 4850 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x.(l_e_st_eq_landau_n_rt_rp_r_satz188d (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 y) (l_e_st_eq_landau_n_rt_rp_r_shift_t10 x ix y iy ly n m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4851 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x.(l_e_st_eq_landau_n_rt_rp_r_ismore1 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) y) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mnpl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t11 x ix y iy ly n m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4852 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x.(l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 x ix y iy ly))) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n))) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shift_t12 x ix y iy ly n m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n)))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly))).
-
-(* constant 4853 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x.(l_e_st_eq_landau_n_rt_rp_r_lemmaiva5 (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n))) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_shift_t13 x ix y iy ly n m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n))) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)).
-
-(* constant 4854 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t15 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x.(l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n))) (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_isntrl2 (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n)) (l_e_st_eq_landau_n_rt_rp_r_shift_t14 x ix y iy ly n m) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)).
-
-(* constant 4855 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t16 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_satz10d (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_shift_t7 x ix y iy ly n)) (λt:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x.l_e_st_eq_landau_n_rt_rp_r_shift_t15 x ix y iy ly n t) : l_not (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x)).
-
-(* constant 4856 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shiftrls ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_satz167e (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x (l_e_st_eq_landau_n_rt_rp_r_shift_t16 x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) x).
-
-(* constant 4857 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t17 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n).(l_e_st_eq_landau_n_rt_rp_r_satz188d y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl m : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl y l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl)).
-
-(* constant 4858 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t18 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n).(l_e_st_eq_landau_n_rt_rp_r_ismore12 (l_e_st_eq_landau_n_rt_rp_r_pl y l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_1rl y) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) (l_e_st_eq_landau_n_rt_rp_r_compl y l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_plmn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_shift_t17 x ix y iy ly n m) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_1rl y) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y)).
-
-(* constant 4859 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t19 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n).(l_e_st_eq_landau_n_rt_rp_r_satz188a l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y (l_e_st_eq_landau_n_rt_rp_r_shift_t18 x ix y iy ly n m) : l_e_st_eq_landau_n_rt_rp_r_more l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n)).
-
-(* constant 4860 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t20 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_rt_rp_r_more y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n).(l_e_st_eq_landau_n_rt_rp_r_lemmaiva5 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_t19 x ix y iy ly n m) : l_e_st_eq_landau_n_more l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n)).
-
-(* constant 4861 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t21 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_more y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n)) (l_e_st_eq_landau_n_more l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n)) (l_e_st_eq_landau_n_satz10d l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n))) (λt:l_e_st_eq_landau_n_rt_rp_r_more y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n).l_e_st_eq_landau_n_rt_rp_r_shift_t20 x ix y iy ly n t) : l_not (l_e_st_eq_landau_n_rt_rp_r_more y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n))).
-
-(* constant 4862 *)
-definition l_e_st_eq_landau_n_rt_rp_r_lsshiftr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_satz167e y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_t21 x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n)).
-
-(* constant 4863 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t22 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_and3e1 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x) a : l_e_st_eq_landau_n_rt_rp_r_intrl u).
-
-(* constant 4864 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t23 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_and3e2 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x) a : l_e_st_eq_landau_n_rt_rp_r_lessis y u).
-
-(* constant 4865 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t24 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_and3e3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x) a : l_e_st_eq_landau_n_rt_rp_r_lessis u x).
-
-(* constant 4866 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t25 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).λl:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_satz188f (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 y) (l_e_st_eq_landau_n_rt_rp_r_satz188f u x l_e_st_eq_landau_n_rt_rp_r_1rl l) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4867 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t26 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).λi:l_e_st_eq_landau_n_rt_rp_r_is u x.(l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y (l_e_st_eq_landau_n_rt_rp_r_ispl1 u x l_e_st_eq_landau_n_rt_rp_r_1rl i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4868 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t27 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_less u x) (l_e_st_eq_landau_n_rt_rp_r_is u x) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)) (l_e_st_eq_landau_n_rt_rp_r_shift_t24 x ix y iy ly u a) (λt:l_e_st_eq_landau_n_rt_rp_r_less u x.l_e_st_eq_landau_n_rt_rp_r_shift_t25 x ix y iy ly u a t) (λt:l_e_st_eq_landau_n_rt_rp_r_is u x.l_e_st_eq_landau_n_rt_rp_r_shift_t26 x ix y iy ly u a t) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4869 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_ul ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_st_eq_landau_n_rt_rp_r_shiftl u (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly u a) y iy (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly u a) : l_e_st_eq_landau_n_nat).
-
-(* constant 4870 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t28 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_st_eq_landau_n_rt_rp_r_islessis12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 u (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly u a) y iy (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly u a))) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shift_t27 x ix y iy ly u a) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly))).
-
-(* constant 4871 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t29 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_imp_th3 (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly))) (l_e_st_eq_landau_n_rt_rp_r_satz167d (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shift_t28 x ix y iy ly u a)) (λt:l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_lemmaiva6 (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) t) : l_not (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly))).
-
-(* constant 4872 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t30 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_st_eq_landau_n_satz10e (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_shift_t29 x ix y iy ly u a) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)).
-
-(* constant 4873 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shiftl1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shift_t30 x ix y iy ly u a) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)).
-
-(* constant 4874 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t31 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shift_t30 x ix y iy ly u a) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a))).
-
-(* constant 4875 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t32 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 u (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly u a) y iy (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly u a))) (l_e_st_eq_landau_n_rt_rp_r_isnterl (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_shift_t31 x ix y iy ly u a)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a))).
-
-(* constant 4876 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t33 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) y) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) l_e_st_eq_landau_n_rt_rp_r_1rl) u (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) y) (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_plmn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y)) (l_e_st_eq_landau_n_rt_rp_r_mnpl u l_e_st_eq_landau_n_rt_rp_r_1rl) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) y) l_e_st_eq_landau_n_rt_rp_r_1rl) u).
-
-(* constant 4877 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shiftinv1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real u (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) y) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_shift_t33 x ix y iy ly u a) (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) y) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a)) y) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a)) y (l_e_st_eq_landau_n_rt_rp_r_shift_t32 x ix y iy ly u a))) : l_e_st_eq_landau_n_rt_rp_r_is u (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a))).
-
-(* constant 4878 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shiftinv2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real u (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a)) (l_e_st_eq_landau_n_rt_rp_r_shiftinv1 x ix y iy ly u a) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a)) u).
-
-(* constant 4879 *)
-definition l_e_st_eq_landau_n_rt_rp_r_seq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λalpha:Type[0].(Πt:l_e_st_eq_landau_n_rt_rp_r_real.Πu:l_e_st_eq_landau_n_rt_rp_r_intrl t.Πv:l_e_st_eq_landau_n_rt_rp_r_lessis y t.Πw:l_e_st_eq_landau_n_rt_rp_r_lessis t x.alpha : Type[0]).
-
-(* constant 4880 *)
-definition l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λalpha:Type[0].λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly alpha.(∀t:l_e_st_eq_landau_n_rt_rp_r_real.∀it:l_e_st_eq_landau_n_rt_rp_r_intrl t.∀lt:l_e_st_eq_landau_n_rt_rp_r_lessis y t.∀tl:l_e_st_eq_landau_n_rt_rp_r_lessis t x.∀u:l_e_st_eq_landau_n_rt_rp_r_real.∀iu:l_e_st_eq_landau_n_rt_rp_r_intrl u.∀lu:l_e_st_eq_landau_n_rt_rp_r_lessis y u.∀ul:l_e_st_eq_landau_n_rt_rp_r_lessis u x.∀v:l_e_st_eq_landau_n_rt_rp_r_is t u.l_e_is alpha (s t it lt tl) (s u iu lu ul) : Prop).
-
-(* constant 4881 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shiftf ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λalpha:Type[0].λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly alpha.(λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).f (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly t) (l_e_st_eq_landau_n_rt_rp_r_intshiftr x ix y iy ly t) (l_e_st_eq_landau_n_rt_rp_r_lsshiftr x ix y iy ly t) (l_e_st_eq_landau_n_rt_rp_r_shiftrls x ix y iy ly t) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).alpha).
-
-(* constant 4882 *)
-definition l_e_st_eq_landau_n_rt_rp_r_inseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.(∀t:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_intrl t.∀v:l_e_st_eq_landau_n_rt_rp_r_lessis y t.∀w:l_e_st_eq_landau_n_rt_rp_r_lessis t x.l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl (s t u v w)) (l_e_st_eq_landau_n_rt_rp_r_lessis y (s t u v w)) (l_e_st_eq_landau_n_rt_rp_r_lessis (s t u v w) x) : Prop).
-
-(* constant 4883 *)
-definition l_e_st_eq_landau_n_rt_rp_r_injseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.(∀t:l_e_st_eq_landau_n_rt_rp_r_real.∀it:l_e_st_eq_landau_n_rt_rp_r_intrl t.∀lt:l_e_st_eq_landau_n_rt_rp_r_lessis y t.∀tl:l_e_st_eq_landau_n_rt_rp_r_lessis t x.∀u:l_e_st_eq_landau_n_rt_rp_r_real.∀iu:l_e_st_eq_landau_n_rt_rp_r_intrl u.∀lu:l_e_st_eq_landau_n_rt_rp_r_lessis y u.∀ul:l_e_st_eq_landau_n_rt_rp_r_lessis u x.∀v:l_e_st_eq_landau_n_rt_rp_r_is (s t it lt tl) (s u iu lu ul).l_e_st_eq_landau_n_rt_rp_r_is t u : Prop).
-
-(* constant 4884 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_prop1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λv:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl v) (l_e_st_eq_landau_n_rt_rp_r_lessis y v) (l_e_st_eq_landau_n_rt_rp_r_lessis v x).(l_e_st_eq_landau_n_rt_rp_r_is u (s v (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly v a) (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly v a) (l_e_st_eq_landau_n_rt_rp_r_shift_t24 x ix y iy ly v a)) : Prop).
-
-(* constant 4885 *)
-definition l_e_st_eq_landau_n_rt_rp_r_improp ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λv:l_e_st_eq_landau_n_rt_rp_r_real.(l_and (l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl v) (l_e_st_eq_landau_n_rt_rp_r_lessis y v) (l_e_st_eq_landau_n_rt_rp_r_lessis v x)) (∀t:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl v) (l_e_st_eq_landau_n_rt_rp_r_lessis y v) (l_e_st_eq_landau_n_rt_rp_r_lessis v x).l_e_st_eq_landau_n_rt_rp_r_shift_prop1 x ix y iy ly s u v t) : Prop).
-
-(* constant 4886 *)
-definition l_e_st_eq_landau_n_rt_rp_r_imseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_some (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s u t) : Prop).
-
-(* constant 4887 *)
-definition l_e_st_eq_landau_n_rt_rp_r_surjseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.(∀t:l_e_st_eq_landau_n_rt_rp_r_real.∀u:l_e_st_eq_landau_n_rt_rp_r_intrl t.∀v:l_e_st_eq_landau_n_rt_rp_r_lessis y t.∀w:l_e_st_eq_landau_n_rt_rp_r_lessis t x.l_e_st_eq_landau_n_rt_rp_r_imseq x ix y iy ly s t : Prop).
-
-(* constant 4888 *)
-definition l_e_st_eq_landau_n_rt_rp_r_perm ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.(l_and (l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s) (l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s) : Prop).
-
-(* constant 4889 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_ns ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_intshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_lsshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftrls x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4890 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t34 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(ins (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_intshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_lsshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftrls x ix y iy ly n) : l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n)) (l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n)) (l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) x)).
-
-(* constant 4891 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shiftseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.(λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins t) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins t) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)).
-
-(* constant 4892 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t35 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λjs:l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins m).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins n)) (l_e_st_eq_landau_n_rt_rp_r_shift_t30 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins n)) (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins m)) (l_e_st_eq_landau_n_rt_rp_r_shift_t30 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins m)) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins n)) (l_e_st_eq_landau_n_rt_rp_r_shift_ul x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins m))).
-
-(* constant 4893 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t36 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λjs:l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins m).(l_e_st_eq_landau_n_rt_rp_r_isrlint (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins n)) y iy (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins n))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins m)) y iy (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins m))) (l_e_st_eq_landau_n_rt_rp_r_shift_t35 x ix y iy ly s ins js n m i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) l_e_st_eq_landau_n_rt_rp_r_1rl) y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) l_e_st_eq_landau_n_rt_rp_r_1rl) y)).
-
-(* constant 4894 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t37 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λjs:l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins m).(l_e_st_eq_landau_n_rt_rp_r_satz188b (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_satz188b (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 y) (l_e_st_eq_landau_n_rt_rp_r_shift_t36 x ix y iy ly s ins js n m i)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins m)).
-
-(* constant 4895 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t38 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λjs:l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins m).(js (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_intshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_lsshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftrls x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m) (l_e_st_eq_landau_n_rt_rp_r_intshiftr x ix y iy ly m) (l_e_st_eq_landau_n_rt_rp_r_lsshiftr x ix y iy ly m) (l_e_st_eq_landau_n_rt_rp_r_shiftrls x ix y iy ly m) (l_e_st_eq_landau_n_rt_rp_r_shift_t37 x ix y iy ly s ins js n m i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly m)).
-
-(* constant 4896 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t39 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λjs:l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins m).(l_e_st_eq_landau_n_rt_rp_r_satz188b (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly m) y (l_e_st_eq_landau_n_rt_rp_r_satz188b (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) y) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly m) y) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_shift_t38 x ix y iy ly s ins js n m i)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_n2 x ix y iy ly m)).
-
-(* constant 4897 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t40 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λjs:l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins m).(l_e_st_eq_landau_n_rt_rp_r_isntirl (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly m) (l_e_st_eq_landau_n_rt_rp_r_shift_t39 x ix y iy ly s ins js n m i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shift_n1 x ix y iy ly m)).
-
-(* constant 4898 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t41 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λjs:l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins n) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins m).(l_e_st_eq_landau_n_isinne (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly) n m (l_e_st_eq_landau_n_rt_rp_r_shift_t40 x ix y iy ly s ins js n m i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) n m).
-
-(* constant 4899 *)
-definition l_e_st_eq_landau_n_rt_rp_r_injshiftseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λjs:l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s.(λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λv:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins t) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins u).l_e_st_eq_landau_n_rt_rp_r_shift_t41 x ix y iy ly s ins js t u v : l_e_injective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins)).
-
-(* constant 4900 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t42 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(ss (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_intshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_lsshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftrls x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_imseq x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n)).
-
-(* constant 4901 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t43 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u.(l_ande1 (l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x)) (∀t:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).l_e_st_eq_landau_n_rt_rp_r_shift_prop1 x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u t) p : l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x)).
-
-(* constant 4902 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t44 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u.(l_r_ande2 (l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x)) (λt:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).l_e_st_eq_landau_n_rt_rp_r_shift_prop1 x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u t) p : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (s u (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t24 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)))).
-
-(* constant 4903 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_ul1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u.(l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)).
-
-(* constant 4904 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t45 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u.(pri u (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t24 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_intshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_lsshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shiftrls x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shiftinv1 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) : l_e_st_eq_landau_n_rt_rp_r_is (s u (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t24 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p))) (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p))).
-
-(* constant 4905 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t46 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u.(l_e_st_eq_landau_n_rt_rp_r_shiftinv1 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)))).
-
-(* constant 4906 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t47 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (s u (l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t24 x ix y iy ly u (l_e_st_eq_landau_n_rt_rp_r_shift_t43 x ix y iy ly s ins pri ss n u p))) (l_e_st_eq_landau_n_rt_rp_r_shift_ns x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p))) (l_e_st_eq_landau_n_rt_rp_r_shift_t44 x ix y iy ly s ins pri ss n u p) (l_e_st_eq_landau_n_rt_rp_r_shift_t45 x ix y iy ly s ins pri ss n u p) (l_e_st_eq_landau_n_rt_rp_r_shift_t46 x ix y iy ly s ins pri ss n u p) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)))).
-
-(* constant 4907 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t48 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u.(l_e_st_eq_landau_n_rt_rp_r_iseshiftr x ix y iy ly n (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p)) (l_e_st_eq_landau_n_rt_rp_r_shift_t47 x ix y iy ly s ins pri ss n u p) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) n (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p))).
-
-(* constant 4908 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t49 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).λu:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) u.(l_somei (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) n (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins t)) (l_e_st_eq_landau_n_rt_rp_r_shift_ul1 x ix y iy ly s ins pri ss n u p) (l_e_st_eq_landau_n_rt_rp_r_shift_t48 x ix y iy ly s ins pri ss n u p) : l_e_image (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins) n).
-
-(* constant 4909 *)
-definition l_e_st_eq_landau_n_rt_rp_r_shift_t50 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).(l_someapp l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) t) (l_e_st_eq_landau_n_rt_rp_r_shift_t42 x ix y iy ly s ins pri ss n) (l_e_image (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins) n) (λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_improp x ix y iy ly s (l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n) t.l_e_st_eq_landau_n_rt_rp_r_shift_t49 x ix y iy ly s ins pri ss n t u) : l_e_image (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins) n).
-
-(* constant 4910 *)
-definition l_e_st_eq_landau_n_rt_rp_r_surjshiftseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λss:l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s.(λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_shift_t50 x ix y iy ly s ins pri ss t : l_e_surjective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins)).
-
-(* constant 4911 *)
-definition l_e_st_eq_landau_n_rt_rp_r_bijshiftseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.(l_andi (l_e_injective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins)) (l_e_surjective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins)) (l_e_st_eq_landau_n_rt_rp_r_injshiftseq x ix y iy ly s ins (l_ande1 (l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s) (l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s) ps)) (l_e_st_eq_landau_n_rt_rp_r_surjshiftseq x ix y iy ly s ins pri (l_ande2 (l_e_st_eq_landau_n_rt_rp_r_injseq x ix y iy ly s) (l_e_st_eq_landau_n_rt_rp_r_surjseq x ix y iy ly s) ps)) : l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly)) (l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins)).
-
-(* constant 4912 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_complex ≝ (l_e_st_eq_landau_n_pair1type l_e_st_eq_landau_n_rt_rp_r_real : Type[0]).
-
-(* constant 4913 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_cx ≝ (l_e_st_eq_landau_n_rt_rp_r_c_complex : Type[0]).
-
-(* constant 4914 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_is ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_is l_e_st_eq_landau_n_rt_rp_r_c_cx x y : Prop).
-
-(* constant 4915 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_nis ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_not (l_e_st_eq_landau_n_rt_rp_r_c_is x y) : Prop).
-
-(* constant 4916 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_some ≝ λp:∀t:l_e_st_eq_landau_n_rt_rp_r_c_complex.Prop.(l_some l_e_st_eq_landau_n_rt_rp_r_c_cx p : Prop).
-
-(* constant 4917 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_all ≝ λp:∀t:l_e_st_eq_landau_n_rt_rp_r_c_complex.Prop.(l_all l_e_st_eq_landau_n_rt_rp_r_c_cx p : Prop).
-
-(* constant 4918 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_one ≝ λp:∀t:l_e_st_eq_landau_n_rt_rp_r_c_complex.Prop.(l_e_one l_e_st_eq_landau_n_rt_rp_r_c_cx p : Prop).
-
-(* constant 4919 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_pli ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_pair1 l_e_st_eq_landau_n_rt_rp_r_real a b : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 4920 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_re ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_first1 l_e_st_eq_landau_n_rt_rp_r_real x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4921 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_im ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_second1 l_e_st_eq_landau_n_rt_rp_r_real x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 4922 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_reis ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_first1is1 l_e_st_eq_landau_n_rt_rp_r_real a b : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) a).
-
-(* constant 4923 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isre ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_first1is2 l_e_st_eq_landau_n_rt_rp_r_real a b : l_e_st_eq_landau_n_rt_rp_r_is a (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b))).
-
-(* constant 4924 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_imis ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_second1is1 l_e_st_eq_landau_n_rt_rp_r_real a b : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) b).
-
-(* constant 4925 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isim ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_second1is2 l_e_st_eq_landau_n_rt_rp_r_real a b : l_e_st_eq_landau_n_rt_rp_r_is b (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b))).
-
-(* constant 4926 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_pliis ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_pair1is1 l_e_st_eq_landau_n_rt_rp_r_real x : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) x).
-
-(* constant 4927 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ispli ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_pair1is2 l_e_st_eq_landau_n_rt_rp_r_real x : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))).
-
-(* constant 4928 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscere ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_re t) x y i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)).
-
-(* constant 4929 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isceim ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_im t) x y i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)).
-
-(* constant 4930 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isrecx1 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is a b.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_pli t c) a b i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli a c) (l_e_st_eq_landau_n_rt_rp_r_c_pli b c)).
-
-(* constant 4931 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is a b.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_pli c t) a b i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli c a) (l_e_st_eq_landau_n_rt_rp_r_c_pli c b)).
-
-(* constant 4932 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is a b.λj:l_e_st_eq_landau_n_rt_rp_r_is c d.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pli a c) (l_e_st_eq_landau_n_rt_rp_r_c_pli b c) (l_e_st_eq_landau_n_rt_rp_r_c_pli b d) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx1 a b c i) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 c d b j) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli a c) (l_e_st_eq_landau_n_rt_rp_r_c_pli b d)).
-
-(* constant 4933 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz206 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x : l_e_st_eq_landau_n_rt_rp_r_c_is x x).
-
-(* constant 4934 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz207 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx x y i : l_e_st_eq_landau_n_rt_rp_r_c_is y x).
-
-(* constant 4935 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz208 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_c_is y z.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx x y z i j : l_e_st_eq_landau_n_rt_rp_r_c_is x z).
-
-(* constant 4936 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_0c ≝ (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 4937 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_1c ≝ (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0 : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 4938 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_pl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 4939 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_plis12a ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))) (l_e_st_eq_landau_n_rt_rp_r_pl a c) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))) (l_e_st_eq_landau_n_rt_rp_r_pl b d) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) a (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) c (l_e_st_eq_landau_n_rt_rp_r_c_reis a b) (l_e_st_eq_landau_n_rt_rp_r_c_reis c d)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) b (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) d (l_e_st_eq_landau_n_rt_rp_r_c_imis a b) (l_e_st_eq_landau_n_rt_rp_r_c_imis c d)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl a c) (l_e_st_eq_landau_n_rt_rp_r_pl b d))).
-
-(* constant 4940 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_plis12b ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl a c) (l_e_st_eq_landau_n_rt_rp_r_pl b d)) (l_e_st_eq_landau_n_rt_rp_r_c_plis12a a b c d) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl a c) (l_e_st_eq_landau_n_rt_rp_r_pl b d)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))).
-
-(* constant 4941 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_plis1a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_pl s (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) r (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_reis r s)) (l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) s (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_imis r s)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_pl s (l_e_st_eq_landau_n_rt_rp_r_c_im x)))).
-
-(* constant 4942 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_plis1b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_pl s (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_plis1a x r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_pl s (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x)).
-
-(* constant 4943 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_plis2a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) s) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) r (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_reis r s)) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) s (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_imis r s)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) s))).
-
-(* constant 4944 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_plis2b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) s)) (l_e_st_eq_landau_n_rt_rp_r_c_plis2a x r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) s)) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))).
-
-(* constant 4945 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ispl1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl t z) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)).
-
-(* constant 4946 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ispl2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl z t) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl z x) (l_e_st_eq_landau_n_rt_rp_r_c_pl z y)).
-
-(* constant 4947 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ispl12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_c_is z u.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) (l_e_st_eq_landau_n_rt_rp_r_c_ispl1 x y z i) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 z u y j) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y u)).
-
-(* constant 4948 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz209 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y x)).
-
-(* constant 4949 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_compl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz209 x y : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y x)).
-
-(* constant 4950 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz210 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) x (l_e_st_eq_landau_n_rt_rp_r_c_plis2a x l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_pliis x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x l_e_st_eq_landau_n_rt_rp_r_c_0c) x).
-
-(* constant 4951 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz210a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl x l_e_st_eq_landau_n_rt_rp_r_c_0c) x (l_e_st_eq_landau_n_rt_rp_r_c_satz210 x) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_pl x l_e_st_eq_landau_n_rt_rp_r_c_0c)).
-
-(* constant 4952 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz210b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl l_e_st_eq_landau_n_rt_rp_r_c_0c x) (l_e_st_eq_landau_n_rt_rp_r_c_pl x l_e_st_eq_landau_n_rt_rp_r_c_0c) x (l_e_st_eq_landau_n_rt_rp_r_c_compl l_e_st_eq_landau_n_rt_rp_r_c_0c x) (l_e_st_eq_landau_n_rt_rp_r_c_satz210 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl l_e_st_eq_landau_n_rt_rp_r_c_0c x) x).
-
-(* constant 4953 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz210c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl l_e_st_eq_landau_n_rt_rp_r_c_0c x) x (l_e_st_eq_landau_n_rt_rp_r_c_satz210b x) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_pl l_e_st_eq_landau_n_rt_rp_r_c_0c x)).
-
-(* constant 4954 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz211 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)))) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_plis1a z (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_asspl1 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_asspl1 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_c_plis2b x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z))).
-
-(* constant 4955 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_asspl1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz211 x y z : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z))).
-
-(* constant 4956 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_asspl2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_asspl1 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z)).
-
-(* constant 4957 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2212_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re u)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pl y u)) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_isre (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re u)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im u))) (l_e_st_eq_landau_n_rt_rp_r_c_iscere (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re u)) (l_e_st_eq_landau_n_rt_rp_r_c_re x)).
-
-(* constant 4958 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2212_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im u)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pl y u)) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_isim (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re u)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im u))) (l_e_st_eq_landau_n_rt_rp_r_c_isceim (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im u)) (l_e_st_eq_landau_n_rt_rp_r_c_im x)).
-
-(* constant 4959 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2212_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x.(l_e_st_eq_landau_n_rt_rp_r_satz187d (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re u) (l_e_st_eq_landau_n_rt_rp_r_c_2212_t1 x y u i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re u) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))).
-
-(* constant 4960 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2212_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x.(l_e_st_eq_landau_n_rt_rp_r_satz187d (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im u) (l_e_st_eq_landau_n_rt_rp_r_c_2212_t2 x y u i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im u) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))).
-
-(* constant 4961 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx u (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re u) (l_e_st_eq_landau_n_rt_rp_r_c_im u)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_ispli u) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_re u) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im u) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_2212_t3 x y u i) (l_e_st_eq_landau_n_rt_rp_r_c_2212_t4 x y u i)) : l_e_st_eq_landau_n_rt_rp_r_c_is u (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))).
-
-(* constant 4962 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) x (l_e_st_eq_landau_n_rt_rp_r_c_plis2a y (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_satz187a (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_satz187a (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_pliis x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) x).
-
-(* constant 4963 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_somei l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y t) x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_satz212b x y) : l_e_st_eq_landau_n_rt_rp_r_c_some (λt:l_e_st_eq_landau_n_rt_rp_r_c_complex.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y t) x)).
-
-(* constant 4964 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_onei l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y t) x) (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y t) x.λw:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x.l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx t u (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_satz212a x y t v) (l_e_st_eq_landau_n_rt_rp_r_c_satz212a x y u w)) (l_e_st_eq_landau_n_rt_rp_r_c_satz212c x y) : l_e_st_eq_landau_n_rt_rp_r_c_one (λt:l_e_st_eq_landau_n_rt_rp_r_c_complex.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y t) x)).
-
-(* constant 4965 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mn ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 4966 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mnis12a ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))) (l_e_st_eq_landau_n_rt_rp_r_mn a c) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))) (l_e_st_eq_landau_n_rt_rp_r_mn b d) (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) a (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) c (l_e_st_eq_landau_n_rt_rp_r_c_reis a b) (l_e_st_eq_landau_n_rt_rp_r_c_reis c d)) (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) b (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) d (l_e_st_eq_landau_n_rt_rp_r_c_imis a b) (l_e_st_eq_landau_n_rt_rp_r_c_imis c d)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn a c) (l_e_st_eq_landau_n_rt_rp_r_mn b d))).
-
-(* constant 4967 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mnis12b ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn a c) (l_e_st_eq_landau_n_rt_rp_r_mn b d)) (l_e_st_eq_landau_n_rt_rp_r_c_mnis12a a b c d) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn a c) (l_e_st_eq_landau_n_rt_rp_r_mn b d)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))).
-
-(* constant 4968 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mnis1a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_mn r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_mn s (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) r (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_reis r s)) (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) s (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_imis r s)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_mn s (l_e_st_eq_landau_n_rt_rp_r_c_im x)))).
-
-(* constant 4969 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mnis1b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_mn s (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_mnis1a x r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_mn s (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x)).
-
-(* constant 4970 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mnis2a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) s) (l_e_st_eq_landau_n_rt_rp_r_ismn2 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) r (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_reis r s)) (l_e_st_eq_landau_n_rt_rp_r_ismn2 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) s (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_imis r s)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) s))).
-
-(* constant 4971 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mnis2b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) s)) (l_e_st_eq_landau_n_rt_rp_r_c_mnis2a x r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) s)) (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))).
-
-(* constant 4972 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ismn1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_mn t z) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)).
-
-(* constant 4973 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ismn2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_mn z t) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn z x) (l_e_st_eq_landau_n_rt_rp_r_c_mn z y)).
-
-(* constant 4974 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ismn12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_c_is z u.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) (l_e_st_eq_landau_n_rt_rp_r_c_mn y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn y u) (l_e_st_eq_landau_n_rt_rp_r_c_ismn1 x y z i) (l_e_st_eq_landau_n_rt_rp_r_c_ismn2 z u y j) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) (l_e_st_eq_landau_n_rt_rp_r_c_mn y u)).
-
-(* constant 4975 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212d ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x.(l_e_st_eq_landau_n_rt_rp_r_c_satz212a x y u i : l_e_st_eq_landau_n_rt_rp_r_c_is u (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)).
-
-(* constant 4976 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212e ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) x.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx u (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz212d x y u i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) u).
-
-(* constant 4977 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212f ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl u y) x.(l_e_st_eq_landau_n_rt_rp_r_c_satz212d x y u (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) (l_e_st_eq_landau_n_rt_rp_r_c_pl u y) x (l_e_st_eq_landau_n_rt_rp_r_c_compl y u) i) : l_e_st_eq_landau_n_rt_rp_r_c_is u (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)).
-
-(* constant 4978 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212g ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl u y) x.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx u (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz212f x y u i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) u).
-
-(* constant 4979 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz212h ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212b x y : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) x).
-
-(* constant 4980 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2213_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_re l_e_st_eq_landau_n_rt_rp_r_c_0c) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_isre (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_iscere (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) l_e_st_eq_landau_n_rt_rp_r_c_0c i) (l_e_st_eq_landau_n_rt_rp_r_c_reis l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4981 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2213_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_im l_e_st_eq_landau_n_rt_rp_r_c_0c) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_isim (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_isceim (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) l_e_st_eq_landau_n_rt_rp_r_c_0c i) (l_e_st_eq_landau_n_rt_rp_r_c_imis l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4982 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2213_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_satz182b (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_2213_t1 x y i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)).
-
-(* constant 4983 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2213_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_satz182b (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_2213_t2 x y i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)).
-
-(* constant 4984 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz213a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) y (l_e_st_eq_landau_n_rt_rp_r_c_ispli x) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_2213_t3 x y i) (l_e_st_eq_landau_n_rt_rp_r_c_2213_t4 x y i)) (l_e_st_eq_landau_n_rt_rp_r_c_pliis y) : l_e_st_eq_landau_n_rt_rp_r_c_is x y).
-
-(* constant 4985 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2213_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_st_eq_landau_n_rt_rp_r_satz182e (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_iscere x y i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4986 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2213_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_st_eq_landau_n_rt_rp_r_satz182e (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_isceim x y i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 4987 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz213b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_2213_t5 x y i) (l_e_st_eq_landau_n_rt_rp_r_c_2213_t6 x y i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 4988 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_m0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_mn l_e_st_eq_landau_n_rt_rp_r_c_0c x : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 4989 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz214 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_im l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_pl01 (l_e_st_eq_landau_n_rt_rp_r_c_re l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_reis l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl01 (l_e_st_eq_landau_n_rt_rp_r_c_im l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_imis l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))).
-
-(* constant 4990 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz214a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_satz214 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)).
-
-(* constant 4991 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_m0isa ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 a) (l_e_st_eq_landau_n_rt_rp_r_m0 b)) (l_e_st_eq_landau_n_rt_rp_r_c_satz214 (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b))) (l_e_st_eq_landau_n_rt_rp_r_m0 a) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b))) (l_e_st_eq_landau_n_rt_rp_r_m0 b) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) a (l_e_st_eq_landau_n_rt_rp_r_c_reis a b)) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) b (l_e_st_eq_landau_n_rt_rp_r_c_imis a b))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 a) (l_e_st_eq_landau_n_rt_rp_r_m0 b))).
-
-(* constant 4992 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_m0isb ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 a) (l_e_st_eq_landau_n_rt_rp_r_m0 b)) (l_e_st_eq_landau_n_rt_rp_r_c_m0isa a b) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 a) (l_e_st_eq_landau_n_rt_rp_r_m0 b)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli a b))).
-
-(* constant 4993 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ism0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_m0 t) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)).
-
-(* constant 4994 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz215 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) x (l_e_st_eq_landau_n_rt_rp_r_c_ism0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_satz214 x)) (l_e_st_eq_landau_n_rt_rp_r_c_m0isa (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_satz177 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_satz177 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_pliis x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) x).
-
-(* constant 4995 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz215a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) x (l_e_st_eq_landau_n_rt_rp_r_c_satz215 x) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x))).
-
-(* constant 4996 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz215b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) y (l_e_st_eq_landau_n_rt_rp_r_c_ism0 x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y) i) (l_e_st_eq_landau_n_rt_rp_r_c_satz215 y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y).
-
-(* constant 4997 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz215c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y (l_e_st_eq_landau_n_rt_rp_r_c_satz215b x y i) : l_e_st_eq_landau_n_rt_rp_r_c_is y (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)).
-
-(* constant 4998 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz215d ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y.(l_e_st_eq_landau_n_rt_rp_r_c_satz215c y x (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y i) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)).
-
-(* constant 4999 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz215e ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y) (l_e_st_eq_landau_n_rt_rp_r_c_satz215d x y i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 y) x).
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "grundlagen_2_4.ma".
-
-(* constant 5000 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz216 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) x (l_e_st_eq_landau_n_rt_rp_r_c_satz214 x)) (l_e_st_eq_landau_n_rt_rp_r_c_plis2a x (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satz179 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_satz179 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5001 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2216_anders ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212h l_e_st_eq_landau_n_rt_rp_r_c_0c x : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5002 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz216a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) x) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_compl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) x) (l_e_st_eq_landau_n_rt_rp_r_c_satz216 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) x) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5003 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz217 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_m0isa (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_satz180 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_satz180 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_plis12b (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y) (l_e_st_eq_landau_n_rt_rp_r_c_satz214a x) (l_e_st_eq_landau_n_rt_rp_r_c_satz214a y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y))).
-
-(* constant 5004 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz217a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz217 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))).
-
-(* constant 5005 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz218 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_plis2b x (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y) x (l_e_st_eq_landau_n_rt_rp_r_c_satz214a y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y))).
-
-(* constant 5006 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz218a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz218 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)).
-
-(* constant 5007 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_2219_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 y))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_ism0 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz218 x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz217 x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) y (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_satz215 y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y)).
-
-(* constant 5008 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz219 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_mn y x) (l_e_st_eq_landau_n_rt_rp_r_c_2219_t1 x y) (l_e_st_eq_landau_n_rt_rp_r_c_compl (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_satz218a y x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn y x)).
-
-(* constant 5009 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz219a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mn y x)) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz219 y x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mn y x))).
-
-(* constant 5010 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ts ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 5011 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_rets ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5012 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_imts ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5013 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))) (l_e_st_eq_landau_n_rt_rp_r_ts a c) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))) (l_e_st_eq_landau_n_rt_rp_r_ts b d) (l_e_st_eq_landau_n_rt_rp_r_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) a (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) c (l_e_st_eq_landau_n_rt_rp_r_c_reis a b) (l_e_st_eq_landau_n_rt_rp_r_c_reis c d)) (l_e_st_eq_landau_n_rt_rp_r_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) b (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) d (l_e_st_eq_landau_n_rt_rp_r_c_imis a b) (l_e_st_eq_landau_n_rt_rp_r_c_imis c d)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rets (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts a c) (l_e_st_eq_landau_n_rt_rp_r_ts b d))).
-
-(* constant 5014 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))) (l_e_st_eq_landau_n_rt_rp_r_ts a d) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))) (l_e_st_eq_landau_n_rt_rp_r_ts b c) (l_e_st_eq_landau_n_rt_rp_r_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) a (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) d (l_e_st_eq_landau_n_rt_rp_r_c_reis a b) (l_e_st_eq_landau_n_rt_rp_r_c_imis c d)) (l_e_st_eq_landau_n_rt_rp_r_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) b (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) c (l_e_st_eq_landau_n_rt_rp_r_c_imis a b) (l_e_st_eq_landau_n_rt_rp_r_c_reis c d)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_imts (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts a d) (l_e_st_eq_landau_n_rt_rp_r_ts b c))).
-
-(* constant 5015 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_tsis12a ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_rets (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts a c) (l_e_st_eq_landau_n_rt_rp_r_ts b d)) (l_e_st_eq_landau_n_rt_rp_r_c_imts (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts a d) (l_e_st_eq_landau_n_rt_rp_r_ts b c)) (l_e_st_eq_landau_n_rt_rp_r_c_v3_t1 a b c d) (l_e_st_eq_landau_n_rt_rp_r_c_v3_t2 a b c d) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts a c) (l_e_st_eq_landau_n_rt_rp_r_ts b d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts a d) (l_e_st_eq_landau_n_rt_rp_r_ts b c)))).
-
-(* constant 5016 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_tsis12b ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts a c) (l_e_st_eq_landau_n_rt_rp_r_ts b d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts a d) (l_e_st_eq_landau_n_rt_rp_r_ts b c))) (l_e_st_eq_landau_n_rt_rp_r_c_tsis12a a b c d) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts a c) (l_e_st_eq_landau_n_rt_rp_r_ts b d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts a d) (l_e_st_eq_landau_n_rt_rp_r_ts b c))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli a b) (l_e_st_eq_landau_n_rt_rp_r_c_pli c d))).
-
-(* constant 5017 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) r (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_reis r s)) (l_e_st_eq_landau_n_rt_rp_r_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) s (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_imis r s)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rets (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_im x)))).
-
-(* constant 5018 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) r (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_reis r s)) (l_e_st_eq_landau_n_rt_rp_r_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) s (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_imis r s)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_imts (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_re x)))).
-
-(* constant 5019 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_tsis1a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_rets (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_imts (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_c_v3_t3 x r s) (l_e_st_eq_landau_n_rt_rp_r_c_v3_t4 x r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_re x))))).
-
-(* constant 5020 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_tsis1b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_re x)))) (l_e_st_eq_landau_n_rt_rp_r_c_tsis1a x r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_c_re x)))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) x)).
-
-(* constant 5021 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) s) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) r (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_reis r s)) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) s (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_imis r s)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rets x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) s))).
-
-(* constant 5022 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) r) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) s (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_imis r s)) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) r (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_reis r s)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_imts x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) r))).
-
-(* constant 5023 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_tsis2a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_rets x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) s)) (l_e_st_eq_landau_n_rt_rp_r_c_imts x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) r)) (l_e_st_eq_landau_n_rt_rp_r_c_v3_t5 x r s) (l_e_st_eq_landau_n_rt_rp_r_c_v3_t6 x r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) r)))).
-
-(* constant 5024 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_tsis2b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) r))) (l_e_st_eq_landau_n_rt_rp_r_c_tsis2a x r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) s)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) s) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) r))) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pli r s))).
-
-(* constant 5025 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ists1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t z) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)).
-
-(* constant 5026 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ists2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts z t) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y)).
-
-(* constant 5027 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ists12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_c_is z u.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 x y z i) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 z u y j) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u)).
-
-(* constant 5028 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3220_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_rets y x)).
-
-(* constant 5029 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3220_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_imts y x) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts y x)).
-
-(* constant 5030 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz220 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_rets y x) (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts y x) (l_e_st_eq_landau_n_rt_rp_r_c_3220_t1 x y) (l_e_st_eq_landau_n_rt_rp_r_c_3220_t2 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y x)).
-
-(* constant 5031 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_comts ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz220 x y : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y x)).
-
-(* constant 5032 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re l_e_st_eq_landau_n_rt_rp_r_c_0c) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_iscere x l_e_st_eq_landau_n_rt_rp_r_c_0c i) (l_e_st_eq_landau_n_rt_rp_r_c_reis l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5033 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im l_e_st_eq_landau_n_rt_rp_r_c_0c) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_isceim x l_e_st_eq_landau_n_rt_rp_r_c_0c i) (l_e_st_eq_landau_n_rt_rp_r_c_imis l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5034 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mod2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5035 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma1 x i)) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma2 x i))) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5036 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_re2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5037 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_im2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5038 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) n (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0.l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_ispli x) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0 i t)) : l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5039 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_ispos (l_e_st_eq_landau_n_rt_rp_r_c_v3_im2 x) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_v3_im2 x) (l_e_st_eq_landau_n_rt_rp_r_pl01 (l_e_st_eq_landau_n_rt_rp_r_c_v3_re2 x) (l_e_st_eq_landau_n_rt_rp_r_c_v3_im2 x) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x) i))) (l_e_st_eq_landau_n_rt_rp_r_possq (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_v3_t7 x n i)) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)).
-
-(* constant 5040 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_ispos (l_e_st_eq_landau_n_rt_rp_r_c_v3_re2 x) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_v3_re2 x) (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_c_v3_re2 x) (l_e_st_eq_landau_n_rt_rp_r_c_v3_im2 x) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x) i))) (l_e_st_eq_landau_n_rt_rp_r_possq (l_e_st_eq_landau_n_rt_rp_r_c_re x) o) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)).
-
-(* constant 5041 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0.λp:l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_pospl (l_e_st_eq_landau_n_rt_rp_r_c_v3_re2 x) (l_e_st_eq_landau_n_rt_rp_r_c_v3_im2 x) (l_e_st_eq_landau_n_rt_rp_r_possq (l_e_st_eq_landau_n_rt_rp_r_c_re x) o) (l_e_st_eq_landau_n_rt_rp_r_possq (l_e_st_eq_landau_n_rt_rp_r_c_im x) p) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)).
-
-(* constant 5042 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v3_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_v3_t9 x n o t) (λt:l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_v3_t10 x n o t) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)).
-
-(* constant 5043 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_v3_t8 x n t) (λt:l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_v3_t11 x n t) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)).
-
-(* constant 5044 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x))) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_0notn (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma3 x t)) (λt:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_pnotn (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma4 x t)) : l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x))).
-
-(* constant 5045 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma1 x i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5046 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma2 x i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5047 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t1 x y i)) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t2 x y i))) (l_e_st_eq_landau_n_rt_rp_r_satz187c l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl02 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5048 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t1 x y i)) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t2 x y i))) (l_e_st_eq_landau_n_rt_rp_r_pl02 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5049 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz221a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_3221_t3 x y i) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t4 x y i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5050 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz221b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y x) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_comts x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz221a y x i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5051 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma4 y n : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y)).
-
-(* constant 5052 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_reis (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma1 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5053 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_imis (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma2 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5054 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t6 x y i n)) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t7 x y i n))) (l_e_st_eq_landau_n_rt_rp_r_pl02 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5055 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_ii1r ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_re y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5056 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ir ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5057 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_ir1i ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5058 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5059 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_rr1r ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_re y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5060 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5061 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_ri1r ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_re y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5062 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ir ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5063 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_ri1i ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5064 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5065 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_3221_ii1r x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ir x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y) (l_e_st_eq_landau_n_rt_rp_r_assts1 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_3221_ii1r x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)).
-
-(* constant 5066 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3221_rr1r x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_ii1r x y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_disttm1 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_3221_rr1r x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_ii1r x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y) (l_e_st_eq_landau_n_rt_rp_r_assts1 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t9 x y i n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y))).
-
-(* constant 5067 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3221_ri1i x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_ir1i x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y)) (l_e_st_eq_landau_n_rt_rp_r_disttp1 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_3221_ri1i x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_ir1i x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y) (l_e_st_eq_landau_n_rt_rp_r_assts1 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_assts1 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y))).
-
-(* constant 5068 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t10 x y i n) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t11 x y i n)) (l_e_st_eq_landau_n_rt_rp_r_asspl2 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y)) (l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1ii x y) (l_e_st_eq_landau_n_rt_rp_r_plmn (l_e_st_eq_landau_n_rt_rp_r_c_3221_r1rr x y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_i1ri x y))) (l_e_st_eq_landau_n_rt_rp_r_distpt2 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y))).
-
-(* constant 5069 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t12 x y i n) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t8 x y i n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5070 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz192c (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t13 x y i n)) (l_e_st_eq_landau_n_rt_rp_r_pnot0 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t5 x y i n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5071 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t15 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_satz182b (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t6 x y i n)) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t14 x y i n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5072 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t16 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_pl01 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t14 x y i n))) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t7 x y i n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5073 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t17 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λj:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re y) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_v3_t7 y n j : l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_im y) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5074 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t18 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λj:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re y) l_e_st_eq_landau_n_rt_rp_r_0.(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im y) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz192c (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t15 x y i n)) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t17 x y i n j) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5075 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t19 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_re y) l_e_st_eq_landau_n_rt_rp_r_0.(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re y) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz192c (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t16 x y i n)) o : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5076 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t20 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re y) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re y) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_3221_t18 x y i n t) (λt:l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_re y) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_3221_t19 x y i n t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5077 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3221_t21 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_ispli x) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_3221_t14 x y i n) (l_e_st_eq_landau_n_rt_rp_r_c_3221_t20 x y i n)) : l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5078 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz221c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_or_th2 (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is y l_e_st_eq_landau_n_rt_rp_r_c_0c) (λt:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_3221_t21 x y i t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is y l_e_st_eq_landau_n_rt_rp_r_c_0c)).
-
-(* constant 5079 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz221d ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_or (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_or_th3 (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is y l_e_st_eq_landau_n_rt_rp_r_c_0c) n o) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_satz221c x y t) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5080 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3222_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satz195 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts02 (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz176b l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_re x)).
-
-(* constant 5081 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3222_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_ts02 (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_satz195 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_c_im x)).
-
-(* constant 5082 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz222 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_1rl))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) x (l_e_st_eq_landau_n_rt_rp_r_c_tsis2a x l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_3222_t1 x) (l_e_st_eq_landau_n_rt_rp_r_c_3222_t2 x)) (l_e_st_eq_landau_n_rt_rp_r_c_pliis x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x l_e_st_eq_landau_n_rt_rp_r_c_1c) x).
-
-(* constant 5083 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz222a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x l_e_st_eq_landau_n_rt_rp_r_c_1c) x (l_e_st_eq_landau_n_rt_rp_r_c_satz222 x) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_ts x l_e_st_eq_landau_n_rt_rp_r_c_1c)).
-
-(* constant 5084 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz222b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c x) (l_e_st_eq_landau_n_rt_rp_r_c_ts x l_e_st_eq_landau_n_rt_rp_r_c_1c) x (l_e_st_eq_landau_n_rt_rp_r_c_comts l_e_st_eq_landau_n_rt_rp_r_c_1c x) (l_e_st_eq_landau_n_rt_rp_r_c_satz222 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c x) x).
-
-(* constant 5085 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz222c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c x) x (l_e_st_eq_landau_n_rt_rp_r_c_satz222b x) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c x)).
-
-(* constant 5086 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3223_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_satz197b (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_satz195 (l_e_st_eq_landau_n_rt_rp_r_c_re x)))) (l_e_st_eq_landau_n_rt_rp_r_ts02 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz176b l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)))) (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz176b l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x))).
-
-(* constant 5087 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3223_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl))) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts02 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz176b l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_satz197b (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_satz195 (l_e_st_eq_landau_n_rt_rp_r_c_im x))))) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))).
-
-(* constant 5088 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz223 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) x (l_e_st_eq_landau_n_rt_rp_r_c_m0isa l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_tsis2a x (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_3223_t1 x) (l_e_st_eq_landau_n_rt_rp_r_c_3223_t2 x)) (l_e_st_eq_landau_n_rt_rp_r_c_satz214a x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)).
-
-(* constant 5089 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz223a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_satz223 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c))).
-
-(* constant 5090 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz223b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_comts (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c) x) (l_e_st_eq_landau_n_rt_rp_r_c_satz223 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c) x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)).
-
-(* constant 5091 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz223c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c) x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_satz223b x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c) x)).
-
-(* constant 5092 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5093 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5094 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3224_rxiy ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5095 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3224_ixry ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5096 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3224_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y) (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y))) (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y)) (l_e_st_eq_landau_n_rt_rp_r_satz197a (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_satz197a (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y))) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y)) (l_e_st_eq_landau_n_rt_rp_r_satz177 (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y))) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y)) (l_e_st_eq_landau_n_rt_rp_r_satz181a (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y) (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxry x y) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixiy x y)))).
-
-(* constant 5097 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3224_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxiy x y)) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixry x y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxiy x y) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixry x y))) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxiy x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixry x y)) (l_e_st_eq_landau_n_rt_rp_r_satz197a (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_satz197a (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_satz180a (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxiy x y) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixry x y)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3224_rxiy x y) (l_e_st_eq_landau_n_rt_rp_r_c_3224_ixry x y)))).
-
-(* constant 5098 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz224a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) y) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))))) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) y (l_e_st_eq_landau_n_rt_rp_r_c_satz214 x)) (l_e_st_eq_landau_n_rt_rp_r_c_tsis1a y (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_c_3224_t1 x y) (l_e_st_eq_landau_n_rt_rp_r_c_3224_t2 x y)) (l_e_st_eq_landau_n_rt_rp_r_c_m0isb (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y))).
-
-(* constant 5099 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz224b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 y) x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts y x)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_comts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz224a y x) (l_e_st_eq_landau_n_rt_rp_r_c_ism0 (l_e_st_eq_landau_n_rt_rp_r_c_ts y x) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_comts y x)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y))).
-
-(* constant 5100 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz224c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz224a x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz224b x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y))).
-
-(* constant 5101 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz224d ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz224c x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y)).
-
-(* constant 5102 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz224e ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz224a x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) y)).
-
-(* constant 5103 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz224f ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz224b x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y))).
-
-(* constant 5104 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz225 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 y))) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz224c x (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) y x (l_e_st_eq_landau_n_rt_rp_r_c_satz215 y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)).
-
-(* constant 5105 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz225a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz225 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_m0 y))).
-
-(* constant 5106 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_re z) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5107 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_iir ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_re z) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5108 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_rii ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_im z) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5109 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_iri ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im z) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5110 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_rri ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im z) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5111 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_iii ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_im z) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5112 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_rir ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_re z) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5113 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_irr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_re z) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5114 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z))))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)) (l_e_st_eq_landau_n_rt_rp_r_disttm1 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_disttp1 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_asspl1 (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_satz180a (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z))))).
-
-(* constant 5115 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_disttm1 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_disttp1 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z))) (l_e_st_eq_landau_n_rt_rp_r_asspl2 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z))).
-
-(* constant 5116 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z))) (l_e_st_eq_landau_n_rt_rp_r_c_tsis1a z (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t2 x y z)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z)))).
-
-(* constant 5117 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts a b) c) (l_e_st_eq_landau_n_rt_rp_r_ts a (l_e_st_eq_landau_n_rt_rp_r_ts b c)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts b c) a) (l_e_st_eq_landau_n_rt_rp_r_assts1 a b c) (l_e_st_eq_landau_n_rt_rp_r_comts a (l_e_st_eq_landau_n_rt_rp_r_ts b c)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts a b) c) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_ts b c) a)).
-
-(* constant 5118 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t5 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) c) (l_e_st_eq_landau_n_rt_rp_r_pl c (l_e_st_eq_landau_n_rt_rp_r_pl a b)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl c a) b) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_pl a b) c) (l_e_st_eq_landau_n_rt_rp_r_asspl2 c a b) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) c) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl c a) b)).
-
-(* constant 5119 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t6 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl a (l_e_st_eq_landau_n_rt_rp_r_pl b c)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl b c) a) (l_e_st_eq_landau_n_rt_rp_r_pl b (l_e_st_eq_landau_n_rt_rp_r_pl c a)) (l_e_st_eq_landau_n_rt_rp_r_compl a (l_e_st_eq_landau_n_rt_rp_r_pl b c)) (l_e_st_eq_landau_n_rt_rp_r_asspl1 b c a) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl a (l_e_st_eq_landau_n_rt_rp_r_pl b c)) (l_e_st_eq_landau_n_rt_rp_r_pl b (l_e_st_eq_landau_n_rt_rp_r_pl c a))).
-
-(* constant 5120 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr y z x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5121 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_iir y z x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5122 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_rii y z x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5123 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_iri y z x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5124 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_rri y z x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5125 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_iii y z x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5126 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_rir y z x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5127 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_irr y z x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5128 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z))) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t6 (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z)))).
-
-(* constant 5129 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t5 (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z))).
-
-(* constant 5130 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z))) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t7 x y z) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z))))).
-
-(* constant 5131 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t8 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t4 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 x y z))).
-
-(* constant 5132 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 x y z))) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t3 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii x y z)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t9 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t10 x y z)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 x y z)))).
-
-(* constant 5133 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 x y z))) (l_e_st_eq_landau_n_rt_rp_r_c_comts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t3 y z x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 x y z)))).
-
-(* constant 5134 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3226_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_3226_rrr1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_iir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rii1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iri1 x y z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3226_rir1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_irr1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_rri1 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_3226_iii1 x y z))) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t11 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3226_t12 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z))).
-
-(* constant 5135 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz226 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3226_t13 x y z : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z))).
-
-(* constant 5136 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_assts1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz226 x y z : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z))).
-
-(* constant 5137 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_assts2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z)).
-
-(* constant 5138 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3227_t1 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) c) (l_e_st_eq_landau_n_rt_rp_r_pl a (l_e_st_eq_landau_n_rt_rp_r_pl b c)) (l_e_st_eq_landau_n_rt_rp_r_pl a (l_e_st_eq_landau_n_rt_rp_r_pl c b)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a c) b) (l_e_st_eq_landau_n_rt_rp_r_asspl1 a b c) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_pl b c) (l_e_st_eq_landau_n_rt_rp_r_pl c b) a (l_e_st_eq_landau_n_rt_rp_r_compl b c)) (l_e_st_eq_landau_n_rt_rp_r_asspl2 a c b) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) c) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a c) b)).
-
-(* constant 5139 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3227_t2 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) (l_e_st_eq_landau_n_rt_rp_r_pl c d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) c) d) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a c) b) d) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a c) (l_e_st_eq_landau_n_rt_rp_r_pl b d)) (l_e_st_eq_landau_n_rt_rp_r_asspl2 (l_e_st_eq_landau_n_rt_rp_r_pl a b) c d) (l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) c) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a c) b) d (l_e_st_eq_landau_n_rt_rp_r_c_3227_t1 a b c)) (l_e_st_eq_landau_n_rt_rp_r_asspl1 (l_e_st_eq_landau_n_rt_rp_r_pl a c) b d) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) (l_e_st_eq_landau_n_rt_rp_r_pl c d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a c) (l_e_st_eq_landau_n_rt_rp_r_pl b d))).
-
-(* constant 5140 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3227_t3 ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.λc:l_e_st_eq_landau_n_rt_rp_r_real.λd:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl a b) (l_e_st_eq_landau_n_rt_rp_r_pl c d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl a b) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 c) (l_e_st_eq_landau_n_rt_rp_r_m0 d))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn a c) (l_e_st_eq_landau_n_rt_rp_r_mn b d)) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl c d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 c) (l_e_st_eq_landau_n_rt_rp_r_m0 d)) (l_e_st_eq_landau_n_rt_rp_r_pl a b) (l_e_st_eq_landau_n_rt_rp_r_satz180 c d)) (l_e_st_eq_landau_n_rt_rp_r_c_3227_t2 a b (l_e_st_eq_landau_n_rt_rp_r_m0 c) (l_e_st_eq_landau_n_rt_rp_r_m0 d)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl a b) (l_e_st_eq_landau_n_rt_rp_r_pl c d)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn a c) (l_e_st_eq_landau_n_rt_rp_r_mn b d))).
-
-(* constant 5141 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3227_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_rets x z)) (l_e_st_eq_landau_n_rt_rp_r_ismn12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_disttp2 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_disttp2 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_c_3227_t3 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_rets x z))).
-
-(* constant 5142 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3227_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x z)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_disttp2 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_disttp2 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_c_3227_t2 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im z)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x z))).
-
-(* constant 5143 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3227_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_rets x z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x z))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_tsis2a x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_rets x z)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im z))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re z)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_3227_t4 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_3227_t5 x y z)) (l_e_st_eq_landau_n_rt_rp_r_c_plis12b (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x y) (l_e_st_eq_landau_n_rt_rp_r_c_rets x z) (l_e_st_eq_landau_n_rt_rp_r_c_imts x z)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z))).
-
-(* constant 5144 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz227 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_3227_t6 x y z : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z))).
-
-(* constant 5145 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_disttp1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_comts (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_satz227 z x y) (l_e_st_eq_landau_n_rt_rp_r_c_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_comts z x) (l_e_st_eq_landau_n_rt_rp_r_c_comts z y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z))).
-
-(* constant 5146 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_disttp2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz227 x y z : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z))).
-
-(* constant 5147 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_distpt1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_disttp1 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z)).
-
-(* constant 5148 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_distpt2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_disttp2 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z))).
-
-(* constant 5149 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz228 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_m0 z))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 z))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x z))) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_mn y z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_m0 z)) x (l_e_st_eq_landau_n_rt_rp_r_c_satz218 y z)) (l_e_st_eq_landau_n_rt_rp_r_c_disttp2 x y (l_e_st_eq_landau_n_rt_rp_r_c_m0 z)) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_m0 z)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz224b x z)) (l_e_st_eq_landau_n_rt_rp_r_c_satz218a (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z))).
-
-(* constant 5150 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_disttm1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_comts (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_satz228 z x y) (l_e_st_eq_landau_n_rt_rp_r_c_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_comts z x) (l_e_st_eq_landau_n_rt_rp_r_c_comts z y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z))).
-
-(* constant 5151 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_disttm2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz228 x y z : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z))).
-
-(* constant 5152 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_distmt1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_disttm1 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z)).
-
-(* constant 5153 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_distmt2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_disttm2 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z))).
-
-(* constant 5154 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λu1:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu2:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u1) x.λj:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u2) x.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts y u1) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u2) x i j : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u1) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u2)).
-
-(* constant 5155 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λu1:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu2:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u1) x.λj:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u2) x.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_mn u1 u2)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts y u1) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u2)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_disttm2 y u1 u2) (l_e_st_eq_landau_n_rt_rp_r_c_satz213b (l_e_st_eq_landau_n_rt_rp_r_c_ts y u1) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u2) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t1 x y n u1 u2 i j)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_mn u1 u2)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5156 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λu1:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu2:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u1) x.λj:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u2) x.(l_ore2 (l_e_st_eq_landau_n_rt_rp_r_c_is y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn u1 u2) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_satz221c y (l_e_st_eq_landau_n_rt_rp_r_c_mn u1 u2) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t2 x y n u1 u2 i j)) n : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn u1 u2) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5157 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λu1:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu2:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u1) x.λj:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u2) x.(l_e_st_eq_landau_n_rt_rp_r_c_satz213a u1 u2 (l_e_st_eq_landau_n_rt_rp_r_c_3229_t3 x y n u1 u2 i j) : l_e_st_eq_landau_n_rt_rp_r_c_is u1 u2).
-
-(* constant 5158 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_pnot0 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_lemma4 y n) : l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5159 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_u ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ov (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ov (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)))) x : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 5160 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_dd ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λv:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_ov v (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5161 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_satz197b (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_satz177 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_lemma6 (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))).
-
-(* constant 5162 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y)) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_lemma6 (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t5 x y n)) (l_e_st_eq_landau_n_rt_rp_r_lemma7 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)) (l_e_st_eq_landau_n_rt_rp_r_lemma8 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 5163 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_satz197d (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_lemma6 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))).
-
-(* constant 5164 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t7 x y n) (l_e_st_eq_landau_n_rt_rp_r_lemma6 (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n))) (l_e_st_eq_landau_n_rt_rp_r_lemma7 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))))).
-
-(* constant 5165 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_satz197a (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_satz182e (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5166 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_t8 x y n) (l_e_isf l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n t) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_t9 x y n)) (l_e_st_eq_landau_n_rt_rp_r_lemma9 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t4 x y n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5167 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y))))) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_tsis2a y (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im y) (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_t6 x y n) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t10 x y n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 5168 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_3229_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_3229_u x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c x) x (l_e_st_eq_landau_n_rt_rp_r_c_assts2 y (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) x) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_3229_dd x y n (l_e_st_eq_landau_n_rt_rp_r_c_im y))))) l_e_st_eq_landau_n_rt_rp_r_c_1c x (l_e_st_eq_landau_n_rt_rp_r_c_3229_t11 x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_satz222b x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_3229_u x y n)) x).
-
-(* constant 5169 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_somei l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y t) x) (l_e_st_eq_landau_n_rt_rp_r_c_3229_u x y n) (l_e_st_eq_landau_n_rt_rp_r_c_3229_t12 x y n) : l_e_st_eq_landau_n_rt_rp_r_c_some (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y t) x)).
-
-(* constant 5170 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_onei l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y t) x) (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y t) x.λw:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) x.l_e_st_eq_landau_n_rt_rp_r_c_satz229b x y n t u v w) (l_e_st_eq_landau_n_rt_rp_r_c_satz229a x y n) : l_e_st_eq_landau_n_rt_rp_r_c_one (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y t) x)).
-
-(* constant 5171 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ov ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_ind l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y t) x) (l_e_st_eq_landau_n_rt_rp_r_c_satz229 x y n) : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 5172 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_oneax l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y t) x) (l_e_st_eq_landau_n_rt_rp_r_c_satz229 x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) x).
-
-(* constant 5173 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229d ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) x (l_e_st_eq_landau_n_rt_rp_r_c_satz229c x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n))).
-
-(* constant 5174 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229e ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) x (l_e_st_eq_landau_n_rt_rp_r_c_comts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) (l_e_st_eq_landau_n_rt_rp_r_c_satz229c x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) x).
-
-(* constant 5175 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229f ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) x (l_e_st_eq_landau_n_rt_rp_r_c_satz229e x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y)).
-
-(* constant 5176 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229g ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) x.(l_e_st_eq_landau_n_rt_rp_r_c_satz229b x y n u (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) i (l_e_st_eq_landau_n_rt_rp_r_c_satz229c x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is u (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)).
-
-(* constant 5177 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229h ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) x.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx u (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz229g x y u n i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) u).
-
-(* constant 5178 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229j ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts u y) x.(l_e_st_eq_landau_n_rt_rp_r_c_satz229g x y u n (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_ts u y) x (l_e_st_eq_landau_n_rt_rp_r_c_comts y u) i) : l_e_st_eq_landau_n_rt_rp_r_c_is u (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)).
-
-(* constant 5179 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz229k ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts u y) x.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx u (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz229j x y u n i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) u).
-
-(* constant 5180 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isov1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ov t z n) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)).
-
-(* constant 5181 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isov2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229h z x (l_e_st_eq_landau_n_rt_rp_r_c_ov z y o) n (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ov z y o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov z y o)) z (l_e_st_eq_landau_n_rt_rp_r_c_ists1 x y (l_e_st_eq_landau_n_rt_rp_r_c_ov z y o) i) (l_e_st_eq_landau_n_rt_rp_r_c_satz229c z y o)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov z x n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y o)).
-
-(* constant 5182 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isov12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_c_is z u.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y u o) (l_e_st_eq_landau_n_rt_rp_r_c_isov1 x y z i n) (l_e_st_eq_landau_n_rt_rp_r_c_isov2 z u y j n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y u o)).
-
-(* constant 5183 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz230 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) x (l_e_st_eq_landau_n_rt_rp_r_c_compl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) (l_e_st_eq_landau_n_rt_rp_r_c_satz212h x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) x).
-
-(* constant 5184 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz231 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212e (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) y x (l_e_st_eq_landau_n_rt_rp_r_c_compl y x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) y) x).
-
-(* constant 5185 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz232 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212e x (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y (l_e_st_eq_landau_n_rt_rp_r_c_satz230 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) y).
-
-(* constant 5186 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4233_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl z y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) z) y) (l_e_st_eq_landau_n_rt_rp_r_c_compl (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z)) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_pl z y) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_compl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_asspl2 (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) z y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) z) y)).
-
-(* constant 5187 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4233_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) z) y) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) x (l_e_st_eq_landau_n_rt_rp_r_c_4233_t1 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y (l_e_st_eq_landau_n_rt_rp_r_c_satz230 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z)) (l_e_st_eq_landau_n_rt_rp_r_c_satz230 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z)) x).
-
-(* constant 5188 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz233 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212d x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_4233_t2 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_pl y z))).
-
-(* constant 5189 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz234 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212g (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn y z) z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) (l_e_st_eq_landau_n_rt_rp_r_c_asspl1 x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z) z) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn y z) z) y x (l_e_st_eq_landau_n_rt_rp_r_c_satz230 y z))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z))).
-
-(* constant 5190 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz234a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_satz234 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z)).
-
-(* constant 5191 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz234b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl y x) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_mn x z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) y) (l_e_st_eq_landau_n_rt_rp_r_c_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y x) z (l_e_st_eq_landau_n_rt_rp_r_c_compl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz234 y x z) (l_e_st_eq_landau_n_rt_rp_r_c_compl y (l_e_st_eq_landau_n_rt_rp_r_c_mn x z)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) y)).
-
-(* constant 5192 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz234c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) y) (l_e_st_eq_landau_n_rt_rp_r_c_satz234b x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) y) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z)).
-
-(* constant 5193 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz235 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212f x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl z (l_e_st_eq_landau_n_rt_rp_r_c_mn y z))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) x (l_e_st_eq_landau_n_rt_rp_r_c_asspl1 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_pl z (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) y (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz212h y z)) (l_e_st_eq_landau_n_rt_rp_r_c_satz230 x y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z))).
-
-(* constant 5194 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz235a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_satz235 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z)).
-
-(* constant 5195 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz235b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) y) (l_e_st_eq_landau_n_rt_rp_r_c_satz235a x y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz234c x z y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) y)).
-
-(* constant 5196 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz235c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) y) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl z x) y) (l_e_st_eq_landau_n_rt_rp_r_c_satz235b x y z) (l_e_st_eq_landau_n_rt_rp_r_c_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl z x) y (l_e_st_eq_landau_n_rt_rp_r_c_compl x z)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x (l_e_st_eq_landau_n_rt_rp_r_c_mn y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl z x) y)).
-
-(* constant 5197 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz236 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212g (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_asspl2 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y z) (l_e_st_eq_landau_n_rt_rp_r_c_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) x z (l_e_st_eq_landau_n_rt_rp_r_c_satz230 x y))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)).
-
-(* constant 5198 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz236a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl z x) (l_e_st_eq_landau_n_rt_rp_r_c_pl z y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_pl z x) (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl z y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_compl z x) (l_e_st_eq_landau_n_rt_rp_r_c_compl z y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz236 x y z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl z x) (l_e_st_eq_landau_n_rt_rp_r_c_pl z y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)).
-
-(* constant 5199 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4237_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) (l_e_st_eq_landau_n_rt_rp_r_c_pl u y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) u) y) (l_e_st_eq_landau_n_rt_rp_r_c_pl z y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_asspl2 (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) u y) (l_e_st_eq_landau_n_rt_rp_r_c_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) u) z y (l_e_st_eq_landau_n_rt_rp_r_c_satz230 z u)) (l_e_st_eq_landau_n_rt_rp_r_c_compl z y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) (l_e_st_eq_landau_n_rt_rp_r_c_pl u y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)).
-
-(* constant 5200 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4237_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl y u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl u y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) (l_e_st_eq_landau_n_rt_rp_r_c_pl u y))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) (l_e_st_eq_landau_n_rt_rp_r_c_pl u y) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_compl y u)) (l_e_st_eq_landau_n_rt_rp_r_c_asspl1 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) (l_e_st_eq_landau_n_rt_rp_r_c_pl u y)) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) (l_e_st_eq_landau_n_rt_rp_r_c_pl u y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_4237_t1 x y z u)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl y u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z))).
-
-(* constant 5201 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4237_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl y u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_4237_t2 x y z u) (l_e_st_eq_landau_n_rt_rp_r_c_asspl2 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y z) (l_e_st_eq_landau_n_rt_rp_r_c_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) x z (l_e_st_eq_landau_n_rt_rp_r_c_satz230 x y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl y u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl x z)).
-
-(* constant 5202 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz237 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212f (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y u) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_4237_t3 x y z u) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_pl y u))).
-
-(* constant 5203 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4238_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl u z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl z u)) (l_e_st_eq_landau_n_rt_rp_r_c_asspl1 x u z) (l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_pl u z) (l_e_st_eq_landau_n_rt_rp_r_c_pl z u) x (l_e_st_eq_landau_n_rt_rp_r_c_compl u z)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl z u))).
-
-(* constant 5204 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4238_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) u)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl z u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_pl z u))) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz237 (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) z u) (l_e_st_eq_landau_n_rt_rp_r_c_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl x (l_e_st_eq_landau_n_rt_rp_r_c_pl z u)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_pl z u)) (l_e_st_eq_landau_n_rt_rp_r_c_4238_t1 x y z u) (l_e_st_eq_landau_n_rt_rp_r_c_asspl1 y z u)) (l_e_st_eq_landau_n_rt_rp_r_c_satz236 x y (l_e_st_eq_landau_n_rt_rp_r_c_pl z u)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)).
-
-(* constant 5205 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz238 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212g (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) (l_e_st_eq_landau_n_rt_rp_r_c_4238_t2 x y z u) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z))).
-
-(* constant 5206 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4239_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u).(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_satz238 x y z u) (l_e_st_eq_landau_n_rt_rp_r_c_satz213b (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5207 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz239a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u).(l_e_st_eq_landau_n_rt_rp_r_c_satz213a (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) (l_e_st_eq_landau_n_rt_rp_r_c_4239_t1 x y z u i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)).
-
-(* constant 5208 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_4239_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_satz238 x y z u) (l_e_st_eq_landau_n_rt_rp_r_c_satz213b (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z) i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5209 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz239b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x u) (l_e_st_eq_landau_n_rt_rp_r_c_pl y z).(l_e_st_eq_landau_n_rt_rp_r_c_satz213a (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u) (l_e_st_eq_landau_n_rt_rp_r_c_4239_t2 x y z u i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) (l_e_st_eq_landau_n_rt_rp_r_c_mn z u)).
-
-(* constant 5210 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz240 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) x (l_e_st_eq_landau_n_rt_rp_r_c_comts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) (l_e_st_eq_landau_n_rt_rp_r_c_satz229c x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) x).
-
-(* constant 5211 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz241 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229h (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) y x n (l_e_st_eq_landau_n_rt_rp_r_c_comts y x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) y n) x).
-
-(* constant 5212 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y o) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) n (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y o) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx x l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y o)) (l_e_st_eq_landau_n_rt_rp_r_c_satz229c x y o) (l_e_st_eq_landau_n_rt_rp_r_c_satz221b y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y o) t)) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ov x y o) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5213 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz242 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229h x (l_e_st_eq_landau_n_rt_rp_r_c_ov x y o) y (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 x y n o) (l_e_st_eq_landau_n_rt_rp_r_c_satz240 x y o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ov x y o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 x y n o)) y).
-
-(* constant 5214 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5243_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) z) y) (l_e_st_eq_landau_n_rt_rp_r_c_comts (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o)) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) (l_e_st_eq_landau_n_rt_rp_r_c_comts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_assts2 (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) z y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) z) y)).
-
-(* constant 5215 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5243_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) z) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) x (l_e_st_eq_landau_n_rt_rp_r_c_5243_t1 x y z n o) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) z) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y (l_e_st_eq_landau_n_rt_rp_r_c_satz240 (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o)) (l_e_st_eq_landau_n_rt_rp_r_c_satz240 x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o)) x).
-
-(* constant 5216 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz243 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229g x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o) (l_e_st_eq_landau_n_rt_rp_r_c_5243_t2 x y z n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z o) (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o))).
-
-(* constant 5217 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz244 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229k (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)) n (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n) z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n) z) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n) z) y x (l_e_st_eq_landau_n_rt_rp_r_c_satz240 y z n))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n))).
-
-(* constant 5218 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz244a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)) (l_e_st_eq_landau_n_rt_rp_r_c_satz244 x y z n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z n)).
-
-(* constant 5219 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz244b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts y x) z n) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) y) (l_e_st_eq_landau_n_rt_rp_r_c_isov1 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y x) z (l_e_st_eq_landau_n_rt_rp_r_c_comts x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_satz244 y x z n) (l_e_st_eq_landau_n_rt_rp_r_c_comts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) y)).
-
-(* constant 5220 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz244c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) y) (l_e_st_eq_landau_n_rt_rp_r_c_satz244b x y z n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) y) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z n)).
-
-(* constant 5221 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz245 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229j x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 y z n o) (l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) x (l_e_st_eq_landau_n_rt_rp_r_c_assts1 (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o)) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o)) y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz229c y z o)) (l_e_st_eq_landau_n_rt_rp_r_c_satz240 x y n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z) (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 y z n o))).
-
-(* constant 5222 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz245a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z) (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_satz245 x y z n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z)).
-
-(* constant 5223 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz245b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) z) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz245a x y z n o) (l_e_st_eq_landau_n_rt_rp_r_c_satz244c x z y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) y n)).
-
-(* constant 5224 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz245c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz245b x y z n o) (l_e_st_eq_landau_n_rt_rp_r_c_isov1 (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) y (l_e_st_eq_landau_n_rt_rp_r_c_comts x z) n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_ov y z o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) y n)).
-
-(* constant 5225 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz246 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229k (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_assts2 (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y z) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) x z (l_e_st_eq_landau_n_rt_rp_r_c_satz240 x y n))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)).
-
-(* constant 5226 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz246a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d z y o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_isov12 (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_comts z x) (l_e_st_eq_landau_n_rt_rp_r_c_comts z y) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d z y o n) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_satz246 x y z n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts z x) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d z y o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)).
-
-(* constant 5227 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5247_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_ts u y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) u) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts z y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_assts2 (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) u y) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) u) z y (l_e_st_eq_landau_n_rt_rp_r_c_satz240 z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_comts z y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_ts u y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)).
-
-(* constant 5228 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5247_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts u y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_ts u y))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_ts u y) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_comts y u)) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_ts u y)) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_ts u y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_5247_t1 x y z u n o)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z))).
-
-(* constant 5229 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5247_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_5247_t2 x y z u n o) (l_e_st_eq_landau_n_rt_rp_r_c_assts2 (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y z) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) x z (l_e_st_eq_landau_n_rt_rp_r_c_satz240 x y n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)).
-
-(* constant 5230 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz247 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229j (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o) (l_e_st_eq_landau_n_rt_rp_r_c_5247_t3 x y z u n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o))).
-
-(* constant 5231 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5248_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts u z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 x u z) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ts u z) (l_e_st_eq_landau_n_rt_rp_r_c_ts z u) x (l_e_st_eq_landau_n_rt_rp_r_c_comts u z)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts z u))).
-
-(* constant 5232 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5248_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u p)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) u (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o) p)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y (l_e_st_eq_landau_n_rt_rp_r_c_ts z u) n (l_e_st_eq_landau_n_rt_rp_r_c_satz221d z u o p))) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz247 (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) z u (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o) p) (l_e_st_eq_landau_n_rt_rp_r_c_isov12 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_5248_t1 x y z u n o p) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 y z u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) u (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o) p) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y (l_e_st_eq_landau_n_rt_rp_r_c_ts z u) n (l_e_st_eq_landau_n_rt_rp_r_c_satz221d z u o p))) (l_e_st_eq_landau_n_rt_rp_r_c_satz246 x y (l_e_st_eq_landau_n_rt_rp_r_c_ts z u) n (l_e_st_eq_landau_n_rt_rp_r_c_satz221d z u o p)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u p)) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)).
-
-(* constant 5233 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz248 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229k (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u p) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 z u o p) (l_e_st_eq_landau_n_rt_rp_r_c_5248_t2 x y z u n o p) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u p) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 z u o p)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n o))).
-
-(* constant 5234 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz249 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229h l_e_st_eq_landau_n_rt_rp_r_c_0c x l_e_st_eq_landau_n_rt_rp_r_c_0c n (l_e_st_eq_landau_n_rt_rp_r_c_satz221b x l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_0c)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_0c x n) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5235 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz250 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229h x x l_e_st_eq_landau_n_rt_rp_r_c_1c n (l_e_st_eq_landau_n_rt_rp_r_c_satz222 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x x n) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 5236 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz251a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov x x (l_e_notis_th2 l_e_st_eq_landau_n_rt_rp_r_c_cx y l_e_st_eq_landau_n_rt_rp_r_c_0c x n i)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_isov2 y x x (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx x y i) n (l_e_notis_th2 l_e_st_eq_landau_n_rt_rp_r_c_cx y l_e_st_eq_landau_n_rt_rp_r_c_0c x n i)) (l_e_st_eq_landau_n_rt_rp_r_c_satz250 x (l_e_notis_th2 l_e_st_eq_landau_n_rt_rp_r_c_cx y l_e_st_eq_landau_n_rt_rp_r_c_0c x n i)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 5237 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz251b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) l_e_st_eq_landau_n_rt_rp_r_c_1c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y l_e_st_eq_landau_n_rt_rp_r_c_1c) y (l_e_st_eq_landau_n_rt_rp_r_c_satz229d x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) l_e_st_eq_landau_n_rt_rp_r_c_1c y i) (l_e_st_eq_landau_n_rt_rp_r_c_satz222 y) : l_e_st_eq_landau_n_rt_rp_r_c_is x y).
-
-(* constant 5238 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o).λj:l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_0c u o) l_e_st_eq_landau_n_rt_rp_r_c_0c i (l_e_st_eq_landau_n_rt_rp_r_c_isov1 z l_e_st_eq_landau_n_rt_rp_r_c_0c u j o) (l_e_st_eq_landau_n_rt_rp_r_c_satz249 u o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5239 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o).λj:l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_satz229d x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz221b y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_5252_t1 x y z u n o i j)) : l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5240 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o).λj:l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_satz221a x u (l_e_st_eq_landau_n_rt_rp_r_c_5252_t2 x y z u n o i j)) (l_e_st_eq_landau_n_rt_rp_r_c_satz221b y z j) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)).
-
-(* constant 5241 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n p)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 z u p o)) (l_e_st_eq_landau_n_rt_rp_r_c_satz248 x y z u n p o) (l_e_st_eq_landau_n_rt_rp_r_c_satz251a (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 z u p o) i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n p)) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 5242 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz251b (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n p) (l_e_st_eq_landau_n_rt_rp_r_c_5252_t4 x y z u n o i p) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)).
-
-(* constant 5243 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz252a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_5252_t3 x y z u n o i t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_5252_t5 x y z u n o i t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)).
-
-(* constant 5244 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z).λj:l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) l_e_st_eq_landau_n_rt_rp_r_c_0c i (l_e_st_eq_landau_n_rt_rp_r_c_satz221b y z j) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5245 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z).λj:l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is u l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_satz221c x u (l_e_st_eq_landau_n_rt_rp_r_c_5252_t6 x y z u n o i j)) o : l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5246 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z).λj:l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_0c y n) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_isov1 x l_e_st_eq_landau_n_rt_rp_r_c_0c y (l_e_st_eq_landau_n_rt_rp_r_c_5252_t7 x y z u n o i j) n) (l_e_st_eq_landau_n_rt_rp_r_c_satz249 y n)) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_0c u o) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_isov1 z l_e_st_eq_landau_n_rt_rp_r_c_0c u j o) (l_e_st_eq_landau_n_rt_rp_r_c_satz249 u o)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)).
-
-(* constant 5247 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 z u p o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n p)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_satz248 x y z u n p o) (l_e_st_eq_landau_n_rt_rp_r_c_satz251a (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y z n p) i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 z u p o)) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 5248 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_5252_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz251b (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma6 z u p o) (l_e_st_eq_landau_n_rt_rp_r_c_5252_t9 x y z u n o i p) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)).
-
-(* constant 5249 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz252b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is z l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_5252_t8 x y z u n o i t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_5252_t10 x y z u n o i t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)).
-
-(* constant 5250 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz253 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229g (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) y (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n)) n (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n))) (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) (l_e_st_eq_landau_n_rt_rp_r_c_disttp2 y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) x (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n)) z (l_e_st_eq_landau_n_rt_rp_r_c_satz229c x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz229c z y n))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pl x z) y n)).
-
-(* constant 5251 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_distop ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_satz253 x z y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n))).
-
-(* constant 5252 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_distpo ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz253 x z y n : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) z n)).
-
-(* constant 5253 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz254 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o))) (l_e_st_eq_landau_n_rt_rp_r_c_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_satz246 x y u n o) (l_e_st_eq_landau_n_rt_rp_r_c_satz246a z u y o n)) (l_e_st_eq_landau_n_rt_rp_r_c_satz253 (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o))).
-
-(* constant 5254 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz255 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229g (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) y (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n)) n (l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n))) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n))) (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) (l_e_st_eq_landau_n_rt_rp_r_c_disttm2 y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) x (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n)) z (l_e_st_eq_landau_n_rt_rp_r_c_satz229c x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz229c z y n))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_mn x z) y n)).
-
-(* constant 5255 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_distom ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_satz255 x z y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z n) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n))).
-
-(* constant 5256 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_distmo ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis z l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz255 x z y n : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov x z n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y z n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) z n)).
-
-(* constant 5257 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz256 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis u l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o))) (l_e_st_eq_landau_n_rt_rp_r_c_ismn12 (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o) (l_e_st_eq_landau_n_rt_rp_r_c_satz246 x y u n o) (l_e_st_eq_landau_n_rt_rp_r_c_satz246a z u y o n)) (l_e_st_eq_landau_n_rt_rp_r_c_satz255 (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) (l_e_st_eq_landau_n_rt_rp_r_c_ov z u o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts x u) (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u) (l_e_st_eq_landau_n_rt_rp_r_c_satz221d y u n o))).
-
-(* constant 5258 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_conj ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 5259 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_conjisa ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) a (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b))) (l_e_st_eq_landau_n_rt_rp_r_m0 b) (l_e_st_eq_landau_n_rt_rp_r_c_reis a b) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) b (l_e_st_eq_landau_n_rt_rp_r_c_imis a b)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_pli a (l_e_st_eq_landau_n_rt_rp_r_m0 b))).
-
-(* constant 5260 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_conjisb ≝ λa:l_e_st_eq_landau_n_rt_rp_r_real.λb:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_pli a b)) (l_e_st_eq_landau_n_rt_rp_r_c_pli a (l_e_st_eq_landau_n_rt_rp_r_m0 b)) (l_e_st_eq_landau_n_rt_rp_r_c_conjisa a b) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli a (l_e_st_eq_landau_n_rt_rp_r_m0 b)) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_pli a b))).
-
-(* constant 5261 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isconj ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_conj t) x y i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)).
-
-(* constant 5262 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz257 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) x (l_e_st_eq_landau_n_rt_rp_r_c_conjisa (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_satz177 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_pliis x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) x).
-
-(* constant 5263 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz258a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_isconj x l_e_st_eq_landau_n_rt_rp_r_c_0c i) (l_e_st_eq_landau_n_rt_rp_r_c_conjisa l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satz176b l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5264 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6258_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_isre (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_lemma1 (l_e_st_eq_landau_n_rt_rp_r_c_conj x) i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5265 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6258_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_satz176e (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_isim (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_lemma2 (l_e_st_eq_landau_n_rt_rp_r_c_conj x) i)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5266 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz258b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_ispli x) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_re x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_6258_t1 x i) (l_e_st_eq_landau_n_rt_rp_r_c_6258_t2 x i)) : l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5267 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6258_anders ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx x l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_satz257 x) (l_e_st_eq_landau_n_rt_rp_r_c_satz258a (l_e_st_eq_landau_n_rt_rp_r_c_conj x) i) : l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5268 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz258c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) n (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_satz258b x t) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_conj x) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5269 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6259_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) x.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_isim (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_isceim (l_e_st_eq_landau_n_rt_rp_r_c_conj x) x i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im x)).
-
-(* constant 5270 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz259a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) x.(l_e_st_eq_landau_n_rt_rp_r_lemma10 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_6259_t1 x i)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5271 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz259b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) x (l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satz176b (l_e_st_eq_landau_n_rt_rp_r_c_im x) i) i)) (l_e_st_eq_landau_n_rt_rp_r_c_pliis x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) x).
-
-(* constant 5272 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz269c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_conj x).(l_e_st_eq_landau_n_rt_rp_r_c_satz259a x (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_conj x) i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5273 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz269d ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im x) l_e_st_eq_landau_n_rt_rp_r_0.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj x) x (l_e_st_eq_landau_n_rt_rp_r_c_satz259b x i) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)).
-
-(* constant 5274 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz260 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_conjisa (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_satz180 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_plis12b (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y))).
-
-(* constant 5275 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz260a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz260 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))).
-
-(* constant 5276 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6261_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_imts x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_satz180 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_satz197f (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_satz197e (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_imts x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))).
-
-(* constant 5277 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz261 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_imts x y))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y)))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_conjisa (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_c_imts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_c_rets x y) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y)))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_imts x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y))) (l_e_st_eq_landau_n_rt_rp_r_ismn2 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_satz198a (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_6261_t1 x y)) (l_e_st_eq_landau_n_rt_rp_r_c_tsis12b (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im y))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y))).
-
-(* constant 5278 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz261a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz261 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts x y))).
-
-(* constant 5279 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6262_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) x (l_e_st_eq_landau_n_rt_rp_r_c_satz230 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y)).
-
-(* constant 5280 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6262_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_isconj x (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) (l_e_st_eq_landau_n_rt_rp_r_c_6262_t1 x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz260 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y) y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_conj y))).
-
-(* constant 5281 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz262 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz212f (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_6262_t2 x y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y))).
-
-(* constant 5282 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz262a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz262 x y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_mn x y))).
-
-(* constant 5283 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6263_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229f x y n : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y)).
-
-(* constant 5284 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6263_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_isconj x (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) (l_e_st_eq_landau_n_rt_rp_r_c_6263_t1 x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y))).
-
-(* constant 5285 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6263_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz261 (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_conj y))).
-
-(* constant 5286 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6263_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_6263_t2 x y n) (l_e_st_eq_landau_n_rt_rp_r_c_6263_t3 x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_conj y))).
-
-(* constant 5287 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_6263_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz258c y n : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_conj y) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 5288 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz263 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229j (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_6263_t5 x y n) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_6263_t4 x y n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y) (l_e_st_eq_landau_n_rt_rp_r_c_satz258c y n))).
-
-(* constant 5289 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz263a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y) (l_e_st_eq_landau_n_rt_rp_r_c_satz258c y n)) (l_e_st_eq_landau_n_rt_rp_r_c_satz263 x y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y) (l_e_st_eq_landau_n_rt_rp_r_c_satz258c y n)) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n))).
-
-(* constant 5290 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_mod ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_sqrt (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 x) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5291 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ismod ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_mod t) x y i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)).
-
-(* constant 5292 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz264a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_sqrtnot0 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 x) (l_e_st_eq_landau_n_rt_rp_r_pnot0 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma4 x n)) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod x)).
-
-(* constant 5293 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz264b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_sqrt0 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma3 x i) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5294 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz264c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_thsqrt1a (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 x) : l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod x))).
-
-(* constant 5295 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz264d ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_satz167f (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0 (l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_c_satz264c x) (λt:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_satz169d (l_e_st_eq_landau_n_rt_rp_r_c_mod x) t)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5296 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_thsqrt1b (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 x)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod x))).
-
-(* constant 5297 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_lemma12 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x)))).
-
-(* constant 5298 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_satz191 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_moreisi2 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)))) (l_e_st_eq_landau_n_rt_rp_r_lemma11 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 5299 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ismoreis12 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t1 x) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t2 x) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t3 x) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x)))).
-
-(* constant 5300 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_lemma12 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x)))).
-
-(* constant 5301 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_satz191 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_lemma11 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_moreisi2 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)))).
-
-(* constant 5302 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ismoreis12 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t1 x) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t5 x) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t6 x) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x)))).
-
-(* constant 5303 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s).λn:l_e_st_eq_landau_n_rt_rp_r_moreis r l_e_st_eq_landau_n_rt_rp_r_0.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_lemma2 r s l : l_e_st_eq_landau_n_rt_rp_r_more s r).
-
-(* constant 5304 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s).λn:l_e_st_eq_landau_n_rt_rp_r_moreis r l_e_st_eq_landau_n_rt_rp_r_0.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_satz169b s (l_e_st_eq_landau_n_rt_rp_r_satz172d s r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_7265_t8 r s m n l) n) : l_e_st_eq_landau_n_rt_rp_r_pos s).
-
-(* constant 5305 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s).λn:l_e_st_eq_landau_n_rt_rp_r_moreis r l_e_st_eq_landau_n_rt_rp_r_0.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λo:l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_trmore (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_satz203a s r s (l_e_st_eq_landau_n_rt_rp_r_c_7265_t8 r s m n l) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t9 r s m n l)) (l_e_st_eq_landau_n_rt_rp_r_satz203d s r r (l_e_st_eq_landau_n_rt_rp_r_c_7265_t8 r s m n l) (l_e_st_eq_landau_n_rt_rp_r_satz169b r o)) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_ts r r)).
-
-(* constant 5306 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s).λn:l_e_st_eq_landau_n_rt_rp_r_moreis r l_e_st_eq_landau_n_rt_rp_r_0.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_ismore2 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 r r i)) (l_e_st_eq_landau_n_rt_rp_r_satz169a (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_possq s (l_e_st_eq_landau_n_rt_rp_r_pnot0 s (l_e_st_eq_landau_n_rt_rp_r_c_7265_t9 r s m n l)))) : l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_ts r r)).
-
-(* constant 5307 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s).λn:l_e_st_eq_landau_n_rt_rp_r_moreis r l_e_st_eq_landau_n_rt_rp_r_0.λl:l_e_st_eq_landau_n_rt_rp_r_less r s.(l_e_st_eq_landau_n_rt_rp_r_lemma1 (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_orapp (l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_ts r r)) n (λt:l_e_st_eq_landau_n_rt_rp_r_more r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_7265_t10 r s m n l t) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_7265_t11 r s m n l t)) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s)).
-
-(* constant 5308 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7265_t13 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s).λn:l_e_st_eq_landau_n_rt_rp_r_moreis r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_satz167f r s (λt:l_e_st_eq_landau_n_rt_rp_r_less r s.l_e_st_eq_landau_n_rt_rp_r_satz167c (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s) m (l_e_st_eq_landau_n_rt_rp_r_c_7265_t12 r s m n t)) : l_e_st_eq_landau_n_rt_rp_r_moreis r s).
-
-(* constant 5309 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz265a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_7265_t13 (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t4 x) (l_e_st_eq_landau_n_rt_rp_r_c_satz264d x) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x))).
-
-(* constant 5310 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz265b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_7265_t13 (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_7265_t7 x) (l_e_st_eq_landau_n_rt_rp_r_c_satz264d x) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_im x))).
-
-(* constant 5311 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7266_t1 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts t t) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_satz176b (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts t t) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts t t)).
-
-(* constant 5312 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7266_t2 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts t l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 t)) (l_e_st_eq_landau_n_rt_rp_r_ts t l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts t l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 t) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 t (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ts02 t l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts t l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 t)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5313 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7266_t3 ≝ λt:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli t l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli t l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts t t) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts t l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 t))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts t t) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_tsis12a t l_e_st_eq_landau_n_rt_rp_r_0 t l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts t t) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts t t) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts t l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 t)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_7266_t1 t) (l_e_st_eq_landau_n_rt_rp_r_c_7266_t2 t)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli t l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli t l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts t t) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 5314 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7266_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_neg s).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts s s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_7266_t3 r)) i (l_e_st_eq_landau_n_rt_rp_r_c_7266_t3 s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts s s) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 5315 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7266_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_neg s).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts s s) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_c_isre (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_iscere (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts s s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_7266_t4 r s i n o)) (l_e_st_eq_landau_n_rt_rp_r_c_reis (l_e_st_eq_landau_n_rt_rp_r_ts s s) l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s)).
-
-(* constant 5316 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7266_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_neg s).(l_andi (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s)) n (l_e_st_eq_landau_n_rt_rp_r_c_7266_t5 r s i n o) : l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts s s))).
-
-(* constant 5317 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7266_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_neg s).(l_andi (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_ts s s)) o (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts s s)) : l_and (l_not (l_e_st_eq_landau_n_rt_rp_r_neg s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts s s) (l_e_st_eq_landau_n_rt_rp_r_ts s s))).
-
-(* constant 5318 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz266 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_neg s).(l_e_st_eq_landau_n_rt_rp_r_satzr161b (l_e_st_eq_landau_n_rt_rp_r_ts s s) r s (l_e_st_eq_landau_n_rt_rp_r_c_7266_t6 r s i n o) (l_e_st_eq_landau_n_rt_rp_r_c_7266_t7 r s i n o) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 5319 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7267_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_7266_t3 (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx1 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_thsqrt1b (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 x))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 5320 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7267_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_satz197e (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_satz198 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)).
-
-(* constant 5321 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7267_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_satz197b (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_satz179a (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re x))) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5322 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7267_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_tsis2a x (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_re x))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_7267_t2 x) (l_e_st_eq_landau_n_rt_rp_r_c_7267_t3 x)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 5323 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz267 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_7267_t1 x) (l_e_st_eq_landau_n_rt_rp_r_c_7267_t4 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x))).
-
-(* constant 5324 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz267a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_satz267 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 5325 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts y x) z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ts x z)) (l_e_st_eq_landau_n_rt_rp_r_c_assts2 x y z) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts y x) z (l_e_st_eq_landau_n_rt_rp_r_c_comts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 y x z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ts x z))).
-
-(* constant 5326 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λu:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ts z u))) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_ts y u))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u)) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 x y (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_ts y u)) x (l_e_st_eq_landau_n_rt_rp_r_c_7268_t1 y z u)) (l_e_st_eq_landau_n_rt_rp_r_c_assts2 x z (l_e_st_eq_landau_n_rt_rp_r_c_ts y u)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts z u)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x z) (l_e_st_eq_landau_n_rt_rp_r_c_ts y u))).
-
-(* constant 5327 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts x y))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_conj y))) (l_e_st_eq_landau_n_rt_rp_r_c_satz267 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_conj (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz261 x y)) (l_e_st_eq_landau_n_rt_rp_r_c_7268_t2 x y (l_e_st_eq_landau_n_rt_rp_r_c_conj x) (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_conj y)))).
-
-(* constant 5328 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_conj y))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_7268_t3 x y) (l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_conj x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts y (l_e_st_eq_landau_n_rt_rp_r_c_conj y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_satz267a x) (l_e_st_eq_landau_n_rt_rp_r_c_satz267a y)) (l_e_st_eq_landau_n_rt_rp_r_c_7268_t2 (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0)))).
-
-(* constant 5329 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_satz176b (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 5330 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s)) (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 s (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ts02 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5331 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_tsis12a r l_e_st_eq_landau_n_rt_rp_r_0 s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_7268_t5 r s) (l_e_st_eq_landau_n_rt_rp_r_c_7268_t6 r s)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 5332 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_7268_t4 x y) (l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_7268_t7 (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_7268_t7 (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 5333 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7268_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)).(l_orapp (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod y))) (l_and (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod y))) l_con (l_e_st_eq_landau_n_rt_rp_r_satz196h (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y) n) (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod y)).l_e_st_eq_landau_n_rt_rp_r_c_satz264c y (l_ande2 (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) t)) (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod y)).l_e_st_eq_landau_n_rt_rp_r_c_satz264c x (l_ande1 (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) t)) : l_con).
-
-(* constant 5334 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz268 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz266 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_7268_t8 x y) (l_e_st_eq_landau_n_rt_rp_r_c_satz264c (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (λt:l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)).l_e_st_eq_landau_n_rt_rp_r_c_7268_t9 x y t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))).
-
-(* constant 5335 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz268a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz268 x y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts x y))).
-
-(* constant 5336 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7269_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_pnot0 (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_satz264a y n) : l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5337 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7269_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz268 (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) (l_e_st_eq_landau_n_rt_rp_r_c_ismod (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n) y) x (l_e_st_eq_landau_n_rt_rp_r_c_satz240 x y n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)).
-
-(* constant 5338 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7269_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_satz204g (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_7269_t1 x y n) (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_comts (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n))) (l_e_st_eq_landau_n_rt_rp_r_c_7269_t2 x y n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_ov (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_7269_t1 x y n))).
-
-(* constant 5339 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz269 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_7269_t3 x y n : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x y n)) (l_e_st_eq_landau_n_rt_rp_r_ov (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_pnot0 (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_satz264a y n)))).
-
-(* constant 5340 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7270_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_abs r) r) (λt:l_e_st_eq_landau_n_rt_rp_r_neg r.l_e_st_eq_landau_n_rt_rp_r_moreisi1 (l_e_st_eq_landau_n_rt_rp_r_abs r) r (l_e_st_eq_landau_n_rt_rp_r_trmore (l_e_st_eq_landau_n_rt_rp_r_abs r) l_e_st_eq_landau_n_rt_rp_r_0 r (l_e_st_eq_landau_n_rt_rp_r_satz169a (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_satz166b r t)) (l_e_st_eq_landau_n_rt_rp_r_lemma2 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satz169c r t)))) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).l_e_st_eq_landau_n_rt_rp_r_moreisi2 (l_e_st_eq_landau_n_rt_rp_r_abs r) r (l_e_st_eq_landau_n_rt_rp_r_absnn r t)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_abs r) r).
-
-(* constant 5341 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7270_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_trmoreis (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_satz265a x) (l_e_st_eq_landau_n_rt_rp_r_c_7270_t1 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)).
-
-(* constant 5342 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7270_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_1c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_re l_e_st_eq_landau_n_rt_rp_r_c_1c) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_isre (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im y))) (l_e_st_eq_landau_n_rt_rp_r_c_iscere (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_1c i) (l_e_st_eq_landau_n_rt_rp_r_c_reis l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 5343 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz270 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_1c.(l_e_st_eq_landau_n_rt_rp_r_ismoreis2 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re y)) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_7270_t3 x y i) (l_e_st_eq_landau_n_rt_rp_r_satz191 (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_re y) (l_e_st_eq_landau_n_rt_rp_r_c_7270_t2 x) (l_e_st_eq_landau_n_rt_rp_r_c_7270_t2 y)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 5344 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz264b (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5345 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_ismoreis2 (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t1 x y i)) (l_e_st_eq_landau_n_rt_rp_r_satz191 (l_e_st_eq_landau_n_rt_rp_r_c_mod x) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_mod y) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_satz264d x) (l_e_st_eq_landau_n_rt_rp_r_c_satz264d y)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))).
-
-(* constant 5346 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_pnot0 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz264a (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n) : l_e_st_eq_landau_n_rt_rp_r_nis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 5347 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_satz253 x (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz250 (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n)) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 5348 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz270 (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_ov y (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t4 x y n) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov y (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n))) l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 5349 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_fx ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_ov (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t3 x y n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5350 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_fy ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_ov (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t3 x y n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5351 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_ismoreis1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov y (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov x (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ov y (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n) (l_e_st_eq_landau_n_rt_rp_r_c_satz269 x (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_satz269 y (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t5 x y n) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) l_e_st_eq_landau_n_rt_rp_r_1rl).
-
-(* constant 5352 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_prl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5353 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_prr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5354 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_orapp (l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_7271_prl x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_prr x y n)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t6 x y n) (λt:l_e_st_eq_landau_n_rt_rp_r_more (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) l_e_st_eq_landau_n_rt_rp_r_1rl.l_e_st_eq_landau_n_rt_rp_r_moreisi1 (l_e_st_eq_landau_n_rt_rp_r_c_7271_prl x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_prr x y n) (l_e_st_eq_landau_n_rt_rp_r_satz203a (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) t (l_e_st_eq_landau_n_rt_rp_r_c_satz264a (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) n))) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) l_e_st_eq_landau_n_rt_rp_r_1rl.l_e_st_eq_landau_n_rt_rp_r_moreisi2 (l_e_st_eq_landau_n_rt_rp_r_c_7271_prl x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_prr x y n) (l_e_st_eq_landau_n_rt_rp_r_ists1 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n)) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) t)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_7271_prl x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_prr x y n)).
-
-(* constant 5355 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_7271_prl x y n) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)))) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_disttp1 (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_7271_fx x y n) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))) (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_7271_fy x y n) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))) (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_satz204e (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t3 x y n)) (l_e_st_eq_landau_n_rt_rp_r_satz204e (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t3 x y n))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_7271_prl x y n) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))).
-
-(* constant 5356 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_satz195b (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_7271_prr x y n) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))).
-
-(* constant 5357 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_ismoreis12 (l_e_st_eq_landau_n_rt_rp_r_c_7271_prl x y n) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_prr x y n) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t8 x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t9 x y n) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t7 x y n) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))).
-
-(* constant 5358 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7271_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_7271_t2 x y t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pl x y) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_7271_t10 x y t) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))).
-
-(* constant 5359 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz271 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_satz168a (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_c_7271_t11 x y) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))).
-
-(* constant 5360 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz271a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_7271_t11 x y : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl x y))).
-
-(* constant 5361 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7272_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_iscere (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_satz214 x)) (l_e_st_eq_landau_n_rt_rp_r_c_reis (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x))).
-
-(* constant 5362 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7272_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_7272_t1 x) (l_e_st_eq_landau_n_rt_rp_r_c_7272_t1 x)) (l_e_st_eq_landau_n_rt_rp_r_satz198 (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x))).
-
-(* constant 5363 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7272_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_isceim (l_e_st_eq_landau_n_rt_rp_r_c_m0 x) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_c_satz214 x)) (l_e_st_eq_landau_n_rt_rp_r_c_imis (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))).
-
-(* constant 5364 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7272_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_7272_t3 x) (l_e_st_eq_landau_n_rt_rp_r_c_7272_t3 x)) (l_e_st_eq_landau_n_rt_rp_r_satz198 (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x))).
-
-(* constant 5365 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7272_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_m0 x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_m0 x))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_7272_t2 x) (l_e_st_eq_landau_n_rt_rp_r_c_7272_t4 x) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod2 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x)).
-
-(* constant 5366 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz272 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_issqrt (l_e_st_eq_landau_n_rt_rp_r_c_mod2 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_mod2 x) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 x) (l_e_st_eq_landau_n_rt_rp_r_c_7272_t5 x) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)).
-
-(* constant 5367 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz272a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_m0 x)) (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_satz272 x) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_m0 x))).
-
-(* constant 5368 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7273_sum ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5369 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7273_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_islessis1 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_mn x y))) (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_c_ismod (l_e_st_eq_landau_n_rt_rp_r_c_pl y (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) x (l_e_st_eq_landau_n_rt_rp_r_c_satz212h x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz271 y (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y)).
-
-(* constant 5370 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7273_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y)) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))) (l_e_st_eq_landau_n_rt_rp_r_c_7273_t1 x y) (λt:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y).l_e_st_eq_landau_n_rt_rp_r_satz188f (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) t) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y).l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_c_mod y) t) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))).
-
-(* constant 5371 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7273_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)))) (l_e_st_eq_landau_n_rt_rp_r_mnpl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y))).
-
-(* constant 5372 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7273_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_satz168b (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_islessis2 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_7273_sum x y) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_7273_t3 x y) (l_e_st_eq_landau_n_rt_rp_r_c_7273_t2 x y)) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))).
-
-(* constant 5373 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7273_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ismoreis12 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn y x)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y))) (l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn y x)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y))) (l_e_st_eq_landau_n_rt_rp_r_c_ismod (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_c_mn y x) (l_e_st_eq_landau_n_rt_rp_r_c_satz219 x y)) (l_e_st_eq_landau_n_rt_rp_r_c_satz272 (l_e_st_eq_landau_n_rt_rp_r_c_mn x y))) (l_e_st_eq_landau_n_rt_rp_r_satz181a (l_e_st_eq_landau_n_rt_rp_r_c_mod y) (l_e_st_eq_landau_n_rt_rp_r_c_mod x)) (l_e_st_eq_landau_n_rt_rp_r_c_7273_t4 y x) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)))).
-
-(* constant 5374 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7273_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_neg r) (l_not (l_e_st_eq_landau_n_rt_rp_r_neg r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) r) (l_or_th6 (l_e_st_eq_landau_n_rt_rp_r_neg r)) (λt:l_e_st_eq_landau_n_rt_rp_r_neg r.l_e_st_eq_landau_n_rt_rp_r_absn r t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg r).l_e_st_eq_landau_n_rt_rp_r_absnn r t) : l_or (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_m0 r)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) r)).
-
-(* constant 5375 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_7273_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λm:l_e_st_eq_landau_n_rt_rp_r_moreis r s.λn:l_e_st_eq_landau_n_rt_rp_r_moreis r (l_e_st_eq_landau_n_rt_rp_r_m0 s).(l_orapp (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_r_m0 s)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs s) s) (l_e_st_eq_landau_n_rt_rp_r_moreis r (l_e_st_eq_landau_n_rt_rp_r_abs s)) (l_e_st_eq_landau_n_rt_rp_r_c_7273_t6 s) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_r_m0 s).l_e_st_eq_landau_n_rt_rp_r_ismoreis2 (l_e_st_eq_landau_n_rt_rp_r_m0 s) (l_e_st_eq_landau_n_rt_rp_r_abs s) r (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs s) (l_e_st_eq_landau_n_rt_rp_r_m0 s) t) n) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs s) s.l_e_st_eq_landau_n_rt_rp_r_ismoreis2 s (l_e_st_eq_landau_n_rt_rp_r_abs s) r (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs s) s t) m) : l_e_st_eq_landau_n_rt_rp_r_moreis r (l_e_st_eq_landau_n_rt_rp_r_abs s)).
-
-(* constant 5376 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz273 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_7273_t7 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)) (l_e_st_eq_landau_n_rt_rp_r_c_7273_t4 x y) (l_e_st_eq_landau_n_rt_rp_r_c_7273_t5 x y) : l_e_st_eq_landau_n_rt_rp_r_moreis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_mn x y)) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_mod x) (l_e_st_eq_landau_n_rt_rp_r_c_mod y)))).
-
-(* constant 5377 *)
-definition l_e_st_eq_landau_n_8274_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_some (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to y) (λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to y.l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to y) f) : Prop).
-
-(* constant 5378 *)
-definition l_e_st_eq_landau_n_8274_prop2 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_all (λy:l_e_st_eq_landau_n_nat.l_imp (l_e_st_eq_landau_n_less x y) (l_not (l_e_st_eq_landau_n_8274_prop1 x y))) : Prop).
-
-(* constant 5379 *)
-definition l_e_st_eq_landau_n_8274_1y ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_1out y : l_e_st_eq_landau_n_1to y).
-
-(* constant 5380 *)
-definition l_e_st_eq_landau_n_8274_yy ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_xout y : l_e_st_eq_landau_n_1to y).
-
-(* constant 5381 *)
-definition l_e_st_eq_landau_n_8274_t1 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_1y y l f) (l_e_st_eq_landau_n_8274_yy y l f).(l_e_st_eq_landau_n_isoutne y l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a y) y (l_e_st_eq_landau_n_lessisi3 y) i : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 y).
-
-(* constant 5382 *)
-definition l_e_st_eq_landau_n_8274_t2 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.(l_ec3e31 (l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 y) (l_e_st_eq_landau_n_more l_e_st_eq_landau_n_1 y) (l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y) (l_e_st_eq_landau_n_satz10b l_e_st_eq_landau_n_1 y) l : l_e_st_eq_landau_n_nis l_e_st_eq_landau_n_1 y).
-
-(* constant 5383 *)
-definition l_e_st_eq_landau_n_8274_t3 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_1y y l f) (l_e_st_eq_landau_n_8274_yy y l f)) (l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 y) (l_e_st_eq_landau_n_8274_t2 y l f) (λt:l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_1y y l f) (l_e_st_eq_landau_n_8274_yy y l f).l_e_st_eq_landau_n_8274_t1 y l f t) : l_not (l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_1y y l f) (l_e_st_eq_landau_n_8274_yy y l f))).
-
-(* constant 5384 *)
-definition l_e_st_eq_landau_n_8274_t4 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f u l_e_st_eq_landau_n_1o (l_e_st_eq_landau_n_singlet_th1 u) : l_e_is (l_e_st_eq_landau_n_1to y) (f u) (f l_e_st_eq_landau_n_1o)).
-
-(* constant 5385 *)
-definition l_e_st_eq_landau_n_8274_t5 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.(l_e_notis_th2 (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_1y y l f) (l_e_st_eq_landau_n_8274_yy y l f) (f u) (l_e_st_eq_landau_n_8274_t3 y l f) (l_e_tris (l_e_st_eq_landau_n_1to y) (f u) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f) (l_e_st_eq_landau_n_8274_t4 y l f u) i) : l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f u) (l_e_st_eq_landau_n_8274_yy y l f))).
-
-(* constant 5386 *)
-definition l_e_st_eq_landau_n_8274_t6 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f).(l_some_th5 (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_yy y l f) (f u)) (λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_symnotis (l_e_st_eq_landau_n_1to y) (f u) (l_e_st_eq_landau_n_8274_yy y l f) (l_e_st_eq_landau_n_8274_t5 y l f i u)) : l_not (l_e_image (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f (l_e_st_eq_landau_n_8274_yy y l f))).
-
-(* constant 5387 *)
-definition l_e_st_eq_landau_n_8274_t7 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f).(l_all_th1 (l_e_st_eq_landau_n_1to y) (λu:l_e_st_eq_landau_n_1to y.l_e_image (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f u) (l_e_st_eq_landau_n_8274_yy y l f) (l_e_st_eq_landau_n_8274_t6 y l f i) : l_not (l_e_surjective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f)).
-
-(* constant 5388 *)
-definition l_e_st_eq_landau_n_8274_t8 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f)).λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.(l_e_notis_th2 (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f) (f u) n (l_e_st_eq_landau_n_8274_t4 y l f u) : l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f u) (l_e_st_eq_landau_n_8274_1y y l f))).
-
-(* constant 5389 *)
-definition l_e_st_eq_landau_n_8274_t9 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f)).(l_some_th5 (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_1y y l f) (f u)) (λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_symnotis (l_e_st_eq_landau_n_1to y) (f u) (l_e_st_eq_landau_n_8274_1y y l f) (l_e_st_eq_landau_n_8274_t8 y l f n u)) : l_not (l_e_image (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f (l_e_st_eq_landau_n_8274_1y y l f))).
-
-(* constant 5390 *)
-definition l_e_st_eq_landau_n_8274_t10 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f)).(l_all_th1 (l_e_st_eq_landau_n_1to y) (λu:l_e_st_eq_landau_n_1to y.l_e_image (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f u) (l_e_st_eq_landau_n_8274_1y y l f) (l_e_st_eq_landau_n_8274_t9 y l f n) : l_not (l_e_surjective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f)).
-
-(* constant 5391 *)
-definition l_e_st_eq_landau_n_8274_t11 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f)) (l_not (l_e_surjective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f)) (λt:l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f).l_e_st_eq_landau_n_8274_t7 y l f t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f l_e_st_eq_landau_n_1o) (l_e_st_eq_landau_n_8274_1y y l f)).l_e_st_eq_landau_n_8274_t10 y l f t) : l_not (l_e_surjective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f)).
-
-(* constant 5392 *)
-definition l_e_st_eq_landau_n_8274_t12 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.(l_and_th2 (l_e_injective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f) (l_e_surjective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f) (l_e_st_eq_landau_n_8274_t11 y l f) : l_not (l_e_bijective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f)).
-
-(* constant 5393 *)
-definition l_e_st_eq_landau_n_8274_t13 ≝ λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.(l_some_th5 (Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y) (λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.l_e_bijective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to y) f) (λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_8274_t12 y l f) : l_not (l_e_st_eq_landau_n_8274_prop1 l_e_st_eq_landau_n_1 y)).
-
-(* constant 5394 *)
-definition l_e_st_eq_landau_n_8274_t14 ≝ (λy:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y.l_e_st_eq_landau_n_8274_t13 y t : l_e_st_eq_landau_n_8274_prop2 l_e_st_eq_landau_n_1).
-
-(* constant 5395 *)
-definition l_e_st_eq_landau_n_8274_xs ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_suc x : l_e_st_eq_landau_n_nat).
-
-(* constant 5396 *)
-definition l_e_st_eq_landau_n_8274_xxs ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.(l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_8274_xs x) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_suc x)).
-
-(* constant 5397 *)
-definition l_e_st_eq_landau_n_8274_yy1 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.(l_e_st_eq_landau_n_xout y : l_e_st_eq_landau_n_1to y).
-
-(* constant 5398 *)
-definition l_e_st_eq_landau_n_8274_t15 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.(l_e_st_eq_landau_n_trless l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_suc x) y (l_e_st_eq_landau_n_satz24c x) l : l_e_st_eq_landau_n_less l_e_st_eq_landau_n_1 y).
-
-(* constant 5399 *)
-definition l_e_st_eq_landau_n_8274_ym1 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.(l_e_st_eq_landau_n_mn y l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_8274_t15 x p y l) : l_e_st_eq_landau_n_nat).
-
-(* constant 5400 *)
-definition l_e_st_eq_landau_n_8274_t16 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.(l_e_st_eq_landau_n_isless12 (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) y (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz4e x) (l_e_st_eq_landau_n_mn_th1c y l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_8274_t15 x p y l)) l : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1)).
-
-(* constant 5401 *)
-definition l_e_st_eq_landau_n_8274_t17 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.(l_e_st_eq_landau_n_satz20c x (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_8274_t16 x p y l) : l_e_st_eq_landau_n_less x (l_e_st_eq_landau_n_8274_ym1 x p y l)).
-
-(* constant 5402 *)
-definition l_e_st_eq_landau_n_8274_t18 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.(l_e_st_eq_landau_n_isless2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1) y (l_e_st_eq_landau_n_8274_ym1 x p y l) (l_e_st_eq_landau_n_mn_th1d y l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_8274_t15 x p y l)) (l_e_st_eq_landau_n_satz18a (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_ym1 x p y l) y).
-
-(* constant 5403 *)
-definition l_e_st_eq_landau_n_8274_t19 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.(l_ande1 (l_e_injective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f) (l_e_surjective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f) b : l_e_injective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f).
-
-(* constant 5404 *)
-definition l_e_st_eq_landau_n_8274_t20 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.(l_ande2 (l_e_injective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f) (l_e_surjective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f) b : l_e_surjective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f).
-
-(* constant 5405 *)
-definition l_e_st_eq_landau_n_8274_u1 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_inn x u : l_e_st_eq_landau_n_nat).
-
-(* constant 5406 *)
-definition l_e_st_eq_landau_n_8274_t21 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_satz16a (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) x (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_1top x u) (l_e_st_eq_landau_n_satz18c x) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5407 *)
-definition l_e_st_eq_landau_n_8274_t22 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_ec3e31 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_t21 x p y l f b i u) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5408 *)
-definition l_e_st_eq_landau_n_8274_t23 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_lessisi1 (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_t21 x p y l f b i u) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5409 *)
-definition l_e_st_eq_landau_n_8274_u2 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_t23 x p y l f b i u) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5410 *)
-definition l_e_st_eq_landau_n_8274_t24 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_u2 x p y l f b i u) (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_t22 x p y l f b i u) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_u2 x p y l f b i u) (l_e_st_eq_landau_n_8274_xxs x p y l).l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_t23 x p y l f b i u) (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_8274_xs x)) t) : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_u2 x p y l f b i u) (l_e_st_eq_landau_n_8274_xxs x p y l))).
-
-(* constant 5411 *)
-definition l_e_st_eq_landau_n_8274_t25 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.λj:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (l_e_st_eq_landau_n_8274_yy1 x p y l).(l_e_tris2 (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l) j i : l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (f (l_e_st_eq_landau_n_8274_xxs x p y l))).
-
-(* constant 5412 *)
-definition l_e_st_eq_landau_n_8274_t26 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.λj:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (l_e_st_eq_landau_n_8274_yy1 x p y l).(l_e_isfe (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f (l_e_st_eq_landau_n_8274_t19 x p y l f b) (l_e_st_eq_landau_n_8274_u2 x p y l f b i u) (l_e_st_eq_landau_n_8274_xxs x p y l) (l_e_st_eq_landau_n_8274_t25 x p y l f b i u j) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_u2 x p y l f b i u) (l_e_st_eq_landau_n_8274_xxs x p y l)).
-
-(* constant 5413 *)
-definition l_e_st_eq_landau_n_8274_t27 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (l_e_st_eq_landau_n_8274_yy1 x p y l)) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_u2 x p y l f b i u) (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_t24 x p y l f b i u) (λt:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (l_e_st_eq_landau_n_8274_yy1 x p y l).l_e_st_eq_landau_n_8274_t26 x p y l f b i u t) : l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (l_e_st_eq_landau_n_8274_yy1 x p y l))).
-
-(* constant 5414 *)
-definition l_e_st_eq_landau_n_8274_w1 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_inn y (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) : l_e_st_eq_landau_n_nat).
-
-(* constant 5415 *)
-definition l_e_st_eq_landau_n_8274_t28 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) y.(l_e_tris (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (l_e_st_eq_landau_n_outn y (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_1top y (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)))) (l_e_st_eq_landau_n_8274_yy1 x p y l) (l_e_st_eq_landau_n_isoutinn y (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u))) (l_e_st_eq_landau_n_isoutni y (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_1top y (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u))) y (l_e_st_eq_landau_n_lessisi3 y) j) : l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).
-
-(* constant 5416 *)
-definition l_e_st_eq_landau_n_8274_t29 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_imp_th3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) y) (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (l_e_st_eq_landau_n_8274_yy1 x p y l)) (l_e_st_eq_landau_n_8274_t27 x p y l f b i u) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) y.l_e_st_eq_landau_n_8274_t28 x p y l f b i u t) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) y).
-
-(* constant 5417 *)
-definition l_e_st_eq_landau_n_8274_t30 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_ore1 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) y) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) y) (l_e_st_eq_landau_n_1top y (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u))) (l_e_st_eq_landau_n_8274_t29 x p y l f b i u) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) y).
-
-(* constant 5418 *)
-definition l_e_st_eq_landau_n_8274_t31 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_islessis2 y (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_mn_th1c y l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_8274_t15 x p y l)) (l_e_st_eq_landau_n_satz25b y (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_t30 x p y l f b i u)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1)).
-
-(* constant 5419 *)
-definition l_e_st_eq_landau_n_8274_t32 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_or_th9 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_t31 x p y l f b i u) (λt:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_satz20c (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1 t) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_satz20b (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_ym1 x p y l) l_e_st_eq_landau_n_1 t) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_ym1 x p y l)).
-
-(* constant 5420 *)
-definition l_e_st_eq_landau_n_8274_w2 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_8274_ym1 x p y l) (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_t32 x p y l f b i u) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)).
-
-(* constant 5421 *)
-definition l_e_st_eq_landau_n_8274_f1 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).(λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_8274_w2 x p y l f b i t : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)).
-
-(* constant 5422 *)
-definition l_e_st_eq_landau_n_8274_t33 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i u) (l_e_st_eq_landau_n_8274_f1 x p y l f b i v).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_8274_ym1 x p y l) (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_t32 x p y l f b i u) (l_e_st_eq_landau_n_8274_w1 x p y l f b i v) (l_e_st_eq_landau_n_8274_t32 x p y l f b i v) j : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w1 x p y l f b i u) (l_e_st_eq_landau_n_8274_w1 x p y l f b i v)).
-
-(* constant 5423 *)
-definition l_e_st_eq_landau_n_8274_t34 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i u) (l_e_st_eq_landau_n_8274_f1 x p y l f b i v).(l_e_st_eq_landau_n_isinne y (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i v)) (l_e_st_eq_landau_n_8274_t33 x p y l f b i u v j) : l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i u)) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i v))).
-
-(* constant 5424 *)
-definition l_e_st_eq_landau_n_8274_t35 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i u) (l_e_st_eq_landau_n_8274_f1 x p y l f b i v).(l_e_st_eq_landau_n_8274_t19 x p y l f b (l_e_st_eq_landau_n_8274_u2 x p y l f b i u) (l_e_st_eq_landau_n_8274_u2 x p y l f b i v) (l_e_st_eq_landau_n_8274_t34 x p y l f b i u v j) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_u2 x p y l f b i u) (l_e_st_eq_landau_n_8274_u2 x p y l f b i v)).
-
-(* constant 5425 *)
-definition l_e_st_eq_landau_n_8274_t36 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i u) (l_e_st_eq_landau_n_8274_f1 x p y l f b i v).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_t23 x p y l f b i u) (l_e_st_eq_landau_n_8274_u1 x p y l f b i v) (l_e_st_eq_landau_n_8274_t23 x p y l f b i v) (l_e_st_eq_landau_n_8274_t35 x p y l f b i u v j) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_u1 x p y l f b i u) (l_e_st_eq_landau_n_8274_u1 x p y l f b i v)).
-
-(* constant 5426 *)
-definition l_e_st_eq_landau_n_8274_t37 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i u) (l_e_st_eq_landau_n_8274_f1 x p y l f b i v).(l_e_st_eq_landau_n_isinne x u v (l_e_st_eq_landau_n_8274_t36 x p y l f b i u v j) : l_e_is (l_e_st_eq_landau_n_1to x) u v).
-
-(* constant 5427 *)
-definition l_e_st_eq_landau_n_8274_v1 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_st_eq_landau_n_inn (l_e_st_eq_landau_n_8274_ym1 x p y l) v : l_e_st_eq_landau_n_nat).
-
-(* constant 5428 *)
-definition l_e_st_eq_landau_n_8274_t38 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_st_eq_landau_n_satz16a (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) (l_e_st_eq_landau_n_8274_ym1 x p y l) y (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_8274_ym1 x p y l) v) (l_e_st_eq_landau_n_8274_t18 x p y l) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y).
-
-(* constant 5429 *)
-definition l_e_st_eq_landau_n_8274_t39 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_ec3e31 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y) (l_e_st_eq_landau_n_8274_t38 x p y l f b i v) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y).
-
-(* constant 5430 *)
-definition l_e_st_eq_landau_n_8274_t40 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_st_eq_landau_n_lessisi1 (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y (l_e_st_eq_landau_n_8274_t38 x p y l f b i v) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y).
-
-(* constant 5431 *)
-definition l_e_st_eq_landau_n_8274_v2 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_st_eq_landau_n_outn y (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) (l_e_st_eq_landau_n_8274_t40 x p y l f b i v) : l_e_st_eq_landau_n_1to y).
-
-(* constant 5432 *)
-definition l_e_st_eq_landau_n_8274_w3 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_invf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f b (l_e_st_eq_landau_n_8274_v2 x p y l f b i v) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5433 *)
-definition l_e_st_eq_landau_n_8274_t41 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_thinvf2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f b (l_e_st_eq_landau_n_8274_v2 x p y l f b i v) : l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_v2 x p y l f b i v) (f (l_e_st_eq_landau_n_8274_w3 x p y l f b i v))).
-
-(* constant 5434 *)
-definition l_e_st_eq_landau_n_8274_t42 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l) j : l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (f (l_e_st_eq_landau_n_8274_xxs x p y l))).
-
-(* constant 5435 *)
-definition l_e_st_eq_landau_n_8274_t43 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l).(l_e_tr3is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_v2 x p y l f b i v) (f (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l) (l_e_st_eq_landau_n_8274_t41 x p y l f b i v) (l_e_st_eq_landau_n_8274_t42 x p y l f b i v j) i : l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_v2 x p y l f b i v) (l_e_st_eq_landau_n_8274_yy1 x p y l)).
-
-(* constant 5436 *)
-definition l_e_st_eq_landau_n_8274_t44 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l).(l_e_st_eq_landau_n_isoutne y (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) (l_e_st_eq_landau_n_8274_t40 x p y l f b i v) y (l_e_st_eq_landau_n_lessisi3 y) (l_e_st_eq_landau_n_8274_t43 x p y l f b i v j) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y).
-
-(* constant 5437 *)
-definition l_e_st_eq_landau_n_8274_t45 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) y) (l_e_st_eq_landau_n_8274_t39 x p y l f b i v) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l).l_e_st_eq_landau_n_8274_t44 x p y l f b i v t) : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l))).
-
-(* constant 5438 *)
-definition l_e_st_eq_landau_n_8274_w4 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_st_eq_landau_n_inn (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) : l_e_st_eq_landau_n_nat).
-
-(* constant 5439 *)
-definition l_e_st_eq_landau_n_8274_t46 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_xs x).(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v))) (l_e_st_eq_landau_n_8274_xxs x p y l) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_8274_xs x)) j) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l)).
-
-(* constant 5440 *)
-definition l_e_st_eq_landau_n_8274_t47 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_imp_th3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_xs x)) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_t45 x p y l f b i v) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_8274_t46 x p y l f b i v t) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5441 *)
-definition l_e_st_eq_landau_n_8274_t48 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_ore1 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (l_e_st_eq_landau_n_8274_t47 x p y l f b i v) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5442 *)
-definition l_e_st_eq_landau_n_8274_t49 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_st_eq_landau_n_satz26a x (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_t48 x p y l f b i v) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) x).
-
-(* constant 5443 *)
-definition l_e_st_eq_landau_n_8274_w5 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_t49 x p y l f b i v) : l_e_st_eq_landau_n_1to x).
-
-(* constant 5444 *)
-definition l_e_st_eq_landau_n_8274_t50 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_t49 x p y l f b i v) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_8274_u1 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v))).
-
-(* constant 5445 *)
-definition l_e_st_eq_landau_n_8274_t51 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v))) (l_e_st_eq_landau_n_8274_u2 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w4 x p y l f b i v) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_8274_xs x) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (l_e_st_eq_landau_n_8274_u1 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)) (l_e_st_eq_landau_n_8274_t23 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)) (l_e_st_eq_landau_n_8274_t50 x p y l f b i v)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_u2 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v))).
-
-(* constant 5446 *)
-definition l_e_st_eq_landau_n_8274_t52 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f (l_e_st_eq_landau_n_8274_w3 x p y l f b i v) (l_e_st_eq_landau_n_8274_u2 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)) (l_e_st_eq_landau_n_8274_t51 x p y l f b i v) : l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)))).
-
-(* constant 5447 *)
-definition l_e_st_eq_landau_n_8274_t53 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_tris (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_v2 x p y l f b i v) (f (l_e_st_eq_landau_n_8274_w3 x p y l f b i v)) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v))) (l_e_st_eq_landau_n_8274_t41 x p y l f b i v) (l_e_st_eq_landau_n_8274_t52 x p y l f b i v) : l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_v2 x p y l f b i v) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)))).
-
-(* constant 5448 *)
-definition l_e_st_eq_landau_n_8274_t54 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) (l_e_st_eq_landau_n_inn y (l_e_st_eq_landau_n_8274_v2 x p y l f b i v)) (l_e_st_eq_landau_n_8274_w1 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)) (l_e_st_eq_landau_n_isinoutn y (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) (l_e_st_eq_landau_n_8274_t40 x p y l f b i v)) (l_e_st_eq_landau_n_isinni y (l_e_st_eq_landau_n_8274_v2 x p y l f b i v) (f (l_e_st_eq_landau_n_8274_u2 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v))) (l_e_st_eq_landau_n_8274_t53 x p y l f b i v)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) (l_e_st_eq_landau_n_8274_w1 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v))).
-
-(* constant 5449 *)
-definition l_e_st_eq_landau_n_8274_t55 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) v (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_8274_ym1 x p y l) (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_8274_ym1 x p y l) v)) (l_e_st_eq_landau_n_8274_w2 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_8274_ym1 x p y l) v) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_8274_ym1 x p y l) (l_e_st_eq_landau_n_8274_v1 x p y l f b i v) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_8274_ym1 x p y l) v) (l_e_st_eq_landau_n_8274_w1 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)) (l_e_st_eq_landau_n_8274_t32 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v)) (l_e_st_eq_landau_n_8274_t54 x p y l f b i v)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) v (l_e_st_eq_landau_n_8274_f1 x p y l f b i (l_e_st_eq_landau_n_8274_w5 x p y l f b i v))).
-
-(* constant 5450 *)
-definition l_e_st_eq_landau_n_8274_t56 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).λv:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).(l_somei (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) v (l_e_st_eq_landau_n_8274_f1 x p y l f b i t)) (l_e_st_eq_landau_n_8274_w5 x p y l f b i v) (l_e_st_eq_landau_n_8274_t55 x p y l f b i v) : l_e_image (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i) v).
-
-(* constant 5451 *)
-definition l_e_st_eq_landau_n_8274_t57 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).(l_andi (l_e_injective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i)) (l_e_surjective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i)) (λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i u) (l_e_st_eq_landau_n_8274_f1 x p y l f b i v).l_e_st_eq_landau_n_8274_t37 x p y l f b i u v t) (λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).l_e_st_eq_landau_n_8274_t56 x p y l f b i u) : l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (l_e_st_eq_landau_n_8274_f1 x p y l f b i)).
-
-(* constant 5452 *)
-definition l_e_st_eq_landau_n_8274_t58 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).(l_somei (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l).l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_ym1 x p y l)) g) (l_e_st_eq_landau_n_8274_f1 x p y l f b i) (l_e_st_eq_landau_n_8274_t57 x p y l f b i) : l_e_st_eq_landau_n_8274_prop1 x (l_e_st_eq_landau_n_8274_ym1 x p y l)).
-
-(* constant 5453 *)
-definition l_e_st_eq_landau_n_8274_t59 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λi:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).(p (l_e_st_eq_landau_n_8274_ym1 x p y l) (l_e_st_eq_landau_n_8274_t17 x p y l) (l_e_st_eq_landau_n_8274_t58 x p y l f b i) : l_con).
-
-(* constant 5454 *)
-definition l_e_st_eq_landau_n_8274_m0 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).(l_e_invf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f b (l_e_st_eq_landau_n_8274_yy1 x p y l) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5455 *)
-definition l_e_st_eq_landau_n_8274_t60 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).(l_e_thinvf2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f b (l_e_st_eq_landau_n_8274_yy1 x p y l) : l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_yy1 x p y l) (f (l_e_st_eq_landau_n_8274_m0 x p y l f b n))).
-
-(* constant 5456 *)
-definition l_e_st_eq_landau_n_8274_f2 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).(l_e_changef (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f (l_e_st_eq_landau_n_8274_m0 x p y l f b n) (l_e_st_eq_landau_n_8274_xxs x p y l) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y).
-
-(* constant 5457 *)
-definition l_e_st_eq_landau_n_8274_t61 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).(l_e_changef2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f (l_e_st_eq_landau_n_8274_m0 x p y l f b n) (l_e_st_eq_landau_n_8274_xxs x p y l) (l_e_st_eq_landau_n_8274_xxs x p y l) (l_e_refis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_8274_xxs x p y l)) : l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_f2 x p y l f b n (l_e_st_eq_landau_n_8274_xxs x p y l)) (f (l_e_st_eq_landau_n_8274_m0 x p y l f b n))).
-
-(* constant 5458 *)
-definition l_e_st_eq_landau_n_8274_t62 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).(l_e_tris2 (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_f2 x p y l f b n (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l) (f (l_e_st_eq_landau_n_8274_m0 x p y l f b n)) (l_e_st_eq_landau_n_8274_t61 x p y l f b n) (l_e_st_eq_landau_n_8274_t60 x p y l f b n) : l_e_is (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_f2 x p y l f b n (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).
-
-(* constant 5459 *)
-definition l_e_st_eq_landau_n_8274_t63 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).(l_e_wissel_th6 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f (l_e_st_eq_landau_n_8274_m0 x p y l f b n) (l_e_st_eq_landau_n_8274_xxs x p y l) b : l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) (l_e_st_eq_landau_n_8274_f2 x p y l f b n)).
-
-(* constant 5460 *)
-definition l_e_st_eq_landau_n_8274_t64 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.λn:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).(l_e_st_eq_landau_n_8274_t59 x p y l (l_e_st_eq_landau_n_8274_f2 x p y l f b n) (l_e_st_eq_landau_n_8274_t63 x p y l f b n) (l_e_st_eq_landau_n_8274_t62 x p y l f b n) : l_con).
-
-(* constant 5461 *)
-definition l_e_st_eq_landau_n_8274_t65 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)) l_con (λt:l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l).l_e_st_eq_landau_n_8274_t59 x p y l f b t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to y) (f (l_e_st_eq_landau_n_8274_xxs x p y l)) (l_e_st_eq_landau_n_8274_yy1 x p y l)).l_e_st_eq_landau_n_8274_t64 x p y l f b t) : l_con).
-
-(* constant 5462 *)
-definition l_e_st_eq_landau_n_8274_t65a ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_suc x) y.(l_some_th5 (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y) (λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f) (λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x).l_e_st_eq_landau_n_1to y.λt:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_8274_xs x)) (l_e_st_eq_landau_n_1to y) f.l_e_st_eq_landau_n_8274_t65 x p y l f t) : l_not (l_e_st_eq_landau_n_8274_prop1 (l_e_st_eq_landau_n_8274_xs x) y)).
-
-(* constant 5463 *)
-definition l_e_st_eq_landau_n_8274_t66 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_8274_prop2 x.(λy:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_8274_xs x) y.l_e_st_eq_landau_n_8274_t65a x p y t : l_e_st_eq_landau_n_8274_prop2 (l_e_st_eq_landau_n_8274_xs x)).
-
-(* constant 5464 *)
-definition l_e_st_eq_landau_n_8274_t67 ≝ λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_8274_prop2 t) l_e_st_eq_landau_n_8274_t14 (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_8274_prop2 t.l_e_st_eq_landau_n_8274_t66 t u) x : l_e_st_eq_landau_n_8274_prop2 x).
-
-(* constant 5465 *)
-definition l_e_st_eq_landau_n_satz274 ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.(l_e_st_eq_landau_n_8274_t67 x y l : l_not (l_some (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to y) (λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to y.l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to y) f))).
-
-(* constant 5466 *)
-definition l_e_st_eq_landau_n_satz274a ≝ λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_less x y.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to y.(l_some_th4 (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to y) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to y.l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to y) g) (l_e_st_eq_landau_n_satz274 x y l) f : l_not (l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to y) f)).
-
-(* constant 5467 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_inn ≝ λx:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_inn x u : l_e_st_eq_landau_n_nat).
-
-(* constant 5468 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_1to x.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_xout x)).(l_imp_th3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x) (l_e_is (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_xout x)) o (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x.l_e_tris (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n)) (l_e_st_eq_landau_n_xout x) (l_e_st_eq_landau_n_isoutinn x n) (l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n) x (l_e_st_eq_landau_n_lessisi3 x) t)) : l_not (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x)).
-
-(* constant 5469 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_1to x.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_xout x)).(l_ore1 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x) (l_e_st_eq_landau_n_1top x n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t1 q x n o) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x).
-
-(* constant 5470 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma275 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_1to x.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_xout x)).(l_e_st_eq_landau_n_satz25c x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t2 q x n o) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x n)) x).
-
-(* constant 5471 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_recprop ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_and (l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_1out x)) (f (l_e_st_eq_landau_n_1out x))) (∀t:l_e_st_eq_landau_n_1to x.∀u:l_not (l_e_is (l_e_st_eq_landau_n_1to x) t (l_e_st_eq_landau_n_xout x)).l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x t)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q x t u))) (q (g t) (f (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x t)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q x t u))))) : Prop).
-
-(* constant 5472 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_1o ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_1out x : l_e_st_eq_landau_n_1to x).
-
-(* constant 5473 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_xo ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_xout x : l_e_st_eq_landau_n_1to x).
-
-(* constant 5474 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t11 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_st_eq_landau_n_satz16b u (l_e_st_eq_landau_n_suc u) x (l_e_st_eq_landau_n_satz18c u) l : l_e_st_eq_landau_n_less u x).
-
-(* constant 5475 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t12 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_st_eq_landau_n_lessisi1 u x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t11 q x u l) : l_e_st_eq_landau_n_lessis u x).
-
-(* constant 5476 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_ux ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_st_eq_landau_n_outn x u (l_e_st_eq_landau_n_rt_rp_r_c_8275_t12 q x u l) : l_e_st_eq_landau_n_1to x).
-
-(* constant 5477 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t13 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_ec3e31 (l_e_st_eq_landau_n_is u x) (l_e_st_eq_landau_n_more u x) (l_e_st_eq_landau_n_less u x) (l_e_st_eq_landau_n_satz10b u x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t11 q x u l) : l_e_st_eq_landau_n_nis u x).
-
-(* constant 5478 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)) (l_e_st_eq_landau_n_is u x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t13 q x u l) (λt:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x).l_e_st_eq_landau_n_isoutne x u (l_e_st_eq_landau_n_rt_rp_r_c_8275_t12 q x u l) x (l_e_st_eq_landau_n_lessisi3 x) t) : l_not (l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x))).
-
-(* constant 5479 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t15 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_isf l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_suc u (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (l_e_st_eq_landau_n_isinoutn x u (l_e_st_eq_landau_n_rt_rp_r_c_8275_t12 q x u l)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc u) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)))).
-
-(* constant 5480 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t16 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_suc u) l (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l))) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t15 q x u l) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l) (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l))) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))).
-
-(* constant 5481 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_ns ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λn:l_e_st_eq_landau_n_1to x.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)).(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q x n o) : l_e_st_eq_landau_n_1to x).
-
-(* constant 5482 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) : Prop).
-
-(* constant 5483 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_prop2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(∀t:l_e_st_eq_landau_n_1to x.∀u:l_not (l_e_is (l_e_st_eq_landau_n_1to x) t (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)).l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x t u)) (q (g t) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x t u))) : Prop).
-
-(* constant 5484 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q x f g) (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop2 q x f g) pg : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q x f g).
-
-(* constant 5485 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λn:l_e_st_eq_landau_n_1to x.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q x f g) (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop2 q x f g) pg n o : l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x n o)) (q (g n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x n o)))).
-
-(* constant 5486 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t17 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_isf (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx g (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t16 q x u l) : l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l)) (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))).
-
-(* constant 5487 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t18 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (g (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l)) (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l))) (q (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t17 q x f g pg u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t4 q x f g pg (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)) : l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l)) (q (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l))))).
-
-(* constant 5488 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis u x.(l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_outn x u l)) (h (l_e_st_eq_landau_n_outn x u l)) : Prop).
-
-(* constant 5489 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_nat.(l_and (l_e_st_eq_landau_n_lessis u x) (∀t:l_e_st_eq_landau_n_lessis u x.l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h u t) : Prop).
-
-(* constant 5490 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_nat.(l_or (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h u) (l_e_st_eq_landau_n_more u x) : Prop).
-
-(* constant 5491 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λl:l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 x.(l_e_st_eq_landau_n_isoutni x l_e_st_eq_landau_n_1 l l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a x) (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_outn x l_e_st_eq_landau_n_1 l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)).
-
-(* constant 5492 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t6 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λl:l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 x.(l_e_isf (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx g (l_e_st_eq_landau_n_outn x l_e_st_eq_landau_n_1 l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t5 q x f g h pg ph l) : l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_outn x l_e_st_eq_landau_n_1 l)) (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x))).
-
-(* constant 5493 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t7 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λl:l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 x.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (g (l_e_st_eq_landau_n_outn x l_e_st_eq_landau_n_1 l)) (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t6 q x f g h pg ph l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t3 q x f g pg) : l_e_st_eq_landau_n_rt_rp_r_c_is (g (l_e_st_eq_landau_n_outn x l_e_st_eq_landau_n_1 l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x))).
-
-(* constant 5494 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t8 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λl:l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 x.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (g (l_e_st_eq_landau_n_outn x l_e_st_eq_landau_n_1 l)) (h (l_e_st_eq_landau_n_outn x l_e_st_eq_landau_n_1 l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t7 q x f g h pg ph l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t7 q x f h g ph pg l) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h l_e_st_eq_landau_n_1 l).
-
-(* constant 5495 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t9 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.(l_andi (l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 x) (∀t:l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 x.l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h l_e_st_eq_landau_n_1 t) (l_e_st_eq_landau_n_satz24a x) (λt:l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 x.l_e_st_eq_landau_n_rt_rp_r_c_8275_t8 q x f g h pg ph t) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h l_e_st_eq_landau_n_1).
-
-(* constant 5496 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t10 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_more l_e_st_eq_landau_n_1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t9 q x f g h pg ph) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h l_e_st_eq_landau_n_1).
-
-(* constant 5497 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t19 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_ec3e32 (l_e_st_eq_landau_n_is u x) (l_e_st_eq_landau_n_more u x) (l_e_st_eq_landau_n_less u x) (l_e_st_eq_landau_n_satz10b u x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t11 q x u l) : l_not (l_e_st_eq_landau_n_more u x)).
-
-(* constant 5498 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t20 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h u) (l_e_st_eq_landau_n_more u x) p (l_e_st_eq_landau_n_rt_rp_r_c_8275_t19 q x f g h pg ph u p l) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h u).
-
-(* constant 5499 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t21 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_ande2 (l_e_st_eq_landau_n_lessis u x) (∀t:l_e_st_eq_landau_n_lessis u x.l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h u t) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t20 q x f g h pg ph u p l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t12 q x u l) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h u (l_e_st_eq_landau_n_rt_rp_r_c_8275_t12 q x u l)).
-
-(* constant 5500 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t22 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))) (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (h (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t21 q x f g h pg ph u p l) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))) (q (h (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l))))).
-
-(* constant 5501 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t23 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (h (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l)) (q (h (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t18 q x f h ph u l) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (h (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))) (h (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l))).
-
-(* constant 5502 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t24 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (g (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l)) (q (g (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))) (q (h (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ux q x u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t14 q x u l)))) (h (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_suc u) l)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t18 q x f g pg u l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t22 q x f g h pg ph u p l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t23 q x f g h pg ph u p l) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h (l_e_st_eq_landau_n_suc u) l).
-
-(* constant 5503 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t25 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_andi (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x) (∀t:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h (l_e_st_eq_landau_n_suc u) t) l (λt:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.l_e_st_eq_landau_n_rt_rp_r_c_8275_t24 q x f g h pg ph u p t) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h (l_e_st_eq_landau_n_suc u)).
-
-(* constant 5504 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t26 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λl:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_suc u) x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t25 q x f g h pg ph u p l) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h (l_e_st_eq_landau_n_suc u)).
-
-(* constant 5505 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t27 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λn:l_not (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x).(l_e_st_eq_landau_n_satz10k (l_e_st_eq_landau_n_suc u) x n : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_suc u) x).
-
-(* constant 5506 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t28 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.λn:l_not (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x).(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h (l_e_st_eq_landau_n_suc u)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_suc u) x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t27 q x f g h pg ph u p n) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h (l_e_st_eq_landau_n_suc u)).
-
-(* constant 5507 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t29 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u.(l_imp_th1 (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h (l_e_st_eq_landau_n_suc u)) (λt:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x.l_e_st_eq_landau_n_rt_rp_r_c_8275_t26 q x f g h pg ph u p t) (λt:l_not (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_suc u) x).l_e_st_eq_landau_n_rt_rp_r_c_8275_t28 q x f g h pg ph u p t) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h (l_e_st_eq_landau_n_suc u)).
-
-(* constant 5508 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t30 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λu:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λv:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h v) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t10 q x f g h pg ph) (λv:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h v.l_e_st_eq_landau_n_rt_rp_r_c_8275_t29 q x f g h pg ph v t) u : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop5 q x f g h u).
-
-(* constant 5509 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t31 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λn:l_e_st_eq_landau_n_1to x.(l_e_isf (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx g n (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n)) (l_e_st_eq_landau_n_isoutinn x n) : l_e_st_eq_landau_n_rt_rp_r_c_is (g n) (g (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n)))).
-
-(* constant 5510 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t32 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λn:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_satz10d (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x (l_e_st_eq_landau_n_1top x n) : l_not (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x)).
-
-(* constant 5511 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t33 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λn:l_e_st_eq_landau_n_1to x.(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h (l_e_st_eq_landau_n_rt_rp_r_c_inn x n)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t30 q x f g h pg ph (l_e_st_eq_landau_n_rt_rp_r_c_inn x n)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t32 q x f g h pg ph n) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop4 q x f g h (l_e_st_eq_landau_n_rt_rp_r_c_inn x n)).
-
-(* constant 5512 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t34 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λn:l_e_st_eq_landau_n_1to x.(l_ande2 (l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x) (∀t:l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x.l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) t) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t33 q x f g h pg ph n) (l_e_st_eq_landau_n_1top x n) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop3 q x f g h (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n)).
-
-(* constant 5513 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t35 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λn:l_e_st_eq_landau_n_1to x.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (h n) (h (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t31 q x f h g ph pg n) : l_e_st_eq_landau_n_rt_rp_r_c_is (h (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n))) (h n)).
-
-(* constant 5514 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t36 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.λn:l_e_st_eq_landau_n_1to x.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (g n) (g (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n))) (h (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_1top x n))) (h n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t31 q x f g h pg ph n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t34 q x f g h pg ph n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t35 q x f g h pg ph n) : l_e_st_eq_landau_n_rt_rp_r_c_is (g n) (h n)).
-
-(* constant 5515 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t37 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λpg:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λph:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.(l_e_fisi (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx g h (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8275_t36 q x f g h pg ph t) : l_e_is (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) g h).
-
-(* constant 5516 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_prop6 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_some (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g) : Prop).
-
-(* constant 5517 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.(l_all (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8275_prop6 q x f) : Prop).
-
-(* constant 5518 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t38 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q l_e_st_eq_landau_n_1)) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q l_e_st_eq_landau_n_1 f f).
-
-(* constant 5519 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t39 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) n (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q l_e_st_eq_landau_n_1)).(o (l_e_st_eq_landau_n_singlet_th1 n) : l_con).
-
-(* constant 5520 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t40 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) n (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q l_e_st_eq_landau_n_1)).(l_cone (l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q l_e_st_eq_landau_n_1 n o)) (q (f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q l_e_st_eq_landau_n_1 n o)))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t39 q f n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q l_e_st_eq_landau_n_1 n o)) (q (f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q l_e_st_eq_landau_n_1 n o)))).
-
-(* constant 5521 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t41 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_andi (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q l_e_st_eq_landau_n_1 f f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop2 q l_e_st_eq_landau_n_1 f f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t38 q f) (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λu:l_not (l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) t (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q l_e_st_eq_landau_n_1)).l_e_st_eq_landau_n_rt_rp_r_c_8275_t40 q f t u) : l_e_st_eq_landau_n_rt_rp_r_c_recprop q l_e_st_eq_landau_n_1 f f).
-
-(* constant 5522 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t42 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_somei (Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q l_e_st_eq_landau_n_1 f g) f (l_e_st_eq_landau_n_rt_rp_r_c_8275_t41 q f) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop6 q l_e_st_eq_landau_n_1 f).
-
-(* constant 5523 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t43 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.(λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8275_t42 q f : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q l_e_st_eq_landau_n_1).
-
-(* constant 5524 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_xs ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.(l_e_st_eq_landau_n_suc x : l_e_st_eq_landau_n_nat).
-
-(* constant 5525 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) x (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_satz18c x)) f : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5526 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t44 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_onei (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) g) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) g.λv:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) h.l_e_st_eq_landau_n_rt_rp_r_c_8275_t37 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) g h u v) (p (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f)) : l_e_one (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) g)).
-
-(* constant 5527 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_ind (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) g) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t44 q x p f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5528 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t45 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_oneax (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) g) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t44 q x p f) : l_e_st_eq_landau_n_rt_rp_r_c_recprop q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f)).
-
-(* constant 5529 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).(l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) n (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) : Prop).
-
-(* constant 5530 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).(l_e_st_eq_landau_n_satz26a x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t2 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) x).
-
-(* constant 5531 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 q x p f n o) : l_e_st_eq_landau_n_1to x).
-
-(* constant 5532 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_b ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).(l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5533 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t47 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).(l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 q x p f n o1) (l_e_refis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o1)).
-
-(* constant 5534 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t48 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).(l_e_isf (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t47 q x p f n o o1) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o1)).
-
-(* constant 5535 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(q (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5536 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_c ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).(l_r_ite (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.λu:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f)) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).l_e_st_eq_landau_n_rt_rp_r_c_8275_t48 q x p f n t u) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5537 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t49 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λi:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.(l_r_itet (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.λu:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f)) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).l_e_st_eq_landau_n_rt_rp_r_c_8275_t48 q x p f n t u) i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f)).
-
-(* constant 5538 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t50 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).(l_r_itef (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.λu:l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n.l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f)) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).l_e_st_eq_landau_n_rt_rp_r_c_8275_t48 q x p f n t u) o : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o)).
-
-(* constant 5539 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_g2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f t : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5540 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t51 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_symnotis l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_ax3 x)) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) t) : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)))).
-
-(* constant 5541 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t52 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8275_t50 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t51 q x p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t51 q x p f))).
-
-(* constant 5542 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t53 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)))).
-
-(* constant 5543 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t54 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a x) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t51 q x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t53 q x p f) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t51 q x p f))).
-
-(* constant 5544 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t55 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t51 q x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t54 q x p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t51 q x p f))).
-
-(* constant 5545 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t56 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t51 q x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t52 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t55 q x p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x))).
-
-(* constant 5546 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t57 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t56 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t3 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t45 q x p f)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x))).
-
-(* constant 5547 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t58 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isinoutn x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a x) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x))).
-
-(* constant 5548 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t59 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_satz18c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t58 q x p f) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) x (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_satz18c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x))).
-
-(* constant 5549 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t60 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) x (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_satz18c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t59 q x p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x))).
-
-(* constant 5550 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t61 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_1o q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t57 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t60 q x p f) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) f (l_e_st_eq_landau_n_rt_rp_r_c_8275_g2 q x p f)).
-
-(* constant 5551 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t62 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).
-
-(* constant 5552 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t63 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_st_eq_landau_n_ax4 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t62 q x p f n o i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) x).
-
-(* constant 5553 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t64 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 q x p f n o) x (l_e_st_eq_landau_n_lessisi3 x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t63 q x p f n o i) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)).
-
-(* constant 5554 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t65 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_isf (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_symis (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t64 q x p f n o i)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o)).
-
-(* constant 5555 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t66 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t65 q x p f n o i) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t50 q x p f n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n)).
-
-(* constant 5556 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t67 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t66 q x p f n o i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))))).
-
-(* constant 5557 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t68 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_symis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) i) : l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))).
-
-(* constant 5558 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t69 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t68 q x p f n o i) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)))).
-
-(* constant 5559 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t70 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_a q x p f) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t49 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) i) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t67 q x p f n o i) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t69 q x p f n o i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)))).
-
-(* constant 5560 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t71 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x).(l_e_st_eq_landau_n_isoutne x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 q x p f n o) x (l_e_st_eq_landau_n_lessisi3 x) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) x).
-
-(* constant 5561 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t72 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x).(l_e_st_eq_landau_n_ax2 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t71 q x p f n o o1 i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).
-
-(* constant 5562 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t73 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x).(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t72 q x p f n o o1 i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).
-
-(* constant 5563 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x)) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) o1 (λt:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x).l_e_st_eq_landau_n_rt_rp_r_c_8275_t73 q x p f n o o1 t) : l_not (l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q x))).
-
-(* constant 5564 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t75 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 q x p f n o) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o))).
-
-(* constant 5565 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t76 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_st_eq_landau_n_ax2 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t75 q x p f n o o1) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o)))).
-
-(* constant 5566 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t77 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))).
-
-(* constant 5567 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t78 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_tris1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o))) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t77 q x p f n o o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t76 q x p f n o o1) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o)))).
-
-(* constant 5568 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t79 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t46 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) o1) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o))) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t78 q x p f n o o1) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))).
-
-(* constant 5569 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t80 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_isf (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t79 q x p f n o o1) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)))).
-
-(* constant 5570 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t81 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o))) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o))) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)))).
-
-(* constant 5571 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t82 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o))) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t76 q x p f n o o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t81 q x p f n o o1) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)))).
-
-(* constant 5572 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t83 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))) x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))) (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_satz18c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t82 q x p f n o o1) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) x (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_satz18c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)))).
-
-(* constant 5573 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t84 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) x (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) (l_e_st_eq_landau_n_satz18c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t83 q x p f n o o1) : l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)))).
-
-(* constant 5574 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t85 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o)) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t84 q x p f n o o1) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))))).
-
-(* constant 5575 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t86 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t50 q x p f n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)))).
-
-(* constant 5576 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t87 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t50 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t80 q x p f n o o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t4 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t45 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))))).
-
-(* constant 5577 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t88 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t86 q x p f n o o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t85 q x p f n o o1) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1))))).
-
-(* constant 5578 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t89 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).λo1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_b q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_n1 q x p f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t74 q x p f n o o1)))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t87 q x p f n o o1) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t88 q x p f n o o1) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)))).
-
-(* constant 5579 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t90 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λo:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f n).(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)))) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).l_e_st_eq_landau_n_rt_rp_r_c_8275_t70 q x p f n o t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_xo q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p))).l_e_st_eq_landau_n_rt_rp_r_c_8275_t89 q x p f n o t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_c q x p f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) n o)))).
-
-(* constant 5580 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t91 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_c_8275_nxs q x p f t).l_e_st_eq_landau_n_rt_rp_r_c_8275_t90 q x p f t u : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop2 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) f (l_e_st_eq_landau_n_rt_rp_r_c_8275_g2 q x p f)).
-
-(* constant 5581 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t92 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_andi (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) f (l_e_st_eq_landau_n_rt_rp_r_c_8275_g2 q x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop2 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) f (l_e_st_eq_landau_n_rt_rp_r_c_8275_g2 q x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t61 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t91 q x p f) : l_e_st_eq_landau_n_rt_rp_r_c_recprop q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) f (l_e_st_eq_landau_n_rt_rp_r_c_8275_g2 q x p f)).
-
-(* constant 5582 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t93 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_somei (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) f g) (l_e_st_eq_landau_n_rt_rp_r_c_8275_g2 q x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t92 q x p f) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop6 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p) f).
-
-(* constant 5583 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t94 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x.(λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8275_t93 q x p f : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q (l_e_st_eq_landau_n_rt_rp_r_c_8275_xs q x p)).
-
-(* constant 5584 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t95 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λy:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q y) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t43 q) (λy:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q y.l_e_st_eq_landau_n_rt_rp_r_c_8275_t94 q y t) x : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop7 q x).
-
-(* constant 5585 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t96 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8275_t95 q x f : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop6 q x f).
-
-(* constant 5586 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t97 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_onei (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λh:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λv:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f h.l_e_st_eq_landau_n_rt_rp_r_c_8275_t37 q x f g h u v) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t96 q x f) : l_e_one (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g)).
-
-(* constant 5587 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz275 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8275_t97 q x f : l_e_one (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g)).
-
-(* constant 5588 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_recf ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_ind (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g) (l_e_st_eq_landau_n_rt_rp_r_c_satz275 q x f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5589 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz275a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_oneax (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g) (l_e_st_eq_landau_n_rt_rp_r_c_satz275 q x f) : l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f)).
-
-(* constant 5590 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_rec ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_rt_rp_r_c_recf q x f n : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5591 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz275b ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8275_t3 q x f (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f) (l_e_st_eq_landau_n_rt_rp_r_c_satz275a q x f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_rec q x f (l_e_st_eq_landau_n_1out x)) (f (l_e_st_eq_landau_n_1out x))).
-
-(* constant 5592 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_sucx ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to x.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_xout x)).(l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x n o : l_e_st_eq_landau_n_1to x).
-
-(* constant 5593 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz275c ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to x.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to x) n (l_e_st_eq_landau_n_xout x)).(l_e_st_eq_landau_n_rt_rp_r_c_8275_t4 q x f (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f) (l_e_st_eq_landau_n_rt_rp_r_c_satz275a q x f) n o : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_rec q x f (l_e_st_eq_landau_n_rt_rp_r_c_sucx q x f n o)) (q (l_e_st_eq_landau_n_rt_rp_r_c_rec q x f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_sucx q x f n o)))).
-
-(* constant 5594 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz275d ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.(l_e_st_eq_landau_n_rt_rp_r_c_8275_t37 q x f g (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f) r (l_e_st_eq_landau_n_rt_rp_r_c_satz275a q x f) : l_e_is (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) g (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f)).
-
-(* constant 5595 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz275e ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_c_recprop q x f g.λn:l_e_st_eq_landau_n_1to x.(l_e_fise (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx g (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f) (l_e_st_eq_landau_n_rt_rp_r_c_satz275d q x f g r) n : l_e_st_eq_landau_n_rt_rp_r_c_is (g n) (l_e_st_eq_landau_n_rt_rp_r_c_rec q x f n)).
-
-(* constant 5596 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_fl ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x y l f : Πt:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5597 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_rf ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_recf q x f : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5598 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x y l (l_e_st_eq_landau_n_rt_rp_r_c_8275_rf q x y l f) : Πt:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5599 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t98 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isinoutn y l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a y) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_1out y))).
-
-(* constant 5600 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t99 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a x) (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_1out y)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_1out y)) y x (l_e_st_eq_landau_n_1top y (l_e_st_eq_landau_n_1out y)) l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t98 q x y l f) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1out x) (l_e_st_eq_landau_n_left1to x y l (l_e_st_eq_landau_n_1out y))).
-
-(* constant 5601 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t100 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isp (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_rf q x y l f t) (f t)) (l_e_st_eq_landau_n_1out x) (l_e_st_eq_landau_n_left1to x y l (l_e_st_eq_landau_n_1out y)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t3 q x f (l_e_st_eq_landau_n_rt_rp_r_c_8275_rf q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_satz275a q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t99 q x y l f) : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q y (l_e_st_eq_landau_n_rt_rp_r_c_8275_fl q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f)).
-
-(* constant 5602 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t100a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_imp_th3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y) (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)) o (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y.l_e_tris (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_outn y (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) (l_e_st_eq_landau_n_1top y n)) (l_e_st_eq_landau_n_xout y) (l_e_st_eq_landau_n_isoutinn y n) (l_e_st_eq_landau_n_isoutni y (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) (l_e_st_eq_landau_n_1top y n) y (l_e_st_eq_landau_n_lessisi3 y) t)) : l_not (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y)).
-
-(* constant 5603 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t100b ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_ore1 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y) (l_e_st_eq_landau_n_1top y n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t100a q x y l f n o) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y).
-
-(* constant 5604 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t101 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_e_st_eq_landau_n_satz16b (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t100b q x y l f n o) l : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) x).
-
-(* constant 5605 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t102 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_ec3e31 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) x) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) x) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) x) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t101 q x y l f n o) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) x).
-
-(* constant 5606 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t103 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_xout x)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t102 q x y l f n o) (λt:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_xout x).l_e_st_eq_landau_n_isoutne x (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y x (l_e_st_eq_landau_n_1top y n) l) x (l_e_st_eq_landau_n_lessisi3 x) t) : l_not (l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_xout x))).
-
-(* constant 5607 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t104 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_e_st_eq_landau_n_rt_rp_r_c_8275_t4 q x f (l_e_st_eq_landau_n_rt_rp_r_c_8275_rf q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_satz275a q x f) (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t103 q x y l f n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_rf q x y l f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t103 q x y l f n o))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f n) (f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t103 q x y l f n o))))).
-
-(* constant 5608 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t105 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) y x (l_e_st_eq_landau_n_1top y n) l) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_left1to x y l n))).
-
-(* constant 5609 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t106 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_e_st_eq_landau_n_ax2 (l_e_st_eq_landau_n_rt_rp_r_c_inn y n) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_left1to x y l n)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t105 q x y l f n o) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn y n)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_left1to x y l n)))).
-
-(* constant 5610 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t107 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_e_st_eq_landau_n_isinoutn y (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn y n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q y n o) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn y n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o))).
-
-(* constant 5611 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t108 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_e_tris1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_left1to x y l n))) (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn y n)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t106 q x y l f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t107 q x y l f n o) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_left1to x y l n))) (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o))).
-
-(* constant 5612 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t109 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_left1to x y l n))) (l_e_st_eq_landau_n_rt_rp_r_c_lemma275 q x (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t103 q x y l f n o)) (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o)) y x (l_e_st_eq_landau_n_1top y (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o)) l) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t108 q x y l f n o) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t103 q x y l f n o)) (l_e_st_eq_landau_n_left1to x y l (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o))).
-
-(* constant 5613 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t110 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.λo:l_not (l_e_is (l_e_st_eq_landau_n_1to y) n (l_e_st_eq_landau_n_xout y)).(l_e_isp (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_rf q x y l f t) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f n) (f t))) (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q x (l_e_st_eq_landau_n_left1to x y l n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t103 q x y l f n o)) (l_e_st_eq_landau_n_left1to x y l (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t104 q x y l f n o) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t109 q x y l f n o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f n) (l_e_st_eq_landau_n_rt_rp_r_c_8275_fl q x y l f (l_e_st_eq_landau_n_rt_rp_r_c_8275_ns q y n o)))).
-
-(* constant 5614 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t111 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(λt:l_e_st_eq_landau_n_1to y.λu:l_not (l_e_is (l_e_st_eq_landau_n_1to y) t (l_e_st_eq_landau_n_xout y)).l_e_st_eq_landau_n_rt_rp_r_c_8275_t110 q x y l f t u : l_e_st_eq_landau_n_rt_rp_r_c_8275_prop2 q y (l_e_st_eq_landau_n_rt_rp_r_c_8275_fl q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f)).
-
-(* constant 5615 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8275_t112 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_andi (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop1 q y (l_e_st_eq_landau_n_rt_rp_r_c_8275_fl q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_prop2 q y (l_e_st_eq_landau_n_rt_rp_r_c_8275_fl q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f)) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t100 q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t111 q x y l f) : l_e_st_eq_landau_n_rt_rp_r_c_recprop q y (l_e_st_eq_landau_n_rt_rp_r_c_8275_fl q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f)).
-
-(* constant 5616 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz275f ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λl:l_e_st_eq_landau_n_lessis y x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz275d q y (l_e_st_eq_landau_n_rt_rp_r_c_8275_fl q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_rfl q x y l f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t112 q x y l f) : l_e_is (Πt:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x y l (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_recf q y (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x y l f))).
-
-(* constant 5617 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_xs ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_suc x : l_e_st_eq_landau_n_nat).
-
-(* constant 5618 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat).
-
-(* constant 5619 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)).
-
-(* constant 5620 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_satz18c x) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)).
-
-(* constant 5621 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_satz4e x) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)).
-
-(* constant 5622 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_fx ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t1 q x f) f : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5623 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f) f : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5624 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8275_f1 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t95 q x) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5625 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8275_g2 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t95 q x) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5626 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8275_g1 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t95 q x) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5627 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_g ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) f) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5628 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8275_t49 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t95 q x) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)) (l_e_refis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))))).
-
-(* constant 5629 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz275d q (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t92 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t95 q x) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f)) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f))).
-
-(* constant 5630 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t6 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz275f q (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f) f : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f))).
-
-(* constant 5631 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t7 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t6 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t5 q x f) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 q x f)).
-
-(* constant 5632 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t8 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_fise (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8276_g q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t7 q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8276_g q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)))).
-
-(* constant 5633 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t9 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8276_g q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1 q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)))) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t8 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t4 q x f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8276_g q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))))).
-
-(* constant 5634 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t10 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_1top x n) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t2 q x f)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t2 q x f) n))).
-
-(* constant 5635 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t11 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x n) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_1top x n) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t1 q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t2 q x f) n)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t2 q x f) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t2 q x f) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t10 q x f n) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t1 q x f) n) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t2 q x f) n))).
-
-(* constant 5636 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t12 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to x.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t1 q x f) n) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) x (l_e_st_eq_landau_n_rt_rp_r_c_8276_t2 q x f) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t11 q x f n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f n) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x q x f n)).
-
-(* constant 5637 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t13 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_fisi (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x q x f) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8276_t12 q x f t) : l_e_is (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x q x f)).
-
-(* constant 5638 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t14 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λu:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_recf q x u) (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t13 q x f) : l_e_is (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x q x f))).
-
-(* constant 5639 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t15 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz275d q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8275_t45 q x (l_e_st_eq_landau_n_rt_rp_r_c_8275_t95 q x) (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1 q x f)) : l_e_is (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x q x f))).
-
-(* constant 5640 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t16 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_f1x q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t15 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t14 q x f) : l_e_is (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f))).
-
-(* constant 5641 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t17 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_fise (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t16 q x f) (l_e_st_eq_landau_n_xout x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f) (l_e_st_eq_landau_n_xout x))).
-
-(* constant 5642 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t18 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)))).
-
-(* constant 5643 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t19 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (l_e_st_eq_landau_n_satz4a x) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t18 q x f) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)))).
-
-(* constant 5644 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t20 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t19 q x f) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f)))).
-
-(* constant 5645 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t21 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isp1 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f).l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) f t) (q (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (f t))) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t3 q x f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_xs q x f))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t9 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t20 q x f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f))))).
-
-(* constant 5646 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8276_t22 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)))) (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f) (l_e_st_eq_landau_n_xout x)) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t17 q x f) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f) (l_e_st_eq_landau_n_xout x)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8276_x1 q x f))))).
-
-(* constant 5647 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz276 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8276_g1x q x f (l_e_st_eq_landau_n_xout x)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_rt_rp_r_c_8276_fx q x f) (l_e_st_eq_landau_n_xout x)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t21 q x f) (l_e_st_eq_landau_n_rt_rp_r_c_8276_t22 q x f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (q (l_e_st_eq_landau_n_rt_rp_r_c_recf q x (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1)) f) (l_e_st_eq_landau_n_xout x)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))).
-
-(* constant 5648 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_smpr ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_rec q x f (l_e_st_eq_landau_n_xout x) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5649 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_sum ≝ λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_smpr (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl t u) x f : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5650 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_prod ≝ λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_smpr (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) x f : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5651 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8277_t1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_lessisi3 l_e_st_eq_landau_n_1) (l_e_refis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1) : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)).
-
-(* constant 5652 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz277 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isp (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_rec q l_e_st_eq_landau_n_1 f t) (f t)) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_satz275b q l_e_st_eq_landau_n_1 f) (l_e_st_eq_landau_n_rt_rp_r_c_8277_t1 q f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5653 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz278 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz276 q x f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1)) f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))).
-
-(* constant 5654 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.(l_e_st_eq_landau_n_lessisi2 y x i : l_e_st_eq_landau_n_lessis y x).
-
-(* constant 5655 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v8_f0 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x y (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i) f : Πt:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5656 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v8_t2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.(l_e_fise (l_e_st_eq_landau_n_1to y) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x y (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f)) (l_e_st_eq_landau_n_rt_rp_r_c_recf q y (l_e_st_eq_landau_n_rt_rp_r_c_v8_f0 q x f y i)) (l_e_st_eq_landau_n_rt_rp_r_c_satz275f q x y (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i) f) (l_e_st_eq_landau_n_xout y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i) (l_e_st_eq_landau_n_xout y))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_v8_f0 q x f y i))).
-
-(* constant 5657 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v8_t3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.(l_e_tris1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_xout y)) x y (l_e_st_eq_landau_n_isinoutn y y (l_e_st_eq_landau_n_lessisi3 y)) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_xout y)) x).
-
-(* constant 5658 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v8_t4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.(l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_xout y)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn y (l_e_st_eq_landau_n_xout y)) y x (l_e_st_eq_landau_n_1top y (l_e_st_eq_landau_n_xout y)) (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i)) x (l_e_st_eq_landau_n_lessisi3 x) (l_e_st_eq_landau_n_rt_rp_r_c_v8_t3 q x f y i) : l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i) (l_e_st_eq_landau_n_xout y)) (l_e_st_eq_landau_n_xout x)).
-
-(* constant 5659 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v8_t5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.(l_e_isf (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f) (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i) (l_e_st_eq_landau_n_xout y)) (l_e_st_eq_landau_n_xout x) (l_e_st_eq_landau_n_rt_rp_r_c_v8_t4 q x f y i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i) (l_e_st_eq_landau_n_xout y))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x f)).
-
-(* constant 5660 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_issmpr ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λx:l_e_st_eq_landau_n_nat.λf:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is y x.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_v8_f0 q x f y i)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x f) (l_e_st_eq_landau_n_rt_rp_r_c_recf q x f (l_e_st_eq_landau_n_left1to x y (l_e_st_eq_landau_n_rt_rp_r_c_v8_t1 q x f y i) (l_e_st_eq_landau_n_xout y))) (l_e_st_eq_landau_n_rt_rp_r_c_v8_t2 q x f y i) (l_e_st_eq_landau_n_rt_rp_r_c_v8_t5 q x f y i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x y (l_e_st_eq_landau_n_lessisi2 y x i) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x f)).
-
-(* constant 5661 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_xr ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_rlofnt x : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 5662 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum x (λt:l_e_st_eq_landau_n_1to x.z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0)) : Prop).
-
-(* constant 5663 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t1 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl t u) (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum l_e_st_eq_landau_n_1 (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.z)) z).
-
-(* constant 5664 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t2 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_sum l_e_st_eq_landau_n_1 (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.z)) z (l_e_st_eq_landau_n_rt_rp_r_c_ts z l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t1 z) (l_e_st_eq_landau_n_rt_rp_r_c_satz222a z) : l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z l_e_st_eq_landau_n_1).
-
-(* constant 5665 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t3 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl t u) x (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (λt:l_e_st_eq_landau_n_1to x.z)) z)).
-
-(* constant 5666 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t4 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_st_eq_landau_n_rt_rp_r_c_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_sum x (λt:l_e_st_eq_landau_n_1to x.z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0)) z (l_e_st_eq_landau_n_rt_rp_r_c_ts z l_e_st_eq_landau_n_rt_rp_r_c_1c) p (l_e_st_eq_landau_n_rt_rp_r_c_satz222a z) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (λt:l_e_st_eq_landau_n_1to x.z)) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z l_e_st_eq_landau_n_rt_rp_r_c_1c))).
-
-(* constant 5667 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t5 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_st_eq_landau_n_rt_rp_r_c_distpt2 z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_1c : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_1c))).
-
-(* constant 5668 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t6 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_st_eq_landau_n_rt_rp_r_c_plis12a (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 5669 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t7 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satzr155b x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 5670 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t8 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t6 z x p) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t7 z x p) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 5671 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t9 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_0) z (l_e_st_eq_landau_n_rt_rp_r_c_8279_t8 z x p) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 5672 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t10 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).z)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (λt:l_e_st_eq_landau_n_1to x.z)) z) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8279_xr z x) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t3 z x p) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t4 z x p) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t5 z x p) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t9 z x p) : l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 5673 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8279_t11 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z x.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z t) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t10 z x p) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z (l_e_st_eq_landau_n_suc x)).
-
-(* constant 5674 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz279 ≝ λz:l_e_st_eq_landau_n_rt_rp_r_c_complex.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z t) (l_e_st_eq_landau_n_rt_rp_r_c_8279_t2 z) (λu:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_rp_r_c_8279_prop1 z u.l_e_st_eq_landau_n_rt_rp_r_c_8279_t11 z u t) x : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum x (λt:l_e_st_eq_landau_n_1to x.z)) (l_e_st_eq_landau_n_rt_rp_r_c_ts z (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_rlofnt x) l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 5675 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_t1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_satz18a l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_2).
-
-(* constant 5676 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_t1 q f) f : Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5677 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_t2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 q l_e_st_eq_landau_n_1 f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 f) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f)) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)))).
-
-(* constant 5678 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_t3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 q (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f)) (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5679 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_t4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isinoutn l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_lessisi3 l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5680 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_t5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a l_e_st_eq_landau_n_2) (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_1top l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8280_t1 q f)) (l_e_st_eq_landau_n_rt_rp_r_c_8280_t4 q f) : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2) (l_e_st_eq_landau_n_left1to l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_t1 q f) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5681 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_t6 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2) (l_e_st_eq_landau_n_left1to l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_t1 q f) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8280_t5 q f) : l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5682 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_t7 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f)) (f (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8280_t3 q f) (l_e_st_eq_landau_n_rt_rp_r_c_8280_t6 q f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f)) (f (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))).
-
-(* constant 5683 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8280_t8 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f)) (f (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8280_t7 q f) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f)) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))) (q (f (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)))).
-
-(* constant 5684 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz280 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 f) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8280_f1 q f)) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))) (q (f (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))) (l_e_st_eq_landau_n_rt_rp_r_c_8280_t2 q f) (l_e_st_eq_landau_n_rt_rp_r_c_8280_t8 q f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 f) (q (f (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)))).
-
-(* constant 5685 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_assoc ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.(∀x:l_e_st_eq_landau_n_rt_rp_r_c_cx.∀y:l_e_st_eq_landau_n_rt_rp_r_c_cx.∀z:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (q (q x y) z) (q x (q y z)) : Prop).
-
-(* constant 5686 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_assocp1 ≝ (λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_asspl1 x y z : l_e_st_eq_landau_n_rt_rp_r_c_assoc (λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl x y)).
-
-(* constant 5687 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_assocts ≝ (λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_assts1 x y z : l_e_st_eq_landau_n_rt_rp_r_c_assoc (λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts x y)).
-
-(* constant 5688 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_assq1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.(a z u v : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q z u) v) (q z (q u v))).
-
-(* constant 5689 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_assq2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (q (q z u) v) (q z (q u v)) (l_e_st_eq_landau_n_rt_rp_r_c_assq1 q a z u v) : l_e_st_eq_landau_n_rt_rp_r_c_is (q z (q u v)) (q (q z u) v)).
-
-(* constant 5690 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_satz18a x y) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_pl x y)).
-
-(* constant 5691 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x y) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_t1 q a x y) f : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5692 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_right l_e_st_eq_landau_n_rt_rp_r_c_cx x y f : Πt:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5693 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_prop1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl x y) f) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y f))) : Prop).
-
-(* constant 5694 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_all (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y).l_e_st_eq_landau_n_rt_rp_r_c_cx) (λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8281_prop1 q a x y u) : Prop).
-
-(* constant 5695 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 q x f0 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f0) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x l_e_st_eq_landau_n_1 f0)) (f0 (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))).
-
-(* constant 5696 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 q (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5697 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isinoutn l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_lessisi3 l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5698 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_ispl2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_t4 q a x f0) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 5699 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t6 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_1top l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t5 q a x f0) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_right1to x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5700 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t7 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_c_cx f0 (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_right1to x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t6 q a x f0) : l_e_st_eq_landau_n_rt_rp_r_c_is (f0 (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5701 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t8 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (f0 (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t7 q a x f0) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t3 q a x f0) : l_e_st_eq_landau_n_rt_rp_r_c_is (f0 (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0))).
-
-(* constant 5702 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t9 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x l_e_st_eq_landau_n_1 f0))) (f0 (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t8 q a x f0) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x l_e_st_eq_landau_n_1 f0)) (f0 (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x l_e_st_eq_landau_n_1 f0)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0)))).
-
-(* constant 5703 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t10 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λf0:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f0) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x l_e_st_eq_landau_n_1 f0)) (f0 (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x l_e_st_eq_landau_n_1 f0)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x l_e_st_eq_landau_n_1 f0))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t2 q a x f0) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t9 q a x f0) : l_e_st_eq_landau_n_rt_rp_r_c_8281_prop1 q a x l_e_st_eq_landau_n_1 f0).
-
-(* constant 5704 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t11 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.(λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8281_t10 q a x u : l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x l_e_st_eq_landau_n_1).
-
-(* constant 5705 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_pl y l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat).
-
-(* constant 5706 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_pl x y : l_e_st_eq_landau_n_nat).
-
-(* constant 5707 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) : l_e_st_eq_landau_n_nat).
-
-(* constant 5708 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat).
-
-(* constant 5709 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_asspl1 x y l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)).
-
-(* constant 5710 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t13 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))).
-
-(* constant 5711 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t14 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_asspl2 x y l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t13 q a x y p f) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))).
-
-(* constant 5712 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t15 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t14 q a x y p f) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))).
-
-(* constant 5713 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t16 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t15 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))).
-
-(* constant 5714 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_fr ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) f : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5715 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t17 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz275f q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) f : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f)) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f))).
-
-(* constant 5716 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t18 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_fise (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f)) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t17 q a x y p f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f))).
-
-(* constant 5717 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t19 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_satz18a (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)).
-
-(* constant 5718 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_frr ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t19 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5719 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t20 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))))).
-
-(* constant 5720 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t21 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.q u (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))) (p (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))))).
-
-(* constant 5721 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t22 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_assq1 q a (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))))).
-
-(* constant 5722 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t23 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 y (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_satz18a y l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)).
-
-(* constant 5723 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_fy ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) y (l_e_st_eq_landau_n_rt_rp_r_c_8281_t23 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f) : Πt:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5724 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t24 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))))).
-
-(* constant 5725 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t25 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))).
-
-(* constant 5726 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t26 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_t25 q a x y p f) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))))).
-
-(* constant 5727 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t27 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t14 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t26 q a x y p f) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))))).
-
-(* constant 5728 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t28 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) x (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t27 q a x y p f) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_right1to x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))).
-
-(* constant 5729 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t29 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_right1to x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t28 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))).
-
-(* constant 5730 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t30 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t29 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))))).
-
-(* constant 5731 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_rt_rp_r_c_inn y n : l_e_st_eq_landau_n_nat).
-
-(* constant 5732 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) y (l_e_st_eq_landau_n_rt_rp_r_c_8281_t23 q a x y p f) n : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)).
-
-(* constant 5733 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t31 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n) y (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_1top y n) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t23 q a x y p f)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n))).
-
-(* constant 5734 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t32 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n)) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_t31 q a x y p f n) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n)))).
-
-(* constant 5735 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_nxpy ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_right1to x y n : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y)).
-
-(* constant 5736 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t19 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxpy q a x y p f n) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)).
-
-(* constant 5737 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t33 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxpy q a x y p f n)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxpy q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxpy q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t19 q a x y p f)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxpy q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n))).
-
-(* constant 5738 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t34 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n)) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n) y x (l_e_st_eq_landau_n_1top y n)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxpy q a x y p f n))).
-
-(* constant 5739 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t35 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxpy q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t34 q a x y p f n) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t33 q a x y p f n) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n))).
-
-(* constant 5740 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t36 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_tris1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n))) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n)) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_8281_n0 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t32 q a x y p f n) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t35 q a x y p f n) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n))) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n))).
-
-(* constant 5741 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t37 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_pl x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n))) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) x (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n))) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t36 q a x y p f n) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) (l_e_st_eq_landau_n_right1to x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n))).
-
-(* constant 5742 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t38 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to y.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_right1to x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nyp1 q a x y p f n)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_nxyp1 q a x y p f n)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t37 q a x y p f n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f n) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f) n)).
-
-(* constant 5743 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t39 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_fisi (l_e_st_eq_landau_n_1to y) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) (λu:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_8281_t38 q a x y p f u) : l_e_is (Πu:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))).
-
-(* constant 5744 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t40 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (Πu:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:Πu:l_e_st_eq_landau_n_1to y.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q y t) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t39 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))).
-
-(* constant 5745 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t41 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f)) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t40 q a x y p f)) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))))).
-
-(* constant 5746 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t41a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t30 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t41 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))))).
-
-(* constant 5747 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t42 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_fy q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t41a q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t24 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f))).
-
-(* constant 5748 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t43 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t42 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)))).
-
-(* constant 5749 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_m0 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_rt_rp_r_c_inn x m : l_e_st_eq_landau_n_nat).
-
-(* constant 5750 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_mxpy ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_t1 q a x y) m : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y)).
-
-(* constant 5751 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t19 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxpy q a x y p f m) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)).
-
-(* constant 5752 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t44 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxpy q a x y p f m)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxpy q a x y p f m)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxpy q a x y p f m)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t19 q a x y p f)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxpy q a x y p f m)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 q a x y p f m))).
-
-(* constant 5753 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t45 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_m0 q a x y p f m) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_8281_m0 q a x y p f m) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_1top x m) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t1 q a x y)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_m0 q a x y p f m) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxpy q a x y p f m))).
-
-(* constant 5754 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t46 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_1to x.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_8281_m0 q a x y p f m) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxpy q a x y p f m)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 q a x y p f m)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t45 q a x y p f m) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t44 q a x y p f m) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_m0 q a x y p f m) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 q a x y p f m))).
-
-(* constant 5755 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t47 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_m0 q a x y p f m) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_8281_m0 q a x y p f m) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_1top x m) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 q a x y p f m)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 q a x y p f m)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 q a x y p f m)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t46 q a x y p f m) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_t1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)) m) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 q a x y p f m))).
-
-(* constant 5756 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t48 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_1to x.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) x (l_e_st_eq_landau_n_rt_rp_r_c_8281_t1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)) m) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_mxyp1 q a x y p f m)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t47 q a x y p f m) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f m) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f) m)).
-
-(* constant 5757 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t49 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_fisi (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) (λu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8281_t48 q a x y p f u) : l_e_is (Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))).
-
-(* constant 5758 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t50 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:Πu:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q x t) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t49 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))).
-
-(* constant 5759 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t51 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t50 q a x y p f)) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)))).
-
-(* constant 5760 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t52 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t12 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_recf q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t16 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t18 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t20 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t21 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))))).
-
-(* constant 5761 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t53 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y) f) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f)))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_fr q a x y p f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8281_xyp1 q a x y))))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x y (l_e_st_eq_landau_n_rt_rp_r_c_8281_frr q a x y p f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8281_f1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_f2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f))) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t52 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t22 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t43 q a x y p f) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t51 q a x y p f) : l_e_st_eq_landau_n_rt_rp_r_c_8281_prop1 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) f).
-
-(* constant 5762 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t54 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.(λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8281_xpy1 q a x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8281_t53 q a x y p u : l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y)).
-
-(* constant 5763 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t55 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x t) (l_e_st_eq_landau_n_rt_rp_r_c_8281_yp1 q a x y) (l_e_st_eq_landau_n_suc y) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t54 q a x y p) (l_e_st_eq_landau_n_satz4a y) : l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x (l_e_st_eq_landau_n_suc y)).
-
-(* constant 5764 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8281_t56 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x t) (l_e_st_eq_landau_n_rt_rp_r_c_8281_t11 q a x) (λz:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x z.l_e_st_eq_landau_n_rt_rp_r_c_8281_t55 q a x z t) y : l_e_st_eq_landau_n_rt_rp_r_c_8281_prop2 q a x y).
-
-(* constant 5765 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz281 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λx:l_e_st_eq_landau_n_nat.λy:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x y).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8281_t56 q a x y f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl x y) f) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x y) x (l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_pl x y) (l_e_st_eq_landau_n_satz18a x y)) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q y (l_e_st_eq_landau_n_right l_e_st_eq_landau_n_rt_rp_r_c_cx x y f)))).
-
-(* constant 5766 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_commut ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.(∀x:l_e_st_eq_landau_n_rt_rp_r_c_cx.∀y:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_is (q x y) (q y x) : Prop).
-
-(* constant 5767 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_commutpl ≝ (λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_compl x y : l_e_st_eq_landau_n_rt_rp_r_c_commut (λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl x y)).
-
-(* constant 5768 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_commutts ≝ (λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_comts x y : l_e_st_eq_landau_n_rt_rp_r_c_commut (λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts x y)).
-
-(* constant 5769 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_comq ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.(c z u : l_e_st_eq_landau_n_rt_rp_r_c_is (q z u) (q u z)).
-
-(* constant 5770 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_prop1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (λt:l_e_st_eq_landau_n_1to x.q (f t) (g t))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x f) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x g)) : Prop).
-
-(* constant 5771 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.(l_all (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λu:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_all (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λv:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8282_prop1 q a c x u v)) : Prop).
-
-(* constant 5772 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λf0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 q (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.q (f0 t) (g0 t)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.q (f0 t) (g0 t))) (q (f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 5773 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λf0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 g0) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_satz277 q g0) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 g0)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 5774 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λf0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0) (f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_satz277 q f0) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (q (f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 5775 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λf0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 g0)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (q (f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t2 q a c f0 g0) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t3 q a c f0 g0) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 g0)) (q (f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 5776 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λf0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg0:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.q (f0 t) (g0 t))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f0) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 g0)) (q (f0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (g0 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t1 q a c f0 g0) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t4 q a c f0 g0) : l_e_st_eq_landau_n_rt_rp_r_c_8282_prop1 q a c l_e_st_eq_landau_n_1 f0 g0).
-
-(* constant 5777 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t6 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.(λu:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8282_t5 q a c u v : l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c l_e_st_eq_landau_n_1).
-
-(* constant 5778 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat).
-
-(* constant 5779 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t7 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_assq2 q a (q u v) w z : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q u v) (q w z)) (q (q (q u v) w) z)).
-
-(* constant 5780 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t8 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_comq q c (q u v) w : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q u v) w) (q w (q u v))).
-
-(* constant 5781 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t9 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_assq2 q a w u v : l_e_st_eq_landau_n_rt_rp_r_c_is (q w (q u v)) (q (q w u) v)).
-
-(* constant 5782 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t10 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (q (q u v) w) (q w (q u v)) (q (q w u) v) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t8 q a c u v w z) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t9 q a c u v w z) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q u v) w) (q (q w u) v)).
-
-(* constant 5783 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t11 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t z) (q (q u v) w) (q (q w u) v) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t10 q a c u v w z) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q (q u v) w) z) (q (q (q w u) v) z)).
-
-(* constant 5784 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t12 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_assq1 q a (q w u) v z : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q (q w u) v) z) (q (q w u) (q v z))).
-
-(* constant 5785 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t13 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_comq q c w u : l_e_st_eq_landau_n_rt_rp_r_c_is (q w u) (q u w)).
-
-(* constant 5786 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t14 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (q v z)) (q w u) (q u w) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t13 q a c u v w z) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q w u) (q v z)) (q (q u w) (q v z))).
-
-(* constant 5787 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t15 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_st_eq_landau_n_rt_rp_r_c_cx.λz:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (q (q u v) (q w z)) (q (q (q u v) w) z) (q (q (q w u) v) z) (q (q w u) (q v z)) (q (q u w) (q v z)) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t7 q a c u v w z) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t11 q a c u v w z) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t12 q a c u v w z) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t14 q a c u v w z) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q u v) (q w z)) (q (q u w) (q v z))).
-
-(* constant 5788 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t16 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)).
-
-(* constant 5789 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8282_t16 q a c x p f g) f) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5790 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8282_t16 q a c x p f g) g) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5791 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_h ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).q (f t) (g t) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5792 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_shx ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8282_t16 q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_h q a c x p f g)) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5793 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t17 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 q x (l_e_st_eq_landau_n_rt_rp_r_c_8282_h q a c x p f g) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8282_h q a c x p f g)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_shx q a c x p f g) (q (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))))).
-
-(* constant 5794 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t18 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(p (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8282_t16 q a c x p f g) f) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8282_t16 q a c x p f g) g) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8282_shx q a c x p f g) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g))).
-
-(* constant 5795 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t19 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (q (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (l_e_st_eq_landau_n_rt_rp_r_c_8282_shx q a c x p f g) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g)) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t18 q a c x p f g) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_shx q a c x p f g) (q (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g)) (q (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))))).
-
-(* constant 5796 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t20 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8282_t15 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g)) (q (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))))).
-
-(* constant 5797 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t21 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_satz278 q x f) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f)).
-
-(* constant 5798 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t22 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t21 q a c x p f g) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))))).
-
-(* constant 5799 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t23 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) g) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_satz278 q x g) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) g)).
-
-(* constant 5800 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t24 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t23 q a c x p f g) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) g))).
-
-(* constant 5801 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t25 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8282_h q a c x p f g)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_shx q a c x p f g) (q (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g)) (q (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t17 q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t19 q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t20 q a c x p f g) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8282_h q a c x p f g)) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))))).
-
-(* constant 5802 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t26 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8282_h q a c x p f g)) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sfx q a c x p f g) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f) (q (l_e_st_eq_landau_n_rt_rp_r_c_8282_sgx q a c x p f g) (g (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x))))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) g)) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t25 q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t22 q a c x p f g) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t24 q a c x p f g) : l_e_st_eq_landau_n_rt_rp_r_c_8282_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) f g).
-
-(* constant 5803 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t27 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.(λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8282_t26 q a c x p u v : l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x)).
-
-(* constant 5804 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t28 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c t) (l_e_st_eq_landau_n_rt_rp_r_c_8282_xp1 q a c x) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t27 q a c x p) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c (l_e_st_eq_landau_n_suc x)).
-
-(* constant 5805 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8282_t29 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c t) (l_e_st_eq_landau_n_rt_rp_r_c_8282_t6 q a c) (λy:l_e_st_eq_landau_n_nat.λt:l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c y.l_e_st_eq_landau_n_rt_rp_r_c_8282_t28 q a c y t) x : l_e_st_eq_landau_n_rt_rp_r_c_8282_prop2 q a c x).
-
-(* constant 5806 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz282 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λg:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8282_t29 q a c x f g : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (λt:l_e_st_eq_landau_n_1to x.q (f t) (g t))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x f) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x g))).
-
-(* constant 5807 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λs:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(λt:l_e_st_eq_landau_n_1to x.f (s t) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5808 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λs:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to x.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c x s f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x f) : Prop).
-
-(* constant 5809 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.(l_all (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to x) (λu:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to x.l_all (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (λv:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_imp (l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c x u v))) : Prop).
-
-(* constant 5810 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (s (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_1o (l_e_st_eq_landau_n_singlet_th1 (s (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_singlet_th1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (s (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)).
-
-(* constant 5811 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c l_e_st_eq_landau_n_1 s f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c l_e_st_eq_landau_n_1 s f)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c l_e_st_eq_landau_n_1 s f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5812 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_isf (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_rt_rp_r_c_cx f (s (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t1 q a c s f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c l_e_st_eq_landau_n_1 s f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5813 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_satz277 q f) : l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f)).
-
-(* constant 5814 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c l_e_st_eq_landau_n_1 s f)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c l_e_st_eq_landau_n_1 s f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t2 q a c s f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t3 q a c s f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t4 q a c s f) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c l_e_st_eq_landau_n_1 s f).
-
-(* constant 5815 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t6 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.(λu:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λv:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_bijective (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) u.l_e_st_eq_landau_n_rt_rp_r_c_8283_t5 q a c u v : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c l_e_st_eq_landau_n_1).
-
-(* constant 5816 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat).
-
-(* constant 5817 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5818 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t8 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.(l_ande1 (l_e_injective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s) (l_e_surjective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s) b : l_e_injective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s).
-
-(* constant 5819 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x) u : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5820 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) : l_e_st_eq_landau_n_nat).
-
-(* constant 5821 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t9 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_e_tr3is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u))) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i) (l_e_symis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) case1) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 5822 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t10 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_e_isfe (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_t8 q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t9 q a c x p s f b case1 u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5823 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t11 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t10 q a c x p s f b case1 u i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5824 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t12 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_e_st_eq_landau_n_satz16a (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x u) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5825 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t13 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_ec3e31 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t12 q a c x p s f b case1 u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t11 q a c x p s f b case1 u i) : l_con).
-
-(* constant 5826 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t14 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_ore1 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u))) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_t13 q a c x p s f b case1 u t) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5827 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t15 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_satz26 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t14 q a c x p s f b case1 u) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) x).
-
-(* constant 5828 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t15 q a c x p s f b case1 u) : l_e_st_eq_landau_n_1to x).
-
-(* constant 5829 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 t : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to x).
-
-(* constant 5830 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t16 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 v).(l_e_st_eq_landau_n_isoutne x (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t15 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 v) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t15 q a c x p s f b case1 v) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 v)).
-
-(* constant 5831 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t17 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 v).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t8 q a c x p s f b (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 v) (l_e_st_eq_landau_n_isinne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 v)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t16 q a c x p s f b case1 u v i)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 v)).
-
-(* constant 5832 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t18 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 v).(l_e_st_eq_landau_n_thleft1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x) u v (l_e_st_eq_landau_n_rt_rp_r_c_8283_t17 q a c x p s f b case1 u v i) : l_e_is (l_e_st_eq_landau_n_1to x) u v).
-
-(* constant 5833 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_invf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s b (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5834 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u) : l_e_st_eq_landau_n_nat).
-
-(* constant 5835 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t19 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5836 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t20 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_e_tr3is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_thinvf2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s b (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t19 q a c x p s f b case1 u i)) case1 : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5837 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t21 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t20 q a c x p s f b case1 u i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5838 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t22 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_e_st_eq_landau_n_satz16a (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x u) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5839 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t23 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_ec3e31 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t22 q a c x p s f b case1 u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t21 q a c x p s f b case1 u i) : l_con).
-
-(* constant 5840 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t24 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_ore1 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u)) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_t23 q a c x p s f b case1 u t) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5841 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t25 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_satz26 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t24 q a c x p s f b case1 u) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) x).
-
-(* constant 5842 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t25 q a c x p s f b case1 u) : l_e_st_eq_landau_n_1to x).
-
-(* constant 5843 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t26 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t25 q a c x p s f b case1 u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u))).
-
-(* constant 5844 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t27 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t26 q a c x p s f b case1 u)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u))).
-
-(* constant 5845 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t28 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u))) (l_e_thinvf2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s b (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t27 q a c x p s f b case1 u)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)))).
-
-(* constant 5846 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t29 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x))) (l_e_st_eq_landau_n_isinni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t28 q a c x p s f b case1 u)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u))).
-
-(* constant 5847 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t30 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris (l_e_st_eq_landau_n_1to x) u (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_1top x u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_isoutinn x u) (l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_1top x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t15 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t29 q a c x p s f b case1 u)) : l_e_is (l_e_st_eq_landau_n_1to x) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u))).
-
-(* constant 5848 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t31 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_somei (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_is (l_e_st_eq_landau_n_1to x) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 t)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w2 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t30 q a c x p s f b case1 u) : l_e_image (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1) u).
-
-(* constant 5849 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t32 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_andi (l_e_injective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1)) (l_e_surjective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1)) (λt:l_e_st_eq_landau_n_1to x.λu:l_e_st_eq_landau_n_1to x.λv:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1 t) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1 u).l_e_st_eq_landau_n_rt_rp_r_c_8283_t18 q a c x p s f b case1 t u v) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8283_t31 q a c x p s f b case1 t) : l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1)).
-
-(* constant 5850 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x) f : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5851 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t33 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t32 q a c x p s f b case1) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c x (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1)).
-
-(* constant 5852 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5853 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c x (l_e_st_eq_landau_n_rt_rp_r_c_8283_s01 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5854 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t33a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u))))).
-
-(* constant 5855 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t34 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t15 q a c x p s f b case1 u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u))).
-
-(* constant 5856 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t35 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u))) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u)) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t34 q a c x p s f b case1 u) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)))) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u))).
-
-(* constant 5857 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t36 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)))) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t33a q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t35 q a c x p s f b case1 u) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u))).
-
-(* constant 5858 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t37 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t7 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w1 q a c x p s f b case1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t36 q a c x p s f b case1 u) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g2 q a c x p s f b case1 u)).
-
-(* constant 5859 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t38 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_fisi (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g2 q a c x p s f b case1) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8283_t37 q a c x p s f b case1 t) : l_e_is (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g2 q a c x p s f b case1)).
-
-(* constant 5860 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t39 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isf (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λu:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g2 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t38 q a c x p s f b case1) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g2 q a c x p s f b case1))).
-
-(* constant 5861 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t40 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g2 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t39 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t33 q a c x p s f b case1) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1))).
-
-(* constant 5862 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t41 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) case1 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 5863 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t42 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_rt_rp_r_c_satz278 q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 5864 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t43 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t41 q a c x p s f b case1) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 5865 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t44 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t40 q a c x p s f b case1) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 5866 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t45 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_satz278 q x f) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f)).
-
-(* constant 5867 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t46 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase1:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g1 q a c x p s f b case1)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f01 q a c x p s f b case1)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t42 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t43 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t44 q a c x p s f b case1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t45 q a c x p s f b case1) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 5868 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_1px ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.(l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 x : l_e_st_eq_landau_n_nat).
-
-(* constant 5869 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x u : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b)).
-
-(* constant 5870 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_compl l_e_st_eq_landau_n_1 x) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5871 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) s : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5872 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) : l_e_st_eq_landau_n_nat).
-
-(* constant 5873 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t48 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_tr3is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i) (l_e_symis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) case2) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 5874 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t49 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_isfe (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_t8 q a c x p s f b) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t48 q a c x p s f b case2 u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5875 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t50 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t49 q a c x p s f b case2 u i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1).
-
-(* constant 5876 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t51 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_1top x u)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))).
-
-(* constant 5877 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t52 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t51 q a c x p s f b case2 u i) (l_e_st_eq_landau_n_satz18 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1).
-
-(* constant 5878 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t53 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_ec3e21 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t52 q a c x p s f b case2 u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t50 q a c x p s f b case2 u i) : l_con).
-
-(* constant 5879 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t54 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_ore1 (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz24 (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u)) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_8283_t53 q a c x p s f b case2 u t) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1).
-
-(* constant 5880 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_mn (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t54 q a c x p s f b case2 u) : l_e_st_eq_landau_n_nat).
-
-(* constant 5881 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t54a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_islessis1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_mn_th1c (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t54 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5882 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t55 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_or_th9 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) x) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t54a q a c x p s f b case2 u) (λt:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_satz20c (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) x l_e_st_eq_landau_n_1 t) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_satz20b (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) x l_e_st_eq_landau_n_1 t) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) x).
-
-(* constant 5883 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t55 q a c x p s f b case2 u) : l_e_st_eq_landau_n_1to x).
-
-(* constant 5884 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 t : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to x).
-
-(* constant 5885 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t56 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 v).(l_e_st_eq_landau_n_isoutne x (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t55 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 v) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t55 q a c x p s f b case2 v) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 v)).
-
-(* constant 5886 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t57 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 v).(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 v) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 v) (l_e_st_eq_landau_n_mn_th1c (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t54 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 v) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t56 q a c x p s f b case2 u v i)) (l_e_st_eq_landau_n_mn_th1d (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 v) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t54 q a c x p s f b case2 v)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 v)).
-
-(* constant 5887 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t58 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 v).(l_e_st_eq_landau_n_isinne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 v)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t57 q a c x p s f b case2 u v i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 v))).
-
-(* constant 5888 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t59 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 v).(l_e_isfe (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_t8 q a c x p s f b) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 v)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t58 q a c x p s f b case2 u v i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 v))).
-
-(* constant 5889 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t60 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 v).(l_e_st_eq_landau_n_thleft1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 v) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t59 q a c x p s f b case2 u v i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 v)).
-
-(* constant 5890 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t61 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λv:l_e_st_eq_landau_n_1to x.λi:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 v).(l_e_st_eq_landau_n_thright1 l_e_st_eq_landau_n_1 x u v (l_e_st_eq_landau_n_rt_rp_r_c_8283_t60 q a c x p s f b case2 u v i) : l_e_is (l_e_st_eq_landau_n_1to x) u v).
-
-(* constant 5891 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s04 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_invf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s b) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5892 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_rt_rp_r_c_8283_s04 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5893 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u) : l_e_st_eq_landau_n_nat).
-
-(* constant 5894 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t62 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5895 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t63 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_tr3is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_thinvf2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s b (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t62 q a c x p s f b case2 u i)) case2 : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5896 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t64 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t63 q a c x p s f b case2 u i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1).
-
-(* constant 5897 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t65 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_1top x u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t64 q a c x p s f b case2 u i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) l_e_st_eq_landau_n_1).
-
-(* constant 5898 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t66 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.(l_ec3e21 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz18 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t65 q a c x p s f b case2 u i) : l_con).
-
-(* constant 5899 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t67 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_ore1 (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz24 (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u)) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_8283_t66 q a c x p s f b case2 u t) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1).
-
-(* constant 5900 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_mn (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t67 q a c x p s f b case2 u) : l_e_st_eq_landau_n_nat).
-
-(* constant 5901 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t68 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_islessis1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_mn_th1c (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t67 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5902 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t69 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_or_th9 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) x) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t68 q a c x p s f b case2 u) (λt:l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_satz20c (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) x l_e_st_eq_landau_n_1 t) (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_satz20b (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) x l_e_st_eq_landau_n_1 t) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) x).
-
-(* constant 5903 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t69 q a c x p s f b case2 u) : l_e_st_eq_landau_n_1to x).
-
-(* constant 5904 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t70 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t69 q a c x p s f b case2 u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))).
-
-(* constant 5905 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t71 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_mn_th1a (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t67 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm2 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t70 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)) x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)))).
-
-(* constant 5906 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t72 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t71 q a c x p s f b case2 u)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)))).
-
-(* constant 5907 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t73 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_thinvf2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s b (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_u4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t72 q a c x p s f b case2 u)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)))).
-
-(* constant 5908 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t74 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_1top x u))) (l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2))) (l_e_st_eq_landau_n_isinni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t73 q a c x p s f b case2 u)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))).
-
-(* constant 5909 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t75 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_st_eq_landau_n_mn_th1e (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t54 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t74 q a c x p s f b case2 u) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))).
-
-(* constant 5910 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t76 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris (l_e_st_eq_landau_n_1to x) u (l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_1top x u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_isoutinn x u) (l_e_st_eq_landau_n_isoutni x (l_e_st_eq_landau_n_rt_rp_r_c_inn x u) (l_e_st_eq_landau_n_1top x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t55 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t75 q a c x p s f b case2 u)) : l_e_is (l_e_st_eq_landau_n_1to x) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u))).
-
-(* constant 5911 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t77 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_somei (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_is (l_e_st_eq_landau_n_1to x) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 t)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_w4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t76 q a c x p s f b case2 u) : l_e_image (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2) u).
-
-(* constant 5912 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t78 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_andi (l_e_injective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2)) (l_e_surjective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2)) (λt:l_e_st_eq_landau_n_1to x.λu:l_e_st_eq_landau_n_1to x.λv:l_e_is (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2 t) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2 u).l_e_st_eq_landau_n_rt_rp_r_c_8283_t61 q a c x p s f b case2 t u v) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8283_t77 q a c x p s f b case2 t) : l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2)).
-
-(* constant 5913 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) f : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5914 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_right l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5915 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t79 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t78 q a c x p s f b case2) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c x (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2)).
-
-(* constant 5916 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5917 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_right l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5918 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g5 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c x (l_e_st_eq_landau_n_rt_rp_r_c_8283_s03 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5919 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t80 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_mn_th1a (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t54 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_nm1 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t55 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u)) x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u)))) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u)))).
-
-(* constant 5920 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t81 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)))) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_n3 q a c x p s f b case2 u) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t80 q a c x p s f b case2 u)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u)))).
-
-(* constant 5921 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t82 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λu:l_e_st_eq_landau_n_1to x.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_rt_rp_r_c_8283_s02 q a c x p s f b case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_u3 q a c x p s f b case2 u)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_w3 q a c x p s f b case2 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t81 q a c x p s f b case2 u) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g5 q a c x p s f b case2 u)).
-
-(* constant 5922 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t83 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_fisi (l_e_st_eq_landau_n_1to x) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g5 q a c x p s f b case2) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_8283_t82 q a c x p s f b case2 t) : l_e_is (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g5 q a c x p s f b case2)).
-
-(* constant 5923 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t85 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isf (Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λu:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q x u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g5 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t83 q a c x p s f b case2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g5 q a c x p s f b case2))).
-
-(* constant 5924 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t86 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g5 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t85 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t79 q a c x p s f b case2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2))).
-
-(* constant 5925 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t87 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_lessisi1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_satz18a l_e_st_eq_landau_n_1 x) : l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b)).
-
-(* constant 5926 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t87 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2) : Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5927 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t87 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2) : Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 5928 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t87a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_isinoutn l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_lessisi3 l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 5929 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_1d ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t87 q a c x p s f b case2) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b)).
-
-(* constant 5930 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t87b ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_1top l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t87 q a c x p s f b case2)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1d q a c x p s f b case2))).
-
-(* constant 5931 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t88 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tris l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1d q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t87a q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t87b q a c x p s f b case2) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1d q a c x p s f b case2))).
-
-(* constant 5932 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_1e ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1d q a c x p s f b case2) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5933 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t88a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1d q a c x p s f b case2)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1d q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1d q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t47 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t88 q a c x p s f b case2) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2)).
-
-(* constant 5934 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t88b ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_symis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t88a q a c x p s f b case2)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 5935 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t89 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tr3is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t88b q a c x p s f b case2) case2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t88a q a c x p s f b case2) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2)).
-
-(* constant 5936 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t89a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_satz277 q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1e q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t89 q a c x p s f b case2)) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_satz277 q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2))).
-
-(* constant 5937 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t90 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_rt_rp_r_c_satz281 q a l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2)))).
-
-(* constant 5938 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t91 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t86 q a c x p s f b case2) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2)))).
-
-(* constant 5939 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t92 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t89a q a c x p s f b case2) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2)))).
-
-(* constant 5940 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t93 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2))) (l_e_st_eq_landau_n_rt_rp_r_c_satz281 q a l_e_st_eq_landau_n_1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2)) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2))).
-
-(* constant 5941 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t94 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g4 q a c x p s f b case2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g6 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f04 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_f03 q a c x p s f b case2))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t90 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t91 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t92 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t93 q a c x p s f b case2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2))).
-
-(* constant 5942 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t95 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_rt_rp_r_c_issmpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_compl l_e_st_eq_landau_n_1 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f)).
-
-(* constant 5943 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t96 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_issmpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_compl l_e_st_eq_landau_n_1 x)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2))).
-
-(* constant 5944 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t97 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λcase2:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g3 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f02 q a c x p s f b case2)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t96 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t94 q a c x p s f b case2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t95 q a c x p s f b case2) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 5945 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5946 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_invf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s b (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5947 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t98 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_thinvf2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s b (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2))).
-
-(* constant 5948 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t99 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(not2 : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 5949 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t100 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_symnotis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (l_e_notis_th3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t98 q a c x p s f b not1 not2)) : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 5950 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t101 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t100 q a c x p s f b not1 not2) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) t) : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 5951 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_changef (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5952 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t102 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_changef1 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) u i : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2))).
-
-(* constant 5953 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t103 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t102 q a c x p s f b not1 not2 u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t98 q a c x p s f b not1 not2) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5954 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t104 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2).(l_e_changef2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) u i : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2)).
-
-(* constant 5955 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t105 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_e_changef3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) u n o : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (s u)).
-
-(* constant 5956 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t106 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_wissel_th6 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) b : l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2)).
-
-(* constant 5957 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_wissel (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5958 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t107 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_wissel_th3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) : l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha)).
-
-(* constant 5959 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t108 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_iswissel1 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t103 q a c x p s f b not1 not2 u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2)).
-
-(* constant 5960 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t109 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t108 q a c x p s f b not1 not2 alpha u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u))).
-
-(* constant 5961 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t110 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2).(l_e_iswissel2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t104 q a c x p s f b not1 not2 u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5962 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t111 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2).(l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t98 q a c x p s f b not1 not2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t110 q a c x p s f b not1 not2 alpha u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u))).
-
-(* constant 5963 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t112 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_isfe (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t8 q a c x p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f (l_e_st_eq_landau_n_rt_rp_r_c_8283_t106 q a c x p s f b not1 not2)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i (l_e_st_eq_landau_n_rt_rp_r_c_8283_t103 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_refis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5964 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t113 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) n (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t112 q a c x p s f b not1 not2 alpha u n o t) : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 5965 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t114 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2).(l_e_isfe (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t8 q a c x p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f (l_e_st_eq_landau_n_rt_rp_r_c_8283_t106 q a c x p s f b not1 not2)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) i (l_e_st_eq_landau_n_rt_rp_r_c_8283_t104 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_refis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)))) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).
-
-(* constant 5966 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t115 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2)) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) o (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2).l_e_st_eq_landau_n_rt_rp_r_c_8283_t114 q a c x p s f b not1 not2 alpha u n o t) : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2))).
-
-(* constant 5967 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t116 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_e_iswissel3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t113 q a c x p s f b not1 not2 alpha u n o) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t115 q a c x p s f b not1 not2 alpha u n o) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)).
-
-(* constant 5968 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t117 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_e_symis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)) (s u) (l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t116 q a c x p s f b not1 not2 alpha u n o) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t105 q a c x p s f b not1 not2 u n o)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u))).
-
-(* constant 5969 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t118 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u))) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2).l_e_st_eq_landau_n_rt_rp_r_c_8283_t111 q a c x p s f b not1 not2 alpha u t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t117 q a c x p s f b not1 not2 alpha u n t) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u))).
-
-(* constant 5970 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t119 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u))) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t109 q a c x p s f b not1 not2 alpha u t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).l_e_st_eq_landau_n_rt_rp_r_c_8283_t118 q a c x p s f b not1 not2 alpha u t) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u))).
-
-(* constant 5971 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t120 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_fisi (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 t)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_t119 q a c x p s f b not1 not2 alpha t) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 t))).
-
-(* constant 5972 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t121 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t103 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_refis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5973 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t121a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_ec3e21 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ismore1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_1px q a c x p s f b) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_compl l_e_st_eq_landau_n_1 x) (l_e_st_eq_landau_n_satz18 l_e_st_eq_landau_n_1 x)) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1).
-
-(* constant 5974 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t122 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_imp_th3 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t121a q a c x p s f b not1 not2) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) t) : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 5975 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t123 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_symnotis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) alpha : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2))).
-
-(* constant 5976 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t124 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_iswissel3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t122 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t123 q a c x p s f b not1 not2 alpha) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5977 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t125 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_isf (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx (λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) u f)) s (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 t)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t120 q a c x p s f b not1 not2 alpha) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha) f)))).
-
-(* constant 5978 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t126 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t97 q a c x p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha) f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t106 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t121 q a c x p s f b not1 not2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha) f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha) f))).
-
-(* constant 5979 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t127 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t46 q a c x p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha) f (l_e_st_eq_landau_n_rt_rp_r_c_8283_t107 q a c x p s f b not1 not2 alpha) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t124 q a c x p s f b not1 not2 alpha) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f)).
-
-(* constant 5980 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t128 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λalpha:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha) f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s2 q a c x p s f b not1 not2 alpha) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t125 q a c x p s f b not1 not2 alpha) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t126 q a c x p s f b not1 not2 alpha) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t127 q a c x p s f b not1 not2 alpha) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 5981 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_wissel (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 5982 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t129 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_wissel_th3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) : l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta)).
-
-(* constant 5983 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t130 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t104 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u) (l_e_iswissel1 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2)).
-
-(* constant 5984 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t131 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t130 q a c x p s f b not1 not2 i3 beta u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u))).
-
-(* constant 5985 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t132 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t103 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u) (l_e_iswissel2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) u i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5986 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t133 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2).(l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) i) (l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t132 q a c x p s f b not1 not2 i3 beta u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t98 q a c x p s f b not1 not2)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u))).
-
-(* constant 5987 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t134 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_e_iswissel3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) u n o : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u) u).
-
-(* constant 5988 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t135 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_t134 q a c x p s f b not1 not2 i3 beta u n o) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u)).
-
-(* constant 5989 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t136 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t105 q a c x p s f b not1 not2 u n o : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (s u)).
-
-(* constant 5990 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t139 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λo:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).(l_e_symis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u)) (s u) (l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 u) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t135 q a c x p s f b not1 not2 i3 beta u n o) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t136 q a c x p s f b not1 not2 i3 beta u n o)) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u))).
-
-(* constant 5991 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t140 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λn:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u))) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2).l_e_st_eq_landau_n_rt_rp_r_c_8283_t133 q a c x p s f b not1 not2 i3 beta u t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t139 q a c x p s f b not1 not2 i3 beta u n t) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u))).
-
-(* constant 5992 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t141 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u))) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t131 q a c x p s f b not1 not2 i3 beta u t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).l_e_st_eq_landau_n_rt_rp_r_c_8283_t140 q a c x p s f b not1 not2 i3 beta u t) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta u))).
-
-(* constant 5993 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t142 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_fisi (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta t)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_t141 q a c x p s f b not1 not2 i3 beta t) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta t))).
-
-(* constant 5994 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t143 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_symnotis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) beta : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2))).
-
-(* constant 5995 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t144 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_iswissel3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t122 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t143 q a c x p s f b not1 not2 i3 beta) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 5996 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t145 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_isf (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx (λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) u f)) s (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta t)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t142 q a c x p s f b not1 not2 i3 beta) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f)))).
-
-(* constant 5997 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t146 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t46 q a c x p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t129 q a c x p s f b not1 not2 i3 beta) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t144 q a c x p s f b not1 not2 i3 beta) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f))).
-
-(* constant 5998 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t147 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_st_eq_landau_n_rt_rp_r_c_8283_t97 q a c x p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f (l_e_st_eq_landau_n_rt_rp_r_c_8283_t106 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t121 q a c x p s f b not1 not2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f)).
-
-(* constant 5999 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t148 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λbeta:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s3 q a c x p s f b not1 not2 i3 beta) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s1 q a c x p s f b not1 not2) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t145 q a c x p s f b not1 not2 i3 beta) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t146 q a c x p s f b not1 not2 i3 beta) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t147 q a c x p s f b not1 not2 i3 beta) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "grundlagen_2_5.ma".
-
-(* constant 6000 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t149 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_ispl1 l_e_st_eq_landau_n_1 x l_e_st_eq_landau_n_1 (l_e_symis l_e_st_eq_landau_n_nat x l_e_st_eq_landau_n_1 i) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6001 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_lessisi2 l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t149 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6002 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) f : Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6003 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) s : Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6004 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) : Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_2.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6005 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t151 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_issmpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t149 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f)).
-
-(* constant 6006 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t152 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_issmpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t149 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f))).
-
-(* constant 6007 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t153 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_satz280 q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)))).
-
-(* constant 6008 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t154 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_satz280 q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)))).
-
-(* constant 6009 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t155 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_tris1 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_isinoutn l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_lessisi3 l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t149 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6010 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t156 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t155 q a c x p s f b not1 not2 i3 gamma i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 6011 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t157 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t156 q a c x p s f b not1 not2 i3 gamma i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6012 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t158 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_symis l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_isinoutn l_e_st_eq_landau_n_2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a l_e_st_eq_landau_n_2)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) l_e_st_eq_landau_n_1).
-
-(* constant 6013 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t159 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t158 q a c x p s f b not1 not2 i3 gamma i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 6014 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t160 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_tr3is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t159 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t98 q a c x p s f b not1 not2) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) gamma) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6015 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t161 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t157 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t160 q a c x p s f b not1 not2 i3 gamma i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))).
-
-(* constant 6016 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t163 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t159 q a c x p s f b not1 not2 i3 gamma i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6017 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t164 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t163 q a c x p s f b not1 not2 i3 gamma i) i3 : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 6018 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t165 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t164 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t156 q a c x p s f b not1 not2 i3 gamma i) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))).
-
-(* constant 6019 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t166 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t161 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))).
-
-(* constant 6020 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t167 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_rt_rp_r_c_8283_s05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t150 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t165 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))).
-
-(* constant 6021 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t168 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t166 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)))).
-
-(* constant 6022 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t169 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_comq q c (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)))).
-
-(* constant 6023 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t170 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t167 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2)))).
-
-(* constant 6024 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t171 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t152 q a c x p s f b not1 not2 i3 gamma i)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t154 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t168 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t169 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)))).
-
-(* constant 6025 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t172 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g7 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t171 q a c x p s f b not1 not2 i3 gamma i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t170 q a c x p s f b not1 not2 i3 gamma i) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_2 (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_1out l_e_st_eq_landau_n_2)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_f05 q a c x p s f b not1 not2 i3 gamma i (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_2))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t153 q a c x p s f b not1 not2 i3 gamma i)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t151 q a c x p s f b not1 not2 i3 gamma i) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6026 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_trivial ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λi:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_8283_t172 q a c x p s f b not1 not2 i3 gamma i : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6027 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t173 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_ore1 (l_e_st_eq_landau_n_more x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz24 x) n : l_e_st_eq_landau_n_more x l_e_st_eq_landau_n_1).
-
-(* constant 6028 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_mn x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t173 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_nat).
-
-(* constant 6029 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_changef (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6030 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t174 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_wissel_th6 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) b : l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n)).
-
-(* constant 6031 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t175 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_changef2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_refis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6032 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t176 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_symis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i3 : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6033 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t177 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tris2 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t175 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t176 q a c x p s f b not1 not2 i3 gamma n) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).
-
-(* constant 6034 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t178 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6035 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t178 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6036 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t179 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 6037 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t180 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_mn_th1b x l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t173 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) x).
-
-(* constant 6038 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t181 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t180 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) x).
-
-(* constant 6039 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g9 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t181 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6040 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t182 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g9 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_issmpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t180 q a c x p s f b not1 not2 i3 gamma n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g9 q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6041 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_right l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g9 q a c x p s f b not1 not2 i3 gamma n) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6042 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t183 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_lessisi1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_satz18a l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) : l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6043 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t183 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g9 q a c x p s f b not1 not2 i3 gamma n) : Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6044 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t184 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_satz281 q a l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g9 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g9 q a c x p s f b not1 not2 i3 gamma n)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6045 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t185 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 6046 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t186 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isinoutn l_e_st_eq_landau_n_1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_lessisi3 l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 6047 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_1a ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t183 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6048 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t187 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_1top l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t183 q a c x p s f b not1 not2 i3 gamma n)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1a q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6049 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_1b ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left1to x (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t181 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1a q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_1to x).
-
-(* constant 6050 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t188 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1a q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1a q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) x (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1a q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t181 q a c x p s f b not1 not2 i3 gamma n)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1a q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_1b q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6051 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t189 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tr3is l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1a q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_1b q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t186 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t187 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t188 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_1b q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6052 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_1c ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t178 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1b q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6053 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t190 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_1b q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_1b q a c x p s f b not1 not2 i3 gamma n)) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8283_1b q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t178 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t189 q a c x p s f b not1 not2 i3 gamma n) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1c q a c x p s f b not1 not2 i3 gamma n)).
-
-(* constant 6054 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t191 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1c q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t190 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 6055 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t192 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t185 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t191 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6056 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t193 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_symis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t175 q a c x p s f b not1 not2 i3 gamma n) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6057 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t194 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t193 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6058 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t195 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t192 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t194 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6059 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t196 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t195 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6060 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t197 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g9 q a c x p s f b not1 not2 i3 gamma n)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g11 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t182 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t184 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t196 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6061 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t198 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t197 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 6062 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t199 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_assq1 q a (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))))).
-
-(* constant 6063 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t200 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_comq q c (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 6064 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t178 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6065 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g13 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t181 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6066 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_right l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g13 q a c x p s f b not1 not2 i3 gamma n) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6067 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_lessisi1 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_satz18a l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g13 q a c x p s f b not1 not2 i3 gamma n) : Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6068 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t201 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 6069 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t202 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g13 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_issmpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t180 q a c x p s f b not1 not2 i3 gamma n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g13 q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6070 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t203 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_satz281 q a l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g13 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g13 q a c x p s f b not1 not2 i3 gamma n)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6071 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t204 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 6072 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t205 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_1c q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t190 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 6073 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t206 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t204 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t205 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6074 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t207 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_changef1 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_refis (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6075 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t208 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t207 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6076 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t209 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t206 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t208 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6077 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t210 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t209 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6078 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t211 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g13 q a c x p s f b not1 not2 i3 gamma n)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_g15 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t202 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t203 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t210 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6079 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_ua ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).(l_e_st_eq_landau_n_right1to l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6080 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_ub ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).(l_e_st_eq_landau_n_left1to x (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t181 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_ua q a c x p s f b not1 not2 i3 gamma n u) : l_e_st_eq_landau_n_1to x).
-
-(* constant 6081 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_uc ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_t178 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6082 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t212 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t178 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6083 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t213 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_satz16a (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6084 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t214 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_ec3e31 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t213 q a c x p s f b not1 not2 i3 gamma n u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t212 q a c x p s f b not1 not2 i3 gamma n u i) : l_con).
-
-(* constant 6085 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t215 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).(λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t214 q a c x p s f b not1 not2 i3 gamma n u t : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6086 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t216 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_isoutne (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) x (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t178 q a c x p s f b not1 not2 i3 gamma n)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_satz24a (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) l_e_st_eq_landau_n_1).
-
-(* constant 6087 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t217 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_ua q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_ua q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) x (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_ua q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t181 q a c x p s f b not1 not2 i3 gamma n)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_ua q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u))).
-
-(* constant 6088 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t218 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_ua q a c x p s f b not1 not2 i3 gamma n u))).
-
-(* constant 6089 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t219 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_tr3is l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_ua q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8283_ub q a c x p s f b not1 not2 i3 gamma n u)) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_8283_t218 q a c x p s f b not1 not2 i3 gamma n u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t217 q a c x p s f b not1 not2 i3 gamma n u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t216 q a c x p s f b not1 not2 i3 gamma n u i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) l_e_st_eq_landau_n_1).
-
-(* constant 6090 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t220 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_e_st_eq_landau_n_satz18 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u) : l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) l_e_st_eq_landau_n_1).
-
-(* constant 6091 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t221 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).λi:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_ec3e21 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_more (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz10b (l_e_st_eq_landau_n_pl l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t220 q a c x p s f b not1 not2 i3 gamma n u i) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t219 q a c x p s f b not1 not2 i3 gamma n u i) : l_con).
-
-(* constant 6092 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t222 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).(λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t221 q a c x p s f b not1 not2 i3 gamma n u t : l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))).
-
-(* constant 6093 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t223 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).(l_e_changef3 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t222 q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t215 q a c x p s f b not1 not2 i3 gamma n u) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u))).
-
-(* constant 6094 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t224 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u)) (s (l_e_st_eq_landau_n_rt_rp_r_c_8283_uc q a c x p s f b not1 not2 i3 gamma n u)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t223 q a c x p s f b not1 not2 i3 gamma n u) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n u)).
-
-(* constant 6095 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t225 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_fisi (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n t) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n t) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t224 q a c x p s f b not1 not2 i3 gamma n t)) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n)).
-
-(* constant 6096 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t226 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) u) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t225 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6097 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t227 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_comq q c (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6098 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t228 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t226 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6099 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t229 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t227 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t228 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n)))).
-
-(* constant 6100 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t230 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g14 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t229 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t211 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n))).
-
-(* constant 6101 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t231 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t230 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 6102 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t232 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t201 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f))).
-
-(* constant 6103 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t233 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_st_eq_landau_n_rt_rp_r_c_8283_t46 q a c x p (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_rt_rp_r_c_8283_t174 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t177 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f)).
-
-(* constant 6104 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t234 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g8 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t179 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t198 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t199 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t200 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))))).
-
-(* constant 6105 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t235 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λn:l_e_st_eq_landau_n_nis x l_e_st_eq_landau_n_1.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f)) (q (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xm1 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g10 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (l_e_st_eq_landau_n_rt_rp_r_c_8283_g12 q a c x p s f b not1 not2 i3 gamma n)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_g q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_s4 q a c x p s f b not1 not2 i3 gamma n) f)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) f) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t234 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t231 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t232 q a c x p s f b not1 not2 i3 gamma n) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t233 q a c x p s f b not1 not2 i3 gamma n) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6106 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t236 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).λgamma:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_imp_th1 (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) (λt:l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_8283_t172 q a c x p s f b not1 not2 i3 gamma t) (λt:l_not (l_e_st_eq_landau_n_is x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_8283_t235 q a c x p s f b not1 not2 i3 gamma t) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6107 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t237 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λi3:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t236 q a c x p s f b not1 not2 i3 t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_b0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).l_e_st_eq_landau_n_rt_rp_r_c_8283_t148 q a c x p s f b not1 not2 i3 t) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6108 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t238 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).λnot2:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t237 q a c x p s f b not1 not2 t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_rt_rp_r_c_8283_a0 q a c x p s f b not1 not2) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).l_e_st_eq_landau_n_rt_rp_r_c_8283_t128 q a c x p s f b not1 not2 t) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6109 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t239 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.λnot1:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t97 q a c x p s f b t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_1out (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).l_e_st_eq_landau_n_rt_rp_r_c_8283_t238 q a c x p s f b not1 t) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6110 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t240 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.λs:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λb:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) s.(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).l_e_st_eq_landau_n_rt_rp_r_c_8283_t46 q a c x p s f b t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (s (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x))).l_e_st_eq_landau_n_rt_rp_r_c_8283_t239 q a c x p s f b t) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop1 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) s f).
-
-(* constant 6111 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t241 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.(λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).λv:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x).l_e_st_eq_landau_n_rt_rp_r_c_cx.λw:l_e_bijective (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)) u.l_e_st_eq_landau_n_rt_rp_r_c_8283_t240 q a c x p u v w : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x)).
-
-(* constant 6112 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t242 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c t) (l_e_st_eq_landau_n_rt_rp_r_c_8283_xp1 q a c x) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t241 q a c x p) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c (l_e_st_eq_landau_n_suc x)).
-
-(* constant 6113 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8283_t243 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c t) (l_e_st_eq_landau_n_rt_rp_r_c_8283_t6 q a c) (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c t.l_e_st_eq_landau_n_rt_rp_r_c_8283_t242 q a c t u) x : l_e_st_eq_landau_n_rt_rp_r_c_8283_prop2 q a c x).
-
-(* constant 6114 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz283 ≝ λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λx:l_e_st_eq_landau_n_nat.λs:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_1to x.λb:l_e_bijective (l_e_st_eq_landau_n_1to x) (l_e_st_eq_landau_n_1to x) s.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_8283_t243 q a c x s f b : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x (λt:l_e_st_eq_landau_n_1to x.f (s t))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q x f)).
-
-(* constant 6115 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_shiftl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.(l_e_st_eq_landau_n_rt_rp_r_shiftl x ix y iy ly : l_e_st_eq_landau_n_nat).
-
-(* constant 6116 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_shiftr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_shiftr x ix y iy ly n : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6117 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_intshiftr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_intshiftr x ix y iy ly n : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly n)).
-
-(* constant 6118 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_shiftrls ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_shiftrls x ix y iy ly n : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly n) x).
-
-(* constant 6119 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_lsshiftr x ix y iy ly n : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly n)).
-
-(* constant 6120 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iseshiftr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).λm:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly m).(l_e_st_eq_landau_n_rt_rp_r_iseshiftr x ix y iy ly n m i : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly)) n m).
-
-(* constant 6121 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_shiftl1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_st_eq_landau_n_rt_rp_r_shiftl1 x ix y iy ly u a : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly)).
-
-(* constant 6122 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_shiftinv1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_st_eq_landau_n_rt_rp_r_shiftinv1 x ix y iy ly u a : l_e_st_eq_landau_n_rt_rp_r_is u (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_shiftl1 x ix y iy ly u a))).
-
-(* constant 6123 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_shiftinv2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λu:l_e_st_eq_landau_n_rt_rp_r_real.λa:l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl u) (l_e_st_eq_landau_n_rt_rp_r_lessis y u) (l_e_st_eq_landau_n_rt_rp_r_lessis u x).(l_e_st_eq_landau_n_rt_rp_r_shiftinv2 x ix y iy ly u a : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_shiftl1 x ix y iy ly u a)) u).
-
-(* constant 6124 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_shiftf ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_shiftf x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6125 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_smpri ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6126 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λlv:l_e_st_eq_landau_n_rt_rp_r_lessis y v.λkv:l_e_st_eq_landau_n_rt_rp_r_lessis v u.(l_e_st_eq_landau_n_rt_rp_r_lessisi1 v x (l_e_st_eq_landau_n_rt_rp_r_satz172a v u x kv k) : l_e_st_eq_landau_n_rt_rp_r_lessis v x).
-
-(* constant 6127 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lft ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(λt:l_e_st_eq_landau_n_rt_rp_r_real.λv:l_e_st_eq_landau_n_rt_rp_r_intrl t.λlt:l_e_st_eq_landau_n_rt_rp_r_lessis y t.λkt:l_e_st_eq_landau_n_rt_rp_r_lessis t u.f t v lt (l_e_st_eq_landau_n_rt_rp_r_c_8284_t1 x ix y iy ly f pi q a u iu l k t v lt kt) : Πt:l_e_st_eq_landau_n_rt_rp_r_real.Πv:l_e_st_eq_landau_n_rt_rp_r_intrl t.Πlt:l_e_st_eq_landau_n_rt_rp_r_lessis y t.Πkt:l_e_st_eq_landau_n_rt_rp_r_lessis t u.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6128 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_pl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_pl x y : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6129 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_mn ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_mn x y : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6130 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6131 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λlv:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) v.λkv:l_e_st_eq_landau_n_rt_rp_r_lessis v x.(l_e_st_eq_landau_n_rt_rp_r_satz190c u u l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_lessisi2 u u (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real u)) (l_e_st_eq_landau_n_rt_rp_r_lemma1 l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satz169a l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_natpos l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_natrl1))) : l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl u l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)).
-
-(* constant 6132 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λlv:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) v.λkv:l_e_st_eq_landau_n_rt_rp_r_lessis v x.(l_e_st_eq_landau_n_rt_rp_r_isless1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl u l_e_st_eq_landau_n_rt_rp_r_0) u (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_pl02 u l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t2 x ix y iy ly f pi q a u iu l k v iv lv kv) : l_e_st_eq_landau_n_rt_rp_r_less u (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)).
-
-(* constant 6133 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λlv:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) v.λkv:l_e_st_eq_landau_n_rt_rp_r_lessis v x.(l_e_st_eq_landau_n_rt_rp_r_lessisi1 y v (l_e_st_eq_landau_n_rt_rp_r_satz172b y (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) v (l_e_st_eq_landau_n_rt_rp_r_satz172a y u (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) l (l_e_st_eq_landau_n_rt_rp_r_c_8284_t3 x ix y iy ly f pi q a u iu l k v iv lv kv)) lv) : l_e_st_eq_landau_n_rt_rp_r_lessis y v).
-
-(* constant 6134 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_rgt ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(λt:l_e_st_eq_landau_n_rt_rp_r_real.λv:l_e_st_eq_landau_n_rt_rp_r_intrl t.λlt:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) t.λkt:l_e_st_eq_landau_n_rt_rp_r_lessis t x.f t v (l_e_st_eq_landau_n_rt_rp_r_c_8284_t4 x ix y iy ly f pi q a u iu l k t v lt kt) kt : Πt:l_e_st_eq_landau_n_rt_rp_r_real.Πv:l_e_st_eq_landau_n_rt_rp_r_intrl t.Πlt:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) t.Πkt:l_e_st_eq_landau_n_rt_rp_r_lessis t x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6135 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_intpl u iu l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)).
-
-(* constant 6136 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_satzr25 u iu x ix k : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) x).
-
-(* constant 6137 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) y) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u))) (l_e_st_eq_landau_n_rt_rp_r_asspl2 (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) y (l_e_st_eq_landau_n_rt_rp_r_plmn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) y)).
-
-(* constant 6138 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly : l_e_st_eq_landau_n_nat).
-
-(* constant 6139 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_suy ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_c_shiftl u iu y iy l : l_e_st_eq_landau_n_nat).
-
-(* constant 6140 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_nat).
-
-(* constant 6141 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_satzr155a (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_isrlnt2 (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 u iu y iy l)) (l_e_st_eq_landau_n_rt_rp_r_isrlnt2 (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k)))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t7 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 x) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 x ix y iy ly)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k))).
-
-(* constant 6142 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_isntirl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t8 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k)).
-
-(* constant 6143 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t9 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k)).
-
-(* constant 6144 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t10 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6145 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_c_issmpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t9 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q)).
-
-(* constant 6146 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_fr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_right l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 x ix y iy ly f pi q a u iu l k) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6147 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_lessisi1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_satz18a (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k))).
-
-(* constant 6148 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_fl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 x ix y iy ly f pi q a u iu l k) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6149 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t12a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_st_eq_landau_n_rt_rp_r_c_satz281 q a (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 x ix y iy ly f pi q a u iu l k)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k)))).
-
-(* constant 6150 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_satz19o (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_right1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))).
-
-(* constant 6151 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_right1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_right1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_right1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t10 x ix y iy ly f pi q a u iu l k)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_right1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t10 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_right1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)))).
-
-(* constant 6152 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t10 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_right1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k)).
-
-(* constant 6153 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t15 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_right1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t13 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t14 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))).
-
-(* constant 6154 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t16 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_isnterl (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t15 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n)))).
-
-(* constant 6155 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t17 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_satzr155b (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)))).
-
-(* constant 6156 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t18 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 u iu y iy l)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)))).
-
-(* constant 6157 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t19 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t18 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t17 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t16 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n)))).
-
-(* constant 6158 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t20 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))) y (l_e_st_eq_landau_n_rt_rp_r_c_8284_t19 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))) y)).
-
-(* constant 6159 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t21 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y)) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) y)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y)) y (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)))) (l_e_st_eq_landau_n_rt_rp_r_asspl1 (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) y) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_plmn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u))).
-
-(* constant 6160 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t22 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_mn (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) y) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n))) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t20 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t21 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u))).
-
-(* constant 6161 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t23 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u)) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8284_t22 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n)) (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n)).
-
-(* constant 6162 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t24 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))).
-
-(* constant 6163 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t25 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n))).
-
-(* constant 6164 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t26 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n)) x).
-
-(* constant 6165 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t27 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n)).
-
-(* constant 6166 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t28 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n)).
-
-(* constant 6167 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t29 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n) x).
-
-(* constant 6168 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t30 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_8284_t4 x ix y iy ly f pi q a u iu l k (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t27 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t28 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t29 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n)).
-
-(* constant 6169 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t31 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).(pi (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n1 x ix y iy ly f pi q a u iu l k n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t24 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t25 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t26 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t27 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t30 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t29 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t23 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) n)).
-
-(* constant 6170 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t32 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_fisi (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_8284_t31 x ix y iy ly f pi q a u iu l k t) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k))).
-
-(* constant 6171 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t33 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_isf (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λv:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) v) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t32 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q)).
-
-(* constant 6172 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t34 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k))) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t33 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q))).
-
-(* constant 6173 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t35 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) n))).
-
-(* constant 6174 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t36 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t10 x ix y iy ly f pi q a u iu l k)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t10 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) n)))).
-
-(* constant 6175 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t10 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) n) : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k)).
-
-(* constant 6176 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t37 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_tris l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12 x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t35 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t36 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n))).
-
-(* constant 6177 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t38 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_isnterl (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t37 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n)))).
-
-(* constant 6178 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t39 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n))) y (l_e_st_eq_landau_n_rt_rp_r_c_8284_t38 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n)) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n))) y)).
-
-(* constant 6179 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t40 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) n)) y) (l_e_st_eq_landau_n_rt_rp_r_c_8284_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n))) y) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8284_t39 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_shiftr u iu y iy l n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n))).
-
-(* constant 6180 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t41 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_intshiftr u iu y iy l n : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_shiftr u iu y iy l n)).
-
-(* constant 6181 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t42 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr u iu y iy l n : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_shiftr u iu y iy l n)).
-
-(* constant 6182 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t43 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_shiftrls u iu y iy l n : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_shiftr u iu y iy l n) u).
-
-(* constant 6183 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t44 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_8284_t1 x ix y iy ly f pi q a u iu l k (l_e_st_eq_landau_n_rt_rp_r_c_shiftr u iu y iy l n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t41 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t42 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t43 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_shiftr u iu y iy l n) x).
-
-(* constant 6184 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t45 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n))).
-
-(* constant 6185 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t46 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n))).
-
-(* constant 6186 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t47 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n)) x).
-
-(* constant 6187 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t48 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(pi (l_e_st_eq_landau_n_rt_rp_r_c_shiftr u iu y iy l n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t41 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t42 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t44 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8284_n2 x ix y iy ly f pi q a u iu l k n)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t45 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t46 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t47 x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t40 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_shiftf u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k n)).
-
-(* constant 6188 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t49 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_shiftf u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t48 x ix y iy ly f pi q a u iu l k n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) n)).
-
-(* constant 6189 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t50 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_fisi (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_8284_t49 x ix y iy ly f pi q a u iu l k t) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k))).
-
-(* constant 6190 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t51 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_isf (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λv:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) v) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t50 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) q)).
-
-(* constant 6191 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t52 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_isf l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.q t (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) q) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t51 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_rt_rp_r_c_is (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpri u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q))).
-
-(* constant 6192 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8284_t53 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 x ix y iy ly f pi q a u iu l k)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fr x ix y iy ly f pi q a u iu l k))) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_fl x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpri u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t12a x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t34 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t52 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 x ix y iy ly f pi q a u iu l k)) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpri u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_c_8284_p1 u) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t5 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t6 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q))).
-
-(* constant 6193 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz284 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λl:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λk:l_e_st_eq_landau_n_rt_rp_r_less u x.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpri u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_intpl u iu l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1) (l_e_st_eq_landau_n_rt_rp_r_satzr25 u iu x ix k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q)) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_8284_suy x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_sxu x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_f1 x ix y iy ly f pi q a u iu l k)) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t11 x ix y iy ly f pi q a u iu l k) (l_e_st_eq_landau_n_rt_rp_r_c_8284_t53 x ix y iy ly f pi q a u iu l k) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q) (q (l_e_st_eq_landau_n_rt_rp_r_c_smpri u iu y iy l (l_e_st_eq_landau_n_rt_rp_r_c_lft x ix y iy ly f pi q a u iu l k) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix (l_e_st_eq_landau_n_rt_rp_r_pl u l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_intpl u iu l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1) (l_e_st_eq_landau_n_rt_rp_r_satzr25 u iu x ix k) (l_e_st_eq_landau_n_rt_rp_r_c_rgt x ix y iy ly f pi q a u iu l k) q))).
-
-(* constant 6194 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_pl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_pl x y : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6195 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_mn ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λy:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_mn x y : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6196 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_pl x l_e_st_eq_landau_n_rt_rp_r_1rl : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6197 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λw:l_e_st_eq_landau_n_rt_rp_r_real.λiw:l_e_st_eq_landau_n_rt_rp_r_intrl w.λlw:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl y v) w.λkw:l_e_st_eq_landau_n_rt_rp_r_lessis w (l_e_st_eq_landau_n_rt_rp_r_pl x v).(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) w) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) w) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v)) lw (λt:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) w.l_e_st_eq_landau_n_rt_rp_r_satz188f (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) w (l_e_st_eq_landau_n_rt_rp_r_m0 v) t) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) w.l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) w v t) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v)).
-
-(* constant 6198 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λw:l_e_st_eq_landau_n_rt_rp_r_real.λiw:l_e_st_eq_landau_n_rt_rp_r_intrl w.λlw:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl y v) w.λkw:l_e_st_eq_landau_n_rt_rp_r_lessis w (l_e_st_eq_landau_n_rt_rp_r_pl x v).(l_e_st_eq_landau_n_rt_rp_r_islessis1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) v) y (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v) (l_e_st_eq_landau_n_rt_rp_r_mnpl y v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t1 x ix y iy ly f pi q v iv w iw lw kw) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v)).
-
-(* constant 6199 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λw:l_e_st_eq_landau_n_rt_rp_r_real.λiw:l_e_st_eq_landau_n_rt_rp_r_intrl w.λlw:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl y v) w.λkw:l_e_st_eq_landau_n_rt_rp_r_lessis w (l_e_st_eq_landau_n_rt_rp_r_pl x v).(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_less w (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_is w (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) v)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) v)) kw (λt:l_e_st_eq_landau_n_rt_rp_r_less w (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v).l_e_st_eq_landau_n_rt_rp_r_satz188f w (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_m0 v) t) (λt:l_e_st_eq_landau_n_rt_rp_r_is w (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v).l_e_st_eq_landau_n_rt_rp_r_ismn1 w (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) v t) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) v)).
-
-(* constant 6200 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λw:l_e_st_eq_landau_n_rt_rp_r_real.λiw:l_e_st_eq_landau_n_rt_rp_r_intrl w.λlw:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl y v) w.λkw:l_e_st_eq_landau_n_rt_rp_r_lessis w (l_e_st_eq_landau_n_rt_rp_r_pl x v).(l_e_st_eq_landau_n_rt_rp_r_islessis2 (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) v) x (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v) (l_e_st_eq_landau_n_rt_rp_r_mnpl x v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t3 x ix y iy ly f pi q v iv w iw lw kw) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn w v) x).
-
-(* constant 6201 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_sft ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(λt:l_e_st_eq_landau_n_rt_rp_r_real.λw:l_e_st_eq_landau_n_rt_rp_r_intrl t.λlt:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl y v) t.λkt:l_e_st_eq_landau_n_rt_rp_r_lessis t (l_e_st_eq_landau_n_rt_rp_r_pl x v).f (l_e_st_eq_landau_n_rt_rp_r_mn t v) (l_e_st_eq_landau_n_rt_rp_r_intmn t w v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t2 x ix y iy ly f pi q v iv t w lt kt) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t4 x ix y iy ly f pi q v iv t w lt kt) : Πt:l_e_st_eq_landau_n_rt_rp_r_real.Πw:l_e_st_eq_landau_n_rt_rp_r_intrl t.Πlt:l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl y v) t.Πkt:l_e_st_eq_landau_n_rt_rp_r_lessis t (l_e_st_eq_landau_n_rt_rp_r_pl x v).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6202 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl v y)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_m0 v) (l_e_st_eq_landau_n_rt_rp_r_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl v y) (l_e_st_eq_landau_n_rt_rp_r_compl y v)) (l_e_st_eq_landau_n_rt_rp_r_satz180 v y) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_m0 v) (l_e_st_eq_landau_n_rt_rp_r_m0 y))).
-
-(* constant 6203 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl x) (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 x) (l_e_st_eq_landau_n_rt_rp_r_asspl1 l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_m0 v)) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) v) x l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_mnpl x v)) (l_e_st_eq_landau_n_rt_rp_r_compl l_e_st_eq_landau_n_rt_rp_r_1rl x) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 x)).
-
-(* constant 6204 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_m0 v) (l_e_st_eq_landau_n_rt_rp_r_m0 y))) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) v) y) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 x) y) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_m0 v) (l_e_st_eq_landau_n_rt_rp_r_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t5 x ix y iy ly f pi q v iv)) (l_e_st_eq_landau_n_rt_rp_r_asspl2 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_m0 v) (l_e_st_eq_landau_n_rt_rp_r_m0 y)) (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 x) y (l_e_st_eq_landau_n_rt_rp_r_c_8285_t6 x ix y iy ly f pi q v iv)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 x) y)).
-
-(* constant 6205 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_less y x) (l_e_st_eq_landau_n_rt_rp_r_is y x) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) ly (λt:l_e_st_eq_landau_n_rt_rp_r_less y x.l_e_st_eq_landau_n_rt_rp_r_satz188f y x v t) (λt:l_e_st_eq_landau_n_rt_rp_r_is y x.l_e_st_eq_landau_n_rt_rp_r_ispl1 y x v t) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)).
-
-(* constant 6206 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly : l_e_st_eq_landau_n_nat).
-
-(* constant 6207 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_sv ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_st_eq_landau_n_rt_rp_r_c_shiftl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) : l_e_st_eq_landau_n_nat).
-
-(* constant 6208 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_st_eq_landau_n_rt_rp_r_isrlent (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_p1 x) y) (l_e_st_eq_landau_n_rt_rp_r_shift_t6 x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t7 x ix y iy ly f pi q v iv) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv)).
-
-(* constant 6209 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t9 x ix y iy ly f pi q v iv) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv)).
-
-(* constant 6210 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_f1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t10 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f) : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6211 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_st_eq_landau_n_rt_rp_r_c_issmpr q (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f) (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t9 x ix y iy ly f pi q v iv) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_f1 x ix y iy ly f pi q v iv)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q)).
-
-(* constant 6212 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_isinoutn (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t10 x ix y iy ly f pi q v iv)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t10 x ix y iy ly f pi q v iv) n))).
-
-(* constant 6213 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t10 x ix y iy ly f pi q v iv) n : l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv)).
-
-(* constant 6214 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_isnterl (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t12 x ix y iy ly f pi q v iv n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n)))).
-
-(* constant 6215 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n))) y) (l_e_st_eq_landau_n_rt_rp_r_asspl1 (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_m0 v)) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n))) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) v) y (l_e_st_eq_landau_n_rt_rp_r_c_8285_t13 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_mnpl y v)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n))) y)).
-
-(* constant 6216 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_st0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6217 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_stv ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_shiftr (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) n : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6218 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t15 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 v))) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_m0 v) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl))) (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) v) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_8285_st0 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_asspl1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 v)) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 v)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_m0 v) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_compl (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_m0 v))) (l_e_st_eq_landau_n_rt_rp_r_asspl2 (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) (l_e_st_eq_landau_n_rt_rp_r_m0 v) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ismn1 (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) n)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v)) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_rt_rp_r_c_8285_s0 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n))) y) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_8285_t14 x ix y iy ly f pi q v iv n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_st0 x ix y iy ly f pi q v iv n)).
-
-(* constant 6219 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t16 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_8285_st0 x ix y iy ly f pi q v iv n)).
-
-(* constant 6220 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t17 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_st0 x ix y iy ly f pi q v iv n) x).
-
-(* constant 6221 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t18 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8285_n1 x ix y iy ly f pi q v iv n) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_8285_st0 x ix y iy ly f pi q v iv n)).
-
-(* constant 6222 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t19 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_intshiftr (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) n : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n)).
-
-(* constant 6223 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t20 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_shiftrls (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) n : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v)).
-
-(* constant 6224 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t21 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) n : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n)).
-
-(* constant 6225 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t22 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_intmn (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t19 x ix y iy ly f pi q v iv n) v iv : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) v)).
-
-(* constant 6226 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t23 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_8285_t2 x ix y iy ly f pi q v iv (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t19 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t21 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t20 x ix y iy ly f pi q v iv n) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) v)).
-
-(* constant 6227 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t24 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(l_e_st_eq_landau_n_rt_rp_r_c_8285_t4 x ix y iy ly f pi q v iv (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t19 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t21 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t20 x ix y iy ly f pi q v iv n) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) v) x).
-
-(* constant 6228 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t25 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).(pi (l_e_st_eq_landau_n_rt_rp_r_c_8285_mn (l_e_st_eq_landau_n_rt_rp_r_c_8285_stv x ix y iy ly f pi q v iv n) v) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t22 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t23 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t24 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_st0 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t16 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t18 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t17 x ix y iy ly f pi q v iv n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t15 x ix y iy ly f pi q v iv n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_shiftf (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_sft x ix y iy ly f pi q v iv) n) (l_e_st_eq_landau_n_rt_rp_r_c_8285_f1 x ix y iy ly f pi q v iv n)).
-
-(* constant 6229 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t26 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_fisi (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_shiftf (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_sft x ix y iy ly f pi q v iv)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_f1 x ix y iy ly f pi q v iv) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).l_e_st_eq_landau_n_rt_rp_r_c_8285_t25 x ix y iy ly f pi q v iv t) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_sft x ix y iy ly f pi q v iv)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_f1 x ix y iy ly f pi q v iv)).
-
-(* constant 6230 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8285_t27 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_isf (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λw:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) w) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_sft x ix y iy ly f pi q v iv)) (l_e_st_eq_landau_n_rt_rp_r_c_8285_f1 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t26 x ix y iy ly f pi q v iv) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpri (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_sft x ix y iy ly f pi q v iv) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_f1 x ix y iy ly f pi q v iv))).
-
-(* constant 6231 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma285 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_st_eq_landau_n_rt_rp_r_c_8285_t8 x ix y iy ly f pi q v iv : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl y v) (l_e_st_eq_landau_n_rt_rp_r_pl x v)).
-
-(* constant 6232 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz285 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λv:l_e_st_eq_landau_n_rt_rp_r_real.λiv:l_e_st_eq_landau_n_rt_rp_r_intrl v.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpri (l_e_st_eq_landau_n_rt_rp_r_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_lemma285 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_sft x ix y iy ly f pi q v iv) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_8285_sv x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_f1 x ix y iy ly f pi q v iv)) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t27 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_8285_t11 x ix y iy ly f pi q v iv) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpri (l_e_st_eq_landau_n_rt_rp_r_pl x v) (l_e_st_eq_landau_n_rt_rp_r_intpl x ix v iv) (l_e_st_eq_landau_n_rt_rp_r_pl y v) (l_e_st_eq_landau_n_rt_rp_r_intpl y iy v iv) (l_e_st_eq_landau_n_rt_rp_r_c_lemma285 x ix y iy ly f pi q v iv) (l_e_st_eq_landau_n_rt_rp_r_c_sft x ix y iy ly f pi q v iv) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q)).
-
-(* constant 6233 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_us ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λlu:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λul:l_e_st_eq_landau_n_rt_rp_r_lessis u x.(s u iu lu ul : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6234 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λlu:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λul:l_e_st_eq_landau_n_rt_rp_r_lessis u x.(ins u iu lu ul : l_and3 (l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul)) (l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul)) (l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul) x)).
-
-(* constant 6235 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_inseqe1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λlu:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λul:l_e_st_eq_landau_n_rt_rp_r_lessis u x.(l_e_st_eq_landau_n_rt_rp_r_shift_t22 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t1 x ix y iy ly s ins f u iu lu ul) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul)).
-
-(* constant 6236 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_inseqe2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λlu:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λul:l_e_st_eq_landau_n_rt_rp_r_lessis u x.(l_e_st_eq_landau_n_rt_rp_r_shift_t23 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t1 x ix y iy ly s ins f u iu lu ul) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul)).
-
-(* constant 6237 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_inseqe3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λlu:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λul:l_e_st_eq_landau_n_rt_rp_r_lessis u x.(l_e_st_eq_landau_n_rt_rp_r_shift_t24 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t1 x ix y iy ly s ins f u iu lu ul) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul) x).
-
-(* constant 6238 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_usf ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_real.λiu:l_e_st_eq_landau_n_rt_rp_r_intrl u.λlu:l_e_st_eq_landau_n_rt_rp_r_lessis y u.λul:l_e_st_eq_landau_n_rt_rp_r_lessis u x.(f (l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f u iu lu ul) (l_e_st_eq_landau_n_rt_rp_r_c_inseqe1 x ix y iy ly s ins f u iu lu ul) (l_e_st_eq_landau_n_rt_rp_r_c_inseqe2 x ix y iy ly s ins f u iu lu ul) (l_e_st_eq_landau_n_rt_rp_r_c_inseqe3 x ix y iy ly s ins f u iu lu ul) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6239 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_permseq ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.(λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_intrl t.λv:l_e_st_eq_landau_n_rt_rp_r_lessis y t.λw:l_e_st_eq_landau_n_rt_rp_r_lessis t x.l_e_st_eq_landau_n_rt_rp_r_c_usf x ix y iy ly s ins f t u v w : Πt:l_e_st_eq_landau_n_rt_rp_r_real.Πu:l_e_st_eq_landau_n_rt_rp_r_intrl t.Πv:l_e_st_eq_landau_n_rt_rp_r_lessis y t.Πw:l_e_st_eq_landau_n_rt_rp_r_lessis t x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6240 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_ss ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.(l_e_st_eq_landau_n_rt_rp_r_shiftseq x ix y iy ly s ins : Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly)).
-
-(* constant 6241 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.(l_e_st_eq_landau_n_rt_rp_r_c_satz283 q a c (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly) (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps) (l_e_st_eq_landau_n_rt_rp_r_bijshiftseq x ix y iy ly s ins pri ps) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps t))) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q)).
-
-(* constant 6242 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_ns ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_c_us x ix y iy ly s ins f (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6243 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_c_shiftinv1 x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ns x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_shift_t34 x ix y iy ly s ins n) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_8286_ns x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n))).
-
-(* constant 6244 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_c_inseqe1 x ix y iy ly s ins f (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_8286_ns x ix y iy ly f pi q a c s ins pri ps n)).
-
-(* constant 6245 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_c_inseqe2 x ix y iy ly s ins f (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_8286_ns x ix y iy ly f pi q a c s ins pri ps n)).
-
-(* constant 6246 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_c_inseqe3 x ix y iy ly s ins f (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix y iy ly n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix y iy ly n) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8286_ns x ix y iy ly f pi q a c s ins pri ps n) x).
-
-(* constant 6247 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_c_intshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n))).
-
-(* constant 6248 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_c_lsshiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n) : l_e_st_eq_landau_n_rt_rp_r_lessis y (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n))).
-
-(* constant 6249 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(l_e_st_eq_landau_n_rt_rp_r_c_shiftrls x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n)) x).
-
-(* constant 6250 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).(pi (l_e_st_eq_landau_n_rt_rp_r_c_8286_ns x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t4 x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t5 x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t6 x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftr x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n)) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t7 x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t8 x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t9 x ix y iy ly f pi q a c s ins pri ps n) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t3 x ix y iy ly f pi q a c s ins pri ps n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_permseq x ix y iy ly s ins f) n) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps n))).
-
-(* constant 6251 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.(l_e_fisi (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly)) l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_permseq x ix y iy ly s ins f)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps t)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_8286_t10 x ix y iy ly f pi q a c s ins pri ps t) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_cx) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_permseq x ix y iy ly s ins f)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps t))).
-
-(* constant 6252 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8286_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.(l_e_isf (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly) u) (l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_permseq x ix y iy ly s ins f)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps t)) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t11 x ix y iy ly f pi q a c s ins pri ps) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_permseq x ix y iy ly s ins f) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps t)))).
-
-(* constant 6253 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz286 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_real.λix:l_e_st_eq_landau_n_rt_rp_r_intrl x.λy:l_e_st_eq_landau_n_rt_rp_r_real.λiy:l_e_st_eq_landau_n_rt_rp_r_intrl y.λly:l_e_st_eq_landau_n_rt_rp_r_lessis y x.λf:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx.λpi:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_c_cx f.λq:Πt:l_e_st_eq_landau_n_rt_rp_r_c_cx.Πu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_cx.λa:l_e_st_eq_landau_n_rt_rp_r_c_assoc q.λc:l_e_st_eq_landau_n_rt_rp_r_c_commut q.λs:l_e_st_eq_landau_n_rt_rp_r_seq x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real.λins:l_e_st_eq_landau_n_rt_rp_r_inseq x ix y iy ly s.λpri:l_e_st_eq_landau_n_rt_rp_r_proofsirrelevant x ix y iy ly l_e_st_eq_landau_n_rt_rp_r_real s.λps:l_e_st_eq_landau_n_rt_rp_r_perm x ix y iy ly s.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_permseq x ix y iy ly s ins f) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpr q (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_shiftl x ix y iy ly).l_e_st_eq_landau_n_rt_rp_r_c_shiftf x ix y iy ly f (l_e_st_eq_landau_n_rt_rp_r_c_8286_ss x ix y iy ly f pi q a c s ins pri ps t))) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t12 x ix y iy ly f pi q a c s ins pri ps) (l_e_st_eq_landau_n_rt_rp_r_c_8286_t2 x ix y iy ly f pi q a c s ins pri ps) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly (l_e_st_eq_landau_n_rt_rp_r_c_permseq x ix y iy ly s ins f) q) (l_e_st_eq_landau_n_rt_rp_r_c_smpri x ix y iy ly f q)).
-
-(* constant 6254 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_modf ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (f t)) l_e_st_eq_landau_n_rt_rp_r_0 : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6255 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x f)) r : Prop).
-
-(* constant 6256 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_modf x f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) : Prop).
-
-(* constant 6257 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_and (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 x f r) (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 x f r) : Prop).
-
-(* constant 6258 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_prop4 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_some (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x f t) : Prop).
-
-(* constant 6259 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 ≝ λx:l_e_st_eq_landau_n_nat.(∀u:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8287_prop4 x u : Prop).
-
-(* constant 6260 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t1 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl t u) f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum l_e_st_eq_landau_n_1 f) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 6261 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t2 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_ismod (l_e_st_eq_landau_n_rt_rp_r_c_sum l_e_st_eq_landau_n_1 f) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t1 f) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum l_e_st_eq_landau_n_1 f)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 6262 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t3 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_lessisi2 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum l_e_st_eq_landau_n_1 f)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t2 f) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 l_e_st_eq_landau_n_1 f (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 6263 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t4 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl t u) (l_e_st_eq_landau_n_rt_rp_r_c_modf l_e_st_eq_landau_n_1 f) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 l_e_st_eq_landau_n_1 f (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 6264 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t5 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_andi (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 l_e_st_eq_landau_n_1 f (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 l_e_st_eq_landau_n_1 f (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t3 f) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t4 f) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 l_e_st_eq_landau_n_1 f (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 6265 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t6 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 l_e_st_eq_landau_n_1 f t) (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t5 f) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop4 l_e_st_eq_landau_n_1 f).
-
-(* constant 6266 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t7 ≝ (λu:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8287_t6 u : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 l_e_st_eq_landau_n_1).
-
-(* constant 6267 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t8 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 6268 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_lf ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8287_t8 x p f) f : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6269 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t9 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r) (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r) pr : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r).
-
-(* constant 6270 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t10 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r) (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r) pr : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r).
-
-(* constant 6271 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t11 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl t u) x f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))).
-
-(* constant 6272 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t12 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_c_ismod (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t11 x p f r pr)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f))).
-
-(* constant 6273 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_m ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6274 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t13 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_islessis1 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t12 x p f r pr) (l_e_st_eq_landau_n_rt_rp_r_c_satz271 (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))).
-
-(* constant 6275 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t14 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) r) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) r) (l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))) (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t9 x p f r pr) (λt:l_e_st_eq_landau_n_rt_rp_r_less (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) r.l_e_st_eq_landau_n_rt_rp_r_satz188f (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) t) (λt:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) r.l_e_st_eq_landau_n_rt_rp_r_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) t) : l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))).
-
-(* constant 6276 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t15 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t13 x p f r pr) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t14 x p f r pr) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))).
-
-(* constant 6277 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_lmf ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8287_t8 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6278 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t16 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_pl t u) x (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lmf x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6279 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t17 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_c_ispl1 (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lmf x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t10 x p f r pr) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lmf x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6280 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t18 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_c_plis12a r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) l_e_st_eq_landau_n_rt_rp_r_0 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6281 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t19 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6282 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t20 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_sum (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lmf x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t16 x p f r pr) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t17 x p f r pr) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t18 x p f r pr) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t19 x p f r pr) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))).
-
-(* constant 6283 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t21 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_andi (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t15 x p f r pr) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t20 x p f r pr) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr))).
-
-(* constant 6284 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t22 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λr:l_e_st_eq_landau_n_rt_rp_r_real.λpr:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) r.(l_somei l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f t) (l_e_st_eq_landau_n_rt_rp_r_pl r (l_e_st_eq_landau_n_rt_rp_r_c_8287_m x p f r pr)) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t21 x p f r pr) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop4 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6285 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t23 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_someapp l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) t) (p (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8287_prop4 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop3 x (l_e_st_eq_landau_n_rt_rp_r_c_8287_lf x p f) t.l_e_st_eq_landau_n_rt_rp_r_c_8287_t22 x p f t u) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop4 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6286 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t25 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.(λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8287_t23 x p u : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 6287 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8287_t26 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 x.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 t) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_rt_rp_r_c_8287_t25 x p) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 6288 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz287 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 t) l_e_st_eq_landau_n_rt_rp_r_c_8287_t7 (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_rp_r_c_8287_prop5 t.l_e_st_eq_landau_n_rt_rp_r_c_8287_t26 t u) x f : l_e_st_eq_landau_n_rt_rp_r_some (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_and (l_e_st_eq_landau_n_rt_rp_r_lessis (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_sum x f)) t) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_sum x (l_e_st_eq_landau_n_rt_rp_r_c_modf x f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli t l_e_st_eq_landau_n_rt_rp_r_0)))).
-
-(* constant 6289 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_modf x f)) : Prop).
-
-(* constant 6290 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 ≝ λx:l_e_st_eq_landau_n_nat.(∀u:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8288_prop1 x u : Prop).
-
-(* constant 6291 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t1 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 6292 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t2 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_ismod (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t1 f) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)))).
-
-(* constant 6293 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t3 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx1 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_t2 f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6294 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t4 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) (l_e_st_eq_landau_n_rt_rp_r_c_modf l_e_st_eq_landau_n_1 f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_modf l_e_st_eq_landau_n_1 f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6295 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t5 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_modf l_e_st_eq_landau_n_1 f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t3 f) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t4 f) : l_e_st_eq_landau_n_rt_rp_r_c_8288_prop1 l_e_st_eq_landau_n_1 f).
-
-(* constant 6296 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t6 ≝ (λu:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8288_t5 u : l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 l_e_st_eq_landau_n_1).
-
-(* constant 6297 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t7 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 6298 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_lf ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8288_t7 x p f) f : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6299 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t8 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) x f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))).
-
-(* constant 6300 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_m ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_mod (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6301 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t9 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_ismod (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t8 x p f) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))))).
-
-(* constant 6302 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t10 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz268 (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f))).
-
-(* constant 6303 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t11 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t9 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t10 x p f) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f))).
-
-(* constant 6304 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t12 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx1 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_t11 x p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6305 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_lmf ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8288_t7 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6306 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t13 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) x (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lmf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6307 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t14 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lmf x p f)) (p (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lmf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6308 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t15 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lmf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t14 x p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lmf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6309 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t16 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_tsis12a (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) l_e_st_eq_landau_n_rt_rp_r_0 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f))))).
-
-(* constant 6310 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t17 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_ismn2 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz176b l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f))).
-
-(* constant 6311 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t18 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f))) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts02 (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f))) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6312 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t19 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f))) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_t17 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t18 x p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6313 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t20 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lmf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t13 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t15 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t16 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t19 x p f) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6314 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t21 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_modf (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8288_lf x p f))) (l_e_st_eq_landau_n_rt_rp_r_c_8288_m x p f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t12 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t20 x p f) : l_e_st_eq_landau_n_rt_rp_r_c_8288_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6315 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t21a ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.(λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8288_t21 x p u : l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 6316 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8288_t22 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 x.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 t) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_rt_rp_r_c_8288_t21a x p) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 6317 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz288 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 t) l_e_st_eq_landau_n_rt_rp_r_c_8288_t6 (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_rp_r_c_8288_prop2 t.l_e_st_eq_landau_n_rt_rp_r_c_8288_t22 t u) x f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_prod x f)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_modf x f))).
-
-(* constant 6318 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x f) l_e_st_eq_landau_n_rt_rp_r_c_0c : Prop).
-
-(* constant 6319 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_some (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) : Prop).
-
-(* constant 6320 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_prop3 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_iff (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 x f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 x f) : Prop).
-
-(* constant 6321 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 ≝ λx:l_e_st_eq_landau_n_nat.(∀u:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8289_prop3 x u : Prop).
-
-(* constant 6322 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t1 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1))).
-
-(* constant 6323 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t2 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 l_e_st_eq_landau_n_1 f.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t1 f) p : l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6324 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t3 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 l_e_st_eq_landau_n_1 f.(l_somei (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t2 f p) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 l_e_st_eq_landau_n_1 f).
-
-(* constant 6325 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t4 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 l_e_st_eq_landau_n_1 f.λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f u) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_singlet_th1 u : l_e_is (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) u (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)).
-
-(* constant 6326 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t5 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 l_e_st_eq_landau_n_1 f.λu:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f u) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 f) (f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1)) (f u) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_8289_t1 f) (l_e_isf (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) l_e_st_eq_landau_n_rt_rp_r_c_cx f (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1) u (l_e_symis (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) u (l_e_st_eq_landau_n_xout l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t4 f p u i))) i : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 l_e_st_eq_landau_n_1 f).
-
-(* constant 6327 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t6 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 l_e_st_eq_landau_n_1 f.(l_someapp (l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1) (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) p (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 l_e_st_eq_landau_n_1 f) (λt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.λu:l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_8289_t5 f p t u) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 l_e_st_eq_landau_n_1 f).
-
-(* constant 6328 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t7 ≝ λf:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_iffi (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 l_e_st_eq_landau_n_1 f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 l_e_st_eq_landau_n_1 f) (λt:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 l_e_st_eq_landau_n_1 f.l_e_st_eq_landau_n_rt_rp_r_c_8289_t3 f t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 l_e_st_eq_landau_n_1 f.l_e_st_eq_landau_n_rt_rp_r_c_8289_t6 f t) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop3 l_e_st_eq_landau_n_1 f).
-
-(* constant 6329 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t8 ≝ (λu:Πt:l_e_st_eq_landau_n_1to l_e_st_eq_landau_n_1.l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8289_t7 u : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 l_e_st_eq_landau_n_1).
-
-(* constant 6330 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t9 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_lessisi1 x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_satz18a x l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 6331 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_lf ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8289_t9 x p f) f : Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6332 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t10 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) x f : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))))).
-
-(* constant 6333 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t11 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t10 x p f) q : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6334 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t12 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.(l_e_st_eq_landau_n_rt_rp_r_c_satz221c (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t11 x p f q) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_c_0c)).
-
-(* constant 6335 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t13 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_iff_th3 (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (p (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) i : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)).
-
-(* constant 6336 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t14 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_1to x.λj:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_somei (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8289_t9 x p f) n) j : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6337 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t15 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_someapp (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t13 x p f q i) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (λt:l_e_st_eq_landau_n_1to x.λu:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f t) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_8289_t14 x p f q i t u) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6338 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t16 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_somei (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) i : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6339 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t17 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.(l_orapp (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t12 x p f q) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_8289_t15 x p f q t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_8289_t16 x p f q t) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6340 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t18 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_c_0c (f n) (l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_c_cx f n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) j) i : l_e_st_eq_landau_n_rt_rp_r_c_is (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6341 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t20 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λj:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).(l_e_st_eq_landau_n_rt_rp_r_c_satz221b (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t18 x p f q n i j) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6342 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_st_eq_landau_n_rt_rp_r_c_inn (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n : l_e_st_eq_landau_n_nat).
-
-(* constant 6343 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t21 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_lessisi3 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) j : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).
-
-(* constant 6344 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t22 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).λj:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n)) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t21 x p f q n i m j) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).
-
-(* constant 6345 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t23 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_imp_th3 (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) m (λt:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_8289_t22 x p f q n i m t) : l_e_st_eq_landau_n_nis (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 6346 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t24 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_ore1 (l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t23 x p f q n i m) : l_e_st_eq_landau_n_less (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 6347 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t25 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_st_eq_landau_n_satz26 x (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t24 x p f q n i m) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) x).
-
-(* constant 6348 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_st_eq_landau_n_outn x (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t25 x p f q n i m) : l_e_st_eq_landau_n_1to x).
-
-(* constant 6349 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t26 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_st_eq_landau_n_isinoutn x (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t25 x p f q n i m) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m))).
-
-(* constant 6350 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t27 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_st_eq_landau_n_isoutni (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n) (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m)) (l_e_st_eq_landau_n_trlessis (l_e_st_eq_landau_n_rt_rp_r_c_inn x (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m)) x (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_1top x (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m)) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t9 x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t26 x p f q n i m) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8289_t9 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m))).
-
-(* constant 6351 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t28 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_tris (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_outn (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n1 x p f q n i m) (l_e_st_eq_landau_n_1top (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n)) (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8289_t9 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m)) (l_e_st_eq_landau_n_isoutinn (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) n) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t27 x p f q n i m) : l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8289_t9 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m))).
-
-(* constant 6352 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t29 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_isf (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) l_e_st_eq_landau_n_rt_rp_r_c_cx f n (l_e_st_eq_landau_n_left1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_8289_t9 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m)) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t28 x p f q n i m) : l_e_st_eq_landau_n_rt_rp_r_c_is (f n) (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m))).
-
-(* constant 6353 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t30 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m)) l_e_st_eq_landau_n_rt_rp_r_c_0c (f n) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t29 x p f q n i m) i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6354 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t31 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_somei (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_8289_n2 x p f q n i m) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t30 x p f q n i m) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)).
-
-(* constant 6355 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t32 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_iff_th4 (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (p (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t31 x p f q n i m) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)).
-
-(* constant 6356 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t34 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.λm:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).(l_e_st_eq_landau_n_rt_rp_r_c_satz221a (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t32 x p f q n i m) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6357 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t35 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_imp_th1 (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) l_e_st_eq_landau_n_rt_rp_r_c_0c) (λt:l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).l_e_st_eq_landau_n_rt_rp_r_c_8289_t20 x p f q n i t) (λt:l_not (l_e_is (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) n (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1))).l_e_st_eq_landau_n_rt_rp_r_c_8289_t34 x p f q n i t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6358 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t36 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.λn:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod x (l_e_st_eq_landau_n_rt_rp_r_c_8289_lf x p f)) (f (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)))) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_8289_t10 x p f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t35 x p f q n i) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6359 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t37 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.λq:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.(l_someapp (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) q (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).λu:l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_8289_t36 x p f q t u) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6360 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t38 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.λf:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_iffi (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f) (λt:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.l_e_st_eq_landau_n_rt_rp_r_c_8289_t17 x p f t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f.l_e_st_eq_landau_n_rt_rp_r_c_8289_t37 x p f t) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop3 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) f).
-
-(* constant 6361 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t39 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.(λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_8289_t38 x p u : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1)).
-
-(* constant 6362 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t40 ≝ λx:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 x.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 t) (l_e_st_eq_landau_n_pl x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_suc x) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t39 x p) (l_e_st_eq_landau_n_satz4a x) : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 (l_e_st_eq_landau_n_suc x)).
-
-(* constant 6363 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz289 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 t) l_e_st_eq_landau_n_rt_rp_r_c_8289_t8 (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_rp_r_c_8289_prop4 t.l_e_st_eq_landau_n_rt_rp_r_c_8289_t40 t u) x f : l_iff (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x f) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_some (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c))).
-
-(* constant 6364 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz289a ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x f) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_iff_th3 (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 x f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 x f) (l_e_st_eq_landau_n_rt_rp_r_c_satz289 x f) i : l_some (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c)).
-
-(* constant 6365 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_8289_t41 ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_somei (l_e_st_eq_landau_n_1to x) (λt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_is (f t) l_e_st_eq_landau_n_rt_rp_r_c_0c) n i : l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 x f).
-
-(* constant 6366 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz289b ≝ λx:l_e_st_eq_landau_n_nat.λf:Πt:l_e_st_eq_landau_n_1to x.l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_1to x.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (f n) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_iff_th4 (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop1 x f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_prop2 x f) (l_e_st_eq_landau_n_rt_rp_r_c_satz289 x f) (l_e_st_eq_landau_n_rt_rp_r_c_8289_t41 x f n i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod x f) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6367 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_posintnatrl m p mi : l_e_st_eq_landau_n_rt_rp_r_natrl m).
-
-(* constant 6368 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_ntofrl m (l_e_st_eq_landau_n_rt_rp_r_c_v9_t1 x m mi o p) : l_e_st_eq_landau_n_nat).
-
-(* constant 6369 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).x) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6370 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.λnp:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi1 ox mp : l_e_st_eq_landau_n_nat).
-
-(* constant 6371 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.λnp:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 y n ni1 oy np : l_e_st_eq_landau_n_nat).
-
-(* constant 6372 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.λnp:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_isrlent m (l_e_st_eq_landau_n_rt_rp_r_c_v9_t1 x m mi1 ox mp) n (l_e_st_eq_landau_n_rt_rp_r_c_v9_t1 y n ni1 oy np) j : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np)).
-
-(* constant 6373 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.λnp:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t2 x y m n i j mi1 ni1 ox oy mp np) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np)).
-
-(* constant 6374 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.λnp:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_c_issmpr (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np).y) (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t2 x y m n i j mi1 ni1 ox oy mp np) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t3 x y m n i j mi1 ni1 ox oy mp np) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np).y))) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 y n ni1 oy np)).
-
-(* constant 6375 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.λnp:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_fisi (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np)) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np).x) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t3 x y m n i j mi1 ni1 ox oy mp np) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np).y)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np).i) : l_e_is (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np).l_e_st_eq_landau_n_rt_rp_r_c_cx) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np).x) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t3 x y m n i j mi1 ni1 ox oy mp np) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np).y))).
-
-(* constant 6376 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.λnp:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_isf (Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np).l_e_st_eq_landau_n_rt_rp_r_c_cx) l_e_st_eq_landau_n_rt_rp_r_c_cx (λu:Πt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np).l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) u) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np).x) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t3 x y m n i j mi1 ni1 ox oy mp np) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np).y)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t5 x y m n i j mi1 ni1 ox oy mp np) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi1 ox mp) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t3 x y m n i j mi1 ni1 ox oy mp np) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np).y)))).
-
-(* constant 6377 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.λnp:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi1 ox mp) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_m0 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t3 x y m n i j mi1 ni1 ox oy mp np) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_n0 x y m n i j mi1 ni1 ox oy mp np).y))) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 y n ni1 oy np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t6 x y m n i j mi1 ni1 ox oy mp np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t4 x y m n i j mi1 ni1 ox oy mp np) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi1 ox mp) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 y n ni1 oy np)).
-
-(* constant 6378 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.λp1:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t7 x x m m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real m) mi mi o o p p1 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o p) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o p1)).
-
-(* constant 6379 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_some_th5 (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).l_e_st_eq_landau_n_rt_rp_r_c_is ((λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).x) t) l_e_st_eq_landau_n_rt_rp_r_c_0c) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).n) : l_not (l_some (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).l_e_st_eq_landau_n_rt_rp_r_c_is ((λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).x) t) l_e_st_eq_landau_n_rt_rp_r_c_0c))).
-
-(* constant 6380 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o p) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_some (l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).l_e_st_eq_landau_n_rt_rp_r_c_is ((λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).x) t) l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t9 x m mi o p n) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o p) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_satz289a (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p) (λu:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_v9_m1 x m mi o p).x) t) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o p) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6381 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_st_eq_landau_n_rt_rp_r_intabs m mi : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_abs m)).
-
-(* constant 6382 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_satz166b m n : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m)).
-
-(* constant 6383 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6384 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m) o (l_e_st_eq_landau_n_rt_rp_r_nnotp m n) : l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6385 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t15 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t10 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t14 x m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6386 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t15 x m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6387 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_pwm ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi1) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi1 ox nm) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi1 ox nm) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6388 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_pwn ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 y (l_e_st_eq_landau_n_rt_rp_r_abs n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 y n ni1) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 y n ni1 oy nn) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 y n ni1 oy nn) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6389 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t16 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t7 x y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_abs n) i (l_e_st_eq_landau_n_rt_rp_r_isabs m n j) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi1) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 y n ni1) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi1 ox nm) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 y n ni1 oy nn) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi1 ox nm) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 y n ni1 oy nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pwm x y m n i j mi1 ni1 ox oy nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pwn x y m n i j mi1 ni1 ox oy nm nn)).
-
-(* constant 6390 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t17 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_isov2 (l_e_st_eq_landau_n_rt_rp_r_c_v9_pwm x y m n i j mi1 ni1 ox oy nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pwn x y m n i j mi1 ni1 ox oy nm nn) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_v9_t16 x y m n i j mi1 ni1 ox oy nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t15 x m mi1 ox nm) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t15 y n ni1 oy nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi1 ox nm) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 y n ni1 oy nn)).
-
-(* constant 6391 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t18 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.λn1:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t17 x x m m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real m) mi mi o o n n1 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o n1)).
-
-(* constant 6392 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_r_ite (l_e_st_eq_landau_n_rt_rp_r_neg m) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).l_e_st_eq_landau_n_rt_rp_r_c_1c) (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.λu:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_v9_t18 x m mi o t u) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_1c) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6393 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t19 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_r_itet (l_e_st_eq_landau_n_rt_rp_r_neg m) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).l_e_st_eq_landau_n_rt_rp_r_c_1c) (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.λu:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_v9_t18 x m mi o t u) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_1c) n : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o n)).
-
-(* constant 6394 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t20 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λnn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).(l_r_itef (l_e_st_eq_landau_n_rt_rp_r_neg m) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).l_e_st_eq_landau_n_rt_rp_r_c_1c) (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.λu:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_v9_t18 x m mi o t u) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_1c) nn : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6395 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t21 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_neg t) m n nm j : l_e_st_eq_landau_n_rt_rp_r_neg n).
-
-(* constant 6396 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t22 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t19 x m mi1 ox nm : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi1 ox nm)).
-
-(* constant 6397 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t23 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t21 x y m n i j mi1 ni1 ox oy nm)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t19 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t21 x y m n i j mi1 ni1 ox oy nm)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t21 x y m n i j mi1 ni1 ox oy nm)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy)).
-
-(* constant 6398 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t24 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi1 ox nm) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t21 x y m n i j mi1 ni1 ox oy nm)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t22 x y m n i j mi1 ni1 ox oy nm) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t17 x y m n i j mi1 ni1 ox oy nm (l_e_st_eq_landau_n_rt_rp_r_c_v9_t21 x y m n i j mi1 ni1 ox oy nm)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t23 x y m n i j mi1 ni1 ox oy nm) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy)).
-
-(* constant 6399 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t25 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_not (l_e_st_eq_landau_n_rt_rp_r_neg t)) m n nn j : l_not (l_e_st_eq_landau_n_rt_rp_r_neg n)).
-
-(* constant 6400 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t26 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).(l_e_st_eq_landau_n_rt_rp_r_c_v9_t20 x m mi1 ox nn : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6401 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t27 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).(l_e_st_eq_landau_n_rt_rp_r_c_v9_t20 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t25 x y m n i j mi1 ni1 ox oy nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6402 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t28 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnn:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_v9_t26 x y m n i j mi1 ni1 ox oy nn) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t27 x y m n i j mi1 ni1 ox oy nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy)).
-
-(* constant 6403 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t29 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_neg m) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy)) (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_v9_t24 x y m n i j mi1 ni1 ox oy t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_neg m).l_e_st_eq_landau_n_rt_rp_r_c_v9_t28 x y m n i j mi1 ni1 ox oy t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy)).
-
-(* constant 6404 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_pw ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_r_ite (l_e_st_eq_landau_n_rt_rp_r_pos m) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o) (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.λu:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_v9_t8 x m mi o t u) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o)) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6405 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t30 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_r_itet (l_e_st_eq_landau_n_rt_rp_r_pos m) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o) (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.λu:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_v9_t8 x m mi o t u) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o)) p : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o p)).
-
-(* constant 6406 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t31 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_r_itef (l_e_st_eq_landau_n_rt_rp_r_pos m) l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o) (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.λu:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_v9_t8 x m mi o t u) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).λu:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o)) n : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o)).
-
-(* constant 6407 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t32 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_v9_t31 x m mi o (l_e_st_eq_landau_n_rt_rp_r_0notp m i)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t20 x m mi o (l_e_st_eq_landau_n_rt_rp_r_0notn m i)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6408 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t33 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t31 x m mi o (l_e_st_eq_landau_n_rt_rp_r_nnotp m n)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t19 x m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o n)).
-
-(* constant 6409 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_posexp ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t30 x m mi o p : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_ntofrl m (l_e_st_eq_landau_n_rt_rp_r_posintnatrl m p mi)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_ntofrl m (l_e_st_eq_landau_n_rt_rp_r_posintnatrl m p mi)).x))).
-
-(* constant 6410 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_notis_th2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi o p) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t10 x m mi o p n) (l_e_st_eq_landau_n_rt_rp_r_c_posexp x m mi o p) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6411 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_0exp ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t32 x m mi o i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6412 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t14 x m mi o n : l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6413 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6414 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t34 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t30 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n))).
-
-(* constant 6415 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t35 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_isov2 (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_v9_t34 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t14 x m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t15 x m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t11 x m mi) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t13 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t12 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t14 x m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o n)).
-
-(* constant 6416 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_negexp ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_intabs m mi) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_intabs m mi) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_satz166b m n) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw2 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t33 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t35 x m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_intabs m mi) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_intabs m mi) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x m mi o n) (l_e_st_eq_landau_n_rt_rp_r_satz166b m n) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x m mi o n)))).
-
-(* constant 6417 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t36 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_pos t) m n mp j : l_e_st_eq_landau_n_rt_rp_r_pos n).
-
-(* constant 6418 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t37 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_c_v9_t30 x m mi1 ox mp : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi1 ox mp)).
-
-(* constant 6419 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t38 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t36 x y m n i j mi1 ni1 ox oy mp)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t30 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t36 x y m n i j mi1 ni1 ox oy mp)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t36 x y m n i j mi1 ni1 ox oy mp)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy)).
-
-(* constant 6420 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t39 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λmp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 x m mi1 ox mp) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw1 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t36 x y m n i j mi1 ni1 ox oy mp)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t37 x y m n i j mi1 ni1 ox oy mp) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t7 x y m n i j mi1 ni1 ox oy mp (l_e_st_eq_landau_n_rt_rp_r_c_v9_t36 x y m n i j mi1 ni1 ox oy mp)) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t38 x y m n i j mi1 ni1 ox oy mp) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy)).
-
-(* constant 6421 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t40 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnp:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_not (l_e_st_eq_landau_n_rt_rp_r_pos t)) m n np j : l_not (l_e_st_eq_landau_n_rt_rp_r_pos n)).
-
-(* constant 6422 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t41 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnp:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_e_st_eq_landau_n_rt_rp_r_c_v9_t31 x m mi1 ox np : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox)).
-
-(* constant 6423 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t42 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnp:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t31 y n ni1 oy (l_e_st_eq_landau_n_rt_rp_r_c_v9_t40 x y m n i j mi1 ni1 ox oy np)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy)).
-
-(* constant 6424 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v9_t43 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).λnp:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_v9_pw3 y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t41 x y m n i j mi1 ni1 ox oy np) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t29 x y m n i j mi1 ni1 ox oy) (l_e_st_eq_landau_n_rt_rp_r_c_v9_t42 x y m n i j mi1 ni1 ox oy np) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy)).
-
-(* constant 6425 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ispw12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λj:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi1:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni1:l_e_st_eq_landau_n_rt_rp_r_intrl n.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy)) (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_v9_t39 x y m n i j mi1 ni1 ox oy t) (λt:l_not (l_e_st_eq_landau_n_rt_rp_r_pos m).l_e_st_eq_landau_n_rt_rp_r_c_v9_t43 x y m n i j mi1 ni1 ox oy t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi1 ox) (l_e_st_eq_landau_n_rt_rp_r_c_pw y n ni1 oy)).
-
-(* constant 6426 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ispw1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λox:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λoy:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_e_st_eq_landau_n_rt_rp_r_c_ispw12 x y m m i (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real m) mi mi ox oy : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi ox) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi oy)).
-
-(* constant 6427 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ispw2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is m n.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λom:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λon:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_c_ispw12 x x m n (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) i mi ni om on : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi om) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni on)).
-
-(* constant 6428 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9290_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x m mi o p n : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6429 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9290_t2 ≝ λi:l_e_st_eq_landau_n_rt_rp_r_c_is l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_re l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_re l_e_st_eq_landau_n_rt_rp_r_c_0c) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_isre l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_iscere l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c i) (l_e_st_eq_landau_n_rt_rp_r_c_reis l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6430 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_1not0 ≝ (l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_c_is l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_is l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pnot0 l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_pos1) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_9290_t2 t) : l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6431 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9290_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_notis_th2 l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_1not0 (l_e_st_eq_landau_n_rt_rp_r_c_0exp x m mi o i) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6432 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_intabs m mi) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x m mi o nm) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6433 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9290_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_intabs m mi) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x m mi o nm) (l_e_st_eq_landau_n_rt_rp_r_satz166b m nm) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x m mi o nm) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6434 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9290_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm) (l_e_st_eq_landau_n_rt_rp_r_c_9290_t5 x m mi o n nm)) (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm) (l_e_st_eq_landau_n_rt_rp_r_c_9290_t5 x m mi o n nm)) (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm) (l_e_st_eq_landau_n_rt_rp_r_c_negexp x m mi o nm)) (l_e_st_eq_landau_n_rt_rp_r_c_satz229e l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm) (l_e_st_eq_landau_n_rt_rp_r_c_9290_t5 x m mi o n nm)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm)) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6435 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9290_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_notis_th2 l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm)) l_e_st_eq_landau_n_rt_rp_r_c_1not0 (l_e_st_eq_landau_n_rt_rp_r_c_9290_t6 x m mi o n nm) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6436 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9290_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm)) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_9290_t7 x m mi o n nm) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_satz221a (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_9290_p0 x m mi o n nm) t) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6437 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz290 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_rapp m (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c) (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_9290_t1 x m mi o n t) (λt:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_9290_t4 x m mi o n t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_9290_t8 x m mi o n t) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6438 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma291 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_1rl) l_e_st_eq_landau_n_rt_rp_r_pos1 : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_1rl)).
-
-(* constant 6439 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9291_1a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_ntofrl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_posintnatrl l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_pos1 l_e_st_eq_landau_n_rt_rp_r_intrl1) : l_e_st_eq_landau_n_nat).
-
-(* constant 6440 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9291_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_posexp x l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 x) l_e_st_eq_landau_n_rt_rp_r_pos1 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 x)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x))).
-
-(* constant 6441 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9291_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_ntofrl l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_natrl1) (l_e_st_eq_landau_n_rt_rp_r_ntofrl l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_posintnatrl l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_pos1 l_e_st_eq_landau_n_rt_rp_r_intrl1)) (l_e_st_eq_landau_n_rt_rp_r_isntrl1 l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_isrlent l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_natrl1 l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_posintnatrl l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_pos1 l_e_st_eq_landau_n_rt_rp_r_intrl1) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_1rl)) : l_e_st_eq_landau_n_is l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x)).
-
-(* constant 6442 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9291_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_lessisi2 l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) (l_e_st_eq_landau_n_rt_rp_r_c_9291_t2 x) : l_e_st_eq_landau_n_lessis l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x)).
-
-(* constant 6443 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9291_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_issmpr (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_9291_t2 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_9291_t3 x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x))) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x))).
-
-(* constant 6444 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9291_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_st_eq_landau_n_rt_rp_r_c_satz277 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_9291_t3 x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_9291_t3 x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x))) x).
-
-(* constant 6445 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9291_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris1 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x)) x (l_e_st_eq_landau_n_rt_rp_r_c_prod l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) l_e_st_eq_landau_n_1 (l_e_st_eq_landau_n_rt_rp_r_c_9291_t3 x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x))) (l_e_st_eq_landau_n_rt_rp_r_c_9291_t4 x) (l_e_st_eq_landau_n_rt_rp_r_c_9291_t5 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x)) x).
-
-(* constant 6446 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz291 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 x)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9291_1a x).x)) x (l_e_st_eq_landau_n_rt_rp_r_c_9291_t1 x) (l_e_st_eq_landau_n_rt_rp_r_c_9291_t6 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 x)) x).
-
-(* constant 6447 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c).(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) a : l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6448 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) a : l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6449 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c).(l_e_st_eq_landau_n_rt_rp_r_c_satz221d x y (l_e_st_eq_landau_n_rt_rp_r_c_9292_t1 x y m mi o a) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t2 x y m mi o a) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6450 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma292a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_or_th7 (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) o (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c).l_e_st_eq_landau_n_rt_rp_r_c_9292_t1 x y m mi o t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6451 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma292b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_or_th7 (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) o (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c).l_e_st_eq_landau_n_rt_rp_r_c_9292_t2 x y m mi o t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6452 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma292c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_or_th7 (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c) o (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c).l_e_st_eq_landau_n_rt_rp_r_c_9292_t3 x y m mi o t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6453 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_nr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_rlofnt n : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6454 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_natintrl (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natrli n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n)).
-
-(* constant 6455 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n)) (l_e_st_eq_landau_n_rt_rp_r_natpos (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natrli n)) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n))).
-
-(* constant 6456 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t4 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t5 x n) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6457 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 x)) x (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9292_t5 x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 x)) (l_e_st_eq_landau_n_rt_rp_r_c_satz291 x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x l_e_st_eq_landau_n_1) x).
-
-(* constant 6458 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_posintnatrl (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natpos (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natrli n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t4 x n)) : l_e_st_eq_landau_n_nat).
-
-(* constant 6459 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat n (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natrli n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n) (l_e_st_eq_landau_n_rt_rp_r_isntrl1 n) (l_e_st_eq_landau_n_rt_rp_r_isrlent (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natrli n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_posintnatrl (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natpos (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natrli n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t4 x n)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n))) : l_e_st_eq_landau_n_is n (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n)).
-
-(* constant 6460 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_lessisi2 n (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t7 x n) : l_e_st_eq_landau_n_lessis n (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n)).
-
-(* constant 6461 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_posexp x (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t4 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t5 x n) (l_e_st_eq_landau_n_rt_rp_r_natpos (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x n) (l_e_st_eq_landau_n_rt_rp_r_natrli n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n).x))).
-
-(* constant 6462 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_issmpr (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n).x) n (l_e_st_eq_landau_n_rt_rp_r_c_9292_t7 x n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod n (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n) n (l_e_st_eq_landau_n_rt_rp_r_c_9292_t8 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n).x))) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n).x))).
-
-(* constant 6463 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_prod n (λt:l_e_st_eq_landau_n_1to n.x)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n0 x n).x)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t9 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t10 x n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_prod n (λt:l_e_st_eq_landau_n_1to n.x))).
-
-(* constant 6464 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_pl n l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat).
-
-(* constant 6465 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_lessisi1 n (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n) (l_e_st_eq_landau_n_satz18a n l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_lessis n (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)).
-
-(* constant 6466 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_satz278 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) n (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n).x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n).x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod n (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n) n (l_e_st_eq_landau_n_rt_rp_r_c_9292_t12 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n).x))) x)).
-
-(* constant 6467 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_prod n (λt:l_e_st_eq_landau_n_1to n.x)) x (l_e_st_eq_landau_n_rt_rp_r_c_9292_t11 x n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod n (λt:l_e_st_eq_landau_n_1to n.x)) x)).
-
-(* constant 6468 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t15 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n).x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod n (λt:l_e_st_eq_landau_n_1to n.x)) x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t13 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t14 x n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n).x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x)).
-
-(* constant 6469 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t16 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λn:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n).x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t11 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t15 x n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x)).
-
-(* constant 6470 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) : Prop).
-
-(* constant 6471 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t17 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x l_e_st_eq_landau_n_1) x (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y l_e_st_eq_landau_n_1) y (l_e_st_eq_landau_n_rt_rp_r_c_9292_t6 x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t6 y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)).
-
-(* constant 6472 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t18 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t6 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t17 x y) : l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y l_e_st_eq_landau_n_1).
-
-(* constant 6473 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t19 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y n.(l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) p : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y))).
-
-(* constant 6474 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t20 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts x (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_comts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) x)) (l_e_st_eq_landau_n_rt_rp_r_c_assts2 (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n))).
-
-(* constant 6475 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t21 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) x) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) y) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) y)) (l_e_st_eq_landau_n_rt_rp_r_c_assts2 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) x y) (l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) y (l_e_st_eq_landau_n_rt_rp_r_c_9292_t20 x y n p)) (l_e_st_eq_landau_n_rt_rp_r_c_assts1 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) y) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) y))).
-
-(* constant 6476 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t22 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts x y)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) y)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t16 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t19 x y n p) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t21 x y n p) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) y))).
-
-(* constant 6477 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t23 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y n.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t16 x n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t16 y n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) y))).
-
-(* constant 6478 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t24 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y n.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x n) x) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y n) y)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t22 x y n p) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t23 x y n p) : l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n)).
-
-(* constant 6479 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t25 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y n.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y t) (l_e_st_eq_landau_n_rt_rp_r_c_9292_n1 x n) (l_e_st_eq_landau_n_suc n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t24 x y n p) (l_e_st_eq_landau_n_satz4a n) : l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y (l_e_st_eq_landau_n_suc n)).
-
-(* constant 6480 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t26 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y t) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t18 x y) (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y t.l_e_st_eq_landau_n_rt_rp_r_c_9292_t25 x y t u) n : l_e_st_eq_landau_n_rt_rp_r_c_9292_prop1 x y n).
-
-(* constant 6481 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_prop2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) : Prop).
-
-(* constant 6482 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t28 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_posintnatrl m p mi : l_e_st_eq_landau_n_rt_rp_r_natrl m).
-
-(* constant 6483 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_ntofrl m (l_e_st_eq_landau_n_rt_rp_r_c_9292_t28 x y m mi o p) : l_e_st_eq_landau_n_nat).
-
-(* constant 6484 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t29 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_isrlnt1 m (l_e_st_eq_landau_n_rt_rp_r_c_9292_t28 x y m mi o p) : l_e_st_eq_landau_n_rt_rp_r_is m (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p))).
-
-(* constant 6485 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t30 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_isrlnt2 m (l_e_st_eq_landau_n_rt_rp_r_c_9292_t28 x y m mi o p) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) m).
-
-(* constant 6486 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t31 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t29 x y m mi o p) mi (l_e_st_eq_landau_n_rt_rp_r_c_9292_t4 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t5 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p))).
-
-(* constant 6487 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t32 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) m (l_e_st_eq_landau_n_rt_rp_r_c_9292_t30 x y m mi o p) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t4 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) mi (l_e_st_eq_landau_n_rt_rp_r_c_9292_t5 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw2 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_nr x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) m (l_e_st_eq_landau_n_rt_rp_r_c_9292_t30 x y m mi o p) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t4 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) mi (l_e_st_eq_landau_n_rt_rp_r_c_9292_t5 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o)))).
-
-(* constant 6488 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t33 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λp:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 x (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_p0 y (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t31 x y m mi o p) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t26 x y (l_e_st_eq_landau_n_rt_rp_r_c_9292_m0 x y m mi o p)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t32 x y m mi o p) : l_e_st_eq_landau_n_rt_rp_r_c_9292_prop2 x y m mi o).
-
-(* constant 6489 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t34 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_0exp x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o) i) (l_e_st_eq_landau_n_rt_rp_r_c_0exp y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o) i)) (l_e_st_eq_landau_n_rt_rp_r_c_satz222 l_e_st_eq_landau_n_rt_rp_r_c_1c) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6490 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t35 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_0exp (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o) i) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t34 x y m mi o i) : l_e_st_eq_landau_n_rt_rp_r_c_9292_prop2 x y m mi o).
-
-(* constant 6491 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_intabs m mi : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_abs m)).
-
-(* constant 6492 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t37 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_ori2 (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m)) (l_e_st_eq_landau_n_rt_rp_r_satz166b m n) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6493 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t38 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t37 x y m mi o n) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6494 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t39 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t37 x y m mi o n) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6495 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t40 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t37 x y m mi o n) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6496 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o) n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6497 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o) n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6498 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o) n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_abs m))).
-
-(* constant 6499 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t44 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs m)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t40 x y m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t40 x y m mi o n))).
-
-(* constant 6500 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t45 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_9292_t33 x y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t37 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_satz166b m n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t40 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t38 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t39 x y m mi o n)))).
-
-(* constant 6501 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t46 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t38 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t39 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs m)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t38 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw2 y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs m)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t39 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t38 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t39 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)))).
-
-(* constant 6502 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t47 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t40 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t38 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t39 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t44 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t45 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t46 x y m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)))).
-
-(* constant 6503 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t48 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_satz166b m n) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o) n) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6504 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t49 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_satz166b m n) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o) n) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6505 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t50 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_satz166b m n) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o) n) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6506 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_satz221d (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t48 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t49 x y m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6507 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t52 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_negexp (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o) n : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t50 x y m mi o n))).
-
-(* constant 6508 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t53 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_isov12 l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_satz222a l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t47 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t50 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 x y m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t50 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 x y m mi o n))).
-
-(* constant 6509 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t54 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t43 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t50 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t52 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t53 x y m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 x y m mi o n))).
-
-(* constant 6510 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t55 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t48 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t49 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_negexp x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o) n) (l_e_st_eq_landau_n_rt_rp_r_c_negexp y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o) n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t48 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t49 x y m mi o n)))).
-
-(* constant 6511 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t56 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_c_satz247 l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t48 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t49 x y m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t48 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t49 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 x y m mi o n))).
-
-(* constant 6512 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t57 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t48 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t49 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t55 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t56 x y m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 x y m mi o n))).
-
-(* constant 6513 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9292_t58 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).λn:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t41 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y (l_e_st_eq_landau_n_rt_rp_r_abs m) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t36 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t42 x y m mi o n))) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t51 x y m mi o n)) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t54 x y m mi o n) (l_e_st_eq_landau_n_rt_rp_r_c_9292_t57 x y m mi o n) : l_e_st_eq_landau_n_rt_rp_r_c_9292_prop2 x y m mi o).
-
-(* constant 6514 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz292 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis y l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m).(l_e_st_eq_landau_n_rt_rp_r_rapp m (l_e_st_eq_landau_n_rt_rp_r_c_9292_prop2 x y m mi o) (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_9292_t33 x y m mi o t) (λt:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_9292_t35 x y m mi o t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_9292_t58 x y m mi o t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts x y) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a x y m mi o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw y m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b x y m mi o)))).
-
-(* constant 6515 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma293 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m) l_e_st_eq_landau_n_rt_rp_r_c_1not0 : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6516 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_ori1 (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_andi (l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c) l_e_st_eq_landau_n_rt_rp_r_c_1not0 l_e_st_eq_landau_n_rt_rp_r_c_1not0) : l_or (l_and (l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_nis l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_0c)) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6517 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_1m ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma293 m) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6518 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_t2 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_st_eq_landau_n_rt_rp_r_c_satz222 (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi)).
-
-(* constant 6519 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_t3 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_st_eq_landau_n_rt_rp_r_c_ispw1 l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) m (l_e_st_eq_landau_n_rt_rp_r_c_satz222a l_e_st_eq_landau_n_rt_rp_r_c_1c) mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma293 m) (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi)))).
-
-(* constant 6520 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_t4 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_st_eq_landau_n_rt_rp_r_c_satz292 l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi))) (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi))))).
-
-(* constant 6521 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_t5 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi))) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi))) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_1c) mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma293 m)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx l_e_st_eq_landau_n_rt_rp_r_c_1c) mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma293 m)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi))) (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi)))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi))).
-
-(* constant 6522 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_t6 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292c l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292a l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi))) (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma292b l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_9293_t1 m mi)))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi)) (l_e_st_eq_landau_n_rt_rp_r_c_9293_t2 m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_t3 m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_t4 m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_t5 m mi) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi))).
-
-(* constant 6523 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_t7 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c)) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_disttm2 (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_satz213b (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi)) (l_e_st_eq_landau_n_rt_rp_r_c_9293_t6 m mi))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6524 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9293_t8 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_ore2 (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_satz221c (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_9293_t7 m mi)) (l_e_st_eq_landau_n_rt_rp_r_c_satz290 l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma293 m) l_e_st_eq_landau_n_rt_rp_r_c_1not0) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6525 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz293 ≝ λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.(l_e_st_eq_landau_n_rt_rp_r_c_satz213a (l_e_st_eq_landau_n_rt_rp_r_c_9293_1m m mi) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_9293_t8 m mi) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw l_e_st_eq_landau_n_rt_rp_r_c_1c m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma293 m)) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6526 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_ande1 (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n) a : l_e_st_eq_landau_n_rt_rp_r_pos m).
-
-(* constant 6527 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n) a : l_e_st_eq_landau_n_rt_rp_r_pos n).
-
-(* constant 6528 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_pospl m n (l_e_st_eq_landau_n_rt_rp_r_c_9294_t1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t2 x m n mi ni o a) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl m n)).
-
-(* constant 6529 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma294a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_or_th8 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)) (l_e_st_eq_landau_n_rt_rp_r_pos m) o (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).l_e_st_eq_landau_n_rt_rp_r_c_9294_t1 x m n mi ni o t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6530 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma294b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_or_th8 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)) (l_e_st_eq_landau_n_rt_rp_r_pos n) o (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).l_e_st_eq_landau_n_rt_rp_r_c_9294_t2 x m n mi ni o t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n)).
-
-(* constant 6531 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma294c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_or_th8 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl m n)) o (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).l_e_st_eq_landau_n_rt_rp_r_c_9294_t3 x m n mi ni o t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl m n))).
-
-(* constant 6532 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) : Prop).
-
-(* constant 6533 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_ntofrl m (l_e_st_eq_landau_n_rt_rp_r_posintnatrl m (l_e_st_eq_landau_n_rt_rp_r_c_9294_t1 x m n mi ni o a) mi) : l_e_st_eq_landau_n_nat).
-
-(* constant 6534 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_ntofrl n (l_e_st_eq_landau_n_rt_rp_r_posintnatrl n (l_e_st_eq_landau_n_rt_rp_r_c_9294_t2 x m n mi ni o a) ni) : l_e_st_eq_landau_n_nat).
-
-(* constant 6535 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a).x)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a).x)) (l_e_st_eq_landau_n_rt_rp_r_c_posexp x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_c_posexp x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t2 x m n mi ni o a)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a).x)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a).x)))).
-
-(* constant 6536 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_posintnatrl (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t3 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni)) : l_e_st_eq_landau_n_nat).
-
-(* constant 6537 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_c_posexp x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t3 x m n mi ni o a) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a).x))).
-
-(* constant 6538 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a))) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a))) (l_e_st_eq_landau_n_rt_rp_r_ispl12 m (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a)) n (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 m (l_e_st_eq_landau_n_rt_rp_r_posintnatrl m (l_e_st_eq_landau_n_rt_rp_r_c_9294_t1 x m n mi ni o a) mi)) (l_e_st_eq_landau_n_rt_rp_r_isrlnt1 n (l_e_st_eq_landau_n_rt_rp_r_posintnatrl n (l_e_st_eq_landau_n_rt_rp_r_c_9294_t2 x m n mi ni o a) ni))) (l_e_st_eq_landau_n_rt_rp_r_satzr155b (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)))).
-
-(* constant 6539 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_tris2 l_e_st_eq_landau_n_nat (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_ntofrl (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a))) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)))) (l_e_st_eq_landau_n_rt_rp_r_isntrl1 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a))) (l_e_st_eq_landau_n_rt_rp_r_isrlent (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_posintnatrl (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t3 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni)) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a))) (l_e_st_eq_landau_n_rt_rp_r_natrli (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t6 x m n mi ni o a)) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a)).
-
-(* constant 6540 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_lessisi2 (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t7 x m n mi ni o a) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a)).
-
-(* constant 6541 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_c_issmpr (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a).x) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t7 x m n mi ni o a) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t8 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a).x))) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a).x))).
-
-(* constant 6542 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)).x)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_p1 x m n mi ni o a).x)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t5 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t9 x m n mi ni o a) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)).x))).
-
-(* constant 6543 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_lessisi1 (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_satz18a (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) : l_e_st_eq_landau_n_lessis (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a))).
-
-(* constant 6544 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_c_satz281 (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.λu:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_ts t u) l_e_st_eq_landau_n_rt_rp_r_c_assocts (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)).x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)).x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_left l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t11 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)).x))) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a) (l_e_st_eq_landau_n_right l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)).x))))).
-
-(* constant 6545 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a)).x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a).x)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a).x))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t10 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t12 x m n mi ni o a) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a).x)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a).x)))).
-
-(* constant 6546 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_m1 x m n mi ni o a).x)) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9294_n1 x m n mi ni o a).x))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t4 x m n mi ni o a) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t13 x m n mi ni o a) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6547 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t15 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_ore1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)) o na : l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6548 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t16 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_or_th15 (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n) na : l_or (l_not (l_e_st_eq_landau_n_rt_rp_r_pos m)) (l_not (l_e_st_eq_landau_n_rt_rp_r_pos n))).
-
-(* constant 6549 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_am ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_abs m : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6550 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_an ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_abs n : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6551 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_ap ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_pl m n) : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6552 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_intabs m mi : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o)).
-
-(* constant 6553 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_intabs n ni : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)).
-
-(* constant 6554 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_intabs (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o)).
-
-(* constant 6555 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t20 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_andi (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_satz166e m (l_e_st_eq_landau_n_rt_rp_r_nnot0 m nm)) (l_e_st_eq_landau_n_rt_rp_r_satz166e n (l_e_st_eq_landau_n_rt_rp_r_nnot0 n nn)) : l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))).
-
-(* constant 6556 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t21 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t20 x m n mi ni o na nm nn) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)))).
-
-(* constant 6557 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) nm : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o))).
-
-(* constant 6558 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) nn : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))).
-
-(* constant 6559 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t24 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t21 x m n mi ni o na nm nn) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o))).
-
-(* constant 6560 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t25 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t21 x m n mi ni o na nm nn) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))).
-
-(* constant 6561 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t26 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t24 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t25 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t24 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t25 x m n mi ni o na nm nn)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t24 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t25 x m n mi ni o na nm nn)))).
-
-(* constant 6562 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t27 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t21 x m n mi ni o na nm nn) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)))).
-
-(* constant 6563 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t28 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_9294_t14 x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t21 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t20 x m n mi ni o na nm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t24 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t25 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t27 x m n mi ni o na nm nn))).
-
-(* constant 6564 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t29 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_m0 n)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl m n)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_ispl12 (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_m0 n) (l_e_st_eq_landau_n_rt_rp_r_absn m nm) (l_e_st_eq_landau_n_rt_rp_r_absn n nn)) (l_e_st_eq_landau_n_rt_rp_r_satz180a m n) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_pl m n)) (l_e_st_eq_landau_n_rt_rp_r_absn (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_negpl m n nm nn))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o)).
-
-(* constant 6565 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_negpl m n nm nn) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o))).
-
-(* constant 6566 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t31 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t29 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t27 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t27 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn))).
-
-(* constant 6567 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t32 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t24 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t25 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t27 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t26 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t28 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t31 x m n mi ni o na nm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn))).
-
-(* constant 6568 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t33 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_satz166b m nm) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) nm) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6569 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t34 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_satz166b n nn) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) nn) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6570 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t35 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_satz166b (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_negpl m n nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_negpl m n nm nn)) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6571 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t36 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t33 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t34 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_negexp x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) nm) (l_e_st_eq_landau_n_rt_rp_r_c_negexp x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t33 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t34 x m n mi ni o na nm nn)))).
-
-(* constant 6572 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t37 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_satz221d (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t33 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t34 x m n mi ni o na nm nn) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn))) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6573 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t38 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_satz247 l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t33 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t34 x m n mi ni o na nm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t33 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t34 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t37 x m n mi ni o na nm nn))).
-
-(* constant 6574 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t39 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_isov12 (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_satz222 l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t32 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t37 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t35 x m n mi ni o na nm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t37 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t35 x m n mi ni o na nm nn))).
-
-(* constant 6575 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t40 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t35 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_negexp x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_negpl m n nm nn)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t35 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o))).
-
-(* constant 6576 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t41 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t33 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t34 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_am x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t17 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t22 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t23 x m n mi ni o na nm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t37 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t30 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t35 x m n mi ni o na nm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t36 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t38 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t39 x m n mi ni o na nm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t40 x m n mi ni o na nm nn) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6577 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) nn : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))).
-
-(* constant 6578 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn) (l_e_st_eq_landau_n_rt_rp_r_satz166b n nn) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) nn) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6579 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t44 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ists2 (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_negexp x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)))).
-
-(* constant 6580 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t45 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_satz244a (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn))).
-
-(* constant 6581 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t46 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_isov1 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_satz222 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn))).
-
-(* constant 6582 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t47 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t44 x m n mi ni o na pm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t45 x m n mi ni o na pm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t46 x m n mi ni o na pm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn))).
-
-(* constant 6583 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t48 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_satz182d m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) casea : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))).
-
-(* constant 6584 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t49 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_satz166e n (l_e_st_eq_landau_n_rt_rp_r_nnot0 n nn) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)).
-
-(* constant 6585 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t50 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_andi (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t49 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t48 x m n mi ni o na pm nn casea) : l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)))).
-
-(* constant 6586 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t51 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t50 x m n mi ni o na pm nn casea) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))))).
-
-(* constant 6587 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_intmn m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))).
-
-(* constant 6588 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t51 x m n mi ni o na pm nn casea) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))).
-
-(* constant 6589 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t51 x m n mi ni o na pm nn casea) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)))).
-
-(* constant 6590 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t55 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t51 x m n mi ni o na pm nn casea) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))))).
-
-(* constant 6591 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t56 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)))).
-
-(* constant 6592 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t57 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_9294_t14 x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t51 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t50 x m n mi ni o na pm nn casea) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t56 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t55 x m n mi ni o na pm nn casea))).
-
-(* constant 6593 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t58 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_satz187a m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) m).
-
-(* constant 6594 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t59 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) m (l_e_st_eq_landau_n_rt_rp_r_c_9294_t58 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t56 x m n mi ni o na pm nn casea) mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t55 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t56 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t55 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o))).
-
-(* constant 6595 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t60 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t56 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t55 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t57 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t59 x m n mi ni o na pm nn casea) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o))).
-
-(* constant 6596 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t61 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn))).
-
-(* constant 6597 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t62 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_isp1 l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_nis t l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t61 x m n mi ni o na pm nn casea) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6598 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t63 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_isov12 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t60 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t61 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t62 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t62 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn))).
-
-(* constant 6599 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t64 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t62 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t47 x m n mi ni o na pm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t63 x m n mi ni o na pm nn casea) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t62 x m n mi ni o na pm nn casea))).
-
-(* constant 6600 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t65 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_satz229h (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t62 x m n mi ni o na pm nn casea) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea)))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t62 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))).
-
-(* constant 6601 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t66 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_m0 n)) (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_ismn2 (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_m0 n) m (l_e_st_eq_landau_n_rt_rp_r_absn n nn)) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 n)) n m (l_e_st_eq_landau_n_rt_rp_r_satz177 n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pl m n)).
-
-(* constant 6602 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t67 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t66 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o))).
-
-(* constant 6603 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t68 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasea:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t53 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t62 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t52 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t54 x m n mi ni o na pm nn casea)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t64 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t65 x m n mi ni o na pm nn casea) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t67 x m n mi ni o na pm nn casea) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6604 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t69 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcaseb:l_e_st_eq_landau_n_rt_rp_r_is m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) caseb mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn))).
-
-(* constant 6605 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t70 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcaseb:l_e_st_eq_landau_n_rt_rp_r_is m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_satz251a (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t69 x m n mi ni o na pm nn caseb) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6606 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t71 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcaseb:l_e_st_eq_landau_n_rt_rp_r_is m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_m0 n)) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ispl2 n (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 n)) m (l_e_st_eq_landau_n_rt_rp_r_satz177a n)) (l_e_st_eq_landau_n_rt_rp_r_ismn2 (l_e_st_eq_landau_n_rt_rp_r_m0 n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_m0 n) (l_e_st_eq_landau_n_rt_rp_r_absn n nn))) (l_e_st_eq_landau_n_rt_rp_r_satz182e m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) caseb) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl m n) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6607 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t72 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcaseb:l_e_st_eq_landau_n_rt_rp_r_is m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_0exp x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t71 x m n mi ni o na pm nn caseb)) : l_e_st_eq_landau_n_rt_rp_r_c_is l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o))).
-
-(* constant 6608 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t73 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcaseb:l_e_st_eq_landau_n_rt_rp_r_is m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t47 x m n mi ni o na pm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t70 x m n mi ni o na pm nn caseb) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t72 x m n mi ni o na pm nn caseb) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6609 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t74 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_satz182d (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m (l_e_st_eq_landau_n_rt_rp_r_lemma2 m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) casec) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)).
-
-(* constant 6610 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t75 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_andi (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)) pm (l_e_st_eq_landau_n_rt_rp_r_c_9294_t74 x m n mi ni o na pm nn casec) : l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m))).
-
-(* constant 6611 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t76 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t75 x m n mi ni o na pm nn casec) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)))).
-
-(* constant 6612 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_intmn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) m mi : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)).
-
-(* constant 6613 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t76 x m n mi ni o na pm nn casec) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6614 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t76 x m n mi ni o na pm nn casec) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m))).
-
-(* constant 6615 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t80 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t76 x m n mi ni o na pm nn casec) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)))).
-
-(* constant 6616 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t81 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_intpl m mi (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_pl m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m))).
-
-(* constant 6617 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t81a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_9294_t14 x m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t76 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t75 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t81 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t80 x m n mi ni o na pm nn casec))).
-
-(* constant 6618 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t82 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_satz187a (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)).
-
-(* constant 6619 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t83 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_pl m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t82 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t81 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t80 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t81 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t80 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn))).
-
-(* constant 6620 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t84 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t81 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t80 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t81a x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t83 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn))).
-
-(* constant 6621 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t85 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t15 x m n mi ni o na) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6622 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t86 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t15 x m n mi ni o na) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6623 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t87 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_satz221d (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t85 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t86 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6624 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t88 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_satz222 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec))).
-
-(* constant 6625 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t89 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o))).
-
-(* constant 6626 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t90 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t88 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t89 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o))).
-
-(* constant 6627 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t91 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_isov12 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t90 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t84 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t87 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t87 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn))).
-
-(* constant 6628 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t92 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t87 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t18 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t42 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t43 x m n mi ni o na pm nn)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t47 x m n mi ni o na pm nn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t91 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t87 x m n mi ni o na pm nn casec))).
-
-(* constant 6629 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t93 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_satz246a l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t86 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t85 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t87 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t86 x m n mi ni o na pm nn casec))).
-
-(* constant 6630 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t94 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_satz182f m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) casec : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))).
-
-(* constant 6631 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t94a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_m0 n)) (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_ismn2 (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_m0 n) m (l_e_st_eq_landau_n_rt_rp_r_absn n nn)) (l_e_st_eq_landau_n_rt_rp_r_ispl2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_m0 n)) n m (l_e_st_eq_landau_n_rt_rp_r_satz177 n)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pl m n)).
-
-(* constant 6632 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t95 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_satz181a (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_abs (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_absn (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t94 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_isabs (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t94a x m n mi ni o na pm nn casec)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o)).
-
-(* constant 6633 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t96 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_isp l_e_st_eq_landau_n_rt_rp_r_real (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_neg t) (l_e_st_eq_landau_n_rt_rp_r_mn m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t94 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t94a x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_pl m n)).
-
-(* constant 6634 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw3 x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t96 x m n mi ni o na pm nn casec) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o))).
-
-(* constant 6635 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t98 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_lemmapw1 x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_satz166b (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t96 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_lemmapw2 x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t96 x m n mi ni o na pm nn casec)) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6636 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t99 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t95 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec))).
-
-(* constant 6637 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t100 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_st_eq_landau_n_rt_rp_r_c_isov2 (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_9294_t99 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t86 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t98 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t86 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t98 x m n mi ni o na pm nn casec))).
-
-(* constant 6638 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t101 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t98 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_negexp x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t96 x m n mi ni o na pm nn casec)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t98 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o))).
-
-(* constant 6639 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t102 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.λcasec:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) l_e_st_eq_landau_n_rt_rp_r_c_1c) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t78 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec))) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t87 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o) m) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t77 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t79 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t86 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_c_9294_ap x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t19 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t97 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t98 x m n mi ni o na pm nn casec)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t92 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t93 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t100 x m n mi ni o na pm nn casec) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t101 x m n mi ni o na pm nn casec) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6640 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t103 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.λnn:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_or3app (l_e_st_eq_landau_n_rt_rp_r_is m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_satz167a m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o)) (λt:l_e_st_eq_landau_n_rt_rp_r_is m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).l_e_st_eq_landau_n_rt_rp_r_c_9294_t73 x m n mi ni o na pm nn t) (λt:l_e_st_eq_landau_n_rt_rp_r_more m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).l_e_st_eq_landau_n_rt_rp_r_c_9294_t68 x m n mi ni o na pm nn t) (λt:l_e_st_eq_landau_n_rt_rp_r_less m (l_e_st_eq_landau_n_rt_rp_r_c_9294_an x m n mi ni o).l_e_st_eq_landau_n_rt_rp_r_c_9294_t102 x m n mi ni o na pm nn t) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6641 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t104 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos n) (l_e_st_eq_landau_n_rt_rp_r_pos m)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t15 x m n mi ni o na) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos n) (l_e_st_eq_landau_n_rt_rp_r_pos m))).
-
-(* constant 6642 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t104a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_and_th5 (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n) na : l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos n) (l_e_st_eq_landau_n_rt_rp_r_pos m))).
-
-(* constant 6643 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x n m ni mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t104 x m n mi ni o na) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n)).
-
-(* constant 6644 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x n m ni mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t104 x m n mi ni o na) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6645 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t107 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x n m ni mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t104 x m n mi ni o na) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl n m))).
-
-(* constant 6646 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t108 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x n (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)))).
-
-(* constant 6647 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t109 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_comts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na)))).
-
-(* constant 6648 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t110 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λqn:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_c_9294_t103 x n m ni mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t104 x m n mi ni o na) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t104a x m n mi ni o na) qn nm : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl n m) (l_e_st_eq_landau_n_rt_rp_r_intpl n ni m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t107 x m n mi ni o na))).
-
-(* constant 6649 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t111 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_pl n m) (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_compl n m) (l_e_st_eq_landau_n_rt_rp_r_intpl n ni m mi) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t107 x m n mi ni o na) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl n m) (l_e_st_eq_landau_n_rt_rp_r_intpl n ni m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t107 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o))).
-
-(* constant 6650 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t112 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.λqn:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl n m) (l_e_st_eq_landau_n_rt_rp_r_intpl n ni m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t107 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t108 x m n mi ni o na) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t109 x m n mi ni o na) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t110 x m n mi ni o na nm qn) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t111 x m n mi ni o na) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6651 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t113 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_ists1 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_0exp x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)))).
-
-(* constant 6652 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t114 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_satz222b (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))).
-
-(* constant 6653 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t115 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl m n) n (l_e_st_eq_landau_n_rt_rp_r_pl01 m n i) : l_e_st_eq_landau_n_rt_rp_r_is n (l_e_st_eq_landau_n_rt_rp_r_pl m n)).
-
-(* constant 6654 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t116 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x n (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t115 x m n mi ni o na i) ni (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o))).
-
-(* constant 6655 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t117 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t113 x m n mi ni o na i) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t114 x m n mi ni o na i) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t116 x m n mi ni o na i) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6656 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t118 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_9294_t117 x n m ni mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t104 x m n mi ni o na) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t104a x m n mi ni o na) i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl n m) (l_e_st_eq_landau_n_rt_rp_r_intpl n ni m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t107 x m n mi ni o na))).
-
-(* constant 6657 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t119 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9294_t105 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9294_t106 x m n mi ni o na))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl n m) (l_e_st_eq_landau_n_rt_rp_r_intpl n ni m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t107 x m n mi ni o na)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t108 x m n mi ni o na) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t109 x m n mi ni o na) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t118 x m n mi ni o na i) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t111 x m n mi ni o na) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6658 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t120 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_ore2 (l_not (l_e_st_eq_landau_n_rt_rp_r_pos m)) (l_not (l_e_st_eq_landau_n_rt_rp_r_pos n)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t16 x m n mi ni o na) (l_weli (l_e_st_eq_landau_n_rt_rp_r_pos m) pm) : l_not (l_e_st_eq_landau_n_rt_rp_r_pos n)).
-
-(* constant 6659 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t121 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λpm:l_e_st_eq_landau_n_rt_rp_r_pos m.(l_e_st_eq_landau_n_rt_rp_r_rapp n (l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o) (l_imp_th2 (l_e_st_eq_landau_n_rt_rp_r_pos n) (l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9294_t120 x m n mi ni o na pm)) (λt:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_9294_t119 x m n mi ni o na t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg n.l_e_st_eq_landau_n_rt_rp_r_c_9294_t103 x m n mi ni o na pm t) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6660 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t122 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λnm:l_e_st_eq_landau_n_rt_rp_r_neg m.(l_e_st_eq_landau_n_rt_rp_r_rapp n (l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o) (λt:l_e_st_eq_landau_n_rt_rp_r_pos n.l_e_st_eq_landau_n_rt_rp_r_c_9294_t112 x m n mi ni o na nm t) (λt:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_9294_t119 x m n mi ni o na t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg n.l_e_st_eq_landau_n_rt_rp_r_c_9294_t41 x m n mi ni o na nm t) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6661 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9294_t123 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λna:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_rapp m (l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o) (λt:l_e_st_eq_landau_n_rt_rp_r_pos m.l_e_st_eq_landau_n_rt_rp_r_c_9294_t121 x m n mi ni o na t) (λt:l_e_st_eq_landau_n_rt_rp_r_is m l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_9294_t117 x m n mi ni o na t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg m.l_e_st_eq_landau_n_rt_rp_r_c_9294_t122 x m n mi ni o na t) : l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o).
-
-(* constant 6662 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz294 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_imp_th1 (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)) (l_e_st_eq_landau_n_rt_rp_r_c_9294_prop1 x m n mi ni o) (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).l_e_st_eq_landau_n_rt_rp_r_c_9294_t14 x m n mi ni o t) (λt:l_not (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).l_e_st_eq_landau_n_rt_rp_r_c_9294_t123 x m n mi ni o t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl m n) (l_e_st_eq_landau_n_rt_rp_r_intpl m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x m n mi ni o))).
-
-(* constant 6663 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma295a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m) o : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6664 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma295b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n) o : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n)).
-
-(* constant 6665 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma295c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m n)) o : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m n))).
-
-(* constant 6666 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m n)) (l_e_st_eq_landau_n_rt_rp_r_pos n)) o : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m n)) (l_e_st_eq_landau_n_rt_rp_r_pos n))).
-
-(* constant 6667 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_intmn m mi n ni : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_mn m n)).
-
-(* constant 6668 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x (l_e_st_eq_landau_n_rt_rp_r_mn m n) n (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) ni (l_e_st_eq_landau_n_rt_rp_r_c_9295_t1 x m n mi ni o) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn m n))).
-
-(* constant 6669 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x (l_e_st_eq_landau_n_rt_rp_r_mn m n) n (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) ni (l_e_st_eq_landau_n_rt_rp_r_c_9295_t1 x m n mi ni o) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n)).
-
-(* constant 6670 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x (l_e_st_eq_landau_n_rt_rp_r_mn m n) n (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) ni (l_e_st_eq_landau_n_rt_rp_r_c_9295_t1 x m n mi ni o) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn m n) n))).
-
-(* constant 6671 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma295c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t3 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9295_t4 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma295c x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t3 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x n (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t4 x m n mi ni o)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma295c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t3 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9295_t4 x m n mi ni o)))).
-
-(* constant 6672 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz294 x (l_e_st_eq_landau_n_rt_rp_r_mn m n) n (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) ni (l_e_st_eq_landau_n_rt_rp_r_c_9295_t1 x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t3 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9295_t4 x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn m n) n) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) n ni) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t5 x m n mi ni o))).
-
-(* constant 6673 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_plmn m n : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn m n) n) m).
-
-(* constant 6674 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn m n) n) m (l_e_st_eq_landau_n_rt_rp_r_c_9295_t8 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) n ni) mi (l_e_st_eq_landau_n_rt_rp_r_c_9295_t5 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma295a x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn m n) n) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) n ni) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t5 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma295a x m n mi ni o))).
-
-(* constant 6675 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma295c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t3 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_9295_t4 x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_mn m n) n) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) n ni) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t5 x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma295a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t6 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t7 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t9 x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma295c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma295a x m n mi ni o))).
-
-(* constant 6676 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9295_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o) o : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6677 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz295 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz229k (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma295a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t2 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_lemma295c x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t11 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9295_t10 x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma295a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_satz290 x n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x m n mi ni o) o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn m n) (l_e_st_eq_landau_n_rt_rp_r_intmn m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma295c x m n mi ni o))).
-
-(* constant 6678 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma296 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m) n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6679 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_intrli0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_intrl l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6680 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma295a x l_e_st_eq_landau_n_rt_rp_r_0 m (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) mi n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6681 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma295b x l_e_st_eq_landau_n_rt_rp_r_0 m (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) mi n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6682 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma295c x l_e_st_eq_landau_n_rt_rp_r_0 m (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) mi n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 m))).
-
-(* constant 6683 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n) n : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6684 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 x m mi n) n : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 x m mi n)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6685 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t2 x m mi n)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_0exp x l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t2 x m mi n) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_c_is l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t2 x m mi n))).
-
-(* constant 6686 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 x m mi n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 x m mi n))).
-
-(* constant 6687 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_isov12 l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t2 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t7 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t8 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t5 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t6 x m mi n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t5 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t2 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t6 x m mi n))).
-
-(* constant 6688 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz295 x l_e_st_eq_landau_n_rt_rp_r_0 m (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) mi n : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t2 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t6 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 m) (l_e_st_eq_landau_n_rt_rp_r_intmn l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t4 x m mi n))).
-
-(* constant 6689 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 m) (l_e_st_eq_landau_n_rt_rp_r_m0 m)).
-
-(* constant 6690 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_intm0 m mi) n : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 m))).
-
-(* constant 6691 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 m) (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t11 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_intmn l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) m mi) (l_e_st_eq_landau_n_rt_rp_r_intm0 m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t4 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t12 x m mi n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 m) (l_e_st_eq_landau_n_rt_rp_r_intmn l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t4 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_intm0 m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t12 x m mi n))).
-
-(* constant 6692 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9296_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t5 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pw x l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t2 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9296_t3 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t6 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 m) (l_e_st_eq_landau_n_rt_rp_r_intmn l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_9296_t1 x m mi n) m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t4 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_intm0 m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t12 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t9 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t10 x m mi n) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t13 x m mi n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t5 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_intm0 m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9296_t12 x m mi n))).
-
-(* constant 6693 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz296 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λn:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_9296_t14 x m mi n : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n)) (l_e_st_eq_landau_n_rt_rp_r_c_satz290 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x m mi n) n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_intm0 m mi) (l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x (l_e_st_eq_landau_n_rt_rp_r_m0 m) (l_e_st_eq_landau_n_rt_rp_r_intm0 m mi) n))).
-
-(* constant 6694 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) p : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6695 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_ande2 (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n) a : l_e_st_eq_landau_n_rt_rp_r_pos n).
-
-(* constant 6696 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t3 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λa:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).(l_e_st_eq_landau_n_rt_rp_r_postspp m n (l_ande1 (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n) a) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t2 x m n mi ni o a) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m n)).
-
-(* constant 6697 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma297a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_or_th9 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)) (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n) o (λt:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_9297_t1 x m n mi ni o t) (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).l_e_st_eq_landau_n_rt_rp_r_c_9297_t2 x m n mi ni o t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos n)).
-
-(* constant 6698 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma297b ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_or_th8 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m n)) o (λt:l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n).l_e_st_eq_landau_n_rt_rp_r_c_9297_t3 x m n mi ni o t) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m n))).
-
-(* constant 6699 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t4 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ore2 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m) o (l_weli (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) i) : l_e_st_eq_landau_n_rt_rp_r_pos m).
-
-(* constant 6700 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_ntofrl m (l_e_st_eq_landau_n_rt_rp_r_posintnatrl m (l_e_st_eq_landau_n_rt_rp_r_c_9297_t4 x m mi o i) mi) : l_e_st_eq_landau_n_nat).
-
-(* constant 6701 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t5 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_posexp x m mi o (l_e_st_eq_landau_n_rt_rp_r_c_9297_t4 x m mi o i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i).x))).
-
-(* constant 6702 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t6 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz289b (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i).x) (l_e_st_eq_landau_n_xout (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i)) i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i).x)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6703 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t7 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) (l_e_st_eq_landau_n_rt_rp_r_c_prod (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i) (λt:l_e_st_eq_landau_n_1to (l_e_st_eq_landau_n_rt_rp_r_c_9297_m1 x m mi o i).x)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_9297_t5 x m mi o i) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t6 x m mi o i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6704 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_pw0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_9297_t7 x m mi o i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi o) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6705 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.(l_e_st_eq_landau_n_rt_rp_r_intts m mi n ni : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_ts m n)).
-
-(* constant 6706 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_prop1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o)) : Prop).
-
-(* constant 6707 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t9 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_pw0 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6708 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t10 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_pw0 (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t9 x m n mi ni o i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6709 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t11 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_pw0 x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o) i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6710 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t12 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λi:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_0c (l_e_st_eq_landau_n_rt_rp_r_c_9297_t10 x m n mi ni o i) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t11 x m n mi ni o i) : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop1 x m n mi ni o).
-
-(* constant 6711 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t13 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m) p : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6712 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t13 x m mi p) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6713 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_nr ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_rlofnt n : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6714 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_natintrl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_natrli n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)).
-
-(* constant 6715 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.(l_ori2 (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_natpos (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_natrli n)) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n))).
-
-(* constant 6716 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n))) p : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)))).
-
-(* constant 6717 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_intts m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n))).
-
-(* constant 6718 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p n)) : Prop).
-
-(* constant 6719 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t18 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_ispw1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p)) l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p)))).
-
-(* constant 6720 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t19 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_satz291 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p)).
-
-(* constant 6721 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t20 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x m (l_e_st_eq_landau_n_rt_rp_r_ts m l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_satz195a m) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t13 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p l_e_st_eq_landau_n_1) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p l_e_st_eq_landau_n_1))).
-
-(* constant 6722 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t21 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p l_e_st_eq_landau_n_1)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t18 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t19 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t20 x m mi p) : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p l_e_st_eq_landau_n_1).
-
-(* constant 6723 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_pl n l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_nat).
-
-(* constant 6724 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t22 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t13 x m mi p) p : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6725 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t23 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t22 x m mi p n p2) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_1rl))).
-
-(* constant 6726 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294a (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t23 x m mi p n p2) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n))).
-
-(* constant 6727 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294b (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t23 x m mi p n p2) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos l_e_st_eq_landau_n_rt_rp_r_1rl)).
-
-(* constant 6728 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t26 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294c (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t23 x m mi p n p2) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl))).
-
-(* constant 6729 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t27 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_satzr155a n l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t26 x m mi p n p2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t26 x m mi p n p2))).
-
-(* constant 6730 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t27a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_satz294 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t23 x m mi p n p2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t26 x m mi p n p2))).
-
-(* constant 6731 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t28 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t26 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t27 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t27a x m mi p n p2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2)))).
-
-(* constant 6732 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t29 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n))) (l_e_st_eq_landau_n_rt_rp_r_pos m)) p : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n))) (l_e_st_eq_landau_n_rt_rp_r_pos m))).
-
-(* constant 6733 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t30 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t29 x m mi p n p2) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)))).
-
-(* constant 6734 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t31 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294b x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t29 x m mi p n p2) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6735 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t32 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294c x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t29 x m mi p n p2) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m))).
-
-(* constant 6736 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t33 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t30 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p n)) p2 (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t30 x m mi p n p2)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t30 x m mi p n p2))).
-
-(* constant 6737 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t34 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t31 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p)) l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_c_lemma291 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t19 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t13 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t31 x m mi p n p2)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t31 x m mi p n p2))).
-
-(* constant 6738 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t35 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t30 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t31 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t33 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t34 x m mi p n p2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t30 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t31 x m mi p n p2)))).
-
-(* constant 6739 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t36 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_satz294 x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t29 x m mi p n p2) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t30 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t31 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t32 x m mi p n p2))).
-
-(* constant 6740 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t37 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_ts m l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_ispl2 m (l_e_st_eq_landau_n_rt_rp_r_ts m l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_satz195a m)) (l_e_st_eq_landau_n_rt_rp_r_distpt2 m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) m (l_e_st_eq_landau_n_rt_rp_r_satzr155b n l_e_st_eq_landau_n_1)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m) (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)))).
-
-(* constant 6741 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t38 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m) (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t37 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t32 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t32 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)))).
-
-(* constant 6742 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t39 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t24 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_intrl1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_t25 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t30 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t31 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) m) (l_e_st_eq_landau_n_rt_rp_r_intpl (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p n)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p n) m mi) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t32 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_nr x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t28 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t35 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t36 x m mi p n p2) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t38 x m mi p n p2) : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2)).
-
-(* constant 6743 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t40 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.λp2:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p t) (l_e_st_eq_landau_n_rt_rp_r_c_9297_n1 x m mi p n p2) (l_e_st_eq_landau_n_suc n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t39 x m mi p n p2) (l_e_st_eq_landau_n_satz4a n) : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p (l_e_st_eq_landau_n_suc n)).
-
-(* constant 6744 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t41 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p t) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t21 x m mi p) (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p t.l_e_st_eq_landau_n_rt_rp_r_c_9297_t40 x m mi p t u) n : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop2 x m mi p n).
-
-(* constant 6745 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t42 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_posintnatrl n q ni : l_e_st_eq_landau_n_rt_rp_r_natrl n).
-
-(* constant 6746 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_ntofrl n (l_e_st_eq_landau_n_rt_rp_r_c_9297_t42 x m n mi ni o p q) : l_e_st_eq_landau_n_nat).
-
-(* constant 6747 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t43 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_isrlnt1 n (l_e_st_eq_landau_n_rt_rp_r_c_9297_t42 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_is n (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))).
-
-(* constant 6748 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t44 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_isrlnt2 n (l_e_st_eq_landau_n_rt_rp_r_c_9297_t42 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) n).
-
-(* constant 6749 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6750 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t44a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x m m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real m) mi mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t13 x m mi p) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p)).
-
-(* constant 6751 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t45 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw12 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) n (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t44a x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t43 x m n mi ni o p q) ni (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)))).
-
-(* constant 6752 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t46 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_c_9297_t41 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)))).
-
-(* constant 6753 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t47 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) n m (l_e_st_eq_landau_n_rt_rp_r_c_9297_t44 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_ts m n)).
-
-(* constant 6754 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t48 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t47 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o))).
-
-(* constant 6755 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t49 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_pos n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p0 x m mi p) (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t14 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t15 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_rlofnt (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t17 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t16 x m mi p (l_e_st_eq_landau_n_rt_rp_r_c_9297_n0 x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t45 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t46 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t48 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop1 x m n mi ni o).
-
-(* constant 6756 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t50 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_0exp (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o) i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6757 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t51 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_ts02 m n i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts m n) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6758 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t52 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_0exp x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t51 x m n mi ni o p i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c).
-
-(* constant 6759 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t53 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λi:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_9297_t50 x m n mi ni o p i) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t52 x m n mi ni o p i) : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop1 x m n mi ni o).
-
-(* constant 6760 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_an ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_abs n : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6761 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_intabs n ni : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)).
-
-(* constant 6762 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t55 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_ori1 (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) p : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)))).
-
-(* constant 6763 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t55 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6764 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t56 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_satz166e n (l_e_st_eq_landau_n_rt_rp_r_nnot0 n q) : l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)).
-
-(* constant 6765 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t56a ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t55 x m n mi ni o p q) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos m)).
-
-(* constant 6766 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t57 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t55 x m n mi ni o p q) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))).
-
-(* constant 6767 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t58 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t55 x m n mi ni o p q) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)))).
-
-(* constant 6768 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t59 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_9297_t49 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t55 x m n mi ni o p q) p (l_e_st_eq_landau_n_rt_rp_r_c_9297_t56 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t57 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t58 x m n mi ni o p q))).
-
-(* constant 6769 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t60 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_satz177c (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) n (l_e_st_eq_landau_n_rt_rp_r_absn n q) : l_e_st_eq_landau_n_rt_rp_r_is n (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))).
-
-(* constant 6770 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t61 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_intm0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))).
-
-(* constant 6771 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t62 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x m mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t56a x m n mi ni o p q) p : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6772 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma296 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t62 x m n mi ni o p q) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))).
-
-(* constant 6773 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t64 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_satz290 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t62 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6774 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t65 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma296 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t61 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t62 x m n mi ni o p q) : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)))).
-
-(* constant 6775 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t66 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_satz296 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t62 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t64 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t61 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t65 x m n mi ni o p q))).
-
-(* constant 6776 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t67 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x m (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t56a x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q)).
-
-(* constant 6777 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t68 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw12 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) n (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t67 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t60 x m n mi ni o p q) ni (l_e_st_eq_landau_n_rt_rp_r_c_9297_t61 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t65 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t61 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t65 x m n mi ni o p q))).
-
-(* constant 6778 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t69 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t64 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t61 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t65 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t68 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t66 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t64 x m n mi ni o p q))).
-
-(* constant 6779 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t70 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_satz197f m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_ists2 (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) n m (l_e_symis l_e_st_eq_landau_n_rt_rp_r_real n (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t60 x m n mi ni o p q))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_ts m n)).
-
-(* constant 6780 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t71 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_intm0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) : l_e_st_eq_landau_n_rt_rp_r_intrl (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)))).
-
-(* constant 6781 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) p : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)))).
-
-(* constant 6782 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t73 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_satz290 x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q) p : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q)) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6783 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t74 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_lemma296 x (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t71 x m n mi ni o p q) p : l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_pos (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))))).
-
-(* constant 6784 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t75 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_satz296 x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) p : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t73 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t71 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t74 x m n mi ni o p q))).
-
-(* constant 6785 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t76 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw2 x (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t70 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t71 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t74 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t71 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t74 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o))).
-
-(* constant 6786 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t77 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw1 (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t57 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t57 x m n mi ni o p q))).
-
-(* constant 6787 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t78 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_ispw1 x x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_refis l_e_st_eq_landau_n_rt_rp_r_c_cx x) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t58 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t58 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q))).
-
-(* constant 6788 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t79 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t57 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t58 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t77 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t59 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t78 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q))).
-
-(* constant 6789 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t80 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_st_eq_landau_n_rt_rp_r_c_isov2 (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q)) l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_9297_t79 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t64 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t73 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t64 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t73 x m n mi ni o p q))).
-
-(* constant 6790 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t81 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.λq:l_e_st_eq_landau_n_rt_rp_r_neg n.(l_e_tr4is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1 x m n mi ni o) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_9297_p1t55 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t63 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t64 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_ov l_e_st_eq_landau_n_rt_rp_r_c_1c (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q) mi (l_e_st_eq_landau_n_rt_rp_r_c_9297_t54 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t72 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t73 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts m (l_e_st_eq_landau_n_rt_rp_r_c_9297_an x m n mi ni o p q))) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t71 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t74 x m n mi ni o p q)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t8 x m n mi ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t69 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t80 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t75 x m n mi ni o p q) (l_e_st_eq_landau_n_rt_rp_r_c_9297_t76 x m n mi ni o p q) : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop1 x m n mi ni o).
-
-(* constant 6791 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_9297_t82 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).λp:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_st_eq_landau_n_rt_rp_r_rapp n (l_e_st_eq_landau_n_rt_rp_r_c_9297_prop1 x m n mi ni o) (λt:l_e_st_eq_landau_n_rt_rp_r_pos n.l_e_st_eq_landau_n_rt_rp_r_c_9297_t49 x m n mi ni o p t) (λt:l_e_st_eq_landau_n_rt_rp_r_is n l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_9297_t53 x m n mi ni o p t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg n.l_e_st_eq_landau_n_rt_rp_r_c_9297_t81 x m n mi ni o p t) : l_e_st_eq_landau_n_rt_rp_r_c_9297_prop1 x m n mi ni o).
-
-(* constant 6792 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz297 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.λm:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_real.λmi:l_e_st_eq_landau_n_rt_rp_r_intrl m.λni:l_e_st_eq_landau_n_rt_rp_r_intrl n.λo:l_or (l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_and (l_e_st_eq_landau_n_rt_rp_r_pos m) (l_e_st_eq_landau_n_rt_rp_r_pos n)).(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_c_9297_prop1 x m n mi ni o) (λt:l_e_st_eq_landau_n_rt_rp_r_c_is x l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_9297_t12 x m n mi ni o t) (λt:l_e_st_eq_landau_n_rt_rp_r_c_nis x l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_9297_t82 x m n mi ni o t) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pw (l_e_st_eq_landau_n_rt_rp_r_c_pw x m mi (l_e_st_eq_landau_n_rt_rp_r_c_lemma294a x m n mi ni o)) n ni (l_e_st_eq_landau_n_rt_rp_r_c_lemma297a x m n mi ni o)) (l_e_st_eq_landau_n_rt_rp_r_c_pw x (l_e_st_eq_landau_n_rt_rp_r_ts m n) (l_e_st_eq_landau_n_rt_rp_r_intts m mi n ni) (l_e_st_eq_landau_n_rt_rp_r_c_lemma297b x m n mi ni o))).
-
-(* constant 6793 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_plis12a r l_e_st_eq_landau_n_rt_rp_r_0 s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl r s) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r s) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6794 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t1 r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6795 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_10298_t1 r s : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r s) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6796 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_mnis12a r l_e_st_eq_landau_n_rt_rp_r_0 s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 (l_e_st_eq_landau_n_rt_rp_r_mn l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_mn r s) (l_e_st_eq_landau_n_rt_rp_r_pl02 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_satz176b l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6797 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298c ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t2 r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6798 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298d ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_10298_t2 r s : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_mn (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn r s) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6799 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_satz176b (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts r s)).
-
-(* constant 6800 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s)) (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 s (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ts02 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6801 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s))) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_tsis12a r l_e_st_eq_landau_n_rt_rp_r_0 s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts r s) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 s)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_10298_t3 r s) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t4 r s)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6802 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t5 r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6803 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_10298_t5 r s : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts r s) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6804 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_0c.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real s (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_re l_e_st_eq_landau_n_rt_rp_r_c_0c) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_c_isre s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_iscere (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_0c i) (l_e_st_eq_landau_n_rt_rp_r_c_reis l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6805 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_lemma298 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_imp_th3 (l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_0c) (l_e_st_eq_landau_n_rt_rp_r_is s l_e_st_eq_landau_n_rt_rp_r_0) n (λt:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_0c.l_e_st_eq_landau_n_rt_rp_r_c_10298_t6 r s n t) : l_e_st_eq_landau_n_rt_rp_r_c_nis (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_c_0c).
-
-(* constant 6806 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ov r s n) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t5 s (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx1 (l_e_st_eq_landau_n_rt_rp_r_ts s (l_e_st_eq_landau_n_rt_rp_r_ov r s n)) r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_satz204c r s n)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ov r s n) l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6807 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298g ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_satz229g (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ov r s n) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_lemma298 r s n) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t7 r s n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ov r s n) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_lemma298 r s n))).
-
-(* constant 6808 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298h ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_nis s l_e_st_eq_landau_n_rt_rp_r_0.(l_e_st_eq_landau_n_rt_rp_r_c_satz229h (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ov r s n) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_lemma298 r s n) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t7 r s n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ov (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_pli s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_lemma298 r s n)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_ov r s n) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6809 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_m0isa r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_isrecx2 (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_m0 r) (l_e_st_eq_landau_n_rt_rp_r_satz176b l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6810 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298j ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t8 r) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6811 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298k ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_10298_t8 r : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_m0 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_m0 r) l_e_st_eq_landau_n_rt_rp_r_0)).
-
-(* constant 6812 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod2 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_imis r l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ists12 (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) r (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) r (l_e_st_eq_landau_n_rt_rp_r_c_reis r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_reis r l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod2 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts r r)).
-
-(* constant 6813 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_ar ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_abs r : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6814 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t10 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λp:l_e_st_eq_landau_n_rt_rp_r_pos r.(l_e_st_eq_landau_n_rt_rp_r_satz196a r r p p : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r))).
-
-(* constant 6815 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t11 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.(l_e_tris2 l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_ts01 r r i) (l_e_st_eq_landau_n_rt_rp_r_ts01 (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_abs0 r i)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r))).
-
-(* constant 6816 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t12 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λn:l_e_st_eq_landau_n_rt_rp_r_neg r.(l_e_st_eq_landau_n_rt_rp_r_satz196b r r n n : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r))).
-
-(* constant 6817 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t13 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_rapp r (l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r))) (λt:l_e_st_eq_landau_n_rt_rp_r_pos r.l_e_st_eq_landau_n_rt_rp_r_c_10298_t10 r t) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_c_10298_t11 r t) (λt:l_e_st_eq_landau_n_rt_rp_r_neg r.l_e_st_eq_landau_n_rt_rp_r_c_10298_t12 r t) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r))).
-
-(* constant 6818 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t14 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod2 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts r r) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r)) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t9 r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t13 r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod2 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r))).
-
-(* constant 6819 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10298_t15 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_imp_th1 (l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0) (l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r))) (λt:l_e_st_eq_landau_n_rt_rp_r_is r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_0notn (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_abs0 r t)) (λt:l_e_st_eq_landau_n_rt_rp_r_nis r l_e_st_eq_landau_n_rt_rp_r_0.l_e_st_eq_landau_n_rt_rp_r_pnotn (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r) (l_e_st_eq_landau_n_rt_rp_r_satz166e r t)) : l_not (l_e_st_eq_landau_n_rt_rp_r_neg (l_e_st_eq_landau_n_rt_rp_r_c_10298_ar r))).
-
-(* constant 6820 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298l ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_thsqrt3 (l_e_st_eq_landau_n_rt_rp_r_c_mod2 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_c_lemma5 (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t15 r) (l_e_st_eq_landau_n_rt_rp_r_c_10298_t14 r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_abs r)).
-
-(* constant 6821 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz298m ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_c_satz298l r) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_abs r) (l_e_st_eq_landau_n_rt_rp_r_c_mod (l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0))).
-
-(* constant 6822 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_cofrl ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_pli r l_e_st_eq_landau_n_rt_rp_r_0 : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 6823 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isrlic ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s)) s (l_e_st_eq_landau_n_rt_rp_r_c_isre r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_c_iscere (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) i) (l_e_st_eq_landau_n_rt_rp_r_c_reis s l_e_st_eq_landau_n_rt_rp_r_0) : l_e_st_eq_landau_n_rt_rp_r_is r s).
-
-(* constant 6824 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isrlec ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_is r s.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx1 r s l_e_st_eq_landau_n_rt_rp_r_0 i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s)).
-
-(* constant 6825 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v10_t1 ≝ (λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λv:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) (l_e_st_eq_landau_n_rt_rp_r_c_cofrl u).l_e_st_eq_landau_n_rt_rp_r_c_isrlic t u v : l_e_injective l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t)).
-
-(* constant 6826 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_realc ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_image l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) x : Prop).
-
-(* constant 6827 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_reali ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_imagei l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) r : l_e_st_eq_landau_n_rt_rp_r_c_realc (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r)).
-
-(* constant 6828 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_rlofc ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λrx:l_e_st_eq_landau_n_rt_rp_r_c_realc x.(l_e_soft l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t1 x rx : l_e_st_eq_landau_n_rt_rp_r_real).
-
-(* constant 6829 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscirl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λrx:l_e_st_eq_landau_n_rt_rp_r_c_realc x.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λry:l_e_st_eq_landau_n_rt_rp_r_c_realc y.λi:l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rlofc x rx) (l_e_st_eq_landau_n_rt_rp_r_c_rlofc y ry).(l_e_isinve l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t1 x rx y ry i : l_e_st_eq_landau_n_rt_rp_r_c_is x y).
-
-(* constant 6830 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscerl ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λrx:l_e_st_eq_landau_n_rt_rp_r_c_realc x.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λry:l_e_st_eq_landau_n_rt_rp_r_c_realc y.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isinv l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t1 x rx y ry i : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rlofc x rx) (l_e_st_eq_landau_n_rt_rp_r_c_rlofc y ry)).
-
-(* constant 6831 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isrlc1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_isst1 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t1 r : l_e_st_eq_landau_n_rt_rp_r_is r (l_e_st_eq_landau_n_rt_rp_r_c_rlofc (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_reali r))).
-
-(* constant 6832 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isrlc2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_isst2 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t1 r : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_c_rlofc (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_reali r)) r).
-
-(* constant 6833 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscrl1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λrx:l_e_st_eq_landau_n_rt_rp_r_c_realc x.(l_e_ists1 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t1 x rx : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_rlofc x rx))).
-
-(* constant 6834 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscrl2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λrx:l_e_st_eq_landau_n_rt_rp_r_c_realc x.(l_e_ists2 l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_real.l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t1 x rx : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_rlofc x rx)) x).
-
-(* constant 6835 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_cofn ≝ λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_rlofnt n) : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 6836 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnec ≝ λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is n m.(l_e_st_eq_landau_n_rt_rp_r_c_isrlec (l_e_st_eq_landau_n_rt_rp_r_rlofnt n) (l_e_st_eq_landau_n_rt_rp_r_rlofnt m) (l_e_st_eq_landau_n_rt_rp_r_isnterl n m i) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_cofn m)).
-
-(* constant 6837 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnic ≝ λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_cofn m).(l_e_st_eq_landau_n_rt_rp_r_isntirl n m (l_e_st_eq_landau_n_rt_rp_r_c_isrlic (l_e_st_eq_landau_n_rt_rp_r_rlofnt n) (l_e_st_eq_landau_n_rt_rp_r_rlofnt m) i) : l_e_st_eq_landau_n_is n m).
-
-(* constant 6838 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v10_t2 ≝ (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_nat.λv:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofn t) (l_e_st_eq_landau_n_rt_rp_r_c_cofn u).l_e_st_eq_landau_n_rt_rp_r_c_isnic t u v : l_e_injective l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t)).
-
-(* constant 6839 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_natc ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.(l_e_image l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) x : Prop).
-
-(* constant 6840 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_nati ≝ λn:l_e_st_eq_landau_n_nat.(l_e_imagei l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) n : l_e_st_eq_landau_n_rt_rp_r_c_natc (l_e_st_eq_landau_n_rt_rp_r_c_cofn n)).
-
-(* constant 6841 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_nofc ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.(l_e_soft l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t2 x nx : l_e_st_eq_landau_n_nat).
-
-(* constant 6842 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscen ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λny:l_e_st_eq_landau_n_rt_rp_r_c_natc y.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isinv l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t2 x nx y ny i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_nofc x nx) (l_e_st_eq_landau_n_rt_rp_r_c_nofc y ny)).
-
-(* constant 6843 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscin ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λny:l_e_st_eq_landau_n_rt_rp_r_c_natc y.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_nofc x nx) (l_e_st_eq_landau_n_rt_rp_r_c_nofc y ny).(l_e_isinve l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t2 x nx y ny i : l_e_st_eq_landau_n_rt_rp_r_c_is x y).
-
-(* constant 6844 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnc1 ≝ λn:l_e_st_eq_landau_n_nat.(l_e_isst1 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t2 n : l_e_st_eq_landau_n_is n (l_e_st_eq_landau_n_rt_rp_r_c_nofc (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_nati n))).
-
-(* constant 6845 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnc2 ≝ λn:l_e_st_eq_landau_n_nat.(l_e_isst2 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t2 n : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_nofc (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_nati n)) n).
-
-(* constant 6846 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscn1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.(l_e_ists1 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t2 x nx : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_cofn (l_e_st_eq_landau_n_rt_rp_r_c_nofc x nx))).
-
-(* constant 6847 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscn2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.(l_e_ists2 l_e_st_eq_landau_n_nat l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_cofn t) l_e_st_eq_landau_n_rt_rp_r_c_v10_t2 x nx : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofn (l_e_st_eq_landau_n_rt_rp_r_c_nofc x nx)) x).
-
-(* constant 6848 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_natt ≝ (l_e_ot l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) : Type[0]).
-
-(* constant 6849 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_cofnt ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_in l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) nt : l_e_st_eq_landau_n_rt_rp_r_c_cx).
-
-(* constant 6850 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_natti ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_inp l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) nt : l_e_st_eq_landau_n_rt_rp_r_c_natc (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt)).
-
-(* constant 6851 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isntec ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λmt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λi:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt nt mt.(l_e_isini l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) nt mt i : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_cofnt mt)).
-
-(* constant 6852 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isntic ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λmt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_cofnt mt).(l_e_isine l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) nt mt i : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt nt mt).
-
-(* constant 6853 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ntofc ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.(l_e_out l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) x nx : l_e_st_eq_landau_n_rt_rp_r_c_natt).
-
-(* constant 6854 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscent ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λny:l_e_st_eq_landau_n_rt_rp_r_c_natc y.λi:l_e_st_eq_landau_n_rt_rp_r_c_is x y.(l_e_isouti l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) x nx y ny i : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc x nx) (l_e_st_eq_landau_n_rt_rp_r_c_ntofc y ny)).
-
-(* constant 6855 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscint ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.λy:l_e_st_eq_landau_n_rt_rp_r_c_cx.λny:l_e_st_eq_landau_n_rt_rp_r_c_natc y.λi:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc x nx) (l_e_st_eq_landau_n_rt_rp_r_c_ntofc y ny).(l_e_isoute l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) x nx y ny i : l_e_st_eq_landau_n_rt_rp_r_c_is x y).
-
-(* constant 6856 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isntc1 ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_isoutin l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) nt : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt nt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt))).
-
-(* constant 6857 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isntc2 ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_natt nt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt)) (l_e_st_eq_landau_n_rt_rp_r_c_isntc1 nt) : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt)) nt).
-
-(* constant 6858 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscnt1 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.(l_e_isinout l_e_st_eq_landau_n_rt_rp_r_c_cx (λt:l_e_st_eq_landau_n_rt_rp_r_c_cx.l_e_st_eq_landau_n_rt_rp_r_c_natc t) x nx : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_cofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc x nx))).
-
-(* constant 6859 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_iscnt2 ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_cx.λnx:l_e_st_eq_landau_n_rt_rp_r_c_natc x.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_cofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc x nx)) (l_e_st_eq_landau_n_rt_rp_r_c_iscnt1 x nx) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc x nx)) x).
-
-(* constant 6860 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ntofn ≝ λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_ntofc (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_nati n) : l_e_st_eq_landau_n_rt_rp_r_c_natt).
-
-(* constant 6861 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnent ≝ λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λi:l_e_st_eq_landau_n_is n m.(l_e_st_eq_landau_n_rt_rp_r_c_iscent (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_nati n) (l_e_st_eq_landau_n_rt_rp_r_c_cofn m) (l_e_st_eq_landau_n_rt_rp_r_c_nati m) (l_e_st_eq_landau_n_rt_rp_r_c_isnec n m i) : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n) (l_e_st_eq_landau_n_rt_rp_r_c_ntofn m)).
-
-(* constant 6862 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnint ≝ λn:l_e_st_eq_landau_n_nat.λm:l_e_st_eq_landau_n_nat.λi:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n) (l_e_st_eq_landau_n_rt_rp_r_c_ntofn m).(l_e_st_eq_landau_n_rt_rp_r_c_isnic n m (l_e_st_eq_landau_n_rt_rp_r_c_iscint (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_nati n) (l_e_st_eq_landau_n_rt_rp_r_c_cofn m) (l_e_st_eq_landau_n_rt_rp_r_c_nati m) i) : l_e_st_eq_landau_n_is n m).
-
-(* constant 6863 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_nofnt ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_st_eq_landau_n_rt_rp_r_c_nofc (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt) : l_e_st_eq_landau_n_nat).
-
-(* constant 6864 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnter ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λmt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λi:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt nt mt.(l_e_st_eq_landau_n_rt_rp_r_c_iscen (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt) (l_e_st_eq_landau_n_rt_rp_r_c_cofnt mt) (l_e_st_eq_landau_n_rt_rp_r_c_natti mt) (l_e_st_eq_landau_n_rt_rp_r_c_isntec nt mt i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_nofnt mt)).
-
-(* constant 6865 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isntin ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λmt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λi:l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_nofnt mt).(l_e_st_eq_landau_n_rt_rp_r_c_isntic nt mt (l_e_st_eq_landau_n_rt_rp_r_c_iscin (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt) (l_e_st_eq_landau_n_rt_rp_r_c_cofnt mt) (l_e_st_eq_landau_n_rt_rp_r_c_natti mt) i) : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt nt mt).
-
-(* constant 6866 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v10_t3 ≝ λn:l_e_st_eq_landau_n_nat.(l_e_st_eq_landau_n_rt_rp_r_c_iscnt1 (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_nati n) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_cofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n))).
-
-(* constant 6867 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnnt1 ≝ λn:l_e_st_eq_landau_n_nat.(l_e_tris l_e_st_eq_landau_n_nat n (l_e_st_eq_landau_n_rt_rp_r_c_nofc (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_nati n)) (l_e_st_eq_landau_n_rt_rp_r_c_nofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n)) (l_e_st_eq_landau_n_rt_rp_r_c_isnc1 n) (l_e_st_eq_landau_n_rt_rp_r_c_iscen (l_e_st_eq_landau_n_rt_rp_r_c_cofn n) (l_e_st_eq_landau_n_rt_rp_r_c_nati n) (l_e_st_eq_landau_n_rt_rp_r_c_cofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n)) (l_e_st_eq_landau_n_rt_rp_r_c_natti (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n)) (l_e_st_eq_landau_n_rt_rp_r_c_v10_t3 n)) : l_e_st_eq_landau_n_is n (l_e_st_eq_landau_n_rt_rp_r_c_nofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n))).
-
-(* constant 6868 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isnnt2 ≝ λn:l_e_st_eq_landau_n_nat.(l_e_symis l_e_st_eq_landau_n_nat n (l_e_st_eq_landau_n_rt_rp_r_c_nofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n)) (l_e_st_eq_landau_n_rt_rp_r_c_isnnt1 n) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_nofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n)) n).
-
-(* constant 6869 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_v10_t4 ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_st_eq_landau_n_rt_rp_r_c_iscn1 (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_cofn (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt))).
-
-(* constant 6870 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isntn1 ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_natt nt (l_e_st_eq_landau_n_rt_rp_r_c_ntofc (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt)) (l_e_st_eq_landau_n_rt_rp_r_c_ntofn (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) (l_e_st_eq_landau_n_rt_rp_r_c_isntc1 nt) (l_e_st_eq_landau_n_rt_rp_r_c_iscent (l_e_st_eq_landau_n_rt_rp_r_c_cofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_natti nt) (l_e_st_eq_landau_n_rt_rp_r_c_cofn (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) (l_e_st_eq_landau_n_rt_rp_r_c_nati (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) (l_e_st_eq_landau_n_rt_rp_r_c_v10_t4 nt)) : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt nt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt))).
-
-(* constant 6871 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_isntn2 ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_natt nt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) (l_e_st_eq_landau_n_rt_rp_r_c_isntn1 nt) : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) nt).
-
-(* constant 6872 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_1t ≝ (l_e_st_eq_landau_n_rt_rp_r_c_ntofn l_e_st_eq_landau_n_1 : l_e_st_eq_landau_n_rt_rp_r_c_natt).
-
-(* constant 6873 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_suct ≝ (λt:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_e_st_eq_landau_n_rt_rp_r_c_ntofn (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt t)) : Πt:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_e_st_eq_landau_n_rt_rp_r_c_natt).
-
-(* constant 6874 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10299_t1 ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λi:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct nt) l_e_st_eq_landau_n_rt_rp_r_c_1t.(l_e_st_eq_landau_n_rt_rp_r_c_isnint (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) l_e_st_eq_landau_n_1 i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) l_e_st_eq_landau_n_1).
-
-(* constant 6875 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz299a ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_imp_th3 (l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct nt) l_e_st_eq_landau_n_rt_rp_r_c_1t) (l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) l_e_st_eq_landau_n_1) (l_e_st_eq_landau_n_ax3 (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) (λt:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct nt) l_e_st_eq_landau_n_rt_rp_r_c_1t.l_e_st_eq_landau_n_rt_rp_r_c_10299_t1 nt t) : l_not (l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct nt) l_e_st_eq_landau_n_rt_rp_r_c_1t)).
-
-(* constant 6876 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ax3t ≝ (λt:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_e_st_eq_landau_n_rt_rp_r_c_satz299a t : ∀t:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_not (l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct t) l_e_st_eq_landau_n_rt_rp_r_c_1t)).
-
-(* constant 6877 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10299_t2 ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λmt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λi:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct nt) (l_e_st_eq_landau_n_rt_rp_r_c_suct mt).(l_e_st_eq_landau_n_rt_rp_r_c_isnint (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt mt)) i : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)) (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt mt))).
-
-(* constant 6878 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10299_t3 ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λmt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λi:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct nt) (l_e_st_eq_landau_n_rt_rp_r_c_suct mt).(l_e_st_eq_landau_n_ax4 (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_nofnt mt) (l_e_st_eq_landau_n_rt_rp_r_c_10299_t2 nt mt i) : l_e_st_eq_landau_n_is (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt) (l_e_st_eq_landau_n_rt_rp_r_c_nofnt mt)).
-
-(* constant 6879 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz299b ≝ λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λmt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λi:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct nt) (l_e_st_eq_landau_n_rt_rp_r_c_suct mt).(l_e_st_eq_landau_n_rt_rp_r_c_isntin nt mt (l_e_st_eq_landau_n_rt_rp_r_c_10299_t3 nt mt i) : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt nt mt).
-
-(* constant 6880 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ax4t ≝ (λt:l_e_st_eq_landau_n_rt_rp_r_c_natt.λu:l_e_st_eq_landau_n_rt_rp_r_c_natt.λv:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct t) (l_e_st_eq_landau_n_rt_rp_r_c_suct u).l_e_st_eq_landau_n_rt_rp_r_c_satz299b t u v : ∀t:l_e_st_eq_landau_n_rt_rp_r_c_natt.∀u:l_e_st_eq_landau_n_rt_rp_r_c_natt.∀v:l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct t) (l_e_st_eq_landau_n_rt_rp_r_c_suct u).l_e_is l_e_st_eq_landau_n_rt_rp_r_c_natt t u).
-
-(* constant 6881 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_cond1t ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt l_e_st_eq_landau_n_rt_rp_r_c_1t s : Prop).
-
-(* constant 6882 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_cond2t ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_all l_e_st_eq_landau_n_rt_rp_r_c_natt (λt:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_imp (l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt t s) (l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_suct t) s)) : Prop).
-
-(* constant 6883 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10299_prop1 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.λc1:l_e_st_eq_landau_n_rt_rp_r_c_cond1t s.λc2:l_e_st_eq_landau_n_rt_rp_r_c_cond2t s.λn:l_e_st_eq_landau_n_nat.(l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n) s : Prop).
-
-(* constant 6884 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10299_t4 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.λc1:l_e_st_eq_landau_n_rt_rp_r_c_cond1t s.λc2:l_e_st_eq_landau_n_rt_rp_r_c_cond2t s.(c1 : l_e_st_eq_landau_n_rt_rp_r_c_10299_prop1 s c1 c2 l_e_st_eq_landau_n_1).
-
-(* constant 6885 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10299_t5 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.λc1:l_e_st_eq_landau_n_rt_rp_r_c_cond1t s.λc2:l_e_st_eq_landau_n_rt_rp_r_c_cond2t s.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_10299_prop1 s c1 c2 n.(c2 (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n) p : l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn (l_e_st_eq_landau_n_suc (l_e_st_eq_landau_n_rt_rp_r_c_nofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n)))) s).
-
-(* constant 6886 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10299_t6 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.λc1:l_e_st_eq_landau_n_rt_rp_r_c_cond1t s.λc2:l_e_st_eq_landau_n_rt_rp_r_c_cond2t s.λn:l_e_st_eq_landau_n_nat.λp:l_e_st_eq_landau_n_rt_rp_r_c_10299_prop1 s c1 c2 n.(l_e_isp l_e_st_eq_landau_n_nat (λt:l_e_st_eq_landau_n_nat.l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn (l_e_st_eq_landau_n_suc t)) s) (l_e_st_eq_landau_n_rt_rp_r_c_nofnt (l_e_st_eq_landau_n_rt_rp_r_c_ntofn n)) n (l_e_st_eq_landau_n_rt_rp_r_c_10299_t5 s c1 c2 n p) (l_e_st_eq_landau_n_rt_rp_r_c_isnnt2 n) : l_e_st_eq_landau_n_rt_rp_r_c_10299_prop1 s c1 c2 (l_e_st_eq_landau_n_suc n)).
-
-(* constant 6887 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10299_t7 ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.λc1:l_e_st_eq_landau_n_rt_rp_r_c_cond1t s.λc2:l_e_st_eq_landau_n_rt_rp_r_c_cond2t s.λnt:l_e_st_eq_landau_n_rt_rp_r_c_natt.(l_e_st_eq_landau_n_induction (λt:l_e_st_eq_landau_n_nat.l_e_st_eq_landau_n_rt_rp_r_c_10299_prop1 s c1 c2 t) (l_e_st_eq_landau_n_rt_rp_r_c_10299_t4 s c1 c2) (λt:l_e_st_eq_landau_n_nat.λu:l_e_st_eq_landau_n_rt_rp_r_c_10299_prop1 s c1 c2 t.l_e_st_eq_landau_n_rt_rp_r_c_10299_t6 s c1 c2 t u) (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt) : l_e_st_eq_landau_n_rt_rp_r_c_10299_prop1 s c1 c2 (l_e_st_eq_landau_n_rt_rp_r_c_nofnt nt)).
-
-(* constant 6888 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz299c ≝ λs:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.λc1:l_e_st_eq_landau_n_rt_rp_r_c_cond1t s.λc2:l_e_st_eq_landau_n_rt_rp_r_c_cond2t s.(λt:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_e_isp l_e_st_eq_landau_n_rt_rp_r_c_natt (λu:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt u s) (l_e_st_eq_landau_n_rt_rp_r_c_ntofn (l_e_st_eq_landau_n_rt_rp_r_c_nofnt t)) t (l_e_st_eq_landau_n_rt_rp_r_c_10299_t7 s c1 c2 t) (l_e_st_eq_landau_n_rt_rp_r_c_isntn2 t) : ∀t:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt t s).
-
-(* constant 6889 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ax5t ≝ (λt:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.λu:l_e_st_eq_landau_n_rt_rp_r_c_cond1t t.λv:l_e_st_eq_landau_n_rt_rp_r_c_cond2t t.l_e_st_eq_landau_n_rt_rp_r_c_satz299c t u v : ∀t:l_e_st_set l_e_st_eq_landau_n_rt_rp_r_c_natt.∀u:l_e_st_eq_landau_n_rt_rp_r_c_cond1t t.∀v:l_e_st_eq_landau_n_rt_rp_r_c_cond2t t.∀w:l_e_st_eq_landau_n_rt_rp_r_c_natt.l_e_st_esti l_e_st_eq_landau_n_rt_rp_r_c_natt w t).
-
-(* constant 6890 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_ic ≝ (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl : l_e_st_eq_landau_n_rt_rp_r_c_complex).
-
-(* constant 6891 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10300_t1 ≝ (l_e_st_eq_landau_n_rt_rp_r_c_tsis12a l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_ic l_e_st_eq_landau_n_rt_rp_r_c_ic) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0)))).
-
-(* constant 6892 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10300_t2 ≝ (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl01 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ism0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl) l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_st_eq_landau_n_rt_rp_r_satz195 l_e_st_eq_landau_n_rt_rp_r_1rl)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)).
-
-(* constant 6893 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10300_t3 ≝ (l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl01 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_ts02 l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6894 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10300_t4 ≝ (l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0)) l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_c_10300_t2 l_e_st_eq_landau_n_rt_rp_r_c_10300_t3 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl))).
-
-(* constant 6895 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10300_t5 ≝ (l_e_st_eq_landau_n_rt_rp_r_c_satz298j l_e_st_eq_landau_n_rt_rp_r_1rl : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c)).
-
-(* constant 6896 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz2300 ≝ (l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_ic l_e_st_eq_landau_n_rt_rp_r_c_ic) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_1rl l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_m0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c) l_e_st_eq_landau_n_rt_rp_r_c_10300_t1 l_e_st_eq_landau_n_rt_rp_r_c_10300_t4 l_e_st_eq_landau_n_rt_rp_r_c_10300_t5 : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts l_e_st_eq_landau_n_rt_rp_r_c_ic l_e_st_eq_landau_n_rt_rp_r_c_ic) (l_e_st_eq_landau_n_rt_rp_r_c_m0 l_e_st_eq_landau_n_rt_rp_r_c_1c)).
-
-(* constant 6897 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t1 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_tsis12a s l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)))).
-
-(* constant 6898 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t2 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl01 (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_m0 (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_ts02 s l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_satz176b (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl)) l_e_st_eq_landau_n_rt_rp_r_0).
-
-(* constant 6899 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t3 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_real (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_1rl) s (l_e_st_eq_landau_n_rt_rp_r_pl02 (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts01 l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_satz195 s) : l_e_st_eq_landau_n_rt_rp_r_is (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) s).
-
-(* constant 6900 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t4 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl)) l_e_st_eq_landau_n_rt_rp_r_0 (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0)) s (l_e_st_eq_landau_n_rt_rp_r_c_10301_t2 r s) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t3 r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 s)).
-
-(* constant 6901 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t5 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_mn (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_1rl)) (l_e_st_eq_landau_n_rt_rp_r_pl (l_e_st_eq_landau_n_rt_rp_r_ts s l_e_st_eq_landau_n_rt_rp_r_1rl) (l_e_st_eq_landau_n_rt_rp_r_ts l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0))) (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 s) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t1 r s) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t4 r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic) (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 s)).
-
-(* constant 6902 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t6 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_ispl2 (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic) (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 s) (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t5 r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 s))).
-
-(* constant 6903 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t7 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_plis12a r l_e_st_eq_landau_n_rt_rp_r_0 l_e_st_eq_landau_n_rt_rp_r_0 s : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 s))).
-
-(* constant 6904 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t8 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_st_eq_landau_n_rt_rp_r_c_isrecx12 (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_0) r (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 s) s (l_e_st_eq_landau_n_rt_rp_r_pl02 r l_e_st_eq_landau_n_rt_rp_r_0 (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) (l_e_st_eq_landau_n_rt_rp_r_pl01 l_e_st_eq_landau_n_rt_rp_r_0 s (l_e_refis l_e_st_eq_landau_n_rt_rp_r_real l_e_st_eq_landau_n_rt_rp_r_0)) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)).
-
-(* constant 6905 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz301a ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_pli l_e_st_eq_landau_n_rt_rp_r_0 s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_pl r l_e_st_eq_landau_n_rt_rp_r_0) (l_e_st_eq_landau_n_rt_rp_r_pl l_e_st_eq_landau_n_rt_rp_r_0 s)) (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t6 r s) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t7 r s) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t8 r s) : l_e_is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)).
-
-(* constant 6906 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz301b ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) (l_e_st_eq_landau_n_rt_rp_r_c_satz301a r s) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic))).
-
-(* constant 6907 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz301c ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_tris l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_pli (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_ispli x) (l_e_st_eq_landau_n_rt_rp_r_c_satz301b (l_e_st_eq_landau_n_rt_rp_r_c_re x) (l_e_st_eq_landau_n_rt_rp_r_c_im x)) : l_e_st_eq_landau_n_rt_rp_r_c_is x (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_c_ic))).
-
-(* constant 6908 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz301d ≝ λx:l_e_st_eq_landau_n_rt_rp_r_c_complex.(l_e_symis l_e_st_eq_landau_n_rt_rp_r_c_cx x (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_satz301c x) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_re x)) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl (l_e_st_eq_landau_n_rt_rp_r_c_im x)) l_e_st_eq_landau_n_rt_rp_r_c_ic)) x).
-
-(* constant 6909 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_10301_t9 ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl u) l_e_st_eq_landau_n_rt_rp_r_c_ic)).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_c_cx (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl u) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pli t u) (l_e_st_eq_landau_n_rt_rp_r_c_satz301b r s) i (l_e_st_eq_landau_n_rt_rp_r_c_satz301a t u) : l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) (l_e_st_eq_landau_n_rt_rp_r_c_pli t u)).
-
-(* constant 6910 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz301e ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl u) l_e_st_eq_landau_n_rt_rp_r_c_ic)).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real r (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_re (l_e_st_eq_landau_n_rt_rp_r_c_pli t u)) t (l_e_st_eq_landau_n_rt_rp_r_c_isre r s) (l_e_st_eq_landau_n_rt_rp_r_c_iscere (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) (l_e_st_eq_landau_n_rt_rp_r_c_pli t u) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t9 r s t u i)) (l_e_st_eq_landau_n_rt_rp_r_c_reis t u) : l_e_st_eq_landau_n_rt_rp_r_is r t).
-
-(* constant 6911 *)
-definition l_e_st_eq_landau_n_rt_rp_r_c_satz301f ≝ λr:l_e_st_eq_landau_n_rt_rp_r_real.λs:l_e_st_eq_landau_n_rt_rp_r_real.λt:l_e_st_eq_landau_n_rt_rp_r_real.λu:l_e_st_eq_landau_n_rt_rp_r_real.λi:l_e_st_eq_landau_n_rt_rp_r_c_is (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl r) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl s) l_e_st_eq_landau_n_rt_rp_r_c_ic)) (l_e_st_eq_landau_n_rt_rp_r_c_pl (l_e_st_eq_landau_n_rt_rp_r_c_cofrl t) (l_e_st_eq_landau_n_rt_rp_r_c_ts (l_e_st_eq_landau_n_rt_rp_r_c_cofrl u) l_e_st_eq_landau_n_rt_rp_r_c_ic)).(l_e_tr3is l_e_st_eq_landau_n_rt_rp_r_real s (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli r s)) (l_e_st_eq_landau_n_rt_rp_r_c_im (l_e_st_eq_landau_n_rt_rp_r_c_pli t u)) u (l_e_st_eq_landau_n_rt_rp_r_c_isim r s) (l_e_st_eq_landau_n_rt_rp_r_c_isceim (l_e_st_eq_landau_n_rt_rp_r_c_pli r s) (l_e_st_eq_landau_n_rt_rp_r_c_pli t u) (l_e_st_eq_landau_n_rt_rp_r_c_10301_t9 r s t u i)) (l_e_st_eq_landau_n_rt_rp_r_c_imis t u) : l_e_st_eq_landau_n_rt_rp_r_is s u).
-
+++ /dev/null
-baseuri=cic:/matita/automath/
+++ /dev/null
-lib common complete_rg text automath xml basic_rg basic_ag toplevel
+++ /dev/null
-aut autProcess autOutput autParser autLexer autCrg
+++ /dev/null
-# The term \Omega
-# This book is not accepted in AUT-QE because [y:'type'] is not allowed
-# This book is accepted in \lambda\delta with sort inclusion but Omega is not
-# valid if sort inclusion is allowed on the term backbone only
-# This book is valid in \lambda\delta with unrestricted sort inclusion
-
-+l
-@ Delta := [x:[y:'type']'type']<x>x : [x:[y:'type']'type']'type'
- Omega := <Delta>Delta : 'type'
--l
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module E = Entity
-
-type id = E.id
-
-type qid = id * bool * id list (* qualified identifier: name, local?, path *)
-
-type term = Sort of bool (* sorts: true = TYPE, false = PROP *)
- | GRef of qid * term list (* reference: name, arguments *)
- | Appl of term * term (* application: argument, function *)
- | Abst of id * term * term (* abstraction: name, domain, scope *)
-
-type command = Section of (bool * id) option (* section: Some true = open, Some false = reopen, None = close last *)
- | Context of qid option (* context: Some = last node, None = root *)
- | Block of id * term (* block opener: name, domain *)
- | Decl of id * term (* declaration: name, domain *)
- | Def of id * term * bool * term (* definition: name, domain, transparent?, body *)
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module U = NUri
-module UH = U.UriHash
-module C = Cps
-module G = Options
-module N = Layer
-module E = Entity
-module A = Aut
-module D = Crg
-
-(* qualified identifier: uri, name, qualifiers *)
-type qid = D.uri * D.id * D.id list
-
-type context_node = qid option (* context node: None = root *)
-
-type status = {
- path: D.id list; (* current section path *)
- node: context_node; (* current context node *)
- nodes: context_node list; (* context node list *)
- line: int; (* line number *)
- mk_uri: G.uri_generator; (* uri generator *)
-}
-
-let henv_size, hcnt_size = 7000, 4300 (* hash tables initial sizes *)
-
-let henv = UH.create henv_size (* optimized global environment *)
-
-let hcnt = UH.create hcnt_size (* optimized context *)
-
-(* Internal functions *******************************************************)
-
-let empty_cnt = D.empty_lenv
-
-let alpha id =
- if id.[0] >= '0' && id.[0] <= '9' then !G.alpha ^ id else id
-
-let add_abst cnt id aw w =
- let id = if !G.alpha <> "" then alpha id else id in
- let aw = {aw with E.n_name = Some (id, true); E.n_degr = succ aw.E.n_degr} in
- D.EBind (cnt, aw, D.Abst (N.two, w))
-
-let mk_lref f a i = f a (D.TLRef (a, i))
-
-let id_of_name (id, _, _) =
- if !G.alpha <> "" then alpha id else id
-
-let mk_qid f lst id path =
- let str = String.concat "/" path in
- let str = Filename.concat str id in
- let str = lst.mk_uri str in
- f (U.uri_of_string str, id, path)
-
-let uri_of_qid (uri, _, _) = uri
-
-let complete_qid f lst (id, is_local, qs) =
- let f path = C.list_rev_append (mk_qid f lst id) path ~tail:qs in
- let rec skip f = function
- | phd :: ptl, qshd :: _ when phd = qshd -> f ptl
- | _ :: ptl, _ :: _ -> skip f (ptl, qs)
- | _ -> f []
- in
- if is_local then f lst.path else skip f (lst.path, qs)
-
-let relax_qid f lst (_, id, path) =
- let f = function
- | _ :: tl -> C.list_rev (mk_qid f lst id) tl
- | [] -> assert false
- in
- C.list_rev f path
-
-let relax_opt_qid f lst = function
- | None -> f None
- | Some qid -> let f qid = f (Some qid) in relax_qid f lst qid
-
-let resolve_gref err f lst qid =
- try let a, cnt = UH.find henv (uri_of_qid qid) in f qid a cnt
- with Not_found -> err qid
-
-let resolve_gref_relaxed f lst qid =
-(* this is not tail recursive *)
- let rec err qid = relax_qid (resolve_gref err f lst) lst qid in
- resolve_gref err f lst qid
-
-let get_cnt err f lst = function
- | None -> f empty_cnt
- | Some qid as node ->
- try let cnt = UH.find hcnt (uri_of_qid qid) in f cnt
- with Not_found -> err node
-
-let get_cnt_relaxed f lst =
-(* this is not tail recursive *)
- let rec err node = relax_opt_qid (get_cnt err f lst) lst node in
- get_cnt err f lst lst.node
-
-let push_abst f a w lenv =
- let bw = D.Abst (N.infinite, w) in
- D.push_bind f a bw lenv
-
-let add_proj e t = match e with
- | D.ESort -> t
- | D.EBind (D.ESort, a, b) -> D.TBind (a, b, t)
- | _ -> D.TProj (E.empty_node, e, t)
-
-(* this is not tail recursive in the GRef branch *)
-let rec xlate_term f st lst y lenv = function
- | A.Sort s ->
- let h = if s then 0 else 1 in
- let a = E.node_attrs ~sort:h () in
- f a (D.TSort (a, h))
- | A.Appl (v, t) ->
- let f vv at tt = f at (D.TAppl (at, vv, tt)) in
- let f _ vv = xlate_term (f vv) st lst y lenv t in
- xlate_term f st lst false lenv v
- | A.Abst (name, w, t) ->
- let name = if !G.alpha <> "" then alpha name else name in
- let name = Some (name, true) in
- let f aw ww =
- let f at tt =
- let l = if !G.cc then match y, at.E.n_degr with
- | true, _ -> N.one
- | _ , 0 -> N.one
- | _ , 1 -> N.unknown st
- | _ , 2 -> N.two
- | _ -> assert false
- else N.infinite
- in
- let b = D.Abst (l, ww) in
- let at = {at with E.n_name = name} in
- f at (D.TBind (at, b, tt))
- in
- let f lenv = xlate_term f st lst y lenv t in
- push_abst f {aw with E.n_name = name; E.n_degr = succ aw.E.n_degr} ww lenv
- in
- xlate_term f st lst true lenv w
- | A.GRef (name, args) ->
- let map1 args (id, _) = A.GRef ((id, true, []), []) :: args in
- let map2 f arg args =
- let f _ arg = f (D.EAppl (args, E.empty_node, arg)) in
- xlate_term f st lst false lenv arg
- in
- let g qid a cnt =
- let gref = D.TGRef (a, uri_of_qid qid) in
- if cnt = D.ESort then f a gref else
- let f = function
- | D.EAppl (D.ESort, _, v) -> f a (D.TAppl (a, v, gref))
- | args -> f a (D.TProj (a, args, gref))
- in
- let f args = C.list_fold_right f map2 args D.ESort in
- D.sub_list_strict (D.fold_names f map1 args) cnt args
- in
- let g qid = resolve_gref_relaxed g lst qid in
- let err () = complete_qid g lst name in
- D.resolve_lref err (mk_lref f) (id_of_name name) lenv
-
-let xlate_entity err f st lst = function
- | A.Section (Some (_, name)) ->
- err {lst with path = name :: lst.path; nodes = lst.node :: lst.nodes}
- | A.Section None ->
- begin match lst.path, lst.nodes with
- | _ :: ptl, nhd :: ntl ->
- err {lst with path = ptl; node = nhd; nodes = ntl}
- | _ -> assert false
- end
- | A.Context None ->
- err {lst with node = None}
- | A.Context (Some name) ->
- let f name = err {lst with node = Some name} in
- complete_qid f lst name
- | A.Block (name, w) ->
- let f qid =
- let f cnt =
- let f aw ww =
- UH.add hcnt (uri_of_qid qid) (add_abst cnt name aw ww);
- err {lst with node = Some qid}
- in
- xlate_term f st lst true cnt w
- in
- get_cnt_relaxed f lst
- in
- complete_qid f lst (name, true, [])
- | A.Decl (name, w) ->
- let f lenv =
- let f qid =
- let f aw ww =
- let aw = {aw with E.n_apix = lst.line; E.n_degr = succ aw.E.n_degr} in
- UH.add henv (uri_of_qid qid) (aw, lenv);
- let t = add_proj lenv ww in
-(*
- print_newline (); CrgOutput.pp_term print_string t;
-*)
- let b = E.Abst t in
- let entity = E.empty_root, aw, uri_of_qid qid, b in
- f {lst with line = succ lst.line} entity
- in
- xlate_term f st lst true lenv w
- in
- complete_qid f lst (name, true, [])
- in
- get_cnt_relaxed (D.sta f) lst
- | A.Def (name, w, trans, v) ->
- let f lenv =
- let f qid =
- let f _ ww =
- let f av vv =
- let na = {av with E.n_apix = lst.line} in
- UH.add henv (uri_of_qid qid) (na, lenv);
- let t = add_proj lenv (D.TCast (na, ww, vv)) in
-(*
- print_newline (); CrgOutput.pp_term print_string t;
-*)
- let b = E.Abbr t in
- let ra = if trans then E.empty_root else E.root_attrs ~meta:[E.Private] () in
- let entity = ra, na, uri_of_qid qid, b in
- f {lst with line = succ lst.line} entity
- in
- xlate_term f st lst false lenv v
- in
- xlate_term f st lst true lenv w
- in
- complete_qid f lst (name, true, [])
- in
- get_cnt_relaxed f lst
-
-(* Interface functions ******************************************************)
-
-let initial_status () =
- UH.clear henv; UH.clear hcnt; {
- path = []; node = None; nodes = []; line = 1; mk_uri = G.get_mk_uri ();
-}
-
-let refresh_status lst = {lst with
- mk_uri = G.get_mk_uri ()
-}
-
-let crg_of_aut = xlate_entity
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-type status
-
-val initial_status: unit -> status
-
-val refresh_status: status -> status
-
-val crg_of_aut: (status -> 'a) -> (status -> Crg.entity -> 'a) ->
- Layer.status -> status -> Aut.command -> 'a
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-{
- module L = Log
- module G = Options
- module AP = AutParser
-
- let level = 0
-
- let out s = if !G.debug_lexer then L.warn level s else ()
-
-(* This turns an Automath identifier into an XML nmtoken *)
- let quote id =
- let l = String.length id in
- let rec aux i =
- if i < l then begin
- if id.[i] = '\'' || id.[i] = '`' then id.[i] <- '_';
- aux (succ i)
- end else
- id
- in
- aux 0
-}
-
-let LC = ['#' '%']
-let OC = "{"
-let CC = "}"
-let SPC = [' ' '\t' '\n']+
-let NL = "\n"
-let ID = ['0'-'9' 'A'-'Z' 'a'-'z' '_' '\'' '`']+
-
-rule line_comment = parse
- | NL { () }
- | OC { block_comment lexbuf; line_comment lexbuf }
- | _ { line_comment lexbuf }
- | eof { () }
-and block_comment = parse
- | CC { () }
- | OC { block_comment lexbuf; block_comment lexbuf }
- | LC { line_comment lexbuf; block_comment lexbuf }
- | _ { block_comment lexbuf }
-and token = parse
- | SPC { token lexbuf }
- | LC { line_comment lexbuf; token lexbuf }
- | OC { block_comment lexbuf; token lexbuf }
- | "_E" { out "E"; AP.E }
- | "'_E'" { out "E"; AP.E }
- | "---" { out "EB"; AP.EB }
- | "'eb'" { out "EB"; AP.EB }
- | "EB" { out "EB"; AP.EB }
- | "--" { out "EXIT"; AP.EXIT }
- | "PN" { out "PN"; AP.PN }
- | "'pn'" { out "PN"; AP.PN }
- | "PRIM" { out "PN"; AP.PN }
- | "'prim'" { out "PN"; AP.PN }
- | "???" { out "PN"; AP.PN }
- | "PROP" { out "PROP"; AP.PROP }
- | "'prop'" { out "PROP"; AP.PROP }
- | "TYPE" { out "TYPE"; AP.TYPE }
- | "'type'" { out "TYPE"; AP.TYPE }
- | ID { out "ID";
- let s = Lexing.lexeme lexbuf in
- if !G.unquote then AP.IDENT s else AP.IDENT (quote s)
- }
- | ":=" { out "DEF"; AP.DEF }
- | "(" { out "OP"; AP.OP }
- | ")" { out "CP"; AP.CP }
- | "[" { out "OB"; AP.OB }
- | "]" { out "CB"; AP.CB }
- | "<" { out "OA"; AP.OA }
- | ">" { out "CA"; AP.CA }
- | "@" { out "AT"; AP.AT }
- | "~" { out "TD"; AP.TD }
- | "\"" { out "QT"; AP.QT }
- | ":" { out "CN"; AP.CN }
- | "," { out "CM"; AP.CM }
- | ";" { out "SC"; AP.SC }
- | "." { out "FS"; AP.FS }
- | "+" { out "PLUS"; AP.PLUS }
- | "-" { out "MINUS"; AP.MINUS }
- | "*" { out "TIMES"; AP.TIMES }
- | "=" { out "DEF"; AP.DEF }
- | eof { out "EOF"; AP.EOF }
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module P = Printf
-
-module C = Cps
-module L = Log
-module A = Aut
-module AA = AutProcess
-
-type counters = {
- sections: int;
- contexts: int;
- blocks: int;
- decls: int;
- defs: int;
- sorts: int;
- grefs: int;
- appls: int;
- absts: int;
- pars: int;
- xnodes: int
-}
-
-let level = 2
-
-let initial_counters = {
- sections = 0; contexts = 0; blocks = 0; decls = 0; defs = 0;
- sorts = 0; grefs = 0; appls = 0; absts = 0; pars = 0; xnodes = 0
-}
-
-let rec count_term f c = function
- | A.Sort _ ->
- f {c with sorts = succ c.sorts; xnodes = succ c.xnodes}
- | A.GRef (_, ts) ->
- let c = {c with grefs = succ c.grefs} in
- let c = {c with pars = c.pars + List.length ts} in
- let c = {c with xnodes = succ c.xnodes + List.length ts} in
- C.list_fold_left f count_term c ts
- | A.Appl (v, t) ->
- let c = {c with appls = succ c.appls; xnodes = succ c.xnodes} in
- let f c = count_term f c t in
- count_term f c v
- | A.Abst (_, w, t) ->
- let c = {c with absts = succ c.absts; xnodes = succ c.xnodes} in
- let f c = count_term f c t in
- count_term f c w
-
-let count_command f c = function
- | A.Section _ ->
- f {c with sections = succ c.sections}
- | A.Context _ ->
- f {c with contexts = succ c.contexts}
- | A.Block (_, w) ->
- let c = {c with blocks = succ c.blocks; xnodes = succ c.xnodes} in
- count_term f c w
- | A.Decl (_, w) ->
- let c = {c with decls = succ c.decls; xnodes = succ c.xnodes} in
- count_term f c w
- | A.Def (_, w, _, t) ->
- let c = {c with defs = succ c.defs; xnodes = succ c.xnodes} in
- let f c = count_term f c t in
- count_term f c w
-
-let print_counters f c =
- let terms = c.sorts + c.grefs + c.appls + c.absts in
- let entities = c.sections + c.contexts + c.blocks + c.decls + c.defs in
- L.warn level (P.sprintf "Automath representation summary");
- L.warn level (P.sprintf " Total book entities: %7u" entities);
- L.warn level (P.sprintf " Section entities: %7u" c.sections);
- L.warn level (P.sprintf " Context entities: %7u" c.contexts);
- L.warn level (P.sprintf " Block entities: %7u" c.blocks);
- L.warn level (P.sprintf " Declaration entities: %7u" c.decls);
- L.warn level (P.sprintf " Definition entities: %7u" c.defs);
- L.warn level (P.sprintf " Total Parameter items: %7u" c.pars);
- L.warn level (P.sprintf " Application items: %7u" c.pars);
- L.warn level (P.sprintf " Total term items: %7u" terms);
- L.warn level (P.sprintf " Sort items: %7u" c.sorts);
- L.warn level (P.sprintf " Reference items: %7u" c.grefs);
- L.warn level (P.sprintf " Application items: %7u" c.appls);
- L.warn level (P.sprintf " Abstraction items: %7u" c.absts);
- L.warn level (P.sprintf " Global Int. Complexity: unknown");
- L.warn level (P.sprintf " + Abbreviation nodes: %7u" c.xnodes);
- f ()
-
-let print_process_counters f c =
- let f iao iar iac iag =
- L.warn level (P.sprintf "Automath process summary");
- L.warn level (P.sprintf " Implicit after opening: %7u" iao);
- L.warn level (P.sprintf " Implicit after reopening: %7u" iar);
- L.warn level (P.sprintf " Implicit after closing: %7u" iac);
- L.warn level (P.sprintf " Implicit after global: %7u" iag);
- f ()
- in
- AA.get_counters f c
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-type counters
-
-val initial_counters: counters
-
-val count_command: (counters -> 'a) -> counters -> Aut.command -> 'a
-
-val print_counters: (unit -> 'a) -> counters -> 'a
-
-val print_process_counters: (unit -> 'a) -> AutProcess.status -> 'a
+++ /dev/null
-/* Copyright (C) 2000, HELM Team.
- *
- * This file is part of HELM, an Hypertextual, Electronic
- * Library of Mathematics, developed at the Computer Science
- * Department, University of Bologna, Italy.
- *
- * HELM is free software; you can redistribute it and/or
- * modify it under the terms of the GNU General Public License
- * as published by the Free Software Foundation; either version 2
- * of the License, or (at your option) any later version.
- *
- * HELM is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with HELM; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston,
- * MA 02111-1307, USA.
- *
- * For details, see the HELM World-Wide-Web page,
- * http://cs.unibo.it/helm/.
- */
-
-%{
- module G = Options
- module A = Aut
-
- let _ = Parsing.set_trace !G.debug_parser
-%}
- %token <int> NUM
- %token <string> IDENT
- %token EOF MINUS PLUS TIMES AT FS CN CM SC QT TD OP CP OB CB OA CA
- %token TYPE PROP DEF EB E PN EXIT
-
- %start entry
- %type <Aut.command option> entry
-%%
- path: MINUS {} | FS {} ;
- oftype: CN {} | CM {} ;
- star: TIMES {} | AT {} ;
- sc: E {} | SC {} | CN {} ;
- eof: SC {} | EOF {} ;
-
- expand:
- | { true }
- | TD { false }
- ;
- local:
- | { false }
- | path { true }
- ;
-
- idents:
- | IDENT { [$1] }
- | IDENT path idents { $1 :: $3 }
- ;
- qid:
- | IDENT { ($1, true, []) }
- | IDENT QT QT { ($1, true, []) }
- | IDENT QT local idents QT { ($1, $3, $4) }
- ;
- term:
- | TYPE { A.Sort true }
- | PROP { A.Sort false }
- | qid { A.GRef ($1, []) }
- | qid OP CP { A.GRef ($1, []) }
- | qid OP terms CP { A.GRef ($1, $3) }
- | OA term CA term { A.Appl ($2, $4) }
- | OB IDENT oftype term CB term { A.Abst ($2, $4, $6) }
- ;
- terms:
- | term { [$1] }
- | term CM terms { $1 :: $3 }
- ;
-
- start:
- | PLUS {} | MINUS {} | EXIT {} | eof {}
- | star {} | IDENT {} | OB {}
- ;
- entity:
- | PLUS IDENT { A.Section (Some (true, $2)) }
- | PLUS TIMES IDENT { A.Section (Some (false, $3)) }
- | MINUS IDENT { A.Section None }
- | EXIT { A.Section None }
- | star { A.Context None }
- | qid star { A.Context (Some $1) }
- | IDENT DEF EB sc term { A.Block ($1, $5) }
- | IDENT sc term DEF EB { A.Block ($1, $3) }
- | OB IDENT oftype term CB { A.Block ($2, $4) }
- | IDENT DEF PN sc term { A.Decl ($1, $5) }
- | IDENT sc term DEF PN { A.Decl ($1, $3) }
- | IDENT DEF expand term sc term { A.Def ($1, $6, $3, $4) }
- | IDENT sc term DEF expand term { A.Def ($1, $3, $5, $6) }
- ;
- entry:
- | entity start { Some $1 }
- | eof { None }
- ;
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module A = Aut
-
-type status = {
- opening : bool; (* just opened section *)
- reopening: bool; (* just reopened section *)
- closing : bool; (* just closed section *)
- explicit : bool; (* just found explicit context *)
- block : bool; (* just found block opener *)
- iao : int; (* implicit context after opening section *)
- iar : int; (* implicit context after reopening section *)
- iac : int; (* implicit context after closing section *)
- iag : int (* implicit context after global statement *)
-}
-
-(* internal functions *******************************************************)
-
-let orc_reset f st =
- f {st with opening = false; reopening = false; closing = false}
-
-let orc_count f st =
- let st = if st.opening then {st with iao = succ st.iao} else st in
- let st = if st.reopening then {st with iar = succ st.iar} else st in
- let st = if st.closing then {st with iac = succ st.iac} else st in
- f st
-
-let exp_count f st =
- let st =
- if st.explicit || st.block then st else {st with iag = succ st.iag}
- in
- f st
-
-let proc_section f st = function
- | Some (true, _) -> f {st with opening = true}
- | Some (false, _) -> f {st with reopening = true}
- | None -> f {st with closing = true}
-
-let proc_context f st =
- orc_reset f {st with explicit = true}
-
-let proc_block f st =
- orc_count (orc_reset f) {st with explicit = false; block = true}
-
-let proc_global f st =
- let f st =
- orc_count (orc_reset f) {st with explicit = false; block = false}
- in
- exp_count f st
-
-let proc_command f st command = match command with
- | A.Section section -> proc_section f st section command
- | A.Context _ -> proc_context f st command
- | A.Block _ -> proc_block f st command
- | A.Decl _ -> proc_global f st command
- | A.Def _ -> proc_global f st command
-
-(* interface functions ******************************************************)
-
-let initial_status () = {
- opening = false; reopening = false; closing = false;
- explicit = false; block = false;
- iao = 0; iar = 0; iac = 0; iag = 0
-}
-
-let process_command = proc_command
-
-let get_counters f st = f st.iao st.iar st.iac st.iag
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-type status
-
-val initial_status: unit -> status
-
-val process_command:
- (status -> Aut.command -> 'a) -> status -> Aut.command -> 'a
-
-val get_counters: (int -> int -> int -> int -> 'a) -> status -> 'a
+++ /dev/null
-bag bagCrg bagOutput
-bagEnvironment bagSubstitution bagReduction bagType bagUntrusted
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-(* kernel version: basic, absolute, global *)
-(* note : experimental *)
-
-module J = Marks
-module E = Entity
-
-type uri = E.uri
-type attrs = E.node_attrs
-
-type bind = Void (* exclusion *)
- | Abst of term (* abstraction *)
- | Abbr of term (* abbreviation *)
-
-and term = Sort of int (* hierarchy index *)
- | LRef of J.mark (* location *)
- | GRef of uri (* reference *)
- | Cast of term * term (* domain, element *)
- | Appl of term * term (* argument, function *)
- | Bind of attrs * J.mark * bind * term (* name, location, binder, scope *)
-
-type entity = term E.entity (* attrs, uri, binder *)
-
-type lenv = (attrs * J.mark * bind) list (* name, location, binder *)
-
-type message = (lenv, term) Log.item list
-
-(* Currified constructors ***************************************************)
-
-let abst w = Abst w
-
-let abbr v = Abbr v
-
-let lref i = LRef i
-
-let cast u t = Cast (u, t)
-
-let appl u t = Appl (u, t)
-
-let bind a l b t = Bind (a, l, b, t)
-
-let bind_abst a l u t = Bind (a, l, Abst u, t)
-
-let bind_abbr a l v t = Bind (a, l, Abbr v, t)
-
-(* local environment handling functions *************************************)
-
-let empty_lenv = []
-
-let push msg f es a l b =
- let rec does_not_occur loc = function
- | [] -> true
- | (_, l, _) :: _ when l = loc -> false
- | _ :: es -> does_not_occur l es
- in
- if not (does_not_occur l es) then failwith msg else
- let c = (a, l, b) :: es in f c
-
-let append f es1 es2 =
- f (List.append es2 es1)
-
-let map f map es =
- Cps.list_map f map es
-
-let contents f es = f es
-
-let get err f es i =
- let rec aux = function
- | [] -> err ()
- | (a, l, b) :: tl -> if l = i then f a b else aux tl
- in
- aux es
-
-let nth err f loc e =
- let rec aux n = function
- | [] -> err loc
- | (_, l, _) :: _ when l = loc -> f n
- | _ :: e -> aux (succ n) e
- in
- aux 0 e
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module C = Cps
-module J = Marks
-module N = Layer
-module E = Entity
-module D = Crg
-module Z = Bag
-
-(* internal functions: crg to bag term **************************************)
-
-let rec xlate_term st f c = function
- | D.TSort (_, h) -> f (Z.Sort h)
- | D.TGRef (_, s) -> f (Z.GRef s)
- | D.TLRef (a, i) ->
- let _, l, _ = List.nth c i in f (Z.LRef l)
- | D.TCast (_, u, t) ->
- let f tt uu = f (Z.Cast (uu, tt)) in
- let f tt = xlate_term st (f tt) c u in
- xlate_term st f c t
- | D.TAppl (_, v, t) ->
- let f tt vv = f (Z.Appl (vv, tt)) in
- let f tt = xlate_term st (f tt) c v in
- xlate_term st f c t
- | D.TProj (_, e, t) ->
- D.shift (xlate_term st f c) e t
-(* this case should be removed by improving alpha-conversion *)
- | D.TBind (ab, D.Abst (n, ws), D.TCast (ac, u, t)) ->
- xlate_term st f c (D.TCast (ac, D.TBind (ab, D.Abst (N.minus st n 1, ws), u), D.TBind (ab, D.Abst (n, ws), t)))
- | D.TBind (a, b, t) ->
- let f cc =
- let a, l, b = List.hd cc in
- let f tt = f (Z.Bind (a, l, b, tt)) in
- xlate_term st f cc t
- in
- xlate_bind st f c a b
-
-and xlate_bind st f c a = function
- | D.Abst (_, w) ->
- let f ww = Z.push "xlate_bind" f c a (J.new_mark ()) (Z.Abst ww) in
- xlate_term st f c w
- | D.Abbr v ->
- let f vv = Z.push "xlate_bind" f c a (J.new_mark ()) (Z.Abbr vv) in
- xlate_term st f c v
- | D.Void ->
- Z.push "xlate_bind" f c a (J.new_mark ()) Z.Void
-
-(* internal functions: bag to crg term **************************************)
-
-let rec xlate_bk_term f c = function
- | Z.Sort h -> f (D.TSort (E.empty_node, h))
- | Z.GRef s -> f (D.TGRef (E.empty_node, s))
- | Z.LRef l ->
- let f i = f (D.TLRef (E.empty_node, i)) in
- Z.nth C.err f l c
- | Z.Cast (u, t) ->
- let f tt uu = f (D.TCast (E.empty_node, uu, tt)) in
- let f tt = xlate_bk_term (f tt) c u in
- xlate_bk_term f c t
- | Z.Appl (u, t) ->
- let f tt uu = f (D.TAppl (E.empty_node, uu, tt)) in
- let f tt = xlate_bk_term (f tt) c u in
- xlate_bk_term f c t
- | Z.Bind (a, l, b, t) ->
- let f tt bb = f (D.TBind (a, bb, tt)) in
- let f tt = xlate_bk_bind (f tt) c b in
- let cc = Z.push "xlate_bk_term" C.start c a l b in
- xlate_bk_term f cc t
-
-and xlate_bk_bind f c = function
- | Z.Abst t ->
- let f tt = f (D.Abst (N.infinite, tt)) in
- xlate_bk_term f c t
- | Z.Abbr t ->
- let f tt = f (D.Abbr tt) in
- xlate_bk_term f c t
- | Z.Void -> f D.Void
-
-(* interface functions ******************************************************)
-
-let bag_of_crg st f t =
- xlate_term st f Z.empty_lenv t
-
-let crg_of_bag f t = xlate_bk_term f Z.empty_lenv t
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val bag_of_crg: Layer.status -> (Bag.term -> 'a) -> Crg.term -> 'a
-
-val crg_of_bag: (Crg.term -> 'a) -> Bag.term -> 'a
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module U = NUri
-module UH = U.UriHash
-module L = Log
-module E = Entity
-module Z = Bag
-
-exception ObjectNotFound of Z.message
-
-let hsize = 7000
-let env = UH.create hsize
-
-(* Internal functions *******************************************************)
-
-let get_age =
- let age = ref 0 in
- fun () -> incr age; !age
-
-let error uri = raise (ObjectNotFound (L.items1 (U.string_of_uri uri)))
-
-(* Interface functions ******************************************************)
-
-let set_entity f (ra, na, uri, b) =
- let age = get_age () in
- let entry = ra, {na with E.n_apix = age}, uri, b in
- UH.add env uri entry; f entry
-
-let get_entity f uri =
- try f (UH.find env uri) with Not_found -> error uri
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-exception ObjectNotFound of Bag.message
-
-val set_entity: (Bag.entity -> 'a) -> Bag.entity -> 'a
-
-val get_entity: (Bag.entity -> 'a) -> Bag.uri -> 'a
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module P = Printf
-
-module U = NUri
-module L = Log
-module G = Options
-module J = Marks
-module H = Hierarchy
-module E = Entity
-module XD = XmlCrg
-module Z = Bag
-module ZD = BagCrg
-
-type counters = {
- eabsts: int;
- eabbrs: int;
- tsorts: int;
- tlrefs: int;
- tgrefs: int;
- tcasts: int;
- tappls: int;
- tabsts: int;
- tabbrs: int
-}
-
-let level = 2
-
-let initial_counters = {
- eabsts = 0; eabbrs = 0; tsorts = 0; tlrefs = 0; tgrefs = 0;
- tcasts = 0; tappls = 0; tabsts = 0; tabbrs = 0
-}
-
-let rec count_term_binder f c = function
- | Z.Abst w ->
- let c = {c with tabsts = succ c.tabsts} in
- count_term f c w
- | Z.Abbr v ->
- let c = {c with tabbrs = succ c.tabbrs} in
- count_term f c v
- | Z.Void -> f c
-
-and count_term f c = function
- | Z.Sort _ ->
- f {c with tsorts = succ c.tsorts}
- | Z.LRef _ ->
- f {c with tlrefs = succ c.tlrefs}
- | Z.GRef _ ->
- f {c with tgrefs = succ c.tgrefs}
- | Z.Cast (v, t) ->
- let c = {c with tcasts = succ c.tcasts} in
- let f c = count_term f c t in
- count_term f c v
- | Z.Appl (v, t) ->
- let c = {c with tappls = succ c.tappls} in
- let f c = count_term f c t in
- count_term f c v
- | Z.Bind (_, _, b, t) ->
- let f c = count_term_binder f c b in
- count_term f c t
-
-let count_entity f c = function
- | _, _, _, E.Abst w ->
- let c = {c with eabsts = succ c.eabsts} in
- count_term f c w
- | _, _, _, E.Abbr v ->
- let c = {c with eabbrs = succ c.eabbrs} in
- count_term f c v
- | _, _, _, E.Void -> assert false
-
-let print_counters f c =
- let terms =
- c.tsorts + c.tgrefs + c.tgrefs + c.tcasts + c.tappls + c.tabsts +
- c.tabbrs
- in
- let items = c.eabsts + c.eabbrs in
- let locations = J.marks () in
- L.warn level (P.sprintf "Kernel representation summary (basic_ag)");
- L.warn level (P.sprintf " Total entry items: %7u" items);
- L.warn level (P.sprintf " Declaration items: %7u" c.eabsts);
- L.warn level (P.sprintf " Definition items: %7u" c.eabbrs);
- L.warn level (P.sprintf " Total term items: %7u" terms);
- L.warn level (P.sprintf " Sort items: %7u" c.tsorts);
- L.warn level (P.sprintf " Local reference items: %7u" c.tlrefs);
- L.warn level (P.sprintf " Global reference items: %7u" c.tgrefs);
- L.warn level (P.sprintf " Explicit Cast items: %7u" c.tcasts);
- L.warn level (P.sprintf " Application items: %7u" c.tappls);
- L.warn level (P.sprintf " Abstraction items: %7u" c.tabsts);
- L.warn level (P.sprintf " Abbreviation items: %7u" c.tabbrs);
- L.warn level (P.sprintf " Total binder locations: %7u" locations);
- f ()
-
-let name err och a =
- let f n = function
- | true -> P.fprintf och "%s" n
- | false -> P.fprintf och "-%s" n
- in
- E.name err f a
-
-let res a l och =
- let err () = P.fprintf och "#%s" (J.string_of_mark l) in
- if !G.indexes then err () else name err och a
-
-let rec pp_term st c och = function
- | Z.Sort h ->
- let err () = P.fprintf och "*%u" h in
- let f s = P.fprintf och "%s" s in
- H.string_of_sort err f h
- | Z.LRef i ->
- let err () = P.fprintf och "#%s" (J.string_of_mark i) in
- let f a _ = name err och a in
- if !G.indexes then err () else Z.get err f c i
- | Z.GRef s -> P.fprintf och "$%s" (U.string_of_uri s)
- | Z.Cast (u, t) ->
- P.fprintf och "{%a}.%a" (pp_term st c) u (pp_term st c) t
- | Z.Appl (v, t) ->
- P.fprintf och "(%a).%a" (pp_term st c) v (pp_term st c) t
- | Z.Bind (a, l, Z.Abst w, t) ->
- let f cc =
- P.fprintf och "[%t:%a].%a" (res a l) (pp_term st c) w (pp_term st cc) t
- in
- Z.push "output abst" f c a l (Z.Abst w)
- | Z.Bind (a, l, Z.Abbr v, t) ->
- let f cc =
- P.fprintf och "[%t=%a].%a" (res a l) (pp_term st c) v (pp_term st cc) t
- in
- Z.push "output abbr" f c a l (Z.Abbr v)
- | Z.Bind (a, l, Z.Void, t) ->
- let f cc = P.fprintf och "[%t].%a" (res a l) (pp_term st cc) t in
- Z.push "output void" f c a l Z.Void
-
-let pp_lenv st och c =
- let pp_entry och = function
- | a, l, Z.Abst w ->
- P.fprintf och "%t : %a\n" (res a l) (pp_term st c) w
- | a, l, Z.Abbr v ->
- P.fprintf och "%t = %a\n" (res a l) (pp_term st c) v
- | a, l, Z.Void ->
- P.fprintf och "%t\n" (res a l)
- in
- let iter map och l = List.iter (map och) l in
- let f es = P.fprintf och "%a" (iter pp_entry) (List.rev es) in
- Z.contents f c
-
-let specs = {
- L.pp_term = pp_term; L.pp_lenv = pp_lenv
-}
-
-(* term xml printing ********************************************************)
-
-let export_term st =
- ZD.crg_of_bag (XD.export_term st)
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-type counters
-
-val initial_counters: counters
-
-val count_entity: (counters -> 'a) -> counters -> Bag.entity -> 'a
-
-val print_counters: (unit -> 'a) -> counters -> 'a
-
-val specs: (Layer.status, Bag.lenv, Bag.term) Log.specs
-
-val export_term: Layer.status -> Bag.term -> XmlLibrary.pp
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module U = NUri
-module C = Cps
-module L = Log
-module G = Options
-module J = Marks
-module E = Entity
-module Z = Bag
-module ZO = BagOutput
-module ZE = BagEnvironment
-module ZS = BagSubstitution
-
-type machine = {
- i: int;
- c: Z.lenv;
- s: Z.term list
-}
-
-type whd_result =
- | Sort_ of int
- | LRef_ of J.mark * Z.term option
- | GRef_ of Z.entity
- | Bind_ of Z.attrs * J.mark * Z.term * Z.term
-
-type ho_whd_result =
- | Sort of int
- | Abst of Z.term
-
-(* Internal functions *******************************************************)
-
-let level = 5
-
-let term_of_whdr = function
- | Sort_ h -> Z.Sort h
- | LRef_ (i, _) -> Z.LRef i
- | GRef_ (_, _, uri, _) -> Z.GRef uri
- | Bind_ (a, l, w, t) -> Z.bind_abst a l w t
-
-let log1 st s c t =
- let s1, s2 = s ^ " in the environment", "the term" in
- L.log st ZO.specs (pred level) (L.et_items1 s1 c s2 t)
-
-let log2 st s cu u ct t =
- let s1, s2, s3 = s ^ " in the environment", "the term", "and in the environment" in
- L.log st ZO.specs (pred level) (L.et_items2 s1 cu s2 u ~sc2:s3 ~c2:ct s2 t)
-
-let empty_machine = {i = 0; c = Z.empty_lenv; s = []}
-
-let inc m = {m with i = succ m.i}
-
-let unwind_to_term f m t =
- let map f t (a, l, b) = f (Z.Bind (a, l, b, t)) in
- let f mc = C.list_fold_left f map t mc in
- Z.contents f m.c
-
-let unwind_stack f m =
- let map f v = unwind_to_term f m v in
- C.list_map f map m.s
-
-let get f c m i =
- let f _ b = f b in
- let f c = Z.get C.err f c i in
- Z.append f c m.c
-
-let push msg f c m a l w =
- assert (m.s = []);
- let f w = Z.push msg f c a l (Z.Abst w) in
- unwind_to_term f m w
-
-(* to share *)
-let rec whd f c m x =
-(* L.warn "entering R.whd"; *)
- match x with
- | Z.Sort h -> f m (Sort_ h)
- | Z.GRef uri ->
- let f entry = f m (GRef_ entry) in
- ZE.get_entity f uri
- | Z.LRef i ->
- let f = function
- | Z.Void -> f m (LRef_ (i, None))
- | Z.Abst t -> f m (LRef_ (i, Some t))
- | Z.Abbr t -> whd f c m t
- in
- get f c m i
- | Z.Cast (_, t) -> whd f c m t
- | Z.Appl (v, t) -> whd f c {m with s = v :: m.s} t
- | Z.Bind (a, l, Z.Abst w, t) ->
- begin match m.s with
- | [] -> f m (Bind_ (a, l, w, t))
- | v :: tl ->
- let nl = J.new_mark () in
- let f mc = ZS.subst (whd f c {m with c = mc; s = tl}) nl l t in
- Z.push "!" f m.c a nl (Z.Abbr (Z.Cast (w, v)))
- end
- | Z.Bind (a, l, b, t) ->
- let nl = J.new_mark () in
- let f mc = ZS.subst (whd f c {m with c = mc}) nl l t in
- Z.push "!" f m.c a nl b
-
-(* Interface functions ******************************************************)
-
-let rec ho_whd f c m x =
-(* L.warn "entering R.ho_whd"; *)
- let aux m = function
- | Sort_ h -> f (Sort h)
- | Bind_ (_, _, w, _) ->
- let f w = f (Abst w) in unwind_to_term f m w
- | LRef_ (_, Some w) -> ho_whd f c m w
- | GRef_ (_, _, _, E.Abst w) -> ho_whd f c m w
- | GRef_ (_, _, _, E.Abbr v) -> ho_whd f c m v
- | LRef_ (_, None) -> assert false
- | GRef_ (_, _, _, E.Void) -> assert false
- in
- whd aux c m x
-
-let ho_whd f st c t =
- if !G.trace >= level then log1 st "Now scanning" c t;
- ho_whd f c empty_machine t
-
-let rec are_convertible f st a c m1 t1 m2 t2 =
-(* L.warn "entering R.are_convertible"; *)
- let rec aux m1 r1 m2 r2 =
-(* L.warn "entering R.are_convertible_aux"; *)
- let u, t = term_of_whdr r1, term_of_whdr r2 in
- if !G.trace >= level then log2 st "Now really converting" c u c t;
- match r1, r2 with
- | Sort_ h1, Sort_ h2 ->
- if h1 = h2 then f a else f false
- | LRef_ (i1, _), LRef_ (i2, _) ->
- if i1 = i2 then are_convertible_stacks f st a c m1 m2 else f false
- | GRef_ (_, {E.n_apix = a1}, _, E.Abst _),
- GRef_ (_, {E.n_apix = a2}, _, E.Abst _) ->
- if a1 = a2 then are_convertible_stacks f st a c m1 m2 else f false
- | GRef_ (_, {E.n_apix = a1}, _, E.Abbr v1),
- GRef_ (_, {E.n_apix = a2}, _, E.Abbr v2) ->
- if a1 = a2 then
- let f a =
- if a then f a else are_convertible f st true c m1 v1 m2 v2
- in
- are_convertible_stacks f st a c m1 m2
- else
- if a1 < a2 then whd (aux m1 r1) c m2 v2 else
- whd (aux_rev m2 r2) c m1 v1
- | _, GRef_ (_, _, _, E.Abbr v2) ->
- whd (aux m1 r1) c m2 v2
- | GRef_ (_, _, _, E.Abbr v1), _ ->
- whd (aux_rev m2 r2) c m1 v1
- | Bind_ (a1, l1, w1, t1), Bind_ (a2, l2, w2, t2) ->
- let l = J.new_mark () in
- let h c =
- let m1, m2 = inc m1, inc m2 in
- let f t1 = ZS.subst (are_convertible f st a c m1 t1 m2) l l2 t2 in
- ZS.subst f l l1 t1
- in
- let f r = if r then push "!" h c m1 a1 l w1 else f false in
- are_convertible f st a c m1 w1 m2 w2
-(* we detect the AUT-QE reduction rule for type/prop inclusion *)
- | Sort_ _, Bind_ (a2, l2, w2, t2) when !G.si ->
- let m1, m2 = inc m1, inc m2 in
- let f c = are_convertible f st a c m1 (term_of_whdr r1) m2 t2 in
- push "nsi" f c m2 a2 l2 w2
- | _ -> f false
- and aux_rev m2 r2 m1 r1 = aux m1 r1 m2 r2 in
- let g m1 r1 = whd (aux m1 r1) c m2 t2 in
- if a = false then f false else whd g c m1 t1
-
-and are_convertible_stacks f st a c m1 m2 =
-(* L.warn "entering R.are_convertible_stacks"; *)
- let mm1, mm2 = {m1 with s = []}, {m2 with s = []} in
- let map f a v1 v2 = are_convertible f st a c mm1 v1 mm2 v2 in
- if List.length m1.s <> List.length m2.s then
- begin
-(* L.warn (Printf.sprintf "Different lengths: %u %u"
- (List.length m1.s) (List.length m2.s)
- ); *)
- f false
- end
- else
- C.list_fold_left2 f map a m1.s m2.s
-
-let are_convertible f st c u t =
- if !G.trace >= level then log2 st "Now converting" c u c t;
- are_convertible f st true c empty_machine u empty_machine t
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-type ho_whd_result =
- | Sort of int
- | Abst of Bag.term
-
-val ho_whd:
- (ho_whd_result -> 'a) -> Layer.status -> Bag.lenv -> Bag.term -> 'a
-
-val are_convertible:
- (bool -> 'a) -> Layer.status -> Bag.lenv -> Bag.term -> Bag.term -> 'a
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module S = Share
-module Z = Bag
-
-(* Internal functions *******************************************************)
-
-let rec lref_map_bind f map b = match b with
- | Z.Abbr v ->
- let f v' = f (S.sh1 v v' b Z.abbr) in
- lref_map f map v
- | Z.Abst w ->
- let f w' = f (S.sh1 w w' b Z.abst) in
- lref_map f map w
- | Z.Void -> f b
-
-and lref_map f map t = match t with
- | Z.LRef i ->
- let ii = map i in f (S.sh1 i ii t Z.lref)
- | Z.GRef _ -> f t
- | Z.Sort _ -> f t
- | Z.Cast (w, u) ->
- let f w' u' = f (S.sh2 w w' u u' t Z.cast) in
- let f w' = lref_map (f w') map u in
- lref_map f map w
- | Z.Appl (w, u) ->
- let f w' u' = f (S.sh2 w w' u u' t Z.appl) in
- let f w' = lref_map (f w') map u in
- lref_map f map w
- | Z.Bind (a, l, b, u) ->
- let f b' u' = f (S.sh2 b b' u u' t (Z.bind a l)) in
- let f b' = lref_map (f b') map u in
- lref_map_bind f map b
-
-(* Interface functions ******************************************************)
-
-let subst f new_l old_l t =
- let map i = if i = old_l then new_l else i in
- if new_l = old_l then f t else lref_map f map t
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val subst: (Bag.term -> 'a) -> Marks.mark -> Marks.mark -> Bag.term -> 'a
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module U = NUri
-module C = Cps
-module S = Share
-module L = Log
-module G = Options
-module H = Hierarchy
-module E = Entity
-module Z = Bag
-module ZO = BagOutput
-module ZE = BagEnvironment
-module ZR = BagReduction
-
-(* Internal functions *******************************************************)
-
-let level = 4
-
-let log1 st s c t =
- let s1, s2 = s ^ " in the envireonment", "the term" in
- L.log st ZO.specs (pred level) (L.et_items1 s1 c s2 t)
-
-let error1 err st c t =
- let sc = "In the envireonment" in
- err (L.et_items1 sc c st t)
-
-let error3 err c t1 t2 t3 =
- let sc, st1, st2, st3 =
- "In the envireonment", "the term", "is of type", "but must be of type"
- in
- err (L.et_items3 sc c st1 t1 st2 t2 st3 t3)
-
-let mk_gref u l =
- let map t v = Z.Appl (v, t) in
- List.fold_left map (Z.GRef u) l
-
-let rec b_type_of err f st c x =
-(* L.warn "Entering T.b_type_of"; *)
- if !G.trace >= level then log1 st "Now checking" c x;
- match x with
- | Z.Sort h ->
- let h = H.apply h in f x (Z.Sort h)
- | Z.LRef i ->
- let err0 () = error1 err "variable not found" c x in
- let f _ = function
- | Z.Abst w -> f x w
- | Z.Abbr (Z.Cast (w, v)) -> f x w
- | Z.Abbr _ -> assert false
- | Z.Void -> error1 err "reference to excluded variable" c x
- in
- Z.get err0 f c i
- | Z.GRef uri ->
- let f = function
- | _, _, _, E.Abst w -> f x w
- | _, _, _, E.Abbr (Z.Cast (w, v)) -> f x w
- | _, _, _, E.Abbr _ -> assert false
- | _, _, _, E.Void -> assert false
- in
- ZE.get_entity f uri
- | Z.Bind (a, l, Z.Abbr v, t) ->
- let f xv xt tt =
- f (S.sh2 v xv t xt x (Z.bind_abbr a l)) (Z.bind_abbr a l xv tt)
- in
- let f xv cc = b_type_of err (f xv) st cc t in
- let f xv = Z.push "type abbr" (f xv) c a l (Z.Abbr xv) in
- let f xv vv = match xv with
- | Z.Cast _ -> f xv
- | _ -> f (Z.Cast (vv, xv))
- in
- type_of err f st c v
- | Z.Bind (a, l, Z.Abst u, t) ->
- let f xu xt tt =
- f (S.sh2 u xu t xt x (Z.bind_abst a l)) (Z.bind_abst a l xu tt)
- in
- let f xu cc = b_type_of err (f xu) st cc t in
- let f xu _ = Z.push "type abst" (f xu) c a l (Z.Abst xu) in
- type_of err f st c u
- | Z.Bind (a, l, Z.Void, t) ->
- let f xt tt =
- f (S.sh1 t xt x (Z.bind a l Z.Void)) (Z.bind a l Z.Void tt)
- in
- let f cc = b_type_of err f st cc t in
- Z.push "type void" f c a l Z.Void
- | Z.Appl (v, t) ->
- let f xv vv xt tt = function
- | ZR.Abst w ->
- if !G.trace > level then L.log st ZO.specs level (L.t_items1 "Just scanned" c w);
- let f a =
-(* L.warn (Printf.sprintf "Convertible: %b" a); *)
- if a then f (S.sh2 v xv t xt x Z.appl) (Z.appl xv tt)
- else error3 err c xv vv w
- in
- ZR.are_convertible f st c w vv
- | _ ->
- error1 err "not a function" c xt
- in
- let f xv vv xt tt = ZR.ho_whd (f xv vv xt tt) st c tt in
- let f xv vv = b_type_of err (f xv vv) st c t in
- type_of err f st c v
- | Z.Cast (u, t) ->
- let f xu xt tt a =
- (* L.warn (Printf.sprintf "Convertible: %b" a); *)
- if a then f (S.sh2 u xu t xt x Z.cast) xu else error3 err c xt tt xu
- in
- let f xu xt tt = ZR.are_convertible (f xu xt tt) st c xu tt in
- let f xu _ = b_type_of err (f xu) st c t in
- type_of err f st c u
-
-(* Interface functions ******************************************************)
-
-and type_of err f st c x = b_type_of err f st c x
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val type_of:
- (Bag.message -> 'a) ->
- (Bag.term -> Bag.term -> 'a) ->
- Layer.status -> Bag.lenv -> Bag.term -> 'a
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module U = NUri
-module L = Log
-module E = Entity
-module Z = Bag
-module ZE = BagEnvironment
-module ZT = BagType
-
-(* Interface functions ******************************************************)
-
-(* to share *)
-let type_check err f st = function
- | ra, na, uri, E.Abst t ->
- let err msg = err (L.Uri uri :: msg) in
- let f xt tt = ZE.set_entity (f tt) (ra, na, uri, E.Abst xt) in
- ZT.type_of err f st Z.empty_lenv t
- | ra, na, uri, E.Abbr t ->
- let err msg = err (L.Uri uri :: msg) in
- let f xt tt = ZE.set_entity (f tt) (ra, na, uri, E.Abbr xt) in
- ZT.type_of err f st Z.empty_lenv t
- | _, _, _, E.Void -> assert false
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val type_check:
- (Bag.message -> 'a) -> (Bag.term -> Bag.entity -> 'a) ->
- Layer.status -> Bag.entity -> 'a
+++ /dev/null
-brg brgCrg brgOutput
-brgEnvironment brgSubstitution brgReduction brgValidity brgType brgUntrusted
-brgGrafite
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-(* kernel version: basic, relative, global *)
-(* note : ufficial basic \lambda\delta *)
-
-module N = Layer
-module E = Entity
-
-type uri = E.uri
-type attrs = E.node_attrs
-
-type bind = Void (* *)
- | Abst of N.layer * term (* layer, type *)
- | Abbr of term (* body *)
-
-and term = Sort of attrs * int (* attrs, hierarchy index *)
- | LRef of attrs * int (* attrs, position index *)
- | GRef of attrs * uri (* attrs, reference *)
- | Cast of attrs * term * term (* attrs, type, term *)
- | Appl of attrs * term * term (* attrs, argument, function *)
- | Bind of attrs * bind * term (* attrs, binder, scope *)
-
-type entity = term E.entity (* attrs, uri, binder *)
-
-type lenv = Null
-(* Cons: tail, relative local environment, attrs, binder *)
- | Cons of lenv * lenv * attrs * bind
-
-(* Currified constructors ***************************************************)
-
-let abst n w = Abst (n, w)
-
-let abbr v = Abbr v
-
-let lref a i = LRef (a, i)
-
-let cast a u t = Cast (a, u, t)
-
-let appl a u t = Appl (a, u, t)
-
-let bind a b t = Bind (a, b, t)
-
-let bind_abst n a u t = Bind (a, Abst (n, u), t)
-
-let bind_abbr a v t = Bind (a, Abbr v, t)
-
-let bind_void a t = Bind (a, Void, t)
-
-(* local environment handling functions *************************************)
-
-let empty = Null
-
-let push e c a b = Cons (e, c, a, b)
-
-let rec get i = function
- | Null -> empty, empty, E.empty_node, Void
- | Cons (e, c, a, b) when i = 0 -> e, c, a, b
- | Cons (e, _, _, _) -> get (pred i) e
-
-let get e i = get i e
-
-(* used in BrgOutput.pp_lenv *)
-let rec fold_right f map e x = match e with
- | Null -> f x
- | Cons (e, c, a, b) -> fold_right (map f e c a b) map e x
-
-let rec mem err f e b = match e with
- | Null -> err ()
- | Cons (e, _, a, _) ->
- if a.E.n_name = b.E.n_name then f () else mem err f e b
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module C = Cps
-module N = Layer
-module E = Entity
-module D = Crg
-module B = Brg
-
-(* internal functions: crg to brg term **************************************)
-
-let rec xlate_term f = function
- | D.TSort (a, l) -> f (B.Sort (a, l))
- | D.TGRef (a, n) -> f (B.GRef (a, n))
- | D.TLRef (a, i) -> f (B.LRef (a, i))
- | D.TCast (a, u, t) ->
- let f tt uu = f (B.Cast (a, uu, tt)) in
- let f tt = xlate_term (f tt) u in
- xlate_term f t
- | D.TAppl (a, v, t) ->
- let f tt vv = f (B.Appl (a, vv, tt)) in
- let f tt = xlate_term (f tt) v in
- xlate_term f t
- | D.TProj (_, e, t) ->
- D.shift (xlate_term f) e t
- | D.TBind (a, b, t) ->
- xlate_term (xlate_bind f a b) t
-
-and xlate_bind f a b x = match b with
- | D.Abst (n, w) ->
- let f ww = f (B.Bind (a, B.Abst (n, ww), x)) in
- xlate_term f w
- | D.Abbr v ->
- let f vv = f (B.Bind (a, B.Abbr vv, x)) in
- xlate_term f v
- | D.Void ->
- f (B.Bind (a, B.Void, x))
-
-(* internal functions: brg to crg term **************************************)
-
-let rec xlate_bk_term f = function
- | B.Sort (a, l) -> f (D.TSort (a, l))
- | B.GRef (a, n) -> f (D.TGRef (a, n))
- | B.LRef (a, i) -> f (D.TLRef (a, i))
- | B.Cast (a, u, t) ->
- let f tt uu = f (D.TCast (a, uu, tt)) in
- let f tt = xlate_bk_term (f tt) u in
- xlate_bk_term f t
- | B.Appl (a, u, t) ->
- let f tt uu = f (D.TAppl (a, uu, tt)) in
- let f tt = xlate_bk_term (f tt) u in
- xlate_bk_term f t
- | B.Bind (a, b, t) ->
- let f tt bb = f (D.TBind (a, bb, tt)) in
- let f tt = xlate_bk_bind (f tt) b in
- xlate_bk_term f t
-
-and xlate_bk_bind f = function
- | B.Abst (n, t) ->
- let f tt = f (D.Abst (n, tt)) in
- xlate_bk_term f t
- | B.Abbr t ->
- let f tt = f (D.Abbr tt) in
- xlate_bk_term f t
- | B.Void -> f D.Void
-
-(* interface functions ******************************************************)
-
-let brg_of_crg f t = f (xlate_term C.start t)
-
-let crg_of_brg = xlate_bk_term
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val brg_of_crg: (Brg.term -> 'a) -> Crg.term -> 'a
-
-val crg_of_brg: (Crg.term -> 'a) -> Brg.term -> 'a
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module U = NUri
-module UH = U.UriHash
-module E = Entity
-
-let hsize = 7000
-let env = UH.create hsize
-
-(* Interface functions ******************************************************)
-
-(* decps *)
-let set_entity entity =
- let _, _, uri, _ = entity in
- UH.add env uri entity; entity
-
-let get_entity uri =
- try UH.find env uri with Not_found -> E.empty_root, E.empty_node, uri, E.Void
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val set_entity: Brg.entity -> Brg.entity
-
-val get_entity: Brg.uri -> Brg.entity
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module F = Filename
-module P = Printf
-
-module U = NUri
-module C = Cps
-module G = Options
-module N = Layer
-module E = Entity
-module R = Alpha
-module B = Brg
-
-(* Internal functions *******************************************************)
-
-let ok = ref true
-
-let base = "matita"
-
-let ext = ".ma"
-
-let width = 70
-
-let out_preamble och =
- let ich = open_in !G.ma_preamble in
- let rec aux () = P.fprintf och "%s\n" (input_line ich); aux () in
- try aux () with End_of_file -> close_in ich
-
-let out_top_comment och msg =
- let padding = width - String.length msg in
- let padding = if padding >= 0 then padding else 0 in
- P.fprintf och "(* %s %s*)\n\n" msg (String.make padding '*')
-
-let out_comment och msg =
- P.fprintf och "(* %s *)\n" msg
-
-let out_include och src =
- P.fprintf och "include \"%s.ma\".\n\n" src
-
-let out_uri och u =
- let str = U.string_of_uri u in
- let rec aux i =
- let c = str.[i] in
- if c = '.' then () else begin
- output_char och (if c = '/' then '_' else c);
- aux (succ i)
- end
- in
- let rec strip i n =
- if n <= 0 then succ i else
- strip (String.index_from str (succ i) '/') (pred n)
- in
- aux (strip 0 3)
-
-let out_name och a =
- let f n = function
- | true -> P.fprintf och "%s" n
- | false -> C.err ()
- in
- E.name C.err f a
-
-let rec out_term st p e och = function
- | B.Sort (_, h) ->
- let sort = if h = 0 then "Type[0]" else if h = 1 then "Prop" else assert false in
- P.fprintf och "%s" sort
- | B.LRef (_, i) ->
- let _, _, a, b = B.get e i in
- P.fprintf och "%a" out_name a
- | B.GRef (_, s) ->
- P.fprintf och "%a" out_uri s
- | B.Cast (_, u, t) ->
- P.fprintf och "(%a : %a)" (out_term st false e) t (out_term st false e) u
- | B.Appl (_, v, t) ->
- let pt = match t with B.Appl _ -> false | _ -> true in
- let op, cp = if p then "(", ")" else "", "" in
- P.fprintf och "%s%a %a%s" op (out_term st pt e) t (out_term st true e) v cp
- | B.Bind (a, B.Abst (n, w), t) ->
- let op, cp = if p then "(", ")" else "", "" in
- let a = R.alpha B.mem e a in
- let ee = B.push e B.empty a (B.abst n w) in
- let binder = match N.to_string st n, a.E.n_sort with
- | "1", 0 -> "Π"
- | "1", 1 -> "∀"
- | "2", _ -> "λ"
- | _ -> ok := false; "?"
- in
- P.fprintf och "%s%s%a:%a.%a%s"
- op binder out_name a (out_term st false e) w (out_term st false ee) t cp
- | B.Bind (a, B.Abbr v, t) ->
- let op, cp = if p then "(", ")" else "", "" in
- let a = R.alpha B.mem e a in
- let ee = B.push e B.empty a (B.abbr v) in
- P.fprintf och "%slet %a ≝ %a in %a%s"
- op out_name a (out_term st false e) v (out_term st false ee) t cp
- | B.Bind (a, B.Void, t) -> C.err ()
-
-(* Interface functions ******************************************************)
-
-let open_out fname =
- let dir = F.concat !G.ma_dir base in
- let path = F.concat dir fname in
- let och = open_out (path ^ ext) in
- out_preamble och;
- out_top_comment och (P.sprintf "This file was generated by %s: do not edit" G.version_string);
- out_include och "basics/pts";
- och
-
-let output_entity st och (_, na, s, b) =
- out_comment och (P.sprintf "constant %u" na.E.n_apix);
- match b with
- | E.Abbr t ->
- P.fprintf och "definition %a ≝ %a.\n\n%!" out_uri s (out_term st false B.empty) t; !ok
- | E.Abst t ->
- P.fprintf och "axiom %a : %a.\n\n%!" out_uri s (out_term st false B.empty) t; !ok
- | E.Void -> C.err ()
-
-let close_out och = close_out och
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val open_out: string -> out_channel
-
-val output_entity: Layer.status -> out_channel -> Brg.entity -> bool
-
-val close_out: out_channel -> unit
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module P = Printf
-
-module U = NUri
-module C = Cps
-module L = Log
-module G = Options
-module H = Hierarchy
-module N = Layer
-module E = Entity
-module XD = XmlCrg
-module B = Brg
-module BD = BrgCrg
-
-(* nodes count **************************************************************)
-
-type counters = {
- eabsts: int;
- eabbrs: int;
- evoids: int;
- tsorts: int;
- tlrefs: int;
- tgrefs: int;
- tcasts: int;
- tappls: int;
- tabsts: int;
- tabbrs: int;
- tvoids: int;
- uris : B.uri list;
- nodes : int;
- xnodes: int
-}
-
-let level = 2
-
-let initial_counters = {
- eabsts = 0; eabbrs = 0; evoids = 0;
- tsorts = 0; tlrefs = 0; tgrefs = 0; tcasts = 0; tappls = 0;
- tabsts = 0; tabbrs = 0; tvoids = 0;
- uris = []; nodes = 0; xnodes = 0
-}
-
-let rec count_term_binder f c e = function
- | B.Abst (_, w) ->
- let c = {c with tabsts = succ c.tabsts; nodes = succ c.nodes} in
- count_term f c e w
- | B.Abbr v ->
- let c = {c with tabbrs = succ c.tabbrs; xnodes = succ c.xnodes} in
- count_term f c e v
- | B.Void ->
- let c = {c with tvoids = succ c.tvoids; xnodes = succ c.xnodes} in
- f c
-
-and count_term f c e = function
- | B.Sort _ ->
- f {c with tsorts = succ c.tsorts; nodes = succ c.nodes}
- | B.LRef (_, i) ->
- begin match B.get e i with
- | _, _, _, B.Abst _
- | _, _, _, B.Void ->
- f {c with tlrefs = succ c.tlrefs; nodes = succ c.nodes}
- | _, _, _, B.Abbr _ ->
- f {c with tlrefs = succ c.tlrefs; xnodes = succ c.xnodes}
- end
- | B.GRef (_, u) ->
- let c =
- if Cps.list_mem ~eq:U.eq u c.uris
- then {c with nodes = succ c.nodes}
- else {c with xnodes = succ c.xnodes}
- in
- f {c with tgrefs = succ c.tgrefs}
- | B.Cast (_, v, t) ->
- let c = {c with tcasts = succ c.tcasts} in
- let f c = count_term f c e t in
- count_term f c e v
- | B.Appl (_, v, t) ->
- let c = {c with tappls = succ c.tappls; nodes = succ c.nodes} in
- let f c = count_term f c e t in
- count_term f c e v
- | B.Bind (a, b, t) ->
- let f c = count_term f c (B.push e B.empty a b) t in
- count_term_binder f c e b
-
-let count_entity f c = function
- | _, _, u, E.Abst w ->
- let c = {c with
- eabsts = succ c.eabsts; nodes = succ c.nodes; uris = u :: c.uris
- } in
- count_term f c B.empty w
- | _, _, _, E.Abbr v ->
- let c = {c with eabbrs = succ c.eabbrs; xnodes = succ c.xnodes} in
- count_term f c B.empty v
- | _, _, _, E.Void -> assert false
-
-let print_counters f c =
- let terms =
- c.tsorts + c.tgrefs + c.tgrefs + c.tcasts + c.tappls + c.tabsts +
- c.tabbrs
- in
- let items = c.eabsts + c.eabbrs in
- let nodes = c.nodes + c.xnodes in
- L.warn level (P.sprintf "Kernel representation summary (basic_rg)");
- L.warn level (P.sprintf " Total entry items: %7u" items);
- L.warn level (P.sprintf " Declaration items: %7u" c.eabsts);
- L.warn level (P.sprintf " Definition items: %7u" c.eabbrs);
- L.warn level (P.sprintf " Total term items: %7u" terms);
- L.warn level (P.sprintf " Sort items: %7u" c.tsorts);
- L.warn level (P.sprintf " Local reference items: %7u" c.tlrefs);
- L.warn level (P.sprintf " Global reference items: %7u" c.tgrefs);
- L.warn level (P.sprintf " Explicit Cast items: %7u" c.tcasts);
- L.warn level (P.sprintf " Application items: %7u" c.tappls);
- L.warn level (P.sprintf " Abstraction items: %7u" c.tabsts);
- L.warn level (P.sprintf " Abbreviation items: %7u" c.tabbrs);
- L.warn level (P.sprintf " Global Int. Complexity: %7u" c.nodes);
- L.warn level (P.sprintf " + Abbreviation nodes: %7u" nodes);
- f ()
-
-(* supplementary annotation *************************************************)
-
-let rec does_not_occur f n r = function
- | B.Null -> f true
- | B.Cons (e, _, a, _) ->
- let f n1 r1 =
- if n1 = n && r1 = r then f false else does_not_occur f n r e
- in
- E.name C.err f a
-
-let rename f e a =
- let rec aux f e n r =
- let f = function
- | true -> f n r
- | false -> aux f e (n ^ "_") r
- in
- does_not_occur f n r e
- in
- let f n0 r0 =
- let f n r = if n = n0 && r = r0 then f a else f {a with E.n_name = Some (n, r)} in
- aux f e n0 r0
- in
- E.name C.err f a
-
-(* lenv/term pretty printing ************************************************)
-
-let name err och a =
- let f n = function
- | true -> P.fprintf och "%s" n
- | false -> P.fprintf och "-%s" n
- in
- E.name err f a
-
-let pp_level st och n =
- P.fprintf och "%s" (N.to_string st n)
-
-let rec pp_term st e och = function
- | B.Sort (_, h) ->
- let err _ = P.fprintf och "*%u" h in
- let f s = P.fprintf och "%s" s in
- H.string_of_sort err f h
- | B.LRef (_, i) ->
- let err _ = P.fprintf och "#%u" i in
- if !G.indexes then err () else
- let _, _, a, b = B.get e i in
- P.fprintf och "%a" (name err) a
- | B.GRef (_, s) ->
- P.fprintf och "$%s" (U.string_of_uri s)
- | B.Cast (_, u, t) ->
- P.fprintf och "{%a}.%a" (pp_term st e) u (pp_term st e) t
- | B.Appl (_, v, t) ->
- P.fprintf och "(%a).%a" (pp_term st e) v (pp_term st e) t
- | B.Bind (a, B.Abst (n, w), t) ->
- let f a =
- let ee = B.push e B.empty a (B.abst n w) in
- P.fprintf och "%a[%a:%a].%a" (pp_level st) n (name C.err) a (pp_term st e) w (pp_term st ee) t
- in
- rename f e a
- | B.Bind (a, B.Abbr v, t) ->
- let f a =
- let ee = B.push e B.empty a (B.abbr v) in
- P.fprintf och "[%a=%a].%a" (name C.err) a (pp_term st e) v (pp_term st ee) t
- in
- rename f e a
- | B.Bind (a, B.Void, t) ->
- let f a =
- let ee = B.push e B.empty a B.Void in
- P.fprintf och "[%a].%a" (name C.err) a (pp_term st ee) t
- in
- rename f e a
-
-let pp_lenv st och e =
- let pp_entry f e c a b x = f x (* match b with
- | B.Abst (a, w) ->
- let f a = P.fprintf och "%a : %a\n" (name C.err) a (pp_term st e) w; f a in
- rename f x a
- | B.Abbr (a, v) ->
- let f a = P.fprintf och "%a = %a\n" (name C.err) a (pp_term st e) v; f a in
- rename f c a
- | B.Void a ->
- let f a = P.fprintf och "%a\n" (name C.err) a; f a in
- rename f c a
-*) in
- let e = B.empty in
- if e = B.empty then P.fprintf och "%s\n" "not shown" else
- B.fold_right ignore pp_entry e B.empty
-
-let specs = {
- L.pp_term = pp_term; L.pp_lenv = pp_lenv
-}
-
-(* term xml printing ********************************************************)
-
-let export_term st =
- BD.crg_of_brg (XD.export_term st)
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-type counters
-
-val initial_counters: counters
-
-val count_entity: (counters -> 'a) -> counters -> Brg.entity -> 'a
-
-val print_counters: (unit -> 'a) -> counters -> 'a
-
-val specs: (Layer.status, Brg.lenv, Brg.term) Log.specs
-
-val export_term: Layer.status -> Brg.term -> XmlLibrary.pp
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module U = NUri
-module S = Share
-module L = Log
-module G = Options
-module H = Hierarchy
-module N = Layer
-module E = Entity
-module O = Output
-module B = Brg
-module BO = BrgOutput
-module BE = BrgEnvironment
-
-type rtm = {
- e: B.lenv; (* environment *)
- s: (B.lenv * B.term) list; (* stack *)
- l: int; (* level *)
- d: int; (* inferred type iterations *)
- n: int option; (* expected type iterations *)
-}
-
-type message = (rtm, B.term) L.message
-
-(* Internal functions *******************************************************)
-
-let level = 5
-
-let sublevel = succ level
-
-let log1 st s c t =
- let s1, s2 = s ^ " in the environment", "the term" in
- L.log st BO.specs (pred level) (L.et_items1 s1 c s2 t)
-
-let log2 st s cu u ct t =
- let s1, s2, s3 = s ^ " in the environment (expected)", "the term", "and in the environment (inferred)" in
- L.log st BO.specs (pred level) (L.et_items2 s1 cu s2 u ~sc2:s3 ~c2:ct s2 t)
-
-let rec list_and map = function
- | hd1 :: tl1, hd2 :: tl2 ->
- if map hd1 hd2 then list_and map (tl1, tl2) else false
- | l1, l2 -> l1 = l2
-
-let zero = Some 0
-
-(* check closure *)
-let are_alpha_convertible err f t1 t2 =
- let rec aux f = function
- | B.Sort (_, p1), B.Sort (_, p2)
- | B.LRef (_, p1), B.LRef (_, p2) ->
- if p1 = p2 then f () else err ()
- | B.GRef (_, u1), B.GRef (_, u2) ->
- if U.eq u1 u2 then f () else err ()
- | B.Cast (_, v1, t1), B.Cast (_, v2, t2)
- | B.Appl (_, v1, t1), B.Appl (_, v2, t2) ->
- let f _ = aux f (t1, t2) in
- aux f (v1, v2)
- | B.Bind (_, b1, t1), B.Bind (_, b2, t2) ->
- let f _ = aux f (t1, t2) in
- aux_bind f (b1, b2)
- | _ -> err ()
- and aux_bind f = function
- | B.Abbr v1, B.Abbr v2 -> aux f (v1, v2)
- | B.Abst (n1, v1), B.Abst (n2, v2) when n1 = n2 -> aux f (v1, v2)
- | B.Void, B.Void -> f ()
- | _ -> err ()
- in
- if S.eq t1 t2 then f () else aux f (t1, t2)
-
-let assert_tstep m vo = match m.n with
- | Some n -> n > m.d
- | None -> vo
-
-let tstep m = {m with d = succ m.d}
-
-let tsteps m = match m.n with
- | Some n when n > m.d -> n - m.d
- | _ -> 0
-
-let get m i =
- let _, c, a, b = B.get m.e i in c, a, b
-
-(* to share *)
-let rec step st m x =
- if !G.trace >= sublevel then
- log1 st (Printf.sprintf "entering R.step: l:%u d:%i n:%s" m.l m.d (match m.n with Some n -> string_of_int n | None -> "infinite")) m.e x;
- match x with
- | B.Sort (a, h) ->
- if assert_tstep m false then
- step st (tstep m) (B.Sort (a, H.apply h))
- else m, x, None
- | B.GRef (_, uri) ->
- begin match BE.get_entity uri with
- | _, _, _, E.Abbr v ->
- if m.n = None || !G.expand then begin
- if !G.summary then O.add ~gdelta:1 ();
- step st m v
- end else
- m, x, Some v
- | _, _, _, E.Abst w ->
- if assert_tstep m true then begin
- if !G.summary then O.add ~grt:1 ();
- step st (tstep m) w
- end else
- m, x, None
- | _, _, _, E.Void ->
- assert false
- end
- | B.LRef (_, i) ->
- begin match get m i with
- | c, _, B.Abbr v ->
- if !G.summary then O.add ~ldelta:1 ();
- step st {m with e = c} v
- | c, a, B.Abst (_, w) ->
- if assert_tstep m true then begin
- if !G.summary then O.add ~lrt:1 ();
- step st {(tstep m) with e = c} w
- end else
- m, B.LRef (a, i), None
- | _, _, B.Void ->
- assert false
- end
- | B.Cast (_, u, t) ->
- if assert_tstep m false then begin
- if !G.summary then O.add ~e:1 ();
- step st (tstep m) u
- end else begin
- if !G.summary then O.add ~epsilon:1 ();
- step st m t
- end
- | B.Appl (_, v, t) ->
- step st {m with s = (m.e, v) :: m.s} t
- | B.Bind (a, B.Abst (n, w), t) ->
- if !G.si || N.is_not_zero st n then begin match m.s with
- | [] ->
- let i = tsteps m in
- if i = 0 then m, x, None else
- let n = N.minus st n i in
- m, B.Bind (a, B.Abst (n, w), t), None
- | (c, v) :: s ->
- if !G.cc && not (N.assert_not_zero st n) then assert false;
- if !G.summary then O.add ~beta:1 ~theta:(List.length s) ();
- let v = if assert_tstep m false then B.Cast (E.empty_node, w, v) else v in
- let e = B.push m.e c a (B.abbr v) in
- step st {m with e = e; s = s} t
- end else begin
- if !G.summary then O.add ~upsilon:1 ();
- let e = B.push m.e m.e a B.Void in
- step st {m with e = e} t
- end
- | B.Bind (a, b, t) ->
- if !G.summary then O.add ~theta:(List.length m.s) ();
- let e = B.push m.e m.e a b in
- step st {m with e = e} t
-
-let reset m ?(e=m.e) n =
- {m with e = e; n = n; s = []; d = 0}
-
-let assert_iterations m1 m2 = match m1.n, m2.n with
- | Some n1, Some n2 -> n1 - m1.d = n2 - m2.d
- | _ -> false
-
-let push m a b =
- let a, l = match b with
- | B.Abst _ -> {a with E.n_apix = m.l}, succ m.l
- | _ -> a, m.l
- in
- let e = B.push m.e m.e a b in
- {m with e = e; l = l}
-
-let rec ac_nfs st (m1, t1, r1) (m2, t2, r2) =
- if !G.trace >= level then log2 st "Now converting nfs" m1.e t1 m2.e t2;
- match t1, r1, t2, r2 with
- | B.Sort (_, h1), _, B.Sort (_, h2), _ ->
- h1 = h2
- | B.LRef ({E.n_apix = e1}, _), _,
- B.LRef ({E.n_apix = e2}, _), _ ->
- if e1 = e2 then ac_stacks st m1 m2 else false
- | B.GRef (_, u1), None, B.GRef (_, u2), None ->
- if U.eq u1 u2 && assert_iterations m1 m2 then ac_stacks st m1 m2 else false
- | B.GRef ({E.n_apix = e1}, u1), Some v1,
- B.GRef ({E.n_apix = e2}, u2), Some v2 ->
- if e1 < e2 then begin
- if !G.summary then O.add ~gdelta:1 ();
- ac_nfs st (m1, t1, r1) (step st m2 v2)
- end else if e2 < e1 then begin
- if !G.summary then O.add ~gdelta:1 ();
- ac_nfs st (step st m1 v1) (m2, t2, r2)
- end else if U.eq u1 u2 && assert_iterations m1 m2 && ac_stacks st m1 m2 then true
- else begin
- if !G.summary then O.add ~gdelta:2 ();
- ac st m1 v1 m2 v2
- end
- | _, _, B.GRef _, Some v2 ->
- if !G.summary then O.add ~gdelta:1 ();
- ac_nfs st (m1, t1, r1) (step st m2 v2)
- | B.GRef _, Some v1, _, _ ->
- if !G.summary then O.add ~gdelta:1 ();
- ac_nfs st (step st m1 v1) (m2, t2, r2)
- | B.Bind (a1, (B.Abst (n1, w1) as b1), t1), _,
- B.Bind (a2, (B.Abst (n2, w2) as b2), t2), _ ->
- if !G.cc && not (N.assert_equal st n1 n2) then false else
- if ac st (reset m1 zero) w1 (reset m2 zero) w2 then
- ac st (push m1 a1 b1) t1 (push m2 a2 b2) t2
- else false
- | B.Sort _, _, B.Bind (a, B.Abst (n, _), t), _ ->
- if !G.si then
- if !G.cc && not (N.assert_zero st n) then false else begin
- if !G.summary then O.add ~upsilon:1 ();
- ac st (push m1 a B.Void) t1 (push m2 a B.Void) t end
- else false
- | _ -> false
-
-and ac st m1 t1 m2 t2 =
-(* L.warn "entering R.are_convertible"; *)
- ac_nfs st (step st m1 t1) (step st m2 t2)
-
-and ac_stacks st m1 m2 =
-(* L.warn "entering R.are_convertible_stacks"; *)
- if List.length m1.s <> List.length m2.s then false else
- let map (c1, v1) (c2, v2) =
- let m1, m2 = reset m1 ~e:c1 zero, reset m2 ~e:c2 zero in
- ac st m1 v1 m2 v2
- in
- list_and map (m1.s, m2.s)
-
-(* Interface functions ******************************************************)
-
-let empty_rtm = {
- e = B.empty; s = []; l = 0; d = 0; n = None
-}
-
-let get m i =
- assert (m.s = []);
- let _, _, _, b = B.get m.e i in b
-
-let xwhd st m n t =
- if !G.trace >= level then log1 st "Now scanning" m.e t;
- let m, t, _ = step st (reset m n) t in
- m, t
-
-let are_convertible st m1 n1 t1 m2 n2 t2 =
- if !G.trace >= level then log2 st "Now converting" m1.e t1 m2.e t2;
- let r = ac st (reset m1 n1) t1 (reset m2 n2) t2 in
- r
-(* let err _ = in
- if S.eq mu mw then are_alpha_convertible err f u w else err () *)
-
-(* error reporting **********************************************************)
-
-let pp_term st m och t = BO.specs.L.pp_term st m.e och t
-
-let pp_lenv st och m = BO.specs.L.pp_lenv st och m.e
-
-let specs = {
- L.pp_term = pp_term; L.pp_lenv = pp_lenv
-}
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-type rtm
-
-type message = (rtm, Brg.term) Log.message
-
-val empty_rtm: rtm
-
-val get: rtm -> int -> Brg.bind
-
-val push: rtm -> Entity.node_attrs -> Brg.bind -> rtm
-
-val xwhd: Layer.status -> rtm -> int option -> Brg.term -> rtm * Brg.term
-
-(* arguments: expected type, inferred type *)
-val are_convertible:
- Layer.status -> rtm -> int option -> Brg.term -> rtm -> int option -> Brg.term -> bool
-
-val specs: (Layer.status, rtm, Brg.term) Log.specs
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module G = Options
-module B = Brg
-
-let rec icm a = function
- | B.Sort _
- | B.LRef _
- | B.GRef _ -> succ a
- | B.Bind (_, B.Void, t) -> icm (succ a) t
- | B.Cast (_, u, t) -> icm (icm a u) t
- | B.Appl (_, u, t)
- | B.Bind (_, B.Abst (_, u), t)
- | B.Bind (_, B.Abbr u, t) -> icm (icm (succ a) u) t
-
-let iter map d =
- let rec iter_bind d = function
- | B.Void -> B.Void
- | B.Abst (n, w) -> B.Abst (n, iter_term d w)
- | B.Abbr v -> B.Abbr (iter_term d v)
- and iter_term d = function
- | B.Sort _ as t -> t
- | B.GRef _ as t -> t
- | B.LRef (a, i) as t -> if i < d then t else map d a i
- | B.Cast (a, w, v) -> B.Cast (a, iter_term d w, iter_term d v)
- | B.Appl (a, w, u) -> B.Appl (a, iter_term d w, iter_term d u)
- | B.Bind (a, b, u) -> B.Bind (a, iter_bind d b, iter_term (succ d) u)
- in
- iter_term d
-
-let lift_map h _ a i =
- if i + h >= 0 then B.LRef (a, i + h) else assert false
-
-let lift h d t =
- if h = 0 then t else begin
-(*
- G.icm := succ !G.icm;
- G.icm := icm !G.icm t;
-*)
- iter (lift_map h) d t
- end
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val lift: int -> int -> Brg.term -> Brg.term
-(*
-val lift_bind: (Brg.bind -> 'a) -> int -> int -> Brg.bind -> 'a
-*)
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module U = NUri
-module C = Cps
-module S = Share
-module L = Log
-module G = Options
-module H = Hierarchy
-module N = Layer
-module E = Entity
-module B = Brg
-module BE = BrgEnvironment
-module BS = BrgSubstitution
-module BR = BrgReduction
-
-(* Internal functions *******************************************************)
-
-let level = 4
-
-let message1 st1 m t1 =
- L.et_items1 "In the environment" m st1 t1
-
-let log1 st s m t =
- let s = s ^ " the term" in
- L.log st BR.specs (pred level) (message1 s m t)
-
-let error1 err s m t =
- err (message1 s m t)
-
-let message3 m t1 t2 ?mu t3 =
- let sm, st1, st2 = "In the environment", "the term", "is of type" in
- match mu with
- | Some mu ->
- let smu, st3 = "but in the environment", "it must be of type" in
- L.et_items3 sm m st1 t1 st2 t2 ~sc3:smu ~c3:mu st3 t3
- | None ->
- let st3 = "but it must be of type" in
- L.et_items3 sm m st1 t1 st2 t2 st3 t3
-
-let error3 err m t1 t2 ?mu t3 =
- err (message3 m t1 t2 ?mu t3)
-
-let zero = Some 0
-
-let assert_convertibility err f st m u w v =
- if BR.are_convertible st m zero u m zero w then f () else
- error3 err m v w u
-
-let assert_applicability err f st m u w v =
- match BR.xwhd st m None u with
- | _, B.Sort _ ->
- error1 err "not a function type" m u
- | mu, B.Bind (_, B.Abst (n, u), _) ->
- if !G.cc && not (N.assert_not_zero st n) then error1 err "not a function type" m u else
- if BR.are_convertible st mu zero u m zero w then f () else
- error3 err m v w ~mu u
- | _ -> assert false (**)
-
-let rec b_type_of err f st m x =
- if !G.trace >= level then log1 st "Now checking" m x;
- match x with
- | B.Sort (a, h) ->
- let h = H.apply h in f x (B.Sort (a, h))
- | B.LRef (_, i) ->
- begin match BR.get m i with
- | B.Abst (_, w) ->
- f x (BS.lift (succ i) (0) w)
- | B.Abbr (B.Cast (_, w, _)) ->
- f x (BS.lift (succ i) (0) w)
- | B.Abbr _ -> assert false
- | B.Void ->
- error1 err "reference to excluded variable" m x
- end
- | B.GRef (_, uri) ->
- begin match BE.get_entity uri with
- | _, _, _, E.Abst w -> f x w
- | _, _, _, E.Abbr (B.Cast (_, w, _)) -> f x w
- | _, _, _, E.Abbr _ -> assert false
- | _, _, _, E.Void ->
- error1 err "reference to unknown entry" m x
- end
- | B.Bind (a, B.Abbr v, t) ->
- let f xv xt tt =
- f (S.sh2 v xv t xt x (B.bind_abbr a)) (B.bind_abbr a xv tt)
- in
- let f xv m = b_type_of err (f xv) st m t in
- let f xv = f xv (BR.push m a (B.abbr xv)) in
- let f xv vv = match xv with
- | B.Cast _ -> f xv
- | _ -> f (B.Cast (E.empty_node, vv, xv))
- in
- type_of err f st m v
- | B.Bind (a, B.Abst (n, u), t) ->
- let f xu xt tt =
- f (S.sh2 u xu t xt x (B.bind_abst n a)) (B.bind_abst (N.minus st n 1) a xu tt)
- in
- let f xu m = b_type_of err (f xu) st m t in
- let f xu _ = f xu (BR.push m a (B.abst n xu)) in
- type_of err f st m u
- | B.Bind (a, B.Void, t) ->
- let f xt tt =
- f (S.sh1 t xt x (B.bind_void a)) (B.bind_void a tt)
- in
- b_type_of err f st (BR.push m a B.Void) t
-
- | B.Appl (a, v, t) ->
- let f xv vv xt tt =
- let f _ = f (S.sh2 v xv t xt x (B.appl a)) (B.appl a xv tt) in
- assert_applicability err f st m tt vv xv
- in
- let f xv vv = b_type_of err (f xv vv) st m t in
- type_of err f st m v
- | B.Cast (a, u, t) ->
- let f xu xt tt =
- let f _ = f (S.sh2 u xu t xt x (B.cast a)) xu in
- assert_convertibility err f st m xu tt xt
- in
- let f xu _ = b_type_of err (f xu) st m t in
- type_of err f st m u
-
-(* Interface functions ******************************************************)
-
-and type_of err f st m x = b_type_of err f st m x
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val type_of:
- (BrgReduction.message -> 'a) -> (Brg.term -> Brg.term -> 'a) ->
- Layer.status -> BrgReduction.rtm -> Brg.term -> 'a
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module U = NUri
-module L = Log
-module E = Entity
-module B = Brg
-module BE = BrgEnvironment
-module BR = BrgReduction
-module BT = BrgType
-module BV = BrgValidity
-
-(* Interface functions ******************************************************)
-
-(* to share *)
-let type_check err f st = function
- | ra, na, uri, E.Abst t ->
- let err msg = err (L.Uri uri :: msg) in
- let f xt tt =
- let e = BE.set_entity (ra, na, uri, E.Abst xt) in f tt e
- in
- BT.type_of err f st BR.empty_rtm t
- | ra, na, uri, E.Abbr t ->
- let err msg = err (L.Uri uri :: msg) in
- let f xt tt =
- let xt = match xt with
- | B.Cast _ -> xt
- | _ -> B.Cast (E.empty_node, tt, xt)
- in
- let e = BE.set_entity (ra, na, uri, E.Abbr xt) in f tt e
- in
- BT.type_of err f st BR.empty_rtm t
- | _, _, _, E.Void -> assert false
-
-let validate err f st e =
- let uri, t = match e with
- | _, _, uri, E.Abst t -> uri, t
- | _, _, uri, E.Abbr t -> uri, t
- | _, _, _, E.Void -> assert false
- in
- let err msg = err (L.Uri uri :: msg) in
- let f () = let _ = BE.set_entity e in f () in
- BV.validate err f st BR.empty_rtm t
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val type_check:
- (BrgReduction.message -> 'a) -> (Brg.term -> Brg.entity -> 'a) ->
- Layer.status -> Brg.entity -> 'a
-
-val validate:
- (BrgReduction.message -> 'a) -> (unit -> 'a) ->
- Layer.status -> Brg.entity -> 'a
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module L = Log
-module G = Options
-module N = Layer
-module E = Entity
-module B = Brg
-module BE = BrgEnvironment
-module BR = BrgReduction
-
-(* Internal functions *******************************************************)
-
-let level = 4
-
-let warn s = L.warn (pred level) s
-
-let message1 st1 m t1 =
- L.et_items1 "In the environment" m st1 t1
-
-let log1 st s m t =
- let s = s ^ " the term" in
- L.log st BR.specs (pred level) (message1 s m t)
-
-let error1 err s m t =
- err (message1 s m t)
-
-let message2 m1 t1 m2 t2 =
- let sm2, st2 = "In the environment", "the term" in
- let sm1, st1 = "is valid, but in the environment", "it must be of type" in
- L.et_items2 sm2 m2 st2 t2 ~sc2:sm1 ~c2:m1 st1 t1
-
-let error2 err m1 t1 m2 t2 =
- err (message2 m1 t1 m2 t2)
-
-let zero = Some 0
-
-let one = Some 1
-
-let assert_convertibility err f st m u t =
- if !G.trace >= level then warn "Asserting convertibility for cast";
- if BR.are_convertible st m zero u m one t then f () else
- error2 err m u m t
-
-let assert_applicability err f st m v t =
- if !G.trace >= level then warn "Asserting applicability";
- match BR.xwhd st m None t with
- | _, B.Sort _ ->
- error1 err "not a function" m t
- | mw, B.Bind (_, B.Abst (n, w), _) ->
- if !G.cc && not (N.assert_not_zero st n) then error1 err "not a function" m t
- else begin
- if !G.trace >= level then warn "Asserting convertibility for application";
- if BR.are_convertible st mw zero w m one v then f () else
- error2 err mw w m v
- end
- | _ -> assert false (**)
-
-let rec b_validate err f st m x =
- if !G.trace >= level then log1 st "Now checking" m x;
- match x with
- | B.Sort _ -> f ()
- | B.LRef (_, i) ->
- begin match BR.get m i with
- | B.Abst _
- | B.Abbr _ -> f ()
- | B.Void ->
- error1 err "reference to excluded variable" m x
- end
- | B.GRef (_, uri) ->
- begin match BE.get_entity uri with
- | _, _, _, E.Abst _
- | _, _, _, E.Abbr _ -> f ()
- | _, _, _, E.Void ->
- error1 err "reference to unknown entry" m x
- end
- | B.Bind (a, b, t) ->
- let f () = b_validate err f st (BR.push m a b) t in
- begin match b with
- | B.Abst (n, u) -> validate err f st m u
- | B.Abbr v -> validate err f st m v
- | B.Void -> f ()
- end
- | B.Appl (_, v, t) ->
- let f () = assert_applicability err f st m v t in
- let f () = b_validate err f st m t in
- validate err f st m v
- | B.Cast (_, u, t) ->
- let f () = assert_convertibility err f st m u t in
- let f () = b_validate err f st m t in
- validate err f st m u
-
-(* Interface functions ******************************************************)
-
-and validate err f st m x = b_validate err f st m x
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val validate:
- (BrgReduction.message -> 'a) -> (unit -> 'a) ->
- Layer.status -> BrgReduction.rtm -> Brg.term -> 'a
+++ /dev/null
-options marks hierarchy layer entity output alpha
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module E = Entity
-
-(* interface functions ******************************************************)
-
-let rec alpha mem x a =
- let err () = a in
- let f () = match a.E.n_name with
- | None -> assert false
- | Some (token, mode) -> alpha mem x {a with E.n_name = Some (token ^ "_", mode)}
- in
- mem err f x a
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val alpha: ((unit -> Entity.node_attrs) -> (unit -> Entity.node_attrs) ->
- 'a -> Entity.node_attrs -> Entity.node_attrs
- ) ->
- 'a -> Entity.node_attrs -> Entity.node_attrs
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module U = NUri
-module N = Layer
-
-type uri = U.uri
-
-type id = string (* identifier *)
-
-type name = id * bool (* token, real? *)
-
-type meta = Main (* main object *)
- | InProp (* inhabitant of a proposition *)
- | Progress (* uncompleted object *)
- | Private (* private global definition *)
-
-type node_attrs = {
- n_name: name option; (* name *)
- n_apix: int; (* additional position index *)
- n_degr: int; (* degree *)
- n_sort: int; (* sort *)
-}
-
-type root_attrs = {
- r_meta: meta list; (* metaliguistic classification *)
- r_info: (string * string) option; (* metaliguistic annotation: language (defaults to "en-US"), text *)
-}
-
-type 'term bind = Abst of 'term (* declaration: domain *)
- | Abbr of 'term (* definition: body *)
- | Void (* exclusion *)
-
-type 'term entity = root_attrs * node_attrs * uri * 'term bind (* attrs, uri, binder *)
-
-(* helpers ******************************************************************)
-
-let node_attrs ?(apix=0) ?name ?(degr=0) ?(sort=0) () = {
- n_apix = apix; n_name = name; n_degr = degr; n_sort = sort
-}
-
-let root_attrs ?(meta=[]) ?info () = {
- r_meta = meta; r_info = info;
-}
-
-let empty_node = node_attrs ()
-
-let empty_root = root_attrs ()
-
-let common f (ra, na, u, _) = f ra na u
-
-let rec name err f a = match a.n_name with
- | Some (n, r) -> f n r
- | None -> err ()
-
-let rec info err f a = match a.r_info with
- | Some (lg, tx) -> f lg tx
- | None -> err ()
-
-let xlate f xlate_term = function
- | ra, na, uri, Abst t ->
- let f t = f (ra, na, uri, Abst t) in xlate_term f t
- | ra, na, uri, Abbr t ->
- let f t = f (ra, na, uri, Abbr t) in xlate_term f t
- | _, _, _, Void ->
- assert false
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module K = Hashtbl
-module P = Scanf
-
-module C = Cps
-
-type graph = string * (int -> int)
-
-let sorts = 3
-let sort = K.create sorts
-
-let default_graph = "Z1"
-
-(* Internal functions *******************************************************)
-
-let set_sort h s =
- K.add sort h s; succ h
-
-let graph_of_string err f s =
- try
- let x = P.sscanf s "Z%u" C.start in
- if x > 0 then f (s, fun h -> x + h) else err ()
- with
- P.Scan_failure _ | Failure _ | End_of_file -> err ()
-
-let graph = ref (graph_of_string C.err C.start default_graph)
-
-(* Interface functions ******************************************************)
-
-let set_sorts i ss =
- List.fold_left set_sort i ss
-
-let string_of_sort err f h =
- try f (K.find sort h) with Not_found -> err ()
-
-let sort_of_string err f s =
- let map h n = function
- | None when n = s -> Some h
- | xh -> xh
- in
- match K.fold map sort None with
- | None -> err ()
- | Some h -> f h
-
-let string_of_graph () = fst !graph
-
-let apply h = snd !graph h
-
-let set_graph s =
- let err () = false in
- let f g = graph := g; true in
- graph_of_string err f s
-
-let clear () =
- K.clear sort; graph := graph_of_string C.err C.start default_graph
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val set_sorts: int -> string list -> int
-
-val string_of_sort: (unit -> 'a) -> (string -> 'a) -> int -> 'a
-
-val sort_of_string: (unit -> 'a) -> (int -> 'a) -> string -> 'a
-
-val set_graph: string -> bool
-
-val string_of_graph: unit -> string
-
-val apply: int -> int
-
-val clear: unit -> unit
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module H = Hashtbl
-
-module L = Log
-module G = Options
-module J = Marks
-
-type value = Inf (* infinite layer *)
- | Fin of int (* finite layer *)
- | Ref of J.mark * int (* referred layer, step *)
- | Unk (* no layer set *)
-
-type layer = {
- mutable v: value; (* value *)
- s: bool; (* static layer? *)
- mutable b: bool; (* beta allowed? *)
-}
-
-type status = (J.mark, layer) H.t (* environment for layer variables *)
-
-(* Internal functions *******************************************************)
-
-let level = 7
-
-let env_size = 1300
-
-let warn s = L.warn (pred level) s
-
-let zero = Fin 0
-
-let string_of_value k = function
- | Inf -> ""
- | Fin i -> string_of_int i
- | Ref (k, i) -> "-" ^ J.string_of_mark k ^ "-" ^ string_of_int i
- | Unk -> "-" ^ J.string_of_mark k
-
-let pp_table st =
- let map k n =
- warn (Printf.sprintf "%s: v %s (s:%b b:%b)"
- (J.string_of_mark k) (string_of_value k n.v) n.s n.b
- )
- in
- H.iter map st
-
-let cell s v = {
- v = v; s = s; b = false
-}
-
-let empty () = cell true Unk
-
-let dynamic k i = cell false (Ref (k, i))
-
-let find_with_default st default k =
- try H.find st k with Not_found -> H.add st k default; default
-
-let find st k =
- try H.find st k with Not_found -> assert false
-
-let rec resolve_key_with_default st default k = match find_with_default st default k with
- | {v = Ref (k, i)} when i = 0 -> resolve_key_with_default st default k
- | cell -> k, cell
-
-let rec resolve_key st k = match find st k with
- | {v = Ref (k, i)} when i = 0 -> resolve_key st k
- | cell -> k, cell
-
-let resolve_layer st = function
- | {v = Ref (k, i)} when i = 0 -> resolve_key st k
- | cell -> J.null_mark, cell
-
-let rec generated st h i =
- let default = dynamic h i in
- let k = J.new_mark () in
- match resolve_key_with_default st default k with
- | k, n when n = default -> if !G.trace >= level then pp_table st; n
- | _, n when n.s = true -> generated st h i
- | _ -> assert false
-
-let assert_finite st n j =
- if !G.trace >= level then warn (Printf.sprintf "ASSERT FINITE %u" j);
- let rec aux (k, n) j = match n.v with
- | Fin i when i = j -> true
- | Fin i ->
- Printf.printf "binder %s is %u but must be %u\n" (J.string_of_mark k) i j; true (**)
- | Inf ->
- Printf.printf "binder %s is infinite but must be %u\n" (J.string_of_mark k) j; true (**)
- | Unk -> n.v <- Fin j; if !G.trace >= level then pp_table st; true
- | Ref (k, i) -> n.v <- Fin j; aux (resolve_key st k) (i+j)
- in
- let k, n = resolve_layer st n in
-(* if j = 0 && n.b then begin
- Printf.printf "^Pi reduction on binder %s\n" (J.string_of_mark k); false (**)
- end else *)
- aux (k, n) j
-
-let assert_infinite st n =
- if !G.trace >= level then warn "ASSERT INFINITE";
- let rec aux (k, n) = match n.v with
- | Inf -> true
- | Fin i ->
- Printf.printf "binder %s is %u but must be infinite\n" (J.string_of_mark k) i; true (**)
- | Unk -> n.v <- Inf; if !G.trace >= level then pp_table st; true
- | Ref (k, _) -> n.v <- Inf; aux (resolve_key st k)
- in
- aux (resolve_layer st n)
-
-(* Interface functions ******************************************************)
-
-let initial_status () =
- H.create env_size
-
-let refresh_status st = st
-
-let infinite = cell true Inf
-
-let finite i = cell true (Fin i)
-
-let one = finite 1
-
-let two = finite 2
-
-let rec unknown st =
- if !G.trace >= level then warn "UNKNOWN";
- let default = empty () in
- let k = J.new_mark () in
- match resolve_key_with_default st default k with
- | k, n when n = default -> if !G.trace >= level then pp_table st; cell true (Ref (k, 0))
- | _, n when n.s = true -> n
- | _ -> unknown st
-
-let minus st n j =
- if !G.trace >= level then warn (Printf.sprintf "MINUS %u" j);
- let rec aux k n j = match n.v with
- | Inf -> cell false n.v
- | Fin i when i > j -> cell false (Fin (i - j))
- | Fin _ -> cell false zero
- | Unk ->
- if k = J.null_mark then assert false else generated st k j
- | Ref (k, i) ->
- let k, n = resolve_key st k in
- aux k n (i+j)
- in
- let k, n = resolve_layer st n in
- aux k n j
-
-let to_string st n =
- let k, n = resolve_layer st n in
- string_of_value k n.v
-
-let assert_not_zero st n =
- if !G.trace >= level then warn "ASSERT NOT ZERO";
- let k, n = resolve_layer st n in
- match n.b, n.v with
- | true, _ -> n.b
-(* | _ , Fin i when i = 0 ->
- Printf.printf "^Pi reduction on binder %s\n" (J.string_of_mark k); false *) (**)
-(* if n.s && n.v = Fin 1 then Printf.printf "Pi reduction on binder %s\n" (J.string_of_mark k); *)
- | _ -> n.b <- true; if !G.trace >= level then pp_table st; n.b
-
-let assert_zero st n = assert_finite st n 0
-
-let assert_equal st n1 n2 =
- let k1, n1 = resolve_layer st n1 in
- let k2, n2 = resolve_layer st n2 in
- if n1 = n2 then true else
- let b =
- if not n1.b || assert_not_zero st n2 then match n1.v with
- | Inf -> assert_infinite st n2
- | Fin i -> assert_finite st n2 i
- | Unk -> true
- | Ref _ -> assert false
- else false
- in begin
- if !G.trace >= level then warn "ASSERT EQUAL";
- if b && k1 <> J.null_mark && k2 <> J.null_mark then begin
- n1.v <- Ref (k2, 0); if !G.trace >= level then pp_table st
- end; b end
-
-let is_not_zero st n =
- let _, n = resolve_layer st n in n.v <> zero
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-type status
-
-type layer
-
-val initial_status: unit -> status
-
-val refresh_status: status -> status
-
-val infinite: layer
-
-val finite: int -> layer
-
-val one: layer
-
-val two: layer
-
-val unknown: status -> layer
-
-val minus: status -> layer -> int -> layer
-
-val to_string: status -> layer -> string
-
-val assert_not_zero: status -> layer -> bool
-
-val assert_zero: status -> layer -> bool
-
-val assert_equal: status -> layer -> layer -> bool
-
-val is_not_zero: status -> layer -> bool
-
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-type mark = int
-
-let mark = ref 0
-
-(* interface functions ******************************************************)
-
-let marks () = !mark
-
-let new_mark () =
- incr mark; !mark
-
-let null_mark = 0
-
-let string_of_mark i = string_of_int i
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-type mark
-
-val marks: unit -> int
-
-val new_mark: unit -> mark
-
-val null_mark: mark
-
-val string_of_mark: mark -> string
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module F = Filename
-
-module C = Cps
-
-type uri_generator = string -> string
-
-type kernel = Crg | Brg | Bag
-
-(* interface functions ******************************************************)
-
-let version_string = "Helena 0.8.2 M - December 2014"
-
-let stage = ref 3 (* stage *)
-
-let trace = ref 0 (* trace level *)
-
-let summary = ref false (* log summary information *)
-
-let xdir = ref "" (* directory for XML output *)
-
-let kernel = ref Brg (* kernel type *)
-
-let si = ref false (* use sort inclusion *)
-
-let cover = ref "" (* initial uri segment *)
-
-let cc = ref false (* activate conversion constraints *)
-
-let expand = ref false (* always expand global definitions *)
-
-let indexes = ref false (* show de Bruijn indexes *)
-
-let icm = ref 0 (* complexity measure of relocated terms *)
-
-let unquote = ref false (* do not quote identifiers when lexing *)
-
-let debug_parser = ref false (* output parser debug information *)
-
-let debug_lexer = ref false (* output lexer debug information *)
-
-let ma_dir = ref "" (* directory for grafite output *)
-
-let ma_preamble = ref "" (* location of grafite preamble file *)
-
-let alpha = ref "" (* prefix of numeric identifiers *)
-
-let kernel_id () =
- let id = match !kernel with
- | Crg -> "crg"
- | Brg -> "brg"
- | Bag -> "bag"
- in
- let si = if !si then "_si" else "" in
- id ^ si
-
-let get_baseuri () =
- String.concat "/" ["ld:"; kernel_id (); !cover; "" ]
-
-let get_mk_uri () =
- let bu = get_baseuri () in
- fun s -> F.concat bu (s ^ ".ld")
-
-let clear () =
- stage := 3; trace := 0; summary := false;
- xdir := ""; kernel := Brg; si := false; cover := "";
- expand := false; indexes := false; icm := 0; unquote := false;
- debug_parser := false; debug_lexer := false;
- ma_dir := ""; ma_preamble := ""
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module P = Printf
-
-module L = Log
-module G = Options
-
-type reductions = {
- beta : int;
- zeta : int;
- theta : int;
- epsilon: int;
- ldelta : int;
- gdelta : int;
- upsilon: int;
- lrt : int;
- grt : int;
- e : int;
-}
-
-let level = 2
-
-let initial_reductions = {
- beta = 0; theta = 0; epsilon = 0; zeta = 0; ldelta = 0; gdelta = 0; upsilon = 0;
- lrt = 0; grt = 0; e = 0;
-}
-
-let reductions = ref initial_reductions
-
-let clear_reductions () = reductions := initial_reductions
-
-let add
- ?(beta=0) ?(theta=0) ?(epsilon=0) ?(ldelta=0) ?(gdelta=0) ?(zeta=0)
- ?(upsilon=0) ?(lrt=0) ?(grt=0) ?(e=0) ()
-= reductions := {
- beta = !reductions.beta + beta;
- zeta = !reductions.zeta + zeta;
- theta = !reductions.theta + theta;
- epsilon = !reductions.epsilon + epsilon;
- ldelta = !reductions.ldelta + ldelta;
- gdelta = !reductions.gdelta + gdelta;
- upsilon = !reductions.upsilon + upsilon;
- lrt = !reductions.lrt + lrt;
- grt = !reductions.grt + grt;
- e = !reductions.e + e;
-}
-
-let print_reductions () =
- let r = !reductions in
- let rs = r.beta + r.ldelta + r.zeta + r.theta + r.epsilon + r.gdelta + r.upsilon in
- let prs = r.lrt + r.grt + r.e in
- let delta = r.ldelta + r.gdelta in
- let rt = r.lrt + r.grt in
- L.warn level (P.sprintf "Reductions summary");
- L.warn level (P.sprintf " Proper reductions: %7u" rs);
- L.warn level (P.sprintf " Beta: %7u" r.beta);
- L.warn level (P.sprintf " Delta: %7u" delta);
- L.warn level (P.sprintf " Local: %7u" r.ldelta);
- L.warn level (P.sprintf " Global: %7u" r.gdelta);
- L.warn level (P.sprintf " Theta: %7u" r.theta);
- L.warn level (P.sprintf " Zeta for abbreviation: %7u" r.zeta);
- L.warn level (P.sprintf " Zeta for cast: %7u" r.epsilon);
- L.warn level (P.sprintf " Sort inclusion: %7u" r.upsilon);
- L.warn level (P.sprintf " Pseudo reductions: %7u" prs);
- L.warn level (P.sprintf " Reference typing: %7u" rt);
- L.warn level (P.sprintf " Local: %7u" r.lrt);
- L.warn level (P.sprintf " Global: %7u" r.grt);
- L.warn level (P.sprintf " Cast typing: %7u" r.e);
- L.warn level (P.sprintf "Relocated nodes (icm): %7u" !G.icm)
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val clear_reductions: unit -> unit
-
-val add:
- ?beta:int -> ?theta:int -> ?epsilon:int -> ?ldelta:int -> ?gdelta:int ->
- ?zeta:int -> ?upsilon:int -> ?lrt:int -> ?grt:int -> ?e:int ->
- unit -> unit
-
-val print_reductions: unit -> unit
+++ /dev/null
-crg crgOutput
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-(* kernel version: complete, relative, global *)
-(* note : fragment of complete \lambda\delta serving as abstract layer *)
-
-module C = Cps
-module N = Layer
-module E = Entity
-
-type uri = E.uri
-type id = E.id
-type attrs = E.node_attrs
-
-type bind = Abst of N.layer * term (* layer, type *)
- | Abbr of term (* body *)
- | Void (* *)
-
-and term = TSort of attrs * int (* attrs, hierarchy index *)
- | TLRef of attrs * int (* attrs, position indexe *)
- | TGRef of attrs * uri (* attrs, reference *)
- | TCast of attrs * term * term (* attrs, domain, element *)
- | TAppl of attrs * term * term (* attrs, argument, function *)
- | TBind of attrs * bind * term (* attrs, binder, scope *)
- | TProj of attrs * lenv * term (* attrs, closure, member *)
-
-and lenv = ESort (* top *)
- | EBind of lenv * attrs * bind (* environment, attrs, binder *)
- | EAppl of lenv * attrs * term (* environment, attrs, argument *)
- | EProj of lenv * attrs * lenv (* environment, attrs, closure *)
-
-type entity = term E.entity
-
-(* helpers ******************************************************************)
-
-let empty_lenv = ESort
-
-let push_bind f a b lenv = f (EBind (lenv, a, b))
-
-let push_appl f a t lenv = f (EAppl (lenv, a, t))
-
-let push_proj f a e lenv = f (EProj (lenv, a, e))
-
-let add_bind f a b t = f (TBind (a, b, t))
-
-let add_appl f a v t = f (TAppl (a, v, t))
-
-let add_proj f a e t = f (TProj (a, e, t))
-
-let rec shift f c t = match c with
- | ESort -> f t
- | EBind (e, a, b) -> add_bind (shift f e) a b t
- | EAppl (e, a, v) -> add_appl (shift f e) a v t
- | EProj (e, a, d) -> add_proj (shift f e) a d t
-
-let rec append f c = function
- | ESort -> f c
- | EBind (e, a, b) -> append (push_bind f a b) c e
- | EAppl (e, a, t) -> append (push_appl f a t) c e
- | EProj (e, a, d) -> append (push_proj f a d) c e
-
-let resolve_lref err f id lenv =
- let rec aux i = function
- | ESort -> err ()
- | EAppl (tl, _, _) -> aux i tl
- | EBind (tl, a, _) ->
- let f id0 _ = if id0 = id then f a i else aux (succ i) tl in
- E.name err f a
- | EProj (tl, _, d) -> append (aux i) tl d
- in
- aux 0 lenv
-
-let rec get_name err f i = function
- | ESort -> err i
- | EAppl (tl, _, _) -> get_name err f i tl
- | EBind (_, a, _) when i = 0 ->
- let err () = err i in
- E.name err f a
- | EBind (tl, _, _) -> get_name err f (pred i) tl
- | EProj (tl, _, e) ->
- let err i = get_name err f i tl in
- get_name err f i e
-
-let rec get e i = match e with
- | ESort -> ESort, E.empty_node, Void
- | EBind (e, a, b) when i = 0 -> e, a, b
- | EBind (e, _, _) -> get e (pred i)
- | EAppl (e, _, _) -> get e i
- | EProj (e, _, d) -> get (append C.start e d) i
-
-let rec sub_list_strict f e l = match e, l with
- | _, [] -> f e
- | EBind (e, _, Abst _), _ :: tl -> sub_list_strict f e tl
- | _ -> assert false
-
-let rec fold_names f map x = function
- | ESort -> f x
- | EBind (e, {E.n_name = Some n}, Abst _) -> fold_names f map (map x n) e
- | _ -> assert false
-
-let rec mem err f e b = match e with
- | ESort -> err ()
- | EBind (e, a, _) ->
- if a.E.n_name = b.E.n_name then f () else mem err f e b
- | EAppl (e, _, _) -> mem err f e b
- | EProj (e, _, d) ->
- let err () = mem err f e b in mem err f d b
-
-let rec sta f = function
- | ESort -> f ESort
- | EBind (e, a, Abst (_, w)) -> sta (push_bind f a (Abst (N.one, w))) e
- | EBind (e, a, b) -> sta (push_bind f a b) e
- | EAppl (e, a, v) -> sta (push_appl f a v) e
- | EProj (e, a, d) -> let f d = sta (push_proj f a d) e in sta f d
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module P = Printf
-
-module U = NUri
-module C = Cps
-module L = Log
-module J = Marks
-module N = Layer
-module E = Entity
-module D = Crg
-
-(* nodes count **************************************************************)
-
-let level = 2
-
-type counters = {
- eabsts: int;
- eabbrs: int;
- evoids: int;
- tsorts: int;
- tlrefs: int;
- tgrefs: int;
- tcasts: int;
- tappls: int;
- tabsts: int;
- tabbrs: int;
- tvoids: int;
- uris : D.uri list;
- nodes : int;
- xnodes: int
-}
-
-let initial_counters = {
- eabsts = 0; eabbrs = 0; evoids = 0;
- tsorts = 0; tlrefs = 0; tgrefs = 0; tcasts = 0; tappls = 0;
- tabsts = 0; tabbrs = 0; tvoids = 0;
- uris = []; nodes = 0; xnodes = 0
-}
-
-let rec count_term f c e = function
- | D.TSort _ ->
- f {c with tsorts = succ c.tsorts; nodes = succ c.nodes}
- | D.TLRef (_, i) ->
- begin match D.get e i with
- | _, _, D.Abbr _ ->
- f {c with tlrefs = succ c.tlrefs; xnodes = succ c.xnodes}
- | _ ->
- f {c with tlrefs = succ c.tlrefs; nodes = succ c.nodes}
- end
- | D.TGRef (_, u) ->
- let c =
- if C.list_mem ~eq:U.eq u c.uris
- then {c with nodes = succ c.nodes}
- else {c with xnodes = succ c.xnodes}
- in
- f {c with tgrefs = succ c.tgrefs}
- | D.TCast (_, v, t) ->
- let c = {c with tcasts = succ c.tcasts} in
- let f c = count_term f c e t in
- count_term f c e v
- | D.TAppl (_, v, t) ->
- let c = {c with tappls = succ c.tappls} in
- let f c = count_term f c e t in
- count_term f c e v
- | D.TProj (_, d, t) ->
- D.shift (count_term f c e) d t
- | D.TBind (a, b, t) ->
- let f c e = count_term f c e t in
- count_binder f c e a b
-
-and count_binder f c e a b = match b with
- | D.Abst (_, w) ->
- let c = {c with tabsts = succ c.tabsts; nodes = succ c.nodes} in
- let f c = D.push_bind (f c) a b e in
- count_term f c e w
- | D.Abbr v ->
- let c = {c with tabbrs = succ c.tabbrs; xnodes = succ c.xnodes} in
- let f c = D.push_bind (f c) a b e in
- count_term f c e v
- | D.Void ->
- let c = {c with tvoids = succ c.tvoids; xnodes = succ c.xnodes} in
- D.push_bind (f c) a b e
-
-let count_entity f c = function
- | _, _, u, E.Abst w ->
- let c = {c with
- eabsts = succ c.eabsts; nodes = succ c.nodes; uris = u :: c.uris
- } in
- count_term f c D.ESort w
- | _, _, _, E.Abbr v ->
- let c = {c with eabbrs = succ c.eabbrs; xnodes = succ c.xnodes} in
- count_term f c D.ESort v
- | _, _, _, E.Void -> assert false
-
-let print_counters f c =
- let terms =
- c.tsorts + c.tgrefs + c.tgrefs + c.tcasts + c.tappls + c.tabsts +
- c.tabbrs
- in
- let items = c.eabsts + c.eabbrs in
- let nodes = c.nodes + c.xnodes in
- let marks = J.marks () in
- L.warn level (P.sprintf "Intermediate representation summary (complete_rg)");
- L.warn level (P.sprintf " Total entry items: %7u" items);
- L.warn level (P.sprintf " Declaration items: %7u" c.eabsts);
- L.warn level (P.sprintf " Definition items: %7u" c.eabbrs);
- L.warn level (P.sprintf " Total term items: %7u" terms);
- L.warn level (P.sprintf " Sort items: %7u" c.tsorts);
- L.warn level (P.sprintf " Local reference items: %7u" c.tlrefs);
- L.warn level (P.sprintf " Global reference items: %7u" c.tgrefs);
- L.warn level (P.sprintf " Explicit Cast items: %7u" c.tcasts);
- L.warn level (P.sprintf " Application items: %7u" c.tappls);
- L.warn level (P.sprintf " Abstraction items: %7u" c.tabsts);
- L.warn level (P.sprintf " Abbreviation items: %7u" c.tabbrs);
- L.warn level (P.sprintf " Ambiguous abstractions: %7u" marks);
- L.warn level (P.sprintf " Global Int. Complexity: %7u" c.nodes);
- L.warn level (P.sprintf " + Abbreviation nodes: %7u" nodes);
- f ()
-
-(* term/environment pretty printer ******************************************)
-
-let pp_attrs out a =
- let f s b = if b then out (P.sprintf "%s;" s) else out (P.sprintf "~%s;" s) in
- E.name ignore f a;
- out (P.sprintf "+%i;" a.E.n_apix)
-
-let rec pp_term out st = function
- | D.TSort (a, l) -> pp_attrs out a; out (P.sprintf "*%u" l)
- | D.TLRef (a, i ) -> pp_attrs out a; out (P.sprintf "#%u" i)
- | D.TGRef (a, u) -> pp_attrs out a; out (P.sprintf "$")
- | D.TCast (a, x, y) -> pp_attrs out a; out "<"; pp_term out st x; out ">."; pp_term out st y
- | D.TAppl (a, x, y) -> pp_attrs out a; out "("; pp_term out st x; out ")."; pp_term out st y
- | D.TBind (a, x, y) -> pp_attrs out a; pp_bind out st x; out "."; pp_term out st y
- | D.TProj (a, x, y) -> pp_attrs out a; out "{"; pp_lenv out st x; out "}."; pp_term out st y
-
-and pp_bind out st = function
- | D.Abst (n, x) ->
- out "[:"; pp_term out st x; out "]"; out (N.to_string st n)
- | D.Abbr x -> out "[="; pp_term out st x; out "]";
- | D.Void -> out "[]"
-
-and pp_lenv out st = function
- | D.ESort -> ()
- | D.EBind (x, a, y) -> pp_lenv out st x; pp_attrs out a; pp_bind out st y
- | D.EAppl (x, a, y) -> pp_lenv out st x; out "("; pp_term out st y; out ")"
- | D.EProj (x, a, y) -> pp_lenv out st x; out "{"; pp_lenv out st y; out "}"
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-type counters
-
-val initial_counters: counters
-
-val count_entity: (counters -> 'a) -> counters -> Crg.entity -> 'a
-
-val print_counters: (unit -> 'a) -> counters -> 'a
-
-val pp_term: (string -> unit) -> Layer.status -> Crg.term -> unit
+++ /dev/null
-cps share log time
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-let err _ = assert false
-
-let start x = x
-
-let id f x = f x
-
-let rec list_sub_strict f l1 l2 = match l1, l2 with
- | _, [] -> f l1
- | _ :: tl1, _ :: tl2 -> list_sub_strict f tl1 tl2
- | _ -> assert false
-
-let rec list_fold f map a = function
- | [] -> f a
- | hd :: tl -> list_fold f map (map a hd) tl
-
-(* this is not tail recursive *)
-let rec list_fold_left f map a = function
- | [] -> f a
- | hd :: tl ->
- let f a = list_fold_left f map a tl in
- map f a hd
-
-(* this is not tail recursive *)
-let rec list_rev_map_append f map ~tail = function
- | [] -> f tail
- | hd :: tl ->
- let f hd = list_rev_map_append f map ~tail:(hd :: tail) tl in
- map f hd
-
-(* this is not tail recursive *)
-let rec list_forall2 f map l1 l2 = match l1, l2 with
- | [], [] -> f true
- | hd1 :: tl1, hd2 :: tl2 ->
- let f b = if b then list_forall2 f map tl1 tl2 else f false in
- map f hd1 hd2
- | _ -> f false
-
-let list_rev_append f =
- list_rev_map_append f (fun f t -> f t)
-
-let list_rev_map =
- list_rev_map_append ~tail:[]
-
-let list_rev =
- list_rev_append ~tail:[]
-
-let list_iter f map l =
- let map f () x = map f x in
- list_fold_left f map () l
-
-(* this is not tail recursive *)
-let rec list_fold_left2 f map a l1 l2 = match l1, l2 with
- | [], [] -> f a
- | hd1 :: tl1, hd2 :: tl2 ->
- let f a = list_fold_left2 f map a tl1 tl2 in
- map f a hd1 hd2
- | _ -> assert false
-
-let list_iter2 f map l1 l2 =
- let map f () x1 x2 = map f x1 x2 in
- list_fold_left2 f map () l1 l2
-
-let rec list_fold_right f map l a = match l with
- | [] -> f a
- | hd :: tl -> list_fold_right (map f hd) map tl a
-
-let rec list_fold_right2 f map l1 l2 a = match l1, l2 with
- | [], [] -> f a
- | hd1 :: tl1, hd2 :: tl2 -> list_fold_right2 (map f hd1 hd2) map tl1 tl2 a
- | _ -> failwith "Cps.list_fold_right2"
-
-let list_map f map l =
- let map f hd a =
- let f hd = f (hd :: a) in map f hd
- in
- list_fold_right f map l []
-
-let rec list_mem ?(eq=(=)) a = function
- | [] -> false
- | hd :: _ when eq a hd -> true
- | _ :: tl -> list_mem ~eq a tl
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module S = String
-module P = Printf
-
-module U = NUri
-
-type ('b, 'c) item = Term of 'b * 'c
- | LEnv of 'b
- | Warn of string
- | Uri of U.uri
-
-type ('b, 'c) message = ('b, 'c) item list
-
-type ('a, 'b, 'c) specs = {
- pp_term: 'a -> 'b -> out_channel -> 'c -> unit;
- pp_lenv: 'a -> out_channel -> 'b -> unit
-}
-
-(* Internal functions *******************************************************)
-
-let std = stdout
-
-let err = stderr
-
-let pp_items och a st l items =
- let indent = S.make (l+l) ' ' in
- let pp_item och = function
- | Term (c, t) -> P.fprintf och "%s%a\n" indent (st.pp_term a c) t
- | LEnv c -> P.fprintf och "%s%a" indent (st.pp_lenv a) c
- | Warn s -> P.fprintf och "%s%s\n" indent s
- | Uri u -> P.fprintf och "%s<%s>\n" indent (U.string_of_uri u)
- in
- let iter map och l = List.iter (map och) l in
- P.fprintf och "%a%!" (iter pp_item) items
-
-(* Interface functions ******************************************************)
-
-let log a st l items = pp_items std a st l items
-
-let error a st items = pp_items err a st 0 items
-
-let items1 s = [Warn s]
-
-let t_items1 st c t =
- [Warn st; Term (c, t)]
-
-let et_items1 sc c st t =
- [Warn sc; LEnv c; Warn st; Term (c, t)]
-
-let et_items2 sc1 c1 st1 t1 ?sc2 ?c2 st2 t2 =
- let tl = match sc2, c2 with
- | Some sc2, Some c2 -> et_items1 sc2 c2 st2 t2
- | None, None -> t_items1 st2 c1 t2
- | _ -> assert false
- in
- et_items1 sc1 c1 st1 t1 @ tl
-
-let et_items3 sc1 c1 st1 t1 ?sc2 ?c2 st2 t2 ?sc3 ?c3 st3 t3 =
- let tl = match sc3, c3 with
- | Some sc3, Some c3 -> et_items1 sc3 c3 st3 t3
- | None, None -> t_items1 st3 c1 t3
- | _ -> assert false
- in
- et_items2 sc1 c1 st1 t1 ?sc2 ?c2 st2 t2 @ tl
-
-let specs = {
- pp_term = (fun _ _ _ _ -> ());
- pp_lenv = (fun _ _ _ -> ());
-}
-
-let warn level str = log () specs level (items1 str)
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-type ('b, 'c) item = Term of 'b * 'c
- | LEnv of 'b
- | Warn of string
- | Uri of NUri.uri
-
-type ('b, 'c) message = ('b, 'c) item list
-
-type ('a, 'b, 'c) specs = {
- pp_term: 'a -> 'b -> out_channel -> 'c -> unit;
- pp_lenv: 'a -> out_channel -> 'b -> unit
-}
-
-val specs: (unit, unit, unit) specs
-
-val log: 'a -> ('a, 'b, 'c) specs -> int -> ('b, 'c) message -> unit
-
-val error: 'a -> ('a, 'b, 'c) specs -> ('b, 'c) message -> unit
-
-val items1: string -> ('b, 'c) message
-
-val t_items1: string -> 'b -> 'c -> ('b, 'c) message
-
-val et_items1:
- string -> 'b -> string -> 'c -> ('b, 'c) message
-
-val et_items2:
- string -> 'b -> string -> 'c ->
- ?sc2:string -> ?c2:'b -> string -> 'c ->
- ('b, 'c) message
-
-val et_items3:
- string -> 'b -> string -> 'c ->
- ?sc2:string -> ?c2:'b -> string -> 'c ->
- ?sc3:string -> ?c3:'b -> string -> 'c ->
- ('b, 'c) message
-
-val warn: int -> string -> unit
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-let sh a b =
- if a == b then a else b
-
-let sh1 a1 a2 b1 b2 =
- if a1 == a2 then b1 else b2 (sh a1 a2)
-
-let sh2 a1 a2 b1 b2 c1 c2 =
- if a1 == a2 && b1 == b2 then c1 else c2 (sh a1 a2) (sh b1 b2)
-
-let eq a b = (a == b) || (a = b)
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module P = Printf
-
-module L = Log
-
-let level = 1
-
-let utime_stamp =
- let old = ref 0.0 in
- fun msg ->
- let times = Unix.times () in
- let stamp = times.Unix.tms_utime in
- let lap = stamp -. !old in
- let str = P.sprintf "USR TIME STAMP (%s): %f (%f)" msg stamp lap in
- L.warn level str;
- old := stamp
-
-let gmtime msg =
- let gmt = Unix.gmtime (Unix.time ()) in
- let yy = gmt.Unix.tm_year + 1900 in
- let mm = gmt.Unix.tm_mon + 1 in
- let dd = gmt.Unix.tm_mday in
- let h = gmt.Unix.tm_hour in
- let m = gmt.Unix.tm_min in
- let s = gmt.Unix.tm_sec in
- let str = P.sprintf "UTC TIME STAMP (%s): %u/%u/%u %u:%u:%u" msg yy mm dd h m s in
- L.warn level str;
+++ /dev/null
-(* free = F I K M P Q U V W *)
-
-module U = NUri
-module UH = NUri.UriHash
-
-module C = Cps
-module S = Share
-module L = Log
-module Y = Time (**)
-
-module G = Options
-module J = Marks (**)
-module H = Hierarchy
-module N = Layer
-module E = Entity
-module O = Output
-module R = Alpha
-
-module D = Crg
-module DO = CrgOutput
-
-module T = Txt
-module TP = TxtParser
-module TL = TxtLexer
-module TT = TxtTxt
-module TD = TxtCrg
-
-module A = Aut
-module AA = AutProcess
-module AO = AutOutput
-module AP = AutParser
-module AL = AutLexer
-module AD = AutCrg
-
-module XL = XmlLibrary
-module XD = XmlCrg
-
-module B = Brg
-module BD = BrgCrg
-module BO = BrgOutput
-module BE = BrgEnvironment
-module BS = BrgSubstitution
-module BR = BrgReduction
-module BT = BrgType
-module BV = BrgValidity
-module BU = BrgUntrusted
-module BG = BrgGrafite
-
-module Z = Bag
-module ZD = BrgCrg
-module ZO = BagOutput
-module ZE = BagEnvironment
-module ZS = BagSubstitution
-module ZR = BagReduction
-module ZT = BagType
-module ZU = BagUntrusted
-(*
- top
-*)
+++ /dev/null
-txt txtParser txtLexer txtTxt txtCrg
+++ /dev/null
-\open pippo
-
-\global a : *Set
-
-\global b : *Prop
-
-\global f = [x:*Set].[y:*Prop].x
-
-\global "commento\"" c = f(a,b) : *Set
-
-\close
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module N = Layer
-
-type ix = int (* index *)
-
-type id = string (* identifier *)
-
-type info = string * string (* language, text *)
-
-type kind = Decl (* generic declaration *)
- | Ax (* axiom *)
- | Cong (* conjecture *)
- | Def (* generic definition *)
- | Th (* theorem *)
-
-type bind =
-(* name, real?, domain *)
- | Abst of (id * bool * term) list
-(* name, bodies *)
- | Abbr of (id * term) list
-(* names *)
- | Void of id list
-
-and term =
-(* level *)
- | Sort of ix
-(* named level *)
- | NSrt of id
-(* index, offset *)
- | LRef of ix * ix
-(* name *)
- | NRef of id
-(* domain, element *)
- | Cast of term * term
-(* arguments, function *)
- | Appl of term list * term
-(* level, binder, scope *)
- | Bind of N.layer * bind * term
-(* function, arguments *)
- | Inst of term * term list
-(* level, strong?, label, source, target *)
- | Impl of N.layer * bool * id * term * term
-
-type command =
-(* required files: names *)
- | Require of id list
-(* hierarchy graph: name *)
- | Graph of id
-(* sorts: index, name *)
- | Sorts of (int option * id) list
-(* section: Some id = open, None = close last *)
- | Section of id option
-(* entity: main?, class, name, info, contents *)
- | Entity of bool * kind * N.layer * id * info * term
-(* predefined generated entity: arguments *)
- | Generate of term list
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module U = NUri
-module C = Cps
-module G = Options
-module H = Hierarchy
-module E = Entity
-module T = Txt
-module TT = TxtTxt
-module D = Crg
-
-type status = {
- path : T.id list; (* current section path *)
- line : int; (* line number *)
- sort : int; (* first default sort index *)
- mk_uri: G.uri_generator (* uri generator *)
-}
-
-let henv_size = 7000 (* hash tables initial size *)
-
-let henv = Hashtbl.create henv_size (* optimized global environment *)
-
-(* Internal functions *******************************************************)
-(*
-let name_of_id ?(r=true) id = E.Name (id, r)
-
-let mk_lref f i j k = f (D.TLRef ([E.Apix k], i, j))
-
-let mk_gref f uri = f (D.TGRef ([], uri))
-
-let uri_of_id st id path =
- let str = String.concat "/" path in
- let str = Filename.concat str id in
- let str = st.mk_uri str in
- U.uri_of_string str
-
-let resolve_gref err f st id =
- try f (Hashtbl.find henv id)
- with Not_found -> err ()
-
-let rec xlate_term f st lenv = function
- | T.Inst _
- | T.Impl _ -> assert false
- | T.Sort h ->
- f (D.TSort ([], h))
- | T.NSrt id ->
- let f h = f (D.TSort ([], h)) in
- H.sort_of_string C.err f id
- | T.LRef (i, j) ->
- D.get_index C.err (mk_lref f i j) i j lenv
- | T.NRef id ->
- let err () = resolve_gref C.err (mk_gref f) st id in
- D.resolve_lref err (mk_lref f) id lenv
- | T.Cast (u, t) ->
- let f uu tt = f (D.TCast ([], uu, tt)) in
- let f uu = xlate_term (f uu) st lenv t in
- xlate_term f st lenv u
- | T.Appl (vs, t) ->
- let map f = xlate_term f st lenv in
- let f vvs tt = f (D.TAppl ([], vvs, tt)) in
- let f vvs = xlate_term (f vvs) st lenv t in
- C.list_map f map vs
- | T.Bind (n, b, t) ->
- let abst_map (lenv, a, wws) (id, r, w) =
- let attr = name_of_id ~r id in
- let ww = xlate_term C.start st lenv w in
- D.push2 C.err C.start lenv ~attr ~t:ww (), attr :: a, ww :: wws
- in
- let abbr_map (lenv, a, wws) (id, w) =
- let attr = name_of_id id in
- let ww = xlate_term C.start st lenv w in
- D.push2 C.err C.start lenv ~attr ~t:ww (), attr :: a, ww :: wws
- in
- let void_map (lenv, a, n) id =
- let attr = name_of_id id in
- D.push2 C.err C.start lenv ~attr (), attr :: a, succ n
- in
- let lenv, aa, bb = match b with
- | T.Abst xws ->
- let lenv = D.push_bind C.start lenv [] (D.Abst (n, [])) in
- let lenv, aa, wws = List.fold_left abst_map (lenv, [], []) xws in
- lenv, aa, D.Abst (n, wws)
- | T.Abbr xvs ->
- let lenv = D.push_bind C.start lenv [] (D.Abbr []) in
- let lenv, aa, vvs = List.fold_left abbr_map (lenv, [], []) xvs in
- lenv, aa, D.Abbr vvs
- | T.Void ids ->
- let lenv = D.push_bind C.start lenv [] (D.Void 0) in
- let lenv, aa, n = List.fold_left void_map (lenv, [], 0) ids in
- lenv, aa, D.Void n
- in
- let f tt = f (D.TBind (aa, bb, tt)) in
- xlate_term f st lenv t
-
-let xlate_term f st lenv t =
- TT.contract (xlate_term f st lenv) t
-
-let mk_contents n tt = function
- | T.Decl -> [] , E.Abst (n, tt)
- | T.Ax -> [E.InProp] , E.Abst (n, tt)
- | T.Cong -> [E.InProp; E.Progress], E.Abst (n, tt)
- | T.Def -> [] , E.Abbr tt
- | T.Th -> [E.InProp] , E.Abbr tt
-
-let xlate_entity err f gen st = function
- | T.Require _ ->
- err st
- | T.Section (Some name) ->
- err {st with path = name :: st.path}
- | T.Section None ->
- begin match st.path with
- | _ :: ptl ->
- err {st with path = ptl}
- | _ -> assert false
- end
- | T.Sorts sorts ->
- let map st (xix, s) =
- let ix = match xix with
- | None -> st.sort
- | Some ix -> ix
- in
- {st with sort = H.set_sorts ix [s]}
- in
- err (List.fold_left map st sorts)
- | T.Graph id ->
- assert (H.set_graph id); err st
- | T.Entity (main, kind, n, id, info, t) ->
- let uri = uri_of_id st id st.path in
- Hashtbl.add henv id uri;
- let tt = xlate_term C.start st D.empty_lenv t in
-(*
- print_newline (); CrgOutput.pp_term print_string tt;
-*)
- let a = [] in
- let ms, b = mk_contents n tt kind in
- let ms = if main then E.Main :: ms else ms in
- let a = if ms <> [] then E.Meta ms :: a else a in
- let a = if info <> ("", "") then E.Info info :: a else a in
- let entity = E.Mark st.line :: a, uri, b in
- f {st with line = succ st.line} entity
- | T.Generate _ ->
- err st
-
-(* Interface functions ******************************************************)
-*)
-let initial_status () =
- Hashtbl.clear henv; {
- path = []; line = 1; sort = 0; mk_uri = G.get_mk_uri ()
-}
-
-let refresh_status st = {st with
- mk_uri = G.get_mk_uri ()
-}
-
-let crg_of_txt _ _ = assert false (* xlate_entity *)
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-type status
-
-val initial_status: unit -> status
-
-val refresh_status: status -> status
-
-val crg_of_txt: (status -> 'a) -> (status -> Crg.entity -> 'a) ->
- (Txt.command -> unit) -> status -> Txt.command -> 'a
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-{
- module L = Log
- module G = Options
- module TP = TxtParser
-
- let level = 0
-
- let out s = if !G.debug_lexer then L.warn level s else ()
-}
-
-let BS = "\\"
-let SPC = [' ' '\t' '\n']+
-let OC = "\\*"
-let CC = "*\\"
-let FIG = ['0'-'9']
-let ALPHA = ['A'-'Z' 'a'-'z' '_']
-let QT = '"'
-let ID = ALPHA+ (ALPHA | FIG)*
-let IX = FIG+
-
-rule block_comment = parse
- | CC { () }
- | OC { block_comment lexbuf; block_comment lexbuf }
- | _ { block_comment lexbuf }
-and qstring = parse
- | QT { "" }
- | SPC { " " ^ qstring lexbuf }
- | BS BS { "\\" ^ qstring lexbuf }
- | BS QT { "\"" ^ qstring lexbuf }
- | _ as c { String.make 1 c ^ qstring lexbuf }
-and token = parse
- | SPC { token lexbuf }
- | OC { block_comment lexbuf; token lexbuf }
- | ID as id { out ("ID " ^ id); TP.ID id }
- | IX as ix { out ("IX " ^ ix); TP.IX (int_of_string ix) }
- | QT { let s = qstring lexbuf in out ("STR " ^ s); TP.STR s }
- | "\\graph" { out "GRAPH"; TP.GRAPH }
- | "\\main" { out "MAIN"; TP.MAIN }
- | "\\decl" { out "DECL"; TP.DECL }
- | "\\ax" { out "AX"; TP.AX }
- | "\\cong" { out "CONG"; TP.CONG }
- | "\\def" { out "DEF"; TP.DEF }
- | "\\th" { out "TH"; TP.TH }
- | "\\generate" { out "GEN"; TP.GEN }
- | "\\require" { out "REQ"; TP.REQ }
- | "\\open" { out "OPEN"; TP.OPEN }
- | "\\close" { out "CLOSE"; TP.CLOSE }
- | "\\sorts" { out "SORTS"; TP.SORTS }
- | "(" { out "OP"; TP.OP }
- | ")" { out "CP"; TP.CP }
- | "[" { out "OB"; TP.OB }
- | "]" { out "CB"; TP.CB }
- | "<" { out "OA"; TP.OA }
- | ">" { out "CA"; TP.CA }
- | "." { out "FS"; TP.FS }
- | ":" { out "CN"; TP.CN }
- | "," { out "CM"; TP.CM }
- | "=" { out "EQ"; TP.EQ }
- | "*" { out "STAR"; TP.STAR }
- | "#" { out "HASH"; TP.HASH }
- | "+" { out "PLUS"; TP.PLUS }
- | "~" { out "TE"; TP.TE }
- | "->" { out "WTO"; TP.WTO }
- | "=>" { out "STO"; TP.STO }
- | "^" { out "CT"; TP.CT }
- | eof { out "EOF"; TP.EOF }
+++ /dev/null
-/* Copyright (C) 2000, HELM Team.
- *
- * This file is part of HELM, an Hypertextual, Electronic
- * Library of Mathematics, developed at the Computer Science
- * Department, University of Bologna, Italy.
- *
- * HELM is free software; you can redistribute it and/or
- * modify it under the terms of the GNU General Public License
- * as published by the Free Software Foundation; either version 2
- * of the License, or (at your option) any later version.
- *
- * HELM is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with HELM; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston,
- * MA 02111-1307, USA.
- *
- * For details, see the HELM World-Wide-Web page,
- * http://cs.unibo.it/helm/.
- */
-
-%{
- module G = Options
- module N = Layer
- module T = Txt
-
- let _ = Parsing.set_trace !G.debug_parser
-%}
- %token <int> IX
- %token <string> ID STR
- %token OP CP OB CB OA CA FS CN CM EQ STAR HASH PLUS TE WTO STO CT
- %token GRAPH MAIN DECL AX CONG DEF TH GEN REQ OPEN CLOSE SORTS EOF
-
- %start entry
- %type <Txt.command option> entry
-
- %nonassoc CP CB CA
- %right WTO STO
-%%
- hash:
- | {}
- | HASH {}
- ;
- fs:
- | {}
- | FS {}
- ;
- main:
- | { false }
- | MAIN { true }
- ;
- comment:
- | { "", "" }
- | STR { "", $1 }
- | STR STR { $1, $2 }
- ;
- ids:
- | ID { [$1] }
- | ID CM ids { $1 :: $3 }
- ;
- sort:
- | ID { None, $1 }
- | IX ID { Some $1, $2 }
- ;
- sorts:
- | sort { [$1] }
- | sort CM sorts { $1 :: $3 }
- ;
- level:
- | { N.infinite }
- | CT IX { N.finite $2}
- ;
-
- abst:
- | ID CN term { $1, true, $3 }
- | TE term { "", false, $2 }
- | ID TE term { $1, false, $3 }
- ;
- abbr:
- | ID EQ term { $1, $3 }
- ;
- absts:
- | abst { [$1] }
- | abst CM absts { $1 :: $3 }
- ;
- abbrs:
- | abbr { [$1] }
- | abbr CM abbrs { $1 :: $3 }
- ;
- binder:
- | absts { T.Abst $1 }
- | abbrs { T.Abbr $1 }
- | ids { T.Void $1 }
- ;
- atom:
- | STAR IX { T.Sort $2 }
- | STAR ID { T.NSrt $2 }
- | hash IX { T.LRef ($2, 0) }
- | hash IX PLUS IX { T.LRef ($2, $4) }
- | ID { T.NRef $1 }
- | HASH ID { T.NRef $2 }
- | atom OP term CP { T.Inst ($1, [$3]) }
- | atom OP terms CP { T.Inst ($1, $3) }
- ;
- term:
- | atom { $1 }
- | OA term CA fs term { T.Cast ($2, $5) }
- | OP term CP fs term { T.Appl ([$2], $5) }
- | OP terms CP fs term { T.Appl ($2, $5) }
- | OB binder CB level fs term { T.Bind ($4, $2, $6) }
- | term WTO level term { T.Impl ($3, false, "", $1, $4) }
- | ID TE term WTO level term { T.Impl ($5, false, $1, $3, $6) }
- | term STO level term { T.Impl ($3, true, "", $1, $4) }
- | ID TE term STO level term { T.Impl ($5, true, $1, $3, $6) }
- | OP term CP { $2 }
- ;
- terms:
- | term CM term { [$1; $3] }
- | term CM terms { $1 :: $3 }
- ;
-
- decl:
- | DECL { T.Decl }
- | AX { T.Ax }
- | CONG { T.Cong }
- ;
- def:
- | DEF { T.Def }
- | TH { T.Th }
- ;
- xentity:
- | GRAPH ID
- { T.Graph $2 }
- | main decl level comment ID CN term
- { T.Entity ($1, $2, $3, $5, $4, $7) }
- | main def level comment ID EQ term
- { T.Entity ($1, $2, $3, $5, $4, $7) }
- | main def level comment ID EQ term CN term
- { T.Entity ($1, $2, $3, $5, $4, T.Cast ($9, $7)) }
- | GEN term
- { T.Generate [$2] }
- | GEN terms
- { T.Generate $2 }
- | REQ ids
- { T.Require $2 }
- | OPEN ID
- { T.Section (Some $2) }
- | CLOSE
- { T.Section None }
- | SORTS sorts
- { T.Sorts $2 }
- ;
- start:
- | GRAPH {} | decl {} | def {} | GEN {} |
- | REQ {} | OPEN {} | CLOSE {} | SORTS {} | EOF {}
- ;
- entry:
- | xentity start { Some $1 }
- | EOF { None }
- ;
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module C = Cps
-module T = Txt
-
-(* Interface functions ******************************************************)
-
-let rec contract f = function
- | T.Inst (t, vs) ->
- let tt = T.Appl (List.rev vs, t) in
- contract f tt
- | T.Impl (n, false, id, w, t) ->
- let tt = T.Bind (n, T.Abst [id, false, w], t) in
- contract f tt
- | T.Impl (n, true, id, w, t) ->
- let f = function
- | T.Bind (_, T.Abst [xw], T.Bind (n, T.Abst xws, tt)) ->
- f (T.Bind (n, T.Abst (xw :: xws), tt))
- | tt -> f tt
- in
- let tt = T.Impl (n, false, id, w, t) in
- contract f tt
- | T.Sort _
- | T.NSrt _
- | T.LRef _
- | T.NRef _ as t -> f t
- | T.Cast (u, t) ->
- let f tt uu = f (T.Cast (uu, tt)) in
- let f tt = contract (f tt) u in
- contract f t
- | T.Appl (vs, t) ->
- let f tt vvs = f (T.Appl (vvs, tt)) in
- let f tt = C.list_map (f tt) contract vs in
- contract f t
- | T.Bind (n, b, t) ->
- let f tt bb = f (T.Bind (n, bb, tt)) in
- let f tt = contract_binder (f tt) b in
- contract f t
-
-and contract_binder f = function
- | T.Void n as b -> f b
- | T.Abbr xvs ->
- let map f (id, v) =
- let f vv = f (id, vv) in contract f v
- in
- let f xvvs = f (T.Abbr xvvs) in
- C.list_map f map xvs
- | T.Abst xws ->
- let map f (id, real, w) =
- let f ww = f (id, real, ww) in contract f w
- in
- let f xwws = f (T.Abst xwws) in
- C.list_map f map xws
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val contract: (Txt.term -> 'a) -> Txt.term -> 'a
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module F = Filename
-module P = Printf
-
-module U = NUri
-module C = Cps
-module L = Log
-module Y = Time
-module G = Options
-module H = Hierarchy
-module N = Layer
-module E = Entity
-module O = Output
-module DO = CrgOutput
-module TD = TxtCrg
-module AA = AutProcess
-module AO = AutOutput
-module AD = AutCrg
-module XL = XmlLibrary
-module XD = XmlCrg
-module BD = BrgCrg
-module BO = BrgOutput
-module BR = BrgReduction
-module BU = BrgUntrusted
-module BG = BrgGrafite
-module ZD = BagCrg
-module ZO = BagOutput
-module ZT = BagType
-module ZU = BagUntrusted
-
-type status = {
- kst: N.status;
- tst: TD.status;
- pst: AA.status;
- ast: AD.status;
- ac : AO.counters;
- dc : DO.counters;
- bc : BO.counters;
- zc : ZO.counters;
- och: out_channel option;
-}
-
-let level = 0
-
-let bag_error st s msg =
- L.error st.kst ZO.specs (L.Warn s :: msg)
-
-let brg_error st s msg =
- L.error st.kst BR.specs (L.Warn s :: msg)
-
-let initial_status () = {
- kst = N.initial_status ();
- tst = TD.initial_status ();
- pst = AA.initial_status ();
- ast = AD.initial_status ();
- ac = AO.initial_counters;
- dc = DO.initial_counters;
- bc = BO.initial_counters;
- zc = ZO.initial_counters;
- och = None;
-}
-
-let refresh_status st = {st with
- kst = N.refresh_status st.kst;
- tst = TD.refresh_status st.tst;
- ast = AD.refresh_status st.ast;
-}
-
-(* kernel related ***********************************************************)
-
-type kernel_entity = BrgEntity of Brg.entity
- | BagEntity of Bag.entity
- | CrgEntity of Crg.entity
-
-let print_counters st = function
- | G.Crg -> DO.print_counters C.start st.dc
- | G.Brg -> BO.print_counters C.start st.bc
- | G.Bag -> ZO.print_counters C.start st.zc
-
-let xlate_entity st entity = match !G.kernel, entity with
- | G.Brg, CrgEntity e ->
- let f e = (BrgEntity e) in E.xlate f BD.brg_of_crg e
- | G.Bag, CrgEntity e ->
- let f e = (BagEntity e) in E.xlate f (ZD.bag_of_crg st.kst) e
- | _, entity -> entity
-
-let pp_progress e =
- let f _ na u =
- let s = U.string_of_uri u in
- L.warn 2 (P.sprintf "[%u] <%s>" na.E.n_apix s);
- in
- Y.utime_stamp "intermediate";
- match e with
- | CrgEntity e -> E.common f e
- | BrgEntity e -> E.common f e
- | BagEntity e -> E.common f e
-
-let count_entity st = function
- | BrgEntity e -> {st with bc = BO.count_entity C.start st.bc e}
- | BagEntity e -> {st with zc = ZO.count_entity C.start st.zc e}
- | CrgEntity e -> {st with dc = DO.count_entity C.start st.dc e}
-
-let export_entity st = function
- | CrgEntity e -> XL.export_entity (XD.export_term st.kst) e
- | BrgEntity e -> XL.export_entity (BO.export_term st.kst) e
- | BagEntity e -> XL.export_entity (ZO.export_term st.kst) e
-
-let type_check st k =
- let brg_err msg = brg_error st "Type Error" msg; failwith "Interrupted" in
- let bag_err msg = bag_error st "Type Error" msg; failwith "Interrupted" in
- let ok _ _ = st in
- match k with
- | BrgEntity entity -> BU.type_check brg_err ok st.kst entity
- | BagEntity entity -> ZU.type_check bag_err ok st.kst entity
- | CrgEntity _ -> st
-
-let validate st k =
- let brg_err msg = brg_error st "Validation Error" msg; failwith "Interrupted" in
- let ok _ = st in
- match k with
- | BrgEntity entity ->
- let st = BU.validate brg_err ok st.kst entity in
- begin match st.och with
- | None -> st
- | Some och ->
- if BG.output_entity st.kst och entity then st
- else begin L.warn level "Matita exportation stopped"; {st with och = None} end
- end
- | BagEntity _ -> st
- | CrgEntity _ -> st
-
-(* extended lexer ***********************************************************)
-
-type 'token lexer = {
- parse : Lexing.lexbuf -> 'token;
- mutable tokbuf: 'token option;
- mutable unget : bool
-}
-
-let initial_lexer parse = {
- parse = parse; tokbuf = None; unget = false
-}
-
-let token xl lexbuf = match xl.tokbuf with
- | Some token when xl.unget ->
- xl.unget <- false; token
- | _ ->
- let token = xl.parse lexbuf in
- xl.tokbuf <- Some token; token
-
-(* input related ************************************************************)
-
-type input = Text | Automath
-
-type input_entity = TxtEntity of Txt.command
- | AutEntity of Aut.command
- | NoEntity
-
-let type_of_input name =
- if F.check_suffix name ".hln" then Text
- else if F.check_suffix name ".aut" then
- let _ = H.set_sorts 0 ["Set"; "Prop"] in
- assert (H.set_graph "Z2");
- Automath
- else begin
- L.warn level (P.sprintf "Unknown file type: %s" name); exit 2
- end
-
-let txt_xl = initial_lexer TxtLexer.token
-
-let aut_xl = initial_lexer AutLexer.token
-
-let parbuf = ref [] (* parser buffer *)
-
-let gen_text command =
- parbuf := TxtEntity command :: !parbuf
-
-let entity_of_input lexbuf i = match i, !parbuf with
- | Automath, _ ->
- begin match AutParser.entry (token aut_xl) lexbuf with
- | Some e -> aut_xl.unget <- true; AutEntity e
- | None -> NoEntity
- end
- | Text, [] ->
- begin match TxtParser.entry (token txt_xl) lexbuf with
- | Some e -> txt_xl.unget <- true; TxtEntity e
- | None -> NoEntity
- end
- | Text, hd :: tl ->
- parbuf := tl; hd
-
-let process_input f st = function
- | AutEntity e ->
- let f pst e = f {st with pst = pst} (AutEntity e) in
- AA.process_command f st.pst e
- | xe -> f st xe
-
-let count_input st = function
- | AutEntity e -> {st with ac = AO.count_command C.start st.ac e}
- | xe -> st
-
-(****************************************************************************)
-
-let version = ref true
-let preprocess = ref false
-let root = ref ""
-let export = ref false
-let st = ref (initial_status ())
-let streaming = ref false (* parsing style (temporary) *)
-
-let process_2 st entity =
- let st = if !G.summary then count_entity st entity else st in
- if !export then export_entity st entity;
- if !G.stage >= 3 then
- let f = if !version then validate else type_check in
- f st entity
- else st
-
-let process_1 st entity =
- if !G.trace >= 3 then pp_progress entity;
- let st = if !G.summary then count_entity st entity else st in
- if !export && !G.stage = 1 then export_entity st entity;
- if !G.stage >= 2 then process_2 st (xlate_entity st entity) else st
-
-let process_0 st entity =
- let f st entity =
- if !G.stage = 0 then st else
- match entity with
- | AutEntity e ->
- let err ast = {st with ast = ast} in
- let g ast e = process_1 {st with ast = ast} (CrgEntity e) in
- AD.crg_of_aut err g st.kst st.ast e
- | TxtEntity e ->
- let crr tst = {st with tst = tst} in
- let d tst e = process_1 {st with tst = tst} (CrgEntity e) in
- TD.crg_of_txt crr d gen_text st.tst e
- | NoEntity -> assert false
- in
- let st = if !G.summary then count_input st entity else st in
- if !preprocess then process_input f st entity else f st entity
-
-let process_nostreaming st lexbuf input =
- let id x = x in
- let rec aux1 book = match entity_of_input lexbuf input with
- | NoEntity -> List.rev book
- | e -> aux1 (id e :: book)
- in
- let rec aux2 st = function
- | [] -> st
- | entity :: tl -> aux2 (process_0 st entity) tl
- in
- aux2 st (aux1 [])
-
-let process_streaming st lexbuf input =
- let rec aux st = match entity_of_input lexbuf input with
- | NoEntity -> st
- | e -> aux (process_0 st e)
- in
- aux st
-
-(****************************************************************************)
-
-let process st name =
- let process = if !streaming then process_streaming else process_nostreaming in
- let input = type_of_input name in
- let ich = open_in name in
- let lexbuf = Lexing.from_channel ich in
- let st = process st lexbuf input in
- close_in ich;
- st, input
-
-let main =
- let print_version () = L.warn level (G.version_string ^ "\n"); exit 0 in
- let set_hierarchy s =
- if H.set_graph s then () else
- L.warn level (P.sprintf "Unknown type hierarchy: %s" s)
- in
- let set_kernel = function
- | "brg" -> G.kernel := G.Brg
- | "bag" -> G.kernel := G.Bag
- | s -> L.warn level (P.sprintf "Unknown kernel version: %s" s)
- in
- let set_trace i =
- if !G.trace = 0 && i > 0 then Y.gmtime G.version_string;
- if !G.trace > 0 && i = 0 then Y.utime_stamp "at exit";
- G.trace := i;
- if i <= 1 then G.summary := false;
- if i <= 1 then preprocess := false
- in
- let set_summary () =
- if !G.trace >= 2 then G.summary := true
- in
- let set_preprocess () =
- if !G.trace >= 2 then begin preprocess := true; G.summary := true end
- in
- let clear_options () =
- export := false; preprocess := false;
- root := "";
- st := initial_status ();
- G.clear (); H.clear (); O.clear_reductions ();
- streaming := false;
- version := true
- in
- let process_file name =
- if !G.trace >= 2 then L.warn 1 (P.sprintf "Processing file: %s" name);
- if !G.trace >= 2 then Y.utime_stamp "started";
- let base_name = Filename.chop_extension (Filename.basename name) in
- let cover = F.concat !root base_name in
- if !G.stage <= 1 then G.kernel := G.Crg;
- G.cover := cover;
- if !G.ma_preamble <> "" then st := {!st with och = Some (BG.open_out base_name)};
- let sst, input = process (refresh_status !st) name in
- st := begin match sst.och with
- | None -> sst
- | Some och -> BG.close_out och; {sst with och = None}
- end;
- if !G.trace >= 2 then Y.utime_stamp "processed";
- if !G.summary then begin
- AO.print_counters C.start !st.ac;
- if !preprocess then AO.print_process_counters C.start !st.pst;
- if !G.stage >= 1 then print_counters !st G.Crg;
- if !G.stage >= 2 then print_counters !st !G.kernel;
- if !G.stage >= 3 then O.print_reductions ()
- end
- in
- let exit () =
- if !G.trace >= 1 then Y.utime_stamp "at exit"
- in
- let help =
- "Usage: helena [ -LPVXdgilopqtx1 | -Ts <number> | -MO <dir> | -m <file> | -ahkr <string> ]* [ <file> ]*\n\n" ^
- "Trace levels: 0 just errors (default), 1 time stamps, 2 processed files, 3 processed objects,\n" ^
- " 4 typing information, 5 conversion information, 6 reduction information,\n" ^
- " 7 level disambiguation\n\n" ^
- "Stages: 0 parsing, 1 to intermediate, 2 to untrusted, 3 to trusted (default)\n"
- in
- let help_L = " show lexer debug information" in
- let help_M = "<dir> set location of output directory (Grafite) to <dir> (default: current directory)" in
- let help_O = "<dir> set location of output directory (XML) to <dir> (default: current directory)" in
- let help_P = " show parser debug information" in
- let help_T = "<number> set trace level (see above)" in
- let help_V = " show version information" in
- let help_X = " clear options" in
-
- let help_a = "<string> set prefix of numeric identifiers (default: empty)" in
- let help_d = " show summary information (requires trace >= 2)" in
- let help_g = " always expand global definitions" in
- let help_h = "<string> set type hierarchy (default: \"Z1\")" in
- let help_i = " show local references by index" in
- let help_k = "<string> set kernel version (default: \"brg\")" in
- let help_l = " disambiguate binders level (Automath)" in
- let help_m = "<file> export kernel entities (Grafite) setting location of preamble to <file> (default: empty)" in
- let help_o = " activate sort inclusion (default: false)" in
- let help_p = " preprocess source (Automath)" in
- let help_q = " disable quotation of identifiers" in
- let help_r = "<string> set initial segment of URI hierarchy (default: empty)" in
- let help_s = "<number> set translation stage (see above)" in
- let help_t = " type check [version 1]" in
- let help_x = " export kernel entities (XML)" in
-
- let help_1 = " parse files with streaming policy" in
- at_exit exit;
- Arg.parse [
- ("-L", Arg.Set G.debug_lexer, help_L);
- ("-M", Arg.String ((:=) G.ma_dir), help_M);
- ("-O", Arg.String ((:=) G.xdir), help_O);
- ("-P", Arg.Set G.debug_parser, help_P);
- ("-T", Arg.Int set_trace, help_T);
- ("-V", Arg.Unit print_version, help_V);
- ("-X", Arg.Unit clear_options, help_X);
- ("-a", Arg.String ((:=) G.alpha), help_a);
- ("-d", Arg.Unit set_summary, help_d);
- ("-g", Arg.Set G.expand, help_g);
- ("-h", Arg.String set_hierarchy, help_h);
- ("-i", Arg.Set G.indexes, help_i);
- ("-k", Arg.String set_kernel, help_k);
- ("-l", Arg.Set G.cc, help_l);
- ("-m", Arg.String ((:=) G.ma_preamble), help_m);
- ("-o", Arg.Set G.si, help_o);
- ("-p", Arg.Unit set_preprocess, help_p);
- ("-q", Arg.Set G.unquote, help_q);
- ("-r", Arg.String ((:=) root), help_r);
- ("-s", Arg.Int ((:=) G.stage), help_s);
- ("-t", Arg.Clear version, help_t);
- ("-x", Arg.Set export, help_x);
- ("-1", Arg.Set streaming, help_1);
- ] process_file help
+++ /dev/null
-xmlLibrary xmlCrg
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module U = NUri
-module C = Cps
-module H = Hierarchy
-module E = Entity
-module R = Alpha
-module XL = XmlLibrary
-module D = Crg
-
-(* internal functions *******************************************************)
-
-let lenv_iter map_bind map_appl map_proj st e lenv out tab =
- let rec aux = function
- | D.ESort -> e
- | D.EBind (e, a, b) ->
- let e = aux e in
-(* NOTE: the inner binders are alpha-converted first *)
- let a = R.alpha D.mem e a in
- map_bind st e a b out tab; D.EBind (e, a, b)
- | D.EAppl (e, a, v) ->
- let e = aux e in
- map_appl st e a v out tab; D.EAppl (e, a, v)
- | D.EProj (e, a, d) ->
- let e = aux e in
- map_proj st e a d out tab; D.EProj (e, a, d)
- in
- ignore (aux lenv)
-
-let rec exp_term st e t out tab = match t with
- | D.TSort (a, l) ->
- let a =
- let err _ = a in
- let f s = {a with E.n_name = Some (s, true)} in
- H.string_of_sort err f l
- in
- let attrs = [XL.position l; XL.name a] in
- XL.tag XL.sort attrs out tab
- | D.TLRef (a, i) ->
- let a =
- let err _ = a in
- let f n r = {a with E.n_name = Some (n, r)} in
- D.get_name err f i e
- in
- let attrs = [XL.position i; XL.name a] in
- XL.tag XL.lref attrs out tab
- | D.TGRef (a, n) ->
- let a = {a with E.n_name = Some (U.name_of_uri n, true)} in
- let attrs = [XL.uri n; XL.name a; XL.apix a] in
- XL.tag XL.gref attrs out tab
- | D.TCast (a, u, t) ->
- let attrs = [] in
- XL.tag XL.cast attrs ~contents:(exp_term st e u) out tab;
- exp_term st e t out tab
- | D.TAppl (a, v, t) ->
- let attrs = [] in
- XL.tag XL.appl attrs ~contents:(exp_term st e v) out tab;
- exp_term st e t out tab
- | D.TProj (a, lenv, t) ->
- let attrs = [] in
- XL.tag XL.proj attrs ~contents:(lenv_iter exp_bind exp_appl exp_proj st e lenv) out tab;
- exp_term st (D.push_proj C.start a lenv e) t out tab
- | D.TBind (a, b, t) ->
-(* NOTE: the inner binders are alpha-converted first *)
- let a = R.alpha D.mem e a in
- exp_bind st e a b out tab;
- exp_term st (D.push_bind C.start a b e) t out tab
-
-and exp_appl st e a v out tab =
- let attrs = [] in
- XL.tag XL.appl attrs ~contents:(exp_term st e v) out tab;
-
-and exp_bind st e a b out tab = match b with
- | D.Abst (n, w) ->
- let attrs = [XL.layer st n; XL.name a; XL.kind a] in
- XL.tag XL.abst attrs ~contents:(exp_term st e w) out tab
- | D.Abbr v ->
- let attrs = [XL.name a] in
- XL.tag XL.abbr attrs ~contents:(exp_term st e v) out tab
- | D.Void ->
- let attrs = [XL.name a] in
- XL.tag XL.void attrs out tab
-
-and exp_proj st e a lenv out tab =
- let attrs = [] in
- XL.tag XL.proj attrs ~contents:(lenv_iter exp_bind exp_appl exp_proj st e lenv) out tab
-
-(* interface functions ******************************************************)
-
-let export_term st = exp_term st D.empty_lenv
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-val export_term: Layer.status -> Crg.term -> XmlLibrary.pp
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-module F = Filename
-
-module U = NUri
-module C = Cps
-module G = Options
-module H = Hierarchy
-module N = Layer
-module E = Entity
-
-(* internal functions *******************************************************)
-
-let base = "xml"
-
-let ext = ".xml"
-
-let obj_root = "ENTITY"
-
-let home = "http://lambdadelta.info/"
-
-let system = F.concat (F.concat home base) "ld.dtd"
-
-let xmlns = "xmlns", home
-
-let path_of_uri xdir uri =
- let base = F.concat xdir base in
- F.concat base (Str.string_after (U.string_of_uri uri) 3)
-
-(* interface functions ******************************************************)
-
-type och = string -> unit
-
-type attr = string * string
-
-type pp = och -> int -> unit
-
-let attribute out (name, contents) =
- if contents <> "" then begin
- out " "; out name; out "=\""; out contents; out "\""
- end
-
-let xml out version encoding =
- out "<?xml";
- attribute out ("version", version);
- attribute out ("encoding", encoding);
- out "?>\n\n"
-
-let doctype out root system =
- out "<!DOCTYPE "; out root; out " SYSTEM \""; out system; out "\">\n\n"
-
-let tag tag attrs ?contents out indent =
- let spc = String.make indent ' ' in
- out spc; out "<"; out tag; List.iter (attribute out) attrs;
- match contents with
- | None -> out "/>\n"
- | Some cont ->
- out ">\n"; cont out (indent + 3); out spc;
- out "</"; out tag; out ">\n"
-
-let sort = "Sort"
-
-let lref = "LRef"
-
-let gref = "GRef"
-
-let cast = "Cast"
-
-let appl = "Appl"
-
-let proj = "Proj"
-
-let abst = "Abst"
-
-let abbr = "Abbr"
-
-let void = "Void"
-
-let position i =
- "position", string_of_int i
-
-let uri u =
- "uri", U.string_of_uri u
-
-let name a =
- let err () = "name", "" in
- let f n r = "name", if r then n else "-" ^ n in
- E.name err f a
-
-let apix a =
- "position", string_of_int a.E.n_apix
-
-let layer st n =
- "layer", N.to_string st n
-
-let kind a =
- "position", string_of_int a.E.n_sort
-
-let meta a =
- let map = function
- | E.Main -> "Main"
- | E.InProp -> "InProp"
- | E.Progress -> "Progress"
- | E.Private -> "Private"
- in
- "meta", String.concat " " (List.rev_map map a.E.r_meta)
-
-(* TODO: the string tx must be quoted *)
-let info a =
- let err () = ["lang", ""; "info", ""] in
- let f lg tx = ["lang", lg; "info", tx] in
- E.info err f a
-
-let export_entity pp_term (ra, na, u, b) =
- let path = path_of_uri !G.xdir u in
- let _ = Sys.command (Printf.sprintf "mkdir -p %s" (F.dirname path)) in
- let och = open_out (path ^ ext) in
- let out = output_string och in
- xml out "1.0" "UTF-8"; doctype out obj_root system;
- let na = {na with E.n_name = Some (U.name_of_uri u, true)} in
- let attrs = uri u :: name na :: apix na :: meta ra :: info ra in
- let contents = match b with
- | E.Abst w -> tag "GDec" attrs ~contents:(pp_term w)
- | E.Abbr v -> tag "GDef" attrs ~contents:(pp_term v)
- | E.Void -> assert false
- in
- let opts = if !G.si then "si" else "" in
- let shp = H.string_of_graph () in
- let attrs = [xmlns; "hierarchy", shp; "options", opts] in
- tag obj_root attrs ~contents out 0;
- close_out och
+++ /dev/null
-(*
- ||M|| This file is part of HELM, an Hypertextual, Electronic
- ||A|| Library of Mathematics, developed at the Computer Science
- ||T|| Department, University of Bologna, Italy.
- ||I||
- ||T|| HELM is free software; you can redistribute it and/or
- ||A|| modify it under the terms of the GNU General Public License
- \ / version 2 or (at your option) any later version.
- \ / This software is distributed as is, NO WARRANTY.
- V_______________________________________________________________ *)
-
-type och = string -> unit
-
-type attr = string * string
-
-type pp = och -> int -> unit
-
-val export_entity: ('term -> pp) -> 'term Entity.entity -> unit
-
-val tag: string -> attr list -> ?contents:pp -> pp
-
-val sort: string
-
-val lref: string
-
-val gref: string
-
-val cast: string
-
-val appl: string
-
-val proj: string
-
-val abst: string
-
-val abbr: string
-
-val void: string
-
-val position: int -> attr
-
-val uri: Entity.uri -> attr
-
-val layer: Layer.status -> Layer.layer -> attr
-
-val name: Entity.node_attrs -> attr
-
-val apix: Entity.node_attrs -> attr
-
-val kind: Entity.node_attrs -> attr
-
-val meta: Entity.root_attrs -> attr
-
-val info: Entity.root_attrs -> attr list
-o-basic_pairs.ma notation.ma o-algebra.ma
basic_pairs_to_basic_topologies.ma basic_pairs.ma basic_pairs_to_o-basic_pairs.ma basic_topologies.ma o-basic_pairs_to_o-basic_topologies.ma
+o-basic_pairs.ma notation.ma o-algebra.ma
o-concrete_spaces.ma o-basic_pairs.ma o-saturations.ma
-o-saturations.ma o-algebra.ma
-saturations.ma relations.ma
basic_pairs.ma notation.ma relations.ma
-formal_topologies.ma basic_topologies.ma
-o-formal_topologies.ma o-basic_topologies.ma
+saturations.ma relations.ma
+o-saturations.ma o-algebra.ma
o-algebra.ma categories.ma
categories.ma cprop_connectives.ma
+formal_topologies.ma basic_topologies.ma
+o-formal_topologies.ma o-basic_topologies.ma
saturations_to_o-saturations.ma o-saturations.ma relations_to_o-algebra.ma saturations.ma
-subsets.ma categories.ma
basic_topologies.ma relations.ma saturations.ma
concrete_spaces.ma basic_pairs.ma
+subsets.ma categories.ma
relations.ma subsets.ma
r-o-basic_pairs.ma apply_functor.ma basic_pairs_to_o-basic_pairs.ma o-basic_pairs_to_o-basic_topologies.ma
concrete_spaces_to_o-concrete_spaces.ma basic_pairs_to_o-basic_pairs.ma concrete_spaces.ma o-concrete_spaces.ma
o-basic_topologies.ma o-algebra.ma o-saturations.ma
-basic_pairs_to_o-basic_pairs.ma basic_pairs.ma o-basic_pairs.ma relations_to_o-algebra.ma
notation.ma
basic_topologies_to_o-basic_topologies.ma basic_topologies.ma o-basic_topologies.ma relations_to_o-algebra.ma
-cprop_connectives.ma logic/connectives.ma
+basic_pairs_to_o-basic_pairs.ma basic_pairs.ma o-basic_pairs.ma relations_to_o-algebra.ma
apply_functor.ma categories.ma notation.ma
-relations_to_o-algebra.ma o-algebra.ma relations.ma
+cprop_connectives.ma logic/connectives.ma
o-basic_pairs_to_o-basic_topologies.ma notation.ma o-basic_pairs.ma o-basic_topologies.ma
+relations_to_o-algebra.ma o-algebra.ma relations.ma
logic/connectives.ma
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* DEFINIZIONE ASCII MINIMALE *)
(* ************************** *)
-(*
ndefinition ascii_destruct_aux ≝
Πc1,c2.ΠP:Prop.c1 = c2 →
match eq_ascii c1 c2 with [ true ⇒ P → P | false ⇒ P ].
nnormalize;
napply (λx.x).
nqed.
-*)
nlemma eq_to_eqascii : ∀n1,n2.n1 = n2 → eq_ascii n1 n2 = true.
#n1; #n2; #H;
##]
nqed.
-(* !!! per brevita... *)
-naxiom eqascii_to_eq : ∀c1,c2.eq_ascii c1 c2 = true → c1 = c2.
+nlemma eqascii_to_eq1 : ∀a2.eq_ascii ch_0 a2 = true → ch_0 = a2. #a2; ncases a2; nnormalize; #H; ##[ ##1: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq2 : ∀a2.eq_ascii ch_1 a2 = true → ch_1 = a2. #a2; ncases a2; nnormalize; #H; ##[ ##2: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq3 : ∀a2.eq_ascii ch_2 a2 = true → ch_2 = a2. #a2; ncases a2; nnormalize; #H; ##[ ##3: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq4 : ∀a2.eq_ascii ch_3 a2 = true → ch_3 = a2. #a2; ncases a2; nnormalize; #H; ##[ ##4: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq5 : ∀a2.eq_ascii ch_4 a2 = true → ch_4 = a2. #a2; ncases a2; nnormalize; #H; ##[ ##5: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq6 : ∀a2.eq_ascii ch_5 a2 = true → ch_5 = a2. #a2; ncases a2; nnormalize; #H; ##[ ##6: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq7 : ∀a2.eq_ascii ch_6 a2 = true → ch_6 = a2. #a2; ncases a2; nnormalize; #H; ##[ ##7: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq8 : ∀a2.eq_ascii ch_7 a2 = true → ch_7 = a2. #a2; ncases a2; nnormalize; #H; ##[ ##8: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq9 : ∀a2.eq_ascii ch_8 a2 = true → ch_8 = a2. #a2; ncases a2; nnormalize; #H; ##[ ##9: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq10 : ∀a2.eq_ascii ch_9 a2 = true → ch_9 = a2. #a2; ncases a2; nnormalize; #H; ##[ ##10: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq11 : ∀a2.eq_ascii ch__ a2 = true → ch__ = a2. #a2; ncases a2; nnormalize; #H; ##[ ##11: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq12 : ∀a2.eq_ascii ch_A a2 = true → ch_A = a2. #a2; ncases a2; nnormalize; #H; ##[ ##12: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq13 : ∀a2.eq_ascii ch_B a2 = true → ch_B = a2. #a2; ncases a2; nnormalize; #H; ##[ ##13: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq14 : ∀a2.eq_ascii ch_C a2 = true → ch_C = a2. #a2; ncases a2; nnormalize; #H; ##[ ##14: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq15 : ∀a2.eq_ascii ch_D a2 = true → ch_D = a2. #a2; ncases a2; nnormalize; #H; ##[ ##15: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq16 : ∀a2.eq_ascii ch_E a2 = true → ch_E = a2. #a2; ncases a2; nnormalize; #H; ##[ ##16: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq17 : ∀a2.eq_ascii ch_F a2 = true → ch_F = a2. #a2; ncases a2; nnormalize; #H; ##[ ##17: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq18 : ∀a2.eq_ascii ch_G a2 = true → ch_G = a2. #a2; ncases a2; nnormalize; #H; ##[ ##18: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq19 : ∀a2.eq_ascii ch_H a2 = true → ch_H = a2. #a2; ncases a2; nnormalize; #H; ##[ ##19: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq20 : ∀a2.eq_ascii ch_I a2 = true → ch_I = a2. #a2; ncases a2; nnormalize; #H; ##[ ##20: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq21 : ∀a2.eq_ascii ch_J a2 = true → ch_J = a2. #a2; ncases a2; nnormalize; #H; ##[ ##21: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq22 : ∀a2.eq_ascii ch_K a2 = true → ch_K = a2. #a2; ncases a2; nnormalize; #H; ##[ ##22: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq23 : ∀a2.eq_ascii ch_L a2 = true → ch_L = a2. #a2; ncases a2; nnormalize; #H; ##[ ##23: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq24 : ∀a2.eq_ascii ch_M a2 = true → ch_M = a2. #a2; ncases a2; nnormalize; #H; ##[ ##24: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq25 : ∀a2.eq_ascii ch_N a2 = true → ch_N = a2. #a2; ncases a2; nnormalize; #H; ##[ ##25: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq26 : ∀a2.eq_ascii ch_O a2 = true → ch_O = a2. #a2; ncases a2; nnormalize; #H; ##[ ##26: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq27 : ∀a2.eq_ascii ch_P a2 = true → ch_P = a2. #a2; ncases a2; nnormalize; #H; ##[ ##27: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq28 : ∀a2.eq_ascii ch_Q a2 = true → ch_Q = a2. #a2; ncases a2; nnormalize; #H; ##[ ##28: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq29 : ∀a2.eq_ascii ch_R a2 = true → ch_R = a2. #a2; ncases a2; nnormalize; #H; ##[ ##29: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq30 : ∀a2.eq_ascii ch_S a2 = true → ch_S = a2. #a2; ncases a2; nnormalize; #H; ##[ ##30: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq31 : ∀a2.eq_ascii ch_T a2 = true → ch_T = a2. #a2; ncases a2; nnormalize; #H; ##[ ##31: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq32 : ∀a2.eq_ascii ch_U a2 = true → ch_U = a2. #a2; ncases a2; nnormalize; #H; ##[ ##32: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq33 : ∀a2.eq_ascii ch_V a2 = true → ch_V = a2. #a2; ncases a2; nnormalize; #H; ##[ ##33: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq34 : ∀a2.eq_ascii ch_W a2 = true → ch_W = a2. #a2; ncases a2; nnormalize; #H; ##[ ##34: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq35 : ∀a2.eq_ascii ch_X a2 = true → ch_X = a2. #a2; ncases a2; nnormalize; #H; ##[ ##35: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq36 : ∀a2.eq_ascii ch_Y a2 = true → ch_Y = a2. #a2; ncases a2; nnormalize; #H; ##[ ##36: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq37 : ∀a2.eq_ascii ch_Z a2 = true → ch_Z = a2. #a2; ncases a2; nnormalize; #H; ##[ ##37: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq38 : ∀a2.eq_ascii ch_a a2 = true → ch_a = a2. #a2; ncases a2; nnormalize; #H; ##[ ##38: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq39 : ∀a2.eq_ascii ch_b a2 = true → ch_b = a2. #a2; ncases a2; nnormalize; #H; ##[ ##39: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq40 : ∀a2.eq_ascii ch_c a2 = true → ch_c = a2. #a2; ncases a2; nnormalize; #H; ##[ ##40: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq41 : ∀a2.eq_ascii ch_d a2 = true → ch_d = a2. #a2; ncases a2; nnormalize; #H; ##[ ##41: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq42 : ∀a2.eq_ascii ch_e a2 = true → ch_e = a2. #a2; ncases a2; nnormalize; #H; ##[ ##42: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq43 : ∀a2.eq_ascii ch_f a2 = true → ch_f = a2. #a2; ncases a2; nnormalize; #H; ##[ ##43: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq44 : ∀a2.eq_ascii ch_g a2 = true → ch_g = a2. #a2; ncases a2; nnormalize; #H; ##[ ##44: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq45 : ∀a2.eq_ascii ch_h a2 = true → ch_h = a2. #a2; ncases a2; nnormalize; #H; ##[ ##45: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq46 : ∀a2.eq_ascii ch_i a2 = true → ch_i = a2. #a2; ncases a2; nnormalize; #H; ##[ ##46: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq47 : ∀a2.eq_ascii ch_j a2 = true → ch_j = a2. #a2; ncases a2; nnormalize; #H; ##[ ##47: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq48 : ∀a2.eq_ascii ch_k a2 = true → ch_k = a2. #a2; ncases a2; nnormalize; #H; ##[ ##48: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq49 : ∀a2.eq_ascii ch_l a2 = true → ch_l = a2. #a2; ncases a2; nnormalize; #H; ##[ ##49: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq50 : ∀a2.eq_ascii ch_m a2 = true → ch_m = a2. #a2; ncases a2; nnormalize; #H; ##[ ##50: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq51 : ∀a2.eq_ascii ch_n a2 = true → ch_n = a2. #a2; ncases a2; nnormalize; #H; ##[ ##51: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq52 : ∀a2.eq_ascii ch_o a2 = true → ch_o = a2. #a2; ncases a2; nnormalize; #H; ##[ ##52: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq53 : ∀a2.eq_ascii ch_p a2 = true → ch_p = a2. #a2; ncases a2; nnormalize; #H; ##[ ##53: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq54 : ∀a2.eq_ascii ch_q a2 = true → ch_q = a2. #a2; ncases a2; nnormalize; #H; ##[ ##54: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq55 : ∀a2.eq_ascii ch_r a2 = true → ch_r = a2. #a2; ncases a2; nnormalize; #H; ##[ ##55: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq56 : ∀a2.eq_ascii ch_s a2 = true → ch_s = a2. #a2; ncases a2; nnormalize; #H; ##[ ##56: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq57 : ∀a2.eq_ascii ch_t a2 = true → ch_t = a2. #a2; ncases a2; nnormalize; #H; ##[ ##57: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq58 : ∀a2.eq_ascii ch_u a2 = true → ch_u = a2. #a2; ncases a2; nnormalize; #H; ##[ ##58: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq59 : ∀a2.eq_ascii ch_v a2 = true → ch_v = a2. #a2; ncases a2; nnormalize; #H; ##[ ##59: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq60 : ∀a2.eq_ascii ch_w a2 = true → ch_w = a2. #a2; ncases a2; nnormalize; #H; ##[ ##60: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq61 : ∀a2.eq_ascii ch_x a2 = true → ch_x = a2. #a2; ncases a2; nnormalize; #H; ##[ ##61: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq62 : ∀a2.eq_ascii ch_y a2 = true → ch_y = a2. #a2; ncases a2; nnormalize; #H; ##[ ##62: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqascii_to_eq63 : ∀a2.eq_ascii ch_z a2 = true → ch_z = a2. #a2; ncases a2; nnormalize; #H; ##[ ##63: napply refl_eq | ##*: napply (bool_destruct … H) ##] nqed.
+
+nlemma eqascii_to_eq : ∀c1,c2.eq_ascii c1 c2 = true → c1 = c2.
+ #c1; ncases c1;
+ ##[ ##1: napply eqascii_to_eq1 ##| ##2: napply eqascii_to_eq2
+ ##| ##3: napply eqascii_to_eq3 ##| ##4: napply eqascii_to_eq4
+ ##| ##5: napply eqascii_to_eq5 ##| ##6: napply eqascii_to_eq6
+ ##| ##7: napply eqascii_to_eq7 ##| ##8: napply eqascii_to_eq8
+ ##| ##9: napply eqascii_to_eq9 ##| ##10: napply eqascii_to_eq10
+ ##| ##11: napply eqascii_to_eq11 ##| ##12: napply eqascii_to_eq12
+ ##| ##13: napply eqascii_to_eq13 ##| ##14: napply eqascii_to_eq14
+ ##| ##15: napply eqascii_to_eq15 ##| ##16: napply eqascii_to_eq16
+ ##| ##17: napply eqascii_to_eq17 ##| ##18: napply eqascii_to_eq18
+ ##| ##19: napply eqascii_to_eq19 ##| ##20: napply eqascii_to_eq20
+ ##| ##21: napply eqascii_to_eq21 ##| ##22: napply eqascii_to_eq22
+ ##| ##23: napply eqascii_to_eq23 ##| ##24: napply eqascii_to_eq24
+ ##| ##25: napply eqascii_to_eq25 ##| ##26: napply eqascii_to_eq26
+ ##| ##27: napply eqascii_to_eq27 ##| ##28: napply eqascii_to_eq28
+ ##| ##29: napply eqascii_to_eq29 ##| ##30: napply eqascii_to_eq30
+ ##| ##31: napply eqascii_to_eq31 ##| ##32: napply eqascii_to_eq32
+ ##| ##33: napply eqascii_to_eq33 ##| ##34: napply eqascii_to_eq34
+ ##| ##35: napply eqascii_to_eq35 ##| ##36: napply eqascii_to_eq36
+ ##| ##37: napply eqascii_to_eq37 ##| ##38: napply eqascii_to_eq38
+ ##| ##39: napply eqascii_to_eq39 ##| ##40: napply eqascii_to_eq40
+ ##| ##41: napply eqascii_to_eq41 ##| ##42: napply eqascii_to_eq42
+ ##| ##43: napply eqascii_to_eq43 ##| ##44: napply eqascii_to_eq44
+ ##| ##45: napply eqascii_to_eq45 ##| ##46: napply eqascii_to_eq46
+ ##| ##47: napply eqascii_to_eq47 ##| ##48: napply eqascii_to_eq48
+ ##| ##49: napply eqascii_to_eq49 ##| ##50: napply eqascii_to_eq50
+ ##| ##51: napply eqascii_to_eq51 ##| ##52: napply eqascii_to_eq52
+ ##| ##53: napply eqascii_to_eq53 ##| ##54: napply eqascii_to_eq54
+ ##| ##55: napply eqascii_to_eq55 ##| ##56: napply eqascii_to_eq56
+ ##| ##57: napply eqascii_to_eq57 ##| ##58: napply eqascii_to_eq58
+ ##| ##59: napply eqascii_to_eq59 ##| ##60: napply eqascii_to_eq60
+ ##| ##61: napply eqascii_to_eq61 ##| ##62: napply eqascii_to_eq62
+ ##| ##63: napply eqascii_to_eq63 ##]
+nqed.
nlemma neq_to_neqascii : ∀n1,n2.n1 ≠ n2 → eq_ascii n1 n2 = false.
#n1; #n2; #H;
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
napply refl_eq.
nqed.
-(* !!! da togliere *)
nlemma list_destruct_cons_nil : ∀T.∀x:T.∀y:list T.cons T x y = nil T → False.
#T; #x; #y; #H;
nchange with (match cons T x y with [ nil ⇒ True | cons a b ⇒ False ]);
napply I.
nqed.
-(* !!! da togliere *)
nlemma list_destruct_nil_cons : ∀T.∀x:T.∀y:list T.nil T = cons T x y → False.
#T; #x; #y; #H;
nchange with (match cons T x y with [ nil ⇒ True | cons a b ⇒ False ]);
napply refl_eq.
nqed.
-(* !!! da togliere *)
nlemma nelist_destruct_cons_nil : ∀T.∀x1,x2:T.∀y1:ne_list T.ne_cons T x1 y1 = ne_nil T x2 → False.
#T; #x1; #x2; #y1; #H;
nchange with (match ne_cons T x1 y1 with [ ne_nil _ ⇒ True | ne_cons a b ⇒ False ]);
napply I.
nqed.
-(* !!! da togliere *)
nlemma nelist_destruct_nil_cons : ∀T.∀x1,x2:T.∀y2:ne_list T.ne_nil T x1 = ne_cons T x2 y2 → False.
#T; #x1; #x2; #y2; #H;
nchange with (match ne_cons T x2 y2 with [ ne_nil _ ⇒ True | ne_cons a b ⇒ False ]);
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
#T; #h; #t;
nnormalize;
#H;
- ndestruct (*napply (nat_destruct_0_S ? H)*).
+ napply (nat_destruct_0_S ? H).
nqed.
nlemma fold_right_list2_aux2 :
#T; #h; #t;
nnormalize;
#H;
- ndestruct (*napply (nat_destruct_S_0 ? H)*).
+ napply (nat_destruct_S_0 ? H).
nqed.
nlemma fold_right_list2_aux3 :
##[ ##1: nnormalize; #H; napply refl_eq
##| ##2: #a; #l'; #H; #H1;
nchange in H1:(%) with ((S O) = (S (S (len_list T l'))));
- ndestruct (*nelim (nat_destruct_0_S ? (nat_destruct_S_S … H1))*)
+ nelim (nat_destruct_0_S ? (nat_destruct_S_S … H1))
##| ##3: #a; #l'; #H; #H1;
nchange in H1:(%) with ((S (S (len_list T l'))) = (S O));
- ndestruct (*nelim (nat_destruct_S_0 ? (nat_destruct_S_S … H1))*)
+ nelim (nat_destruct_S_0 ? (nat_destruct_S_S … H1))
##| ##4: #a; #l; #H; #a1; #l1; #H1; #H2;
nchange in H2:(%) with ((S (S (len_list T l1))) = (S (S (len_list T l))));
nchange with ((S (len_list T l1)) = (S (len_list T l)));
(* abs elem *)
ndefinition abs_list_aux1 : ∀T:Type.∀n.((len_list T []) > n) = true → False.
- #T; nnormalize; #n; #H; ndestruct (*napply (bool_destruct … H)*). nqed.
+ #T; nnormalize; #n; #H; napply (bool_destruct … H). nqed.
ndefinition abs_list_aux2 : ∀T:Type.∀h:T.∀t:list T.∀n.((len_list T (h::t)) > (S n) = true) → ((len_list T t) > n) = true.
#T; #h; #t; #n; nnormalize; #H; napply H. nqed.
nnormalize;
ncases t';
nnormalize;
- ##[ ##1: #x; #H; ndestruct (*nelim (nat_destruct_0_S ? (nat_destruct_S_S … H))*)
- ##| ##2: #x; #l; #H; ndestruct (*nelim (nat_destruct_0_S ? (nat_destruct_S_S … H))*)
+ ##[ ##1: #x; #H; nelim (nat_destruct_0_S ? (nat_destruct_S_S … H))
+ ##| ##2: #x; #l; #H; nelim (nat_destruct_0_S ? (nat_destruct_S_S … H))
##]
nqed.
nnormalize;
ncases t;
nnormalize;
- ##[ ##1: #x; #H; ndestruct (*nelim (nat_destruct_S_0 ? (nat_destruct_S_S … H))*)
- ##| ##2: #x; #l; #H; ndestruct (*nelim (nat_destruct_S_0 ? (nat_destruct_S_S … H))*)
+ ##[ ##1: #x; #H; nelim (nat_destruct_S_0 ? (nat_destruct_S_S … H))
+ ##| ##2: #x; #l; #H; nelim (nat_destruct_S_0 ? (nat_destruct_S_S … H))
##]
nqed.
(* abs elem *)
ndefinition abs_neList_aux1 : ∀T:Type.∀h:T.∀n.((len_neList T («£h»)) > (S n)) = true → False.
- #T; #h; #n; nnormalize; #H; ndestruct (*napply (bool_destruct … H)*). nqed.
+ #T; #h; #n; nnormalize; #H; napply (bool_destruct … H). nqed.
ndefinition abs_neList_aux2 : ∀T:Type.∀h:T.∀t:ne_list T.∀n.((len_neList T (h§§t)) > (S n) = true) → ((len_neList T t) > n) = true.
#T; #h; #t; #n; nnormalize; #H; napply H. nqed.
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
nelim l1;
##[ ##1: #l2; ncases l2; nnormalize;
##[ ##1: #H; napply refl_eq
- ##| ##2: #h; #t; #H; ndestruct (*nelim (nat_destruct_0_S ? H)*)
+ ##| ##2: #h; #t; #H; nelim (nat_destruct_0_S ? H)
##]
##| ##2: #h; #l2; ncases l2; nnormalize;
##[ ##1: #H; #l; #H1; nrewrite < H1; napply refl_eq
##]
nqed.
-nlemma symmetric_foldrightlist2_aux :
-∀T1,T2:Type.∀f:T1 → T1 → T2 → T2.
- (∀x,y,z.f x y z = f y x z) →
- (∀acc:T2.∀l1,l2:list T1.
- ∀H1:(len_list T1 l1 = len_list T1 l2).
- ∀H2:(len_list T1 l2 = len_list T1 l1).
- (fold_right_list2 T1 T2 f acc l1 l2 H1 = fold_right_list2 T1 T2 f acc l2 l1 H2)).
- #T1; #T2; #f; #H; #acc; #l1;
+nlemma symmetric_foldrightlist2_aux
+ : ∀T1,T2:Type.∀f:T1 → T1 → T2 → T2.∀acc:T2.∀l1,l2:list T1.
+ ∀H1:len_list T1 l1 = len_list T1 l2.∀H2:len_list T1 l2 = len_list T1 l1.
+ (∀x,y,z.f x y z = f y x z) →
+ fold_right_list2 T1 T2 f acc l1 l2 H1 = fold_right_list2 T1 T2 f acc l2 l1 H2.
+ #T1; #T2; #f; #acc; #l1;
nelim l1;
##[ ##1: #l2; ncases l2;
- ##[ ##1: nnormalize; #H1; #H2; napply refl_eq
- ##| ##2: #h; #l; #H1; #H2;
+ ##[ ##1: nnormalize; #H1; #H2; #H3; napply refl_eq
+ ##| ##2: #h; #l; #H1; #H2; #H3;
nchange in H1:(%) with (O = (S (len_list ? l)));
- ndestruct (*nelim (nat_destruct_0_S ? H1)*)
- ##]
- ##| ##2: #h3; #l3; #H1; #l2; ncases l2;
- ##[ ##1: #H2; #H3; nchange in H2:(%) with ((S (len_list ? l3)) = O);
- ndestruct (*nelim (nat_destruct_S_0 ? H1)*)
- ##| ##2: #h4; #l4; #H2; #H3;
- nchange in H2:(%) with ((S (len_list ? l3)) = (S (len_list ? l4)));
- nchange in H3:(%) with ((S (len_list ? l4)) = (S (len_list ? l3)));
+ nelim (nat_destruct_0_S ? H1)
+ ##]
+ ##| ##2: #h3; #l3; #H; #l2; ncases l2;
+ ##[ ##1: #H1; #H2; #H3; nchange in H1:(%) with ((S (len_list ? l3)) = O);
+ nelim (nat_destruct_S_0 ? H1)
+ ##| ##2: #h4; #l4; #H1; #H2; #H3;
+ nchange in H1:(%) with ((S (len_list ? l3)) = (S (len_list ? l4)));
+ nchange in H2:(%) with ((S (len_list ? l4)) = (S (len_list ? l3)));
nchange with ((f h3 h4 (fold_right_list2 T1 T2 f acc l3 l4 (fold_right_list2_aux3 T1 h3 h4 l3 l4 ?))) =
(f h4 h3 (fold_right_list2 T1 T2 f acc l4 l3 (fold_right_list2_aux3 T1 h4 h3 l4 l3 ?))));
- nrewrite < (H1 l4 (fold_right_list2_aux3 T1 h3 h4 l3 l4 H2) (fold_right_list2_aux3 T1 h4 h3 l4 l3 H3));
- nrewrite > (H h3 h4 (fold_right_list2 T1 T2 f acc l3 l4 ?));
+ nrewrite < (H l4 (fold_right_list2_aux3 T1 h3 h4 l3 l4 H1) (fold_right_list2_aux3 T1 h4 h3 l4 l3 H2) H3);
+ nrewrite > (H3 h3 h4 (fold_right_list2 T1 T2 f acc l3 l4 ?));
napply refl_eq
##]
##]
nqed.
-nlemma symmetric_foldrightlist2 :
-∀T1,T2:Type.∀f:T1 → T1 → T2 → T2.
- (∀x,y,z.f x y z = f y x z) →
- (∀acc:T2.∀l1,l2:list T1.∀H:len_list T1 l1 = len_list T1 l2.
- fold_right_list2 T1 T2 f acc l1 l2 H = fold_right_list2 T1 T2 f acc l2 l1 (symmetric_lenlist T1 l1 l2 H)).
- #T1; #T2; #f; #H; #acc; #l1; #l2; #H1;
- nrewrite > (symmetric_foldrightlist2_aux T1 T2 f H acc l1 l2 H1 (symmetric_lenlist T1 l1 l2 H1));
+nlemma symmetric_foldrightlist2
+ : ∀T1,T2:Type.∀f:T1 → T1 → T2 → T2.∀acc:T2.∀l1,l2:list T1.∀H:len_list T1 l1 = len_list T1 l2.
+ (∀x,y,z.f x y z = f y x z) →
+ fold_right_list2 T1 T2 f acc l1 l2 H = fold_right_list2 T1 T2 f acc l2 l1 (symmetric_lenlist T1 l1 l2 H).
+ #T1; #T2; #f; #acc; #l1; #l2; #H; #H1;
+ nrewrite > (symmetric_foldrightlist2_aux T1 T2 f acc l1 l2 H (symmetric_lenlist T1 l1 l2 H) H1);
napply refl_eq.
nqed.
-nlemma symmetric_bfoldrightlist2 :
-∀T1:Type.∀f:T1 → T1 → bool.
- (∀x,y.f x y = f y x) →
- (∀l1,l2:list T1.
- bfold_right_list2 T1 f l1 l2 = bfold_right_list2 T1 f l2 l1).
- #T; #f; #H; #l1;
+nlemma symmetric_bfoldrightlist2
+ : ∀T1:Type.∀f:T1 → T1 → bool.∀l1,l2:list T1.
+ (∀x,y.f x y = f y x) →
+ bfold_right_list2 T1 f l1 l2 = bfold_right_list2 T1 f l2 l1.
+ #T; #f; #l1;
nelim l1;
##[ ##1: #l2; ncases l2;
- ##[ ##1: nnormalize; napply refl_eq
- ##| ##2: #hh2; #ll2; nnormalize; napply refl_eq
+ ##[ ##1: #H; nnormalize; napply refl_eq
+ ##| ##2: #hh2; #ll2; #H; nnormalize; napply refl_eq
##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: nnormalize; napply refl_eq
- ##| ##2: #hh2; #ll2; nnormalize;
- nrewrite > (H1 ll2);
- nrewrite > (H hh1 hh2);
+ ##| ##2: #hh1; #ll1; #H; #l2; ncases l2;
+ ##[ ##1: #H1; nnormalize; napply refl_eq
+ ##| ##2: #hh2; #ll2; #H1; nnormalize;
+ nrewrite > (H ll2 H1);
+ nrewrite > (H1 hh1 hh2);
napply refl_eq
##]
##]
nqed.
-nlemma bfoldrightlist2_to_eq :
-∀T1:Type.∀f:T1 → T1 → bool.
- (∀x,y.(f x y = true → x = y)) →
- (∀l1,l2:list T1.
- (bfold_right_list2 T1 f l1 l2 = true → l1 = l2)).
- #T; #f; #H; #l1;
+nlemma bfoldrightlist2_to_eq
+ : ∀T1:Type.∀f:T1 → T1 → bool.∀l1,l2:list T1.
+ (∀x,y.(f x y = true → x = y)) →
+ (bfold_right_list2 T1 f l1 l2 = true → l1 = l2).
+ #T; #f; #l1;
nelim l1;
##[ ##1: #l2; ncases l2;
- ##[ ##1: #H1; napply refl_eq
- ##| ##2: #hh2; #ll2; nnormalize; #H1;
- ndestruct (*napply (bool_destruct … H1)*)
+ ##[ ##1: #H; #H1; napply refl_eq
+ ##| ##2: #hh2; #ll2; #H; nnormalize; #H1; napply (bool_destruct … H1)
##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: nnormalize; #H2;
- ndestruct (*napply (bool_destruct … H2)*)
- ##| ##2: #hh2; #ll2; #H2;
+ ##| ##2: #hh1; #ll1; #H; #l2; ncases l2;
+ ##[ ##1: #H1; nnormalize; #H2; napply (bool_destruct … H2)
+ ##| ##2: #hh2; #ll2; #H1; #H2;
nchange in H2:(%) with (((f hh1 hh2)⊗(bfold_right_list2 T f ll1 ll2)) = true);
- nrewrite > (H hh1 hh2 (andb_true_true_l … H2));
- nrewrite > (H1 ll2 (andb_true_true_r … H2));
+ nrewrite > (H1 hh1 hh2 (andb_true_true_l … H2));
+ nrewrite > (H ll2 H1 (andb_true_true_r … H2));
napply refl_eq
##]
##]
nqed.
-nlemma eq_to_bfoldrightlist2 :
-∀T1:Type.∀f:T1 → T1 → bool.
- (∀x,y.(x = y → f x y = true)) →
- (∀l1,l2:list T1.
- (l1 = l2 → bfold_right_list2 T1 f l1 l2 = true)).
- #T; #f; #H; #l1;
+nlemma eq_to_bfoldrightlist2
+ : ∀T1:Type.∀f:T1 → T1 → bool.∀l1,l2:list T1.
+ (∀x,y.(x = y → f x y = true)) →
+ (l1 = l2 → bfold_right_list2 T1 f l1 l2 = true).
+ #T; #f; #l1;
nelim l1;
##[ ##1: #l2; ncases l2;
- ##[ ##1: #H1; nnormalize; napply refl_eq
- ##| ##2: #hh2; #ll2; #H1;
- (* !!! ndestruct: assert false *)
- nelim (list_destruct_nil_cons ??? H1)
+ ##[ ##1: #H; #H1; nnormalize; napply refl_eq
+ ##| ##2: #hh2; #ll2; #H; #H1; nelim (list_destruct_nil_cons ??? H1)
##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: #H2;
- (* !!! ndestruct: assert false *)
- nelim (list_destruct_cons_nil ??? H2)
- ##| ##2: #hh2; #ll2; #H2; nnormalize;
+ ##| ##2: #hh1; #ll1; #H; #l2; ncases l2;
+ ##[ ##1: #H1; #H2; nelim (list_destruct_cons_nil ??? H2)
+ ##| ##2: #hh2; #ll2; #H1; #H2; nnormalize;
nrewrite > (list_destruct_1 … H2);
- nrewrite > (H hh2 hh2 (refl_eq …));
+ nrewrite > (H1 hh2 hh2 (refl_eq …));
nnormalize;
- nrewrite > (H1 ll2 (list_destruct_2 … H2));
+ nrewrite > (H ll2 H1 (list_destruct_2 … H2));
napply refl_eq
##]
##]
nqed.
-nlemma bfoldrightlist2_to_lenlist :
-∀T.∀f:T → T → bool.
- (∀l1,l2:list T.bfold_right_list2 T f l1 l2 = true → len_list T l1 = len_list T l2).
+nlemma bfoldrightlist2_to_lenlist
+ : ∀T.∀f:T → T → bool.∀l1,l2:list T.bfold_right_list2 T f l1 l2 = true → len_list T l1 = len_list T l2.
#T; #f; #l1;
nelim l1;
##[ ##1: #l2; ncases l2;
##[ ##1: nnormalize; #H; napply refl_eq
- ##| ##2: nnormalize; #hh; #tt; #H;
- ndestruct (*napply (bool_destruct … H)*)
+ ##| ##2: nnormalize; #hh; #tt; #H; napply (bool_destruct … H)
##]
##| ##2: #hh; #tt; #H; #l2; ncases l2;
- ##[ ##1: nnormalize; #H1;
- ndestruct (*napply (bool_destruct … H1)*)
+ ##[ ##1: nnormalize; #H1; napply (bool_destruct … H1)
##| ##2: #hh1; #tt1; #H1; nnormalize;
nrewrite > (H tt1 ?);
##[ ##1: napply refl_eq
##]
nqed.
-nlemma decidable_list :
-∀T.(∀x,y:T.decidable (x = y)) →
- (∀x,y:list T.decidable (x = y)).
+nlemma decidable_list : ∀T.∀H:(Πx,y:T.decidable (x = y)).∀x,y:list T.decidable (x = y).
#T; #H; #x; nelim x;
##[ ##1: #y; ncases y;
##[ ##1: nnormalize; napply (or2_intro1 (? = ?) (? ≠ ?) (refl_eq …))
##| ##2: #hh2; #tt2; nnormalize; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H1;
- (* !!! ndestruct: assert false *)
- napply (list_destruct_nil_cons T … H1)
+ nnormalize; #H1; napply (list_destruct_nil_cons T … H1)
##]
##| ##2: #hh1; #tt1; #H1; #y; ncases y;
##[ ##1: nnormalize; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H2;
- (* !!! ndestruct: assert false *)
- napply (list_destruct_cons_nil T … H2)
+ nnormalize; #H2; napply (list_destruct_cons_nil T … H2)
##| ##2: #hh2; #tt2; nnormalize; napply (or2_elim (hh1 = hh2) (hh1 ≠ hh2) ? (H …));
##[ ##2: #H2; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
nnormalize; #H3; napply (H2 (list_destruct_1 T … H3))
##]
nqed.
-nlemma nbfoldrightlist2_to_neq :
-∀T1:Type.∀f:T1 → T1 → bool.
- (∀x,y.(f x y = false → x ≠ y)) →
- (∀l1,l2:list T1.
- (bfold_right_list2 T1 f l1 l2 = false → l1 ≠ l2)).
- #T; #f; #H; #l1;
+nlemma nbfoldrightlist2_to_neq
+ : ∀T1:Type.∀f:T1 → T1 → bool.∀l1,l2:list T1.
+ (∀x,y.(f x y = false → x ≠ y)) →
+ (bfold_right_list2 T1 f l1 l2 = false → l1 ≠ l2).
+ #T; #f; #l1;
nelim l1;
##[ ##1: #l2; ncases l2;
- ##[ ##1: nnormalize; #H1;
- ndestruct (*napply (bool_destruct … H1)*)
- ##| ##2: #hh2; #ll2; #H1; nnormalize; #H2;
- (* !!! ndestruct: assert false *)
- napply (list_destruct_nil_cons T … H2)
+ ##[ ##1: #H; nnormalize; #H1; napply (bool_destruct … H1)
+ ##| ##2: #hh2; #ll2; #H; #H1; nnormalize; #H2; napply (list_destruct_nil_cons T … H2)
##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: #H2; nnormalize; #H3;
- (* !!! ndestruct: assert false *)
- napply (list_destruct_cons_nil T … H3)
- ##| ##2: #hh2; #ll2; #H2; nnormalize; #H3;
+ ##| ##2: #hh1; #ll1; #H; #l2; ncases l2;
+ ##[ ##1: #H1; #H2; nnormalize; #H3; napply (list_destruct_cons_nil T … H3)
+ ##| ##2: #hh2; #ll2; #H1; #H2; nnormalize; #H3;
nchange in H2:(%) with (((f hh1 hh2)⊗(bfold_right_list2 T f ll1 ll2)) = false);
- napply (H1 ll2 ? (list_destruct_2 T … H3));
+ napply (H ll2 H1 ? (list_destruct_2 T … H3));
napply (or2_elim ??? (andb_false2 … H2) );
##[ ##1: #H4; napply (absurd (hh1 = hh2) …);
##[ ##1: nrewrite > (list_destruct_1 T … H3); napply refl_eq
- ##| ##2: napply (H … H4)
+ ##| ##2: napply (H1 … H4)
##]
##| ##2: #H4; napply H4
##]
##]
nqed.
-nlemma list_destruct :
-∀T.(∀x,y:T.decidable (x = y)) →
- (∀h1,h2:T.∀l1,l2:list T.
- (h1::l1) ≠ (h2::l2) → h1 ≠ h2 ∨ l1 ≠ l2).
+nlemma list_destruct
+ : ∀T.∀H:(Πx,y:T.decidable (x = y)).∀h1,h2:T.∀l1,l2:list T.(h1::l1) ≠ (h2::l2) → h1 ≠ h2 ∨ l1 ≠ l2.
#T; #H; #h1; #h2; #l1; nelim l1;
##[ ##1: #l2; ncases l2;
##[ ##1: #H1; napply (or2_intro1 (h1 ≠ h2) ([] ≠ []) …);
nnormalize; #H2; nrewrite > H2 in H1:(%);
nnormalize; #H1; napply (H1 (refl_eq …))
##| ##2: #hh2; #ll2; #H1; napply (or2_intro2 (h1 ≠ h2) ([] ≠ (hh2::ll2)) …);
- nnormalize; #H2;
- (* !!! ndestruct: assert false *)
- napply (list_destruct_nil_cons T … H2)
+ nnormalize; #H2; napply (list_destruct_nil_cons T … H2)
##]
##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
##[ ##1: #H2; napply (or2_intro2 (h1 ≠ h2) ((hh1::ll1) ≠ []) …);
- nnormalize; #H3;
- (* !!! ndestruct: assert false *)
- napply (list_destruct_cons_nil T … H3)
+ nnormalize; #H3; napply (list_destruct_cons_nil T … H3)
##| ##2: #hh2; #ll2; #H2;
napply (or2_elim (h1 = h2) (h1 ≠ h2) ? (H h1 h2) …);
##[ ##2: #H3; napply (or2_intro1 (h1 ≠ h2) ((hh1::ll1) ≠ (hh2::ll2)) H3)
##]
nqed.
-nlemma neq_to_nbfoldrightlist2 :
-∀T:Type.∀f:T → T → bool.
- (∀x,y:T.decidable (x = y)) →
- (∀x,y.(x ≠ y → f x y = false)) →
- (∀l1,l2:list T.
- (l1 ≠ l2 → bfold_right_list2 T f l1 l2 = false)).
- #T; #f; #H; #H1; #l1;
+nlemma neq_to_nbfoldrightlist2
+ : ∀T:Type.∀f:T → T → bool.∀l1,l2:list T.
+ (∀x,y:T.decidable (x = y)) →
+ (∀x,y.(x ≠ y → f x y = false)) →
+ (l1 ≠ l2 → bfold_right_list2 T f l1 l2 = false).
+ #T; #f; #l1;
nelim l1;
##[ ##1: #l2; ncases l2;
- ##[ ##1: nnormalize; #H2; nelim (H2 (refl_eq …))
- ##| ##2: #hh2; #ll2; nnormalize; #H2; napply refl_eq
+ ##[ ##1: #H; #H1; nnormalize; #H2; nelim (H2 (refl_eq …))
+ ##| ##2: #hh2; #ll2; #H; nnormalize; #H1; #H2; napply refl_eq
##]
- ##| ##2: #hh1; #ll1; #H2; #l2; ncases l2;
- ##[ ##1: nnormalize; #H3; napply refl_eq
- ##| ##2: #hh2; #ll2; #H3;
+ ##| ##2: #hh1; #ll1; #H; #l2; ncases l2;
+ ##[ ##1: #H1; #H2; nnormalize; #H3; napply refl_eq
+ ##| ##2: #hh2; #ll2; #H1; #H2; #H3;
nchange with (((f hh1 hh2)⊗(bfold_right_list2 T f ll1 ll2)) = false);
- napply (or2_elim (hh1 ≠ hh2) (ll1 ≠ ll2) ? (list_destruct T H … H3) …);
- ##[ ##1: #H4; nrewrite > (H1 hh1 hh2 H4); nnormalize; napply refl_eq
- ##| ##2: #H4; nrewrite > (H2 ll2 H4);
+ napply (or2_elim (hh1 ≠ hh2) (ll1 ≠ ll2) ? (list_destruct T H1 … H3) …);
+ ##[ ##1: #H4; nrewrite > (H2 hh1 hh2 H4); nnormalize; napply refl_eq
+ ##| ##2: #H4; nrewrite > (H ll2 H1 H2 H4);
nrewrite > (symmetric_andbool (f hh1 hh2) false);
nnormalize; napply refl_eq
##]
ncases l;
nnormalize;
##[ ##1: #H; napply I
- ##| ##2: #x; #l; #H; ndestruct (*napply (bool_destruct … H)*)
+ ##| ##2: #x; #l; #H; napply (bool_destruct … H)
##]
nqed.
#T; #l;
ncases l;
nnormalize;
- ##[ ##1: #H; ndestruct (*napply (bool_destruct … H)*)
+ ##[ ##1: #H; napply (bool_destruct … H)
##| ##2: #x; #l; #H; napply I
##]
nqed.
##]
nqed.
-nlemma symmetric_foldrightnelist2_aux :
-∀T1,T2:Type.∀f:T1 → T1 → T2 → T2.
- (∀x,y,z.f x y z = f y x z) →
- (∀acc:T2.∀l1,l2:ne_list T1.
- ∀H1:len_neList T1 l1 = len_neList T1 l2.∀H2:len_neList T1 l2 = len_neList T1 l1.
- fold_right_neList2 T1 T2 f acc l1 l2 H1 = fold_right_neList2 T1 T2 f acc l2 l1 H2).
- #T1; #T2; #f; #H; #acc; #l1;
+nlemma symmetric_foldrightnelist2_aux
+ : ∀T1,T2:Type.∀f:T1 → T1 → T2 → T2.∀acc:T2.∀l1,l2:ne_list T1.
+ ∀H1:len_neList T1 l1 = len_neList T1 l2.∀H2:len_neList T1 l2 = len_neList T1 l1.
+ (∀x,y,z.f x y z = f y x z) →
+ fold_right_neList2 T1 T2 f acc l1 l2 H1 = fold_right_neList2 T1 T2 f acc l2 l1 H2.
+ #T1; #T2; #f; #acc; #l1;
nelim l1;
##[ ##1: #h; #l2; ncases l2;
- ##[ ##1: #h1; nnormalize; #H1; #H2; nrewrite > (H h h1 acc); napply refl_eq
+ ##[ ##1: #h1; nnormalize; #H1; #H2; #H3; nrewrite > (H3 h h1 acc); napply refl_eq
##| ##2: #h1; #l; ncases l;
- ##[ ##1: #h3; #H1; #H2;
+ ##[ ##1: #h3; #H1; #H2; #H3;
nchange in H1:(%) with ((S O) = (S (S O)));
- (* !!! ndestruct: si inceppa su un'ipotesi che non e' H1 *)
nelim (nat_destruct_0_S ? (nat_destruct_S_S … H1))
- ##| ##2: #h3; #l3; #H1; #H2;
+ ##| ##2: #h3; #l3; #H1; #H2; #H3;
nchange in H1:(%) with ((S O) = (S (S (len_neList ? l3))));
- (* !!! ndestruct: si inceppa su un'ipotesi che non e' H1 *)
nelim (nat_destruct_0_S ? (nat_destruct_S_S … H1))
##]
##]
- ##| ##2: #h3; #l3; #H1; #l2; ncases l2;
+ ##| ##2: #h3; #l3; #H; #l2; ncases l2;
##[ ##1: #h4; ncases l3;
- ##[ ##1: #h5; #H2; #H3;
- nchange in H2:(%) with ((S (S O)) = (S O));
- (* !!! ndestruct: si inceppa su un'ipotesi che non e' H1 *)
- nelim (nat_destruct_S_0 ? (nat_destruct_S_S … H2))
- ##| ##2: #h5; #l5; #H2; #H3;
- nchange in H2:(%) with ((S (S (len_neList ? l5))) = (S O));
- (* !!! ndestruct: si inceppa su un'ipotesi che non e' H1 *)
- nelim (nat_destruct_S_0 ? (nat_destruct_S_S … H2))
+ ##[ ##1: #h5; #H1; #H2; #H3;
+ nchange in H1:(%) with ((S (S O)) = (S O));
+ nelim (nat_destruct_S_0 ? (nat_destruct_S_S … H1))
+ ##| ##2: #h5; #l5; #H1; #H2; #H3;
+ nchange in H1:(%) with ((S (S (len_neList ? l5))) = (S O));
+ nelim (nat_destruct_S_0 ? (nat_destruct_S_S … H1))
##]
- ##| ##2: #h4; #l4; #H2; #H3;
- nchange in H2:(%) with ((S (len_neList ? l3)) = (S (len_neList ? l4)));
- nchange in H3:(%) with ((S (len_neList ? l4)) = (S (len_neList ? l3)));
+ ##| ##2: #h4; #l4; #H1; #H2; #H3;
+ nchange in H1:(%) with ((S (len_neList ? l3)) = (S (len_neList ? l4)));
+ nchange in H2:(%) with ((S (len_neList ? l4)) = (S (len_neList ? l3)));
nchange with ((f h3 h4 (fold_right_neList2 T1 T2 f acc l3 l4 (fold_right_neList2_aux3 T1 h3 h4 l3 l4 ?))) =
(f h4 h3 (fold_right_neList2 T1 T2 f acc l4 l3 (fold_right_neList2_aux3 T1 h4 h3 l4 l3 ?))));
- nrewrite < (H1 l4 (fold_right_neList2_aux3 T1 h3 h4 l3 l4 H2) (fold_right_neList2_aux3 T1 h4 h3 l4 l3 H3));
- nrewrite > (H h3 h4 (fold_right_neList2 T1 T2 f acc l3 l4 ?));
+ nrewrite < (H l4 (fold_right_neList2_aux3 T1 h3 h4 l3 l4 H1) (fold_right_neList2_aux3 T1 h4 h3 l4 l3 H2) H3);
+ nrewrite > (H3 h3 h4 (fold_right_neList2 T1 T2 f acc l3 l4 ?));
napply refl_eq
##]
##]
nqed.
-nlemma symmetric_foldrightnelist2 :
-∀T1,T2:Type.∀f:T1 → T1 → T2 → T2.
- (∀x,y,z.f x y z = f y x z) →
- (∀acc:T2.∀l1,l2:ne_list T1.∀H:len_neList T1 l1 = len_neList T1 l2.
- fold_right_neList2 T1 T2 f acc l1 l2 H = fold_right_neList2 T1 T2 f acc l2 l1 (symmetric_lennelist T1 l1 l2 H)).
- #T1; #T2; #f; #H; #acc; #l1; #l2; #H1;
- nrewrite > (symmetric_foldrightnelist2_aux T1 T2 f H acc l1 l2 H1 (symmetric_lennelist T1 l1 l2 H1));
+nlemma symmetric_foldrightnelist2
+ : ∀T1,T2:Type.∀f:T1 → T1 → T2 → T2.∀acc:T2.∀l1,l2:ne_list T1.∀H:len_neList T1 l1 = len_neList T1 l2.
+ (∀x,y,z.f x y z = f y x z) →
+ fold_right_neList2 T1 T2 f acc l1 l2 H = fold_right_neList2 T1 T2 f acc l2 l1 (symmetric_lennelist T1 l1 l2 H).
+ #T1; #T2; #f; #acc; #l1; #l2; #H; #H1;
+ nrewrite > (symmetric_foldrightnelist2_aux T1 T2 f acc l1 l2 H (symmetric_lennelist T1 l1 l2 H) H1);
napply refl_eq.
nqed.
-nlemma symmetric_bfoldrightnelist2 :
-∀T1:Type.∀f:T1 → T1 → bool.
- (∀x,y.f x y = f y x) →
- (∀l1,l2:ne_list T1.
- bfold_right_neList2 T1 f l1 l2 = bfold_right_neList2 T1 f l2 l1).
- #T; #f; #H; #l1;
+nlemma symmetric_bfoldrightnelist2
+ : ∀T1:Type.∀f:T1 → T1 → bool.∀l1,l2:ne_list T1.
+ (∀x,y.f x y = f y x) →
+ bfold_right_neList2 T1 f l1 l2 = bfold_right_neList2 T1 f l2 l1.
+ #T; #f; #l1;
nelim l1;
##[ ##1: #hh1; #l2; ncases l2;
- ##[ ##1: #hh2; nnormalize; nrewrite > (H hh1 hh2); napply refl_eq
- ##| ##2: #hh2; #ll2; nnormalize; napply refl_eq
- ##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: #hh2; nnormalize; napply refl_eq
- ##| ##2: #hh2; #ll2; nnormalize;
- nrewrite > (H1 ll2);
- nrewrite > (H hh1 hh2);
+ ##[ ##1: #hh2; #H; nnormalize; nrewrite > (H hh1 hh2); napply refl_eq
+ ##| ##2: #hh2; #ll2; #H; nnormalize; napply refl_eq
+ ##]
+ ##| ##2: #hh1; #ll1; #H; #l2; ncases l2;
+ ##[ ##1: #hh2; #H1; nnormalize; napply refl_eq
+ ##| ##2: #hh2; #ll2; #H1; nnormalize;
+ nrewrite > (H ll2 H1);
+ nrewrite > (H1 hh1 hh2);
napply refl_eq
##]
##]
nqed.
-nlemma bfoldrightnelist2_to_eq :
-∀T1:Type.∀f:T1 → T1 → bool.
- (∀x,y.(f x y = true → x = y)) →
- (∀l1,l2:ne_list T1.
- (bfold_right_neList2 T1 f l1 l2 = true → l1 = l2)).
- #T; #f; #H; #l1;
+nlemma bfoldrightnelist2_to_eq
+ : ∀T1:Type.∀f:T1 → T1 → bool.∀l1,l2:ne_list T1.
+ (∀x,y.(f x y = true → x = y)) →
+ (bfold_right_neList2 T1 f l1 l2 = true → l1 = l2).
+ #T; #f; #l1;
nelim l1;
##[ ##1: #hh1; #l2; ncases l2;
- ##[ ##1: #hh2; #H1; nnormalize in H1:(%); nrewrite > (H hh1 hh2 H1); napply refl_eq
- ##| ##2: #hh2; #ll2; nnormalize; #H1; ndestruct (*napply (bool_destruct … H1)*)
+ ##[ ##1: #hh2; #H; #H1; nnormalize in H1:(%); nrewrite > (H hh1 hh2 H1); napply refl_eq
+ ##| ##2: #hh2; #ll2; #H; nnormalize; #H1; napply (bool_destruct … H1)
##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: #hh2; nnormalize; #H2; ndestruct (*napply (bool_destruct … H2)*)
- ##| ##2: #hh2; #ll2; #H2;
+ ##| ##2: #hh1; #ll1; #H; #l2; ncases l2;
+ ##[ ##1: #hh2; #H1; nnormalize; #H2; napply (bool_destruct … H2)
+ ##| ##2: #hh2; #ll2; #H1; #H2;
nchange in H2:(%) with (((f hh1 hh2)⊗(bfold_right_neList2 T f ll1 ll2)) = true);
- nrewrite > (H hh1 hh2 (andb_true_true_l … H2));
- nrewrite > (H1 ll2 (andb_true_true_r … H2));
+ nrewrite > (H1 hh1 hh2 (andb_true_true_l … H2));
+ nrewrite > (H ll2 H1 (andb_true_true_r … H2));
napply refl_eq
##]
##]
nqed.
-nlemma eq_to_bfoldrightnelist2 :
-∀T1:Type.∀f:T1 → T1 → bool.
- (∀x,y.(x = y → f x y = true)) →
- (∀l1,l2:ne_list T1.
- (l1 = l2 → bfold_right_neList2 T1 f l1 l2 = true)).
- #T; #f; #H; #l1;
+nlemma eq_to_bfoldrightnelist2
+ : ∀T1:Type.∀f:T1 → T1 → bool.∀l1,l2:ne_list T1.
+ (∀x,y.(x = y → f x y = true)) →
+ (l1 = l2 → bfold_right_neList2 T1 f l1 l2 = true).
+ #T; #f; #l1;
nelim l1;
##[ ##1: #hh1; #l2; ncases l2;
- ##[ ##1: #hh2; #H1; nnormalize;
+ ##[ ##1: #hh2; #H; #H1; nnormalize;
nrewrite > (H hh1 hh2 (nelist_destruct_nil_nil … H1));
napply refl_eq
- ##| ##2: #hh2; #ll2; #H1;
- (* !!! ndestruct: assert false *)
- nelim (nelist_destruct_nil_cons ???? H1)
+ ##| ##2: #hh2; #ll2; #H; #H1; nelim (nelist_destruct_nil_cons ???? H1)
##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: #hh2; #H2;
- (* !!! ndestruct: assert false *)
- nelim (nelist_destruct_cons_nil ???? H2)
- ##| ##2: #hh2; #ll2; #H2; nnormalize;
+ ##| ##2: #hh1; #ll1; #H; #l2; ncases l2;
+ ##[ ##1: #hh2; #H1; #H2; nelim (nelist_destruct_cons_nil ???? H2)
+ ##| ##2: #hh2; #ll2; #H1; #H2; nnormalize;
nrewrite > (nelist_destruct_cons_cons_1 … H2);
- nrewrite > (H hh2 hh2 (refl_eq …));
+ nrewrite > (H1 hh2 hh2 (refl_eq …));
nnormalize;
- nrewrite > (H1 ll2 (nelist_destruct_cons_cons_2 … H2));
+ nrewrite > (H ll2 H1 (nelist_destruct_cons_cons_2 … H2));
napply refl_eq
##]
##]
nqed.
-nlemma bfoldrightnelist2_to_lennelist :
-∀T.∀f:T → T → bool.
- (∀l1,l2:ne_list T.bfold_right_neList2 T f l1 l2 = true → len_neList T l1 = len_neList T l2).
+nlemma bfoldrightnelist2_to_lennelist
+ : ∀T.∀f:T → T → bool.∀l1,l2:ne_list T.bfold_right_neList2 T f l1 l2 = true → len_neList T l1 = len_neList T l2.
#T; #f; #l1;
nelim l1;
##[ ##1: #hh1; #l2; ncases l2;
##[ ##1: nnormalize; #hh2; #H; napply refl_eq
- ##| ##2: nnormalize; #hh2; #tt2; #H; ndestruct (*napply (bool_destruct … H)*)
+ ##| ##2: nnormalize; #hh2; #tt2; #H; napply (bool_destruct … H)
##]
##| ##2: #hh1; #tt1; #H; #l2; ncases l2;
- ##[ ##1: nnormalize; #hh2; #H1; ndestruct (*napply (bool_destruct … H1)*)
+ ##[ ##1: nnormalize; #hh2; #H1; napply (bool_destruct … H1)
##| ##2: #hh2; #tt2; #H1; nnormalize;
nrewrite > (H tt2 ?);
##[ ##1: napply refl_eq
##]
nqed.
-nlemma decidable_nelist :
-∀T.(∀x,y:T.decidable (x = y)) →
- (∀x,y:ne_list T.decidable (x = y)).
+nlemma decidable_nelist : ∀T.∀H:(Πx,y:T.decidable (x = y)).∀x,y:ne_list T.decidable (x = y).
#T; #H; #x; nelim x;
##[ ##1: #hh1; #y; ncases y;
##[ ##1: #hh2; nnormalize; napply (or2_elim (hh1 = hh2) (hh1 ≠ hh2) ? (H hh1 hh2));
#H2; napply (H1 (nelist_destruct_nil_nil T … H2))
##]
##| ##2: #hh2; #tt2; nnormalize; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H1;
- (* !!! ndestruct: assert false *)
- napply (nelist_destruct_nil_cons T … H1)
+ nnormalize; #H1; napply (nelist_destruct_nil_cons T … H1)
##]
##| ##2: #hh1; #tt1; #H1; #y; ncases y;
##[ ##1: #hh1; nnormalize; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H2;
- (* !!! ndestruct: assert false *)
- napply (nelist_destruct_cons_nil T … H2)
+ nnormalize; #H2; napply (nelist_destruct_cons_nil T … H2)
##| ##2: #hh2; #tt2; nnormalize; napply (or2_elim (hh1 = hh2) (hh1 ≠ hh2) ? (H …));
##[ ##2: #H2; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
nnormalize; #H3; napply (H2 (nelist_destruct_cons_cons_1 T … H3))
##]
nqed.
-nlemma nbfoldrightnelist2_to_neq :
-∀T1:Type.∀f:T1 → T1 → bool.
- (∀x,y.(f x y = false → x ≠ y)) →
- (∀l1,l2:ne_list T1.
- (bfold_right_neList2 T1 f l1 l2 = false → l1 ≠ l2)).
- #T; #f; #H; #l1;
+nlemma nbfoldrightnelist2_to_neq
+ : ∀T1:Type.∀f:T1 → T1 → bool.∀l1,l2:ne_list T1.
+ (∀x,y.(f x y = false → x ≠ y)) →
+ (bfold_right_neList2 T1 f l1 l2 = false → l1 ≠ l2).
+ #T; #f; #l1;
nelim l1;
##[ ##1: #hh1; #l2; ncases l2;
- ##[ ##1: #hh2; nnormalize; #H1; #H2; napply (H hh1 hh2 H1 (nelist_destruct_nil_nil T … H2))
- ##| ##2: #hh2; #ll2; #H1; nnormalize; #H2;
- (* !!! ndestruct: assert false *)
- napply (nelist_destruct_nil_cons T … H2)
+ ##[ ##1: #hh2; #H; nnormalize; #H1; #H2; napply (H hh1 hh2 H1 (nelist_destruct_nil_nil T … H2))
+ ##| ##2: #hh2; #ll2; #H; #H1; nnormalize; #H2; napply (nelist_destruct_nil_cons T … H2)
##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: #hh2; #H2; nnormalize; #H3;
- (* !!! ndestruct: assert false *)
- napply (nelist_destruct_cons_nil T … H3)
- ##| ##2: #hh2; #ll2; #H2; nnormalize; #H3;
+ ##| ##2: #hh1; #ll1; #H; #l2; ncases l2;
+ ##[ ##1: #hh2; #H1; #H2; nnormalize; #H3; napply (nelist_destruct_cons_nil T … H3)
+ ##| ##2: #hh2; #ll2; #H1; #H2; nnormalize; #H3;
nchange in H2:(%) with (((f hh1 hh2)⊗(bfold_right_neList2 T f ll1 ll2)) = false);
- napply (H1 ll2 ? (nelist_destruct_cons_cons_2 T … H3));
+ napply (H ll2 H1 ? (nelist_destruct_cons_cons_2 T … H3));
napply (or2_elim ??? (andb_false2 … H2) );
##[ ##1: #H4; napply (absurd (hh1 = hh2) …);
##[ ##1: nrewrite > (nelist_destruct_cons_cons_1 T … H3); napply refl_eq
- ##| ##2: napply (H … H4)
+ ##| ##2: napply (H1 … H4)
##]
##| ##2: #H4; napply H4
##]
##]
nqed.
-nlemma nelist_destruct :
-∀T.(∀x,y:T.decidable (x = y)) →
- (∀h1,h2:T.∀l1,l2:ne_list T.
- (h1§§l1) ≠ (h2§§l2) → h1 ≠ h2 ∨ l1 ≠ l2).
+nlemma nelist_destruct
+ : ∀T.∀H:(Πx,y:T.decidable (x = y)).∀h1,h2:T.∀l1,l2:ne_list T.(h1§§l1) ≠ (h2§§l2) → h1 ≠ h2 ∨ l1 ≠ l2.
#T; #H; #h1; #h2; #l1; nelim l1;
##[ ##1: #hh1; #l2; ncases l2;
##[ ##1: #hh2; #H1; napply (or2_elim (h1 = h2) (h1 ≠ h2) ? (H …) …);
##]
##]
##| ##2: #hh2; #ll2; #H1; napply (or2_intro2 (h1 ≠ h2) («£hh1» ≠ (hh2§§ll2)) …);
- nnormalize; #H2;
- (* !!! ndestruct: assert false *)
- napply (nelist_destruct_nil_cons T … H2)
+ nnormalize; #H2; napply (nelist_destruct_nil_cons T … H2)
##]
##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
##[ ##1: #hh2; #H2; napply (or2_intro2 (h1 ≠ h2) ((hh1§§ll1) ≠ «£hh2») …);
- nnormalize; #H3;
- (* !!! ndestruct: assert false *)
- napply (nelist_destruct_cons_nil T … H3)
+ nnormalize; #H3; napply (nelist_destruct_cons_nil T … H3)
##| ##2: #hh2; #ll2; #H2;
napply (or2_elim (h1 = h2) (h1 ≠ h2) ? (H h1 h2) …);
##[ ##2: #H3; napply (or2_intro1 (h1 ≠ h2) ((hh1§§ll1) ≠ (hh2§§ll2)) H3)
##]
nqed.
-nlemma neq_to_nbfoldrightnelist2 :
-∀T:Type.∀f:T → T → bool.
- (∀x,y:T.decidable (x = y)) →
- (∀x,y.(x ≠ y → f x y = false)) →
- (∀l1,l2:ne_list T.
- (l1 ≠ l2 → bfold_right_neList2 T f l1 l2 = false)).
- #T; #f; #H; #H1; #l1;
+nlemma neq_to_nbfoldrightnelist2
+ : ∀T:Type.∀f:T → T → bool.∀l1,l2:ne_list T.
+ (∀x,y:T.decidable (x = y)) →
+ (∀x,y.(x ≠ y → f x y = false)) →
+ (l1 ≠ l2 → bfold_right_neList2 T f l1 l2 = false).
+ #T; #f; #l1;
nelim l1;
##[ ##1: #hh1; #l2; ncases l2;
- ##[ ##1: #hh2; nnormalize; #H2; napply (H1 hh1 hh2 ?);
+ ##[ ##1: #hh2; #H; #H1; nnormalize; #H2; napply (H1 hh1 hh2 ?);
nnormalize; #H3; nrewrite > H3 in H2:(%); #H2; napply (H2 (refl_eq …))
- ##| ##2: #hh2; #ll2; nnormalize; #H2; napply refl_eq
+ ##| ##2: #hh2; #ll2; #H; nnormalize; #H1; #H2; napply refl_eq
##]
- ##| ##2: #hh1; #ll1; #H2; #l2; ncases l2;
- ##[ ##1: #hh2; nnormalize; #H3; napply refl_eq
- ##| ##2: #hh2; #ll2; #H3;
+ ##| ##2: #hh1; #ll1; #H; #l2; ncases l2;
+ ##[ ##1: #hh2; #H1; #H2; nnormalize; #H3; napply refl_eq
+ ##| ##2: #hh2; #ll2; #H1; #H2; #H3;
nchange with (((f hh1 hh2)⊗(bfold_right_neList2 T f ll1 ll2)) = false);
- napply (or2_elim (hh1 ≠ hh2) (ll1 ≠ ll2) ? (nelist_destruct T H … H3) …);
- ##[ ##1: #H4; nrewrite > (H1 hh1 hh2 H4); nnormalize; napply refl_eq
- ##| ##2: #H4; nrewrite > (H2 ll2 H4);
+ napply (or2_elim (hh1 ≠ hh2) (ll1 ≠ ll2) ? (nelist_destruct T H1 … H3) …);
+ ##[ ##1: #H4; nrewrite > (H2 hh1 hh2 H4); nnormalize; napply refl_eq
+ ##| ##2: #H4; nrewrite > (H ll2 H1 H2 H4);
nrewrite > (symmetric_andbool (f hh1 hh2) false);
nnormalize; napply refl_eq
##]
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
alias num (instance 0) = "natural number".
*)
-nlet rec nat_it (T:Type) (f:T → T) (arg:T) (n:nat) on n ≝
- match n with
- [ O ⇒ arg
- | S n' ⇒ nat_it T f (f arg) n'
- ].
-
ndefinition nat1 ≝ S O.
ndefinition nat2 ≝ S nat1.
ndefinition nat3 ≝ S nat2.
ndefinition pred ≝ λn.match n with [ O ⇒ O | S n ⇒ n ].
-ndefinition nat128 ≝ nat64 + nat64.
-ndefinition nat256 ≝ nat128 + nat128.
-ndefinition nat512 ≝ nat256 + nat256.
-ndefinition nat1024 ≝ nat512 + nat512.
-ndefinition nat2048 ≝ nat1024 + nat1024.
-ndefinition nat4096 ≝ nat2048 + nat2048.
-ndefinition nat8192 ≝ nat4096 + nat4096.
-ndefinition nat16384 ≝ nat8192 + nat8192.
-ndefinition nat32768 ≝ nat16384 + nat16384.
-ndefinition nat65536 ≝ nat32768 + nat32768.
+ndefinition nat128 ≝ nat64 * nat2.
+ndefinition nat256 ≝ nat128 * nat2.
+ndefinition nat512 ≝ nat256 * nat2.
+ndefinition nat1024 ≝ nat512 * nat2.
+ndefinition nat2048 ≝ nat1024 * nat2.
+ndefinition nat4096 ≝ nat2048 * nat2.
+ndefinition nat8192 ≝ nat4096 * nat2.
+ndefinition nat16384 ≝ nat8192 * nat2.
+ndefinition nat32768 ≝ nat16384 * nat2.
+ndefinition nat65536 ≝ nat32768 * nat2.
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
napply refl_eq.
nqed.
-(* !!! da togliere *)
nlemma nat_destruct_0_S : ∀n:nat.O = S n → False.
#n; #H;
nchange with (match S n with [ O ⇒ True | S a ⇒ False ]);
napply I.
nqed.
-(* !!! da togliere *)
nlemma nat_destruct_S_0 : ∀n:nat.S n = O → False.
#n; #H;
nchange with (match S n with [ O ⇒ True | S a ⇒ False ]);
nelim n2;
nnormalize;
##[ ##1: #H; napply refl_eq
- ##| ##2: #n3; #H; #H1; ndestruct (*nelim (nat_destruct_0_S ? H1)*)
+ ##| ##2: #n3; #H; #H1; nelim (nat_destruct_0_S ? H1)
##]
##| ##2: #n2; #H; #n3; #H1;
ncases n3 in H1:(%) ⊢ %;
nnormalize;
- ##[ ##1: #H1; ndestruct (*nelim (nat_destruct_S_0 ? H1)*)
+ ##[ ##1: #H1; nelim (nat_destruct_S_0 ? H1)
##| ##2: #n4; #H1;
napply (H n4 (nat_destruct_S_S … H1))
##]
nelim n2;
nnormalize;
##[ ##1: #H; napply refl_eq
- ##| ##2: #n3; #H; #H1; ndestruct (*napply (bool_destruct … (O = S n3) H1)*)
+ ##| ##2: #n3; #H; #H1; napply (bool_destruct … (O = S n3) H1)
##]
##| ##2: #n2; #H; #n3; #H1;
ncases n3 in H1:(%) ⊢ %;
nnormalize;
- ##[ ##1: #H1; ndestruct (*napply (bool_destruct … (S n2 = O) H1)*)
+ ##[ ##1: #H1; napply (bool_destruct … (S n2 = O) H1)
##| ##2: #n4; #H1;
nrewrite > (H n4 H1);
napply refl_eq
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
ndefinition nat_of_w16 : word16 → nat ≝ λn:word16.nat_of_w16_aux n (w16_to_recw16 n).
-ndefinition nat_of_w32 : word32 → nat ≝ λn:word32.(nat65536 * (nat_of_w16 (cnH ? n))) + (nat_of_w16 (cnL ? n)).
+ndefinition nat_of_w32 : word32 → nat ≝ λn:word32.(nat65536 * (nat_of_w16 (w32h n))) + (nat_of_w16 (w32l n)).
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
| Some : A → option A.
ndefinition eq_option ≝
-λT.λf:T → T → bool.λop1,op2:option T.
+λT.λop1,op2:option T.λf:T → T → bool.
match op1 with
[ None ⇒ match op2 with [ None ⇒ true | Some _ ⇒ false ]
| Some x1 ⇒ match op2 with [ None ⇒ false | Some x2 ⇒ f x1 x2 ]
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
napply refl_eq.
nqed.
-(* !!! da togliere *)
nlemma option_destruct_some_none : ∀T.∀x:T.Some T x = None T → False.
#T; #x; #H;
nchange with (match Some T x with [ None ⇒ True | Some a ⇒ False ]);
napply I.
nqed.
-(* !!! da togliere *)
nlemma option_destruct_none_some : ∀T.∀x:T.None T = Some T x → False.
#T; #x; #H;
nchange with (match Some T x with [ None ⇒ True | Some a ⇒ False ]);
nqed.
nlemma symmetric_eqoption :
-∀T:Type.∀f:T → T → bool.
+∀T:Type.∀op1,op2:option T.∀f:T → T → bool.
(symmetricT T bool f) →
- (∀op1,op2:option T.
- (eq_option T f op1 op2 = eq_option T f op2 op1)).
- #T; #f; #H;
- #op1; #op2; nelim op1; nelim op2;
+ (eq_option T op1 op2 f = eq_option T op2 op1 f).
+ #T; #op1; #op2; #f; #H;
+ nelim op1;
+ nelim op2;
nnormalize;
##[ ##1: napply refl_eq
##| ##2,3: #H; napply refl_eq
nqed.
nlemma eq_to_eqoption :
-∀T.∀f:T → T → bool.
+∀T.∀op1,op2:option T.∀f:T → T → bool.
(∀x1,x2:T.x1 = x2 → f x1 x2 = true) →
- (∀op1,op2:option T.
- (op1 = op2 → eq_option T f op1 op2 = true)).
- #T; #f; #H;
- #op1; #op2; nelim op1; nelim op2;
+ (op1 = op2 → eq_option T op1 op2 f = true).
+ #T; #op1; #op2; #f; #H;
+ nelim op1;
+ nelim op2;
nnormalize;
##[ ##1: #H1; napply refl_eq
- ##| ##2: #a; #H1;
- (* !!! ndestruct: assert false *)
- nelim (option_destruct_none_some ?? H1)
- ##| ##3: #a; #H1;
- (* !!! ndestruct: assert false *)
- nelim (option_destruct_some_none ?? H1)
+ ##| ##2: #a; #H1; nelim (option_destruct_none_some ?? H1)
+ ##| ##3: #a; #H1; nelim (option_destruct_some_none ?? H1)
##| ##4: #a; #a0; #H1;
nrewrite > (H … (option_destruct_some_some … H1));
napply refl_eq
nqed.
nlemma eqoption_to_eq :
-∀T.∀f:T → T → bool.
+∀T.∀op1,op2:option T.∀f:T → T → bool.
(∀x1,x2:T.f x1 x2 = true → x1 = x2) →
- (∀op1,op2:option T.
- (eq_option T f op1 op2 = true → op1 = op2)).
- #T; #f; #H;
- #op1; #op2; nelim op1; nelim op2;
+ (eq_option T op1 op2 f = true → op1 = op2).
+ #T; #op1; #op2; #f; #H;
+ nelim op1;
+ nelim op2;
nnormalize;
##[ ##1: #H1; napply refl_eq
- ##| ##2,3: #a; #H1; ndestruct (*napply (bool_destruct … H1)*)
+ ##| ##2,3: #a; #H1; napply (bool_destruct … H1)
##| ##4: #a; #a0; #H1;
nrewrite > (H … H1);
napply refl_eq
##]
nqed.
-nlemma decidable_option :
-∀T.(Πx,y:T.decidable (x = y)) →
- (∀x,y:option T.decidable (x = y)).
+nlemma decidable_option : ∀T.∀H:(Πx,y:T.decidable (x = y)).∀x,y:option T.decidable (x = y).
#T; #H; #x; nelim x;
##[ ##1: #y; ncases y;
##[ ##1: nnormalize; napply (or2_intro1 (? = ?) (? ≠ ?) (refl_eq …))
##| ##2: #yy; nnormalize; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H1;
- (* !!! ndestruct: assert false *)
- napply (option_destruct_none_some T … H1)
+ nnormalize; #H1; napply (option_destruct_none_some T … H1)
##]
##| ##2: #xx; #y; ncases y;
##[ ##1: nnormalize; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H2;
- (* !!! ndestruct: assert false *)
- napply (option_destruct_some_none T … H2)
+ nnormalize; #H2; napply (option_destruct_some_none T … H2)
##| ##2: #yy; nnormalize; napply (or2_elim (xx = yy) (xx ≠ yy) ? (H …));
##[ ##2: #H1; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H2;
- napply (H1 (option_destruct_some_some T … H2))
+ nnormalize; #H2; napply (H1 (option_destruct_some_some T … H2))
##| ##1: #H1; napply (or2_intro1 (? = ?) (? ≠ ?) ?);
nrewrite > H1; napply refl_eq
##]
nqed.
nlemma neq_to_neqoption :
-∀T.∀f:T → T → bool.
+∀T.∀op1,op2:option T.∀f:T → T → bool.
(∀x1,x2:T.x1 ≠ x2 → f x1 x2 = false) →
- (∀op1,op2:option T.
- (op1 ≠ op2 → eq_option T f op1 op2 = false)).
- #T; #f; #H; #op1; nelim op1;
+ (op1 ≠ op2 → eq_option T op1 op2 f = false).
+ #T; #op1; nelim op1;
##[ ##1: #op2; ncases op2;
- ##[ ##1: nnormalize; #H1; nelim (H1 (refl_eq …))
- ##| ##2: #yy; nnormalize; #H1; napply refl_eq
+ ##[ ##1: nnormalize; #f; #H; #H1; nelim (H1 (refl_eq …))
+ ##| ##2: #yy; #f; #H; nnormalize; #H1; napply refl_eq
##]
##| ##2: #xx; #op2; ncases op2;
- ##[ ##1: nnormalize; #H1; napply refl_eq
- ##| ##2: #yy; nnormalize; #H1; napply (H xx yy …);
+ ##[ ##1: #f; #H; nnormalize; #H1; napply refl_eq
+ ##| ##2: #yy; #f; #H; nnormalize; #H1; napply (H xx yy …);
nnormalize; #H2; nrewrite > H2 in H1:(%); #H1;
napply (H1 (refl_eq …))
##]
nqed.
nlemma neqoption_to_neq :
-∀T.∀f:T → T → bool.
+∀T.∀op1,op2:option T.∀f:T → T → bool.
(∀x1,x2:T.f x1 x2 = false → x1 ≠ x2) →
- (∀op1,op2:option T.
- (eq_option T f op1 op2 = false → op1 ≠ op2)).
- #T; #f; #H; #op1; nelim op1;
+ (eq_option T op1 op2 f = false → op1 ≠ op2).
+ #T; #op1; nelim op1;
##[ ##1: #op2; ncases op2;
- ##[ ##1: nnormalize; #H1;
- ndestruct (*napply (bool_destruct … H1)*)
- ##| ##2: #yy; nnormalize; #H1; #H2;
- (* !!! ndestruct: assert false *)
- napply (option_destruct_none_some T … H2)
+ ##[ ##1: nnormalize; #f; #H; #H1; napply (bool_destruct … H1)
+ ##| ##2: #yy; #f; #H; nnormalize; #H1; #H2; napply (option_destruct_none_some T … H2)
##]
##| ##2: #xx; #op2; ncases op2;
- ##[ ##1: nnormalize; #H1; #H2;
- (* !!! ndestruct: assert false *)
- napply (option_destruct_some_none T … H2)
- ##| ##2: #yy; nnormalize; #H1; #H2; napply (H xx yy H1 ?);
+ ##[ ##1: nnormalize; #f; #H; #H1; #H2; napply (option_destruct_some_none T … H2)
+ ##| ##2: #yy; #f; #H; nnormalize; #H1; #H2; napply (H xx yy H1 ?);
napply (option_destruct_some_some T … H2)
##]
##]
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
λT1,T2:Type.λp:ProdT T1 T2.match p with [ pair _ x ⇒ x ].
ndefinition eq_pair ≝
-λT1,T2:Type.
+λT1,T2:Type.λp1,p2:ProdT T1 T2.
λf1:T1 → T1 → bool.λf2:T2 → T2 → bool.
-λp1,p2:ProdT T1 T2.
- (f1 (fst … p1) (fst … p2)) ⊗
- (f2 (snd … p1) (snd … p2)).
+ match p1 with [ pair x1 y1 ⇒
+ match p2 with [ pair x2 y2 ⇒
+ (f1 x1 x2) ⊗ (f2 y1 y2) ]].
ninductive Prod3T (T1:Type) (T2:Type) (T3:Type) : Type ≝
triple : T1 → T2 → T3 → Prod3T T1 T2 T3.
λT1.λT2.λT3.λp:Prod3T T1 T2 T3.match p with [ triple _ _ x ⇒ x ].
ndefinition eq_triple ≝
-λT1,T2,T3:Type.
+λT1,T2,T3:Type.λp1,p2:Prod3T T1 T2 T3.
λf1:T1 → T1 → bool.λf2:T2 → T2 → bool.λf3:T3 → T3 → bool.
-λp1,p2:Prod3T T1 T2 T3.
- (f1 (fst3T … p1) (fst3T … p2)) ⊗
- (f2 (snd3T … p1) (snd3T … p2)) ⊗
- (f3 (thd3T … p1) (thd3T … p2)).
+ match p1 with [ triple x1 y1 z1 ⇒
+ match p2 with [ triple x2 y2 z2 ⇒
+ (f1 x1 x2) ⊗ (f2 y1 y2) ⊗ (f3 z1 z2) ]].
ninductive Prod4T (T1:Type) (T2:Type) (T3:Type) (T4:Type) : Type ≝
quadruple : T1 → T2 → T3 → T4 → Prod4T T1 T2 T3 T4.
λT1.λT2.λT3.λT4.λp:Prod4T T1 T2 T3 T4.match p with [ quadruple _ _ _ x ⇒ x ].
ndefinition eq_quadruple ≝
-λT1,T2,T3,T4:Type.
+λT1,T2,T3,T4:Type.λp1,p2:Prod4T T1 T2 T3 T4.
λf1:T1 → T1 → bool.λf2:T2 → T2 → bool.λf3:T3 → T3 → bool.λf4:T4 → T4 → bool.
-λp1,p2:Prod4T T1 T2 T3 T4.
- (f1 (fst4T … p1) (fst4T … p2)) ⊗
- (f2 (snd4T … p1) (snd4T … p2)) ⊗
- (f3 (thd4T … p1) (thd4T … p2)) ⊗
- (f4 (fth4T … p1) (fth4T … p2)).
+ match p1 with [ quadruple x1 y1 z1 w1 ⇒
+ match p2 with [ quadruple x2 y2 z2 w2 ⇒
+ (f1 x1 x2) ⊗ (f2 y1 y2) ⊗ (f3 z1 z2) ⊗ (f4 w1 w2) ]].
ninductive Prod5T (T1:Type) (T2:Type) (T3:Type) (T4:Type) (T5:Type) : Type ≝
quintuple : T1 → T2 → T3 → T4 → T5 → Prod5T T1 T2 T3 T4 T5.
ndefinition thd5T ≝
λT1.λT2.λT3.λT4.λT5.λp:Prod5T T1 T2 T3 T4 T5.match p with [ quintuple _ _ x _ _ ⇒ x ].
-ndefinition fth5T ≝
+ndefinition frth5T ≝
λT1.λT2.λT3.λT4.λT5.λp:Prod5T T1 T2 T3 T4 T5.match p with [ quintuple _ _ _ x _ ⇒ x ].
-ndefinition fft5T ≝
+ndefinition ffth5T ≝
λT1.λT2.λT3.λT4.λT5.λp:Prod5T T1 T2 T3 T4 T5.match p with [ quintuple _ _ _ _ x ⇒ x ].
ndefinition eq_quintuple ≝
-λT1,T2,T3,T4,T5:Type.
+λT1,T2,T3,T4,T5:Type.λp1,p2:Prod5T T1 T2 T3 T4 T5.
λf1:T1 → T1 → bool.λf2:T2 → T2 → bool.λf3:T3 → T3 → bool.λf4:T4 → T4 → bool.λf5:T5 → T5 → bool.
-λp1,p2:Prod5T T1 T2 T3 T4 T5.
- (f1 (fst5T … p1) (fst5T … p2)) ⊗
- (f2 (snd5T … p1) (snd5T … p2)) ⊗
- (f3 (thd5T … p1) (thd5T … p2)) ⊗
- (f4 (fth5T … p1) (fth5T … p2)) ⊗
- (f5 (fft5T … p1) (fft5T … p2)).
+ match p1 with [ quintuple x1 y1 z1 w1 v1 ⇒
+ match p2 with [ quintuple x2 y2 z2 w2 v2 ⇒
+ (f1 x1 x2) ⊗ (f2 y1 y2) ⊗ (f3 z1 z2) ⊗ (f4 w1 w2) ⊗ (f5 v1 v2) ]].
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
nqed.
nlemma symmetric_eqpair :
-∀T1,T2:Type.
+∀T1,T2:Type.∀p1,p2:ProdT T1 T2.
∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.
(symmetricT T1 bool f1) →
(symmetricT T2 bool f2) →
- (∀p1,p2:ProdT T1 T2.
- (eq_pair T1 T2 f1 f2 p1 p2 = eq_pair T1 T2 f1 f2 p1 p2)).
- #T1; #T2; #f1; #f2; #H; #H1;
- #p1; nelim p1; #x1; #y1;
- #p2; nelim p2; #x2; #y2;
+ (eq_pair T1 T2 p1 p2 f1 f2 = eq_pair T1 T2 p2 p1 f1 f2).
+ #T1; #T2; #p1; #p2; #f1; #f2; #H; #H1;
+ nelim p1;
+ #x1; #y1;
+ nelim p2;
+ #x2; #y2;
nnormalize;
nrewrite > (H x1 x2);
ncases (f1 x2 x1);
nqed.
nlemma eq_to_eqpair :
-∀T1,T2.
+∀T1,T2.∀p1,p2:ProdT T1 T2.
∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.
(∀x,y:T1.x = y → f1 x y = true) →
(∀x,y:T2.x = y → f2 x y = true) →
- (∀p1,p2:ProdT T1 T2.
- (p1 = p2 → eq_pair T1 T2 f1 f2 p1 p2 = true)).
- #T1; #T2; #f1; #f2; #H1; #H2;
- #p1; nelim p1; #x1; #y1;
- #p2; nelim p2; #x2; #y2; #H;
+ (p1 = p2 → eq_pair T1 T2 p1 p2 f1 f2 = true).
+ #T1; #T2; #p1; #p2; #f1; #f2; #H1; #H2;
+ nelim p1;
+ #x1; #y1;
+ nelim p2;
+ #x2; #y2; #H;
nnormalize;
nrewrite > (H1 … (pair_destruct_1 … H));
nnormalize;
nqed.
nlemma eqpair_to_eq :
-∀T1,T2.
+∀T1,T2.∀p1,p2:ProdT T1 T2.
∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.
(∀x,y:T1.f1 x y = true → x = y) →
(∀x,y:T2.f2 x y = true → x = y) →
- (∀p1,p2:ProdT T1 T2.
- (eq_pair T1 T2 f1 f2 p1 p2 = true → p1 = p2)).
- #T1; #T2; #f1; #f2; #H1; #H2;
- #p1; nelim p1; #x1; #y1;
- #p2; nelim p2; #x2; #y2; #H;
+ (eq_pair T1 T2 p1 p2 f1 f2 = true → p1 = p2).
+ #T1; #T2; #p1; #p2; #f1; #f2; #H1; #H2;
+ nelim p1;
+ #x1; #y1;
+ nelim p2;
+ #x2; #y2; #H;
nnormalize in H:(%);
nletin K ≝ (H1 x1 x2);
ncases (f1 x1 x2) in H:(%) K:(%);
nnormalize;
#H3;
- ##[ ##2: ndestruct (*napply (bool_destruct … H3)*) ##]
+ ##[ ##2: napply (bool_destruct … H3) ##]
#H4;
nrewrite > (H4 (refl_eq …));
nrewrite > (H2 y1 y2 H3);
napply refl_eq.
nqed.
-nlemma decidable_pair :
-∀T1,T2.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:ProdT T1 T2.decidable (x = y)).
+nlemma decidable_pair
+ : ∀T1,T2.
+ (∀x,y:T1.decidable (x = y)) →
+ (∀x,y:T2.decidable (x = y)) →
+ ∀x,y:ProdT T1 T2.decidable (x = y).
#T1; #T2; #H; #H1;
#x; nelim x; #xx1; #xx2;
#y; nelim y; #yy1; #yy2;
nqed.
nlemma neqpair_to_neq :
-∀T1,T2.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.
+ ∀T1,T2.∀p1,p2:ProdT T1 T2.
+ ∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.
(∀x,y:T1.f1 x y = false → x ≠ y) →
(∀x,y:T2.f2 x y = false → x ≠ y) →
- (∀p1,p2:ProdT T1 T2.
- (eq_pair T1 T2 f1 f2 p1 p2 = false → p1 ≠ p2)).
- #T1; #T2; #f1; #f2; #H1; #H2;
- #p1; nelim p1; #x1; #y1;
- #p2; nelim p2; #x2; #y2;
+ (eq_pair T1 T2 p1 p2 f1 f2 = false → p1 ≠ p2).
+ #T1; #T2; #p1; #p2; #f1; #f2; #H1; #H2;
+ nelim p1;
+ #x1; #y1;
+ nelim p2;
+ #x2; #y2;
nchange with ((((f1 x1 x2) ⊗ (f2 y1 y2)) = false) → ?); #H;
nnormalize; #H3;
napply (or2_elim ((f1 x1 x2) = false) ((f2 y1 y2) = false) ? (andb_false2 … H) ?);
##]
nqed.
-nlemma pair_destruct :
-∀T1,T2.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x1,x2:T1.∀y1,y2:T2.
- (pair T1 T2 x1 y1) ≠ (pair T1 T2 x2 y2) → x1 ≠ x2 ∨ y1 ≠ y2).
+nlemma pair_destruct
+ : ∀T1,T2.
+ (∀x,y:T1.decidable (x = y)) →
+ (∀x,y:T2.decidable (x = y)) →
+ ∀x1,x2:T1.∀y1,y2:T2.(pair T1 T2 x1 y1) ≠ (pair T1 T2 x2 y2) → x1 ≠ x2 ∨ y1 ≠ y2.
#T1; #T2; #H1; #H2; #x1; #x2; #y1; #y2;
nnormalize; #H;
napply (or2_elim (x1 = x2) (x1 ≠ x2) ? (H1 x1 x2) ?);
nqed.
nlemma neq_to_neqpair :
-∀T1,T2.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.
+ ∀T1,T2.∀p1,p2:ProdT T1 T2.
+ ∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.
(∀x,y:T1.decidable (x = y)) →
(∀x,y:T2.decidable (x = y)) →
(∀x,y:T1.x ≠ y → f1 x y = false) →
(∀x,y:T2.x ≠ y → f2 x y = false) →
- (∀p1,p2:ProdT T1 T2.
- (p1 ≠ p2 → eq_pair T1 T2 f1 f2 p1 p2 = false)).
- #T1; #T2; #f1; #f2; #H1; #H2; #H3; #H4;
- #p1; nelim p1; #x1; #y1;
- #p2; nelim p2; #x2; #y2; #H;
+ (p1 ≠ p2 → eq_pair T1 T2 p1 p2 f1 f2 = false).
+ #T1; #T2; #p1; #p2; #f1; #f2; #H1; #H2; #H3; #H4;
+ nelim p1;
+ #x1; #y1;
+ nelim p2;
+ #x2; #y2; #H;
nchange with (((f1 x1 x2) ⊗ (f2 y1 y2)) = false);
napply (or2_elim (x1 ≠ x2) (y1 ≠ y2) ? (pair_destruct T1 T2 H1 H2 … H) ?);
##[ ##2: #H5; nrewrite > (H4 … H5); nrewrite > (andb_false2_2 (f1 x1 x2)); napply refl_eq
nqed.
nlemma symmetric_eqtriple :
-∀T1,T2,T3:Type.
+∀T1,T2,T3:Type.∀p1,p2:Prod3T T1 T2 T3.
∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.
(symmetricT T1 bool f1) →
(symmetricT T2 bool f2) →
(symmetricT T3 bool f3) →
- (∀p1,p2:Prod3T T1 T2 T3.
- (eq_triple T1 T2 T3 f1 f2 f3 p1 p2 = eq_triple T1 T2 T3 f1 f2 f3 p2 p1)).
- #T1; #T2; #T3; #f1; #f2; #f3; #H; #H1; #H2;
- #p1; nelim p1; #x1; #y1; #z1;
- #p2; nelim p2; #x2; #y2; #z2;
+ (eq_triple T1 T2 T3 p1 p2 f1 f2 f3 = eq_triple T1 T2 T3 p2 p1 f1 f2 f3).
+ #T1; #T2; #T3; #p1; #p2; #f1; #f2; #f3; #H; #H1; #H2;
+ nelim p1;
+ #x1; #y1; #z1;
+ nelim p2;
+ #x2; #y2; #z2;
nnormalize;
nrewrite > (H x1 x2);
ncases (f1 x2 x1);
nqed.
nlemma eq_to_eqtriple :
-∀T1,T2,T3.
+∀T1,T2,T3.∀p1,p2:Prod3T T1 T2 T3.
∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.
(∀x1,x2:T1.x1 = x2 → f1 x1 x2 = true) →
(∀y1,y2:T2.y1 = y2 → f2 y1 y2 = true) →
(∀z1,z2:T3.z1 = z2 → f3 z1 z2 = true) →
- (∀p1,p2:Prod3T T1 T2 T3.
- (p1 = p2 → eq_triple T1 T2 T3 f1 f2 f3 p1 p2 = true)).
- #T1; #T2; #T3; #f1; #f2; #f3; #H1; #H2; #H3;
- #p1; nelim p1; #x1; #y1; #z1;
- #p2; nelim p2; #x2; #y2; #z2; #H;
+ (p1 = p2 → eq_triple T1 T2 T3 p1 p2 f1 f2 f3 = true).
+ #T1; #T2; #T3; #p1; #p2; #f1; #f2; #f3; #H1; #H2; #H3;
+ nelim p1;
+ #x1; #y1; #z1;
+ nelim p2;
+ #x2; #y2; #z2; #H;
nnormalize;
nrewrite > (H1 … (triple_destruct_1 … H));
nnormalize;
nqed.
nlemma eqtriple_to_eq :
-∀T1,T2,T3.
+∀T1,T2,T3.∀p1,p2:Prod3T T1 T2 T3.
∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.
(∀x1,x2:T1.f1 x1 x2 = true → x1 = x2) →
(∀y1,y2:T2.f2 y1 y2 = true → y1 = y2) →
(∀z1,z2:T3.f3 z1 z2 = true → z1 = z2) →
- (∀p1,p2:Prod3T T1 T2 T3.
- (eq_triple T1 T2 T3 f1 f2 f3 p1 p2 = true → p1 = p2)).
- #T1; #T2; #T3; #f1; #f2; #f3; #H1; #H2; #H3;
- #p1; nelim p1; #x1; #y1; #z1;
- #p2; nelim p2; #x2; #y2; #z2; #H;
+ (eq_triple T1 T2 T3 p1 p2 f1 f2 f3 = true → p1 = p2).
+ #T1; #T2; #T3; #p1; #p2; #f1; #f2; #f3; #H1; #H2; #H3;
+ nelim p1;
+ #x1; #y1; #z1;
+ nelim p2;
+ #x2; #y2; #z2; #H;
nnormalize in H:(%);
nletin K ≝ (H1 x1 x2);
ncases (f1 x1 x2) in H:(%) K:(%);
nnormalize;
- ##[ ##2: #H4; ndestruct (*napply (bool_destruct … H4)*) ##]
+ ##[ ##2: #H4; napply (bool_destruct … H4) ##]
nletin K1 ≝ (H2 y1 y2);
ncases (f2 y1 y2) in K1:(%) ⊢ %;
nnormalize;
- ##[ ##2: #H4; #H5; ndestruct (*napply (bool_destruct … H5)*) ##]
+ ##[ ##2: #H4; #H5; napply (bool_destruct … H5) ##]
#H4; #H5; #H6;
nrewrite > (H4 (refl_eq …));
nrewrite > (H6 (refl_eq …));
napply refl_eq.
nqed.
-nlemma decidable_triple :
-∀T1,T2,T3.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:T3.decidable (x = y)) →
- (∀x,y:Prod3T T1 T2 T3.decidable (x = y)).
+nlemma decidable_triple
+ : ∀T1,T2,T3.
+ (∀x,y:T1.decidable (x = y)) →
+ (∀x,y:T2.decidable (x = y)) →
+ (∀x,y:T3.decidable (x = y)) →
+ ∀x,y:Prod3T T1 T2 T3.decidable (x = y).
#T1; #T2; #T3; #H; #H1; #H2;
#x; nelim x; #xx1; #xx2; #xx3;
#y; nelim y; #yy1; #yy2; #yy3;
nqed.
nlemma neqtriple_to_neq :
-∀T1,T2,T3.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.
+ ∀T1,T2,T3.∀p1,p2:Prod3T T1 T2 T3.
+ ∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.
(∀x,y:T1.f1 x y = false → x ≠ y) →
(∀x,y:T2.f2 x y = false → x ≠ y) →
(∀x,y:T3.f3 x y = false → x ≠ y) →
- (∀p1,p2:Prod3T T1 T2 T3.
- (eq_triple T1 T2 T3 f1 f2 f3 p1 p2 = false → p1 ≠ p2)).
- #T1; #T2; #T3; #f1; #f2; #f3; #H1; #H2; #H3;
- #p1; nelim p1; #x1; #y1; #z1;
- #p2; nelim p2; #x2; #y2; #z2;
+ (eq_triple T1 T2 T3 p1 p2 f1 f2 f3 = false → p1 ≠ p2).
+ #T1; #T2; #T3; #p1; #p2; #f1; #f2; #f3; #H1; #H2; #H3;
+ nelim p1;
+ #x1; #y1; #z1;
+ nelim p2;
+ #x2; #y2; #z2;
nchange with ((((f1 x1 x2) ⊗ (f2 y1 y2) ⊗ (f3 z1 z2)) = false) → ?); #H;
nnormalize; #H4;
napply (or3_elim ((f1 x1 x2) = false) ((f2 y1 y2) = false) ((f3 z1 z2) = false) ? (andb_false3 … H) ?);
##]
nqed.
-nlemma triple_destruct :
-∀T1,T2,T3.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:T3.decidable (x = y)) →
- (∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.
- (triple T1 T2 T3 x1 y1 z1) ≠ (triple T1 T2 T3 x2 y2 z2) →
- Or3 (x1 ≠ x2) (y1 ≠ y2) (z1 ≠ z2)).
+nlemma triple_destruct
+ : ∀T1,T2,T3.
+ (∀x,y:T1.decidable (x = y)) →
+ (∀x,y:T2.decidable (x = y)) →
+ (∀x,y:T3.decidable (x = y)) →
+ ∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.(triple T1 T2 T3 x1 y1 z1) ≠ (triple T1 T2 T3 x2 y2 z2) →
+ Or3 (x1 ≠ x2) (y1 ≠ y2) (z1 ≠ z2).
#T1; #T2; #T3; #H1; #H2; #H3; #x1; #x2; #y1; #y2; #z1; #z2;
nnormalize; #H;
napply (or2_elim (x1 = x2) (x1 ≠ x2) ? (H1 x1 x2) ?);
nqed.
nlemma neq_to_neqtriple :
-∀T1,T2,T3.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.
+ ∀T1,T2,T3.∀p1,p2:Prod3T T1 T2 T3.
+ ∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.
(∀x,y:T1.decidable (x = y)) →
(∀x,y:T2.decidable (x = y)) →
(∀x,y:T3.decidable (x = y)) →
(∀x,y:T1.x ≠ y → f1 x y = false) →
(∀x,y:T2.x ≠ y → f2 x y = false) →
(∀x,y:T3.x ≠ y → f3 x y = false) →
- (∀p1,p2:Prod3T T1 T2 T3.
- (p1 ≠ p2 → eq_triple T1 T2 T3 f1 f2 f3 p1 p2 = false)).
- #T1; #T2; #T3; #f1; #f2; #f3; #H1; #H2; #H3; #H4; #H5; #H6;
- #p1; nelim p1; #x1; #y1; #z1;
- #p2; nelim p2; #x2; #y2; #z2; #H;
+ (p1 ≠ p2 → eq_triple T1 T2 T3 p1 p2 f1 f2 f3 = false).
+ #T1; #T2; #T3; #p1; #p2; #f1; #f2; #f3; #H1; #H2; #H3; #H4; #H5; #H6;
+ nelim p1;
+ #x1; #y1; #z1;
+ nelim p2;
+ #x2; #y2; #z2; #H;
nchange with (((f1 x1 x2) ⊗ (f2 y1 y2) ⊗ (f3 z1 z2)) = false);
napply (or3_elim (x1 ≠ x2) (y1 ≠ y2) (z1 ≠ z2) ? (triple_destruct T1 T2 T3 H1 H2 H3 … H) ?);
##[ ##1: #H7; nrewrite > (H4 … H7); nrewrite > (andb_false3_1 (f2 y1 y2) (f3 z1 z2)); napply refl_eq
nqed.
nlemma symmetric_eqquadruple :
-∀T1,T2,T3,T4:Type.
+∀T1,T2,T3,T4:Type.∀p1,p2:Prod4T T1 T2 T3 T4.
∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.
(symmetricT T1 bool f1) →
(symmetricT T2 bool f2) →
(symmetricT T3 bool f3) →
(symmetricT T4 bool f4) →
- (∀p1,p2:Prod4T T1 T2 T3 T4.
- (eq_quadruple T1 T2 T3 T4 f1 f2 f3 f4 p1 p2 = eq_quadruple T1 T2 T3 T4 f1 f2 f3 f4 p2 p1)).
- #T1; #T2; #T3; #T4; #f1; #f2; #f3; #f4; #H; #H1; #H2; #H3;
- #p1; nelim p1; #x1; #y1; #z1; #v1;
- #p2; nelim p2; #x2; #y2; #z2; #v2;
+ (eq_quadruple T1 T2 T3 T4 p1 p2 f1 f2 f3 f4 = eq_quadruple T1 T2 T3 T4 p2 p1 f1 f2 f3 f4).
+ #T1; #T2; #T3; #T4; #p1; #p2; #f1; #f2; #f3; #f4; #H; #H1; #H2; #H3;
+ nelim p1;
+ #x1; #y1; #z1; #v1;
+ nelim p2;
+ #x2; #y2; #z2; #v2;
nnormalize;
nrewrite > (H x1 x2);
ncases (f1 x2 x1);
nqed.
nlemma eq_to_eqquadruple :
-∀T1,T2,T3,T4.
+∀T1,T2,T3,T4.∀p1,p2:Prod4T T1 T2 T3 T4.
∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.
(∀x,y:T1.x = y → f1 x y = true) →
(∀x,y:T2.x = y → f2 x y = true) →
(∀x,y:T3.x = y → f3 x y = true) →
(∀x,y:T4.x = y → f4 x y = true) →
- (∀p1,p2:Prod4T T1 T2 T3 T4.
- (p1 = p2 → eq_quadruple T1 T2 T3 T4 f1 f2 f3 f4 p1 p2 = true)).
- #T1; #T2; #T3; #T4; #f1; #f2; #f3; #f4; #H1; #H2; #H3; #H4;
- #p1; nelim p1; #x1; #y1; #z1; #v1;
- #p2; nelim p2; #x2; #y2; #z2; #v2; #H;
+ (p1 = p2 → eq_quadruple T1 T2 T3 T4 p1 p2 f1 f2 f3 f4 = true).
+ #T1; #T2; #T3; #T4; #p1; #p2; #f1; #f2; #f3; #f4; #H1; #H2; #H3; #H4;
+ nelim p1;
+ #x1; #y1; #z1; #v1;
+ nelim p2;
+ #x2; #y2; #z2; #v2; #H;
nnormalize;
nrewrite > (H1 … (quadruple_destruct_1 … H));
nnormalize;
nqed.
nlemma eqquadruple_to_eq :
-∀T1,T2,T3,T4.
+∀T1,T2,T3,T4.∀p1,p2:Prod4T T1 T2 T3 T4.
∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.
(∀x,y:T1.f1 x y = true → x = y) →
(∀x,y:T2.f2 x y = true → x = y) →
(∀x,y:T3.f3 x y = true → x = y) →
(∀x,y:T4.f4 x y = true → x = y) →
- (∀p1,p2:Prod4T T1 T2 T3 T4.
- (eq_quadruple T1 T2 T3 T4 f1 f2 f3 f4 p1 p2 = true → p1 = p2)).
- #T1; #T2; #T3; #T4; #f1; #f2; #f3; #f4; #H1; #H2; #H3; #H4;
- #p1; nelim p1; #x1; #y1; #z1; #v1;
- #p2; nelim p2; #x2; #y2; #z2; #v2; #H;
+ (eq_quadruple T1 T2 T3 T4 p1 p2 f1 f2 f3 f4 = true → p1 = p2).
+ #T1; #T2; #T3; #T4; #p1; #p2; #f1; #f2; #f3; #f4; #H1; #H2; #H3; #H4;
+ nelim p1;
+ #x1; #y1; #z1; #v1;
+ nelim p2;
+ #x2; #y2; #z2; #v2; #H;
nnormalize in H:(%);
nletin K ≝ (H1 x1 x2);
ncases (f1 x1 x2) in H:(%) K:(%);
nnormalize;
- ##[ ##2: #H5; ndestruct (*napply (bool_destruct … H5)*) ##]
+ ##[ ##2: #H5; napply (bool_destruct … H5) ##]
nletin K1 ≝ (H2 y1 y2);
ncases (f2 y1 y2) in K1:(%) ⊢ %;
nnormalize;
- ##[ ##2: #H5; #H6; ndestruct (*napply (bool_destruct … H6)*) ##]
+ ##[ ##2: #H5; #H6; napply (bool_destruct … H6) ##]
nletin K2 ≝ (H3 z1 z2);
ncases (f3 z1 z2) in K2:(%) ⊢ %;
nnormalize;
- ##[ ##2: #H5; #H6; #H7; ndestruct (*napply (bool_destruct … H7)*) ##]
+ ##[ ##2: #H5; #H6; #H7; napply (bool_destruct … H7) ##]
#H5; #H6; #H7; #H8;
nrewrite > (H5 (refl_eq …));
nrewrite > (H6 (refl_eq …));
napply refl_eq.
nqed.
-nlemma decidable_quadruple :
-∀T1,T2,T3,T4.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:T3.decidable (x = y)) →
- (∀x,y:T4.decidable (x = y)) →
- (∀x,y:Prod4T T1 T2 T3 T4.decidable (x = y)).
+nlemma decidable_quadruple
+ : ∀T1,T2,T3,T4.
+ (∀x,y:T1.decidable (x = y)) →
+ (∀x,y:T2.decidable (x = y)) →
+ (∀x,y:T3.decidable (x = y)) →
+ (∀x,y:T4.decidable (x = y)) →
+ ∀x,y:Prod4T T1 T2 T3 T4.decidable (x = y).
#T1; #T2; #T3; #T4; #H; #H1; #H2; #H3;
#x; nelim x; #xx1; #xx2; #xx3; #xx4;
#y; nelim y; #yy1; #yy2; #yy3; #yy4;
nqed.
nlemma neqquadruple_to_neq :
-∀T1,T2,T3,T4.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.
+ ∀T1,T2,T3,T4.∀p1,p2:Prod4T T1 T2 T3 T4.
+ ∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.
(∀x,y:T1.f1 x y = false → x ≠ y) →
(∀x,y:T2.f2 x y = false → x ≠ y) →
(∀x,y:T3.f3 x y = false → x ≠ y) →
(∀x,y:T4.f4 x y = false → x ≠ y) →
- (∀p1,p2:Prod4T T1 T2 T3 T4.
- (eq_quadruple T1 T2 T3 T4 f1 f2 f3 f4 p1 p2 = false → p1 ≠ p2)).
- #T1; #T2; #T3; #T4; #f1; #f2; #f3; #f4; #H1; #H2; #H3; #H4;
- #p1; nelim p1; #x1; #y1; #z1; #v1;
- #p2; nelim p2; #x2; #y2; #z2; #v2;
+ (eq_quadruple T1 T2 T3 T4 p1 p2 f1 f2 f3 f4 = false → p1 ≠ p2).
+ #T1; #T2; #T3; #T4; #p1; #p2; #f1; #f2; #f3; #f4; #H1; #H2; #H3; #H4;
+ nelim p1;
+ #x1; #y1; #z1; #v1;
+ nelim p2;
+ #x2; #y2; #z2; #v2;
nchange with ((((f1 x1 x2) ⊗ (f2 y1 y2) ⊗ (f3 z1 z2) ⊗ (f4 v1 v2)) = false) → ?); #H;
nnormalize; #H5;
napply (or4_elim ((f1 x1 x2) = false) ((f2 y1 y2) = false) ((f3 z1 z2) = false) ((f4 v1 v2) = false) ? (andb_false4 … H) ?);
##]
nqed.
-nlemma quadruple_destruct :
-∀T1,T2,T3,T4.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:T3.decidable (x = y)) →
- (∀x,y:T4.decidable (x = y)) →
- (∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.∀v1,v2:T4.
- (quadruple T1 T2 T3 T4 x1 y1 z1 v1) ≠ (quadruple T1 T2 T3 T4 x2 y2 z2 v2) →
- Or4 (x1 ≠ x2) (y1 ≠ y2) (z1 ≠ z2) (v1 ≠ v2)).
+nlemma quadruple_destruct
+ : ∀T1,T2,T3,T4.
+ (∀x,y:T1.decidable (x = y)) →
+ (∀x,y:T2.decidable (x = y)) →
+ (∀x,y:T3.decidable (x = y)) →
+ (∀x,y:T4.decidable (x = y)) →
+ ∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.∀v1,v2:T4.
+ (quadruple T1 T2 T3 T4 x1 y1 z1 v1) ≠ (quadruple T1 T2 T3 T4 x2 y2 z2 v2) →
+ Or4 (x1 ≠ x2) (y1 ≠ y2) (z1 ≠ z2) (v1 ≠ v2).
#T1; #T2; #T3; #T4; #H1; #H2; #H3; #H4;
#x1; #x2; #y1; #y2; #z1; #z2; #v1; #v2;
nnormalize; #H;
nqed.
nlemma neq_to_neqquadruple :
-∀T1,T2,T3,T4.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.
+ ∀T1,T2,T3,T4.∀p1,p2:Prod4T T1 T2 T3 T4.
+ ∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.
(∀x,y:T1.decidable (x = y)) →
(∀x,y:T2.decidable (x = y)) →
(∀x,y:T3.decidable (x = y)) →
(∀x,y:T2.x ≠ y → f2 x y = false) →
(∀x,y:T3.x ≠ y → f3 x y = false) →
(∀x,y:T4.x ≠ y → f4 x y = false) →
- (∀p1,p2:Prod4T T1 T2 T3 T4.
- (p1 ≠ p2 → eq_quadruple T1 T2 T3 T4 f1 f2 f3 f4 p1 p2 = false)).
- #T1; #T2; #T3; #T4; #f1; #f2; #f3; #f4; #H1; #H2; #H3; #H4; #H5; #H6; #H7; #H8;
- #p1; nelim p1; #x1; #y1; #z1; #v1;
- #p2; nelim p2; #x2; #y2; #z2; #v2; #H;
+ (p1 ≠ p2 → eq_quadruple T1 T2 T3 T4 p1 p2 f1 f2 f3 f4 = false).
+ #T1; #T2; #T3; #T4; #p1; #p2; #f1; #f2; #f3; #f4; #H1; #H2; #H3; #H4; #H5; #H6; #H7; #H8;
+ nelim p1;
+ #x1; #y1; #z1; #v1;
+ nelim p2;
+ #x2; #y2; #z2; #v2; #H;
nchange with (((f1 x1 x2) ⊗ (f2 y1 y2) ⊗ (f3 z1 z2) ⊗ (f4 v1 v2)) = false);
napply (or4_elim (x1 ≠ x2) (y1 ≠ y2) (z1 ≠ z2) (v1 ≠ v2) ? (quadruple_destruct T1 T2 T3 T4 H1 H2 H3 H4 … H) ?);
##[ ##1: #H9; nrewrite > (H5 … H9); nrewrite > (andb_false4_1 (f2 y1 y2) (f3 z1 z2) (f4 v1 v2)); napply refl_eq
nqed.
nlemma symmetric_eqquintuple :
-∀T1,T2,T3,T4,T5:Type.
+∀T1,T2,T3,T4,T5:Type.∀p1,p2:Prod5T T1 T2 T3 T4 T5.
∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.∀f5:T5 → T5 → bool.
(symmetricT T1 bool f1) →
(symmetricT T2 bool f2) →
(symmetricT T3 bool f3) →
(symmetricT T4 bool f4) →
(symmetricT T5 bool f5) →
- (∀p1,p2:Prod5T T1 T2 T3 T4 T5.
- (eq_quintuple T1 T2 T3 T4 T5 f1 f2 f3 f4 f5 p1 p2 = eq_quintuple T1 T2 T3 T4 T5 f1 f2 f3 f4 f5 p2 p1)).
- #T1; #T2; #T3; #T4; #T5; #f1; #f2; #f3; #f4; #f5; #H; #H1; #H2; #H3; #H4;
- #p1; nelim p1; #x1; #y1; #z1; #v1; #w1;
- #p2; nelim p2; #x2; #y2; #z2; #v2; #w2;
+ (eq_quintuple T1 T2 T3 T4 T5 p1 p2 f1 f2 f3 f4 f5 = eq_quintuple T1 T2 T3 T4 T5 p2 p1 f1 f2 f3 f4 f5).
+ #T1; #T2; #T3; #T4; #T5; #p1; #p2; #f1; #f2; #f3; #f4; #f5; #H; #H1; #H2; #H3; #H4;
+ nelim p1;
+ #x1; #y1; #z1; #v1; #w1;
+ nelim p2;
+ #x2; #y2; #z2; #v2; #w2;
nnormalize;
nrewrite > (H x1 x2);
ncases (f1 x2 x1);
nqed.
nlemma eq_to_eqquintuple :
-∀T1,T2,T3,T4,T5.
+∀T1,T2,T3,T4,T5.∀p1,p2:Prod5T T1 T2 T3 T4 T5.
∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.∀f5:T5 → T5 → bool.
(∀x,y:T1.x = y → f1 x y = true) →
(∀x,y:T2.x = y → f2 x y = true) →
(∀x,y:T3.x = y → f3 x y = true) →
(∀x,y:T4.x = y → f4 x y = true) →
(∀x,y:T5.x = y → f5 x y = true) →
- (∀p1,p2:Prod5T T1 T2 T3 T4 T5.
- (p1 = p2 → eq_quintuple T1 T2 T3 T4 T5 f1 f2 f3 f4 f5 p1 p2 = true)).
- #T1; #T2; #T3; #T4; #T5; #f1; #f2; #f3; #f4; #f5; #H1; #H2; #H3; #H4; #H5;
- #p1; nelim p1; #x1; #y1; #z1; #v1; #w1;
- #p2; nelim p2; #x2; #y2; #z2; #v2; #w2; #H;
+ (p1 = p2 → eq_quintuple T1 T2 T3 T4 T5 p1 p2 f1 f2 f3 f4 f5 = true).
+ #T1; #T2; #T3; #T4; #T5; #p1; #p2; #f1; #f2; #f3; #f4; #f5; #H1; #H2; #H3; #H4; #H5;
+ nelim p1;
+ #x1; #y1; #z1; #v1; #w1;
+ nelim p2;
+ #x2; #y2; #z2; #v2; #w2; #H;
nnormalize;
nrewrite > (H1 … (quintuple_destruct_1 … H));
nnormalize;
nqed.
nlemma eqquintuple_to_eq :
-∀T1,T2,T3,T4,T5.
+∀T1,T2,T3,T4,T5.∀p1,p2:Prod5T T1 T2 T3 T4 T5.
∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.∀f5:T5 → T5 → bool.
(∀x,y:T1.f1 x y = true → x = y) →
(∀x,y:T2.f2 x y = true → x = y) →
(∀x,y:T3.f3 x y = true → x = y) →
(∀x,y:T4.f4 x y = true → x = y) →
(∀x,y:T5.f5 x y = true → x = y) →
- (∀p1,p2:Prod5T T1 T2 T3 T4 T5.
- (eq_quintuple T1 T2 T3 T4 T5 f1 f2 f3 f4 f5 p1 p2 = true → p1 = p2)).
- #T1; #T2; #T3; #T4; #T5; #f1; #f2; #f3; #f4; #f5; #H1; #H2; #H3; #H4; #H5;
- #p1; nelim p1; #x1; #y1; #z1; #v1; #w1;
- #p2; nelim p2; #x2; #y2; #z2; #v2; #w2; #H;
+ (eq_quintuple T1 T2 T3 T4 T5 p1 p2 f1 f2 f3 f4 f5 = true → p1 = p2).
+ #T1; #T2; #T3; #T4; #T5; #p1; #p2; #f1; #f2; #f3; #f4; #f5; #H1; #H2; #H3; #H4; #H5;
+ nelim p1;
+ #x1; #y1; #z1; #v1; #w1;
+ nelim p2;
+ #x2; #y2; #z2; #v2; #w2; #H;
nnormalize in H:(%);
nletin K ≝ (H1 x1 x2);
ncases (f1 x1 x2) in H:(%) K:(%);
nnormalize;
- ##[ ##2: #H6; ndestruct (*napply (bool_destruct … H6)*) ##]
+ ##[ ##2: #H6; napply (bool_destruct … H6) ##]
nletin K1 ≝ (H2 y1 y2);
ncases (f2 y1 y2) in K1:(%) ⊢ %;
nnormalize;
- ##[ ##2: #H6; #H7; ndestruct (*napply (bool_destruct … H7)*) ##]
+ ##[ ##2: #H6; #H7; napply (bool_destruct … H7) ##]
nletin K2 ≝ (H3 z1 z2);
ncases (f3 z1 z2) in K2:(%) ⊢ %;
nnormalize;
- ##[ ##2: #H6; #H7; #H8; ndestruct (*napply (bool_destruct … H8)*) ##]
+ ##[ ##2: #H6; #H7; #H8; napply (bool_destruct … H8) ##]
nletin K3 ≝ (H4 v1 v2);
ncases (f4 v1 v2) in K3:(%) ⊢ %;
nnormalize;
- ##[ ##2: #H6; #H7; #H8; #H9; ndestruct (*napply (bool_destruct … H9)*) ##]
+ ##[ ##2: #H6; #H7; #H8; #H9; napply (bool_destruct … H9) ##]
#H6; #H7; #H8; #H9; #H10;
nrewrite > (H6 (refl_eq …));
nrewrite > (H7 (refl_eq …));
napply refl_eq.
nqed.
-nlemma decidable_quintuple :
-∀T1,T2,T3,T4,T5.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:T3.decidable (x = y)) →
- (∀x,y:T4.decidable (x = y)) →
- (∀x,y:T5.decidable (x = y)) →
- (∀x,y:Prod5T T1 T2 T3 T4 T5.decidable (x = y)).
+nlemma decidable_quintuple
+ : ∀T1,T2,T3,T4,T5.
+ (∀x,y:T1.decidable (x = y)) →
+ (∀x,y:T2.decidable (x = y)) →
+ (∀x,y:T3.decidable (x = y)) →
+ (∀x,y:T4.decidable (x = y)) →
+ (∀x,y:T5.decidable (x = y)) →
+ ∀x,y:Prod5T T1 T2 T3 T4 T5.decidable (x = y).
#T1; #T2; #T3; #T4; #T5; #H; #H1; #H2; #H3; #H4;
#x; nelim x; #xx1; #xx2; #xx3; #xx4; #xx5;
#y; nelim y; #yy1; #yy2; #yy3; #yy4; #yy5;
nqed.
nlemma neqquintuple_to_neq :
-∀T1,T2,T3,T4,T5.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.∀f5:T5 → T5 → bool.
+ ∀T1,T2,T3,T4,T5.∀p1,p2:Prod5T T1 T2 T3 T4 T5.
+ ∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.∀f5:T5 → T5 → bool.
(∀x,y:T1.f1 x y = false → x ≠ y) →
(∀x,y:T2.f2 x y = false → x ≠ y) →
(∀x,y:T3.f3 x y = false → x ≠ y) →
(∀x,y:T4.f4 x y = false → x ≠ y) →
(∀x,y:T5.f5 x y = false → x ≠ y) →
- (∀p1,p2:Prod5T T1 T2 T3 T4 T5.
- (eq_quintuple T1 T2 T3 T4 T5 f1 f2 f3 f4 f5 p1 p2 = false → p1 ≠ p2)).
- #T1; #T2; #T3; #T4; #T5; #f1; #f2; #f3; #f4; #f5; #H1; #H2; #H3; #H4; #H5;
- #p1; nelim p1; #x1; #y1; #z1; #v1; #w1;
- #p2; nelim p2; #x2; #y2; #z2; #v2; #w2;
+ (eq_quintuple T1 T2 T3 T4 T5 p1 p2 f1 f2 f3 f4 f5 = false → p1 ≠ p2).
+ #T1; #T2; #T3; #T4; #T5; #p1; #p2; #f1; #f2; #f3; #f4; #f5; #H1; #H2; #H3; #H4; #H5;
+ nelim p1;
+ #x1; #y1; #z1; #v1; #w1;
+ nelim p2;
+ #x2; #y2; #z2; #v2; #w2;
nchange with ((((f1 x1 x2) ⊗ (f2 y1 y2) ⊗ (f3 z1 z2) ⊗ (f4 v1 v2) ⊗ (f5 w1 w2)) = false) → ?); #H;
nnormalize; #H6;
napply (or5_elim ((f1 x1 x2) = false) ((f2 y1 y2) = false) ((f3 z1 z2) = false) ((f4 v1 v2) = false) ((f5 w1 w2) = false) ? (andb_false5 … H) ?);
##]
nqed.
-nlemma quintuple_destruct :
-∀T1,T2,T3,T4,T5.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:T3.decidable (x = y)) →
- (∀x,y:T4.decidable (x = y)) →
- (∀x,y:T5.decidable (x = y)) →
- (∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.∀v1,v2:T4.∀w1,w2:T5.
- (quintuple T1 T2 T3 T4 T5 x1 y1 z1 v1 w1) ≠ (quintuple T1 T2 T3 T4 T5 x2 y2 z2 v2 w2) →
- Or5 (x1 ≠ x2) (y1 ≠ y2) (z1 ≠ z2) (v1 ≠ v2) (w1 ≠ w2)).
+nlemma quintuple_destruct
+ : ∀T1,T2,T3,T4,T5.
+ (∀x,y:T1.decidable (x = y)) →
+ (∀x,y:T2.decidable (x = y)) →
+ (∀x,y:T3.decidable (x = y)) →
+ (∀x,y:T4.decidable (x = y)) →
+ (∀x,y:T5.decidable (x = y)) →
+ ∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.∀v1,v2:T4.∀w1,w2:T5.
+ (quintuple T1 T2 T3 T4 T5 x1 y1 z1 v1 w1) ≠ (quintuple T1 T2 T3 T4 T5 x2 y2 z2 v2 w2) →
+ Or5 (x1 ≠ x2) (y1 ≠ y2) (z1 ≠ z2) (v1 ≠ v2) (w1 ≠ w2).
#T1; #T2; #T3; #T4; #T5; #H1; #H2; #H3; #H4; #H5;
#x1; #x2; #y1; #y2; #z1; #z2; #v1; #v2; #w1; #w2;
nnormalize; #H;
nqed.
nlemma neq_to_neqquintuple :
-∀T1,T2,T3,T4,T5.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.∀f5:T5 → T5 → bool.
+ ∀T1,T2,T3,T4,T5.∀p1,p2:Prod5T T1 T2 T3 T4 T5.
+ ∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.∀f5:T5 → T5 → bool.
(∀x,y:T1.decidable (x = y)) →
(∀x,y:T2.decidable (x = y)) →
(∀x,y:T3.decidable (x = y)) →
(∀x,y:T3.x ≠ y → f3 x y = false) →
(∀x,y:T4.x ≠ y → f4 x y = false) →
(∀x,y:T5.x ≠ y → f5 x y = false) →
- (∀p1,p2:Prod5T T1 T2 T3 T4 T5.
- (p1 ≠ p2 → eq_quintuple T1 T2 T3 T4 T5 f1 f2 f3 f4 f5 p1 p2 = false)).
- #T1; #T2; #T3; #T4; #T5; #f1; #f2; #f3; #f4; #f5;
+ (p1 ≠ p2 → eq_quintuple T1 T2 T3 T4 T5 p1 p2 f1 f2 f3 f4 f5 = false).
+ #T1; #T2; #T3; #T4; #T5; #p1; #p2;
+ #f1; #f2; #f3; #f4; #f5;
#H1; #H2; #H3; #H4; #H5; #H6; #H7; #H8; #H9; #H10;
- #p1; nelim p1; #x1; #y1; #z1; #v1; #w1;
- #p2; nelim p2; #x2; #y2; #z2; #v2; #w2; #H;
+ nelim p1;
+ #x1; #y1; #z1; #v1; #w1;
+ nelim p2;
+ #x2; #y2; #z2; #v2; #w2; #H;
nchange with (((f1 x1 x2) ⊗ (f2 y1 y2) ⊗ (f3 z1 z2) ⊗ (f4 v1 v2) ⊗ (f5 w1 w2)) = false);
napply (or5_elim (x1 ≠ x2) (y1 ≠ y2) (z1 ≠ z2) (v1 ≠ v2) (w1 ≠ w2) ? (quintuple_destruct T1 T2 T3 T4 T5 H1 H2 H3 H4 H5 … H) ?);
##[ ##1: #H11; nrewrite > (H6 … H11); nrewrite > (andb_false5_1 (f2 y1 y2) (f3 z1 z2) (f4 v1 v2) (f5 w1 w2)); napply refl_eq
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
-include "common/theory.ma".
-
(* coppia dipendente *)
-ninductive sigma (A:Type) (P:A → Type) : Type ≝
+inductive sigma (A:Type) (P:A → Type) : Type ≝
sigma_intro: ∀x:A.P x → sigma A P.
notation < "hvbox(\Sigma ident i opt (: tx) break . p)"
interpretation "sigma" 'Sigma \eta.x = (sigma ? x).
-ndefinition sigmaFst ≝
+definition sigmaFst ≝
λT:Type.λf:T → Type.λs:sigma T f.match s with [ sigma_intro x _ ⇒ x ].
-ndefinition sigmaSnd ≝
+definition sigmaSnd ≝
λT:Type.λf:T → Type.λs:sigma T f.match s return λs.f (sigmaFst ?? s) with [ sigma_intro _ x ⇒ x ].
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
nlemma symmetric_eqstr : symmetricT (list ascii) bool eq_str.
#s1; #s2;
- napply (symmetric_bfoldrightlist2 ascii eq_ascii symmetric_eqascii s1 s2).
+ napply (symmetric_bfoldrightlist2 ascii eq_ascii s1 s2 symmetric_eqascii).
nqed.
nlemma eqstr_to_eq : ∀s,s'.eq_str s s' = true → s = s'.
#s1; #s2;
- napply (bfoldrightlist2_to_eq ascii eq_ascii eqascii_to_eq s1 s2).
+ napply (bfoldrightlist2_to_eq ascii eq_ascii s1 s2 eqascii_to_eq).
nqed.
nlemma eq_to_eqstr : ∀s,s'.s = s' → eq_str s s' = true.
#s1; #s2;
- napply (eq_to_bfoldrightlist2 ascii eq_ascii eq_to_eqascii s1 s2).
+ napply (eq_to_bfoldrightlist2 ascii eq_ascii s1 s2 eq_to_eqascii).
nqed.
nlemma decidable_str : ∀x,y:list ascii.decidable (x = y).
nlemma neqstr_to_neq : ∀s,s'.eq_str s s' = false → s ≠ s'.
#s1; #s2;
- napply (nbfoldrightlist2_to_neq ascii eq_ascii ? s1 s2 …);
+ napply (nbfoldrightlist2_to_neq ascii eq_ascii s1 s2 …);
napply neqascii_to_neq.
nqed.
nlemma neq_to_neqstr : ∀s,s'.s ≠ s' → eq_str s s' = false.
#s1; #s2;
- napply (neq_to_nbfoldrightlist2 ascii eq_ascii ?? s1 s2 …);
+ napply (neq_to_nbfoldrightlist2 ascii eq_ascii s1 s2 …);
##[ ##1: napply decidable_ascii
##| ##2: napply neq_to_neqascii
##]
nrewrite > (symmetric_eqstr (str_elem si1) (str_elem si2));
nrewrite > (symmetric_eqnat (id_elem si1) (id_elem si2));
napply refl_eq.
-nqed.
+nqed.
nlemma eqstrid_to_eq : ∀s,s'.eq_strId s s' = true → s = s'.
#si1; #si2;
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
universe constraint Type[0] < Type[1].
universe constraint Type[1] < Type[2].
universe constraint Type[2] < Type[3].
-universe constraint Type[3] < Type[4].
(* ********************************** *)
(* SOTTOINSIEME MINIMALE DELLA TEORIA *)
#A; #C; #H;
nnormalize;
#H1;
- nelim (H1 H).
+ nelim (H1 H);
nqed.
nlemma not_to_not : ∀A,B:Prop. (A → B) → ((¬B) → (¬A)).
interpretation "logical or" 'or x y = (Or2 x y).
-ndefinition decidable ≝ λA:Prop.A ∨ (¬A).
+ndefinition decidable : Prop → Prop ≝ λA:Prop.A ∨ ¬A.
nlemma or2_elim
: ∀P1,P2,Q:Prop.Or2 P1 P2 → ∀f1:P1 → Q.∀f2:P2 → Q.Q.
ninductive ex2 (A:Type) (Q,R:A → Prop) : Prop ≝
ex_intro2: ∀x:A.Q x → R x → ex2 A Q R.
+ndefinition iff ≝
+λA,B.(A → B) ∧ (B → A).
+
(* higher_order_defs/relations *)
ndefinition relation : Type → Type ≝
-λA.A → A → Prop.
+λA:Type.A → A → Prop.
ndefinition reflexive : ∀A:Type.∀R:relation A.Prop ≝
λA.λR.∀x:A.R x x.
ninductive eq (A:Type) (x:A) : A → Prop ≝
refl_eq : eq A x x.
-ndefinition refl ≝ refl_eq.
-
interpretation "leibnitz's equality" 'eq t x y = (eq t x y).
interpretation "leibnitz's non-equality" 'neq t x y = (Not (eq t x y)).
napply refl_eq.
nqed.
-nlemma eq_ind_r: ∀A:Type[0].∀x:A.∀P:A → Prop.P x → ∀y:A.y=x → P y.
+nlemma eq_ind_r: ∀A:Type.∀x:A.∀P:A → Prop.P x → ∀y:A.y=x → P y.
#A; #x; #P; #H; #y; #H1;
nrewrite < (symmetric_eq … H1);
napply H.
nqed.
-ndefinition R0 ≝ λT:Type[0].λt:T.t.
-
-ndefinition R1 ≝ eq_rect_Type0.
-
-ndefinition R2 :
- ∀T0:Type[0].
- ∀a0:T0.
- ∀T1:∀x0:T0. a0=x0 → Type[0].
- ∀a1:T1 a0 (refl_eq ? a0).
- ∀T2:∀x0:T0. ∀p0:a0=x0. ∀x1:T1 x0 p0. R1 ?? T1 a1 ? p0 = x1 → Type[0].
- ∀a2:T2 a0 (refl_eq ? a0) a1 (refl_eq ? a1).
- ∀b0:T0.
- ∀e0:a0 = b0.
- ∀b1: T1 b0 e0.
- ∀e1:R1 ?? T1 a1 ? e0 = b1.
- T2 b0 e0 b1 e1.
- #T0;#a0;#T1;#a1;#T2;#a2;#b0;#e0;#b1;#e1;
- napply (eq_rect_Type0 ????? e1);
- napply (R1 ?? ? ?? e0);
- napply a2;
-nqed.
-
-ndefinition R3 :
- ∀T0:Type[0].
- ∀a0:T0.
- ∀T1:∀x0:T0. a0=x0 → Type[0].
- ∀a1:T1 a0 (refl_eq ? a0).
- ∀T2:∀x0:T0. ∀p0:a0=x0. ∀x1:T1 x0 p0. R1 ?? T1 a1 ? p0 = x1 → Type[0].
- ∀a2:T2 a0 (refl_eq ? a0) a1 (refl_eq ? a1).
- ∀T3:∀x0:T0. ∀p0:a0=x0. ∀x1:T1 x0 p0.∀p1:R1 ?? T1 a1 ? p0 = x1.
- ∀x2:T2 x0 p0 x1 p1.R2 ???? T2 a2 x0 p0 ? p1 = x2 → Type[0].
- ∀a3:T3 a0 (refl_eq ? a0) a1 (refl_eq ? a1) a2 (refl_eq ? a2).
- ∀b0:T0.
- ∀e0:a0 = b0.
- ∀b1: T1 b0 e0.
- ∀e1:R1 ?? T1 a1 ? e0 = b1.
- ∀b2: T2 b0 e0 b1 e1.
- ∀e2:R2 ???? T2 a2 b0 e0 ? e1 = b2.
- T3 b0 e0 b1 e1 b2 e2.
- #T0;#a0;#T1;#a1;#T2;#a2;#T3;#a3;#b0;#e0;#b1;#e1;#b2;#e2;
- napply (eq_rect_Type0 ????? e2);
- napply (R2 ?? ? ???? e0 ? e1);
- napply a3;
-nqed.
-
-ndefinition R4 :
- ∀T0:Type[0].
- ∀a0:T0.
- ∀T1:∀x0:T0. eq T0 a0 x0 → Type[0].
- ∀a1:T1 a0 (refl_eq T0 a0).
- ∀T2:∀x0:T0. ∀p0:eq (T0 …) a0 x0. ∀x1:T1 x0 p0.eq (T1 …) (R1 T0 a0 T1 a1 x0 p0) x1 → Type[0].
- ∀a2:T2 a0 (refl_eq T0 a0) a1 (refl_eq (T1 a0 (refl_eq T0 a0)) a1).
- ∀T3:∀x0:T0. ∀p0:eq (T0 …) a0 x0. ∀x1:T1 x0 p0.∀p1:eq (T1 …) (R1 T0 a0 T1 a1 x0 p0) x1.
- ∀x2:T2 x0 p0 x1 p1.eq (T2 …) (R2 T0 a0 T1 a1 T2 a2 x0 p0 x1 p1) x2 → Type[0].
- ∀a3:T3 a0 (refl_eq T0 a0) a1 (refl_eq (T1 a0 (refl_eq T0 a0)) a1)
- a2 (refl_eq (T2 a0 (refl_eq T0 a0) a1 (refl_eq (T1 a0 (refl_eq T0 a0)) a1)) a2).
- ∀T4:∀x0:T0. ∀p0:eq (T0 …) a0 x0. ∀x1:T1 x0 p0.∀p1:eq (T1 …) (R1 T0 a0 T1 a1 x0 p0) x1.
- ∀x2:T2 x0 p0 x1 p1.∀p2:eq (T2 …) (R2 T0 a0 T1 a1 T2 a2 x0 p0 x1 p1) x2.
- ∀x3:T3 x0 p0 x1 p1 x2 p2.∀p3:eq (T3 …) (R3 T0 a0 T1 a1 T2 a2 T3 a3 x0 p0 x1 p1 x2 p2) x3.
- Type[0].
- ∀a4:T4 a0 (refl_eq T0 a0) a1 (refl_eq (T1 a0 (refl_eq T0 a0)) a1)
- a2 (refl_eq (T2 a0 (refl_eq T0 a0) a1 (refl_eq (T1 a0 (refl_eq T0 a0)) a1)) a2)
- a3 (refl_eq (T3 a0 (refl_eq T0 a0) a1 (refl_eq (T1 a0 (refl_eq T0 a0)) a1)
- a2 (refl_eq (T2 a0 (refl_eq T0 a0) a1 (refl_eq (T1 a0 (refl_eq T0 a0)) a1)) a2))
- a3).
- ∀b0:T0.
- ∀e0:eq (T0 …) a0 b0.
- ∀b1: T1 b0 e0.
- ∀e1:eq (T1 …) (R1 T0 a0 T1 a1 b0 e0) b1.
- ∀b2: T2 b0 e0 b1 e1.
- ∀e2:eq (T2 …) (R2 T0 a0 T1 a1 T2 a2 b0 e0 b1 e1) b2.
- ∀b3: T3 b0 e0 b1 e1 b2 e2.
- ∀e3:eq (T3 …) (R3 T0 a0 T1 a1 T2 a2 T3 a3 b0 e0 b1 e1 b2 e2) b3.
- T4 b0 e0 b1 e1 b2 e2 b3 e3.
- #T0;#a0;#T1;#a1;#T2;#a2;#T3;#a3;#T4;#a4;#b0;#e0;#b1;#e1;#b2;#e2;#b3;#e3;
- napply (eq_rect_Type0 ????? e3);
- napply (R3 ????????? e0 ? e1 ? e2);
- napply a4;
-nqed.
-
-nlemma symmetric_neq : ∀T:Type.∀x,y:T.x ≠ y → y ≠ x.
+nlemma symmetric_neq : ∀T.∀x,y:T.x ≠ y → y ≠ x.
#T; #x; #y;
nnormalize;
#H; #H1;
ndefinition associative : ∀A:Type.∀R:relationT A A.Prop ≝
λA.λR.∀x,y,z:A.R (R x y) z = R x (R y z).
+
+(* aggiunta per bypassare i punti in cui le dimostrazioni sono equivalenti *)
+(*
+ninductive peqv (A:Prop) (x:A) : A → Prop ≝
+ prefl_eqv : peqv A x x.
+
+interpretation "prop equivalence" 'preqv t x y = (peqv t x y).
+*)
+(* \equiv *)
+(*
+notation > "hvbox(a break ≡ b)"
+ non associative with precedence 45
+for @{ 'preqv ? $a $b }.
+
+nlemma symmetric_peqv: ∀A:Prop. symmetric A (peqv A).
+ #A;
+ nnormalize;
+ #x; #y; #H;
+ napply (peqv_ind A x (λ_.?) ? y H);
+ napply prefl_eqv.
+nqed.
+
+nlemma peqv_ind_r: ∀A:Prop.∀x:A.∀P:A → Prop.P x → ∀y:A.y ≡ x → P y.
+ #A; #x; #P; #H; #y; #H1;
+ napply (peqv_ind A x (λ_.?) H y (symmetric_peqv … H1)).
+nqed.
+
+naxiom peqv_ax : ∀P:Prop.∀Q,R:P.Q ≡ R.
+*)
+(* uso P x → P y, H e' P x
+ nrewrite > cioe' napply (peqv_ind ? x (λ_.?) H y (dimostrazione di x ≡ y));
+ nrewrite < cioe' napply (peqv_ind_r ? x ? H y (dimostrazione y ≡ x)));
+*)
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* dimensioni degli elementi *)
(* ************************* *)
-(*
ndefinition astbasetype_destruct_aux ≝
Πb1,b2:ast_base_type.ΠP:Prop.b1 = b2 →
match eq_astbasetype b1 b2 with [ true ⇒ P → P | false ⇒ P ].
nnormalize;
napply (λx.x).
nqed.
-*)
nlemma eq_to_eqastbasetype : ∀n1,n2.n1 = n2 → eq_astbasetype n1 n2 = true.
#n1; #n2; #H;
nlemma eqastbasetype_to_eq : ∀b1,b2.eq_astbasetype b1 b2 = true → b1 = b2.
#b1; #b2; ncases b1; ncases b2; nnormalize;
##[ ##1,5,9: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
+ ##| ##*: #H; napply (bool_destruct … H)
##]
nqed.
napply refl_eq.
nqed.
-(*
ndefinition asttype_destruct_aux ≝
Πb1,b2:ast_type.ΠP:Prop.b1 = b2 →
match eq_asttype b1 b2 with [ true ⇒ P → P | false ⇒ P ].
##]
##]
nqed.
-*)
nlemma eq_to_eqasttype_aux1
: ∀nl1,nl2.
nchange with ((eq_astbasetype b2 b2) = true);
nrewrite > (eq_to_eqastbasetype b2 b2 (refl_eq …));
napply refl_eq
- ##| ##2: #st2; #n2; #H; ndestruct (*napply (asttype_destruct … H)*)
- ##| ##3: #nl2; #H; ndestruct (*napply (asttype_destruct … H)*)
+ ##| ##2: #st2; #n2; #H; napply (asttype_destruct … H)
+ ##| ##3: #nl2; #H; napply (asttype_destruct … H)
##]
##| ##2: #st1; #n1; #H; #t2; ncases t2;
##[ ##2: #st2; #n2; #H1; nchange with (((eq_asttype st1 st2)⊗(eq_nat n1 n2)) = true);
nrewrite > (eq_to_eqnat n1 n2 (asttype_destruct_array_array_2 … H1));
nnormalize;
napply refl_eq
- ##| ##1: #b2; #H1; ndestruct (*napply (asttype_destruct … H1)*)
- ##| ##3: #nl2; #H1; ndestruct (*napply (asttype_destruct … H1)*)
+ ##| ##1: #b2; #H1; napply (asttype_destruct … H1)
+ ##| ##3: #nl2; #H1; napply (asttype_destruct … H1)
##]
##| ##3: #hh1; #H; #t2; ncases t2;
##[ ##3: #nl2; ncases nl2;
##[ ##1: #hh2; #H1; nchange with ((eq_asttype hh1 hh2) = true);
nrewrite > (H hh2 (nelist_destruct_nil_nil ? hh1 hh2 (asttype_destruct_struct_struct … H1)));
napply refl_eq
- ##| ##2: #hh2; #ll2; #H1;
- (* !!! ndestruct non va *)
- nelim (nelist_destruct_nil_cons ? hh1 hh2 ll2 (asttype_destruct_struct_struct … H1))
+ ##| ##2: #hh2; #ll2; #H1; nelim (nelist_destruct_nil_cons ? hh1 hh2 ll2 (asttype_destruct_struct_struct … H1))
##]
- ##| ##1: #b2; #H1; ndestruct (*napply (asttype_destruct … H1)*)
- ##| ##2: #st2; #n2; #H1; ndestruct (*napply (asttype_destruct … H1)*)
+ ##| ##1: #b2; #H1; napply (asttype_destruct … H1)
+ ##| ##2: #st2; #n2; #H1; napply (asttype_destruct … H1)
##]
##| ##4: #hh1; #ll1; #H; #H1; #t2; ncases t2;
##[ ##3: #nl2; ncases nl2;
- ##[ ##1: #hh2; #H2;
- (* !!! ndestruct non va *)
- nelim (nelist_destruct_cons_nil ? hh1 hh2 ll1 (asttype_destruct_struct_struct … H2))
+ ##[ ##1: #hh2; #H2; nelim (nelist_destruct_cons_nil ? hh1 hh2 ll1 (asttype_destruct_struct_struct … H2))
##| ##2: #hh2; #ll2; #H2; nchange with (((eq_asttype hh1 hh2)⊗(bfold_right_neList2 ? (λx,y.eq_asttype x y) ll1 ll2)) = true);
nrewrite > (H hh2 (nelist_destruct_cons_cons_1 … (asttype_destruct_struct_struct … H2)));
nrewrite > (eq_to_eqasttype_aux1 ll1 ll2 (H1 (AST_TYPE_STRUCT ll2) ?));
napply refl_eq
##]
##]
- ##| ##1: #b2; #H2; ndestruct (*napply (asttype_destruct … H2)*)
- ##| ##2: #st2; #n2; #H2; ndestruct (*napply (asttype_destruct … H2)*)
+ ##| ##1: #b2; #H2; napply (asttype_destruct … H2)
+ ##| ##2: #st2; #n2; #H2; napply (asttype_destruct … H2)
##]
##]
nqed.
##[ ##1: #b2; #H; nchange in H:(%) with ((eq_astbasetype b1 b2) = true);
nrewrite > (eqastbasetype_to_eq b1 b2 H);
napply refl_eq
- ##| ##2: #st2; #n2; nnormalize; #H; ndestruct (*napply (bool_destruct … H)*)
- ##| ##3: #nl2; nnormalize; #H; ndestruct (*napply (bool_destruct … H)*)
+ ##| ##2: #st2; #n2; nnormalize; #H; napply (bool_destruct … H)
+ ##| ##3: #nl2; nnormalize; #H; napply (bool_destruct … H)
##]
##| ##2: #st1; #n1; #H; #t2; ncases t2;
##[ ##2: #st2; #n2; #H1; nchange in H1:(%) with (((eq_asttype st1 st2)⊗(eq_nat n1 n2)) = true);
nrewrite > (H st2 (andb_true_true_l … H1));
nrewrite > (eqnat_to_eq n1 n2 (andb_true_true_r … H1));
napply refl_eq
- ##| ##1: #b2; nnormalize; #H1; ndestruct (*napply (bool_destruct … H1)*)
- ##| ##3: #nl2; nnormalize; #H1; ndestruct (*napply (bool_destruct … H1)*)
+ ##| ##1: #b2; nnormalize; #H1; napply (bool_destruct … H1)
+ ##| ##3: #nl2; nnormalize; #H1; napply (bool_destruct … H1)
##]
##| ##3: #hh1; #H; #t2; ncases t2;
##[ ##3: #nl2; ncases nl2;
##[ ##1: #hh2; #H1; nchange in H1:(%) with ((eq_asttype hh1 hh2) = true);
nrewrite > (H hh2 H1);
napply refl_eq
- ##| ##2: #hh2; #ll2; nnormalize; #H1; ndestruct (*napply (bool_destruct … H1)*)
+ ##| ##2: #hh2; #ll2; nnormalize; #H1; napply (bool_destruct … H1)
##]
- ##| ##1: #b2; nnormalize; #H1; ndestruct (*napply (bool_destruct … H1)*)
- ##| ##2: #st2; #n2; nnormalize; #H1; ndestruct (*napply (bool_destruct … H1)*)
+ ##| ##1: #b2; nnormalize; #H1; napply (bool_destruct … H1)
+ ##| ##2: #st2; #n2; nnormalize; #H1; napply (bool_destruct … H1)
##]
##| ##4: #hh1; #ll1; #H; #H1; #t2; ncases t2;
##[ ##3: #nl2; ncases nl2;
- ##[ ##1: #hh2; nnormalize; #H2; ndestruct (*napply (bool_destruct … H2)*)
+ ##[ ##1: #hh2; nnormalize; #H2; napply (bool_destruct … H2)
##| ##2: #hh2; #ll2; #H2; nchange in H2:(%) with (((eq_asttype hh1 hh2)⊗(bfold_right_neList2 ? (λx,y.eq_asttype x y) ll1 ll2)) = true);
nrewrite > (H hh2 (andb_true_true_l … H2));
nrewrite > (asttype_destruct_struct_struct ll1 ll2 (H1 (AST_TYPE_STRUCT ll2) (andb_true_true_r … H2)));
napply refl_eq
##]
- ##| ##1: #b2; nnormalize; #H2; ndestruct (*napply (bool_destruct … H2)*)
- ##| ##2: #st2; #n2; nnormalize; #H2; ndestruct (*napply (bool_destruct … H2)*)
+ ##| ##1: #b2; nnormalize; #H2; napply (bool_destruct … H2)
+ ##| ##2: #st2; #n2; nnormalize; #H2; napply (bool_destruct … H2)
##]
##]
nqed.
ncases ast;
nnormalize;
##[ ##1: #t; #H; napply I
- ##| ##2: #t; #n; #H; ndestruct (*napply (bool_destruct … H)*)
- ##| ##3: #t; #H; ndestruct (*napply (bool_destruct … H)*)
+ ##| ##2: #t; #n; #H; napply (bool_destruct … H)
+ ##| ##3: #t; #H; napply (bool_destruct … H)
##]
nqed.
#ast;
ncases ast;
nnormalize;
- ##[ ##1: #t; #H; ndestruct (*napply (bool_destruct … H)*)
+ ##[ ##1: #t; #H; napply (bool_destruct … H)
##| ##2: #t; #n; #H; napply I
##| ##3: #l; #H; napply I
##]
(**************************************************************************)
(* ********************************************************************** *)
-(* Progetto FreeScale *)
(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Sviluppato da: *)
+(* Cosimo Oliboni, oliboni@cs.unibo.it *)
(* *)
(* ********************************************************************** *)
#d; #l;
ngeneralize in match (refl_eq ? (S d));
ncases l in ⊢ (? ? % ? → %);
- ##[ ##1: #dsc; #H; ndestruct (*nelim (nat_destruct_0_S … H)*)
+ ##[ ##1: #dsc; #H; nelim (nat_destruct_0_S … H)
##| ##2: #n; #dsc; #sub; #H;
nnormalize;
napply I
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
-common/sigma.ma common/theory.ma
-compiler/preast_tree.ma common/string.ma compiler/ast_type.ma num/word32.ma
-emulator/opcodes/IP2022_pseudo.ma num/bool.ma
-emulator/status/HC08_status_lemmas.ma emulator/status/HC08_status.ma num/word16_lemmas.ma
-emulator/status/HC05_status_lemmas.ma emulator/status/HC05_status.ma num/word16_lemmas.ma
-emulator/multivm/multivm.ma emulator/multivm/Freescale_multivm.ma emulator/multivm/IP2022_multivm.ma emulator/read_write/fetch.ma
-emulator/translation/translation.ma emulator/translation/Freescale_translation.ma emulator/translation/IP2022_translation.ma
-num/word24.ma num/byte8.ma
-num/bool_lemmas.ma num/bool.ma
-emulator/multivm/multivm_lemmas.ma common/nat_lemmas.ma emulator/multivm/multivm.ma
-emulator/opcodes/IP2022_instr_mode.ma num/word16.ma
-common/string.ma common/ascii.ma common/list_utility.ma
-compiler/environment.ma common/string.ma compiler/ast_type.ma
-emulator/opcodes/HC08_table.ma common/list.ma emulator/opcodes/Freescale_instr_mode.ma emulator/opcodes/Freescale_pseudo.ma emulator/opcodes/byte_or_word.ma
-num/exadecim.ma common/prod.ma num/bool.ma num/oct.ma num/quatern.ma
-emulator/opcodes/IP2022_pseudo_lemmas.ma emulator/opcodes/IP2022_pseudo.ma num/bool_lemmas.ma
-common/list_utility.ma common/list.ma common/nat_lemmas.ma common/option.ma
-emulator/read_write/RS08_read_write.ma emulator/status/status_setter.ma
-num/byte8.ma common/nat.ma num/bitrigesim.ma num/comp_num.ma num/exadecim.ma
-emulator/read_write/IP2022_read_write.ma emulator/read_write/read_write_base.ma emulator/status/status_setter.ma
-emulator/model/RS08_model.ma emulator/status/status.ma
-emulator/status/RS08_status_lemmas.ma emulator/status/RS08_status.ma num/word16_lemmas.ma
-num/byte8_lemmas.ma num/byte8.ma num/comp_num_lemmas.ma num/exadecim_lemmas.ma
-num/oct_lemmas.ma num/bool_lemmas.ma num/oct.ma
-emulator/status/HC05_status.ma num/word16.ma
+freescale/multivm_lemmas.ma common/nat_lemmas.ma freescale/multivm.ma
+freescale/status.ma freescale/memory_abs.ma freescale/opcode_base.ma
+freescale/memory_bits.ma freescale/memory_trees.ma
+common/prod_lemmas.ma common/prod.ma num/bool_lemmas.ma
+freescale_tests/micro_tests10.ma freescale/multivm.ma freescale/status_lemmas.ma freescale_tests/micro_tests_tools.ma
num/bool.ma common/theory.ma
-emulator/model/HC05_model.ma emulator/status/status.ma
-emulator/tests/micro_tests_tools.ma common/list.ma num/word16.ma
-emulator/translation/Freescale_translation.ma emulator/translation/translation_base.ma
-emulator/opcodes/HC08_table_tests.ma emulator/opcodes/HC08_table.ma emulator/opcodes/pseudo.ma
-emulator/status/IP2022_status.ma emulator/memory/memory_struct.ma num/word16.ma num/word24.ma
-num/bitrigesim_lemmas.ma num/bitrigesim.ma num/bool_lemmas.ma
-emulator/status/status.ma emulator/memory/memory_abs.ma emulator/opcodes/pseudo.ma emulator/status/HC05_status.ma emulator/status/HC08_status.ma emulator/status/IP2022_status.ma emulator/status/RS08_status.ma
-emulator/memory/memory_bits.ma emulator/memory/memory_trees.ma
-emulator/opcodes/RS08_table_tests.ma emulator/opcodes/RS08_table.ma emulator/opcodes/pseudo.ma
-emulator/model/HCS08_model.ma emulator/status/status.ma
-emulator/read_write/Freescale_load_write.ma emulator/read_write/load_write_base.ma emulator/status/status_getter.ma
+freescale/table_HCS08_tests.ma freescale/opcode.ma freescale/table_HCS08.ma
+compiler/preast_tree.ma common/string.ma compiler/ast_type.ma num/word32.ma
+freescale/multivm.ma freescale/load_write.ma
+common/nat_to_num.ma common/nat.ma num/word32.ma
+common/nat.ma num/bool.ma
+common/string_lemmas.ma common/ascii_lemmas.ma common/list_utility_lemmas.ma common/string.ma
+freescale/opcode_base_lemmas.ma freescale/opcode_base.ma num/bool_lemmas.ma
+freescale_tests/medium_tests_tools.ma freescale/multivm.ma
+compiler/ast_type_lemmas.ma common/list_utility_lemmas.ma compiler/ast_type.ma
+freescale_tests/micro_tests3.ma freescale/multivm.ma freescale/status_lemmas.ma freescale_tests/micro_tests_tools.ma
num/quatern.ma num/bool.ma
-emulator/opcodes/Freescale_instr_mode.ma num/word16.ma
+freescale/table_HC05_tests.ma freescale/opcode.ma freescale/table_HC05.ma
+num/exadecim.ma common/nat.ma common/prod.ma num/bool.ma num/oct.ma num/quatern.ma
+num/bitrigesim_lemmas.ma num/bitrigesim.ma num/bool_lemmas.ma
+num/byte8.ma num/bitrigesim.ma num/exadecim.ma
+freescale/memory_func.ma common/list.ma common/option.ma freescale/memory_struct.ma num/word16.ma
+freescale/load_write.ma freescale/model.ma freescale/translation.ma
+freescale_tests/micro_tests4bis.ma freescale/multivm.ma freescale/status_lemmas.ma freescale_tests/micro_tests_tools.ma
common/nat_lemmas.ma common/nat.ma num/bool_lemmas.ma
-universe/universe.ma common/list.ma common/nat_lemmas.ma common/prod.ma
-emulator/translation/translation_base.ma common/option.ma emulator/opcodes/HC05_table.ma emulator/opcodes/HC08_table.ma emulator/opcodes/HCS08_table.ma emulator/opcodes/IP2022_table.ma emulator/opcodes/RS08_table.ma emulator/opcodes/pseudo.ma
+freescale/table_RS08.ma common/list.ma freescale/opcode_base.ma
+common/list_utility_lemmas.ma common/list_lemmas.ma common/list_utility.ma
+freescale_tests/micro_tests6.ma freescale/multivm.ma freescale/status_lemmas.ma freescale_tests/micro_tests_tools.ma
+freescale/table_RS08_tests.ma freescale/opcode.ma freescale/table_RS08.ma
+freescale/translation.ma common/option.ma freescale/table_HC05.ma freescale/table_HC08.ma freescale/table_HCS08.ma freescale/table_RS08.ma
+freescale/translation_lemmas.ma freescale/translation.ma num/byte8_lemmas.ma
+freescale/memory_abs.ma freescale/memory_bits.ma freescale/memory_func.ma freescale/memory_trees.ma
+freescale_tests/micro_tests9.ma common/nat_to_num.ma freescale/multivm.ma freescale/status_lemmas.ma freescale_tests/micro_tests_tools.ma
+num/word32_lemmas.ma num/word16_lemmas.ma num/word32.ma
+test_errori.ma
+freescale_tests/micro_tests2.ma freescale/multivm.ma freescale/status_lemmas.ma freescale_tests/micro_tests_tools.ma
+compiler/environment.ma common/string.ma compiler/ast_type.ma
+common/ascii_lemmas.ma common/ascii.ma num/bool_lemmas.ma
+freescale/memory_struct.ma num/byte8.ma num/oct.ma
+freescale/model.ma freescale/status.ma
+freescale/table_HC05.ma common/list.ma freescale/opcode_base.ma
+common/string.ma common/ascii.ma common/list_utility.ma
+common/theory.ma
+compiler/ast_type.ma common/list_utility.ma
+common/prod.ma num/bool.ma
+num/word16.ma num/byte8.ma
+freescale_tests/micro_tests5.ma freescale/multivm.ma freescale/status_lemmas.ma freescale_tests/micro_tests_tools.ma
+freescale/memory_trees.ma common/list.ma common/option.ma freescale/memory_struct.ma num/word16.ma
num/word16_lemmas.ma num/byte8_lemmas.ma num/word16.ma
-emulator/read_write/IP2022_load_write.ma emulator/read_write/load_write_base.ma emulator/status/status_getter.ma
-emulator/tests/micro_tests2.ma emulator/multivm/multivm.ma emulator/status/status_lemmas.ma emulator/tests/micro_tests_tools.ma
-emulator/memory/memory_trees.ma common/list.ma common/option.ma emulator/memory/memory_struct.ma num/word32.ma
-common/nat.ma num/bool.ma
-emulator/status/RS08_status.ma num/word16.ma
-compiler/ast_type_lemmas.ma common/list_utility_lemmas.ma compiler/ast_type.ma
-common/string_lemmas.ma common/ascii_lemmas.ma common/list_utility_lemmas.ma common/string.ma
-emulator/status/IP2022_status_lemmas.ma emulator/memory/memory_struct_lemmas.ma emulator/status/IP2022_status.ma num/oct_lemmas.ma num/word16_lemmas.ma num/word24_lemmas.ma
-num/comp_num.ma num/exadecim.ma
-emulator/status/status_setter.ma emulator/status/status.ma
-emulator/multivm/IP2022_multivm.ma emulator/multivm/multivm_base.ma emulator/read_write/load_write.ma
-num/quatern_lemmas.ma num/bool_lemmas.ma num/quatern.ma
-common/list.ma common/theory.ma
-emulator/opcodes/HCS08_table.ma common/list.ma emulator/opcodes/Freescale_instr_mode.ma emulator/opcodes/Freescale_pseudo.ma emulator/opcodes/byte_or_word.ma
-emulator/opcodes/HC05_table_tests.ma emulator/opcodes/HC05_table.ma emulator/opcodes/pseudo.ma
-common/ascii.ma num/bool.ma
num/exadecim_lemmas.ma num/bool_lemmas.ma num/exadecim.ma
-emulator/memory/memory_struct_lemmas.ma emulator/memory/memory_struct.ma num/bool_lemmas.ma
-emulator/opcodes/IP2022_table.ma common/list.ma emulator/opcodes/IP2022_instr_mode.ma emulator/opcodes/IP2022_pseudo.ma emulator/opcodes/byte_or_word.ma
-num/oct.ma num/bool.ma
+freescale_tests/medium_tests.ma common/list_utility.ma common/nat_to_num.ma freescale_tests/medium_tests_tools.ma
+freescale/opcode_base_lemmas1.ma freescale/opcode_base_lemmas_instrmode.ma freescale/opcode_base_lemmas_opcode.ma num/word16_lemmas.ma
+freescale/table_HC08.ma common/list.ma freescale/opcode_base.ma
+num/bool_lemmas.ma num/bool.ma
+num/oct_lemmas.ma num/bool_lemmas.ma num/oct.ma
+freescale/table_HCS08.ma common/list.ma freescale/opcode_base.ma
+common/ascii.ma num/bool.ma
num/word32.ma num/word16.ma
-emulator/model/IP2022_model.ma emulator/status/status.ma
-emulator/tests/micro_tests1.ma emulator/multivm/multivm.ma emulator/status/status_lemmas.ma emulator/tests/micro_tests_tools.ma
-emulator/read_write/read_write_base.ma common/theory.ma
-num/word16.ma num/byte8.ma
-emulator/opcodes/Freescale_pseudo_lemmas.ma emulator/opcodes/Freescale_pseudo.ma num/bool_lemmas.ma
-emulator/model/model.ma emulator/model/HC05_model.ma emulator/model/HC08_model.ma emulator/model/HCS08_model.ma emulator/model/IP2022_model.ma emulator/model/RS08_model.ma
-num/word24_lemmas.ma num/byte8_lemmas.ma num/word24.ma
-emulator/opcodes/IP2022_table_tests.ma emulator/opcodes/IP2022_table.ma emulator/opcodes/pseudo.ma
-common/prod.ma num/bool.ma
-common/option.ma num/bool.ma
-emulator/tests/medium_tests.ma common/list_utility.ma common/nat_to_num.ma emulator/tests/medium_tests_tools.ma
-emulator/translation/IP2022_translation.ma emulator/translation/translation_base.ma
-emulator/multivm/multivm_base.ma common/theory.ma emulator/status/status_setter.ma
-num/comp_num_lemmas.ma num/bool_lemmas.ma num/comp_num.ma
-emulator/memory/memory_func.ma common/list.ma common/option.ma emulator/memory/memory_struct.ma num/word32.ma
-emulator/model/HC08_model.ma emulator/status/status.ma
-emulator/status/status_getter.ma emulator/status/status_setter.ma
-common/ascii_lemmas.ma common/ascii.ma num/bool_lemmas.ma
-emulator/multivm/Freescale_multivm.ma emulator/multivm/multivm_base.ma emulator/read_write/load_write.ma
-emulator/read_write/read_write.ma emulator/read_write/IP2022_read_write.ma emulator/read_write/RS08_read_write.ma
-emulator/memory/memory_struct.ma num/byte8.ma num/oct.ma
-common/list_utility_lemmas.ma common/list_lemmas.ma common/list_utility.ma
-common/nat_to_num.ma common/nat.ma num/word32.ma
-emulator/read_write/fetch.ma emulator/memory/memory_abs.ma emulator/status/status_getter.ma emulator/translation/translation.ma
-compiler/ast_type.ma common/list_utility.ma
-emulator/opcodes/HC05_table.ma common/list.ma emulator/opcodes/Freescale_instr_mode.ma emulator/opcodes/Freescale_pseudo.ma emulator/opcodes/byte_or_word.ma
-emulator/status/HC08_status.ma num/word16.ma
-common/prod_lemmas.ma common/prod.ma num/bool_lemmas.ma
-test_errori.ma
-emulator/memory/memory_abs.ma emulator/memory/memory_bits.ma emulator/memory/memory_func.ma emulator/memory/memory_trees.ma
-emulator/tests/medium_tests_tools.ma emulator/multivm/multivm.ma
-emulator/opcodes/Freescale_pseudo.ma num/bool.ma
-emulator/read_write/load_write_base.ma emulator/read_write/read_write.ma
-num/word32_lemmas.ma num/word16_lemmas.ma num/word32.ma
-emulator/read_write/load_write.ma emulator/read_write/Freescale_load_write.ma emulator/read_write/IP2022_load_write.ma
-emulator/opcodes/byte_or_word.ma num/word16.ma
+freescale_tests/micro_tests8.ma freescale/multivm.ma freescale/status_lemmas.ma freescale_tests/micro_tests_tools.ma
+freescale/opcode_base.ma num/word16.ma
+freescale/status_lemmas.ma common/option_lemmas.ma common/prod_lemmas.ma freescale/opcode_base_lemmas1.ma freescale/status.ma num/word16_lemmas.ma
+freescale_tests/micro_tests_tools.ma common/list.ma num/word16.ma
+num/quatern_lemmas.ma num/bool_lemmas.ma num/quatern.ma
+freescale_tests/micro_tests1.ma freescale/multivm.ma freescale/status_lemmas.ma freescale_tests/micro_tests_tools.ma
+freescale/table_HC08_tests.ma freescale/opcode.ma freescale/table_HC08.ma
common/option_lemmas.ma common/option.ma num/bool_lemmas.ma
-emulator/opcodes/RS08_table.ma common/list.ma emulator/opcodes/Freescale_instr_mode.ma emulator/opcodes/Freescale_pseudo.ma emulator/opcodes/byte_or_word.ma
-num/bitrigesim.ma num/bool.ma
-common/theory.ma
-emulator/opcodes/pseudo.ma common/list.ma emulator/opcodes/Freescale_instr_mode.ma emulator/opcodes/Freescale_pseudo.ma emulator/opcodes/IP2022_instr_mode.ma emulator/opcodes/IP2022_pseudo.ma emulator/opcodes/byte_or_word.ma
-emulator/opcodes/Freescale_instr_mode_lemmas.ma emulator/opcodes/Freescale_instr_mode.ma num/bitrigesim_lemmas.ma num/bool_lemmas.ma num/exadecim_lemmas.ma num/oct_lemmas.ma
-emulator/status/status_lemmas.ma common/option_lemmas.ma common/prod_lemmas.ma emulator/opcodes/pseudo_lemmas.ma emulator/status/HC05_status_lemmas.ma emulator/status/HC08_status_lemmas.ma emulator/status/IP2022_status_lemmas.ma emulator/status/RS08_status_lemmas.ma emulator/status/status.ma
+common/option.ma num/bool.ma
+num/byte8_lemmas.ma num/byte8.ma num/exadecim_lemmas.ma
+freescale/opcode_base_lemmas_opcode.ma freescale/opcode_base.ma num/bool_lemmas.ma
common/list_lemmas.ma common/list.ma
-emulator/opcodes/pseudo_lemmas.ma emulator/opcodes/Freescale_instr_mode_lemmas.ma emulator/opcodes/Freescale_pseudo_lemmas.ma emulator/opcodes/IP2022_instr_mode_lemmas.ma emulator/opcodes/IP2022_pseudo_lemmas.ma emulator/opcodes/pseudo.ma
-emulator/opcodes/HCS08_table_tests.ma emulator/opcodes/HCS08_table.ma emulator/opcodes/pseudo.ma
-emulator/opcodes/IP2022_instr_mode_lemmas.ma emulator/opcodes/IP2022_instr_mode.ma num/bitrigesim_lemmas.ma num/bool_lemmas.ma num/oct_lemmas.ma
+common/sigma.ma
+freescale_tests/micro_tests4.ma freescale/multivm.ma freescale/status_lemmas.ma freescale_tests/micro_tests_tools.ma
+universe/universe.ma common/list.ma common/nat_lemmas.ma common/prod.ma
+num/bitrigesim.ma num/bool.ma
+common/list_utility.ma common/list.ma common/nat_lemmas.ma common/option.ma
+freescale/opcode_base_lemmas_instrmode.ma freescale/opcode_base.ma num/bitrigesim_lemmas.ma num/exadecim_lemmas.ma num/oct_lemmas.ma
+common/list.ma common/theory.ma
+num/oct.ma num/bool.ma
+freescale/opcode.ma common/list.ma freescale/opcode_base.ma
+freescale_tests/micro_tests7.ma freescale/multivm.ma freescale/status_lemmas.ma freescale_tests/micro_tests_tools.ma
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/memory/memory_func.ma".
-include "emulator/memory/memory_trees.ma".
-include "emulator/memory/memory_bits.ma".
-
-(* ********************************************* *)
-(* ASTRAZIONE DALL'IMPLEMENTAZIONE DELLA MEMORIA *)
-(* ********************************************* *)
-
-(* tipi di implementazione della memoria *)
-ninductive memory_impl : Type ≝
- MEM_FUNC: memory_impl
-| MEM_TREE: memory_impl
-| MEM_BITS: memory_impl.
-
-(* ausiliario per il tipo della memoria *)
-ndefinition aux_mem_type ≝
-λt:memory_impl.match t with
- [ MEM_FUNC ⇒ word32 → byte8
- | MEM_TREE ⇒ aux_32B_type byte8
- | MEM_BITS ⇒ aux_32B_type (Array8T bool)
- ].
-
-(* ausiliario per il tipo del checker *)
-ndefinition aux_chk_type ≝
-λt:memory_impl.match t with
- [ MEM_FUNC ⇒ word32 → memory_type
- | MEM_TREE ⇒ aux_32B_type memory_type
- | MEM_BITS ⇒ aux_32B_type (Array8T memory_type)
- ].
-
-(* unificazione di out_of_bound_memory *)
-ndefinition out_of_bound_memory ≝
-λt:memory_impl.
- match t
- return λt.aux_chk_type t
- with
- [ MEM_FUNC ⇒ mf_out_of_bound_memory
- | MEM_TREE ⇒ mt_out_of_bound_memory
- | MEM_BITS ⇒ mb_out_of_bound_memory
- ].
-
-(* unificazione di zero_memory *)
-ndefinition zero_memory ≝
-λt:memory_impl.
- match t
- return λt.aux_mem_type t
- with
- [ MEM_FUNC ⇒ mf_zero_memory
- | MEM_TREE ⇒ mt_zero_memory
- | MEM_BITS ⇒ mb_zero_memory
- ].
-
-(* unificazione della lettura senza chk: mem_read_abs mem addr *)
-ndefinition mem_read_abs ≝
-λt:memory_impl.
- match t
- return λt.aux_mem_type t → word32 → byte8
- with
- [ MEM_FUNC ⇒ λm:aux_mem_type MEM_FUNC.
- λaddr:word32.
- m addr
- | MEM_TREE ⇒ λm:aux_mem_type MEM_TREE.
- λaddr:word32.
- mt_visit ? m addr
- | MEM_BITS ⇒ λm:aux_mem_type MEM_BITS.
- λaddr:word32.
- byte8_of_bits (mt_visit ? m addr)
- ].
-
-(* unificazione del chk *)
-ndefinition chk_get ≝
-λt:memory_impl.
- match t
- return λt.aux_chk_type t → word32 → Array8T memory_type
- with
- [ MEM_FUNC ⇒ λc:aux_chk_type MEM_FUNC.λaddr:word32.
- match c addr with
- [ MEM_READ_ONLY ⇒ mk_Array8T ? MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY
- | MEM_READ_WRITE ⇒ mk_Array8T ? MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE
- | MEM_OUT_OF_BOUND ⇒ mk_Array8T ? MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND
- ]
- | MEM_TREE ⇒ λc:aux_chk_type MEM_TREE.λaddr:word32.
- match mt_visit ? c addr with
- [ MEM_READ_ONLY ⇒ mk_Array8T ? MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY
- | MEM_READ_WRITE ⇒ mk_Array8T ? MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE
- | MEM_OUT_OF_BOUND ⇒ mk_Array8T ? MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND
- ]
- | MEM_BITS ⇒ λc:aux_chk_type MEM_BITS.λaddr:word32.
- mt_visit ? c addr
- ].
-
-(* unificazione della lettura con chk: mem_read mem chk addr *)
-ndefinition mem_read ≝
-λt:memory_impl.λm:aux_mem_type t.λc:aux_chk_type t.λaddr:word32.
- match t
- return λt.aux_mem_type t → aux_chk_type t → word32 → option byte8
- with
- [ MEM_FUNC ⇒ mf_mem_read
- | MEM_TREE ⇒ mt_mem_read
- | MEM_BITS ⇒ mb_mem_read
- ] m c addr.
-
-(* unificazione della lettura di bit con chk: mem_read mem chk addr sub *)
-ndefinition mem_read_bit ≝
-λt:memory_impl.
- match t
- return λt.aux_mem_type t → aux_chk_type t → word32 → oct → option bool
- with
- [ MEM_FUNC ⇒ λm:aux_mem_type MEM_FUNC.
- λc:aux_chk_type MEM_FUNC.
- λaddr:word32.
- λo:oct.
- opt_map … (mf_mem_read m c addr)
- (λb.Some ? (getn_array8T o bool (bits_of_byte8 b)))
- | MEM_TREE ⇒ λm:aux_mem_type MEM_TREE.
- λc:aux_chk_type MEM_TREE.
- λaddr:word32.
- λo:oct.
- opt_map … (mt_mem_read m c addr)
- (λb.Some ? (getn_array8T o bool (bits_of_byte8 b)))
- | MEM_BITS ⇒ λm:aux_mem_type MEM_BITS.
- λc:aux_chk_type MEM_BITS.
- λaddr:word32.
- λo:oct.
- mb_mem_read_bit m c addr o
- ].
-
-(* unificazione della scrittura con chk: mem_update mem chk addr val *)
-ndefinition mem_update ≝
-λt:memory_impl.λm:aux_mem_type t.λc:aux_chk_type t.λaddr:word32.λv:byte8.
- match t
- return λt.aux_mem_type t → aux_chk_type t → word32 → byte8 → option (aux_mem_type t)
- with
- [ MEM_FUNC ⇒ mf_mem_update
- | MEM_TREE ⇒ mt_mem_update
- | MEM_BITS ⇒ mb_mem_update
- ] m c addr v.
-
-(* unificazione della scrittura di bit con chk: mem_update mem chk addr sub val *)
-ndefinition mem_update_bit ≝
-λt:memory_impl.
- match t
- return λt.aux_mem_type t → aux_chk_type t → word32 → oct → bool → option (aux_mem_type t)
- with
- [ MEM_FUNC ⇒ λm:aux_mem_type MEM_FUNC.
- λc:aux_chk_type MEM_FUNC.
- λaddr:word32.
- λo:oct.
- λv:bool.
- mf_mem_update m c addr (byte8_of_bits (setn_array8T o bool (bits_of_byte8 (m addr)) v))
- | MEM_TREE ⇒ λm:aux_mem_type MEM_TREE.
- λc:aux_chk_type MEM_TREE.
- λaddr:word32.
- λo:oct.
- λv:bool.
- mt_mem_update m c addr (byte8_of_bits (setn_array8T o bool (bits_of_byte8 (mt_visit ? m addr)) v))
- | MEM_BITS ⇒ λm:aux_mem_type MEM_BITS.
- λc:aux_chk_type MEM_BITS.
- λaddr:word32.
- λo:oct.
- λv:bool.
- mb_mem_update_bit m c addr o v
- ].
-
-(* unificazione del caricamento: load_from_source_at old_mem source addr *)
-ndefinition load_from_source_at ≝
-λt:memory_impl.λm:aux_mem_type t.λl:list byte8.λaddr:word32.
- match t
- return λt.aux_mem_type t → list byte8 → word32 → aux_mem_type t
- with
- [ MEM_FUNC ⇒ mf_load_from_source_at
- | MEM_TREE ⇒ mt_load_from_source_at
- | MEM_BITS ⇒ mb_load_from_source_at
- ] m l addr.
-
-(* unificazione dell'impostazione della memoria: chk_update_ranged chk inf sup v *)
-ndefinition check_update_ranged ≝
-λt:memory_impl.
- match t
- return λt.aux_chk_type t → word32 → word16 → memory_type → aux_chk_type t
- with
- [ MEM_FUNC ⇒ λc:aux_chk_type MEM_FUNC.
- λaddr:word32.
- λrange:word16.
- λv:memory_type.
- mf_check_update_ranged c addr range v
- | MEM_TREE ⇒ λc:aux_chk_type MEM_TREE.
- λaddr:word32.
- λrange:word16.
- λv:memory_type.
- mt_update_ranged ? c addr ? (w16_to_recw16 range) v
- | MEM_BITS ⇒ λc:aux_chk_type MEM_BITS.
- λaddr:word32.
- λrange:word16.
- λv:memory_type.
- mt_update_ranged ? c addr ? (w16_to_recw16 range) (mk_Array8T ? v v v v v v v v)
- ].
-
-(* unificazione dell'impostazione dei bit: chk_update_bit chk addr sub v *)
-(* NB: dove non esiste la granularita' del bit, lascio inalterato *)
-ndefinition check_update_bit ≝
-λt:memory_impl.
- match t
- return λt.aux_chk_type t → word32 → oct → memory_type → aux_chk_type t
- with
- [ MEM_FUNC ⇒ λc:aux_chk_type MEM_FUNC.
- λaddr:word32.
- λo:oct.
- λv:memory_type.
- c
- | MEM_TREE ⇒ λc:aux_chk_type MEM_TREE.
- λaddr:word32.
- λo:oct.
- λv:memory_type.
- c
- | MEM_BITS ⇒ λc:aux_chk_type MEM_BITS.
- λaddr:word32.
- λo:oct.
- λv:memory_type.
- mb_chk_update_bit c addr o v
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/memory/memory_trees.ma".
-
-(* ********************* *)
-(* MEMORIA E DESCRITTORE *)
-(* ********************* *)
-
-(* tutta la memoria non installata *)
-ndefinition mb_out_of_bound_memory ≝
- aux_32B_filler ?
- (mk_Array8T ? MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND
- MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND).
-
-(* tutta la memoria a 0 *)
-ndefinition mb_zero_memory ≝
- aux_32B_filler ? (mk_Array8T ? false false false false false false false false).
-
-(* scrivi bit controllando il tipo di memoria *)
-ndefinition mb_mem_update_bit ≝
-λmem:aux_32B_type (Array8T bool).
-λchk:aux_32B_type (Array8T memory_type).
-λaddr:word32.λsub:oct.λv:bool.
- match getn_array8T sub ? (mt_visit ? chk addr) with
- (* ROM? ok, ma il valore viene perso *)
- [ MEM_READ_ONLY ⇒ Some ? mem
- (* RAM? ok *)
- | MEM_READ_WRITE ⇒ Some ? (mt_update ? mem addr (setn_array8T sub ? (mt_visit ? mem addr) v))
- (* NON INSTALLATA? no *)
- | MEM_OUT_OF_BOUND ⇒ None ? ].
-
-ndefinition mb_mem_update ≝
-λmem:aux_32B_type (Array8T bool).
-λchk:aux_32B_type (Array8T memory_type).
-λaddr:word32.λv:byte8.
-let old_value ≝ mt_visit (Array8T bool) mem addr in
-let new_value ≝ bits_of_byte8 v in
-let memtypes ≝ mt_visit (Array8T memory_type) chk addr in
-let newbit0 ≝ match getn_array8T o0 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o0 bool old_value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o0 bool new_value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit1 ≝ match getn_array8T o1 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o1 bool old_value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o1 bool new_value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit2 ≝ match getn_array8T o2 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o2 bool old_value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o2 bool new_value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit3 ≝ match getn_array8T o3 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o3 bool old_value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o3 bool new_value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit4 ≝ match getn_array8T o4 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o4 bool old_value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o4 bool new_value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit5 ≝ match getn_array8T o5 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o5 bool old_value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o5 bool new_value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit6 ≝ match getn_array8T o6 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o6 bool old_value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o6 bool new_value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit7 ≝ match getn_array8T o7 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o7 bool old_value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o7 bool new_value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
- opt_map … newbit0
- (λnb0.opt_map … newbit1
- (λnb1.opt_map … newbit2
- (λnb2.opt_map … newbit3
- (λnb3.opt_map … newbit4
- (λnb4.opt_map … newbit5
- (λnb5.opt_map … newbit6
- (λnb6.opt_map … newbit7
- (λnb7.Some ? (mt_update ? mem addr (mk_Array8T bool nb7 nb6 nb5 nb4 nb3 nb2 nb1 nb0)))))))))).
-
-(* scrivi tipo di bit *)
-ndefinition mb_chk_update_bit ≝
-λchk:aux_32B_type (Array8T memory_type).
-λaddr:word32.λsub:oct.λv:memory_type.
- mt_update ? chk addr (setn_array8T sub ? (mt_visit ? chk addr) v).
-
-(* leggi bit controllando il tipo di memoria *)
-ndefinition mb_mem_read_bit ≝
-λmem:aux_32B_type (Array8T bool).
-λchk:aux_32B_type (Array8T memory_type).
-λaddr:word32.λsub:oct.
- match getn_array8T sub ? (mt_visit ? chk addr) with
- (* ROM? ok, ma il valore viene perso *)
- [ MEM_READ_ONLY ⇒ Some ? (getn_array8T sub ? (mt_visit ? mem addr))
- (* RAM? ok *)
- | MEM_READ_WRITE ⇒ Some ? (getn_array8T sub ? (mt_visit ? mem addr))
- (* NON INSTALLATA? no *)
- | MEM_OUT_OF_BOUND ⇒ None ? ].
-
-(* leggi controllando il tipo di memoria *)
-(* NB: devono esistere tutti i bit *)
-ndefinition mb_mem_read ≝
-λmem:aux_32B_type (Array8T bool).
-λchk:aux_32B_type (Array8T memory_type).
-λaddr:word32.
-let value ≝ mt_visit (Array8T bool) mem addr in
-let memtypes ≝ mt_visit (Array8T memory_type) chk addr in
-let newbit0 ≝ match getn_array8T o0 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o0 bool value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o0 bool value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit1 ≝ match getn_array8T o1 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o1 bool value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o1 bool value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit2 ≝ match getn_array8T o2 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o2 bool value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o2 bool value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit3 ≝ match getn_array8T o3 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o3 bool value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o3 bool value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit4 ≝ match getn_array8T o4 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o4 bool value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o4 bool value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit5 ≝ match getn_array8T o5 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o5 bool value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o5 bool value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit6 ≝ match getn_array8T o6 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o6 bool value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o6 bool value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit7 ≝ match getn_array8T o7 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o7 bool value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o7 bool value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
- opt_map … newbit0
- (λnb0.opt_map … newbit1
- (λnb1.opt_map … newbit2
- (λnb2.opt_map … newbit3
- (λnb3.opt_map … newbit4
- (λnb4.opt_map … newbit5
- (λnb5.opt_map … newbit6
- (λnb6.opt_map … newbit7
- (λnb7.Some ? (byte8_of_bits (mk_Array8T bool nb7 nb6 nb5 nb4 nb3 nb2 nb1 nb0)))))))))).
-
-(* ************************** *)
-(* CARICAMENTO PROGRAMMA/DATI *)
-(* ************************** *)
-
-(* carica a paratire da addr, scartando source (pescando da old_mem) se si supera 0xFFFF... *)
-nlet rec mb_load_from_source_at (old_mem:aux_32B_type (Array8T bool))
- (src:list byte8) (addr:word32) on src ≝
- match src with
- (* fine di source: carica da old_mem *)
- [ nil ⇒ old_mem
- | cons hd tl ⇒ mb_load_from_source_at (mt_update ? old_mem addr (bits_of_byte8 hd)) tl (succ_w32 addr)
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/memory/memory_struct.ma".
-include "num/word32.ma".
-include "common/option.ma".
-include "common/list.ma".
-
-(* ********************* *)
-(* MEMORIA E DESCRITTORE *)
-(* ********************* *)
-
-(* (mf_check_update_ranged chk inf sup mode) = setta tipo memoria *)
-ndefinition mf_check_update_ranged ≝
-λf:word32 → memory_type.λaddr:word32.λrange:word16.λv.
- λx.match inrange_w32 x addr (plus_w32_d_d addr (ext_word32 range)) with
- [ true ⇒ v
- | false ⇒ f x ].
-
-(* tutta la memoria non installata *)
-ndefinition mf_out_of_bound_memory ≝ λ_:word32.MEM_OUT_OF_BOUND.
-
-(* (mf_mem_update mem checked addr val) = scrivi controllando il tipo di memoria *)
-ndefinition mf_mem_update ≝
-λf:word32 → byte8.λc:word32 → memory_type.λa:word32.λv:byte8.
- match c a with
- (* ROM? ok, ma il valore viene perso *)
- [ MEM_READ_ONLY ⇒ Some ? f
- (* RAM? ok *)
- | MEM_READ_WRITE ⇒ Some ? (λx.match eq_w32 x a with [ true ⇒ v | false ⇒ f x ])
- (* NON INSTALLATA? no *)
- | MEM_OUT_OF_BOUND ⇒ None ? ].
-
-(* tutta la memoria a 0 *)
-ndefinition mf_zero_memory ≝ λ_:word32.〈x0,x0〉.
-
-(* (mf_mem_read mem check addr) = leggi controllando il tipo di memoria *)
-ndefinition mf_mem_read ≝
-λf:word32 → byte8.λc:word32 → memory_type.λa.
- match c a with
- [ MEM_READ_ONLY ⇒ Some ? (f a)
- | MEM_READ_WRITE ⇒ Some ? (f a)
- | MEM_OUT_OF_BOUND ⇒ None ? ].
-
-(* ************************** *)
-(* CARICAMENTO PROGRAMMA/DATI *)
-(* ************************** *)
-
-(* carica a paratire da addr, overflow se si supera 0xFFFF... *)
-nlet rec mf_load_from_source_at (old_mem:word32 → byte8) (src:list byte8) (addr:word32) on src ≝
- match src with
- (* fine di source: carica da old_mem *)
- [ nil ⇒ old_mem
- | cons hd tl ⇒ λx:word32.match eq_w32 addr x with
- (* la locazione corrisponde al punto corrente di source *)
- [ true ⇒ hd
- (* la locazione e' piu' avanti? ricorsione *)
- | false ⇒ (mf_load_from_source_at old_mem tl (succ_w32 addr)) x
- ]
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/oct.ma".
-include "num/byte8.ma".
-
-(* **************************** *)
-(* TIPI PER I MODULI DI MEMORIA *)
-(* **************************** *)
-
-(* tipi di memoria:RAM/ROM/non installata *)
-ninductive memory_type : Type ≝
- MEM_READ_ONLY: memory_type
-| MEM_READ_WRITE: memory_type
-| MEM_OUT_OF_BOUND: memory_type.
-
-(* **************** *)
-(* TIPO ARRAY DA 16 *)
-(* **************** *)
-
-(* definizione di un array omogeneo di dimensione 16 *)
-nrecord Array16T (T:Type) : Type ≝
-{ a16_1 : T ; a16_2 : T ; a16_3 : T ; a16_4 : T
-; a16_5 : T ; a16_6 : T ; a16_7 : T ; a16_8 : T
-; a16_9 : T ; a16_10 : T ; a16_11 : T ; a16_12 : T
-; a16_13 : T ; a16_14 : T ; a16_15 : T ; a16_16 : T }.
-
-(* operatore uguaglianza *)
-ndefinition eq_ar16 ≝
-λT.λf:T → T → bool.λa1,a2:Array16T T.
- (f (a16_1 ? a1) (a16_1 ? a2)) ⊗ (f (a16_2 ? a1) (a16_2 ? a2)) ⊗
- (f (a16_3 ? a1) (a16_3 ? a2)) ⊗ (f (a16_4 ? a1) (a16_4 ? a2)) ⊗
- (f (a16_5 ? a1) (a16_5 ? a2)) ⊗ (f (a16_6 ? a1) (a16_6 ? a2)) ⊗
- (f (a16_7 ? a1) (a16_7 ? a2)) ⊗ (f (a16_8 ? a1) (a16_8 ? a2)) ⊗
- (f (a16_9 ? a1) (a16_9 ? a2)) ⊗ (f (a16_10 ? a1) (a16_10 ? a2)) ⊗
- (f (a16_11 ? a1) (a16_11 ? a2)) ⊗ (f (a16_12 ? a1) (a16_12 ? a2)) ⊗
- (f (a16_13 ? a1) (a16_13 ? a2)) ⊗ (f (a16_14 ? a1) (a16_14 ? a2)) ⊗
- (f (a16_15 ? a1) (a16_15 ? a2)) ⊗ (f (a16_16 ? a1) (a16_16 ? a2)).
-
-(* abbiamo gia' gli esadecimali come tipo induttivo quindi: *)
-(* posso definire un getter a matrice sull'array *)
-
-ndefinition getn_array16T ≝
-λn:exadecim.λT:Type.λp:Array16T T.
- match n return λn.(Array16T T) → T with
- [ x0 ⇒ a16_1 T | x1 ⇒ a16_2 T | x2 ⇒ a16_3 T | x3 ⇒ a16_4 T
- | x4 ⇒ a16_5 T | x5 ⇒ a16_6 T | x6 ⇒ a16_7 T | x7 ⇒ a16_8 T
- | x8 ⇒ a16_9 T | x9 ⇒ a16_10 T | xA ⇒ a16_11 T | xB ⇒ a16_12 T
- | xC ⇒ a16_13 T | xD ⇒ a16_14 T | xE ⇒ a16_15 T | xF ⇒ a16_16 T
- ] p.
-
-(* abbiamo gia' gli esadecimali come tipo induttivo quindi: *)
-(* posso definire un setter a matrice sull'array *)
-ndefinition setn_array16T ≝
-λn:exadecim.λT:Type.λp:Array16T T.λv:T.
-let e00 ≝ (a16_1 T p) in
-let e01 ≝ (a16_2 T p) in
-let e02 ≝ (a16_3 T p) in
-let e03 ≝ (a16_4 T p) in
-let e04 ≝ (a16_5 T p) in
-let e05 ≝ (a16_6 T p) in
-let e06 ≝ (a16_7 T p) in
-let e07 ≝ (a16_8 T p) in
-let e08 ≝ (a16_9 T p) in
-let e09 ≝ (a16_10 T p) in
-let e10 ≝ (a16_11 T p) in
-let e11 ≝ (a16_12 T p) in
-let e12 ≝ (a16_13 T p) in
-let e13 ≝ (a16_14 T p) in
-let e14 ≝ (a16_15 T p) in
-let e15 ≝ (a16_16 T p) in
- match n with
- [ x0 ⇒ mk_Array16T T v e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x1 ⇒ mk_Array16T T e00 v e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x2 ⇒ mk_Array16T T e00 e01 v e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x3 ⇒ mk_Array16T T e00 e01 e02 v e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x4 ⇒ mk_Array16T T e00 e01 e02 e03 v e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x5 ⇒ mk_Array16T T e00 e01 e02 e03 e04 v e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x6 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 v e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x7 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 v e08 e09 e10 e11 e12 e13 e14 e15
- | x8 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 v e09 e10 e11 e12 e13 e14 e15
- | x9 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 v e10 e11 e12 e13 e14 e15
- | xA ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 v e11 e12 e13 e14 e15
- | xB ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 v e12 e13 e14 e15
- | xC ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 v e13 e14 e15
- | xD ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 v e14 e15
- | xE ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 v e15
- | xF ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 v
- ].
-
-(* abbiamo gia' gli esadecimali come tipo induttivo quindi: *)
-(* posso definire un setter multiplo [m,n] a matrice sull'array *)
-(* m ≤ n *)
-ndefinition setmn_array16T ≝
-λm,n:exadecim.λT:Type.λp:Array16T T.λv:T.
-let e00 ≝ (a16_1 T p) in
-let e01 ≝ (a16_2 T p) in
-let e02 ≝ (a16_3 T p) in
-let e03 ≝ (a16_4 T p) in
-let e04 ≝ (a16_5 T p) in
-let e05 ≝ (a16_6 T p) in
-let e06 ≝ (a16_7 T p) in
-let e07 ≝ (a16_8 T p) in
-let e08 ≝ (a16_9 T p) in
-let e09 ≝ (a16_10 T p) in
-let e10 ≝ (a16_11 T p) in
-let e11 ≝ (a16_12 T p) in
-let e12 ≝ (a16_13 T p) in
-let e13 ≝ (a16_14 T p) in
-let e14 ≝ (a16_15 T p) in
-let e15 ≝ (a16_16 T p) in
- match m with
- [ x0 ⇒ match n with
- [ x0 ⇒ mk_Array16T T v e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x1 ⇒ mk_Array16T T v v e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x2 ⇒ mk_Array16T T v v v e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x3 ⇒ mk_Array16T T v v v v e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x4 ⇒ mk_Array16T T v v v v v e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x5 ⇒ mk_Array16T T v v v v v v e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x6 ⇒ mk_Array16T T v v v v v v v e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x7 ⇒ mk_Array16T T v v v v v v v v e08 e09 e10 e11 e12 e13 e14 e15
- | x8 ⇒ mk_Array16T T v v v v v v v v v e09 e10 e11 e12 e13 e14 e15
- | x9 ⇒ mk_Array16T T v v v v v v v v v v e10 e11 e12 e13 e14 e15
- | xA ⇒ mk_Array16T T v v v v v v v v v v v e11 e12 e13 e14 e15
- | xB ⇒ mk_Array16T T v v v v v v v v v v v v e12 e13 e14 e15
- | xC ⇒ mk_Array16T T v v v v v v v v v v v v v e13 e14 e15
- | xD ⇒ mk_Array16T T v v v v v v v v v v v v v v e14 e15
- | xE ⇒ mk_Array16T T v v v v v v v v v v v v v v v e15
- | xF ⇒ mk_Array16T T v v v v v v v v v v v v v v v v ]
- | x1 ⇒ match n with
- [ x0 ⇒ p
- | x1 ⇒ mk_Array16T T e00 v e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x2 ⇒ mk_Array16T T e00 v v e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x3 ⇒ mk_Array16T T e00 v v v e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x4 ⇒ mk_Array16T T e00 v v v v e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x5 ⇒ mk_Array16T T e00 v v v v v e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x6 ⇒ mk_Array16T T e00 v v v v v v e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x7 ⇒ mk_Array16T T e00 v v v v v v v e08 e09 e10 e11 e12 e13 e14 e15
- | x8 ⇒ mk_Array16T T e00 v v v v v v v v e09 e10 e11 e12 e13 e14 e15
- | x9 ⇒ mk_Array16T T e00 v v v v v v v v v e10 e11 e12 e13 e14 e15
- | xA ⇒ mk_Array16T T e00 v v v v v v v v v v e11 e12 e13 e14 e15
- | xB ⇒ mk_Array16T T e00 v v v v v v v v v v v e12 e13 e14 e15
- | xC ⇒ mk_Array16T T e00 v v v v v v v v v v v v e13 e14 e15
- | xD ⇒ mk_Array16T T e00 v v v v v v v v v v v v v e14 e15
- | xE ⇒ mk_Array16T T e00 v v v v v v v v v v v v v v e15
- | xF ⇒ mk_Array16T T e00 v v v v v v v v v v v v v v v ]
- | x2 ⇒ match n with
- [ x0 ⇒ p | x1 ⇒ p
- | x2 ⇒ mk_Array16T T e00 e01 v e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x3 ⇒ mk_Array16T T e00 e01 v v e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x4 ⇒ mk_Array16T T e00 e01 v v v e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x5 ⇒ mk_Array16T T e00 e01 v v v v e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x6 ⇒ mk_Array16T T e00 e01 v v v v v e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x7 ⇒ mk_Array16T T e00 e01 v v v v v v e08 e09 e10 e11 e12 e13 e14 e15
- | x8 ⇒ mk_Array16T T e00 e01 v v v v v v v e09 e10 e11 e12 e13 e14 e15
- | x9 ⇒ mk_Array16T T e00 e01 v v v v v v v v e10 e11 e12 e13 e14 e15
- | xA ⇒ mk_Array16T T e00 e01 v v v v v v v v v e11 e12 e13 e14 e15
- | xB ⇒ mk_Array16T T e00 e01 v v v v v v v v v v e12 e13 e14 e15
- | xC ⇒ mk_Array16T T e00 e01 v v v v v v v v v v v e13 e14 e15
- | xD ⇒ mk_Array16T T e00 e01 v v v v v v v v v v v v e14 e15
- | xE ⇒ mk_Array16T T e00 e01 v v v v v v v v v v v v v e15
- | xF ⇒ mk_Array16T T e00 e01 v v v v v v v v v v v v v v ]
- | x3 ⇒ match n with
- [ x0 ⇒ p | x1 ⇒ p | x2 ⇒ p
- | x3 ⇒ mk_Array16T T e00 e01 e02 v e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x4 ⇒ mk_Array16T T e00 e01 e02 v v e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x5 ⇒ mk_Array16T T e00 e01 e02 v v v e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x6 ⇒ mk_Array16T T e00 e01 e02 v v v v e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x7 ⇒ mk_Array16T T e00 e01 e02 v v v v v e08 e09 e10 e11 e12 e13 e14 e15
- | x8 ⇒ mk_Array16T T e00 e01 e02 v v v v v v e09 e10 e11 e12 e13 e14 e15
- | x9 ⇒ mk_Array16T T e00 e01 e02 v v v v v v v e10 e11 e12 e13 e14 e15
- | xA ⇒ mk_Array16T T e00 e01 e02 v v v v v v v v e11 e12 e13 e14 e15
- | xB ⇒ mk_Array16T T e00 e01 e02 v v v v v v v v v e12 e13 e14 e15
- | xC ⇒ mk_Array16T T e00 e01 e02 v v v v v v v v v v e13 e14 e15
- | xD ⇒ mk_Array16T T e00 e01 e02 v v v v v v v v v v v e14 e15
- | xE ⇒ mk_Array16T T e00 e01 e02 v v v v v v v v v v v v e15
- | xF ⇒ mk_Array16T T e00 e01 e02 v v v v v v v v v v v v v ]
- | x4 ⇒ match n with
- [ x0 ⇒ p | x1 ⇒ p | x2 ⇒ p | x3 ⇒ p
- | x4 ⇒ mk_Array16T T e00 e01 e02 e03 v e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x5 ⇒ mk_Array16T T e00 e01 e02 e03 v v e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x6 ⇒ mk_Array16T T e00 e01 e02 e03 v v v e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x7 ⇒ mk_Array16T T e00 e01 e02 e03 v v v v e08 e09 e10 e11 e12 e13 e14 e15
- | x8 ⇒ mk_Array16T T e00 e01 e02 e03 v v v v v e09 e10 e11 e12 e13 e14 e15
- | x9 ⇒ mk_Array16T T e00 e01 e02 e03 v v v v v v e10 e11 e12 e13 e14 e15
- | xA ⇒ mk_Array16T T e00 e01 e02 e03 v v v v v v v e11 e12 e13 e14 e15
- | xB ⇒ mk_Array16T T e00 e01 e02 e03 v v v v v v v v e12 e13 e14 e15
- | xC ⇒ mk_Array16T T e00 e01 e02 e03 v v v v v v v v v e13 e14 e15
- | xD ⇒ mk_Array16T T e00 e01 e02 e03 v v v v v v v v v v e14 e15
- | xE ⇒ mk_Array16T T e00 e01 e02 e03 v v v v v v v v v v v e15
- | xF ⇒ mk_Array16T T e00 e01 e02 e03 v v v v v v v v v v v v ]
- | x5 ⇒ match n with
- [ x0 ⇒ p | x1 ⇒ p | x2 ⇒ p | x3 ⇒ p | x4 ⇒ p
- | x5 ⇒ mk_Array16T T e00 e01 e02 e03 e04 v e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x6 ⇒ mk_Array16T T e00 e01 e02 e03 e04 v v e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x7 ⇒ mk_Array16T T e00 e01 e02 e03 e04 v v v e08 e09 e10 e11 e12 e13 e14 e15
- | x8 ⇒ mk_Array16T T e00 e01 e02 e03 e04 v v v v e09 e10 e11 e12 e13 e14 e15
- | x9 ⇒ mk_Array16T T e00 e01 e02 e03 e04 v v v v v e10 e11 e12 e13 e14 e15
- | xA ⇒ mk_Array16T T e00 e01 e02 e03 e04 v v v v v v e11 e12 e13 e14 e15
- | xB ⇒ mk_Array16T T e00 e01 e02 e03 e04 v v v v v v v e12 e13 e14 e15
- | xC ⇒ mk_Array16T T e00 e01 e02 e03 e04 v v v v v v v v e13 e14 e15
- | xD ⇒ mk_Array16T T e00 e01 e02 e03 e04 v v v v v v v v v e14 e15
- | xE ⇒ mk_Array16T T e00 e01 e02 e03 e04 v v v v v v v v v v e15
- | xF ⇒ mk_Array16T T e00 e01 e02 e03 e04 v v v v v v v v v v v ]
- | x6 ⇒ match n with
- [ x0 ⇒ p | x1 ⇒ p | x2 ⇒ p | x3 ⇒ p | x4 ⇒ p | x5 ⇒ p
- | x6 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 v e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x7 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 v v e08 e09 e10 e11 e12 e13 e14 e15
- | x8 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 v v v e09 e10 e11 e12 e13 e14 e15
- | x9 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 v v v v e10 e11 e12 e13 e14 e15
- | xA ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 v v v v v e11 e12 e13 e14 e15
- | xB ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 v v v v v v e12 e13 e14 e15
- | xC ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 v v v v v v v e13 e14 e15
- | xD ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 v v v v v v v v e14 e15
- | xE ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 v v v v v v v v v e15
- | xF ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 v v v v v v v v v v ]
- | x7 ⇒ match n with
- [ x0 ⇒ p | x1 ⇒ p | x2 ⇒ p | x3 ⇒ p | x4 ⇒ p | x5 ⇒ p | x6 ⇒ p
- | x7 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 v e08 e09 e10 e11 e12 e13 e14 e15
- | x8 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 v v e09 e10 e11 e12 e13 e14 e15
- | x9 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 v v v e10 e11 e12 e13 e14 e15
- | xA ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 v v v v e11 e12 e13 e14 e15
- | xB ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 v v v v v e12 e13 e14 e15
- | xC ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 v v v v v v e13 e14 e15
- | xD ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 v v v v v v v e14 e15
- | xE ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 v v v v v v v v e15
- | xF ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 v v v v v v v v v ]
- | x8 ⇒ match n with
- [ x0 ⇒ p | x1 ⇒ p | x2 ⇒ p | x3 ⇒ p | x4 ⇒ p | x5 ⇒ p | x6 ⇒ p | x7 ⇒ p
- | x8 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 v e09 e10 e11 e12 e13 e14 e15
- | x9 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 v v e10 e11 e12 e13 e14 e15
- | xA ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 v v v e11 e12 e13 e14 e15
- | xB ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 v v v v e12 e13 e14 e15
- | xC ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 v v v v v e13 e14 e15
- | xD ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 v v v v v v e14 e15
- | xE ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 v v v v v v v e15
- | xF ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 v v v v v v v v ]
- | x9 ⇒ match n with
- [ x0 ⇒ p | x1 ⇒ p | x2 ⇒ p | x3 ⇒ p | x4 ⇒ p | x5 ⇒ p | x6 ⇒ p | x7 ⇒ p
- | x8 ⇒ p
- | x9 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 v e10 e11 e12 e13 e14 e15
- | xA ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 v v e11 e12 e13 e14 e15
- | xB ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 v v v e12 e13 e14 e15
- | xC ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 v v v v e13 e14 e15
- | xD ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 v v v v v e14 e15
- | xE ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 v v v v v v e15
- | xF ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 v v v v v v v ]
- | xA ⇒ match n with
- [ x0 ⇒ p | x1 ⇒ p | x2 ⇒ p | x3 ⇒ p | x4 ⇒ p | x5 ⇒ p | x6 ⇒ p | x7 ⇒ p
- | x8 ⇒ p | x9 ⇒ p
- | xA ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 v e11 e12 e13 e14 e15
- | xB ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 v v e12 e13 e14 e15
- | xC ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 v v v e13 e14 e15
- | xD ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 v v v v e14 e15
- | xE ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 v v v v v e15
- | xF ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 v v v v v v ]
- | xB ⇒ match n with
- [ x0 ⇒ p | x1 ⇒ p | x2 ⇒ p | x3 ⇒ p | x4 ⇒ p | x5 ⇒ p | x6 ⇒ p | x7 ⇒ p
- | x8 ⇒ p | x9 ⇒ p | xA ⇒ p
- | xB ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 v e12 e13 e14 e15
- | xC ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 v v e13 e14 e15
- | xD ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 v v v e14 e15
- | xE ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 v v v v e15
- | xF ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 v v v v v ]
- | xC ⇒ match n with
- [ x0 ⇒ p | x1 ⇒ p | x2 ⇒ p | x3 ⇒ p | x4 ⇒ p | x5 ⇒ p | x6 ⇒ p | x7 ⇒ p
- | x8 ⇒ p | x9 ⇒ p | xA ⇒ p | xB ⇒ p
- | xC ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 v e13 e14 e15
- | xD ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 v v e14 e15
- | xE ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 v v v e15
- | xF ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 v v v v ]
- | xD ⇒ match n with
- [ x0 ⇒ p | x1 ⇒ p | x2 ⇒ p | x3 ⇒ p | x4 ⇒ p | x5 ⇒ p | x6 ⇒ p | x7 ⇒ p
- | x8 ⇒ p | x9 ⇒ p | xA ⇒ p | xB ⇒ p | xC ⇒ p
- | xD ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 v e14 e15
- | xE ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 v v e15
- | xF ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 v v v ]
- | xE ⇒ match n with
- [ x0 ⇒ p | x1 ⇒ p | x2 ⇒ p | x3 ⇒ p | x4 ⇒ p | x5 ⇒ p | x6 ⇒ p | x7 ⇒ p
- | x8 ⇒ p | x9 ⇒ p | xA ⇒ p | xB ⇒ p | xC ⇒ p | xD ⇒ p
- | xE ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 v e15
- | xF ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 v v ]
- | xF ⇒ match n with
- [ x0 ⇒ p | x1 ⇒ p | x2 ⇒ p | x3 ⇒ p | x4 ⇒ p | x5 ⇒ p | x6 ⇒ p | x7 ⇒ p
- | x8 ⇒ p | x9 ⇒ p | xA ⇒ p | xB ⇒ p | xC ⇒ p | xD ⇒ p | xE ⇒ p
- | xF ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 v ]
- ].
-
-(* abbiamo gia' gli esadecimali come tipo induttivo quindi: *)
-(* posso definire un setter composto [m+1,n-1] a matrice sull'array *)
-(* NB: obbiettivo evitare l'overflow *)
-ndefinition setmn_array16T_succ_pred ≝
-λm,n:exadecim.λT:Type.λp:Array16T T.λv:T.
- match lt_ex m xF with
- [ true ⇒ match gt_ex n x0 with
- [ true ⇒ setmn_array16T (succ_ex m) (pred_ex n) T p v
- | false ⇒ p
- ]
- | false ⇒ p
- ].
-
-(* abbiamo gia' gli esadecimali come tipo induttivo quindi: *)
-(* posso definire un setter composto [m+1,F] a matrice sull'array *)
-(* NB: obbiettivo evitare l'overflow *)
-ndefinition setmn_array16T_succ ≝
-λm:exadecim.λT:Type.λp:Array16T T.λv:T.
- match lt_ex m xF with
- [ true ⇒ setmn_array16T (succ_ex m) xF T p v
- | false ⇒ p
- ].
-
-(* abbiamo gia' gli esadecimali come tipo induttivo quindi: *)
-(* posso definire un setter composto [0,n-1] a matrice sull'array *)
-(* NB: obbiettivo evitare l'overflow *)
-ndefinition setmn_array16T_pred ≝
-λn:exadecim.λT:Type.λp:Array16T T.λv:T.
- match gt_ex n x0 with
- [ true ⇒ setmn_array16T x0 (pred_ex n) T p v
- | false ⇒ p
- ].
-
-(* ************************** *)
-(* TIPO BYTE COME INSIEME BIT *)
-(* ************************** *)
-
-(* definizione di un byte come 8 bit *)
-nrecord Array8T (T:Type) : Type ≝
-{ a8_1 : T ; a8_2 : T ; a8_3 : T ; a8_4 : T
-; a8_5 : T ; a8_6 : T ; a8_7 : T ; a8_8 : T }.
-
-(* operatore uguaglianza *)
-ndefinition eq_ar8 ≝
-λT.λf:T → T → bool.λa1,a2:Array8T T.
- (f (a8_1 ? a1) (a8_1 ? a2)) ⊗ (f (a8_2 ? a1) (a8_2 ? a2)) ⊗
- (f (a8_3 ? a1) (a8_3 ? a2)) ⊗ (f (a8_4 ? a1) (a8_4 ? a2)) ⊗
- (f (a8_5 ? a1) (a8_5 ? a2)) ⊗ (f (a8_6 ? a1) (a8_6 ? a2)) ⊗
- (f (a8_7 ? a1) (a8_7 ? a2)) ⊗ (f (a8_8 ? a1) (a8_8 ? a2)).
-
-(* abbiamo gia' gli ottali come tipo induttivo quindi: *)
-(* posso definire un getter a matrice sull'array *)
-ndefinition getn_array8T ≝
-λn:oct.λT:Type.λp:Array8T T.
- match n return λn.(Array8T T) → T with
- [ o0 ⇒ a8_1 T | o1 ⇒ a8_2 T | o2 ⇒ a8_3 T | o3 ⇒ a8_4 T
- | o4 ⇒ a8_5 T | o5 ⇒ a8_6 T | o6 ⇒ a8_7 T | o7 ⇒ a8_8 T
- ] p.
-
-(* abbiamo gia' gli ottali come tipo induttivo quindi: *)
-(* posso definire un setter a matrice sull'array *)
-ndefinition setn_array8T ≝
-λn:oct.λT:Type.λp:Array8T T.λv:T.
-let e00 ≝ (a8_1 T p) in
-let e01 ≝ (a8_2 T p) in
-let e02 ≝ (a8_3 T p) in
-let e03 ≝ (a8_4 T p) in
-let e04 ≝ (a8_5 T p) in
-let e05 ≝ (a8_6 T p) in
-let e06 ≝ (a8_7 T p) in
-let e07 ≝ (a8_8 T p) in
- match n with
- [ o0 ⇒ mk_Array8T T v e01 e02 e03 e04 e05 e06 e07
- | o1 ⇒ mk_Array8T T e00 v e02 e03 e04 e05 e06 e07
- | o2 ⇒ mk_Array8T T e00 e01 v e03 e04 e05 e06 e07
- | o3 ⇒ mk_Array8T T e00 e01 e02 v e04 e05 e06 e07
- | o4 ⇒ mk_Array8T T e00 e01 e02 e03 v e05 e06 e07
- | o5 ⇒ mk_Array8T T e00 e01 e02 e03 e04 v e06 e07
- | o6 ⇒ mk_Array8T T e00 e01 e02 e03 e04 e05 v e07
- | o7 ⇒ mk_Array8T T e00 e01 e02 e03 e04 e05 e06 v
- ].
-
-(* lettura byte *)
-ndefinition byte8_of_bits ≝
-λp:Array8T bool.
- mk_byte8
- (or_ex (match a8_1 ? p with [ true ⇒ x8 | false ⇒ x0 ])
- (or_ex (match a8_2 ? p with [ true ⇒ x4 | false ⇒ x0 ])
- (or_ex (match a8_3 ? p with [ true ⇒ x2 | false ⇒ x0 ])
- (match a8_4 ? p with [ true ⇒ x1 | false ⇒ x0 ]))))
- (or_ex (match a8_5 ? p with [ true ⇒ x8 | false ⇒ x0 ])
- (or_ex (match a8_6 ? p with [ true ⇒ x4 | false ⇒ x0 ])
- (or_ex (match a8_7 ? p with [ true ⇒ x2 | false ⇒ x0 ])
- (match a8_8 ? p with [ true ⇒ x1 | false ⇒ x0 ])))).
-
-(* scrittura byte *)
-ndefinition bits_of_exadecim ≝
-λe:exadecim.match e with
- [ x0 ⇒ quadruple … false false false false
- | x1 ⇒ quadruple … false false false true
- | x2 ⇒ quadruple … false false true false
- | x3 ⇒ quadruple … false false true true
- | x4 ⇒ quadruple … false true false false
- | x5 ⇒ quadruple … false true false true
- | x6 ⇒ quadruple … false true true false
- | x7 ⇒ quadruple … false true true true
- | x8 ⇒ quadruple … true false false false
- | x9 ⇒ quadruple … true false false true
- | xA ⇒ quadruple … true false true false
- | xB ⇒ quadruple … true false true true
- | xC ⇒ quadruple … true true false false
- | xD ⇒ quadruple … true true false true
- | xE ⇒ quadruple … true true true false
- | xF ⇒ quadruple … true true true true
- ].
-
-ndefinition bits_of_byte8 ≝
-λb:byte8.
- mk_Array8T ? (fst4T … (bits_of_exadecim (cnH ? b)))
- (snd4T … (bits_of_exadecim (cnH ? b)))
- (thd4T … (bits_of_exadecim (cnH ? b)))
- (fth4T … (bits_of_exadecim (cnH ? b)))
- (fst4T … (bits_of_exadecim (cnL ? b)))
- (snd4T … (bits_of_exadecim (cnL ? b)))
- (thd4T … (bits_of_exadecim (cnL ? b)))
- (fth4T … (bits_of_exadecim (cnL ? b))).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/memory/memory_struct.ma".
-include "num/bool_lemmas.ma".
-
-(* **************** *)
-(* TIPO ARRAY DA 16 *)
-(* **************** *)
-
-nlemma ar16_destruct_1 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x1 = y1.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T a _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_2 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x2 = y2.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ a _ _ _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x2 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_3 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x3 = y3.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ a _ _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x3 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_4 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x4 = y4.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ a _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x4 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_5 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x5 = y5.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ a _ _ _ _ _ _ _ _ _ _ _ ⇒ x5 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_6 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x6 = y6.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ a _ _ _ _ _ _ _ _ _ _ ⇒ x6 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_7 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x7 = y7.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ a _ _ _ _ _ _ _ _ _ ⇒ x7 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_8 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x8 = y8.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ a _ _ _ _ _ _ _ _ ⇒ x8 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_9 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x9 = y9.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ _ a _ _ _ _ _ _ _ ⇒ x9 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_10 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x10 = y10.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ _ _ a _ _ _ _ _ _ ⇒ x10 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_11 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x11 = y11.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ _ _ _ a _ _ _ _ _ ⇒ x11 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_12 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x12 = y12.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ _ _ _ _ a _ _ _ _ ⇒ x12 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_13 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x13 = y13.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ _ _ _ _ _ a _ _ _ ⇒ x13 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_14 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x14 = y14.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ _ _ _ _ _ _ a _ _ ⇒ x14 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_15 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x15 = y15.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ _ _ _ _ _ _ _ a _ ⇒ x15 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_16 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x16 = y16.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ a ⇒ x16 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_eqar16 :
-∀T.∀f:T → T → bool.
- (symmetricT T bool f) →
- (symmetricT (Array16T T) bool (eq_ar16 T f)).
- #T; #f; #H;
- #alu1; ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nchange with (
- ((f x1 y1) ⊗ (f x2 y2) ⊗ (f x3 y3) ⊗ (f x4 y4) ⊗
- (f x5 y5) ⊗ (f x6 y6) ⊗ (f x7 y7) ⊗ (f x8 y8) ⊗
- (f x9 y9) ⊗ (f x10 y10) ⊗ (f x11 y11) ⊗ (f x12 y12) ⊗
- (f x13 y13) ⊗ (f x14 y14) ⊗ (f x15 y15) ⊗ (f x16 y16)) =
- ((f y1 x1) ⊗ (f y2 x2) ⊗ (f y3 x3) ⊗ (f y4 x4) ⊗
- (f y5 x5) ⊗ (f y6 x6) ⊗ (f y7 x7) ⊗ (f y8 x8) ⊗
- (f y9 x9) ⊗ (f y10 x10) ⊗ (f y11 x11) ⊗ (f y12 x12) ⊗
- (f y13 x13) ⊗ (f y14 x14) ⊗ (f y15 x15) ⊗ (f y16 x16)));
- nrewrite > (H x1 y1);
- nrewrite > (H x2 y2);
- nrewrite > (H x3 y3);
- nrewrite > (H x4 y4);
- nrewrite > (H x5 y5);
- nrewrite > (H x6 y6);
- nrewrite > (H x7 y7);
- nrewrite > (H x8 y8);
- nrewrite > (H x9 y9);
- nrewrite > (H x10 y10);
- nrewrite > (H x11 y11);
- nrewrite > (H x12 y12);
- nrewrite > (H x13 y13);
- nrewrite > (H x14 y14);
- nrewrite > (H x15 y15);
- nrewrite > (H x16 y16);
- napply refl_eq.
-nqed.
-
-nlemma eqar16_to_eq :
-∀T.∀f:T → T → bool.
- (∀x,y.(f x y = true) → (x = y)) →
- (∀a1,a2:Array16T T.(eq_ar16 T f a1 a2 = true) → (a1 = a2)).
- #T; #f; #H;
- #alu1; ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H1;
- nchange in H1:(%) with (
- ((f x1 y1) ⊗ (f x2 y2) ⊗ (f x3 y3) ⊗ (f x4 y4) ⊗
- (f x5 y5) ⊗ (f x6 y6) ⊗ (f x7 y7) ⊗ (f x8 y8) ⊗
- (f x9 y9) ⊗ (f x10 y10) ⊗ (f x11 y11) ⊗ (f x12 y12) ⊗
- (f x13 y13) ⊗ (f x14 y14) ⊗ (f x15 y15) ⊗ (f x16 y16)) = true);
- nrewrite > (H … (andb_true_true_r … H1));
- nletin H2 ≝ (andb_true_true_l … H1);
- nrewrite > (H … (andb_true_true_r … H2));
- nletin H3 ≝ (andb_true_true_l … H2);
- nrewrite > (H … (andb_true_true_r … H3));
- nletin H4 ≝ (andb_true_true_l … H3);
- nrewrite > (H … (andb_true_true_r … H4));
- nletin H5 ≝ (andb_true_true_l … H4);
- nrewrite > (H … (andb_true_true_r … H5));
- nletin H6 ≝ (andb_true_true_l … H5);
- nrewrite > (H … (andb_true_true_r … H6));
- nletin H7 ≝ (andb_true_true_l … H6);
- nrewrite > (H … (andb_true_true_r … H7));
- nletin H8 ≝ (andb_true_true_l … H7);
- nrewrite > (H … (andb_true_true_r … H8));
- nletin H9 ≝ (andb_true_true_l … H8);
- nrewrite > (H … (andb_true_true_r … H9));
- nletin H10 ≝ (andb_true_true_l … H9);
- nrewrite > (H … (andb_true_true_r … H10));
- nletin H11 ≝ (andb_true_true_l … H10);
- nrewrite > (H … (andb_true_true_r … H11));
- nletin H12 ≝ (andb_true_true_l … H11);
- nrewrite > (H … (andb_true_true_r … H12));
- nletin H13 ≝ (andb_true_true_l … H12);
- nrewrite > (H … (andb_true_true_r … H13));
- nletin H14 ≝ (andb_true_true_l … H13);
- nrewrite > (H … (andb_true_true_r … H14));
- nletin H15 ≝ (andb_true_true_l … H14);
- nrewrite > (H … (andb_true_true_r … H15));
- nrewrite > (H … (andb_true_true_l … H15));
- napply refl_eq.
-nqed.
-
-nlemma eq_to_eqar16 :
-∀T.∀f:T → T → bool.
- (∀x,y.(x = y) → (f x y = true)) →
- (∀a1,a2:Array16T T.(a1 = a2) → (eq_ar16 T f a1 a2 = true)).
- #T; #f; #H;
- #alu1; ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H1;
- nrewrite > (ar16_destruct_1 … H1);
- nrewrite > (ar16_destruct_2 … H1);
- nrewrite > (ar16_destruct_3 … H1);
- nrewrite > (ar16_destruct_4 … H1);
- nrewrite > (ar16_destruct_5 … H1);
- nrewrite > (ar16_destruct_6 … H1);
- nrewrite > (ar16_destruct_7 … H1);
- nrewrite > (ar16_destruct_8 … H1);
- nrewrite > (ar16_destruct_9 … H1);
- nrewrite > (ar16_destruct_10 … H1);
- nrewrite > (ar16_destruct_11 … H1);
- nrewrite > (ar16_destruct_12 … H1);
- nrewrite > (ar16_destruct_13 … H1);
- nrewrite > (ar16_destruct_14 … H1);
- nrewrite > (ar16_destruct_15 … H1);
- nrewrite > (ar16_destruct_16 … H1);
- nchange with (
- ((f y1 y1) ⊗ (f y2 y2) ⊗ (f y3 y3) ⊗ (f y4 y4) ⊗
- (f y5 y5) ⊗ (f y6 y6) ⊗ (f y7 y7) ⊗ (f y8 y8) ⊗
- (f y9 y9) ⊗ (f y10 y10) ⊗ (f y11 y11) ⊗ (f y12 y12) ⊗
- (f y13 y13) ⊗ (f y14 y14) ⊗ (f y15 y15) ⊗ (f y16 y16)) = true);
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- napply refl_eq.
-nqed.
-
-nlemma decidable_ar16_aux1 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x1 ≠ y1) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_1 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux2 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x2 ≠ y2) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_2 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux3 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x3 ≠ y3) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_3 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux4 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x4 ≠ y4) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_4 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux5 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x5 ≠ y5) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_5 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux6 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x6 ≠ y6) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_6 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux7 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x7 ≠ y7) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_7 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux8 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x8 ≠ y8) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_8 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux9 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x9 ≠ y9) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_9 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux10 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x10 ≠ y10) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_10 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux11 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x11 ≠ y11) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_11 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux12 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x12 ≠ y12) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_12 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux13 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x13 ≠ y13) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_13 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux14 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x14 ≠ y14) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_14 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux15 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x15 ≠ y15) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_15 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux16 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x16 ≠ y16) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_16 … H1)).
-nqed.
-
-nlemma decidable_ar16 :
-∀T.(∀x,y:T.decidable (x = y)) →
- (∀a1,a2:Array16T T.decidable (a1 = a2)).
- #T; #H;
- #x; nelim x; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y; nelim y; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize;
- napply (or2_elim (? = ?) (? ≠ ?) ? (H x1 y1) …);
- ##[ ##2: #H1; napply (or2_intro2 … (decidable_ar16_aux1 T … H1))
- ##| ##1: #H1; napply (or2_elim (? = ?) (? ≠ ?) ? (H x2 y2) …);
- ##[ ##2: #H2; napply (or2_intro2 … (decidable_ar16_aux2 T … H2))
- ##| ##1: #H2; napply (or2_elim (? = ?) (? ≠ ?) ? (H x3 y3) …);
- ##[ ##2: #H3; napply (or2_intro2 … (decidable_ar16_aux3 T … H3))
- ##| ##1: #H3; napply (or2_elim (? = ?) (? ≠ ?) ? (H x4 y4) …);
- ##[ ##2: #H4; napply (or2_intro2 … (decidable_ar16_aux4 T … H4))
- ##| ##1: #H4; napply (or2_elim (? = ?) (? ≠ ?) ? (H x5 y5) …);
- ##[ ##2: #H5; napply (or2_intro2 … (decidable_ar16_aux5 T … H5))
- ##| ##1: #H5; napply (or2_elim (? = ?) (? ≠ ?) ? (H x6 y6) …);
- ##[ ##2: #H6; napply (or2_intro2 … (decidable_ar16_aux6 T … H6))
- ##| ##1: #H6; napply (or2_elim (? = ?) (? ≠ ?) ? (H x7 y7) …);
- ##[ ##2: #H7; napply (or2_intro2 … (decidable_ar16_aux7 T … H7))
- ##| ##1: #H7; napply (or2_elim (? = ?) (? ≠ ?) ? (H x8 y8) …);
- ##[ ##2: #H8; napply (or2_intro2 … (decidable_ar16_aux8 T … H8))
- ##| ##1: #H8; napply (or2_elim (? = ?) (? ≠ ?) ? (H x9 y9) …);
- ##[ ##2: #H9; napply (or2_intro2 … (decidable_ar16_aux9 T … H9))
- ##| ##1: #H9; napply (or2_elim (? = ?) (? ≠ ?) ? (H x10 y10) …);
- ##[ ##2: #H10; napply (or2_intro2 … (decidable_ar16_aux10 T … H10))
- ##| ##1: #H10; napply (or2_elim (? = ?) (? ≠ ?) ? (H x11 y11) …);
- ##[ ##2: #H11; napply (or2_intro2 … (decidable_ar16_aux11 T … H11))
- ##| ##1: #H11; napply (or2_elim (? = ?) (? ≠ ?) ? (H x12 y12) …);
- ##[ ##2: #H12; napply (or2_intro2 … (decidable_ar16_aux12 T … H12))
- ##| ##1: #H12; napply (or2_elim (? = ?) (? ≠ ?) ? (H x13 y13) …);
- ##[ ##2: #H13; napply (or2_intro2 … (decidable_ar16_aux13 T … H13))
- ##| ##1: #H13; napply (or2_elim (? = ?) (? ≠ ?) ? (H x14 y14) …);
- ##[ ##2: #H14; napply (or2_intro2 … (decidable_ar16_aux14 T … H14))
- ##| ##1: #H14; napply (or2_elim (? = ?) (? ≠ ?) ? (H x15 y15) …);
- ##[ ##2: #H15; napply (or2_intro2 … (decidable_ar16_aux15 T … H15))
- ##| ##1: #H15; napply (or2_elim (? = ?) (? ≠ ?) ? (H x16 y16) …);
- ##[ ##2: #H16; napply (or2_intro2 … (decidable_ar16_aux16 T … H16))
- ##| ##1: #H16; nrewrite > H1; nrewrite > H2; nrewrite > H3; nrewrite > H4;
- nrewrite > H5; nrewrite > H6; nrewrite > H7; nrewrite > H8;
- nrewrite > H9; nrewrite > H10; nrewrite > H11; nrewrite > H12;
- nrewrite > H13; nrewrite > H14; nrewrite > H15; nrewrite > H16;
- napply (or2_intro1 (? = ?) (? ≠ ?) (refl_eq …))
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
-nqed.
-
-(* *************** *)
-(* TIPO ARRAY DA 8 *)
-(* *************** *)
-
-nlemma ar8_destruct_1 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8:T.∀y1,y2,y3,y4,y5,y6,y7,y8:T.
- mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8 = mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8 →
- x1 = y1.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_Array8T a _ _ _ _ _ _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar8_destruct_2 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8:T.∀y1,y2,y3,y4,y5,y6,y7,y8:T.
- mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8 = mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8 →
- x2 = y2.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_Array8T _ a _ _ _ _ _ _ ⇒ x2 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar8_destruct_3 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8:T.∀y1,y2,y3,y4,y5,y6,y7,y8:T.
- mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8 = mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8 →
- x3 = y3.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_Array8T _ _ a _ _ _ _ _ ⇒ x3 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar8_destruct_4 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8:T.∀y1,y2,y3,y4,y5,y6,y7,y8:T.
- mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8 = mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8 →
- x4 = y4.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_Array8T _ _ _ a _ _ _ _ ⇒ x4 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar8_destruct_5 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8:T.∀y1,y2,y3,y4,y5,y6,y7,y8:T.
- mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8 = mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8 →
- x5 = y5.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_Array8T _ _ _ _ a _ _ _ ⇒ x5 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar8_destruct_6 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8:T.∀y1,y2,y3,y4,y5,y6,y7,y8:T.
- mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8 = mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8 →
- x6 = y6.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_Array8T _ _ _ _ _ a _ _ ⇒ x6 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar8_destruct_7 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8:T.∀y1,y2,y3,y4,y5,y6,y7,y8:T.
- mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8 = mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8 →
- x7 = y7.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_Array8T _ _ _ _ _ _ a _ ⇒ x7 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar8_destruct_8 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8:T.∀y1,y2,y3,y4,y5,y6,y7,y8:T.
- mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8 = mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8 →
- x8 = y8.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_Array8T _ _ _ _ _ _ _ a ⇒ x8 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_eqar8 :
-∀T.∀f:T → T → bool.
- (symmetricT T bool f) →
- (symmetricT (Array8T T) bool (eq_ar8 T f)).
- #T; #f; #H;
- #alu1; ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nchange with (
- ((f x1 y1) ⊗ (f x2 y2) ⊗ (f x3 y3) ⊗ (f x4 y4) ⊗
- (f x5 y5) ⊗ (f x6 y6) ⊗ (f x7 y7) ⊗ (f x8 y8)) =
- ((f y1 x1) ⊗ (f y2 x2) ⊗ (f y3 x3) ⊗ (f y4 x4) ⊗
- (f y5 x5) ⊗ (f y6 x6) ⊗ (f y7 x7) ⊗ (f y8 x8)));
- nrewrite > (H x1 y1);
- nrewrite > (H x2 y2);
- nrewrite > (H x3 y3);
- nrewrite > (H x4 y4);
- nrewrite > (H x5 y5);
- nrewrite > (H x6 y6);
- nrewrite > (H x7 y7);
- nrewrite > (H x8 y8);
- napply refl_eq.
-nqed.
-
-nlemma eqar8_to_eq :
-∀T.∀f:T → T → bool.
- (∀x,y.(f x y = true) → (x = y)) →
- (∀a1,a2:Array8T T.(eq_ar8 T f a1 a2 = true) → (a1 = a2)).
- #T; #f; #H;
- #alu1; ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H1;
- nchange in H1:(%) with (
- ((f x1 y1) ⊗ (f x2 y2) ⊗ (f x3 y3) ⊗ (f x4 y4) ⊗
- (f x5 y5) ⊗ (f x6 y6) ⊗ (f x7 y7) ⊗ (f x8 y8)) = true);
- nrewrite > (H … (andb_true_true_r … H1));
- nletin H2 ≝ (andb_true_true_l … H1);
- nrewrite > (H … (andb_true_true_r … H2));
- nletin H3 ≝ (andb_true_true_l … H2);
- nrewrite > (H … (andb_true_true_r … H3));
- nletin H4 ≝ (andb_true_true_l … H3);
- nrewrite > (H … (andb_true_true_r … H4));
- nletin H5 ≝ (andb_true_true_l … H4);
- nrewrite > (H … (andb_true_true_r … H5));
- nletin H6 ≝ (andb_true_true_l … H5);
- nrewrite > (H … (andb_true_true_r … H6));
- nletin H7 ≝ (andb_true_true_l … H6);
- nrewrite > (H … (andb_true_true_r … H7));
- nrewrite > (H … (andb_true_true_l … H7));
- napply refl_eq.
-nqed.
-
-nlemma eq_to_eqar8 :
-∀T.∀f:T → T → bool.
- (∀x,y.(x = y) → (f x y = true)) →
- (∀a1,a2:Array8T T.(a1 = a2) → (eq_ar8 T f a1 a2 = true)).
- #T; #f; #H;
- #alu1; ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H1;
- nrewrite > (ar8_destruct_1 … H1);
- nrewrite > (ar8_destruct_2 … H1);
- nrewrite > (ar8_destruct_3 … H1);
- nrewrite > (ar8_destruct_4 … H1);
- nrewrite > (ar8_destruct_5 … H1);
- nrewrite > (ar8_destruct_6 … H1);
- nrewrite > (ar8_destruct_7 … H1);
- nrewrite > (ar8_destruct_8 … H1);
- nchange with (
- ((f y1 y1) ⊗ (f y2 y2) ⊗ (f y3 y3) ⊗ (f y4 y4) ⊗
- (f y5 y5) ⊗ (f y6 y6) ⊗ (f y7 y7) ⊗ (f y8 y8)) = true);
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- napply refl_eq.
-nqed.
-
-nlemma decidable_ar8_aux1 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8:T.
- (x1 ≠ y1) →
- (mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8) ≠ (mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (ar8_destruct_1 … H1)).
-nqed.
-
-nlemma decidable_ar8_aux2 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8:T.
- (x2 ≠ y2) →
- (mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8) ≠ (mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (ar8_destruct_2 … H1)).
-nqed.
-
-nlemma decidable_ar8_aux3 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8:T.
- (x3 ≠ y3) →
- (mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8) ≠ (mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (ar8_destruct_3 … H1)).
-nqed.
-
-nlemma decidable_ar8_aux4 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8:T.
- (x4 ≠ y4) →
- (mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8) ≠ (mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (ar8_destruct_4 … H1)).
-nqed.
-
-nlemma decidable_ar8_aux5 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8:T.
- (x5 ≠ y5) →
- (mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8) ≠ (mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (ar8_destruct_5 … H1)).
-nqed.
-
-nlemma decidable_ar8_aux6 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8:T.
- (x6 ≠ y6) →
- (mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8) ≠ (mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (ar8_destruct_6 … H1)).
-nqed.
-
-nlemma decidable_ar8_aux7 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8:T.
- (x7 ≠ y7) →
- (mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8) ≠ (mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (ar8_destruct_7 … H1)).
-nqed.
-
-nlemma decidable_ar8_aux8 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8:T.
- (x8 ≠ y8) →
- (mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8) ≠ (mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (ar8_destruct_8 … H1)).
-nqed.
-
-nlemma decidable_ar8 :
-∀T.(∀x,y:T.decidable (x = y)) →
- (∀a1,a2:Array8T T.decidable (a1 = a2)).
- #T; #H;
- #x; nelim x; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y; nelim y; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize;
- napply (or2_elim (? = ?) (? ≠ ?) ? (H x1 y1) …);
- ##[ ##2: #H1; napply (or2_intro2 … (decidable_ar8_aux1 T … H1))
- ##| ##1: #H1; napply (or2_elim (? = ?) (? ≠ ?) ? (H x2 y2) …);
- ##[ ##2: #H2; napply (or2_intro2 … (decidable_ar8_aux2 T … H2))
- ##| ##1: #H2; napply (or2_elim (? = ?) (? ≠ ?) ? (H x3 y3) …);
- ##[ ##2: #H3; napply (or2_intro2 … (decidable_ar8_aux3 T … H3))
- ##| ##1: #H3; napply (or2_elim (? = ?) (? ≠ ?) ? (H x4 y4) …);
- ##[ ##2: #H4; napply (or2_intro2 … (decidable_ar8_aux4 T … H4))
- ##| ##1: #H4; napply (or2_elim (? = ?) (? ≠ ?) ? (H x5 y5) …);
- ##[ ##2: #H5; napply (or2_intro2 … (decidable_ar8_aux5 T … H5))
- ##| ##1: #H5; napply (or2_elim (? = ?) (? ≠ ?) ? (H x6 y6) …);
- ##[ ##2: #H6; napply (or2_intro2 … (decidable_ar8_aux6 T … H6))
- ##| ##1: #H6; napply (or2_elim (? = ?) (? ≠ ?) ? (H x7 y7) …);
- ##[ ##2: #H7; napply (or2_intro2 … (decidable_ar8_aux7 T … H7))
- ##| ##1: #H7; napply (or2_elim (? = ?) (? ≠ ?) ? (H x8 y8) …);
- ##[ ##2: #H8; napply (or2_intro2 … (decidable_ar8_aux8 T … H8))
- ##| ##1: #H8; nrewrite > H1; nrewrite > H2; nrewrite > H3; nrewrite > H4;
- nrewrite > H5; nrewrite > H6; nrewrite > H7; nrewrite > H8;
- napply (or2_intro1 (? = ?) (? ≠ ?) (refl_eq …))
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/memory/memory_struct.ma".
-include "num/word32.ma".
-include "common/option.ma".
-include "common/list.ma".
-
-(* ********************* *)
-(* MEMORIA E DESCRITTORE *)
-(* ********************* *)
-
-ndefinition aux_32B_filler ≝
-λT:Type.λel:T.
-let lev8 ≝ mk_Array16T T el el el el el el el el el el el el el el el el in
-let lev7 ≝ mk_Array16T ?
- lev8 lev8 lev8 lev8 lev8 lev8 lev8 lev8
- lev8 lev8 lev8 lev8 lev8 lev8 lev8 lev8
- in
-let lev6 ≝ mk_Array16T ?
- lev7 lev7 lev7 lev7 lev7 lev7 lev7 lev7
- lev7 lev7 lev7 lev7 lev7 lev7 lev7 lev7
- in
-let lev5 ≝ mk_Array16T ?
- lev6 lev6 lev6 lev6 lev6 lev6 lev6 lev6
- lev6 lev6 lev6 lev6 lev6 lev6 lev6 lev6
- in
-let lev4 ≝ mk_Array16T ?
- lev5 lev5 lev5 lev5 lev5 lev5 lev5 lev5
- lev5 lev5 lev5 lev5 lev5 lev5 lev5 lev5
- in
-let lev3 ≝ mk_Array16T ?
- lev4 lev4 lev4 lev4 lev4 lev4 lev4 lev4
- lev4 lev4 lev4 lev4 lev4 lev4 lev4 lev4
- in
-let lev2 ≝ mk_Array16T ?
- lev3 lev3 lev3 lev3 lev3 lev3 lev3 lev3
- lev3 lev3 lev3 lev3 lev3 lev3 lev3 lev3
- in
-let lev1 ≝ mk_Array16T ?
- lev2 lev2 lev2 lev2 lev2 lev2 lev2 lev2
- lev2 lev2 lev2 lev2 lev2 lev2 lev2 lev2
- in
-lev1.
-
-ndefinition aux_32B_type ≝
-λT:Type.Array16T (Array16T (Array16T (Array16T (Array16T (Array16T (Array16T (Array16T T))))))).
-
-(* tutta la memoria non installata *)
-ndefinition mt_out_of_bound_memory ≝ aux_32B_filler ? MEM_OUT_OF_BOUND.
-
-(* tutta la memoria a 0 *)
-ndefinition mt_zero_memory ≝ aux_32B_filler ? 〈x0,x0〉.
-
-(* visita di un albero da 4GB di elementi: ln16(4GB)=8 passaggi *)
-ndefinition mt_visit ≝
-λT:Type.λdata:aux_32B_type T.λaddr:word32.
- getn_array16T (cnL ? (cnL ? (cnL ? addr))) ?
- (getn_array16T (cnH ? (cnL ? (cnL ? addr))) ?
- (getn_array16T (cnL ? (cnH ? (cnL ? addr))) ?
- (getn_array16T (cnH ? (cnH ? (cnL ? addr))) ?
- (getn_array16T (cnL ? (cnL ? (cnH ? addr))) ?
- (getn_array16T (cnH ? (cnL ? (cnH ? addr))) ?
- (getn_array16T (cnL ? (cnH ? (cnH ? addr))) ?
- (getn_array16T (cnH ? (cnH ? (cnH ? addr))) ? data))))))).
-
-(* scrittura di un elemento in un albero da 4GB *)
-ndefinition mt_update ≝
-λT:Type.λdata:aux_32B_type T.λaddr:word32.λv:T.
- let lev2 ≝ getn_array16T (cnH ? (cnH ? (cnH ? addr))) ? data in
- let lev3 ≝ getn_array16T (cnL ? (cnH ? (cnH ? addr))) ? lev2 in
- let lev4 ≝ getn_array16T (cnH ? (cnL ? (cnH ? addr))) ? lev3 in
- let lev5 ≝ getn_array16T (cnL ? (cnL ? (cnH ? addr))) ? lev4 in
- let lev6 ≝ getn_array16T (cnH ? (cnH ? (cnL ? addr))) ? lev5 in
- let lev7 ≝ getn_array16T (cnL ? (cnH ? (cnL ? addr))) ? lev6 in
- let lev8 ≝ getn_array16T (cnH ? (cnL ? (cnL ? addr))) ? lev7 in
-
- setn_array16T (cnH ? (cnH ? (cnH ? addr))) ? data
- (setn_array16T (cnL ? (cnH ? (cnH ? addr))) ? lev2
- (setn_array16T (cnH ? (cnL ? (cnH ? addr))) ? lev3
- (setn_array16T (cnL ? (cnL ? (cnH ? addr))) ? lev4
- (setn_array16T (cnH ? (cnH ? (cnL ? addr))) ? lev5
- (setn_array16T (cnL ? (cnH ? (cnL ? addr))) ? lev6
- (setn_array16T (cnH ? (cnL ? (cnL ? addr))) ? lev7
- (setn_array16T (cnL ? (cnL ? (cnL ? addr))) T lev8 v))))))).
-
-(* scrittura di un range (max 64KB) in un albero da 4GB *)
-nlet rec mt_update_ranged (T:Type) (data:aux_32B_type T) (addr:word32) (w:word16) (rw:rec_word16 w) (v:T) on rw ≝
- match rw with
- [ w16_O ⇒ data
- | w16_S w' rw' ⇒ mt_update_ranged T (mt_update T data addr v)
- (succ_w32 addr) w' rw' v
- ].
-
-(* scrivi controllando il tipo di memoria *)
-ndefinition mt_mem_update ≝
-λmem:aux_32B_type byte8.
-λchk:aux_32B_type memory_type.
-λaddr:word32.λv:byte8.
- match mt_visit ? chk addr with
- (* ROM? ok, ma il valore viene perso *)
- [ MEM_READ_ONLY ⇒ Some ? mem
- (* RAM? ok *)
- | MEM_READ_WRITE ⇒ Some ? (mt_update ? mem addr v)
- (* NON INSTALLATA? no *)
- | MEM_OUT_OF_BOUND ⇒ None ? ].
-
-(* leggi controllando il tipo di memoria *)
-ndefinition mt_mem_read ≝
-λmem:aux_32B_type byte8.
-λchk:aux_32B_type memory_type.
-λaddr:word32.
- match mt_visit ? chk addr with
- [ MEM_READ_ONLY ⇒ Some ? (mt_visit ? mem addr)
- | MEM_READ_WRITE ⇒ Some ? (mt_visit ? mem addr)
- | MEM_OUT_OF_BOUND ⇒ None ? ].
-
-(* ************************** *)
-(* CARICAMENTO PROGRAMMA/DATI *)
-(* ************************** *)
-
-(* carica a paratire da addr, overflow se si supera 0xFFFF... *)
-nlet rec mt_load_from_source_at (old_mem:aux_32B_type byte8)
- (src:list byte8) (addr:word32) on src ≝
- match src with
- (* fine di source: carica da old_mem *)
- [ nil ⇒ old_mem
- | cons hd tl ⇒ mt_load_from_source_at (mt_update ? old_mem addr hd) tl (succ_w32 addr)
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status.ma".
-
-(* *********************************** *)
-(* IMPOSTAZIONI SPECIFICHE DEI MODELLI *)
-(* *********************************** *)
-
-(* modelli di HC05 *)
-ninductive HC05_model : Type ≝
- MC68HC05J5A: HC05_model
- (*..*).
-
-(* memoria degli HC05 *)
-ndefinition memory_type_of_FamilyHC05 ≝
-λm:HC05_model.match m with
- [ MC68HC05J5A ⇒
- [ (* astraggo molto *)
-(* 0x0000-0x001F,0x0FF0: sarebbe memory mapped IO *)
-(* 0x0080-0x00FF *) triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x8,x0〉〉〉 〈〈x0,x0〉:〈x8,x0〉〉 MEM_READ_WRITE (* 128B RAM+STACK *)
-(* 0x0300-0x0CFF *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x3〉:〈x0,x0〉〉〉 〈〈x0,xA〉:〈x0,x0〉〉 MEM_READ_ONLY (* 2560B USER ROM *)
-(* 0x0E00-0x0FFF *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,xE〉:〈x0,x0〉〉〉 〈〈x0,x2〉:〈x0,x0〉〉 MEM_READ_ONLY (* 512B INTERNAL ROM *) ]
- (* etc.. *)
- ].
-
-(* parametrizzati i non deterministici rispetto a tutti i valori casuali
- che verranno dati dall'esterno di tipo byte8 (ndby1-2) e bool (ndbo1-5).
- l'ACCENSIONE e' totalmente equivalente ad un reset causato da calo di tensione
- (reset V-low), la memoria ed il check possono essere passati *)
-ndefinition start_of_model_HC05 ≝
-λmcu:HC05_model.λt:memory_impl.
-λmem:aux_mem_type t.λchk:aux_chk_type t.
-λndby1,ndby2:byte8.λirqfl,ndbo1,ndbo2,ndbo3,ndbo4,ndbo5:bool.
- let build ≝ λspm,spf,pcm:word16.
- mk_any_status HC05 t
- (mk_alu_HC05
- (* acc_low: ? *) ndby1
- (* indx_low: ? *) ndby2
- (* sp: reset *) (or_w16 (and_w16 〈〈x0,x0〉:〈xF,xF〉〉 spm) spf)
- (* spm *) spm
- (* spf *) spf
- (* pc: reset+fetch *) (and_w16 (mk_word16 (mem_read_abs t mem 〈〈〈x0,x0〉:〈x0,x0〉〉.(and_w16 〈〈xF,xF〉:〈xF,xE〉〉 pcm)〉)
- (mem_read_abs t mem 〈〈〈x0,x0〉:〈x0,x0〉〉.(and_w16 〈〈xF,xF〉:〈xF,xF〉〉 pcm)〉)) pcm)
- (* pcm *) pcm
- (* H: ? *) ndbo1
- (* I: reset *) true
- (* N: ? *) ndbo2
- (* Z: ? *) ndbo3
- (* C: ? *) ndbo4
- (* IRQ: ? *) irqfl)
- (* mem *) mem
- (* chk *) chk
- (* clk: reset *) (None ?) in
- match mcu with
- [ MC68HC05J5A ⇒ build 〈〈x0,x0〉:〈x3,xF〉〉 〈〈x0,x0〉:〈xC,x0〉〉 〈〈x0,xF〉:〈xF,xF〉〉
- (*..*)
- ].
-
-(* cio' che non viene resettato mantiene il valore precedente: nella documentazione
- viene riportato come "unaffected"/"indeterminate"/"unpredictable"
- il soft RESET e' diverso da un calo di tensione e la ram non variera' *)
-ndefinition reset_of_model_HC05 ≝
-λt:memory_impl.λs:any_status HC05 t.
- (mk_any_status HC05 t
- (mk_alu_HC05
- (* acc_low: inv. *) (acc_low_reg_HC05 (alu ? t s))
- (* indx_low: inv. *) (indX_low_reg_HC05 (alu ? t s))
- (* sp: reset *) (or_w16 (and_w16 〈〈x0,x0〉:〈xF,xF〉〉 (sp_mask_HC05 (alu ? t s)))
- (sp_fix_HC05 (alu ? t s)))
- (* spm: inv. *) (sp_mask_HC05 (alu ? t s))
- (* spf: inv. *) (sp_fix_HC05 (alu ? t s))
- (* pc: reset+fetch *) (and_w16 (mk_word16 (mem_read_abs t (mem_desc ? t s) 〈〈〈x0,x0〉:〈x0,x0〉〉.(and_w16 〈〈xF,xF〉:〈xF,xE〉〉 (pc_mask_HC05 (alu ? t s)))〉)
- (mem_read_abs t (mem_desc ? t s) 〈〈〈x0,x0〉:〈x0,x0〉〉.(and_w16 〈〈xF,xF〉:〈xF,xF〉〉 (pc_mask_HC05 (alu ? t s)))〉))
- (pc_mask_HC05 (alu ? t s)))
- (* pcm: inv. *) (pc_mask_HC05 (alu ? t s))
- (* H: inv. *) (h_flag_HC05 (alu ? t s))
- (* I: reset *) true
- (* N: inv. *) (n_flag_HC05 (alu ? t s))
- (* Z: inv. *) (z_flag_HC05 (alu ? t s))
- (* C: inv. *) (c_flag_HC05 (alu ? t s))
- (* IRQ: inv *) (irq_flag_HC05 (alu ? t s)))
- (* mem: inv. *) (mem_desc ? t s)
- (* chk: inv. *) (chk_desc ? t s)
- (* clk: reset *) (None ?)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status.ma".
-
-(* *********************************** *)
-(* IMPOSTAZIONI SPECIFICHE DEI MODELLI *)
-(* *********************************** *)
-
-(* modelli di HC08 *)
-ninductive HC08_model : Type ≝
- MC68HC08AB16A: HC08_model
- (*..*).
-
-(* memoria degli HC08 *)
-ndefinition memory_type_of_FamilyHC08 ≝
-λm:HC08_model.match m with
- [ MC68HC08AB16A ⇒
- [ (* astraggo molto *)
-(* 0x0000-0x004F,0xFE00-0xFE01,0xFE03,
- 0xFE0C-0xFE11,0xFE1A-0xFE1D,0xFE1F: sarebbe memory mapped IO *)
-(* 0x0500-0x057F,0xFE02,0xFE04-0xFE07,
- 0xFE09-0xFE0B,0xFE12-0xFE19,0xFE1E,0xFFC0-0xFFCF : sarebbe reserved *)
-(* 0x0050-0x024F *) triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x5,x0〉〉〉 〈〈x0,x2〉:〈x0,x0〉〉 MEM_READ_WRITE (* 512B RAM *)
-(* 0x0800-0x09FF *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x8〉:〈x0,x0〉〉〉 〈〈x0,x2〉:〈x0,x0〉〉 MEM_READ_ONLY (* 512B EEPROM *)
-(* 0xBE00-0xFDFF *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈xB,xE〉:〈x0,x0〉〉〉 〈〈x4,x0〉:〈x0,x0〉〉 MEM_READ_ONLY (* 16384B ROM *)
-(* 0xFE20-0xFF52 *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈xF,xE〉:〈x2,x0〉〉〉 〈〈x0,x1〉:〈x3,x3〉〉 MEM_READ_ONLY (* 307B ROM *)
-(* 0xFFD0-0xFFFF *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈xF,xF〉:〈xD,x0〉〉〉 〈〈x0,x0〉:〈x3,x0〉〉 MEM_READ_ONLY (* 48B ROM *) ]
- (* etc... *)
- ].
-
-(* parametrizzati i non deterministici rispetto a tutti i valori casuali
- che verranno dati dall'esterno di tipo byte8 (ndby1-2) e bool (ndbo1-5).
- l'ACCENSIONE e' totalmente equivalente ad un reset causato da calo di tensione
- (reset V-low), la memoria ed il check possono essere passati *)
-ndefinition start_of_model_HC08 ≝
-λmcu:HC08_model.λt:memory_impl.
-λmem:aux_mem_type t.λchk:aux_chk_type t.
-λndby1,ndby2:byte8.λirqfl,ndbo1,ndbo2,ndbo3,ndbo4,ndbo5:bool.
- mk_any_status HC08 t
- (mk_alu_HC08
- (* acc_low: ? *) ndby1
- (* indw_low: ? *) ndby2
- (* indx_high: reset *) 〈x0,x0〉
- (* sp: reset *) 〈〈x0,x0〉:〈xF,xF〉〉
- (* pc: reset+fetch *) (mk_word16 (mem_read_abs t mem 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈xF,xF〉:〈xF,xE〉〉〉)
- (mem_read_abs t mem 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈xF,xF〉:〈xF,xF〉〉〉))
- (* V: ? *) ndbo1
- (* H: ? *) ndbo2
- (* I: reset *) true
- (* N: ? *) ndbo3
- (* Z: ? *) ndbo4
- (* C: ? *) ndbo5
- (* IRQ: ? *) irqfl)
- (* mem *) mem
- (* chk *) chk
- (* clk: reset *) (None ?).
-
-(* cio' che non viene resettato mantiene il valore precedente: nella documentazione
- viene riportato come "unaffected"/"indeterminate"/"unpredictable"
- il soft RESET e' diverso da un calo di tensione e la ram non variera' *)
-ndefinition reset_of_model_HC08 ≝
-λt:memory_impl.λs:any_status HC08 t.
- (mk_any_status HC08 t
- (mk_alu_HC08
- (* acc_low: inv. *) (acc_low_reg_HC08 (alu ? t s))
- (* indx_low: inv. *) (indX_low_reg_HC08 (alu ? t s))
- (* indx_high: reset *) 〈x0,x0〉
- (* sp: reset *) 〈〈x0,x0〉:〈xF,xF〉〉
- (* pc: reset+fetch *) (mk_word16 (mem_read_abs t (mem_desc ? t s) 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈xF,xF〉:〈xF,xE〉〉〉)
- (mem_read_abs t (mem_desc ? t s) 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈xF,xF〉:〈xF,xE〉〉〉))
- (* V: inv. *) (v_flag_HC08 (alu ? t s))
- (* H: inv. *) (h_flag_HC08 (alu ? t s))
- (* I: reset *) true
- (* N: inv. *) (n_flag_HC08 (alu ? t s))
- (* Z: inv. *) (z_flag_HC08 (alu ? t s))
- (* C: inv. *) (c_flag_HC08 (alu ? t s))
- (* IRQ: inv *) (irq_flag_HC08 (alu ? t s)))
- (* mem: inv. *) (mem_desc ? t s)
- (* chk: inv. *) (chk_desc ? t s)
- (* clk: reset *) (None ?)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status.ma".
-
-(* *********************************** *)
-(* IMPOSTAZIONI SPECIFICHE DEI MODELLI *)
-(* *********************************** *)
-
-(* modelli di HCS08 *)
-ninductive HCS08_model : Type ≝
- MC9S08AW60 : HCS08_model
-| MC9S08GB60 : HCS08_model
- (*..*).
-
-(* memoria degli HCS08 *)
-ndefinition memory_type_of_FamilyHCS08 ≝
-λm:HCS08_model.match m with
- [ MC9S08AW60 ⇒
- [ (* astraggo molto *)
-(* 0x0000-0x006F,0x1800-0x185F: sarebbe memory mapped IO *)
-(* 0x0070-0x086F *) triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x7,x0〉〉〉 〈〈x0,x8〉:〈x0,x0〉〉 MEM_READ_WRITE (* 2048B RAM *)
-(* 0x0870-0x17FF *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x8〉:〈x7,x0〉〉〉 〈〈x0,xF〉:〈x9,x0〉〉 MEM_READ_ONLY (* 3984B FLASH *)
-(* 0x1860-0xFFFF *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x1,x8〉:〈x6,x0〉〉〉 〈〈xE,x7〉:〈xA,x0〉〉 MEM_READ_ONLY (* 59296B FLASH *) ]
- | MC9S08GB60 ⇒
- [ (* astraggo molto *)
-(* 0x0000-0x006F,0x1800-0x185F: sarebbe memory mapped IO *)
-(* 0x0080-0x107F *) triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x8,x0〉〉〉 〈〈x1,x0〉:〈x0,x0〉〉 MEM_READ_WRITE (* 4096B RAM *)
-(* 0x1080-0x17FF *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x1,x0〉:〈x8,x0〉〉〉 〈〈x0,x7〉:〈x8,x0〉〉 MEM_READ_ONLY (* 1920B FLASH *)
-(* 0x182C-0xFFFF *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x1,x8〉:〈x2,xC〉〉〉 〈〈xE,x7〉:〈xD,x4〉〉 MEM_READ_ONLY (* 59348B FLASH *) ]
- (* etc... *)
- ].
-
-(* parametrizzati i non deterministici rispetto a tutti i valori casuali
- che verranno dati dall'esterno di tipo byte8 (ndby1-2) e bool (ndbo1-5).
- l'ACCENSIONE e' totalmente equivalente ad un reset causato da calo di tensione
- (reset V-low), la memoria ed il check possono essere passati *)
-ndefinition start_of_model_HCS08 ≝
-λmcu:HCS08_model.λt:memory_impl.
-λmem:aux_mem_type t.λchk:aux_chk_type t.
-λndby1,ndby2:byte8.λirqfl,ndbo1,ndbo2,ndbo3,ndbo4,ndbo5:bool.
- mk_any_status HCS08 t
- (mk_alu_HC08
- (* acc_low: ? *) ndby1
- (* indw_low: ? *) ndby2
- (* indx_high: reset *) 〈x0,x0〉
- (* sp: reset *) 〈〈x0,x0〉:〈xF,xF〉〉
- (* pc: reset+fetch *) (mk_word16 (mem_read_abs t mem 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈xF,xF〉:〈xF,xE〉〉〉)
- (mem_read_abs t mem 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈xF,xF〉:〈xF,xF〉〉〉))
- (* V: ? *) ndbo1
- (* H: ? *) ndbo2
- (* I: reset *) true
- (* N: ? *) ndbo3
- (* Z: ? *) ndbo4
- (* C: ? *) ndbo5
- (* IRQ: ? *) irqfl)
- (* mem *) mem
- (* chk *) chk
- (* clk: reset *) (None ?).
-
-(* cio' che non viene resettato mantiene il valore precedente: nella documentazione
- viene riportato come "unaffected"/"indeterminate"/"unpredictable"
- il soft RESET e' diverso da un calo di tensione e la ram non variera' *)
-ndefinition reset_of_model_HCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.
- (mk_any_status HCS08 t
- (mk_alu_HC08
- (* acc_low: inv. *) (acc_low_reg_HC08 (alu ? t s))
- (* indx_low: inv. *) (indX_low_reg_HC08 (alu ? t s))
- (* indx_high: reset *) 〈x0,x0〉
- (* sp: reset *) 〈〈x0,x0〉:〈xF,xF〉〉
- (* pc: reset+fetch *) (mk_word16 (mem_read_abs t (mem_desc ? t s) 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈xF,xF〉:〈xF,xE〉〉〉)
- (mem_read_abs t (mem_desc ? t s) 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈xF,xF〉:〈xF,xE〉〉〉))
- (* V: inv. *) (v_flag_HC08 (alu ? t s))
- (* H: inv. *) (h_flag_HC08 (alu ? t s))
- (* I: reset *) true
- (* N: inv. *) (n_flag_HC08 (alu ? t s))
- (* Z: inv. *) (z_flag_HC08 (alu ? t s))
- (* C: inv. *) (c_flag_HC08 (alu ? t s))
- (* IRQ: inv *) (irq_flag_HC08 (alu ? t s)))
- (* mem: inv. *) (mem_desc ? t s)
- (* chk: inv. *) (chk_desc ? t s)
- (* clk: reset *) (None ?)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status.ma".
-
-(* *********************************** *)
-(* IMPOSTAZIONI SPECIFICHE DEI MODELLI *)
-(* *********************************** *)
-
-(* modelli di IP2022 *)
-ninductive IP2022_model : Type ≝
- IP2K: IP2022_model.
-
-(* memoria degli IP2022 *)
-ndefinition memory_type_of_FamilyIP2022 ≝
-λm:IP2022_model.match m with
- [ IP2K ⇒
- [
-(* 0x02-0x13, 0x7E-0x7F registri memory mapped *)
-(* 0x00000002-0x0000007F *) triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x2〉〉〉 〈〈x0,x0〉:〈x7,xE〉〉 MEM_READ_ONLY (* 126B SystemMemoryReg *)
-(* 0x00000080-0x00000FFF *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x8,x0〉〉〉 〈〈x0,xF〉:〈x8,x0〉〉 MEM_READ_WRITE (* 3968 UserMemoryReg+RAM+STACK *)
-(* 0x02000000-0x02003FFF *) ; triple … 〈〈〈x0,x2〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x0〉〉〉 〈〈x4,x0〉:〈x0,x0〉〉 MEM_READ_WRITE (* 16384B PROGRAM RAM *)
-(* 0x02010000-0x02013FFF *) ; triple … 〈〈〈x0,x2〉:〈x0,x1〉〉.〈〈x0,x0〉:〈x0,x0〉〉〉 〈〈x4,x0〉:〈x0,x0〉〉 MEM_READ_ONLY (* 16384B PROGRAM FLASH *)
-(* 0x02014000-0x02017FFF *) ; triple … 〈〈〈x0,x2〉:〈x0,x1〉〉.〈〈x4,x0〉:〈x0,x0〉〉〉 〈〈x4,x0〉:〈x0,x0〉〉 MEM_READ_ONLY (* 16384B PROGRAM FLASH *)
-(* 0x02018000-0x0201BFFF *) ; triple … 〈〈〈x0,x2〉:〈x0,x1〉〉.〈〈x8,x0〉:〈x0,x0〉〉〉 〈〈x4,x0〉:〈x0,x0〉〉 MEM_READ_ONLY (* 16384B PROGRAM FLASH *)
-(* 0x0201C000-0x0201FFFF *) ; triple … 〈〈〈x0,x2〉:〈x0,x1〉〉.〈〈xC,x0〉:〈x0,x0〉〉〉 〈〈x4,x0〉:〈x0,x0〉〉 MEM_READ_ONLY (* 16384B PROGRAM FLASH *) ]
- (*..*)
- ].
-
-(* punto di riferimento per accessi $FR, ($IP) ($DP) ($SP) *)
-ndefinition IP2022_gpr_base ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x0〉〉〉.
-(* punto di riferimento per accessi ($PC) ($ADDR) *)
-ndefinition IP2022_ram_base ≝ 〈〈〈x0,x2〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x0〉〉〉.
-
-(* parametrizzati i non deterministici rispetto a tutti i valori casuali
- che verranno dati dall'esterno di tipo byte8 (ndby1-2) e bool (ndbo1-5).
- l'ACCENSIONE e' totalmente equivalente ad un reset causato da calo di tensione
- (reset V-low), la memoria ed il check possono essere passati *)
-ndefinition start_of_model_IP2022 ≝
-λmcu:IP2022_model.λt:memory_impl.
-λmem:aux_mem_type t.λchk:aux_chk_type t.
-λndby1,ndby2:byte8.λirqfl,ndbo1,ndbo2,ndbo3,ndbo4,ndbo5:bool.
- (mk_any_status IP2022 t
- (mk_alu_IP2022
- (* acc_low: reset *) 〈x0,x0〉
- (* mulh: reset *) 〈x0,x0〉
- (* addrsel: reset *) 〈x0,x0〉
- (* addr: reset *) new_addrarray
- (* call: reset *) new_callstack
- (* ip: reset *) 〈〈x0,x0〉:〈x0,x0〉〉
- (* dp: reset *) 〈〈x0,x0〉:〈x0,x0〉〉
- (* data: reset *) 〈〈x0,x0〉:〈x0,x0〉〉
- (* sp: reset *) 〈〈x0,x0〉:〈x0,x0〉〉
- (* pc: reset *) 〈〈xF,xF〉:〈xF,x0〉〉
- (* speed: reset *) x3
- (* page: reset *) o7
- (* H: reset *) false
- (* Z: reset *) false
- (* C: reset *) false
- (* skip mode: reset *) false)
- (* mem *) mem
- (* chk *) chk
- (* clk: reset *) (None ?)).
-
-(* cio' che non viene resettato mantiene il valore precedente: nella documentazione
- viene riportato come "unaffected"/"indeterminate"/"unpredictable"
- il soft RESET e' diverso da un calo di tensione e la ram non variera' *)
-ndefinition reset_of_model_IP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.
- (mk_any_status IP2022 t
- (mk_alu_IP2022
- (* acc_low: reset *) 〈x0,x0〉
- (* mulh: reset *) 〈x0,x0〉
- (* addrsel: reset *) 〈x0,x0〉
- (* addr: reset *) new_addrarray
- (* call: reset *) new_callstack
- (* ip: reset *) 〈〈x0,x0〉:〈x0,x0〉〉
- (* dp: reset *) 〈〈x0,x0〉:〈x0,x0〉〉
- (* data: reset *) 〈〈x0,x0〉:〈x0,x0〉〉
- (* sp: reset *) 〈〈x0,x0〉:〈x0,x0〉〉
- (* pc: reset *) 〈〈xF,xF〉:〈xF,x0〉〉
- (* speed: reset *) x3
- (* page: reset *) o7
- (* H: reset *) false
- (* Z: reset *) false
- (* C: reset *) false
- (* skip mode: reset *) false)
- (* mem: inv. *) (mem_desc ? t s)
- (* chk: inv. *) (chk_desc ? t s)
- (* clk: reset *) (None ?)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status.ma".
-
-(* *********************************** *)
-(* IMPOSTAZIONI SPECIFICHE DEI MODELLI *)
-(* *********************************** *)
-
-(* modelli di RS08 *)
-ninductive RS08_model : Type ≝
- MC9RS08KA1 : RS08_model
-| MC9RS08KA2 : RS08_model.
-
-(* memoria dei RS08 *)
-ndefinition memory_type_of_FamilyRS08 ≝
-λm:RS08_model.match m with
- [ MC9RS08KA1 ⇒
- [
-(* 0x0000-0x000E *) triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x0〉〉〉 〈〈x0,x0〉:〈x0,xF〉〉 MEM_READ_WRITE (* 15B RAM *)
-(* 0x0010-0x001E *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x1,x0〉〉〉 〈〈x0,x0〉:〈x0,xF〉〉 MEM_READ_WRITE (* 15B MEMORY MAPPED IO *)
-(* 0x0020-0x004F *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x2,x0〉〉〉 〈〈x0,x0〉:〈x3,x0〉〉 MEM_READ_WRITE (* 48B RAM *)
-(* 0x00C0-0x00FF *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈xC,x0〉〉〉 〈〈x0,x0〉:〈x4,x0〉〉 MEM_READ_WRITE (* 64B RAM PAGING *)
-(* 0x0200-0x023F *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x2〉:〈x0,x0〉〉〉 〈〈x0,x0〉:〈x4,x0〉〉 MEM_READ_WRITE (* 64B MEMORY MAPPED IO *)
-(* 0x3C00-0x3FFF *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x3,xC〉:〈x0,x0〉〉〉 〈〈x0,x4〉:〈x0,x0〉〉 MEM_READ_ONLY (* 1024B FLASH *) ]
- | MC9RS08KA2 ⇒
- [
-(* 0x0000-0x000E *) triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x0〉〉〉 〈〈x0,x0〉:〈x0,xF〉〉 MEM_READ_WRITE (* 15B RAM *)
-(* 0x0010-0x001E *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x1,x0〉〉〉 〈〈x0,x0〉:〈x0,xF〉〉 MEM_READ_WRITE (* 15B MEMORY MAPPED IO *)
-(* 0x0020-0x004F *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x2,x0〉〉〉 〈〈x0,x0〉:〈x3,x0〉〉 MEM_READ_WRITE (* 48B RAM *)
-(* 0x00C0-0x00FF *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈xC,x0〉〉〉 〈〈x0,x0〉:〈x4,x0〉〉 MEM_READ_WRITE (* 64B RAM PAGING *)
-(* 0x0200-0x023F *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x2〉:〈x0,x0〉〉〉 〈〈x0,x0〉:〈x4,x0〉〉 MEM_READ_WRITE (* 64B MEMORY MAPPED IO *)
-(* 0x3800-0x3FFF *) ; triple … 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x3,x8〉:〈x0,x0〉〉〉 〈〈x0,x8〉:〈x0,x0〉〉 MEM_READ_ONLY (* 2048B FLASH *) ]
- ].
-
-(* parametrizzati i non deterministici rispetto a tutti i valori casuali
- che verranno dati dall'esterno di tipo byte8 (ndby1-2) e bool (ndbo1-5).
- l'ACCENSIONE e' totalmente equivalente ad un reset causato da calo di tensione
- (reset V-low), la memoria ed il check possono essere passati *)
-ndefinition start_of_model_RS08 ≝
-λmcu:RS08_model.λt:memory_impl.
-λmem:aux_mem_type t.λchk:aux_chk_type t.
-λndby1,ndby2:byte8.λirqfl,ndbo1,ndbo2,ndbo3,ndbo4,ndbo5:bool.
- (mk_any_status RS08 t
- (mk_alu_RS08
- (* acc_low: reset *) 〈x0,x0〉
- (* pc: reset *) 〈〈x3,xF〉:〈xF,xD〉〉
- (* pcm *) 〈〈x3,xF〉:〈xF,xF〉〉
- (* spc: reset *) 〈〈x3,xF〉:〈xF,xD〉〉
- (* xm: reset *) 〈x0,x0〉
- (* psm: *) 〈x8,x0〉
- (* Z: reset *) false
- (* C: reset *) false)
- (* mem *) mem
- (* chk *) chk
- (* clk: reset *) (None ?)).
-
-(* cio' che non viene resettato mantiene il valore precedente: nella documentazione
- viene riportato come "unaffected"/"indeterminate"/"unpredictable"
- il soft RESET e' diverso da un calo di tensione e la ram non variera' *)
-ndefinition reset_of_model_RS08 ≝
-λt:memory_impl.λs:any_status RS08 t.
- (mk_any_status RS08 t
- (mk_alu_RS08
- (* acc_low: reset *) 〈x0,x0〉
- (* pc: reset *) 〈〈x3,xF〉:〈xF,xD〉〉
- (* pcm *) (pc_mask_RS08 (alu ? t s))
- (* spc: reset *) 〈〈x3,xF〉:〈xF,xD〉〉
- (* xm: reset *) 〈x0,x0〉
- (* psm: reset *) 〈x8,x0〉
- (* Z: reset *) false
- (* C: reset *) false)
- (* mem: inv. *) (mem_desc ? t s)
- (* chk: inv. *) (chk_desc ? t s)
- (* clk: reset *) (None ?)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/model/HC05_model.ma".
-include "emulator/model/HC08_model.ma".
-include "emulator/model/HCS08_model.ma".
-include "emulator/model/RS08_model.ma".
-include "emulator/model/IP2022_model.ma".
-
-(* *********************************** *)
-(* IMPOSTAZIONI SPECIFICHE DEI MODELLI *)
-(* *********************************** *)
-
-(* raggruppamento dei modelli *)
-ndefinition aux_model_type ≝
-λm:mcu_type.match m with
- [ HC05 ⇒ HC05_model
- | HC08 ⇒ HC08_model
- | HCS08 ⇒ HCS08_model
- | RS08 ⇒ RS08_model
- | IP2022 ⇒ IP2022_model
- ].
-
-(* ∀modello.descrizione della memoria installata *)
-ndefinition memory_type_of_model ≝
-λm:mcu_type.
- match m
- return λm.aux_model_type m → ?
- with
- [ HC05 ⇒ memory_type_of_FamilyHC05
- | HC08 ⇒ memory_type_of_FamilyHC08
- | HCS08 ⇒ memory_type_of_FamilyHCS08
- | RS08 ⇒ memory_type_of_FamilyRS08
- | IP2022 ⇒ memory_type_of_FamilyIP2022
- ].
-
-(* dato un modello costruisce un descrittore a partire dalla lista precedente *)
-nlet rec build_memory_type_of_model_aux t param (result:aux_chk_type t) on param ≝
- match param with
- [ nil ⇒ result
- | cons hd tl ⇒
- build_memory_type_of_model_aux t tl
- (check_update_ranged t result (fst3T ??? hd) (snd3T ??? hd) (thd3T ??? hd)) ].
-
-ndefinition build_memory_type_of_model ≝
-λm:mcu_type.λmcu:aux_model_type m.λt:memory_impl.
- build_memory_type_of_model_aux t (memory_type_of_model m mcu) (out_of_bound_memory t).
-
-ndefinition start_of_model ≝
-λm:mcu_type.
- match m
- return λm.aux_model_type m → ?
- with
- [ HC05 ⇒ start_of_model_HC05
- | HC08 ⇒ start_of_model_HC08
- | HCS08 ⇒ start_of_model_HCS08
- | RS08 ⇒ start_of_model_RS08
- | IP2022 ⇒ start_of_model_IP2022
- ].
-
-ndefinition reset_of_model ≝
-λm:mcu_type.
- match m return λm.Πt.(any_status m t) → ? with
- [ HC05 ⇒ reset_of_model_HC05
- | HC08 ⇒ reset_of_model_HC08
- | HCS08 ⇒ reset_of_model_HCS08
- | RS08 ⇒ reset_of_model_RS08
- | IP2022 ⇒ reset_of_model_IP2022
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/multivm/multivm_base.ma".
-include "emulator/read_write/load_write.ma".
-
-(* ************************************************ *)
-(* LOGICHE AUSILIARE CHE ACCOMUNANO PIU' OPERAZIONI *)
-(* ************************************************ *)
-
-(* A = [true] fAMC(A,M,C), [false] A *)
-(* cioe' in caso di false l'operazione viene eseguita ma modifica solo i flag *)
-(* fAMC e' la logica da applicare: somma con/senza carry *)
-ndefinition execute_ADC_ADD_aux ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.λsetflag:bool.
-λfAMC:bool → byte8 → byte8 → ProdT bool byte8.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- let A_op ≝ get_acc_8_low_reg … s_tmp1 in
- match fAMC (get_c_flag … s_tmp1) A_op M_op with
- [ pair carry R_op ⇒
- let A7 ≝ getMSB_b8 A_op in
- let M7 ≝ getMSB_b8 M_op in
- let R7 ≝ getMSB_b8 R_op in
- let A3 ≝ getMSB_ex (cnL ? A_op) in
- let M3 ≝ getMSB_ex (cnL ? M_op) in
- let R3 ≝ getMSB_ex (cnL ? R_op) in
- (* A = [true] fAMC(A,M,C), [false] A *)
- let s_tmp2 ≝ match setflag with [ true ⇒ set_acc_8_low_reg … s_tmp1 R_op | false ⇒ s_tmp1 ] in
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp3 ≝ set_zflb … s_tmp2 R_op in
- (* C = A7&M7 | M7&nR7 | nR7&A7 *)
- let s_tmp4 ≝ set_c_flag … s_tmp3 ((A7⊗M7) ⊕ (M7⊗(⊖R7)) ⊕ ((⊖R7)⊗A7)) in
- (* N = R7 *)
- let s_tmp5 ≝ set_nflb … s_tmp4 R_op in
- (* H = A3&M3 | M3&nR3 | nR3&A3 *)
- let s_tmp6 ≝ setweak_h_flag … s_tmp5 ((A3⊗M3) ⊕ (M3⊗(⊖R3)) ⊕ ((⊖R3)⊗A3)) in
- (* V = A7&M7&nR7 | nA7&nM7&R7 *)
- let s_tmp7 ≝ setweak_v_flag … s_tmp6 ((A7⊗M7⊗(⊖R7)) ⊕ ((⊖A7)⊗(⊖M7)⊗R7)) in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp7 new_pc) ]]).
-
-(* A = [true] fAM(A,M), [false] A *)
-(* cioe' in caso di false l'operazione viene eseguita ma modifica solo i flag *)
-(* fAM e' la logica da applicare: and/xor/or *)
-ndefinition execute_AND_BIT_EOR_ORA_aux ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.λsetflag:bool.
-λfAM:byte8 → byte8 → byte8.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- let R_op ≝ fAM (get_acc_8_low_reg … s_tmp1) M_op in
- (* A = [true] fAM(A,M), [false] A *)
- let s_tmp2 ≝ match setflag with [ true ⇒ set_acc_8_low_reg … s_tmp1 R_op | false ⇒ s_tmp1 ] in
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp3 ≝ set_zflb … s_tmp2 R_op in
- (* N = R7 *)
- let s_tmp4 ≝ set_nflb … s_tmp3 R_op in
- (* V = 0 *)
- let s_tmp5 ≝ setweak_v_flag … s_tmp4 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp5 new_pc) ]).
-
-(* M = fMC(M,C) *)
-(* fMC e' la logica da applicare: rc_/ro_/sh_ *)
-ndefinition execute_ASL_ASR_LSR_ROL_ROR_aux ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
-λfMC:bool → byte8 → ProdT bool byte8.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op _ ⇒
- match fMC (get_c_flag … s_tmp1) M_op with [ pair carry R_op ⇒
- (* M = fMC(M,C) *)
- opt_map … (multi_mode_writeb … s_tmp1 cur_pc auxMode_ok i R_op)
- (λS_PC.match S_PC with
- [ pair s_tmp2 new_pc ⇒
- (* C = carry *)
- let s_tmp3 ≝ set_c_flag … s_tmp2 carry in
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp4 ≝ set_zflb … s_tmp3 R_op in
- (* N = R7 *)
- let s_tmp5 ≝ set_nflb … s_tmp4 R_op in
- (* V = R7 ⊙ carry *)
- let s_tmp6 ≝ setweak_v_flag … s_tmp5 ((getMSB_b8 R_op) ⊙ carry) in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp6 new_pc) ])]]).
-
-(* branch con byte+estensione segno *)
-ndefinition branched_pc ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λb:byte8.
- get_pc_reg … (set_pc_reg … s (plus_w16_d_d cur_pc (exts_w16 b))).
-
-(* if COND=1 branch *)
-(* tutti i branch calcoleranno la condizione e la passeranno qui *)
-ndefinition execute_any_BRANCH ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.λfCOND:bool.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- (* if true, branch *)
- match fCOND with
- (* newpc = nextpc + rel *)
- [ true ⇒ Some ? (pair … s_tmp1 (branched_pc … s_tmp1 new_pc M_op))
- (* newpc = nextpc *)
- | false ⇒ Some ? (pair … s_tmp1 new_pc) ]]).
-
-(* Mn = filtered optval *)
-(* il chiamante passa 0x00 per azzerare, 0xFF per impostare il bit di M *)
-ndefinition execute_BCLRn_BSETn_aux ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.λoptval:byte8.
- (* Mn = filtered optval *)
- opt_map … (multi_mode_writeb … s cur_pc auxMode_ok i optval)
- (λS_PC.match S_PC with
- (* newpc = nextpc *)
- [ pair s_tmp1 new_pc ⇒ Some ? (pair … s_tmp1 new_pc) ]).
-
-(* if COND(Mn) branch *)
-(* il chiamante passa la logica da testare (0x00,¬0x00) e poi si salta *)
-ndefinition execute_BRCLRn_BRSETn_aux ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.λfCOND:byte8 → bool.
- opt_map … (multi_mode_loadw … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒ match M_op with
- [ mk_comp_num MH_op ML_op ⇒
- (* if COND(Mn) branch *)
- match fCOND MH_op with
- (* newpc = nextpc + rel *)
- [ true ⇒ Some ? (pair … s_tmp1 (branched_pc … s_tmp1 new_pc ML_op))
- (* newpc = nextpc *)
- | false ⇒ Some ? (pair … s_tmp1 new_pc) ]]]).
-
-(* A = [true] fAMC(A,M,C), [false] A *)
-(* cioe' in caso di false l'operazione viene eseguita ma modifica solo i flag *)
-(* fAMC e' la logica da applicare: sottrazione con/senza carry *)
-ndefinition execute_CMP_SBC_SUB_aux ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.λsetflag:bool.
-λfAMC:bool → byte8 → byte8 → ProdT bool byte8.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- let A_op ≝ get_acc_8_low_reg … s_tmp1 in
- match fAMC (get_c_flag … s_tmp1) A_op M_op with
- [ pair carry R_op ⇒
- let A7 ≝ getMSB_b8 A_op in
- let M7 ≝ getMSB_b8 M_op in
- let R7 ≝ getMSB_b8 R_op in
- (* A = [true] fAMC(A,M,C), [false] A *)
- let s_tmp2 ≝ match setflag with [ true ⇒ set_acc_8_low_reg … s_tmp1 R_op | false ⇒ s_tmp1 ] in
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp3 ≝ set_zflb … s_tmp2 R_op in
- (* C = nA7&M7 | M7&R7 | R7&nA7 *)
- let s_tmp4 ≝ set_c_flag … s_tmp3 (((⊖A7)⊗M7) ⊕ (M7⊗R7) ⊕ (R7⊗(⊖A7))) in
- (* N = R7 *)
- let s_tmp5 ≝ set_nflb … s_tmp4 R_op in
- (* V = A7&nM7&nR7 | nA7&M7&R7 *)
- let s_tmp6 ≝ setweak_v_flag … s_tmp5 ((A7⊗(⊖M7)⊗(⊖R7)) ⊕ ((⊖A7)⊗M7⊗R7)) in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp6 new_pc) ]]).
-
-(* M = fM(M) *)
-(* fM e' la logica da applicare: not/neg/++/-- *)
-ndefinition execute_COM_DEC_INC_NEG_aux ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
-λfM:byte8 → byte8.λfV:bool → bool → bool.λfC:bool → byte8 → bool.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op _ ⇒
- let R_op ≝ fM M_op in
- (* M = fM(M) *)
- opt_map … (multi_mode_writeb … s_tmp1 cur_pc auxMode_ok i R_op)
- (λS_PC.match S_PC with
- [ pair s_tmp2 new_pc ⇒
- (* C = fCR (C,R) *)
- let s_tmp3 ≝ set_c_flag … s_tmp2 (fC (get_c_flag … s_tmp2) R_op) in
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp4 ≝ set_zflb … s_tmp3 R_op in
- (* N = R7 *)
- let s_tmp5 ≝ set_nflb … s_tmp4 R_op in
- (* V = fV (M7,R7) *)
- let s_tmp6 ≝ setweak_v_flag … s_tmp5 (fV (getMSB_b8 M_op) (getMSB_b8 R_op)) in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp6 new_pc) ])]).
-
-(* il classico push *)
-ndefinition aux_push ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval:byte8.
- opt_map … (get_sp_reg … s)
- (* [SP] = val *)
- (λSP_op.opt_map … (memory_filter_write … s (extu_w32 SP_op) auxMode_ok val)
- (* SP -- *)
- (λs_tmp1.opt_map … (set_sp_reg … s_tmp1 (pred_w16 SP_op))
- (λs_tmp2.Some ? s_tmp2))).
-
-(* il classico pop *)
-(* NB: l'incremento di SP deve essere filtrato dalla ALU, quindi get(set(SP)) *)
-ndefinition aux_pop ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- opt_map … (get_sp_reg … s)
- (* SP ++ *)
- (λSP_op.opt_map … (set_sp_reg … s (succ_w16 SP_op))
- (λs_tmp1.opt_map … (get_sp_reg … s_tmp1)
- (* val = [SP] *)
- (λSP_op'.opt_map … (memory_filter_read … s_tmp1 (extu_w32 SP_op'))
- (λval.Some ? (pair … s_tmp1 val))))).
-
-(* CCR corrisponde a V11HINZC e cmq 1 se un flag non esiste *)
-(* i flag mantengono posizione costante nelle varie ALU, e se non sono
- implementati corrispondono a 1 *)
-ndefinition aux_get_CCR_aux ≝
-λopt:option bool.match opt with [ None ⇒ true | Some b ⇒ b ].
-
-ndefinition aux_get_CCR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- byte8_of_bits (mk_Array8T ?
- (aux_get_CCR_aux (get_v_flag … s))
- true
- true
- (aux_get_CCR_aux (get_h_flag … s))
- (aux_get_CCR_aux (get_i_flag … s))
- (aux_get_CCR_aux (get_n_flag … s))
- (get_z_flag … s)
- (get_c_flag … s)).
-
-(* CCR corrisponde a V11HINZC *)
-(* i flag mantengono posizione costante nelle varie ALU, e se non sono
- implementati si puo' usare tranquillamente setweak *)
-ndefinition aux_set_CCR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λCCR:byte8.
- match bits_of_byte8 CCR with
- [ mk_Array8T vf _ _ hf if nf zf cf ⇒
- setweak_v_flag …
- (setweak_h_flag …
- (setweak_i_flag …
- (setweak_n_flag …
- (set_z_flag …
- (set_c_flag … s cf) zf) nf) if) hf) vf ].
-
-(* **************** *)
-(* LOGICA DELLA ALU *)
-(* **************** *)
-
-(* A = A + M + C *)
-ndefinition execute_ADC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_ADC_ADD_aux … s cur_pc i true (λC_op.plus_b8_dc_dc C_op).
-
-(* A = A + M *)
-ndefinition execute_ADD ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_ADC_ADD_aux … s cur_pc i true (λC_op.plus_b8_dc_dc false).
-
-(* SP += extended M *)
-ndefinition execute_AIS ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- opt_map … (get_sp_reg … s_tmp1)
- (* SP += extended M *)
- (λSP_op.opt_map … (set_sp_reg … s_tmp1 (plus_w16_d_d SP_op (exts_w16 M_op)))
- (λs_tmp2.Some ? (pair … s_tmp2 new_pc))) ]).
-
-(* H:X += extended M *)
-ndefinition execute_AIX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- opt_map … (get_indX_16_reg … s_tmp1)
- (* H:X += extended M *)
- (λHX_op.opt_map … (set_indX_16_reg … s_tmp1 (plus_w16_d_d HX_op (exts_w16 M_op)))
- (λs_tmp2.Some ? (pair … s_tmp2 new_pc))) ]).
-
-(* A = A & M *)
-ndefinition execute_AND ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_AND_BIT_EOR_ORA_aux … s cur_pc i true and_b8.
-
-(* M = C' <- rcl M <- 0 *)
-ndefinition execute_ASL ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_ASL_ASR_LSR_ROL_ROR_aux … s cur_pc i (λC_op.rcl_b8 false).
-
-(* M = M7 -> rcr M -> C' *)
-ndefinition execute_ASR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_ASL_ASR_LSR_ROL_ROR_aux … s cur_pc i (λC_op.λM_op.rcr_b8 (getMSB_b8 M_op) M_op).
-
-(* if C=0, branch *)
-ndefinition execute_BCC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_any_BRANCH … s cur_pc i (⊖(get_c_flag … s)).
-
-(* Mn = 0 *)
-ndefinition execute_BCLRn ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_BCLRn_BSETn_aux … s cur_pc i 〈x0,x0〉.
-
-(* if C=1, branch *)
-ndefinition execute_BCS ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_any_BRANCH … s cur_pc i (get_c_flag … s).
-
-(* if Z=1, branch *)
-ndefinition execute_BEQ ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_any_BRANCH … s cur_pc i (get_z_flag … s).
-
-(* if N⊙V=0, branch *)
-ndefinition execute_BGE ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_n_flag … s)
- (λN_op.opt_map … (get_v_flag … s)
- (λV_op.execute_any_BRANCH … s cur_pc i (⊖(N_op ⊙ V_op)))).
-
-(* BGND mode *)
-ndefinition execute_BGND ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- Some ? (pair … s cur_pc).
-
-(* if Z|N⊙V=0, branch *)
-ndefinition execute_BGT ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_n_flag … s)
- (λN_op.opt_map … (get_v_flag … s)
- (λV_op.execute_any_BRANCH … s cur_pc i (⊖((get_z_flag … s) ⊕ (N_op ⊙ V_op))))).
-
-(* if H=0, branch *)
-ndefinition execute_BHCC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_h_flag … s)
- (λH_op.execute_any_BRANCH … s cur_pc i (⊖H_op)).
-
-(* if H=1, branch *)
-ndefinition execute_BHCS ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_h_flag … s)
- (λH_op.execute_any_BRANCH … s cur_pc i H_op).
-
-(* if C|Z=0, branch *)
-ndefinition execute_BHI ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_any_BRANCH … s cur_pc i (⊖((get_c_flag … s) ⊕ (get_z_flag … s))).
-
-(* if nIRQ=1, branch NB: irqflag e' un negato del pin *)
-ndefinition execute_BIH ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_irq_flag … s)
- (λIRQ_op.execute_any_BRANCH … s cur_pc i (⊖IRQ_op)).
-
-(* if nIRQ=0, branch NB: irqflag e' un negato del pin *)
-ndefinition execute_BIL ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_irq_flag … s)
- (λIRQ_op.execute_any_BRANCH … s cur_pc i IRQ_op).
-
-(* flags = A & M *)
-ndefinition execute_BIT ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_AND_BIT_EOR_ORA_aux … s cur_pc i false and_b8.
-
-(* if Z|N⊙V=1, branch *)
-ndefinition execute_BLE ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_n_flag … s)
- (λN_op.opt_map … (get_v_flag … s)
- (λV_op.execute_any_BRANCH … s cur_pc i ((get_z_flag … s) ⊕ (N_op ⊙ V_op)))).
-
-(* if C|Z=1, branch *)
-ndefinition execute_BLS ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_any_BRANCH … s cur_pc i ((get_c_flag … s) ⊕ (get_z_flag … s)).
-
-(* if N⊙V=1, branch *)
-ndefinition execute_BLT ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_n_flag … s)
- (λN_op.opt_map … (get_v_flag … s)
- (λV_op.execute_any_BRANCH … s cur_pc i (N_op ⊙ V_op))).
-
-(* if I=0, branch *)
-ndefinition execute_BMC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_i_flag … s)
- (λI_op.execute_any_BRANCH … s cur_pc i (⊖I_op)).
-
-(* if N=1, branch *)
-ndefinition execute_BMI ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_n_flag … s)
- (λN_op.execute_any_BRANCH … s cur_pc i N_op).
-
-(* if I=1, branch *)
-ndefinition execute_BMS ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_i_flag … s)
- (λI_op.execute_any_BRANCH … s cur_pc i I_op).
-
-(* if Z=0, branch *)
-ndefinition execute_BNE ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_any_BRANCH … s cur_pc i (⊖(get_z_flag … s)).
-
-(* if N=0, branch *)
-ndefinition execute_BPL ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_n_flag … s)
- (λN_op.execute_any_BRANCH … s cur_pc i (⊖N_op)).
-
-(* branch always *)
-ndefinition execute_BRA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_any_BRANCH … s cur_pc i true.
-
-(* if Mn=0 branch *)
-ndefinition execute_BRCLRn ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_BRCLRn_BRSETn_aux … s cur_pc i
- (λMn_op.eq_b8 Mn_op 〈x0,x0〉).
-
-(* branch never... come se fosse un nop da 2 byte *)
-ndefinition execute_BRN ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_any_BRANCH … s cur_pc i false.
-
-(* if Mn=1 branch *)
-ndefinition execute_BRSETn ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_BRCLRn_BRSETn_aux … s cur_pc i
- (λMn_op.⊖(eq_b8 Mn_op 〈x0,x0〉)).
-
-(* Mn = 1 *)
-ndefinition execute_BSETn ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_BCLRn_BSETn_aux … s cur_pc i 〈xF,xF〉.
-
-(* branch to subroutine *)
-(* HC05/HC08/HCS08 si appoggiano allo stack, RS08 a SPC *)
-ndefinition execute_BSR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t .λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒ let aux ≝
- (* push (new_pc low) *)
- opt_map … (aux_push … s_tmp1 (cnL ? new_pc))
- (* push (new_pc high) *)
- (λs_tmp2.opt_map … (aux_push … s_tmp2 (cnH ? new_pc))
- (* new_pc = new_pc + rel *)
- (λs_tmp3.Some ? (pair … s_tmp3 (branched_pc … s_tmp3 new_pc M_op))))
- in match m with
- [ HC05 ⇒ aux | HC08 ⇒ aux | HCS08 ⇒ aux
- | RS08 ⇒
- (* SPC = new_pc *)
- opt_map … (set_spc_reg … s_tmp1 new_pc)
- (* new_pc = new_pc + rel *)
- (λs_tmp2.Some ? (pair … s_tmp2 (branched_pc … s_tmp2 new_pc M_op)))
- | _ ⇒ None ?
- ]]).
-
-(* if A=M, branch *)
-ndefinition execute_CBEQA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadw … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- match M_op with
- [ mk_comp_num MH_op ML_op ⇒
- (* if A=M, branch *)
- match eq_b8 (get_acc_8_low_reg … s_tmp1) MH_op with
- (* new_pc = new_pc + rel *)
- [ true ⇒ Some ? (pair … s_tmp1 (branched_pc … s_tmp1 new_pc ML_op))
- (* new_pc = new_pc *)
- | false ⇒ Some ? (pair … s_tmp1 new_pc)
- ]]]).
-
-(* if X=M, branch *)
-ndefinition execute_CBEQX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadw … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- match M_op with
- [ mk_comp_num MH_op ML_op ⇒
- opt_map … (get_indX_8_low_reg … s_tmp1)
- (* if X=M, branch *)
- (λX_op.match eq_b8 X_op MH_op with
- (* new_pc = new_pc + rel *)
- [ true ⇒ Some ? (pair … s_tmp1 (branched_pc … s_tmp1 new_pc ML_op))
- (* new_pc = new_pc *)
- | false ⇒ Some ? (pair … s_tmp1 new_pc)
- ])]]).
-
-(* C = 0 *)
-ndefinition execute_CLC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- Some ? (pair … (set_c_flag … s false) cur_pc).
-
-(* I = 0 *)
-ndefinition execute_CLI ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (set_i_flag … s false)
- (λs_tmp.Some ? (pair … s_tmp cur_pc)).
-
-(* M = 0 *)
-ndefinition execute_CLR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- (* M = 0 *)
- opt_map … (multi_mode_writeb … s cur_pc auxMode_ok i 〈x0,x0〉)
- (λS_PC.match S_PC with
- [ pair s_tmp1 new_pc ⇒
- (* Z = 1 *)
- let s_tmp2 ≝ set_z_flag … s_tmp1 true in
- (* N = 0 *)
- let s_tmp3 ≝ setweak_n_flag … s_tmp2 false in
- (* V = 0 *)
- let s_tmp4 ≝ setweak_v_flag … s_tmp3 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp4 new_pc) ]).
-
-(* flags = A - M *)
-ndefinition execute_CMP ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_CMP_SBC_SUB_aux … s cur_pc i false (λC_op.λA_op.λM_op.plus_b8_dc_dc false A_op (compl_b8 M_op)).
-
-(* M = not M *)
-ndefinition execute_COM ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_COM_DEC_INC_NEG_aux … s cur_pc i not_b8
- (* fV = 0 *)
- (λM7.λR7.false)
- (* fC = 1 *)
- (λC_op.λR_op.true).
-
-(* flags = H:X - M *)
-ndefinition execute_CPHX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadw … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- opt_map … (get_indX_16_reg … s_tmp1)
- (λX_op.
- match plus_w16_dc_dc false X_op (compl_w16 M_op) with
- [ pair carry R_op ⇒
- let X15 ≝ getMSB_w16 X_op in
- let M15 ≝ getMSB_w16 M_op in
- let R15 ≝ getMSB_w16 R_op in
- (* Z = nR15&nR14&nR13&nR12&nR11&nR10&nR9&nR8&nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp2 ≝ set_zflw … s_tmp1 R_op in
- (* C = nX15&M15 | M15&R15 | R15&nX15 *)
- let s_tmp3 ≝ set_c_flag … s_tmp2 (((⊖X15)⊗M15) ⊕ (M15⊗R15) ⊕ (R15⊗(⊖X15))) in
- (* N = R15 *)
- let s_tmp4 ≝ set_nflw … s_tmp3 R_op in
- (* V = X15&nM15&nR15 | nX15&M15&R15 *)
- let s_tmp5 ≝ setweak_v_flag … s_tmp4 ((X15⊗(⊖M15)⊗(⊖R15)) ⊕ ((⊖X15)⊗M15⊗R15)) in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp5 new_pc) ] ) ]).
-
-(* flags = X - M *)
-ndefinition execute_CPX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- opt_map … (get_indX_8_low_reg … s_tmp1)
- (λX_op.
- match plus_b8_dc_dc false X_op (compl_b8 M_op) with
- [ pair carry R_op ⇒
- let X7 ≝ getMSB_b8 X_op in
- let M7 ≝ getMSB_b8 M_op in
- let R7 ≝ getMSB_b8 R_op in
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp2 ≝ set_zflb … s_tmp1 R_op in
- (* C = nX7&M7 | M7&R7 | R7&nX7 *)
- let s_tmp3 ≝ set_c_flag … s_tmp2 (((⊖X7)⊗M7) ⊕ (M7⊗R7) ⊕ (R7⊗(⊖X7))) in
- (* N = R7 *)
- let s_tmp4 ≝ set_nflb … s_tmp3 R_op in
- (* V = X7&nM7&nR7 | nX7&M7&R7 *)
- let s_tmp5 ≝ setweak_v_flag … s_tmp4 ((X7⊗(⊖M7)⊗(⊖R7)) ⊕ ((⊖X7)⊗M7⊗R7)) in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp5 new_pc) ] ) ]).
-
-(* decimal adjiust A *)
-(* per i dettagli vedere daa_b8 (modulo byte8) *)
-ndefinition execute_DAA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_h_flag … s)
- (λH.
- let M_op ≝ get_acc_8_low_reg … s in
- match daa_b8 H (get_c_flag … s) M_op with
- [ pair carry R_op ⇒
- (* A = R *)
- let s_tmp1 ≝ set_acc_8_low_reg … s R_op in
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp2 ≝ set_zflb … s_tmp1 R_op in
- (* C = carry *)
- let s_tmp3 ≝ set_c_flag … s_tmp2 carry in
- (* N = R7 *)
- let s_tmp4 ≝ set_nflb … s_tmp3 R_op in
- (* V = M7 ⊙ R7 *)
- let s_tmp5 ≝ setweak_v_flag … s_tmp4 ((getMSB_b8 M_op) ⊙ (getMSB_b8 R_op)) in
- (* newpc = curpc *)
- Some ? (pair … s_tmp5 cur_pc) ]).
-
-(* if (--M)≠0, branch *)
-ndefinition execute_DBNZ ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadw … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- match M_op with
- [ mk_comp_num MH_op ML_op ⇒
- (* --M *)
- let MH_op' ≝ pred_b8 MH_op in
- opt_map … (multi_mode_writeb … s_tmp1 cur_pc auxMode_ok i MH_op')
- (λS_PC.match S_PC with
- [ pair s_tmp2 _ ⇒
- (* if (--M)≠0, branch *)
- match eq_b8 MH_op' 〈x0,x0〉 with
- (* new_pc = new_pc *)
- [ true ⇒ Some ? (pair … s_tmp2 new_pc)
- (* new_pc = new_pc + rel *)
- | false ⇒ Some ? (pair … s_tmp2 (branched_pc … s_tmp2 new_pc ML_op)) ]])]]).
-
-(* M = M - 1 *)
-ndefinition execute_DEC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_COM_DEC_INC_NEG_aux … s cur_pc i pred_b8
- (* fV = M7&nR7 *)
- (λM7.λR7.M7⊗(⊖R7))
- (* fC = C *)
- (λC_op.λR_op.C_op).
-
-(* A = H:A/X, H = H:AmodX se non c'e' overflow, altrimenti invariati *)
-(* per i dettagli vedere div_b8 (modulo word16) *)
-ndefinition execute_DIV ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_indX_8_high_reg … s)
- (λH_op.opt_map … (get_indX_8_low_reg … s)
- (λX_op.match div_b8 〈H_op:(get_acc_8_low_reg … s)〉 X_op with
- [ triple quoz rest overflow ⇒
- (* C = overflow *)
- let s_tmp1 ≝ set_c_flag … s overflow in
- (* A = A o H:A/X *)
- let s_tmp2 ≝ match overflow with
- [ true ⇒ s_tmp1
- | false ⇒ set_acc_8_low_reg … s_tmp1 quoz ] in
- (* Z = nA7&nA6&nA5&nA4&nA3&nA2&nA1&nA0 *)
- (* NB: che A sia cambiato o no, lo testa *)
- let s_tmp3 ≝ set_zflb … s_tmp2 (get_acc_8_low_reg … s_tmp2) in
- (* H = H o H:AmodX *)
- opt_map … (match overflow with
- [ true ⇒ Some ? s_tmp3
- | false ⇒ set_indX_8_high_reg … s_tmp3 rest])
- (λs_tmp4.Some ? (pair … s_tmp4 cur_pc)) ])).
-
-(* A = A ⊙ M *)
-ndefinition execute_EOR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_AND_BIT_EOR_ORA_aux … s cur_pc i true xor_b8.
-
-(* M = M + 1 *)
-ndefinition execute_INC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_COM_DEC_INC_NEG_aux … s cur_pc i succ_b8
- (* fV = nM7&R7 *)
- (λM7.λR7.(⊖M7)⊗R7)
- (* fC = C *)
- (λC_op.λR_op.C_op).
-
-(* jmp, il nuovo indirizzo e' una WORD *)
-ndefinition execute_JMP ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadw … s cur_pc i)
- (λS_M_PC.
- (* newpc = M_op *)
- Some ? (pair … (fst3T … S_M_PC) (snd3T … S_M_PC))).
-
-(* jump to subroutine *)
-(* HC05/HC08/HCS08 si appoggiano allo stack, RS08 a SPC *)
-ndefinition execute_JSR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadw … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒ let aux ≝
- (* push (new_pc low) *)
- opt_map … (aux_push … s_tmp1 (cnL ? new_pc))
- (* push (new_pc high) *)
- (λs_tmp2.opt_map … (aux_push … s_tmp2 (cnH ? new_pc))
- (* newpc = M_op *)
- (λs_tmp3.Some ? (pair … s_tmp3 M_op)))
- in match m with
- [ HC05 ⇒ aux | HC08 ⇒ aux | HCS08 ⇒ aux
- | RS08 ⇒
- (* SPC = new_pc *)
- opt_map … (set_spc_reg … s_tmp1 new_pc)
- (* newpc = M_op *)
- (λs_tmp2.Some ? (pair … s_tmp2 M_op))
- | _ ⇒ None ?
- ]]).
-
-(* A = M *)
-ndefinition execute_LDA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- (* A = M *)
- let s_tmp2 ≝ set_acc_8_low_reg … s_tmp1 M_op in
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp3 ≝ set_zflb … s_tmp2 M_op in
- (* N = R7 *)
- let s_tmp4 ≝ set_nflb … s_tmp3 M_op in
- (* V = 0 *)
- let s_tmp5 ≝ setweak_v_flag … s_tmp4 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp5 new_pc) ]).
-
-(* H:X = M *)
-ndefinition execute_LDHX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadw … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- opt_map … (set_indX_16_reg … s_tmp1 M_op)
- (λs_tmp2.
- (* Z = nR15&nR14&nR13nR12&nR11&nR10&nR9&nR8nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp3 ≝ set_zflw … s_tmp2 M_op in
- (* N = R15 *)
- let s_tmp4 ≝ set_nflw … s_tmp3 M_op in
- (* V = 0 *)
- let s_tmp5 ≝ setweak_v_flag … s_tmp4 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp5 new_pc)) ]).
-
-(* X = M *)
-ndefinition execute_LDX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- opt_map … (set_indX_8_low_reg … s_tmp1 M_op)
- (λs_tmp2.
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp3 ≝ set_zflb … s_tmp2 M_op in
- (* N = R7 *)
- let s_tmp4 ≝ set_nflb … s_tmp3 M_op in
- (* V = 0 *)
- let s_tmp5 ≝ setweak_v_flag … s_tmp4 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp5 new_pc)) ]).
-
-(* M = 0 -> rcr M -> C' *)
-ndefinition execute_LSR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_ASL_ASR_LSR_ROL_ROR_aux … s cur_pc i (λC_op.λM_op.rcr_b8 false M_op).
-
-(* M2 = M1 *)
-ndefinition execute_MOV ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- (* R_op = M1 *)
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_R_PC.match S_R_PC with
- [ triple s_tmp1 R_op tmp_pc ⇒
- (* M2 = R_op *)
- opt_map … (multi_mode_writeb … s_tmp1 tmp_pc auxMode_ok i R_op)
- (λS_PC.match S_PC with
- [ pair s_tmp2 new_pc ⇒
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp3 ≝ set_zflb … s_tmp2 R_op in
- (* N = R7 *)
- let s_tmp4 ≝ set_nflb … s_tmp3 R_op in
- (* V = 0 *)
- let s_tmp5 ≝ setweak_v_flag … s_tmp4 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp5 new_pc)])]).
-
-(* X:A = X * A *)
-ndefinition execute_MUL ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_indX_8_low_reg … s)
- (λX_op.let R_op ≝ mulu_b8 X_op (get_acc_8_low_reg … s) in
- opt_map … (set_indX_8_low_reg … s (cnH ? R_op))
- (λs_tmp.Some ? (pair … (set_acc_8_low_reg … s_tmp (cnL ? R_op)) cur_pc))).
-
-(* M = compl M *)
-ndefinition execute_NEG ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_COM_DEC_INC_NEG_aux … s cur_pc i compl_b8
- (* fV = M7&R7 *)
- (λM7.λR7.M7⊗R7)
- (* fC = R7|R6|R5|R4|R3|R2|R1|R0 *)
- (λC_op.λR_op.⊖(eq_b8 R_op 〈x0,x0〉)).
-
-(* nulla *)
-ndefinition execute_NOP ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- Some ? (pair … s cur_pc).
-
-(* A = (mk_byte8 (b8l A) (b8h A)) *)
-(* cioe' swap del nibble alto/nibble basso di A *)
-ndefinition execute_NSA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- match get_acc_8_low_reg … s with [ mk_comp_num ah al ⇒
- (* A = (mk_byte8 (b8l A) (b8h A)) *)
- Some ? (pair … (set_acc_8_low_reg … s 〈al,ah〉) cur_pc) ].
-
-(* A = A | M *)
-ndefinition execute_ORA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_AND_BIT_EOR_ORA_aux … s cur_pc i true or_b8.
-
-(* push A *)
-ndefinition execute_PSHA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (aux_push … s (get_acc_8_low_reg … s))
- (λs_tmp1.Some ? (pair … s_tmp1 cur_pc)).
-
-(* push H *)
-ndefinition execute_PSHH ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_indX_8_high_reg … s)
- (λH_op.opt_map … (aux_push … s H_op)
- (λs_tmp1.Some ? (pair … s_tmp1 cur_pc))).
-
-(* push X *)
-ndefinition execute_PSHX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_indX_8_low_reg … s)
- (λH_op.opt_map … (aux_push … s H_op)
- (λs_tmp1.Some ? (pair … s_tmp1 cur_pc))).
-
-(* pop A *)
-ndefinition execute_PULA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (aux_pop … s)
- (λS_and_A.match S_and_A with [ pair s_tmp1 A_op ⇒
- Some ? (pair … (set_acc_8_low_reg … s_tmp1 A_op) cur_pc) ]).
-
-(* pop H *)
-ndefinition execute_PULH ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (aux_pop … s)
- (λS_and_H.match S_and_H with [ pair s_tmp1 H_op ⇒
- opt_map … (set_indX_8_high_reg … s_tmp1 H_op)
- (λs_tmp2.Some ? (pair … s_tmp2 cur_pc))]).
-
-(* pop X *)
-ndefinition execute_PULX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (aux_pop … s)
- (λS_and_X.match S_and_X with [ pair s_tmp1 X_op ⇒
- opt_map … (set_indX_8_low_reg … s_tmp1 X_op)
- (λs_tmp2.Some ? (pair … s_tmp2 cur_pc))]).
-
-(* M = C' <- rcl M <- C *)
-ndefinition execute_ROL ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_ASL_ASR_LSR_ROL_ROR_aux … s cur_pc i rcl_b8.
-
-(* M = C -> rcr M -> C' *)
-ndefinition execute_ROR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_ASL_ASR_LSR_ROL_ROR_aux … s cur_pc i rcr_b8.
-
-(* SP = 0xuuFF *)
-(* lascia inalterato il byte superiore di SP *)
-ndefinition execute_RSP ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_sp_reg … s)
- (λSP_op.match SP_op with [ mk_comp_num sph spl ⇒
- opt_map … (set_sp_reg … s 〈sph:〈xF,xF〉〉)
- (λs_tmp.Some ? (pair … s_tmp cur_pc))]).
-
-(* return from interrupt *)
-ndefinition execute_RTI ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- (* pop (CCR) *)
- opt_map … (aux_pop … s)
- (λS_and_CCR.match S_and_CCR with [ pair s_tmp1 CCR_op ⇒
- let s_tmp2 ≝ aux_set_CCR … s_tmp1 CCR_op in
- (* pop (A) *)
- opt_map … (aux_pop … s_tmp2)
- (λS_and_A.match S_and_A with [ pair s_tmp3 A_op ⇒
- let s_tmp4 ≝ set_acc_8_low_reg … s_tmp3 A_op in
- (* pop (X) *)
- opt_map … (aux_pop … s_tmp4)
- (λS_and_X.match S_and_X with [ pair s_tmp5 X_op ⇒
- opt_map … (set_indX_8_low_reg … s_tmp5 X_op)
- (* pop (PC high) *)
- (λs_tmp6.opt_map … (aux_pop … s_tmp6)
- (λS_and_PCH.match S_and_PCH with [ pair s_tmp7 PCH_op ⇒
- (* pop (PC low) *)
- opt_map … (aux_pop … s_tmp7)
- (λS_and_PCL.match S_and_PCL with [ pair s_tmp8 PCL_op ⇒
- Some ? (pair … s_tmp8 〈PCH_op:PCL_op〉)])]))])])]).
-
-(* return from subroutine *)
-(* HC05/HC08/HCS08 si appoggia allo stack, RS08 si appoggia a SPC *)
-ndefinition execute_RTS ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- let aux ≝
- (* pop (PC high) *)
- opt_map … (aux_pop … s)
- (λS_and_PCH.match S_and_PCH with [ pair s_tmp1 PCH_op ⇒
- (* pop (PC low) *)
- opt_map … (aux_pop … s_tmp1)
- (λS_and_PCL.match S_and_PCL with [ pair s_tmp2 PCL_op ⇒
- Some ? (pair … s_tmp2 〈PCH_op:PCL_op〉)])])
- in match m with
- [ HC05 ⇒ aux | HC08 ⇒ aux | HCS08 ⇒ aux
- | RS08 ⇒
- (* new_pc = SPC *)
- opt_map … (get_spc_reg … s)
- (λSPC_op.Some ? (pair … s SPC_op))
- | _ ⇒ None ?
- ].
-
-(* A = A - M - C *)
-ndefinition execute_SBC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_CMP_SBC_SUB_aux … s cur_pc i true
- (λC_op.λA_op.λM_op.match plus_b8_dc_dc false A_op (compl_b8 M_op) with
- [ pair resc resb ⇒ match C_op with
- [ true ⇒ plus_b8_dc_dc false resb 〈xF,xF〉
- | false ⇒ pair … resc resb ]]).
-
-(* C = 1 *)
-ndefinition execute_SEC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- Some ? (pair … (set_c_flag … s true) cur_pc).
-
-(* I = 1 *)
-ndefinition execute_SEI ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (set_i_flag … s true)
- (λs_tmp.Some ? (pair … s_tmp cur_pc)).
-
-(* swap SPCh,A *)
-(* senso: nell'RS08 SPC non e' accessibile direttamente e come si possono
- fare subroutine annidate se RA (return address) e' salvato sempre in SPC?
- occore accedere a SPC e salvarne il contenuto *)
-ndefinition execute_SHA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_spc_reg … s)
- (λSPC_op.opt_map … (set_spc_reg … s 〈(get_acc_8_low_reg … s):(cnL ? SPC_op)〉)
- (λs_tmp1.Some ? (pair … (set_acc_8_low_reg … s_tmp1 (cnH ? SPC_op)) cur_pc))).
-
-(* swap SPCl,A *)
-(* senso: nell'RS08 SPC non e' accessibile direttamente e come si possono
- fare subroutine annidate se RA (return address) e' salvato sempre in SPC?
- occore accedere a SPC e salvarne il contenuto *)
-ndefinition execute_SLA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_spc_reg … s)
- (λSPC_op.opt_map … (set_spc_reg … s 〈(cnH ? SPC_op):(get_acc_8_low_reg … s)〉)
- (λs_tmp1.Some ? (pair … (set_acc_8_low_reg … s_tmp1 (cnL ? SPC_op)) cur_pc))).
-
-(* M = A *)
-ndefinition execute_STA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- (* M = A *)
- let A_op ≝ (get_acc_8_low_reg … s) in
- opt_map … (multi_mode_writeb … s cur_pc auxMode_ok i A_op)
- (λS_op_and_PC.match S_op_and_PC with
- [ pair s_tmp1 new_pc ⇒
- (* Z = nA7&nA6&nA5&nA4&nA3&nA2&nA1&nA0 *)
- let s_tmp2 ≝ set_zflb … s_tmp1 A_op in
- (* N = A7 *)
- let s_tmp3 ≝ set_nflb … s_tmp2 A_op in
- (* V = 0 *)
- let s_tmp4 ≝ setweak_v_flag … s_tmp3 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp4 new_pc) ]).
-
-(* M = H:X *)
-ndefinition execute_STHX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- (* M = H:X *)
- opt_map … (get_indX_16_reg … s)
- (λX_op.opt_map … (multi_mode_writew … s cur_pc i X_op)
- (λS_op_and_PC.match S_op_and_PC with
- [ pair s_tmp1 new_pc ⇒
- (* Z = nR15&nR14&nR13nR12&nR11&nR10&nR9&nR8nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp2 ≝ set_zflw … s_tmp1 X_op in
- (* N = R15 *)
- let s_tmp3 ≝ set_nflw … s_tmp2 X_op in
- (* V = 0 *)
- let s_tmp4 ≝ setweak_v_flag … s_tmp3 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp4 new_pc) ])).
-
-(* I = 0 *)
-ndefinition execute_STOP ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- Some ? (pair … (setweak_i_flag … s false) cur_pc).
-
-(* M = X *)
-ndefinition execute_STX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- (* M = X *)
- opt_map … (get_indX_8_low_reg … s)
- (λX_op.opt_map … (multi_mode_writeb … s cur_pc auxMode_ok i X_op)
- (λS_op_and_PC.match S_op_and_PC with
- [ pair s_tmp1 new_pc ⇒
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp2 ≝ set_zflb … s_tmp1 X_op in
- (* N = R7 *)
- let s_tmp3 ≝ set_nflb … s_tmp2 X_op in
- (* V = 0 *)
- let s_tmp4 ≝ setweak_v_flag … s_tmp3 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp4 new_pc) ])).
-
-(* A = A - M *)
-ndefinition execute_SUB ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_CMP_SBC_SUB_aux … s cur_pc i true (λC_op.λA_op.λM_op.plus_b8_dc_dc false A_op (compl_b8 M_op)).
-
-(* software interrupt *)
-ndefinition execute_SWI ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- (* indirizzo da cui caricare il nuovo pc *)
- let vector ≝ extu_w32 (get_pc_reg … (set_pc_reg … s 〈〈xF,xF〉:〈xF,xC〉〉)) in
- (* push (cur_pc low) *)
- opt_map … (aux_push … s (cnL ? cur_pc))
- (* push (cur_pc high *)
- (λs_tmp1.opt_map … (aux_push … s_tmp1 (cnH ? cur_pc))
- (λs_tmp2.opt_map … (get_indX_8_low_reg … s_tmp2)
- (* push (X) *)
- (λX_op.opt_map … (aux_push … s_tmp2 X_op)
- (* push (A) *)
- (λs_tmp3.opt_map … (aux_push … s_tmp3 (get_acc_8_low_reg … s_tmp3))
- (* push (CCR) *)
- (λs_tmp4.opt_map … (aux_push … s_tmp4 (aux_get_CCR … s_tmp4))
- (* I = 1 *)
- (λs_tmp5.opt_map … (set_i_flag … s_tmp5 true)
- (* load from vector high *)
- (λs_tmp6.opt_map … (memory_filter_read … s_tmp6 vector)
- (* load from vector low *)
- (λaddrh.opt_map … (memory_filter_read … s_tmp6 (succ_w32 vector))
- (* newpc = [vector] *)
- (λaddrl.Some ? (pair … s_tmp6 〈addrh:addrl〉)))))))))).
-
-(* flags = A *)
-ndefinition execute_TAP ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- Some ? (pair … (aux_set_CCR … s (get_acc_8_low_reg … s)) cur_pc).
-
-(* X = A *)
-ndefinition execute_TAX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (set_indX_8_low_reg … s (get_acc_8_low_reg … s))
- (λs_tmp.Some ? (pair … s_tmp cur_pc)).
-
-(* A = flags *)
-ndefinition execute_TPA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- Some ? (pair … (set_acc_8_low_reg … s (aux_get_CCR … s)) cur_pc).
-
-(* flags = M - 0 *)
-(* implementata senza richiamare la sottrazione, la modifica dei flag
- e' immediata *)
-ndefinition execute_TST ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp2 ≝ set_zflb … s_tmp1 M_op in
- (* N = R7 *)
- let s_tmp3 ≝ set_nflb … s_tmp2 M_op in
- (* V = 0 *)
- let s_tmp4 ≝ setweak_v_flag … s_tmp3 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp4 new_pc) ]).
-
-(* H:X = SP + 1 *)
-ndefinition execute_TSX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_sp_reg … s )
- (λSP_op.opt_map … (set_indX_16_reg … s (succ_w16 SP_op))
- (* H:X = SP + 1 *)
- (λs_tmp.Some ? (pair … s_tmp cur_pc))).
-
-(* A = X *)
-ndefinition execute_TXA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_indX_8_low_reg … s)
- (λX_op.Some ? (pair … (set_acc_8_low_reg … s X_op) cur_pc)).
-
-(* SP = H:X - 1 *)
-ndefinition execute_TXS ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_indX_16_reg … s )
- (λX_op.opt_map … (set_sp_reg … s (pred_w16 X_op))
- (* SP = H:X - 1 *)
- (λs_tmp.Some ? (pair … s_tmp cur_pc))).
-
-(* I = 0 *)
-ndefinition execute_WAIT ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- Some ? (pair … (setweak_i_flag … s false) cur_pc).
-
-(* raccordo *)
-ndefinition Freescale_execute_any ≝
-λps:Freescale_pseudo.match ps with
- [ ADC ⇒ execute_ADC (* add with carry *)
- | ADD ⇒ execute_ADD (* add *)
- | AIS ⇒ execute_AIS (* add immediate to SP *)
- | AIX ⇒ execute_AIX (* add immediate to X *)
- | AND ⇒ execute_AND (* and *)
- | ASL ⇒ execute_ASL (* aritmetic shift left *)
- | ASR ⇒ execute_ASR (* aritmetic shift right *)
- | BCC ⇒ execute_BCC (* branch if C=0 *)
- | BCLRn ⇒ execute_BCLRn (* clear bit n *)
- | BCS ⇒ execute_BCS (* branch if C=1 *)
- | BEQ ⇒ execute_BEQ (* branch if Z=1 *)
- | BGE ⇒ execute_BGE (* branch if N⊙V=0 (great or equal) *)
- | BGND ⇒ execute_BGND (* !!background mode!!*)
- | BGT ⇒ execute_BGT (* branch if Z|N⊙V=0 clear (great) *)
- | BHCC ⇒ execute_BHCC (* branch if H=0 *)
- | BHCS ⇒ execute_BHCS (* branch if H=1 *)
- | BHI ⇒ execute_BHI (* branch if C|Z=0, (higher) *)
- | BIH ⇒ execute_BIH (* branch if nIRQ=1 *)
- | BIL ⇒ execute_BIL (* branch if nIRQ=0 *)
- | BIT ⇒ execute_BIT (* flag = and (bit test) *)
- | BLE ⇒ execute_BLE (* branch if Z|N⊙V=1 (less or equal) *)
- | BLS ⇒ execute_BLS (* branch if C|Z=1 (lower or same) *)
- | BLT ⇒ execute_BLT (* branch if N⊙1=1 (less) *)
- | BMC ⇒ execute_BMC (* branch if I=0 (interrupt mask clear) *)
- | BMI ⇒ execute_BMI (* branch if N=1 (minus) *)
- | BMS ⇒ execute_BMS (* branch if I=1 (interrupt mask set) *)
- | BNE ⇒ execute_BNE (* branch if Z=0 *)
- | BPL ⇒ execute_BPL (* branch if N=0 (plus) *)
- | BRA ⇒ execute_BRA (* branch always *)
- | BRCLRn ⇒ execute_BRCLRn (* branch if bit n clear *)
- | BRN ⇒ execute_BRN (* branch never (nop) *)
- | BRSETn ⇒ execute_BRSETn (* branch if bit n set *)
- | BSETn ⇒ execute_BSETn (* set bit n *)
- | BSR ⇒ execute_BSR (* branch to subroutine *)
- | CBEQA ⇒ execute_CBEQA (* compare (A) and BEQ *)
- | CBEQX ⇒ execute_CBEQX (* compare (X) and BEQ *)
- | CLC ⇒ execute_CLC (* C=0 *)
- | CLI ⇒ execute_CLI (* I=0 *)
- | CLR ⇒ execute_CLR (* operand=0 *)
- | CMP ⇒ execute_CMP (* flag = sub (compare A) *)
- | COM ⇒ execute_COM (* not (1 complement) *)
- | CPHX ⇒ execute_CPHX (* flag = sub (compare H:X) *)
- | CPX ⇒ execute_CPX (* flag = sub (compare X) *)
- | DAA ⇒ execute_DAA (* decimal adjust A *)
- | DBNZ ⇒ execute_DBNZ (* dec and BNE *)
- | DEC ⇒ execute_DEC (* operand=operand-1 (decrement) *)
- | DIV ⇒ execute_DIV (* div *)
- | EOR ⇒ execute_EOR (* xor *)
- | INC ⇒ execute_INC (* operand=operand+1 (increment) *)
- | JMP ⇒ execute_JMP (* jmp word [operand] *)
- | JSR ⇒ execute_JSR (* jmp to subroutine *)
- | LDA ⇒ execute_LDA (* load in A *)
- | LDHX ⇒ execute_LDHX (* load in H:X *)
- | LDX ⇒ execute_LDX (* load in X *)
- | LSR ⇒ execute_LSR (* logical shift right *)
- | MOV ⇒ execute_MOV (* move *)
- | MUL ⇒ execute_MUL (* mul *)
- | NEG ⇒ execute_NEG (* neg (2 complement) *)
- | NOP ⇒ execute_NOP (* nop *)
- | NSA ⇒ execute_NSA (* nibble swap A (al:ah <- ah:al) *)
- | ORA ⇒ execute_ORA (* or *)
- | PSHA ⇒ execute_PSHA (* push A *)
- | PSHH ⇒ execute_PSHH (* push H *)
- | PSHX ⇒ execute_PSHX (* push X *)
- | PULA ⇒ execute_PULA (* pop A *)
- | PULH ⇒ execute_PULH (* pop H *)
- | PULX ⇒ execute_PULX (* pop X *)
- | ROL ⇒ execute_ROL (* rotate left *)
- | ROR ⇒ execute_ROR (* rotate right *)
- | RSP ⇒ execute_RSP (* reset SP (0x00FF) *)
- | RTI ⇒ execute_RTI (* return from interrupt *)
- | RTS ⇒ execute_RTS (* return from subroutine *)
- | SBC ⇒ execute_SBC (* sub with carry*)
- | SEC ⇒ execute_SEC (* C=1 *)
- | SEI ⇒ execute_SEI (* I=1 *)
- | SHA ⇒ execute_SHA (* swap spc_high,A *)
- | SLA ⇒ execute_SLA (* swap spc_low,A *)
- | STA ⇒ execute_STA (* store from A *)
- | STHX ⇒ execute_STHX (* store from H:X *)
- | STOP ⇒ execute_STOP (* !!stop mode!! *)
- | STX ⇒ execute_STX (* store from X *)
- | SUB ⇒ execute_SUB (* sub *)
- | SWI ⇒ execute_SWI (* software interrupt *)
- | TAP ⇒ execute_TAP (* flag=A (transfer A to process status byte *)
- | TAX ⇒ execute_TAX (* X=A (transfer A to X) *)
- | TPA ⇒ execute_TPA (* A=flag (transfer process status byte to A) *)
- | TST ⇒ execute_TST (* flag = sub (test) *)
- | TSX ⇒ execute_TSX (* X:H=SP (transfer SP to H:X) *)
- | TXA ⇒ execute_TXA (* A=X (transfer X to A) *)
- | TXS ⇒ execute_TXS (* SP=X:H (transfer H:X to SP) *)
- | WAIT ⇒ execute_WAIT (* !!wait mode!!*)
- ].
-
-(* stati speciali di esecuzione *)
-ndefinition Freescale_check_susp ≝
-λps:Freescale_pseudo.match ps with
- [ BGND ⇒ Some ? BGND_MODE
- | STOP ⇒ Some ? STOP_MODE
- | WAIT ⇒ Some ? WAIT_MODE
- | _ ⇒ None ?
- ].
-
-(* istruzioni speciali per skip *)
-ndefinition Freescale_check_skip ≝
-λps:Freescale_pseudo.false.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/multivm/multivm_base.ma".
-include "emulator/read_write/load_write.ma".
-
-(* ************************************************ *)
-(* LOGICHE AUSILIARE CHE ACCOMUNANO PIU' OPERAZIONI *)
-(* ************************************************ *)
-
-(* **************** *)
-(* LOGICA DELLA ALU *)
-(* **************** *)
-
-ndefinition execute_NO ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- None (ProdT (any_status m t) word16).
-
-(* raccordo *)
-ndefinition IP2022_execute_any ≝
-λps:IP2022_pseudo.match ps with
- [ ADD ⇒ execute_NO (* add *)
- | ADDC ⇒ execute_NO (* add with carry *)
- | AND ⇒ execute_NO (* and *)
- | BREAK ⇒ execute_NO (* enter break mode *)
- | BREAKX ⇒ execute_NO (* enter break mode, after skip *)
- | CALL ⇒ execute_NO (* subroutine call *)
- | CLR ⇒ execute_NO (* clear *)
- | CLRB ⇒ execute_NO (* clear bit *)
- | CMP ⇒ execute_NO (* set flags according to sub *)
- | CSE ⇒ execute_NO (* confront & skip if equal *)
- | CSNE ⇒ execute_NO (* confront & skip if not equal *)
- | CWDT ⇒ execute_NO (* clear watch dog -- not impl. ERR *)
- | DEC ⇒ execute_NO (* decrement *)
- | DECSNZ ⇒ execute_NO (* decrement & skip if not zero *)
- | DECSZ ⇒ execute_NO (* decrement & skip if zero *)
- | FERASE ⇒ execute_NO (* flash erase -- not impl. ERR *)
- | FREAD ⇒ execute_NO (* flash read -- not impl. ERR *)
- | FWRITE ⇒ execute_NO (* flash write -- not impl. ERR *)
- | INC ⇒ execute_NO (* increment *)
- | INCSNZ ⇒ execute_NO (* increment & skip if not zero *)
- | INCSZ ⇒ execute_NO (* increment & skip if zero *)
- | INT ⇒ execute_NO (* interrupt -- not impl. ERR *)
- | IREAD ⇒ execute_NO (* memory read *)
- | IWRITE ⇒ execute_NO (* memory write *)
- | JMP ⇒ execute_NO (* jump *)
- | LOADH ⇒ execute_NO (* load Data Pointer High *)
- | LOADL ⇒ execute_NO (* load Data Pointer Low *)
- | MOV ⇒ execute_NO (* move *)
- | MULS ⇒ execute_NO (* signed mul *)
- | MULU ⇒ execute_NO (* unsigned mul *)
- | NOP ⇒ execute_NO (* nop *)
- | NOT ⇒ execute_NO (* not *)
- | OR ⇒ execute_NO (* or *)
- | PAGE ⇒ execute_NO (* set Page Register *)
- | POP ⇒ execute_NO (* pop *)
- | PUSH ⇒ execute_NO (* push *)
- | RET ⇒ execute_NO (* subroutine ret *)
- | RETI ⇒ execute_NO (* interrupt ret -- not impl. ERR *)
- | RETNP ⇒ execute_NO (* subroutine ret & don't restore Page Register *)
- | RETW ⇒ execute_NO (* subroutine ret & load W Register *)
- | RL ⇒ execute_NO (* rotate left *)
- | RR ⇒ execute_NO (* rotate right *)
- | SB ⇒ execute_NO (* skip if bit set *)
- | SETB ⇒ execute_NO (* set bit *)
- | SNB ⇒ execute_NO (* skip if bit not set *)
- | SPEED ⇒ execute_NO (* set Speed Register *)
- | SUB ⇒ execute_NO (* sub *)
- | SUBC ⇒ execute_NO (* sub with carry *)
- | SWAP ⇒ execute_NO (* swap xxxxyyyy → yyyyxxxx *)
- | TEST ⇒ execute_NO (* set flags according to zero test *)
- | XOR ⇒ execute_NO (* xor *)
- ].
-
-(* stati speciali di esecuzione *)
-ndefinition IP2022_check_susp ≝
-λps:IP2022_pseudo.match ps with
- [ BREAK ⇒ Some ? BGND_MODE
- | BREAKX ⇒ Some ? BGND_MODE
- | _ ⇒ None ?
- ].
-
-(* istruzioni speciali per skip *)
-ndefinition IP2022_check_skip ≝
-λps:IP2022_pseudo.match ps with
- [ LOADH ⇒ true
- | LOADL ⇒ true
- | PAGE ⇒ true
- | _ ⇒ false
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/multivm/Freescale_multivm.ma".
-include "emulator/multivm/IP2022_multivm.ma".
-include "emulator/read_write/fetch.ma".
-
-(* raccordo *)
-ndefinition execute_any ≝
-λm.match m
- return λm.aux_pseudo_type m → Πt.any_status m t → word16 →
- aux_im_type m → option (ProdT (any_status m t) word16)
- with
- [ HC05 ⇒ λps:aux_pseudo_type ?.Freescale_execute_any ps ?
- | HC08 ⇒ λps:aux_pseudo_type ?.Freescale_execute_any ps ?
- | HCS08 ⇒ λps:aux_pseudo_type ?.Freescale_execute_any ps ?
- | RS08 ⇒ λps:aux_pseudo_type ?.Freescale_execute_any ps ?
- | IP2022 ⇒ λps:aux_pseudo_type ?.IP2022_execute_any ps ?
- ].
-
-(* raccordo *)
-ndefinition check_susp_ps ≝
-λm.match m
- return λm.aux_pseudo_type m → option susp_type
- with
- [ HC05 ⇒ Freescale_check_susp
- | HC08 ⇒ Freescale_check_susp
- | HCS08 ⇒ Freescale_check_susp
- | RS08 ⇒ Freescale_check_susp
- | IP2022 ⇒ IP2022_check_susp
- ].
-
-ndefinition check_susp_s ≝
-λm,t.λs:any_status m t.
- opt_map … (get_speed_reg … s)
- (λspeed.match eq_ex speed xF with
- [ true ⇒ Some ? STOP_MODE
- | false ⇒ None ? ]).
-
-ndefinition check_susp ≝
-λm,t.λs:any_status m t.λps:aux_pseudo_type m.
- match check_susp_s … s with
- [ None ⇒ check_susp_ps m ps
- | Some susp ⇒ Some ? susp
- ].
-
-(* raccordo *)
-ndefinition check_skip ≝
-λm.match m
- return λm.aux_pseudo_type m → bool
- with
- [ HC05 ⇒ Freescale_check_skip
- | HC08 ⇒ Freescale_check_skip
- | HCS08 ⇒ Freescale_check_skip
- | RS08 ⇒ Freescale_check_skip
- | IP2022 ⇒ IP2022_check_skip
- ].
-
-(* **** *)
-(* TICK *)
-(* **** *)
-
-(* - errore: errore+stato (seguira' reset o …, cmq lo stato non va buttato)
- - sospensione: sospensione+stato (seguira' resume o …)
- - ok: stato *)
-ninductive tick_result (A:Type) : Type ≝
- TickERR : A → error_type → tick_result A
-| TickSUSP : A → susp_type → tick_result A
-| TickOK : A → tick_result A.
-
-(* l'esecuzione e' considerata atomica quindi nel caso di un'instruzione
- da 3 cicli la successione sara'
- ([fetch/decode] s,clk:None) →
- ( s,clk:Some 1,pseudo,mode,3,cur_pc) →
- ( s,clk:Some 2,pseudo,mode,3,cur_pc) →
- ([execute] s',clk:None) *)
-ndefinition tick_execute ≝
-λm,t.λs:any_status m t.
-λps:aux_pseudo_type m.λi:aux_im_type m.
-λcur_pc:word16.
- match execute_any m ps t s cur_pc i with
- (* errore! fine esecuzione *)
- [ None ⇒ TickERR ? (set_clk_desc … s (None ?)) ILL_FETCH_AD
- (* ok, aggiornamento centralizzato *)
- | Some S_newPC ⇒ match S_newPC with
- [ pair s_tmp1 new_pc ⇒
- (* clk azzerato *)
- let s_tmp2 ≝ set_clk_desc … s_tmp1 (None ?) in
- (* aggiornamento pc *)
- let s_tmp3 ≝ match eq_w16 (get_pc_reg … s) (get_pc_reg … s_tmp1) with
- (* ok, new_pc → pc *)
- [ true ⇒ set_pc_reg … s_tmp2 new_pc
- (* effetto collaterale modifica pc! scartare new_pc *)
- | false ⇒ s_tmp2 ] in
- match check_susp … s ps with
- (* esecuzione continua *)
- [ None ⇒ TickOK ? s_tmp3
- (* esecuzione sospesa *)
- | Some susp ⇒ TickSUSP ? s_tmp3 susp
- ]]].
-
-(* avanza fra fetch / countdown / execute *)
-ndefinition tick_skip_aux ≝
-λm,t.λs:any_status m t.
- match get_skip_mode … s with
- [ None ⇒ false
- | Some b ⇒ b ].
-
-ndefinition tick ≝
-λm,t.λs:any_status m t.
- match clk_desc … s with
- (* e' il momento del fetch *)
- [ None ⇒ match fetch … s with
- (* errore nel fetch/decode? riportato in output, nessun avanzamento *)
- [ FetchERR err ⇒ TickERR ? s err
- (* nessun errore nel fetch *)
- | FetchOK info cur_pc ⇒ match tick_skip_aux … s with
- (* skip mode! *)
- [ true ⇒ TickOK ? (set_clk_desc …
- (set_pc_reg …
- (match check_skip m (fst4T … info) with
- [ true ⇒ s | false ⇒ setweak_skip_mode … s false ]) cur_pc) (None ?))
- (* ciclo normale *)
- | false ⇒ match eq_b8 〈x0,x1〉 (fth4T … info) with
- (* un solo clk, execute subito *)
- [ true ⇒ tick_execute … s (fst4T … info) (snd4T … info) cur_pc
- (* piu' clk, execute rimandata *)
- | false ⇒ TickOK ? (set_clk_desc … s
- (Some ? (quintuple … 〈x0,x1〉 (fst4T … info) (snd4T … info)
- (fth4T … info) cur_pc)))
- ]
- ]
- ]
- (* fetch gia' eseguito, e' il turno di execute? *)
- | Some info ⇒ match eq_b8 (succ_b8 (fst5T … info)) (fth5T … info) with
- (* si *)
- [ true ⇒ tick_execute … s (snd5T … info) (thd5T … info) (fft5T … info)
- (* no, avanzamento cur_clk *)
- | false ⇒ TickOK ? (set_clk_desc … s
- (Some ? (quintuple … (succ_b8 (fst5T … info)) (snd5T … info)
- (thd5T … info) (fth5T … info) (fft5T … info))))
- ]
- ].
-
-(* ********** *)
-(* ESECUZIONE *)
-(* ********** *)
-
-nlet rec execute (m:mcu_type) (t:memory_impl) (s:tick_result (any_status m t)) (n:nat) on n ≝
- match s with
- [ TickERR s' error ⇒ TickERR ? s' error
- | TickSUSP s' susp ⇒ TickSUSP ? s' susp
- | TickOK s' ⇒ match n with [ O ⇒ TickOK ? s' | S n' ⇒ execute m t (tick m t s') n' ]
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/theory.ma".
-include "emulator/status/status_setter.ma".
-
-ndefinition set_zflb ≝
-λm,t.λs:any_status m t.λb.set_z_flag … s (eq_b8 b 〈x0,x0〉).
-ndefinition set_zflw ≝
-λm,t.λs:any_status m t.λw.set_z_flag … s (eq_w16 w 〈〈x0,x0〉:〈x0,x0〉〉).
-
-ndefinition set_nflb ≝
-λm,t.λs:any_status m t.λb.setweak_n_flag … s (getMSB_b8 b).
-ndefinition set_nflw ≝
-λm,t.λs:any_status m t.λw.setweak_n_flag … s (getMSB_w16 w).
-
-(* enumerazione delle possibili modalita' di sospensione *)
-ninductive susp_type : Type ≝
- BGND_MODE: susp_type
-| STOP_MODE: susp_type
-| WAIT_MODE: susp_type.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/multivm/multivm.ma".
-include "common/nat_lemmas.ma".
-
-nlemma breakpoint_err : ∀m,t,s,err,n.execute m t (TickERR ? s err) n = TickERR ? s err.
- #m; #t; #s; #err; #n;
- ncases n;
- ##[ ##2: #n1; ##]
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma breakpoint_susp : ∀m,t,s,susp,n.execute m t (TickSUSP ? s susp) n = TickSUSP ? s susp.
- #m; #t; #s; #susp; #n;
- ncases n;
- ##[ ##2: #n1; ##]
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma breakpoint :
- ∀m,t,n1,n2,s. execute m t s (n1 + n2) = execute m t (execute m t s n1) n2.
- #m; #t; #n1;
- nelim n1;
- ##[ ##1: nnormalize; #n2; #s; ncases s; nnormalize; ##[ ##1,2: #x ##] #y; napply refl_eq
- ##| ##2: #n3; #H; #n2; #s; ncases s;
- ##[ ##1: #x; #y; nnormalize; nrewrite > (breakpoint_err m t x y n2); napply refl_eq
- ##| ##2: #x; #y; nnormalize; nrewrite > (breakpoint_susp m t x y n2); napply refl_eq
- ##| ##3: #x; nrewrite > (Sn_p_n_to_S_npn n3 n2);
- nchange with ((execute m t (tick m t x) (n3+n2)) =
- (execute m t (execute m t (tick m t x) n3) n2));
- nrewrite > (H n2 (tick m t x));
- napply refl_eq
- ##]
- ##]
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/word16.ma".
-
-(* ********************************************** *)
-(* MATTONI BASE PER DEFINIRE LE TABELLE DELLE MCU *)
-(* ********************************************** *)
-
-(* enumerazione delle modalita' di indirizzamento = caricamento degli operandi *)
-ninductive Freescale_instr_mode: Type ≝
- (* INHERENT = nessun operando *)
- MODE_INH : Freescale_instr_mode
- (* INHERENT = nessun operando (A implicito) *)
-| MODE_INHA : Freescale_instr_mode
- (* INHERENT = nessun operando (X implicito) *)
-| MODE_INHX : Freescale_instr_mode
- (* INHERENT = nessun operando (H implicito) *)
-| MODE_INHH : Freescale_instr_mode
-
- (* INHERENT_ADDRESS = nessun operando (HX implicito) *)
-| MODE_INHX0ADD : Freescale_instr_mode
- (* INHERENT_ADDRESS = nessun operando (HX implicito+0x00bb) *)
-| MODE_INHX1ADD : Freescale_instr_mode
- (* INHERENT_ADDRESS = nessun operando (HX implicito+0xwwww) *)
-| MODE_INHX2ADD : Freescale_instr_mode
-
- (* IMMEDIATE = operando valore immediato byte = 0xbb *)
-| MODE_IMM1 : Freescale_instr_mode
- (* IMMEDIATE_EXT = operando valore immediato byte = 0xbb -> esteso a word *)
-| MODE_IMM1EXT : Freescale_instr_mode
- (* IMMEDIATE = operando valore immediato word = 0xwwww *)
-| MODE_IMM2 : Freescale_instr_mode
- (* DIRECT = operando offset byte = [0x00bb] *)
-| MODE_DIR1 : Freescale_instr_mode
- (* DIRECT = operando offset word = [0xwwww] *)
-| MODE_DIR2 : Freescale_instr_mode
- (* INDEXED = nessun operando (implicito [X] *)
-| MODE_IX0 : Freescale_instr_mode
- (* INDEXED = operando offset relativo byte = [X+0x00bb] *)
-| MODE_IX1 : Freescale_instr_mode
- (* INDEXED = operando offset relativo word = [X+0xwwww] *)
-| MODE_IX2 : Freescale_instr_mode
- (* INDEXED = operando offset relativo byte = [SP+0x00bb] *)
-| MODE_SP1 : Freescale_instr_mode
- (* INDEXED = operando offset relativo word = [SP+0xwwww] *)
-| MODE_SP2 : Freescale_instr_mode
-
- (* DIRECT → DIRECT = carica da diretto/scrive su diretto *)
-| MODE_DIR1_to_DIR1 : Freescale_instr_mode
- (* IMMEDIATE → DIRECT = carica da immediato/scrive su diretto *)
-| MODE_IMM1_to_DIR1 : Freescale_instr_mode
- (* INDEXED++ → DIRECT = carica da [X]/scrive su diretto/H:X++ *)
-| MODE_IX0p_to_DIR1 : Freescale_instr_mode
- (* DIRECT → INDEXED++ = carica da diretto/scrive su [X]/H:X++ *)
-| MODE_DIR1_to_IX0p : Freescale_instr_mode
-
- (* INHERENT(A) + IMMEDIATE *)
-| MODE_INHA_and_IMM1 : Freescale_instr_mode
- (* INHERENT(X) + IMMEDIATE *)
-| MODE_INHX_and_IMM1 : Freescale_instr_mode
- (* IMMEDIATE + IMMEDIATE *)
-| MODE_IMM1_and_IMM1 : Freescale_instr_mode
- (* DIRECT + IMMEDIATE *)
-| MODE_DIR1_and_IMM1 : Freescale_instr_mode
- (* INDEXED + IMMEDIATE *)
-| MODE_IX0_and_IMM1 : Freescale_instr_mode
- (* INDEXED++ + IMMEDIATE *)
-| MODE_IX0p_and_IMM1 : Freescale_instr_mode
- (* INDEXED + IMMEDIATE *)
-| MODE_IX1_and_IMM1 : Freescale_instr_mode
- (* INDEXED++ + IMMEDIATE *)
-| MODE_IX1p_and_IMM1 : Freescale_instr_mode
- (* INDEXED + IMMEDIATE *)
-| MODE_SP1_and_IMM1 : Freescale_instr_mode
-
- (* DIRECT(mTNY) = operando offset byte(maschera scrittura implicita 3 bit) *)
- (* ex: DIR3 e' carica b, scrivi b con n-simo bit modificato *)
-| MODE_DIRn : oct → Freescale_instr_mode
- (* DIRECT(mTNY) + IMMEDIATE = operando offset byte(maschera lettura implicita 3 bit) *)
- (* + operando valore immediato byte *)
- (* ex: DIR2_and_IMM1 e' carica b, carica imm, restituisci n-simo bit di b + imm *)
-| MODE_DIRn_and_IMM1 : oct → Freescale_instr_mode
- (* TINY = nessun operando (diretto implicito 4bit = [0x00000000:0000iiii]) *)
-| MODE_TNY : exadecim → Freescale_instr_mode
- (* SHORT = nessun operando (diretto implicito 5bit = [0x00000000:000iiiii]) *)
-| MODE_SRT : bitrigesim → Freescale_instr_mode
-.
-
-ndefinition eq_Freescale_im ≝
-λi1,i2:Freescale_instr_mode.
- match i1 with
- [ MODE_INH ⇒ match i2 with [ MODE_INH ⇒ true | _ ⇒ false ]
- | MODE_INHA ⇒ match i2 with [ MODE_INHA ⇒ true | _ ⇒ false ]
- | MODE_INHX ⇒ match i2 with [ MODE_INHX ⇒ true | _ ⇒ false ]
- | MODE_INHH ⇒ match i2 with [ MODE_INHH ⇒ true | _ ⇒ false ]
- | MODE_INHX0ADD ⇒ match i2 with [ MODE_INHX0ADD ⇒ true | _ ⇒ false ]
- | MODE_INHX1ADD ⇒ match i2 with [ MODE_INHX1ADD ⇒ true | _ ⇒ false ]
- | MODE_INHX2ADD ⇒ match i2 with [ MODE_INHX2ADD ⇒ true | _ ⇒ false ]
- | MODE_IMM1 ⇒ match i2 with [ MODE_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_IMM1EXT ⇒ match i2 with [ MODE_IMM1EXT ⇒ true | _ ⇒ false ]
- | MODE_IMM2 ⇒ match i2 with [ MODE_IMM2 ⇒ true | _ ⇒ false ]
- | MODE_DIR1 ⇒ match i2 with [ MODE_DIR1 ⇒ true | _ ⇒ false ]
- | MODE_DIR2 ⇒ match i2 with [ MODE_DIR2 ⇒ true | _ ⇒ false ]
- | MODE_IX0 ⇒ match i2 with [ MODE_IX0 ⇒ true | _ ⇒ false ]
- | MODE_IX1 ⇒ match i2 with [ MODE_IX1 ⇒ true | _ ⇒ false ]
- | MODE_IX2 ⇒ match i2 with [ MODE_IX2 ⇒ true | _ ⇒ false ]
- | MODE_SP1 ⇒ match i2 with [ MODE_SP1 ⇒ true | _ ⇒ false ]
- | MODE_SP2 ⇒ match i2 with [ MODE_SP2 ⇒ true | _ ⇒ false ]
- | MODE_DIR1_to_DIR1 ⇒ match i2 with [ MODE_DIR1_to_DIR1 ⇒ true | _ ⇒ false ]
- | MODE_IMM1_to_DIR1 ⇒ match i2 with [ MODE_IMM1_to_DIR1 ⇒ true | _ ⇒ false ]
- | MODE_IX0p_to_DIR1 ⇒ match i2 with [ MODE_IX0p_to_DIR1 ⇒ true | _ ⇒ false ]
- | MODE_DIR1_to_IX0p ⇒ match i2 with [ MODE_DIR1_to_IX0p ⇒ true | _ ⇒ false ]
- | MODE_INHA_and_IMM1 ⇒ match i2 with [ MODE_INHA_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_INHX_and_IMM1 ⇒ match i2 with [ MODE_INHX_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_IMM1_and_IMM1 ⇒ match i2 with [ MODE_IMM1_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_DIR1_and_IMM1 ⇒ match i2 with [ MODE_DIR1_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_IX0_and_IMM1 ⇒ match i2 with [ MODE_IX0_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_IX0p_and_IMM1 ⇒ match i2 with [ MODE_IX0p_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_IX1_and_IMM1 ⇒ match i2 with [ MODE_IX1_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_IX1p_and_IMM1 ⇒ match i2 with [ MODE_IX1p_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_SP1_and_IMM1 ⇒ match i2 with [ MODE_SP1_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_DIRn n1 ⇒ match i2 with [ MODE_DIRn n2 ⇒ eq_oct n1 n2 | _ ⇒ false ]
- | MODE_DIRn_and_IMM1 n1 ⇒ match i2 with [ MODE_DIRn_and_IMM1 n2 ⇒ eq_oct n1 n2 | _ ⇒ false ]
- | MODE_TNY e1 ⇒ match i2 with [ MODE_TNY e2 ⇒ eq_ex e1 e2 | _ ⇒ false ]
- | MODE_SRT t1 ⇒ match i2 with [ MODE_SRT t2 ⇒ eq_bit t1 t2 | _ ⇒ false ]
- ].
-
-ndefinition forall_Freescale_im ≝ λP:Freescale_instr_mode → bool.
- P MODE_INH
-⊗ P MODE_INHA
-⊗ P MODE_INHX
-⊗ P MODE_INHH
-
-⊗ P MODE_INHX0ADD
-⊗ P MODE_INHX1ADD
-⊗ P MODE_INHX2ADD
-
-⊗ P MODE_IMM1
-⊗ P MODE_IMM1EXT
-⊗ P MODE_IMM2
-⊗ P MODE_DIR1
-⊗ P MODE_DIR2
-⊗ P MODE_IX0
-⊗ P MODE_IX1
-⊗ P MODE_IX2
-⊗ P MODE_SP1
-⊗ P MODE_SP2
-
-⊗ P MODE_DIR1_to_DIR1
-⊗ P MODE_IMM1_to_DIR1
-⊗ P MODE_IX0p_to_DIR1
-⊗ P MODE_DIR1_to_IX0p
-
-⊗ P MODE_INHA_and_IMM1
-⊗ P MODE_INHX_and_IMM1
-⊗ P MODE_IMM1_and_IMM1
-⊗ P MODE_DIR1_and_IMM1
-⊗ P MODE_IX0_and_IMM1
-⊗ P MODE_IX0p_and_IMM1
-⊗ P MODE_IX1_and_IMM1
-⊗ P MODE_IX1p_and_IMM1
-⊗ P MODE_SP1_and_IMM1
-
-⊗ forall_oct (λo. P (MODE_DIRn o))
-⊗ forall_oct (λo. P (MODE_DIRn_and_IMM1 o))
-⊗ forall_ex (λe. P (MODE_TNY e))
-⊗ forall_bit (λt. P (MODE_SRT t)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/bool_lemmas.ma".
-include "emulator/opcodes/Freescale_instr_mode.ma".
-include "num/oct_lemmas.ma".
-include "num/bitrigesim_lemmas.ma".
-include "num/exadecim_lemmas.ma".
-
-nlemma eq_to_eqFreescaleim : ∀n1,n2.n1 = n2 → eq_Freescale_im n1 n2 = true.
- #n1; #n2; #H;
- nrewrite > H;
- nelim n2;
- ##[ ##31,32: #o; nrewrite > (eq_to_eqoct … (refl_eq …))
- ##| ##33: #e; nrewrite > (eq_to_eqex … (refl_eq …))
- ##| ##34: #t; nrewrite > (eq_to_eqbit … (refl_eq …)) ##]
- napply refl_eq.
-nqed.
-
-nlemma neqFreescaleim_to_neq : ∀n1,n2.eq_Freescale_im n1 n2 = false → n1 ≠ n2.
- #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_Freescale_im n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqFreescaleim n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-(* !!! per brevita... *)
-naxiom eqFreescaleim_to_eq : ∀c1,c2.eq_Freescale_im c1 c2 = true → c1 = c2.
-
-nlemma neq_to_neqFreescaleim : ∀n1,n2.n1 ≠ n2 → eq_Freescale_im n1 n2 = false.
- #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_Freescale_im n1 n2));
- napply (not_to_not (eq_Freescale_im n1 n2 = true) (n1 = n2) ? H);
- napply (eqFreescaleim_to_eq n1 n2).
-nqed.
-
-nlemma decidable_Freescaleim : ∀x,y:Freescale_instr_mode.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_Freescale_im x y = true) (eq_Freescale_im x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqFreescaleim_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqFreescaleim_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqFreescaleim : symmetricT Freescale_instr_mode bool eq_Freescale_im.
- #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_Freescaleim n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqFreescaleim n1 n2 H);
- napply (symmetric_eq ? (eq_Freescale_im n2 n1) false);
- napply (neq_to_neqFreescaleim n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/bool.ma".
-
-(* ********************************************** *)
-(* MATTONI BASE PER DEFINIRE LE TABELLE DELLE MCU *)
-(* ********************************************** *)
-
-(* enumerazione delle istruzioni *)
-ninductive Freescale_pseudo: Type ≝
- ADC : Freescale_pseudo (* add with carry *)
-| ADD : Freescale_pseudo (* add *)
-| AIS : Freescale_pseudo (* add immediate to SP *)
-| AIX : Freescale_pseudo (* add immediate to X *)
-| AND : Freescale_pseudo (* and *)
-| ASL : Freescale_pseudo (* aritmetic shift left *)
-| ASR : Freescale_pseudo (* aritmetic shift right *)
-| BCC : Freescale_pseudo (* branch if C=0 *)
-| BCLRn : Freescale_pseudo (* clear bit n *)
-| BCS : Freescale_pseudo (* branch if C=1 *)
-| BEQ : Freescale_pseudo (* branch if Z=1 *)
-| BGE : Freescale_pseudo (* branch if N⊙V=0 (great or equal) *)
-| BGND : Freescale_pseudo (* !!background mode!! *)
-| BGT : Freescale_pseudo (* branch if Z|N⊙V=0 clear (great) *)
-| BHCC : Freescale_pseudo (* branch if H=0 *)
-| BHCS : Freescale_pseudo (* branch if H=1 *)
-| BHI : Freescale_pseudo (* branch if C|Z=0, (higher) *)
-| BIH : Freescale_pseudo (* branch if nIRQ=1 *)
-| BIL : Freescale_pseudo (* branch if nIRQ=0 *)
-| BIT : Freescale_pseudo (* flag = and (bit test) *)
-| BLE : Freescale_pseudo (* branch if Z|N⊙V=1 (less or equal) *)
-| BLS : Freescale_pseudo (* branch if C|Z=1 (lower or same) *)
-| BLT : Freescale_pseudo (* branch if N⊙1=1 (less) *)
-| BMC : Freescale_pseudo (* branch if I=0 (interrupt mask clear) *)
-| BMI : Freescale_pseudo (* branch if N=1 (minus) *)
-| BMS : Freescale_pseudo (* branch if I=1 (interrupt mask set) *)
-| BNE : Freescale_pseudo (* branch if Z=0 *)
-| BPL : Freescale_pseudo (* branch if N=0 (plus) *)
-| BRA : Freescale_pseudo (* branch always *)
-| BRCLRn : Freescale_pseudo (* branch if bit n clear *)
-| BRN : Freescale_pseudo (* branch never (nop) *)
-| BRSETn : Freescale_pseudo (* branch if bit n set *)
-| BSETn : Freescale_pseudo (* set bit n *)
-| BSR : Freescale_pseudo (* branch to subroutine *)
-| CBEQA : Freescale_pseudo (* compare (A) and BEQ *)
-| CBEQX : Freescale_pseudo (* compare (X) and BEQ *)
-| CLC : Freescale_pseudo (* C=0 *)
-| CLI : Freescale_pseudo (* I=0 *)
-| CLR : Freescale_pseudo (* operand=0 *)
-| CMP : Freescale_pseudo (* flag = sub (compare A) *)
-| COM : Freescale_pseudo (* not (1 complement) *)
-| CPHX : Freescale_pseudo (* flag = sub (compare H:X) *)
-| CPX : Freescale_pseudo (* flag = sub (compare X) *)
-| DAA : Freescale_pseudo (* decimal adjust A *)
-| DBNZ : Freescale_pseudo (* dec and BNE *)
-| DEC : Freescale_pseudo (* operand=operand-1 (decrement) *)
-| DIV : Freescale_pseudo (* div *)
-| EOR : Freescale_pseudo (* xor *)
-| INC : Freescale_pseudo (* operand=operand+1 (increment) *)
-| JMP : Freescale_pseudo (* jmp word [operand] *)
-| JSR : Freescale_pseudo (* jmp to subroutine *)
-| LDA : Freescale_pseudo (* load in A *)
-| LDHX : Freescale_pseudo (* load in H:X *)
-| LDX : Freescale_pseudo (* load in X *)
-| LSR : Freescale_pseudo (* logical shift right *)
-| MOV : Freescale_pseudo (* move *)
-| MUL : Freescale_pseudo (* mul *)
-| NEG : Freescale_pseudo (* neg (2 complement) *)
-| NOP : Freescale_pseudo (* nop *)
-| NSA : Freescale_pseudo (* nibble swap A (al:ah <- ah:al) *)
-| ORA : Freescale_pseudo (* or *)
-| PSHA : Freescale_pseudo (* push A *)
-| PSHH : Freescale_pseudo (* push H *)
-| PSHX : Freescale_pseudo (* push X *)
-| PULA : Freescale_pseudo (* pop A *)
-| PULH : Freescale_pseudo (* pop H *)
-| PULX : Freescale_pseudo (* pop X *)
-| ROL : Freescale_pseudo (* rotate left *)
-| ROR : Freescale_pseudo (* rotate right *)
-| RSP : Freescale_pseudo (* reset SP (0x00FF) *)
-| RTI : Freescale_pseudo (* return from interrupt *)
-| RTS : Freescale_pseudo (* return from subroutine *)
-| SBC : Freescale_pseudo (* sub with carry*)
-| SEC : Freescale_pseudo (* C=1 *)
-| SEI : Freescale_pseudo (* I=1 *)
-| SHA : Freescale_pseudo (* swap spc_high,A *)
-| SLA : Freescale_pseudo (* swap spc_low,A *)
-| STA : Freescale_pseudo (* store from A *)
-| STHX : Freescale_pseudo (* store from H:X *)
-| STOP : Freescale_pseudo (* !!stop mode!! *)
-| STX : Freescale_pseudo (* store from X *)
-| SUB : Freescale_pseudo (* sub *)
-| SWI : Freescale_pseudo (* software interrupt *)
-| TAP : Freescale_pseudo (* flag=A (transfer A to process status byte *)
-| TAX : Freescale_pseudo (* X=A (transfer A to X) *)
-| TPA : Freescale_pseudo (* A=flag (transfer process status byte to A) *)
-| TST : Freescale_pseudo (* flag = sub (test) *)
-| TSX : Freescale_pseudo (* X:H=SP (transfer SP to H:X) *)
-| TXA : Freescale_pseudo (* A=X (transfer X to A) *)
-| TXS : Freescale_pseudo (* SP=X:H (transfer H:X to SP) *)
-| WAIT : Freescale_pseudo (* !!wait mode!! *)
-.
-
-ndefinition eq_Freescale_pseudo ≝
-λps1,ps2:Freescale_pseudo.
- match ps1 with
- [ ADC ⇒ match ps2 with [ ADC ⇒ true | _ ⇒ false ] | ADD ⇒ match ps2 with [ ADD ⇒ true | _ ⇒ false ]
- | AIS ⇒ match ps2 with [ AIS ⇒ true | _ ⇒ false ] | AIX ⇒ match ps2 with [ AIX ⇒ true | _ ⇒ false ]
- | AND ⇒ match ps2 with [ AND ⇒ true | _ ⇒ false ] | ASL ⇒ match ps2 with [ ASL ⇒ true | _ ⇒ false ]
- | ASR ⇒ match ps2 with [ ASR ⇒ true | _ ⇒ false ] | BCC ⇒ match ps2 with [ BCC ⇒ true | _ ⇒ false ]
- | BCLRn ⇒ match ps2 with [ BCLRn ⇒ true | _ ⇒ false ] | BCS ⇒ match ps2 with [ BCS ⇒ true | _ ⇒ false ]
- | BEQ ⇒ match ps2 with [ BEQ ⇒ true | _ ⇒ false ] | BGE ⇒ match ps2 with [ BGE ⇒ true | _ ⇒ false ]
- | BGND ⇒ match ps2 with [ BGND ⇒ true | _ ⇒ false ] | BGT ⇒ match ps2 with [ BGT ⇒ true | _ ⇒ false ]
- | BHCC ⇒ match ps2 with [ BHCC ⇒ true | _ ⇒ false ] | BHCS ⇒ match ps2 with [ BHCS ⇒ true | _ ⇒ false ]
- | BHI ⇒ match ps2 with [ BHI ⇒ true | _ ⇒ false ] | BIH ⇒ match ps2 with [ BIH ⇒ true | _ ⇒ false ]
- | BIL ⇒ match ps2 with [ BIL ⇒ true | _ ⇒ false ] | BIT ⇒ match ps2 with [ BIT ⇒ true | _ ⇒ false ]
- | BLE ⇒ match ps2 with [ BLE ⇒ true | _ ⇒ false ] | BLS ⇒ match ps2 with [ BLS ⇒ true | _ ⇒ false ]
- | BLT ⇒ match ps2 with [ BLT ⇒ true | _ ⇒ false ] | BMC ⇒ match ps2 with [ BMC ⇒ true | _ ⇒ false ]
- | BMI ⇒ match ps2 with [ BMI ⇒ true | _ ⇒ false ] | BMS ⇒ match ps2 with [ BMS ⇒ true | _ ⇒ false ]
- | BNE ⇒ match ps2 with [ BNE ⇒ true | _ ⇒ false ] | BPL ⇒ match ps2 with [ BPL ⇒ true | _ ⇒ false ]
- | BRA ⇒ match ps2 with [ BRA ⇒ true | _ ⇒ false ] | BRCLRn ⇒ match ps2 with [ BRCLRn ⇒ true | _ ⇒ false ]
- | BRN ⇒ match ps2 with [ BRN ⇒ true | _ ⇒ false ] | BRSETn ⇒ match ps2 with [ BRSETn ⇒ true | _ ⇒ false ]
- | BSETn ⇒ match ps2 with [ BSETn ⇒ true | _ ⇒ false ] | BSR ⇒ match ps2 with [ BSR ⇒ true | _ ⇒ false ]
- | CBEQA ⇒ match ps2 with [ CBEQA ⇒ true | _ ⇒ false ] | CBEQX ⇒ match ps2 with [ CBEQX ⇒ true | _ ⇒ false ]
- | CLC ⇒ match ps2 with [ CLC ⇒ true | _ ⇒ false ] | CLI ⇒ match ps2 with [ CLI ⇒ true | _ ⇒ false ]
- | CLR ⇒ match ps2 with [ CLR ⇒ true | _ ⇒ false ] | CMP ⇒ match ps2 with [ CMP ⇒ true | _ ⇒ false ]
- | COM ⇒ match ps2 with [ COM ⇒ true | _ ⇒ false ] | CPHX ⇒ match ps2 with [ CPHX ⇒ true | _ ⇒ false ]
- | CPX ⇒ match ps2 with [ CPX ⇒ true | _ ⇒ false ] | DAA ⇒ match ps2 with [ DAA ⇒ true | _ ⇒ false ]
- | DBNZ ⇒ match ps2 with [ DBNZ ⇒ true | _ ⇒ false ] | DEC ⇒ match ps2 with [ DEC ⇒ true | _ ⇒ false ]
- | DIV ⇒ match ps2 with [ DIV ⇒ true | _ ⇒ false ] | EOR ⇒ match ps2 with [ EOR ⇒ true | _ ⇒ false ]
- | INC ⇒ match ps2 with [ INC ⇒ true | _ ⇒ false ] | JMP ⇒ match ps2 with [ JMP ⇒ true | _ ⇒ false ]
- | JSR ⇒ match ps2 with [ JSR ⇒ true | _ ⇒ false ] | LDA ⇒ match ps2 with [ LDA ⇒ true | _ ⇒ false ]
- | LDHX ⇒ match ps2 with [ LDHX ⇒ true | _ ⇒ false ] | LDX ⇒ match ps2 with [ LDX ⇒ true | _ ⇒ false ]
- | LSR ⇒ match ps2 with [ LSR ⇒ true | _ ⇒ false ] | MOV ⇒ match ps2 with [ MOV ⇒ true | _ ⇒ false ]
- | MUL ⇒ match ps2 with [ MUL ⇒ true | _ ⇒ false ] | NEG ⇒ match ps2 with [ NEG ⇒ true | _ ⇒ false ]
- | NOP ⇒ match ps2 with [ NOP ⇒ true | _ ⇒ false ] | NSA ⇒ match ps2 with [ NSA ⇒ true | _ ⇒ false ]
- | ORA ⇒ match ps2 with [ ORA ⇒ true | _ ⇒ false ] | PSHA ⇒ match ps2 with [ PSHA ⇒ true | _ ⇒ false ]
- | PSHH ⇒ match ps2 with [ PSHH ⇒ true | _ ⇒ false ] | PSHX ⇒ match ps2 with [ PSHX ⇒ true | _ ⇒ false ]
- | PULA ⇒ match ps2 with [ PULA ⇒ true | _ ⇒ false ] | PULH ⇒ match ps2 with [ PULH ⇒ true | _ ⇒ false ]
- | PULX ⇒ match ps2 with [ PULX ⇒ true | _ ⇒ false ] | ROL ⇒ match ps2 with [ ROL ⇒ true | _ ⇒ false ]
- | ROR ⇒ match ps2 with [ ROR ⇒ true | _ ⇒ false ] | RSP ⇒ match ps2 with [ RSP ⇒ true | _ ⇒ false ]
- | RTI ⇒ match ps2 with [ RTI ⇒ true | _ ⇒ false ] | RTS ⇒ match ps2 with [ RTS ⇒ true | _ ⇒ false ]
- | SBC ⇒ match ps2 with [ SBC ⇒ true | _ ⇒ false ] | SEC ⇒ match ps2 with [ SEC ⇒ true | _ ⇒ false ]
- | SEI ⇒ match ps2 with [ SEI ⇒ true | _ ⇒ false ] | SHA ⇒ match ps2 with [ SHA ⇒ true | _ ⇒ false ]
- | SLA ⇒ match ps2 with [ SLA ⇒ true | _ ⇒ false ] | STA ⇒ match ps2 with [ STA ⇒ true | _ ⇒ false ]
- | STHX ⇒ match ps2 with [ STHX ⇒ true | _ ⇒ false ] | STOP ⇒ match ps2 with [ STOP ⇒ true | _ ⇒ false ]
- | STX ⇒ match ps2 with [ STX ⇒ true | _ ⇒ false ] | SUB ⇒ match ps2 with [ SUB ⇒ true | _ ⇒ false ]
- | SWI ⇒ match ps2 with [ SWI ⇒ true | _ ⇒ false ] | TAP ⇒ match ps2 with [ TAP ⇒ true | _ ⇒ false ]
- | TAX ⇒ match ps2 with [ TAX ⇒ true | _ ⇒ false ] | TPA ⇒ match ps2 with [ TPA ⇒ true | _ ⇒ false ]
- | TST ⇒ match ps2 with [ TST ⇒ true | _ ⇒ false ] | TSX ⇒ match ps2 with [ TSX ⇒ true | _ ⇒ false ]
- | TXA ⇒ match ps2 with [ TXA ⇒ true | _ ⇒ false ] | TXS ⇒ match ps2 with [ TXS ⇒ true | _ ⇒ false ]
- | WAIT ⇒ match ps2 with [ WAIT ⇒ true | _ ⇒ false ]
- ].
-
-ndefinition forall_Freescale_pseudo ≝ λP:Freescale_pseudo → bool.
- P ADC ⊗ P ADD ⊗ P AIS ⊗ P AIX ⊗ P AND ⊗ P ASL ⊗ P ASR ⊗ P BCC ⊗
- P BCLRn ⊗ P BCS ⊗ P BEQ ⊗ P BGE ⊗ P BGND ⊗ P BGT ⊗ P BHCC ⊗ P BHCS ⊗
- P BHI ⊗ P BIH ⊗ P BIL ⊗ P BIT ⊗ P BLE ⊗ P BLS ⊗ P BLT ⊗ P BMC ⊗
- P BMI ⊗ P BMS ⊗ P BNE ⊗ P BPL ⊗ P BRA ⊗ P BRCLRn ⊗ P BRN ⊗ P BRSETn ⊗
- P BSETn ⊗ P BSR ⊗ P CBEQA ⊗ P CBEQX ⊗ P CLC ⊗ P CLI ⊗ P CLR ⊗ P CMP ⊗
- P COM ⊗ P CPHX ⊗ P CPX ⊗ P DAA ⊗ P DBNZ ⊗ P DEC ⊗ P DIV ⊗ P EOR ⊗
- P INC ⊗ P JMP ⊗ P JSR ⊗ P LDA ⊗ P LDHX ⊗ P LDX ⊗ P LSR ⊗ P MOV ⊗
- P MUL ⊗ P NEG ⊗ P NOP ⊗ P NSA ⊗ P ORA ⊗ P PSHA ⊗ P PSHH ⊗ P PSHX ⊗
- P PULA ⊗ P PULH ⊗ P PULX ⊗ P ROL ⊗ P ROR ⊗ P RSP ⊗ P RTI ⊗ P RTS ⊗
- P SBC ⊗ P SEC ⊗ P SEI ⊗ P SHA ⊗ P SLA ⊗ P STA ⊗ P STHX ⊗ P STOP ⊗
- P STX ⊗ P SUB ⊗ P SWI ⊗ P TAP ⊗ P TAX ⊗ P TPA ⊗ P TST ⊗ P TSX ⊗
- P TXA ⊗ P TXS ⊗ P WAIT.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/bool_lemmas.ma".
-include "emulator/opcodes/Freescale_pseudo.ma".
-
-nlemma eq_to_eqFreescalepseudo : ∀n1,n2.n1 = n2 → eq_Freescale_pseudo n1 n2 = true.
- #n1; #n2; #H;
- nrewrite > H;
- nelim n2;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma neqFreescalepseudo_to_neq : ∀n1,n2.eq_Freescale_pseudo n1 n2 = false → n1 ≠ n2.
- #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_Freescale_pseudo n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqFreescalepseudo n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-(* !!! per brevita... *)
-naxiom eqFreescalepseudo_to_eq : ∀c1,c2.eq_Freescale_pseudo c1 c2 = true → c1 = c2.
-
-nlemma neq_to_neqFreescalepseudo : ∀n1,n2.n1 ≠ n2 → eq_Freescale_pseudo n1 n2 = false.
- #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_Freescale_pseudo n1 n2));
- napply (not_to_not (eq_Freescale_pseudo n1 n2 = true) (n1 = n2) ? H);
- napply (eqFreescalepseudo_to_eq n1 n2).
-nqed.
-
-nlemma decidable_Freescalepseudo : ∀x,y:Freescale_pseudo.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_Freescale_pseudo x y = true) (eq_Freescale_pseudo x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqFreescalepseudo_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqFreescalepseudo_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqFreescalepseudo : symmetricT Freescale_pseudo bool eq_Freescale_pseudo.
- #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_Freescalepseudo n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqFreescalepseudo n1 n2 H);
- napply (symmetric_eq ? (eq_Freescale_pseudo n2 n1) false);
- napply (neq_to_neqFreescalepseudo n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/Freescale_pseudo.ma".
-include "emulator/opcodes/Freescale_instr_mode.ma".
-include "emulator/opcodes/byte_or_word.ma".
-include "common/list.ma".
-
-(* ***************** *)
-(* TABELLA DELL'HC05 *)
-(* ***************** *)
-
-(* definizione come concatenazione finale di liste per velocizzare il parsing *)
-(* ogni riga e' [pseudo] [modalita' indirizzamento] [opcode esadecimale] [#cicli esecuzione] *)
-
-ndefinition opcode_table_HC05_1 ≝
-[
- quadruple … ADC MODE_IMM1 (Byte 〈xA,x9〉) 〈x0,x2〉
-; quadruple … ADC MODE_DIR1 (Byte 〈xB,x9〉) 〈x0,x3〉
-; quadruple … ADC MODE_DIR2 (Byte 〈xC,x9〉) 〈x0,x4〉
-; quadruple … ADC MODE_IX2 (Byte 〈xD,x9〉) 〈x0,x5〉
-; quadruple … ADC MODE_IX1 (Byte 〈xE,x9〉) 〈x0,x4〉
-; quadruple … ADC MODE_IX0 (Byte 〈xF,x9〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC05_2 ≝
-[
- quadruple … ADD MODE_IMM1 (Byte 〈xA,xB〉) 〈x0,x2〉
-; quadruple … ADD MODE_DIR1 (Byte 〈xB,xB〉) 〈x0,x3〉
-; quadruple … ADD MODE_DIR2 (Byte 〈xC,xB〉) 〈x0,x4〉
-; quadruple … ADD MODE_IX2 (Byte 〈xD,xB〉) 〈x0,x5〉
-; quadruple … ADD MODE_IX1 (Byte 〈xE,xB〉) 〈x0,x4〉
-; quadruple … ADD MODE_IX0 (Byte 〈xF,xB〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_HC05_3 ≝
-[
- quadruple … AND MODE_IMM1 (Byte 〈xA,x4〉) 〈x0,x2〉
-; quadruple … AND MODE_DIR1 (Byte 〈xB,x4〉) 〈x0,x3〉
-; quadruple … AND MODE_DIR2 (Byte 〈xC,x4〉) 〈x0,x4〉
-; quadruple … AND MODE_IX2 (Byte 〈xD,x4〉) 〈x0,x5〉
-; quadruple … AND MODE_IX1 (Byte 〈xE,x4〉) 〈x0,x4〉
-; quadruple … AND MODE_IX0 (Byte 〈xF,x4〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_HC05_4 ≝
-[
- quadruple … ASL MODE_DIR1 (Byte 〈x3,x8〉) 〈x0,x5〉
-; quadruple … ASL MODE_INHA (Byte 〈x4,x8〉) 〈x0,x3〉
-; quadruple … ASL MODE_INHX (Byte 〈x5,x8〉) 〈x0,x3〉
-; quadruple … ASL MODE_IX1 (Byte 〈x6,x8〉) 〈x0,x6〉
-; quadruple … ASL MODE_IX0 (Byte 〈x7,x8〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC05_5 ≝
-[
- quadruple … ASR MODE_DIR1 (Byte 〈x3,x7〉) 〈x0,x5〉
-; quadruple … ASR MODE_INHA (Byte 〈x4,x7〉) 〈x0,x3〉
-; quadruple … ASR MODE_INHX (Byte 〈x5,x7〉) 〈x0,x3〉
-; quadruple … ASR MODE_IX1 (Byte 〈x6,x7〉) 〈x0,x6〉
-; quadruple … ASR MODE_IX0 (Byte 〈x7,x7〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC05_6 ≝
-[
- quadruple … BRA MODE_IMM1 (Byte 〈x2,x0〉) 〈x0,x3〉
-; quadruple … BRN MODE_IMM1 (Byte 〈x2,x1〉) 〈x0,x3〉
-; quadruple … BHI MODE_IMM1 (Byte 〈x2,x2〉) 〈x0,x3〉
-; quadruple … BLS MODE_IMM1 (Byte 〈x2,x3〉) 〈x0,x3〉
-; quadruple … BCC MODE_IMM1 (Byte 〈x2,x4〉) 〈x0,x3〉
-; quadruple … BCS MODE_IMM1 (Byte 〈x2,x5〉) 〈x0,x3〉
-; quadruple … BNE MODE_IMM1 (Byte 〈x2,x6〉) 〈x0,x3〉
-; quadruple … BEQ MODE_IMM1 (Byte 〈x2,x7〉) 〈x0,x3〉
-; quadruple … BHCC MODE_IMM1 (Byte 〈x2,x8〉) 〈x0,x3〉
-; quadruple … BHCS MODE_IMM1 (Byte 〈x2,x9〉) 〈x0,x3〉
-; quadruple … BPL MODE_IMM1 (Byte 〈x2,xA〉) 〈x0,x3〉
-; quadruple … BMI MODE_IMM1 (Byte 〈x2,xB〉) 〈x0,x3〉
-; quadruple … BMC MODE_IMM1 (Byte 〈x2,xC〉) 〈x0,x3〉
-; quadruple … BMS MODE_IMM1 (Byte 〈x2,xD〉) 〈x0,x3〉
-; quadruple … BIL MODE_IMM1 (Byte 〈x2,xE〉) 〈x0,x3〉
-; quadruple … BIH MODE_IMM1 (Byte 〈x2,xF〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_HC05_7 ≝
-[
- quadruple … BSETn (MODE_DIRn o0) (Byte 〈x1,x0〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o0) (Byte 〈x1,x1〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o1) (Byte 〈x1,x2〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o1) (Byte 〈x1,x3〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o2) (Byte 〈x1,x4〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o2) (Byte 〈x1,x5〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o3) (Byte 〈x1,x6〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o3) (Byte 〈x1,x7〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o4) (Byte 〈x1,x8〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o4) (Byte 〈x1,x9〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o5) (Byte 〈x1,xA〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o5) (Byte 〈x1,xB〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o6) (Byte 〈x1,xC〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o6) (Byte 〈x1,xD〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o7) (Byte 〈x1,xE〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o7) (Byte 〈x1,xF〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC05_8 ≝
-[
- quadruple … BRSETn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x0〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x1〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x2〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x3〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x4〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x5〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x6〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x7〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x8〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x9〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xA〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xB〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xC〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xD〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xE〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xF〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC05_9 ≝
-[
- quadruple … BIT MODE_IMM1 (Byte 〈xA,x5〉) 〈x0,x2〉
-; quadruple … BIT MODE_DIR1 (Byte 〈xB,x5〉) 〈x0,x3〉
-; quadruple … BIT MODE_DIR2 (Byte 〈xC,x5〉) 〈x0,x4〉
-; quadruple … BIT MODE_IX2 (Byte 〈xD,x5〉) 〈x0,x5〉
-; quadruple … BIT MODE_IX1 (Byte 〈xE,x5〉) 〈x0,x4〉
-; quadruple … BIT MODE_IX0 (Byte 〈xF,x5〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_HC05_10 ≝
-[
- quadruple … MUL MODE_INH (Byte 〈x4,x2〉) 〈x0,xB〉
-; quadruple … RTI MODE_INH (Byte 〈x8,x0〉) 〈x0,x9〉
-; quadruple … RTS MODE_INH (Byte 〈x8,x1〉) 〈x0,x6〉
-; quadruple … SWI MODE_INH (Byte 〈x8,x3〉) 〈x0,xA〉
-; quadruple … STOP MODE_INH (Byte 〈x8,xE〉) 〈x0,x2〉
-; quadruple … WAIT MODE_INH (Byte 〈x8,xF〉) 〈x0,x2〉
-; quadruple … TAX MODE_INH (Byte 〈x9,x7〉) 〈x0,x2〉
-; quadruple … CLC MODE_INH (Byte 〈x9,x8〉) 〈x0,x2〉
-; quadruple … SEC MODE_INH (Byte 〈x9,x9〉) 〈x0,x2〉
-; quadruple … CLI MODE_INH (Byte 〈x9,xA〉) 〈x0,x2〉
-; quadruple … SEI MODE_INH (Byte 〈x9,xB〉) 〈x0,x2〉
-; quadruple … RSP MODE_INH (Byte 〈x9,xC〉) 〈x0,x2〉
-; quadruple … NOP MODE_INH (Byte 〈x9,xD〉) 〈x0,x2〉
-; quadruple … TXA MODE_INH (Byte 〈x9,xF〉) 〈x0,x2〉
-].
-
-ndefinition opcode_table_HC05_11 ≝
-[
- quadruple … CLR MODE_DIR1 (Byte 〈x3,xF〉) 〈x0,x5〉
-; quadruple … CLR MODE_INHA (Byte 〈x4,xF〉) 〈x0,x3〉
-; quadruple … CLR MODE_INHX (Byte 〈x5,xF〉) 〈x0,x3〉
-; quadruple … CLR MODE_IX1 (Byte 〈x6,xF〉) 〈x0,x6〉
-; quadruple … CLR MODE_IX0 (Byte 〈x7,xF〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC05_12 ≝
-[
- quadruple … CMP MODE_IMM1 (Byte 〈xA,x1〉) 〈x0,x2〉
-; quadruple … CMP MODE_DIR1 (Byte 〈xB,x1〉) 〈x0,x3〉
-; quadruple … CMP MODE_DIR2 (Byte 〈xC,x1〉) 〈x0,x4〉
-; quadruple … CMP MODE_IX2 (Byte 〈xD,x1〉) 〈x0,x5〉
-; quadruple … CMP MODE_IX1 (Byte 〈xE,x1〉) 〈x0,x4〉
-; quadruple … CMP MODE_IX0 (Byte 〈xF,x1〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_HC05_13 ≝
-[
- quadruple … COM MODE_DIR1 (Byte 〈x3,x3〉) 〈x0,x5〉
-; quadruple … COM MODE_INHA (Byte 〈x4,x3〉) 〈x0,x3〉
-; quadruple … COM MODE_INHX (Byte 〈x5,x3〉) 〈x0,x3〉
-; quadruple … COM MODE_IX1 (Byte 〈x6,x3〉) 〈x0,x6〉
-; quadruple … COM MODE_IX0 (Byte 〈x7,x3〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC05_14 ≝
-[
- quadruple … CPX MODE_IMM1 (Byte 〈xA,x3〉) 〈x0,x2〉
-; quadruple … CPX MODE_DIR1 (Byte 〈xB,x3〉) 〈x0,x3〉
-; quadruple … CPX MODE_DIR2 (Byte 〈xC,x3〉) 〈x0,x4〉
-; quadruple … CPX MODE_IX2 (Byte 〈xD,x3〉) 〈x0,x5〉
-; quadruple … CPX MODE_IX1 (Byte 〈xE,x3〉) 〈x0,x4〉
-; quadruple … CPX MODE_IX0 (Byte 〈xF,x3〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_HC05_15 ≝
-[
- quadruple … DEC MODE_DIR1 (Byte 〈x3,xA〉) 〈x0,x5〉
-; quadruple … DEC MODE_INHA (Byte 〈x4,xA〉) 〈x0,x3〉
-; quadruple … DEC MODE_INHX (Byte 〈x5,xA〉) 〈x0,x3〉
-; quadruple … DEC MODE_IX1 (Byte 〈x6,xA〉) 〈x0,x6〉
-; quadruple … DEC MODE_IX0 (Byte 〈x7,xA〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC05_16 ≝
-[
- quadruple … EOR MODE_IMM1 (Byte 〈xA,x8〉) 〈x0,x2〉
-; quadruple … EOR MODE_DIR1 (Byte 〈xB,x8〉) 〈x0,x3〉
-; quadruple … EOR MODE_DIR2 (Byte 〈xC,x8〉) 〈x0,x4〉
-; quadruple … EOR MODE_IX2 (Byte 〈xD,x8〉) 〈x0,x5〉
-; quadruple … EOR MODE_IX1 (Byte 〈xE,x8〉) 〈x0,x4〉
-; quadruple … EOR MODE_IX0 (Byte 〈xF,x8〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_HC05_17 ≝
-[
- quadruple … INC MODE_DIR1 (Byte 〈x3,xC〉) 〈x0,x5〉
-; quadruple … INC MODE_INHA (Byte 〈x4,xC〉) 〈x0,x3〉
-; quadruple … INC MODE_INHX (Byte 〈x5,xC〉) 〈x0,x3〉
-; quadruple … INC MODE_IX1 (Byte 〈x6,xC〉) 〈x0,x6〉
-; quadruple … INC MODE_IX0 (Byte 〈x7,xC〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC05_18 ≝
-[
- quadruple … JMP MODE_IMM1EXT (Byte 〈xB,xC〉) 〈x0,x2〉
-; quadruple … JMP MODE_IMM2 (Byte 〈xC,xC〉) 〈x0,x3〉
-; quadruple … JMP MODE_INHX2ADD (Byte 〈xD,xC〉) 〈x0,x4〉
-; quadruple … JMP MODE_INHX1ADD (Byte 〈xE,xC〉) 〈x0,x3〉
-; quadruple … JMP MODE_INHX0ADD (Byte 〈xF,xC〉) 〈x0,x2〉
-].
-
-ndefinition opcode_table_HC05_19 ≝
-[
- quadruple … BSR MODE_IMM1 (Byte 〈xA,xD〉) 〈x0,x6〉
-; quadruple … JSR MODE_IMM1EXT (Byte 〈xB,xD〉) 〈x0,x5〉
-; quadruple … JSR MODE_IMM2 (Byte 〈xC,xD〉) 〈x0,x6〉
-; quadruple … JSR MODE_INHX2ADD (Byte 〈xD,xD〉) 〈x0,x7〉
-; quadruple … JSR MODE_INHX1ADD (Byte 〈xE,xD〉) 〈x0,x6〉
-; quadruple … JSR MODE_INHX0ADD (Byte 〈xF,xD〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC05_20 ≝
-[
- quadruple … LDA MODE_IMM1 (Byte 〈xA,x6〉) 〈x0,x2〉
-; quadruple … LDA MODE_DIR1 (Byte 〈xB,x6〉) 〈x0,x3〉
-; quadruple … LDA MODE_DIR2 (Byte 〈xC,x6〉) 〈x0,x4〉
-; quadruple … LDA MODE_IX2 (Byte 〈xD,x6〉) 〈x0,x5〉
-; quadruple … LDA MODE_IX1 (Byte 〈xE,x6〉) 〈x0,x4〉
-; quadruple … LDA MODE_IX0 (Byte 〈xF,x6〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_HC05_21 ≝
-[
- quadruple … LDX MODE_IMM1 (Byte 〈xA,xE〉) 〈x0,x2〉
-; quadruple … LDX MODE_DIR1 (Byte 〈xB,xE〉) 〈x0,x3〉
-; quadruple … LDX MODE_DIR2 (Byte 〈xC,xE〉) 〈x0,x4〉
-; quadruple … LDX MODE_IX2 (Byte 〈xD,xE〉) 〈x0,x5〉
-; quadruple … LDX MODE_IX1 (Byte 〈xE,xE〉) 〈x0,x4〉
-; quadruple … LDX MODE_IX0 (Byte 〈xF,xE〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_HC05_22 ≝
-[
- quadruple … LSR MODE_DIR1 (Byte 〈x3,x4〉) 〈x0,x5〉
-; quadruple … LSR MODE_INHA (Byte 〈x4,x4〉) 〈x0,x3〉
-; quadruple … LSR MODE_INHX (Byte 〈x5,x4〉) 〈x0,x3〉
-; quadruple … LSR MODE_IX1 (Byte 〈x6,x4〉) 〈x0,x6〉
-; quadruple … LSR MODE_IX0 (Byte 〈x7,x4〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC05_23 ≝
-[
- quadruple … NEG MODE_DIR1 (Byte 〈x3,x0〉) 〈x0,x5〉
-; quadruple … NEG MODE_INHA (Byte 〈x4,x0〉) 〈x0,x3〉
-; quadruple … NEG MODE_INHX (Byte 〈x5,x0〉) 〈x0,x3〉
-; quadruple … NEG MODE_IX1 (Byte 〈x6,x0〉) 〈x0,x6〉
-; quadruple … NEG MODE_IX0 (Byte 〈x7,x0〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC05_24 ≝
-[
- quadruple … ORA MODE_IMM1 (Byte 〈xA,xA〉) 〈x0,x2〉
-; quadruple … ORA MODE_DIR1 (Byte 〈xB,xA〉) 〈x0,x3〉
-; quadruple … ORA MODE_DIR2 (Byte 〈xC,xA〉) 〈x0,x4〉
-; quadruple … ORA MODE_IX2 (Byte 〈xD,xA〉) 〈x0,x5〉
-; quadruple … ORA MODE_IX1 (Byte 〈xE,xA〉) 〈x0,x4〉
-; quadruple … ORA MODE_IX0 (Byte 〈xF,xA〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_HC05_25 ≝
-[
- quadruple … ROL MODE_DIR1 (Byte 〈x3,x9〉) 〈x0,x5〉
-; quadruple … ROL MODE_INHA (Byte 〈x4,x9〉) 〈x0,x3〉
-; quadruple … ROL MODE_INHX (Byte 〈x5,x9〉) 〈x0,x3〉
-; quadruple … ROL MODE_IX1 (Byte 〈x6,x9〉) 〈x0,x6〉
-; quadruple … ROL MODE_IX0 (Byte 〈x7,x9〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC05_26 ≝
-[
- quadruple … ROR MODE_DIR1 (Byte 〈x3,x6〉) 〈x0,x5〉
-; quadruple … ROR MODE_INHA (Byte 〈x4,x6〉) 〈x0,x3〉
-; quadruple … ROR MODE_INHX (Byte 〈x5,x6〉) 〈x0,x3〉
-; quadruple … ROR MODE_IX1 (Byte 〈x6,x6〉) 〈x0,x6〉
-; quadruple … ROR MODE_IX0 (Byte 〈x7,x6〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC05_27 ≝
-[
- quadruple … SBC MODE_IMM1 (Byte 〈xA,x2〉) 〈x0,x2〉
-; quadruple … SBC MODE_DIR1 (Byte 〈xB,x2〉) 〈x0,x3〉
-; quadruple … SBC MODE_DIR2 (Byte 〈xC,x2〉) 〈x0,x4〉
-; quadruple … SBC MODE_IX2 (Byte 〈xD,x2〉) 〈x0,x5〉
-; quadruple … SBC MODE_IX1 (Byte 〈xE,x2〉) 〈x0,x4〉
-; quadruple … SBC MODE_IX0 (Byte 〈xF,x2〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_HC05_28 ≝
-[
- quadruple … STA MODE_DIR1 (Byte 〈xB,x7〉) 〈x0,x4〉
-; quadruple … STA MODE_DIR2 (Byte 〈xC,x7〉) 〈x0,x5〉
-; quadruple … STA MODE_IX2 (Byte 〈xD,x7〉) 〈x0,x6〉
-; quadruple … STA MODE_IX1 (Byte 〈xE,x7〉) 〈x0,x5〉
-; quadruple … STA MODE_IX0 (Byte 〈xF,x7〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC05_29 ≝
-[
- quadruple … STX MODE_DIR1 (Byte 〈xB,xF〉) 〈x0,x4〉
-; quadruple … STX MODE_DIR2 (Byte 〈xC,xF〉) 〈x0,x5〉
-; quadruple … STX MODE_IX2 (Byte 〈xD,xF〉) 〈x0,x6〉
-; quadruple … STX MODE_IX1 (Byte 〈xE,xF〉) 〈x0,x5〉
-; quadruple … STX MODE_IX0 (Byte 〈xF,xF〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC05_30 ≝
-[
- quadruple … SUB MODE_IMM1 (Byte 〈xA,x0〉) 〈x0,x2〉
-; quadruple … SUB MODE_DIR1 (Byte 〈xB,x0〉) 〈x0,x3〉
-; quadruple … SUB MODE_DIR2 (Byte 〈xC,x0〉) 〈x0,x4〉
-; quadruple … SUB MODE_IX2 (Byte 〈xD,x0〉) 〈x0,x5〉
-; quadruple … SUB MODE_IX1 (Byte 〈xE,x0〉) 〈x0,x4〉
-; quadruple … SUB MODE_IX0 (Byte 〈xF,x0〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_HC05_31 ≝
-[
- quadruple … TST MODE_DIR1 (Byte 〈x3,xD〉) 〈x0,x4〉
-; quadruple … TST MODE_INHA (Byte 〈x4,xD〉) 〈x0,x3〉
-; quadruple … TST MODE_INHX (Byte 〈x5,xD〉) 〈x0,x3〉
-; quadruple … TST MODE_IX1 (Byte 〈x6,xD〉) 〈x0,x5〉
-; quadruple … TST MODE_IX0 (Byte 〈x7,xD〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC05 ≝
- opcode_table_HC05_1 @ opcode_table_HC05_2 @ opcode_table_HC05_3 @ opcode_table_HC05_4 @
- opcode_table_HC05_5 @ opcode_table_HC05_6 @ opcode_table_HC05_7 @ opcode_table_HC05_8 @
- opcode_table_HC05_9 @ opcode_table_HC05_10 @ opcode_table_HC05_11 @ opcode_table_HC05_12 @
- opcode_table_HC05_13 @ opcode_table_HC05_14 @ opcode_table_HC05_15 @ opcode_table_HC05_16 @
- opcode_table_HC05_17 @ opcode_table_HC05_18 @ opcode_table_HC05_19 @ opcode_table_HC05_20 @
- opcode_table_HC05_21 @ opcode_table_HC05_22 @ opcode_table_HC05_23 @ opcode_table_HC05_24 @
- opcode_table_HC05_25 @ opcode_table_HC05_26 @ opcode_table_HC05_27 @ opcode_table_HC05_28 @
- opcode_table_HC05_29 @ opcode_table_HC05_30 @ opcode_table_HC05_31.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/pseudo.ma".
-include "emulator/opcodes/HC05_table.ma".
-
-(* ***************** *)
-(* TABELLA DELL'HC05 *)
-(* ***************** *)
-
-(* HC05: opcode non implementati come da manuale *)
-ndefinition HC05_not_impl_byte ≝
- [〈x3,x1〉;〈x3,x2〉;〈x3,x5〉;〈x3,xB〉;〈x3,xE〉
- ;〈x4,x1〉;〈x4,x5〉;〈x4,xB〉;〈x4,xE〉
- ;〈x5,x1〉;〈x5,x2〉;〈x5,x5〉;〈x5,xB〉;〈x5,xE〉
- ;〈x6,x1〉;〈x6,x2〉;〈x6,x5〉;〈x6,xB〉;〈x6,xE〉
- ;〈x7,x1〉;〈x7,x2〉;〈x7,x5〉;〈x7,xB〉;〈x7,xE〉
- ;〈x8,x2〉;〈x8,x4〉;〈x8,x5〉;〈x8,x6〉;〈x8,x7〉;〈x8,x8〉;〈x8,x9〉;〈x8,xA〉;〈x8,xB〉;〈x8,xC〉;〈x8,xD〉
- ;〈x9,x0〉;〈x9,x1〉;〈x9,x2〉;〈x9,x3〉;〈x9,x4〉;〈x9,x5〉;〈x9,x6〉;〈x9,xE〉
- ;〈xA,x7〉;〈xA,xC〉;〈xA,xF〉
- ].
-
-nlemma ok_byte_table_HC05 : forall_b8 (λb.
- (test_not_impl_byte b HC05_not_impl_byte ⊙ eq_w16 (get_byte_count HC05 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC05) 〈〈x0,x0〉:〈x0,x1〉〉) ⊗
- (⊖ (test_not_impl_byte b HC05_not_impl_byte) ⊙ eq_w16 (get_byte_count HC05 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC05) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* HC05: pseudocodici non implementati come da manuale *)
-ndefinition HC05_not_impl_pseudo ≝
- [ AIS ; AIX ; BGE ; BGND ; BGT ; BLE ; BLT ; CBEQA ; CBEQX ; CPHX ; DAA
- ; DBNZ ; DIV ; LDHX ; MOV ; NSA ; PSHA ; PSHH ; PSHX ; PULA ; PULH ; PULX
- ; SHA ; SLA ; STHX ; TAP ; TPA ; TSX ; TXS ].
-
-nlemma ok_pseudo_table_HC05 : forall_Freescale_pseudo (λo.
- (test_not_impl_pseudo HC05 o HC05_not_impl_pseudo ⊙ le_w16 〈〈x0,x0〉:〈x0,x1〉〉 (get_pseudo_count HC05 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC05)) ⊗
- (⊖ (test_not_impl_pseudo HC05 o HC05_not_impl_pseudo) ⊙ eq_w16 (get_pseudo_count HC05 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC05) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* HC05: modalita' non implementate come da manuale *)
-ndefinition HC05_not_impl_mode ≝
- [ MODE_INHH ; MODE_SP1 ; MODE_SP2 ; MODE_DIR1_to_DIR1
- ; MODE_IMM1_to_DIR1 ; MODE_IX0p_to_DIR1 ; MODE_DIR1_to_IX0p
- ; MODE_INHA_and_IMM1 ; MODE_INHX_and_IMM1 ; MODE_IMM1_and_IMM1
- ; MODE_DIR1_and_IMM1 ; MODE_IX0_and_IMM1 ; MODE_IX0p_and_IMM1
- ; MODE_IX1_and_IMM1 ; MODE_IX1p_and_IMM1 ; MODE_SP1_and_IMM1
- ; MODE_TNY x0 ; MODE_TNY x1 ; MODE_TNY x2 ; MODE_TNY x3
- ; MODE_TNY x4 ; MODE_TNY x5 ; MODE_TNY x6 ; MODE_TNY x7
- ; MODE_TNY x8 ; MODE_TNY x9 ; MODE_TNY xA ; MODE_TNY xB
- ; MODE_TNY xC ; MODE_TNY xD ; MODE_TNY xE ; MODE_TNY xF
- ; MODE_SRT t00 ; MODE_SRT t01 ; MODE_SRT t02 ; MODE_SRT t03
- ; MODE_SRT t04 ; MODE_SRT t05 ; MODE_SRT t06 ; MODE_SRT t07
- ; MODE_SRT t08 ; MODE_SRT t09 ; MODE_SRT t0A ; MODE_SRT t0B
- ; MODE_SRT t0C ; MODE_SRT t0D ; MODE_SRT t0E ; MODE_SRT t0F
- ; MODE_SRT t10 ; MODE_SRT t11 ; MODE_SRT t12 ; MODE_SRT t13
- ; MODE_SRT t14 ; MODE_SRT t15 ; MODE_SRT t16 ; MODE_SRT t17
- ; MODE_SRT t18 ; MODE_SRT t19 ; MODE_SRT t1A ; MODE_SRT t1B
- ; MODE_SRT t1C ; MODE_SRT t1D ; MODE_SRT t1E ; MODE_SRT t1F ].
-
-nlemma ok_mode_table_HC05 : forall_Freescale_im (λi.
- (test_not_impl_mode HC05 i HC05_not_impl_mode ⊙ le_w16 〈〈x0,x0〉:〈x0,x1〉〉 (get_mode_count HC05 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC05)) ⊗
- (⊖ (test_not_impl_mode HC05 i HC05_not_impl_mode) ⊙ eq_w16 (get_mode_count HC05 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC05) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-nlemma ok_PsIm_table_HC05 :
- forall_Freescale_im (λi:Freescale_instr_mode.
- forall_Freescale_pseudo (λps:Freescale_pseudo.
- le_w16 (get_PsIm_count HC05 ps i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC05) 〈〈x0,x0〉:〈x0,x1〉〉)) = true.
- napply refl_eq.
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/Freescale_pseudo.ma".
-include "emulator/opcodes/Freescale_instr_mode.ma".
-include "emulator/opcodes/byte_or_word.ma".
-include "common/list.ma".
-
-(* ***************** *)
-(* TABELLA DELL'HC08 *)
-(* ***************** *)
-
-(* definizione come concatenazione finale di liste per velocizzare il parsing *)
-(* ogni riga e' [pseudo] [modalita' indirizzamento] [opcode esadecimale] [#cicli esecuzione] *)
-
-ndefinition opcode_table_HC08_1 ≝
-[
- quadruple … ADC MODE_IMM1 (Byte 〈xA,x9〉) 〈x0,x2〉
-; quadruple … ADC MODE_DIR1 (Byte 〈xB,x9〉) 〈x0,x3〉
-; quadruple … ADC MODE_DIR2 (Byte 〈xC,x9〉) 〈x0,x4〉
-; quadruple … ADC MODE_IX2 (Byte 〈xD,x9〉) 〈x0,x4〉
-; quadruple … ADC MODE_IX1 (Byte 〈xE,x9〉) 〈x0,x3〉
-; quadruple … ADC MODE_IX0 (Byte 〈xF,x9〉) 〈x0,x2〉
-; quadruple … ADC MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x9〉〉) 〈x0,x5〉
-; quadruple … ADC MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x9〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_2 ≝
-[
- quadruple … ADD MODE_IMM1 (Byte 〈xA,xB〉) 〈x0,x2〉
-; quadruple … ADD MODE_DIR1 (Byte 〈xB,xB〉) 〈x0,x3〉
-; quadruple … ADD MODE_DIR2 (Byte 〈xC,xB〉) 〈x0,x4〉
-; quadruple … ADD MODE_IX2 (Byte 〈xD,xB〉) 〈x0,x4〉
-; quadruple … ADD MODE_IX1 (Byte 〈xE,xB〉) 〈x0,x3〉
-; quadruple … ADD MODE_IX0 (Byte 〈xF,xB〉) 〈x0,x2〉
-; quadruple … ADD MODE_SP2 (Word 〈〈x9,xE〉:〈xD,xB〉〉) 〈x0,x5〉
-; quadruple … ADD MODE_SP1 (Word 〈〈x9,xE〉:〈xE,xB〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_3 ≝
-[
- quadruple … AND MODE_IMM1 (Byte 〈xA,x4〉) 〈x0,x2〉
-; quadruple … AND MODE_DIR1 (Byte 〈xB,x4〉) 〈x0,x3〉
-; quadruple … AND MODE_DIR2 (Byte 〈xC,x4〉) 〈x0,x4〉
-; quadruple … AND MODE_IX2 (Byte 〈xD,x4〉) 〈x0,x4〉
-; quadruple … AND MODE_IX1 (Byte 〈xE,x4〉) 〈x0,x3〉
-; quadruple … AND MODE_IX0 (Byte 〈xF,x4〉) 〈x0,x2〉
-; quadruple … AND MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x4〉〉) 〈x0,x5〉
-; quadruple … AND MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x4〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_4 ≝
-[
- quadruple … ASL MODE_DIR1 (Byte 〈x3,x8〉) 〈x0,x4〉
-; quadruple … ASL MODE_INHA (Byte 〈x4,x8〉) 〈x0,x1〉
-; quadruple … ASL MODE_INHX (Byte 〈x5,x8〉) 〈x0,x1〉
-; quadruple … ASL MODE_IX1 (Byte 〈x6,x8〉) 〈x0,x4〉
-; quadruple … ASL MODE_IX0 (Byte 〈x7,x8〉) 〈x0,x3〉
-; quadruple … ASL MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x8〉〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC08_5 ≝
-[
- quadruple … ASR MODE_DIR1 (Byte 〈x3,x7〉) 〈x0,x4〉
-; quadruple … ASR MODE_INHA (Byte 〈x4,x7〉) 〈x0,x1〉
-; quadruple … ASR MODE_INHX (Byte 〈x5,x7〉) 〈x0,x1〉
-; quadruple … ASR MODE_IX1 (Byte 〈x6,x7〉) 〈x0,x4〉
-; quadruple … ASR MODE_IX0 (Byte 〈x7,x7〉) 〈x0,x3〉
-; quadruple … ASR MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x7〉〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC08_6 ≝
-[
- quadruple … BRA MODE_IMM1 (Byte 〈x2,x0〉) 〈x0,x3〉
-; quadruple … BRN MODE_IMM1 (Byte 〈x2,x1〉) 〈x0,x3〉
-; quadruple … BHI MODE_IMM1 (Byte 〈x2,x2〉) 〈x0,x3〉
-; quadruple … BLS MODE_IMM1 (Byte 〈x2,x3〉) 〈x0,x3〉
-; quadruple … BCC MODE_IMM1 (Byte 〈x2,x4〉) 〈x0,x3〉
-; quadruple … BCS MODE_IMM1 (Byte 〈x2,x5〉) 〈x0,x3〉
-; quadruple … BNE MODE_IMM1 (Byte 〈x2,x6〉) 〈x0,x3〉
-; quadruple … BEQ MODE_IMM1 (Byte 〈x2,x7〉) 〈x0,x3〉
-; quadruple … BHCC MODE_IMM1 (Byte 〈x2,x8〉) 〈x0,x3〉
-; quadruple … BHCS MODE_IMM1 (Byte 〈x2,x9〉) 〈x0,x3〉
-; quadruple … BPL MODE_IMM1 (Byte 〈x2,xA〉) 〈x0,x3〉
-; quadruple … BMI MODE_IMM1 (Byte 〈x2,xB〉) 〈x0,x3〉
-; quadruple … BMC MODE_IMM1 (Byte 〈x2,xC〉) 〈x0,x3〉
-; quadruple … BMS MODE_IMM1 (Byte 〈x2,xD〉) 〈x0,x3〉
-; quadruple … BIL MODE_IMM1 (Byte 〈x2,xE〉) 〈x0,x3〉
-; quadruple … BIH MODE_IMM1 (Byte 〈x2,xF〉) 〈x0,x3〉
-; quadruple … BGE MODE_IMM1 (Byte 〈x9,x0〉) 〈x0,x3〉
-; quadruple … BLT MODE_IMM1 (Byte 〈x9,x1〉) 〈x0,x3〉
-; quadruple … BGT MODE_IMM1 (Byte 〈x9,x2〉) 〈x0,x3〉
-; quadruple … BLE MODE_IMM1 (Byte 〈x9,x3〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_HC08_7 ≝
-[
- quadruple … BSETn (MODE_DIRn o0) (Byte 〈x1,x0〉) 〈x0,x4〉
-; quadruple … BCLRn (MODE_DIRn o0) (Byte 〈x1,x1〉) 〈x0,x4〉
-; quadruple … BSETn (MODE_DIRn o1) (Byte 〈x1,x2〉) 〈x0,x4〉
-; quadruple … BCLRn (MODE_DIRn o1) (Byte 〈x1,x3〉) 〈x0,x4〉
-; quadruple … BSETn (MODE_DIRn o2) (Byte 〈x1,x4〉) 〈x0,x4〉
-; quadruple … BCLRn (MODE_DIRn o2) (Byte 〈x1,x5〉) 〈x0,x4〉
-; quadruple … BSETn (MODE_DIRn o3) (Byte 〈x1,x6〉) 〈x0,x4〉
-; quadruple … BCLRn (MODE_DIRn o3) (Byte 〈x1,x7〉) 〈x0,x4〉
-; quadruple … BSETn (MODE_DIRn o4) (Byte 〈x1,x8〉) 〈x0,x4〉
-; quadruple … BCLRn (MODE_DIRn o4) (Byte 〈x1,x9〉) 〈x0,x4〉
-; quadruple … BSETn (MODE_DIRn o5) (Byte 〈x1,xA〉) 〈x0,x4〉
-; quadruple … BCLRn (MODE_DIRn o5) (Byte 〈x1,xB〉) 〈x0,x4〉
-; quadruple … BSETn (MODE_DIRn o6) (Byte 〈x1,xC〉) 〈x0,x4〉
-; quadruple … BCLRn (MODE_DIRn o6) (Byte 〈x1,xD〉) 〈x0,x4〉
-; quadruple … BSETn (MODE_DIRn o7) (Byte 〈x1,xE〉) 〈x0,x4〉
-; quadruple … BCLRn (MODE_DIRn o7) (Byte 〈x1,xF〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_8 ≝
-[
- quadruple … BRSETn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x0〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x1〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x2〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x3〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x4〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x5〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x6〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x7〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x8〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x9〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xA〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xB〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xC〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xD〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xE〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xF〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC08_9 ≝
-[
- quadruple … BIT MODE_IMM1 (Byte 〈xA,x5〉) 〈x0,x2〉
-; quadruple … BIT MODE_DIR1 (Byte 〈xB,x5〉) 〈x0,x3〉
-; quadruple … BIT MODE_DIR2 (Byte 〈xC,x5〉) 〈x0,x4〉
-; quadruple … BIT MODE_IX2 (Byte 〈xD,x5〉) 〈x0,x4〉
-; quadruple … BIT MODE_IX1 (Byte 〈xE,x5〉) 〈x0,x3〉
-; quadruple … BIT MODE_IX0 (Byte 〈xF,x5〉) 〈x0,x2〉
-; quadruple … BIT MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x5〉〉) 〈x0,x5〉
-; quadruple … BIT MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x5〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_10 ≝
-[
- quadruple … MUL MODE_INH (Byte 〈x4,x2〉) 〈x0,x5〉
-; quadruple … DIV MODE_INH (Byte 〈x5,x2〉) 〈x0,x7〉
-; quadruple … NSA MODE_INH (Byte 〈x6,x2〉) 〈x0,x3〉
-; quadruple … DAA MODE_INH (Byte 〈x7,x2〉) 〈x0,x2〉
-; quadruple … RTI MODE_INH (Byte 〈x8,x0〉) 〈x0,x7〉
-; quadruple … RTS MODE_INH (Byte 〈x8,x1〉) 〈x0,x4〉
-; quadruple … SWI MODE_INH (Byte 〈x8,x3〉) 〈x0,x9〉
-; quadruple … TAP MODE_INH (Byte 〈x8,x4〉) 〈x0,x2〉
-; quadruple … TPA MODE_INH (Byte 〈x8,x5〉) 〈x0,x1〉
-; quadruple … PULA MODE_INH (Byte 〈x8,x6〉) 〈x0,x2〉
-; quadruple … PSHA MODE_INH (Byte 〈x8,x7〉) 〈x0,x2〉
-; quadruple … PULX MODE_INH (Byte 〈x8,x8〉) 〈x0,x2〉
-; quadruple … PSHX MODE_INH (Byte 〈x8,x9〉) 〈x0,x2〉
-; quadruple … PULH MODE_INH (Byte 〈x8,xA〉) 〈x0,x2〉
-; quadruple … PSHH MODE_INH (Byte 〈x8,xB〉) 〈x0,x2〉
-; quadruple … STOP MODE_INH (Byte 〈x8,xE〉) 〈x0,x1〉
-; quadruple … WAIT MODE_INH (Byte 〈x8,xF〉) 〈x0,x1〉
-; quadruple … TXS MODE_INH (Byte 〈x9,x4〉) 〈x0,x2〉
-; quadruple … TSX MODE_INH (Byte 〈x9,x5〉) 〈x0,x2〉
-; quadruple … TAX MODE_INH (Byte 〈x9,x7〉) 〈x0,x1〉
-; quadruple … CLC MODE_INH (Byte 〈x9,x8〉) 〈x0,x1〉
-; quadruple … SEC MODE_INH (Byte 〈x9,x9〉) 〈x0,x1〉
-; quadruple … CLI MODE_INH (Byte 〈x9,xA〉) 〈x0,x2〉
-; quadruple … SEI MODE_INH (Byte 〈x9,xB〉) 〈x0,x2〉
-; quadruple … RSP MODE_INH (Byte 〈x9,xC〉) 〈x0,x1〉
-; quadruple … NOP MODE_INH (Byte 〈x9,xD〉) 〈x0,x1〉
-; quadruple … TXA MODE_INH (Byte 〈x9,xF〉) 〈x0,x1〉
-; quadruple … AIS MODE_IMM1 (Byte 〈xA,x7〉) 〈x0,x2〉
-; quadruple … AIX MODE_IMM1 (Byte 〈xA,xF〉) 〈x0,x2〉
-].
-
-ndefinition opcode_table_HC08_11 ≝
-[
- quadruple … CBEQA MODE_DIR1_and_IMM1 (Byte 〈x3,x1〉) 〈x0,x5〉
-; quadruple … CBEQA MODE_IMM1_and_IMM1 (Byte 〈x4,x1〉) 〈x0,x4〉
-; quadruple … CBEQX MODE_IMM1_and_IMM1 (Byte 〈x5,x1〉) 〈x0,x4〉
-; quadruple … CBEQA MODE_IX1p_and_IMM1 (Byte 〈x6,x1〉) 〈x0,x5〉
-; quadruple … CBEQA MODE_IX0p_and_IMM1 (Byte 〈x7,x1〉) 〈x0,x4〉
-; quadruple … CBEQA MODE_SP1_and_IMM1 (Word 〈〈x9,xE〉:〈x6,x1〉〉) 〈x0,x6〉
-].
-
-ndefinition opcode_table_HC08_12 ≝
-[
- quadruple … CLR MODE_DIR1 (Byte 〈x3,xF〉) 〈x0,x3〉
-; quadruple … CLR MODE_INHA (Byte 〈x4,xF〉) 〈x0,x1〉
-; quadruple … CLR MODE_INHX (Byte 〈x5,xF〉) 〈x0,x1〉
-; quadruple … CLR MODE_IX1 (Byte 〈x6,xF〉) 〈x0,x3〉
-; quadruple … CLR MODE_IX0 (Byte 〈x7,xF〉) 〈x0,x2〉
-; quadruple … CLR MODE_INHH (Byte 〈x8,xC〉) 〈x0,x1〉
-; quadruple … CLR MODE_SP1 (Word 〈〈x9,xE〉:〈x6,xF〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_13 ≝
-[
- quadruple … CMP MODE_IMM1 (Byte 〈xA,x1〉) 〈x0,x2〉
-; quadruple … CMP MODE_DIR1 (Byte 〈xB,x1〉) 〈x0,x3〉
-; quadruple … CMP MODE_DIR2 (Byte 〈xC,x1〉) 〈x0,x4〉
-; quadruple … CMP MODE_IX2 (Byte 〈xD,x1〉) 〈x0,x4〉
-; quadruple … CMP MODE_IX1 (Byte 〈xE,x1〉) 〈x0,x3〉
-; quadruple … CMP MODE_IX0 (Byte 〈xF,x1〉) 〈x0,x2〉
-; quadruple … CMP MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x1〉〉) 〈x0,x5〉
-; quadruple … CMP MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x1〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_14 ≝
-[
- quadruple … COM MODE_DIR1 (Byte 〈x3,x3〉) 〈x0,x4〉
-; quadruple … COM MODE_INHA (Byte 〈x4,x3〉) 〈x0,x1〉
-; quadruple … COM MODE_INHX (Byte 〈x5,x3〉) 〈x0,x1〉
-; quadruple … COM MODE_IX1 (Byte 〈x6,x3〉) 〈x0,x4〉
-; quadruple … COM MODE_IX0 (Byte 〈x7,x3〉) 〈x0,x3〉
-; quadruple … COM MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x3〉〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC08_15 ≝
-[
- quadruple … STHX MODE_DIR1 (Byte 〈x3,x5〉) 〈x0,x4〉
-; quadruple … LDHX MODE_IMM2 (Byte 〈x4,x5〉) 〈x0,x3〉
-; quadruple … LDHX MODE_DIR1 (Byte 〈x5,x5〉) 〈x0,x4〉
-; quadruple … CPHX MODE_IMM2 (Byte 〈x6,x5〉) 〈x0,x3〉
-; quadruple … CPHX MODE_DIR1 (Byte 〈x7,x5〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_16 ≝
-[
- quadruple … CPX MODE_IMM1 (Byte 〈xA,x3〉) 〈x0,x2〉
-; quadruple … CPX MODE_DIR1 (Byte 〈xB,x3〉) 〈x0,x3〉
-; quadruple … CPX MODE_DIR2 (Byte 〈xC,x3〉) 〈x0,x4〉
-; quadruple … CPX MODE_IX2 (Byte 〈xD,x3〉) 〈x0,x4〉
-; quadruple … CPX MODE_IX1 (Byte 〈xE,x3〉) 〈x0,x3〉
-; quadruple … CPX MODE_IX0 (Byte 〈xF,x3〉) 〈x0,x2〉
-; quadruple … CPX MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x3〉〉) 〈x0,x5〉
-; quadruple … CPX MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x3〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_17 ≝
-[
- quadruple … DBNZ MODE_DIR1_and_IMM1 (Byte 〈x3,xB〉) 〈x0,x5〉
-; quadruple … DBNZ MODE_INHA_and_IMM1 (Byte 〈x4,xB〉) 〈x0,x3〉
-; quadruple … DBNZ MODE_INHX_and_IMM1 (Byte 〈x5,xB〉) 〈x0,x3〉
-; quadruple … DBNZ MODE_IX1_and_IMM1 (Byte 〈x6,xB〉) 〈x0,x5〉
-; quadruple … DBNZ MODE_IX0_and_IMM1 (Byte 〈x7,xB〉) 〈x0,x4〉
-; quadruple … DBNZ MODE_SP1_and_IMM1 (Word 〈〈x9,xE〉:〈x6,xB〉〉) 〈x0,x6〉
-].
-
-ndefinition opcode_table_HC08_18 ≝
-[
- quadruple … DEC MODE_DIR1 (Byte 〈x3,xA〉) 〈x0,x4〉
-; quadruple … DEC MODE_INHA (Byte 〈x4,xA〉) 〈x0,x1〉
-; quadruple … DEC MODE_INHX (Byte 〈x5,xA〉) 〈x0,x1〉
-; quadruple … DEC MODE_IX1 (Byte 〈x6,xA〉) 〈x0,x4〉
-; quadruple … DEC MODE_IX0 (Byte 〈x7,xA〉) 〈x0,x3〉
-; quadruple … DEC MODE_SP1 (Word 〈〈x9,xE〉:〈x6,xA〉〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC08_19 ≝
-[
- quadruple … EOR MODE_IMM1 (Byte 〈xA,x8〉) 〈x0,x2〉
-; quadruple … EOR MODE_DIR1 (Byte 〈xB,x8〉) 〈x0,x3〉
-; quadruple … EOR MODE_DIR2 (Byte 〈xC,x8〉) 〈x0,x4〉
-; quadruple … EOR MODE_IX2 (Byte 〈xD,x8〉) 〈x0,x4〉
-; quadruple … EOR MODE_IX1 (Byte 〈xE,x8〉) 〈x0,x3〉
-; quadruple … EOR MODE_IX0 (Byte 〈xF,x8〉) 〈x0,x2〉
-; quadruple … EOR MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x8〉〉) 〈x0,x5〉
-; quadruple … EOR MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x8〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_20 ≝
-[
- quadruple … INC MODE_DIR1 (Byte 〈x3,xC〉) 〈x0,x4〉
-; quadruple … INC MODE_INHA (Byte 〈x4,xC〉) 〈x0,x1〉
-; quadruple … INC MODE_INHX (Byte 〈x5,xC〉) 〈x0,x1〉
-; quadruple … INC MODE_IX1 (Byte 〈x6,xC〉) 〈x0,x4〉
-; quadruple … INC MODE_IX0 (Byte 〈x7,xC〉) 〈x0,x3〉
-; quadruple … INC MODE_SP1 (Word 〈〈x9,xE〉:〈x6,xC〉〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC08_21 ≝
-[
- quadruple … JMP MODE_IMM1EXT (Byte 〈xB,xC〉) 〈x0,x2〉
-; quadruple … JMP MODE_IMM2 (Byte 〈xC,xC〉) 〈x0,x3〉
-; quadruple … JMP MODE_INHX2ADD (Byte 〈xD,xC〉) 〈x0,x4〉
-; quadruple … JMP MODE_INHX1ADD (Byte 〈xE,xC〉) 〈x0,x3〉
-; quadruple … JMP MODE_INHX0ADD (Byte 〈xF,xC〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_HC08_22 ≝
-[
- quadruple … BSR MODE_IMM1 (Byte 〈xA,xD〉) 〈x0,x4〉
-; quadruple … JSR MODE_IMM1EXT (Byte 〈xB,xD〉) 〈x0,x4〉
-; quadruple … JSR MODE_IMM2 (Byte 〈xC,xD〉) 〈x0,x5〉
-; quadruple … JSR MODE_INHX2ADD (Byte 〈xD,xD〉) 〈x0,x6〉
-; quadruple … JSR MODE_INHX1ADD (Byte 〈xE,xD〉) 〈x0,x5〉
-; quadruple … JSR MODE_INHX0ADD (Byte 〈xF,xD〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_23 ≝
-[
- quadruple … LDA MODE_IMM1 (Byte 〈xA,x6〉) 〈x0,x2〉
-; quadruple … LDA MODE_DIR1 (Byte 〈xB,x6〉) 〈x0,x3〉
-; quadruple … LDA MODE_DIR2 (Byte 〈xC,x6〉) 〈x0,x4〉
-; quadruple … LDA MODE_IX2 (Byte 〈xD,x6〉) 〈x0,x4〉
-; quadruple … LDA MODE_IX1 (Byte 〈xE,x6〉) 〈x0,x3〉
-; quadruple … LDA MODE_IX0 (Byte 〈xF,x6〉) 〈x0,x2〉
-; quadruple … LDA MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x6〉〉) 〈x0,x5〉
-; quadruple … LDA MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x6〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_24 ≝
-[
- quadruple … LDX MODE_IMM1 (Byte 〈xA,xE〉) 〈x0,x2〉
-; quadruple … LDX MODE_DIR1 (Byte 〈xB,xE〉) 〈x0,x3〉
-; quadruple … LDX MODE_DIR2 (Byte 〈xC,xE〉) 〈x0,x4〉
-; quadruple … LDX MODE_IX2 (Byte 〈xD,xE〉) 〈x0,x4〉
-; quadruple … LDX MODE_IX1 (Byte 〈xE,xE〉) 〈x0,x3〉
-; quadruple … LDX MODE_IX0 (Byte 〈xF,xE〉) 〈x0,x2〉
-; quadruple … LDX MODE_SP2 (Word 〈〈x9,xE〉:〈xD,xE〉〉) 〈x0,x5〉
-; quadruple … LDX MODE_SP1 (Word 〈〈x9,xE〉:〈xE,xE〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_25 ≝
-[
- quadruple … LSR MODE_DIR1 (Byte 〈x3,x4〉) 〈x0,x4〉
-; quadruple … LSR MODE_INHA (Byte 〈x4,x4〉) 〈x0,x1〉
-; quadruple … LSR MODE_INHX (Byte 〈x5,x4〉) 〈x0,x1〉
-; quadruple … LSR MODE_IX1 (Byte 〈x6,x4〉) 〈x0,x4〉
-; quadruple … LSR MODE_IX0 (Byte 〈x7,x4〉) 〈x0,x3〉
-; quadruple … LSR MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x4〉〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC08_26 ≝
-[
- quadruple … MOV MODE_DIR1_to_DIR1 (Byte 〈x4,xE〉) 〈x0,x5〉
-; quadruple … MOV MODE_DIR1_to_IX0p (Byte 〈x5,xE〉) 〈x0,x4〉
-; quadruple … MOV MODE_IMM1_to_DIR1 (Byte 〈x6,xE〉) 〈x0,x4〉
-; quadruple … MOV MODE_IX0p_to_DIR1 (Byte 〈x7,xE〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_27 ≝
-[
- quadruple … NEG MODE_DIR1 (Byte 〈x3,x0〉) 〈x0,x4〉
-; quadruple … NEG MODE_INHA (Byte 〈x4,x0〉) 〈x0,x1〉
-; quadruple … NEG MODE_INHX (Byte 〈x5,x0〉) 〈x0,x1〉
-; quadruple … NEG MODE_IX1 (Byte 〈x6,x0〉) 〈x0,x4〉
-; quadruple … NEG MODE_IX0 (Byte 〈x7,x0〉) 〈x0,x3〉
-; quadruple … NEG MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x0〉〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC08_28 ≝
-[
- quadruple … ORA MODE_IMM1 (Byte 〈xA,xA〉) 〈x0,x2〉
-; quadruple … ORA MODE_DIR1 (Byte 〈xB,xA〉) 〈x0,x3〉
-; quadruple … ORA MODE_DIR2 (Byte 〈xC,xA〉) 〈x0,x4〉
-; quadruple … ORA MODE_IX2 (Byte 〈xD,xA〉) 〈x0,x4〉
-; quadruple … ORA MODE_IX1 (Byte 〈xE,xA〉) 〈x0,x3〉
-; quadruple … ORA MODE_IX0 (Byte 〈xF,xA〉) 〈x0,x2〉
-; quadruple … ORA MODE_SP2 (Word 〈〈x9,xE〉:〈xD,xA〉〉) 〈x0,x5〉
-; quadruple … ORA MODE_SP1 (Word 〈〈x9,xE〉:〈xE,xA〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_29 ≝
-[
- quadruple … ROL MODE_DIR1 (Byte 〈x3,x9〉) 〈x0,x4〉
-; quadruple … ROL MODE_INHA (Byte 〈x4,x9〉) 〈x0,x1〉
-; quadruple … ROL MODE_INHX (Byte 〈x5,x9〉) 〈x0,x1〉
-; quadruple … ROL MODE_IX1 (Byte 〈x6,x9〉) 〈x0,x4〉
-; quadruple … ROL MODE_IX0 (Byte 〈x7,x9〉) 〈x0,x3〉
-; quadruple … ROL MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x9〉〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC08_30 ≝
-[
- quadruple … ROR MODE_DIR1 (Byte 〈x3,x6〉) 〈x0,x4〉
-; quadruple … ROR MODE_INHA (Byte 〈x4,x6〉) 〈x0,x1〉
-; quadruple … ROR MODE_INHX (Byte 〈x5,x6〉) 〈x0,x1〉
-; quadruple … ROR MODE_IX1 (Byte 〈x6,x6〉) 〈x0,x4〉
-; quadruple … ROR MODE_IX0 (Byte 〈x7,x6〉) 〈x0,x3〉
-; quadruple … ROR MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x6〉〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HC08_31 ≝
-[
- quadruple … SBC MODE_IMM1 (Byte 〈xA,x2〉) 〈x0,x2〉
-; quadruple … SBC MODE_DIR1 (Byte 〈xB,x2〉) 〈x0,x3〉
-; quadruple … SBC MODE_DIR2 (Byte 〈xC,x2〉) 〈x0,x4〉
-; quadruple … SBC MODE_IX2 (Byte 〈xD,x2〉) 〈x0,x4〉
-; quadruple … SBC MODE_IX1 (Byte 〈xE,x2〉) 〈x0,x3〉
-; quadruple … SBC MODE_IX0 (Byte 〈xF,x2〉) 〈x0,x2〉
-; quadruple … SBC MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x2〉〉) 〈x0,x5〉
-; quadruple … SBC MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x2〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_32 ≝
-[
- quadruple … STA MODE_DIR1 (Byte 〈xB,x7〉) 〈x0,x3〉
-; quadruple … STA MODE_DIR2 (Byte 〈xC,x7〉) 〈x0,x4〉
-; quadruple … STA MODE_IX2 (Byte 〈xD,x7〉) 〈x0,x4〉
-; quadruple … STA MODE_IX1 (Byte 〈xE,x7〉) 〈x0,x3〉
-; quadruple … STA MODE_IX0 (Byte 〈xF,x7〉) 〈x0,x2〉
-; quadruple … STA MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x7〉〉) 〈x0,x5〉
-; quadruple … STA MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x7〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_33 ≝
-[
- quadruple … STX MODE_DIR1 (Byte 〈xB,xF〉) 〈x0,x3〉
-; quadruple … STX MODE_DIR2 (Byte 〈xC,xF〉) 〈x0,x4〉
-; quadruple … STX MODE_IX2 (Byte 〈xD,xF〉) 〈x0,x4〉
-; quadruple … STX MODE_IX1 (Byte 〈xE,xF〉) 〈x0,x3〉
-; quadruple … STX MODE_IX0 (Byte 〈xF,xF〉) 〈x0,x2〉
-; quadruple … STX MODE_SP2 (Word 〈〈x9,xE〉:〈xD,xF〉〉) 〈x0,x5〉
-; quadruple … STX MODE_SP1 (Word 〈〈x9,xE〉:〈xE,xF〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_34 ≝
-[
- quadruple … SUB MODE_IMM1 (Byte 〈xA,x0〉) 〈x0,x2〉
-; quadruple … SUB MODE_DIR1 (Byte 〈xB,x0〉) 〈x0,x3〉
-; quadruple … SUB MODE_DIR2 (Byte 〈xC,x0〉) 〈x0,x4〉
-; quadruple … SUB MODE_IX2 (Byte 〈xD,x0〉) 〈x0,x4〉
-; quadruple … SUB MODE_IX1 (Byte 〈xE,x0〉) 〈x0,x3〉
-; quadruple … SUB MODE_IX0 (Byte 〈xF,x0〉) 〈x0,x2〉
-; quadruple … SUB MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x0〉〉) 〈x0,x5〉
-; quadruple … SUB MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x0〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08_35 ≝
-[
- quadruple … TST MODE_DIR1 (Byte 〈x3,xD〉) 〈x0,x3〉
-; quadruple … TST MODE_INHA (Byte 〈x4,xD〉) 〈x0,x1〉
-; quadruple … TST MODE_INHX (Byte 〈x5,xD〉) 〈x0,x1〉
-; quadruple … TST MODE_IX1 (Byte 〈x6,xD〉) 〈x0,x3〉
-; quadruple … TST MODE_IX0 (Byte 〈x7,xD〉) 〈x0,x2〉
-; quadruple … TST MODE_SP1 (Word 〈〈x9,xE〉:〈x6,xD〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HC08 ≝
-opcode_table_HC08_1 @ opcode_table_HC08_2 @ opcode_table_HC08_3 @ opcode_table_HC08_4 @
-opcode_table_HC08_5 @ opcode_table_HC08_6 @ opcode_table_HC08_7 @ opcode_table_HC08_8 @
-opcode_table_HC08_9 @ opcode_table_HC08_10 @ opcode_table_HC08_11 @ opcode_table_HC08_12 @
-opcode_table_HC08_13 @ opcode_table_HC08_14 @ opcode_table_HC08_15 @ opcode_table_HC08_16 @
-opcode_table_HC08_17 @ opcode_table_HC08_18 @ opcode_table_HC08_19 @ opcode_table_HC08_20 @
-opcode_table_HC08_21 @ opcode_table_HC08_22 @ opcode_table_HC08_23 @ opcode_table_HC08_24 @
-opcode_table_HC08_25 @ opcode_table_HC08_26 @ opcode_table_HC08_27 @ opcode_table_HC08_28 @
-opcode_table_HC08_29 @ opcode_table_HC08_30 @ opcode_table_HC08_31 @ opcode_table_HC08_32 @
-opcode_table_HC08_33 @ opcode_table_HC08_34 @ opcode_table_HC08_35.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/pseudo.ma".
-include "emulator/opcodes/HC08_table.ma".
-
-(* ***************** *)
-(* TABELLA DELL'HC08 *)
-(* ***************** *)
-
-(* HC08: opcode non implementati come da manuale (byte) *)
-ndefinition HC08_not_impl_byte ≝
- [〈x3,x2〉;〈x3,xE〉
- ;〈x8,x2〉;〈x8,xD〉
- ;〈x9,x6〉;〈x9,xE〉
- ;〈xA,xC〉
- ].
-
-nlemma ok_byte_table_HC08 : forall_b8 (λb.
- (test_not_impl_byte b HC08_not_impl_byte ⊙ eq_w16 (get_byte_count HC08 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08) 〈〈x0,x0〉:〈x0,x1〉〉) ⊗
- (⊖ (test_not_impl_byte b HC08_not_impl_byte) ⊙ eq_w16 (get_byte_count HC08 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* HC08: opcode non implementati come da manuale (0x9E+byte) *)
-ndefinition HC08_not_impl_word ≝
- [〈x0,x0〉;〈x0,x1〉;〈x0,x2〉;〈x0,x3〉;〈x0,x4〉;〈x0,x5〉;〈x0,x6〉;〈x0,x7〉
- ;〈x0,x8〉;〈x0,x9〉;〈x0,xA〉;〈x0,xB〉;〈x0,xC〉;〈x0,xD〉;〈x0,xE〉;〈x0,xF〉
- ;〈x1,x0〉;〈x1,x1〉;〈x1,x2〉;〈x1,x3〉;〈x1,x4〉;〈x1,x5〉;〈x1,x6〉;〈x1,x7〉
- ;〈x1,x8〉;〈x1,x9〉;〈x1,xA〉;〈x1,xB〉;〈x1,xC〉;〈x1,xD〉;〈x1,xE〉;〈x1,xF〉
- ;〈x2,x0〉;〈x2,x1〉;〈x2,x2〉;〈x2,x3〉;〈x2,x4〉;〈x2,x5〉;〈x2,x6〉;〈x2,x7〉
- ;〈x2,x8〉;〈x2,x9〉;〈x2,xA〉;〈x2,xB〉;〈x2,xC〉;〈x2,xD〉;〈x2,xE〉;〈x2,xF〉
- ;〈x3,x0〉;〈x3,x1〉;〈x3,x2〉;〈x3,x3〉;〈x3,x4〉;〈x3,x5〉;〈x3,x6〉;〈x3,x7〉
- ;〈x3,x8〉;〈x3,x9〉;〈x3,xA〉;〈x3,xB〉;〈x3,xC〉;〈x3,xD〉;〈x3,xE〉;〈x3,xF〉
- ;〈x4,x0〉;〈x4,x1〉;〈x4,x2〉;〈x4,x3〉;〈x4,x4〉;〈x4,x5〉;〈x4,x6〉;〈x4,x7〉
- ;〈x4,x8〉;〈x4,x9〉;〈x4,xA〉;〈x4,xB〉;〈x4,xC〉;〈x4,xD〉;〈x4,xE〉;〈x4,xF〉
- ;〈x5,x0〉;〈x5,x1〉;〈x5,x2〉;〈x5,x3〉;〈x5,x4〉;〈x5,x5〉;〈x5,x6〉;〈x5,x7〉
- ;〈x5,x8〉;〈x5,x9〉;〈x5,xA〉;〈x5,xB〉;〈x5,xC〉;〈x5,xD〉;〈x5,xE〉;〈x5,xF〉
- ;〈x6,x2〉;〈x6,x5〉;〈x6,xE〉
- ;〈x7,x0〉;〈x7,x1〉;〈x7,x2〉;〈x7,x3〉;〈x7,x4〉;〈x7,x5〉;〈x7,x6〉;〈x7,x7〉
- ;〈x7,x8〉;〈x7,x9〉;〈x7,xA〉;〈x7,xB〉;〈x7,xC〉;〈x7,xD〉;〈x7,xE〉;〈x7,xF〉
- ;〈x8,x0〉;〈x8,x1〉;〈x8,x2〉;〈x8,x3〉;〈x8,x4〉;〈x8,x5〉;〈x8,x6〉;〈x8,x7〉
- ;〈x8,x8〉;〈x8,x9〉;〈x8,xA〉;〈x8,xB〉;〈x8,xC〉;〈x8,xD〉;〈x8,xE〉;〈x8,xF〉
- ;〈x9,x0〉;〈x9,x1〉;〈x9,x2〉;〈x9,x3〉;〈x9,x4〉;〈x9,x5〉;〈x9,x6〉;〈x9,x7〉
- ;〈x9,x8〉;〈x9,x9〉;〈x9,xA〉;〈x9,xB〉;〈x9,xC〉;〈x9,xD〉;〈x9,xE〉;〈x9,xF〉
- ;〈xA,x0〉;〈xA,x1〉;〈xA,x2〉;〈xA,x3〉;〈xA,x4〉;〈xA,x5〉;〈xA,x6〉;〈xA,x7〉
- ;〈xA,x8〉;〈xA,x9〉;〈xA,xA〉;〈xA,xB〉;〈xA,xC〉;〈xA,xD〉;〈xA,xE〉;〈xA,xF〉
- ;〈xB,x0〉;〈xB,x1〉;〈xB,x2〉;〈xB,x3〉;〈xB,x4〉;〈xB,x5〉;〈xB,x6〉;〈xB,x7〉
- ;〈xB,x8〉;〈xB,x9〉;〈xB,xA〉;〈xB,xB〉;〈xB,xC〉;〈xB,xD〉;〈xB,xE〉;〈xB,xF〉
- ;〈xC,x0〉;〈xC,x1〉;〈xC,x2〉;〈xC,x3〉;〈xC,x4〉;〈xC,x5〉;〈xC,x6〉;〈xC,x7〉
- ;〈xC,x8〉;〈xC,x9〉;〈xC,xA〉;〈xC,xB〉;〈xC,xC〉;〈xC,xD〉;〈xC,xE〉;〈xC,xF〉
- ;〈xD,xC〉;〈xD,xD〉
- ;〈xE,xC〉;〈xE,xD〉
- ;〈xF,x0〉;〈xF,x1〉;〈xF,x2〉;〈xF,x3〉;〈xF,x4〉;〈xF,x5〉;〈xF,x6〉;〈xF,x7〉
- ;〈xF,x8〉;〈xF,x9〉;〈xF,xA〉;〈xF,xB〉;〈xF,xC〉;〈xF,xD〉;〈xF,xE〉;〈xF,xF〉
- ].
-
-nlemma ok_word_table_HC08 : forall_b8 (λb.
- (test_not_impl_byte b HC08_not_impl_word ⊙ eq_w16 (get_word_count HC08 〈〈x9,xE〉:b〉 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08) 〈〈x0,x0〉:〈x0,x1〉〉) ⊗
- (⊖ (test_not_impl_byte b HC08_not_impl_word) ⊙ eq_w16 (get_word_count HC08 〈〈x9,xE〉:b〉 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* HC08: pseudocodici non implementati come da manuale *)
-ndefinition HC08_not_impl_pseudo ≝
- [ BGND ; SHA ; SLA ].
-
-nlemma ok_pseudo_table_HC08 : forall_Freescale_pseudo (λo.
- (test_not_impl_pseudo HC08 o HC08_not_impl_pseudo ⊙ le_w16 〈〈x0,x0〉:〈x0,x1〉〉 (get_pseudo_count HC08 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08)) ⊗
- (⊖ (test_not_impl_pseudo HC08 o HC08_not_impl_pseudo) ⊙ eq_w16 (get_pseudo_count HC08 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* HC08: modalita' non implementate come da manuale *)
-ndefinition HC08_not_impl_mode ≝
- [ MODE_TNY x0 ; MODE_TNY x1 ; MODE_TNY x2 ; MODE_TNY x3
- ; MODE_TNY x4 ; MODE_TNY x5 ; MODE_TNY x6 ; MODE_TNY x7
- ; MODE_TNY x8 ; MODE_TNY x9 ; MODE_TNY xA ; MODE_TNY xB
- ; MODE_TNY xC ; MODE_TNY xD ; MODE_TNY xE ; MODE_TNY xF
- ; MODE_SRT t00 ; MODE_SRT t01 ; MODE_SRT t02 ; MODE_SRT t03
- ; MODE_SRT t04 ; MODE_SRT t05 ; MODE_SRT t06 ; MODE_SRT t07
- ; MODE_SRT t08 ; MODE_SRT t09 ; MODE_SRT t0A ; MODE_SRT t0B
- ; MODE_SRT t0C ; MODE_SRT t0D ; MODE_SRT t0E ; MODE_SRT t0F
- ; MODE_SRT t10 ; MODE_SRT t11 ; MODE_SRT t12 ; MODE_SRT t13
- ; MODE_SRT t14 ; MODE_SRT t15 ; MODE_SRT t16 ; MODE_SRT t17
- ; MODE_SRT t18 ; MODE_SRT t19 ; MODE_SRT t1A ; MODE_SRT t1B
- ; MODE_SRT t1C ; MODE_SRT t1D ; MODE_SRT t1E ; MODE_SRT t1F ].
-
-nlemma ok_mode_table_HC08 : forall_Freescale_im (λi.
- (test_not_impl_mode HC08 i HC08_not_impl_mode ⊙ le_w16 〈〈x0,x0〉:〈x0,x1〉〉 (get_mode_count HC08 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08)) ⊗
- (⊖ (test_not_impl_mode HC08 i HC08_not_impl_mode) ⊙ eq_w16 (get_mode_count HC08 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-nlemma ok_PsIm_table_HC08 :
- forall_Freescale_im (λi:Freescale_instr_mode.
- forall_Freescale_pseudo (λps:Freescale_pseudo.
- le_w16 (get_PsIm_count HC08 ps i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08) 〈〈x0,x0〉:〈x0,x1〉〉)) = true.
- napply refl_eq.
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/Freescale_pseudo.ma".
-include "emulator/opcodes/Freescale_instr_mode.ma".
-include "emulator/opcodes/byte_or_word.ma".
-include "common/list.ma".
-
-(* ****************** *)
-(* TABELLA DELL'HCS08 *)
-(* ****************** *)
-
-(* definizione come concatenazione finale di liste per velocizzare il parsing *)
-(* ogni riga e' [pseudo] [modalita' indirizzamento] [opcode esadecimale] [#cicli esecuzione] *)
-
-ndefinition opcode_table_HCS08_1 ≝
-[
- quadruple … ADC MODE_IMM1 (Byte 〈xA,x9〉) 〈x0,x2〉
-; quadruple … ADC MODE_DIR1 (Byte 〈xB,x9〉) 〈x0,x3〉
-; quadruple … ADC MODE_DIR2 (Byte 〈xC,x9〉) 〈x0,x4〉
-; quadruple … ADC MODE_IX2 (Byte 〈xD,x9〉) 〈x0,x4〉
-; quadruple … ADC MODE_IX1 (Byte 〈xE,x9〉) 〈x0,x3〉
-; quadruple … ADC MODE_IX0 (Byte 〈xF,x9〉) 〈x0,x3〉
-; quadruple … ADC MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x9〉〉) 〈x0,x5〉
-; quadruple … ADC MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x9〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HCS08_2 ≝
-[
- quadruple … ADD MODE_IMM1 (Byte 〈xA,xB〉) 〈x0,x2〉
-; quadruple … ADD MODE_DIR1 (Byte 〈xB,xB〉) 〈x0,x3〉
-; quadruple … ADD MODE_DIR2 (Byte 〈xC,xB〉) 〈x0,x4〉
-; quadruple … ADD MODE_IX2 (Byte 〈xD,xB〉) 〈x0,x4〉
-; quadruple … ADD MODE_IX1 (Byte 〈xE,xB〉) 〈x0,x3〉
-; quadruple … ADD MODE_IX0 (Byte 〈xF,xB〉) 〈x0,x3〉
-; quadruple … ADD MODE_SP2 (Word 〈〈x9,xE〉:〈xD,xB〉〉) 〈x0,x5〉
-; quadruple … ADD MODE_SP1 (Word 〈〈x9,xE〉:〈xE,xB〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HCS08_3 ≝
-[
- quadruple … AND MODE_IMM1 (Byte 〈xA,x4〉) 〈x0,x2〉
-; quadruple … AND MODE_DIR1 (Byte 〈xB,x4〉) 〈x0,x3〉
-; quadruple … AND MODE_DIR2 (Byte 〈xC,x4〉) 〈x0,x4〉
-; quadruple … AND MODE_IX2 (Byte 〈xD,x4〉) 〈x0,x4〉
-; quadruple … AND MODE_IX1 (Byte 〈xE,x4〉) 〈x0,x3〉
-; quadruple … AND MODE_IX0 (Byte 〈xF,x4〉) 〈x0,x3〉
-; quadruple … AND MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x4〉〉) 〈x0,x5〉
-; quadruple … AND MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x4〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HCS08_4 ≝
-[
- quadruple … ASL MODE_DIR1 (Byte 〈x3,x8〉) 〈x0,x5〉
-; quadruple … ASL MODE_INHA (Byte 〈x4,x8〉) 〈x0,x1〉
-; quadruple … ASL MODE_INHX (Byte 〈x5,x8〉) 〈x0,x1〉
-; quadruple … ASL MODE_IX1 (Byte 〈x6,x8〉) 〈x0,x5〉
-; quadruple … ASL MODE_IX0 (Byte 〈x7,x8〉) 〈x0,x4〉
-; quadruple … ASL MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x8〉〉) 〈x0,x6〉
-].
-
-ndefinition opcode_table_HCS08_5 ≝
-[
- quadruple … ASR MODE_DIR1 (Byte 〈x3,x7〉) 〈x0,x5〉
-; quadruple … ASR MODE_INHA (Byte 〈x4,x7〉) 〈x0,x1〉
-; quadruple … ASR MODE_INHX (Byte 〈x5,x7〉) 〈x0,x1〉
-; quadruple … ASR MODE_IX1 (Byte 〈x6,x7〉) 〈x0,x5〉
-; quadruple … ASR MODE_IX0 (Byte 〈x7,x7〉) 〈x0,x4〉
-; quadruple … ASR MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x7〉〉) 〈x0,x6〉
-].
-
-ndefinition opcode_table_HCS08_6 ≝
-[
- quadruple … BRA MODE_IMM1 (Byte 〈x2,x0〉) 〈x0,x3〉
-; quadruple … BRN MODE_IMM1 (Byte 〈x2,x1〉) 〈x0,x3〉
-; quadruple … BHI MODE_IMM1 (Byte 〈x2,x2〉) 〈x0,x3〉
-; quadruple … BLS MODE_IMM1 (Byte 〈x2,x3〉) 〈x0,x3〉
-; quadruple … BCC MODE_IMM1 (Byte 〈x2,x4〉) 〈x0,x3〉
-; quadruple … BCS MODE_IMM1 (Byte 〈x2,x5〉) 〈x0,x3〉
-; quadruple … BNE MODE_IMM1 (Byte 〈x2,x6〉) 〈x0,x3〉
-; quadruple … BEQ MODE_IMM1 (Byte 〈x2,x7〉) 〈x0,x3〉
-; quadruple … BHCC MODE_IMM1 (Byte 〈x2,x8〉) 〈x0,x3〉
-; quadruple … BHCS MODE_IMM1 (Byte 〈x2,x9〉) 〈x0,x3〉
-; quadruple … BPL MODE_IMM1 (Byte 〈x2,xA〉) 〈x0,x3〉
-; quadruple … BMI MODE_IMM1 (Byte 〈x2,xB〉) 〈x0,x3〉
-; quadruple … BMC MODE_IMM1 (Byte 〈x2,xC〉) 〈x0,x3〉
-; quadruple … BMS MODE_IMM1 (Byte 〈x2,xD〉) 〈x0,x3〉
-; quadruple … BIL MODE_IMM1 (Byte 〈x2,xE〉) 〈x0,x3〉
-; quadruple … BIH MODE_IMM1 (Byte 〈x2,xF〉) 〈x0,x3〉
-; quadruple … BGE MODE_IMM1 (Byte 〈x9,x0〉) 〈x0,x3〉
-; quadruple … BLT MODE_IMM1 (Byte 〈x9,x1〉) 〈x0,x3〉
-; quadruple … BGT MODE_IMM1 (Byte 〈x9,x2〉) 〈x0,x3〉
-; quadruple … BLE MODE_IMM1 (Byte 〈x9,x3〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_HCS08_7 ≝
-[
- quadruple … BSETn (MODE_DIRn o0) (Byte 〈x1,x0〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o0) (Byte 〈x1,x1〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o1) (Byte 〈x1,x2〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o1) (Byte 〈x1,x3〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o2) (Byte 〈x1,x4〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o2) (Byte 〈x1,x5〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o3) (Byte 〈x1,x6〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o3) (Byte 〈x1,x7〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o4) (Byte 〈x1,x8〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o4) (Byte 〈x1,x9〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o5) (Byte 〈x1,xA〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o5) (Byte 〈x1,xB〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o6) (Byte 〈x1,xC〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o6) (Byte 〈x1,xD〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o7) (Byte 〈x1,xE〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o7) (Byte 〈x1,xF〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HCS08_8 ≝
-[
- quadruple … BRSETn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x0〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x1〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x2〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x3〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x4〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x5〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x6〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x7〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x8〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x9〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xA〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xB〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xC〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xD〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xE〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xF〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HCS08_9 ≝
-[
- quadruple … BIT MODE_IMM1 (Byte 〈xA,x5〉) 〈x0,x2〉
-; quadruple … BIT MODE_DIR1 (Byte 〈xB,x5〉) 〈x0,x3〉
-; quadruple … BIT MODE_DIR2 (Byte 〈xC,x5〉) 〈x0,x4〉
-; quadruple … BIT MODE_IX2 (Byte 〈xD,x5〉) 〈x0,x4〉
-; quadruple … BIT MODE_IX1 (Byte 〈xE,x5〉) 〈x0,x3〉
-; quadruple … BIT MODE_IX0 (Byte 〈xF,x5〉) 〈x0,x3〉
-; quadruple … BIT MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x5〉〉) 〈x0,x5〉
-; quadruple … BIT MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x5〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HCS08_10 ≝
-[
- quadruple … MUL MODE_INH (Byte 〈x4,x2〉) 〈x0,x5〉
-; quadruple … DIV MODE_INH (Byte 〈x5,x2〉) 〈x0,x6〉
-; quadruple … NSA MODE_INH (Byte 〈x6,x2〉) 〈x0,x1〉
-; quadruple … DAA MODE_INH (Byte 〈x7,x2〉) 〈x0,x1〉
-; quadruple … RTI MODE_INH (Byte 〈x8,x0〉) 〈x0,x9〉
-; quadruple … RTS MODE_INH (Byte 〈x8,x1〉) 〈x0,x6〉
-; quadruple … SWI MODE_INH (Byte 〈x8,x3〉) 〈x0,xB〉
-; quadruple … BGND MODE_INH (Byte 〈x8,x2〉) 〈x0,x5〉
-; quadruple … TAP MODE_INH (Byte 〈x8,x4〉) 〈x0,x1〉
-; quadruple … TPA MODE_INH (Byte 〈x8,x5〉) 〈x0,x1〉
-; quadruple … PULA MODE_INH (Byte 〈x8,x6〉) 〈x0,x3〉
-; quadruple … PSHA MODE_INH (Byte 〈x8,x7〉) 〈x0,x2〉
-; quadruple … PULX MODE_INH (Byte 〈x8,x8〉) 〈x0,x3〉
-; quadruple … PSHX MODE_INH (Byte 〈x8,x9〉) 〈x0,x2〉
-; quadruple … PULH MODE_INH (Byte 〈x8,xA〉) 〈x0,x3〉
-; quadruple … PSHH MODE_INH (Byte 〈x8,xB〉) 〈x0,x2〉
-; quadruple … STOP MODE_INH (Byte 〈x8,xE〉) 〈x0,x2〉
-; quadruple … WAIT MODE_INH (Byte 〈x8,xF〉) 〈x0,x2〉
-; quadruple … TXS MODE_INH (Byte 〈x9,x4〉) 〈x0,x2〉
-; quadruple … TSX MODE_INH (Byte 〈x9,x5〉) 〈x0,x2〉
-; quadruple … TAX MODE_INH (Byte 〈x9,x7〉) 〈x0,x1〉
-; quadruple … CLC MODE_INH (Byte 〈x9,x8〉) 〈x0,x1〉
-; quadruple … SEC MODE_INH (Byte 〈x9,x9〉) 〈x0,x1〉
-; quadruple … CLI MODE_INH (Byte 〈x9,xA〉) 〈x0,x1〉
-; quadruple … SEI MODE_INH (Byte 〈x9,xB〉) 〈x0,x1〉
-; quadruple … RSP MODE_INH (Byte 〈x9,xC〉) 〈x0,x1〉
-; quadruple … NOP MODE_INH (Byte 〈x9,xD〉) 〈x0,x1〉
-; quadruple … TXA MODE_INH (Byte 〈x9,xF〉) 〈x0,x1〉
-; quadruple … AIS MODE_IMM1 (Byte 〈xA,x7〉) 〈x0,x2〉
-; quadruple … AIX MODE_IMM1 (Byte 〈xA,xF〉) 〈x0,x2〉
-].
-
-ndefinition opcode_table_HCS08_11 ≝
-[
- quadruple … CBEQA MODE_DIR1_and_IMM1 (Byte 〈x3,x1〉) 〈x0,x5〉
-; quadruple … CBEQA MODE_IMM1_and_IMM1 (Byte 〈x4,x1〉) 〈x0,x4〉
-; quadruple … CBEQX MODE_IMM1_and_IMM1 (Byte 〈x5,x1〉) 〈x0,x4〉
-; quadruple … CBEQA MODE_IX1p_and_IMM1 (Byte 〈x6,x1〉) 〈x0,x5〉
-; quadruple … CBEQA MODE_IX0p_and_IMM1 (Byte 〈x7,x1〉) 〈x0,x5〉
-; quadruple … CBEQA MODE_SP1_and_IMM1 (Word 〈〈x9,xE〉:〈x6,x1〉〉) 〈x0,x6〉
-].
-
-ndefinition opcode_table_HCS08_12 ≝
-[
- quadruple … CLR MODE_DIR1 (Byte 〈x3,xF〉) 〈x0,x5〉
-; quadruple … CLR MODE_INHA (Byte 〈x4,xF〉) 〈x0,x1〉
-; quadruple … CLR MODE_INHX (Byte 〈x5,xF〉) 〈x0,x1〉
-; quadruple … CLR MODE_IX1 (Byte 〈x6,xF〉) 〈x0,x5〉
-; quadruple … CLR MODE_IX0 (Byte 〈x7,xF〉) 〈x0,x4〉
-; quadruple … CLR MODE_INHH (Byte 〈x8,xC〉) 〈x0,x1〉
-; quadruple … CLR MODE_SP1 (Word 〈〈x9,xE〉:〈x6,xF〉〉) 〈x0,x6〉
-].
-
-ndefinition opcode_table_HCS08_13 ≝
-[
- quadruple … CMP MODE_IMM1 (Byte 〈xA,x1〉) 〈x0,x2〉
-; quadruple … CMP MODE_DIR1 (Byte 〈xB,x1〉) 〈x0,x3〉
-; quadruple … CMP MODE_DIR2 (Byte 〈xC,x1〉) 〈x0,x4〉
-; quadruple … CMP MODE_IX2 (Byte 〈xD,x1〉) 〈x0,x4〉
-; quadruple … CMP MODE_IX1 (Byte 〈xE,x1〉) 〈x0,x3〉
-; quadruple … CMP MODE_IX0 (Byte 〈xF,x1〉) 〈x0,x3〉
-; quadruple … CMP MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x1〉〉) 〈x0,x5〉
-; quadruple … CMP MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x1〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HCS08_14 ≝
-[
- quadruple … COM MODE_DIR1 (Byte 〈x3,x3〉) 〈x0,x5〉
-; quadruple … COM MODE_INHA (Byte 〈x4,x3〉) 〈x0,x1〉
-; quadruple … COM MODE_INHX (Byte 〈x5,x3〉) 〈x0,x1〉
-; quadruple … COM MODE_IX1 (Byte 〈x6,x3〉) 〈x0,x5〉
-; quadruple … COM MODE_IX0 (Byte 〈x7,x3〉) 〈x0,x4〉
-; quadruple … COM MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x3〉〉) 〈x0,x6〉
-].
-
-ndefinition opcode_table_HCS08_15 ≝
-[
- quadruple … CPHX MODE_DIR2 (Byte 〈x3,xE〉) 〈x0,x6〉
-; quadruple … CPHX MODE_IMM2 (Byte 〈x6,x5〉) 〈x0,x3〉
-; quadruple … CPHX MODE_DIR1 (Byte 〈x7,x5〉) 〈x0,x5〉
-; quadruple … CPHX MODE_SP1 (Word 〈〈x9,xE〉:〈xF,x3〉〉) 〈x0,x6〉
-
-; quadruple … LDHX MODE_DIR2 (Byte 〈x3,x2〉) 〈x0,x5〉
-; quadruple … LDHX MODE_IMM2 (Byte 〈x4,x5〉) 〈x0,x3〉
-; quadruple … LDHX MODE_DIR1 (Byte 〈x5,x5〉) 〈x0,x4〉
-; quadruple … LDHX MODE_IX0 (Word 〈〈x9,xE〉:〈xA,xE〉〉) 〈x0,x5〉
-; quadruple … LDHX MODE_IX2 (Word 〈〈x9,xE〉:〈xB,xE〉〉) 〈x0,x6〉
-; quadruple … LDHX MODE_IX1 (Word 〈〈x9,xE〉:〈xC,xE〉〉) 〈x0,x5〉
-; quadruple … LDHX MODE_SP1 (Word 〈〈x9,xE〉:〈xF,xE〉〉) 〈x0,x5〉
-
-; quadruple … STHX MODE_DIR1 (Byte 〈x3,x5〉) 〈x0,x4〉
-; quadruple … STHX MODE_DIR2 (Byte 〈x9,x6〉) 〈x0,x5〉
-; quadruple … STHX MODE_SP1 (Word 〈〈x9,xE〉:〈xF,xF〉〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HCS08_16 ≝
-[
- quadruple … CPX MODE_IMM1 (Byte 〈xA,x3〉) 〈x0,x2〉
-; quadruple … CPX MODE_DIR1 (Byte 〈xB,x3〉) 〈x0,x3〉
-; quadruple … CPX MODE_DIR2 (Byte 〈xC,x3〉) 〈x0,x4〉
-; quadruple … CPX MODE_IX2 (Byte 〈xD,x3〉) 〈x0,x4〉
-; quadruple … CPX MODE_IX1 (Byte 〈xE,x3〉) 〈x0,x3〉
-; quadruple … CPX MODE_IX0 (Byte 〈xF,x3〉) 〈x0,x3〉
-; quadruple … CPX MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x3〉〉) 〈x0,x5〉
-; quadruple … CPX MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x3〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HCS08_17 ≝
-[
- quadruple … DBNZ MODE_DIR1_and_IMM1 (Byte 〈x3,xB〉) 〈x0,x7〉
-; quadruple … DBNZ MODE_INHA_and_IMM1 (Byte 〈x4,xB〉) 〈x0,x4〉
-; quadruple … DBNZ MODE_INHX_and_IMM1 (Byte 〈x5,xB〉) 〈x0,x4〉
-; quadruple … DBNZ MODE_IX1_and_IMM1 (Byte 〈x6,xB〉) 〈x0,x7〉
-; quadruple … DBNZ MODE_IX0_and_IMM1 (Byte 〈x7,xB〉) 〈x0,x6〉
-; quadruple … DBNZ MODE_SP1_and_IMM1 (Word 〈〈x9,xE〉:〈x6,xB〉〉) 〈x0,x8〉
-].
-
-ndefinition opcode_table_HCS08_18 ≝
-[
- quadruple … DEC MODE_DIR1 (Byte 〈x3,xA〉) 〈x0,x5〉
-; quadruple … DEC MODE_INHA (Byte 〈x4,xA〉) 〈x0,x1〉
-; quadruple … DEC MODE_INHX (Byte 〈x5,xA〉) 〈x0,x1〉
-; quadruple … DEC MODE_IX1 (Byte 〈x6,xA〉) 〈x0,x5〉
-; quadruple … DEC MODE_IX0 (Byte 〈x7,xA〉) 〈x0,x4〉
-; quadruple … DEC MODE_SP1 (Word 〈〈x9,xE〉:〈x6,xA〉〉) 〈x0,x6〉
-].
-
-ndefinition opcode_table_HCS08_19 ≝
-[
- quadruple … EOR MODE_IMM1 (Byte 〈xA,x8〉) 〈x0,x2〉
-; quadruple … EOR MODE_DIR1 (Byte 〈xB,x8〉) 〈x0,x3〉
-; quadruple … EOR MODE_DIR2 (Byte 〈xC,x8〉) 〈x0,x4〉
-; quadruple … EOR MODE_IX2 (Byte 〈xD,x8〉) 〈x0,x4〉
-; quadruple … EOR MODE_IX1 (Byte 〈xE,x8〉) 〈x0,x3〉
-; quadruple … EOR MODE_IX0 (Byte 〈xF,x8〉) 〈x0,x3〉
-; quadruple … EOR MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x8〉〉) 〈x0,x5〉
-; quadruple … EOR MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x8〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HCS08_20 ≝
-[
- quadruple … INC MODE_DIR1 (Byte 〈x3,xC〉) 〈x0,x5〉
-; quadruple … INC MODE_INHA (Byte 〈x4,xC〉) 〈x0,x1〉
-; quadruple … INC MODE_INHX (Byte 〈x5,xC〉) 〈x0,x1〉
-; quadruple … INC MODE_IX1 (Byte 〈x6,xC〉) 〈x0,x5〉
-; quadruple … INC MODE_IX0 (Byte 〈x7,xC〉) 〈x0,x4〉
-; quadruple … INC MODE_SP1 (Word 〈〈x9,xE〉:〈x6,xC〉〉) 〈x0,x6〉
-].
-
-ndefinition opcode_table_HCS08_21 ≝
-[
- quadruple … JMP MODE_IMM1EXT (Byte 〈xB,xC〉) 〈x0,x3〉
-; quadruple … JMP MODE_IMM2 (Byte 〈xC,xC〉) 〈x0,x4〉
-; quadruple … JMP MODE_INHX2ADD (Byte 〈xD,xC〉) 〈x0,x4〉
-; quadruple … JMP MODE_INHX1ADD (Byte 〈xE,xC〉) 〈x0,x3〉
-; quadruple … JMP MODE_INHX0ADD (Byte 〈xF,xC〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_HCS08_22 ≝
-[
- quadruple … BSR MODE_IMM1 (Byte 〈xA,xD〉) 〈x0,x5〉
-; quadruple … JSR MODE_IMM1EXT (Byte 〈xB,xD〉) 〈x0,x5〉
-; quadruple … JSR MODE_IMM2 (Byte 〈xC,xD〉) 〈x0,x6〉
-; quadruple … JSR MODE_INHX2ADD (Byte 〈xD,xD〉) 〈x0,x6〉
-; quadruple … JSR MODE_INHX1ADD (Byte 〈xE,xD〉) 〈x0,x5〉
-; quadruple … JSR MODE_INHX0ADD (Byte 〈xF,xD〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HCS08_23 ≝
-[
- quadruple … LDA MODE_IMM1 (Byte 〈xA,x6〉) 〈x0,x2〉
-; quadruple … LDA MODE_DIR1 (Byte 〈xB,x6〉) 〈x0,x3〉
-; quadruple … LDA MODE_DIR2 (Byte 〈xC,x6〉) 〈x0,x4〉
-; quadruple … LDA MODE_IX2 (Byte 〈xD,x6〉) 〈x0,x4〉
-; quadruple … LDA MODE_IX1 (Byte 〈xE,x6〉) 〈x0,x3〉
-; quadruple … LDA MODE_IX0 (Byte 〈xF,x6〉) 〈x0,x3〉
-; quadruple … LDA MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x6〉〉) 〈x0,x5〉
-; quadruple … LDA MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x6〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HCS08_24 ≝
-[
- quadruple … LDX MODE_IMM1 (Byte 〈xA,xE〉) 〈x0,x2〉
-; quadruple … LDX MODE_DIR1 (Byte 〈xB,xE〉) 〈x0,x3〉
-; quadruple … LDX MODE_DIR2 (Byte 〈xC,xE〉) 〈x0,x4〉
-; quadruple … LDX MODE_IX2 (Byte 〈xD,xE〉) 〈x0,x4〉
-; quadruple … LDX MODE_IX1 (Byte 〈xE,xE〉) 〈x0,x3〉
-; quadruple … LDX MODE_IX0 (Byte 〈xF,xE〉) 〈x0,x3〉
-; quadruple … LDX MODE_SP2 (Word 〈〈x9,xE〉:〈xD,xE〉〉) 〈x0,x5〉
-; quadruple … LDX MODE_SP1 (Word 〈〈x9,xE〉:〈xE,xE〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HCS08_25 ≝
-[
- quadruple … LSR MODE_DIR1 (Byte 〈x3,x4〉) 〈x0,x5〉
-; quadruple … LSR MODE_INHA (Byte 〈x4,x4〉) 〈x0,x1〉
-; quadruple … LSR MODE_INHX (Byte 〈x5,x4〉) 〈x0,x1〉
-; quadruple … LSR MODE_IX1 (Byte 〈x6,x4〉) 〈x0,x5〉
-; quadruple … LSR MODE_IX0 (Byte 〈x7,x4〉) 〈x0,x4〉
-; quadruple … LSR MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x4〉〉) 〈x0,x6〉
-].
-
-ndefinition opcode_table_HCS08_26 ≝
-[
- quadruple … MOV MODE_DIR1_to_DIR1 (Byte 〈x4,xE〉) 〈x0,x5〉
-; quadruple … MOV MODE_DIR1_to_IX0p (Byte 〈x5,xE〉) 〈x0,x5〉
-; quadruple … MOV MODE_IMM1_to_DIR1 (Byte 〈x6,xE〉) 〈x0,x4〉
-; quadruple … MOV MODE_IX0p_to_DIR1 (Byte 〈x7,xE〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HCS08_27 ≝
-[
- quadruple … NEG MODE_DIR1 (Byte 〈x3,x0〉) 〈x0,x5〉
-; quadruple … NEG MODE_INHA (Byte 〈x4,x0〉) 〈x0,x1〉
-; quadruple … NEG MODE_INHX (Byte 〈x5,x0〉) 〈x0,x1〉
-; quadruple … NEG MODE_IX1 (Byte 〈x6,x0〉) 〈x0,x5〉
-; quadruple … NEG MODE_IX0 (Byte 〈x7,x0〉) 〈x0,x4〉
-; quadruple … NEG MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x0〉〉) 〈x0,x6〉
-].
-
-ndefinition opcode_table_HCS08_28 ≝
-[
- quadruple … ORA MODE_IMM1 (Byte 〈xA,xA〉) 〈x0,x2〉
-; quadruple … ORA MODE_DIR1 (Byte 〈xB,xA〉) 〈x0,x3〉
-; quadruple … ORA MODE_DIR2 (Byte 〈xC,xA〉) 〈x0,x4〉
-; quadruple … ORA MODE_IX2 (Byte 〈xD,xA〉) 〈x0,x4〉
-; quadruple … ORA MODE_IX1 (Byte 〈xE,xA〉) 〈x0,x3〉
-; quadruple … ORA MODE_IX0 (Byte 〈xF,xA〉) 〈x0,x3〉
-; quadruple … ORA MODE_SP2 (Word 〈〈x9,xE〉:〈xD,xA〉〉) 〈x0,x5〉
-; quadruple … ORA MODE_SP1 (Word 〈〈x9,xE〉:〈xE,xA〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HCS08_29 ≝
-[
- quadruple … ROL MODE_DIR1 (Byte 〈x3,x9〉) 〈x0,x5〉
-; quadruple … ROL MODE_INHA (Byte 〈x4,x9〉) 〈x0,x1〉
-; quadruple … ROL MODE_INHX (Byte 〈x5,x9〉) 〈x0,x1〉
-; quadruple … ROL MODE_IX1 (Byte 〈x6,x9〉) 〈x0,x5〉
-; quadruple … ROL MODE_IX0 (Byte 〈x7,x9〉) 〈x0,x4〉
-; quadruple … ROL MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x9〉〉) 〈x0,x6〉
-].
-
-ndefinition opcode_table_HCS08_30 ≝
-[
- quadruple … ROR MODE_DIR1 (Byte 〈x3,x6〉) 〈x0,x5〉
-; quadruple … ROR MODE_INHA (Byte 〈x4,x6〉) 〈x0,x1〉
-; quadruple … ROR MODE_INHX (Byte 〈x5,x6〉) 〈x0,x1〉
-; quadruple … ROR MODE_IX1 (Byte 〈x6,x6〉) 〈x0,x5〉
-; quadruple … ROR MODE_IX0 (Byte 〈x7,x6〉) 〈x0,x4〉
-; quadruple … ROR MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x6〉〉) 〈x0,x6〉
-].
-
-ndefinition opcode_table_HCS08_31 ≝
-[
- quadruple … SBC MODE_IMM1 (Byte 〈xA,x2〉) 〈x0,x2〉
-; quadruple … SBC MODE_DIR1 (Byte 〈xB,x2〉) 〈x0,x3〉
-; quadruple … SBC MODE_DIR2 (Byte 〈xC,x2〉) 〈x0,x4〉
-; quadruple … SBC MODE_IX2 (Byte 〈xD,x2〉) 〈x0,x4〉
-; quadruple … SBC MODE_IX1 (Byte 〈xE,x2〉) 〈x0,x3〉
-; quadruple … SBC MODE_IX0 (Byte 〈xF,x2〉) 〈x0,x3〉
-; quadruple … SBC MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x2〉〉) 〈x0,x5〉
-; quadruple … SBC MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x2〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HCS08_32 ≝
-[
- quadruple … STA MODE_DIR1 (Byte 〈xB,x7〉) 〈x0,x3〉
-; quadruple … STA MODE_DIR2 (Byte 〈xC,x7〉) 〈x0,x4〉
-; quadruple … STA MODE_IX2 (Byte 〈xD,x7〉) 〈x0,x4〉
-; quadruple … STA MODE_IX1 (Byte 〈xE,x7〉) 〈x0,x3〉
-; quadruple … STA MODE_IX0 (Byte 〈xF,x7〉) 〈x0,x2〉
-; quadruple … STA MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x7〉〉) 〈x0,x5〉
-; quadruple … STA MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x7〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HCS08_33 ≝
-[
- quadruple … STX MODE_DIR1 (Byte 〈xB,xF〉) 〈x0,x3〉
-; quadruple … STX MODE_DIR2 (Byte 〈xC,xF〉) 〈x0,x4〉
-; quadruple … STX MODE_IX2 (Byte 〈xD,xF〉) 〈x0,x4〉
-; quadruple … STX MODE_IX1 (Byte 〈xE,xF〉) 〈x0,x3〉
-; quadruple … STX MODE_IX0 (Byte 〈xF,xF〉) 〈x0,x2〉
-; quadruple … STX MODE_SP2 (Word 〈〈x9,xE〉:〈xD,xF〉〉) 〈x0,x5〉
-; quadruple … STX MODE_SP1 (Word 〈〈x9,xE〉:〈xE,xF〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HCS08_34 ≝
-[
- quadruple … SUB MODE_IMM1 (Byte 〈xA,x0〉) 〈x0,x2〉
-; quadruple … SUB MODE_DIR1 (Byte 〈xB,x0〉) 〈x0,x3〉
-; quadruple … SUB MODE_DIR2 (Byte 〈xC,x0〉) 〈x0,x4〉
-; quadruple … SUB MODE_IX2 (Byte 〈xD,x0〉) 〈x0,x4〉
-; quadruple … SUB MODE_IX1 (Byte 〈xE,x0〉) 〈x0,x3〉
-; quadruple … SUB MODE_IX0 (Byte 〈xF,x0〉) 〈x0,x3〉
-; quadruple … SUB MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x0〉〉) 〈x0,x5〉
-; quadruple … SUB MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x0〉〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_HCS08_35 ≝
-[
- quadruple … TST MODE_DIR1 (Byte 〈x3,xD〉) 〈x0,x4〉
-; quadruple … TST MODE_INHA (Byte 〈x4,xD〉) 〈x0,x1〉
-; quadruple … TST MODE_INHX (Byte 〈x5,xD〉) 〈x0,x1〉
-; quadruple … TST MODE_IX1 (Byte 〈x6,xD〉) 〈x0,x4〉
-; quadruple … TST MODE_IX0 (Byte 〈x7,xD〉) 〈x0,x3〉
-; quadruple … TST MODE_SP1 (Word 〈〈x9,xE〉:〈x6,xD〉〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_HCS08 ≝
-opcode_table_HCS08_1 @ opcode_table_HCS08_2 @ opcode_table_HCS08_3 @ opcode_table_HCS08_4 @
-opcode_table_HCS08_5 @ opcode_table_HCS08_6 @ opcode_table_HCS08_7 @ opcode_table_HCS08_8 @
-opcode_table_HCS08_9 @ opcode_table_HCS08_10 @ opcode_table_HCS08_11 @ opcode_table_HCS08_12 @
-opcode_table_HCS08_13 @ opcode_table_HCS08_14 @ opcode_table_HCS08_15 @ opcode_table_HCS08_16 @
-opcode_table_HCS08_17 @ opcode_table_HCS08_18 @ opcode_table_HCS08_19 @ opcode_table_HCS08_20 @
-opcode_table_HCS08_21 @ opcode_table_HCS08_22 @ opcode_table_HCS08_23 @ opcode_table_HCS08_24 @
-opcode_table_HCS08_25 @ opcode_table_HCS08_26 @ opcode_table_HCS08_27 @ opcode_table_HCS08_28 @
-opcode_table_HCS08_29 @ opcode_table_HCS08_30 @ opcode_table_HCS08_31 @ opcode_table_HCS08_32 @
-opcode_table_HCS08_33 @ opcode_table_HCS08_34 @ opcode_table_HCS08_35.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/pseudo.ma".
-include "emulator/opcodes/HCS08_table.ma".
-
-(* ****************** *)
-(* TABELLA DELL'HCS08 *)
-(* ****************** *)
-
-(* HCS08: opcode non implementati come da manuale (byte) *)
-ndefinition HCS08_not_impl_byte ≝
- [〈x8,xD〉
- ;〈x9,xE〉
- ;〈xA,xC〉
- ].
-
-nlemma ok_byte_table_HCS08 : forall_b8 (λb.
- (test_not_impl_byte b HCS08_not_impl_byte ⊙ eq_w16 (get_byte_count HCS08 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08) 〈〈x0,x0〉:〈x0,x1〉〉) ⊗
- (⊖ (test_not_impl_byte b HCS08_not_impl_byte) ⊙ eq_w16 (get_byte_count HCS08 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* HCS08: opcode non implementati come da manuale (0x9E+byte) *)
-ndefinition HCS08_not_impl_word ≝
- [〈x0,x0〉;〈x0,x1〉;〈x0,x2〉;〈x0,x3〉;〈x0,x4〉;〈x0,x5〉;〈x0,x6〉;〈x0,x7〉
- ;〈x0,x8〉;〈x0,x9〉;〈x0,xA〉;〈x0,xB〉;〈x0,xC〉;〈x0,xD〉;〈x0,xE〉;〈x0,xF〉
- ;〈x1,x0〉;〈x1,x1〉;〈x1,x2〉;〈x1,x3〉;〈x1,x4〉;〈x1,x5〉;〈x1,x6〉;〈x1,x7〉
- ;〈x1,x8〉;〈x1,x9〉;〈x1,xA〉;〈x1,xB〉;〈x1,xC〉;〈x1,xD〉;〈x1,xE〉;〈x1,xF〉
- ;〈x2,x0〉;〈x2,x1〉;〈x2,x2〉;〈x2,x3〉;〈x2,x4〉;〈x2,x5〉;〈x2,x6〉;〈x2,x7〉
- ;〈x2,x8〉;〈x2,x9〉;〈x2,xA〉;〈x2,xB〉;〈x2,xC〉;〈x2,xD〉;〈x2,xE〉;〈x2,xF〉
- ;〈x3,x0〉;〈x3,x1〉;〈x3,x2〉;〈x3,x3〉;〈x3,x4〉;〈x3,x5〉;〈x3,x6〉;〈x3,x7〉
- ;〈x3,x8〉;〈x3,x9〉;〈x3,xA〉;〈x3,xB〉;〈x3,xC〉;〈x3,xD〉;〈x3,xE〉;〈x3,xF〉
- ;〈x4,x0〉;〈x4,x1〉;〈x4,x2〉;〈x4,x3〉;〈x4,x4〉;〈x4,x5〉;〈x4,x6〉;〈x4,x7〉
- ;〈x4,x8〉;〈x4,x9〉;〈x4,xA〉;〈x4,xB〉;〈x4,xC〉;〈x4,xD〉;〈x4,xE〉;〈x4,xF〉
- ;〈x5,x0〉;〈x5,x1〉;〈x5,x2〉;〈x5,x3〉;〈x5,x4〉;〈x5,x5〉;〈x5,x6〉;〈x5,x7〉
- ;〈x5,x8〉;〈x5,x9〉;〈x5,xA〉;〈x5,xB〉;〈x5,xC〉;〈x5,xD〉;〈x5,xE〉;〈x5,xF〉
- ;〈x6,x2〉;〈x6,x5〉;〈x6,xE〉
- ;〈x7,x0〉;〈x7,x1〉;〈x7,x2〉;〈x7,x3〉;〈x7,x4〉;〈x7,x5〉;〈x7,x6〉;〈x7,x7〉
- ;〈x7,x8〉;〈x7,x9〉;〈x7,xA〉;〈x7,xB〉;〈x7,xC〉;〈x7,xD〉;〈x7,xE〉;〈x7,xF〉
- ;〈x8,x0〉;〈x8,x1〉;〈x8,x2〉;〈x8,x3〉;〈x8,x4〉;〈x8,x5〉;〈x8,x6〉;〈x8,x7〉
- ;〈x8,x8〉;〈x8,x9〉;〈x8,xA〉;〈x8,xB〉;〈x8,xC〉;〈x8,xD〉;〈x8,xE〉;〈x8,xF〉
- ;〈x9,x0〉;〈x9,x1〉;〈x9,x2〉;〈x9,x3〉;〈x9,x4〉;〈x9,x5〉;〈x9,x6〉;〈x9,x7〉
- ;〈x9,x8〉;〈x9,x9〉;〈x9,xA〉;〈x9,xB〉;〈x9,xC〉;〈x9,xD〉;〈x9,xE〉;〈x9,xF〉
- ;〈xA,x0〉;〈xA,x1〉;〈xA,x2〉;〈xA,x3〉;〈xA,x4〉;〈xA,x5〉;〈xA,x6〉;〈xA,x7〉;〈xA,x8〉;〈xA,x9〉;〈xA,xA〉;〈xA,xB〉;〈xA,xC〉;〈xA,xD〉;〈xA,xF〉
- ;〈xB,x0〉;〈xB,x1〉;〈xB,x2〉;〈xB,x3〉;〈xB,x4〉;〈xB,x5〉;〈xB,x6〉;〈xB,x7〉;〈xB,x8〉;〈xB,x9〉;〈xB,xA〉;〈xB,xB〉;〈xB,xC〉;〈xB,xD〉;〈xB,xF〉
- ;〈xC,x0〉;〈xC,x1〉;〈xC,x2〉;〈xC,x3〉;〈xC,x4〉;〈xC,x5〉;〈xC,x6〉;〈xC,x7〉;〈xC,x8〉;〈xC,x9〉;〈xC,xA〉;〈xC,xB〉;〈xC,xC〉;〈xC,xD〉;〈xC,xF〉
- ;〈xD,xC〉;〈xD,xD〉
- ;〈xE,xC〉;〈xE,xD〉
- ;〈xF,x0〉;〈xF,x1〉;〈xF,x2〉;〈xF,x4〉;〈xF,x5〉;〈xF,x6〉;〈xF,x7〉;〈xF,x8〉;〈xF,x9〉;〈xF,xA〉;〈xF,xB〉;〈xF,xC〉;〈xF,xD〉
- ].
-
-nlemma ok_word_table_HCS08 : forall_b8 (λb.
- (test_not_impl_byte b HCS08_not_impl_word ⊙ eq_w16 (get_word_count HCS08 〈〈x9,xE〉:b〉 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08) 〈〈x0,x0〉:〈x0,x1〉〉) ⊗
- (⊖ (test_not_impl_byte b HCS08_not_impl_word) ⊙ eq_w16 (get_word_count HCS08 〈〈x9,xE〉:b〉 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* HCS08: pseudocodici non implementati come da manuale *)
-ndefinition HCS08_not_impl_pseudo ≝
- [ SHA ; SLA ].
-
-nlemma ok_pseudo_table_HCS08 : forall_Freescale_pseudo (λo.
- (test_not_impl_pseudo HCS08 o HCS08_not_impl_pseudo ⊙ le_w16 〈〈x0,x0〉:〈x0,x1〉〉 (get_pseudo_count HCS08 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08)) ⊗
- (⊖ (test_not_impl_pseudo HCS08 o HCS08_not_impl_pseudo) ⊙ eq_w16 (get_pseudo_count HCS08 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* HCS08: modalita' non implementate come da manuale *)
-ndefinition HCS08_not_impl_mode ≝
- [ MODE_TNY x0 ; MODE_TNY x1 ; MODE_TNY x2 ; MODE_TNY x3
- ; MODE_TNY x4 ; MODE_TNY x5 ; MODE_TNY x6 ; MODE_TNY x7
- ; MODE_TNY x8 ; MODE_TNY x9 ; MODE_TNY xA ; MODE_TNY xB
- ; MODE_TNY xC ; MODE_TNY xD ; MODE_TNY xE ; MODE_TNY xF
- ; MODE_SRT t00 ; MODE_SRT t01 ; MODE_SRT t02 ; MODE_SRT t03
- ; MODE_SRT t04 ; MODE_SRT t05 ; MODE_SRT t06 ; MODE_SRT t07
- ; MODE_SRT t08 ; MODE_SRT t09 ; MODE_SRT t0A ; MODE_SRT t0B
- ; MODE_SRT t0C ; MODE_SRT t0D ; MODE_SRT t0E ; MODE_SRT t0F
- ; MODE_SRT t10 ; MODE_SRT t11 ; MODE_SRT t12 ; MODE_SRT t13
- ; MODE_SRT t14 ; MODE_SRT t15 ; MODE_SRT t16 ; MODE_SRT t17
- ; MODE_SRT t18 ; MODE_SRT t19 ; MODE_SRT t1A ; MODE_SRT t1B
- ; MODE_SRT t1C ; MODE_SRT t1D ; MODE_SRT t1E ; MODE_SRT t1F ].
-
-nlemma ok_mode_table_HCS08 : forall_Freescale_im (λi.
- (test_not_impl_mode HCS08 i HCS08_not_impl_mode ⊙ le_w16 〈〈x0,x0〉:〈x0,x1〉〉 (get_mode_count HCS08 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08)) ⊗
- (⊖ (test_not_impl_mode HCS08 i HCS08_not_impl_mode) ⊙ eq_w16 (get_mode_count HCS08 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-nlemma ok_PsIm_table_HCS08 :
- forall_Freescale_im (λi:Freescale_instr_mode.
- forall_Freescale_pseudo (λps:Freescale_pseudo.
- le_w16 (get_PsIm_count HCS08 ps i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08) 〈〈x0,x0〉:〈x0,x1〉〉)) = true.
- napply refl_eq.
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/word16.ma".
-
-(* ********************************************** *)
-(* MATTONI BASE PER DEFINIRE LE TABELLE DELLE MCU *)
-(* ********************************************** *)
-
-(* enumerazione delle modalita' di indirizzamento = caricamento degli operandi *)
-ninductive IP2022_instr_mode: Type ≝
- (* nessun operando : formato xxxxxxxx xxxxxxxx *)
- MODE_INH : IP2022_instr_mode
- (* operando implicito [ADDR] : formato xxxxxxxx xxxxxxxx *)
-| MODE_INHADDR : IP2022_instr_mode
- (* operando implicito [ADDR]/ADDR+=2 : formato xxxxxxxx xxxxxxxx *)
-| MODE_INHADDRpp : IP2022_instr_mode
-
- (* #lit3 → / : formato xxxxxxxx xxxxxkkk *)
-| MODE_IMM3 : oct → IP2022_instr_mode
- (* W, #lit8 → W : formato xxxxxxxx kkkkkkkk [load 1 byte arg] *)
-| MODE_IMM8 : IP2022_instr_mode
- (* #lit13 → / : formato xxxkkkkk kkkkkkkk [load 1 byte arg] *)
-| MODE_IMM13 : bitrigesim → IP2022_instr_mode
-
- (* FR, W → FR : formato xxxxxxx0 ffffffff [load 1 byte arg] *)
-| MODE_FR0_and_W : IP2022_instr_mode
- (* FR, W → FR : formato xxxxxxx1 ffffffff [load 1 byte arg] *)
-| MODE_FR1_and_W : IP2022_instr_mode
- (* W, FR → W : formato xxxxxxx0 ffffffff [load 1 byte arg] *)
-| MODE_W_and_FR0 : IP2022_instr_mode
- (* W, FR → W : formato xxxxxxx1 ffffffff [load 1 byte arg] *)
-| MODE_W_and_FR1 : IP2022_instr_mode
-
- (* FR(bitN) → FR(bitN) : formato xxxxbbb0 ffffffff [load 1 byte arg] *)
-| MODE_FR0n : oct → IP2022_instr_mode
- (* FR(bitN) → FR(bitN) : formato xxxxbbb1 ffffffff [load 1 byte arg] *)
-| MODE_FR1n : oct → IP2022_instr_mode
-.
-
-ndefinition eq_IP2022_im ≝
-λi1,i2:IP2022_instr_mode.
- match i1 with
- [ MODE_INH ⇒ match i2 with [ MODE_INH ⇒ true | _ ⇒ false ]
- | MODE_INHADDR ⇒ match i2 with [ MODE_INHADDR ⇒ true | _ ⇒ false ]
- | MODE_INHADDRpp ⇒ match i2 with [ MODE_INHADDRpp ⇒ true | _ ⇒ false ]
- | MODE_IMM3 o1 ⇒ match i2 with [ MODE_IMM3 o2 ⇒ eq_oct o1 o2 | _ ⇒ false ]
- | MODE_IMM8 ⇒ match i2 with [ MODE_IMM8 ⇒ true | _ ⇒ false ]
- | MODE_IMM13 t1 ⇒ match i2 with [ MODE_IMM13 t2 ⇒ eq_bit t1 t2 | _ ⇒ false ]
- | MODE_FR0_and_W ⇒ match i2 with [ MODE_FR0_and_W ⇒ true | _ ⇒ false ]
- | MODE_FR1_and_W ⇒ match i2 with [ MODE_FR1_and_W ⇒ true | _ ⇒ false ]
- | MODE_W_and_FR0 ⇒ match i2 with [ MODE_W_and_FR0 ⇒ true | _ ⇒ false ]
- | MODE_W_and_FR1 ⇒ match i2 with [ MODE_W_and_FR1 ⇒ true | _ ⇒ false ]
- | MODE_FR0n o1 ⇒ match i2 with [ MODE_FR0n o2 ⇒ eq_oct o1 o2 | _ ⇒ false ]
- | MODE_FR1n o1 ⇒ match i2 with [ MODE_FR1n o2 ⇒ eq_oct o1 o2 | _ ⇒ false ]
- ].
-
-ndefinition forall_IP2022_im ≝ λP:IP2022_instr_mode → bool.
- P MODE_INH
-⊗ P MODE_INHADDR
-⊗ P MODE_INHADDRpp
-⊗ forall_oct (λo.P (MODE_IMM3 o))
-⊗ P MODE_IMM8
-⊗ forall_bit (λt.P (MODE_IMM13 t))
-⊗ P MODE_FR0_and_W
-⊗ P MODE_FR1_and_W
-⊗ P MODE_W_and_FR0
-⊗ P MODE_W_and_FR1
-⊗ forall_oct (λo.P (MODE_FR0n o))
-⊗ forall_oct (λo.P (MODE_FR1n o)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/bool_lemmas.ma".
-include "emulator/opcodes/IP2022_instr_mode.ma".
-include "num/oct_lemmas.ma".
-include "num/bitrigesim_lemmas.ma".
-
-nlemma eq_to_eqIP2022im : ∀n1,n2.n1 = n2 → eq_IP2022_im n1 n2 = true.
- #n1; #n2; #H;
- nrewrite > H;
- nelim n2;
- ##[ ##4,11,12: #o; nrewrite > (eq_to_eqoct … (refl_eq …))
- ##| ##6: #t; nrewrite > (eq_to_eqbit … (refl_eq …)) ##]
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma neqIP2022im_to_neq : ∀n1,n2.eq_IP2022_im n1 n2 = false → n1 ≠ n2.
- #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_IP2022_im n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqIP2022im n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-(* !!! per brevita... *)
-naxiom eqIP2022im_to_eq : ∀c1,c2.eq_IP2022_im c1 c2 = true → c1 = c2.
-
-nlemma neq_to_neqIP2022im : ∀n1,n2.n1 ≠ n2 → eq_IP2022_im n1 n2 = false.
- #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_IP2022_im n1 n2));
- napply (not_to_not (eq_IP2022_im n1 n2 = true) (n1 = n2) ? H);
- napply (eqIP2022im_to_eq n1 n2).
-nqed.
-
-nlemma decidable_IP2022im : ∀x,y:IP2022_instr_mode.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_IP2022_im x y = true) (eq_IP2022_im x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqIP2022im_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqIP2022im_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqIP2022im : symmetricT IP2022_instr_mode bool eq_IP2022_im.
- #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_IP2022im n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqIP2022im n1 n2 H);
- napply (symmetric_eq ? (eq_IP2022_im n2 n1) false);
- napply (neq_to_neqIP2022im n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/bool.ma".
-
-(* ********************************************** *)
-(* MATTONI BASE PER DEFINIRE LE TABELLE DELLE MCU *)
-(* ********************************************** *)
-
-(* enumerazione delle istruzioni *)
-ninductive IP2022_pseudo: Type ≝
- ADD : IP2022_pseudo (* add *)
-| ADDC : IP2022_pseudo (* add with carry *)
-| AND : IP2022_pseudo (* and *)
-| BREAK : IP2022_pseudo (* enter break mode *)
-| BREAKX : IP2022_pseudo (* enter break mode, after skip *)
-| CALL : IP2022_pseudo (* subroutine call *)
-| CLR : IP2022_pseudo (* clear *)
-| CLRB : IP2022_pseudo (* clear bit *)
-| CMP : IP2022_pseudo (* set flags according to sub *)
-| CSE : IP2022_pseudo (* confront & skip if equal *)
-| CSNE : IP2022_pseudo (* confront & skip if not equal *)
-| CWDT : IP2022_pseudo (* clear watch dog -- not impl. ERR *)
-| DEC : IP2022_pseudo (* decrement *)
-| DECSNZ : IP2022_pseudo (* decrement & skip if not zero *)
-| DECSZ : IP2022_pseudo (* decrement & skip if zero *)
-| FERASE : IP2022_pseudo (* flash erase -- not impl. ERR *)
-| FREAD : IP2022_pseudo (* flash read -- not impl. ERR *)
-| FWRITE : IP2022_pseudo (* flash write -- not impl. ERR *)
-| INC : IP2022_pseudo (* increment *)
-| INCSNZ : IP2022_pseudo (* increment & skip if not zero *)
-| INCSZ : IP2022_pseudo (* increment & skip if zero *)
-| INT : IP2022_pseudo (* interrupt -- not impl. ERR *)
-| IREAD : IP2022_pseudo (* memory read *)
-(* NB: ignorata la differenza IREAD/IREADI perche' non e' implementata EXT_MEM
- IREAD → ADDRX= 0x00 ram, 0x01 flash, 0x80 0x81 ext_mem
- IREADI → ADDRX= 0x00 ram, 0x01 flash *)
-| IWRITE : IP2022_pseudo (* memory write *)
-(* NB: ignorata la differenza IWRITE/IWRITEI perche' non e' implementata EXT_MEM
- IREAD → ADDRX= 0x00 ram, 0x80 0x81 ext_mem
- IREADI → ADDRX= 0x00 ram *)
-| JMP : IP2022_pseudo (* jump *)
-| LOADH : IP2022_pseudo (* load Data Pointer High *)
-| LOADL : IP2022_pseudo (* load Data Pointer Low *)
-| MOV : IP2022_pseudo (* move *)
-| MULS : IP2022_pseudo (* signed mul *)
-| MULU : IP2022_pseudo (* unsigned mul *)
-| NOP : IP2022_pseudo (* nop *)
-| NOT : IP2022_pseudo (* not *)
-| OR : IP2022_pseudo (* or *)
-| PAGE : IP2022_pseudo (* set Page Register *)
-| POP : IP2022_pseudo (* pop *)
-| PUSH : IP2022_pseudo (* push *)
-| RET : IP2022_pseudo (* subroutine ret *)
-| RETI : IP2022_pseudo (* interrupt ret -- not impl. ERR *)
-| RETNP : IP2022_pseudo (* subroutine ret & don't restore Page Register *)
-| RETW : IP2022_pseudo (* subroutine ret & load W Register *)
-| RL : IP2022_pseudo (* rotate left *)
-| RR : IP2022_pseudo (* rotate right *)
-| SB : IP2022_pseudo (* skip if bit set *)
-| SETB : IP2022_pseudo (* set bit *)
-| SNB : IP2022_pseudo (* skip if bit not set *)
-| SPEED : IP2022_pseudo (* set Speed Register *)
-| SUB : IP2022_pseudo (* sub *)
-| SUBC : IP2022_pseudo (* sub with carry *)
-| SWAP : IP2022_pseudo (* swap xxxxyyyy → yyyyxxxx *)
-| TEST : IP2022_pseudo (* set flags according to zero test *)
-| XOR : IP2022_pseudo (* xor *)
-.
-
-ndefinition eq_IP2022_pseudo ≝
-λps1,ps2:IP2022_pseudo.
- match ps1 with
- [ ADD ⇒ match ps2 with [ ADD ⇒ true | _ ⇒ false ] | ADDC ⇒ match ps2 with [ ADDC ⇒ true | _ ⇒ false ]
- | AND ⇒ match ps2 with [ AND ⇒ true | _ ⇒ false ] | BREAK ⇒ match ps2 with [ BREAK ⇒ true | _ ⇒ false ]
- | BREAKX ⇒ match ps2 with [ BREAKX ⇒ true | _ ⇒ false ] | CALL ⇒ match ps2 with [ CALL ⇒ true | _ ⇒ false ]
- | CLR ⇒ match ps2 with [ CLR ⇒ true | _ ⇒ false ] | CLRB ⇒ match ps2 with [ CLRB ⇒ true | _ ⇒ false ]
- | CMP ⇒ match ps2 with [ CMP ⇒ true | _ ⇒ false ] | CSE ⇒ match ps2 with [ CSE ⇒ true | _ ⇒ false ]
- | CSNE ⇒ match ps2 with [ CSNE ⇒ true | _ ⇒ false ] | CWDT ⇒ match ps2 with [ CWDT ⇒ true | _ ⇒ false ]
- | DEC ⇒ match ps2 with [ DEC ⇒ true | _ ⇒ false ] | DECSNZ ⇒ match ps2 with [ DECSNZ ⇒ true | _ ⇒ false ]
- | DECSZ ⇒ match ps2 with [ DECSZ ⇒ true | _ ⇒ false ] | FERASE ⇒ match ps2 with [ FERASE ⇒ true | _ ⇒ false ]
- | FREAD ⇒ match ps2 with [ FREAD ⇒ true | _ ⇒ false ] | FWRITE ⇒ match ps2 with [ FWRITE ⇒ true | _ ⇒ false ]
- | INC ⇒ match ps2 with [ INC ⇒ true | _ ⇒ false ] | INCSNZ ⇒ match ps2 with [ INCSNZ ⇒ true | _ ⇒ false ]
- | INCSZ ⇒ match ps2 with [ INCSZ ⇒ true | _ ⇒ false ] | INT ⇒ match ps2 with [ INT ⇒ true | _ ⇒ false ]
- | IREAD ⇒ match ps2 with [ IREAD ⇒ true | _ ⇒ false ] | IWRITE ⇒ match ps2 with [ IWRITE ⇒ true | _ ⇒ false ]
- | JMP ⇒ match ps2 with [ JMP ⇒ true | _ ⇒ false ] | LOADH ⇒ match ps2 with [ LOADH ⇒ true | _ ⇒ false ]
- | LOADL ⇒ match ps2 with [ LOADL ⇒ true | _ ⇒ false ] | MOV ⇒ match ps2 with [ MOV ⇒ true | _ ⇒ false ]
- | MULS ⇒ match ps2 with [ MULS ⇒ true | _ ⇒ false ] | MULU ⇒ match ps2 with [ MULU ⇒ true | _ ⇒ false ]
- | NOP ⇒ match ps2 with [ NOP ⇒ true | _ ⇒ false ] | NOT ⇒ match ps2 with [ NOT ⇒ true | _ ⇒ false ]
- | OR ⇒ match ps2 with [ OR ⇒ true | _ ⇒ false ] | PAGE ⇒ match ps2 with [ PAGE ⇒ true | _ ⇒ false ]
- | POP ⇒ match ps2 with [ POP ⇒ true | _ ⇒ false ] | PUSH ⇒ match ps2 with [ PUSH ⇒ true | _ ⇒ false ]
- | RET ⇒ match ps2 with [ RET ⇒ true | _ ⇒ false ] | RETI ⇒ match ps2 with [ RETI ⇒ true | _ ⇒ false ]
- | RETNP ⇒ match ps2 with [ RETNP ⇒ true | _ ⇒ false ] | RETW ⇒ match ps2 with [ RETW ⇒ true | _ ⇒ false ]
- | RL ⇒ match ps2 with [ RL ⇒ true | _ ⇒ false ] | RR ⇒ match ps2 with [ RR ⇒ true | _ ⇒ false ]
- | SB ⇒ match ps2 with [ SB ⇒ true | _ ⇒ false ] | SETB ⇒ match ps2 with [ SETB ⇒ true | _ ⇒ false ]
- | SNB ⇒ match ps2 with [ SNB ⇒ true | _ ⇒ false ] | SPEED ⇒ match ps2 with [ SPEED ⇒ true | _ ⇒ false ]
- | SUB ⇒ match ps2 with [ SUB ⇒ true | _ ⇒ false ] | SUBC ⇒ match ps2 with [ SUBC ⇒ true | _ ⇒ false ]
- | SWAP ⇒ match ps2 with [ SWAP ⇒ true | _ ⇒ false ] | TEST ⇒ match ps2 with [ TEST ⇒ true | _ ⇒ false ]
- | XOR ⇒ match ps2 with [ XOR ⇒ true | _ ⇒ false ]
- ].
-
-ndefinition forall_IP2022_pseudo ≝ λP:IP2022_pseudo → bool.
- P ADD ⊗ P ADDC ⊗ P AND ⊗ P BREAK ⊗ P BREAKX ⊗ P CALL ⊗ P CLR ⊗ P CLRB ⊗
- P CMP ⊗ P CSE ⊗ P CSNE ⊗ P CWDT ⊗ P DEC ⊗ P DECSNZ ⊗ P DECSZ ⊗ P FERASE ⊗
- P FREAD ⊗ P FWRITE ⊗ P INC ⊗ P INCSNZ ⊗ P INCSZ ⊗ P INT ⊗ P IREAD ⊗ P IWRITE ⊗
- P JMP ⊗ P LOADH ⊗ P LOADL ⊗ P MOV ⊗ P MULS ⊗ P MULU ⊗ P NOP ⊗ P NOT ⊗
- P OR ⊗ P PAGE ⊗ P POP ⊗ P PUSH ⊗ P RET ⊗ P RETI ⊗ P RETNP ⊗ P RETW ⊗
- P RL ⊗ P RR ⊗ P SB ⊗ P SETB ⊗ P SNB ⊗ P SPEED ⊗ P SUB ⊗ P SUBC ⊗
- P SWAP ⊗ P TEST ⊗ P XOR.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/bool_lemmas.ma".
-include "emulator/opcodes/IP2022_pseudo.ma".
-
-nlemma eq_to_eqIP2022pseudo : ∀n1,n2.n1 = n2 → eq_IP2022_pseudo n1 n2 = true.
- #n1; #n2; #H;
- nrewrite > H;
- nelim n2;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma neqIP2022pseudo_to_neq : ∀n1,n2.eq_IP2022_pseudo n1 n2 = false → n1 ≠ n2.
- #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_IP2022_pseudo n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqIP2022pseudo n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-(* !!! per brevita... *)
-naxiom eqIP2022pseudo_to_eq : ∀c1,c2.eq_IP2022_pseudo c1 c2 = true → c1 = c2.
-
-nlemma neq_to_neqIP2022pseudo : ∀n1,n2.n1 ≠ n2 → eq_IP2022_pseudo n1 n2 = false.
- #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_IP2022_pseudo n1 n2));
- napply (not_to_not (eq_IP2022_pseudo n1 n2 = true) (n1 = n2) ? H);
- napply (eqIP2022pseudo_to_eq n1 n2).
-nqed.
-
-nlemma decidable_IP2022pseudo : ∀x,y:IP2022_pseudo.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_IP2022_pseudo x y = true) (eq_IP2022_pseudo x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqIP2022pseudo_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqIP2022pseudo_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqIP2022pseudo : symmetricT IP2022_pseudo bool eq_IP2022_pseudo.
- #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_IP2022pseudo n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqIP2022pseudo n1 n2 H);
- napply (symmetric_eq ? (eq_IP2022_pseudo n2 n1) false);
- napply (neq_to_neqIP2022pseudo n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/IP2022_pseudo.ma".
-include "emulator/opcodes/IP2022_instr_mode.ma".
-include "emulator/opcodes/byte_or_word.ma".
-include "common/list.ma".
-
-(* ******************* *)
-(* TABELLA DELL'IP2022 *)
-(* ******************* *)
-
-(* definizione come concatenazione finale di liste per velocizzare il parsing *)
-(* ogni riga e' [pseudo] [modalita' indirizzamento] [opcode esadecimale] [#cicli esecuzione] *)
-
-ndefinition opcode_table_IP2022_1 ≝
-[
- quadruple … ADD MODE_FR0_and_W (Byte 〈x1,xE〉) 〈x0,x1〉
-; quadruple … ADD MODE_FR1_and_W (Byte 〈x1,xF〉) 〈x0,x1〉
-; quadruple … ADD MODE_W_and_FR0 (Byte 〈x1,xC〉) 〈x0,x1〉
-; quadruple … ADD MODE_W_and_FR1 (Byte 〈x1,xD〉) 〈x0,x1〉
-; quadruple … ADD MODE_IMM8 (Byte 〈x7,xB〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_2 ≝
-[
- quadruple … ADDC MODE_FR0_and_W (Byte 〈x5,xE〉) 〈x0,x1〉
-; quadruple … ADDC MODE_FR1_and_W (Byte 〈x5,xF〉) 〈x0,x1〉
-; quadruple … ADDC MODE_W_and_FR0 (Byte 〈x5,xC〉) 〈x0,x1〉
-; quadruple … ADDC MODE_W_and_FR1 (Byte 〈x5,xD〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_3 ≝
-[
- quadruple … AND MODE_FR0_and_W (Byte 〈x1,x6〉) 〈x0,x1〉
-; quadruple … AND MODE_FR1_and_W (Byte 〈x1,x7〉) 〈x0,x1〉
-; quadruple … AND MODE_W_and_FR0 (Byte 〈x1,x4〉) 〈x0,x1〉
-; quadruple … AND MODE_W_and_FR1 (Byte 〈x1,x5〉) 〈x0,x1〉
-; quadruple … AND MODE_IMM8 (Byte 〈x7,xE〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_4 ≝
-[
- quadruple … BREAK MODE_INH (Word 〈〈x0,x0〉:〈x0,x1〉〉) 〈x0,x1〉
-; quadruple … BREAKX MODE_INH (Word 〈〈x0,x0〉:〈x0,x5〉〉) 〈x0,x1〉
-; quadruple … CWDT MODE_INH (Word 〈〈x0,x0〉:〈x0,x4〉〉) 〈x0,x1〉
-; quadruple … FERASE MODE_INH (Word 〈〈x0,x0〉:〈x0,x3〉〉) 〈x0,x1〉
-; quadruple … FREAD MODE_INH (Word 〈〈x0,x0〉:〈x1,xB〉〉) 〈x0,x1〉
-; quadruple … FWRITE MODE_INH (Word 〈〈x0,x0〉:〈x1,xA〉〉) 〈x0,x1〉
-; quadruple … INT MODE_INH (Word 〈〈x0,x0〉:〈x0,x6〉〉) 〈x0,x3〉
-; quadruple … IREAD MODE_INHADDR (Word 〈〈x0,x0〉:〈x1,x9〉〉) 〈x0,x4〉 (* only blocking implemented *)
-; quadruple … IREAD MODE_INHADDRpp (Word 〈〈x0,x0〉:〈x1,xD〉〉) 〈x0,x4〉 (* only blocking implemented *)
-; quadruple … IWRITE MODE_INHADDR (Word 〈〈x0,x0〉:〈x1,x8〉〉) 〈x0,x4〉 (* only blocking implemented *)
-; quadruple … IWRITE MODE_INHADDRpp (Word 〈〈x0,x0〉:〈x1,xC〉〉) 〈x0,x4〉 (* only blocking implemented *)
-; quadruple … NOP MODE_INH (Word 〈〈x0,x0〉:〈x0,x0〉〉) 〈x0,x1〉
-; quadruple … RET MODE_INH (Word 〈〈x0,x0〉:〈x0,x7〉〉) 〈x0,x3〉
-; quadruple … RETNP MODE_INH (Word 〈〈x0,x0〉:〈x0,x2〉〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_IP2022_5 ≝
-[
- quadruple … CALL (MODE_IMM13 t00) (Byte 〈xC,x0〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t01) (Byte 〈xC,x1〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t02) (Byte 〈xC,x2〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t03) (Byte 〈xC,x3〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t04) (Byte 〈xC,x4〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t05) (Byte 〈xC,x5〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t06) (Byte 〈xC,x6〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t07) (Byte 〈xC,x7〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t08) (Byte 〈xC,x8〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t09) (Byte 〈xC,x9〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t0A) (Byte 〈xC,xA〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t0B) (Byte 〈xC,xB〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t0C) (Byte 〈xC,xC〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t0D) (Byte 〈xC,xD〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t0E) (Byte 〈xC,xE〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t0F) (Byte 〈xC,xF〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t10) (Byte 〈xD,x0〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t11) (Byte 〈xD,x1〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t12) (Byte 〈xD,x2〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t13) (Byte 〈xD,x3〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t14) (Byte 〈xD,x4〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t15) (Byte 〈xD,x5〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t16) (Byte 〈xD,x6〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t17) (Byte 〈xD,x7〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t18) (Byte 〈xD,x8〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t19) (Byte 〈xD,x9〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t1A) (Byte 〈xD,xA〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t1B) (Byte 〈xD,xB〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t1C) (Byte 〈xD,xC〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t1D) (Byte 〈xD,xD〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t1E) (Byte 〈xD,xE〉) 〈x0,x3〉
-; quadruple … CALL (MODE_IMM13 t1F) (Byte 〈xD,xF〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_IP2022_6 ≝
-[
- quadruple … CLR MODE_FR0_and_W (Byte 〈x0,x6〉) 〈x0,x1〉
-; quadruple … CLR MODE_FR1_and_W (Byte 〈x0,x7〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_7 ≝
-[
- quadruple … CLRB (MODE_FR0n o0) (Byte 〈x8,x0〉) 〈x0,x1〉
-; quadruple … CLRB (MODE_FR1n o0) (Byte 〈x8,x1〉) 〈x0,x1〉
-; quadruple … CLRB (MODE_FR0n o1) (Byte 〈x8,x2〉) 〈x0,x1〉
-; quadruple … CLRB (MODE_FR1n o1) (Byte 〈x8,x3〉) 〈x0,x1〉
-; quadruple … CLRB (MODE_FR0n o2) (Byte 〈x8,x4〉) 〈x0,x1〉
-; quadruple … CLRB (MODE_FR1n o2) (Byte 〈x8,x5〉) 〈x0,x1〉
-; quadruple … CLRB (MODE_FR0n o3) (Byte 〈x8,x6〉) 〈x0,x1〉
-; quadruple … CLRB (MODE_FR1n o3) (Byte 〈x8,x7〉) 〈x0,x1〉
-; quadruple … CLRB (MODE_FR0n o4) (Byte 〈x8,x8〉) 〈x0,x1〉
-; quadruple … CLRB (MODE_FR1n o4) (Byte 〈x8,x9〉) 〈x0,x1〉
-; quadruple … CLRB (MODE_FR0n o5) (Byte 〈x8,xA〉) 〈x0,x1〉
-; quadruple … CLRB (MODE_FR1n o5) (Byte 〈x8,xB〉) 〈x0,x1〉
-; quadruple … CLRB (MODE_FR0n o6) (Byte 〈x8,xC〉) 〈x0,x1〉
-; quadruple … CLRB (MODE_FR1n o6) (Byte 〈x8,xD〉) 〈x0,x1〉
-; quadruple … CLRB (MODE_FR0n o7) (Byte 〈x8,xE〉) 〈x0,x1〉
-; quadruple … CLRB (MODE_FR1n o7) (Byte 〈x8,xF〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_8 ≝
-[
- quadruple … CMP MODE_W_and_FR0 (Byte 〈x0,x4〉) 〈x0,x1〉
-; quadruple … CMP MODE_W_and_FR1 (Byte 〈x0,x5〉) 〈x0,x1〉
-; quadruple … CMP MODE_IMM8 (Byte 〈x7,x9〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_9 ≝
-[
- quadruple … CSE MODE_W_and_FR0 (Byte 〈x4,x2〉) 〈x0,x1〉
-; quadruple … CSE MODE_W_and_FR1 (Byte 〈x4,x3〉) 〈x0,x1〉
-; quadruple … CSE MODE_IMM8 (Byte 〈x7,x7〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_10 ≝
-[
- quadruple … CSNE MODE_W_and_FR0 (Byte 〈x4,x0〉) 〈x0,x1〉
-; quadruple … CSNE MODE_W_and_FR1 (Byte 〈x4,x1〉) 〈x0,x1〉
-; quadruple … CSNE MODE_IMM8 (Byte 〈x7,x6〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_11 ≝
-[
- quadruple … DEC MODE_FR0_and_W (Byte 〈x0,xE〉) 〈x0,x1〉
-; quadruple … DEC MODE_FR1_and_W (Byte 〈x0,xF〉) 〈x0,x1〉
-; quadruple … DEC MODE_W_and_FR0 (Byte 〈x0,xC〉) 〈x0,x1〉
-; quadruple … DEC MODE_W_and_FR1 (Byte 〈x0,xD〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_12 ≝
-[
- quadruple … DECSNZ MODE_FR0_and_W (Byte 〈x4,xE〉) 〈x0,x1〉
-; quadruple … DECSNZ MODE_FR1_and_W (Byte 〈x4,xF〉) 〈x0,x1〉
-; quadruple … DECSNZ MODE_W_and_FR0 (Byte 〈x4,xC〉) 〈x0,x1〉
-; quadruple … DECSNZ MODE_W_and_FR1 (Byte 〈x4,xD〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_13 ≝
-[
- quadruple … DECSZ MODE_FR0_and_W (Byte 〈x2,xE〉) 〈x0,x1〉
-; quadruple … DECSZ MODE_FR1_and_W (Byte 〈x2,xF〉) 〈x0,x1〉
-; quadruple … DECSZ MODE_W_and_FR0 (Byte 〈x2,xC〉) 〈x0,x1〉
-; quadruple … DECSZ MODE_W_and_FR1 (Byte 〈x2,xD〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_14 ≝
-[
- quadruple … INC MODE_FR0_and_W (Byte 〈x2,xA〉) 〈x0,x1〉
-; quadruple … INC MODE_FR1_and_W (Byte 〈x2,xB〉) 〈x0,x1〉
-; quadruple … INC MODE_W_and_FR0 (Byte 〈x2,x8〉) 〈x0,x1〉
-; quadruple … INC MODE_W_and_FR1 (Byte 〈x2,x9〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_15 ≝
-[
- quadruple … INCSNZ MODE_FR0_and_W (Byte 〈x5,xA〉) 〈x0,x1〉
-; quadruple … INCSNZ MODE_FR1_and_W (Byte 〈x5,xB〉) 〈x0,x1〉
-; quadruple … INCSNZ MODE_W_and_FR0 (Byte 〈x5,x8〉) 〈x0,x1〉
-; quadruple … INCSNZ MODE_W_and_FR1 (Byte 〈x5,x9〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_16 ≝
-[
- quadruple … INCSZ MODE_FR0_and_W (Byte 〈x3,xE〉) 〈x0,x1〉
-; quadruple … INCSZ MODE_FR1_and_W (Byte 〈x3,xF〉) 〈x0,x1〉
-; quadruple … INCSZ MODE_W_and_FR0 (Byte 〈x3,xC〉) 〈x0,x1〉
-; quadruple … INCSZ MODE_W_and_FR1 (Byte 〈x3,xD〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_17 ≝
-[
- quadruple … JMP (MODE_IMM13 t00) (Byte 〈xE,x0〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t01) (Byte 〈xE,x1〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t02) (Byte 〈xE,x2〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t03) (Byte 〈xE,x3〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t04) (Byte 〈xE,x4〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t05) (Byte 〈xE,x5〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t06) (Byte 〈xE,x6〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t07) (Byte 〈xE,x7〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t08) (Byte 〈xE,x8〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t09) (Byte 〈xE,x9〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t0A) (Byte 〈xE,xA〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t0B) (Byte 〈xE,xB〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t0C) (Byte 〈xE,xC〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t0D) (Byte 〈xE,xD〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t0E) (Byte 〈xE,xE〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t0F) (Byte 〈xE,xF〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t10) (Byte 〈xF,x0〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t11) (Byte 〈xF,x1〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t12) (Byte 〈xF,x2〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t13) (Byte 〈xF,x3〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t14) (Byte 〈xF,x4〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t15) (Byte 〈xF,x5〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t16) (Byte 〈xF,x6〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t17) (Byte 〈xF,x7〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t18) (Byte 〈xF,x8〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t19) (Byte 〈xF,x9〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t1A) (Byte 〈xF,xA〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t1B) (Byte 〈xF,xB〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t1C) (Byte 〈xF,xC〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t1D) (Byte 〈xF,xD〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t1E) (Byte 〈xF,xE〉) 〈x0,x3〉
-; quadruple … JMP (MODE_IMM13 t1F) (Byte 〈xF,xF〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_IP2022_18 ≝
-[
- quadruple … LOADH MODE_IMM8 (Byte 〈x7,x0〉) 〈x0,x1〉
-; quadruple … LOADL MODE_IMM8 (Byte 〈x7,x1〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_19 ≝
-[
- quadruple … MOV MODE_FR0_and_W (Byte 〈x0,x2〉) 〈x0,x1〉
-; quadruple … MOV MODE_FR1_and_W (Byte 〈x0,x3〉) 〈x0,x1〉
-; quadruple … MOV MODE_W_and_FR0 (Byte 〈x2,x0〉) 〈x0,x1〉
-; quadruple … MOV MODE_W_and_FR1 (Byte 〈x2,x1〉) 〈x0,x1〉
-; quadruple … MOV MODE_IMM8 (Byte 〈x7,xC〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_20 ≝
-[
- quadruple … MULS MODE_W_and_FR0 (Byte 〈x5,x4〉) 〈x0,x1〉
-; quadruple … MULS MODE_W_and_FR1 (Byte 〈x5,x5〉) 〈x0,x1〉
-; quadruple … MULS MODE_IMM8 (Byte 〈x7,x3〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_21 ≝
-[
- quadruple … MULU MODE_W_and_FR0 (Byte 〈x5,x0〉) 〈x0,x1〉
-; quadruple … MULU MODE_W_and_FR1 (Byte 〈x5,x1〉) 〈x0,x1〉
-; quadruple … MULU MODE_IMM8 (Byte 〈x7,x2〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_22 ≝
-[
- quadruple … NOT MODE_FR0_and_W (Byte 〈x2,x6〉) 〈x0,x1〉
-; quadruple … NOT MODE_FR1_and_W (Byte 〈x2,x7〉) 〈x0,x1〉
-; quadruple … NOT MODE_W_and_FR0 (Byte 〈x2,x4〉) 〈x0,x1〉
-; quadruple … NOT MODE_W_and_FR1 (Byte 〈x2,x5〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_23 ≝
-[
- quadruple … OR MODE_FR0_and_W (Byte 〈x1,x2〉) 〈x0,x1〉
-; quadruple … OR MODE_FR1_and_W (Byte 〈x1,x3〉) 〈x0,x1〉
-; quadruple … OR MODE_W_and_FR0 (Byte 〈x1,x0〉) 〈x0,x1〉
-; quadruple … OR MODE_W_and_FR1 (Byte 〈x1,x1〉) 〈x0,x1〉
-; quadruple … OR MODE_IMM8 (Byte 〈x7,xD〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_24 ≝
-[
- quadruple … PAGE (MODE_IMM3 o0) (Word 〈〈x0,x0〉:〈x1,x0〉〉) 〈x0,x1〉
-; quadruple … PAGE (MODE_IMM3 o1) (Word 〈〈x0,x0〉:〈x1,x1〉〉) 〈x0,x1〉
-; quadruple … PAGE (MODE_IMM3 o2) (Word 〈〈x0,x0〉:〈x1,x2〉〉) 〈x0,x1〉
-; quadruple … PAGE (MODE_IMM3 o3) (Word 〈〈x0,x0〉:〈x1,x3〉〉) 〈x0,x1〉
-; quadruple … PAGE (MODE_IMM3 o4) (Word 〈〈x0,x0〉:〈x1,x4〉〉) 〈x0,x1〉
-; quadruple … PAGE (MODE_IMM3 o5) (Word 〈〈x0,x0〉:〈x1,x5〉〉) 〈x0,x1〉
-; quadruple … PAGE (MODE_IMM3 o6) (Word 〈〈x0,x0〉:〈x1,x6〉〉) 〈x0,x1〉
-; quadruple … PAGE (MODE_IMM3 o7) (Word 〈〈x0,x0〉:〈x1,x7〉〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_25 ≝
-[
- quadruple … POP MODE_FR0_and_W (Byte 〈x4,x6〉) 〈x0,x1〉
-; quadruple … POP MODE_FR1_and_W (Byte 〈x4,x7〉) 〈x0,x1〉
-; quadruple … PUSH MODE_W_and_FR0 (Byte 〈x4,x4〉) 〈x0,x1〉
-; quadruple … PUSH MODE_W_and_FR1 (Byte 〈x4,x5〉) 〈x0,x1〉
-; quadruple … PUSH MODE_IMM8 (Byte 〈x7,x4〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_26 ≝
-[
- quadruple … RETI (MODE_IMM3 o0) (Word 〈〈x0,x0〉:〈x0,x8〉〉) 〈x0,x3〉
-; quadruple … RETI (MODE_IMM3 o1) (Word 〈〈x0,x0〉:〈x0,x9〉〉) 〈x0,x3〉
-; quadruple … RETI (MODE_IMM3 o2) (Word 〈〈x0,x0〉:〈x0,xA〉〉) 〈x0,x3〉
-; quadruple … RETI (MODE_IMM3 o3) (Word 〈〈x0,x0〉:〈x0,xB〉〉) 〈x0,x3〉
-; quadruple … RETI (MODE_IMM3 o4) (Word 〈〈x0,x0〉:〈x0,xC〉〉) 〈x0,x3〉
-; quadruple … RETI (MODE_IMM3 o5) (Word 〈〈x0,x0〉:〈x0,xD〉〉) 〈x0,x3〉
-; quadruple … RETI (MODE_IMM3 o6) (Word 〈〈x0,x0〉:〈x0,xE〉〉) 〈x0,x3〉
-; quadruple … RETI (MODE_IMM3 o7) (Word 〈〈x0,x0〉:〈x0,xF〉〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_IP2022_27 ≝
-[ quadruple … RETW MODE_IMM8 (Byte 〈x7,x8〉) 〈x0,x3〉 ].
-
-ndefinition opcode_table_IP2022_28 ≝
-[
- quadruple … RL MODE_FR0_and_W (Byte 〈x3,x6〉) 〈x0,x1〉
-; quadruple … RL MODE_FR1_and_W (Byte 〈x3,x7〉) 〈x0,x1〉
-; quadruple … RL MODE_W_and_FR0 (Byte 〈x3,x4〉) 〈x0,x1〉
-; quadruple … RL MODE_W_and_FR1 (Byte 〈x3,x5〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_29 ≝
-[
- quadruple … RR MODE_FR0_and_W (Byte 〈x3,x2〉) 〈x0,x1〉
-; quadruple … RR MODE_FR1_and_W (Byte 〈x3,x3〉) 〈x0,x1〉
-; quadruple … RR MODE_W_and_FR0 (Byte 〈x3,x0〉) 〈x0,x1〉
-; quadruple … RR MODE_W_and_FR1 (Byte 〈x3,x1〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_30 ≝
-[
- quadruple … SB (MODE_FR0n o0) (Byte 〈xB,x0〉) 〈x0,x1〉
-; quadruple … SB (MODE_FR1n o0) (Byte 〈xB,x1〉) 〈x0,x1〉
-; quadruple … SB (MODE_FR0n o1) (Byte 〈xB,x2〉) 〈x0,x1〉
-; quadruple … SB (MODE_FR1n o1) (Byte 〈xB,x3〉) 〈x0,x1〉
-; quadruple … SB (MODE_FR0n o2) (Byte 〈xB,x4〉) 〈x0,x1〉
-; quadruple … SB (MODE_FR1n o2) (Byte 〈xB,x5〉) 〈x0,x1〉
-; quadruple … SB (MODE_FR0n o3) (Byte 〈xB,x6〉) 〈x0,x1〉
-; quadruple … SB (MODE_FR1n o3) (Byte 〈xB,x7〉) 〈x0,x1〉
-; quadruple … SB (MODE_FR0n o4) (Byte 〈xB,x8〉) 〈x0,x1〉
-; quadruple … SB (MODE_FR1n o4) (Byte 〈xB,x9〉) 〈x0,x1〉
-; quadruple … SB (MODE_FR0n o5) (Byte 〈xB,xA〉) 〈x0,x1〉
-; quadruple … SB (MODE_FR1n o5) (Byte 〈xB,xB〉) 〈x0,x1〉
-; quadruple … SB (MODE_FR0n o6) (Byte 〈xB,xC〉) 〈x0,x1〉
-; quadruple … SB (MODE_FR1n o6) (Byte 〈xB,xD〉) 〈x0,x1〉
-; quadruple … SB (MODE_FR0n o7) (Byte 〈xB,xE〉) 〈x0,x1〉
-; quadruple … SB (MODE_FR1n o7) (Byte 〈xB,xF〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_31 ≝
-[
- quadruple … SETB (MODE_FR0n o0) (Byte 〈x9,x0〉) 〈x0,x1〉
-; quadruple … SETB (MODE_FR1n o0) (Byte 〈x9,x1〉) 〈x0,x1〉
-; quadruple … SETB (MODE_FR0n o1) (Byte 〈x9,x2〉) 〈x0,x1〉
-; quadruple … SETB (MODE_FR1n o1) (Byte 〈x9,x3〉) 〈x0,x1〉
-; quadruple … SETB (MODE_FR0n o2) (Byte 〈x9,x4〉) 〈x0,x1〉
-; quadruple … SETB (MODE_FR1n o2) (Byte 〈x9,x5〉) 〈x0,x1〉
-; quadruple … SETB (MODE_FR0n o3) (Byte 〈x9,x6〉) 〈x0,x1〉
-; quadruple … SETB (MODE_FR1n o3) (Byte 〈x9,x7〉) 〈x0,x1〉
-; quadruple … SETB (MODE_FR0n o4) (Byte 〈x9,x8〉) 〈x0,x1〉
-; quadruple … SETB (MODE_FR1n o4) (Byte 〈x9,x9〉) 〈x0,x1〉
-; quadruple … SETB (MODE_FR0n o5) (Byte 〈x9,xA〉) 〈x0,x1〉
-; quadruple … SETB (MODE_FR1n o5) (Byte 〈x9,xB〉) 〈x0,x1〉
-; quadruple … SETB (MODE_FR0n o6) (Byte 〈x9,xC〉) 〈x0,x1〉
-; quadruple … SETB (MODE_FR1n o6) (Byte 〈x9,xD〉) 〈x0,x1〉
-; quadruple … SETB (MODE_FR0n o7) (Byte 〈x9,xE〉) 〈x0,x1〉
-; quadruple … SETB (MODE_FR1n o7) (Byte 〈x9,xF〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_32 ≝
-[
- quadruple … SNB (MODE_FR0n o0) (Byte 〈xA,x0〉) 〈x0,x1〉
-; quadruple … SNB (MODE_FR1n o0) (Byte 〈xA,x1〉) 〈x0,x1〉
-; quadruple … SNB (MODE_FR0n o1) (Byte 〈xA,x2〉) 〈x0,x1〉
-; quadruple … SNB (MODE_FR1n o1) (Byte 〈xA,x3〉) 〈x0,x1〉
-; quadruple … SNB (MODE_FR0n o2) (Byte 〈xA,x4〉) 〈x0,x1〉
-; quadruple … SNB (MODE_FR1n o2) (Byte 〈xA,x5〉) 〈x0,x1〉
-; quadruple … SNB (MODE_FR0n o3) (Byte 〈xA,x6〉) 〈x0,x1〉
-; quadruple … SNB (MODE_FR1n o3) (Byte 〈xA,x7〉) 〈x0,x1〉
-; quadruple … SNB (MODE_FR0n o4) (Byte 〈xA,x8〉) 〈x0,x1〉
-; quadruple … SNB (MODE_FR1n o4) (Byte 〈xA,x9〉) 〈x0,x1〉
-; quadruple … SNB (MODE_FR0n o5) (Byte 〈xA,xA〉) 〈x0,x1〉
-; quadruple … SNB (MODE_FR1n o5) (Byte 〈xA,xB〉) 〈x0,x1〉
-; quadruple … SNB (MODE_FR0n o6) (Byte 〈xA,xC〉) 〈x0,x1〉
-; quadruple … SNB (MODE_FR1n o6) (Byte 〈xA,xD〉) 〈x0,x1〉
-; quadruple … SNB (MODE_FR0n o7) (Byte 〈xA,xE〉) 〈x0,x1〉
-; quadruple … SNB (MODE_FR1n o7) (Byte 〈xA,xF〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_33 ≝
-[ quadruple … SPEED MODE_IMM8 (Byte 〈x0,x1〉) 〈x0,x1〉 ].
-
-ndefinition opcode_table_IP2022_34 ≝
-[
- quadruple … SUB MODE_FR0_and_W (Byte 〈x0,xA〉) 〈x0,x1〉
-; quadruple … SUB MODE_FR1_and_W (Byte 〈x0,xB〉) 〈x0,x1〉
-; quadruple … SUB MODE_W_and_FR0 (Byte 〈x0,x8〉) 〈x0,x1〉
-; quadruple … SUB MODE_W_and_FR1 (Byte 〈x0,x9〉) 〈x0,x1〉
-; quadruple … SUB MODE_IMM8 (Byte 〈x7,xA〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_35 ≝
-[
- quadruple … SUBC MODE_FR0_and_W (Byte 〈x4,xA〉) 〈x0,x1〉
-; quadruple … SUBC MODE_FR1_and_W (Byte 〈x4,xB〉) 〈x0,x1〉
-; quadruple … SUBC MODE_W_and_FR0 (Byte 〈x4,x8〉) 〈x0,x1〉
-; quadruple … SUBC MODE_W_and_FR1 (Byte 〈x4,x9〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_36 ≝
-[
- quadruple … SWAP MODE_FR0_and_W (Byte 〈x3,xA〉) 〈x0,x1〉
-; quadruple … SWAP MODE_FR1_and_W (Byte 〈x3,xB〉) 〈x0,x1〉
-; quadruple … SWAP MODE_W_and_FR0 (Byte 〈x3,x8〉) 〈x0,x1〉
-; quadruple … SWAP MODE_W_and_FR1 (Byte 〈x3,x9〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_37 ≝
-[
- quadruple … TEST MODE_FR0_and_W (Byte 〈x2,x2〉) 〈x0,x1〉
-; quadruple … TEST MODE_FR1_and_W (Byte 〈x2,x3〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022_38 ≝
-[
- quadruple … XOR MODE_FR0_and_W (Byte 〈x1,xA〉) 〈x0,x1〉
-; quadruple … XOR MODE_FR1_and_W (Byte 〈x1,xB〉) 〈x0,x1〉
-; quadruple … XOR MODE_W_and_FR0 (Byte 〈x1,x8〉) 〈x0,x1〉
-; quadruple … XOR MODE_W_and_FR1 (Byte 〈x1,x9〉) 〈x0,x1〉
-; quadruple … XOR MODE_IMM8 (Byte 〈x7,xF〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_IP2022 ≝
- opcode_table_IP2022_1 @ opcode_table_IP2022_2 @ opcode_table_IP2022_3 @ opcode_table_IP2022_4 @
- opcode_table_IP2022_5 @ opcode_table_IP2022_6 @ opcode_table_IP2022_7 @ opcode_table_IP2022_8 @
- opcode_table_IP2022_9 @ opcode_table_IP2022_10 @ opcode_table_IP2022_11 @ opcode_table_IP2022_12 @
- opcode_table_IP2022_13 @ opcode_table_IP2022_14 @ opcode_table_IP2022_15 @ opcode_table_IP2022_16 @
- opcode_table_IP2022_17 @ opcode_table_IP2022_18 @ opcode_table_IP2022_19 @ opcode_table_IP2022_20 @
- opcode_table_IP2022_21 @ opcode_table_IP2022_22 @ opcode_table_IP2022_23 @ opcode_table_IP2022_24 @
- opcode_table_IP2022_25 @ opcode_table_IP2022_26 @ opcode_table_IP2022_27 @ opcode_table_IP2022_28 @
- opcode_table_IP2022_29 @ opcode_table_IP2022_30 @ opcode_table_IP2022_31 @ opcode_table_IP2022_32 @
- opcode_table_IP2022_33 @ opcode_table_IP2022_34 @ opcode_table_IP2022_35 @ opcode_table_IP2022_36 @
- opcode_table_IP2022_37 @ opcode_table_IP2022_38.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/pseudo.ma".
-include "emulator/opcodes/IP2022_table.ma".
-
-(* ******************* *)
-(* TABELLA DELL'IP2022 *)
-(* ******************* *)
-
-(* IP2022: opcode non implementati come da manuale (byte) *)
-ndefinition IP2022_not_impl_byte ≝
- [〈x0,x0〉;〈x5,x2〉;〈x5,x3〉;〈x5,x6〉;〈x5,x7〉;〈x6,x0〉;〈x6,x1〉;〈x6,x2〉
- ;〈x6,x3〉;〈x6,x4〉;〈x6,x5〉;〈x6,x6〉;〈x6,x7〉;〈x6,x8〉;〈x6,x9〉;〈x6,xA〉
- ;〈x6,xB〉;〈x6,xC〉;〈x6,xD〉;〈x6,xE〉;〈x6,xF〉;〈x7,x5〉 ].
-
-(*nlemma ok_byte_table_IP2022 : forall_b8 (λb.
- (test_not_impl_byte b IP2022_not_impl_byte ⊙ eq_w16 (get_byte_count IP2022 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_IP2022) 〈〈x0,x0〉:〈x0,x1〉〉) ⊗
- (⊖ (test_not_impl_byte b IP2022_not_impl_byte) ⊙ eq_w16 (get_byte_count IP2022 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_IP2022) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.*)
-
-(* IP2022: opcode non implementati come da manuale (0x00+byte) *)
-ndefinition IP2022_not_impl_word ≝
- [〈x1,xE〉;〈x1,xF〉
- ;〈x2,x0〉;〈x2,x1〉;〈x2,x2〉;〈x2,x3〉;〈x2,x4〉;〈x2,x5〉;〈x2,x6〉;〈x2,x7〉
- ;〈x2,x8〉;〈x2,x9〉;〈x2,xA〉;〈x2,xB〉;〈x2,xC〉;〈x2,xD〉;〈x2,xE〉;〈x2,xF〉
- ;〈x3,x0〉;〈x3,x1〉;〈x3,x2〉;〈x3,x3〉;〈x3,x4〉;〈x3,x5〉;〈x3,x6〉;〈x3,x7〉
- ;〈x3,x8〉;〈x3,x9〉;〈x3,xA〉;〈x3,xB〉;〈x3,xC〉;〈x3,xD〉;〈x3,xE〉;〈x3,xF〉
- ;〈x4,x0〉;〈x4,x1〉;〈x4,x2〉;〈x4,x3〉;〈x4,x4〉;〈x4,x5〉;〈x4,x6〉;〈x4,x7〉
- ;〈x4,x8〉;〈x4,x9〉;〈x4,xA〉;〈x4,xB〉;〈x4,xC〉;〈x4,xD〉;〈x4,xE〉;〈x4,xF〉
- ;〈x5,x0〉;〈x5,x1〉;〈x5,x2〉;〈x5,x3〉;〈x5,x4〉;〈x5,x5〉;〈x5,x6〉;〈x5,x7〉
- ;〈x5,x8〉;〈x5,x9〉;〈x5,xA〉;〈x5,xB〉;〈x5,xC〉;〈x5,xD〉;〈x5,xE〉;〈x5,xF〉
- ;〈x6,x0〉;〈x6,x1〉;〈x6,x2〉;〈x6,x3〉;〈x6,x4〉;〈x6,x5〉;〈x6,x6〉;〈x6,x7〉
- ;〈x6,x8〉;〈x6,x9〉;〈x6,xA〉;〈x6,xB〉;〈x6,xC〉;〈x6,xD〉;〈x6,xE〉;〈x6,xF〉
- ;〈x7,x0〉;〈x7,x1〉;〈x7,x2〉;〈x7,x3〉;〈x7,x4〉;〈x7,x5〉;〈x7,x6〉;〈x7,x7〉
- ;〈x7,x8〉;〈x7,x9〉;〈x7,xA〉;〈x7,xB〉;〈x7,xC〉;〈x7,xD〉;〈x7,xE〉;〈x7,xF〉
- ;〈x8,x0〉;〈x8,x1〉;〈x8,x2〉;〈x8,x3〉;〈x8,x4〉;〈x8,x5〉;〈x8,x6〉;〈x8,x7〉
- ;〈x8,x8〉;〈x8,x9〉;〈x8,xA〉;〈x8,xB〉;〈x8,xC〉;〈x8,xD〉;〈x8,xE〉;〈x8,xF〉
- ;〈x9,x0〉;〈x9,x1〉;〈x9,x2〉;〈x9,x3〉;〈x9,x4〉;〈x9,x5〉;〈x9,x6〉;〈x9,x7〉
- ;〈x9,x8〉;〈x9,x9〉;〈x9,xA〉;〈x9,xB〉;〈x9,xC〉;〈x9,xD〉;〈x9,xE〉;〈x9,xF〉
- ;〈xA,x0〉;〈xA,x1〉;〈xA,x2〉;〈xA,x3〉;〈xA,x4〉;〈xA,x5〉;〈xA,x6〉;〈xA,x7〉
- ;〈xA,x8〉;〈xA,x9〉;〈xA,xA〉;〈xA,xB〉;〈xA,xC〉;〈xA,xD〉;〈xA,xE〉;〈xA,xF〉
- ;〈xB,x0〉;〈xB,x1〉;〈xB,x2〉;〈xB,x3〉;〈xB,x4〉;〈xB,x5〉;〈xB,x6〉;〈xB,x7〉
- ;〈xB,x8〉;〈xB,x9〉;〈xB,xA〉;〈xB,xB〉;〈xB,xC〉;〈xB,xD〉;〈xB,xE〉;〈xB,xF〉
- ;〈xC,x0〉;〈xC,x1〉;〈xC,x2〉;〈xC,x3〉;〈xC,x4〉;〈xC,x5〉;〈xC,x6〉;〈xC,x7〉
- ;〈xC,x8〉;〈xC,x9〉;〈xC,xA〉;〈xC,xB〉;〈xC,xC〉;〈xC,xD〉;〈xC,xE〉;〈xC,xF〉
- ;〈xD,x0〉;〈xD,x1〉;〈xD,x2〉;〈xD,x3〉;〈xD,x4〉;〈xD,x5〉;〈xD,x6〉;〈xD,x7〉
- ;〈xD,x8〉;〈xD,x9〉;〈xD,xA〉;〈xD,xB〉;〈xD,xC〉;〈xD,xD〉;〈xD,xE〉;〈xD,xF〉
- ;〈xE,x0〉;〈xE,x1〉;〈xE,x2〉;〈xE,x3〉;〈xE,x4〉;〈xE,x5〉;〈xE,x6〉;〈xE,x7〉
- ;〈xE,x8〉;〈xE,x9〉;〈xE,xA〉;〈xE,xB〉;〈xE,xC〉;〈xE,xD〉;〈xE,xE〉;〈xE,xF〉
- ;〈xF,x0〉;〈xF,x1〉;〈xF,x2〉;〈xF,x3〉;〈xF,x4〉;〈xF,x5〉;〈xF,x6〉;〈xF,x7〉
- ;〈xF,x8〉;〈xF,x9〉;〈xF,xA〉;〈xF,xB〉;〈xF,xC〉;〈xF,xD〉;〈xF,xE〉;〈xF,xF〉
- ].
-
-nlemma ok_word_table_IP2022 : forall_b8 (λb.
- (test_not_impl_byte b IP2022_not_impl_word ⊙ eq_w16 (get_word_count IP2022 〈〈x0,x0〉:b〉 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_IP2022) 〈〈x0,x0〉:〈x0,x1〉〉) ⊗
- (⊖ (test_not_impl_byte b IP2022_not_impl_word) ⊙ eq_w16 (get_word_count IP2022 〈〈x0,x0〉:b〉 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_IP2022) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* tutti gli pseudo implementati *)
-nlemma ok_pseudo_table_IP2022 :
- forall_IP2022_pseudo (λo.
- le_w16 〈〈x0,x0〉:〈x0,x1〉〉 (get_pseudo_count IP2022 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_IP2022)) = true.
- napply refl_eq.
-nqed.
-
-(* tutte le modalita' implementate *)
-nlemma ok_mode_table_IP2022 :
- forall_IP2022_im (λi.
- le_w16 〈〈x0,x0〉:〈x0,x1〉〉 (get_mode_count IP2022 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_IP2022)) = true.
- napply refl_eq.
-nqed.
-
-nlemma ok_PsIm_table_IP2022 :
- forall_IP2022_im (λi.
- forall_IP2022_pseudo (λps.
- le_w16 (get_PsIm_count IP2022 ps i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_IP2022) 〈〈x0,x0〉:〈x0,x1〉〉)) = true.
- napply refl_eq.
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/Freescale_pseudo.ma".
-include "emulator/opcodes/Freescale_instr_mode.ma".
-include "emulator/opcodes/byte_or_word.ma".
-include "common/list.ma".
-
-(* ***************** *)
-(* TABELLA DELL'RS08 *)
-(* ***************** *)
-
-(* definizione come concatenazione finale di liste per velocizzare il parsing *)
-(* ogni riga e' [pseudo] [modalita' indirizzamento] [opcode esadecimale] [#cicli esecuzione] *)
-
-ndefinition opcode_table_RS08_1 ≝
-[
- quadruple … ADC MODE_IMM1 (Byte 〈xA,x9〉) 〈x0,x2〉
-; quadruple … ADC MODE_DIR1 (Byte 〈xB,x9〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_RS08_2 ≝
-[
- quadruple … ADD MODE_IMM1 (Byte 〈xA,xB〉) 〈x0,x2〉
-; quadruple … ADD MODE_DIR1 (Byte 〈xB,xB〉) 〈x0,x3〉
-; quadruple … ADD (MODE_TNY x0) (Byte 〈x6,x0〉) 〈x0,x3〉
-; quadruple … ADD (MODE_TNY x1) (Byte 〈x6,x1〉) 〈x0,x3〉
-; quadruple … ADD (MODE_TNY x2) (Byte 〈x6,x2〉) 〈x0,x3〉
-; quadruple … ADD (MODE_TNY x3) (Byte 〈x6,x3〉) 〈x0,x3〉
-; quadruple … ADD (MODE_TNY x4) (Byte 〈x6,x4〉) 〈x0,x3〉
-; quadruple … ADD (MODE_TNY x5) (Byte 〈x6,x5〉) 〈x0,x3〉
-; quadruple … ADD (MODE_TNY x6) (Byte 〈x6,x6〉) 〈x0,x3〉
-; quadruple … ADD (MODE_TNY x7) (Byte 〈x6,x7〉) 〈x0,x3〉
-; quadruple … ADD (MODE_TNY x8) (Byte 〈x6,x8〉) 〈x0,x3〉
-; quadruple … ADD (MODE_TNY x9) (Byte 〈x6,x9〉) 〈x0,x3〉
-; quadruple … ADD (MODE_TNY xA) (Byte 〈x6,xA〉) 〈x0,x3〉
-; quadruple … ADD (MODE_TNY xB) (Byte 〈x6,xB〉) 〈x0,x3〉
-; quadruple … ADD (MODE_TNY xC) (Byte 〈x6,xC〉) 〈x0,x3〉
-; quadruple … ADD (MODE_TNY xD) (Byte 〈x6,xD〉) 〈x0,x3〉
-; quadruple … ADD (MODE_TNY xE) (Byte 〈x6,xE〉) 〈x0,x3〉
-; quadruple … ADD (MODE_TNY xF) (Byte 〈x6,xF〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_RS08_3 ≝
-[
- quadruple … AND MODE_IMM1 (Byte 〈xA,x4〉) 〈x0,x2〉
-; quadruple … AND MODE_DIR1 (Byte 〈xB,x4〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_RS08_4 ≝
-[
- quadruple … ASL MODE_INHA (Byte 〈x4,x8〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_RS08_5 ≝
-[
- quadruple … BRA MODE_IMM1 (Byte 〈x3,x0〉) 〈x0,x3〉
-; quadruple … BCC MODE_IMM1 (Byte 〈x3,x4〉) 〈x0,x3〉
-; quadruple … BCS MODE_IMM1 (Byte 〈x3,x5〉) 〈x0,x3〉
-; quadruple … BNE MODE_IMM1 (Byte 〈x3,x6〉) 〈x0,x3〉
-; quadruple … BEQ MODE_IMM1 (Byte 〈x3,x7〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_RS08_6 ≝
-[
- quadruple … BSETn (MODE_DIRn o0) (Byte 〈x1,x0〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o0) (Byte 〈x1,x1〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o1) (Byte 〈x1,x2〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o1) (Byte 〈x1,x3〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o2) (Byte 〈x1,x4〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o2) (Byte 〈x1,x5〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o3) (Byte 〈x1,x6〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o3) (Byte 〈x1,x7〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o4) (Byte 〈x1,x8〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o4) (Byte 〈x1,x9〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o5) (Byte 〈x1,xA〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o5) (Byte 〈x1,xB〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o6) (Byte 〈x1,xC〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o6) (Byte 〈x1,xD〉) 〈x0,x5〉
-; quadruple … BSETn (MODE_DIRn o7) (Byte 〈x1,xE〉) 〈x0,x5〉
-; quadruple … BCLRn (MODE_DIRn o7) (Byte 〈x1,xF〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_RS08_7 ≝
-[
- quadruple … BRSETn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x0〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x1〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x2〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x3〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x4〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x5〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x6〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x7〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x8〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x9〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xA〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xB〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xC〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xD〉) 〈x0,x5〉
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xE〉) 〈x0,x5〉
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xF〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_RS08_8 ≝
-[
- quadruple … CLC MODE_INH (Byte 〈x3,x8〉) 〈x0,x1〉
-; quadruple … SEC MODE_INH (Byte 〈x3,x9〉) 〈x0,x1〉
-; quadruple … SLA MODE_INH (Byte 〈x4,x2〉) 〈x0,x1〉
-; quadruple … SHA MODE_INH (Byte 〈x4,x5〉) 〈x0,x1〉
-; quadruple … NOP MODE_INH (Byte 〈xA,xC〉) 〈x0,x1〉
-; quadruple … STOP MODE_INH (Byte 〈xA,xE〉) 〈x0,x2〉
-; quadruple … WAIT MODE_INH (Byte 〈xA,xF〉) 〈x0,x2〉
-; quadruple … RTS MODE_INH (Byte 〈xB,xE〉) 〈x0,x3〉
-; quadruple … BGND MODE_INH (Byte 〈xB,xF〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_RS08_9 ≝
-[
- quadruple … CBEQA MODE_DIR1_and_IMM1 (Byte 〈x3,x1〉) 〈x0,x5〉
-; quadruple … CBEQA MODE_IMM1_and_IMM1 (Byte 〈x4,x1〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_RS08_10 ≝
-[
- quadruple … CLR MODE_DIR1 (Byte 〈x3,xF〉) 〈x0,x3〉
-; quadruple … CLR MODE_INHA (Byte 〈x4,xF〉) 〈x0,x1〉
-; quadruple … CLR (MODE_SRT t00) (Byte 〈x8,x0〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t01) (Byte 〈x8,x1〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t02) (Byte 〈x8,x2〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t03) (Byte 〈x8,x3〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t04) (Byte 〈x8,x4〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t05) (Byte 〈x8,x5〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t06) (Byte 〈x8,x6〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t07) (Byte 〈x8,x7〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t08) (Byte 〈x8,x8〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t09) (Byte 〈x8,x9〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t0A) (Byte 〈x8,xA〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t0B) (Byte 〈x8,xB〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t0C) (Byte 〈x8,xC〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t0D) (Byte 〈x8,xD〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t0E) (Byte 〈x8,xE〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t0F) (Byte 〈x8,xF〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t10) (Byte 〈x9,x0〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t11) (Byte 〈x9,x1〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t12) (Byte 〈x9,x2〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t13) (Byte 〈x9,x3〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t14) (Byte 〈x9,x4〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t15) (Byte 〈x9,x5〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t16) (Byte 〈x9,x6〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t17) (Byte 〈x9,x7〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t18) (Byte 〈x9,x8〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t19) (Byte 〈x9,x9〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t1A) (Byte 〈x9,xA〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t1B) (Byte 〈x9,xB〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t1C) (Byte 〈x9,xC〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t1D) (Byte 〈x9,xD〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t1E) (Byte 〈x9,xE〉) 〈x0,x2〉
-; quadruple … CLR (MODE_SRT t1F) (Byte 〈x9,xF〉) 〈x0,x2〉
-].
-
-ndefinition opcode_table_RS08_11 ≝
-[
- quadruple … CMP MODE_IMM1 (Byte 〈xA,x1〉) 〈x0,x2〉
-; quadruple … CMP MODE_DIR1 (Byte 〈xB,x1〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_RS08_12 ≝
-[
- quadruple … COM MODE_INHA (Byte 〈x4,x3〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_RS08_13 ≝
-[
- quadruple … DBNZ MODE_DIR1_and_IMM1 (Byte 〈x3,xB〉) 〈x0,x7〉
-; quadruple … DBNZ MODE_INHA_and_IMM1 (Byte 〈x4,xB〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_RS08_14 ≝
-[
- quadruple … DEC MODE_DIR1 (Byte 〈x3,xA〉) 〈x0,x5〉
-; quadruple … DEC MODE_INHA (Byte 〈x4,xA〉) 〈x0,x1〉
-; quadruple … DEC (MODE_TNY x0) (Byte 〈x5,x0〉) 〈x0,x4〉
-; quadruple … DEC (MODE_TNY x1) (Byte 〈x5,x1〉) 〈x0,x4〉
-; quadruple … DEC (MODE_TNY x2) (Byte 〈x5,x2〉) 〈x0,x4〉
-; quadruple … DEC (MODE_TNY x3) (Byte 〈x5,x3〉) 〈x0,x4〉
-; quadruple … DEC (MODE_TNY x4) (Byte 〈x5,x4〉) 〈x0,x4〉
-; quadruple … DEC (MODE_TNY x5) (Byte 〈x5,x5〉) 〈x0,x4〉
-; quadruple … DEC (MODE_TNY x6) (Byte 〈x5,x6〉) 〈x0,x4〉
-; quadruple … DEC (MODE_TNY x7) (Byte 〈x5,x7〉) 〈x0,x4〉
-; quadruple … DEC (MODE_TNY x8) (Byte 〈x5,x8〉) 〈x0,x4〉
-; quadruple … DEC (MODE_TNY x9) (Byte 〈x5,x9〉) 〈x0,x4〉
-; quadruple … DEC (MODE_TNY xA) (Byte 〈x5,xA〉) 〈x0,x4〉
-; quadruple … DEC (MODE_TNY xB) (Byte 〈x5,xB〉) 〈x0,x4〉
-; quadruple … DEC (MODE_TNY xC) (Byte 〈x5,xC〉) 〈x0,x4〉
-; quadruple … DEC (MODE_TNY xD) (Byte 〈x5,xD〉) 〈x0,x4〉
-; quadruple … DEC (MODE_TNY xE) (Byte 〈x5,xE〉) 〈x0,x4〉
-; quadruple … DEC (MODE_TNY xF) (Byte 〈x5,xF〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_RS08_15 ≝
-[
- quadruple … EOR MODE_IMM1 (Byte 〈xA,x8〉) 〈x0,x2〉
-; quadruple … EOR MODE_DIR1 (Byte 〈xB,x8〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_RS08_16 ≝
-[
- quadruple … INC MODE_DIR1 (Byte 〈x3,xC〉) 〈x0,x5〉
-; quadruple … INC MODE_INHA (Byte 〈x4,xC〉) 〈x0,x1〉
-; quadruple … INC (MODE_TNY x0) (Byte 〈x2,x0〉) 〈x0,x4〉
-; quadruple … INC (MODE_TNY x1) (Byte 〈x2,x1〉) 〈x0,x4〉
-; quadruple … INC (MODE_TNY x2) (Byte 〈x2,x2〉) 〈x0,x4〉
-; quadruple … INC (MODE_TNY x3) (Byte 〈x2,x3〉) 〈x0,x4〉
-; quadruple … INC (MODE_TNY x4) (Byte 〈x2,x4〉) 〈x0,x4〉
-; quadruple … INC (MODE_TNY x5) (Byte 〈x2,x5〉) 〈x0,x4〉
-; quadruple … INC (MODE_TNY x6) (Byte 〈x2,x6〉) 〈x0,x4〉
-; quadruple … INC (MODE_TNY x7) (Byte 〈x2,x7〉) 〈x0,x4〉
-; quadruple … INC (MODE_TNY x8) (Byte 〈x2,x8〉) 〈x0,x4〉
-; quadruple … INC (MODE_TNY x9) (Byte 〈x2,x9〉) 〈x0,x4〉
-; quadruple … INC (MODE_TNY xA) (Byte 〈x2,xA〉) 〈x0,x4〉
-; quadruple … INC (MODE_TNY xB) (Byte 〈x2,xB〉) 〈x0,x4〉
-; quadruple … INC (MODE_TNY xC) (Byte 〈x2,xC〉) 〈x0,x4〉
-; quadruple … INC (MODE_TNY xD) (Byte 〈x2,xD〉) 〈x0,x4〉
-; quadruple … INC (MODE_TNY xE) (Byte 〈x2,xE〉) 〈x0,x4〉
-; quadruple … INC (MODE_TNY xF) (Byte 〈x2,xF〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_RS08_17 ≝
-[
- quadruple … JMP MODE_IMM2 (Byte 〈xB,xC〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_RS08_18 ≝
-[
- quadruple … BSR MODE_IMM1 (Byte 〈xA,xD〉) 〈x0,x3〉
-; quadruple … JSR MODE_IMM2 (Byte 〈xB,xD〉) 〈x0,x4〉
-].
-
-ndefinition opcode_table_RS08_19 ≝
-[
- quadruple … LDA MODE_IMM1 (Byte 〈xA,x6〉) 〈x0,x2〉
-; quadruple … LDA MODE_DIR1 (Byte 〈xB,x6〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t00) (Byte 〈xC,x0〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t01) (Byte 〈xC,x1〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t02) (Byte 〈xC,x2〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t03) (Byte 〈xC,x3〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t04) (Byte 〈xC,x4〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t05) (Byte 〈xC,x5〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t06) (Byte 〈xC,x6〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t07) (Byte 〈xC,x7〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t08) (Byte 〈xC,x8〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t09) (Byte 〈xC,x9〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t0A) (Byte 〈xC,xA〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t0B) (Byte 〈xC,xB〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t0C) (Byte 〈xC,xC〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t0D) (Byte 〈xC,xD〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t0E) (Byte 〈xC,xE〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t0F) (Byte 〈xC,xF〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t10) (Byte 〈xD,x0〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t11) (Byte 〈xD,x1〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t12) (Byte 〈xD,x2〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t13) (Byte 〈xD,x3〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t14) (Byte 〈xD,x4〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t15) (Byte 〈xD,x5〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t16) (Byte 〈xD,x6〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t17) (Byte 〈xD,x7〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t18) (Byte 〈xD,x8〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t19) (Byte 〈xD,x9〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t1A) (Byte 〈xD,xA〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t1B) (Byte 〈xD,xB〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t1C) (Byte 〈xD,xC〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t1D) (Byte 〈xD,xD〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t1E) (Byte 〈xD,xE〉) 〈x0,x3〉
-; quadruple … LDA (MODE_SRT t1F) (Byte 〈xD,xF〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_RS08_20 ≝
-[
- quadruple … LSR MODE_INHA (Byte 〈x4,x4〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_RS08_21 ≝
-[
- quadruple … MOV MODE_IMM1_to_DIR1 (Byte 〈x3,xE〉) 〈x0,x4〉
-; quadruple … MOV MODE_DIR1_to_DIR1 (Byte 〈x4,xE〉) 〈x0,x5〉
-].
-
-ndefinition opcode_table_RS08_22 ≝
-[
- quadruple … ORA MODE_IMM1 (Byte 〈xA,xA〉) 〈x0,x2〉
-; quadruple … ORA MODE_DIR1 (Byte 〈xB,xA〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_RS08_23 ≝
-[
- quadruple … ROL MODE_INHA (Byte 〈x4,x9〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_RS08_24 ≝
-[
- quadruple … ROR MODE_INHA (Byte 〈x4,x6〉) 〈x0,x1〉
-].
-
-ndefinition opcode_table_RS08_25 ≝
-[
- quadruple … SBC MODE_IMM1 (Byte 〈xA,x2〉) 〈x0,x2〉
-; quadruple … SBC MODE_DIR1 (Byte 〈xB,x2〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_RS08_26 ≝
-[
- quadruple … STA MODE_DIR1 (Byte 〈xB,x7〉) 〈x0,x3〉
-; quadruple … STA (MODE_SRT t00) (Byte 〈xE,x0〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t01) (Byte 〈xE,x1〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t02) (Byte 〈xE,x2〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t03) (Byte 〈xE,x3〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t04) (Byte 〈xE,x4〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t05) (Byte 〈xE,x5〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t06) (Byte 〈xE,x6〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t07) (Byte 〈xE,x7〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t08) (Byte 〈xE,x8〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t09) (Byte 〈xE,x9〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t0A) (Byte 〈xE,xA〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t0B) (Byte 〈xE,xB〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t0C) (Byte 〈xE,xC〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t0D) (Byte 〈xE,xD〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t0E) (Byte 〈xE,xE〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t0F) (Byte 〈xE,xF〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t10) (Byte 〈xF,x0〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t11) (Byte 〈xF,x1〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t12) (Byte 〈xF,x2〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t13) (Byte 〈xF,x3〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t14) (Byte 〈xF,x4〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t15) (Byte 〈xF,x5〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t16) (Byte 〈xF,x6〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t17) (Byte 〈xF,x7〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t18) (Byte 〈xF,x8〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t19) (Byte 〈xF,x9〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t1A) (Byte 〈xF,xA〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t1B) (Byte 〈xF,xB〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t1C) (Byte 〈xF,xC〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t1D) (Byte 〈xF,xD〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t1E) (Byte 〈xF,xE〉) 〈x0,x2〉
-; quadruple … STA (MODE_SRT t1F) (Byte 〈xF,xF〉) 〈x0,x2〉
-].
-
-ndefinition opcode_table_RS08_27 ≝
-[
- quadruple … SUB MODE_IMM1 (Byte 〈xA,x0〉) 〈x0,x2〉
-; quadruple … SUB MODE_DIR1 (Byte 〈xB,x0〉) 〈x0,x3〉
-; quadruple … SUB (MODE_TNY x0) (Byte 〈x7,x0〉) 〈x0,x3〉
-; quadruple … SUB (MODE_TNY x1) (Byte 〈x7,x1〉) 〈x0,x3〉
-; quadruple … SUB (MODE_TNY x2) (Byte 〈x7,x2〉) 〈x0,x3〉
-; quadruple … SUB (MODE_TNY x3) (Byte 〈x7,x3〉) 〈x0,x3〉
-; quadruple … SUB (MODE_TNY x4) (Byte 〈x7,x4〉) 〈x0,x3〉
-; quadruple … SUB (MODE_TNY x5) (Byte 〈x7,x5〉) 〈x0,x3〉
-; quadruple … SUB (MODE_TNY x6) (Byte 〈x7,x6〉) 〈x0,x3〉
-; quadruple … SUB (MODE_TNY x7) (Byte 〈x7,x7〉) 〈x0,x3〉
-; quadruple … SUB (MODE_TNY x8) (Byte 〈x7,x8〉) 〈x0,x3〉
-; quadruple … SUB (MODE_TNY x9) (Byte 〈x7,x9〉) 〈x0,x3〉
-; quadruple … SUB (MODE_TNY xA) (Byte 〈x7,xA〉) 〈x0,x3〉
-; quadruple … SUB (MODE_TNY xB) (Byte 〈x7,xB〉) 〈x0,x3〉
-; quadruple … SUB (MODE_TNY xC) (Byte 〈x7,xC〉) 〈x0,x3〉
-; quadruple … SUB (MODE_TNY xD) (Byte 〈x7,xD〉) 〈x0,x3〉
-; quadruple … SUB (MODE_TNY xE) (Byte 〈x7,xE〉) 〈x0,x3〉
-; quadruple … SUB (MODE_TNY xF) (Byte 〈x7,xF〉) 〈x0,x3〉
-].
-
-ndefinition opcode_table_RS08 ≝
-opcode_table_RS08_1 @ opcode_table_RS08_2 @ opcode_table_RS08_3 @ opcode_table_RS08_4 @
-opcode_table_RS08_5 @ opcode_table_RS08_6 @ opcode_table_RS08_7 @ opcode_table_RS08_8 @
-opcode_table_RS08_9 @ opcode_table_RS08_10 @ opcode_table_RS08_11 @ opcode_table_RS08_12 @
-opcode_table_RS08_13 @ opcode_table_RS08_14 @ opcode_table_RS08_15 @ opcode_table_RS08_16 @
-opcode_table_RS08_17 @ opcode_table_RS08_18 @ opcode_table_RS08_19 @ opcode_table_RS08_20 @
-opcode_table_RS08_21 @ opcode_table_RS08_22 @ opcode_table_RS08_23 @ opcode_table_RS08_24 @
-opcode_table_RS08_25 @ opcode_table_RS08_26 @ opcode_table_RS08_27.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/pseudo.ma".
-include "emulator/opcodes/RS08_table.ma".
-
-(* ***************** *)
-(* TABELLA DELL'RS08 *)
-(* ***************** *)
-
-(* RS08: opcode non implementati come da manuale *)
-ndefinition RS08_not_impl_byte ≝
- [〈x3,x2〉;〈x3,x3〉;〈x3,xD〉
- ;〈x4,x0〉;〈x4,x7〉;〈x4,xD〉
- ;〈xA,x3〉;〈xA,x5〉;〈xA,x7〉
- ;〈xB,x3〉;〈xB,x5〉
- ].
-
-nlemma ok_byte_table_RS08 : forall_b8 (λb.
- (test_not_impl_byte b RS08_not_impl_byte ⊙ eq_w16 (get_byte_count RS08 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_RS08) 〈〈x0,x0〉:〈x0,x1〉〉) ⊗
- (⊖ (test_not_impl_byte b RS08_not_impl_byte) ⊙ eq_w16 (get_byte_count RS08 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_RS08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* RS08: pseudocodici non implementati come da manuale *)
-ndefinition RS08_not_impl_pseudo ≝
- [ AIS ; AIX ; ASR ; BGE ; BGT ; BHCC ; BHCS ; BHI ; BIH ; BIL ; BIT ; BLE ; BLS
- ; BLT ; BMC ; BMI ; BMS ; BPL ; BRN ; CBEQX ; CLI ; CPHX ; CPX ; DAA ; DIV
- ; LDHX ; LDX ; MUL ; NEG ; NSA ; PSHA ; PSHH ; PSHX ; PULA ; PULH ; PULX ; RSP
- ; RTI ; SEI ; STHX ; STX ; SWI ; TAP ; TAX ; TPA ; TST ; TSX ; TXA ; TXS ].
-
-nlemma ok_pseudo_table_RS08 : forall_Freescale_pseudo (λo.
- (test_not_impl_pseudo RS08 o RS08_not_impl_pseudo ⊙ le_w16 〈〈x0,x0〉:〈x0,x1〉〉 (get_pseudo_count RS08 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_RS08)) ⊗
- (⊖ (test_not_impl_pseudo RS08 o RS08_not_impl_pseudo) ⊙ eq_w16 (get_pseudo_count RS08 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_RS08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* RS08: modalita' non implementate come da manuale *)
-ndefinition RS08_not_impl_mode ≝
- [ MODE_INHX ; MODE_INHH ; MODE_INHX0ADD ; MODE_INHX1ADD ; MODE_INHX2ADD ; MODE_IMM1EXT
- ; MODE_DIR2 ; MODE_IX0 ; MODE_IX1 ; MODE_IX2 ; MODE_SP1 ; MODE_SP2
- ; MODE_IX0p_to_DIR1 ; MODE_DIR1_to_IX0p ; MODE_INHX_and_IMM1 ; MODE_IX0_and_IMM1
- ; MODE_IX0p_and_IMM1 ; MODE_IX1_and_IMM1 ; MODE_IX1p_and_IMM1 ; MODE_SP1_and_IMM1 ].
-
-nlemma ok_mode_table_RS08 : forall_Freescale_im (λi.
- (test_not_impl_mode RS08 i RS08_not_impl_mode ⊙ le_w16 〈〈x0,x0〉:〈x0,x1〉〉 (get_mode_count RS08 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_RS08)) ⊗
- (⊖ (test_not_impl_mode RS08 i RS08_not_impl_mode) ⊙ eq_w16 (get_mode_count RS08 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_RS08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-nlemma ok_PsIm_table_RS08 :
- forall_Freescale_im (λi:Freescale_instr_mode.
- forall_Freescale_pseudo (λps:Freescale_pseudo.
- le_w16 (get_PsIm_count RS08 ps i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_RS08) 〈〈x0,x0〉:〈x0,x1〉〉)) = true.
- napply refl_eq.
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/word16.ma".
-
-(* raggruppamento di byte e word in un tipo unico *)
-ninductive byte8_or_word16 : Type ≝
- Byte: byte8 → byte8_or_word16
-| Word: word16 → byte8_or_word16.
-
-ndefinition eq_b8w16 ≝
-λbw1,bw2:byte8_or_word16.
- match bw1 with
- [ Byte b1 ⇒ match bw2 with [ Byte b2 ⇒ eq_b8 b1 b2 | Word _ ⇒ false ]
- | Word w1 ⇒ match bw2 with [ Byte _ ⇒ false | Word w2 ⇒ eq_w16 w1 w2 ]
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/Freescale_pseudo.ma".
-include "emulator/opcodes/Freescale_instr_mode.ma".
-include "emulator/opcodes/IP2022_pseudo.ma".
-include "emulator/opcodes/IP2022_instr_mode.ma".
-include "emulator/opcodes/byte_or_word.ma".
-include "common/list.ma".
-
-(* ********************************************** *)
-(* MATTONI BASE PER DEFINIRE LE TABELLE DELLE MCU *)
-(* ********************************************** *)
-
-(* enumerazione delle ALU *)
-ninductive mcu_type: Type ≝
- HC05 : mcu_type
-| HC08 : mcu_type
-| HCS08 : mcu_type
-| RS08 : mcu_type
-| IP2022 : mcu_type.
-
-ndefinition eq_mcutype ≝
-λm1,m2:mcu_type.
- match m1 with
- [ HC05 ⇒ match m2 with [ HC05 ⇒ true | _ ⇒ false ]
- | HC08 ⇒ match m2 with [ HC08 ⇒ true | _ ⇒ false ]
- | HCS08 ⇒ match m2 with [ HCS08 ⇒ true | _ ⇒ false ]
- | RS08 ⇒ match m2 with [ RS08 ⇒ true | _ ⇒ false ]
- | IP2022 ⇒ match m2 with [ IP2022 ⇒ true | _ ⇒ false ]
- ].
-
-ndefinition aux_pseudo_type ≝
-λmcu:mcu_type.match mcu with
- [ HC05 ⇒ Freescale_pseudo
- | HC08 ⇒ Freescale_pseudo
- | HCS08 ⇒ Freescale_pseudo
- | RS08 ⇒ Freescale_pseudo
- | IP2022 ⇒ IP2022_pseudo
- ].
-
-ndefinition aux_im_type ≝
-λmcu:mcu_type.match mcu with
- [ HC05 ⇒ Freescale_instr_mode
- | HC08 ⇒ Freescale_instr_mode
- | HCS08 ⇒ Freescale_instr_mode
- | RS08 ⇒ Freescale_instr_mode
- | IP2022 ⇒ IP2022_instr_mode
- ].
-
-ndefinition eq_pseudo ≝
-λmcu:mcu_type.
- match mcu
- return λm.aux_pseudo_type m → aux_pseudo_type m → bool
- with
- [ HC05 ⇒ eq_Freescale_pseudo
- | HC08 ⇒ eq_Freescale_pseudo
- | HCS08 ⇒ eq_Freescale_pseudo
- | RS08 ⇒ eq_Freescale_pseudo
- | IP2022 ⇒ eq_IP2022_pseudo
- ].
-
-ndefinition eq_im ≝
-λmcu:mcu_type.
- match mcu
- return λm.aux_im_type m → aux_im_type m → bool
- with
- [ HC05 ⇒ eq_Freescale_im
- | HC08 ⇒ eq_Freescale_im
- | HCS08 ⇒ eq_Freescale_im
- | RS08 ⇒ eq_Freescale_im
- | IP2022 ⇒ eq_IP2022_im
- ].
-
-ndefinition forall_pseudo ≝
-λmcu:mcu_type.
- match mcu
- return λm.(aux_pseudo_type m → bool) → bool
- with
- [ HC05 ⇒ forall_Freescale_pseudo
- | HC08 ⇒ forall_Freescale_pseudo
- | HCS08 ⇒ forall_Freescale_pseudo
- | RS08 ⇒ forall_Freescale_pseudo
- | IP2022 ⇒ forall_IP2022_pseudo
- ].
-
-ndefinition forall_im ≝
-λmcu:mcu_type.
- match mcu
- return λm.(aux_im_type m → bool) → bool
- with
- [ HC05 ⇒ forall_Freescale_im
- | HC08 ⇒ forall_Freescale_im
- | HCS08 ⇒ forall_Freescale_im
- | RS08 ⇒ forall_Freescale_im
- | IP2022 ⇒ forall_IP2022_im
- ].
-
-(* ********************************************* *)
-(* STRUMENTI PER LE DIMOSTRAZIONI DI CORRETTEZZA *)
-(* ********************************************* *)
-
-ndefinition aux_table_type ≝ λmcu:mcu_type.Prod4T (aux_pseudo_type mcu) (aux_im_type mcu) byte8_or_word16 byte8.
-
-(* su tutta la lista quante volte compare il byte *)
-nlet rec get_byte_count (m:mcu_type) (b:byte8) (c:word16) (l:list (aux_table_type m)) on l ≝
- match l with
- [ nil ⇒ c
- | cons hd tl ⇒ match thd4T … hd with
- [ Byte b' ⇒ match eq_b8 b b' with
- [ true ⇒ get_byte_count m b (succ_w16 c) tl
- | false ⇒ get_byte_count m b c tl
- ]
- | Word _ ⇒ get_byte_count m b c tl
- ]
- ].
-
-(* su tutta la lista quante volte compare la word *)
-nlet rec get_word_count (m:mcu_type) (w:word16) (c:word16) (l:list (aux_table_type m)) on l ≝
- match l with
- [ nil ⇒ c
- | cons hd tl ⇒ match thd4T … hd with
- [ Byte _ ⇒ get_word_count m w c tl
- | Word w' ⇒ match eq_w16 w w' with
- [ true ⇒ get_word_count m w (succ_w16 c) tl
- | false ⇒ get_word_count m w c tl
- ]
- ]
- ].
-
-(* su tutta la lista quante volte compare lo pseudocodice *)
-nlet rec get_pseudo_count (m:mcu_type) (o:aux_pseudo_type m) (c:word16) (l:list (aux_table_type m)) on l ≝
- match l with
- [ nil ⇒ c
- | cons hd tl ⇒ match eq_pseudo m o (fst4T … hd) with
- [ true ⇒ get_pseudo_count m o (succ_w16 c) tl
- | false ⇒ get_pseudo_count m o c tl
- ]
- ].
-
-(* su tutta la lista quante volte compare la modalita' *)
-nlet rec get_mode_count (m:mcu_type) (i:aux_im_type m) (c:word16) (l:list (aux_table_type m)) on l ≝
- match l with
- [ nil ⇒ c
- | cons hd tl ⇒ match eq_im m i (snd4T … hd) with
- [ true ⇒ get_mode_count m i (succ_w16 c) tl
- | false ⇒ get_mode_count m i c tl
- ]
- ].
-
-(* b e' non implementato? *)
-nlet rec test_not_impl_byte (b:byte8) (l:list byte8) on l ≝
- match l with
- [ nil ⇒ false
- | cons hd tl ⇒ match eq_b8 b hd with
- [ true ⇒ true
- | false ⇒ test_not_impl_byte b tl
- ]
- ].
-
-(* su tutta la lista quante volte compare la coppia pseudo,instr_mode *)
-nlet rec get_PsIm_count (m:mcu_type) (o:aux_pseudo_type m) (i:aux_im_type m) (c:word16) (l:list (aux_table_type m)) on l ≝
- match l with
- [ nil ⇒ c
- | cons hd tl ⇒
- match (eq_pseudo m o (fst4T … hd)) ⊗
- (eq_im m i (snd4T … hd)) with
- [ true ⇒ get_PsIm_count m o i (succ_w16 c) tl
- | false ⇒ get_PsIm_count m o i c tl
- ]
- ].
-
-(* o e' non implementato? *)
-nlet rec test_not_impl_pseudo (m:mcu_type) (o:aux_pseudo_type m) (l:list (aux_pseudo_type m)) on l ≝
- match l with
- [ nil ⇒ false
- | cons hd tl ⇒ match eq_pseudo m o hd with
- [ true ⇒ true
- | false ⇒ test_not_impl_pseudo m o tl
- ]
- ].
-
-(* i e' non implementato? *)
-nlet rec test_not_impl_mode (m:mcu_type) (i:aux_im_type m) (l:list (aux_im_type m)) on l ≝
- match l with
- [ nil ⇒ false
- | cons hd tl ⇒ match eq_im m i hd with
- [ true ⇒ true
- | false ⇒ test_not_impl_mode m i tl
- ]
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/Freescale_pseudo_lemmas.ma".
-include "emulator/opcodes/Freescale_instr_mode_lemmas.ma".
-include "emulator/opcodes/IP2022_pseudo_lemmas.ma".
-include "emulator/opcodes/IP2022_instr_mode_lemmas.ma".
-include "emulator/opcodes/pseudo.ma".
-
-nlemma eq_to_eqpseudo : ∀m.∀n1,n2.(n1 = n2) → (eq_pseudo m n1 n2 = true).
- #m; nelim m;
- ##[ ##1,2,3,4: napply eq_to_eqFreescalepseudo
- ##| ##5: napply eq_to_eqIP2022pseudo
- ##]
-nqed.
-
-nlemma neqpseudo_to_neq : ∀m.∀n1,n2.(eq_pseudo m n1 n2 = false) → (n1 ≠ n2).
- #m; nelim m;
- ##[ ##1,2,3,4: napply neqFreescalepseudo_to_neq
- ##| ##5: napply neqIP2022pseudo_to_neq
- ##]
-nqed.
-
-nlemma eqpseudo_to_eq : ∀m.∀n1,n2.(eq_pseudo m n1 n2 = true) → (n1 = n2).
- #m; nelim m;
- ##[ ##1,2,3,4: napply eqFreescalepseudo_to_eq
- ##| ##5: napply eqIP2022pseudo_to_eq
- ##]
-nqed.
-
-nlemma neq_to_neqpseudo : ∀m.∀n1,n2.(n1 ≠ n2) → (eq_pseudo m n1 n2 = false).
- #m; nelim m;
- ##[ ##1,2,3,4: napply neq_to_neqFreescalepseudo
- ##| ##5: napply neq_to_neqIP2022pseudo
- ##]
-nqed.
-
-nlemma decidable_pseudo : ∀m.∀x,y:aux_pseudo_type m.decidable (x = y).
- #m; nelim m;
- ##[ ##1,2,3,4: napply decidable_Freescalepseudo
- ##| ##5: napply decidable_IP2022pseudo
- ##]
-nqed.
-
-nlemma symmetric_eqpseudo : ∀m.symmetricT (aux_pseudo_type m) bool (eq_pseudo m).
- #m; nelim m;
- ##[ ##1,2,3,4: napply symmetric_eqFreescalepseudo
- ##| ##5: napply symmetric_eqIP2022pseudo
- ##]
-nqed.
-
-nlemma eq_to_eqim : ∀m.∀n1,n2.(n1 = n2) → (eq_im m n1 n2 = true).
- #m; nelim m;
- ##[ ##1,2,3,4: napply eq_to_eqFreescaleim
- ##| ##5: napply eq_to_eqIP2022im
- ##]
-nqed.
-
-nlemma neqim_to_neq : ∀m.∀n1,n2.(eq_im m n1 n2 = false) → (n1 ≠ n2).
- #m; nelim m;
- ##[ ##1,2,3,4: napply neqFreescaleim_to_neq
- ##| ##5: napply neqIP2022im_to_neq
- ##]
-nqed.
-
-nlemma eqim_to_eq : ∀m.∀n1,n2.(eq_im m n1 n2 = true) → (n1 = n2).
- #m; nelim m;
- ##[ ##1,2,3,4: napply eqFreescaleim_to_eq
- ##| ##5: napply eqIP2022im_to_eq
- ##]
-nqed.
-
-nlemma neq_to_neqim : ∀m.∀n1,n2.(n1 ≠ n2) → (eq_im m n1 n2 = false).
- #m; nelim m;
- ##[ ##1,2,3,4: napply neq_to_neqFreescaleim
- ##| ##5: napply neq_to_neqIP2022im
- ##]
-nqed.
-
-nlemma decidable_im : ∀m.∀x,y:aux_im_type m.decidable (x = y).
- #m; nelim m;
- ##[ ##1,2,3,4: napply decidable_Freescaleim
- ##| ##5: napply decidable_IP2022im
- ##]
-nqed.
-
-nlemma symmetric_eqim : ∀m.symmetricT (aux_im_type m) bool (eq_im m).
- #m; nelim m;
- ##[ ##1,2,3,4: napply symmetric_eqFreescaleim
- ##| ##5: napply symmetric_eqIP2022im
- ##]
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status_getter.ma".
-include "emulator/read_write/load_write_base.ma".
-
-(* lettura da [curpc]: IMM1 *)
-ndefinition mode_IMM1_load ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λb.Some ? (triple … s b (succ_w16 cur_pc))).
-
-(* lettura da [curpc]: IMM1 + estensione a word *)
-ndefinition mode_IMM1EXT_load ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λb.Some ? (triple … s (extu_w16 b) (succ_w16 cur_pc))).
-
-(* lettura da [curpc]: IMM2 *)
-ndefinition mode_IMM2_load ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λbh.opt_map … (mem_read_s … s (extu_w32 (succ_w16 cur_pc)))
- (λbl.Some ? (triple … s 〈bh:bl〉 (succ_w16 (succ_w16 cur_pc))))).
-
-(* lettura da [byte [curpc]]: true=DIR1 loadb, false=DIR1 loadw *)
-ndefinition mode_DIR1_load ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λaddr.(aux_load m t byteflag) s (extu2_w32 addr) cur_pc x1).
-
-(* lettura da [byte [curpc]]: loadbit *)
-ndefinition mode_DIR1n_load ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λsub:oct.
- opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λaddr.loadbit_from … s (extu2_w32 addr) sub cur_pc x1).
-
-(* scrittura su [byte [curpc]]: true=DIR1 writeb, false=DIR1 writew *)
-ndefinition mode_DIR1_write ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
-λwritebw:match byteflag with [ true ⇒ byte8 | false ⇒ word16 ].
- opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λaddr.(aux_write m t byteflag) s (extu2_w32 addr) auxMode_ok cur_pc x1 writebw).
-
-(* scrittura su [byte [curpc]]: writebit *)
-ndefinition mode_DIR1n_write ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λsub:oct.λwriteb:bool.
- opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λaddr.writebit_to … s (extu2_w32 addr) sub cur_pc x1 writeb).
-
-(* lettura da [word [curpc]]: true=DIR2 loadb, false=DIR2 loadw *)
-ndefinition mode_DIR2_load ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λaddrh.opt_map … (mem_read_s … s (extu_w32 (succ_w16 cur_pc)))
- (λaddrl.(aux_load m t byteflag) s (extu_w32 〈addrh:addrl〉) cur_pc x2)).
-
-(* scrittura su [word [curpc]]: true=DIR2 writeb, false=DIR2 writew *)
-ndefinition mode_DIR2_write ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
-λwritebw:match byteflag with [ true ⇒ byte8 | false ⇒ word16 ].
- opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λaddrh.opt_map … (mem_read_s … s (extu_w32 (succ_w16 cur_pc)))
- (λaddrl.(aux_write m t byteflag) s (extu_w32 〈addrh:addrl〉) auxMode_ok cur_pc x2 writebw)).
-
-ndefinition get_IX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m with
- [ HC05 ⇒ opt_map … (get_indX_8_low_reg … s) (λindx.Some ? (extu_w16 indx))
- | HC08 ⇒ opt_map … (get_indX_16_reg … s) (λindx.Some ? indx)
- | HCS08 ⇒ opt_map … (get_indX_16_reg … s) (λindx.Some ? indx)
- | RS08 ⇒ None ?
- | IP2022 ⇒ None ? ].
-
-(* lettura da [IX]: true=IX0 loadb, false=IX0 loadw *)
-ndefinition mode_IX0_load ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (get_IX … s)
- (λaddr.(aux_load m t byteflag) s (extu_w32 addr) cur_pc x0).
-
-(* scrittura su [IX]: true=IX0 writeb, false=IX0 writew *)
-ndefinition mode_IX0_write ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
-λwritebw:match byteflag with [ true ⇒ byte8 | false ⇒ word16 ].
- opt_map … (get_IX … s)
- (λaddr.(aux_write m t byteflag) s (extu_w32 addr) auxMode_ok cur_pc x0 writebw).
-
-(* lettura da [IX+byte [pc]]: true=IX1 loadb, false=IX1 loadw *)
-ndefinition mode_IX1_load ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (get_IX … s)
- (λaddr.opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λoffs.(aux_load m t byteflag) s (extu_w32 (plus_w16_d_d addr (extu_w16 offs))) cur_pc x1)).
-
-(* lettura da X+[byte curpc] *)
-ndefinition mode_IX1ADD_load ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (get_IX … s)
- (λaddr.opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λb.Some ? (triple … s (plus_w16_d_d addr (extu_w16 b)) (succ_w16 cur_pc)))).
-
-(* scrittura su [IX+byte [pc]]: true=IX1 writeb, false=IX1 writew *)
-ndefinition mode_IX1_write ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
-λwritebw:match byteflag with [ true ⇒ byte8 | false ⇒ word16 ].
- opt_map … (get_IX … s)
- (λaddr.opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λoffs.(aux_write m t byteflag) s (extu_w32 (plus_w16_d_d addr (extu_w16 offs))) auxMode_ok cur_pc x1 writebw)).
-
-(* lettura da [IX+word [pc]]: true=IX2 loadb, false=IX2 loadw *)
-ndefinition mode_IX2_load ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (get_IX … s)
- (λaddr.opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λoffsh.opt_map … (mem_read_s … s (extu_w32 (succ_w16 cur_pc)))
- (λoffsl.(aux_load m t byteflag) s (extu_w32 (plus_w16_d_d addr 〈offsh:offsl〉)) cur_pc x2))).
-
-(* lettura da X+[word curpc] *)
-ndefinition mode_IX2ADD_load ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (get_IX … s)
- (λaddr.opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λbh.opt_map … (mem_read_s … s (extu_w32 (succ_w16 cur_pc)))
- (λbl.Some ? (triple … s (plus_w16_d_d addr 〈bh:bl〉) (succ_w16 (succ_w16 cur_pc)))))).
-
-(* scrittura su [IX+word [pc]]: true=IX2 writeb, false=IX2 writew *)
-ndefinition mode_IX2_write ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
-λwritebw:match byteflag with [ true ⇒ byte8 | false ⇒ word16 ].
- opt_map … (get_IX … s)
- (λaddr.opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λoffsh.opt_map … (mem_read_s … s (extu_w32 (succ_w16 cur_pc)))
- (λoffsl.(aux_write m t byteflag) s (extu_w32 (plus_w16_d_d addr 〈offsh:offsl〉)) auxMode_ok cur_pc x2 writebw))).
-
-(* lettura da [SP+byte [pc]]: true=SP1 loadb, false=SP1 loadw *)
-ndefinition mode_SP1_load ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (get_sp_reg … s)
- (λaddr.opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λoffs.(aux_load m t byteflag) s (extu_w32 (plus_w16_d_d addr (extu_w16 offs))) cur_pc x1)).
-
-(* scrittura su [SP+byte [pc]]: true=SP1 writeb, false=SP1 writew *)
-ndefinition mode_SP1_write ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
-λwritebw:match byteflag with [ true ⇒ byte8 | false ⇒ word16 ].
- opt_map … (get_sp_reg … s)
- (λaddr.opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λoffs.(aux_write m t byteflag) s (extu_w32 (plus_w16_d_d addr (extu_w16 offs))) auxMode_ok cur_pc x1 writebw)).
-
-(* lettura da [SP+word [pc]]: true=SP2 loadb, false=SP2 loadw *)
-ndefinition mode_SP2_load ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (get_sp_reg … s)
- (λaddr.opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λoffsh.opt_map … (mem_read_s … s (extu_w32 (succ_w16 cur_pc)))
- (λoffsl.(aux_load m t byteflag) s (extu_w32 (plus_w16_d_d addr 〈offsh:offsl〉)) cur_pc x2))).
-
-(* scrittura su [SP+word [pc]]: true=SP2 writeb, false=SP2 writew *)
-ndefinition mode_SP2_write ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
-λwritebw:match byteflag with [ true ⇒ byte8 | false ⇒ word16 ].
- opt_map … (get_sp_reg … s)
- (λaddr.opt_map … (mem_read_s … s (extu_w32 cur_pc))
- (λoffsh.opt_map … (mem_read_s … s (extu_w32 (succ_w16 cur_pc)))
- (λoffsl.(aux_write m t byteflag) s (extu_w32 (plus_w16_d_d addr 〈offsh:offsl〉)) auxMode_ok cur_pc x2 writebw))).
-
-(* ************************************** *)
-(* raccordo di tutte le possibili letture *)
-(* ************************************** *)
-
-(* H:X++ *)
-ndefinition aux_inc_indX_16 ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- opt_map … (get_indX_16_reg m t s)
- (λX_op.opt_map … (set_indX_16_reg m t s (succ_w16 X_op))
- (λs_tmp.Some ? s_tmp)).
-
-ndefinition Freescale_multi_mode_load_auxb ≝
-λm,t.λs:any_status m t.λcur_pc:word16.λi:Freescale_instr_mode.match i with
-(* NO: non ci sono indicazioni *)
- [ MODE_INH ⇒ None ?
-(* restituisce A *)
- | MODE_INHA ⇒ Some ? (triple … s (get_acc_8_low_reg … s) cur_pc)
-(* restituisce X *)
- | MODE_INHX ⇒ opt_map … (get_indX_8_low_reg … s)
- (λindx.Some ? (triple … s indx cur_pc))
-(* restituisce H *)
- | MODE_INHH ⇒ opt_map … (get_indX_8_high_reg … s)
- (λindx.Some ? (triple … s indx cur_pc))
-
-(* NO: solo lettura word *)
- | MODE_INHX0ADD ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_INHX1ADD ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_INHX2ADD ⇒ None ?
-
-(* preleva 1 byte immediato *)
- | MODE_IMM1 ⇒ mode_IMM1_load … s cur_pc
-(* NO: solo lettura word *)
- | MODE_IMM1EXT ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM2 ⇒ None ?
-(* preleva 1 byte da indirizzo diretto 1 byte *)
- | MODE_DIR1 ⇒ mode_DIR1_load true … s cur_pc
-(* preleva 1 byte da indirizzo diretto 1 word *)
- | MODE_DIR2 ⇒ mode_DIR2_load true … s cur_pc
-(* preleva 1 byte da H:X *)
- | MODE_IX0 ⇒ mode_IX0_load true … s cur_pc
-(* preleva 1 byte da H:X+1 byte offset *)
- | MODE_IX1 ⇒ mode_IX1_load true … s cur_pc
-(* preleva 1 byte da H:X+1 word offset *)
- | MODE_IX2 ⇒ mode_IX2_load true … s cur_pc
-(* preleva 1 byte da SP+1 byte offset *)
- | MODE_SP1 ⇒ mode_SP1_load true … s cur_pc
-(* preleva 1 byte da SP+1 word offset *)
- | MODE_SP2 ⇒ mode_SP2_load true … s cur_pc
-
-(* come DIR1, chiamare scrittura per passo2: scrittura su DIR1 *)
- | MODE_DIR1_to_DIR1 ⇒ mode_DIR1_load true … s cur_pc
-(* come IMM1, chiamare scrittura per passo2: scrittura su DIR1 *)
- | MODE_IMM1_to_DIR1 ⇒ mode_IMM1_load … s cur_pc
-(* come IX0, chiamare scrittura per passo2: scrittura su DIR1 e X++ *)
- | MODE_IX0p_to_DIR1 ⇒ mode_IX0_load true … s cur_pc
-(* come DIR1, chiamare scrittura per passo2: scrittura su IX0 e X++ *)
- | MODE_DIR1_to_IX0p ⇒ mode_DIR1_load true … s cur_pc
-
-(* NO: solo lettura word/scrittura byte *)
- | MODE_INHA_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_INHX_and_IMM1 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM1_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_DIR1_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_IX0_and_IMM1 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IX0p_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_IX1_and_IMM1 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IX1p_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_SP1_and_IMM1 ⇒ None ?
-
-(* NO: solo scrittura byte *)
- | MODE_DIRn _ ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_DIRn_and_IMM1 _ ⇒ None ?
-(* preleva 1 byte da 0000 0000 0000 xxxxb *)
- | MODE_TNY e ⇒ opt_map … (memory_filter_read … s (extu3_w32 e))
- (λb.Some ? (triple … s b cur_pc))
-(* preleva 1 byte da 0000 0000 000x xxxxb *)
- | MODE_SRT e ⇒ opt_map … (memory_filter_read … s (extu2_w32 (b8_of_bit e)))
- (λb.Some ? (triple … s b cur_pc))
- ].
-
-ndefinition Freescale_multi_mode_load_auxw ≝
-λm,t.λs:any_status m t.λcur_pc:word16.λi:Freescale_instr_mode.match i with
-(* NO: non ci sono indicazioni *)
- [ MODE_INH ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_INHA ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_INHX ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_INHH ⇒ None ?
-
-(* preleva 1 word immediato *)
- | MODE_INHX0ADD ⇒ opt_map … (get_IX … s)
- (λw.Some ? (triple … s w cur_pc))
-(* preleva 1 word immediato *)
- | MODE_INHX1ADD ⇒ mode_IX1ADD_load … s cur_pc
-(* preleva 1 word immediato *)
- | MODE_INHX2ADD ⇒ mode_IX2ADD_load … s cur_pc
-
-(* NO: solo lettura byte *)
- | MODE_IMM1 ⇒ None ?
-(* preleva 1 word immediato *)
- | MODE_IMM1EXT ⇒ mode_IMM1EXT_load … s cur_pc
-(* preleva 1 word immediato *)
- | MODE_IMM2 ⇒ mode_IMM2_load … s cur_pc
-(* preleva 1 word da indirizzo diretto 1 byte *)
- | MODE_DIR1 ⇒ mode_DIR1_load false … s cur_pc
-(* preleva 1 word da indirizzo diretto 1 word *)
- | MODE_DIR2 ⇒ mode_DIR2_load false … s cur_pc
-(* preleva 1 word da H:X *)
- | MODE_IX0 ⇒ mode_IX0_load false … s cur_pc
-(* preleva 1 word da H:X+1 byte offset *)
- | MODE_IX1 ⇒ mode_IX1_load false … s cur_pc
-(* preleva 1 word da H:X+1 word offset *)
- | MODE_IX2 ⇒ mode_IX2_load false … s cur_pc
-(* preleva 1 word da SP+1 byte offset *)
- | MODE_SP1 ⇒ mode_SP1_load false … s cur_pc
-(* preleva 1 word da SP+1 word offset *)
- | MODE_SP2 ⇒ mode_SP2_load false … s cur_pc
-
-(* NO: solo lettura/scrittura byte *)
- | MODE_DIR1_to_DIR1 ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_IMM1_to_DIR1 ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_IX0p_to_DIR1 ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_DIR1_to_IX0p ⇒ None ?
-
-(* preleva 2 byte, possibilita' modificare Io argomento *)
- | MODE_INHA_and_IMM1 ⇒ opt_map … (mode_IMM1_load … s cur_pc)
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc' ⇒
- Some ? (triple … s 〈(get_acc_8_low_reg … s):immb〉 cur_pc')])
-(* preleva 2 byte, possibilita' modificare Io argomento *)
- | MODE_INHX_and_IMM1 ⇒ opt_map … (get_indX_8_low_reg … s)
- (λX_op.opt_map … (mode_IMM1_load … s cur_pc)
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc' ⇒
- Some ? (triple … s 〈X_op:immb〉 cur_pc')]))
-(* preleva 2 byte, NO possibilita' modificare Io argomento *)
- | MODE_IMM1_and_IMM1 ⇒ opt_map … (mode_IMM1_load … s cur_pc)
- (λS_immb1_and_PC.match S_immb1_and_PC with
- [ triple _ immb1 cur_pc' ⇒
- opt_map … (mode_IMM1_load … s cur_pc')
- (λS_immb2_and_PC.match S_immb2_and_PC with
- [ triple _ immb2 cur_pc'' ⇒
- Some ? (triple … s 〈immb1:immb2〉 cur_pc'')])])
-(* preleva 2 byte, possibilita' modificare Io argomento *)
- | MODE_DIR1_and_IMM1 ⇒ opt_map … (mode_DIR1_load true … s cur_pc)
- (λS_dirb_and_PC.match S_dirb_and_PC with
- [ triple _ dirb cur_pc' ⇒
- opt_map … (mode_IMM1_load … s cur_pc')
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc'' ⇒
- Some ? (triple … s 〈dirb:immb〉 cur_pc'')])])
-(* preleva 2 byte, possibilita' modificare Io argomento *)
- | MODE_IX0_and_IMM1 ⇒ opt_map … (mode_IX0_load true … s cur_pc)
- (λS_ixb_and_PC.match S_ixb_and_PC with
- [ triple _ ixb cur_pc' ⇒
- opt_map … (mode_IMM1_load … s cur_pc')
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc'' ⇒
- Some ? (triple … s 〈ixb:immb〉 cur_pc'')])])
-(* preleva 2 byte, H:X++, NO possibilita' modificare Io argomento *)
- | MODE_IX0p_and_IMM1 ⇒ opt_map … (mode_IX0_load true … s cur_pc)
- (λS_ixb_and_PC.match S_ixb_and_PC with
- [ triple _ ixb cur_pc' ⇒
- opt_map … (mode_IMM1_load … s cur_pc')
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc'' ⇒
- (* H:X++ *)
- opt_map … (aux_inc_indX_16 … s)
- (λs'.Some ? (triple … s' 〈ixb:immb〉 cur_pc''))])])
-(* preleva 2 byte, possibilita' modificare Io argomento *)
- | MODE_IX1_and_IMM1 ⇒ opt_map … (mode_IX1_load true … s cur_pc)
- (λS_ixb_and_PC.match S_ixb_and_PC with
- [ triple _ ixb cur_pc' ⇒
- opt_map … (mode_IMM1_load … s cur_pc')
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc'' ⇒
- Some ? (triple … s 〈ixb:immb〉 cur_pc'')])])
-(* preleva 2 byte, H:X++, NO possibilita' modificare Io argomento *)
- | MODE_IX1p_and_IMM1 ⇒ opt_map … (mode_IX1_load true … s cur_pc)
- (λS_ixb_and_PC.match S_ixb_and_PC with
- [ triple _ ixb cur_pc' ⇒
- opt_map … (mode_IMM1_load … s cur_pc')
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc'' ⇒
- (* H:X++ *)
- opt_map … (aux_inc_indX_16 … s)
- (λs'.Some ? (triple … s' 〈ixb:immb〉 cur_pc''))])])
-(* preleva 2 byte, possibilita' modificare Io argomento *)
- | MODE_SP1_and_IMM1 ⇒ opt_map … (mode_SP1_load true … s cur_pc)
- (λS_spb_and_PC.match S_spb_and_PC with
- [ triple _ spb cur_pc' ⇒
- opt_map … (mode_IMM1_load … s cur_pc')
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc'' ⇒
- Some ? (triple … s 〈spb:immb〉 cur_pc'')])])
-
-(* NO: solo scrittura byte *)
- | MODE_DIRn _ ⇒ None ?
-(* preleva 2 byte, il primo e' filtrato per azzerare tutti i bit tranne n-simo *)
- | MODE_DIRn_and_IMM1 msk ⇒ opt_map … (mode_DIR1n_load … s cur_pc msk)
- (λS_dirbn_and_PC.match S_dirbn_and_PC with
- [ triple _ dirbn cur_pc' ⇒
- opt_map … (mode_IMM1_load … s cur_pc')
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc'' ⇒
- Some ? (triple … s 〈〈x0,match dirbn with [ true ⇒ x1 | false ⇒ x0 ]〉:immb〉 cur_pc'') ])])
-(* NO: solo lettura/scrittura byte *)
- | MODE_TNY _ ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_SRT _ ⇒ None ?
- ].
-
-(* **************************************** *)
-(* raccordo di tutte le possibili scritture *)
-(* **************************************** *)
-
-ndefinition Freescale_multi_mode_write_auxb ≝
-λm,t.λs:any_status m t.λcur_pc:word16.λflag:aux_mod_type.λi:Freescale_instr_mode.λwriteb:byte8.match i with
-(* NO: non ci sono indicazioni *)
- [ MODE_INH ⇒ None ?
-(* scrive A *)
- | MODE_INHA ⇒ Some ? (pair … (set_acc_8_low_reg … s writeb) cur_pc)
-(* scrive X *)
- | MODE_INHX ⇒ opt_map … (set_indX_8_low_reg … s writeb)
- (λtmps.Some ? (pair … tmps cur_pc))
-(* scrive H *)
- | MODE_INHH ⇒ opt_map … (set_indX_8_high_reg … s writeb)
- (λtmps.Some ? (pair … tmps cur_pc))
-
-(* NO: solo lettura word *)
- | MODE_INHX0ADD ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_INHX1ADD ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_INHX2ADD ⇒ None ?
-
-(* NO: solo lettura byte *)
- | MODE_IMM1 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM1EXT ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM2 ⇒ None ?
-(* scrive 1 byte su indirizzo diretto 1 byte *)
- | MODE_DIR1 ⇒ mode_DIR1_write true … s cur_pc writeb
-(* scrive 1 byte su indirizzo diretto 1 word *)
- | MODE_DIR2 ⇒ mode_DIR2_write true … s cur_pc writeb
-(* scrive 1 byte su H:X *)
- | MODE_IX0 ⇒ mode_IX0_write true … s cur_pc writeb
-(* scrive 1 byte su H:X+1 byte offset *)
- | MODE_IX1 ⇒ mode_IX1_write true … s cur_pc writeb
-(* scrive 1 byte su H:X+1 word offset *)
- | MODE_IX2 ⇒ mode_IX2_write true … s cur_pc writeb
-(* scrive 1 byte su SP+1 byte offset *)
- | MODE_SP1 ⇒ mode_SP1_write true … s cur_pc writeb
-(* scrive 1 byte su SP+1 word offset *)
- | MODE_SP2 ⇒ mode_SP2_write true … s cur_pc writeb
-
-(* passo2: scrittura su DIR1, passo1: lettura da DIR1 *)
- | MODE_DIR1_to_DIR1 ⇒ mode_DIR1_write true … s cur_pc writeb
-(* passo2: scrittura su DIR1, passo1: lettura da IMM1 *)
- | MODE_IMM1_to_DIR1 ⇒ mode_DIR1_write true … s cur_pc writeb
-(* passo2: scrittura su DIR1 e X++, passo1: lettura da IX0 *)
- | MODE_IX0p_to_DIR1 ⇒ opt_map … (mode_DIR1_write true … s cur_pc writeb)
- (λS_and_PC.match S_and_PC with [ pair S_op PC_op ⇒
- (* H:X++ *)
- opt_map … (aux_inc_indX_16 … S_op)
- (λS_op'.Some ? (pair … S_op' PC_op))])
-(* passo2: scrittura su IX0 e X++, passo1: lettura da DIR1 *)
- | MODE_DIR1_to_IX0p ⇒ opt_map … (mode_IX0_write true … s cur_pc writeb)
- (λS_and_PC.match S_and_PC with [ pair S_op PC_op ⇒
- (* H:X++ *)
- opt_map … (aux_inc_indX_16 … S_op)
- (λS_op'.Some ? (pair … S_op' PC_op))])
-
-(* dopo aver prelevato 2 byte la possibilita' modificare Io argomento = INHA *)
- | MODE_INHA_and_IMM1 ⇒ Some ? (pair … (set_acc_8_low_reg … s writeb) cur_pc)
-(* dopo aver prelevato 2 byte la possibilita' modificare Io argomento = INHX *)
- | MODE_INHX_and_IMM1 ⇒ opt_map … (set_indX_8_low_reg … s writeb)
- (λtmps.Some ? (pair … tmps cur_pc))
-(* NO: solo lettura word *)
- | MODE_IMM1_and_IMM1 ⇒ None ?
-(* dopo aver prelevato 2 byte la possibilita' modificare Io argomento = DIR1 *)
- | MODE_DIR1_and_IMM1 ⇒ mode_DIR1_write true … s cur_pc writeb
-(* dopo aver prelevato 2 byte la possibilita' modificare Io argomento = IX0 *)
- | MODE_IX0_and_IMM1 ⇒ mode_IX0_write true … s cur_pc writeb
-(* NO: solo lettura word *)
- | MODE_IX0p_and_IMM1 ⇒ None ?
-(* dopo aver prelevato 2 byte la possibilita' modificare Io argomento = IX1 *)
- | MODE_IX1_and_IMM1 ⇒ mode_IX1_write true … s cur_pc writeb
-(* NO: solo lettura word *)
- | MODE_IX1p_and_IMM1 ⇒ None ?
-(* dopo aver prelevato 2 byte la possibilita' modificare Io argomento = SP1 *)
- | MODE_SP1_and_IMM1 ⇒ mode_SP1_write true … s cur_pc writeb
-
-(* scrive 1 byte, ma la scrittura avviene solo per n-simo bit = leggi/modifica bit/scrivi *)
- | MODE_DIRn msk ⇒ mode_DIR1n_write … s cur_pc msk (getn_array8T msk bool (bits_of_byte8 writeb))
-(* NO: solo lettura word *)
- | MODE_DIRn_and_IMM1 _ ⇒ None ?
-(* scrive 1 byte su 0000 0000 0000 xxxxb *)
- | MODE_TNY e ⇒ opt_map … (memory_filter_write … s (extu3_w32 e) auxMode_ok writeb)
- (λtmps.Some ? (pair … tmps cur_pc))
-(* scrive 1 byte su 0000 0000 000x xxxxb *)
- | MODE_SRT e ⇒ opt_map … (memory_filter_write … s (extu2_w32 (b8_of_bit e)) auxMode_ok writeb)
- (λtmps.Some ? (pair … tmps cur_pc))
- ].
-
-ndefinition Freescale_multi_mode_write_auxw ≝
-λm,t.λs:any_status m t.λcur_pc:word16.λi:Freescale_instr_mode.λwritew:word16.match i with
-(* NO: non ci sono indicazioni *)
- [ MODE_INH ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_INHA ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_INHX ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_INHH ⇒ None ?
-
-(* NO: solo lettura word *)
- | MODE_INHX0ADD ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_INHX1ADD ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_INHX2ADD ⇒ None ?
-
-(* NO: solo lettura byte *)
- | MODE_IMM1 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM1EXT ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM2 ⇒ None ?
-(* scrive 1 word su indirizzo diretto 1 byte *)
- | MODE_DIR1 ⇒ mode_DIR1_write false … s cur_pc writew
-(* scrive 1 word su indirizzo diretto 1 word *)
- | MODE_DIR2 ⇒ mode_DIR2_write false … s cur_pc writew
-(* scrive 1 word su H:X *)
- | MODE_IX0 ⇒ mode_IX0_write false … s cur_pc writew
-(* scrive 1 word su H:X+1 byte offset *)
- | MODE_IX1 ⇒ mode_IX1_write false … s cur_pc writew
-(* scrive 1 word su H:X+1 word offset *)
- | MODE_IX2 ⇒ mode_IX2_write false … s cur_pc writew
-(* scrive 1 word su SP+1 byte offset *)
- | MODE_SP1 ⇒ mode_SP1_write false … s cur_pc writew
-(* scrive 1 word su SP+1 word offset *)
- | MODE_SP2 ⇒ mode_SP2_write false … s cur_pc writew
-
-(* NO: solo lettura/scrittura byte *)
- | MODE_DIR1_to_DIR1 ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_IMM1_to_DIR1 ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_IX0p_to_DIR1 ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_DIR1_to_IX0p ⇒ None ?
-
-(* NO: solo lettura word/scrittura byte *)
- | MODE_INHA_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_INHX_and_IMM1 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM1_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_DIR1_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_IX0_and_IMM1 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IX0p_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_IX1_and_IMM1 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IX1p_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_SP1_and_IMM1 ⇒ None ?
-
-(* NO: solo scrittura byte *)
- | MODE_DIRn _ ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_DIRn_and_IMM1 _ ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_TNY _ ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_SRT _ ⇒ None ?
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status_getter.ma".
-include "emulator/read_write/load_write_base.ma".
-
-(* lettura da [OLD PC<<1 + 1] : argomento non caricato dal fetch word-aligned *)
-ndefinition mode_IMM1_load ≝
-λt:memory_impl.λs:any_status IP2022 t.
- mem_read_s … s (rol_w32 〈〈〈x8,x1〉:〈x0,x0〉〉.(get_pc_reg … s)〉).
-
-(* SCHEMA:
- ADDRX=0x00 [ADDRH|ADDRL] 16Kb PROGRAM RAM
- ADDRX=0x01 [ADDRH|ADDRL] 64Kb FLASH
- ADDRX=0x80 [ADDRH|ADDRL] 64Kb EXTERNAL RAM
- ADDRX=0x81 [ADDRH|ADDRL] 64Kb EXTERNAL RAM *)
-
-(* lettura da [ADDR] *)
-ndefinition mode_ADDR_load ≝
-λt:memory_impl.λs:any_status IP2022 t.
- opt_map … (get_addr_reg … s)
- (λaddr.match (eq_b8 (w24x addr) 〈x0,x1〉) ⊗ (le_w16 (pred_w16 (get_pc_reg … s)) 〈〈x1,xF〉:〈xF,xF〉〉) with
- (* lettura della FLASH da codice in RAM : operazione non bloccante non implementata! *)
- [ true ⇒ None ?
- | false ⇒ opt_map … (memory_filter_read … s 〈〈〈x0,x2〉:(w24x addr)〉.〈(w24h addr):(clrLSB_b8 (w24l addr))〉〉)
- (λbh.opt_map … (memory_filter_read … s 〈〈〈x0,x2〉:(w24x addr)〉.〈(w24h addr):(setLSB_b8 (w24l addr))〉〉)
- (λbl.Some ? 〈bh:bl〉))]).
-
-(* scrittura su [ADDR] *)
-ndefinition mode_ADDR_write ≝
-λt:memory_impl.λs:any_status IP2022 t.λval:word16.
- opt_map … (get_addr_reg … s)
- (λaddr.opt_map … (memory_filter_write … s 〈〈〈x0,x2〉:(w24x addr)〉.〈(w24h addr):(clrLSB_b8 (w24l addr))〉〉 auxMode_ok (cnH ? val))
- (λs'.memory_filter_write … s' 〈〈〈x0,x2〉:(w24x addr)〉.〈(w24h addr):(setLSB_b8 (w24l addr))〉〉 auxMode_ok (cnL ? val))).
-
-(* IMM1 > 0 : lettura/scrittura da [IMM1] *)
-(* else : lettura/scrittura da [IP] : IP ≥ 0x20 *)
-ndefinition mode_DIR1IP_aux ≝
-λt:memory_impl.λs:any_status IP2022 t.λT.λf:word32 → option T.
- opt_map … (mode_IMM1_load t s)
- (λaddr.match eq_b8 addr 〈x0,x0〉 with
- (* xxxxxxx0 00000000 → [IP] *)
- [ true ⇒ opt_map … (get_ip_reg … s)
- (λip.match ge_w16 ip 〈〈x0,x0〉:〈x2,x0〉〉 with
- (* IP ≥ 0x20 *)
- [ true ⇒ f (extu_w32 ip)
- | false ⇒ None ? ])
- (* xxxxxxx0 nnnnnnnn → [IMM1] *)
- | false ⇒ f (extu2_w32 addr)
- ]).
-
-(* IMM1 < 0x80 : lettura/scrittura da [DP+IMM1] : DP+IMM1 ≥ 0x20 *)
-(* else : lettura/scrittura da [SP+IMM1] : SP+IMM1 ≥ 0x20 *)
-ndefinition mode_DPSP_aux ≝
-λt:memory_impl.λs:any_status IP2022 t.λT.λf:word32 → option T.
- opt_map … (mode_IMM1_load t s)
- (λaddr.opt_map … (match getMSB_b8 addr with
- (* xxxxxxx1 1nnnnnnn → [SP+IMM1] *)
- [ true ⇒ get_sp_reg … s
- (* xxxxxxx1 0nnnnnnn → [DP+IMM1] *)
- | false ⇒ get_dp_reg … s ])
- (λreg.match ge_w16 (plus_w16_d_d reg (extu_w16 (clrMSB_b8 addr))) 〈〈x0,x0〉:〈x2,x0〉〉 with
- (* reg+IMM1 ≥ 0x20 *)
- [ true ⇒ f (extu_w32 (plus_w16_d_d reg (extu_w16 (clrMSB_b8 addr))))
- | false ⇒ None ? ])).
-
-(* FR0 *)
-ndefinition mode_FR0_load ≝
-λt:memory_impl.λs:any_status IP2022 t.
- mode_DIR1IP_aux t s byte8 (memory_filter_read … s).
-
-ndefinition mode_FR0n_load ≝
-λt:memory_impl.λs:any_status IP2022 t.λsub:oct.
- mode_DIR1IP_aux t s bool (λaddr.memory_filter_read_bit … s addr sub).
-
-ndefinition mode_FR0_write ≝
-λt:memory_impl.λs:any_status IP2022 t.λflag:aux_mod_type.λval:byte8.
- mode_DIR1IP_aux t s (any_status IP2022 t) (λaddr.memory_filter_write … s addr flag val).
-
-ndefinition mode_FR0n_write ≝
-λt:memory_impl.λs:any_status IP2022 t.λsub:oct.λval:bool.
- mode_DIR1IP_aux t s (any_status IP2022 t) (λaddr.memory_filter_write_bit … s addr sub val).
-
-(* FR1 *)
-ndefinition mode_FR1_load ≝
-λt:memory_impl.λs:any_status IP2022 t.
- mode_DPSP_aux t s byte8 (memory_filter_read … s).
-
-ndefinition mode_FR1n_load ≝
-λt:memory_impl.λs:any_status IP2022 t.λsub:oct.
- mode_DPSP_aux t s bool (λaddr.memory_filter_read_bit … s addr sub).
-
-ndefinition mode_FR1_write ≝
-λt:memory_impl.λs:any_status IP2022 t.λflag:aux_mod_type.λval:byte8.
- mode_DPSP_aux t s (any_status IP2022 t) (λaddr.memory_filter_write … s addr flag val).
-
-ndefinition mode_FR1n_write ≝
-λt:memory_impl.λs:any_status IP2022 t.λsub:oct.λval:bool.
- mode_DPSP_aux t s (any_status IP2022 t) (λaddr.memory_filter_write_bit … s addr sub val).
-
-(* ************************************** *)
-(* raccordo di tutte le possibili letture *)
-(* ************************************** *)
-
-(* addr+=2 *)
-ndefinition aux_inc_addr2 ≝
-λt:memory_impl.λs:any_status IP2022 t.
- set_addr_reg_sIP2022 t s (succ_w24 (succ_w24 (get_addr_reg_IP2022 (alu … s)))).
-
-ndefinition IP2022_multi_mode_load_auxb ≝
-λt.λs:any_status IP2022 t.λcur_pc:word16.λi:IP2022_instr_mode.match i with
-(* NO: non ci sono indicazioni *)
- [ MODE_INH ⇒ None ?
-(* NO: solo word *)
- | MODE_INHADDR ⇒ None ?
-(* NO: solo word *)
- | MODE_INHADDRpp ⇒ None ?
-
-(* IMM3 *)
- | MODE_IMM3 o ⇒ Some ? (triple … s (extu_b8 (ex_of_oct o)) cur_pc)
-(* IMM8 *)
- | MODE_IMM8 ⇒ opt_map … (mode_IMM1_load t s)
- (λb.Some ? (triple … s b cur_pc))
-(* NO: solo lettura word *)
- | MODE_IMM13 _ ⇒ None ?
-
-(* NO: solo word *)
- | MODE_FR0_and_W ⇒ None ?
-(* NO: solo word *)
- | MODE_FR1_and_W ⇒ None ?
-(* NO: solo word *)
- | MODE_W_and_FR0 ⇒ None ?
-(* NO: solo word *)
- | MODE_W_and_FR1 ⇒ None ?
-
-(* [FRn] *)
- | MODE_FR0n o ⇒ opt_map … (mode_FR0n_load t s o)
- (λb.Some ? (triple … s (extu_b8 (match b with [ true ⇒ x1 | false ⇒ x0 ])) cur_pc))
-(* [FRn] *)
- | MODE_FR1n o ⇒ opt_map … (mode_FR1n_load t s o)
- (λb.Some ? (triple … s (extu_b8 (match b with [ true ⇒ x1 | false ⇒ x0 ])) cur_pc))
- ].
-
-ndefinition IP2022_multi_mode_load_auxw ≝
-λt.λs:any_status IP2022 t.λcur_pc:word16.λi:IP2022_instr_mode.match i with
-(* NO: non ci sono indicazioni *)
- [ MODE_INH ⇒ None ?
-(* [ADDR] *)
- | MODE_INHADDR ⇒ opt_map … (mode_ADDR_load t s)
- (λw.Some ? (triple … s w cur_pc))
-(* [ADDR], ADDR+=2 *)
- | MODE_INHADDRpp ⇒ opt_map … (mode_ADDR_load t s)
- (λw.Some ? (triple … (aux_inc_addr2 t s) w cur_pc))
-
-(* NO: solo lettura byte *)
- | MODE_IMM3 _ ⇒ None ?
-(* NO: solo lettura byte *)
- | MODE_IMM8 ⇒ None ?
-(* IMM13 *)
- | MODE_IMM13 bt ⇒ opt_map … (mode_IMM1_load t s)
- (λb.Some ? (triple … s 〈(b8_of_bit bt):b〉 cur_pc))
-
-(* FR, W → FR *)
- | MODE_FR0_and_W ⇒ opt_map … (mode_FR0_load t s)
- (λfr.Some ? (triple … s 〈fr:(get_acc_8_low_reg … s)〉 cur_pc))
-(* FR, W → FR *)
- | MODE_FR1_and_W ⇒ opt_map … (mode_FR1_load t s)
- (λfr.Some ? (triple … s 〈fr:(get_acc_8_low_reg … s)〉 cur_pc))
-(* W, FR → W *)
- | MODE_W_and_FR0 ⇒ opt_map … (mode_FR0_load t s)
- (λfr.Some ? (triple … s 〈(get_acc_8_low_reg … s):fr〉 cur_pc))
-(* W, FR → W *)
- | MODE_W_and_FR1 ⇒ opt_map … (mode_FR1_load t s)
- (λfr.Some ? (triple … s 〈(get_acc_8_low_reg … s):fr〉 cur_pc))
-
-(* NO: solo byte *)
- | MODE_FR0n _ ⇒ None ?
-(* NO: solo byte *)
- | MODE_FR1n _ ⇒ None ?
- ].
-
-(* **************************************** *)
-(* raccordo di tutte le possibili scritture *)
-(* **************************************** *)
-
-ndefinition IP2022_multi_mode_write_auxb ≝
-λt.λs:any_status IP2022 t.λcur_pc:word16.λflag:aux_mod_type.λi:IP2022_instr_mode.λwriteb:byte8.match i with
-(* NO: non ci sono indicazioni *)
- [ MODE_INH ⇒ None ?
-(* NO: solo word *)
- | MODE_INHADDR ⇒ None ?
-(* NO: solo word *)
- | MODE_INHADDRpp ⇒ None ?
-
-(* NO: solo lettura byte *)
- | MODE_IMM3 _ ⇒ None ?
-(* NO: solo lettura byte *)
- | MODE_IMM8 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM13 _ ⇒ None ?
-
-(* FR, W → FR *)
- | MODE_FR0_and_W ⇒ opt_map … (mode_FR0_write t s flag writeb)
- (λs'.Some ? (pair … s' cur_pc))
-(* FR, W → FR *)
- | MODE_FR1_and_W ⇒ opt_map … (mode_FR1_write t s flag writeb)
- (λs'.Some ? (pair … s' cur_pc))
-(* W, FR → W *)
- | MODE_W_and_FR0 ⇒ Some ? (pair … (set_acc_8_low_reg … s writeb) cur_pc)
-(* W, FR → W *)
- | MODE_W_and_FR1 ⇒ Some ? (pair … (set_acc_8_low_reg … s writeb) cur_pc)
-
-(* [FRn] *)
- | MODE_FR0n o ⇒ opt_map … (mode_FR0n_write t s o (getn_array8T o ? (bits_of_byte8 writeb)))
- (λs'.Some ? (pair … s' cur_pc))
-(* [FRn] *)
- | MODE_FR1n o ⇒ opt_map … (mode_FR1n_write t s o (getn_array8T o ? (bits_of_byte8 writeb)))
- (λs'.Some ? (pair … s' cur_pc))
- ].
-
-ndefinition IP2022_multi_mode_write_auxw ≝
-λt.λs:any_status IP2022 t.λcur_pc:word16.λi:IP2022_instr_mode.λwritew:word16.match i with
-(* NO: non ci sono indicazioni *)
- [ MODE_INH ⇒ None ?
-(* [ADDR] *)
- | MODE_INHADDR ⇒ opt_map … (mode_ADDR_write t s writew)
- (λs'.Some ? (pair … s' cur_pc))
-(* [ADDR], ADDR+=2 *)
- | MODE_INHADDRpp ⇒ opt_map … (mode_ADDR_write t s writew)
- (λs'.Some ? (pair … (aux_inc_addr2 t s') cur_pc))
-
-(* NO: solo lettura byte *)
- | MODE_IMM3 _ ⇒ None ?
-(* NO: solo lettura byte *)
- | MODE_IMM8 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM13 _ ⇒ None ?
-
-(* NO: solo byte *)
- | MODE_FR0_and_W ⇒ None ?
-(* NO: solo byte *)
- | MODE_FR1_and_W ⇒ None ?
-(* NO: solo byte *)
- | MODE_W_and_FR0 ⇒ None ?
-(* NO: solo byte *)
- | MODE_W_and_FR1 ⇒ None ?
-
-(* NO: solo byte *)
- | MODE_FR0n _ ⇒ None ?
-(* NO: solo byte *)
- | MODE_FR1n _ ⇒ None ?
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status_setter.ma".
-include "emulator/read_write/read_write_base.ma".
-
-ndefinition IP2022_ADDRSEL_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x2〉〉〉.
-ndefinition IP2022_ADDRX_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x3〉〉〉.
-ndefinition IP2022_IPH_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x4〉〉〉.
-ndefinition IP2022_IPL_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x5〉〉〉.
-ndefinition IP2022_SPH_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x6〉〉〉.
-ndefinition IP2022_SPL_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x7〉〉〉.
-ndefinition IP2022_PCH_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x8〉〉〉.
-ndefinition IP2022_PCL_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x9〉〉〉.
-ndefinition IP2022_W_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,xA〉〉〉.
-ndefinition IP2022_STATUS_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,xB〉〉〉.
-ndefinition IP2022_DPH_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,xC〉〉〉.
-ndefinition IP2022_DPL_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,xD〉〉〉.
-ndefinition IP2022_SPEED_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,xE〉〉〉.
-ndefinition IP2022_MULH_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,xF〉〉〉.
-ndefinition IP2022_ADDRH_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x1,x0〉〉〉.
-ndefinition IP2022_ADDRL_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x1,x1〉〉〉.
-ndefinition IP2022_DATAH_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x1,x2〉〉〉.
-ndefinition IP2022_DATAL_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x1,x3〉〉〉.
-ndefinition IP2022_CALLH_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x1,x4〉〉〉.
-ndefinition IP2022_CALLL_loc ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x1,x5〉〉〉.
-
-(* **** *)
-(* READ *)
-(* **** *)
-
-(* NB: non ci sono strane indirezioni,
- solo registri memory mapped da intercettare *)
-ndefinition IP2022_memory_filter_read_aux ≝
-λt:memory_impl.λs:any_status IP2022 t.λaddr:word32.
-λT:Type.λfREG:byte8 → option T.λfMEM:aux_mem_type t → aux_chk_type t → word32 → option T.
-(* intercettare le locazioni memory mapped *)
- match eq_w32 addr IP2022_ADDRSEL_loc with
- [ true ⇒ fREG (addrsel_reg_IP2022 (alu … s))
- | false ⇒
- match eq_w32 addr IP2022_ADDRX_loc with
- [ true ⇒ fREG (w24x (get_addrarray (addrsel_reg_IP2022 (alu … s))
- (addr_array_IP2022 (alu … s))))
- | false ⇒
- match eq_w32 addr IP2022_IPH_loc with
- [ true ⇒ fREG (cnH ? (ip_reg_IP2022 (alu … s)))
- | false ⇒
- match eq_w32 addr IP2022_IPL_loc with
- [ true ⇒ fREG (cnL ? (ip_reg_IP2022 (alu … s)))
- | false ⇒
- match eq_w32 addr IP2022_SPH_loc with
- [ true ⇒ fREG (cnH ? (sp_reg_IP2022 (alu … s)))
- | false ⇒
- match eq_w32 addr IP2022_SPL_loc with
- [ true ⇒ fREG (cnL ? (sp_reg_IP2022 (alu … s)))
- | false ⇒
- match eq_w32 addr IP2022_PCH_loc with
- [ true ⇒ fREG (cnH ? (pc_reg_IP2022 (alu … s)))
- | false ⇒
- match eq_w32 addr IP2022_PCL_loc with
- [ true ⇒ fREG (cnL ? (pc_reg_IP2022 (alu … s)))
- | false ⇒
- match eq_w32 addr IP2022_W_loc with
- [ true ⇒ fREG (acc_low_reg_IP2022 (alu … s))
- | false ⇒
- (* PAGE[7:5] Z[2] H[1] C [0] *)
- match eq_w32 addr IP2022_STATUS_loc with
- [ true ⇒ fREG 〈(rol_ex (ex_of_oct (page_reg_IP2022 (alu … s)))),
- (or_ex (or_ex (match z_flag_IP2022 (alu … s) with
- [ true ⇒ x4 | false ⇒ x0 ])
- (match h_flag_IP2022 (alu … s) with
- [ true ⇒ x2 | false ⇒ x0 ]))
- (match c_flag_IP2022 (alu … s) with
- [ true ⇒ x1 | false ⇒ x0 ]))〉
- | false ⇒
- match eq_w32 addr IP2022_DPH_loc with
- [ true ⇒ fREG (cnH ? (dp_reg_IP2022 (alu … s)))
- | false ⇒
- match eq_w32 addr IP2022_DPL_loc with
- [ true ⇒ fREG (cnL ? (dp_reg_IP2022 (alu … s)))
- | false ⇒
- (* SPEED[3:0] *)
- match eq_w32 addr IP2022_SPEED_loc with
- [ true ⇒ fREG 〈x0,(speed_reg_IP2022 (alu … s))〉
- | false ⇒
- match eq_w32 addr IP2022_MULH_loc with
- [ true ⇒ fREG (mulh_reg_IP2022 (alu … s))
- | false ⇒
- match eq_w32 addr IP2022_ADDRH_loc with
- [ true ⇒ fREG (w24h (get_addrarray (addrsel_reg_IP2022 (alu … s))
- (addr_array_IP2022 (alu … s))))
- | false ⇒
- match eq_w32 addr IP2022_ADDRL_loc with
- [ true ⇒ fREG (w24l (get_addrarray (addrsel_reg_IP2022 (alu … s))
- (addr_array_IP2022 (alu … s))))
- | false ⇒
- match eq_w32 addr IP2022_DATAH_loc with
- [ true ⇒ fREG (cnH ? (data_reg_IP2022 (alu … s)))
- | false ⇒
- match eq_w32 addr IP2022_DATAL_loc with
- [ true ⇒ fREG (cnL ? (data_reg_IP2022 (alu … s)))
- | false ⇒
- match eq_w32 addr IP2022_CALLH_loc with
- [ true ⇒ fREG (cnH ? (getn_array16T x0 ? (call_stack_IP2022 (alu … s))))
- | false ⇒
- match eq_w32 addr IP2022_CALLL_loc with
- [ true ⇒ fREG (cnL ? (getn_array16T x0 ? (call_stack_IP2022 (alu … s))))
-(* accesso normale *)
- | false ⇒ fMEM (mem_desc … s) (chk_desc … s) addr
- ]]]]]]]]]]]]]]]]]]]].
-
-(* lettura IP2022 di un byte *)
-ndefinition IP2022_memory_filter_read ≝
-λt:memory_impl.λs:any_status IP2022 t.λaddr:word32.
- IP2022_memory_filter_read_aux t s addr byte8
- (λb.Some byte8 b)
- (λm:aux_mem_type t.λc:aux_chk_type t.λa:word32.mem_read t m c a).
-
-(* lettura IP2022 di un bit *)
-ndefinition IP2022_memory_filter_read_bit ≝
-λt:memory_impl.λs:any_status IP2022 t.λaddr:word32.λsub:oct.
- IP2022_memory_filter_read_aux t s addr bool
- (λb.Some bool (getn_array8T sub bool (bits_of_byte8 b)))
- (λm:aux_mem_type t.λc:aux_chk_type t.λa:word32.mem_read_bit t m c a sub).
-
-(* ***** *)
-(* WRITE *)
-(* ***** *)
-
-ndefinition high_write_aux_w16 ≝
-λf:byte8 → byte8.λw:word16.〈(f (cnH ? w)):(cnL ? w)〉.
-
-ndefinition lowc_write_aux_w16 ≝
-λf:byte8 → byte8.λw:word16.λflag:aux_mod_type.
- 〈((match flag with
- [ auxMode_ok ⇒ λx.x
- | auxMode_inc ⇒ succ_b8
- | auxMode_dec ⇒ pred_b8 ]) (cnH ? w)):
- (f (cnL ? w))〉.
-
-ndefinition lownc_write_aux_w16 ≝
-λf:byte8 → byte8.λw:word16.〈(cnH ? w):(f (cnL ? w))〉.
-
-ndefinition ext_write_aux_w24 ≝
-λf:byte8 → byte8.λw:word24.〈(f (w24x w));(w24h w);(w24l w)〉.
-
-ndefinition high_write_aux_w24 ≝
-λf:byte8 → byte8.λw:word24.〈(w24x w);(f (w24h w));(w24l w)〉.
-
-ndefinition low_write_aux_w24 ≝
-λf:byte8 → byte8.λw:word24.λflag:aux_mod_type.
- match (match flag with
- [ auxMode_ok ⇒ λx.x
- | auxMode_inc ⇒ succ_w16
- | auxMode_dec ⇒ pred_w16 ]) 〈(w24x w):(w24h w)〉 with
- [ mk_comp_num wx' wh' ⇒ 〈wx';wh';(w24l w)〉 ].
-
-(* flag di carry: riportare il carry al byte logicamente superiore *)
-(* modifica di pc: non inserita nella stato ma postposta *)
-ndefinition IP2022_memory_filter_write_aux ≝
-λt:memory_impl.λs:any_status IP2022 t.λaddr:word32.λflag:aux_mod_type.
-λfREG:byte8 → byte8.λfMEM:aux_mem_type t → aux_chk_type t → word32 → option (aux_mem_type t).
-(* intercettare le locazioni memory mapped *)
- match eq_w32 addr IP2022_ADDRSEL_loc with
- [ true ⇒ set_addrsel_reg … s (fREG (addrsel_reg_IP2022 (alu … s)))
- | false ⇒
- match eq_w32 addr IP2022_ADDRX_loc with
- [ true ⇒ set_addr_reg … s (ext_write_aux_w24 fREG (get_addrarray (addrsel_reg_IP2022 (alu … s))
- (addr_array_IP2022 (alu … s))))
- | false ⇒
- match eq_w32 addr IP2022_IPH_loc with
- [ true ⇒ set_ip_reg … s (high_write_aux_w16 fREG (ip_reg_IP2022 (alu … s)))
- | false ⇒
- match eq_w32 addr IP2022_IPL_loc with
- [ true ⇒ set_ip_reg … s (lowc_write_aux_w16 fREG (ip_reg_IP2022 (alu … s)) flag)
- | false ⇒
- match eq_w32 addr IP2022_SPH_loc with
- [ true ⇒ set_sp_reg … s (high_write_aux_w16 fREG (sp_reg_IP2022 (alu … s)))
- | false ⇒
- match eq_w32 addr IP2022_SPL_loc with
- [ true ⇒ set_sp_reg … s (lowc_write_aux_w16 fREG (sp_reg_IP2022 (alu … s)) flag)
- | false ⇒
- match eq_w32 addr IP2022_PCL_loc with
- [ true ⇒ Some ? (set_pc_reg … s (lowc_write_aux_w16 fREG (pc_reg_IP2022 (alu … s)) flag))
- | false ⇒
- match eq_w32 addr IP2022_W_loc with
- [ true ⇒ Some ? (set_acc_8_low_reg … s (fREG (acc_low_reg_IP2022 (alu … s))))
- | false ⇒
- match eq_w32 addr IP2022_DPH_loc with
- [ true ⇒ set_dp_reg … s (high_write_aux_w16 fREG (dp_reg_IP2022 (alu … s)))
- | false ⇒
- match eq_w32 addr IP2022_DPL_loc with
- [ true ⇒ set_dp_reg … s (lowc_write_aux_w16 fREG (dp_reg_IP2022 (alu … s)) flag)
- | false ⇒
- match eq_w32 addr IP2022_MULH_loc with
- [ true ⇒ set_mulh_reg … s (fREG (mulh_reg_IP2022 (alu … s)))
- | false ⇒
- match eq_w32 addr IP2022_ADDRH_loc with
- [ true ⇒ set_addr_reg … s (high_write_aux_w24 fREG (get_addrarray (addrsel_reg_IP2022 (alu … s))
- (addr_array_IP2022 (alu … s))))
- | false ⇒
- match eq_w32 addr IP2022_ADDRL_loc with
- [ true ⇒ set_addr_reg … s (low_write_aux_w24 fREG (get_addrarray (addrsel_reg_IP2022 (alu … s))
- (addr_array_IP2022 (alu … s))) flag)
- | false ⇒
- match eq_w32 addr IP2022_DATAH_loc with
- [ true ⇒ set_data_reg … s (high_write_aux_w16 fREG (data_reg_IP2022 (alu … s)))
- | false ⇒
-(* nessun riporto automatico *)
- match eq_w32 addr IP2022_DATAL_loc with
- [ true ⇒ set_data_reg … s (lownc_write_aux_w16 fREG (data_reg_IP2022 (alu … s)))
- | false ⇒
- match eq_w32 addr IP2022_CALLH_loc with
- [ true ⇒ set_call_reg … s (high_write_aux_w16 fREG (getn_array16T x0 ? (call_stack_IP2022 (alu … s))))
- | false ⇒
-(* nessun riporto automatico *)
- match eq_w32 addr IP2022_CALLL_loc with
- [ true ⇒ set_call_reg … s (lownc_write_aux_w16 fREG (getn_array16T x0 ? (call_stack_IP2022 (alu … s))))
-(* accesso normale *)
- | false ⇒ opt_map … (fMEM (mem_desc … s) (chk_desc … s) addr)
- (λmem'.Some ? (set_mem_desc … s mem'))
- ]]]]]]]]]]]]]]]]].
-
-(* scrittura IP2022 di un byte *)
-ndefinition IP2022_memory_filter_write ≝
-λt:memory_impl.λs:any_status IP2022 t.
-λaddr:word32.λflag:aux_mod_type.λval:byte8.
- (* PAGE[7:5] Z[2] H[1] C [0] *)
- match eq_w32 addr IP2022_STATUS_loc with
- [ true ⇒ Some ?
- (set_alu … s
- (set_page_reg_IP2022
- (set_z_flag_IP2022
- (set_h_flag_IP2022
- (set_c_flag_IP2022 (alu … s)
- (getn_array8T o7 ? (bits_of_byte8 val)))
- (getn_array8T o6 ? (bits_of_byte8 val)))
- (getn_array8T o5 ? (bits_of_byte8 val)))
- (oct_of_exH (cnH ? val))))
- (* accesso a registro_non_spezzato/normale *)
- | false ⇒ IP2022_memory_filter_write_aux t s addr flag
- (λb.val)
- (λm:aux_mem_type t.λc:aux_chk_type t.λa:word32.mem_update t m c a val) ].
-
-(* scrittura IP2022 di un bit *)
-ndefinition IP2022_memory_filter_write_bit ≝
-λt:memory_impl.λs:any_status IP2022 t.
-λaddr:word32.λsub:oct.λval:bool.
- (* PAGE[7:5] Z[2] H[1] C [0] *)
- match eq_w32 addr IP2022_STATUS_loc with
- [ true ⇒ Some ? (set_alu … s
- (match sub with
- [ o0 ⇒ set_page_reg_IP2022 (alu … s)
- ((match val with [ true ⇒ or_oct o4 | false ⇒ and_oct o3 ])
- (page_reg_IP2022 (alu … s)))
- | o1 ⇒ set_page_reg_IP2022 (alu … s)
- ((match val with [ true ⇒ or_oct o2 | false ⇒ and_oct o5 ])
- (page_reg_IP2022 (alu … s)))
- | o2 ⇒ set_page_reg_IP2022 (alu … s)
- ((match val with [ true ⇒ or_oct o1 | false ⇒ and_oct o6 ])
- (page_reg_IP2022 (alu … s)))
- | o5 ⇒ set_z_flag_IP2022 (alu … s) val
- | o6 ⇒ set_h_flag_IP2022 (alu … s) val
- | o7 ⇒ set_c_flag_IP2022 (alu … s) val
- | _ ⇒ alu … s ]))
- (* accesso a registro_non_spezzato/normale *)
- | false ⇒ IP2022_memory_filter_write_aux t s addr auxMode_ok
- (λb.byte8_of_bits (setn_array8T sub bool (bits_of_byte8 b) val))
- (λm:aux_mem_type t.λc:aux_chk_type t.λa:word32.mem_update_bit t m c a sub val) ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status_setter.ma".
-
-(* **** *)
-(* READ *)
-(* **** *)
-
-(* NB: fare molta attenzione alle note sulle combinazioni possibili perche'
- il comportamento della memoria nell'RS08 e' strano e ci sono
- precise condizioni che impediscono una semantica circolare dell'accesso
- (divergenza=assenza di definizione) *)
-ndefinition RS08_memory_filter_read_aux ≝
-λt:memory_impl.λs:any_status RS08 t.λaddr:word32.
-λT:Type.λfREG:byte8 → option T.λfMEM:aux_mem_type t → aux_chk_type t → word32 → option T.
-(* solo indirizzi nei 64Kb *)
- match gt_w16 (cnH ? addr) 〈〈x0,x0〉:〈x0,x0〉〉 with
- [ true ⇒ fMEM (mem_desc … s) (chk_desc … s) addr
- | false ⇒
-(* possibili accessi al registro X
- 1) addr=000F: diretto
- 2) addr=000E (X =0F): indiretto
- 3) addr=00CF (PS=00): paging
- [NB] altre combinazioni non funzionano perche' la MCU non e' un oggetto reattivo:
- non si possono combinare due effetti contemporaneamente!
- per esempio accesso addr=00CE (PS=00,X=0F) non puo' produrre 2 indirezioni *)
- match eq_w16 (cnL ? addr) 〈〈x0,x0〉:〈x0,xF〉〉 ⊕
- (eq_w16 (cnL ? addr) 〈〈x0,x0〉:〈x0,xE〉〉 ⊗ eq_b8 (x_map_RS08 (alu … s)) 〈x0,xF〉) ⊕
- (eq_w16 (cnL ? addr) 〈〈x0,x0〉:〈xC,xF〉〉 ⊗ eq_b8 (ps_map_RS08 (alu … s)) 〈x0,x0〉) with
- [ true ⇒ fREG (x_map_RS08 (alu … s))
- | false ⇒
-(* possibili accessi al registro PS
- 1) addr=001F: diretto
- 2) addr=000E (X =1F): indiretto
- 3) addr=00DF (PS=00): paging *)
- match eq_w16 (cnL ? addr) 〈〈x0,x0〉:〈x1,xF〉〉 ⊕
- (eq_w16 (cnL ? addr) 〈〈x0,x0〉:〈x0,xE〉〉 ⊗ eq_b8 (x_map_RS08 (alu … s)) 〈x1,xF〉) ⊕
- (eq_w16 (cnL ? addr) 〈〈x0,x0〉:〈xD,xF〉〉 ⊗ eq_b8 (ps_map_RS08 (alu … s)) 〈x0,x0〉) with
- [ true ⇒ fREG (ps_map_RS08 (alu … s))
- | false ⇒
-(* accesso a D[X]: se accede a [00C0-00FF] e' la RAM fisica, non il paging
- altrimenti sarebbero 2 indirezioni *)
- match eq_w16 (cnL ? addr) 〈〈x0,x0〉:〈x0,xE〉〉 with
- [ true ⇒ fMEM (mem_desc … s) (chk_desc … s) (ext_word32 〈〈x0,x0〉:(x_map_RS08 (alu … s))〉)
- | false ⇒
-(* accesso al paging: [00pp pppp ppxx xxxx] con p=PS x=addr *)
- match inrange_w16 (cnL ? addr) 〈〈x0,x0〉:〈xC,x0〉〉 〈〈x0,x0〉:〈xF,xF〉〉 with
- [ true ⇒ fMEM (mem_desc … s) (chk_desc … s)
- (ext_word32 (or_w16 (ror_w16 (ror_w16 〈(ps_map_RS08 (alu … s)):〈x0,x0〉〉))
- (and_w16 (cnL ? addr) 〈〈x0,x0〉:〈x3,xF〉〉)))
-(* accesso normale *)
- | false ⇒ fMEM (mem_desc … s) (chk_desc … s) addr ]]]]].
-
-(* lettura RS08 di un byte *)
-ndefinition RS08_memory_filter_read ≝
-λt:memory_impl.λs:any_status RS08 t.λaddr:word32.
- RS08_memory_filter_read_aux t s addr byte8
- (λb.Some byte8 b)
- (λm:aux_mem_type t.λc:aux_chk_type t.λa:word32.mem_read t m c a).
-
-(* lettura RS08 di un bit *)
-ndefinition RS08_memory_filter_read_bit ≝
-λt:memory_impl.λs:any_status RS08 t.λaddr:word32.λsub:oct.
- RS08_memory_filter_read_aux t s addr bool
- (λb.Some bool (getn_array8T sub bool (bits_of_byte8 b)))
- (λm:aux_mem_type t.λc:aux_chk_type t.λa:word32.mem_read_bit t m c a sub).
-
-(* ***** *)
-(* WRITE *)
-(* ***** *)
-
-ndefinition RS08_memory_filter_write_aux ≝
-λt:memory_impl.λs:any_status RS08 t.λaddr:word32.
-λfREG:byte8 → byte8.λfMEM:aux_mem_type t → aux_chk_type t → word32 → option (aux_mem_type t).
-(* solo indirizzi nei 64Kb *)
- match gt_w16 (cnH ? addr) 〈〈x0,x0〉:〈x0,x0〉〉 with
- [ true ⇒ opt_map … (fMEM (mem_desc … s) (chk_desc … s) addr)
- (λmem'.Some ? (set_mem_desc … s mem'))
- | false ⇒
-(* possibili accessi al registro X
- 1) addr=000F: diretto
- 2) addr=000E (X =0F): indiretto
- 3) addr=00CF (PS=00): paging
- [NB] altre combinazioni non funzionano perche' la MCU non e' un oggetto reattivo:
- non si possono combinare due effetti contemporaneamente!
- per esempio accesso addr=00CE (PS=00,X=0F) non puo' produrre 2 indirezioni *)
- match eq_w16 (cnL ? addr) 〈〈x0,x0〉:〈x0,xF〉〉 ⊕
- (eq_w16 (cnL ? addr) 〈〈x0,x0〉:〈x0,xE〉〉 ⊗ eq_b8 (x_map_RS08 (alu … s)) 〈x0,xF〉) ⊕
- (eq_w16 (cnL ? addr) 〈〈x0,x0〉:〈xC,xF〉〉 ⊗ eq_b8 (ps_map_RS08 (alu … s)) 〈x0,x0〉) with
- [ true ⇒ set_x_map … s (fREG (x_map_RS08 (alu … s)))
- | false ⇒
-(* possibili accessi al registro PS
- 1) addr=001F: diretto
- 2) addr=000E (X =1F): indiretto
- 3) addr=00DF (PS=00): paging *)
- match eq_w16 (cnL ? addr) 〈〈x0,x0〉:〈x1,xF〉〉 ⊕
- (eq_w16 (cnL ? addr) 〈〈x0,x0〉:〈x0,xE〉〉 ⊗ eq_b8 (x_map_RS08 (alu … s)) 〈x1,xF〉) ⊕
- (eq_w16 (cnL ? addr) 〈〈x0,x0〉:〈xD,xF〉〉 ⊗ eq_b8 (ps_map_RS08 (alu … s)) 〈x0,x0〉) with
- [ true ⇒ set_ps_map … s (fREG (x_map_RS08 (alu … s)))
- | false ⇒
-(* accesso a D[X]: se accede a [00C0-00FF] e' la RAM fisica, non il paging
- altrimenti sarebbero 2 indirezioni *)
- match eq_w16 (cnL ? addr) 〈〈x0,x0〉:〈x0,xE〉〉 with
- [ true ⇒ opt_map … (fMEM (mem_desc … s) (chk_desc … s) (ext_word32 〈〈x0,x0〉:(x_map_RS08 (alu … s))〉))
- (λmem'.Some ? (set_mem_desc … s mem'))
- | false ⇒
-(* accesso al paging: [00pp pppp ppxx xxxx] con p=PS x=addr *)
- match inrange_w16 (cnL ? addr) 〈〈x0,x0〉:〈xC,x0〉〉 〈〈x0,x0〉:〈xF,xF〉〉 with
- [ true ⇒ opt_map … (fMEM (mem_desc … s) (chk_desc … s)
- (ext_word32 (or_w16 (ror_w16 (ror_w16 〈(ps_map_RS08 (alu … s)):〈x0,x0〉〉))
- (and_w16 (cnL ? addr) 〈〈x0,x0〉:〈x3,xF〉〉))))
- (λmem'.Some ? (set_mem_desc … s mem'))
-(* accesso normale *)
- | false ⇒ opt_map … (fMEM (mem_desc … s) (chk_desc … s) addr)
- (λmem'.Some ? (set_mem_desc … s mem')) ]]]]].
-
-(* scrittura RS08 di un byte *)
-ndefinition RS08_memory_filter_write ≝
-λt:memory_impl.λs:any_status RS08 t.λaddr:word32.λval:byte8.
- RS08_memory_filter_write_aux t s addr
- (λb.val)
- (λm:aux_mem_type t.λc:aux_chk_type t.λa:word32.mem_update t m c a val).
-
-(* scrittura RS08 di un bit *)
-ndefinition RS08_memory_filter_write_bit ≝
-λt:memory_impl.λs:any_status RS08 t.λaddr:word32.λsub:oct.λval:bool.
- RS08_memory_filter_write_aux t s addr
- (λb.byte8_of_bits (setn_array8T sub bool (bits_of_byte8 b) val))
- (λm:aux_mem_type t.λc:aux_chk_type t.λa:word32.mem_update_bit t m c a sub val).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/memory/memory_abs.ma".
-include "emulator/translation/translation.ma".
-include "emulator/status/status_getter.ma".
-
-(* errori possibili nel fetch OPCODE / ILLEGAL ADDRESS *)
-ninductive error_type : Type ≝
- ILL_OP: error_type
-| ILL_FETCH_AD: error_type
-.
-
-(* - errore: interessa solo l'errore
- - ok: interessa info, nuovo pc *)
-ninductive fetch_result (A:Type) : Type ≝
- FetchERR : error_type → fetch_result A
-| FetchOK : A → word16 → fetch_result A.
-
-ndefinition fetch_byte_aux ≝
-λm:mcu_type.λcur_pc:word16.λbh:byte8.
- match full_info_of_word16 m (Byte bh) with
- [ None ⇒ FetchERR ? ILL_FETCH_AD
- | Some info ⇒ FetchOK ? info cur_pc
- ].
-
-ndefinition fetch_word_aux ≝
-λm:mcu_type.λcur_pc:word16.λw:word16.
- match full_info_of_word16 m (Word w) with
- [ None ⇒ FetchERR ? ILL_FETCH_AD
- | Some info ⇒ FetchOK ? info cur_pc
- ].
-
-(* opcode a byte : HC05 / RS08 *)
-ndefinition fetch_byte ≝
-λm:mcu_type.λfR:word32 → option byte8.λpc:word16.
- match fR (extu_w32 pc) with
- [ None ⇒ FetchERR ? ILL_FETCH_AD
- | Some bh ⇒ fetch_byte_aux m (succ_w16 pc) bh ].
-
-(* opcode a byte o 0x9E + byte : HC08 / HCS08 *)
-ndefinition Freescale_fetch_byte_or_word ≝
-λm:mcu_type.λfR:word32 → option byte8.λpc:word16.
- match fR (extu_w32 pc) with
- [ None ⇒ FetchERR ? ILL_FETCH_AD
- | Some bh ⇒ match eq_b8 bh 〈x9,xE〉 with
- [ true ⇒ match fR (extu_w32 (succ_w16 pc)) with
- [ None ⇒ FetchERR ? ILL_FETCH_AD
- | Some bl ⇒ fetch_word_aux m (succ_w16 (succ_w16 pc)) 〈bh:bl〉
- ]
- | false ⇒ fetch_byte_aux m (succ_w16 pc) bh
- ]
- ].
-
-(* opcode a byte o 0x00 + byte : IP2022 *)
-(* opcode + operando a dimensione fissa 16bit *)
-(* pc word aligned, mappato in 0x02000000-0x0201FFFF *)
-ndefinition IP2022_fetch_byte_or_word ≝
-λm:mcu_type.λfR:word32 → option byte8.λpc:word16.
- match fR (rol_w32 〈〈〈x0,x1〉:〈x0,x0〉〉.pc〉) with
- [ None ⇒ FetchERR ? ILL_FETCH_AD
- | Some bh ⇒ match eq_b8 bh 〈x0,x0〉 with
- [ true ⇒ match fR (rol_w32 〈〈〈x8,x1〉:〈x0,x0〉〉.pc〉) with
- [ None ⇒ FetchERR ? ILL_FETCH_AD
- | Some bl ⇒ fetch_word_aux m (succ_w16 pc) 〈bh:bl〉
- ]
- | false ⇒ fetch_byte_aux m (succ_w16 pc) bh
- ]
- ].
-
-ndefinition fetch ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m with
- [ HC05 ⇒ fetch_byte
- | HC08 ⇒ Freescale_fetch_byte_or_word
- | HCS08 ⇒ Freescale_fetch_byte_or_word
- | RS08 ⇒ fetch_byte
- | IP2022 ⇒ IP2022_fetch_byte_or_word
- ] m (mem_read t (mem_desc … s) (chk_desc … s)) (get_pc_reg … s).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/read_write/Freescale_load_write.ma".
-include "emulator/read_write/IP2022_load_write.ma".
-
-(* ************************************** *)
-(* raccordo di tutte le possibili letture *)
-(* ************************************** *)
-
-ndefinition multi_mode_loadb ≝
-λm.match m
- return λm.Πt.any_status m t → word16 → aux_im_type m →
- option (Prod3T (any_status m t) byte8 word16)
- with
- [ HC05 ⇒ Freescale_multi_mode_load_auxb HC05
- | HC08 ⇒ Freescale_multi_mode_load_auxb HC08
- | HCS08 ⇒ Freescale_multi_mode_load_auxb HCS08
- | RS08 ⇒ Freescale_multi_mode_load_auxb RS08
- | IP2022 ⇒ IP2022_multi_mode_load_auxb
- ].
-
-ndefinition multi_mode_loadw ≝
-λm.match m
- return λm.Πt.any_status m t → word16 → aux_im_type m →
- option (Prod3T (any_status m t) word16 word16)
- with
- [ HC05 ⇒ Freescale_multi_mode_load_auxw HC05
- | HC08 ⇒ Freescale_multi_mode_load_auxw HC08
- | HCS08 ⇒ Freescale_multi_mode_load_auxw HCS08
- | RS08 ⇒ Freescale_multi_mode_load_auxw RS08
- | IP2022 ⇒ IP2022_multi_mode_load_auxw
- ].
-
-(* **************************************** *)
-(* raccordo di tutte le possibili scritture *)
-(* **************************************** *)
-
-ndefinition multi_mode_writeb ≝
-λm.match m
- return λm.Πt.any_status m t → word16 → aux_mod_type → aux_im_type m → byte8 →
- option (ProdT (any_status m t) word16)
- with
- [ HC05 ⇒ Freescale_multi_mode_write_auxb HC05
- | HC08 ⇒ Freescale_multi_mode_write_auxb HC08
- | HCS08 ⇒ Freescale_multi_mode_write_auxb HCS08
- | RS08 ⇒ Freescale_multi_mode_write_auxb RS08
- | IP2022 ⇒ IP2022_multi_mode_write_auxb
- ].
-
-ndefinition multi_mode_writew ≝
-λm.match m
- return λm.Πt.any_status m t → word16 → aux_im_type m → word16 →
- option (ProdT (any_status m t) word16)
- with
- [ HC05 ⇒ Freescale_multi_mode_write_auxw HC05
- | HC08 ⇒ Freescale_multi_mode_write_auxw HC08
- | HCS08 ⇒ Freescale_multi_mode_write_auxw HCS08
- | RS08 ⇒ Freescale_multi_mode_write_auxw RS08
- | IP2022 ⇒ IP2022_multi_mode_write_auxw
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/read_write/read_write.ma".
-
-(* mattoni base *)
-(* - incrementano l'indirizzo normalmente *)
-(* - incrementano PC attraverso il filtro *)
-
-(* lettura byte da addr *)
-ndefinition loadb_from ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
-λaddr:word32.λcur_pc:word16.λfetched:exadecim.
- opt_map … (memory_filter_read … s addr)
- (λb.Some ? (triple … s b (plus_w16_d_d cur_pc (extu2_w16 fetched)))).
-
-(* lettura bit da addr *)
-ndefinition loadbit_from ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
-λaddr:word32.λsub:oct.λcur_pc:word16.λfetched:exadecim.
- opt_map … (memory_filter_read_bit … s addr sub)
- (λb.Some ? (triple … s b (plus_w16_d_d cur_pc (extu2_w16 fetched)))).
-
-(* lettura word da addr *)
-ndefinition loadw_from ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
-λaddr:word32.λcur_pc:word16.λfetched:exadecim.
- opt_map … (memory_filter_read … s addr)
- (λbh.opt_map … (memory_filter_read … s (succ_w32 addr))
- (λbl.Some ? (triple … s 〈bh:bl〉 (plus_w16_d_d cur_pc (extu2_w16 fetched))))).
-
-(* scrittura byte su addr *)
-ndefinition writeb_to ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
-λaddr:word32.λflag:aux_mod_type.λcur_pc:word16.λfetched:exadecim.λwriteb:byte8.
- opt_map … (memory_filter_write … s addr flag writeb)
- (λtmps.Some ? (pair … tmps (plus_w16_d_d cur_pc (extu2_w16 fetched)))).
-
-(* scrittura bit su addr *)
-ndefinition writebit_to ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
-λaddr:word32.λsub:oct.λcur_pc:word16.λfetched:exadecim.λwriteb:bool.
- opt_map … (memory_filter_write_bit … s addr sub writeb)
- (λtmps.Some ? (pair … tmps (plus_w16_d_d cur_pc (extu2_w16 fetched)))).
-
-(* scrittura word su addr *)
-ndefinition writew_to ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
-λaddr:word32.λflag:aux_mod_type.λcur_pc:word16.λfetched:exadecim.λwritew:word16.
- opt_map … (memory_filter_write … s addr auxMode_ok (cnH ? writew))
- (λtmps1.opt_map … (memory_filter_write … tmps1 (succ_w32 addr) auxMode_ok (cnL ? writew))
- (λtmps2.Some ? (pair … tmps2 (plus_w16_d_d cur_pc (extu2_w16 fetched))))).
-
-(* ausiliari per definire i tipi e la lettura/scrittura *)
-
-(* ausiliaria per definire il tipo di aux_load *)
-ndefinition aux_load_typing ≝
-λm:mcu_type.λt:memory_impl.λbyteflag:bool.
- any_status m t → word32 → word16 → exadecim →
- option (Prod3T (any_status m t) match byteflag with [ true ⇒ byte8 | false ⇒ word16 ] word16).
-
-(* per non dover ramificare i vari load in byte/word *)
-ndefinition aux_load ≝
-λm:mcu_type.λt:memory_impl.λbyteflag:bool.match byteflag return aux_load_typing m t with
- [ true ⇒ loadb_from m t | false ⇒ loadw_from m t ].
-
-(* ausiliaria per definire il tipo di aux_write *)
-ndefinition aux_write_typing ≝
-λm:mcu_type.λt:memory_impl.λbyteflag:bool.
- any_status m t → word32 → aux_mod_type → word16 → exadecim →
- match byteflag with [ true ⇒ byte8 | false ⇒ word16 ] →
- option (ProdT (any_status m t) word16).
-
-(* per non dover ramificare i vari load in byte/word *)
-ndefinition aux_write ≝
-λm:mcu_type.λt:memory_impl.λbyteflag:bool.match byteflag return aux_write_typing m t with
- [ true ⇒ writeb_to m t | false ⇒ writew_to m t ].
-
-ndefinition mem_read_s ≝
-λm,t.λs:any_status m t.mem_read t (mem_desc … s) (chk_desc … s).
-
-ndefinition mem_read_bit_s ≝
-λm,t.λs:any_status m t.mem_read_bit t (mem_desc … s) (chk_desc … s).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/read_write/RS08_read_write.ma".
-include "emulator/read_write/IP2022_read_write.ma".
-
-(* in caso di RS08/IP2022 si dirotta sul filtro, altrimenti si legge direttamente *)
-ndefinition memory_filter_read ≝
-λm:mcu_type.λt:memory_impl.match m return λm:mcu_type.any_status m t → word32 → option byte8 with
- [ HC05 ⇒ λs:any_status HC05 t.λaddr:word32.
- mem_read t (mem_desc ? t s) (chk_desc ? t s) addr
- | HC08 ⇒ λs:any_status HC08 t.λaddr:word32.
- mem_read t (mem_desc ? t s) (chk_desc ? t s) addr
- | HCS08 ⇒ λs:any_status HCS08 t.λaddr:word32.
- mem_read t (mem_desc ? t s) (chk_desc ? t s) addr
- | RS08 ⇒ λs:any_status RS08 t.λaddr:word32.
- RS08_memory_filter_read t s addr
- | IP2022 ⇒ λs:any_status IP2022 t.λaddr:word32.
- IP2022_memory_filter_read t s addr
- ].
-
-ndefinition memory_filter_read_bit ≝
-λm:mcu_type.λt:memory_impl.match m return λm:mcu_type.any_status m t → word32 → oct → option bool with
- [ HC05 ⇒ λs:any_status HC05 t.λaddr:word32.λsub:oct.
- mem_read_bit t (mem_desc ? t s) (chk_desc ? t s) addr sub
- | HC08 ⇒ λs:any_status HC08 t.λaddr:word32.λsub:oct.
- mem_read_bit t (mem_desc ? t s) (chk_desc ? t s) addr sub
- | HCS08 ⇒ λs:any_status HCS08 t.λaddr:word32.λsub:oct.
- mem_read_bit t (mem_desc ? t s) (chk_desc ? t s) addr sub
- | RS08 ⇒ λs:any_status RS08 t.λaddr:word32.λsub:oct.
- RS08_memory_filter_read_bit t s addr sub
- | IP2022 ⇒ λs:any_status IP2022 t.λaddr:word32.λsub:oct.
- IP2022_memory_filter_read_bit t s addr sub
- ].
-
-ndefinition memory_filter_write ≝
-λm:mcu_type.λt:memory_impl.match m
- return λm:mcu_type.any_status m t → word32 → aux_mod_type → byte8 → option (any_status m t) with
- [ HC05 ⇒ λs:any_status HC05 t.λaddr:word32.λflag:aux_mod_type.λval:byte8.
- opt_map … (mem_update t (mem_desc ? t s) (chk_desc ? t s) addr val)
- (λmem.Some ? (set_mem_desc ? t s mem))
- | HC08 ⇒ λs:any_status HC08 t.λaddr:word32.λflag:aux_mod_type.λval:byte8.
- opt_map … (mem_update t (mem_desc ? t s) (chk_desc ? t s) addr val)
- (λmem.Some ? (set_mem_desc ? t s mem))
- | HCS08 ⇒ λs:any_status HCS08 t.λaddr:word32.λflag:aux_mod_type.λval:byte8.
- opt_map … (mem_update t (mem_desc ? t s) (chk_desc ? t s) addr val)
- (λmem.Some ? (set_mem_desc ? t s mem))
- | RS08 ⇒ λs:any_status RS08 t.λaddr:word32.λflag:aux_mod_type.λval:byte8.
- RS08_memory_filter_write t s addr val
- | IP2022 ⇒ λs:any_status IP2022 t.λaddr:word32.λflag:aux_mod_type.λval:byte8.
- IP2022_memory_filter_write t s addr flag val
- ].
-
-ndefinition memory_filter_write_bit ≝
-λm:mcu_type.λt:memory_impl.match m
- return λm:mcu_type.any_status m t → word32 → oct → bool → option (any_status m t) with
- [ HC05 ⇒ λs:any_status HC05 t.λaddr:word32.λsub:oct.λval:bool.
- opt_map … (mem_update_bit t (mem_desc ? t s) (chk_desc ? t s) addr sub val)
- (λmem.Some ? (set_mem_desc ? t s mem))
- | HC08 ⇒ λs:any_status HC08 t.λaddr:word32.λsub:oct.λval:bool.
- opt_map … (mem_update_bit t (mem_desc ? t s) (chk_desc ? t s) addr sub val)
- (λmem.Some ? (set_mem_desc ? t s mem))
- | HCS08 ⇒ λs:any_status HCS08 t.λaddr:word32.λsub:oct.λval:bool.
- opt_map … (mem_update_bit t (mem_desc ? t s) (chk_desc ? t s) addr sub val)
- (λmem.Some ? (set_mem_desc ? t s mem))
- | RS08 ⇒ λs:any_status RS08 t.λaddr:word32.λsub:oct.λval:bool.
- RS08_memory_filter_write_bit t s addr sub val
- | IP2022 ⇒ λs:any_status IP2022 t.λaddr:word32.λsub:oct.λval:bool.
- IP2022_memory_filter_write_bit t s addr sub val
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/theory.ma".
-
-(* flag ausiliario per la scrittura
- normale / con riporto(+) / con riporto(-) *)
-ninductive aux_mod_type : Type ≝
- auxMode_ok : aux_mod_type
-| auxMode_inc : aux_mod_type
-| auxMode_dec : aux_mod_type
-.
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/word16.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-(* ALU dell'HC05 *)
-nrecord alu_HC05: Type ≝
- {
- (* A: registo accumulatore *)
- acc_low_reg_HC05 : byte8;
- (* X: registro indice *)
- indX_low_reg_HC05 : byte8;
- (* SP: registo stack pointer *)
- sp_reg_HC05 : word16;
- (* modificatori di SP: per esempio e' definito come 0000000011xxxxxxb *)
- (* la logica della sua costruzione e' quindi (SP∧mask)∨fix *)
- (* totalmente racchiusa nella ALU, bastera' fare get(set(SP)) *)
- sp_mask_HC05 : word16;
- sp_fix_HC05 : word16;
- (* PC: registro program counter *)
- pc_reg_HC05 : word16;
- (* modificatore di PC: per esempio e' definito come 00xxxxxxxxxxxxxxb *)
- (* la logica della sua costruzione e' quindi (PC∧mask) *)
- (* totalmente racchiusa nella ALU, bastera' fare get(set(PC)) *)
- pc_mask_HC05 : word16;
-
- (* H: flag semi-carry (somma nibble basso) *)
- h_flag_HC05 : bool;
- (* I: flag mascheramento degli interrupt mascherabili: 1=mascherati *)
- i_flag_HC05 : bool;
- (* N: flag segno/negativita' *)
- n_flag_HC05 : bool;
- (* Z: flag zero *)
- z_flag_HC05 : bool;
- (* C: flag carry *)
- c_flag_HC05 : bool;
-
- (* IRQ: flag che simula il pin esterno IRQ *)
- irq_flag_HC05 : bool
- }.
-
-notation "{hvbox('A_Reg' ≝ acclow ; break 'X_Reg' ≝ indxlow ; break 'Sp_Reg' ≝ sp ; break 'Sp_Mask' ≝ spm ; break 'Sp_Fix' ≝ spf ; break 'Pc_Reg' ≝ pc ; break 'Pc_Mask' ≝ pcm ; break 'H_Flag' ≝ hfl ; break 'I_Flag' ≝ ifl ; break 'N_Flag' ≝ nfl ; break 'Z_Flag' ≝ zfl ; break 'C_Flag' ≝ cfl ; break 'IRQ_Flag' ≝ irqfl)}"
- non associative with precedence 80 for
- @{ 'mk_alu_HC05 $acclow $indxlow $sp $spm $spf $pc $pcm $hfl $ifl $nfl $zfl $cfl $irqfl }.
-interpretation "mk_alu_HC05" 'mk_alu_HC05 acclow indxlow sp spm spf pc pcm hfl ifl nfl zfl cfl irqfl =
- (mk_alu_HC05 acclow indxlow sp spm spf pc pcm hfl ifl nfl zfl cfl irqfl).
-
-(* ****** *)
-(* SETTER *)
-(* ****** *)
-
-(* setter specifico HC05 di A *)
-ndefinition set_acc_8_low_reg_HC05 ≝
-λalu.λacclow':byte8.
- mk_alu_HC05
- acclow'
- (indX_low_reg_HC05 alu)
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- (i_flag_HC05 alu)
- (n_flag_HC05 alu)
- (z_flag_HC05 alu)
- (c_flag_HC05 alu)
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di X *)
-ndefinition set_indX_8_low_reg_HC05 ≝
-λalu.λindxlow':byte8.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- indxlow'
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- (i_flag_HC05 alu)
- (n_flag_HC05 alu)
- (z_flag_HC05 alu)
- (c_flag_HC05 alu)
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di SP, effettua (SP∧mask)∨fix *)
-ndefinition set_sp_reg_HC05 ≝
-λalu.λsp':word16.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- (indX_low_reg_HC05 alu)
- (or_w16 (and_w16 sp' (sp_mask_HC05 alu)) (sp_fix_HC05 alu))
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- (i_flag_HC05 alu)
- (n_flag_HC05 alu)
- (z_flag_HC05 alu)
- (c_flag_HC05 alu)
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di PC, effettua PC∧mask *)
-ndefinition set_pc_reg_HC05 ≝
-λalu.λpc':word16.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- (indX_low_reg_HC05 alu)
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (and_w16 pc' (pc_mask_HC05 alu))
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- (i_flag_HC05 alu)
- (n_flag_HC05 alu)
- (z_flag_HC05 alu)
- (c_flag_HC05 alu)
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di H *)
-ndefinition set_h_flag_HC05 ≝
-λalu.λhfl':bool.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- (indX_low_reg_HC05 alu)
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- hfl'
- (i_flag_HC05 alu)
- (n_flag_HC05 alu)
- (z_flag_HC05 alu)
- (c_flag_HC05 alu)
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di I *)
-ndefinition set_i_flag_HC05 ≝
-λalu.λifl':bool.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- (indX_low_reg_HC05 alu)
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- ifl'
- (n_flag_HC05 alu)
- (z_flag_HC05 alu)
- (c_flag_HC05 alu)
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di N *)
-ndefinition set_n_flag_HC05 ≝
-λalu.λnfl':bool.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- (indX_low_reg_HC05 alu)
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- (i_flag_HC05 alu)
- nfl'
- (z_flag_HC05 alu)
- (c_flag_HC05 alu)
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di Z *)
-ndefinition set_z_flag_HC05 ≝
-λalu.λzfl':bool.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- (indX_low_reg_HC05 alu)
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- (i_flag_HC05 alu)
- (n_flag_HC05 alu)
- zfl'
- (c_flag_HC05 alu)
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di C *)
-ndefinition set_c_flag_HC05 ≝
-λalu.λcfl':bool.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- (indX_low_reg_HC05 alu)
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- (i_flag_HC05 alu)
- (n_flag_HC05 alu)
- (z_flag_HC05 alu)
- cfl'
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di IRQ *)
-ndefinition set_irq_flag_HC05 ≝
-λalu.λirqfl':bool.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- (indX_low_reg_HC05 alu)
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- (i_flag_HC05 alu)
- (n_flag_HC05 alu)
- (z_flag_HC05 alu)
- (c_flag_HC05 alu)
- irqfl'.
-
-(* ***************** *)
-(* CONFRONTO FRA ALU *)
-(* ***************** *)
-
-(* confronto registro per registro dell'HC05 *)
-ndefinition eq_HC05_alu ≝
-λalu1,alu2:alu_HC05.
- (eq_b8 (acc_low_reg_HC05 alu1) (acc_low_reg_HC05 alu2)) ⊗
- (eq_b8 (indX_low_reg_HC05 alu1) (indX_low_reg_HC05 alu2)) ⊗
- (eq_w16 (sp_reg_HC05 alu1) (sp_reg_HC05 alu2)) ⊗
- (eq_w16 (sp_mask_HC05 alu1) (sp_mask_HC05 alu2)) ⊗
- (eq_w16 (sp_fix_HC05 alu1) (sp_fix_HC05 alu2)) ⊗
- (eq_w16 (pc_reg_HC05 alu1) (pc_reg_HC05 alu2)) ⊗
- (eq_w16 (pc_mask_HC05 alu1) (pc_mask_HC05 alu2)) ⊗
- (eq_bool (h_flag_HC05 alu1) (h_flag_HC05 alu2)) ⊗
- (eq_bool (i_flag_HC05 alu1) (i_flag_HC05 alu2)) ⊗
- (eq_bool (n_flag_HC05 alu1) (n_flag_HC05 alu2)) ⊗
- (eq_bool (z_flag_HC05 alu1) (z_flag_HC05 alu2)) ⊗
- (eq_bool (c_flag_HC05 alu1) (c_flag_HC05 alu2)) ⊗
- (eq_bool (irq_flag_HC05 alu1) (irq_flag_HC05 alu2)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/word16_lemmas.ma".
-include "emulator/status/HC05_status.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-nlemma aluHC05_destruct_1 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x1 = y1.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 a _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_2 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x2 = y2.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ a _ _ _ _ _ _ _ _ _ _ _ ⇒ x2 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_3 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x3 = y3.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ a _ _ _ _ _ _ _ _ _ _ ⇒ x3 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_4 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x4 = y4.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ a _ _ _ _ _ _ _ _ _ ⇒ x4 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_5 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x5 = y5.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ a _ _ _ _ _ _ _ _ ⇒ x5 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_6 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x6 = y6.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ _ a _ _ _ _ _ _ _ ⇒ x6 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_7 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x7 = y7.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ _ _ a _ _ _ _ _ _ ⇒ x7 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_8 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x8 = y8.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ _ _ _ a _ _ _ _ _ ⇒ x8 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_9 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x9 = y9.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ _ _ _ _ a _ _ _ _ ⇒ x9 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_10 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x10 = y10.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ _ _ _ _ _ a _ _ _ ⇒ x10 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_11 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x11 = y11.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ _ _ _ _ _ _ a _ _ ⇒ x11 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_12 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x12 = y12.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ _ _ _ _ _ _ _ a _ ⇒ x12 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_13 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x13 = y13.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ _ _ _ _ _ _ _ _ a ⇒ x13 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_eqaluHC05 : symmetricT alu_HC05 bool eq_HC05_alu.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13;
- nchange with (
- ((eq_b8 x1 y1) ⊗ (eq_b8 x2 y2) ⊗ (eq_w16 x3 y3) ⊗ (eq_w16 x4 y4) ⊗
- (eq_w16 x5 y5) ⊗ (eq_w16 x6 y6) ⊗ (eq_w16 x7 y7) ⊗ (eq_bool x8 y8) ⊗
- (eq_bool x9 y9) ⊗ (eq_bool x10 y10) ⊗ (eq_bool x11 y11) ⊗ (eq_bool x12 y12) ⊗
- (eq_bool x13 y13)) = ((eq_b8 y1 x1) ⊗ (eq_b8 y2 x2) ⊗ (eq_w16 y3 x3) ⊗
- (eq_w16 y4 x4) ⊗ (eq_w16 y5 x5) ⊗ (eq_w16 y6 x6) ⊗ (eq_w16 y7 x7) ⊗
- (eq_bool y8 x8) ⊗ (eq_bool y9 x9) ⊗ (eq_bool y10 x10) ⊗ (eq_bool y11 x11) ⊗
- (eq_bool y12 x12) ⊗ (eq_bool y13 x13)));
- nrewrite > (symmetric_eqb8 x1 y1);
- nrewrite > (symmetric_eqb8 x2 y2);
- nrewrite > (symmetric_eqw16 x3 y3);
- nrewrite > (symmetric_eqw16 x4 y4);
- nrewrite > (symmetric_eqw16 x5 y5);
- nrewrite > (symmetric_eqw16 x6 y6);
- nrewrite > (symmetric_eqw16 x7 y7);
- nrewrite > (symmetric_eqbool x8 y8);
- nrewrite > (symmetric_eqbool x9 y9);
- nrewrite > (symmetric_eqbool x10 y10);
- nrewrite > (symmetric_eqbool x11 y11);
- nrewrite > (symmetric_eqbool x12 y12);
- nrewrite > (symmetric_eqbool x13 y13);
- napply refl_eq.
-nqed.
-
-nlemma eqaluHC05_to_eq : ∀alu1,alu2.eq_HC05_alu alu1 alu2 = true → alu1 = alu2.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange in H:(%) with (
- ((eq_b8 x1 y1) ⊗ (eq_b8 x2 y2) ⊗
- (eq_w16 x3 y3) ⊗ (eq_w16 x4 y4) ⊗
- (eq_w16 x5 y5) ⊗ (eq_w16 x6 y6) ⊗
- (eq_w16 x7 y7) ⊗ (eq_bool x8 y8) ⊗
- (eq_bool x9 y9) ⊗ (eq_bool x10 y10) ⊗
- (eq_bool x11 y11) ⊗ (eq_bool x12 y12) ⊗
- (eq_bool x13 y13)) = true);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H));
- nletin H1 ≝ (andb_true_true_l … H);
- nrewrite > (eqbool_to_eq x12 y12 (andb_true_true_r … (andb_true_true_l … H)));
- nletin H2 ≝ (andb_true_true_l … H1);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H2));
- nletin H3 ≝ (andb_true_true_l … H2);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H3));
- nletin H4 ≝ (andb_true_true_l … H3);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H4));
- nletin H5 ≝ (andb_true_true_l … H4);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H5));
- nletin H6 ≝ (andb_true_true_l … H5);
- nrewrite > (eqw16_to_eq … (andb_true_true_r … H6));
- nletin H7 ≝ (andb_true_true_l … H6);
- nrewrite > (eqw16_to_eq … (andb_true_true_r … H7));
- nletin H8 ≝ (andb_true_true_l … H7);
- nrewrite > (eqw16_to_eq … (andb_true_true_r … H8));
- nletin H9 ≝ (andb_true_true_l … H8);
- nrewrite > (eqw16_to_eq … (andb_true_true_r … H9));
- nletin H10 ≝ (andb_true_true_l … H9);
- nrewrite > (eqw16_to_eq … (andb_true_true_r … H10));
- nletin H11 ≝ (andb_true_true_l … H10);
- nrewrite > (eqb8_to_eq … (andb_true_true_r … H11));
- nrewrite > (eqb8_to_eq … (andb_true_true_l … H11));
- napply refl_eq.
-nqed.
-
-nlemma eq_to_eqaluHC05 : ∀alu1,alu2.alu1 = alu2 → eq_HC05_alu alu1 alu2 = true.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nrewrite > (aluHC05_destruct_1 … H);
- nrewrite > (aluHC05_destruct_2 … H);
- nrewrite > (aluHC05_destruct_3 … H);
- nrewrite > (aluHC05_destruct_4 … H);
- nrewrite > (aluHC05_destruct_5 … H);
- nrewrite > (aluHC05_destruct_6 … H);
- nrewrite > (aluHC05_destruct_7 … H);
- nrewrite > (aluHC05_destruct_8 … H);
- nrewrite > (aluHC05_destruct_9 … H);
- nrewrite > (aluHC05_destruct_10 … H);
- nrewrite > (aluHC05_destruct_11 … H);
- nrewrite > (aluHC05_destruct_12 … H);
- nrewrite > (aluHC05_destruct_13 … H);
- nchange with (
- ((eq_b8 y1 y1) ⊗ (eq_b8 y2 y2) ⊗
- (eq_w16 y3 y3) ⊗ (eq_w16 y4 y4) ⊗
- (eq_w16 y5 y5) ⊗ (eq_w16 y6 y6) ⊗
- (eq_w16 y7 y7) ⊗ (eq_bool y8 y8) ⊗
- (eq_bool y9 y9) ⊗ (eq_bool y10 y10) ⊗
- (eq_bool y11 y11) ⊗ (eq_bool y12 y12) ⊗
- (eq_bool y13 y13)) = true);
- nrewrite > (eq_to_eqb8 y1 y1 (refl_eq …));
- nrewrite > (eq_to_eqb8 y2 y2 (refl_eq …));
- nrewrite > (eq_to_eqw16 y3 y3 (refl_eq …));
- nrewrite > (eq_to_eqw16 y4 y4 (refl_eq …));
- nrewrite > (eq_to_eqw16 y5 y5 (refl_eq …));
- nrewrite > (eq_to_eqw16 y6 y6 (refl_eq …));
- nrewrite > (eq_to_eqw16 y7 y7 (refl_eq …));
- nrewrite > (eq_to_eqbool y8 y8 (refl_eq …));
- nrewrite > (eq_to_eqbool y9 y9 (refl_eq …));
- nrewrite > (eq_to_eqbool y10 y10 (refl_eq …));
- nrewrite > (eq_to_eqbool y11 y11 (refl_eq …));
- nrewrite > (eq_to_eqbool y12 y12 (refl_eq …));
- nrewrite > (eq_to_eqbool y13 y13 (refl_eq …));
- napply refl_eq.
-nqed.
-
-nlemma decidable_aluHC05_aux1
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- (x1 ≠ y1) →
- (mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13) ≠
- (mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13;
- nnormalize; #H; #H1;
- napply (H (aluHC05_destruct_1 … H1)).
-nqed.
-
-nlemma decidable_aluHC05_aux2
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- (x2 ≠ y2) →
- (mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13) ≠
- (mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13;
- nnormalize; #H; #H1;
- napply (H (aluHC05_destruct_2 … H1)).
-nqed.
-
-nlemma decidable_aluHC05_aux3
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- (x3 ≠ y3) →
- (mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13) ≠
- (mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13;
- nnormalize; #H; #H1;
- napply (H (aluHC05_destruct_3 … H1)).
-nqed.
-
-nlemma decidable_aluHC05_aux4
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- (x4 ≠ y4) →
- (mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13) ≠
- (mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13;
- nnormalize; #H; #H1;
- napply (H (aluHC05_destruct_4 … H1)).
-nqed.
-
-nlemma decidable_aluHC05_aux5
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- (x5 ≠ y5) →
- (mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13) ≠
- (mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13;
- nnormalize; #H; #H1;
- napply (H (aluHC05_destruct_5 … H1)).
-nqed.
-
-nlemma decidable_aluHC05_aux6
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- (x6 ≠ y6) →
- (mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13) ≠
- (mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13;
- nnormalize; #H; #H1;
- napply (H (aluHC05_destruct_6 … H1)).
-nqed.
-
-nlemma decidable_aluHC05_aux7
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- (x7 ≠ y7) →
- (mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13) ≠
- (mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13;
- nnormalize; #H; #H1;
- napply (H (aluHC05_destruct_7 … H1)).
-nqed.
-
-nlemma decidable_aluHC05_aux8
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- (x8 ≠ y8) →
- (mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13) ≠
- (mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13;
- nnormalize; #H; #H1;
- napply (H (aluHC05_destruct_8 … H1)).
-nqed.
-
-nlemma decidable_aluHC05_aux9
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- (x9 ≠ y9) →
- (mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13) ≠
- (mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13;
- nnormalize; #H; #H1;
- napply (H (aluHC05_destruct_9 … H1)).
-nqed.
-
-nlemma decidable_aluHC05_aux10
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- (x10 ≠ y10) →
- (mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13) ≠
- (mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13;
- nnormalize; #H; #H1;
- napply (H (aluHC05_destruct_10 … H1)).
-nqed.
-
-nlemma decidable_aluHC05_aux11
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- (x11 ≠ y11) →
- (mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13) ≠
- (mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13;
- nnormalize; #H; #H1;
- napply (H (aluHC05_destruct_11 … H1)).
-nqed.
-
-nlemma decidable_aluHC05_aux12
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- (x12 ≠ y12) →
- (mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13) ≠
- (mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13;
- nnormalize; #H; #H1;
- napply (H (aluHC05_destruct_12 … H1)).
-nqed.
-
-nlemma decidable_aluHC05_aux13
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- (x13 ≠ y13) →
- (mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13) ≠
- (mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13;
- nnormalize; #H; #H1;
- napply (H (aluHC05_destruct_13 … H1)).
-nqed.
-
-nlemma decidable_aluHC05 : ∀x,y:alu_HC05.decidable (x = y).
- #x; nelim x; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y; nelim y; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13;
- nnormalize;
- napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_b8 x1 y1) …);
- ##[ ##2: #H; napply (or2_intro2 … (decidable_aluHC05_aux1 … H))
- ##| ##1: #H; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_b8 x2 y2) …);
- ##[ ##2: #H1; napply (or2_intro2 … (decidable_aluHC05_aux2 … H1))
- ##| ##1: #H1; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_w16 x3 y3) …);
- ##[ ##2: #H2; napply (or2_intro2 … (decidable_aluHC05_aux3 … H2))
- ##| ##1: #H2; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_w16 x4 y4) …);
- ##[ ##2: #H3; napply (or2_intro2 … (decidable_aluHC05_aux4 … H3))
- ##| ##1: #H3; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_w16 x5 y5) …);
- ##[ ##2: #H4; napply (or2_intro2 … (decidable_aluHC05_aux5 … H4))
- ##| ##1: #H4; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_w16 x6 y6) …);
- ##[ ##2: #H5; napply (or2_intro2 … (decidable_aluHC05_aux6 … H5))
- ##| ##1: #H5; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_w16 x7 y7) …);
- ##[ ##2: #H6; napply (or2_intro2 … (decidable_aluHC05_aux7 … H6))
- ##| ##1: #H6; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x8 y8) …);
- ##[ ##2: #H7; napply (or2_intro2 … (decidable_aluHC05_aux8 … H7))
- ##| ##1: #H7; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x9 y9) …);
- ##[ ##2: #H8; napply (or2_intro2 … (decidable_aluHC05_aux9 … H8))
- ##| ##1: #H8; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x10 y10) …);
- ##[ ##2: #H9; napply (or2_intro2 … (decidable_aluHC05_aux10 … H9))
- ##| ##1: #H9; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x11 y11) …);
- ##[ ##2: #H10; napply (or2_intro2 … (decidable_aluHC05_aux11 … H10))
- ##| ##1: #H10; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x12 y12) …);
- ##[ ##2: #H11; napply (or2_intro2 … (decidable_aluHC05_aux12 … H11))
- ##| ##1: #H11; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x13 y13) …);
- ##[ ##2: #H12; napply (or2_intro2 … (decidable_aluHC05_aux13 … H12))
- ##| ##1: #H12; nrewrite > H; nrewrite > H1; nrewrite > H2; nrewrite > H3;
- nrewrite > H4; nrewrite > H5; nrewrite > H6; nrewrite > H7;
- nrewrite > H8; nrewrite > H9; nrewrite > H10; nrewrite > H11;
- nrewrite > H12; napply (or2_intro1 (? = ?) (? ≠ ?) (refl_eq …))
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/word16.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-(* ALU dell'HC08/HCS08 *)
-nrecord alu_HC08: Type ≝
- {
- (* A: registo accumulatore *)
- acc_low_reg_HC08 : byte8;
- (* X: registro indice parte bassa *)
- indX_low_reg_HC08 : byte8;
- (* H: registro indice parte alta *)
- indX_high_reg_HC08 : byte8;
- (* SP: registo stack pointer *)
- sp_reg_HC08 : word16;
- (* PC: registro program counter *)
- pc_reg_HC08 : word16;
-
- (* V: flag overflow *)
- v_flag_HC08 : bool;
- (* H: flag semi-carry (somma nibble basso) *)
- h_flag_HC08 : bool;
- (* I: flag mascheramento degli interrupt mascherabili: 1=mascherati *)
- i_flag_HC08 : bool;
- (* N: flag segno/negativita' *)
- n_flag_HC08 : bool;
- (* Z: flag zero *)
- z_flag_HC08 : bool;
- (* C: flag carry *)
- c_flag_HC08 : bool;
-
- (* IRQ: flag che simula il pin esterno IRQ *)
- irq_flag_HC08 : bool
- }.
-
-notation "{hvbox('A_Reg' ≝ acclow ; break 'X_Reg' ≝ indxlow ; break 'H_Reg' ≝ indxhigh ; break 'Sp_Reg' ≝ sp ; break 'Pc_Reg' ≝ pc ; break 'V_Flag' ≝ vfl ; break 'H_Flag' ≝ hfl ; break 'I_Flag' ≝ ifl ; break 'N_Flag' ≝ nfl ; break 'Z_Flag' ≝ zfl ; break 'C_Flag' ≝ cfl ; break 'IRQ_Flag' ≝ irqfl)}"
- non associative with precedence 80 for
- @{ 'mk_alu_HC08 $acclow $indxlow $indxhigh $sp $pc $vfl $hfl $ifl $nfl $zfl $cfl $irqfl }.
-interpretation "mk_alu_HC08" 'mk_alu_HC08 acclow indxlow indxhigh sp pc vfl hfl ifl nfl zfl cfl irqfl =
- (mk_alu_HC08 acclow indxlow indxhigh sp pc vfl hfl ifl nfl zfl cfl irqfl).
-
-(* ****** *)
-(* SETTER *)
-(* ****** *)
-
-(* setter specifico HC08/HCS08 di A *)
-ndefinition set_acc_8_low_reg_HC08 ≝
-λalu.λacclow':byte8.
- mk_alu_HC08
- acclow'
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di X *)
-ndefinition set_indX_8_low_reg_HC08 ≝
-λalu.λindxlow':byte8.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- indxlow'
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di H *)
-ndefinition set_indX_8_high_reg_HC08 ≝
-λalu.λindxhigh':byte8.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- indxhigh'
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di H:X *)
-ndefinition set_indX_16_reg_HC08 ≝
-λalu.λindx16:word16.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (cnL ? indx16)
- (cnH ? indx16)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di SP *)
-ndefinition set_sp_reg_HC08 ≝
-λalu.λsp':word16.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- sp'
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di PC *)
-ndefinition set_pc_reg_HC08 ≝
-λalu.λpc':word16.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- pc'
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di V *)
-ndefinition set_v_flag_HC08 ≝
-λalu.λvfl':bool.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- vfl'
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di H *)
-ndefinition set_h_flag_HC08 ≝
-λalu.λhfl':bool.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- hfl'
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di I *)
-ndefinition set_i_flag_HC08 ≝
-λalu.λifl':bool.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- ifl'
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di N *)
-ndefinition set_n_flag_HC08 ≝
-λalu.λnfl':bool.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- nfl'
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di Z *)
-ndefinition set_z_flag_HC08 ≝
-λalu.λzfl':bool.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- zfl'
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di C *)
-ndefinition set_c_flag_HC08 ≝
-λalu.λcfl':bool.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- cfl'
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di IRQ *)
-ndefinition set_irq_flag_HC08 ≝
-λalu.λirqfl':bool.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- irqfl'.
-
-(* ***************** *)
-(* CONFRONTO FRA ALU *)
-(* ***************** *)
-
-(* confronto registro per registro dell'HC08 *)
-ndefinition eq_HC08_alu ≝
-λalu1,alu2:alu_HC08.
- (eq_b8 (acc_low_reg_HC08 alu1) (acc_low_reg_HC08 alu2)) ⊗
- (eq_b8 (indX_low_reg_HC08 alu1) (indX_low_reg_HC08 alu2)) ⊗
- (eq_b8 (indX_high_reg_HC08 alu1) (indX_high_reg_HC08 alu2)) ⊗
- (eq_w16 (sp_reg_HC08 alu1) (sp_reg_HC08 alu2)) ⊗
- (eq_w16 (pc_reg_HC08 alu1) (pc_reg_HC08 alu2)) ⊗
- (eq_bool (v_flag_HC08 alu1) (v_flag_HC08 alu2)) ⊗
- (eq_bool (h_flag_HC08 alu1) (h_flag_HC08 alu2)) ⊗
- (eq_bool (i_flag_HC08 alu1) (i_flag_HC08 alu2)) ⊗
- (eq_bool (n_flag_HC08 alu1) (n_flag_HC08 alu2)) ⊗
- (eq_bool (z_flag_HC08 alu1) (z_flag_HC08 alu2)) ⊗
- (eq_bool (c_flag_HC08 alu1) (c_flag_HC08 alu2)) ⊗
- (eq_bool (irq_flag_HC08 alu1) (irq_flag_HC08 alu2)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/word16_lemmas.ma".
-include "emulator/status/HC08_status.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-nlemma aluHC08_destruct_1 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x1 = y1.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 a _ _ _ _ _ _ _ _ _ _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_2 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x2 = y2.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ a _ _ _ _ _ _ _ _ _ _ ⇒ x2 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_3 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x3 = y3.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ a _ _ _ _ _ _ _ _ _ ⇒ x3 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_4 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x4 = y4.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ a _ _ _ _ _ _ _ _ ⇒ x4 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_5 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x5 = y5.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ _ a _ _ _ _ _ _ _ ⇒ x5 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_6 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x6 = y6.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ _ _ a _ _ _ _ _ _ ⇒ x6 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_7 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x7 = y7.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ _ _ _ a _ _ _ _ _ ⇒ x7 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_8 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x8 = y8.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ _ _ _ _ a _ _ _ _ ⇒ x8 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_9 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x9 = y9.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ _ _ _ _ _ a _ _ _ ⇒ x9 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_10 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x10 = y10.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ _ _ _ _ _ _ a _ _ ⇒ x10 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_11 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x11 = y11.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ _ _ _ _ _ _ _ a _ ⇒ x11 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_12 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x12 = y12.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ _ _ _ _ _ _ _ _ a ⇒ x12 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_eqaluHC08 : symmetricT alu_HC08 bool eq_HC08_alu.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12;
- nchange with (
- ((eq_b8 x1 y1) ⊗ (eq_b8 x2 y2) ⊗ (eq_b8 x3 y3) ⊗ (eq_w16 x4 y4) ⊗
- (eq_w16 x5 y5) ⊗ (eq_bool x6 y6) ⊗ (eq_bool x7 y7) ⊗ (eq_bool x8 y8) ⊗
- (eq_bool x9 y9) ⊗ (eq_bool x10 y10) ⊗ (eq_bool x11 y11) ⊗ (eq_bool x12 y12)) =
- ((eq_b8 y1 x1) ⊗ (eq_b8 y2 x2) ⊗ (eq_b8 y3 x3) ⊗ (eq_w16 y4 x4) ⊗
- (eq_w16 y5 x5) ⊗ (eq_bool y6 x6) ⊗ (eq_bool y7 x7) ⊗ (eq_bool y8 x8) ⊗
- (eq_bool y9 x9) ⊗ (eq_bool y10 x10) ⊗ (eq_bool y11 x11) ⊗ (eq_bool y12 x12)));
- nrewrite > (symmetric_eqb8 x1 y1);
- nrewrite > (symmetric_eqb8 x2 y2);
- nrewrite > (symmetric_eqb8 x3 y3);
- nrewrite > (symmetric_eqw16 x4 y4);
- nrewrite > (symmetric_eqw16 x5 y5);
- nrewrite > (symmetric_eqbool x6 y6);
- nrewrite > (symmetric_eqbool x7 y7);
- nrewrite > (symmetric_eqbool x8 y8);
- nrewrite > (symmetric_eqbool x9 y9);
- nrewrite > (symmetric_eqbool x10 y10);
- nrewrite > (symmetric_eqbool x11 y11);
- nrewrite > (symmetric_eqbool x12 y12);
- napply refl_eq.
-nqed.
-
-nlemma eqaluHC08_to_eq : ∀alu1,alu2.eq_HC08_alu alu1 alu2 = true → alu1 = alu2.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange in H:(%) with (
- ((eq_b8 x1 y1) ⊗ (eq_b8 x2 y2) ⊗ (eq_b8 x3 y3) ⊗ (eq_w16 x4 y4) ⊗
- (eq_w16 x5 y5) ⊗ (eq_bool x6 y6) ⊗ (eq_bool x7 y7) ⊗ (eq_bool x8 y8) ⊗
- (eq_bool x9 y9) ⊗ (eq_bool x10 y10) ⊗ (eq_bool x11 y11) ⊗ (eq_bool x12 y12)) = true);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H));
- nletin H1 ≝ (andb_true_true_l … H);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H1));
- nletin H2 ≝ (andb_true_true_l … H1);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H2));
- nletin H3 ≝ (andb_true_true_l … H2);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H3));
- nletin H4 ≝ (andb_true_true_l … H3);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H4));
- nletin H5 ≝ (andb_true_true_l … H4);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H5));
- nletin H6 ≝ (andb_true_true_l … H5);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H6));
- nletin H7 ≝ (andb_true_true_l … H6);
- nrewrite > (eqw16_to_eq … (andb_true_true_r … H7));
- nletin H8 ≝ (andb_true_true_l … H7);
- nrewrite > (eqw16_to_eq … (andb_true_true_r … H8));
- nletin H9 ≝ (andb_true_true_l … H8);
- nrewrite > (eqb8_to_eq … (andb_true_true_r … H9));
- nletin H10 ≝ (andb_true_true_l … H9);
- nrewrite > (eqb8_to_eq … (andb_true_true_r … H10));
- nrewrite > (eqb8_to_eq … (andb_true_true_l … H10));
- napply refl_eq.
-nqed.
-
-nlemma eq_to_eqaluHC08 : ∀alu1,alu2.alu1 = alu2 → eq_HC08_alu alu1 alu2 = true.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nrewrite > (aluHC08_destruct_1 … H);
- nrewrite > (aluHC08_destruct_2 … H);
- nrewrite > (aluHC08_destruct_3 … H);
- nrewrite > (aluHC08_destruct_4 … H);
- nrewrite > (aluHC08_destruct_5 … H);
- nrewrite > (aluHC08_destruct_6 … H);
- nrewrite > (aluHC08_destruct_7 … H);
- nrewrite > (aluHC08_destruct_8 … H);
- nrewrite > (aluHC08_destruct_9 … H);
- nrewrite > (aluHC08_destruct_10 … H);
- nrewrite > (aluHC08_destruct_11 … H);
- nrewrite > (aluHC08_destruct_12 … H);
- nchange with (
- ((eq_b8 y1 y1) ⊗ (eq_b8 y2 y2) ⊗ (eq_b8 y3 y3) ⊗ (eq_w16 y4 y4) ⊗
- (eq_w16 y5 y5) ⊗ (eq_bool y6 y6) ⊗ (eq_bool y7 y7) ⊗ (eq_bool y8 y8) ⊗
- (eq_bool y9 y9) ⊗ (eq_bool y10 y10) ⊗ (eq_bool y11 y11) ⊗ (eq_bool y12 y12)) = true);
- nrewrite > (eq_to_eqb8 y1 y1 (refl_eq …));
- nrewrite > (eq_to_eqb8 y2 y2 (refl_eq …));
- nrewrite > (eq_to_eqb8 y3 y3 (refl_eq …));
- nrewrite > (eq_to_eqw16 y4 y4 (refl_eq …));
- nrewrite > (eq_to_eqw16 y5 y5 (refl_eq …));
- nrewrite > (eq_to_eqbool y6 y6 (refl_eq …));
- nrewrite > (eq_to_eqbool y7 y7 (refl_eq …));
- nrewrite > (eq_to_eqbool y8 y8 (refl_eq …));
- nrewrite > (eq_to_eqbool y9 y9 (refl_eq …));
- nrewrite > (eq_to_eqbool y10 y10 (refl_eq …));
- nrewrite > (eq_to_eqbool y11 y11 (refl_eq …));
- nrewrite > (eq_to_eqbool y12 y12 (refl_eq …));
- napply refl_eq.
-nqed.
-
-nlemma decidable_aluHC08_aux1
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- (x1 ≠ y1) →
- (mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12) ≠
- (mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12;
- nnormalize; #H; #H1;
- napply (H (aluHC08_destruct_1 … H1)).
-nqed.
-
-nlemma decidable_aluHC08_aux2
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- (x2 ≠ y2) →
- (mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12) ≠
- (mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12;
- nnormalize; #H; #H1;
- napply (H (aluHC08_destruct_2 … H1)).
-nqed.
-
-nlemma decidable_aluHC08_aux3
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- (x3 ≠ y3) →
- (mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12) ≠
- (mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12;
- nnormalize; #H; #H1;
- napply (H (aluHC08_destruct_3 … H1)).
-nqed.
-
-nlemma decidable_aluHC08_aux4
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- (x4 ≠ y4) →
- (mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12) ≠
- (mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12;
- nnormalize; #H; #H1;
- napply (H (aluHC08_destruct_4 … H1)).
-nqed.
-
-nlemma decidable_aluHC08_aux5
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- (x5 ≠ y5) →
- (mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12) ≠
- (mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12;
- nnormalize; #H; #H1;
- napply (H (aluHC08_destruct_5 … H1)).
-nqed.
-
-nlemma decidable_aluHC08_aux6
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- (x6 ≠ y6) →
- (mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12) ≠
- (mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12;
- nnormalize; #H; #H1;
- napply (H (aluHC08_destruct_6 … H1)).
-nqed.
-
-nlemma decidable_aluHC08_aux7
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- (x7 ≠ y7) →
- (mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12) ≠
- (mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12;
- nnormalize; #H; #H1;
- napply (H (aluHC08_destruct_7 … H1)).
-nqed.
-
-nlemma decidable_aluHC08_aux8
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- (x8 ≠ y8) →
- (mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12) ≠
- (mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12;
- nnormalize; #H; #H1;
- napply (H (aluHC08_destruct_8 … H1)).
-nqed.
-
-nlemma decidable_aluHC08_aux9
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- (x9 ≠ y9) →
- (mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12) ≠
- (mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12;
- nnormalize; #H; #H1;
- napply (H (aluHC08_destruct_9 … H1)).
-nqed.
-
-nlemma decidable_aluHC08_aux10
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- (x10 ≠ y10) →
- (mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12) ≠
- (mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12;
- nnormalize; #H; #H1;
- napply (H (aluHC08_destruct_10 … H1)).
-nqed.
-
-nlemma decidable_aluHC08_aux11
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- (x11 ≠ y11) →
- (mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12) ≠
- (mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12;
- nnormalize; #H; #H1;
- napply (H (aluHC08_destruct_11 … H1)).
-nqed.
-
-nlemma decidable_aluHC08_aux12
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- (x12 ≠ y12) →
- (mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12) ≠
- (mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12;
- nnormalize; #H; #H1;
- napply (H (aluHC08_destruct_12 … H1)).
-nqed.
-
-nlemma decidable_aluHC08 : ∀x,y:alu_HC08.decidable (x = y).
- #x; nelim x; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y; nelim y; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12;
- nnormalize;
- napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_b8 x1 y1) …);
- ##[ ##2: #H; napply (or2_intro2 … (decidable_aluHC08_aux1 … H))
- ##| ##1: #H; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_b8 x2 y2) …);
- ##[ ##2: #H1; napply (or2_intro2 … (decidable_aluHC08_aux2 … H1))
- ##| ##1: #H1; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_b8 x3 y3) …);
- ##[ ##2: #H2; napply (or2_intro2 … (decidable_aluHC08_aux3 … H2))
- ##| ##1: #H2; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_w16 x4 y4) …);
- ##[ ##2: #H3; napply (or2_intro2 … (decidable_aluHC08_aux4 … H3))
- ##| ##1: #H3; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_w16 x5 y5) …);
- ##[ ##2: #H4; napply (or2_intro2 … (decidable_aluHC08_aux5 … H4))
- ##| ##1: #H4; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x6 y6) …);
- ##[ ##2: #H5; napply (or2_intro2 … (decidable_aluHC08_aux6 … H5))
- ##| ##1: #H5; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x7 y7) …);
- ##[ ##2: #H6; napply (or2_intro2 … (decidable_aluHC08_aux7 … H6))
- ##| ##1: #H6; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x8 y8) …);
- ##[ ##2: #H7; napply (or2_intro2 … (decidable_aluHC08_aux8 … H7))
- ##| ##1: #H7; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x9 y9) …);
- ##[ ##2: #H8; napply (or2_intro2 … (decidable_aluHC08_aux9 … H8))
- ##| ##1: #H8; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x10 y10) …);
- ##[ ##2: #H9; napply (or2_intro2 … (decidable_aluHC08_aux10 … H9))
- ##| ##1: #H9; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x11 y11) …);
- ##[ ##2: #H10; napply (or2_intro2 … (decidable_aluHC08_aux11 … H10))
- ##| ##1: #H10; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x12 y12) …);
- ##[ ##2: #H11; napply (or2_intro2 … (decidable_aluHC08_aux12 … H11))
- ##| ##1: #H11; nrewrite > H; nrewrite > H1; nrewrite > H2; nrewrite > H3;
- nrewrite > H4; nrewrite > H5; nrewrite > H6; nrewrite > H7;
- nrewrite > H8; nrewrite > H9; nrewrite > H10; nrewrite > H11;
- napply (or2_intro1 (? = ?) (? ≠ ?) (refl_eq …))
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/memory/memory_struct.ma".
-include "num/word16.ma".
-include "num/word24.ma".
-
-(* ******************************** *)
-(* IP2022 REGISTER SPECIAL HARDWARE *)
-(* ******************************** *)
-
-(* (Top Of Stack) : CALLH/CALL ↑ CALLH/CALL ↓ *)
-(* Pos2-15 : ... ↑ ... ↓ *)
-(* Pos16 : 0xFFFF ↑ ... ↓ *)
-ndefinition aux_callstack_type ≝ Array16T word16.
-
-(* Top Of Stack : 0xFFFF on reset *)
-ndefinition new_callstack ≝
- mk_Array16T ? (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉)
- (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉)
- (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉)
- (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉).
-
-ndefinition pop_callstack ≝
-λcs:aux_callstack_type.
- pair … (a16_1 ? cs)
- (mk_Array16T ? (a16_2 ? cs) (a16_3 ? cs) (a16_4 ? cs) (a16_5 ? cs)
- (a16_6 ? cs) (a16_7 ? cs) (a16_8 ? cs) (a16_9 ? cs)
- (a16_10 ? cs) (a16_11 ? cs) (a16_12 ? cs) (a16_13 ? cs)
- (a16_14 ? cs) (a16_15 ? cs) (a16_16 ? cs) 〈〈xF,xF〉:〈xF,xF〉〉).
-
-ndefinition push_callstack ≝
-λcs:aux_callstack_type.λtop.
- mk_Array16T ? top (a16_1 ? cs) (a16_2 ? cs) (a16_3 ? cs)
- (a16_4 ? cs) (a16_5 ? cs) (a16_6 ? cs) (a16_7 ? cs)
- (a16_8 ? cs) (a16_9 ? cs) (a16_10 ? cs) (a16_11 ? cs)
- (a16_12 ? cs) (a16_13 ? cs) (a16_14 ? cs) (a16_15 ? cs).
-
-(* array ad accesso diretto di 8 registri ADDR a 24bit *)
-(* selezione con registro ADDRSEL, solo i primi 3bit validi *)
-ndefinition aux_addrarray_type ≝ Array8T word24.
-
-(* tutti a 0x000000 on reset *)
-ndefinition new_addrarray ≝
- mk_Array8T ? (〈〈x0,x0〉;〈x0,x0〉;〈x0,x0〉〉) (〈〈x0,x0〉;〈x0,x0〉;〈x0,x0〉〉)
- (〈〈x0,x0〉;〈x0,x0〉;〈x0,x0〉〉) (〈〈x0,x0〉;〈x0,x0〉;〈x0,x0〉〉)
- (〈〈x0,x0〉;〈x0,x0〉;〈x0,x0〉〉) (〈〈x0,x0〉;〈x0,x0〉;〈x0,x0〉〉)
- (〈〈x0,x0〉;〈x0,x0〉;〈x0,x0〉〉) (〈〈x0,x0〉;〈x0,x0〉;〈x0,x0〉〉).
-
-ndefinition get_addrarray ≝
-λaddrsel:byte8.λaa:aux_addrarray_type.
- getn_array8T (oct_of_exL (cnL ? addrsel)) ? aa.
-
-ndefinition set_addrarray ≝
-λaddrsel:byte8.λaa:aux_addrarray_type.λv.
- setn_array8T (oct_of_exL (cnL ? addrsel)) ? aa v.
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-(* ALU dell'IP2022 *)
-nrecord alu_IP2022: Type ≝
- {
- (* W: accumulatore *)
- acc_low_reg_IP2022 : byte8;
- (* MULH: parte alta moltiplicazione *)
- mulh_reg_IP2022 : byte8;
-
- (* ADDRSEL: selettore di indirizzo *)
- addrsel_reg_IP2022 : byte8;
- (* ADDR [ADDRX|ADDRH|ADDRL] : array indirizzi indicizzati da ADDRSEL *)
- addr_array_IP2022 : aux_addrarray_type;
-
- (* CALL [CALLH|CALLL] : stack indirizzi di ritorno *)
- call_stack_IP2022 : aux_callstack_type;
-
- (* IP [IPH|IPL] : indirect pointer *)
- ip_reg_IP2022 : word16;
- (* DP [DPH|DPL] : data pointer *)
- dp_reg_IP2022 : word16;
- (* DATA [DATAH|DATAL] : data value *)
- data_reg_IP2022 : word16;
- (* SP [SPH|SPL] : stack pointer *)
- sp_reg_IP2022 : word16;
- (* PC [PCH|PCL] : program counter *)
- pc_reg_IP2022 : word16;
-
- (* SPEED[xxxxSSSS] : divisore del clock *)
- speed_reg_IP2022 : exadecim;
- (* PAGE [PPPxxxxx] : selettore pagina *)
- page_reg_IP2022 : oct;
-
- (* H: flag semi-carry (somma nibble basso) *)
- h_flag_IP2022 : bool;
- (* Z: flag zero *)
- z_flag_IP2022 : bool;
- (* C: flag carry *)
- c_flag_IP2022 : bool;
-
- (* skip mode : effettua fetch-decode, no execute *)
- skip_mode_IP2022 : bool
- }.
-
-notation "{hvbox('W_Reg' ≝ w ; break 'MulH_Reg' ≝ mulh ; break 'Addrsel_Reg' ≝ addrsel ; break 'Addr_Array' ≝ addr ; break 'Call_Stack' ≝ call ; break 'Ip_Reg' ≝ ip ; break 'Dp_Reg' ≝ dp ; break 'Data_Reg' ≝ data ; break 'Sp_Reg' ≝ sp ; break 'Pc_Reg' ≝ pc ; break 'Speed_Reg' ≝ speed ; break 'Page_Reg' ≝ page ; break 'H_Flag' ≝ hfl ; break 'Z_Flag' ≝ zfl ; break 'C_Flag' ≝ cfl ; break 'Skip_Mode' ≝ skipmode)}"
- non associative with precedence 80 for
- @{ 'mk_alu_IP2022 $w $mulh $addrsel $addr $call $ip $dp $data $sp $pc $speed $page $hfl $zfl $cfl $skipmode }.
-interpretation "mk_alu_IP2022" 'mk_alu_IP2022 w mulh addrsel addr call ip dp data sp pc speed page hfl zfl cfl skipmode =
- (mk_alu_IP2022 w mulh addrsel addr call ip dp data sp pc speed page hfl zfl cfl skipmode).
-
-(* ****** *)
-(* SETTER *)
-(* ****** *)
-
-(* setter specifico IP2022 di A *)
-ndefinition set_acc_8_low_reg_IP2022 ≝
-λalu.λacclow':byte8.
- mk_alu_IP2022
- acclow'
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di MULH *)
-ndefinition set_mulh_reg_IP2022 ≝
-λalu.λmulh':byte8.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- mulh'
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di ADDRSEL *)
-ndefinition set_addrsel_reg_IP2022 ≝
-λalu.λaddrsel':byte8.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- addrsel'
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di ADDR *)
-ndefinition set_addr_reg_IP2022 ≝
-λalu.λaddr':word24.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (set_addrarray (addrsel_reg_IP2022 alu) (addr_array_IP2022 alu) addr')
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-ndefinition get_addr_reg_IP2022 ≝
-λalu.get_addrarray (addrsel_reg_IP2022 alu) (addr_array_IP2022 alu).
-
-(* setter specifico IP2022 di CALL *)
-ndefinition set_call_reg_IP2022 ≝
-λalu.λcall':word16.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (setn_array16T x0 ? (call_stack_IP2022 alu) call')
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-ndefinition get_call_reg_IP2022 ≝
-λalu.getn_array16T x0 ? (call_stack_IP2022 alu).
-
-ndefinition set_call_stack_IP2022 ≝
-λalu.λcall':aux_callstack_type.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- call'
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-ndefinition push_call_reg_IP2022 ≝
-λalu.λcall':word16.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (push_callstack (call_stack_IP2022 alu) call')
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-ndefinition pop_call_reg_IP2022 ≝
-λalu.match pop_callstack (call_stack_IP2022 alu) with
- [ pair val call' ⇒ pair … val (set_call_stack_IP2022 alu call') ].
-
-(* setter specifico IP2022 di IP *)
-ndefinition set_ip_reg_IP2022 ≝
-λalu.λip':word16.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- ip'
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di DP *)
-ndefinition set_dp_reg_IP2022 ≝
-λalu.λdp':word16.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- dp'
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di DATA *)
-ndefinition set_data_reg_IP2022 ≝
-λalu.λdata':word16.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- data'
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di SP *)
-ndefinition set_sp_reg_IP2022 ≝
-λalu.λsp':word16.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- sp'
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di PC *)
-ndefinition set_pc_reg_IP2022 ≝
-λalu.λpc':word16.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- pc'
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di SPEED *)
-ndefinition set_speed_reg_IP2022 ≝
-λalu.λspeed':exadecim.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- speed'
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di PAGE *)
-ndefinition set_page_reg_IP2022 ≝
-λalu.λpage':oct.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- page'
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di H *)
-ndefinition set_h_flag_IP2022 ≝
-λalu.λhfl':bool.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- hfl'
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di Z *)
-ndefinition set_z_flag_IP2022 ≝
-λalu.λzfl':bool.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- zfl'
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di C *)
-ndefinition set_c_flag_IP2022 ≝
-λalu.λcfl':bool.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- cfl'
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di SKIP *)
-ndefinition set_skip_mode_IP2022 ≝
-λalu.λskipmode':bool.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- skipmode'.
-
-(* ***************** *)
-(* CONFRONTO FRA ALU *)
-(* ***************** *)
-
-(* confronto registro per registro dell'IP2022 *)
-ndefinition eq_IP2022_alu ≝
-λalu1,alu2:alu_IP2022.
- (eq_b8 (acc_low_reg_IP2022 alu1) (acc_low_reg_IP2022 alu2)) ⊗
- (eq_b8 (mulh_reg_IP2022 alu1) (mulh_reg_IP2022 alu2)) ⊗
- (eq_b8 (addrsel_reg_IP2022 alu1) (addrsel_reg_IP2022 alu2)) ⊗
- (eq_ar8 ? eq_w24 (addr_array_IP2022 alu1) (addr_array_IP2022 alu2)) ⊗
- (eq_ar16 ? eq_w16 (call_stack_IP2022 alu1) (call_stack_IP2022 alu2)) ⊗
- (eq_w16 (ip_reg_IP2022 alu1) (ip_reg_IP2022 alu2)) ⊗
- (eq_w16 (dp_reg_IP2022 alu1) (dp_reg_IP2022 alu2)) ⊗
- (eq_w16 (data_reg_IP2022 alu1) (data_reg_IP2022 alu2)) ⊗
- (eq_w16 (sp_reg_IP2022 alu1) (sp_reg_IP2022 alu2)) ⊗
- (eq_w16 (pc_reg_IP2022 alu1) (pc_reg_IP2022 alu2)) ⊗
- (eq_ex (speed_reg_IP2022 alu1) (speed_reg_IP2022 alu2)) ⊗
- (eq_oct (page_reg_IP2022 alu1) (page_reg_IP2022 alu2)) ⊗
- (eq_bool (h_flag_IP2022 alu1) (h_flag_IP2022 alu2)) ⊗
- (eq_bool (z_flag_IP2022 alu1) (z_flag_IP2022 alu2)) ⊗
- (eq_bool (c_flag_IP2022 alu1) (c_flag_IP2022 alu2)) ⊗
- (eq_bool (skip_mode_IP2022 alu1) (skip_mode_IP2022 alu2)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/oct_lemmas.ma".
-include "num/word16_lemmas.ma".
-include "num/word24_lemmas.ma".
-include "emulator/status/IP2022_status.ma".
-include "emulator/memory/memory_struct_lemmas.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-nlemma aluIP2022_destruct_1 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x1 = y1.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 a _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_2 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x2 = y2.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ a _ _ _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x2 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_3 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x3 = y3.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ a _ _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x3 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_4 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x4 = y4.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ a _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x4 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_5 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x5 = y5.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ a _ _ _ _ _ _ _ _ _ _ _ ⇒ x5 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_6 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x6 = y6.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ a _ _ _ _ _ _ _ _ _ _ ⇒ x6 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_7 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x7 = y7.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ a _ _ _ _ _ _ _ _ _ ⇒ x7 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_8 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x8 = y8.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ a _ _ _ _ _ _ _ _ ⇒ x8 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_9 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x9 = y9.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ _ a _ _ _ _ _ _ _ ⇒ x9 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_10 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x10 = y10.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ _ _ a _ _ _ _ _ _ ⇒ x10 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_11 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x11 = y11.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ _ _ _ a _ _ _ _ _ ⇒ x11 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_12 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x12 = y12.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ _ _ _ _ a _ _ _ _ ⇒ x12 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_13 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x13 = y13.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ _ _ _ _ _ a _ _ _ ⇒ x13 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_14 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x14 = y14.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ _ _ _ _ _ _ a _ _ ⇒ x14 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_15 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x15 = y15.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ _ _ _ _ _ _ _ a _ ⇒ x15 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_16 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x16 = y16.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ a ⇒ x16 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-naxiom symmetric_eqaluIP2022 : symmetricT alu_IP2022 bool eq_IP2022_alu.
-(* !!! la compilazione avviene ma il tempo e' troppo lungo...
- #alu1; ncases alu1;
- #z1; #z2; #z3; #z4; #z5; #z6; #z7; #z8; #z9; #z10; #z11; #z12; #z13; #z14; #z15; #z16;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nchange with (
- ((eq_b8 z1 y1) ⊗ (eq_b8 z2 y2) ⊗ (eq_b8 z3 y3) ⊗ (eq_ar8 ? eq_w24 z4 y4) ⊗
- (eq_ar16 ? eq_w16 z5 y5) ⊗ (eq_w16 z6 y6) ⊗ (eq_w16 z7 y7) ⊗ (eq_w16 z8 y8) ⊗
- (eq_w16 z9 y9) ⊗ (eq_w16 z10 y10) ⊗ (eq_ex z11 y11) ⊗ (eq_oct z12 y12) ⊗
- (eq_bool z13 y13) ⊗ (eq_bool z14 y14) ⊗ (eq_bool z15 y15) ⊗ (eq_bool z16 y16)) =
- ((eq_b8 y1 z1) ⊗ (eq_b8 y2 z2) ⊗ (eq_b8 y3 z3) ⊗ (eq_ar8 ? eq_w24 y4 z4) ⊗
- (eq_ar16 ? eq_w16 y5 z5) ⊗ (eq_w16 y6 z6) ⊗ (eq_w16 y7 z7) ⊗ (eq_w16 y8 z8) ⊗
- (eq_w16 y9 z9) ⊗ (eq_w16 y10 z10) ⊗ (eq_ex y11 z11) ⊗ (eq_oct y12 z12) ⊗
- (eq_bool y13 z13) ⊗ (eq_bool y14 z14) ⊗ (eq_bool y15 z15) ⊗ (eq_bool y16 z16)));
- nrewrite > (symmetric_eqb8 z1 y1);
- nrewrite > (symmetric_eqb8 z2 y2);
- nrewrite > (symmetric_eqb8 z3 y3);
- nrewrite > (symmetric_eqar8 ? eq_w24 symmetric_eqw24 z4 y4);
- nrewrite > (symmetric_eqar16 ? eq_w16 symmetric_eqw16 z5 y5);
- nrewrite > (symmetric_eqw16 z6 y6);
- nrewrite > (symmetric_eqw16 z7 y7);
- nrewrite > (symmetric_eqw16 z8 y8);
- nrewrite > (symmetric_eqw16 z9 y9);
- nrewrite > (symmetric_eqw16 z10 y10);
- nrewrite > (symmetric_eqex z11 y11);
- nrewrite > (symmetric_eqoct z12 y12);
- nrewrite > (symmetric_eqbool z13 y13);
- nrewrite > (symmetric_eqbool z14 y14);
- nrewrite > (symmetric_eqbool z15 y15);
- nrewrite > (symmetric_eqbool z16 y16);
- napply refl_eq.
-nqed.
-*)
-
-nlemma eqaluIP2022_to_eq : ∀alu1,alu2.eq_IP2022_alu alu1 alu2 = true → alu1 = alu2.
- #alu1; ncases alu1;
- #z1; #z2; #z3; #z4; #z5; #z6; #z7; #z8; #z9; #z10; #z11; #z12; #z13; #z14; #z15; #z16;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange in H:(%) with (
- ((eq_b8 z1 y1) ⊗ (eq_b8 z2 y2) ⊗ (eq_b8 z3 y3) ⊗ (eq_ar8 ? eq_w24 z4 y4) ⊗
- (eq_ar16 ? eq_w16 z5 y5) ⊗ (eq_w16 z6 y6) ⊗ (eq_w16 z7 y7) ⊗ (eq_w16 z8 y8) ⊗
- (eq_w16 z9 y9) ⊗ (eq_w16 z10 y10) ⊗ (eq_ex z11 y11) ⊗ (eq_oct z12 y12) ⊗
- (eq_bool z13 y13) ⊗ (eq_bool z14 y14) ⊗ (eq_bool z15 y15) ⊗ (eq_bool z16 y16)) = true);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H));
- nletin H1 ≝ (andb_true_true_l … H);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … (andb_true_true_l … H)));
- nletin H2 ≝ (andb_true_true_l … H1);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H2));
- nletin H3 ≝ (andb_true_true_l … H2);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H3));
- nletin H4 ≝ (andb_true_true_l … H3);
- nrewrite > (eqoct_to_eq … (andb_true_true_r … H4));
- nletin H5 ≝ (andb_true_true_l … H4);
- nrewrite > (eqex_to_eq … (andb_true_true_r … H5));
- nletin H6 ≝ (andb_true_true_l … H5);
- nrewrite > (eqw16_to_eq … (andb_true_true_r … H6));
- nletin H7 ≝ (andb_true_true_l … H6);
- nrewrite > (eqw16_to_eq … (andb_true_true_r … H7));
- nletin H8 ≝ (andb_true_true_l … H7);
- nrewrite > (eqw16_to_eq … (andb_true_true_r … H8));
- nletin H9 ≝ (andb_true_true_l … H8);
- nrewrite > (eqw16_to_eq … (andb_true_true_r … H9));
- nletin H10 ≝ (andb_true_true_l … H9);
- nrewrite > (eqw16_to_eq … (andb_true_true_r … H10));
- nletin H11 ≝ (andb_true_true_l … H10);
- nrewrite > (eqar16_to_eq ? eq_w16 eqw16_to_eq … (andb_true_true_r … H11));
- nletin H12 ≝ (andb_true_true_l … H11);
- nrewrite > (eqar8_to_eq ? eq_w24 eqw24_to_eq … (andb_true_true_r … H12));
- nletin H13 ≝ (andb_true_true_l … H12);
- nrewrite > (eqb8_to_eq … (andb_true_true_r … H13));
- nletin H14 ≝ (andb_true_true_l … H13);
- nrewrite > (eqb8_to_eq … (andb_true_true_r … H14));
- nrewrite > (eqb8_to_eq … (andb_true_true_l … H14));
- napply refl_eq.
-nqed.
-
-naxiom eq_to_eqaluIP2022 : ∀alu1,alu2.alu1 = alu2 → eq_IP2022_alu alu1 alu2 = true.
-(* !!! la compilazione avviene ma il tempo e' troppo lungo...
- #alu1; ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nrewrite > (aluIP2022_destruct_1 … H);
- nrewrite > (aluIP2022_destruct_2 … H);
- nrewrite > (aluIP2022_destruct_3 … H);
- nrewrite > (aluIP2022_destruct_4 … H);
- nrewrite > (aluIP2022_destruct_5 … H);
- nrewrite > (aluIP2022_destruct_6 … H);
- nrewrite > (aluIP2022_destruct_7 … H);
- nrewrite > (aluIP2022_destruct_8 … H);
- nrewrite > (aluIP2022_destruct_9 … H);
- nrewrite > (aluIP2022_destruct_10 … H);
- nrewrite > (aluIP2022_destruct_11 … H);
- nrewrite > (aluIP2022_destruct_12 … H);
- nrewrite > (aluIP2022_destruct_13 … H);
- nrewrite > (aluIP2022_destruct_14 … H);
- nrewrite > (aluIP2022_destruct_15 … H);
- nrewrite > (aluIP2022_destruct_16 … H);
- nchange with (
- ((eq_b8 y1 y1) ⊗ (eq_b8 y2 y2) ⊗ (eq_b8 y3 y3) ⊗ (eq_ar8 ? eq_w24 y4 y4) ⊗
- (eq_ar16 ? eq_w16 y5 y5) ⊗ (eq_w16 y6 y6) ⊗ (eq_w16 y7 y7) ⊗ (eq_w16 y8 y8) ⊗
- (eq_w16 y9 y9) ⊗ (eq_w16 y10 y10) ⊗ (eq_ex y11 y11) ⊗ (eq_oct y12 y12) ⊗
- (eq_bool y13 y13) ⊗ (eq_bool y14 y14) ⊗ (eq_bool y15 y15) ⊗ (eq_bool y16 y16)) = true);
- nrewrite > (eq_to_eqb8 y1 y1 (refl_eq …));
- nrewrite > (eq_to_eqb8 y2 y2 (refl_eq …));
- nrewrite > (eq_to_eqb8 y3 y3 (refl_eq …));
- nrewrite > (eq_to_eqar8 ? eq_w24 eq_to_eqw24 y4 y4 (refl_eq …));
- nrewrite > (eq_to_eqar16 ? eq_w16 eq_to_eqw16 y5 y5 (refl_eq …));
- nrewrite > (eq_to_eqw16 y6 y6 (refl_eq …));
- nrewrite > (eq_to_eqw16 y7 y7 (refl_eq …));
- nrewrite > (eq_to_eqw16 y8 y8 (refl_eq …));
- nrewrite > (eq_to_eqw16 y9 y9 (refl_eq …));
- nrewrite > (eq_to_eqw16 y10 y10 (refl_eq …));
- nrewrite > (eq_to_ex y11 y11 (refl_eq …));
- nrewrite > (eq_to_oct y12 y12 (refl_eq …));
- nrewrite > (eq_to_eqbool y13 y13 (refl_eq …));
- nrewrite > (eq_to_eqbool y14 y14 (refl_eq …));
- nrewrite > (eq_to_eqbool y15 y15 (refl_eq …));
- nrewrite > (eq_to_eqbool y16 y16 (refl_eq …));
- napply refl_eq.
-nqed.
-*)
-
-nlemma decidable_aluIP2022_aux1
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- (x1 ≠ y1) →
- (mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (aluIP2022_destruct_1 … H1)).
-nqed.
-
-nlemma decidable_aluIP2022_aux2
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- (x2 ≠ y2) →
- (mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (aluIP2022_destruct_2 … H1)).
-nqed.
-
-nlemma decidable_aluIP2022_aux3
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- (x3 ≠ y3) →
- (mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (aluIP2022_destruct_3 … H1)).
-nqed.
-
-nlemma decidable_aluIP2022_aux4
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- (x4 ≠ y4) →
- (mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (aluIP2022_destruct_4 … H1)).
-nqed.
-
-nlemma decidable_aluIP2022_aux5
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- (x5 ≠ y5) →
- (mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (aluIP2022_destruct_5 … H1)).
-nqed.
-
-nlemma decidable_aluIP2022_aux6
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- (x6 ≠ y6) →
- (mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (aluIP2022_destruct_6 … H1)).
-nqed.
-
-nlemma decidable_aluIP2022_aux7
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- (x7 ≠ y7) →
- (mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (aluIP2022_destruct_7 … H1)).
-nqed.
-
-nlemma decidable_aluIP2022_aux8
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- (x8 ≠ y8) →
- (mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (aluIP2022_destruct_8 … H1)).
-nqed.
-
-nlemma decidable_aluIP2022_aux9
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- (x9 ≠ y9) →
- (mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (aluIP2022_destruct_9 … H1)).
-nqed.
-
-nlemma decidable_aluIP2022_aux10
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- (x10 ≠ y10) →
- (mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (aluIP2022_destruct_10 … H1)).
-nqed.
-
-nlemma decidable_aluIP2022_aux11
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- (x11 ≠ y11) →
- (mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (aluIP2022_destruct_11 … H1)).
-nqed.
-
-nlemma decidable_aluIP2022_aux12
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- (x12 ≠ y12) →
- (mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (aluIP2022_destruct_12 … H1)).
-nqed.
-
-nlemma decidable_aluIP2022_aux13
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- (x13 ≠ y13) →
- (mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (aluIP2022_destruct_13 … H1)).
-nqed.
-
-nlemma decidable_aluIP2022_aux14
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- (x14 ≠ y14) →
- (mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (aluIP2022_destruct_14 … H1)).
-nqed.
-
-nlemma decidable_aluIP2022_aux15
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- (x15 ≠ y15) →
- (mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (aluIP2022_destruct_15 … H1)).
-nqed.
-
-nlemma decidable_aluIP2022_aux16
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- (x16 ≠ y16) →
- (mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (aluIP2022_destruct_16 … H1)).
-nqed.
-
-nlemma decidable_aluIP2022 : ∀x,y:alu_IP2022.decidable (x = y).
- #x; nelim x; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y; nelim y; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize;
- napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_b8 x1 y1) …);
- ##[ ##2: #H; napply (or2_intro2 … (decidable_aluIP2022_aux1 … H))
- ##| ##1: #H; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_b8 x2 y2) …);
- ##[ ##2: #H1; napply (or2_intro2 … (decidable_aluIP2022_aux2 … H1))
- ##| ##1: #H1; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_b8 x3 y3) …);
- ##[ ##2: #H2; napply (or2_intro2 … (decidable_aluIP2022_aux3 … H2))
- ##| ##1: #H2; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_ar8 ? decidable_w24 x4 y4) …);
- ##[ ##2: #H3; napply (or2_intro2 … (decidable_aluIP2022_aux4 … H3))
- ##| ##1: #H3; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_ar16 ? decidable_w16 x5 y5) …);
- ##[ ##2: #H4; napply (or2_intro2 … (decidable_aluIP2022_aux5 … H4))
- ##| ##1: #H4; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_w16 x6 y6) …);
- ##[ ##2: #H5; napply (or2_intro2 … (decidable_aluIP2022_aux6 … H5))
- ##| ##1: #H5; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_w16 x7 y7) …);
- ##[ ##2: #H6; napply (or2_intro2 … (decidable_aluIP2022_aux7 … H6))
- ##| ##1: #H6; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_w16 x8 y8) …);
- ##[ ##2: #H7; napply (or2_intro2 … (decidable_aluIP2022_aux8 … H7))
- ##| ##1: #H7; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_w16 x9 y9) …);
- ##[ ##2: #H8; napply (or2_intro2 … (decidable_aluIP2022_aux9 … H8))
- ##| ##1: #H8; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_w16 x10 y10) …);
- ##[ ##2: #H9; napply (or2_intro2 … (decidable_aluIP2022_aux10 … H9))
- ##| ##1: #H9; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_ex x11 y11) …);
- ##[ ##2: #H10; napply (or2_intro2 … (decidable_aluIP2022_aux11 … H10))
- ##| ##1: #H10; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_oct x12 y12) …);
- ##[ ##2: #H11; napply (or2_intro2 … (decidable_aluIP2022_aux12 … H11))
- ##| ##1: #H11; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x13 y13) …);
- ##[ ##2: #H12; napply (or2_intro2 … (decidable_aluIP2022_aux13 … H12))
- ##| ##1: #H12; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x14 y14) …);
- ##[ ##2: #H13; napply (or2_intro2 … (decidable_aluIP2022_aux14 … H13))
- ##| ##1: #H13; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x15 y15) …);
- ##[ ##2: #H14; napply (or2_intro2 … (decidable_aluIP2022_aux15 … H14))
- ##| ##1: #H14; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x16 y16) …);
- ##[ ##2: #H15; napply (or2_intro2 … (decidable_aluIP2022_aux16 … H15))
- ##| ##1: #H15; nrewrite > H; nrewrite > H1; nrewrite > H2; nrewrite > H3;
- nrewrite > H4; nrewrite > H5; nrewrite > H6; nrewrite > H7;
- nrewrite > H8; nrewrite > H9; nrewrite > H10; nrewrite > H11;
- nrewrite > H12; nrewrite > H13; nrewrite > H14; nrewrite > H15;
- napply (or2_intro1 (? = ?) (? ≠ ?) (refl_eq …));
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/word16.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-(* ALU dell'RS08 *)
-nrecord alu_RS08: Type ≝
- {
- (* A: registo accumulatore *)
- acc_low_reg_RS08 : byte8;
- (* PC: registro program counter *)
- pc_reg_RS08 : word16;
- (* modificatore di PC: per esempio e' definito come 00xxxxxxxxxxxxxxb *)
- (* la logica della sua costruzione e' quindi (PC∧mask) *)
- (* totalmente racchiusa nella ALU, bastera' fare get(set(PC)) *)
- pc_mask_RS08 : word16;
- (* SPC: registro shadow program counter *)
- (* NB: il suo modificatore e' lo stesso di PC *)
- spc_reg_RS08 : word16;
-
- (* X: registro indice parte bassa *)
- (* NB: in realta' e' mappato in memoria e non risiede nella ALU *)
- (* la lettura/scrittura avviene tramite la locazione [0x000F] *)
- x_map_RS08 : byte8;
- (* PS: registro selezione di pagina *)
- (* serve a indirizzare la finestra RAM di 64b [0x00C0-0x00FF] *)
- (* su tutta la memoria installata [0x0000-0x3FFF]: [00pp pppp ppxx xxxx] *)
- (* NB: in realta' e' mappato in memoria e non risiede nella ALU *)
- (* la lettura/scrittura avviene tramite la locazione [0x001F] *)
- ps_map_RS08 : byte8;
-
- (* Z: flag zero *)
- z_flag_RS08 : bool;
- (* C: flag carry *)
- c_flag_RS08 : bool
- }.
-
-notation "{hvbox('A_Reg' ≝ acclow ; break 'Pc_Reg' ≝ pc ; break 'Pc_Mask' ≝ pcm ; break 'Spc_Reg' ≝ spc ; break 'X_Map' ≝ xm ; break 'Ps_Map' ≝ psm ; break 'Z_Flag' ≝ zfl ; break 'C_Flag' ≝ cfl)}"
- non associative with precedence 80 for
- @{ 'mk_alu_RS08 $acclow $pc $pcm $spc $xm $psm $zfl $cfl }.
-interpretation "mk_alu_RS08" 'mk_alu_RS08 acclow pc pcm spc xm psm zfl cfl =
- (mk_alu_RS08 acclow pc pcm spc xm psm zfl cfl).
-
-(* ****** *)
-(* SETTER *)
-(* ****** *)
-
-(* setter specifico RS08 di A *)
-ndefinition set_acc_8_low_reg_RS08 ≝
-λalu.λacclow':byte8.
- mk_alu_RS08
- acclow'
- (pc_reg_RS08 alu)
- (pc_mask_RS08 alu)
- (spc_reg_RS08 alu)
- (x_map_RS08 alu)
- (ps_map_RS08 alu)
- (z_flag_RS08 alu)
- (c_flag_RS08 alu).
-
-(* setter specifico RS08 di PC, effettua PC∧mask *)
-ndefinition set_pc_reg_RS08 ≝
-λalu.λpc':word16.
- mk_alu_RS08
- (acc_low_reg_RS08 alu)
- (and_w16 pc' (pc_mask_RS08 alu))
- (pc_mask_RS08 alu)
- (spc_reg_RS08 alu)
- (x_map_RS08 alu)
- (ps_map_RS08 alu)
- (z_flag_RS08 alu)
- (c_flag_RS08 alu).
-
-(* setter specifico RS08 di SPC, effettua SPC∧mask *)
-ndefinition set_spc_reg_RS08 ≝
-λalu.λspc':word16.
- mk_alu_RS08
- (acc_low_reg_RS08 alu)
- (pc_reg_RS08 alu)
- (pc_mask_RS08 alu)
- (and_w16 spc' (pc_mask_RS08 alu))
- (x_map_RS08 alu)
- (ps_map_RS08 alu)
- (z_flag_RS08 alu)
- (c_flag_RS08 alu).
-
-(* setter specifico RS08 di memory mapped X *)
-ndefinition set_x_map_RS08 ≝
-λalu.λxm':byte8.
- mk_alu_RS08
- (acc_low_reg_RS08 alu)
- (pc_reg_RS08 alu)
- (pc_mask_RS08 alu)
- (spc_reg_RS08 alu)
- xm'
- (ps_map_RS08 alu)
- (z_flag_RS08 alu)
- (c_flag_RS08 alu).
-
-(* setter specifico RS08 di memory mapped PS *)
-ndefinition set_ps_map_RS08 ≝
-λalu.λpsm':byte8.
- mk_alu_RS08
- (acc_low_reg_RS08 alu)
- (pc_reg_RS08 alu)
- (pc_mask_RS08 alu)
- (spc_reg_RS08 alu)
- (x_map_RS08 alu)
- psm'
- (z_flag_RS08 alu)
- (c_flag_RS08 alu).
-
-(* setter sprcifico RS08 di Z *)
-ndefinition set_z_flag_RS08 ≝
-λalu.λzfl':bool.
- mk_alu_RS08
- (acc_low_reg_RS08 alu)
- (pc_reg_RS08 alu)
- (pc_mask_RS08 alu)
- (spc_reg_RS08 alu)
- (x_map_RS08 alu)
- (ps_map_RS08 alu)
- zfl'
- (c_flag_RS08 alu).
-
-(* setter specifico RS08 di C *)
-ndefinition set_c_flag_RS08 ≝
-λalu.λcfl':bool.
- mk_alu_RS08
- (acc_low_reg_RS08 alu)
- (pc_reg_RS08 alu)
- (pc_mask_RS08 alu)
- (spc_reg_RS08 alu)
- (x_map_RS08 alu)
- (ps_map_RS08 alu)
- (z_flag_RS08 alu)
- cfl'.
-
-(* ***************** *)
-(* CONFRONTO FRA ALU *)
-(* ***************** *)
-
-(* confronto registro per registro dell'RS08 *)
-ndefinition eq_RS08_alu ≝
-λalu1,alu2:alu_RS08.
- (eq_b8 (acc_low_reg_RS08 alu1) (acc_low_reg_RS08 alu2)) ⊗
- (eq_w16 (pc_reg_RS08 alu1) (pc_reg_RS08 alu2)) ⊗
- (eq_w16 (pc_mask_RS08 alu1) (pc_mask_RS08 alu2)) ⊗
- (eq_w16 (spc_reg_RS08 alu1) (spc_reg_RS08 alu2)) ⊗
- (eq_b8 (x_map_RS08 alu1) (x_map_RS08 alu2)) ⊗
- (eq_b8 (ps_map_RS08 alu1) (ps_map_RS08 alu2)) ⊗
- (eq_bool (z_flag_RS08 alu1) (z_flag_RS08 alu2)) ⊗
- (eq_bool (c_flag_RS08 alu1) (c_flag_RS08 alu2)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/word16_lemmas.ma".
-include "emulator/status/RS08_status.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-nlemma aluRS08_destruct_1 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8 = mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8 →
- x1 = y1.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_alu_RS08 a _ _ _ _ _ _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluRS08_destruct_2 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8 = mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8 →
- x2 = y2.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_alu_RS08 _ a _ _ _ _ _ _ ⇒ x2 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluRS08_destruct_3 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8 = mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8 →
- x3 = y3.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_alu_RS08 _ _ a _ _ _ _ _ ⇒ x3 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluRS08_destruct_4 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8 = mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8 →
- x4 = y4.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_alu_RS08 _ _ _ a _ _ _ _ ⇒ x4 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluRS08_destruct_5 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8 = mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8 →
- x5 = y5.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_alu_RS08 _ _ _ _ a _ _ _ ⇒ x5 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluRS08_destruct_6 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8 = mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8 →
- x6 = y6.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_alu_RS08 _ _ _ _ _ a _ _ ⇒ x6 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluRS08_destruct_7 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8 = mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8 →
- x7 = y7.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_alu_RS08 _ _ _ _ _ _ a _ ⇒ x7 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluRS08_destruct_8 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8 = mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8 →
- x8 = y8.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_alu_RS08 _ _ _ _ _ _ _ a ⇒ x8 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_eqaluRS08 : symmetricT alu_RS08 bool eq_RS08_alu.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nchange with (
- ((eq_b8 x1 y1) ⊗ (eq_w16 x2 y2) ⊗
- (eq_w16 x3 y3) ⊗ (eq_w16 x4 y4) ⊗
- (eq_b8 x5 y5) ⊗ (eq_b8 x6 y6) ⊗
- (eq_bool x7 y7) ⊗ (eq_bool x8 y8)) =
- ((eq_b8 y1 x1) ⊗ (eq_w16 y2 x2) ⊗
- (eq_w16 y3 x3) ⊗ (eq_w16 y4 x4) ⊗
- (eq_b8 y5 x5) ⊗ (eq_b8 y6 x6) ⊗
- (eq_bool y7 x7) ⊗ (eq_bool y8 x8)));
- nrewrite > (symmetric_eqb8 x1 y1);
- nrewrite > (symmetric_eqw16 x2 y2);
- nrewrite > (symmetric_eqw16 x3 y3);
- nrewrite > (symmetric_eqw16 x4 y4);
- nrewrite > (symmetric_eqb8 x5 y5);
- nrewrite > (symmetric_eqb8 x6 y6);
- nrewrite > (symmetric_eqbool x7 y7);
- nrewrite > (symmetric_eqbool x8 y8);
- napply refl_eq.
-nqed.
-
-nlemma eqaluRS08_to_eq : ∀alu1,alu2.eq_RS08_alu alu1 alu2 = true → alu1 = alu2.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange in H:(%) with (
- ((eq_b8 x1 y1) ⊗ (eq_w16 x2 y2) ⊗
- (eq_w16 x3 y3) ⊗ (eq_w16 x4 y4) ⊗
- (eq_b8 x5 y5) ⊗ (eq_b8 x6 y6) ⊗
- (eq_bool x7 y7) ⊗ (eq_bool x8 y8)) = true);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H));
- nletin H1 ≝ (andb_true_true_l … H);
- nrewrite > (eqbool_to_eq … (andb_true_true_r … H1));
- nletin H2 ≝ (andb_true_true_l … H1);
- nrewrite > (eqb8_to_eq … (andb_true_true_r … H2));
- nletin H3 ≝ (andb_true_true_l … H2);
- nrewrite > (eqb8_to_eq … (andb_true_true_r … H3));
- nletin H4 ≝ (andb_true_true_l … H3);
- nrewrite > (eqw16_to_eq … (andb_true_true_r … H4));
- nletin H5 ≝ (andb_true_true_l … H4);
- nrewrite > (eqw16_to_eq … (andb_true_true_r … H5));
- nletin H6 ≝ (andb_true_true_l … H5);
- nrewrite > (eqw16_to_eq … (andb_true_true_r … H6));
- nrewrite > (eqb8_to_eq … (andb_true_true_l … H6));
- napply refl_eq.
-nqed.
-
-nlemma eq_to_eqaluRS08 : ∀alu1,alu2.alu1 = alu2 → eq_RS08_alu alu1 alu2 = true.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nrewrite > (aluRS08_destruct_1 … H);
- nrewrite > (aluRS08_destruct_2 … H);
- nrewrite > (aluRS08_destruct_3 … H);
- nrewrite > (aluRS08_destruct_4 … H);
- nrewrite > (aluRS08_destruct_5 … H);
- nrewrite > (aluRS08_destruct_6 … H);
- nrewrite > (aluRS08_destruct_7 … H);
- nrewrite > (aluRS08_destruct_8 … H);
- nchange with (
- ((eq_b8 y1 y1) ⊗ (eq_w16 y2 y2) ⊗
- (eq_w16 y3 y3) ⊗ (eq_w16 y4 y4) ⊗
- (eq_b8 y5 y5) ⊗ (eq_b8 y6 y6) ⊗
- (eq_bool y7 y7) ⊗ (eq_bool y8 y8)) = true);
- nrewrite > (eq_to_eqb8 y1 y1 (refl_eq …));
- nrewrite > (eq_to_eqw16 y2 y2 (refl_eq …));
- nrewrite > (eq_to_eqw16 y3 y3 (refl_eq …));
- nrewrite > (eq_to_eqw16 y4 y4 (refl_eq …));
- nrewrite > (eq_to_eqb8 y5 y5 (refl_eq …));
- nrewrite > (eq_to_eqb8 y6 y6 (refl_eq …));
- nrewrite > (eq_to_eqbool y7 y7 (refl_eq …));
- nrewrite > (eq_to_eqbool y8 y8 (refl_eq …));
- napply refl_eq.
-nqed.
-
-nlemma decidable_aluRS08_aux1
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- (x1 ≠ y1) →
- (mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8) ≠
- (mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (aluRS08_destruct_1 … H1)).
-nqed.
-
-nlemma decidable_aluRS08_aux2
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- (x2 ≠ y2) →
- (mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8) ≠
- (mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (aluRS08_destruct_2 … H1)).
-nqed.
-
-nlemma decidable_aluRS08_aux3
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- (x3 ≠ y3) →
- (mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8) ≠
- (mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (aluRS08_destruct_3 … H1)).
-nqed.
-
-nlemma decidable_aluRS08_aux4
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- (x4 ≠ y4) →
- (mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8) ≠
- (mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (aluRS08_destruct_4 … H1)).
-nqed.
-
-nlemma decidable_aluRS08_aux5
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- (x5 ≠ y5) →
- (mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8) ≠
- (mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (aluRS08_destruct_5 … H1)).
-nqed.
-
-nlemma decidable_aluRS08_aux6
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- (x6 ≠ y6) →
- (mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8) ≠
- (mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (aluRS08_destruct_6 … H1)).
-nqed.
-
-nlemma decidable_aluRS08_aux7
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- (x7 ≠ y7) →
- (mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8) ≠
- (mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (aluRS08_destruct_7 … H1)).
-nqed.
-
-nlemma decidable_aluRS08_aux8
- : ∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- (x8 ≠ y8) →
- (mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8) ≠
- (mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8).
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (aluRS08_destruct_8 … H1)).
-nqed.
-
-nlemma decidable_aluRS08 : ∀x,y:alu_RS08.decidable (x = y).
- #x; nelim x; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y; nelim y; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize;
- napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_b8 x1 y1) …);
- ##[ ##2: #H; napply (or2_intro2 … (decidable_aluRS08_aux1 … H))
- ##| ##1: #H; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_w16 x2 y2) …);
- ##[ ##2: #H1; napply (or2_intro2 … (decidable_aluRS08_aux2 … H1))
- ##| ##1: #H1; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_w16 x3 y3) …);
- ##[ ##2: #H2; napply (or2_intro2 … (decidable_aluRS08_aux3 … H2))
- ##| ##1: #H2; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_w16 x4 y4) …);
- ##[ ##2: #H3; napply (or2_intro2 … (decidable_aluRS08_aux4 … H3))
- ##| ##1: #H3; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_b8 x5 y5) …);
- ##[ ##2: #H4; napply (or2_intro2 … (decidable_aluRS08_aux5 … H4))
- ##| ##1: #H4; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_b8 x6 y6) …);
- ##[ ##2: #H5; napply (or2_intro2 … (decidable_aluRS08_aux6 … H5))
- ##| ##1: #H5; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x7 y7) …);
- ##[ ##2: #H6; napply (or2_intro2 … (decidable_aluRS08_aux7 … H6))
- ##| ##1: #H6; napply (or2_elim (? = ?) (? ≠ ?) ? (decidable_bool x8 y8) …);
- ##[ ##2: #H7; napply (or2_intro2 … (decidable_aluRS08_aux8 … H7))
- ##| ##1: #H7; nrewrite > H; nrewrite > H1; nrewrite > H2; nrewrite > H3;
- nrewrite > H4; nrewrite > H5; nrewrite > H6; nrewrite > H7;
- napply (or2_intro1 (? = ?) (? ≠ ?) (refl_eq …))
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/memory/memory_abs.ma".
-include "emulator/status/HC05_status.ma".
-include "emulator/status/HC08_status.ma".
-include "emulator/status/RS08_status.ma".
-include "emulator/status/IP2022_status.ma".
-include "emulator/opcodes/pseudo.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-(* descrittore del click = stato di avanzamento dell'esecuzione *)
-(* 1) None = istruzione eseguita, attesa del fetch *)
-(* 2) Some cur_clk,pseudo,mode,clks,cur_pc = fetch eseguito *)
-ndefinition aux_clk_type ≝ λm:mcu_type.Prod5T byte8 (aux_pseudo_type m) (aux_im_type m) byte8 word16.
-
-(* tipo processore dipendente dalla mcu, varia solo la ALU *)
-nrecord any_status (mcu:mcu_type) (t:memory_impl): Type ≝
- {
- alu : match mcu with
- [ HC05 ⇒ alu_HC05 | HC08 ⇒ alu_HC08 | HCS08 ⇒ alu_HC08 | RS08 ⇒ alu_RS08
- | IP2022 ⇒ alu_IP2022 ];
-
- (* descritore della memoria *)
- mem_desc : aux_mem_type t;
- (* descrittore del tipo di memoria installata *)
- chk_desc : aux_chk_type t;
- (* descrittore del clik *)
- clk_desc : option (aux_clk_type mcu)
- }.
-
-(* evitare di mostrare la memoria/descrittore che impalla il visualizzatore *)
-notation > "{hvbox('Alu' ≝ alu ; break 'Clk' ≝ clk)}" non associative with precedence 80
- for @{ 'mk_any_status $alu $mem $chk $clk }.
-interpretation "mk_any_status" 'mk_any_status alu mem chk clk =
- (mk_any_status alu mem chk clk).
-
-(* ******************** *)
-(* CONFRONTO FRA STATUS *)
-(* ******************** *)
-
-ndefinition eq_alu ≝
-λm:mcu_type.
- match m
- return λm.
- match m with
- [ HC05 ⇒ alu_HC05 | HC08 ⇒ alu_HC08 | HCS08 ⇒ alu_HC08 | RS08 ⇒ alu_RS08
- | IP2022 ⇒ alu_IP2022 ] →
- match m with
- [ HC05 ⇒ alu_HC05 | HC08 ⇒ alu_HC08 | HCS08 ⇒ alu_HC08 | RS08 ⇒ alu_RS08
- | IP2022 ⇒ alu_IP2022 ] →
- bool
- with
- [ HC05 ⇒ eq_HC05_alu
- | HC08 ⇒ eq_HC08_alu
- | HCS08 ⇒ eq_HC08_alu
- | RS08 ⇒ eq_RS08_alu
- | IP2022 ⇒ eq_IP2022_alu
- ].
-
-(* confronto di una regione di memoria [addr1 ; ... ; addrn] *)
-nlet rec forall_memory_ranged
- (t:memory_impl)
- (chk1:aux_chk_type t) (chk2:aux_chk_type t)
- (mem1:aux_mem_type t) (mem2:aux_mem_type t)
- (addrl:list word32) on addrl ≝
- match addrl return λ_.bool with
- [ nil ⇒ true
- | cons hd tl ⇒ (eq_option byte8 eq_b8 (mem_read t mem1 chk1 hd)
- (mem_read t mem2 chk2 hd)) ⊗
- (forall_memory_ranged t chk1 chk2 mem1 mem2 tl)
- ].
-
-ndefinition eq_clk ≝ λm.eq_option … (eq_quintuple … eq_b8 (eq_pseudo m) (eq_im m) eq_b8 eq_w16).
-
-(* generalizzazione del confronto fra stati *)
-ndefinition eq_anystatus ≝
-λm:mcu_type.λt:memory_impl.λs1,s2:any_status m t.λaddrl:list word32.
- (* 1) confronto della ALU *)
- (eq_alu m (alu m t s1) (alu m t s2)) ⊗
- (* 2) confronto della memoria in [inf,inf+n] *)
- (forall_memory_ranged t (chk_desc m t s1) (chk_desc m t s2)
- (mem_desc m t s1) (mem_desc m t s2) addrl) ⊗
- (* 3) confronto del clik *)
- (eq_clk m (clk_desc m t s1) (clk_desc m t s2)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status_setter.ma".
-
-(* **************** *)
-(* GETTER SPECIFICI *)
-(* **************** *)
-
-(* funzione ausiliaria per il tipaggio dei getter *)
-ndefinition aux_get_type ≝ λx:Type.λm:mcu_type.match m with
- [ HC05 ⇒ alu_HC05 | HC08 ⇒ alu_HC08 | HCS08 ⇒ alu_HC08 | RS08 ⇒ alu_RS08
- | IP2022 ⇒ alu_IP2022 ] → x.
-
-(* REGISTRI *)
-
-(* getter di A, esiste sempre *)
-ndefinition get_acc_8_low_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type byte8 with
- [ HC05 ⇒ acc_low_reg_HC05
- | HC08 ⇒ acc_low_reg_HC08
- | HCS08 ⇒ acc_low_reg_HC08
- | RS08 ⇒ acc_low_reg_RS08
- | IP2022 ⇒ acc_low_reg_IP2022 ]
- (alu m t s).
-
-(* getter di X, non esiste sempre *)
-ndefinition get_indX_8_low_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option byte8) with
- [ HC05 ⇒ λalu.Some ? (indX_low_reg_HC05 alu)
- | HC08 ⇒ λalu.Some ? (indX_low_reg_HC08 alu)
- | HCS08 ⇒ λalu.Some ? (indX_low_reg_HC08 alu)
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.None ? ]
- (alu m t s).
-
-(* getter di H, non esiste sempre *)
-ndefinition get_indX_8_high_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option byte8) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.Some ? (indX_high_reg_HC08 alu)
- | HCS08 ⇒ λalu.Some ? (indX_high_reg_HC08 alu)
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.None ? ]
- (alu m t s).
-
-(* getter di H:X, non esiste sempre *)
-ndefinition get_indX_16_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option word16) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.Some ? (mk_word16 (indX_high_reg_HC08 alu) (indX_low_reg_HC08 alu))
- | HCS08 ⇒ λalu.Some ? (mk_word16 (indX_high_reg_HC08 alu) (indX_low_reg_HC08 alu))
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.None ? ]
- (alu m t s).
-
-(* getter di SP, non esiste sempre *)
-ndefinition get_sp_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option word16) with
- [ HC05 ⇒ λalu.Some ? (sp_reg_HC05 alu)
- | HC08 ⇒ λalu.Some ? (sp_reg_HC08 alu)
- | HCS08 ⇒ λalu.Some ? (sp_reg_HC08 alu)
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (sp_reg_IP2022 alu) ]
- (alu m t s).
-
-(* getter di PC, esiste sempre *)
-ndefinition get_pc_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type word16 with
- [ HC05 ⇒ pc_reg_HC05
- | HC08 ⇒ pc_reg_HC08
- | HCS08 ⇒ pc_reg_HC08
- | RS08 ⇒ pc_reg_RS08
- | IP2022 ⇒ pc_reg_IP2022 ]
- (alu m t s).
-
-(* getter di SPC, non esiste sempre *)
-ndefinition get_spc_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option word16) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.Some ? (spc_reg_RS08 alu)
- | IP2022 ⇒ λalu.None ? ]
- (alu m t s).
-
-(* getter di MULH, non esiste sempre *)
-ndefinition get_mulh_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option byte8) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (mulh_reg_IP2022 alu) ]
- (alu m t s).
-
-(* getter di ADDRSEL, non esiste sempre *)
-ndefinition get_addrsel_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option byte8) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (addrsel_reg_IP2022 alu) ]
- (alu m t s).
-
-(* getter di ADDR, non esiste sempre *)
-ndefinition get_addr_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option word24) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (get_addr_reg_IP2022 alu) ]
- (alu m t s).
-
-(* getter di CALL, non esiste sempre *)
-ndefinition get_call_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option word16) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (get_call_reg_IP2022 alu) ]
- (alu m t s).
-
-(* getter di IP, non esiste sempre *)
-ndefinition get_ip_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option word16) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (ip_reg_IP2022 alu) ]
- (alu m t s).
-
-(* getter di DP, non esiste sempre *)
-ndefinition get_dp_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option word16) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (dp_reg_IP2022 alu) ]
- (alu m t s).
-
-(* getter di DATA, non esiste sempre *)
-ndefinition get_data_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option word16) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (data_reg_IP2022 alu) ]
- (alu m t s).
-
-(* getter di SPEED, non esiste sempre *)
-ndefinition get_speed_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option exadecim) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (speed_reg_IP2022 alu) ]
- (alu m t s).
-
-(* getter di PAGE, non esiste sempre *)
-ndefinition get_page_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option oct) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (page_reg_IP2022 alu) ]
- (alu m t s).
-
-(* REGISTRI SPECIALI *)
-
-(* getter di memory mapped X, non esiste sempre *)
-ndefinition get_x_map ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option byte8) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.Some ? (x_map_RS08 alu)
- | IP2022 ⇒ λalu.None ? ]
- (alu m t s).
-
-(* getter di memory mapped PS, non esiste sempre *)
-ndefinition get_ps_map ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option byte8) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.Some ? (ps_map_RS08 alu)
- | IP2022 ⇒ λalu.None ? ]
- (alu m t s).
-
-(* getter di skip mode, non esiste sempre *)
-ndefinition get_skip_mode ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option bool) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (skip_mode_IP2022 alu) ]
- (alu m t s).
-
-(* FLAG *)
-
-(* getter di V, non esiste sempre *)
-ndefinition get_v_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option bool) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.Some ? (v_flag_HC08 alu)
- | HCS08 ⇒ λalu.Some ? (v_flag_HC08 alu)
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.None ? ]
- (alu m t s).
-
-(* getter di H, non esiste sempre *)
-ndefinition get_h_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option bool) with
- [ HC05 ⇒ λalu.Some ? (h_flag_HC05 alu)
- | HC08 ⇒ λalu.Some ? (h_flag_HC08 alu)
- | HCS08 ⇒ λalu.Some ? (h_flag_HC08 alu)
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (h_flag_IP2022 alu) ]
- (alu m t s).
-
-(* getter di I, non esiste sempre *)
-ndefinition get_i_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option bool) with
- [ HC05 ⇒ λalu.Some ? (i_flag_HC05 alu)
- | HC08 ⇒ λalu.Some ? (i_flag_HC08 alu)
- | HCS08 ⇒ λalu.Some ? (i_flag_HC08 alu)
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.None ? ]
- (alu m t s).
-
-(* getter di N, non esiste sempre *)
-ndefinition get_n_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option bool) with
- [ HC05 ⇒ λalu.Some ? (n_flag_HC05 alu)
- | HC08 ⇒ λalu.Some ? (n_flag_HC08 alu)
- | HCS08 ⇒ λalu.Some ? (n_flag_HC08 alu)
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.None ? ]
- (alu m t s).
-
-(* getter di Z, esiste sempre *)
-ndefinition get_z_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type bool with
- [ HC05 ⇒ z_flag_HC05
- | HC08 ⇒ z_flag_HC08
- | HCS08 ⇒ z_flag_HC08
- | RS08 ⇒ z_flag_RS08
- | IP2022 ⇒ z_flag_IP2022 ]
- (alu m t s).
-
-(* getter di C, esiste sempre *)
-ndefinition get_c_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type bool with
- [ HC05 ⇒ c_flag_HC05
- | HC08 ⇒ c_flag_HC08
- | HCS08 ⇒ c_flag_HC08
- | RS08 ⇒ c_flag_RS08
- | IP2022 ⇒ c_flag_IP2022 ]
- (alu m t s).
-
-(* getter di IRQ, non esiste sempre *)
-ndefinition get_irq_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option bool) with
- [ HC05 ⇒ λalu.Some ? (irq_flag_HC05 alu)
- | HC08 ⇒ λalu.Some ? (irq_flag_HC08 alu)
- | HCS08 ⇒ λalu.Some ? (irq_flag_HC08 alu)
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.None ? ]
- (alu m t s).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/HC05_status_lemmas.ma".
-include "emulator/status/HC08_status_lemmas.ma".
-include "emulator/status/RS08_status_lemmas.ma".
-include "emulator/status/IP2022_status_lemmas.ma".
-include "emulator/status/status.ma".
-include "common/option_lemmas.ma".
-include "common/prod_lemmas.ma".
-include "emulator/opcodes/pseudo_lemmas.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-nlemma symmetric_eqclk : ∀m.∀clk1,clk2.eq_clk m clk1 clk2 = eq_clk m clk2 clk1.
- #m;
- napply (symmetric_eqoption ? (eq_quintuple …) (symmetric_eqquintuple …));
- ##[ ##1: napply symmetric_eqw16
- ##| ##2: napply symmetric_eqb8
- ##| ##3: napply (symmetric_eqim m)
- ##| ##4: napply (symmetric_eqpseudo m)
- ##| ##5: napply symmetric_eqb8
- ##]
-nqed.
-
-nlemma eqclk_to_eq : ∀m.∀clk1,clk2.eq_clk m clk1 clk2 = true → clk1 = clk2.
- #m;
- napply (eqoption_to_eq ? (eq_quintuple …) (eqquintuple_to_eq …));
- ##[ ##1: napply eqw16_to_eq
- ##| ##2: napply eqb8_to_eq
- ##| ##3: napply (eqim_to_eq m)
- ##| ##4: napply (eqpseudo_to_eq m)
- ##| ##5: napply eqb8_to_eq
- ##]
-nqed.
-
-nlemma eq_to_eqclk : ∀m.∀clk1,clk2.(clk1 = clk2) → (eq_clk m clk1 clk2 = true).
- #m;
- napply (eq_to_eqoption ? (eq_quintuple …) (eq_to_eqquintuple …));
- ##[ ##1: napply eq_to_eqw16
- ##| ##2: napply eq_to_eqb8
- ##| ##3: napply (eq_to_eqim m)
- ##| ##4: napply (eq_to_eqpseudo m)
- ##| ##5: napply eq_to_eqb8
- ##]
-nqed.
-
-nlemma neqclk_to_neq : ∀m.∀clk1,clk2.eq_clk m clk1 clk2 = false → clk1 ≠ clk2.
- #m;
- napply (neqoption_to_neq ? (eq_quintuple …) (neqquintuple_to_neq …));
- ##[ ##1: napply neqw16_to_neq
- ##| ##2: napply neqb8_to_neq
- ##| ##3: napply (neqim_to_neq m)
- ##| ##4: napply (neqpseudo_to_neq m)
- ##| ##5: napply neqb8_to_neq
- ##]
-nqed.
-
-nlemma neq_to_neqclk : ∀m.∀clk1,clk2.(clk1 ≠ clk2) → (eq_clk m clk1 clk2 = false).
- #m;
- napply (neq_to_neqoption ? (eq_quintuple …) (neq_to_neqquintuple …));
- ##[ ##1: napply neq_to_neqw16
- ##| ##2: napply neq_to_neqb8
- ##| ##3: napply (neq_to_neqim m)
- ##| ##4: napply (neq_to_neqpseudo m)
- ##| ##5: napply neq_to_neqb8
- ##| ##6: napply decidable_w16
- ##| ##7: napply decidable_b8
- ##| ##8: napply (decidable_im m)
- ##| ##9: napply (decidable_pseudo m)
- ##| ##10: napply decidable_b8
- ##]
-nqed.
-
-nlemma decidable_clk : ∀m.∀clk1,clk2:option (aux_clk_type m).decidable (clk1 = clk2).
- #m;
- napply (decidable_option ? (decidable_quintuple …));
- ##[ ##1: napply decidable_w16
- ##| ##2: napply decidable_b8
- ##| ##3: napply (decidable_im m)
- ##| ##4: napply (decidable_pseudo m)
- ##| ##5: napply decidable_b8
- ##]
-nqed.
-
-nlemma symmetric_forallmemoryranged :
-∀t.∀chk1,chk2:aux_chk_type t.∀mem1,mem2:aux_mem_type t.∀addrl.
- forall_memory_ranged t chk1 chk2 mem1 mem2 addrl =
- forall_memory_ranged t chk2 chk1 mem2 mem1 addrl.
- #t; #chk1; #chk2; #mem1; #mem2; #addrl;
- nelim addrl;
- ##[ ##1: nnormalize; napply refl_eq
- ##| ##2: #a; #l; #H;
- nchange with (
- ((eq_option byte8 eq_b8 (mem_read t mem1 chk1 a)
- (mem_read t mem2 chk2 a)) ⊗
- (forall_memory_ranged t chk1 chk2 mem1 mem2 l)) =
- ((eq_option byte8 eq_b8 (mem_read t mem2 chk2 a)
- (mem_read t mem1 chk1 a)) ⊗
- (forall_memory_ranged t chk2 chk1 mem2 mem1 l)));
- nrewrite > H;
- nrewrite > (symmetric_eqoption ? eq_b8 symmetric_eqb8 (mem_read t mem1 chk1 a) (mem_read t mem2 chk2 a));
- napply refl_eq
- ##]
-nqed.
-
-nlemma anystatus_destruct_1 :
-∀m,t.∀x1,x2,x3,x4,y1,y2,y3,y4.
- mk_any_status m t x1 x2 x3 x4 = mk_any_status m t y1 y2 y3 y4 →
- x1 = y1.
- #m; #t;
- #x1; #x2; #x3; #x4;
- #y1; #y2; #y3; #y4; #H;
- nchange with (match mk_any_status m t y1 y2 y3 y4
- with [ mk_any_status a _ _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma anystatus_destruct_2 :
-∀m,t.∀x1,x2,x3,x4,y1,y2,y3,y4.
- mk_any_status m t x1 x2 x3 x4 = mk_any_status m t y1 y2 y3 y4 →
- x2 = y2.
- #m; #t;
- #x1; #x2; #x3; #x4;
- #y1; #y2; #y3; #y4; #H;
- nchange with (match mk_any_status m t y1 y2 y3 y4
- with [ mk_any_status _ a _ _ ⇒ x2 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma anystatus_destruct_3 :
-∀m,t.∀x1,x2,x3,x4,y1,y2,y3,y4.
- mk_any_status m t x1 x2 x3 x4 = mk_any_status m t y1 y2 y3 y4 →
- x3 = y3.
- #m; #t;
- #x1; #x2; #x3; #x4;
- #y1; #y2; #y3; #y4; #H;
- nchange with (match mk_any_status m t y1 y2 y3 y4
- with [ mk_any_status _ _ a _ ⇒ x3 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma anystatus_destruct_4 :
-∀m,t.∀x1,x2,x3,x4,y1,y2,y3,y4.
- mk_any_status m t x1 x2 x3 x4 = mk_any_status m t y1 y2 y3 y4 →
- x4 = y4.
- #m; #t;
- #x1; #x2; #x3; #x4;
- #y1; #y2; #y3; #y4; #H;
- nchange with (match mk_any_status m t y1 y2 y3 y4
- with [ mk_any_status _ _ _ a ⇒ x4 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-naxiom symmetric_eqanystatus :
-∀addrl:list word32.∀m:mcu_type.∀t:memory_impl.∀s1,s2:any_status m t.
- eq_anystatus m t s1 s2 addrl = eq_anystatus m t s2 s1 addrl.
-(* !!! si blocca su symmetric_eqalu_HC05 *)
-(* #addrl; #m; ncases m; #t; #s1;
- ##[ ##1: nelim s1; #x1; #x2; #x3; #x4;
- #s2; nelim s2; #y1; #y2; #y3; #y4;
- nchange with (
- ((eq_HC05_alu x1 y1) ⊗ (forall_memory_ranged t x3 y3 x2 y2 addrl) ⊗ (eq_clk HC05 x4 y4)) =
- ((eq_HC05_alu y1 x1) ⊗ (forall_memory_ranged t y3 x3 y2 x2 addrl) ⊗ (eq_clk HC05 y4 x4)));
- nrewrite > (symmetric_eqaluHC05 x1 y1)
- ##| ##2,3: ncases s1; #x1; #x2; #x3; #x4;
- #s2; ncases s2; #y1; #y2; #y3; #y4;
- nchange with (
- ((eq_aluHC08 x1 y1) ⊗ (forall_memory_ranged t x3 y3 x2 y2 addrl) ⊗ (eq_clk ? x4 y4)) =
- ((eq_aluHC08 y1 x1) ⊗ (forall_memory_ranged t y3 x3 y2 x2 addrl) ⊗ (eq_clk ? y4 x4)));
- nrewrite > (symmetric_eqaluHC08 x1 y1)
- ##| ##4: ncases s1; #x1; #x2; #x3; #x4;
- #s2; ncases s2; #y1; #y2; #y3; #y4;
- nchange with (
- ((eq_aluRS08 x1 y1) ⊗ (forall_memory_ranged t x3 y3 x2 y2 addrl) ⊗ (eq_clk RS08 x4 y4)) =
- ((eq_aluRS08 y1 x1) ⊗ (forall_memory_ranged t y3 x3 y2 x2 addrl) ⊗ (eq_clk RS08 y4 x4)));
- nrewrite > (symmetric_eqaluRS08 x1 y1)
- ##| ##5: ...
- ##]
- nrewrite > (symmetric_forallmemoryranged t x3 y3 x2 y2 addrl);
- nrewrite > (symmetric_eqclk ? x4 y4);
- napply refl_eq.
-nqed.*)
-
-nlemma eqanystatus_to_eq :
-∀addrl:list word32.∀m:mcu_type.∀t:memory_impl.∀s1,s2:any_status m t.
- (eq_anystatus m t s1 s2 addrl = true) →
- And3 (alu m t s1 = alu m t s2)
- (clk_desc m t s1 = clk_desc m t s2)
- ((forall_memory_ranged t (chk_desc m t s1) (chk_desc m t s2)
- (mem_desc m t s1) (mem_desc m t s2) addrl) = true).
- #addrl; #m; #t;
- ncases m; #s1;
- ncases s1; #x1; #x2; #x3; #x4;
- #s2; ncases s2; #y1; #y2; #y3; #y4; #H;
- ##[ ##1: nchange in H:(%) with (
- ((eq_HC05_alu x1 y1) ⊗ (forall_memory_ranged t x3 y3 x2 y2 addrl) ⊗ (eq_clk ? x4 y4)) = true);
- nrewrite > (eqaluHC05_to_eq … (andb_true_true_l … (andb_true_true_l … H)))
- ##| ##2,3: nchange in H:(%) with (
- ((eq_HC08_alu x1 y1) ⊗ (forall_memory_ranged t x3 y3 x2 y2 addrl) ⊗ (eq_clk ? x4 y4)) = true);
- nrewrite > (eqaluHC08_to_eq … (andb_true_true_l … (andb_true_true_l … H)))
- ##| ##4: nchange in H:(%) with (
- ((eq_RS08_alu x1 y1) ⊗ (forall_memory_ranged t x3 y3 x2 y2 addrl) ⊗ (eq_clk ? x4 y4)) = true);
- nrewrite > (eqaluRS08_to_eq … (andb_true_true_l … (andb_true_true_l … H)))
- ##| ##5: nchange in H:(%) with (
- ((eq_IP2022_alu x1 y1) ⊗ (forall_memory_ranged t x3 y3 x2 y2 addrl) ⊗ (eq_clk ? x4 y4)) = true);
- nrewrite > (eqaluIP2022_to_eq … (andb_true_true_l … (andb_true_true_l … H)))
- ##]
- nchange with (And3 (y1 = y1) (x4 = y4) (forall_memory_ranged t x3 y3 x2 y2 addrl = true));
- nrewrite > (andb_true_true_r … (andb_true_true_l … H));
- nrewrite > (eqclk_to_eq … (andb_true_true_r … H));
- napply (conj3 … (refl_eq ? y1) (refl_eq ? y4) (refl_eq ? true)).
-nqed.
-
-naxiom eq_to_eqanystatus :
-∀addrl:list word32.∀m:mcu_type.∀t:memory_impl.∀s1,s2:any_status m t.
- (alu m t s1 = alu m t s2) →
- (clk_desc m t s1 = clk_desc m t s2) →
- ((forall_memory_ranged t (chk_desc m t s1) (chk_desc m t s2)
- (mem_desc m t s1) (mem_desc m t s2) addrl) = true) →
- (eq_anystatus m t s1 s2 addrl = true).
-(* !!! si blocca su symmetric_eqalu_HC05 *)
-(* #addrl; #m; #t;
- ncases m; #s1; ncases s1; #x1; #x2; #x3; #x4;
- #s2; ncases s2; #y1; #y2; #y3; #y4; #H; #H1; #H2;
- ##[ ##1: nchange with (((eq_HC05_alu x1 y1) ⊗ (forall_memory_ranged t x3 y3 x2 y2 addrl) ⊗ (eq_clk ? x4 y4)) = true);
- nchange in H:(%) with (x1 = y1);
- nrewrite > H;
- nrewrite > (eq_to_eqaluHC05 y1 y1 (refl_eq …))
- ##| ##2,3: nchange with (((eq_HC08_alu x1 y1) ⊗ (forall_memory_ranged t x3 y3 x2 y2 addrl) ⊗ (eq_clk ? x4 y4)) = true);
- nchange in H:(%) with (x1 = y1);
- nrewrite > H;
- nrewrite > (eq_to_eqaluHC08 y1 y1 (refl_eq …))
- ##| ##4: nchange with (((eq_RS08_alu x1 y1) ⊗ (forall_memory_ranged t x3 y3 x2 y2 addrl) ⊗ (eq_clk ? x4 y4)) = true);
- nchange in H:(%) with (x1 = y1);
- nrewrite > H;
- nrewrite > (eq_to_eqaluRS08 y1 y1 (refl_eq …))
- ##| ##5: ...
- ##]
- nchange in H2:(%) with (forall_memory_ranged t x3 y3 x2 y2 addrl = true);
- nrewrite > H2;
- nchange in H1:(%) with (x4 = y4);
- nrewrite > H1;
- nrewrite > (eq_to_eqclk ? y4 y4 (refl_eq …));
- nnormalize;
- napply refl_eq.
-nqed.*)
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status.ma".
-
-(* ***************************** *)
-(* SETTER SPECIFICI FORTI/DEBOLI *)
-(* ***************************** *)
-
-(* funzione ausiliaria per il tipaggio dei setter forti *)
-ndefinition aux_set_type ≝ λx:Type.λm:mcu_type.
- match m with [ HC05 ⇒ alu_HC05 | HC08 ⇒ alu_HC08 | HCS08 ⇒ alu_HC08 | RS08 ⇒ alu_RS08
- | IP2022 ⇒ alu_IP2022 ]
- → x →
- match m with [ HC05 ⇒ alu_HC05 | HC08 ⇒ alu_HC08 | HCS08 ⇒ alu_HC08 | RS08 ⇒ alu_RS08
- | IP2022 ⇒ alu_IP2022 ].
-
-(* funzione ausiliaria per il tipaggio dei setter deboli *)
-ndefinition aux_set_type_opt ≝ λx:Type.λm:mcu_type.option
- (match m with [ HC05 ⇒ alu_HC05 | HC08 ⇒ alu_HC08 | HCS08 ⇒ alu_HC08 | RS08 ⇒ alu_RS08
- | IP2022 ⇒ alu_IP2022 ]
- → x →
- match m with [ HC05 ⇒ alu_HC05 | HC08 ⇒ alu_HC08 | HCS08 ⇒ alu_HC08 | RS08 ⇒ alu_RS08
- | IP2022 ⇒ alu_IP2022 ]).
-
-(* DESCRITTORI ESTERNI ALLA ALU *)
-
-(* setter forte della ALU *)
-ndefinition set_alu ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λalu'.
- mk_any_status m t alu' (mem_desc m t s) (chk_desc m t s) (clk_desc m t s).
-
-(* setter forte della memoria *)
-ndefinition set_mem_desc ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λmem':aux_mem_type t.
- mk_any_status m t (alu m t s) mem' (chk_desc m t s) (clk_desc m t s).
-
-(* setter forte del descrittore *)
-ndefinition set_chk_desc ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λchk':aux_chk_type t.
- mk_any_status m t (alu m t s) (mem_desc m t s) chk' (clk_desc m t s).
-
-(* setter forte del clik *)
-ndefinition set_clk_desc ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
-λclk':option (aux_clk_type m).
- mk_any_status m t (alu m t s) (mem_desc m t s) (chk_desc m t s) clk'.
-
-(* REGISTRO A *)
-
-(* setter forte di A *)
-ndefinition set_acc_8_low_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval:byte8.
- set_alu m t s
- (match m return aux_set_type byte8 with
- [ HC05 ⇒ set_acc_8_low_reg_HC05
- | HC08 ⇒ set_acc_8_low_reg_HC08
- | HCS08 ⇒ set_acc_8_low_reg_HC08
- | RS08 ⇒ set_acc_8_low_reg_RS08
- | IP2022 ⇒ set_acc_8_low_reg_IP2022
- ] (alu m t s) val).
-
-(* REGISTRO X *)
-
-ndefinition set_indX_8_low_reg_sHC05 ≝
-λt:memory_impl.λs:any_status HC05 t.λval.
- set_alu … s (set_indX_8_low_reg_HC05 (alu … s) val).
-
-ndefinition set_indX_8_low_reg_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_indX_8_low_reg_HC08 (alu … s) val).
-
-ndefinition set_indX_8_low_reg_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_indX_8_low_reg_HC08 (alu … s) val).
-
-(* setter forte di X *)
-ndefinition set_indX_8_low_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → byte8 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.Some ? (set_indX_8_low_reg_sHC05 t s val)
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_indX_8_low_reg_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_indX_8_low_reg_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di X *)
-ndefinition setweak_indX_8_low_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_indX_8_low_reg m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO H *)
-
-ndefinition set_indX_8_high_reg_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_indX_8_high_reg_HC08 (alu … s) val).
-
-ndefinition set_indX_8_high_reg_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_indX_8_high_reg_HC08 (alu … s) val).
-
-(* setter forte di H *)
-ndefinition set_indX_8_high_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → byte8 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_indX_8_high_reg_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_indX_8_high_reg_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di H *)
-ndefinition setweak_indX_8_high_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_indX_8_high_reg m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO H:X *)
-
-ndefinition set_indX_16_reg_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_indX_16_reg_HC08 (alu … s) val).
-
-ndefinition set_indX_16_reg_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_indX_16_reg_HC08 (alu … s) val).
-
-(* setter forte di H:X *)
-ndefinition set_indX_16_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word16 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_indX_16_reg_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_indX_16_reg_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di H:X *)
-ndefinition setweak_indX_16_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_indX_16_reg m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO SP *)
-
-ndefinition set_sp_reg_sHC05 ≝
-λt:memory_impl.λs:any_status HC05 t.λval.
- set_alu … s (set_sp_reg_HC05 (alu … s) val).
-
-ndefinition set_sp_reg_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_sp_reg_HC08 (alu … s) val).
-
-ndefinition set_sp_reg_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_sp_reg_HC08 (alu … s) val).
-
-ndefinition set_sp_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_sp_reg_IP2022 (alu … s) val).
-
-(* setter forte di SP *)
-ndefinition set_sp_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word16 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.Some ? (set_sp_reg_sHC05 t s val)
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_sp_reg_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_sp_reg_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_sp_reg_sIP2022 t s val)
- ].
-
-(* setter debole di SP *)
-ndefinition setweak_sp_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_sp_reg m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO PC *)
-
-(* setter forte di PC *)
-ndefinition set_pc_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λpc':word16.
- set_alu m t s
- (match m return aux_set_type word16 with
- [ HC05 ⇒ set_pc_reg_HC05
- | HC08 ⇒ set_pc_reg_HC08
- | HCS08 ⇒ set_pc_reg_HC08
- | RS08 ⇒ set_pc_reg_RS08
- | IP2022 ⇒ set_pc_reg_IP2022
- ] (alu m t s) pc').
-
-(* REGISTRO SPC *)
-
-ndefinition set_spc_reg_sRS08 ≝
-λt:memory_impl.λs:any_status RS08 t.λval.
- set_alu … s (set_spc_reg_RS08 (alu … s) val).
-
-(* setter forte di SPC *)
-ndefinition set_spc_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word16 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.Some ? (set_spc_reg_sRS08 t s val)
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di SPC *)
-ndefinition setweak_spc_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_spc_reg m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO MULH *)
-
-ndefinition set_mulh_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_mulh_reg_IP2022 (alu … s) val).
-
-(* setter forte di MULH *)
-ndefinition set_mulh_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → byte8 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_mulh_reg_sIP2022 t s val)
- ].
-
-(* setter debole di MULH *)
-ndefinition setweak_mulh_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_mulh_reg m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO ADDRSEL *)
-
-ndefinition set_addrsel_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_addrsel_reg_IP2022 (alu … s) val).
-
-(* setter forte di ADDRSEL *)
-ndefinition set_addrsel_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → byte8 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_addrsel_reg_sIP2022 t s val)
- ].
-
-(* setter debole di ADDRSEL *)
-ndefinition setweak_addrsel_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_addrsel_reg m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO ADDR *)
-
-ndefinition set_addr_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_addr_reg_IP2022 (alu … s) val).
-
-(* setter forte di ADDR *)
-ndefinition set_addr_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word24 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_addr_reg_sIP2022 t s val)
- ].
-
-(* setter debole di ADDR *)
-ndefinition setweak_addr_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_addr_reg m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO CALL *)
-
-ndefinition set_call_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_call_reg_IP2022 (alu … s) val).
-
-(* setter forte di CALL *)
-ndefinition set_call_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word16 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_call_reg_sIP2022 t s val)
- ].
-
-(* setter debole di CALL *)
-ndefinition setweak_call_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_call_reg m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO CALL [push] *)
-
-ndefinition push_call_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (push_call_reg_IP2022 (alu … s) val).
-
-(* push forte di CALL *)
-ndefinition push_call_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word16 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (push_call_reg_sIP2022 t s val)
- ].
-
-(* REGISTRO CALL [pop] *)
-
-ndefinition pop_call_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.
- match pop_call_reg_IP2022 (alu … s) with
- [ pair val alu' ⇒ pair … val (set_alu … s alu') ].
-
-(* pop forte di CALL *)
-ndefinition pop_call_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → option (ProdT word16 (any_status m t))
- with
- [ HC05 ⇒ λs:any_status ? t.None ?
- | HC08 ⇒ λs:any_status ? t.None ?
- | HCS08 ⇒ λs:any_status ? t.None ?
- | RS08 ⇒ λs:any_status ? t.None ?
- | IP2022 ⇒ λs:any_status ? t.Some ? (pop_call_reg_sIP2022 t s)
- ].
-
-(* REGISTRO IP *)
-
-ndefinition set_ip_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_ip_reg_IP2022 (alu … s) val).
-
-(* setter forte di IP *)
-ndefinition set_ip_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word16 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_ip_reg_sIP2022 t s val)
- ].
-
-(* setter debole di IP *)
-ndefinition setweak_ip_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_ip_reg m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO DP *)
-
-ndefinition set_dp_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_dp_reg_IP2022 (alu … s) val).
-
-(* setter forte di DP *)
-ndefinition set_dp_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word16 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_dp_reg_sIP2022 t s val)
- ].
-
-(* setter debole di DP *)
-ndefinition setweak_dp_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_dp_reg m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO DATA *)
-
-ndefinition set_data_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_data_reg_IP2022 (alu … s) val).
-
-(* setter forte di DATA *)
-ndefinition set_data_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word16 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_data_reg_sIP2022 t s val)
- ].
-
-(* setter debole di DATA *)
-ndefinition setweak_data_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_data_reg m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO SPEED *)
-
-ndefinition set_speed_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_speed_reg_IP2022 (alu … s) val).
-
-(* setter forte di SPEED *)
-ndefinition set_speed_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → exadecim → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_speed_reg_sIP2022 t s val)
- ].
-
-(* setter debole di SPEED *)
-ndefinition setweak_speed_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_speed_reg m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO PAGE *)
-
-ndefinition set_page_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_page_reg_IP2022 (alu … s) val).
-
-(* setter forte di PAGE *)
-ndefinition set_page_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → oct → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_page_reg_sIP2022 t s val)
- ].
-
-(* setter debole di PAGE *)
-ndefinition setweak_page_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_page_reg m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO MEMORY MAPPED X *)
-
-ndefinition set_x_map_sRS08 ≝
-λt:memory_impl.λs:any_status RS08 t.λval.
- set_alu … s (set_x_map_RS08 (alu … s) val).
-
-(* setter forte di memory mapped X *)
-ndefinition set_x_map ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → byte8 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.Some ? (set_x_map_sRS08 t s val)
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di memory mapped X *)
-ndefinition setweak_x_map ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_x_map m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO MEMORY MAPPED PS *)
-
-ndefinition set_ps_map_sRS08 ≝
-λt:memory_impl.λs:any_status RS08 t.λval.
- set_alu … s (set_ps_map_RS08 (alu … s) val).
-
-(* setter forte di memory mapped PS *)
-ndefinition set_ps_map ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → byte8 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.Some ? (set_ps_map_sRS08 t s val)
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di memory mapped PS *)
-ndefinition setweak_ps_map ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_ps_map m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* MODALITA SKIP *)
-
-ndefinition set_skip_mode_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_skip_mode_IP2022 (alu … s) val).
-
-(* setter forte di modalita SKIP *)
-ndefinition set_skip_mode ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → bool → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_skip_mode_sIP2022 t s val)
- ].
-
-(* setter debole di SKIP *)
-ndefinition setweak_skip_mode ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_skip_mode m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* FLAG V *)
-
-ndefinition set_v_flag_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_v_flag_HC08 (alu … s) val).
-
-ndefinition set_v_flag_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_v_flag_HC08 (alu … s) val).
-
-(* setter forte di V *)
-ndefinition set_v_flag ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → bool → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_v_flag_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_v_flag_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di V *)
-ndefinition setweak_v_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_v_flag m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* FLAG H *)
-
-ndefinition set_h_flag_sHC05 ≝
-λt:memory_impl.λs:any_status HC05 t.λval.
- set_alu … s (set_h_flag_HC05 (alu … s) val).
-
-ndefinition set_h_flag_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_h_flag_HC08 (alu … s) val).
-
-ndefinition set_h_flag_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_h_flag_HC08 (alu … s) val).
-
-ndefinition set_h_flag_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_h_flag_IP2022 (alu … s) val).
-
-(* setter forte di H *)
-ndefinition set_h_flag ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → bool → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.Some ? (set_h_flag_sHC05 t s val)
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_h_flag_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_h_flag_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_h_flag_sIP2022 t s val)
- ].
-
-(* setter debole di H *)
-ndefinition setweak_h_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_h_flag m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* FLAG I *)
-
-ndefinition set_i_flag_sHC05 ≝
-λt:memory_impl.λs:any_status HC05 t.λval.
- set_alu … s (set_i_flag_HC05 (alu … s) val).
-
-ndefinition set_i_flag_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_i_flag_HC08 (alu … s) val).
-
-ndefinition set_i_flag_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_i_flag_HC08 (alu … s) val).
-
-(* setter forte di I *)
-ndefinition set_i_flag ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → bool → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.Some ? (set_i_flag_sHC05 t s val)
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_i_flag_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_i_flag_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di I *)
-ndefinition setweak_i_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_i_flag m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* FLAG N *)
-
-ndefinition set_n_flag_sHC05 ≝
-λt:memory_impl.λs:any_status HC05 t.λval.
- set_alu … s (set_n_flag_HC05 (alu … s) val).
-
-ndefinition set_n_flag_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_n_flag_HC08 (alu … s) val).
-
-ndefinition set_n_flag_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_n_flag_HC08 (alu … s) val).
-
-(* setter forte di N *)
-ndefinition set_n_flag ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → bool → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.Some ? (set_n_flag_sHC05 t s val)
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_n_flag_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_n_flag_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di N *)
-ndefinition setweak_n_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_n_flag m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* FLAG Z *)
-
-(* setter forte di Z *)
-ndefinition set_z_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λzfl':bool.
- set_alu m t s
- (match m return aux_set_type bool with
- [ HC05 ⇒ set_z_flag_HC05
- | HC08 ⇒ set_z_flag_HC08
- | HCS08 ⇒ set_z_flag_HC08
- | RS08 ⇒ set_z_flag_RS08
- | IP2022 ⇒ set_z_flag_IP2022
- ] (alu m t s) zfl').
-
-(* FLAG C *)
-
-(* setter forte di C *)
-ndefinition set_c_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcfl':bool.
- set_alu m t s
- (match m return aux_set_type bool with
- [ HC05 ⇒ set_c_flag_HC05
- | HC08 ⇒ set_c_flag_HC08
- | HCS08 ⇒ set_c_flag_HC08
- | RS08 ⇒ set_c_flag_RS08
- | IP2022 ⇒ set_c_flag_IP2022
- ] (alu m t s) cfl').
-
-(* FLAG IRQ *)
-
-ndefinition set_irq_flag_sHC05 ≝
-λt:memory_impl.λs:any_status HC05 t.λval.
- set_alu … s (set_irq_flag_HC05 (alu … s) val).
-
-ndefinition set_irq_flag_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_irq_flag_HC08 (alu … s) val).
-
-ndefinition set_irq_flag_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_irq_flag_HC08 (alu … s) val).
-
-(* setter forte di IRQ *)
-ndefinition set_irq_flag ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → bool → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.Some ? (set_irq_flag_sHC05 t s val)
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_irq_flag_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_irq_flag_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di IRQ *)
-ndefinition setweak_irq_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_irq_flag m t s val with
- [ None ⇒ s | Some s' ⇒ s' ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/tests/medium_tests_tools.ma".
-include "common/list_utility.ma".
-include "common/nat_to_num.ma".
-include "emulator/model/model.ma".
-
-(* ************************ *)
-(* HCS08GB60 String Reverse *)
-(* ************************ *)
-
-(* versione ridotta, in cui non si riazzerano gli elementi di counters *)
-ndefinition dTest_HCS08_sReverse_source : word16 → (list byte8) ≝
-λelems:word16.source_to_byte8 HCS08 (
-(* BEFORE: A=0x00 H:X=0x0D4B SP=0x0D4A PC=0x18E0 Z=true *)
-
-(* static unsigned char dati[3072]={...};
-
- void swap(unsigned char *a, unsigned char *b)
- { unsigned char tmp=*a; *a=*b; *b=tmp; return; } *)
-
-(* [0x18C8] allineamento *) (compile HCS08 ? NOP maINH ?) @
-
-(* argomenti: HX e [0x0D49-A], passaggio ibrido reg, stack *)
-(* [0x18C9] PSHX *) (compile HCS08 ? PSHX maINH ?) @
-(* [0x18CA] PSHH *) (compile HCS08 ? PSHH maINH ?) @
-(* [0x18CB] LDHX 5,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x5〉) ?) @
-(* [0x18CE] LDA ,X *) (compile HCS08 ? LDA maIX0 ?) @
-(* [0x18CF] LDHX 1,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x1〉) ?) @
-(* [0x18D2] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x18D3] LDA ,X *) (compile HCS08 ? LDA maIX0 ?) @
-(* [0x18D4] LDHX 6,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x6〉) ?) @
-(* [0x18D7] STA ,X *) (compile HCS08 ? STA maIX0 ?) @
-(* [0x18D8] LDHX 2,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x2〉) ?) @
-(* [0x18DB] PULA *) (compile HCS08 ? PULA maINH ?) @
-(* [0x18DC] STA ,X *) (compile HCS08 ? STA maIX0 ?) @
-(* [0x18DD] AIS #2 *) (compile HCS08 ? AIS (maIMM1 〈x0,x2〉) ?) @
-(* [0x18DF] RTS *) (compile HCS08 ? RTS maINH ?) @
-
-(* void main(void)
- {
- unsigned int pos=0,limit=0;
-
- for(limit=3072;pos<(limit/2);pos++)
- { swap(&dati[pos],&dati[limit-pos-1]); } *)
-
-(* [0x18E0] LDHX #elems *) (compile HCS08 ? LDHX (maIMM2 elems) ?) @
-(* [0x18E3] STHX 4,SP *) (compile HCS08 ? STHX (maSP1 〈x0,x4〉) ?) @
-(* [0x18E6] BRA *+52 ; 191A *) (compile HCS08 ? BRA (maIMM1 〈x3,x2〉) ?) @
-(* [0x18E8] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x18E9] LDA 2,X *) (compile HCS08 ? LDA (maIX1 〈x0,x2〉) ?) @
-(* [0x18EB] ADD #0x00 *) (compile HCS08 ? ADD (maIMM1 〈x0,x0〉) ?) @
-(* [0x18ED] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x18EE] LDA 1,X *) (compile HCS08 ? LDA (maIX1 〈x0,x1〉) ?) @
-(* [0x18F0] ADC #0x01 *) (compile HCS08 ? ADC (maIMM1 〈x0,x1〉) ?) @
-(* [0x18F2] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x18F3] LDA 4,X *) (compile HCS08 ? LDA (maIX1 〈x0,x4〉) ?) @
-(* [0x18F5] SUB 2,X *) (compile HCS08 ? SUB (maIX1 〈x0,x2〉) ?) @
-(* [0x18F7] STA ,X *) (compile HCS08 ? STA maIX0 ?) @
-(* [0x18F8] LDA 3,X *) (compile HCS08 ? LDA (maIX1 〈x0,x3〉) ?) @
-(* [0x18FA] SBC 1,X *) (compile HCS08 ? SBC (maIX1 〈x0,x1〉) ?) @
-(* [0x18FC] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x18FD] LDX ,X *) (compile HCS08 ? LDX maIX0 ?) @
-(* [0x18FE] PULH *) (compile HCS08 ? PULH maINH ?) @
-(* [0x18FF] AIX #-1 *) (compile HCS08 ? AIX (maIMM1 〈xF,xF〉) ?) @
-(* [0x1901] TXA *) (compile HCS08 ? TXA maINH ?) @
-(* [0x1902] ADD #0x00 *) (compile HCS08 ? ADD (maIMM1 〈x0,x0〉) ?) @
-(* [0x1904] PSHH *) (compile HCS08 ? PSHH maINH ?) @
-(* [0x1905] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x1906] STA 3,X *) (compile HCS08 ? STA (maIX1 〈x0,x3〉) ?) @
-(* [0x1908] PULA *) (compile HCS08 ? PULA maINH ?) @
-(* [0x1909] ADC #0x01 *) (compile HCS08 ? ADC (maIMM1 〈x0,x1〉) ?) @
-(* [0x190B] LDX 3,X *) (compile HCS08 ? LDX (maIX1 〈x0,x3〉) ?) @
-(* [0x190D] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x190E] PULH *) (compile HCS08 ? PULH maINH ?) @
-(* [0x190F] BSR *-70 ; 18C9 *) (compile HCS08 ? BSR (maIMM1 〈xB,x8〉) ?) @
-(* [0x1911] AIS #2 *) (compile HCS08 ? AIS (maIMM1 〈x0,x2〉) ?) @
-(* [0x1913] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x1914] INC 2,X *) (compile HCS08 ? INC (maIX1 〈x0,x2〉) ?) @
-(* [0x1916] BNE *+4 ; 191A *) (compile HCS08 ? BNE (maIMM1 〈x0,x2〉) ?) @
-(* [0x1918] INC 1,X *) (compile HCS08 ? INC (maIX1 〈x0,x1〉) ?) @
-(* [0x191A] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x191B] LDA 3,X *) (compile HCS08 ? LDA (maIX1 〈x0,x3〉) ?) @
-(* [0x191D] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x191E] PULH *) (compile HCS08 ? PULH maINH ?) @
-(* [0x191F] LSRA *) (compile HCS08 ? LSR maINHA ?) @
-(* [0x1920] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x1921] LDX 4,X *) (compile HCS08 ? LDX (maIX1 〈x0,x4〉) ?) @
-(* [0x1923] RORX *) (compile HCS08 ? ROR maINHX ?) @
-(* [0x1924] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x1925] PULH *) (compile HCS08 ? PULH maINH ?) @
-(* [0x1926] CPHX 2,SP *) (compile HCS08 ? CPHX (maSP1 〈x0,x2〉) ?) @
-(* [0x1929] BHI *-65 ; 18E8 *) (compile HCS08 ? BHI (maIMM1 〈xB,xD〉) ?)
-
-(* [0x192B] !FINE!
- attraverso simulazione in CodeWarrior si puo' enunciare che dopo
- 42+79*n+5*(n>>9) ci sara' il reverse di n byte (PARI) e
- H:X=n/2 *)
- ). napply I. nqed.
-
-(* creazione del processore+caricamento+impostazione registri *)
-ndefinition dTest_HCS08_sReverse_status ≝
-λt:memory_impl.
-λA_op:byte8.
-λHX_op:word16.
-λelems:word16.
-λdata:list byte8.
- set_acc_8_low_reg HCS08 t (* A<-A_op *)
- (set_z_flag HCS08 t (* Z<-true *)
- (setweak_sp_reg HCS08 t (* SP<-0x0D4A *)
- (setweak_indX_16_reg HCS08 t (* H:X<-HX_op *)
- (set_pc_reg HCS08 t (* PC<-0x18E0 *)
- (start_of_model HCS08 MC9S08GB60 t
- (load_from_source_at t (* carica data in RAM:dTest_HCS08_RAM *)
- (load_from_source_at t (zero_memory t) (* carica source in ROM:dTest_HCS08_prog *)
- (dTest_HCS08_sReverse_source elems) (extu_w32 dTest_HCS08_prog))
- data (extu_w32 dTest_HCS08_RAM))
- (build_memory_type_of_model HCS08 MC9S08GB60 t)
- (mk_byte8 x0 x0) (mk_byte8 x0 x0) (* non deterministici tutti a 0 *)
- false false false false false false) (* non deterministici tutti a 0 *)
- (mk_word16 (mk_byte8 x1 x8) (mk_byte8 xE x0)))
- HX_op)
- (mk_word16 (mk_byte8 x0 xD) (mk_byte8 x4 xA)))
- true)
- A_op.
-
-(* parametrizzazione dell'enunciato del teorema *)
-(* primo sbozzo: confronto esecuzione con hexdump... *)
-nlemma dTest_HCS08_sReverse_dump_aux ≝
-λt:memory_impl.λstring:list byte8.
- (* 1) la stringa deve avere una lunghezza ∈ [0,3072] *)
- (byte8_bounded_strlen string 〈〈x0,xC〉:〈x0,x0〉〉) ∧
- (* 2) la stringa deve avere lunghezza pari *)
- ((and_b8 (cnL ? (byte8_strlen string)) 〈x0,x1〉) = 〈x0,x0〉) ∧
- (* 3) match di esecuzione su tempo in forma di tempo esatto *)
- (match execute HCS08 t
- (* parametri IN: t,H:X,strlen(string),string *)
- (TickOK ? (dTest_HCS08_sReverse_status t 〈x0,x0〉 〈〈x0,xD〉:〈x4,xB〉〉 (byte8_strlen string) string))
- (* tempo di esecuzione 42+79*n+5*(n>>9) *)
- (nat42 + (nat79 * (len_list ? string))+(nat5 * ((len_list ? string) / nat512))) with
- [ TickERR s _ ⇒ None ?
- (* azzeramento tutta RAM tranne dati *)
- | TickSUSP s _ ⇒ None ?
- | TickOK s ⇒ Some ? (byte8_hexdump t (mem_desc HCS08 t s) (extu_w32 dTest_HCS08_RAM) (len_list ? string))
- ] =
- Some ? (reverse_list ? string)).
-
-(* confronto esecuzione con hexdump... *)
-(*
-lemma dTest_HCS08_sReverse_dump :
- dTest_HCS08_sReverse_dump_aux MEM_TREE dTest_random_32.
- unfold dTest_HCS08_sReverse_dump_aux;
- split;
- [ split; [ normalize in ⊢ (%); autobatch ] reflexivity ]
- reflexivity.
-qed.
-*)
-
-(* parametrizzazione dell'enunciato del teorema *)
-(* dimostrazione senza svolgimento degli stati *)
-nlemma dTest_HCS08_sReverse_aux ≝
-λt:memory_impl.λstring:list byte8.
- (* 1) la stringa deve avere una lunghezza ∈ [0,3072] *)
- (byte8_bounded_strlen string 〈〈x0,xC〉:〈x0,x0〉〉) ∧
- (* 2) la stringa deve avere lunghezza pari *)
- ((and_b8 (cnL ? (byte8_strlen string)) 〈x0,x1〉) = 〈x0,x0〉) ∧
- (* 3) match di esecuzione su tempo in forma di tempo esatto *)
- (match execute HCS08 t
- (* parametri IN: t,H:X,strlen(string),string *)
- (TickOK ? (dTest_HCS08_sReverse_status t 〈x0,x0〉 〈〈x0,xD〉:〈x4,xB〉〉 (byte8_strlen string) string))
- (* tempo di esecuzione 42+79*n+5*(n>>9) *)
- (nat42 + (nat79 * (len_list ? string))+(nat5 * ((len_list ? string) / nat512))) with
- [ TickERR s _ ⇒ None ?
- (* azzeramento tutta RAM tranne dati *)
- | TickSUSP s _ ⇒ None ?
- | TickOK s ⇒ Some ? (set_mem_desc HCS08 t s (load_from_source_at t (mem_desc HCS08 t s) dTest_zeros (extu_w32 〈〈x0,xD〉:〈x0,x0〉〉)))
- ] =
- Some ? (set_pc_reg HCS08 t
- (dTest_HCS08_sReverse_status t (snd … (shr_b8 (cnH ? (byte8_strlen string)))) (snd … (shr_w16 (byte8_strlen string))) (byte8_strlen string) (reverse_list ? string))
- (mk_word16 (mk_byte8 x1 x9) (mk_byte8 x2 xB)))).
-
-(*
-lemma dTest_HCS08_sReverse :
- dTest_HCS08_sReverse_aux MEM_TREE dTest_random_32.
- unfold dTest_HCS08_sReverse_aux;
- split;
- [ split; [ normalize in ⊢ (%); autobatch ] reflexivity ]
-
- rewrite > (breakpoint HCS08 MEM_TREE (TickOK ? (dTest_HCS08_sReverse_status MEM_TREE 〈〈x0,xD〉:〈x4,xB〉〉 (byte8_strlen dTest_random_32) dTest_random_32)) 3 (39+79*byte8_strlen dTest_random_32+5*(byte8_strlen dTest_random_32/512))) in ⊢ (? ? match % in tick_result return ? with [TickERR⇒?|TickSUSP⇒?|TickOK⇒?] ?);
- letin status0 ≝ (dTest_HCS08_sReverse_status MEM_TREE 〈〈x0,xD〉:〈x4,xB〉〉 (byte8_strlen dTest_random_32) dTest_random_32);
- change in ⊢ (? ? match ? ? ? (? ? ? % ?) ? in tick_result return ? with [TickERR⇒?|TickSUSP⇒?|TickOK⇒?] ?) with
- (TickOK ? status0);
- rewrite > (execute_HCS08_LDHX_maIMM2 MEM_TREE status0 〈x0,x0〉 〈x2,x0〉) in ⊢ (? ? match ? ? ? % ? in tick_result return ? with [TickERR⇒?|TickSUSP⇒?|TickOK⇒?] ?);
- [ 2,3,4,5: reflexivity; ]
-
- letin status1 ≝ (set_pc_reg HCS08 MEM_TREE (setweak_v_flag HCS08 MEM_TREE (setweak_n_flag HCS08 MEM_TREE (set_z_flag HCS08 MEM_TREE (set_alu HCS08 MEM_TREE (dTest_HCS08_sReverse_status MEM_TREE 〈〈x0,xD〉:〈x4,xB〉〉 (byte8_strlen dTest_random_32) dTest_random_32) (set_indX_16_reg_HC08 (alu HCS08 MEM_TREE (dTest_HCS08_sReverse_status MEM_TREE 〈〈x0,xD〉:〈x4,xB〉〉 (byte8_strlen dTest_random_32) dTest_random_32)) 〈〈x0,x0〉:〈x2,x0〉〉)) (eq_w16 〈〈x0,x0〉:〈x2,x0〉〉 〈〈x0,x0〉:〈x0,x0〉〉)) (MSB_w16 〈〈x0,x0〉:〈x2,x0〉〉)) false) (filtered_plus_w16 HCS08 MEM_TREE (dTest_HCS08_sReverse_status MEM_TREE 〈〈x0,xD〉:〈x4,xB〉〉 (byte8_strlen dTest_random_32) dTest_random_32) (get_pc_reg HCS08 MEM_TREE (dTest_HCS08_sReverse_status MEM_TREE 〈〈x0,xD〉:〈x4,xB〉〉 (byte8_strlen dTest_random_32) dTest_random_32)) 3));
- change in ⊢ (? ? match ? ? ? % ? in tick_result return ? with [TickERR⇒?|TickSUSP⇒?|TickOK⇒?] ?) with (TickOK ? status1);
-
- rewrite > (breakpoint HCS08 MEM_TREE (TickOK ? status1) 5 (34+79*byte8_strlen dTest_random_32+5*(byte8_strlen dTest_random_32/512))) in ⊢ (? ? match % in tick_result return ? with [TickERR⇒?|TickSUSP⇒?|TickOK⇒?] ?);
- change in ⊢ (? ? match ? ? ? (? ? ? % ?) ? in tick_result return ? with [TickERR⇒?|TickSUSP⇒?|TickOK⇒?] ?) with (TickOK ? status1);
- rewrite > (execute_HCS08_STHX_maSP1 status1 〈x0,x4〉)
- in ⊢ (? ? match ? ? ? % ? in tick_result return ? with [TickERR⇒?|TickSUSP⇒?|TickOK⇒?] ?);
- [ 2,3,4,5,6,7: reflexivity; ]
-
- elim daemon.
-
-qed.
-*)
-
-ndefinition sReverseCalc ≝
-λstring:list byte8.
- match execute HCS08 MEM_TREE
- (TickOK ? (dTest_HCS08_sReverse_status MEM_TREE 〈x0,x0〉 〈〈x0,xD〉:〈x4,xB〉〉 (byte8_strlen string) string))
- (nat42 + (nat79 * (len_list ? string))+(nat5 * ((len_list ? string) / nat512))) with
- [ TickERR s _ ⇒ None ?
- | TickSUSP s _ ⇒ None ?
- | TickOK s ⇒ Some ? (set_mem_desc HCS08 MEM_TREE s (load_from_source_at MEM_TREE (mem_desc HCS08 MEM_TREE s) dTest_zeros (extu_w32 〈〈x0,xD〉:〈x0,x0〉〉)))
- ].
-
-ndefinition sReverseNoCalc ≝
-λstring:list byte8.
- Some ? (set_pc_reg HCS08 MEM_TREE
- (dTest_HCS08_sReverse_status MEM_TREE (snd … (shr_b8 (cnH ? (byte8_strlen string))))
- (snd … (shr_w16 (byte8_strlen string)))
- (byte8_strlen string) (reverse_list ? string))
- (mk_word16 (mk_byte8 x1 x9) (mk_byte8 x2 xB))).
-
-ndefinition sReverseCalc32 ≝ sReverseCalc dTest_random_32.
-ndefinition sReverseCalc64 ≝ sReverseCalc dTest_random_64.
-ndefinition sReverseCalc128 ≝ sReverseCalc dTest_random_128.
-ndefinition sReverseCalc256 ≝ sReverseCalc dTest_random_256.
-ndefinition sReverseCalc512 ≝ sReverseCalc dTest_random_512.
-ndefinition sReverseCalc1024 ≝ sReverseCalc dTest_random_1024.
-ndefinition sReverseCalc2048 ≝ sReverseCalc dTest_random_2048.
-ndefinition sReverseCalc3072 ≝ sReverseCalc dTest_random_3072.
-
-ndefinition sReverseNoCalc32 ≝ sReverseNoCalc dTest_random_32.
-ndefinition sReverseNoCalc64 ≝ sReverseNoCalc dTest_random_64.
-ndefinition sReverseNoCalc128 ≝ sReverseNoCalc dTest_random_128.
-ndefinition sReverseNoCalc256 ≝ sReverseNoCalc dTest_random_256.
-ndefinition sReverseNoCalc512 ≝ sReverseNoCalc dTest_random_512.
-ndefinition sReverseNoCalc1024 ≝ sReverseNoCalc dTest_random_1024.
-ndefinition sReverseNoCalc2048 ≝ sReverseNoCalc dTest_random_2048.
-ndefinition sReverseNoCalc3072 ≝ sReverseNoCalc dTest_random_3072.
-
-(* *********************** *)
-(* HCS08GB60 Counting Sort *)
-(* *********************** *)
-
-(* versione ridotta, in cui non si riazzerano gli elementi di counters *)
-ndefinition dTest_HCS08_cSort_source : word16 → (list byte8) ≝
-λelems:word16.source_to_byte8 HCS08 (
-(* BEFORE: A=0x00 H:X=0x0F4C SP=0x0F4B PC=0x18C8 Z=true *)
-
-(* /* IPOTESI: INIT VARIABILI+ARRAY GIA' ESEGUITO */
- static unsigned int counters[256]={ campitura di 0 };
- static unsigned char dati[3072]={ dati random };
-
- void CountingSort(void)
- {
- unsigned int index=0,position=0; *)
-
-(* /* TESI: CODICE DA ESEGUIRE
-
- /* calcolo del # ripetizioni degli elementi byte */
- for(;index<3072;index++)
- { counters[dati[index]]++; } *)
-
-(* [0x18C8] BRA *+31;18E7 *) (compile HCS08 ? BRA (maIMM1 〈x1,xD〉) ?) @
-(* [0x18CA] LDHX 1,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x1〉) ?) @
-(* [0x18CD] LDA 256,X *) (compile HCS08 ? LDA (maIX2 〈〈x0,x1〉:〈x0,x0〉〉) ?) @
-(* [0x18D0] LSLA *) (compile HCS08 ? ASL maINHA ?) @
-(* [0x18D1] CLRX *) (compile HCS08 ? CLR maINHX ?) @
-(* [0x18D2] ROLX *) (compile HCS08 ? ROL maINHX ?) @
-(* [0x18D3] ADD #0x00 *) (compile HCS08 ? ADD (maIMM1 〈x0,x0〉) ?) @
-(* [0x18D5] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x18D6] TXA *) (compile HCS08 ? TXA maINH ?) @
-(* [0x18D7] ADC #0x0D *) (compile HCS08 ? ADC (maIMM1 〈x0,xD〉) ?) @
-(* [0x18D9] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x18DA] PULH *) (compile HCS08 ? PULH maINH ?) @
-(* [0x18DB] PULX *) (compile HCS08 ? PULX maINH ?) @
-(* [0x18DC] INC 1,X *) (compile HCS08 ? INC (maIX1 〈x0,x1〉) ?) @
-(* [0x18DE] BNE *+3 *) (compile HCS08 ? BNE (maIMM1 〈x0,x1〉) ?) @
-(* [0x18E0] INC ,X *) (compile HCS08 ? INC maIX0 ?) @
-(* [0x18E1] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x18E2] INC 1,X *) (compile HCS08 ? INC (maIX1 〈x0,x1〉) ?) @
-(* [0x18E4] BNE *+3 *) (compile HCS08 ? BNE (maIMM1 〈x0,x1〉) ?) @
-(* [0x18E6] INC ,X *) (compile HCS08 ? INC maIX0 ?) @
-(* [0x18E7] LDHX 1,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x1〉) ?) @
-(* [0x18EA] CPHX #elems *) (compile HCS08 ? CPHX (maIMM2 elems) ?) @ (* dimensione dei dati al massimo 0x0C00 *)
-(* [0x18ED] BCS *-35;18CA *) (compile HCS08 ? BCS (maIMM1 〈xD,xB〉) ?) @
-
-(* /* sovrascrittura di dati per produrre la versione ordinata */
- for(index=0;index<256;index++)
- {
- while(counters[index]--)
- { dati[position++]=index; }
- } *)
-
-(* [0x18EF] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x18F0] CLR 1,X *) (compile HCS08 ? CLR (maIX1 〈x0,x1〉) ?) @
-(* [0x18F2] CLR ,X *) (compile HCS08 ? CLR maIX0 ?) @
-(* [0x18F3] BRA *+16 *) (compile HCS08 ? BRA (maIMM1 〈x0,xE〉) ?) @
-(* [0x18F5] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x18F6] LDA 1,X *) (compile HCS08 ? LDA (maIX1 〈x0,x1〉) ?) @
-(* [0x18F8] LDHX 3,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x3〉) ?) @
-(* [0x18FB] STA 256,X *) (compile HCS08 ? STA (maIX2 〈〈x0,x1〉:〈x0,x0〉〉) ?) @
-(* [0x18FE] AIX #1 *) (compile HCS08 ? AIX (maIMM1 〈x0,x1〉) ?) @
-(* [0x1900] STHX 3,SP *) (compile HCS08 ? STHX (maSP1 〈x0,x3〉) ?) @
-(* [0x1903] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x1904] LDX 1,X *) (compile HCS08 ? LDX (maIX1 〈x0,x1〉) ?) @
-(* [0x1906] LSLX *) (compile HCS08 ? ASL maINHX ?) @
-(* [0x1907] LDA 1,SP *) (compile HCS08 ? LDA (maSP1 〈x0,x1〉) ?) @
-(* [0x190A] ROLA *) (compile HCS08 ? ROL maINHA ?) @
-(* [0x190B] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x190C] PULH *) (compile HCS08 ? PULH maINH ?) @
-(* [0x190D] PSHX *) (compile HCS08 ? PSHX maINH ?) @
-(* [0x190E] LDHX 3328,X *) (compile HCS08 ? LDHX (maIX2 〈〈x0,xD〉:〈x0,x0〉〉) ?) @
-(* [0x1912] PSHX *) (compile HCS08 ? PSHX maINH ?) @
-(* [0x1913] PSHH *) (compile HCS08 ? PSHH maINH ?) @
-(* [0x1914] AIX #-1 *) (compile HCS08 ? AIX (maIMM1 〈xF,xF〉) ?) @
-(* [0x1916] PSHH *) (compile HCS08 ? PSHH maINH ?) @
-(* [0x1917] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x1918] PULH *) (compile HCS08 ? PULH maINH ?) @
-(* [0x1919] PSHX *) (compile HCS08 ? PSHX maINH ?) @
-(* [0x191A] LDX 5,SP *) (compile HCS08 ? LDX (maSP1 〈x0,x5〉) ?) @
-(* [0x191D] PULA *) (compile HCS08 ? PULA maINH ?) @
-(* [0x191E] STA 3329,X *) (compile HCS08 ? STA (maIX2 〈〈x0,xD〉:〈x0,x1〉〉) ?) @
-(* [0x1921] PULA *) (compile HCS08 ? PULA maINH ?) @
-(* [0x1922] STA 3328,X *) (compile HCS08 ? STA (maIX2 〈〈x0,xD〉:〈x0,x0〉〉) ?) @
-(* [0x1925] PULH *) (compile HCS08 ? PULH maINH ?) @
-(* [0x1926] PULX *) (compile HCS08 ? PULX maINH ?) @
-(* [0x1927] CPHX #0x0000 *) (compile HCS08 ? CPHX (maIMM2 〈〈x0,x0〉:〈x0,x0〉〉) ?) @
-(* [0x192A] PULH *) (compile HCS08 ? PULH maINH ?) @
-(* [0x192B] BNE *-54 *) (compile HCS08 ? BNE (maIMM1 〈xC,x8〉) ?) @
-(* [0x192D] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x192E] INC 1,X *) (compile HCS08 ? INC (maIX1 〈x0,x1〉) ?) @
-(* [0x1930] BNE *+3 *) (compile HCS08 ? BNE (maIMM1 〈x0,x1〉) ?) @
-(* [0x1932] INC ,X *) (compile HCS08 ? INC maIX0 ?) @
-(* [0x1933] LDHX 1,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x1〉) ?) @
-(* [0x1936] CPHX #0x0100 *) (compile HCS08 ? CPHX (maIMM2 〈〈x0,x1〉:〈x0,x0〉〉) ?) @
-(* [0x1939] BNE *-54 *) (compile HCS08 ? BNE (maIMM1 〈xC,x8〉) ?) @
-(* [0x193B] STOP *) (compile HCS08 ? STOP maINH ?)
-
-(* [0x193C] !FINE!
- attraverso simulazione in CodeWarrior si puo' enunciare che dopo
- 25700+150n si sara' entrati in stato STOP corrispondente con ordinamento
- di n byte, A=0xFF H:X=0x0100 *)
- ). napply I. nqed.
-
-(* creazione del processore+caricamento+impostazione registri *)
-ndefinition dTest_HCS08_cSort_status ≝
-λt:memory_impl.
-λI_op:bool.
-λA_op:byte8.
-λHX_op:word16.
-λelems:word16.
-λdata:list byte8.
- setweak_i_flag HCS08 t (* I<-I_op *)
- (set_acc_8_low_reg HCS08 t (* A<-A_op *)
- (set_z_flag HCS08 t (* Z<-true *)
- (setweak_sp_reg HCS08 t (* SP<-0x0F4B *)
- (setweak_indX_16_reg HCS08 t (* H:X<-HX_op *)
- (set_pc_reg HCS08 t (* PC<-dTest_HCS08_prog *)
- (start_of_model HCS08 MC9S08GB60 t
- (load_from_source_at t (* carica data in RAM:dTest_HCS08_RAM *)
- (load_from_source_at t (zero_memory t) (* carica source in ROM:dTest_HCS08_prog *)
- (dTest_HCS08_cSort_source elems) (extu_w32 dTest_HCS08_prog))
- data (extu_w32 dTest_HCS08_RAM))
- (build_memory_type_of_model HCS08 MC9S08GB60 t)
- (mk_byte8 x0 x0) (mk_byte8 x0 x0) (* non deterministici tutti a 0 *)
- false false false false false false) (* non deterministici tutti a 0 *)
- dTest_HCS08_prog)
- HX_op)
- (mk_word16 (mk_byte8 x0 xF) (mk_byte8 x4 xB)))
- true)
- A_op)
- I_op.
-
-(* parametrizzazione dell'enunciato del teorema parziale *)
-nlemma dTest_HCS08_cSort_aux ≝
-λt:memory_impl.λstring:list byte8.
- (* 1) la stringa deve avere una lunghezza ∈ [0,3072] *)
- (byte8_bounded_strlen string 〈〈x0,xC〉:〈x0,x0〉〉) ∧
- (* 2) match di esecuzione su tempo in forma di upperbound *)
- (match execute HCS08 t
- (* parametri IN: t,A,H:X,strlen(string),string *)
- (TickOK ? (dTest_HCS08_cSort_status t true 〈x0,x0〉 〈〈x0,xF〉:〈x4,xC〉〉 (byte8_strlen string) string))
- (* tempo di esecuzione 25700+150*n *)
- (((nat256 + nat1) * nat100)+((nat50 * nat3) * (len_list ? string))) with
- [ TickERR s _ ⇒ None ?
- (* azzeramento tutta RAM tranne dati *)
- | TickSUSP s _ ⇒ Some ? (set_mem_desc HCS08 t s (load_from_source_at t (mem_desc HCS08 t s) dTest_zeros (extu_w32 〈〈x0,xD〉:〈x0,x0〉〉)))
- | TickOK s ⇒ None ?
- ] =
- Some ? (set_pc_reg HCS08 t
- (dTest_HCS08_cSort_status t false 〈xF,xF〉 〈〈x0,x1〉:〈x0,x0〉〉 (byte8_strlen string) (byte8_list_ordering string))
- (mk_word16 (mk_byte8 x1 x9) (mk_byte8 x3 xC)))).
-
-(* dimostrazione senza svolgimento degli stati *)
-(*
-lemma dTest_HCS08_cSort :
- dTest_HCS08_cSort_aux MEM_TREE dTest_random_32.
- unfold dTest_HCS08_cSort_aux;
- split;
- [ normalize in ⊢ (%); autobatch ]
- reflexivity.
-qed.
-*)
-
-ndefinition cSortCalc ≝
-λstring:list byte8.
- match execute HCS08 MEM_TREE
- (TickOK ? (dTest_HCS08_cSort_status MEM_TREE true 〈x0,x0〉 〈〈x0,xF〉:〈x4,xC〉〉 (byte8_strlen string) string))
- (((nat256 + nat1) * nat100)+((nat50 * nat3) * (len_list ? string))) with
- [ TickERR s _ ⇒ None ?
- | TickSUSP s _ ⇒ Some ? (set_mem_desc HCS08 MEM_TREE s (load_from_source_at MEM_TREE (mem_desc HCS08 MEM_TREE s) dTest_zeros (extu_w32 〈〈x0,xD〉:〈x0,x0〉〉)))
- | TickOK s ⇒ None ?
- ].
-
-ndefinition cSortNoCalc ≝
-λstring:list byte8.
- Some ? (set_pc_reg HCS08 MEM_TREE
- (dTest_HCS08_cSort_status MEM_TREE false 〈xF,xF〉 〈〈x0,x1〉:〈x0,x0〉〉 (byte8_strlen string) (byte8_list_ordering string))
- (mk_word16 (mk_byte8 x1 x9) (mk_byte8 x3 xC))).
-
-ndefinition cSortCalc32 ≝ cSortCalc dTest_random_32.
-ndefinition cSortCalc64 ≝ cSortCalc dTest_random_64.
-ndefinition cSortCalc128 ≝ cSortCalc dTest_random_128.
-ndefinition cSortCalc256 ≝ cSortCalc dTest_random_256.
-ndefinition cSortCalc512 ≝ cSortCalc dTest_random_512.
-ndefinition cSortCalc1024 ≝ cSortCalc dTest_random_1024.
-ndefinition cSortCalc2048 ≝ cSortCalc dTest_random_2048.
-ndefinition cSortCalc3072 ≝ cSortCalc dTest_random_3072.
-
-ndefinition cSortNoCalc32 ≝ cSortNoCalc dTest_random_32.
-ndefinition cSortNoCalc64 ≝ cSortNoCalc dTest_random_64.
-ndefinition cSortNoCalc128 ≝ cSortNoCalc dTest_random_128.
-ndefinition cSortNoCalc256 ≝ cSortNoCalc dTest_random_256.
-ndefinition cSortNoCalc512 ≝ cSortNoCalc dTest_random_512.
-ndefinition cSortNoCalc1024 ≝ cSortNoCalc dTest_random_1024.
-ndefinition cSortNoCalc2048 ≝ cSortNoCalc dTest_random_2048.
-ndefinition cSortNoCalc3072 ≝ cSortNoCalc dTest_random_3072.
-
-(* ********************** *)
-(* HCS08GB60 numeri aurei *)
-(* ********************** *)
-
-(* versione ridotta, in cui non si riazzerano gli elementi di counters *)
-ndefinition dTest_HCS08_gNum_source : word16 → (list byte8) ≝
-λelems:word16.source_to_byte8 HCS08 (
-(* BEFORE: A=0x00 HX=0x1A00 PC=0x18BE SP=0x016F Z=1 (I=1) *)
-
-(*
-static unsigned int result[16]={ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 };
-word result[16] = 0x0100
-
-void goldenNumbers(void)
-{
-unsigned int res_pos=0,tested_num=0,divisor=0;
-unsigned long int acc=0;
-*)
-
-(* [0x18BE] AIS #-10 *) (compile HCS08 ? AIS (maIMM1 〈xF,x6〉) ?) @
-(* [0x18C0] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x18C1] CLR 9,x *) (compile HCS08 ? CLR (maIX1 〈x0,x9〉) ?) @
-(* [0x18C3] CLR 8,X *) (compile HCS08 ? CLR (maIX1 〈x0,x8〉) ?) @
-(* [0x18C5] CLR 1,X *) (compile HCS08 ? CLR (maIX1 〈x0,x1〉) ?) @
-(* [0x18C7] CLR ,X *) (compile HCS08 ? CLR maIX0 ?) @
-(* [0x18C8] CLR 3,X *) (compile HCS08 ? CLR (maIX1 〈x0,x3〉) ?) @
-(* [0x18CA] CLR 2,X *) (compile HCS08 ? CLR (maIX1 〈x0,x2〉) ?) @
-(* [0x18CC] JSR 0x1951 *) (compile HCS08 ? JSR (maIMM2 〈〈x1,x9〉:〈x5,x1〉〉) ?) @
-
-(*
-for(tested_num=1;tested_num<2;tested_num++)
- {
-*)
-
-(* [0x18CF] STHX 1,SP *) (compile HCS08 ? STHX (maSP1 〈x0,x1〉) ?) @
-(* [0x18D2] BRA *+116 ; 0x1946 *) (compile HCS08 ? BRA (maIMM1 〈x7,x2〉) ?) @
-(* [0x18D4] BSR *+125 ; 0x1951 *) (compile HCS08 ? BSR (maIMM1 〈x7,xB〉) ?) @
-(* [0x18D6] STHX 3,SP *) (compile HCS08 ? STHX (maSP1 〈x0,x3〉) ?) @
-
-(*
- for(acc=0,divisor=1;divisor<tested_num;divisor++)
- {
- if(!(tested_num%divisor))
- { acc+=divisor; }
- }
-*)
-
-(* [0x18D9] BRA *+61 ; 0x1916 *) (compile HCS08 ? BRA (maIMM1 〈x3,xB〉) ?) @
-(* [0x18DB] LDHX 1,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x1〉) ?) @
-(* [0x18DE] PSHX *) (compile HCS08 ? PSHX maINH ?) @
-(* [0x18DF] PSHH *) (compile HCS08 ? PSHH maINH ?) @
-(* [0x18E0] LDHX 5,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x5〉) ?) @
-(* [0x18E3] JSR 0x1A1A *) (compile HCS08 ? JSR (maIMM2 〈〈x1,xA〉:〈x1,xA〉〉) ?) @
-(* [0x18E6] AIS #2 *) (compile HCS08 ? AIS (maIMM1 〈x0,x2〉) ?) @
-(* [0x18E8] CPHX #0x0000 *) (compile HCS08 ? CPHX (maIMM2 〈〈x0,x0〉:〈x0,x0〉〉) ?) @
-(* [0x18EB] BNE *+33 ; 0x190C *) (compile HCS08 ? BNE (maIMM1 〈x1,xF〉) ?) @
-(* [0x18ED] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x18EE] LDA 3,X *) (compile HCS08 ? LDA (maIX1 〈x0,x3〉) ?) @
-(* [0x18F0] LDX 2,X *) (compile HCS08 ? LDX (maIX1 〈x0,x2〉) ?) @
-(* [0x18F2] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x18F3] PSHX *) (compile HCS08 ? PSHX maINH ?) @
-(* [0x18F4] CLRA *) (compile HCS08 ? CLR maINHA ?) @
-(* [0x18F5] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x18F6] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x18F7] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x18F8] PSHX *) (compile HCS08 ? PSHX maINH ?) @
-(* [0x19F9] PSHH *) (compile HCS08 ? PSHH maINH ?) @
-(* [0x18FA] AIX #8 *) (compile HCS08 ? AIX (maIMM1 〈x0,x8〉) ?) @
-(* [0x18FC] PSHX *) (compile HCS08 ? PSHX maINH ?) @
-(* [0x18FD] PSHH *) (compile HCS08 ? PSHH maINH ?) @
-(* [0x18FE] LDHX 3,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x3〉) ?) @
-(* [0x1901] JSR 0x1A2A *) (compile HCS08 ? JSR (maIMM2 〈〈x1,xA〉:〈x2,xA〉〉) ?) @
-(* [0x1904] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x1905] AIX #14 *) (compile HCS08 ? AIX (maIMM1 〈x0,xE〉) ?) @
-(* [0x1907] JSR 0x1A30 *) (compile HCS08 ? JSR (maIMM2 〈〈x1,xA〉:〈x3,x0〉〉) ?) @
-(* [0x190A] AIS #6 *) (compile HCS08 ? AIS (maIMM1 〈x0,x6〉) ?) @
-(* [0x190C] STA 0x1800 !COP! *) (compile HCS08 ? STA (maDIR2 〈〈x0,xC〉:〈x0,x0〉〉) ?) @
-(* [0x190F] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x1910] INC 3,X *) (compile HCS08 ? INC (maIX1 〈x0,x3〉) ?) @
-(* [0x1912] BNE *+4 ; 0x1916 *) (compile HCS08 ? BNE (maIMM1 〈x0,x2〉) ?) @
-(* [0x1914] INC 2,X *) (compile HCS08 ? INC (maIX1 〈x0,x2〉) ?) @
-(* [0x1916] LDHX 1,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x1〉) ?) @
-(* [0x1919] CPHX 3,SP *) (compile HCS08 ? CPHX (maSP1 〈x0,x3〉) ?) @
-(* [0x191C] BHI *-65 ; 0x18DB *) (compile HCS08 ? BHI (maIMM1 〈xB,xD〉) ?) @
-
-(*
- if(acc==tested_num)
- { result[res_pos++]=tested_num; }
- }
-}
-*)
-
-(* [0x191E] CPHX 7,SP *) (compile HCS08 ? CPHX (maSP1 〈x0,x7〉) ?) @
-(* [0x1921] BNE *+31 ; 0x1940 *) (compile HCS08 ? BNE (maIMM1 〈x1,xD〉) ?) @
-(* [0x1923] LDHX 5,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x5〉) ?) @
-(* [0x1926] BNE *+26 ; 0x1940 *) (compile HCS08 ? BNE (maIMM1 〈x1,x8〉) ?) @
-(* [0x1928] LDHX 9,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x9〉) ?) @
-(* [0x192B] PSHX *) (compile HCS08 ? PSHX maINH ?) @
-(* [0x192C] AIX #1 *) (compile HCS08 ? AIX (maIMM1 〈x0,x1〉) ?) @
-(* [0x192E] STHX 10,SP *) (compile HCS08 ? STHX (maSP1 〈x0,xA〉) ?) @
-(* [0x1931] PULX *) (compile HCS08 ? PULX maINH ?) @
-(* [0x1932] LSLX *) (compile HCS08 ? ASL maINHX ?) @
-(* [0x1933] LDA 2,SP *) (compile HCS08 ? LDA (maSP1 〈x0,x2〉) ?) @
-(* [0x1936] CLRH *) (compile HCS08 ? CLR maINHH ?) @
-(* [0x1937] STA 257,X *) (compile HCS08 ? STA (maIX2 〈〈x0,x1〉:〈x0,x1〉〉) ?) @
-(* [0x193A] LDA 1,SP *) (compile HCS08 ? LDA (maSP1 〈x0,x1〉) ?) @
-(* [0x193D] STA 256,X *) (compile HCS08 ? STA (maIX2 〈〈x0,x1〉:〈x0,x0〉〉) ?) @
-(* [0x1940] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x1941] INC 1,X *) (compile HCS08 ? INC (maIX1 〈x0,x1〉) ?) @
-(* [0x1943] BNE *+3 ; 0x1946 *) (compile HCS08 ? BNE (maIMM1 〈x0,x1〉) ?) @
-(* [0x1945] INC ,X *) (compile HCS08 ? INC maIX0 ?) @
-(* [0x1946] LDHX 1,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x1〉) ?) @
-(* [0x1949] CPHX #elems *) (compile HCS08 ? CPHX (maIMM2 elems) ?) @
-(* [0x194C] BCS *-120 ; 0x18D4 *) (compile HCS08 ? BCS (maIMM1 〈x8,x6〉) ?) @
-(* [0x194E] AIS #10 *) (compile HCS08 ? AIS (maIMM1 〈x0,xA〉) ?) @
-(* [0x1950] STOP ->1951 !FINE! *) (compile HCS08 ? STOP maINH ?) @
-(* [0x1951] CLRX *) (compile HCS08 ? CLR maINHX ?) @
-(* [0x1952] CLRH *) (compile HCS08 ? CLR maINHH ?) @
-(* [0x1953] STHX 9,SP *) (compile HCS08 ? STHX (maSP1 〈x0,x9〉) ?) @
-(* [0x1956] CLRH *) (compile HCS08 ? CLR maINHH ?) @
-(* [0x1957] STHX 7,SP *) (compile HCS08 ? STHX (maSP1 〈x0,x7〉) ?) @
-(* [0x195A] INCX *) (compile HCS08 ? INC maINHX ?) @
-(* [0x195B] RTS *) (compile HCS08 ? RTS maINH ?) @
-
-(*
-static void _PUSH_ARGS_L(void) { ... }
-*)
-
-(* [0x195C] LDA 3,X *) (compile HCS08 ? LDA (maIX1 〈x0,x3〉) ?) @
-(* [0x195E] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x195F] LDA 2,X *) (compile HCS08 ? LDA (maIX1 〈x0,x2〉) ?) @
-(* [0x1961] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x1962] LDHX ,X *) (compile HCS08 ? LDHX maIX0 ?) @
-(* [0x1964] PSHX *) (compile HCS08 ? PSHX maINH ?) @
-(* [0x1965] PSHH *) (compile HCS08 ? PSHH maINH ?) @
-(* [0x1966] LDHX 7,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x7〉) ?) @
-(* [0x1969] LDA 3,X *) (compile HCS08 ? LDA (maIX1 〈x0,x3〉) ?) @
-(* [0x196B] STA 17,SP *) (compile HCS08 ? STA (maSP1 〈x1,x1〉) ?) @
-(* [0x196E] LDA 2,X *) (compile HCS08 ? LDA (maIX1 〈x0,x2〉) ?) @
-(* [0x1970] STA 16,SP *) (compile HCS08 ? STA (maSP1 〈x1,x0〉) ?) @
-(* [0x1973] LDHX ,X *) (compile HCS08 ? LDHX maIX0 ?) @
-(* [0x1975] STHX 14,SP *) (compile HCS08 ? STHX (maSP1 〈x0,xE〉) ?) @
-(* [0x1978] LDHX 5,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x5〉) ?) @
-(* [0x197B] JMP ,X *) (compile HCS08 ? JMP maINHX0ADD ?) @
-
-(*
-static void _ENTER_BINARY_L(void) { ... }
-*)
-
-(* [0x197C] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x197D] PSHX *) (compile HCS08 ? PSHX maINH ?) @
-(* [0x197E] PSHH *) (compile HCS08 ? PSHH maINH ?) @
-(* [0x197F] PSHX *) (compile HCS08 ? PSHX maINH ?) @
-(* [0x1980] PSHH *) (compile HCS08 ? PSHH maINH ?) @
-(* [0x1981] LDHX 6,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x6〉) ?) @
-(* [0x1984] PSHX *) (compile HCS08 ? PSHX maINH ?) @
-(* [0x1985] PSHH *) (compile HCS08 ? PSHH maINH ?) @
-(* [0x1986] LDHX 10,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,xA〉) ?) @
-(* [0x1989] STHX 8,SP *) (compile HCS08 ? STHX (maSP1 〈x0,x8〉) ?) @
-(* [0x198C] LDHX 12,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,xC〉) ?) @
-(* [0x198F] JMP 0x195C *) (compile HCS08 ? JMP (maIMM2 〈〈x1,x9〉:〈x5,xC〉〉) ?) @
-
-(*
-static void _IDIVMOD (char dummy_sgn, int j, int dummy, int i, ...) { ... }
-*)
-
-(* [0x1992] TST 4,SP *) (compile HCS08 ? TST (maSP1 〈x0,x4〉) ?) @
-(* [0x1995] BNE *+28 ; 0x19B1 *) (compile HCS08 ? BNE (maIMM1 〈x1,xA〉) ?) @
-(* [0x1997] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x1998] LDA 7,X *) (compile HCS08 ? LDA (maIX1 〈x0,x7〉) ?) @
-(* [0x199A] LDX 4,X *) (compile HCS08 ? LDX (maIX1 〈x0,x4〉) ?) @
-(* [0x199C] CLRH *) (compile HCS08 ? CLR maINHH ?) @
-(* [0x199D] DIV *) (compile HCS08 ? DIV maINH ?) @
-(* [0x199E] STA 4,SP *) (compile HCS08 ? STA (maSP1 〈x0,x4〉) ?) @
-(* [0x19A1] LDA 9,SP *) (compile HCS08 ? LDA (maSP1 〈x0,x9〉) ?) @
-(* [0x19A4] DIV *) (compile HCS08 ? DIV maINH ?) @
-(* [0x19A5] STA 5,SP *) (compile HCS08 ? STA (maSP1 〈x0,x5〉) ?) @
-(* [0x19A8] CLR 8,SP *) (compile HCS08 ? CLR (maSP1 〈x0,x8〉) ?) @
-(* [0x19AB] PSHH *) (compile HCS08 ? PSHH maINH ?) @
-(* [0x19AC] PULA *) (compile HCS08 ? PULA maINH ?) @
-(* [0x19AD] STA 9,SP *) (compile HCS08 ? STA (maSP1 〈x0,x9〉) ?) @
-(* [0x19B0] RTS *) (compile HCS08 ? RTS maINH ?) @
-(* [0x19B1] CLRA *) (compile HCS08 ? CLR maINHA ?) @
-(* [0x19B2] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x19B3] LDX #0x08 *) (compile HCS08 ? LDX (maIMM1 〈x0,x8〉) ?) @
-(* [0x19B5] CLC *) (compile HCS08 ? CLC maINH ?) @
-(* [0x19B6] ROL 10,SP *) (compile HCS08 ? ROL (maSP1 〈x0,xA〉) ?) @
-(* [0x19B9] ROL 9,SP *) (compile HCS08 ? ROL (maSP1 〈x0,x9〉) ?) @
-(* [0x19BC] ROL 1,SP *) (compile HCS08 ? ROL (maSP1 〈x0,x1〉) ?) @
-(* [0x19BF] LDA 5,SP *) (compile HCS08 ? LDA (maSP1 〈x0,x5〉) ?) @
-(* [0x19C2] CMP 1,SP *) (compile HCS08 ? CMP (maSP1 〈x0,x1〉) ?) @
-(* [0x19C5] BHI *+31 ; 0x19E4 *) (compile HCS08 ? BHI (maIMM1 〈x1,xD〉) ?) @
-(* [0x19C7] BNE *+10 ; 0x19D1 *) (compile HCS08 ? BNE (maIMM1 〈x0,x8〉) ?) @
-(* [0x19C9] LDA 6,SP *) (compile HCS08 ? LDA (maSP1 〈x0,x6〉) ?) @
-(* [0x19CC] CMP 9,SP *) (compile HCS08 ? CMP (maSP1 〈x0,x9〉) ?) @
-(* [0x19CF] BHI *+21 ; 0x19E4 *) (compile HCS08 ? BHI (maIMM1 〈x1,x3〉) ?) @
-(* [0x19D1] LDA 9,SP *) (compile HCS08 ? LDA (maSP1 〈x0,x9〉) ?) @
-(* [0x19D4] SUB 6,SP *) (compile HCS08 ? SUB (maSP1 〈x0,x6〉) ?) @
-(* [0x19D7] STA 9,SP *) (compile HCS08 ? STA (maSP1 〈x0,x9〉) ?) @
-(* [0x19DA] LDA 1,SP *) (compile HCS08 ? LDA (maSP1 〈x0,x1〉) ?) @
-(* [0x19DD] SBC 5,SP *) (compile HCS08 ? SBC (maSP1 〈x0,x5〉) ?) @
-(* [0x19E0] STA 1,SP *) (compile HCS08 ? STA (maSP1 〈x0,x1〉) ?) @
-(* [0x19E3] SEC *) (compile HCS08 ? SEC maINH ?) @
-(* [0x19E4] DBNZX *-46 ; 0x19B6 *) (compile HCS08 ? DBNZ (maINHX_and_IMM1 〈xD,x0〉) ?) @
-(* [0x19E6] LDA 10,SP *) (compile HCS08 ? LDA (maSP1 〈x0,xA〉) ?) @
-(* [0x19E9] ROLA *) (compile HCS08 ? ROL maINHA ?) @
-(* [0x19EA] STA 6,SP *) (compile HCS08 ? STA (maSP1 〈x0,x6〉) ?) @
-(* [0x19ED] LDA 9,SP *) (compile HCS08 ? LDA (maSP1 〈x0,x9〉) ?) @
-(* [0x19F0] STA 10,SP *) (compile HCS08 ? STA (maSP1 〈x0,xA〉) ?) @
-(* [0x19F3] PULA *) (compile HCS08 ? PULA maINH ?) @
-(* [0x19F4] STA 8,SP *) (compile HCS08 ? STA (maSP1 〈x0,x8〉) ?) @
-(* [0x19F7] CLR 4,SP *) (compile HCS08 ? CLR (maSP1 〈x0,x4〉) ?) @
-(* [0x19FA] RTS *) (compile HCS08 ? RTS maINH ?) @
-
-(*
-static void _LADD_k_is_k_plus_j(_PARAM_BINARY_L) { ... }
-*)
-
-(* [0x19FB] TSX *) (compile HCS08 ? TSX maINH ?) @
-(* [0x19FC] LDA 18,X *) (compile HCS08 ? LDA (maIX1 〈x1,x2〉) ?) @
-(* [0x19FE] ADD 5,X *) (compile HCS08 ? ADD (maIX1 〈x0,x5〉) ?) @
-(* [0x1A00] STA 18,X *) (compile HCS08 ? STA (maIX1 〈x1,x2〉) ?) @
-(* [0x1A02] LDA 17,X *) (compile HCS08 ? LDA (maIX1 〈x1,x1〉) ?) @
-(* [0x1A04] ADC 4,X *) (compile HCS08 ? ADC (maIX1 〈x0,x4〉) ?) @
-(* [0x1A06] STA 17,X *) (compile HCS08 ? STA (maIX1 〈x1,x1〉) ?) @
-(* [0x1A08] LDA 16,X *) (compile HCS08 ? LDA (maIX1 〈x1,x0〉) ?) @
-(* [0x1A0A] ADC 3,X *) (compile HCS08 ? ADC (maIX1 〈x0,x3〉) ?) @
-(* [0x1A0C] STA 16,X *) (compile HCS08 ? STA (maIX1 〈x1,x0〉) ?) @
-(* [0x1A0E] LDA 15,X *) (compile HCS08 ? LDA (maIX1 〈x0,xF〉) ?) @
-(* [0x1A10] ADC 2,X *) (compile HCS08 ? ADC (maIX1 〈x0,x2〉) ?) @
-(* [0x1A12] STA 15,X *) (compile HCS08 ? STA (maIX1 〈x0,xF〉) ?) @
-(* [0x1A14] AIS #10 *) (compile HCS08 ? AIS (maIMM1 〈x0,xA〉) ?) @
-(* [0x1A16] PULH *) (compile HCS08 ? PULH maINH ?) @
-(* [0x1A17] PULX *) (compile HCS08 ? PULX maINH ?) @
-(* [0x1A18] PULA *) (compile HCS08 ? PULA maINH ?) @
-(* [0x1A19] RTS *) (compile HCS08 ? RTS maINH ?) @
-
-(*
-void _IMODU_STAR08(int i, ...) { ... }
-*)
-
-(* [0x1A1A] AIS #-2 *) (compile HCS08 ? AIS (maIMM1 〈xF,xE〉) ?) @
-(* [0x1A1C] STHX 1,SP *) (compile HCS08 ? STHX (maSP1 〈x0,x1〉) ?) @
-(* [0x1A1F] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x1A20] JSR 0x1992 *) (compile HCS08 ? JSR (maIMM2 〈〈x1,x9〉:〈x9,x2〉〉) ?) @
-(* [0x1A23] PULA *) (compile HCS08 ? PULA maINH ?) @
-(* [0x1A24] AIS #2 *) (compile HCS08 ? AIS (maIMM1 〈x0,x2〉) ?) @
-(* [0x1A26] LDHX 3,SP *) (compile HCS08 ? LDHX (maSP1 〈x0,x3〉) ?) @
-(* [0x1A29] RTS *) (compile HCS08 ? RTS maINH ?) @
-
-(*
-void _LADD(void) { ... }
-*)
-
-(* [0x1A2A] JSR 0x197C *) (compile HCS08 ? JSR (maIMM2 〈〈x1,x9〉:〈x7,xC〉〉) ?) @
-(* [0x1A2D] JSR 0x19FB *) (compile HCS08 ? JSR (maIMM2 〈〈x1,x9〉:〈xF,xB〉〉) ?) @
-
-(*
-void _POP32(void) { ... }
-*)
-
-(* [0x1A30] PSHA *) (compile HCS08 ? PSHA maINH ?) @
-(* [0x1A31] LDA 4,SP *) (compile HCS08 ? LDA (maSP1 〈x0,x4〉) ?) @
-(* [0x1A34] STA ,X *) (compile HCS08 ? STA maIX0 ?) @
-(* [0x1A35] LDA 5,SP *) (compile HCS08 ? LDA (maSP1 〈x0,x5〉) ?) @
-(* [0x1A38] STA 1,X *) (compile HCS08 ? STA (maIX1 〈x0,x1〉) ?) @
-(* [0x1A3A] LDA 6,SP *) (compile HCS08 ? LDA (maSP1 〈x0,x6〉) ?) @
-(* [0x1A3D] STA 2,X *) (compile HCS08 ? STA (maIX1 〈x0,x2〉) ?) @
-(* [0x1A3F] LDA 7,SP *) (compile HCS08 ? LDA (maSP1 〈x0,x7〉) ?) @
-(* [0x1A42] STA 3,X *) (compile HCS08 ? STA (maIX1 〈x0,x3〉) ?) @
-(* [0x1A44] PULA *) (compile HCS08 ? PULA maINH ?) @
-(* [0x1A45] PULH *) (compile HCS08 ? PULH maINH ?) @
-(* [0x1A46] PULX *) (compile HCS08 ? PULX maINH ?) @
-(* [0x1A47] AIS #4 *) (compile HCS08 ? AIS (maIMM1 〈x0,x4〉) ?) @
-(* [0x1A49] JMP ,X *) (compile HCS08 ? JMP maINHX0ADD ?)
-
-(* attraverso simulazione in CodeWarrior si puo' enunciare che dopo
- 80+(65*n*(n+1)*(n+2))/6 si sara' entrati in stato STOP corrispondente
- AFTER: HX=num PC=0x1951 I=0 *)
- ). napply I. nqed.
-
-(* creazione del processore+caricamento+impostazione registri *)
-ndefinition dTest_HCS08_gNum_status ≝
-λt:memory_impl.
-λI_op:bool.
-λA_op:byte8.
-λHX_op:word16.
-λPC_op:word16.
-λaddr:word16.
-λelems:word16.
-λdata:list byte8.
- setweak_i_flag HCS08 t (* I<-I_op *)
- (set_acc_8_low_reg HCS08 t (* A<-A_op *)
- (set_z_flag HCS08 t (* Z<-true *)
- (setweak_sp_reg HCS08 t (* SP<-0x016F *)
- (setweak_indX_16_reg HCS08 t (* H:X<-HX_op *)
- (set_pc_reg HCS08 t (* PC<-PC_op *)
- (start_of_model HCS08 MC9S08GB60 t
- (load_from_source_at t (* carica data in RAM:dTest_HCS08_RAM *)
- (load_from_source_at t (zero_memory t) (* carica source in ROM:addr *)
- (dTest_HCS08_cSort_source elems) (extu_w32 addr))
- data (extu_w32 dTest_HCS08_RAM))
- (build_memory_type_of_model HCS08 MC9S08GB60 t)
- (mk_byte8 x0 x0) (mk_byte8 x0 x0) (* non deterministici tutti a 0 *)
- false false false false false false) (* non deterministici tutti a 0 *)
- PC_op)
- HX_op)
- (mk_word16 (mk_byte8 x0 x1) (mk_byte8 x6 xF)))
- true)
- A_op)
- I_op.
-
-(* NUMERI AUREI: Somma divisori(x)=x, fino a 0xFFFF sono 6/28/496/8128 *)
-ndefinition dTest_HCS08_gNum_aurei ≝
-λnum:word16.match gt_w16 num 〈〈x1,xF〉:〈xC,x0〉〉 with
- [ true ⇒ [ 〈x0,x0〉 ; 〈x0,x6〉 ; 〈x0,x0〉 ; 〈x1,xC〉 ; 〈x0,x1〉 ; 〈xF,x0〉 ; 〈x1,xF〉 ; 〈xC,x0〉 ]
- | false ⇒ match gt_w16 num 〈〈x0,x1〉:〈xF,x0〉〉 with
- [ true ⇒ [ 〈x0,x0〉 ; 〈x0,x6〉 ; 〈x0,x0〉 ; 〈x1,xC〉 ; 〈x0,x1〉 ; 〈xF,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ]
- | false ⇒ match gt_w16 num 〈〈x0,x0〉:〈x1,xC〉〉 with
- [ true ⇒ [ 〈x0,x0〉 ; 〈x0,x6〉 ; 〈x0,x0〉 ; 〈x1,xC〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ]
- | false ⇒ match gt_w16 num 〈〈x0,x0〉:〈x0,x6〉〉 with
- [ true ⇒ [ 〈x0,x0〉 ; 〈x0,x6〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ]
- | false ⇒ [ 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ]
- ]
- ]
- ]
- ] @ [ 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉
- ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉
- ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ; 〈x0,x0〉 ].
-
-(* esecuzione execute k*(n+2) *)
-nlet rec dTest_HCS08_gNum_execute1 (m:mcu_type) (t:memory_impl) (s:tick_result (any_status m t)) (n,ntot:nat) on n ≝
- match s with
- [ TickERR s' error ⇒ TickERR ? s' error
- | TickSUSP s' susp ⇒ TickSUSP ? s' susp
- | TickOK s' ⇒ match n with
- [ O ⇒ TickOK ? s'
- | S n' ⇒ dTest_HCS08_gNum_execute1 m t (execute m t (TickOK ? s') (ntot + nat2)) n' ntot ]
- ].
-
-(* esecuzione execute k*(n+1)*(n+2) *)
-nlet rec dTest_HCS08_gNum_execute2 (m:mcu_type) (t:memory_impl) (s:tick_result (any_status m t)) (n,ntot:nat) on n ≝
- match s with
- [ TickERR s' error ⇒ TickERR ? s' error
- | TickSUSP s' susp ⇒ TickSUSP ? s' susp
- | TickOK s' ⇒ match n with
- [ O ⇒ TickOK ? s'
- | S n' ⇒ dTest_HCS08_gNum_execute2 m t (dTest_HCS08_gNum_execute1 m t (TickOK ? s') (ntot + nat1) ntot) n' ntot ]
- ].
-
-(* esecuzione execute k*n*(n+1)*(n+2) *)
-nlet rec dTest_HCS08_gNum_execute3 (m:mcu_type) (t:memory_impl) (s:tick_result (any_status m t)) (n,ntot:nat) on n ≝
- match s with
- [ TickERR s' error ⇒ TickERR ? s' error
- | TickSUSP s' susp ⇒ TickSUSP ? s' susp
- | TickOK s' ⇒ match n with
- [ O ⇒ TickOK ? s'
- | S n' ⇒ dTest_HCS08_gNum_execute3 m t (dTest_HCS08_gNum_execute2 m t (TickOK ? s') ntot ntot) n' ntot ]
- ].
-
-(* esecuzione execute 80+11*n*(n+1)*(n+2) *)
-ndefinition dTest_HCS08_gNum_execute4 ≝
-λm:mcu_type.λt:memory_impl.λs:tick_result (any_status m t).λntot:nat.
- match s with
- [ TickERR s' error ⇒ TickERR ? s' error
- | TickSUSP s' susp ⇒ TickSUSP ? s' susp
- | TickOK s' ⇒ execute m t (dTest_HCS08_gNum_execute3 m t (TickOK ? s') nat11 ntot) nat80
- ].
-
-(* parametrizzazione dell'enunciato del teorema parziale *)
-nlemma dTest_HCS08_gNum_aux ≝
-λt:memory_impl.λnum:word16.
- (* 2) match di esecuzione su tempo in forma di upperbound *)
- match dTest_HCS08_gNum_execute4 HCS08 t
- (TickOK ? (dTest_HCS08_gNum_status t true 〈x0,x0〉 〈〈x1,xA〉:〈x0,x0〉〉 〈〈x1,x8〉:〈xB,xE〉〉 〈〈x1,x8〉:〈xB,xE〉〉 num dTest_zeros))
- (* tempo di esecuzione 80+11*n*(n+1)*(n+2) *)
- (nat_of_w16 num) with
- [ TickERR s _ ⇒ None ?
- (* azzeramento tutta RAM tranne dati *)
- | TickSUSP s _ ⇒ Some ? (set_mem_desc HCS08 t s (load_from_source_at t (mem_desc HCS08 t s) dTest_zeros3K (extu_w32 〈〈x0,x1〉:〈x2,x0〉〉)))
- | TickOK s ⇒ None ?
- ] =
- Some ? (dTest_HCS08_gNum_status t false 〈x0,x0〉 num 〈〈x1,x9〉:〈x5,x1〉〉 〈〈x1,x8〉:〈xB,xE〉〉 num (dTest_HCS08_gNum_aurei num)).
-
-ndefinition gNumCalc ≝
-λnum:word16.
- match dTest_HCS08_gNum_execute4 HCS08 MEM_TREE
- (TickOK ? (dTest_HCS08_gNum_status MEM_TREE true 〈x0,x0〉 〈〈x1,xA〉:〈x0,x0〉〉 〈〈x1,x8〉:〈xB,xE〉〉 〈〈x1,x8〉:〈xB,xE〉〉 num dTest_zeros))
- (nat_of_w16 num) with
- [ TickERR s _ ⇒ None ?
- | TickSUSP s _ ⇒ Some ? (set_mem_desc HCS08 MEM_TREE s (load_from_source_at MEM_TREE (mem_desc HCS08 MEM_TREE s) dTest_zeros3K (extu_w32 〈〈x0,x1〉:〈x2,x0〉〉)))
- | TickOK s ⇒ None ?
- ].
-
-ndefinition gNumNoCalc ≝
-λnum:word16.
- Some ? (dTest_HCS08_gNum_status MEM_TREE false 〈x0,x0〉 num 〈〈x1,x9〉:〈x5,x1〉〉 〈〈x1,x8〉:〈xB,xE〉〉 num (dTest_HCS08_gNum_aurei num)).
-
-ndefinition gNumCalc1 ≝ gNumCalc 〈〈x0,x0〉:〈x0,x1〉〉.
-ndefinition gNumCalc2 ≝ gNumCalc 〈〈x0,x0〉:〈x0,x2〉〉.
-ndefinition gNumCalc5 ≝ gNumCalc 〈〈x0,x0〉:〈x0,x5〉〉.
-ndefinition gNumCalc10 ≝ gNumCalc 〈〈x0,x0〉:〈x0,xA〉〉.
-ndefinition gNumCalc20 ≝ gNumCalc 〈〈x0,x0〉:〈x1,x4〉〉.
-ndefinition gNumCalc50 ≝ gNumCalc 〈〈x0,x0〉:〈x3,x2〉〉.
-ndefinition gNumCalc100 ≝ gNumCalc 〈〈x0,x0〉:〈x6,x4〉〉.
-ndefinition gNumCalc250 ≝ gNumCalc 〈〈x0,x0〉:〈xF,xA〉〉.
-ndefinition gNumCalc500 ≝ gNumCalc 〈〈x0,x1〉:〈xF,x4〉〉.
-ndefinition gNumCalc1000 ≝ gNumCalc 〈〈x0,x3〉:〈xE,x8〉〉.
-
-ndefinition gNumNoCalc1 ≝ gNumNoCalc 〈〈x0,x0〉:〈x0,x1〉〉.
-ndefinition gNumNoCalc2 ≝ gNumNoCalc 〈〈x0,x0〉:〈x0,x2〉〉.
-ndefinition gNumNoCalc5 ≝ gNumNoCalc 〈〈x0,x0〉:〈x0,x5〉〉.
-ndefinition gNumNoCalc10 ≝ gNumNoCalc 〈〈x0,x0〉:〈x0,xA〉〉.
-ndefinition gNumNoCalc20 ≝ gNumNoCalc 〈〈x0,x0〉:〈x1,x4〉〉.
-ndefinition gNumNoCalc50 ≝ gNumNoCalc 〈〈x0,x0〉:〈x3,x2〉〉.
-ndefinition gNumNoCalc100 ≝ gNumNoCalc 〈〈x0,x0〉:〈x6,x4〉〉.
-ndefinition gNumNoCalc250 ≝ gNumNoCalc 〈〈x0,x0〉:〈xF,xA〉〉.
-ndefinition gNumNoCalc500 ≝ gNumNoCalc 〈〈x0,x1〉:〈xF,x4〉〉.
-ndefinition gNumNoCalc1000 ≝ gNumNoCalc 〈〈x0,x3〉:〈xE,x8〉〉.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/multivm/multivm.ma".
-
-(* ********* *)
-(* INDIRIZZI *)
-(* ********* *)
-
-(* specifico per MC9S08GB60 in modo da caricare codice compilato da CodeWarrior *)
-(* l'obbiettivo e' dimostrare una routine scritta in C *)
-(* passo 1 e' formalizzare l'uso di 3Kb dei 4Kb di RAM [0x0100-0x0CFF] *)
-ndefinition dTest_HCS08_RAM ≝ 〈〈x0,x1〉:〈x0,x0〉〉.
-ndefinition dTest_HCS08_prog ≝ 〈〈x1,x8〉:〈xC,x8〉〉.
-
-(* ***** *)
-(* TOOLS *)
-(* ***** *)
-
-(* visita di un albero da 256B di elementi: ln16(256)=2 passaggi *)
-ndefinition dTest_visit ≝
-λdata:Array16T (Array16T (list byte8)).λaddr:byte8.
- getn_array16T (cnL ? addr) ?
- (getn_array16T (cnH ? addr) ? data).
-
-(* scrittura di un elemento in un albero da 256B *)
-ndefinition dTest_update ≝
-λdata:Array16T (Array16T (list byte8)).λaddr:byte8.λv:list byte8.
- let lev2 ≝ getn_array16T (cnH ? addr) ? data in
- setn_array16T (cnH ? addr) ? data
- (setn_array16T (cnL ? addr) ? lev2 v) .
-
-(* array a 0 *)
-ndefinition dTest_zero_array ≝
-let elem ≝ nil byte8 in
-let lev2 ≝ mk_Array16T ?
- elem elem elem elem elem elem elem elem
- elem elem elem elem elem elem elem elem
- in
-let lev1 ≝ mk_Array16T ?
- lev2 lev2 lev2 lev2 lev2 lev2 lev2 lev2
- lev2 lev2 lev2 lev2 lev2 lev2 lev2 lev2
- in
-lev1.
-
-(* incrementa n-simo elemento *)
-ndefinition dTest_inc ≝
-λdata:Array16T (Array16T (list byte8)).λaddr:byte8.
- dTest_update data addr ((dTest_visit data addr)@[ addr ]).
-
-(* costruisce una lista a partire dai conteggi per elemento *)
-ndefinition dTest_build_list_from_count ≝
-λdata:Array16T (Array16T (list byte8)).
- let aux1 ≝ λparam1:Array16T (list byte8).
- match param1 with
- [ mk_Array16T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15 ⇒
- e00@e01@e02@e03@e04@e05@e06@e07@e08@e09@e10@e11@e12@e13@e14@e15 ] in
- let aux2 ≝ λparam2:Array16T (Array16T (list byte8)).
- match param2 with
- [ mk_Array16T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15 ⇒
- (aux1 e00)@(aux1 e01)@(aux1 e02)@(aux1 e03)@(aux1 e04)@(aux1 e05)@(aux1 e06)@(aux1 e07)@
- (aux1 e08)@(aux1 e09)@(aux1 e10)@(aux1 e11)@(aux1 e12)@(aux1 e13)@(aux1 e14)@(aux1 e15) ] in
- aux2 data.
-
-(* ci sono ora tutti gli elementi per definire l'ordinamento *)
-(* di una lista di byte8 secondo il counting sort *)
-nlet rec byte8_list_ordering_aux (source:list byte8) (count:Array16T (Array16T (list byte8))) on source ≝
- match source with
- [ nil ⇒ dTest_build_list_from_count count
- | cons hd tl ⇒ byte8_list_ordering_aux tl (dTest_inc count hd)
- ].
-
-ndefinition byte8_list_ordering ≝
-λsource:list byte8.byte8_list_ordering_aux source dTest_zero_array.
-
-(* strlen esadecimale limitato, considerando overflow! *)
-nlet rec byte8_bounded_strlen_aux (source:list byte8) (count,limit:word16) on source ≝
- match source with
- [ nil ⇒ True
- | cons _ tl ⇒ match eq_w16 count 〈〈xF,xF〉:〈xF,xF〉〉 with
- [ true ⇒ False
- | false ⇒ match le_w16 (succ_w16 count) limit with
- [ true ⇒ byte8_bounded_strlen_aux tl (succ_w16 count) limit
- | false ⇒ False
- ]
- ]
- ].
-
-ndefinition byte8_bounded_strlen ≝
-λsource:list byte8.λlimit:word16.
- byte8_bounded_strlen_aux source 〈〈x0,x0〉:〈x0,x0〉〉 limit.
-
-(* strlen esadecimale normale *)
-nlet rec byte8_strlen_aux (source:list byte8) (count:word16) on source ≝
- match source with
- [ nil ⇒ count
- | cons _ tl ⇒ byte8_strlen_aux tl (succ_w16 count)
- ].
-
-ndefinition byte8_strlen ≝
-λsource:list byte8.
- byte8_strlen_aux source 〈〈x0,x0〉:〈x0,x0〉〉.
-
-(* hex dump: memory -> list byte8 *)
-nlet rec byte8_hexdump_aux (t:memory_impl) (mem:aux_mem_type t) (inf:word32) (count:nat) (out:list byte8) on count ≝
- match count with
- [ O ⇒ out
- | S n ⇒ byte8_hexdump_aux t mem (succ_w32 inf) n (out@[ mem_read_abs t mem inf ])
- ].
-
-ndefinition byte8_hexdump ≝
-λt:memory_impl.λmem:aux_mem_type t.λinf:word32.λcount:nat.
- byte8_hexdump_aux t mem inf count [].
-
-(* ************* *)
-(* TEST PATTERNS *)
-(* ************* *)
-
-(* lista di 3072 numeri random generati da Mathematica, in blocchi da 32 *)
-ndefinition dTest_random_ex00 ≝
-[〈x8,x1〉;〈x5,xE〉;〈x7,x6〉;〈xD,x1〉;〈x7,x5〉;〈x1,x0〉;〈x8,x5〉;〈x9,x0〉;〈x1,xF〉;〈x1,x2〉;〈xE,x2〉;〈x3,xC〉;〈x1,xD〉;〈x0,x6〉;〈x3,xC〉;〈xD,x1〉
-;〈x8,x3〉;〈xE,xB〉;〈x7,x2〉;〈x1,xF〉;〈x9,x0〉;〈xF,x0〉;〈x4,x7〉;〈xA,x3〉;〈xD,x0〉;〈x4,x6〉;〈xC,x5〉;〈x3,x2〉;〈xC,x9〉;〈x0,xB〉;〈x1,xB〉;〈x7,x3〉 ].
-
-ndefinition dTest_random_ex01 ≝
-[〈x1,x1〉;〈xA,xF〉;〈xD,x2〉;〈xB,xF〉;〈x0,xB〉;〈xB,xC〉;〈x0,x8〉;〈xE,x5〉;〈xF,xE〉;〈xA,xC〉;〈xF,xC〉;〈x9,x4〉;〈x3,x4〉;〈x8,x8〉;〈x2,x8〉;〈xD,xB〉
-;〈xD,x3〉;〈x3,xD〉;〈x3,x8〉;〈x6,xA〉;〈x4,xD〉;〈x7,x4〉;〈x4,x9〉;〈x7,xE〉;〈x6,xF〉;〈x4,xD〉;〈x3,xD〉;〈x3,xA〉;〈xC,x2〉;〈xD,x3〉;〈x3,x6〉;〈x7,x0〉 ].
-
-ndefinition dTest_random_ex02 ≝
-[〈x8,x0〉;〈xC,x9〉;〈x3,xB〉;〈x5,x2〉;〈x8,xF〉;〈x1,xE〉;〈x8,x4〉;〈x5,x2〉;〈x2,xD〉;〈xA,xF〉;〈x1,xB〉;〈x0,x1〉;〈x3,x5〉;〈x7,x2〉;〈x1,x0〉;〈x0,x7〉
-;〈x5,xD〉;〈xA,xB〉;〈xE,x0〉;〈x7,x6〉;〈xB,xD〉;〈x3,xC〉;〈x0,xD〉;〈xC,xE〉;〈xB,x7〉;〈x9,xD〉;〈xA,x9〉;〈xF,x3〉;〈xC,x1〉;〈x9,x3〉;〈x8,xC〉;〈x4,xE〉 ].
-
-ndefinition dTest_random_ex03 ≝
-[〈xF,x8〉;〈xC,x3〉;〈x1,x3〉;〈x3,xA〉;〈xA,x2〉;〈xB,xD〉;〈x1,x0〉;〈x9,xB〉;〈x5,xC〉;〈xC,x8〉;〈xE,x5〉;〈xC,x8〉;〈xA,x6〉;〈xF,xB〉;〈x1,x3〉;〈xC,x8〉
-;〈x6,x4〉;〈x0,x9〉;〈xD,x6〉;〈xD,x7〉;〈x3,x9〉;〈xF,x9〉;〈xE,x4〉;〈x0,x3〉;〈x4,x9〉;〈xC,xE〉;〈x7,x1〉;〈x5,x7〉;〈x3,x4〉;〈x2,xE〉;〈xA,x3〉;〈x5,x3〉 ].
-
-ndefinition dTest_random_ex04 ≝
-[〈xF,x9〉;〈x2,xA〉;〈xF,x0〉;〈xE,x1〉;〈x6,x6〉;〈x8,x9〉;〈x2,xE〉;〈x8,x6〉;〈xC,x7〉;〈x2,xD〉;〈x1,x2〉;〈xD,x5〉;〈x4,xA〉;〈x7,x9〉;〈x6,xD〉;〈x1,xB〉
-;〈x4,x1〉;〈x9,x4〉;〈x6,xC〉;〈x6,xD〉;〈xF,x4〉;〈x5,xD〉;〈x8,xB〉;〈xB,xE〉;〈xC,x8〉;〈xE,x5〉;〈xA,x4〉;〈xB,xA〉;〈xB,x1〉;〈x2,x1〉;〈x5,x0〉;〈x6,xB〉 ].
-
-ndefinition dTest_random_ex05 ≝
-[〈x9,x5〉;〈x0,x6〉;〈x4,x5〉;〈xE,x0〉;〈x0,xF〉;〈x5,xA〉;〈xC,xE〉;〈xC,x8〉;〈x8,x2〉;〈x4,xF〉;〈xC,x2〉;〈xF,x5〉;〈xF,x8〉;〈x1,x3〉;〈xD,xA〉;〈x2,xB〉
-;〈x7,x9〉;〈xB,xF〉;〈xA,x4〉;〈x5,xA〉;〈xD,x2〉;〈x7,x6〉;〈x8,xD〉;〈x1,xF〉;〈x1,x5〉;〈x5,xA〉;〈xD,xE〉;〈x2,x3〉;〈x9,xD〉;〈x7,xE〉;〈x6,x7〉;〈x6,x3〉 ].
-
-ndefinition dTest_random_ex06 ≝
-[〈x1,x1〉;〈xF,x5〉;〈x2,x4〉;〈xD,x6〉;〈x6,xA〉;〈x0,xC〉;〈x7,xF〉;〈x1,x2〉;〈xD,x6〉;〈xE,xE〉;〈xB,xA〉;〈x4,x4〉;〈x3,x9〉;〈x9,x2〉;〈x6,x6〉;〈xE,xA〉
-;〈x2,x3〉;〈x4,x4〉;〈xC,xF〉;〈x7,x4〉;〈x6,xB〉;〈x8,x3〉;〈x7,x7〉;〈x0,x4〉;〈x6,x4〉;〈xB,x3〉;〈x3,xC〉;〈x2,x6〉;〈xF,xC〉;〈xD,x5〉;〈x4,x1〉;〈xB,x7〉 ].
-
-ndefinition dTest_random_ex07 ≝
-[〈x2,x4〉;〈xE,x0〉;〈xB,x4〉;〈x1,x3〉;〈x3,x2〉;〈x4,x5〉;〈x1,x8〉;〈xD,xB〉;〈x0,x0〉;〈xB,x6〉;〈x5,xF〉;〈x3,xA〉;〈xB,x7〉;〈x4,xF〉;〈xB,x4〉;〈xD,xF〉
-;〈xF,x4〉;〈x1,xA〉;〈x1,x0〉;〈xE,x9〉;〈xC,x5〉;〈x2,xC〉;〈xB,xC〉;〈x5,xB〉;〈x0,x5〉;〈x4,xA〉;〈x5,x2〉;〈xC,x0〉;〈x1,xF〉;〈x5,x9〉;〈xF,x2〉;〈xE,x5〉 ].
-
-ndefinition dTest_random_ex08 ≝
-[〈x9,x7〉;〈x5,x1〉;〈xF,x7〉;〈x3,xC〉;〈x7,x7〉;〈x8,x1〉;〈x7,xC〉;〈xB,x0〉;〈x1,xD〉;〈x1,xA〉;〈x7,xB〉;〈x4,x7〉;〈x7,x9〉;〈xC,x2〉;〈x3,xF〉;〈xD,x3〉
-;〈xB,x6〉;〈xD,x7〉;〈xC,x9〉;〈x9,x2〉;〈x0,xD〉;〈x7,xF〉;〈x0,xB〉;〈x7,x5〉;〈x0,xE〉;〈x5,x1〉;〈x9,xF〉;〈x4,xC〉;〈xE,x5〉;〈xD,x0〉;〈xC,x1〉;〈x3,x9〉 ].
-
-ndefinition dTest_random_ex09 ≝
-[〈x7,xF〉;〈xE,xA〉;〈x4,x1〉;〈x0,x5〉;〈x0,x8〉;〈x7,xE〉;〈x7,x6〉;〈x2,xF〉;〈x6,x2〉;〈x7,x1〉;〈xF,x8〉;〈x3,x8〉;〈xB,x6〉;〈x7,x0〉;〈xD,xD〉;〈xD,x0〉
-;〈xA,xD〉;〈x7,x8〉;〈x3,xD〉;〈x7,xB〉;〈xC,xC〉;〈x6,xD〉;〈x3,xF〉;〈xA,xC〉;〈xC,x7〉;〈x6,xE〉;〈xF,xF〉;〈x4,x5〉;〈xC,x1〉;〈x7,x4〉;〈xB,xF〉;〈x2,x9〉 ].
-
-ndefinition dTest_random_ex0A ≝
-[〈x4,x9〉;〈xC,x5〉;〈x7,xC〉;〈x2,xD〉;〈xF,x2〉;〈xC,xC〉;〈xF,xA〉;〈x5,x8〉;〈xA,xC〉;〈x5,x8〉;〈x5,x1〉;〈x0,xE〉;〈x4,x8〉;〈x7,x0〉;〈x4,x1〉;〈xE,xD〉
-;〈x9,x5〉;〈xB,x4〉;〈x4,x7〉;〈xF,x1〉;〈x8,x1〉;〈xE,x4〉;〈x4,x0〉;〈x5,x4〉;〈x7,xB〉;〈xA,x1〉;〈xD,x2〉;〈x0,x2〉;〈xC,x5〉;〈x7,xD〉;〈x7,xA〉;〈xF,x1〉 ].
-
-ndefinition dTest_random_ex0B ≝
-[〈x0,x0〉;〈x8,xD〉;〈x6,x6〉;〈xB,x0〉;〈xA,x9〉;〈x7,xA〉;〈x2,xB〉;〈x2,xC〉;〈x6,xF〉;〈x5,xF〉;〈x6,xF〉;〈x4,xE〉;〈x2,xB〉;〈x1,x1〉;〈xF,xF〉;〈x4,x7〉
-;〈x7,xF〉;〈xC,xF〉;〈xD,x3〉;〈x8,x5〉;〈xB,x8〉;〈x4,xD〉;〈x9,x9〉;〈x8,x3〉;〈x7,x6〉;〈xE,x8〉;〈x3,x0〉;〈xF,x8〉;〈xD,x0〉;〈x5,x9〉;〈xB,x8〉;〈x7,x1〉 ].
-
-ndefinition dTest_random_ex0C ≝
-[〈x5,x7〉;〈xA,xF〉;〈xB,x5〉;〈xD,x5〉;〈xF,xC〉;〈x8,x2〉;〈x1,x6〉;〈x1,x0〉;〈xB,x3〉;〈xC,x1〉;〈x1,xA〉;〈x0,x1〉;〈x1,x1〉;〈xF,xF〉;〈x5,x9〉;〈x2,x4〉
-;〈xC,x5〉;〈x7,x2〉;〈xD,x8〉;〈xD,x0〉;〈xA,xD〉;〈xF,xE〉;〈xD,x7〉;〈x1,x1〉;〈xC,xE〉;〈xF,x9〉;〈xB,x8〉;〈x7,x7〉;〈x3,xA〉;〈x1,xF〉;〈x6,x1〉;〈x1,xB〉 ].
-
-ndefinition dTest_random_ex0D ≝
-[〈xB,xB〉;〈x5,x5〉;〈x8,x0〉;〈x7,xC〉;〈x2,x5〉;〈x3,x4〉;〈x8,x9〉;〈xF,x2〉;〈xC,x9〉;〈xD,xF〉;〈x3,x5〉;〈xC,x5〉;〈x1,x2〉;〈xF,x0〉;〈x0,x5〉;〈xD,xE〉
-;〈x2,x6〉;〈x4,x9〉;〈xB,x7〉;〈x3,x9〉;〈x0,x5〉;〈xC,x2〉;〈xD,xB〉;〈xF,xC〉;〈x9,xF〉;〈xA,x9〉;〈x6,x6〉;〈xA,xD〉;〈x4,xA〉;〈x3,xF〉;〈xB,xF〉;〈x6,xD〉 ].
-
-ndefinition dTest_random_ex0E ≝
-[〈x8,x7〉;〈x6,xA〉;〈xB,x1〉;〈x3,xE〉;〈xB,x6〉;〈x0,xE〉;〈x7,xA〉;〈x3,xB〉;〈x4,x5〉;〈xE,x9〉;〈xC,xE〉;〈x6,xA〉;〈x6,xA〉;〈x7,x0〉;〈x6,x0〉;〈x6,xA〉
-;〈x2,xC〉;〈xD,x2〉;〈xB,x8〉;〈x3,x6〉;〈x2,x1〉;〈x0,x0〉;〈x5,x4〉;〈x3,x1〉;〈x6,x0〉;〈x1,xB〉;〈x4,xC〉;〈xC,xA〉;〈xB,xE〉;〈x5,xF〉;〈x8,x1〉;〈xB,x7〉 ].
-
-ndefinition dTest_random_ex0F ≝
-[〈x9,xB〉;〈x2,x6〉;〈x9,x4〉;〈x2,xB〉;〈x4,x1〉;〈x2,xB〉;〈x9,x8〉;〈x6,x3〉;〈x6,x6〉;〈x6,x5〉;〈x4,x6〉;〈x2,x3〉;〈xE,x5〉;〈x0,x7〉;〈x9,xE〉;〈x1,xC〉
-;〈x3,x8〉;〈x5,xC〉;〈x9,x7〉;〈x6,x3〉;〈x5,x3〉;〈x6,x6〉;〈x0,x8〉;〈x5,xD〉;〈x0,x8〉;〈xD,xB〉;〈x6,xE〉;〈x5,x6〉;〈x7,x0〉;〈x3,x2〉;〈x4,x5〉;〈x0,x2〉 ].
-
-ndefinition dTest_random_ex10 ≝
-[〈x6,x3〉;〈x7,x2〉;〈x9,xC〉;〈xD,x9〉;〈x5,x0〉;〈x0,x6〉;〈x5,x9〉;〈x1,x7〉;〈x6,x8〉;〈xD,x2〉;〈xD,x7〉;〈x8,xE〉;〈x6,x9〉;〈x5,xF〉;〈x8,x1〉;〈x8,x4〉
-;〈x8,x7〉;〈xD,xC〉;〈x9,x8〉;〈xE,x5〉;〈xB,x5〉;〈xC,x3〉;〈x2,x5〉;〈x6,xC〉;〈x9,x2〉;〈xD,xD〉;〈x2,xA〉;〈xD,x1〉;〈x1,x4〉;〈x7,xE〉;〈x1,x7〉;〈xB,x2〉 ].
-
-ndefinition dTest_random_ex11 ≝
-[〈x9,x8〉;〈x5,x5〉;〈xF,xC〉;〈x3,xD〉;〈x8,xD〉;〈xE,xF〉;〈x8,x1〉;〈xB,x8〉;〈xB,xB〉;〈x5,x1〉;〈x0,x0〉;〈xB,x4〉;〈x2,xE〉;〈x3,x0〉;〈x6,x0〉;〈x7,xE〉
-;〈x9,x0〉;〈xE,x3〉;〈xF,x4〉;〈x7,x2〉;〈x1,xC〉;〈xB,x3〉;〈x7,x8〉;〈x1,xB〉;〈x9,xF〉;〈x1,xB〉;〈x0,x3〉;〈xA,x3〉;〈x0,x5〉;〈xD,xE〉;〈x3,x8〉;〈xB,xA〉 ].
-
-ndefinition dTest_random_ex12 ≝
-[〈x0,xE〉;〈xE,xD〉;〈xE,xC〉;〈x1,xF〉;〈x3,x8〉;〈xE,x3〉;〈xF,x7〉;〈xA,xA〉;〈xE,x9〉;〈x3,xD〉;〈xF,xF〉;〈xF,x3〉;〈x1,x4〉;〈x2,xC〉;〈x8,x8〉;〈x6,x1〉
-;〈x3,x0〉;〈xA,xB〉;〈x1,x8〉;〈xD,xC〉;〈xF,xE〉;〈x6,xA〉;〈x2,x9〉;〈xF,x1〉;〈xC,xB〉;〈x9,x0〉;〈x7,x8〉;〈x9,x9〉;〈x1,xF〉;〈x2,x8〉;〈xF,x9〉;〈xC,xB〉 ].
-
-ndefinition dTest_random_ex13 ≝
-[〈x1,x4〉;〈x8,x4〉;〈xF,x3〉;〈xD,x6〉;〈x7,xE〉;〈xE,xC〉;〈x5,x6〉;〈xC,xE〉;〈xD,xA〉;〈x5,xE〉;〈x6,x1〉;〈xF,x1〉;〈x6,x6〉;〈x6,x9〉;〈x9,x3〉;〈x5,x9〉
-;〈x3,xC〉;〈x1,xD〉;〈x6,xB〉;〈xF,x4〉;〈x5,x9〉;〈x4,xD〉;〈x3,x8〉;〈xA,x9〉;〈x3,xB〉;〈x7,xF〉;〈xB,x2〉;〈xE,xC〉;〈xA,xE〉;〈xF,x6〉;〈xB,x2〉;〈x2,x2〉 ].
-
-ndefinition dTest_random_ex14 ≝
-[〈x6,x4〉;〈x2,x7〉;〈x6,xC〉;〈x2,x0〉;〈xE,xE〉;〈x5,x1〉;〈x3,xE〉;〈x8,x8〉;〈xD,xD〉;〈xC,x1〉;〈xD,xC〉;〈xC,x1〉;〈x6,x6〉;〈x6,x1〉;〈x4,x2〉;〈x7,x7〉
-;〈x3,x6〉;〈x0,x8〉;〈x2,x9〉;〈x6,x0〉;〈xA,x9〉;〈xF,xC〉;〈x7,xC〉;〈xA,x7〉;〈xB,x4〉;〈xF,xC〉;〈x8,x7〉;〈x1,xD〉;〈x6,xC〉;〈xA,x2〉;〈x3,xF〉;〈x1,xD〉 ].
-
-ndefinition dTest_random_ex15 ≝
-[〈x1,x7〉;〈x0,xF〉;〈x0,x2〉;〈x2,x6〉;〈xA,x2〉;〈x6,xA〉;〈x5,xC〉;〈xE,xD〉;〈x2,x7〉;〈xC,x5〉;〈x7,xB〉;〈xF,x5〉;〈x9,xC〉;〈x8,x5〉;〈x6,x3〉;〈x5,x6〉
-;〈xC,x3〉;〈x4,xB〉;〈x1,xB〉;〈xA,x0〉;〈x1,xB〉;〈x8,x9〉;〈x3,x5〉;〈xD,x6〉;〈xD,x9〉;〈xD,xD〉;〈x2,xE〉;〈x6,x2〉;〈x7,x5〉;〈xE,x7〉;〈x1,x8〉;〈x4,xD〉 ].
-
-ndefinition dTest_random_ex16 ≝
-[〈xD,x7〉;〈x5,x8〉;〈xA,x7〉;〈x5,xF〉;〈x9,x4〉;〈x8,x7〉;〈xA,x8〉;〈xE,x7〉;〈x2,xB〉;〈xF,x2〉;〈xE,x7〉;〈xB,x9〉;〈x0,x6〉;〈xA,xF〉;〈xD,xA〉;〈xD,xC〉
-;〈xC,x6〉;〈x3,xF〉;〈x8,xD〉;〈x7,x9〉;〈x9,x5〉;〈xD,xA〉;〈x5,xB〉;〈x9,x2〉;〈xE,xE〉;〈x3,xC〉;〈xF,xE〉;〈x4,x9〉;〈x5,xA〉;〈x1,x0〉;〈x4,xD〉;〈x8,x9〉 ].
-
-ndefinition dTest_random_ex17 ≝
-[〈x8,x3〉;〈x2,x6〉;〈xE,xC〉;〈x8,xD〉;〈xC,x9〉;〈x7,x7〉;〈xE,xE〉;〈xF,x1〉;〈x4,x0〉;〈x6,xD〉;〈x4,x9〉;〈x5,x7〉;〈x9,xB〉;〈xC,x4〉;〈x1,xF〉;〈x8,x0〉
-;〈x9,x5〉;〈xB,xC〉;〈xE,x8〉;〈xF,x9〉;〈xD,x7〉;〈x1,x4〉;〈x3,xE〉;〈xC,x3〉;〈x6,xF〉;〈x8,xF〉;〈x7,x2〉;〈xD,x5〉;〈xB,xE〉;〈x8,xA〉;〈xA,x3〉;〈xF,x7〉 ].
-
-ndefinition dTest_random_ex18 ≝
-[〈x6,x0〉;〈x3,xA〉;〈x7,x4〉;〈xF,xB〉;〈xB,xD〉;〈x7,x4〉;〈x8,x3〉;〈xE,x3〉;〈x9,xD〉;〈xD,x9〉;〈xB,x8〉;〈x1,x3〉;〈x5,x0〉;〈x4,x0〉;〈x8,xA〉;〈x9,x6〉
-;〈x3,xA〉;〈xA,x6〉;〈xE,xC〉;〈x7,xC〉;〈x1,x5〉;〈x8,x7〉;〈x4,xD〉;〈x6,xA〉;〈xA,xA〉;〈xE,x0〉;〈xB,xA〉;〈xF,xF〉;〈x3,xB〉;〈xE,x2〉;〈x5,x1〉;〈x2,x2〉 ].
-
-ndefinition dTest_random_ex19 ≝
-[〈x2,x2〉;〈x1,xF〉;〈xA,x1〉;〈x2,x1〉;〈xA,xF〉;〈x3,x7〉;〈x8,xA〉;〈xD,xF〉;〈xE,x3〉;〈x6,x9〉;〈xE,xE〉;〈xC,x4〉;〈xE,x7〉;〈x7,x1〉;〈x9,x6〉;〈x1,x1〉
-;〈xE,x4〉;〈x3,x9〉;〈xE,x5〉;〈xA,xF〉;〈xF,x5〉;〈x5,x7〉;〈xE,xB〉;〈x5,x5〉;〈x6,x5〉;〈x8,xB〉;〈x3,xE〉;〈x8,xD〉;〈x4,x6〉;〈x5,x3〉;〈xB,x2〉;〈x1,x9〉 ].
-
-ndefinition dTest_random_ex1A ≝
-[〈x3,x4〉;〈xE,x9〉;〈x4,xA〉;〈x4,xB〉;〈x5,x2〉;〈x3,x0〉;〈x3,xF〉;〈xA,x7〉;〈x4,xF〉;〈x1,xA〉;〈xB,x8〉;〈x6,x4〉;〈x5,xB〉;〈xD,x9〉;〈x6,xD〉;〈x6,x1〉
-;〈xA,x5〉;〈xC,xF〉;〈x8,xC〉;〈xD,xD〉;〈xE,x6〉;〈xD,x5〉;〈x3,x6〉;〈x0,xC〉;〈x8,xD〉;〈xF,x7〉;〈x4,xE〉;〈x9,xC〉;〈xB,xF〉;〈x2,xB〉;〈x4,x4〉;〈xD,x1〉 ].
-
-ndefinition dTest_random_ex1B ≝
-[〈xC,x0〉;〈x8,x0〉;〈x0,x8〉;〈xA,xD〉;〈xC,xE〉;〈xB,xD〉;〈x4,xC〉;〈x5,x3〉;〈x6,x5〉;〈xB,x6〉;〈x4,x8〉;〈xF,x6〉;〈x6,x4〉;〈x7,xC〉;〈x9,x8〉;〈x1,x0〉
-;〈x9,xD〉;〈xF,xD〉;〈x4,x9〉;〈xC,x4〉;〈xD,xD〉;〈x1,x4〉;〈xB,x6〉;〈x6,xF〉;〈x3,xB〉;〈x4,x6〉;〈xD,x7〉;〈x1,xA〉;〈x4,x4〉;〈xA,x4〉;〈x8,x1〉;〈x3,x1〉 ].
-
-ndefinition dTest_random_ex1C ≝
-[〈xA,x2〉;〈x4,x0〉;〈x7,x0〉;〈x3,x9〉;〈x9,xA〉;〈x4,xC〉;〈x4,xF〉;〈x9,x3〉;〈x9,xD〉;〈xD,x4〉;〈x9,x7〉;〈x3,x9〉;〈xA,x8〉;〈xA,x8〉;〈xF,x9〉;〈xB,x3〉
-;〈xE,x7〉;〈xD,x8〉;〈x4,xD〉;〈x6,xD〉;〈x8,x8〉;〈x6,xB〉;〈x5,x4〉;〈x5,x5〉;〈x9,x2〉;〈x1,x9〉;〈xE,x4〉;〈xB,x1〉;〈xE,x3〉;〈x4,x6〉;〈xD,x5〉;〈x6,xC〉 ].
-
-ndefinition dTest_random_ex1D ≝
-[〈xF,x9〉;〈x3,x3〉;〈xE,x5〉;〈xD,x2〉;〈x7,x7〉;〈x1,x8〉;〈x8,x6〉;〈x1,x4〉;〈x7,xE〉;〈x1,xE〉;〈xC,x8〉;〈xB,x4〉;〈xC,xE〉;〈xC,x7〉;〈x5,x7〉;〈x2,xD〉
-;〈x5,x2〉;〈xE,x7〉;〈x5,x7〉;〈x9,xB〉;〈x1,xA〉;〈x4,x9〉;〈x0,x9〉;〈x4,xB〉;〈xF,x6〉;〈xB,x5〉;〈x0,xA〉;〈x2,xC〉;〈xB,xA〉;〈x1,xF〉;〈x2,x6〉;〈x3,x8〉 ].
-
-ndefinition dTest_random_ex1E ≝
-[〈x6,x0〉;〈x3,x4〉;〈xC,x4〉;〈x8,x9〉;〈xB,xF〉;〈x0,x4〉;〈x5,xF〉;〈xF,x4〉;〈x1,x1〉;〈xF,x3〉;〈x4,xA〉;〈xE,x2〉;〈xD,x8〉;〈x3,x6〉;〈xF,xA〉;〈x4,x3〉
-;〈x0,xC〉;〈x6,x0〉;〈x5,x1〉;〈x2,xD〉;〈x0,x3〉;〈xF,xC〉;〈x9,x2〉;〈x2,x1〉;〈xC,xA〉;〈x7,x5〉;〈x6,x6〉;〈xD,xC〉;〈x8,x4〉;〈xC,x4〉;〈x6,xF〉;〈xF,x0〉 ].
-
-ndefinition dTest_random_ex1F ≝
-[〈x0,x4〉;〈x5,x2〉;〈xA,xB〉;〈x9,xA〉;〈xC,xE〉;〈xA,xA〉;〈x2,xF〉;〈x3,x6〉;〈xF,x3〉;〈xA,x7〉;〈x4,x2〉;〈x0,x7〉;〈x5,xE〉;〈xB,x6〉;〈x5,xB〉;〈x9,x8〉
-;〈x7,x9〉;〈x4,x3〉;〈x8,x8〉;〈x9,xA〉;〈x0,xA〉;〈x5,x5〉;〈xE,x3〉;〈x9,x8〉;〈x7,x5〉;〈xA,x2〉;〈xE,xA〉;〈xB,x9〉;〈x3,x2〉;〈x4,x1〉;〈x0,x7〉;〈x3,x8〉 ].
-
-ndefinition dTest_random_ex20 ≝
-[〈xB,x1〉;〈x0,x3〉;〈x4,xE〉;〈x6,xF〉;〈x9,x7〉;〈x3,xC〉;〈x5,x4〉;〈xB,xB〉;〈xB,xC〉;〈x0,xB〉;〈x0,xC〉;〈xA,xB〉;〈x3,xB〉;〈x2,x8〉;〈xA,xA〉;〈x0,x4〉
-;〈x5,x0〉;〈xA,x3〉;〈x6,xB〉;〈xF,xA〉;〈xF,x0〉;〈xE,x6〉;〈x1,x8〉;〈xD,x8〉;〈x7,xA〉;〈x5,xF〉;〈x0,x3〉;〈x8,x2〉;〈x9,x6〉;〈x9,xA〉;〈xB,xF〉;〈x1,x5〉 ].
-
-ndefinition dTest_random_ex21 ≝
-[〈x8,x5〉;〈xE,xF〉;〈xB,x3〉;〈x7,xB〉;〈xE,xE〉;〈xE,xF〉;〈x1,x0〉;〈x6,x9〉;〈xC,x2〉;〈xF,x9〉;〈x2,xD〉;〈x8,x1〉;〈xF,x3〉;〈x0,xE〉;〈xC,x3〉;〈x7,xF〉
-;〈xD,xD〉;〈x2,xE〉;〈x2,xA〉;〈xB,xD〉;〈xE,xA〉;〈x9,x2〉;〈xF,xF〉;〈xF,xA〉;〈x7,xB〉;〈xD,x3〉;〈x3,x0〉;〈x7,x5〉;〈x6,x7〉;〈xA,x8〉;〈x0,xF〉;〈x2,x1〉 ].
-
-ndefinition dTest_random_ex22 ≝
-[〈xD,xC〉;〈xE,x5〉;〈xE,x2〉;〈x8,x9〉;〈x2,x9〉;〈xC,x5〉;〈xA,x3〉;〈xA,x2〉;〈x4,x2〉;〈x3,xF〉;〈xA,x3〉;〈x5,x8〉;〈xE,x0〉;〈x7,xC〉;〈x0,x3〉;〈xF,xF〉
-;〈x2,x8〉;〈x8,xB〉;〈x8,xB〉;〈x1,x2〉;〈xD,x8〉;〈xA,x8〉;〈x7,x6〉;〈xB,x9〉;〈xE,x2〉;〈xF,xE〉;〈x2,x1〉;〈x3,xF〉;〈xA,xC〉;〈x4,x6〉;〈xB,xC〉;〈xF,x8〉 ].
-
-ndefinition dTest_random_ex23 ≝
-[〈xD,x3〉;〈xE,xB〉;〈xF,xC〉;〈x9,xF〉;〈xE,x7〉;〈x6,x1〉;〈xC,xB〉;〈xB,xF〉;〈x4,xE〉;〈xC,x4〉;〈x9,x7〉;〈x1,xE〉;〈x0,xD〉;〈x7,x9〉;〈x8,x3〉;〈xA,xB〉
-;〈x4,xC〉;〈x2,x6〉;〈x6,x3〉;〈x6,xF〉;〈xE,xE〉;〈x5,x9〉;〈x8,x1〉;〈x0,x2〉;〈x2,xC〉;〈xE,xD〉;〈x6,xF〉;〈x0,x4〉;〈x1,x0〉;〈xE,x0〉;〈xD,xA〉;〈xB,xE〉 ].
-
-ndefinition dTest_random_ex24 ≝
-[〈xE,xE〉;〈x5,x7〉;〈xB,x0〉;〈x3,x1〉;〈x4,x1〉;〈xD,xC〉;〈x3,xC〉;〈xC,xC〉;〈x5,x8〉;〈x2,x8〉;〈x2,xC〉;〈x1,xB〉;〈x8,x6〉;〈xD,x6〉;〈xF,x9〉;〈xD,x5〉
-;〈x4,xA〉;〈xE,xA〉;〈x0,xB〉;〈x2,x0〉;〈x2,xC〉;〈x4,x2〉;〈xC,xE〉;〈x4,x5〉;〈x2,xB〉;〈x0,x1〉;〈xA,xA〉;〈xB,x1〉;〈x6,xE〉;〈xB,x7〉;〈xB,x7〉;〈x2,x8〉 ].
-
-ndefinition dTest_random_ex25 ≝
-[〈x9,x5〉;〈x1,x9〉;〈xA,x7〉;〈x5,xC〉;〈x4,xE〉;〈x7,xB〉;〈x3,xE〉;〈xD,x3〉;〈x9,x0〉;〈x8,x6〉;〈x7,x1〉;〈x1,x4〉;〈xD,x2〉;〈xD,x4〉;〈xB,x4〉;〈xF,x2〉
-;〈x3,x1〉;〈x2,x8〉;〈x4,x5〉;〈xF,xD〉;〈x7,x8〉;〈x5,xD〉;〈xF,xA〉;〈xF,x3〉;〈x9,x5〉;〈x4,xD〉;〈x3,x1〉;〈xB,x8〉;〈xC,xC〉;〈x2,x1〉;〈x1,x9〉;〈x4,x2〉 ].
-
-ndefinition dTest_random_ex26 ≝
-[〈x2,xA〉;〈xF,x2〉;〈xB,xA〉;〈x0,x4〉;〈x9,xF〉;〈x4,x3〉;〈x4,x5〉;〈x1,xC〉;〈x7,x4〉;〈xB,xB〉;〈x7,x0〉;〈x5,xE〉;〈x0,x1〉;〈xA,xC〉;〈x6,xD〉;〈xD,x7〉
-;〈x9,xC〉;〈x9,xD〉;〈x1,xA〉;〈x9,x8〉;〈xB,x1〉;〈xF,xC〉;〈x6,x1〉;〈xA,x3〉;〈x4,x1〉;〈x4,x1〉;〈xA,xF〉;〈x1,xD〉;〈xE,x1〉;〈x3,x2〉;〈x1,x9〉;〈x6,x0〉 ].
-
-ndefinition dTest_random_ex27 ≝
-[〈x2,x9〉;〈x9,x7〉;〈x8,x5〉;〈x5,x3〉;〈x5,x3〉;〈x9,x1〉;〈xB,x3〉;〈x9,x4〉;〈xD,x5〉;〈x9,xD〉;〈x4,xC〉;〈x3,x6〉;〈x0,xE〉;〈x8,x4〉;〈xA,x1〉;〈x4,x6〉
-;〈x6,xA〉;〈x1,xF〉;〈xF,x3〉;〈x6,xB〉;〈xB,xE〉;〈x4,xA〉;〈x1,x9〉;〈x7,x5〉;〈xF,xC〉;〈xC,x6〉;〈xE,xA〉;〈x7,xE〉;〈xD,x1〉;〈x3,x3〉;〈x6,x7〉;〈xB,x7〉 ].
-
-ndefinition dTest_random_ex28 ≝
-[〈xE,xE〉;〈x5,x9〉;〈xE,x2〉;〈xD,xD〉;〈x2,x2〉;〈x8,xC〉;〈x9,xB〉;〈x3,xE〉;〈x9,x8〉;〈xF,xC〉;〈x1,x3〉;〈xE,x2〉;〈x0,xC〉;〈x4,xE〉;〈x3,x1〉;〈x8,x7〉
-;〈x6,x7〉;〈x6,xA〉;〈x4,xC〉;〈x4,xC〉;〈x7,x2〉;〈x0,x0〉;〈x0,x5〉;〈x1,xF〉;〈xF,x6〉;〈x3,x0〉;〈xE,xE〉;〈xD,xE〉;〈xB,x1〉;〈x4,xC〉;〈xF,x7〉;〈xE,xC〉 ].
-
-ndefinition dTest_random_ex29 ≝
-[〈x2,xC〉;〈x4,x0〉;〈x6,xB〉;〈x6,x8〉;〈x9,x0〉;〈x8,x8〉;〈x6,xF〉;〈xB,x3〉;〈x4,x7〉;〈x6,x2〉;〈x9,x2〉;〈x9,xB〉;〈x2,xB〉;〈x3,x2〉;〈x4,x0〉;〈xA,x7〉
-;〈x8,x9〉;〈x4,x0〉;〈x2,x3〉;〈x5,xC〉;〈xF,x9〉;〈x2,x9〉;〈x6,x2〉;〈xA,xE〉;〈x5,xB〉;〈xC,x9〉;〈x2,xC〉;〈x9,x2〉;〈x6,xF〉;〈xF,x5〉;〈xA,x0〉;〈x0,xE〉 ].
-
-ndefinition dTest_random_ex2A ≝
-[〈xD,xE〉;〈xF,x9〉;〈x0,x9〉;〈x1,x0〉;〈x3,x9〉;〈x4,x6〉;〈xC,x5〉;〈xE,x2〉;〈x8,x3〉;〈xD,x5〉;〈x8,xE〉;〈x4,x6〉;〈x4,xC〉;〈xA,xC〉;〈x7,xF〉;〈x4,xF〉
-;〈xC,x1〉;〈x4,xF〉;〈x1,xA〉;〈x6,x1〉;〈x9,x6〉;〈x0,xB〉;〈x0,x0〉;〈x6,xF〉;〈x2,x6〉;〈x8,xC〉;〈xE,xE〉;〈x9,x3〉;〈x1,xB〉;〈x9,xE〉;〈xA,x5〉;〈x9,x6〉 ].
-
-ndefinition dTest_random_ex2B ≝
-[〈x2,xA〉;〈xE,xB〉;〈x4,x6〉;〈x5,xF〉;〈x3,xC〉;〈xD,x6〉;〈x2,xD〉;〈x9,x4〉;〈x6,xB〉;〈xF,x4〉;〈xD,xA〉;〈x6,x9〉;〈x5,x9〉;〈xA,xC〉;〈xB,xD〉;〈x9,xE〉
-;〈x4,x8〉;〈x0,x2〉;〈xD,xC〉;〈x5,xC〉;〈x6,x0〉;〈x2,xA〉;〈x6,xE〉;〈xC,xA〉;〈x6,xE〉;〈x1,xF〉;〈xD,x4〉;〈x3,xA〉;〈xB,x0〉;〈x9,xE〉;〈x8,xF〉;〈xA,xB〉 ].
-
-ndefinition dTest_random_ex2C ≝
-[〈xB,x2〉;〈x0,x2〉;〈x4,x7〉;〈x7,xD〉;〈xA,xB〉;〈xD,xB〉;〈xB,x5〉;〈x6,xD〉;〈xE,x2〉;〈x8,x9〉;〈x4,xD〉;〈x0,x4〉;〈xB,xE〉;〈xF,xA〉;〈x2,x2〉;〈x1,x4〉
-;〈x7,x1〉;〈x1,x2〉;〈x1,xB〉;〈x0,xD〉;〈xB,xA〉;〈x5,xA〉;〈x6,xC〉;〈x1,xE〉;〈x3,xA〉;〈x0,xF〉;〈x6,xE〉;〈x4,x4〉;〈xC,x8〉;〈xB,x5〉;〈x8,xC〉;〈x0,x3〉 ].
-
-ndefinition dTest_random_ex2D ≝
-[〈x0,x6〉;〈x6,x4〉;〈x8,x5〉;〈x2,x8〉;〈x6,x4〉;〈x2,x2〉;〈x8,x1〉;〈x7,x6〉;〈xF,xE〉;〈xF,xA〉;〈x6,x2〉;〈x9,x1〉;〈xB,xE〉;〈xB,xC〉;〈x6,x1〉;〈x4,xB〉
-;〈x7,xE〉;〈x5,x0〉;〈xB,xC〉;〈xE,xE〉;〈x6,x3〉;〈xC,xF〉;〈x1,xD〉;〈xF,xD〉;〈x6,x2〉;〈x5,xC〉;〈x8,x5〉;〈x9,xE〉;〈xA,x5〉;〈x2,x6〉;〈xE,x7〉;〈x4,x6〉 ].
-
-ndefinition dTest_random_ex2E ≝
-[〈x3,xB〉;〈xE,xA〉;〈xB,xE〉;〈x0,x4〉;〈x8,x8〉;〈xF,x2〉;〈x9,x2〉;〈x0,xB〉;〈xD,x9〉;〈xE,x9〉;〈x2,x9〉;〈x3,x8〉;〈x8,x8〉;〈x8,xA〉;〈x6,x9〉;〈x1,x7〉
-;〈x4,xB〉;〈xB,xF〉;〈x0,xC〉;〈xF,x2〉;〈xF,xD〉;〈x7,x3〉;〈x5,x9〉;〈xB,xE〉;〈x5,x4〉;〈x1,xC〉;〈xD,x3〉;〈x3,x1〉;〈x6,x2〉;〈x1,xB〉;〈xB,x7〉;〈x3,x2〉 ].
-
-ndefinition dTest_random_ex2F ≝
-[〈xA,x4〉;〈xF,x1〉;〈x7,x0〉;〈x9,xA〉;〈x4,x6〉;〈xA,x1〉;〈x1,xC〉;〈x0,x4〉;〈x6,xC〉;〈xF,x2〉;〈xE,x6〉;〈xC,x1〉;〈xA,x4〉;〈xF,x2〉;〈x2,xA〉;〈x4,xB〉
-;〈x3,x5〉;〈x9,xB〉;〈x9,x9〉;〈xF,xF〉;〈x0,x1〉;〈x1,x3〉;〈xF,x9〉;〈x5,xC〉;〈x3,xC〉;〈x5,x1〉;〈x8,xA〉;〈xA,x5〉;〈x5,xF〉;〈x9,xE〉;〈x5,xE〉;〈xC,x6〉 ].
-
-ndefinition dTest_random_ex30 ≝
-[〈x2,x1〉;〈x3,x7〉;〈xD,x2〉;〈xB,x9〉;〈x9,x8〉;〈xA,x1〉;〈x6,x0〉;〈xE,x9〉;〈x4,x5〉;〈xC,xA〉;〈xD,x7〉;〈xB,xD〉;〈xC,xF〉;〈x0,xF〉;〈x2,x4〉;〈xE,x5〉
-;〈x7,x9〉;〈x4,xB〉;〈x1,xC〉;〈x5,x7〉;〈x3,xA〉;〈x2,x4〉;〈x2,x2〉;〈x0,x8〉;〈x3,x3〉;〈xE,x2〉;〈xA,x2〉;〈x5,x8〉;〈x2,x5〉;〈x5,x4〉;〈x7,x1〉;〈x2,xB〉 ].
-
-ndefinition dTest_random_ex31 ≝
-[〈xF,xF〉;〈xE,xD〉;〈x4,x8〉;〈xF,x6〉;〈x2,x3〉;〈x3,x1〉;〈xB,xA〉;〈x5,x1〉;〈x9,xF〉;〈xA,xA〉;〈xC,xC〉;〈x0,x3〉;〈x1,x5〉;〈xC,x7〉;〈x2,xD〉;〈xD,x3〉
-;〈xE,xB〉;〈x8,xF〉;〈x8,x4〉;〈x4,x0〉;〈x5,x3〉;〈xA,xD〉;〈x6,x7〉;〈xE,xC〉;〈xA,xF〉;〈xD,xC〉;〈x1,xC〉;〈x7,x4〉;〈x6,xB〉;〈xA,xD〉;〈xC,xD〉;〈xA,x7〉 ].
-
-ndefinition dTest_random_ex32 ≝
-[〈x1,x1〉;〈x1,x0〉;〈xC,xF〉;〈xB,xE〉;〈xA,x1〉;〈x0,x1〉;〈x3,xF〉;〈xC,x0〉;〈x8,x5〉;〈x2,x8〉;〈x6,xB〉;〈xC,x3〉;〈x6,xD〉;〈xD,x8〉;〈x7,x5〉;〈x5,xA〉
-;〈xF,x0〉;〈x2,x2〉;〈x4,xB〉;〈x9,xC〉;〈x3,x1〉;〈xE,x4〉;〈xE,x7〉;〈xC,x6〉;〈xF,xC〉;〈x3,x0〉;〈xD,x5〉;〈xF,x9〉;〈x1,xA〉;〈x4,x0〉;〈x1,xF〉;〈x6,xD〉 ].
-
-ndefinition dTest_random_ex33 ≝
-[〈xD,x5〉;〈x7,x8〉;〈xB,x5〉;〈x7,x6〉;〈xC,x9〉;〈xE,x1〉;〈xD,xF〉;〈x1,x2〉;〈x6,x1〉;〈xD,xF〉;〈x9,xF〉;〈x5,x7〉;〈x7,xD〉;〈x0,xB〉;〈xA,xD〉;〈x5,xA〉
-;〈xA,x1〉;〈x8,x4〉;〈xE,x5〉;〈xF,x7〉;〈xB,xC〉;〈xD,x3〉;〈xA,x5〉;〈xB,x4〉;〈x8,x5〉;〈x6,x7〉;〈x3,x6〉;〈xF,xC〉;〈xB,x1〉;〈xB,x3〉;〈xC,xB〉;〈x1,xE〉 ].
-
-ndefinition dTest_random_ex34 ≝
-[〈xE,xC〉;〈x6,xE〉;〈xE,x1〉;〈x1,xC〉;〈xA,x5〉;〈x5,x3〉;〈x9,x8〉;〈xF,x6〉;〈xD,xF〉;〈x4,x1〉;〈x1,x3〉;〈x2,xE〉;〈x7,xF〉;〈x0,xE〉;〈x3,x8〉;〈x3,xC〉
-;〈xD,x4〉;〈x8,xC〉;〈x2,xA〉;〈x2,x8〉;〈x4,xE〉;〈x7,xE〉;〈x0,xE〉;〈xF,x7〉;〈xC,xA〉;〈x3,xE〉;〈xE,x4〉;〈xB,x4〉;〈x0,x5〉;〈x5,x8〉;〈xD,xC〉;〈x7,x8〉 ].
-
-ndefinition dTest_random_ex35 ≝
-[〈xD,x9〉;〈xF,x9〉;〈x7,x9〉;〈x8,x4〉;〈x0,x2〉;〈x3,xF〉;〈xC,xF〉;〈x3,x8〉;〈xD,x7〉;〈x2,x6〉;〈x1,xD〉;〈x1,x8〉;〈x4,xD〉;〈xE,xA〉;〈x7,xA〉;〈xD,x4〉
-;〈x2,x4〉;〈x0,xD〉;〈x4,xD〉;〈x9,x0〉;〈x1,x7〉;〈x1,xE〉;〈x6,xE〉;〈xB,x6〉;〈xC,xC〉;〈xC,x0〉;〈xB,x0〉;〈x5,xE〉;〈x9,x9〉;〈x6,xD〉;〈xC,xF〉;〈xE,xE〉 ].
-
-ndefinition dTest_random_ex36 ≝
-[〈x2,x9〉;〈xC,xF〉;〈xA,x2〉;〈x0,xC〉;〈xA,xB〉;〈x7,x4〉;〈x2,x9〉;〈x4,xE〉;〈x8,x2〉;〈x9,x3〉;〈x6,x9〉;〈x7,xB〉;〈xE,xC〉;〈xC,x7〉;〈x8,x9〉;〈xC,xA〉
-;〈xD,xD〉;〈xA,xC〉;〈x6,x5〉;〈x8,x0〉;〈x1,x4〉;〈x0,x9〉;〈x5,x5〉;〈x0,xE〉;〈x8,x4〉;〈x5,xE〉;〈x6,xF〉;〈x3,x4〉;〈x1,x8〉;〈xC,x9〉;〈x8,xB〉;〈xE,x4〉 ].
-
-ndefinition dTest_random_ex37 ≝
-[〈x3,xE〉;〈xC,x4〉;〈x1,x6〉;〈xA,x4〉;〈x1,x9〉;〈x3,x4〉;〈x0,xE〉;〈x5,xE〉;〈xF,x9〉;〈x0,x3〉;〈x1,x3〉;〈x7,x2〉;〈x2,x7〉;〈x2,x8〉;〈xA,x7〉;〈x6,xD〉
-;〈xC,x1〉;〈x1,xD〉;〈xF,x0〉;〈x2,x8〉;〈xF,xB〉;〈xF,x6〉;〈x3,x8〉;〈x0,x1〉;〈xF,x9〉;〈xB,xC〉;〈x6,x6〉;〈xF,x8〉;〈x6,xE〉;〈xD,x1〉;〈xB,x5〉;〈x3,x8〉 ].
-
-ndefinition dTest_random_ex38 ≝
-[〈x4,x3〉;〈xB,x6〉;〈x6,x8〉;〈xA,xC〉;〈x0,x9〉;〈xF,xD〉;〈x0,x9〉;〈x6,x8〉;〈xE,x0〉;〈x2,x2〉;〈xA,xF〉;〈x4,x0〉;〈x2,x6〉;〈x0,xC〉;〈x5,x2〉;〈xA,x7〉
-;〈xA,xD〉;〈xC,x3〉;〈x8,x2〉;〈xD,xC〉;〈x3,xC〉;〈x6,x5〉;〈xF,x2〉;〈xE,x8〉;〈xC,x0〉;〈x0,x6〉;〈x6,x4〉;〈xB,x1〉;〈x2,x0〉;〈x9,x5〉;〈x2,x2〉;〈xD,xD〉 ].
-
-ndefinition dTest_random_ex39 ≝
-[〈xA,xD〉;〈xF,xF〉;〈x1,xB〉;〈x8,xB〉;〈xB,x6〉;〈x4,xA〉;〈xB,xB〉;〈x9,x8〉;〈x1,xA〉;〈xE,xC〉;〈x7,xB〉;〈xA,x6〉;〈x2,xC〉;〈xE,x1〉;〈xC,x7〉;〈xD,xC〉
-;〈x1,x9〉;〈x0,x6〉;〈x0,xA〉;〈x9,xF〉;〈x5,x2〉;〈x2,xB〉;〈xC,xA〉;〈x2,xF〉;〈x4,x0〉;〈xF,x8〉;〈xE,xA〉;〈x8,x7〉;〈x8,x9〉;〈xF,xD〉;〈x5,xD〉;〈x0,x0〉 ].
-
-ndefinition dTest_random_ex3A ≝
-[〈x6,xE〉;〈x0,x0〉;〈x0,xD〉;〈x3,x0〉;〈x4,x3〉;〈x5,xA〉;〈x8,xF〉;〈x8,xA〉;〈xA,x4〉;〈x5,x0〉;〈x8,xF〉;〈x0,xC〉;〈x7,x7〉;〈xF,x2〉;〈x6,x5〉;〈xE,x4〉
-;〈x2,xD〉;〈xE,x5〉;〈xA,x8〉;〈x7,xF〉;〈x7,x8〉;〈xE,x3〉;〈x9,x5〉;〈xD,xA〉;〈x0,x7〉;〈x2,x9〉;〈x5,x1〉;〈x9,x4〉;〈xE,x4〉;〈x0,x1〉;〈xB,xF〉;〈x6,xE〉 ].
-
-ndefinition dTest_random_ex3B ≝
-[〈x9,x8〉;〈x9,xC〉;〈x9,x0〉;〈xA,x8〉;〈x0,xA〉;〈x3,xD〉;〈x3,xC〉;〈x5,x0〉;〈xE,xB〉;〈x1,x2〉;〈xC,x4〉;〈x5,xF〉;〈x4,x7〉;〈x7,xB〉;〈x2,xC〉;〈xD,xF〉
-;〈x7,x8〉;〈x1,x3〉;〈x7,x4〉;〈xE,x0〉;〈x7,xB〉;〈x7,x1〉;〈x4,x7〉;〈x4,x8〉;〈x1,xB〉;〈xE,x3〉;〈x6,xB〉;〈x0,xB〉;〈x4,xB〉;〈x5,x9〉;〈x9,x3〉;〈xD,xF〉 ].
-
-ndefinition dTest_random_ex3C ≝
-[〈xE,x1〉;〈x1,xB〉;〈xD,x0〉;〈xE,xD〉;〈x4,x7〉;〈x4,xD〉;〈xC,x2〉;〈xD,xE〉;〈x5,xC〉;〈xD,xA〉;〈x9,x5〉;〈xC,x8〉;〈x1,x0〉;〈x7,x7〉;〈x7,xF〉;〈xC,x0〉
-;〈xA,x7〉;〈xD,x3〉;〈xD,x3〉;〈xD,x8〉;〈x3,x4〉;〈xA,x1〉;〈x1,x5〉;〈xE,x0〉;〈x0,x4〉;〈x1,xE〉;〈x8,x2〉;〈xC,xA〉;〈xD,x9〉;〈x1,x1〉;〈xB,x1〉;〈xC,x9〉 ].
-
-ndefinition dTest_random_ex3D ≝
-[〈x4,xC〉;〈x4,xB〉;〈x0,x9〉;〈x4,x8〉;〈xF,xC〉;〈xD,xD〉;〈x6,xE〉;〈xC,xA〉;〈x7,x6〉;〈xA,xE〉;〈x8,xE〉;〈x3,xB〉;〈xF,xB〉;〈x6,x5〉;〈x8,x3〉;〈x1,xD〉
-;〈xD,xB〉;〈xA,xE〉;〈x4,xF〉;〈xC,x6〉;〈x1,xE〉;〈xC,x5〉;〈xC,xC〉;〈x7,xC〉;〈x2,x8〉;〈xF,x9〉;〈xD,x2〉;〈x8,x6〉;〈x1,x5〉;〈xF,xA〉;〈x4,x1〉;〈x4,x5〉 ].
-
-ndefinition dTest_random_ex3E ≝
-[〈x2,xE〉;〈x9,x5〉;〈xB,xF〉;〈x0,xD〉;〈x8,xB〉;〈x8,xD〉;〈x1,x1〉;〈x9,xC〉;〈xB,x8〉;〈xF,xB〉;〈x2,x6〉;〈xD,x6〉;〈x9,x1〉;〈x0,xD〉;〈xC,xD〉;〈x0,x7〉
-;〈x5,x0〉;〈xF,xA〉;〈x2,x9〉;〈x3,xF〉;〈x0,xC〉;〈x2,xB〉;〈xF,xE〉;〈x9,x7〉;〈x5,x5〉;〈x5,xA〉;〈x6,xD〉;〈x9,x6〉;〈x0,x5〉;〈x0,x9〉;〈x4,x5〉;〈xE,xF〉 ].
-
-ndefinition dTest_random_ex3F ≝
-[〈x0,xF〉;〈x7,x4〉;〈x9,x3〉;〈x6,xC〉;〈x8,x2〉;〈x3,x7〉;〈xE,xB〉;〈x5,x0〉;〈xF,x5〉;〈xC,x4〉;〈x0,xB〉;〈x3,x8〉;〈x2,xD〉;〈x8,xA〉;〈x9,x3〉;〈x6,xD〉
-;〈x1,xD〉;〈xE,x5〉;〈xF,x7〉;〈xE,x7〉;〈xD,x7〉;〈x5,xC〉;〈xB,x4〉;〈x5,x0〉;〈x7,x5〉;〈x0,xD〉;〈xF,x3〉;〈xC,xE〉;〈x3,x1〉;〈xF,x1〉;〈x8,xE〉;〈x8,xF〉 ].
-
-ndefinition dTest_random_ex40 ≝
-[〈xD,xB〉;〈x1,x4〉;〈xF,x6〉;〈x0,x3〉;〈xA,xB〉;〈xA,xE〉;〈xB,xC〉;〈xE,xB〉;〈xC,x8〉;〈x6,x7〉;〈xC,xC〉;〈xF,xF〉;〈x4,xF〉;〈xC,x6〉;〈x2,x9〉;〈x9,x5〉
-;〈xB,xC〉;〈x6,x5〉;〈x5,x2〉;〈xF,x2〉;〈x3,x5〉;〈xC,x4〉;〈xF,x4〉;〈x9,xB〉;〈x4,x5〉;〈x1,xC〉;〈xD,xB〉;〈x6,x1〉;〈xF,xE〉;〈x3,xF〉;〈xB,x9〉;〈xD,x8〉 ].
-
-ndefinition dTest_random_ex41 ≝
-[〈xF,x1〉;〈xA,xC〉;〈x0,x7〉;〈xA,x4〉;〈xB,x8〉;〈x8,x8〉;〈x9,x5〉;〈xB,x8〉;〈x5,x6〉;〈x3,x2〉;〈x5,xA〉;〈x3,xE〉;〈x2,x2〉;〈x0,xB〉;〈x9,x6〉;〈xE,xE〉
-;〈x6,xF〉;〈x1,xE〉;〈x3,x2〉;〈x4,x9〉;〈x4,xF〉;〈xC,xC〉;〈xD,xB〉;〈x5,x1〉;〈x4,xD〉;〈xD,x1〉;〈x4,xF〉;〈x0,x9〉;〈x5,xA〉;〈xA,xC〉;〈xE,x7〉;〈x8,x6〉 ].
-
-ndefinition dTest_random_ex42 ≝
-[〈x5,x8〉;〈xA,x5〉;〈xA,x7〉;〈x5,xE〉;〈x3,x6〉;〈x1,x1〉;〈x3,xA〉;〈x8,x9〉;〈x8,x2〉;〈xD,xC〉;〈x6,x2〉;〈x0,xE〉;〈xA,xB〉;〈x2,xB〉;〈x2,x5〉;〈xF,x9〉
-;〈x7,x7〉;〈x8,x6〉;〈x1,xD〉;〈x7,x9〉;〈x5,x1〉;〈xB,xD〉;〈x9,x8〉;〈xB,x7〉;〈xB,xB〉;〈xF,x6〉;〈xD,x9〉;〈x6,x6〉;〈x0,x1〉;〈x1,x2〉;〈xE,xB〉;〈x0,xA〉 ].
-
-ndefinition dTest_random_ex43 ≝
-[〈xC,xD〉;〈x1,xA〉;〈xA,xA〉;〈xC,xC〉;〈x6,x5〉;〈x4,x2〉;〈x8,xF〉;〈x2,xA〉;〈x4,x8〉;〈xC,x6〉;〈xB,xA〉;〈xD,x8〉;〈x2,xD〉;〈x2,x9〉;〈xE,x8〉;〈x5,x7〉
-;〈x7,x7〉;〈x7,xA〉;〈xB,x4〉;〈x4,x9〉;〈x6,x5〉;〈x4,x3〉;〈x5,x7〉;〈xF,xE〉;〈xC,x6〉;〈xC,x7〉;〈x6,x2〉;〈x6,x7〉;〈x5,x8〉;〈xD,x6〉;〈x9,xA〉;〈xC,x8〉 ].
-
-ndefinition dTest_random_ex44 ≝
-[〈xE,x8〉;〈x3,x0〉;〈x6,x0〉;〈x7,x3〉;〈x8,x9〉;〈x2,x3〉;〈x0,x8〉;〈x7,xA〉;〈xA,xC〉;〈x5,xD〉;〈x6,xD〉;〈xC,xE〉;〈x0,xC〉;〈x1,xB〉;〈x1,x7〉;〈xC,x1〉
-;〈x4,x2〉;〈x5,x3〉;〈x1,x5〉;〈x7,xC〉;〈x7,x4〉;〈x2,xB〉;〈x2,x5〉;〈x5,x6〉;〈x6,x1〉;〈xE,xC〉;〈x0,xB〉;〈x4,x2〉;〈x0,x4〉;〈xC,xA〉;〈x0,x9〉;〈xA,xB〉 ].
-
-ndefinition dTest_random_ex45 ≝
-[〈x1,xB〉;〈xD,x0〉;〈x9,xF〉;〈x6,xA〉;〈x7,xF〉;〈x4,x1〉;〈xF,x8〉;〈xE,xA〉;〈x8,x2〉;〈x8,x1〉;〈x4,x1〉;〈xC,xE〉;〈xC,xE〉;〈x0,xD〉;〈x2,xB〉;〈x3,x3〉
-;〈xA,x3〉;〈x6,x4〉;〈xF,xA〉;〈xA,x6〉;〈x3,x9〉;〈x7,xF〉;〈xF,x6〉;〈xB,x2〉;〈x5,x5〉;〈x6,xB〉;〈xA,xC〉;〈x3,x3〉;〈x9,x3〉;〈xE,x7〉;〈xB,xE〉;〈x3,x4〉 ].
-
-ndefinition dTest_random_ex46 ≝
-[〈xC,xF〉;〈xE,xF〉;〈xA,x2〉;〈xE,xE〉;〈xE,xD〉;〈xC,xB〉;〈xB,x0〉;〈x8,x9〉;〈xD,xA〉;〈x3,xB〉;〈xB,xE〉;〈x3,xE〉;〈x3,x3〉;〈x5,x1〉;〈xA,x5〉;〈x3,xC〉
-;〈xC,xC〉;〈xA,x0〉;〈xF,xD〉;〈x3,x9〉;〈xC,xB〉;〈xF,xC〉;〈x1,xF〉;〈x8,xD〉;〈x6,x8〉;〈xD,x4〉;〈x8,xC〉;〈xA,xA〉;〈x8,xE〉;〈x3,xA〉;〈x9,x7〉;〈x2,x6〉 ].
-
-ndefinition dTest_random_ex47 ≝
-[〈x6,xB〉;〈xA,xC〉;〈x8,xA〉;〈x4,xB〉;〈x7,x4〉;〈x3,xF〉;〈xB,x7〉;〈xB,xF〉;〈x0,xC〉;〈xE,x6〉;〈xC,xD〉;〈x4,x2〉;〈xF,xA〉;〈xE,xE〉;〈xF,x9〉;〈x0,xC〉
-;〈x2,xC〉;〈x7,x9〉;〈x7,xE〉;〈xD,x8〉;〈x4,x0〉;〈x7,xC〉;〈x3,x8〉;〈x4,x9〉;〈x7,x1〉;〈x7,x5〉;〈xB,x7〉;〈x3,x6〉;〈x0,x7〉;〈x1,xA〉;〈x2,xC〉;〈x1,xE〉 ].
-
-ndefinition dTest_random_ex48 ≝
-[〈x3,xC〉;〈x7,xA〉;〈x3,x8〉;〈x4,xA〉;〈x3,x4〉;〈x2,x0〉;〈x9,x5〉;〈x6,x0〉;〈xF,x7〉;〈xC,x3〉;〈xB,x1〉;〈x6,xE〉;〈xB,x1〉;〈x7,x0〉;〈x7,x4〉;〈x3,xB〉
-;〈x0,xD〉;〈x6,xD〉;〈xF,xB〉;〈xE,x5〉;〈xE,x2〉;〈x6,x6〉;〈x6,x8〉;〈x0,x8〉;〈xF,xB〉;〈x3,xC〉;〈x8,xC〉;〈xD,xD〉;〈x0,x2〉;〈x2,xE〉;〈x6,xE〉;〈xF,x1〉 ].
-
-ndefinition dTest_random_ex49 ≝
-[〈xA,xF〉;〈x7,x9〉;〈x6,x7〉;〈xE,x2〉;〈x4,xC〉;〈xA,x5〉;〈x7,x9〉;〈xC,x6〉;〈xB,x5〉;〈xA,xF〉;〈x1,x5〉;〈xF,xE〉;〈xE,x2〉;〈x2,xB〉;〈xC,xA〉;〈xE,x6〉
-;〈x3,xE〉;〈x2,xC〉;〈x5,x8〉;〈x7,x2〉;〈xC,xE〉;〈x7,x1〉;〈x8,xC〉;〈xB,xE〉;〈x2,x0〉;〈x6,x6〉;〈x0,x7〉;〈x6,xF〉;〈xD,x1〉;〈x8,x2〉;〈x3,x1〉;〈xF,x3〉 ].
-
-ndefinition dTest_random_ex4A ≝
-[〈x9,x5〉;〈x9,x1〉;〈x1,x2〉;〈xF,x3〉;〈x4,xF〉;〈x6,xC〉;〈xA,x6〉;〈x8,xE〉;〈xB,x2〉;〈x7,x8〉;〈xD,xE〉;〈x7,x9〉;〈xC,x5〉;〈x2,x2〉;〈xF,x3〉;〈x0,x7〉
-;〈xE,x7〉;〈x9,xE〉;〈x9,x2〉;〈x7,x3〉;〈x3,xC〉;〈xA,x1〉;〈xD,xA〉;〈x2,x1〉;〈x2,x3〉;〈x4,x5〉;〈xE,x5〉;〈x7,x4〉;〈x8,x4〉;〈xC,x2〉;〈x6,x8〉;〈x3,x5〉 ].
-
-ndefinition dTest_random_ex4B ≝
-[〈x9,xA〉;〈xC,x8〉;〈x2,xE〉;〈x1,xD〉;〈xD,x1〉;〈xA,x6〉;〈xD,xF〉;〈x0,x6〉;〈x7,xF〉;〈x8,xC〉;〈x2,x8〉;〈xF,x6〉;〈xC,x3〉;〈xF,x8〉;〈x6,x2〉;〈xF,x9〉
-;〈x5,x7〉;〈x2,x7〉;〈xD,x1〉;〈xD,x3〉;〈x0,xB〉;〈xA,x3〉;〈x8,x7〉;〈x8,x3〉;〈xC,x9〉;〈x1,x4〉;〈xB,x4〉;〈xC,x5〉;〈xE,xD〉;〈x5,x4〉;〈xE,x1〉;〈xB,x9〉 ].
-
-ndefinition dTest_random_ex4C ≝
-[〈x2,x9〉;〈x6,xF〉;〈xE,x3〉;〈x0,xD〉;〈xC,xC〉;〈xF,x6〉;〈x0,xD〉;〈x2,x4〉;〈x4,x5〉;〈x6,xE〉;〈xE,x4〉;〈xD,xB〉;〈xF,x9〉;〈xC,x1〉;〈xD,x4〉;〈xB,x4〉
-;〈xB,x5〉;〈x6,x6〉;〈x1,xC〉;〈x6,xE〉;〈xA,xF〉;〈x4,x0〉;〈xE,x6〉;〈x4,x9〉;〈x7,xE〉;〈x4,x1〉;〈x1,x8〉;〈x8,x7〉;〈xD,xF〉;〈xB,xB〉;〈x6,x0〉;〈x0,x5〉 ].
-
-ndefinition dTest_random_ex4D ≝
-[〈xF,x4〉;〈x5,xD〉;〈xA,x1〉;〈xD,x6〉;〈x6,x7〉;〈x2,xA〉;〈xC,x8〉;〈x7,x7〉;〈xF,x9〉;〈x8,xA〉;〈xF,x9〉;〈x2,x6〉;〈xE,xF〉;〈x7,x4〉;〈x5,x8〉;〈x6,xA〉
-;〈xC,x8〉;〈x3,x5〉;〈x1,x0〉;〈xC,x5〉;〈x1,xE〉;〈x0,xB〉;〈x8,x3〉;〈x6,xA〉;〈x4,x4〉;〈x8,xD〉;〈x5,xC〉;〈xF,xB〉;〈xF,xE〉;〈x9,x2〉;〈x0,x3〉;〈x4,x3〉 ].
-
-ndefinition dTest_random_ex4E ≝
-[〈x0,x5〉;〈xA,xF〉;〈xC,x0〉;〈xF,x3〉;〈x0,x4〉;〈x2,x8〉;〈x9,xD〉;〈x0,x9〉;〈x3,x5〉;〈xE,x3〉;〈x5,xF〉;〈x4,x5〉;〈xA,xB〉;〈xC,xD〉;〈x8,xC〉;〈xF,xD〉
-;〈x2,xC〉;〈x9,xD〉;〈xA,xF〉;〈x6,x4〉;〈x4,x3〉;〈x8,x0〉;〈x8,x2〉;〈xE,x5〉;〈x8,xE〉;〈x3,xD〉;〈x2,xD〉;〈xD,xB〉;〈xD,xF〉;〈xA,xB〉;〈x0,x8〉;〈x1,x6〉 ].
-
-ndefinition dTest_random_ex4F ≝
-[〈xE,xC〉;〈x7,xE〉;〈xA,x7〉;〈xC,xB〉;〈xD,x8〉;〈x5,xC〉;〈x2,xC〉;〈x8,x8〉;〈x9,x8〉;〈xC,x2〉;〈xA,xD〉;〈x1,xD〉;〈xB,x0〉;〈xB,x1〉;〈xC,xE〉;〈x9,x3〉
-;〈xE,x2〉;〈xF,x4〉;〈xD,xB〉;〈xA,x5〉;〈xB,x6〉;〈x4,x9〉;〈x8,x7〉;〈x1,xD〉;〈xA,x2〉;〈x7,x9〉;〈x3,x5〉;〈xB,xE〉;〈x5,x5〉;〈xC,xD〉;〈x6,x3〉;〈x2,xC〉 ].
-
-ndefinition dTest_random_ex50 ≝
-[〈x1,x0〉;〈x1,xF〉;〈xE,xC〉;〈x3,xB〉;〈x8,xA〉;〈x3,xF〉;〈x3,x8〉;〈x8,x0〉;〈x1,xC〉;〈x2,xD〉;〈x9,x2〉;〈x5,xF〉;〈xE,x1〉;〈xB,x5〉;〈xB,xC〉;〈x8,x3〉
-;〈xB,x6〉;〈x1,xB〉;〈xE,xD〉;〈x4,xF〉;〈x3,xA〉;〈xC,x4〉;〈xF,xE〉;〈xF,xF〉;〈xC,xB〉;〈x8,x1〉;〈x6,x7〉;〈xC,x2〉;〈x5,x9〉;〈xD,xA〉;〈x0,xA〉;〈x9,xC〉 ].
-
-ndefinition dTest_random_ex51 ≝
-[〈x2,x2〉;〈xE,xB〉;〈x9,x3〉;〈xE,x2〉;〈x7,xF〉;〈xA,xC〉;〈x4,xA〉;〈x8,x2〉;〈x8,x1〉;〈x3,xF〉;〈xE,xB〉;〈x8,xB〉;〈x0,xF〉;〈x9,xC〉;〈x4,x1〉;〈x8,x2〉
-;〈x9,xB〉;〈x7,xC〉;〈x5,x1〉;〈xA,x7〉;〈xA,xB〉;〈xA,xD〉;〈x9,x2〉;〈x1,x9〉;〈xF,x0〉;〈xF,xD〉;〈x9,x3〉;〈xF,x6〉;〈xA,xD〉;〈x2,x4〉;〈xC,xB〉;〈xD,xE〉 ].
-
-ndefinition dTest_random_ex52 ≝
-[〈xB,x5〉;〈xA,xB〉;〈x8,x1〉;〈x5,x4〉;〈xA,xE〉;〈x2,x4〉;〈x6,x4〉;〈xD,x2〉;〈xD,x0〉;〈xF,xE〉;〈x3,x3〉;〈x2,xA〉;〈x7,x5〉;〈x0,x7〉;〈x8,xF〉;〈x3,xA〉
-;〈x1,x2〉;〈x9,xF〉;〈xB,xE〉;〈x1,xB〉;〈x1,xB〉;〈x1,xF〉;〈xC,x7〉;〈xF,x1〉;〈x7,xC〉;〈x9,x1〉;〈x5,xD〉;〈x3,x2〉;〈xD,x9〉;〈xD,x6〉;〈xE,xA〉;〈x0,x6〉 ].
-
-ndefinition dTest_random_ex53 ≝
-[〈x5,xB〉;〈x6,x9〉;〈x6,xB〉;〈xA,xC〉;〈x0,x9〉;〈x1,x6〉;〈xA,x3〉;〈xC,xA〉;〈x8,xE〉;〈x8,x3〉;〈x3,x4〉;〈xB,x7〉;〈x4,x1〉;〈x2,x7〉;〈xB,x3〉;〈x0,x1〉
-;〈xE,x6〉;〈x0,x6〉;〈x8,xC〉;〈x0,x4〉;〈x3,xD〉;〈xB,xE〉;〈x2,xC〉;〈x6,x6〉;〈xB,x5〉;〈x8,x6〉;〈x1,x1〉;〈x1,x3〉;〈x6,xD〉;〈xD,x0〉;〈xB,xE〉;〈x8,xD〉 ].
-
-ndefinition dTest_random_ex54 ≝
-[〈xC,x7〉;〈x5,x5〉;〈x0,x2〉;〈xC,x1〉;〈x7,x6〉;〈x5,xF〉;〈x2,x0〉;〈x5,xE〉;〈xE,x4〉;〈x3,xE〉;〈x7,x7〉;〈xE,x1〉;〈x3,xF〉;〈xE,x8〉;〈x6,xC〉;〈x4,xA〉
-;〈xA,x0〉;〈xF,xE〉;〈xC,xE〉;〈x3,xF〉;〈x6,x7〉;〈x9,x4〉;〈x3,xF〉;〈xE,xF〉;〈xE,xF〉;〈x8,x6〉;〈xD,x9〉;〈x4,xA〉;〈x0,x8〉;〈x8,xB〉;〈xC,x8〉;〈x1,xC〉 ].
-
-ndefinition dTest_random_ex55 ≝
-[〈xA,xD〉;〈x2,x0〉;〈xA,x7〉;〈x8,xC〉;〈x0,x6〉;〈x6,x7〉;〈xA,xF〉;〈x7,x3〉;〈xC,xD〉;〈x1,x6〉;〈x8,x4〉;〈x3,x2〉;〈xD,x0〉;〈xF,x3〉;〈xD,xC〉;〈xD,xB〉
-;〈xB,x7〉;〈x2,x4〉;〈x6,xA〉;〈x6,x3〉;〈x1,xC〉;〈xA,x1〉;〈xD,xE〉;〈xB,xC〉;〈x9,x2〉;〈xF,x1〉;〈x5,xC〉;〈xE,x7〉;〈xE,x0〉;〈xD,x5〉;〈xA,x4〉;〈x4,xA〉 ].
-
-ndefinition dTest_random_ex56 ≝
-[〈x0,x0〉;〈xD,x6〉;〈x2,x2〉;〈x9,xC〉;〈x5,x2〉;〈x8,xF〉;〈xE,x8〉;〈x2,x2〉;〈xA,x2〉;〈xF,x0〉;〈x9,x8〉;〈x3,x8〉;〈x0,xD〉;〈xF,x6〉;〈x4,x3〉;〈x7,x9〉
-;〈x8,x2〉;〈xA,xF〉;〈xD,x5〉;〈xC,x1〉;〈x8,x2〉;〈x5,x2〉;〈xD,xB〉;〈x8,xF〉;〈x7,xE〉;〈xD,x1〉;〈x9,xD〉;〈xA,x6〉;〈x8,xE〉;〈x9,xE〉;〈xA,x9〉;〈x8,xE〉 ].
-
-ndefinition dTest_random_ex57 ≝
-[〈xD,x1〉;〈xF,x6〉;〈xB,x0〉;〈xE,xA〉;〈x8,x3〉;〈xE,x9〉;〈xF,x7〉;〈x3,xB〉;〈x4,xA〉;〈x0,x9〉;〈x1,xE〉;〈x3,x2〉;〈xD,x2〉;〈x5,xD〉;〈xD,x7〉;〈xA,xB〉
-;〈x4,xD〉;〈x6,xF〉;〈x5,x9〉;〈xF,xC〉;〈x4,x3〉;〈x4,x1〉;〈x0,x0〉;〈x3,xC〉;〈x9,x4〉;〈x5,x2〉;〈x5,x9〉;〈x6,xC〉;〈x6,xE〉;〈xE,x8〉;〈x6,x6〉;〈xF,x5〉 ].
-
-ndefinition dTest_random_ex58 ≝
-[〈x9,xC〉;〈x5,x7〉;〈x6,xC〉;〈xE,x2〉;〈x3,xB〉;〈xA,x2〉;〈x2,x1〉;〈xE,xE〉;〈xF,x6〉;〈x4,xF〉;〈xF,x3〉;〈x6,x2〉;〈xD,xB〉;〈x8,xF〉;〈x6,x4〉;〈xD,x3〉
-;〈x8,x0〉;〈x6,x9〉;〈x9,x7〉;〈x4,x7〉;〈x8,xB〉;〈xB,x6〉;〈x3,x8〉;〈x4,x5〉;〈xB,xE〉;〈x0,xD〉;〈x6,x1〉;〈xC,xF〉;〈x7,x8〉;〈xC,xF〉;〈x4,x1〉;〈x7,xF〉 ].
-
-ndefinition dTest_random_ex59 ≝
-[〈xF,x4〉;〈x5,xA〉;〈x8,xB〉;〈x7,x2〉;〈xE,x6〉;〈x7,xD〉;〈x4,xC〉;〈x1,x8〉;〈xE,xE〉;〈x3,xA〉;〈x1,x2〉;〈x9,x4〉;〈x3,x4〉;〈x3,x0〉;〈x3,x9〉;〈x0,x0〉
-;〈x9,x5〉;〈x6,x0〉;〈xF,xA〉;〈x7,xF〉;〈xA,x6〉;〈xC,x7〉;〈xB,x1〉;〈x7,xE〉;〈x0,xD〉;〈x2,x4〉;〈xF,xF〉;〈x4,x3〉;〈x7,x8〉;〈x8,x8〉;〈x6,xC〉;〈x0,x7〉 ].
-
-ndefinition dTest_random_ex5A ≝
-[〈x7,x3〉;〈x9,x2〉;〈xC,x8〉;〈x0,xB〉;〈x5,x0〉;〈x9,x7〉;〈xF,x4〉;〈x1,xB〉;〈xD,xB〉;〈x4,x5〉;〈x6,x2〉;〈x9,x1〉;〈x8,x7〉;〈x5,xD〉;〈xF,x5〉;〈x6,x1〉
-;〈x3,x8〉;〈xF,x3〉;〈x8,xA〉;〈x4,xF〉;〈xD,xB〉;〈x3,xD〉;〈x4,x3〉;〈x2,xF〉;〈xB,xA〉;〈xA,x9〉;〈xB,x4〉;〈xA,x9〉;〈x2,x6〉;〈x7,xE〉;〈x8,xC〉;〈x1,x6〉 ].
-
-ndefinition dTest_random_ex5B ≝
-[〈xF,xC〉;〈x1,xC〉;〈xA,x7〉;〈x9,xD〉;〈x7,xC〉;〈x8,x5〉;〈xA,x7〉;〈x3,x5〉;〈x8,x6〉;〈x4,xF〉;〈xC,x8〉;〈x9,xA〉;〈x0,xD〉;〈x2,x4〉;〈x0,x4〉;〈x5,x8〉
-;〈x4,x2〉;〈x3,x0〉;〈x7,x5〉;〈x8,xD〉;〈xB,xC〉;〈x7,x2〉;〈x3,x4〉;〈xF,x9〉;〈x4,x6〉;〈x5,xE〉;〈xF,x4〉;〈x5,xC〉;〈x6,x7〉;〈x0,x4〉;〈x8,x8〉;〈x2,x8〉 ].
-
-ndefinition dTest_random_ex5C ≝
-[〈xA,x9〉;〈xE,xC〉;〈xE,xC〉;〈x7,xC〉;〈x4,x6〉;〈x6,xE〉;〈x1,xC〉;〈xD,x9〉;〈xC,x0〉;〈x6,x1〉;〈x5,x8〉;〈x5,xE〉;〈x3,x7〉;〈xB,x0〉;〈x9,x9〉;〈x9,x7〉
-;〈xA,x0〉;〈x9,xB〉;〈x7,x7〉;〈x4,xA〉;〈xD,x0〉;〈xB,x5〉;〈x1,xD〉;〈xA,x6〉;〈x4,xA〉;〈xC,x5〉;〈x3,xA〉;〈x9,x4〉;〈xB,x4〉;〈x5,x0〉;〈x0,x6〉;〈xC,x0〉 ].
-
-ndefinition dTest_random_ex5D ≝
-[〈xA,x8〉;〈x0,x2〉;〈x5,xF〉;〈x0,xE〉;〈x2,x1〉;〈x0,x3〉;〈xB,x1〉;〈x9,x6〉;〈x0,x2〉;〈x9,x7〉;〈x8,x0〉;〈x1,xA〉;〈x0,xB〉;〈x3,xD〉;〈x2,x1〉;〈x7,xF〉
-;〈x0,x3〉;〈x2,x9〉;〈x3,x2〉;〈x6,x6〉;〈xB,xF〉;〈x3,xB〉;〈x5,x7〉;〈x5,x3〉;〈xE,x7〉;〈xD,x5〉;〈xE,x5〉;〈x4,x5〉;〈xA,x3〉;〈x1,xA〉;〈x1,xB〉;〈xF,x8〉 ].
-
-ndefinition dTest_random_ex5E ≝
-[〈xC,xF〉;〈xB,x3〉;〈x9,x5〉;〈x5,x9〉;〈x4,xE〉;〈x6,x4〉;〈x4,x3〉;〈xF,x4〉;〈x2,x5〉;〈xC,xC〉;〈x6,x1〉;〈x3,x5〉;〈xD,xF〉;〈x3,x6〉;〈x5,x5〉;〈xC,xF〉
-;〈x9,xA〉;〈x1,x1〉;〈xF,x6〉;〈xD,x4〉;〈x4,xF〉;〈x9,xB〉;〈xA,xF〉;〈xF,x2〉;〈x0,x3〉;〈x1,x9〉;〈x9,xB〉;〈xA,xB〉;〈xC,x4〉;〈x1,x9〉;〈xA,x1〉;〈xE,xA〉 ].
-
-ndefinition dTest_random_ex5F ≝
-[〈x1,xB〉;〈x2,x5〉;〈xA,xD〉;〈xA,xA〉;〈x0,x0〉;〈x5,xB〉;〈x9,xD〉;〈x6,xF〉;〈x8,x8〉;〈x6,xF〉;〈x3,x0〉;〈x8,x5〉;〈xC,x6〉;〈x1,x7〉;〈x5,x7〉;〈x1,x1〉
-;〈xA,xB〉;〈x0,x2〉;〈xD,xD〉;〈x9,x2〉;〈x4,xD〉;〈x8,x2〉;〈x0,x2〉;〈x3,x5〉;〈xC,xB〉;〈x4,x4〉;〈xA,x4〉;〈x4,x1〉;〈xD,x5〉;〈x1,x2〉;〈xE,x7〉;〈x4,xD〉 ].
-
-ndefinition dTest_random_32 ≝
- dTest_random_ex00.
-
-ndefinition dTest_random_64 ≝
- dTest_random_32@dTest_random_ex01.
-
-ndefinition dTest_random_128 ≝
- dTest_random_64@dTest_random_ex02@dTest_random_ex03.
-
-ndefinition dTest_random_256 ≝
- dTest_random_128@
- dTest_random_ex04@dTest_random_ex05@dTest_random_ex06@dTest_random_ex07.
-
-ndefinition dTest_random_512 ≝
- dTest_random_256@
- dTest_random_ex08@dTest_random_ex09@dTest_random_ex0A@dTest_random_ex0B@
- dTest_random_ex0C@dTest_random_ex0D@dTest_random_ex0E@dTest_random_ex0F.
-
-ndefinition dTest_random_1024 ≝
- dTest_random_512@
- dTest_random_ex10@dTest_random_ex11@dTest_random_ex12@dTest_random_ex13@
- dTest_random_ex14@dTest_random_ex15@dTest_random_ex16@dTest_random_ex17@
- dTest_random_ex18@dTest_random_ex19@dTest_random_ex1A@dTest_random_ex1B@
- dTest_random_ex1C@dTest_random_ex1D@dTest_random_ex1E@dTest_random_ex1F.
-
-ndefinition dTest_random_2048 ≝
- dTest_random_1024@
- dTest_random_ex20@dTest_random_ex21@dTest_random_ex22@dTest_random_ex23@
- dTest_random_ex24@dTest_random_ex25@dTest_random_ex26@dTest_random_ex27@
- dTest_random_ex28@dTest_random_ex29@dTest_random_ex2A@dTest_random_ex2B@
- dTest_random_ex2C@dTest_random_ex2D@dTest_random_ex2E@dTest_random_ex2F@
- dTest_random_ex30@dTest_random_ex31@dTest_random_ex32@dTest_random_ex33@
- dTest_random_ex34@dTest_random_ex35@dTest_random_ex36@dTest_random_ex37@
- dTest_random_ex38@dTest_random_ex39@dTest_random_ex3A@dTest_random_ex3B@
- dTest_random_ex3C@dTest_random_ex3D@dTest_random_ex3E@dTest_random_ex3F.
-
-ndefinition dTest_random_3072 ≝
- dTest_random_2048@
- dTest_random_ex40@dTest_random_ex41@dTest_random_ex42@dTest_random_ex43@
- dTest_random_ex44@dTest_random_ex45@dTest_random_ex46@dTest_random_ex47@
- dTest_random_ex48@dTest_random_ex49@dTest_random_ex4A@dTest_random_ex4B@
- dTest_random_ex4C@dTest_random_ex4D@dTest_random_ex4E@dTest_random_ex4F@
- dTest_random_ex50@dTest_random_ex51@dTest_random_ex52@dTest_random_ex53@
- dTest_random_ex54@dTest_random_ex55@dTest_random_ex56@dTest_random_ex57@
- dTest_random_ex58@dTest_random_ex59@dTest_random_ex5A@dTest_random_ex5B@
- dTest_random_ex5C@dTest_random_ex5D@dTest_random_ex5E@dTest_random_ex5F.
-
-(* campitura di 128 0x00 *)
-ndefinition dTest_bytes_aux : list byte8 ≝
-[
-〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;
-〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;
-〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;
-〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;
-〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;
-〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;
-〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;
-〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉;〈x0,x0〉
-].
-
-(* blocco di 0x00 lungo 0x0380 da caricare dopo dati per azzerare
- counters, index, position, e stack di esecuzione *)
-ndefinition dTest_zeros : list byte8 ≝
- dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux.
-
-ndefinition dTest_zeros3K : list byte8 ≝
- dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@
- dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@
- dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@
- dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux@dTest_bytes_aux.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/tests/micro_tests_tools.ma".
-include "emulator/multivm/multivm.ma".
-include "emulator/status/status_lemmas.ma".
-include "emulator/model/model.ma".
-
-(* ****************************************** *)
-(* MICRO TEST DI CORRETTEZZA DELLE ISTRUZIONI *)
-(* ****************************************** *)
-
-(* ********* *)
-(* HCS08 ADC *)
-(* ********* *)
-
-ndefinition mTest_HCS08_ADC_source ≝ source_to_byte8 HCS08 (
-(* testa la logica di ADC e le modalita' IMM1,DIR1/2,IX0/1/2,SP1/2 *)
-(* BEFORE: A=0x00 H:X=0xFF50 PC=0x1860 SP=0x0110 C=true *)
-(* [0x1860] 2clk *) (compile HCS08 ? ADC (maIMM1 〈xA,xA〉) ?) @ (* AFTER1: imm1=0xAA quindi 0x00+imm1+true=A:0xAB C:false *)
-(* [0x1862] 3clk *) (compile HCS08 ? ADC (maDIR1 〈xF,xF〉) ?) @ (* AFTER2: dir1=[0x00FF]=0x8F quindi 0xAB+dir1+false=A:0x3A C:true *)
-(* [0x1864] 4clk *) (compile HCS08 ? ADC (maDIR2 〈〈xF,xF〉:〈x1,x1〉〉) ?) @ (* AFTER3: dir2=[0xFF11]=0x11 quindi 0x3A+dir2+true=A:0x4C C:false *)
-(* [0x1867] 4clk *) (compile HCS08 ? ADC (maIX2 〈〈xF,xF〉:〈xF,x0〉〉) ?) @ (* AFTER4: ix2=[X+0xFFF0]=[0xFF40]=0x40 quindi 0x4C+ix2+false=A:0x8C C:false *)
-(* [0x186A] 3clk *) (compile HCS08 ? ADC (maIX1 〈x2,x4〉) ?) @ (* AFTER5: ix1=[X+0x0024]=[0xFF74]=0x74 quindi 0x8C+ix1+false=A:0x00 C:true *)
-(* [0x186C] 3clk *) (compile HCS08 ? ADC maIX0 ?) @ (* AFTER6: ix0=[X]=[0xFF50]=0x50 quindi 0x00+ix0+true=A:0x51 C:false *)
-(* [0x186D] 5clk *) (compile HCS08 ? ADC (maSP2 〈〈xF,xF〉:〈x6,x1〉〉) ?) @ (* AFTER7: sp2=[SP+0xFF61]=[0x0071]=0x01 quindi 0x51+sp2+false=A:0x52 C:false *)
-(* [0x1871] 4clk *) (compile HCS08 ? ADC (maSP1 〈x2,x4〉) ?) (* AFTER8: sp1=[SP+0x0024]=[0x0134]=0xC4 quindi 0x52+sp1+false=A:0x16 C:true *)
-(* [0x1874] si puo' quindi enunciare che dopo 2+3+4+4+3+3+5+4=28 clk *)
-(* A<-0x16 PC<-0x1874 *)
-). napply I. nqed.
-
-(* creazione del processore+caricamento+impostazione registri *)
-ndefinition mTest_HCS08_ADC_status ≝
-λt:memory_impl.
- set_c_flag HCS08 t (* C<-true *)
- (setweak_sp_reg HCS08 t (* SP<-0x0110 *)
- (setweak_indX_16_reg HCS08 t (* H:X<-0xFF50 *)
- (set_pc_reg HCS08 t (* PC<-mTest_HCS08_prog *)
- (start_of_model HCS08 MC9S08AW60 t
- (load_from_source_at t (* carica mTest_bytes in ROM:mTest_HCS08_data *)
- (load_from_source_at t (* carica mTest_bytes in RAM:mTest_HCS08_RAM *)
- (load_from_source_at t (zero_memory t) (* carica source in ROM:mTest_HCS08_prog *)
- mTest_HCS08_ADC_source (extu_w32 mTest_HCS08_prog))
- mTest_bytes (extu_w32 mTest_HCS08_RAM))
- mTest_bytes (extu_w32 mTest_HCS08_data))
- (build_memory_type_of_model HCS08 MC9S08AW60 t)
- (mk_byte8 x0 x0) (mk_byte8 x0 x0) (* non deterministici tutti a 0 *)
- false false false false false false) (* non deterministici tutti a 0 *)
- mTest_HCS08_prog)
- (mk_word16 〈xF,xF〉 〈x5,x0〉))
- (mk_word16 〈x0,x1〉 〈x1,x0〉))
- true.
-
-(* dimostrazione senza svolgimento degli stati, immediata *)
-nlemma ok_mTest_HCS08_ADC_full :
- let t ≝ MEM_TREE in
- execute HCS08 t (TickOK ? (mTest_HCS08_ADC_status t)) nat28 =
- (* NB: V,N,Z sono tornati false C e' tornato true *)
- TickOK ? (set_pc_reg HCS08 t (* nuovo PC *)
- (set_acc_8_low_reg HCS08 t (mTest_HCS08_ADC_status t) 〈x1,x6〉) (* nuovo A *)
- (mk_word16 〈x1,x8〉 〈x7,x4〉)).
- (* esempio per svoglimento degli stati manualmente*)
- nletin BEFORE ≝ (alu HCS08 t (mTest_HCS08_ADC_status t));
- nnormalize in BEFORE:(%);
-
- nletin AFTER_ALU1 ≝ (match execute HCS08 t (TickOK ? (mTest_HCS08_ADC_status t)) nat2 with
- [ TickERR _ _ ⇒ BEFORE
- | TickSUSP _ _ ⇒ BEFORE
- | TickOK s ⇒ alu HCS08 t s ]);
- nnormalize in AFTER_ALU1:(%);
-
- nletin AFTER_ALU2 ≝ (match execute HCS08 t (TickOK ?
- (set_alu HCS08 t (mTest_HCS08_ADC_status t) AFTER_ALU1)) nat3 with
- [ TickERR _ _ ⇒ BEFORE
- | TickSUSP _ _ ⇒ BEFORE
- | TickOK s ⇒ alu HCS08 t s ]);
- nnormalize in AFTER_ALU2:(%);
-
- nletin AFTER_ALU3 ≝ (match execute HCS08 t (TickOK ?
- (set_alu HCS08 t (mTest_HCS08_ADC_status t) AFTER_ALU2)) nat4 with
- [ TickERR _ _ ⇒ BEFORE
- | TickSUSP _ _ ⇒ BEFORE
- | TickOK s ⇒ alu HCS08 t s ]);
- nnormalize in AFTER_ALU3:(%);
-
- nletin AFTER_ALU4 ≝ (match execute HCS08 t (TickOK ?
- (set_alu HCS08 t (mTest_HCS08_ADC_status t) AFTER_ALU3)) nat4 with
- [ TickERR _ _ ⇒ BEFORE
- | TickSUSP _ _ ⇒ BEFORE
- | TickOK s ⇒ alu HCS08 t s ]);
- nnormalize in AFTER_ALU4:(%);
-
- nletin AFTER_ALU5 ≝ (match execute HCS08 t (TickOK ?
- (set_alu HCS08 t (mTest_HCS08_ADC_status t) AFTER_ALU4)) nat3 with
- [ TickERR _ _ ⇒ BEFORE
- | TickSUSP _ _ ⇒ BEFORE
- | TickOK s ⇒ alu HCS08 t s ]);
- nnormalize in AFTER_ALU5:(%);
-
- nletin AFTER_ALU6 ≝ (match execute HCS08 t (TickOK ?
- (set_alu HCS08 t (mTest_HCS08_ADC_status t) AFTER_ALU5)) nat3 with
- [ TickERR _ _ ⇒ BEFORE
- | TickSUSP _ _ ⇒ BEFORE
- | TickOK s ⇒ alu HCS08 t s ]);
- nnormalize in AFTER_ALU6:(%);
-
- nletin AFTER_ALU7 ≝ (match execute HCS08 t (TickOK ?
- (set_alu HCS08 t (mTest_HCS08_ADC_status t) AFTER_ALU6)) nat5 with
- [ TickERR _ _ ⇒ BEFORE
- | TickSUSP _ _ ⇒ BEFORE
- | TickOK s ⇒ alu HCS08 t s ]);
- nnormalize in AFTER_ALU7:(%);
-
- nletin AFTER_ALU8 ≝ (match execute HCS08 t (TickOK ?
- (set_alu HCS08 t (mTest_HCS08_ADC_status t) AFTER_ALU7)) nat4 with
- [ TickERR _ _ ⇒ BEFORE
- | TickSUSP _ _ ⇒ BEFORE
- | TickOK s ⇒ alu HCS08 t s ]);
- nnormalize in AFTER_ALU8:(%); *)
-
- napply refl_eq.
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/word16.ma".
-include "common/list.ma".
-
-(* ****************************************** *)
-(* MICRO TEST DI CORRETTEZZA DELLE ISTRUZIONI *)
-(* ****************************************** *)
-
-(* tabella 0x00 - 0xFF utile da caricare in RAM/ROM *)
-ndefinition mTest_bytes : list byte8 ≝
- [ 〈x0,x0〉 ; 〈x0,x1〉 ; 〈x0,x2〉 ; 〈x0,x3〉 ; 〈x0,x4〉 ; 〈x0,x5〉 ; 〈x0,x6〉 ; 〈x0,x7〉
- ; 〈x0,x8〉 ; 〈x0,x9〉 ; 〈x0,xA〉 ; 〈x0,xB〉 ; 〈x0,xC〉 ; 〈x0,xD〉 ; 〈x0,xE〉 ; 〈x0,xF〉 ]
-@[ 〈x1,x0〉 ; 〈x1,x1〉 ; 〈x1,x2〉 ; 〈x1,x3〉 ; 〈x1,x4〉 ; 〈x1,x5〉 ; 〈x1,x6〉 ; 〈x1,x7〉
- ; 〈x1,x8〉 ; 〈x1,x9〉 ; 〈x1,xA〉 ; 〈x1,xB〉 ; 〈x1,xC〉 ; 〈x1,xD〉 ; 〈x1,xE〉 ; 〈x1,xF〉 ]
-@[ 〈x2,x0〉 ; 〈x2,x1〉 ; 〈x2,x2〉 ; 〈x2,x3〉 ; 〈x2,x4〉 ; 〈x2,x5〉 ; 〈x2,x6〉 ; 〈x2,x7〉
- ; 〈x2,x8〉 ; 〈x2,x9〉 ; 〈x2,xA〉 ; 〈x2,xB〉 ; 〈x2,xC〉 ; 〈x2,xD〉 ; 〈x2,xE〉 ; 〈x2,xF〉 ]
-@[ 〈x3,x0〉 ; 〈x3,x1〉 ; 〈x3,x2〉 ; 〈x3,x3〉 ; 〈x3,x4〉 ; 〈x3,x5〉 ; 〈x3,x6〉 ; 〈x3,x7〉
- ; 〈x3,x8〉 ; 〈x3,x9〉 ; 〈x3,xA〉 ; 〈x3,xB〉 ; 〈x3,xC〉 ; 〈x3,xD〉 ; 〈x3,xE〉 ; 〈x3,xF〉 ]
-@[ 〈x4,x0〉 ; 〈x4,x1〉 ; 〈x4,x2〉 ; 〈x4,x3〉 ; 〈x4,x4〉 ; 〈x4,x5〉 ; 〈x4,x6〉 ; 〈x4,x7〉
- ; 〈x4,x8〉 ; 〈x4,x9〉 ; 〈x4,xA〉 ; 〈x4,xB〉 ; 〈x4,xC〉 ; 〈x4,xD〉 ; 〈x4,xE〉 ; 〈x4,xF〉 ]
-@[ 〈x5,x0〉 ; 〈x5,x1〉 ; 〈x5,x2〉 ; 〈x5,x3〉 ; 〈x5,x4〉 ; 〈x5,x5〉 ; 〈x5,x6〉 ; 〈x5,x7〉
- ; 〈x5,x8〉 ; 〈x5,x9〉 ; 〈x5,xA〉 ; 〈x5,xB〉 ; 〈x5,xC〉 ; 〈x5,xD〉 ; 〈x5,xE〉 ; 〈x5,xF〉 ]
-@[ 〈x6,x0〉 ; 〈x6,x1〉 ; 〈x6,x2〉 ; 〈x6,x3〉 ; 〈x6,x4〉 ; 〈x6,x5〉 ; 〈x6,x6〉 ; 〈x6,x7〉
- ; 〈x6,x8〉 ; 〈x6,x9〉 ; 〈x6,xA〉 ; 〈x6,xB〉 ; 〈x6,xC〉 ; 〈x6,xD〉 ; 〈x6,xE〉 ; 〈x6,xF〉 ]
-@[ 〈x7,x0〉 ; 〈x7,x1〉 ; 〈x7,x2〉 ; 〈x7,x3〉 ; 〈x7,x4〉 ; 〈x7,x5〉 ; 〈x7,x6〉 ; 〈x7,x7〉
- ; 〈x7,x8〉 ; 〈x7,x9〉 ; 〈x7,xA〉 ; 〈x7,xB〉 ; 〈x7,xC〉 ; 〈x7,xD〉 ; 〈x7,xE〉 ; 〈x7,xF〉 ]
-@[ 〈x8,x0〉 ; 〈x8,x1〉 ; 〈x8,x2〉 ; 〈x8,x3〉 ; 〈x8,x4〉 ; 〈x8,x5〉 ; 〈x8,x6〉 ; 〈x8,x7〉
- ; 〈x8,x8〉 ; 〈x8,x9〉 ; 〈x8,xA〉 ; 〈x8,xB〉 ; 〈x8,xC〉 ; 〈x8,xD〉 ; 〈x8,xE〉 ; 〈x8,xF〉 ]
-@[ 〈x9,x0〉 ; 〈x9,x1〉 ; 〈x9,x2〉 ; 〈x9,x3〉 ; 〈x9,x4〉 ; 〈x9,x5〉 ; 〈x9,x6〉 ; 〈x9,x7〉
- ; 〈x9,x8〉 ; 〈x9,x9〉 ; 〈x9,xA〉 ; 〈x9,xB〉 ; 〈x9,xC〉 ; 〈x9,xD〉 ; 〈x9,xE〉 ; 〈x9,xF〉 ]
-@[ 〈xA,x0〉 ; 〈xA,x1〉 ; 〈xA,x2〉 ; 〈xA,x3〉 ; 〈xA,x4〉 ; 〈xA,x5〉 ; 〈xA,x6〉 ; 〈xA,x7〉
- ; 〈xA,x8〉 ; 〈xA,x9〉 ; 〈xA,xA〉 ; 〈xA,xB〉 ; 〈xA,xC〉 ; 〈xA,xD〉 ; 〈xA,xE〉 ; 〈xA,xF〉 ]
-@[ 〈xB,x0〉 ; 〈xB,x1〉 ; 〈xB,x2〉 ; 〈xB,x3〉 ; 〈xB,x4〉 ; 〈xB,x5〉 ; 〈xB,x6〉 ; 〈xB,x7〉
- ; 〈xB,x8〉 ; 〈xB,x9〉 ; 〈xB,xA〉 ; 〈xB,xB〉 ; 〈xB,xC〉 ; 〈xB,xD〉 ; 〈xB,xE〉 ; 〈xB,xF〉 ]
-@[ 〈xC,x0〉 ; 〈xC,x1〉 ; 〈xC,x2〉 ; 〈xC,x3〉 ; 〈xC,x4〉 ; 〈xC,x5〉 ; 〈xC,x6〉 ; 〈xC,x7〉
- ; 〈xC,x8〉 ; 〈xC,x9〉 ; 〈xC,xA〉 ; 〈xC,xB〉 ; 〈xC,xC〉 ; 〈xC,xD〉 ; 〈xC,xE〉 ; 〈xC,xF〉 ]
-@[ 〈xD,x0〉 ; 〈xD,x1〉 ; 〈xD,x2〉 ; 〈xD,x3〉 ; 〈xD,x4〉 ; 〈xD,x5〉 ; 〈xD,x6〉 ; 〈xD,x7〉
- ; 〈xD,x8〉 ; 〈xD,x9〉 ; 〈xD,xA〉 ; 〈xD,xB〉 ; 〈xD,xC〉 ; 〈xD,xD〉 ; 〈xD,xE〉 ; 〈xD,xF〉 ]
-@[ 〈xE,x0〉 ; 〈xE,x1〉 ; 〈xE,x2〉 ; 〈xE,x3〉 ; 〈xE,x4〉 ; 〈xE,x5〉 ; 〈xE,x6〉 ; 〈xE,x7〉
- ; 〈xE,x8〉 ; 〈xE,x9〉 ; 〈xE,xA〉 ; 〈xE,xB〉 ; 〈xE,xC〉 ; 〈xE,xD〉 ; 〈xE,xE〉 ; 〈xE,xF〉 ]
-@[ 〈xF,x0〉 ; 〈xF,x1〉 ; 〈xF,x2〉 ; 〈xF,x3〉 ; 〈xF,x4〉 ; 〈xF,x5〉 ; 〈xF,x6〉 ; 〈xF,x7〉
- ; 〈xF,x8〉 ; 〈xF,x9〉 ; 〈xF,xA〉 ; 〈xF,xB〉 ; 〈xF,xC〉 ; 〈xF,xD〉 ; 〈xF,xE〉 ; 〈xF,xF〉
- ].
-
-(*
- 1) mTest_x_RAM : inizio della RAM
- (start point per caricamento mTest_bytes in RAM)
- 2) mTest_x_prog: inizio della ROM
- (start point per caricamento programma in ROM)
- 3) mTest_x_data: ultimi 256b della ROM
- (start point per caricamento mTest_bytes in ROM)
-*)
-ndefinition mTest_HCS08_RAM ≝ 〈〈x0,x0〉:〈x7,x0〉〉.
-ndefinition mTest_HCS08_prog ≝ 〈〈x1,x8〉:〈x6,x0〉〉.
-ndefinition mTest_HCS08_data ≝ 〈〈xF,xF〉:〈x0,x0〉〉.
-
-ndefinition mTest_RS08_RAM ≝ 〈〈x0,x0〉:〈x2,x0〉〉.
-ndefinition mTest_RS08_prog ≝ 〈〈x3,x8〉:〈x0,x0〉〉.
-ndefinition mTest_RS08_data ≝ 〈〈x3,xF〉:〈x0,x0〉〉.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/translation/translation_base.ma".
-
-(* ******************************************************* *)
-(* TRADUZIONE MCU+PSEUDO+MODALITA'+ARGOMENTI → ESADECIMALE *)
-(* ******************************************************* *)
-
-(* introduzione di un tipo dipendente (dalla modalita') per gli argomenti *)
-ninductive Freescale_MA_check : Freescale_instr_mode → Type ≝
- maINH : Freescale_MA_check MODE_INH
-| maINHA : Freescale_MA_check MODE_INHA
-| maINHX : Freescale_MA_check MODE_INHX
-| maINHH : Freescale_MA_check MODE_INHH
-| maINHX0ADD : Freescale_MA_check MODE_INHX0ADD
-| maINHX1ADD : byte8 → Freescale_MA_check MODE_INHX1ADD
-| maINHX2ADD : word16 → Freescale_MA_check MODE_INHX2ADD
-| maIMM1 : byte8 → Freescale_MA_check MODE_IMM1
-| maIMM1EXT : byte8 → Freescale_MA_check MODE_IMM1EXT
-| maIMM2 : word16 → Freescale_MA_check MODE_IMM2
-| maDIR1 : byte8 → Freescale_MA_check MODE_DIR1
-| maDIR2 : word16 → Freescale_MA_check MODE_DIR2
-| maIX0 : Freescale_MA_check MODE_IX0
-| maIX1 : byte8 → Freescale_MA_check MODE_IX1
-| maIX2 : word16 → Freescale_MA_check MODE_IX2
-| maSP1 : byte8 → Freescale_MA_check MODE_SP1
-| maSP2 : word16 → Freescale_MA_check MODE_SP2
-| maDIR1_to_DIR1 : byte8 → byte8 → Freescale_MA_check MODE_DIR1_to_DIR1
-| maIMM1_to_DIR1 : byte8 → byte8 → Freescale_MA_check MODE_IMM1_to_DIR1
-| maIX0p_to_DIR1 : byte8 → Freescale_MA_check MODE_IX0p_to_DIR1
-| maDIR1_to_IX0p : byte8 → Freescale_MA_check MODE_DIR1_to_IX0p
-| maINHA_and_IMM1 : byte8 → Freescale_MA_check MODE_INHA_and_IMM1
-| maINHX_and_IMM1 : byte8 → Freescale_MA_check MODE_INHX_and_IMM1
-| maIMM1_and_IMM1 : byte8 → byte8 → Freescale_MA_check MODE_IMM1_and_IMM1
-| maDIR1_and_IMM1 : byte8 → byte8 → Freescale_MA_check MODE_DIR1_and_IMM1
-| maIX0_and_IMM1 : byte8 → Freescale_MA_check MODE_IX0_and_IMM1
-| maIX0p_and_IMM1 : byte8 → Freescale_MA_check MODE_IX0p_and_IMM1
-| maIX1_and_IMM1 : byte8 → byte8 → Freescale_MA_check MODE_IX1_and_IMM1
-| maIX1p_and_IMM1 : byte8 → byte8 → Freescale_MA_check MODE_IX1p_and_IMM1
-| maSP1_and_IMM1 : byte8 → byte8 → Freescale_MA_check MODE_SP1_and_IMM1
-| maDIRn : ∀n.byte8 → Freescale_MA_check (MODE_DIRn n)
-| maDIRn_and_IMM1 : ∀n.byte8 → byte8 → Freescale_MA_check (MODE_DIRn_and_IMM1 n)
-| maTNY : ∀e.Freescale_MA_check (MODE_TNY e)
-| maSRT : ∀t.Freescale_MA_check (MODE_SRT t)
-.
-
-(* picker: trasforma l'argomento necessario in input a bytes_of_pseudo_instr_mode_param:
- MA_check i → list (t_byte8 m) *)
-ndefinition Freescale_args_picker ≝
-λm.λi:Freescale_instr_mode.λargs:Freescale_MA_check i.
- match args with
- (* inherent: legale se nessun operando *)
- [ maINH ⇒ nil ?
- | maINHA ⇒ nil ?
- | maINHX ⇒ nil ?
- | maINHH ⇒ nil ?
- (* inherent address: legale se nessun operando/1 byte/1 word *)
- | maINHX0ADD ⇒ nil ?
- | maINHX1ADD b ⇒ [ TByte m b ]
- | maINHX2ADD w ⇒ [ TByte m (cnH ? w); TByte m (cnL ? w) ]
- (* _0/1/2: legale se nessun operando/1 byte/1 word *)
- | maIMM1 b ⇒ [ TByte m b ]
- | maIMM1EXT b ⇒ [ TByte m b ]
- | maIMM2 w ⇒ [ TByte m (cnH ? w); TByte m (cnL ? w) ]
- | maDIR1 b ⇒ [ TByte m b ]
- | maDIR2 w ⇒ [ TByte m (cnH ? w); TByte m (cnL ? w) ]
- | maIX0 ⇒ nil ?
- | maIX1 b ⇒ [ TByte m b ]
- | maIX2 w ⇒ [ TByte m (cnH ? w); TByte m (cnL ? w) ]
- | maSP1 b ⇒ [ TByte m b ]
- | maSP2 w ⇒ [ TByte m (cnH ? w); TByte m (cnL ? w) ]
- (* movimento: legale se 2 operandi byte *)
- | maDIR1_to_DIR1 b1 b2 ⇒ [ TByte m b1 ; TByte m b2 ]
- | maIMM1_to_DIR1 b1 b2 ⇒ [ TByte m b1 ; TByte m b2 ]
- | maIX0p_to_DIR1 b ⇒ [ TByte m b]
- | maDIR1_to_IX0p b ⇒ [ TByte m b]
- (* cbeq/dbnz: legale se 1/2 operandi byte *)
- | maINHA_and_IMM1 b ⇒ [ TByte m b]
- | maINHX_and_IMM1 b ⇒ [ TByte m b]
- | maIMM1_and_IMM1 b1 b2 ⇒ [ TByte m b1 ; TByte m b2 ]
- | maDIR1_and_IMM1 b1 b2 ⇒ [ TByte m b1 ; TByte m b2 ]
- | maIX0_and_IMM1 b ⇒ [ TByte m b]
- | maIX0p_and_IMM1 b ⇒ [ TByte m b]
- | maIX1_and_IMM1 b1 b2 ⇒ [ TByte m b1 ; TByte m b2 ]
- | maIX1p_and_IMM1 b1 b2 ⇒ [ TByte m b1 ; TByte m b2 ]
- | maSP1_and_IMM1 b1 b2 ⇒ [ TByte m b1 ; TByte m b2 ]
- (* DIRn: legale se 1 operando byte *)
- | maDIRn _ b ⇒ [ TByte m b]
- (* DIRn_and_IMM1: legale se 2 operandi byte *)
- | maDIRn_and_IMM1 _ b1 b2 ⇒ [ TByte m b1 ; TByte m b2 ]
- (* TNY: legale se nessun operando *)
- | maTNY _ ⇒ nil ?
- (* SRT: legale se nessun operando *)
- | maSRT _ ⇒ nil ?
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/translation/translation_base.ma".
-
-(* ******************************************************* *)
-(* TRADUZIONE MCU+OPCODE+MODALITA'+ARGOMENTI → ESADECIMALE *)
-(* ******************************************************* *)
-
-(* introduzione di un tipo dipendente (dalla modalita') per gli argomenti *)
-ninductive IP2022_MA_check : IP2022_instr_mode → Type ≝
- maINH : IP2022_MA_check MODE_INH
-| maIMM3 : ∀n.IP2022_MA_check (MODE_IMM3 n)
-| maIMM8 : byte8 → IP2022_MA_check MODE_IMM8
-| maIMM13 : ∀t.byte8 → IP2022_MA_check (MODE_IMM13 t)
-| maFR0_and_W : byte8 → IP2022_MA_check MODE_FR0_and_W
-| maFR1_and_W : byte8 → IP2022_MA_check MODE_FR1_and_W
-| maW_and_FR0 : byte8 → IP2022_MA_check MODE_W_and_FR0
-| maW_and_FR1 : byte8 → IP2022_MA_check MODE_W_and_FR1
-| maFR0n : ∀n.byte8 → IP2022_MA_check (MODE_FR0n n)
-| maFR1n : ∀n.byte8 → IP2022_MA_check (MODE_FR1n n)
-.
-
-(* picker: trasforma l'argomento necessario in input a bytes_of_pseudo_instr_mode_param:
- MA_check i → list (t_byte8 m) *)
-ndefinition IP2022_args_picker ≝
-λi:IP2022_instr_mode.λargs:IP2022_MA_check i.
- match args with
- [ maINH ⇒ nil ?
- | maIMM3 _ ⇒ nil ?
- | maIMM8 b ⇒ [ TByte IP2022 b ]
- | maIMM13 _ b ⇒ [ TByte IP2022 b ]
- | maFR0_and_W b ⇒ [ TByte IP2022 b ]
- | maFR1_and_W b ⇒ [ TByte IP2022 b ]
- | maW_and_FR0 b ⇒ [ TByte IP2022 b ]
- | maW_and_FR1 b ⇒ [ TByte IP2022 b ]
- | maFR0n _ b ⇒ [ TByte IP2022 b ]
- | maFR1n _ b ⇒ [ TByte IP2022 b ]
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/translation/Freescale_translation.ma".
-include "emulator/translation/IP2022_translation.ma".
-
-(* ******************************************************* *)
-(* TRADUZIONE MCU+OPCODE+MODALITA'+ARGOMENTI → ESADECIMALE *)
-(* ******************************************************* *)
-
-(* introduzione di un tipo dipendente (dalla modalita') per gli argomenti *)
-ndefinition MA_check ≝
-λmcu:mcu_type.
- match mcu
- return λm.(aux_im_type m) → Type
- with
- [ HC05 ⇒ Freescale_MA_check
- | HC08 ⇒ Freescale_MA_check
- | HCS08 ⇒ Freescale_MA_check
- | RS08 ⇒ Freescale_MA_check
- | IP2022 ⇒ IP2022_MA_check
- ].
-
-(* picker: trasforma l'argomento necessario in input a bytes_of_pseudo_instr_mode_param:
- MA_check i → list (t_byte8 m) *)
-ndefinition args_picker ≝
-λmcu:mcu_type.
- match mcu
- return λm.Πi:(aux_im_type m).MA_check m i → ?
- with
- [ HC05 ⇒ Freescale_args_picker HC05
- | HC08 ⇒ Freescale_args_picker HC08
- | HCS08 ⇒ Freescale_args_picker HCS08
- | RS08 ⇒ Freescale_args_picker RS08
- | IP2022 ⇒ IP2022_args_picker
- ].
-
-(* trasformatore finale: mcu+opcode+instr_mode+args → list (t_byte8 m) *)
-nlet rec bytes_of_pseudo_instr_mode_param_aux (m:mcu_type) (o:aux_pseudo_type m) (i:aux_im_type m) (p:MA_check m i)
- (param:list (aux_table_type m)) on param ≝
- match param with
- [ nil ⇒ None ? | cons hd tl ⇒
- match (eq_pseudo m o (fst4T … hd)) ⊗ (eq_im m i (snd4T … hd)) with
- [ true ⇒ match thd4T … hd with
- [ Byte isab ⇒
- Some ? ([ (TByte m isab) ]@(args_picker m i p))
- | Word isaw ⇒
- Some ? ([ (TByte m (cnH ? isaw)) ; (TByte m (cnL ? isaw)) ]@(args_picker m i p))
- ]
- | false ⇒ bytes_of_pseudo_instr_mode_param_aux m o i p tl ]].
-
-ndefinition bytes_of_pseudo_instr_mode_param ≝
-λm:mcu_type.λo:aux_pseudo_type m.λi:aux_im_type m.λp:MA_check m i.
-bytes_of_pseudo_instr_mode_param_aux m o i p (opcode_table m).
-
-(* ****************************** *)
-(* APPROCCIO COMPILAZIONE AL VOLO *)
-(* ****************************** *)
-
-(* ausiliario di compile *)
-ndefinition defined_option ≝
- λT:Type.λo:option T.
- match o with
- [ None ⇒ False
- | Some _ ⇒ True
- ].
-
-(* compila solo se l'intera istruzione+modalita'+argomenti ha riscontro nelle tabelle *)
-ndefinition compile ≝
-λmcu:mcu_type.λi:aux_im_type mcu.λop:aux_pseudo_type mcu.λarg:MA_check mcu i.
- match bytes_of_pseudo_instr_mode_param mcu op i arg
- return λres:option ?.defined_option ? res → ?
- with
- [ None ⇒ λp:defined_option ? (None ?).False_rect_Type0 ? p
- | Some x ⇒ λp:defined_option ? (Some ? x).x
- ].
-
-(* detipatore del compilato: (t_byte8 m) → byte8 *)
-nlet rec source_to_byte8_aux (m:mcu_type) (p2:list byte8) (p1:list (t_byte8 m)) on p1 ≝
- match p1 with
- [ nil ⇒ p2
- | cons hd tl ⇒ match hd with [ TByte b ⇒ source_to_byte8_aux m (p2@[b]) tl ]
- ].
-
-ndefinition source_to_byte8 ≝ λm:mcu_type.source_to_byte8_aux m [].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/pseudo.ma".
-include "common/option.ma".
-include "emulator/opcodes/HC05_table.ma".
-include "emulator/opcodes/HC08_table.ma".
-include "emulator/opcodes/HCS08_table.ma".
-include "emulator/opcodes/RS08_table.ma".
-include "emulator/opcodes/IP2022_table.ma".
-
-(* ***************************** *)
-(* TRADUZIONE ESADECIMALE → INFO *)
-(* ***************************** *)
-
-(* accesso alla tabella della ALU prescelta *)
-ndefinition opcode_table ≝
-λm:mcu_type.
- match m
- return λm:mcu_type.list (aux_table_type m)
- with
- [ HC05 ⇒ opcode_table_HC05
- | HC08 ⇒ opcode_table_HC08
- | HCS08 ⇒ opcode_table_HCS08
- | RS08 ⇒ opcode_table_RS08
- | IP2022 ⇒ opcode_table_IP2022
- ].
-
-(* traduzione mcu+esadecimale → info *)
-(* NB: la ricerca per byte non matcha con una word con lo stesso byte superiore uguale *)
-(* NB: per matchare una word (precode+code) bisogna passare una word *)
-(* NB: il risultato e' sempre un'opzione, NON esiste un dummy opcode tipo UNKNOWN/ILLEGAL *)
-nlet rec full_info_of_word16_aux (m:mcu_type) (borw:byte8_or_word16) (param:list (aux_table_type m)) on param ≝
- match param with
- [ nil ⇒ None ?
- | cons hd tl ⇒
- match thd4T … hd with
- [ Byte b ⇒ match borw with
- [ Byte borw' ⇒ match eq_b8 borw' b with
- [ true ⇒ Some ? hd
- | false ⇒ full_info_of_word16_aux m borw tl ]
- | Word _ ⇒ full_info_of_word16_aux m borw tl ]
- | Word w ⇒ match borw with
- [ Byte _ ⇒ full_info_of_word16_aux m borw tl
- | Word borw' ⇒ match eq_w16 borw' w with
- [ true ⇒ Some ? hd
- | false ⇒ full_info_of_word16_aux m borw tl ]
- ]]].
-
-ndefinition full_info_of_word16 ≝
-λm:mcu_type.λborw:byte8_or_word16.
-full_info_of_word16_aux m borw (opcode_table m).
-
-(* introduzione di un tipo byte8 dipendente dall'mcu_type (phantom type) *)
-ninductive t_byte8 (m:mcu_type) : Type ≝
- TByte : byte8 → t_byte8 m.
-
-ndefinition eq_tbyte8 ≝
-λm.λtb1,tb2:t_byte8 m.
- match tb1 with
- [ TByte b1 ⇒ match tb2 with
- [ TByte b2 ⇒ eq_b8 b1 b2 ]].
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* BITRIGESIMALI *)
(* ************* *)
-(*
ndefinition bitrigesim_destruct_aux ≝
Πt1,t2:bitrigesim.ΠP:Prop.t1 = t2 →
match eq_bit t1 t2 with [ true ⇒ P → P | false ⇒ P ].
nnormalize;
napply (λx.x).
nqed.
-*)
nlemma eq_to_eqbit : ∀n1,n2.n1 = n2 → eq_bit n1 n2 = true.
#n1; #n2; #H;
##]
nqed.
-(* !!! per brevita... *)
-naxiom eqbit_to_eq : ∀t1,t2.eq_bit t1 t2 = true → t1 = t2.
+nlemma eqbit_to_eq1 : ∀t2.eq_bit t00 t2 = true → t00 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##1: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq2 : ∀t2.eq_bit t01 t2 = true → t01 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##2: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq3 : ∀t2.eq_bit t02 t2 = true → t02 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##3: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq4 : ∀t2.eq_bit t03 t2 = true → t03 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##4: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq5 : ∀t2.eq_bit t04 t2 = true → t04 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##5: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq6 : ∀t2.eq_bit t05 t2 = true → t05 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##6: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq7 : ∀t2.eq_bit t06 t2 = true → t06 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##7: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq8 : ∀t2.eq_bit t07 t2 = true → t07 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##8: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq9 : ∀t2.eq_bit t08 t2 = true → t08 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##9: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq10 : ∀t2.eq_bit t09 t2 = true → t09 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##10: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq11 : ∀t2.eq_bit t0A t2 = true → t0A = t2. #t2; ncases t2; nnormalize; #H; ##[ ##11: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq12 : ∀t2.eq_bit t0B t2 = true → t0B = t2. #t2; ncases t2; nnormalize; #H; ##[ ##12: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq13 : ∀t2.eq_bit t0C t2 = true → t0C = t2. #t2; ncases t2; nnormalize; #H; ##[ ##13: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq14 : ∀t2.eq_bit t0D t2 = true → t0D = t2. #t2; ncases t2; nnormalize; #H; ##[ ##14: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq15 : ∀t2.eq_bit t0E t2 = true → t0E = t2. #t2; ncases t2; nnormalize; #H; ##[ ##15: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq16 : ∀t2.eq_bit t0F t2 = true → t0F = t2. #t2; ncases t2; nnormalize; #H; ##[ ##16: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq17 : ∀t2.eq_bit t10 t2 = true → t10 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##17: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq18 : ∀t2.eq_bit t11 t2 = true → t11 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##18: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq19 : ∀t2.eq_bit t12 t2 = true → t12 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##19: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq20 : ∀t2.eq_bit t13 t2 = true → t13 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##20: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq21 : ∀t2.eq_bit t14 t2 = true → t14 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##21: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq22 : ∀t2.eq_bit t15 t2 = true → t15 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##22: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq23 : ∀t2.eq_bit t16 t2 = true → t16 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##23: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq24 : ∀t2.eq_bit t17 t2 = true → t17 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##24: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq25 : ∀t2.eq_bit t18 t2 = true → t18 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##25: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq26 : ∀t2.eq_bit t19 t2 = true → t19 = t2. #t2; ncases t2; nnormalize; #H; ##[ ##26: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq27 : ∀t2.eq_bit t1A t2 = true → t1A = t2. #t2; ncases t2; nnormalize; #H; ##[ ##27: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq28 : ∀t2.eq_bit t1B t2 = true → t1B = t2. #t2; ncases t2; nnormalize; #H; ##[ ##28: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq29 : ∀t2.eq_bit t1C t2 = true → t1C = t2. #t2; ncases t2; nnormalize; #H; ##[ ##29: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq30 : ∀t2.eq_bit t1D t2 = true → t1D = t2. #t2; ncases t2; nnormalize; #H; ##[ ##30: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq31 : ∀t2.eq_bit t1E t2 = true → t1E = t2. #t2; ncases t2; nnormalize; #H; ##[ ##31: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+nlemma eqbit_to_eq32 : ∀t2.eq_bit t1F t2 = true → t1F = t2. #t2; ncases t2; nnormalize; #H; ##[ ##32: napply refl_eq ##| ##*: napply (bool_destruct … H) ##] nqed.
+
+nlemma eqbit_to_eq : ∀t1,t2.eq_bit t1 t2 = true → t1 = t2.
+ #t1; ncases t1;
+ ##[ ##1: napply eqbit_to_eq1 ##| ##2: napply eqbit_to_eq2
+ ##| ##3: napply eqbit_to_eq3 ##| ##4: napply eqbit_to_eq4
+ ##| ##5: napply eqbit_to_eq5 ##| ##6: napply eqbit_to_eq6
+ ##| ##7: napply eqbit_to_eq7 ##| ##8: napply eqbit_to_eq8
+ ##| ##9: napply eqbit_to_eq9 ##| ##10: napply eqbit_to_eq10
+ ##| ##11: napply eqbit_to_eq11 ##| ##12: napply eqbit_to_eq12
+ ##| ##13: napply eqbit_to_eq13 ##| ##14: napply eqbit_to_eq14
+ ##| ##15: napply eqbit_to_eq15 ##| ##16: napply eqbit_to_eq16
+ ##| ##17: napply eqbit_to_eq17 ##| ##18: napply eqbit_to_eq18
+ ##| ##19: napply eqbit_to_eq19 ##| ##20: napply eqbit_to_eq20
+ ##| ##21: napply eqbit_to_eq21 ##| ##22: napply eqbit_to_eq22
+ ##| ##23: napply eqbit_to_eq23 ##| ##24: napply eqbit_to_eq24
+ ##| ##25: napply eqbit_to_eq25 ##| ##26: napply eqbit_to_eq26
+ ##| ##27: napply eqbit_to_eq27 ##| ##28: napply eqbit_to_eq28
+ ##| ##29: napply eqbit_to_eq29 ##| ##30: napply eqbit_to_eq30
+ ##| ##31: napply eqbit_to_eq31 ##| ##32: napply eqbit_to_eq32
+ ##]
+nqed.
nlemma neq_to_neqbit : ∀n1,n2.n1 ≠ n2 → eq_bit n1 n2 = false.
#n1; #n2; #H;
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* BOOLEANI *)
(* ******** *)
-(*
ndefinition bool_destruct_aux ≝
Πb1,b2:bool.ΠP:Prop.b1 = b2 →
match eq_bool b1 b2 with [ true ⇒ P → P | false ⇒ P ].
nnormalize;
napply (λx.x).
nqed.
-*)
nlemma symmetric_eqbool : symmetricT bool bool eq_bool.
#b1; #b2;
ncases b2;
nnormalize;
##[ ##1,4: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
+ ##| ##*: #H; napply (bool_destruct … H)
##]
nqed.
ncases b2;
nnormalize;
##[ ##1,4: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
+ ##| ##*: #H; napply (bool_destruct … H)
##]
nqed.
##| ##*: napply (or2_intro2 (? = ?) (? ≠ ?) …);
nnormalize; #H;
napply False_ind;
- ndestruct (*napply (bool_destruct … H)*)
+ napply (bool_destruct … H)
##]
nqed.
ncases b1;
ncases b2;
nnormalize;
- ##[ ##1,4: #H; ndestruct (*napply (bool_destruct … H)*)
- ##| ##*: #H; #H1; ndestruct (*napply (bool_destruct … H1)*)
+ ##[ ##1,4: #H; napply (bool_destruct … H)
+ ##| ##*: #H; #H1; napply (bool_destruct … H1)
##]
nqed.
nlemma eqfalse_to_neqtrue : ∀x.x = false → x ≠ true.
#x; nelim x;
- ##[ ##1: #H; ndestruct (*napply (bool_destruct … H)*)
- ##| ##2: #H; nnormalize; #H1; ndestruct (*napply (bool_destruct … H1)*)
+ ##[ ##1: #H; napply (bool_destruct … H)
+ ##| ##2: #H; nnormalize; #H1; napply (bool_destruct … H1)
##]
nqed.
nlemma eqtrue_to_neqfalse : ∀x.x = true → x ≠ false.
#x; nelim x;
- ##[ ##1: #H; nnormalize; #H1; ndestruct (*napply (bool_destruct … H1)*)
- ##| ##2: #H; ndestruct (*napply (bool_destruct … H)*)
+ ##[ ##1: #H; nnormalize; #H1; napply (bool_destruct … H1)
+ ##| ##2: #H; napply (bool_destruct … H)
##]
nqed.
ncases b2;
nnormalize;
##[ ##1,2: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
+ ##| ##*: #H; napply (bool_destruct … H)
##]
nqed.
ncases b2;
nnormalize;
##[ ##1,3: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
+ ##| ##*: #H; napply (bool_destruct … H)
##]
nqed.
ncases b1;
ncases b2;
nnormalize;
- ##[ ##1: #H; ndestruct (*napply (bool_destruct … H)*)
+ ##[ ##1: #H; napply (bool_destruct … H)
##| ##2,4: #H; napply (or2_intro2 … H)
##| ##3: #H; napply (or2_intro1 … H)
##]
ncases b2;
ncases b3;
nnormalize;
- ##[ ##1: #H; ndestruct (*napply (bool_destruct … H)*)
+ ##[ ##1: #H; napply (bool_destruct … H)
##| ##5,6,7,8: #H; napply (or3_intro1 … H)
##| ##2,4: #H; napply (or3_intro3 … H)
##| ##3: #H; napply (or3_intro2 … H)
ncases b3;
ncases b4;
nnormalize;
- ##[ ##1: #H; ndestruct (*napply (bool_destruct … H)*)
+ ##[ ##1: #H; napply (bool_destruct … H)
##| ##9,10,11,12,13,14,15,16: #H; napply (or4_intro1 … H)
##| ##5,6,7,8: #H; napply (or4_intro2 … H)
##| ##3,4: #H; napply (or4_intro3 … H)
ncases b4;
ncases b5;
nnormalize;
- ##[ ##1: #H; ndestruct (*napply (bool_destruct … H)*)
+ ##[ ##1: #H; napply (bool_destruct … H)
##| ##17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32: #H; napply (or5_intro1 … H)
##| ##9,10,11,12,13,14,15,16: #H; napply (or5_intro2 … H)
##| ##5,6,7,8: #H; napply (or5_intro3 … H)
ncases b2;
nnormalize;
##[ ##4: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
+ ##| ##*: #H; napply (bool_destruct … H)
##]
nqed.
ncases b2;
nnormalize;
##[ ##4: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
+ ##| ##*: #H; napply (bool_destruct … H)
##]
nqed.
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
include "num/exadecim.ma".
-include "num/comp_num.ma".
include "num/bitrigesim.ma".
-include "common/nat.ma".
(* **** *)
(* BYTE *)
(* **** *)
-ndefinition byte8 ≝ comp_num exadecim.
-ndefinition mk_byte8 ≝ λe1,e2.mk_comp_num exadecim e1 e2.
+nrecord byte8 : Type ≝
+ {
+ b8h: exadecim;
+ b8l: exadecim
+ }.
(* \langle \rangle *)
notation "〈x,y〉" non associative with precedence 80
- for @{ mk_comp_num exadecim $x $y }.
-
-(* iteratore sui byte *)
-ndefinition forall_b8 ≝ forall_cn ? forall_ex.
+ for @{ 'mk_byte8 $x $y }.
+interpretation "mk_byte8" 'mk_byte8 x y = (mk_byte8 x y).
(* operatore = *)
-ndefinition eq_b8 ≝ eq2_cn ? eq_ex.
+ndefinition eq_b8 ≝ λb1,b2:byte8.(eq_ex (b8h b1) (b8h b2)) ⊗ (eq_ex (b8l b1) (b8l b2)).
(* operatore < *)
-ndefinition lt_b8 ≝ ltgt_cn ? eq_ex lt_ex.
+ndefinition lt_b8 ≝
+λb1,b2:byte8.
+ (lt_ex (b8h b1) (b8h b2)) ⊕
+ ((eq_ex (b8h b1) (b8h b2)) ⊗ (lt_ex (b8l b1) (b8l b2))).
(* operatore ≤ *)
-ndefinition le_b8 ≝ lege_cn ? eq_ex lt_ex le_ex.
+ndefinition le_b8 ≝
+λb1,b2:byte8.
+ (lt_ex (b8h b1) (b8h b2)) ⊕
+ ((eq_ex (b8h b1) (b8h b2)) ⊗ (le_ex (b8l b1) (b8l b2))).
(* operatore > *)
-ndefinition gt_b8 ≝ ltgt_cn ? eq_ex gt_ex.
+ndefinition gt_b8 ≝
+λb1,b2:byte8.
+ (gt_ex (b8h b1) (b8h b2)) ⊕
+ ((eq_ex (b8h b1) (b8h b2)) ⊗ (gt_ex (b8l b1) (b8l b2))).
(* operatore ≥ *)
-ndefinition ge_b8 ≝ lege_cn ? eq_ex gt_ex ge_ex.
+ndefinition ge_b8 ≝
+λb1,b2:byte8.
+ (gt_ex (b8h b1) (b8h b2)) ⊕
+ ((eq_ex (b8h b1) (b8h b2)) ⊗ (ge_ex (b8l b1) (b8l b2))).
(* operatore and *)
-ndefinition and_b8 ≝ fop2_cn ? and_ex.
+ndefinition and_b8 ≝
+λb1,b2:byte8.mk_byte8 (and_ex (b8h b1) (b8h b2)) (and_ex (b8l b1) (b8l b2)).
(* operatore or *)
-ndefinition or_b8 ≝ fop2_cn ? or_ex.
+ndefinition or_b8 ≝
+λb1,b2:byte8.mk_byte8 (or_ex (b8h b1) (b8h b2)) (or_ex (b8l b1) (b8l b2)).
(* operatore xor *)
-ndefinition xor_b8 ≝ fop2_cn ? xor_ex.
-
-(* operatore Most Significant Bit *)
-ndefinition getMSB_b8 ≝ getOPH_cn ? getMSB_ex.
-ndefinition setMSB_b8 ≝ setOPH_cn ? setMSB_ex.
-ndefinition clrMSB_b8 ≝ setOPH_cn ? clrMSB_ex.
-
-(* operatore Least Significant Bit *)
-ndefinition getLSB_b8 ≝ getOPL_cn ? getLSB_ex.
-ndefinition setLSB_b8 ≝ setOPL_cn ? setLSB_ex.
-ndefinition clrLSB_b8 ≝ setOPL_cn ? clrLSB_ex.
-
-(* operatore estensione unsigned *)
-ndefinition extu_b8 ≝ λe2.〈x0,e2〉.
-
-(* operatore estensione signed *)
-ndefinition exts_b8 ≝
-λe2.〈(match getMSB_ex e2 with
- [ true ⇒ xF | false ⇒ x0 ]),e2〉.
+ndefinition xor_b8 ≝
+λb1,b2:byte8.mk_byte8 (xor_ex (b8h b1) (b8h b2)) (xor_ex (b8l b1) (b8l b2)).
(* operatore rotazione destra con carry *)
-ndefinition rcr_b8 ≝ opcr_cn ? rcr_ex.
+ndefinition rcr_b8 ≝
+λb:byte8.λc:bool.match rcr_ex (b8h b) c with
+ [ pair bh' c' ⇒ match rcr_ex (b8l b) c' with
+ [ pair bl' c'' ⇒ pair … (mk_byte8 bh' bl') c'' ]].
(* operatore shift destro *)
-ndefinition shr_b8 ≝ opcr_cn ? rcr_ex false.
+ndefinition shr_b8 ≝
+λb:byte8.match rcr_ex (b8h b) false with
+ [ pair bh' c' ⇒ match rcr_ex (b8l b) c' with
+ [ pair bl' c'' ⇒ pair … (mk_byte8 bh' bl') c'' ]].
(* operatore rotazione destra *)
ndefinition ror_b8 ≝
-λb.match shr_b8 b with
- [ pair c b' ⇒ match c with
- [ true ⇒ setMSB_b8 b' | false ⇒ b' ]].
+λb:byte8.match rcr_ex (b8h b) false with
+ [ pair bh' c' ⇒ match rcr_ex (b8l b) c' with
+ [ pair bl' c'' ⇒ match c'' with
+ [ true ⇒ mk_byte8 (or_ex x8 bh') bl'
+ | false ⇒ mk_byte8 bh' bl' ]]].
+
+(* operatore rotazione destra n-volte *)
+nlet rec ror_b8_n (b:byte8) (n:nat) on n ≝
+ match n with
+ [ O ⇒ b
+ | S n' ⇒ ror_b8_n (ror_b8 b) n' ].
(* operatore rotazione sinistra con carry *)
-ndefinition rcl_b8 ≝ opcl_cn ? rcl_ex.
+ndefinition rcl_b8 ≝
+λb:byte8.λc:bool.match rcl_ex (b8l b) c with
+ [ pair bl' c' ⇒ match rcl_ex (b8h b) c' with
+ [ pair bh' c'' ⇒ pair … (mk_byte8 bh' bl') c'' ]].
(* operatore shift sinistro *)
-ndefinition shl_b8 ≝ opcl_cn ? rcl_ex false.
+ndefinition shl_b8 ≝
+λb:byte8.match rcl_ex (b8l b) false with
+ [ pair bl' c' ⇒ match rcl_ex (b8h b) c' with
+ [ pair bh' c'' ⇒ pair … (mk_byte8 bh' bl') c'' ]].
(* operatore rotazione sinistra *)
ndefinition rol_b8 ≝
-λb.match shl_b8 b with
- [ pair c b' ⇒ match c with
- [ true ⇒ setLSB_b8 b' | false ⇒ b' ]].
+λb:byte8.match rcl_ex (b8l b) false with
+ [ pair bl' c' ⇒ match rcl_ex (b8h b) c' with
+ [ pair bh' c'' ⇒ match c'' with
+ [ true ⇒ mk_byte8 bh' (or_ex x1 bl')
+ | false ⇒ mk_byte8 bh' bl' ]]].
+
+(* operatore rotazione sinistra n-volte *)
+nlet rec rol_b8_n (b:byte8) (n:nat) on n ≝
+ match n with
+ [ O ⇒ b
+ | S n' ⇒ rol_b8_n (rol_b8 b) n' ].
(* operatore not/complemento a 1 *)
-ndefinition not_b8 ≝ fop_cn ? not_ex.
+ndefinition not_b8 ≝
+λb:byte8.mk_byte8 (not_ex (b8h b)) (not_ex (b8l b)).
(* operatore somma con data+carry → data+carry *)
-ndefinition plus_b8_dc_dc ≝ opcl2_cn ? plus_ex_dc_dc.
+ndefinition plus_b8_dc_dc ≝
+λb1,b2:byte8.λc:bool.
+ match plus_ex_dc_dc (b8l b1) (b8l b2) c with
+ [ pair l c ⇒ match plus_ex_dc_dc (b8h b1) (b8h b2) c with
+ [ pair h c' ⇒ pair … 〈h,l〉 c' ]].
(* operatore somma con data+carry → data *)
-ndefinition plus_b8_dc_d ≝ λc,b1,b2.snd … (plus_b8_dc_dc c b1 b2).
+ndefinition plus_b8_dc_d ≝
+λb1,b2:byte8.λc:bool.
+ match plus_ex_dc_dc (b8l b1) (b8l b2) c with
+ [ pair l c ⇒ 〈plus_ex_dc_d (b8h b1) (b8h b2) c,l〉 ].
(* operatore somma con data+carry → c *)
-ndefinition plus_b8_dc_c ≝ λc,b1,b2.fst … (plus_b8_dc_dc c b1 b2).
+ndefinition plus_b8_dc_c ≝
+λb1,b2:byte8.λc:bool.
+ plus_ex_dc_c (b8h b1) (b8h b2) (plus_ex_dc_c (b8l b1) (b8l b2) c).
(* operatore somma con data → data+carry *)
-ndefinition plus_b8_d_dc ≝ opcl2_cn ? plus_ex_dc_dc false.
+ndefinition plus_b8_d_dc ≝
+λb1,b2:byte8.
+ match plus_ex_d_dc (b8l b1) (b8l b2) with
+ [ pair l c ⇒ match plus_ex_dc_dc (b8h b1) (b8h b2) c with
+ [ pair h c' ⇒ pair … 〈h,l〉 c' ]].
(* operatore somma con data → data *)
-ndefinition plus_b8_d_d ≝ λb1,b2.snd … (plus_b8_d_dc b1 b2).
+ndefinition plus_b8_d_d ≝
+λb1,b2:byte8.
+ match plus_ex_d_dc (b8l b1) (b8l b2) with
+ [ pair l c ⇒ 〈plus_ex_dc_d (b8h b1) (b8h b2) c,l〉 ].
(* operatore somma con data → c *)
-ndefinition plus_b8_d_c ≝ λb1,b2.fst … (plus_b8_d_dc b1 b2).
+ndefinition plus_b8_d_c ≝
+λb1,b2:byte8.
+ plus_ex_dc_c (b8h b1) (b8h b2) (plus_ex_d_c (b8l b1) (b8l b2)).
+
+(* operatore Most Significant Bit *)
+ndefinition MSB_b8 ≝ λb:byte8.eq_ex x8 (and_ex x8 (b8h b)).
(* operatore predecessore *)
-ndefinition pred_b8 ≝ predsucc_cn ? (eq_ex x0) pred_ex.
+ndefinition pred_b8 ≝
+λb:byte8.match eq_ex (b8l b) x0 with
+ [ true ⇒ mk_byte8 (pred_ex (b8h b)) (pred_ex (b8l b))
+ | false ⇒ mk_byte8 (b8h b) (pred_ex (b8l b)) ].
(* operatore successore *)
-ndefinition succ_b8 ≝ predsucc_cn ? (eq_ex xF) succ_ex.
+ndefinition succ_b8 ≝
+λb:byte8.match eq_ex (b8l b) xF with
+ [ true ⇒ mk_byte8 (succ_ex (b8h b)) (succ_ex (b8l b))
+ | false ⇒ mk_byte8 (b8h b) (succ_ex (b8l b)) ].
(* operatore neg/complemento a 2 *)
ndefinition compl_b8 ≝
-λb:byte8.match getMSB_b8 b with
+λb:byte8.match MSB_b8 b with
[ true ⇒ succ_b8 (not_b8 b)
| false ⇒ not_b8 (pred_b8 b) ].
-(* operatore abs *)
-ndefinition abs_b8 ≝
-λb:byte8.match getMSB_b8 b with
- [ true ⇒ compl_b8 b | false ⇒ b ].
-
-(* operatore x in [inf,sup] o in sup],[inf *)
-ndefinition inrange_b8 ≝
-λx,inf,sup:byte8.
- match le_b8 inf sup with
- [ true ⇒ and_bool | false ⇒ or_bool ]
- (le_b8 inf x) (le_b8 x sup).
-
(* operatore moltiplicazione senza segno: e*e=[0x00,0xE1] *)
-ndefinition mulu_ex ≝
+ndefinition mul_ex ≝
λe1,e2:exadecim.match e1 with
[ x0 ⇒ match e2 with
[ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x0〉 | x2 ⇒ 〈x0,x0〉 | x3 ⇒ 〈x0,x0〉
| xC ⇒ 〈xB,x4〉 | xD ⇒ 〈xC,x3〉 | xE ⇒ 〈xD,x2〉 | xF ⇒ 〈xE,x1〉 ]
].
-(* operatore moltiplicazione con segno *)
-ndefinition muls_ex ≝
-λe1,e2:exadecim.match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x0〉 | x2 ⇒ 〈x0,x0〉 | x3 ⇒ 〈x0,x0〉
- | x4 ⇒ 〈x0,x0〉 | x5 ⇒ 〈x0,x0〉 | x6 ⇒ 〈x0,x0〉 | x7 ⇒ 〈x0,x0〉
- | x8 ⇒ 〈x0,x0〉 | x9 ⇒ 〈x0,x0〉 | xA ⇒ 〈x0,x0〉 | xB ⇒ 〈x0,x0〉
- | xC ⇒ 〈x0,x0〉 | xD ⇒ 〈x0,x0〉 | xE ⇒ 〈x0,x0〉 | xF ⇒ 〈x0,x0〉 ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x1〉 | x2 ⇒ 〈x0,x2〉 | x3 ⇒ 〈x0,x3〉
- | x4 ⇒ 〈x0,x4〉 | x5 ⇒ 〈x0,x5〉 | x6 ⇒ 〈x0,x6〉 | x7 ⇒ 〈x0,x7〉
- | x8 ⇒ 〈xF,x8〉 | x9 ⇒ 〈xF,x9〉 | xA ⇒ 〈xF,xA〉 | xB ⇒ 〈xF,xB〉
- | xC ⇒ 〈xF,xC〉 | xD ⇒ 〈xF,xD〉 | xE ⇒ 〈xF,xE〉 | xF ⇒ 〈xF,xF〉 ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x2〉 | x2 ⇒ 〈x0,x4〉 | x3 ⇒ 〈x0,x6〉
- | x4 ⇒ 〈x0,x8〉 | x5 ⇒ 〈x0,xA〉 | x6 ⇒ 〈x0,xC〉 | x7 ⇒ 〈x0,xE〉
- | x8 ⇒ 〈xF,x0〉 | x9 ⇒ 〈xF,x2〉 | xA ⇒ 〈xF,x4〉 | xB ⇒ 〈xF,x6〉
- | xC ⇒ 〈xF,x8〉 | xD ⇒ 〈xF,xA〉 | xE ⇒ 〈xF,xC〉 | xF ⇒ 〈xF,xE〉 ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x3〉 | x2 ⇒ 〈x0,x6〉 | x3 ⇒ 〈x0,x9〉
- | x4 ⇒ 〈x0,xC〉 | x5 ⇒ 〈x0,xF〉 | x6 ⇒ 〈x1,x2〉 | x7 ⇒ 〈x1,x5〉
- | x8 ⇒ 〈xE,x8〉 | x9 ⇒ 〈xE,xB〉 | xA ⇒ 〈xE,xE〉 | xB ⇒ 〈xF,x1〉
- | xC ⇒ 〈xF,x4〉 | xD ⇒ 〈xF,x7〉 | xE ⇒ 〈xF,xA〉 | xF ⇒ 〈xF,xD〉 ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x4〉 | x2 ⇒ 〈x0,x8〉 | x3 ⇒ 〈x0,xC〉
- | x4 ⇒ 〈x1,x0〉 | x5 ⇒ 〈x1,x4〉 | x6 ⇒ 〈x1,x8〉 | x7 ⇒ 〈x1,xC〉
- | x8 ⇒ 〈xE,x0〉 | x9 ⇒ 〈xE,x4〉 | xA ⇒ 〈xE,x8〉 | xB ⇒ 〈xE,xC〉
- | xC ⇒ 〈xF,x0〉 | xD ⇒ 〈xF,x4〉 | xE ⇒ 〈xF,x8〉 | xF ⇒ 〈xF,xC〉 ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x5〉 | x2 ⇒ 〈x0,xA〉 | x3 ⇒ 〈x0,xF〉
- | x4 ⇒ 〈x1,x4〉 | x5 ⇒ 〈x1,x9〉 | x6 ⇒ 〈x1,xE〉 | x7 ⇒ 〈x2,x3〉
- | x8 ⇒ 〈xD,x8〉 | x9 ⇒ 〈xD,xD〉 | xA ⇒ 〈xE,x2〉 | xB ⇒ 〈xE,x7〉
- | xC ⇒ 〈xE,xC〉 | xD ⇒ 〈xF,x1〉 | xE ⇒ 〈xF,x6〉 | xF ⇒ 〈xF,xB〉 ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x6〉 | x2 ⇒ 〈x0,xC〉 | x3 ⇒ 〈x1,x2〉
- | x4 ⇒ 〈x1,x8〉 | x5 ⇒ 〈x1,xE〉 | x6 ⇒ 〈x2,x4〉 | x7 ⇒ 〈x2,xA〉
- | x8 ⇒ 〈xD,x0〉 | x9 ⇒ 〈xD,x6〉 | xA ⇒ 〈xD,xC〉 | xB ⇒ 〈xE,x2〉
- | xC ⇒ 〈xE,x8〉 | xD ⇒ 〈xE,xE〉 | xE ⇒ 〈xF,x4〉 | xF ⇒ 〈xF,xA〉 ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x7〉 | x2 ⇒ 〈x0,xE〉 | x3 ⇒ 〈x1,x5〉
- | x4 ⇒ 〈x1,xC〉 | x5 ⇒ 〈x2,x3〉 | x6 ⇒ 〈x2,xA〉 | x7 ⇒ 〈x3,x1〉
- | x8 ⇒ 〈xC,x8〉 | x9 ⇒ 〈xC,xF〉 | xA ⇒ 〈xD,x6〉 | xB ⇒ 〈xD,xD〉
- | xC ⇒ 〈xE,x4〉 | xD ⇒ 〈xE,xB〉 | xE ⇒ 〈xF,x2〉 | xF ⇒ 〈xF,x9〉 ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈xF,x8〉 | x2 ⇒ 〈xF,x0〉 | x3 ⇒ 〈xE,x8〉
- | x4 ⇒ 〈xE,x0〉 | x5 ⇒ 〈xD,x8〉 | x6 ⇒ 〈xD,x0〉 | x7 ⇒ 〈xC,x8〉
- | x8 ⇒ 〈x4,x0〉 | x9 ⇒ 〈x3,x8〉 | xA ⇒ 〈x3,x0〉 | xB ⇒ 〈x2,x8〉
- | xC ⇒ 〈x2,x0〉 | xD ⇒ 〈x1,x8〉 | xE ⇒ 〈x1,x0〉 | xF ⇒ 〈x0,x8〉 ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈xF,x9〉 | x2 ⇒ 〈xF,x2〉 | x3 ⇒ 〈xE,xB〉
- | x4 ⇒ 〈xE,x4〉 | x5 ⇒ 〈xD,xD〉 | x6 ⇒ 〈xD,x6〉 | x7 ⇒ 〈xC,xF〉
- | x8 ⇒ 〈x3,x8〉 | x9 ⇒ 〈x3,x1〉 | xA ⇒ 〈x2,xA〉 | xB ⇒ 〈x2,x3〉
- | xC ⇒ 〈x1,xC〉 | xD ⇒ 〈x1,x5〉 | xE ⇒ 〈x0,xE〉 | xF ⇒ 〈x0,x7〉 ]
- | xA ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈xF,xA〉 | x2 ⇒ 〈xF,x4〉 | x3 ⇒ 〈xE,xE〉
- | x4 ⇒ 〈xE,x8〉 | x5 ⇒ 〈xE,x2〉 | x6 ⇒ 〈xD,xC〉 | x7 ⇒ 〈xD,x6〉
- | x8 ⇒ 〈x3,x0〉 | x9 ⇒ 〈x2,xA〉 | xA ⇒ 〈x2,x4〉 | xB ⇒ 〈x1,xE〉
- | xC ⇒ 〈x1,x8〉 | xD ⇒ 〈x1,x2〉 | xE ⇒ 〈x0,xC〉 | xF ⇒ 〈x0,x6〉 ]
- | xB ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈xF,xB〉 | x2 ⇒ 〈xF,x6〉 | x3 ⇒ 〈xF,x1〉
- | x4 ⇒ 〈xE,xC〉 | x5 ⇒ 〈xE,x7〉 | x6 ⇒ 〈xE,x2〉 | x7 ⇒ 〈xD,xD〉
- | x8 ⇒ 〈x2,x8〉 | x9 ⇒ 〈x2,x3〉 | xA ⇒ 〈x1,xE〉 | xB ⇒ 〈x1,x9〉
- | xC ⇒ 〈x1,x4〉 | xD ⇒ 〈x0,xF〉 | xE ⇒ 〈x0,xA〉 | xF ⇒ 〈x0,x5〉 ]
- | xC ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈xF,xC〉 | x2 ⇒ 〈xF,x8〉 | x3 ⇒ 〈xF,x4〉
- | x4 ⇒ 〈xF,x0〉 | x5 ⇒ 〈xE,xC〉 | x6 ⇒ 〈xE,x8〉 | x7 ⇒ 〈xE,x4〉
- | x8 ⇒ 〈x2,x0〉 | x9 ⇒ 〈x1,xC〉 | xA ⇒ 〈x1,x8〉 | xB ⇒ 〈x1,x4〉
- | xC ⇒ 〈x1,x0〉 | xD ⇒ 〈x0,xC〉 | xE ⇒ 〈x0,x8〉 | xF ⇒ 〈x0,x4〉 ]
- | xD ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈xF,xD〉 | x2 ⇒ 〈xF,xA〉 | x3 ⇒ 〈xF,x7〉
- | x4 ⇒ 〈xF,x4〉 | x5 ⇒ 〈xF,x1〉 | x6 ⇒ 〈xE,xE〉 | x7 ⇒ 〈xE,xB〉
- | x8 ⇒ 〈x1,x8〉 | x9 ⇒ 〈x1,x5〉 | xA ⇒ 〈x1,x2〉 | xB ⇒ 〈x0,xF〉
- | xC ⇒ 〈x0,xC〉 | xD ⇒ 〈x0,x9〉 | xE ⇒ 〈x0,x6〉 | xF ⇒ 〈x0,x3〉 ]
- | xE ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈xF,xE〉 | x2 ⇒ 〈xF,xC〉 | x3 ⇒ 〈xF,xA〉
- | x4 ⇒ 〈xF,x8〉 | x5 ⇒ 〈xF,x6〉 | x6 ⇒ 〈xF,x4〉 | x7 ⇒ 〈xF,x2〉
- | x8 ⇒ 〈x1,x0〉 | x9 ⇒ 〈x0,xE〉 | xA ⇒ 〈x0,xC〉 | xB ⇒ 〈x0,xA〉
- | xC ⇒ 〈x0,x8〉 | xD ⇒ 〈x0,x6〉 | xE ⇒ 〈x0,x4〉 | xF ⇒ 〈x0,x2〉 ]
- | xF ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈xF,xF〉 | x2 ⇒ 〈xF,xE〉 | x3 ⇒ 〈xF,xD〉
- | x4 ⇒ 〈xF,xC〉 | x5 ⇒ 〈xF,xB〉 | x6 ⇒ 〈xF,xA〉 | x7 ⇒ 〈xF,x9〉
- | x8 ⇒ 〈x0,x8〉 | x9 ⇒ 〈x0,x7〉 | xA ⇒ 〈x0,x6〉 | xB ⇒ 〈x0,x5〉
- | xC ⇒ 〈x0,x4〉 | xD ⇒ 〈x0,x3〉 | xE ⇒ 〈x0,x2〉 | xF ⇒ 〈x0,x1〉 ]
- ].
-
(* correzione per somma su BCD *)
(* input: halfcarry,carry,X(BCD+BCD) *)
(* output: X',carry' *)
(* X' = [(b16l X):0x0-0x9] X + [h=1 ? 0x06 : 0x00] + [c=1 ? 0x60 : 0x00]
[(b16l X):0xA-0xF] X + 0x06 + [c=1 ? 0x60 : 0x00] *)
[ true ⇒
- let X' ≝ match (lt_ex (cnL ? X) xA) ⊗ (⊖h) with
+ let X' ≝ match (lt_ex (b8l X) xA) ⊗ (⊖h) with
[ true ⇒ X
| false ⇒ plus_b8_d_d X 〈x0,x6〉 ] in
let X'' ≝ match c with
[ true ⇒ plus_b8_d_d X' 〈x6,x0〉
| false ⇒ X' ] in
- pair … c X''
+ pair … X'' c
(* [X:0x9A-0xFF] *)
(* c' = 1 *)
(* X' = [X:0x9A-0xFF]
[(b16l X):0x0-0x9] X + [h=1 ? 0x06 : 0x00] + 0x60
[(b16l X):0xA-0xF] X + 0x6 + 0x60 *)
| false ⇒
- let X' ≝ match (lt_ex (cnL ? X) xA) ⊗ (⊖h) with
+ let X' ≝ match (lt_ex (b8l X) xA) ⊗ (⊖h) with
[ true ⇒ X
| false ⇒ plus_b8_d_d X 〈x0,x6〉 ] in
let X'' ≝ plus_b8_d_d X' 〈x6,x0〉 in
- pair … true X''
+ pair … X'' true
].
+(* operatore x in [inf,sup] *)
+ndefinition inrange_b8 ≝
+λx,inf,sup:byte8.(le_b8 inf x) ⊗ (le_b8 x sup).
+
+(* iteratore sui byte *)
+ndefinition forall_b8 ≝
+ λP.
+ forall_ex (λbh.
+ forall_ex (λbl.
+ P (mk_byte8 bh bl))).
+
(* byte ricorsivi *)
ninductive rec_byte8 : byte8 → Type ≝
b8_O : rec_byte8 〈x0,x0〉
*)
ndefinition b8_to_recb8 : Πb.rec_byte8 b ≝
-λb.match b with
- [ mk_comp_num h l ⇒ b8_to_recb8_aux3 h l (b8_to_recb8_aux2 h (ex_to_recex h)) ].
+λb.match b with [ mk_byte8 h l ⇒ b8_to_recb8_aux3 h l (b8_to_recb8_aux2 h (ex_to_recex h)) ].
(* ottali → esadecimali *)
ndefinition b8_of_bit ≝
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
include "num/byte8.ma".
include "num/exadecim_lemmas.ma".
-include "num/comp_num_lemmas.ma".
(* **** *)
(* BYTE *)
(* **** *)
-ndefinition byte8_destruct_1 ≝ cn_destruct_1 byte8.
-ndefinition byte8_destruct_2 ≝ cn_destruct_2 byte8.
+nlemma byte8_destruct_1 :
+∀x1,x2,y1,y2.
+ mk_byte8 x1 y1 = mk_byte8 x2 y2 → x1 = x2.
+ #x1; #x2; #y1; #y2; #H;
+ nchange with (match mk_byte8 x2 y2 with [ mk_byte8 a _ ⇒ x1 = a ]);
+ nrewrite < H;
+ nnormalize;
+ napply refl_eq.
+nqed.
-ndefinition symmetric_eqb8 ≝ symmetric_eqcn ? eq_ex symmetric_eqex.
+nlemma byte8_destruct_2 :
+∀x1,x2,y1,y2.
+ mk_byte8 x1 y1 = mk_byte8 x2 y2 → y1 = y2.
+ #x1; #x2; #y1; #y2; #H;
+ nchange with (match mk_byte8 x2 y2 with [ mk_byte8 _ b ⇒ y1 = b ]);
+ nrewrite < H;
+ nnormalize;
+ napply refl_eq.
+nqed.
-ndefinition eqb8_to_eq ≝ eqcn_to_eq ? eq_ex eqex_to_eq.
-ndefinition eq_to_eqb8 ≝ eq_to_eqcn ? eq_ex eq_to_eqex.
+nlemma symmetric_eqb8 : symmetricT byte8 bool eq_b8.
+ #b1; #b2;
+ nelim b1;
+ nelim b2;
+ #e1; #e2; #e3; #e4;
+ nchange with (((eq_ex e3 e1)⊗(eq_ex e4 e2)) = ((eq_ex e1 e3)⊗(eq_ex e2 e4)));
+ nrewrite > (symmetric_eqex e1 e3);
+ nrewrite > (symmetric_eqex e2 e4);
+ napply refl_eq.
+nqed.
-ndefinition decidable_b8 ≝ decidable_cn ? decidable_ex.
+nlemma symmetric_andb8 : symmetricT byte8 byte8 and_b8.
+ #b1; #b2;
+ nelim b1;
+ nelim b2;
+ #e1; #e2; #e3; #e4;
+ nchange with ((mk_byte8 (and_ex e3 e1) (and_ex e4 e2)) = (mk_byte8 (and_ex e1 e3) (and_ex e2 e4)));
+ nrewrite > (symmetric_andex e1 e3);
+ nrewrite > (symmetric_andex e2 e4);
+ napply refl_eq.
+nqed.
-ndefinition neqb8_to_neq ≝ neqcn_to_neq ? eq_ex neqex_to_neq.
-ndefinition neq_to_neqb8 ≝ neq_to_neqcn ? eq_ex neq_to_neqex decidable_ex.
+nlemma associative_andb8 : ∀b1,b2,b3.(and_b8 (and_b8 b1 b2) b3) = (and_b8 b1 (and_b8 b2 b3)).
+ #b1; #b2; #b3;
+ nelim b1;
+ #e1; #e2;
+ nelim b2;
+ #e3; #e4;
+ nelim b3;
+ #e5; #e6;
+ nchange with (mk_byte8 (and_ex (and_ex e1 e3) e5) (and_ex (and_ex e2 e4) e6) =
+ mk_byte8 (and_ex e1 (and_ex e3 e5)) (and_ex e2 (and_ex e4 e6)));
+ nrewrite < (associative_andex e1 e3 e5);
+ nrewrite < (associative_andex e2 e4 e6);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_orb8 : symmetricT byte8 byte8 or_b8.
+ #b1; #b2;
+ nelim b1;
+ nelim b2;
+ #e1; #e2; #e3; #e4;
+ nchange with ((mk_byte8 (or_ex e3 e1) (or_ex e4 e2)) = (mk_byte8 (or_ex e1 e3) (or_ex e2 e4)));
+ nrewrite > (symmetric_orex e1 e3);
+ nrewrite > (symmetric_orex e2 e4);
+ napply refl_eq.
+nqed.
+
+nlemma associative_orb8 : ∀b1,b2,b3.(or_b8 (or_b8 b1 b2) b3) = (or_b8 b1 (or_b8 b2 b3)).
+ #b1; #b2; #b3;
+ nelim b1;
+ #e1; #e2;
+ nelim b2;
+ #e3; #e4;
+ nelim b3;
+ #e5; #e6;
+ nchange with (mk_byte8 (or_ex (or_ex e1 e3) e5) (or_ex (or_ex e2 e4) e6) =
+ mk_byte8 (or_ex e1 (or_ex e3 e5)) (or_ex e2 (or_ex e4 e6)));
+ nrewrite < (associative_orex e1 e3 e5);
+ nrewrite < (associative_orex e2 e4 e6);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_xorb8 : symmetricT byte8 byte8 xor_b8.
+ #b1; #b2;
+ nelim b1;
+ nelim b2;
+ #e1; #e2; #e3; #e4;
+ nchange with ((mk_byte8 (xor_ex e3 e1) (xor_ex e4 e2)) = (mk_byte8 (xor_ex e1 e3) (xor_ex e2 e4)));
+ nrewrite > (symmetric_xorex e1 e3);
+ nrewrite > (symmetric_xorex e2 e4);
+ napply refl_eq.
+nqed.
+
+nlemma associative_xorb8 : ∀b1,b2,b3.(xor_b8 (xor_b8 b1 b2) b3) = (xor_b8 b1 (xor_b8 b2 b3)).
+ #b1; #b2; #b3;
+ nelim b1;
+ #e1; #e2;
+ nelim b2;
+ #e3; #e4;
+ nelim b3;
+ #e5; #e6;
+ nchange with (mk_byte8 (xor_ex (xor_ex e1 e3) e5) (xor_ex (xor_ex e2 e4) e6) =
+ mk_byte8 (xor_ex e1 (xor_ex e3 e5)) (xor_ex e2 (xor_ex e4 e6)));
+ nrewrite < (associative_xorex e1 e3 e5);
+ nrewrite < (associative_xorex e2 e4 e6);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusb8_dc_dc : ∀b1,b2,c.plus_b8_dc_dc b1 b2 c = plus_b8_dc_dc b2 b1 c.
+ #b1; #b2; #c;
+ nelim b1;
+ #e1; #e2;
+ nelim b2;
+ #e3; #e4;
+ nchange with (
+ match plus_ex_dc_dc e2 e4 c with [ pair l c ⇒ match plus_ex_dc_dc e1 e3 c with [ pair h c' ⇒ pair … 〈h,l〉 c' ]] =
+ match plus_ex_dc_dc e4 e2 c with [ pair l c ⇒ match plus_ex_dc_dc e3 e1 c with [ pair h c' ⇒ pair … 〈h,l〉 c' ]]);
+ nrewrite > (symmetric_plusex_dc_dc e4 e2 c);
+ ncases (plus_ex_dc_dc e2 e4 c);
+ #e5; #c1;
+ nchange with (
+ match plus_ex_dc_dc e1 e3 c1 with [ pair h c' ⇒ pair … 〈h,e5〉 c' ] =
+ match plus_ex_dc_dc e3 e1 c1 with [ pair h c' ⇒ pair … 〈h,e5〉 c' ]);
+ nrewrite > (symmetric_plusex_dc_dc e1 e3 c1);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusb8_dc_d : ∀b1,b2,c.plus_b8_dc_d b1 b2 c = plus_b8_dc_d b2 b1 c.
+ #b1; #b2; #c;
+ nelim b1;
+ #e1; #e2;
+ nelim b2;
+ #e3; #e4;
+ nchange with (
+ match plus_ex_dc_dc e2 e4 c with [ pair l c ⇒ 〈plus_ex_dc_d e1 e3 c,l〉 ] =
+ match plus_ex_dc_dc e4 e2 c with [ pair l c ⇒ 〈plus_ex_dc_d e3 e1 c,l〉 ]);
+ nrewrite > (symmetric_plusex_dc_dc e4 e2 c);
+ ncases (plus_ex_dc_dc e2 e4 c);
+ #e5; #c1;
+ nchange with (〈plus_ex_dc_d e1 e3 c1,e5〉 = 〈plus_ex_dc_d e3 e1 c1,e5〉);
+ nrewrite > (symmetric_plusex_dc_d e1 e3 c1);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusb8_dc_c : ∀b1,b2,c.plus_b8_dc_c b1 b2 c = plus_b8_dc_c b2 b1 c.
+ #b1; #b2; #c;
+ nelim b1;
+ #e1; #e2;
+ nelim b2;
+ #e3; #e4;
+ nchange with (
+ plus_ex_dc_c e1 e3 (plus_ex_dc_c e2 e4 c) =
+ plus_ex_dc_c e3 e1 (plus_ex_dc_c e4 e2 c));
+ nrewrite > (symmetric_plusex_dc_c e4 e2 c);
+ nrewrite > (symmetric_plusex_dc_c e3 e1 (plus_ex_dc_c e2 e4 c));
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusb8_d_dc : ∀b1,b2.plus_b8_d_dc b1 b2 = plus_b8_d_dc b2 b1.
+ #b1; #b2;
+ nelim b1;
+ #e1; #e2;
+ nelim b2;
+ #e3; #e4;
+ nchange with (
+ match plus_ex_d_dc e2 e4 with [ pair l c ⇒ match plus_ex_dc_dc e1 e3 c with [ pair h c' ⇒ pair … 〈h,l〉 c' ]] =
+ match plus_ex_d_dc e4 e2 with [ pair l c ⇒ match plus_ex_dc_dc e3 e1 c with [ pair h c' ⇒ pair … 〈h,l〉 c' ]]);
+ nrewrite > (symmetric_plusex_d_dc e4 e2);
+ ncases (plus_ex_d_dc e2 e4);
+ #e5; #c;
+ nchange with (
+ match plus_ex_dc_dc e1 e3 c with [ pair h c' ⇒ pair … 〈h,e5〉 c' ] =
+ match plus_ex_dc_dc e3 e1 c with [ pair h c' ⇒ pair … 〈h,e5〉 c' ]);
+ nrewrite > (symmetric_plusex_dc_dc e1 e3 c);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusb8_d_d : ∀b1,b2.plus_b8_d_d b1 b2 = plus_b8_d_d b2 b1.
+ #b1; #b2;
+ nelim b1;
+ #e1; #e2;
+ nelim b2;
+ #e3; #e4;
+ nchange with (
+ match plus_ex_d_dc e2 e4 with [ pair l c ⇒ 〈plus_ex_dc_d e1 e3 c,l〉 ] =
+ match plus_ex_d_dc e4 e2 with [ pair l c ⇒ 〈plus_ex_dc_d e3 e1 c,l〉 ]);
+ nrewrite > (symmetric_plusex_d_dc e4 e2);
+ ncases (plus_ex_d_dc e2 e4);
+ #e5; #c;
+ nchange with (〈plus_ex_dc_d e1 e3 c,e5〉 = 〈plus_ex_dc_d e3 e1 c,e5〉);
+ nrewrite > (symmetric_plusex_dc_d e1 e3 c);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusb8_d_c : ∀b1,b2.plus_b8_d_c b1 b2 = plus_b8_d_c b2 b1.
+ #b1; #b2;
+ nelim b1;
+ #e1; #e2;
+ nelim b2;
+ #e3; #e4;
+ nchange with (
+ plus_ex_dc_c e1 e3 (plus_ex_d_c e2 e4) =
+ plus_ex_dc_c e3 e1 (plus_ex_d_c e4 e2));
+ nrewrite > (symmetric_plusex_d_c e4 e2);
+ nrewrite > (symmetric_plusex_dc_c e3 e1 (plus_ex_d_c e2 e4));
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_mulex : symmetricT exadecim byte8 mul_ex.
+ #e1; #e2;
+ nelim e1;
+ nelim e2;
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma eqb8_to_eq : ∀b1,b2:byte8.(eq_b8 b1 b2 = true) → (b1 = b2).
+ #b1; #b2;
+ nelim b1;
+ nelim b2;
+ #e1; #e2; #e3; #e4;
+ nchange in ⊢ (% → ?) with (((eq_ex e3 e1)⊗(eq_ex e4 e2)) = true);
+ #H;
+ nrewrite < (eqex_to_eq … (andb_true_true_l … H));
+ nrewrite < (eqex_to_eq … (andb_true_true_r … H));
+ napply refl_eq.
+nqed.
+
+nlemma eq_to_eqb8 : ∀b1,b2.b1 = b2 → eq_b8 b1 b2 = true.
+ #b1; #b2;
+ nelim b1;
+ nelim b2;
+ #e1; #e2; #e3; #e4;
+ #H;
+ nrewrite < (byte8_destruct_1 … H);
+ nrewrite < (byte8_destruct_2 … H);
+ nchange with (((eq_ex e3 e3)⊗(eq_ex e4 e4)) = true);
+ nrewrite > (eq_to_eqex e3 e3 (refl_eq …));
+ nrewrite > (eq_to_eqex e4 e4 (refl_eq …));
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma decidable_b8_aux1 : ∀e1,e2,e3,e4.e1 ≠ e3 → 〈e1,e2〉 ≠ 〈e3,e4〉.
+ #e1; #e2; #e3; #e4;
+ nnormalize; #H; #H1;
+ napply (H (byte8_destruct_1 … H1)).
+nqed.
+
+nlemma decidable_b8_aux2 : ∀e1,e2,e3,e4.e2 ≠ e4 → 〈e1,e2〉 ≠ 〈e3,e4〉.
+ #e1; #e2; #e3; #e4;
+ nnormalize; #H; #H1;
+ napply (H (byte8_destruct_2 … H1)).
+nqed.
+
+nlemma decidable_b8 : ∀x,y:byte8.decidable (x = y).
+ #x; nelim x; #e1; #e2;
+ #y; nelim y; #e3; #e4;
+ nnormalize;
+ napply (or2_elim (e1 = e3) (e1 ≠ e3) ? (decidable_ex e1 e3) …);
+ ##[ ##2: #H; napply (or2_intro2 … (decidable_b8_aux1 e1 e2 e3 e4 H))
+ ##| ##1: #H; napply (or2_elim (e2 = e4) (e2 ≠ e4) ? (decidable_ex e2 e4) …);
+ ##[ ##2: #H1; napply (or2_intro2 … (decidable_b8_aux2 e1 e2 e3 e4 H1))
+ ##| ##1: #H1; nrewrite > H; nrewrite > H1;
+ napply (or2_intro1 … (refl_eq ? 〈e3,e4〉))
+ ##]
+ ##]
+nqed.
+
+nlemma neqb8_to_neq : ∀b1,b2:byte8.(eq_b8 b1 b2 = false) → (b1 ≠ b2).
+ #b1; #b2;
+ nelim b1;
+ nelim b2;
+ #e1; #e2; #e3; #e4;
+ nchange with ((((eq_ex e3 e1) ⊗ (eq_ex e4 e2)) = false) → ?);
+ #H;
+ napply (or2_elim ((eq_ex e3 e1) = false) ((eq_ex e4 e2) = false) ? (andb_false2 … H) …);
+ ##[ ##1: #H1; napply (decidable_b8_aux1 … (neqex_to_neq … H1))
+ ##| ##2: #H1; napply (decidable_b8_aux2 … (neqex_to_neq … H1))
+ ##]
+nqed.
+
+nlemma byte8_destruct : ∀e1,e2,e3,e4.〈e1,e2〉 ≠ 〈e3,e4〉 → e1 ≠ e3 ∨ e2 ≠ e4.
+ #e1; #e2; #e3; #e4;
+ nnormalize; #H;
+ napply (or2_elim (e1 = e3) (e1 ≠ e3) ? (decidable_ex e1 e3) …);
+ ##[ ##2: #H1; napply (or2_intro1 … H1)
+ ##| ##1: #H1; napply (or2_elim (e2 = e4) (e2 ≠ e4) ? (decidable_ex e2 e4) …);
+ ##[ ##2: #H2; napply (or2_intro2 … H2)
+ ##| ##1: #H2; nrewrite > H1 in H:(%);
+ nrewrite > H2;
+ #H; nelim (H (refl_eq …))
+ ##]
+ ##]
+nqed.
+
+nlemma neq_to_neqb8 : ∀b1,b2.b1 ≠ b2 → eq_b8 b1 b2 = false.
+ #b1; #b2;
+ nelim b1; #e1; #e2;
+ nelim b2; #e3; #e4;
+ #H; nchange with (((eq_ex e1 e3) ⊗ (eq_ex e2 e4)) = false);
+ napply (or2_elim (e1 ≠ e3) (e2 ≠ e4) ? (byte8_destruct … H) …);
+ ##[ ##1: #H1; nrewrite > (neq_to_neqex … H1); nnormalize; napply refl_eq
+ ##| ##2: #H1; nrewrite > (neq_to_neqex … H1);
+ nrewrite > (symmetric_andbool (eq_ex e1 e3) false);
+ nnormalize; napply refl_eq
+ ##]
+nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/exadecim.ma".
-
-(* *********** *)
-(* ESADECIMALI *)
-(* *********** *)
-
-nrecord comp_num (T:Type) : Type ≝
- {
- cnH: T;
- cnL: T
- }.
-
-ndefinition forall_cn ≝
-λT.λf:(T → bool) → bool.λP.
- f (λh.
- f (λl.
- P (mk_comp_num T h l))).
-
-(* operatore = *)
-ndefinition eq2_cn ≝
-λT.λfeq:T → T → bool.
-λcn1,cn2:comp_num T.
- (feq (cnH ? cn1) (cnH ? cn2)) ⊗ (feq (cnL ? cn1) (cnL ? cn2)).
-
-ndefinition eq_cn ≝
-λT.λfeq:T → bool.
-λcn:comp_num T.
- (feq (cnH ? cn)) ⊗ (feq (cnL ? cn)).
-
-(* operatore < > *)
-ndefinition ltgt_cn ≝
-λT.λfeq:T → T → bool.λfltgt:T → T → bool.
-λcn1,cn2:comp_num T.
- (fltgt (cnH ? cn1) (cnH ? cn2)) ⊕
- ((feq (cnH ? cn1) (cnH ? cn2)) ⊗ (fltgt (cnL ? cn1) (cnL ? cn2))).
-
-(* operatore ≤ ≥ *)
-ndefinition lege_cn ≝
-λT.λfeq:T → T → bool.λfltgt:T → T → bool.λflege:T → T → bool.
-λcn1,cn2:comp_num T.
- (fltgt (cnH ? cn1) (cnH ? cn2)) ⊕
- ((feq (cnH ? cn1) (cnH ? cn2)) ⊗ (flege (cnL ? cn1) (cnL ? cn2))).
-
-(* operatore cn1 op cn2 *)
-ndefinition fop2_cn ≝
-λT.λfop:T → T → T.
-λcn1,cn2:comp_num T.
- mk_comp_num ? (fop (cnH ? cn1) (cnH ? cn2)) (fop (cnL ? cn1) (cnL ? cn2)).
-
-ndefinition fop_cn ≝
-λT.λfop:T → T.
-λcn:comp_num T.
- mk_comp_num ? (fop (cnH ? cn)) (fop (cnL ? cn)).
-
-(* operatore su parte high *)
-ndefinition getOPH_cn ≝
-λT.λf:T → bool.
-λcn:comp_num T.
- f (cnH ? cn).
-
-ndefinition setOPH_cn ≝
-λT.λf:T → T.
-λcn:comp_num T.
- mk_comp_num ? (f (cnH ? cn)) (cnL ? cn).
-
-(* operatore su parte low *)
-ndefinition getOPL_cn ≝
-λT.λf:T → bool.
-λcn:comp_num T.
- f (cnL ? cn).
-
-ndefinition setOPL_cn ≝
-λT.λf:T → T.
-λcn:comp_num T.
- mk_comp_num ? (cnH ? cn) (f (cnL ? cn)).
-
-(* operatore pred/succ *)
-ndefinition predsucc_cn ≝
-λT.λfz:T → bool.λfps:T → T.
-λcn:comp_num T.
- match fz (cnL ? cn) with
- [ true ⇒ mk_comp_num ? (fps (cnH ? cn)) (fps (cnL ? cn))
- | false ⇒ mk_comp_num ? (cnH ? cn) (fps (cnL ? cn)) ].
-
-(* operatore con carry applicato DX → SX *)
-ndefinition opcr2_cn ≝
-λT.λfopcr:bool → T → T → (ProdT bool T).
-λc:bool.λcn1,cn2:comp_num T.
- match fopcr c (cnH ? cn1) (cnH ? cn2) with
- [ pair c' cnh' ⇒ match fopcr c' (cnL ? cn1) (cnL ? cn2) with
- [ pair c'' cnl' ⇒ pair … c'' (mk_comp_num ? cnh' cnl') ]].
-
-ndefinition opcr_cn ≝
-λT.λfopcr:bool → T → (ProdT bool T).
-λc:bool.λcn:comp_num T.
- match fopcr c (cnH ? cn) with
- [ pair c' cnh' ⇒ match fopcr c' (cnL ? cn) with
- [ pair c'' cnl' ⇒ pair … c'' (mk_comp_num ? cnh' cnl') ]].
-
-(* operatore con carry applicato SX → DX *)
-ndefinition opcl2_cn ≝
-λT.λfopcl:bool → T → T → (ProdT bool T).
-λc:bool.λcn1,cn2:comp_num T.
- match fopcl c (cnL ? cn1) (cnL ? cn2) with
- [ pair c' cnl' ⇒ match fopcl c' (cnH ? cn1) (cnH ? cn2) with
- [ pair c'' cnh' ⇒ pair … c'' (mk_comp_num ? cnh' cnl') ]].
-
-ndefinition opcl_cn ≝
-λT.λfopcl:bool → T → (ProdT bool T).
-λc:bool.λcn:comp_num T.
- match fopcl c (cnL ? cn) with
- [ pair c' cnl' ⇒ match fopcl c' (cnH ? cn) with
- [ pair c'' cnh' ⇒ pair … c'' (mk_comp_num ? cnh' cnl') ]].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/comp_num.ma".
-include "num/bool_lemmas.ma".
-
-(* **** *)
-(* BYTE *)
-(* **** *)
-
-nlemma cn_destruct_1 :
-∀T.∀x1,x2,y1,y2:T.
- mk_comp_num T x1 y1 = mk_comp_num T x2 y2 → x1 = x2.
- #T; #x1; #x2; #y1; #y2; #H;
- nchange with (match mk_comp_num ? x2 y2 with [ mk_comp_num a _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma cn_destruct_2 :
-∀T.∀x1,x2,y1,y2:T.
- mk_comp_num T x1 y1 = mk_comp_num T x2 y2 → y1 = y2.
- #T; #x1; #x2; #y1; #y2; #H;
- nchange with (match mk_comp_num ? x2 y2 with [ mk_comp_num _ b ⇒ y1 = b ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_eqcn :
-∀T.∀feq:T → T → bool.
- (symmetricT T bool feq) →
- (symmetricT (comp_num T) bool (eq2_cn T feq)).
- #T; #feq; #H;
- #b1; nelim b1; #e1; #e2;
- #b2; nelim b2; #e3; #e4;
- nchange with (((feq e1 e3)⊗(feq e2 e4)) = ((feq e3 e1)⊗(feq e4 e2)));
- nrewrite > (H e1 e3);
- nrewrite > (H e2 e4);
- napply refl_eq.
-nqed.
-
-nlemma eqcn_to_eq :
-∀T.∀feq:T → T → bool.
- (∀x,y:T.(feq x y = true) → (x = y)) →
- (∀b1,b2:comp_num T.
- ((eq2_cn T feq b1 b2 = true) → (b1 = b2))).
- #T; #feq; #H; #b1; #b2;
- nelim b1; #e1; #e2;
- nelim b2; #e3; #e4;
- nchange in ⊢ (% → ?) with (((feq e1 e3)⊗(feq e2 e4)) = true);
- #H1;
- nrewrite < (H … (andb_true_true_l … H1));
- nrewrite < (H … (andb_true_true_r … H1));
- napply refl_eq.
-nqed.
-
-nlemma eq_to_eqcn :
-∀T.∀feq:T → T → bool.
- (∀x,y:T.(x = y) → (feq x y = true)) →
- (∀b1,b2:comp_num T.
- ((b1 = b2) → (eq2_cn T feq b1 b2 = true))).
- #T; #feq; #H; #b1; #b2;
- nelim b1; #e1; #e2;
- nelim b2; #e3; #e4;
- #H1;
- nrewrite < (cn_destruct_1 … H1);
- nrewrite < (cn_destruct_2 … H1);
- nchange with (((feq e1 e1)⊗(feq e2 e2)) = true);
- nrewrite > (H e1 e1 (refl_eq …));
- nrewrite > (H e2 e2 (refl_eq …));
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma decidable_cn_aux1 :
-∀T.∀e1,e2,e3,e4:T.e1 ≠ e3 → (mk_comp_num T e1 e2) ≠ (mk_comp_num T e3 e4).
- #T; #e1; #e2; #e3; #e4;
- nnormalize; #H; #H1;
- napply (H (cn_destruct_1 … H1)).
-nqed.
-
-nlemma decidable_cn_aux2 :
-∀T.∀e1,e2,e3,e4:T.e2 ≠ e4 → (mk_comp_num T e1 e2) ≠ (mk_comp_num T e3 e4).
- #T; #e1; #e2; #e3; #e4;
- nnormalize; #H; #H1;
- napply (H (cn_destruct_2 … H1)).
-nqed.
-
-nlemma decidable_cn :
-∀T.(∀x,y:T.decidable (x = y)) →
- (∀b1,b2:comp_num T.
- (decidable (b1 = b2))).
- #T; #H;
- #b1; nelim b1; #e1; #e2;
- #b2; nelim b2; #e3; #e4;
- nnormalize;
- napply (or2_elim (e1 = e3) (e1 ≠ e3) ? (H e1 e3) …);
- ##[ ##2: #H1; napply (or2_intro2 … (decidable_cn_aux1 T e1 e2 e3 e4 H1))
- ##| ##1: #H1; napply (or2_elim (e2 = e4) (e2 ≠ e4) ? (H e2 e4) …);
- ##[ ##2: #H2; napply (or2_intro2 … (decidable_cn_aux2 T e1 e2 e3 e4 H2))
- ##| ##1: #H2; nrewrite > H1; nrewrite > H2;
- napply (or2_intro1 … (refl_eq ? (mk_comp_num T e3 e4)))
- ##]
- ##]
-nqed.
-
-nlemma neqcn_to_neq :
-∀T.∀feq:T → T → bool.
- (∀x,y:T.(feq x y = false) → (x ≠ y)) →
- (∀b1,b2:comp_num T.
- ((eq2_cn T feq b1 b2 = false) → (b1 ≠ b2))).
- #T; #feq; #H; #b1; #b2;
- nelim b1; #e1; #e2;
- nelim b2; #e3; #e4;
- nchange with ((((feq e1 e3) ⊗ (feq e2 e4)) = false) → ?);
- #H1;
- napply (or2_elim ((feq e1 e3) = false) ((feq e2 e4) = false) ? (andb_false2 … H1) …);
- ##[ ##1: #H2; napply (decidable_cn_aux1 … (H … H2))
- ##| ##2: #H2; napply (decidable_cn_aux2 … (H … H2))
- ##]
-nqed.
-
-nlemma cn_destruct :
-∀T.(∀x,y:T.decidable (x = y)) →
- (∀e1,e2,e3,e4:T.
- ((mk_comp_num T e1 e2) ≠ (mk_comp_num T e3 e4)) →
- ((e1 ≠ e3) ∨ (e2 ≠ e4))).
- #T; #H; #e1; #e2; #e3; #e4;
- nnormalize; #H1;
- napply (or2_elim (e1 = e3) (e1 ≠ e3) ? (H e1 e3) …);
- ##[ ##2: #H2; napply (or2_intro1 … H2)
- ##| ##1: #H2; napply (or2_elim (e2 = e4) (e2 ≠ e4) ? (H e2 e4) …);
- ##[ ##2: #H3; napply (or2_intro2 … H3)
- ##| ##1: #H3; nrewrite > H2 in H1:(%);
- nrewrite > H3;
- #H1; nelim (H1 (refl_eq …))
- ##]
- ##]
-nqed.
-
-nlemma neq_to_neqcn :
-∀T.∀feq:T → T → bool.
- (∀x,y:T.(x ≠ y) → (feq x y = false)) →
- (∀x,y:T.decidable (x = y)) →
- (∀b1,b2:comp_num T.
- ((b1 ≠ b2) → (eq2_cn T feq b1 b2 = false))).
- #T; #feq; #H; #H1; #b1; #b2;
- nelim b1; #e1; #e2;
- nelim b2; #e3; #e4;
- #H2; nchange with (((feq e1 e3) ⊗ (feq e2 e4)) = false);
- napply (or2_elim (e1 ≠ e3) (e2 ≠ e4) ? (cn_destruct T H1 e1 e2 e3 e4 … H2) …);
- ##[ ##1: #H3; nrewrite > (H … H3); nnormalize; napply refl_eq
- ##| ##2: #H3; nrewrite > (H … H3);
- nrewrite > (symmetric_andbool (feq e1 e3) false);
- nnormalize; napply refl_eq
- ##]
-nqed.
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
include "num/quatern.ma".
include "num/oct.ma".
include "common/prod.ma".
+include "common/nat.ma".
(* *********** *)
(* ESADECIMALI *)
| xE: exadecim
| xF: exadecim.
-(* iteratore sugli esadecimali *)
-ndefinition forall_ex ≝ λP.
- P x0 ⊗ P x1 ⊗ P x2 ⊗ P x3 ⊗ P x4 ⊗ P x5 ⊗ P x6 ⊗ P x7 ⊗
- P x8 ⊗ P x9 ⊗ P xA ⊗ P xB ⊗ P xC ⊗ P xD ⊗ P xE ⊗ P xF.
-
(* operatore = *)
ndefinition eq_ex ≝
λe1,e2:exadecim.
| xC ⇒ x3 | xD ⇒ x2 | xE ⇒ x1 | xF ⇒ x0 ]
].
-(* operatore Most Significant Bit *)
-ndefinition getMSB_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ].
-
-ndefinition setMSB_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ x8 | x1 ⇒ x9 | x2 ⇒ xA | x3 ⇒ xB
- | x4 ⇒ xC | x5 ⇒ xD | x6 ⇒ xE | x7 ⇒ xF
- | x8 ⇒ x8 | x9 ⇒ x9 | xA ⇒ xA | xB ⇒ xB
- | xC ⇒ xC | xD ⇒ xD | xE ⇒ xE | xF ⇒ xF ].
-
-ndefinition clrMSB_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ x0 | x1 ⇒ x1 | x2 ⇒ x2 | x3 ⇒ x3
- | x4 ⇒ x4 | x5 ⇒ x5 | x6 ⇒ x6 | x7 ⇒ x7
- | x8 ⇒ x0 | x9 ⇒ x1 | xA ⇒ x2 | xB ⇒ x3
- | xC ⇒ x4 | xD ⇒ x5 | xE ⇒ x6 | xF ⇒ x7 ].
-
-(* operatore Least Significant Bit *)
-ndefinition getLSB_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ false | x1 ⇒ true | x2 ⇒ false | x3 ⇒ true
- | x4 ⇒ false | x5 ⇒ true | x6 ⇒ false | x7 ⇒ true
- | x8 ⇒ false | x9 ⇒ true | xA ⇒ false | xB ⇒ true
- | xC ⇒ false | xD ⇒ true | xE ⇒ false | xF ⇒ true ].
-
-ndefinition setLSB_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ x1 | x1 ⇒ x1 | x2 ⇒ x3 | x3 ⇒ x3
- | x4 ⇒ x5 | x5 ⇒ x5 | x6 ⇒ x7 | x7 ⇒ x7
- | x8 ⇒ x9 | x9 ⇒ x9 | xA ⇒ xB | xB ⇒ xB
- | xC ⇒ xD | xD ⇒ xD | xE ⇒ xF | xF ⇒ xF ].
-
-ndefinition clrLSB_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ x0 | x1 ⇒ x0 | x2 ⇒ x2 | x3 ⇒ x2
- | x4 ⇒ x4 | x5 ⇒ x4 | x6 ⇒ x6 | x7 ⇒ x6
- | x8 ⇒ x8 | x9 ⇒ x8 | xA ⇒ xA | xB ⇒ xA
- | xC ⇒ xC | xD ⇒ xC | xE ⇒ xE | xF ⇒ xE ].
-
(* operatore rotazione destra con carry *)
ndefinition rcr_ex ≝
-λc:bool.λe:exadecim.match c with
+λe:exadecim.λc:bool.match c with
[ true ⇒ match e with
- [ x0 ⇒ pair … false x8 | x1 ⇒ pair … true x8
- | x2 ⇒ pair … false x9 | x3 ⇒ pair … true x9
- | x4 ⇒ pair … false xA | x5 ⇒ pair … true xA
- | x6 ⇒ pair … false xB | x7 ⇒ pair … true xB
- | x8 ⇒ pair … false xC | x9 ⇒ pair … true xC
- | xA ⇒ pair … false xD | xB ⇒ pair … true xD
- | xC ⇒ pair … false xE | xD ⇒ pair … true xE
- | xE ⇒ pair … false xF | xF ⇒ pair … true xF ]
+ [ x0 ⇒ pair exadecim bool x8 false | x1 ⇒ pair exadecim bool x8 true
+ | x2 ⇒ pair exadecim bool x9 false | x3 ⇒ pair exadecim bool x9 true
+ | x4 ⇒ pair exadecim bool xA false | x5 ⇒ pair exadecim bool xA true
+ | x6 ⇒ pair exadecim bool xB false | x7 ⇒ pair exadecim bool xB true
+ | x8 ⇒ pair exadecim bool xC false | x9 ⇒ pair exadecim bool xC true
+ | xA ⇒ pair exadecim bool xD false | xB ⇒ pair exadecim bool xD true
+ | xC ⇒ pair exadecim bool xE false | xD ⇒ pair exadecim bool xE true
+ | xE ⇒ pair exadecim bool xF false | xF ⇒ pair exadecim bool xF true ]
| false ⇒ match e with
- [ x0 ⇒ pair … false x0 | x1 ⇒ pair … true x0
- | x2 ⇒ pair … false x1 | x3 ⇒ pair … true x1
- | x4 ⇒ pair … false x2 | x5 ⇒ pair … true x2
- | x6 ⇒ pair … false x3 | x7 ⇒ pair … true x3
- | x8 ⇒ pair … false x4 | x9 ⇒ pair … true x4
- | xA ⇒ pair … false x5 | xB ⇒ pair … true x5
- | xC ⇒ pair … false x6 | xD ⇒ pair … true x6
- | xE ⇒ pair … false x7 | xF ⇒ pair … true x7 ]
+ [ x0 ⇒ pair exadecim bool x0 false | x1 ⇒ pair exadecim bool x0 true
+ | x2 ⇒ pair exadecim bool x1 false | x3 ⇒ pair exadecim bool x1 true
+ | x4 ⇒ pair exadecim bool x2 false | x5 ⇒ pair exadecim bool x2 true
+ | x6 ⇒ pair exadecim bool x3 false | x7 ⇒ pair exadecim bool x3 true
+ | x8 ⇒ pair exadecim bool x4 false | x9 ⇒ pair exadecim bool x4 true
+ | xA ⇒ pair exadecim bool x5 false | xB ⇒ pair exadecim bool x5 true
+ | xC ⇒ pair exadecim bool x6 false | xD ⇒ pair exadecim bool x6 true
+ | xE ⇒ pair exadecim bool x7 false | xF ⇒ pair exadecim bool x7 true ]
].
(* operatore shift destro *)
ndefinition shr_ex ≝
λe:exadecim.match e with
- [ x0 ⇒ pair … false x0 | x1 ⇒ pair … true x0
- | x2 ⇒ pair … false x1 | x3 ⇒ pair … true x1
- | x4 ⇒ pair … false x2 | x5 ⇒ pair … true x2
- | x6 ⇒ pair … false x3 | x7 ⇒ pair … true x3
- | x8 ⇒ pair … false x4 | x9 ⇒ pair … true x4
- | xA ⇒ pair … false x5 | xB ⇒ pair … true x5
- | xC ⇒ pair … false x6 | xD ⇒ pair … true x6
- | xE ⇒ pair … false x7 | xF ⇒ pair … true x7 ].
+ [ x0 ⇒ pair exadecim bool x0 false | x1 ⇒ pair exadecim bool x0 true
+ | x2 ⇒ pair exadecim bool x1 false | x3 ⇒ pair exadecim bool x1 true
+ | x4 ⇒ pair exadecim bool x2 false | x5 ⇒ pair exadecim bool x2 true
+ | x6 ⇒ pair exadecim bool x3 false | x7 ⇒ pair exadecim bool x3 true
+ | x8 ⇒ pair exadecim bool x4 false | x9 ⇒ pair exadecim bool x4 true
+ | xA ⇒ pair exadecim bool x5 false | xB ⇒ pair exadecim bool x5 true
+ | xC ⇒ pair exadecim bool x6 false | xD ⇒ pair exadecim bool x6 true
+ | xE ⇒ pair exadecim bool x7 false | xF ⇒ pair exadecim bool x7 true ].
(* operatore rotazione destra *)
ndefinition ror_ex ≝
| x8 ⇒ x4 | x9 ⇒ xC | xA ⇒ x5 | xB ⇒ xD
| xC ⇒ x6 | xD ⇒ xE | xE ⇒ x7 | xF ⇒ xF ].
+(* operatore rotazione destra n-volte *)
+nlet rec ror_ex_n (e:exadecim) (n:nat) on n ≝
+ match n with
+ [ O ⇒ e
+ | S n' ⇒ ror_ex_n (ror_ex e) n' ].
+
(* operatore rotazione sinistra con carry *)
ndefinition rcl_ex ≝
-λc:bool.λe:exadecim.match c with
+λe:exadecim.λc:bool.match c with
[ true ⇒ match e with
- [ x0 ⇒ pair … false x1 | x1 ⇒ pair … false x3
- | x2 ⇒ pair … false x5 | x3 ⇒ pair … false x7
- | x4 ⇒ pair … false x9 | x5 ⇒ pair … false xB
- | x6 ⇒ pair … false xD | x7 ⇒ pair … false xF
- | x8 ⇒ pair … true x1 | x9 ⇒ pair … true x3
- | xA ⇒ pair … true x5 | xB ⇒ pair … true x7
- | xC ⇒ pair … true x9 | xD ⇒ pair … true xB
- | xE ⇒ pair … true xD | xF ⇒ pair … true xF ]
+ [ x0 ⇒ pair exadecim bool x1 false | x1 ⇒ pair exadecim bool x3 false
+ | x2 ⇒ pair exadecim bool x5 false | x3 ⇒ pair exadecim bool x7 false
+ | x4 ⇒ pair exadecim bool x9 false | x5 ⇒ pair exadecim bool xB false
+ | x6 ⇒ pair exadecim bool xD false | x7 ⇒ pair exadecim bool xF false
+ | x8 ⇒ pair exadecim bool x1 true | x9 ⇒ pair exadecim bool x3 true
+ | xA ⇒ pair exadecim bool x5 true | xB ⇒ pair exadecim bool x7 true
+ | xC ⇒ pair exadecim bool x9 true | xD ⇒ pair exadecim bool xB true
+ | xE ⇒ pair exadecim bool xD true | xF ⇒ pair exadecim bool xF true ]
| false ⇒ match e with
- [ x0 ⇒ pair … false x0 | x1 ⇒ pair … false x2
- | x2 ⇒ pair … false x4 | x3 ⇒ pair … false x6
- | x4 ⇒ pair … false x8 | x5 ⇒ pair … false xA
- | x6 ⇒ pair … false xC | x7 ⇒ pair … false xE
- | x8 ⇒ pair … true x0 | x9 ⇒ pair … true x2
- | xA ⇒ pair … true x4 | xB ⇒ pair … true x6
- | xC ⇒ pair … true x8 | xD ⇒ pair … true xA
- | xE ⇒ pair … true xC | xF ⇒ pair … true xE ]
+ [ x0 ⇒ pair exadecim bool x0 false | x1 ⇒ pair exadecim bool x2 false
+ | x2 ⇒ pair exadecim bool x4 false | x3 ⇒ pair exadecim bool x6 false
+ | x4 ⇒ pair exadecim bool x8 false | x5 ⇒ pair exadecim bool xA false
+ | x6 ⇒ pair exadecim bool xC false | x7 ⇒ pair exadecim bool xE false
+ | x8 ⇒ pair exadecim bool x0 true | x9 ⇒ pair exadecim bool x2 true
+ | xA ⇒ pair exadecim bool x4 true | xB ⇒ pair exadecim bool x6 true
+ | xC ⇒ pair exadecim bool x8 true | xD ⇒ pair exadecim bool xA true
+ | xE ⇒ pair exadecim bool xC true | xF ⇒ pair exadecim bool xE true ]
].
(* operatore shift sinistro *)
ndefinition shl_ex ≝
λe:exadecim.match e with
- [ x0 ⇒ pair … false x0 | x1 ⇒ pair … false x2
- | x2 ⇒ pair … false x4 | x3 ⇒ pair … false x6
- | x4 ⇒ pair … false x8 | x5 ⇒ pair … false xA
- | x6 ⇒ pair … false xC | x7 ⇒ pair … false xE
- | x8 ⇒ pair … true x0 | x9 ⇒ pair … true x2
- | xA ⇒ pair … true x4 | xB ⇒ pair … true x6
- | xC ⇒ pair … true x8 | xD ⇒ pair … true xA
- | xE ⇒ pair … true xC | xF ⇒ pair … true xE ].
+ [ x0 ⇒ pair exadecim bool x0 false | x1 ⇒ pair exadecim bool x2 false
+ | x2 ⇒ pair exadecim bool x4 false | x3 ⇒ pair exadecim bool x6 false
+ | x4 ⇒ pair exadecim bool x8 false | x5 ⇒ pair exadecim bool xA false
+ | x6 ⇒ pair exadecim bool xC false | x7 ⇒ pair exadecim bool xE false
+ | x8 ⇒ pair exadecim bool x0 true | x9 ⇒ pair exadecim bool x2 true
+ | xA ⇒ pair exadecim bool x4 true | xB ⇒ pair exadecim bool x6 true
+ | xC ⇒ pair exadecim bool x8 true | xD ⇒ pair exadecim bool xA true
+ | xE ⇒ pair exadecim bool xC true | xF ⇒ pair exadecim bool xE true ].
(* operatore rotazione sinistra *)
ndefinition rol_ex ≝
| x8 ⇒ x1 | x9 ⇒ x3 | xA ⇒ x5 | xB ⇒ x7
| xC ⇒ x9 | xD ⇒ xB | xE ⇒ xD | xF ⇒ xF ].
+(* operatore rotazione sinistra n-volte *)
+nlet rec rol_ex_n (e:exadecim) (n:nat) on n ≝
+ match n with
+ [ O ⇒ e
+ | S n' ⇒ rol_ex_n (rol_ex e) n' ].
+
(* operatore not/complemento a 1 *)
ndefinition not_ex ≝
λe:exadecim.match e with
(* operatore somma con data+carry → data+carry *)
ndefinition plus_ex_dc_dc ≝
-λc:bool.λe1,e2:exadecim.
+λe1,e2:exadecim.λc:bool.
match c with
[ true ⇒ match e1 with
[ x0 ⇒ match e2 with
- [ x0 ⇒ pair … false x1 | x1 ⇒ pair … false x2 | x2 ⇒ pair … false x3 | x3 ⇒ pair … false x4
- | x4 ⇒ pair … false x5 | x5 ⇒ pair … false x6 | x6 ⇒ pair … false x7 | x7 ⇒ pair … false x8
- | x8 ⇒ pair … false x9 | x9 ⇒ pair … false xA | xA ⇒ pair … false xB | xB ⇒ pair … false xC
- | xC ⇒ pair … false xD | xD ⇒ pair … false xE | xE ⇒ pair … false xF | xF ⇒ pair … true x0 ]
+ [ x0 ⇒ pair … x1 false | x1 ⇒ pair … x2 false | x2 ⇒ pair … x3 false | x3 ⇒ pair … x4 false
+ | x4 ⇒ pair … x5 false | x5 ⇒ pair … x6 false | x6 ⇒ pair … x7 false | x7 ⇒ pair … x8 false
+ | x8 ⇒ pair … x9 false | x9 ⇒ pair … xA false | xA ⇒ pair … xB false | xB ⇒ pair … xC false
+ | xC ⇒ pair … xD false | xD ⇒ pair … xE false | xE ⇒ pair … xF false | xF ⇒ pair … x0 true ]
| x1 ⇒ match e2 with
- [ x0 ⇒ pair … false x2 | x1 ⇒ pair … false x3 | x2 ⇒ pair … false x4 | x3 ⇒ pair … false x5
- | x4 ⇒ pair … false x6 | x5 ⇒ pair … false x7 | x6 ⇒ pair … false x8 | x7 ⇒ pair … false x9
- | x8 ⇒ pair … false xA | x9 ⇒ pair … false xB | xA ⇒ pair … false xC | xB ⇒ pair … false xD
- | xC ⇒ pair … false xE | xD ⇒ pair … false xF | xE ⇒ pair … true x0 | xF ⇒ pair … true x1 ]
+ [ x0 ⇒ pair … x2 false | x1 ⇒ pair … x3 false | x2 ⇒ pair … x4 false | x3 ⇒ pair … x5 false
+ | x4 ⇒ pair … x6 false | x5 ⇒ pair … x7 false | x6 ⇒ pair … x8 false | x7 ⇒ pair … x9 false
+ | x8 ⇒ pair … xA false | x9 ⇒ pair … xB false | xA ⇒ pair … xC false | xB ⇒ pair … xD false
+ | xC ⇒ pair … xE false | xD ⇒ pair … xF false | xE ⇒ pair … x0 true | xF ⇒ pair … x1 true ]
| x2 ⇒ match e2 with
- [ x0 ⇒ pair … false x3 | x1 ⇒ pair … false x4 | x2 ⇒ pair … false x5 | x3 ⇒ pair … false x6
- | x4 ⇒ pair … false x7 | x5 ⇒ pair … false x8 | x6 ⇒ pair … false x9 | x7 ⇒ pair … false xA
- | x8 ⇒ pair … false xB | x9 ⇒ pair … false xC | xA ⇒ pair … false xD | xB ⇒ pair … false xE
- | xC ⇒ pair … false xF | xD ⇒ pair … true x0 | xE ⇒ pair … true x1 | xF ⇒ pair … true x2 ]
+ [ x0 ⇒ pair … x3 false | x1 ⇒ pair … x4 false | x2 ⇒ pair … x5 false | x3 ⇒ pair … x6 false
+ | x4 ⇒ pair … x7 false | x5 ⇒ pair … x8 false | x6 ⇒ pair … x9 false | x7 ⇒ pair … xA false
+ | x8 ⇒ pair … xB false | x9 ⇒ pair … xC false | xA ⇒ pair … xD false | xB ⇒ pair … xE false
+ | xC ⇒ pair … xF false | xD ⇒ pair … x0 true | xE ⇒ pair … x1 true | xF ⇒ pair … x2 true ]
| x3 ⇒ match e2 with
- [ x0 ⇒ pair … false x4 | x1 ⇒ pair … false x5 | x2 ⇒ pair … false x6 | x3 ⇒ pair … false x7
- | x4 ⇒ pair … false x8 | x5 ⇒ pair … false x9 | x6 ⇒ pair … false xA | x7 ⇒ pair … false xB
- | x8 ⇒ pair … false xC | x9 ⇒ pair … false xD | xA ⇒ pair … false xE | xB ⇒ pair … false xF
- | xC ⇒ pair … true x0 | xD ⇒ pair … true x1 | xE ⇒ pair … true x2 | xF ⇒ pair … true x3 ]
+ [ x0 ⇒ pair … x4 false | x1 ⇒ pair … x5 false | x2 ⇒ pair … x6 false | x3 ⇒ pair … x7 false
+ | x4 ⇒ pair … x8 false | x5 ⇒ pair … x9 false | x6 ⇒ pair … xA false | x7 ⇒ pair … xB false
+ | x8 ⇒ pair … xC false | x9 ⇒ pair … xD false | xA ⇒ pair … xE false | xB ⇒ pair … xF false
+ | xC ⇒ pair … x0 true | xD ⇒ pair … x1 true | xE ⇒ pair … x2 true | xF ⇒ pair … x3 true ]
| x4 ⇒ match e2 with
- [ x0 ⇒ pair … false x5 | x1 ⇒ pair … false x6 | x2 ⇒ pair … false x7 | x3 ⇒ pair … false x8
- | x4 ⇒ pair … false x9 | x5 ⇒ pair … false xA | x6 ⇒ pair … false xB | x7 ⇒ pair … false xC
- | x8 ⇒ pair … false xD | x9 ⇒ pair … false xE | xA ⇒ pair … false xF | xB ⇒ pair … true x0
- | xC ⇒ pair … true x1 | xD ⇒ pair … true x2 | xE ⇒ pair … true x3 | xF ⇒ pair … true x4 ]
+ [ x0 ⇒ pair … x5 false | x1 ⇒ pair … x6 false | x2 ⇒ pair … x7 false | x3 ⇒ pair … x8 false
+ | x4 ⇒ pair … x9 false | x5 ⇒ pair … xA false | x6 ⇒ pair … xB false | x7 ⇒ pair … xC false
+ | x8 ⇒ pair … xD false | x9 ⇒ pair … xE false | xA ⇒ pair … xF false | xB ⇒ pair … x0 true
+ | xC ⇒ pair … x1 true | xD ⇒ pair … x2 true | xE ⇒ pair … x3 true | xF ⇒ pair … x4 true ]
| x5 ⇒ match e2 with
- [ x0 ⇒ pair … false x6 | x1 ⇒ pair … false x7 | x2 ⇒ pair … false x8 | x3 ⇒ pair … false x9
- | x4 ⇒ pair … false xA | x5 ⇒ pair … false xB | x6 ⇒ pair … false xC | x7 ⇒ pair … false xD
- | x8 ⇒ pair … false xE | x9 ⇒ pair … false xF | xA ⇒ pair … true x0 | xB ⇒ pair … true x1
- | xC ⇒ pair … true x2 | xD ⇒ pair … true x3 | xE ⇒ pair … true x4 | xF ⇒ pair … true x5 ]
+ [ x0 ⇒ pair … x6 false | x1 ⇒ pair … x7 false | x2 ⇒ pair … x8 false | x3 ⇒ pair … x9 false
+ | x4 ⇒ pair … xA false | x5 ⇒ pair … xB false | x6 ⇒ pair … xC false | x7 ⇒ pair … xD false
+ | x8 ⇒ pair … xE false | x9 ⇒ pair … xF false | xA ⇒ pair … x0 true | xB ⇒ pair … x1 true
+ | xC ⇒ pair … x2 true | xD ⇒ pair … x3 true | xE ⇒ pair … x4 true | xF ⇒ pair … x5 true ]
| x6 ⇒ match e2 with
- [ x0 ⇒ pair … false x7 | x1 ⇒ pair … false x8 | x2 ⇒ pair … false x9 | x3 ⇒ pair … false xA
- | x4 ⇒ pair … false xB | x5 ⇒ pair … false xC | x6 ⇒ pair … false xD | x7 ⇒ pair … false xE
- | x8 ⇒ pair … false xF | x9 ⇒ pair … true x0 | xA ⇒ pair … true x1 | xB ⇒ pair … true x2
- | xC ⇒ pair … true x3 | xD ⇒ pair … true x4 | xE ⇒ pair … true x5 | xF ⇒ pair … true x6 ]
+ [ x0 ⇒ pair … x7 false | x1 ⇒ pair … x8 false | x2 ⇒ pair … x9 false | x3 ⇒ pair … xA false
+ | x4 ⇒ pair … xB false | x5 ⇒ pair … xC false | x6 ⇒ pair … xD false | x7 ⇒ pair … xE false
+ | x8 ⇒ pair … xF false | x9 ⇒ pair … x0 true | xA ⇒ pair … x1 true | xB ⇒ pair … x2 true
+ | xC ⇒ pair … x3 true | xD ⇒ pair … x4 true | xE ⇒ pair … x5 true | xF ⇒ pair … x6 true ]
| x7 ⇒ match e2 with
- [ x0 ⇒ pair … false x8 | x1 ⇒ pair … false x9 | x2 ⇒ pair … false xA | x3 ⇒ pair … false xB
- | x4 ⇒ pair … false xC | x5 ⇒ pair … false xD | x6 ⇒ pair … false xE | x7 ⇒ pair … false xF
- | x8 ⇒ pair … true x0 | x9 ⇒ pair … true x1 | xA ⇒ pair … true x2 | xB ⇒ pair … true x3
- | xC ⇒ pair … true x4 | xD ⇒ pair … true x5 | xE ⇒ pair … true x6 | xF ⇒ pair … true x7 ]
+ [ x0 ⇒ pair … x8 false | x1 ⇒ pair … x9 false | x2 ⇒ pair … xA false | x3 ⇒ pair … xB false
+ | x4 ⇒ pair … xC false | x5 ⇒ pair … xD false | x6 ⇒ pair … xE false | x7 ⇒ pair … xF false
+ | x8 ⇒ pair … x0 true | x9 ⇒ pair … x1 true | xA ⇒ pair … x2 true | xB ⇒ pair … x3 true
+ | xC ⇒ pair … x4 true | xD ⇒ pair … x5 true | xE ⇒ pair … x6 true | xF ⇒ pair … x7 true ]
| x8 ⇒ match e2 with
- [ x0 ⇒ pair … false x9 | x1 ⇒ pair … false xA | x2 ⇒ pair … false xB | x3 ⇒ pair … false xC
- | x4 ⇒ pair … false xD | x5 ⇒ pair … false xE | x6 ⇒ pair … false xF | x7 ⇒ pair … true x0
- | x8 ⇒ pair … true x1 | x9 ⇒ pair … true x2 | xA ⇒ pair … true x3 | xB ⇒ pair … true x4
- | xC ⇒ pair … true x5 | xD ⇒ pair … true x6 | xE ⇒ pair … true x7 | xF ⇒ pair … true x8 ]
+ [ x0 ⇒ pair … x9 false | x1 ⇒ pair … xA false | x2 ⇒ pair … xB false | x3 ⇒ pair … xC false
+ | x4 ⇒ pair … xD false | x5 ⇒ pair … xE false | x6 ⇒ pair … xF false | x7 ⇒ pair … x0 true
+ | x8 ⇒ pair … x1 true | x9 ⇒ pair … x2 true | xA ⇒ pair … x3 true | xB ⇒ pair … x4 true
+ | xC ⇒ pair … x5 true | xD ⇒ pair … x6 true | xE ⇒ pair … x7 true | xF ⇒ pair … x8 true ]
| x9 ⇒ match e2 with
- [ x0 ⇒ pair … false xA | x1 ⇒ pair … false xB | x2 ⇒ pair … false xC | x3 ⇒ pair … false xD
- | x4 ⇒ pair … false xE | x5 ⇒ pair … false xF | x6 ⇒ pair … true x0 | x7 ⇒ pair … true x1
- | x8 ⇒ pair … true x2 | x9 ⇒ pair … true x3 | xA ⇒ pair … true x4 | xB ⇒ pair … true x5
- | xC ⇒ pair … true x6 | xD ⇒ pair … true x7 | xE ⇒ pair … true x8 | xF ⇒ pair … true x9 ]
+ [ x0 ⇒ pair … xA false | x1 ⇒ pair … xB false | x2 ⇒ pair … xC false | x3 ⇒ pair … xD false
+ | x4 ⇒ pair … xE false | x5 ⇒ pair … xF false | x6 ⇒ pair … x0 true | x7 ⇒ pair … x1 true
+ | x8 ⇒ pair … x2 true | x9 ⇒ pair … x3 true | xA ⇒ pair … x4 true | xB ⇒ pair … x5 true
+ | xC ⇒ pair … x6 true | xD ⇒ pair … x7 true | xE ⇒ pair … x8 true | xF ⇒ pair … x9 true ]
| xA ⇒ match e2 with
- [ x0 ⇒ pair … false xB | x1 ⇒ pair … false xC | x2 ⇒ pair … false xD | x3 ⇒ pair … false xE
- | x4 ⇒ pair … false xF | x5 ⇒ pair … true x0 | x6 ⇒ pair … true x1 | x7 ⇒ pair … true x2
- | x8 ⇒ pair … true x3 | x9 ⇒ pair … true x4 | xA ⇒ pair … true x5 | xB ⇒ pair … true x6
- | xC ⇒ pair … true x7 | xD ⇒ pair … true x8 | xE ⇒ pair … true x9 | xF ⇒ pair … true xA ]
+ [ x0 ⇒ pair … xB false | x1 ⇒ pair … xC false | x2 ⇒ pair … xD false | x3 ⇒ pair … xE false
+ | x4 ⇒ pair … xF false | x5 ⇒ pair … x0 true | x6 ⇒ pair … x1 true | x7 ⇒ pair … x2 true
+ | x8 ⇒ pair … x3 true | x9 ⇒ pair … x4 true | xA ⇒ pair … x5 true | xB ⇒ pair … x6 true
+ | xC ⇒ pair … x7 true | xD ⇒ pair … x8 true | xE ⇒ pair … x9 true | xF ⇒ pair … xA true ]
| xB ⇒ match e2 with
- [ x0 ⇒ pair … false xC | x1 ⇒ pair … false xD | x2 ⇒ pair … false xE | x3 ⇒ pair … false xF
- | x4 ⇒ pair … true x0 | x5 ⇒ pair … true x1 | x6 ⇒ pair … true x2 | x7 ⇒ pair … true x3
- | x8 ⇒ pair … true x4 | x9 ⇒ pair … true x5 | xA ⇒ pair … true x6 | xB ⇒ pair … true x7
- | xC ⇒ pair … true x8 | xD ⇒ pair … true x9 | xE ⇒ pair … true xA | xF ⇒ pair … true xB ]
+ [ x0 ⇒ pair … xC false | x1 ⇒ pair … xD false | x2 ⇒ pair … xE false | x3 ⇒ pair … xF false
+ | x4 ⇒ pair … x0 true | x5 ⇒ pair … x1 true | x6 ⇒ pair … x2 true | x7 ⇒ pair … x3 true
+ | x8 ⇒ pair … x4 true | x9 ⇒ pair … x5 true | xA ⇒ pair … x6 true | xB ⇒ pair … x7 true
+ | xC ⇒ pair … x8 true | xD ⇒ pair … x9 true | xE ⇒ pair … xA true | xF ⇒ pair … xB true ]
| xC ⇒ match e2 with
- [ x0 ⇒ pair … false xD | x1 ⇒ pair … false xE | x2 ⇒ pair … false xF | x3 ⇒ pair … true x0
- | x4 ⇒ pair … true x1 | x5 ⇒ pair … true x2 | x6 ⇒ pair … true x3 | x7 ⇒ pair … true x4
- | x8 ⇒ pair … true x5 | x9 ⇒ pair … true x6 | xA ⇒ pair … true x7 | xB ⇒ pair … true x8
- | xC ⇒ pair … true x9 | xD ⇒ pair … true xA | xE ⇒ pair … true xB | xF ⇒ pair … true xC ]
+ [ x0 ⇒ pair … xD false | x1 ⇒ pair … xE false | x2 ⇒ pair … xF false | x3 ⇒ pair … x0 true
+ | x4 ⇒ pair … x1 true | x5 ⇒ pair … x2 true | x6 ⇒ pair … x3 true | x7 ⇒ pair … x4 true
+ | x8 ⇒ pair … x5 true | x9 ⇒ pair … x6 true | xA ⇒ pair … x7 true | xB ⇒ pair … x8 true
+ | xC ⇒ pair … x9 true | xD ⇒ pair … xA true | xE ⇒ pair … xB true | xF ⇒ pair … xC true ]
| xD ⇒ match e2 with
- [ x0 ⇒ pair … false xE | x1 ⇒ pair … false xF | x2 ⇒ pair … true x0 | x3 ⇒ pair … true x1
- | x4 ⇒ pair … true x2 | x5 ⇒ pair … true x3 | x6 ⇒ pair … true x4 | x7 ⇒ pair … true x5
- | x8 ⇒ pair … true x6 | x9 ⇒ pair … true x7 | xA ⇒ pair … true x8 | xB ⇒ pair … true x9
- | xC ⇒ pair … true xA | xD ⇒ pair … true xB | xE ⇒ pair … true xC | xF ⇒ pair … true xD ]
+ [ x0 ⇒ pair … xE false | x1 ⇒ pair … xF false | x2 ⇒ pair … x0 true | x3 ⇒ pair … x1 true
+ | x4 ⇒ pair … x2 true | x5 ⇒ pair … x3 true | x6 ⇒ pair … x4 true | x7 ⇒ pair … x5 true
+ | x8 ⇒ pair … x6 true | x9 ⇒ pair … x7 true | xA ⇒ pair … x8 true | xB ⇒ pair … x9 true
+ | xC ⇒ pair … xA true | xD ⇒ pair … xB true | xE ⇒ pair … xC true | xF ⇒ pair … xD true ]
| xE ⇒ match e2 with
- [ x0 ⇒ pair … false xF | x1 ⇒ pair … true x0 | x2 ⇒ pair … true x1 | x3 ⇒ pair … true x2
- | x4 ⇒ pair … true x3 | x5 ⇒ pair … true x4 | x6 ⇒ pair … true x5 | x7 ⇒ pair … true x6
- | x8 ⇒ pair … true x7 | x9 ⇒ pair … true x8 | xA ⇒ pair … true x9 | xB ⇒ pair … true xA
- | xC ⇒ pair … true xB | xD ⇒ pair … true xC | xE ⇒ pair … true xD | xF ⇒ pair … true xE ]
+ [ x0 ⇒ pair … xF false | x1 ⇒ pair … x0 true | x2 ⇒ pair … x1 true | x3 ⇒ pair … x2 true
+ | x4 ⇒ pair … x3 true | x5 ⇒ pair … x4 true | x6 ⇒ pair … x5 true | x7 ⇒ pair … x6 true
+ | x8 ⇒ pair … x7 true | x9 ⇒ pair … x8 true | xA ⇒ pair … x9 true | xB ⇒ pair … xA true
+ | xC ⇒ pair … xB true | xD ⇒ pair … xC true | xE ⇒ pair … xD true | xF ⇒ pair … xE true ]
| xF ⇒ match e2 with
- [ x0 ⇒ pair … true x0 | x1 ⇒ pair … true x1 | x2 ⇒ pair … true x2 | x3 ⇒ pair … true x3
- | x4 ⇒ pair … true x4 | x5 ⇒ pair … true x5 | x6 ⇒ pair … true x6 | x7 ⇒ pair … true x7
- | x8 ⇒ pair … true x8 | x9 ⇒ pair … true x9 | xA ⇒ pair … true xA | xB ⇒ pair … true xB
- | xC ⇒ pair … true xC | xD ⇒ pair … true xD | xE ⇒ pair … true xE | xF ⇒ pair … true xF ]
+ [ x0 ⇒ pair … x0 true | x1 ⇒ pair … x1 true | x2 ⇒ pair … x2 true | x3 ⇒ pair … x3 true
+ | x4 ⇒ pair … x4 true | x5 ⇒ pair … x5 true | x6 ⇒ pair … x6 true | x7 ⇒ pair … x7 true
+ | x8 ⇒ pair … x8 true | x9 ⇒ pair … x9 true | xA ⇒ pair … xA true | xB ⇒ pair … xB true
+ | xC ⇒ pair … xC true | xD ⇒ pair … xD true | xE ⇒ pair … xE true | xF ⇒ pair … xF true ]
]
| false ⇒ match e1 with
[ x0 ⇒ match e2 with
- [ x0 ⇒ pair … false x0 | x1 ⇒ pair … false x1 | x2 ⇒ pair … false x2 | x3 ⇒ pair … false x3
- | x4 ⇒ pair … false x4 | x5 ⇒ pair … false x5 | x6 ⇒ pair … false x6 | x7 ⇒ pair … false x7
- | x8 ⇒ pair … false x8 | x9 ⇒ pair … false x9 | xA ⇒ pair … false xA | xB ⇒ pair … false xB
- | xC ⇒ pair … false xC | xD ⇒ pair … false xD | xE ⇒ pair … false xE | xF ⇒ pair … false xF ]
+ [ x0 ⇒ pair … x0 false | x1 ⇒ pair … x1 false | x2 ⇒ pair … x2 false | x3 ⇒ pair … x3 false
+ | x4 ⇒ pair … x4 false | x5 ⇒ pair … x5 false | x6 ⇒ pair … x6 false | x7 ⇒ pair … x7 false
+ | x8 ⇒ pair … x8 false | x9 ⇒ pair … x9 false | xA ⇒ pair … xA false | xB ⇒ pair … xB false
+ | xC ⇒ pair … xC false | xD ⇒ pair … xD false | xE ⇒ pair … xE false | xF ⇒ pair … xF false ]
| x1 ⇒ match e2 with
- [ x0 ⇒ pair … false x1 | x1 ⇒ pair … false x2 | x2 ⇒ pair … false x3 | x3 ⇒ pair … false x4
- | x4 ⇒ pair … false x5 | x5 ⇒ pair … false x6 | x6 ⇒ pair … false x7 | x7 ⇒ pair … false x8
- | x8 ⇒ pair … false x9 | x9 ⇒ pair … false xA | xA ⇒ pair … false xB | xB ⇒ pair … false xC
- | xC ⇒ pair … false xD | xD ⇒ pair … false xE | xE ⇒ pair … false xF | xF ⇒ pair … true x0 ]
+ [ x0 ⇒ pair … x1 false | x1 ⇒ pair … x2 false | x2 ⇒ pair … x3 false | x3 ⇒ pair … x4 false
+ | x4 ⇒ pair … x5 false | x5 ⇒ pair … x6 false | x6 ⇒ pair … x7 false | x7 ⇒ pair … x8 false
+ | x8 ⇒ pair … x9 false | x9 ⇒ pair … xA false | xA ⇒ pair … xB false | xB ⇒ pair … xC false
+ | xC ⇒ pair … xD false | xD ⇒ pair … xE false | xE ⇒ pair … xF false | xF ⇒ pair … x0 true ]
| x2 ⇒ match e2 with
- [ x0 ⇒ pair … false x2 | x1 ⇒ pair … false x3 | x2 ⇒ pair … false x4 | x3 ⇒ pair … false x5
- | x4 ⇒ pair … false x6 | x5 ⇒ pair … false x7 | x6 ⇒ pair … false x8 | x7 ⇒ pair … false x9
- | x8 ⇒ pair … false xA | x9 ⇒ pair … false xB | xA ⇒ pair … false xC | xB ⇒ pair … false xD
- | xC ⇒ pair … false xE | xD ⇒ pair … false xF | xE ⇒ pair … true x0 | xF ⇒ pair … true x1 ]
+ [ x0 ⇒ pair … x2 false | x1 ⇒ pair … x3 false | x2 ⇒ pair … x4 false | x3 ⇒ pair … x5 false
+ | x4 ⇒ pair … x6 false | x5 ⇒ pair … x7 false | x6 ⇒ pair … x8 false | x7 ⇒ pair … x9 false
+ | x8 ⇒ pair … xA false | x9 ⇒ pair … xB false | xA ⇒ pair … xC false | xB ⇒ pair … xD false
+ | xC ⇒ pair … xE false | xD ⇒ pair … xF false | xE ⇒ pair … x0 true | xF ⇒ pair … x1 true ]
| x3 ⇒ match e2 with
- [ x0 ⇒ pair … false x3 | x1 ⇒ pair … false x4 | x2 ⇒ pair … false x5 | x3 ⇒ pair … false x6
- | x4 ⇒ pair … false x7 | x5 ⇒ pair … false x8 | x6 ⇒ pair … false x9 | x7 ⇒ pair … false xA
- | x8 ⇒ pair … false xB | x9 ⇒ pair … false xC | xA ⇒ pair … false xD | xB ⇒ pair … false xE
- | xC ⇒ pair … false xF | xD ⇒ pair … true x0 | xE ⇒ pair … true x1 | xF ⇒ pair … true x2 ]
+ [ x0 ⇒ pair … x3 false | x1 ⇒ pair … x4 false | x2 ⇒ pair … x5 false | x3 ⇒ pair … x6 false
+ | x4 ⇒ pair … x7 false | x5 ⇒ pair … x8 false | x6 ⇒ pair … x9 false | x7 ⇒ pair … xA false
+ | x8 ⇒ pair … xB false | x9 ⇒ pair … xC false | xA ⇒ pair … xD false | xB ⇒ pair … xE false
+ | xC ⇒ pair … xF false | xD ⇒ pair … x0 true | xE ⇒ pair … x1 true | xF ⇒ pair … x2 true ]
| x4 ⇒ match e2 with
- [ x0 ⇒ pair … false x4 | x1 ⇒ pair … false x5 | x2 ⇒ pair … false x6 | x3 ⇒ pair … false x7
- | x4 ⇒ pair … false x8 | x5 ⇒ pair … false x9 | x6 ⇒ pair … false xA | x7 ⇒ pair … false xB
- | x8 ⇒ pair … false xC | x9 ⇒ pair … false xD | xA ⇒ pair … false xE | xB ⇒ pair … false xF
- | xC ⇒ pair … true x0 | xD ⇒ pair … true x1 | xE ⇒ pair … true x2 | xF ⇒ pair … true x3 ]
+ [ x0 ⇒ pair … x4 false | x1 ⇒ pair … x5 false | x2 ⇒ pair … x6 false | x3 ⇒ pair … x7 false
+ | x4 ⇒ pair … x8 false | x5 ⇒ pair … x9 false | x6 ⇒ pair … xA false | x7 ⇒ pair … xB false
+ | x8 ⇒ pair … xC false | x9 ⇒ pair … xD false | xA ⇒ pair … xE false | xB ⇒ pair … xF false
+ | xC ⇒ pair … x0 true | xD ⇒ pair … x1 true | xE ⇒ pair … x2 true | xF ⇒ pair … x3 true ]
| x5 ⇒ match e2 with
- [ x0 ⇒ pair … false x5 | x1 ⇒ pair … false x6 | x2 ⇒ pair … false x7 | x3 ⇒ pair … false x8
- | x4 ⇒ pair … false x9 | x5 ⇒ pair … false xA | x6 ⇒ pair … false xB | x7 ⇒ pair … false xC
- | x8 ⇒ pair … false xD | x9 ⇒ pair … false xE | xA ⇒ pair … false xF | xB ⇒ pair … true x0
- | xC ⇒ pair … true x1 | xD ⇒ pair … true x2 | xE ⇒ pair … true x3 | xF ⇒ pair … true x4 ]
+ [ x0 ⇒ pair … x5 false | x1 ⇒ pair … x6 false | x2 ⇒ pair … x7 false | x3 ⇒ pair … x8 false
+ | x4 ⇒ pair … x9 false | x5 ⇒ pair … xA false | x6 ⇒ pair … xB false | x7 ⇒ pair … xC false
+ | x8 ⇒ pair … xD false | x9 ⇒ pair … xE false | xA ⇒ pair … xF false | xB ⇒ pair … x0 true
+ | xC ⇒ pair … x1 true | xD ⇒ pair … x2 true | xE ⇒ pair … x3 true | xF ⇒ pair … x4 true ]
| x6 ⇒ match e2 with
- [ x0 ⇒ pair … false x6 | x1 ⇒ pair … false x7 | x2 ⇒ pair … false x8 | x3 ⇒ pair … false x9
- | x4 ⇒ pair … false xA | x5 ⇒ pair … false xB | x6 ⇒ pair … false xC | x7 ⇒ pair … false xD
- | x8 ⇒ pair … false xE | x9 ⇒ pair … false xF | xA ⇒ pair … true x0 | xB ⇒ pair … true x1
- | xC ⇒ pair … true x2 | xD ⇒ pair … true x3 | xE ⇒ pair … true x4 | xF ⇒ pair … true x5 ]
+ [ x0 ⇒ pair … x6 false | x1 ⇒ pair … x7 false | x2 ⇒ pair … x8 false | x3 ⇒ pair … x9 false
+ | x4 ⇒ pair … xA false | x5 ⇒ pair … xB false | x6 ⇒ pair … xC false | x7 ⇒ pair … xD false
+ | x8 ⇒ pair … xE false | x9 ⇒ pair … xF false | xA ⇒ pair … x0 true | xB ⇒ pair … x1 true
+ | xC ⇒ pair … x2 true | xD ⇒ pair … x3 true | xE ⇒ pair … x4 true | xF ⇒ pair … x5 true ]
| x7 ⇒ match e2 with
- [ x0 ⇒ pair … false x7 | x1 ⇒ pair … false x8 | x2 ⇒ pair … false x9 | x3 ⇒ pair … false xA
- | x4 ⇒ pair … false xB | x5 ⇒ pair … false xC | x6 ⇒ pair … false xD | x7 ⇒ pair … false xE
- | x8 ⇒ pair … false xF | x9 ⇒ pair … true x0 | xA ⇒ pair … true x1 | xB ⇒ pair … true x2
- | xC ⇒ pair … true x3 | xD ⇒ pair … true x4 | xE ⇒ pair … true x5 | xF ⇒ pair … true x6 ]
+ [ x0 ⇒ pair … x7 false | x1 ⇒ pair … x8 false | x2 ⇒ pair … x9 false | x3 ⇒ pair … xA false
+ | x4 ⇒ pair … xB false | x5 ⇒ pair … xC false | x6 ⇒ pair … xD false | x7 ⇒ pair … xE false
+ | x8 ⇒ pair … xF false | x9 ⇒ pair … x0 true | xA ⇒ pair … x1 true | xB ⇒ pair … x2 true
+ | xC ⇒ pair … x3 true | xD ⇒ pair … x4 true | xE ⇒ pair … x5 true | xF ⇒ pair … x6 true ]
| x8 ⇒ match e2 with
- [ x0 ⇒ pair … false x8 | x1 ⇒ pair … false x9 | x2 ⇒ pair … false xA | x3 ⇒ pair … false xB
- | x4 ⇒ pair … false xC | x5 ⇒ pair … false xD | x6 ⇒ pair … false xE | x7 ⇒ pair … false xF
- | x8 ⇒ pair … true x0 | x9 ⇒ pair … true x1 | xA ⇒ pair … true x2 | xB ⇒ pair … true x3
- | xC ⇒ pair … true x4 | xD ⇒ pair … true x5 | xE ⇒ pair … true x6 | xF ⇒ pair … true x7 ]
+ [ x0 ⇒ pair … x8 false | x1 ⇒ pair … x9 false | x2 ⇒ pair … xA false | x3 ⇒ pair … xB false
+ | x4 ⇒ pair … xC false | x5 ⇒ pair … xD false | x6 ⇒ pair … xE false | x7 ⇒ pair … xF false
+ | x8 ⇒ pair … x0 true | x9 ⇒ pair … x1 true | xA ⇒ pair … x2 true | xB ⇒ pair … x3 true
+ | xC ⇒ pair … x4 true | xD ⇒ pair … x5 true | xE ⇒ pair … x6 true | xF ⇒ pair … x7 true ]
| x9 ⇒ match e2 with
- [ x0 ⇒ pair … false x9 | x1 ⇒ pair … false xA | x2 ⇒ pair … false xB | x3 ⇒ pair … false xC
- | x4 ⇒ pair … false xD | x5 ⇒ pair … false xE | x6 ⇒ pair … false xF | x7 ⇒ pair … true x0
- | x8 ⇒ pair … true x1 | x9 ⇒ pair … true x2 | xA ⇒ pair … true x3 | xB ⇒ pair … true x4
- | xC ⇒ pair … true x5 | xD ⇒ pair … true x6 | xE ⇒ pair … true x7 | xF ⇒ pair … true x8 ]
+ [ x0 ⇒ pair … x9 false | x1 ⇒ pair … xA false | x2 ⇒ pair … xB false | x3 ⇒ pair … xC false
+ | x4 ⇒ pair … xD false | x5 ⇒ pair … xE false | x6 ⇒ pair … xF false | x7 ⇒ pair … x0 true
+ | x8 ⇒ pair … x1 true | x9 ⇒ pair … x2 true | xA ⇒ pair … x3 true | xB ⇒ pair … x4 true
+ | xC ⇒ pair … x5 true | xD ⇒ pair … x6 true | xE ⇒ pair … x7 true | xF ⇒ pair … x8 true ]
| xA ⇒ match e2 with
- [ x0 ⇒ pair … false xA | x1 ⇒ pair … false xB | x2 ⇒ pair … false xC | x3 ⇒ pair … false xD
- | x4 ⇒ pair … false xE | x5 ⇒ pair … false xF | x6 ⇒ pair … true x0 | x7 ⇒ pair … true x1
- | x8 ⇒ pair … true x2 | x9 ⇒ pair … true x3 | xA ⇒ pair … true x4 | xB ⇒ pair … true x5
- | xC ⇒ pair … true x6 | xD ⇒ pair … true x7 | xE ⇒ pair … true x8 | xF ⇒ pair … true x9 ]
+ [ x0 ⇒ pair … xA false | x1 ⇒ pair … xB false | x2 ⇒ pair … xC false | x3 ⇒ pair … xD false
+ | x4 ⇒ pair … xE false | x5 ⇒ pair … xF false | x6 ⇒ pair … x0 true | x7 ⇒ pair … x1 true
+ | x8 ⇒ pair … x2 true | x9 ⇒ pair … x3 true | xA ⇒ pair … x4 true | xB ⇒ pair … x5 true
+ | xC ⇒ pair … x6 true | xD ⇒ pair … x7 true | xE ⇒ pair … x8 true | xF ⇒ pair … x9 true ]
| xB ⇒ match e2 with
- [ x0 ⇒ pair … false xB | x1 ⇒ pair … false xC | x2 ⇒ pair … false xD | x3 ⇒ pair … false xE
- | x4 ⇒ pair … false xF | x5 ⇒ pair … true x0 | x6 ⇒ pair … true x1 | x7 ⇒ pair … true x2
- | x8 ⇒ pair … true x3 | x9 ⇒ pair … true x4 | xA ⇒ pair … true x5 | xB ⇒ pair … true x6
- | xC ⇒ pair … true x7 | xD ⇒ pair … true x8 | xE ⇒ pair … true x9 | xF ⇒ pair … true xA ]
+ [ x0 ⇒ pair … xB false | x1 ⇒ pair … xC false | x2 ⇒ pair … xD false | x3 ⇒ pair … xE false
+ | x4 ⇒ pair … xF false | x5 ⇒ pair … x0 true | x6 ⇒ pair … x1 true | x7 ⇒ pair … x2 true
+ | x8 ⇒ pair … x3 true | x9 ⇒ pair … x4 true | xA ⇒ pair … x5 true | xB ⇒ pair … x6 true
+ | xC ⇒ pair … x7 true | xD ⇒ pair … x8 true | xE ⇒ pair … x9 true | xF ⇒ pair … xA true ]
| xC ⇒ match e2 with
- [ x0 ⇒ pair … false xC | x1 ⇒ pair … false xD | x2 ⇒ pair … false xE | x3 ⇒ pair … false xF
- | x4 ⇒ pair … true x0 | x5 ⇒ pair … true x1 | x6 ⇒ pair … true x2 | x7 ⇒ pair … true x3
- | x8 ⇒ pair … true x4 | x9 ⇒ pair … true x5 | xA ⇒ pair … true x6 | xB ⇒ pair … true x7
- | xC ⇒ pair … true x8 | xD ⇒ pair … true x9 | xE ⇒ pair … true xA | xF ⇒ pair … true xB ]
+ [ x0 ⇒ pair … xC false | x1 ⇒ pair … xD false | x2 ⇒ pair … xE false | x3 ⇒ pair … xF false
+ | x4 ⇒ pair … x0 true | x5 ⇒ pair … x1 true | x6 ⇒ pair … x2 true | x7 ⇒ pair … x3 true
+ | x8 ⇒ pair … x4 true | x9 ⇒ pair … x5 true | xA ⇒ pair … x6 true | xB ⇒ pair … x7 true
+ | xC ⇒ pair … x8 true | xD ⇒ pair … x9 true | xE ⇒ pair … xA true | xF ⇒ pair … xB true ]
| xD ⇒ match e2 with
- [ x0 ⇒ pair … false xD | x1 ⇒ pair … false xE | x2 ⇒ pair … false xF | x3 ⇒ pair … true x0
- | x4 ⇒ pair … true x1 | x5 ⇒ pair … true x2 | x6 ⇒ pair … true x3 | x7 ⇒ pair … true x4
- | x8 ⇒ pair … true x5 | x9 ⇒ pair … true x6 | xA ⇒ pair … true x7 | xB ⇒ pair … true x8
- | xC ⇒ pair … true x9 | xD ⇒ pair … true xA | xE ⇒ pair … true xB | xF ⇒ pair … true xC ]
+ [ x0 ⇒ pair … xD false | x1 ⇒ pair … xE false | x2 ⇒ pair … xF false | x3 ⇒ pair … x0 true
+ | x4 ⇒ pair … x1 true | x5 ⇒ pair … x2 true | x6 ⇒ pair … x3 true | x7 ⇒ pair … x4 true
+ | x8 ⇒ pair … x5 true | x9 ⇒ pair … x6 true | xA ⇒ pair … x7 true | xB ⇒ pair … x8 true
+ | xC ⇒ pair … x9 true | xD ⇒ pair … xA true | xE ⇒ pair … xB true | xF ⇒ pair … xC true ]
| xE ⇒ match e2 with
- [ x0 ⇒ pair … false xE | x1 ⇒ pair … false xF | x2 ⇒ pair … true x0 | x3 ⇒ pair … true x1
- | x4 ⇒ pair … true x2 | x5 ⇒ pair … true x3 | x6 ⇒ pair … true x4 | x7 ⇒ pair … true x5
- | x8 ⇒ pair … true x6 | x9 ⇒ pair … true x7 | xA ⇒ pair … true x8 | xB ⇒ pair … true x9
- | xC ⇒ pair … true xA | xD ⇒ pair … true xB | xE ⇒ pair … true xC | xF ⇒ pair … true xD ]
+ [ x0 ⇒ pair … xE false | x1 ⇒ pair … xF false | x2 ⇒ pair … x0 true | x3 ⇒ pair … x1 true
+ | x4 ⇒ pair … x2 true | x5 ⇒ pair … x3 true | x6 ⇒ pair … x4 true | x7 ⇒ pair … x5 true
+ | x8 ⇒ pair … x6 true | x9 ⇒ pair … x7 true | xA ⇒ pair … x8 true | xB ⇒ pair … x9 true
+ | xC ⇒ pair … xA true | xD ⇒ pair … xB true | xE ⇒ pair … xC true | xF ⇒ pair … xD true ]
| xF ⇒ match e2 with
- [ x0 ⇒ pair … false xF | x1 ⇒ pair … true x0 | x2 ⇒ pair … true x1 | x3 ⇒ pair … true x2
- | x4 ⇒ pair … true x3 | x5 ⇒ pair … true x4 | x6 ⇒ pair … true x5 | x7 ⇒ pair … true x6
- | x8 ⇒ pair … true x7 | x9 ⇒ pair … true x8 | xA ⇒ pair … true x9 | xB ⇒ pair … true xA
- | xC ⇒ pair … true xB | xD ⇒ pair … true xC | xE ⇒ pair … true xD | xF ⇒ pair … true xE ]
+ [ x0 ⇒ pair … xF false | x1 ⇒ pair … x0 true | x2 ⇒ pair … x1 true | x3 ⇒ pair … x2 true
+ | x4 ⇒ pair … x3 true | x5 ⇒ pair … x4 true | x6 ⇒ pair … x5 true | x7 ⇒ pair … x6 true
+ | x8 ⇒ pair … x7 true | x9 ⇒ pair … x8 true | xA ⇒ pair … x9 true | xB ⇒ pair … xA true
+ | xC ⇒ pair … xB true | xD ⇒ pair … xC true | xE ⇒ pair … xD true | xF ⇒ pair … xE true ]
]].
(* operatore somma con data → data+carry *)
λe1,e2:exadecim.
match e1 with
[ x0 ⇒ match e2 with
- [ x0 ⇒ pair … false x0 | x1 ⇒ pair … false x1 | x2 ⇒ pair … false x2 | x3 ⇒ pair … false x3
- | x4 ⇒ pair … false x4 | x5 ⇒ pair … false x5 | x6 ⇒ pair … false x6 | x7 ⇒ pair … false x7
- | x8 ⇒ pair … false x8 | x9 ⇒ pair … false x9 | xA ⇒ pair … false xA | xB ⇒ pair … false xB
- | xC ⇒ pair … false xC | xD ⇒ pair … false xD | xE ⇒ pair … false xE | xF ⇒ pair … false xF ]
+ [ x0 ⇒ pair … x0 false | x1 ⇒ pair … x1 false | x2 ⇒ pair … x2 false | x3 ⇒ pair … x3 false
+ | x4 ⇒ pair … x4 false | x5 ⇒ pair … x5 false | x6 ⇒ pair … x6 false | x7 ⇒ pair … x7 false
+ | x8 ⇒ pair … x8 false | x9 ⇒ pair … x9 false | xA ⇒ pair … xA false | xB ⇒ pair … xB false
+ | xC ⇒ pair … xC false | xD ⇒ pair … xD false | xE ⇒ pair … xE false | xF ⇒ pair … xF false ]
| x1 ⇒ match e2 with
- [ x0 ⇒ pair … false x1 | x1 ⇒ pair … false x2 | x2 ⇒ pair … false x3 | x3 ⇒ pair … false x4
- | x4 ⇒ pair … false x5 | x5 ⇒ pair … false x6 | x6 ⇒ pair … false x7 | x7 ⇒ pair … false x8
- | x8 ⇒ pair … false x9 | x9 ⇒ pair … false xA | xA ⇒ pair … false xB | xB ⇒ pair … false xC
- | xC ⇒ pair … false xD | xD ⇒ pair … false xE | xE ⇒ pair … false xF | xF ⇒ pair … true x0 ]
+ [ x0 ⇒ pair … x1 false | x1 ⇒ pair … x2 false | x2 ⇒ pair … x3 false | x3 ⇒ pair … x4 false
+ | x4 ⇒ pair … x5 false | x5 ⇒ pair … x6 false | x6 ⇒ pair … x7 false | x7 ⇒ pair … x8 false
+ | x8 ⇒ pair … x9 false | x9 ⇒ pair … xA false | xA ⇒ pair … xB false | xB ⇒ pair … xC false
+ | xC ⇒ pair … xD false | xD ⇒ pair … xE false | xE ⇒ pair … xF false | xF ⇒ pair … x0 true ]
| x2 ⇒ match e2 with
- [ x0 ⇒ pair … false x2 | x1 ⇒ pair … false x3 | x2 ⇒ pair … false x4 | x3 ⇒ pair … false x5
- | x4 ⇒ pair … false x6 | x5 ⇒ pair … false x7 | x6 ⇒ pair … false x8 | x7 ⇒ pair … false x9
- | x8 ⇒ pair … false xA | x9 ⇒ pair … false xB | xA ⇒ pair … false xC | xB ⇒ pair … false xD
- | xC ⇒ pair … false xE | xD ⇒ pair … false xF | xE ⇒ pair … true x0 | xF ⇒ pair … true x1 ]
+ [ x0 ⇒ pair … x2 false | x1 ⇒ pair … x3 false | x2 ⇒ pair … x4 false | x3 ⇒ pair … x5 false
+ | x4 ⇒ pair … x6 false | x5 ⇒ pair … x7 false | x6 ⇒ pair … x8 false | x7 ⇒ pair … x9 false
+ | x8 ⇒ pair … xA false | x9 ⇒ pair … xB false | xA ⇒ pair … xC false | xB ⇒ pair … xD false
+ | xC ⇒ pair … xE false | xD ⇒ pair … xF false | xE ⇒ pair … x0 true | xF ⇒ pair … x1 true ]
| x3 ⇒ match e2 with
- [ x0 ⇒ pair … false x3 | x1 ⇒ pair … false x4 | x2 ⇒ pair … false x5 | x3 ⇒ pair … false x6
- | x4 ⇒ pair … false x7 | x5 ⇒ pair … false x8 | x6 ⇒ pair … false x9 | x7 ⇒ pair … false xA
- | x8 ⇒ pair … false xB | x9 ⇒ pair … false xC | xA ⇒ pair … false xD | xB ⇒ pair … false xE
- | xC ⇒ pair … false xF | xD ⇒ pair … true x0 | xE ⇒ pair … true x1 | xF ⇒ pair … true x2 ]
+ [ x0 ⇒ pair … x3 false | x1 ⇒ pair … x4 false | x2 ⇒ pair … x5 false | x3 ⇒ pair … x6 false
+ | x4 ⇒ pair … x7 false | x5 ⇒ pair … x8 false | x6 ⇒ pair … x9 false | x7 ⇒ pair … xA false
+ | x8 ⇒ pair … xB false | x9 ⇒ pair … xC false | xA ⇒ pair … xD false | xB ⇒ pair … xE false
+ | xC ⇒ pair … xF false | xD ⇒ pair … x0 true | xE ⇒ pair … x1 true | xF ⇒ pair … x2 true ]
| x4 ⇒ match e2 with
- [ x0 ⇒ pair … false x4 | x1 ⇒ pair … false x5 | x2 ⇒ pair … false x6 | x3 ⇒ pair … false x7
- | x4 ⇒ pair … false x8 | x5 ⇒ pair … false x9 | x6 ⇒ pair … false xA | x7 ⇒ pair … false xB
- | x8 ⇒ pair … false xC | x9 ⇒ pair … false xD | xA ⇒ pair … false xE | xB ⇒ pair … false xF
- | xC ⇒ pair … true x0 | xD ⇒ pair … true x1 | xE ⇒ pair … true x2 | xF ⇒ pair … true x3 ]
+ [ x0 ⇒ pair … x4 false | x1 ⇒ pair … x5 false | x2 ⇒ pair … x6 false | x3 ⇒ pair … x7 false
+ | x4 ⇒ pair … x8 false | x5 ⇒ pair … x9 false | x6 ⇒ pair … xA false | x7 ⇒ pair … xB false
+ | x8 ⇒ pair … xC false | x9 ⇒ pair … xD false | xA ⇒ pair … xE false | xB ⇒ pair … xF false
+ | xC ⇒ pair … x0 true | xD ⇒ pair … x1 true | xE ⇒ pair … x2 true | xF ⇒ pair … x3 true ]
| x5 ⇒ match e2 with
- [ x0 ⇒ pair … false x5 | x1 ⇒ pair … false x6 | x2 ⇒ pair … false x7 | x3 ⇒ pair … false x8
- | x4 ⇒ pair … false x9 | x5 ⇒ pair … false xA | x6 ⇒ pair … false xB | x7 ⇒ pair … false xC
- | x8 ⇒ pair … false xD | x9 ⇒ pair … false xE | xA ⇒ pair … false xF | xB ⇒ pair … true x0
- | xC ⇒ pair … true x1 | xD ⇒ pair … true x2 | xE ⇒ pair … true x3 | xF ⇒ pair … true x4 ]
+ [ x0 ⇒ pair … x5 false | x1 ⇒ pair … x6 false | x2 ⇒ pair … x7 false | x3 ⇒ pair … x8 false
+ | x4 ⇒ pair … x9 false | x5 ⇒ pair … xA false | x6 ⇒ pair … xB false | x7 ⇒ pair … xC false
+ | x8 ⇒ pair … xD false | x9 ⇒ pair … xE false | xA ⇒ pair … xF false | xB ⇒ pair … x0 true
+ | xC ⇒ pair … x1 true | xD ⇒ pair … x2 true | xE ⇒ pair … x3 true | xF ⇒ pair … x4 true ]
| x6 ⇒ match e2 with
- [ x0 ⇒ pair … false x6 | x1 ⇒ pair … false x7 | x2 ⇒ pair … false x8 | x3 ⇒ pair … false x9
- | x4 ⇒ pair … false xA | x5 ⇒ pair … false xB | x6 ⇒ pair … false xC | x7 ⇒ pair … false xD
- | x8 ⇒ pair … false xE | x9 ⇒ pair … false xF | xA ⇒ pair … true x0 | xB ⇒ pair … true x1
- | xC ⇒ pair … true x2 | xD ⇒ pair … true x3 | xE ⇒ pair … true x4 | xF ⇒ pair … true x5 ]
+ [ x0 ⇒ pair … x6 false | x1 ⇒ pair … x7 false | x2 ⇒ pair … x8 false | x3 ⇒ pair … x9 false
+ | x4 ⇒ pair … xA false | x5 ⇒ pair … xB false | x6 ⇒ pair … xC false | x7 ⇒ pair … xD false
+ | x8 ⇒ pair … xE false | x9 ⇒ pair … xF false | xA ⇒ pair … x0 true | xB ⇒ pair … x1 true
+ | xC ⇒ pair … x2 true | xD ⇒ pair … x3 true | xE ⇒ pair … x4 true | xF ⇒ pair … x5 true ]
| x7 ⇒ match e2 with
- [ x0 ⇒ pair … false x7 | x1 ⇒ pair … false x8 | x2 ⇒ pair … false x9 | x3 ⇒ pair … false xA
- | x4 ⇒ pair … false xB | x5 ⇒ pair … false xC | x6 ⇒ pair … false xD | x7 ⇒ pair … false xE
- | x8 ⇒ pair … false xF | x9 ⇒ pair … true x0 | xA ⇒ pair … true x1 | xB ⇒ pair … true x2
- | xC ⇒ pair … true x3 | xD ⇒ pair … true x4 | xE ⇒ pair … true x5 | xF ⇒ pair … true x6 ]
+ [ x0 ⇒ pair … x7 false | x1 ⇒ pair … x8 false | x2 ⇒ pair … x9 false | x3 ⇒ pair … xA false
+ | x4 ⇒ pair … xB false | x5 ⇒ pair … xC false | x6 ⇒ pair … xD false | x7 ⇒ pair … xE false
+ | x8 ⇒ pair … xF false | x9 ⇒ pair … x0 true | xA ⇒ pair … x1 true | xB ⇒ pair … x2 true
+ | xC ⇒ pair … x3 true | xD ⇒ pair … x4 true | xE ⇒ pair … x5 true | xF ⇒ pair … x6 true ]
| x8 ⇒ match e2 with
- [ x0 ⇒ pair … false x8 | x1 ⇒ pair … false x9 | x2 ⇒ pair … false xA | x3 ⇒ pair … false xB
- | x4 ⇒ pair … false xC | x5 ⇒ pair … false xD | x6 ⇒ pair … false xE | x7 ⇒ pair … false xF
- | x8 ⇒ pair … true x0 | x9 ⇒ pair … true x1 | xA ⇒ pair … true x2 | xB ⇒ pair … true x3
- | xC ⇒ pair … true x4 | xD ⇒ pair … true x5 | xE ⇒ pair … true x6 | xF ⇒ pair … true x7 ]
+ [ x0 ⇒ pair … x8 false | x1 ⇒ pair … x9 false | x2 ⇒ pair … xA false | x3 ⇒ pair … xB false
+ | x4 ⇒ pair … xC false | x5 ⇒ pair … xD false | x6 ⇒ pair … xE false | x7 ⇒ pair … xF false
+ | x8 ⇒ pair … x0 true | x9 ⇒ pair … x1 true | xA ⇒ pair … x2 true | xB ⇒ pair … x3 true
+ | xC ⇒ pair … x4 true | xD ⇒ pair … x5 true | xE ⇒ pair … x6 true | xF ⇒ pair … x7 true ]
| x9 ⇒ match e2 with
- [ x0 ⇒ pair … false x9 | x1 ⇒ pair … false xA | x2 ⇒ pair … false xB | x3 ⇒ pair … false xC
- | x4 ⇒ pair … false xD | x5 ⇒ pair … false xE | x6 ⇒ pair … false xF | x7 ⇒ pair … true x0
- | x8 ⇒ pair … true x1 | x9 ⇒ pair … true x2 | xA ⇒ pair … true x3 | xB ⇒ pair … true x4
- | xC ⇒ pair … true x5 | xD ⇒ pair … true x6 | xE ⇒ pair … true x7 | xF ⇒ pair … true x8 ]
+ [ x0 ⇒ pair … x9 false | x1 ⇒ pair … xA false | x2 ⇒ pair … xB false | x3 ⇒ pair … xC false
+ | x4 ⇒ pair … xD false | x5 ⇒ pair … xE false | x6 ⇒ pair … xF false | x7 ⇒ pair … x0 true
+ | x8 ⇒ pair … x1 true | x9 ⇒ pair … x2 true | xA ⇒ pair … x3 true | xB ⇒ pair … x4 true
+ | xC ⇒ pair … x5 true | xD ⇒ pair … x6 true | xE ⇒ pair … x7 true | xF ⇒ pair … x8 true ]
| xA ⇒ match e2 with
- [ x0 ⇒ pair … false xA | x1 ⇒ pair … false xB | x2 ⇒ pair … false xC | x3 ⇒ pair … false xD
- | x4 ⇒ pair … false xE | x5 ⇒ pair … false xF | x6 ⇒ pair … true x0 | x7 ⇒ pair … true x1
- | x8 ⇒ pair … true x2 | x9 ⇒ pair … true x3 | xA ⇒ pair … true x4 | xB ⇒ pair … true x5
- | xC ⇒ pair … true x6 | xD ⇒ pair … true x7 | xE ⇒ pair … true x8 | xF ⇒ pair … true x9 ]
+ [ x0 ⇒ pair … xA false | x1 ⇒ pair … xB false | x2 ⇒ pair … xC false | x3 ⇒ pair … xD false
+ | x4 ⇒ pair … xE false | x5 ⇒ pair … xF false | x6 ⇒ pair … x0 true | x7 ⇒ pair … x1 true
+ | x8 ⇒ pair … x2 true | x9 ⇒ pair … x3 true | xA ⇒ pair … x4 true | xB ⇒ pair … x5 true
+ | xC ⇒ pair … x6 true | xD ⇒ pair … x7 true | xE ⇒ pair … x8 true | xF ⇒ pair … x9 true ]
| xB ⇒ match e2 with
- [ x0 ⇒ pair … false xB | x1 ⇒ pair … false xC | x2 ⇒ pair … false xD | x3 ⇒ pair … false xE
- | x4 ⇒ pair … false xF | x5 ⇒ pair … true x0 | x6 ⇒ pair … true x1 | x7 ⇒ pair … true x2
- | x8 ⇒ pair … true x3 | x9 ⇒ pair … true x4 | xA ⇒ pair … true x5 | xB ⇒ pair … true x6
- | xC ⇒ pair … true x7 | xD ⇒ pair … true x8 | xE ⇒ pair … true x9 | xF ⇒ pair … true xA ]
+ [ x0 ⇒ pair … xB false | x1 ⇒ pair … xC false | x2 ⇒ pair … xD false | x3 ⇒ pair … xE false
+ | x4 ⇒ pair … xF false | x5 ⇒ pair … x0 true | x6 ⇒ pair … x1 true | x7 ⇒ pair … x2 true
+ | x8 ⇒ pair … x3 true | x9 ⇒ pair … x4 true | xA ⇒ pair … x5 true | xB ⇒ pair … x6 true
+ | xC ⇒ pair … x7 true | xD ⇒ pair … x8 true | xE ⇒ pair … x9 true | xF ⇒ pair … xA true ]
| xC ⇒ match e2 with
- [ x0 ⇒ pair … false xC | x1 ⇒ pair … false xD | x2 ⇒ pair … false xE | x3 ⇒ pair … false xF
- | x4 ⇒ pair … true x0 | x5 ⇒ pair … true x1 | x6 ⇒ pair … true x2 | x7 ⇒ pair … true x3
- | x8 ⇒ pair … true x4 | x9 ⇒ pair … true x5 | xA ⇒ pair … true x6 | xB ⇒ pair … true x7
- | xC ⇒ pair … true x8 | xD ⇒ pair … true x9 | xE ⇒ pair … true xA | xF ⇒ pair … true xB ]
+ [ x0 ⇒ pair … xC false | x1 ⇒ pair … xD false | x2 ⇒ pair … xE false | x3 ⇒ pair … xF false
+ | x4 ⇒ pair … x0 true | x5 ⇒ pair … x1 true | x6 ⇒ pair … x2 true | x7 ⇒ pair … x3 true
+ | x8 ⇒ pair … x4 true | x9 ⇒ pair … x5 true | xA ⇒ pair … x6 true | xB ⇒ pair … x7 true
+ | xC ⇒ pair … x8 true | xD ⇒ pair … x9 true | xE ⇒ pair … xA true | xF ⇒ pair … xB true ]
| xD ⇒ match e2 with
- [ x0 ⇒ pair … false xD | x1 ⇒ pair … false xE | x2 ⇒ pair … false xF | x3 ⇒ pair … true x0
- | x4 ⇒ pair … true x1 | x5 ⇒ pair … true x2 | x6 ⇒ pair … true x3 | x7 ⇒ pair … true x4
- | x8 ⇒ pair … true x5 | x9 ⇒ pair … true x6 | xA ⇒ pair … true x7 | xB ⇒ pair … true x8
- | xC ⇒ pair … true x9 | xD ⇒ pair … true xA | xE ⇒ pair … true xB | xF ⇒ pair … true xC ]
+ [ x0 ⇒ pair … xD false | x1 ⇒ pair … xE false | x2 ⇒ pair … xF false | x3 ⇒ pair … x0 true
+ | x4 ⇒ pair … x1 true | x5 ⇒ pair … x2 true | x6 ⇒ pair … x3 true | x7 ⇒ pair … x4 true
+ | x8 ⇒ pair … x5 true | x9 ⇒ pair … x6 true | xA ⇒ pair … x7 true | xB ⇒ pair … x8 true
+ | xC ⇒ pair … x9 true | xD ⇒ pair … xA true | xE ⇒ pair … xB true | xF ⇒ pair … xC true ]
| xE ⇒ match e2 with
- [ x0 ⇒ pair … false xE | x1 ⇒ pair … false xF | x2 ⇒ pair … true x0 | x3 ⇒ pair … true x1
- | x4 ⇒ pair … true x2 | x5 ⇒ pair … true x3 | x6 ⇒ pair … true x4 | x7 ⇒ pair … true x5
- | x8 ⇒ pair … true x6 | x9 ⇒ pair … true x7 | xA ⇒ pair … true x8 | xB ⇒ pair … true x9
- | xC ⇒ pair … true xA | xD ⇒ pair … true xB | xE ⇒ pair … true xC | xF ⇒ pair … true xD ]
+ [ x0 ⇒ pair … xE false | x1 ⇒ pair … xF false | x2 ⇒ pair … x0 true | x3 ⇒ pair … x1 true
+ | x4 ⇒ pair … x2 true | x5 ⇒ pair … x3 true | x6 ⇒ pair … x4 true | x7 ⇒ pair … x5 true
+ | x8 ⇒ pair … x6 true | x9 ⇒ pair … x7 true | xA ⇒ pair … x8 true | xB ⇒ pair … x9 true
+ | xC ⇒ pair … xA true | xD ⇒ pair … xB true | xE ⇒ pair … xC true | xF ⇒ pair … xD true ]
| xF ⇒ match e2 with
- [ x0 ⇒ pair … false xF | x1 ⇒ pair … true x0 | x2 ⇒ pair … true x1 | x3 ⇒ pair … true x2
- | x4 ⇒ pair … true x3 | x5 ⇒ pair … true x4 | x6 ⇒ pair … true x5 | x7 ⇒ pair … true x6
- | x8 ⇒ pair … true x7 | x9 ⇒ pair … true x8 | xA ⇒ pair … true x9 | xB ⇒ pair … true xA
- | xC ⇒ pair … true xB | xD ⇒ pair … true xC | xE ⇒ pair … true xD | xF ⇒ pair … true xE ]
+ [ x0 ⇒ pair … xF false | x1 ⇒ pair … x0 true | x2 ⇒ pair … x1 true | x3 ⇒ pair … x2 true
+ | x4 ⇒ pair … x3 true | x5 ⇒ pair … x4 true | x6 ⇒ pair … x5 true | x7 ⇒ pair … x6 true
+ | x8 ⇒ pair … x7 true | x9 ⇒ pair … x8 true | xA ⇒ pair … x9 true | xB ⇒ pair … xA true
+ | xC ⇒ pair … xB true | xD ⇒ pair … xC true | xE ⇒ pair … xD true | xF ⇒ pair … xE true ]
].
(* operatore somma con data+carry → data *)
ndefinition plus_ex_dc_d ≝
-λc:bool.λe1,e2:exadecim.
+λe1,e2:exadecim.λc:bool.
match c with
[ true ⇒ match e1 with
[ x0 ⇒ match e2 with
(* operatore somma con data+carry → carry *)
ndefinition plus_ex_dc_c ≝
-λc:bool.λe1,e2:exadecim.
+λe1,e2:exadecim.λc:bool.
match c with
[ true ⇒ match e1 with
[ x0 ⇒ match e2 with
| x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
].
+(* operatore Most Significant Bit *)
+ndefinition MSB_ex ≝
+λe:exadecim.match e with
+ [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
+ | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
+ | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
+ | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ].
+
(* operatore predecessore *)
ndefinition pred_ex ≝
λe:exadecim.
| x8 ⇒ x8 | x9 ⇒ x7 | xA ⇒ x6 | xB ⇒ x5
| xC ⇒ x4 | xD ⇒ x3 | xE ⇒ x2 | xF ⇒ x1 ].
-(* operatore abs *)
-ndefinition abs_ex ≝
-λe:exadecim.match getMSB_ex e with
- [ true ⇒ compl_ex e | false ⇒ e ].
-
-(* operatore x in [inf,sup] o in sup],[inf *)
+(* operatore x in [inf,sup] *)
ndefinition inrange_ex ≝
-λx,inf,sup:exadecim.
- match le_ex inf sup with
- [ true ⇒ and_bool | false ⇒ or_bool ]
- (le_ex inf x) (le_ex x sup).
+λx,inf,sup:exadecim.(le_ex inf x) ⊗ (le_ex x sup).
+
+(* iteratore sugli esadecimali *)
+ndefinition forall_ex ≝ λP.
+ P x0 ⊗ P x1 ⊗ P x2 ⊗ P x3 ⊗ P x4 ⊗ P x5 ⊗ P x6 ⊗ P x7 ⊗
+ P x8 ⊗ P x9 ⊗ P xA ⊗ P xB ⊗ P xC ⊗ P xD ⊗ P xE ⊗ P xF.
(* esadecimali ricorsivi *)
ninductive rec_exadecim : exadecim → Type ≝
ndefinition ex_of_oct ≝
λn.match n with
[ o0 ⇒ x0 | o1 ⇒ x1 | o2 ⇒ x2 | o3 ⇒ x3 | o4 ⇒ x4 | o5 ⇒ x5 | o6 ⇒ x6 | o7 ⇒ x7 ].
-
-(* esadecimali xNNNN → ottali *)
-ndefinition oct_of_exL ≝
-λn.match n with
- [ x0 ⇒ o0 | x1 ⇒ o1 | x2 ⇒ o2 | x3 ⇒ o3 | x4 ⇒ o4 | x5 ⇒ o5 | x6 ⇒ o6 | x7 ⇒ o7
- | x8 ⇒ o0 | x9 ⇒ o1 | xA ⇒ o2 | xB ⇒ o3 | xC ⇒ o4 | xD ⇒ o5 | xE ⇒ o6 | xF ⇒ o7 ].
-
-(* esadecimali NNNNx → ottali *)
-ndefinition oct_of_exH ≝
-λn.match n with
- [ x0 ⇒ o0 | x1 ⇒ o0 | x2 ⇒ o1 | x3 ⇒ o1 | x4 ⇒ o2 | x5 ⇒ o2 | x6 ⇒ o3 | x7 ⇒ o3
- | x8 ⇒ o4 | x9 ⇒ o4 | xA ⇒ o5 | xB ⇒ o5 | xC ⇒ o6 | xD ⇒ o6 | xE ⇒ o7 | xF ⇒ o7 ].
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* ESADECIMALI *)
(* *********** *)
-(*
ndefinition exadecim_destruct_aux ≝
Πe1,e2.ΠP:Prop.ΠH:e1 = e2.
match eq_ex e1 e2 with [ true ⇒ P → P | false ⇒ P ].
nnormalize;
napply (λx.x).
nqed.
-*)
+
+nlemma symmetric_andex : symmetricT exadecim exadecim and_ex.
+ #e1; #e2;
+ nelim e1;
+ nelim e2;
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma associative_andex1 : ∀e2,e3.(and_ex (and_ex x0 e2) e3) = (and_ex x0 (and_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_andex2 : ∀e2,e3.(and_ex (and_ex x1 e2) e3) = (and_ex x1 (and_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_andex3 : ∀e2,e3.(and_ex (and_ex x2 e2) e3) = (and_ex x2 (and_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_andex4 : ∀e2,e3.(and_ex (and_ex x3 e2) e3) = (and_ex x3 (and_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_andex5 : ∀e2,e3.(and_ex (and_ex x4 e2) e3) = (and_ex x4 (and_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_andex6 : ∀e2,e3.(and_ex (and_ex x5 e2) e3) = (and_ex x5 (and_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_andex7 : ∀e2,e3.(and_ex (and_ex x6 e2) e3) = (and_ex x6 (and_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_andex8 : ∀e2,e3.(and_ex (and_ex x7 e2) e3) = (and_ex x7 (and_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_andex9 : ∀e2,e3.(and_ex (and_ex x8 e2) e3) = (and_ex x8 (and_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_andex10 : ∀e2,e3.(and_ex (and_ex x9 e2) e3) = (and_ex x9 (and_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_andex11 : ∀e2,e3.(and_ex (and_ex xA e2) e3) = (and_ex xA (and_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_andex12 : ∀e2,e3.(and_ex (and_ex xB e2) e3) = (and_ex xB (and_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_andex13 : ∀e2,e3.(and_ex (and_ex xC e2) e3) = (and_ex xC (and_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_andex14 : ∀e2,e3.(and_ex (and_ex xD e2) e3) = (and_ex xD (and_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_andex15 : ∀e2,e3.(and_ex (and_ex xE e2) e3) = (and_ex xE (and_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_andex16 : ∀e2,e3.(and_ex (and_ex xF e2) e3) = (and_ex xF (and_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+
+nlemma associative_andex : ∀e1,e2,e3.(and_ex (and_ex e1 e2) e3) = (and_ex e1 (and_ex e2 e3)).
+ #e1; nelim e1;
+ ##[ ##1: napply associative_andex1 ##| ##2: napply associative_andex2
+ ##| ##3: napply associative_andex3 ##| ##4: napply associative_andex4
+ ##| ##5: napply associative_andex5 ##| ##6: napply associative_andex6
+ ##| ##7: napply associative_andex7 ##| ##8: napply associative_andex8
+ ##| ##9: napply associative_andex9 ##| ##10: napply associative_andex10
+ ##| ##11: napply associative_andex11 ##| ##12: napply associative_andex12
+ ##| ##13: napply associative_andex13 ##| ##14: napply associative_andex14
+ ##| ##15: napply associative_andex15 ##| ##16: napply associative_andex16
+ ##]
+nqed.
+
+nlemma symmetric_orex : symmetricT exadecim exadecim or_ex.
+ #e1; #e2;
+ nelim e1;
+ nelim e2;
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma associative_orex1 : ∀e2,e3.(or_ex (or_ex x0 e2) e3) = (or_ex x0 (or_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_orex2 : ∀e2,e3.(or_ex (or_ex x1 e2) e3) = (or_ex x1 (or_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_orex3 : ∀e2,e3.(or_ex (or_ex x2 e2) e3) = (or_ex x2 (or_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_orex4 : ∀e2,e3.(or_ex (or_ex x3 e2) e3) = (or_ex x3 (or_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_orex5 : ∀e2,e3.(or_ex (or_ex x4 e2) e3) = (or_ex x4 (or_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_orex6 : ∀e2,e3.(or_ex (or_ex x5 e2) e3) = (or_ex x5 (or_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_orex7 : ∀e2,e3.(or_ex (or_ex x6 e2) e3) = (or_ex x6 (or_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_orex8 : ∀e2,e3.(or_ex (or_ex x7 e2) e3) = (or_ex x7 (or_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_orex9 : ∀e2,e3.(or_ex (or_ex x8 e2) e3) = (or_ex x8 (or_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_orex10 : ∀e2,e3.(or_ex (or_ex x9 e2) e3) = (or_ex x9 (or_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_orex11 : ∀e2,e3.(or_ex (or_ex xA e2) e3) = (or_ex xA (or_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_orex12 : ∀e2,e3.(or_ex (or_ex xB e2) e3) = (or_ex xB (or_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_orex13 : ∀e2,e3.(or_ex (or_ex xC e2) e3) = (or_ex xC (or_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_orex14 : ∀e2,e3.(or_ex (or_ex xD e2) e3) = (or_ex xD (or_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_orex15 : ∀e2,e3.(or_ex (or_ex xE e2) e3) = (or_ex xE (or_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_orex16 : ∀e2,e3.(or_ex (or_ex xF e2) e3) = (or_ex xF (or_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+
+nlemma associative_orex : ∀e1,e2,e3.(or_ex (or_ex e1 e2) e3) = (or_ex e1 (or_ex e2 e3)).
+ #e1; nelim e1;
+ ##[ ##1: napply associative_orex1 ##| ##2: napply associative_orex2
+ ##| ##3: napply associative_orex3 ##| ##4: napply associative_orex4
+ ##| ##5: napply associative_orex5 ##| ##6: napply associative_orex6
+ ##| ##7: napply associative_orex7 ##| ##8: napply associative_orex8
+ ##| ##9: napply associative_orex9 ##| ##10: napply associative_orex10
+ ##| ##11: napply associative_orex11 ##| ##12: napply associative_orex12
+ ##| ##13: napply associative_orex13 ##| ##14: napply associative_orex14
+ ##| ##15: napply associative_orex15 ##| ##16: napply associative_orex16
+ ##]
+nqed.
+
+nlemma symmetric_xorex : symmetricT exadecim exadecim xor_ex.
+ #e1; #e2;
+ nelim e1;
+ nelim e2;
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma associative_xorex1 : ∀e2,e3.(xor_ex (xor_ex x0 e2) e3) = (xor_ex x0 (xor_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_xorex2 : ∀e2,e3.(xor_ex (xor_ex x1 e2) e3) = (xor_ex x1 (xor_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_xorex3 : ∀e2,e3.(xor_ex (xor_ex x2 e2) e3) = (xor_ex x2 (xor_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_xorex4 : ∀e2,e3.(xor_ex (xor_ex x3 e2) e3) = (xor_ex x3 (xor_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_xorex5 : ∀e2,e3.(xor_ex (xor_ex x4 e2) e3) = (xor_ex x4 (xor_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_xorex6 : ∀e2,e3.(xor_ex (xor_ex x5 e2) e3) = (xor_ex x5 (xor_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_xorex7 : ∀e2,e3.(xor_ex (xor_ex x6 e2) e3) = (xor_ex x6 (xor_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_xorex8 : ∀e2,e3.(xor_ex (xor_ex x7 e2) e3) = (xor_ex x7 (xor_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_xorex9 : ∀e2,e3.(xor_ex (xor_ex x8 e2) e3) = (xor_ex x8 (xor_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_xorex10 : ∀e2,e3.(xor_ex (xor_ex x9 e2) e3) = (xor_ex x9 (xor_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_xorex11 : ∀e2,e3.(xor_ex (xor_ex xA e2) e3) = (xor_ex xA (xor_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_xorex12 : ∀e2,e3.(xor_ex (xor_ex xB e2) e3) = (xor_ex xB (xor_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_xorex13 : ∀e2,e3.(xor_ex (xor_ex xC e2) e3) = (xor_ex xC (xor_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_xorex14 : ∀e2,e3.(xor_ex (xor_ex xD e2) e3) = (xor_ex xD (xor_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_xorex15 : ∀e2,e3.(xor_ex (xor_ex xE e2) e3) = (xor_ex xE (xor_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_xorex16 : ∀e2,e3.(xor_ex (xor_ex xF e2) e3) = (xor_ex xF (xor_ex e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+
+nlemma associative_xorex : ∀e1,e2,e3.(xor_ex (xor_ex e1 e2) e3) = (xor_ex e1 (xor_ex e2 e3)).
+ #e1; nelim e1;
+ ##[ ##1: napply associative_xorex1 ##| ##2: napply associative_xorex2
+ ##| ##3: napply associative_xorex3 ##| ##4: napply associative_xorex4
+ ##| ##5: napply associative_xorex5 ##| ##6: napply associative_xorex6
+ ##| ##7: napply associative_xorex7 ##| ##8: napply associative_xorex8
+ ##| ##9: napply associative_xorex9 ##| ##10: napply associative_xorex10
+ ##| ##11: napply associative_xorex11 ##| ##12: napply associative_xorex12
+ ##| ##13: napply associative_xorex13 ##| ##14: napply associative_xorex14
+ ##| ##15: napply associative_xorex15 ##| ##16: napply associative_xorex16
+ ##]
+nqed.
+
+nlemma symmetric_plusex_dc_dc : ∀e1,e2,c.plus_ex_dc_dc e1 e2 c = plus_ex_dc_dc e2 e1 c.
+ #e1; #e2; #c;
+ nelim e1;
+ nelim e2;
+ nelim c;
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma plusex_dc_dc_to_dc_d : ∀e1,e2,c.fst … (plus_ex_dc_dc e1 e2 c) = plus_ex_dc_d e1 e2 c.
+ #e1; #e2; #c;
+ nelim e1;
+ nelim e2;
+ nelim c;
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma plusex_dc_dc_to_dc_c : ∀e1,e2,c.snd … (plus_ex_dc_dc e1 e2 c) = plus_ex_dc_c e1 e2 c.
+ #e1; #e2; #c;
+ nelim e1;
+ nelim e2;
+ nelim c;
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma plusex_dc_dc_to_d_dc : ∀e1,e2.plus_ex_dc_dc e1 e2 false = plus_ex_d_dc e1 e2.
+ #e1; #e2;
+ nelim e1;
+ nelim e2;
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma plusex_dc_dc_to_d_d : ∀e1,e2.fst … (plus_ex_dc_dc e1 e2 false) = plus_ex_d_d e1 e2.
+ #e1; #e2;
+ nelim e1;
+ nelim e2;
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma plusex_dc_dc_to_d_c : ∀e1,e2.snd … (plus_ex_dc_dc e1 e2 false) = plus_ex_d_c e1 e2.
+ #e1; #e2;
+ nelim e1;
+ nelim e2;
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusex_dc_d : ∀e1,e2,c.plus_ex_dc_d e1 e2 c = plus_ex_dc_d e2 e1 c.
+ #e1; #e2; #c;
+ nelim e1;
+ nelim e2;
+ nelim c;
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusex_dc_c : ∀e1,e2,c.plus_ex_dc_c e1 e2 c = plus_ex_dc_c e2 e1 c.
+ #e1; #e2; #c;
+ nelim e1;
+ nelim e2;
+ nelim c;
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusex_d_dc : ∀e1,e2.plus_ex_d_dc e1 e2 = plus_ex_d_dc e2 e1.
+ #e1; #e2;
+ nelim e1;
+ nelim e2;
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma plusex_d_dc_to_d_d : ∀e1,e2.fst … (plus_ex_d_dc e1 e2) = plus_ex_d_d e1 e2.
+ #e1; #e2;
+ nelim e1;
+ nelim e2;
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma plusex_d_dc_to_d_c : ∀e1,e2.snd … (plus_ex_d_dc e1 e2) = plus_ex_d_c e1 e2.
+ #e1; #e2;
+ nelim e1;
+ nelim e2;
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusex_d_d : ∀e1,e2.plus_ex_d_d e1 e2 = plus_ex_d_d e2 e1.
+ #e1; #e2;
+ nelim e1;
+ nelim e2;
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma associative_plusex_d_d1 : ∀e2,e3.(plus_ex_d_d (plus_ex_d_d x0 e2) e3) = (plus_ex_d_d x0 (plus_ex_d_d e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_plusex_d_d2 : ∀e2,e3.(plus_ex_d_d (plus_ex_d_d x1 e2) e3) = (plus_ex_d_d x1 (plus_ex_d_d e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_plusex_d_d3 : ∀e2,e3.(plus_ex_d_d (plus_ex_d_d x2 e2) e3) = (plus_ex_d_d x2 (plus_ex_d_d e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_plusex_d_d4 : ∀e2,e3.(plus_ex_d_d (plus_ex_d_d x3 e2) e3) = (plus_ex_d_d x3 (plus_ex_d_d e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_plusex_d_d5 : ∀e2,e3.(plus_ex_d_d (plus_ex_d_d x4 e2) e3) = (plus_ex_d_d x4 (plus_ex_d_d e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_plusex_d_d6 : ∀e2,e3.(plus_ex_d_d (plus_ex_d_d x5 e2) e3) = (plus_ex_d_d x5 (plus_ex_d_d e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_plusex_d_d7 : ∀e2,e3.(plus_ex_d_d (plus_ex_d_d x6 e2) e3) = (plus_ex_d_d x6 (plus_ex_d_d e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_plusex_d_d8 : ∀e2,e3.(plus_ex_d_d (plus_ex_d_d x7 e2) e3) = (plus_ex_d_d x7 (plus_ex_d_d e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_plusex_d_d9 : ∀e2,e3.(plus_ex_d_d (plus_ex_d_d x8 e2) e3) = (plus_ex_d_d x8 (plus_ex_d_d e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_plusex_d_d10 : ∀e2,e3.(plus_ex_d_d (plus_ex_d_d x9 e2) e3) = (plus_ex_d_d x9 (plus_ex_d_d e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_plusex_d_d11 : ∀e2,e3.(plus_ex_d_d (plus_ex_d_d xA e2) e3) = (plus_ex_d_d xA (plus_ex_d_d e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_plusex_d_d12 : ∀e2,e3.(plus_ex_d_d (plus_ex_d_d xB e2) e3) = (plus_ex_d_d xB (plus_ex_d_d e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_plusex_d_d13 : ∀e2,e3.(plus_ex_d_d (plus_ex_d_d xC e2) e3) = (plus_ex_d_d xC (plus_ex_d_d e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_plusex_d_d14 : ∀e2,e3.(plus_ex_d_d (plus_ex_d_d xD e2) e3) = (plus_ex_d_d xD (plus_ex_d_d e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_plusex_d_d15 : ∀e2,e3.(plus_ex_d_d (plus_ex_d_d xE e2) e3) = (plus_ex_d_d xE (plus_ex_d_d e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+nlemma associative_plusex_d_d16 : ∀e2,e3.(plus_ex_d_d (plus_ex_d_d xF e2) e3) = (plus_ex_d_d xF (plus_ex_d_d e2 e3)). #e2; #e3; nelim e2; nelim e3; nnormalize; napply refl_eq. nqed.
+
+nlemma associative_plusex_d_d : ∀e1,e2,e3.(plus_ex_d_d (plus_ex_d_d e1 e2) e3) = (plus_ex_d_d e1 (plus_ex_d_d e2 e3)).
+ #e1; nelim e1;
+ ##[ ##1: napply associative_plusex_d_d1 ##| ##2: napply associative_plusex_d_d2
+ ##| ##3: napply associative_plusex_d_d3 ##| ##4: napply associative_plusex_d_d4
+ ##| ##5: napply associative_plusex_d_d5 ##| ##6: napply associative_plusex_d_d6
+ ##| ##7: napply associative_plusex_d_d7 ##| ##8: napply associative_plusex_d_d8
+ ##| ##9: napply associative_plusex_d_d9 ##| ##10: napply associative_plusex_d_d10
+ ##| ##11: napply associative_plusex_d_d11 ##| ##12: napply associative_plusex_d_d12
+ ##| ##13: napply associative_plusex_d_d13 ##| ##14: napply associative_plusex_d_d14
+ ##| ##15: napply associative_plusex_d_d15 ##| ##16: napply associative_plusex_d_d16
+ ##]
+nqed.
+
+nlemma symmetric_plusex_d_c : ∀e1,e2.plus_ex_d_c e1 e2 = plus_ex_d_c e2 e1.
+ #e1; #e2;
+ nelim e1;
+ nelim e2;
+ nnormalize;
+ napply refl_eq.
+nqed.
nlemma eq_to_eqex : ∀n1,n2.n1 = n2 → eq_ex n1 n2 = true.
#n1; #n2; #H;
ncases n2;
nnormalize;
##[ ##1,18,35,52,69,86,103,120,137,154,171,188,205,222,239,256: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
+ ##| ##*: #H; napply (bool_destruct … H)
##]
nqed.
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
| o6: oct
| o7: oct.
-(* iteratore sugli ottali *)
-ndefinition forall_oct ≝ λP.
- P o0 ⊗ P o1 ⊗ P o2 ⊗ P o3 ⊗ P o4 ⊗ P o5 ⊗ P o6 ⊗ P o7.
-
(* operatore = *)
ndefinition eq_oct ≝
λn1,n2:oct.
| o7 ⇒ match n2 with [ o7 ⇒ true | _ ⇒ false ]
].
-(* operatore and *)
-ndefinition and_oct ≝
-λe1,e2:oct.match e1 with
- [ o0 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o0 | o2 ⇒ o0 | o3 ⇒ o0
- | o4 ⇒ o0 | o5 ⇒ o0 | o6 ⇒ o0 | o7 ⇒ o0 ]
- | o1 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o1 | o2 ⇒ o0 | o3 ⇒ o1
- | o4 ⇒ o0 | o5 ⇒ o1 | o6 ⇒ o0 | o7 ⇒ o1 ]
- | o2 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o0 | o2 ⇒ o2 | o3 ⇒ o2
- | o4 ⇒ o0 | o5 ⇒ o0 | o6 ⇒ o2 | o7 ⇒ o2 ]
- | o3 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o1 | o2 ⇒ o2 | o3 ⇒ o3
- | o4 ⇒ o0 | o5 ⇒ o1 | o6 ⇒ o2 | o7 ⇒ o3 ]
- | o4 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o0 | o2 ⇒ o0 | o3 ⇒ o0
- | o4 ⇒ o4 | o5 ⇒ o4 | o6 ⇒ o4 | o7 ⇒ o4 ]
- | o5 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o1 | o2 ⇒ o0 | o3 ⇒ o1
- | o4 ⇒ o4 | o5 ⇒ o5 | o6 ⇒ o4 | o7 ⇒ o5 ]
- | o6 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o0 | o2 ⇒ o2 | o3 ⇒ o2
- | o4 ⇒ o4 | o5 ⇒ o4 | o6 ⇒ o6 | o7 ⇒ o6 ]
- | o7 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o1 | o2 ⇒ o2 | o3 ⇒ o3
- | o4 ⇒ o4 | o5 ⇒ o5 | o6 ⇒ o6 | o7 ⇒ o7 ]
- ].
-
-(* operatore or *)
-ndefinition or_oct ≝
-λe1,e2:oct.match e1 with
- [ o0 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o1 | o2 ⇒ o2 | o3 ⇒ o3
- | o4 ⇒ o4 | o5 ⇒ o5 | o6 ⇒ o6 | o7 ⇒ o7 ]
- | o1 ⇒ match e2 with
- [ o0 ⇒ o1 | o1 ⇒ o1 | o2 ⇒ o3 | o3 ⇒ o3
- | o4 ⇒ o5 | o5 ⇒ o5 | o6 ⇒ o7 | o7 ⇒ o7 ]
- | o2 ⇒ match e2 with
- [ o0 ⇒ o2 | o1 ⇒ o3 | o2 ⇒ o2 | o3 ⇒ o3
- | o4 ⇒ o6 | o5 ⇒ o7 | o6 ⇒ o6 | o7 ⇒ o7 ]
- | o3 ⇒ match e2 with
- [ o0 ⇒ o3 | o1 ⇒ o3 | o2 ⇒ o3 | o3 ⇒ o3
- | o4 ⇒ o7 | o5 ⇒ o7 | o6 ⇒ o7 | o7 ⇒ o7 ]
- | o4 ⇒ match e2 with
- [ o0 ⇒ o4 | o1 ⇒ o5 | o2 ⇒ o6 | o3 ⇒ o7
- | o4 ⇒ o4 | o5 ⇒ o5 | o6 ⇒ o6 | o7 ⇒ o7 ]
- | o5 ⇒ match e2 with
- [ o0 ⇒ o5 | o1 ⇒ o5 | o2 ⇒ o7 | o3 ⇒ o7
- | o4 ⇒ o5 | o5 ⇒ o5 | o6 ⇒ o7 | o7 ⇒ o7 ]
- | o6 ⇒ match e2 with
- [ o0 ⇒ o6 | o1 ⇒ o7 | o2 ⇒ o6 | o3 ⇒ o7
- | o4 ⇒ o6 | o5 ⇒ o7 | o6 ⇒ o6 | o7 ⇒ o7 ]
- | o7 ⇒ match e2 with
- [ o0 ⇒ o7 | o1 ⇒ o7 | o2 ⇒ o7 | o3 ⇒ o7
- | o4 ⇒ o7 | o5 ⇒ o7 | o6 ⇒ o7 | o7 ⇒ o7 ]
- ].
-
-(* operatore xor *)
-ndefinition xor_oct ≝
-λe1,e2:oct.match e1 with
- [ o0 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o1 | o2 ⇒ o2 | o3 ⇒ o3
- | o4 ⇒ o4 | o5 ⇒ o5 | o6 ⇒ o6 | o7 ⇒ o7 ]
- | o1 ⇒ match e2 with
- [ o0 ⇒ o1 | o1 ⇒ o0 | o2 ⇒ o3 | o3 ⇒ o2
- | o4 ⇒ o5 | o5 ⇒ o4 | o6 ⇒ o7 | o7 ⇒ o6 ]
- | o2 ⇒ match e2 with
- [ o0 ⇒ o2 | o1 ⇒ o3 | o2 ⇒ o0 | o3 ⇒ o1
- | o4 ⇒ o6 | o5 ⇒ o7 | o6 ⇒ o4 | o7 ⇒ o5 ]
- | o3 ⇒ match e2 with
- [ o0 ⇒ o3 | o1 ⇒ o2 | o2 ⇒ o1 | o3 ⇒ o0
- | o4 ⇒ o7 | o5 ⇒ o6 | o6 ⇒ o5 | o7 ⇒ o4 ]
- | o4 ⇒ match e2 with
- [ o0 ⇒ o4 | o1 ⇒ o5 | o2 ⇒ o6 | o3 ⇒ o7
- | o4 ⇒ o0 | o5 ⇒ o1 | o6 ⇒ o2 | o7 ⇒ o3 ]
- | o5 ⇒ match e2 with
- [ o0 ⇒ o5 | o1 ⇒ o4 | o2 ⇒ o7 | o3 ⇒ o6
- | o4 ⇒ o1 | o5 ⇒ o0 | o6 ⇒ o3 | o7 ⇒ o2 ]
- | o6 ⇒ match e2 with
- [ o0 ⇒ o6 | o1 ⇒ o7 | o2 ⇒ o4 | o3 ⇒ o5
- | o4 ⇒ o2 | o5 ⇒ o3 | o6 ⇒ o0 | o7 ⇒ o1 ]
- | o7 ⇒ match e2 with
- [ o0 ⇒ o7 | o1 ⇒ o6 | o2 ⇒ o5 | o3 ⇒ o4
- | o4 ⇒ o3 | o5 ⇒ o2 | o6 ⇒ o1 | o7 ⇒ o0 ]
- ].
+(* iteratore sugli ottali *)
+ndefinition forall_oct ≝ λP.
+ P o0 ⊗ P o1 ⊗ P o2 ⊗ P o3 ⊗ P o4 ⊗ P o5 ⊗ P o6 ⊗ P o7.
(* operatore successore *)
ndefinition succ_oct ≝
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* OTTALI *)
(* ****** *)
-(*
ndefinition oct_destruct_aux ≝
Πn1,n2:oct.ΠP:Prop.n1 = n2 →
match eq_oct n1 n2 with [ true ⇒ P → P | false ⇒ P ].
nnormalize;
napply (λx.x).
nqed.
-*)
nlemma eq_to_eqoct : ∀n1,n2.n1 = n2 → eq_oct n1 n2 = true.
#n1; #n2; #H;
ncases n2;
nnormalize;
##[ ##1,10,19,28,37,46,55,64: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
+ ##| ##*: #H; napply (bool_destruct … H)
##]
nqed.
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* QUATERNARI *)
(* ********** *)
-(*
ndefinition quatern_destruct_aux ≝
Πn1,n2:quatern.ΠP:Prop.n1 = n2 →
match eq_qu n1 n2 with [ true ⇒ P → P | false ⇒ P ].
nnormalize;
napply (λx.x).
nqed.
-*)
nlemma eq_to_eqqu : ∀n1,n2.n1 = n2 → eq_qu n1 n2 = true.
#n1; #n2; #H;
ncases n2;
nnormalize;
##[ ##1,6,11,16: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
+ ##| ##*: #H; napply (bool_destruct … H)
##]
nqed.
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* WORD *)
(* **** *)
-ndefinition word16 ≝ comp_num byte8.
-ndefinition mk_word16 ≝ λb1,b2.mk_comp_num byte8 b1 b2.
-ndefinition ext_word16 ≝ λb2.mk_comp_num byte8 〈x0,x0〉 b2.
-ndefinition ext2_word16 ≝ λe2.mk_comp_num byte8 〈x0,x0〉 〈x0,e2〉.
+nrecord word16 : Type ≝
+ {
+ w16h: byte8;
+ w16l: byte8
+ }.
(* \langle \rangle *)
notation "〈x:y〉" non associative with precedence 80
- for @{ mk_comp_num byte8 $x $y }.
-
-(* iteratore sulle word *)
-ndefinition forall_w16 ≝ forall_cn ? forall_b8.
+ for @{ 'mk_word16 $x $y }.
+interpretation "mk_word16" 'mk_word16 x y = (mk_word16 x y).
(* operatore = *)
-ndefinition eq_w16 ≝ eq2_cn ? eq_b8.
+ndefinition eq_w16 ≝ λw1,w2.(eq_b8 (w16h w1) (w16h w2)) ⊗ (eq_b8 (w16l w1) (w16l w2)).
(* operatore < *)
-ndefinition lt_w16 ≝ ltgt_cn ? eq_b8 lt_b8.
+ndefinition lt_w16 ≝
+λw1,w2:word16.
+ (lt_b8 (w16h w1) (w16h w2)) ⊕
+ ((eq_b8 (w16h w1) (w16h w2)) ⊗ (lt_b8 (w16l w1) (w16l w2))).
(* operatore ≤ *)
-ndefinition le_w16 ≝ lege_cn ? eq_b8 lt_b8 le_b8.
+ndefinition le_w16 ≝
+λw1,w2:word16.
+ (lt_b8 (w16h w1) (w16h w2)) ⊕
+ ((eq_b8 (w16h w1) (w16h w2)) ⊗ (le_b8 (w16l w1) (w16l w2))).
(* operatore > *)
-ndefinition gt_w16 ≝ ltgt_cn ? eq_b8 gt_b8.
+ndefinition gt_w16 ≝
+λw1,w2:word16.
+ (gt_b8 (w16h w1) (w16h w2)) ⊕
+ ((eq_b8 (w16h w1) (w16h w2)) ⊗ (gt_b8 (w16l w1) (w16l w2))).
(* operatore ≥ *)
-ndefinition ge_w16 ≝ lege_cn ? eq_b8 gt_b8 ge_b8.
+ndefinition ge_w16 ≝
+λw1,w2:word16.
+ (gt_b8 (w16h w1) (w16h w2)) ⊕
+ ((eq_b8 (w16h w1) (w16h w2)) ⊗ (ge_b8 (w16l w1) (w16l w2))).
(* operatore and *)
-ndefinition and_w16 ≝ fop2_cn ? and_b8.
+ndefinition and_w16 ≝
+λw1,w2:word16.mk_word16 (and_b8 (w16h w1) (w16h w2)) (and_b8 (w16l w1) (w16l w2)).
(* operatore or *)
-ndefinition or_w16 ≝ fop2_cn ? or_b8.
+ndefinition or_w16 ≝
+λw1,w2:word16.mk_word16 (or_b8 (w16h w1) (w16h w2)) (or_b8 (w16l w1) (w16l w2)).
(* operatore xor *)
-ndefinition xor_w16 ≝ fop2_cn ? xor_b8.
-
-(* operatore Most Significant Bit *)
-ndefinition getMSB_w16 ≝ getOPH_cn ? getMSB_b8.
-ndefinition setMSB_w16 ≝ setOPH_cn ? setMSB_b8.
-ndefinition clrMSB_w16 ≝ setOPH_cn ? clrMSB_b8.
-
-(* operatore Least Significant Bit *)
-ndefinition getLSB_w16 ≝ getOPL_cn ? getLSB_b8.
-ndefinition setLSB_w16 ≝ setOPL_cn ? setLSB_b8.
-ndefinition clrLSB_w16 ≝ setOPL_cn ? clrLSB_b8.
-
-(* operatore estensione unsigned *)
-ndefinition extu_w16 ≝ λb2.〈〈x0,x0〉:b2〉.
-ndefinition extu2_w16 ≝ λe2.〈〈x0,x0〉:〈x0,e2〉〉.
-
-(* operatore estensione signed *)
-ndefinition exts_w16 ≝
-λb2.〈(match getMSB_b8 b2 with
- [ true ⇒ 〈xF,xF〉 | false ⇒ 〈x0,x0〉 ]):b2〉.
-ndefinition exts2_w16 ≝
-λe2.(match getMSB_ex e2 with
- [ true ⇒ 〈〈xF,xF〉:〈xF,e2〉〉 | false ⇒ 〈〈x0,x0〉:〈x0,e2〉〉 ]).
+ndefinition xor_w16 ≝
+λw1,w2:word16.mk_word16 (xor_b8 (w16h w1) (w16h w2)) (xor_b8 (w16l w1) (w16l w2)).
(* operatore rotazione destra con carry *)
-ndefinition rcr_w16 ≝ opcr_cn ? rcr_b8.
+ndefinition rcr_w16 ≝
+λw:word16.λc:bool.match rcr_b8 (w16h w) c with
+ [ pair wh' c' ⇒ match rcr_b8 (w16l w) c' with
+ [ pair wl' c'' ⇒ pair … (mk_word16 wh' wl') c'' ]].
(* operatore shift destro *)
-ndefinition shr_w16 ≝ opcr_cn ? rcr_b8 false.
+ndefinition shr_w16 ≝
+λw:word16.match rcr_b8 (w16h w) false with
+ [ pair wh' c' ⇒ match rcr_b8 (w16l w) c' with
+ [ pair wl' c'' ⇒ pair … (mk_word16 wh' wl') c'' ]].
(* operatore rotazione destra *)
ndefinition ror_w16 ≝
-λw.match shr_w16 w with
- [ pair c w' ⇒ match c with
- [ true ⇒ setMSB_w16 w' | false ⇒ w' ]].
+λw:word16.match rcr_b8 (w16h w) false with
+ [ pair wh' c' ⇒ match rcr_b8 (w16l w) c' with
+ [ pair wl' c'' ⇒ match c'' with
+ [ true ⇒ mk_word16 (or_b8 (mk_byte8 x8 x0) wh') wl'
+ | false ⇒ mk_word16 wh' wl' ]]].
+
+(* operatore rotazione destra n-volte *)
+nlet rec ror_w16_n (w:word16) (n:nat) on n ≝
+ match n with
+ [ O ⇒ w
+ | S n' ⇒ ror_w16_n (ror_w16 w) n' ].
(* operatore rotazione sinistra con carry *)
-ndefinition rcl_w16 ≝ opcl_cn ? rcl_b8.
+ndefinition rcl_w16 ≝
+λw:word16.λc:bool.match rcl_b8 (w16l w) c with
+ [ pair wl' c' ⇒ match rcl_b8 (w16h w) c' with
+ [ pair wh' c'' ⇒ pair … (mk_word16 wh' wl') c'' ]].
(* operatore shift sinistro *)
-ndefinition shl_w16 ≝ opcl_cn ? rcl_b8 false.
+ndefinition shl_w16 ≝
+λw:word16.match rcl_b8 (w16l w) false with
+ [ pair wl' c' ⇒ match rcl_b8 (w16h w) c' with
+ [ pair wh' c'' ⇒ pair … (mk_word16 wh' wl') c'' ]].
(* operatore rotazione sinistra *)
ndefinition rol_w16 ≝
-λw.match shl_w16 w with
- [ pair c w' ⇒ match c with
- [ true ⇒ setLSB_w16 w' | false ⇒ w' ]].
+λw:word16.match rcl_b8 (w16l w) false with
+ [ pair wl' c' ⇒ match rcl_b8 (w16h w) c' with
+ [ pair wh' c'' ⇒ match c'' with
+ [ true ⇒ mk_word16 wh' (or_b8 (mk_byte8 x0 x1) wl')
+ | false ⇒ mk_word16 wh' wl' ]]].
+
+(* operatore rotazione sinistra n-volte *)
+nlet rec rol_w16_n (w:word16) (n:nat) on n ≝
+ match n with
+ [ O ⇒ w
+ | S n' ⇒ rol_w16_n (rol_w16 w) n' ].
(* operatore not/complemento a 1 *)
-ndefinition not_w16 ≝ fop_cn ? not_b8.
+ndefinition not_w16 ≝
+λw:word16.mk_word16 (not_b8 (w16h w)) (not_b8 (w16l w)).
(* operatore somma con data+carry → data+carry *)
-ndefinition plus_w16_dc_dc ≝ opcl2_cn ? plus_b8_dc_dc.
+ndefinition plus_w16_dc_dc ≝
+λw1,w2:word16.λc:bool.
+ match plus_b8_dc_dc (w16l w1) (w16l w2) c with
+ [ pair l c ⇒ match plus_b8_dc_dc (w16h w1) (w16h w2) c with
+ [ pair h c' ⇒ pair … 〈h:l〉 c' ]].
(* operatore somma con data+carry → data *)
-ndefinition plus_w16_dc_d ≝ λc,w1,w2.snd … (plus_w16_dc_dc c w1 w2).
+ndefinition plus_w16_dc_d ≝
+λw1,w2:word16.λc:bool.
+ match plus_b8_dc_dc (w16l w1) (w16l w2) c with
+ [ pair l c ⇒ 〈plus_b8_dc_d (w16h w1) (w16h w2) c:l〉 ].
(* operatore somma con data+carry → c *)
-ndefinition plus_w16_dc_c ≝ λc,w1,w2.fst … (plus_w16_dc_dc c w1 w2).
+ndefinition plus_w16_dc_c ≝
+λw1,w2:word16.λc:bool.
+ plus_b8_dc_c (w16h w1) (w16h w2) (plus_b8_dc_c (w16l w1) (w16l w2) c).
(* operatore somma con data → data+carry *)
-ndefinition plus_w16_d_dc ≝ opcl2_cn ? plus_b8_dc_dc false.
+ndefinition plus_w16_d_dc ≝
+λw1,w2:word16.
+ match plus_b8_d_dc (w16l w1) (w16l w2) with
+ [ pair l c ⇒ match plus_b8_dc_dc (w16h w1) (w16h w2) c with
+ [ pair h c' ⇒ pair … 〈h:l〉 c' ]].
(* operatore somma con data → data *)
-ndefinition plus_w16_d_d ≝ λw1,w2.snd … (plus_w16_d_dc w1 w2).
+ndefinition plus_w16_d_d ≝
+λw1,w2:word16.
+ match plus_b8_d_dc (w16l w1) (w16l w2) with
+ [ pair l c ⇒ 〈plus_b8_dc_d (w16h w1) (w16h w2) c:l〉 ].
(* operatore somma con data → c *)
-ndefinition plus_w16_d_c ≝ λw1,w2.fst … (plus_w16_d_dc w1 w2).
+ndefinition plus_w16_d_c ≝
+λw1,w2:word16.
+ plus_b8_dc_c (w16h w1) (w16h w2) (plus_b8_d_c (w16l w1) (w16l w2)).
+
+(* operatore Most Significant Bit *)
+ndefinition MSB_w16 ≝ λw:word16.eq_ex x8 (and_ex x8 (b8h (w16h w))).
(* operatore predecessore *)
-ndefinition pred_w16 ≝ predsucc_cn ? (eq_b8 〈x0,x0〉) pred_b8.
+ndefinition pred_w16 ≝
+λw:word16.match eq_b8 (w16l w) (mk_byte8 x0 x0) with
+ [ true ⇒ mk_word16 (pred_b8 (w16h w)) (pred_b8 (w16l w))
+ | false ⇒ mk_word16 (w16h w) (pred_b8 (w16l w)) ].
(* operatore successore *)
-ndefinition succ_w16 ≝ predsucc_cn ? (eq_b8 〈xF,xF〉) succ_b8.
+ndefinition succ_w16 ≝
+λw:word16.match eq_b8 (w16l w) (mk_byte8 xF xF) with
+ [ true ⇒ mk_word16 (succ_b8 (w16h w)) (succ_b8 (w16l w))
+ | false ⇒ mk_word16 (w16h w) (succ_b8 (w16l w)) ].
(* operatore neg/complemento a 2 *)
ndefinition compl_w16 ≝
-λw:word16.match getMSB_w16 w with
+λw:word16.match MSB_w16 w with
[ true ⇒ succ_w16 (not_w16 w)
| false ⇒ not_w16 (pred_w16 w) ].
-(* operatore abs *)
-ndefinition abs_w16 ≝
-λw:word16.match getMSB_w16 w with
- [ true ⇒ compl_w16 w | false ⇒ w ].
-
-(* operatore x in [inf,sup] o in sup],[inf *)
-ndefinition inrange_w16 ≝
-λx,inf,sup:word16.
- match le_w16 inf sup with
- [ true ⇒ and_bool | false ⇒ or_bool ]
- (le_w16 inf x) (le_w16 x sup).
-
-(* operatore moltiplicazione senza segno *)
-(* 〈a1,a2〉 * 〈b1,b2〉 = (a1*b1) x0 x0 + x0 (a1*b2) x0 + x0 (a2*b1) x0 + x0 x0 (a2*b2) *)
-ndefinition mulu_b8_aux ≝
-λw.nat_it ? rol_w16 w nat4.
-
-ndefinition mulu_b8 ≝
-λb1,b2:byte8.
- plus_w16_d_d 〈(mulu_ex (cnH ? b1) (cnH ? b2)):〈x0,x0〉〉
- (plus_w16_d_d (mulu_b8_aux (extu_w16 (mulu_ex (cnH ? b1) (cnL ? b2))))
- (plus_w16_d_d (mulu_b8_aux (extu_w16 (mulu_ex (cnL ? b1) (cnH ? b2))))
- (extu_w16 (mulu_ex (cnL ? b1) (cnL ? b2))))).
-
-(* operatore moltiplicazione con segno *)
-(* x * y = sgn(x) * sgn(y) * |x| * |y| *)
-ndefinition muls_b8 ≝
-λb1,b2:byte8.
-(* ++/-- → +, +-/-+ → - *)
- match (getMSB_b8 b1) ⊙ (getMSB_b8 b2) with
- (* +- -+ → - *)
- [ true ⇒ compl_w16
- (* ++/-- → + *)
- | false ⇒ λx.x ] (mulu_b8 (abs_b8 b1) (abs_b8 b2)).
+(*
+ operatore moltiplicazione senza segno: b*b=[0x0000,0xFE01]
+ ... in pratica (〈a,b〉*〈c,d〉) = (a*c)<<8+(a*d)<<4+(b*c)<<4+(b*d)
+*)
+ndefinition mul_b8 ≝
+λb1,b2:byte8.match b1 with
+[ mk_byte8 b1h b1l ⇒ match b2 with
+[ mk_byte8 b2h b2l ⇒ match mul_ex b1l b2l with
+[ mk_byte8 t1_h t1_l ⇒ match mul_ex b1h b2l with
+[ mk_byte8 t2_h t2_l ⇒ match mul_ex b2h b1l with
+[ mk_byte8 t3_h t3_l ⇒ match mul_ex b1h b2h with
+[ mk_byte8 t4_h t4_l ⇒
+ plus_w16_d_d
+ (plus_w16_d_d
+ (plus_w16_d_d 〈〈x0,t3_h〉:〈t3_l,x0〉〉 〈〈x0,t2_h〉:〈t2_l,x0〉〉) 〈〈t4_h,t4_l〉:〈x0,x0〉〉)〈〈x0,x0〉:〈t1_h,t1_l〉〉
+]]]]]].
(* divisione senza segno (secondo la logica delle ALU): (quoziente resto) overflow *)
-nlet rec div_b8_aux (divd:word16) (divs:word16) (molt:byte8) (q:byte8) (n:nat) on n ≝
+nlet rec div_b8_aux (divd:word16) (divs:word16) (molt:byte8) (q:byte8) (c:nat) on c ≝
let w' ≝ plus_w16_d_d divd (compl_w16 divs) in
- match n with
+ match c with
[ O ⇒ match le_w16 divs divd with
- [ true ⇒ triple … (or_b8 molt q) (cnL ? w') (⊖ (eq_b8 (cnH ? w') 〈x0,x0〉))
- | false ⇒ triple … q (cnL ? divd) (⊖ (eq_b8 (cnH ? divd) 〈x0,x0〉)) ]
- | S n' ⇒ match le_w16 divs divd with
- [ true ⇒ div_b8_aux w' (ror_w16 divs) (ror_b8 molt) (or_b8 molt q) n'
- | false ⇒ div_b8_aux divd (ror_w16 divs) (ror_b8 molt) q n' ]].
+ [ true ⇒ triple … (or_b8 molt q) (w16l w') (⊖ (eq_b8 (w16h w') 〈x0,x0〉))
+ | false ⇒ triple … q (w16l divd) (⊖ (eq_b8 (w16h divd) 〈x0,x0〉)) ]
+ | S c' ⇒ match le_w16 divs divd with
+ [ true ⇒ div_b8_aux w' (ror_w16 divs) (ror_b8 molt) (or_b8 molt q) c'
+ | false ⇒ div_b8_aux divd (ror_w16 divs) (ror_b8 molt) q c' ]].
ndefinition div_b8 ≝
λw:word16.λb:byte8.match eq_b8 b 〈x0,x0〉 with
-(* la combinazione n/0 e' illegale, segnala solo overflow senza dare risultato *)
- [ true ⇒ triple … 〈xF,xF〉 (cnL ? w) true
+(*
+ la combinazione n/0 e' illegale, segnala solo overflow senza dare risultato
+*)
+ [ true ⇒ triple … 〈xF,xF〉 (w16l w) true
| false ⇒ match eq_w16 w 〈〈x0,x0〉:〈x0,x0〉〉 with
(* 0 diviso qualsiasi cosa diverso da 0 da' q=0 r=0 o=false *)
[ true ⇒ triple … 〈x0,x0〉 〈x0,x0〉 false
(* 3) ad ogni ciclo il divisore e il moltiplicatore vengono scalati di 1 a dx *)
(* 4) il moltiplicatore e' la quantita' aggiunta al quoziente se il divisore *)
(* puo' essere sottratto al dividendo *)
- | false ⇒ div_b8_aux w (nat_it ? rol_w16 (extu_w16 b) nat7) 〈x8,x0〉 〈x0,x0〉 nat7 ]].
+ | false ⇒ div_b8_aux w (rol_w16_n 〈〈x0,x0〉:b〉 nat7) 〈x8,x0〉 〈x0,x0〉 nat7 ]].
+
+(* operatore x in [inf,sup] *)
+ndefinition inrange_w16 ≝
+λx,inf,sup:word16.(le_w16 inf x) ⊗ (le_w16 x sup).
+
+(* iteratore sulle word *)
+ndefinition forall_w16 ≝
+ λP.
+ forall_b8 (λbh.
+ forall_b8 (λbl.
+ P (mk_word16 bh bl ))).
(* word16 ricorsive *)
ninductive rec_word16 : word16 → Type ≝
ndefinition w16_to_recw16 : Πw.rec_word16 w ≝
λw.
- match w with [ mk_comp_num h l ⇒
- match l with [ mk_comp_num lh ll ⇒
+ match w with [ mk_word16 h l ⇒
+ match l with [ mk_byte8 lh ll ⇒
w16_to_recw16_aux4 h lh ll (w16_to_recw16_aux3 h lh (w16_to_recw16_aux2 h (b8_to_recb8 h))) ]].
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* WORD *)
(* **** *)
-ndefinition word16_destruct_1 ≝ cn_destruct_1 word16.
-ndefinition word16_destruct_2 ≝ cn_destruct_2 word16.
+nlemma word16_destruct_1 :
+∀x1,x2,y1,y2.
+ mk_word16 x1 y1 = mk_word16 x2 y2 → x1 = x2.
+ #x1; #x2; #y1; #y2; #H;
+ nchange with (match mk_word16 x2 y2 with [ mk_word16 a _ ⇒ x1 = a ]);
+ nrewrite < H;
+ nnormalize;
+ napply refl_eq.
+nqed.
-ndefinition symmetric_eqw16 ≝ symmetric_eqcn ? eq_b8 symmetric_eqb8.
+nlemma word16_destruct_2 :
+∀x1,x2,y1,y2.
+ mk_word16 x1 y1 = mk_word16 x2 y2 → y1 = y2.
+ #x1; #x2; #y1; #y2; #H;
+ nchange with (match mk_word16 x2 y2 with [ mk_word16 _ b ⇒ y1 = b ]);
+ nrewrite < H;
+ nnormalize;
+ napply refl_eq.
+nqed.
-ndefinition eqw16_to_eq ≝ eqcn_to_eq ? eq_b8 eqb8_to_eq.
-ndefinition eq_to_eqw16 ≝ eq_to_eqcn ? eq_b8 eq_to_eqb8.
+nlemma symmetric_eqw16 : symmetricT word16 bool eq_w16.
+ #w1; #w2;
+ nelim w1;
+ nelim w2;
+ #b1; #b2; #b3; #b4;
+ nchange with (((eq_b8 b3 b1)⊗(eq_b8 b4 b2)) = ((eq_b8 b1 b3)⊗(eq_b8 b2 b4)));
+ nrewrite > (symmetric_eqb8 b1 b3);
+ nrewrite > (symmetric_eqb8 b2 b4);
+ napply refl_eq.
+nqed.
-ndefinition decidable_w16 ≝ decidable_cn ? decidable_b8.
+nlemma symmetric_andw16 : symmetricT word16 word16 and_w16.
+ #w1; #w2;
+ nelim w1;
+ nelim w2;
+ #b1; #b2; #b3; #b4;
+ nchange with ((mk_word16 (and_b8 b3 b1) (and_b8 b4 b2)) = (mk_word16 (and_b8 b1 b3) (and_b8 b2 b4)));
+ nrewrite > (symmetric_andb8 b1 b3);
+ nrewrite > (symmetric_andb8 b2 b4);
+ napply refl_eq.
+nqed.
-ndefinition neqw16_to_neq ≝ neqcn_to_neq ? eq_b8 neqb8_to_neq.
-ndefinition neq_to_neqw16 ≝ neq_to_neqcn ? eq_b8 neq_to_neqb8 decidable_b8.
+nlemma associative_andw16 : ∀w1,w2,w3.(and_w16 (and_w16 w1 w2) w3) = (and_w16 w1 (and_w16 w2 w3)).
+ #w1; #w2; #w3;
+ nelim w1;
+ #b1; #b2;
+ nelim w2;
+ #b3; #b4;
+ nelim w3;
+ #b5; #b6;
+ nchange with (mk_word16 (and_b8 (and_b8 b1 b3) b5) (and_b8 (and_b8 b2 b4) b6) =
+ mk_word16 (and_b8 b1 (and_b8 b3 b5)) (and_b8 b2 (and_b8 b4 b6)));
+ nrewrite < (associative_andb8 b1 b3 b5);
+ nrewrite < (associative_andb8 b2 b4 b6);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_orw16 : symmetricT word16 word16 or_w16.
+ #w1; #w2;
+ nelim w1;
+ nelim w2;
+ #b1; #b2; #b3; #b4;
+ nchange with ((mk_word16 (or_b8 b3 b1) (or_b8 b4 b2)) = (mk_word16 (or_b8 b1 b3) (or_b8 b2 b4)));
+ nrewrite > (symmetric_orb8 b1 b3);
+ nrewrite > (symmetric_orb8 b2 b4);
+ napply refl_eq.
+nqed.
+
+nlemma associative_orw16 : ∀w1,w2,w3.(or_w16 (or_w16 w1 w2) w3) = (or_w16 w1 (or_w16 w2 w3)).
+ #w1; #w2; #w3;
+ nelim w1;
+ #b1; #b2;
+ nelim w2;
+ #b3; #b4;
+ nelim w3;
+ #b5; #b6;
+ nchange with (mk_word16 (or_b8 (or_b8 b1 b3) b5) (or_b8 (or_b8 b2 b4) b6) =
+ mk_word16 (or_b8 b1 (or_b8 b3 b5)) (or_b8 b2 (or_b8 b4 b6)));
+ nrewrite < (associative_orb8 b1 b3 b5);
+ nrewrite < (associative_orb8 b2 b4 b6);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_xorw16 : symmetricT word16 word16 xor_w16.
+ #w1; #w2;
+ nelim w1;
+ nelim w2;
+ #b1; #b2; #b3; #b4;
+ nchange with ((mk_word16 (xor_b8 b3 b1) (xor_b8 b4 b2)) = (mk_word16 (xor_b8 b1 b3) (xor_b8 b2 b4)));
+ nrewrite > (symmetric_xorb8 b1 b3);
+ nrewrite > (symmetric_xorb8 b2 b4);
+ napply refl_eq.
+nqed.
+
+nlemma associative_xorw16 : ∀w1,w2,w3.(xor_w16 (xor_w16 w1 w2) w3) = (xor_w16 w1 (xor_w16 w2 w3)).
+ #w1; #w2; #w3;
+ nelim w1;
+ #b1; #b2;
+ nelim w2;
+ #b3; #b4;
+ nelim w3;
+ #b5; #b6;
+ nchange with (mk_word16 (xor_b8 (xor_b8 b1 b3) b5) (xor_b8 (xor_b8 b2 b4) b6) =
+ mk_word16 (xor_b8 b1 (xor_b8 b3 b5)) (xor_b8 b2 (xor_b8 b4 b6)));
+ nrewrite < (associative_xorb8 b1 b3 b5);
+ nrewrite < (associative_xorb8 b2 b4 b6);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusw16_dc_dc : ∀w1,w2,c.plus_w16_dc_dc w1 w2 c = plus_w16_dc_dc w2 w1 c.
+ #w1; #w2; #c;
+ nelim w1;
+ #b1; #b2;
+ nelim w2;
+ #b3; #b4;
+ nchange with (
+ match plus_b8_dc_dc b2 b4 c with [ pair l c ⇒ match plus_b8_dc_dc b1 b3 c with [ pair h c' ⇒ pair … 〈h:l〉 c' ]] =
+ match plus_b8_dc_dc b4 b2 c with [ pair l c ⇒ match plus_b8_dc_dc b3 b1 c with [ pair h c' ⇒ pair … 〈h:l〉 c' ]]);
+ nrewrite > (symmetric_plusb8_dc_dc b4 b2 c);
+ ncases (plus_b8_dc_dc b2 b4 c);
+ #b5; #c1;
+ nchange with (
+ match plus_b8_dc_dc b1 b3 c1 with [ pair h c' ⇒ pair … 〈h:b5〉 c' ] =
+ match plus_b8_dc_dc b3 b1 c1 with [ pair h c' ⇒ pair … 〈h:b5〉 c' ]);
+ nrewrite > (symmetric_plusb8_dc_dc b1 b3 c1);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusw16_dc_d : ∀w1,w2,c.plus_w16_dc_d w1 w2 c = plus_w16_dc_d w2 w1 c.
+ #w1; #w2; #c;
+ nelim w1;
+ #b1; #b2;
+ nelim w2;
+ #b3; #b4;
+ nchange with (
+ match plus_b8_dc_dc b2 b4 c with [ pair l c ⇒ 〈plus_b8_dc_d b1 b3 c:l〉 ] =
+ match plus_b8_dc_dc b4 b2 c with [ pair l c ⇒ 〈plus_b8_dc_d b3 b1 c:l〉 ]);
+ nrewrite > (symmetric_plusb8_dc_dc b4 b2 c);
+ ncases (plus_b8_dc_dc b2 b4 c);
+ #b5; #c1;
+ nchange with (〈plus_b8_dc_d b1 b3 c1:b5〉 = 〈plus_b8_dc_d b3 b1 c1:b5〉);
+ nrewrite > (symmetric_plusb8_dc_d b1 b3 c1);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusw16_dc_c : ∀w1,w2,c.plus_w16_dc_c w1 w2 c = plus_w16_dc_c w2 w1 c.
+ #w1; #w2; #c;
+ nelim w1;
+ #b1; #b2;
+ nelim w2;
+ #b3; #b4;
+ nchange with (
+ plus_b8_dc_c b1 b3 (plus_b8_dc_c b2 b4 c) =
+ plus_b8_dc_c b3 b1 (plus_b8_dc_c b4 b2 c));
+ nrewrite > (symmetric_plusb8_dc_c b4 b2 c);
+ nrewrite > (symmetric_plusb8_dc_c b3 b1 (plus_b8_dc_c b2 b4 c));
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusw16_d_dc : ∀w1,w2.plus_w16_d_dc w1 w2 = plus_w16_d_dc w2 w1.
+ #w1; #w2;
+ nelim w1;
+ #b1; #b2;
+ nelim w2;
+ #b3; #b4;
+ nchange with (
+ match plus_b8_d_dc b2 b4 with [ pair l c ⇒ match plus_b8_dc_dc b1 b3 c with [ pair h c' ⇒ pair … 〈h:l〉 c' ]] =
+ match plus_b8_d_dc b4 b2 with [ pair l c ⇒ match plus_b8_dc_dc b3 b1 c with [ pair h c' ⇒ pair … 〈h:l〉 c' ]]);
+ nrewrite > (symmetric_plusb8_d_dc b4 b2);
+ ncases (plus_b8_d_dc b2 b4);
+ #b5; #c;
+ nchange with (
+ match plus_b8_dc_dc b1 b3 c with [ pair h c' ⇒ pair … 〈h:b5〉 c' ] =
+ match plus_b8_dc_dc b3 b1 c with [ pair h c' ⇒ pair … 〈h:b5〉 c' ]);
+ nrewrite > (symmetric_plusb8_dc_dc b1 b3 c);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusw16_d_d : ∀w1,w2.plus_w16_d_d w1 w2 = plus_w16_d_d w2 w1.
+ #w1; #w2;
+ nelim w1;
+ #b1; #b2;
+ nelim w2;
+ #b3; #b4;
+ nchange with (
+ match plus_b8_d_dc b2 b4 with [ pair l c ⇒ 〈plus_b8_dc_d b1 b3 c:l〉 ] =
+ match plus_b8_d_dc b4 b2 with [ pair l c ⇒ 〈plus_b8_dc_d b3 b1 c:l〉 ]);
+ nrewrite > (symmetric_plusb8_d_dc b4 b2);
+ ncases (plus_b8_d_dc b2 b4);
+ #b5; #c;
+ nchange with (〈plus_b8_dc_d b1 b3 c:b5〉 = 〈plus_b8_dc_d b3 b1 c:b5〉);
+ nrewrite > (symmetric_plusb8_dc_d b1 b3 c);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusw16_d_c : ∀w1,w2.plus_w16_d_c w1 w2 = plus_w16_d_c w2 w1.
+ #w1; #w2;
+ nelim w1;
+ #b1; #b2;
+ nelim w2;
+ #b3; #b4;
+ nchange with (
+ plus_b8_dc_c b1 b3 (plus_b8_d_c b2 b4) =
+ plus_b8_dc_c b3 b1 (plus_b8_d_c b4 b2));
+ nrewrite > (symmetric_plusb8_d_c b4 b2);
+ nrewrite > (symmetric_plusb8_dc_c b3 b1 (plus_b8_d_c b2 b4));
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_mulb8 : symmetricT byte8 word16 mul_b8.
+ #b1; #b2;
+ nelim b1;
+ #e1; #e2;
+ nelim b2;
+ #e3; #e4;
+ nchange with (match mul_ex e2 e4 with
+ [ mk_byte8 t1_h t1_l ⇒ match mul_ex e1 e4 with
+ [ mk_byte8 t2_h t2_l ⇒ match mul_ex e3 e2 with
+ [ mk_byte8 t3_h t3_l ⇒ match mul_ex e1 e3 with
+ [ mk_byte8 t4_h t4_l ⇒ plus_w16_d_d (plus_w16_d_d (plus_w16_d_d 〈〈x0,t3_h〉:〈t3_l,x0〉〉 〈〈x0,t2_h〉:〈t2_l,x0〉〉) 〈〈t4_h,t4_l〉:〈x0,x0〉〉)〈〈x0,x0〉:〈t1_h,t1_l〉〉
+ ]]]] = match mul_ex e4 e2 with
+ [ mk_byte8 t1_h t1_l ⇒ match mul_ex e3 e2 with
+ [ mk_byte8 t2_h t2_l ⇒ match mul_ex e1 e4 with
+ [ mk_byte8 t3_h t3_l ⇒ match mul_ex e3 e1 with
+ [ mk_byte8 t4_h t4_l ⇒ plus_w16_d_d (plus_w16_d_d (plus_w16_d_d 〈〈x0,t3_h〉:〈t3_l,x0〉〉 〈〈x0,t2_h〉:〈t2_l,x0〉〉) 〈〈t4_h,t4_l〉:〈x0,x0〉〉)〈〈x0,x0〉:〈t1_h,t1_l〉〉
+ ]]]]);
+ nrewrite < (symmetric_mulex e2 e4);
+ ncases (mul_ex e2 e4);
+ #e5; #e6;
+ nchange with (match mul_ex e1 e4 with
+ [ mk_byte8 t2_h t2_l ⇒ match mul_ex e3 e2 with
+ [ mk_byte8 t3_h t3_l ⇒ match mul_ex e1 e3 with
+ [ mk_byte8 t4_h t4_l ⇒ plus_w16_d_d (plus_w16_d_d (plus_w16_d_d 〈〈x0,t3_h〉:〈t3_l,x0〉〉 〈〈x0,t2_h〉:〈t2_l,x0〉〉) 〈〈t4_h,t4_l〉:〈x0,x0〉〉)〈〈x0,x0〉:〈e5,e6〉〉
+ ]]] = match mul_ex e3 e2 with
+ [ mk_byte8 t2_h t2_l ⇒ match mul_ex e1 e4 with
+ [ mk_byte8 t3_h t3_l ⇒ match mul_ex e3 e1 with
+ [ mk_byte8 t4_h t4_l ⇒ plus_w16_d_d (plus_w16_d_d (plus_w16_d_d 〈〈x0,t3_h〉:〈t3_l,x0〉〉 〈〈x0,t2_h〉:〈t2_l,x0〉〉) 〈〈t4_h,t4_l〉:〈x0,x0〉〉)〈〈x0,x0〉:〈e5,e6〉〉
+ ]]]);
+ ncases (mul_ex e3 e2);
+ #e7; #e8;
+ ncases (mul_ex e1 e4);
+ #e9; #e10;
+ nchange with (match mul_ex e1 e3 with
+ [ mk_byte8 t4_h t4_l ⇒ plus_w16_d_d (plus_w16_d_d (plus_w16_d_d 〈〈x0,e7〉:〈e8,x0〉〉 〈〈x0,e9〉:〈e10,x0〉〉) 〈〈t4_h,t4_l〉:〈x0,x0〉〉)〈〈x0,x0〉:〈e5,e6〉〉
+ ] = match mul_ex e3 e1 with
+ [ mk_byte8 t4_h t4_l ⇒ plus_w16_d_d (plus_w16_d_d (plus_w16_d_d 〈〈x0,e9〉:〈e10,x0〉〉 〈〈x0,e7〉:〈e8,x0〉〉) 〈〈t4_h,t4_l〉:〈x0,x0〉〉)〈〈x0,x0〉:〈e5,e6〉〉
+ ]);
+ nrewrite < (symmetric_mulex e1 e3);
+ ncases (mul_ex e1 e3);
+ #e11; #e12;
+ nchange with ((plus_w16_d_d (plus_w16_d_d (plus_w16_d_d 〈〈x0,e7〉:〈e8,x0〉〉 〈〈x0,e9〉:〈e10,x0〉〉) 〈〈e11,e12〉:〈x0,x0〉〉)〈〈x0,x0〉:〈e5,e6〉〉) =
+ (plus_w16_d_d (plus_w16_d_d (plus_w16_d_d 〈〈x0,e9〉:〈e10,x0〉〉 〈〈x0,e7〉:〈e8,x0〉〉) 〈〈e11,e12〉:〈x0,x0〉〉)〈〈x0,x0〉:〈e5,e6〉〉));
+ nrewrite > (symmetric_plusw16_d_d 〈〈x0,e7〉:〈e8,x0〉〉 〈〈x0,e9〉:〈e10,x0〉〉);
+ napply refl_eq.
+nqed.
+
+nlemma eqw16_to_eq : ∀w1,w2:word16.(eq_w16 w1 w2 = true) → (w1 = w2).
+ #w1; #w2;
+ nelim w1;
+ nelim w2;
+ #b1; #b2; #b3; #b4;
+ nchange in ⊢ (% → ?) with (((eq_b8 b3 b1)⊗(eq_b8 b4 b2)) = true);
+ #H;
+ nrewrite < (eqb8_to_eq … (andb_true_true_l … H));
+ nrewrite < (eqb8_to_eq … (andb_true_true_r … H));
+ napply refl_eq.
+nqed.
+
+nlemma eq_to_eqw16 : ∀w1,w2.w1 = w2 → eq_w16 w1 w2 = true.
+ #w1; #w2;
+ nelim w1;
+ nelim w2;
+ #b1; #b2; #b3; #b4;
+ #H;
+ nrewrite < (word16_destruct_1 … H);
+ nrewrite < (word16_destruct_2 … H);
+ nchange with (((eq_b8 b3 b3)⊗(eq_b8 b4 b4)) = true);
+ nrewrite > (eq_to_eqb8 b3 b3 (refl_eq …));
+ nrewrite > (eq_to_eqb8 b4 b4 (refl_eq …));
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma decidable_w16_aux1 : ∀b1,b2,b3,b4.b1 ≠ b3 → 〈b1:b2〉 ≠ 〈b3:b4〉.
+ #b1; #b2; #b3; #b4;
+ nnormalize; #H; #H1;
+ napply (H (word16_destruct_1 … H1)).
+nqed.
+
+nlemma decidable_w16_aux2 : ∀b1,b2,b3,b4.b2 ≠ b4 → 〈b1:b2〉 ≠ 〈b3:b4〉.
+ #b1; #b2; #b3; #b4;
+ nnormalize; #H; #H1;
+ napply (H (word16_destruct_2 … H1)).
+nqed.
+
+nlemma decidable_w16 : ∀x,y:word16.decidable (x = y).
+ #x; nelim x; #b1; #b2;
+ #y; nelim y; #b3; #b4;
+ nnormalize;
+ napply (or2_elim (b1 = b3) (b1 ≠ b3) ? (decidable_b8 b1 b3) …);
+ ##[ ##2: #H; napply (or2_intro2 … (decidable_w16_aux1 b1 b2 b3 b4 H))
+ ##| ##1: #H; napply (or2_elim (b2 = b4) (b2 ≠ b4) ? (decidable_b8 b2 b4) …);
+ ##[ ##2: #H1; napply (or2_intro2 … (decidable_w16_aux2 b1 b2 b3 b4 H1))
+ ##| ##1: #H1; nrewrite > H; nrewrite > H1;
+ napply (or2_intro1 … (refl_eq ? 〈b3:b4〉))
+ ##]
+ ##]
+nqed.
+
+nlemma neqw16_to_neq : ∀w1,w2:word16.(eq_w16 w1 w2 = false) → (w1 ≠ w2).
+ #w1; #w2;
+ nelim w1;
+ nelim w2;
+ #b1; #b2; #b3; #b4;
+ nchange with ((((eq_b8 b3 b1) ⊗ (eq_b8 b4 b2)) = false) → ?);
+ #H;
+ napply (or2_elim ((eq_b8 b3 b1) = false) ((eq_b8 b4 b2) = false) ? (andb_false2 … H) …);
+ ##[ ##1: #H1; napply (decidable_w16_aux1 … (neqb8_to_neq … H1))
+ ##| ##2: #H1; napply (decidable_w16_aux2 … (neqb8_to_neq … H1))
+ ##]
+nqed.
+
+nlemma word16_destruct : ∀b1,b2,b3,b4.〈b1:b2〉 ≠ 〈b3:b4〉 → b1 ≠ b3 ∨ b2 ≠ b4.
+ #b1; #b2; #b3; #b4;
+ nnormalize; #H;
+ napply (or2_elim (b1 = b3) (b1 ≠ b3) ? (decidable_b8 b1 b3) …);
+ ##[ ##2: #H1; napply (or2_intro1 … H1)
+ ##| ##1: #H1; napply (or2_elim (b2 = b4) (b2 ≠ b4) ? (decidable_b8 b2 b4) …);
+ ##[ ##2: #H2; napply (or2_intro2 … H2)
+ ##| ##1: #H2; nrewrite > H1 in H:(%);
+ nrewrite > H2;
+ #H; nelim (H (refl_eq …))
+ ##]
+ ##]
+nqed.
+
+nlemma neq_to_neqw16 : ∀w1,w2.w1 ≠ w2 → eq_w16 w1 w2 = false.
+ #w1; #w2;
+ nelim w1; #b1; #b2;
+ nelim w2; #b3; #b4;
+ #H; nchange with (((eq_b8 b1 b3) ⊗ (eq_b8 b2 b4)) = false);
+ napply (or2_elim (b1 ≠ b3) (b2 ≠ b4) ? (word16_destruct … H) …);
+ ##[ ##1: #H1; nrewrite > (neq_to_neqb8 … H1); nnormalize; napply refl_eq
+ ##| ##2: #H1; nrewrite > (neq_to_neqb8 … H1);
+ nrewrite > (symmetric_andbool (eq_b8 b1 b3) false);
+ nnormalize; napply refl_eq
+ ##]
+nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/byte8.ma".
-
-(* ********* *)
-(* BYTE+WORD *)
-(* ********* *)
-
-nrecord word24 : Type ≝
- {
- w24x: byte8;
- w24h: byte8;
- w24l: byte8
- }.
-
-(* \langle \rangle *)
-notation "〈x;y;z〉" non associative with precedence 80
- for @{ 'mk_word24 $x $y $z }.
-interpretation "mk_word24" 'mk_word24 x y z = (mk_word24 x y z).
-
-(* iteratore sulle word *)
-ndefinition forall_w24 ≝
- λP.
- forall_b8 (λbx.
- forall_b8 (λbh.
- forall_b8 (λbl.
- P (mk_word24 bx bh bl )))).
-
-(* operatore = *)
-ndefinition eq_w24 ≝
-λw1,w2.(eq_b8 (w24x w1) (w24x w2)) ⊗
- (eq_b8 (w24h w1) (w24h w2)) ⊗
- (eq_b8 (w24l w1) (w24l w2)).
-
-(* operatore < *)
-ndefinition lt_w24 ≝
-λw1,w2:word24.
- (lt_b8 (w24x w1) (w24x w2)) ⊕
- ((eq_b8 (w24x w1) (w24x w2)) ⊗ ((lt_b8 (w24h w1) (w24h w2)) ⊕
- ((eq_b8 (w24h w1) (w24h w2)) ⊗ (lt_b8 (w24l w1) (w24l w2))))).
-
-(* operatore ≤ *)
-ndefinition le_w24 ≝
-λw1,w2:word24.
- (lt_b8 (w24x w1) (w24x w2)) ⊕
- ((eq_b8 (w24x w1) (w24x w2)) ⊗ ((lt_b8 (w24h w1) (w24h w2)) ⊕
- ((eq_b8 (w24h w1) (w24h w2)) ⊗ (le_b8 (w24l w1) (w24l w2))))).
-
-(* operatore > *)
-ndefinition gt_w24 ≝
-λw1,w2:word24.
- (gt_b8 (w24x w1) (w24x w2)) ⊕
- ((eq_b8 (w24x w1) (w24x w2)) ⊗ ((gt_b8 (w24h w1) (w24h w2)) ⊕
- ((eq_b8 (w24h w1) (w24h w2)) ⊗ (gt_b8 (w24l w1) (w24l w2))))).
-
-(* operatore ≥ *)
-ndefinition ge_w24 ≝
-λw1,w2:word24.
- (gt_b8 (w24x w1) (w24x w2)) ⊕
- ((eq_b8 (w24x w1) (w24x w2)) ⊗ ((gt_b8 (w24h w1) (w24h w2)) ⊕
- ((eq_b8 (w24h w1) (w24h w2)) ⊗ (ge_b8 (w24l w1) (w24l w2))))).
-
-(* operatore and *)
-ndefinition and_w24 ≝
-λw1,w2:word24.
- mk_word24 (and_b8 (w24x w1) (w24x w2))
- (and_b8 (w24h w1) (w24h w2))
- (and_b8 (w24l w1) (w24l w2)).
-
-(* operatore or *)
-ndefinition or_w24 ≝
-λw1,w2:word24.
- mk_word24 (or_b8 (w24x w1) (w24x w2))
- (or_b8 (w24h w1) (w24h w2))
- (or_b8 (w24l w1) (w24l w2)).
-
-(* operatore xor *)
-ndefinition xor_w24 ≝
-λw1,w2:word24.
- mk_word24 (xor_b8 (w24x w1) (w24x w2))
- (xor_b8 (w24h w1) (w24h w2))
- (xor_b8 (w24l w1) (w24l w2)).
-
-(* operatore Most Significant Bit *)
-ndefinition getMSB_w24 ≝ λw:word24.getMSB_b8 (w24x w).
-ndefinition setMSB_w24 ≝ λw:word24.mk_word24 (setMSB_b8 (w24x w)) (w24h w) (w24l w).
-ndefinition clrMSB_w24 ≝ λw:word24.mk_word24 (clrMSB_b8 (w24x w)) (w24h w) (w24l w).
-
-(* operatore Least Significant Bit *)
-ndefinition getLSB_w24 ≝ λw:word24.getLSB_b8 (w24l w).
-ndefinition setLSB_w24 ≝ λw:word24.mk_word24 (w24x w) (w24h w) (setLSB_b8 (w24l w)).
-ndefinition clrLSB_w24 ≝ λw:word24.mk_word24 (w24x w) (w24h w) (clrLSB_b8 (w24l w)).
-
-(* operatore rotazione destra con carry *)
-ndefinition rcr_w24 ≝
-λc:bool.λw:word24.match rcr_b8 c (w24x w) with
- [ pair c' wx' ⇒ match rcr_b8 c' (w24h w) with
- [ pair c'' wh' ⇒ match rcr_b8 c'' (w24l w) with
- [ pair c''' wl' ⇒ pair … c''' (mk_word24 wx' wh' wl') ]]].
-
-(* operatore shift destro *)
-ndefinition shr_w24 ≝ rcr_w24 false.
-
-(* operatore rotazione destra *)
-ndefinition ror_w24 ≝
-λw.match shr_w24 w with
- [ pair c w' ⇒ match c with
- [ true ⇒ setMSB_w24 w' | false ⇒ w' ]].
-
-(* operatore rotazione sinistra con carry *)
-ndefinition rcl_w24 ≝
-λc:bool.λw:word24.match rcl_b8 c (w24l w) with
- [ pair c' wl' ⇒ match rcl_b8 c' (w24h w) with
- [ pair c'' wh' ⇒ match rcl_b8 c'' (w24x w) with
- [ pair c''' wx' ⇒ pair … c''' (mk_word24 wx' wh' wl') ]]].
-
-(* operatore shift sinistro *)
-ndefinition shl_w24 ≝ rcl_w24 false.
-
-(* operatore rotazione sinistra *)
-ndefinition rol_w24 ≝
-λw.match shl_w24 w with
- [ pair c w' ⇒ match c with
- [ true ⇒ setLSB_w24 w' | false ⇒ w' ]].
-
-(* operatore not/complemento a 1 *)
-ndefinition not_w24 ≝
-λw:word24.mk_word24 (not_b8 (w24x w)) (not_b8 (w24h w)) (not_b8 (w24l w)).
-
-(* operatore somma con data+carry → data+carry *)
-ndefinition plus_w24_dc_dc ≝
-λc:bool.λw1,w2:word24.
- match plus_b8_dc_dc c (w24l w1) (w24l w2) with
- [ pair c' l ⇒ match plus_b8_dc_dc c' (w24h w1) (w24h w2) with
- [ pair c'' h ⇒ match plus_b8_dc_dc c'' (w24x w1) (w24x w2) with
- [ pair c''' x ⇒ pair … c''' 〈x;h;l〉 ]]].
-
-(* operatore somma con data+carry → data *)
-ndefinition plus_w24_dc_d ≝ λc,w1,w2.snd … (plus_w24_dc_dc c w1 w2).
-
-(* operatore somma con data+carry → c *)
-ndefinition plus_w24_dc_c ≝ λc,w1,w2.fst … (plus_w24_dc_dc c w1 w2).
-
-(* operatore somma con data → data+carry *)
-ndefinition plus_w24_d_dc ≝ plus_w24_dc_dc false.
-
-(* operatore somma con data → data *)
-ndefinition plus_w24_d_d ≝ λw1,w2.snd … (plus_w24_d_dc w1 w2).
-
-(* operatore somma con data → c *)
-ndefinition plus_w24_d_c ≝ λw1,w2.fst … (plus_w24_d_dc w1 w2).
-
-(* operatore predecessore *)
-ndefinition pred_w24 ≝
-λw:word24.match eq_b8 (w24l w) 〈x0,x0〉 with
- [ true ⇒ match eq_b8 (w24h w) 〈x0,x0〉 with
- [ true ⇒ mk_word24 (pred_b8 (w24x w)) (pred_b8 (w24h w)) (pred_b8 (w24l w))
- | false ⇒ mk_word24 (w24x w) (pred_b8 (w24h w)) (pred_b8 (w24l w)) ]
- | false ⇒ mk_word24 (w24x w) (w24h w) (pred_b8 (w24l w)) ].
-
-(* operatore successore *)
-ndefinition succ_w24 ≝
-λw:word24.match eq_b8 (w24l w) 〈xF,xF〉 with
- [ true ⇒ match eq_b8 (w24h w) 〈xF,xF〉 with
- [ true ⇒ mk_word24 (succ_b8 (w24x w)) (succ_b8 (w24h w)) (succ_b8 (w24l w))
- | false ⇒ mk_word24 (w24x w) (succ_b8 (w24h w)) (succ_b8 (w24l w)) ]
- | false ⇒ mk_word24 (w24x w) (w24h w) (succ_b8 (w24l w)) ].
-
-(* operatore neg/complemento a 2 *)
-ndefinition compl_w24 ≝
-λw:word24.match getMSB_w24 w with
- [ true ⇒ succ_w24 (not_w24 w)
- | false ⇒ not_w24 (pred_w24 w) ].
-
-(* operatore abs *)
-ndefinition abs_w24 ≝
-λw:word24.match getMSB_w24 w with
- [ true ⇒ compl_w24 w | false ⇒ w ].
-
-(* operatore x in [inf,sup] o in sup],[inf *)
-ndefinition inrange_w24 ≝
-λx,inf,sup:word24.
- match le_w24 inf sup with
- [ true ⇒ and_bool | false ⇒ or_bool ]
- (le_w24 inf x) (le_w24 x sup).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/byte8_lemmas.ma".
-include "num/word24.ma".
-
-(* **** *)
-(* BYTE *)
-(* **** *)
-
-nlemma word24_destruct_1 :
-∀x1,x2,y1,y2,z1,z2.
- mk_word24 x1 y1 z1 = mk_word24 x2 y2 z2 → x1 = x2.
- #x1; #x2; #y1; #y2; #z1; #z2; #H;
- nchange with (match mk_word24 x2 y2 z2 with [ mk_word24 a _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma word24_destruct_2 :
-∀x1,x2,y1,y2,z1,z2.
- mk_word24 x1 y1 z1 = mk_word24 x2 y2 z2 → y1 = y2.
- #x1; #x2; #y1; #y2; #z1; #z2; #H;
- nchange with (match mk_word24 x2 y2 z2 with [ mk_word24 _ a _ ⇒ y1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma word24_destruct_3 :
-∀x1,x2,y1,y2,z1,z2.
- mk_word24 x1 y1 z1 = mk_word24 x2 y2 z2 → z1 = z2.
- #x1; #x2; #y1; #y2; #z1; #z2; #H;
- nchange with (match mk_word24 x2 y2 z2 with [ mk_word24 _ _ a ⇒ z1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_eqw24 : symmetricT word24 bool eq_w24.
- #b1; nelim b1; #e1; #e2; #e3;
- #b2; nelim b2; #e4; #e5; #e6;
- nchange with (((eq_b8 e1 e4)⊗(eq_b8 e2 e5)⊗(eq_b8 e3 e6)) = ((eq_b8 e4 e1)⊗(eq_b8 e5 e2)⊗(eq_b8 e6 e3)));
- nrewrite > (symmetric_eqb8 e1 e4);
- nrewrite > (symmetric_eqb8 e2 e5);
- nrewrite > (symmetric_eqb8 e3 e6);
- napply refl_eq.
-nqed.
-
-nlemma eqw24_to_eq : ∀b1,b2.(eq_w24 b1 b2 = true) → (b1 = b2).
- #b1; nelim b1; #e1; #e2; #e3;
- #b2; nelim b2; #e4; #e5; #e6;
- nchange in ⊢ (% → ?) with (((eq_b8 e1 e4)⊗(eq_b8 e2 e5)⊗(eq_b8 e3 e6)) = true);
- #H;
- nrewrite < (eqb8_to_eq … (andb_true_true_r … H));
- nrewrite < (eqb8_to_eq … (andb_true_true_r … (andb_true_true_l … H)));
- nrewrite < (eqb8_to_eq … (andb_true_true_l … (andb_true_true_l … H)));
- napply refl_eq.
-nqed.
-
-nlemma eq_to_eqw24 : ∀b1,b2.(b1 = b2) → (eq_w24 b1 b2 = true).
- #b1; nelim b1; #e1; #e2; #e3;
- #b2; nelim b2; #e4; #e5; #e6;
- #H;
- nchange with (((eq_b8 e1 e4)⊗(eq_b8 e2 e5)⊗(eq_b8 e3 e6)) = true);
- nrewrite < (word24_destruct_1 … H);
- nrewrite < (word24_destruct_2 … H);
- nrewrite < (word24_destruct_3 … H);
- nrewrite > (eq_to_eqb8 e1 e1 (refl_eq …));
- nrewrite > (eq_to_eqb8 e2 e2 (refl_eq …));
- nrewrite > (eq_to_eqb8 e3 e3 (refl_eq …));
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma decidable_w24_aux1 :
-∀e1,e2,e3,e4,e5,e6.e1 ≠ e4 → (mk_word24 e1 e2 e3) ≠ (mk_word24 e4 e5 e6).
- #e1; #e2; #e3; #e4; #e5; #e6;
- nnormalize; #H; #H1;
- napply (H (word24_destruct_1 … H1)).
-nqed.
-
-nlemma decidable_w24_aux2 :
-∀e1,e2,e3,e4,e5,e6.e2 ≠ e5 → (mk_word24 e1 e2 e3) ≠ (mk_word24 e4 e5 e6).
- #e1; #e2; #e3; #e4; #e5; #e6;
- nnormalize; #H; #H1;
- napply (H (word24_destruct_2 … H1)).
-nqed.
-
-nlemma decidable_w24_aux3 :
-∀e1,e2,e3,e4,e5,e6.e3 ≠ e6 → (mk_word24 e1 e2 e3) ≠ (mk_word24 e4 e5 e6).
- #e1; #e2; #e3; #e4; #e5; #e6;
- nnormalize; #H; #H1;
- napply (H (word24_destruct_3 … H1)).
-nqed.
-
-nlemma decidable_w24 : ∀b1,b2:word24.(decidable (b1 = b2)).
- #b1; nelim b1; #e1; #e2; #e3;
- #b2; nelim b2; #e4; #e5; #e6;
- nnormalize;
- napply (or2_elim (e1 = e4) (e1 ≠ e4) ? (decidable_b8 e1 e4) …);
- ##[ ##2: #H; napply (or2_intro2 … (decidable_w24_aux1 e1 e2 e3 e4 e5 e6 H))
- ##| ##1: #H; napply (or2_elim (e2 = e5) (e2 ≠ e5) ? (decidable_b8 e2 e5) …);
- ##[ ##2: #H1; napply (or2_intro2 … (decidable_w24_aux2 e1 e2 e3 e4 e5 e6 H1))
- ##| ##1: #H1; napply (or2_elim (e3 = e6) (e3 ≠ e6) ? (decidable_b8 e3 e6) …);
- ##[ ##2: #H2; napply (or2_intro2 … (decidable_w24_aux3 e1 e2 e3 e4 e5 e6 H2))
- ##| ##1: #H2; nrewrite > H; nrewrite > H1; nrewrite > H2;
- napply (or2_intro1 … (refl_eq ? (mk_word24 e4 e5 e6)))
- ##]
- ##]
- ##]
-nqed.
-
-nlemma neqw24_to_neq : ∀b1,b2.(eq_w24 b1 b2 = false) → (b1 ≠ b2).
- #b1; nelim b1; #e1; #e2; #e3;
- #b2; nelim b2; #e4; #e5; #e6;
- #H;
- nchange in H:(%) with (((eq_b8 e1 e4)⊗(eq_b8 e2 e5)⊗(eq_b8 e3 e6)) = false);
- #H1;
- nrewrite > (word24_destruct_1 … H1) in H:(%);
- nrewrite > (word24_destruct_2 … H1);
- nrewrite > (word24_destruct_3 … H1);
- nrewrite > (eq_to_eqb8 e4 e4 (refl_eq …));
- nrewrite > (eq_to_eqb8 e5 e5 (refl_eq …));
- nrewrite > (eq_to_eqb8 e6 e6 (refl_eq …));
- #H; ndestruct.
-nqed.
-
-nlemma word24_destruct :
-∀e1,e2,e3,e4,e5,e6.
- ((mk_word24 e1 e2 e3) ≠ (mk_word24 e4 e5 e6)) →
- (Or3 (e1 ≠ e4) (e2 ≠ e5) (e3 ≠ e6)).
- #e1; #e2; #e3; #e4; #e5; #e6;
- nnormalize; #H;
- napply (or2_elim (e1 = e4) (e1 ≠ e4) ? (decidable_b8 e1 e4) …);
- ##[ ##2: #H1; napply (or3_intro1 … H1)
- ##| ##1: #H1; napply (or2_elim (e2 = e5) (e2 ≠ e5) ? (decidable_b8 e2 e5) …);
- ##[ ##2: #H2; napply (or3_intro2 … H2)
- ##| ##1: #H2; napply (or2_elim (e3 = e6) (e3 ≠ e6) ? (decidable_b8 e3 e6) …);
- ##[ ##2: #H3; napply (or3_intro3 … H3)
- ##| ##1: #H3; nrewrite > H1 in H:(%);
- nrewrite > H2; nrewrite > H3;
- #H; nelim (H (refl_eq …))
- ##]
- ##]
- ##]
-nqed.
-
-nlemma neq_to_neqw24 : ∀b1,b2.((b1 ≠ b2) → (eq_w24 b1 b2 = false)).
- #b1; nelim b1; #e1; #e2; #e3;
- #b2; nelim b2; #e4; #e5; #e6;
- #H; nchange with (((eq_b8 e1 e4)⊗(eq_b8 e2 e5)⊗(eq_b8 e3 e6)) = false);
- napply (or3_elim (e1 ≠ e4) (e2 ≠ e5) (e3 ≠ e6) ? (word24_destruct e1 e2 e3 e4 e5 e6 … H) …);
- ##[ ##1: #H1; nrewrite > (neq_to_neqb8 e1 e4 H1); nnormalize; napply refl_eq
- ##| ##2: #H1; nrewrite > (neq_to_neqb8 e2 e5 H1);
- nrewrite > (symmetric_andbool (eq_b8 e1 e4) …);
- nnormalize; napply refl_eq
- ##| ##3: #H1; nrewrite > (neq_to_neqb8 e3 e6 H1);
- nrewrite > (symmetric_andbool ((eq_b8 e1 e4)⊗(eq_b8 e2 e5)) …);
- nnormalize; napply refl_eq
- ##]
-nqed.
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* DWORD *)
(* ***** *)
-ndefinition word32 ≝ comp_num word16.
-ndefinition mk_word32 ≝ λw1,w2.mk_comp_num word16 w1 w2.
-ndefinition ext_word32 ≝ λw2.mk_comp_num word16 〈〈x0,x0〉:〈x0,x0〉〉 w2.
+nrecord word32 : Type ≝
+ {
+ w32h: word16;
+ w32l: word16
+ }.
(* \langle \rangle *)
notation "〈x.y〉" non associative with precedence 80
- for @{ mk_comp_num word16 $x $y }.
-
-(* iteratore sulle dword *)
-ndefinition forall_w32 ≝ forall_cn ? forall_w16.
+ for @{ 'mk_word32 $x $y }.
+interpretation "mk_word32" 'mk_word32 x y = (mk_word32 x y).
(* operatore = *)
-ndefinition eq_w32 ≝ eq2_cn ? eq_w16.
+ndefinition eq_w32 ≝ λdw1,dw2.(eq_w16 (w32h dw1) (w32h dw2)) ⊗ (eq_w16 (w32l dw1) (w32l dw2)).
(* operatore < *)
-ndefinition lt_w32 ≝ ltgt_cn ? eq_w16 lt_w16.
+ndefinition lt_w32 ≝
+λdw1,dw2:word32.
+ (lt_w16 (w32h dw1) (w32h dw2)) ⊕
+ ((eq_w16 (w32h dw1) (w32h dw2)) ⊗ (lt_w16 (w32l dw1) (w32l dw2))).
(* operatore ≤ *)
-ndefinition le_w32 ≝ lege_cn ? eq_w16 lt_w16 le_w16.
+ndefinition le_w32 ≝
+λdw1,dw2:word32.
+ (lt_w16 (w32h dw1) (w32h dw2)) ⊕
+ ((eq_w16 (w32h dw1) (w32h dw2)) ⊗ (le_w16 (w32l dw1) (w32l dw2))).
(* operatore > *)
-ndefinition gt_w32 ≝ ltgt_cn ? eq_w16 gt_w16.
+ndefinition gt_w32 ≝
+λdw1,dw2:word32.
+ (gt_w16 (w32h dw1) (w32h dw2)) ⊕
+ ((eq_w16 (w32h dw1) (w32h dw2)) ⊗ (gt_w16 (w32l dw1) (w32l dw2))).
(* operatore ≥ *)
-ndefinition ge_w32 ≝ lege_cn ? eq_w16 gt_w16 ge_w16.
+ndefinition ge_w32 ≝
+λdw1,dw2:word32.
+ (gt_w16 (w32h dw1) (w32h dw2)) ⊕
+ ((eq_w16 (w32h dw1) (w32h dw2)) ⊗ (ge_w16 (w32l dw1) (w32l dw2))).
(* operatore and *)
-ndefinition and_w32 ≝ fop2_cn ? and_w16.
+ndefinition and_w32 ≝
+λdw1,dw2:word32.mk_word32 (and_w16 (w32h dw1) (w32h dw2)) (and_w16 (w32l dw1) (w32l dw2)).
(* operatore or *)
-ndefinition or_w32 ≝ fop2_cn ? or_w16.
+ndefinition or_w32 ≝
+λdw1,dw2:word32.mk_word32 (or_w16 (w32h dw1) (w32h dw2)) (or_w16 (w32l dw1) (w32l dw2)).
(* operatore xor *)
-ndefinition xor_w32 ≝ fop2_cn ? xor_w16.
-
-(* operatore Most Significant Bit *)
-ndefinition getMSB_w32 ≝ getOPH_cn ? getMSB_w16.
-ndefinition setMSB_w32 ≝ setOPH_cn ? setMSB_w16.
-ndefinition clrMSB_w32 ≝ setOPH_cn ? clrMSB_w16.
-
-(* operatore Least Significant Bit *)
-ndefinition getLSB_w32 ≝ getOPL_cn ? getLSB_w16.
-ndefinition setLSB_w32 ≝ setOPL_cn ? setLSB_w16.
-ndefinition clrLSB_w32 ≝ setOPL_cn ? clrLSB_w16.
-
-(* operatore estensione unsigned *)
-ndefinition extu_w32 ≝ λw2.〈〈〈x0,x0〉:〈x0,x0〉〉.w2〉.
-ndefinition extu2_w32 ≝ λb2.〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:b2〉〉.
-ndefinition extu3_w32 ≝ λe2.〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,e2〉〉〉.
-
-(* operatore estensione signed *)
-ndefinition exts_w32 ≝
-λw2.〈(match getMSB_w16 w2 with
- [ true ⇒ 〈〈xF,xF〉:〈xF,xF〉〉 | false ⇒ 〈〈x0,x0〉:〈x0,x0〉〉 ]).w2〉.
-ndefinition exts2_w32 ≝
-λb2.(match getMSB_b8 b2 with
- [ true ⇒ 〈〈〈xF,xF〉:〈xF,xF〉〉.〈〈xF,xF〉:b2〉〉 | false ⇒ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:b2〉〉 ]).
-ndefinition exts3_w32 ≝
-λe2.(match getMSB_ex e2 with
- [ true ⇒ 〈〈〈xF,xF〉:〈xF,xF〉〉.〈〈xF,xF〉:〈xF,e2〉〉〉 | false ⇒ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,e2〉〉〉 ]).
+ndefinition xor_w32 ≝
+λdw1,dw2:word32.mk_word32 (xor_w16 (w32h dw1) (w32h dw2)) (xor_w16 (w32l dw1) (w32l dw2)).
(* operatore rotazione destra con carry *)
-ndefinition rcr_w32 ≝ opcr_cn ? rcr_w16.
+ndefinition rcr_w32 ≝
+λdw:word32.λc:bool.match rcr_w16 (w32h dw) c with
+ [ pair wh' c' ⇒ match rcr_w16 (w32l dw) c' with
+ [ pair wl' c'' ⇒ pair … (mk_word32 wh' wl') c'' ]].
(* operatore shift destro *)
-ndefinition shr_w32 ≝ opcr_cn ? rcr_w16 false.
+ndefinition shr_w32 ≝
+λdw:word32.match rcr_w16 (w32h dw) false with
+ [ pair wh' c' ⇒ match rcr_w16 (w32l dw) c' with
+ [ pair wl' c'' ⇒ pair … (mk_word32 wh' wl') c'' ]].
(* operatore rotazione destra *)
ndefinition ror_w32 ≝
-λw.match shr_w32 w with
- [ pair c w' ⇒ match c with
- [ true ⇒ setMSB_w32 w' | false ⇒ w' ]].
+λdw:word32.match rcr_w16 (w32h dw) false with
+ [ pair wh' c' ⇒ match rcr_w16 (w32l dw) c' with
+ [ pair wl' c'' ⇒ match c'' with
+ [ true ⇒ mk_word32 (or_w16 (mk_word16 (mk_byte8 x8 x0) (mk_byte8 x0 x0)) wh') wl'
+ | false ⇒ mk_word32 wh' wl' ]]].
+
+(* operatore rotazione destra n-volte *)
+nlet rec ror_w32_n (dw:word32) (n:nat) on n ≝
+ match n with
+ [ O ⇒ dw
+ | S n' ⇒ ror_w32_n (ror_w32 dw) n' ].
(* operatore rotazione sinistra con carry *)
-ndefinition rcl_w32 ≝ opcl_cn ? rcl_w16.
+ndefinition rcl_w32 ≝
+λdw:word32.λc:bool.match rcl_w16 (w32l dw) c with
+ [ pair wl' c' ⇒ match rcl_w16 (w32h dw) c' with
+ [ pair wh' c'' ⇒ pair … (mk_word32 wh' wl') c'' ]].
(* operatore shift sinistro *)
-ndefinition shl_w32 ≝ opcl_cn ? rcl_w16 false.
+ndefinition shl_w32 ≝
+λdw:word32.match rcl_w16 (w32l dw) false with
+ [ pair wl' c' ⇒ match rcl_w16 (w32h dw) c' with
+ [ pair wh' c'' ⇒ pair … (mk_word32 wh' wl') c'' ]].
(* operatore rotazione sinistra *)
ndefinition rol_w32 ≝
-λw.match shl_w32 w with
- [ pair c w' ⇒ match c with
- [ true ⇒ setLSB_w32 w' | false ⇒ w' ]].
+λdw:word32.match rcl_w16 (w32l dw) false with
+ [ pair wl' c' ⇒ match rcl_w16 (w32h dw) c' with
+ [ pair wh' c'' ⇒ match c'' with
+ [ true ⇒ mk_word32 wh' (or_w16 (mk_word16 (mk_byte8 x0 x0) (mk_byte8 x0 x1)) wl')
+ | false ⇒ mk_word32 wh' wl' ]]].
+
+(* operatore rotazione sinistra n-volte *)
+nlet rec rol_w32_n (dw:word32) (n:nat) on n ≝
+ match n with
+ [ O ⇒ dw
+ | S n' ⇒ rol_w32_n (rol_w32 dw) n' ].
(* operatore not/complemento a 1 *)
-ndefinition not_w32 ≝ fop_cn ? not_w16.
+ndefinition not_w32 ≝
+λdw:word32.mk_word32 (not_w16 (w32h dw)) (not_w16 (w32l dw)).
(* operatore somma con data+carry → data+carry *)
-ndefinition plus_w32_dc_dc ≝ opcl2_cn ? plus_w16_dc_dc.
+ndefinition plus_w32_dc_dc ≝
+λdw1,dw2:word32.λc:bool.
+ match plus_w16_dc_dc (w32l dw1) (w32l dw2) c with
+ [ pair l c ⇒ match plus_w16_dc_dc (w32h dw1) (w32h dw2) c with
+ [ pair h c' ⇒ pair … 〈h.l〉 c' ]].
(* operatore somma con data+carry → data *)
-ndefinition plus_w32_dc_d ≝ λc,w1,w2.snd … (plus_w32_dc_dc c w1 w2).
+ndefinition plus_w32_dc_d ≝
+λdw1,dw2:word32.λc:bool.
+ match plus_w16_dc_dc (w32l dw1) (w32l dw2) c with
+ [ pair l c ⇒ 〈plus_w16_dc_d (w32h dw1) (w32h dw2) c.l〉 ].
(* operatore somma con data+carry → c *)
-ndefinition plus_w32_dc_c ≝ λc,w1,w2.fst … (plus_w32_dc_dc c w1 w2).
+ndefinition plus_w32_dc_c ≝
+λdw1,dw2:word32.λc:bool.
+ plus_w16_dc_c (w32h dw1) (w32h dw2) (plus_w16_dc_c (w32l dw1) (w32l dw2) c).
(* operatore somma con data → data+carry *)
-ndefinition plus_w32_d_dc ≝ opcl2_cn ? plus_w16_dc_dc false.
+ndefinition plus_w32_d_dc ≝
+λdw1,dw2:word32.
+ match plus_w16_d_dc (w32l dw1) (w32l dw2) with
+ [ pair l c ⇒ match plus_w16_dc_dc (w32h dw1) (w32h dw2) c with
+ [ pair h c' ⇒ pair … 〈h.l〉 c' ]].
(* operatore somma con data → data *)
-ndefinition plus_w32_d_d ≝ λw1,w2.snd … (plus_w32_d_dc w1 w2).
+ndefinition plus_w32_d_d ≝
+λdw1,dw2:word32.
+ match plus_w16_d_dc (w32l dw1) (w32l dw2) with
+ [ pair l c ⇒ 〈plus_w16_dc_d (w32h dw1) (w32h dw2) c.l〉 ].
(* operatore somma con data → c *)
-ndefinition plus_w32_d_c ≝ λw1,w2.fst … (plus_w32_d_dc w1 w2).
+ndefinition plus_w32_d_c ≝
+λdw1,dw2:word32.
+ plus_w16_dc_c (w32h dw1) (w32h dw2) (plus_w16_d_c (w32l dw1) (w32l dw2)).
+
+(* operatore Most Significant Bit *)
+ndefinition MSB_w32 ≝ λdw:word32.eq_ex x8 (and_ex x8 (b8h (w16h (w32h dw)))).
(* operatore predecessore *)
-ndefinition pred_w32 ≝ predsucc_cn ? (eq_w16 〈〈x0,x0〉:〈x0,x0〉〉) pred_w16.
+ndefinition pred_w32 ≝
+λdw:word32.match eq_w16 (w32l dw) (mk_word16 (mk_byte8 x0 x0) (mk_byte8 x0 x0)) with
+ [ true ⇒ mk_word32 (pred_w16 (w32h dw)) (pred_w16 (w32l dw))
+ | false ⇒ mk_word32 (w32h dw) (pred_w16 (w32l dw)) ].
(* operatore successore *)
-ndefinition succ_w32 ≝ predsucc_cn ? (eq_w16 〈〈xF,xF〉:〈xF,xF〉〉) succ_w16.
+ndefinition succ_w32 ≝
+λdw:word32.match eq_w16 (w32l dw) (mk_word16 (mk_byte8 xF xF) (mk_byte8 xF xF)) with
+ [ true ⇒ mk_word32 (succ_w16 (w32h dw)) (succ_w16 (w32l dw))
+ | false ⇒ mk_word32 (w32h dw) (succ_w16 (w32l dw)) ].
(* operatore neg/complemento a 2 *)
ndefinition compl_w32 ≝
-λw:word32.match getMSB_w32 w with
- [ true ⇒ succ_w32 (not_w32 w)
- | false ⇒ not_w32 (pred_w32 w) ].
-
-(* operatore abs *)
-ndefinition abs_w32 ≝
-λw:word32.match getMSB_w32 w with
- [ true ⇒ compl_w32 w | false ⇒ w ].
-
-(* operatore x in [inf,sup] o in sup],[inf *)
+λdw:word32.match MSB_w32 dw with
+ [ true ⇒ succ_w32 (not_w32 dw)
+ | false ⇒ not_w32 (pred_w32 dw) ].
+
+(*
+ operatore moltiplicazione senza segno: b*b=[0x00000000,0xFFFE0001]
+ ... in pratica (〈a:b〉*〈c:d〉) = (a*c)<<16+(a*d)<<8+(b*c)<<8+(b*d)
+*)
+ndefinition mul_w16 ≝
+λw1,w2:word16.match w1 with
+[ mk_word16 b1h b1l ⇒ match w2 with
+[ mk_word16 b2h b2l ⇒ match mul_b8 b1l b2l with
+[ mk_word16 t1_h t1_l ⇒ match mul_b8 b1h b2l with
+[ mk_word16 t2_h t2_l ⇒ match mul_b8 b2h b1l with
+[ mk_word16 t3_h t3_l ⇒ match mul_b8 b1h b2h with
+[ mk_word16 t4_h t4_l ⇒
+ plus_w32_d_d
+ (plus_w32_d_d
+ (plus_w32_d_d 〈〈〈x0,x0〉:t3_h〉.〈t3_l:〈x0,x0〉〉〉 〈〈〈x0,x0〉:t2_h〉.〈t2_l:〈x0,x0〉〉〉) 〈〈t4_h:t4_l〉.〈〈x0,x0〉:〈x0,x0〉〉〉)〈〈〈x0,x0〉:〈x0,x0〉〉.〈t1_h:t1_l〉〉
+]]]]]].
+
+(* divisione senza segno (secondo la logica delle ALU): (quoziente resto) overflow *)
+nlet rec div_w16_aux (divd:word32) (divs:word32) (molt:word16) (q:word16) (c:nat) on c ≝
+ let w' ≝ plus_w32_d_d divd (compl_w32 divs) in
+ match c with
+ [ O ⇒ match le_w32 divs divd with
+ [ true ⇒ triple … (or_w16 molt q) (w32l w') (⊖ (eq_w16 (w32h w') 〈〈x0,x0〉:〈x0,x0〉〉))
+ | false ⇒ triple … q (w32l divd) (⊖ (eq_w16 (w32h divd) 〈〈x0,x0〉:〈x0,x0〉〉)) ]
+ | S c' ⇒ match le_w32 divs divd with
+ [ true ⇒ div_w16_aux w' (ror_w32 divs) (ror_w16 molt) (or_w16 molt q) c'
+ | false ⇒ div_w16_aux divd (ror_w32 divs) (ror_w16 molt) q c' ]].
+
+ndefinition div_w16 ≝
+λw:word32.λb:word16.match eq_w16 b 〈〈x0,x0〉:〈x0,x0〉〉 with
+(*
+ la combinazione n/0 e' illegale, segnala solo overflow senza dare risultato
+*)
+ [ true ⇒ triple … 〈〈xF,xF〉:〈xF,xF〉〉 (w32l w) true
+ | false ⇒ match eq_w32 w 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x0〉〉〉 with
+(* 0 diviso qualsiasi cosa diverso da 0 da' q=0 r=0 o=false *)
+ [ true ⇒ triple … 〈〈x0,x0〉:〈x0,x0〉〉 〈〈x0,x0〉:〈x0,x0〉〉 false
+(* 1) e' una divisione sensata che produrra' overflow/risultato *)
+(* 2) parametri: dividendo, divisore, moltiplicatore, quoziente, contatore *)
+(* 3) ad ogni ciclo il divisore e il moltiplicatore vengono scalati di 1 a dx *)
+(* 4) il moltiplicatore e' la quantita' aggiunta al quoziente se il divisore *)
+(* puo' essere sottratto al dividendo *)
+ | false ⇒ div_w16_aux w (rol_w32_n 〈〈〈x0,x0〉:〈x0,x0〉〉.b〉 nat15) 〈〈x8,x0〉:〈x0,x0〉〉 〈〈x0,x0〉:〈x0,x0〉〉 nat15 ]].
+
+(* operatore x in [inf,sup] *)
ndefinition inrange_w32 ≝
-λx,inf,sup:word32.
- match le_w32 inf sup with
- [ true ⇒ and_bool | false ⇒ or_bool ]
- (le_w32 inf x) (le_w32 x sup).
-
-(* operatore moltiplicazione senza segno *)
-(* 〈a1,a2〉 * 〈b1,b2〉 = (a1*b1) x0 x0 + x0 (a1*b2) x0 + x0 (a2*b1) x0 + x0 x0 (a2*b2) *)
-ndefinition mulu_w16_aux ≝
-λw.nat_it ? rol_w32 w nat8.
-
-ndefinition mulu_w16 ≝
-λw1,w2:word16.
- plus_w32_d_d 〈(mulu_b8 (cnH ? w1) (cnH ? w2)).〈〈x0,x0〉:〈x0,x0〉〉〉
- (plus_w32_d_d (mulu_w16_aux (extu_w32 (mulu_b8 (cnH ? w1) (cnL ? w2))))
- (plus_w32_d_d (mulu_w16_aux (extu_w32 (mulu_b8 (cnL ? w1) (cnH ? w2))))
- (extu_w32 (mulu_b8 (cnL ? w1) (cnL ? w2))))).
-
-(* operatore moltiplicazione con segno *)
-(* x * y = sgn(x) * sgn(y) * |x| * |y| *)
-ndefinition muls_w16 ≝
-λw1,w2:word16.
-(* ++/-- → +, +-/-+ → - *)
- match (getMSB_w16 w1) ⊙ (getMSB_w16 w2) with
- (* +- -+ → - *)
- [ true ⇒ compl_w32
- (* ++/-- → + *)
- | false ⇒ λx.x ] (mulu_w16 (abs_w16 w1) (abs_w16 w2)).
-
-nlemma pippo : ∃b.b=(muls_w16 〈〈xC,x3〉:〈x0,x4〉〉 〈〈x7,xE〉:〈xF,x9〉〉). nnormalize;
-
+λx,inf,sup:word32.(le_w32 inf x) ⊗ (le_w32 x sup).
+
+(* iteratore sulle word *)
+ndefinition forall_w32 ≝
+ λP.
+ forall_w16 (λbh.
+ forall_w16 (λbl.
+ P (mk_word32 bh bl ))).
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
(* DWORD *)
(* ***** *)
-ndefinition word32_destruct_1 ≝ cn_destruct_1 word32.
-ndefinition word32_destruct_2 ≝ cn_destruct_2 word32.
+nlemma word32_destruct_1 :
+∀x1,x2,y1,y2.
+ mk_word32 x1 y1 = mk_word32 x2 y2 → x1 = x2.
+ #x1; #x2; #y1; #y2; #H;
+ nchange with (match mk_word32 x2 y2 with [ mk_word32 a _ ⇒ x1 = a ]);
+ nrewrite < H;
+ nnormalize;
+ napply refl_eq.
+nqed.
-ndefinition symmetric_eqw32 ≝ symmetric_eqcn ? eq_w16 symmetric_eqw16.
+nlemma word32_destruct_2 :
+∀x1,x2,y1,y2.
+ mk_word32 x1 y1 = mk_word32 x2 y2 → y1 = y2.
+ #x1; #x2; #y1; #y2; #H;
+ nchange with (match mk_word32 x2 y2 with [ mk_word32 _ b ⇒ y1 = b ]);
+ nrewrite < H;
+ nnormalize;
+ napply refl_eq.
+nqed.
-ndefinition eqw32_to_eq ≝ eqcn_to_eq ? eq_w16 eqw16_to_eq.
-ndefinition eq_to_eqw32 ≝ eq_to_eqcn ? eq_w16 eq_to_eqw16.
+nlemma symmetric_eqw32 : symmetricT word32 bool eq_w32.
+ #dw1; #dw2;
+ nelim dw1;
+ nelim dw2;
+ #w1; #w2; #w3; #w4;
+ nchange with (((eq_w16 w3 w1)⊗(eq_w16 w4 w2)) = ((eq_w16 w1 w3)⊗(eq_w16 w2 w4)));
+ nrewrite > (symmetric_eqw16 w1 w3);
+ nrewrite > (symmetric_eqw16 w2 w4);
+ napply refl_eq.
+nqed.
-ndefinition decidable_w32 ≝ decidable_cn ? decidable_w16.
+nlemma symmetric_andw32 : symmetricT word32 word32 and_w32.
+ #dw1; #dw2;
+ nelim dw1;
+ nelim dw2;
+ #w1; #w2; #w3; #w4;
+ nchange with ((mk_word32 (and_w16 w3 w1) (and_w16 w4 w2)) = (mk_word32 (and_w16 w1 w3) (and_w16 w2 w4)));
+ nrewrite > (symmetric_andw16 w1 w3);
+ nrewrite > (symmetric_andw16 w2 w4);
+ napply refl_eq.
+nqed.
-ndefinition neqw32_to_neq ≝ neqcn_to_neq ? eq_w16 neqw16_to_neq.
-ndefinition neq_to_neqw32 ≝ neq_to_neqcn ? eq_w16 neq_to_neqw16 decidable_w16.
+nlemma associative_andw32 : ∀dw1,dw2,dw3.(and_w32 (and_w32 dw1 dw2) dw3) = (and_w32 dw1 (and_w32 dw2 dw3)).
+ #dw1; #dw2; #dw3;
+ nelim dw1;
+ #w1; #w2;
+ nelim dw2;
+ #w3; #w4;
+ nelim dw3;
+ #w5; #w6;
+ nchange with (mk_word32 (and_w16 (and_w16 w1 w3) w5) (and_w16 (and_w16 w2 w4) w6) =
+ mk_word32 (and_w16 w1 (and_w16 w3 w5)) (and_w16 w2 (and_w16 w4 w6)));
+ nrewrite < (associative_andw16 w1 w3 w5);
+ nrewrite < (associative_andw16 w2 w4 w6);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_orw32 : symmetricT word32 word32 or_w32.
+ #dw1; #dw2;
+ nelim dw1;
+ nelim dw2;
+ #w1; #w2; #w3; #w4;
+ nchange with ((mk_word32 (or_w16 w3 w1) (or_w16 w4 w2)) = (mk_word32 (or_w16 w1 w3) (or_w16 w2 w4)));
+ nrewrite > (symmetric_orw16 w1 w3);
+ nrewrite > (symmetric_orw16 w2 w4);
+ napply refl_eq.
+nqed.
+
+nlemma associative_orw32 : ∀dw1,dw2,dw3.(or_w32 (or_w32 dw1 dw2) dw3) = (or_w32 dw1 (or_w32 dw2 dw3)).
+ #dw1; #dw2; #dw3;
+ nelim dw1;
+ #w1; #w2;
+ nelim dw2;
+ #w3; #w4;
+ nelim dw3;
+ #w5; #w6;
+ nchange with (mk_word32 (or_w16 (or_w16 w1 w3) w5) (or_w16 (or_w16 w2 w4) w6) =
+ mk_word32 (or_w16 w1 (or_w16 w3 w5)) (or_w16 w2 (or_w16 w4 w6)));
+ nrewrite < (associative_orw16 w1 w3 w5);
+ nrewrite < (associative_orw16 w2 w4 w6);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_xorw32 : symmetricT word32 word32 xor_w32.
+ #dw1; #dw2;
+ nelim dw1;
+ nelim dw2;
+ #w1; #w2; #w3; #w4;
+ nchange with ((mk_word32 (xor_w16 w3 w1) (xor_w16 w4 w2)) = (mk_word32 (xor_w16 w1 w3) (xor_w16 w2 w4)));
+ nrewrite > (symmetric_xorw16 w1 w3);
+ nrewrite > (symmetric_xorw16 w2 w4);
+ napply refl_eq.
+nqed.
+
+nlemma associative_xorw32 : ∀dw1,dw2,dw3.(xor_w32 (xor_w32 dw1 dw2) dw3) = (xor_w32 dw1 (xor_w32 dw2 dw3)).
+ #dw1; #dw2; #dw3;
+ nelim dw1;
+ #w1; #w2;
+ nelim dw2;
+ #w3; #w4;
+ nelim dw3;
+ #w5; #w6;
+ nchange with (mk_word32 (xor_w16 (xor_w16 w1 w3) w5) (xor_w16 (xor_w16 w2 w4) w6) =
+ mk_word32 (xor_w16 w1 (xor_w16 w3 w5)) (xor_w16 w2 (xor_w16 w4 w6)));
+ nrewrite < (associative_xorw16 w1 w3 w5);
+ nrewrite < (associative_xorw16 w2 w4 w6);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusw32_dc_dc : ∀dw1,dw2,c.plus_w32_dc_dc dw1 dw2 c = plus_w32_dc_dc dw2 dw1 c.
+ #dw1; #dw2; #c;
+ nelim dw1;
+ #w1; #w2;
+ nelim dw2;
+ #w3; #w4;
+ nchange with (
+ match plus_w16_dc_dc w2 w4 c with [ pair l c ⇒ match plus_w16_dc_dc w1 w3 c with [ pair h c' ⇒ pair … 〈h.l〉 c' ]] =
+ match plus_w16_dc_dc w4 w2 c with [ pair l c ⇒ match plus_w16_dc_dc w3 w1 c with [ pair h c' ⇒ pair … 〈h.l〉 c' ]]);
+ nrewrite > (symmetric_plusw16_dc_dc w4 w2 c);
+ ncases (plus_w16_dc_dc w2 w4 c);
+ #w5; #c1;
+ nchange with (
+ match plus_w16_dc_dc w1 w3 c1 with [ pair h c' ⇒ pair … 〈h.w5〉 c' ] =
+ match plus_w16_dc_dc w3 w1 c1 with [ pair h c' ⇒ pair … 〈h.w5〉 c' ]);
+ nrewrite > (symmetric_plusw16_dc_dc w1 w3 c1);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusw32_dc_d : ∀dw1,dw2,c.plus_w32_dc_d dw1 dw2 c = plus_w32_dc_d dw2 dw1 c.
+ #dw1; #dw2; #c;
+ nelim dw1;
+ #w1; #w2;
+ nelim dw2;
+ #w3; #w4;
+ nchange with (
+ match plus_w16_dc_dc w2 w4 c with [ pair l c ⇒ 〈plus_w16_dc_d w1 w3 c.l〉 ] =
+ match plus_w16_dc_dc w4 w2 c with [ pair l c ⇒ 〈plus_w16_dc_d w3 w1 c.l〉 ]);
+ nrewrite > (symmetric_plusw16_dc_dc w4 w2 c);
+ ncases (plus_w16_dc_dc w2 w4 c);
+ #w5; #c1;
+ nchange with (〈plus_w16_dc_d w1 w3 c1.w5〉 = 〈plus_w16_dc_d w3 w1 c1.w5〉);
+ nrewrite > (symmetric_plusw16_dc_d w1 w3 c1);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusw32_dc_c : ∀dw1,dw2,c.plus_w32_dc_c dw1 dw2 c = plus_w32_dc_c dw2 dw1 c.
+ #dw1; #dw2; #c;
+ nelim dw1;
+ #w1; #w2;
+ nelim dw2;
+ #w3; #w4;
+ nchange with (
+ plus_w16_dc_c w1 w3 (plus_w16_dc_c w2 w4 c) =
+ plus_w16_dc_c w3 w1 (plus_w16_dc_c w4 w2 c));
+ nrewrite > (symmetric_plusw16_dc_c w4 w2 c);
+ nrewrite > (symmetric_plusw16_dc_c w3 w1 (plus_w16_dc_c w2 w4 c));
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusw32_d_dc : ∀dw1,dw2.plus_w32_d_dc dw1 dw2 = plus_w32_d_dc dw2 dw1.
+ #dw1; #dw2;
+ nelim dw1;
+ #w1; #w2;
+ nelim dw2;
+ #w3; #w4;
+ nchange with (
+ match plus_w16_d_dc w2 w4 with [ pair l c ⇒ match plus_w16_dc_dc w1 w3 c with [ pair h c' ⇒ pair … 〈h.l〉 c' ]] =
+ match plus_w16_d_dc w4 w2 with [ pair l c ⇒ match plus_w16_dc_dc w3 w1 c with [ pair h c' ⇒ pair … 〈h.l〉 c' ]]);
+ nrewrite > (symmetric_plusw16_d_dc w4 w2);
+ ncases (plus_w16_d_dc w2 w4);
+ #w5; #c;
+ nchange with (
+ match plus_w16_dc_dc w1 w3 c with [ pair h c' ⇒ pair … 〈h.w5〉 c' ] =
+ match plus_w16_dc_dc w3 w1 c with [ pair h c' ⇒ pair … 〈h.w5〉 c' ]);
+ nrewrite > (symmetric_plusw16_dc_dc w1 w3 c);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusw32_d_d : ∀dw1,dw2.plus_w32_d_d dw1 dw2 = plus_w32_d_d dw2 dw1.
+ #dw1; #dw2;
+ nelim dw1;
+ #w1; #w2;
+ nelim dw2;
+ #w3; #w4;
+ nchange with (
+ match plus_w16_d_dc w2 w4 with [ pair l c ⇒ 〈plus_w16_dc_d w1 w3 c.l〉 ] =
+ match plus_w16_d_dc w4 w2 with [ pair l c ⇒ 〈plus_w16_dc_d w3 w1 c.l〉 ]);
+ nrewrite > (symmetric_plusw16_d_dc w4 w2);
+ ncases (plus_w16_d_dc w2 w4);
+ #w5; #c;
+ nchange with (〈plus_w16_dc_d w1 w3 c.w5〉 = 〈plus_w16_dc_d w3 w1 c.w5〉);
+ nrewrite > (symmetric_plusw16_dc_d w1 w3 c);
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_plusw32_d_c : ∀dw1,dw2.plus_w32_d_c dw1 dw2 = plus_w32_d_c dw2 dw1.
+ #dw1; #dw2;
+ nelim dw1;
+ #w1; #w2;
+ nelim dw2;
+ #w3; #w4;
+ nchange with (
+ plus_w16_dc_c w1 w3 (plus_w16_d_c w2 w4) =
+ plus_w16_dc_c w3 w1 (plus_w16_d_c w4 w2));
+ nrewrite > (symmetric_plusw16_d_c w4 w2);
+ nrewrite > (symmetric_plusw16_dc_c w3 w1 (plus_w16_d_c w2 w4));
+ napply refl_eq.
+nqed.
+
+nlemma symmetric_mulw16 : symmetricT word16 word32 mul_w16.
+ #w1; #w2;
+ nelim w1;
+ #b1; #b2;
+ nelim w2;
+ #b3; #b4;
+ nchange with (match mul_b8 b2 b4 with
+ [ mk_word16 t1_h t1_l ⇒ match mul_b8 b1 b4 with
+ [ mk_word16 t2_h t2_l ⇒ match mul_b8 b3 b2 with
+ [ mk_word16 t3_h t3_l ⇒ match mul_b8 b1 b3 with
+ [ mk_word16 t4_h t4_l ⇒ plus_w32_d_d (plus_w32_d_d (plus_w32_d_d 〈〈〈x0,x0〉:t3_h〉.〈t3_l:〈x0,x0〉〉〉 〈〈〈x0,x0〉:t2_h〉.〈t2_l:〈x0,x0〉〉〉) 〈〈t4_h:t4_l〉.〈〈x0,x0〉:〈x0,x0〉〉〉)〈〈〈x0,x0〉:〈x0,x0〉〉.〈t1_h:t1_l〉〉
+ ]]]] = match mul_b8 b4 b2 with
+ [ mk_word16 t1_h t1_l ⇒ match mul_b8 b3 b2 with
+ [ mk_word16 t2_h t2_l ⇒ match mul_b8 b1 b4 with
+ [ mk_word16 t3_h t3_l ⇒ match mul_b8 b3 b1 with
+ [ mk_word16 t4_h t4_l ⇒ plus_w32_d_d (plus_w32_d_d (plus_w32_d_d 〈〈〈x0,x0〉:t3_h〉.〈t3_l:〈x0,x0〉〉〉 〈〈〈x0,x0〉:t2_h〉.〈t2_l:〈x0,x0〉〉〉) 〈〈t4_h:t4_l〉.〈〈x0,x0〉:〈x0,x0〉〉〉)〈〈〈x0,x0〉:〈x0,x0〉〉.〈t1_h:t1_l〉〉
+ ]]]]);
+ nrewrite < (symmetric_mulb8 b2 b4);
+ ncases (mul_b8 b2 b4);
+ #b5; #b6;
+ nchange with (match mul_b8 b1 b4 with
+ [ mk_word16 t2_h t2_l ⇒ match mul_b8 b3 b2 with
+ [ mk_word16 t3_h t3_l ⇒ match mul_b8 b1 b3 with
+ [ mk_word16 t4_h t4_l ⇒ plus_w32_d_d (plus_w32_d_d (plus_w32_d_d 〈〈〈x0,x0〉:t3_h〉.〈t3_l:〈x0,x0〉〉〉 〈〈〈x0,x0〉:t2_h〉.〈t2_l:〈x0,x0〉〉〉) 〈〈t4_h:t4_l〉.〈〈x0,x0〉:〈x0,x0〉〉〉)〈〈〈x0,x0〉:〈x0,x0〉〉.〈b5:b6〉〉
+ ]]] = match mul_b8 b3 b2 with
+ [ mk_word16 t2_h t2_l ⇒ match mul_b8 b1 b4 with
+ [ mk_word16 t3_h t3_l ⇒ match mul_b8 b3 b1 with
+ [ mk_word16 t4_h t4_l ⇒ plus_w32_d_d (plus_w32_d_d (plus_w32_d_d 〈〈〈x0,x0〉:t3_h〉.〈t3_l:〈x0,x0〉〉〉 〈〈〈x0,x0〉:t2_h〉.〈t2_l:〈x0,x0〉〉〉) 〈〈t4_h:t4_l〉.〈〈x0,x0〉:〈x0,x0〉〉〉)〈〈〈x0,x0〉:〈x0,x0〉〉.〈b5:b6〉〉
+ ]]]);
+ ncases (mul_b8 b3 b2);
+ #b7; #b8;
+ ncases (mul_b8 b1 b4);
+ #b9; #b10;
+ nchange with (match mul_b8 b1 b3 with
+ [ mk_word16 t4_h t4_l ⇒ plus_w32_d_d (plus_w32_d_d (plus_w32_d_d 〈〈〈x0,x0〉:b7〉.〈b8:〈x0,x0〉〉〉 〈〈〈x0,x0〉:b9〉.〈b10:〈x0,x0〉〉〉) 〈〈t4_h:t4_l〉.〈〈x0,x0〉:〈x0,x0〉〉〉)〈〈〈x0,x0〉:〈x0,x0〉〉.〈b5:b6〉〉
+ ] = match mul_b8 b3 b1 with
+ [ mk_word16 t4_h t4_l ⇒ plus_w32_d_d (plus_w32_d_d (plus_w32_d_d 〈〈〈x0,x0〉:b9〉.〈b10:〈x0,x0〉〉〉 〈〈〈x0,x0〉:b7〉.〈b8:〈x0,x0〉〉〉) 〈〈t4_h:t4_l〉.〈〈x0,x0〉:〈x0,x0〉〉〉)〈〈〈x0,x0〉:〈x0,x0〉〉.〈b5:b6〉〉
+ ]);
+ nrewrite < (symmetric_mulb8 b1 b3);
+ ncases (mul_b8 b1 b3);
+ #b11; #b12;
+ nchange with ((plus_w32_d_d (plus_w32_d_d (plus_w32_d_d 〈〈〈x0,x0〉:b7〉.〈b8:〈x0,x0〉〉〉 〈〈〈x0,x0〉:b9〉.〈b10:〈x0,x0〉〉〉) 〈〈b11:b12〉.〈〈x0,x0〉:〈x0,x0〉〉〉)〈〈〈x0,x0〉:〈x0,x0〉〉.〈b5:b6〉〉) =
+ (plus_w32_d_d (plus_w32_d_d (plus_w32_d_d 〈〈〈x0,x0〉:b9〉.〈b10:〈x0,x0〉〉〉 〈〈〈x0,x0〉:b7〉.〈b8:〈x0,x0〉〉〉) 〈〈b11:b12〉.〈〈x0,x0〉:〈x0,x0〉〉〉)〈〈〈x0,x0〉:〈x0,x0〉〉.〈b5:b6〉〉));
+ nrewrite > (symmetric_plusw32_d_d 〈〈〈x0,x0〉:b7〉.〈b8:〈x0,x0〉〉〉 〈〈〈x0,x0〉:b9〉.〈b10:〈x0,x0〉〉〉);
+ napply refl_eq.
+nqed.
+
+nlemma eqw32_to_eq : ∀dw1,dw2:word32.(eq_w32 dw1 dw2 = true) → (dw1 = dw2).
+ #dw1; #dw2;
+ nelim dw1;
+ nelim dw2;
+ #w1; #w2; #w3; #w4;
+ nchange in ⊢ (% → ?) with (((eq_w16 w3 w1)⊗(eq_w16 w4 w2)) = true);
+ #H;
+ nrewrite < (eqw16_to_eq … (andb_true_true_l … H));
+ nrewrite < (eqw16_to_eq … (andb_true_true_r … H));
+ napply refl_eq.
+nqed.
+
+nlemma eq_to_eqw32 : ∀dw1,dw2.dw1 = dw2 → eq_w32 dw1 dw2 = true.
+ #dw1; #dw2;
+ nelim dw1;
+ nelim dw2;
+ #w1; #w2; #w3; #w4;
+ #H;
+ nrewrite < (word32_destruct_1 … H);
+ nrewrite < (word32_destruct_2 … H);
+ nchange with (((eq_w16 w3 w3)⊗(eq_w16 w4 w4)) = true);
+ nrewrite > (eq_to_eqw16 w3 w3 (refl_eq …));
+ nrewrite > (eq_to_eqw16 w4 w4 (refl_eq …));
+ nnormalize;
+ napply refl_eq.
+nqed.
+
+nlemma decidable_w32_aux1 : ∀w1,w2,w3,w4.w1 ≠ w3 → 〈w1.w2〉 ≠ 〈w3.w4〉.
+ #w1; #w2; #w3; #w4;
+ nnormalize; #H; #H1;
+ napply (H (word32_destruct_1 … H1)).
+nqed.
+
+nlemma decidable_w32_aux2 : ∀w1,w2,w3,w4.w2 ≠ w4 → 〈w1.w2〉 ≠ 〈w3.w4〉.
+ #w1; #w2; #w3; #w4;
+ nnormalize; #H; #H1;
+ napply (H (word32_destruct_2 … H1)).
+nqed.
+
+nlemma decidable_w32 : ∀x,y:word32.decidable (x = y).
+ #x; nelim x; #w1; #w2;
+ #y; nelim y; #w3; #w4;
+ nnormalize;
+ napply (or2_elim (w1 = w3) (w1 ≠ w3) ? (decidable_w16 w1 w3) …);
+ ##[ ##2: #H; napply (or2_intro2 … (decidable_w32_aux1 w1 w2 w3 w4 H))
+ ##| ##1: #H; napply (or2_elim (w2 = w4) (w2 ≠ w4) ? (decidable_w16 w2 w4) …);
+ ##[ ##2: #H1; napply (or2_intro2 … (decidable_w32_aux2 w1 w2 w3 w4 H1))
+ ##| ##1: #H1; nrewrite > H; nrewrite > H1;
+ napply (or2_intro1 … (refl_eq ? 〈w3.w4〉))
+ ##]
+ ##]
+nqed.
+
+nlemma neqw32_to_neq : ∀dw1,dw2:word32.(eq_w32 dw1 dw2 = false) → (dw1 ≠ dw2).
+ #dw1; #dw2;
+ nelim dw1;
+ nelim dw2;
+ #w1; #w2; #w3; #w4;
+ nchange with ((((eq_w16 w3 w1) ⊗ (eq_w16 w4 w2)) = false) → ?);
+ #H;
+ napply (or2_elim ((eq_w16 w3 w1) = false) ((eq_w16 w4 w2) = false) ? (andb_false2 … H) …);
+ ##[ ##1: #H1; napply (decidable_w32_aux1 … (neqw16_to_neq … H1))
+ ##| ##2: #H1; napply (decidable_w32_aux2 … (neqw16_to_neq … H1))
+ ##]
+nqed.
+
+nlemma word32_destruct : ∀w1,w2,w3,w4.〈w1.w2〉 ≠ 〈w3.w4〉 → w1 ≠ w3 ∨ w2 ≠ w4.
+ #w1; #w2; #w3; #w4;
+ nnormalize; #H;
+ napply (or2_elim (w1 = w3) (w1 ≠ w3) ? (decidable_w16 w1 w3) …);
+ ##[ ##2: #H1; napply (or2_intro1 … H1)
+ ##| ##1: #H1; napply (or2_elim (w2 = w4) (w2 ≠ w4) ? (decidable_w16 w2 w4) …);
+ ##[ ##2: #H2; napply (or2_intro2 … H2)
+ ##| ##1: #H2; nrewrite > H1 in H:(%);
+ nrewrite > H2;
+ #H; nelim (H (refl_eq …))
+ ##]
+ ##]
+nqed.
+
+nlemma neq_to_neqw32 : ∀dw1,dw2.dw1 ≠ dw2 → eq_w32 dw1 dw2 = false.
+ #dw1; #dw2;
+ nelim dw1; #w1; #w2;
+ nelim dw2; #w3; #w4;
+ #H; nchange with (((eq_w16 w1 w3) ⊗ (eq_w16 w2 w4)) = false);
+ napply (or2_elim (w1 ≠ w3) (w2 ≠ w4) ? (word32_destruct … H) …);
+ ##[ ##1: #H1; nrewrite > (neq_to_neqw16 … H1); nnormalize; napply refl_eq
+ ##| ##2: #H1; nrewrite > (neq_to_neqw16 … H1);
+ nrewrite > (symmetric_andbool (eq_w16 w1 w3) false);
+ nnormalize; napply refl_eq
+ ##]
+nqed.
(* Progetto FreeScale *)
(* *)
(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
nqed.
(* eqxx_to_eq universale *)
-(* !!! evidente ma come si fa? *)
-naxiom eqSUN_to_eq_aux : ∀l,x,y.((getelem l x) = (getelem l y)) → x = y.
+(* serve l'assioma di equivalenza sulle dimostrazioni *)
+
+naxiom eqSUN_to_eq_aux : ∀l,e.∀dim1,dim2:((member_natList e l) = true).S_EL l e dim1 = S_EL l e dim2.
+(* mi dice matita/logic/equality/eq.ind not found che e' vero perche' uso il mio...
+ #l; #e; #dim1; #dim2;
+ nauto library;
+*)
nlemma eqSUN_to_eq : ∀l.∀x,y:S_UN l.eq_SUN l x y = true → x = y.
- #l; #x; #y;
- nchange with ((eq_nat (getelem ? x) (getelem ? y) = true) → x = y);
- #H; napply (eqSUN_to_eq_aux l x y (eqnat_to_eq … H)).
+ #l; #x; nelim x;
+ #u1; #dim1;
+ #y; nelim y;
+ #u2; #dim2;
+ nchange with ((eq_nat u1 u2 = true) → ?);
+ #H;
+ nrewrite > (eqnat_to_eq u1 u2 H) in dim1:(%) ⊢ %;
+ #dim1;
+ napply eqSUN_to_eq_aux.
nqed.
(* neq_to_neqxx universale *)
(* esempio0: universo ottale *)
ndefinition oct0 ≝ O.
-ndefinition oct1 ≝ nat1.
-ndefinition oct2 ≝ nat2.
-ndefinition oct3 ≝ nat3.
-ndefinition oct4 ≝ nat4.
-ndefinition oct5 ≝ nat5.
-ndefinition oct6 ≝ nat6.
-ndefinition oct7 ≝ nat7.
+ndefinition oct1 ≝ S O.
+ndefinition oct2 ≝ S (S O).
+ndefinition oct3 ≝ S (S (S O)).
+ndefinition oct4 ≝ S (S (S (S O))).
+ndefinition oct5 ≝ S (S (S (S (S O)))).
+ndefinition oct6 ≝ S (S (S (S (S (S O))))).
+ndefinition oct7 ≝ S (S (S (S (S (S (S O)))))).
ndefinition oct_UN ≝ « oct0 ; oct1 ; oct2 ; oct3 ; oct4 ; oct5 ; oct6 £ oct7 ».
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/ascii_base.ma".
-include "common/comp.ma".
-include "num/bool_lemmas.ma".
-
-(* ************************** *)
-(* DEFINIZIONE ASCII MINIMALE *)
-(* ************************** *)
-
-ndefinition ascii_destruct_aux ≝
-Πc1,c2.ΠP:Prop.c1 = c2 →
- match eq_ascii c1 c2 with [ true ⇒ P → P | false ⇒ P ].
-
-nlemma ascii_destruct : ascii_destruct_aux.
- #c1; #c2; #P; #H;
- nrewrite < H;
- nelim c1;
- nnormalize;
- napply (λx.x).
-nqed.
-
-nlemma eq_to_eqascii : ∀n1,n2.n1 = n2 → eq_ascii n1 n2 = true.
- #n1; #n2; #H;
- nrewrite > H;
- nelim n2;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma neqascii_to_neq : ∀n1,n2.eq_ascii n1 n2 = false → n1 ≠ n2.
- #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_ascii n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqascii n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-(* !!! per brevita... *)
-naxiom eqascii_to_eq : ∀c1,c2.eq_ascii c1 c2 = true → c1 = c2.
-
-nlemma neq_to_neqascii : ∀n1,n2.n1 ≠ n2 → eq_ascii n1 n2 = false.
- #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_ascii n1 n2));
- napply (not_to_not (eq_ascii n1 n2 = true) (n1 = n2) ? H);
- napply (eqascii_to_eq n1 n2).
-nqed.
-
-nlemma decidable_ascii : ∀x,y:ascii.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_ascii x y = true) (eq_ascii x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqascii_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqascii_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqascii : symmetricT ascii bool eq_ascii.
- #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_ascii n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqascii n1 n2 H);
- napply (symmetric_eq ? (eq_ascii n2 n1) false);
- napply (neq_to_neqascii n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
-
-nlemma ascii_is_comparable : comparable.
- @ ascii
- ##[ napply ch_0
- ##| napply forall_ascii
- ##| napply eq_ascii
- ##| napply eqascii_to_eq
- ##| napply eq_to_eqascii
- ##| napply neqascii_to_neq
- ##| napply neq_to_neqascii
- ##| napply decidable_ascii
- ##| napply symmetric_eqascii
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr ascii_is_comparable ≡ ascii.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/bool.ma".
-
-(* ************************** *)
-(* DEFINIZIONE ASCII MINIMALE *)
-(* ************************** *)
-
-ninductive ascii : Type ≝
-(* numeri *)
- ch_0: ascii
-| ch_1: ascii
-| ch_2: ascii
-| ch_3: ascii
-| ch_4: ascii
-| ch_5: ascii
-| ch_6: ascii
-| ch_7: ascii
-| ch_8: ascii
-| ch_9: ascii
-
-(* simboli *)
-| ch__: ascii
-
-(* maiuscole *)
-| ch_A: ascii
-| ch_B: ascii
-| ch_C: ascii
-| ch_D: ascii
-| ch_E: ascii
-| ch_F: ascii
-| ch_G: ascii
-| ch_H: ascii
-| ch_I: ascii
-| ch_J: ascii
-| ch_K: ascii
-| ch_L: ascii
-| ch_M: ascii
-| ch_N: ascii
-| ch_O: ascii
-| ch_P: ascii
-| ch_Q: ascii
-| ch_R: ascii
-| ch_S: ascii
-| ch_T: ascii
-| ch_U: ascii
-| ch_V: ascii
-| ch_W: ascii
-| ch_X: ascii
-| ch_Y: ascii
-| ch_Z: ascii
-
-(* minuscole *)
-| ch_a: ascii
-| ch_b: ascii
-| ch_c: ascii
-| ch_d: ascii
-| ch_e: ascii
-| ch_f: ascii
-| ch_g: ascii
-| ch_h: ascii
-| ch_i: ascii
-| ch_j: ascii
-| ch_k: ascii
-| ch_l: ascii
-| ch_m: ascii
-| ch_n: ascii
-| ch_o: ascii
-| ch_p: ascii
-| ch_q: ascii
-| ch_r: ascii
-| ch_s: ascii
-| ch_t: ascii
-| ch_u: ascii
-| ch_v: ascii
-| ch_w: ascii
-| ch_x: ascii
-| ch_y: ascii
-| ch_z: ascii.
-
-(* iteratore sugli ascii *)
-ndefinition forall_ascii ≝ λP.
- P ch_0 ⊗ P ch_1 ⊗ P ch_2 ⊗ P ch_3 ⊗ P ch_4 ⊗ P ch_5 ⊗ P ch_6 ⊗ P ch_7 ⊗
- P ch_8 ⊗ P ch_9 ⊗ P ch__ ⊗ P ch_A ⊗ P ch_B ⊗ P ch_C ⊗ P ch_D ⊗ P ch_E ⊗
- P ch_F ⊗ P ch_G ⊗ P ch_H ⊗ P ch_I ⊗ P ch_J ⊗ P ch_K ⊗ P ch_L ⊗ P ch_M ⊗
- P ch_N ⊗ P ch_O ⊗ P ch_P ⊗ P ch_Q ⊗ P ch_R ⊗ P ch_S ⊗ P ch_T ⊗ P ch_U ⊗
- P ch_V ⊗ P ch_W ⊗ P ch_X ⊗ P ch_Y ⊗ P ch_Z ⊗ P ch_a ⊗ P ch_b ⊗ P ch_c ⊗
- P ch_d ⊗ P ch_e ⊗ P ch_f ⊗ P ch_g ⊗ P ch_h ⊗ P ch_i ⊗ P ch_j ⊗ P ch_k ⊗
- P ch_l ⊗ P ch_m ⊗ P ch_n ⊗ P ch_o ⊗ P ch_p ⊗ P ch_q ⊗ P ch_r ⊗ P ch_s ⊗
- P ch_t ⊗ P ch_u ⊗ P ch_v ⊗ P ch_w ⊗ P ch_x ⊗ P ch_y ⊗ P ch_z.
-
-(* confronto fra ascii *)
-ndefinition eq_ascii ≝
-λc,c':ascii.match c with
- [ ch_0 ⇒ match c' with [ ch_0 ⇒ true | _ ⇒ false ] | ch_1 ⇒ match c' with [ ch_1 ⇒ true | _ ⇒ false ]
- | ch_2 ⇒ match c' with [ ch_2 ⇒ true | _ ⇒ false ] | ch_3 ⇒ match c' with [ ch_3 ⇒ true | _ ⇒ false ]
- | ch_4 ⇒ match c' with [ ch_4 ⇒ true | _ ⇒ false ] | ch_5 ⇒ match c' with [ ch_5 ⇒ true | _ ⇒ false ]
- | ch_6 ⇒ match c' with [ ch_6 ⇒ true | _ ⇒ false ] | ch_7 ⇒ match c' with [ ch_7 ⇒ true | _ ⇒ false ]
- | ch_8 ⇒ match c' with [ ch_8 ⇒ true | _ ⇒ false ] | ch_9 ⇒ match c' with [ ch_9 ⇒ true | _ ⇒ false ]
- | ch__ ⇒ match c' with [ ch__ ⇒ true | _ ⇒ false ] | ch_A ⇒ match c' with [ ch_A ⇒ true | _ ⇒ false ]
- | ch_B ⇒ match c' with [ ch_B ⇒ true | _ ⇒ false ] | ch_C ⇒ match c' with [ ch_C ⇒ true | _ ⇒ false ]
- | ch_D ⇒ match c' with [ ch_D ⇒ true | _ ⇒ false ] | ch_E ⇒ match c' with [ ch_E ⇒ true | _ ⇒ false ]
- | ch_F ⇒ match c' with [ ch_F ⇒ true | _ ⇒ false ] | ch_G ⇒ match c' with [ ch_G ⇒ true | _ ⇒ false ]
- | ch_H ⇒ match c' with [ ch_H ⇒ true | _ ⇒ false ] | ch_I ⇒ match c' with [ ch_I ⇒ true | _ ⇒ false ]
- | ch_J ⇒ match c' with [ ch_J ⇒ true | _ ⇒ false ] | ch_K ⇒ match c' with [ ch_K ⇒ true | _ ⇒ false ]
- | ch_L ⇒ match c' with [ ch_L ⇒ true | _ ⇒ false ] | ch_M ⇒ match c' with [ ch_M ⇒ true | _ ⇒ false ]
- | ch_N ⇒ match c' with [ ch_N ⇒ true | _ ⇒ false ] | ch_O ⇒ match c' with [ ch_O ⇒ true | _ ⇒ false ]
- | ch_P ⇒ match c' with [ ch_P ⇒ true | _ ⇒ false ] | ch_Q ⇒ match c' with [ ch_Q ⇒ true | _ ⇒ false ]
- | ch_R ⇒ match c' with [ ch_R ⇒ true | _ ⇒ false ] | ch_S ⇒ match c' with [ ch_S ⇒ true | _ ⇒ false ]
- | ch_T ⇒ match c' with [ ch_T ⇒ true | _ ⇒ false ] | ch_U ⇒ match c' with [ ch_U ⇒ true | _ ⇒ false ]
- | ch_V ⇒ match c' with [ ch_V ⇒ true | _ ⇒ false ] | ch_W ⇒ match c' with [ ch_W ⇒ true | _ ⇒ false ]
- | ch_X ⇒ match c' with [ ch_X ⇒ true | _ ⇒ false ] | ch_Y ⇒ match c' with [ ch_Y ⇒ true | _ ⇒ false ]
- | ch_Z ⇒ match c' with [ ch_Z ⇒ true | _ ⇒ false ] | ch_a ⇒ match c' with [ ch_a ⇒ true | _ ⇒ false ]
- | ch_b ⇒ match c' with [ ch_b ⇒ true | _ ⇒ false ] | ch_c ⇒ match c' with [ ch_c ⇒ true | _ ⇒ false ]
- | ch_d ⇒ match c' with [ ch_d ⇒ true | _ ⇒ false ] | ch_e ⇒ match c' with [ ch_e ⇒ true | _ ⇒ false ]
- | ch_f ⇒ match c' with [ ch_f ⇒ true | _ ⇒ false ] | ch_g ⇒ match c' with [ ch_g ⇒ true | _ ⇒ false ]
- | ch_h ⇒ match c' with [ ch_h ⇒ true | _ ⇒ false ] | ch_i ⇒ match c' with [ ch_i ⇒ true | _ ⇒ false ]
- | ch_j ⇒ match c' with [ ch_j ⇒ true | _ ⇒ false ] | ch_k ⇒ match c' with [ ch_k ⇒ true | _ ⇒ false ]
- | ch_l ⇒ match c' with [ ch_l ⇒ true | _ ⇒ false ] | ch_m ⇒ match c' with [ ch_m ⇒ true | _ ⇒ false ]
- | ch_n ⇒ match c' with [ ch_n ⇒ true | _ ⇒ false ] | ch_o ⇒ match c' with [ ch_o ⇒ true | _ ⇒ false ]
- | ch_p ⇒ match c' with [ ch_p ⇒ true | _ ⇒ false ] | ch_q ⇒ match c' with [ ch_q ⇒ true | _ ⇒ false ]
- | ch_r ⇒ match c' with [ ch_r ⇒ true | _ ⇒ false ] | ch_s ⇒ match c' with [ ch_s ⇒ true | _ ⇒ false ]
- | ch_t ⇒ match c' with [ ch_t ⇒ true | _ ⇒ false ] | ch_u ⇒ match c' with [ ch_u ⇒ true | _ ⇒ false ]
- | ch_v ⇒ match c' with [ ch_v ⇒ true | _ ⇒ false ] | ch_w ⇒ match c' with [ ch_w ⇒ true | _ ⇒ false ]
- | ch_x ⇒ match c' with [ ch_x ⇒ true | _ ⇒ false ] | ch_y ⇒ match c' with [ ch_y ⇒ true | _ ⇒ false ]
- | ch_z ⇒ match c' with [ ch_z ⇒ true | _ ⇒ false ]
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/hints_declaration.ma".
-include "num/bool.ma".
-
-alias symbol "hint_decl" (instance 1) = "hint_decl_Type1".
-
-nrecord comparable : Type[1] ≝
- {
- carr :> Type[0];
- zeroc : carr;
- forallc : (carr → bool) → bool;
- eqc : carr → carr → bool;
- eqc_to_eq : ∀x,y.(eqc x y = true) → (x = y);
- eq_to_eqc : ∀x,y.(x = y) → (eqc x y = true);
- neqc_to_neq : ∀x,y.(eqc x y = false) → (x ≠ y);
- neq_to_neqc : ∀x,y.(x ≠ y) → (eqc x y = false);
- decidable_c : ∀x,y:carr.decidable (x = y);
- symmetric_eqc : symmetricT carr bool eqc
- }.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/pts.ma".
-
-(*
-
-Notation for hint declaration
-==============================
-
-The idea is to write a context, with abstraction first, then
-recursive calls (let-in) and finally the two equivalent terms.
-The context can be empty. Note the ; to begin the second part of
-the context (necessary even if the first part is empty).
-
- unification hint PREC \coloneq
- ID : TY, ..., ID : TY
- ; ID \equest T, ..., ID \equest T
- \vdash T1 \equiv T2
-
-With unidoce and some ASCII art it looks like the following:
-
- unification hint PREC ≔ ID : TY, ..., ID : TY;
- ID ≟ T, ..., ID ≟ T
- (*---------------------*) ⊢
- T1 ≡ T2
-
-*)
-
-(* it seems unbelivable, but it works! *)
-notation > "≔ (list0 ( (list1 (ident x) sep , ) opt (: T) ) sep ,) opt (; (list1 (ident U ≟ term 90 V ) sep ,)) ⊢ term 19 Px ≡ term 19 Py"
- with precedence 90
- for @{ ${ fold right
- @{ ${ default
- @{ ${ fold right
- @{ 'hint_decl $Px $Py }
- rec acc1 @{ let ( ${ident U} : ?) ≝ $V in $acc1} } }
- @{ 'hint_decl $Px $Py }
- }
- }
- rec acc @{
- ${ fold right @{ $acc } rec acc2
- @{ ∀${ident x}:${ default @{ $T } @{ ? } }.$acc2 } }
- }
- }}.
-
-ndefinition hint_declaration_Type0 ≝ λA:Type[0].λa,b:A.Prop.
-ndefinition hint_declaration_Type1 ≝ λA:Type[1].λa,b:A.Prop.
-ndefinition hint_declaration_Type2 ≝ λa,b:Type[2].Prop.
-ndefinition hint_declaration_CProp0 ≝ λA:CProp[0].λa,b:A.Prop.
-ndefinition hint_declaration_CProp1 ≝ λA:CProp[1].λa,b:A.Prop.
-ndefinition hint_declaration_CProp2 ≝ λa,b:CProp[2].Prop.
-
-interpretation "hint_decl_Type2" 'hint_decl a b = (hint_declaration_Type2 a b).
-interpretation "hint_decl_CProp2" 'hint_decl a b = (hint_declaration_CProp2 a b).
-interpretation "hint_decl_Type1" 'hint_decl a b = (hint_declaration_Type1 ? a b).
-interpretation "hint_decl_CProp1" 'hint_decl a b = (hint_declaration_CProp1 ? a b).
-interpretation "hint_decl_CProp0" 'hint_decl a b = (hint_declaration_CProp0 ? a b).
-interpretation "hint_decl_Type0" 'hint_decl a b = (hint_declaration_Type0 ? a b).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/comp.ma".
-include "common/option.ma".
-include "common/nat.ma".
-
-(* *************** *)
-(* LISTE GENERICHE *)
-(* *************** *)
-
-ninductive list (A:Type) : Type ≝
- nil: list A
-| cons: A → list A → list A.
-
-nlet rec append A (l1: list A) l2 on l1 ≝
- match l1 with
- [ nil ⇒ l2
- | (cons hd tl) ⇒ cons A hd (append A tl l2) ].
-
-notation "hvbox(hd break :: tl)"
- right associative with precedence 47
- for @{'cons $hd $tl}.
-
-notation "[ list0 x sep ; ]"
- non associative with precedence 90
- for ${fold right @'nil rec acc @{'cons $x $acc}}.
-
-notation "hvbox(l1 break @ l2)"
- right associative with precedence 47
- for @{'append $l1 $l2 }.
-
-interpretation "nil" 'nil = (nil ?).
-interpretation "cons" 'cons hd tl = (cons ? hd tl).
-interpretation "append" 'append l1 l2 = (append ? l1 l2).
-
-nlemma list_destruct_1 : ∀T.∀x1,x2:T.∀y1,y2:list T.cons T x1 y1 = cons T x2 y2 → x1 = x2.
- #T; #x1; #x2; #y1; #y2; #H;
- nchange with (match cons T x2 y2 with [ nil ⇒ False | cons a _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma list_destruct_2 : ∀T.∀x1,x2:T.∀y1,y2:list T.cons T x1 y1 = cons T x2 y2 → y1 = y2.
- #T; #x1; #x2; #y1; #y2; #H;
- nchange with (match cons T x2 y2 with [ nil ⇒ False | cons _ b ⇒ y1 = b ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma list_destruct_cons_nil : ∀T.∀x:T.∀y:list T.cons T x y = nil T → False.
- #T; #x; #y; #H;
- nchange with (match cons T x y with [ nil ⇒ True | cons a b ⇒ False ]);
- nrewrite > H;
- nnormalize;
- napply I.
-nqed.
-
-nlemma list_destruct_nil_cons : ∀T.∀x:T.∀y:list T.nil T = cons T x y → False.
- #T; #x; #y; #H;
- nchange with (match cons T x y with [ nil ⇒ True | cons a b ⇒ False ]);
- nrewrite < H;
- nnormalize;
- napply I.
-nqed.
-
-nlemma append_nil : ∀T:Type.∀l:list T.(l@[]) = l.
- #T; #l;
- nelim l;
- nnormalize;
- ##[ ##1: napply refl_eq
- ##| ##2: #x; #y; #H;
- nrewrite > H;
- napply refl_eq
- ##]
-nqed.
-
-nlemma associative_list : ∀T.associative (list T) (append T).
- #T; #x; #y; #z;
- nelim x;
- nnormalize;
- ##[ ##1: napply refl_eq
- ##| ##2: #a; #b; #H;
- nrewrite > H;
- napply refl_eq
- ##]
-nqed.
-
-nlemma cons_append_commute : ∀T:Type.∀l1,l2:list T.∀a:T.a :: (l1 @ l2) = (a :: l1) @ l2.
- #T; #l1; #l2; #a;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma append_cons_commute : ∀T:Type.∀a:T.∀l,l1:list T.l @ (a::l1) = (l@[a]) @ l1.
- #T; #a; #l; #l1;
- nrewrite > (associative_list T l [a] l1);
- nnormalize;
- napply refl_eq.
-nqed.
-
-(* listlen *)
-nlet rec len_list (T:Type) (l:list T) on l ≝
- match l with [ nil ⇒ O | cons _ t ⇒ S (len_list T t) ].
-
-(* vuota? *)
-ndefinition is_empty_list ≝
-λT:Type.λl:list T.match l with [ nil ⇒ True | cons _ _ ⇒ False ].
-
-ndefinition isb_empty_list ≝
-λT:Type.λl:list T.match l with [ nil ⇒ true | cons _ _ ⇒ false ].
-
-ndefinition isnot_empty_list ≝
-λT:Type.λl:list T.match l with [ nil ⇒ False | cons _ _ ⇒ True ].
-
-ndefinition isnotb_empty_list ≝
-λT:Type.λl:list T.match l with [ nil ⇒ false | cons _ _ ⇒ true ].
-
-(* reverse *)
-nlet rec reverse_list (T:Type) (l:list T) on l ≝
- match l with
- [ nil ⇒ nil T
- | cons h t ⇒ (reverse_list T t)@[h]
- ].
-
-(* getFirst *)
-ndefinition get_first_list ≝
-λT:Type.λl:list T.match l with
- [ nil ⇒ None ?
- | cons h _ ⇒ Some ? h ].
-
-(* getLast *)
-ndefinition get_last_list ≝
-λT:Type.λl:list T.match reverse_list T l with
- [ nil ⇒ None ?
- | cons h _ ⇒ Some ? h ].
-
-(* cutFirst *)
-ndefinition cut_first_list ≝
-λT:Type.λl:list T.match l with
- [ nil ⇒ nil T
- | cons _ t ⇒ t ].
-
-(* cutLast *)
-ndefinition cut_last_list ≝
-λT:Type.λl:list T.match reverse_list T l with
- [ nil ⇒ nil T
- | cons _ t ⇒ reverse_list T t ].
-
-(* apply f *)
-nlet rec apply_f_list (T1,T2:Type) (l:list T1) (f:T1 → T2) on l ≝
-match l with
- [ nil ⇒ nil T2
- | cons h t ⇒ cons T2 (f h) (apply_f_list T1 T2 t f) ].
-
-(* fold right *)
-nlet rec fold_right_list (T1,T2:Type) (f:T1 → T2 → T2) (acc:T2) (l:list T1) on l ≝
- match l with
- [ nil ⇒ acc
- | cons h t ⇒ f h (fold_right_list T1 T2 f acc t)
- ].
-
-(* double fold right *)
-nlemma fold_right_list2_aux1 :
-∀T.∀h,t.len_list T [] = len_list T (h::t) → False.
- #T; #h; #t;
- nnormalize;
- #H;
- ndestruct (*napply (nat_destruct_0_S ? H)*).
-nqed.
-
-nlemma fold_right_list2_aux2 :
-∀T.∀h,t.len_list T (h::t) = len_list T [] → False.
- #T; #h; #t;
- nnormalize;
- #H;
- ndestruct (*napply (nat_destruct_S_0 ? H)*).
-nqed.
-
-nlemma fold_right_list2_aux3 :
-∀T.∀h,h',t,t'.len_list T (h::t) = len_list T (h'::t') → len_list T t = len_list T t'.
- #T; #h; #h'; #t; #t';
- nelim t;
- nelim t';
- ##[ ##1: nnormalize; #H; napply refl_eq
- ##| ##2: #a; #l'; #H; #H1;
- nchange in H1:(%) with ((S O) = (S (S (len_list T l'))));
- ndestruct (*nelim (nat_destruct_0_S ? (nat_destruct_S_S … H1))*)
- ##| ##3: #a; #l'; #H; #H1;
- nchange in H1:(%) with ((S (S (len_list T l'))) = (S O));
- ndestruct (*nelim (nat_destruct_S_0 ? (nat_destruct_S_S … H1))*)
- ##| ##4: #a; #l; #H; #a1; #l1; #H1; #H2;
- nchange in H2:(%) with ((S (S (len_list T l1))) = (S (S (len_list T l))));
- nchange with ((S (len_list T l1)) = (S (len_list T l)));
- nrewrite > (nat_destruct_S_S … H2);
- napply refl_eq
- ##]
-nqed.
-
-nlet rec fold_right_list2 (T1,T2:Type) (f:T1 → T1 → T2 → T2) (acc:T2) (l1:list T1) on l1 ≝
- match l1
- return λl1.Πl2.len_list T1 l1 = len_list T1 l2 → T2
- with
- [ nil ⇒ λl2.match l2 return λl2.len_list T1 [] = len_list T1 l2 → T2 with
- [ nil ⇒ λp:len_list T1 [] = len_list T1 [].acc
- | cons h t ⇒ λp:len_list T1 [] = len_list T1 (h::t).
- False_rect_Type0 ? (fold_right_list2_aux1 T1 h t p)
- ]
- | cons h t ⇒ λl2.match l2 return λl2.len_list T1 (h::t) = len_list T1 l2 → T2 with
- [ nil ⇒ λp:len_list T1 (h::t) = len_list T1 [].
- False_rect_Type0 ? (fold_right_list2_aux2 T1 h t p)
- | cons h' t' ⇒ λp:len_list T1 (h::t) = len_list T1 (h'::t').
- f h h' (fold_right_list2 T1 T2 f acc t t' (fold_right_list2_aux3 T1 h h' t t' p))
- ]
- ].
-
-nlet rec bfold_right_list2 (T1:Type) (f:T1 → T1 → bool) (l1,l2:list T1) on l1 ≝
- match l1 with
- [ nil ⇒ match l2 with
- [ nil ⇒ true | cons h t ⇒ false ]
- | cons h t ⇒ match l2 with
- [ nil ⇒ false | cons h' t' ⇒ (f h h') ⊗ (bfold_right_list2 T1 f t t')
- ]
- ].
-
-(* nth elem *)
-nlet rec nth_list (T:Type) (l:list T) (n:nat) on l ≝
- match l with
- [ nil ⇒ None ?
- | cons h t ⇒ match n with
- [ O ⇒ Some ? h | S n' ⇒ nth_list T t n' ]
- ].
-
-(* abs elem *)
-ndefinition abs_list_aux1 : ∀T:Type.∀n.((len_list T []) > n) = true → False.
- #T; nnormalize; #n; #H; ndestruct (*napply (bool_destruct … H)*). nqed.
-
-ndefinition abs_list_aux2 : ∀T:Type.∀h:T.∀t:list T.∀n.((len_list T (h::t)) > (S n) = true) → ((len_list T t) > n) = true.
- #T; #h; #t; #n; nnormalize; #H; napply H. nqed.
-
-nlet rec abs_list (T:Type) (l:list T) on l ≝
- match l
- return λl.Πn.(((len_list T l) > n) = true) → T
- with
- [ nil ⇒ λn.λp:(((len_list T []) > n) = true).False_rect_Type0 ? (abs_list_aux1 T n p)
- | cons h t ⇒ λn.
- match n with
- [ O ⇒ λp:(((len_list T (h::t)) > O) = true).h
- | S n' ⇒ λp:(((len_list T (h::t)) > (S n')) = true).
- abs_list T t n' (abs_list_aux2 T h t n' p)
- ]
- ].
-
-(* esempio: abs_list ? [ 1; 2; 3 ; 4 ] 0 (refl_eq …) = 1. *)
-
-nlemma symmetric_lenlist : ∀T.∀l1,l2:list T.len_list T l1 = len_list T l2 → len_list T l2 = len_list T l1.
- #T; #l1;
- nelim l1;
- ##[ ##1: #l2; ncases l2; nnormalize;
- ##[ ##1: #H; napply refl_eq
- ##| ##2: #h; #t; #H; ndestruct (*nelim (nat_destruct_0_S ? H)*)
- ##]
- ##| ##2: #h; #l2; ncases l2; nnormalize;
- ##[ ##1: #H; #l; #H1; nrewrite < H1; napply refl_eq
- ##| ##2: #h; #l; #H; #l3; #H1; nrewrite < H1; napply refl_eq
- ##]
- ##]
-nqed.
-
-nlemma symmetric_foldrightlist2_aux :
-∀T1,T2:Type.∀f:T1 → T1 → T2 → T2.
- (∀x,y,z.f x y z = f y x z) →
- (∀acc:T2.∀l1,l2:list T1.
- ∀H1:(len_list T1 l1 = len_list T1 l2).
- ∀H2:(len_list T1 l2 = len_list T1 l1).
- (fold_right_list2 T1 T2 f acc l1 l2 H1 = fold_right_list2 T1 T2 f acc l2 l1 H2)).
- #T1; #T2; #f; #H; #acc; #l1;
- nelim l1;
- ##[ ##1: #l2; ncases l2;
- ##[ ##1: nnormalize; #H1; #H2; napply refl_eq
- ##| ##2: #h; #l; #H1; #H2;
- nchange in H1:(%) with (O = (S (len_list ? l)));
- ndestruct (*nelim (nat_destruct_0_S ? H1)*)
- ##]
- ##| ##2: #h3; #l3; #H1; #l2; ncases l2;
- ##[ ##1: #H2; #H3; nchange in H2:(%) with ((S (len_list ? l3)) = O);
- ndestruct (*nelim (nat_destruct_S_0 ? H1)*)
- ##| ##2: #h4; #l4; #H2; #H3;
- nchange in H2:(%) with ((S (len_list ? l3)) = (S (len_list ? l4)));
- nchange in H3:(%) with ((S (len_list ? l4)) = (S (len_list ? l3)));
- nchange with ((f h3 h4 (fold_right_list2 T1 T2 f acc l3 l4 (fold_right_list2_aux3 T1 h3 h4 l3 l4 ?))) =
- (f h4 h3 (fold_right_list2 T1 T2 f acc l4 l3 (fold_right_list2_aux3 T1 h4 h3 l4 l3 ?))));
- nrewrite < (H1 l4 (fold_right_list2_aux3 T1 h3 h4 l3 l4 H2) (fold_right_list2_aux3 T1 h4 h3 l4 l3 H3));
- nrewrite > (H h3 h4 (fold_right_list2 T1 T2 f acc l3 l4 ?));
- napply refl_eq
- ##]
- ##]
-nqed.
-
-nlemma symmetric_foldrightlist2 :
-∀T1,T2:Type.∀f:T1 → T1 → T2 → T2.
- (∀x,y,z.f x y z = f y x z) →
- (∀acc:T2.∀l1,l2:list T1.∀H:len_list T1 l1 = len_list T1 l2.
- fold_right_list2 T1 T2 f acc l1 l2 H = fold_right_list2 T1 T2 f acc l2 l1 (symmetric_lenlist T1 l1 l2 H)).
- #T1; #T2; #f; #H; #acc; #l1; #l2; #H1;
- nrewrite > (symmetric_foldrightlist2_aux T1 T2 f H acc l1 l2 H1 (symmetric_lenlist T1 l1 l2 H1));
- napply refl_eq.
-nqed.
-
-nlemma symmetric_bfoldrightlist2 :
-∀T1:Type.∀f:T1 → T1 → bool.
- (∀x,y.f x y = f y x) →
- (∀l1,l2:list T1.
- bfold_right_list2 T1 f l1 l2 = bfold_right_list2 T1 f l2 l1).
- #T; #f; #H; #l1;
- nelim l1;
- ##[ ##1: #l2; ncases l2;
- ##[ ##1: nnormalize; napply refl_eq
- ##| ##2: #hh2; #ll2; nnormalize; napply refl_eq
- ##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: nnormalize; napply refl_eq
- ##| ##2: #hh2; #ll2; nnormalize;
- nrewrite > (H1 ll2);
- nrewrite > (H hh1 hh2);
- napply refl_eq
- ##]
- ##]
-nqed.
-
-nlemma bfoldrightlist2_to_eq :
-∀T1:Type.∀f:T1 → T1 → bool.
- (∀x,y.(f x y = true → x = y)) →
- (∀l1,l2:list T1.
- (bfold_right_list2 T1 f l1 l2 = true → l1 = l2)).
- #T; #f; #H; #l1;
- nelim l1;
- ##[ ##1: #l2; ncases l2;
- ##[ ##1: #H1; napply refl_eq
- ##| ##2: #hh2; #ll2; nnormalize; #H1;
- ndestruct (*napply (bool_destruct … H1)*)
- ##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: nnormalize; #H2;
- ndestruct (*napply (bool_destruct … H2)*)
- ##| ##2: #hh2; #ll2; #H2;
- nchange in H2:(%) with (((f hh1 hh2)⊗(bfold_right_list2 T f ll1 ll2)) = true);
- nrewrite > (H hh1 hh2 (andb_true_true_l … H2));
- nrewrite > (H1 ll2 (andb_true_true_r … H2));
- napply refl_eq
- ##]
- ##]
-nqed.
-
-nlemma eq_to_bfoldrightlist2 :
-∀T1:Type.∀f:T1 → T1 → bool.
- (∀x,y.(x = y → f x y = true)) →
- (∀l1,l2:list T1.
- (l1 = l2 → bfold_right_list2 T1 f l1 l2 = true)).
- #T; #f; #H; #l1;
- nelim l1;
- ##[ ##1: #l2; ncases l2;
- ##[ ##1: #H1; nnormalize; napply refl_eq
- ##| ##2: #hh2; #ll2; #H1;
- (* !!! ndestruct: assert false *)
- nelim (list_destruct_nil_cons ??? H1)
- ##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: #H2;
- (* !!! ndestruct: assert false *)
- nelim (list_destruct_cons_nil ??? H2)
- ##| ##2: #hh2; #ll2; #H2; nnormalize;
- nrewrite > (list_destruct_1 … H2);
- nrewrite > (H hh2 hh2 (refl_eq …));
- nnormalize;
- nrewrite > (H1 ll2 (list_destruct_2 … H2));
- napply refl_eq
- ##]
- ##]
-nqed.
-
-nlemma bfoldrightlist2_to_lenlist :
-∀T.∀f:T → T → bool.
- (∀l1,l2:list T.bfold_right_list2 T f l1 l2 = true → len_list T l1 = len_list T l2).
- #T; #f; #l1;
- nelim l1;
- ##[ ##1: #l2; ncases l2;
- ##[ ##1: nnormalize; #H; napply refl_eq
- ##| ##2: nnormalize; #hh; #tt; #H;
- ndestruct (*napply (bool_destruct … H)*)
- ##]
- ##| ##2: #hh; #tt; #H; #l2; ncases l2;
- ##[ ##1: nnormalize; #H1;
- ndestruct (*napply (bool_destruct … H1)*)
- ##| ##2: #hh1; #tt1; #H1; nnormalize;
- nrewrite > (H tt1 ?);
- ##[ ##1: napply refl_eq
- ##| ##2: nchange in H1:(%) with ((? ⊗ (bfold_right_list2 T f tt tt1)) = true);
- napply (andb_true_true_r … H1)
- ##]
- ##]
- ##]
-nqed.
-
-nlemma decidable_list :
-∀T.(∀x,y:T.decidable (x = y)) →
- (∀x,y:list T.decidable (x = y)).
- #T; #H; #x; nelim x;
- ##[ ##1: #y; ncases y;
- ##[ ##1: nnormalize; napply (or2_intro1 (? = ?) (? ≠ ?) (refl_eq …))
- ##| ##2: #hh2; #tt2; nnormalize; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H1;
- (* !!! ndestruct: assert false *)
- napply (list_destruct_nil_cons T … H1)
- ##]
- ##| ##2: #hh1; #tt1; #H1; #y; ncases y;
- ##[ ##1: nnormalize; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H2;
- (* !!! ndestruct: assert false *)
- napply (list_destruct_cons_nil T … H2)
- ##| ##2: #hh2; #tt2; nnormalize; napply (or2_elim (hh1 = hh2) (hh1 ≠ hh2) ? (H …));
- ##[ ##2: #H2; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H3; napply (H2 (list_destruct_1 T … H3))
- ##| ##1: #H2; napply (or2_elim (tt1 = tt2) (tt1 ≠ tt2) ? (H1 tt2));
- ##[ ##2: #H3; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H4; napply (H3 (list_destruct_2 T … H4))
- ##| ##1: #H3; napply (or2_intro1 (? = ?) (? ≠ ?) ?);
- nrewrite > H2; nrewrite > H3; napply refl_eq
- ##]
- ##]
- ##]
- ##]
-nqed.
-
-nlemma nbfoldrightlist2_to_neq :
-∀T1:Type.∀f:T1 → T1 → bool.
- (∀x,y.(f x y = false → x ≠ y)) →
- (∀l1,l2:list T1.
- (bfold_right_list2 T1 f l1 l2 = false → l1 ≠ l2)).
- #T; #f; #H; #l1;
- nelim l1;
- ##[ ##1: #l2; ncases l2;
- ##[ ##1: nnormalize; #H1;
- ndestruct (*napply (bool_destruct … H1)*)
- ##| ##2: #hh2; #ll2; #H1; nnormalize; #H2;
- (* !!! ndestruct: assert false *)
- napply (list_destruct_nil_cons T … H2)
- ##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: #H2; nnormalize; #H3;
- (* !!! ndestruct: assert false *)
- napply (list_destruct_cons_nil T … H3)
- ##| ##2: #hh2; #ll2; #H2; nnormalize; #H3;
- nchange in H2:(%) with (((f hh1 hh2)⊗(bfold_right_list2 T f ll1 ll2)) = false);
- napply (H1 ll2 ? (list_destruct_2 T … H3));
- napply (or2_elim ??? (andb_false2 … H2) );
- ##[ ##1: #H4; napply (absurd (hh1 = hh2) …);
- ##[ ##1: nrewrite > (list_destruct_1 T … H3); napply refl_eq
- ##| ##2: napply (H … H4)
- ##]
- ##| ##2: #H4; napply H4
- ##]
- ##]
- ##]
-nqed.
-
-nlemma list_destruct :
-∀T.(∀x,y:T.decidable (x = y)) →
- (∀h1,h2:T.∀l1,l2:list T.
- (h1::l1) ≠ (h2::l2) → h1 ≠ h2 ∨ l1 ≠ l2).
- #T; #H; #h1; #h2; #l1; nelim l1;
- ##[ ##1: #l2; ncases l2;
- ##[ ##1: #H1; napply (or2_intro1 (h1 ≠ h2) ([] ≠ []) …);
- nnormalize; #H2; nrewrite > H2 in H1:(%);
- nnormalize; #H1; napply (H1 (refl_eq …))
- ##| ##2: #hh2; #ll2; #H1; napply (or2_intro2 (h1 ≠ h2) ([] ≠ (hh2::ll2)) …);
- nnormalize; #H2;
- (* !!! ndestruct: assert false *)
- napply (list_destruct_nil_cons T … H2)
- ##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: #H2; napply (or2_intro2 (h1 ≠ h2) ((hh1::ll1) ≠ []) …);
- nnormalize; #H3;
- (* !!! ndestruct: assert false *)
- napply (list_destruct_cons_nil T … H3)
- ##| ##2: #hh2; #ll2; #H2;
- napply (or2_elim (h1 = h2) (h1 ≠ h2) ? (H h1 h2) …);
- ##[ ##2: #H3; napply (or2_intro1 (h1 ≠ h2) ((hh1::ll1) ≠ (hh2::ll2)) H3)
- ##| ##1: #H3; napply (or2_intro2 (h1 ≠ h2) ((hh1::ll1) ≠ (hh2::ll2) …));
- nrewrite > H3 in H2:(%); #H2;
- nnormalize; #H4; nrewrite > (list_destruct_1 T … H4) in H2:(%); #H2;
- nrewrite > (list_destruct_2 T … H4) in H2:(%); #H2;
- napply (H2 (refl_eq …))
- ##]
- ##]
- ##]
-nqed.
-
-nlemma neq_to_nbfoldrightlist2 :
-∀T:Type.∀f:T → T → bool.
- (∀x,y:T.decidable (x = y)) →
- (∀x,y.(x ≠ y → f x y = false)) →
- (∀l1,l2:list T.
- (l1 ≠ l2 → bfold_right_list2 T f l1 l2 = false)).
- #T; #f; #H; #H1; #l1;
- nelim l1;
- ##[ ##1: #l2; ncases l2;
- ##[ ##1: nnormalize; #H2; nelim (H2 (refl_eq …))
- ##| ##2: #hh2; #ll2; nnormalize; #H2; napply refl_eq
- ##]
- ##| ##2: #hh1; #ll1; #H2; #l2; ncases l2;
- ##[ ##1: nnormalize; #H3; napply refl_eq
- ##| ##2: #hh2; #ll2; #H3;
- nchange with (((f hh1 hh2)⊗(bfold_right_list2 T f ll1 ll2)) = false);
- napply (or2_elim (hh1 ≠ hh2) (ll1 ≠ ll2) ? (list_destruct T H … H3) …);
- ##[ ##1: #H4; nrewrite > (H1 hh1 hh2 H4); nnormalize; napply refl_eq
- ##| ##2: #H4; nrewrite > (H2 ll2 H4);
- nrewrite > (symmetric_andbool (f hh1 hh2) false);
- nnormalize; napply refl_eq
- ##]
- ##]
- ##]
-nqed.
-
-nlemma isbemptylist_to_isemptylist : ∀T,l.isb_empty_list T l = true → is_empty_list T l.
- #T; #l;
- ncases l;
- nnormalize;
- ##[ ##1: #H; napply I
- ##| ##2: #x; #l; #H; ndestruct (*napply (bool_destruct … H)*)
- ##]
-nqed.
-
-nlemma isnotbemptylist_to_isnotemptylist : ∀T,l.isnotb_empty_list T l = true → isnot_empty_list T l.
- #T; #l;
- ncases l;
- nnormalize;
- ##[ ##1: #H; ndestruct (*napply (bool_destruct … H)*)
- ##| ##2: #x; #l; #H; napply I
- ##]
-nqed.
-
-nlemma list_is_comparable : comparable → comparable.
- #T; napply (mk_comparable (list T));
- ##[ napply (nil ?)
- ##| napply (λx.false)
- ##| napply (bfold_right_list2 T (eqc T))
- ##| napply (bfoldrightlist2_to_eq … (eqc T));
- napply (eqc_to_eq T)
- ##| napply (eq_to_bfoldrightlist2 … (eqc T));
- napply (eq_to_eqc T)
- ##| napply (nbfoldrightlist2_to_neq … (eqc T));
- napply (neqc_to_neq T)
- ##| napply (neq_to_nbfoldrightlist2 … (eqc T));
- ##[ napply (decidable_c T)
- ##| napply (neq_to_neqc T)
- ##]
- ##| napply decidable_list;
- napply (decidable_c T)
- ##| napply symmetric_bfoldrightlist2;
- napply (symmetric_eqc T)
- ##]
-nqed.
-
-unification hint 0 ≔ S: comparable;
- T ≟ (carr S),
- X ≟ (list_is_comparable S)
- (*********************************************) ⊢
- carr X ≡ list T.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/comp.ma".
-include "num/bool_lemmas.ma".
-
-(* ******** *)
-(* NATURALI *)
-(* ******** *)
-
-ninductive nat : Type ≝
- O : nat
-| S : nat → nat.
-
-(*
-interpretation "Natural numbers" 'N = nat.
-
-default "natural numbers" cic:/matita/common/nat/nat.ind.
-
-alias num (instance 0) = "natural number".
-*)
-
-nlet rec nat_it (T:Type) (f:T → T) (arg:T) (n:nat) on n ≝
- match n with
- [ O ⇒ arg
- | S n' ⇒ nat_it T f (f arg) n'
- ].
-
-ndefinition nat1 ≝ S O.
-ndefinition nat2 ≝ S nat1.
-ndefinition nat3 ≝ S nat2.
-ndefinition nat4 ≝ S nat3.
-ndefinition nat5 ≝ S nat4.
-ndefinition nat6 ≝ S nat5.
-ndefinition nat7 ≝ S nat6.
-ndefinition nat8 ≝ S nat7.
-ndefinition nat9 ≝ S nat8.
-ndefinition nat10 ≝ S nat9.
-ndefinition nat11 ≝ S nat10.
-ndefinition nat12 ≝ S nat11.
-ndefinition nat13 ≝ S nat12.
-ndefinition nat14 ≝ S nat13.
-ndefinition nat15 ≝ S nat14.
-ndefinition nat16 ≝ S nat15.
-ndefinition nat17 ≝ S nat16.
-ndefinition nat18 ≝ S nat17.
-ndefinition nat19 ≝ S nat18.
-ndefinition nat20 ≝ S nat19.
-ndefinition nat21 ≝ S nat20.
-ndefinition nat22 ≝ S nat21.
-ndefinition nat23 ≝ S nat22.
-ndefinition nat24 ≝ S nat23.
-ndefinition nat25 ≝ S nat24.
-ndefinition nat26 ≝ S nat25.
-ndefinition nat27 ≝ S nat26.
-ndefinition nat28 ≝ S nat27.
-ndefinition nat29 ≝ S nat28.
-ndefinition nat30 ≝ S nat29.
-ndefinition nat31 ≝ S nat30.
-ndefinition nat32 ≝ S nat31.
-ndefinition nat33 ≝ S nat32.
-ndefinition nat34 ≝ S nat33.
-ndefinition nat35 ≝ S nat34.
-ndefinition nat36 ≝ S nat35.
-ndefinition nat37 ≝ S nat36.
-ndefinition nat38 ≝ S nat37.
-ndefinition nat39 ≝ S nat38.
-ndefinition nat40 ≝ S nat39.
-ndefinition nat41 ≝ S nat40.
-ndefinition nat42 ≝ S nat41.
-ndefinition nat43 ≝ S nat42.
-ndefinition nat44 ≝ S nat43.
-ndefinition nat45 ≝ S nat44.
-ndefinition nat46 ≝ S nat45.
-ndefinition nat47 ≝ S nat46.
-ndefinition nat48 ≝ S nat47.
-ndefinition nat49 ≝ S nat48.
-ndefinition nat50 ≝ S nat49.
-ndefinition nat51 ≝ S nat50.
-ndefinition nat52 ≝ S nat51.
-ndefinition nat53 ≝ S nat52.
-ndefinition nat54 ≝ S nat53.
-ndefinition nat55 ≝ S nat54.
-ndefinition nat56 ≝ S nat55.
-ndefinition nat57 ≝ S nat56.
-ndefinition nat58 ≝ S nat57.
-ndefinition nat59 ≝ S nat58.
-ndefinition nat60 ≝ S nat59.
-ndefinition nat61 ≝ S nat60.
-ndefinition nat62 ≝ S nat61.
-ndefinition nat63 ≝ S nat62.
-ndefinition nat64 ≝ S nat63.
-ndefinition nat65 ≝ S nat64.
-ndefinition nat66 ≝ S nat65.
-ndefinition nat67 ≝ S nat66.
-ndefinition nat68 ≝ S nat67.
-ndefinition nat69 ≝ S nat68.
-ndefinition nat70 ≝ S nat69.
-ndefinition nat71 ≝ S nat70.
-ndefinition nat72 ≝ S nat71.
-ndefinition nat73 ≝ S nat72.
-ndefinition nat74 ≝ S nat73.
-ndefinition nat75 ≝ S nat74.
-ndefinition nat76 ≝ S nat75.
-ndefinition nat77 ≝ S nat76.
-ndefinition nat78 ≝ S nat77.
-ndefinition nat79 ≝ S nat78.
-ndefinition nat80 ≝ S nat79.
-ndefinition nat81 ≝ S nat80.
-ndefinition nat82 ≝ S nat81.
-ndefinition nat83 ≝ S nat82.
-ndefinition nat84 ≝ S nat83.
-ndefinition nat85 ≝ S nat84.
-ndefinition nat86 ≝ S nat85.
-ndefinition nat87 ≝ S nat86.
-ndefinition nat88 ≝ S nat87.
-ndefinition nat89 ≝ S nat88.
-ndefinition nat90 ≝ S nat89.
-ndefinition nat91 ≝ S nat90.
-ndefinition nat92 ≝ S nat91.
-ndefinition nat93 ≝ S nat92.
-ndefinition nat94 ≝ S nat93.
-ndefinition nat95 ≝ S nat94.
-ndefinition nat96 ≝ S nat95.
-ndefinition nat97 ≝ S nat96.
-ndefinition nat98 ≝ S nat97.
-ndefinition nat99 ≝ S nat98.
-ndefinition nat100 ≝ S nat99.
-
-nlet rec eq_nat (n1,n2:nat) on n1 ≝
- match n1 with
- [ O ⇒ match n2 with [ O ⇒ true | S _ ⇒ false ]
- | S n1' ⇒ match n2 with [ O ⇒ false | S n2' ⇒ eq_nat n1' n2' ]
- ].
-
-nlet rec le_nat n m ≝
- match n with
- [ O ⇒ true
- | (S p) ⇒ match m with
- [ O ⇒ false | (S q) ⇒ le_nat p q ]
- ].
-
-interpretation "natural 'less or equal to'" 'leq x y = (le_nat x y).
-
-ndefinition lt_nat ≝ λn1,n2:nat.(le_nat n1 n2) ⊗ (⊖ (eq_nat n1 n2)).
-
-interpretation "natural 'less than'" 'lt x y = (lt_nat x y).
-
-ndefinition ge_nat ≝ λn1,n2:nat.(⊖ (le_nat n1 n2)) ⊕ (eq_nat n1 n2).
-
-interpretation "natural 'greater or equal to'" 'geq x y = (ge_nat x y).
-
-ndefinition gt_nat ≝ λn1,n2:nat.⊖ (le_nat n1 n2).
-
-interpretation "natural 'greater than'" 'gt x y = (gt_nat x y).
-
-nlet rec plus (n1,n2:nat) on n1 ≝
- match n1 with
- [ O ⇒ n2
- | (S n1') ⇒ S (plus n1' n2) ].
-
-interpretation "natural plus" 'plus x y = (plus x y).
-
-nlet rec times (n1,n2:nat) on n1 ≝
- match n1 with
- [ O ⇒ O
- | (S n1') ⇒ n2 + (times n1' n2) ].
-
-interpretation "natural times" 'times x y = (times x y).
-
-nlet rec minus n m ≝
- match n with
- [ O ⇒ O
- | (S p) ⇒
- match m with
- [O ⇒ (S p)
- | (S q) ⇒ minus p q ]].
-
-interpretation "natural minus" 'minus x y = (minus x y).
-
-nlet rec div_aux p m n : nat ≝
-match (le_nat m n) with
-[ true ⇒ O
-| false ⇒
- match p with
- [ O ⇒ O
- | (S q) ⇒ S (div_aux q (m-(S n)) n)]].
-
-ndefinition div : nat → nat → nat ≝
-λn,m.match m with
- [ O ⇒ S n
- | (S p) ⇒ div_aux n n p].
-
-interpretation "natural divide" 'divide x y = (div x y).
-
-ndefinition pred ≝ λn.match n with [ O ⇒ O | S n ⇒ n ].
-
-ndefinition nat128 ≝ nat64 + nat64.
-ndefinition nat256 ≝ nat128 + nat128.
-ndefinition nat512 ≝ nat256 + nat256.
-ndefinition nat1024 ≝ nat512 + nat512.
-ndefinition nat2048 ≝ nat1024 + nat1024.
-ndefinition nat4096 ≝ nat2048 + nat2048.
-ndefinition nat8192 ≝ nat4096 + nat4096.
-ndefinition nat16384 ≝ nat8192 + nat8192.
-ndefinition nat32768 ≝ nat16384 + nat16384.
-ndefinition nat65536 ≝ nat32768 + nat32768.
-
-nlemma nat_destruct_S_S : ∀n1,n2:nat.S n1 = S n2 → n1 = n2.
- #n1; #n2; #H;
- nchange with (match S n2 with [ O ⇒ False | S a ⇒ n1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma nat_destruct_0_S : ∀n:nat.O = S n → False.
- #n; #H;
- nchange with (match S n with [ O ⇒ True | S a ⇒ False ]);
- nrewrite < H;
- nnormalize;
- napply I.
-nqed.
-
-nlemma nat_destruct_S_0 : ∀n:nat.S n = O → False.
- #n; #H;
- nchange with (match S n with [ O ⇒ True | S a ⇒ False ]);
- nrewrite > H;
- nnormalize;
- napply I.
-nqed.
-
-nlemma eq_to_eqnat : ∀n1,n2:nat.n1 = n2 → eq_nat n1 n2 = true.
- #n1;
- nelim n1;
- ##[ ##1: #n2;
- nelim n2;
- nnormalize;
- ##[ ##1: #H; napply refl_eq
- ##| ##2: #n3; #H; #H1; ndestruct (*nelim (nat_destruct_0_S ? H1)*)
- ##]
- ##| ##2: #n2; #H; #n3; #H1;
- ncases n3 in H1:(%) ⊢ %;
- nnormalize;
- ##[ ##1: #H1; ndestruct (*nelim (nat_destruct_S_0 ? H1)*)
- ##| ##2: #n4; #H1;
- napply (H n4 (nat_destruct_S_S … H1))
- ##]
- ##]
-nqed.
-
-nlemma neqnat_to_neq : ∀n1,n2:nat.(eq_nat n1 n2 = false → n1 ≠ n2).
- #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_nat n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqnat n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-nlemma eqnat_to_eq : ∀n1,n2:nat.(eq_nat n1 n2 = true → n1 = n2).
- #n1;
- nelim n1;
- ##[ ##1: #n2;
- nelim n2;
- nnormalize;
- ##[ ##1: #H; napply refl_eq
- ##| ##2: #n3; #H; #H1; ndestruct (*napply (bool_destruct … (O = S n3) H1)*)
- ##]
- ##| ##2: #n2; #H; #n3; #H1;
- ncases n3 in H1:(%) ⊢ %;
- nnormalize;
- ##[ ##1: #H1; ndestruct (*napply (bool_destruct … (S n2 = O) H1)*)
- ##| ##2: #n4; #H1;
- nrewrite > (H n4 H1);
- napply refl_eq
- ##]
- ##]
-nqed.
-
-nlemma neq_to_neqnat : ∀n1,n2:nat.n1 ≠ n2 → eq_nat n1 n2 = false.
- #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_nat n1 n2));
- napply (not_to_not (eq_nat n1 n2 = true) (n1 = n2) ? H);
- napply (eqnat_to_eq n1 n2).
-nqed.
-
-nlemma decidable_nat : ∀x,y:nat.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_nat x y = true) (eq_nat x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqnat_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqnat_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqnat : symmetricT nat bool eq_nat.
- #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_nat n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqnat n1 n2 H);
- napply (symmetric_eq ? (eq_nat n2 n1) false);
- napply (neq_to_neqnat n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
-
-nlemma Sn_p_n_to_S_npn : ∀n1,n2.(S n1) + n2 = S (n1 + n2).
- #n1;
- nelim n1;
- ##[ ##1: nnormalize; #n2; napply refl_eq
- ##| ##2: #n; #H; #n2; nrewrite > (H n2);
- ncases n in H:(%) ⊢ %;
- ##[ ##1: nnormalize; #H; napply refl_eq
- ##| ##2: #n3; nnormalize; #H; napply refl_eq
- ##]
- ##]
-nqed.
-
-nlemma n_p_Sn_to_S_npn : ∀n1,n2.n1 + (S n2) = S (n1 + n2).
- #n1;
- nelim n1;
- ##[ ##1: nnormalize; #n2; napply refl_eq
- ##| ##2: #n; #H; #n2;
- nrewrite > (Sn_p_n_to_S_npn n (S n2));
- nrewrite > (H n2);
- napply refl_eq
- ##]
-nqed.
-
-nlemma Opn_to_n : ∀n.O + n = n.
- #n; nnormalize; napply refl_eq.
-nqed.
-
-nlemma npO_to_n : ∀n.n + O = n.
- #n;
- nelim n;
- ##[ ##1: nnormalize; napply refl_eq
- ##| ##2: #n1; #H;
- nrewrite > (Sn_p_n_to_S_npn n1 O);
- nrewrite > H;
- napply refl_eq
- ##]
-nqed.
-
-nlemma symmetric_plusnat : symmetricT nat nat plus.
- #n1;
- nelim n1;
- ##[ ##1: #n2; nrewrite > (npO_to_n n2); nnormalize; napply refl_eq
- ##| ##2: #n2; #H; #n3;
- nrewrite > (Sn_p_n_to_S_npn n2 n3);
- nrewrite > (n_p_Sn_to_S_npn n3 n2);
- nrewrite > (H n3);
- napply refl_eq
- ##]
-nqed.
-
-nlemma nat_is_comparable : comparable.
- napply (mk_comparable nat);
- ##[ napply O
- ##| napply (λx.false)
- ##| napply eq_nat
- ##| napply eqnat_to_eq
- ##| napply eq_to_eqnat
- ##| napply neqnat_to_neq
- ##| napply neq_to_neqnat
- ##| napply decidable_nat
- ##| napply symmetric_eqnat
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr nat_is_comparable ≡ nat.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/list.ma".
-
-(* ************** *)
-(* NON-EMPTY LIST *)
-(* ************** *)
-
-(* lista non vuota *)
-ninductive ne_list (A:Type) : Type ≝
- | ne_nil: A → ne_list A
- | ne_cons: A → ne_list A → ne_list A.
-
-(* append *)
-nlet rec ne_append (A:Type) (l1,l2:ne_list A) on l1 ≝
- match l1 with
- [ ne_nil hd ⇒ ne_cons A hd l2
- | ne_cons hd tl ⇒ ne_cons A hd (ne_append A tl l2) ].
-
-notation "hvbox(hd break §§ tl)"
- right associative with precedence 46
- for @{'ne_cons $hd $tl}.
-
-(* \laquo \raquo *)
-notation "« list0 x sep ; break £ y break »"
- non associative with precedence 90
- for ${fold right @{'ne_nil $y } rec acc @{'ne_cons $x $acc}}.
-
-notation "hvbox(l1 break & l2)"
- right associative with precedence 47
- for @{'ne_append $l1 $l2 }.
-
-interpretation "ne_nil" 'ne_nil hd = (ne_nil ? hd).
-interpretation "ne_cons" 'ne_cons hd tl = (ne_cons ? hd tl).
-interpretation "ne_append" 'ne_append l1 l2 = (ne_append ? l1 l2).
-
-nlemma nelist_destruct_nil_nil : ∀T.∀x1,x2:T.ne_nil T x1 = ne_nil T x2 → x1 = x2.
- #T; #x1; #x2; #H;
- nchange with (match ne_nil T x2 with [ ne_cons _ _ ⇒ False | ne_nil a ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma nelist_destruct_cons_cons_1 : ∀T.∀x1,x2:T.∀y1,y2:ne_list T.ne_cons T x1 y1 = ne_cons T x2 y2 → x1 = x2.
- #T; #x1; #x2; #y1; #y2; #H;
- nchange with (match ne_cons T x2 y2 with [ ne_nil _ ⇒ False | ne_cons a _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma nelist_destruct_cons_cons_2 : ∀T.∀x1,x2:T.∀y1,y2:ne_list T.ne_cons T x1 y1 = ne_cons T x2 y2 → y1 = y2.
- #T; #x1; #x2; #y1; #y2; #H;
- nchange with (match ne_cons T x2 y2 with [ ne_nil _ ⇒ False | ne_cons _ b ⇒ y1 = b ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma nelist_destruct_cons_nil : ∀T.∀x1,x2:T.∀y1:ne_list T.ne_cons T x1 y1 = ne_nil T x2 → False.
- #T; #x1; #x2; #y1; #H;
- nchange with (match ne_cons T x1 y1 with [ ne_nil _ ⇒ True | ne_cons a b ⇒ False ]);
- nrewrite > H;
- nnormalize;
- napply I.
-nqed.
-
-nlemma nelist_destruct_nil_cons : ∀T.∀x1,x2:T.∀y2:ne_list T.ne_nil T x1 = ne_cons T x2 y2 → False.
- #T; #x1; #x2; #y2; #H;
- nchange with (match ne_cons T x2 y2 with [ ne_nil _ ⇒ True | ne_cons a b ⇒ False ]);
- nrewrite < H;
- nnormalize;
- napply I.
-nqed.
-
-nlemma associative_nelist : ∀T.associative (ne_list T) (ne_append T).
- #T; #x; #y; #z;
- nelim x;
- nnormalize;
- ##[ ##1: #hh; napply refl_eq
- ##| ##2: #hh; #tt; #H;
- nrewrite > H;
- napply refl_eq
- ##]
-nqed.
-
-nlemma necons_append_commute : ∀T:Type.∀l1,l2:ne_list T.∀a:T.(a §§ (l1 & l2)) = ((a §§ l1) & l2).
- #T; #l1; #l2; #a;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma append_necons_commute : ∀T:Type.∀a:T.∀l,l1:ne_list T.(l & (a §§ l1)) = (l & «£a») & l1.
- #T; #a; #l; #l1;
- nrewrite > (associative_nelist T l «£a» l1);
- nnormalize;
- napply refl_eq.
-nqed.
-
-(* listlen *)
-nlet rec len_neList (T:Type) (nl:ne_list T) on nl ≝
- match nl with [ ne_nil _ ⇒ (S O) | ne_cons _ t ⇒ S (len_neList T t) ].
-
-(* reverse *)
-nlet rec reverse_neList (T:Type) (nl:ne_list T) on nl ≝
- match nl with
- [ ne_nil h ⇒ ne_nil T h
- | ne_cons h t ⇒ (reverse_neList T t)&(ne_nil T h)
- ].
-
-(* getFirst *)
-ndefinition get_first_neList ≝
-λT:Type.λnl:ne_list T.match nl with
- [ ne_nil h ⇒ h
- | ne_cons h _ ⇒ h ].
-
-(* getLast *)
-ndefinition get_last_neList ≝
-λT:Type.λnl:ne_list T.match reverse_neList T nl with
- [ ne_nil h ⇒ h
- | ne_cons h _ ⇒ h ].
-
-(* cutFirst *)
-ndefinition cut_first_neList ≝
-λT:Type.λnl:ne_list T.match nl with
- [ ne_nil h ⇒ ne_nil T h
- | ne_cons _ t ⇒ t ].
-
-(* cutLast *)
-ndefinition cut_last_neList ≝
-λT:Type.λnl:ne_list T.match reverse_neList T nl with
- [ ne_nil h ⇒ ne_nil T h
- | ne_cons _ t ⇒ reverse_neList T t ].
-
-(* apply f *)
-nlet rec apply_f_neList (T1,T2:Type) (nl:ne_list T1) (f:T1 → T2) on nl ≝
-match nl with
- [ ne_nil h ⇒ ne_nil T2 (f h)
- | ne_cons h t ⇒ ne_cons T2 (f h) (apply_f_neList T1 T2 t f) ].
-
-(* fold right *)
-nlet rec fold_right_neList (T1,T2:Type) (f:T1 → T2 → T2) (acc:T2) (nl:ne_list T1) on nl ≝
- match nl with
- [ ne_nil h ⇒ f h acc
- | ne_cons h t ⇒ f h (fold_right_neList T1 T2 f acc t)
- ].
-
-(* double fold right *)
-nlemma fold_right_neList2_aux1 :
-∀T.∀h,h',t'.len_neList T «£h» = len_neList T (h'§§t') → False.
- #T; #h; #h'; #t';
- nnormalize;
- ncases t';
- nnormalize;
- ##[ ##1: #x; #H; ndestruct (*nelim (nat_destruct_0_S ? (nat_destruct_S_S … H))*)
- ##| ##2: #x; #l; #H; ndestruct (*nelim (nat_destruct_0_S ? (nat_destruct_S_S … H))*)
- ##]
-nqed.
-
-nlemma fold_right_neList2_aux2 :
-∀T.∀h,h',t.len_neList T (h§§t) = len_neList T «£h'» → False.
- #T; #h; #h'; #t;
- nnormalize;
- ncases t;
- nnormalize;
- ##[ ##1: #x; #H; ndestruct (*nelim (nat_destruct_S_0 ? (nat_destruct_S_S … H))*)
- ##| ##2: #x; #l; #H; ndestruct (*nelim (nat_destruct_S_0 ? (nat_destruct_S_S … H))*)
- ##]
-nqed.
-
-nlemma fold_right_neList2_aux3 :
-∀T.∀h,h',t,t'.len_neList T (h§§t) = len_neList T (h'§§t') → len_neList T t = len_neList T t'.
- #T; #h; #h'; #t; #t';
- nelim t;
- nelim t';
- ##[ ##1: nnormalize; #x; #y; #H; napply refl_eq
- ##| ##2: #a; #l'; #H; #x; #H1;
- nchange in H1:(%) with ((S (len_neList T «£x»)) = (S (len_neList T (a§§l'))));
- nrewrite > (nat_destruct_S_S … H1);
- napply refl_eq
- ##| ##3: #x; #a; #l'; #H; #H1;
- nchange in H1:(%) with ((S (len_neList T (a§§l')))= (S (len_neList T «£x»)));
- nrewrite > (nat_destruct_S_S … H1);
- napply refl_eq
- ##| ##4: #a; #l; #H; #a1; #l1; #H1; #H2;
- nchange in H2:(%) with ((S (len_neList T (a1§§l1))) = (S (len_neList T (a§§l))));
- nrewrite > (nat_destruct_S_S … H2);
- napply refl_eq
- ##]
-nqed.
-
-nlet rec fold_right_neList2 (T1,T2:Type) (f:T1 → T1 → T2 → T2) (acc:T2) (l1:ne_list T1) on l1 ≝
- match l1
- return λl1.Πl2.len_neList T1 l1 = len_neList T1 l2 → T2
- with
- [ ne_nil h ⇒ λl2.match l2 return λl2.len_neList T1 «£h» = len_neList T1 l2 → T2 with
- [ ne_nil h' ⇒ λp:len_neList T1 «£h» = len_neList T1 «£h'».
- f h h' acc
- | ne_cons h' t' ⇒ λp:len_neList T1 «£h» = len_neList T1 (h'§§t').
- False_rect_Type0 ? (fold_right_neList2_aux1 T1 h h' t' p)
- ]
- | ne_cons h t ⇒ λl2.match l2 return λl2.len_neList T1 (h§§t) = len_neList T1 l2 → T2 with
- [ ne_nil h' ⇒ λp:len_neList T1 (h§§t) = len_neList T1 «£h'».
- False_rect_Type0 ? (fold_right_neList2_aux2 T1 h h' t p)
- | ne_cons h' t' ⇒ λp:len_neList T1 (h§§t) = len_neList T1 (h'§§t').
- f h h' (fold_right_neList2 T1 T2 f acc t t' (fold_right_neList2_aux3 T1 h h' t t' p))
- ]
- ].
-
-nlet rec bfold_right_neList2 (T1:Type) (f:T1 → T1 → bool) (l1,l2:ne_list T1) on l1 ≝
- match l1 with
- [ ne_nil h ⇒ match l2 with
- [ ne_nil h' ⇒ f h h' | ne_cons h' t' ⇒ false ]
- | ne_cons h t ⇒ match l2 with
- [ ne_nil h' ⇒ false | ne_cons h' t' ⇒ (f h h') ⊗ (bfold_right_neList2 T1 f t t')
- ]
- ].
-
-(* nth elem *)
-nlet rec nth_neList (T:Type) (nl:ne_list T) (n:nat) on nl ≝
- match nl with
- [ ne_nil h ⇒ match n with
- [ O ⇒ Some ? h | S _ ⇒ None ? ]
- | ne_cons h t ⇒ match n with
- [ O ⇒ Some ? h | S n' ⇒ nth_neList T t n' ]
- ].
-
-(* abs elem *)
-ndefinition abs_neList_aux1 : ∀T:Type.∀h:T.∀n.((len_neList T («£h»)) > (S n)) = true → False.
- #T; #h; #n; nnormalize; #H; ndestruct (*napply (bool_destruct … H)*). nqed.
-
-ndefinition abs_neList_aux2 : ∀T:Type.∀h:T.∀t:ne_list T.∀n.((len_neList T (h§§t)) > (S n) = true) → ((len_neList T t) > n) = true.
- #T; #h; #t; #n; nnormalize; #H; napply H. nqed.
-
-nlet rec abs_neList (T:Type) (l:ne_list T) on l ≝
- match l
- return λl.Πn.(((len_neList T l) > n) = true) → T
- with
- [ ne_nil h ⇒ λn.
- match n
- return λn.(((len_neList T (ne_nil T h)) > n) = true) → T
- with
- [ O ⇒ λp:(((len_neList T (ne_nil T h)) > O) = true).h
- | S n' ⇒ λp:(((len_neList T (ne_nil T h)) > (S n')) = true).
- False_rect_Type0 ? (abs_neList_aux1 T h n' p)
- ]
- | ne_cons h t ⇒ λn.
- match n with
- [ O ⇒ λp:(((len_neList T (ne_cons T h t)) > O) = true).h
- | S n' ⇒ λp:(((len_neList T (ne_cons T h t)) > (S n')) = true).
- abs_neList T t n' (abs_neList_aux2 T h t n' p)
- ]
- ].
-
-(* esempio: abs_neList ? « 1; 2; 3 £ 4 » 0 (refl_eq …) = 1. *)
-
-(* conversione *)
-nlet rec neList_to_list (T:Type) (nl:ne_list T) on nl : list T ≝
- match nl with [ ne_nil h ⇒ [h] | ne_cons h t ⇒ [h]@(neList_to_list T t) ].
-
-nlemma symmetric_lennelist : ∀T.∀l1,l2:ne_list T.len_neList T l1 = len_neList T l2 → len_neList T l2 = len_neList T l1.
- #T; #l1;
- nelim l1;
- ##[ ##1: #h; #l2; ncases l2; nnormalize;
- ##[ ##1: #H; #H1; napply refl_eq
- ##| ##2: #h; #t; #H; nrewrite > H; napply refl_eq
- ##]
- ##| ##2: #h; #l2; ncases l2; nnormalize;
- ##[ ##1: #h1; #H; #l; #H1; nrewrite < H1; napply refl_eq
- ##| ##2: #h; #l; #H; #l3; #H1; nrewrite < H1; napply refl_eq
- ##]
- ##]
-nqed.
-
-nlemma symmetric_foldrightnelist2_aux :
-∀T1,T2:Type.∀f:T1 → T1 → T2 → T2.
- (∀x,y,z.f x y z = f y x z) →
- (∀acc:T2.∀l1,l2:ne_list T1.
- ∀H1:len_neList T1 l1 = len_neList T1 l2.∀H2:len_neList T1 l2 = len_neList T1 l1.
- fold_right_neList2 T1 T2 f acc l1 l2 H1 = fold_right_neList2 T1 T2 f acc l2 l1 H2).
- #T1; #T2; #f; #H; #acc; #l1;
- nelim l1;
- ##[ ##1: #h; #l2; ncases l2;
- ##[ ##1: #h1; nnormalize; #H1; #H2; nrewrite > (H h h1 acc); napply refl_eq
- ##| ##2: #h1; #l; ncases l;
- ##[ ##1: #h3; #H1; #H2;
- nchange in H1:(%) with ((S O) = (S (S O)));
- (* !!! ndestruct: si inceppa su un'ipotesi che non e' H1 *)
- nelim (nat_destruct_0_S ? (nat_destruct_S_S … H1))
- ##| ##2: #h3; #l3; #H1; #H2;
- nchange in H1:(%) with ((S O) = (S (S (len_neList ? l3))));
- (* !!! ndestruct: si inceppa su un'ipotesi che non e' H1 *)
- nelim (nat_destruct_0_S ? (nat_destruct_S_S … H1))
- ##]
- ##]
- ##| ##2: #h3; #l3; #H1; #l2; ncases l2;
- ##[ ##1: #h4; ncases l3;
- ##[ ##1: #h5; #H2; #H3;
- nchange in H2:(%) with ((S (S O)) = (S O));
- (* !!! ndestruct: si inceppa su un'ipotesi che non e' H1 *)
- nelim (nat_destruct_S_0 ? (nat_destruct_S_S … H2))
- ##| ##2: #h5; #l5; #H2; #H3;
- nchange in H2:(%) with ((S (S (len_neList ? l5))) = (S O));
- (* !!! ndestruct: si inceppa su un'ipotesi che non e' H1 *)
- nelim (nat_destruct_S_0 ? (nat_destruct_S_S … H2))
- ##]
- ##| ##2: #h4; #l4; #H2; #H3;
- nchange in H2:(%) with ((S (len_neList ? l3)) = (S (len_neList ? l4)));
- nchange in H3:(%) with ((S (len_neList ? l4)) = (S (len_neList ? l3)));
- nchange with ((f h3 h4 (fold_right_neList2 T1 T2 f acc l3 l4 (fold_right_neList2_aux3 T1 h3 h4 l3 l4 ?))) =
- (f h4 h3 (fold_right_neList2 T1 T2 f acc l4 l3 (fold_right_neList2_aux3 T1 h4 h3 l4 l3 ?))));
- nrewrite < (H1 l4 (fold_right_neList2_aux3 T1 h3 h4 l3 l4 H2) (fold_right_neList2_aux3 T1 h4 h3 l4 l3 H3));
- nrewrite > (H h3 h4 (fold_right_neList2 T1 T2 f acc l3 l4 ?));
- napply refl_eq
- ##]
- ##]
-nqed.
-
-nlemma symmetric_foldrightnelist2 :
-∀T1,T2:Type.∀f:T1 → T1 → T2 → T2.
- (∀x,y,z.f x y z = f y x z) →
- (∀acc:T2.∀l1,l2:ne_list T1.∀H:len_neList T1 l1 = len_neList T1 l2.
- fold_right_neList2 T1 T2 f acc l1 l2 H = fold_right_neList2 T1 T2 f acc l2 l1 (symmetric_lennelist T1 l1 l2 H)).
- #T1; #T2; #f; #H; #acc; #l1; #l2; #H1;
- nrewrite > (symmetric_foldrightnelist2_aux T1 T2 f H acc l1 l2 H1 (symmetric_lennelist T1 l1 l2 H1));
- napply refl_eq.
-nqed.
-
-nlemma symmetric_bfoldrightnelist2 :
-∀T1:Type.∀f:T1 → T1 → bool.
- (∀x,y.f x y = f y x) →
- (∀l1,l2:ne_list T1.
- bfold_right_neList2 T1 f l1 l2 = bfold_right_neList2 T1 f l2 l1).
- #T; #f; #H; #l1;
- nelim l1;
- ##[ ##1: #hh1; #l2; ncases l2;
- ##[ ##1: #hh2; nnormalize; nrewrite > (H hh1 hh2); napply refl_eq
- ##| ##2: #hh2; #ll2; nnormalize; napply refl_eq
- ##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: #hh2; nnormalize; napply refl_eq
- ##| ##2: #hh2; #ll2; nnormalize;
- nrewrite > (H1 ll2);
- nrewrite > (H hh1 hh2);
- napply refl_eq
- ##]
- ##]
-nqed.
-
-nlemma bfoldrightnelist2_to_eq :
-∀T1:Type.∀f:T1 → T1 → bool.
- (∀x,y.(f x y = true → x = y)) →
- (∀l1,l2:ne_list T1.
- (bfold_right_neList2 T1 f l1 l2 = true → l1 = l2)).
- #T; #f; #H; #l1;
- nelim l1;
- ##[ ##1: #hh1; #l2; ncases l2;
- ##[ ##1: #hh2; #H1; nnormalize in H1:(%); nrewrite > (H hh1 hh2 H1); napply refl_eq
- ##| ##2: #hh2; #ll2; nnormalize; #H1; ndestruct (*napply (bool_destruct … H1)*)
- ##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: #hh2; nnormalize; #H2; ndestruct (*napply (bool_destruct … H2)*)
- ##| ##2: #hh2; #ll2; #H2;
- nchange in H2:(%) with (((f hh1 hh2)⊗(bfold_right_neList2 T f ll1 ll2)) = true);
- nrewrite > (H hh1 hh2 (andb_true_true_l … H2));
- nrewrite > (H1 ll2 (andb_true_true_r … H2));
- napply refl_eq
- ##]
- ##]
-nqed.
-
-nlemma eq_to_bfoldrightnelist2 :
-∀T1:Type.∀f:T1 → T1 → bool.
- (∀x,y.(x = y → f x y = true)) →
- (∀l1,l2:ne_list T1.
- (l1 = l2 → bfold_right_neList2 T1 f l1 l2 = true)).
- #T; #f; #H; #l1;
- nelim l1;
- ##[ ##1: #hh1; #l2; ncases l2;
- ##[ ##1: #hh2; #H1; nnormalize;
- nrewrite > (H hh1 hh2 (nelist_destruct_nil_nil … H1));
- napply refl_eq
- ##| ##2: #hh2; #ll2; #H1;
- (* !!! ndestruct: assert false *)
- nelim (nelist_destruct_nil_cons ???? H1)
- ##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: #hh2; #H2;
- (* !!! ndestruct: assert false *)
- nelim (nelist_destruct_cons_nil ???? H2)
- ##| ##2: #hh2; #ll2; #H2; nnormalize;
- nrewrite > (nelist_destruct_cons_cons_1 … H2);
- nrewrite > (H hh2 hh2 (refl_eq …));
- nnormalize;
- nrewrite > (H1 ll2 (nelist_destruct_cons_cons_2 … H2));
- napply refl_eq
- ##]
- ##]
-nqed.
-
-nlemma bfoldrightnelist2_to_lennelist :
-∀T.∀f:T → T → bool.
- (∀l1,l2:ne_list T.bfold_right_neList2 T f l1 l2 = true → len_neList T l1 = len_neList T l2).
- #T; #f; #l1;
- nelim l1;
- ##[ ##1: #hh1; #l2; ncases l2;
- ##[ ##1: nnormalize; #hh2; #H; napply refl_eq
- ##| ##2: nnormalize; #hh2; #tt2; #H; ndestruct (*napply (bool_destruct … H)*)
- ##]
- ##| ##2: #hh1; #tt1; #H; #l2; ncases l2;
- ##[ ##1: nnormalize; #hh2; #H1; ndestruct (*napply (bool_destruct … H1)*)
- ##| ##2: #hh2; #tt2; #H1; nnormalize;
- nrewrite > (H tt2 ?);
- ##[ ##1: napply refl_eq
- ##| ##2: nchange in H1:(%) with ((? ⊗ (bfold_right_neList2 T f tt1 tt2)) = true);
- napply (andb_true_true_r … H1)
- ##]
- ##]
- ##]
-nqed.
-
-nlemma decidable_nelist :
-∀T.(∀x,y:T.decidable (x = y)) →
- (∀x,y:ne_list T.decidable (x = y)).
- #T; #H; #x; nelim x;
- ##[ ##1: #hh1; #y; ncases y;
- ##[ ##1: #hh2; nnormalize; napply (or2_elim (hh1 = hh2) (hh1 ≠ hh2) ? (H hh1 hh2));
- ##[ ##1: #H1; nrewrite > H1; napply (or2_intro1 (? = ?) (? ≠ ?) (refl_eq …))
- ##| ##2: #H1; napply (or2_intro2 (? = ?) (? ≠ ?) ?); nnormalize;
- #H2; napply (H1 (nelist_destruct_nil_nil T … H2))
- ##]
- ##| ##2: #hh2; #tt2; nnormalize; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H1;
- (* !!! ndestruct: assert false *)
- napply (nelist_destruct_nil_cons T … H1)
- ##]
- ##| ##2: #hh1; #tt1; #H1; #y; ncases y;
- ##[ ##1: #hh1; nnormalize; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H2;
- (* !!! ndestruct: assert false *)
- napply (nelist_destruct_cons_nil T … H2)
- ##| ##2: #hh2; #tt2; nnormalize; napply (or2_elim (hh1 = hh2) (hh1 ≠ hh2) ? (H …));
- ##[ ##2: #H2; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H3; napply (H2 (nelist_destruct_cons_cons_1 T … H3))
- ##| ##1: #H2; napply (or2_elim (tt1 = tt2) (tt1 ≠ tt2) ? (H1 tt2));
- ##[ ##2: #H3; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H4; napply (H3 (nelist_destruct_cons_cons_2 T … H4))
- ##| ##1: #H3; napply (or2_intro1 (? = ?) (? ≠ ?) ?);
- nrewrite > H2; nrewrite > H3; napply refl_eq
- ##]
- ##]
- ##]
- ##]
-nqed.
-
-nlemma nbfoldrightnelist2_to_neq :
-∀T1:Type.∀f:T1 → T1 → bool.
- (∀x,y.(f x y = false → x ≠ y)) →
- (∀l1,l2:ne_list T1.
- (bfold_right_neList2 T1 f l1 l2 = false → l1 ≠ l2)).
- #T; #f; #H; #l1;
- nelim l1;
- ##[ ##1: #hh1; #l2; ncases l2;
- ##[ ##1: #hh2; nnormalize; #H1; #H2; napply (H hh1 hh2 H1 (nelist_destruct_nil_nil T … H2))
- ##| ##2: #hh2; #ll2; #H1; nnormalize; #H2;
- (* !!! ndestruct: assert false *)
- napply (nelist_destruct_nil_cons T … H2)
- ##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: #hh2; #H2; nnormalize; #H3;
- (* !!! ndestruct: assert false *)
- napply (nelist_destruct_cons_nil T … H3)
- ##| ##2: #hh2; #ll2; #H2; nnormalize; #H3;
- nchange in H2:(%) with (((f hh1 hh2)⊗(bfold_right_neList2 T f ll1 ll2)) = false);
- napply (H1 ll2 ? (nelist_destruct_cons_cons_2 T … H3));
- napply (or2_elim ??? (andb_false2 … H2) );
- ##[ ##1: #H4; napply (absurd (hh1 = hh2) …);
- ##[ ##1: nrewrite > (nelist_destruct_cons_cons_1 T … H3); napply refl_eq
- ##| ##2: napply (H … H4)
- ##]
- ##| ##2: #H4; napply H4
- ##]
- ##]
- ##]
-nqed.
-
-nlemma nelist_destruct :
-∀T.(∀x,y:T.decidable (x = y)) →
- (∀h1,h2:T.∀l1,l2:ne_list T.
- (h1§§l1) ≠ (h2§§l2) → h1 ≠ h2 ∨ l1 ≠ l2).
- #T; #H; #h1; #h2; #l1; nelim l1;
- ##[ ##1: #hh1; #l2; ncases l2;
- ##[ ##1: #hh2; #H1; napply (or2_elim (h1 = h2) (h1 ≠ h2) ? (H …) …);
- ##[ ##2: #H2; napply (or2_intro1 (h1 ≠ h2) («£hh1» ≠ «£hh2») H2)
- ##| ##1: #H2; nrewrite > H2 in H1:(%); #H1;
- napply (or2_elim (hh1 = hh2) (hh1 ≠ hh2) ? (H …) …);
- ##[ ##2: #H3; napply (or2_intro2 (h2 ≠ h2) («£hh1» ≠ «£hh2») ?);
- nnormalize; #H4; napply (H3 (nelist_destruct_nil_nil T … H4))
- ##| ##1: #H3; nrewrite > H3 in H1:(%); #H1; nelim (H1 (refl_eq …))
- ##]
- ##]
- ##| ##2: #hh2; #ll2; #H1; napply (or2_intro2 (h1 ≠ h2) («£hh1» ≠ (hh2§§ll2)) …);
- nnormalize; #H2;
- (* !!! ndestruct: assert false *)
- napply (nelist_destruct_nil_cons T … H2)
- ##]
- ##| ##2: #hh1; #ll1; #H1; #l2; ncases l2;
- ##[ ##1: #hh2; #H2; napply (or2_intro2 (h1 ≠ h2) ((hh1§§ll1) ≠ «£hh2») …);
- nnormalize; #H3;
- (* !!! ndestruct: assert false *)
- napply (nelist_destruct_cons_nil T … H3)
- ##| ##2: #hh2; #ll2; #H2;
- napply (or2_elim (h1 = h2) (h1 ≠ h2) ? (H h1 h2) …);
- ##[ ##2: #H3; napply (or2_intro1 (h1 ≠ h2) ((hh1§§ll1) ≠ (hh2§§ll2)) H3)
- ##| ##1: #H3; napply (or2_intro2 (h1 ≠ h2) ((hh1§§ll1) ≠ (hh2§§ll2) …));
- nrewrite > H3 in H2:(%); #H2;
- nnormalize; #H4; nrewrite > (nelist_destruct_cons_cons_1 T … H4) in H2:(%); #H2;
- nrewrite > (nelist_destruct_cons_cons_2 T … H4) in H2:(%); #H2;
- napply (H2 (refl_eq …))
- ##]
- ##]
- ##]
-nqed.
-
-nlemma neq_to_nbfoldrightnelist2 :
-∀T:Type.∀f:T → T → bool.
- (∀x,y:T.decidable (x = y)) →
- (∀x,y.(x ≠ y → f x y = false)) →
- (∀l1,l2:ne_list T.
- (l1 ≠ l2 → bfold_right_neList2 T f l1 l2 = false)).
- #T; #f; #H; #H1; #l1;
- nelim l1;
- ##[ ##1: #hh1; #l2; ncases l2;
- ##[ ##1: #hh2; nnormalize; #H2; napply (H1 hh1 hh2 ?);
- nnormalize; #H3; nrewrite > H3 in H2:(%); #H2; napply (H2 (refl_eq …))
- ##| ##2: #hh2; #ll2; nnormalize; #H2; napply refl_eq
- ##]
- ##| ##2: #hh1; #ll1; #H2; #l2; ncases l2;
- ##[ ##1: #hh2; nnormalize; #H3; napply refl_eq
- ##| ##2: #hh2; #ll2; #H3;
- nchange with (((f hh1 hh2)⊗(bfold_right_neList2 T f ll1 ll2)) = false);
- napply (or2_elim (hh1 ≠ hh2) (ll1 ≠ ll2) ? (nelist_destruct T H … H3) …);
- ##[ ##1: #H4; nrewrite > (H1 hh1 hh2 H4); nnormalize; napply refl_eq
- ##| ##2: #H4; nrewrite > (H2 ll2 H4);
- nrewrite > (symmetric_andbool (f hh1 hh2) false);
- nnormalize; napply refl_eq
- ##]
- ##]
- ##]
-nqed.
-
-nlemma nelist_is_comparable : comparable → comparable.
- #T; napply (mk_comparable (ne_list T));
- ##[ napply (ne_nil ? (zeroc T))
- ##| napply (λx.false)
- ##| napply (bfold_right_neList2 T (eqc T))
- ##| napply (bfoldrightnelist2_to_eq … (eqc T));
- napply (eqc_to_eq T)
- ##| napply (eq_to_bfoldrightnelist2 … (eqc T));
- napply (eq_to_eqc T)
- ##| napply (nbfoldrightnelist2_to_neq … (eqc T));
- napply (neqc_to_neq T)
- ##| napply (neq_to_nbfoldrightnelist2 … (eqc T));
- ##[ napply (decidable_c T)
- ##| napply (neq_to_neqc T)
- ##]
- ##| napply decidable_nelist;
- napply (decidable_c T)
- ##| napply symmetric_bfoldrightnelist2;
- napply (symmetric_eqc T)
- ##]
-nqed.
-
-unification hint 0 ≔ S: comparable;
- T ≟ (carr S),
- X ≟ (nelist_is_comparable S)
- (*********************************************) ⊢
- carr X ≡ ne_list T.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/comp.ma".
-include "common/option_base.ma".
-include "num/bool_lemmas.ma".
-
-(* ****** *)
-(* OPTION *)
-(* ****** *)
-
-nlemma option_destruct_some_some : ∀T.∀x1,x2:T.Some T x1 = Some T x2 → x1 = x2.
- #T; #x1; #x2; #H;
- nchange with (match Some T x2 with [ None ⇒ False | Some a ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma option_destruct_some_none : ∀T.∀x:T.Some T x = None T → False.
- #T; #x; #H;
- nchange with (match Some T x with [ None ⇒ True | Some a ⇒ False ]);
- nrewrite > H;
- nnormalize;
- napply I.
-nqed.
-
-nlemma option_destruct_none_some : ∀T.∀x:T.None T = Some T x → False.
- #T; #x; #H;
- nchange with (match Some T x with [ None ⇒ True | Some a ⇒ False ]);
- nrewrite < H;
- nnormalize;
- napply I.
-nqed.
-
-nlemma symmetric_eqoption :
-∀T:Type.∀f:T → T → bool.
- (symmetricT T bool f) →
- (∀op1,op2:option T.
- (eq_option T f op1 op2 = eq_option T f op2 op1)).
- #T; #f; #H;
- #op1; #op2; nelim op1; nelim op2;
- nnormalize;
- ##[ ##1: napply refl_eq
- ##| ##2,3: #H; napply refl_eq
- ##| ##4: #a; #a0;
- nrewrite > (H a0 a);
- napply refl_eq
- ##]
-nqed.
-
-nlemma eq_to_eqoption :
-∀T.∀f:T → T → bool.
- (∀x1,x2:T.x1 = x2 → f x1 x2 = true) →
- (∀op1,op2:option T.
- (op1 = op2 → eq_option T f op1 op2 = true)).
- #T; #f; #H;
- #op1; #op2; nelim op1; nelim op2;
- nnormalize;
- ##[ ##1: #H1; napply refl_eq
- ##| ##2: #a; #H1;
- (* !!! ndestruct: assert false *)
- nelim (option_destruct_none_some ?? H1)
- ##| ##3: #a; #H1;
- (* !!! ndestruct: assert false *)
- nelim (option_destruct_some_none ?? H1)
- ##| ##4: #a; #a0; #H1;
- nrewrite > (H … (option_destruct_some_some … H1));
- napply refl_eq
- ##]
-nqed.
-
-nlemma eqoption_to_eq :
-∀T.∀f:T → T → bool.
- (∀x1,x2:T.f x1 x2 = true → x1 = x2) →
- (∀op1,op2:option T.
- (eq_option T f op1 op2 = true → op1 = op2)).
- #T; #f; #H;
- #op1; #op2; nelim op1; nelim op2;
- nnormalize;
- ##[ ##1: #H1; napply refl_eq
- ##| ##2,3: #a; #H1; ndestruct (*napply (bool_destruct … H1)*)
- ##| ##4: #a; #a0; #H1;
- nrewrite > (H … H1);
- napply refl_eq
- ##]
-nqed.
-
-nlemma decidable_option :
-∀T.(Πx,y:T.decidable (x = y)) →
- (∀x,y:option T.decidable (x = y)).
- #T; #H; #x; nelim x;
- ##[ ##1: #y; ncases y;
- ##[ ##1: nnormalize; napply (or2_intro1 (? = ?) (? ≠ ?) (refl_eq …))
- ##| ##2: #yy; nnormalize; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H1;
- (* !!! ndestruct: assert false *)
- napply (option_destruct_none_some T … H1)
- ##]
- ##| ##2: #xx; #y; ncases y;
- ##[ ##1: nnormalize; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H2;
- (* !!! ndestruct: assert false *)
- napply (option_destruct_some_none T … H2)
- ##| ##2: #yy; nnormalize; napply (or2_elim (xx = yy) (xx ≠ yy) ? (H …));
- ##[ ##2: #H1; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H2;
- napply (H1 (option_destruct_some_some T … H2))
- ##| ##1: #H1; napply (or2_intro1 (? = ?) (? ≠ ?) ?);
- nrewrite > H1; napply refl_eq
- ##]
- ##]
- ##]
-nqed.
-
-nlemma neq_to_neqoption :
-∀T.∀f:T → T → bool.
- (∀x1,x2:T.x1 ≠ x2 → f x1 x2 = false) →
- (∀op1,op2:option T.
- (op1 ≠ op2 → eq_option T f op1 op2 = false)).
- #T; #f; #H; #op1; nelim op1;
- ##[ ##1: #op2; ncases op2;
- ##[ ##1: nnormalize; #H1; nelim (H1 (refl_eq …))
- ##| ##2: #yy; nnormalize; #H1; napply refl_eq
- ##]
- ##| ##2: #xx; #op2; ncases op2;
- ##[ ##1: nnormalize; #H1; napply refl_eq
- ##| ##2: #yy; nnormalize; #H1; napply (H xx yy …);
- nnormalize; #H2; nrewrite > H2 in H1:(%); #H1;
- napply (H1 (refl_eq …))
- ##]
- ##]
-nqed.
-
-nlemma neqoption_to_neq :
-∀T.∀f:T → T → bool.
- (∀x1,x2:T.f x1 x2 = false → x1 ≠ x2) →
- (∀op1,op2:option T.
- (eq_option T f op1 op2 = false → op1 ≠ op2)).
- #T; #f; #H; #op1; nelim op1;
- ##[ ##1: #op2; ncases op2;
- ##[ ##1: nnormalize; #H1;
- ndestruct (*napply (bool_destruct … H1)*)
- ##| ##2: #yy; nnormalize; #H1; #H2;
- (* !!! ndestruct: assert false *)
- napply (option_destruct_none_some T … H2)
- ##]
- ##| ##2: #xx; #op2; ncases op2;
- ##[ ##1: nnormalize; #H1; #H2;
- (* !!! ndestruct: assert false *)
- napply (option_destruct_some_none T … H2)
- ##| ##2: #yy; nnormalize; #H1; #H2; napply (H xx yy H1 ?);
- napply (option_destruct_some_some T … H2)
- ##]
- ##]
-nqed.
-
-nlemma option_is_comparable :
- comparable → comparable.
- #T; napply (mk_comparable (option T));
- ##[ napply (None ?)
- ##| napply (λx.false)
- ##| napply (eq_option … (eqc T))
- ##| napply (eqoption_to_eq … (eqc T));
- napply (eqc_to_eq T)
- ##| napply (eq_to_eqoption … (eqc T));
- napply (eq_to_eqc T)
- ##| napply (neqoption_to_neq … (eqc T));
- napply (neqc_to_neq T)
- ##| napply (neq_to_neqoption … (eqc T));
- napply (neq_to_neqc T)
- ##| napply decidable_option;
- napply (decidable_c T)
- ##| napply symmetric_eqoption;
- napply (symmetric_eqc T)
- ##]
-nqed.
-
-unification hint 0 ≔ S: comparable;
- T ≟ (carr S),
- X ≟ (option_is_comparable S)
- (*********************************************) ⊢
- carr X ≡ option T.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/bool.ma".
-
-(* ****** *)
-(* OPTION *)
-(* ****** *)
-
-ninductive option (A:Type) : Type ≝
- None : option A
-| Some : A → option A.
-
-ndefinition eq_option ≝
-λT.λf:T → T → bool.λop1,op2:option T.
- match op1 with
- [ None ⇒ match op2 with [ None ⇒ true | Some _ ⇒ false ]
- | Some x1 ⇒ match op2 with [ None ⇒ false | Some x2 ⇒ f x1 x2 ]
- ].
-
-(* option map = match ... with [ None ⇒ None ? | Some .. ⇒ .. ] *)
-ndefinition opt_map ≝
-λT1,T2:Type.λt:option T1.λf:T1 → option T2.
- match t with [ None ⇒ None ? | Some x ⇒ (f x) ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/comp.ma".
-include "common/prod_base.ma".
-include "num/bool_lemmas.ma".
-
-(* ********* *)
-(* TUPLE x 2 *)
-(* ********* *)
-
-nlemma pair_destruct_1 :
-∀T1,T2.∀x1,x2:T1.∀y1,y2:T2.
- pair T1 T2 x1 y1 = pair T1 T2 x2 y2 → x1 = x2.
- #T1; #T2; #x1; #x2; #y1; #y2; #H;
- nchange with (match pair T1 T2 x2 y2 with [ pair a _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma pair_destruct_2 :
-∀T1,T2.∀x1,x2:T1.∀y1,y2:T2.
- pair T1 T2 x1 y1 = pair T1 T2 x2 y2 → y1 = y2.
- #T1; #T2; #x1; #x2; #y1; #y2; #H;
- nchange with (match pair T1 T2 x2 y2 with [ pair _ b ⇒ y1 = b ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_eqpair :
-∀T1,T2:Type.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.
- (symmetricT T1 bool f1) →
- (symmetricT T2 bool f2) →
- (∀p1,p2:ProdT T1 T2.
- (eq_pair T1 T2 f1 f2 p1 p2 = eq_pair T1 T2 f1 f2 p2 p1)).
- #T1; #T2; #f1; #f2; #H; #H1;
- #p1; nelim p1; #x1; #y1;
- #p2; nelim p2; #x2; #y2;
- nnormalize;
- nrewrite > (H x1 x2);
- ncases (f1 x2 x1);
- nnormalize;
- ##[ ##1: nrewrite > (H1 y1 y2); napply refl_eq
- ##| ##2: napply refl_eq
- ##]
-nqed.
-
-nlemma eq_to_eqpair :
-∀T1,T2.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.
- (∀x,y:T1.x = y → f1 x y = true) →
- (∀x,y:T2.x = y → f2 x y = true) →
- (∀p1,p2:ProdT T1 T2.
- (p1 = p2 → eq_pair T1 T2 f1 f2 p1 p2 = true)).
- #T1; #T2; #f1; #f2; #H1; #H2;
- #p1; nelim p1; #x1; #y1;
- #p2; nelim p2; #x2; #y2; #H;
- nnormalize;
- nrewrite > (H1 … (pair_destruct_1 … H));
- nnormalize;
- nrewrite > (H2 … (pair_destruct_2 … H));
- napply refl_eq.
-nqed.
-
-nlemma eqpair_to_eq :
-∀T1,T2.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.
- (∀x,y:T1.f1 x y = true → x = y) →
- (∀x,y:T2.f2 x y = true → x = y) →
- (∀p1,p2:ProdT T1 T2.
- (eq_pair T1 T2 f1 f2 p1 p2 = true → p1 = p2)).
- #T1; #T2; #f1; #f2; #H1; #H2;
- #p1; nelim p1; #x1; #y1;
- #p2; nelim p2; #x2; #y2; #H;
- nnormalize in H:(%);
- nletin K ≝ (H1 x1 x2);
- ncases (f1 x1 x2) in H:(%) K:(%);
- nnormalize;
- #H3;
- ##[ ##2: ndestruct (*napply (bool_destruct … H3)*) ##]
- #H4;
- nrewrite > (H4 (refl_eq …));
- nrewrite > (H2 y1 y2 H3);
- napply refl_eq.
-nqed.
-
-nlemma decidable_pair :
-∀T1,T2.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:ProdT T1 T2.decidable (x = y)).
- #T1; #T2; #H; #H1;
- #x; nelim x; #xx1; #xx2;
- #y; nelim y; #yy1; #yy2;
- nnormalize;
- napply (or2_elim (xx1 = yy1) (xx1 ≠ yy1) ? (H xx1 yy1) ?);
- ##[ ##2: #H2; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H3; napply (H2 (pair_destruct_1 T1 T2 … H3))
- ##| ##1: #H2; napply (or2_elim (xx2 = yy2) (xx2 ≠ yy2) ? (H1 xx2 yy2) ?);
- ##[ ##2: #H3; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H4; napply (H3 (pair_destruct_2 T1 T2 … H4))
- ##| ##1: #H3; napply (or2_intro1 (? = ?) (? ≠ ?) ?);
- nrewrite > H2; nrewrite > H3; napply refl_eq
- ##]
- ##]
-nqed.
-
-nlemma neqpair_to_neq :
-∀T1,T2.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.
- (∀x,y:T1.f1 x y = false → x ≠ y) →
- (∀x,y:T2.f2 x y = false → x ≠ y) →
- (∀p1,p2:ProdT T1 T2.
- (eq_pair T1 T2 f1 f2 p1 p2 = false → p1 ≠ p2)).
- #T1; #T2; #f1; #f2; #H1; #H2;
- #p1; nelim p1; #x1; #y1;
- #p2; nelim p2; #x2; #y2;
- nchange with ((((f1 x1 x2) ⊗ (f2 y1 y2)) = false) → ?); #H;
- nnormalize; #H3;
- napply (or2_elim ((f1 x1 x2) = false) ((f2 y1 y2) = false) ? (andb_false2 … H) ?);
- ##[ ##1: #H4; napply (H1 x1 x2 H4); napply (pair_destruct_1 T1 T2 … H3)
- ##| ##2: #H4; napply (H2 y1 y2 H4); napply (pair_destruct_2 T1 T2 … H3)
- ##]
-nqed.
-
-nlemma pair_destruct :
-∀T1,T2.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x1,x2:T1.∀y1,y2:T2.
- (pair T1 T2 x1 y1) ≠ (pair T1 T2 x2 y2) → x1 ≠ x2 ∨ y1 ≠ y2).
- #T1; #T2; #H1; #H2; #x1; #x2; #y1; #y2;
- nnormalize; #H;
- napply (or2_elim (x1 = x2) (x1 ≠ x2) ? (H1 x1 x2) ?);
- ##[ ##2: #H3; napply (or2_intro1 … H3)
- ##| ##1: #H3; napply (or2_elim (y1 = y2) (y1 ≠ y2) ? (H2 y1 y2) ?);
- ##[ ##2: #H4; napply (or2_intro2 … H4)
- ##| ##1: #H4; nrewrite > H3 in H:(%);
- nrewrite > H4; #H; nelim (H (refl_eq …))
- ##]
- ##]
-nqed.
-
-nlemma neq_to_neqpair :
-∀T1,T2.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:T1.x ≠ y → f1 x y = false) →
- (∀x,y:T2.x ≠ y → f2 x y = false) →
- (∀p1,p2:ProdT T1 T2.
- (p1 ≠ p2 → eq_pair T1 T2 f1 f2 p1 p2 = false)).
- #T1; #T2; #f1; #f2; #H1; #H2; #H3; #H4;
- #p1; nelim p1; #x1; #y1;
- #p2; nelim p2; #x2; #y2; #H;
- nchange with (((f1 x1 x2) ⊗ (f2 y1 y2)) = false);
- napply (or2_elim (x1 ≠ x2) (y1 ≠ y2) ? (pair_destruct T1 T2 H1 H2 … H) ?);
- ##[ ##2: #H5; nrewrite > (H4 … H5); nrewrite > (andb_false2_2 (f1 x1 x2)); napply refl_eq
- ##| ##1: #H5; nrewrite > (H3 … H5); nnormalize; napply refl_eq
- ##]
-nqed.
-
-nlemma pair_is_comparable :
- comparable → comparable → comparable.
- #T1; #T2; napply (mk_comparable (ProdT T1 T2));
- ##[ napply (pair … (zeroc T1) (zeroc T2))
- ##| napply (λP.(forallc T1)
- (λe1.(forallc T2)
- (λe2.P (pair … e1 e2))))
- ##| napply (eq_pair … (eqc T1) (eqc T2))
- ##| napply (eqpair_to_eq … (eqc T1) (eqc T2));
- ##[ napply (eqc_to_eq T1)
- ##| napply (eqc_to_eq T2)
- ##]
- ##| napply (eq_to_eqpair … (eqc T1) (eqc T2));
- ##[ napply (eq_to_eqc T1)
- ##| napply (eq_to_eqc T2)
- ##]
- ##| napply (neqpair_to_neq … (eqc T1) (eqc T2));
- ##[ napply (neqc_to_neq T1)
- ##| napply (neqc_to_neq T2)
- ##]
- ##| napply (neq_to_neqpair … (eqc T1) (eqc T2));
- ##[ napply (decidable_c T1)
- ##| napply (decidable_c T2)
- ##| napply (neq_to_neqc T1)
- ##| napply (neq_to_neqc T2)
- ##]
- ##| napply decidable_pair;
- ##[ napply (decidable_c T1)
- ##| napply (decidable_c T2)
- ##]
- ##| napply symmetric_eqpair;
- ##[ napply (symmetric_eqc T1)
- ##| napply (symmetric_eqc T2)
- ##]
- ##]
-nqed.
-
-unification hint 0 ≔ S1: comparable, S2: comparable;
- T1 ≟ (carr S1), T2 ≟ (carr S2),
- X ≟ (pair_is_comparable S1 S2)
- (*********************************************) ⊢
- carr X ≡ ProdT T1 T2.
-
-(* ********* *)
-(* TUPLE x 3 *)
-(* ********* *)
-
-nlemma triple_destruct_1 :
-∀T1,T2,T3.∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.
- triple T1 T2 T3 x1 y1 z1 = triple T1 T2 T3 x2 y2 z2 → x1 = x2.
- #T1; #T2; #T3; #x1; #x2; #y1; #y2; #z1; #z2; #H;
- nchange with (match triple T1 T2 T3 x2 y2 z2 with [ triple a _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma triple_destruct_2 :
-∀T1,T2,T3.∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.
- triple T1 T2 T3 x1 y1 z1 = triple T1 T2 T3 x2 y2 z2 → y1 = y2.
- #T1; #T2; #T3; #x1; #x2; #y1; #y2; #z1; #z2; #H;
- nchange with (match triple T1 T2 T3 x2 y2 z2 with [ triple _ b _ ⇒ y1 = b ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma triple_destruct_3 :
-∀T1,T2,T3.∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.
- triple T1 T2 T3 x1 y1 z1 = triple T1 T2 T3 x2 y2 z2 → z1 = z2.
- #T1; #T2; #T3; #x1; #x2; #y1; #y2; #z1; #z2; #H;
- nchange with (match triple T1 T2 T3 x2 y2 z2 with [ triple _ _ c ⇒ z1 = c ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_eqtriple :
-∀T1,T2,T3:Type.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.
- (symmetricT T1 bool f1) →
- (symmetricT T2 bool f2) →
- (symmetricT T3 bool f3) →
- (∀p1,p2:Prod3T T1 T2 T3.
- (eq_triple T1 T2 T3 f1 f2 f3 p1 p2 = eq_triple T1 T2 T3 f1 f2 f3 p2 p1)).
- #T1; #T2; #T3; #f1; #f2; #f3; #H; #H1; #H2;
- #p1; nelim p1; #x1; #y1; #z1;
- #p2; nelim p2; #x2; #y2; #z2;
- nnormalize;
- nrewrite > (H x1 x2);
- ncases (f1 x2 x1);
- nnormalize;
- ##[ ##1: nrewrite > (H1 y1 y2);
- ncases (f2 y2 y1);
- nnormalize;
- ##[ ##1: nrewrite > (H2 z1 z2); napply refl_eq
- ##| ##2: napply refl_eq
- ##]
- ##| ##2: napply refl_eq
- ##]
-nqed.
-
-nlemma eq_to_eqtriple :
-∀T1,T2,T3.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.
- (∀x1,x2:T1.x1 = x2 → f1 x1 x2 = true) →
- (∀y1,y2:T2.y1 = y2 → f2 y1 y2 = true) →
- (∀z1,z2:T3.z1 = z2 → f3 z1 z2 = true) →
- (∀p1,p2:Prod3T T1 T2 T3.
- (p1 = p2 → eq_triple T1 T2 T3 f1 f2 f3 p1 p2 = true)).
- #T1; #T2; #T3; #f1; #f2; #f3; #H1; #H2; #H3;
- #p1; nelim p1; #x1; #y1; #z1;
- #p2; nelim p2; #x2; #y2; #z2; #H;
- nnormalize;
- nrewrite > (H1 … (triple_destruct_1 … H));
- nnormalize;
- nrewrite > (H2 … (triple_destruct_2 … H));
- nnormalize;
- nrewrite > (H3 … (triple_destruct_3 … H));
- napply refl_eq.
-nqed.
-
-nlemma eqtriple_to_eq :
-∀T1,T2,T3.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.
- (∀x1,x2:T1.f1 x1 x2 = true → x1 = x2) →
- (∀y1,y2:T2.f2 y1 y2 = true → y1 = y2) →
- (∀z1,z2:T3.f3 z1 z2 = true → z1 = z2) →
- (∀p1,p2:Prod3T T1 T2 T3.
- (eq_triple T1 T2 T3 f1 f2 f3 p1 p2 = true → p1 = p2)).
- #T1; #T2; #T3; #f1; #f2; #f3; #H1; #H2; #H3;
- #p1; nelim p1; #x1; #y1; #z1;
- #p2; nelim p2; #x2; #y2; #z2; #H;
- nnormalize in H:(%);
- nletin K ≝ (H1 x1 x2);
- ncases (f1 x1 x2) in H:(%) K:(%);
- nnormalize;
- ##[ ##2: #H4; ndestruct (*napply (bool_destruct … H4)*) ##]
- nletin K1 ≝ (H2 y1 y2);
- ncases (f2 y1 y2) in K1:(%) ⊢ %;
- nnormalize;
- ##[ ##2: #H4; #H5; ndestruct (*napply (bool_destruct … H5)*) ##]
- #H4; #H5; #H6;
- nrewrite > (H4 (refl_eq …));
- nrewrite > (H6 (refl_eq …));
- nrewrite > (H3 z1 z2 H5);
- napply refl_eq.
-nqed.
-
-nlemma decidable_triple :
-∀T1,T2,T3.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:T3.decidable (x = y)) →
- (∀x,y:Prod3T T1 T2 T3.decidable (x = y)).
- #T1; #T2; #T3; #H; #H1; #H2;
- #x; nelim x; #xx1; #xx2; #xx3;
- #y; nelim y; #yy1; #yy2; #yy3;
- nnormalize;
- napply (or2_elim (xx1 = yy1) (xx1 ≠ yy1) ? (H xx1 yy1) ?);
- ##[ ##2: #H3; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H4; napply (H3 (triple_destruct_1 T1 T2 T3 … H4))
- ##| ##1: #H3; napply (or2_elim (xx2 = yy2) (xx2 ≠ yy2) ? (H1 xx2 yy2) ?);
- ##[ ##2: #H4; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H5; napply (H4 (triple_destruct_2 T1 T2 T3 … H5))
- ##| ##1: #H4; napply (or2_elim (xx3 = yy3) (xx3 ≠ yy3) ? (H2 xx3 yy3) ?);
- ##[ ##2: #H5; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H6; napply (H5 (triple_destruct_3 T1 T2 T3 … H6))
- ##| ##1: #H5; napply (or2_intro1 (? = ?) (? ≠ ?) ?);
- nrewrite > H3;
- nrewrite > H4;
- nrewrite > H5;
- napply refl_eq
- ##]
- ##]
- ##]
-nqed.
-
-nlemma neqtriple_to_neq :
-∀T1,T2,T3.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.
- (∀x,y:T1.f1 x y = false → x ≠ y) →
- (∀x,y:T2.f2 x y = false → x ≠ y) →
- (∀x,y:T3.f3 x y = false → x ≠ y) →
- (∀p1,p2:Prod3T T1 T2 T3.
- (eq_triple T1 T2 T3 f1 f2 f3 p1 p2 = false → p1 ≠ p2)).
- #T1; #T2; #T3; #f1; #f2; #f3; #H1; #H2; #H3;
- #p1; nelim p1; #x1; #y1; #z1;
- #p2; nelim p2; #x2; #y2; #z2;
- nchange with ((((f1 x1 x2) ⊗ (f2 y1 y2) ⊗ (f3 z1 z2)) = false) → ?); #H;
- nnormalize; #H4;
- napply (or3_elim ((f1 x1 x2) = false) ((f2 y1 y2) = false) ((f3 z1 z2) = false) ? (andb_false3 … H) ?);
- ##[ ##1: #H5; napply (H1 x1 x2 H5); napply (triple_destruct_1 T1 T2 T3 … H4)
- ##| ##2: #H5; napply (H2 y1 y2 H5); napply (triple_destruct_2 T1 T2 T3 … H4)
- ##| ##3: #H5; napply (H3 z1 z2 H5); napply (triple_destruct_3 T1 T2 T3 … H4)
- ##]
-nqed.
-
-nlemma triple_destruct :
-∀T1,T2,T3.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:T3.decidable (x = y)) →
- (∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.
- (triple T1 T2 T3 x1 y1 z1) ≠ (triple T1 T2 T3 x2 y2 z2) →
- Or3 (x1 ≠ x2) (y1 ≠ y2) (z1 ≠ z2)).
- #T1; #T2; #T3; #H1; #H2; #H3; #x1; #x2; #y1; #y2; #z1; #z2;
- nnormalize; #H;
- napply (or2_elim (x1 = x2) (x1 ≠ x2) ? (H1 x1 x2) ?);
- ##[ ##2: #H4; napply (or3_intro1 … H4)
- ##| ##1: #H4; napply (or2_elim (y1 = y2) (y1 ≠ y2) ? (H2 y1 y2) ?);
- ##[ ##2: #H5; napply (or3_intro2 … H5)
- ##| ##1: #H5; napply (or2_elim (z1 = z2) (z1 ≠ z2) ? (H3 z1 z2) ?);
- ##[ ##2: #H6; napply (or3_intro3 … H6)
- ##| ##1: #H6; nrewrite > H4 in H:(%);
- nrewrite > H5;
- nrewrite > H6; #H; nelim (H (refl_eq …))
- ##]
- ##]
- ##]
-nqed.
-
-nlemma neq_to_neqtriple :
-∀T1,T2,T3.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:T3.decidable (x = y)) →
- (∀x,y:T1.x ≠ y → f1 x y = false) →
- (∀x,y:T2.x ≠ y → f2 x y = false) →
- (∀x,y:T3.x ≠ y → f3 x y = false) →
- (∀p1,p2:Prod3T T1 T2 T3.
- (p1 ≠ p2 → eq_triple T1 T2 T3 f1 f2 f3 p1 p2 = false)).
- #T1; #T2; #T3; #f1; #f2; #f3; #H1; #H2; #H3; #H4; #H5; #H6;
- #p1; nelim p1; #x1; #y1; #z1;
- #p2; nelim p2; #x2; #y2; #z2; #H;
- nchange with (((f1 x1 x2) ⊗ (f2 y1 y2) ⊗ (f3 z1 z2)) = false);
- napply (or3_elim (x1 ≠ x2) (y1 ≠ y2) (z1 ≠ z2) ? (triple_destruct T1 T2 T3 H1 H2 H3 … H) ?);
- ##[ ##1: #H7; nrewrite > (H4 … H7); nrewrite > (andb_false3_1 (f2 y1 y2) (f3 z1 z2)); napply refl_eq
- ##| ##2: #H7; nrewrite > (H5 … H7); nrewrite > (andb_false3_2 (f1 x1 x2) (f3 z1 z2)); napply refl_eq
- ##| ##3: #H7; nrewrite > (H6 … H7); nrewrite > (andb_false3_3 (f1 x1 x2) (f2 y1 y2)); napply refl_eq
- ##]
-nqed.
-
-nlemma triple_is_comparable :
- comparable → comparable → comparable → comparable.
- #T1; #T2; #T3; napply (mk_comparable (Prod3T T1 T2 T3));
- ##[ napply (triple … (zeroc T1) (zeroc T2) (zeroc T3))
- ##| napply (λP.(forallc T1)
- (λe1.(forallc T2)
- (λe2.(forallc T3)
- (λe3.P (triple … e1 e2 e3)))))
- ##| napply (eq_triple … (eqc T1) (eqc T2) (eqc T3))
- ##| napply (eqtriple_to_eq … (eqc T1) (eqc T2) (eqc T3));
- ##[ napply (eqc_to_eq T1)
- ##| napply (eqc_to_eq T2)
- ##| napply (eqc_to_eq T3)
- ##]
- ##| napply (eq_to_eqtriple … (eqc T1) (eqc T2) (eqc T3));
- ##[ napply (eq_to_eqc T1)
- ##| napply (eq_to_eqc T2)
- ##| napply (eq_to_eqc T3)
- ##]
- ##| napply (neqtriple_to_neq … (eqc T1) (eqc T2) (eqc T3));
- ##[ napply (neqc_to_neq T1)
- ##| napply (neqc_to_neq T2)
- ##| napply (neqc_to_neq T3)
- ##]
- ##| napply (neq_to_neqtriple … (eqc T1) (eqc T2) (eqc T3));
- ##[ napply (decidable_c T1)
- ##| napply (decidable_c T2)
- ##| napply (decidable_c T3)
- ##| napply (neq_to_neqc T1)
- ##| napply (neq_to_neqc T2)
- ##| napply (neq_to_neqc T3)
- ##]
- ##| napply decidable_triple;
- ##[ napply (decidable_c T1)
- ##| napply (decidable_c T2)
- ##| napply (decidable_c T3)
- ##]
- ##| napply symmetric_eqtriple;
- ##[ napply (symmetric_eqc T1)
- ##| napply (symmetric_eqc T2)
- ##| napply (symmetric_eqc T3)
- ##]
- ##]
-nqed.
-
-unification hint 0 ≔ S1: comparable, S2: comparable, S3: comparable;
- T1 ≟ (carr S1), T2 ≟ (carr S2), T3 ≟ (carr S3),
- X ≟ (triple_is_comparable S1 S2 S3)
- (*********************************************) ⊢
- carr X ≡ Prod3T T1 T2 T3.
-
-(* ********* *)
-(* TUPLE x 4 *)
-(* ********* *)
-
-nlemma quadruple_destruct_1 :
-∀T1,T2,T3,T4.∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.∀v1,v2:T4.
- quadruple T1 T2 T3 T4 x1 y1 z1 v1 = quadruple T1 T2 T3 T4 x2 y2 z2 v2 → x1 = x2.
- #T1; #T2; #T3; #T4; #x1; #x2; #y1; #y2; #z1; #z2; #v1; #v2; #H;
- nchange with (match quadruple T1 T2 T3 T4 x2 y2 z2 v2 with [ quadruple a _ _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma quadruple_destruct_2 :
-∀T1,T2,T3,T4.∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.∀v1,v2:T4.
- quadruple T1 T2 T3 T4 x1 y1 z1 v1 = quadruple T1 T2 T3 T4 x2 y2 z2 v2 → y1 = y2.
- #T1; #T2; #T3; #T4; #x1; #x2; #y1; #y2; #z1; #z2; #v1; #v2; #H;
- nchange with (match quadruple T1 T2 T3 T4 x2 y2 z2 v2 with [ quadruple _ b _ _ ⇒ y1 = b ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma quadruple_destruct_3 :
-∀T1,T2,T3,T4.∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.∀v1,v2:T4.
- quadruple T1 T2 T3 T4 x1 y1 z1 v1 = quadruple T1 T2 T3 T4 x2 y2 z2 v2 → z1 = z2.
- #T1; #T2; #T3; #T4; #x1; #x2; #y1; #y2; #z1; #z2; #v1; #v2; #H;
- nchange with (match quadruple T1 T2 T3 T4 x2 y2 z2 v2 with [ quadruple _ _ c _ ⇒ z1 = c ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma quadruple_destruct_4 :
-∀T1,T2,T3,T4.∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.∀v1,v2:T4.
- quadruple T1 T2 T3 T4 x1 y1 z1 v1 = quadruple T1 T2 T3 T4 x2 y2 z2 v2 → v1 = v2.
- #T1; #T2; #T3; #T4; #x1; #x2; #y1; #y2; #z1; #z2; #v1; #v2; #H;
- nchange with (match quadruple T1 T2 T3 T4 x2 y2 z2 v2 with [ quadruple _ _ _ d ⇒ v1 = d ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_eqquadruple :
-∀T1,T2,T3,T4:Type.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.
- (symmetricT T1 bool f1) →
- (symmetricT T2 bool f2) →
- (symmetricT T3 bool f3) →
- (symmetricT T4 bool f4) →
- (∀p1,p2:Prod4T T1 T2 T3 T4.
- (eq_quadruple T1 T2 T3 T4 f1 f2 f3 f4 p1 p2 = eq_quadruple T1 T2 T3 T4 f1 f2 f3 f4 p2 p1)).
- #T1; #T2; #T3; #T4; #f1; #f2; #f3; #f4; #H; #H1; #H2; #H3;
- #p1; nelim p1; #x1; #y1; #z1; #v1;
- #p2; nelim p2; #x2; #y2; #z2; #v2;
- nnormalize;
- nrewrite > (H x1 x2);
- ncases (f1 x2 x1);
- nnormalize;
- ##[ ##1: nrewrite > (H1 y1 y2);
- ncases (f2 y2 y1);
- nnormalize;
- ##[ ##1: nrewrite > (H2 z1 z2);
- ncases (f3 z2 z1);
- nnormalize;
- ##[ ##1: nrewrite > (H3 v1 v2); napply refl_eq
- ##| ##2: napply refl_eq
- ##]
- ##| ##2: napply refl_eq
- ##]
- ##| ##2: napply refl_eq
- ##]
-nqed.
-
-nlemma eq_to_eqquadruple :
-∀T1,T2,T3,T4.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.
- (∀x,y:T1.x = y → f1 x y = true) →
- (∀x,y:T2.x = y → f2 x y = true) →
- (∀x,y:T3.x = y → f3 x y = true) →
- (∀x,y:T4.x = y → f4 x y = true) →
- (∀p1,p2:Prod4T T1 T2 T3 T4.
- (p1 = p2 → eq_quadruple T1 T2 T3 T4 f1 f2 f3 f4 p1 p2 = true)).
- #T1; #T2; #T3; #T4; #f1; #f2; #f3; #f4; #H1; #H2; #H3; #H4;
- #p1; nelim p1; #x1; #y1; #z1; #v1;
- #p2; nelim p2; #x2; #y2; #z2; #v2; #H;
- nnormalize;
- nrewrite > (H1 … (quadruple_destruct_1 … H));
- nnormalize;
- nrewrite > (H2 … (quadruple_destruct_2 … H));
- nnormalize;
- nrewrite > (H3 … (quadruple_destruct_3 … H));
- nnormalize;
- nrewrite > (H4 … (quadruple_destruct_4 … H));
- napply refl_eq.
-nqed.
-
-nlemma eqquadruple_to_eq :
-∀T1,T2,T3,T4.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.
- (∀x,y:T1.f1 x y = true → x = y) →
- (∀x,y:T2.f2 x y = true → x = y) →
- (∀x,y:T3.f3 x y = true → x = y) →
- (∀x,y:T4.f4 x y = true → x = y) →
- (∀p1,p2:Prod4T T1 T2 T3 T4.
- (eq_quadruple T1 T2 T3 T4 f1 f2 f3 f4 p1 p2 = true → p1 = p2)).
- #T1; #T2; #T3; #T4; #f1; #f2; #f3; #f4; #H1; #H2; #H3; #H4;
- #p1; nelim p1; #x1; #y1; #z1; #v1;
- #p2; nelim p2; #x2; #y2; #z2; #v2; #H;
- nnormalize in H:(%);
- nletin K ≝ (H1 x1 x2);
- ncases (f1 x1 x2) in H:(%) K:(%);
- nnormalize;
- ##[ ##2: #H5; ndestruct (*napply (bool_destruct … H5)*) ##]
- nletin K1 ≝ (H2 y1 y2);
- ncases (f2 y1 y2) in K1:(%) ⊢ %;
- nnormalize;
- ##[ ##2: #H5; #H6; ndestruct (*napply (bool_destruct … H6)*) ##]
- nletin K2 ≝ (H3 z1 z2);
- ncases (f3 z1 z2) in K2:(%) ⊢ %;
- nnormalize;
- ##[ ##2: #H5; #H6; #H7; ndestruct (*napply (bool_destruct … H7)*) ##]
- #H5; #H6; #H7; #H8;
- nrewrite > (H5 (refl_eq …));
- nrewrite > (H6 (refl_eq …));
- nrewrite > (H8 (refl_eq …));
- nrewrite > (H4 v1 v2 H7);
- napply refl_eq.
-nqed.
-
-nlemma decidable_quadruple :
-∀T1,T2,T3,T4.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:T3.decidable (x = y)) →
- (∀x,y:T4.decidable (x = y)) →
- (∀x,y:Prod4T T1 T2 T3 T4.decidable (x = y)).
- #T1; #T2; #T3; #T4; #H; #H1; #H2; #H3;
- #x; nelim x; #xx1; #xx2; #xx3; #xx4;
- #y; nelim y; #yy1; #yy2; #yy3; #yy4;
- nnormalize;
- napply (or2_elim (xx1 = yy1) (xx1 ≠ yy1) ? (H xx1 yy1) ?);
- ##[ ##2: #H4; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H5; napply (H4 (quadruple_destruct_1 T1 T2 T3 T4 … H5))
- ##| ##1: #H4; napply (or2_elim (xx2 = yy2) (xx2 ≠ yy2) ? (H1 xx2 yy2) ?);
- ##[ ##2: #H5; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H6; napply (H5 (quadruple_destruct_2 T1 T2 T3 T4 … H6))
- ##| ##1: #H5; napply (or2_elim (xx3 = yy3) (xx3 ≠ yy3) ? (H2 xx3 yy3) ?);
- ##[ ##2: #H6; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H7; napply (H6 (quadruple_destruct_3 T1 T2 T3 T4 … H7))
- ##| ##1: #H6; napply (or2_elim (xx4 = yy4) (xx4 ≠ yy4) ? (H3 xx4 yy4) ?);
- ##[ ##2: #H7; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H8; napply (H7 (quadruple_destruct_4 T1 T2 T3 T4 … H8))
- ##| ##1: #H7; napply (or2_intro1 (? = ?) (? ≠ ?) ?);
- nrewrite > H4;
- nrewrite > H5;
- nrewrite > H6;
- nrewrite > H7;
- napply refl_eq
- ##]
- ##]
- ##]
- ##]
-nqed.
-
-nlemma neqquadruple_to_neq :
-∀T1,T2,T3,T4.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.
- (∀x,y:T1.f1 x y = false → x ≠ y) →
- (∀x,y:T2.f2 x y = false → x ≠ y) →
- (∀x,y:T3.f3 x y = false → x ≠ y) →
- (∀x,y:T4.f4 x y = false → x ≠ y) →
- (∀p1,p2:Prod4T T1 T2 T3 T4.
- (eq_quadruple T1 T2 T3 T4 f1 f2 f3 f4 p1 p2 = false → p1 ≠ p2)).
- #T1; #T2; #T3; #T4; #f1; #f2; #f3; #f4; #H1; #H2; #H3; #H4;
- #p1; nelim p1; #x1; #y1; #z1; #v1;
- #p2; nelim p2; #x2; #y2; #z2; #v2;
- nchange with ((((f1 x1 x2) ⊗ (f2 y1 y2) ⊗ (f3 z1 z2) ⊗ (f4 v1 v2)) = false) → ?); #H;
- nnormalize; #H5;
- napply (or4_elim ((f1 x1 x2) = false) ((f2 y1 y2) = false) ((f3 z1 z2) = false) ((f4 v1 v2) = false) ? (andb_false4 … H) ?);
- ##[ ##1: #H6; napply (H1 x1 x2 H6); napply (quadruple_destruct_1 T1 T2 T3 T4 … H5)
- ##| ##2: #H6; napply (H2 y1 y2 H6); napply (quadruple_destruct_2 T1 T2 T3 T4 … H5)
- ##| ##3: #H6; napply (H3 z1 z2 H6); napply (quadruple_destruct_3 T1 T2 T3 T4 … H5)
- ##| ##4: #H6; napply (H4 v1 v2 H6); napply (quadruple_destruct_4 T1 T2 T3 T4 … H5)
- ##]
-nqed.
-
-nlemma quadruple_destruct :
-∀T1,T2,T3,T4.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:T3.decidable (x = y)) →
- (∀x,y:T4.decidable (x = y)) →
- (∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.∀v1,v2:T4.
- (quadruple T1 T2 T3 T4 x1 y1 z1 v1) ≠ (quadruple T1 T2 T3 T4 x2 y2 z2 v2) →
- Or4 (x1 ≠ x2) (y1 ≠ y2) (z1 ≠ z2) (v1 ≠ v2)).
- #T1; #T2; #T3; #T4; #H1; #H2; #H3; #H4;
- #x1; #x2; #y1; #y2; #z1; #z2; #v1; #v2;
- nnormalize; #H;
- napply (or2_elim (x1 = x2) (x1 ≠ x2) ? (H1 x1 x2) ?);
- ##[ ##2: #H5; napply (or4_intro1 … H5)
- ##| ##1: #H5; napply (or2_elim (y1 = y2) (y1 ≠ y2) ? (H2 y1 y2) ?);
- ##[ ##2: #H6; napply (or4_intro2 … H6)
- ##| ##1: #H6; napply (or2_elim (z1 = z2) (z1 ≠ z2) ? (H3 z1 z2) ?);
- ##[ ##2: #H7; napply (or4_intro3 … H7)
- ##| ##1: #H7; napply (or2_elim (v1 = v2) (v1 ≠ v2) ? (H4 v1 v2) ?);
- ##[ ##2: #H8; napply (or4_intro4 … H8)
- ##| ##1: #H8; nrewrite > H5 in H:(%);
- nrewrite > H6;
- nrewrite > H7;
- nrewrite > H8; #H; nelim (H (refl_eq …))
- ##]
- ##]
- ##]
- ##]
-nqed.
-
-nlemma neq_to_neqquadruple :
-∀T1,T2,T3,T4.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:T3.decidable (x = y)) →
- (∀x,y:T4.decidable (x = y)) →
- (∀x,y:T1.x ≠ y → f1 x y = false) →
- (∀x,y:T2.x ≠ y → f2 x y = false) →
- (∀x,y:T3.x ≠ y → f3 x y = false) →
- (∀x,y:T4.x ≠ y → f4 x y = false) →
- (∀p1,p2:Prod4T T1 T2 T3 T4.
- (p1 ≠ p2 → eq_quadruple T1 T2 T3 T4 f1 f2 f3 f4 p1 p2 = false)).
- #T1; #T2; #T3; #T4; #f1; #f2; #f3; #f4; #H1; #H2; #H3; #H4; #H5; #H6; #H7; #H8;
- #p1; nelim p1; #x1; #y1; #z1; #v1;
- #p2; nelim p2; #x2; #y2; #z2; #v2; #H;
- nchange with (((f1 x1 x2) ⊗ (f2 y1 y2) ⊗ (f3 z1 z2) ⊗ (f4 v1 v2)) = false);
- napply (or4_elim (x1 ≠ x2) (y1 ≠ y2) (z1 ≠ z2) (v1 ≠ v2) ? (quadruple_destruct T1 T2 T3 T4 H1 H2 H3 H4 … H) ?);
- ##[ ##1: #H9; nrewrite > (H5 … H9); nrewrite > (andb_false4_1 (f2 y1 y2) (f3 z1 z2) (f4 v1 v2)); napply refl_eq
- ##| ##2: #H9; nrewrite > (H6 … H9); nrewrite > (andb_false4_2 (f1 x1 x2) (f3 z1 z2) (f4 v1 v2)); napply refl_eq
- ##| ##3: #H9; nrewrite > (H7 … H9); nrewrite > (andb_false4_3 (f1 x1 x2) (f2 y1 y2) (f4 v1 v2)); napply refl_eq
- ##| ##4: #H9; nrewrite > (H8 … H9); nrewrite > (andb_false4_4 (f1 x1 x2) (f2 y1 y2) (f3 z1 z2)); napply refl_eq
- ##]
-nqed.
-
-nlemma quadruple_is_comparable :
- comparable → comparable → comparable → comparable → comparable.
- #T1; #T2; #T3; #T4; napply (mk_comparable (Prod4T T1 T2 T3 T4));
- ##[ napply (quadruple … (zeroc T1) (zeroc T2) (zeroc T3) (zeroc T4))
- ##| napply (λP.(forallc T1)
- (λe1.(forallc T2)
- (λe2.(forallc T3)
- (λe3.(forallc T4)
- (λe4.P (quadruple … e1 e2 e3 e4))))))
- ##| napply (eq_quadruple … (eqc T1) (eqc T2) (eqc T3) (eqc T4))
- ##| napply (eqquadruple_to_eq … (eqc T1) (eqc T2) (eqc T3) (eqc T4));
- ##[ napply (eqc_to_eq T1)
- ##| napply (eqc_to_eq T2)
- ##| napply (eqc_to_eq T3)
- ##| napply (eqc_to_eq T4)
- ##]
- ##| napply (eq_to_eqquadruple … (eqc T1) (eqc T2) (eqc T3) (eqc T4));
- ##[ napply (eq_to_eqc T1)
- ##| napply (eq_to_eqc T2)
- ##| napply (eq_to_eqc T3)
- ##| napply (eq_to_eqc T4)
- ##]
- ##| napply (neqquadruple_to_neq … (eqc T1) (eqc T2) (eqc T3) (eqc T4));
- ##[ napply (neqc_to_neq T1)
- ##| napply (neqc_to_neq T2)
- ##| napply (neqc_to_neq T3)
- ##| napply (neqc_to_neq T4)
- ##]
- ##| napply (neq_to_neqquadruple … (eqc T1) (eqc T2) (eqc T3) (eqc T4));
- ##[ napply (decidable_c T1)
- ##| napply (decidable_c T2)
- ##| napply (decidable_c T3)
- ##| napply (decidable_c T4)
- ##| napply (neq_to_neqc T1)
- ##| napply (neq_to_neqc T2)
- ##| napply (neq_to_neqc T3)
- ##| napply (neq_to_neqc T4)
- ##]
- ##| napply decidable_quadruple;
- ##[ napply (decidable_c T1)
- ##| napply (decidable_c T2)
- ##| napply (decidable_c T3)
- ##| napply (decidable_c T4)
- ##]
- ##| napply symmetric_eqquadruple;
- ##[ napply (symmetric_eqc T1)
- ##| napply (symmetric_eqc T2)
- ##| napply (symmetric_eqc T3)
- ##| napply (symmetric_eqc T4)
- ##]
- ##]
-nqed.
-
-unification hint 0 ≔ S1: comparable, S2: comparable, S3: comparable, S4: comparable;
- T1 ≟ (carr S1), T2 ≟ (carr S2), T3 ≟ (carr S3), T4 ≟ (carr S4),
- X ≟ (quadruple_is_comparable S1 S2 S3 S4)
- (*********************************************) ⊢
- carr X ≡ Prod4T T1 T2 T3 T4.
-
-(* ********* *)
-(* TUPLE x 5 *)
-(* ********* *)
-
-nlemma quintuple_destruct_1 :
-∀T1,T2,T3,T4,T5.∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.∀v1,v2:T4.∀w1,w2:T5.
- quintuple T1 T2 T3 T4 T5 x1 y1 z1 v1 w1 = quintuple T1 T2 T3 T4 T5 x2 y2 z2 v2 w2 → x1 = x2.
- #T1; #T2; #T3; #T4; #T5; #x1; #x2; #y1; #y2; #z1; #z2; #v1; #v2; #w1; #w2; #H;
- nchange with (match quintuple T1 T2 T3 T4 T5 x2 y2 z2 v2 w2 with [ quintuple a _ _ _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma quintuple_destruct_2 :
-∀T1,T2,T3,T4,T5.∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.∀v1,v2:T4.∀w1,w2:T5.
- quintuple T1 T2 T3 T4 T5 x1 y1 z1 v1 w1 = quintuple T1 T2 T3 T4 T5 x2 y2 z2 v2 w2 → y1 = y2.
- #T1; #T2; #T3; #T4; #T5; #x1; #x2; #y1; #y2; #z1; #z2; #v1; #v2; #w1; #w2; #H;
- nchange with (match quintuple T1 T2 T3 T4 T5 x2 y2 z2 v2 w2 with [ quintuple _ b _ _ _ ⇒ y1 = b ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma quintuple_destruct_3 :
-∀T1,T2,T3,T4,T5.∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.∀v1,v2:T4.∀w1,w2:T5.
- quintuple T1 T2 T3 T4 T5 x1 y1 z1 v1 w1 = quintuple T1 T2 T3 T4 T5 x2 y2 z2 v2 w2 → z1 = z2.
- #T1; #T2; #T3; #T4; #T5; #x1; #x2; #y1; #y2; #z1; #z2; #v1; #v2; #w1; #w2; #H;
- nchange with (match quintuple T1 T2 T3 T4 T5 x2 y2 z2 v2 w2 with [ quintuple _ _ c _ _ ⇒ z1 = c ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma quintuple_destruct_4 :
-∀T1,T2,T3,T4,T5.∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.∀v1,v2:T4.∀w1,w2:T5.
- quintuple T1 T2 T3 T4 T5 x1 y1 z1 v1 w1 = quintuple T1 T2 T3 T4 T5 x2 y2 z2 v2 w2 → v1 = v2.
- #T1; #T2; #T3; #T4; #T5; #x1; #x2; #y1; #y2; #z1; #z2; #v1; #v2; #w1; #w2; #H;
- nchange with (match quintuple T1 T2 T3 T4 T5 x2 y2 z2 v2 w2 with [ quintuple _ _ _ d _ ⇒ v1 = d ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma quintuple_destruct_5 :
-∀T1,T2,T3,T4,T5.∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.∀v1,v2:T4.∀w1,w2:T5.
- quintuple T1 T2 T3 T4 T5 x1 y1 z1 v1 w1 = quintuple T1 T2 T3 T4 T5 x2 y2 z2 v2 w2 → w1 = w2.
- #T1; #T2; #T3; #T4; #T5; #x1; #x2; #y1; #y2; #z1; #z2; #v1; #v2; #w1; #w2; #H;
- nchange with (match quintuple T1 T2 T3 T4 T5 x2 y2 z2 v2 w2 with [ quintuple _ _ _ _ e ⇒ w1 = e ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_eqquintuple :
-∀T1,T2,T3,T4,T5:Type.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.∀f5:T5 → T5 → bool.
- (symmetricT T1 bool f1) →
- (symmetricT T2 bool f2) →
- (symmetricT T3 bool f3) →
- (symmetricT T4 bool f4) →
- (symmetricT T5 bool f5) →
- (∀p1,p2:Prod5T T1 T2 T3 T4 T5.
- (eq_quintuple T1 T2 T3 T4 T5 f1 f2 f3 f4 f5 p1 p2 = eq_quintuple T1 T2 T3 T4 T5 f1 f2 f3 f4 f5 p2 p1)).
- #T1; #T2; #T3; #T4; #T5; #f1; #f2; #f3; #f4; #f5; #H; #H1; #H2; #H3; #H4;
- #p1; nelim p1; #x1; #y1; #z1; #v1; #w1;
- #p2; nelim p2; #x2; #y2; #z2; #v2; #w2;
- nnormalize;
- nrewrite > (H x1 x2);
- ncases (f1 x2 x1);
- nnormalize;
- ##[ ##1: nrewrite > (H1 y1 y2);
- ncases (f2 y2 y1);
- nnormalize;
- ##[ ##1: nrewrite > (H2 z1 z2);
- ncases (f3 z2 z1);
- nnormalize;
- ##[ ##1: nrewrite > (H3 v1 v2);
- ncases (f4 v2 v1);
- nnormalize;
- ##[ ##1: nrewrite > (H4 w1 w2); napply refl_eq
- ##| ##2: napply refl_eq
- ##]
- ##| ##2: napply refl_eq
- ##]
- ##| ##2: napply refl_eq
- ##]
- ##| ##2: napply refl_eq
- ##]
-nqed.
-
-nlemma eq_to_eqquintuple :
-∀T1,T2,T3,T4,T5.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.∀f5:T5 → T5 → bool.
- (∀x,y:T1.x = y → f1 x y = true) →
- (∀x,y:T2.x = y → f2 x y = true) →
- (∀x,y:T3.x = y → f3 x y = true) →
- (∀x,y:T4.x = y → f4 x y = true) →
- (∀x,y:T5.x = y → f5 x y = true) →
- (∀p1,p2:Prod5T T1 T2 T3 T4 T5.
- (p1 = p2 → eq_quintuple T1 T2 T3 T4 T5 f1 f2 f3 f4 f5 p1 p2 = true)).
- #T1; #T2; #T3; #T4; #T5; #f1; #f2; #f3; #f4; #f5; #H1; #H2; #H3; #H4; #H5;
- #p1; nelim p1; #x1; #y1; #z1; #v1; #w1;
- #p2; nelim p2; #x2; #y2; #z2; #v2; #w2; #H;
- nnormalize;
- nrewrite > (H1 … (quintuple_destruct_1 … H));
- nnormalize;
- nrewrite > (H2 … (quintuple_destruct_2 … H));
- nnormalize;
- nrewrite > (H3 … (quintuple_destruct_3 … H));
- nnormalize;
- nrewrite > (H4 … (quintuple_destruct_4 … H));
- nnormalize;
- nrewrite > (H5 … (quintuple_destruct_5 … H));
- napply refl_eq.
-nqed.
-
-nlemma eqquintuple_to_eq :
-∀T1,T2,T3,T4,T5.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.∀f5:T5 → T5 → bool.
- (∀x,y:T1.f1 x y = true → x = y) →
- (∀x,y:T2.f2 x y = true → x = y) →
- (∀x,y:T3.f3 x y = true → x = y) →
- (∀x,y:T4.f4 x y = true → x = y) →
- (∀x,y:T5.f5 x y = true → x = y) →
- (∀p1,p2:Prod5T T1 T2 T3 T4 T5.
- (eq_quintuple T1 T2 T3 T4 T5 f1 f2 f3 f4 f5 p1 p2 = true → p1 = p2)).
- #T1; #T2; #T3; #T4; #T5; #f1; #f2; #f3; #f4; #f5; #H1; #H2; #H3; #H4; #H5;
- #p1; nelim p1; #x1; #y1; #z1; #v1; #w1;
- #p2; nelim p2; #x2; #y2; #z2; #v2; #w2; #H;
- nnormalize in H:(%);
- nletin K ≝ (H1 x1 x2);
- ncases (f1 x1 x2) in H:(%) K:(%);
- nnormalize;
- ##[ ##2: #H6; ndestruct (*napply (bool_destruct … H6)*) ##]
- nletin K1 ≝ (H2 y1 y2);
- ncases (f2 y1 y2) in K1:(%) ⊢ %;
- nnormalize;
- ##[ ##2: #H6; #H7; ndestruct (*napply (bool_destruct … H7)*) ##]
- nletin K2 ≝ (H3 z1 z2);
- ncases (f3 z1 z2) in K2:(%) ⊢ %;
- nnormalize;
- ##[ ##2: #H6; #H7; #H8; ndestruct (*napply (bool_destruct … H8)*) ##]
- nletin K3 ≝ (H4 v1 v2);
- ncases (f4 v1 v2) in K3:(%) ⊢ %;
- nnormalize;
- ##[ ##2: #H6; #H7; #H8; #H9; ndestruct (*napply (bool_destruct … H9)*) ##]
- #H6; #H7; #H8; #H9; #H10;
- nrewrite > (H6 (refl_eq …));
- nrewrite > (H7 (refl_eq …));
- nrewrite > (H8 (refl_eq …));
- nrewrite > (H10 (refl_eq …));
- nrewrite > (H5 w1 w2 H9);
- napply refl_eq.
-nqed.
-
-nlemma decidable_quintuple :
-∀T1,T2,T3,T4,T5.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:T3.decidable (x = y)) →
- (∀x,y:T4.decidable (x = y)) →
- (∀x,y:T5.decidable (x = y)) →
- (∀x,y:Prod5T T1 T2 T3 T4 T5.decidable (x = y)).
- #T1; #T2; #T3; #T4; #T5; #H; #H1; #H2; #H3; #H4;
- #x; nelim x; #xx1; #xx2; #xx3; #xx4; #xx5;
- #y; nelim y; #yy1; #yy2; #yy3; #yy4; #yy5;
- nnormalize;
- napply (or2_elim (xx1 = yy1) (xx1 ≠ yy1) ? (H xx1 yy1) ?);
- ##[ ##2: #H5; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H6; napply (H5 (quintuple_destruct_1 T1 T2 T3 T4 T5 … H6))
- ##| ##1: #H5; napply (or2_elim (xx2 = yy2) (xx2 ≠ yy2) ? (H1 xx2 yy2) ?);
- ##[ ##2: #H6; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H7; napply (H6 (quintuple_destruct_2 T1 T2 T3 T4 T5 … H7))
- ##| ##1: #H6; napply (or2_elim (xx3 = yy3) (xx3 ≠ yy3) ? (H2 xx3 yy3) ?);
- ##[ ##2: #H7; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H8; napply (H7 (quintuple_destruct_3 T1 T2 T3 T4 T5 … H8))
- ##| ##1: #H7; napply (or2_elim (xx4 = yy4) (xx4 ≠ yy4) ? (H3 xx4 yy4) ?);
- ##[ ##2: #H8; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H9; napply (H8 (quintuple_destruct_4 T1 T2 T3 T4 T5 … H9))
- ##| ##1: #H8; napply (or2_elim (xx5 = yy5) (xx5 ≠ yy5) ? (H4 xx5 yy5) ?);
- ##[ ##2: #H9; napply (or2_intro2 (? = ?) (? ≠ ?) ?);
- nnormalize; #H10; napply (H9 (quintuple_destruct_5 T1 T2 T3 T4 T5 … H10))
- ##| ##1: #H9; napply (or2_intro1 (? = ?) (? ≠ ?) ?);
- nrewrite > H5;
- nrewrite > H6;
- nrewrite > H7;
- nrewrite > H8;
- nrewrite > H9;
- napply refl_eq
- ##]
- ##]
- ##]
- ##]
- ##]
-nqed.
-
-nlemma neqquintuple_to_neq :
-∀T1,T2,T3,T4,T5.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.∀f5:T5 → T5 → bool.
- (∀x,y:T1.f1 x y = false → x ≠ y) →
- (∀x,y:T2.f2 x y = false → x ≠ y) →
- (∀x,y:T3.f3 x y = false → x ≠ y) →
- (∀x,y:T4.f4 x y = false → x ≠ y) →
- (∀x,y:T5.f5 x y = false → x ≠ y) →
- (∀p1,p2:Prod5T T1 T2 T3 T4 T5.
- (eq_quintuple T1 T2 T3 T4 T5 f1 f2 f3 f4 f5 p1 p2 = false → p1 ≠ p2)).
- #T1; #T2; #T3; #T4; #T5; #f1; #f2; #f3; #f4; #f5; #H1; #H2; #H3; #H4; #H5;
- #p1; nelim p1; #x1; #y1; #z1; #v1; #w1;
- #p2; nelim p2; #x2; #y2; #z2; #v2; #w2;
- nchange with ((((f1 x1 x2) ⊗ (f2 y1 y2) ⊗ (f3 z1 z2) ⊗ (f4 v1 v2) ⊗ (f5 w1 w2)) = false) → ?); #H;
- nnormalize; #H6;
- napply (or5_elim ((f1 x1 x2) = false) ((f2 y1 y2) = false) ((f3 z1 z2) = false) ((f4 v1 v2) = false) ((f5 w1 w2) = false) ? (andb_false5 … H) ?);
- ##[ ##1: #H7; napply (H1 x1 x2 H7); napply (quintuple_destruct_1 T1 T2 T3 T4 T5 … H6)
- ##| ##2: #H7; napply (H2 y1 y2 H7); napply (quintuple_destruct_2 T1 T2 T3 T4 T5 … H6)
- ##| ##3: #H7; napply (H3 z1 z2 H7); napply (quintuple_destruct_3 T1 T2 T3 T4 T5 … H6)
- ##| ##4: #H7; napply (H4 v1 v2 H7); napply (quintuple_destruct_4 T1 T2 T3 T4 T5 … H6)
- ##| ##5: #H7; napply (H5 w1 w2 H7); napply (quintuple_destruct_5 T1 T2 T3 T4 T5 … H6)
- ##]
-nqed.
-
-nlemma quintuple_destruct :
-∀T1,T2,T3,T4,T5.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:T3.decidable (x = y)) →
- (∀x,y:T4.decidable (x = y)) →
- (∀x,y:T5.decidable (x = y)) →
- (∀x1,x2:T1.∀y1,y2:T2.∀z1,z2:T3.∀v1,v2:T4.∀w1,w2:T5.
- (quintuple T1 T2 T3 T4 T5 x1 y1 z1 v1 w1) ≠ (quintuple T1 T2 T3 T4 T5 x2 y2 z2 v2 w2) →
- Or5 (x1 ≠ x2) (y1 ≠ y2) (z1 ≠ z2) (v1 ≠ v2) (w1 ≠ w2)).
- #T1; #T2; #T3; #T4; #T5; #H1; #H2; #H3; #H4; #H5;
- #x1; #x2; #y1; #y2; #z1; #z2; #v1; #v2; #w1; #w2;
- nnormalize; #H;
- napply (or2_elim (x1 = x2) (x1 ≠ x2) ? (H1 x1 x2) ?);
- ##[ ##2: #H6; napply (or5_intro1 … H6)
- ##| ##1: #H6; napply (or2_elim (y1 = y2) (y1 ≠ y2) ? (H2 y1 y2) ?);
- ##[ ##2: #H7; napply (or5_intro2 … H7)
- ##| ##1: #H7; napply (or2_elim (z1 = z2) (z1 ≠ z2) ? (H3 z1 z2) ?);
- ##[ ##2: #H8; napply (or5_intro3 … H8)
- ##| ##1: #H8; napply (or2_elim (v1 = v2) (v1 ≠ v2) ? (H4 v1 v2) ?);
- ##[ ##2: #H9; napply (or5_intro4 … H9)
- ##| ##1: #H9; napply (or2_elim (w1 = w2) (w1 ≠ w2) ? (H5 w1 w2) ?);
- ##[ ##2: #H10; napply (or5_intro5 … H10)
- ##| ##1: #H10; nrewrite > H6 in H:(%);
- nrewrite > H7;
- nrewrite > H8;
- nrewrite > H9;
- nrewrite > H10; #H; nelim (H (refl_eq …))
- ##]
- ##]
- ##]
- ##]
- ##]
-nqed.
-
-nlemma neq_to_neqquintuple :
-∀T1,T2,T3,T4,T5.
-∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.∀f5:T5 → T5 → bool.
- (∀x,y:T1.decidable (x = y)) →
- (∀x,y:T2.decidable (x = y)) →
- (∀x,y:T3.decidable (x = y)) →
- (∀x,y:T4.decidable (x = y)) →
- (∀x,y:T5.decidable (x = y)) →
- (∀x,y:T1.x ≠ y → f1 x y = false) →
- (∀x,y:T2.x ≠ y → f2 x y = false) →
- (∀x,y:T3.x ≠ y → f3 x y = false) →
- (∀x,y:T4.x ≠ y → f4 x y = false) →
- (∀x,y:T5.x ≠ y → f5 x y = false) →
- (∀p1,p2:Prod5T T1 T2 T3 T4 T5.
- (p1 ≠ p2 → eq_quintuple T1 T2 T3 T4 T5 f1 f2 f3 f4 f5 p1 p2 = false)).
- #T1; #T2; #T3; #T4; #T5; #f1; #f2; #f3; #f4; #f5;
- #H1; #H2; #H3; #H4; #H5; #H6; #H7; #H8; #H9; #H10;
- #p1; nelim p1; #x1; #y1; #z1; #v1; #w1;
- #p2; nelim p2; #x2; #y2; #z2; #v2; #w2; #H;
- nchange with (((f1 x1 x2) ⊗ (f2 y1 y2) ⊗ (f3 z1 z2) ⊗ (f4 v1 v2) ⊗ (f5 w1 w2)) = false);
- napply (or5_elim (x1 ≠ x2) (y1 ≠ y2) (z1 ≠ z2) (v1 ≠ v2) (w1 ≠ w2) ? (quintuple_destruct T1 T2 T3 T4 T5 H1 H2 H3 H4 H5 … H) ?);
- ##[ ##1: #H11; nrewrite > (H6 … H11); nrewrite > (andb_false5_1 (f2 y1 y2) (f3 z1 z2) (f4 v1 v2) (f5 w1 w2)); napply refl_eq
- ##| ##2: #H11; nrewrite > (H7 … H11); nrewrite > (andb_false5_2 (f1 x1 x2) (f3 z1 z2) (f4 v1 v2) (f5 w1 w2)); napply refl_eq
- ##| ##3: #H11; nrewrite > (H8 … H11); nrewrite > (andb_false5_3 (f1 x1 x2) (f2 y1 y2) (f4 v1 v2) (f5 w1 w2)); napply refl_eq
- ##| ##4: #H11; nrewrite > (H9 … H11); nrewrite > (andb_false5_4 (f1 x1 x2) (f2 y1 y2) (f3 z1 z2) (f5 w1 w2)); napply refl_eq
- ##| ##5: #H11; nrewrite > (H10 … H11); nrewrite > (andb_false5_5 (f1 x1 x2) (f2 y1 y2) (f3 z1 z2) (f4 v1 v2)); napply refl_eq
- ##]
-nqed.
-
-nlemma quintuple_is_comparable :
- comparable → comparable → comparable → comparable → comparable → comparable.
- #T1; #T2; #T3; #T4; #T5; napply (mk_comparable (Prod5T T1 T2 T3 T4 T5));
- ##[ napply (quintuple … (zeroc T1) (zeroc T2) (zeroc T3) (zeroc T4) (zeroc T5))
- ##| napply (λP.(forallc T1)
- (λe1.(forallc T2)
- (λe2.(forallc T3)
- (λe3.(forallc T4)
- (λe4.(forallc T5)
- (λe5.P (quintuple … e1 e2 e3 e4 e5)))))))
- ##| napply (eq_quintuple … (eqc T1) (eqc T2) (eqc T3) (eqc T4) (eqc T5))
- ##| napply (eqquintuple_to_eq … (eqc T1) (eqc T2) (eqc T3) (eqc T4) (eqc T5));
- ##[ napply (eqc_to_eq T1)
- ##| napply (eqc_to_eq T2)
- ##| napply (eqc_to_eq T3)
- ##| napply (eqc_to_eq T4)
- ##| napply (eqc_to_eq T5)
- ##]
- ##| napply (eq_to_eqquintuple … (eqc T1) (eqc T2) (eqc T3) (eqc T4) (eqc T5));
- ##[ napply (eq_to_eqc T1)
- ##| napply (eq_to_eqc T2)
- ##| napply (eq_to_eqc T3)
- ##| napply (eq_to_eqc T4)
- ##| napply (eq_to_eqc T5)
- ##]
- ##| napply (neqquintuple_to_neq … (eqc T1) (eqc T2) (eqc T3) (eqc T4) (eqc T5));
- ##[ napply (neqc_to_neq T1)
- ##| napply (neqc_to_neq T2)
- ##| napply (neqc_to_neq T3)
- ##| napply (neqc_to_neq T4)
- ##| napply (neqc_to_neq T5)
- ##]
- ##| napply (neq_to_neqquintuple … (eqc T1) (eqc T2) (eqc T3) (eqc T4) (eqc T5));
- ##[ napply (decidable_c T1)
- ##| napply (decidable_c T2)
- ##| napply (decidable_c T3)
- ##| napply (decidable_c T4)
- ##| napply (decidable_c T5)
- ##| napply (neq_to_neqc T1)
- ##| napply (neq_to_neqc T2)
- ##| napply (neq_to_neqc T3)
- ##| napply (neq_to_neqc T4)
- ##| napply (neq_to_neqc T5)
- ##]
- ##| napply decidable_quintuple;
- ##[ napply (decidable_c T1)
- ##| napply (decidable_c T2)
- ##| napply (decidable_c T3)
- ##| napply (decidable_c T4)
- ##| napply (decidable_c T5)
- ##]
- ##| napply symmetric_eqquintuple;
- ##[ napply (symmetric_eqc T1)
- ##| napply (symmetric_eqc T2)
- ##| napply (symmetric_eqc T3)
- ##| napply (symmetric_eqc T4)
- ##| napply (symmetric_eqc T5)
- ##]
- ##]
-nqed.
-
-unification hint 0 ≔ S1: comparable, S2: comparable, S3: comparable, S4: comparable, S5: comparable;
- T1 ≟ (carr S1), T2 ≟ (carr S2), T3 ≟ (carr S3), T4 ≟ (carr S4), T5 ≟ (carr S5),
- X ≟ (quintuple_is_comparable S1 S2 S3 S4 S5)
- (*********************************************) ⊢
- carr X ≡ Prod5T T1 T2 T3 T4 T5.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/bool.ma".
-
-(* ***** *)
-(* TUPLE *)
-(* ***** *)
-
-ninductive ProdT (T1:Type) (T2:Type) : Type ≝
- pair : T1 → T2 → ProdT T1 T2.
-
-ndefinition fst ≝
-λT1,T2:Type.λp:ProdT T1 T2.match p with [ pair x _ ⇒ x ].
-
-ndefinition snd ≝
-λT1,T2:Type.λp:ProdT T1 T2.match p with [ pair _ x ⇒ x ].
-
-ndefinition eq_pair ≝
-λT1,T2:Type.
-λf1:T1 → T1 → bool.λf2:T2 → T2 → bool.
-λp1,p2:ProdT T1 T2.
- (f1 (fst … p1) (fst … p2)) ⊗
- (f2 (snd … p1) (snd … p2)).
-
-ninductive Prod3T (T1:Type) (T2:Type) (T3:Type) : Type ≝
-triple : T1 → T2 → T3 → Prod3T T1 T2 T3.
-
-ndefinition fst3T ≝
-λT1.λT2.λT3.λp:Prod3T T1 T2 T3.match p with [ triple x _ _ ⇒ x ].
-
-ndefinition snd3T ≝
-λT1.λT2.λT3.λp:Prod3T T1 T2 T3.match p with [ triple _ x _ ⇒ x ].
-
-ndefinition thd3T ≝
-λT1.λT2.λT3.λp:Prod3T T1 T2 T3.match p with [ triple _ _ x ⇒ x ].
-
-ndefinition eq_triple ≝
-λT1,T2,T3:Type.
-λf1:T1 → T1 → bool.λf2:T2 → T2 → bool.λf3:T3 → T3 → bool.
-λp1,p2:Prod3T T1 T2 T3.
- (f1 (fst3T … p1) (fst3T … p2)) ⊗
- (f2 (snd3T … p1) (snd3T … p2)) ⊗
- (f3 (thd3T … p1) (thd3T … p2)).
-
-ninductive Prod4T (T1:Type) (T2:Type) (T3:Type) (T4:Type) : Type ≝
-quadruple : T1 → T2 → T3 → T4 → Prod4T T1 T2 T3 T4.
-
-ndefinition fst4T ≝
-λT1.λT2.λT3.λT4.λp:Prod4T T1 T2 T3 T4.match p with [ quadruple x _ _ _ ⇒ x ].
-
-ndefinition snd4T ≝
-λT1.λT2.λT3.λT4.λp:Prod4T T1 T2 T3 T4.match p with [ quadruple _ x _ _ ⇒ x ].
-
-ndefinition thd4T ≝
-λT1.λT2.λT3.λT4.λp:Prod4T T1 T2 T3 T4.match p with [ quadruple _ _ x _ ⇒ x ].
-
-ndefinition fth4T ≝
-λT1.λT2.λT3.λT4.λp:Prod4T T1 T2 T3 T4.match p with [ quadruple _ _ _ x ⇒ x ].
-
-ndefinition eq_quadruple ≝
-λT1,T2,T3,T4:Type.
-λf1:T1 → T1 → bool.λf2:T2 → T2 → bool.λf3:T3 → T3 → bool.λf4:T4 → T4 → bool.
-λp1,p2:Prod4T T1 T2 T3 T4.
- (f1 (fst4T … p1) (fst4T … p2)) ⊗
- (f2 (snd4T … p1) (snd4T … p2)) ⊗
- (f3 (thd4T … p1) (thd4T … p2)) ⊗
- (f4 (fth4T … p1) (fth4T … p2)).
-
-ninductive Prod5T (T1:Type) (T2:Type) (T3:Type) (T4:Type) (T5:Type) : Type ≝
-quintuple : T1 → T2 → T3 → T4 → T5 → Prod5T T1 T2 T3 T4 T5.
-
-ndefinition fst5T ≝
-λT1.λT2.λT3.λT4.λT5.λp:Prod5T T1 T2 T3 T4 T5.match p with [ quintuple x _ _ _ _ ⇒ x ].
-
-ndefinition snd5T ≝
-λT1.λT2.λT3.λT4.λT5.λp:Prod5T T1 T2 T3 T4 T5.match p with [ quintuple _ x _ _ _ ⇒ x ].
-
-ndefinition thd5T ≝
-λT1.λT2.λT3.λT4.λT5.λp:Prod5T T1 T2 T3 T4 T5.match p with [ quintuple _ _ x _ _ ⇒ x ].
-
-ndefinition fth5T ≝
-λT1.λT2.λT3.λT4.λT5.λp:Prod5T T1 T2 T3 T4 T5.match p with [ quintuple _ _ _ x _ ⇒ x ].
-
-ndefinition fft5T ≝
-λT1.λT2.λT3.λT4.λT5.λp:Prod5T T1 T2 T3 T4 T5.match p with [ quintuple _ _ _ _ x ⇒ x ].
-
-ndefinition eq_quintuple ≝
-λT1,T2,T3,T4,T5:Type.
-λf1:T1 → T1 → bool.λf2:T2 → T2 → bool.λf3:T3 → T3 → bool.λf4:T4 → T4 → bool.λf5:T5 → T5 → bool.
-λp1,p2:Prod5T T1 T2 T3 T4 T5.
- (f1 (fst5T … p1) (fst5T … p2)) ⊗
- (f2 (snd5T … p1) (snd5T … p2)) ⊗
- (f3 (thd5T … p1) (thd5T … p2)) ⊗
- (f4 (fth5T … p1) (fth5T … p2)) ⊗
- (f5 (fft5T … p1) (fft5T … p2)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-universe constraint Type[0] < Type[1].
-universe constraint Type[1] < Type[2].
-universe constraint Type[2] < Type[3].
-universe constraint Type[3] < Type[4].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/theory.ma".
-
-(* coppia dipendente *)
-
-ninductive sigma (A:Type) (P:A → Type) : Type ≝
- sigma_intro: ∀x:A.P x → sigma A P.
-
-notation < "hvbox(\Sigma ident i opt (: tx) break . p)"
- right associative with precedence 20
-for @{ 'Sigma ${default
- @{\lambda ${ident i} : $tx. $p}
- @{\lambda ${ident i} . $p}}}.
-
-notation > "\Sigma list1 ident x sep , opt (: T). term 19 Px"
- with precedence 20
- for ${ default
- @{ ${ fold right @{$Px} rec acc @{'Sigma (λ${ident x}:$T.$acc)} } }
- @{ ${ fold right @{$Px} rec acc @{'Sigma (λ${ident x}.$acc)} } }
- }.
-
-notation "\ll term 19 a, break term 19 b \gg"
-with precedence 90 for @{'dependent_pair (λx:?.? x) $a $b}.
-interpretation "dependent pair" 'dependent_pair \eta.c a b = (sigma_intro ? c a b).
-
-interpretation "sigma" 'Sigma \eta.x = (sigma ? x).
-
-ndefinition sigmaFst ≝
-λT:Type.λf:T → Type.λs:sigma T f.match s with [ sigma_intro x _ ⇒ x ].
-ndefinition sigmaSnd ≝
-λT:Type.λf:T → Type.λs:sigma T f.match s return λs.f (sigmaFst ?? s) with [ sigma_intro _ x ⇒ x ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/ascii.ma".
-include "common/list.ma".
-
-(* ******* *)
-(* STRINGA *)
-(* ******* *)
-
-(* tipo pubblico *)
-ndefinition aux_str_type ≝ list ascii.
-
-unification hint 0 ≔ ⊢ carr (list_is_comparable ascii_is_comparable) ≡ list ascii.
-unification hint 0 ≔ ⊢ carr (list_is_comparable ascii_is_comparable) ≡ aux_str_type.
-
-(* ************ *)
-(* STRINGA + ID *)
-(* ************ *)
-
-(* tipo pubblico *)
-nrecord strId : Type ≝
- {
- str_elem: aux_str_type;
- id_elem: nat
- }.
-
-(* confronto *)
-ndefinition eq_strId ≝
-λsid,sid':strId.
- (eqc ? (str_elem sid) (str_elem sid'))⊗
- (eqc ? (id_elem sid) (id_elem sid')).
-
-nlemma strid_destruct_1 : ∀x1,x2,y1,y2.mk_strId x1 y1 = mk_strId x2 y2 → x1 = x2.
- #x1; #x2; #y1; #y2; #H;
- nchange with (match mk_strId x2 y2 with [ mk_strId a _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma strid_destruct_2 : ∀x1,x2,y1,y2.mk_strId x1 y1 = mk_strId x2 y2 → y1 = y2.
- #x1; #x2; #y1; #y2; #H;
- nchange with (match mk_strId x2 y2 with [ mk_strId _ b ⇒ y1 = b ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_eqstrid : symmetricT strId bool eq_strId.
- #si1; #si2;
- nchange with (
- ((eqc ? (str_elem si1) (str_elem si2))⊗(eqc ? (id_elem si1) (id_elem si2))) =
- ((eqc ? (str_elem si2) (str_elem si1))⊗(eqc ? (id_elem si2) (id_elem si1))));
- nrewrite > (symmetric_eqc ? (str_elem si1) (str_elem si2));
- nrewrite > (symmetric_eqc ? (id_elem si1) (id_elem si2));
- napply refl_eq.
-nqed.
-
-nlemma eqstrid_to_eq : ∀s,s'.eq_strId s s' = true → s = s'.
- #si1; #si2;
- nelim si1;
- #l1; #n1;
- nelim si2;
- #l2; #n2; #H;
- nchange in H:(%) with (((eqc ? l1 l2)⊗(eqc ? n1 n2)) = true);
- nrewrite > (eqc_to_eq ? l1 l2 (andb_true_true_l … H));
- nrewrite > (eqc_to_eq ? n1 n2 (andb_true_true_r … H));
- napply refl_eq.
-nqed.
-
-nlemma eq_to_eqstrid : ∀s,s'.s = s' → eq_strId s s' = true.
- #si1; #si2;
- nelim si1;
- #l1; #n1;
- nelim si2;
- #l2; #n2; #H;
- nchange with (((eqc ? l1 l2)⊗(eqc ? n1 n2)) = true);
- nrewrite > (strid_destruct_1 … H);
- nrewrite > (strid_destruct_2 … H);
- nrewrite > (eq_to_eqc ? l2 l2 (refl_eq …));
- nrewrite > (eq_to_eqc ? n2 n2 (refl_eq …));
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma decidable_strid_aux1 : ∀s1,n1,s2,n2.s1 ≠ s2 → (mk_strId s1 n1) ≠ (mk_strId s2 n2).
- #s1; #n1; #s2; #n2;
- nnormalize; #H; #H1;
- napply (H (strid_destruct_1 … H1)).
-nqed.
-
-nlemma decidable_strid_aux2 : ∀s1,n1,s2,n2.n1 ≠ n2 → (mk_strId s1 n1) ≠ (mk_strId s2 n2).
- #s1; #n1; #s2; #n2;
- nnormalize; #H; #H1;
- napply (H (strid_destruct_2 … H1)).
-nqed.
-
-nlemma decidable_strid : ∀x,y:strId.decidable (x = y).
- #x; nelim x; #s1; #n1;
- #y; nelim y; #s2; #n2;
- nnormalize;
- napply (or2_elim (s1 = s2) (s1 ≠ s2) ? (decidable_c ? s1 s2) …);
- ##[ ##2: #H; napply (or2_intro2 … (decidable_strid_aux1 … H))
- ##| ##1: #H; napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_c ? n1 n2) …);
- ##[ ##2: #H1; napply (or2_intro2 … (decidable_strid_aux2 … H1))
- ##| ##1: #H1; nrewrite > H; nrewrite > H1;
- napply (or2_intro1 … (refl_eq ? (mk_strId s2 n2)))
- ##]
- ##]
-nqed.
-
-nlemma neqstrid_to_neq : ∀sid1,sid2:strId.(eq_strId sid1 sid2 = false) → (sid1 ≠ sid2).
- #sid1; nelim sid1; #s1; #n1;
- #sid2; nelim sid2; #s2; #n2;
- nchange with ((((eqc ? s1 s2) ⊗ (eqc ? n1 n2)) = false) → ?);
- #H;
- napply (or2_elim ((eqc ? s1 s2) = false) ((eqc ? n1 n2) = false) ? (andb_false2 … H) …);
- ##[ ##1: #H1; napply (decidable_strid_aux1 … (neqc_to_neq … H1))
- ##| ##2: #H1; napply (decidable_strid_aux2 … (neqc_to_neq … H1))
- ##]
-nqed.
-
-nlemma strid_destruct : ∀s1,s2,n1,n2.(mk_strId s1 n1) ≠ (mk_strId s2 n2) → s1 ≠ s2 ∨ n1 ≠ n2.
- #s1; #s2; #n1; #n2;
- nnormalize; #H;
- napply (or2_elim (s1 = s2) (s1 ≠ s2) ? (decidable_c ? s1 s2) …);
- ##[ ##2: #H1; napply (or2_intro1 … H1)
- ##| ##1: #H1; napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_c ? n1 n2) …);
- ##[ ##2: #H2; napply (or2_intro2 … H2)
- ##| ##1: #H2; nrewrite > H1 in H:(%);
- nrewrite > H2;
- #H; nelim (H (refl_eq …))
- ##]
- ##]
-nqed.
-
-nlemma neq_to_neqstrid : ∀sid1,sid2.sid1 ≠ sid2 → eq_strId sid1 sid2 = false.
- #sid1; nelim sid1; #s1; #n1;
- #sid2; nelim sid2; #s2; #n2;
- #H; nchange with (((eqc ? s1 s2) ⊗ (eqc ? n1 n2)) = false);
- napply (or2_elim (s1 ≠ s2) (n1 ≠ n2) ? (strid_destruct … H) …);
- ##[ ##1: #H1; nrewrite > (neq_to_neqc … H1); nnormalize; napply refl_eq
- ##| ##2: #H1; nrewrite > (neq_to_neqc … H1);
- nrewrite > (symmetric_andbool (eqc ? s1 s2) false);
- nnormalize; napply refl_eq
- ##]
-nqed.
-
-nlemma strid_is_comparable : comparable.
- napply (mk_comparable strId);
- ##[ napply (mk_strId (nil ?) O)
- ##| napply (λx.false)
- ##| napply eq_strId
- ##| napply eqstrid_to_eq
- ##| napply eq_to_eqstrid
- ##| napply neqstrid_to_neq
- ##| napply neq_to_neqstrid
- ##| napply decidable_strid
- ##| napply symmetric_eqstrid
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr strid_is_comparable ≡ strId.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/pts.ma".
-
-(* ********************************** *)
-(* SOTTOINSIEME MINIMALE DELLA TEORIA *)
-(* ********************************** *)
-
-(* logic/connectives.ma *)
-
-ninductive True: Prop ≝
- I : True.
-
-ninductive False: Prop ≝.
-
-ndefinition Not: Prop → Prop ≝
-λA.(A → False).
-
-interpretation "logical not" 'not x = (Not x).
-
-nlemma absurd : ∀A,C:Prop.A → ¬A → C.
- #A; #C; #H;
- nnormalize;
- #H1;
- nelim (H1 H).
-nqed.
-
-nlemma not_to_not : ∀A,B:Prop. (A → B) → ((¬B) → (¬A)).
- #A; #B; #H;
- nnormalize;
- #H1; #H2;
- nelim (H1 (H H2)).
-nqed.
-
-nlemma prop_to_nnprop : ∀P.P → ¬¬P.
- #P; nnormalize; #H; #H1;
- napply (H1 H).
-nqed.
-
-ninductive And2 (A,B:Prop) : Prop ≝
- conj2 : A → B → (And2 A B).
-
-interpretation "logical and" 'and x y = (And2 x y).
-
-nlemma proj2_1: ∀A,B:Prop.A ∧ B → A.
- #A; #B; #H;
- napply (And2_ind A B … H);
- #H1; #H2;
- napply H1.
-nqed.
-
-nlemma proj2_2: ∀A,B:Prop.A ∧ B → B.
- #A; #B; #H;
- napply (And2_ind A B … H);
- #H1; #H2;
- napply H2.
-nqed.
-
-ninductive And3 (A,B,C:Prop) : Prop ≝
- conj3 : A → B → C → (And3 A B C).
-
-nlemma proj3_1: ∀A,B,C:Prop.And3 A B C → A.
- #A; #B; #C; #H;
- napply (And3_ind A B C … H);
- #H1; #H2; #H3;
- napply H1.
-nqed.
-
-nlemma proj3_2: ∀A,B,C:Prop.And3 A B C → B.
- #A; #B; #C; #H;
- napply (And3_ind A B C … H);
- #H1; #H2; #H3;
- napply H2.
-nqed.
-
-nlemma proj3_3: ∀A,B,C:Prop.And3 A B C → C.
- #A; #B; #C; #H;
- napply (And3_ind A B C … H);
- #H1; #H2; #H3;
- napply H3.
-nqed.
-
-ninductive And4 (A,B,C,D:Prop) : Prop ≝
- conj4 : A → B → C → D → (And4 A B C D).
-
-nlemma proj4_1: ∀A,B,C,D:Prop.And4 A B C D → A.
- #A; #B; #C; #D; #H;
- napply (And4_ind A B C D … H);
- #H1; #H2; #H3; #H4;
- napply H1.
-nqed.
-
-nlemma proj4_2: ∀A,B,C,D:Prop.And4 A B C D → B.
- #A; #B; #C; #D; #H;
- napply (And4_ind A B C D … H);
- #H1; #H2; #H3; #H4;
- napply H2.
-nqed.
-
-nlemma proj4_3: ∀A,B,C,D:Prop.And4 A B C D → C.
- #A; #B; #C; #D; #H;
- napply (And4_ind A B C D … H);
- #H1; #H2; #H3; #H4;
- napply H3.
-nqed.
-
-nlemma proj4_4: ∀A,B,C,D:Prop.And4 A B C D → D.
- #A; #B; #C; #D; #H;
- napply (And4_ind A B C D … H);
- #H1; #H2; #H3; #H4;
- napply H4.
-nqed.
-
-ninductive And5 (A,B,C,D,E:Prop) : Prop ≝
- conj5 : A → B → C → D → E → (And5 A B C D E).
-
-nlemma proj5_1: ∀A,B,C,D,E:Prop.And5 A B C D E → A.
- #A; #B; #C; #D; #E; #H;
- napply (And5_ind A B C D E … H);
- #H1; #H2; #H3; #H4; #H5;
- napply H1.
-nqed.
-
-nlemma proj5_2: ∀A,B,C,D,E:Prop.And5 A B C D E → B.
- #A; #B; #C; #D; #E; #H;
- napply (And5_ind A B C D E … H);
- #H1; #H2; #H3; #H4; #H5;
- napply H2.
-nqed.
-
-nlemma proj5_3: ∀A,B,C,D,E:Prop.And5 A B C D E → C.
- #A; #B; #C; #D; #E; #H;
- napply (And5_ind A B C D E … H);
- #H1; #H2; #H3; #H4; #H5;
- napply H3.
-nqed.
-
-nlemma proj5_4: ∀A,B,C,D,E:Prop.And5 A B C D E → D.
- #A; #B; #C; #D; #E; #H;
- napply (And5_ind A B C D E … H);
- #H1; #H2; #H3; #H4; #H5;
- napply H4.
-nqed.
-
-nlemma proj5_5: ∀A,B,C,D,E:Prop.And5 A B C D E → E.
- #A; #B; #C; #D; #E; #H;
- napply (And5_ind A B C D E … H);
- #H1; #H2; #H3; #H4; #H5;
- napply H5.
-nqed.
-
-ninductive Or2 (A,B:Prop) : Prop ≝
- or2_intro1 : A → (Or2 A B)
-| or2_intro2 : B → (Or2 A B).
-
-interpretation "logical or" 'or x y = (Or2 x y).
-
-ndefinition decidable ≝ λA:Prop.A ∨ (¬A).
-
-nlemma or2_elim
- : ∀P1,P2,Q:Prop.Or2 P1 P2 → ∀f1:P1 → Q.∀f2:P2 → Q.Q.
- #P1; #P2; #Q; #H; #f1; #f2;
- napply (Or2_ind P1 P2 ? f1 f2 ?);
- napply H.
-nqed.
-
-nlemma symmetric_or2 : ∀P1,P2.Or2 P1 P2 → Or2 P2 P1.
- #P1; #P2; #H;
- napply (or2_elim P1 P2 ? H);
- ##[ ##1: #H1; napply (or2_intro2 P2 P1 H1)
- ##| ##2: #H1; napply (or2_intro1 P2 P1 H1)
- ##]
-nqed.
-
-ninductive Or3 (A,B,C:Prop) : Prop ≝
- or3_intro1 : A → (Or3 A B C)
-| or3_intro2 : B → (Or3 A B C)
-| or3_intro3 : C → (Or3 A B C).
-
-nlemma or3_elim
- : ∀P1,P2,P3,Q:Prop.Or3 P1 P2 P3 → ∀f1:P1 → Q.∀f2:P2 → Q.∀f3:P3 → Q.Q.
- #P1; #P2; #P3; #Q; #H; #f1; #f2; #f3;
- napply (Or3_ind P1 P2 P3 ? f1 f2 f3 ?);
- napply H.
-nqed.
-
-nlemma symmetric_or3_12 : ∀P1,P2,P3:Prop.Or3 P1 P2 P3 → Or3 P2 P1 P3.
- #P1; #P2; #P3; #H;
- napply (or3_elim P1 P2 P3 ? H);
- ##[ ##1: #H1; napply (or3_intro2 P2 P1 P3 H1)
- ##| ##2: #H1; napply (or3_intro1 P2 P1 P3 H1)
- ##| ##3: #H1; napply (or3_intro3 P2 P1 P3 H1)
- ##]
-nqed.
-
-nlemma symmetric_or3_13 : ∀P1,P2,P3:Prop.Or3 P1 P2 P3 → Or3 P3 P2 P1.
- #P1; #P2; #P3; #H;
- napply (or3_elim P1 P2 P3 ? H);
- ##[ ##1: #H1; napply (or3_intro3 P3 P2 P1 H1)
- ##| ##2: #H1; napply (or3_intro2 P3 P2 P1 H1)
- ##| ##3: #H1; napply (or3_intro1 P3 P2 P1 H1)
- ##]
-nqed.
-
-nlemma symmetric_or3_23 : ∀P1,P2,P3:Prop.Or3 P1 P2 P3 → Or3 P1 P3 P2.
- #P1; #P2; #P3; #H;
- napply (or3_elim P1 P2 P3 ? H);
- ##[ ##1: #H1; napply (or3_intro1 P1 P3 P2 H1)
- ##| ##2: #H1; napply (or3_intro3 P1 P3 P2 H1)
- ##| ##3: #H1; napply (or3_intro2 P1 P3 P2 H1)
- ##]
-nqed.
-
-ninductive Or4 (A,B,C,D:Prop) : Prop ≝
- or4_intro1 : A → (Or4 A B C D)
-| or4_intro2 : B → (Or4 A B C D)
-| or4_intro3 : C → (Or4 A B C D)
-| or4_intro4 : D → (Or4 A B C D).
-
-nlemma or4_elim
- : ∀P1,P2,P3,P4,Q:Prop.Or4 P1 P2 P3 P4 → ∀f1:P1 → Q.∀f2:P2 → Q.
- ∀f3:P3 → Q.∀f4:P4 → Q.Q.
- #P1; #P2; #P3; #P4; #Q; #H; #f1; #f2; #f3; #f4;
- napply (Or4_ind P1 P2 P3 P4 ? f1 f2 f3 f4 ?);
- napply H.
-nqed.
-
-nlemma symmetric_or4_12 : ∀P1,P2,P3,P4:Prop.Or4 P1 P2 P3 P4 → Or4 P2 P1 P3 P4.
- #P1; #P2; #P3; #P4; #H;
- napply (or4_elim P1 P2 P3 P4 ? H);
- ##[ ##1: #H1; napply (or4_intro2 P2 P1 P3 P4 H1)
- ##| ##2: #H1; napply (or4_intro1 P2 P1 P3 P4 H1)
- ##| ##3: #H1; napply (or4_intro3 P2 P1 P3 P4 H1)
- ##| ##4: #H1; napply (or4_intro4 P2 P1 P3 P4 H1)
- ##]
-nqed.
-
-nlemma symmetric_or4_13 : ∀P1,P2,P3,P4:Prop.Or4 P1 P2 P3 P4 → Or4 P3 P2 P1 P4.
- #P1; #P2; #P3; #P4; #H;
- napply (or4_elim P1 P2 P3 P4 ? H);
- ##[ ##1: #H1; napply (or4_intro3 P3 P2 P1 P4 H1)
- ##| ##2: #H1; napply (or4_intro2 P3 P2 P1 P4 H1)
- ##| ##3: #H1; napply (or4_intro1 P3 P2 P1 P4 H1)
- ##| ##4: #H1; napply (or4_intro4 P3 P2 P1 P4 H1)
- ##]
-nqed.
-
-nlemma symmetric_or4_14 : ∀P1,P2,P3,P4:Prop.Or4 P1 P2 P3 P4 → Or4 P4 P2 P3 P1.
- #P1; #P2; #P3; #P4; #H;
- napply (or4_elim P1 P2 P3 P4 ? H);
- ##[ ##1: #H1; napply (or4_intro4 P4 P2 P3 P1 H1)
- ##| ##2: #H1; napply (or4_intro2 P4 P2 P3 P1 H1)
- ##| ##3: #H1; napply (or4_intro3 P4 P2 P3 P1 H1)
- ##| ##4: #H1; napply (or4_intro1 P4 P2 P3 P1 H1)
- ##]
-nqed.
-
-nlemma symmetric_or4_23 : ∀P1,P2,P3,P4:Prop.Or4 P1 P2 P3 P4 → Or4 P1 P3 P2 P4.
- #P1; #P2; #P3; #P4; #H;
- napply (or4_elim P1 P2 P3 P4 ? H);
- ##[ ##1: #H1; napply (or4_intro1 P1 P3 P2 P4 H1)
- ##| ##2: #H1; napply (or4_intro3 P1 P3 P2 P4 H1)
- ##| ##3: #H1; napply (or4_intro2 P1 P3 P2 P4 H1)
- ##| ##4: #H1; napply (or4_intro4 P1 P3 P2 P4 H1)
- ##]
-nqed.
-
-nlemma symmetric_or4_24 : ∀P1,P2,P3,P4:Prop.Or4 P1 P2 P3 P4 → Or4 P1 P4 P3 P2.
- #P1; #P2; #P3; #P4; #H;
- napply (or4_elim P1 P2 P3 P4 ? H);
- ##[ ##1: #H1; napply (or4_intro1 P1 P4 P3 P2 H1)
- ##| ##2: #H1; napply (or4_intro4 P1 P4 P3 P2 H1)
- ##| ##3: #H1; napply (or4_intro3 P1 P4 P3 P2 H1)
- ##| ##4: #H1; napply (or4_intro2 P1 P4 P3 P2 H1)
- ##]
-nqed.
-
-nlemma symmetric_or4_34 : ∀P1,P2,P3,P4:Prop.Or4 P1 P2 P3 P4 → Or4 P1 P2 P4 P3.
- #P1; #P2; #P3; #P4; #H;
- napply (or4_elim P1 P2 P3 P4 ? H);
- ##[ ##1: #H1; napply (or4_intro1 P1 P2 P4 P3 H1)
- ##| ##2: #H1; napply (or4_intro2 P1 P2 P4 P3 H1)
- ##| ##3: #H1; napply (or4_intro4 P1 P2 P4 P3 H1)
- ##| ##4: #H1; napply (or4_intro3 P1 P2 P4 P3 H1)
- ##]
-nqed.
-
-ninductive Or5 (A,B,C,D,E:Prop) : Prop ≝
- or5_intro1 : A → (Or5 A B C D E)
-| or5_intro2 : B → (Or5 A B C D E)
-| or5_intro3 : C → (Or5 A B C D E)
-| or5_intro4 : D → (Or5 A B C D E)
-| or5_intro5 : E → (Or5 A B C D E).
-
-nlemma or5_elim
- : ∀P1,P2,P3,P4,P5,Q:Prop.Or5 P1 P2 P3 P4 P5 → ∀f1:P1 → Q.∀f2:P2 → Q.
- ∀f3:P3 → Q.∀f4:P4 → Q.∀f5:P5 → Q.Q.
- #P1; #P2; #P3; #P4; #P5; #Q; #H; #f1; #f2; #f3; #f4; #f5;
- napply (Or5_ind P1 P2 P3 P4 P5 ? f1 f2 f3 f4 f5 ?);
- napply H.
-nqed.
-
-nlemma symmetric_or5_12 : ∀P1,P2,P3,P4,P5:Prop.Or5 P1 P2 P3 P4 P5 → Or5 P2 P1 P3 P4 P5.
- #P1; #P2; #P3; #P4; #P5; #H;
- napply (or5_elim P1 P2 P3 P4 P5 ? H);
- ##[ ##1: #H1; napply (or5_intro2 P2 P1 P3 P4 P5 H1)
- ##| ##2: #H1; napply (or5_intro1 P2 P1 P3 P4 P5 H1)
- ##| ##3: #H1; napply (or5_intro3 P2 P1 P3 P4 P5 H1)
- ##| ##4: #H1; napply (or5_intro4 P2 P1 P3 P4 P5 H1)
- ##| ##5: #H1; napply (or5_intro5 P2 P1 P3 P4 P5 H1)
- ##]
-nqed.
-
-nlemma symmetric_or5_13 : ∀P1,P2,P3,P4,P5:Prop.Or5 P1 P2 P3 P4 P5 → Or5 P3 P2 P1 P4 P5.
- #P1; #P2; #P3; #P4; #P5; #H;
- napply (or5_elim P1 P2 P3 P4 P5 ? H);
- ##[ ##1: #H1; napply (or5_intro3 P3 P2 P1 P4 P5 H1)
- ##| ##2: #H1; napply (or5_intro2 P3 P2 P1 P4 P5 H1)
- ##| ##3: #H1; napply (or5_intro1 P3 P2 P1 P4 P5 H1)
- ##| ##4: #H1; napply (or5_intro4 P3 P2 P1 P4 P5 H1)
- ##| ##5: #H1; napply (or5_intro5 P3 P2 P1 P4 P5 H1)
- ##]
-nqed.
-
-nlemma symmetric_or5_14 : ∀P1,P2,P3,P4,P5:Prop.Or5 P1 P2 P3 P4 P5 → Or5 P4 P2 P3 P1 P5.
- #P1; #P2; #P3; #P4; #P5; #H;
- napply (or5_elim P1 P2 P3 P4 P5 ? H);
- ##[ ##1: #H1; napply (or5_intro4 P4 P2 P3 P1 P5 H1)
- ##| ##2: #H1; napply (or5_intro2 P4 P2 P3 P1 P5 H1)
- ##| ##3: #H1; napply (or5_intro3 P4 P2 P3 P1 P5 H1)
- ##| ##4: #H1; napply (or5_intro1 P4 P2 P3 P1 P5 H1)
- ##| ##5: #H1; napply (or5_intro5 P4 P2 P3 P1 P5 H1)
- ##]
-nqed.
-
-nlemma symmetric_or5_15 : ∀P1,P2,P3,P4,P5:Prop.Or5 P1 P2 P3 P4 P5 → Or5 P5 P2 P3 P4 P1.
- #P1; #P2; #P3; #P4; #P5; #H;
- napply (or5_elim P1 P2 P3 P4 P5 ? H);
- ##[ ##1: #H1; napply (or5_intro5 P5 P2 P3 P4 P1 H1)
- ##| ##2: #H1; napply (or5_intro2 P5 P2 P3 P4 P1 H1)
- ##| ##3: #H1; napply (or5_intro3 P5 P2 P3 P4 P1 H1)
- ##| ##4: #H1; napply (or5_intro4 P5 P2 P3 P4 P1 H1)
- ##| ##5: #H1; napply (or5_intro1 P5 P2 P3 P4 P1 H1)
- ##]
-nqed.
-
-nlemma symmetric_or5_23 : ∀P1,P2,P3,P4,P5:Prop.Or5 P1 P2 P3 P4 P5 → Or5 P1 P3 P2 P4 P5.
- #P1; #P2; #P3; #P4; #P5; #H;
- napply (or5_elim P1 P2 P3 P4 P5 ? H);
- ##[ ##1: #H1; napply (or5_intro1 P1 P3 P2 P4 P5 H1)
- ##| ##2: #H1; napply (or5_intro3 P1 P3 P2 P4 P5 H1)
- ##| ##3: #H1; napply (or5_intro2 P1 P3 P2 P4 P5 H1)
- ##| ##4: #H1; napply (or5_intro4 P1 P3 P2 P4 P5 H1)
- ##| ##5: #H1; napply (or5_intro5 P1 P3 P2 P4 P5 H1)
- ##]
-nqed.
-
-nlemma symmetric_or5_24 : ∀P1,P2,P3,P4,P5:Prop.Or5 P1 P2 P3 P4 P5 → Or5 P1 P4 P3 P2 P5.
- #P1; #P2; #P3; #P4; #P5; #H;
- napply (or5_elim P1 P2 P3 P4 P5 ? H);
- ##[ ##1: #H1; napply (or5_intro1 P1 P4 P3 P2 P5 H1)
- ##| ##2: #H1; napply (or5_intro4 P1 P4 P3 P2 P5 H1)
- ##| ##3: #H1; napply (or5_intro3 P1 P4 P3 P2 P5 H1)
- ##| ##4: #H1; napply (or5_intro2 P1 P4 P3 P2 P5 H1)
- ##| ##5: #H1; napply (or5_intro5 P1 P4 P3 P2 P5 H1)
- ##]
-nqed.
-
-nlemma symmetric_or5_25 : ∀P1,P2,P3,P4,P5:Prop.Or5 P1 P2 P3 P4 P5 → Or5 P1 P5 P3 P4 P2.
- #P1; #P2; #P3; #P4; #P5; #H;
- napply (or5_elim P1 P2 P3 P4 P5 ? H);
- ##[ ##1: #H1; napply (or5_intro1 P1 P5 P3 P4 P2 H1)
- ##| ##2: #H1; napply (or5_intro5 P1 P5 P3 P4 P2 H1)
- ##| ##3: #H1; napply (or5_intro3 P1 P5 P3 P4 P2 H1)
- ##| ##4: #H1; napply (or5_intro4 P1 P5 P3 P4 P2 H1)
- ##| ##5: #H1; napply (or5_intro2 P1 P5 P3 P4 P2 H1)
- ##]
-nqed.
-
-nlemma symmetric_or5_34 : ∀P1,P2,P3,P4,P5:Prop.Or5 P1 P2 P3 P4 P5 → Or5 P1 P2 P4 P3 P5.
- #P1; #P2; #P3; #P4; #P5; #H;
- napply (or5_elim P1 P2 P3 P4 P5 ? H);
- ##[ ##1: #H1; napply (or5_intro1 P1 P2 P4 P3 P5 H1)
- ##| ##2: #H1; napply (or5_intro2 P1 P2 P4 P3 P5 H1)
- ##| ##3: #H1; napply (or5_intro4 P1 P2 P4 P3 P5 H1)
- ##| ##4: #H1; napply (or5_intro3 P1 P2 P4 P3 P5 H1)
- ##| ##5: #H1; napply (or5_intro5 P1 P2 P4 P3 P5 H1)
- ##]
-nqed.
-
-nlemma symmetric_or5_35 : ∀P1,P2,P3,P4,P5:Prop.Or5 P1 P2 P3 P4 P5 → Or5 P1 P2 P5 P4 P3.
- #P1; #P2; #P3; #P4; #P5; #H;
- napply (or5_elim P1 P2 P3 P4 P5 ? H);
- ##[ ##1: #H1; napply (or5_intro1 P1 P2 P5 P4 P3 H1)
- ##| ##2: #H1; napply (or5_intro2 P1 P2 P5 P4 P3 H1)
- ##| ##3: #H1; napply (or5_intro5 P1 P2 P5 P4 P3 H1)
- ##| ##4: #H1; napply (or5_intro4 P1 P2 P5 P4 P3 H1)
- ##| ##5: #H1; napply (or5_intro3 P1 P2 P5 P4 P3 H1)
- ##]
-nqed.
-
-nlemma symmetric_or5_45 : ∀P1,P2,P3,P4,P5:Prop.Or5 P1 P2 P3 P4 P5 → Or5 P1 P2 P3 P5 P4.
- #P1; #P2; #P3; #P4; #P5; #H;
- napply (or5_elim P1 P2 P3 P4 P5 ? H);
- ##[ ##1: #H1; napply (or5_intro1 P1 P2 P3 P5 P4 H1)
- ##| ##2: #H1; napply (or5_intro2 P1 P2 P3 P5 P4 H1)
- ##| ##3: #H1; napply (or5_intro3 P1 P2 P3 P5 P4 H1)
- ##| ##4: #H1; napply (or5_intro5 P1 P2 P3 P5 P4 H1)
- ##| ##5: #H1; napply (or5_intro4 P1 P2 P3 P5 P4 H1)
- ##]
-nqed.
-
-ninductive ex (A:Type) (Q:A → Prop) : Prop ≝
- ex_intro: ∀x:A.Q x → ex A Q.
-
-interpretation "exists" 'exists x = (ex ? x).
-
-ninductive ex2 (A:Type) (Q,R:A → Prop) : Prop ≝
- ex_intro2: ∀x:A.Q x → R x → ex2 A Q R.
-
-(* higher_order_defs/relations *)
-
-ndefinition relation : Type → Type ≝
-λA.A → A → Prop.
-
-ndefinition reflexive : ∀A:Type.∀R:relation A.Prop ≝
-λA.λR.∀x:A.R x x.
-
-ndefinition symmetric : ∀A:Type.∀R:relation A.Prop ≝
-λA.λR.∀x,y:A.R x y → R y x.
-
-ndefinition transitive : ∀A:Type.∀R:relation A.Prop ≝
-λA.λR.∀x,y,z:A.R x y → R y z → R x z.
-
-ndefinition irreflexive : ∀A:Type.∀R:relation A.Prop ≝
-λA.λR.∀x:A.¬ (R x x).
-
-ndefinition cotransitive : ∀A:Type.∀R:relation A.Prop ≝
-λA.λR.∀x,y:A.R x y → ∀z:A. R x z ∨ R z y.
-
-ndefinition tight_apart : ∀A:Type.∀eq,ap:relation A.Prop ≝
-λA.λeq,ap.∀x,y:A. (¬ (ap x y) → eq x y) ∧ (eq x y → ¬ (ap x y)).
-
-ndefinition antisymmetric : ∀A:Type.∀R:relation A.Prop ≝
-λA.λR.∀x,y:A.R x y → ¬ (R y x).
-
-(* logic/equality.ma *)
-
-ninductive eq (A:Type) (x:A) : A → Prop ≝
- refl_eq : eq A x x.
-
-ndefinition refl ≝ refl_eq.
-
-interpretation "leibnitz's equality" 'eq t x y = (eq t x y).
-
-interpretation "leibnitz's non-equality" 'neq t x y = (Not (eq t x y)).
-
-nlemma eq_f : ∀T1,T2:Type.∀x,y:T1.∀f:T1 → T2.x = y → (f x) = (f y).
- #T1; #T2; #x; #y; #f; #H;
- nrewrite < H;
- napply refl_eq.
-nqed.
-
-nlemma eq_f2 : ∀T1,T2,T3:Type.∀x1,y1:T1.∀x2,y2:T2.∀f:T1 → T2 → T3.x1 = y1 → x2 = y2 → f x1 x2 = f y1 y2.
- #T1; #T2; #T3; #x1; #y1; #x2; #y2; #f; #H1; #H2;
- nrewrite < H1;
- nrewrite < H2;
- napply refl_eq.
-nqed.
-
-nlemma neqf_to_neq : ∀T1,T2:Type.∀x,y:T1.∀f:T1 → T2.((f x) ≠ (f y)) → x ≠ y.
- #T1; #T2; #x; #y; #f;
- nnormalize; #H; #H1;
- napply (H (eq_f … H1)).
-nqed.
-
-nlemma symmetric_eq: ∀A:Type. symmetric A (eq A).
- #A;
- nnormalize;
- #x; #y; #H;
- nrewrite < H;
- napply refl_eq.
-nqed.
-
-nlemma eq_ind_r: ∀A:Type[0].∀x:A.∀P:A → Prop.P x → ∀y:A.y=x → P y.
- #A; #x; #P; #H; #y; #H1;
- nrewrite < (symmetric_eq … H1);
- napply H.
-nqed.
-
-ndefinition R0 ≝ λT:Type[0].λt:T.t.
-
-ndefinition R1 ≝ eq_rect_Type0.
-
-ndefinition R2 :
- ∀T0:Type[0].
- ∀a0:T0.
- ∀T1:∀x0:T0. a0=x0 → Type[0].
- ∀a1:T1 a0 (refl_eq ? a0).
- ∀T2:∀x0:T0. ∀p0:a0=x0. ∀x1:T1 x0 p0. R1 ?? T1 a1 ? p0 = x1 → Type[0].
- ∀a2:T2 a0 (refl_eq ? a0) a1 (refl_eq ? a1).
- ∀b0:T0.
- ∀e0:a0 = b0.
- ∀b1: T1 b0 e0.
- ∀e1:R1 ?? T1 a1 ? e0 = b1.
- T2 b0 e0 b1 e1.
- #T0;#a0;#T1;#a1;#T2;#a2;#b0;#e0;#b1;#e1;
- napply (eq_rect_Type0 ????? e1);
- napply (R1 ?? ? ?? e0);
- napply a2;
-nqed.
-
-ndefinition R3 :
- ∀T0:Type[0].
- ∀a0:T0.
- ∀T1:∀x0:T0. a0=x0 → Type[0].
- ∀a1:T1 a0 (refl_eq ? a0).
- ∀T2:∀x0:T0. ∀p0:a0=x0. ∀x1:T1 x0 p0. R1 ?? T1 a1 ? p0 = x1 → Type[0].
- ∀a2:T2 a0 (refl_eq ? a0) a1 (refl_eq ? a1).
- ∀T3:∀x0:T0. ∀p0:a0=x0. ∀x1:T1 x0 p0.∀p1:R1 ?? T1 a1 ? p0 = x1.
- ∀x2:T2 x0 p0 x1 p1.R2 ???? T2 a2 x0 p0 ? p1 = x2 → Type[0].
- ∀a3:T3 a0 (refl_eq ? a0) a1 (refl_eq ? a1) a2 (refl_eq ? a2).
- ∀b0:T0.
- ∀e0:a0 = b0.
- ∀b1: T1 b0 e0.
- ∀e1:R1 ?? T1 a1 ? e0 = b1.
- ∀b2: T2 b0 e0 b1 e1.
- ∀e2:R2 ???? T2 a2 b0 e0 ? e1 = b2.
- T3 b0 e0 b1 e1 b2 e2.
- #T0;#a0;#T1;#a1;#T2;#a2;#T3;#a3;#b0;#e0;#b1;#e1;#b2;#e2;
- napply (eq_rect_Type0 ????? e2);
- napply (R2 ?? ? ???? e0 ? e1);
- napply a3;
-nqed.
-
-ndefinition R4 :
- ∀T0:Type[0].
- ∀a0:T0.
- ∀T1:∀x0:T0. eq T0 a0 x0 → Type[0].
- ∀a1:T1 a0 (refl_eq T0 a0).
- ∀T2:∀x0:T0. ∀p0:eq (T0 …) a0 x0. ∀x1:T1 x0 p0.eq (T1 …) (R1 T0 a0 T1 a1 x0 p0) x1 → Type[0].
- ∀a2:T2 a0 (refl_eq T0 a0) a1 (refl_eq (T1 a0 (refl_eq T0 a0)) a1).
- ∀T3:∀x0:T0. ∀p0:eq (T0 …) a0 x0. ∀x1:T1 x0 p0.∀p1:eq (T1 …) (R1 T0 a0 T1 a1 x0 p0) x1.
- ∀x2:T2 x0 p0 x1 p1.eq (T2 …) (R2 T0 a0 T1 a1 T2 a2 x0 p0 x1 p1) x2 → Type[0].
- ∀a3:T3 a0 (refl_eq T0 a0) a1 (refl_eq (T1 a0 (refl_eq T0 a0)) a1)
- a2 (refl_eq (T2 a0 (refl_eq T0 a0) a1 (refl_eq (T1 a0 (refl_eq T0 a0)) a1)) a2).
- ∀T4:∀x0:T0. ∀p0:eq (T0 …) a0 x0. ∀x1:T1 x0 p0.∀p1:eq (T1 …) (R1 T0 a0 T1 a1 x0 p0) x1.
- ∀x2:T2 x0 p0 x1 p1.∀p2:eq (T2 …) (R2 T0 a0 T1 a1 T2 a2 x0 p0 x1 p1) x2.
- ∀x3:T3 x0 p0 x1 p1 x2 p2.∀p3:eq (T3 …) (R3 T0 a0 T1 a1 T2 a2 T3 a3 x0 p0 x1 p1 x2 p2) x3.
- Type[0].
- ∀a4:T4 a0 (refl_eq T0 a0) a1 (refl_eq (T1 a0 (refl_eq T0 a0)) a1)
- a2 (refl_eq (T2 a0 (refl_eq T0 a0) a1 (refl_eq (T1 a0 (refl_eq T0 a0)) a1)) a2)
- a3 (refl_eq (T3 a0 (refl_eq T0 a0) a1 (refl_eq (T1 a0 (refl_eq T0 a0)) a1)
- a2 (refl_eq (T2 a0 (refl_eq T0 a0) a1 (refl_eq (T1 a0 (refl_eq T0 a0)) a1)) a2))
- a3).
- ∀b0:T0.
- ∀e0:eq (T0 …) a0 b0.
- ∀b1: T1 b0 e0.
- ∀e1:eq (T1 …) (R1 T0 a0 T1 a1 b0 e0) b1.
- ∀b2: T2 b0 e0 b1 e1.
- ∀e2:eq (T2 …) (R2 T0 a0 T1 a1 T2 a2 b0 e0 b1 e1) b2.
- ∀b3: T3 b0 e0 b1 e1 b2 e2.
- ∀e3:eq (T3 …) (R3 T0 a0 T1 a1 T2 a2 T3 a3 b0 e0 b1 e1 b2 e2) b3.
- T4 b0 e0 b1 e1 b2 e2 b3 e3.
- #T0;#a0;#T1;#a1;#T2;#a2;#T3;#a3;#T4;#a4;#b0;#e0;#b1;#e1;#b2;#e2;#b3;#e3;
- napply (eq_rect_Type0 ????? e3);
- napply (R3 ????????? e0 ? e1 ? e2);
- napply a4;
-nqed.
-
-naxiom streicherK : ∀T:Type[0].∀t:T.∀P:t = t → Type[2].P (refl ? t) → ∀p.P p.
-
-nlemma symmetric_neq : ∀T:Type.∀x,y:T.x ≠ y → y ≠ x.
- #T; #x; #y;
- nnormalize;
- #H; #H1;
- nrewrite > H1 in H:(%); #H;
- napply (H (refl_eq …)).
-nqed.
-
-ndefinition relationT : Type → Type → Type ≝
-λA,T:Type.A → A → T.
-
-ndefinition symmetricT: ∀A,T:Type.∀R:relationT A T.Prop ≝
-λA,T.λR.∀x,y:A.R x y = R y x.
-
-ndefinition associative : ∀A:Type.∀R:relationT A A.Prop ≝
-λA.λR.∀x,y,z:A.R (R x y) z = R x (R y z).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "compiler/ast_base_type_base.ma".
-include "common/comp.ma".
-include "num/bool_lemmas.ma".
-
-(* ************************* *)
-(* dimensioni degli elementi *)
-(* ************************* *)
-
-ndefinition astbasetype_destruct_aux ≝
-Πb1,b2:ast_base_type.ΠP:Prop.b1 = b2 →
- match eq_astbasetype b1 b2 with [ true ⇒ P → P | false ⇒ P ].
-
-ndefinition astbasetype_destruct : astbasetype_destruct_aux.
- #b1; #b2; #P; #H;
- nrewrite < H;
- nelim b1;
- nnormalize;
- napply (λx.x).
-nqed.
-
-nlemma eq_to_eqastbasetype : ∀n1,n2.n1 = n2 → eq_astbasetype n1 n2 = true.
- #n1; #n2; #H;
- nrewrite > H;
- nelim n2;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma neqastbasetype_to_neq : ∀n1,n2.eq_astbasetype n1 n2 = false → n1 ≠ n2.
- #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_astbasetype n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqastbasetype n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-nlemma eqastbasetype_to_eq : ∀b1,b2.eq_astbasetype b1 b2 = true → b1 = b2.
- #b1; #b2; ncases b1; ncases b2; nnormalize;
- ##[ ##1,5,9: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
- ##]
-nqed.
-
-nlemma neq_to_neqastbasetype : ∀n1,n2.n1 ≠ n2 → eq_astbasetype n1 n2 = false.
- #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_astbasetype n1 n2));
- napply (not_to_not (eq_astbasetype n1 n2 = true) (n1 = n2) ? H);
- napply (eqastbasetype_to_eq n1 n2).
-nqed.
-
-nlemma decidable_astbasetype : ∀x,y:ast_base_type.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_astbasetype x y = true) (eq_astbasetype x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqastbasetype_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqastbasetype_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqastbasetype : symmetricT ast_base_type bool eq_astbasetype.
- #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_astbasetype n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqastbasetype n1 n2 H);
- napply (symmetric_eq ? (eq_astbasetype n2 n1) false);
- napply (neq_to_neqastbasetype n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
-
-nlemma astbasetype_is_comparable : comparable.
- @ ast_base_type
- ##[ napply AST_BASE_TYPE_BYTE8
- ##| napply forall_astbasetype
- ##| napply eq_astbasetype
- ##| napply eqastbasetype_to_eq
- ##| napply eq_to_eqastbasetype
- ##| napply neqastbasetype_to_neq
- ##| napply neq_to_neqastbasetype
- ##| napply decidable_astbasetype
- ##| napply symmetric_eqastbasetype
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr astbasetype_is_comparable ≡ ast_base_type.
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/bool.ma".
-
-(* ************************* *)
-(* dimensioni degli elementi *)
-(* ************************* *)
-
-(* usato per definire nell'ast *)
-ninductive ast_base_type : Type ≝
- AST_BASE_TYPE_BYTE8: ast_base_type
-| AST_BASE_TYPE_WORD16: ast_base_type
-| AST_BASE_TYPE_WORD32: ast_base_type.
-
-(* iteratore *)
-ndefinition forall_astbasetype ≝ λP.
- P AST_BASE_TYPE_BYTE8 ⊗
- P AST_BASE_TYPE_WORD16 ⊗
- P AST_BASE_TYPE_WORD32.
-
-ndefinition eq_astbasetype ≝
-λt1,t2:ast_base_type.match t1 with
- [ AST_BASE_TYPE_BYTE8 ⇒ match t2 with [ AST_BASE_TYPE_BYTE8 ⇒ true | _ ⇒ false ]
- | AST_BASE_TYPE_WORD16 ⇒ match t2 with [ AST_BASE_TYPE_WORD16 ⇒ true | _ ⇒ false ]
- | AST_BASE_TYPE_WORD32 ⇒ match t2 with [ AST_BASE_TYPE_WORD32 ⇒ true | _ ⇒ false ]
- ].
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "compiler/ast_type_base.ma".
-
-(* ************************* *)
-(* dimensioni degli elementi *)
-(* ************************* *)
-
-nlemma asttype_destruct_base_base : ∀b1,b2.AST_TYPE_BASE b1 = AST_TYPE_BASE b2 → b1 = b2.
- #b1; #b2; #H;
- nchange with (match AST_TYPE_BASE b2 with [ AST_TYPE_BASE a ⇒ b1 = a | _ ⇒ False ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma asttype_destruct_array_array_1 : ∀x1,x2,y1,y2.AST_TYPE_ARRAY x1 y1 = AST_TYPE_ARRAY x2 y2 → x1 = x2.
- #x1; #x2; #y1; #y2; #H;
- nchange with (match AST_TYPE_ARRAY x2 y2 with [ AST_TYPE_ARRAY a _ ⇒ x1 = a | _ ⇒ False ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma asttype_destruct_array_array_2 : ∀x1,x2,y1,y2.AST_TYPE_ARRAY x1 y1 = AST_TYPE_ARRAY x2 y2 → y1 = y2.
- #x1; #x2; #y1; #y2; #H;
- nchange with (match AST_TYPE_ARRAY x2 y2 with [ AST_TYPE_ARRAY _ b ⇒ y1 = b | _ ⇒ False ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma asttype_destruct_struct_struct : ∀b1,b2.AST_TYPE_STRUCT b1 = AST_TYPE_STRUCT b2 → b1 = b2.
- #b1; #b2; #H;
- nchange with (match AST_TYPE_STRUCT b2 with [ AST_TYPE_STRUCT a ⇒ b1 = a | _ ⇒ False ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-ndefinition asttype_destruct_aux ≝
-Πb1,b2:ast_type.ΠP:Prop.b1 = b2 →
- match eq_asttype b1 b2 with [ true ⇒ P → P | false ⇒ P ].
-
-ndefinition asttype_destruct : asttype_destruct_aux.
- #b1; #b2; #P; #H;
- nrewrite > H;
- napply (ast_type_index … b2);
- ##[ ##1: #e; nchange with (match eqc ? e e with [ true ⇒ P → P | false ⇒ P ]);
- nrewrite > (eq_to_eqc ? e e (refl_eq …));
- nnormalize; napply (λx.x);
- ##| ##2: #e; #n; #H; nchange with (match (eq_asttype e e)⊗(eqc ? n n) with [ true ⇒ P → P | false ⇒ P]);
- nrewrite > (eq_to_eqc ? n n (refl_eq …));
- nrewrite > (symmetric_andbool (eq_asttype e e) true);
- nchange with (match eq_asttype e e with [ true ⇒ P → P | false ⇒ P]);
- napply H;
- ##| ##3: #e; #H; nchange with (match eq_asttype e e with [ true ⇒ P → P | false ⇒ P]);
- napply H;
- ##| ##4: #hh; #tt; #H;
- nchange with (match bfold_right_neList2 ?? tt tt with [ true ⇒ P → P | false ⇒ P ] →
- match (eq_asttype hh hh)⊗(bfold_right_neList2 ?? tt tt) with [ true ⇒ P → P | false ⇒ P ]);
- #H1;
- ncases (eq_asttype hh hh) in H:(%) ⊢ %; #H;
- ncases (bfold_right_neList2 ? (λx1,x2.eq_asttype x1 x2) tt tt) in H1:(%) ⊢ %; #H1;
- ##[ ##1: nnormalize; napply (λx.x);
- ##| ##3: nnormalize in H:(%) ⊢ %; napply H
- ##| ##*: nnormalize in H1:(%) ⊢ %; napply H1
- ##]
- ##]
-nqed.
-
-nlemma eq_to_eqasttype_aux1
- : ∀nl1,nl2.
- ((eq_asttype (AST_TYPE_STRUCT nl1) (AST_TYPE_STRUCT nl2)) = true) →
- ((bfold_right_neList2 ? (λx,y.eq_asttype x y) nl1 nl2) = true).
- #nl1; #nl2; #H;
- napply H.
-nqed.
-
-nlemma eq_to_eqasttype : ∀t1,t2.t1 = t2 → eq_asttype t1 t2 = true.
- #t1;
- napply (ast_type_index … t1);
- ##[ ##1: #b1; #t2; ncases t2;
- ##[ ##1: #b2; #H; nrewrite > (asttype_destruct_base_base … H);
- nchange with ((eqc ? b2 b2) = true);
- nrewrite > (eq_to_eqc ? b2 b2 (refl_eq …));
- napply refl_eq
- ##| ##2: #st2; #n2; #H; ndestruct (*napply (asttype_destruct … H)*)
- ##| ##3: #nl2; #H; ndestruct (*napply (asttype_destruct … H)*)
- ##]
- ##| ##2: #st1; #n1; #H; #t2; ncases t2;
- ##[ ##2: #st2; #n2; #H1; nchange with (((eq_asttype st1 st2)⊗(eqc ? n1 n2)) = true);
- nrewrite > (H st2 (asttype_destruct_array_array_1 … H1));
- nrewrite > (eq_to_eqc ? n1 n2 (asttype_destruct_array_array_2 … H1));
- nnormalize;
- napply refl_eq
- ##| ##1: #b2; #H1; ndestruct (*napply (asttype_destruct … H1)*)
- ##| ##3: #nl2; #H1; ndestruct (*napply (asttype_destruct … H1)*)
- ##]
- ##| ##3: #hh1; #H; #t2; ncases t2;
- ##[ ##3: #nl2; ncases nl2;
- ##[ ##1: #hh2; #H1; nchange with ((eq_asttype hh1 hh2) = true);
- nrewrite > (H hh2 (nelist_destruct_nil_nil ? hh1 hh2 (asttype_destruct_struct_struct … H1)));
- napply refl_eq
- ##| ##2: #hh2; #ll2; #H1;
- (* !!! ndestruct non va *)
- nelim (nelist_destruct_nil_cons ? hh1 hh2 ll2 (asttype_destruct_struct_struct … H1))
- ##]
- ##| ##1: #b2; #H1; ndestruct (*napply (asttype_destruct … H1)*)
- ##| ##2: #st2; #n2; #H1; ndestruct (*napply (asttype_destruct … H1)*)
- ##]
- ##| ##4: #hh1; #ll1; #H; #H1; #t2; ncases t2;
- ##[ ##3: #nl2; ncases nl2;
- ##[ ##1: #hh2; #H2;
- (* !!! ndestruct non va *)
- nelim (nelist_destruct_cons_nil ? hh1 hh2 ll1 (asttype_destruct_struct_struct … H2))
- ##| ##2: #hh2; #ll2; #H2; nchange with (((eq_asttype hh1 hh2)⊗(bfold_right_neList2 ? (λx,y.eq_asttype x y) ll1 ll2)) = true);
- nrewrite > (H hh2 (nelist_destruct_cons_cons_1 … (asttype_destruct_struct_struct … H2)));
- nrewrite > (eq_to_eqasttype_aux1 ll1 ll2 (H1 (AST_TYPE_STRUCT ll2) ?));
- ##[ ##1: nnormalize; napply refl_eq
- ##| ##2: nrewrite > (nelist_destruct_cons_cons_2 … (asttype_destruct_struct_struct … H2));
- napply refl_eq
- ##]
- ##]
- ##| ##1: #b2; #H2; ndestruct (*napply (asttype_destruct … H2)*)
- ##| ##2: #st2; #n2; #H2; ndestruct (*napply (asttype_destruct … H2)*)
- ##]
- ##]
-nqed.
-
-nlemma neqasttype_to_neq : ∀n1,n2.eq_asttype n1 n2 = false → n1 ≠ n2.
- #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_asttype n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqasttype n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-nlemma eqasttype_to_eq : ∀t1,t2.eq_asttype t1 t2 = true → t1 = t2.
- #t1;
- napply (ast_type_index … t1);
- ##[ ##1: #b1; #t2; ncases t2;
- ##[ ##1: #b2; #H; nchange in H:(%) with ((eqc ? b1 b2) = true);
- nrewrite > (eqc_to_eq ? b1 b2 H);
- napply refl_eq
- ##| ##2: #st2; #n2; nnormalize; #H; ndestruct (*napply (bool_destruct … H)*)
- ##| ##3: #nl2; nnormalize; #H; ndestruct (*napply (bool_destruct … H)*)
- ##]
- ##| ##2: #st1; #n1; #H; #t2; ncases t2;
- ##[ ##2: #st2; #n2; #H1; nchange in H1:(%) with (((eq_asttype st1 st2)⊗(eqc ? n1 n2)) = true);
- nrewrite > (H st2 (andb_true_true_l … H1));
- nrewrite > (eqc_to_eq ? n1 n2 (andb_true_true_r … H1));
- napply refl_eq
- ##| ##1: #b2; nnormalize; #H1; ndestruct (*napply (bool_destruct … H1)*)
- ##| ##3: #nl2; nnormalize; #H1; ndestruct (*napply (bool_destruct … H1)*)
- ##]
- ##| ##3: #hh1; #H; #t2; ncases t2;
- ##[ ##3: #nl2; ncases nl2;
- ##[ ##1: #hh2; #H1; nchange in H1:(%) with ((eq_asttype hh1 hh2) = true);
- nrewrite > (H hh2 H1);
- napply refl_eq
- ##| ##2: #hh2; #ll2; nnormalize; #H1; ndestruct (*napply (bool_destruct … H1)*)
- ##]
- ##| ##1: #b2; nnormalize; #H1; ndestruct (*napply (bool_destruct … H1)*)
- ##| ##2: #st2; #n2; nnormalize; #H1; ndestruct (*napply (bool_destruct … H1)*)
- ##]
- ##| ##4: #hh1; #ll1; #H; #H1; #t2; ncases t2;
- ##[ ##3: #nl2; ncases nl2;
- ##[ ##1: #hh2; nnormalize; #H2; ndestruct (*napply (bool_destruct … H2)*)
- ##| ##2: #hh2; #ll2; #H2; nchange in H2:(%) with (((eq_asttype hh1 hh2)⊗(bfold_right_neList2 ? (λx,y.eq_asttype x y) ll1 ll2)) = true);
- nrewrite > (H hh2 (andb_true_true_l … H2));
- nrewrite > (asttype_destruct_struct_struct ll1 ll2 (H1 (AST_TYPE_STRUCT ll2) (andb_true_true_r … H2)));
- napply refl_eq
- ##]
- ##| ##1: #b2; nnormalize; #H2; ndestruct (*napply (bool_destruct … H2)*)
- ##| ##2: #st2; #n2; nnormalize; #H2; ndestruct (*napply (bool_destruct … H2)*)
- ##]
- ##]
-nqed.
-
-nlemma neq_to_neqasttype : ∀n1,n2.n1 ≠ n2 → eq_asttype n1 n2 = false.
- #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_asttype n1 n2));
- napply (not_to_not (eq_asttype n1 n2 = true) (n1 = n2) ? H);
- napply (eqasttype_to_eq n1 n2).
-nqed.
-
-nlemma decidable_asttype : ∀x,y:ast_type.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_asttype x y = true) (eq_asttype x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqasttype_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqasttype_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqasttype : symmetricT ast_type bool eq_asttype.
- #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_asttype n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqasttype n1 n2 H);
- napply (symmetric_eq ? (eq_asttype n2 n1) false);
- napply (neq_to_neqasttype n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
-
-nlemma isbastbasetype_to_isastbasetype : ∀ast.isb_ast_base_type ast = true → is_ast_base_type ast.
- #ast;
- ncases ast;
- nnormalize;
- ##[ ##1: #t; #H; napply I
- ##| ##2: #t; #n; #H; ndestruct (*napply (bool_destruct … H)*)
- ##| ##3: #t; #H; ndestruct (*napply (bool_destruct … H)*)
- ##]
-nqed.
-
-nlemma isntbastbasetype_to_isntastbasetype : ∀ast.isntb_ast_base_type ast = true → isnt_ast_base_type ast.
- #ast;
- ncases ast;
- nnormalize;
- ##[ ##1: #t; #H; ndestruct (*napply (bool_destruct … H)*)
- ##| ##2: #t; #n; #H; napply I
- ##| ##3: #l; #H; napply I
- ##]
-nqed.
-
-nlemma asttype_is_comparable : comparable.
- @ ast_type
- ##[ napply (AST_TYPE_BASE AST_BASE_TYPE_BYTE8)
- ##| napply (λx.false)
- ##| napply eq_asttype
- ##| napply eqasttype_to_eq
- ##| napply eq_to_eqasttype
- ##| napply neqasttype_to_neq
- ##| napply neq_to_neqasttype
- ##| napply decidable_asttype
- ##| napply symmetric_eqasttype
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr asttype_is_comparable ≡ ast_type.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "compiler/ast_base_type.ma".
-include "common/nelist.ma".
-
-(* ************************* *)
-(* dimensioni degli elementi *)
-(* ************************* *)
-
-ninductive ast_type : Type ≝
- AST_TYPE_BASE: ast_base_type → ast_type
-| AST_TYPE_ARRAY: ast_type → nat → ast_type
-| AST_TYPE_STRUCT: ne_list ast_type → ast_type.
-
-(* principio di eliminazione arricchito *)
-nlet rec ast_type_index_aux (P:ast_type → Prop)
- (f:Πt.P t → P (AST_TYPE_STRUCT (ne_nil ? t)))
- (f1:Πh,t.P h → P (AST_TYPE_STRUCT t) → P (AST_TYPE_STRUCT (ne_cons ? h t)))
- (f2:Πt.P t)
- (t:ne_list ast_type) on t ≝
- match t return λt.P (AST_TYPE_STRUCT t) with
- [ ne_nil h ⇒ f h (f2 h)
- | ne_cons h t ⇒ f1 h t (f2 h) (ast_type_index_aux P f f1 f2 t)
- ].
-
-nlet rec ast_type_index (P:ast_type → Prop)
- (f:Πb.P (AST_TYPE_BASE b))
- (f1:Πt,n.P t → P (AST_TYPE_ARRAY t n))
- (f2:Πt.P t → P (AST_TYPE_STRUCT (ne_nil ? t)))
- (f3:Πh,t.P h → P (AST_TYPE_STRUCT t) → P (AST_TYPE_STRUCT (ne_cons ? h t)))
- (t:ast_type) on t : P t ≝
- match t return λt.P t with
- [ AST_TYPE_BASE b ⇒ f b
- | AST_TYPE_ARRAY t' n ⇒ f1 t' n (ast_type_index P f f1 f2 f3 t')
- | AST_TYPE_STRUCT nl ⇒ match nl with
- [ ne_nil h ⇒ f2 h (ast_type_index P f f1 f2 f3 h)
- | ne_cons h t ⇒ f3 h t (ast_type_index P f f1 f2 f3 h) (ast_type_index_aux P f2 f3 (ast_type_index P f f1 f2 f3) t)
- ]
- ].
-
-nlet rec ast_type_rectex_aux (P:ast_type → Type)
- (f:Πt.P t → P (AST_TYPE_STRUCT (ne_nil ? t)))
- (f1:Πh,t.P h → P (AST_TYPE_STRUCT t) → P (AST_TYPE_STRUCT (ne_cons ? h t)))
- (f2:Πt.P t)
- (t:ne_list ast_type) on t ≝
- match t return λt.P (AST_TYPE_STRUCT t) with
- [ ne_nil h ⇒ f h (f2 h)
- | ne_cons h t ⇒ f1 h t (f2 h) (ast_type_rectex_aux P f f1 f2 t)
- ].
-
-nlet rec ast_type_rectex (P:ast_type → Type)
- (f:Πb.P (AST_TYPE_BASE b))
- (f1:Πt,n.P t → P (AST_TYPE_ARRAY t n))
- (f2:Πt.P t → P (AST_TYPE_STRUCT (ne_nil ? t)))
- (f3:Πh,t.P h → P (AST_TYPE_STRUCT t) → P (AST_TYPE_STRUCT (ne_cons ? h t)))
- (t:ast_type) on t : P t ≝
- match t return λt.P t with
- [ AST_TYPE_BASE b ⇒ f b
- | AST_TYPE_ARRAY t' n ⇒ f1 t' n (ast_type_rectex P f f1 f2 f3 t')
- | AST_TYPE_STRUCT nl ⇒ match nl with
- [ ne_nil h ⇒ f2 h (ast_type_rectex P f f1 f2 f3 h)
- | ne_cons h t ⇒ f3 h t (ast_type_rectex P f f1 f2 f3 h) (ast_type_rectex_aux P f2 f3 (ast_type_rectex P f f1 f2 f3) t)
- ]
- ].
-
-nlet rec eq_asttype (t1,t2:ast_type) on t1 ≝
- match t1 with
- [ AST_TYPE_BASE bType1 ⇒ match t2 with
- [ AST_TYPE_BASE bType2 ⇒ eqc ? bType1 bType2
- | _ ⇒ false ]
- | AST_TYPE_ARRAY subType1 dim1 ⇒ match t2 with
- [ AST_TYPE_ARRAY subType2 dim2 ⇒ (eq_asttype subType1 subType2) ⊗ (eqc ? dim1 dim2)
- | _ ⇒ false ]
- | AST_TYPE_STRUCT nelSubType1 ⇒ match t2 with
- [ AST_TYPE_STRUCT nelSubType2 ⇒ bfold_right_neList2 ? (λx1,x2.eq_asttype x1 x2) nelSubType1 nelSubType2
- | _ ⇒ false
- ]
- ].
-
-ndefinition is_ast_base_type ≝
-λast:ast_type.match ast with [ AST_TYPE_BASE _ ⇒ True | _ ⇒ False ].
-
-ndefinition isb_ast_base_type ≝
-λast:ast_type.match ast with [ AST_TYPE_BASE _ ⇒ true | _ ⇒ false ].
-
-ndefinition isnt_ast_base_type ≝
-λast:ast_type.match ast with [ AST_TYPE_BASE _ ⇒ False | _ ⇒ True ].
-
-ndefinition isntb_ast_base_type ≝
-λast:ast_type.match ast with [ AST_TYPE_BASE _ ⇒ false | _ ⇒ true ].
-
-ndefinition eval_size_base_type ≝
-λast:ast_base_type.match ast with
- [ AST_BASE_TYPE_BYTE8 ⇒ nat1
- | AST_BASE_TYPE_WORD16 ⇒ nat2
- | AST_BASE_TYPE_WORD32 ⇒ nat4
- ].
-
-nlet rec eval_size_type (ast:ast_type) on ast ≝
- match ast with
- [ AST_TYPE_BASE b ⇒ eval_size_base_type b
- | AST_TYPE_ARRAY sub_ast dim ⇒ (dim + nat1)*(eval_size_type sub_ast)
- | AST_TYPE_STRUCT nel_ast ⇒ fold_right_neList … (λt,x.(eval_size_type t)+x) O nel_ast
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/string.ma".
-include "compiler/ast_type.ma".
-
-(* ***************** *)
-(* GESTIONE AMBIENTE *)
-(* ***************** *)
-
-(* elemento: name + const + type *)
-nrecord envDsc : Type ≝
- {
- nameDsc: aux_str_type;
- constDsc: bool;
- typeDsc: ast_type
- }.
-
-(* ambiente globale: (ambiente base + ambienti annidati) *)
-ninductive env_list : nat → Type ≝
- env_nil: list envDsc → env_list O
-| env_cons: ∀n.list envDsc → env_list n → env_list (S n).
-
-ndefinition defined_envList ≝
-λd.λl:env_list d.match l with [ env_nil _ ⇒ False | env_cons _ _ _ ⇒ True ].
-
-(* bisogna bypassare la carenza di inversion *)
-nlemma defined_envList_S : ∀d.∀l:env_list (S d).defined_envList (S d) l.
- #d; #l;
- ngeneralize in match (refl_eq ? (S d));
- ncases l in ⊢ (? ? % ? → %);
- ##[ ##1: #dsc; #H; ndestruct (*nelim (nat_destruct_0_S … H)*)
- ##| ##2: #n; #dsc; #sub; #H;
- nnormalize;
- napply I
- ##]
-nqed.
-
-ndefinition cut_first_envList_aux : Πd.env_list (S d) → env_list d ≝
-λd.λl:env_list (S d).
- match l
- return λX.λY:env_list X.defined_envList X Y → env_list (pred X)
- with
- [ env_nil h ⇒ λp:defined_envList O (env_nil h).False_rect_Type0 ? p
- | env_cons n h t ⇒ λp:defined_envList (S n) (env_cons n h t).t
- ] (defined_envList_S d l).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/string.ma".
-include "compiler/ast_type.ma".
-include "num/word32.ma".
-
-(* ****************** *)
-(* PREALBERO DI TOKEN *)
-(* ****************** *)
-
-(* espressioni *)
-ninductive preast_expr : Type ≝
- PREAST_EXPR_BYTE8 : byte8 → preast_expr
-| PREAST_EXPR_WORD16: word16 → preast_expr
-| PREAST_EXPR_WORD32: word32 → preast_expr
-
-| PREAST_EXPR_NEG: preast_expr → preast_expr
-| PREAST_EXPR_NOT: preast_expr → preast_expr
-| PREAST_EXPR_COM: preast_expr → preast_expr
-
-| PREAST_EXPR_ADD: preast_expr → preast_expr → preast_expr
-| PREAST_EXPR_SUB: preast_expr → preast_expr → preast_expr
-| PREAST_EXPR_MUL: preast_expr → preast_expr → preast_expr
-| PREAST_EXPR_DIV: preast_expr → preast_expr → preast_expr
-| PREAST_EXPR_SHR: preast_expr → preast_expr → preast_expr
-| PREAST_EXPR_SHL: preast_expr → preast_expr → preast_expr
-| PREAST_EXPR_AND: preast_expr → preast_expr → preast_expr
-| PREAST_EXPR_OR: preast_expr → preast_expr → preast_expr
-| PREAST_EXPR_XOR: preast_expr → preast_expr → preast_expr
-
-| PREAST_EXPR_GT : preast_expr → preast_expr → preast_expr
-| PREAST_EXPR_GTE: preast_expr → preast_expr → preast_expr
-| PREAST_EXPR_LT : preast_expr → preast_expr → preast_expr
-| PREAST_EXPR_LTE: preast_expr → preast_expr → preast_expr
-| PREAST_EXPR_EQ : preast_expr → preast_expr → preast_expr
-| PREAST_EXPR_NEQ: preast_expr → preast_expr → preast_expr
-
-| PREAST_EXPR_B8toW16 : preast_expr → preast_expr
-| PREAST_EXPR_B8toW32 : preast_expr → preast_expr
-| PREAST_EXPR_W16toB8 : preast_expr → preast_expr
-| PREAST_EXPR_W16toW32: preast_expr → preast_expr
-| PREAST_EXPR_W32toB8 : preast_expr → preast_expr
-| PREAST_EXPR_W32toW16: preast_expr → preast_expr
-
-| PREAST_EXPR_ID: preast_var → preast_expr
-
-(* variabile: modificatori di array/struct dell'id *)
-with preast_var : Type ≝
- PREAST_VAR_ID: aux_str_type → preast_var
-| PREAST_VAR_ARRAY: preast_var → preast_expr → preast_var
-| PREAST_VAR_STRUCT: preast_var → nat → preast_var.
-
-(* -------------------------- *)
-
-(* inizializzatori: ... valori ... *)
-ninductive preast_init_val : Type ≝
- PREAST_INIT_VAL_BYTE8: byte8 → preast_init_val
-| PREAST_INIT_VAL_WORD16: word16 → preast_init_val
-| PREAST_INIT_VAL_WORD32: word32 → preast_init_val
-| PREAST_INIT_VAL_ARRAY: ne_list preast_init_val → preast_init_val
-| PREAST_INIT_VAL_STRUCT: ne_list preast_init_val → preast_init_val.
-
-(*
- inizializzatori: ammesse solo due forme, no ibridi
- 1) var1 = var2
- 2) var = ... valori ...
-*)
-ninductive preast_init : Type ≝
- PREAST_INIT_VAR: preast_var → preast_init
-| PREAST_INIT_VAL: preast_init_val → preast_init.
-
-(* -------------------------- *)
-
-(* statement: assegnamento/while/if else if else *)
-ninductive preast_stm : Type ≝
- PREAST_STM_ASG: preast_var → preast_expr → preast_stm
-| PREAST_STM_WHILE: preast_expr → preast_decl → preast_stm
-| PREAST_STM_IF: ne_list (ProdT preast_expr preast_decl) → option preast_decl → preast_stm
-
-(* dichiarazioni *)
-with preast_decl : Type ≝
- PREAST_NO_DECL: list preast_stm → preast_decl
-| PREAST_CONST_DECL: aux_str_type → ast_type → preast_init → preast_decl → preast_decl
-| PREAST_VAR_DECL: aux_str_type → ast_type → option preast_init → preast_decl → preast_decl.
-
-(* -------------------------- *)
-
-(* programma *)
-ninductive preast_root : Type ≝
- PREAST_ROOT: preast_decl → preast_root.
-
-(* -------------------------- *)
-
-(* programma vuoto *)
-ndefinition empty_preast_prog ≝ PREAST_ROOT (PREAST_NO_DECL (nil ?)).
+++ /dev/null
-emulator/model/HCS08_model.ma emulator/status/status.ma
-emulator/status/status_base.ma emulator/memory/memory_abs.ma emulator/opcodes/pseudo.ma emulator/status/HC05_status.ma emulator/status/HC08_status.ma emulator/status/IP2022_status.ma emulator/status/RS08_status.ma
-emulator/tests/micro_tests_tools.ma common/list.ma num/word16.ma
-common/nelist.ma common/list.ma
-emulator/opcodes/HC05_table_tests.ma emulator/opcodes/HC05_table.ma emulator/opcodes/pseudo.ma
-emulator/opcodes/IP2022_instr_mode_base.ma num/bitrigesim.ma num/oct.ma
-num/bool.ma common/theory.ma
-compiler/preast_tree.ma common/string.ma compiler/ast_type.ma num/word32.ma
-emulator/status/HC08_status.ma emulator/status/HC08_status_base.ma
-compiler/ast_base_type_base.ma num/bool.ma
-common/nat.ma common/comp.ma num/bool_lemmas.ma
-emulator/opcodes/IP2022_pseudo.ma common/comp.ma emulator/opcodes/IP2022_pseudo_base.ma num/bool_lemmas.ma
-emulator/read_write/load_write.ma emulator/read_write/Freescale_load_write.ma emulator/read_write/IP2022_load_write.ma
-num/exadecim.ma num/bool_lemmas.ma num/comp_ext.ma num/oct.ma
-emulator/memory/memory_struct_base.ma num/byte8.ma
-emulator/status/status.ma emulator/status/status_base.ma
-num/byte8.ma num/bitrigesim.ma num/comp_num.ma num/exadecim.ma
-emulator/model/model.ma emulator/model/HC05_model.ma emulator/model/HC08_model.ma emulator/model/HCS08_model.ma emulator/model/IP2022_model.ma emulator/model/RS08_model.ma
-emulator/opcodes/HC08_table.ma common/list.ma emulator/opcodes/Freescale_instr_mode.ma emulator/opcodes/Freescale_pseudo.ma emulator/opcodes/byte_or_word.ma
-emulator/memory/memory_base.ma common/comp.ma num/bool_lemmas.ma
-emulator/multivm/multivm.ma emulator/multivm/Freescale_multivm.ma emulator/multivm/IP2022_multivm.ma emulator/read_write/fetch.ma
-emulator/opcodes/HC05_table.ma common/list.ma emulator/opcodes/Freescale_instr_mode.ma emulator/opcodes/Freescale_pseudo.ma emulator/opcodes/byte_or_word.ma
-emulator/status/HC08_status_base.ma num/word16.ma
-common/comp.ma common/hints_declaration.ma num/bool.ma
-emulator/read_write/Freescale_fetch.ma emulator/read_write/fetch_base.ma emulator/status/status.ma
-emulator/memory/memory_trees.ma common/list.ma emulator/memory/memory_base.ma emulator/memory/memory_struct.ma num/word32.ma
-emulator/opcodes/Freescale_pseudo.ma common/comp.ma emulator/opcodes/Freescale_pseudo_base.ma num/bool_lemmas.ma
-common/pts.ma
-emulator/status/HC05_status_base.ma num/word16.ma
-num/comp_ext.ma common/comp.ma common/prod.ma
-common/ascii_base.ma num/bool.ma
-emulator/multivm/IP2022_multivm.ma emulator/multivm/multivm_base.ma emulator/read_write/load_write.ma
-emulator/read_write/IP2022_fetch.ma emulator/read_write/fetch_base.ma emulator/status/status.ma
-emulator/opcodes/RS08_table_tests.ma emulator/opcodes/RS08_table.ma emulator/opcodes/pseudo.ma
-emulator/multivm/multivm_base.ma emulator/status/status_setter.ma
-compiler/environment.ma common/string.ma compiler/ast_type.ma
-emulator/read_write/IP2022_read_write.ma emulator/read_write/read_write_base.ma emulator/status/status_setter.ma
-emulator/translation/translation_base.ma common/option.ma emulator/opcodes/HC05_table.ma emulator/opcodes/HC08_table.ma emulator/opcodes/HCS08_table.ma emulator/opcodes/IP2022_table.ma emulator/opcodes/RS08_table.ma emulator/opcodes/pseudo.ma
-compiler/ast_base_type.ma common/comp.ma compiler/ast_base_type_base.ma num/bool_lemmas.ma
-emulator/opcodes/IP2022_table.ma common/list.ma emulator/opcodes/IP2022_instr_mode.ma emulator/opcodes/IP2022_pseudo.ma emulator/opcodes/byte_or_word.ma
-emulator/status/HC05_status.ma emulator/status/HC05_status_base.ma
-emulator/memory/memory_bits.ma emulator/memory/memory_trees.ma
-common/theory.ma common/pts.ma
-common/string.ma common/ascii.ma common/list.ma
-emulator/read_write/RS08_read_write.ma emulator/status/status_setter.ma
-emulator/opcodes/byte_or_word.ma num/word16.ma
-compiler/ast_type.ma compiler/ast_type_base.ma
-num/word16.ma common/nat.ma num/byte8.ma
-common/prod.ma common/comp.ma common/prod_base.ma num/bool_lemmas.ma
-emulator/opcodes/IP2022_instr_mode.ma emulator/opcodes/IP2022_instr_mode_base.ma
-emulator/status/status_getter.ma emulator/status/status_setter.ma
-num/word24.ma num/byte8.ma
-num/bool_lemmas.ma common/comp.ma num/bool.ma
-emulator/model/HC08_model.ma emulator/status/status.ma
-emulator/memory/memory_abs.ma emulator/memory/memory_bits.ma emulator/memory/memory_func.ma emulator/memory/memory_trees.ma
-emulator/status/IP2022_status_base.ma emulator/memory/memory_struct.ma num/word16.ma num/word24.ma
-emulator/read_write/Freescale_load_write.ma emulator/read_write/load_write_base.ma emulator/status/status_getter.ma
-emulator/memory/memory_struct.ma emulator/memory/memory_struct_base.ma
-emulator/model/HC05_model.ma emulator/status/status.ma
-emulator/status/status_setter.ma emulator/status/status.ma
-num/word32.ma num/word16.ma
-common/ascii.ma common/ascii_base.ma common/comp.ma num/bool_lemmas.ma
-emulator/read_write/load_write_base.ma emulator/read_write/read_write.ma
-emulator/model/IP2022_model.ma emulator/status/status.ma
-emulator/opcodes/HCS08_table_tests.ma emulator/opcodes/HCS08_table.ma emulator/opcodes/pseudo.ma
-emulator/opcodes/IP2022_table_tests.ma emulator/opcodes/IP2022_table.ma emulator/opcodes/pseudo.ma
-emulator/status/IP2022_status.ma emulator/status/IP2022_status_base.ma
-emulator/translation/Freescale_translation.ma emulator/translation/translation_base.ma
-emulator/read_write/read_write.ma emulator/read_write/IP2022_read_write.ma emulator/read_write/RS08_read_write.ma
-emulator/memory/memory_func.ma common/list.ma emulator/memory/memory_base.ma num/word16.ma
-emulator/opcodes/Freescale_instr_mode.ma common/comp.ma emulator/opcodes/Freescale_instr_mode_base.ma num/bool_lemmas.ma
-emulator/status/RS08_status_base.ma num/word16.ma
-emulator/read_write/read_write_base.ma common/theory.ma
-emulator/status/RS08_status.ma emulator/status/RS08_status_base.ma
-compiler/ast_type_base.ma common/nelist.ma compiler/ast_base_type.ma
-common/prod_base.ma num/bool.ma
-common/option_base.ma num/bool.ma
-common/option.ma common/comp.ma common/option_base.ma num/bool_lemmas.ma
-emulator/multivm/Freescale_multivm.ma emulator/multivm/multivm_base.ma emulator/read_write/load_write.ma
-emulator/opcodes/RS08_table.ma common/list.ma emulator/opcodes/Freescale_instr_mode.ma emulator/opcodes/Freescale_pseudo.ma emulator/opcodes/byte_or_word.ma
-emulator/model/RS08_model.ma emulator/status/status.ma
-num/comp_num.ma num/bool_lemmas.ma num/comp_ext.ma
-emulator/read_write/fetch_base.ma emulator/translation/translation.ma
-common/sigma.ma common/theory.ma
-emulator/opcodes/HCS08_table.ma common/list.ma emulator/opcodes/Freescale_instr_mode.ma emulator/opcodes/Freescale_pseudo.ma emulator/opcodes/byte_or_word.ma
-emulator/read_write/IP2022_load_write.ma emulator/read_write/IP2022_fetch.ma emulator/read_write/load_write_base.ma emulator/status/status_getter.ma
-emulator/translation/IP2022_translation.ma emulator/translation/translation_base.ma
-universe/universe.ma common/nelist.ma common/prod.ma
-num/bitrigesim.ma common/comp.ma num/bool_lemmas.ma
-common/hints_declaration.ma common/pts.ma
-emulator/opcodes/pseudo.ma common/list.ma emulator/opcodes/Freescale_instr_mode.ma emulator/opcodes/Freescale_pseudo.ma emulator/opcodes/IP2022_instr_mode.ma emulator/opcodes/IP2022_pseudo.ma emulator/opcodes/byte_or_word.ma
-emulator/opcodes/Freescale_pseudo_base.ma num/bool.ma
-emulator/translation/translation.ma emulator/translation/Freescale_translation.ma emulator/translation/IP2022_translation.ma
-emulator/read_write/fetch.ma emulator/read_write/Freescale_fetch.ma emulator/read_write/IP2022_fetch.ma emulator/status/status_getter.ma
-num/oct.ma common/comp.ma num/bool_lemmas.ma
-common/list.ma common/comp.ma common/nat.ma common/option.ma
-emulator/opcodes/IP2022_pseudo_base.ma num/bool.ma
-emulator/opcodes/Freescale_instr_mode_base.ma num/bitrigesim.ma num/exadecim.ma
-emulator/opcodes/HC08_table_tests.ma emulator/opcodes/HC08_table.ma emulator/opcodes/pseudo.ma
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/memory/memory_func.ma".
-include "emulator/memory/memory_trees.ma".
-include "emulator/memory/memory_bits.ma".
-
-(* ********************************************* *)
-(* ASTRAZIONE DALL'IMPLEMENTAZIONE DELLA MEMORIA *)
-(* ********************************************* *)
-
-(* se si disattiva l'implementazione a funzione
- la memoria diventa un'oggetto confrontabile! *)
-
-(* tipi di implementazione della memoria *)
-ninductive memory_impl : Type ≝
- (*MEM_FUNC: memory_impl
-|*) MEM_TREE: memory_impl
-| MEM_BITS: memory_impl.
-
-(* ausiliario per il tipo della memoria *)
-ndefinition aux_mem_type ≝
-λt:memory_impl.match t with
- [ (*MEM_FUNC ⇒ oct → word16 → byte8
- |*) MEM_TREE ⇒ aux_20B_type byte8
- | MEM_BITS ⇒ aux_20B_type (Array8T bool)
- ].
-
-(* ausiliario per il tipo del checker *)
-ndefinition aux_chk_type ≝
-λt:memory_impl.match t with
- [ (*MEM_FUNC ⇒ oct → word16 → memory_type
- |*) MEM_TREE ⇒ aux_20B_type memory_type
- | MEM_BITS ⇒ aux_20B_type (Array8T memory_type)
- ].
-
-(* unificazione di out_of_bound_memory *)
-ndefinition out_of_bound_memory ≝
-λt:memory_impl.
- match t
- return λt.aux_chk_type t
- with
- [ (*MEM_FUNC ⇒ mf_out_of_bound_memory
- |*) MEM_TREE ⇒ mt_out_of_bound_memory
- | MEM_BITS ⇒ mb_out_of_bound_memory
- ].
-
-(* unificazione di zero_memory *)
-ndefinition zero_memory ≝
-λt:memory_impl.
- match t
- return λt.aux_mem_type t
- with
- [ (*MEM_FUNC ⇒ mf_zero_memory
- |*) MEM_TREE ⇒ mt_zero_memory
- | MEM_BITS ⇒ mb_zero_memory
- ].
-
-(* unificazione della lettura senza chk: mem_read_abs mem addr *)
-ndefinition mem_read_abs ≝
-λt:memory_impl.
- match t
- return λt.aux_mem_type t → oct → word16 → byte8
- with
- [ (*MEM_FUNC ⇒ λm:aux_mem_type MEM_FUNC.
- m
- |*) MEM_TREE ⇒ λm:aux_mem_type MEM_TREE.
- mt_visit ? m
- | MEM_BITS ⇒ λm:aux_mem_type MEM_BITS.
- λsel:oct.λaddr:word16.
- byte8_of_bits (mt_visit ? m sel addr)
- ].
-
-(* unificazione del chk *)
-ndefinition chk_get ≝
-λt:memory_impl.
- match t
- return λt.aux_chk_type t → oct → word16 → Array8T memory_type
- with
- [ (*MEM_FUNC ⇒ λc:aux_chk_type MEM_FUNC.λsel:oct.λaddr:word16.
- match c sel addr with
- [ MEM_READ_ONLY ⇒ mk_Array8T ? MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY
- | MEM_READ_WRITE ⇒ mk_Array8T ? MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE
- | MEM_OUT_OF_BOUND ⇒ mk_Array8T ? MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND
- ]
- |*) MEM_TREE ⇒ λc:aux_chk_type MEM_TREE.λsel:oct.λaddr:word16.
- match mt_visit ? c sel addr with
- [ MEM_READ_ONLY ⇒ mk_Array8T ? MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY MEM_READ_ONLY
- | MEM_READ_WRITE ⇒ mk_Array8T ? MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE MEM_READ_WRITE
- | MEM_OUT_OF_BOUND ⇒ mk_Array8T ? MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND
- ]
- | MEM_BITS ⇒ mt_visit ?
- ].
-
-(* unificazione della lettura con chk: mem_read mem chk addr *)
-ndefinition mem_read ≝
-λt:memory_impl.
- match t
- return λt.aux_mem_type t → aux_chk_type t → oct → word16 → option byte8
- with
- [ (*MEM_FUNC ⇒ mf_mem_read
- |*) MEM_TREE ⇒ mt_mem_read
- | MEM_BITS ⇒ mb_mem_read
- ].
-
-(* unificazione della lettura di bit con chk: mem_read mem chk addr sub *)
-ndefinition mem_read_bit ≝
-λt:memory_impl.
- match t
- return λt.aux_mem_type t → aux_chk_type t → oct → word16 → oct → option bool
- with
- [ (*MEM_FUNC ⇒ λm:aux_mem_type MEM_FUNC.
- λc:aux_chk_type MEM_FUNC.
- λsel:oct.λaddr:word16.
- λo:oct.
- opt_map … (mf_mem_read m c sel addr)
- (λb.Some ? (getn_array8T o bool (bits_of_byte8 b)))
- |*) MEM_TREE ⇒ λm:aux_mem_type MEM_TREE.
- λc:aux_chk_type MEM_TREE.
- λsel:oct.λaddr:word16.
- λo:oct.
- opt_map … (mt_mem_read m c sel addr)
- (λb.Some ? (getn_array8T o bool (bits_of_byte8 b)))
- | MEM_BITS ⇒ mb_mem_read_bit
- ].
-
-(* unificazione della scrittura con chk: mem_update mem chk addr val *)
-ndefinition mem_update ≝
-λt:memory_impl.
- match t
- return λt.aux_mem_type t → aux_chk_type t → oct → word16 → byte8 → option (aux_mem_type t)
- with
- [ (*MEM_FUNC ⇒ mf_mem_update
- |*) MEM_TREE ⇒ mt_mem_update
- | MEM_BITS ⇒ mb_mem_update
- ].
-
-(* unificazione della scrittura di bit con chk: mem_update mem chk addr sub val *)
-ndefinition mem_update_bit ≝
-λt:memory_impl.
- match t
- return λt.aux_mem_type t → aux_chk_type t → oct → word16 → oct → bool → option (aux_mem_type t)
- with
- [ (*MEM_FUNC ⇒ λm:aux_mem_type MEM_FUNC.
- λc:aux_chk_type MEM_FUNC.
- λsel:oct.λaddr:word16.
- λo:oct.
- λv:bool.
- mf_mem_update m c sel addr (byte8_of_bits (setn_array8T o bool (bits_of_byte8 (m addr)) v))
- |*) MEM_TREE ⇒ λm:aux_mem_type MEM_TREE.
- λc:aux_chk_type MEM_TREE.
- λsel:oct.λaddr:word16.
- λo:oct.
- λv:bool.
- mt_mem_update m c sel addr (byte8_of_bits (setn_array8T o bool (bits_of_byte8 (mt_visit ? m sel addr)) v))
- | MEM_BITS ⇒ mb_mem_update_bit
- ].
-
-(* unificazione del caricamento: load_from_source_at old_mem source addr *)
-ndefinition load_from_source_at ≝
-λt:memory_impl.
- match t
- return λt.aux_mem_type t → list byte8 → oct → word16 → aux_mem_type t
- with
- [ (*MEM_FUNC ⇒ mf_load_from_source_at
- |*) MEM_TREE ⇒ mt_load_from_source_at
- | MEM_BITS ⇒ mb_load_from_source_at
- ].
-
-(* unificazione dell'impostazione della memoria: chk_update_ranged chk inf sup v *)
-ndefinition check_update_ranged ≝
-λt:memory_impl.
- match t
- return λt.aux_chk_type t → oct → word16 → word16 → memory_type → aux_chk_type t
- with
- [ (*MEM_FUNC ⇒ mf_check_update_ranged
- |*) MEM_TREE ⇒ λc:aux_chk_type MEM_TREE.
- λsel:oct.λaddr:word16.
- λrange:word16.
- mt_update_ranged ? c sel addr ? (w16_to_recw16 range)
- | MEM_BITS ⇒ λc:aux_chk_type MEM_BITS.
- λsel:oct.λaddr:word16.
- λrange:word16.
- λv:memory_type.
- mt_update_ranged ? c sel addr ? (w16_to_recw16 range) (mk_Array8T ? v v v v v v v v)
- ].
-
-(* unificazione dell'impostazione dei bit: chk_update_bit chk addr sub v *)
-(* NB: dove non esiste la granularita' del bit, lascio inalterato *)
-ndefinition check_update_bit ≝
-λt:memory_impl.
- match t
- return λt.aux_chk_type t → oct → word16 → oct → memory_type → aux_chk_type t
- with
- [ (*MEM_FUNC ⇒ λc:aux_chk_type MEM_FUNC.
- λsel:oct.λaddr:word16.
- λo:oct.
- λv:memory_type.
- c
- |*) MEM_TREE ⇒ λc:aux_chk_type MEM_TREE.
- λsel:oct.λaddr:word16.
- λo:oct.
- λv:memory_type.
- c
- | MEM_BITS ⇒ mb_chk_update_bit
- ].
-
-ndefinition mem_is_comparable: memory_impl → comparable.
- #m; @ (aux_mem_type m)
- ##[ nelim m;
- ##[ napply mt_zero_memory
- ##| napply mb_zero_memory ##]
- ##| nelim m;
- ##[ napply (forallc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable byte8_is_comparable))))))
- ##| napply (forallc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar8_is_comparable bool_is_comparable))))))) ##]
- ##| nelim m;
- ##[ napply (eqc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable byte8_is_comparable))))))
- ##| napply (eqc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar8_is_comparable bool_is_comparable))))))) ##]
- ##| nelim m;
- ##[ napply (eqc_to_eq (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable byte8_is_comparable))))))
- ##| napply (eqc_to_eq (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar8_is_comparable bool_is_comparable))))))) ##]
- ##| nelim m;
- ##[ napply (eq_to_eqc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable byte8_is_comparable))))))
- ##| napply (eq_to_eqc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar8_is_comparable bool_is_comparable))))))) ##]
- ##| nelim m;
- ##[ napply (neqc_to_neq (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable byte8_is_comparable))))))
- ##| napply (neqc_to_neq (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar8_is_comparable bool_is_comparable))))))) ##]
- ##| nelim m;
- ##[ napply (neq_to_neqc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable byte8_is_comparable))))))
- ##| napply (neq_to_neqc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar8_is_comparable bool_is_comparable))))))) ##]
- ##| nelim m;
- ##[ napply (decidable_c (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable byte8_is_comparable))))))
- ##| napply (decidable_c (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar8_is_comparable bool_is_comparable))))))) ##]
- ##| nelim m;
- ##[ napply (symmetric_eqc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable byte8_is_comparable))))))
- ##| napply (symmetric_eqc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar8_is_comparable bool_is_comparable))))))) ##]
- ##]
-nqed.
-
-unification hint 0 ≔ M:memory_impl ⊢ carr (mem_is_comparable M) ≡ aux_mem_type M.
-
-ndefinition chk_is_comparable: memory_impl → comparable.
- #m; @ (aux_chk_type m)
- ##[ nelim m;
- ##[ napply mt_out_of_bound_memory
- ##| napply mb_out_of_bound_memory ##]
- ##| nelim m;
- ##[ napply (forallc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable memorytype_is_comparable))))))
- ##| napply (forallc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar8_is_comparable memorytype_is_comparable))))))) ##]
- ##| nelim m;
- ##[ napply (eqc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable memorytype_is_comparable))))))
- ##| napply (eqc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar8_is_comparable memorytype_is_comparable))))))) ##]
- ##| nelim m;
- ##[ napply (eqc_to_eq (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable memorytype_is_comparable))))))
- ##| napply (eqc_to_eq (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar8_is_comparable memorytype_is_comparable))))))) ##]
- ##| nelim m;
- ##[ napply (eq_to_eqc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable memorytype_is_comparable))))))
- ##| napply (eq_to_eqc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar8_is_comparable memorytype_is_comparable))))))) ##]
- ##| nelim m;
- ##[ napply (neqc_to_neq (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable memorytype_is_comparable))))))
- ##| napply (neqc_to_neq (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar8_is_comparable memorytype_is_comparable))))))) ##]
- ##| nelim m;
- ##[ napply (neq_to_neqc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable memorytype_is_comparable))))))
- ##| napply (neq_to_neqc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar8_is_comparable memorytype_is_comparable))))))) ##]
- ##| nelim m;
- ##[ napply (decidable_c (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable memorytype_is_comparable))))))
- ##| napply (decidable_c (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar8_is_comparable memorytype_is_comparable))))))) ##]
- ##| nelim m;
- ##[ napply (symmetric_eqc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable memorytype_is_comparable))))))
- ##| napply (symmetric_eqc (ar8_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar16_is_comparable (ar8_is_comparable memorytype_is_comparable))))))) ##]
- ##]
-nqed.
-
-unification hint 0 ≔ M:memory_impl ⊢ carr (chk_is_comparable M) ≡ aux_chk_type M.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/comp.ma".
-include "num/bool_lemmas.ma".
-
-(* **************************** *)
-(* TIPI PER I MODULI DI MEMORIA *)
-(* **************************** *)
-
-(* tipi di memoria:RAM/ROM/non installata *)
-ninductive memory_type : Type ≝
- MEM_READ_ONLY: memory_type
-| MEM_READ_WRITE: memory_type
-| MEM_OUT_OF_BOUND: memory_type.
-
-(* iteratore sugli ottali *)
-ndefinition forall_memory_type ≝ λP.
- P MEM_READ_ONLY ⊗ P MEM_READ_WRITE ⊗ P MEM_OUT_OF_BOUND.
-
-(* operatore = *)
-ndefinition eq_memorytype ≝
-λm1,m2.match m1 with
- [ MEM_READ_ONLY ⇒ match m2 with [ MEM_READ_ONLY ⇒ true | _ ⇒ false ]
- | MEM_READ_WRITE ⇒ match m2 with [ MEM_READ_WRITE ⇒ true | _ ⇒ false ]
- | MEM_OUT_OF_BOUND ⇒ match m2 with [ MEM_OUT_OF_BOUND ⇒ true | _ ⇒ false ]
- ].
-
-ndefinition memorytype_destruct_aux ≝
-Πn1,n2:memory_type.ΠP:Prop.n1 = n2 →
- match eq_memorytype n1 n2 with [ true ⇒ P → P | false ⇒ P ].
-
-ndefinition memorytype_destruct : memorytype_destruct_aux.
- #n1; #n2; #P; #H;
- nrewrite < H;
- nelim n1;
- nnormalize;
- napply (λx.x).
-nqed.
-
-nlemma eq_to_eqmemorytype : ∀n1,n2.n1 = n2 → eq_memorytype n1 n2 = true.
- #n1; #n2; #H;
- nrewrite > H;
- nelim n2;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma neqmemorytype_to_neq : ∀n1,n2.eq_memorytype n1 n2 = false → n1 ≠ n2.
- #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_memorytype n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqmemorytype n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-nlemma eqmemorytype_to_eq : ∀n1,n2.eq_memorytype n1 n2 = true → n1 = n2.
- #n1; #n2;
- ncases n1;
- ncases n2;
- nnormalize;
- ##[ ##1,5,9: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
- ##]
-nqed.
-
-nlemma neq_to_neqmemorytype : ∀n1,n2.n1 ≠ n2 → eq_memorytype n1 n2 = false.
- #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_memorytype n1 n2));
- napply (not_to_not (eq_memorytype n1 n2 = true) (n1 = n2) ? H);
- napply (eqmemorytype_to_eq n1 n2).
-nqed.
-
-nlemma decidable_memorytype : ∀x,y:memory_type.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_memorytype x y = true) (eq_memorytype x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqmemorytype_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqmemorytype_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqmemorytype : symmetricT memory_type bool eq_memorytype.
- #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_memorytype n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqmemorytype n1 n2 H);
- napply (symmetric_eq ? (eq_memorytype n2 n1) false);
- napply (neq_to_neqmemorytype n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
-
-nlemma memorytype_is_comparable : comparable.
- @ memory_type
- ##[ napply MEM_READ_ONLY
- ##| napply forall_memory_type
- ##| napply eq_memorytype
- ##| napply eqmemorytype_to_eq
- ##| napply eq_to_eqmemorytype
- ##| napply neqmemorytype_to_neq
- ##| napply neq_to_neqmemorytype
- ##| napply decidable_memorytype
- ##| napply symmetric_eqmemorytype
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr memorytype_is_comparable ≡ memory_type.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/memory/memory_trees.ma".
-
-(* ********************* *)
-(* MEMORIA E DESCRITTORE *)
-(* ********************* *)
-
-(* tutta la memoria non installata *)
-ndefinition mb_out_of_bound_memory ≝
- aux_20B_filler ?
- (mk_Array8T ? MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND
- MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND MEM_OUT_OF_BOUND).
-
-(* tutta la memoria a 0 *)
-ndefinition mb_zero_memory ≝
- aux_20B_filler ? (mk_Array8T ? false false false false false false false false).
-
-(* scrivi bit controllando il tipo di memoria *)
-ndefinition mb_mem_update_bit ≝
-λmem:aux_20B_type (Array8T bool).
-λchk:aux_20B_type (Array8T memory_type).
-λsel:oct.λaddr:word16.λsub:oct.λv:bool.
- match getn_array8T sub ? (mt_visit ? chk sel addr) with
- (* ROM? ok, ma il valore viene perso *)
- [ MEM_READ_ONLY ⇒ Some ? mem
- (* RAM? ok *)
- | MEM_READ_WRITE ⇒ Some ? (mt_update ? mem sel addr (setn_array8T sub ? (mt_visit ? mem sel addr) v))
- (* NON INSTALLATA? no *)
- | MEM_OUT_OF_BOUND ⇒ None ? ].
-
-ndefinition mb_mem_update ≝
-λmem:aux_20B_type (Array8T bool).
-λchk:aux_20B_type (Array8T memory_type).
-λsel:oct.λaddr:word16.λv:byte8.
-let old_value ≝ mt_visit (Array8T bool) mem sel addr in
-let new_value ≝ bits_of_byte8 v in
-let memtypes ≝ mt_visit (Array8T memory_type) chk sel addr in
-let newbit0 ≝ match getn_array8T o0 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o0 bool old_value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o0 bool new_value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit1 ≝ match getn_array8T o1 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o1 bool old_value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o1 bool new_value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit2 ≝ match getn_array8T o2 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o2 bool old_value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o2 bool new_value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit3 ≝ match getn_array8T o3 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o3 bool old_value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o3 bool new_value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit4 ≝ match getn_array8T o4 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o4 bool old_value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o4 bool new_value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit5 ≝ match getn_array8T o5 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o5 bool old_value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o5 bool new_value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit6 ≝ match getn_array8T o6 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o6 bool old_value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o6 bool new_value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit7 ≝ match getn_array8T o7 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o7 bool old_value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o7 bool new_value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
- opt_map … newbit0
- (λnb0.opt_map … newbit1
- (λnb1.opt_map … newbit2
- (λnb2.opt_map … newbit3
- (λnb3.opt_map … newbit4
- (λnb4.opt_map … newbit5
- (λnb5.opt_map … newbit6
- (λnb6.opt_map … newbit7
- (λnb7.Some ? (mt_update ? mem sel addr (mk_Array8T bool nb7 nb6 nb5 nb4 nb3 nb2 nb1 nb0)))))))))).
-
-(* scrivi tipo di bit *)
-ndefinition mb_chk_update_bit ≝
-λchk:aux_20B_type (Array8T memory_type).
-λsel:oct.λaddr:word16.λsub:oct.λv:memory_type.
- mt_update ? chk sel addr (setn_array8T sub ? (mt_visit ? chk sel addr) v).
-
-(* leggi bit controllando il tipo di memoria *)
-ndefinition mb_mem_read_bit ≝
-λmem:aux_20B_type (Array8T bool).
-λchk:aux_20B_type (Array8T memory_type).
-λsel:oct.λaddr:word16.λsub:oct.
- match getn_array8T sub ? (mt_visit ? chk sel addr) with
- (* ROM? ok, ma il valore viene perso *)
- [ MEM_READ_ONLY ⇒ Some ? (getn_array8T sub ? (mt_visit ? mem sel addr))
- (* RAM? ok *)
- | MEM_READ_WRITE ⇒ Some ? (getn_array8T sub ? (mt_visit ? mem sel addr))
- (* NON INSTALLATA? no *)
- | MEM_OUT_OF_BOUND ⇒ None ? ].
-
-(* leggi controllando il tipo di memoria *)
-(* NB: devono esistere tutti i bit *)
-ndefinition mb_mem_read ≝
-λmem:aux_20B_type (Array8T bool).
-λchk:aux_20B_type (Array8T memory_type).
-λsel:oct.λaddr:word16.
-let value ≝ mt_visit (Array8T bool) mem sel addr in
-let memtypes ≝ mt_visit (Array8T memory_type) chk sel addr in
-let newbit0 ≝ match getn_array8T o0 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o0 bool value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o0 bool value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit1 ≝ match getn_array8T o1 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o1 bool value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o1 bool value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit2 ≝ match getn_array8T o2 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o2 bool value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o2 bool value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit3 ≝ match getn_array8T o3 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o3 bool value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o3 bool value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit4 ≝ match getn_array8T o4 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o4 bool value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o4 bool value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit5 ≝ match getn_array8T o5 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o5 bool value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o5 bool value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit6 ≝ match getn_array8T o6 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o6 bool value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o6 bool value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
-let newbit7 ≝ match getn_array8T o7 memory_type memtypes with
- [ MEM_READ_ONLY ⇒ Some bool (getn_array8T o7 bool value)
- | MEM_READ_WRITE ⇒ Some bool (getn_array8T o7 bool value)
- | MEM_OUT_OF_BOUND ⇒ None bool ] in
- opt_map … newbit0
- (λnb0.opt_map … newbit1
- (λnb1.opt_map … newbit2
- (λnb2.opt_map … newbit3
- (λnb3.opt_map … newbit4
- (λnb4.opt_map … newbit5
- (λnb5.opt_map … newbit6
- (λnb6.opt_map … newbit7
- (λnb7.Some ? (byte8_of_bits (mk_Array8T bool nb7 nb6 nb5 nb4 nb3 nb2 nb1 nb0)))))))))).
-
-(* ************************** *)
-(* CARICAMENTO PROGRAMMA/DATI *)
-(* ************************** *)
-
-(* carica a paratire da addr, scartando source (pescando da old_mem) se si supera 0xFFFF... *)
-nlet rec mb_load_from_source_at (old_mem:aux_20B_type (Array8T bool))
- (src:list byte8) (sel:oct) (addr:word16) on src ≝
- match src with
- (* fine di source: carica da old_mem *)
- [ nil ⇒ old_mem
- | cons hd tl ⇒ mb_load_from_source_at (mt_update ? old_mem sel addr (bits_of_byte8 hd))
- tl sel (succc ? addr)
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/memory/memory_base.ma".
-include "num/word16.ma".
-include "common/list.ma".
-
-(* ************************** *)
-(* 8 segmenti da 64Kb → 512Kb *)
-(* ************************** *)
-
-(* ********************* *)
-(* MEMORIA E DESCRITTORE *)
-(* ********************* *)
-
-(* (mf_check_update_ranged chk inf sup mode) = setta tipo memoria *)
-ndefinition mf_check_update_ranged ≝
-λf:oct → word16 → memory_type.λsel:oct.λaddr:word16.λrange:word16.λv.
- λx,y.
- match (eqc ? sel x)⊗(inrangec ? y addr (plusc_d_d ? addr range)) with
- [ true ⇒ v
- | false ⇒ f x y ].
-
-(* tutta la memoria non installata *)
-ndefinition mf_out_of_bound_memory ≝ λ_:oct.λ_:word16.MEM_OUT_OF_BOUND.
-
-(* (mf_mem_update mem checked addr val) = scrivi controllando il tipo di memoria *)
-ndefinition mf_mem_update ≝
-λf:oct → word16 → byte8.λc:oct → word16 → memory_type.λsel:oct.λa:word16.λv:byte8.
- match c sel a with
- (* ROM? ok, ma il valore viene perso *)
- [ MEM_READ_ONLY ⇒ Some ? f
- (* RAM? ok *)
- | MEM_READ_WRITE ⇒ Some ? (λx,y.match (eqc ? sel x)⊗(eqc ? a y) with [ true ⇒ v | false ⇒ f x y ])
- (* NON INSTALLATA? no *)
- | MEM_OUT_OF_BOUND ⇒ None ? ].
-
-(* tutta la memoria a 0 *)
-ndefinition mf_zero_memory ≝ λ_:oct.λ_:word16.〈x0,x0〉.
-
-(* (mf_mem_read mem check addr) = leggi controllando il tipo di memoria *)
-ndefinition mf_mem_read ≝
-λf:oct → word16 → byte8.λc:oct → word16 → memory_type.λsel:oct.λa:word16.
- match c sel a with
- [ MEM_READ_ONLY ⇒ Some ? (f sel a)
- | MEM_READ_WRITE ⇒ Some ? (f sel a)
- | MEM_OUT_OF_BOUND ⇒ None ? ].
-
-(* ************************** *)
-(* CARICAMENTO PROGRAMMA/DATI *)
-(* ************************** *)
-
-(* carica a paratire da addr, overflow se si supera 0xFFFF... *)
-nlet rec mf_load_from_source_at (old_mem:oct → word16 → byte8) (src:list byte8) (sel:oct) (addr:word16) on src ≝
- match src with
- (* fine di source: carica da old_mem *)
- [ nil ⇒ old_mem
- | cons hd tl ⇒ λx,y.match (eqc ? sel x)⊗(eqc ? addr y) with
- (* la locazione corrisponde al punto corrente di source *)
- [ true ⇒ hd
- (* la locazione e' piu' avanti? ricorsione *)
- | false ⇒ (mf_load_from_source_at old_mem tl sel (succc ? addr)) x y
- ]
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/memory/memory_struct_base.ma".
-
-(* **************** *)
-(* TIPO ARRAY DA 16 *)
-(* **************** *)
-
-nlemma ar16_destruct_1 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x1 = y1.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T a _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_2 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x2 = y2.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ a _ _ _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x2 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_3 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x3 = y3.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ a _ _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x3 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_4 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x4 = y4.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ a _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x4 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_5 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x5 = y5.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ a _ _ _ _ _ _ _ _ _ _ _ ⇒ x5 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_6 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x6 = y6.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ a _ _ _ _ _ _ _ _ _ _ ⇒ x6 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_7 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x7 = y7.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ a _ _ _ _ _ _ _ _ _ ⇒ x7 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_8 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x8 = y8.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ a _ _ _ _ _ _ _ _ ⇒ x8 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_9 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x9 = y9.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ _ a _ _ _ _ _ _ _ ⇒ x9 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_10 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x10 = y10.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ _ _ a _ _ _ _ _ _ ⇒ x10 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_11 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x11 = y11.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ _ _ _ a _ _ _ _ _ ⇒ x11 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_12 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x12 = y12.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ _ _ _ _ a _ _ _ _ ⇒ x12 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_13 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x13 = y13.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ _ _ _ _ _ a _ _ _ ⇒ x13 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_14 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x14 = y14.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ _ _ _ _ _ _ a _ _ ⇒ x14 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_15 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x15 = y15.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ _ _ _ _ _ _ _ a _ ⇒ x15 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar16_destruct_16 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x16 = y16.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_Array16T _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ a ⇒ x16 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_eqar16 :
-∀T.∀f:T → T → bool.
- (symmetricT T bool f) →
- (symmetricT (Array16T T) bool (eq_ar16 T f)).
- #T; #f; #H;
- #alu1; ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nchange with (
- ((f x1 y1) ⊗ (f x2 y2) ⊗ (f x3 y3) ⊗ (f x4 y4) ⊗
- (f x5 y5) ⊗ (f x6 y6) ⊗ (f x7 y7) ⊗ (f x8 y8) ⊗
- (f x9 y9) ⊗ (f x10 y10) ⊗ (f x11 y11) ⊗ (f x12 y12) ⊗
- (f x13 y13) ⊗ (f x14 y14) ⊗ (f x15 y15) ⊗ (f x16 y16)) =
- ((f y1 x1) ⊗ (f y2 x2) ⊗ (f y3 x3) ⊗ (f y4 x4) ⊗
- (f y5 x5) ⊗ (f y6 x6) ⊗ (f y7 x7) ⊗ (f y8 x8) ⊗
- (f y9 x9) ⊗ (f y10 x10) ⊗ (f y11 x11) ⊗ (f y12 x12) ⊗
- (f y13 x13) ⊗ (f y14 x14) ⊗ (f y15 x15) ⊗ (f y16 x16)));
- nrewrite > (H x1 y1);
- nrewrite > (H x2 y2);
- nrewrite > (H x3 y3);
- nrewrite > (H x4 y4);
- nrewrite > (H x5 y5);
- nrewrite > (H x6 y6);
- nrewrite > (H x7 y7);
- nrewrite > (H x8 y8);
- nrewrite > (H x9 y9);
- nrewrite > (H x10 y10);
- nrewrite > (H x11 y11);
- nrewrite > (H x12 y12);
- nrewrite > (H x13 y13);
- nrewrite > (H x14 y14);
- nrewrite > (H x15 y15);
- nrewrite > (H x16 y16);
- napply refl_eq.
-nqed.
-
-nlemma eqar16_to_eq :
-∀T.∀f:T → T → bool.
- (∀x,y.(f x y = true) → (x = y)) →
- (∀a1,a2:Array16T T.(eq_ar16 T f a1 a2 = true) → (a1 = a2)).
- #T; #f; #H;
- #alu1; ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H1;
- nchange in H1:(%) with (
- ((f x1 y1) ⊗ (f x2 y2) ⊗ (f x3 y3) ⊗ (f x4 y4) ⊗
- (f x5 y5) ⊗ (f x6 y6) ⊗ (f x7 y7) ⊗ (f x8 y8) ⊗
- (f x9 y9) ⊗ (f x10 y10) ⊗ (f x11 y11) ⊗ (f x12 y12) ⊗
- (f x13 y13) ⊗ (f x14 y14) ⊗ (f x15 y15) ⊗ (f x16 y16)) = true);
- nrewrite > (H … (andb_true_true_r … H1));
- nletin H2 ≝ (andb_true_true_l … H1);
- nrewrite > (H … (andb_true_true_r … H2));
- nletin H3 ≝ (andb_true_true_l … H2);
- nrewrite > (H … (andb_true_true_r … H3));
- nletin H4 ≝ (andb_true_true_l … H3);
- nrewrite > (H … (andb_true_true_r … H4));
- nletin H5 ≝ (andb_true_true_l … H4);
- nrewrite > (H … (andb_true_true_r … H5));
- nletin H6 ≝ (andb_true_true_l … H5);
- nrewrite > (H … (andb_true_true_r … H6));
- nletin H7 ≝ (andb_true_true_l … H6);
- nrewrite > (H … (andb_true_true_r … H7));
- nletin H8 ≝ (andb_true_true_l … H7);
- nrewrite > (H … (andb_true_true_r … H8));
- nletin H9 ≝ (andb_true_true_l … H8);
- nrewrite > (H … (andb_true_true_r … H9));
- nletin H10 ≝ (andb_true_true_l … H9);
- nrewrite > (H … (andb_true_true_r … H10));
- nletin H11 ≝ (andb_true_true_l … H10);
- nrewrite > (H … (andb_true_true_r … H11));
- nletin H12 ≝ (andb_true_true_l … H11);
- nrewrite > (H … (andb_true_true_r … H12));
- nletin H13 ≝ (andb_true_true_l … H12);
- nrewrite > (H … (andb_true_true_r … H13));
- nletin H14 ≝ (andb_true_true_l … H13);
- nrewrite > (H … (andb_true_true_r … H14));
- nletin H15 ≝ (andb_true_true_l … H14);
- nrewrite > (H … (andb_true_true_r … H15));
- nrewrite > (H … (andb_true_true_l … H15));
- napply refl_eq.
-nqed.
-
-nlemma eq_to_eqar16 :
-∀T.∀f:T → T → bool.
- (∀x,y.(x = y) → (f x y = true)) →
- (∀a1,a2:Array16T T.(a1 = a2) → (eq_ar16 T f a1 a2 = true)).
- #T; #f; #H;
- #alu1; ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H1;
- nrewrite > (ar16_destruct_1 … H1);
- nrewrite > (ar16_destruct_2 … H1);
- nrewrite > (ar16_destruct_3 … H1);
- nrewrite > (ar16_destruct_4 … H1);
- nrewrite > (ar16_destruct_5 … H1);
- nrewrite > (ar16_destruct_6 … H1);
- nrewrite > (ar16_destruct_7 … H1);
- nrewrite > (ar16_destruct_8 … H1);
- nrewrite > (ar16_destruct_9 … H1);
- nrewrite > (ar16_destruct_10 … H1);
- nrewrite > (ar16_destruct_11 … H1);
- nrewrite > (ar16_destruct_12 … H1);
- nrewrite > (ar16_destruct_13 … H1);
- nrewrite > (ar16_destruct_14 … H1);
- nrewrite > (ar16_destruct_15 … H1);
- nrewrite > (ar16_destruct_16 … H1);
- nchange with (
- ((f y1 y1) ⊗ (f y2 y2) ⊗ (f y3 y3) ⊗ (f y4 y4) ⊗
- (f y5 y5) ⊗ (f y6 y6) ⊗ (f y7 y7) ⊗ (f y8 y8) ⊗
- (f y9 y9) ⊗ (f y10 y10) ⊗ (f y11 y11) ⊗ (f y12 y12) ⊗
- (f y13 y13) ⊗ (f y14 y14) ⊗ (f y15 y15) ⊗ (f y16 y16)) = true);
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- napply refl_eq.
-nqed.
-
-nlemma decidable_ar16_aux1 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x1 ≠ y1) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_1 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux2 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x2 ≠ y2) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_2 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux3 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x3 ≠ y3) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_3 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux4 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x4 ≠ y4) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_4 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux5 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x5 ≠ y5) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_5 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux6 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x6 ≠ y6) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_6 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux7 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x7 ≠ y7) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_7 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux8 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x8 ≠ y8) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_8 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux9 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x9 ≠ y9) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_9 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux10 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x10 ≠ y10) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_10 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux11 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x11 ≠ y11) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_11 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux12 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x12 ≠ y12) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_12 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux13 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x13 ≠ y13) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_13 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux14 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x14 ≠ y14) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_14 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux15 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x15 ≠ y15) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_15 … H1)).
-nqed.
-
-nlemma decidable_ar16_aux16 :
-∀T.
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16:T.
-∀y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16:T.
- (x16 ≠ y16) →
- (mk_Array16T T x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16) ≠
- (mk_Array16T T y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize; #H; #H1;
- napply (H (ar16_destruct_16 … H1)).
-nqed.
-
-nlemma decidable_ar16 :
-∀T.(∀x,y:T.decidable (x = y)) →
- (∀a1,a2:Array16T T.decidable (a1 = a2)).
- #T; #H;
- #x; nelim x; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y; nelim y; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nnormalize;
- napply (or2_elim (? = ?) (? ≠ ?) ? (H x1 y1) …);
- ##[ ##2: #H1; napply (or2_intro2 … (decidable_ar16_aux1 T … H1))
- ##| ##1: #H1; napply (or2_elim (? = ?) (? ≠ ?) ? (H x2 y2) …);
- ##[ ##2: #H2; napply (or2_intro2 … (decidable_ar16_aux2 T … H2))
- ##| ##1: #H2; napply (or2_elim (? = ?) (? ≠ ?) ? (H x3 y3) …);
- ##[ ##2: #H3; napply (or2_intro2 … (decidable_ar16_aux3 T … H3))
- ##| ##1: #H3; napply (or2_elim (? = ?) (? ≠ ?) ? (H x4 y4) …);
- ##[ ##2: #H4; napply (or2_intro2 … (decidable_ar16_aux4 T … H4))
- ##| ##1: #H4; napply (or2_elim (? = ?) (? ≠ ?) ? (H x5 y5) …);
- ##[ ##2: #H5; napply (or2_intro2 … (decidable_ar16_aux5 T … H5))
- ##| ##1: #H5; napply (or2_elim (? = ?) (? ≠ ?) ? (H x6 y6) …);
- ##[ ##2: #H6; napply (or2_intro2 … (decidable_ar16_aux6 T … H6))
- ##| ##1: #H6; napply (or2_elim (? = ?) (? ≠ ?) ? (H x7 y7) …);
- ##[ ##2: #H7; napply (or2_intro2 … (decidable_ar16_aux7 T … H7))
- ##| ##1: #H7; napply (or2_elim (? = ?) (? ≠ ?) ? (H x8 y8) …);
- ##[ ##2: #H8; napply (or2_intro2 … (decidable_ar16_aux8 T … H8))
- ##| ##1: #H8; napply (or2_elim (? = ?) (? ≠ ?) ? (H x9 y9) …);
- ##[ ##2: #H9; napply (or2_intro2 … (decidable_ar16_aux9 T … H9))
- ##| ##1: #H9; napply (or2_elim (? = ?) (? ≠ ?) ? (H x10 y10) …);
- ##[ ##2: #H10; napply (or2_intro2 … (decidable_ar16_aux10 T … H10))
- ##| ##1: #H10; napply (or2_elim (? = ?) (? ≠ ?) ? (H x11 y11) …);
- ##[ ##2: #H11; napply (or2_intro2 … (decidable_ar16_aux11 T … H11))
- ##| ##1: #H11; napply (or2_elim (? = ?) (? ≠ ?) ? (H x12 y12) …);
- ##[ ##2: #H12; napply (or2_intro2 … (decidable_ar16_aux12 T … H12))
- ##| ##1: #H12; napply (or2_elim (? = ?) (? ≠ ?) ? (H x13 y13) …);
- ##[ ##2: #H13; napply (or2_intro2 … (decidable_ar16_aux13 T … H13))
- ##| ##1: #H13; napply (or2_elim (? = ?) (? ≠ ?) ? (H x14 y14) …);
- ##[ ##2: #H14; napply (or2_intro2 … (decidable_ar16_aux14 T … H14))
- ##| ##1: #H14; napply (or2_elim (? = ?) (? ≠ ?) ? (H x15 y15) …);
- ##[ ##2: #H15; napply (or2_intro2 … (decidable_ar16_aux15 T … H15))
- ##| ##1: #H15; napply (or2_elim (? = ?) (? ≠ ?) ? (H x16 y16) …);
- ##[ ##2: #H16; napply (or2_intro2 … (decidable_ar16_aux16 T … H16))
- ##| ##1: #H16; nrewrite > H1; nrewrite > H2; nrewrite > H3; nrewrite > H4;
- nrewrite > H5; nrewrite > H6; nrewrite > H7; nrewrite > H8;
- nrewrite > H9; nrewrite > H10; nrewrite > H11; nrewrite > H12;
- nrewrite > H13; nrewrite > H14; nrewrite > H15; nrewrite > H16;
- napply (or2_intro1 (? = ?) (? ≠ ?) (refl_eq …))
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
-nqed.
-
-(* !!! per brevita *)
-naxiom neqar16_to_neq :
-∀T.∀f:T → T → bool.
- (∀x,y:T.f x y = false → x ≠ y) →
- (∀p1,p2:Array16T T.(eq_ar16 T f p1 p2 = false → p1 ≠ p2)).
-
-(* !!! per brevita *)
-naxiom neq_to_neqar16 :
-∀T.∀f:T → T → bool.
- (∀x,y:T.decidable (x = y)) →
- (∀x,y:T.x ≠ y → f x y = false) →
- (∀p1,p2:Array16T T.(p1 ≠ p2 → eq_ar16 T f p1 p2 = false)).
-
-nlemma ar16_is_comparable : comparable → comparable.
- #T; @ (Array16T T)
- ##[ napply (mk_Array16T ? (zeroc T) (zeroc T) (zeroc T) (zeroc T)
- (zeroc T) (zeroc T) (zeroc T) (zeroc T)
- (zeroc T) (zeroc T) (zeroc T) (zeroc T)
- (zeroc T) (zeroc T) (zeroc T) (zeroc T))
- ##| napply (λP.(forallc T)
- (λe1.(forallc T)
- (λe2.(forallc T)
- (λe3.(forallc T)
- (λe4.(forallc T)
- (λe5.(forallc T)
- (λe6.(forallc T)
- (λe7.(forallc T)
- (λe8.(forallc T)
- (λe9.(forallc T)
- (λe10.(forallc T)
- (λe11.(forallc T)
- (λe12.(forallc T)
- (λe13.(forallc T)
- (λe14.(forallc T)
- (λe15.(forallc T)
- (λe16.P (mk_Array16T T e1 e2 e3 e4 e5 e6 e7 e8 e9 e10 e11 e12 e13 e14 e15 e16))))))))))))))))))
- ##| napply (eq_ar16 … (eqc T))
- ##| napply eqar16_to_eq;
- napply (eqc_to_eq T)
- ##| napply eq_to_eqar16;
- napply (eq_to_eqc T)
- ##| napply neqar16_to_neq;
- napply (neqc_to_neq T)
- ##| napply neq_to_neqar16;
- ##[ napply (decidable_c T)
- ##| napply (neq_to_neqc T) ##]
- ##| napply decidable_ar16;
- napply (decidable_c T)
- ##| napply symmetric_eqar16;
- napply (symmetric_eqc T)
- ##]
-nqed.
-
-unification hint 0 ≔ S: comparable ;
- T ≟ (carr S),
- X ≟ (ar16_is_comparable S)
- (*********************************************) ⊢
- carr X ≡ Array16T T.
-
-(* *************** *)
-(* TIPO ARRAY DA 8 *)
-(* *************** *)
-
-nlemma ar8_destruct_1 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8:T.∀y1,y2,y3,y4,y5,y6,y7,y8:T.
- mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8 = mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8 →
- x1 = y1.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_Array8T a _ _ _ _ _ _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar8_destruct_2 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8:T.∀y1,y2,y3,y4,y5,y6,y7,y8:T.
- mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8 = mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8 →
- x2 = y2.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_Array8T _ a _ _ _ _ _ _ ⇒ x2 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar8_destruct_3 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8:T.∀y1,y2,y3,y4,y5,y6,y7,y8:T.
- mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8 = mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8 →
- x3 = y3.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_Array8T _ _ a _ _ _ _ _ ⇒ x3 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar8_destruct_4 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8:T.∀y1,y2,y3,y4,y5,y6,y7,y8:T.
- mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8 = mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8 →
- x4 = y4.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_Array8T _ _ _ a _ _ _ _ ⇒ x4 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar8_destruct_5 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8:T.∀y1,y2,y3,y4,y5,y6,y7,y8:T.
- mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8 = mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8 →
- x5 = y5.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_Array8T _ _ _ _ a _ _ _ ⇒ x5 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar8_destruct_6 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8:T.∀y1,y2,y3,y4,y5,y6,y7,y8:T.
- mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8 = mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8 →
- x6 = y6.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_Array8T _ _ _ _ _ a _ _ ⇒ x6 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar8_destruct_7 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8:T.∀y1,y2,y3,y4,y5,y6,y7,y8:T.
- mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8 = mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8 →
- x7 = y7.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_Array8T _ _ _ _ _ _ a _ ⇒ x7 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma ar8_destruct_8 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8:T.∀y1,y2,y3,y4,y5,y6,y7,y8:T.
- mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8 = mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8 →
- x8 = y8.
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_Array8T _ _ _ _ _ _ _ a ⇒ x8 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_eqar8 :
-∀T.∀f:T → T → bool.
- (symmetricT T bool f) →
- (symmetricT (Array8T T) bool (eq_ar8 T f)).
- #T; #f; #H;
- #alu1; ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nchange with (
- ((f x1 y1) ⊗ (f x2 y2) ⊗ (f x3 y3) ⊗ (f x4 y4) ⊗
- (f x5 y5) ⊗ (f x6 y6) ⊗ (f x7 y7) ⊗ (f x8 y8)) =
- ((f y1 x1) ⊗ (f y2 x2) ⊗ (f y3 x3) ⊗ (f y4 x4) ⊗
- (f y5 x5) ⊗ (f y6 x6) ⊗ (f y7 x7) ⊗ (f y8 x8)));
- nrewrite > (H x1 y1);
- nrewrite > (H x2 y2);
- nrewrite > (H x3 y3);
- nrewrite > (H x4 y4);
- nrewrite > (H x5 y5);
- nrewrite > (H x6 y6);
- nrewrite > (H x7 y7);
- nrewrite > (H x8 y8);
- napply refl_eq.
-nqed.
-
-nlemma eqar8_to_eq :
-∀T.∀f:T → T → bool.
- (∀x,y.(f x y = true) → (x = y)) →
- (∀a1,a2:Array8T T.(eq_ar8 T f a1 a2 = true) → (a1 = a2)).
- #T; #f; #H;
- #alu1; ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H1;
- nchange in H1:(%) with (
- ((f x1 y1) ⊗ (f x2 y2) ⊗ (f x3 y3) ⊗ (f x4 y4) ⊗
- (f x5 y5) ⊗ (f x6 y6) ⊗ (f x7 y7) ⊗ (f x8 y8)) = true);
- nrewrite > (H … (andb_true_true_r … H1));
- nletin H2 ≝ (andb_true_true_l … H1);
- nrewrite > (H … (andb_true_true_r … H2));
- nletin H3 ≝ (andb_true_true_l … H2);
- nrewrite > (H … (andb_true_true_r … H3));
- nletin H4 ≝ (andb_true_true_l … H3);
- nrewrite > (H … (andb_true_true_r … H4));
- nletin H5 ≝ (andb_true_true_l … H4);
- nrewrite > (H … (andb_true_true_r … H5));
- nletin H6 ≝ (andb_true_true_l … H5);
- nrewrite > (H … (andb_true_true_r … H6));
- nletin H7 ≝ (andb_true_true_l … H6);
- nrewrite > (H … (andb_true_true_r … H7));
- nrewrite > (H … (andb_true_true_l … H7));
- napply refl_eq.
-nqed.
-
-nlemma eq_to_eqar8 :
-∀T.∀f:T → T → bool.
- (∀x,y.(x = y) → (f x y = true)) →
- (∀a1,a2:Array8T T.(a1 = a2) → (eq_ar8 T f a1 a2 = true)).
- #T; #f; #H;
- #alu1; ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H1;
- nrewrite > (ar8_destruct_1 … H1);
- nrewrite > (ar8_destruct_2 … H1);
- nrewrite > (ar8_destruct_3 … H1);
- nrewrite > (ar8_destruct_4 … H1);
- nrewrite > (ar8_destruct_5 … H1);
- nrewrite > (ar8_destruct_6 … H1);
- nrewrite > (ar8_destruct_7 … H1);
- nrewrite > (ar8_destruct_8 … H1);
- nchange with (
- ((f y1 y1) ⊗ (f y2 y2) ⊗ (f y3 y3) ⊗ (f y4 y4) ⊗
- (f y5 y5) ⊗ (f y6 y6) ⊗ (f y7 y7) ⊗ (f y8 y8)) = true);
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- nrewrite > (H … (refl_eq …));
- napply refl_eq.
-nqed.
-
-nlemma decidable_ar8_aux1 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8:T.
- (x1 ≠ y1) →
- (mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8) ≠ (mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (ar8_destruct_1 … H1)).
-nqed.
-
-nlemma decidable_ar8_aux2 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8:T.
- (x2 ≠ y2) →
- (mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8) ≠ (mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (ar8_destruct_2 … H1)).
-nqed.
-
-nlemma decidable_ar8_aux3 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8:T.
- (x3 ≠ y3) →
- (mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8) ≠ (mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (ar8_destruct_3 … H1)).
-nqed.
-
-nlemma decidable_ar8_aux4 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8:T.
- (x4 ≠ y4) →
- (mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8) ≠ (mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (ar8_destruct_4 … H1)).
-nqed.
-
-nlemma decidable_ar8_aux5 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8:T.
- (x5 ≠ y5) →
- (mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8) ≠ (mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (ar8_destruct_5 … H1)).
-nqed.
-
-nlemma decidable_ar8_aux6 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8:T.
- (x6 ≠ y6) →
- (mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8) ≠ (mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (ar8_destruct_6 … H1)).
-nqed.
-
-nlemma decidable_ar8_aux7 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8:T.
- (x7 ≠ y7) →
- (mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8) ≠ (mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (ar8_destruct_7 … H1)).
-nqed.
-
-nlemma decidable_ar8_aux8 :
-∀T.∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8:T.
- (x8 ≠ y8) →
- (mk_Array8T T x1 x2 x3 x4 x5 x6 x7 x8) ≠ (mk_Array8T T y1 y2 y3 y4 y5 y6 y7 y8).
- #T; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize; #H; #H1;
- napply (H (ar8_destruct_8 … H1)).
-nqed.
-
-nlemma decidable_ar8 :
-∀T.(∀x,y:T.decidable (x = y)) →
- (∀a1,a2:Array8T T.decidable (a1 = a2)).
- #T; #H;
- #x; nelim x; #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y; nelim y; #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nnormalize;
- napply (or2_elim (? = ?) (? ≠ ?) ? (H x1 y1) …);
- ##[ ##2: #H1; napply (or2_intro2 … (decidable_ar8_aux1 T … H1))
- ##| ##1: #H1; napply (or2_elim (? = ?) (? ≠ ?) ? (H x2 y2) …);
- ##[ ##2: #H2; napply (or2_intro2 … (decidable_ar8_aux2 T … H2))
- ##| ##1: #H2; napply (or2_elim (? = ?) (? ≠ ?) ? (H x3 y3) …);
- ##[ ##2: #H3; napply (or2_intro2 … (decidable_ar8_aux3 T … H3))
- ##| ##1: #H3; napply (or2_elim (? = ?) (? ≠ ?) ? (H x4 y4) …);
- ##[ ##2: #H4; napply (or2_intro2 … (decidable_ar8_aux4 T … H4))
- ##| ##1: #H4; napply (or2_elim (? = ?) (? ≠ ?) ? (H x5 y5) …);
- ##[ ##2: #H5; napply (or2_intro2 … (decidable_ar8_aux5 T … H5))
- ##| ##1: #H5; napply (or2_elim (? = ?) (? ≠ ?) ? (H x6 y6) …);
- ##[ ##2: #H6; napply (or2_intro2 … (decidable_ar8_aux6 T … H6))
- ##| ##1: #H6; napply (or2_elim (? = ?) (? ≠ ?) ? (H x7 y7) …);
- ##[ ##2: #H7; napply (or2_intro2 … (decidable_ar8_aux7 T … H7))
- ##| ##1: #H7; napply (or2_elim (? = ?) (? ≠ ?) ? (H x8 y8) …);
- ##[ ##2: #H8; napply (or2_intro2 … (decidable_ar8_aux8 T … H8))
- ##| ##1: #H8; nrewrite > H1; nrewrite > H2; nrewrite > H3; nrewrite > H4;
- nrewrite > H5; nrewrite > H6; nrewrite > H7; nrewrite > H8;
- napply (or2_intro1 (? = ?) (? ≠ ?) (refl_eq …))
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
- ##]
-nqed.
-
-(* !!! per brevita *)
-naxiom neqar8_to_neq :
-∀T.∀f:T → T → bool.
- (∀x,y:T.f x y = false → x ≠ y) →
- (∀p1,p2:Array8T T.(eq_ar8 T f p1 p2 = false → p1 ≠ p2)).
-
-(* !!! per brevita *)
-naxiom neq_to_neqar8 :
-∀T.∀f:T → T → bool.
- (∀x,y:T.decidable (x = y)) →
- (∀x,y:T.x ≠ y → f x y = false) →
- (∀p1,p2:Array8T T.(p1 ≠ p2 → eq_ar8 T f p1 p2 = false)).
-
-nlemma ar8_is_comparable : comparable → comparable.
- #T; @ (Array8T T)
- ##[ napply (mk_Array8T ? (zeroc T) (zeroc T) (zeroc T) (zeroc T)
- (zeroc T) (zeroc T) (zeroc T) (zeroc T))
- ##| napply (λP.(forallc T)
- (λe1.(forallc T)
- (λe2.(forallc T)
- (λe3.(forallc T)
- (λe4.(forallc T)
- (λe5.(forallc T)
- (λe6.(forallc T)
- (λe7.(forallc T)
- (λe8.P (mk_Array8T T e1 e2 e3 e4 e5 e6 e7 e8))))))))))
- ##| napply (eq_ar8 … (eqc T))
- ##| napply eqar8_to_eq;
- napply (eqc_to_eq T)
- ##| napply eq_to_eqar8;
- napply (eq_to_eqc T)
- ##| napply neqar8_to_neq;
- napply (neqc_to_neq T)
- ##| napply neq_to_neqar8;
- ##[ napply (decidable_c T)
- ##| napply (neq_to_neqc T) ##]
- ##| napply decidable_ar8;
- napply (decidable_c T)
- ##| napply symmetric_eqar8;
- napply (symmetric_eqc T)
- ##]
-nqed.
-
-unification hint 0 ≔ S: comparable ;
- T ≟ (carr S),
- X ≟ (ar8_is_comparable S)
- (*********************************************) ⊢
- carr X ≡ Array8T T.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/byte8.ma".
-
-(* **************** *)
-(* TIPO ARRAY DA 16 *)
-(* **************** *)
-
-(* definizione di un array omogeneo di dimensione 16 *)
-nrecord Array16T (T:Type) : Type ≝
-{ a16_1 : T ; a16_2 : T ; a16_3 : T ; a16_4 : T
-; a16_5 : T ; a16_6 : T ; a16_7 : T ; a16_8 : T
-; a16_9 : T ; a16_10 : T ; a16_11 : T ; a16_12 : T
-; a16_13 : T ; a16_14 : T ; a16_15 : T ; a16_16 : T }.
-
-(* operatore uguaglianza *)
-ndefinition eq_ar16 ≝
-λT.λf:T → T → bool.λa1,a2:Array16T T.
- (f (a16_1 ? a1) (a16_1 ? a2)) ⊗ (f (a16_2 ? a1) (a16_2 ? a2)) ⊗
- (f (a16_3 ? a1) (a16_3 ? a2)) ⊗ (f (a16_4 ? a1) (a16_4 ? a2)) ⊗
- (f (a16_5 ? a1) (a16_5 ? a2)) ⊗ (f (a16_6 ? a1) (a16_6 ? a2)) ⊗
- (f (a16_7 ? a1) (a16_7 ? a2)) ⊗ (f (a16_8 ? a1) (a16_8 ? a2)) ⊗
- (f (a16_9 ? a1) (a16_9 ? a2)) ⊗ (f (a16_10 ? a1) (a16_10 ? a2)) ⊗
- (f (a16_11 ? a1) (a16_11 ? a2)) ⊗ (f (a16_12 ? a1) (a16_12 ? a2)) ⊗
- (f (a16_13 ? a1) (a16_13 ? a2)) ⊗ (f (a16_14 ? a1) (a16_14 ? a2)) ⊗
- (f (a16_15 ? a1) (a16_15 ? a2)) ⊗ (f (a16_16 ? a1) (a16_16 ? a2)).
-
-(* abbiamo gia' gli esadecimali come tipo induttivo quindi: *)
-(* posso definire un getter a matrice sull'array *)
-
-ndefinition getn_array16T ≝
-λn:exadecim.λT:Type.λp:Array16T T.
- match n return λn.(Array16T T) → T with
- [ x0 ⇒ a16_1 T | x1 ⇒ a16_2 T | x2 ⇒ a16_3 T | x3 ⇒ a16_4 T
- | x4 ⇒ a16_5 T | x5 ⇒ a16_6 T | x6 ⇒ a16_7 T | x7 ⇒ a16_8 T
- | x8 ⇒ a16_9 T | x9 ⇒ a16_10 T | xA ⇒ a16_11 T | xB ⇒ a16_12 T
- | xC ⇒ a16_13 T | xD ⇒ a16_14 T | xE ⇒ a16_15 T | xF ⇒ a16_16 T
- ] p.
-
-(* abbiamo gia' gli esadecimali come tipo induttivo quindi: *)
-(* posso definire un setter a matrice sull'array *)
-ndefinition setn_array16T ≝
-λn:exadecim.λT:Type.λp:Array16T T.λv:T.
-let e00 ≝ (a16_1 T p) in
-let e01 ≝ (a16_2 T p) in
-let e02 ≝ (a16_3 T p) in
-let e03 ≝ (a16_4 T p) in
-let e04 ≝ (a16_5 T p) in
-let e05 ≝ (a16_6 T p) in
-let e06 ≝ (a16_7 T p) in
-let e07 ≝ (a16_8 T p) in
-let e08 ≝ (a16_9 T p) in
-let e09 ≝ (a16_10 T p) in
-let e10 ≝ (a16_11 T p) in
-let e11 ≝ (a16_12 T p) in
-let e12 ≝ (a16_13 T p) in
-let e13 ≝ (a16_14 T p) in
-let e14 ≝ (a16_15 T p) in
-let e15 ≝ (a16_16 T p) in
- match n with
- [ x0 ⇒ mk_Array16T T v e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x1 ⇒ mk_Array16T T e00 v e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x2 ⇒ mk_Array16T T e00 e01 v e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x3 ⇒ mk_Array16T T e00 e01 e02 v e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x4 ⇒ mk_Array16T T e00 e01 e02 e03 v e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x5 ⇒ mk_Array16T T e00 e01 e02 e03 e04 v e06 e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x6 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 v e07 e08 e09 e10 e11 e12 e13 e14 e15
- | x7 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 v e08 e09 e10 e11 e12 e13 e14 e15
- | x8 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 v e09 e10 e11 e12 e13 e14 e15
- | x9 ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 v e10 e11 e12 e13 e14 e15
- | xA ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 v e11 e12 e13 e14 e15
- | xB ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 v e12 e13 e14 e15
- | xC ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 v e13 e14 e15
- | xD ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 v e14 e15
- | xE ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 v e15
- | xF ⇒ mk_Array16T T e00 e01 e02 e03 e04 e05 e06 e07 e08 e09 e10 e11 e12 e13 e14 v
- ].
-
-(* ************************** *)
-(* TIPO BYTE COME INSIEME BIT *)
-(* ************************** *)
-
-(* definizione di un byte come 8 bit *)
-nrecord Array8T (T:Type) : Type ≝
-{ a8_1 : T ; a8_2 : T ; a8_3 : T ; a8_4 : T
-; a8_5 : T ; a8_6 : T ; a8_7 : T ; a8_8 : T }.
-
-(* operatore uguaglianza *)
-ndefinition eq_ar8 ≝
-λT.λf:T → T → bool.λa1,a2:Array8T T.
- (f (a8_1 ? a1) (a8_1 ? a2)) ⊗ (f (a8_2 ? a1) (a8_2 ? a2)) ⊗
- (f (a8_3 ? a1) (a8_3 ? a2)) ⊗ (f (a8_4 ? a1) (a8_4 ? a2)) ⊗
- (f (a8_5 ? a1) (a8_5 ? a2)) ⊗ (f (a8_6 ? a1) (a8_6 ? a2)) ⊗
- (f (a8_7 ? a1) (a8_7 ? a2)) ⊗ (f (a8_8 ? a1) (a8_8 ? a2)).
-
-(* abbiamo gia' gli ottali come tipo induttivo quindi: *)
-(* posso definire un getter a matrice sull'array *)
-ndefinition getn_array8T ≝
-λn:oct.λT:Type.λp:Array8T T.
- match n return λn.(Array8T T) → T with
- [ o0 ⇒ a8_1 T | o1 ⇒ a8_2 T | o2 ⇒ a8_3 T | o3 ⇒ a8_4 T
- | o4 ⇒ a8_5 T | o5 ⇒ a8_6 T | o6 ⇒ a8_7 T | o7 ⇒ a8_8 T
- ] p.
-
-(* abbiamo gia' gli ottali come tipo induttivo quindi: *)
-(* posso definire un setter a matrice sull'array *)
-ndefinition setn_array8T ≝
-λn:oct.λT:Type.λp:Array8T T.λv:T.
-let e00 ≝ (a8_1 T p) in
-let e01 ≝ (a8_2 T p) in
-let e02 ≝ (a8_3 T p) in
-let e03 ≝ (a8_4 T p) in
-let e04 ≝ (a8_5 T p) in
-let e05 ≝ (a8_6 T p) in
-let e06 ≝ (a8_7 T p) in
-let e07 ≝ (a8_8 T p) in
- match n with
- [ o0 ⇒ mk_Array8T T v e01 e02 e03 e04 e05 e06 e07
- | o1 ⇒ mk_Array8T T e00 v e02 e03 e04 e05 e06 e07
- | o2 ⇒ mk_Array8T T e00 e01 v e03 e04 e05 e06 e07
- | o3 ⇒ mk_Array8T T e00 e01 e02 v e04 e05 e06 e07
- | o4 ⇒ mk_Array8T T e00 e01 e02 e03 v e05 e06 e07
- | o5 ⇒ mk_Array8T T e00 e01 e02 e03 e04 v e06 e07
- | o6 ⇒ mk_Array8T T e00 e01 e02 e03 e04 e05 v e07
- | o7 ⇒ mk_Array8T T e00 e01 e02 e03 e04 e05 e06 v
- ].
-
-(* lettura byte *)
-ndefinition byte8_of_bits ≝
-λp:Array8T bool.
- mk_byte8
- (orc ? (match a8_1 ? p with [ true ⇒ x8 | false ⇒ x0 ])
- (orc ? (match a8_2 ? p with [ true ⇒ x4 | false ⇒ x0 ])
- (orc ? (match a8_3 ? p with [ true ⇒ x2 | false ⇒ x0 ])
- (match a8_4 ? p with [ true ⇒ x1 | false ⇒ x0 ]))))
- (orc ? (match a8_5 ? p with [ true ⇒ x8 | false ⇒ x0 ])
- (orc ? (match a8_6 ? p with [ true ⇒ x4 | false ⇒ x0 ])
- (orc ? (match a8_7 ? p with [ true ⇒ x2 | false ⇒ x0 ])
- (match a8_8 ? p with [ true ⇒ x1 | false ⇒ x0 ])))).
-
-(* scrittura byte *)
-ndefinition bits_of_exadecim ≝
-λe:exadecim.match e with
- [ x0 ⇒ quadruple … false false false false
- | x1 ⇒ quadruple … false false false true
- | x2 ⇒ quadruple … false false true false
- | x3 ⇒ quadruple … false false true true
- | x4 ⇒ quadruple … false true false false
- | x5 ⇒ quadruple … false true false true
- | x6 ⇒ quadruple … false true true false
- | x7 ⇒ quadruple … false true true true
- | x8 ⇒ quadruple … true false false false
- | x9 ⇒ quadruple … true false false true
- | xA ⇒ quadruple … true false true false
- | xB ⇒ quadruple … true false true true
- | xC ⇒ quadruple … true true false false
- | xD ⇒ quadruple … true true false true
- | xE ⇒ quadruple … true true true false
- | xF ⇒ quadruple … true true true true
- ].
-
-ndefinition bits_of_byte8 ≝
-λb:byte8.
- mk_Array8T ? (fst4T … (bits_of_exadecim (cnH ? b)))
- (snd4T … (bits_of_exadecim (cnH ? b)))
- (thd4T … (bits_of_exadecim (cnH ? b)))
- (fth4T … (bits_of_exadecim (cnH ? b)))
- (fst4T … (bits_of_exadecim (cnL ? b)))
- (snd4T … (bits_of_exadecim (cnL ? b)))
- (thd4T … (bits_of_exadecim (cnL ? b)))
- (fth4T … (bits_of_exadecim (cnL ? b))).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/memory/memory_base.ma".
-include "emulator/memory/memory_struct.ma".
-include "num/word32.ma".
-include "common/list.ma".
-
-(* ************************** *)
-(* 8 segmenti da 64Kb → 512Kb *)
-(* 4 + 16 bit indirizzo *)
-(* ************************** *)
-
-(* ********************* *)
-(* MEMORIA E DESCRITTORE *)
-(* ********************* *)
-
-ndefinition aux_20B_filler ≝
-λT:Type.λel:T.
-let lev4 ≝ mk_Array16T T el el el el el el el el el el el el el el el el in
-let lev3 ≝ mk_Array16T ?
- lev4 lev4 lev4 lev4 lev4 lev4 lev4 lev4
- lev4 lev4 lev4 lev4 lev4 lev4 lev4 lev4 in
-let lev2 ≝ mk_Array16T ?
- lev3 lev3 lev3 lev3 lev3 lev3 lev3 lev3
- lev3 lev3 lev3 lev3 lev3 lev3 lev3 lev3 in
-let lev1 ≝ mk_Array16T ?
- lev2 lev2 lev2 lev2 lev2 lev2 lev2 lev2
- lev2 lev2 lev2 lev2 lev2 lev2 lev2 lev2 in
-let lev0 ≝ mk_Array8T ?
- lev1 lev1 lev1 lev1 lev1 lev1 lev1 lev1
- in
-lev0.
-
-ndefinition aux_20B_type ≝
-λT:Type.Array8T (Array16T (Array16T (Array16T (Array16T T)))).
-
-(* tutta la memoria non installata *)
-ndefinition mt_out_of_bound_memory ≝ aux_20B_filler ? MEM_OUT_OF_BOUND.
-
-(* tutta la memoria a 0 *)
-ndefinition mt_zero_memory ≝ aux_20B_filler ? 〈x0,x0〉.
-
-(* visita di un albero da 512Kb di elementi: ln16(512Kb)=5 passaggi *)
-ndefinition mt_visit ≝
-λT:Type.λdata:aux_20B_type T.λsel:oct.λaddr:word16.
- getn_array16T (cnL ? (cnL ? addr)) ?
- (getn_array16T (cnH ? (cnL ? addr)) ?
- (getn_array16T (cnL ? (cnH ? addr)) ?
- (getn_array16T (cnH ? (cnH ? addr)) ?
- (getn_array8T sel ? data)))).
-
-(* scrittura di un elemento in un albero da 512Kb *)
-ndefinition mt_update ≝
-λT:Type.λdata:aux_20B_type T.λsel:oct.λaddr:word16.λv:T.
- let lev1 ≝ getn_array8T sel ? data in
- let lev2 ≝ getn_array16T (cnH ? (cnH ? addr)) ? lev1 in
- let lev3 ≝ getn_array16T (cnL ? (cnH ? addr)) ? lev2 in
- let lev4 ≝ getn_array16T (cnH ? (cnL ? addr)) ? lev3 in
- setn_array8T sel ? data
- (setn_array16T (cnH ? (cnH ? addr)) ? lev1
- (setn_array16T (cnL ? (cnH ? addr)) ? lev2
- (setn_array16T (cnH ? (cnL ? addr)) ? lev3
- (setn_array16T (cnL ? (cnL ? addr)) T lev4 v)))).
-
-(* scrittura di un segmento (max 64Kb) degli otto disponibili *)
-nlet rec mt_update_ranged (T:Type) (data:aux_20B_type T) (sel:oct) (addr:word16) (w:word16) (rw:rec_word16 w) (v:T) on rw ≝
- match rw with
- [ w16_O ⇒ data
- | w16_S w' rw' ⇒ mt_update_ranged T (mt_update T data sel addr v)
- sel (succc ? addr) w' rw' v
- ].
-
-(* scrivi controllando il tipo di memoria *)
-ndefinition mt_mem_update ≝
-λmem:aux_20B_type byte8.
-λchk:aux_20B_type memory_type.
-λsel:oct.λaddr:word16.λv:byte8.
- match mt_visit ? chk sel addr with
- (* ROM? ok, ma il valore viene perso *)
- [ MEM_READ_ONLY ⇒ Some ? mem
- (* RAM? ok *)
- | MEM_READ_WRITE ⇒ Some ? (mt_update ? mem sel addr v)
- (* NON INSTALLATA? no *)
- | MEM_OUT_OF_BOUND ⇒ None ? ].
-
-(* leggi controllando il tipo di memoria *)
-ndefinition mt_mem_read ≝
-λmem:aux_20B_type byte8.
-λchk:aux_20B_type memory_type.
-λsel:oct.λaddr:word16.
- match mt_visit ? chk sel addr with
- [ MEM_READ_ONLY ⇒ Some ? (mt_visit ? mem sel addr)
- | MEM_READ_WRITE ⇒ Some ? (mt_visit ? mem sel addr)
- | MEM_OUT_OF_BOUND ⇒ None ? ].
-
-(* ************************** *)
-(* CARICAMENTO PROGRAMMA/DATI *)
-(* ************************** *)
-
-(* carica a paratire da addr, overflow se si supera 0xFFFF... *)
-nlet rec mt_load_from_source_at (old_mem:aux_20B_type byte8)
- (src:list byte8) (sel:oct) (addr:word16) on src ≝
- match src with
- (* fine di source: carica da old_mem *)
- [ nil ⇒ old_mem
- | cons hd tl ⇒ mt_load_from_source_at (mt_update ? old_mem sel addr hd)
- tl sel (succc ? addr)
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status.ma".
-
-(* *********************************** *)
-(* IMPOSTAZIONI SPECIFICHE DEI MODELLI *)
-(* *********************************** *)
-
-(* modelli di HC05 *)
-ninductive HC05_model : Type ≝
- MC68HC05J5A: HC05_model
- (*..*).
-
-(* memoria degli HC05 *)
-ndefinition memory_type_of_FamilyHC05 ≝
-λm:HC05_model.match m with
- [ MC68HC05J5A ⇒
- [
-(* tutto mappato nel segmento 0 *)
-(* 0x0080-0x00FF *) quadruple … o0 〈〈x0,x0〉:〈x8,x0〉〉 〈〈x0,x0〉:〈x8,x0〉〉 MEM_READ_WRITE (* 128B RAM+STACK *)
-(* 0x0300-0x0CFF *) ; quadruple … o0 〈〈x0,x3〉:〈x0,x0〉〉 〈〈x0,xA〉:〈x0,x0〉〉 MEM_READ_ONLY (* 2560B USER ROM *)
-(* 0x0E00-0x0FFF *) ; quadruple … o0 〈〈x0,xE〉:〈x0,x0〉〉 〈〈x0,x2〉:〈x0,x0〉〉 MEM_READ_ONLY (* 512B INTERNAL ROM *) ]
- (* etc.. *)
- ].
-
-(* parametrizzati i non deterministici rispetto a tutti i valori casuali
- che verranno dati dall'esterno di tipo byte8 (ndby1-2) e bool (ndbo1-5).
- l'ACCENSIONE e' totalmente equivalente ad un reset causato da calo di tensione
- (reset V-low), la memoria ed il check possono essere passati *)
-ndefinition start_of_model_HC05 ≝
-λmcu:HC05_model.λt:memory_impl.
-λmem:aux_mem_type t.λchk:aux_chk_type t.
-λndby1,ndby2:byte8.λirqfl,ndbo1,ndbo2,ndbo3,ndbo4,ndbo5:bool.
- let build ≝ λspm,spf,pcm:word16.
- mk_any_status HC05 t
- (mk_alu_HC05
- (* acc_low: ? *) ndby1
- (* indx_low: ? *) ndby2
- (* sp: reset *) (orc ? (andc ? 〈〈x0,x0〉:〈xF,xF〉〉 spm) spf)
- (* spm *) spm
- (* spf *) spf
- (* pc: reset+fetch *) (andc ? (mk_word16 (mem_read_abs t mem o0 (andc ? 〈〈xF,xF〉:〈xF,xE〉〉 pcm))
- (mem_read_abs t mem o0 (andc ? 〈〈xF,xF〉:〈xF,xF〉〉 pcm))) pcm)
- (* pcm *) pcm
- (* H: ? *) ndbo1
- (* I: reset *) true
- (* N: ? *) ndbo2
- (* Z: ? *) ndbo3
- (* C: ? *) ndbo4
- (* IRQ: ? *) irqfl)
- (* mem *) mem
- (* chk *) chk
- (* clk: reset *) (None ?) in
- match mcu with
- [ MC68HC05J5A ⇒ build 〈〈x0,x0〉:〈x3,xF〉〉 〈〈x0,x0〉:〈xC,x0〉〉 〈〈x0,xF〉:〈xF,xF〉〉
- (*..*)
- ].
-
-(* cio' che non viene resettato mantiene il valore precedente: nella documentazione
- viene riportato come "unaffected"/"indeterminate"/"unpredictable"
- il soft RESET e' diverso da un calo di tensione e la ram non variera' *)
-ndefinition reset_of_model_HC05 ≝
-λt:memory_impl.λs:any_status HC05 t.
- (mk_any_status HC05 t
- (mk_alu_HC05
- (* acc_low: inv. *) (acc_low_reg_HC05 (alu ? t s))
- (* indx_low: inv. *) (indX_low_reg_HC05 (alu ? t s))
- (* sp: reset *) (orc ? (andc ? 〈〈x0,x0〉:〈xF,xF〉〉 (sp_mask_HC05 (alu ? t s)))
- (sp_fix_HC05 (alu ? t s)))
- (* spm: inv. *) (sp_mask_HC05 (alu ? t s))
- (* spf: inv. *) (sp_fix_HC05 (alu ? t s))
- (* pc: reset+fetch *) (andc ? (mk_word16 (mem_read_abs t (mem_desc ? t s) o0 (andc ? 〈〈xF,xF〉:〈xF,xE〉〉 (pc_mask_HC05 (alu ? t s))))
- (mem_read_abs t (mem_desc ? t s) o0 (andc ? 〈〈xF,xF〉:〈xF,xF〉〉 (pc_mask_HC05 (alu ? t s)))))
- (pc_mask_HC05 (alu ? t s)))
- (* pcm: inv. *) (pc_mask_HC05 (alu ? t s))
- (* H: inv. *) (h_flag_HC05 (alu ? t s))
- (* I: reset *) true
- (* N: inv. *) (n_flag_HC05 (alu ? t s))
- (* Z: inv. *) (z_flag_HC05 (alu ? t s))
- (* C: inv. *) (c_flag_HC05 (alu ? t s))
- (* IRQ: inv *) (irq_flag_HC05 (alu ? t s)))
- (* mem: inv. *) (mem_desc ? t s)
- (* chk: inv. *) (chk_desc ? t s)
- (* clk: reset *) (None ?)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status.ma".
-
-(* *********************************** *)
-(* IMPOSTAZIONI SPECIFICHE DEI MODELLI *)
-(* *********************************** *)
-
-(* modelli di HC08 *)
-ninductive HC08_model : Type ≝
- MC68HC08AB16A: HC08_model
- (*..*).
-
-(* memoria degli HC08 *)
-ndefinition memory_type_of_FamilyHC08 ≝
-λm:HC08_model.match m with
- [ MC68HC08AB16A ⇒
- [
-(* tutto mappato nel segmento 0 *)
-(* 0x0050-0x024F *) quadruple … o0 〈〈x0,x0〉:〈x5,x0〉〉 〈〈x0,x2〉:〈x0,x0〉〉 MEM_READ_WRITE (* 512B RAM *)
-(* 0x0800-0x09FF *) ; quadruple … o0 〈〈x0,x8〉:〈x0,x0〉〉 〈〈x0,x2〉:〈x0,x0〉〉 MEM_READ_ONLY (* 512B EEPROM *)
-(* 0xBE00-0xFDFF *) ; quadruple … o0 〈〈xB,xE〉:〈x0,x0〉〉 〈〈x4,x0〉:〈x0,x0〉〉 MEM_READ_ONLY (* 16384B ROM *)
-(* 0xFE20-0xFF52 *) ; quadruple … o0 〈〈xF,xE〉:〈x2,x0〉〉 〈〈x0,x1〉:〈x3,x3〉〉 MEM_READ_ONLY (* 307B ROM *)
-(* 0xFFD0-0xFFFF *) ; quadruple … o0 〈〈xF,xF〉:〈xD,x0〉〉 〈〈x0,x0〉:〈x3,x0〉〉 MEM_READ_ONLY (* 48B ROM *) ]
- (* etc... *)
- ].
-
-(* parametrizzati i non deterministici rispetto a tutti i valori casuali
- che verranno dati dall'esterno di tipo byte8 (ndby1-2) e bool (ndbo1-5).
- l'ACCENSIONE e' totalmente equivalente ad un reset causato da calo di tensione
- (reset V-low), la memoria ed il check possono essere passati *)
-ndefinition start_of_model_HC08 ≝
-λmcu:HC08_model.λt:memory_impl.
-λmem:aux_mem_type t.λchk:aux_chk_type t.
-λndby1,ndby2:byte8.λirqfl,ndbo1,ndbo2,ndbo3,ndbo4,ndbo5:bool.
- mk_any_status HC08 t
- (mk_alu_HC08
- (* acc_low: ? *) ndby1
- (* indw_low: ? *) ndby2
- (* indx_high: reset *) 〈x0,x0〉
- (* sp: reset *) 〈〈x0,x0〉:〈xF,xF〉〉
- (* pc: reset+fetch *) (mk_word16 (mem_read_abs t mem o0 〈〈xF,xF〉:〈xF,xE〉〉)
- (mem_read_abs t mem o0 〈〈xF,xF〉:〈xF,xF〉〉))
- (* V: ? *) ndbo1
- (* H: ? *) ndbo2
- (* I: reset *) true
- (* N: ? *) ndbo3
- (* Z: ? *) ndbo4
- (* C: ? *) ndbo5
- (* IRQ: ? *) irqfl)
- (* mem *) mem
- (* chk *) chk
- (* clk: reset *) (None ?).
-
-(* cio' che non viene resettato mantiene il valore precedente: nella documentazione
- viene riportato come "unaffected"/"indeterminate"/"unpredictable"
- il soft RESET e' diverso da un calo di tensione e la ram non variera' *)
-ndefinition reset_of_model_HC08 ≝
-λt:memory_impl.λs:any_status HC08 t.
- (mk_any_status HC08 t
- (mk_alu_HC08
- (* acc_low: inv. *) (acc_low_reg_HC08 (alu ? t s))
- (* indx_low: inv. *) (indX_low_reg_HC08 (alu ? t s))
- (* indx_high: reset *) 〈x0,x0〉
- (* sp: reset *) 〈〈x0,x0〉:〈xF,xF〉〉
- (* pc: reset+fetch *) (mk_word16 (mem_read_abs t (mem_desc ? t s) o0 〈〈xF,xF〉:〈xF,xE〉〉)
- (mem_read_abs t (mem_desc ? t s) o0 〈〈xF,xF〉:〈xF,xE〉〉))
- (* V: inv. *) (v_flag_HC08 (alu ? t s))
- (* H: inv. *) (h_flag_HC08 (alu ? t s))
- (* I: reset *) true
- (* N: inv. *) (n_flag_HC08 (alu ? t s))
- (* Z: inv. *) (z_flag_HC08 (alu ? t s))
- (* C: inv. *) (c_flag_HC08 (alu ? t s))
- (* IRQ: inv *) (irq_flag_HC08 (alu ? t s)))
- (* mem: inv. *) (mem_desc ? t s)
- (* chk: inv. *) (chk_desc ? t s)
- (* clk: reset *) (None ?)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status.ma".
-
-(* *********************************** *)
-(* IMPOSTAZIONI SPECIFICHE DEI MODELLI *)
-(* *********************************** *)
-
-(* modelli di HCS08 *)
-ninductive HCS08_model : Type ≝
- MC9S08AW60 : HCS08_model
-| MC9S08GB60 : HCS08_model
- (*..*).
-
-(* memoria degli HCS08 *)
-ndefinition memory_type_of_FamilyHCS08 ≝
-λm:HCS08_model.match m with
- [ MC9S08AW60 ⇒
- [
-(* tutto mappato nel segmento 0 *)
-(* 0x0070-0x086F *) quadruple … o0 〈〈x0,x0〉:〈x7,x0〉〉 〈〈x0,x8〉:〈x0,x0〉〉 MEM_READ_WRITE (* 2048B RAM *)
-(* 0x0870-0x17FF *) ; quadruple … o0 〈〈x0,x8〉:〈x7,x0〉〉 〈〈x0,xF〉:〈x9,x0〉〉 MEM_READ_ONLY (* 3984B FLASH *)
-(* 0x1860-0xFFFF *) ; quadruple … o0 〈〈x1,x8〉:〈x6,x0〉〉 〈〈xE,x7〉:〈xA,x0〉〉 MEM_READ_ONLY (* 59296B FLASH *) ]
- | MC9S08GB60 ⇒
- [
-(* tutto mappato nel segmento 0 *)
-(* 0x0080-0x107F *) quadruple … o0 〈〈x0,x0〉:〈x8,x0〉〉 〈〈x1,x0〉:〈x0,x0〉〉 MEM_READ_WRITE (* 4096B RAM *)
-(* 0x1080-0x17FF *) ; quadruple … o0 〈〈x1,x0〉:〈x8,x0〉〉 〈〈x0,x7〉:〈x8,x0〉〉 MEM_READ_ONLY (* 1920B FLASH *)
-(* 0x182C-0xFFFF *) ; quadruple … o0 〈〈x1,x8〉:〈x2,xC〉〉 〈〈xE,x7〉:〈xD,x4〉〉 MEM_READ_ONLY (* 59348B FLASH *) ]
- (* etc... *)
- ].
-
-(* parametrizzati i non deterministici rispetto a tutti i valori casuali
- che verranno dati dall'esterno di tipo byte8 (ndby1-2) e bool (ndbo1-5).
- l'ACCENSIONE e' totalmente equivalente ad un reset causato da calo di tensione
- (reset V-low), la memoria ed il check possono essere passati *)
-ndefinition start_of_model_HCS08 ≝
-λmcu:HCS08_model.λt:memory_impl.
-λmem:aux_mem_type t.λchk:aux_chk_type t.
-λndby1,ndby2:byte8.λirqfl,ndbo1,ndbo2,ndbo3,ndbo4,ndbo5:bool.
- mk_any_status HCS08 t
- (mk_alu_HC08
- (* acc_low: ? *) ndby1
- (* indw_low: ? *) ndby2
- (* indx_high: reset *) 〈x0,x0〉
- (* sp: reset *) 〈〈x0,x0〉:〈xF,xF〉〉
- (* pc: reset+fetch *) (mk_word16 (mem_read_abs t mem o0 〈〈xF,xF〉:〈xF,xE〉〉)
- (mem_read_abs t mem o0 〈〈xF,xF〉:〈xF,xF〉〉))
- (* V: ? *) ndbo1
- (* H: ? *) ndbo2
- (* I: reset *) true
- (* N: ? *) ndbo3
- (* Z: ? *) ndbo4
- (* C: ? *) ndbo5
- (* IRQ: ? *) irqfl)
- (* mem *) mem
- (* chk *) chk
- (* clk: reset *) (None ?).
-
-(* cio' che non viene resettato mantiene il valore precedente: nella documentazione
- viene riportato come "unaffected"/"indeterminate"/"unpredictable"
- il soft RESET e' diverso da un calo di tensione e la ram non variera' *)
-ndefinition reset_of_model_HCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.
- (mk_any_status HCS08 t
- (mk_alu_HC08
- (* acc_low: inv. *) (acc_low_reg_HC08 (alu ? t s))
- (* indx_low: inv. *) (indX_low_reg_HC08 (alu ? t s))
- (* indx_high: reset *) 〈x0,x0〉
- (* sp: reset *) 〈〈x0,x0〉:〈xF,xF〉〉
- (* pc: reset+fetch *) (mk_word16 (mem_read_abs t (mem_desc ? t s) o0 〈〈xF,xF〉:〈xF,xE〉〉)
- (mem_read_abs t (mem_desc ? t s) o0 〈〈xF,xF〉:〈xF,xE〉〉))
- (* V: inv. *) (v_flag_HC08 (alu ? t s))
- (* H: inv. *) (h_flag_HC08 (alu ? t s))
- (* I: reset *) true
- (* N: inv. *) (n_flag_HC08 (alu ? t s))
- (* Z: inv. *) (z_flag_HC08 (alu ? t s))
- (* C: inv. *) (c_flag_HC08 (alu ? t s))
- (* IRQ: inv *) (irq_flag_HC08 (alu ? t s)))
- (* mem: inv. *) (mem_desc ? t s)
- (* chk: inv. *) (chk_desc ? t s)
- (* clk: reset *) (None ?)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status.ma".
-
-(* *********************************** *)
-(* IMPOSTAZIONI SPECIFICHE DEI MODELLI *)
-(* *********************************** *)
-
-(* modelli di IP2022 *)
-ninductive IP2022_model : Type ≝
- IP2K: IP2022_model.
-
-(* memoria degli IP2022 *)
-ndefinition memory_type_of_FamilyIP2022 ≝
-λm:IP2022_model.match m with
- [ IP2K ⇒
- [
-(* mappato nel segmento 0 *)
-(* 0x00000002-0x0000007F *) quadruple … o0 〈〈x0,x0〉:〈x0,x2〉〉 〈〈x0,x0〉:〈x7,xE〉〉 MEM_READ_ONLY (* 126B SystemMemoryReg *)
-(* 0x00000080-0x00000FFF *) ; quadruple … o0 〈〈x0,x0〉:〈x8,x0〉〉 〈〈x0,xF〉:〈x8,x0〉〉 MEM_READ_WRITE (* 3968 UserMemoryReg+RAM+STACK *)
-(* tutto mappato nel segmento 1 *)
-(* 0x02000000-0x02003FFF *) ; quadruple … o1 〈〈x0,x0〉:〈x0,x0〉〉 〈〈x4,x0〉:〈x0,x0〉〉 MEM_READ_WRITE (* 16384B PROGRAM RAM *)
-(* tutto mappato nel segmento 2 *)
-(* 0x02010000-0x02013FFF *) ; quadruple … o2 〈〈x0,x0〉:〈x0,x0〉〉 〈〈x4,x0〉:〈x0,x0〉〉 MEM_READ_ONLY (* 16384B PROGRAM FLASH *)
-(* 0x02014000-0x02017FFF *) ; quadruple … o2 〈〈x4,x0〉:〈x0,x0〉〉 〈〈x4,x0〉:〈x0,x0〉〉 MEM_READ_ONLY (* 16384B PROGRAM FLASH *)
-(* 0x02018000-0x0201BFFF *) ; quadruple … o2 〈〈x8,x0〉:〈x0,x0〉〉 〈〈x4,x0〉:〈x0,x0〉〉 MEM_READ_ONLY (* 16384B PROGRAM FLASH *)
-(* 0x0201C000-0x0201FFFF *) ; quadruple … o2 〈〈xC,x0〉:〈x0,x0〉〉 〈〈x4,x0〉:〈x0,x0〉〉 MEM_READ_ONLY (* 16384B PROGRAM FLASH *) ]
- (*..*)
- ].
-
-(* punto di riferimento per accessi $FR, ($IP) ($DP) ($SP) *)
-ndefinition IP2022_gpr_base ≝ 〈〈〈x0,x0〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x0〉〉〉.
-(* punto di riferimento per accessi ($PC) ($ADDR) *)
-ndefinition IP2022_ram_base ≝ 〈〈〈x0,x2〉:〈x0,x0〉〉.〈〈x0,x0〉:〈x0,x0〉〉〉.
-
-(* parametrizzati i non deterministici rispetto a tutti i valori casuali
- che verranno dati dall'esterno di tipo byte8 (ndby1-2) e bool (ndbo1-5).
- l'ACCENSIONE e' totalmente equivalente ad un reset causato da calo di tensione
- (reset V-low), la memoria ed il check possono essere passati *)
-ndefinition start_of_model_IP2022 ≝
-λmcu:IP2022_model.λt:memory_impl.
-λmem:aux_mem_type t.λchk:aux_chk_type t.
-λndby1,ndby2:byte8.λirqfl,ndbo1,ndbo2,ndbo3,ndbo4,ndbo5:bool.
- (mk_any_status IP2022 t
- (mk_alu_IP2022
- (* acc_low: reset *) 〈x0,x0〉
- (* mulh: reset *) 〈x0,x0〉
- (* addrsel: reset *) 〈x0,x0〉
- (* addr: reset *) new_addrarray
- (* call: reset *) new_callstack
- (* ip: reset *) 〈〈x0,x0〉:〈x0,x0〉〉
- (* dp: reset *) 〈〈x0,x0〉:〈x0,x0〉〉
- (* data: reset *) 〈〈x0,x0〉:〈x0,x0〉〉
- (* sp: reset *) 〈〈x0,x0〉:〈x0,x0〉〉
- (* pc: reset *) 〈〈xF,xF〉:〈xF,x0〉〉
- (* speed: reset *) x3
- (* page: reset *) o7
- (* H: reset *) false
- (* Z: reset *) false
- (* C: reset *) false
- (* skip mode: reset *) false)
- (* mem *) mem
- (* chk *) chk
- (* clk: reset *) (None ?)).
-
-(* cio' che non viene resettato mantiene il valore precedente: nella documentazione
- viene riportato come "unaffected"/"indeterminate"/"unpredictable"
- il soft RESET e' diverso da un calo di tensione e la ram non variera' *)
-ndefinition reset_of_model_IP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.
- (mk_any_status IP2022 t
- (mk_alu_IP2022
- (* acc_low: reset *) 〈x0,x0〉
- (* mulh: reset *) 〈x0,x0〉
- (* addrsel: reset *) 〈x0,x0〉
- (* addr: reset *) new_addrarray
- (* call: reset *) new_callstack
- (* ip: reset *) 〈〈x0,x0〉:〈x0,x0〉〉
- (* dp: reset *) 〈〈x0,x0〉:〈x0,x0〉〉
- (* data: reset *) 〈〈x0,x0〉:〈x0,x0〉〉
- (* sp: reset *) 〈〈x0,x0〉:〈x0,x0〉〉
- (* pc: reset *) 〈〈xF,xF〉:〈xF,x0〉〉
- (* speed: reset *) x3
- (* page: reset *) o7
- (* H: reset *) false
- (* Z: reset *) false
- (* C: reset *) false
- (* skip mode: reset *) false)
- (* mem: inv. *) (mem_desc ? t s)
- (* chk: inv. *) (chk_desc ? t s)
- (* clk: reset *) (None ?)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status.ma".
-
-(* *********************************** *)
-(* IMPOSTAZIONI SPECIFICHE DEI MODELLI *)
-(* *********************************** *)
-
-(* modelli di RS08 *)
-ninductive RS08_model : Type ≝
- MC9RS08KA1 : RS08_model
-| MC9RS08KA2 : RS08_model.
-
-(* memoria dei RS08 *)
-ndefinition memory_type_of_FamilyRS08 ≝
-λm:RS08_model.match m with
- [ MC9RS08KA1 ⇒
- [
-(* tutto mappato nel segmento 0 *)
-(* 0x0020-0x004F *) quadruple … o0 〈〈x0,x0〉:〈x2,x0〉〉 〈〈x0,x0〉:〈x3,x0〉〉 MEM_READ_WRITE (* 48B RAM *)
-(* 0x00C0-0x00FF *) ; quadruple … o0 〈〈x0,x0〉:〈xC,x0〉〉 〈〈x0,x0〉:〈x4,x0〉〉 MEM_READ_WRITE (* 64B RAM PAGING *)
-(* 0x0200-0x023F *) ; quadruple … o0 〈〈x0,x2〉:〈x0,x0〉〉 〈〈x0,x0〉:〈x4,x0〉〉 MEM_READ_WRITE (* 64B MEMORY MAPPED IO *)
-(* 0x3C00-0x3FFF *) ; quadruple … o0 〈〈x3,xC〉:〈x0,x0〉〉 〈〈x0,x4〉:〈x0,x0〉〉 MEM_READ_ONLY (* 1024B FLASH *) ]
- | MC9RS08KA2 ⇒
- [
-(* tutto mappato nel segmento 0 *)
-(* 0x0020-0x004F *) quadruple … o0 〈〈x0,x0〉:〈x2,x0〉〉 〈〈x0,x0〉:〈x3,x0〉〉 MEM_READ_WRITE (* 48B RAM *)
-(* 0x00C0-0x00FF *) ; quadruple … o0 〈〈x0,x0〉:〈xC,x0〉〉 〈〈x0,x0〉:〈x4,x0〉〉 MEM_READ_WRITE (* 64B RAM PAGING *)
-(* 0x0200-0x023F *) ; quadruple … o0 〈〈x0,x2〉:〈x0,x0〉〉 〈〈x0,x0〉:〈x4,x0〉〉 MEM_READ_WRITE (* 64B MEMORY MAPPED IO *)
-(* 0x3800-0x3FFF *) ; quadruple … o0 〈〈x3,x8〉:〈x0,x0〉〉 〈〈x0,x8〉:〈x0,x0〉〉 MEM_READ_ONLY (* 2048B FLASH *) ]
- ].
-
-(* parametrizzati i non deterministici rispetto a tutti i valori casuali
- che verranno dati dall'esterno di tipo byte8 (ndby1-2) e bool (ndbo1-5).
- l'ACCENSIONE e' totalmente equivalente ad un reset causato da calo di tensione
- (reset V-low), la memoria ed il check possono essere passati *)
-ndefinition start_of_model_RS08 ≝
-λmcu:RS08_model.λt:memory_impl.
-λmem:aux_mem_type t.λchk:aux_chk_type t.
-λndby1,ndby2:byte8.λirqfl,ndbo1,ndbo2,ndbo3,ndbo4,ndbo5:bool.
- (mk_any_status RS08 t
- (mk_alu_RS08
- (* acc_low: reset *) 〈x0,x0〉
- (* pc: reset *) 〈〈x3,xF〉:〈xF,xD〉〉
- (* pcm *) 〈〈x3,xF〉:〈xF,xF〉〉
- (* spc: reset *) 〈〈x3,xF〉:〈xF,xD〉〉
- (* xm: reset *) 〈x0,x0〉
- (* psm: *) 〈x8,x0〉
- (* Z: reset *) false
- (* C: reset *) false)
- (* mem *) mem
- (* chk *) chk
- (* clk: reset *) (None ?)).
-
-(* cio' che non viene resettato mantiene il valore precedente: nella documentazione
- viene riportato come "unaffected"/"indeterminate"/"unpredictable"
- il soft RESET e' diverso da un calo di tensione e la ram non variera' *)
-ndefinition reset_of_model_RS08 ≝
-λt:memory_impl.λs:any_status RS08 t.
- (mk_any_status RS08 t
- (mk_alu_RS08
- (* acc_low: reset *) 〈x0,x0〉
- (* pc: reset *) 〈〈x3,xF〉:〈xF,xD〉〉
- (* pcm *) (pc_mask_RS08 (alu ? t s))
- (* spc: reset *) 〈〈x3,xF〉:〈xF,xD〉〉
- (* xm: reset *) 〈x0,x0〉
- (* psm: reset *) 〈x8,x0〉
- (* Z: reset *) false
- (* C: reset *) false)
- (* mem: inv. *) (mem_desc ? t s)
- (* chk: inv. *) (chk_desc ? t s)
- (* clk: reset *) (None ?)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/model/HC05_model.ma".
-include "emulator/model/HC08_model.ma".
-include "emulator/model/HCS08_model.ma".
-include "emulator/model/RS08_model.ma".
-include "emulator/model/IP2022_model.ma".
-
-(* *********************************** *)
-(* IMPOSTAZIONI SPECIFICHE DEI MODELLI *)
-(* *********************************** *)
-
-(* raggruppamento dei modelli *)
-ndefinition aux_model_type ≝
-λm:mcu_type.match m with
- [ HC05 ⇒ HC05_model
- | HC08 ⇒ HC08_model
- | HCS08 ⇒ HCS08_model
- | RS08 ⇒ RS08_model
- | IP2022 ⇒ IP2022_model
- ].
-
-(* ∀modello.descrizione della memoria installata *)
-ndefinition memory_type_of_model ≝
-λm:mcu_type.
- match m
- return λm.aux_model_type m → ?
- with
- [ HC05 ⇒ memory_type_of_FamilyHC05
- | HC08 ⇒ memory_type_of_FamilyHC08
- | HCS08 ⇒ memory_type_of_FamilyHCS08
- | RS08 ⇒ memory_type_of_FamilyRS08
- | IP2022 ⇒ memory_type_of_FamilyIP2022
- ].
-
-(* dato un modello costruisce un descrittore a partire dalla lista precedente *)
-nlet rec build_memory_type_of_model_aux t param (result:aux_chk_type t) on param ≝
- match param with
- [ nil ⇒ result
- | cons hd tl ⇒
- build_memory_type_of_model_aux t tl
- (check_update_ranged t result (fst4T … hd) (snd4T … hd)
- (thd4T … hd) (fth4T … hd)) ].
-
-ndefinition build_memory_type_of_model ≝
-λm:mcu_type.λmcu:aux_model_type m.λt:memory_impl.
- build_memory_type_of_model_aux t (memory_type_of_model m mcu) (out_of_bound_memory t).
-
-ndefinition start_of_model ≝
-λm:mcu_type.
- match m
- return λm.aux_model_type m → ?
- with
- [ HC05 ⇒ start_of_model_HC05
- | HC08 ⇒ start_of_model_HC08
- | HCS08 ⇒ start_of_model_HCS08
- | RS08 ⇒ start_of_model_RS08
- | IP2022 ⇒ start_of_model_IP2022
- ].
-
-ndefinition reset_of_model ≝
-λm:mcu_type.
- match m return λm.Πt.(any_status m t) → ? with
- [ HC05 ⇒ reset_of_model_HC05
- | HC08 ⇒ reset_of_model_HC08
- | HCS08 ⇒ reset_of_model_HCS08
- | RS08 ⇒ reset_of_model_RS08
- | IP2022 ⇒ reset_of_model_IP2022
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/multivm/multivm_base.ma".
-include "emulator/read_write/load_write.ma".
-
-(* ************************************************ *)
-(* LOGICHE AUSILIARE CHE ACCOMUNANO PIU' OPERAZIONI *)
-(* ************************************************ *)
-
-(* A = [true] fAMC(A,M,C), [false] A *)
-(* cioe' in caso di false l'operazione viene eseguita ma modifica solo i flag *)
-(* fAMC e' la logica da applicare: somma con/senza carry *)
-ndefinition execute_ADC_ADD_aux ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.λsetflag:bool.
-λfAMC:bool → byte8 → byte8 → ProdT bool byte8.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- let A_op ≝ get_acc_8_low_reg … s_tmp1 in
- match fAMC (get_c_flag … s_tmp1) A_op M_op with
- [ pair carry R_op ⇒
- let A7 ≝ getMSBc ? A_op in
- let M7 ≝ getMSBc ? M_op in
- let R7 ≝ getMSBc ? R_op in
- let A3 ≝ getMSBc ? (cnL ? A_op) in
- let M3 ≝ getMSBc ? (cnL ? M_op) in
- let R3 ≝ getMSBc ? (cnL ? R_op) in
- (* A = [true] fAMC(A,M,C), [false] A *)
- let s_tmp2 ≝ match setflag with [ true ⇒ set_acc_8_low_reg … s_tmp1 R_op | false ⇒ s_tmp1 ] in
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp3 ≝ set_zflb … s_tmp2 R_op in
- (* C = A7&M7 | M7&nR7 | nR7&A7 *)
- let s_tmp4 ≝ set_c_flag … s_tmp3 ((A7⊗M7) ⊕ (M7⊗(⊖R7)) ⊕ ((⊖R7)⊗A7)) in
- (* N = R7 *)
- let s_tmp5 ≝ set_nflb … s_tmp4 R_op in
- (* H = A3&M3 | M3&nR3 | nR3&A3 *)
- let s_tmp6 ≝ setweak_h_flag … s_tmp5 ((A3⊗M3) ⊕ (M3⊗(⊖R3)) ⊕ ((⊖R3)⊗A3)) in
- (* V = A7&M7&nR7 | nA7&nM7&R7 *)
- let s_tmp7 ≝ setweak_v_flag … s_tmp6 ((A7⊗M7⊗(⊖R7)) ⊕ ((⊖A7)⊗(⊖M7)⊗R7)) in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp7 new_pc) ]]).
-
-(* A = [true] fAM(A,M), [false] A *)
-(* cioe' in caso di false l'operazione viene eseguita ma modifica solo i flag *)
-(* fAM e' la logica da applicare: and/xor/or *)
-ndefinition execute_AND_BIT_EOR_ORA_aux ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.λsetflag:bool.
-λfAM:byte8 → byte8 → byte8.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- let R_op ≝ fAM (get_acc_8_low_reg … s_tmp1) M_op in
- (* A = [true] fAM(A,M), [false] A *)
- let s_tmp2 ≝ match setflag with [ true ⇒ set_acc_8_low_reg … s_tmp1 R_op | false ⇒ s_tmp1 ] in
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp3 ≝ set_zflb … s_tmp2 R_op in
- (* N = R7 *)
- let s_tmp4 ≝ set_nflb … s_tmp3 R_op in
- (* V = 0 *)
- let s_tmp5 ≝ setweak_v_flag … s_tmp4 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp5 new_pc) ]).
-
-(* M = fMC(M,C) *)
-(* fMC e' la logica da applicare: rc_/ro_/sh_ *)
-ndefinition execute_ASL_ASR_LSR_ROL_ROR_aux ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
-λfMC:bool → byte8 → ProdT bool byte8.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op _ ⇒
- match fMC (get_c_flag … s_tmp1) M_op with [ pair carry R_op ⇒
- (* M = fMC(M,C) *)
- opt_map … (multi_mode_writeb … s_tmp1 cur_pc auxMode_ok i R_op)
- (λS_PC.match S_PC with
- [ pair s_tmp2 new_pc ⇒
- (* C = carry *)
- let s_tmp3 ≝ set_c_flag … s_tmp2 carry in
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp4 ≝ set_zflb … s_tmp3 R_op in
- (* N = R7 *)
- let s_tmp5 ≝ set_nflb … s_tmp4 R_op in
- (* V = R7 ⊙ carry *)
- let s_tmp6 ≝ setweak_v_flag … s_tmp5 ((getMSBc ? R_op) ⊙ carry) in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp6 new_pc) ])]]).
-
-(* branch con byte+estensione segno *)
-ndefinition branched_pc ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λb:byte8.
- get_pc_reg … (set_pc_reg … s (plusc_d_d ? cur_pc (exts_w16 b))).
-
-(* if COND=1 branch *)
-(* tutti i branch calcoleranno la condizione e la passeranno qui *)
-ndefinition execute_any_BRANCH ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.λfCOND:bool.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- (* if true, branch *)
- match fCOND with
- (* newpc = nextpc + rel *)
- [ true ⇒ Some ? (pair … s_tmp1 (branched_pc … s_tmp1 new_pc M_op))
- (* newpc = nextpc *)
- | false ⇒ Some ? (pair … s_tmp1 new_pc) ]]).
-
-(* Mn = filtered optval *)
-(* il chiamante passa 0x00 per azzerare, 0xFF per impostare il bit di M *)
-ndefinition execute_BCLRn_BSETn_aux ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.λoptval:byte8.
- (* Mn = filtered optval *)
- opt_map … (multi_mode_writeb … s cur_pc auxMode_ok i optval)
- (λS_PC.match S_PC with
- (* newpc = nextpc *)
- [ pair s_tmp1 new_pc ⇒ Some ? (pair … s_tmp1 new_pc) ]).
-
-(* if COND(Mn) branch *)
-(* il chiamante passa la logica da testare (0x00,¬0x00) e poi si salta *)
-ndefinition execute_BRCLRn_BRSETn_aux ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.λfCOND:byte8 → bool.
- opt_map … (multi_mode_loadw … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒ match M_op with
- [ mk_comp_num MH_op ML_op ⇒
- (* if COND(Mn) branch *)
- match fCOND MH_op with
- (* newpc = nextpc + rel *)
- [ true ⇒ Some ? (pair … s_tmp1 (branched_pc … s_tmp1 new_pc ML_op))
- (* newpc = nextpc *)
- | false ⇒ Some ? (pair … s_tmp1 new_pc) ]]]).
-
-(* A = [true] fAMC(A,M,C), [false] A *)
-(* cioe' in caso di false l'operazione viene eseguita ma modifica solo i flag *)
-(* fAMC e' la logica da applicare: sottrazione con/senza carry *)
-ndefinition execute_CMP_SBC_SUB_aux ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.λsetflag:bool.
-λfAMC:bool → byte8 → byte8 → ProdT bool byte8.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- let A_op ≝ get_acc_8_low_reg … s_tmp1 in
- match fAMC (get_c_flag … s_tmp1) A_op M_op with
- [ pair carry R_op ⇒
- let A7 ≝ getMSBc ? A_op in
- let M7 ≝ getMSBc ? M_op in
- let R7 ≝ getMSBc ? R_op in
- (* A = [true] fAMC(A,M,C), [false] A *)
- let s_tmp2 ≝ match setflag with [ true ⇒ set_acc_8_low_reg … s_tmp1 R_op | false ⇒ s_tmp1 ] in
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp3 ≝ set_zflb … s_tmp2 R_op in
- (* C = nA7&M7 | M7&R7 | R7&nA7 *)
- let s_tmp4 ≝ set_c_flag … s_tmp3 (((⊖A7)⊗M7) ⊕ (M7⊗R7) ⊕ (R7⊗(⊖A7))) in
- (* N = R7 *)
- let s_tmp5 ≝ set_nflb … s_tmp4 R_op in
- (* V = A7&nM7&nR7 | nA7&M7&R7 *)
- let s_tmp6 ≝ setweak_v_flag … s_tmp5 ((A7⊗(⊖M7)⊗(⊖R7)) ⊕ ((⊖A7)⊗M7⊗R7)) in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp6 new_pc) ]]).
-
-(* M = fM(M) *)
-(* fM e' la logica da applicare: not/neg/++/-- *)
-ndefinition execute_COM_DEC_INC_NEG_aux ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
-λfM:byte8 → byte8.λfV:bool → bool → bool.λfC:bool → byte8 → bool.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op _ ⇒
- let R_op ≝ fM M_op in
- (* M = fM(M) *)
- opt_map … (multi_mode_writeb … s_tmp1 cur_pc auxMode_ok i R_op)
- (λS_PC.match S_PC with
- [ pair s_tmp2 new_pc ⇒
- (* C = fCR (C,R) *)
- let s_tmp3 ≝ set_c_flag … s_tmp2 (fC (get_c_flag … s_tmp2) R_op) in
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp4 ≝ set_zflb … s_tmp3 R_op in
- (* N = R7 *)
- let s_tmp5 ≝ set_nflb … s_tmp4 R_op in
- (* V = fV (M7,R7) *)
- let s_tmp6 ≝ setweak_v_flag … s_tmp5 (fV (getMSBc ? M_op) (getMSBc ? R_op)) in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp6 new_pc) ])]).
-
-(* il classico push *)
-ndefinition aux_push ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval:byte8.
- opt_map … (get_sp_reg … s)
- (* [SP] = val *)
- (λSP_op.opt_map … (memory_filter_write … s SP_op auxMode_ok val)
- (* SP -- *)
- (λs_tmp1.opt_map … (set_sp_reg … s_tmp1 (predc ? SP_op))
- (λs_tmp2.Some ? s_tmp2))).
-
-(* il classico pop *)
-(* NB: l'incremento di SP deve essere filtrato dalla ALU, quindi get(set(SP)) *)
-ndefinition aux_pop ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- opt_map … (get_sp_reg … s)
- (* SP ++ *)
- (λSP_op.opt_map … (set_sp_reg … s (succc ? SP_op))
- (λs_tmp1.opt_map … (get_sp_reg … s_tmp1)
- (* val = [SP] *)
- (λSP_op'.opt_map … (memory_filter_read … s_tmp1 SP_op')
- (λval.Some ? (pair … s_tmp1 val))))).
-
-(* CCR corrisponde a V11HINZC e cmq 1 se un flag non esiste *)
-(* i flag mantengono posizione costante nelle varie ALU, e se non sono
- implementati corrispondono a 1 *)
-ndefinition aux_get_CCR_aux ≝
-λopt:option bool.match opt with [ None ⇒ true | Some b ⇒ b ].
-
-ndefinition aux_get_CCR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- byte8_of_bits (mk_Array8T ?
- (aux_get_CCR_aux (get_v_flag … s))
- true
- true
- (aux_get_CCR_aux (get_h_flag … s))
- (aux_get_CCR_aux (get_i_flag … s))
- (aux_get_CCR_aux (get_n_flag … s))
- (get_z_flag … s)
- (get_c_flag … s)).
-
-(* CCR corrisponde a V11HINZC *)
-(* i flag mantengono posizione costante nelle varie ALU, e se non sono
- implementati si puo' usare tranquillamente setweak *)
-ndefinition aux_set_CCR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λCCR:byte8.
- match bits_of_byte8 CCR with
- [ mk_Array8T vf _ _ hf if nf zf cf ⇒
- setweak_v_flag …
- (setweak_h_flag …
- (setweak_i_flag …
- (setweak_n_flag …
- (set_z_flag …
- (set_c_flag … s cf) zf) nf) if) hf) vf ].
-
-(* **************** *)
-(* LOGICA DELLA ALU *)
-(* **************** *)
-
-(* A = A + M + C *)
-ndefinition execute_ADC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_ADC_ADD_aux … s cur_pc i true (λC_op.plusc_dc_dc ? C_op).
-
-(* A = A + M *)
-ndefinition execute_ADD ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_ADC_ADD_aux … s cur_pc i true (λC_op.plusc_dc_dc ? false).
-
-(* SP += extended M *)
-ndefinition execute_AIS ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- opt_map … (get_sp_reg … s_tmp1)
- (* SP += extended M *)
- (λSP_op.opt_map … (set_sp_reg … s_tmp1 (plusc_d_d ? SP_op (exts_w16 M_op)))
- (λs_tmp2.Some ? (pair … s_tmp2 new_pc))) ]).
-
-(* H:X += extended M *)
-ndefinition execute_AIX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- opt_map … (get_indX_16_reg … s_tmp1)
- (* H:X += extended M *)
- (λHX_op.opt_map … (set_indX_16_reg … s_tmp1 (plusc_d_d ? HX_op (exts_w16 M_op)))
- (λs_tmp2.Some ? (pair … s_tmp2 new_pc))) ]).
-
-(* A = A & M *)
-ndefinition execute_AND ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_AND_BIT_EOR_ORA_aux … s cur_pc i true (andc ?).
-
-(* M = C' <- rcl M <- 0 *)
-ndefinition execute_ASL ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_ASL_ASR_LSR_ROL_ROR_aux … s cur_pc i (λC_op.rclc ? false).
-
-(* M = M7 -> rcr M -> C' *)
-ndefinition execute_ASR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_ASL_ASR_LSR_ROL_ROR_aux … s cur_pc i (λC_op.λM_op.rcrc ? (getMSBc ? M_op) M_op).
-
-(* if C=0, branch *)
-ndefinition execute_BCC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_any_BRANCH … s cur_pc i (⊖(get_c_flag … s)).
-
-(* Mn = 0 *)
-ndefinition execute_BCLRn ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_BCLRn_BSETn_aux … s cur_pc i 〈x0,x0〉.
-
-(* if C=1, branch *)
-ndefinition execute_BCS ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_any_BRANCH … s cur_pc i (get_c_flag … s).
-
-(* if Z=1, branch *)
-ndefinition execute_BEQ ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_any_BRANCH … s cur_pc i (get_z_flag … s).
-
-(* if N⊙V=0, branch *)
-ndefinition execute_BGE ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_n_flag … s)
- (λN_op.opt_map … (get_v_flag … s)
- (λV_op.execute_any_BRANCH … s cur_pc i (⊖(N_op ⊙ V_op)))).
-
-(* BGND mode *)
-ndefinition execute_BGND ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- Some ? (pair … s cur_pc).
-
-(* if Z|N⊙V=0, branch *)
-ndefinition execute_BGT ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_n_flag … s)
- (λN_op.opt_map … (get_v_flag … s)
- (λV_op.execute_any_BRANCH … s cur_pc i (⊖((get_z_flag … s) ⊕ (N_op ⊙ V_op))))).
-
-(* if H=0, branch *)
-ndefinition execute_BHCC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_h_flag … s)
- (λH_op.execute_any_BRANCH … s cur_pc i (⊖H_op)).
-
-(* if H=1, branch *)
-ndefinition execute_BHCS ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_h_flag … s)
- (λH_op.execute_any_BRANCH … s cur_pc i H_op).
-
-(* if C|Z=0, branch *)
-ndefinition execute_BHI ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_any_BRANCH … s cur_pc i (⊖((get_c_flag … s) ⊕ (get_z_flag … s))).
-
-(* if nIRQ=1, branch NB: irqflag e' un negato del pin *)
-ndefinition execute_BIH ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_irq_flag … s)
- (λIRQ_op.execute_any_BRANCH … s cur_pc i (⊖IRQ_op)).
-
-(* if nIRQ=0, branch NB: irqflag e' un negato del pin *)
-ndefinition execute_BIL ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_irq_flag … s)
- (λIRQ_op.execute_any_BRANCH … s cur_pc i IRQ_op).
-
-(* flags = A & M *)
-ndefinition execute_BIT ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_AND_BIT_EOR_ORA_aux … s cur_pc i false (andc ?).
-
-(* if Z|N⊙V=1, branch *)
-ndefinition execute_BLE ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_n_flag … s)
- (λN_op.opt_map … (get_v_flag … s)
- (λV_op.execute_any_BRANCH … s cur_pc i ((get_z_flag … s) ⊕ (N_op ⊙ V_op)))).
-
-(* if C|Z=1, branch *)
-ndefinition execute_BLS ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_any_BRANCH … s cur_pc i ((get_c_flag … s) ⊕ (get_z_flag … s)).
-
-(* if N⊙V=1, branch *)
-ndefinition execute_BLT ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_n_flag … s)
- (λN_op.opt_map … (get_v_flag … s)
- (λV_op.execute_any_BRANCH … s cur_pc i (N_op ⊙ V_op))).
-
-(* if I=0, branch *)
-ndefinition execute_BMC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_i_flag … s)
- (λI_op.execute_any_BRANCH … s cur_pc i (⊖I_op)).
-
-(* if N=1, branch *)
-ndefinition execute_BMI ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_n_flag … s)
- (λN_op.execute_any_BRANCH … s cur_pc i N_op).
-
-(* if I=1, branch *)
-ndefinition execute_BMS ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_i_flag … s)
- (λI_op.execute_any_BRANCH … s cur_pc i I_op).
-
-(* if Z=0, branch *)
-ndefinition execute_BNE ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_any_BRANCH … s cur_pc i (⊖(get_z_flag … s)).
-
-(* if N=0, branch *)
-ndefinition execute_BPL ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_n_flag … s)
- (λN_op.execute_any_BRANCH … s cur_pc i (⊖N_op)).
-
-(* branch always *)
-ndefinition execute_BRA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_any_BRANCH … s cur_pc i true.
-
-(* if Mn=0 branch *)
-ndefinition execute_BRCLRn ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_BRCLRn_BRSETn_aux … s cur_pc i
- (λMn_op.eqc ? Mn_op (zeroc ?)).
-
-(* branch never... come se fosse un nop da 2 byte *)
-ndefinition execute_BRN ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_any_BRANCH … s cur_pc i false.
-
-(* if Mn=1 branch *)
-ndefinition execute_BRSETn ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_BRCLRn_BRSETn_aux … s cur_pc i
- (λMn_op.⊖(eqc ? Mn_op (zeroc ?))).
-
-(* Mn = 1 *)
-ndefinition execute_BSETn ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_BCLRn_BSETn_aux … s cur_pc i 〈xF,xF〉.
-
-(* branch to subroutine *)
-(* HC05/HC08/HCS08 si appoggiano allo stack, RS08 a SPC *)
-ndefinition execute_BSR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t .λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒ let aux ≝
- (* push (new_pc low) *)
- opt_map … (aux_push … s_tmp1 (cnL ? new_pc))
- (* push (new_pc high) *)
- (λs_tmp2.opt_map … (aux_push … s_tmp2 (cnH ? new_pc))
- (* new_pc = new_pc + rel *)
- (λs_tmp3.Some ? (pair … s_tmp3 (branched_pc … s_tmp3 new_pc M_op))))
- in match m with
- [ HC05 ⇒ aux | HC08 ⇒ aux | HCS08 ⇒ aux
- | RS08 ⇒
- (* SPC = new_pc *)
- opt_map … (set_spc_reg … s_tmp1 new_pc)
- (* new_pc = new_pc + rel *)
- (λs_tmp2.Some ? (pair … s_tmp2 (branched_pc … s_tmp2 new_pc M_op)))
- | _ ⇒ None ?
- ]]).
-
-(* if A=M, branch *)
-ndefinition execute_CBEQA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadw … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- match M_op with
- [ mk_comp_num MH_op ML_op ⇒
- (* if A=M, branch *)
- match eqc ? (get_acc_8_low_reg … s_tmp1) MH_op with
- (* new_pc = new_pc + rel *)
- [ true ⇒ Some ? (pair … s_tmp1 (branched_pc … s_tmp1 new_pc ML_op))
- (* new_pc = new_pc *)
- | false ⇒ Some ? (pair … s_tmp1 new_pc)
- ]]]).
-
-(* if X=M, branch *)
-ndefinition execute_CBEQX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadw … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- match M_op with
- [ mk_comp_num MH_op ML_op ⇒
- opt_map … (get_indX_8_low_reg … s_tmp1)
- (* if X=M, branch *)
- (λX_op.match eqc ? X_op MH_op with
- (* new_pc = new_pc + rel *)
- [ true ⇒ Some ? (pair … s_tmp1 (branched_pc … s_tmp1 new_pc ML_op))
- (* new_pc = new_pc *)
- | false ⇒ Some ? (pair … s_tmp1 new_pc)
- ])]]).
-
-(* C = 0 *)
-ndefinition execute_CLC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- Some ? (pair … (set_c_flag … s false) cur_pc).
-
-(* I = 0 *)
-ndefinition execute_CLI ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (set_i_flag … s false)
- (λs_tmp.Some ? (pair … s_tmp cur_pc)).
-
-(* M = 0 *)
-ndefinition execute_CLR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- (* M = 0 *)
- opt_map … (multi_mode_writeb … s cur_pc auxMode_ok i 〈x0,x0〉)
- (λS_PC.match S_PC with
- [ pair s_tmp1 new_pc ⇒
- (* Z = 1 *)
- let s_tmp2 ≝ set_z_flag … s_tmp1 true in
- (* N = 0 *)
- let s_tmp3 ≝ setweak_n_flag … s_tmp2 false in
- (* V = 0 *)
- let s_tmp4 ≝ setweak_v_flag … s_tmp3 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp4 new_pc) ]).
-
-(* flags = A - M *)
-ndefinition execute_CMP ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_CMP_SBC_SUB_aux … s cur_pc i false (λC_op.λA_op.λM_op.plusc_dc_dc ? false A_op (complc ? M_op)).
-
-(* M = not M *)
-ndefinition execute_COM ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_COM_DEC_INC_NEG_aux … s cur_pc i (notc ?)
- (* fV = 0 *)
- (λM7.λR7.false)
- (* fC = 1 *)
- (λC_op.λR_op.true).
-
-(* flags = H:X - M *)
-ndefinition execute_CPHX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadw … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- opt_map … (get_indX_16_reg … s_tmp1)
- (λX_op.
- match plusc_dc_dc ? false X_op (complc ? M_op) with
- [ pair carry R_op ⇒
- let X15 ≝ getMSBc ? X_op in
- let M15 ≝ getMSBc ? M_op in
- let R15 ≝ getMSBc ? R_op in
- (* Z = nR15&nR14&nR13&nR12&nR11&nR10&nR9&nR8&nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp2 ≝ set_zflw … s_tmp1 R_op in
- (* C = nX15&M15 | M15&R15 | R15&nX15 *)
- let s_tmp3 ≝ set_c_flag … s_tmp2 (((⊖X15)⊗M15) ⊕ (M15⊗R15) ⊕ (R15⊗(⊖X15))) in
- (* N = R15 *)
- let s_tmp4 ≝ set_nflw … s_tmp3 R_op in
- (* V = X15&nM15&nR15 | nX15&M15&R15 *)
- let s_tmp5 ≝ setweak_v_flag … s_tmp4 ((X15⊗(⊖M15)⊗(⊖R15)) ⊕ ((⊖X15)⊗M15⊗R15)) in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp5 new_pc) ] ) ]).
-
-(* flags = X - M *)
-ndefinition execute_CPX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- opt_map … (get_indX_8_low_reg … s_tmp1)
- (λX_op.
- match plusc_dc_dc ? false X_op (complc ? M_op) with
- [ pair carry R_op ⇒
- let X7 ≝ getMSBc ? X_op in
- let M7 ≝ getMSBc ? M_op in
- let R7 ≝ getMSBc ? R_op in
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp2 ≝ set_zflb … s_tmp1 R_op in
- (* C = nX7&M7 | M7&R7 | R7&nX7 *)
- let s_tmp3 ≝ set_c_flag … s_tmp2 (((⊖X7)⊗M7) ⊕ (M7⊗R7) ⊕ (R7⊗(⊖X7))) in
- (* N = R7 *)
- let s_tmp4 ≝ set_nflb … s_tmp3 R_op in
- (* V = X7&nM7&nR7 | nX7&M7&R7 *)
- let s_tmp5 ≝ setweak_v_flag … s_tmp4 ((X7⊗(⊖M7)⊗(⊖R7)) ⊕ ((⊖X7)⊗M7⊗R7)) in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp5 new_pc) ] ) ]).
-
-(* decimal adjiust A *)
-(* per i dettagli vedere daa_b8 (modulo byte8) *)
-ndefinition execute_DAA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_h_flag … s)
- (λH.
- let M_op ≝ get_acc_8_low_reg … s in
- match daa_b8 H (get_c_flag … s) M_op with
- [ pair carry R_op ⇒
- (* A = R *)
- let s_tmp1 ≝ set_acc_8_low_reg … s R_op in
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp2 ≝ set_zflb … s_tmp1 R_op in
- (* C = carry *)
- let s_tmp3 ≝ set_c_flag … s_tmp2 carry in
- (* N = R7 *)
- let s_tmp4 ≝ set_nflb … s_tmp3 R_op in
- (* V = M7 ⊙ R7 *)
- let s_tmp5 ≝ setweak_v_flag … s_tmp4 ((getMSBc ? M_op) ⊙ (getMSBc ? R_op)) in
- (* newpc = curpc *)
- Some ? (pair … s_tmp5 cur_pc) ]).
-
-(* if (--M)≠0, branch *)
-ndefinition execute_DBNZ ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadw … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- match M_op with
- [ mk_comp_num MH_op ML_op ⇒
- (* --M *)
- let MH_op' ≝ predc ? MH_op in
- opt_map … (multi_mode_writeb … s_tmp1 cur_pc auxMode_ok i MH_op')
- (λS_PC.match S_PC with
- [ pair s_tmp2 _ ⇒
- (* if (--M)≠0, branch *)
- match eqc ? MH_op' (zeroc ?) with
- (* new_pc = new_pc *)
- [ true ⇒ Some ? (pair … s_tmp2 new_pc)
- (* new_pc = new_pc + rel *)
- | false ⇒ Some ? (pair … s_tmp2 (branched_pc … s_tmp2 new_pc ML_op)) ]])]]).
-
-(* M = M - 1 *)
-ndefinition execute_DEC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_COM_DEC_INC_NEG_aux … s cur_pc i (predc ?)
- (* fV = M7&nR7 *)
- (λM7.λR7.M7⊗(⊖R7))
- (* fC = C *)
- (λC_op.λR_op.C_op).
-
-(* A = H:A/X, H = H:AmodX se non c'e' overflow, altrimenti invariati *)
-(* per i dettagli vedere div_b8 (modulo word16) *)
-ndefinition execute_DIV ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_indX_8_high_reg … s)
- (λH_op.opt_map … (get_indX_8_low_reg … s)
- (λX_op.match div_b8 〈H_op:(get_acc_8_low_reg … s)〉 X_op with
- [ triple quoz rest overflow ⇒
- (* C = overflow *)
- let s_tmp1 ≝ set_c_flag … s overflow in
- (* A = A o H:A/X *)
- let s_tmp2 ≝ match overflow with
- [ true ⇒ s_tmp1
- | false ⇒ set_acc_8_low_reg … s_tmp1 quoz ] in
- (* Z = nA7&nA6&nA5&nA4&nA3&nA2&nA1&nA0 *)
- (* NB: che A sia cambiato o no, lo testa *)
- let s_tmp3 ≝ set_zflb … s_tmp2 (get_acc_8_low_reg … s_tmp2) in
- (* H = H o H:AmodX *)
- opt_map … (match overflow with
- [ true ⇒ Some ? s_tmp3
- | false ⇒ set_indX_8_high_reg … s_tmp3 rest])
- (λs_tmp4.Some ? (pair … s_tmp4 cur_pc)) ])).
-
-(* A = A ⊙ M *)
-ndefinition execute_EOR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_AND_BIT_EOR_ORA_aux … s cur_pc i true (xorc ?).
-
-(* M = M + 1 *)
-ndefinition execute_INC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_COM_DEC_INC_NEG_aux … s cur_pc i (succc ?)
- (* fV = nM7&R7 *)
- (λM7.λR7.(⊖M7)⊗R7)
- (* fC = C *)
- (λC_op.λR_op.C_op).
-
-(* jmp, il nuovo indirizzo e' una WORD *)
-ndefinition execute_JMP ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadw … s cur_pc i)
- (λS_M_PC.
- (* newpc = M_op *)
- Some ? (pair … (fst3T … S_M_PC) (snd3T … S_M_PC))).
-
-(* jump to subroutine *)
-(* HC05/HC08/HCS08 si appoggiano allo stack, RS08 a SPC *)
-ndefinition execute_JSR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadw … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒ let aux ≝
- (* push (new_pc low) *)
- opt_map … (aux_push … s_tmp1 (cnL ? new_pc))
- (* push (new_pc high) *)
- (λs_tmp2.opt_map … (aux_push … s_tmp2 (cnH ? new_pc))
- (* newpc = M_op *)
- (λs_tmp3.Some ? (pair … s_tmp3 M_op)))
- in match m with
- [ HC05 ⇒ aux | HC08 ⇒ aux | HCS08 ⇒ aux
- | RS08 ⇒
- (* SPC = new_pc *)
- opt_map … (set_spc_reg … s_tmp1 new_pc)
- (* newpc = M_op *)
- (λs_tmp2.Some ? (pair … s_tmp2 M_op))
- | _ ⇒ None ?
- ]]).
-
-(* A = M *)
-ndefinition execute_LDA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- (* A = M *)
- let s_tmp2 ≝ set_acc_8_low_reg … s_tmp1 M_op in
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp3 ≝ set_zflb … s_tmp2 M_op in
- (* N = R7 *)
- let s_tmp4 ≝ set_nflb … s_tmp3 M_op in
- (* V = 0 *)
- let s_tmp5 ≝ setweak_v_flag … s_tmp4 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp5 new_pc) ]).
-
-(* H:X = M *)
-ndefinition execute_LDHX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadw … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- opt_map … (set_indX_16_reg … s_tmp1 M_op)
- (λs_tmp2.
- (* Z = nR15&nR14&nR13nR12&nR11&nR10&nR9&nR8nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp3 ≝ set_zflw … s_tmp2 M_op in
- (* N = R15 *)
- let s_tmp4 ≝ set_nflw … s_tmp3 M_op in
- (* V = 0 *)
- let s_tmp5 ≝ setweak_v_flag … s_tmp4 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp5 new_pc)) ]).
-
-(* X = M *)
-ndefinition execute_LDX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- opt_map … (set_indX_8_low_reg … s_tmp1 M_op)
- (λs_tmp2.
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp3 ≝ set_zflb … s_tmp2 M_op in
- (* N = R7 *)
- let s_tmp4 ≝ set_nflb … s_tmp3 M_op in
- (* V = 0 *)
- let s_tmp5 ≝ setweak_v_flag … s_tmp4 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp5 new_pc)) ]).
-
-(* M = 0 -> rcr M -> C' *)
-ndefinition execute_LSR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_ASL_ASR_LSR_ROL_ROR_aux … s cur_pc i (λC_op.λM_op.rcrc ? false M_op).
-
-(* M2 = M1 *)
-ndefinition execute_MOV ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- (* R_op = M1 *)
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_R_PC.match S_R_PC with
- [ triple s_tmp1 R_op tmp_pc ⇒
- (* M2 = R_op *)
- opt_map … (multi_mode_writeb … s_tmp1 tmp_pc auxMode_ok i R_op)
- (λS_PC.match S_PC with
- [ pair s_tmp2 new_pc ⇒
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp3 ≝ set_zflb … s_tmp2 R_op in
- (* N = R7 *)
- let s_tmp4 ≝ set_nflb … s_tmp3 R_op in
- (* V = 0 *)
- let s_tmp5 ≝ setweak_v_flag … s_tmp4 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp5 new_pc)])]).
-
-(* X:A = X * A *)
-ndefinition execute_MUL ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_indX_8_low_reg … s)
- (λX_op.let R_op ≝ mulu_b8 X_op (get_acc_8_low_reg … s) in
- opt_map … (set_indX_8_low_reg … s (cnH ? R_op))
- (λs_tmp.Some ? (pair … (set_acc_8_low_reg … s_tmp (cnL ? R_op)) cur_pc))).
-
-(* M = compl M *)
-ndefinition execute_NEG ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_COM_DEC_INC_NEG_aux … s cur_pc i (complc ?)
- (* fV = M7&R7 *)
- (λM7.λR7.M7⊗R7)
- (* fC = R7|R6|R5|R4|R3|R2|R1|R0 *)
- (λC_op.λR_op.⊖(eqc ? R_op (zeroc ?))).
-
-(* nulla *)
-ndefinition execute_NOP ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- Some ? (pair … s cur_pc).
-
-(* A = (mk_byte8 (b8l A) (b8h A)) *)
-(* cioe' swap del nibble alto/nibble basso di A *)
-ndefinition execute_NSA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- match get_acc_8_low_reg … s with [ mk_comp_num ah al ⇒
- (* A = (mk_byte8 (b8l A) (b8h A)) *)
- Some ? (pair … (set_acc_8_low_reg … s 〈al,ah〉) cur_pc) ].
-
-(* A = A | M *)
-ndefinition execute_ORA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_AND_BIT_EOR_ORA_aux … s cur_pc i true (orc ?).
-
-(* push A *)
-ndefinition execute_PSHA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (aux_push … s (get_acc_8_low_reg … s))
- (λs_tmp1.Some ? (pair … s_tmp1 cur_pc)).
-
-(* push H *)
-ndefinition execute_PSHH ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_indX_8_high_reg … s)
- (λH_op.opt_map … (aux_push … s H_op)
- (λs_tmp1.Some ? (pair … s_tmp1 cur_pc))).
-
-(* push X *)
-ndefinition execute_PSHX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_indX_8_low_reg … s)
- (λH_op.opt_map … (aux_push … s H_op)
- (λs_tmp1.Some ? (pair … s_tmp1 cur_pc))).
-
-(* pop A *)
-ndefinition execute_PULA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (aux_pop … s)
- (λS_and_A.match S_and_A with [ pair s_tmp1 A_op ⇒
- Some ? (pair … (set_acc_8_low_reg … s_tmp1 A_op) cur_pc) ]).
-
-(* pop H *)
-ndefinition execute_PULH ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (aux_pop … s)
- (λS_and_H.match S_and_H with [ pair s_tmp1 H_op ⇒
- opt_map … (set_indX_8_high_reg … s_tmp1 H_op)
- (λs_tmp2.Some ? (pair … s_tmp2 cur_pc))]).
-
-(* pop X *)
-ndefinition execute_PULX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (aux_pop … s)
- (λS_and_X.match S_and_X with [ pair s_tmp1 X_op ⇒
- opt_map … (set_indX_8_low_reg … s_tmp1 X_op)
- (λs_tmp2.Some ? (pair … s_tmp2 cur_pc))]).
-
-(* M = C' <- rcl M <- C *)
-ndefinition execute_ROL ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_ASL_ASR_LSR_ROL_ROR_aux … s cur_pc i (rclc ?).
-
-(* M = C -> rcr M -> C' *)
-ndefinition execute_ROR ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_ASL_ASR_LSR_ROL_ROR_aux … s cur_pc i (rcrc ?).
-
-(* SP = 0xuuFF *)
-(* lascia inalterato il byte superiore di SP *)
-ndefinition execute_RSP ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_sp_reg … s)
- (λSP_op.match SP_op with [ mk_comp_num sph spl ⇒
- opt_map … (set_sp_reg … s 〈sph:〈xF,xF〉〉)
- (λs_tmp.Some ? (pair … s_tmp cur_pc))]).
-
-(* return from interrupt *)
-ndefinition execute_RTI ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- (* pop (CCR) *)
- opt_map … (aux_pop … s)
- (λS_and_CCR.match S_and_CCR with [ pair s_tmp1 CCR_op ⇒
- let s_tmp2 ≝ aux_set_CCR … s_tmp1 CCR_op in
- (* pop (A) *)
- opt_map … (aux_pop … s_tmp2)
- (λS_and_A.match S_and_A with [ pair s_tmp3 A_op ⇒
- let s_tmp4 ≝ set_acc_8_low_reg … s_tmp3 A_op in
- (* pop (X) *)
- opt_map … (aux_pop … s_tmp4)
- (λS_and_X.match S_and_X with [ pair s_tmp5 X_op ⇒
- opt_map … (set_indX_8_low_reg … s_tmp5 X_op)
- (* pop (PC high) *)
- (λs_tmp6.opt_map … (aux_pop … s_tmp6)
- (λS_and_PCH.match S_and_PCH with [ pair s_tmp7 PCH_op ⇒
- (* pop (PC low) *)
- opt_map … (aux_pop … s_tmp7)
- (λS_and_PCL.match S_and_PCL with [ pair s_tmp8 PCL_op ⇒
- Some ? (pair … s_tmp8 〈PCH_op:PCL_op〉)])]))])])]).
-
-(* return from subroutine *)
-(* HC05/HC08/HCS08 si appoggia allo stack, RS08 si appoggia a SPC *)
-ndefinition execute_RTS ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- let aux ≝
- (* pop (PC high) *)
- opt_map … (aux_pop … s)
- (λS_and_PCH.match S_and_PCH with [ pair s_tmp1 PCH_op ⇒
- (* pop (PC low) *)
- opt_map … (aux_pop … s_tmp1)
- (λS_and_PCL.match S_and_PCL with [ pair s_tmp2 PCL_op ⇒
- Some ? (pair … s_tmp2 〈PCH_op:PCL_op〉)])])
- in match m with
- [ HC05 ⇒ aux | HC08 ⇒ aux | HCS08 ⇒ aux
- | RS08 ⇒
- (* new_pc = SPC *)
- opt_map … (get_spc_reg … s)
- (λSPC_op.Some ? (pair … s SPC_op))
- | _ ⇒ None ?
- ].
-
-(* A = A - M - C *)
-ndefinition execute_SBC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_CMP_SBC_SUB_aux … s cur_pc i true
- (λC_op.λA_op.λM_op.match plusc_dc_dc ? false A_op (complc ? M_op) with
- [ pair resc resb ⇒ match C_op with
- [ true ⇒ plusc_dc_dc ? false resb 〈xF,xF〉
- | false ⇒ pair … resc resb ]]).
-
-(* C = 1 *)
-ndefinition execute_SEC ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- Some ? (pair … (set_c_flag … s true) cur_pc).
-
-(* I = 1 *)
-ndefinition execute_SEI ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (set_i_flag … s true)
- (λs_tmp.Some ? (pair … s_tmp cur_pc)).
-
-(* swap SPCh,A *)
-(* senso: nell'RS08 SPC non e' accessibile direttamente e come si possono
- fare subroutine annidate se RA (return address) e' salvato sempre in SPC?
- occore accedere a SPC e salvarne il contenuto *)
-ndefinition execute_SHA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_spc_reg … s)
- (λSPC_op.opt_map … (set_spc_reg … s 〈(get_acc_8_low_reg … s):(cnL ? SPC_op)〉)
- (λs_tmp1.Some ? (pair … (set_acc_8_low_reg … s_tmp1 (cnH ? SPC_op)) cur_pc))).
-
-(* swap SPCl,A *)
-(* senso: nell'RS08 SPC non e' accessibile direttamente e come si possono
- fare subroutine annidate se RA (return address) e' salvato sempre in SPC?
- occore accedere a SPC e salvarne il contenuto *)
-ndefinition execute_SLA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_spc_reg … s)
- (λSPC_op.opt_map … (set_spc_reg … s 〈(cnH ? SPC_op):(get_acc_8_low_reg … s)〉)
- (λs_tmp1.Some ? (pair … (set_acc_8_low_reg … s_tmp1 (cnL ? SPC_op)) cur_pc))).
-
-(* M = A *)
-ndefinition execute_STA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- (* M = A *)
- let A_op ≝ (get_acc_8_low_reg … s) in
- opt_map … (multi_mode_writeb … s cur_pc auxMode_ok i A_op)
- (λS_op_and_PC.match S_op_and_PC with
- [ pair s_tmp1 new_pc ⇒
- (* Z = nA7&nA6&nA5&nA4&nA3&nA2&nA1&nA0 *)
- let s_tmp2 ≝ set_zflb … s_tmp1 A_op in
- (* N = A7 *)
- let s_tmp3 ≝ set_nflb … s_tmp2 A_op in
- (* V = 0 *)
- let s_tmp4 ≝ setweak_v_flag … s_tmp3 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp4 new_pc) ]).
-
-(* M = H:X *)
-ndefinition execute_STHX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- (* M = H:X *)
- opt_map … (get_indX_16_reg … s)
- (λX_op.opt_map … (multi_mode_writew … s cur_pc i X_op)
- (λS_op_and_PC.match S_op_and_PC with
- [ pair s_tmp1 new_pc ⇒
- (* Z = nR15&nR14&nR13nR12&nR11&nR10&nR9&nR8nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp2 ≝ set_zflw … s_tmp1 X_op in
- (* N = R15 *)
- let s_tmp3 ≝ set_nflw … s_tmp2 X_op in
- (* V = 0 *)
- let s_tmp4 ≝ setweak_v_flag … s_tmp3 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp4 new_pc) ])).
-
-(* I = 0 *)
-ndefinition execute_STOP ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- Some ? (pair … (setweak_i_flag … s false) cur_pc).
-
-(* M = X *)
-ndefinition execute_STX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- (* M = X *)
- opt_map … (get_indX_8_low_reg … s)
- (λX_op.opt_map … (multi_mode_writeb … s cur_pc auxMode_ok i X_op)
- (λS_op_and_PC.match S_op_and_PC with
- [ pair s_tmp1 new_pc ⇒
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp2 ≝ set_zflb … s_tmp1 X_op in
- (* N = R7 *)
- let s_tmp3 ≝ set_nflb … s_tmp2 X_op in
- (* V = 0 *)
- let s_tmp4 ≝ setweak_v_flag … s_tmp3 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp4 new_pc) ])).
-
-(* A = A - M *)
-ndefinition execute_SUB ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- execute_CMP_SBC_SUB_aux … s cur_pc i true (λC_op.λA_op.λM_op.plusc_dc_dc ? false A_op (complc ? M_op)).
-
-(* software interrupt *)
-ndefinition execute_SWI ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- (* indirizzo da cui caricare il nuovo pc *)
- let vector ≝ get_pc_reg … (set_pc_reg … s 〈〈xF,xF〉:〈xF,xC〉〉) in
- (* push (cur_pc low) *)
- opt_map … (aux_push … s (cnL ? cur_pc))
- (* push (cur_pc high *)
- (λs_tmp1.opt_map … (aux_push … s_tmp1 (cnH ? cur_pc))
- (λs_tmp2.opt_map … (get_indX_8_low_reg … s_tmp2)
- (* push (X) *)
- (λX_op.opt_map … (aux_push … s_tmp2 X_op)
- (* push (A) *)
- (λs_tmp3.opt_map … (aux_push … s_tmp3 (get_acc_8_low_reg … s_tmp3))
- (* push (CCR) *)
- (λs_tmp4.opt_map … (aux_push … s_tmp4 (aux_get_CCR … s_tmp4))
- (* I = 1 *)
- (λs_tmp5.opt_map … (set_i_flag … s_tmp5 true)
- (* load from vector high *)
- (λs_tmp6.opt_map … (memory_filter_read … s_tmp6 vector)
- (* load from vector low *)
- (λaddrh.opt_map … (memory_filter_read … s_tmp6 (succc ? vector))
- (* newpc = [vector] *)
- (λaddrl.Some ? (pair … s_tmp6 〈addrh:addrl〉)))))))))).
-
-(* flags = A *)
-ndefinition execute_TAP ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- Some ? (pair … (aux_set_CCR … s (get_acc_8_low_reg … s)) cur_pc).
-
-(* X = A *)
-ndefinition execute_TAX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (set_indX_8_low_reg … s (get_acc_8_low_reg … s))
- (λs_tmp.Some ? (pair … s_tmp cur_pc)).
-
-(* A = flags *)
-ndefinition execute_TPA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- Some ? (pair … (set_acc_8_low_reg … s (aux_get_CCR … s)) cur_pc).
-
-(* flags = M - 0 *)
-(* implementata senza richiamare la sottrazione, la modifica dei flag
- e' immediata *)
-ndefinition execute_TST ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (multi_mode_loadb … s cur_pc i)
- (λS_M_PC.match S_M_PC with
- [ triple s_tmp1 M_op new_pc ⇒
- (* Z = nR7&nR6&nR5&nR4&nR3&nR2&nR1&nR0 *)
- let s_tmp2 ≝ set_zflb … s_tmp1 M_op in
- (* N = R7 *)
- let s_tmp3 ≝ set_nflb … s_tmp2 M_op in
- (* V = 0 *)
- let s_tmp4 ≝ setweak_v_flag … s_tmp3 false in
- (* newpc = nextpc *)
- Some ? (pair … s_tmp4 new_pc) ]).
-
-(* H:X = SP + 1 *)
-ndefinition execute_TSX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_sp_reg … s )
- (λSP_op.opt_map … (set_indX_16_reg … s (succc ? SP_op))
- (* H:X = SP + 1 *)
- (λs_tmp.Some ? (pair … s_tmp cur_pc))).
-
-(* A = X *)
-ndefinition execute_TXA ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_indX_8_low_reg … s)
- (λX_op.Some ? (pair … (set_acc_8_low_reg … s X_op) cur_pc)).
-
-(* SP = H:X - 1 *)
-ndefinition execute_TXS ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- opt_map … (get_indX_16_reg … s )
- (λX_op.opt_map … (set_sp_reg … s (predc ? X_op))
- (* SP = H:X - 1 *)
- (λs_tmp.Some ? (pair … s_tmp cur_pc))).
-
-(* I = 0 *)
-ndefinition execute_WAIT ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- Some ? (pair … (setweak_i_flag … s false) cur_pc).
-
-(* raccordo *)
-ndefinition Freescale_execute_any ≝
-λps:Freescale_pseudo.match ps with
- [ ADC ⇒ execute_ADC (* add with carry *)
- | ADD ⇒ execute_ADD (* add *)
- | AIS ⇒ execute_AIS (* add immediate to SP *)
- | AIX ⇒ execute_AIX (* add immediate to X *)
- | AND ⇒ execute_AND (* and *)
- | ASL ⇒ execute_ASL (* aritmetic shift left *)
- | ASR ⇒ execute_ASR (* aritmetic shift right *)
- | BCC ⇒ execute_BCC (* branch if C=0 *)
- | BCLRn ⇒ execute_BCLRn (* clear bit n *)
- | BCS ⇒ execute_BCS (* branch if C=1 *)
- | BEQ ⇒ execute_BEQ (* branch if Z=1 *)
- | BGE ⇒ execute_BGE (* branch if N⊙V=0 (great or equal) *)
- | BGND ⇒ execute_BGND (* !!background mode!!*)
- | BGT ⇒ execute_BGT (* branch if Z|N⊙V=0 clear (great) *)
- | BHCC ⇒ execute_BHCC (* branch if H=0 *)
- | BHCS ⇒ execute_BHCS (* branch if H=1 *)
- | BHI ⇒ execute_BHI (* branch if C|Z=0, (higher) *)
- | BIH ⇒ execute_BIH (* branch if nIRQ=1 *)
- | BIL ⇒ execute_BIL (* branch if nIRQ=0 *)
- | BIT ⇒ execute_BIT (* flag = and (bit test) *)
- | BLE ⇒ execute_BLE (* branch if Z|N⊙V=1 (less or equal) *)
- | BLS ⇒ execute_BLS (* branch if C|Z=1 (lower or same) *)
- | BLT ⇒ execute_BLT (* branch if N⊙1=1 (less) *)
- | BMC ⇒ execute_BMC (* branch if I=0 (interrupt mask clear) *)
- | BMI ⇒ execute_BMI (* branch if N=1 (minus) *)
- | BMS ⇒ execute_BMS (* branch if I=1 (interrupt mask set) *)
- | BNE ⇒ execute_BNE (* branch if Z=0 *)
- | BPL ⇒ execute_BPL (* branch if N=0 (plus) *)
- | BRA ⇒ execute_BRA (* branch always *)
- | BRCLRn ⇒ execute_BRCLRn (* branch if bit n clear *)
- | BRN ⇒ execute_BRN (* branch never (nop) *)
- | BRSETn ⇒ execute_BRSETn (* branch if bit n set *)
- | BSETn ⇒ execute_BSETn (* set bit n *)
- | BSR ⇒ execute_BSR (* branch to subroutine *)
- | CBEQA ⇒ execute_CBEQA (* compare (A) and BEQ *)
- | CBEQX ⇒ execute_CBEQX (* compare (X) and BEQ *)
- | CLC ⇒ execute_CLC (* C=0 *)
- | CLI ⇒ execute_CLI (* I=0 *)
- | CLR ⇒ execute_CLR (* operand=0 *)
- | CMP ⇒ execute_CMP (* flag = sub (compare A) *)
- | COM ⇒ execute_COM (* not (1 complement) *)
- | CPHX ⇒ execute_CPHX (* flag = sub (compare H:X) *)
- | CPX ⇒ execute_CPX (* flag = sub (compare X) *)
- | DAA ⇒ execute_DAA (* decimal adjust A *)
- | DBNZ ⇒ execute_DBNZ (* dec and BNE *)
- | DEC ⇒ execute_DEC (* operand=operand-1 (decrement) *)
- | DIV ⇒ execute_DIV (* div *)
- | EOR ⇒ execute_EOR (* xor *)
- | INC ⇒ execute_INC (* operand=operand+1 (increment) *)
- | JMP ⇒ execute_JMP (* jmp word [operand] *)
- | JSR ⇒ execute_JSR (* jmp to subroutine *)
- | LDA ⇒ execute_LDA (* load in A *)
- | LDHX ⇒ execute_LDHX (* load in H:X *)
- | LDX ⇒ execute_LDX (* load in X *)
- | LSR ⇒ execute_LSR (* logical shift right *)
- | MOV ⇒ execute_MOV (* move *)
- | MUL ⇒ execute_MUL (* mul *)
- | NEG ⇒ execute_NEG (* neg (2 complement) *)
- | NOP ⇒ execute_NOP (* nop *)
- | NSA ⇒ execute_NSA (* nibble swap A (al:ah <- ah:al) *)
- | ORA ⇒ execute_ORA (* or *)
- | PSHA ⇒ execute_PSHA (* push A *)
- | PSHH ⇒ execute_PSHH (* push H *)
- | PSHX ⇒ execute_PSHX (* push X *)
- | PULA ⇒ execute_PULA (* pop A *)
- | PULH ⇒ execute_PULH (* pop H *)
- | PULX ⇒ execute_PULX (* pop X *)
- | ROL ⇒ execute_ROL (* rotate left *)
- | ROR ⇒ execute_ROR (* rotate right *)
- | RSP ⇒ execute_RSP (* reset SP (0x00FF) *)
- | RTI ⇒ execute_RTI (* return from interrupt *)
- | RTS ⇒ execute_RTS (* return from subroutine *)
- | SBC ⇒ execute_SBC (* sub with carry*)
- | SEC ⇒ execute_SEC (* C=1 *)
- | SEI ⇒ execute_SEI (* I=1 *)
- | SHA ⇒ execute_SHA (* swap spc_high,A *)
- | SLA ⇒ execute_SLA (* swap spc_low,A *)
- | STA ⇒ execute_STA (* store from A *)
- | STHX ⇒ execute_STHX (* store from H:X *)
- | STOP ⇒ execute_STOP (* !!stop mode!! *)
- | STX ⇒ execute_STX (* store from X *)
- | SUB ⇒ execute_SUB (* sub *)
- | SWI ⇒ execute_SWI (* software interrupt *)
- | TAP ⇒ execute_TAP (* flag=A (transfer A to process status byte *)
- | TAX ⇒ execute_TAX (* X=A (transfer A to X) *)
- | TPA ⇒ execute_TPA (* A=flag (transfer process status byte to A) *)
- | TST ⇒ execute_TST (* flag = sub (test) *)
- | TSX ⇒ execute_TSX (* X:H=SP (transfer SP to H:X) *)
- | TXA ⇒ execute_TXA (* A=X (transfer X to A) *)
- | TXS ⇒ execute_TXS (* SP=X:H (transfer H:X to SP) *)
- | WAIT ⇒ execute_WAIT (* !!wait mode!!*)
- ].
-
-(* stati speciali di esecuzione *)
-ndefinition Freescale_check_susp ≝
-λps:Freescale_pseudo.match ps with
- [ BGND ⇒ Some ? BGND_MODE
- | STOP ⇒ Some ? STOP_MODE
- | WAIT ⇒ Some ? WAIT_MODE
- | _ ⇒ None ?
- ].
-
-(* istruzioni speciali per skip *)
-ndefinition Freescale_check_skip ≝
-λps:Freescale_pseudo.false.
-
-(* motiplicatore del ciclo di durata *)
-ndefinition Freescale_clk_mult ≝
-λm,t.λs:any_status m t.nat1.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/multivm/multivm_base.ma".
-include "emulator/read_write/load_write.ma".
-
-(* ************************************************ *)
-(* LOGICHE AUSILIARE CHE ACCOMUNANO PIU' OPERAZIONI *)
-(* ************************************************ *)
-
-(* **************** *)
-(* LOGICA DELLA ALU *)
-(* **************** *)
-
-ndefinition execute_NO ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λi:aux_im_type m.
- None (ProdT (any_status m t) word16).
-
-(* raccordo *)
-ndefinition IP2022_execute_any ≝
-λps:IP2022_pseudo.match ps with
- [ ADD ⇒ execute_NO (* add *)
- | ADDC ⇒ execute_NO (* add with carry *)
- | AND ⇒ execute_NO (* and *)
- | BREAK ⇒ execute_NO (* enter break mode *)
- | BREAKX ⇒ execute_NO (* enter break mode, after skip *)
- | CALL ⇒ execute_NO (* subroutine call *)
- | CLR ⇒ execute_NO (* clear *)
- | CLRB ⇒ execute_NO (* clear bit *)
- | CMP ⇒ execute_NO (* set flags according to sub *)
- | CSE ⇒ execute_NO (* confront & skip if equal *)
- | CSNE ⇒ execute_NO (* confront & skip if not equal *)
- | CWDT ⇒ execute_NO (* clear watch dog -- not impl. ERR *)
- | DEC ⇒ execute_NO (* decrement *)
- | DECSNZ ⇒ execute_NO (* decrement & skip if not zero *)
- | DECSZ ⇒ execute_NO (* decrement & skip if zero *)
- | FERASE ⇒ execute_NO (* flash erase -- not impl. ERR *)
- | FREAD ⇒ execute_NO (* flash read -- not impl. ERR *)
- | FWRITE ⇒ execute_NO (* flash write -- not impl. ERR *)
- | INC ⇒ execute_NO (* increment *)
- | INCSNZ ⇒ execute_NO (* increment & skip if not zero *)
- | INCSZ ⇒ execute_NO (* increment & skip if zero *)
- | INT ⇒ execute_NO (* interrupt -- not impl. ERR *)
- | IREAD ⇒ execute_NO (* memory read *)
- | IWRITE ⇒ execute_NO (* memory write *)
- | JMP ⇒ execute_NO (* jump *)
- | LOADH ⇒ execute_NO (* load Data Pointer High *)
- | LOADL ⇒ execute_NO (* load Data Pointer Low *)
- | MOV ⇒ execute_NO (* move *)
- | MULS ⇒ execute_NO (* signed mul *)
- | MULU ⇒ execute_NO (* unsigned mul *)
- | NOP ⇒ execute_NO (* nop *)
- | NOT ⇒ execute_NO (* not *)
- | OR ⇒ execute_NO (* or *)
- | PAGE ⇒ execute_NO (* set Page Register *)
- | POP ⇒ execute_NO (* pop *)
- | PUSH ⇒ execute_NO (* push *)
- | RET ⇒ execute_NO (* subroutine ret *)
- | RETI ⇒ execute_NO (* interrupt ret -- not impl. ERR *)
- | RETNP ⇒ execute_NO (* subroutine ret & don't restore Page Register *)
- | RETW ⇒ execute_NO (* subroutine ret & load W Register *)
- | RL ⇒ execute_NO (* rotate left *)
- | RR ⇒ execute_NO (* rotate right *)
- | SB ⇒ execute_NO (* skip if bit set *)
- | SETB ⇒ execute_NO (* set bit *)
- | SNB ⇒ execute_NO (* skip if bit not set *)
- | SPEED ⇒ execute_NO (* set Speed Register *)
- | SUB ⇒ execute_NO (* sub *)
- | SUBC ⇒ execute_NO (* sub with carry *)
- | SWAP ⇒ execute_NO (* swap xxxxyyyy → yyyyxxxx *)
- | TEST ⇒ execute_NO (* set flags according to zero test *)
- | XOR ⇒ execute_NO (* xor *)
- ].
-
-(* stati speciali di esecuzione *)
-ndefinition IP2022_check_susp ≝
-λps:IP2022_pseudo.match ps with
- [ BREAK ⇒ Some ? BGND_MODE
- | BREAKX ⇒ Some ? BGND_MODE
- | _ ⇒ None ?
- ].
-
-(* istruzioni speciali per skip *)
-ndefinition IP2022_check_skip ≝
-λps:IP2022_pseudo.match ps with
- [ LOADH ⇒ true
- | LOADL ⇒ true
- | PAGE ⇒ true
- | _ ⇒ false
- ].
-
-(* motiplicatore del ciclo di durata *)
-ndefinition IP2022_clk_mult ≝
-λt.λs:any_status IP2022 t.
- (* divisore del clock, 0 = stop *)
- match speed_reg_IP2022 … (alu … s) with
- [ x0 ⇒ nat1 | x1 ⇒ nat2 | x2 ⇒ nat3 | x3 ⇒ nat4
- | x4 ⇒ nat5 | x5 ⇒ nat6 | x6 ⇒ nat8 | x7 ⇒ nat10
- | x8 ⇒ nat12 | x9 ⇒ nat16 | xA ⇒ nat24 | xB ⇒ nat32
- | xC ⇒ nat48 | xD ⇒ nat64 | xE ⇒ nat128 | xF ⇒ O ] *
- (* FLASH clock 120MHz, RAM clock 40MHz *)
- match IP2022_pc_flashtest (get_pc_reg … s) with
- [ true ⇒ nat3 | false ⇒ nat1 ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/multivm/Freescale_multivm.ma".
-include "emulator/multivm/IP2022_multivm.ma".
-include "emulator/read_write/fetch.ma".
-
-(* raccordo *)
-ndefinition execute_any ≝
-λm.match m
- return λm.aux_pseudo_type m → Πt.any_status m t → word16 →
- aux_im_type m → option (ProdT (any_status m t) word16)
- with
- [ HC05 ⇒ λps:aux_pseudo_type ?.Freescale_execute_any ps ?
- | HC08 ⇒ λps:aux_pseudo_type ?.Freescale_execute_any ps ?
- | HCS08 ⇒ λps:aux_pseudo_type ?.Freescale_execute_any ps ?
- | RS08 ⇒ λps:aux_pseudo_type ?.Freescale_execute_any ps ?
- | IP2022 ⇒ λps:aux_pseudo_type ?.IP2022_execute_any ps ?
- ].
-
-(* raccordo *)
-ndefinition check_susp ≝
-λm.match m
- return λm.aux_pseudo_type m → option susp_type
- with
- [ HC05 ⇒ Freescale_check_susp
- | HC08 ⇒ Freescale_check_susp
- | HCS08 ⇒ Freescale_check_susp
- | RS08 ⇒ Freescale_check_susp
- | IP2022 ⇒ IP2022_check_susp
- ].
-
-(* raccordo *)
-ndefinition check_skip ≝
-λm.match m
- return λm.aux_pseudo_type m → bool
- with
- [ HC05 ⇒ Freescale_check_skip
- | HC08 ⇒ Freescale_check_skip
- | HCS08 ⇒ Freescale_check_skip
- | RS08 ⇒ Freescale_check_skip
- | IP2022 ⇒ IP2022_check_skip
- ].
-
-(* motiplicatore del ciclo di durata *)
-(* 0 = sospensione *)
-ndefinition clk_mult ≝
-λm.match m
- return λm.Πt.any_status m t → nat
- with
- [ HC05 ⇒ Freescale_clk_mult HC05
- | HC08 ⇒ Freescale_clk_mult HC08
- | HCS08 ⇒ Freescale_clk_mult HCS08
- | RS08 ⇒ Freescale_clk_mult RS08
- | IP2022 ⇒ IP2022_clk_mult
- ].
-
-(* **** *)
-(* TICK *)
-(* **** *)
-
-(* - errore: errore+stato (seguira' reset o …, cmq lo stato non va buttato)
- - sospensione: sospensione+stato (seguira' resume o …)
- - ok: stato *)
-ninductive tick_result (A:Type) : Type ≝
- TickERR : A → error_type → tick_result A
-| TickSUSP : A → susp_type → tick_result A
-| TickOK : A → tick_result A.
-
-(* l'esecuzione e' considerata atomica quindi nel caso di un'instruzione
- da 3 cicli la successione sara'
- ([fetch/decode] s,clk:None) →
- ( s,clk:Some 1,pseudo,mode,3,cur_pc) →
- ( s,clk:Some 2,pseudo,mode,3,cur_pc) →
- ([execute] s',clk:None) *)
-ndefinition tick_execute ≝
-λm,t.λs:any_status m t.
-λps:aux_pseudo_type m.λi:aux_im_type m.
-λcur_pc:word16.
- match execute_any m ps t s cur_pc i with
- (* errore! fine esecuzione *)
- [ None ⇒ TickERR ? (set_clk_desc … s (None ?)) ILL_FETCH_AD
- (* ok, aggiornamento centralizzato *)
- | Some S_newPC ⇒ match S_newPC with
- [ pair s_tmp1 new_pc ⇒
- (* clk azzerato *)
- let s_tmp2 ≝ set_clk_desc … s_tmp1 (None ?) in
- (* aggiornamento pc *)
- let s_tmp3 ≝ match eqc ? (get_pc_reg … s) (get_pc_reg … s_tmp1) with
- (* ok, new_pc → pc *)
- [ true ⇒ set_pc_reg … s_tmp2 new_pc
- (* effetto collaterale modifica pc! scartare new_pc *)
- | false ⇒ s_tmp2 ] in
- match check_susp m ps with
- (* esecuzione continua *)
- [ None ⇒ TickOK ? s_tmp3
- (* esecuzione sospesa *)
- | Some susp ⇒ TickSUSP ? s_tmp3 susp
- ]]].
-
-(* avanza fra fetch / countdown / execute *)
-ndefinition tick_skip_aux ≝
-λm,t.λs:any_status m t.
- match get_skip_mode … s with
- [ None ⇒ false
- | Some b ⇒ b ].
-
-(* descrittore del fetch PSEUDO + INSTR_MODE + OPCODE + CICLI *)
-
-(* descrittore del click = stato di avanzamento dell'esecuzione *)
-(* 1) None = istruzione eseguita, attesa del fetch *)
-(* 2) Some cur_clk,clks,pseudo,mode,cur_pc = fetch eseguito *)
-ndefinition tick ≝
-λm,t.λs:any_status m t.
- match clk_desc … s with
- (* e' il momento del fetch *)
- [ None ⇒ match fetch … s with
- (* errore nel fetch/decode? riportato in output, nessun avanzamento *)
- [ FetchERR err ⇒ TickERR ? s err
- (* nessun errore nel fetch *)
- | FetchOK finfo cur_pc ⇒ match tick_skip_aux … s with
- (* skip mode! *)
- [ true ⇒ TickOK ? (set_clk_desc …
- (set_pc_reg …
- (match check_skip m (fst4T … finfo) with
- [ true ⇒ s | false ⇒ setweak_skip_mode … s false ]) cur_pc) (None ?))
- (* ciclo normale: applicare divisore a numero reale di cicli *)
- | false ⇒
- let real_clk ≝ (clk_mult … s)*(fth4T … finfo) in
- match real_clk with
- (* 0 = stop *)
- [ O ⇒ TickSUSP ? s STOP_MODE
- | S clk' ⇒ match clk' with
- (* un solo clk, execute subito *)
- [ O ⇒ tick_execute … s (fst4T … finfo) (snd4T … finfo) cur_pc
- (* piu' clk, execute rimandata *)
- | S clk'' ⇒ TickOK ? (set_clk_desc … s
- (Some ? (quintuple … nat1 real_clk
- (fst4T … finfo) (snd4T … finfo) cur_pc)))
- ]
- ]
- ]
- ]
- (* fetch gia' eseguito, e' il turno di execute? *)
- | Some sinfo ⇒ match eqc ? (S (fst5T … sinfo)) (snd5T … sinfo) with
- (* si *)
- [ true ⇒ tick_execute … s (thd5T … sinfo) (fth5T … sinfo) (fft5T … sinfo)
- (* no, avanzamento cur_clk *)
- | false ⇒ TickOK ? (set_clk_desc … s
- (Some ? (quintuple … (S (fst5T … sinfo)) (snd5T … sinfo)
- (thd5T … sinfo) (fth5T … sinfo) (fft5T … sinfo))))
- ]
- ].
-
-(* ********** *)
-(* ESECUZIONE *)
-(* ********** *)
-
-nlet rec execute (m:mcu_type) (t:memory_impl) (s:tick_result (any_status m t)) (n:nat) on n ≝
- match s with
- [ TickERR s' error ⇒ TickERR ? s' error
- | TickSUSP s' susp ⇒ TickSUSP ? s' susp
- | TickOK s' ⇒ match n with [ O ⇒ TickOK ? s' | S n' ⇒ execute m t (tick m t s') n' ]
- ].
-
-nlemma breakpoint_err : ∀m,t,s,err,n.execute m t (TickERR ? s err) n = TickERR ? s err.
- #m; #t; #s; #err; #n;
- ncases n;
- ##[ ##2: #n1; ##]
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma breakpoint_susp : ∀m,t,s,susp,n.execute m t (TickSUSP ? s susp) n = TickSUSP ? s susp.
- #m; #t; #s; #susp; #n;
- ncases n;
- ##[ ##2: #n1; ##]
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma breakpoint :
- ∀m,t,n1,n2,s. execute m t s (n1 + n2) = execute m t (execute m t s n1) n2.
- #m; #t; #n1;
- nelim n1;
- ##[ ##1: nnormalize; #n2; #s; ncases s; nnormalize; ##[ ##1,2: #x ##] #y; napply refl_eq
- ##| ##2: #n3; #H; #n2; #s; ncases s;
- ##[ ##1: #x; #y; nnormalize; nrewrite > (breakpoint_err m t x y n2); napply refl_eq
- ##| ##2: #x; #y; nnormalize; nrewrite > (breakpoint_susp m t x y n2); napply refl_eq
- ##| ##3: #x; nrewrite > (Sn_p_n_to_S_npn n3 n2);
- nchange with ((execute m t (tick m t x) (n3+n2)) =
- (execute m t (execute m t (tick m t x) n3) n2));
- nrewrite > (H n2 (tick m t x));
- napply refl_eq
- ##]
- ##]
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status_setter.ma".
-
-ndefinition set_zflb ≝
-λm,t.λs:any_status m t.λb:byte8.set_z_flag … s (eqc ? b (zeroc ?)).
-ndefinition set_zflw ≝
-λm,t.λs:any_status m t.λw:word16.set_z_flag … s (eqc ? w (zeroc ?)).
-
-ndefinition set_nflb ≝
-λm,t.λs:any_status m t.λb:byte8.setweak_n_flag … s (getMSBc ? b).
-ndefinition set_nflw ≝
-λm,t.λs:any_status m t.λw:word16.setweak_n_flag … s (getMSBc ? w).
-
-(* enumerazione delle possibili modalita' di sospensione *)
-ninductive susp_type : Type ≝
- BGND_MODE: susp_type
-| STOP_MODE: susp_type
-| WAIT_MODE: susp_type.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/Freescale_instr_mode_base.ma".
-include "common/comp.ma".
-include "num/bool_lemmas.ma".
-
-nlemma eq_to_eqFreescaleim :
-∀n1,n2.n1 = n2 → eq_Freescale_im n1 n2 = true.
- #n1; #n2; #H;
- nrewrite > H;
- nelim n2;
- ##[ ##31,32: #o; nrewrite > (eq_to_eqc … (refl_eq …))
- ##| ##33: #e; nrewrite > (eq_to_eqc … (refl_eq …))
- ##| ##34: #t; nrewrite > (eq_to_eqc … (refl_eq …)) ##]
- napply refl_eq.
-nqed.
-
-nlemma neqFreescaleim_to_neq : ∀n1,n2.eq_Freescale_im n1 n2 = false → n1 ≠ n2.
- #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_Freescale_im n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqFreescaleim n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-(* !!! per brevita... *)
-naxiom eqFreescaleim_to_eq : ∀c1,c2.eq_Freescale_im c1 c2 = true → c1 = c2.
-
-nlemma neq_to_neqFreescaleim : ∀n1,n2.n1 ≠ n2 → eq_Freescale_im n1 n2 = false.
- #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_Freescale_im n1 n2));
- napply (not_to_not (eq_Freescale_im n1 n2 = true) (n1 = n2) ? H);
- napply (eqFreescaleim_to_eq n1 n2).
-nqed.
-
-nlemma decidable_Freescaleim : ∀x,y:Freescale_instr_mode.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_Freescale_im x y = true) (eq_Freescale_im x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqFreescaleim_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqFreescaleim_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqFreescaleim : symmetricT Freescale_instr_mode bool eq_Freescale_im.
- #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_Freescaleim n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqFreescaleim n1 n2 H);
- napply (symmetric_eq ? (eq_Freescale_im n2 n1) false);
- napply (neq_to_neqFreescaleim n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
-
-nlemma Freescaleim_is_comparable : comparable.
- @ Freescale_instr_mode
- ##[ napply MODE_INH
- ##| napply forall_Freescale_im
- ##| napply eq_Freescale_im
- ##| napply eqFreescaleim_to_eq
- ##| napply eq_to_eqFreescaleim
- ##| napply neqFreescaleim_to_neq
- ##| napply neq_to_neqFreescaleim
- ##| napply decidable_Freescaleim
- ##| napply symmetric_eqFreescaleim
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr Freescaleim_is_comparable ≡ Freescale_instr_mode.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/exadecim.ma".
-include "num/bitrigesim.ma".
-
-(* ********************************************** *)
-(* MATTONI BASE PER DEFINIRE LE TABELLE DELLE MCU *)
-(* ********************************************** *)
-
-(* enumerazione delle modalita' di indirizzamento = caricamento degli operandi *)
-ninductive Freescale_instr_mode: Type ≝
- (* INHERENT = nessun operando *)
- MODE_INH : Freescale_instr_mode
- (* INHERENT = nessun operando (A implicito) *)
-| MODE_INHA : Freescale_instr_mode
- (* INHERENT = nessun operando (X implicito) *)
-| MODE_INHX : Freescale_instr_mode
- (* INHERENT = nessun operando (H implicito) *)
-| MODE_INHH : Freescale_instr_mode
-
- (* INHERENT_ADDRESS = nessun operando (HX implicito) *)
-| MODE_INHX0ADD : Freescale_instr_mode
- (* INHERENT_ADDRESS = nessun operando (HX implicito+0x00bb) *)
-| MODE_INHX1ADD : Freescale_instr_mode
- (* INHERENT_ADDRESS = nessun operando (HX implicito+0xwwww) *)
-| MODE_INHX2ADD : Freescale_instr_mode
-
- (* IMMEDIATE = operando valore immediato byte = 0xbb *)
-| MODE_IMM1 : Freescale_instr_mode
- (* IMMEDIATE_EXT = operando valore immediato byte = 0xbb -> esteso a word *)
-| MODE_IMM1EXT : Freescale_instr_mode
- (* IMMEDIATE = operando valore immediato word = 0xwwww *)
-| MODE_IMM2 : Freescale_instr_mode
- (* DIRECT = operando offset byte = [0x00bb] *)
-| MODE_DIR1 : Freescale_instr_mode
- (* DIRECT = operando offset word = [0xwwww] *)
-| MODE_DIR2 : Freescale_instr_mode
- (* INDEXED = nessun operando (implicito [X] *)
-| MODE_IX0 : Freescale_instr_mode
- (* INDEXED = operando offset relativo byte = [X+0x00bb] *)
-| MODE_IX1 : Freescale_instr_mode
- (* INDEXED = operando offset relativo word = [X+0xwwww] *)
-| MODE_IX2 : Freescale_instr_mode
- (* INDEXED = operando offset relativo byte = [SP+0x00bb] *)
-| MODE_SP1 : Freescale_instr_mode
- (* INDEXED = operando offset relativo word = [SP+0xwwww] *)
-| MODE_SP2 : Freescale_instr_mode
-
- (* DIRECT → DIRECT = carica da diretto/scrive su diretto *)
-| MODE_DIR1_to_DIR1 : Freescale_instr_mode
- (* IMMEDIATE → DIRECT = carica da immediato/scrive su diretto *)
-| MODE_IMM1_to_DIR1 : Freescale_instr_mode
- (* INDEXED++ → DIRECT = carica da [X]/scrive su diretto/H:X++ *)
-| MODE_IX0p_to_DIR1 : Freescale_instr_mode
- (* DIRECT → INDEXED++ = carica da diretto/scrive su [X]/H:X++ *)
-| MODE_DIR1_to_IX0p : Freescale_instr_mode
-
- (* INHERENT(A) + IMMEDIATE *)
-| MODE_INHA_and_IMM1 : Freescale_instr_mode
- (* INHERENT(X) + IMMEDIATE *)
-| MODE_INHX_and_IMM1 : Freescale_instr_mode
- (* IMMEDIATE + IMMEDIATE *)
-| MODE_IMM1_and_IMM1 : Freescale_instr_mode
- (* DIRECT + IMMEDIATE *)
-| MODE_DIR1_and_IMM1 : Freescale_instr_mode
- (* INDEXED + IMMEDIATE *)
-| MODE_IX0_and_IMM1 : Freescale_instr_mode
- (* INDEXED++ + IMMEDIATE *)
-| MODE_IX0p_and_IMM1 : Freescale_instr_mode
- (* INDEXED + IMMEDIATE *)
-| MODE_IX1_and_IMM1 : Freescale_instr_mode
- (* INDEXED++ + IMMEDIATE *)
-| MODE_IX1p_and_IMM1 : Freescale_instr_mode
- (* INDEXED + IMMEDIATE *)
-| MODE_SP1_and_IMM1 : Freescale_instr_mode
-
- (* DIRECT(mTNY) = operando offset byte(maschera scrittura implicita 3 bit) *)
- (* ex: DIR3 e' carica b, scrivi b con n-simo bit modificato *)
-| MODE_DIRn : oct → Freescale_instr_mode
- (* DIRECT(mTNY) + IMMEDIATE = operando offset byte(maschera lettura implicita 3 bit) *)
- (* + operando valore immediato byte *)
- (* ex: DIR2_and_IMM1 e' carica b, carica imm, restituisci n-simo bit di b + imm *)
-| MODE_DIRn_and_IMM1 : oct → Freescale_instr_mode
- (* TINY = nessun operando (diretto implicito 4bit = [0x00000000:0000iiii]) *)
-| MODE_TNY : exadecim → Freescale_instr_mode
- (* SHORT = nessun operando (diretto implicito 5bit = [0x00000000:000iiiii]) *)
-| MODE_SRT : bitrigesim → Freescale_instr_mode
-.
-
-ndefinition eq_Freescale_im ≝
-λi1,i2:Freescale_instr_mode.
- match i1 with
- [ MODE_INH ⇒ match i2 with [ MODE_INH ⇒ true | _ ⇒ false ]
- | MODE_INHA ⇒ match i2 with [ MODE_INHA ⇒ true | _ ⇒ false ]
- | MODE_INHX ⇒ match i2 with [ MODE_INHX ⇒ true | _ ⇒ false ]
- | MODE_INHH ⇒ match i2 with [ MODE_INHH ⇒ true | _ ⇒ false ]
- | MODE_INHX0ADD ⇒ match i2 with [ MODE_INHX0ADD ⇒ true | _ ⇒ false ]
- | MODE_INHX1ADD ⇒ match i2 with [ MODE_INHX1ADD ⇒ true | _ ⇒ false ]
- | MODE_INHX2ADD ⇒ match i2 with [ MODE_INHX2ADD ⇒ true | _ ⇒ false ]
- | MODE_IMM1 ⇒ match i2 with [ MODE_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_IMM1EXT ⇒ match i2 with [ MODE_IMM1EXT ⇒ true | _ ⇒ false ]
- | MODE_IMM2 ⇒ match i2 with [ MODE_IMM2 ⇒ true | _ ⇒ false ]
- | MODE_DIR1 ⇒ match i2 with [ MODE_DIR1 ⇒ true | _ ⇒ false ]
- | MODE_DIR2 ⇒ match i2 with [ MODE_DIR2 ⇒ true | _ ⇒ false ]
- | MODE_IX0 ⇒ match i2 with [ MODE_IX0 ⇒ true | _ ⇒ false ]
- | MODE_IX1 ⇒ match i2 with [ MODE_IX1 ⇒ true | _ ⇒ false ]
- | MODE_IX2 ⇒ match i2 with [ MODE_IX2 ⇒ true | _ ⇒ false ]
- | MODE_SP1 ⇒ match i2 with [ MODE_SP1 ⇒ true | _ ⇒ false ]
- | MODE_SP2 ⇒ match i2 with [ MODE_SP2 ⇒ true | _ ⇒ false ]
- | MODE_DIR1_to_DIR1 ⇒ match i2 with [ MODE_DIR1_to_DIR1 ⇒ true | _ ⇒ false ]
- | MODE_IMM1_to_DIR1 ⇒ match i2 with [ MODE_IMM1_to_DIR1 ⇒ true | _ ⇒ false ]
- | MODE_IX0p_to_DIR1 ⇒ match i2 with [ MODE_IX0p_to_DIR1 ⇒ true | _ ⇒ false ]
- | MODE_DIR1_to_IX0p ⇒ match i2 with [ MODE_DIR1_to_IX0p ⇒ true | _ ⇒ false ]
- | MODE_INHA_and_IMM1 ⇒ match i2 with [ MODE_INHA_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_INHX_and_IMM1 ⇒ match i2 with [ MODE_INHX_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_IMM1_and_IMM1 ⇒ match i2 with [ MODE_IMM1_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_DIR1_and_IMM1 ⇒ match i2 with [ MODE_DIR1_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_IX0_and_IMM1 ⇒ match i2 with [ MODE_IX0_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_IX0p_and_IMM1 ⇒ match i2 with [ MODE_IX0p_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_IX1_and_IMM1 ⇒ match i2 with [ MODE_IX1_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_IX1p_and_IMM1 ⇒ match i2 with [ MODE_IX1p_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_SP1_and_IMM1 ⇒ match i2 with [ MODE_SP1_and_IMM1 ⇒ true | _ ⇒ false ]
- | MODE_DIRn n1 ⇒ match i2 with [ MODE_DIRn n2 ⇒ eqc ? n1 n2 | _ ⇒ false ]
- | MODE_DIRn_and_IMM1 n1 ⇒ match i2 with [ MODE_DIRn_and_IMM1 n2 ⇒ eqc ? n1 n2 | _ ⇒ false ]
- | MODE_TNY e1 ⇒ match i2 with [ MODE_TNY e2 ⇒ eqc ? e1 e2 | _ ⇒ false ]
- | MODE_SRT t1 ⇒ match i2 with [ MODE_SRT t2 ⇒ eqc ? t1 t2 | _ ⇒ false ]
- ].
-
-ndefinition forall_Freescale_im ≝ λP:Freescale_instr_mode → bool.
- P MODE_INH
-⊗ P MODE_INHA
-⊗ P MODE_INHX
-⊗ P MODE_INHH
-
-⊗ P MODE_INHX0ADD
-⊗ P MODE_INHX1ADD
-⊗ P MODE_INHX2ADD
-
-⊗ P MODE_IMM1
-⊗ P MODE_IMM1EXT
-⊗ P MODE_IMM2
-⊗ P MODE_DIR1
-⊗ P MODE_DIR2
-⊗ P MODE_IX0
-⊗ P MODE_IX1
-⊗ P MODE_IX2
-⊗ P MODE_SP1
-⊗ P MODE_SP2
-
-⊗ P MODE_DIR1_to_DIR1
-⊗ P MODE_IMM1_to_DIR1
-⊗ P MODE_IX0p_to_DIR1
-⊗ P MODE_DIR1_to_IX0p
-
-⊗ P MODE_INHA_and_IMM1
-⊗ P MODE_INHX_and_IMM1
-⊗ P MODE_IMM1_and_IMM1
-⊗ P MODE_DIR1_and_IMM1
-⊗ P MODE_IX0_and_IMM1
-⊗ P MODE_IX0p_and_IMM1
-⊗ P MODE_IX1_and_IMM1
-⊗ P MODE_IX1p_and_IMM1
-⊗ P MODE_SP1_and_IMM1
-
-⊗ forallc ? (λo. P (MODE_DIRn o))
-⊗ forallc ? (λo. P (MODE_DIRn_and_IMM1 o))
-⊗ forallc ? (λe. P (MODE_TNY e))
-⊗ forallc ? (λt. P (MODE_SRT t)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/Freescale_pseudo_base.ma".
-include "common/comp.ma".
-include "num/bool_lemmas.ma".
-
-nlemma eq_to_eqFreescalepseudo : ∀n1,n2.n1 = n2 → eq_Freescale_pseudo n1 n2 = true.
- #n1; #n2; #H;
- nrewrite > H;
- nelim n2;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma neqFreescalepseudo_to_neq : ∀n1,n2.eq_Freescale_pseudo n1 n2 = false → n1 ≠ n2.
- #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_Freescale_pseudo n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqFreescalepseudo n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-(* !!! per brevita... *)
-naxiom eqFreescalepseudo_to_eq : ∀c1,c2.eq_Freescale_pseudo c1 c2 = true → c1 = c2.
-
-nlemma neq_to_neqFreescalepseudo : ∀n1,n2.n1 ≠ n2 → eq_Freescale_pseudo n1 n2 = false.
- #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_Freescale_pseudo n1 n2));
- napply (not_to_not (eq_Freescale_pseudo n1 n2 = true) (n1 = n2) ? H);
- napply (eqFreescalepseudo_to_eq n1 n2).
-nqed.
-
-nlemma decidable_Freescalepseudo : ∀x,y:Freescale_pseudo.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_Freescale_pseudo x y = true) (eq_Freescale_pseudo x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqFreescalepseudo_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqFreescalepseudo_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqFreescalepseudo : symmetricT Freescale_pseudo bool eq_Freescale_pseudo.
- #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_Freescalepseudo n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqFreescalepseudo n1 n2 H);
- napply (symmetric_eq ? (eq_Freescale_pseudo n2 n1) false);
- napply (neq_to_neqFreescalepseudo n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
-
-nlemma Freescalepseudo_is_comparable : comparable.
- @ Freescale_pseudo
- ##[ napply ADC
- ##| napply forall_Freescale_pseudo
- ##| napply eq_Freescale_pseudo
- ##| napply eqFreescalepseudo_to_eq
- ##| napply eq_to_eqFreescalepseudo
- ##| napply neqFreescalepseudo_to_neq
- ##| napply neq_to_neqFreescalepseudo
- ##| napply decidable_Freescalepseudo
- ##| napply symmetric_eqFreescalepseudo
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr Freescalepseudo_is_comparable ≡ Freescale_pseudo.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/bool.ma".
-
-(* ********************************************** *)
-(* MATTONI BASE PER DEFINIRE LE TABELLE DELLE MCU *)
-(* ********************************************** *)
-
-(* enumerazione delle istruzioni *)
-ninductive Freescale_pseudo: Type ≝
- ADC : Freescale_pseudo (* add with carry *)
-| ADD : Freescale_pseudo (* add *)
-| AIS : Freescale_pseudo (* add immediate to SP *)
-| AIX : Freescale_pseudo (* add immediate to X *)
-| AND : Freescale_pseudo (* and *)
-| ASL : Freescale_pseudo (* aritmetic shift left *)
-| ASR : Freescale_pseudo (* aritmetic shift right *)
-| BCC : Freescale_pseudo (* branch if C=0 *)
-| BCLRn : Freescale_pseudo (* clear bit n *)
-| BCS : Freescale_pseudo (* branch if C=1 *)
-| BEQ : Freescale_pseudo (* branch if Z=1 *)
-| BGE : Freescale_pseudo (* branch if N⊙V=0 (great or equal) *)
-| BGND : Freescale_pseudo (* !!background mode!! *)
-| BGT : Freescale_pseudo (* branch if Z|N⊙V=0 clear (great) *)
-| BHCC : Freescale_pseudo (* branch if H=0 *)
-| BHCS : Freescale_pseudo (* branch if H=1 *)
-| BHI : Freescale_pseudo (* branch if C|Z=0, (higher) *)
-| BIH : Freescale_pseudo (* branch if nIRQ=1 *)
-| BIL : Freescale_pseudo (* branch if nIRQ=0 *)
-| BIT : Freescale_pseudo (* flag = and (bit test) *)
-| BLE : Freescale_pseudo (* branch if Z|N⊙V=1 (less or equal) *)
-| BLS : Freescale_pseudo (* branch if C|Z=1 (lower or same) *)
-| BLT : Freescale_pseudo (* branch if N⊙1=1 (less) *)
-| BMC : Freescale_pseudo (* branch if I=0 (interrupt mask clear) *)
-| BMI : Freescale_pseudo (* branch if N=1 (minus) *)
-| BMS : Freescale_pseudo (* branch if I=1 (interrupt mask set) *)
-| BNE : Freescale_pseudo (* branch if Z=0 *)
-| BPL : Freescale_pseudo (* branch if N=0 (plus) *)
-| BRA : Freescale_pseudo (* branch always *)
-| BRCLRn : Freescale_pseudo (* branch if bit n clear *)
-| BRN : Freescale_pseudo (* branch never (nop) *)
-| BRSETn : Freescale_pseudo (* branch if bit n set *)
-| BSETn : Freescale_pseudo (* set bit n *)
-| BSR : Freescale_pseudo (* branch to subroutine *)
-| CBEQA : Freescale_pseudo (* compare (A) and BEQ *)
-| CBEQX : Freescale_pseudo (* compare (X) and BEQ *)
-| CLC : Freescale_pseudo (* C=0 *)
-| CLI : Freescale_pseudo (* I=0 *)
-| CLR : Freescale_pseudo (* operand=0 *)
-| CMP : Freescale_pseudo (* flag = sub (compare A) *)
-| COM : Freescale_pseudo (* not (1 complement) *)
-| CPHX : Freescale_pseudo (* flag = sub (compare H:X) *)
-| CPX : Freescale_pseudo (* flag = sub (compare X) *)
-| DAA : Freescale_pseudo (* decimal adjust A *)
-| DBNZ : Freescale_pseudo (* dec and BNE *)
-| DEC : Freescale_pseudo (* operand=operand-1 (decrement) *)
-| DIV : Freescale_pseudo (* div *)
-| EOR : Freescale_pseudo (* xor *)
-| INC : Freescale_pseudo (* operand=operand+1 (increment) *)
-| JMP : Freescale_pseudo (* jmp word [operand] *)
-| JSR : Freescale_pseudo (* jmp to subroutine *)
-| LDA : Freescale_pseudo (* load in A *)
-| LDHX : Freescale_pseudo (* load in H:X *)
-| LDX : Freescale_pseudo (* load in X *)
-| LSR : Freescale_pseudo (* logical shift right *)
-| MOV : Freescale_pseudo (* move *)
-| MUL : Freescale_pseudo (* mul *)
-| NEG : Freescale_pseudo (* neg (2 complement) *)
-| NOP : Freescale_pseudo (* nop *)
-| NSA : Freescale_pseudo (* nibble swap A (al:ah <- ah:al) *)
-| ORA : Freescale_pseudo (* or *)
-| PSHA : Freescale_pseudo (* push A *)
-| PSHH : Freescale_pseudo (* push H *)
-| PSHX : Freescale_pseudo (* push X *)
-| PULA : Freescale_pseudo (* pop A *)
-| PULH : Freescale_pseudo (* pop H *)
-| PULX : Freescale_pseudo (* pop X *)
-| ROL : Freescale_pseudo (* rotate left *)
-| ROR : Freescale_pseudo (* rotate right *)
-| RSP : Freescale_pseudo (* reset SP (0x00FF) *)
-| RTI : Freescale_pseudo (* return from interrupt *)
-| RTS : Freescale_pseudo (* return from subroutine *)
-| SBC : Freescale_pseudo (* sub with carry*)
-| SEC : Freescale_pseudo (* C=1 *)
-| SEI : Freescale_pseudo (* I=1 *)
-| SHA : Freescale_pseudo (* swap spc_high,A *)
-| SLA : Freescale_pseudo (* swap spc_low,A *)
-| STA : Freescale_pseudo (* store from A *)
-| STHX : Freescale_pseudo (* store from H:X *)
-| STOP : Freescale_pseudo (* !!stop mode!! *)
-| STX : Freescale_pseudo (* store from X *)
-| SUB : Freescale_pseudo (* sub *)
-| SWI : Freescale_pseudo (* software interrupt *)
-| TAP : Freescale_pseudo (* flag=A (transfer A to process status byte *)
-| TAX : Freescale_pseudo (* X=A (transfer A to X) *)
-| TPA : Freescale_pseudo (* A=flag (transfer process status byte to A) *)
-| TST : Freescale_pseudo (* flag = sub (test) *)
-| TSX : Freescale_pseudo (* X:H=SP (transfer SP to H:X) *)
-| TXA : Freescale_pseudo (* A=X (transfer X to A) *)
-| TXS : Freescale_pseudo (* SP=X:H (transfer H:X to SP) *)
-| WAIT : Freescale_pseudo (* !!wait mode!! *)
-.
-
-ndefinition eq_Freescale_pseudo ≝
-λps1,ps2:Freescale_pseudo.
- match ps1 with
- [ ADC ⇒ match ps2 with [ ADC ⇒ true | _ ⇒ false ] | ADD ⇒ match ps2 with [ ADD ⇒ true | _ ⇒ false ]
- | AIS ⇒ match ps2 with [ AIS ⇒ true | _ ⇒ false ] | AIX ⇒ match ps2 with [ AIX ⇒ true | _ ⇒ false ]
- | AND ⇒ match ps2 with [ AND ⇒ true | _ ⇒ false ] | ASL ⇒ match ps2 with [ ASL ⇒ true | _ ⇒ false ]
- | ASR ⇒ match ps2 with [ ASR ⇒ true | _ ⇒ false ] | BCC ⇒ match ps2 with [ BCC ⇒ true | _ ⇒ false ]
- | BCLRn ⇒ match ps2 with [ BCLRn ⇒ true | _ ⇒ false ] | BCS ⇒ match ps2 with [ BCS ⇒ true | _ ⇒ false ]
- | BEQ ⇒ match ps2 with [ BEQ ⇒ true | _ ⇒ false ] | BGE ⇒ match ps2 with [ BGE ⇒ true | _ ⇒ false ]
- | BGND ⇒ match ps2 with [ BGND ⇒ true | _ ⇒ false ] | BGT ⇒ match ps2 with [ BGT ⇒ true | _ ⇒ false ]
- | BHCC ⇒ match ps2 with [ BHCC ⇒ true | _ ⇒ false ] | BHCS ⇒ match ps2 with [ BHCS ⇒ true | _ ⇒ false ]
- | BHI ⇒ match ps2 with [ BHI ⇒ true | _ ⇒ false ] | BIH ⇒ match ps2 with [ BIH ⇒ true | _ ⇒ false ]
- | BIL ⇒ match ps2 with [ BIL ⇒ true | _ ⇒ false ] | BIT ⇒ match ps2 with [ BIT ⇒ true | _ ⇒ false ]
- | BLE ⇒ match ps2 with [ BLE ⇒ true | _ ⇒ false ] | BLS ⇒ match ps2 with [ BLS ⇒ true | _ ⇒ false ]
- | BLT ⇒ match ps2 with [ BLT ⇒ true | _ ⇒ false ] | BMC ⇒ match ps2 with [ BMC ⇒ true | _ ⇒ false ]
- | BMI ⇒ match ps2 with [ BMI ⇒ true | _ ⇒ false ] | BMS ⇒ match ps2 with [ BMS ⇒ true | _ ⇒ false ]
- | BNE ⇒ match ps2 with [ BNE ⇒ true | _ ⇒ false ] | BPL ⇒ match ps2 with [ BPL ⇒ true | _ ⇒ false ]
- | BRA ⇒ match ps2 with [ BRA ⇒ true | _ ⇒ false ] | BRCLRn ⇒ match ps2 with [ BRCLRn ⇒ true | _ ⇒ false ]
- | BRN ⇒ match ps2 with [ BRN ⇒ true | _ ⇒ false ] | BRSETn ⇒ match ps2 with [ BRSETn ⇒ true | _ ⇒ false ]
- | BSETn ⇒ match ps2 with [ BSETn ⇒ true | _ ⇒ false ] | BSR ⇒ match ps2 with [ BSR ⇒ true | _ ⇒ false ]
- | CBEQA ⇒ match ps2 with [ CBEQA ⇒ true | _ ⇒ false ] | CBEQX ⇒ match ps2 with [ CBEQX ⇒ true | _ ⇒ false ]
- | CLC ⇒ match ps2 with [ CLC ⇒ true | _ ⇒ false ] | CLI ⇒ match ps2 with [ CLI ⇒ true | _ ⇒ false ]
- | CLR ⇒ match ps2 with [ CLR ⇒ true | _ ⇒ false ] | CMP ⇒ match ps2 with [ CMP ⇒ true | _ ⇒ false ]
- | COM ⇒ match ps2 with [ COM ⇒ true | _ ⇒ false ] | CPHX ⇒ match ps2 with [ CPHX ⇒ true | _ ⇒ false ]
- | CPX ⇒ match ps2 with [ CPX ⇒ true | _ ⇒ false ] | DAA ⇒ match ps2 with [ DAA ⇒ true | _ ⇒ false ]
- | DBNZ ⇒ match ps2 with [ DBNZ ⇒ true | _ ⇒ false ] | DEC ⇒ match ps2 with [ DEC ⇒ true | _ ⇒ false ]
- | DIV ⇒ match ps2 with [ DIV ⇒ true | _ ⇒ false ] | EOR ⇒ match ps2 with [ EOR ⇒ true | _ ⇒ false ]
- | INC ⇒ match ps2 with [ INC ⇒ true | _ ⇒ false ] | JMP ⇒ match ps2 with [ JMP ⇒ true | _ ⇒ false ]
- | JSR ⇒ match ps2 with [ JSR ⇒ true | _ ⇒ false ] | LDA ⇒ match ps2 with [ LDA ⇒ true | _ ⇒ false ]
- | LDHX ⇒ match ps2 with [ LDHX ⇒ true | _ ⇒ false ] | LDX ⇒ match ps2 with [ LDX ⇒ true | _ ⇒ false ]
- | LSR ⇒ match ps2 with [ LSR ⇒ true | _ ⇒ false ] | MOV ⇒ match ps2 with [ MOV ⇒ true | _ ⇒ false ]
- | MUL ⇒ match ps2 with [ MUL ⇒ true | _ ⇒ false ] | NEG ⇒ match ps2 with [ NEG ⇒ true | _ ⇒ false ]
- | NOP ⇒ match ps2 with [ NOP ⇒ true | _ ⇒ false ] | NSA ⇒ match ps2 with [ NSA ⇒ true | _ ⇒ false ]
- | ORA ⇒ match ps2 with [ ORA ⇒ true | _ ⇒ false ] | PSHA ⇒ match ps2 with [ PSHA ⇒ true | _ ⇒ false ]
- | PSHH ⇒ match ps2 with [ PSHH ⇒ true | _ ⇒ false ] | PSHX ⇒ match ps2 with [ PSHX ⇒ true | _ ⇒ false ]
- | PULA ⇒ match ps2 with [ PULA ⇒ true | _ ⇒ false ] | PULH ⇒ match ps2 with [ PULH ⇒ true | _ ⇒ false ]
- | PULX ⇒ match ps2 with [ PULX ⇒ true | _ ⇒ false ] | ROL ⇒ match ps2 with [ ROL ⇒ true | _ ⇒ false ]
- | ROR ⇒ match ps2 with [ ROR ⇒ true | _ ⇒ false ] | RSP ⇒ match ps2 with [ RSP ⇒ true | _ ⇒ false ]
- | RTI ⇒ match ps2 with [ RTI ⇒ true | _ ⇒ false ] | RTS ⇒ match ps2 with [ RTS ⇒ true | _ ⇒ false ]
- | SBC ⇒ match ps2 with [ SBC ⇒ true | _ ⇒ false ] | SEC ⇒ match ps2 with [ SEC ⇒ true | _ ⇒ false ]
- | SEI ⇒ match ps2 with [ SEI ⇒ true | _ ⇒ false ] | SHA ⇒ match ps2 with [ SHA ⇒ true | _ ⇒ false ]
- | SLA ⇒ match ps2 with [ SLA ⇒ true | _ ⇒ false ] | STA ⇒ match ps2 with [ STA ⇒ true | _ ⇒ false ]
- | STHX ⇒ match ps2 with [ STHX ⇒ true | _ ⇒ false ] | STOP ⇒ match ps2 with [ STOP ⇒ true | _ ⇒ false ]
- | STX ⇒ match ps2 with [ STX ⇒ true | _ ⇒ false ] | SUB ⇒ match ps2 with [ SUB ⇒ true | _ ⇒ false ]
- | SWI ⇒ match ps2 with [ SWI ⇒ true | _ ⇒ false ] | TAP ⇒ match ps2 with [ TAP ⇒ true | _ ⇒ false ]
- | TAX ⇒ match ps2 with [ TAX ⇒ true | _ ⇒ false ] | TPA ⇒ match ps2 with [ TPA ⇒ true | _ ⇒ false ]
- | TST ⇒ match ps2 with [ TST ⇒ true | _ ⇒ false ] | TSX ⇒ match ps2 with [ TSX ⇒ true | _ ⇒ false ]
- | TXA ⇒ match ps2 with [ TXA ⇒ true | _ ⇒ false ] | TXS ⇒ match ps2 with [ TXS ⇒ true | _ ⇒ false ]
- | WAIT ⇒ match ps2 with [ WAIT ⇒ true | _ ⇒ false ]
- ].
-
-ndefinition forall_Freescale_pseudo ≝ λP:Freescale_pseudo → bool.
- P ADC ⊗ P ADD ⊗ P AIS ⊗ P AIX ⊗ P AND ⊗ P ASL ⊗ P ASR ⊗ P BCC ⊗
- P BCLRn ⊗ P BCS ⊗ P BEQ ⊗ P BGE ⊗ P BGND ⊗ P BGT ⊗ P BHCC ⊗ P BHCS ⊗
- P BHI ⊗ P BIH ⊗ P BIL ⊗ P BIT ⊗ P BLE ⊗ P BLS ⊗ P BLT ⊗ P BMC ⊗
- P BMI ⊗ P BMS ⊗ P BNE ⊗ P BPL ⊗ P BRA ⊗ P BRCLRn ⊗ P BRN ⊗ P BRSETn ⊗
- P BSETn ⊗ P BSR ⊗ P CBEQA ⊗ P CBEQX ⊗ P CLC ⊗ P CLI ⊗ P CLR ⊗ P CMP ⊗
- P COM ⊗ P CPHX ⊗ P CPX ⊗ P DAA ⊗ P DBNZ ⊗ P DEC ⊗ P DIV ⊗ P EOR ⊗
- P INC ⊗ P JMP ⊗ P JSR ⊗ P LDA ⊗ P LDHX ⊗ P LDX ⊗ P LSR ⊗ P MOV ⊗
- P MUL ⊗ P NEG ⊗ P NOP ⊗ P NSA ⊗ P ORA ⊗ P PSHA ⊗ P PSHH ⊗ P PSHX ⊗
- P PULA ⊗ P PULH ⊗ P PULX ⊗ P ROL ⊗ P ROR ⊗ P RSP ⊗ P RTI ⊗ P RTS ⊗
- P SBC ⊗ P SEC ⊗ P SEI ⊗ P SHA ⊗ P SLA ⊗ P STA ⊗ P STHX ⊗ P STOP ⊗
- P STX ⊗ P SUB ⊗ P SWI ⊗ P TAP ⊗ P TAX ⊗ P TPA ⊗ P TST ⊗ P TSX ⊗
- P TXA ⊗ P TXS ⊗ P WAIT.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/Freescale_pseudo.ma".
-include "emulator/opcodes/Freescale_instr_mode.ma".
-include "emulator/opcodes/byte_or_word.ma".
-include "common/list.ma".
-
-(* ***************** *)
-(* TABELLA DELL'HC05 *)
-(* ***************** *)
-
-(* definizione come concatenazione finale di liste per velocizzare il parsing *)
-(* ogni riga e' [pseudo] [modalita' indirizzamento] [opcode esadecimale] [#cicli esecuzione] *)
-
-ndefinition opcode_table_HC05_1 ≝
-[
- quadruple … ADC MODE_IMM1 (Byte 〈xA,x9〉) nat2
-; quadruple … ADC MODE_DIR1 (Byte 〈xB,x9〉) nat3
-; quadruple … ADC MODE_DIR2 (Byte 〈xC,x9〉) nat4
-; quadruple … ADC MODE_IX2 (Byte 〈xD,x9〉) nat5
-; quadruple … ADC MODE_IX1 (Byte 〈xE,x9〉) nat4
-; quadruple … ADC MODE_IX0 (Byte 〈xF,x9〉) nat4
-].
-
-ndefinition opcode_table_HC05_2 ≝
-[
- quadruple … ADD MODE_IMM1 (Byte 〈xA,xB〉) nat2
-; quadruple … ADD MODE_DIR1 (Byte 〈xB,xB〉) nat3
-; quadruple … ADD MODE_DIR2 (Byte 〈xC,xB〉) nat4
-; quadruple … ADD MODE_IX2 (Byte 〈xD,xB〉) nat5
-; quadruple … ADD MODE_IX1 (Byte 〈xE,xB〉) nat4
-; quadruple … ADD MODE_IX0 (Byte 〈xF,xB〉) nat3
-].
-
-ndefinition opcode_table_HC05_3 ≝
-[
- quadruple … AND MODE_IMM1 (Byte 〈xA,x4〉) nat2
-; quadruple … AND MODE_DIR1 (Byte 〈xB,x4〉) nat3
-; quadruple … AND MODE_DIR2 (Byte 〈xC,x4〉) nat4
-; quadruple … AND MODE_IX2 (Byte 〈xD,x4〉) nat5
-; quadruple … AND MODE_IX1 (Byte 〈xE,x4〉) nat4
-; quadruple … AND MODE_IX0 (Byte 〈xF,x4〉) nat3
-].
-
-ndefinition opcode_table_HC05_4 ≝
-[
- quadruple … ASL MODE_DIR1 (Byte 〈x3,x8〉) nat5
-; quadruple … ASL MODE_INHA (Byte 〈x4,x8〉) nat3
-; quadruple … ASL MODE_INHX (Byte 〈x5,x8〉) nat3
-; quadruple … ASL MODE_IX1 (Byte 〈x6,x8〉) nat6
-; quadruple … ASL MODE_IX0 (Byte 〈x7,x8〉) nat5
-].
-
-ndefinition opcode_table_HC05_5 ≝
-[
- quadruple … ASR MODE_DIR1 (Byte 〈x3,x7〉) nat5
-; quadruple … ASR MODE_INHA (Byte 〈x4,x7〉) nat3
-; quadruple … ASR MODE_INHX (Byte 〈x5,x7〉) nat3
-; quadruple … ASR MODE_IX1 (Byte 〈x6,x7〉) nat6
-; quadruple … ASR MODE_IX0 (Byte 〈x7,x7〉) nat5
-].
-
-ndefinition opcode_table_HC05_6 ≝
-[
- quadruple … BRA MODE_IMM1 (Byte 〈x2,x0〉) nat3
-; quadruple … BRN MODE_IMM1 (Byte 〈x2,x1〉) nat3
-; quadruple … BHI MODE_IMM1 (Byte 〈x2,x2〉) nat3
-; quadruple … BLS MODE_IMM1 (Byte 〈x2,x3〉) nat3
-; quadruple … BCC MODE_IMM1 (Byte 〈x2,x4〉) nat3
-; quadruple … BCS MODE_IMM1 (Byte 〈x2,x5〉) nat3
-; quadruple … BNE MODE_IMM1 (Byte 〈x2,x6〉) nat3
-; quadruple … BEQ MODE_IMM1 (Byte 〈x2,x7〉) nat3
-; quadruple … BHCC MODE_IMM1 (Byte 〈x2,x8〉) nat3
-; quadruple … BHCS MODE_IMM1 (Byte 〈x2,x9〉) nat3
-; quadruple … BPL MODE_IMM1 (Byte 〈x2,xA〉) nat3
-; quadruple … BMI MODE_IMM1 (Byte 〈x2,xB〉) nat3
-; quadruple … BMC MODE_IMM1 (Byte 〈x2,xC〉) nat3
-; quadruple … BMS MODE_IMM1 (Byte 〈x2,xD〉) nat3
-; quadruple … BIL MODE_IMM1 (Byte 〈x2,xE〉) nat3
-; quadruple … BIH MODE_IMM1 (Byte 〈x2,xF〉) nat3
-].
-
-ndefinition opcode_table_HC05_7 ≝
-[
- quadruple … BSETn (MODE_DIRn o0) (Byte 〈x1,x0〉) nat5
-; quadruple … BCLRn (MODE_DIRn o0) (Byte 〈x1,x1〉) nat5
-; quadruple … BSETn (MODE_DIRn o1) (Byte 〈x1,x2〉) nat5
-; quadruple … BCLRn (MODE_DIRn o1) (Byte 〈x1,x3〉) nat5
-; quadruple … BSETn (MODE_DIRn o2) (Byte 〈x1,x4〉) nat5
-; quadruple … BCLRn (MODE_DIRn o2) (Byte 〈x1,x5〉) nat5
-; quadruple … BSETn (MODE_DIRn o3) (Byte 〈x1,x6〉) nat5
-; quadruple … BCLRn (MODE_DIRn o3) (Byte 〈x1,x7〉) nat5
-; quadruple … BSETn (MODE_DIRn o4) (Byte 〈x1,x8〉) nat5
-; quadruple … BCLRn (MODE_DIRn o4) (Byte 〈x1,x9〉) nat5
-; quadruple … BSETn (MODE_DIRn o5) (Byte 〈x1,xA〉) nat5
-; quadruple … BCLRn (MODE_DIRn o5) (Byte 〈x1,xB〉) nat5
-; quadruple … BSETn (MODE_DIRn o6) (Byte 〈x1,xC〉) nat5
-; quadruple … BCLRn (MODE_DIRn o6) (Byte 〈x1,xD〉) nat5
-; quadruple … BSETn (MODE_DIRn o7) (Byte 〈x1,xE〉) nat5
-; quadruple … BCLRn (MODE_DIRn o7) (Byte 〈x1,xF〉) nat5
-].
-
-ndefinition opcode_table_HC05_8 ≝
-[
- quadruple … BRSETn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x0〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x1〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x2〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x3〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x4〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x5〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x6〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x7〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x8〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x9〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xA〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xB〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xC〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xD〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xE〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xF〉) nat5
-].
-
-ndefinition opcode_table_HC05_9 ≝
-[
- quadruple … BIT MODE_IMM1 (Byte 〈xA,x5〉) nat2
-; quadruple … BIT MODE_DIR1 (Byte 〈xB,x5〉) nat3
-; quadruple … BIT MODE_DIR2 (Byte 〈xC,x5〉) nat4
-; quadruple … BIT MODE_IX2 (Byte 〈xD,x5〉) nat5
-; quadruple … BIT MODE_IX1 (Byte 〈xE,x5〉) nat4
-; quadruple … BIT MODE_IX0 (Byte 〈xF,x5〉) nat3
-].
-
-ndefinition opcode_table_HC05_10 ≝
-[
- quadruple … MUL MODE_INH (Byte 〈x4,x2〉) nat11
-; quadruple … RTI MODE_INH (Byte 〈x8,x0〉) nat9
-; quadruple … RTS MODE_INH (Byte 〈x8,x1〉) nat6
-; quadruple … SWI MODE_INH (Byte 〈x8,x3〉) nat10
-; quadruple … STOP MODE_INH (Byte 〈x8,xE〉) nat2
-; quadruple … WAIT MODE_INH (Byte 〈x8,xF〉) nat2
-; quadruple … TAX MODE_INH (Byte 〈x9,x7〉) nat2
-; quadruple … CLC MODE_INH (Byte 〈x9,x8〉) nat2
-; quadruple … SEC MODE_INH (Byte 〈x9,x9〉) nat2
-; quadruple … CLI MODE_INH (Byte 〈x9,xA〉) nat2
-; quadruple … SEI MODE_INH (Byte 〈x9,xB〉) nat2
-; quadruple … RSP MODE_INH (Byte 〈x9,xC〉) nat2
-; quadruple … NOP MODE_INH (Byte 〈x9,xD〉) nat2
-; quadruple … TXA MODE_INH (Byte 〈x9,xF〉) nat2
-].
-
-ndefinition opcode_table_HC05_11 ≝
-[
- quadruple … CLR MODE_DIR1 (Byte 〈x3,xF〉) nat5
-; quadruple … CLR MODE_INHA (Byte 〈x4,xF〉) nat3
-; quadruple … CLR MODE_INHX (Byte 〈x5,xF〉) nat3
-; quadruple … CLR MODE_IX1 (Byte 〈x6,xF〉) nat6
-; quadruple … CLR MODE_IX0 (Byte 〈x7,xF〉) nat5
-].
-
-ndefinition opcode_table_HC05_12 ≝
-[
- quadruple … CMP MODE_IMM1 (Byte 〈xA,x1〉) nat2
-; quadruple … CMP MODE_DIR1 (Byte 〈xB,x1〉) nat3
-; quadruple … CMP MODE_DIR2 (Byte 〈xC,x1〉) nat4
-; quadruple … CMP MODE_IX2 (Byte 〈xD,x1〉) nat5
-; quadruple … CMP MODE_IX1 (Byte 〈xE,x1〉) nat4
-; quadruple … CMP MODE_IX0 (Byte 〈xF,x1〉) nat3
-].
-
-ndefinition opcode_table_HC05_13 ≝
-[
- quadruple … COM MODE_DIR1 (Byte 〈x3,x3〉) nat5
-; quadruple … COM MODE_INHA (Byte 〈x4,x3〉) nat3
-; quadruple … COM MODE_INHX (Byte 〈x5,x3〉) nat3
-; quadruple … COM MODE_IX1 (Byte 〈x6,x3〉) nat6
-; quadruple … COM MODE_IX0 (Byte 〈x7,x3〉) nat5
-].
-
-ndefinition opcode_table_HC05_14 ≝
-[
- quadruple … CPX MODE_IMM1 (Byte 〈xA,x3〉) nat2
-; quadruple … CPX MODE_DIR1 (Byte 〈xB,x3〉) nat3
-; quadruple … CPX MODE_DIR2 (Byte 〈xC,x3〉) nat4
-; quadruple … CPX MODE_IX2 (Byte 〈xD,x3〉) nat5
-; quadruple … CPX MODE_IX1 (Byte 〈xE,x3〉) nat4
-; quadruple … CPX MODE_IX0 (Byte 〈xF,x3〉) nat3
-].
-
-ndefinition opcode_table_HC05_15 ≝
-[
- quadruple … DEC MODE_DIR1 (Byte 〈x3,xA〉) nat5
-; quadruple … DEC MODE_INHA (Byte 〈x4,xA〉) nat3
-; quadruple … DEC MODE_INHX (Byte 〈x5,xA〉) nat3
-; quadruple … DEC MODE_IX1 (Byte 〈x6,xA〉) nat6
-; quadruple … DEC MODE_IX0 (Byte 〈x7,xA〉) nat5
-].
-
-ndefinition opcode_table_HC05_16 ≝
-[
- quadruple … EOR MODE_IMM1 (Byte 〈xA,x8〉) nat2
-; quadruple … EOR MODE_DIR1 (Byte 〈xB,x8〉) nat3
-; quadruple … EOR MODE_DIR2 (Byte 〈xC,x8〉) nat4
-; quadruple … EOR MODE_IX2 (Byte 〈xD,x8〉) nat5
-; quadruple … EOR MODE_IX1 (Byte 〈xE,x8〉) nat4
-; quadruple … EOR MODE_IX0 (Byte 〈xF,x8〉) nat3
-].
-
-ndefinition opcode_table_HC05_17 ≝
-[
- quadruple … INC MODE_DIR1 (Byte 〈x3,xC〉) nat5
-; quadruple … INC MODE_INHA (Byte 〈x4,xC〉) nat3
-; quadruple … INC MODE_INHX (Byte 〈x5,xC〉) nat3
-; quadruple … INC MODE_IX1 (Byte 〈x6,xC〉) nat6
-; quadruple … INC MODE_IX0 (Byte 〈x7,xC〉) nat5
-].
-
-ndefinition opcode_table_HC05_18 ≝
-[
- quadruple … JMP MODE_IMM1EXT (Byte 〈xB,xC〉) nat2
-; quadruple … JMP MODE_IMM2 (Byte 〈xC,xC〉) nat3
-; quadruple … JMP MODE_INHX2ADD (Byte 〈xD,xC〉) nat4
-; quadruple … JMP MODE_INHX1ADD (Byte 〈xE,xC〉) nat3
-; quadruple … JMP MODE_INHX0ADD (Byte 〈xF,xC〉) nat2
-].
-
-ndefinition opcode_table_HC05_19 ≝
-[
- quadruple … BSR MODE_IMM1 (Byte 〈xA,xD〉) nat6
-; quadruple … JSR MODE_IMM1EXT (Byte 〈xB,xD〉) nat5
-; quadruple … JSR MODE_IMM2 (Byte 〈xC,xD〉) nat6
-; quadruple … JSR MODE_INHX2ADD (Byte 〈xD,xD〉) nat7
-; quadruple … JSR MODE_INHX1ADD (Byte 〈xE,xD〉) nat6
-; quadruple … JSR MODE_INHX0ADD (Byte 〈xF,xD〉) nat5
-].
-
-ndefinition opcode_table_HC05_20 ≝
-[
- quadruple … LDA MODE_IMM1 (Byte 〈xA,x6〉) nat2
-; quadruple … LDA MODE_DIR1 (Byte 〈xB,x6〉) nat3
-; quadruple … LDA MODE_DIR2 (Byte 〈xC,x6〉) nat4
-; quadruple … LDA MODE_IX2 (Byte 〈xD,x6〉) nat5
-; quadruple … LDA MODE_IX1 (Byte 〈xE,x6〉) nat4
-; quadruple … LDA MODE_IX0 (Byte 〈xF,x6〉) nat3
-].
-
-ndefinition opcode_table_HC05_21 ≝
-[
- quadruple … LDX MODE_IMM1 (Byte 〈xA,xE〉) nat2
-; quadruple … LDX MODE_DIR1 (Byte 〈xB,xE〉) nat3
-; quadruple … LDX MODE_DIR2 (Byte 〈xC,xE〉) nat4
-; quadruple … LDX MODE_IX2 (Byte 〈xD,xE〉) nat5
-; quadruple … LDX MODE_IX1 (Byte 〈xE,xE〉) nat4
-; quadruple … LDX MODE_IX0 (Byte 〈xF,xE〉) nat3
-].
-
-ndefinition opcode_table_HC05_22 ≝
-[
- quadruple … LSR MODE_DIR1 (Byte 〈x3,x4〉) nat5
-; quadruple … LSR MODE_INHA (Byte 〈x4,x4〉) nat3
-; quadruple … LSR MODE_INHX (Byte 〈x5,x4〉) nat3
-; quadruple … LSR MODE_IX1 (Byte 〈x6,x4〉) nat6
-; quadruple … LSR MODE_IX0 (Byte 〈x7,x4〉) nat5
-].
-
-ndefinition opcode_table_HC05_23 ≝
-[
- quadruple … NEG MODE_DIR1 (Byte 〈x3,x0〉) nat5
-; quadruple … NEG MODE_INHA (Byte 〈x4,x0〉) nat3
-; quadruple … NEG MODE_INHX (Byte 〈x5,x0〉) nat3
-; quadruple … NEG MODE_IX1 (Byte 〈x6,x0〉) nat6
-; quadruple … NEG MODE_IX0 (Byte 〈x7,x0〉) nat5
-].
-
-ndefinition opcode_table_HC05_24 ≝
-[
- quadruple … ORA MODE_IMM1 (Byte 〈xA,xA〉) nat2
-; quadruple … ORA MODE_DIR1 (Byte 〈xB,xA〉) nat3
-; quadruple … ORA MODE_DIR2 (Byte 〈xC,xA〉) nat4
-; quadruple … ORA MODE_IX2 (Byte 〈xD,xA〉) nat5
-; quadruple … ORA MODE_IX1 (Byte 〈xE,xA〉) nat4
-; quadruple … ORA MODE_IX0 (Byte 〈xF,xA〉) nat3
-].
-
-ndefinition opcode_table_HC05_25 ≝
-[
- quadruple … ROL MODE_DIR1 (Byte 〈x3,x9〉) nat5
-; quadruple … ROL MODE_INHA (Byte 〈x4,x9〉) nat3
-; quadruple … ROL MODE_INHX (Byte 〈x5,x9〉) nat3
-; quadruple … ROL MODE_IX1 (Byte 〈x6,x9〉) nat6
-; quadruple … ROL MODE_IX0 (Byte 〈x7,x9〉) nat5
-].
-
-ndefinition opcode_table_HC05_26 ≝
-[
- quadruple … ROR MODE_DIR1 (Byte 〈x3,x6〉) nat5
-; quadruple … ROR MODE_INHA (Byte 〈x4,x6〉) nat3
-; quadruple … ROR MODE_INHX (Byte 〈x5,x6〉) nat3
-; quadruple … ROR MODE_IX1 (Byte 〈x6,x6〉) nat6
-; quadruple … ROR MODE_IX0 (Byte 〈x7,x6〉) nat5
-].
-
-ndefinition opcode_table_HC05_27 ≝
-[
- quadruple … SBC MODE_IMM1 (Byte 〈xA,x2〉) nat2
-; quadruple … SBC MODE_DIR1 (Byte 〈xB,x2〉) nat3
-; quadruple … SBC MODE_DIR2 (Byte 〈xC,x2〉) nat4
-; quadruple … SBC MODE_IX2 (Byte 〈xD,x2〉) nat5
-; quadruple … SBC MODE_IX1 (Byte 〈xE,x2〉) nat4
-; quadruple … SBC MODE_IX0 (Byte 〈xF,x2〉) nat3
-].
-
-ndefinition opcode_table_HC05_28 ≝
-[
- quadruple … STA MODE_DIR1 (Byte 〈xB,x7〉) nat4
-; quadruple … STA MODE_DIR2 (Byte 〈xC,x7〉) nat5
-; quadruple … STA MODE_IX2 (Byte 〈xD,x7〉) nat6
-; quadruple … STA MODE_IX1 (Byte 〈xE,x7〉) nat5
-; quadruple … STA MODE_IX0 (Byte 〈xF,x7〉) nat4
-].
-
-ndefinition opcode_table_HC05_29 ≝
-[
- quadruple … STX MODE_DIR1 (Byte 〈xB,xF〉) nat4
-; quadruple … STX MODE_DIR2 (Byte 〈xC,xF〉) nat5
-; quadruple … STX MODE_IX2 (Byte 〈xD,xF〉) nat6
-; quadruple … STX MODE_IX1 (Byte 〈xE,xF〉) nat5
-; quadruple … STX MODE_IX0 (Byte 〈xF,xF〉) nat4
-].
-
-ndefinition opcode_table_HC05_30 ≝
-[
- quadruple … SUB MODE_IMM1 (Byte 〈xA,x0〉) nat2
-; quadruple … SUB MODE_DIR1 (Byte 〈xB,x0〉) nat3
-; quadruple … SUB MODE_DIR2 (Byte 〈xC,x0〉) nat4
-; quadruple … SUB MODE_IX2 (Byte 〈xD,x0〉) nat5
-; quadruple … SUB MODE_IX1 (Byte 〈xE,x0〉) nat4
-; quadruple … SUB MODE_IX0 (Byte 〈xF,x0〉) nat3
-].
-
-ndefinition opcode_table_HC05_31 ≝
-[
- quadruple … TST MODE_DIR1 (Byte 〈x3,xD〉) nat4
-; quadruple … TST MODE_INHA (Byte 〈x4,xD〉) nat3
-; quadruple … TST MODE_INHX (Byte 〈x5,xD〉) nat3
-; quadruple … TST MODE_IX1 (Byte 〈x6,xD〉) nat5
-; quadruple … TST MODE_IX0 (Byte 〈x7,xD〉) nat4
-].
-
-ndefinition opcode_table_HC05 ≝
- opcode_table_HC05_1 @ opcode_table_HC05_2 @ opcode_table_HC05_3 @ opcode_table_HC05_4 @
- opcode_table_HC05_5 @ opcode_table_HC05_6 @ opcode_table_HC05_7 @ opcode_table_HC05_8 @
- opcode_table_HC05_9 @ opcode_table_HC05_10 @ opcode_table_HC05_11 @ opcode_table_HC05_12 @
- opcode_table_HC05_13 @ opcode_table_HC05_14 @ opcode_table_HC05_15 @ opcode_table_HC05_16 @
- opcode_table_HC05_17 @ opcode_table_HC05_18 @ opcode_table_HC05_19 @ opcode_table_HC05_20 @
- opcode_table_HC05_21 @ opcode_table_HC05_22 @ opcode_table_HC05_23 @ opcode_table_HC05_24 @
- opcode_table_HC05_25 @ opcode_table_HC05_26 @ opcode_table_HC05_27 @ opcode_table_HC05_28 @
- opcode_table_HC05_29 @ opcode_table_HC05_30 @ opcode_table_HC05_31.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/pseudo.ma".
-include "emulator/opcodes/HC05_table.ma".
-
-(* ***************** *)
-(* TABELLA DELL'HC05 *)
-(* ***************** *)
-
-(* HC05: opcode non implementati come da manuale *)
-ndefinition HC05_not_impl_byte ≝
- [〈x3,x1〉;〈x3,x2〉;〈x3,x5〉;〈x3,xB〉;〈x3,xE〉
- ;〈x4,x1〉;〈x4,x5〉;〈x4,xB〉;〈x4,xE〉
- ;〈x5,x1〉;〈x5,x2〉;〈x5,x5〉;〈x5,xB〉;〈x5,xE〉
- ;〈x6,x1〉;〈x6,x2〉;〈x6,x5〉;〈x6,xB〉;〈x6,xE〉
- ;〈x7,x1〉;〈x7,x2〉;〈x7,x5〉;〈x7,xB〉;〈x7,xE〉
- ;〈x8,x2〉;〈x8,x4〉;〈x8,x5〉;〈x8,x6〉;〈x8,x7〉;〈x8,x8〉;〈x8,x9〉;〈x8,xA〉;〈x8,xB〉;〈x8,xC〉;〈x8,xD〉
- ;〈x9,x0〉;〈x9,x1〉;〈x9,x2〉;〈x9,x3〉;〈x9,x4〉;〈x9,x5〉;〈x9,x6〉;〈x9,xE〉
- ;〈xA,x7〉;〈xA,xC〉;〈xA,xF〉
- ].
-
-nlemma ok_byte_table_HC05 : forallc ? (λb.
- (test_not_impl_byte b HC05_not_impl_byte ⊙ eqc ? (get_byte_count HC05 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC05) 〈〈x0,x0〉:〈x0,x1〉〉) ⊗
- (⊖ (test_not_impl_byte b HC05_not_impl_byte) ⊙ eqc ? (get_byte_count HC05 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC05) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* HC05: pseudocodici non implementati come da manuale *)
-ndefinition HC05_not_impl_pseudo ≝
- [ AIS ; AIX ; BGE ; BGND ; BGT ; BLE ; BLT ; CBEQA ; CBEQX ; CPHX ; DAA
- ; DBNZ ; DIV ; LDHX ; MOV ; NSA ; PSHA ; PSHH ; PSHX ; PULA ; PULH ; PULX
- ; SHA ; SLA ; STHX ; TAP ; TPA ; TSX ; TXS ].
-
-nlemma ok_pseudo_table_HC05 : forallc ? (λo.
- (test_not_impl_pseudo HC05 o HC05_not_impl_pseudo ⊙ lec ? 〈〈x0,x0〉:〈x0,x1〉〉 (get_pseudo_count HC05 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC05)) ⊗
- (⊖ (test_not_impl_pseudo HC05 o HC05_not_impl_pseudo) ⊙ eqc ? (get_pseudo_count HC05 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC05) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* HC05: modalita' non implementate come da manuale *)
-ndefinition HC05_not_impl_mode ≝
- [ MODE_INHH ; MODE_SP1 ; MODE_SP2 ; MODE_DIR1_to_DIR1
- ; MODE_IMM1_to_DIR1 ; MODE_IX0p_to_DIR1 ; MODE_DIR1_to_IX0p
- ; MODE_INHA_and_IMM1 ; MODE_INHX_and_IMM1 ; MODE_IMM1_and_IMM1
- ; MODE_DIR1_and_IMM1 ; MODE_IX0_and_IMM1 ; MODE_IX0p_and_IMM1
- ; MODE_IX1_and_IMM1 ; MODE_IX1p_and_IMM1 ; MODE_SP1_and_IMM1
- ; MODE_TNY x0 ; MODE_TNY x1 ; MODE_TNY x2 ; MODE_TNY x3
- ; MODE_TNY x4 ; MODE_TNY x5 ; MODE_TNY x6 ; MODE_TNY x7
- ; MODE_TNY x8 ; MODE_TNY x9 ; MODE_TNY xA ; MODE_TNY xB
- ; MODE_TNY xC ; MODE_TNY xD ; MODE_TNY xE ; MODE_TNY xF
- ; MODE_SRT t00 ; MODE_SRT t01 ; MODE_SRT t02 ; MODE_SRT t03
- ; MODE_SRT t04 ; MODE_SRT t05 ; MODE_SRT t06 ; MODE_SRT t07
- ; MODE_SRT t08 ; MODE_SRT t09 ; MODE_SRT t0A ; MODE_SRT t0B
- ; MODE_SRT t0C ; MODE_SRT t0D ; MODE_SRT t0E ; MODE_SRT t0F
- ; MODE_SRT t10 ; MODE_SRT t11 ; MODE_SRT t12 ; MODE_SRT t13
- ; MODE_SRT t14 ; MODE_SRT t15 ; MODE_SRT t16 ; MODE_SRT t17
- ; MODE_SRT t18 ; MODE_SRT t19 ; MODE_SRT t1A ; MODE_SRT t1B
- ; MODE_SRT t1C ; MODE_SRT t1D ; MODE_SRT t1E ; MODE_SRT t1F ].
-
-nlemma ok_mode_table_HC05 : forallc ? (λi.
- (test_not_impl_mode HC05 i HC05_not_impl_mode ⊙ lec ? 〈〈x0,x0〉:〈x0,x1〉〉 (get_mode_count HC05 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC05)) ⊗
- (⊖ (test_not_impl_mode HC05 i HC05_not_impl_mode) ⊙ eqc ? (get_mode_count HC05 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC05) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-nlemma ok_PsIm_table_HC05 :
- forallc ? (λi.
- forallc ? (λps.
- lec ? (get_PsIm_count HC05 ps i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC05) 〈〈x0,x0〉:〈x0,x1〉〉)) = true.
- napply refl_eq.
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/Freescale_pseudo.ma".
-include "emulator/opcodes/Freescale_instr_mode.ma".
-include "emulator/opcodes/byte_or_word.ma".
-include "common/list.ma".
-
-(* ***************** *)
-(* TABELLA DELL'HC08 *)
-(* ***************** *)
-
-(* definizione come concatenazione finale di liste per velocizzare il parsing *)
-(* ogni riga e' [pseudo] [modalita' indirizzamento] [opcode esadecimale] [#cicli esecuzione] *)
-
-ndefinition opcode_table_HC08_1 ≝
-[
- quadruple … ADC MODE_IMM1 (Byte 〈xA,x9〉) nat2
-; quadruple … ADC MODE_DIR1 (Byte 〈xB,x9〉) nat3
-; quadruple … ADC MODE_DIR2 (Byte 〈xC,x9〉) nat4
-; quadruple … ADC MODE_IX2 (Byte 〈xD,x9〉) nat4
-; quadruple … ADC MODE_IX1 (Byte 〈xE,x9〉) nat3
-; quadruple … ADC MODE_IX0 (Byte 〈xF,x9〉) nat2
-; quadruple … ADC MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x9〉〉) nat5
-; quadruple … ADC MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x9〉〉) nat4
-].
-
-ndefinition opcode_table_HC08_2 ≝
-[
- quadruple … ADD MODE_IMM1 (Byte 〈xA,xB〉) nat2
-; quadruple … ADD MODE_DIR1 (Byte 〈xB,xB〉) nat3
-; quadruple … ADD MODE_DIR2 (Byte 〈xC,xB〉) nat4
-; quadruple … ADD MODE_IX2 (Byte 〈xD,xB〉) nat4
-; quadruple … ADD MODE_IX1 (Byte 〈xE,xB〉) nat3
-; quadruple … ADD MODE_IX0 (Byte 〈xF,xB〉) nat2
-; quadruple … ADD MODE_SP2 (Word 〈〈x9,xE〉:〈xD,xB〉〉) nat5
-; quadruple … ADD MODE_SP1 (Word 〈〈x9,xE〉:〈xE,xB〉〉) nat4
-].
-
-ndefinition opcode_table_HC08_3 ≝
-[
- quadruple … AND MODE_IMM1 (Byte 〈xA,x4〉) nat2
-; quadruple … AND MODE_DIR1 (Byte 〈xB,x4〉) nat3
-; quadruple … AND MODE_DIR2 (Byte 〈xC,x4〉) nat4
-; quadruple … AND MODE_IX2 (Byte 〈xD,x4〉) nat4
-; quadruple … AND MODE_IX1 (Byte 〈xE,x4〉) nat3
-; quadruple … AND MODE_IX0 (Byte 〈xF,x4〉) nat2
-; quadruple … AND MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x4〉〉) nat5
-; quadruple … AND MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x4〉〉) nat4
-].
-
-ndefinition opcode_table_HC08_4 ≝
-[
- quadruple … ASL MODE_DIR1 (Byte 〈x3,x8〉) nat4
-; quadruple … ASL MODE_INHA (Byte 〈x4,x8〉) nat1
-; quadruple … ASL MODE_INHX (Byte 〈x5,x8〉) nat1
-; quadruple … ASL MODE_IX1 (Byte 〈x6,x8〉) nat4
-; quadruple … ASL MODE_IX0 (Byte 〈x7,x8〉) nat3
-; quadruple … ASL MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x8〉〉) nat5
-].
-
-ndefinition opcode_table_HC08_5 ≝
-[
- quadruple … ASR MODE_DIR1 (Byte 〈x3,x7〉) nat4
-; quadruple … ASR MODE_INHA (Byte 〈x4,x7〉) nat1
-; quadruple … ASR MODE_INHX (Byte 〈x5,x7〉) nat1
-; quadruple … ASR MODE_IX1 (Byte 〈x6,x7〉) nat4
-; quadruple … ASR MODE_IX0 (Byte 〈x7,x7〉) nat3
-; quadruple … ASR MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x7〉〉) nat5
-].
-
-ndefinition opcode_table_HC08_6 ≝
-[
- quadruple … BRA MODE_IMM1 (Byte 〈x2,x0〉) nat3
-; quadruple … BRN MODE_IMM1 (Byte 〈x2,x1〉) nat3
-; quadruple … BHI MODE_IMM1 (Byte 〈x2,x2〉) nat3
-; quadruple … BLS MODE_IMM1 (Byte 〈x2,x3〉) nat3
-; quadruple … BCC MODE_IMM1 (Byte 〈x2,x4〉) nat3
-; quadruple … BCS MODE_IMM1 (Byte 〈x2,x5〉) nat3
-; quadruple … BNE MODE_IMM1 (Byte 〈x2,x6〉) nat3
-; quadruple … BEQ MODE_IMM1 (Byte 〈x2,x7〉) nat3
-; quadruple … BHCC MODE_IMM1 (Byte 〈x2,x8〉) nat3
-; quadruple … BHCS MODE_IMM1 (Byte 〈x2,x9〉) nat3
-; quadruple … BPL MODE_IMM1 (Byte 〈x2,xA〉) nat3
-; quadruple … BMI MODE_IMM1 (Byte 〈x2,xB〉) nat3
-; quadruple … BMC MODE_IMM1 (Byte 〈x2,xC〉) nat3
-; quadruple … BMS MODE_IMM1 (Byte 〈x2,xD〉) nat3
-; quadruple … BIL MODE_IMM1 (Byte 〈x2,xE〉) nat3
-; quadruple … BIH MODE_IMM1 (Byte 〈x2,xF〉) nat3
-; quadruple … BGE MODE_IMM1 (Byte 〈x9,x0〉) nat3
-; quadruple … BLT MODE_IMM1 (Byte 〈x9,x1〉) nat3
-; quadruple … BGT MODE_IMM1 (Byte 〈x9,x2〉) nat3
-; quadruple … BLE MODE_IMM1 (Byte 〈x9,x3〉) nat3
-].
-
-ndefinition opcode_table_HC08_7 ≝
-[
- quadruple … BSETn (MODE_DIRn o0) (Byte 〈x1,x0〉) nat4
-; quadruple … BCLRn (MODE_DIRn o0) (Byte 〈x1,x1〉) nat4
-; quadruple … BSETn (MODE_DIRn o1) (Byte 〈x1,x2〉) nat4
-; quadruple … BCLRn (MODE_DIRn o1) (Byte 〈x1,x3〉) nat4
-; quadruple … BSETn (MODE_DIRn o2) (Byte 〈x1,x4〉) nat4
-; quadruple … BCLRn (MODE_DIRn o2) (Byte 〈x1,x5〉) nat4
-; quadruple … BSETn (MODE_DIRn o3) (Byte 〈x1,x6〉) nat4
-; quadruple … BCLRn (MODE_DIRn o3) (Byte 〈x1,x7〉) nat4
-; quadruple … BSETn (MODE_DIRn o4) (Byte 〈x1,x8〉) nat4
-; quadruple … BCLRn (MODE_DIRn o4) (Byte 〈x1,x9〉) nat4
-; quadruple … BSETn (MODE_DIRn o5) (Byte 〈x1,xA〉) nat4
-; quadruple … BCLRn (MODE_DIRn o5) (Byte 〈x1,xB〉) nat4
-; quadruple … BSETn (MODE_DIRn o6) (Byte 〈x1,xC〉) nat4
-; quadruple … BCLRn (MODE_DIRn o6) (Byte 〈x1,xD〉) nat4
-; quadruple … BSETn (MODE_DIRn o7) (Byte 〈x1,xE〉) nat4
-; quadruple … BCLRn (MODE_DIRn o7) (Byte 〈x1,xF〉) nat4
-].
-
-ndefinition opcode_table_HC08_8 ≝
-[
- quadruple … BRSETn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x0〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x1〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x2〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x3〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x4〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x5〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x6〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x7〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x8〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x9〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xA〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xB〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xC〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xD〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xE〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xF〉) nat5
-].
-
-ndefinition opcode_table_HC08_9 ≝
-[
- quadruple … BIT MODE_IMM1 (Byte 〈xA,x5〉) nat2
-; quadruple … BIT MODE_DIR1 (Byte 〈xB,x5〉) nat3
-; quadruple … BIT MODE_DIR2 (Byte 〈xC,x5〉) nat4
-; quadruple … BIT MODE_IX2 (Byte 〈xD,x5〉) nat4
-; quadruple … BIT MODE_IX1 (Byte 〈xE,x5〉) nat3
-; quadruple … BIT MODE_IX0 (Byte 〈xF,x5〉) nat2
-; quadruple … BIT MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x5〉〉) nat5
-; quadruple … BIT MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x5〉〉) nat4
-].
-
-ndefinition opcode_table_HC08_10 ≝
-[
- quadruple … MUL MODE_INH (Byte 〈x4,x2〉) nat5
-; quadruple … DIV MODE_INH (Byte 〈x5,x2〉) nat7
-; quadruple … NSA MODE_INH (Byte 〈x6,x2〉) nat3
-; quadruple … DAA MODE_INH (Byte 〈x7,x2〉) nat2
-; quadruple … RTI MODE_INH (Byte 〈x8,x0〉) nat7
-; quadruple … RTS MODE_INH (Byte 〈x8,x1〉) nat4
-; quadruple … SWI MODE_INH (Byte 〈x8,x3〉) nat9
-; quadruple … TAP MODE_INH (Byte 〈x8,x4〉) nat2
-; quadruple … TPA MODE_INH (Byte 〈x8,x5〉) nat1
-; quadruple … PULA MODE_INH (Byte 〈x8,x6〉) nat2
-; quadruple … PSHA MODE_INH (Byte 〈x8,x7〉) nat2
-; quadruple … PULX MODE_INH (Byte 〈x8,x8〉) nat2
-; quadruple … PSHX MODE_INH (Byte 〈x8,x9〉) nat2
-; quadruple … PULH MODE_INH (Byte 〈x8,xA〉) nat2
-; quadruple … PSHH MODE_INH (Byte 〈x8,xB〉) nat2
-; quadruple … STOP MODE_INH (Byte 〈x8,xE〉) nat1
-; quadruple … WAIT MODE_INH (Byte 〈x8,xF〉) nat1
-; quadruple … TXS MODE_INH (Byte 〈x9,x4〉) nat2
-; quadruple … TSX MODE_INH (Byte 〈x9,x5〉) nat2
-; quadruple … TAX MODE_INH (Byte 〈x9,x7〉) nat1
-; quadruple … CLC MODE_INH (Byte 〈x9,x8〉) nat1
-; quadruple … SEC MODE_INH (Byte 〈x9,x9〉) nat1
-; quadruple … CLI MODE_INH (Byte 〈x9,xA〉) nat2
-; quadruple … SEI MODE_INH (Byte 〈x9,xB〉) nat2
-; quadruple … RSP MODE_INH (Byte 〈x9,xC〉) nat1
-; quadruple … NOP MODE_INH (Byte 〈x9,xD〉) nat1
-; quadruple … TXA MODE_INH (Byte 〈x9,xF〉) nat1
-; quadruple … AIS MODE_IMM1 (Byte 〈xA,x7〉) nat2
-; quadruple … AIX MODE_IMM1 (Byte 〈xA,xF〉) nat2
-].
-
-ndefinition opcode_table_HC08_11 ≝
-[
- quadruple … CBEQA MODE_DIR1_and_IMM1 (Byte 〈x3,x1〉) nat5
-; quadruple … CBEQA MODE_IMM1_and_IMM1 (Byte 〈x4,x1〉) nat4
-; quadruple … CBEQX MODE_IMM1_and_IMM1 (Byte 〈x5,x1〉) nat4
-; quadruple … CBEQA MODE_IX1p_and_IMM1 (Byte 〈x6,x1〉) nat5
-; quadruple … CBEQA MODE_IX0p_and_IMM1 (Byte 〈x7,x1〉) nat4
-; quadruple … CBEQA MODE_SP1_and_IMM1 (Word 〈〈x9,xE〉:〈x6,x1〉〉) nat6
-].
-
-ndefinition opcode_table_HC08_12 ≝
-[
- quadruple … CLR MODE_DIR1 (Byte 〈x3,xF〉) nat3
-; quadruple … CLR MODE_INHA (Byte 〈x4,xF〉) nat1
-; quadruple … CLR MODE_INHX (Byte 〈x5,xF〉) nat1
-; quadruple … CLR MODE_IX1 (Byte 〈x6,xF〉) nat3
-; quadruple … CLR MODE_IX0 (Byte 〈x7,xF〉) nat2
-; quadruple … CLR MODE_INHH (Byte 〈x8,xC〉) nat1
-; quadruple … CLR MODE_SP1 (Word 〈〈x9,xE〉:〈x6,xF〉〉) nat4
-].
-
-ndefinition opcode_table_HC08_13 ≝
-[
- quadruple … CMP MODE_IMM1 (Byte 〈xA,x1〉) nat2
-; quadruple … CMP MODE_DIR1 (Byte 〈xB,x1〉) nat3
-; quadruple … CMP MODE_DIR2 (Byte 〈xC,x1〉) nat4
-; quadruple … CMP MODE_IX2 (Byte 〈xD,x1〉) nat4
-; quadruple … CMP MODE_IX1 (Byte 〈xE,x1〉) nat3
-; quadruple … CMP MODE_IX0 (Byte 〈xF,x1〉) nat2
-; quadruple … CMP MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x1〉〉) nat5
-; quadruple … CMP MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x1〉〉) nat4
-].
-
-ndefinition opcode_table_HC08_14 ≝
-[
- quadruple … COM MODE_DIR1 (Byte 〈x3,x3〉) nat4
-; quadruple … COM MODE_INHA (Byte 〈x4,x3〉) nat1
-; quadruple … COM MODE_INHX (Byte 〈x5,x3〉) nat1
-; quadruple … COM MODE_IX1 (Byte 〈x6,x3〉) nat4
-; quadruple … COM MODE_IX0 (Byte 〈x7,x3〉) nat3
-; quadruple … COM MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x3〉〉) nat5
-].
-
-ndefinition opcode_table_HC08_15 ≝
-[
- quadruple … STHX MODE_DIR1 (Byte 〈x3,x5〉) nat4
-; quadruple … LDHX MODE_IMM2 (Byte 〈x4,x5〉) nat3
-; quadruple … LDHX MODE_DIR1 (Byte 〈x5,x5〉) nat4
-; quadruple … CPHX MODE_IMM2 (Byte 〈x6,x5〉) nat3
-; quadruple … CPHX MODE_DIR1 (Byte 〈x7,x5〉) nat4
-].
-
-ndefinition opcode_table_HC08_16 ≝
-[
- quadruple … CPX MODE_IMM1 (Byte 〈xA,x3〉) nat2
-; quadruple … CPX MODE_DIR1 (Byte 〈xB,x3〉) nat3
-; quadruple … CPX MODE_DIR2 (Byte 〈xC,x3〉) nat4
-; quadruple … CPX MODE_IX2 (Byte 〈xD,x3〉) nat4
-; quadruple … CPX MODE_IX1 (Byte 〈xE,x3〉) nat3
-; quadruple … CPX MODE_IX0 (Byte 〈xF,x3〉) nat2
-; quadruple … CPX MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x3〉〉) nat5
-; quadruple … CPX MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x3〉〉) nat4
-].
-
-ndefinition opcode_table_HC08_17 ≝
-[
- quadruple … DBNZ MODE_DIR1_and_IMM1 (Byte 〈x3,xB〉) nat5
-; quadruple … DBNZ MODE_INHA_and_IMM1 (Byte 〈x4,xB〉) nat3
-; quadruple … DBNZ MODE_INHX_and_IMM1 (Byte 〈x5,xB〉) nat3
-; quadruple … DBNZ MODE_IX1_and_IMM1 (Byte 〈x6,xB〉) nat5
-; quadruple … DBNZ MODE_IX0_and_IMM1 (Byte 〈x7,xB〉) nat4
-; quadruple … DBNZ MODE_SP1_and_IMM1 (Word 〈〈x9,xE〉:〈x6,xB〉〉) nat6
-].
-
-ndefinition opcode_table_HC08_18 ≝
-[
- quadruple … DEC MODE_DIR1 (Byte 〈x3,xA〉) nat4
-; quadruple … DEC MODE_INHA (Byte 〈x4,xA〉) nat1
-; quadruple … DEC MODE_INHX (Byte 〈x5,xA〉) nat1
-; quadruple … DEC MODE_IX1 (Byte 〈x6,xA〉) nat4
-; quadruple … DEC MODE_IX0 (Byte 〈x7,xA〉) nat3
-; quadruple … DEC MODE_SP1 (Word 〈〈x9,xE〉:〈x6,xA〉〉) nat5
-].
-
-ndefinition opcode_table_HC08_19 ≝
-[
- quadruple … EOR MODE_IMM1 (Byte 〈xA,x8〉) nat2
-; quadruple … EOR MODE_DIR1 (Byte 〈xB,x8〉) nat3
-; quadruple … EOR MODE_DIR2 (Byte 〈xC,x8〉) nat4
-; quadruple … EOR MODE_IX2 (Byte 〈xD,x8〉) nat4
-; quadruple … EOR MODE_IX1 (Byte 〈xE,x8〉) nat3
-; quadruple … EOR MODE_IX0 (Byte 〈xF,x8〉) nat2
-; quadruple … EOR MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x8〉〉) nat5
-; quadruple … EOR MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x8〉〉) nat4
-].
-
-ndefinition opcode_table_HC08_20 ≝
-[
- quadruple … INC MODE_DIR1 (Byte 〈x3,xC〉) nat4
-; quadruple … INC MODE_INHA (Byte 〈x4,xC〉) nat1
-; quadruple … INC MODE_INHX (Byte 〈x5,xC〉) nat1
-; quadruple … INC MODE_IX1 (Byte 〈x6,xC〉) nat4
-; quadruple … INC MODE_IX0 (Byte 〈x7,xC〉) nat3
-; quadruple … INC MODE_SP1 (Word 〈〈x9,xE〉:〈x6,xC〉〉) nat5
-].
-
-ndefinition opcode_table_HC08_21 ≝
-[
- quadruple … JMP MODE_IMM1EXT (Byte 〈xB,xC〉) nat2
-; quadruple … JMP MODE_IMM2 (Byte 〈xC,xC〉) nat3
-; quadruple … JMP MODE_INHX2ADD (Byte 〈xD,xC〉) nat4
-; quadruple … JMP MODE_INHX1ADD (Byte 〈xE,xC〉) nat3
-; quadruple … JMP MODE_INHX0ADD (Byte 〈xF,xC〉) nat3
-].
-
-ndefinition opcode_table_HC08_22 ≝
-[
- quadruple … BSR MODE_IMM1 (Byte 〈xA,xD〉) nat4
-; quadruple … JSR MODE_IMM1EXT (Byte 〈xB,xD〉) nat4
-; quadruple … JSR MODE_IMM2 (Byte 〈xC,xD〉) nat5
-; quadruple … JSR MODE_INHX2ADD (Byte 〈xD,xD〉) nat6
-; quadruple … JSR MODE_INHX1ADD (Byte 〈xE,xD〉) nat5
-; quadruple … JSR MODE_INHX0ADD (Byte 〈xF,xD〉) nat4
-].
-
-ndefinition opcode_table_HC08_23 ≝
-[
- quadruple … LDA MODE_IMM1 (Byte 〈xA,x6〉) nat2
-; quadruple … LDA MODE_DIR1 (Byte 〈xB,x6〉) nat3
-; quadruple … LDA MODE_DIR2 (Byte 〈xC,x6〉) nat4
-; quadruple … LDA MODE_IX2 (Byte 〈xD,x6〉) nat4
-; quadruple … LDA MODE_IX1 (Byte 〈xE,x6〉) nat3
-; quadruple … LDA MODE_IX0 (Byte 〈xF,x6〉) nat2
-; quadruple … LDA MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x6〉〉) nat5
-; quadruple … LDA MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x6〉〉) nat4
-].
-
-ndefinition opcode_table_HC08_24 ≝
-[
- quadruple … LDX MODE_IMM1 (Byte 〈xA,xE〉) nat2
-; quadruple … LDX MODE_DIR1 (Byte 〈xB,xE〉) nat3
-; quadruple … LDX MODE_DIR2 (Byte 〈xC,xE〉) nat4
-; quadruple … LDX MODE_IX2 (Byte 〈xD,xE〉) nat4
-; quadruple … LDX MODE_IX1 (Byte 〈xE,xE〉) nat3
-; quadruple … LDX MODE_IX0 (Byte 〈xF,xE〉) nat2
-; quadruple … LDX MODE_SP2 (Word 〈〈x9,xE〉:〈xD,xE〉〉) nat5
-; quadruple … LDX MODE_SP1 (Word 〈〈x9,xE〉:〈xE,xE〉〉) nat4
-].
-
-ndefinition opcode_table_HC08_25 ≝
-[
- quadruple … LSR MODE_DIR1 (Byte 〈x3,x4〉) nat4
-; quadruple … LSR MODE_INHA (Byte 〈x4,x4〉) nat1
-; quadruple … LSR MODE_INHX (Byte 〈x5,x4〉) nat1
-; quadruple … LSR MODE_IX1 (Byte 〈x6,x4〉) nat4
-; quadruple … LSR MODE_IX0 (Byte 〈x7,x4〉) nat3
-; quadruple … LSR MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x4〉〉) nat5
-].
-
-ndefinition opcode_table_HC08_26 ≝
-[
- quadruple … MOV MODE_DIR1_to_DIR1 (Byte 〈x4,xE〉) nat5
-; quadruple … MOV MODE_DIR1_to_IX0p (Byte 〈x5,xE〉) nat4
-; quadruple … MOV MODE_IMM1_to_DIR1 (Byte 〈x6,xE〉) nat4
-; quadruple … MOV MODE_IX0p_to_DIR1 (Byte 〈x7,xE〉) nat4
-].
-
-ndefinition opcode_table_HC08_27 ≝
-[
- quadruple … NEG MODE_DIR1 (Byte 〈x3,x0〉) nat4
-; quadruple … NEG MODE_INHA (Byte 〈x4,x0〉) nat1
-; quadruple … NEG MODE_INHX (Byte 〈x5,x0〉) nat1
-; quadruple … NEG MODE_IX1 (Byte 〈x6,x0〉) nat4
-; quadruple … NEG MODE_IX0 (Byte 〈x7,x0〉) nat3
-; quadruple … NEG MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x0〉〉) nat5
-].
-
-ndefinition opcode_table_HC08_28 ≝
-[
- quadruple … ORA MODE_IMM1 (Byte 〈xA,xA〉) nat2
-; quadruple … ORA MODE_DIR1 (Byte 〈xB,xA〉) nat3
-; quadruple … ORA MODE_DIR2 (Byte 〈xC,xA〉) nat4
-; quadruple … ORA MODE_IX2 (Byte 〈xD,xA〉) nat4
-; quadruple … ORA MODE_IX1 (Byte 〈xE,xA〉) nat3
-; quadruple … ORA MODE_IX0 (Byte 〈xF,xA〉) nat2
-; quadruple … ORA MODE_SP2 (Word 〈〈x9,xE〉:〈xD,xA〉〉) nat5
-; quadruple … ORA MODE_SP1 (Word 〈〈x9,xE〉:〈xE,xA〉〉) nat4
-].
-
-ndefinition opcode_table_HC08_29 ≝
-[
- quadruple … ROL MODE_DIR1 (Byte 〈x3,x9〉) nat4
-; quadruple … ROL MODE_INHA (Byte 〈x4,x9〉) nat1
-; quadruple … ROL MODE_INHX (Byte 〈x5,x9〉) nat1
-; quadruple … ROL MODE_IX1 (Byte 〈x6,x9〉) nat4
-; quadruple … ROL MODE_IX0 (Byte 〈x7,x9〉) nat3
-; quadruple … ROL MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x9〉〉) nat5
-].
-
-ndefinition opcode_table_HC08_30 ≝
-[
- quadruple … ROR MODE_DIR1 (Byte 〈x3,x6〉) nat4
-; quadruple … ROR MODE_INHA (Byte 〈x4,x6〉) nat1
-; quadruple … ROR MODE_INHX (Byte 〈x5,x6〉) nat1
-; quadruple … ROR MODE_IX1 (Byte 〈x6,x6〉) nat4
-; quadruple … ROR MODE_IX0 (Byte 〈x7,x6〉) nat3
-; quadruple … ROR MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x6〉〉) nat5
-].
-
-ndefinition opcode_table_HC08_31 ≝
-[
- quadruple … SBC MODE_IMM1 (Byte 〈xA,x2〉) nat2
-; quadruple … SBC MODE_DIR1 (Byte 〈xB,x2〉) nat3
-; quadruple … SBC MODE_DIR2 (Byte 〈xC,x2〉) nat4
-; quadruple … SBC MODE_IX2 (Byte 〈xD,x2〉) nat4
-; quadruple … SBC MODE_IX1 (Byte 〈xE,x2〉) nat3
-; quadruple … SBC MODE_IX0 (Byte 〈xF,x2〉) nat2
-; quadruple … SBC MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x2〉〉) nat5
-; quadruple … SBC MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x2〉〉) nat4
-].
-
-ndefinition opcode_table_HC08_32 ≝
-[
- quadruple … STA MODE_DIR1 (Byte 〈xB,x7〉) nat3
-; quadruple … STA MODE_DIR2 (Byte 〈xC,x7〉) nat4
-; quadruple … STA MODE_IX2 (Byte 〈xD,x7〉) nat4
-; quadruple … STA MODE_IX1 (Byte 〈xE,x7〉) nat3
-; quadruple … STA MODE_IX0 (Byte 〈xF,x7〉) nat2
-; quadruple … STA MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x7〉〉) nat5
-; quadruple … STA MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x7〉〉) nat4
-].
-
-ndefinition opcode_table_HC08_33 ≝
-[
- quadruple … STX MODE_DIR1 (Byte 〈xB,xF〉) nat3
-; quadruple … STX MODE_DIR2 (Byte 〈xC,xF〉) nat4
-; quadruple … STX MODE_IX2 (Byte 〈xD,xF〉) nat4
-; quadruple … STX MODE_IX1 (Byte 〈xE,xF〉) nat3
-; quadruple … STX MODE_IX0 (Byte 〈xF,xF〉) nat2
-; quadruple … STX MODE_SP2 (Word 〈〈x9,xE〉:〈xD,xF〉〉) nat5
-; quadruple … STX MODE_SP1 (Word 〈〈x9,xE〉:〈xE,xF〉〉) nat4
-].
-
-ndefinition opcode_table_HC08_34 ≝
-[
- quadruple … SUB MODE_IMM1 (Byte 〈xA,x0〉) nat2
-; quadruple … SUB MODE_DIR1 (Byte 〈xB,x0〉) nat3
-; quadruple … SUB MODE_DIR2 (Byte 〈xC,x0〉) nat4
-; quadruple … SUB MODE_IX2 (Byte 〈xD,x0〉) nat4
-; quadruple … SUB MODE_IX1 (Byte 〈xE,x0〉) nat3
-; quadruple … SUB MODE_IX0 (Byte 〈xF,x0〉) nat2
-; quadruple … SUB MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x0〉〉) nat5
-; quadruple … SUB MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x0〉〉) nat4
-].
-
-ndefinition opcode_table_HC08_35 ≝
-[
- quadruple … TST MODE_DIR1 (Byte 〈x3,xD〉) nat3
-; quadruple … TST MODE_INHA (Byte 〈x4,xD〉) nat1
-; quadruple … TST MODE_INHX (Byte 〈x5,xD〉) nat1
-; quadruple … TST MODE_IX1 (Byte 〈x6,xD〉) nat3
-; quadruple … TST MODE_IX0 (Byte 〈x7,xD〉) nat2
-; quadruple … TST MODE_SP1 (Word 〈〈x9,xE〉:〈x6,xD〉〉) nat4
-].
-
-ndefinition opcode_table_HC08 ≝
-opcode_table_HC08_1 @ opcode_table_HC08_2 @ opcode_table_HC08_3 @ opcode_table_HC08_4 @
-opcode_table_HC08_5 @ opcode_table_HC08_6 @ opcode_table_HC08_7 @ opcode_table_HC08_8 @
-opcode_table_HC08_9 @ opcode_table_HC08_10 @ opcode_table_HC08_11 @ opcode_table_HC08_12 @
-opcode_table_HC08_13 @ opcode_table_HC08_14 @ opcode_table_HC08_15 @ opcode_table_HC08_16 @
-opcode_table_HC08_17 @ opcode_table_HC08_18 @ opcode_table_HC08_19 @ opcode_table_HC08_20 @
-opcode_table_HC08_21 @ opcode_table_HC08_22 @ opcode_table_HC08_23 @ opcode_table_HC08_24 @
-opcode_table_HC08_25 @ opcode_table_HC08_26 @ opcode_table_HC08_27 @ opcode_table_HC08_28 @
-opcode_table_HC08_29 @ opcode_table_HC08_30 @ opcode_table_HC08_31 @ opcode_table_HC08_32 @
-opcode_table_HC08_33 @ opcode_table_HC08_34 @ opcode_table_HC08_35.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/pseudo.ma".
-include "emulator/opcodes/HC08_table.ma".
-
-(* ***************** *)
-(* TABELLA DELL'HC08 *)
-(* ***************** *)
-
-(* HC08: opcode non implementati come da manuale (byte) *)
-ndefinition HC08_not_impl_byte ≝
- [〈x3,x2〉;〈x3,xE〉
- ;〈x8,x2〉;〈x8,xD〉
- ;〈x9,x6〉;〈x9,xE〉
- ;〈xA,xC〉
- ].
-
-nlemma ok_byte_table_HC08 : forallc ? (λb.
- (test_not_impl_byte b HC08_not_impl_byte ⊙ eqc ? (get_byte_count HC08 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08) 〈〈x0,x0〉:〈x0,x1〉〉) ⊗
- (⊖ (test_not_impl_byte b HC08_not_impl_byte) ⊙ eqc ? (get_byte_count HC08 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* HC08: opcode non implementati come da manuale (0x9E+byte) *)
-ndefinition HC08_not_impl_word ≝
- [〈x0,x0〉;〈x0,x1〉;〈x0,x2〉;〈x0,x3〉;〈x0,x4〉;〈x0,x5〉;〈x0,x6〉;〈x0,x7〉
- ;〈x0,x8〉;〈x0,x9〉;〈x0,xA〉;〈x0,xB〉;〈x0,xC〉;〈x0,xD〉;〈x0,xE〉;〈x0,xF〉
- ;〈x1,x0〉;〈x1,x1〉;〈x1,x2〉;〈x1,x3〉;〈x1,x4〉;〈x1,x5〉;〈x1,x6〉;〈x1,x7〉
- ;〈x1,x8〉;〈x1,x9〉;〈x1,xA〉;〈x1,xB〉;〈x1,xC〉;〈x1,xD〉;〈x1,xE〉;〈x1,xF〉
- ;〈x2,x0〉;〈x2,x1〉;〈x2,x2〉;〈x2,x3〉;〈x2,x4〉;〈x2,x5〉;〈x2,x6〉;〈x2,x7〉
- ;〈x2,x8〉;〈x2,x9〉;〈x2,xA〉;〈x2,xB〉;〈x2,xC〉;〈x2,xD〉;〈x2,xE〉;〈x2,xF〉
- ;〈x3,x0〉;〈x3,x1〉;〈x3,x2〉;〈x3,x3〉;〈x3,x4〉;〈x3,x5〉;〈x3,x6〉;〈x3,x7〉
- ;〈x3,x8〉;〈x3,x9〉;〈x3,xA〉;〈x3,xB〉;〈x3,xC〉;〈x3,xD〉;〈x3,xE〉;〈x3,xF〉
- ;〈x4,x0〉;〈x4,x1〉;〈x4,x2〉;〈x4,x3〉;〈x4,x4〉;〈x4,x5〉;〈x4,x6〉;〈x4,x7〉
- ;〈x4,x8〉;〈x4,x9〉;〈x4,xA〉;〈x4,xB〉;〈x4,xC〉;〈x4,xD〉;〈x4,xE〉;〈x4,xF〉
- ;〈x5,x0〉;〈x5,x1〉;〈x5,x2〉;〈x5,x3〉;〈x5,x4〉;〈x5,x5〉;〈x5,x6〉;〈x5,x7〉
- ;〈x5,x8〉;〈x5,x9〉;〈x5,xA〉;〈x5,xB〉;〈x5,xC〉;〈x5,xD〉;〈x5,xE〉;〈x5,xF〉
- ;〈x6,x2〉;〈x6,x5〉;〈x6,xE〉
- ;〈x7,x0〉;〈x7,x1〉;〈x7,x2〉;〈x7,x3〉;〈x7,x4〉;〈x7,x5〉;〈x7,x6〉;〈x7,x7〉
- ;〈x7,x8〉;〈x7,x9〉;〈x7,xA〉;〈x7,xB〉;〈x7,xC〉;〈x7,xD〉;〈x7,xE〉;〈x7,xF〉
- ;〈x8,x0〉;〈x8,x1〉;〈x8,x2〉;〈x8,x3〉;〈x8,x4〉;〈x8,x5〉;〈x8,x6〉;〈x8,x7〉
- ;〈x8,x8〉;〈x8,x9〉;〈x8,xA〉;〈x8,xB〉;〈x8,xC〉;〈x8,xD〉;〈x8,xE〉;〈x8,xF〉
- ;〈x9,x0〉;〈x9,x1〉;〈x9,x2〉;〈x9,x3〉;〈x9,x4〉;〈x9,x5〉;〈x9,x6〉;〈x9,x7〉
- ;〈x9,x8〉;〈x9,x9〉;〈x9,xA〉;〈x9,xB〉;〈x9,xC〉;〈x9,xD〉;〈x9,xE〉;〈x9,xF〉
- ;〈xA,x0〉;〈xA,x1〉;〈xA,x2〉;〈xA,x3〉;〈xA,x4〉;〈xA,x5〉;〈xA,x6〉;〈xA,x7〉
- ;〈xA,x8〉;〈xA,x9〉;〈xA,xA〉;〈xA,xB〉;〈xA,xC〉;〈xA,xD〉;〈xA,xE〉;〈xA,xF〉
- ;〈xB,x0〉;〈xB,x1〉;〈xB,x2〉;〈xB,x3〉;〈xB,x4〉;〈xB,x5〉;〈xB,x6〉;〈xB,x7〉
- ;〈xB,x8〉;〈xB,x9〉;〈xB,xA〉;〈xB,xB〉;〈xB,xC〉;〈xB,xD〉;〈xB,xE〉;〈xB,xF〉
- ;〈xC,x0〉;〈xC,x1〉;〈xC,x2〉;〈xC,x3〉;〈xC,x4〉;〈xC,x5〉;〈xC,x6〉;〈xC,x7〉
- ;〈xC,x8〉;〈xC,x9〉;〈xC,xA〉;〈xC,xB〉;〈xC,xC〉;〈xC,xD〉;〈xC,xE〉;〈xC,xF〉
- ;〈xD,xC〉;〈xD,xD〉
- ;〈xE,xC〉;〈xE,xD〉
- ;〈xF,x0〉;〈xF,x1〉;〈xF,x2〉;〈xF,x3〉;〈xF,x4〉;〈xF,x5〉;〈xF,x6〉;〈xF,x7〉
- ;〈xF,x8〉;〈xF,x9〉;〈xF,xA〉;〈xF,xB〉;〈xF,xC〉;〈xF,xD〉;〈xF,xE〉;〈xF,xF〉
- ].
-
-nlemma ok_word_table_HC08 : forallc ? (λb.
- (test_not_impl_byte b HC08_not_impl_word ⊙ eqc ? (get_word_count HC08 〈〈x9,xE〉:b〉 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08) 〈〈x0,x0〉:〈x0,x1〉〉) ⊗
- (⊖ (test_not_impl_byte b HC08_not_impl_word) ⊙ eqc ? (get_word_count HC08 〈〈x9,xE〉:b〉 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* HC08: pseudocodici non implementati come da manuale *)
-ndefinition HC08_not_impl_pseudo ≝
- [ BGND ; SHA ; SLA ].
-
-nlemma ok_pseudo_table_HC08 : forallc ? (λo.
- (test_not_impl_pseudo HC08 o HC08_not_impl_pseudo ⊙ lec ? 〈〈x0,x0〉:〈x0,x1〉〉 (get_pseudo_count HC08 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08)) ⊗
- (⊖ (test_not_impl_pseudo HC08 o HC08_not_impl_pseudo) ⊙ eqc ? (get_pseudo_count HC08 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* HC08: modalita' non implementate come da manuale *)
-ndefinition HC08_not_impl_mode ≝
- [ MODE_TNY x0 ; MODE_TNY x1 ; MODE_TNY x2 ; MODE_TNY x3
- ; MODE_TNY x4 ; MODE_TNY x5 ; MODE_TNY x6 ; MODE_TNY x7
- ; MODE_TNY x8 ; MODE_TNY x9 ; MODE_TNY xA ; MODE_TNY xB
- ; MODE_TNY xC ; MODE_TNY xD ; MODE_TNY xE ; MODE_TNY xF
- ; MODE_SRT t00 ; MODE_SRT t01 ; MODE_SRT t02 ; MODE_SRT t03
- ; MODE_SRT t04 ; MODE_SRT t05 ; MODE_SRT t06 ; MODE_SRT t07
- ; MODE_SRT t08 ; MODE_SRT t09 ; MODE_SRT t0A ; MODE_SRT t0B
- ; MODE_SRT t0C ; MODE_SRT t0D ; MODE_SRT t0E ; MODE_SRT t0F
- ; MODE_SRT t10 ; MODE_SRT t11 ; MODE_SRT t12 ; MODE_SRT t13
- ; MODE_SRT t14 ; MODE_SRT t15 ; MODE_SRT t16 ; MODE_SRT t17
- ; MODE_SRT t18 ; MODE_SRT t19 ; MODE_SRT t1A ; MODE_SRT t1B
- ; MODE_SRT t1C ; MODE_SRT t1D ; MODE_SRT t1E ; MODE_SRT t1F ].
-
-nlemma ok_mode_table_HC08 : forallc ? (λi.
- (test_not_impl_mode HC08 i HC08_not_impl_mode ⊙ lec ? 〈〈x0,x0〉:〈x0,x1〉〉 (get_mode_count HC08 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08)) ⊗
- (⊖ (test_not_impl_mode HC08 i HC08_not_impl_mode) ⊙ eqc ? (get_mode_count HC08 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-nlemma ok_PsIm_table_HC08 :
- forallc ? (λi.
- forallc ? (λps.
- lec ? (get_PsIm_count HC08 ps i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HC08) 〈〈x0,x0〉:〈x0,x1〉〉)) = true.
- napply refl_eq.
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/Freescale_pseudo.ma".
-include "emulator/opcodes/Freescale_instr_mode.ma".
-include "emulator/opcodes/byte_or_word.ma".
-include "common/list.ma".
-
-(* ****************** *)
-(* TABELLA DELL'HCS08 *)
-(* ****************** *)
-
-(* definizione come concatenazione finale di liste per velocizzare il parsing *)
-(* ogni riga e' [pseudo] [modalita' indirizzamento] [opcode esadecimale] [#cicli esecuzione] *)
-
-ndefinition opcode_table_HCS08_1 ≝
-[
- quadruple … ADC MODE_IMM1 (Byte 〈xA,x9〉) nat2
-; quadruple … ADC MODE_DIR1 (Byte 〈xB,x9〉) nat3
-; quadruple … ADC MODE_DIR2 (Byte 〈xC,x9〉) nat4
-; quadruple … ADC MODE_IX2 (Byte 〈xD,x9〉) nat4
-; quadruple … ADC MODE_IX1 (Byte 〈xE,x9〉) nat3
-; quadruple … ADC MODE_IX0 (Byte 〈xF,x9〉) nat3
-; quadruple … ADC MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x9〉〉) nat5
-; quadruple … ADC MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x9〉〉) nat4
-].
-
-ndefinition opcode_table_HCS08_2 ≝
-[
- quadruple … ADD MODE_IMM1 (Byte 〈xA,xB〉) nat2
-; quadruple … ADD MODE_DIR1 (Byte 〈xB,xB〉) nat3
-; quadruple … ADD MODE_DIR2 (Byte 〈xC,xB〉) nat4
-; quadruple … ADD MODE_IX2 (Byte 〈xD,xB〉) nat4
-; quadruple … ADD MODE_IX1 (Byte 〈xE,xB〉) nat3
-; quadruple … ADD MODE_IX0 (Byte 〈xF,xB〉) nat3
-; quadruple … ADD MODE_SP2 (Word 〈〈x9,xE〉:〈xD,xB〉〉) nat5
-; quadruple … ADD MODE_SP1 (Word 〈〈x9,xE〉:〈xE,xB〉〉) nat4
-].
-
-ndefinition opcode_table_HCS08_3 ≝
-[
- quadruple … AND MODE_IMM1 (Byte 〈xA,x4〉) nat2
-; quadruple … AND MODE_DIR1 (Byte 〈xB,x4〉) nat3
-; quadruple … AND MODE_DIR2 (Byte 〈xC,x4〉) nat4
-; quadruple … AND MODE_IX2 (Byte 〈xD,x4〉) nat4
-; quadruple … AND MODE_IX1 (Byte 〈xE,x4〉) nat3
-; quadruple … AND MODE_IX0 (Byte 〈xF,x4〉) nat3
-; quadruple … AND MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x4〉〉) nat5
-; quadruple … AND MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x4〉〉) nat4
-].
-
-ndefinition opcode_table_HCS08_4 ≝
-[
- quadruple … ASL MODE_DIR1 (Byte 〈x3,x8〉) nat5
-; quadruple … ASL MODE_INHA (Byte 〈x4,x8〉) nat1
-; quadruple … ASL MODE_INHX (Byte 〈x5,x8〉) nat1
-; quadruple … ASL MODE_IX1 (Byte 〈x6,x8〉) nat5
-; quadruple … ASL MODE_IX0 (Byte 〈x7,x8〉) nat4
-; quadruple … ASL MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x8〉〉) nat6
-].
-
-ndefinition opcode_table_HCS08_5 ≝
-[
- quadruple … ASR MODE_DIR1 (Byte 〈x3,x7〉) nat5
-; quadruple … ASR MODE_INHA (Byte 〈x4,x7〉) nat1
-; quadruple … ASR MODE_INHX (Byte 〈x5,x7〉) nat1
-; quadruple … ASR MODE_IX1 (Byte 〈x6,x7〉) nat5
-; quadruple … ASR MODE_IX0 (Byte 〈x7,x7〉) nat4
-; quadruple … ASR MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x7〉〉) nat6
-].
-
-ndefinition opcode_table_HCS08_6 ≝
-[
- quadruple … BRA MODE_IMM1 (Byte 〈x2,x0〉) nat3
-; quadruple … BRN MODE_IMM1 (Byte 〈x2,x1〉) nat3
-; quadruple … BHI MODE_IMM1 (Byte 〈x2,x2〉) nat3
-; quadruple … BLS MODE_IMM1 (Byte 〈x2,x3〉) nat3
-; quadruple … BCC MODE_IMM1 (Byte 〈x2,x4〉) nat3
-; quadruple … BCS MODE_IMM1 (Byte 〈x2,x5〉) nat3
-; quadruple … BNE MODE_IMM1 (Byte 〈x2,x6〉) nat3
-; quadruple … BEQ MODE_IMM1 (Byte 〈x2,x7〉) nat3
-; quadruple … BHCC MODE_IMM1 (Byte 〈x2,x8〉) nat3
-; quadruple … BHCS MODE_IMM1 (Byte 〈x2,x9〉) nat3
-; quadruple … BPL MODE_IMM1 (Byte 〈x2,xA〉) nat3
-; quadruple … BMI MODE_IMM1 (Byte 〈x2,xB〉) nat3
-; quadruple … BMC MODE_IMM1 (Byte 〈x2,xC〉) nat3
-; quadruple … BMS MODE_IMM1 (Byte 〈x2,xD〉) nat3
-; quadruple … BIL MODE_IMM1 (Byte 〈x2,xE〉) nat3
-; quadruple … BIH MODE_IMM1 (Byte 〈x2,xF〉) nat3
-; quadruple … BGE MODE_IMM1 (Byte 〈x9,x0〉) nat3
-; quadruple … BLT MODE_IMM1 (Byte 〈x9,x1〉) nat3
-; quadruple … BGT MODE_IMM1 (Byte 〈x9,x2〉) nat3
-; quadruple … BLE MODE_IMM1 (Byte 〈x9,x3〉) nat3
-].
-
-ndefinition opcode_table_HCS08_7 ≝
-[
- quadruple … BSETn (MODE_DIRn o0) (Byte 〈x1,x0〉) nat5
-; quadruple … BCLRn (MODE_DIRn o0) (Byte 〈x1,x1〉) nat5
-; quadruple … BSETn (MODE_DIRn o1) (Byte 〈x1,x2〉) nat5
-; quadruple … BCLRn (MODE_DIRn o1) (Byte 〈x1,x3〉) nat5
-; quadruple … BSETn (MODE_DIRn o2) (Byte 〈x1,x4〉) nat5
-; quadruple … BCLRn (MODE_DIRn o2) (Byte 〈x1,x5〉) nat5
-; quadruple … BSETn (MODE_DIRn o3) (Byte 〈x1,x6〉) nat5
-; quadruple … BCLRn (MODE_DIRn o3) (Byte 〈x1,x7〉) nat5
-; quadruple … BSETn (MODE_DIRn o4) (Byte 〈x1,x8〉) nat5
-; quadruple … BCLRn (MODE_DIRn o4) (Byte 〈x1,x9〉) nat5
-; quadruple … BSETn (MODE_DIRn o5) (Byte 〈x1,xA〉) nat5
-; quadruple … BCLRn (MODE_DIRn o5) (Byte 〈x1,xB〉) nat5
-; quadruple … BSETn (MODE_DIRn o6) (Byte 〈x1,xC〉) nat5
-; quadruple … BCLRn (MODE_DIRn o6) (Byte 〈x1,xD〉) nat5
-; quadruple … BSETn (MODE_DIRn o7) (Byte 〈x1,xE〉) nat5
-; quadruple … BCLRn (MODE_DIRn o7) (Byte 〈x1,xF〉) nat5
-].
-
-ndefinition opcode_table_HCS08_8 ≝
-[
- quadruple … BRSETn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x0〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x1〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x2〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x3〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x4〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x5〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x6〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x7〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x8〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x9〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xA〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xB〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xC〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xD〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xE〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xF〉) nat5
-].
-
-ndefinition opcode_table_HCS08_9 ≝
-[
- quadruple … BIT MODE_IMM1 (Byte 〈xA,x5〉) nat2
-; quadruple … BIT MODE_DIR1 (Byte 〈xB,x5〉) nat3
-; quadruple … BIT MODE_DIR2 (Byte 〈xC,x5〉) nat4
-; quadruple … BIT MODE_IX2 (Byte 〈xD,x5〉) nat4
-; quadruple … BIT MODE_IX1 (Byte 〈xE,x5〉) nat3
-; quadruple … BIT MODE_IX0 (Byte 〈xF,x5〉) nat3
-; quadruple … BIT MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x5〉〉) nat5
-; quadruple … BIT MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x5〉〉) nat4
-].
-
-ndefinition opcode_table_HCS08_10 ≝
-[
- quadruple … MUL MODE_INH (Byte 〈x4,x2〉) nat5
-; quadruple … DIV MODE_INH (Byte 〈x5,x2〉) nat6
-; quadruple … NSA MODE_INH (Byte 〈x6,x2〉) nat1
-; quadruple … DAA MODE_INH (Byte 〈x7,x2〉) nat1
-; quadruple … RTI MODE_INH (Byte 〈x8,x0〉) nat9
-; quadruple … RTS MODE_INH (Byte 〈x8,x1〉) nat6
-; quadruple … SWI MODE_INH (Byte 〈x8,x3〉) nat11
-; quadruple … BGND MODE_INH (Byte 〈x8,x2〉) nat5
-; quadruple … TAP MODE_INH (Byte 〈x8,x4〉) nat1
-; quadruple … TPA MODE_INH (Byte 〈x8,x5〉) nat1
-; quadruple … PULA MODE_INH (Byte 〈x8,x6〉) nat3
-; quadruple … PSHA MODE_INH (Byte 〈x8,x7〉) nat2
-; quadruple … PULX MODE_INH (Byte 〈x8,x8〉) nat3
-; quadruple … PSHX MODE_INH (Byte 〈x8,x9〉) nat2
-; quadruple … PULH MODE_INH (Byte 〈x8,xA〉) nat3
-; quadruple … PSHH MODE_INH (Byte 〈x8,xB〉) nat2
-; quadruple … STOP MODE_INH (Byte 〈x8,xE〉) nat2
-; quadruple … WAIT MODE_INH (Byte 〈x8,xF〉) nat2
-; quadruple … TXS MODE_INH (Byte 〈x9,x4〉) nat2
-; quadruple … TSX MODE_INH (Byte 〈x9,x5〉) nat2
-; quadruple … TAX MODE_INH (Byte 〈x9,x7〉) nat1
-; quadruple … CLC MODE_INH (Byte 〈x9,x8〉) nat1
-; quadruple … SEC MODE_INH (Byte 〈x9,x9〉) nat1
-; quadruple … CLI MODE_INH (Byte 〈x9,xA〉) nat1
-; quadruple … SEI MODE_INH (Byte 〈x9,xB〉) nat1
-; quadruple … RSP MODE_INH (Byte 〈x9,xC〉) nat1
-; quadruple … NOP MODE_INH (Byte 〈x9,xD〉) nat1
-; quadruple … TXA MODE_INH (Byte 〈x9,xF〉) nat1
-; quadruple … AIS MODE_IMM1 (Byte 〈xA,x7〉) nat2
-; quadruple … AIX MODE_IMM1 (Byte 〈xA,xF〉) nat2
-].
-
-ndefinition opcode_table_HCS08_11 ≝
-[
- quadruple … CBEQA MODE_DIR1_and_IMM1 (Byte 〈x3,x1〉) nat5
-; quadruple … CBEQA MODE_IMM1_and_IMM1 (Byte 〈x4,x1〉) nat4
-; quadruple … CBEQX MODE_IMM1_and_IMM1 (Byte 〈x5,x1〉) nat4
-; quadruple … CBEQA MODE_IX1p_and_IMM1 (Byte 〈x6,x1〉) nat5
-; quadruple … CBEQA MODE_IX0p_and_IMM1 (Byte 〈x7,x1〉) nat5
-; quadruple … CBEQA MODE_SP1_and_IMM1 (Word 〈〈x9,xE〉:〈x6,x1〉〉) nat6
-].
-
-ndefinition opcode_table_HCS08_12 ≝
-[
- quadruple … CLR MODE_DIR1 (Byte 〈x3,xF〉) nat5
-; quadruple … CLR MODE_INHA (Byte 〈x4,xF〉) nat1
-; quadruple … CLR MODE_INHX (Byte 〈x5,xF〉) nat1
-; quadruple … CLR MODE_IX1 (Byte 〈x6,xF〉) nat5
-; quadruple … CLR MODE_IX0 (Byte 〈x7,xF〉) nat4
-; quadruple … CLR MODE_INHH (Byte 〈x8,xC〉) nat1
-; quadruple … CLR MODE_SP1 (Word 〈〈x9,xE〉:〈x6,xF〉〉) nat6
-].
-
-ndefinition opcode_table_HCS08_13 ≝
-[
- quadruple … CMP MODE_IMM1 (Byte 〈xA,x1〉) nat2
-; quadruple … CMP MODE_DIR1 (Byte 〈xB,x1〉) nat3
-; quadruple … CMP MODE_DIR2 (Byte 〈xC,x1〉) nat4
-; quadruple … CMP MODE_IX2 (Byte 〈xD,x1〉) nat4
-; quadruple … CMP MODE_IX1 (Byte 〈xE,x1〉) nat3
-; quadruple … CMP MODE_IX0 (Byte 〈xF,x1〉) nat3
-; quadruple … CMP MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x1〉〉) nat5
-; quadruple … CMP MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x1〉〉) nat4
-].
-
-ndefinition opcode_table_HCS08_14 ≝
-[
- quadruple … COM MODE_DIR1 (Byte 〈x3,x3〉) nat5
-; quadruple … COM MODE_INHA (Byte 〈x4,x3〉) nat1
-; quadruple … COM MODE_INHX (Byte 〈x5,x3〉) nat1
-; quadruple … COM MODE_IX1 (Byte 〈x6,x3〉) nat5
-; quadruple … COM MODE_IX0 (Byte 〈x7,x3〉) nat4
-; quadruple … COM MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x3〉〉) nat6
-].
-
-ndefinition opcode_table_HCS08_15 ≝
-[
- quadruple … CPHX MODE_DIR2 (Byte 〈x3,xE〉) nat6
-; quadruple … CPHX MODE_IMM2 (Byte 〈x6,x5〉) nat3
-; quadruple … CPHX MODE_DIR1 (Byte 〈x7,x5〉) nat5
-; quadruple … CPHX MODE_SP1 (Word 〈〈x9,xE〉:〈xF,x3〉〉) nat6
-
-; quadruple … LDHX MODE_DIR2 (Byte 〈x3,x2〉) nat5
-; quadruple … LDHX MODE_IMM2 (Byte 〈x4,x5〉) nat3
-; quadruple … LDHX MODE_DIR1 (Byte 〈x5,x5〉) nat4
-; quadruple … LDHX MODE_IX0 (Word 〈〈x9,xE〉:〈xA,xE〉〉) nat5
-; quadruple … LDHX MODE_IX2 (Word 〈〈x9,xE〉:〈xB,xE〉〉) nat6
-; quadruple … LDHX MODE_IX1 (Word 〈〈x9,xE〉:〈xC,xE〉〉) nat5
-; quadruple … LDHX MODE_SP1 (Word 〈〈x9,xE〉:〈xF,xE〉〉) nat5
-
-; quadruple … STHX MODE_DIR1 (Byte 〈x3,x5〉) nat4
-; quadruple … STHX MODE_DIR2 (Byte 〈x9,x6〉) nat5
-; quadruple … STHX MODE_SP1 (Word 〈〈x9,xE〉:〈xF,xF〉〉) nat5
-].
-
-ndefinition opcode_table_HCS08_16 ≝
-[
- quadruple … CPX MODE_IMM1 (Byte 〈xA,x3〉) nat2
-; quadruple … CPX MODE_DIR1 (Byte 〈xB,x3〉) nat3
-; quadruple … CPX MODE_DIR2 (Byte 〈xC,x3〉) nat4
-; quadruple … CPX MODE_IX2 (Byte 〈xD,x3〉) nat4
-; quadruple … CPX MODE_IX1 (Byte 〈xE,x3〉) nat3
-; quadruple … CPX MODE_IX0 (Byte 〈xF,x3〉) nat3
-; quadruple … CPX MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x3〉〉) nat5
-; quadruple … CPX MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x3〉〉) nat4
-].
-
-ndefinition opcode_table_HCS08_17 ≝
-[
- quadruple … DBNZ MODE_DIR1_and_IMM1 (Byte 〈x3,xB〉) nat7
-; quadruple … DBNZ MODE_INHA_and_IMM1 (Byte 〈x4,xB〉) nat4
-; quadruple … DBNZ MODE_INHX_and_IMM1 (Byte 〈x5,xB〉) nat4
-; quadruple … DBNZ MODE_IX1_and_IMM1 (Byte 〈x6,xB〉) nat7
-; quadruple … DBNZ MODE_IX0_and_IMM1 (Byte 〈x7,xB〉) nat6
-; quadruple … DBNZ MODE_SP1_and_IMM1 (Word 〈〈x9,xE〉:〈x6,xB〉〉) nat8
-].
-
-ndefinition opcode_table_HCS08_18 ≝
-[
- quadruple … DEC MODE_DIR1 (Byte 〈x3,xA〉) nat5
-; quadruple … DEC MODE_INHA (Byte 〈x4,xA〉) nat1
-; quadruple … DEC MODE_INHX (Byte 〈x5,xA〉) nat1
-; quadruple … DEC MODE_IX1 (Byte 〈x6,xA〉) nat5
-; quadruple … DEC MODE_IX0 (Byte 〈x7,xA〉) nat4
-; quadruple … DEC MODE_SP1 (Word 〈〈x9,xE〉:〈x6,xA〉〉) nat6
-].
-
-ndefinition opcode_table_HCS08_19 ≝
-[
- quadruple … EOR MODE_IMM1 (Byte 〈xA,x8〉) nat2
-; quadruple … EOR MODE_DIR1 (Byte 〈xB,x8〉) nat3
-; quadruple … EOR MODE_DIR2 (Byte 〈xC,x8〉) nat4
-; quadruple … EOR MODE_IX2 (Byte 〈xD,x8〉) nat4
-; quadruple … EOR MODE_IX1 (Byte 〈xE,x8〉) nat3
-; quadruple … EOR MODE_IX0 (Byte 〈xF,x8〉) nat3
-; quadruple … EOR MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x8〉〉) nat5
-; quadruple … EOR MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x8〉〉) nat4
-].
-
-ndefinition opcode_table_HCS08_20 ≝
-[
- quadruple … INC MODE_DIR1 (Byte 〈x3,xC〉) nat5
-; quadruple … INC MODE_INHA (Byte 〈x4,xC〉) nat1
-; quadruple … INC MODE_INHX (Byte 〈x5,xC〉) nat1
-; quadruple … INC MODE_IX1 (Byte 〈x6,xC〉) nat5
-; quadruple … INC MODE_IX0 (Byte 〈x7,xC〉) nat4
-; quadruple … INC MODE_SP1 (Word 〈〈x9,xE〉:〈x6,xC〉〉) nat6
-].
-
-ndefinition opcode_table_HCS08_21 ≝
-[
- quadruple … JMP MODE_IMM1EXT (Byte 〈xB,xC〉) nat3
-; quadruple … JMP MODE_IMM2 (Byte 〈xC,xC〉) nat4
-; quadruple … JMP MODE_INHX2ADD (Byte 〈xD,xC〉) nat4
-; quadruple … JMP MODE_INHX1ADD (Byte 〈xE,xC〉) nat3
-; quadruple … JMP MODE_INHX0ADD (Byte 〈xF,xC〉) nat3
-].
-
-ndefinition opcode_table_HCS08_22 ≝
-[
- quadruple … BSR MODE_IMM1 (Byte 〈xA,xD〉) nat5
-; quadruple … JSR MODE_IMM1EXT (Byte 〈xB,xD〉) nat5
-; quadruple … JSR MODE_IMM2 (Byte 〈xC,xD〉) nat6
-; quadruple … JSR MODE_INHX2ADD (Byte 〈xD,xD〉) nat6
-; quadruple … JSR MODE_INHX1ADD (Byte 〈xE,xD〉) nat5
-; quadruple … JSR MODE_INHX0ADD (Byte 〈xF,xD〉) nat5
-].
-
-ndefinition opcode_table_HCS08_23 ≝
-[
- quadruple … LDA MODE_IMM1 (Byte 〈xA,x6〉) nat2
-; quadruple … LDA MODE_DIR1 (Byte 〈xB,x6〉) nat3
-; quadruple … LDA MODE_DIR2 (Byte 〈xC,x6〉) nat4
-; quadruple … LDA MODE_IX2 (Byte 〈xD,x6〉) nat4
-; quadruple … LDA MODE_IX1 (Byte 〈xE,x6〉) nat3
-; quadruple … LDA MODE_IX0 (Byte 〈xF,x6〉) nat3
-; quadruple … LDA MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x6〉〉) nat5
-; quadruple … LDA MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x6〉〉) nat4
-].
-
-ndefinition opcode_table_HCS08_24 ≝
-[
- quadruple … LDX MODE_IMM1 (Byte 〈xA,xE〉) nat2
-; quadruple … LDX MODE_DIR1 (Byte 〈xB,xE〉) nat3
-; quadruple … LDX MODE_DIR2 (Byte 〈xC,xE〉) nat4
-; quadruple … LDX MODE_IX2 (Byte 〈xD,xE〉) nat4
-; quadruple … LDX MODE_IX1 (Byte 〈xE,xE〉) nat3
-; quadruple … LDX MODE_IX0 (Byte 〈xF,xE〉) nat3
-; quadruple … LDX MODE_SP2 (Word 〈〈x9,xE〉:〈xD,xE〉〉) nat5
-; quadruple … LDX MODE_SP1 (Word 〈〈x9,xE〉:〈xE,xE〉〉) nat4
-].
-
-ndefinition opcode_table_HCS08_25 ≝
-[
- quadruple … LSR MODE_DIR1 (Byte 〈x3,x4〉) nat5
-; quadruple … LSR MODE_INHA (Byte 〈x4,x4〉) nat1
-; quadruple … LSR MODE_INHX (Byte 〈x5,x4〉) nat1
-; quadruple … LSR MODE_IX1 (Byte 〈x6,x4〉) nat5
-; quadruple … LSR MODE_IX0 (Byte 〈x7,x4〉) nat4
-; quadruple … LSR MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x4〉〉) nat6
-].
-
-ndefinition opcode_table_HCS08_26 ≝
-[
- quadruple … MOV MODE_DIR1_to_DIR1 (Byte 〈x4,xE〉) nat5
-; quadruple … MOV MODE_DIR1_to_IX0p (Byte 〈x5,xE〉) nat5
-; quadruple … MOV MODE_IMM1_to_DIR1 (Byte 〈x6,xE〉) nat4
-; quadruple … MOV MODE_IX0p_to_DIR1 (Byte 〈x7,xE〉) nat5
-].
-
-ndefinition opcode_table_HCS08_27 ≝
-[
- quadruple … NEG MODE_DIR1 (Byte 〈x3,x0〉) nat5
-; quadruple … NEG MODE_INHA (Byte 〈x4,x0〉) nat1
-; quadruple … NEG MODE_INHX (Byte 〈x5,x0〉) nat1
-; quadruple … NEG MODE_IX1 (Byte 〈x6,x0〉) nat5
-; quadruple … NEG MODE_IX0 (Byte 〈x7,x0〉) nat4
-; quadruple … NEG MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x0〉〉) nat6
-].
-
-ndefinition opcode_table_HCS08_28 ≝
-[
- quadruple … ORA MODE_IMM1 (Byte 〈xA,xA〉) nat2
-; quadruple … ORA MODE_DIR1 (Byte 〈xB,xA〉) nat3
-; quadruple … ORA MODE_DIR2 (Byte 〈xC,xA〉) nat4
-; quadruple … ORA MODE_IX2 (Byte 〈xD,xA〉) nat4
-; quadruple … ORA MODE_IX1 (Byte 〈xE,xA〉) nat3
-; quadruple … ORA MODE_IX0 (Byte 〈xF,xA〉) nat3
-; quadruple … ORA MODE_SP2 (Word 〈〈x9,xE〉:〈xD,xA〉〉) nat5
-; quadruple … ORA MODE_SP1 (Word 〈〈x9,xE〉:〈xE,xA〉〉) nat4
-].
-
-ndefinition opcode_table_HCS08_29 ≝
-[
- quadruple … ROL MODE_DIR1 (Byte 〈x3,x9〉) nat5
-; quadruple … ROL MODE_INHA (Byte 〈x4,x9〉) nat1
-; quadruple … ROL MODE_INHX (Byte 〈x5,x9〉) nat1
-; quadruple … ROL MODE_IX1 (Byte 〈x6,x9〉) nat5
-; quadruple … ROL MODE_IX0 (Byte 〈x7,x9〉) nat4
-; quadruple … ROL MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x9〉〉) nat6
-].
-
-ndefinition opcode_table_HCS08_30 ≝
-[
- quadruple … ROR MODE_DIR1 (Byte 〈x3,x6〉) nat5
-; quadruple … ROR MODE_INHA (Byte 〈x4,x6〉) nat1
-; quadruple … ROR MODE_INHX (Byte 〈x5,x6〉) nat1
-; quadruple … ROR MODE_IX1 (Byte 〈x6,x6〉) nat5
-; quadruple … ROR MODE_IX0 (Byte 〈x7,x6〉) nat4
-; quadruple … ROR MODE_SP1 (Word 〈〈x9,xE〉:〈x6,x6〉〉) nat6
-].
-
-ndefinition opcode_table_HCS08_31 ≝
-[
- quadruple … SBC MODE_IMM1 (Byte 〈xA,x2〉) nat2
-; quadruple … SBC MODE_DIR1 (Byte 〈xB,x2〉) nat3
-; quadruple … SBC MODE_DIR2 (Byte 〈xC,x2〉) nat4
-; quadruple … SBC MODE_IX2 (Byte 〈xD,x2〉) nat4
-; quadruple … SBC MODE_IX1 (Byte 〈xE,x2〉) nat3
-; quadruple … SBC MODE_IX0 (Byte 〈xF,x2〉) nat3
-; quadruple … SBC MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x2〉〉) nat5
-; quadruple … SBC MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x2〉〉) nat4
-].
-
-ndefinition opcode_table_HCS08_32 ≝
-[
- quadruple … STA MODE_DIR1 (Byte 〈xB,x7〉) nat3
-; quadruple … STA MODE_DIR2 (Byte 〈xC,x7〉) nat4
-; quadruple … STA MODE_IX2 (Byte 〈xD,x7〉) nat4
-; quadruple … STA MODE_IX1 (Byte 〈xE,x7〉) nat3
-; quadruple … STA MODE_IX0 (Byte 〈xF,x7〉) nat2
-; quadruple … STA MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x7〉〉) nat5
-; quadruple … STA MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x7〉〉) nat4
-].
-
-ndefinition opcode_table_HCS08_33 ≝
-[
- quadruple … STX MODE_DIR1 (Byte 〈xB,xF〉) nat3
-; quadruple … STX MODE_DIR2 (Byte 〈xC,xF〉) nat4
-; quadruple … STX MODE_IX2 (Byte 〈xD,xF〉) nat4
-; quadruple … STX MODE_IX1 (Byte 〈xE,xF〉) nat3
-; quadruple … STX MODE_IX0 (Byte 〈xF,xF〉) nat2
-; quadruple … STX MODE_SP2 (Word 〈〈x9,xE〉:〈xD,xF〉〉) nat5
-; quadruple … STX MODE_SP1 (Word 〈〈x9,xE〉:〈xE,xF〉〉) nat4
-].
-
-ndefinition opcode_table_HCS08_34 ≝
-[
- quadruple … SUB MODE_IMM1 (Byte 〈xA,x0〉) nat2
-; quadruple … SUB MODE_DIR1 (Byte 〈xB,x0〉) nat3
-; quadruple … SUB MODE_DIR2 (Byte 〈xC,x0〉) nat4
-; quadruple … SUB MODE_IX2 (Byte 〈xD,x0〉) nat4
-; quadruple … SUB MODE_IX1 (Byte 〈xE,x0〉) nat3
-; quadruple … SUB MODE_IX0 (Byte 〈xF,x0〉) nat3
-; quadruple … SUB MODE_SP2 (Word 〈〈x9,xE〉:〈xD,x0〉〉) nat5
-; quadruple … SUB MODE_SP1 (Word 〈〈x9,xE〉:〈xE,x0〉〉) nat4
-].
-
-ndefinition opcode_table_HCS08_35 ≝
-[
- quadruple … TST MODE_DIR1 (Byte 〈x3,xD〉) nat4
-; quadruple … TST MODE_INHA (Byte 〈x4,xD〉) nat1
-; quadruple … TST MODE_INHX (Byte 〈x5,xD〉) nat1
-; quadruple … TST MODE_IX1 (Byte 〈x6,xD〉) nat4
-; quadruple … TST MODE_IX0 (Byte 〈x7,xD〉) nat3
-; quadruple … TST MODE_SP1 (Word 〈〈x9,xE〉:〈x6,xD〉〉) nat5
-].
-
-ndefinition opcode_table_HCS08 ≝
-opcode_table_HCS08_1 @ opcode_table_HCS08_2 @ opcode_table_HCS08_3 @ opcode_table_HCS08_4 @
-opcode_table_HCS08_5 @ opcode_table_HCS08_6 @ opcode_table_HCS08_7 @ opcode_table_HCS08_8 @
-opcode_table_HCS08_9 @ opcode_table_HCS08_10 @ opcode_table_HCS08_11 @ opcode_table_HCS08_12 @
-opcode_table_HCS08_13 @ opcode_table_HCS08_14 @ opcode_table_HCS08_15 @ opcode_table_HCS08_16 @
-opcode_table_HCS08_17 @ opcode_table_HCS08_18 @ opcode_table_HCS08_19 @ opcode_table_HCS08_20 @
-opcode_table_HCS08_21 @ opcode_table_HCS08_22 @ opcode_table_HCS08_23 @ opcode_table_HCS08_24 @
-opcode_table_HCS08_25 @ opcode_table_HCS08_26 @ opcode_table_HCS08_27 @ opcode_table_HCS08_28 @
-opcode_table_HCS08_29 @ opcode_table_HCS08_30 @ opcode_table_HCS08_31 @ opcode_table_HCS08_32 @
-opcode_table_HCS08_33 @ opcode_table_HCS08_34 @ opcode_table_HCS08_35.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/pseudo.ma".
-include "emulator/opcodes/HCS08_table.ma".
-
-(* ****************** *)
-(* TABELLA DELL'HCS08 *)
-(* ****************** *)
-
-(* HCS08: opcode non implementati come da manuale (byte) *)
-ndefinition HCS08_not_impl_byte ≝
- [〈x8,xD〉
- ;〈x9,xE〉
- ;〈xA,xC〉
- ].
-
-nlemma ok_byte_table_HCS08 : forallc ? (λb.
- (test_not_impl_byte b HCS08_not_impl_byte ⊙ eqc ? (get_byte_count HCS08 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08) 〈〈x0,x0〉:〈x0,x1〉〉) ⊗
- (⊖ (test_not_impl_byte b HCS08_not_impl_byte) ⊙ eqc ? (get_byte_count HCS08 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* HCS08: opcode non implementati come da manuale (0x9E+byte) *)
-ndefinition HCS08_not_impl_word ≝
- [〈x0,x0〉;〈x0,x1〉;〈x0,x2〉;〈x0,x3〉;〈x0,x4〉;〈x0,x5〉;〈x0,x6〉;〈x0,x7〉
- ;〈x0,x8〉;〈x0,x9〉;〈x0,xA〉;〈x0,xB〉;〈x0,xC〉;〈x0,xD〉;〈x0,xE〉;〈x0,xF〉
- ;〈x1,x0〉;〈x1,x1〉;〈x1,x2〉;〈x1,x3〉;〈x1,x4〉;〈x1,x5〉;〈x1,x6〉;〈x1,x7〉
- ;〈x1,x8〉;〈x1,x9〉;〈x1,xA〉;〈x1,xB〉;〈x1,xC〉;〈x1,xD〉;〈x1,xE〉;〈x1,xF〉
- ;〈x2,x0〉;〈x2,x1〉;〈x2,x2〉;〈x2,x3〉;〈x2,x4〉;〈x2,x5〉;〈x2,x6〉;〈x2,x7〉
- ;〈x2,x8〉;〈x2,x9〉;〈x2,xA〉;〈x2,xB〉;〈x2,xC〉;〈x2,xD〉;〈x2,xE〉;〈x2,xF〉
- ;〈x3,x0〉;〈x3,x1〉;〈x3,x2〉;〈x3,x3〉;〈x3,x4〉;〈x3,x5〉;〈x3,x6〉;〈x3,x7〉
- ;〈x3,x8〉;〈x3,x9〉;〈x3,xA〉;〈x3,xB〉;〈x3,xC〉;〈x3,xD〉;〈x3,xE〉;〈x3,xF〉
- ;〈x4,x0〉;〈x4,x1〉;〈x4,x2〉;〈x4,x3〉;〈x4,x4〉;〈x4,x5〉;〈x4,x6〉;〈x4,x7〉
- ;〈x4,x8〉;〈x4,x9〉;〈x4,xA〉;〈x4,xB〉;〈x4,xC〉;〈x4,xD〉;〈x4,xE〉;〈x4,xF〉
- ;〈x5,x0〉;〈x5,x1〉;〈x5,x2〉;〈x5,x3〉;〈x5,x4〉;〈x5,x5〉;〈x5,x6〉;〈x5,x7〉
- ;〈x5,x8〉;〈x5,x9〉;〈x5,xA〉;〈x5,xB〉;〈x5,xC〉;〈x5,xD〉;〈x5,xE〉;〈x5,xF〉
- ;〈x6,x2〉;〈x6,x5〉;〈x6,xE〉
- ;〈x7,x0〉;〈x7,x1〉;〈x7,x2〉;〈x7,x3〉;〈x7,x4〉;〈x7,x5〉;〈x7,x6〉;〈x7,x7〉
- ;〈x7,x8〉;〈x7,x9〉;〈x7,xA〉;〈x7,xB〉;〈x7,xC〉;〈x7,xD〉;〈x7,xE〉;〈x7,xF〉
- ;〈x8,x0〉;〈x8,x1〉;〈x8,x2〉;〈x8,x3〉;〈x8,x4〉;〈x8,x5〉;〈x8,x6〉;〈x8,x7〉
- ;〈x8,x8〉;〈x8,x9〉;〈x8,xA〉;〈x8,xB〉;〈x8,xC〉;〈x8,xD〉;〈x8,xE〉;〈x8,xF〉
- ;〈x9,x0〉;〈x9,x1〉;〈x9,x2〉;〈x9,x3〉;〈x9,x4〉;〈x9,x5〉;〈x9,x6〉;〈x9,x7〉
- ;〈x9,x8〉;〈x9,x9〉;〈x9,xA〉;〈x9,xB〉;〈x9,xC〉;〈x9,xD〉;〈x9,xE〉;〈x9,xF〉
- ;〈xA,x0〉;〈xA,x1〉;〈xA,x2〉;〈xA,x3〉;〈xA,x4〉;〈xA,x5〉;〈xA,x6〉;〈xA,x7〉;〈xA,x8〉;〈xA,x9〉;〈xA,xA〉;〈xA,xB〉;〈xA,xC〉;〈xA,xD〉;〈xA,xF〉
- ;〈xB,x0〉;〈xB,x1〉;〈xB,x2〉;〈xB,x3〉;〈xB,x4〉;〈xB,x5〉;〈xB,x6〉;〈xB,x7〉;〈xB,x8〉;〈xB,x9〉;〈xB,xA〉;〈xB,xB〉;〈xB,xC〉;〈xB,xD〉;〈xB,xF〉
- ;〈xC,x0〉;〈xC,x1〉;〈xC,x2〉;〈xC,x3〉;〈xC,x4〉;〈xC,x5〉;〈xC,x6〉;〈xC,x7〉;〈xC,x8〉;〈xC,x9〉;〈xC,xA〉;〈xC,xB〉;〈xC,xC〉;〈xC,xD〉;〈xC,xF〉
- ;〈xD,xC〉;〈xD,xD〉
- ;〈xE,xC〉;〈xE,xD〉
- ;〈xF,x0〉;〈xF,x1〉;〈xF,x2〉;〈xF,x4〉;〈xF,x5〉;〈xF,x6〉;〈xF,x7〉;〈xF,x8〉;〈xF,x9〉;〈xF,xA〉;〈xF,xB〉;〈xF,xC〉;〈xF,xD〉
- ].
-
-nlemma ok_word_table_HCS08 : forallc ? (λb.
- (test_not_impl_byte b HCS08_not_impl_word ⊙ eqc ? (get_word_count HCS08 〈〈x9,xE〉:b〉 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08) 〈〈x0,x0〉:〈x0,x1〉〉) ⊗
- (⊖ (test_not_impl_byte b HCS08_not_impl_word) ⊙ eqc ? (get_word_count HCS08 〈〈x9,xE〉:b〉 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* HCS08: pseudocodici non implementati come da manuale *)
-ndefinition HCS08_not_impl_pseudo ≝
- [ SHA ; SLA ].
-
-nlemma ok_pseudo_table_HCS08 : forallc ? (λo.
- (test_not_impl_pseudo HCS08 o HCS08_not_impl_pseudo ⊙ lec ? 〈〈x0,x0〉:〈x0,x1〉〉 (get_pseudo_count HCS08 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08)) ⊗
- (⊖ (test_not_impl_pseudo HCS08 o HCS08_not_impl_pseudo) ⊙ eqc ? (get_pseudo_count HCS08 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* HCS08: modalita' non implementate come da manuale *)
-ndefinition HCS08_not_impl_mode ≝
- [ MODE_TNY x0 ; MODE_TNY x1 ; MODE_TNY x2 ; MODE_TNY x3
- ; MODE_TNY x4 ; MODE_TNY x5 ; MODE_TNY x6 ; MODE_TNY x7
- ; MODE_TNY x8 ; MODE_TNY x9 ; MODE_TNY xA ; MODE_TNY xB
- ; MODE_TNY xC ; MODE_TNY xD ; MODE_TNY xE ; MODE_TNY xF
- ; MODE_SRT t00 ; MODE_SRT t01 ; MODE_SRT t02 ; MODE_SRT t03
- ; MODE_SRT t04 ; MODE_SRT t05 ; MODE_SRT t06 ; MODE_SRT t07
- ; MODE_SRT t08 ; MODE_SRT t09 ; MODE_SRT t0A ; MODE_SRT t0B
- ; MODE_SRT t0C ; MODE_SRT t0D ; MODE_SRT t0E ; MODE_SRT t0F
- ; MODE_SRT t10 ; MODE_SRT t11 ; MODE_SRT t12 ; MODE_SRT t13
- ; MODE_SRT t14 ; MODE_SRT t15 ; MODE_SRT t16 ; MODE_SRT t17
- ; MODE_SRT t18 ; MODE_SRT t19 ; MODE_SRT t1A ; MODE_SRT t1B
- ; MODE_SRT t1C ; MODE_SRT t1D ; MODE_SRT t1E ; MODE_SRT t1F ].
-
-nlemma ok_mode_table_HCS08 : forallc ? (λi.
- (test_not_impl_mode HCS08 i HCS08_not_impl_mode ⊙ lec ? 〈〈x0,x0〉:〈x0,x1〉〉 (get_mode_count HCS08 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08)) ⊗
- (⊖ (test_not_impl_mode HCS08 i HCS08_not_impl_mode) ⊙ eqc ? (get_mode_count HCS08 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-nlemma ok_PsIm_table_HCS08 :
- forallc ? (λi.
- forallc ? (λps.
- lec ? (get_PsIm_count HCS08 ps i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_HCS08) 〈〈x0,x0〉:〈x0,x1〉〉)) = true.
- napply refl_eq.
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/IP2022_instr_mode_base.ma".
-
-nlemma eq_to_eqIP2022im : ∀n1,n2.n1 = n2 → eq_IP2022_im n1 n2 = true.
- #n1; #n2; #H;
- nrewrite > H;
- nelim n2;
- ##[ ##4,11,12: #o; nrewrite > (eq_to_eqoct … (refl_eq …))
- ##| ##6: #t; nrewrite > (eq_to_eqbit … (refl_eq …)) ##]
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma neqIP2022im_to_neq : ∀n1,n2.eq_IP2022_im n1 n2 = false → n1 ≠ n2.
- #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_IP2022_im n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqIP2022im n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-(* !!! per brevita... *)
-naxiom eqIP2022im_to_eq : ∀c1,c2.eq_IP2022_im c1 c2 = true → c1 = c2.
-
-nlemma neq_to_neqIP2022im : ∀n1,n2.n1 ≠ n2 → eq_IP2022_im n1 n2 = false.
- #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_IP2022_im n1 n2));
- napply (not_to_not (eq_IP2022_im n1 n2 = true) (n1 = n2) ? H);
- napply (eqIP2022im_to_eq n1 n2).
-nqed.
-
-nlemma decidable_IP2022im : ∀x,y:IP2022_instr_mode.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_IP2022_im x y = true) (eq_IP2022_im x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqIP2022im_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqIP2022im_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqIP2022im : symmetricT IP2022_instr_mode bool eq_IP2022_im.
- #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_IP2022im n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqIP2022im n1 n2 H);
- napply (symmetric_eq ? (eq_IP2022_im n2 n1) false);
- napply (neq_to_neqIP2022im n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
-
-nlemma IP2022im_is_comparable : comparable.
- @ IP2022_instr_mode
- ##[ napply MODE_INH
- ##| napply forall_IP2022_im
- ##| napply eq_IP2022_im
- ##| napply eqIP2022im_to_eq
- ##| napply eq_to_eqIP2022im
- ##| napply neqIP2022im_to_neq
- ##| napply neq_to_neqIP2022im
- ##| napply decidable_IP2022im
- ##| napply symmetric_eqIP2022im
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr IP2022im_is_comparable ≡ IP2022_instr_mode.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/oct.ma".
-include "num/bitrigesim.ma".
-
-(* ********************************************** *)
-(* MATTONI BASE PER DEFINIRE LE TABELLE DELLE MCU *)
-(* ********************************************** *)
-
-(* enumerazione delle modalita' di indirizzamento = caricamento degli operandi *)
-ninductive IP2022_instr_mode: Type ≝
- (* nessun operando : formato xxxxxxxx xxxxxxxx *)
- MODE_INH : IP2022_instr_mode
- (* operando implicito [ADDR] : formato xxxxxxxx xxxxxxxx *)
-| MODE_INHADDR : IP2022_instr_mode
- (* operando implicito [ADDR]/ADDR+=2 : formato xxxxxxxx xxxxxxxx *)
-| MODE_INHADDRpp : IP2022_instr_mode
-
- (* #lit3 → / : formato xxxxxxxx xxxxxkkk *)
-| MODE_IMM3 : oct → IP2022_instr_mode
- (* W, #lit8 → W : formato xxxxxxxx kkkkkkkk [load 1 byte arg] *)
-| MODE_IMM8 : IP2022_instr_mode
- (* #lit13 → / : formato xxxkkkkk kkkkkkkk [load 1 byte arg] *)
-| MODE_IMM13 : bitrigesim → IP2022_instr_mode
-
- (* FR, W → FR : formato xxxxxxx0 ffffffff [load 1 byte arg] *)
-| MODE_FR0_and_W : IP2022_instr_mode
- (* FR, W → FR : formato xxxxxxx1 ffffffff [load 1 byte arg] *)
-| MODE_FR1_and_W : IP2022_instr_mode
- (* W, FR → W : formato xxxxxxx0 ffffffff [load 1 byte arg] *)
-| MODE_W_and_FR0 : IP2022_instr_mode
- (* W, FR → W : formato xxxxxxx1 ffffffff [load 1 byte arg] *)
-| MODE_W_and_FR1 : IP2022_instr_mode
-
- (* FR(bitN) → FR(bitN) : formato xxxxbbb0 ffffffff [load 1 byte arg] *)
-| MODE_FR0n : oct → IP2022_instr_mode
- (* FR(bitN) → FR(bitN) : formato xxxxbbb1 ffffffff [load 1 byte arg] *)
-| MODE_FR1n : oct → IP2022_instr_mode
-.
-
-ndefinition eq_IP2022_im ≝
-λi1,i2:IP2022_instr_mode.
- match i1 with
- [ MODE_INH ⇒ match i2 with [ MODE_INH ⇒ true | _ ⇒ false ]
- | MODE_INHADDR ⇒ match i2 with [ MODE_INHADDR ⇒ true | _ ⇒ false ]
- | MODE_INHADDRpp ⇒ match i2 with [ MODE_INHADDRpp ⇒ true | _ ⇒ false ]
- | MODE_IMM3 o1 ⇒ match i2 with [ MODE_IMM3 o2 ⇒ eqc ? o1 o2 | _ ⇒ false ]
- | MODE_IMM8 ⇒ match i2 with [ MODE_IMM8 ⇒ true | _ ⇒ false ]
- | MODE_IMM13 t1 ⇒ match i2 with [ MODE_IMM13 t2 ⇒ eqc ? t1 t2 | _ ⇒ false ]
- | MODE_FR0_and_W ⇒ match i2 with [ MODE_FR0_and_W ⇒ true | _ ⇒ false ]
- | MODE_FR1_and_W ⇒ match i2 with [ MODE_FR1_and_W ⇒ true | _ ⇒ false ]
- | MODE_W_and_FR0 ⇒ match i2 with [ MODE_W_and_FR0 ⇒ true | _ ⇒ false ]
- | MODE_W_and_FR1 ⇒ match i2 with [ MODE_W_and_FR1 ⇒ true | _ ⇒ false ]
- | MODE_FR0n o1 ⇒ match i2 with [ MODE_FR0n o2 ⇒ eqc ? o1 o2 | _ ⇒ false ]
- | MODE_FR1n o1 ⇒ match i2 with [ MODE_FR1n o2 ⇒ eqc ? o1 o2 | _ ⇒ false ]
- ].
-
-ndefinition forall_IP2022_im ≝ λP:IP2022_instr_mode → bool.
- P MODE_INH
-⊗ P MODE_INHADDR
-⊗ P MODE_INHADDRpp
-⊗ forallc ? (λo.P (MODE_IMM3 o))
-⊗ P MODE_IMM8
-⊗ forallc ? (λt.P (MODE_IMM13 t))
-⊗ P MODE_FR0_and_W
-⊗ P MODE_FR1_and_W
-⊗ P MODE_W_and_FR0
-⊗ P MODE_W_and_FR1
-⊗ forallc ? (λo.P (MODE_FR0n o))
-⊗ forallc ? (λo.P (MODE_FR1n o)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/IP2022_pseudo_base.ma".
-include "common/comp.ma".
-include "num/bool_lemmas.ma".
-
-nlemma eq_to_eqIP2022pseudo : ∀n1,n2.n1 = n2 → eq_IP2022_pseudo n1 n2 = true.
- #n1; #n2; #H;
- nrewrite > H;
- nelim n2;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma neqIP2022pseudo_to_neq : ∀n1,n2.eq_IP2022_pseudo n1 n2 = false → n1 ≠ n2.
- #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_IP2022_pseudo n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqIP2022pseudo n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-(* !!! per brevita... *)
-naxiom eqIP2022pseudo_to_eq : ∀c1,c2.eq_IP2022_pseudo c1 c2 = true → c1 = c2.
-
-nlemma neq_to_neqIP2022pseudo : ∀n1,n2.n1 ≠ n2 → eq_IP2022_pseudo n1 n2 = false.
- #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_IP2022_pseudo n1 n2));
- napply (not_to_not (eq_IP2022_pseudo n1 n2 = true) (n1 = n2) ? H);
- napply (eqIP2022pseudo_to_eq n1 n2).
-nqed.
-
-nlemma decidable_IP2022pseudo : ∀x,y:IP2022_pseudo.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_IP2022_pseudo x y = true) (eq_IP2022_pseudo x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqIP2022pseudo_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqIP2022pseudo_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqIP2022pseudo : symmetricT IP2022_pseudo bool eq_IP2022_pseudo.
- #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_IP2022pseudo n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqIP2022pseudo n1 n2 H);
- napply (symmetric_eq ? (eq_IP2022_pseudo n2 n1) false);
- napply (neq_to_neqIP2022pseudo n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
-
-nlemma IP2022pseudo_is_comparable : comparable.
- @ IP2022_pseudo
- ##[ napply ADD
- ##| napply forall_IP2022_pseudo
- ##| napply eq_IP2022_pseudo
- ##| napply eqIP2022pseudo_to_eq
- ##| napply eq_to_eqIP2022pseudo
- ##| napply neqIP2022pseudo_to_neq
- ##| napply neq_to_neqIP2022pseudo
- ##| napply decidable_IP2022pseudo
- ##| napply symmetric_eqIP2022pseudo
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr IP2022pseudo_is_comparable ≡ IP2022_pseudo.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/bool.ma".
-
-(* ********************************************** *)
-(* MATTONI BASE PER DEFINIRE LE TABELLE DELLE MCU *)
-(* ********************************************** *)
-
-(* enumerazione delle istruzioni *)
-ninductive IP2022_pseudo: Type ≝
- ADD : IP2022_pseudo (* add *)
-| ADDC : IP2022_pseudo (* add with carry *)
-| AND : IP2022_pseudo (* and *)
-| BREAK : IP2022_pseudo (* enter break mode *)
-| BREAKX : IP2022_pseudo (* enter break mode, after skip *)
-| CALL : IP2022_pseudo (* subroutine call *)
-| CLR : IP2022_pseudo (* clear *)
-| CLRB : IP2022_pseudo (* clear bit *)
-| CMP : IP2022_pseudo (* set flags according to sub *)
-| CSE : IP2022_pseudo (* confront & skip if equal *)
-| CSNE : IP2022_pseudo (* confront & skip if not equal *)
-| CWDT : IP2022_pseudo (* clear watch dog -- not impl. ERR *)
-| DEC : IP2022_pseudo (* decrement *)
-| DECSNZ : IP2022_pseudo (* decrement & skip if not zero *)
-| DECSZ : IP2022_pseudo (* decrement & skip if zero *)
-| FERASE : IP2022_pseudo (* flash erase -- not impl. ERR *)
-| FREAD : IP2022_pseudo (* flash read -- not impl. ERR *)
-| FWRITE : IP2022_pseudo (* flash write -- not impl. ERR *)
-| INC : IP2022_pseudo (* increment *)
-| INCSNZ : IP2022_pseudo (* increment & skip if not zero *)
-| INCSZ : IP2022_pseudo (* increment & skip if zero *)
-| INT : IP2022_pseudo (* interrupt -- not impl. ERR *)
-| IREAD : IP2022_pseudo (* memory read *)
-(* NB: ignorata la differenza IREAD/IREADI perche' non e' implementata EXT_MEM
- IREAD → ADDRX= 0x00 ram, 0x01 flash, 0x80 0x81 ext_mem
- IREADI → ADDRX= 0x00 ram, 0x01 flash *)
-| IWRITE : IP2022_pseudo (* memory write *)
-(* NB: ignorata la differenza IWRITE/IWRITEI perche' non e' implementata EXT_MEM
- IREAD → ADDRX= 0x00 ram, 0x80 0x81 ext_mem
- IREADI → ADDRX= 0x00 ram *)
-| JMP : IP2022_pseudo (* jump *)
-| LOADH : IP2022_pseudo (* load Data Pointer High *)
-| LOADL : IP2022_pseudo (* load Data Pointer Low *)
-| MOV : IP2022_pseudo (* move *)
-| MULS : IP2022_pseudo (* signed mul *)
-| MULU : IP2022_pseudo (* unsigned mul *)
-| NOP : IP2022_pseudo (* nop *)
-| NOT : IP2022_pseudo (* not *)
-| OR : IP2022_pseudo (* or *)
-| PAGE : IP2022_pseudo (* set Page Register *)
-| POP : IP2022_pseudo (* pop *)
-| PUSH : IP2022_pseudo (* push *)
-| RET : IP2022_pseudo (* subroutine ret *)
-| RETI : IP2022_pseudo (* interrupt ret -- not impl. ERR *)
-| RETNP : IP2022_pseudo (* subroutine ret & don't restore Page Register *)
-| RETW : IP2022_pseudo (* subroutine ret & load W Register *)
-| RL : IP2022_pseudo (* rotate left *)
-| RR : IP2022_pseudo (* rotate right *)
-| SB : IP2022_pseudo (* skip if bit set *)
-| SETB : IP2022_pseudo (* set bit *)
-| SNB : IP2022_pseudo (* skip if bit not set *)
-| SPEED : IP2022_pseudo (* set Speed Register *)
-| SUB : IP2022_pseudo (* sub *)
-| SUBC : IP2022_pseudo (* sub with carry *)
-| SWAP : IP2022_pseudo (* swap xxxxyyyy → yyyyxxxx *)
-| TEST : IP2022_pseudo (* set flags according to zero test *)
-| XOR : IP2022_pseudo (* xor *)
-.
-
-ndefinition eq_IP2022_pseudo ≝
-λps1,ps2:IP2022_pseudo.
- match ps1 with
- [ ADD ⇒ match ps2 with [ ADD ⇒ true | _ ⇒ false ] | ADDC ⇒ match ps2 with [ ADDC ⇒ true | _ ⇒ false ]
- | AND ⇒ match ps2 with [ AND ⇒ true | _ ⇒ false ] | BREAK ⇒ match ps2 with [ BREAK ⇒ true | _ ⇒ false ]
- | BREAKX ⇒ match ps2 with [ BREAKX ⇒ true | _ ⇒ false ] | CALL ⇒ match ps2 with [ CALL ⇒ true | _ ⇒ false ]
- | CLR ⇒ match ps2 with [ CLR ⇒ true | _ ⇒ false ] | CLRB ⇒ match ps2 with [ CLRB ⇒ true | _ ⇒ false ]
- | CMP ⇒ match ps2 with [ CMP ⇒ true | _ ⇒ false ] | CSE ⇒ match ps2 with [ CSE ⇒ true | _ ⇒ false ]
- | CSNE ⇒ match ps2 with [ CSNE ⇒ true | _ ⇒ false ] | CWDT ⇒ match ps2 with [ CWDT ⇒ true | _ ⇒ false ]
- | DEC ⇒ match ps2 with [ DEC ⇒ true | _ ⇒ false ] | DECSNZ ⇒ match ps2 with [ DECSNZ ⇒ true | _ ⇒ false ]
- | DECSZ ⇒ match ps2 with [ DECSZ ⇒ true | _ ⇒ false ] | FERASE ⇒ match ps2 with [ FERASE ⇒ true | _ ⇒ false ]
- | FREAD ⇒ match ps2 with [ FREAD ⇒ true | _ ⇒ false ] | FWRITE ⇒ match ps2 with [ FWRITE ⇒ true | _ ⇒ false ]
- | INC ⇒ match ps2 with [ INC ⇒ true | _ ⇒ false ] | INCSNZ ⇒ match ps2 with [ INCSNZ ⇒ true | _ ⇒ false ]
- | INCSZ ⇒ match ps2 with [ INCSZ ⇒ true | _ ⇒ false ] | INT ⇒ match ps2 with [ INT ⇒ true | _ ⇒ false ]
- | IREAD ⇒ match ps2 with [ IREAD ⇒ true | _ ⇒ false ] | IWRITE ⇒ match ps2 with [ IWRITE ⇒ true | _ ⇒ false ]
- | JMP ⇒ match ps2 with [ JMP ⇒ true | _ ⇒ false ] | LOADH ⇒ match ps2 with [ LOADH ⇒ true | _ ⇒ false ]
- | LOADL ⇒ match ps2 with [ LOADL ⇒ true | _ ⇒ false ] | MOV ⇒ match ps2 with [ MOV ⇒ true | _ ⇒ false ]
- | MULS ⇒ match ps2 with [ MULS ⇒ true | _ ⇒ false ] | MULU ⇒ match ps2 with [ MULU ⇒ true | _ ⇒ false ]
- | NOP ⇒ match ps2 with [ NOP ⇒ true | _ ⇒ false ] | NOT ⇒ match ps2 with [ NOT ⇒ true | _ ⇒ false ]
- | OR ⇒ match ps2 with [ OR ⇒ true | _ ⇒ false ] | PAGE ⇒ match ps2 with [ PAGE ⇒ true | _ ⇒ false ]
- | POP ⇒ match ps2 with [ POP ⇒ true | _ ⇒ false ] | PUSH ⇒ match ps2 with [ PUSH ⇒ true | _ ⇒ false ]
- | RET ⇒ match ps2 with [ RET ⇒ true | _ ⇒ false ] | RETI ⇒ match ps2 with [ RETI ⇒ true | _ ⇒ false ]
- | RETNP ⇒ match ps2 with [ RETNP ⇒ true | _ ⇒ false ] | RETW ⇒ match ps2 with [ RETW ⇒ true | _ ⇒ false ]
- | RL ⇒ match ps2 with [ RL ⇒ true | _ ⇒ false ] | RR ⇒ match ps2 with [ RR ⇒ true | _ ⇒ false ]
- | SB ⇒ match ps2 with [ SB ⇒ true | _ ⇒ false ] | SETB ⇒ match ps2 with [ SETB ⇒ true | _ ⇒ false ]
- | SNB ⇒ match ps2 with [ SNB ⇒ true | _ ⇒ false ] | SPEED ⇒ match ps2 with [ SPEED ⇒ true | _ ⇒ false ]
- | SUB ⇒ match ps2 with [ SUB ⇒ true | _ ⇒ false ] | SUBC ⇒ match ps2 with [ SUBC ⇒ true | _ ⇒ false ]
- | SWAP ⇒ match ps2 with [ SWAP ⇒ true | _ ⇒ false ] | TEST ⇒ match ps2 with [ TEST ⇒ true | _ ⇒ false ]
- | XOR ⇒ match ps2 with [ XOR ⇒ true | _ ⇒ false ]
- ].
-
-ndefinition forall_IP2022_pseudo ≝ λP:IP2022_pseudo → bool.
- P ADD ⊗ P ADDC ⊗ P AND ⊗ P BREAK ⊗ P BREAKX ⊗ P CALL ⊗ P CLR ⊗ P CLRB ⊗
- P CMP ⊗ P CSE ⊗ P CSNE ⊗ P CWDT ⊗ P DEC ⊗ P DECSNZ ⊗ P DECSZ ⊗ P FERASE ⊗
- P FREAD ⊗ P FWRITE ⊗ P INC ⊗ P INCSNZ ⊗ P INCSZ ⊗ P INT ⊗ P IREAD ⊗ P IWRITE ⊗
- P JMP ⊗ P LOADH ⊗ P LOADL ⊗ P MOV ⊗ P MULS ⊗ P MULU ⊗ P NOP ⊗ P NOT ⊗
- P OR ⊗ P PAGE ⊗ P POP ⊗ P PUSH ⊗ P RET ⊗ P RETI ⊗ P RETNP ⊗ P RETW ⊗
- P RL ⊗ P RR ⊗ P SB ⊗ P SETB ⊗ P SNB ⊗ P SPEED ⊗ P SUB ⊗ P SUBC ⊗
- P SWAP ⊗ P TEST ⊗ P XOR.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/IP2022_pseudo.ma".
-include "emulator/opcodes/IP2022_instr_mode.ma".
-include "emulator/opcodes/byte_or_word.ma".
-include "common/list.ma".
-
-(* ******************* *)
-(* TABELLA DELL'IP2022 *)
-(* ******************* *)
-
-(* definizione come concatenazione finale di liste per velocizzare il parsing *)
-(* ogni riga e' [pseudo] [modalita' indirizzamento] [opcode esadecimale] [#cicli esecuzione] *)
-
-ndefinition opcode_table_IP2022_1 ≝
-[
- quadruple … ADD MODE_FR0_and_W (Byte 〈x1,xE〉) nat1
-; quadruple … ADD MODE_FR1_and_W (Byte 〈x1,xF〉) nat1
-; quadruple … ADD MODE_W_and_FR0 (Byte 〈x1,xC〉) nat1
-; quadruple … ADD MODE_W_and_FR1 (Byte 〈x1,xD〉) nat1
-; quadruple … ADD MODE_IMM8 (Byte 〈x7,xB〉) nat1
-].
-
-ndefinition opcode_table_IP2022_2 ≝
-[
- quadruple … ADDC MODE_FR0_and_W (Byte 〈x5,xE〉) nat1
-; quadruple … ADDC MODE_FR1_and_W (Byte 〈x5,xF〉) nat1
-; quadruple … ADDC MODE_W_and_FR0 (Byte 〈x5,xC〉) nat1
-; quadruple … ADDC MODE_W_and_FR1 (Byte 〈x5,xD〉) nat1
-].
-
-ndefinition opcode_table_IP2022_3 ≝
-[
- quadruple … AND MODE_FR0_and_W (Byte 〈x1,x6〉) nat1
-; quadruple … AND MODE_FR1_and_W (Byte 〈x1,x7〉) nat1
-; quadruple … AND MODE_W_and_FR0 (Byte 〈x1,x4〉) nat1
-; quadruple … AND MODE_W_and_FR1 (Byte 〈x1,x5〉) nat1
-; quadruple … AND MODE_IMM8 (Byte 〈x7,xE〉) nat1
-].
-
-ndefinition opcode_table_IP2022_4 ≝
-[
- quadruple … BREAK MODE_INH (Word 〈〈x0,x0〉:〈x0,x1〉〉) nat1
-; quadruple … BREAKX MODE_INH (Word 〈〈x0,x0〉:〈x0,x5〉〉) nat1
-; quadruple … CWDT MODE_INH (Word 〈〈x0,x0〉:〈x0,x4〉〉) nat1
-; quadruple … FERASE MODE_INH (Word 〈〈x0,x0〉:〈x0,x3〉〉) nat1
-; quadruple … FREAD MODE_INH (Word 〈〈x0,x0〉:〈x1,xB〉〉) nat1
-; quadruple … FWRITE MODE_INH (Word 〈〈x0,x0〉:〈x1,xA〉〉) nat1
-; quadruple … INT MODE_INH (Word 〈〈x0,x0〉:〈x0,x6〉〉) nat3
-; quadruple … IREAD MODE_INHADDR (Word 〈〈x0,x0〉:〈x1,x9〉〉) nat4 (* only blocking implemented *)
-; quadruple … IREAD MODE_INHADDRpp (Word 〈〈x0,x0〉:〈x1,xD〉〉) nat4 (* only blocking implemented *)
-; quadruple … IWRITE MODE_INHADDR (Word 〈〈x0,x0〉:〈x1,x8〉〉) nat4 (* only blocking implemented *)
-; quadruple … IWRITE MODE_INHADDRpp (Word 〈〈x0,x0〉:〈x1,xC〉〉) nat4 (* only blocking implemented *)
-; quadruple … NOP MODE_INH (Word 〈〈x0,x0〉:〈x0,x0〉〉) nat1
-; quadruple … RET MODE_INH (Word 〈〈x0,x0〉:〈x0,x7〉〉) nat3
-; quadruple … RETNP MODE_INH (Word 〈〈x0,x0〉:〈x0,x2〉〉) nat3
-].
-
-ndefinition opcode_table_IP2022_5 ≝
-[
- quadruple … CALL (MODE_IMM13 t00) (Byte 〈xC,x0〉) nat3
-; quadruple … CALL (MODE_IMM13 t01) (Byte 〈xC,x1〉) nat3
-; quadruple … CALL (MODE_IMM13 t02) (Byte 〈xC,x2〉) nat3
-; quadruple … CALL (MODE_IMM13 t03) (Byte 〈xC,x3〉) nat3
-; quadruple … CALL (MODE_IMM13 t04) (Byte 〈xC,x4〉) nat3
-; quadruple … CALL (MODE_IMM13 t05) (Byte 〈xC,x5〉) nat3
-; quadruple … CALL (MODE_IMM13 t06) (Byte 〈xC,x6〉) nat3
-; quadruple … CALL (MODE_IMM13 t07) (Byte 〈xC,x7〉) nat3
-; quadruple … CALL (MODE_IMM13 t08) (Byte 〈xC,x8〉) nat3
-; quadruple … CALL (MODE_IMM13 t09) (Byte 〈xC,x9〉) nat3
-; quadruple … CALL (MODE_IMM13 t0A) (Byte 〈xC,xA〉) nat3
-; quadruple … CALL (MODE_IMM13 t0B) (Byte 〈xC,xB〉) nat3
-; quadruple … CALL (MODE_IMM13 t0C) (Byte 〈xC,xC〉) nat3
-; quadruple … CALL (MODE_IMM13 t0D) (Byte 〈xC,xD〉) nat3
-; quadruple … CALL (MODE_IMM13 t0E) (Byte 〈xC,xE〉) nat3
-; quadruple … CALL (MODE_IMM13 t0F) (Byte 〈xC,xF〉) nat3
-; quadruple … CALL (MODE_IMM13 t10) (Byte 〈xD,x0〉) nat3
-; quadruple … CALL (MODE_IMM13 t11) (Byte 〈xD,x1〉) nat3
-; quadruple … CALL (MODE_IMM13 t12) (Byte 〈xD,x2〉) nat3
-; quadruple … CALL (MODE_IMM13 t13) (Byte 〈xD,x3〉) nat3
-; quadruple … CALL (MODE_IMM13 t14) (Byte 〈xD,x4〉) nat3
-; quadruple … CALL (MODE_IMM13 t15) (Byte 〈xD,x5〉) nat3
-; quadruple … CALL (MODE_IMM13 t16) (Byte 〈xD,x6〉) nat3
-; quadruple … CALL (MODE_IMM13 t17) (Byte 〈xD,x7〉) nat3
-; quadruple … CALL (MODE_IMM13 t18) (Byte 〈xD,x8〉) nat3
-; quadruple … CALL (MODE_IMM13 t19) (Byte 〈xD,x9〉) nat3
-; quadruple … CALL (MODE_IMM13 t1A) (Byte 〈xD,xA〉) nat3
-; quadruple … CALL (MODE_IMM13 t1B) (Byte 〈xD,xB〉) nat3
-; quadruple … CALL (MODE_IMM13 t1C) (Byte 〈xD,xC〉) nat3
-; quadruple … CALL (MODE_IMM13 t1D) (Byte 〈xD,xD〉) nat3
-; quadruple … CALL (MODE_IMM13 t1E) (Byte 〈xD,xE〉) nat3
-; quadruple … CALL (MODE_IMM13 t1F) (Byte 〈xD,xF〉) nat3
-].
-
-ndefinition opcode_table_IP2022_6 ≝
-[
- quadruple … CLR MODE_FR0_and_W (Byte 〈x0,x6〉) nat1
-; quadruple … CLR MODE_FR1_and_W (Byte 〈x0,x7〉) nat1
-].
-
-ndefinition opcode_table_IP2022_7 ≝
-[
- quadruple … CLRB (MODE_FR0n o0) (Byte 〈x8,x0〉) nat1
-; quadruple … CLRB (MODE_FR1n o0) (Byte 〈x8,x1〉) nat1
-; quadruple … CLRB (MODE_FR0n o1) (Byte 〈x8,x2〉) nat1
-; quadruple … CLRB (MODE_FR1n o1) (Byte 〈x8,x3〉) nat1
-; quadruple … CLRB (MODE_FR0n o2) (Byte 〈x8,x4〉) nat1
-; quadruple … CLRB (MODE_FR1n o2) (Byte 〈x8,x5〉) nat1
-; quadruple … CLRB (MODE_FR0n o3) (Byte 〈x8,x6〉) nat1
-; quadruple … CLRB (MODE_FR1n o3) (Byte 〈x8,x7〉) nat1
-; quadruple … CLRB (MODE_FR0n o4) (Byte 〈x8,x8〉) nat1
-; quadruple … CLRB (MODE_FR1n o4) (Byte 〈x8,x9〉) nat1
-; quadruple … CLRB (MODE_FR0n o5) (Byte 〈x8,xA〉) nat1
-; quadruple … CLRB (MODE_FR1n o5) (Byte 〈x8,xB〉) nat1
-; quadruple … CLRB (MODE_FR0n o6) (Byte 〈x8,xC〉) nat1
-; quadruple … CLRB (MODE_FR1n o6) (Byte 〈x8,xD〉) nat1
-; quadruple … CLRB (MODE_FR0n o7) (Byte 〈x8,xE〉) nat1
-; quadruple … CLRB (MODE_FR1n o7) (Byte 〈x8,xF〉) nat1
-].
-
-ndefinition opcode_table_IP2022_8 ≝
-[
- quadruple … CMP MODE_W_and_FR0 (Byte 〈x0,x4〉) nat1
-; quadruple … CMP MODE_W_and_FR1 (Byte 〈x0,x5〉) nat1
-; quadruple … CMP MODE_IMM8 (Byte 〈x7,x9〉) nat1
-].
-
-ndefinition opcode_table_IP2022_9 ≝
-[
- quadruple … CSE MODE_W_and_FR0 (Byte 〈x4,x2〉) nat1
-; quadruple … CSE MODE_W_and_FR1 (Byte 〈x4,x3〉) nat1
-; quadruple … CSE MODE_IMM8 (Byte 〈x7,x7〉) nat1
-].
-
-ndefinition opcode_table_IP2022_10 ≝
-[
- quadruple … CSNE MODE_W_and_FR0 (Byte 〈x4,x0〉) nat1
-; quadruple … CSNE MODE_W_and_FR1 (Byte 〈x4,x1〉) nat1
-; quadruple … CSNE MODE_IMM8 (Byte 〈x7,x6〉) nat1
-].
-
-ndefinition opcode_table_IP2022_11 ≝
-[
- quadruple … DEC MODE_FR0_and_W (Byte 〈x0,xE〉) nat1
-; quadruple … DEC MODE_FR1_and_W (Byte 〈x0,xF〉) nat1
-; quadruple … DEC MODE_W_and_FR0 (Byte 〈x0,xC〉) nat1
-; quadruple … DEC MODE_W_and_FR1 (Byte 〈x0,xD〉) nat1
-].
-
-ndefinition opcode_table_IP2022_12 ≝
-[
- quadruple … DECSNZ MODE_FR0_and_W (Byte 〈x4,xE〉) nat1
-; quadruple … DECSNZ MODE_FR1_and_W (Byte 〈x4,xF〉) nat1
-; quadruple … DECSNZ MODE_W_and_FR0 (Byte 〈x4,xC〉) nat1
-; quadruple … DECSNZ MODE_W_and_FR1 (Byte 〈x4,xD〉) nat1
-].
-
-ndefinition opcode_table_IP2022_13 ≝
-[
- quadruple … DECSZ MODE_FR0_and_W (Byte 〈x2,xE〉) nat1
-; quadruple … DECSZ MODE_FR1_and_W (Byte 〈x2,xF〉) nat1
-; quadruple … DECSZ MODE_W_and_FR0 (Byte 〈x2,xC〉) nat1
-; quadruple … DECSZ MODE_W_and_FR1 (Byte 〈x2,xD〉) nat1
-].
-
-ndefinition opcode_table_IP2022_14 ≝
-[
- quadruple … INC MODE_FR0_and_W (Byte 〈x2,xA〉) nat1
-; quadruple … INC MODE_FR1_and_W (Byte 〈x2,xB〉) nat1
-; quadruple … INC MODE_W_and_FR0 (Byte 〈x2,x8〉) nat1
-; quadruple … INC MODE_W_and_FR1 (Byte 〈x2,x9〉) nat1
-].
-
-ndefinition opcode_table_IP2022_15 ≝
-[
- quadruple … INCSNZ MODE_FR0_and_W (Byte 〈x5,xA〉) nat1
-; quadruple … INCSNZ MODE_FR1_and_W (Byte 〈x5,xB〉) nat1
-; quadruple … INCSNZ MODE_W_and_FR0 (Byte 〈x5,x8〉) nat1
-; quadruple … INCSNZ MODE_W_and_FR1 (Byte 〈x5,x9〉) nat1
-].
-
-ndefinition opcode_table_IP2022_16 ≝
-[
- quadruple … INCSZ MODE_FR0_and_W (Byte 〈x3,xE〉) nat1
-; quadruple … INCSZ MODE_FR1_and_W (Byte 〈x3,xF〉) nat1
-; quadruple … INCSZ MODE_W_and_FR0 (Byte 〈x3,xC〉) nat1
-; quadruple … INCSZ MODE_W_and_FR1 (Byte 〈x3,xD〉) nat1
-].
-
-ndefinition opcode_table_IP2022_17 ≝
-[
- quadruple … JMP (MODE_IMM13 t00) (Byte 〈xE,x0〉) nat3
-; quadruple … JMP (MODE_IMM13 t01) (Byte 〈xE,x1〉) nat3
-; quadruple … JMP (MODE_IMM13 t02) (Byte 〈xE,x2〉) nat3
-; quadruple … JMP (MODE_IMM13 t03) (Byte 〈xE,x3〉) nat3
-; quadruple … JMP (MODE_IMM13 t04) (Byte 〈xE,x4〉) nat3
-; quadruple … JMP (MODE_IMM13 t05) (Byte 〈xE,x5〉) nat3
-; quadruple … JMP (MODE_IMM13 t06) (Byte 〈xE,x6〉) nat3
-; quadruple … JMP (MODE_IMM13 t07) (Byte 〈xE,x7〉) nat3
-; quadruple … JMP (MODE_IMM13 t08) (Byte 〈xE,x8〉) nat3
-; quadruple … JMP (MODE_IMM13 t09) (Byte 〈xE,x9〉) nat3
-; quadruple … JMP (MODE_IMM13 t0A) (Byte 〈xE,xA〉) nat3
-; quadruple … JMP (MODE_IMM13 t0B) (Byte 〈xE,xB〉) nat3
-; quadruple … JMP (MODE_IMM13 t0C) (Byte 〈xE,xC〉) nat3
-; quadruple … JMP (MODE_IMM13 t0D) (Byte 〈xE,xD〉) nat3
-; quadruple … JMP (MODE_IMM13 t0E) (Byte 〈xE,xE〉) nat3
-; quadruple … JMP (MODE_IMM13 t0F) (Byte 〈xE,xF〉) nat3
-; quadruple … JMP (MODE_IMM13 t10) (Byte 〈xF,x0〉) nat3
-; quadruple … JMP (MODE_IMM13 t11) (Byte 〈xF,x1〉) nat3
-; quadruple … JMP (MODE_IMM13 t12) (Byte 〈xF,x2〉) nat3
-; quadruple … JMP (MODE_IMM13 t13) (Byte 〈xF,x3〉) nat3
-; quadruple … JMP (MODE_IMM13 t14) (Byte 〈xF,x4〉) nat3
-; quadruple … JMP (MODE_IMM13 t15) (Byte 〈xF,x5〉) nat3
-; quadruple … JMP (MODE_IMM13 t16) (Byte 〈xF,x6〉) nat3
-; quadruple … JMP (MODE_IMM13 t17) (Byte 〈xF,x7〉) nat3
-; quadruple … JMP (MODE_IMM13 t18) (Byte 〈xF,x8〉) nat3
-; quadruple … JMP (MODE_IMM13 t19) (Byte 〈xF,x9〉) nat3
-; quadruple … JMP (MODE_IMM13 t1A) (Byte 〈xF,xA〉) nat3
-; quadruple … JMP (MODE_IMM13 t1B) (Byte 〈xF,xB〉) nat3
-; quadruple … JMP (MODE_IMM13 t1C) (Byte 〈xF,xC〉) nat3
-; quadruple … JMP (MODE_IMM13 t1D) (Byte 〈xF,xD〉) nat3
-; quadruple … JMP (MODE_IMM13 t1E) (Byte 〈xF,xE〉) nat3
-; quadruple … JMP (MODE_IMM13 t1F) (Byte 〈xF,xF〉) nat3
-].
-
-ndefinition opcode_table_IP2022_18 ≝
-[
- quadruple … LOADH MODE_IMM8 (Byte 〈x7,x0〉) nat1
-; quadruple … LOADL MODE_IMM8 (Byte 〈x7,x1〉) nat1
-].
-
-ndefinition opcode_table_IP2022_19 ≝
-[
- quadruple … MOV MODE_FR0_and_W (Byte 〈x0,x2〉) nat1
-; quadruple … MOV MODE_FR1_and_W (Byte 〈x0,x3〉) nat1
-; quadruple … MOV MODE_W_and_FR0 (Byte 〈x2,x0〉) nat1
-; quadruple … MOV MODE_W_and_FR1 (Byte 〈x2,x1〉) nat1
-; quadruple … MOV MODE_IMM8 (Byte 〈x7,xC〉) nat1
-].
-
-ndefinition opcode_table_IP2022_20 ≝
-[
- quadruple … MULS MODE_W_and_FR0 (Byte 〈x5,x4〉) nat1
-; quadruple … MULS MODE_W_and_FR1 (Byte 〈x5,x5〉) nat1
-; quadruple … MULS MODE_IMM8 (Byte 〈x7,x3〉) nat1
-].
-
-ndefinition opcode_table_IP2022_21 ≝
-[
- quadruple … MULU MODE_W_and_FR0 (Byte 〈x5,x0〉) nat1
-; quadruple … MULU MODE_W_and_FR1 (Byte 〈x5,x1〉) nat1
-; quadruple … MULU MODE_IMM8 (Byte 〈x7,x2〉) nat1
-].
-
-ndefinition opcode_table_IP2022_22 ≝
-[
- quadruple … NOT MODE_FR0_and_W (Byte 〈x2,x6〉) nat1
-; quadruple … NOT MODE_FR1_and_W (Byte 〈x2,x7〉) nat1
-; quadruple … NOT MODE_W_and_FR0 (Byte 〈x2,x4〉) nat1
-; quadruple … NOT MODE_W_and_FR1 (Byte 〈x2,x5〉) nat1
-].
-
-ndefinition opcode_table_IP2022_23 ≝
-[
- quadruple … OR MODE_FR0_and_W (Byte 〈x1,x2〉) nat1
-; quadruple … OR MODE_FR1_and_W (Byte 〈x1,x3〉) nat1
-; quadruple … OR MODE_W_and_FR0 (Byte 〈x1,x0〉) nat1
-; quadruple … OR MODE_W_and_FR1 (Byte 〈x1,x1〉) nat1
-; quadruple … OR MODE_IMM8 (Byte 〈x7,xD〉) nat1
-].
-
-ndefinition opcode_table_IP2022_24 ≝
-[
- quadruple … PAGE (MODE_IMM3 o0) (Word 〈〈x0,x0〉:〈x1,x0〉〉) nat1
-; quadruple … PAGE (MODE_IMM3 o1) (Word 〈〈x0,x0〉:〈x1,x1〉〉) nat1
-; quadruple … PAGE (MODE_IMM3 o2) (Word 〈〈x0,x0〉:〈x1,x2〉〉) nat1
-; quadruple … PAGE (MODE_IMM3 o3) (Word 〈〈x0,x0〉:〈x1,x3〉〉) nat1
-; quadruple … PAGE (MODE_IMM3 o4) (Word 〈〈x0,x0〉:〈x1,x4〉〉) nat1
-; quadruple … PAGE (MODE_IMM3 o5) (Word 〈〈x0,x0〉:〈x1,x5〉〉) nat1
-; quadruple … PAGE (MODE_IMM3 o6) (Word 〈〈x0,x0〉:〈x1,x6〉〉) nat1
-; quadruple … PAGE (MODE_IMM3 o7) (Word 〈〈x0,x0〉:〈x1,x7〉〉) nat1
-].
-
-ndefinition opcode_table_IP2022_25 ≝
-[
- quadruple … POP MODE_FR0_and_W (Byte 〈x4,x6〉) nat1
-; quadruple … POP MODE_FR1_and_W (Byte 〈x4,x7〉) nat1
-; quadruple … PUSH MODE_W_and_FR0 (Byte 〈x4,x4〉) nat1
-; quadruple … PUSH MODE_W_and_FR1 (Byte 〈x4,x5〉) nat1
-; quadruple … PUSH MODE_IMM8 (Byte 〈x7,x4〉) nat1
-].
-
-ndefinition opcode_table_IP2022_26 ≝
-[
- quadruple … RETI (MODE_IMM3 o0) (Word 〈〈x0,x0〉:〈x0,x8〉〉) nat3
-; quadruple … RETI (MODE_IMM3 o1) (Word 〈〈x0,x0〉:〈x0,x9〉〉) nat3
-; quadruple … RETI (MODE_IMM3 o2) (Word 〈〈x0,x0〉:〈x0,xA〉〉) nat3
-; quadruple … RETI (MODE_IMM3 o3) (Word 〈〈x0,x0〉:〈x0,xB〉〉) nat3
-; quadruple … RETI (MODE_IMM3 o4) (Word 〈〈x0,x0〉:〈x0,xC〉〉) nat3
-; quadruple … RETI (MODE_IMM3 o5) (Word 〈〈x0,x0〉:〈x0,xD〉〉) nat3
-; quadruple … RETI (MODE_IMM3 o6) (Word 〈〈x0,x0〉:〈x0,xE〉〉) nat3
-; quadruple … RETI (MODE_IMM3 o7) (Word 〈〈x0,x0〉:〈x0,xF〉〉) nat3
-].
-
-ndefinition opcode_table_IP2022_27 ≝
-[ quadruple … RETW MODE_IMM8 (Byte 〈x7,x8〉) nat3 ].
-
-ndefinition opcode_table_IP2022_28 ≝
-[
- quadruple … RL MODE_FR0_and_W (Byte 〈x3,x6〉) nat1
-; quadruple … RL MODE_FR1_and_W (Byte 〈x3,x7〉) nat1
-; quadruple … RL MODE_W_and_FR0 (Byte 〈x3,x4〉) nat1
-; quadruple … RL MODE_W_and_FR1 (Byte 〈x3,x5〉) nat1
-].
-
-ndefinition opcode_table_IP2022_29 ≝
-[
- quadruple … RR MODE_FR0_and_W (Byte 〈x3,x2〉) nat1
-; quadruple … RR MODE_FR1_and_W (Byte 〈x3,x3〉) nat1
-; quadruple … RR MODE_W_and_FR0 (Byte 〈x3,x0〉) nat1
-; quadruple … RR MODE_W_and_FR1 (Byte 〈x3,x1〉) nat1
-].
-
-ndefinition opcode_table_IP2022_30 ≝
-[
- quadruple … SB (MODE_FR0n o0) (Byte 〈xB,x0〉) nat1
-; quadruple … SB (MODE_FR1n o0) (Byte 〈xB,x1〉) nat1
-; quadruple … SB (MODE_FR0n o1) (Byte 〈xB,x2〉) nat1
-; quadruple … SB (MODE_FR1n o1) (Byte 〈xB,x3〉) nat1
-; quadruple … SB (MODE_FR0n o2) (Byte 〈xB,x4〉) nat1
-; quadruple … SB (MODE_FR1n o2) (Byte 〈xB,x5〉) nat1
-; quadruple … SB (MODE_FR0n o3) (Byte 〈xB,x6〉) nat1
-; quadruple … SB (MODE_FR1n o3) (Byte 〈xB,x7〉) nat1
-; quadruple … SB (MODE_FR0n o4) (Byte 〈xB,x8〉) nat1
-; quadruple … SB (MODE_FR1n o4) (Byte 〈xB,x9〉) nat1
-; quadruple … SB (MODE_FR0n o5) (Byte 〈xB,xA〉) nat1
-; quadruple … SB (MODE_FR1n o5) (Byte 〈xB,xB〉) nat1
-; quadruple … SB (MODE_FR0n o6) (Byte 〈xB,xC〉) nat1
-; quadruple … SB (MODE_FR1n o6) (Byte 〈xB,xD〉) nat1
-; quadruple … SB (MODE_FR0n o7) (Byte 〈xB,xE〉) nat1
-; quadruple … SB (MODE_FR1n o7) (Byte 〈xB,xF〉) nat1
-].
-
-ndefinition opcode_table_IP2022_31 ≝
-[
- quadruple … SETB (MODE_FR0n o0) (Byte 〈x9,x0〉) nat1
-; quadruple … SETB (MODE_FR1n o0) (Byte 〈x9,x1〉) nat1
-; quadruple … SETB (MODE_FR0n o1) (Byte 〈x9,x2〉) nat1
-; quadruple … SETB (MODE_FR1n o1) (Byte 〈x9,x3〉) nat1
-; quadruple … SETB (MODE_FR0n o2) (Byte 〈x9,x4〉) nat1
-; quadruple … SETB (MODE_FR1n o2) (Byte 〈x9,x5〉) nat1
-; quadruple … SETB (MODE_FR0n o3) (Byte 〈x9,x6〉) nat1
-; quadruple … SETB (MODE_FR1n o3) (Byte 〈x9,x7〉) nat1
-; quadruple … SETB (MODE_FR0n o4) (Byte 〈x9,x8〉) nat1
-; quadruple … SETB (MODE_FR1n o4) (Byte 〈x9,x9〉) nat1
-; quadruple … SETB (MODE_FR0n o5) (Byte 〈x9,xA〉) nat1
-; quadruple … SETB (MODE_FR1n o5) (Byte 〈x9,xB〉) nat1
-; quadruple … SETB (MODE_FR0n o6) (Byte 〈x9,xC〉) nat1
-; quadruple … SETB (MODE_FR1n o6) (Byte 〈x9,xD〉) nat1
-; quadruple … SETB (MODE_FR0n o7) (Byte 〈x9,xE〉) nat1
-; quadruple … SETB (MODE_FR1n o7) (Byte 〈x9,xF〉) nat1
-].
-
-ndefinition opcode_table_IP2022_32 ≝
-[
- quadruple … SNB (MODE_FR0n o0) (Byte 〈xA,x0〉) nat1
-; quadruple … SNB (MODE_FR1n o0) (Byte 〈xA,x1〉) nat1
-; quadruple … SNB (MODE_FR0n o1) (Byte 〈xA,x2〉) nat1
-; quadruple … SNB (MODE_FR1n o1) (Byte 〈xA,x3〉) nat1
-; quadruple … SNB (MODE_FR0n o2) (Byte 〈xA,x4〉) nat1
-; quadruple … SNB (MODE_FR1n o2) (Byte 〈xA,x5〉) nat1
-; quadruple … SNB (MODE_FR0n o3) (Byte 〈xA,x6〉) nat1
-; quadruple … SNB (MODE_FR1n o3) (Byte 〈xA,x7〉) nat1
-; quadruple … SNB (MODE_FR0n o4) (Byte 〈xA,x8〉) nat1
-; quadruple … SNB (MODE_FR1n o4) (Byte 〈xA,x9〉) nat1
-; quadruple … SNB (MODE_FR0n o5) (Byte 〈xA,xA〉) nat1
-; quadruple … SNB (MODE_FR1n o5) (Byte 〈xA,xB〉) nat1
-; quadruple … SNB (MODE_FR0n o6) (Byte 〈xA,xC〉) nat1
-; quadruple … SNB (MODE_FR1n o6) (Byte 〈xA,xD〉) nat1
-; quadruple … SNB (MODE_FR0n o7) (Byte 〈xA,xE〉) nat1
-; quadruple … SNB (MODE_FR1n o7) (Byte 〈xA,xF〉) nat1
-].
-
-ndefinition opcode_table_IP2022_33 ≝
-[ quadruple … SPEED MODE_IMM8 (Byte 〈x0,x1〉) nat1 ].
-
-ndefinition opcode_table_IP2022_34 ≝
-[
- quadruple … SUB MODE_FR0_and_W (Byte 〈x0,xA〉) nat1
-; quadruple … SUB MODE_FR1_and_W (Byte 〈x0,xB〉) nat1
-; quadruple … SUB MODE_W_and_FR0 (Byte 〈x0,x8〉) nat1
-; quadruple … SUB MODE_W_and_FR1 (Byte 〈x0,x9〉) nat1
-; quadruple … SUB MODE_IMM8 (Byte 〈x7,xA〉) nat1
-].
-
-ndefinition opcode_table_IP2022_35 ≝
-[
- quadruple … SUBC MODE_FR0_and_W (Byte 〈x4,xA〉) nat1
-; quadruple … SUBC MODE_FR1_and_W (Byte 〈x4,xB〉) nat1
-; quadruple … SUBC MODE_W_and_FR0 (Byte 〈x4,x8〉) nat1
-; quadruple … SUBC MODE_W_and_FR1 (Byte 〈x4,x9〉) nat1
-].
-
-ndefinition opcode_table_IP2022_36 ≝
-[
- quadruple … SWAP MODE_FR0_and_W (Byte 〈x3,xA〉) nat1
-; quadruple … SWAP MODE_FR1_and_W (Byte 〈x3,xB〉) nat1
-; quadruple … SWAP MODE_W_and_FR0 (Byte 〈x3,x8〉) nat1
-; quadruple … SWAP MODE_W_and_FR1 (Byte 〈x3,x9〉) nat1
-].
-
-ndefinition opcode_table_IP2022_37 ≝
-[
- quadruple … TEST MODE_FR0_and_W (Byte 〈x2,x2〉) nat1
-; quadruple … TEST MODE_FR1_and_W (Byte 〈x2,x3〉) nat1
-].
-
-ndefinition opcode_table_IP2022_38 ≝
-[
- quadruple … XOR MODE_FR0_and_W (Byte 〈x1,xA〉) nat1
-; quadruple … XOR MODE_FR1_and_W (Byte 〈x1,xB〉) nat1
-; quadruple … XOR MODE_W_and_FR0 (Byte 〈x1,x8〉) nat1
-; quadruple … XOR MODE_W_and_FR1 (Byte 〈x1,x9〉) nat1
-; quadruple … XOR MODE_IMM8 (Byte 〈x7,xF〉) nat1
-].
-
-ndefinition opcode_table_IP2022 ≝
- opcode_table_IP2022_1 @ opcode_table_IP2022_2 @ opcode_table_IP2022_3 @ opcode_table_IP2022_4 @
- opcode_table_IP2022_5 @ opcode_table_IP2022_6 @ opcode_table_IP2022_7 @ opcode_table_IP2022_8 @
- opcode_table_IP2022_9 @ opcode_table_IP2022_10 @ opcode_table_IP2022_11 @ opcode_table_IP2022_12 @
- opcode_table_IP2022_13 @ opcode_table_IP2022_14 @ opcode_table_IP2022_15 @ opcode_table_IP2022_16 @
- opcode_table_IP2022_17 @ opcode_table_IP2022_18 @ opcode_table_IP2022_19 @ opcode_table_IP2022_20 @
- opcode_table_IP2022_21 @ opcode_table_IP2022_22 @ opcode_table_IP2022_23 @ opcode_table_IP2022_24 @
- opcode_table_IP2022_25 @ opcode_table_IP2022_26 @ opcode_table_IP2022_27 @ opcode_table_IP2022_28 @
- opcode_table_IP2022_29 @ opcode_table_IP2022_30 @ opcode_table_IP2022_31 @ opcode_table_IP2022_32 @
- opcode_table_IP2022_33 @ opcode_table_IP2022_34 @ opcode_table_IP2022_35 @ opcode_table_IP2022_36 @
- opcode_table_IP2022_37 @ opcode_table_IP2022_38.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/pseudo.ma".
-include "emulator/opcodes/IP2022_table.ma".
-
-(* ******************* *)
-(* TABELLA DELL'IP2022 *)
-(* ******************* *)
-
-(* IP2022: opcode non implementati come da manuale (byte) *)
-ndefinition IP2022_not_impl_byte ≝
- [〈x0,x0〉;〈x5,x2〉;〈x5,x3〉;〈x5,x6〉;〈x5,x7〉;〈x6,x0〉;〈x6,x1〉;〈x6,x2〉
- ;〈x6,x3〉;〈x6,x4〉;〈x6,x5〉;〈x6,x6〉;〈x6,x7〉;〈x6,x8〉;〈x6,x9〉;〈x6,xA〉
- ;〈x6,xB〉;〈x6,xC〉;〈x6,xD〉;〈x6,xE〉;〈x6,xF〉;〈x7,x5〉 ].
-
-(*nlemma ok_byte_table_IP2022 : forallc ? (λb.
- (test_not_impl_byte b IP2022_not_impl_byte ⊙ eqc ? (get_byte_count IP2022 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_IP2022) 〈〈x0,x0〉:〈x0,x1〉〉) ⊗
- (⊖ (test_not_impl_byte b IP2022_not_impl_byte) ⊙ eqc ? (get_byte_count IP2022 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_IP2022) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.*)
-
-(* IP2022: opcode non implementati come da manuale (0x00+byte) *)
-ndefinition IP2022_not_impl_word ≝
- [〈x1,xE〉;〈x1,xF〉
- ;〈x2,x0〉;〈x2,x1〉;〈x2,x2〉;〈x2,x3〉;〈x2,x4〉;〈x2,x5〉;〈x2,x6〉;〈x2,x7〉
- ;〈x2,x8〉;〈x2,x9〉;〈x2,xA〉;〈x2,xB〉;〈x2,xC〉;〈x2,xD〉;〈x2,xE〉;〈x2,xF〉
- ;〈x3,x0〉;〈x3,x1〉;〈x3,x2〉;〈x3,x3〉;〈x3,x4〉;〈x3,x5〉;〈x3,x6〉;〈x3,x7〉
- ;〈x3,x8〉;〈x3,x9〉;〈x3,xA〉;〈x3,xB〉;〈x3,xC〉;〈x3,xD〉;〈x3,xE〉;〈x3,xF〉
- ;〈x4,x0〉;〈x4,x1〉;〈x4,x2〉;〈x4,x3〉;〈x4,x4〉;〈x4,x5〉;〈x4,x6〉;〈x4,x7〉
- ;〈x4,x8〉;〈x4,x9〉;〈x4,xA〉;〈x4,xB〉;〈x4,xC〉;〈x4,xD〉;〈x4,xE〉;〈x4,xF〉
- ;〈x5,x0〉;〈x5,x1〉;〈x5,x2〉;〈x5,x3〉;〈x5,x4〉;〈x5,x5〉;〈x5,x6〉;〈x5,x7〉
- ;〈x5,x8〉;〈x5,x9〉;〈x5,xA〉;〈x5,xB〉;〈x5,xC〉;〈x5,xD〉;〈x5,xE〉;〈x5,xF〉
- ;〈x6,x0〉;〈x6,x1〉;〈x6,x2〉;〈x6,x3〉;〈x6,x4〉;〈x6,x5〉;〈x6,x6〉;〈x6,x7〉
- ;〈x6,x8〉;〈x6,x9〉;〈x6,xA〉;〈x6,xB〉;〈x6,xC〉;〈x6,xD〉;〈x6,xE〉;〈x6,xF〉
- ;〈x7,x0〉;〈x7,x1〉;〈x7,x2〉;〈x7,x3〉;〈x7,x4〉;〈x7,x5〉;〈x7,x6〉;〈x7,x7〉
- ;〈x7,x8〉;〈x7,x9〉;〈x7,xA〉;〈x7,xB〉;〈x7,xC〉;〈x7,xD〉;〈x7,xE〉;〈x7,xF〉
- ;〈x8,x0〉;〈x8,x1〉;〈x8,x2〉;〈x8,x3〉;〈x8,x4〉;〈x8,x5〉;〈x8,x6〉;〈x8,x7〉
- ;〈x8,x8〉;〈x8,x9〉;〈x8,xA〉;〈x8,xB〉;〈x8,xC〉;〈x8,xD〉;〈x8,xE〉;〈x8,xF〉
- ;〈x9,x0〉;〈x9,x1〉;〈x9,x2〉;〈x9,x3〉;〈x9,x4〉;〈x9,x5〉;〈x9,x6〉;〈x9,x7〉
- ;〈x9,x8〉;〈x9,x9〉;〈x9,xA〉;〈x9,xB〉;〈x9,xC〉;〈x9,xD〉;〈x9,xE〉;〈x9,xF〉
- ;〈xA,x0〉;〈xA,x1〉;〈xA,x2〉;〈xA,x3〉;〈xA,x4〉;〈xA,x5〉;〈xA,x6〉;〈xA,x7〉
- ;〈xA,x8〉;〈xA,x9〉;〈xA,xA〉;〈xA,xB〉;〈xA,xC〉;〈xA,xD〉;〈xA,xE〉;〈xA,xF〉
- ;〈xB,x0〉;〈xB,x1〉;〈xB,x2〉;〈xB,x3〉;〈xB,x4〉;〈xB,x5〉;〈xB,x6〉;〈xB,x7〉
- ;〈xB,x8〉;〈xB,x9〉;〈xB,xA〉;〈xB,xB〉;〈xB,xC〉;〈xB,xD〉;〈xB,xE〉;〈xB,xF〉
- ;〈xC,x0〉;〈xC,x1〉;〈xC,x2〉;〈xC,x3〉;〈xC,x4〉;〈xC,x5〉;〈xC,x6〉;〈xC,x7〉
- ;〈xC,x8〉;〈xC,x9〉;〈xC,xA〉;〈xC,xB〉;〈xC,xC〉;〈xC,xD〉;〈xC,xE〉;〈xC,xF〉
- ;〈xD,x0〉;〈xD,x1〉;〈xD,x2〉;〈xD,x3〉;〈xD,x4〉;〈xD,x5〉;〈xD,x6〉;〈xD,x7〉
- ;〈xD,x8〉;〈xD,x9〉;〈xD,xA〉;〈xD,xB〉;〈xD,xC〉;〈xD,xD〉;〈xD,xE〉;〈xD,xF〉
- ;〈xE,x0〉;〈xE,x1〉;〈xE,x2〉;〈xE,x3〉;〈xE,x4〉;〈xE,x5〉;〈xE,x6〉;〈xE,x7〉
- ;〈xE,x8〉;〈xE,x9〉;〈xE,xA〉;〈xE,xB〉;〈xE,xC〉;〈xE,xD〉;〈xE,xE〉;〈xE,xF〉
- ;〈xF,x0〉;〈xF,x1〉;〈xF,x2〉;〈xF,x3〉;〈xF,x4〉;〈xF,x5〉;〈xF,x6〉;〈xF,x7〉
- ;〈xF,x8〉;〈xF,x9〉;〈xF,xA〉;〈xF,xB〉;〈xF,xC〉;〈xF,xD〉;〈xF,xE〉;〈xF,xF〉
- ].
-
-nlemma ok_word_table_IP2022 : forallc ? (λb.
- (test_not_impl_byte b IP2022_not_impl_word ⊙ eqc ? (get_word_count IP2022 〈〈x0,x0〉:b〉 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_IP2022) 〈〈x0,x0〉:〈x0,x1〉〉) ⊗
- (⊖ (test_not_impl_byte b IP2022_not_impl_word) ⊙ eqc ? (get_word_count IP2022 〈〈x0,x0〉:b〉 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_IP2022) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* tutti gli pseudo implementati *)
-nlemma ok_pseudo_table_IP2022 :
- forallc ? (λo.
- lec ? 〈〈x0,x0〉:〈x0,x1〉〉 (get_pseudo_count IP2022 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_IP2022)) = true.
- napply refl_eq.
-nqed.
-
-(* tutte le modalita' implementate *)
-nlemma ok_mode_table_IP2022 :
- forallc ? (λi.
- lec ? 〈〈x0,x0〉:〈x0,x1〉〉 (get_mode_count IP2022 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_IP2022)) = true.
- napply refl_eq.
-nqed.
-
-nlemma ok_PsIm_table_IP2022 :
- forallc ? (λi.
- forallc ? (λps.
- lec ? (get_PsIm_count IP2022 ps i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_IP2022) 〈〈x0,x0〉:〈x0,x1〉〉)) = true.
- napply refl_eq.
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/Freescale_pseudo.ma".
-include "emulator/opcodes/Freescale_instr_mode.ma".
-include "emulator/opcodes/byte_or_word.ma".
-include "common/list.ma".
-
-(* ***************** *)
-(* TABELLA DELL'RS08 *)
-(* ***************** *)
-
-(* definizione come concatenazione finale di liste per velocizzare il parsing *)
-(* ogni riga e' [pseudo] [modalita' indirizzamento] [opcode esadecimale] [#cicli esecuzione] *)
-
-ndefinition opcode_table_RS08_1 ≝
-[
- quadruple … ADC MODE_IMM1 (Byte 〈xA,x9〉) nat2
-; quadruple … ADC MODE_DIR1 (Byte 〈xB,x9〉) nat3
-].
-
-ndefinition opcode_table_RS08_2 ≝
-[
- quadruple … ADD MODE_IMM1 (Byte 〈xA,xB〉) nat2
-; quadruple … ADD MODE_DIR1 (Byte 〈xB,xB〉) nat3
-; quadruple … ADD (MODE_TNY x0) (Byte 〈x6,x0〉) nat3
-; quadruple … ADD (MODE_TNY x1) (Byte 〈x6,x1〉) nat3
-; quadruple … ADD (MODE_TNY x2) (Byte 〈x6,x2〉) nat3
-; quadruple … ADD (MODE_TNY x3) (Byte 〈x6,x3〉) nat3
-; quadruple … ADD (MODE_TNY x4) (Byte 〈x6,x4〉) nat3
-; quadruple … ADD (MODE_TNY x5) (Byte 〈x6,x5〉) nat3
-; quadruple … ADD (MODE_TNY x6) (Byte 〈x6,x6〉) nat3
-; quadruple … ADD (MODE_TNY x7) (Byte 〈x6,x7〉) nat3
-; quadruple … ADD (MODE_TNY x8) (Byte 〈x6,x8〉) nat3
-; quadruple … ADD (MODE_TNY x9) (Byte 〈x6,x9〉) nat3
-; quadruple … ADD (MODE_TNY xA) (Byte 〈x6,xA〉) nat3
-; quadruple … ADD (MODE_TNY xB) (Byte 〈x6,xB〉) nat3
-; quadruple … ADD (MODE_TNY xC) (Byte 〈x6,xC〉) nat3
-; quadruple … ADD (MODE_TNY xD) (Byte 〈x6,xD〉) nat3
-; quadruple … ADD (MODE_TNY xE) (Byte 〈x6,xE〉) nat3
-; quadruple … ADD (MODE_TNY xF) (Byte 〈x6,xF〉) nat3
-].
-
-ndefinition opcode_table_RS08_3 ≝
-[
- quadruple … AND MODE_IMM1 (Byte 〈xA,x4〉) nat2
-; quadruple … AND MODE_DIR1 (Byte 〈xB,x4〉) nat3
-].
-
-ndefinition opcode_table_RS08_4 ≝
-[
- quadruple … ASL MODE_INHA (Byte 〈x4,x8〉) nat1
-].
-
-ndefinition opcode_table_RS08_5 ≝
-[
- quadruple … BRA MODE_IMM1 (Byte 〈x3,x0〉) nat3
-; quadruple … BCC MODE_IMM1 (Byte 〈x3,x4〉) nat3
-; quadruple … BCS MODE_IMM1 (Byte 〈x3,x5〉) nat3
-; quadruple … BNE MODE_IMM1 (Byte 〈x3,x6〉) nat3
-; quadruple … BEQ MODE_IMM1 (Byte 〈x3,x7〉) nat3
-].
-
-ndefinition opcode_table_RS08_6 ≝
-[
- quadruple … BSETn (MODE_DIRn o0) (Byte 〈x1,x0〉) nat5
-; quadruple … BCLRn (MODE_DIRn o0) (Byte 〈x1,x1〉) nat5
-; quadruple … BSETn (MODE_DIRn o1) (Byte 〈x1,x2〉) nat5
-; quadruple … BCLRn (MODE_DIRn o1) (Byte 〈x1,x3〉) nat5
-; quadruple … BSETn (MODE_DIRn o2) (Byte 〈x1,x4〉) nat5
-; quadruple … BCLRn (MODE_DIRn o2) (Byte 〈x1,x5〉) nat5
-; quadruple … BSETn (MODE_DIRn o3) (Byte 〈x1,x6〉) nat5
-; quadruple … BCLRn (MODE_DIRn o3) (Byte 〈x1,x7〉) nat5
-; quadruple … BSETn (MODE_DIRn o4) (Byte 〈x1,x8〉) nat5
-; quadruple … BCLRn (MODE_DIRn o4) (Byte 〈x1,x9〉) nat5
-; quadruple … BSETn (MODE_DIRn o5) (Byte 〈x1,xA〉) nat5
-; quadruple … BCLRn (MODE_DIRn o5) (Byte 〈x1,xB〉) nat5
-; quadruple … BSETn (MODE_DIRn o6) (Byte 〈x1,xC〉) nat5
-; quadruple … BCLRn (MODE_DIRn o6) (Byte 〈x1,xD〉) nat5
-; quadruple … BSETn (MODE_DIRn o7) (Byte 〈x1,xE〉) nat5
-; quadruple … BCLRn (MODE_DIRn o7) (Byte 〈x1,xF〉) nat5
-].
-
-ndefinition opcode_table_RS08_7 ≝
-[
- quadruple … BRSETn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x0〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o0) (Byte 〈x0,x1〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x2〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o1) (Byte 〈x0,x3〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x4〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o2) (Byte 〈x0,x5〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x6〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o3) (Byte 〈x0,x7〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x8〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o4) (Byte 〈x0,x9〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xA〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o5) (Byte 〈x0,xB〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xC〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o6) (Byte 〈x0,xD〉) nat5
-; quadruple … BRSETn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xE〉) nat5
-; quadruple … BRCLRn (MODE_DIRn_and_IMM1 o7) (Byte 〈x0,xF〉) nat5
-].
-
-ndefinition opcode_table_RS08_8 ≝
-[
- quadruple … CLC MODE_INH (Byte 〈x3,x8〉) nat1
-; quadruple … SEC MODE_INH (Byte 〈x3,x9〉) nat1
-; quadruple … SLA MODE_INH (Byte 〈x4,x2〉) nat1
-; quadruple … SHA MODE_INH (Byte 〈x4,x5〉) nat1
-; quadruple … NOP MODE_INH (Byte 〈xA,xC〉) nat1
-; quadruple … STOP MODE_INH (Byte 〈xA,xE〉) nat2
-; quadruple … WAIT MODE_INH (Byte 〈xA,xF〉) nat2
-; quadruple … RTS MODE_INH (Byte 〈xB,xE〉) nat3
-; quadruple … BGND MODE_INH (Byte 〈xB,xF〉) nat5
-].
-
-ndefinition opcode_table_RS08_9 ≝
-[
- quadruple … CBEQA MODE_DIR1_and_IMM1 (Byte 〈x3,x1〉) nat5
-; quadruple … CBEQA MODE_IMM1_and_IMM1 (Byte 〈x4,x1〉) nat4
-].
-
-ndefinition opcode_table_RS08_10 ≝
-[
- quadruple … CLR MODE_DIR1 (Byte 〈x3,xF〉) nat3
-; quadruple … CLR MODE_INHA (Byte 〈x4,xF〉) nat1
-; quadruple … CLR (MODE_SRT t00) (Byte 〈x8,x0〉) nat2
-; quadruple … CLR (MODE_SRT t01) (Byte 〈x8,x1〉) nat2
-; quadruple … CLR (MODE_SRT t02) (Byte 〈x8,x2〉) nat2
-; quadruple … CLR (MODE_SRT t03) (Byte 〈x8,x3〉) nat2
-; quadruple … CLR (MODE_SRT t04) (Byte 〈x8,x4〉) nat2
-; quadruple … CLR (MODE_SRT t05) (Byte 〈x8,x5〉) nat2
-; quadruple … CLR (MODE_SRT t06) (Byte 〈x8,x6〉) nat2
-; quadruple … CLR (MODE_SRT t07) (Byte 〈x8,x7〉) nat2
-; quadruple … CLR (MODE_SRT t08) (Byte 〈x8,x8〉) nat2
-; quadruple … CLR (MODE_SRT t09) (Byte 〈x8,x9〉) nat2
-; quadruple … CLR (MODE_SRT t0A) (Byte 〈x8,xA〉) nat2
-; quadruple … CLR (MODE_SRT t0B) (Byte 〈x8,xB〉) nat2
-; quadruple … CLR (MODE_SRT t0C) (Byte 〈x8,xC〉) nat2
-; quadruple … CLR (MODE_SRT t0D) (Byte 〈x8,xD〉) nat2
-; quadruple … CLR (MODE_SRT t0E) (Byte 〈x8,xE〉) nat2
-; quadruple … CLR (MODE_SRT t0F) (Byte 〈x8,xF〉) nat2
-; quadruple … CLR (MODE_SRT t10) (Byte 〈x9,x0〉) nat2
-; quadruple … CLR (MODE_SRT t11) (Byte 〈x9,x1〉) nat2
-; quadruple … CLR (MODE_SRT t12) (Byte 〈x9,x2〉) nat2
-; quadruple … CLR (MODE_SRT t13) (Byte 〈x9,x3〉) nat2
-; quadruple … CLR (MODE_SRT t14) (Byte 〈x9,x4〉) nat2
-; quadruple … CLR (MODE_SRT t15) (Byte 〈x9,x5〉) nat2
-; quadruple … CLR (MODE_SRT t16) (Byte 〈x9,x6〉) nat2
-; quadruple … CLR (MODE_SRT t17) (Byte 〈x9,x7〉) nat2
-; quadruple … CLR (MODE_SRT t18) (Byte 〈x9,x8〉) nat2
-; quadruple … CLR (MODE_SRT t19) (Byte 〈x9,x9〉) nat2
-; quadruple … CLR (MODE_SRT t1A) (Byte 〈x9,xA〉) nat2
-; quadruple … CLR (MODE_SRT t1B) (Byte 〈x9,xB〉) nat2
-; quadruple … CLR (MODE_SRT t1C) (Byte 〈x9,xC〉) nat2
-; quadruple … CLR (MODE_SRT t1D) (Byte 〈x9,xD〉) nat2
-; quadruple … CLR (MODE_SRT t1E) (Byte 〈x9,xE〉) nat2
-; quadruple … CLR (MODE_SRT t1F) (Byte 〈x9,xF〉) nat2
-].
-
-ndefinition opcode_table_RS08_11 ≝
-[
- quadruple … CMP MODE_IMM1 (Byte 〈xA,x1〉) nat2
-; quadruple … CMP MODE_DIR1 (Byte 〈xB,x1〉) nat3
-].
-
-ndefinition opcode_table_RS08_12 ≝
-[
- quadruple … COM MODE_INHA (Byte 〈x4,x3〉) nat1
-].
-
-ndefinition opcode_table_RS08_13 ≝
-[
- quadruple … DBNZ MODE_DIR1_and_IMM1 (Byte 〈x3,xB〉) nat7
-; quadruple … DBNZ MODE_INHA_and_IMM1 (Byte 〈x4,xB〉) nat4
-].
-
-ndefinition opcode_table_RS08_14 ≝
-[
- quadruple … DEC MODE_DIR1 (Byte 〈x3,xA〉) nat5
-; quadruple … DEC MODE_INHA (Byte 〈x4,xA〉) nat1
-; quadruple … DEC (MODE_TNY x0) (Byte 〈x5,x0〉) nat4
-; quadruple … DEC (MODE_TNY x1) (Byte 〈x5,x1〉) nat4
-; quadruple … DEC (MODE_TNY x2) (Byte 〈x5,x2〉) nat4
-; quadruple … DEC (MODE_TNY x3) (Byte 〈x5,x3〉) nat4
-; quadruple … DEC (MODE_TNY x4) (Byte 〈x5,x4〉) nat4
-; quadruple … DEC (MODE_TNY x5) (Byte 〈x5,x5〉) nat4
-; quadruple … DEC (MODE_TNY x6) (Byte 〈x5,x6〉) nat4
-; quadruple … DEC (MODE_TNY x7) (Byte 〈x5,x7〉) nat4
-; quadruple … DEC (MODE_TNY x8) (Byte 〈x5,x8〉) nat4
-; quadruple … DEC (MODE_TNY x9) (Byte 〈x5,x9〉) nat4
-; quadruple … DEC (MODE_TNY xA) (Byte 〈x5,xA〉) nat4
-; quadruple … DEC (MODE_TNY xB) (Byte 〈x5,xB〉) nat4
-; quadruple … DEC (MODE_TNY xC) (Byte 〈x5,xC〉) nat4
-; quadruple … DEC (MODE_TNY xD) (Byte 〈x5,xD〉) nat4
-; quadruple … DEC (MODE_TNY xE) (Byte 〈x5,xE〉) nat4
-; quadruple … DEC (MODE_TNY xF) (Byte 〈x5,xF〉) nat4
-].
-
-ndefinition opcode_table_RS08_15 ≝
-[
- quadruple … EOR MODE_IMM1 (Byte 〈xA,x8〉) nat2
-; quadruple … EOR MODE_DIR1 (Byte 〈xB,x8〉) nat3
-].
-
-ndefinition opcode_table_RS08_16 ≝
-[
- quadruple … INC MODE_DIR1 (Byte 〈x3,xC〉) nat5
-; quadruple … INC MODE_INHA (Byte 〈x4,xC〉) nat1
-; quadruple … INC (MODE_TNY x0) (Byte 〈x2,x0〉) nat4
-; quadruple … INC (MODE_TNY x1) (Byte 〈x2,x1〉) nat4
-; quadruple … INC (MODE_TNY x2) (Byte 〈x2,x2〉) nat4
-; quadruple … INC (MODE_TNY x3) (Byte 〈x2,x3〉) nat4
-; quadruple … INC (MODE_TNY x4) (Byte 〈x2,x4〉) nat4
-; quadruple … INC (MODE_TNY x5) (Byte 〈x2,x5〉) nat4
-; quadruple … INC (MODE_TNY x6) (Byte 〈x2,x6〉) nat4
-; quadruple … INC (MODE_TNY x7) (Byte 〈x2,x7〉) nat4
-; quadruple … INC (MODE_TNY x8) (Byte 〈x2,x8〉) nat4
-; quadruple … INC (MODE_TNY x9) (Byte 〈x2,x9〉) nat4
-; quadruple … INC (MODE_TNY xA) (Byte 〈x2,xA〉) nat4
-; quadruple … INC (MODE_TNY xB) (Byte 〈x2,xB〉) nat4
-; quadruple … INC (MODE_TNY xC) (Byte 〈x2,xC〉) nat4
-; quadruple … INC (MODE_TNY xD) (Byte 〈x2,xD〉) nat4
-; quadruple … INC (MODE_TNY xE) (Byte 〈x2,xE〉) nat4
-; quadruple … INC (MODE_TNY xF) (Byte 〈x2,xF〉) nat4
-].
-
-ndefinition opcode_table_RS08_17 ≝
-[
- quadruple … JMP MODE_IMM2 (Byte 〈xB,xC〉) nat4
-].
-
-ndefinition opcode_table_RS08_18 ≝
-[
- quadruple … BSR MODE_IMM1 (Byte 〈xA,xD〉) nat3
-; quadruple … JSR MODE_IMM2 (Byte 〈xB,xD〉) nat4
-].
-
-ndefinition opcode_table_RS08_19 ≝
-[
- quadruple … LDA MODE_IMM1 (Byte 〈xA,x6〉) nat2
-; quadruple … LDA MODE_DIR1 (Byte 〈xB,x6〉) nat3
-; quadruple … LDA (MODE_SRT t00) (Byte 〈xC,x0〉) nat3
-; quadruple … LDA (MODE_SRT t01) (Byte 〈xC,x1〉) nat3
-; quadruple … LDA (MODE_SRT t02) (Byte 〈xC,x2〉) nat3
-; quadruple … LDA (MODE_SRT t03) (Byte 〈xC,x3〉) nat3
-; quadruple … LDA (MODE_SRT t04) (Byte 〈xC,x4〉) nat3
-; quadruple … LDA (MODE_SRT t05) (Byte 〈xC,x5〉) nat3
-; quadruple … LDA (MODE_SRT t06) (Byte 〈xC,x6〉) nat3
-; quadruple … LDA (MODE_SRT t07) (Byte 〈xC,x7〉) nat3
-; quadruple … LDA (MODE_SRT t08) (Byte 〈xC,x8〉) nat3
-; quadruple … LDA (MODE_SRT t09) (Byte 〈xC,x9〉) nat3
-; quadruple … LDA (MODE_SRT t0A) (Byte 〈xC,xA〉) nat3
-; quadruple … LDA (MODE_SRT t0B) (Byte 〈xC,xB〉) nat3
-; quadruple … LDA (MODE_SRT t0C) (Byte 〈xC,xC〉) nat3
-; quadruple … LDA (MODE_SRT t0D) (Byte 〈xC,xD〉) nat3
-; quadruple … LDA (MODE_SRT t0E) (Byte 〈xC,xE〉) nat3
-; quadruple … LDA (MODE_SRT t0F) (Byte 〈xC,xF〉) nat3
-; quadruple … LDA (MODE_SRT t10) (Byte 〈xD,x0〉) nat3
-; quadruple … LDA (MODE_SRT t11) (Byte 〈xD,x1〉) nat3
-; quadruple … LDA (MODE_SRT t12) (Byte 〈xD,x2〉) nat3
-; quadruple … LDA (MODE_SRT t13) (Byte 〈xD,x3〉) nat3
-; quadruple … LDA (MODE_SRT t14) (Byte 〈xD,x4〉) nat3
-; quadruple … LDA (MODE_SRT t15) (Byte 〈xD,x5〉) nat3
-; quadruple … LDA (MODE_SRT t16) (Byte 〈xD,x6〉) nat3
-; quadruple … LDA (MODE_SRT t17) (Byte 〈xD,x7〉) nat3
-; quadruple … LDA (MODE_SRT t18) (Byte 〈xD,x8〉) nat3
-; quadruple … LDA (MODE_SRT t19) (Byte 〈xD,x9〉) nat3
-; quadruple … LDA (MODE_SRT t1A) (Byte 〈xD,xA〉) nat3
-; quadruple … LDA (MODE_SRT t1B) (Byte 〈xD,xB〉) nat3
-; quadruple … LDA (MODE_SRT t1C) (Byte 〈xD,xC〉) nat3
-; quadruple … LDA (MODE_SRT t1D) (Byte 〈xD,xD〉) nat3
-; quadruple … LDA (MODE_SRT t1E) (Byte 〈xD,xE〉) nat3
-; quadruple … LDA (MODE_SRT t1F) (Byte 〈xD,xF〉) nat3
-].
-
-ndefinition opcode_table_RS08_20 ≝
-[
- quadruple … LSR MODE_INHA (Byte 〈x4,x4〉) nat1
-].
-
-ndefinition opcode_table_RS08_21 ≝
-[
- quadruple … MOV MODE_IMM1_to_DIR1 (Byte 〈x3,xE〉) nat4
-; quadruple … MOV MODE_DIR1_to_DIR1 (Byte 〈x4,xE〉) nat5
-].
-
-ndefinition opcode_table_RS08_22 ≝
-[
- quadruple … ORA MODE_IMM1 (Byte 〈xA,xA〉) nat2
-; quadruple … ORA MODE_DIR1 (Byte 〈xB,xA〉) nat3
-].
-
-ndefinition opcode_table_RS08_23 ≝
-[
- quadruple … ROL MODE_INHA (Byte 〈x4,x9〉) nat1
-].
-
-ndefinition opcode_table_RS08_24 ≝
-[
- quadruple … ROR MODE_INHA (Byte 〈x4,x6〉) nat1
-].
-
-ndefinition opcode_table_RS08_25 ≝
-[
- quadruple … SBC MODE_IMM1 (Byte 〈xA,x2〉) nat2
-; quadruple … SBC MODE_DIR1 (Byte 〈xB,x2〉) nat3
-].
-
-ndefinition opcode_table_RS08_26 ≝
-[
- quadruple … STA MODE_DIR1 (Byte 〈xB,x7〉) nat3
-; quadruple … STA (MODE_SRT t00) (Byte 〈xE,x0〉) nat2
-; quadruple … STA (MODE_SRT t01) (Byte 〈xE,x1〉) nat2
-; quadruple … STA (MODE_SRT t02) (Byte 〈xE,x2〉) nat2
-; quadruple … STA (MODE_SRT t03) (Byte 〈xE,x3〉) nat2
-; quadruple … STA (MODE_SRT t04) (Byte 〈xE,x4〉) nat2
-; quadruple … STA (MODE_SRT t05) (Byte 〈xE,x5〉) nat2
-; quadruple … STA (MODE_SRT t06) (Byte 〈xE,x6〉) nat2
-; quadruple … STA (MODE_SRT t07) (Byte 〈xE,x7〉) nat2
-; quadruple … STA (MODE_SRT t08) (Byte 〈xE,x8〉) nat2
-; quadruple … STA (MODE_SRT t09) (Byte 〈xE,x9〉) nat2
-; quadruple … STA (MODE_SRT t0A) (Byte 〈xE,xA〉) nat2
-; quadruple … STA (MODE_SRT t0B) (Byte 〈xE,xB〉) nat2
-; quadruple … STA (MODE_SRT t0C) (Byte 〈xE,xC〉) nat2
-; quadruple … STA (MODE_SRT t0D) (Byte 〈xE,xD〉) nat2
-; quadruple … STA (MODE_SRT t0E) (Byte 〈xE,xE〉) nat2
-; quadruple … STA (MODE_SRT t0F) (Byte 〈xE,xF〉) nat2
-; quadruple … STA (MODE_SRT t10) (Byte 〈xF,x0〉) nat2
-; quadruple … STA (MODE_SRT t11) (Byte 〈xF,x1〉) nat2
-; quadruple … STA (MODE_SRT t12) (Byte 〈xF,x2〉) nat2
-; quadruple … STA (MODE_SRT t13) (Byte 〈xF,x3〉) nat2
-; quadruple … STA (MODE_SRT t14) (Byte 〈xF,x4〉) nat2
-; quadruple … STA (MODE_SRT t15) (Byte 〈xF,x5〉) nat2
-; quadruple … STA (MODE_SRT t16) (Byte 〈xF,x6〉) nat2
-; quadruple … STA (MODE_SRT t17) (Byte 〈xF,x7〉) nat2
-; quadruple … STA (MODE_SRT t18) (Byte 〈xF,x8〉) nat2
-; quadruple … STA (MODE_SRT t19) (Byte 〈xF,x9〉) nat2
-; quadruple … STA (MODE_SRT t1A) (Byte 〈xF,xA〉) nat2
-; quadruple … STA (MODE_SRT t1B) (Byte 〈xF,xB〉) nat2
-; quadruple … STA (MODE_SRT t1C) (Byte 〈xF,xC〉) nat2
-; quadruple … STA (MODE_SRT t1D) (Byte 〈xF,xD〉) nat2
-; quadruple … STA (MODE_SRT t1E) (Byte 〈xF,xE〉) nat2
-; quadruple … STA (MODE_SRT t1F) (Byte 〈xF,xF〉) nat2
-].
-
-ndefinition opcode_table_RS08_27 ≝
-[
- quadruple … SUB MODE_IMM1 (Byte 〈xA,x0〉) nat2
-; quadruple … SUB MODE_DIR1 (Byte 〈xB,x0〉) nat3
-; quadruple … SUB (MODE_TNY x0) (Byte 〈x7,x0〉) nat3
-; quadruple … SUB (MODE_TNY x1) (Byte 〈x7,x1〉) nat3
-; quadruple … SUB (MODE_TNY x2) (Byte 〈x7,x2〉) nat3
-; quadruple … SUB (MODE_TNY x3) (Byte 〈x7,x3〉) nat3
-; quadruple … SUB (MODE_TNY x4) (Byte 〈x7,x4〉) nat3
-; quadruple … SUB (MODE_TNY x5) (Byte 〈x7,x5〉) nat3
-; quadruple … SUB (MODE_TNY x6) (Byte 〈x7,x6〉) nat3
-; quadruple … SUB (MODE_TNY x7) (Byte 〈x7,x7〉) nat3
-; quadruple … SUB (MODE_TNY x8) (Byte 〈x7,x8〉) nat3
-; quadruple … SUB (MODE_TNY x9) (Byte 〈x7,x9〉) nat3
-; quadruple … SUB (MODE_TNY xA) (Byte 〈x7,xA〉) nat3
-; quadruple … SUB (MODE_TNY xB) (Byte 〈x7,xB〉) nat3
-; quadruple … SUB (MODE_TNY xC) (Byte 〈x7,xC〉) nat3
-; quadruple … SUB (MODE_TNY xD) (Byte 〈x7,xD〉) nat3
-; quadruple … SUB (MODE_TNY xE) (Byte 〈x7,xE〉) nat3
-; quadruple … SUB (MODE_TNY xF) (Byte 〈x7,xF〉) nat3
-].
-
-ndefinition opcode_table_RS08 ≝
-opcode_table_RS08_1 @ opcode_table_RS08_2 @ opcode_table_RS08_3 @ opcode_table_RS08_4 @
-opcode_table_RS08_5 @ opcode_table_RS08_6 @ opcode_table_RS08_7 @ opcode_table_RS08_8 @
-opcode_table_RS08_9 @ opcode_table_RS08_10 @ opcode_table_RS08_11 @ opcode_table_RS08_12 @
-opcode_table_RS08_13 @ opcode_table_RS08_14 @ opcode_table_RS08_15 @ opcode_table_RS08_16 @
-opcode_table_RS08_17 @ opcode_table_RS08_18 @ opcode_table_RS08_19 @ opcode_table_RS08_20 @
-opcode_table_RS08_21 @ opcode_table_RS08_22 @ opcode_table_RS08_23 @ opcode_table_RS08_24 @
-opcode_table_RS08_25 @ opcode_table_RS08_26 @ opcode_table_RS08_27.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/pseudo.ma".
-include "emulator/opcodes/RS08_table.ma".
-
-(* ***************** *)
-(* TABELLA DELL'RS08 *)
-(* ***************** *)
-
-(* RS08: opcode non implementati come da manuale *)
-ndefinition RS08_not_impl_byte ≝
- [〈x3,x2〉;〈x3,x3〉;〈x3,xD〉
- ;〈x4,x0〉;〈x4,x7〉;〈x4,xD〉
- ;〈xA,x3〉;〈xA,x5〉;〈xA,x7〉
- ;〈xB,x3〉;〈xB,x5〉
- ].
-
-nlemma ok_byte_table_RS08 : forallc ? (λb.
- (test_not_impl_byte b RS08_not_impl_byte ⊙ eqc ? (get_byte_count RS08 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_RS08) 〈〈x0,x0〉:〈x0,x1〉〉) ⊗
- (⊖ (test_not_impl_byte b RS08_not_impl_byte) ⊙ eqc ? (get_byte_count RS08 b 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_RS08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* RS08: pseudocodici non implementati come da manuale *)
-ndefinition RS08_not_impl_pseudo ≝
- [ AIS ; AIX ; ASR ; BGE ; BGT ; BHCC ; BHCS ; BHI ; BIH ; BIL ; BIT ; BLE ; BLS
- ; BLT ; BMC ; BMI ; BMS ; BPL ; BRN ; CBEQX ; CLI ; CPHX ; CPX ; DAA ; DIV
- ; LDHX ; LDX ; MUL ; NEG ; NSA ; PSHA ; PSHH ; PSHX ; PULA ; PULH ; PULX ; RSP
- ; RTI ; SEI ; STHX ; STX ; SWI ; TAP ; TAX ; TPA ; TST ; TSX ; TXA ; TXS ].
-
-nlemma ok_pseudo_table_RS08 : forallc ? (λo.
- (test_not_impl_pseudo RS08 o RS08_not_impl_pseudo ⊙ lec ? 〈〈x0,x0〉:〈x0,x1〉〉 (get_pseudo_count RS08 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_RS08)) ⊗
- (⊖ (test_not_impl_pseudo RS08 o RS08_not_impl_pseudo) ⊙ eqc ? (get_pseudo_count RS08 o 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_RS08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-(* RS08: modalita' non implementate come da manuale *)
-ndefinition RS08_not_impl_mode ≝
- [ MODE_INHX ; MODE_INHH ; MODE_INHX0ADD ; MODE_INHX1ADD ; MODE_INHX2ADD ; MODE_IMM1EXT
- ; MODE_DIR2 ; MODE_IX0 ; MODE_IX1 ; MODE_IX2 ; MODE_SP1 ; MODE_SP2
- ; MODE_IX0p_to_DIR1 ; MODE_DIR1_to_IX0p ; MODE_INHX_and_IMM1 ; MODE_IX0_and_IMM1
- ; MODE_IX0p_and_IMM1 ; MODE_IX1_and_IMM1 ; MODE_IX1p_and_IMM1 ; MODE_SP1_and_IMM1 ].
-
-nlemma ok_mode_table_RS08 : forallc ? (λi.
- (test_not_impl_mode RS08 i RS08_not_impl_mode ⊙ lec ? 〈〈x0,x0〉:〈x0,x1〉〉 (get_mode_count RS08 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_RS08)) ⊗
- (⊖ (test_not_impl_mode RS08 i RS08_not_impl_mode) ⊙ eqc ? (get_mode_count RS08 i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_RS08) 〈〈x0,x0〉:〈x0,x0〉〉))
- = true.
- napply refl_eq.
-nqed.
-
-nlemma ok_PsIm_table_RS08 :
- forallc ? (λi.
- forallc ? (λps.
- lec ? (get_PsIm_count RS08 ps i 〈〈x0,x0〉:〈x0,x0〉〉 opcode_table_RS08) 〈〈x0,x0〉:〈x0,x1〉〉)) = true.
- napply refl_eq.
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/word16.ma".
-
-(* raggruppamento di byte e word in un tipo unico *)
-ninductive byte8_or_word16 : Type ≝
- Byte: byte8 → byte8_or_word16
-| Word: word16 → byte8_or_word16.
-
-ndefinition eq_b8w16 ≝
-λbw1,bw2:byte8_or_word16.
- match bw1 with
- [ Byte b1 ⇒ match bw2 with [ Byte b2 ⇒ eqc ? b1 b2 | Word _ ⇒ false ]
- | Word w1 ⇒ match bw2 with [ Byte _ ⇒ false | Word w2 ⇒ eqc ? w1 w2 ]
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/Freescale_pseudo.ma".
-include "emulator/opcodes/Freescale_instr_mode.ma".
-include "emulator/opcodes/IP2022_pseudo.ma".
-include "emulator/opcodes/IP2022_instr_mode.ma".
-include "emulator/opcodes/byte_or_word.ma".
-include "common/list.ma".
-
-(* ********************************************** *)
-(* MATTONI BASE PER DEFINIRE LE TABELLE DELLE MCU *)
-(* ********************************************** *)
-
-(* enumerazione delle ALU *)
-ninductive mcu_type: Type ≝
- HC05 : mcu_type
-| HC08 : mcu_type
-| HCS08 : mcu_type
-| RS08 : mcu_type
-| IP2022 : mcu_type.
-
-ndefinition eq_mcutype ≝
-λm1,m2:mcu_type.
- match m1 with
- [ HC05 ⇒ match m2 with [ HC05 ⇒ true | _ ⇒ false ]
- | HC08 ⇒ match m2 with [ HC08 ⇒ true | _ ⇒ false ]
- | HCS08 ⇒ match m2 with [ HCS08 ⇒ true | _ ⇒ false ]
- | RS08 ⇒ match m2 with [ RS08 ⇒ true | _ ⇒ false ]
- | IP2022 ⇒ match m2 with [ IP2022 ⇒ true | _ ⇒ false ]
- ].
-
-ndefinition aux_pseudo_type ≝
-λmcu:mcu_type.match mcu with
- [ HC05 ⇒ Freescale_pseudo
- | HC08 ⇒ Freescale_pseudo
- | HCS08 ⇒ Freescale_pseudo
- | RS08 ⇒ Freescale_pseudo
- | IP2022 ⇒ IP2022_pseudo
- ].
-
-ndefinition pseudo_is_comparable: mcu_type → comparable.
- #mcu; @ (aux_pseudo_type mcu)
- ##[ nelim mcu;
- ##[ ##1,2,3,4: napply (zeroc Freescalepseudo_is_comparable)
- ##| ##5: napply (zeroc IP2022pseudo_is_comparable) ##]
- ##| nelim mcu;
- ##[ ##1,2,3,4: napply (forallc Freescalepseudo_is_comparable)
- ##| ##5: napply (forallc IP2022pseudo_is_comparable) ##]
- ##| nelim mcu;
- ##[ ##1,2,3,4: napply (eqc Freescalepseudo_is_comparable)
- ##| ##5: napply (eqc IP2022pseudo_is_comparable) ##]
- ##| nelim mcu;
- ##[ ##1,2,3,4: napply (eqc_to_eq Freescalepseudo_is_comparable)
- ##| ##5: napply (eqc_to_eq IP2022pseudo_is_comparable) ##]
- ##| nelim mcu;
- ##[ ##1,2,3,4: napply (eq_to_eqc Freescalepseudo_is_comparable)
- ##| ##5: napply (eq_to_eqc IP2022pseudo_is_comparable) ##]
- ##| nelim mcu;
- ##[ ##1,2,3,4: napply (neqc_to_neq Freescalepseudo_is_comparable)
- ##| ##5: napply (neqc_to_neq IP2022pseudo_is_comparable) ##]
- ##| nelim mcu;
- ##[ ##1,2,3,4: napply (neq_to_neqc Freescalepseudo_is_comparable)
- ##| ##5: napply (neq_to_neqc IP2022pseudo_is_comparable) ##]
- ##| nelim mcu;
- ##[ ##1,2,3,4: napply (decidable_c Freescalepseudo_is_comparable)
- ##| ##5: napply (decidable_c IP2022pseudo_is_comparable) ##]
- ##| nelim mcu;
- ##[ ##1,2,3,4: napply (symmetric_eqc Freescalepseudo_is_comparable)
- ##| ##5: napply (symmetric_eqc IP2022pseudo_is_comparable) ##]
- ##]
-nqed.
-
-unification hint 0 ≔ M:mcu_type ⊢ carr (pseudo_is_comparable M) ≡ aux_pseudo_type M.
-
-ndefinition aux_im_type ≝
-λmcu:mcu_type.match mcu with
- [ HC05 ⇒ Freescale_instr_mode
- | HC08 ⇒ Freescale_instr_mode
- | HCS08 ⇒ Freescale_instr_mode
- | RS08 ⇒ Freescale_instr_mode
- | IP2022 ⇒ IP2022_instr_mode
- ].
-
-ndefinition im_is_comparable: mcu_type → comparable.
- #mcu; @ (aux_im_type mcu)
- ##[ nelim mcu;
- ##[ ##1,2,3,4: napply (zeroc Freescaleim_is_comparable)
- ##| ##5: napply (zeroc IP2022im_is_comparable) ##]
- ##| nelim mcu;
- ##[ ##1,2,3,4: napply (forallc Freescaleim_is_comparable)
- ##| ##5: napply (forallc IP2022im_is_comparable) ##]
- ##| nelim mcu;
- ##[ ##1,2,3,4: napply (eqc Freescaleim_is_comparable)
- ##| ##5: napply (eqc IP2022im_is_comparable) ##]
- ##| nelim mcu;
- ##[ ##1,2,3,4: napply (eqc_to_eq Freescaleim_is_comparable)
- ##| ##5: napply (eqc_to_eq IP2022im_is_comparable) ##]
- ##| nelim mcu;
- ##[ ##1,2,3,4: napply (eq_to_eqc Freescaleim_is_comparable)
- ##| ##5: napply (eq_to_eqc IP2022im_is_comparable) ##]
- ##| nelim mcu;
- ##[ ##1,2,3,4: napply (neqc_to_neq Freescaleim_is_comparable)
- ##| ##5: napply (neqc_to_neq IP2022im_is_comparable) ##]
- ##| nelim mcu;
- ##[ ##1,2,3,4: napply (neq_to_neqc Freescaleim_is_comparable)
- ##| ##5: napply (neq_to_neqc IP2022im_is_comparable) ##]
- ##| nelim mcu;
- ##[ ##1,2,3,4: napply (decidable_c Freescaleim_is_comparable)
- ##| ##5: napply (decidable_c IP2022im_is_comparable) ##]
- ##| nelim mcu;
- ##[ ##1,2,3,4: napply (symmetric_eqc Freescaleim_is_comparable)
- ##| ##5: napply (symmetric_eqc IP2022im_is_comparable) ##]
- ##]
-nqed.
-
-unification hint 0 ≔ M:mcu_type ⊢ carr (im_is_comparable M) ≡ aux_im_type M.
-
-(* ********************************************* *)
-(* STRUMENTI PER LE DIMOSTRAZIONI DI CORRETTEZZA *)
-(* ********************************************* *)
-
-ndefinition aux_table_type ≝ λmcu:mcu_type.Prod4T (aux_pseudo_type mcu) (aux_im_type mcu) byte8_or_word16 nat.
-
-(* su tutta la lista quante volte compare il byte *)
-nlet rec get_byte_count (m:mcu_type) (b:byte8) (c:word16) (l:list (aux_table_type m)) on l ≝
- match l with
- [ nil ⇒ c
- | cons hd tl ⇒ match thd4T … hd with
- [ Byte b' ⇒ match eqc ? b b' with
- [ true ⇒ get_byte_count m b (succc ? c) tl
- | false ⇒ get_byte_count m b c tl
- ]
- | Word _ ⇒ get_byte_count m b c tl
- ]
- ].
-
-(* su tutta la lista quante volte compare la word *)
-nlet rec get_word_count (m:mcu_type) (w:word16) (c:word16) (l:list (aux_table_type m)) on l ≝
- match l with
- [ nil ⇒ c
- | cons hd tl ⇒ match thd4T … hd with
- [ Byte _ ⇒ get_word_count m w c tl
- | Word w' ⇒ match eqc ? w w' with
- [ true ⇒ get_word_count m w (succc ? c) tl
- | false ⇒ get_word_count m w c tl
- ]
- ]
- ].
-
-(* su tutta la lista quante volte compare lo pseudocodice *)
-nlet rec get_pseudo_count (m:mcu_type) (o:aux_pseudo_type m) (c:word16) (l:list (aux_table_type m)) on l ≝
- match l with
- [ nil ⇒ c
- | cons hd tl ⇒ match eqc ? o (fst4T … hd) with
- [ true ⇒ get_pseudo_count m o (succc ? c) tl
- | false ⇒ get_pseudo_count m o c tl
- ]
- ].
-
-(* su tutta la lista quante volte compare la modalita' *)
-nlet rec get_mode_count (m:mcu_type) (i:aux_im_type m) (c:word16) (l:list (aux_table_type m)) on l ≝
- match l with
- [ nil ⇒ c
- | cons hd tl ⇒ match eqc ? i (snd4T … hd) with
- [ true ⇒ get_mode_count m i (succc ? c) tl
- | false ⇒ get_mode_count m i c tl
- ]
- ].
-
-(* b e' non implementato? *)
-nlet rec test_not_impl_byte (b:byte8) (l:list byte8) on l ≝
- match l with
- [ nil ⇒ false
- | cons hd tl ⇒ match eqc ? b hd with
- [ true ⇒ true
- | false ⇒ test_not_impl_byte b tl
- ]
- ].
-
-(* su tutta la lista quante volte compare la coppia pseudo,instr_mode *)
-nlet rec get_PsIm_count (m:mcu_type) (o:aux_pseudo_type m) (i:aux_im_type m) (c:word16) (l:list (aux_table_type m)) on l ≝
- match l with
- [ nil ⇒ c
- | cons hd tl ⇒
- match (eqc ? o (fst4T … hd)) ⊗
- (eqc ? i (snd4T … hd)) with
- [ true ⇒ get_PsIm_count m o i (succc ? c) tl
- | false ⇒ get_PsIm_count m o i c tl
- ]
- ].
-
-(* o e' non implementato? *)
-nlet rec test_not_impl_pseudo (m:mcu_type) (o:aux_pseudo_type m) (l:list (aux_pseudo_type m)) on l ≝
- match l with
- [ nil ⇒ false
- | cons hd tl ⇒ match eqc ? o hd with
- [ true ⇒ true
- | false ⇒ test_not_impl_pseudo m o tl
- ]
- ].
-
-(* i e' non implementato? *)
-nlet rec test_not_impl_mode (m:mcu_type) (i:aux_im_type m) (l:list (aux_im_type m)) on l ≝
- match l with
- [ nil ⇒ false
- | cons hd tl ⇒ match eqc ? i hd with
- [ true ⇒ true
- | false ⇒ test_not_impl_mode m i tl
- ]
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/read_write/fetch_base.ma".
-include "emulator/status/status.ma".
-
-(* opcode a byte : HC05 / RS08 *)
-(* caricamento solo da segmento 0 *)
-ndefinition fetch_byte ≝
-λm,t.λs:any_status m t.λpc:word16.
- match mem_read t (mem_desc … s) (chk_desc … s) o0 pc with
- [ None ⇒ FetchERR ? ILL_FETCH_AD
- | Some bh ⇒ fetch_byte_aux m (succc ? pc) bh ].
-
-(* opcode a byte o 0x9E + byte : HC08 / HCS08 *)
-(* caricamento solo da segmento 0 *)
-ndefinition Freescale_fetch_byte_or_word ≝
-λm,t.λs:any_status m t.λpc:word16.
- match mem_read t (mem_desc … s) (chk_desc … s) o0 pc with
- [ None ⇒ FetchERR ? ILL_FETCH_AD
- | Some bh ⇒ match eqc ? bh 〈x9,xE〉 with
- [ true ⇒ match mem_read t (mem_desc … s) (chk_desc … s) o0 (succc ? pc) with
- [ None ⇒ FetchERR ? ILL_FETCH_AD
- | Some bl ⇒ fetch_word_aux m (succc ? (succc ? pc)) 〈bh:bl〉
- ]
- | false ⇒ fetch_byte_aux m (succc ? pc) bh
- ]
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/read_write/load_write_base.ma".
-include "emulator/status/status_getter.ma".
-
-(* accesso argomenti immediati solo da segmento 0 [mem_read_s … o0] *)
-(* accesso indiretto solo da segmento 0 filtrato [aux_load] *)
-
-ndefinition code_seg ≝ o0.
-
-(* lettura da [curpc]: IMM1 *)
-ndefinition mode_IMM1_load ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (mem_read_s … s code_seg cur_pc)
- (λb.Some ? (triple … s b (succc ? cur_pc))).
-
-(* lettura da [curpc]: IMM1 + estensione a word *)
-ndefinition mode_IMM1EXT_load ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (mem_read_s … s code_seg cur_pc)
- (λb.Some ? (triple … s (extu_w16 b) (succc ? cur_pc))).
-
-(* lettura da [curpc]: IMM2 *)
-ndefinition mode_IMM2_load ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (mem_read_s … s code_seg cur_pc)
- (λbh.opt_map … (mem_read_s … s code_seg (succc ? cur_pc))
- (λbl.Some ? (triple … s 〈bh:bl〉 (succc ? (succc ? cur_pc))))).
-
-(* lettura da [byte [curpc]]: true=DIR1 loadb, false=DIR1 loadw *)
-ndefinition mode_DIR1_load ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (mem_read_s … s code_seg cur_pc)
- (λaddr.(aux_load … byteflag) s (extu_w16 addr) cur_pc x1).
-
-(* lettura da [byte [curpc]]: loadbit *)
-ndefinition mode_DIR1n_load ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λsub:oct.
- opt_map … (mem_read_s … s code_seg cur_pc)
- (λaddr.loadbit_from … s (extu_w16 addr) sub cur_pc x1).
-
-(* scrittura su [byte [curpc]]: true=DIR1 writeb, false=DIR1 writew *)
-ndefinition mode_DIR1_write ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
-λwritebw:match byteflag with [ true ⇒ byte8 | false ⇒ word16 ].
- opt_map … (mem_read_s … s code_seg cur_pc)
- (λaddr.(aux_write … byteflag) s (extu_w16 addr) auxMode_ok cur_pc x1 writebw).
-
-(* scrittura su [byte [curpc]]: writebit *)
-ndefinition mode_DIR1n_write ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.λsub:oct.λwriteb:bool.
- opt_map … (mem_read_s … s code_seg cur_pc)
- (λaddr.writebit_to … s (extu_w16 addr) sub cur_pc x1 writeb).
-
-(* lettura da [word [curpc]]: true=DIR2 loadb, false=DIR2 loadw *)
-ndefinition mode_DIR2_load ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (mem_read_s … s code_seg cur_pc)
- (λaddrh.opt_map … (mem_read_s … s code_seg (succc ? cur_pc))
- (λaddrl.(aux_load … byteflag) s 〈addrh:addrl〉 cur_pc x2)).
-
-(* scrittura su [word [curpc]]: true=DIR2 writeb, false=DIR2 writew *)
-ndefinition mode_DIR2_write ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
-λwritebw:match byteflag with [ true ⇒ byte8 | false ⇒ word16 ].
- opt_map … (mem_read_s … s code_seg cur_pc)
- (λaddrh.opt_map … (mem_read_s … s code_seg (succc ? cur_pc))
- (λaddrl.(aux_write … byteflag) s 〈addrh:addrl〉 auxMode_ok cur_pc x2 writebw)).
-
-ndefinition get_IX ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m with
- [ HC05 ⇒ opt_map … (get_indX_8_low_reg … s) (λindx.Some ? (extu_w16 indx))
- | HC08 ⇒ opt_map … (get_indX_16_reg … s) (λindx.Some ? indx)
- | HCS08 ⇒ opt_map … (get_indX_16_reg … s) (λindx.Some ? indx)
- | RS08 ⇒ None ?
- | IP2022 ⇒ None ? ].
-
-(* lettura da [IX]: true=IX0 loadb, false=IX0 loadw *)
-ndefinition mode_IX0_load ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (get_IX … s)
- (λaddr.(aux_load … byteflag) s addr cur_pc x0).
-
-(* scrittura su [IX]: true=IX0 writeb, false=IX0 writew *)
-ndefinition mode_IX0_write ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
-λwritebw:match byteflag with [ true ⇒ byte8 | false ⇒ word16 ].
- opt_map … (get_IX … s)
- (λaddr.(aux_write … byteflag) s addr auxMode_ok cur_pc x0 writebw).
-
-(* lettura da [IX+byte [pc]]: true=IX1 loadb, false=IX1 loadw *)
-ndefinition mode_IX1_load ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (get_IX … s)
- (λaddr.opt_map … (mem_read_s … s code_seg cur_pc)
- (λoffs.(aux_load … byteflag) s (plusc_d_d ? addr (extu_w16 offs)) cur_pc x1)).
-
-(* lettura da X+[byte curpc] *)
-ndefinition mode_IX1ADD_load ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (get_IX … s)
- (λaddr.opt_map … (mem_read_s … s code_seg cur_pc)
- (λb.Some ? (triple … s (plusc_d_d ? addr (extu_w16 b)) (succc ? cur_pc)))).
-
-(* scrittura su [IX+byte [pc]]: true=IX1 writeb, false=IX1 writew *)
-ndefinition mode_IX1_write ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
-λwritebw:match byteflag with [ true ⇒ byte8 | false ⇒ word16 ].
- opt_map … (get_IX … s)
- (λaddr.opt_map … (mem_read_s … s code_seg cur_pc)
- (λoffs.(aux_write … byteflag) s (plusc_d_d ? addr (extu_w16 offs)) auxMode_ok cur_pc x1 writebw)).
-
-(* lettura da [IX+word [pc]]: true=IX2 loadb, false=IX2 loadw *)
-ndefinition mode_IX2_load ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (get_IX … s)
- (λaddr.opt_map … (mem_read_s … s code_seg cur_pc)
- (λoffsh.opt_map … (mem_read_s … s code_seg (succc ? cur_pc))
- (λoffsl.(aux_load … byteflag) s (plusc_d_d ? addr 〈offsh:offsl〉) cur_pc x2))).
-
-(* lettura da X+[word curpc] *)
-ndefinition mode_IX2ADD_load ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (get_IX … s)
- (λaddr.opt_map … (mem_read_s … s code_seg cur_pc)
- (λbh.opt_map … (mem_read_s … s code_seg (succc ? cur_pc))
- (λbl.Some ? (triple … s (plusc_d_d ? addr 〈bh:bl〉) (succc ? (succc ? cur_pc)))))).
-
-(* scrittura su [IX+word [pc]]: true=IX2 writeb, false=IX2 writew *)
-ndefinition mode_IX2_write ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
-λwritebw:match byteflag with [ true ⇒ byte8 | false ⇒ word16 ].
- opt_map … (get_IX … s)
- (λaddr.opt_map … (mem_read_s … s code_seg cur_pc)
- (λoffsh.opt_map … (mem_read_s … s code_seg (succc ? cur_pc))
- (λoffsl.(aux_write … byteflag) s (plusc_d_d ? addr 〈offsh:offsl〉) auxMode_ok cur_pc x2 writebw))).
-
-(* lettura da [SP+byte [pc]]: true=SP1 loadb, false=SP1 loadw *)
-ndefinition mode_SP1_load ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (get_sp_reg … s)
- (λaddr.opt_map … (mem_read_s … s code_seg cur_pc)
- (λoffs.(aux_load … byteflag) s (plusc_d_d ? addr (extu_w16 offs)) cur_pc x1)).
-
-(* scrittura su [SP+byte [pc]]: true=SP1 writeb, false=SP1 writew *)
-ndefinition mode_SP1_write ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
-λwritebw:match byteflag with [ true ⇒ byte8 | false ⇒ word16 ].
- opt_map … (get_sp_reg … s)
- (λaddr.opt_map … (mem_read_s … s code_seg cur_pc)
- (λoffs.(aux_write … byteflag) s (plusc_d_d ? addr (extu_w16 offs)) auxMode_ok cur_pc x1 writebw)).
-
-(* lettura da [SP+word [pc]]: true=SP2 loadb, false=SP2 loadw *)
-ndefinition mode_SP2_load ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
- opt_map … (get_sp_reg … s)
- (λaddr.opt_map … (mem_read_s … s code_seg cur_pc)
- (λoffsh.opt_map … (mem_read_s … s code_seg (succc ? cur_pc))
- (λoffsl.(aux_load … byteflag) s (plusc_d_d ? addr 〈offsh:offsl〉) cur_pc x2))).
-
-(* scrittura su [SP+word [pc]]: true=SP2 writeb, false=SP2 writew *)
-ndefinition mode_SP2_write ≝
-λbyteflag:bool.λm:mcu_type.λt:memory_impl.λs:any_status m t.λcur_pc:word16.
-λwritebw:match byteflag with [ true ⇒ byte8 | false ⇒ word16 ].
- opt_map … (get_sp_reg … s)
- (λaddr.opt_map … (mem_read_s … s code_seg cur_pc)
- (λoffsh.opt_map … (mem_read_s … s code_seg (succc ? cur_pc))
- (λoffsl.(aux_write … byteflag) s (plusc_d_d ? addr 〈offsh:offsl〉) auxMode_ok cur_pc x2 writebw))).
-
-(* ************************************** *)
-(* raccordo di tutte le possibili letture *)
-(* ************************************** *)
-
-(* H:X++ *)
-ndefinition aux_inc_indX_16 ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- opt_map … (get_indX_16_reg … s)
- (λX_op.opt_map … (set_indX_16_reg … s (succc ? X_op))
- (λs_tmp.Some ? s_tmp)).
-
-ndefinition Freescale_multi_mode_load_auxb ≝
-λm,t.λs:any_status m t.λcur_pc:word16.λi:Freescale_instr_mode.match i with
-(* NO: non ci sono indicazioni *)
- [ MODE_INH ⇒ None ?
-(* restituisce A *)
- | MODE_INHA ⇒ Some ? (triple … s (get_acc_8_low_reg … s) cur_pc)
-(* restituisce X *)
- | MODE_INHX ⇒ opt_map … (get_indX_8_low_reg … s)
- (λindx.Some ? (triple … s indx cur_pc))
-(* restituisce H *)
- | MODE_INHH ⇒ opt_map … (get_indX_8_high_reg … s)
- (λindx.Some ? (triple … s indx cur_pc))
-
-(* NO: solo lettura word *)
- | MODE_INHX0ADD ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_INHX1ADD ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_INHX2ADD ⇒ None ?
-
-(* preleva 1 byte immediato *)
- | MODE_IMM1 ⇒ mode_IMM1_load … s cur_pc
-(* NO: solo lettura word *)
- | MODE_IMM1EXT ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM2 ⇒ None ?
-(* preleva 1 byte da indirizzo diretto 1 byte *)
- | MODE_DIR1 ⇒ mode_DIR1_load true … s cur_pc
-(* preleva 1 byte da indirizzo diretto 1 word *)
- | MODE_DIR2 ⇒ mode_DIR2_load true … s cur_pc
-(* preleva 1 byte da H:X *)
- | MODE_IX0 ⇒ mode_IX0_load true … s cur_pc
-(* preleva 1 byte da H:X+1 byte offset *)
- | MODE_IX1 ⇒ mode_IX1_load true … s cur_pc
-(* preleva 1 byte da H:X+1 word offset *)
- | MODE_IX2 ⇒ mode_IX2_load true … s cur_pc
-(* preleva 1 byte da SP+1 byte offset *)
- | MODE_SP1 ⇒ mode_SP1_load true … s cur_pc
-(* preleva 1 byte da SP+1 word offset *)
- | MODE_SP2 ⇒ mode_SP2_load true … s cur_pc
-
-(* come DIR1, chiamare scrittura per passo2: scrittura su DIR1 *)
- | MODE_DIR1_to_DIR1 ⇒ mode_DIR1_load true … s cur_pc
-(* come IMM1, chiamare scrittura per passo2: scrittura su DIR1 *)
- | MODE_IMM1_to_DIR1 ⇒ mode_IMM1_load … s cur_pc
-(* come IX0, chiamare scrittura per passo2: scrittura su DIR1 e X++ *)
- | MODE_IX0p_to_DIR1 ⇒ mode_IX0_load true … s cur_pc
-(* come DIR1, chiamare scrittura per passo2: scrittura su IX0 e X++ *)
- | MODE_DIR1_to_IX0p ⇒ mode_DIR1_load true … s cur_pc
-
-(* NO: solo lettura word/scrittura byte *)
- | MODE_INHA_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_INHX_and_IMM1 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM1_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_DIR1_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_IX0_and_IMM1 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IX0p_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_IX1_and_IMM1 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IX1p_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_SP1_and_IMM1 ⇒ None ?
-
-(* NO: solo scrittura byte *)
- | MODE_DIRn _ ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_DIRn_and_IMM1 _ ⇒ None ?
-(* preleva 1 byte da 0000 0000 0000 xxxxb *)
- | MODE_TNY e ⇒ opt_map … (memory_filter_read … s (extu2_w16 e))
- (λb.Some ? (triple … s b cur_pc))
-(* preleva 1 byte da 0000 0000 000x xxxxb *)
- | MODE_SRT t ⇒ opt_map … (memory_filter_read … s (extu_w16 (b8_of_bit t)))
- (λb.Some ? (triple … s b cur_pc))
- ].
-
-ndefinition Freescale_multi_mode_load_auxw ≝
-λm,t.λs:any_status m t.λcur_pc:word16.λi:Freescale_instr_mode.match i with
-(* NO: non ci sono indicazioni *)
- [ MODE_INH ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_INHA ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_INHX ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_INHH ⇒ None ?
-
-(* preleva 1 word immediato *)
- | MODE_INHX0ADD ⇒ opt_map … (get_IX … s)
- (λw.Some ? (triple … s w cur_pc))
-(* preleva 1 word immediato *)
- | MODE_INHX1ADD ⇒ mode_IX1ADD_load … s cur_pc
-(* preleva 1 word immediato *)
- | MODE_INHX2ADD ⇒ mode_IX2ADD_load … s cur_pc
-
-(* NO: solo lettura byte *)
- | MODE_IMM1 ⇒ None ?
-(* preleva 1 word immediato *)
- | MODE_IMM1EXT ⇒ mode_IMM1EXT_load … s cur_pc
-(* preleva 1 word immediato *)
- | MODE_IMM2 ⇒ mode_IMM2_load … s cur_pc
-(* preleva 1 word da indirizzo diretto 1 byte *)
- | MODE_DIR1 ⇒ mode_DIR1_load false … s cur_pc
-(* preleva 1 word da indirizzo diretto 1 word *)
- | MODE_DIR2 ⇒ mode_DIR2_load false … s cur_pc
-(* preleva 1 word da H:X *)
- | MODE_IX0 ⇒ mode_IX0_load false … s cur_pc
-(* preleva 1 word da H:X+1 byte offset *)
- | MODE_IX1 ⇒ mode_IX1_load false … s cur_pc
-(* preleva 1 word da H:X+1 word offset *)
- | MODE_IX2 ⇒ mode_IX2_load false … s cur_pc
-(* preleva 1 word da SP+1 byte offset *)
- | MODE_SP1 ⇒ mode_SP1_load false … s cur_pc
-(* preleva 1 word da SP+1 word offset *)
- | MODE_SP2 ⇒ mode_SP2_load false … s cur_pc
-
-(* NO: solo lettura/scrittura byte *)
- | MODE_DIR1_to_DIR1 ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_IMM1_to_DIR1 ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_IX0p_to_DIR1 ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_DIR1_to_IX0p ⇒ None ?
-
-(* preleva 2 byte, possibilita' modificare Io argomento *)
- | MODE_INHA_and_IMM1 ⇒ opt_map … (mode_IMM1_load … s cur_pc)
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc' ⇒
- Some ? (triple … s 〈(get_acc_8_low_reg … s):immb〉 cur_pc')])
-(* preleva 2 byte, possibilita' modificare Io argomento *)
- | MODE_INHX_and_IMM1 ⇒ opt_map … (get_indX_8_low_reg … s)
- (λX_op.opt_map … (mode_IMM1_load … s cur_pc)
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc' ⇒
- Some ? (triple … s 〈X_op:immb〉 cur_pc')]))
-(* preleva 2 byte, NO possibilita' modificare Io argomento *)
- | MODE_IMM1_and_IMM1 ⇒ opt_map … (mode_IMM1_load … s cur_pc)
- (λS_immb1_and_PC.match S_immb1_and_PC with
- [ triple _ immb1 cur_pc' ⇒
- opt_map … (mode_IMM1_load … s cur_pc')
- (λS_immb2_and_PC.match S_immb2_and_PC with
- [ triple _ immb2 cur_pc'' ⇒
- Some ? (triple … s 〈immb1:immb2〉 cur_pc'')])])
-(* preleva 2 byte, possibilita' modificare Io argomento *)
- | MODE_DIR1_and_IMM1 ⇒ opt_map … (mode_DIR1_load true … s cur_pc)
- (λS_dirb_and_PC.match S_dirb_and_PC with
- [ triple _ dirb cur_pc' ⇒
- opt_map … (mode_IMM1_load … s cur_pc')
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc'' ⇒
- Some ? (triple … s 〈dirb:immb〉 cur_pc'')])])
-(* preleva 2 byte, possibilita' modificare Io argomento *)
- | MODE_IX0_and_IMM1 ⇒ opt_map … (mode_IX0_load true … s cur_pc)
- (λS_ixb_and_PC.match S_ixb_and_PC with
- [ triple _ ixb cur_pc' ⇒
- opt_map … (mode_IMM1_load … s cur_pc')
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc'' ⇒
- Some ? (triple … s 〈ixb:immb〉 cur_pc'')])])
-(* preleva 2 byte, H:X++, NO possibilita' modificare Io argomento *)
- | MODE_IX0p_and_IMM1 ⇒ opt_map … (mode_IX0_load true … s cur_pc)
- (λS_ixb_and_PC.match S_ixb_and_PC with
- [ triple _ ixb cur_pc' ⇒
- opt_map … (mode_IMM1_load … s cur_pc')
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc'' ⇒
- (* H:X++ *)
- opt_map … (aux_inc_indX_16 … s)
- (λs'.Some ? (triple … s' 〈ixb:immb〉 cur_pc''))])])
-(* preleva 2 byte, possibilita' modificare Io argomento *)
- | MODE_IX1_and_IMM1 ⇒ opt_map … (mode_IX1_load true … s cur_pc)
- (λS_ixb_and_PC.match S_ixb_and_PC with
- [ triple _ ixb cur_pc' ⇒
- opt_map … (mode_IMM1_load … s cur_pc')
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc'' ⇒
- Some ? (triple … s 〈ixb:immb〉 cur_pc'')])])
-(* preleva 2 byte, H:X++, NO possibilita' modificare Io argomento *)
- | MODE_IX1p_and_IMM1 ⇒ opt_map … (mode_IX1_load true … s cur_pc)
- (λS_ixb_and_PC.match S_ixb_and_PC with
- [ triple _ ixb cur_pc' ⇒
- opt_map … (mode_IMM1_load … s cur_pc')
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc'' ⇒
- (* H:X++ *)
- opt_map … (aux_inc_indX_16 … s)
- (λs'.Some ? (triple … s' 〈ixb:immb〉 cur_pc''))])])
-(* preleva 2 byte, possibilita' modificare Io argomento *)
- | MODE_SP1_and_IMM1 ⇒ opt_map … (mode_SP1_load true … s cur_pc)
- (λS_spb_and_PC.match S_spb_and_PC with
- [ triple _ spb cur_pc' ⇒
- opt_map … (mode_IMM1_load … s cur_pc')
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc'' ⇒
- Some ? (triple … s 〈spb:immb〉 cur_pc'')])])
-
-(* NO: solo scrittura byte *)
- | MODE_DIRn _ ⇒ None ?
-(* preleva 2 byte, il primo e' filtrato per azzerare tutti i bit tranne n-simo *)
- | MODE_DIRn_and_IMM1 msk ⇒ opt_map … (mode_DIR1n_load … s cur_pc msk)
- (λS_dirbn_and_PC.match S_dirbn_and_PC with
- [ triple _ dirbn cur_pc' ⇒
- opt_map … (mode_IMM1_load … s cur_pc')
- (λS_immb_and_PC.match S_immb_and_PC with
- [ triple _ immb cur_pc'' ⇒
- Some ? (triple … s 〈(extu_b8 match dirbn with [ true ⇒ x1 | false ⇒ x0 ]):immb〉 cur_pc'') ])])
-(* NO: solo lettura/scrittura byte *)
- | MODE_TNY _ ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_SRT _ ⇒ None ?
- ].
-
-(* **************************************** *)
-(* raccordo di tutte le possibili scritture *)
-(* **************************************** *)
-
-ndefinition Freescale_multi_mode_write_auxb ≝
-λm,t.λs:any_status m t.λcur_pc:word16.λflag:aux_mod_type.λi:Freescale_instr_mode.λwriteb:byte8.match i with
-(* NO: non ci sono indicazioni *)
- [ MODE_INH ⇒ None ?
-(* scrive A *)
- | MODE_INHA ⇒ Some ? (pair … (set_acc_8_low_reg … s writeb) cur_pc)
-(* scrive X *)
- | MODE_INHX ⇒ opt_map … (set_indX_8_low_reg … s writeb)
- (λtmps.Some ? (pair … tmps cur_pc))
-(* scrive H *)
- | MODE_INHH ⇒ opt_map … (set_indX_8_high_reg … s writeb)
- (λtmps.Some ? (pair … tmps cur_pc))
-
-(* NO: solo lettura word *)
- | MODE_INHX0ADD ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_INHX1ADD ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_INHX2ADD ⇒ None ?
-
-(* NO: solo lettura byte *)
- | MODE_IMM1 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM1EXT ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM2 ⇒ None ?
-(* scrive 1 byte su indirizzo diretto 1 byte *)
- | MODE_DIR1 ⇒ mode_DIR1_write true … s cur_pc writeb
-(* scrive 1 byte su indirizzo diretto 1 word *)
- | MODE_DIR2 ⇒ mode_DIR2_write true … s cur_pc writeb
-(* scrive 1 byte su H:X *)
- | MODE_IX0 ⇒ mode_IX0_write true … s cur_pc writeb
-(* scrive 1 byte su H:X+1 byte offset *)
- | MODE_IX1 ⇒ mode_IX1_write true … s cur_pc writeb
-(* scrive 1 byte su H:X+1 word offset *)
- | MODE_IX2 ⇒ mode_IX2_write true … s cur_pc writeb
-(* scrive 1 byte su SP+1 byte offset *)
- | MODE_SP1 ⇒ mode_SP1_write true … s cur_pc writeb
-(* scrive 1 byte su SP+1 word offset *)
- | MODE_SP2 ⇒ mode_SP2_write true … s cur_pc writeb
-
-(* passo2: scrittura su DIR1, passo1: lettura da DIR1 *)
- | MODE_DIR1_to_DIR1 ⇒ mode_DIR1_write true … s cur_pc writeb
-(* passo2: scrittura su DIR1, passo1: lettura da IMM1 *)
- | MODE_IMM1_to_DIR1 ⇒ mode_DIR1_write true … s cur_pc writeb
-(* passo2: scrittura su DIR1 e X++, passo1: lettura da IX0 *)
- | MODE_IX0p_to_DIR1 ⇒ opt_map … (mode_DIR1_write true … s cur_pc writeb)
- (λS_and_PC.match S_and_PC with [ pair S_op PC_op ⇒
- (* H:X++ *)
- opt_map … (aux_inc_indX_16 … S_op)
- (λS_op'.Some ? (pair … S_op' PC_op))])
-(* passo2: scrittura su IX0 e X++, passo1: lettura da DIR1 *)
- | MODE_DIR1_to_IX0p ⇒ opt_map … (mode_IX0_write true … s cur_pc writeb)
- (λS_and_PC.match S_and_PC with [ pair S_op PC_op ⇒
- (* H:X++ *)
- opt_map … (aux_inc_indX_16 … S_op)
- (λS_op'.Some ? (pair … S_op' PC_op))])
-
-(* dopo aver prelevato 2 byte la possibilita' modificare Io argomento = INHA *)
- | MODE_INHA_and_IMM1 ⇒ Some ? (pair … (set_acc_8_low_reg … s writeb) cur_pc)
-(* dopo aver prelevato 2 byte la possibilita' modificare Io argomento = INHX *)
- | MODE_INHX_and_IMM1 ⇒ opt_map … (set_indX_8_low_reg … s writeb)
- (λtmps.Some ? (pair … tmps cur_pc))
-(* NO: solo lettura word *)
- | MODE_IMM1_and_IMM1 ⇒ None ?
-(* dopo aver prelevato 2 byte la possibilita' modificare Io argomento = DIR1 *)
- | MODE_DIR1_and_IMM1 ⇒ mode_DIR1_write true … s cur_pc writeb
-(* dopo aver prelevato 2 byte la possibilita' modificare Io argomento = IX0 *)
- | MODE_IX0_and_IMM1 ⇒ mode_IX0_write true … s cur_pc writeb
-(* NO: solo lettura word *)
- | MODE_IX0p_and_IMM1 ⇒ None ?
-(* dopo aver prelevato 2 byte la possibilita' modificare Io argomento = IX1 *)
- | MODE_IX1_and_IMM1 ⇒ mode_IX1_write true … s cur_pc writeb
-(* NO: solo lettura word *)
- | MODE_IX1p_and_IMM1 ⇒ None ?
-(* dopo aver prelevato 2 byte la possibilita' modificare Io argomento = SP1 *)
- | MODE_SP1_and_IMM1 ⇒ mode_SP1_write true … s cur_pc writeb
-
-(* scrive 1 byte, ma la scrittura avviene solo per n-simo bit = leggi/modifica bit/scrivi *)
- | MODE_DIRn msk ⇒ mode_DIR1n_write … s cur_pc msk (getn_array8T msk bool (bits_of_byte8 writeb))
-(* NO: solo lettura word *)
- | MODE_DIRn_and_IMM1 _ ⇒ None ?
-(* scrive 1 byte su 0000 0000 0000 xxxxb *)
- | MODE_TNY e ⇒ opt_map … (memory_filter_write … s (extu2_w16 e) auxMode_ok writeb)
- (λtmps.Some ? (pair … tmps cur_pc))
-(* scrive 1 byte su 0000 0000 000x xxxxb *)
- | MODE_SRT e ⇒ opt_map … (memory_filter_write … s (extu_w16 (b8_of_bit e)) auxMode_ok writeb)
- (λtmps.Some ? (pair … tmps cur_pc))
- ].
-
-ndefinition Freescale_multi_mode_write_auxw ≝
-λm,t.λs:any_status m t.λcur_pc:word16.λi:Freescale_instr_mode.λwritew:word16.match i with
-(* NO: non ci sono indicazioni *)
- [ MODE_INH ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_INHA ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_INHX ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_INHH ⇒ None ?
-
-(* NO: solo lettura word *)
- | MODE_INHX0ADD ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_INHX1ADD ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_INHX2ADD ⇒ None ?
-
-(* NO: solo lettura byte *)
- | MODE_IMM1 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM1EXT ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM2 ⇒ None ?
-(* scrive 1 word su indirizzo diretto 1 byte *)
- | MODE_DIR1 ⇒ mode_DIR1_write false … s cur_pc writew
-(* scrive 1 word su indirizzo diretto 1 word *)
- | MODE_DIR2 ⇒ mode_DIR2_write false … s cur_pc writew
-(* scrive 1 word su H:X *)
- | MODE_IX0 ⇒ mode_IX0_write false … s cur_pc writew
-(* scrive 1 word su H:X+1 byte offset *)
- | MODE_IX1 ⇒ mode_IX1_write false … s cur_pc writew
-(* scrive 1 word su H:X+1 word offset *)
- | MODE_IX2 ⇒ mode_IX2_write false … s cur_pc writew
-(* scrive 1 word su SP+1 byte offset *)
- | MODE_SP1 ⇒ mode_SP1_write false … s cur_pc writew
-(* scrive 1 word su SP+1 word offset *)
- | MODE_SP2 ⇒ mode_SP2_write false … s cur_pc writew
-
-(* NO: solo lettura/scrittura byte *)
- | MODE_DIR1_to_DIR1 ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_IMM1_to_DIR1 ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_IX0p_to_DIR1 ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_DIR1_to_IX0p ⇒ None ?
-
-(* NO: solo lettura word/scrittura byte *)
- | MODE_INHA_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_INHX_and_IMM1 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM1_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_DIR1_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_IX0_and_IMM1 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IX0p_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_IX1_and_IMM1 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IX1p_and_IMM1 ⇒ None ?
-(* NO: solo lettura word/scrittura byte *)
- | MODE_SP1_and_IMM1 ⇒ None ?
-
-(* NO: solo scrittura byte *)
- | MODE_DIRn _ ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_DIRn_and_IMM1 _ ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_TNY _ ⇒ None ?
-(* NO: solo lettura/scrittura byte *)
- | MODE_SRT _ ⇒ None ?
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/read_write/fetch_base.ma".
-include "emulator/status/status.ma".
-
-(* PC word aligned *)
-(* PC < 0x8000 → segmento 1 program ram *)
-(*else → segmento 2 program flash *)
-ndefinition IP2022_pc_flashtest ≝
-λpc:word16.getMSBc ? pc.
-
-ndefinition IP2022_pc_translation ≝
-λpc:word16.match shlc ? pc with
- [ pair msb pc' ⇒ pair …
- match msb with [ true ⇒ o2 | false ⇒ o1 ] pc' ].
-
-(* opcode a byte o 0x00 + byte : IP2022 *)
-(* opcode + operando a dimensione fissa 16bit *)
-ndefinition IP2022_fetch_byte_or_word ≝
-λm,t.λs:any_status m t.λpc:word16.
- match mem_read t (mem_desc … s) (chk_desc … s)
- (fst … (IP2022_pc_translation pc))
- (snd … (IP2022_pc_translation pc)) with
- [ None ⇒ FetchERR ? ILL_FETCH_AD
- | Some bh ⇒ match eqc ? bh 〈x0,x0〉 with
- [ true ⇒ match mem_read t (mem_desc … s) (chk_desc … s)
- (fst … (IP2022_pc_translation pc))
- (succc ? (snd … (IP2022_pc_translation pc))) with
- [ None ⇒ FetchERR ? ILL_FETCH_AD
- | Some bl ⇒ fetch_word_aux m (succc ? pc) 〈bh:bl〉
- ]
- | false ⇒ fetch_byte_aux m (succc ? pc) bh
- ]
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/read_write/load_write_base.ma".
-include "emulator/status/status_getter.ma".
-include "emulator/read_write/IP2022_fetch.ma".
-
-(* lettura da [OLD PC<<1 + 1] : argomento non caricato dal fetch word-aligned *)
-ndefinition mode_IMM1_load ≝
-λt:memory_impl.λs:any_status IP2022 t.
- match IP2022_pc_translation (get_pc_reg … s) with
- [ pair seg pc ⇒ mem_read_s … s seg (succc ? pc) ].
-
-(* SCHEMA:
- ADDRX=0x00 [ADDRH|ADDRL] 16Kb PROGRAM RAM
- ADDRX=0x01 [ADDRH|ADDRL] 64Kb FLASH
- ADDRX=0x80 [ADDRH|ADDRL] 64Kb EXTERNAL RAM
- ADDRX=0x81 [ADDRH|ADDRL] 64Kb EXTERNAL RAM *)
-
-(* lettura da [ADDR] *)
-ndefinition mode_ADDR_load ≝
-λt:memory_impl.λs:any_status IP2022 t.
- opt_map … (get_addr_reg … s)
- (λaddr.match eqc ? (w24x addr) 〈x0,x0〉 with
- (* lettura della RAM, sempre non blocking *)
- [ true ⇒ opt_map … (mem_read_s … s o1 (clrLSBc ? 〈(w24h addr):(w24l addr)〉))
- (λbh.opt_map … (mem_read_s … s o1 (setLSBc ? 〈(w24h addr):(w24l addr)〉))
- (λbl.Some ? 〈bh:bl〉))
- (* lettura della FLASH da codice in RAM : operazione non bloccante non implementata! *)
- (* lettura da alri ADDRX, errore *)
- | false ⇒ match (gtc ? (w24x addr) 〈x0,x1〉)⊕(⊖(IP2022_pc_flashtest (get_pc_reg … s))) with
- [ true ⇒ None ?
- | false ⇒ opt_map … (mem_read_s … s o2 (clrLSBc ? 〈(w24h addr):(w24l addr)〉))
- (λbh.opt_map … (mem_read_s … s o2 (setLSBc ? 〈(w24h addr):(w24l addr)〉))
- (λbl.Some ? 〈bh:bl〉))
- ]
- ]).
-
-(* scrittura su [ADDR] *)
-ndefinition mode_ADDR_write ≝
-λt:memory_impl.λs:any_status IP2022 t.λval:word16.
- opt_map ?? (get_addr_reg … s)
- (λaddr.opt_map ?? (match eqc ? (w24x addr) 〈x0,x0〉 with
- [ true ⇒ Some ? o1
- | false ⇒ match eqc ? (w24x addr) 〈x0,x1〉 with
- [ true ⇒ Some ? o2
- | false ⇒ None ? ]])
- (λseg.opt_map ?? (mem_write_s ?? s seg (clrLSBc ? 〈(w24h addr):(w24l addr)〉) (cnH ? val))
- (λs'.mem_write_s ?? s' seg (setLSBc ? 〈(w24h addr):(w24l addr)〉) (cnL ? val)))).
-
-(* IMM1 > 0 : lettura/scrittura da [IMM1] *)
-(* else : lettura/scrittura da [IP] : IP ≥ 0x20 *)
-ndefinition mode_DIR1IP_aux ≝
-λt:memory_impl.λs:any_status IP2022 t.λT.λf:word16 → option T.
- opt_map … (mode_IMM1_load t s)
- (λaddr.match eqc ? addr 〈x0,x0〉 with
- (* xxxxxxx0 00000000 → [IP] *)
- [ true ⇒ opt_map … (get_ip_reg … s)
- (λip.match gec ? ip 〈〈x0,x0〉:〈x2,x0〉〉 with
- (* IP ≥ 0x20 *)
- [ true ⇒ f ip
- | false ⇒ None ? ])
- (* xxxxxxx0 nnnnnnnn → [IMM1] *)
- | false ⇒ f (extu_w16 addr)
- ]).
-
-(* IMM1 < 0x80 : lettura/scrittura da [DP+IMM1] : DP+IMM1 ≥ 0x20 *)
-(* else : lettura/scrittura da [SP+IMM1] : SP+IMM1 ≥ 0x20 *)
-ndefinition mode_DPSP_aux ≝
-λt:memory_impl.λs:any_status IP2022 t.λT.λf:word16 → option T.
- opt_map … (mode_IMM1_load t s)
- (λaddr.opt_map … (match getMSBc ? addr with
- (* xxxxxxx1 1nnnnnnn → [SP+IMM1] *)
- [ true ⇒ get_sp_reg … s
- (* xxxxxxx1 0nnnnnnn → [DP+IMM1] *)
- | false ⇒ get_dp_reg … s ])
- (λreg.match gec ? (plusc_d_d ? reg (extu_w16 (clrMSBc ? addr))) 〈〈x0,x0〉:〈x2,x0〉〉 with
- (* reg+IMM1 ≥ 0x20 *)
- [ true ⇒ f (plusc_d_d ? reg (extu_w16 (clrMSBc ? addr)))
- | false ⇒ None ? ])).
-
-(* FR0 *)
-ndefinition mode_FR0_load ≝
-λt:memory_impl.λs:any_status IP2022 t.
- mode_DIR1IP_aux t s byte8 (memory_filter_read … s).
-
-ndefinition mode_FR0n_load ≝
-λt:memory_impl.λs:any_status IP2022 t.λsub:oct.
- mode_DIR1IP_aux t s bool (λaddr.memory_filter_read_bit … s addr sub).
-
-ndefinition mode_FR0_write ≝
-λt:memory_impl.λs:any_status IP2022 t.λflag:aux_mod_type.λval:byte8.
- mode_DIR1IP_aux t s (any_status IP2022 t) (λaddr.memory_filter_write … s addr flag val).
-
-ndefinition mode_FR0n_write ≝
-λt:memory_impl.λs:any_status IP2022 t.λsub:oct.λval:bool.
- mode_DIR1IP_aux t s (any_status IP2022 t) (λaddr.memory_filter_write_bit … s addr sub val).
-
-(* FR1 *)
-ndefinition mode_FR1_load ≝
-λt:memory_impl.λs:any_status IP2022 t.
- mode_DPSP_aux t s byte8 (memory_filter_read … s).
-
-ndefinition mode_FR1n_load ≝
-λt:memory_impl.λs:any_status IP2022 t.λsub:oct.
- mode_DPSP_aux t s bool (λaddr.memory_filter_read_bit … s addr sub).
-
-ndefinition mode_FR1_write ≝
-λt:memory_impl.λs:any_status IP2022 t.λflag:aux_mod_type.λval:byte8.
- mode_DPSP_aux t s (any_status IP2022 t) (λaddr.memory_filter_write … s addr flag val).
-
-ndefinition mode_FR1n_write ≝
-λt:memory_impl.λs:any_status IP2022 t.λsub:oct.λval:bool.
- mode_DPSP_aux t s (any_status IP2022 t) (λaddr.memory_filter_write_bit … s addr sub val).
-
-(* ************************************** *)
-(* raccordo di tutte le possibili letture *)
-(* ************************************** *)
-
-(* addr+=2 *)
-ndefinition aux_inc_addr2 ≝
-λt:memory_impl.λs:any_status IP2022 t.
- set_addr_reg_sIP2022 t s (succ_w24 (succ_w24 (get_addr_reg_IP2022 (alu … s)))).
-
-ndefinition IP2022_multi_mode_load_auxb ≝
-λt.λs:any_status IP2022 t.λcur_pc:word16.λi:IP2022_instr_mode.match i with
-(* NO: non ci sono indicazioni *)
- [ MODE_INH ⇒ None ?
-(* NO: solo word *)
- | MODE_INHADDR ⇒ None ?
-(* NO: solo word *)
- | MODE_INHADDRpp ⇒ None ?
-
-(* IMM3 *)
- | MODE_IMM3 o ⇒ Some ? (triple … s (extu_b8 (ex_of_oct o)) cur_pc)
-(* IMM8 *)
- | MODE_IMM8 ⇒ opt_map … (mode_IMM1_load t s)
- (λb.Some ? (triple … s b cur_pc))
-(* NO: solo lettura word *)
- | MODE_IMM13 _ ⇒ None ?
-
-(* NO: solo word *)
- | MODE_FR0_and_W ⇒ None ?
-(* NO: solo word *)
- | MODE_FR1_and_W ⇒ None ?
-(* NO: solo word *)
- | MODE_W_and_FR0 ⇒ None ?
-(* NO: solo word *)
- | MODE_W_and_FR1 ⇒ None ?
-
-(* [FRn] *)
- | MODE_FR0n o ⇒ opt_map … (mode_FR0n_load t s o)
- (λb.Some ? (triple … s (extu_b8 (match b with [ true ⇒ x1 | false ⇒ x0 ])) cur_pc))
-(* [FRn] *)
- | MODE_FR1n o ⇒ opt_map … (mode_FR1n_load t s o)
- (λb.Some ? (triple … s (extu_b8 (match b with [ true ⇒ x1 | false ⇒ x0 ])) cur_pc))
- ].
-
-ndefinition IP2022_multi_mode_load_auxw ≝
-λt.λs:any_status IP2022 t.λcur_pc:word16.λi:IP2022_instr_mode.match i with
-(* NO: non ci sono indicazioni *)
- [ MODE_INH ⇒ None ?
-(* [ADDR] *)
- | MODE_INHADDR ⇒ opt_map … (mode_ADDR_load t s)
- (λw.Some ? (triple … s w cur_pc))
-(* [ADDR], ADDR+=2 *)
- | MODE_INHADDRpp ⇒ opt_map … (mode_ADDR_load t s)
- (λw.Some ? (triple … (aux_inc_addr2 t s) w cur_pc))
-
-(* NO: solo lettura byte *)
- | MODE_IMM3 _ ⇒ None ?
-(* NO: solo lettura byte *)
- | MODE_IMM8 ⇒ None ?
-(* IMM13 *)
- | MODE_IMM13 bt ⇒ opt_map … (mode_IMM1_load t s)
- (λb.Some ? (triple … s 〈(b8_of_bit bt):b〉 cur_pc))
-
-(* FR, W → FR *)
- | MODE_FR0_and_W ⇒ opt_map … (mode_FR0_load t s)
- (λfr.Some ? (triple … s 〈fr:(get_acc_8_low_reg … s)〉 cur_pc))
-(* FR, W → FR *)
- | MODE_FR1_and_W ⇒ opt_map … (mode_FR1_load t s)
- (λfr.Some ? (triple … s 〈fr:(get_acc_8_low_reg … s)〉 cur_pc))
-(* W, FR → W *)
- | MODE_W_and_FR0 ⇒ opt_map … (mode_FR0_load t s)
- (λfr.Some ? (triple … s 〈(get_acc_8_low_reg … s):fr〉 cur_pc))
-(* W, FR → W *)
- | MODE_W_and_FR1 ⇒ opt_map … (mode_FR1_load t s)
- (λfr.Some ? (triple … s 〈(get_acc_8_low_reg … s):fr〉 cur_pc))
-
-(* NO: solo byte *)
- | MODE_FR0n _ ⇒ None ?
-(* NO: solo byte *)
- | MODE_FR1n _ ⇒ None ?
- ].
-
-(* **************************************** *)
-(* raccordo di tutte le possibili scritture *)
-(* **************************************** *)
-
-ndefinition IP2022_multi_mode_write_auxb ≝
-λt.λs:any_status IP2022 t.λcur_pc:word16.λflag:aux_mod_type.λi:IP2022_instr_mode.λwriteb:byte8.match i with
-(* NO: non ci sono indicazioni *)
- [ MODE_INH ⇒ None ?
-(* NO: solo word *)
- | MODE_INHADDR ⇒ None ?
-(* NO: solo word *)
- | MODE_INHADDRpp ⇒ None ?
-
-(* NO: solo lettura byte *)
- | MODE_IMM3 _ ⇒ None ?
-(* NO: solo lettura byte *)
- | MODE_IMM8 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM13 _ ⇒ None ?
-
-(* FR, W → FR *)
- | MODE_FR0_and_W ⇒ opt_map … (mode_FR0_write t s flag writeb)
- (λs'.Some ? (pair … s' cur_pc))
-(* FR, W → FR *)
- | MODE_FR1_and_W ⇒ opt_map … (mode_FR1_write t s flag writeb)
- (λs'.Some ? (pair … s' cur_pc))
-(* W, FR → W *)
- | MODE_W_and_FR0 ⇒ Some ? (pair … (set_acc_8_low_reg … s writeb) cur_pc)
-(* W, FR → W *)
- | MODE_W_and_FR1 ⇒ Some ? (pair … (set_acc_8_low_reg … s writeb) cur_pc)
-
-(* [FRn] *)
- | MODE_FR0n o ⇒ opt_map … (mode_FR0n_write t s o (getn_array8T o ? (bits_of_byte8 writeb)))
- (λs'.Some ? (pair … s' cur_pc))
-(* [FRn] *)
- | MODE_FR1n o ⇒ opt_map … (mode_FR1n_write t s o (getn_array8T o ? (bits_of_byte8 writeb)))
- (λs'.Some ? (pair … s' cur_pc))
- ].
-
-ndefinition IP2022_multi_mode_write_auxw ≝
-λt.λs:any_status IP2022 t.λcur_pc:word16.λi:IP2022_instr_mode.λwritew:word16.match i with
-(* NO: non ci sono indicazioni *)
- [ MODE_INH ⇒ None ?
-(* [ADDR] *)
- | MODE_INHADDR ⇒ opt_map … (mode_ADDR_write t s writew)
- (λs'.Some ? (pair … s' cur_pc))
-(* [ADDR], ADDR+=2 *)
- | MODE_INHADDRpp ⇒ opt_map … (mode_ADDR_write t s writew)
- (λs'.Some ? (pair … (aux_inc_addr2 t s') cur_pc))
-
-(* NO: solo lettura byte *)
- | MODE_IMM3 _ ⇒ None ?
-(* NO: solo lettura byte *)
- | MODE_IMM8 ⇒ None ?
-(* NO: solo lettura word *)
- | MODE_IMM13 _ ⇒ None ?
-
-(* NO: solo byte *)
- | MODE_FR0_and_W ⇒ None ?
-(* NO: solo byte *)
- | MODE_FR1_and_W ⇒ None ?
-(* NO: solo byte *)
- | MODE_W_and_FR0 ⇒ None ?
-(* NO: solo byte *)
- | MODE_W_and_FR1 ⇒ None ?
-
-(* NO: solo byte *)
- | MODE_FR0n _ ⇒ None ?
-(* NO: solo byte *)
- | MODE_FR1n _ ⇒ None ?
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/read_write/read_write_base.ma".
-include "emulator/status/status_setter.ma".
-
-ndefinition IP2022_ADDRSEL_loc ≝ 〈〈x0,x0〉:〈x0,x2〉〉.
-ndefinition IP2022_ADDRX_loc ≝ 〈〈x0,x0〉:〈x0,x3〉〉.
-ndefinition IP2022_IPH_loc ≝ 〈〈x0,x0〉:〈x0,x4〉〉.
-ndefinition IP2022_IPL_loc ≝ 〈〈x0,x0〉:〈x0,x5〉〉.
-ndefinition IP2022_SPH_loc ≝ 〈〈x0,x0〉:〈x0,x6〉〉.
-ndefinition IP2022_SPL_loc ≝ 〈〈x0,x0〉:〈x0,x7〉〉.
-ndefinition IP2022_PCH_loc ≝ 〈〈x0,x0〉:〈x0,x8〉〉.
-ndefinition IP2022_PCL_loc ≝ 〈〈x0,x0〉:〈x0,x9〉〉.
-ndefinition IP2022_W_loc ≝ 〈〈x0,x0〉:〈x0,xA〉〉.
-ndefinition IP2022_STATUS_loc ≝ 〈〈x0,x0〉:〈x0,xB〉〉.
-ndefinition IP2022_DPH_loc ≝ 〈〈x0,x0〉:〈x0,xC〉〉.
-ndefinition IP2022_DPL_loc ≝ 〈〈x0,x0〉:〈x0,xD〉〉.
-ndefinition IP2022_SPEED_loc ≝ 〈〈x0,x0〉:〈x0,xE〉〉.
-ndefinition IP2022_MULH_loc ≝ 〈〈x0,x0〉:〈x0,xF〉〉.
-ndefinition IP2022_ADDRH_loc ≝ 〈〈x0,x0〉:〈x1,x0〉〉.
-ndefinition IP2022_ADDRL_loc ≝ 〈〈x0,x0〉:〈x1,x1〉〉.
-ndefinition IP2022_DATAH_loc ≝ 〈〈x0,x0〉:〈x1,x2〉〉.
-ndefinition IP2022_DATAL_loc ≝ 〈〈x0,x0〉:〈x1,x3〉〉.
-ndefinition IP2022_CALLH_loc ≝ 〈〈x0,x0〉:〈x1,x4〉〉.
-ndefinition IP2022_CALLL_loc ≝ 〈〈x0,x0〉:〈x1,x5〉〉.
-
-(* **** *)
-(* READ *)
-(* **** *)
-
-(* NB: non ci sono strane indirezioni, solo registri memory mapped da intercettare *)
-ndefinition IP2022_memory_filter_read_aux ≝
-λt:memory_impl.λs:any_status IP2022 t.λaddr:word16.
-λT:Type.λfREG:byte8 → option T.λfMEM:word16 → option T.
-(* intercettare le locazioni memory mapped *)
- match eqc ? addr IP2022_ADDRSEL_loc with
- [ true ⇒ fREG (addrsel_reg_IP2022 (alu … s))
- | false ⇒
- match eqc ? addr IP2022_ADDRX_loc with
- [ true ⇒ fREG (w24x (get_addrarray (addrsel_reg_IP2022 (alu … s))
- (addr_array_IP2022 (alu … s))))
- | false ⇒
- match eqc ? addr IP2022_IPH_loc with
- [ true ⇒ fREG (cnH ? (ip_reg_IP2022 (alu … s)))
- | false ⇒
- match eqc ? addr IP2022_IPL_loc with
- [ true ⇒ fREG (cnL ? (ip_reg_IP2022 (alu … s)))
- | false ⇒
- match eqc ? addr IP2022_SPH_loc with
- [ true ⇒ fREG (cnH ? (sp_reg_IP2022 (alu … s)))
- | false ⇒
- match eqc ? addr IP2022_SPL_loc with
- [ true ⇒ fREG (cnL ? (sp_reg_IP2022 (alu … s)))
- | false ⇒
- match eqc ? addr IP2022_PCH_loc with
- [ true ⇒ fREG (cnH ? (pc_reg_IP2022 (alu … s)))
- | false ⇒
- match eqc ? addr IP2022_PCL_loc with
- [ true ⇒ fREG (cnL ? (pc_reg_IP2022 (alu … s)))
- | false ⇒
- match eqc ? addr IP2022_W_loc with
- [ true ⇒ fREG (acc_low_reg_IP2022 (alu … s))
- | false ⇒
- (* PAGE[7:5] Z[2] H[1] C [0] *)
- match eqc ? addr IP2022_STATUS_loc with
- [ true ⇒ fREG 〈(rolc ? (ex_of_oct (page_reg_IP2022 (alu … s)))),
- (orc ? (orc ? (match z_flag_IP2022 (alu … s) with
- [ true ⇒ x4 | false ⇒ x0 ])
- (match h_flag_IP2022 (alu … s) with
- [ true ⇒ x2 | false ⇒ x0 ]))
- (match c_flag_IP2022 (alu … s) with
- [ true ⇒ x1 | false ⇒ x0 ]))〉
- | false ⇒
- match eqc ? addr IP2022_DPH_loc with
- [ true ⇒ fREG (cnH ? (dp_reg_IP2022 (alu … s)))
- | false ⇒
- match eqc ? addr IP2022_DPL_loc with
- [ true ⇒ fREG (cnL ? (dp_reg_IP2022 (alu … s)))
- | false ⇒
- (* SPEED[3:0] *)
- match eqc ? addr IP2022_SPEED_loc with
- [ true ⇒ fREG (extu_b8 (speed_reg_IP2022 (alu … s)))
- | false ⇒
- match eqc ? addr IP2022_MULH_loc with
- [ true ⇒ fREG (mulh_reg_IP2022 (alu … s))
- | false ⇒
- match eqc ? addr IP2022_ADDRH_loc with
- [ true ⇒ fREG (w24h (get_addrarray (addrsel_reg_IP2022 (alu … s))
- (addr_array_IP2022 (alu … s))))
- | false ⇒
- match eqc ? addr IP2022_ADDRL_loc with
- [ true ⇒ fREG (w24l (get_addrarray (addrsel_reg_IP2022 (alu … s))
- (addr_array_IP2022 (alu … s))))
- | false ⇒
- match eqc ? addr IP2022_DATAH_loc with
- [ true ⇒ fREG (cnH ? (data_reg_IP2022 (alu … s)))
- | false ⇒
- match eqc ? addr IP2022_DATAL_loc with
- [ true ⇒ fREG (cnL ? (data_reg_IP2022 (alu … s)))
- | false ⇒
- match eqc ? addr IP2022_CALLH_loc with
- [ true ⇒ fREG (cnH ? (getn_array16T x0 ? (call_stack_IP2022 (alu … s))))
- | false ⇒
- match eqc ? addr IP2022_CALLL_loc with
- [ true ⇒ fREG (cnL ? (getn_array16T x0 ? (call_stack_IP2022 (alu … s))))
-(* accesso normale *)
- | false ⇒ fMEM addr
- ]]]]]]]]]]]]]]]]]]]].
-
-(* lettura IP2022 di un byte *)
-ndefinition IP2022_memory_filter_read ≝
-λt:memory_impl.λs:any_status IP2022 t.λaddr:word16.
- IP2022_memory_filter_read_aux t s addr byte8
- (λb.Some byte8 b)
- (mem_read t (mem_desc … s) (chk_desc … s) o0).
-
-(* lettura IP2022 di un bit *)
-ndefinition IP2022_memory_filter_read_bit ≝
-λt:memory_impl.λs:any_status IP2022 t.λaddr:word16.λsub:oct.
- IP2022_memory_filter_read_aux t s addr bool
- (λb.Some bool (getn_array8T sub bool (bits_of_byte8 b)))
- (λa.mem_read_bit t (mem_desc … s) (chk_desc … s) o0 a sub).
-
-(* ***** *)
-(* WRITE *)
-(* ***** *)
-
-ndefinition high_write_aux_w16 ≝
-λf:byte8 → byte8.λw:word16.〈(f (cnH ? w)):(cnL ? w)〉.
-
-ndefinition lowc_write_aux_w16 ≝
-λf:byte8 → byte8.λw:word16.λflag:aux_mod_type.
- 〈((match flag with
- [ auxMode_ok ⇒ λx.x
- | auxMode_inc ⇒ succc ?
- | auxMode_dec ⇒ predc ? ]) (cnH ? w)):
- (f (cnL ? w))〉.
-
-ndefinition lownc_write_aux_w16 ≝
-λf:byte8 → byte8.λw:word16.〈(cnH ? w):(f (cnL ? w))〉.
-
-ndefinition ext_write_aux_w24 ≝
-λf:byte8 → byte8.λw:word24.〈(f (w24x w));(w24h w);(w24l w)〉.
-
-ndefinition high_write_aux_w24 ≝
-λf:byte8 → byte8.λw:word24.〈(w24x w);(f (w24h w));(w24l w)〉.
-
-ndefinition low_write_aux_w24 ≝
-λf:byte8 → byte8.λw:word24.λflag:aux_mod_type.
- match (match flag with
- [ auxMode_ok ⇒ λx.x
- | auxMode_inc ⇒ succc ?
- | auxMode_dec ⇒ predc ? ]) 〈(w24x w):(w24h w)〉 with
- [ mk_comp_num wx' wh' ⇒ 〈wx';wh';(w24l w)〉 ].
-
-(* flag di carry: riportare il carry al byte logicamente superiore *)
-(* modifica di pc: non inserita nella stato ma postposta *)
-ndefinition IP2022_memory_filter_write_aux ≝
-λt:memory_impl.λs:any_status IP2022 t.λaddr:word16.λflag:aux_mod_type.
-λfREG:byte8 → byte8.λfMEM:word16 → option (aux_mem_type t).
-(* intercettare le locazioni memory mapped *)
- match eqc ? addr IP2022_ADDRSEL_loc with
- [ true ⇒ set_addrsel_reg … s (fREG (addrsel_reg_IP2022 (alu … s)))
- | false ⇒
- match eqc ? addr IP2022_ADDRX_loc with
- [ true ⇒ set_addr_reg … s (ext_write_aux_w24 fREG (get_addrarray (addrsel_reg_IP2022 (alu … s))
- (addr_array_IP2022 (alu … s))))
- | false ⇒
- match eqc ? addr IP2022_IPH_loc with
- [ true ⇒ set_ip_reg … s (high_write_aux_w16 fREG (ip_reg_IP2022 (alu … s)))
- | false ⇒
- match eqc ? addr IP2022_IPL_loc with
- [ true ⇒ set_ip_reg … s (lowc_write_aux_w16 fREG (ip_reg_IP2022 (alu … s)) flag)
- | false ⇒
- match eqc ? addr IP2022_SPH_loc with
- [ true ⇒ set_sp_reg … s (high_write_aux_w16 fREG (sp_reg_IP2022 (alu … s)))
- | false ⇒
- match eqc ? addr IP2022_SPL_loc with
- [ true ⇒ set_sp_reg … s (lowc_write_aux_w16 fREG (sp_reg_IP2022 (alu … s)) flag)
- | false ⇒
- match eqc ? addr IP2022_PCL_loc with
- [ true ⇒ Some ? (set_pc_reg … s (lowc_write_aux_w16 fREG (pc_reg_IP2022 (alu … s)) flag))
- | false ⇒
- match eqc ? addr IP2022_W_loc with
- [ true ⇒ Some ? (set_acc_8_low_reg … s (fREG (acc_low_reg_IP2022 (alu … s))))
- | false ⇒
- match eqc ? addr IP2022_DPH_loc with
- [ true ⇒ set_dp_reg … s (high_write_aux_w16 fREG (dp_reg_IP2022 (alu … s)))
- | false ⇒
- match eqc ? addr IP2022_DPL_loc with
- [ true ⇒ set_dp_reg … s (lowc_write_aux_w16 fREG (dp_reg_IP2022 (alu … s)) flag)
- | false ⇒
- match eqc ? addr IP2022_MULH_loc with
- [ true ⇒ set_mulh_reg … s (fREG (mulh_reg_IP2022 (alu … s)))
- | false ⇒
- match eqc ? addr IP2022_ADDRH_loc with
- [ true ⇒ set_addr_reg … s (high_write_aux_w24 fREG (get_addrarray (addrsel_reg_IP2022 (alu … s))
- (addr_array_IP2022 (alu … s))))
- | false ⇒
- match eqc ? addr IP2022_ADDRL_loc with
- [ true ⇒ set_addr_reg … s (low_write_aux_w24 fREG (get_addrarray (addrsel_reg_IP2022 (alu … s))
- (addr_array_IP2022 (alu … s))) flag)
- | false ⇒
- match eqc ? addr IP2022_DATAH_loc with
- [ true ⇒ set_data_reg … s (high_write_aux_w16 fREG (data_reg_IP2022 (alu … s)))
- | false ⇒
-(* nessun riporto automatico *)
- match eqc ? addr IP2022_DATAL_loc with
- [ true ⇒ set_data_reg … s (lownc_write_aux_w16 fREG (data_reg_IP2022 (alu … s)))
- | false ⇒
- match eqc ? addr IP2022_CALLH_loc with
- [ true ⇒ set_call_reg … s (high_write_aux_w16 fREG (getn_array16T x0 ? (call_stack_IP2022 (alu … s))))
- | false ⇒
-(* nessun riporto automatico *)
- match eqc ? addr IP2022_CALLL_loc with
- [ true ⇒ set_call_reg … s (lownc_write_aux_w16 fREG (getn_array16T x0 ? (call_stack_IP2022 (alu … s))))
-(* accesso normale *)
- | false ⇒ opt_map … (fMEM addr)
- (λmem'.Some ? (set_mem_desc … s mem'))
- ]]]]]]]]]]]]]]]]].
-
-(* scrittura IP2022 di un byte *)
-ndefinition IP2022_memory_filter_write ≝
-λt:memory_impl.λs:any_status IP2022 t.
-λaddr:word16.λflag:aux_mod_type.λval:byte8.
- (* PAGE[7:5] Z[2] H[1] C [0] *)
- match eqc ? addr IP2022_STATUS_loc with
- [ true ⇒ Some ?
- (set_alu … s
- (set_page_reg_IP2022
- (set_z_flag_IP2022
- (set_h_flag_IP2022
- (set_c_flag_IP2022 (alu … s)
- (getn_array8T o7 ? (bits_of_byte8 val)))
- (getn_array8T o6 ? (bits_of_byte8 val)))
- (getn_array8T o5 ? (bits_of_byte8 val)))
- (oct_of_exH (cnH ? val))))
- (* accesso a registro_non_spezzato/normale *)
- | false ⇒ IP2022_memory_filter_write_aux t s addr flag
- (λb.val)
- (λa.mem_update t (mem_desc … s) (chk_desc … s) o0 a val) ].
-
-(* scrittura IP2022 di un bit *)
-ndefinition IP2022_memory_filter_write_bit ≝
-λt:memory_impl.λs:any_status IP2022 t.
-λaddr:word16.λsub:oct.λval:bool.
- (* PAGE[7:5] Z[2] H[1] C [0] *)
- match eqc ? addr IP2022_STATUS_loc with
- [ true ⇒ Some ? (set_alu … s
- (match sub with
- [ o0 ⇒ set_page_reg_IP2022 (alu … s)
- ((match val with [ true ⇒ or_oct o4 | false ⇒ and_oct o3 ])
- (page_reg_IP2022 (alu … s)))
- | o1 ⇒ set_page_reg_IP2022 (alu … s)
- ((match val with [ true ⇒ or_oct o2 | false ⇒ and_oct o5 ])
- (page_reg_IP2022 (alu … s)))
- | o2 ⇒ set_page_reg_IP2022 (alu … s)
- ((match val with [ true ⇒ or_oct o1 | false ⇒ and_oct o6 ])
- (page_reg_IP2022 (alu … s)))
- | o5 ⇒ set_z_flag_IP2022 (alu … s) val
- | o6 ⇒ set_h_flag_IP2022 (alu … s) val
- | o7 ⇒ set_c_flag_IP2022 (alu … s) val
- | _ ⇒ alu … s ]))
- (* accesso a registro_non_spezzato/normale *)
- | false ⇒ IP2022_memory_filter_write_aux t s addr auxMode_ok
- (λb.byte8_of_bits (setn_array8T sub bool (bits_of_byte8 b) val))
- (λa.mem_update_bit t (mem_desc … s) (chk_desc … s) o0 a sub val) ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status_setter.ma".
-
-(* **** *)
-(* READ *)
-(* **** *)
-
-(* NB: fare molta attenzione alle note sulle combinazioni possibili perche'
- il comportamento della memoria nell'RS08 e' strano e ci sono
- precise condizioni che impediscono una semantica circolare dell'accesso
- (divergenza=assenza di definizione) *)
-ndefinition RS08_memory_filter_read_aux ≝
-λt:memory_impl.λs:any_status RS08 t.λaddr:word16.
-λT:Type.λfREG:byte8 → option T.λfMEM:word16 → option T.
-(* possibili accessi al registro X
- 1) addr=000F: diretto
- 2) addr=000E (X =0F): indiretto
- 3) addr=00CF (PS=00): paging
- [NB] altre combinazioni non funzionano perche' la MCU non e' un oggetto reattivo:
- non si possono combinare due effetti contemporaneamente!
- per esempio accesso addr=00CE (PS=00,X=0F) non puo' produrre 2 indirezioni *)
- match (eqc ? addr 〈〈x0,x0〉:〈x0,xF〉〉) ⊕
- (eqc ? addr 〈〈x0,x0〉:〈x0,xE〉〉 ⊗ eqc ? (x_map_RS08 (alu … s)) 〈x0,xF〉) ⊕
- (eqc ? addr 〈〈x0,x0〉:〈xC,xF〉〉 ⊗ eqc ? (ps_map_RS08 (alu … s)) 〈x0,x0〉) with
- [ true ⇒ fREG (x_map_RS08 (alu … s))
- | false ⇒
-(* possibili accessi al registro PS
- 1) addr=001F: diretto
- 2) addr=000E (X =1F): indiretto
- 3) addr=00DF (PS=00): paging *)
- match (eqc ? addr 〈〈x0,x0〉:〈x1,xF〉〉) ⊕
- (eqc ? addr 〈〈x0,x0〉:〈x0,xE〉〉 ⊗ eqc ? (x_map_RS08 (alu … s)) 〈x1,xF〉) ⊕
- (eqc ? addr 〈〈x0,x0〉:〈xD,xF〉〉 ⊗ eqc ? (ps_map_RS08 (alu … s)) 〈x0,x0〉) with
- [ true ⇒ fREG (ps_map_RS08 (alu … s))
- | false ⇒
-(* accesso a D[X]: se accede a [00C0-00FF] e' la RAM fisica, non il paging
- altrimenti sarebbero 2 indirezioni *)
- match eqc ? addr 〈〈x0,x0〉:〈x0,xE〉〉 with
- [ true ⇒ fMEM (extu_w16 (x_map_RS08 (alu … s)))
- | false ⇒
-(* accesso al paging: [00pp pppp ppxx xxxx] con p=PS x=addr *)
- match inrangec ? addr 〈〈x0,x0〉:〈xC,x0〉〉 〈〈x0,x0〉:〈xF,xF〉〉 with
- [ true ⇒ fMEM (orc ? (rorc ? (rorc ? 〈(ps_map_RS08 (alu … s)):〈x0,x0〉〉))
- (andc ? addr 〈〈x0,x0〉:〈x3,xF〉〉))
-(* accesso normale *)
- | false ⇒ fMEM addr ]]]].
-
-(* lettura RS08 di un byte *)
-ndefinition RS08_memory_filter_read ≝
-λt:memory_impl.λs:any_status RS08 t.λaddr:word16.
- RS08_memory_filter_read_aux t s addr byte8
- (λb.Some byte8 b)
- (mem_read t (mem_desc … s) (chk_desc … s) o0).
-
-(* lettura RS08 di un bit *)
-ndefinition RS08_memory_filter_read_bit ≝
-λt:memory_impl.λs:any_status RS08 t.λaddr:word16.λsub:oct.
- RS08_memory_filter_read_aux t s addr bool
- (λb.Some bool (getn_array8T sub bool (bits_of_byte8 b)))
- (λa.mem_read_bit t (mem_desc … s) (chk_desc … s) o0 a sub).
-
-(* ***** *)
-(* WRITE *)
-(* ***** *)
-
-ndefinition RS08_memory_filter_write_aux ≝
-λt:memory_impl.λs:any_status RS08 t.λaddr:word16.
-λfREG:byte8 → byte8.λfMEM:word16 → option (aux_mem_type t).
-(* possibili accessi al registro X
- 1) addr=000F: diretto
- 2) addr=000E (X =0F): indiretto
- 3) addr=00CF (PS=00): paging
- [NB] altre combinazioni non funzionano perche' la MCU non e' un oggetto reattivo:
- non si possono combinare due effetti contemporaneamente!
- per esempio accesso addr=00CE (PS=00,X=0F) non puo' produrre 2 indirezioni *)
- match (eqc ? addr 〈〈x0,x0〉:〈x0,xF〉〉) ⊕
- (eqc ? addr 〈〈x0,x0〉:〈x0,xE〉〉 ⊗ eqc ? (x_map_RS08 (alu … s)) 〈x0,xF〉) ⊕
- (eqc ? addr 〈〈x0,x0〉:〈xC,xF〉〉 ⊗ eqc ? (ps_map_RS08 (alu … s)) 〈x0,x0〉) with
- [ true ⇒ set_x_map … s (fREG (x_map_RS08 (alu … s)))
- | false ⇒
-(* possibili accessi al registro PS
- 1) addr=001F: diretto
- 2) addr=000E (X =1F): indiretto
- 3) addr=00DF (PS=00): paging *)
- match (eqc ? addr 〈〈x0,x0〉:〈x1,xF〉〉) ⊕
- (eqc ? addr 〈〈x0,x0〉:〈x0,xE〉〉 ⊗ eqc ? (x_map_RS08 (alu … s)) 〈x1,xF〉) ⊕
- (eqc ? addr 〈〈x0,x0〉:〈xD,xF〉〉 ⊗ eqc ? (ps_map_RS08 (alu … s)) 〈x0,x0〉) with
- [ true ⇒ set_ps_map … s (fREG (x_map_RS08 (alu … s)))
- | false ⇒
-(* accesso a D[X]: se accede a [00C0-00FF] e' la RAM fisica, non il paging
- altrimenti sarebbero 2 indirezioni *)
- match eqc ? addr 〈〈x0,x0〉:〈x0,xE〉〉 with
- [ true ⇒ opt_map … (fMEM (extu_w16 (x_map_RS08 (alu … s))))
- (λmem'.Some ? (set_mem_desc … s mem'))
- | false ⇒
-(* accesso al paging: [00pp pppp ppxx xxxx] con p=PS x=addr *)
- match inrangec ? addr 〈〈x0,x0〉:〈xC,x0〉〉 〈〈x0,x0〉:〈xF,xF〉〉 with
- [ true ⇒ opt_map … (fMEM (orc ? (rorc ? (rorc ? 〈(ps_map_RS08 (alu … s)):〈x0,x0〉〉))
- (andc ? addr 〈〈x0,x0〉:〈x3,xF〉〉)))
- (λmem'.Some ? (set_mem_desc … s mem'))
-(* accesso normale *)
- | false ⇒ opt_map … (fMEM addr)
- (λmem'.Some ? (set_mem_desc … s mem')) ]]]].
-
-(* scrittura RS08 di un byte *)
-ndefinition RS08_memory_filter_write ≝
-λt:memory_impl.λs:any_status RS08 t.λaddr:word16.λval:byte8.
- RS08_memory_filter_write_aux t s addr
- (λb.val)
- (λa.mem_update t (mem_desc … s) (chk_desc … s) o0 a val).
-
-(* scrittura RS08 di un bit *)
-ndefinition RS08_memory_filter_write_bit ≝
-λt:memory_impl.λs:any_status RS08 t.λaddr:word16.λsub:oct.λval:bool.
- RS08_memory_filter_write_aux t s addr
- (λb.byte8_of_bits (setn_array8T sub bool (bits_of_byte8 b) val))
- (λa.mem_update_bit t (mem_desc … s) (chk_desc … s) o0 a sub val).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/read_write/Freescale_fetch.ma".
-include "emulator/read_write/IP2022_fetch.ma".
-include "emulator/status/status_getter.ma".
-
-ndefinition fetch ≝
-λm,t.λs:any_status m t.
- match m with
- [ HC05 ⇒ fetch_byte
- | HC08 ⇒ Freescale_fetch_byte_or_word
- | HCS08 ⇒ Freescale_fetch_byte_or_word
- | RS08 ⇒ fetch_byte
- | IP2022 ⇒ IP2022_fetch_byte_or_word
- ] m t s (get_pc_reg … s).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/translation/translation.ma".
-
-(* errori possibili nel fetch OPCODE / ILLEGAL ADDRESS *)
-ninductive error_type : Type ≝
- ILL_OP: error_type
-| ILL_FETCH_AD: error_type
-.
-
-(* - errore: interessa solo l'errore
- - ok: interessa info, nuovo pc *)
-ninductive fetch_result (A:Type) : Type ≝
- FetchERR : error_type → fetch_result A
-| FetchOK : A → word16 → fetch_result A.
-
-ndefinition fetch_byte_aux ≝
-λm:mcu_type.λcur_pc:word16.λbh:byte8.
- match full_info_of_word16 m (Byte bh) with
- [ None ⇒ FetchERR ? ILL_FETCH_AD
- | Some info ⇒ FetchOK ? info cur_pc
- ].
-
-ndefinition fetch_word_aux ≝
-λm:mcu_type.λcur_pc:word16.λw:word16.
- match full_info_of_word16 m (Word w) with
- [ None ⇒ FetchERR ? ILL_FETCH_AD
- | Some info ⇒ FetchOK ? info cur_pc
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/read_write/Freescale_load_write.ma".
-include "emulator/read_write/IP2022_load_write.ma".
-
-(* ************************************** *)
-(* raccordo di tutte le possibili letture *)
-(* ************************************** *)
-
-ndefinition multi_mode_loadb ≝
-λm.match m
- return λm.Πt.any_status m t → word16 → aux_im_type m →
- option (Prod3T (any_status m t) byte8 word16)
- with
- [ HC05 ⇒ Freescale_multi_mode_load_auxb HC05
- | HC08 ⇒ Freescale_multi_mode_load_auxb HC08
- | HCS08 ⇒ Freescale_multi_mode_load_auxb HCS08
- | RS08 ⇒ Freescale_multi_mode_load_auxb RS08
- | IP2022 ⇒ IP2022_multi_mode_load_auxb
- ].
-
-ndefinition multi_mode_loadw ≝
-λm.match m
- return λm.Πt.any_status m t → word16 → aux_im_type m →
- option (Prod3T (any_status m t) word16 word16)
- with
- [ HC05 ⇒ Freescale_multi_mode_load_auxw HC05
- | HC08 ⇒ Freescale_multi_mode_load_auxw HC08
- | HCS08 ⇒ Freescale_multi_mode_load_auxw HCS08
- | RS08 ⇒ Freescale_multi_mode_load_auxw RS08
- | IP2022 ⇒ IP2022_multi_mode_load_auxw
- ].
-
-(* **************************************** *)
-(* raccordo di tutte le possibili scritture *)
-(* **************************************** *)
-
-ndefinition multi_mode_writeb ≝
-λm.match m
- return λm.Πt.any_status m t → word16 → aux_mod_type → aux_im_type m → byte8 →
- option (ProdT (any_status m t) word16)
- with
- [ HC05 ⇒ Freescale_multi_mode_write_auxb HC05
- | HC08 ⇒ Freescale_multi_mode_write_auxb HC08
- | HCS08 ⇒ Freescale_multi_mode_write_auxb HCS08
- | RS08 ⇒ Freescale_multi_mode_write_auxb RS08
- | IP2022 ⇒ IP2022_multi_mode_write_auxb
- ].
-
-ndefinition multi_mode_writew ≝
-λm.match m
- return λm.Πt.any_status m t → word16 → aux_im_type m → word16 →
- option (ProdT (any_status m t) word16)
- with
- [ HC05 ⇒ Freescale_multi_mode_write_auxw HC05
- | HC08 ⇒ Freescale_multi_mode_write_auxw HC08
- | HCS08 ⇒ Freescale_multi_mode_write_auxw HCS08
- | RS08 ⇒ Freescale_multi_mode_write_auxw RS08
- | IP2022 ⇒ IP2022_multi_mode_write_auxw
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/read_write/read_write.ma".
-
-(* mattoni base *)
-(* - incrementano l'indirizzo normalmente *)
-(* - incrementano PC attraverso il filtro *)
-(* - letture filtrate, quindi da segmento 0 *)
-
-(* lettura byte da addr *)
-ndefinition loadb_from ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
-λaddr:word16.λcur_pc:word16.λfetched:exadecim.
- opt_map … (memory_filter_read … s addr)
- (λb.Some ? (triple … s b (plusc_d_d ? cur_pc (extu2_w16 fetched)))).
-
-(* lettura bit da addr *)
-ndefinition loadbit_from ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
-λaddr:word16.λsub:oct.λcur_pc:word16.λfetched:exadecim.
- opt_map … (memory_filter_read_bit … s addr sub)
- (λb.Some ? (triple … s b (plusc_d_d ? cur_pc (extu2_w16 fetched)))).
-
-(* lettura word da addr *)
-ndefinition loadw_from ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
-λaddr:word16.λcur_pc:word16.λfetched:exadecim.
- opt_map … (memory_filter_read … s addr)
- (λbh.opt_map … (memory_filter_read … s (succc ? addr))
- (λbl.Some ? (triple … s 〈bh:bl〉 (plusc_d_d ? cur_pc (extu2_w16 fetched))))).
-
-(* scrittura byte su addr *)
-ndefinition writeb_to ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
-λaddr:word16.λflag:aux_mod_type.λcur_pc:word16.λfetched:exadecim.λwriteb:byte8.
- opt_map … (memory_filter_write … s addr flag writeb)
- (λtmps.Some ? (pair … tmps (plusc_d_d ? cur_pc (extu2_w16 fetched)))).
-
-(* scrittura bit su addr *)
-ndefinition writebit_to ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
-λaddr:word16.λsub:oct.λcur_pc:word16.λfetched:exadecim.λwriteb:bool.
- opt_map … (memory_filter_write_bit … s addr sub writeb)
- (λtmps.Some ? (pair … tmps (plusc_d_d ? cur_pc (extu2_w16 fetched)))).
-
-(* scrittura word su addr *)
-ndefinition writew_to ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
-λaddr:word16.λflag:aux_mod_type.λcur_pc:word16.λfetched:exadecim.λwritew:word16.
- opt_map … (memory_filter_write … s addr auxMode_ok (cnH ? writew))
- (λtmps1.opt_map … (memory_filter_write … tmps1 (succc ? addr) auxMode_ok (cnL ? writew))
- (λtmps2.Some ? (pair … tmps2 (plusc_d_d ? cur_pc (extu2_w16 fetched))))).
-
-(* ausiliari per definire i tipi e la lettura/scrittura *)
-
-(* ausiliaria per definire il tipo di aux_load *)
-ndefinition aux_load_typing ≝
-λm:mcu_type.λt:memory_impl.λbyteflag:bool.
- any_status m t → word16 → word16 → exadecim →
- option (Prod3T (any_status m t) match byteflag with [ true ⇒ byte8 | false ⇒ word16 ] word16).
-
-(* per non dover ramificare i vari load in byte/word *)
-ndefinition aux_load ≝
-λm:mcu_type.λt:memory_impl.λbyteflag:bool.match byteflag return aux_load_typing m t with
- [ true ⇒ loadb_from m t | false ⇒ loadw_from m t ].
-
-(* ausiliaria per definire il tipo di aux_write *)
-ndefinition aux_write_typing ≝
-λm:mcu_type.λt:memory_impl.λbyteflag:bool.
- any_status m t → word16 → aux_mod_type → word16 → exadecim →
- match byteflag with [ true ⇒ byte8 | false ⇒ word16 ] →
- option (ProdT (any_status m t) word16).
-
-(* per non dover ramificare i vari load in byte/word *)
-ndefinition aux_write ≝
-λm:mcu_type.λt:memory_impl.λbyteflag:bool.match byteflag return aux_write_typing m t with
- [ true ⇒ writeb_to m t | false ⇒ writew_to m t ].
-
-ndefinition mem_read_s ≝
-λm,t.λs:any_status m t.mem_read t (mem_desc … s) (chk_desc … s).
-
-ndefinition mem_read_bit_s ≝
-λm,t.λs:any_status m t.mem_read_bit t (mem_desc … s) (chk_desc … s).
-
-ndefinition mem_write_s ≝
-λm,t.λs:any_status m t.λseg,a,val.
- opt_map … (mem_update t (mem_desc … s) (chk_desc … s) seg a val)
- (λmem'.Some ? (set_mem_desc … s mem')).
-
-ndefinition mem_write_bit_s ≝
-λm,t.λs:any_status m t.λseg,a,sub,val.
- opt_map … (mem_update_bit t (mem_desc … s) (chk_desc … s) seg a sub val)
- (λmem'.Some ? (set_mem_desc … s mem')).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/read_write/RS08_read_write.ma".
-include "emulator/read_write/IP2022_read_write.ma".
-
-(* filtraggio avviene sempre sul segmento 0 *)
-
-(* in caso di RS08/IP2022 si dirotta sul filtro, altrimenti si legge direttamente *)
-ndefinition memory_filter_read ≝
-λm:mcu_type.λt:memory_impl.match m return λm:mcu_type.any_status m t → word16 → option byte8 with
- [ HC05 ⇒ λs:any_status HC05 t.
- mem_read t (mem_desc … s) (chk_desc … s) o0
- | HC08 ⇒ λs:any_status HC08 t.
- mem_read t (mem_desc … s) (chk_desc … s) o0
- | HCS08 ⇒ λs:any_status HCS08 t.
- mem_read t (mem_desc … s) (chk_desc … s) o0
- | RS08 ⇒ RS08_memory_filter_read t
- | IP2022 ⇒ IP2022_memory_filter_read t
- ].
-
-ndefinition memory_filter_read_bit ≝
-λm:mcu_type.λt:memory_impl.match m return λm:mcu_type.any_status m t → word16 → oct → option bool with
- [ HC05 ⇒ λs:any_status HC05 t.
- mem_read_bit t (mem_desc … s) (chk_desc … s) o0
- | HC08 ⇒ λs:any_status HC08 t.
- mem_read_bit t (mem_desc … s) (chk_desc … s) o0
- | HCS08 ⇒ λs:any_status HCS08 t.
- mem_read_bit t (mem_desc … s) (chk_desc … s) o0
- | RS08 ⇒ RS08_memory_filter_read_bit t
- | IP2022 ⇒ IP2022_memory_filter_read_bit t
- ].
-
-ndefinition memory_filter_write ≝
-λm:mcu_type.λt:memory_impl.match m
- return λm:mcu_type.any_status m t → word16 → aux_mod_type → byte8 → option (any_status m t) with
- [ HC05 ⇒ λs:any_status HC05 t.λaddr:word16.λflag:aux_mod_type.λval:byte8.
- opt_map … (mem_update t (mem_desc … s) (chk_desc … s) o0 addr val)
- (λmem.Some ? (set_mem_desc … s mem))
- | HC08 ⇒ λs:any_status HC08 t.λaddr:word16.λflag:aux_mod_type.λval:byte8.
- opt_map … (mem_update t (mem_desc … s) (chk_desc … s) o0 addr val)
- (λmem.Some ? (set_mem_desc … s mem))
- | HCS08 ⇒ λs:any_status HCS08 t.λaddr:word16.λflag:aux_mod_type.λval:byte8.
- opt_map … (mem_update t (mem_desc … s) (chk_desc … s) o0 addr val)
- (λmem.Some ? (set_mem_desc … s mem))
- | RS08 ⇒ λs:any_status RS08 t.λaddr:word16.λflag:aux_mod_type.
- RS08_memory_filter_write t s addr
- | IP2022 ⇒ IP2022_memory_filter_write t
- ].
-
-ndefinition memory_filter_write_bit ≝
-λm:mcu_type.λt:memory_impl.match m
- return λm:mcu_type.any_status m t → word16 → oct → bool → option (any_status m t) with
- [ HC05 ⇒ λs:any_status HC05 t.λaddr:word16.λsub:oct.λval:bool.
- opt_map … (mem_update_bit t (mem_desc … s) (chk_desc … s) o0 addr sub val)
- (λmem.Some ? (set_mem_desc … s mem))
- | HC08 ⇒ λs:any_status HC08 t.λaddr:word16.λsub:oct.λval:bool.
- opt_map … (mem_update_bit t (mem_desc … s) (chk_desc … s) o0 addr sub val)
- (λmem.Some ? (set_mem_desc … s mem))
- | HCS08 ⇒ λs:any_status HCS08 t.λaddr:word16.λsub:oct.λval:bool.
- opt_map … (mem_update_bit t (mem_desc … s) (chk_desc … s) o0 addr sub val)
- (λmem.Some ? (set_mem_desc … s mem))
- | RS08 ⇒ RS08_memory_filter_write_bit t
- | IP2022 ⇒ IP2022_memory_filter_write_bit t
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/theory.ma".
-
-(* flag ausiliario per la scrittura
- normale / con riporto(+) / con riporto(-) *)
-ninductive aux_mod_type : Type ≝
- auxMode_ok : aux_mod_type
-| auxMode_inc : aux_mod_type
-| auxMode_dec : aux_mod_type
-.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/HC05_status_base.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-nlemma aluHC05_destruct_1 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x1 = y1.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 a _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_2 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x2 = y2.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ a _ _ _ _ _ _ _ _ _ _ _ ⇒ x2 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_3 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x3 = y3.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ a _ _ _ _ _ _ _ _ _ _ ⇒ x3 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_4 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x4 = y4.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ a _ _ _ _ _ _ _ _ _ ⇒ x4 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_5 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x5 = y5.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ a _ _ _ _ _ _ _ _ ⇒ x5 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_6 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x6 = y6.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ _ a _ _ _ _ _ _ _ ⇒ x6 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_7 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x7 = y7.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ _ _ a _ _ _ _ _ _ ⇒ x7 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_8 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x8 = y8.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ _ _ _ a _ _ _ _ _ ⇒ x8 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_9 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x9 = y9.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ _ _ _ _ a _ _ _ _ ⇒ x9 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_10 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x10 = y10.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ _ _ _ _ _ a _ _ _ ⇒ x10 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_11 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x11 = y11.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ _ _ _ _ _ _ a _ _ ⇒ x11 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_12 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x12 = y12.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ _ _ _ _ _ _ _ a _ ⇒ x12 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_destruct_13 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13.
- mk_alu_HC05 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 = mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 →
- x13 = y13.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange with (match mk_alu_HC05 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13
- with [ mk_alu_HC05 _ _ _ _ _ _ _ _ _ _ _ _ a ⇒ x13 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma eq_to_eqaluHC05 : ∀alu1,alu2.alu1 = alu2 → eq_HC05_alu alu1 alu2 = true.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nrewrite > (aluHC05_destruct_1 … H);
- nrewrite > (aluHC05_destruct_2 … H);
- nrewrite > (aluHC05_destruct_3 … H);
- nrewrite > (aluHC05_destruct_4 … H);
- nrewrite > (aluHC05_destruct_5 … H);
- nrewrite > (aluHC05_destruct_6 … H);
- nrewrite > (aluHC05_destruct_7 … H);
- nrewrite > (aluHC05_destruct_8 … H);
- nrewrite > (aluHC05_destruct_9 … H);
- nrewrite > (aluHC05_destruct_10 … H);
- nrewrite > (aluHC05_destruct_11 … H);
- nrewrite > (aluHC05_destruct_12 … H);
- nrewrite > (aluHC05_destruct_13 … H);
- nchange with (
- ((eqc ? y1 y1) ⊗ (eqc ? y2 y2) ⊗
- (eqc ? y3 y3) ⊗ (eqc ? y4 y4) ⊗
- (eqc ? y5 y5) ⊗ (eqc ? y6 y6) ⊗
- (eqc ? y7 y7) ⊗ (eqc ? y8 y8) ⊗
- (eqc ? y9 y9) ⊗ (eqc ? y10 y10) ⊗
- (eqc ? y11 y11) ⊗ (eqc ? y12 y12) ⊗
- (eqc ? y13 y13)) = true);
- nrewrite > (eq_to_eqc ? y1 y1 (refl_eq …));
- nrewrite > (eq_to_eqc ? y2 y2 (refl_eq …));
- nrewrite > (eq_to_eqc ? y3 y3 (refl_eq …));
- nrewrite > (eq_to_eqc ? y4 y4 (refl_eq …));
- nrewrite > (eq_to_eqc ? y5 y5 (refl_eq …));
- nrewrite > (eq_to_eqc ? y6 y6 (refl_eq …));
- nrewrite > (eq_to_eqc ? y7 y7 (refl_eq …));
- nrewrite > (eq_to_eqc ? y8 y8 (refl_eq …));
- nrewrite > (eq_to_eqc ? y9 y9 (refl_eq …));
- nrewrite > (eq_to_eqc ? y10 y10 (refl_eq …));
- nrewrite > (eq_to_eqc ? y11 y11 (refl_eq …));
- nrewrite > (eq_to_eqc ? y12 y12 (refl_eq …));
- nrewrite > (eq_to_eqc ? y13 y13 (refl_eq …));
- napply refl_eq.
-nqed.
-
-nlemma neqaluHC05_to_neq : ∀alu1,alu2.eq_HC05_alu alu1 alu2 = false → alu1 ≠ alu2.
- #s1; #s2; #H;
- napply (not_to_not (s1 = s2) (eq_HC05_alu s1 s2 = true) …);
- ##[ ##1: napply (eq_to_eqaluHC05 s1 s2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-nlemma eqaluHC05_to_eq : ∀alu1,alu2.eq_HC05_alu alu1 alu2 = true → alu1 = alu2.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #H;
- nchange in H:(%) with (
- ((eqc ? x1 y1) ⊗ (eqc ? x2 y2) ⊗
- (eqc ? x3 y3) ⊗ (eqc ? x4 y4) ⊗
- (eqc ? x5 y5) ⊗ (eqc ? x6 y6) ⊗
- (eqc ? x7 y7) ⊗ (eqc ? x8 y8) ⊗
- (eqc ? x9 y9) ⊗ (eqc ? x10 y10) ⊗
- (eqc ? x11 y11) ⊗ (eqc ? x12 y12) ⊗
- (eqc ? x13 y13)) = true);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H));
- nletin H1 ≝ (andb_true_true_l … H);
- nrewrite > (eqc_to_eq … (andb_true_true_r … (andb_true_true_l … H)));
- nletin H2 ≝ (andb_true_true_l … H1);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H2));
- nletin H3 ≝ (andb_true_true_l … H2);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H3));
- nletin H4 ≝ (andb_true_true_l … H3);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H4));
- nletin H5 ≝ (andb_true_true_l … H4);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H5));
- nletin H6 ≝ (andb_true_true_l … H5);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H6));
- nletin H7 ≝ (andb_true_true_l … H6);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H7));
- nletin H8 ≝ (andb_true_true_l … H7);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H8));
- nletin H9 ≝ (andb_true_true_l … H8);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H9));
- nletin H10 ≝ (andb_true_true_l … H9);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H10));
- nletin H11 ≝ (andb_true_true_l … H10);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H11));
- nrewrite > (eqc_to_eq … (andb_true_true_l … H11));
- napply refl_eq.
-nqed.
-
-nlemma neq_to_neqaluHC05 : ∀alu1,alu2.alu1 ≠ alu2 → eq_HC05_alu alu1 alu2 = false.
- #s1; #s2; #H;
- napply (neqtrue_to_eqfalse (eq_HC05_alu s1 s2));
- napply (not_to_not (eq_HC05_alu s1 s2 = true) (s1 = s2) ? H);
- napply (eqaluHC05_to_eq s1 s2).
-nqed.
-
-nlemma decidable_aluHC05 : ∀x,y:alu_HC05.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_HC05_alu x y = true) (eq_HC05_alu x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqaluHC05_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqaluHC05_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqaluHC05 : symmetricT alu_HC05 bool eq_HC05_alu.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13;
- nchange with (
- ((eqc ? x1 y1) ⊗ (eqc ? x2 y2) ⊗ (eqc ? x3 y3) ⊗ (eqc ? x4 y4) ⊗
- (eqc ? x5 y5) ⊗ (eqc ? x6 y6) ⊗ (eqc ? x7 y7) ⊗ (eqc ? x8 y8) ⊗
- (eqc ? x9 y9) ⊗ (eqc ? x10 y10) ⊗ (eqc ? x11 y11) ⊗ (eqc ? x12 y12) ⊗
- (eqc ? x13 y13)) = ((eqc ? y1 x1) ⊗ (eqc ? y2 x2) ⊗ (eqc ? y3 x3) ⊗
- (eqc ? y4 x4) ⊗ (eqc ? y5 x5) ⊗ (eqc ? y6 x6) ⊗ (eqc ? y7 x7) ⊗
- (eqc ? y8 x8) ⊗ (eqc ? y9 x9) ⊗ (eqc ? y10 x10) ⊗ (eqc ? y11 x11) ⊗
- (eqc ? y12 x12) ⊗ (eqc ? y13 x13)));
- nrewrite > (symmetric_eqc ? x1 y1);
- nrewrite > (symmetric_eqc ? x2 y2);
- nrewrite > (symmetric_eqc ? x3 y3);
- nrewrite > (symmetric_eqc ? x4 y4);
- nrewrite > (symmetric_eqc ? x5 y5);
- nrewrite > (symmetric_eqc ? x6 y6);
- nrewrite > (symmetric_eqc ? x7 y7);
- nrewrite > (symmetric_eqc ? x8 y8);
- nrewrite > (symmetric_eqc ? x9 y9);
- nrewrite > (symmetric_eqc ? x10 y10);
- nrewrite > (symmetric_eqc ? x11 y11);
- nrewrite > (symmetric_eqc ? x12 y12);
- nrewrite > (symmetric_eqc ? x13 y13);
- napply refl_eq.
-nqed.
-
-nlemma aluHC05_is_comparable : comparable.
- @ alu_HC05
- ##[ napply (mk_alu_HC05 (zeroc ?) (zeroc ?) (zeroc ?) (zeroc ?)
- (zeroc ?) (zeroc ?) (zeroc ?) (zeroc ?)
- (zeroc ?) (zeroc ?) (zeroc ?) (zeroc ?)
- (zeroc ?))
- ##| napply forall_HC05_alu
- ##| napply eq_HC05_alu
- ##| napply eqaluHC05_to_eq
- ##| napply eq_to_eqaluHC05
- ##| napply neqaluHC05_to_neq
- ##| napply neq_to_neqaluHC05
- ##| napply decidable_aluHC05
- ##| napply symmetric_eqaluHC05
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr aluHC05_is_comparable ≡ alu_HC05.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/word16.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-(* ALU dell'HC05 *)
-nrecord alu_HC05: Type ≝
- {
- (* A: registo accumulatore *)
- acc_low_reg_HC05 : byte8;
- (* X: registro indice *)
- indX_low_reg_HC05 : byte8;
- (* SP: registo stack pointer *)
- sp_reg_HC05 : word16;
- (* modificatori di SP: per esempio e' definito come 0000000011xxxxxxb *)
- (* la logica della sua costruzione e' quindi (SP∧mask)∨fix *)
- (* totalmente racchiusa nella ALU, bastera' fare get(set(SP)) *)
- sp_mask_HC05 : word16;
- sp_fix_HC05 : word16;
- (* PC: registro program counter *)
- pc_reg_HC05 : word16;
- (* modificatore di PC: per esempio e' definito come 00xxxxxxxxxxxxxxb *)
- (* la logica della sua costruzione e' quindi (PC∧mask) *)
- (* totalmente racchiusa nella ALU, bastera' fare get(set(PC)) *)
- pc_mask_HC05 : word16;
-
- (* H: flag semi-carry (somma nibble basso) *)
- h_flag_HC05 : bool;
- (* I: flag mascheramento degli interrupt mascherabili: 1=mascherati *)
- i_flag_HC05 : bool;
- (* N: flag segno/negativita' *)
- n_flag_HC05 : bool;
- (* Z: flag zero *)
- z_flag_HC05 : bool;
- (* C: flag carry *)
- c_flag_HC05 : bool;
-
- (* IRQ: flag che simula il pin esterno IRQ *)
- irq_flag_HC05 : bool
- }.
-
-notation "{hvbox('A_Reg' ≝ acclow ; break 'X_Reg' ≝ indxlow ; break 'Sp_Reg' ≝ sp ; break 'Sp_Mask' ≝ spm ; break 'Sp_Fix' ≝ spf ; break 'Pc_Reg' ≝ pc ; break 'Pc_Mask' ≝ pcm ; break 'H_Flag' ≝ hfl ; break 'I_Flag' ≝ ifl ; break 'N_Flag' ≝ nfl ; break 'Z_Flag' ≝ zfl ; break 'C_Flag' ≝ cfl ; break 'IRQ_Flag' ≝ irqfl)}"
- non associative with precedence 80 for
- @{ 'mk_alu_HC05 $acclow $indxlow $sp $spm $spf $pc $pcm $hfl $ifl $nfl $zfl $cfl $irqfl }.
-interpretation "mk_alu_HC05" 'mk_alu_HC05 acclow indxlow sp spm spf pc pcm hfl ifl nfl zfl cfl irqfl =
- (mk_alu_HC05 acclow indxlow sp spm spf pc pcm hfl ifl nfl zfl cfl irqfl).
-
-(* ****** *)
-(* SETTER *)
-(* ****** *)
-
-(* setter specifico HC05 di A *)
-ndefinition set_acc_8_low_reg_HC05 ≝
-λalu.λacclow':byte8.
- mk_alu_HC05
- acclow'
- (indX_low_reg_HC05 alu)
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- (i_flag_HC05 alu)
- (n_flag_HC05 alu)
- (z_flag_HC05 alu)
- (c_flag_HC05 alu)
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di X *)
-ndefinition set_indX_8_low_reg_HC05 ≝
-λalu.λindxlow':byte8.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- indxlow'
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- (i_flag_HC05 alu)
- (n_flag_HC05 alu)
- (z_flag_HC05 alu)
- (c_flag_HC05 alu)
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di SP, effettua (SP∧mask)∨fix *)
-ndefinition set_sp_reg_HC05 ≝
-λalu.λsp':word16.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- (indX_low_reg_HC05 alu)
- (orc ? (andc ? sp' (sp_mask_HC05 alu)) (sp_fix_HC05 alu))
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- (i_flag_HC05 alu)
- (n_flag_HC05 alu)
- (z_flag_HC05 alu)
- (c_flag_HC05 alu)
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di PC, effettua PC∧mask *)
-ndefinition set_pc_reg_HC05 ≝
-λalu.λpc':word16.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- (indX_low_reg_HC05 alu)
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (andc ? pc' (pc_mask_HC05 alu))
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- (i_flag_HC05 alu)
- (n_flag_HC05 alu)
- (z_flag_HC05 alu)
- (c_flag_HC05 alu)
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di H *)
-ndefinition set_h_flag_HC05 ≝
-λalu.λhfl':bool.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- (indX_low_reg_HC05 alu)
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- hfl'
- (i_flag_HC05 alu)
- (n_flag_HC05 alu)
- (z_flag_HC05 alu)
- (c_flag_HC05 alu)
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di I *)
-ndefinition set_i_flag_HC05 ≝
-λalu.λifl':bool.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- (indX_low_reg_HC05 alu)
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- ifl'
- (n_flag_HC05 alu)
- (z_flag_HC05 alu)
- (c_flag_HC05 alu)
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di N *)
-ndefinition set_n_flag_HC05 ≝
-λalu.λnfl':bool.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- (indX_low_reg_HC05 alu)
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- (i_flag_HC05 alu)
- nfl'
- (z_flag_HC05 alu)
- (c_flag_HC05 alu)
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di Z *)
-ndefinition set_z_flag_HC05 ≝
-λalu.λzfl':bool.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- (indX_low_reg_HC05 alu)
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- (i_flag_HC05 alu)
- (n_flag_HC05 alu)
- zfl'
- (c_flag_HC05 alu)
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di C *)
-ndefinition set_c_flag_HC05 ≝
-λalu.λcfl':bool.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- (indX_low_reg_HC05 alu)
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- (i_flag_HC05 alu)
- (n_flag_HC05 alu)
- (z_flag_HC05 alu)
- cfl'
- (irq_flag_HC05 alu).
-
-(* setter specifico HC05 di IRQ *)
-ndefinition set_irq_flag_HC05 ≝
-λalu.λirqfl':bool.
- mk_alu_HC05
- (acc_low_reg_HC05 alu)
- (indX_low_reg_HC05 alu)
- (sp_reg_HC05 alu)
- (sp_mask_HC05 alu)
- (sp_fix_HC05 alu)
- (pc_reg_HC05 alu)
- (pc_mask_HC05 alu)
- (h_flag_HC05 alu)
- (i_flag_HC05 alu)
- (n_flag_HC05 alu)
- (z_flag_HC05 alu)
- (c_flag_HC05 alu)
- irqfl'.
-
-(* ***************** *)
-(* CONFRONTO FRA ALU *)
-(* ***************** *)
-
-(* confronto registro per registro dell'HC05 *)
-ndefinition eq_HC05_alu ≝
-λalu1,alu2:alu_HC05.
- (eqc ? (acc_low_reg_HC05 alu1) (acc_low_reg_HC05 alu2)) ⊗
- (eqc ? (indX_low_reg_HC05 alu1) (indX_low_reg_HC05 alu2)) ⊗
- (eqc ? (sp_reg_HC05 alu1) (sp_reg_HC05 alu2)) ⊗
- (eqc ? (sp_mask_HC05 alu1) (sp_mask_HC05 alu2)) ⊗
- (eqc ? (sp_fix_HC05 alu1) (sp_fix_HC05 alu2)) ⊗
- (eqc ? (pc_reg_HC05 alu1) (pc_reg_HC05 alu2)) ⊗
- (eqc ? (pc_mask_HC05 alu1) (pc_mask_HC05 alu2)) ⊗
- (eqc ? (h_flag_HC05 alu1) (h_flag_HC05 alu2)) ⊗
- (eqc ? (i_flag_HC05 alu1) (i_flag_HC05 alu2)) ⊗
- (eqc ? (n_flag_HC05 alu1) (n_flag_HC05 alu2)) ⊗
- (eqc ? (z_flag_HC05 alu1) (z_flag_HC05 alu2)) ⊗
- (eqc ? (c_flag_HC05 alu1) (c_flag_HC05 alu2)) ⊗
- (eqc ? (irq_flag_HC05 alu1) (irq_flag_HC05 alu2)).
-
-ndefinition forall_HC05_alu ≝ λP:alu_HC05 → bool.
- forallc ? (λr1.forallc ? (λr2.
- forallc ? (λr3.forallc ? (λr4.
- forallc ? (λr5.forallc ? (λr6.
- forallc ? (λr7.forallc ? (λr8.
- forallc ? (λr9.forallc ? (λr10.
- forallc ? (λr11.forallc ? (λr12.
- forallc ? (λr13.P (mk_alu_HC05 r1 r2 r3 r4 r5 r6 r7 r8 r9 r10 r11 r12 r13)))))))))))))).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/HC08_status_base.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-nlemma aluHC08_destruct_1 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x1 = y1.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 a _ _ _ _ _ _ _ _ _ _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_2 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x2 = y2.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ a _ _ _ _ _ _ _ _ _ _ ⇒ x2 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_3 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x3 = y3.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ a _ _ _ _ _ _ _ _ _ ⇒ x3 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_4 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x4 = y4.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ a _ _ _ _ _ _ _ _ ⇒ x4 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_5 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x5 = y5.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ _ a _ _ _ _ _ _ _ ⇒ x5 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_6 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x6 = y6.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ _ _ a _ _ _ _ _ _ ⇒ x6 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_7 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x7 = y7.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ _ _ _ a _ _ _ _ _ ⇒ x7 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_8 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x8 = y8.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ _ _ _ _ a _ _ _ _ ⇒ x8 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_9 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x9 = y9.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ _ _ _ _ _ a _ _ _ ⇒ x9 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_10 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x10 = y10.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ _ _ _ _ _ _ a _ _ ⇒ x10 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_11 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x11 = y11.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ _ _ _ _ _ _ _ a _ ⇒ x11 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_destruct_12 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12.
- mk_alu_HC08 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 = mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 →
- x12 = y12.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange with (match mk_alu_HC08 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12
- with [ mk_alu_HC08 _ _ _ _ _ _ _ _ _ _ _ a ⇒ x12 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma eq_to_eqaluHC08 : ∀alu1,alu2.alu1 = alu2 → eq_HC08_alu alu1 alu2 = true.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nrewrite > (aluHC08_destruct_1 … H);
- nrewrite > (aluHC08_destruct_2 … H);
- nrewrite > (aluHC08_destruct_3 … H);
- nrewrite > (aluHC08_destruct_4 … H);
- nrewrite > (aluHC08_destruct_5 … H);
- nrewrite > (aluHC08_destruct_6 … H);
- nrewrite > (aluHC08_destruct_7 … H);
- nrewrite > (aluHC08_destruct_8 … H);
- nrewrite > (aluHC08_destruct_9 … H);
- nrewrite > (aluHC08_destruct_10 … H);
- nrewrite > (aluHC08_destruct_11 … H);
- nrewrite > (aluHC08_destruct_12 … H);
- nchange with (
- ((eqc ? y1 y1) ⊗ (eqc ? y2 y2) ⊗ (eqc ? y3 y3) ⊗ (eqc ? y4 y4) ⊗
- (eqc ? y5 y5) ⊗ (eqc ? y6 y6) ⊗ (eqc ? y7 y7) ⊗ (eqc ? y8 y8) ⊗
- (eqc ? y9 y9) ⊗ (eqc ? y10 y10) ⊗ (eqc ? y11 y11) ⊗ (eqc ? y12 y12)) = true);
- nrewrite > (eq_to_eqc ? y1 y1 (refl_eq …));
- nrewrite > (eq_to_eqc ? y2 y2 (refl_eq …));
- nrewrite > (eq_to_eqc ? y3 y3 (refl_eq …));
- nrewrite > (eq_to_eqc ? y4 y4 (refl_eq …));
- nrewrite > (eq_to_eqc ? y5 y5 (refl_eq …));
- nrewrite > (eq_to_eqc ? y6 y6 (refl_eq …));
- nrewrite > (eq_to_eqc ? y7 y7 (refl_eq …));
- nrewrite > (eq_to_eqc ? y8 y8 (refl_eq …));
- nrewrite > (eq_to_eqc ? y9 y9 (refl_eq …));
- nrewrite > (eq_to_eqc ? y10 y10 (refl_eq …));
- nrewrite > (eq_to_eqc ? y11 y11 (refl_eq …));
- nrewrite > (eq_to_eqc ? y12 y12 (refl_eq …));
- napply refl_eq.
-nqed.
-
-nlemma neqaluHC08_to_neq : ∀alu1,alu2.eq_HC08_alu alu1 alu2 = false → alu1 ≠ alu2.
- #s1; #s2; #H;
- napply (not_to_not (s1 = s2) (eq_HC08_alu s1 s2 = true) …);
- ##[ ##1: napply (eq_to_eqaluHC08 s1 s2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-nlemma eqaluHC08_to_eq : ∀alu1,alu2.eq_HC08_alu alu1 alu2 = true → alu1 = alu2.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #H;
- nchange in H:(%) with (
- ((eqc ? x1 y1) ⊗ (eqc ? x2 y2) ⊗ (eqc ? x3 y3) ⊗ (eqc ? x4 y4) ⊗
- (eqc ? x5 y5) ⊗ (eqc ? x6 y6) ⊗ (eqc ? x7 y7) ⊗ (eqc ? x8 y8) ⊗
- (eqc ? x9 y9) ⊗ (eqc ? x10 y10) ⊗ (eqc ? x11 y11) ⊗ (eqc ? x12 y12)) = true);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H));
- nletin H1 ≝ (andb_true_true_l … H);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H1));
- nletin H2 ≝ (andb_true_true_l … H1);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H2));
- nletin H3 ≝ (andb_true_true_l … H2);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H3));
- nletin H4 ≝ (andb_true_true_l … H3);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H4));
- nletin H5 ≝ (andb_true_true_l … H4);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H5));
- nletin H6 ≝ (andb_true_true_l … H5);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H6));
- nletin H7 ≝ (andb_true_true_l … H6);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H7));
- nletin H8 ≝ (andb_true_true_l … H7);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H8));
- nletin H9 ≝ (andb_true_true_l … H8);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H9));
- nletin H10 ≝ (andb_true_true_l … H9);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H10));
- nrewrite > (eqc_to_eq … (andb_true_true_l … H10));
- napply refl_eq.
-nqed.
-
-nlemma neq_to_neqaluHC08 : ∀alu1,alu2.alu1 ≠ alu2 → eq_HC08_alu alu1 alu2 = false.
- #s1; #s2; #H;
- napply (neqtrue_to_eqfalse (eq_HC08_alu s1 s2));
- napply (not_to_not (eq_HC08_alu s1 s2 = true) (s1 = s2) ? H);
- napply (eqaluHC08_to_eq s1 s2).
-nqed.
-
-nlemma decidable_aluHC08 : ∀x,y:alu_HC08.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_HC08_alu x y = true) (eq_HC08_alu x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqaluHC08_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqaluHC08_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqaluHC08 : symmetricT alu_HC08 bool eq_HC08_alu.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12;
- nchange with (
- ((eqc ? x1 y1) ⊗ (eqc ? x2 y2) ⊗ (eqc ? x3 y3) ⊗ (eqc ? x4 y4) ⊗
- (eqc ? x5 y5) ⊗ (eqc ? x6 y6) ⊗ (eqc ? x7 y7) ⊗ (eqc ? x8 y8) ⊗
- (eqc ? x9 y9) ⊗ (eqc ? x10 y10) ⊗ (eqc ? x11 y11) ⊗ (eqc ? x12 y12)) =
- ((eqc ? y1 x1) ⊗ (eqc ? y2 x2) ⊗ (eqc ? y3 x3) ⊗ (eqc ? y4 x4) ⊗
- (eqc ? y5 x5) ⊗ (eqc ? y6 x6) ⊗ (eqc ? y7 x7) ⊗ (eqc ? y8 x8) ⊗
- (eqc ? y9 x9) ⊗ (eqc ? y10 x10) ⊗ (eqc ? y11 x11) ⊗ (eqc ? y12 x12)));
- nrewrite > (symmetric_eqc ? x1 y1);
- nrewrite > (symmetric_eqc ? x2 y2);
- nrewrite > (symmetric_eqc ? x3 y3);
- nrewrite > (symmetric_eqc ? x4 y4);
- nrewrite > (symmetric_eqc ? x5 y5);
- nrewrite > (symmetric_eqc ? x6 y6);
- nrewrite > (symmetric_eqc ? x7 y7);
- nrewrite > (symmetric_eqc ? x8 y8);
- nrewrite > (symmetric_eqc ? x9 y9);
- nrewrite > (symmetric_eqc ? x10 y10);
- nrewrite > (symmetric_eqc ? x11 y11);
- nrewrite > (symmetric_eqc ? x12 y12);
- napply refl_eq.
-nqed.
-
-nlemma aluHC08_is_comparable : comparable.
- @ alu_HC08
- ##[ napply (mk_alu_HC08 (zeroc ?) (zeroc ?) (zeroc ?) (zeroc ?)
- (zeroc ?) (zeroc ?) (zeroc ?) (zeroc ?)
- (zeroc ?) (zeroc ?) (zeroc ?) (zeroc ?))
- ##| napply forall_HC08_alu
- ##| napply eq_HC08_alu
- ##| napply eqaluHC08_to_eq
- ##| napply eq_to_eqaluHC08
- ##| napply neqaluHC08_to_neq
- ##| napply neq_to_neqaluHC08
- ##| napply decidable_aluHC08
- ##| napply symmetric_eqaluHC08
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr aluHC08_is_comparable ≡ alu_HC08.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/word16.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-(* ALU dell'HC08/HCS08 *)
-nrecord alu_HC08: Type ≝
- {
- (* A: registo accumulatore *)
- acc_low_reg_HC08 : byte8;
- (* X: registro indice parte bassa *)
- indX_low_reg_HC08 : byte8;
- (* H: registro indice parte alta *)
- indX_high_reg_HC08 : byte8;
- (* SP: registo stack pointer *)
- sp_reg_HC08 : word16;
- (* PC: registro program counter *)
- pc_reg_HC08 : word16;
-
- (* V: flag overflow *)
- v_flag_HC08 : bool;
- (* H: flag semi-carry (somma nibble basso) *)
- h_flag_HC08 : bool;
- (* I: flag mascheramento degli interrupt mascherabili: 1=mascherati *)
- i_flag_HC08 : bool;
- (* N: flag segno/negativita' *)
- n_flag_HC08 : bool;
- (* Z: flag zero *)
- z_flag_HC08 : bool;
- (* C: flag carry *)
- c_flag_HC08 : bool;
-
- (* IRQ: flag che simula il pin esterno IRQ *)
- irq_flag_HC08 : bool
- }.
-
-notation "{hvbox('A_Reg' ≝ acclow ; break 'X_Reg' ≝ indxlow ; break 'H_Reg' ≝ indxhigh ; break 'Sp_Reg' ≝ sp ; break 'Pc_Reg' ≝ pc ; break 'V_Flag' ≝ vfl ; break 'H_Flag' ≝ hfl ; break 'I_Flag' ≝ ifl ; break 'N_Flag' ≝ nfl ; break 'Z_Flag' ≝ zfl ; break 'C_Flag' ≝ cfl ; break 'IRQ_Flag' ≝ irqfl)}"
- non associative with precedence 80 for
- @{ 'mk_alu_HC08 $acclow $indxlow $indxhigh $sp $pc $vfl $hfl $ifl $nfl $zfl $cfl $irqfl }.
-interpretation "mk_alu_HC08" 'mk_alu_HC08 acclow indxlow indxhigh sp pc vfl hfl ifl nfl zfl cfl irqfl =
- (mk_alu_HC08 acclow indxlow indxhigh sp pc vfl hfl ifl nfl zfl cfl irqfl).
-
-(* ****** *)
-(* SETTER *)
-(* ****** *)
-
-(* setter specifico HC08/HCS08 di A *)
-ndefinition set_acc_8_low_reg_HC08 ≝
-λalu.λacclow':byte8.
- mk_alu_HC08
- acclow'
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di X *)
-ndefinition set_indX_8_low_reg_HC08 ≝
-λalu.λindxlow':byte8.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- indxlow'
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di H *)
-ndefinition set_indX_8_high_reg_HC08 ≝
-λalu.λindxhigh':byte8.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- indxhigh'
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di H:X *)
-ndefinition set_indX_16_reg_HC08 ≝
-λalu.λindx16:word16.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (cnL ? indx16)
- (cnH ? indx16)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di SP *)
-ndefinition set_sp_reg_HC08 ≝
-λalu.λsp':word16.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- sp'
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di PC *)
-ndefinition set_pc_reg_HC08 ≝
-λalu.λpc':word16.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- pc'
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di V *)
-ndefinition set_v_flag_HC08 ≝
-λalu.λvfl':bool.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- vfl'
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di H *)
-ndefinition set_h_flag_HC08 ≝
-λalu.λhfl':bool.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- hfl'
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di I *)
-ndefinition set_i_flag_HC08 ≝
-λalu.λifl':bool.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- ifl'
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di N *)
-ndefinition set_n_flag_HC08 ≝
-λalu.λnfl':bool.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- nfl'
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di Z *)
-ndefinition set_z_flag_HC08 ≝
-λalu.λzfl':bool.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- zfl'
- (c_flag_HC08 alu)
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di C *)
-ndefinition set_c_flag_HC08 ≝
-λalu.λcfl':bool.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- cfl'
- (irq_flag_HC08 alu).
-
-(* setter specifico HC08/HCS08 di IRQ *)
-ndefinition set_irq_flag_HC08 ≝
-λalu.λirqfl':bool.
- mk_alu_HC08
- (acc_low_reg_HC08 alu)
- (indX_low_reg_HC08 alu)
- (indX_high_reg_HC08 alu)
- (sp_reg_HC08 alu)
- (pc_reg_HC08 alu)
- (v_flag_HC08 alu)
- (h_flag_HC08 alu)
- (i_flag_HC08 alu)
- (n_flag_HC08 alu)
- (z_flag_HC08 alu)
- (c_flag_HC08 alu)
- irqfl'.
-
-(* ***************** *)
-(* CONFRONTO FRA ALU *)
-(* ***************** *)
-
-(* confronto registro per registro dell'HC08 *)
-ndefinition eq_HC08_alu ≝
-λalu1,alu2:alu_HC08.
- (eqc ? (acc_low_reg_HC08 alu1) (acc_low_reg_HC08 alu2)) ⊗
- (eqc ? (indX_low_reg_HC08 alu1) (indX_low_reg_HC08 alu2)) ⊗
- (eqc ? (indX_high_reg_HC08 alu1) (indX_high_reg_HC08 alu2)) ⊗
- (eqc ? (sp_reg_HC08 alu1) (sp_reg_HC08 alu2)) ⊗
- (eqc ? (pc_reg_HC08 alu1) (pc_reg_HC08 alu2)) ⊗
- (eqc ? (v_flag_HC08 alu1) (v_flag_HC08 alu2)) ⊗
- (eqc ? (h_flag_HC08 alu1) (h_flag_HC08 alu2)) ⊗
- (eqc ? (i_flag_HC08 alu1) (i_flag_HC08 alu2)) ⊗
- (eqc ? (n_flag_HC08 alu1) (n_flag_HC08 alu2)) ⊗
- (eqc ? (z_flag_HC08 alu1) (z_flag_HC08 alu2)) ⊗
- (eqc ? (c_flag_HC08 alu1) (c_flag_HC08 alu2)) ⊗
- (eqc ? (irq_flag_HC08 alu1) (irq_flag_HC08 alu2)).
-
-ndefinition forall_HC08_alu ≝ λP:alu_HC08 → bool.
- forallc ? (λr1.forallc ? (λr2.
- forallc ? (λr3.forallc ? (λr4.
- forallc ? (λr5.forallc ? (λr6.
- forallc ? (λr7.forallc ? (λr8.
- forallc ? (λr9.forallc ? (λr10.
- forallc ? (λr11.forallc ? (λr12.
- P (mk_alu_HC08 r1 r2 r3 r4 r5 r6 r7 r8 r9 r10 r11 r12))))))))))))).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/IP2022_status_base.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-nlemma aluIP2022_destruct_1 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x1 = y1.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 a _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_2 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x2 = y2.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ a _ _ _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x2 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_3 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x3 = y3.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ a _ _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x3 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_4 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x4 = y4.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ a _ _ _ _ _ _ _ _ _ _ _ _ ⇒ x4 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_5 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x5 = y5.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ a _ _ _ _ _ _ _ _ _ _ _ ⇒ x5 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_6 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x6 = y6.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ a _ _ _ _ _ _ _ _ _ _ ⇒ x6 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_7 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x7 = y7.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ a _ _ _ _ _ _ _ _ _ ⇒ x7 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_8 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x8 = y8.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ a _ _ _ _ _ _ _ _ ⇒ x8 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_9 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x9 = y9.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ _ a _ _ _ _ _ _ _ ⇒ x9 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_10 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x10 = y10.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ _ _ a _ _ _ _ _ _ ⇒ x10 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_11 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x11 = y11.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ _ _ _ a _ _ _ _ _ ⇒ x11 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_12 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x12 = y12.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ _ _ _ _ a _ _ _ _ ⇒ x12 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_13 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x13 = y13.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ _ _ _ _ _ a _ _ _ ⇒ x13 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_14 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x14 = y14.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ _ _ _ _ _ _ a _ _ ⇒ x14 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_15 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x15 = y15.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ _ _ _ _ _ _ _ a _ ⇒ x15 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluIP2022_destruct_16 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10,y11,y12,y13,y14,y15,y16.
- mk_alu_IP2022 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 =
- mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16 →
- x16 = y16.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange with (match mk_alu_IP2022 y1 y2 y3 y4 y5 y6 y7 y8 y9 y10 y11 y12 y13 y14 y15 y16
- with [ mk_alu_IP2022 _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ a ⇒ x16 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-(* !!! ci mette troppo tempo a compilare *)
-naxiom eq_to_eqaluIP2022 : ∀alu1,alu2.alu1 = alu2 → eq_IP2022_alu alu1 alu2 = true.
-(* #alu1; ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8; #x9; #x10; #x11; #x12; #x13; #x14; #x15; #x16;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nrewrite > (aluIP2022_destruct_1 … H);
- nrewrite > (aluIP2022_destruct_2 … H);
- nrewrite > (aluIP2022_destruct_3 … H);
- nrewrite > (aluIP2022_destruct_4 … H);
- nrewrite > (aluIP2022_destruct_5 … H);
- nrewrite > (aluIP2022_destruct_6 … H);
- nrewrite > (aluIP2022_destruct_7 … H);
- nrewrite > (aluIP2022_destruct_8 … H);
- nrewrite > (aluIP2022_destruct_9 … H);
- nrewrite > (aluIP2022_destruct_10 … H);
- nrewrite > (aluIP2022_destruct_11 … H);
- nrewrite > (aluIP2022_destruct_12 … H);
- nrewrite > (aluIP2022_destruct_13 … H);
- nrewrite > (aluIP2022_destruct_14 … H);
- nrewrite > (aluIP2022_destruct_15 … H);
- nrewrite > (aluIP2022_destruct_16 … H);
- nchange with (
- ((eqc ? y1 y1) ⊗ (eqc ? y2 y2) ⊗ (eqc ? y3 y3) ⊗ (eqc ? y4 y4) ⊗
- (eqc ? y5 y5) ⊗ (eqc ? y6 y6) ⊗ (eqc ? y7 y7) ⊗ (eqc ? y8 y8) ⊗
- (eqc ? y9 y9) ⊗ (eqc ? y10 y10) ⊗ (eqc ? y11 y11) ⊗ (eqc ? y12 y12) ⊗
- (eqc ? y13 y13) ⊗ (eqc ? y14 y14) ⊗ (eqc ? y15 y15) ⊗ (eqc ? y16 y16)) = true);
- nrewrite > (eq_to_eqc ? y1 y1 (refl_eq …));
- nrewrite > (eq_to_eqc ? y2 y2 (refl_eq …));
- nrewrite > (eq_to_eqc ? y3 y3 (refl_eq …));
- nrewrite > (eq_to_eqc ? y4 y4 (refl_eq …));
- nrewrite > (eq_to_eqc ? y5 y5 (refl_eq …));
- nrewrite > (eq_to_eqc ? y6 y6 (refl_eq …));
- nrewrite > (eq_to_eqc ? y7 y7 (refl_eq …));
- nrewrite > (eq_to_eqc ? y8 y8 (refl_eq …));
- nrewrite > (eq_to_eqc ? y9 y9 (refl_eq …));
- nrewrite > (eq_to_eqc ? y10 y10 (refl_eq …));
- nrewrite > (eq_to_eqc ? y11 y11 (refl_eq …));
- nrewrite > (eq_to_eqc ? y12 y12 (refl_eq …));
- nrewrite > (eq_to_eqc ? y13 y13 (refl_eq …));
- nrewrite > (eq_to_eqc ? y14 y14 (refl_eq …));
- nrewrite > (eq_to_eqc ? y15 y15 (refl_eq …));
- nrewrite > (eq_to_eqc ? y16 y16 (refl_eq …));
- napply refl_eq.
-nqed.*)
-
-nlemma neqaluIP2022_to_neq : ∀alu1,alu2.eq_IP2022_alu alu1 alu2 = false → alu1 ≠ alu2.
- #s1; #s2; #H;
- napply (not_to_not (s1 = s2) (eq_IP2022_alu s1 s2 = true) …);
- ##[ ##1: napply (eq_to_eqaluIP2022 s1 s2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-nlemma eqaluIP2022_to_eq : ∀alu1,alu2.eq_IP2022_alu alu1 alu2 = true → alu1 = alu2.
- #alu1; ncases alu1;
- #z1; #z2; #z3; #z4; #z5; #z6; #z7; #z8; #z9; #z10; #z11; #z12; #z13; #z14; #z15; #z16;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16; #H;
- nchange in H:(%) with (
- ((eqc ? z1 y1) ⊗ (eqc ? z2 y2) ⊗ (eqc ? z3 y3) ⊗ (eqc ? z4 y4) ⊗
- (eqc ? z5 y5) ⊗ (eqc ? z6 y6) ⊗ (eqc ? z7 y7) ⊗ (eqc ? z8 y8) ⊗
- (eqc ? z9 y9) ⊗ (eqc ? z10 y10) ⊗ (eqc ? z11 y11) ⊗ (eqc ? z12 y12) ⊗
- (eqc ? z13 y13) ⊗ (eqc ? z14 y14) ⊗ (eqc ? z15 y15) ⊗ (eqc ? z16 y16)) = true);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H));
- nletin H1 ≝ (andb_true_true_l … H);
- nrewrite > (eqc_to_eq … (andb_true_true_r … (andb_true_true_l … H)));
- nletin H2 ≝ (andb_true_true_l … H1);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H2));
- nletin H3 ≝ (andb_true_true_l … H2);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H3));
- nletin H4 ≝ (andb_true_true_l … H3);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H4));
- nletin H5 ≝ (andb_true_true_l … H4);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H5));
- nletin H6 ≝ (andb_true_true_l … H5);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H6));
- nletin H7 ≝ (andb_true_true_l … H6);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H7));
- nletin H8 ≝ (andb_true_true_l … H7);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H8));
- nletin H9 ≝ (andb_true_true_l … H8);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H9));
- nletin H10 ≝ (andb_true_true_l … H9);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H10));
- nletin H11 ≝ (andb_true_true_l … H10);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H11));
- nletin H12 ≝ (andb_true_true_l … H11);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H12));
- nletin H13 ≝ (andb_true_true_l … H12);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H13));
- nletin H14 ≝ (andb_true_true_l … H13);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H14));
- nrewrite > (eqc_to_eq … (andb_true_true_l … H14));
- napply refl_eq.
-nqed.
-
-nlemma neq_to_neqaluIP2022 : ∀alu1,alu2.alu1 ≠ alu2 → eq_IP2022_alu alu1 alu2 = false.
- #s1; #s2; #H;
- napply (neqtrue_to_eqfalse (eq_IP2022_alu s1 s2));
- napply (not_to_not (eq_IP2022_alu s1 s2 = true) (s1 = s2) ? H);
- napply (eqaluIP2022_to_eq s1 s2).
-nqed.
-
-nlemma decidable_aluIP2022 : ∀x,y:alu_IP2022.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_IP2022_alu x y = true) (eq_IP2022_alu x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqaluIP2022_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqaluIP2022_to_neq … H))
- ##]
-nqed.
-
-(* !!! ci mette troppo tempo a compilare *)
-naxiom symmetric_eqaluIP2022 : symmetricT alu_IP2022 bool eq_IP2022_alu.
-(* #alu1; ncases alu1;
- #z1; #z2; #z3; #z4; #z5; #z6; #z7; #z8; #z9; #z10; #z11; #z12; #z13; #z14; #z15; #z16;
- #alu2; ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #y9; #y10; #y11; #y12; #y13; #y14; #y15; #y16;
- nchange with (
- ((eqc ? z1 y1) ⊗ (eqc ? z2 y2) ⊗ (eqc ? z3 y3) ⊗ (eqc ? z4 y4) ⊗
- (eqc ? z5 y5) ⊗ (eqc ? z6 y6) ⊗ (eqc ? z7 y7) ⊗ (eqc ? z8 y8) ⊗
- (eqc ? z9 y9) ⊗ (eqc ? z10 y10) ⊗ (eqc ? z11 y11) ⊗ (eqc ? z12 y12) ⊗
- (eqc ? z13 y13) ⊗ (eqc ? z14 y14) ⊗ (eqc ? z15 y15) ⊗ (eqc ? z16 y16)) =
- ((eqc ? y1 z1) ⊗ (eqc ? y2 z2) ⊗ (eqc ? y3 z3) ⊗ (eqc ? y4 z4) ⊗
- (eqc ? y5 z5) ⊗ (eqc ? y6 z6) ⊗ (eqc ? y7 z7) ⊗ (eqc ? y8 z8) ⊗
- (eqc ? y9 z9) ⊗ (eqc ? y10 z10) ⊗ (eqc ? y11 z11) ⊗ (eqc ? y12 z12) ⊗
- (eqc ? y13 z13) ⊗ (eqc ? y14 z14) ⊗ (eqc ? y15 z15) ⊗ (eqc ? y16 z16)));
- nrewrite > (symmetric_eqc ? z1 y1);
- nrewrite > (symmetric_eqc ? z2 y2);
- nrewrite > (symmetric_eqc ? z3 y3);
- nrewrite > (symmetric_eqc ? z4 y4);
- nrewrite > (symmetric_eqc ? z5 y5);
- nrewrite > (symmetric_eqc ? z6 y6);
- nrewrite > (symmetric_eqc ? z7 y7);
- nrewrite > (symmetric_eqc ? z8 y8);
- nrewrite > (symmetric_eqc ? z9 y9);
- nrewrite > (symmetric_eqc ? z10 y10);
- nrewrite > (symmetric_eqc ? z11 y11);
- nrewrite > (symmetric_eqc ? z12 y12);
- nrewrite > (symmetric_eqc ? z13 y13);
- nrewrite > (symmetric_eqc ? z14 y14);
- nrewrite > (symmetric_eqc ? z15 y15);
- nrewrite > (symmetric_eqc ? z16 y16);
- napply refl_eq.
-nqed.*)
-
-nlemma aluIP2022_is_comparable : comparable.
- @ alu_IP2022
- ##[ napply (mk_alu_IP2022 (zeroc ?) (zeroc ?) (zeroc ?) (zeroc ?)
- (zeroc ?) (zeroc ?) (zeroc ?) (zeroc ?)
- (zeroc ?) (zeroc ?) (zeroc ?) (zeroc ?)
- (zeroc ?) (zeroc ?) (zeroc ?) (zeroc ?))
- ##| napply forall_IP2022_alu
- ##| napply eq_IP2022_alu
- ##| napply eqaluIP2022_to_eq
- ##| napply eq_to_eqaluIP2022
- ##| napply neqaluIP2022_to_neq
- ##| napply neq_to_neqaluIP2022
- ##| napply decidable_aluIP2022
- ##| napply symmetric_eqaluIP2022
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr aluIP2022_is_comparable ≡ alu_IP2022.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/memory/memory_struct.ma".
-include "num/word16.ma".
-include "num/word24.ma".
-
-(* ******************************** *)
-(* IP2022 REGISTER SPECIAL HARDWARE *)
-(* ******************************** *)
-
-(* (Top Of Stack) : CALLH/CALL ↑ CALLH/CALL ↓ *)
-(* Pos2-15 : ... ↑ ... ↓ *)
-(* Pos16 : 0xFFFF ↑ ... ↓ *)
-ndefinition aux_callstack_type ≝ Array16T word16.
-
-(* Top Of Stack : 0xFFFF on reset *)
-ndefinition new_callstack ≝
- mk_Array16T ? (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉)
- (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉)
- (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉)
- (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉) (〈〈xF,xF〉:〈xF,xF〉〉).
-
-ndefinition pop_callstack ≝
-λcs:aux_callstack_type.
- pair … (a16_1 ? cs)
- (mk_Array16T ? (a16_2 ? cs) (a16_3 ? cs) (a16_4 ? cs) (a16_5 ? cs)
- (a16_6 ? cs) (a16_7 ? cs) (a16_8 ? cs) (a16_9 ? cs)
- (a16_10 ? cs) (a16_11 ? cs) (a16_12 ? cs) (a16_13 ? cs)
- (a16_14 ? cs) (a16_15 ? cs) (a16_16 ? cs) 〈〈xF,xF〉:〈xF,xF〉〉).
-
-ndefinition push_callstack ≝
-λcs:aux_callstack_type.λtop.
- mk_Array16T ? top (a16_1 ? cs) (a16_2 ? cs) (a16_3 ? cs)
- (a16_4 ? cs) (a16_5 ? cs) (a16_6 ? cs) (a16_7 ? cs)
- (a16_8 ? cs) (a16_9 ? cs) (a16_10 ? cs) (a16_11 ? cs)
- (a16_12 ? cs) (a16_13 ? cs) (a16_14 ? cs) (a16_15 ? cs).
-
-nlemma callstack_is_comparable : comparable.
- @ (aux_callstack_type)
- ##[ napply (zeroc (ar16_is_comparable word16_is_comparable))
- ##| napply (forallc (ar16_is_comparable word16_is_comparable))
- ##| napply (eqc (ar16_is_comparable word16_is_comparable))
- ##| napply (eqc_to_eq (ar16_is_comparable word16_is_comparable))
- ##| napply (eq_to_eqc (ar16_is_comparable word16_is_comparable))
- ##| napply (neqc_to_neq (ar16_is_comparable word16_is_comparable))
- ##| napply (neq_to_neqc (ar16_is_comparable word16_is_comparable))
- ##| napply (decidable_c (ar16_is_comparable word16_is_comparable))
- ##| napply (symmetric_eqc (ar16_is_comparable word16_is_comparable))
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr callstack_is_comparable ≡ aux_callstack_type.
-
-(* array ad accesso diretto di 8 registri ADDR a 24bit *)
-(* selezione con registro ADDRSEL, solo i primi 3bit validi *)
-ndefinition aux_addrarray_type ≝ Array8T word24.
-
-(* tutti a 0x000000 on reset *)
-ndefinition new_addrarray : aux_addrarray_type ≝
- mk_Array8T ? (zeroc ?) (zeroc ?) (zeroc ?) (zeroc ?)
- (zeroc ?) (zeroc ?) (zeroc ?) (zeroc ?).
-
-ndefinition get_addrarray ≝
-λaddrsel:byte8.λaa:aux_addrarray_type.
- getn_array8T (oct_of_exL (cnL ? addrsel)) ? aa.
-
-ndefinition set_addrarray ≝
-λaddrsel:byte8.λaa:aux_addrarray_type.λv.
- setn_array8T (oct_of_exL (cnL ? addrsel)) ? aa v.
-
-nlemma addrarray_is_comparable : comparable.
- @ (aux_addrarray_type)
- ##[ napply (zeroc (ar8_is_comparable word24_is_comparable))
- ##| napply (forallc (ar8_is_comparable word24_is_comparable))
- ##| napply (eqc (ar8_is_comparable word24_is_comparable))
- ##| napply (eqc_to_eq (ar8_is_comparable word24_is_comparable))
- ##| napply (eq_to_eqc (ar8_is_comparable word24_is_comparable))
- ##| napply (neqc_to_neq (ar8_is_comparable word24_is_comparable))
- ##| napply (neq_to_neqc (ar8_is_comparable word24_is_comparable))
- ##| napply (decidable_c (ar8_is_comparable word24_is_comparable))
- ##| napply (symmetric_eqc (ar8_is_comparable word24_is_comparable))
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr addrarray_is_comparable ≡ aux_addrarray_type.
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-(* ALU dell'IP2022 *)
-nrecord alu_IP2022: Type ≝
- {
- (* W: accumulatore *)
- acc_low_reg_IP2022 : byte8;
- (* MULH: parte alta moltiplicazione *)
- mulh_reg_IP2022 : byte8;
-
- (* ADDRSEL: selettore di indirizzo *)
- addrsel_reg_IP2022 : byte8;
- (* ADDR [ADDRX|ADDRH|ADDRL] : array indirizzi indicizzati da ADDRSEL *)
- addr_array_IP2022 : aux_addrarray_type;
-
- (* CALL [CALLH|CALLL] : stack indirizzi di ritorno *)
- call_stack_IP2022 : aux_callstack_type;
-
- (* IP [IPH|IPL] : indirect pointer *)
- ip_reg_IP2022 : word16;
- (* DP [DPH|DPL] : data pointer *)
- dp_reg_IP2022 : word16;
- (* DATA [DATAH|DATAL] : data value *)
- data_reg_IP2022 : word16;
- (* SP [SPH|SPL] : stack pointer *)
- sp_reg_IP2022 : word16;
- (* PC [PCH|PCL] : program counter *)
- pc_reg_IP2022 : word16;
-
- (* SPEED[xxxxSSSS] : divisore del clock *)
- speed_reg_IP2022 : exadecim;
- (* PAGE [PPPxxxxx] : selettore pagina *)
- page_reg_IP2022 : oct;
-
- (* H: flag semi-carry (somma nibble basso) *)
- h_flag_IP2022 : bool;
- (* Z: flag zero *)
- z_flag_IP2022 : bool;
- (* C: flag carry *)
- c_flag_IP2022 : bool;
-
- (* skip mode : effettua fetch-decode, no execute *)
- skip_mode_IP2022 : bool
- }.
-
-notation "{hvbox('W_Reg' ≝ w ; break 'MulH_Reg' ≝ mulh ; break 'Addrsel_Reg' ≝ addrsel ; break 'Addr_Array' ≝ addr ; break 'Call_Stack' ≝ call ; break 'Ip_Reg' ≝ ip ; break 'Dp_Reg' ≝ dp ; break 'Data_Reg' ≝ data ; break 'Sp_Reg' ≝ sp ; break 'Pc_Reg' ≝ pc ; break 'Speed_Reg' ≝ speed ; break 'Page_Reg' ≝ page ; break 'H_Flag' ≝ hfl ; break 'Z_Flag' ≝ zfl ; break 'C_Flag' ≝ cfl ; break 'Skip_Mode' ≝ skipmode)}"
- non associative with precedence 80 for
- @{ 'mk_alu_IP2022 $w $mulh $addrsel $addr $call $ip $dp $data $sp $pc $speed $page $hfl $zfl $cfl $skipmode }.
-interpretation "mk_alu_IP2022" 'mk_alu_IP2022 w mulh addrsel addr call ip dp data sp pc speed page hfl zfl cfl skipmode =
- (mk_alu_IP2022 w mulh addrsel addr call ip dp data sp pc speed page hfl zfl cfl skipmode).
-
-(* ****** *)
-(* SETTER *)
-(* ****** *)
-
-(* setter specifico IP2022 di A *)
-ndefinition set_acc_8_low_reg_IP2022 ≝
-λalu.λacclow':byte8.
- mk_alu_IP2022
- acclow'
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di MULH *)
-ndefinition set_mulh_reg_IP2022 ≝
-λalu.λmulh':byte8.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- mulh'
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di ADDRSEL *)
-ndefinition set_addrsel_reg_IP2022 ≝
-λalu.λaddrsel':byte8.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- addrsel'
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di ADDR *)
-ndefinition set_addr_reg_IP2022 ≝
-λalu.λaddr':word24.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (set_addrarray (addrsel_reg_IP2022 alu) (addr_array_IP2022 alu) addr')
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-ndefinition get_addr_reg_IP2022 ≝
-λalu.get_addrarray (addrsel_reg_IP2022 alu) (addr_array_IP2022 alu).
-
-(* setter specifico IP2022 di CALL *)
-ndefinition set_call_reg_IP2022 ≝
-λalu.λcall':word16.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (setn_array16T x0 ? (call_stack_IP2022 alu) call')
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-ndefinition get_call_reg_IP2022 ≝
-λalu.getn_array16T x0 ? (call_stack_IP2022 alu).
-
-ndefinition set_call_stack_IP2022 ≝
-λalu.λcall':aux_callstack_type.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- call'
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-ndefinition push_call_reg_IP2022 ≝
-λalu.λcall':word16.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (push_callstack (call_stack_IP2022 alu) call')
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-ndefinition pop_call_reg_IP2022 ≝
-λalu.match pop_callstack (call_stack_IP2022 alu) with
- [ pair val call' ⇒ pair … val (set_call_stack_IP2022 alu call') ].
-
-(* setter specifico IP2022 di IP *)
-ndefinition set_ip_reg_IP2022 ≝
-λalu.λip':word16.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- ip'
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di DP *)
-ndefinition set_dp_reg_IP2022 ≝
-λalu.λdp':word16.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- dp'
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di DATA *)
-ndefinition set_data_reg_IP2022 ≝
-λalu.λdata':word16.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- data'
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di SP *)
-ndefinition set_sp_reg_IP2022 ≝
-λalu.λsp':word16.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- sp'
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di PC *)
-ndefinition set_pc_reg_IP2022 ≝
-λalu.λpc':word16.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- pc'
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di SPEED *)
-ndefinition set_speed_reg_IP2022 ≝
-λalu.λspeed':exadecim.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- speed'
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di PAGE *)
-ndefinition set_page_reg_IP2022 ≝
-λalu.λpage':oct.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- page'
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di H *)
-ndefinition set_h_flag_IP2022 ≝
-λalu.λhfl':bool.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- hfl'
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di Z *)
-ndefinition set_z_flag_IP2022 ≝
-λalu.λzfl':bool.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- zfl'
- (c_flag_IP2022 alu)
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di C *)
-ndefinition set_c_flag_IP2022 ≝
-λalu.λcfl':bool.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- cfl'
- (skip_mode_IP2022 alu).
-
-(* setter specifico IP2022 di SKIP *)
-ndefinition set_skip_mode_IP2022 ≝
-λalu.λskipmode':bool.
- mk_alu_IP2022
- (acc_low_reg_IP2022 alu)
- (mulh_reg_IP2022 alu)
- (addrsel_reg_IP2022 alu)
- (addr_array_IP2022 alu)
- (call_stack_IP2022 alu)
- (ip_reg_IP2022 alu)
- (dp_reg_IP2022 alu)
- (data_reg_IP2022 alu)
- (sp_reg_IP2022 alu)
- (pc_reg_IP2022 alu)
- (speed_reg_IP2022 alu)
- (page_reg_IP2022 alu)
- (h_flag_IP2022 alu)
- (z_flag_IP2022 alu)
- (c_flag_IP2022 alu)
- skipmode'.
-
-(* ***************** *)
-(* CONFRONTO FRA ALU *)
-(* ***************** *)
-
-(* confronto registro per registro dell'IP2022 *)
-ndefinition eq_IP2022_alu ≝
-λalu1,alu2:alu_IP2022.
- (eqc ? (acc_low_reg_IP2022 alu1) (acc_low_reg_IP2022 alu2)) ⊗
- (eqc ? (mulh_reg_IP2022 alu1) (mulh_reg_IP2022 alu2)) ⊗
- (eqc ? (addrsel_reg_IP2022 alu1) (addrsel_reg_IP2022 alu2)) ⊗
- (eqc ? (addr_array_IP2022 alu1) (addr_array_IP2022 alu2)) ⊗
- (eqc ? (call_stack_IP2022 alu1) (call_stack_IP2022 alu2)) ⊗
- (eqc ? (ip_reg_IP2022 alu1) (ip_reg_IP2022 alu2)) ⊗
- (eqc ? (dp_reg_IP2022 alu1) (dp_reg_IP2022 alu2)) ⊗
- (eqc ? (data_reg_IP2022 alu1) (data_reg_IP2022 alu2)) ⊗
- (eqc ? (sp_reg_IP2022 alu1) (sp_reg_IP2022 alu2)) ⊗
- (eqc ? (pc_reg_IP2022 alu1) (pc_reg_IP2022 alu2)) ⊗
- (eqc ? (speed_reg_IP2022 alu1) (speed_reg_IP2022 alu2)) ⊗
- (eqc ? (page_reg_IP2022 alu1) (page_reg_IP2022 alu2)) ⊗
- (eqc ? (h_flag_IP2022 alu1) (h_flag_IP2022 alu2)) ⊗
- (eqc ? (z_flag_IP2022 alu1) (z_flag_IP2022 alu2)) ⊗
- (eqc ? (c_flag_IP2022 alu1) (c_flag_IP2022 alu2)) ⊗
- (eqc ? (skip_mode_IP2022 alu1) (skip_mode_IP2022 alu2)).
-
-ndefinition forall_IP2022_alu ≝ λP:alu_IP2022 → bool.
- forallc ? (λr1.forallc ? (λr2.
- forallc ? (λr3.forallc ? (λr4.
- forallc ? (λr5.forallc ? (λr6.
- forallc ? (λr7.forallc ? (λr8.
- forallc ? (λr9.forallc ? (λr10.
- forallc ? (λr11.forallc ? (λr12.
- forallc ? (λr13.forallc ? (λr14.
- forallc ? (λr15.forallc ? (λr16.
- P (mk_alu_IP2022 r1 r2 r3 r4 r5 r6 r7 r8 r9 r10 r11 r12 r13 r14 r15 r16))))))))))))))))).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/RS08_status_base.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-nlemma aluRS08_destruct_1 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8 = mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8 →
- x1 = y1.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_alu_RS08 a _ _ _ _ _ _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluRS08_destruct_2 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8 = mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8 →
- x2 = y2.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_alu_RS08 _ a _ _ _ _ _ _ ⇒ x2 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluRS08_destruct_3 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8 = mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8 →
- x3 = y3.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_alu_RS08 _ _ a _ _ _ _ _ ⇒ x3 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluRS08_destruct_4 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8 = mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8 →
- x4 = y4.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_alu_RS08 _ _ _ a _ _ _ _ ⇒ x4 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluRS08_destruct_5 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8 = mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8 →
- x5 = y5.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_alu_RS08 _ _ _ _ a _ _ _ ⇒ x5 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluRS08_destruct_6 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8 = mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8 →
- x6 = y6.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_alu_RS08 _ _ _ _ _ a _ _ ⇒ x6 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluRS08_destruct_7 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8 = mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8 →
- x7 = y7.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_alu_RS08 _ _ _ _ _ _ a _ ⇒ x7 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma aluRS08_destruct_8 :
-∀x1,x2,x3,x4,x5,x6,x7,x8,y1,y2,y3,y4,y5,y6,y7,y8.
- mk_alu_RS08 x1 x2 x3 x4 x5 x6 x7 x8 = mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8 →
- x8 = y8.
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange with (match mk_alu_RS08 y1 y2 y3 y4 y5 y6 y7 y8
- with [ mk_alu_RS08 _ _ _ _ _ _ _ a ⇒ x8 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma eq_to_eqaluRS08 : ∀alu1,alu2.alu1 = alu2 → eq_RS08_alu alu1 alu2 = true.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nrewrite > (aluRS08_destruct_1 … H);
- nrewrite > (aluRS08_destruct_2 … H);
- nrewrite > (aluRS08_destruct_3 … H);
- nrewrite > (aluRS08_destruct_4 … H);
- nrewrite > (aluRS08_destruct_5 … H);
- nrewrite > (aluRS08_destruct_6 … H);
- nrewrite > (aluRS08_destruct_7 … H);
- nrewrite > (aluRS08_destruct_8 … H);
- nchange with (
- ((eqc ? y1 y1) ⊗ (eqc ? y2 y2) ⊗
- (eqc ? y3 y3) ⊗ (eqc ? y4 y4) ⊗
- (eqc ? y5 y5) ⊗ (eqc ? y6 y6) ⊗
- (eqc ? y7 y7) ⊗ (eqc ? y8 y8)) = true);
- nrewrite > (eq_to_eqc ? y1 y1 (refl_eq …));
- nrewrite > (eq_to_eqc ? y2 y2 (refl_eq …));
- nrewrite > (eq_to_eqc ? y3 y3 (refl_eq …));
- nrewrite > (eq_to_eqc ? y4 y4 (refl_eq …));
- nrewrite > (eq_to_eqc ? y5 y5 (refl_eq …));
- nrewrite > (eq_to_eqc ? y6 y6 (refl_eq …));
- nrewrite > (eq_to_eqc ? y7 y7 (refl_eq …));
- nrewrite > (eq_to_eqc ? y8 y8 (refl_eq …));
- napply refl_eq.
-nqed.
-
-nlemma neqaluRS08_to_neq : ∀alu1,alu2.eq_RS08_alu alu1 alu2 = false → alu1 ≠ alu2.
- #s1; #s2; #H;
- napply (not_to_not (s1 = s2) (eq_RS08_alu s1 s2 = true) …);
- ##[ ##1: napply (eq_to_eqaluRS08 s1 s2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-nlemma eqaluRS08_to_eq : ∀alu1,alu2.eq_RS08_alu alu1 alu2 = true → alu1 = alu2.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8; #H;
- nchange in H:(%) with (
- ((eqc ? x1 y1) ⊗ (eqc ? x2 y2) ⊗
- (eqc ? x3 y3) ⊗ (eqc ? x4 y4) ⊗
- (eqc ? x5 y5) ⊗ (eqc ? x6 y6) ⊗
- (eqc ? x7 y7) ⊗ (eqc ? x8 y8)) = true);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H));
- nletin H1 ≝ (andb_true_true_l … H);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H1));
- nletin H2 ≝ (andb_true_true_l … H1);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H2));
- nletin H3 ≝ (andb_true_true_l … H2);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H3));
- nletin H4 ≝ (andb_true_true_l … H3);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H4));
- nletin H5 ≝ (andb_true_true_l … H4);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H5));
- nletin H6 ≝ (andb_true_true_l … H5);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H6));
- nrewrite > (eqc_to_eq … (andb_true_true_l … H6));
- napply refl_eq.
-nqed.
-
-nlemma neq_to_neqaluRS08 : ∀alu1,alu2.alu1 ≠ alu2 → eq_RS08_alu alu1 alu2 = false.
- #s1; #s2; #H;
- napply (neqtrue_to_eqfalse (eq_RS08_alu s1 s2));
- napply (not_to_not (eq_RS08_alu s1 s2 = true) (s1 = s2) ? H);
- napply (eqaluRS08_to_eq s1 s2).
-nqed.
-
-nlemma decidable_aluRS08 : ∀x,y:alu_RS08.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_RS08_alu x y = true) (eq_RS08_alu x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqaluRS08_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqaluRS08_to_neq … H))
- ##]
-nqed.
-
-
-nlemma symmetric_eqaluRS08 : symmetricT alu_RS08 bool eq_RS08_alu.
- #alu1; #alu2;
- ncases alu1;
- #x1; #x2; #x3; #x4; #x5; #x6; #x7; #x8;
- ncases alu2;
- #y1; #y2; #y3; #y4; #y5; #y6; #y7; #y8;
- nchange with (
- ((eqc ? x1 y1) ⊗ (eqc ? x2 y2) ⊗
- (eqc ? x3 y3) ⊗ (eqc ? x4 y4) ⊗
- (eqc ? x5 y5) ⊗ (eqc ? x6 y6) ⊗
- (eqc ? x7 y7) ⊗ (eqc ? x8 y8)) =
- ((eqc ? y1 x1) ⊗ (eqc ? y2 x2) ⊗
- (eqc ? y3 x3) ⊗ (eqc ? y4 x4) ⊗
- (eqc ? y5 x5) ⊗ (eqc ? y6 x6) ⊗
- (eqc ? y7 x7) ⊗ (eqc ? y8 x8)));
- nrewrite > (symmetric_eqc ? x1 y1);
- nrewrite > (symmetric_eqc ? x2 y2);
- nrewrite > (symmetric_eqc ? x3 y3);
- nrewrite > (symmetric_eqc ? x4 y4);
- nrewrite > (symmetric_eqc ? x5 y5);
- nrewrite > (symmetric_eqc ? x6 y6);
- nrewrite > (symmetric_eqc ? x7 y7);
- nrewrite > (symmetric_eqc ? x8 y8);
- napply refl_eq.
-nqed.
-
-nlemma aluRS08_is_comparable : comparable.
- @ alu_RS08
- ##[ napply (mk_alu_RS08 (zeroc ?) (zeroc ?) (zeroc ?) (zeroc ?)
- (zeroc ?) (zeroc ?) (zeroc ?) (zeroc ?))
- ##| napply forall_RS08_alu
- ##| napply eq_RS08_alu
- ##| napply eqaluRS08_to_eq
- ##| napply eq_to_eqaluRS08
- ##| napply neqaluRS08_to_neq
- ##| napply neq_to_neqaluRS08
- ##| napply decidable_aluRS08
- ##| napply symmetric_eqaluRS08
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr aluRS08_is_comparable ≡ alu_RS08.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/word16.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-(* ALU dell'RS08 *)
-nrecord alu_RS08: Type ≝
- {
- (* A: registo accumulatore *)
- acc_low_reg_RS08 : byte8;
- (* PC: registro program counter *)
- pc_reg_RS08 : word16;
- (* modificatore di PC: per esempio e' definito come 00xxxxxxxxxxxxxxb *)
- (* la logica della sua costruzione e' quindi (PC∧mask) *)
- (* totalmente racchiusa nella ALU, bastera' fare get(set(PC)) *)
- pc_mask_RS08 : word16;
- (* SPC: registro shadow program counter *)
- (* NB: il suo modificatore e' lo stesso di PC *)
- spc_reg_RS08 : word16;
-
- (* X: registro indice parte bassa *)
- (* NB: in realta' e' mappato in memoria e non risiede nella ALU *)
- (* la lettura/scrittura avviene tramite la locazione [0x000F] *)
- x_map_RS08 : byte8;
- (* PS: registro selezione di pagina *)
- (* serve a indirizzare la finestra RAM di 64b [0x00C0-0x00FF] *)
- (* su tutta la memoria installata [0x0000-0x3FFF]: [00pp pppp ppxx xxxx] *)
- (* NB: in realta' e' mappato in memoria e non risiede nella ALU *)
- (* la lettura/scrittura avviene tramite la locazione [0x001F] *)
- ps_map_RS08 : byte8;
-
- (* Z: flag zero *)
- z_flag_RS08 : bool;
- (* C: flag carry *)
- c_flag_RS08 : bool
- }.
-
-notation "{hvbox('A_Reg' ≝ acclow ; break 'Pc_Reg' ≝ pc ; break 'Pc_Mask' ≝ pcm ; break 'Spc_Reg' ≝ spc ; break 'X_Map' ≝ xm ; break 'Ps_Map' ≝ psm ; break 'Z_Flag' ≝ zfl ; break 'C_Flag' ≝ cfl)}"
- non associative with precedence 80 for
- @{ 'mk_alu_RS08 $acclow $pc $pcm $spc $xm $psm $zfl $cfl }.
-interpretation "mk_alu_RS08" 'mk_alu_RS08 acclow pc pcm spc xm psm zfl cfl =
- (mk_alu_RS08 acclow pc pcm spc xm psm zfl cfl).
-
-(* ****** *)
-(* SETTER *)
-(* ****** *)
-
-(* setter specifico RS08 di A *)
-ndefinition set_acc_8_low_reg_RS08 ≝
-λalu.λacclow':byte8.
- mk_alu_RS08
- acclow'
- (pc_reg_RS08 alu)
- (pc_mask_RS08 alu)
- (spc_reg_RS08 alu)
- (x_map_RS08 alu)
- (ps_map_RS08 alu)
- (z_flag_RS08 alu)
- (c_flag_RS08 alu).
-
-(* setter specifico RS08 di PC, effettua PC∧mask *)
-ndefinition set_pc_reg_RS08 ≝
-λalu.λpc':word16.
- mk_alu_RS08
- (acc_low_reg_RS08 alu)
- (andc ? pc' (pc_mask_RS08 alu))
- (pc_mask_RS08 alu)
- (spc_reg_RS08 alu)
- (x_map_RS08 alu)
- (ps_map_RS08 alu)
- (z_flag_RS08 alu)
- (c_flag_RS08 alu).
-
-(* setter specifico RS08 di SPC, effettua SPC∧mask *)
-ndefinition set_spc_reg_RS08 ≝
-λalu.λspc':word16.
- mk_alu_RS08
- (acc_low_reg_RS08 alu)
- (pc_reg_RS08 alu)
- (pc_mask_RS08 alu)
- (andc ? spc' (pc_mask_RS08 alu))
- (x_map_RS08 alu)
- (ps_map_RS08 alu)
- (z_flag_RS08 alu)
- (c_flag_RS08 alu).
-
-(* setter specifico RS08 di memory mapped X *)
-ndefinition set_x_map_RS08 ≝
-λalu.λxm':byte8.
- mk_alu_RS08
- (acc_low_reg_RS08 alu)
- (pc_reg_RS08 alu)
- (pc_mask_RS08 alu)
- (spc_reg_RS08 alu)
- xm'
- (ps_map_RS08 alu)
- (z_flag_RS08 alu)
- (c_flag_RS08 alu).
-
-(* setter specifico RS08 di memory mapped PS *)
-ndefinition set_ps_map_RS08 ≝
-λalu.λpsm':byte8.
- mk_alu_RS08
- (acc_low_reg_RS08 alu)
- (pc_reg_RS08 alu)
- (pc_mask_RS08 alu)
- (spc_reg_RS08 alu)
- (x_map_RS08 alu)
- psm'
- (z_flag_RS08 alu)
- (c_flag_RS08 alu).
-
-(* setter sprcifico RS08 di Z *)
-ndefinition set_z_flag_RS08 ≝
-λalu.λzfl':bool.
- mk_alu_RS08
- (acc_low_reg_RS08 alu)
- (pc_reg_RS08 alu)
- (pc_mask_RS08 alu)
- (spc_reg_RS08 alu)
- (x_map_RS08 alu)
- (ps_map_RS08 alu)
- zfl'
- (c_flag_RS08 alu).
-
-(* setter specifico RS08 di C *)
-ndefinition set_c_flag_RS08 ≝
-λalu.λcfl':bool.
- mk_alu_RS08
- (acc_low_reg_RS08 alu)
- (pc_reg_RS08 alu)
- (pc_mask_RS08 alu)
- (spc_reg_RS08 alu)
- (x_map_RS08 alu)
- (ps_map_RS08 alu)
- (z_flag_RS08 alu)
- cfl'.
-
-(* ***************** *)
-(* CONFRONTO FRA ALU *)
-(* ***************** *)
-
-(* confronto registro per registro dell'RS08 *)
-ndefinition eq_RS08_alu ≝
-λalu1,alu2:alu_RS08.
- (eqc ? (acc_low_reg_RS08 alu1) (acc_low_reg_RS08 alu2)) ⊗
- (eqc ? (pc_reg_RS08 alu1) (pc_reg_RS08 alu2)) ⊗
- (eqc ? (pc_mask_RS08 alu1) (pc_mask_RS08 alu2)) ⊗
- (eqc ? (spc_reg_RS08 alu1) (spc_reg_RS08 alu2)) ⊗
- (eqc ? (x_map_RS08 alu1) (x_map_RS08 alu2)) ⊗
- (eqc ? (ps_map_RS08 alu1) (ps_map_RS08 alu2)) ⊗
- (eqc ? (z_flag_RS08 alu1) (z_flag_RS08 alu2)) ⊗
- (eqc ? (c_flag_RS08 alu1) (c_flag_RS08 alu2)).
-
-ndefinition forall_RS08_alu ≝ λP:alu_RS08 → bool.
- forallc ? (λr1.forallc ? (λr2.
- forallc ? (λr3.forallc ? (λr4.
- forallc ? (λr5.forallc ? (λr6.
- forallc ? (λr7.forallc ? (λr8.
- P (mk_alu_RS08 r1 r2 r3 r4 r5 r6 r7 r8))))))))).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status_base.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-nlemma symmetric_forallmemoryranged :
-∀t.∀chk1,chk2:aux_chk_type t.∀mem1,mem2:aux_mem_type t.∀sel.∀addrl.
- forall_memory_ranged t chk1 chk2 mem1 mem2 sel addrl =
- forall_memory_ranged t chk2 chk1 mem2 mem1 sel addrl.
- #t; #chk1; #chk2; #mem1; #mem2; #sel; #addrl;
- nelim addrl;
- ##[ ##1: nnormalize; napply refl_eq
- ##| ##2: #a; #l; #H;
- nchange with (
- ((eqc ? (mem_read t mem1 chk1 sel a)
- (mem_read t mem2 chk2 sel a)) ⊗
- (forall_memory_ranged t chk1 chk2 mem1 mem2 sel l)) =
- ((eqc ? (mem_read t mem2 chk2 sel a)
- (mem_read t mem1 chk1 sel a)) ⊗
- (forall_memory_ranged t chk2 chk1 mem2 mem1 sel l)));
- nrewrite > H;
- nrewrite > (symmetric_eqc ? … (mem_read t mem1 chk1 sel a) (mem_read t mem2 chk2 sel a));
- napply refl_eq
- ##]
-nqed.
-
-nlemma anystatus_destruct_1 :
-∀m,t.∀x1,x2,x3,x4,y1,y2,y3,y4.
- mk_any_status m t x1 x2 x3 x4 = mk_any_status m t y1 y2 y3 y4 →
- x1 = y1.
- #m; #t;
- #x1; #x2; #x3; #x4;
- #y1; #y2; #y3; #y4; #H;
- nchange with (match mk_any_status m t y1 y2 y3 y4
- with [ mk_any_status a _ _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma anystatus_destruct_2 :
-∀m,t.∀x1,x2,x3,x4,y1,y2,y3,y4.
- mk_any_status m t x1 x2 x3 x4 = mk_any_status m t y1 y2 y3 y4 →
- x2 = y2.
- #m; #t;
- #x1; #x2; #x3; #x4;
- #y1; #y2; #y3; #y4; #H;
- nchange with (match mk_any_status m t y1 y2 y3 y4
- with [ mk_any_status _ a _ _ ⇒ x2 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma anystatus_destruct_3 :
-∀m,t.∀x1,x2,x3,x4,y1,y2,y3,y4.
- mk_any_status m t x1 x2 x3 x4 = mk_any_status m t y1 y2 y3 y4 →
- x3 = y3.
- #m; #t;
- #x1; #x2; #x3; #x4;
- #y1; #y2; #y3; #y4; #H;
- nchange with (match mk_any_status m t y1 y2 y3 y4
- with [ mk_any_status _ _ a _ ⇒ x3 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma anystatus_destruct_4 :
-∀m,t.∀x1,x2,x3,x4,y1,y2,y3,y4.
- mk_any_status m t x1 x2 x3 x4 = mk_any_status m t y1 y2 y3 y4 →
- x4 = y4.
- #m; #t;
- #x1; #x2; #x3; #x4;
- #y1; #y2; #y3; #y4; #H;
- nchange with (match mk_any_status m t y1 y2 y3 y4
- with [ mk_any_status _ _ _ a ⇒ x4 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma eq_to_eqanystatus : ∀m,t.∀s1,s2:any_status m t.s1 = s2 → eq_anystatus m t s1 s2 = true.
- #m; #t;
- #s1; ncases s1; #alu1; #mem1; #chk1; #clk1;
- #s2; ncases s2; #alu2; #mem2; #chk2; #clk2;
- #H;
- nrewrite > (anystatus_destruct_1 … H);
- nrewrite > (anystatus_destruct_2 … H);
- nrewrite > (anystatus_destruct_3 … H);
- nrewrite > (anystatus_destruct_4 … H);
- nchange with (
- ((eqc ? alu2 alu2) ⊗ (eqc ? mem2 mem2) ⊗ (eqc ? chk2 chk2) ⊗ (eqc ? clk2 clk2)) = true);
- nrewrite > (eq_to_eqc ? alu2 alu2 (refl_eq …));
- nrewrite > (eq_to_eqc ? mem2 mem2 (refl_eq …));
- nrewrite > (eq_to_eqc ? chk2 chk2 (refl_eq …));
- nrewrite > (eq_to_eqc ? clk2 clk2 (refl_eq …));
- napply refl_eq.
-nqed.
-
-nlemma neqanystatus_to_neq : ∀m,t.∀s1,s2:any_status m t.eq_anystatus m t s1 s2 = false → s1 ≠ s2.
- #m; #t; #s1; #s2; #H;
- napply (not_to_not (s1 = s2) (eq_anystatus m t s1 s2 = true) …);
- ##[ ##1: napply (eq_to_eqanystatus m t s1 s2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-nlemma eqanystatus_to_eq : ∀m,t.∀s1,s2:any_status m t.eq_anystatus m t s1 s2 = true → s1 = s2.
- #m; #t;
- #s1; ncases s1; #alu1; #mem1; #chk1; #clk1;
- #s2; ncases s2; #alu2; #mem2; #chk2; #clk2;
- nchange with (
- ((eqc ? alu1 alu2) ⊗ (eqc ? mem1 mem2) ⊗ (eqc ? chk1 chk2) ⊗ (eqc ? clk1 clk2)) = true → ?);
- #H;
- nrewrite > (eqc_to_eq … (andb_true_true_r … H));
- nletin H1 ≝ (andb_true_true_l … H);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H1));
- nletin H2 ≝ (andb_true_true_l … H1);
- nrewrite > (eqc_to_eq … (andb_true_true_r … H2));
- nrewrite > (eqc_to_eq … (andb_true_true_l … H2));
- napply refl_eq.
-nqed.
-
-nlemma neq_to_neqanystatus : ∀m,t.∀s1,s2:any_status m t.s1 ≠ s2 → eq_anystatus m t s1 s2 = false.
- #m; #t; #s1; #s2; #H;
- napply (neqtrue_to_eqfalse (eq_anystatus m t s1 s2));
- napply (not_to_not (eq_anystatus m t s1 s2 = true) (s1 = s2) ? H);
- napply (eqanystatus_to_eq m t s1 s2).
-nqed.
-
-nlemma decidable_anystatus : ∀m,t.∀x,y:any_status m t.decidable (x = y).
- #m; #t; #x; #y; nnormalize;
- napply (or2_elim (eq_anystatus m t x y = true) (eq_anystatus m t x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqanystatus_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqanystatus_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqanystatus : ∀m,t.symmetricT (any_status m t) bool (eq_anystatus m t).
- #m; #t;
- #s1; ncases s1; #alu1; #mem1; #chk1; #clk1;
- #s2; ncases s2; #alu2; #mem2; #chk2; #clk2;
- nchange with (
- ((eqc ? alu1 alu2) ⊗ (eqc ? mem1 mem2) ⊗ (eqc ? chk1 chk2) ⊗ (eqc ? clk1 clk2)) =
- ((eqc ? alu2 alu1) ⊗ (eqc ? mem2 mem1) ⊗ (eqc ? chk2 chk1) ⊗ (eqc ? clk2 clk1)));
- nrewrite > (symmetric_eqc … alu1 alu2);
- nrewrite > (symmetric_eqc … mem1 mem2);
- nrewrite > (symmetric_eqc … chk1 chk2);
- nrewrite > (symmetric_eqc … clk1 clk2);
- napply refl_eq.
-nqed.
-
-nlemma anystatus_is_comparable : mcu_type → memory_impl → comparable.
- #m; #t; @ (any_status m t)
- ##[ napply (mk_any_status m t (zeroc ?) (zeroc ?) (zeroc ?) (zeroc ?))
- ##| napply forall_anystatus
- ##| napply eq_anystatus
- ##| napply eqanystatus_to_eq
- ##| napply eq_to_eqanystatus
- ##| napply neqanystatus_to_neq
- ##| napply neq_to_neqanystatus
- ##| napply decidable_anystatus
- ##| napply symmetric_eqanystatus
- ##]
-nqed.
-
-unification hint 0 ≔ M:mcu_type, T:memory_impl ⊢
- carr (anystatus_is_comparable M T) ≡ any_status M T.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/memory/memory_abs.ma".
-include "emulator/status/HC05_status.ma".
-include "emulator/status/HC08_status.ma".
-include "emulator/status/RS08_status.ma".
-include "emulator/status/IP2022_status.ma".
-include "emulator/opcodes/pseudo.ma".
-
-(* *********************************** *)
-(* STATUS INTERNO DEL PROCESSORE (ALU) *)
-(* *********************************** *)
-
-(* descrittore del click = stato di avanzamento dell'esecuzione *)
-(* 1) None = istruzione eseguita, attesa del fetch *)
-(* 2) Some cur_clk,clks,pseudo,mode,cur_pc = fetch eseguito *)
-ndefinition aux_clk_type ≝ λm:mcu_type.Prod5T nat nat (aux_pseudo_type m) (aux_im_type m) word16.
-
-nlemma clk_is_comparable : mcu_type → comparable.
- #m; @ (aux_clk_type m)
- ##[ napply (zeroc (quintuple_is_comparable nat_is_comparable nat_is_comparable (pseudo_is_comparable m) (im_is_comparable m) word16_is_comparable))
- ##| napply (forallc (quintuple_is_comparable nat_is_comparable nat_is_comparable (pseudo_is_comparable m) (im_is_comparable m) word16_is_comparable))
- ##| napply (eqc (quintuple_is_comparable nat_is_comparable nat_is_comparable (pseudo_is_comparable m) (im_is_comparable m) word16_is_comparable))
- ##| napply (eqc_to_eq (quintuple_is_comparable nat_is_comparable nat_is_comparable (pseudo_is_comparable m) (im_is_comparable m) word16_is_comparable))
- ##| napply (eq_to_eqc (quintuple_is_comparable nat_is_comparable nat_is_comparable (pseudo_is_comparable m) (im_is_comparable m) word16_is_comparable))
- ##| napply (neqc_to_neq (quintuple_is_comparable nat_is_comparable nat_is_comparable (pseudo_is_comparable m) (im_is_comparable m) word16_is_comparable))
- ##| napply (neq_to_neqc (quintuple_is_comparable nat_is_comparable nat_is_comparable (pseudo_is_comparable m) (im_is_comparable m) word16_is_comparable))
- ##| napply (decidable_c (quintuple_is_comparable nat_is_comparable nat_is_comparable (pseudo_is_comparable m) (im_is_comparable m) word16_is_comparable))
- ##| napply (symmetric_eqc (quintuple_is_comparable nat_is_comparable nat_is_comparable (pseudo_is_comparable m) (im_is_comparable m) word16_is_comparable))
- ##]
-nqed.
-
-unification hint 0 ≔ M:mcu_type ⊢ carr (clk_is_comparable M) ≡ aux_clk_type M.
-
-(* descritture della alu *)
-ndefinition aux_alu_type ≝
-λm.match m with
- [ HC05 ⇒ alu_HC05
- | HC08 ⇒ alu_HC08
- | HCS08 ⇒ alu_HC08
- | RS08 ⇒ alu_RS08
- | IP2022 ⇒ alu_IP2022
- ].
-
-nlemma alu_is_comparable : mcu_type → comparable.
- #m; @ (aux_alu_type m)
- ##[ nelim m;
- ##[ napply (zeroc aluHC05_is_comparable)
- ##| napply (zeroc aluHC08_is_comparable)
- ##| napply (zeroc aluHC08_is_comparable)
- ##| napply (zeroc aluRS08_is_comparable)
- ##| napply (zeroc aluIP2022_is_comparable) ##]
- ##| nelim m;
- ##[ napply (forallc aluHC05_is_comparable)
- ##| napply (forallc aluHC08_is_comparable)
- ##| napply (forallc aluHC08_is_comparable)
- ##| napply (forallc aluRS08_is_comparable)
- ##| napply (forallc aluIP2022_is_comparable) ##]
- ##| nelim m;
- ##[ napply (eqc aluHC05_is_comparable)
- ##| napply (eqc aluHC08_is_comparable)
- ##| napply (eqc aluHC08_is_comparable)
- ##| napply (eqc aluRS08_is_comparable)
- ##| napply (eqc aluIP2022_is_comparable) ##]
- ##| nelim m;
- ##[ napply (eqc_to_eq aluHC05_is_comparable)
- ##| napply (eqc_to_eq aluHC08_is_comparable)
- ##| napply (eqc_to_eq aluHC08_is_comparable)
- ##| napply (eqc_to_eq aluRS08_is_comparable)
- ##| napply (eqc_to_eq aluIP2022_is_comparable) ##]
- ##| nelim m;
- ##[ napply (eq_to_eqc aluHC05_is_comparable)
- ##| napply (eq_to_eqc aluHC08_is_comparable)
- ##| napply (eq_to_eqc aluHC08_is_comparable)
- ##| napply (eq_to_eqc aluRS08_is_comparable)
- ##| napply (eq_to_eqc aluIP2022_is_comparable) ##]
- ##| nelim m;
- ##[ napply (neqc_to_neq aluHC05_is_comparable)
- ##| napply (neqc_to_neq aluHC08_is_comparable)
- ##| napply (neqc_to_neq aluHC08_is_comparable)
- ##| napply (neqc_to_neq aluRS08_is_comparable)
- ##| napply (neqc_to_neq aluIP2022_is_comparable) ##]
- ##| nelim m;
- ##[ napply (neq_to_neqc aluHC05_is_comparable)
- ##| napply (neq_to_neqc aluHC08_is_comparable)
- ##| napply (neq_to_neqc aluHC08_is_comparable)
- ##| napply (neq_to_neqc aluRS08_is_comparable)
- ##| napply (neq_to_neqc aluIP2022_is_comparable) ##]
- ##| nelim m;
- ##[ napply (decidable_c aluHC05_is_comparable)
- ##| napply (decidable_c aluHC08_is_comparable)
- ##| napply (decidable_c aluHC08_is_comparable)
- ##| napply (decidable_c aluRS08_is_comparable)
- ##| napply (decidable_c aluIP2022_is_comparable) ##]
- ##| nelim m;
- ##[ napply (symmetric_eqc aluHC05_is_comparable)
- ##| napply (symmetric_eqc aluHC08_is_comparable)
- ##| napply (symmetric_eqc aluHC08_is_comparable)
- ##| napply (symmetric_eqc aluRS08_is_comparable)
- ##| napply (symmetric_eqc aluIP2022_is_comparable) ##]
- ##]
-nqed.
-
-unification hint 0 ≔ M:mcu_type ⊢ carr (alu_is_comparable M) ≡ aux_alu_type M.
-
-(* tipo processore dipendente dalla mcu, varia solo la ALU *)
-nrecord any_status (mcu:mcu_type) (t:memory_impl): Type ≝
- {
- (* descrittore della alu *)
- alu : aux_alu_type mcu;
- (* descritore della memoria *)
- mem_desc : aux_mem_type t;
- (* descrittore del tipo di memoria installata *)
- chk_desc : aux_chk_type t;
- (* descrittore del clik *)
- clk_desc : option (aux_clk_type mcu)
- }.
-
-(* evitare di mostrare la memoria/descrittore che impalla il visualizzatore *)
-notation > "{hvbox('Alu' ≝ alu ; break 'Clk' ≝ clk)}" non associative with precedence 80
- for @{ 'mk_any_status $alu $mem $chk $clk }.
-interpretation "mk_any_status" 'mk_any_status alu mem chk clk =
- (mk_any_status alu mem chk clk).
-
-(* ******************** *)
-(* CONFRONTO FRA STATUS *)
-(* ******************** *)
-
-ndefinition eq_anystatus ≝
-λm,t.λs1,s2:any_status m t.
- (eqc ? (alu … s1) (alu … s2)) ⊗
- (eqc ? (mem_desc … s1) (mem_desc … s2)) ⊗
- (eqc ? (chk_desc … s1) (chk_desc … s2)) ⊗
- (eqc ? (clk_desc … s1) (clk_desc … s2)).
-
-ndefinition forall_anystatus ≝ λm,t.λP:any_status m t → bool.
- forallc ? (λr1.forallc ? (λr2.
- forallc ? (λr3.forallc ? (λr4.
- P (mk_any_status m t r1 r2 r3 r4))))).
-
-(* confronto di una regione di memoria [addr1 ; ... ; addrn] *)
-nlet rec forall_memory_ranged
- (t:memory_impl)
- (chk1:aux_chk_type t) (chk2:aux_chk_type t)
- (mem1:aux_mem_type t) (mem2:aux_mem_type t)
- (sel:oct) (addrl:list word16) on addrl ≝
- match addrl return λ_.bool with
- [ nil ⇒ true
- | cons hd tl ⇒ (eqc ? (mem_read t mem1 chk1 sel hd) (mem_read t mem2 chk2 sel hd)) ⊗
- (forall_memory_ranged t chk1 chk2 mem1 mem2 sel tl)
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status_setter.ma".
-
-(* **************** *)
-(* GETTER SPECIFICI *)
-(* **************** *)
-
-(* funzione ausiliaria per il tipaggio dei getter *)
-ndefinition aux_get_type ≝ λT:Type.λm:mcu_type.aux_alu_type m → T.
-
-(* REGISTRI *)
-
-(* getter di A, esiste sempre *)
-ndefinition get_acc_8_low_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type byte8 with
- [ HC05 ⇒ acc_low_reg_HC05
- | HC08 ⇒ acc_low_reg_HC08
- | HCS08 ⇒ acc_low_reg_HC08
- | RS08 ⇒ acc_low_reg_RS08
- | IP2022 ⇒ acc_low_reg_IP2022 ]
- (alu … s).
-
-(* getter di X, non esiste sempre *)
-ndefinition get_indX_8_low_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option byte8) with
- [ HC05 ⇒ λalu.Some ? (indX_low_reg_HC05 alu)
- | HC08 ⇒ λalu.Some ? (indX_low_reg_HC08 alu)
- | HCS08 ⇒ λalu.Some ? (indX_low_reg_HC08 alu)
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.None ? ]
- (alu … s).
-
-(* getter di H, non esiste sempre *)
-ndefinition get_indX_8_high_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option byte8) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.Some ? (indX_high_reg_HC08 alu)
- | HCS08 ⇒ λalu.Some ? (indX_high_reg_HC08 alu)
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.None ? ]
- (alu … s).
-
-(* getter di H:X, non esiste sempre *)
-ndefinition get_indX_16_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option word16) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.Some ? (mk_word16 (indX_high_reg_HC08 alu) (indX_low_reg_HC08 alu))
- | HCS08 ⇒ λalu.Some ? (mk_word16 (indX_high_reg_HC08 alu) (indX_low_reg_HC08 alu))
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.None ? ]
- (alu … s).
-
-(* getter di SP, non esiste sempre *)
-ndefinition get_sp_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option word16) with
- [ HC05 ⇒ λalu.Some ? (sp_reg_HC05 alu)
- | HC08 ⇒ λalu.Some ? (sp_reg_HC08 alu)
- | HCS08 ⇒ λalu.Some ? (sp_reg_HC08 alu)
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (sp_reg_IP2022 alu) ]
- (alu … s).
-
-(* getter di PC, esiste sempre *)
-ndefinition get_pc_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type word16 with
- [ HC05 ⇒ pc_reg_HC05
- | HC08 ⇒ pc_reg_HC08
- | HCS08 ⇒ pc_reg_HC08
- | RS08 ⇒ pc_reg_RS08
- | IP2022 ⇒ pc_reg_IP2022 ]
- (alu … s).
-
-(* getter di SPC, non esiste sempre *)
-ndefinition get_spc_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option word16) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.Some ? (spc_reg_RS08 alu)
- | IP2022 ⇒ λalu.None ? ]
- (alu … s).
-
-(* getter di MULH, non esiste sempre *)
-ndefinition get_mulh_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option byte8) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (mulh_reg_IP2022 alu) ]
- (alu … s).
-
-(* getter di ADDRSEL, non esiste sempre *)
-ndefinition get_addrsel_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option byte8) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (addrsel_reg_IP2022 alu) ]
- (alu … s).
-
-(* getter di ADDR, non esiste sempre *)
-ndefinition get_addr_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option word24) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (get_addr_reg_IP2022 alu) ]
- (alu … s).
-
-(* getter di CALL, non esiste sempre *)
-ndefinition get_call_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option word16) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (get_call_reg_IP2022 alu) ]
- (alu … s).
-
-(* getter di IP, non esiste sempre *)
-ndefinition get_ip_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option word16) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (ip_reg_IP2022 alu) ]
- (alu … s).
-
-(* getter di DP, non esiste sempre *)
-ndefinition get_dp_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option word16) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (dp_reg_IP2022 alu) ]
- (alu … s).
-
-(* getter di DATA, non esiste sempre *)
-ndefinition get_data_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option word16) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (data_reg_IP2022 alu) ]
- (alu … s).
-
-(* getter di SPEED, non esiste sempre *)
-ndefinition get_speed_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option exadecim) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (speed_reg_IP2022 alu) ]
- (alu … s).
-
-(* getter di PAGE, non esiste sempre *)
-ndefinition get_page_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option oct) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (page_reg_IP2022 alu) ]
- (alu … s).
-
-(* REGISTRI SPECIALI *)
-
-(* getter di memory mapped X, non esiste sempre *)
-ndefinition get_x_map ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option byte8) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.Some ? (x_map_RS08 alu)
- | IP2022 ⇒ λalu.None ? ]
- (alu … s).
-
-(* getter di memory mapped PS, non esiste sempre *)
-ndefinition get_ps_map ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option byte8) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.Some ? (ps_map_RS08 alu)
- | IP2022 ⇒ λalu.None ? ]
- (alu … s).
-
-(* getter di skip mode, non esiste sempre *)
-ndefinition get_skip_mode ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option bool) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.None ?
- | HCS08 ⇒ λalu.None ?
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (skip_mode_IP2022 alu) ]
- (alu … s).
-
-(* FLAG *)
-
-(* getter di V, non esiste sempre *)
-ndefinition get_v_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option bool) with
- [ HC05 ⇒ λalu.None ?
- | HC08 ⇒ λalu.Some ? (v_flag_HC08 alu)
- | HCS08 ⇒ λalu.Some ? (v_flag_HC08 alu)
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.None ? ]
- (alu … s).
-
-(* getter di H, non esiste sempre *)
-ndefinition get_h_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option bool) with
- [ HC05 ⇒ λalu.Some ? (h_flag_HC05 alu)
- | HC08 ⇒ λalu.Some ? (h_flag_HC08 alu)
- | HCS08 ⇒ λalu.Some ? (h_flag_HC08 alu)
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.Some ? (h_flag_IP2022 alu) ]
- (alu … s).
-
-(* getter di I, non esiste sempre *)
-ndefinition get_i_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option bool) with
- [ HC05 ⇒ λalu.Some ? (i_flag_HC05 alu)
- | HC08 ⇒ λalu.Some ? (i_flag_HC08 alu)
- | HCS08 ⇒ λalu.Some ? (i_flag_HC08 alu)
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.None ? ]
- (alu … s).
-
-(* getter di N, non esiste sempre *)
-ndefinition get_n_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option bool) with
- [ HC05 ⇒ λalu.Some ? (n_flag_HC05 alu)
- | HC08 ⇒ λalu.Some ? (n_flag_HC08 alu)
- | HCS08 ⇒ λalu.Some ? (n_flag_HC08 alu)
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.None ? ]
- (alu … s).
-
-(* getter di Z, esiste sempre *)
-ndefinition get_z_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type bool with
- [ HC05 ⇒ z_flag_HC05
- | HC08 ⇒ z_flag_HC08
- | HCS08 ⇒ z_flag_HC08
- | RS08 ⇒ z_flag_RS08
- | IP2022 ⇒ z_flag_IP2022 ]
- (alu … s).
-
-(* getter di C, esiste sempre *)
-ndefinition get_c_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type bool with
- [ HC05 ⇒ c_flag_HC05
- | HC08 ⇒ c_flag_HC08
- | HCS08 ⇒ c_flag_HC08
- | RS08 ⇒ c_flag_RS08
- | IP2022 ⇒ c_flag_IP2022 ]
- (alu … s).
-
-(* getter di IRQ, non esiste sempre *)
-ndefinition get_irq_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.
- match m
- return aux_get_type (option bool) with
- [ HC05 ⇒ λalu.Some ? (irq_flag_HC05 alu)
- | HC08 ⇒ λalu.Some ? (irq_flag_HC08 alu)
- | HCS08 ⇒ λalu.Some ? (irq_flag_HC08 alu)
- | RS08 ⇒ λalu.None ?
- | IP2022 ⇒ λalu.None ? ]
- (alu … s).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/status/status.ma".
-
-(* ***************************** *)
-(* SETTER SPECIFICI FORTI/DEBOLI *)
-(* ***************************** *)
-
-(* funzione ausiliaria per il tipaggio dei setter forti *)
-ndefinition aux_set_type ≝ λT:Type.λm:mcu_type.aux_alu_type m → T → aux_alu_type m.
-
-(* funzione ausiliaria per il tipaggio dei setter deboli *)
-ndefinition aux_set_type_opt ≝ λT:Type.λm:mcu_type.option (aux_set_type T m).
-
-(* DESCRITTORI ESTERNI ALLA ALU *)
-
-(* setter forte della ALU *)
-ndefinition set_alu ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λalu'.
- mk_any_status … alu' (mem_desc … s) (chk_desc … s) (clk_desc … s).
-
-(* setter forte della memoria *)
-ndefinition set_mem_desc ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λmem':aux_mem_type t.
- mk_any_status … (alu … s) mem' (chk_desc … s) (clk_desc … s).
-
-(* setter forte del descrittore *)
-ndefinition set_chk_desc ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λchk':aux_chk_type t.
- mk_any_status … (alu … s) (mem_desc … s) chk' (clk_desc … s).
-
-(* setter forte del clik *)
-ndefinition set_clk_desc ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λclk':option (aux_clk_type m).
- mk_any_status … (alu … s) (mem_desc … s) (chk_desc … s) clk'.
-
-(* REGISTRO A *)
-
-(* setter forte di A *)
-ndefinition set_acc_8_low_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval:byte8.
- set_alu … s
- (match m return aux_set_type byte8 with
- [ HC05 ⇒ set_acc_8_low_reg_HC05
- | HC08 ⇒ set_acc_8_low_reg_HC08
- | HCS08 ⇒ set_acc_8_low_reg_HC08
- | RS08 ⇒ set_acc_8_low_reg_RS08
- | IP2022 ⇒ set_acc_8_low_reg_IP2022
- ] (alu … s) val).
-
-(* REGISTRO X *)
-
-ndefinition set_indX_8_low_reg_sHC05 ≝
-λt:memory_impl.λs:any_status HC05 t.λval.
- set_alu … s (set_indX_8_low_reg_HC05 (alu … s) val).
-
-ndefinition set_indX_8_low_reg_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_indX_8_low_reg_HC08 (alu … s) val).
-
-ndefinition set_indX_8_low_reg_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_indX_8_low_reg_HC08 (alu … s) val).
-
-(* setter forte di X *)
-ndefinition set_indX_8_low_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → byte8 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.Some ? (set_indX_8_low_reg_sHC05 t s val)
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_indX_8_low_reg_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_indX_8_low_reg_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di X *)
-ndefinition setweak_indX_8_low_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_indX_8_low_reg … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO H *)
-
-ndefinition set_indX_8_high_reg_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_indX_8_high_reg_HC08 (alu … s) val).
-
-ndefinition set_indX_8_high_reg_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_indX_8_high_reg_HC08 (alu … s) val).
-
-(* setter forte di H *)
-ndefinition set_indX_8_high_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → byte8 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_indX_8_high_reg_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_indX_8_high_reg_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di H *)
-ndefinition setweak_indX_8_high_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_indX_8_high_reg … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO H:X *)
-
-ndefinition set_indX_16_reg_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_indX_16_reg_HC08 (alu … s) val).
-
-ndefinition set_indX_16_reg_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_indX_16_reg_HC08 (alu … s) val).
-
-(* setter forte di H:X *)
-ndefinition set_indX_16_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word16 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_indX_16_reg_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_indX_16_reg_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di H:X *)
-ndefinition setweak_indX_16_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_indX_16_reg … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO SP *)
-
-ndefinition set_sp_reg_sHC05 ≝
-λt:memory_impl.λs:any_status HC05 t.λval.
- set_alu … s (set_sp_reg_HC05 (alu … s) val).
-
-ndefinition set_sp_reg_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_sp_reg_HC08 (alu … s) val).
-
-ndefinition set_sp_reg_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_sp_reg_HC08 (alu … s) val).
-
-ndefinition set_sp_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_sp_reg_IP2022 (alu … s) val).
-
-(* setter forte di SP *)
-ndefinition set_sp_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word16 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.Some ? (set_sp_reg_sHC05 t s val)
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_sp_reg_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_sp_reg_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_sp_reg_sIP2022 t s val)
- ].
-
-(* setter debole di SP *)
-ndefinition setweak_sp_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_sp_reg … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO PC *)
-
-(* setter forte di PC *)
-ndefinition set_pc_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λpc':word16.
- set_alu … s
- (match m return aux_set_type word16 with
- [ HC05 ⇒ set_pc_reg_HC05
- | HC08 ⇒ set_pc_reg_HC08
- | HCS08 ⇒ set_pc_reg_HC08
- | RS08 ⇒ set_pc_reg_RS08
- | IP2022 ⇒ set_pc_reg_IP2022
- ] (alu … s) pc').
-
-(* REGISTRO SPC *)
-
-ndefinition set_spc_reg_sRS08 ≝
-λt:memory_impl.λs:any_status RS08 t.λval.
- set_alu … s (set_spc_reg_RS08 (alu … s) val).
-
-(* setter forte di SPC *)
-ndefinition set_spc_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word16 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.Some ? (set_spc_reg_sRS08 t s val)
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di SPC *)
-ndefinition setweak_spc_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_spc_reg … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO MULH *)
-
-ndefinition set_mulh_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_mulh_reg_IP2022 (alu … s) val).
-
-(* setter forte di MULH *)
-ndefinition set_mulh_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → byte8 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_mulh_reg_sIP2022 t s val)
- ].
-
-(* setter debole di MULH *)
-ndefinition setweak_mulh_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_mulh_reg … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO ADDRSEL *)
-
-ndefinition set_addrsel_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_addrsel_reg_IP2022 (alu … s) val).
-
-(* setter forte di ADDRSEL *)
-ndefinition set_addrsel_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → byte8 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_addrsel_reg_sIP2022 t s val)
- ].
-
-(* setter debole di ADDRSEL *)
-ndefinition setweak_addrsel_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_addrsel_reg … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO ADDR *)
-
-ndefinition set_addr_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_addr_reg_IP2022 (alu … s) val).
-
-(* setter forte di ADDR *)
-ndefinition set_addr_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word24 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_addr_reg_sIP2022 t s val)
- ].
-
-(* setter debole di ADDR *)
-ndefinition setweak_addr_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_addr_reg … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO CALL *)
-
-ndefinition set_call_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_call_reg_IP2022 (alu … s) val).
-
-(* setter forte di CALL *)
-ndefinition set_call_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word16 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_call_reg_sIP2022 t s val)
- ].
-
-(* setter debole di CALL *)
-ndefinition setweak_call_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_call_reg … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO CALL [push] *)
-
-ndefinition push_call_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (push_call_reg_IP2022 (alu … s) val).
-
-(* push forte di CALL *)
-ndefinition push_call_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word16 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (push_call_reg_sIP2022 t s val)
- ].
-
-(* REGISTRO CALL [pop] *)
-
-ndefinition pop_call_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.
- match pop_call_reg_IP2022 (alu … s) with
- [ pair val alu' ⇒ pair … val (set_alu … s alu') ].
-
-(* pop forte di CALL *)
-ndefinition pop_call_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → option (ProdT word16 (any_status m t))
- with
- [ HC05 ⇒ λs:any_status ? t.None ?
- | HC08 ⇒ λs:any_status ? t.None ?
- | HCS08 ⇒ λs:any_status ? t.None ?
- | RS08 ⇒ λs:any_status ? t.None ?
- | IP2022 ⇒ λs:any_status ? t.Some ? (pop_call_reg_sIP2022 t s)
- ].
-
-(* REGISTRO IP *)
-
-ndefinition set_ip_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_ip_reg_IP2022 (alu … s) val).
-
-(* setter forte di IP *)
-ndefinition set_ip_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word16 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_ip_reg_sIP2022 t s val)
- ].
-
-(* setter debole di IP *)
-ndefinition setweak_ip_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_ip_reg … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO DP *)
-
-ndefinition set_dp_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_dp_reg_IP2022 (alu … s) val).
-
-(* setter forte di DP *)
-ndefinition set_dp_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word16 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_dp_reg_sIP2022 t s val)
- ].
-
-(* setter debole di DP *)
-ndefinition setweak_dp_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_dp_reg … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO DATA *)
-
-ndefinition set_data_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_data_reg_IP2022 (alu … s) val).
-
-(* setter forte di DATA *)
-ndefinition set_data_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → word16 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_data_reg_sIP2022 t s val)
- ].
-
-(* setter debole di DATA *)
-ndefinition setweak_data_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_data_reg … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO SPEED *)
-
-ndefinition set_speed_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_speed_reg_IP2022 (alu … s) val).
-
-(* setter forte di SPEED *)
-ndefinition set_speed_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → exadecim → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_speed_reg_sIP2022 t s val)
- ].
-
-(* setter debole di SPEED *)
-ndefinition setweak_speed_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_speed_reg … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO PAGE *)
-
-ndefinition set_page_reg_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_page_reg_IP2022 (alu … s) val).
-
-(* setter forte di PAGE *)
-ndefinition set_page_reg ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → oct → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_page_reg_sIP2022 t s val)
- ].
-
-(* setter debole di PAGE *)
-ndefinition setweak_page_reg ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_page_reg … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO MEMORY MAPPED X *)
-
-ndefinition set_x_map_sRS08 ≝
-λt:memory_impl.λs:any_status RS08 t.λval.
- set_alu … s (set_x_map_RS08 (alu … s) val).
-
-(* setter forte di memory mapped X *)
-ndefinition set_x_map ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → byte8 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.Some ? (set_x_map_sRS08 t s val)
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di memory mapped X *)
-ndefinition setweak_x_map ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_x_map … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* REGISTRO MEMORY MAPPED PS *)
-
-ndefinition set_ps_map_sRS08 ≝
-λt:memory_impl.λs:any_status RS08 t.λval.
- set_alu … s (set_ps_map_RS08 (alu … s) val).
-
-(* setter forte di memory mapped PS *)
-ndefinition set_ps_map ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → byte8 → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.Some ? (set_ps_map_sRS08 t s val)
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di memory mapped PS *)
-ndefinition setweak_ps_map ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_ps_map … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* MODALITA SKIP *)
-
-ndefinition set_skip_mode_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_skip_mode_IP2022 (alu … s) val).
-
-(* setter forte di modalita SKIP *)
-ndefinition set_skip_mode ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → bool → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.None ?
- | HCS08 ⇒ λs:any_status ? t.λval.None ?
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_skip_mode_sIP2022 t s val)
- ].
-
-(* setter debole di SKIP *)
-ndefinition setweak_skip_mode ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_skip_mode … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* FLAG V *)
-
-ndefinition set_v_flag_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_v_flag_HC08 (alu … s) val).
-
-ndefinition set_v_flag_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_v_flag_HC08 (alu … s) val).
-
-(* setter forte di V *)
-ndefinition set_v_flag ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → bool → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.None ?
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_v_flag_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_v_flag_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di V *)
-ndefinition setweak_v_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_v_flag … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* FLAG H *)
-
-ndefinition set_h_flag_sHC05 ≝
-λt:memory_impl.λs:any_status HC05 t.λval.
- set_alu … s (set_h_flag_HC05 (alu … s) val).
-
-ndefinition set_h_flag_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_h_flag_HC08 (alu … s) val).
-
-ndefinition set_h_flag_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_h_flag_HC08 (alu … s) val).
-
-ndefinition set_h_flag_sIP2022 ≝
-λt:memory_impl.λs:any_status IP2022 t.λval.
- set_alu … s (set_h_flag_IP2022 (alu … s) val).
-
-(* setter forte di H *)
-ndefinition set_h_flag ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → bool → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.Some ? (set_h_flag_sHC05 t s val)
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_h_flag_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_h_flag_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.Some ? (set_h_flag_sIP2022 t s val)
- ].
-
-(* setter debole di H *)
-ndefinition setweak_h_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_h_flag … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* FLAG I *)
-
-ndefinition set_i_flag_sHC05 ≝
-λt:memory_impl.λs:any_status HC05 t.λval.
- set_alu … s (set_i_flag_HC05 (alu … s) val).
-
-ndefinition set_i_flag_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_i_flag_HC08 (alu … s) val).
-
-ndefinition set_i_flag_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_i_flag_HC08 (alu … s) val).
-
-(* setter forte di I *)
-ndefinition set_i_flag ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → bool → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.Some ? (set_i_flag_sHC05 t s val)
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_i_flag_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_i_flag_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di I *)
-ndefinition setweak_i_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_i_flag … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* FLAG N *)
-
-ndefinition set_n_flag_sHC05 ≝
-λt:memory_impl.λs:any_status HC05 t.λval.
- set_alu … s (set_n_flag_HC05 (alu … s) val).
-
-ndefinition set_n_flag_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_n_flag_HC08 (alu … s) val).
-
-ndefinition set_n_flag_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_n_flag_HC08 (alu … s) val).
-
-(* setter forte di N *)
-ndefinition set_n_flag ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → bool → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.Some ? (set_n_flag_sHC05 t s val)
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_n_flag_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_n_flag_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di N *)
-ndefinition setweak_n_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_n_flag … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
-
-(* FLAG Z *)
-
-(* setter forte di Z *)
-ndefinition set_z_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λzfl':bool.
- set_alu m t s
- (match m return aux_set_type bool with
- [ HC05 ⇒ set_z_flag_HC05
- | HC08 ⇒ set_z_flag_HC08
- | HCS08 ⇒ set_z_flag_HC08
- | RS08 ⇒ set_z_flag_RS08
- | IP2022 ⇒ set_z_flag_IP2022
- ] (alu m t s) zfl').
-
-(* FLAG C *)
-
-(* setter forte di C *)
-ndefinition set_c_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λcfl':bool.
- set_alu m t s
- (match m return aux_set_type bool with
- [ HC05 ⇒ set_c_flag_HC05
- | HC08 ⇒ set_c_flag_HC08
- | HCS08 ⇒ set_c_flag_HC08
- | RS08 ⇒ set_c_flag_RS08
- | IP2022 ⇒ set_c_flag_IP2022
- ] (alu m t s) cfl').
-
-(* FLAG IRQ *)
-
-ndefinition set_irq_flag_sHC05 ≝
-λt:memory_impl.λs:any_status HC05 t.λval.
- set_alu … s (set_irq_flag_HC05 (alu … s) val).
-
-ndefinition set_irq_flag_sHC08 ≝
-λt:memory_impl.λs:any_status HC08 t.λval.
- set_alu … s (set_irq_flag_HC08 (alu … s) val).
-
-ndefinition set_irq_flag_sHCS08 ≝
-λt:memory_impl.λs:any_status HCS08 t.λval.
- set_alu … s (set_irq_flag_HC08 (alu … s) val).
-
-(* setter forte di IRQ *)
-ndefinition set_irq_flag ≝
-λm:mcu_type.λt.
- match m
- return λm.any_status m t → bool → option (any_status m t)
- with
- [ HC05 ⇒ λs:any_status ? t.λval.Some ? (set_irq_flag_sHC05 t s val)
- | HC08 ⇒ λs:any_status ? t.λval.Some ? (set_irq_flag_sHC08 t s val)
- | HCS08 ⇒ λs:any_status ? t.λval.Some ? (set_irq_flag_sHCS08 t s val)
- | RS08 ⇒ λs:any_status ? t.λval.None ?
- | IP2022 ⇒ λs:any_status ? t.λval.None ?
- ].
-
-(* setter debole di IRQ *)
-ndefinition setweak_irq_flag ≝
-λm:mcu_type.λt:memory_impl.λs:any_status m t.λval.
- match set_irq_flag … s val with
- [ None ⇒ s | Some s' ⇒ s' ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/word16.ma".
-include "common/list.ma".
-
-(* ****************************************** *)
-(* MICRO TEST DI CORRETTEZZA DELLE ISTRUZIONI *)
-(* ****************************************** *)
-
-(* tabella 0x00 - 0xFF utile da caricare in RAM/ROM *)
-ndefinition mTest_bytes : list byte8 ≝
- [ 〈x0,x0〉 ; 〈x0,x1〉 ; 〈x0,x2〉 ; 〈x0,x3〉 ; 〈x0,x4〉 ; 〈x0,x5〉 ; 〈x0,x6〉 ; 〈x0,x7〉
- ; 〈x0,x8〉 ; 〈x0,x9〉 ; 〈x0,xA〉 ; 〈x0,xB〉 ; 〈x0,xC〉 ; 〈x0,xD〉 ; 〈x0,xE〉 ; 〈x0,xF〉 ]
-@[ 〈x1,x0〉 ; 〈x1,x1〉 ; 〈x1,x2〉 ; 〈x1,x3〉 ; 〈x1,x4〉 ; 〈x1,x5〉 ; 〈x1,x6〉 ; 〈x1,x7〉
- ; 〈x1,x8〉 ; 〈x1,x9〉 ; 〈x1,xA〉 ; 〈x1,xB〉 ; 〈x1,xC〉 ; 〈x1,xD〉 ; 〈x1,xE〉 ; 〈x1,xF〉 ]
-@[ 〈x2,x0〉 ; 〈x2,x1〉 ; 〈x2,x2〉 ; 〈x2,x3〉 ; 〈x2,x4〉 ; 〈x2,x5〉 ; 〈x2,x6〉 ; 〈x2,x7〉
- ; 〈x2,x8〉 ; 〈x2,x9〉 ; 〈x2,xA〉 ; 〈x2,xB〉 ; 〈x2,xC〉 ; 〈x2,xD〉 ; 〈x2,xE〉 ; 〈x2,xF〉 ]
-@[ 〈x3,x0〉 ; 〈x3,x1〉 ; 〈x3,x2〉 ; 〈x3,x3〉 ; 〈x3,x4〉 ; 〈x3,x5〉 ; 〈x3,x6〉 ; 〈x3,x7〉
- ; 〈x3,x8〉 ; 〈x3,x9〉 ; 〈x3,xA〉 ; 〈x3,xB〉 ; 〈x3,xC〉 ; 〈x3,xD〉 ; 〈x3,xE〉 ; 〈x3,xF〉 ]
-@[ 〈x4,x0〉 ; 〈x4,x1〉 ; 〈x4,x2〉 ; 〈x4,x3〉 ; 〈x4,x4〉 ; 〈x4,x5〉 ; 〈x4,x6〉 ; 〈x4,x7〉
- ; 〈x4,x8〉 ; 〈x4,x9〉 ; 〈x4,xA〉 ; 〈x4,xB〉 ; 〈x4,xC〉 ; 〈x4,xD〉 ; 〈x4,xE〉 ; 〈x4,xF〉 ]
-@[ 〈x5,x0〉 ; 〈x5,x1〉 ; 〈x5,x2〉 ; 〈x5,x3〉 ; 〈x5,x4〉 ; 〈x5,x5〉 ; 〈x5,x6〉 ; 〈x5,x7〉
- ; 〈x5,x8〉 ; 〈x5,x9〉 ; 〈x5,xA〉 ; 〈x5,xB〉 ; 〈x5,xC〉 ; 〈x5,xD〉 ; 〈x5,xE〉 ; 〈x5,xF〉 ]
-@[ 〈x6,x0〉 ; 〈x6,x1〉 ; 〈x6,x2〉 ; 〈x6,x3〉 ; 〈x6,x4〉 ; 〈x6,x5〉 ; 〈x6,x6〉 ; 〈x6,x7〉
- ; 〈x6,x8〉 ; 〈x6,x9〉 ; 〈x6,xA〉 ; 〈x6,xB〉 ; 〈x6,xC〉 ; 〈x6,xD〉 ; 〈x6,xE〉 ; 〈x6,xF〉 ]
-@[ 〈x7,x0〉 ; 〈x7,x1〉 ; 〈x7,x2〉 ; 〈x7,x3〉 ; 〈x7,x4〉 ; 〈x7,x5〉 ; 〈x7,x6〉 ; 〈x7,x7〉
- ; 〈x7,x8〉 ; 〈x7,x9〉 ; 〈x7,xA〉 ; 〈x7,xB〉 ; 〈x7,xC〉 ; 〈x7,xD〉 ; 〈x7,xE〉 ; 〈x7,xF〉 ]
-@[ 〈x8,x0〉 ; 〈x8,x1〉 ; 〈x8,x2〉 ; 〈x8,x3〉 ; 〈x8,x4〉 ; 〈x8,x5〉 ; 〈x8,x6〉 ; 〈x8,x7〉
- ; 〈x8,x8〉 ; 〈x8,x9〉 ; 〈x8,xA〉 ; 〈x8,xB〉 ; 〈x8,xC〉 ; 〈x8,xD〉 ; 〈x8,xE〉 ; 〈x8,xF〉 ]
-@[ 〈x9,x0〉 ; 〈x9,x1〉 ; 〈x9,x2〉 ; 〈x9,x3〉 ; 〈x9,x4〉 ; 〈x9,x5〉 ; 〈x9,x6〉 ; 〈x9,x7〉
- ; 〈x9,x8〉 ; 〈x9,x9〉 ; 〈x9,xA〉 ; 〈x9,xB〉 ; 〈x9,xC〉 ; 〈x9,xD〉 ; 〈x9,xE〉 ; 〈x9,xF〉 ]
-@[ 〈xA,x0〉 ; 〈xA,x1〉 ; 〈xA,x2〉 ; 〈xA,x3〉 ; 〈xA,x4〉 ; 〈xA,x5〉 ; 〈xA,x6〉 ; 〈xA,x7〉
- ; 〈xA,x8〉 ; 〈xA,x9〉 ; 〈xA,xA〉 ; 〈xA,xB〉 ; 〈xA,xC〉 ; 〈xA,xD〉 ; 〈xA,xE〉 ; 〈xA,xF〉 ]
-@[ 〈xB,x0〉 ; 〈xB,x1〉 ; 〈xB,x2〉 ; 〈xB,x3〉 ; 〈xB,x4〉 ; 〈xB,x5〉 ; 〈xB,x6〉 ; 〈xB,x7〉
- ; 〈xB,x8〉 ; 〈xB,x9〉 ; 〈xB,xA〉 ; 〈xB,xB〉 ; 〈xB,xC〉 ; 〈xB,xD〉 ; 〈xB,xE〉 ; 〈xB,xF〉 ]
-@[ 〈xC,x0〉 ; 〈xC,x1〉 ; 〈xC,x2〉 ; 〈xC,x3〉 ; 〈xC,x4〉 ; 〈xC,x5〉 ; 〈xC,x6〉 ; 〈xC,x7〉
- ; 〈xC,x8〉 ; 〈xC,x9〉 ; 〈xC,xA〉 ; 〈xC,xB〉 ; 〈xC,xC〉 ; 〈xC,xD〉 ; 〈xC,xE〉 ; 〈xC,xF〉 ]
-@[ 〈xD,x0〉 ; 〈xD,x1〉 ; 〈xD,x2〉 ; 〈xD,x3〉 ; 〈xD,x4〉 ; 〈xD,x5〉 ; 〈xD,x6〉 ; 〈xD,x7〉
- ; 〈xD,x8〉 ; 〈xD,x9〉 ; 〈xD,xA〉 ; 〈xD,xB〉 ; 〈xD,xC〉 ; 〈xD,xD〉 ; 〈xD,xE〉 ; 〈xD,xF〉 ]
-@[ 〈xE,x0〉 ; 〈xE,x1〉 ; 〈xE,x2〉 ; 〈xE,x3〉 ; 〈xE,x4〉 ; 〈xE,x5〉 ; 〈xE,x6〉 ; 〈xE,x7〉
- ; 〈xE,x8〉 ; 〈xE,x9〉 ; 〈xE,xA〉 ; 〈xE,xB〉 ; 〈xE,xC〉 ; 〈xE,xD〉 ; 〈xE,xE〉 ; 〈xE,xF〉 ]
-@[ 〈xF,x0〉 ; 〈xF,x1〉 ; 〈xF,x2〉 ; 〈xF,x3〉 ; 〈xF,x4〉 ; 〈xF,x5〉 ; 〈xF,x6〉 ; 〈xF,x7〉
- ; 〈xF,x8〉 ; 〈xF,x9〉 ; 〈xF,xA〉 ; 〈xF,xB〉 ; 〈xF,xC〉 ; 〈xF,xD〉 ; 〈xF,xE〉 ; 〈xF,xF〉
- ].
-
-(*
- 1) mTest_x_RAM : inizio della RAM
- (start point per caricamento mTest_bytes in RAM)
- 2) mTest_x_prog: inizio della ROM
- (start point per caricamento programma in ROM)
- 3) mTest_x_data: ultimi 256b della ROM
- (start point per caricamento mTest_bytes in ROM)
-*)
-ndefinition mTest_HCS08_RAM ≝ 〈〈x0,x0〉:〈x7,x0〉〉.
-ndefinition mTest_HCS08_prog ≝ 〈〈x1,x8〉:〈x6,x0〉〉.
-ndefinition mTest_HCS08_data ≝ 〈〈xF,xF〉:〈x0,x0〉〉.
-
-ndefinition mTest_RS08_RAM ≝ 〈〈x0,x0〉:〈x2,x0〉〉.
-ndefinition mTest_RS08_prog ≝ 〈〈x3,x8〉:〈x0,x0〉〉.
-ndefinition mTest_RS08_data ≝ 〈〈x3,xF〉:〈x0,x0〉〉.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/translation/translation_base.ma".
-
-(* ******************************************************* *)
-(* TRADUZIONE MCU+PSEUDO+MODALITA'+ARGOMENTI → ESADECIMALE *)
-(* ******************************************************* *)
-
-(* introduzione di un tipo dipendente (dalla modalita') per gli argomenti *)
-ninductive Freescale_MA_check : Freescale_instr_mode → Type ≝
- maINH : Freescale_MA_check MODE_INH
-| maINHA : Freescale_MA_check MODE_INHA
-| maINHX : Freescale_MA_check MODE_INHX
-| maINHH : Freescale_MA_check MODE_INHH
-| maINHX0ADD : Freescale_MA_check MODE_INHX0ADD
-| maINHX1ADD : byte8 → Freescale_MA_check MODE_INHX1ADD
-| maINHX2ADD : word16 → Freescale_MA_check MODE_INHX2ADD
-| maIMM1 : byte8 → Freescale_MA_check MODE_IMM1
-| maIMM1EXT : byte8 → Freescale_MA_check MODE_IMM1EXT
-| maIMM2 : word16 → Freescale_MA_check MODE_IMM2
-| maDIR1 : byte8 → Freescale_MA_check MODE_DIR1
-| maDIR2 : word16 → Freescale_MA_check MODE_DIR2
-| maIX0 : Freescale_MA_check MODE_IX0
-| maIX1 : byte8 → Freescale_MA_check MODE_IX1
-| maIX2 : word16 → Freescale_MA_check MODE_IX2
-| maSP1 : byte8 → Freescale_MA_check MODE_SP1
-| maSP2 : word16 → Freescale_MA_check MODE_SP2
-| maDIR1_to_DIR1 : byte8 → byte8 → Freescale_MA_check MODE_DIR1_to_DIR1
-| maIMM1_to_DIR1 : byte8 → byte8 → Freescale_MA_check MODE_IMM1_to_DIR1
-| maIX0p_to_DIR1 : byte8 → Freescale_MA_check MODE_IX0p_to_DIR1
-| maDIR1_to_IX0p : byte8 → Freescale_MA_check MODE_DIR1_to_IX0p
-| maINHA_and_IMM1 : byte8 → Freescale_MA_check MODE_INHA_and_IMM1
-| maINHX_and_IMM1 : byte8 → Freescale_MA_check MODE_INHX_and_IMM1
-| maIMM1_and_IMM1 : byte8 → byte8 → Freescale_MA_check MODE_IMM1_and_IMM1
-| maDIR1_and_IMM1 : byte8 → byte8 → Freescale_MA_check MODE_DIR1_and_IMM1
-| maIX0_and_IMM1 : byte8 → Freescale_MA_check MODE_IX0_and_IMM1
-| maIX0p_and_IMM1 : byte8 → Freescale_MA_check MODE_IX0p_and_IMM1
-| maIX1_and_IMM1 : byte8 → byte8 → Freescale_MA_check MODE_IX1_and_IMM1
-| maIX1p_and_IMM1 : byte8 → byte8 → Freescale_MA_check MODE_IX1p_and_IMM1
-| maSP1_and_IMM1 : byte8 → byte8 → Freescale_MA_check MODE_SP1_and_IMM1
-| maDIRn : ∀n.byte8 → Freescale_MA_check (MODE_DIRn n)
-| maDIRn_and_IMM1 : ∀n.byte8 → byte8 → Freescale_MA_check (MODE_DIRn_and_IMM1 n)
-| maTNY : ∀e.Freescale_MA_check (MODE_TNY e)
-| maSRT : ∀t.Freescale_MA_check (MODE_SRT t)
-.
-
-(* picker: trasforma l'argomento necessario in input a bytes_of_pseudo_instr_mode_param:
- MA_check i → list (t_byte8 m) *)
-ndefinition Freescale_args_picker ≝
-λm.λi:Freescale_instr_mode.λargs:Freescale_MA_check i.
- match args with
- (* inherent: legale se nessun operando *)
- [ maINH ⇒ nil ?
- | maINHA ⇒ nil ?
- | maINHX ⇒ nil ?
- | maINHH ⇒ nil ?
- (* inherent address: legale se nessun operando/1 byte/1 word *)
- | maINHX0ADD ⇒ nil ?
- | maINHX1ADD b ⇒ [ TByte m b ]
- | maINHX2ADD w ⇒ [ TByte m (cnH ? w); TByte m (cnL ? w) ]
- (* _0/1/2: legale se nessun operando/1 byte/1 word *)
- | maIMM1 b ⇒ [ TByte m b ]
- | maIMM1EXT b ⇒ [ TByte m b ]
- | maIMM2 w ⇒ [ TByte m (cnH ? w); TByte m (cnL ? w) ]
- | maDIR1 b ⇒ [ TByte m b ]
- | maDIR2 w ⇒ [ TByte m (cnH ? w); TByte m (cnL ? w) ]
- | maIX0 ⇒ nil ?
- | maIX1 b ⇒ [ TByte m b ]
- | maIX2 w ⇒ [ TByte m (cnH ? w); TByte m (cnL ? w) ]
- | maSP1 b ⇒ [ TByte m b ]
- | maSP2 w ⇒ [ TByte m (cnH ? w); TByte m (cnL ? w) ]
- (* movimento: legale se 2 operandi byte *)
- | maDIR1_to_DIR1 b1 b2 ⇒ [ TByte m b1 ; TByte m b2 ]
- | maIMM1_to_DIR1 b1 b2 ⇒ [ TByte m b1 ; TByte m b2 ]
- | maIX0p_to_DIR1 b ⇒ [ TByte m b]
- | maDIR1_to_IX0p b ⇒ [ TByte m b]
- (* cbeq/dbnz: legale se 1/2 operandi byte *)
- | maINHA_and_IMM1 b ⇒ [ TByte m b]
- | maINHX_and_IMM1 b ⇒ [ TByte m b]
- | maIMM1_and_IMM1 b1 b2 ⇒ [ TByte m b1 ; TByte m b2 ]
- | maDIR1_and_IMM1 b1 b2 ⇒ [ TByte m b1 ; TByte m b2 ]
- | maIX0_and_IMM1 b ⇒ [ TByte m b]
- | maIX0p_and_IMM1 b ⇒ [ TByte m b]
- | maIX1_and_IMM1 b1 b2 ⇒ [ TByte m b1 ; TByte m b2 ]
- | maIX1p_and_IMM1 b1 b2 ⇒ [ TByte m b1 ; TByte m b2 ]
- | maSP1_and_IMM1 b1 b2 ⇒ [ TByte m b1 ; TByte m b2 ]
- (* DIRn: legale se 1 operando byte *)
- | maDIRn _ b ⇒ [ TByte m b]
- (* DIRn_and_IMM1: legale se 2 operandi byte *)
- | maDIRn_and_IMM1 _ b1 b2 ⇒ [ TByte m b1 ; TByte m b2 ]
- (* TNY: legale se nessun operando *)
- | maTNY _ ⇒ nil ?
- (* SRT: legale se nessun operando *)
- | maSRT _ ⇒ nil ?
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/translation/translation_base.ma".
-
-(* ******************************************************* *)
-(* TRADUZIONE MCU+OPCODE+MODALITA'+ARGOMENTI → ESADECIMALE *)
-(* ******************************************************* *)
-
-(* introduzione di un tipo dipendente (dalla modalita') per gli argomenti *)
-ninductive IP2022_MA_check : IP2022_instr_mode → Type ≝
- maINH : IP2022_MA_check MODE_INH
-| maIMM3 : ∀n.IP2022_MA_check (MODE_IMM3 n)
-| maIMM8 : byte8 → IP2022_MA_check MODE_IMM8
-| maIMM13 : ∀t.byte8 → IP2022_MA_check (MODE_IMM13 t)
-| maFR0_and_W : byte8 → IP2022_MA_check MODE_FR0_and_W
-| maFR1_and_W : byte8 → IP2022_MA_check MODE_FR1_and_W
-| maW_and_FR0 : byte8 → IP2022_MA_check MODE_W_and_FR0
-| maW_and_FR1 : byte8 → IP2022_MA_check MODE_W_and_FR1
-| maFR0n : ∀n.byte8 → IP2022_MA_check (MODE_FR0n n)
-| maFR1n : ∀n.byte8 → IP2022_MA_check (MODE_FR1n n)
-.
-
-(* picker: trasforma l'argomento necessario in input a bytes_of_pseudo_instr_mode_param:
- MA_check i → list (t_byte8 m) *)
-ndefinition IP2022_args_picker ≝
-λi:IP2022_instr_mode.λargs:IP2022_MA_check i.
- match args with
- [ maINH ⇒ nil ?
- | maIMM3 _ ⇒ nil ?
- | maIMM8 b ⇒ [ TByte IP2022 b ]
- | maIMM13 _ b ⇒ [ TByte IP2022 b ]
- | maFR0_and_W b ⇒ [ TByte IP2022 b ]
- | maFR1_and_W b ⇒ [ TByte IP2022 b ]
- | maW_and_FR0 b ⇒ [ TByte IP2022 b ]
- | maW_and_FR1 b ⇒ [ TByte IP2022 b ]
- | maFR0n _ b ⇒ [ TByte IP2022 b ]
- | maFR1n _ b ⇒ [ TByte IP2022 b ]
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/translation/Freescale_translation.ma".
-include "emulator/translation/IP2022_translation.ma".
-
-(* ******************************************************* *)
-(* TRADUZIONE MCU+OPCODE+MODALITA'+ARGOMENTI → ESADECIMALE *)
-(* ******************************************************* *)
-
-(* introduzione di un tipo dipendente (dalla modalita') per gli argomenti *)
-ndefinition MA_check ≝
-λmcu:mcu_type.
- match mcu
- return λm.(aux_im_type m) → Type
- with
- [ HC05 ⇒ Freescale_MA_check
- | HC08 ⇒ Freescale_MA_check
- | HCS08 ⇒ Freescale_MA_check
- | RS08 ⇒ Freescale_MA_check
- | IP2022 ⇒ IP2022_MA_check
- ].
-
-(* picker: trasforma l'argomento necessario in input a bytes_of_pseudo_instr_mode_param:
- MA_check i → list (t_byte8 m) *)
-ndefinition args_picker ≝
-λmcu:mcu_type.
- match mcu
- return λm.Πi:(aux_im_type m).MA_check m i → ?
- with
- [ HC05 ⇒ Freescale_args_picker HC05
- | HC08 ⇒ Freescale_args_picker HC08
- | HCS08 ⇒ Freescale_args_picker HCS08
- | RS08 ⇒ Freescale_args_picker RS08
- | IP2022 ⇒ IP2022_args_picker
- ].
-
-(* trasformatore finale: mcu+opcode+instr_mode+args → list (t_byte8 m) *)
-nlet rec bytes_of_pseudo_instr_mode_param_aux (m:mcu_type) (o:aux_pseudo_type m) (i:aux_im_type m) (p:MA_check m i)
- (param:list (aux_table_type m)) on param ≝
- match param with
- [ nil ⇒ None ? | cons hd tl ⇒
- match (eqc ? o (fst4T … hd)) ⊗ (eqc ? i (snd4T … hd)) with
- [ true ⇒ match thd4T … hd with
- [ Byte isab ⇒
- Some ? ([ (TByte m isab) ]@(args_picker m i p))
- | Word isaw ⇒
- Some ? ([ (TByte m (cnH ? isaw)) ; (TByte m (cnL ? isaw)) ]@(args_picker m i p))
- ]
- | false ⇒ bytes_of_pseudo_instr_mode_param_aux m o i p tl ]].
-
-ndefinition bytes_of_pseudo_instr_mode_param ≝
-λm:mcu_type.λo:aux_pseudo_type m.λi:aux_im_type m.λp:MA_check m i.
-bytes_of_pseudo_instr_mode_param_aux m o i p (opcode_table m).
-
-(* ****************************** *)
-(* APPROCCIO COMPILAZIONE AL VOLO *)
-(* ****************************** *)
-
-(* ausiliario di compile *)
-ndefinition defined_option ≝
- λT:Type.λo:option T.
- match o with
- [ None ⇒ False
- | Some _ ⇒ True
- ].
-
-(* compila solo se l'intera istruzione+modalita'+argomenti ha riscontro nelle tabelle *)
-ndefinition compile ≝
-λmcu:mcu_type.λi:aux_im_type mcu.λop:aux_pseudo_type mcu.λarg:MA_check mcu i.
- match bytes_of_pseudo_instr_mode_param mcu op i arg
- return λres:option ?.defined_option ? res → ?
- with
- [ None ⇒ λp:defined_option ? (None ?).False_rect_Type0 ? p
- | Some x ⇒ λp:defined_option ? (Some ? x).x
- ].
-
-(* detipatore del compilato: (t_byte8 m) → byte8 *)
-nlet rec source_to_byte8_aux (m:mcu_type) (p2:list byte8) (p1:list (t_byte8 m)) on p1 ≝
- match p1 with
- [ nil ⇒ p2
- | cons hd tl ⇒ match hd with [ TByte b ⇒ source_to_byte8_aux m (p2@[b]) tl ]
- ].
-
-ndefinition source_to_byte8 ≝ λm:mcu_type.source_to_byte8_aux m [].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "emulator/opcodes/pseudo.ma".
-include "common/option.ma".
-include "emulator/opcodes/HC05_table.ma".
-include "emulator/opcodes/HC08_table.ma".
-include "emulator/opcodes/HCS08_table.ma".
-include "emulator/opcodes/RS08_table.ma".
-include "emulator/opcodes/IP2022_table.ma".
-
-(* ***************************** *)
-(* TRADUZIONE ESADECIMALE → INFO *)
-(* ***************************** *)
-
-(* accesso alla tabella della ALU prescelta *)
-ndefinition opcode_table ≝
-λm:mcu_type.
- match m
- return λm:mcu_type.list (aux_table_type m)
- with
- [ HC05 ⇒ opcode_table_HC05
- | HC08 ⇒ opcode_table_HC08
- | HCS08 ⇒ opcode_table_HCS08
- | RS08 ⇒ opcode_table_RS08
- | IP2022 ⇒ opcode_table_IP2022
- ].
-
-(* traduzione mcu+esadecimale → info *)
-(* NB: la ricerca per byte non matcha con una word con lo stesso byte superiore uguale *)
-(* NB: per matchare una word (precode+code) bisogna passare una word *)
-(* NB: il risultato e' sempre un'opzione, NON esiste un dummy opcode tipo UNKNOWN/ILLEGAL *)
-nlet rec full_info_of_word16_aux (m:mcu_type) (borw:byte8_or_word16) (param:list (aux_table_type m)) on param ≝
- match param with
- [ nil ⇒ None ?
- | cons hd tl ⇒
- match thd4T … hd with
- [ Byte b ⇒ match borw with
- [ Byte borw' ⇒ match eqc ? borw' b with
- [ true ⇒ Some ? hd
- | false ⇒ full_info_of_word16_aux m borw tl ]
- | Word _ ⇒ full_info_of_word16_aux m borw tl ]
- | Word w ⇒ match borw with
- [ Byte _ ⇒ full_info_of_word16_aux m borw tl
- | Word borw' ⇒ match eqc ? borw' w with
- [ true ⇒ Some ? hd
- | false ⇒ full_info_of_word16_aux m borw tl ]
- ]]].
-
-ndefinition full_info_of_word16 ≝
-λm:mcu_type.λborw:byte8_or_word16.
-full_info_of_word16_aux m borw (opcode_table m).
-
-(* introduzione di un tipo byte8 dipendente dall'mcu_type (phantom type) *)
-ninductive t_byte8 (m:mcu_type) : Type ≝
- TByte : byte8 → t_byte8 m.
-
-ndefinition eq_tbyte8 ≝
-λm.λtb1,tb2:t_byte8 m.
- match tb1 with
- [ TByte b1 ⇒ match tb2 with
- [ TByte b2 ⇒ eqc ? b1 b2 ]].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/comp.ma".
-include "num/bool_lemmas.ma".
-
-(* ************* *)
-(* BITRIGESIMALI *)
-(* ************* *)
-
-ninductive bitrigesim : Type ≝
- t00: bitrigesim
-| t01: bitrigesim
-| t02: bitrigesim
-| t03: bitrigesim
-| t04: bitrigesim
-| t05: bitrigesim
-| t06: bitrigesim
-| t07: bitrigesim
-| t08: bitrigesim
-| t09: bitrigesim
-| t0A: bitrigesim
-| t0B: bitrigesim
-| t0C: bitrigesim
-| t0D: bitrigesim
-| t0E: bitrigesim
-| t0F: bitrigesim
-| t10: bitrigesim
-| t11: bitrigesim
-| t12: bitrigesim
-| t13: bitrigesim
-| t14: bitrigesim
-| t15: bitrigesim
-| t16: bitrigesim
-| t17: bitrigesim
-| t18: bitrigesim
-| t19: bitrigesim
-| t1A: bitrigesim
-| t1B: bitrigesim
-| t1C: bitrigesim
-| t1D: bitrigesim
-| t1E: bitrigesim
-| t1F: bitrigesim.
-
-(* operatore = *)
-ndefinition eq_bit ≝
-λt1,t2:bitrigesim.
- match t1 with
- [ t00 ⇒ match t2 with [ t00 ⇒ true | _ ⇒ false ] | t01 ⇒ match t2 with [ t01 ⇒ true | _ ⇒ false ]
- | t02 ⇒ match t2 with [ t02 ⇒ true | _ ⇒ false ] | t03 ⇒ match t2 with [ t03 ⇒ true | _ ⇒ false ]
- | t04 ⇒ match t2 with [ t04 ⇒ true | _ ⇒ false ] | t05 ⇒ match t2 with [ t05 ⇒ true | _ ⇒ false ]
- | t06 ⇒ match t2 with [ t06 ⇒ true | _ ⇒ false ] | t07 ⇒ match t2 with [ t07 ⇒ true | _ ⇒ false ]
- | t08 ⇒ match t2 with [ t08 ⇒ true | _ ⇒ false ] | t09 ⇒ match t2 with [ t09 ⇒ true | _ ⇒ false ]
- | t0A ⇒ match t2 with [ t0A ⇒ true | _ ⇒ false ] | t0B ⇒ match t2 with [ t0B ⇒ true | _ ⇒ false ]
- | t0C ⇒ match t2 with [ t0C ⇒ true | _ ⇒ false ] | t0D ⇒ match t2 with [ t0D ⇒ true | _ ⇒ false ]
- | t0E ⇒ match t2 with [ t0E ⇒ true | _ ⇒ false ] | t0F ⇒ match t2 with [ t0F ⇒ true | _ ⇒ false ]
- | t10 ⇒ match t2 with [ t10 ⇒ true | _ ⇒ false ] | t11 ⇒ match t2 with [ t11 ⇒ true | _ ⇒ false ]
- | t12 ⇒ match t2 with [ t12 ⇒ true | _ ⇒ false ] | t13 ⇒ match t2 with [ t13 ⇒ true | _ ⇒ false ]
- | t14 ⇒ match t2 with [ t14 ⇒ true | _ ⇒ false ] | t15 ⇒ match t2 with [ t15 ⇒ true | _ ⇒ false ]
- | t16 ⇒ match t2 with [ t16 ⇒ true | _ ⇒ false ] | t17 ⇒ match t2 with [ t17 ⇒ true | _ ⇒ false ]
- | t18 ⇒ match t2 with [ t18 ⇒ true | _ ⇒ false ] | t19 ⇒ match t2 with [ t19 ⇒ true | _ ⇒ false ]
- | t1A ⇒ match t2 with [ t1A ⇒ true | _ ⇒ false ] | t1B ⇒ match t2 with [ t1B ⇒ true | _ ⇒ false ]
- | t1C ⇒ match t2 with [ t1C ⇒ true | _ ⇒ false ] | t1D ⇒ match t2 with [ t1D ⇒ true | _ ⇒ false ]
- | t1E ⇒ match t2 with [ t1E ⇒ true | _ ⇒ false ] | t1F ⇒ match t2 with [ t1F ⇒ true | _ ⇒ false ]
- ].
-
-(* iteratore sui bitrigesimali *)
-ndefinition forall_bit ≝ λP.
- P t00 ⊗ P t01 ⊗ P t02 ⊗ P t03 ⊗ P t04 ⊗ P t05 ⊗ P t06 ⊗ P t07 ⊗
- P t08 ⊗ P t09 ⊗ P t0A ⊗ P t0B ⊗ P t0C ⊗ P t0D ⊗ P t0E ⊗ P t0F ⊗
- P t10 ⊗ P t11 ⊗ P t12 ⊗ P t13 ⊗ P t14 ⊗ P t15 ⊗ P t16 ⊗ P t17 ⊗
- P t18 ⊗ P t19 ⊗ P t1A ⊗ P t1B ⊗ P t1C ⊗ P t1D ⊗ P t1E ⊗ P t1F.
-
-(* operatore and *)
-ndefinition and_bit ≝
-λe1,e2.match e1 with
- [ t00 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t00 | t02 ⇒ t00 | t03 ⇒ t00 | t04 ⇒ t00 | t05 ⇒ t00 | t06 ⇒ t00 | t07 ⇒ t00
- | t08 ⇒ t00 | t09 ⇒ t00 | t0A ⇒ t00 | t0B ⇒ t00 | t0C ⇒ t00 | t0D ⇒ t00 | t0E ⇒ t00 | t0F ⇒ t00
- | t10 ⇒ t00 | t11 ⇒ t00 | t12 ⇒ t00 | t13 ⇒ t00 | t14 ⇒ t00 | t15 ⇒ t00 | t16 ⇒ t00 | t17 ⇒ t00
- | t18 ⇒ t00 | t19 ⇒ t00 | t1A ⇒ t00 | t1B ⇒ t00 | t1C ⇒ t00 | t1D ⇒ t00 | t1E ⇒ t00 | t1F ⇒ t00 ]
- | t01 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t00 | t03 ⇒ t01 | t04 ⇒ t00 | t05 ⇒ t01 | t06 ⇒ t00 | t07 ⇒ t01
- | t08 ⇒ t00 | t09 ⇒ t01 | t0A ⇒ t00 | t0B ⇒ t01 | t0C ⇒ t00 | t0D ⇒ t01 | t0E ⇒ t00 | t0F ⇒ t01
- | t10 ⇒ t00 | t11 ⇒ t01 | t12 ⇒ t00 | t13 ⇒ t01 | t14 ⇒ t00 | t15 ⇒ t01 | t16 ⇒ t00 | t17 ⇒ t01
- | t18 ⇒ t00 | t19 ⇒ t01 | t1A ⇒ t00 | t1B ⇒ t01 | t1C ⇒ t00 | t1D ⇒ t01 | t1E ⇒ t00 | t1F ⇒ t01 ]
- | t02 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t00 | t02 ⇒ t02 | t03 ⇒ t02 | t04 ⇒ t00 | t05 ⇒ t00 | t06 ⇒ t02 | t07 ⇒ t02
- | t08 ⇒ t00 | t09 ⇒ t00 | t0A ⇒ t02 | t0B ⇒ t02 | t0C ⇒ t00 | t0D ⇒ t00 | t0E ⇒ t02 | t0F ⇒ t02
- | t10 ⇒ t00 | t11 ⇒ t00 | t12 ⇒ t02 | t13 ⇒ t02 | t14 ⇒ t00 | t15 ⇒ t00 | t16 ⇒ t02 | t17 ⇒ t02
- | t18 ⇒ t00 | t19 ⇒ t00 | t1A ⇒ t02 | t1B ⇒ t02 | t1C ⇒ t00 | t1D ⇒ t00 | t1E ⇒ t02 | t1F ⇒ t02 ]
- | t03 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t02 | t03 ⇒ t03 | t04 ⇒ t00 | t05 ⇒ t01 | t06 ⇒ t02 | t07 ⇒ t03
- | t08 ⇒ t00 | t09 ⇒ t01 | t0A ⇒ t02 | t0B ⇒ t03 | t0C ⇒ t00 | t0D ⇒ t01 | t0E ⇒ t02 | t0F ⇒ t03
- | t10 ⇒ t00 | t11 ⇒ t01 | t12 ⇒ t02 | t13 ⇒ t03 | t14 ⇒ t00 | t15 ⇒ t01 | t16 ⇒ t02 | t17 ⇒ t03
- | t18 ⇒ t00 | t19 ⇒ t01 | t1A ⇒ t02 | t1B ⇒ t03 | t1C ⇒ t00 | t1D ⇒ t01 | t1E ⇒ t02 | t1F ⇒ t03 ]
- | t04 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t00 | t02 ⇒ t00 | t03 ⇒ t00 | t04 ⇒ t04 | t05 ⇒ t04 | t06 ⇒ t04 | t07 ⇒ t04
- | t08 ⇒ t00 | t09 ⇒ t00 | t0A ⇒ t00 | t0B ⇒ t00 | t0C ⇒ t04 | t0D ⇒ t04 | t0E ⇒ t04 | t0F ⇒ t04
- | t10 ⇒ t00 | t11 ⇒ t00 | t12 ⇒ t00 | t13 ⇒ t00 | t14 ⇒ t04 | t15 ⇒ t04 | t16 ⇒ t04 | t17 ⇒ t04
- | t18 ⇒ t00 | t19 ⇒ t00 | t1A ⇒ t00 | t1B ⇒ t00 | t1C ⇒ t04 | t1D ⇒ t04 | t1E ⇒ t04 | t1F ⇒ t04 ]
- | t05 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t00 | t03 ⇒ t01 | t04 ⇒ t04 | t05 ⇒ t05 | t06 ⇒ t04 | t07 ⇒ t05
- | t08 ⇒ t00 | t09 ⇒ t01 | t0A ⇒ t00 | t0B ⇒ t01 | t0C ⇒ t04 | t0D ⇒ t05 | t0E ⇒ t04 | t0F ⇒ t05
- | t10 ⇒ t00 | t11 ⇒ t01 | t12 ⇒ t00 | t13 ⇒ t01 | t14 ⇒ t04 | t15 ⇒ t05 | t16 ⇒ t04 | t17 ⇒ t05
- | t18 ⇒ t00 | t19 ⇒ t01 | t1A ⇒ t00 | t1B ⇒ t01 | t1C ⇒ t04 | t1D ⇒ t05 | t1E ⇒ t04 | t1F ⇒ t05 ]
- | t06 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t00 | t02 ⇒ t02 | t03 ⇒ t02 | t04 ⇒ t04 | t05 ⇒ t04 | t06 ⇒ t06 | t07 ⇒ t06
- | t08 ⇒ t00 | t09 ⇒ t00 | t0A ⇒ t02 | t0B ⇒ t02 | t0C ⇒ t04 | t0D ⇒ t04 | t0E ⇒ t06 | t0F ⇒ t06
- | t10 ⇒ t00 | t11 ⇒ t00 | t12 ⇒ t02 | t13 ⇒ t02 | t14 ⇒ t04 | t15 ⇒ t04 | t16 ⇒ t06 | t17 ⇒ t06
- | t18 ⇒ t00 | t19 ⇒ t00 | t1A ⇒ t02 | t1B ⇒ t02 | t1C ⇒ t04 | t1D ⇒ t04 | t1E ⇒ t06 | t1F ⇒ t06 ]
- | t07 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t02 | t03 ⇒ t03 | t04 ⇒ t04 | t05 ⇒ t05 | t06 ⇒ t06 | t07 ⇒ t07
- | t08 ⇒ t00 | t09 ⇒ t01 | t0A ⇒ t02 | t0B ⇒ t03 | t0C ⇒ t04 | t0D ⇒ t05 | t0E ⇒ t06 | t0F ⇒ t07
- | t10 ⇒ t00 | t11 ⇒ t01 | t12 ⇒ t02 | t13 ⇒ t03 | t14 ⇒ t04 | t15 ⇒ t05 | t16 ⇒ t06 | t17 ⇒ t07
- | t18 ⇒ t00 | t19 ⇒ t01 | t1A ⇒ t02 | t1B ⇒ t03 | t1C ⇒ t04 | t1D ⇒ t05 | t1E ⇒ t06 | t1F ⇒ t07 ]
- | t08 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t00 | t02 ⇒ t00 | t03 ⇒ t00 | t04 ⇒ t00 | t05 ⇒ t00 | t06 ⇒ t00 | t07 ⇒ t00
- | t08 ⇒ t08 | t09 ⇒ t08 | t0A ⇒ t08 | t0B ⇒ t08 | t0C ⇒ t08 | t0D ⇒ t08 | t0E ⇒ t08 | t0F ⇒ t08
- | t10 ⇒ t00 | t11 ⇒ t00 | t12 ⇒ t00 | t13 ⇒ t00 | t14 ⇒ t00 | t15 ⇒ t00 | t16 ⇒ t00 | t17 ⇒ t00
- | t18 ⇒ t08 | t19 ⇒ t08 | t1A ⇒ t08 | t1B ⇒ t08 | t1C ⇒ t08 | t1D ⇒ t08 | t1E ⇒ t08 | t1F ⇒ t08 ]
- | t09 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t00 | t03 ⇒ t01 | t04 ⇒ t00 | t05 ⇒ t01 | t06 ⇒ t00 | t07 ⇒ t01
- | t08 ⇒ t08 | t09 ⇒ t09 | t0A ⇒ t08 | t0B ⇒ t09 | t0C ⇒ t08 | t0D ⇒ t09 | t0E ⇒ t08 | t0F ⇒ t09
- | t10 ⇒ t00 | t11 ⇒ t01 | t12 ⇒ t00 | t13 ⇒ t01 | t14 ⇒ t00 | t15 ⇒ t01 | t16 ⇒ t00 | t17 ⇒ t01
- | t18 ⇒ t08 | t19 ⇒ t09 | t1A ⇒ t08 | t1B ⇒ t09 | t1C ⇒ t08 | t1D ⇒ t09 | t1E ⇒ t08 | t1F ⇒ t09 ]
- | t0A ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t00 | t02 ⇒ t02 | t03 ⇒ t02 | t04 ⇒ t00 | t05 ⇒ t00 | t06 ⇒ t02 | t07 ⇒ t02
- | t08 ⇒ t08 | t09 ⇒ t08 | t0A ⇒ t0A | t0B ⇒ t0A | t0C ⇒ t08 | t0D ⇒ t08 | t0E ⇒ t0A | t0F ⇒ t0A
- | t10 ⇒ t00 | t11 ⇒ t00 | t12 ⇒ t02 | t13 ⇒ t02 | t14 ⇒ t00 | t15 ⇒ t00 | t16 ⇒ t02 | t17 ⇒ t02
- | t18 ⇒ t08 | t19 ⇒ t08 | t1A ⇒ t0A | t1B ⇒ t0A | t1C ⇒ t08 | t1D ⇒ t08 | t1E ⇒ t0A | t1F ⇒ t0A ]
- | t0B ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t02 | t03 ⇒ t03 | t04 ⇒ t00 | t05 ⇒ t01 | t06 ⇒ t02 | t07 ⇒ t03
- | t08 ⇒ t08 | t09 ⇒ t09 | t0A ⇒ t0A | t0B ⇒ t0B | t0C ⇒ t08 | t0D ⇒ t09 | t0E ⇒ t0A | t0F ⇒ t0B
- | t10 ⇒ t00 | t11 ⇒ t01 | t12 ⇒ t02 | t13 ⇒ t03 | t14 ⇒ t00 | t15 ⇒ t01 | t16 ⇒ t02 | t17 ⇒ t03
- | t18 ⇒ t08 | t19 ⇒ t09 | t1A ⇒ t0A | t1B ⇒ t0B | t1C ⇒ t08 | t1D ⇒ t09 | t1E ⇒ t0A | t1F ⇒ t0B ]
- | t0C ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t00 | t02 ⇒ t00 | t03 ⇒ t00 | t04 ⇒ t04 | t05 ⇒ t04 | t06 ⇒ t04 | t07 ⇒ t04
- | t08 ⇒ t08 | t09 ⇒ t08 | t0A ⇒ t08 | t0B ⇒ t08 | t0C ⇒ t0C | t0D ⇒ t0C | t0E ⇒ t0C | t0F ⇒ t0C
- | t10 ⇒ t00 | t11 ⇒ t00 | t12 ⇒ t00 | t13 ⇒ t00 | t14 ⇒ t04 | t15 ⇒ t04 | t16 ⇒ t04 | t17 ⇒ t04
- | t18 ⇒ t08 | t19 ⇒ t08 | t1A ⇒ t08 | t1B ⇒ t08 | t1C ⇒ t0C | t1D ⇒ t0C | t1E ⇒ t0C | t1F ⇒ t0C ]
- | t0D ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t00 | t03 ⇒ t01 | t04 ⇒ t04 | t05 ⇒ t05 | t06 ⇒ t04 | t07 ⇒ t05
- | t08 ⇒ t08 | t09 ⇒ t09 | t0A ⇒ t08 | t0B ⇒ t09 | t0C ⇒ t0C | t0D ⇒ t0D | t0E ⇒ t0C | t0F ⇒ t0D
- | t10 ⇒ t00 | t11 ⇒ t01 | t12 ⇒ t00 | t13 ⇒ t01 | t14 ⇒ t04 | t15 ⇒ t05 | t16 ⇒ t04 | t17 ⇒ t05
- | t18 ⇒ t08 | t19 ⇒ t09 | t1A ⇒ t08 | t1B ⇒ t09 | t1C ⇒ t0C | t1D ⇒ t0D | t1E ⇒ t0C | t1F ⇒ t0D ]
- | t0E ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t00 | t02 ⇒ t02 | t03 ⇒ t02 | t04 ⇒ t04 | t05 ⇒ t04 | t06 ⇒ t06 | t07 ⇒ t06
- | t08 ⇒ t08 | t09 ⇒ t08 | t0A ⇒ t0A | t0B ⇒ t0A | t0C ⇒ t0C | t0D ⇒ t0C | t0E ⇒ t0E | t0F ⇒ t0E
- | t10 ⇒ t00 | t11 ⇒ t00 | t12 ⇒ t02 | t13 ⇒ t02 | t14 ⇒ t04 | t15 ⇒ t04 | t16 ⇒ t06 | t17 ⇒ t06
- | t18 ⇒ t08 | t19 ⇒ t08 | t1A ⇒ t0A | t1B ⇒ t0A | t1C ⇒ t0C | t1D ⇒ t0C | t1E ⇒ t0E | t1F ⇒ t0E ]
- | t0F ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t02 | t03 ⇒ t03 | t04 ⇒ t04 | t05 ⇒ t05 | t06 ⇒ t06 | t07 ⇒ t07
- | t08 ⇒ t08 | t09 ⇒ t09 | t0A ⇒ t0A | t0B ⇒ t0B | t0C ⇒ t0C | t0D ⇒ t0D | t0E ⇒ t0E | t0F ⇒ t0F
- | t10 ⇒ t00 | t11 ⇒ t01 | t12 ⇒ t02 | t13 ⇒ t03 | t14 ⇒ t04 | t15 ⇒ t05 | t16 ⇒ t06 | t17 ⇒ t07
- | t18 ⇒ t08 | t19 ⇒ t09 | t1A ⇒ t0A | t1B ⇒ t0B | t1C ⇒ t0C | t1D ⇒ t0D | t1E ⇒ t0E | t1F ⇒ t0F ]
- | t10 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t00 | t02 ⇒ t00 | t03 ⇒ t00 | t04 ⇒ t00 | t05 ⇒ t00 | t06 ⇒ t00 | t07 ⇒ t00
- | t08 ⇒ t00 | t09 ⇒ t00 | t0A ⇒ t00 | t0B ⇒ t00 | t0C ⇒ t00 | t0D ⇒ t00 | t0E ⇒ t00 | t0F ⇒ t00
- | t10 ⇒ t10 | t11 ⇒ t10 | t12 ⇒ t10 | t13 ⇒ t10 | t14 ⇒ t10 | t15 ⇒ t10 | t16 ⇒ t10 | t17 ⇒ t10
- | t18 ⇒ t10 | t19 ⇒ t10 | t1A ⇒ t10 | t1B ⇒ t10 | t1C ⇒ t10 | t1D ⇒ t10 | t1E ⇒ t10 | t1F ⇒ t10 ]
- | t11 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t00 | t03 ⇒ t01 | t04 ⇒ t00 | t05 ⇒ t01 | t06 ⇒ t00 | t07 ⇒ t01
- | t08 ⇒ t00 | t09 ⇒ t01 | t0A ⇒ t00 | t0B ⇒ t01 | t0C ⇒ t00 | t0D ⇒ t01 | t0E ⇒ t00 | t0F ⇒ t01
- | t10 ⇒ t10 | t11 ⇒ t11 | t12 ⇒ t10 | t13 ⇒ t11 | t14 ⇒ t10 | t15 ⇒ t11 | t16 ⇒ t10 | t17 ⇒ t11
- | t18 ⇒ t10 | t19 ⇒ t11 | t1A ⇒ t10 | t1B ⇒ t11 | t1C ⇒ t10 | t1D ⇒ t11 | t1E ⇒ t10 | t1F ⇒ t11 ]
- | t12 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t00 | t02 ⇒ t02 | t03 ⇒ t02 | t04 ⇒ t00 | t05 ⇒ t00 | t06 ⇒ t02 | t07 ⇒ t02
- | t08 ⇒ t00 | t09 ⇒ t00 | t0A ⇒ t02 | t0B ⇒ t02 | t0C ⇒ t00 | t0D ⇒ t00 | t0E ⇒ t02 | t0F ⇒ t02
- | t10 ⇒ t10 | t11 ⇒ t10 | t12 ⇒ t12 | t13 ⇒ t12 | t14 ⇒ t10 | t15 ⇒ t10 | t16 ⇒ t12 | t17 ⇒ t12
- | t18 ⇒ t10 | t19 ⇒ t10 | t1A ⇒ t12 | t1B ⇒ t12 | t1C ⇒ t10 | t1D ⇒ t10 | t1E ⇒ t12 | t1F ⇒ t12 ]
- | t13 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t02 | t03 ⇒ t03 | t04 ⇒ t00 | t05 ⇒ t01 | t06 ⇒ t02 | t07 ⇒ t03
- | t08 ⇒ t00 | t09 ⇒ t01 | t0A ⇒ t02 | t0B ⇒ t03 | t0C ⇒ t00 | t0D ⇒ t01 | t0E ⇒ t02 | t0F ⇒ t03
- | t10 ⇒ t10 | t11 ⇒ t11 | t12 ⇒ t12 | t13 ⇒ t13 | t14 ⇒ t10 | t15 ⇒ t11 | t16 ⇒ t12 | t17 ⇒ t13
- | t18 ⇒ t10 | t19 ⇒ t11 | t1A ⇒ t12 | t1B ⇒ t13 | t1C ⇒ t10 | t1D ⇒ t11 | t1E ⇒ t12 | t1F ⇒ t13 ]
- | t14 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t00 | t02 ⇒ t00 | t03 ⇒ t00 | t04 ⇒ t04 | t05 ⇒ t04 | t06 ⇒ t04 | t07 ⇒ t04
- | t08 ⇒ t00 | t09 ⇒ t00 | t0A ⇒ t00 | t0B ⇒ t00 | t0C ⇒ t04 | t0D ⇒ t04 | t0E ⇒ t04 | t0F ⇒ t04
- | t10 ⇒ t10 | t11 ⇒ t10 | t12 ⇒ t10 | t13 ⇒ t10 | t14 ⇒ t14 | t15 ⇒ t14 | t16 ⇒ t14 | t17 ⇒ t14
- | t18 ⇒ t10 | t19 ⇒ t10 | t1A ⇒ t10 | t1B ⇒ t10 | t1C ⇒ t14 | t1D ⇒ t14 | t1E ⇒ t14 | t1F ⇒ t14 ]
- | t15 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t00 | t03 ⇒ t01 | t04 ⇒ t04 | t05 ⇒ t05 | t06 ⇒ t04 | t07 ⇒ t05
- | t08 ⇒ t00 | t09 ⇒ t01 | t0A ⇒ t00 | t0B ⇒ t01 | t0C ⇒ t04 | t0D ⇒ t05 | t0E ⇒ t04 | t0F ⇒ t05
- | t10 ⇒ t10 | t11 ⇒ t11 | t12 ⇒ t10 | t13 ⇒ t11 | t14 ⇒ t14 | t15 ⇒ t15 | t16 ⇒ t14 | t17 ⇒ t15
- | t18 ⇒ t10 | t19 ⇒ t11 | t1A ⇒ t10 | t1B ⇒ t11 | t1C ⇒ t14 | t1D ⇒ t15 | t1E ⇒ t14 | t1F ⇒ t15 ]
- | t16 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t00 | t02 ⇒ t02 | t03 ⇒ t02 | t04 ⇒ t04 | t05 ⇒ t04 | t06 ⇒ t06 | t07 ⇒ t06
- | t08 ⇒ t00 | t09 ⇒ t00 | t0A ⇒ t02 | t0B ⇒ t02 | t0C ⇒ t04 | t0D ⇒ t04 | t0E ⇒ t06 | t0F ⇒ t06
- | t10 ⇒ t10 | t11 ⇒ t10 | t12 ⇒ t12 | t13 ⇒ t12 | t14 ⇒ t14 | t15 ⇒ t14 | t16 ⇒ t16 | t17 ⇒ t16
- | t18 ⇒ t10 | t19 ⇒ t10 | t1A ⇒ t12 | t1B ⇒ t12 | t1C ⇒ t14 | t1D ⇒ t14 | t1E ⇒ t16 | t1F ⇒ t16 ]
- | t17 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t02 | t03 ⇒ t03 | t04 ⇒ t04 | t05 ⇒ t05 | t06 ⇒ t06 | t07 ⇒ t07
- | t08 ⇒ t00 | t09 ⇒ t01 | t0A ⇒ t02 | t0B ⇒ t03 | t0C ⇒ t04 | t0D ⇒ t05 | t0E ⇒ t06 | t0F ⇒ t07
- | t10 ⇒ t10 | t11 ⇒ t11 | t12 ⇒ t12 | t13 ⇒ t13 | t14 ⇒ t14 | t15 ⇒ t15 | t16 ⇒ t16 | t17 ⇒ t17
- | t18 ⇒ t10 | t19 ⇒ t11 | t1A ⇒ t12 | t1B ⇒ t13 | t1C ⇒ t14 | t1D ⇒ t15 | t1E ⇒ t16 | t1F ⇒ t17 ]
- | t18 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t00 | t02 ⇒ t00 | t03 ⇒ t00 | t04 ⇒ t00 | t05 ⇒ t00 | t06 ⇒ t00 | t07 ⇒ t00
- | t08 ⇒ t08 | t09 ⇒ t08 | t0A ⇒ t08 | t0B ⇒ t08 | t0C ⇒ t08 | t0D ⇒ t08 | t0E ⇒ t08 | t0F ⇒ t08
- | t10 ⇒ t10 | t11 ⇒ t10 | t12 ⇒ t10 | t13 ⇒ t10 | t14 ⇒ t10 | t15 ⇒ t10 | t16 ⇒ t10 | t17 ⇒ t10
- | t18 ⇒ t18 | t19 ⇒ t18 | t1A ⇒ t18 | t1B ⇒ t18 | t1C ⇒ t18 | t1D ⇒ t18 | t1E ⇒ t18 | t1F ⇒ t18 ]
- | t19 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t00 | t03 ⇒ t01 | t04 ⇒ t00 | t05 ⇒ t01 | t06 ⇒ t00 | t07 ⇒ t01
- | t08 ⇒ t08 | t09 ⇒ t09 | t0A ⇒ t08 | t0B ⇒ t09 | t0C ⇒ t08 | t0D ⇒ t09 | t0E ⇒ t08 | t0F ⇒ t09
- | t10 ⇒ t10 | t11 ⇒ t11 | t12 ⇒ t10 | t13 ⇒ t11 | t14 ⇒ t10 | t15 ⇒ t11 | t16 ⇒ t10 | t17 ⇒ t11
- | t18 ⇒ t18 | t19 ⇒ t19 | t1A ⇒ t18 | t1B ⇒ t19 | t1C ⇒ t18 | t1D ⇒ t19 | t1E ⇒ t18 | t1F ⇒ t19 ]
- | t1A ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t00 | t02 ⇒ t02 | t03 ⇒ t02 | t04 ⇒ t00 | t05 ⇒ t00 | t06 ⇒ t02 | t07 ⇒ t02
- | t08 ⇒ t08 | t09 ⇒ t08 | t0A ⇒ t0A | t0B ⇒ t0A | t0C ⇒ t08 | t0D ⇒ t08 | t0E ⇒ t0A | t0F ⇒ t0A
- | t10 ⇒ t10 | t11 ⇒ t10 | t12 ⇒ t12 | t13 ⇒ t12 | t14 ⇒ t10 | t15 ⇒ t10 | t16 ⇒ t12 | t17 ⇒ t12
- | t18 ⇒ t18 | t19 ⇒ t18 | t1A ⇒ t1A | t1B ⇒ t1A | t1C ⇒ t18 | t1D ⇒ t18 | t1E ⇒ t1A | t1F ⇒ t1A ]
- | t1B ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t02 | t03 ⇒ t03 | t04 ⇒ t00 | t05 ⇒ t01 | t06 ⇒ t02 | t07 ⇒ t03
- | t08 ⇒ t08 | t09 ⇒ t09 | t0A ⇒ t0A | t0B ⇒ t0B | t0C ⇒ t08 | t0D ⇒ t09 | t0E ⇒ t0A | t0F ⇒ t0B
- | t10 ⇒ t10 | t11 ⇒ t11 | t12 ⇒ t12 | t13 ⇒ t13 | t14 ⇒ t10 | t15 ⇒ t11 | t16 ⇒ t12 | t17 ⇒ t13
- | t18 ⇒ t18 | t19 ⇒ t19 | t1A ⇒ t1A | t1B ⇒ t1B | t1C ⇒ t18 | t1D ⇒ t19 | t1E ⇒ t1A | t1F ⇒ t1B ]
- | t1C ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t00 | t02 ⇒ t00 | t03 ⇒ t00 | t04 ⇒ t04 | t05 ⇒ t04 | t06 ⇒ t04 | t07 ⇒ t04
- | t08 ⇒ t08 | t09 ⇒ t08 | t0A ⇒ t08 | t0B ⇒ t08 | t0C ⇒ t0C | t0D ⇒ t0C | t0E ⇒ t0C | t0F ⇒ t0C
- | t10 ⇒ t10 | t11 ⇒ t10 | t12 ⇒ t10 | t13 ⇒ t10 | t14 ⇒ t14 | t15 ⇒ t14 | t16 ⇒ t14 | t17 ⇒ t14
- | t18 ⇒ t18 | t19 ⇒ t18 | t1A ⇒ t18 | t1B ⇒ t18 | t1C ⇒ t1C | t1D ⇒ t1C | t1E ⇒ t1C | t1F ⇒ t1C ]
- | t1D ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t00 | t03 ⇒ t01 | t04 ⇒ t04 | t05 ⇒ t05 | t06 ⇒ t04 | t07 ⇒ t05
- | t08 ⇒ t08 | t09 ⇒ t09 | t0A ⇒ t08 | t0B ⇒ t09 | t0C ⇒ t0C | t0D ⇒ t0D | t0E ⇒ t0C | t0F ⇒ t0D
- | t10 ⇒ t10 | t11 ⇒ t11 | t12 ⇒ t10 | t13 ⇒ t11 | t14 ⇒ t14 | t15 ⇒ t15 | t16 ⇒ t14 | t17 ⇒ t15
- | t18 ⇒ t18 | t19 ⇒ t19 | t1A ⇒ t18 | t1B ⇒ t19 | t1C ⇒ t1C | t1D ⇒ t1D | t1E ⇒ t1C | t1F ⇒ t1D ]
- | t1E ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t00 | t02 ⇒ t02 | t03 ⇒ t02 | t04 ⇒ t04 | t05 ⇒ t04 | t06 ⇒ t06 | t07 ⇒ t06
- | t08 ⇒ t08 | t09 ⇒ t08 | t0A ⇒ t0A | t0B ⇒ t0A | t0C ⇒ t0C | t0D ⇒ t0C | t0E ⇒ t0E | t0F ⇒ t0E
- | t10 ⇒ t10 | t11 ⇒ t10 | t12 ⇒ t12 | t13 ⇒ t12 | t14 ⇒ t14 | t15 ⇒ t14 | t16 ⇒ t16 | t17 ⇒ t16
- | t18 ⇒ t18 | t19 ⇒ t18 | t1A ⇒ t1A | t1B ⇒ t1A | t1C ⇒ t1C | t1D ⇒ t1C | t1E ⇒ t1E | t1F ⇒ t1E ]
- | t1F ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t02 | t03 ⇒ t03 | t04 ⇒ t04 | t05 ⇒ t05 | t06 ⇒ t06 | t07 ⇒ t07
- | t08 ⇒ t08 | t09 ⇒ t09 | t0A ⇒ t0A | t0B ⇒ t0B | t0C ⇒ t0C | t0D ⇒ t0D | t0E ⇒ t0E | t0F ⇒ t0F
- | t10 ⇒ t10 | t11 ⇒ t11 | t12 ⇒ t12 | t13 ⇒ t13 | t14 ⇒ t14 | t15 ⇒ t15 | t16 ⇒ t16 | t17 ⇒ t17
- | t18 ⇒ t18 | t19 ⇒ t19 | t1A ⇒ t1A | t1B ⇒ t1B | t1C ⇒ t1C | t1D ⇒ t1D | t1E ⇒ t1E | t1F ⇒ t1F ]
- ].
-
-(* operatore or *)
-ndefinition or_bit ≝
-λe1,e2.match e1 with
- [ t00 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t02 | t03 ⇒ t03 | t04 ⇒ t04 | t05 ⇒ t05 | t06 ⇒ t06 | t07 ⇒ t07
- | t08 ⇒ t08 | t09 ⇒ t09 | t0A ⇒ t0A | t0B ⇒ t0B | t0C ⇒ t0C | t0D ⇒ t0D | t0E ⇒ t0E | t0F ⇒ t0F
- | t10 ⇒ t10 | t11 ⇒ t11 | t12 ⇒ t12 | t13 ⇒ t13 | t14 ⇒ t14 | t15 ⇒ t15 | t16 ⇒ t16 | t17 ⇒ t17
- | t18 ⇒ t18 | t19 ⇒ t19 | t1A ⇒ t1A | t1B ⇒ t1B | t1C ⇒ t1C | t1D ⇒ t1D | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t01 ⇒ match e2 with
- [ t00 ⇒ t01 | t01 ⇒ t01 | t02 ⇒ t03 | t03 ⇒ t03 | t04 ⇒ t05 | t05 ⇒ t05 | t06 ⇒ t07 | t07 ⇒ t07
- | t08 ⇒ t09 | t09 ⇒ t09 | t0A ⇒ t0B | t0B ⇒ t0B | t0C ⇒ t0D | t0D ⇒ t0D | t0E ⇒ t0F | t0F ⇒ t0F
- | t10 ⇒ t11 | t11 ⇒ t11 | t12 ⇒ t13 | t13 ⇒ t13 | t14 ⇒ t15 | t15 ⇒ t15 | t16 ⇒ t17 | t17 ⇒ t17
- | t18 ⇒ t19 | t19 ⇒ t19 | t1A ⇒ t1B | t1B ⇒ t1B | t1C ⇒ t1D | t1D ⇒ t1D | t1E ⇒ t1F | t1F ⇒ t1F ]
- | t02 ⇒ match e2 with
- [ t00 ⇒ t02 | t01 ⇒ t03 | t02 ⇒ t02 | t03 ⇒ t03 | t04 ⇒ t06 | t05 ⇒ t07 | t06 ⇒ t06 | t07 ⇒ t07
- | t08 ⇒ t0A | t09 ⇒ t0B | t0A ⇒ t0A | t0B ⇒ t0B | t0C ⇒ t0E | t0D ⇒ t0F | t0E ⇒ t0E | t0F ⇒ t0F
- | t10 ⇒ t12 | t11 ⇒ t13 | t12 ⇒ t12 | t13 ⇒ t13 | t14 ⇒ t16 | t15 ⇒ t17 | t16 ⇒ t16 | t17 ⇒ t17
- | t18 ⇒ t1A | t19 ⇒ t1B | t1A ⇒ t1A | t1B ⇒ t1B | t1C ⇒ t1E | t1D ⇒ t1F | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t03 ⇒ match e2 with
- [ t00 ⇒ t03 | t01 ⇒ t03 | t02 ⇒ t03 | t03 ⇒ t03 | t04 ⇒ t07 | t05 ⇒ t07 | t06 ⇒ t07 | t07 ⇒ t07
- | t08 ⇒ t0B | t09 ⇒ t0B | t0A ⇒ t0B | t0B ⇒ t0B | t0C ⇒ t0F | t0D ⇒ t0F | t0E ⇒ t0F | t0F ⇒ t0F
- | t10 ⇒ t13 | t11 ⇒ t13 | t12 ⇒ t13 | t13 ⇒ t13 | t14 ⇒ t17 | t15 ⇒ t17 | t16 ⇒ t17 | t17 ⇒ t17
- | t18 ⇒ t1B | t19 ⇒ t1B | t1A ⇒ t1B | t1B ⇒ t1B | t1C ⇒ t1F | t1D ⇒ t1F | t1E ⇒ t1F | t1F ⇒ t1F ]
- | t04 ⇒ match e2 with
- [ t00 ⇒ t04 | t01 ⇒ t05 | t02 ⇒ t06 | t03 ⇒ t07 | t04 ⇒ t04 | t05 ⇒ t05 | t06 ⇒ t06 | t07 ⇒ t07
- | t08 ⇒ t0C | t09 ⇒ t0D | t0A ⇒ t0E | t0B ⇒ t0F | t0C ⇒ t0C | t0D ⇒ t0D | t0E ⇒ t0E | t0F ⇒ t0F
- | t10 ⇒ t14 | t11 ⇒ t15 | t12 ⇒ t16 | t13 ⇒ t17 | t14 ⇒ t14 | t15 ⇒ t15 | t16 ⇒ t16 | t17 ⇒ t17
- | t18 ⇒ t1C | t19 ⇒ t1D | t1A ⇒ t1E | t1B ⇒ t1F | t1C ⇒ t1C | t1D ⇒ t1D | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t05 ⇒ match e2 with
- [ t00 ⇒ t05 | t01 ⇒ t05 | t02 ⇒ t07 | t03 ⇒ t07 | t04 ⇒ t05 | t05 ⇒ t05 | t06 ⇒ t07 | t07 ⇒ t07
- | t08 ⇒ t0D | t09 ⇒ t0D | t0A ⇒ t0F | t0B ⇒ t0F | t0C ⇒ t0D | t0D ⇒ t0D | t0E ⇒ t0F | t0F ⇒ t0F
- | t10 ⇒ t15 | t11 ⇒ t15 | t12 ⇒ t17 | t13 ⇒ t17 | t14 ⇒ t15 | t15 ⇒ t15 | t16 ⇒ t17 | t17 ⇒ t17
- | t18 ⇒ t1D | t19 ⇒ t1D | t1A ⇒ t1F | t1B ⇒ t1F | t1C ⇒ t1D | t1D ⇒ t1D | t1E ⇒ t1F | t1F ⇒ t1F ]
- | t06 ⇒ match e2 with
- [ t00 ⇒ t06 | t01 ⇒ t07 | t02 ⇒ t06 | t03 ⇒ t07 | t04 ⇒ t06 | t05 ⇒ t07 | t06 ⇒ t06 | t07 ⇒ t07
- | t08 ⇒ t0E | t09 ⇒ t0F | t0A ⇒ t0E | t0B ⇒ t0F | t0C ⇒ t0E | t0D ⇒ t0F | t0E ⇒ t0E | t0F ⇒ t0F
- | t10 ⇒ t16 | t11 ⇒ t17 | t12 ⇒ t16 | t13 ⇒ t17 | t14 ⇒ t16 | t15 ⇒ t17 | t16 ⇒ t16 | t17 ⇒ t17
- | t18 ⇒ t1E | t19 ⇒ t1F | t1A ⇒ t1E | t1B ⇒ t1F | t1C ⇒ t1E | t1D ⇒ t1F | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t07 ⇒ match e2 with
- [ t00 ⇒ t07 | t01 ⇒ t07 | t02 ⇒ t07 | t03 ⇒ t07 | t04 ⇒ t07 | t05 ⇒ t07 | t06 ⇒ t07 | t07 ⇒ t07
- | t08 ⇒ t0F | t09 ⇒ t0F | t0A ⇒ t0F | t0B ⇒ t0F | t0C ⇒ t0F | t0D ⇒ t0F | t0E ⇒ t0F | t0F ⇒ t0F
- | t10 ⇒ t17 | t11 ⇒ t17 | t12 ⇒ t17 | t13 ⇒ t17 | t14 ⇒ t17 | t15 ⇒ t17 | t16 ⇒ t17 | t17 ⇒ t17
- | t18 ⇒ t1F | t19 ⇒ t1F | t1A ⇒ t1F | t1B ⇒ t1F | t1C ⇒ t1F | t1D ⇒ t1F | t1E ⇒ t1F | t1F ⇒ t1F ]
- | t08 ⇒ match e2 with
- [ t00 ⇒ t08 | t01 ⇒ t09 | t02 ⇒ t0A | t03 ⇒ t0B | t04 ⇒ t0C | t05 ⇒ t0D | t06 ⇒ t0E | t07 ⇒ t0F
- | t08 ⇒ t08 | t09 ⇒ t09 | t0A ⇒ t0A | t0B ⇒ t0B | t0C ⇒ t0C | t0D ⇒ t0D | t0E ⇒ t0E | t0F ⇒ t0F
- | t10 ⇒ t18 | t11 ⇒ t19 | t12 ⇒ t1A | t13 ⇒ t1B | t14 ⇒ t1C | t15 ⇒ t1D | t16 ⇒ t1E | t17 ⇒ t1F
- | t18 ⇒ t18 | t19 ⇒ t19 | t1A ⇒ t1A | t1B ⇒ t1B | t1C ⇒ t1C | t1D ⇒ t1D | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t09 ⇒ match e2 with
- [ t00 ⇒ t09 | t01 ⇒ t09 | t02 ⇒ t0B | t03 ⇒ t0B | t04 ⇒ t0D | t05 ⇒ t0D | t06 ⇒ t0F | t07 ⇒ t0F
- | t08 ⇒ t09 | t09 ⇒ t09 | t0A ⇒ t0B | t0B ⇒ t0B | t0C ⇒ t0D | t0D ⇒ t0D | t0E ⇒ t0F | t0F ⇒ t0F
- | t10 ⇒ t19 | t11 ⇒ t19 | t12 ⇒ t1B | t13 ⇒ t1B | t14 ⇒ t1D | t15 ⇒ t1D | t16 ⇒ t1F | t17 ⇒ t1F
- | t18 ⇒ t19 | t19 ⇒ t19 | t1A ⇒ t1B | t1B ⇒ t1B | t1C ⇒ t1D | t1D ⇒ t1D | t1E ⇒ t1F | t1F ⇒ t1F ]
- | t0A ⇒ match e2 with
- [ t00 ⇒ t0A | t01 ⇒ t0B | t02 ⇒ t0A | t03 ⇒ t0B | t04 ⇒ t0E | t05 ⇒ t0F | t06 ⇒ t0E | t07 ⇒ t0F
- | t08 ⇒ t0A | t09 ⇒ t0B | t0A ⇒ t0A | t0B ⇒ t0B | t0C ⇒ t0E | t0D ⇒ t0F | t0E ⇒ t0E | t0F ⇒ t0F
- | t10 ⇒ t1A | t11 ⇒ t1B | t12 ⇒ t1A | t13 ⇒ t1B | t14 ⇒ t1E | t15 ⇒ t1F | t16 ⇒ t1E | t17 ⇒ t1F
- | t18 ⇒ t1A | t19 ⇒ t1B | t1A ⇒ t1A | t1B ⇒ t1B | t1C ⇒ t1E | t1D ⇒ t1F | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t0B ⇒ match e2 with
- [ t00 ⇒ t0B | t01 ⇒ t0B | t02 ⇒ t0B | t03 ⇒ t0B | t04 ⇒ t0F | t05 ⇒ t0F | t06 ⇒ t0F | t07 ⇒ t0F
- | t08 ⇒ t0B | t09 ⇒ t0B | t0A ⇒ t0B | t0B ⇒ t0B | t0C ⇒ t0F | t0D ⇒ t0F | t0E ⇒ t0F | t0F ⇒ t0F
- | t10 ⇒ t1B | t11 ⇒ t1B | t12 ⇒ t1B | t13 ⇒ t1B | t14 ⇒ t1F | t15 ⇒ t1F | t16 ⇒ t1F | t17 ⇒ t1F
- | t18 ⇒ t1B | t19 ⇒ t1B | t1A ⇒ t1B | t1B ⇒ t1B | t1C ⇒ t1F | t1D ⇒ t1F | t1E ⇒ t1F | t1F ⇒ t1F ]
- | t0C ⇒ match e2 with
- [ t00 ⇒ t0C | t01 ⇒ t0D | t02 ⇒ t0E | t03 ⇒ t0F | t04 ⇒ t0C | t05 ⇒ t0D | t06 ⇒ t0E | t07 ⇒ t0F
- | t08 ⇒ t0C | t09 ⇒ t0D | t0A ⇒ t0E | t0B ⇒ t0F | t0C ⇒ t0C | t0D ⇒ t0D | t0E ⇒ t0E | t0F ⇒ t0F
- | t10 ⇒ t1C | t11 ⇒ t1D | t12 ⇒ t1E | t13 ⇒ t1F | t14 ⇒ t1C | t15 ⇒ t1D | t16 ⇒ t1E | t17 ⇒ t1F
- | t18 ⇒ t1C | t19 ⇒ t1D | t1A ⇒ t1E | t1B ⇒ t1F | t1C ⇒ t1C | t1D ⇒ t1D | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t0D ⇒ match e2 with
- [ t00 ⇒ t0D | t01 ⇒ t0D | t02 ⇒ t0F | t03 ⇒ t0F | t04 ⇒ t0D | t05 ⇒ t0D | t06 ⇒ t0F | t07 ⇒ t0F
- | t08 ⇒ t0D | t09 ⇒ t0D | t0A ⇒ t0F | t0B ⇒ t0F | t0C ⇒ t0D | t0D ⇒ t0D | t0E ⇒ t0F | t0F ⇒ t0F
- | t10 ⇒ t1D | t11 ⇒ t1D | t12 ⇒ t1F | t13 ⇒ t1F | t14 ⇒ t1D | t15 ⇒ t1D | t16 ⇒ t1F | t17 ⇒ t1F
- | t18 ⇒ t1D | t19 ⇒ t1D | t1A ⇒ t1F | t1B ⇒ t1F | t1C ⇒ t1D | t1D ⇒ t1D | t1E ⇒ t1F | t1F ⇒ t1F ]
- | t0E ⇒ match e2 with
- [ t00 ⇒ t0E | t01 ⇒ t0F | t02 ⇒ t0E | t03 ⇒ t0F | t04 ⇒ t0E | t05 ⇒ t0F | t06 ⇒ t0E | t07 ⇒ t0F
- | t08 ⇒ t0E | t09 ⇒ t0F | t0A ⇒ t0E | t0B ⇒ t0F | t0C ⇒ t0E | t0D ⇒ t0F | t0E ⇒ t0E | t0F ⇒ t0F
- | t10 ⇒ t1E | t11 ⇒ t1F | t12 ⇒ t1E | t13 ⇒ t1F | t14 ⇒ t1E | t15 ⇒ t1F | t16 ⇒ t1E | t17 ⇒ t1F
- | t18 ⇒ t1E | t19 ⇒ t1F | t1A ⇒ t1E | t1B ⇒ t1F | t1C ⇒ t1E | t1D ⇒ t1F | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t0F ⇒ match e2 with
- [ t00 ⇒ t0F | t01 ⇒ t0F | t02 ⇒ t0F | t03 ⇒ t0F | t04 ⇒ t0F | t05 ⇒ t0F | t06 ⇒ t0F | t07 ⇒ t0F
- | t08 ⇒ t0F | t09 ⇒ t0F | t0A ⇒ t0F | t0B ⇒ t0F | t0C ⇒ t0F | t0D ⇒ t0F | t0E ⇒ t0F | t0F ⇒ t0F
- | t10 ⇒ t1F | t11 ⇒ t1F | t12 ⇒ t1F | t13 ⇒ t1F | t14 ⇒ t1F | t15 ⇒ t1F | t16 ⇒ t1F | t17 ⇒ t1F
- | t18 ⇒ t1F | t19 ⇒ t1F | t1A ⇒ t1F | t1B ⇒ t1F | t1C ⇒ t1F | t1D ⇒ t1F | t1E ⇒ t1F | t1F ⇒ t1F ]
- | t10 ⇒ match e2 with
- [ t00 ⇒ t10 | t01 ⇒ t11 | t02 ⇒ t12 | t03 ⇒ t13 | t04 ⇒ t14 | t05 ⇒ t15 | t06 ⇒ t16 | t07 ⇒ t17
- | t08 ⇒ t18 | t09 ⇒ t19 | t0A ⇒ t1A | t0B ⇒ t1B | t0C ⇒ t1C | t0D ⇒ t1D | t0E ⇒ t1E | t0F ⇒ t1F
- | t10 ⇒ t10 | t11 ⇒ t11 | t12 ⇒ t12 | t13 ⇒ t13 | t14 ⇒ t14 | t15 ⇒ t15 | t16 ⇒ t16 | t17 ⇒ t17
- | t18 ⇒ t18 | t19 ⇒ t19 | t1A ⇒ t1A | t1B ⇒ t1B | t1C ⇒ t1C | t1D ⇒ t1D | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t11 ⇒ match e2 with
- [ t00 ⇒ t11 | t01 ⇒ t11 | t02 ⇒ t13 | t03 ⇒ t13 | t04 ⇒ t15 | t05 ⇒ t15 | t06 ⇒ t17 | t07 ⇒ t17
- | t08 ⇒ t19 | t09 ⇒ t19 | t0A ⇒ t1B | t0B ⇒ t1B | t0C ⇒ t1D | t0D ⇒ t1D | t0E ⇒ t1F | t0F ⇒ t1F
- | t10 ⇒ t11 | t11 ⇒ t11 | t12 ⇒ t13 | t13 ⇒ t13 | t14 ⇒ t15 | t15 ⇒ t15 | t16 ⇒ t17 | t17 ⇒ t17
- | t18 ⇒ t19 | t19 ⇒ t19 | t1A ⇒ t1B | t1B ⇒ t1B | t1C ⇒ t1D | t1D ⇒ t1D | t1E ⇒ t1F | t1F ⇒ t1F ]
- | t12 ⇒ match e2 with
- [ t00 ⇒ t12 | t01 ⇒ t13 | t02 ⇒ t12 | t03 ⇒ t13 | t04 ⇒ t16 | t05 ⇒ t17 | t06 ⇒ t16 | t07 ⇒ t17
- | t08 ⇒ t1A | t09 ⇒ t1B | t0A ⇒ t1A | t0B ⇒ t1B | t0C ⇒ t1E | t0D ⇒ t1F | t0E ⇒ t1E | t0F ⇒ t1F
- | t10 ⇒ t12 | t11 ⇒ t13 | t12 ⇒ t12 | t13 ⇒ t13 | t14 ⇒ t16 | t15 ⇒ t17 | t16 ⇒ t16 | t17 ⇒ t17
- | t18 ⇒ t1A | t19 ⇒ t1B | t1A ⇒ t1A | t1B ⇒ t1B | t1C ⇒ t1E | t1D ⇒ t1F | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t13 ⇒ match e2 with
- [ t00 ⇒ t13 | t01 ⇒ t13 | t02 ⇒ t13 | t03 ⇒ t13 | t04 ⇒ t17 | t05 ⇒ t17 | t06 ⇒ t17 | t07 ⇒ t17
- | t08 ⇒ t1B | t09 ⇒ t1B | t0A ⇒ t1B | t0B ⇒ t1B | t0C ⇒ t1F | t0D ⇒ t1F | t0E ⇒ t1F | t0F ⇒ t1F
- | t10 ⇒ t13 | t11 ⇒ t13 | t12 ⇒ t13 | t13 ⇒ t13 | t14 ⇒ t17 | t15 ⇒ t17 | t16 ⇒ t17 | t17 ⇒ t17
- | t18 ⇒ t1B | t19 ⇒ t1B | t1A ⇒ t1B | t1B ⇒ t1B | t1C ⇒ t1F | t1D ⇒ t1F | t1E ⇒ t1F | t1F ⇒ t1F ]
- | t14 ⇒ match e2 with
- [ t00 ⇒ t14 | t01 ⇒ t15 | t02 ⇒ t16 | t03 ⇒ t17 | t04 ⇒ t14 | t05 ⇒ t15 | t06 ⇒ t16 | t07 ⇒ t17
- | t08 ⇒ t1C | t09 ⇒ t1D | t0A ⇒ t1E | t0B ⇒ t1F | t0C ⇒ t1C | t0D ⇒ t1D | t0E ⇒ t1E | t0F ⇒ t1F
- | t10 ⇒ t14 | t11 ⇒ t15 | t12 ⇒ t16 | t13 ⇒ t17 | t14 ⇒ t14 | t15 ⇒ t15 | t16 ⇒ t16 | t17 ⇒ t17
- | t18 ⇒ t1C | t19 ⇒ t1D | t1A ⇒ t1E | t1B ⇒ t1F | t1C ⇒ t1C | t1D ⇒ t1D | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t15 ⇒ match e2 with
- [ t00 ⇒ t15 | t01 ⇒ t15 | t02 ⇒ t17 | t03 ⇒ t17 | t04 ⇒ t15 | t05 ⇒ t15 | t06 ⇒ t17 | t07 ⇒ t17
- | t08 ⇒ t1D | t09 ⇒ t1D | t0A ⇒ t1F | t0B ⇒ t1F | t0C ⇒ t1D | t0D ⇒ t1D | t0E ⇒ t1F | t0F ⇒ t1F
- | t10 ⇒ t15 | t11 ⇒ t15 | t12 ⇒ t17 | t13 ⇒ t17 | t14 ⇒ t15 | t15 ⇒ t15 | t16 ⇒ t17 | t17 ⇒ t17
- | t18 ⇒ t1D | t19 ⇒ t1D | t1A ⇒ t1F | t1B ⇒ t1F | t1C ⇒ t1D | t1D ⇒ t1D | t1E ⇒ t1F | t1F ⇒ t1F ]
- | t16 ⇒ match e2 with
- [ t00 ⇒ t16 | t01 ⇒ t17 | t02 ⇒ t16 | t03 ⇒ t17 | t04 ⇒ t16 | t05 ⇒ t17 | t06 ⇒ t16 | t07 ⇒ t17
- | t08 ⇒ t1E | t09 ⇒ t1F | t0A ⇒ t1E | t0B ⇒ t1F | t0C ⇒ t1E | t0D ⇒ t1F | t0E ⇒ t1E | t0F ⇒ t1F
- | t10 ⇒ t16 | t11 ⇒ t17 | t12 ⇒ t16 | t13 ⇒ t17 | t14 ⇒ t16 | t15 ⇒ t17 | t16 ⇒ t16 | t17 ⇒ t17
- | t18 ⇒ t1E | t19 ⇒ t1F | t1A ⇒ t1E | t1B ⇒ t1F | t1C ⇒ t1E | t1D ⇒ t1F | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t17 ⇒ match e2 with
- [ t00 ⇒ t17 | t01 ⇒ t17 | t02 ⇒ t17 | t03 ⇒ t17 | t04 ⇒ t17 | t05 ⇒ t17 | t06 ⇒ t17 | t07 ⇒ t17
- | t08 ⇒ t1F | t09 ⇒ t1F | t0A ⇒ t1F | t0B ⇒ t1F | t0C ⇒ t1F | t0D ⇒ t1F | t0E ⇒ t1F | t0F ⇒ t1F
- | t10 ⇒ t17 | t11 ⇒ t17 | t12 ⇒ t17 | t13 ⇒ t17 | t14 ⇒ t17 | t15 ⇒ t17 | t16 ⇒ t17 | t17 ⇒ t17
- | t18 ⇒ t1F | t19 ⇒ t1F | t1A ⇒ t1F | t1B ⇒ t1F | t1C ⇒ t1F | t1D ⇒ t1F | t1E ⇒ t1F | t1F ⇒ t1F ]
- | t18 ⇒ match e2 with
- [ t00 ⇒ t18 | t01 ⇒ t19 | t02 ⇒ t1A | t03 ⇒ t1B | t04 ⇒ t1C | t05 ⇒ t1D | t06 ⇒ t1E | t07 ⇒ t1F
- | t08 ⇒ t18 | t09 ⇒ t19 | t0A ⇒ t1A | t0B ⇒ t1B | t0C ⇒ t1C | t0D ⇒ t1D | t0E ⇒ t1E | t0F ⇒ t1F
- | t10 ⇒ t18 | t11 ⇒ t19 | t12 ⇒ t1A | t13 ⇒ t1B | t14 ⇒ t1C | t15 ⇒ t1D | t16 ⇒ t1E | t17 ⇒ t1F
- | t18 ⇒ t18 | t19 ⇒ t19 | t1A ⇒ t1A | t1B ⇒ t1B | t1C ⇒ t1C | t1D ⇒ t1D | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t19 ⇒ match e2 with
- [ t00 ⇒ t19 | t01 ⇒ t19 | t02 ⇒ t1B | t03 ⇒ t1B | t04 ⇒ t1D | t05 ⇒ t1D | t06 ⇒ t1F | t07 ⇒ t1F
- | t08 ⇒ t19 | t09 ⇒ t19 | t0A ⇒ t1B | t0B ⇒ t1B | t0C ⇒ t1D | t0D ⇒ t1D | t0E ⇒ t1F | t0F ⇒ t1F
- | t10 ⇒ t19 | t11 ⇒ t19 | t12 ⇒ t1B | t13 ⇒ t1B | t14 ⇒ t1D | t15 ⇒ t1D | t16 ⇒ t1F | t17 ⇒ t1F
- | t18 ⇒ t19 | t19 ⇒ t19 | t1A ⇒ t1B | t1B ⇒ t1B | t1C ⇒ t1D | t1D ⇒ t1D | t1E ⇒ t1F | t1F ⇒ t1F ]
- | t1A ⇒ match e2 with
- [ t00 ⇒ t1A | t01 ⇒ t1B | t02 ⇒ t1A | t03 ⇒ t1B | t04 ⇒ t1E | t05 ⇒ t1F | t06 ⇒ t1E | t07 ⇒ t1F
- | t08 ⇒ t1A | t09 ⇒ t1B | t0A ⇒ t1A | t0B ⇒ t1B | t0C ⇒ t1E | t0D ⇒ t1F | t0E ⇒ t1E | t0F ⇒ t1F
- | t10 ⇒ t1A | t11 ⇒ t1B | t12 ⇒ t1A | t13 ⇒ t1B | t14 ⇒ t1E | t15 ⇒ t1F | t16 ⇒ t1E | t17 ⇒ t1F
- | t18 ⇒ t1A | t19 ⇒ t1B | t1A ⇒ t1A | t1B ⇒ t1B | t1C ⇒ t1E | t1D ⇒ t1F | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t1B ⇒ match e2 with
- [ t00 ⇒ t1B | t01 ⇒ t1B | t02 ⇒ t1B | t03 ⇒ t1B | t04 ⇒ t1F | t05 ⇒ t1F | t06 ⇒ t1F | t07 ⇒ t1F
- | t08 ⇒ t1B | t09 ⇒ t1B | t0A ⇒ t1B | t0B ⇒ t1B | t0C ⇒ t1F | t0D ⇒ t1F | t0E ⇒ t1F | t0F ⇒ t1F
- | t10 ⇒ t1B | t11 ⇒ t1B | t12 ⇒ t1B | t13 ⇒ t1B | t14 ⇒ t1F | t15 ⇒ t1F | t16 ⇒ t1F | t17 ⇒ t1F
- | t18 ⇒ t1B | t19 ⇒ t1B | t1A ⇒ t1B | t1B ⇒ t1B | t1C ⇒ t1F | t1D ⇒ t1F | t1E ⇒ t1F | t1F ⇒ t1F ]
- | t1C ⇒ match e2 with
- [ t00 ⇒ t1C | t01 ⇒ t1D | t02 ⇒ t1E | t03 ⇒ t1F | t04 ⇒ t1C | t05 ⇒ t1D | t06 ⇒ t1E | t07 ⇒ t1F
- | t08 ⇒ t1C | t09 ⇒ t1D | t0A ⇒ t1E | t0B ⇒ t1F | t0C ⇒ t1C | t0D ⇒ t1D | t0E ⇒ t1E | t0F ⇒ t1F
- | t10 ⇒ t1C | t11 ⇒ t1D | t12 ⇒ t1E | t13 ⇒ t1F | t14 ⇒ t1C | t15 ⇒ t1D | t16 ⇒ t1E | t17 ⇒ t1F
- | t18 ⇒ t1C | t19 ⇒ t1D | t1A ⇒ t1E | t1B ⇒ t1F | t1C ⇒ t1C | t1D ⇒ t1D | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t1D ⇒ match e2 with
- [ t00 ⇒ t1D | t01 ⇒ t1D | t02 ⇒ t1F | t03 ⇒ t1F | t04 ⇒ t1D | t05 ⇒ t1D | t06 ⇒ t1F | t07 ⇒ t1F
- | t08 ⇒ t1D | t09 ⇒ t1D | t0A ⇒ t1F | t0B ⇒ t1F | t0C ⇒ t1D | t0D ⇒ t1D | t0E ⇒ t1F | t0F ⇒ t1F
- | t10 ⇒ t1D | t11 ⇒ t1D | t12 ⇒ t1F | t13 ⇒ t1F | t14 ⇒ t1D | t15 ⇒ t1D | t16 ⇒ t1F | t17 ⇒ t1F
- | t18 ⇒ t1D | t19 ⇒ t1D | t1A ⇒ t1F | t1B ⇒ t1F | t1C ⇒ t1D | t1D ⇒ t1D | t1E ⇒ t1F | t1F ⇒ t1F ]
- | t1E ⇒ match e2 with
- [ t00 ⇒ t1E | t01 ⇒ t1F | t02 ⇒ t1E | t03 ⇒ t1F | t04 ⇒ t1E | t05 ⇒ t1F | t06 ⇒ t1E | t07 ⇒ t1F
- | t08 ⇒ t1E | t09 ⇒ t1F | t0A ⇒ t1E | t0B ⇒ t1F | t0C ⇒ t1E | t0D ⇒ t1F | t0E ⇒ t1E | t0F ⇒ t1F
- | t10 ⇒ t1E | t11 ⇒ t1F | t12 ⇒ t1E | t13 ⇒ t1F | t14 ⇒ t1E | t15 ⇒ t1F | t16 ⇒ t1E | t17 ⇒ t1F
- | t18 ⇒ t1E | t19 ⇒ t1F | t1A ⇒ t1E | t1B ⇒ t1F | t1C ⇒ t1E | t1D ⇒ t1F | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t1F ⇒ match e2 with
- [ t00 ⇒ t1F | t01 ⇒ t1F | t02 ⇒ t1F | t03 ⇒ t1F | t04 ⇒ t1F | t05 ⇒ t1F | t06 ⇒ t1F | t07 ⇒ t1F
- | t08 ⇒ t1F | t09 ⇒ t1F | t0A ⇒ t1F | t0B ⇒ t1F | t0C ⇒ t1F | t0D ⇒ t1F | t0E ⇒ t1F | t0F ⇒ t1F
- | t10 ⇒ t1F | t11 ⇒ t1F | t12 ⇒ t1F | t13 ⇒ t1F | t14 ⇒ t1F | t15 ⇒ t1F | t16 ⇒ t1F | t17 ⇒ t1F
- | t18 ⇒ t1F | t19 ⇒ t1F | t1A ⇒ t1F | t1B ⇒ t1F | t1C ⇒ t1F | t1D ⇒ t1F | t1E ⇒ t1F | t1F ⇒ t1F ]
- ].
-
-(* operatore xor *)
-ndefinition xor_bit ≝
-λe1,e2.match e1 with
- [ t00 ⇒ match e2 with
- [ t00 ⇒ t00 | t01 ⇒ t01 | t02 ⇒ t02 | t03 ⇒ t03 | t04 ⇒ t04 | t05 ⇒ t05 | t06 ⇒ t06 | t07 ⇒ t07
- | t08 ⇒ t08 | t09 ⇒ t09 | t0A ⇒ t0A | t0B ⇒ t0B | t0C ⇒ t0C | t0D ⇒ t0D | t0E ⇒ t0E | t0F ⇒ t0F
- | t10 ⇒ t10 | t11 ⇒ t11 | t12 ⇒ t12 | t13 ⇒ t13 | t14 ⇒ t14 | t15 ⇒ t15 | t16 ⇒ t16 | t17 ⇒ t17
- | t18 ⇒ t18 | t19 ⇒ t19 | t1A ⇒ t1A | t1B ⇒ t1B | t1C ⇒ t1C | t1D ⇒ t1D | t1E ⇒ t1E | t1F ⇒ t1F ]
- | t01 ⇒ match e2 with
- [ t00 ⇒ t01 | t01 ⇒ t00 | t02 ⇒ t03 | t03 ⇒ t02 | t04 ⇒ t05 | t05 ⇒ t04 | t06 ⇒ t07 | t07 ⇒ t06
- | t08 ⇒ t09 | t09 ⇒ t08 | t0A ⇒ t0B | t0B ⇒ t0A | t0C ⇒ t0D | t0D ⇒ t0C | t0E ⇒ t0F | t0F ⇒ t0E
- | t10 ⇒ t11 | t11 ⇒ t10 | t12 ⇒ t13 | t13 ⇒ t12 | t14 ⇒ t15 | t15 ⇒ t14 | t16 ⇒ t17 | t17 ⇒ t16
- | t18 ⇒ t19 | t19 ⇒ t18 | t1A ⇒ t1B | t1B ⇒ t1A | t1C ⇒ t1D | t1D ⇒ t1C | t1E ⇒ t1F | t1F ⇒ t1E ]
- | t02 ⇒ match e2 with
- [ t00 ⇒ t02 | t01 ⇒ t03 | t02 ⇒ t00 | t03 ⇒ t01 | t04 ⇒ t06 | t05 ⇒ t07 | t06 ⇒ t04 | t07 ⇒ t05
- | t08 ⇒ t0A | t09 ⇒ t0B | t0A ⇒ t08 | t0B ⇒ t09 | t0C ⇒ t0E | t0D ⇒ t0F | t0E ⇒ t0C | t0F ⇒ t0D
- | t10 ⇒ t12 | t11 ⇒ t13 | t12 ⇒ t10 | t13 ⇒ t11 | t14 ⇒ t16 | t15 ⇒ t17 | t16 ⇒ t14 | t17 ⇒ t15
- | t18 ⇒ t1A | t19 ⇒ t1B | t1A ⇒ t18 | t1B ⇒ t19 | t1C ⇒ t1E | t1D ⇒ t1F | t1E ⇒ t1C | t1F ⇒ t1D ]
- | t03 ⇒ match e2 with
- [ t00 ⇒ t03 | t01 ⇒ t02 | t02 ⇒ t01 | t03 ⇒ t00 | t04 ⇒ t07 | t05 ⇒ t06 | t06 ⇒ t05 | t07 ⇒ t04
- | t08 ⇒ t0B | t09 ⇒ t0A | t0A ⇒ t09 | t0B ⇒ t08 | t0C ⇒ t0F | t0D ⇒ t0E | t0E ⇒ t0D | t0F ⇒ t0C
- | t10 ⇒ t13 | t11 ⇒ t12 | t12 ⇒ t11 | t13 ⇒ t10 | t14 ⇒ t17 | t15 ⇒ t16 | t16 ⇒ t15 | t17 ⇒ t14
- | t18 ⇒ t1B | t19 ⇒ t1A | t1A ⇒ t19 | t1B ⇒ t18 | t1C ⇒ t1F | t1D ⇒ t1E | t1E ⇒ t1D | t1F ⇒ t1C ]
- | t04 ⇒ match e2 with
- [ t00 ⇒ t04 | t01 ⇒ t05 | t02 ⇒ t06 | t03 ⇒ t07 | t04 ⇒ t00 | t05 ⇒ t01 | t06 ⇒ t02 | t07 ⇒ t03
- | t08 ⇒ t0C | t09 ⇒ t0D | t0A ⇒ t0E | t0B ⇒ t0F | t0C ⇒ t08 | t0D ⇒ t09 | t0E ⇒ t0A | t0F ⇒ t0B
- | t10 ⇒ t14 | t11 ⇒ t15 | t12 ⇒ t16 | t13 ⇒ t17 | t14 ⇒ t10 | t15 ⇒ t11 | t16 ⇒ t12 | t17 ⇒ t13
- | t18 ⇒ t1C | t19 ⇒ t1D | t1A ⇒ t1E | t1B ⇒ t1F | t1C ⇒ t18 | t1D ⇒ t19 | t1E ⇒ t1A | t1F ⇒ t1B ]
- | t05 ⇒ match e2 with
- [ t00 ⇒ t05 | t01 ⇒ t04 | t02 ⇒ t07 | t03 ⇒ t06 | t04 ⇒ t01 | t05 ⇒ t00 | t06 ⇒ t03 | t07 ⇒ t02
- | t08 ⇒ t0D | t09 ⇒ t0C | t0A ⇒ t0F | t0B ⇒ t0E | t0C ⇒ t09 | t0D ⇒ t08 | t0E ⇒ t0B | t0F ⇒ t0A
- | t10 ⇒ t15 | t11 ⇒ t14 | t12 ⇒ t17 | t13 ⇒ t16 | t14 ⇒ t11 | t15 ⇒ t10 | t16 ⇒ t13 | t17 ⇒ t12
- | t18 ⇒ t1D | t19 ⇒ t1C | t1A ⇒ t1F | t1B ⇒ t1E | t1C ⇒ t19 | t1D ⇒ t18 | t1E ⇒ t1B | t1F ⇒ t1A ]
- | t06 ⇒ match e2 with
- [ t00 ⇒ t06 | t01 ⇒ t07 | t02 ⇒ t04 | t03 ⇒ t05 | t04 ⇒ t02 | t05 ⇒ t03 | t06 ⇒ t00 | t07 ⇒ t01
- | t08 ⇒ t0E | t09 ⇒ t0F | t0A ⇒ t0C | t0B ⇒ t0D | t0C ⇒ t0A | t0D ⇒ t0B | t0E ⇒ t08 | t0F ⇒ t09
- | t10 ⇒ t16 | t11 ⇒ t17 | t12 ⇒ t14 | t13 ⇒ t15 | t14 ⇒ t12 | t15 ⇒ t13 | t16 ⇒ t10 | t17 ⇒ t11
- | t18 ⇒ t1E | t19 ⇒ t1F | t1A ⇒ t1C | t1B ⇒ t1D | t1C ⇒ t1A | t1D ⇒ t1B | t1E ⇒ t18 | t1F ⇒ t19 ]
- | t07 ⇒ match e2 with
- [ t00 ⇒ t07 | t01 ⇒ t06 | t02 ⇒ t05 | t03 ⇒ t04 | t04 ⇒ t03 | t05 ⇒ t02 | t06 ⇒ t01 | t07 ⇒ t00
- | t08 ⇒ t0F | t09 ⇒ t0E | t0A ⇒ t0D | t0B ⇒ t0C | t0C ⇒ t0B | t0D ⇒ t0A | t0E ⇒ t09 | t0F ⇒ t08
- | t10 ⇒ t17 | t11 ⇒ t16 | t12 ⇒ t15 | t13 ⇒ t14 | t14 ⇒ t13 | t15 ⇒ t12 | t16 ⇒ t11 | t17 ⇒ t10
- | t18 ⇒ t1F | t19 ⇒ t1E | t1A ⇒ t1D | t1B ⇒ t1C | t1C ⇒ t1B | t1D ⇒ t1A | t1E ⇒ t19 | t1F ⇒ t18 ]
- | t08 ⇒ match e2 with
- [ t00 ⇒ t08 | t01 ⇒ t09 | t02 ⇒ t0A | t03 ⇒ t0B | t04 ⇒ t0C | t05 ⇒ t0D | t06 ⇒ t0E | t07 ⇒ t0F
- | t08 ⇒ t00 | t09 ⇒ t01 | t0A ⇒ t02 | t0B ⇒ t03 | t0C ⇒ t04 | t0D ⇒ t05 | t0E ⇒ t06 | t0F ⇒ t07
- | t10 ⇒ t18 | t11 ⇒ t19 | t12 ⇒ t1A | t13 ⇒ t1B | t14 ⇒ t1C | t15 ⇒ t1D | t16 ⇒ t1E | t17 ⇒ t1F
- | t18 ⇒ t10 | t19 ⇒ t11 | t1A ⇒ t12 | t1B ⇒ t13 | t1C ⇒ t14 | t1D ⇒ t15 | t1E ⇒ t16 | t1F ⇒ t17 ]
- | t09 ⇒ match e2 with
- [ t00 ⇒ t09 | t01 ⇒ t08 | t02 ⇒ t0B | t03 ⇒ t0A | t04 ⇒ t0D | t05 ⇒ t0C | t06 ⇒ t0F | t07 ⇒ t0E
- | t08 ⇒ t01 | t09 ⇒ t00 | t0A ⇒ t03 | t0B ⇒ t02 | t0C ⇒ t05 | t0D ⇒ t04 | t0E ⇒ t07 | t0F ⇒ t06
- | t10 ⇒ t19 | t11 ⇒ t18 | t12 ⇒ t1B | t13 ⇒ t1A | t14 ⇒ t1D | t15 ⇒ t1C | t16 ⇒ t1F | t17 ⇒ t1E
- | t18 ⇒ t11 | t19 ⇒ t10 | t1A ⇒ t13 | t1B ⇒ t12 | t1C ⇒ t15 | t1D ⇒ t14 | t1E ⇒ t17 | t1F ⇒ t16 ]
- | t0A ⇒ match e2 with
- [ t00 ⇒ t0A | t01 ⇒ t0B | t02 ⇒ t08 | t03 ⇒ t09 | t04 ⇒ t0E | t05 ⇒ t0F | t06 ⇒ t0C | t07 ⇒ t0D
- | t08 ⇒ t02 | t09 ⇒ t03 | t0A ⇒ t00 | t0B ⇒ t01 | t0C ⇒ t06 | t0D ⇒ t07 | t0E ⇒ t04 | t0F ⇒ t05
- | t10 ⇒ t1A | t11 ⇒ t1B | t12 ⇒ t18 | t13 ⇒ t19 | t14 ⇒ t1E | t15 ⇒ t1F | t16 ⇒ t1C | t17 ⇒ t1D
- | t18 ⇒ t12 | t19 ⇒ t13 | t1A ⇒ t10 | t1B ⇒ t11 | t1C ⇒ t16 | t1D ⇒ t17 | t1E ⇒ t14 | t1F ⇒ t15 ]
- | t0B ⇒ match e2 with
- [ t00 ⇒ t0B | t01 ⇒ t0A | t02 ⇒ t09 | t03 ⇒ t08 | t04 ⇒ t0F | t05 ⇒ t0E | t06 ⇒ t0D | t07 ⇒ t0C
- | t08 ⇒ t03 | t09 ⇒ t02 | t0A ⇒ t01 | t0B ⇒ t00 | t0C ⇒ t07 | t0D ⇒ t06 | t0E ⇒ t05 | t0F ⇒ t04
- | t10 ⇒ t1B | t11 ⇒ t1A | t12 ⇒ t19 | t13 ⇒ t18 | t14 ⇒ t1F | t15 ⇒ t1E | t16 ⇒ t1D | t17 ⇒ t1C
- | t18 ⇒ t13 | t19 ⇒ t12 | t1A ⇒ t11 | t1B ⇒ t10 | t1C ⇒ t17 | t1D ⇒ t16 | t1E ⇒ t15 | t1F ⇒ t14 ]
- | t0C ⇒ match e2 with
- [ t00 ⇒ t0C | t01 ⇒ t0D | t02 ⇒ t0E | t03 ⇒ t0F | t04 ⇒ t08 | t05 ⇒ t09 | t06 ⇒ t0A | t07 ⇒ t0B
- | t08 ⇒ t04 | t09 ⇒ t05 | t0A ⇒ t06 | t0B ⇒ t07 | t0C ⇒ t00 | t0D ⇒ t01 | t0E ⇒ t02 | t0F ⇒ t03
- | t10 ⇒ t1C | t11 ⇒ t1D | t12 ⇒ t1E | t13 ⇒ t1F | t14 ⇒ t18 | t15 ⇒ t19 | t16 ⇒ t1A | t17 ⇒ t1B
- | t18 ⇒ t14 | t19 ⇒ t15 | t1A ⇒ t16 | t1B ⇒ t17 | t1C ⇒ t10 | t1D ⇒ t11 | t1E ⇒ t12 | t1F ⇒ t13 ]
- | t0D ⇒ match e2 with
- [ t00 ⇒ t0D | t01 ⇒ t0C | t02 ⇒ t0F | t03 ⇒ t0E | t04 ⇒ t09 | t05 ⇒ t08 | t06 ⇒ t0B | t07 ⇒ t0A
- | t08 ⇒ t05 | t09 ⇒ t04 | t0A ⇒ t07 | t0B ⇒ t06 | t0C ⇒ t01 | t0D ⇒ t00 | t0E ⇒ t03 | t0F ⇒ t02
- | t10 ⇒ t1D | t11 ⇒ t1C | t12 ⇒ t1F | t13 ⇒ t1E | t14 ⇒ t19 | t15 ⇒ t18 | t16 ⇒ t1B | t17 ⇒ t1A
- | t18 ⇒ t15 | t19 ⇒ t14 | t1A ⇒ t17 | t1B ⇒ t16 | t1C ⇒ t11 | t1D ⇒ t10 | t1E ⇒ t13 | t1F ⇒ t12 ]
- | t0E ⇒ match e2 with
- [ t00 ⇒ t0E | t01 ⇒ t0F | t02 ⇒ t0C | t03 ⇒ t0D | t04 ⇒ t0A | t05 ⇒ t0B | t06 ⇒ t08 | t07 ⇒ t09
- | t08 ⇒ t06 | t09 ⇒ t07 | t0A ⇒ t04 | t0B ⇒ t05 | t0C ⇒ t02 | t0D ⇒ t03 | t0E ⇒ t00 | t0F ⇒ t01
- | t10 ⇒ t1E | t11 ⇒ t1F | t12 ⇒ t1C | t13 ⇒ t1D | t14 ⇒ t1A | t15 ⇒ t1B | t16 ⇒ t18 | t17 ⇒ t19
- | t18 ⇒ t16 | t19 ⇒ t17 | t1A ⇒ t14 | t1B ⇒ t15 | t1C ⇒ t12 | t1D ⇒ t13 | t1E ⇒ t10 | t1F ⇒ t11 ]
- | t0F ⇒ match e2 with
- [ t00 ⇒ t0F | t01 ⇒ t0E | t02 ⇒ t0D | t03 ⇒ t0C | t04 ⇒ t0B | t05 ⇒ t0A | t06 ⇒ t09 | t07 ⇒ t08
- | t08 ⇒ t07 | t09 ⇒ t06 | t0A ⇒ t05 | t0B ⇒ t04 | t0C ⇒ t03 | t0D ⇒ t02 | t0E ⇒ t01 | t0F ⇒ t00
- | t10 ⇒ t1F | t11 ⇒ t1E | t12 ⇒ t1D | t13 ⇒ t1C | t14 ⇒ t1B | t15 ⇒ t1A | t16 ⇒ t19 | t17 ⇒ t18
- | t18 ⇒ t17 | t19 ⇒ t16 | t1A ⇒ t15 | t1B ⇒ t14 | t1C ⇒ t13 | t1D ⇒ t12 | t1E ⇒ t11 | t1F ⇒ t10 ]
- | t10 ⇒ match e2 with
- [ t00 ⇒ t10 | t01 ⇒ t11 | t02 ⇒ t12 | t03 ⇒ t13 | t04 ⇒ t14 | t05 ⇒ t15 | t06 ⇒ t16 | t07 ⇒ t17
- | t08 ⇒ t18 | t09 ⇒ t19 | t0A ⇒ t1A | t0B ⇒ t1B | t0C ⇒ t1C | t0D ⇒ t1D | t0E ⇒ t1E | t0F ⇒ t1F
- | t10 ⇒ t00 | t11 ⇒ t01 | t12 ⇒ t02 | t13 ⇒ t03 | t14 ⇒ t04 | t15 ⇒ t05 | t16 ⇒ t06 | t17 ⇒ t07
- | t18 ⇒ t08 | t19 ⇒ t09 | t1A ⇒ t0A | t1B ⇒ t0B | t1C ⇒ t0C | t1D ⇒ t0D | t1E ⇒ t0E | t1F ⇒ t0F ]
- | t11 ⇒ match e2 with
- [ t00 ⇒ t11 | t01 ⇒ t10 | t02 ⇒ t13 | t03 ⇒ t12 | t04 ⇒ t15 | t05 ⇒ t14 | t06 ⇒ t17 | t07 ⇒ t16
- | t08 ⇒ t19 | t09 ⇒ t18 | t0A ⇒ t1B | t0B ⇒ t1A | t0C ⇒ t1D | t0D ⇒ t1C | t0E ⇒ t1F | t0F ⇒ t1E
- | t10 ⇒ t01 | t11 ⇒ t00 | t12 ⇒ t03 | t13 ⇒ t02 | t14 ⇒ t05 | t15 ⇒ t04 | t16 ⇒ t07 | t17 ⇒ t06
- | t18 ⇒ t09 | t19 ⇒ t08 | t1A ⇒ t0B | t1B ⇒ t0A | t1C ⇒ t0D | t1D ⇒ t0C | t1E ⇒ t0F | t1F ⇒ t0E ]
- | t12 ⇒ match e2 with
- [ t00 ⇒ t12 | t01 ⇒ t13 | t02 ⇒ t10 | t03 ⇒ t11 | t04 ⇒ t16 | t05 ⇒ t17 | t06 ⇒ t14 | t07 ⇒ t15
- | t08 ⇒ t1A | t09 ⇒ t1B | t0A ⇒ t18 | t0B ⇒ t19 | t0C ⇒ t1E | t0D ⇒ t1F | t0E ⇒ t1C | t0F ⇒ t1D
- | t10 ⇒ t02 | t11 ⇒ t03 | t12 ⇒ t00 | t13 ⇒ t01 | t14 ⇒ t06 | t15 ⇒ t07 | t16 ⇒ t04 | t17 ⇒ t05
- | t18 ⇒ t0A | t19 ⇒ t0B | t1A ⇒ t08 | t1B ⇒ t09 | t1C ⇒ t0E | t1D ⇒ t0F | t1E ⇒ t0C | t1F ⇒ t0D ]
- | t13 ⇒ match e2 with
- [ t00 ⇒ t13 | t01 ⇒ t12 | t02 ⇒ t11 | t03 ⇒ t10 | t04 ⇒ t17 | t05 ⇒ t16 | t06 ⇒ t15 | t07 ⇒ t14
- | t08 ⇒ t1B | t09 ⇒ t1A | t0A ⇒ t19 | t0B ⇒ t18 | t0C ⇒ t1F | t0D ⇒ t1E | t0E ⇒ t1D | t0F ⇒ t1C
- | t10 ⇒ t03 | t11 ⇒ t02 | t12 ⇒ t01 | t13 ⇒ t00 | t14 ⇒ t07 | t15 ⇒ t06 | t16 ⇒ t05 | t17 ⇒ t04
- | t18 ⇒ t0B | t19 ⇒ t0A | t1A ⇒ t09 | t1B ⇒ t08 | t1C ⇒ t0F | t1D ⇒ t0E | t1E ⇒ t0D | t1F ⇒ t0C ]
- | t14 ⇒ match e2 with
- [ t00 ⇒ t14 | t01 ⇒ t15 | t02 ⇒ t16 | t03 ⇒ t17 | t04 ⇒ t10 | t05 ⇒ t11 | t06 ⇒ t12 | t07 ⇒ t13
- | t08 ⇒ t1C | t09 ⇒ t1D | t0A ⇒ t1E | t0B ⇒ t1F | t0C ⇒ t18 | t0D ⇒ t19 | t0E ⇒ t1A | t0F ⇒ t1B
- | t10 ⇒ t04 | t11 ⇒ t05 | t12 ⇒ t06 | t13 ⇒ t07 | t14 ⇒ t00 | t15 ⇒ t01 | t16 ⇒ t02 | t17 ⇒ t03
- | t18 ⇒ t0C | t19 ⇒ t0D | t1A ⇒ t0E | t1B ⇒ t0F | t1C ⇒ t08 | t1D ⇒ t09 | t1E ⇒ t0A | t1F ⇒ t0B ]
- | t15 ⇒ match e2 with
- [ t00 ⇒ t15 | t01 ⇒ t14 | t02 ⇒ t17 | t03 ⇒ t16 | t04 ⇒ t11 | t05 ⇒ t10 | t06 ⇒ t13 | t07 ⇒ t12
- | t08 ⇒ t1D | t09 ⇒ t1C | t0A ⇒ t1F | t0B ⇒ t1E | t0C ⇒ t19 | t0D ⇒ t18 | t0E ⇒ t1B | t0F ⇒ t1A
- | t10 ⇒ t05 | t11 ⇒ t04 | t12 ⇒ t07 | t13 ⇒ t06 | t14 ⇒ t01 | t15 ⇒ t00 | t16 ⇒ t03 | t17 ⇒ t02
- | t18 ⇒ t0D | t19 ⇒ t0C | t1A ⇒ t0F | t1B ⇒ t0E | t1C ⇒ t09 | t1D ⇒ t08 | t1E ⇒ t0B | t1F ⇒ t0A ]
- | t16 ⇒ match e2 with
- [ t00 ⇒ t16 | t01 ⇒ t17 | t02 ⇒ t14 | t03 ⇒ t15 | t04 ⇒ t12 | t05 ⇒ t13 | t06 ⇒ t10 | t07 ⇒ t11
- | t08 ⇒ t1E | t09 ⇒ t1F | t0A ⇒ t1C | t0B ⇒ t1D | t0C ⇒ t1A | t0D ⇒ t1B | t0E ⇒ t18 | t0F ⇒ t19
- | t10 ⇒ t06 | t11 ⇒ t07 | t12 ⇒ t04 | t13 ⇒ t05 | t14 ⇒ t02 | t15 ⇒ t03 | t16 ⇒ t00 | t17 ⇒ t01
- | t18 ⇒ t0E | t19 ⇒ t0F | t1A ⇒ t0C | t1B ⇒ t0D | t1C ⇒ t0A | t1D ⇒ t0B | t1E ⇒ t08 | t1F ⇒ t09 ]
- | t17 ⇒ match e2 with
- [ t00 ⇒ t17 | t01 ⇒ t16 | t02 ⇒ t15 | t03 ⇒ t14 | t04 ⇒ t13 | t05 ⇒ t12 | t06 ⇒ t11 | t07 ⇒ t10
- | t08 ⇒ t1F | t09 ⇒ t1E | t0A ⇒ t1D | t0B ⇒ t1C | t0C ⇒ t1B | t0D ⇒ t1A | t0E ⇒ t19 | t0F ⇒ t18
- | t10 ⇒ t07 | t11 ⇒ t06 | t12 ⇒ t05 | t13 ⇒ t04 | t14 ⇒ t03 | t15 ⇒ t02 | t16 ⇒ t01 | t17 ⇒ t00
- | t18 ⇒ t0F | t19 ⇒ t0E | t1A ⇒ t0D | t1B ⇒ t0C | t1C ⇒ t0B | t1D ⇒ t0A | t1E ⇒ t09 | t1F ⇒ t08 ]
- | t18 ⇒ match e2 with
- [ t00 ⇒ t18 | t01 ⇒ t19 | t02 ⇒ t1A | t03 ⇒ t1B | t04 ⇒ t1C | t05 ⇒ t1D | t06 ⇒ t1E | t07 ⇒ t1F
- | t08 ⇒ t10 | t09 ⇒ t11 | t0A ⇒ t12 | t0B ⇒ t13 | t0C ⇒ t14 | t0D ⇒ t15 | t0E ⇒ t16 | t0F ⇒ t17
- | t10 ⇒ t08 | t11 ⇒ t09 | t12 ⇒ t0A | t13 ⇒ t0B | t14 ⇒ t0C | t15 ⇒ t0D | t16 ⇒ t0E | t17 ⇒ t0F
- | t18 ⇒ t00 | t19 ⇒ t01 | t1A ⇒ t02 | t1B ⇒ t03 | t1C ⇒ t04 | t1D ⇒ t05 | t1E ⇒ t06 | t1F ⇒ t07 ]
- | t19 ⇒ match e2 with
- [ t00 ⇒ t19 | t01 ⇒ t18 | t02 ⇒ t1B | t03 ⇒ t1A | t04 ⇒ t1D | t05 ⇒ t1C | t06 ⇒ t1F | t07 ⇒ t1E
- | t08 ⇒ t11 | t09 ⇒ t10 | t0A ⇒ t13 | t0B ⇒ t12 | t0C ⇒ t15 | t0D ⇒ t14 | t0E ⇒ t17 | t0F ⇒ t16
- | t10 ⇒ t09 | t11 ⇒ t08 | t12 ⇒ t0B | t13 ⇒ t0A | t14 ⇒ t0D | t15 ⇒ t0C | t16 ⇒ t0F | t17 ⇒ t0E
- | t18 ⇒ t01 | t19 ⇒ t00 | t1A ⇒ t03 | t1B ⇒ t02 | t1C ⇒ t05 | t1D ⇒ t04 | t1E ⇒ t07 | t1F ⇒ t06 ]
- | t1A ⇒ match e2 with
- [ t00 ⇒ t1A | t01 ⇒ t1B | t02 ⇒ t18 | t03 ⇒ t19 | t04 ⇒ t1E | t05 ⇒ t1F | t06 ⇒ t1C | t07 ⇒ t1D
- | t08 ⇒ t12 | t09 ⇒ t13 | t0A ⇒ t10 | t0B ⇒ t11 | t0C ⇒ t16 | t0D ⇒ t17 | t0E ⇒ t14 | t0F ⇒ t15
- | t10 ⇒ t0A | t11 ⇒ t0B | t12 ⇒ t08 | t13 ⇒ t09 | t14 ⇒ t0E | t15 ⇒ t0F | t16 ⇒ t0C | t17 ⇒ t0D
- | t18 ⇒ t02 | t19 ⇒ t03 | t1A ⇒ t00 | t1B ⇒ t01 | t1C ⇒ t06 | t1D ⇒ t07 | t1E ⇒ t04 | t1F ⇒ t05 ]
- | t1B ⇒ match e2 with
- [ t00 ⇒ t1B | t01 ⇒ t1A | t02 ⇒ t19 | t03 ⇒ t18 | t04 ⇒ t1F | t05 ⇒ t1E | t06 ⇒ t1D | t07 ⇒ t1C
- | t08 ⇒ t13 | t09 ⇒ t12 | t0A ⇒ t11 | t0B ⇒ t10 | t0C ⇒ t17 | t0D ⇒ t16 | t0E ⇒ t15 | t0F ⇒ t14
- | t10 ⇒ t0B | t11 ⇒ t0A | t12 ⇒ t09 | t13 ⇒ t08 | t14 ⇒ t0F | t15 ⇒ t0E | t16 ⇒ t0D | t17 ⇒ t0C
- | t18 ⇒ t03 | t19 ⇒ t02 | t1A ⇒ t01 | t1B ⇒ t00 | t1C ⇒ t07 | t1D ⇒ t06 | t1E ⇒ t05 | t1F ⇒ t04 ]
- | t1C ⇒ match e2 with
- [ t00 ⇒ t1C | t01 ⇒ t1D | t02 ⇒ t1E | t03 ⇒ t1F | t04 ⇒ t18 | t05 ⇒ t19 | t06 ⇒ t1A | t07 ⇒ t1B
- | t08 ⇒ t14 | t09 ⇒ t15 | t0A ⇒ t16 | t0B ⇒ t17 | t0C ⇒ t10 | t0D ⇒ t11 | t0E ⇒ t12 | t0F ⇒ t13
- | t10 ⇒ t0C | t11 ⇒ t0D | t12 ⇒ t0E | t13 ⇒ t0F | t14 ⇒ t08 | t15 ⇒ t09 | t16 ⇒ t0A | t17 ⇒ t0B
- | t18 ⇒ t04 | t19 ⇒ t05 | t1A ⇒ t06 | t1B ⇒ t07 | t1C ⇒ t00 | t1D ⇒ t01 | t1E ⇒ t02 | t1F ⇒ t03 ]
- | t1D ⇒ match e2 with
- [ t00 ⇒ t1D | t01 ⇒ t1C | t02 ⇒ t1F | t03 ⇒ t1E | t04 ⇒ t19 | t05 ⇒ t18 | t06 ⇒ t1B | t07 ⇒ t1A
- | t08 ⇒ t15 | t09 ⇒ t14 | t0A ⇒ t17 | t0B ⇒ t16 | t0C ⇒ t11 | t0D ⇒ t10 | t0E ⇒ t13 | t0F ⇒ t12
- | t10 ⇒ t0D | t11 ⇒ t0C | t12 ⇒ t0F | t13 ⇒ t0E | t14 ⇒ t09 | t15 ⇒ t08 | t16 ⇒ t0B | t17 ⇒ t0A
- | t18 ⇒ t05 | t19 ⇒ t04 | t1A ⇒ t07 | t1B ⇒ t06 | t1C ⇒ t01 | t1D ⇒ t00 | t1E ⇒ t03 | t1F ⇒ t02 ]
- | t1E ⇒ match e2 with
- [ t00 ⇒ t1E | t01 ⇒ t1F | t02 ⇒ t1C | t03 ⇒ t1D | t04 ⇒ t1A | t05 ⇒ t1B | t06 ⇒ t18 | t07 ⇒ t19
- | t08 ⇒ t16 | t09 ⇒ t17 | t0A ⇒ t14 | t0B ⇒ t15 | t0C ⇒ t12 | t0D ⇒ t13 | t0E ⇒ t10 | t0F ⇒ t11
- | t10 ⇒ t0E | t11 ⇒ t0F | t12 ⇒ t0C | t13 ⇒ t0D | t14 ⇒ t0A | t15 ⇒ t0B | t16 ⇒ t08 | t17 ⇒ t09
- | t18 ⇒ t06 | t19 ⇒ t07 | t1A ⇒ t04 | t1B ⇒ t05 | t1C ⇒ t02 | t1D ⇒ t03 | t1E ⇒ t00 | t1F ⇒ t01 ]
- | t1F ⇒ match e2 with
- [ t00 ⇒ t1F | t01 ⇒ t1E | t02 ⇒ t1D | t03 ⇒ t1C | t04 ⇒ t1B | t05 ⇒ t1A | t06 ⇒ t19 | t07 ⇒ t18
- | t08 ⇒ t17 | t09 ⇒ t16 | t0A ⇒ t15 | t0B ⇒ t14 | t0C ⇒ t13 | t0D ⇒ t12 | t0E ⇒ t11 | t0F ⇒ t10
- | t10 ⇒ t0F | t11 ⇒ t0E | t12 ⇒ t0D | t13 ⇒ t0C | t14 ⇒ t0B | t15 ⇒ t0A | t16 ⇒ t09 | t17 ⇒ t08
- | t18 ⇒ t07 | t19 ⇒ t06 | t1A ⇒ t05 | t1B ⇒ t04 | t1C ⇒ t03 | t1D ⇒ t02 | t1E ⇒ t01 | t1F ⇒ t00 ]
- ].
-
-(* operatore predecessore *)
-ndefinition pred_bit ≝
-λn.match n with
- [ t00 ⇒ t1F | t01 ⇒ t00 | t02 ⇒ t01 | t03 ⇒ t02 | t04 ⇒ t03 | t05 ⇒ t04 | t06 ⇒ t05 | t07 ⇒ t06
- | t08 ⇒ t07 | t09 ⇒ t08 | t0A ⇒ t09 | t0B ⇒ t0A | t0C ⇒ t0B | t0D ⇒ t0C | t0E ⇒ t0D | t0F ⇒ t0E
- | t10 ⇒ t0F | t11 ⇒ t10 | t12 ⇒ t11 | t13 ⇒ t12 | t14 ⇒ t13 | t15 ⇒ t14 | t16 ⇒ t15 | t17 ⇒ t16
- | t18 ⇒ t17 | t19 ⇒ t18 | t1A ⇒ t19 | t1B ⇒ t1A | t1C ⇒ t1B | t1D ⇒ t1C | t1E ⇒ t1D | t1F ⇒ t0E
- ].
-
-(* operatore successore *)
-ndefinition succ_bit ≝
-λn.match n with
- [ t00 ⇒ t01 | t01 ⇒ t02 | t02 ⇒ t03 | t03 ⇒ t04 | t04 ⇒ t05 | t05 ⇒ t06 | t06 ⇒ t07 | t07 ⇒ t08
- | t08 ⇒ t09 | t09 ⇒ t0A | t0A ⇒ t0B | t0B ⇒ t0C | t0C ⇒ t0D | t0D ⇒ t0E | t0E ⇒ t0F | t0F ⇒ t10
- | t10 ⇒ t11 | t11 ⇒ t12 | t12 ⇒ t13 | t13 ⇒ t14 | t14 ⇒ t15 | t15 ⇒ t16 | t16 ⇒ t17 | t17 ⇒ t18
- | t18 ⇒ t19 | t19 ⇒ t1A | t1A ⇒ t1B | t1B ⇒ t1C | t1C ⇒ t1D | t1D ⇒ t1E | t1E ⇒ t1F | t1F ⇒ t00
- ].
-
-(* bitrigesimali ricorsivi *)
-ninductive rec_bitrigesim : bitrigesim → Type ≝
- bi_O : rec_bitrigesim t00
-| bi_S : ∀n.rec_bitrigesim n → rec_bitrigesim (succ_bit n).
-
-(* bitrigesimali → bitrigesimali ricorsivi *)
-ndefinition bit_to_recbit ≝
-λn.match n return λx.rec_bitrigesim x with
- [ t00 ⇒ bi_O
- | t01 ⇒ bi_S ? bi_O
- | t02 ⇒ bi_S ? (bi_S ? bi_O)
- | t03 ⇒ bi_S ? (bi_S ? (bi_S ? bi_O))
- | t04 ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? bi_O)))
- | t05 ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? bi_O))))
- | t06 ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? bi_O)))))
- | t07 ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? bi_O))))))
- | t08 ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- bi_O)))))))
- | t09 ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? bi_O))))))))
- | t0A ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? bi_O)))))))))
- | t0B ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? bi_O))))))))))
- | t0C ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? bi_O)))))))))))
- | t0D ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? bi_O))))))))))))
- | t0E ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? bi_O)))))))))))))
- | t0F ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? bi_O))))))))))))))
- | t10 ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- bi_O)))))))))))))))
- | t11 ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? bi_O))))))))))))))))
- | t12 ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? bi_O)))))))))))))))))
- | t13 ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? bi_O))))))))))))))))))
- | t14 ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? bi_O)))))))))))))))))))
- | t15 ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? bi_O))))))))))))))))))))
- | t16 ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? bi_O)))))))))))))))))))))
- | t17 ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? bi_O))))))))))))))))))))))
- | t18 ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- bi_O)))))))))))))))))))))))
- | t19 ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? bi_O))))))))))))))))))))))))
- | t1A ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? bi_O)))))))))))))))))))))))))
- | t1B ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? bi_O))))))))))))))))))))))))))
- | t1C ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? bi_O)))))))))))))))))))))))))))
- | t1D ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? bi_O))))))))))))))))))))))))))))
- | t1E ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? bi_O)))))))))))))))))))))))))))))
- | t1F ⇒ bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ?
- (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? (bi_S ? bi_O))))))))))))))))))))))))))))))
- ].
-
-ndefinition bitrigesim_destruct_aux ≝
-Πt1,t2:bitrigesim.ΠP:Prop.t1 = t2 →
- match eq_bit t1 t2 with [ true ⇒ P → P | false ⇒ P ].
-
-ndefinition bitrigesim_destruct : bitrigesim_destruct_aux.
- #t1; #t2; #P; #H;
- nrewrite < H;
- nelim t1;
- nnormalize;
- napply (λx.x).
-nqed.
-
-nlemma eq_to_eqbit : ∀n1,n2.n1 = n2 → eq_bit n1 n2 = true.
- #n1; #n2; #H;
- nrewrite > H;
- nelim n2;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma neqbit_to_neq : ∀n1,n2.eq_bit n1 n2 = false → n1 ≠ n2.
- #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_bit n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqbit n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-(* !!! per brevita... *)
-naxiom eqbit_to_eq : ∀t1,t2.eq_bit t1 t2 = true → t1 = t2.
-
-nlemma neq_to_neqbit : ∀n1,n2.n1 ≠ n2 → eq_bit n1 n2 = false.
- #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_bit n1 n2));
- napply (not_to_not (eq_bit n1 n2 = true) (n1 = n2) ? H);
- napply (eqbit_to_eq n1 n2).
-nqed.
-
-nlemma decidable_bit : ∀x,y:bitrigesim.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_bit x y = true) (eq_bit x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqbit_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqbit_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqbit : symmetricT bitrigesim bool eq_bit.
- #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_bit n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqbit n1 n2 H);
- napply (symmetric_eq ? (eq_bit n2 n1) false);
- napply (neq_to_neqbit n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
-
-nlemma bitrigesim_is_comparable : comparable.
- @ bitrigesim
- ##[ napply t00
- ##| napply forall_bit
- ##| napply eq_bit
- ##| napply eqbit_to_eq
- ##| napply eq_to_eqbit
- ##| napply neqbit_to_neq
- ##| napply neq_to_neqbit
- ##| napply decidable_bit
- ##| napply symmetric_eqbit
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr bitrigesim_is_comparable ≡ bitrigesim.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/theory.ma".
-
-(* ******** *)
-(* BOOLEANI *)
-(* ******** *)
-
-ninductive bool : Type ≝
- true : bool
-| false : bool.
-
-(* operatori booleani *)
-ndefinition eq_bool ≝
-λb1,b2:bool.match b1 with
- [ true ⇒ match b2 with [ true ⇒ true | false ⇒ false ]
- | false ⇒ match b2 with [ true ⇒ false | false ⇒ true ]
- ].
-
-ndefinition not_bool ≝
-λb:bool.match b with [ true ⇒ false | false ⇒ true ].
-
-ndefinition and_bool ≝
-λb1,b2:bool.match b1 with
- [ true ⇒ b2 | false ⇒ false ].
-
-ndefinition or_bool ≝
-λb1,b2:bool.match b1 with
- [ true ⇒ true | false ⇒ b2 ].
-
-ndefinition xor_bool ≝
-λb1,b2:bool.match b1 with
- [ true ⇒ not_bool b2
- | false ⇒ b2 ].
-
-(* \ominus *)
-notation "hvbox(⊖ a)" non associative with precedence 36
- for @{ 'not_bool $a }.
-interpretation "not_bool" 'not_bool x = (not_bool x).
-
-(* \otimes *)
-notation "hvbox(a break ⊗ b)" left associative with precedence 35
- for @{ 'and_bool $a $b }.
-interpretation "and_bool" 'and_bool x y = (and_bool x y).
-
-(* \oplus *)
-notation "hvbox(a break ⊕ b)" left associative with precedence 34
- for @{ 'or_bool $a $b }.
-interpretation "or_bool" 'or_bool x y = (or_bool x y).
-
-(* \odot *)
-notation "hvbox(a break ⊙ b)" left associative with precedence 33
- for @{ 'xor_bool $a $b }.
-interpretation "xor_bool" 'xor_bool x y = (xor_bool x y).
-
-(* iteratore sugli esadecimali *)
-ndefinition forall_bool ≝ λP.P true ⊗ P false.
-
-ndefinition boolRelation : Type → Type ≝
-λA:Type.A → A → bool.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/bool.ma".
-include "common/comp.ma".
-
-(* ******** *)
-(* BOOLEANI *)
-(* ******** *)
-
-ndefinition bool_destruct_aux ≝
-Πb1,b2:bool.ΠP:Prop.b1 = b2 →
- match eq_bool b1 b2 with [ true ⇒ P → P | false ⇒ P ].
-
-ndefinition bool_destruct : bool_destruct_aux.
- #b1; #b2; #P; #H;
- nrewrite < H;
- nelim b1;
- nnormalize;
- napply (λx.x).
-nqed.
-
-nlemma symmetric_eqbool : symmetricT bool bool eq_bool.
- #b1; #b2;
- nelim b1;
- nelim b2;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_andbool : symmetricT bool bool and_bool.
- #b1; #b2;
- nelim b1;
- nelim b2;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma associative_andbool : ∀b1,b2,b3.((b1 ⊗ b2) ⊗ b3) = (b1 ⊗ (b2 ⊗ b3)).
- #b1; #b2; #b3;
- nelim b1;
- nelim b2;
- nelim b3;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_orbool : symmetricT bool bool or_bool.
- #b1; #b2;
- nelim b1;
- nelim b2;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma associative_orbool : ∀b1,b2,b3.((b1 ⊕ b2) ⊕ b3) = (b1 ⊕ (b2 ⊕ b3)).
- #b1; #b2; #b3;
- nelim b1;
- nelim b2;
- nelim b3;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_xorbool : symmetricT bool bool xor_bool.
- #b1; #b2;
- nelim b1;
- nelim b2;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma associative_xorbool : ∀b1,b2,b3.((b1 ⊙ b2) ⊙ b3) = (b1 ⊙ (b2 ⊙ b3)).
- #b1; #b2; #b3;
- nelim b1;
- nelim b2;
- nelim b3;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma eqbool_to_eq : ∀b1,b2:bool.(eq_bool b1 b2 = true) → (b1 = b2).
- #b1; #b2;
- ncases b1;
- ncases b2;
- nnormalize;
- ##[ ##1,4: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
- ##]
-nqed.
-
-nlemma eq_to_eqbool : ∀b1,b2.b1 = b2 → eq_bool b1 b2 = true.
- #b1; #b2;
- ncases b1;
- ncases b2;
- nnormalize;
- ##[ ##1,4: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
- ##]
-nqed.
-
-nlemma decidable_bool : ∀x,y:bool.decidable (x = y).
- #x; #y;
- nnormalize;
- nelim x;
- nelim y;
- ##[ ##1,4: napply (or2_intro1 (? = ?) (? ≠ ?) …); napply refl_eq
- ##| ##*: napply (or2_intro2 (? = ?) (? ≠ ?) …);
- nnormalize; #H;
- napply False_ind;
- ndestruct (*napply (bool_destruct … H)*)
- ##]
-nqed.
-
-nlemma decidable_bexpr : ∀x.(x = true) ∨ (x = false).
- #x; ncases x;
- ##[ ##1: napply (or2_intro1 (true = true) (true = false) (refl_eq …))
- ##| ##2: napply (or2_intro2 (false = true) (false = false) (refl_eq …))
- ##]
-nqed.
-
-nlemma neqbool_to_neq : ∀b1,b2:bool.(eq_bool b1 b2 = false) → (b1 ≠ b2).
- #b1; #b2;
- ncases b1;
- ncases b2;
- nnormalize;
- ##[ ##1,4: #H; ndestruct (*napply (bool_destruct … H)*)
- ##| ##*: #H; #H1; ndestruct (*napply (bool_destruct … H1)*)
- ##]
-nqed.
-
-nlemma neq_to_neqbool : ∀b1,b2.b1 ≠ b2 → eq_bool b1 b2 = false.
- #b1; #b2;
- ncases b1;
- ncases b2;
- nnormalize;
- ##[ ##1,4: #H; nelim (H (refl_eq …))
- ##| ##*: #H; napply refl_eq
- ##]
-nqed.
-
-nlemma eqfalse_to_neqtrue : ∀x.x = false → x ≠ true.
- #x; nelim x;
- ##[ ##1: #H; ndestruct (*napply (bool_destruct … H)*)
- ##| ##2: #H; nnormalize; #H1; ndestruct (*napply (bool_destruct … H1)*)
- ##]
-nqed.
-
-nlemma eqtrue_to_neqfalse : ∀x.x = true → x ≠ false.
- #x; nelim x;
- ##[ ##1: #H; nnormalize; #H1; ndestruct (*napply (bool_destruct … H1)*)
- ##| ##2: #H; ndestruct (*napply (bool_destruct … H)*)
- ##]
-nqed.
-
-nlemma neqfalse_to_eqtrue : ∀x.x ≠ false → x = true.
- #x; nelim x;
- ##[ ##1: #H; napply refl_eq
- ##| ##2: nnormalize; #H; nelim (H (refl_eq …))
- ##]
-nqed.
-
-nlemma neqtrue_to_eqfalse : ∀x.x ≠ true → x = false.
- #x; nelim x;
- ##[ ##1: nnormalize; #H; nelim (H (refl_eq …))
- ##| ##2: #H; napply refl_eq
- ##]
-nqed.
-
-nlemma andb_true_true_l: ∀b1,b2.(b1 ⊗ b2) = true → b1 = true.
- #b1; #b2;
- ncases b1;
- ncases b2;
- nnormalize;
- ##[ ##1,2: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
- ##]
-nqed.
-
-nlemma andb_true_true_r: ∀b1,b2.(b1 ⊗ b2) = true → b2 = true.
- #b1; #b2;
- ncases b1;
- ncases b2;
- nnormalize;
- ##[ ##1,3: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
- ##]
-nqed.
-
-nlemma andb_false2
- : ∀b1,b2.(b1 ⊗ b2) = false →
- (b1 = false) ∨ (b2 = false).
- #b1; #b2;
- ncases b1;
- ncases b2;
- nnormalize;
- ##[ ##1: #H; ndestruct (*napply (bool_destruct … H)*)
- ##| ##2,4: #H; napply (or2_intro2 … H)
- ##| ##3: #H; napply (or2_intro1 … H)
- ##]
-nqed.
-
-nlemma andb_false3
- : ∀b1,b2,b3.(b1 ⊗ b2 ⊗ b3) = false →
- Or3 (b1 = false) (b2 = false) (b3 = false).
- #b1; #b2; #b3;
- ncases b1;
- ncases b2;
- ncases b3;
- nnormalize;
- ##[ ##1: #H; ndestruct (*napply (bool_destruct … H)*)
- ##| ##5,6,7,8: #H; napply (or3_intro1 … H)
- ##| ##2,4: #H; napply (or3_intro3 … H)
- ##| ##3: #H; napply (or3_intro2 … H)
- ##]
-nqed.
-
-nlemma andb_false4
- : ∀b1,b2,b3,b4.(b1 ⊗ b2 ⊗ b3 ⊗ b4) = false →
- Or4 (b1 = false) (b2 = false) (b3 = false) (b4 = false).
- #b1; #b2; #b3; #b4;
- ncases b1;
- ncases b2;
- ncases b3;
- ncases b4;
- nnormalize;
- ##[ ##1: #H; ndestruct (*napply (bool_destruct … H)*)
- ##| ##9,10,11,12,13,14,15,16: #H; napply (or4_intro1 … H)
- ##| ##5,6,7,8: #H; napply (or4_intro2 … H)
- ##| ##3,4: #H; napply (or4_intro3 … H)
- ##| ##2: #H; napply (or4_intro4 … H)
- ##]
-nqed.
-
-nlemma andb_false5
- : ∀b1,b2,b3,b4,b5.(b1 ⊗ b2 ⊗ b3 ⊗ b4 ⊗ b5) = false →
- Or5 (b1 = false) (b2 = false) (b3 = false) (b4 = false) (b5 = false).
- #b1; #b2; #b3; #b4; #b5;
- ncases b1;
- ncases b2;
- ncases b3;
- ncases b4;
- ncases b5;
- nnormalize;
- ##[ ##1: #H; ndestruct (*napply (bool_destruct … H)*)
- ##| ##17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32: #H; napply (or5_intro1 … H)
- ##| ##9,10,11,12,13,14,15,16: #H; napply (or5_intro2 … H)
- ##| ##5,6,7,8: #H; napply (or5_intro3 … H)
- ##| ##3,4: #H; napply (or5_intro4 … H)
- ##| ##2: #H; napply (or5_intro5 … H)
- ##]
-nqed.
-
-nlemma andb_false2_1 : ∀b.(false ⊗ b) = false.
- #b; nnormalize; napply refl_eq. nqed.
-nlemma andb_false2_2 : ∀b.(b ⊗ false) = false.
- #b; nelim b; nnormalize; napply refl_eq. nqed.
-
-nlemma andb_false3_1 : ∀b1,b2.(false ⊗ b1 ⊗ b2) = false.
- #b1; #b2; nnormalize; napply refl_eq. nqed.
-nlemma andb_false3_2 : ∀b1,b2.(b1 ⊗ false ⊗ b2) = false.
- #b1; #b2; nelim b1; nnormalize; napply refl_eq. nqed.
-nlemma andb_false3_3 : ∀b1,b2.(b1 ⊗ b2 ⊗ false) = false.
- #b1; #b2; nelim b1; nelim b2; nnormalize; napply refl_eq. nqed.
-
-nlemma andb_false4_1 : ∀b1,b2,b3.(false ⊗ b1 ⊗ b2 ⊗ b3) = false.
- #b1; #b2; #b3; nnormalize; napply refl_eq. nqed.
-nlemma andb_false4_2 : ∀b1,b2,b3.(b1 ⊗ false ⊗ b2 ⊗ b3) = false.
- #b1; #b2; #b3; nelim b1; nnormalize; napply refl_eq. nqed.
-nlemma andb_false4_3 : ∀b1,b2,b3.(b1 ⊗ b2 ⊗ false ⊗ b3) = false.
- #b1; #b2; #b3; nelim b1; nelim b2; nnormalize; napply refl_eq. nqed.
-nlemma andb_false4_4 : ∀b1,b2,b3.(b1 ⊗ b2 ⊗ b3 ⊗ false) = false.
- #b1; #b2; #b3; nelim b1; nelim b2; nelim b3; nnormalize; napply refl_eq. nqed.
-
-nlemma andb_false5_1 : ∀b1,b2,b3,b4.(false ⊗ b1 ⊗ b2 ⊗ b3 ⊗ b4) = false.
- #b1; #b2; #b3; #b4; nnormalize; napply refl_eq. nqed.
-nlemma andb_false5_2 : ∀b1,b2,b3,b4.(b1 ⊗ false ⊗ b2 ⊗ b3 ⊗ b4) = false.
- #b1; #b2; #b3; #b4; nelim b1; nnormalize; napply refl_eq. nqed.
-nlemma andb_false5_3 : ∀b1,b2,b3,b4.(b1 ⊗ b2 ⊗ false ⊗ b3 ⊗ b4) = false.
- #b1; #b2; #b3; #b4; nelim b1; nelim b2; nnormalize; napply refl_eq. nqed.
-nlemma andb_false5_4 : ∀b1,b2,b3,b4.(b1 ⊗ b2 ⊗ b3 ⊗ false ⊗ b4) = false.
- #b1; #b2; #b3; #b4; nelim b1; nelim b2; nelim b3; nnormalize; napply refl_eq. nqed.
-nlemma andb_false5_5 : ∀b1,b2,b3,b4.(b1 ⊗ b2 ⊗ b3 ⊗ b4 ⊗ false) = false.
- #b1; #b2; #b3; #b4; nelim b1; nelim b2; nelim b3; nelim b4; nnormalize; napply refl_eq. nqed.
-
-nlemma orb_false_false_l : ∀b1,b2:bool.(b1 ⊕ b2) = false → b1 = false.
- #b1; #b2;
- ncases b1;
- ncases b2;
- nnormalize;
- ##[ ##4: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
- ##]
-nqed.
-
-nlemma orb_false_false_r : ∀b1,b2:bool.(b1 ⊕ b2) = false → b2 = false.
- #b1; #b2;
- ncases b1;
- ncases b2;
- nnormalize;
- ##[ ##4: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
- ##]
-nqed.
-
-nlemma bool_is_comparable : comparable.
- @ bool
- ##[ napply false
- ##| napply forall_bool
- ##| napply eq_bool
- ##| napply eqbool_to_eq
- ##| napply eq_to_eqbool
- ##| napply neqbool_to_neq
- ##| napply neq_to_neqbool
- ##| napply decidable_bool
- ##| napply symmetric_eqbool
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr bool_is_comparable ≡ bool.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/comp_num.ma".
-include "num/exadecim.ma".
-include "num/bitrigesim.ma".
-
-(* **** *)
-(* BYTE *)
-(* **** *)
-
-ndefinition byte8 ≝ comp_num exadecim.
-ndefinition mk_byte8 ≝ λe1,e2.mk_comp_num exadecim e1 e2.
-
-(* \langle \rangle *)
-notation "〈x,y〉" non associative with precedence 80
- for @{ mk_comp_num exadecim $x $y }.
-
-ndefinition byte8_is_comparable ≝ cn_is_comparable exadecim_is_comparable.
-ndefinition byte8_is_comparable_ext ≝ cn_is_comparable_ext exadecim_is_comparable_ext.
-unification hint 0 ≔ ⊢ carr (comp_base byte8_is_comparable_ext) ≡ comp_num exadecim.
-unification hint 0 ≔ ⊢ carr (comp_base byte8_is_comparable_ext) ≡ byte8.
-unification hint 0 ≔ ⊢ carr byte8_is_comparable ≡ comp_num exadecim.
-unification hint 0 ≔ ⊢ carr byte8_is_comparable ≡ byte8.
-
-(* operatore estensione unsigned *)
-ndefinition extu_b8 ≝ λe2.〈zeroc ?,e2〉.
-
-(* operatore estensione signed *)
-ndefinition exts_b8 ≝
-λe2.〈(match getMSBc ? e2 with
- [ true ⇒ predc ? (zeroc ?) | false ⇒ zeroc ? ]),e2〉.
-
-(* operatore moltiplicazione senza segno: e*e=[0x00,0xE1] *)
-ndefinition mulu_ex ≝
-λe1,e2:exadecim.match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x0〉 | x2 ⇒ 〈x0,x0〉 | x3 ⇒ 〈x0,x0〉
- | x4 ⇒ 〈x0,x0〉 | x5 ⇒ 〈x0,x0〉 | x6 ⇒ 〈x0,x0〉 | x7 ⇒ 〈x0,x0〉
- | x8 ⇒ 〈x0,x0〉 | x9 ⇒ 〈x0,x0〉 | xA ⇒ 〈x0,x0〉 | xB ⇒ 〈x0,x0〉
- | xC ⇒ 〈x0,x0〉 | xD ⇒ 〈x0,x0〉 | xE ⇒ 〈x0,x0〉 | xF ⇒ 〈x0,x0〉 ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x1〉 | x2 ⇒ 〈x0,x2〉 | x3 ⇒ 〈x0,x3〉
- | x4 ⇒ 〈x0,x4〉 | x5 ⇒ 〈x0,x5〉 | x6 ⇒ 〈x0,x6〉 | x7 ⇒ 〈x0,x7〉
- | x8 ⇒ 〈x0,x8〉 | x9 ⇒ 〈x0,x9〉 | xA ⇒ 〈x0,xA〉 | xB ⇒ 〈x0,xB〉
- | xC ⇒ 〈x0,xC〉 | xD ⇒ 〈x0,xD〉 | xE ⇒ 〈x0,xE〉 | xF ⇒ 〈x0,xF〉 ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x2〉 | x2 ⇒ 〈x0,x4〉 | x3 ⇒ 〈x0,x6〉
- | x4 ⇒ 〈x0,x8〉 | x5 ⇒ 〈x0,xA〉 | x6 ⇒ 〈x0,xC〉 | x7 ⇒ 〈x0,xE〉
- | x8 ⇒ 〈x1,x0〉 | x9 ⇒ 〈x1,x2〉 | xA ⇒ 〈x1,x4〉 | xB ⇒ 〈x1,x6〉
- | xC ⇒ 〈x1,x8〉 | xD ⇒ 〈x1,xA〉 | xE ⇒ 〈x1,xC〉 | xF ⇒ 〈x1,xE〉 ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x3〉 | x2 ⇒ 〈x0,x6〉 | x3 ⇒ 〈x0,x9〉
- | x4 ⇒ 〈x0,xC〉 | x5 ⇒ 〈x0,xF〉 | x6 ⇒ 〈x1,x2〉 | x7 ⇒ 〈x1,x5〉
- | x8 ⇒ 〈x1,x8〉 | x9 ⇒ 〈x1,xB〉 | xA ⇒ 〈x1,xE〉 | xB ⇒ 〈x2,x1〉
- | xC ⇒ 〈x2,x4〉 | xD ⇒ 〈x2,x7〉 | xE ⇒ 〈x2,xA〉 | xF ⇒ 〈x2,xD〉 ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x4〉 | x2 ⇒ 〈x0,x8〉 | x3 ⇒ 〈x0,xC〉
- | x4 ⇒ 〈x1,x0〉 | x5 ⇒ 〈x1,x4〉 | x6 ⇒ 〈x1,x8〉 | x7 ⇒ 〈x1,xC〉
- | x8 ⇒ 〈x2,x0〉 | x9 ⇒ 〈x2,x4〉 | xA ⇒ 〈x2,x8〉 | xB ⇒ 〈x2,xC〉
- | xC ⇒ 〈x3,x0〉 | xD ⇒ 〈x3,x4〉 | xE ⇒ 〈x3,x8〉 | xF ⇒ 〈x3,xC〉 ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x5〉 | x2 ⇒ 〈x0,xA〉 | x3 ⇒ 〈x0,xF〉
- | x4 ⇒ 〈x1,x4〉 | x5 ⇒ 〈x1,x9〉 | x6 ⇒ 〈x1,xE〉 | x7 ⇒ 〈x2,x3〉
- | x8 ⇒ 〈x2,x8〉 | x9 ⇒ 〈x2,xD〉 | xA ⇒ 〈x3,x2〉 | xB ⇒ 〈x3,x7〉
- | xC ⇒ 〈x3,xC〉 | xD ⇒ 〈x4,x1〉 | xE ⇒ 〈x4,x6〉 | xF ⇒ 〈x4,xB〉 ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x6〉 | x2 ⇒ 〈x0,xC〉 | x3 ⇒ 〈x1,x2〉
- | x4 ⇒ 〈x1,x8〉 | x5 ⇒ 〈x1,xE〉 | x6 ⇒ 〈x2,x4〉 | x7 ⇒ 〈x2,xA〉
- | x8 ⇒ 〈x3,x0〉 | x9 ⇒ 〈x3,x6〉 | xA ⇒ 〈x3,xC〉 | xB ⇒ 〈x4,x2〉
- | xC ⇒ 〈x4,x8〉 | xD ⇒ 〈x4,xE〉 | xE ⇒ 〈x5,x4〉 | xF ⇒ 〈x5,xA〉 ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x7〉 | x2 ⇒ 〈x0,xE〉 | x3 ⇒ 〈x1,x5〉
- | x4 ⇒ 〈x1,xC〉 | x5 ⇒ 〈x2,x3〉 | x6 ⇒ 〈x2,xA〉 | x7 ⇒ 〈x3,x1〉
- | x8 ⇒ 〈x3,x8〉 | x9 ⇒ 〈x3,xF〉 | xA ⇒ 〈x4,x6〉 | xB ⇒ 〈x4,xD〉
- | xC ⇒ 〈x5,x4〉 | xD ⇒ 〈x5,xB〉 | xE ⇒ 〈x6,x2〉 | xF ⇒ 〈x6,x9〉 ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x8〉 | x2 ⇒ 〈x1,x0〉 | x3 ⇒ 〈x1,x8〉
- | x4 ⇒ 〈x2,x0〉 | x5 ⇒ 〈x2,x8〉 | x6 ⇒ 〈x3,x0〉 | x7 ⇒ 〈x3,x8〉
- | x8 ⇒ 〈x4,x0〉 | x9 ⇒ 〈x4,x8〉 | xA ⇒ 〈x5,x0〉 | xB ⇒ 〈x5,x8〉
- | xC ⇒ 〈x6,x0〉 | xD ⇒ 〈x6,x8〉 | xE ⇒ 〈x7,x0〉 | xF ⇒ 〈x7,x8〉 ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x9〉 | x2 ⇒ 〈x1,x2〉 | x3 ⇒ 〈x1,xB〉
- | x4 ⇒ 〈x2,x4〉 | x5 ⇒ 〈x2,xD〉 | x6 ⇒ 〈x3,x6〉 | x7 ⇒ 〈x3,xF〉
- | x8 ⇒ 〈x4,x8〉 | x9 ⇒ 〈x5,x1〉 | xA ⇒ 〈x5,xA〉 | xB ⇒ 〈x6,x3〉
- | xC ⇒ 〈x6,xC〉 | xD ⇒ 〈x7,x5〉 | xE ⇒ 〈x7,xE〉 | xF ⇒ 〈x8,x7〉 ]
- | xA ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,xA〉 | x2 ⇒ 〈x1,x4〉 | x3 ⇒ 〈x1,xE〉
- | x4 ⇒ 〈x2,x8〉 | x5 ⇒ 〈x3,x2〉 | x6 ⇒ 〈x3,xC〉 | x7 ⇒ 〈x4,x6〉
- | x8 ⇒ 〈x5,x0〉 | x9 ⇒ 〈x5,xA〉 | xA ⇒ 〈x6,x4〉 | xB ⇒ 〈x6,xE〉
- | xC ⇒ 〈x7,x8〉 | xD ⇒ 〈x8,x2〉 | xE ⇒ 〈x8,xC〉 | xF ⇒ 〈x9,x6〉 ]
- | xB ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,xB〉 | x2 ⇒ 〈x1,x6〉 | x3 ⇒ 〈x2,x1〉
- | x4 ⇒ 〈x2,xC〉 | x5 ⇒ 〈x3,x7〉 | x6 ⇒ 〈x4,x2〉 | x7 ⇒ 〈x4,xD〉
- | x8 ⇒ 〈x5,x8〉 | x9 ⇒ 〈x6,x3〉 | xA ⇒ 〈x6,xE〉 | xB ⇒ 〈x7,x9〉
- | xC ⇒ 〈x8,x4〉 | xD ⇒ 〈x8,xF〉 | xE ⇒ 〈x9,xA〉 | xF ⇒ 〈xA,x5〉 ]
- | xC ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,xC〉 | x2 ⇒ 〈x1,x8〉 | x3 ⇒ 〈x2,x4〉
- | x4 ⇒ 〈x3,x0〉 | x5 ⇒ 〈x3,xC〉 | x6 ⇒ 〈x4,x8〉 | x7 ⇒ 〈x5,x4〉
- | x8 ⇒ 〈x6,x0〉 | x9 ⇒ 〈x6,xC〉 | xA ⇒ 〈x7,x8〉 | xB ⇒ 〈x8,x4〉
- | xC ⇒ 〈x9,x0〉 | xD ⇒ 〈x9,xC〉 | xE ⇒ 〈xA,x8〉 | xF ⇒ 〈xB,x4〉 ]
- | xD ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,xD〉 | x2 ⇒ 〈x1,xA〉 | x3 ⇒ 〈x2,x7〉
- | x4 ⇒ 〈x3,x4〉 | x5 ⇒ 〈x4,x1〉 | x6 ⇒ 〈x4,xE〉 | x7 ⇒ 〈x5,xB〉
- | x8 ⇒ 〈x6,x8〉 | x9 ⇒ 〈x7,x5〉 | xA ⇒ 〈x8,x2〉 | xB ⇒ 〈x8,xF〉
- | xC ⇒ 〈x9,xC〉 | xD ⇒ 〈xA,x9〉 | xE ⇒ 〈xB,x6〉 | xF ⇒ 〈xC,x3〉 ]
- | xE ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,xE〉 | x2 ⇒ 〈x1,xC〉 | x3 ⇒ 〈x2,xA〉
- | x4 ⇒ 〈x3,x8〉 | x5 ⇒ 〈x4,x6〉 | x6 ⇒ 〈x5,x4〉 | x7 ⇒ 〈x6,x2〉
- | x8 ⇒ 〈x7,x0〉 | x9 ⇒ 〈x7,xE〉 | xA ⇒ 〈x8,xC〉 | xB ⇒ 〈x9,xA〉
- | xC ⇒ 〈xA,x8〉 | xD ⇒ 〈xB,x6〉 | xE ⇒ 〈xC,x4〉 | xF ⇒ 〈xD,x2〉 ]
- | xF ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,xF〉 | x2 ⇒ 〈x1,xE〉 | x3 ⇒ 〈x2,xD〉
- | x4 ⇒ 〈x3,xC〉 | x5 ⇒ 〈x4,xB〉 | x6 ⇒ 〈x5,xA〉 | x7 ⇒ 〈x6,x9〉
- | x8 ⇒ 〈x7,x8〉 | x9 ⇒ 〈x8,x7〉 | xA ⇒ 〈x9,x6〉 | xB ⇒ 〈xA,x5〉
- | xC ⇒ 〈xB,x4〉 | xD ⇒ 〈xC,x3〉 | xE ⇒ 〈xD,x2〉 | xF ⇒ 〈xE,x1〉 ]
- ].
-
-(* operatore moltiplicazione con segno *)
-ndefinition muls_ex ≝
-λe1,e2:exadecim.match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x0〉 | x2 ⇒ 〈x0,x0〉 | x3 ⇒ 〈x0,x0〉
- | x4 ⇒ 〈x0,x0〉 | x5 ⇒ 〈x0,x0〉 | x6 ⇒ 〈x0,x0〉 | x7 ⇒ 〈x0,x0〉
- | x8 ⇒ 〈x0,x0〉 | x9 ⇒ 〈x0,x0〉 | xA ⇒ 〈x0,x0〉 | xB ⇒ 〈x0,x0〉
- | xC ⇒ 〈x0,x0〉 | xD ⇒ 〈x0,x0〉 | xE ⇒ 〈x0,x0〉 | xF ⇒ 〈x0,x0〉 ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x1〉 | x2 ⇒ 〈x0,x2〉 | x3 ⇒ 〈x0,x3〉
- | x4 ⇒ 〈x0,x4〉 | x5 ⇒ 〈x0,x5〉 | x6 ⇒ 〈x0,x6〉 | x7 ⇒ 〈x0,x7〉
- | x8 ⇒ 〈xF,x8〉 | x9 ⇒ 〈xF,x9〉 | xA ⇒ 〈xF,xA〉 | xB ⇒ 〈xF,xB〉
- | xC ⇒ 〈xF,xC〉 | xD ⇒ 〈xF,xD〉 | xE ⇒ 〈xF,xE〉 | xF ⇒ 〈xF,xF〉 ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x2〉 | x2 ⇒ 〈x0,x4〉 | x3 ⇒ 〈x0,x6〉
- | x4 ⇒ 〈x0,x8〉 | x5 ⇒ 〈x0,xA〉 | x6 ⇒ 〈x0,xC〉 | x7 ⇒ 〈x0,xE〉
- | x8 ⇒ 〈xF,x0〉 | x9 ⇒ 〈xF,x2〉 | xA ⇒ 〈xF,x4〉 | xB ⇒ 〈xF,x6〉
- | xC ⇒ 〈xF,x8〉 | xD ⇒ 〈xF,xA〉 | xE ⇒ 〈xF,xC〉 | xF ⇒ 〈xF,xE〉 ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x3〉 | x2 ⇒ 〈x0,x6〉 | x3 ⇒ 〈x0,x9〉
- | x4 ⇒ 〈x0,xC〉 | x5 ⇒ 〈x0,xF〉 | x6 ⇒ 〈x1,x2〉 | x7 ⇒ 〈x1,x5〉
- | x8 ⇒ 〈xE,x8〉 | x9 ⇒ 〈xE,xB〉 | xA ⇒ 〈xE,xE〉 | xB ⇒ 〈xF,x1〉
- | xC ⇒ 〈xF,x4〉 | xD ⇒ 〈xF,x7〉 | xE ⇒ 〈xF,xA〉 | xF ⇒ 〈xF,xD〉 ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x4〉 | x2 ⇒ 〈x0,x8〉 | x3 ⇒ 〈x0,xC〉
- | x4 ⇒ 〈x1,x0〉 | x5 ⇒ 〈x1,x4〉 | x6 ⇒ 〈x1,x8〉 | x7 ⇒ 〈x1,xC〉
- | x8 ⇒ 〈xE,x0〉 | x9 ⇒ 〈xE,x4〉 | xA ⇒ 〈xE,x8〉 | xB ⇒ 〈xE,xC〉
- | xC ⇒ 〈xF,x0〉 | xD ⇒ 〈xF,x4〉 | xE ⇒ 〈xF,x8〉 | xF ⇒ 〈xF,xC〉 ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x5〉 | x2 ⇒ 〈x0,xA〉 | x3 ⇒ 〈x0,xF〉
- | x4 ⇒ 〈x1,x4〉 | x5 ⇒ 〈x1,x9〉 | x6 ⇒ 〈x1,xE〉 | x7 ⇒ 〈x2,x3〉
- | x8 ⇒ 〈xD,x8〉 | x9 ⇒ 〈xD,xD〉 | xA ⇒ 〈xE,x2〉 | xB ⇒ 〈xE,x7〉
- | xC ⇒ 〈xE,xC〉 | xD ⇒ 〈xF,x1〉 | xE ⇒ 〈xF,x6〉 | xF ⇒ 〈xF,xB〉 ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x6〉 | x2 ⇒ 〈x0,xC〉 | x3 ⇒ 〈x1,x2〉
- | x4 ⇒ 〈x1,x8〉 | x5 ⇒ 〈x1,xE〉 | x6 ⇒ 〈x2,x4〉 | x7 ⇒ 〈x2,xA〉
- | x8 ⇒ 〈xD,x0〉 | x9 ⇒ 〈xD,x6〉 | xA ⇒ 〈xD,xC〉 | xB ⇒ 〈xE,x2〉
- | xC ⇒ 〈xE,x8〉 | xD ⇒ 〈xE,xE〉 | xE ⇒ 〈xF,x4〉 | xF ⇒ 〈xF,xA〉 ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈x0,x7〉 | x2 ⇒ 〈x0,xE〉 | x3 ⇒ 〈x1,x5〉
- | x4 ⇒ 〈x1,xC〉 | x5 ⇒ 〈x2,x3〉 | x6 ⇒ 〈x2,xA〉 | x7 ⇒ 〈x3,x1〉
- | x8 ⇒ 〈xC,x8〉 | x9 ⇒ 〈xC,xF〉 | xA ⇒ 〈xD,x6〉 | xB ⇒ 〈xD,xD〉
- | xC ⇒ 〈xE,x4〉 | xD ⇒ 〈xE,xB〉 | xE ⇒ 〈xF,x2〉 | xF ⇒ 〈xF,x9〉 ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈xF,x8〉 | x2 ⇒ 〈xF,x0〉 | x3 ⇒ 〈xE,x8〉
- | x4 ⇒ 〈xE,x0〉 | x5 ⇒ 〈xD,x8〉 | x6 ⇒ 〈xD,x0〉 | x7 ⇒ 〈xC,x8〉
- | x8 ⇒ 〈x4,x0〉 | x9 ⇒ 〈x3,x8〉 | xA ⇒ 〈x3,x0〉 | xB ⇒ 〈x2,x8〉
- | xC ⇒ 〈x2,x0〉 | xD ⇒ 〈x1,x8〉 | xE ⇒ 〈x1,x0〉 | xF ⇒ 〈x0,x8〉 ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈xF,x9〉 | x2 ⇒ 〈xF,x2〉 | x3 ⇒ 〈xE,xB〉
- | x4 ⇒ 〈xE,x4〉 | x5 ⇒ 〈xD,xD〉 | x6 ⇒ 〈xD,x6〉 | x7 ⇒ 〈xC,xF〉
- | x8 ⇒ 〈x3,x8〉 | x9 ⇒ 〈x3,x1〉 | xA ⇒ 〈x2,xA〉 | xB ⇒ 〈x2,x3〉
- | xC ⇒ 〈x1,xC〉 | xD ⇒ 〈x1,x5〉 | xE ⇒ 〈x0,xE〉 | xF ⇒ 〈x0,x7〉 ]
- | xA ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈xF,xA〉 | x2 ⇒ 〈xF,x4〉 | x3 ⇒ 〈xE,xE〉
- | x4 ⇒ 〈xE,x8〉 | x5 ⇒ 〈xE,x2〉 | x6 ⇒ 〈xD,xC〉 | x7 ⇒ 〈xD,x6〉
- | x8 ⇒ 〈x3,x0〉 | x9 ⇒ 〈x2,xA〉 | xA ⇒ 〈x2,x4〉 | xB ⇒ 〈x1,xE〉
- | xC ⇒ 〈x1,x8〉 | xD ⇒ 〈x1,x2〉 | xE ⇒ 〈x0,xC〉 | xF ⇒ 〈x0,x6〉 ]
- | xB ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈xF,xB〉 | x2 ⇒ 〈xF,x6〉 | x3 ⇒ 〈xF,x1〉
- | x4 ⇒ 〈xE,xC〉 | x5 ⇒ 〈xE,x7〉 | x6 ⇒ 〈xE,x2〉 | x7 ⇒ 〈xD,xD〉
- | x8 ⇒ 〈x2,x8〉 | x9 ⇒ 〈x2,x3〉 | xA ⇒ 〈x1,xE〉 | xB ⇒ 〈x1,x9〉
- | xC ⇒ 〈x1,x4〉 | xD ⇒ 〈x0,xF〉 | xE ⇒ 〈x0,xA〉 | xF ⇒ 〈x0,x5〉 ]
- | xC ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈xF,xC〉 | x2 ⇒ 〈xF,x8〉 | x3 ⇒ 〈xF,x4〉
- | x4 ⇒ 〈xF,x0〉 | x5 ⇒ 〈xE,xC〉 | x6 ⇒ 〈xE,x8〉 | x7 ⇒ 〈xE,x4〉
- | x8 ⇒ 〈x2,x0〉 | x9 ⇒ 〈x1,xC〉 | xA ⇒ 〈x1,x8〉 | xB ⇒ 〈x1,x4〉
- | xC ⇒ 〈x1,x0〉 | xD ⇒ 〈x0,xC〉 | xE ⇒ 〈x0,x8〉 | xF ⇒ 〈x0,x4〉 ]
- | xD ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈xF,xD〉 | x2 ⇒ 〈xF,xA〉 | x3 ⇒ 〈xF,x7〉
- | x4 ⇒ 〈xF,x4〉 | x5 ⇒ 〈xF,x1〉 | x6 ⇒ 〈xE,xE〉 | x7 ⇒ 〈xE,xB〉
- | x8 ⇒ 〈x1,x8〉 | x9 ⇒ 〈x1,x5〉 | xA ⇒ 〈x1,x2〉 | xB ⇒ 〈x0,xF〉
- | xC ⇒ 〈x0,xC〉 | xD ⇒ 〈x0,x9〉 | xE ⇒ 〈x0,x6〉 | xF ⇒ 〈x0,x3〉 ]
- | xE ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈xF,xE〉 | x2 ⇒ 〈xF,xC〉 | x3 ⇒ 〈xF,xA〉
- | x4 ⇒ 〈xF,x8〉 | x5 ⇒ 〈xF,x6〉 | x6 ⇒ 〈xF,x4〉 | x7 ⇒ 〈xF,x2〉
- | x8 ⇒ 〈x1,x0〉 | x9 ⇒ 〈x0,xE〉 | xA ⇒ 〈x0,xC〉 | xB ⇒ 〈x0,xA〉
- | xC ⇒ 〈x0,x8〉 | xD ⇒ 〈x0,x6〉 | xE ⇒ 〈x0,x4〉 | xF ⇒ 〈x0,x2〉 ]
- | xF ⇒ match e2 with
- [ x0 ⇒ 〈x0,x0〉 | x1 ⇒ 〈xF,xF〉 | x2 ⇒ 〈xF,xE〉 | x3 ⇒ 〈xF,xD〉
- | x4 ⇒ 〈xF,xC〉 | x5 ⇒ 〈xF,xB〉 | x6 ⇒ 〈xF,xA〉 | x7 ⇒ 〈xF,x9〉
- | x8 ⇒ 〈x0,x8〉 | x9 ⇒ 〈x0,x7〉 | xA ⇒ 〈x0,x6〉 | xB ⇒ 〈x0,x5〉
- | xC ⇒ 〈x0,x4〉 | xD ⇒ 〈x0,x3〉 | xE ⇒ 〈x0,x2〉 | xF ⇒ 〈x0,x1〉 ]
- ].
-
-(* correzione per somma su BCD *)
-(* input: halfcarry,carry,X(BCD+BCD) *)
-(* output: X',carry' *)
-ndefinition daa_b8 ≝
-λh,c:bool.λX:byte8.
- match ltc ? X 〈x9,xA〉 with
- (* [X:0x00-0x99] *)
- (* c' = c *)
- (* X' = [(b16l X):0x0-0x9] X + [h=1 ? 0x06 : 0x00] + [c=1 ? 0x60 : 0x00]
- [(b16l X):0xA-0xF] X + 0x06 + [c=1 ? 0x60 : 0x00] *)
- [ true ⇒
- let X' ≝ match (ltc ? (cnL ? X) xA) ⊗ (⊖h) with
- [ true ⇒ X
- | false ⇒ plusc_d_d ? X 〈x0,x6〉 ] in
- let X'' ≝ match c with
- [ true ⇒ plusc_d_d ? X' 〈x6,x0〉
- | false ⇒ X' ] in
- pair … c X''
- (* [X:0x9A-0xFF] *)
- (* c' = 1 *)
- (* X' = [X:0x9A-0xFF]
- [(b16l X):0x0-0x9] X + [h=1 ? 0x06 : 0x00] + 0x60
- [(b16l X):0xA-0xF] X + 0x6 + 0x60 *)
- | false ⇒
- let X' ≝ match (ltc ? (cnL ? X) xA) ⊗ (⊖h) with
- [ true ⇒ X
- | false ⇒ plusc_d_d ? X 〈x0,x6〉 ] in
- let X'' ≝ plusc_d_d ? X' 〈x6,x0〉 in
- pair … true X''
- ].
-
-(* byte ricorsivi *)
-ninductive rec_byte8 : byte8 → Type ≝
- b8_O : rec_byte8 (zeroc ?)
-| b8_S : ∀n.rec_byte8 n → rec_byte8 (succc ? n).
-
-(* byte → byte ricorsivi *)
-ndefinition b8_to_recb8_aux1 : Πn.rec_byte8 〈n,x0〉 → rec_byte8 〈succc ? n,x0〉 ≝
-λn.λrecb:rec_byte8 〈n,x0〉.
- b8_S 〈n,xF〉 (b8_S 〈n,xE〉 (b8_S 〈n,xD〉 (b8_S 〈n,xC〉 (
- b8_S 〈n,xB〉 (b8_S 〈n,xA〉 (b8_S 〈n,x9〉 (b8_S 〈n,x8〉 (
- b8_S 〈n,x7〉 (b8_S 〈n,x6〉 (b8_S 〈n,x5〉 (b8_S 〈n,x4〉 (
- b8_S 〈n,x3〉 (b8_S 〈n,x2〉 (b8_S 〈n,x1〉 (b8_S 〈n,x0〉 recb))))))))))))))).
-
-(* ... cifra esadecimale superiore *)
-nlet rec b8_to_recb8_aux2 (n:exadecim) (r:rec_exadecim n) on r ≝
- match r return λx.λy:rec_exadecim x.rec_byte8 〈x,x0〉 with
- [ ex_O ⇒ b8_O
- | ex_S t n' ⇒ b8_to_recb8_aux1 ? (b8_to_recb8_aux2 t n')
- ].
-
-(* ... cifra esadecimale inferiore *)
-ndefinition b8_to_recb8_aux3 : Πn1,n2.rec_byte8 〈n1,x0〉 → rec_byte8 〈n1,n2〉 ≝
-λn1,n2.λrecb:rec_byte8 〈n1,x0〉.
- match n2 return λx.rec_byte8 〈n1,x〉 with
- [ x0 ⇒ recb
- | x1 ⇒ b8_S 〈n1,x0〉 recb
- | x2 ⇒ b8_S 〈n1,x1〉 (b8_S 〈n1,x0〉 recb)
- | x3 ⇒ b8_S 〈n1,x2〉 (b8_S 〈n1,x1〉 (b8_S 〈n1,x0〉 recb))
- | x4 ⇒ b8_S 〈n1,x3〉 (b8_S 〈n1,x2〉 (b8_S 〈n1,x1〉 (b8_S 〈n1,x0〉 recb)))
- | x5 ⇒ b8_S 〈n1,x4〉 (b8_S 〈n1,x3〉 (b8_S 〈n1,x2〉 (b8_S 〈n1,x1〉 (
- b8_S 〈n1,x0〉 recb))))
- | x6 ⇒ b8_S 〈n1,x5〉 (b8_S 〈n1,x4〉 (b8_S 〈n1,x3〉 (b8_S 〈n1,x2〉 (
- b8_S 〈n1,x1〉 (b8_S 〈n1,x0〉 recb)))))
- | x7 ⇒ b8_S 〈n1,x6〉 (b8_S 〈n1,x5〉 (b8_S 〈n1,x4〉 (b8_S 〈n1,x3〉 (
- b8_S 〈n1,x2〉 (b8_S 〈n1,x1〉 (b8_S 〈n1,x0〉 recb))))))
- | x8 ⇒ b8_S 〈n1,x7〉 (b8_S 〈n1,x6〉 (b8_S 〈n1,x5〉 (b8_S 〈n1,x4〉 (
- b8_S 〈n1,x3〉 (b8_S 〈n1,x2〉 (b8_S 〈n1,x1〉 (b8_S 〈n1,x0〉 recb)))))))
- | x9 ⇒ b8_S 〈n1,x8〉 (b8_S 〈n1,x7〉 (b8_S 〈n1,x6〉 (b8_S 〈n1,x5〉 (
- b8_S 〈n1,x4〉 (b8_S 〈n1,x3〉 (b8_S 〈n1,x2〉 (b8_S 〈n1,x1〉 (
- b8_S 〈n1,x0〉 recb))))))))
- | xA ⇒ b8_S 〈n1,x9〉 (b8_S 〈n1,x8〉 (b8_S 〈n1,x7〉 (b8_S 〈n1,x6〉 (
- b8_S 〈n1,x5〉 (b8_S 〈n1,x4〉 (b8_S 〈n1,x3〉 (b8_S 〈n1,x2〉 (
- b8_S 〈n1,x1〉 (b8_S 〈n1,x0〉 recb)))))))))
- | xB ⇒ b8_S 〈n1,xA〉 (b8_S 〈n1,x9〉 (b8_S 〈n1,x8〉 (b8_S 〈n1,x7〉 (
- b8_S 〈n1,x6〉 (b8_S 〈n1,x5〉 (b8_S 〈n1,x4〉 (b8_S 〈n1,x3〉 (
- b8_S 〈n1,x2〉 (b8_S 〈n1,x1〉 (b8_S 〈n1,x0〉 recb))))))))))
- | xC ⇒ b8_S 〈n1,xB〉 (b8_S 〈n1,xA〉 (b8_S 〈n1,x9〉 (b8_S 〈n1,x8〉 (
- b8_S 〈n1,x7〉 (b8_S 〈n1,x6〉 (b8_S 〈n1,x5〉 (b8_S 〈n1,x4〉 (
- b8_S 〈n1,x3〉 (b8_S 〈n1,x2〉 (b8_S 〈n1,x1〉 (b8_S 〈n1,x0〉 recb)))))))))))
- | xD ⇒ b8_S 〈n1,xC〉 (b8_S 〈n1,xB〉 (b8_S 〈n1,xA〉 (b8_S 〈n1,x9〉 (
- b8_S 〈n1,x8〉 (b8_S 〈n1,x7〉 (b8_S 〈n1,x6〉 (b8_S 〈n1,x5〉 (
- b8_S 〈n1,x4〉 (b8_S 〈n1,x3〉 (b8_S 〈n1,x2〉 (b8_S 〈n1,x1〉 (
- b8_S 〈n1,x0〉 recb))))))))))))
- | xE ⇒ b8_S 〈n1,xD〉 (b8_S 〈n1,xC〉 (b8_S 〈n1,xB〉 (b8_S 〈n1,xA〉 (
- b8_S 〈n1,x9〉 (b8_S 〈n1,x8〉 (b8_S 〈n1,x7〉 (b8_S 〈n1,x6〉 (
- b8_S 〈n1,x5〉 (b8_S 〈n1,x4〉 (b8_S 〈n1,x3〉 (b8_S 〈n1,x2〉 (
- b8_S 〈n1,x1〉 (b8_S 〈n1,x0〉 recb)))))))))))))
- | xF ⇒ b8_S 〈n1,xE〉 (b8_S 〈n1,xD〉 (b8_S 〈n1,xC〉 (b8_S 〈n1,xB〉 (
- b8_S 〈n1,xA〉 (b8_S 〈n1,x9〉 (b8_S 〈n1,x8〉 (b8_S 〈n1,x7〉 (
- b8_S 〈n1,x6〉 (b8_S 〈n1,x5〉 (b8_S 〈n1,x4〉 (b8_S 〈n1,x3〉 (
- b8_S 〈n1,x2〉 (b8_S 〈n1,x1〉 (b8_S 〈n1,x0〉 recb))))))))))))))
- ].
-
-(*
-nlemma b8_to_recb8 : Πb.rec_byte8 b.
- #b; nletin K ≝ (b8_to_recb8_aux3
- (b8h b) (b8l b) (b8_to_recb8_aux2 (b8h b) (ex_to_recex (b8h b))));
- ncases b in K; #e1; #e2; #K; napply K;
-nqed.
-*)
-
-ndefinition b8_to_recb8 : Πb.rec_byte8 b ≝
-λb.match b with
- [ mk_comp_num h l ⇒ b8_to_recb8_aux3 h l (b8_to_recb8_aux2 h (ex_to_recex h)) ].
-
-(* ottali → esadecimali *)
-ndefinition b8_of_bit ≝
-λn.match n with
- [ t00 ⇒ 〈x0,x0〉 | t01 ⇒ 〈x0,x1〉 | t02 ⇒ 〈x0,x2〉 | t03 ⇒ 〈x0,x3〉
- | t04 ⇒ 〈x0,x4〉 | t05 ⇒ 〈x0,x5〉 | t06 ⇒ 〈x0,x6〉 | t07 ⇒ 〈x0,x7〉
- | t08 ⇒ 〈x0,x8〉 | t09 ⇒ 〈x0,x9〉 | t0A ⇒ 〈x0,xA〉 | t0B ⇒ 〈x0,xB〉
- | t0C ⇒ 〈x0,xC〉 | t0D ⇒ 〈x0,xD〉 | t0E ⇒ 〈x0,xE〉 | t0F ⇒ 〈x0,xF〉
- | t10 ⇒ 〈x1,x0〉 | t11 ⇒ 〈x1,x1〉 | t12 ⇒ 〈x1,x2〉 | t13 ⇒ 〈x1,x3〉
- | t14 ⇒ 〈x1,x4〉 | t15 ⇒ 〈x1,x5〉 | t16 ⇒ 〈x1,x6〉 | t17 ⇒ 〈x1,x7〉
- | t18 ⇒ 〈x1,x8〉 | t19 ⇒ 〈x1,x9〉 | t1A ⇒ 〈x1,xA〉 | t1B ⇒ 〈x1,xB〉
- | t1C ⇒ 〈x1,xC〉 | t1D ⇒ 〈x1,xD〉 | t1E ⇒ 〈x1,xE〉 | t1F ⇒ 〈x1,xF〉
- ].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/comp.ma".
-include "common/prod.ma".
-
-alias symbol "hint_decl" (instance 1) = "hint_decl_Type1".
-
-nrecord comparable_ext : Type[1] ≝
- {
- comp_base : comparable;
- ltc : (carr comp_base) → (carr comp_base) → bool;
- lec : (carr comp_base) → (carr comp_base) → bool;
- gtc : (carr comp_base) → (carr comp_base) → bool;
- gec : (carr comp_base) → (carr comp_base) → bool;
- andc : (carr comp_base) → (carr comp_base) → (carr comp_base);
- orc : (carr comp_base) → (carr comp_base) → (carr comp_base);
- xorc : (carr comp_base) → (carr comp_base) → (carr comp_base);
- getMSBc : (carr comp_base) → bool;
- setMSBc : (carr comp_base) → (carr comp_base);
- clrMSBc : (carr comp_base) → (carr comp_base);
- getLSBc : (carr comp_base) → bool;
- setLSBc : (carr comp_base) → (carr comp_base);
- clrLSBc : (carr comp_base) → (carr comp_base);
- rcrc : bool → (carr comp_base) → ProdT bool (carr comp_base);
- shrc : (carr comp_base) → ProdT bool (carr comp_base);
- rorc : (carr comp_base) → (carr comp_base);
- rclc : bool → (carr comp_base) → ProdT bool (carr comp_base);
- shlc : (carr comp_base) → ProdT bool (carr comp_base);
- rolc : (carr comp_base) → (carr comp_base);
- notc : (carr comp_base) → (carr comp_base);
- plusc_dc_dc : bool → (carr comp_base) → (carr comp_base) → ProdT bool (carr comp_base);
- plusc_d_dc : (carr comp_base) → (carr comp_base) → ProdT bool (carr comp_base);
- plusc_dc_d : bool → (carr comp_base) → (carr comp_base) → (carr comp_base);
- plusc_d_d : (carr comp_base) → (carr comp_base) → (carr comp_base);
- plusc_dc_c : bool → (carr comp_base) → (carr comp_base) → bool;
- plusc_d_c : (carr comp_base) → (carr comp_base) → bool;
- predc : (carr comp_base) → (carr comp_base);
- succc : (carr comp_base) → (carr comp_base);
- complc : (carr comp_base) → (carr comp_base);
- absc : (carr comp_base) → (carr comp_base);
- inrangec : (carr comp_base) → (carr comp_base) → (carr comp_base) → bool
- }.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/comp_ext.ma".
-include "num/bool_lemmas.ma".
-
-(* ******** *)
-(* COMPOSTI *)
-(* ******** *)
-
-nrecord comp_num (T:Type) : Type ≝
- {
- cnH: T;
- cnL: T
- }.
-
-(* operatore = *)
-ndefinition eq_cn ≝
-λT.λfeq:T → T → bool.
-λcn1,cn2:comp_num T.
- (feq (cnH ? cn1) (cnH ? cn2)) ⊗ (feq (cnL ? cn1) (cnL ? cn2)).
-
-nlemma cn_destruct_1 :
-∀T.∀x1,x2,y1,y2:T.
- mk_comp_num T x1 y1 = mk_comp_num T x2 y2 → x1 = x2.
- #T; #x1; #x2; #y1; #y2; #H;
- nchange with (match mk_comp_num ? x2 y2 with [ mk_comp_num a _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma cn_destruct_2 :
-∀T.∀x1,x2,y1,y2:T.
- mk_comp_num T x1 y1 = mk_comp_num T x2 y2 → y1 = y2.
- #T; #x1; #x2; #y1; #y2; #H;
- nchange with (match mk_comp_num ? x2 y2 with [ mk_comp_num _ b ⇒ y1 = b ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_eqcn :
-∀T.∀feq:T → T → bool.
- (symmetricT T bool feq) →
- (symmetricT (comp_num T) bool (eq_cn T feq)).
- #T; #feq; #H;
- #b1; nelim b1; #e1; #e2;
- #b2; nelim b2; #e3; #e4;
- nchange with (((feq e1 e3)⊗(feq e2 e4)) = ((feq e3 e1)⊗(feq e4 e2)));
- nrewrite > (H e1 e3);
- nrewrite > (H e2 e4);
- napply refl_eq.
-nqed.
-
-nlemma eqcn_to_eq :
-∀T.∀feq:T → T → bool.
- (∀x,y:T.(feq x y = true) → (x = y)) →
- (∀b1,b2:comp_num T.
- ((eq_cn T feq b1 b2 = true) → (b1 = b2))).
- #T; #feq; #H; #b1; #b2;
- nelim b1; #e1; #e2;
- nelim b2; #e3; #e4;
- nchange in ⊢ (% → ?) with (((feq e1 e3)⊗(feq e2 e4)) = true);
- #H1;
- nrewrite < (H … (andb_true_true_l … H1));
- nrewrite < (H … (andb_true_true_r … H1));
- napply refl_eq.
-nqed.
-
-nlemma eq_to_eqcn :
-∀T.∀feq:T → T → bool.
- (∀x,y:T.(x = y) → (feq x y = true)) →
- (∀b1,b2:comp_num T.
- ((b1 = b2) → (eq_cn T feq b1 b2 = true))).
- #T; #feq; #H; #b1; #b2;
- nelim b1; #e1; #e2;
- nelim b2; #e3; #e4;
- #H1;
- nrewrite < (cn_destruct_1 … H1);
- nrewrite < (cn_destruct_2 … H1);
- nchange with (((feq e1 e1)⊗(feq e2 e2)) = true);
- nrewrite > (H e1 e1 (refl_eq …));
- nrewrite > (H e2 e2 (refl_eq …));
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma decidable_cn_aux1 :
-∀T.∀e1,e2,e3,e4:T.e1 ≠ e3 → (mk_comp_num T e1 e2) ≠ (mk_comp_num T e3 e4).
- #T; #e1; #e2; #e3; #e4;
- nnormalize; #H; #H1;
- napply (H (cn_destruct_1 … H1)).
-nqed.
-
-nlemma decidable_cn_aux2 :
-∀T.∀e1,e2,e3,e4:T.e2 ≠ e4 → (mk_comp_num T e1 e2) ≠ (mk_comp_num T e3 e4).
- #T; #e1; #e2; #e3; #e4;
- nnormalize; #H; #H1;
- napply (H (cn_destruct_2 … H1)).
-nqed.
-
-nlemma decidable_cn :
-∀T.(∀x,y:T.decidable (x = y)) →
- (∀b1,b2:comp_num T.
- (decidable (b1 = b2))).
- #T; #H;
- #b1; nelim b1; #e1; #e2;
- #b2; nelim b2; #e3; #e4;
- nnormalize;
- napply (or2_elim (e1 = e3) (e1 ≠ e3) ? (H e1 e3) …);
- ##[ ##2: #H1; napply (or2_intro2 … (decidable_cn_aux1 T e1 e2 e3 e4 H1))
- ##| ##1: #H1; napply (or2_elim (e2 = e4) (e2 ≠ e4) ? (H e2 e4) …);
- ##[ ##2: #H2; napply (or2_intro2 … (decidable_cn_aux2 T e1 e2 e3 e4 H2))
- ##| ##1: #H2; nrewrite > H1; nrewrite > H2;
- napply (or2_intro1 … (refl_eq ? (mk_comp_num T e3 e4)))
- ##]
- ##]
-nqed.
-
-nlemma neqcn_to_neq :
-∀T.∀feq:T → T → bool.
- (∀x,y:T.(feq x y = false) → (x ≠ y)) →
- (∀b1,b2:comp_num T.
- ((eq_cn T feq b1 b2 = false) → (b1 ≠ b2))).
- #T; #feq; #H; #b1; #b2;
- nelim b1; #e1; #e2;
- nelim b2; #e3; #e4;
- nchange with ((((feq e1 e3) ⊗ (feq e2 e4)) = false) → ?);
- #H1;
- napply (or2_elim ((feq e1 e3) = false) ((feq e2 e4) = false) ? (andb_false2 … H1) …);
- ##[ ##1: #H2; napply (decidable_cn_aux1 … (H … H2))
- ##| ##2: #H2; napply (decidable_cn_aux2 … (H … H2))
- ##]
-nqed.
-
-nlemma cn_destruct :
-∀T.(∀x,y:T.decidable (x = y)) →
- (∀e1,e2,e3,e4:T.
- ((mk_comp_num T e1 e2) ≠ (mk_comp_num T e3 e4)) →
- ((e1 ≠ e3) ∨ (e2 ≠ e4))).
- #T; #H; #e1; #e2; #e3; #e4;
- nnormalize; #H1;
- napply (or2_elim (e1 = e3) (e1 ≠ e3) ? (H e1 e3) …);
- ##[ ##2: #H2; napply (or2_intro1 … H2)
- ##| ##1: #H2; napply (or2_elim (e2 = e4) (e2 ≠ e4) ? (H e2 e4) …);
- ##[ ##2: #H3; napply (or2_intro2 … H3)
- ##| ##1: #H3; nrewrite > H2 in H1:(%);
- nrewrite > H3;
- #H1; nelim (H1 (refl_eq …))
- ##]
- ##]
-nqed.
-
-nlemma neq_to_neqcn :
-∀T.∀feq:T → T → bool.
- (∀x,y:T.(x ≠ y) → (feq x y = false)) →
- (∀x,y:T.decidable (x = y)) →
- (∀b1,b2:comp_num T.
- ((b1 ≠ b2) → (eq_cn T feq b1 b2 = false))).
- #T; #feq; #H; #H1; #b1; #b2;
- nelim b1; #e1; #e2;
- nelim b2; #e3; #e4;
- #H2; nchange with (((feq e1 e3) ⊗ (feq e2 e4)) = false);
- napply (or2_elim (e1 ≠ e3) (e2 ≠ e4) ? (cn_destruct T H1 e1 e2 e3 e4 … H2) …);
- ##[ ##1: #H3; nrewrite > (H … H3); nnormalize; napply refl_eq
- ##| ##2: #H3; nrewrite > (H … H3);
- nrewrite > (symmetric_andbool (feq e1 e3) false);
- nnormalize; napply refl_eq
- ##]
-nqed.
-
-nlemma cn_is_comparable : comparable → comparable.
- #T; @ (comp_num T)
- (* zero *)
- ##[ napply (mk_comp_num ? (zeroc ?) (zeroc ?))
- (* forall *)
- ##| napply (λP.forallc T
- (λh.forallc T
- (λl.P (mk_comp_num ? h l))))
- (* eq *)
- ##| napply (eq_cn ? (eqc T))
- (* eqc_to_eq *)
- ##| napply (eqcn_to_eq … (eqc_to_eq T))
- (* eq_to_eqc *)
- ##| napply (eq_to_eqcn … (eq_to_eqc T))
- (* neqc_to_neq *)
- ##| napply (neqcn_to_neq … (neqc_to_neq T))
- (* neq_to_neqc *)
- ##| napply (neq_to_neqcn … (neq_to_neqc T));
- napply (decidable_c T)
- (* decidable_c *)
- ##| napply (decidable_cn … (decidable_c T))
- (* symmetric_eqc *)
- ##| napply (symmetric_eqcn … (symmetric_eqc T))
- ##]
-nqed.
-
-nlemma cn_is_comparable_ext : comparable_ext → comparable_ext.
- #T; nelim T; #c;
- #ltc; #lec; #gtc; #gec; #andc; #orc; #xorc;
- #getMSBc; #setMSBc; #clrMSBc; #getLSBc; #setLSBc; #clrLSBc;
- #rcrc; #shrc; #rorc; #rclc; #shlc; #rolc; #notc;
- #plusc_dc_dc; #plusc_d_dc; #plusc_dc_d; #plusc_d_d; #plusc_dc_c; #plusc_d_c;
- #predc; #succc; #complc; #absc; #inrangec;
- napply (mk_comparable_ext);
- ##[ napply (cn_is_comparable c)
- (* lt *)
- ##| napply (λx,y.(ltc (cnH ? x) (cnH ? y)) ⊕
- (((eqc c) (cnH ? x) (cnH ? y)) ⊗ (ltc (cnL ? x) (cnL ? y))))
- (* le *)
- ##| napply (λx,y.(ltc (cnH ? x) (cnH ? y)) ⊕
- (((eqc c) (cnH ? x) (cnH ? y)) ⊗ (lec (cnL ? x) (cnL ? y))))
- (* gt *)
- ##| napply (λx,y.(gtc (cnH ? x) (cnH ? y)) ⊕
- (((eqc c) (cnH ? x) (cnH ? y)) ⊗ (gtc (cnL ? x) (cnL ? y))))
- (* ge *)
- ##| napply (λx,y.(gtc (cnH ? x) (cnH ? y)) ⊕
- (((eqc c) (cnH ? x) (cnH ? y)) ⊗ (gec (cnL ? x) (cnL ? y))))
- (* and *)
- ##| napply (λx,y.mk_comp_num ? (andc (cnH ? x) (cnH ? y))
- (andc (cnL ? x) (cnL ? y)))
- (* or *)
- ##| napply (λx,y.mk_comp_num ? (orc (cnH ? x) (cnH ? y))
- (orc (cnL ? x) (cnL ? y)))
- (* xor *)
- ##| napply (λx,y.mk_comp_num ? (xorc (cnH ? x) (cnH ? y))
- (xorc (cnL ? x) (cnL ? y)))
- (* getMSB *)
- ##| napply (λx.getMSBc (cnH ? x))
- (* setMSB *)
- ##| napply (λx.mk_comp_num ? (setMSBc (cnH ? x)) (cnL ? x))
- (* clrMSB *)
- ##| napply (λx.mk_comp_num ? (clrMSBc (cnH ? x)) (cnL ? x))
- (* getLSB *)
- ##| napply (λx.getLSBc (cnL ? x))
- (* setLSB *)
- ##| napply (λx.mk_comp_num ? (cnH ? x) (setLSBc (cnL ? x)))
- (* clrLSB *)
- ##| napply (λx.mk_comp_num ? (cnH ? x) (clrLSBc (cnL ? x)))
- (* rcr *)
- ##| napply (λcy,x.match rcrc cy (cnH ? x) with
- [ pair cy' cnh' ⇒ match rcrc cy' (cnL ? x) with
- [ pair cy'' cnl' ⇒ pair … cy'' (mk_comp_num ? cnh' cnl')]])
- (* shr *)
- ##| napply (λx.match shrc (cnH ? x) with
- [ pair cy' cnh' ⇒ match rcrc cy' (cnL ? x) with
- [ pair cy'' cnl' ⇒ pair … cy'' (mk_comp_num ? cnh' cnl')]])
- (* ror *)
- ##| napply (λx.match shrc (cnH ? x) with
- [ pair cy' cnh' ⇒ match rcrc cy' (cnL ? x) with
- [ pair cy'' cnl' ⇒ mk_comp_num ?
- (match cy'' with [ true ⇒ setMSBc
- | false ⇒ λh.h ] cnh') cnl']])
- (* rcl *)
- ##| napply (λcy,x.match rclc cy (cnL ? x) with
- [ pair cy' cnl' ⇒ match rclc cy' (cnH ? x) with
- [ pair cy'' cnh' ⇒ pair … cy'' (mk_comp_num ? cnh' cnl')]])
- (* shl *)
- ##| napply (λx.match shlc (cnL ? x) with
- [ pair cy' cnl' ⇒ match rclc cy' (cnH ? x) with
- [ pair cy'' cnh' ⇒ pair … cy'' (mk_comp_num ? cnh' cnl')]])
- (* rol *)
- ##| napply (λx.match shlc (cnL ? x) with
- [ pair cy' cnl' ⇒ match rclc cy' (cnH ? x) with
- [ pair cy'' cnh' ⇒ mk_comp_num ?
- cnh' (match cy'' with [ true ⇒ setLSBc
- | false ⇒ λh.h ] cnl')]])
- (* not *)
- ##| napply (λx.mk_comp_num ? (notc (cnH ? x)) (notc (cnL ? x)))
- (* plus_dc_dc *)
- ##| napply (λcy,x,y.match plusc_dc_dc cy (cnL ? x) (cnL ? y) with
- [ pair cy' cnl' ⇒ match plusc_dc_dc cy' (cnH ? x) (cnH ? y) with
- [ pair cy'' cnh' ⇒ pair … cy'' (mk_comp_num ? cnh' cnl')]])
- (* plus_d_dc *)
- ##| napply (λx,y.match plusc_d_dc (cnL ? x) (cnL ? y) with
- [ pair cy' cnl' ⇒ match plusc_dc_dc cy' (cnH ? x) (cnH ? y) with
- [ pair cy'' cnh' ⇒ pair … cy'' (mk_comp_num ? cnh' cnl')]])
- (* plus_dc_d *)
- ##| napply (λcy,x,y.match plusc_dc_dc cy (cnL ? x) (cnL ? y) with
- [ pair cy' cnl' ⇒ mk_comp_num ? (plusc_dc_d cy' (cnH ? x) (cnH ? y)) cnl'])
- (* plus_d_d *)
- ##| napply (λx,y.match plusc_d_dc (cnL ? x) (cnL ? y) with
- [ pair cy' cnl' ⇒ mk_comp_num ? (plusc_dc_d cy' (cnH ? x) (cnH ? y)) cnl'])
- (* plus_dc_c *)
- ##| napply (λcy,x,y.plusc_dc_c (plusc_dc_c cy (cnL ? x) (cnL ? y))
- (cnH ? x) (cnH ? y))
- (* plus_d_c *)
- ##| napply (λx,y.plusc_dc_c (plusc_d_c (cnL ? x) (cnL ? y))
- (cnH ? x) (cnH ? y))
- (* pred *)
- ##| napply (λx.match (eqc c) (zeroc c) (cnL ? x) with
- [ true ⇒ mk_comp_num ? (predc (cnH ? x)) (predc (cnL ? x))
- | false ⇒ mk_comp_num ? (cnH ? x) (predc (cnL ? x)) ])
- (* succ *)
- ##| napply (λx.match (eqc c) (predc (zeroc c)) (cnL ? x) with
- [ true ⇒ mk_comp_num ? (succc (cnH ? x)) (succc (cnL ? x))
- | false ⇒ mk_comp_num ? (cnH ? x) (succc (cnL ? x)) ])
- (* compl *)
- ##| napply (λx.(match (eqc c) (zeroc c) (cnL ? x) with
- [ true ⇒ mk_comp_num ? (complc (cnH ? x)) (complc (cnL ? x))
- | false ⇒ mk_comp_num ? (notc (cnH ? x)) (complc (cnL ? x)) ]))
- (* abs *)
- ##| napply (λx.match getMSBc (cnH ? x) with
- [ true ⇒ match (eqc c) (zeroc c) (cnL ? x) with
- [ true ⇒ mk_comp_num ? (complc (cnH ? x)) (complc (cnL ? x))
- | false ⇒ mk_comp_num ? (notc (cnH ? x)) (complc (cnL ? x)) ]
- | false ⇒ x ])
- (* inrange *)
- ##| napply (λx,inf,sup.
- match (ltc (cnH ? inf) (cnH ? sup)) ⊕
- (((eqc c) (cnH ? inf) (cnH ? sup)) ⊗ (lec (cnL ? inf) (cnL ? sup))) with
- [ true ⇒ and_bool | false ⇒ or_bool ]
- ((ltc (cnH ? inf) (cnH ? x)) ⊕
- (((eqc c) (cnH ? inf) (cnH ? x)) ⊗ (lec (cnL ? inf) (cnL ? x))))
- ((ltc (cnH ? x) (cnH ? sup)) ⊕
- (((eqc c) (cnH ? x) (cnH ? sup)) ⊗ (lec (cnL ? x) (cnL ? sup)))))
- ##]
-nqed.
-
-ndefinition zeroc ≝ λx:comparable_ext.zeroc (comp_base x).
-ndefinition forallc ≝ λx:comparable_ext.forallc (comp_base x).
-ndefinition eqc ≝ λx:comparable_ext.eqc (comp_base x).
-ndefinition eqc_to_eq ≝ λx:comparable_ext.eqc_to_eq (comp_base x).
-ndefinition eq_to_eqc ≝ λx:comparable_ext.eq_to_eqc (comp_base x).
-ndefinition neqc_to_neq ≝ λx:comparable_ext.neqc_to_neq (comp_base x).
-ndefinition neq_to_neqc ≝ λx:comparable_ext.neq_to_neqc (comp_base x).
-ndefinition decidable_c ≝ λx:comparable_ext.decidable_c (comp_base x).
-ndefinition symmetric_eqc ≝ λx:comparable_ext.symmetric_eqc (comp_base x).
-
-
-unification hint 0 ≔ S: comparable;
- T ≟ (carr S),
- X ≟ (cn_is_comparable S)
- (*********************************************) ⊢
- carr X ≡ comp_num T.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/comp_ext.ma".
-include "num/bool_lemmas.ma".
-include "num/oct.ma".
-
-(* *********** *)
-(* ESADECIMALI *)
-(* *********** *)
-
-ninductive exadecim : Type ≝
- x0: exadecim
-| x1: exadecim
-| x2: exadecim
-| x3: exadecim
-| x4: exadecim
-| x5: exadecim
-| x6: exadecim
-| x7: exadecim
-| x8: exadecim
-| x9: exadecim
-| xA: exadecim
-| xB: exadecim
-| xC: exadecim
-| xD: exadecim
-| xE: exadecim
-| xF: exadecim.
-
-(* iteratore sugli esadecimali *)
-ndefinition forall_ex ≝ λP.
- P x0 ⊗ P x1 ⊗ P x2 ⊗ P x3 ⊗ P x4 ⊗ P x5 ⊗ P x6 ⊗ P x7 ⊗
- P x8 ⊗ P x9 ⊗ P xA ⊗ P xB ⊗ P xC ⊗ P xD ⊗ P xE ⊗ P xF.
-
-(* operatore = *)
-ndefinition eq_ex ≝
-λe1,e2:exadecim.
- match e1 with
- [ x0 ⇒ match e2 with [ x0 ⇒ true | _ ⇒ false ]
- | x1 ⇒ match e2 with [ x1 ⇒ true | _ ⇒ false ]
- | x2 ⇒ match e2 with [ x2 ⇒ true | _ ⇒ false ]
- | x3 ⇒ match e2 with [ x3 ⇒ true | _ ⇒ false ]
- | x4 ⇒ match e2 with [ x4 ⇒ true | _ ⇒ false ]
- | x5 ⇒ match e2 with [ x5 ⇒ true | _ ⇒ false ]
- | x6 ⇒ match e2 with [ x6 ⇒ true | _ ⇒ false ]
- | x7 ⇒ match e2 with [ x7 ⇒ true | _ ⇒ false ]
- | x8 ⇒ match e2 with [ x8 ⇒ true | _ ⇒ false ]
- | x9 ⇒ match e2 with [ x9 ⇒ true | _ ⇒ false ]
- | xA ⇒ match e2 with [ xA ⇒ true | _ ⇒ false ]
- | xB ⇒ match e2 with [ xB ⇒ true | _ ⇒ false ]
- | xC ⇒ match e2 with [ xC ⇒ true | _ ⇒ false ]
- | xD ⇒ match e2 with [ xD ⇒ true | _ ⇒ false ]
- | xE ⇒ match e2 with [ xE ⇒ true | _ ⇒ false ]
- | xF ⇒ match e2 with [ xF ⇒ true | _ ⇒ false ]
- ].
-
-(* operatore < *)
-ndefinition lt_ex ≝
-λe1,e2:exadecim.
- match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xA ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xB ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xC ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xD ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ true | xF ⇒ true ]
- | xE ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ true ]
- | xF ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- ].
-
-(* operatore ≤ *)
-ndefinition le_ex ≝
-λe1,e2:exadecim.
- match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xA ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xB ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xC ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xD ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xE ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ true | xF ⇒ true ]
- | xF ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ true ]
- ].
-
-(* operatore > *)
-ndefinition gt_ex ≝
-λe1,e2:exadecim.
- match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | xA ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | xB ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | xC ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | xD ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | xE ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ false | xF ⇒ false ]
- | xF ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ false ]
- ].
-
-(* operatore ≥ *)
-ndefinition ge_ex ≝
-λe1,e2:exadecim.
- match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ false | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ false | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | xA ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ false
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | xB ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | xC ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | xD ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ false | xF ⇒ false ]
- | xE ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ false ]
- | xF ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true
- | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- ].
-
-(* operatore and *)
-ndefinition and_ex ≝
-λe1,e2:exadecim.match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x0 | x2 ⇒ x0 | x3 ⇒ x0
- | x4 ⇒ x0 | x5 ⇒ x0 | x6 ⇒ x0 | x7 ⇒ x0
- | x8 ⇒ x0 | x9 ⇒ x0 | xA ⇒ x0 | xB ⇒ x0
- | xC ⇒ x0 | xD ⇒ x0 | xE ⇒ x0 | xF ⇒ x0 ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x1 | x2 ⇒ x0 | x3 ⇒ x1
- | x4 ⇒ x0 | x5 ⇒ x1 | x6 ⇒ x0 | x7 ⇒ x1
- | x8 ⇒ x0 | x9 ⇒ x1 | xA ⇒ x0 | xB ⇒ x1
- | xC ⇒ x0 | xD ⇒ x1 | xE ⇒ x0 | xF ⇒ x1 ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x0 | x2 ⇒ x2 | x3 ⇒ x2
- | x4 ⇒ x0 | x5 ⇒ x0 | x6 ⇒ x2 | x7 ⇒ x2
- | x8 ⇒ x0 | x9 ⇒ x0 | xA ⇒ x2 | xB ⇒ x2
- | xC ⇒ x0 | xD ⇒ x0 | xE ⇒ x2 | xF ⇒ x2 ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x1 | x2 ⇒ x2 | x3 ⇒ x3
- | x4 ⇒ x0 | x5 ⇒ x1 | x6 ⇒ x2 | x7 ⇒ x3
- | x8 ⇒ x0 | x9 ⇒ x1 | xA ⇒ x2 | xB ⇒ x3
- | xC ⇒ x0 | xD ⇒ x1 | xE ⇒ x2 | xF ⇒ x3 ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x0 | x2 ⇒ x0 | x3 ⇒ x0
- | x4 ⇒ x4 | x5 ⇒ x4 | x6 ⇒ x4 | x7 ⇒ x4
- | x8 ⇒ x0 | x9 ⇒ x0 | xA ⇒ x0 | xB ⇒ x0
- | xC ⇒ x4 | xD ⇒ x4 | xE ⇒ x4 | xF ⇒ x4 ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x1 | x2 ⇒ x0 | x3 ⇒ x1
- | x4 ⇒ x4 | x5 ⇒ x5 | x6 ⇒ x4 | x7 ⇒ x5
- | x8 ⇒ x0 | x9 ⇒ x1 | xA ⇒ x0 | xB ⇒ x1
- | xC ⇒ x4 | xD ⇒ x5 | xE ⇒ x4 | xF ⇒ x5 ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x0 | x2 ⇒ x2 | x3 ⇒ x2
- | x4 ⇒ x4 | x5 ⇒ x4 | x6 ⇒ x6 | x7 ⇒ x6
- | x8 ⇒ x0 | x9 ⇒ x0 | xA ⇒ x2 | xB ⇒ x2
- | xC ⇒ x4 | xD ⇒ x4 | xE ⇒ x6 | xF ⇒ x6 ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x1 | x2 ⇒ x2 | x3 ⇒ x3
- | x4 ⇒ x4 | x5 ⇒ x5 | x6 ⇒ x6 | x7 ⇒ x7
- | x8 ⇒ x0 | x9 ⇒ x1 | xA ⇒ x2 | xB ⇒ x3
- | xC ⇒ x4 | xD ⇒ x5 | xE ⇒ x6 | xF ⇒ x7 ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x0 | x2 ⇒ x0 | x3 ⇒ x0
- | x4 ⇒ x0 | x5 ⇒ x0 | x6 ⇒ x0 | x7 ⇒ x0
- | x8 ⇒ x8 | x9 ⇒ x8 | xA ⇒ x8 | xB ⇒ x8
- | xC ⇒ x8 | xD ⇒ x8 | xE ⇒ x8 | xF ⇒ x8 ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x1 | x2 ⇒ x0 | x3 ⇒ x1
- | x4 ⇒ x0 | x5 ⇒ x1 | x6 ⇒ x0 | x7 ⇒ x1
- | x8 ⇒ x8 | x9 ⇒ x9 | xA ⇒ x8 | xB ⇒ x9
- | xC ⇒ x8 | xD ⇒ x9 | xE ⇒ x8 | xF ⇒ x9 ]
- | xA ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x0 | x2 ⇒ x2 | x3 ⇒ x2
- | x4 ⇒ x0 | x5 ⇒ x0 | x6 ⇒ x2 | x7 ⇒ x2
- | x8 ⇒ x8 | x9 ⇒ x8 | xA ⇒ xA | xB ⇒ xA
- | xC ⇒ x8 | xD ⇒ x8 | xE ⇒ xA | xF ⇒ xA ]
- | xB ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x1 | x2 ⇒ x2 | x3 ⇒ x3
- | x4 ⇒ x0 | x5 ⇒ x1 | x6 ⇒ x2 | x7 ⇒ x3
- | x8 ⇒ x8 | x9 ⇒ x9 | xA ⇒ xA | xB ⇒ xB
- | xC ⇒ x8 | xD ⇒ x9 | xE ⇒ xA | xF ⇒ xB ]
- | xC ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x0 | x2 ⇒ x0 | x3 ⇒ x0
- | x4 ⇒ x4 | x5 ⇒ x4 | x6 ⇒ x4 | x7 ⇒ x4
- | x8 ⇒ x8 | x9 ⇒ x8 | xA ⇒ x8 | xB ⇒ x8
- | xC ⇒ xC | xD ⇒ xC | xE ⇒ xC | xF ⇒ xC ]
- | xD ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x1 | x2 ⇒ x0 | x3 ⇒ x1
- | x4 ⇒ x4 | x5 ⇒ x5 | x6 ⇒ x4 | x7 ⇒ x5
- | x8 ⇒ x8 | x9 ⇒ x9 | xA ⇒ x8 | xB ⇒ x9
- | xC ⇒ xC | xD ⇒ xD | xE ⇒ xC | xF ⇒ xD ]
- | xE ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x0 | x2 ⇒ x2 | x3 ⇒ x2
- | x4 ⇒ x4 | x5 ⇒ x4 | x6 ⇒ x6 | x7 ⇒ x6
- | x8 ⇒ x8 | x9 ⇒ x8 | xA ⇒ xA | xB ⇒ xA
- | xC ⇒ xC | xD ⇒ xC | xE ⇒ xE | xF ⇒ xE ]
- | xF ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x1 | x2 ⇒ x2 | x3 ⇒ x3
- | x4 ⇒ x4 | x5 ⇒ x5 | x6 ⇒ x6 | x7 ⇒ x7
- | x8 ⇒ x8 | x9 ⇒ x9 | xA ⇒ xA | xB ⇒ xB
- | xC ⇒ xC | xD ⇒ xD | xE ⇒ xE | xF ⇒ xF ]
- ].
-
-(* operatore or *)
-ndefinition or_ex ≝
-λe1,e2:exadecim.match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x1 | x2 ⇒ x2 | x3 ⇒ x3
- | x4 ⇒ x4 | x5 ⇒ x5 | x6 ⇒ x6 | x7 ⇒ x7
- | x8 ⇒ x8 | x9 ⇒ x9 | xA ⇒ xA | xB ⇒ xB
- | xC ⇒ xC | xD ⇒ xD | xE ⇒ xE | xF ⇒ xF ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ x1 | x1 ⇒ x1 | x2 ⇒ x3 | x3 ⇒ x3
- | x4 ⇒ x5 | x5 ⇒ x5 | x6 ⇒ x7 | x7 ⇒ x7
- | x8 ⇒ x9 | x9 ⇒ x9 | xA ⇒ xB | xB ⇒ xB
- | xC ⇒ xD | xD ⇒ xD | xE ⇒ xF | xF ⇒ xF ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ x2 | x1 ⇒ x3 | x2 ⇒ x2 | x3 ⇒ x3
- | x4 ⇒ x6 | x5 ⇒ x7 | x6 ⇒ x6 | x7 ⇒ x7
- | x8 ⇒ xA | x9 ⇒ xB | xA ⇒ xA | xB ⇒ xB
- | xC ⇒ xE | xD ⇒ xF | xE ⇒ xE | xF ⇒ xF ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ x3 | x1 ⇒ x3 | x2 ⇒ x3 | x3 ⇒ x3
- | x4 ⇒ x7 | x5 ⇒ x7 | x6 ⇒ x7 | x7 ⇒ x7
- | x8 ⇒ xB | x9 ⇒ xB | xA ⇒ xB | xB ⇒ xB
- | xC ⇒ xF | xD ⇒ xF | xE ⇒ xF | xF ⇒ xF ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ x4 | x1 ⇒ x5 | x2 ⇒ x6 | x3 ⇒ x7
- | x4 ⇒ x4 | x5 ⇒ x5 | x6 ⇒ x6 | x7 ⇒ x7
- | x8 ⇒ xC | x9 ⇒ xD | xA ⇒ xE | xB ⇒ xF
- | xC ⇒ xC | xD ⇒ xD | xE ⇒ xE | xF ⇒ xF ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ x5 | x1 ⇒ x5 | x2 ⇒ x7 | x3 ⇒ x7
- | x4 ⇒ x5 | x5 ⇒ x5 | x6 ⇒ x7 | x7 ⇒ x7
- | x8 ⇒ xD | x9 ⇒ xD | xA ⇒ xF | xB ⇒ xF
- | xC ⇒ xD | xD ⇒ xD | xE ⇒ xF | xF ⇒ xF ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ x6 | x1 ⇒ x7 | x2 ⇒ x6 | x3 ⇒ x7
- | x4 ⇒ x6 | x5 ⇒ x7 | x6 ⇒ x6 | x7 ⇒ x7
- | x8 ⇒ xE | x9 ⇒ xF | xA ⇒ xE | xB ⇒ xF
- | xC ⇒ xE | xD ⇒ xF | xE ⇒ xE | xF ⇒ xF ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ x7 | x1 ⇒ x7 | x2 ⇒ x7 | x3 ⇒ x7
- | x4 ⇒ x7 | x5 ⇒ x7 | x6 ⇒ x7 | x7 ⇒ x7
- | x8 ⇒ xF | x9 ⇒ xF | xA ⇒ xF | xB ⇒ xF
- | xC ⇒ xF | xD ⇒ xF | xE ⇒ xF | xF ⇒ xF ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ x8 | x1 ⇒ x9 | x2 ⇒ xA | x3 ⇒ xB
- | x4 ⇒ xC | x5 ⇒ xD | x6 ⇒ xE | x7 ⇒ xF
- | x8 ⇒ x8 | x9 ⇒ x9 | xA ⇒ xA | xB ⇒ xB
- | xC ⇒ xC | xD ⇒ xD | xE ⇒ xE | xF ⇒ xF ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ x9 | x1 ⇒ x9 | x2 ⇒ xB | x3 ⇒ xB
- | x4 ⇒ xD | x5 ⇒ xD | x6 ⇒ xF | x7 ⇒ xF
- | x8 ⇒ x9 | x9 ⇒ x9 | xA ⇒ xB | xB ⇒ xB
- | xC ⇒ xD | xD ⇒ xD | xE ⇒ xF | xF ⇒ xF ]
- | xA ⇒ match e2 with
- [ x0 ⇒ xA | x1 ⇒ xB | x2 ⇒ xA | x3 ⇒ xB
- | x4 ⇒ xE | x5 ⇒ xF | x6 ⇒ xE | x7 ⇒ xF
- | x8 ⇒ xA | x9 ⇒ xB | xA ⇒ xA | xB ⇒ xB
- | xC ⇒ xE | xD ⇒ xF | xE ⇒ xE | xF ⇒ xF ]
- | xB ⇒ match e2 with
- [ x0 ⇒ xB | x1 ⇒ xB | x2 ⇒ xB | x3 ⇒ xB
- | x4 ⇒ xF | x5 ⇒ xF | x6 ⇒ xF | x7 ⇒ xF
- | x8 ⇒ xB | x9 ⇒ xB | xA ⇒ xB | xB ⇒ xB
- | xC ⇒ xF | xD ⇒ xF | xE ⇒ xF | xF ⇒ xF ]
- | xC ⇒ match e2 with
- [ x0 ⇒ xC | x1 ⇒ xD | x2 ⇒ xE | x3 ⇒ xF
- | x4 ⇒ xC | x5 ⇒ xD | x6 ⇒ xE | x7 ⇒ xF
- | x8 ⇒ xC | x9 ⇒ xD | xA ⇒ xE | xB ⇒ xF
- | xC ⇒ xC | xD ⇒ xD | xE ⇒ xE | xF ⇒ xF ]
- | xD ⇒ match e2 with
- [ x0 ⇒ xD | x1 ⇒ xD | x2 ⇒ xF | x3 ⇒ xF
- | x4 ⇒ xD | x5 ⇒ xD | x6 ⇒ xF | x7 ⇒ xF
- | x8 ⇒ xD | x9 ⇒ xD | xA ⇒ xF | xB ⇒ xF
- | xC ⇒ xD | xD ⇒ xD | xE ⇒ xF | xF ⇒ xF ]
- | xE ⇒ match e2 with
- [ x0 ⇒ xE | x1 ⇒ xF | x2 ⇒ xE | x3 ⇒ xF
- | x4 ⇒ xE | x5 ⇒ xF | x6 ⇒ xE | x7 ⇒ xF
- | x8 ⇒ xE | x9 ⇒ xF | xA ⇒ xE | xB ⇒ xF
- | xC ⇒ xE | xD ⇒ xF | xE ⇒ xE | xF ⇒ xF ]
- | xF ⇒ match e2 with
- [ x0 ⇒ xF | x1 ⇒ xF | x2 ⇒ xF | x3 ⇒ xF
- | x4 ⇒ xF | x5 ⇒ xF | x6 ⇒ xF | x7 ⇒ xF
- | x8 ⇒ xF | x9 ⇒ xF | xA ⇒ xF | xB ⇒ xF
- | xC ⇒ xF | xD ⇒ xF | xE ⇒ xF | xF ⇒ xF ]
- ].
-
-(* operatore xor *)
-ndefinition xor_ex ≝
-λe1,e2:exadecim.match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x1 | x2 ⇒ x2 | x3 ⇒ x3
- | x4 ⇒ x4 | x5 ⇒ x5 | x6 ⇒ x6 | x7 ⇒ x7
- | x8 ⇒ x8 | x9 ⇒ x9 | xA ⇒ xA | xB ⇒ xB
- | xC ⇒ xC | xD ⇒ xD | xE ⇒ xE | xF ⇒ xF ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ x1 | x1 ⇒ x0 | x2 ⇒ x3 | x3 ⇒ x2
- | x4 ⇒ x5 | x5 ⇒ x4 | x6 ⇒ x7 | x7 ⇒ x6
- | x8 ⇒ x9 | x9 ⇒ x8 | xA ⇒ xB | xB ⇒ xA
- | xC ⇒ xD | xD ⇒ xC | xE ⇒ xF | xF ⇒ xE ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ x2 | x1 ⇒ x3 | x2 ⇒ x0 | x3 ⇒ x1
- | x4 ⇒ x6 | x5 ⇒ x7 | x6 ⇒ x4 | x7 ⇒ x5
- | x8 ⇒ xA | x9 ⇒ xB | xA ⇒ x8 | xB ⇒ x9
- | xC ⇒ xE | xD ⇒ xF | xE ⇒ xC | xF ⇒ xD ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ x3 | x1 ⇒ x2 | x2 ⇒ x1 | x3 ⇒ x0
- | x4 ⇒ x7 | x5 ⇒ x6 | x6 ⇒ x5 | x7 ⇒ x4
- | x8 ⇒ xB | x9 ⇒ xA | xA ⇒ x9 | xB ⇒ x8
- | xC ⇒ xF | xD ⇒ xE | xE ⇒ xD | xF ⇒ xC ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ x4 | x1 ⇒ x5 | x2 ⇒ x6 | x3 ⇒ x7
- | x4 ⇒ x0 | x5 ⇒ x1 | x6 ⇒ x2 | x7 ⇒ x3
- | x8 ⇒ xC | x9 ⇒ xD | xA ⇒ xE | xB ⇒ xF
- | xC ⇒ x8 | xD ⇒ x9 | xE ⇒ xA | xF ⇒ xB ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ x5 | x1 ⇒ x4 | x2 ⇒ x7 | x3 ⇒ x6
- | x4 ⇒ x1 | x5 ⇒ x0 | x6 ⇒ x3 | x7 ⇒ x2
- | x8 ⇒ xD | x9 ⇒ xC | xA ⇒ xF | xB ⇒ xE
- | xC ⇒ x9 | xD ⇒ x8 | xE ⇒ xB | xF ⇒ xA ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ x6 | x1 ⇒ x7 | x2 ⇒ x4 | x3 ⇒ x5
- | x4 ⇒ x2 | x5 ⇒ x3 | x6 ⇒ x0 | x7 ⇒ x1
- | x8 ⇒ xE | x9 ⇒ xF | xA ⇒ xC | xB ⇒ xD
- | xC ⇒ xA | xD ⇒ xB | xE ⇒ x8 | xF ⇒ x9 ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ x7 | x1 ⇒ x6 | x2 ⇒ x5 | x3 ⇒ x4
- | x4 ⇒ x3 | x5 ⇒ x2 | x6 ⇒ x1 | x7 ⇒ x0
- | x8 ⇒ xF | x9 ⇒ xE | xA ⇒ xD | xB ⇒ xC
- | xC ⇒ xB | xD ⇒ xA | xE ⇒ x9 | xF ⇒ x8 ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ x8 | x1 ⇒ x9 | x2 ⇒ xA | x3 ⇒ xB
- | x4 ⇒ xC | x5 ⇒ xD | x6 ⇒ xE | x7 ⇒ xF
- | x8 ⇒ x0 | x9 ⇒ x1 | xA ⇒ x2 | xB ⇒ x3
- | xC ⇒ x4 | xD ⇒ x5 | xE ⇒ x6 | xF ⇒ x7 ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ x9 | x1 ⇒ x8 | x2 ⇒ xB | x3 ⇒ xA
- | x4 ⇒ xD | x5 ⇒ xC | x6 ⇒ xF | x7 ⇒ xE
- | x8 ⇒ x1 | x9 ⇒ x0 | xA ⇒ x3 | xB ⇒ x2
- | xC ⇒ x5 | xD ⇒ x4 | xE ⇒ x7 | xF ⇒ x6 ]
- | xA ⇒ match e2 with
- [ x0 ⇒ xA | x1 ⇒ xB | x2 ⇒ x8 | x3 ⇒ x9
- | x4 ⇒ xE | x5 ⇒ xF | x6 ⇒ xC | x7 ⇒ xD
- | x8 ⇒ x2 | x9 ⇒ x3 | xA ⇒ x0 | xB ⇒ x1
- | xC ⇒ x6 | xD ⇒ x7 | xE ⇒ x4 | xF ⇒ x5 ]
- | xB ⇒ match e2 with
- [ x0 ⇒ xB | x1 ⇒ xA | x2 ⇒ x9 | x3 ⇒ x8
- | x4 ⇒ xF | x5 ⇒ xE | x6 ⇒ xD | x7 ⇒ xC
- | x8 ⇒ x3 | x9 ⇒ x2 | xA ⇒ x1 | xB ⇒ x0
- | xC ⇒ x7 | xD ⇒ x6 | xE ⇒ x5 | xF ⇒ x4 ]
- | xC ⇒ match e2 with
- [ x0 ⇒ xC | x1 ⇒ xD | x2 ⇒ xE | x3 ⇒ xF
- | x4 ⇒ x8 | x5 ⇒ x9 | x6 ⇒ xA | x7 ⇒ xB
- | x8 ⇒ x4 | x9 ⇒ x5 | xA ⇒ x6 | xB ⇒ x7
- | xC ⇒ x0 | xD ⇒ x1 | xE ⇒ x2 | xF ⇒ x3 ]
- | xD ⇒ match e2 with
- [ x0 ⇒ xD | x1 ⇒ xC | x2 ⇒ xF | x3 ⇒ xE
- | x4 ⇒ x9 | x5 ⇒ x8 | x6 ⇒ xB | x7 ⇒ xA
- | x8 ⇒ x5 | x9 ⇒ x4 | xA ⇒ x7 | xB ⇒ x6
- | xC ⇒ x1 | xD ⇒ x0 | xE ⇒ x3 | xF ⇒ x2 ]
- | xE ⇒ match e2 with
- [ x0 ⇒ xE | x1 ⇒ xF | x2 ⇒ xC | x3 ⇒ xD
- | x4 ⇒ xA | x5 ⇒ xB | x6 ⇒ x8 | x7 ⇒ x9
- | x8 ⇒ x6 | x9 ⇒ x7 | xA ⇒ x4 | xB ⇒ x5
- | xC ⇒ x2 | xD ⇒ x3 | xE ⇒ x0 | xF ⇒ x1 ]
- | xF ⇒ match e2 with
- [ x0 ⇒ xF | x1 ⇒ xE | x2 ⇒ xD | x3 ⇒ xC
- | x4 ⇒ xB | x5 ⇒ xA | x6 ⇒ x9 | x7 ⇒ x8
- | x8 ⇒ x7 | x9 ⇒ x6 | xA ⇒ x5 | xB ⇒ x4
- | xC ⇒ x3 | xD ⇒ x2 | xE ⇒ x1 | xF ⇒ x0 ]
- ].
-
-(* operatore Most Significant Bit *)
-ndefinition getMSB_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false
- | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true
- | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ].
-
-ndefinition setMSB_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ x8 | x1 ⇒ x9 | x2 ⇒ xA | x3 ⇒ xB
- | x4 ⇒ xC | x5 ⇒ xD | x6 ⇒ xE | x7 ⇒ xF
- | x8 ⇒ x8 | x9 ⇒ x9 | xA ⇒ xA | xB ⇒ xB
- | xC ⇒ xC | xD ⇒ xD | xE ⇒ xE | xF ⇒ xF ].
-
-ndefinition clrMSB_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ x0 | x1 ⇒ x1 | x2 ⇒ x2 | x3 ⇒ x3
- | x4 ⇒ x4 | x5 ⇒ x5 | x6 ⇒ x6 | x7 ⇒ x7
- | x8 ⇒ x0 | x9 ⇒ x1 | xA ⇒ x2 | xB ⇒ x3
- | xC ⇒ x4 | xD ⇒ x5 | xE ⇒ x6 | xF ⇒ x7 ].
-
-(* operatore Least Significant Bit *)
-ndefinition getLSB_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ false | x1 ⇒ true | x2 ⇒ false | x3 ⇒ true
- | x4 ⇒ false | x5 ⇒ true | x6 ⇒ false | x7 ⇒ true
- | x8 ⇒ false | x9 ⇒ true | xA ⇒ false | xB ⇒ true
- | xC ⇒ false | xD ⇒ true | xE ⇒ false | xF ⇒ true ].
-
-ndefinition setLSB_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ x1 | x1 ⇒ x1 | x2 ⇒ x3 | x3 ⇒ x3
- | x4 ⇒ x5 | x5 ⇒ x5 | x6 ⇒ x7 | x7 ⇒ x7
- | x8 ⇒ x9 | x9 ⇒ x9 | xA ⇒ xB | xB ⇒ xB
- | xC ⇒ xD | xD ⇒ xD | xE ⇒ xF | xF ⇒ xF ].
-
-ndefinition clrLSB_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ x0 | x1 ⇒ x0 | x2 ⇒ x2 | x3 ⇒ x2
- | x4 ⇒ x4 | x5 ⇒ x4 | x6 ⇒ x6 | x7 ⇒ x6
- | x8 ⇒ x8 | x9 ⇒ x8 | xA ⇒ xA | xB ⇒ xA
- | xC ⇒ xC | xD ⇒ xC | xE ⇒ xE | xF ⇒ xE ].
-
-(* operatore rotazione destra con carry *)
-ndefinition rcr_ex ≝
-λc:bool.λe:exadecim.match c with
- [ true ⇒ match e with
- [ x0 ⇒ pair … false x8 | x1 ⇒ pair … true x8
- | x2 ⇒ pair … false x9 | x3 ⇒ pair … true x9
- | x4 ⇒ pair … false xA | x5 ⇒ pair … true xA
- | x6 ⇒ pair … false xB | x7 ⇒ pair … true xB
- | x8 ⇒ pair … false xC | x9 ⇒ pair … true xC
- | xA ⇒ pair … false xD | xB ⇒ pair … true xD
- | xC ⇒ pair … false xE | xD ⇒ pair … true xE
- | xE ⇒ pair … false xF | xF ⇒ pair … true xF ]
- | false ⇒ match e with
- [ x0 ⇒ pair … false x0 | x1 ⇒ pair … true x0
- | x2 ⇒ pair … false x1 | x3 ⇒ pair … true x1
- | x4 ⇒ pair … false x2 | x5 ⇒ pair … true x2
- | x6 ⇒ pair … false x3 | x7 ⇒ pair … true x3
- | x8 ⇒ pair … false x4 | x9 ⇒ pair … true x4
- | xA ⇒ pair … false x5 | xB ⇒ pair … true x5
- | xC ⇒ pair … false x6 | xD ⇒ pair … true x6
- | xE ⇒ pair … false x7 | xF ⇒ pair … true x7 ]
- ].
-
-(* operatore shift destro *)
-ndefinition shr_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ pair … false x0 | x1 ⇒ pair … true x0
- | x2 ⇒ pair … false x1 | x3 ⇒ pair … true x1
- | x4 ⇒ pair … false x2 | x5 ⇒ pair … true x2
- | x6 ⇒ pair … false x3 | x7 ⇒ pair … true x3
- | x8 ⇒ pair … false x4 | x9 ⇒ pair … true x4
- | xA ⇒ pair … false x5 | xB ⇒ pair … true x5
- | xC ⇒ pair … false x6 | xD ⇒ pair … true x6
- | xE ⇒ pair … false x7 | xF ⇒ pair … true x7 ].
-
-(* operatore rotazione destra *)
-ndefinition ror_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ x0 | x1 ⇒ x8 | x2 ⇒ x1 | x3 ⇒ x9
- | x4 ⇒ x2 | x5 ⇒ xA | x6 ⇒ x3 | x7 ⇒ xB
- | x8 ⇒ x4 | x9 ⇒ xC | xA ⇒ x5 | xB ⇒ xD
- | xC ⇒ x6 | xD ⇒ xE | xE ⇒ x7 | xF ⇒ xF ].
-
-(* operatore rotazione sinistra con carry *)
-ndefinition rcl_ex ≝
-λc:bool.λe:exadecim.match c with
- [ true ⇒ match e with
- [ x0 ⇒ pair … false x1 | x1 ⇒ pair … false x3
- | x2 ⇒ pair … false x5 | x3 ⇒ pair … false x7
- | x4 ⇒ pair … false x9 | x5 ⇒ pair … false xB
- | x6 ⇒ pair … false xD | x7 ⇒ pair … false xF
- | x8 ⇒ pair … true x1 | x9 ⇒ pair … true x3
- | xA ⇒ pair … true x5 | xB ⇒ pair … true x7
- | xC ⇒ pair … true x9 | xD ⇒ pair … true xB
- | xE ⇒ pair … true xD | xF ⇒ pair … true xF ]
- | false ⇒ match e with
- [ x0 ⇒ pair … false x0 | x1 ⇒ pair … false x2
- | x2 ⇒ pair … false x4 | x3 ⇒ pair … false x6
- | x4 ⇒ pair … false x8 | x5 ⇒ pair … false xA
- | x6 ⇒ pair … false xC | x7 ⇒ pair … false xE
- | x8 ⇒ pair … true x0 | x9 ⇒ pair … true x2
- | xA ⇒ pair … true x4 | xB ⇒ pair … true x6
- | xC ⇒ pair … true x8 | xD ⇒ pair … true xA
- | xE ⇒ pair … true xC | xF ⇒ pair … true xE ]
- ].
-
-(* operatore shift sinistro *)
-ndefinition shl_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ pair … false x0 | x1 ⇒ pair … false x2
- | x2 ⇒ pair … false x4 | x3 ⇒ pair … false x6
- | x4 ⇒ pair … false x8 | x5 ⇒ pair … false xA
- | x6 ⇒ pair … false xC | x7 ⇒ pair … false xE
- | x8 ⇒ pair … true x0 | x9 ⇒ pair … true x2
- | xA ⇒ pair … true x4 | xB ⇒ pair … true x6
- | xC ⇒ pair … true x8 | xD ⇒ pair … true xA
- | xE ⇒ pair … true xC | xF ⇒ pair … true xE ].
-
-(* operatore rotazione sinistra *)
-ndefinition rol_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ x0 | x1 ⇒ x2 | x2 ⇒ x4 | x3 ⇒ x6
- | x4 ⇒ x8 | x5 ⇒ xA | x6 ⇒ xC | x7 ⇒ xE
- | x8 ⇒ x1 | x9 ⇒ x3 | xA ⇒ x5 | xB ⇒ x7
- | xC ⇒ x9 | xD ⇒ xB | xE ⇒ xD | xF ⇒ xF ].
-
-(* operatore not/complemento a 1 *)
-ndefinition not_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ xF | x1 ⇒ xE | x2 ⇒ xD | x3 ⇒ xC
- | x4 ⇒ xB | x5 ⇒ xA | x6 ⇒ x9 | x7 ⇒ x8
- | x8 ⇒ x7 | x9 ⇒ x6 | xA ⇒ x5 | xB ⇒ x4
- | xC ⇒ x3 | xD ⇒ x2 | xE ⇒ x1 | xF ⇒ x0 ].
-
-(* operatore somma con data+carry → data+carry *)
-ndefinition plus_ex_dc_dc ≝
-λc:bool.λe1,e2:exadecim.
- match c with
- [ true ⇒ match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ pair … false x1 | x1 ⇒ pair … false x2 | x2 ⇒ pair … false x3 | x3 ⇒ pair … false x4
- | x4 ⇒ pair … false x5 | x5 ⇒ pair … false x6 | x6 ⇒ pair … false x7 | x7 ⇒ pair … false x8
- | x8 ⇒ pair … false x9 | x9 ⇒ pair … false xA | xA ⇒ pair … false xB | xB ⇒ pair … false xC
- | xC ⇒ pair … false xD | xD ⇒ pair … false xE | xE ⇒ pair … false xF | xF ⇒ pair … true x0 ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ pair … false x2 | x1 ⇒ pair … false x3 | x2 ⇒ pair … false x4 | x3 ⇒ pair … false x5
- | x4 ⇒ pair … false x6 | x5 ⇒ pair … false x7 | x6 ⇒ pair … false x8 | x7 ⇒ pair … false x9
- | x8 ⇒ pair … false xA | x9 ⇒ pair … false xB | xA ⇒ pair … false xC | xB ⇒ pair … false xD
- | xC ⇒ pair … false xE | xD ⇒ pair … false xF | xE ⇒ pair … true x0 | xF ⇒ pair … true x1 ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ pair … false x3 | x1 ⇒ pair … false x4 | x2 ⇒ pair … false x5 | x3 ⇒ pair … false x6
- | x4 ⇒ pair … false x7 | x5 ⇒ pair … false x8 | x6 ⇒ pair … false x9 | x7 ⇒ pair … false xA
- | x8 ⇒ pair … false xB | x9 ⇒ pair … false xC | xA ⇒ pair … false xD | xB ⇒ pair … false xE
- | xC ⇒ pair … false xF | xD ⇒ pair … true x0 | xE ⇒ pair … true x1 | xF ⇒ pair … true x2 ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ pair … false x4 | x1 ⇒ pair … false x5 | x2 ⇒ pair … false x6 | x3 ⇒ pair … false x7
- | x4 ⇒ pair … false x8 | x5 ⇒ pair … false x9 | x6 ⇒ pair … false xA | x7 ⇒ pair … false xB
- | x8 ⇒ pair … false xC | x9 ⇒ pair … false xD | xA ⇒ pair … false xE | xB ⇒ pair … false xF
- | xC ⇒ pair … true x0 | xD ⇒ pair … true x1 | xE ⇒ pair … true x2 | xF ⇒ pair … true x3 ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ pair … false x5 | x1 ⇒ pair … false x6 | x2 ⇒ pair … false x7 | x3 ⇒ pair … false x8
- | x4 ⇒ pair … false x9 | x5 ⇒ pair … false xA | x6 ⇒ pair … false xB | x7 ⇒ pair … false xC
- | x8 ⇒ pair … false xD | x9 ⇒ pair … false xE | xA ⇒ pair … false xF | xB ⇒ pair … true x0
- | xC ⇒ pair … true x1 | xD ⇒ pair … true x2 | xE ⇒ pair … true x3 | xF ⇒ pair … true x4 ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ pair … false x6 | x1 ⇒ pair … false x7 | x2 ⇒ pair … false x8 | x3 ⇒ pair … false x9
- | x4 ⇒ pair … false xA | x5 ⇒ pair … false xB | x6 ⇒ pair … false xC | x7 ⇒ pair … false xD
- | x8 ⇒ pair … false xE | x9 ⇒ pair … false xF | xA ⇒ pair … true x0 | xB ⇒ pair … true x1
- | xC ⇒ pair … true x2 | xD ⇒ pair … true x3 | xE ⇒ pair … true x4 | xF ⇒ pair … true x5 ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ pair … false x7 | x1 ⇒ pair … false x8 | x2 ⇒ pair … false x9 | x3 ⇒ pair … false xA
- | x4 ⇒ pair … false xB | x5 ⇒ pair … false xC | x6 ⇒ pair … false xD | x7 ⇒ pair … false xE
- | x8 ⇒ pair … false xF | x9 ⇒ pair … true x0 | xA ⇒ pair … true x1 | xB ⇒ pair … true x2
- | xC ⇒ pair … true x3 | xD ⇒ pair … true x4 | xE ⇒ pair … true x5 | xF ⇒ pair … true x6 ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ pair … false x8 | x1 ⇒ pair … false x9 | x2 ⇒ pair … false xA | x3 ⇒ pair … false xB
- | x4 ⇒ pair … false xC | x5 ⇒ pair … false xD | x6 ⇒ pair … false xE | x7 ⇒ pair … false xF
- | x8 ⇒ pair … true x0 | x9 ⇒ pair … true x1 | xA ⇒ pair … true x2 | xB ⇒ pair … true x3
- | xC ⇒ pair … true x4 | xD ⇒ pair … true x5 | xE ⇒ pair … true x6 | xF ⇒ pair … true x7 ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ pair … false x9 | x1 ⇒ pair … false xA | x2 ⇒ pair … false xB | x3 ⇒ pair … false xC
- | x4 ⇒ pair … false xD | x5 ⇒ pair … false xE | x6 ⇒ pair … false xF | x7 ⇒ pair … true x0
- | x8 ⇒ pair … true x1 | x9 ⇒ pair … true x2 | xA ⇒ pair … true x3 | xB ⇒ pair … true x4
- | xC ⇒ pair … true x5 | xD ⇒ pair … true x6 | xE ⇒ pair … true x7 | xF ⇒ pair … true x8 ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ pair … false xA | x1 ⇒ pair … false xB | x2 ⇒ pair … false xC | x3 ⇒ pair … false xD
- | x4 ⇒ pair … false xE | x5 ⇒ pair … false xF | x6 ⇒ pair … true x0 | x7 ⇒ pair … true x1
- | x8 ⇒ pair … true x2 | x9 ⇒ pair … true x3 | xA ⇒ pair … true x4 | xB ⇒ pair … true x5
- | xC ⇒ pair … true x6 | xD ⇒ pair … true x7 | xE ⇒ pair … true x8 | xF ⇒ pair … true x9 ]
- | xA ⇒ match e2 with
- [ x0 ⇒ pair … false xB | x1 ⇒ pair … false xC | x2 ⇒ pair … false xD | x3 ⇒ pair … false xE
- | x4 ⇒ pair … false xF | x5 ⇒ pair … true x0 | x6 ⇒ pair … true x1 | x7 ⇒ pair … true x2
- | x8 ⇒ pair … true x3 | x9 ⇒ pair … true x4 | xA ⇒ pair … true x5 | xB ⇒ pair … true x6
- | xC ⇒ pair … true x7 | xD ⇒ pair … true x8 | xE ⇒ pair … true x9 | xF ⇒ pair … true xA ]
- | xB ⇒ match e2 with
- [ x0 ⇒ pair … false xC | x1 ⇒ pair … false xD | x2 ⇒ pair … false xE | x3 ⇒ pair … false xF
- | x4 ⇒ pair … true x0 | x5 ⇒ pair … true x1 | x6 ⇒ pair … true x2 | x7 ⇒ pair … true x3
- | x8 ⇒ pair … true x4 | x9 ⇒ pair … true x5 | xA ⇒ pair … true x6 | xB ⇒ pair … true x7
- | xC ⇒ pair … true x8 | xD ⇒ pair … true x9 | xE ⇒ pair … true xA | xF ⇒ pair … true xB ]
- | xC ⇒ match e2 with
- [ x0 ⇒ pair … false xD | x1 ⇒ pair … false xE | x2 ⇒ pair … false xF | x3 ⇒ pair … true x0
- | x4 ⇒ pair … true x1 | x5 ⇒ pair … true x2 | x6 ⇒ pair … true x3 | x7 ⇒ pair … true x4
- | x8 ⇒ pair … true x5 | x9 ⇒ pair … true x6 | xA ⇒ pair … true x7 | xB ⇒ pair … true x8
- | xC ⇒ pair … true x9 | xD ⇒ pair … true xA | xE ⇒ pair … true xB | xF ⇒ pair … true xC ]
- | xD ⇒ match e2 with
- [ x0 ⇒ pair … false xE | x1 ⇒ pair … false xF | x2 ⇒ pair … true x0 | x3 ⇒ pair … true x1
- | x4 ⇒ pair … true x2 | x5 ⇒ pair … true x3 | x6 ⇒ pair … true x4 | x7 ⇒ pair … true x5
- | x8 ⇒ pair … true x6 | x9 ⇒ pair … true x7 | xA ⇒ pair … true x8 | xB ⇒ pair … true x9
- | xC ⇒ pair … true xA | xD ⇒ pair … true xB | xE ⇒ pair … true xC | xF ⇒ pair … true xD ]
- | xE ⇒ match e2 with
- [ x0 ⇒ pair … false xF | x1 ⇒ pair … true x0 | x2 ⇒ pair … true x1 | x3 ⇒ pair … true x2
- | x4 ⇒ pair … true x3 | x5 ⇒ pair … true x4 | x6 ⇒ pair … true x5 | x7 ⇒ pair … true x6
- | x8 ⇒ pair … true x7 | x9 ⇒ pair … true x8 | xA ⇒ pair … true x9 | xB ⇒ pair … true xA
- | xC ⇒ pair … true xB | xD ⇒ pair … true xC | xE ⇒ pair … true xD | xF ⇒ pair … true xE ]
- | xF ⇒ match e2 with
- [ x0 ⇒ pair … true x0 | x1 ⇒ pair … true x1 | x2 ⇒ pair … true x2 | x3 ⇒ pair … true x3
- | x4 ⇒ pair … true x4 | x5 ⇒ pair … true x5 | x6 ⇒ pair … true x6 | x7 ⇒ pair … true x7
- | x8 ⇒ pair … true x8 | x9 ⇒ pair … true x9 | xA ⇒ pair … true xA | xB ⇒ pair … true xB
- | xC ⇒ pair … true xC | xD ⇒ pair … true xD | xE ⇒ pair … true xE | xF ⇒ pair … true xF ]
- ]
- | false ⇒ match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ pair … false x0 | x1 ⇒ pair … false x1 | x2 ⇒ pair … false x2 | x3 ⇒ pair … false x3
- | x4 ⇒ pair … false x4 | x5 ⇒ pair … false x5 | x6 ⇒ pair … false x6 | x7 ⇒ pair … false x7
- | x8 ⇒ pair … false x8 | x9 ⇒ pair … false x9 | xA ⇒ pair … false xA | xB ⇒ pair … false xB
- | xC ⇒ pair … false xC | xD ⇒ pair … false xD | xE ⇒ pair … false xE | xF ⇒ pair … false xF ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ pair … false x1 | x1 ⇒ pair … false x2 | x2 ⇒ pair … false x3 | x3 ⇒ pair … false x4
- | x4 ⇒ pair … false x5 | x5 ⇒ pair … false x6 | x6 ⇒ pair … false x7 | x7 ⇒ pair … false x8
- | x8 ⇒ pair … false x9 | x9 ⇒ pair … false xA | xA ⇒ pair … false xB | xB ⇒ pair … false xC
- | xC ⇒ pair … false xD | xD ⇒ pair … false xE | xE ⇒ pair … false xF | xF ⇒ pair … true x0 ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ pair … false x2 | x1 ⇒ pair … false x3 | x2 ⇒ pair … false x4 | x3 ⇒ pair … false x5
- | x4 ⇒ pair … false x6 | x5 ⇒ pair … false x7 | x6 ⇒ pair … false x8 | x7 ⇒ pair … false x9
- | x8 ⇒ pair … false xA | x9 ⇒ pair … false xB | xA ⇒ pair … false xC | xB ⇒ pair … false xD
- | xC ⇒ pair … false xE | xD ⇒ pair … false xF | xE ⇒ pair … true x0 | xF ⇒ pair … true x1 ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ pair … false x3 | x1 ⇒ pair … false x4 | x2 ⇒ pair … false x5 | x3 ⇒ pair … false x6
- | x4 ⇒ pair … false x7 | x5 ⇒ pair … false x8 | x6 ⇒ pair … false x9 | x7 ⇒ pair … false xA
- | x8 ⇒ pair … false xB | x9 ⇒ pair … false xC | xA ⇒ pair … false xD | xB ⇒ pair … false xE
- | xC ⇒ pair … false xF | xD ⇒ pair … true x0 | xE ⇒ pair … true x1 | xF ⇒ pair … true x2 ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ pair … false x4 | x1 ⇒ pair … false x5 | x2 ⇒ pair … false x6 | x3 ⇒ pair … false x7
- | x4 ⇒ pair … false x8 | x5 ⇒ pair … false x9 | x6 ⇒ pair … false xA | x7 ⇒ pair … false xB
- | x8 ⇒ pair … false xC | x9 ⇒ pair … false xD | xA ⇒ pair … false xE | xB ⇒ pair … false xF
- | xC ⇒ pair … true x0 | xD ⇒ pair … true x1 | xE ⇒ pair … true x2 | xF ⇒ pair … true x3 ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ pair … false x5 | x1 ⇒ pair … false x6 | x2 ⇒ pair … false x7 | x3 ⇒ pair … false x8
- | x4 ⇒ pair … false x9 | x5 ⇒ pair … false xA | x6 ⇒ pair … false xB | x7 ⇒ pair … false xC
- | x8 ⇒ pair … false xD | x9 ⇒ pair … false xE | xA ⇒ pair … false xF | xB ⇒ pair … true x0
- | xC ⇒ pair … true x1 | xD ⇒ pair … true x2 | xE ⇒ pair … true x3 | xF ⇒ pair … true x4 ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ pair … false x6 | x1 ⇒ pair … false x7 | x2 ⇒ pair … false x8 | x3 ⇒ pair … false x9
- | x4 ⇒ pair … false xA | x5 ⇒ pair … false xB | x6 ⇒ pair … false xC | x7 ⇒ pair … false xD
- | x8 ⇒ pair … false xE | x9 ⇒ pair … false xF | xA ⇒ pair … true x0 | xB ⇒ pair … true x1
- | xC ⇒ pair … true x2 | xD ⇒ pair … true x3 | xE ⇒ pair … true x4 | xF ⇒ pair … true x5 ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ pair … false x7 | x1 ⇒ pair … false x8 | x2 ⇒ pair … false x9 | x3 ⇒ pair … false xA
- | x4 ⇒ pair … false xB | x5 ⇒ pair … false xC | x6 ⇒ pair … false xD | x7 ⇒ pair … false xE
- | x8 ⇒ pair … false xF | x9 ⇒ pair … true x0 | xA ⇒ pair … true x1 | xB ⇒ pair … true x2
- | xC ⇒ pair … true x3 | xD ⇒ pair … true x4 | xE ⇒ pair … true x5 | xF ⇒ pair … true x6 ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ pair … false x8 | x1 ⇒ pair … false x9 | x2 ⇒ pair … false xA | x3 ⇒ pair … false xB
- | x4 ⇒ pair … false xC | x5 ⇒ pair … false xD | x6 ⇒ pair … false xE | x7 ⇒ pair … false xF
- | x8 ⇒ pair … true x0 | x9 ⇒ pair … true x1 | xA ⇒ pair … true x2 | xB ⇒ pair … true x3
- | xC ⇒ pair … true x4 | xD ⇒ pair … true x5 | xE ⇒ pair … true x6 | xF ⇒ pair … true x7 ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ pair … false x9 | x1 ⇒ pair … false xA | x2 ⇒ pair … false xB | x3 ⇒ pair … false xC
- | x4 ⇒ pair … false xD | x5 ⇒ pair … false xE | x6 ⇒ pair … false xF | x7 ⇒ pair … true x0
- | x8 ⇒ pair … true x1 | x9 ⇒ pair … true x2 | xA ⇒ pair … true x3 | xB ⇒ pair … true x4
- | xC ⇒ pair … true x5 | xD ⇒ pair … true x6 | xE ⇒ pair … true x7 | xF ⇒ pair … true x8 ]
- | xA ⇒ match e2 with
- [ x0 ⇒ pair … false xA | x1 ⇒ pair … false xB | x2 ⇒ pair … false xC | x3 ⇒ pair … false xD
- | x4 ⇒ pair … false xE | x5 ⇒ pair … false xF | x6 ⇒ pair … true x0 | x7 ⇒ pair … true x1
- | x8 ⇒ pair … true x2 | x9 ⇒ pair … true x3 | xA ⇒ pair … true x4 | xB ⇒ pair … true x5
- | xC ⇒ pair … true x6 | xD ⇒ pair … true x7 | xE ⇒ pair … true x8 | xF ⇒ pair … true x9 ]
- | xB ⇒ match e2 with
- [ x0 ⇒ pair … false xB | x1 ⇒ pair … false xC | x2 ⇒ pair … false xD | x3 ⇒ pair … false xE
- | x4 ⇒ pair … false xF | x5 ⇒ pair … true x0 | x6 ⇒ pair … true x1 | x7 ⇒ pair … true x2
- | x8 ⇒ pair … true x3 | x9 ⇒ pair … true x4 | xA ⇒ pair … true x5 | xB ⇒ pair … true x6
- | xC ⇒ pair … true x7 | xD ⇒ pair … true x8 | xE ⇒ pair … true x9 | xF ⇒ pair … true xA ]
- | xC ⇒ match e2 with
- [ x0 ⇒ pair … false xC | x1 ⇒ pair … false xD | x2 ⇒ pair … false xE | x3 ⇒ pair … false xF
- | x4 ⇒ pair … true x0 | x5 ⇒ pair … true x1 | x6 ⇒ pair … true x2 | x7 ⇒ pair … true x3
- | x8 ⇒ pair … true x4 | x9 ⇒ pair … true x5 | xA ⇒ pair … true x6 | xB ⇒ pair … true x7
- | xC ⇒ pair … true x8 | xD ⇒ pair … true x9 | xE ⇒ pair … true xA | xF ⇒ pair … true xB ]
- | xD ⇒ match e2 with
- [ x0 ⇒ pair … false xD | x1 ⇒ pair … false xE | x2 ⇒ pair … false xF | x3 ⇒ pair … true x0
- | x4 ⇒ pair … true x1 | x5 ⇒ pair … true x2 | x6 ⇒ pair … true x3 | x7 ⇒ pair … true x4
- | x8 ⇒ pair … true x5 | x9 ⇒ pair … true x6 | xA ⇒ pair … true x7 | xB ⇒ pair … true x8
- | xC ⇒ pair … true x9 | xD ⇒ pair … true xA | xE ⇒ pair … true xB | xF ⇒ pair … true xC ]
- | xE ⇒ match e2 with
- [ x0 ⇒ pair … false xE | x1 ⇒ pair … false xF | x2 ⇒ pair … true x0 | x3 ⇒ pair … true x1
- | x4 ⇒ pair … true x2 | x5 ⇒ pair … true x3 | x6 ⇒ pair … true x4 | x7 ⇒ pair … true x5
- | x8 ⇒ pair … true x6 | x9 ⇒ pair … true x7 | xA ⇒ pair … true x8 | xB ⇒ pair … true x9
- | xC ⇒ pair … true xA | xD ⇒ pair … true xB | xE ⇒ pair … true xC | xF ⇒ pair … true xD ]
- | xF ⇒ match e2 with
- [ x0 ⇒ pair … false xF | x1 ⇒ pair … true x0 | x2 ⇒ pair … true x1 | x3 ⇒ pair … true x2
- | x4 ⇒ pair … true x3 | x5 ⇒ pair … true x4 | x6 ⇒ pair … true x5 | x7 ⇒ pair … true x6
- | x8 ⇒ pair … true x7 | x9 ⇒ pair … true x8 | xA ⇒ pair … true x9 | xB ⇒ pair … true xA
- | xC ⇒ pair … true xB | xD ⇒ pair … true xC | xE ⇒ pair … true xD | xF ⇒ pair … true xE ]
- ]].
-
-(* operatore somma con data → data+carry *)
-ndefinition plus_ex_d_dc ≝
-λe1,e2:exadecim.
- match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ pair … false x0 | x1 ⇒ pair … false x1 | x2 ⇒ pair … false x2 | x3 ⇒ pair … false x3
- | x4 ⇒ pair … false x4 | x5 ⇒ pair … false x5 | x6 ⇒ pair … false x6 | x7 ⇒ pair … false x7
- | x8 ⇒ pair … false x8 | x9 ⇒ pair … false x9 | xA ⇒ pair … false xA | xB ⇒ pair … false xB
- | xC ⇒ pair … false xC | xD ⇒ pair … false xD | xE ⇒ pair … false xE | xF ⇒ pair … false xF ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ pair … false x1 | x1 ⇒ pair … false x2 | x2 ⇒ pair … false x3 | x3 ⇒ pair … false x4
- | x4 ⇒ pair … false x5 | x5 ⇒ pair … false x6 | x6 ⇒ pair … false x7 | x7 ⇒ pair … false x8
- | x8 ⇒ pair … false x9 | x9 ⇒ pair … false xA | xA ⇒ pair … false xB | xB ⇒ pair … false xC
- | xC ⇒ pair … false xD | xD ⇒ pair … false xE | xE ⇒ pair … false xF | xF ⇒ pair … true x0 ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ pair … false x2 | x1 ⇒ pair … false x3 | x2 ⇒ pair … false x4 | x3 ⇒ pair … false x5
- | x4 ⇒ pair … false x6 | x5 ⇒ pair … false x7 | x6 ⇒ pair … false x8 | x7 ⇒ pair … false x9
- | x8 ⇒ pair … false xA | x9 ⇒ pair … false xB | xA ⇒ pair … false xC | xB ⇒ pair … false xD
- | xC ⇒ pair … false xE | xD ⇒ pair … false xF | xE ⇒ pair … true x0 | xF ⇒ pair … true x1 ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ pair … false x3 | x1 ⇒ pair … false x4 | x2 ⇒ pair … false x5 | x3 ⇒ pair … false x6
- | x4 ⇒ pair … false x7 | x5 ⇒ pair … false x8 | x6 ⇒ pair … false x9 | x7 ⇒ pair … false xA
- | x8 ⇒ pair … false xB | x9 ⇒ pair … false xC | xA ⇒ pair … false xD | xB ⇒ pair … false xE
- | xC ⇒ pair … false xF | xD ⇒ pair … true x0 | xE ⇒ pair … true x1 | xF ⇒ pair … true x2 ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ pair … false x4 | x1 ⇒ pair … false x5 | x2 ⇒ pair … false x6 | x3 ⇒ pair … false x7
- | x4 ⇒ pair … false x8 | x5 ⇒ pair … false x9 | x6 ⇒ pair … false xA | x7 ⇒ pair … false xB
- | x8 ⇒ pair … false xC | x9 ⇒ pair … false xD | xA ⇒ pair … false xE | xB ⇒ pair … false xF
- | xC ⇒ pair … true x0 | xD ⇒ pair … true x1 | xE ⇒ pair … true x2 | xF ⇒ pair … true x3 ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ pair … false x5 | x1 ⇒ pair … false x6 | x2 ⇒ pair … false x7 | x3 ⇒ pair … false x8
- | x4 ⇒ pair … false x9 | x5 ⇒ pair … false xA | x6 ⇒ pair … false xB | x7 ⇒ pair … false xC
- | x8 ⇒ pair … false xD | x9 ⇒ pair … false xE | xA ⇒ pair … false xF | xB ⇒ pair … true x0
- | xC ⇒ pair … true x1 | xD ⇒ pair … true x2 | xE ⇒ pair … true x3 | xF ⇒ pair … true x4 ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ pair … false x6 | x1 ⇒ pair … false x7 | x2 ⇒ pair … false x8 | x3 ⇒ pair … false x9
- | x4 ⇒ pair … false xA | x5 ⇒ pair … false xB | x6 ⇒ pair … false xC | x7 ⇒ pair … false xD
- | x8 ⇒ pair … false xE | x9 ⇒ pair … false xF | xA ⇒ pair … true x0 | xB ⇒ pair … true x1
- | xC ⇒ pair … true x2 | xD ⇒ pair … true x3 | xE ⇒ pair … true x4 | xF ⇒ pair … true x5 ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ pair … false x7 | x1 ⇒ pair … false x8 | x2 ⇒ pair … false x9 | x3 ⇒ pair … false xA
- | x4 ⇒ pair … false xB | x5 ⇒ pair … false xC | x6 ⇒ pair … false xD | x7 ⇒ pair … false xE
- | x8 ⇒ pair … false xF | x9 ⇒ pair … true x0 | xA ⇒ pair … true x1 | xB ⇒ pair … true x2
- | xC ⇒ pair … true x3 | xD ⇒ pair … true x4 | xE ⇒ pair … true x5 | xF ⇒ pair … true x6 ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ pair … false x8 | x1 ⇒ pair … false x9 | x2 ⇒ pair … false xA | x3 ⇒ pair … false xB
- | x4 ⇒ pair … false xC | x5 ⇒ pair … false xD | x6 ⇒ pair … false xE | x7 ⇒ pair … false xF
- | x8 ⇒ pair … true x0 | x9 ⇒ pair … true x1 | xA ⇒ pair … true x2 | xB ⇒ pair … true x3
- | xC ⇒ pair … true x4 | xD ⇒ pair … true x5 | xE ⇒ pair … true x6 | xF ⇒ pair … true x7 ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ pair … false x9 | x1 ⇒ pair … false xA | x2 ⇒ pair … false xB | x3 ⇒ pair … false xC
- | x4 ⇒ pair … false xD | x5 ⇒ pair … false xE | x6 ⇒ pair … false xF | x7 ⇒ pair … true x0
- | x8 ⇒ pair … true x1 | x9 ⇒ pair … true x2 | xA ⇒ pair … true x3 | xB ⇒ pair … true x4
- | xC ⇒ pair … true x5 | xD ⇒ pair … true x6 | xE ⇒ pair … true x7 | xF ⇒ pair … true x8 ]
- | xA ⇒ match e2 with
- [ x0 ⇒ pair … false xA | x1 ⇒ pair … false xB | x2 ⇒ pair … false xC | x3 ⇒ pair … false xD
- | x4 ⇒ pair … false xE | x5 ⇒ pair … false xF | x6 ⇒ pair … true x0 | x7 ⇒ pair … true x1
- | x8 ⇒ pair … true x2 | x9 ⇒ pair … true x3 | xA ⇒ pair … true x4 | xB ⇒ pair … true x5
- | xC ⇒ pair … true x6 | xD ⇒ pair … true x7 | xE ⇒ pair … true x8 | xF ⇒ pair … true x9 ]
- | xB ⇒ match e2 with
- [ x0 ⇒ pair … false xB | x1 ⇒ pair … false xC | x2 ⇒ pair … false xD | x3 ⇒ pair … false xE
- | x4 ⇒ pair … false xF | x5 ⇒ pair … true x0 | x6 ⇒ pair … true x1 | x7 ⇒ pair … true x2
- | x8 ⇒ pair … true x3 | x9 ⇒ pair … true x4 | xA ⇒ pair … true x5 | xB ⇒ pair … true x6
- | xC ⇒ pair … true x7 | xD ⇒ pair … true x8 | xE ⇒ pair … true x9 | xF ⇒ pair … true xA ]
- | xC ⇒ match e2 with
- [ x0 ⇒ pair … false xC | x1 ⇒ pair … false xD | x2 ⇒ pair … false xE | x3 ⇒ pair … false xF
- | x4 ⇒ pair … true x0 | x5 ⇒ pair … true x1 | x6 ⇒ pair … true x2 | x7 ⇒ pair … true x3
- | x8 ⇒ pair … true x4 | x9 ⇒ pair … true x5 | xA ⇒ pair … true x6 | xB ⇒ pair … true x7
- | xC ⇒ pair … true x8 | xD ⇒ pair … true x9 | xE ⇒ pair … true xA | xF ⇒ pair … true xB ]
- | xD ⇒ match e2 with
- [ x0 ⇒ pair … false xD | x1 ⇒ pair … false xE | x2 ⇒ pair … false xF | x3 ⇒ pair … true x0
- | x4 ⇒ pair … true x1 | x5 ⇒ pair … true x2 | x6 ⇒ pair … true x3 | x7 ⇒ pair … true x4
- | x8 ⇒ pair … true x5 | x9 ⇒ pair … true x6 | xA ⇒ pair … true x7 | xB ⇒ pair … true x8
- | xC ⇒ pair … true x9 | xD ⇒ pair … true xA | xE ⇒ pair … true xB | xF ⇒ pair … true xC ]
- | xE ⇒ match e2 with
- [ x0 ⇒ pair … false xE | x1 ⇒ pair … false xF | x2 ⇒ pair … true x0 | x3 ⇒ pair … true x1
- | x4 ⇒ pair … true x2 | x5 ⇒ pair … true x3 | x6 ⇒ pair … true x4 | x7 ⇒ pair … true x5
- | x8 ⇒ pair … true x6 | x9 ⇒ pair … true x7 | xA ⇒ pair … true x8 | xB ⇒ pair … true x9
- | xC ⇒ pair … true xA | xD ⇒ pair … true xB | xE ⇒ pair … true xC | xF ⇒ pair … true xD ]
- | xF ⇒ match e2 with
- [ x0 ⇒ pair … false xF | x1 ⇒ pair … true x0 | x2 ⇒ pair … true x1 | x3 ⇒ pair … true x2
- | x4 ⇒ pair … true x3 | x5 ⇒ pair … true x4 | x6 ⇒ pair … true x5 | x7 ⇒ pair … true x6
- | x8 ⇒ pair … true x7 | x9 ⇒ pair … true x8 | xA ⇒ pair … true x9 | xB ⇒ pair … true xA
- | xC ⇒ pair … true xB | xD ⇒ pair … true xC | xE ⇒ pair … true xD | xF ⇒ pair … true xE ]
- ].
-
-(* operatore somma con data+carry → data *)
-ndefinition plus_ex_dc_d ≝
-λc:bool.λe1,e2:exadecim.
- match c with
- [ true ⇒ match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ x1 | x1 ⇒ x2 | x2 ⇒ x3 | x3 ⇒ x4 | x4 ⇒ x5 | x5 ⇒ x6 | x6 ⇒ x7 | x7 ⇒ x8
- | x8 ⇒ x9 | x9 ⇒ xA | xA ⇒ xB | xB ⇒ xC | xC ⇒ xD | xD ⇒ xE | xE ⇒ xF | xF ⇒ x0 ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ x2 | x1 ⇒ x3 | x2 ⇒ x4 | x3 ⇒ x5 | x4 ⇒ x6 | x5 ⇒ x7 | x6 ⇒ x8 | x7 ⇒ x9
- | x8 ⇒ xA | x9 ⇒ xB | xA ⇒ xC | xB ⇒ xD | xC ⇒ xE | xD ⇒ xF | xE ⇒ x0 | xF ⇒ x1 ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ x3 | x1 ⇒ x4 | x2 ⇒ x5 | x3 ⇒ x6 | x4 ⇒ x7 | x5 ⇒ x8 | x6 ⇒ x9 | x7 ⇒ xA
- | x8 ⇒ xB | x9 ⇒ xC | xA ⇒ xD | xB ⇒ xE | xC ⇒ xF | xD ⇒ x0 | xE ⇒ x1 | xF ⇒ x2 ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ x4 | x1 ⇒ x5 | x2 ⇒ x6 | x3 ⇒ x7 | x4 ⇒ x8 | x5 ⇒ x9 | x6 ⇒ xA | x7 ⇒ xB
- | x8 ⇒ xC | x9 ⇒ xD | xA ⇒ xE | xB ⇒ xF | xC ⇒ x0 | xD ⇒ x1 | xE ⇒ x2 | xF ⇒ x3 ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ x5 | x1 ⇒ x6 | x2 ⇒ x7 | x3 ⇒ x8 | x4 ⇒ x9 | x5 ⇒ xA | x6 ⇒ xB | x7 ⇒ xC
- | x8 ⇒ xD | x9 ⇒ xE | xA ⇒ xF | xB ⇒ x0 | xC ⇒ x1 | xD ⇒ x2 | xE ⇒ x3 | xF ⇒ x4 ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ x6 | x1 ⇒ x7 | x2 ⇒ x8 | x3 ⇒ x9 | x4 ⇒ xA | x5 ⇒ xB | x6 ⇒ xC | x7 ⇒ xD
- | x8 ⇒ xE | x9 ⇒ xF | xA ⇒ x0 | xB ⇒ x1 | xC ⇒ x2 | xD ⇒ x3 | xE ⇒ x4 | xF ⇒ x5 ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ x7 | x1 ⇒ x8 | x2 ⇒ x9 | x3 ⇒ xA | x4 ⇒ xB | x5 ⇒ xC | x6 ⇒ xD | x7 ⇒ xE
- | x8 ⇒ xF | x9 ⇒ x0 | xA ⇒ x1 | xB ⇒ x2 | xC ⇒ x3 | xD ⇒ x4 | xE ⇒ x5 | xF ⇒ x6 ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ x8 | x1 ⇒ x9 | x2 ⇒ xA | x3 ⇒ xB | x4 ⇒ xC | x5 ⇒ xD | x6 ⇒ xE | x7 ⇒ xF
- | x8 ⇒ x0 | x9 ⇒ x1 | xA ⇒ x2 | xB ⇒ x3 | xC ⇒ x4 | xD ⇒ x5 | xE ⇒ x6 | xF ⇒ x7 ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ x9 | x1 ⇒ xA | x2 ⇒ xB | x3 ⇒ xC | x4 ⇒ xD | x5 ⇒ xE | x6 ⇒ xF | x7 ⇒ x0
- | x8 ⇒ x1 | x9 ⇒ x2 | xA ⇒ x3 | xB ⇒ x4 | xC ⇒ x5 | xD ⇒ x6 | xE ⇒ x7 | xF ⇒ x8 ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ xA | x1 ⇒ xB | x2 ⇒ xC | x3 ⇒ xD | x4 ⇒ xE | x5 ⇒ xF | x6 ⇒ x0 | x7 ⇒ x1
- | x8 ⇒ x2 | x9 ⇒ x3 | xA ⇒ x4 | xB ⇒ x5 | xC ⇒ x6 | xD ⇒ x7 | xE ⇒ x8 | xF ⇒ x9 ]
- | xA ⇒ match e2 with
- [ x0 ⇒ xB | x1 ⇒ xC | x2 ⇒ xD | x3 ⇒ xE | x4 ⇒ xF | x5 ⇒ x0 | x6 ⇒ x1 | x7 ⇒ x2
- | x8 ⇒ x3 | x9 ⇒ x4 | xA ⇒ x5 | xB ⇒ x6 | xC ⇒ x7 | xD ⇒ x8 | xE ⇒ x9 | xF ⇒ xA ]
- | xB ⇒ match e2 with
- [ x0 ⇒ xC | x1 ⇒ xD | x2 ⇒ xE | x3 ⇒ xF | x4 ⇒ x0 | x5 ⇒ x1 | x6 ⇒ x2 | x7 ⇒ x3
- | x8 ⇒ x4 | x9 ⇒ x5 | xA ⇒ x6 | xB ⇒ x7 | xC ⇒ x8 | xD ⇒ x9 | xE ⇒ xA | xF ⇒ xB ]
- | xC ⇒ match e2 with
- [ x0 ⇒ xD | x1 ⇒ xE | x2 ⇒ xF | x3 ⇒ x0 | x4 ⇒ x1 | x5 ⇒ x2 | x6 ⇒ x3 | x7 ⇒ x4
- | x8 ⇒ x5 | x9 ⇒ x6 | xA ⇒ x7 | xB ⇒ x8 | xC ⇒ x9 | xD ⇒ xA | xE ⇒ xB | xF ⇒ xC ]
- | xD ⇒ match e2 with
- [ x0 ⇒ xE | x1 ⇒ xF | x2 ⇒ x0 | x3 ⇒ x1 | x4 ⇒ x2 | x5 ⇒ x3 | x6 ⇒ x4 | x7 ⇒ x5
- | x8 ⇒ x6 | x9 ⇒ x7 | xA ⇒ x8 | xB ⇒ x9 | xC ⇒ xA | xD ⇒ xB | xE ⇒ xC | xF ⇒ xD ]
- | xE ⇒ match e2 with
- [ x0 ⇒ xF | x1 ⇒ x0 | x2 ⇒ x1 | x3 ⇒ x2 | x4 ⇒ x3 | x5 ⇒ x4 | x6 ⇒ x5 | x7 ⇒ x6
- | x8 ⇒ x7 | x9 ⇒ x8 | xA ⇒ x9 | xB ⇒ xA | xC ⇒ xB | xD ⇒ xC | xE ⇒ xD | xF ⇒ xE ]
- | xF ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x1 | x2 ⇒ x2 | x3 ⇒ x3 | x4 ⇒ x4 | x5 ⇒ x5 | x6 ⇒ x6 | x7 ⇒ x7
- | x8 ⇒ x8 | x9 ⇒ x9 | xA ⇒ xA | xB ⇒ xB | xC ⇒ xC | xD ⇒ xD | xE ⇒ xE | xF ⇒ xF ]
- ]
- | false ⇒ match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x1 | x2 ⇒ x2 | x3 ⇒ x3 | x4 ⇒ x4 | x5 ⇒ x5 | x6 ⇒ x6 | x7 ⇒ x7
- | x8 ⇒ x8 | x9 ⇒ x9 | xA ⇒ xA | xB ⇒ xB | xC ⇒ xC | xD ⇒ xD | xE ⇒ xE | xF ⇒ xF ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ x1 | x1 ⇒ x2 | x2 ⇒ x3 | x3 ⇒ x4 | x4 ⇒ x5 | x5 ⇒ x6 | x6 ⇒ x7 | x7 ⇒ x8
- | x8 ⇒ x9 | x9 ⇒ xA | xA ⇒ xB | xB ⇒ xC | xC ⇒ xD | xD ⇒ xE | xE ⇒ xF | xF ⇒ x0 ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ x2 | x1 ⇒ x3 | x2 ⇒ x4 | x3 ⇒ x5 | x4 ⇒ x6 | x5 ⇒ x7 | x6 ⇒ x8 | x7 ⇒ x9
- | x8 ⇒ xA | x9 ⇒ xB | xA ⇒ xC | xB ⇒ xD | xC ⇒ xE | xD ⇒ xF | xE ⇒ x0 | xF ⇒ x1 ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ x3 | x1 ⇒ x4 | x2 ⇒ x5 | x3 ⇒ x6 | x4 ⇒ x7 | x5 ⇒ x8 | x6 ⇒ x9 | x7 ⇒ xA
- | x8 ⇒ xB | x9 ⇒ xC | xA ⇒ xD | xB ⇒ xE | xC ⇒ xF | xD ⇒ x0 | xE ⇒ x1 | xF ⇒ x2 ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ x4 | x1 ⇒ x5 | x2 ⇒ x6 | x3 ⇒ x7 | x4 ⇒ x8 | x5 ⇒ x9 | x6 ⇒ xA | x7 ⇒ xB
- | x8 ⇒ xC | x9 ⇒ xD | xA ⇒ xE | xB ⇒ xF | xC ⇒ x0 | xD ⇒ x1 | xE ⇒ x2 | xF ⇒ x3 ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ x5 | x1 ⇒ x6 | x2 ⇒ x7 | x3 ⇒ x8 | x4 ⇒ x9 | x5 ⇒ xA | x6 ⇒ xB | x7 ⇒ xC
- | x8 ⇒ xD | x9 ⇒ xE | xA ⇒ xF | xB ⇒ x0 | xC ⇒ x1 | xD ⇒ x2 | xE ⇒ x3 | xF ⇒ x4 ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ x6 | x1 ⇒ x7 | x2 ⇒ x8 | x3 ⇒ x9 | x4 ⇒ xA | x5 ⇒ xB | x6 ⇒ xC | x7 ⇒ xD
- | x8 ⇒ xE | x9 ⇒ xF | xA ⇒ x0 | xB ⇒ x1 | xC ⇒ x2 | xD ⇒ x3 | xE ⇒ x4 | xF ⇒ x5 ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ x7 | x1 ⇒ x8 | x2 ⇒ x9 | x3 ⇒ xA | x4 ⇒ xB | x5 ⇒ xC | x6 ⇒ xD | x7 ⇒ xE
- | x8 ⇒ xF | x9 ⇒ x0 | xA ⇒ x1 | xB ⇒ x2 | xC ⇒ x3 | xD ⇒ x4 | xE ⇒ x5 | xF ⇒ x6 ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ x8 | x1 ⇒ x9 | x2 ⇒ xA | x3 ⇒ xB | x4 ⇒ xC | x5 ⇒ xD | x6 ⇒ xE | x7 ⇒ xF
- | x8 ⇒ x0 | x9 ⇒ x1 | xA ⇒ x2 | xB ⇒ x3 | xC ⇒ x4 | xD ⇒ x5 | xE ⇒ x6 | xF ⇒ x7 ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ x9 | x1 ⇒ xA | x2 ⇒ xB | x3 ⇒ xC | x4 ⇒ xD | x5 ⇒ xE | x6 ⇒ xF | x7 ⇒ x0
- | x8 ⇒ x1 | x9 ⇒ x2 | xA ⇒ x3 | xB ⇒ x4 | xC ⇒ x5 | xD ⇒ x6 | xE ⇒ x7 | xF ⇒ x8 ]
- | xA ⇒ match e2 with
- [ x0 ⇒ xA | x1 ⇒ xB | x2 ⇒ xC | x3 ⇒ xD | x4 ⇒ xE | x5 ⇒ xF | x6 ⇒ x0 | x7 ⇒ x1
- | x8 ⇒ x2 | x9 ⇒ x3 | xA ⇒ x4 | xB ⇒ x5 | xC ⇒ x6 | xD ⇒ x7 | xE ⇒ x8 | xF ⇒ x9 ]
- | xB ⇒ match e2 with
- [ x0 ⇒ xB | x1 ⇒ xC | x2 ⇒ xD | x3 ⇒ xE | x4 ⇒ xF | x5 ⇒ x0 | x6 ⇒ x1 | x7 ⇒ x2
- | x8 ⇒ x3 | x9 ⇒ x4 | xA ⇒ x5 | xB ⇒ x6 | xC ⇒ x7 | xD ⇒ x8 | xE ⇒ x9 | xF ⇒ xA ]
- | xC ⇒ match e2 with
- [ x0 ⇒ xC | x1 ⇒ xD | x2 ⇒ xE | x3 ⇒ xF | x4 ⇒ x0 | x5 ⇒ x1 | x6 ⇒ x2 | x7 ⇒ x3
- | x8 ⇒ x4 | x9 ⇒ x5 | xA ⇒ x6 | xB ⇒ x7 | xC ⇒ x8 | xD ⇒ x9 | xE ⇒ xA | xF ⇒ xB ]
- | xD ⇒ match e2 with
- [ x0 ⇒ xD | x1 ⇒ xE | x2 ⇒ xF | x3 ⇒ x0 | x4 ⇒ x1 | x5 ⇒ x2 | x6 ⇒ x3 | x7 ⇒ x4
- | x8 ⇒ x5 | x9 ⇒ x6 | xA ⇒ x7 | xB ⇒ x8 | xC ⇒ x9 | xD ⇒ xA | xE ⇒ xB | xF ⇒ xC ]
- | xE ⇒ match e2 with
- [ x0 ⇒ xE | x1 ⇒ xF | x2 ⇒ x0 | x3 ⇒ x1 | x4 ⇒ x2 | x5 ⇒ x3 | x6 ⇒ x4 | x7 ⇒ x5
- | x8 ⇒ x6 | x9 ⇒ x7 | xA ⇒ x8 | xB ⇒ x9 | xC ⇒ xA | xD ⇒ xB | xE ⇒ xC | xF ⇒ xD ]
- | xF ⇒ match e2 with
- [ x0 ⇒ xF | x1 ⇒ x0 | x2 ⇒ x1 | x3 ⇒ x2 | x4 ⇒ x3 | x5 ⇒ x4 | x6 ⇒ x5 | x7 ⇒ x6
- | x8 ⇒ x7 | x9 ⇒ x8 | xA ⇒ x9 | xB ⇒ xA | xC ⇒ xB | xD ⇒ xC | xE ⇒ xD | xF ⇒ xE ]
- ]].
-
-(* operatore somma con data → data *)
-ndefinition plus_ex_d_d ≝
-λe1,e2:exadecim.
- match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ x0 | x1 ⇒ x1 | x2 ⇒ x2 | x3 ⇒ x3 | x4 ⇒ x4 | x5 ⇒ x5 | x6 ⇒ x6 | x7 ⇒ x7
- | x8 ⇒ x8 | x9 ⇒ x9 | xA ⇒ xA | xB ⇒ xB | xC ⇒ xC | xD ⇒ xD | xE ⇒ xE | xF ⇒ xF ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ x1 | x1 ⇒ x2 | x2 ⇒ x3 | x3 ⇒ x4 | x4 ⇒ x5 | x5 ⇒ x6 | x6 ⇒ x7 | x7 ⇒ x8
- | x8 ⇒ x9 | x9 ⇒ xA | xA ⇒ xB | xB ⇒ xC | xC ⇒ xD | xD ⇒ xE | xE ⇒ xF | xF ⇒ x0 ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ x2 | x1 ⇒ x3 | x2 ⇒ x4 | x3 ⇒ x5 | x4 ⇒ x6 | x5 ⇒ x7 | x6 ⇒ x8 | x7 ⇒ x9
- | x8 ⇒ xA | x9 ⇒ xB | xA ⇒ xC | xB ⇒ xD | xC ⇒ xE | xD ⇒ xF | xE ⇒ x0 | xF ⇒ x1 ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ x3 | x1 ⇒ x4 | x2 ⇒ x5 | x3 ⇒ x6 | x4 ⇒ x7 | x5 ⇒ x8 | x6 ⇒ x9 | x7 ⇒ xA
- | x8 ⇒ xB | x9 ⇒ xC | xA ⇒ xD | xB ⇒ xE | xC ⇒ xF | xD ⇒ x0 | xE ⇒ x1 | xF ⇒ x2 ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ x4 | x1 ⇒ x5 | x2 ⇒ x6 | x3 ⇒ x7 | x4 ⇒ x8 | x5 ⇒ x9 | x6 ⇒ xA | x7 ⇒ xB
- | x8 ⇒ xC | x9 ⇒ xD | xA ⇒ xE | xB ⇒ xF | xC ⇒ x0 | xD ⇒ x1 | xE ⇒ x2 | xF ⇒ x3 ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ x5 | x1 ⇒ x6 | x2 ⇒ x7 | x3 ⇒ x8 | x4 ⇒ x9 | x5 ⇒ xA | x6 ⇒ xB | x7 ⇒ xC
- | x8 ⇒ xD | x9 ⇒ xE | xA ⇒ xF | xB ⇒ x0 | xC ⇒ x1 | xD ⇒ x2 | xE ⇒ x3 | xF ⇒ x4 ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ x6 | x1 ⇒ x7 | x2 ⇒ x8 | x3 ⇒ x9 | x4 ⇒ xA | x5 ⇒ xB | x6 ⇒ xC | x7 ⇒ xD
- | x8 ⇒ xE | x9 ⇒ xF | xA ⇒ x0 | xB ⇒ x1 | xC ⇒ x2 | xD ⇒ x3 | xE ⇒ x4 | xF ⇒ x5 ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ x7 | x1 ⇒ x8 | x2 ⇒ x9 | x3 ⇒ xA | x4 ⇒ xB | x5 ⇒ xC | x6 ⇒ xD | x7 ⇒ xE
- | x8 ⇒ xF | x9 ⇒ x0 | xA ⇒ x1 | xB ⇒ x2 | xC ⇒ x3 | xD ⇒ x4 | xE ⇒ x5 | xF ⇒ x6 ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ x8 | x1 ⇒ x9 | x2 ⇒ xA | x3 ⇒ xB | x4 ⇒ xC | x5 ⇒ xD | x6 ⇒ xE | x7 ⇒ xF
- | x8 ⇒ x0 | x9 ⇒ x1 | xA ⇒ x2 | xB ⇒ x3 | xC ⇒ x4 | xD ⇒ x5 | xE ⇒ x6 | xF ⇒ x7 ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ x9 | x1 ⇒ xA | x2 ⇒ xB | x3 ⇒ xC | x4 ⇒ xD | x5 ⇒ xE | x6 ⇒ xF | x7 ⇒ x0
- | x8 ⇒ x1 | x9 ⇒ x2 | xA ⇒ x3 | xB ⇒ x4 | xC ⇒ x5 | xD ⇒ x6 | xE ⇒ x7 | xF ⇒ x8 ]
- | xA ⇒ match e2 with
- [ x0 ⇒ xA | x1 ⇒ xB | x2 ⇒ xC | x3 ⇒ xD | x4 ⇒ xE | x5 ⇒ xF | x6 ⇒ x0 | x7 ⇒ x1
- | x8 ⇒ x2 | x9 ⇒ x3 | xA ⇒ x4 | xB ⇒ x5 | xC ⇒ x6 | xD ⇒ x7 | xE ⇒ x8 | xF ⇒ x9 ]
- | xB ⇒ match e2 with
- [ x0 ⇒ xB | x1 ⇒ xC | x2 ⇒ xD | x3 ⇒ xE | x4 ⇒ xF | x5 ⇒ x0 | x6 ⇒ x1 | x7 ⇒ x2
- | x8 ⇒ x3 | x9 ⇒ x4 | xA ⇒ x5 | xB ⇒ x6 | xC ⇒ x7 | xD ⇒ x8 | xE ⇒ x9 | xF ⇒ xA ]
- | xC ⇒ match e2 with
- [ x0 ⇒ xC | x1 ⇒ xD | x2 ⇒ xE | x3 ⇒ xF | x4 ⇒ x0 | x5 ⇒ x1 | x6 ⇒ x2 | x7 ⇒ x3
- | x8 ⇒ x4 | x9 ⇒ x5 | xA ⇒ x6 | xB ⇒ x7 | xC ⇒ x8 | xD ⇒ x9 | xE ⇒ xA | xF ⇒ xB ]
- | xD ⇒ match e2 with
- [ x0 ⇒ xD | x1 ⇒ xE | x2 ⇒ xF | x3 ⇒ x0 | x4 ⇒ x1 | x5 ⇒ x2 | x6 ⇒ x3 | x7 ⇒ x4
- | x8 ⇒ x5 | x9 ⇒ x6 | xA ⇒ x7 | xB ⇒ x8 | xC ⇒ x9 | xD ⇒ xA | xE ⇒ xB | xF ⇒ xC ]
- | xE ⇒ match e2 with
- [ x0 ⇒ xE | x1 ⇒ xF | x2 ⇒ x0 | x3 ⇒ x1 | x4 ⇒ x2 | x5 ⇒ x3 | x6 ⇒ x4 | x7 ⇒ x5
- | x8 ⇒ x6 | x9 ⇒ x7 | xA ⇒ x8 | xB ⇒ x9 | xC ⇒ xA | xD ⇒ xB | xE ⇒ xC | xF ⇒ xD ]
- | xF ⇒ match e2 with
- [ x0 ⇒ xF | x1 ⇒ x0 | x2 ⇒ x1 | x3 ⇒ x2 | x4 ⇒ x3 | x5 ⇒ x4 | x6 ⇒ x5 | x7 ⇒ x6
- | x8 ⇒ x7 | x9 ⇒ x8 | xA ⇒ x9 | xB ⇒ xA | xC ⇒ xB | xD ⇒ xC | xE ⇒ xD | xF ⇒ xE ]
- ].
-
-(* operatore somma con data+carry → carry *)
-ndefinition plus_ex_dc_c ≝
-λc:bool.λe1,e2:exadecim.
- match c with
- [ true ⇒ match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ true ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false | xC ⇒ false | xD ⇒ false | xE ⇒ true | xF ⇒ true ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false | xC ⇒ false | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xA ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xB ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xC ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ true | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xD ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ true | x3 ⇒ true | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xE ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xF ⇒ match e2 with
- [ x0 ⇒ true | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- ]
- | false ⇒ match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ true ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false | xC ⇒ false | xD ⇒ false | xE ⇒ true | xF ⇒ true ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false | xC ⇒ false | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xA ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xB ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xC ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xD ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ true | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xE ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ true | x3 ⇒ true | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xF ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- ]].
-
-(* operatore somma con data → carry *)
-ndefinition plus_ex_d_c ≝
-λe1,e2:exadecim.
- match e1 with
- [ x0 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ false ]
- | x1 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false | xC ⇒ false | xD ⇒ false | xE ⇒ false | xF ⇒ true ]
- | x2 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false | xC ⇒ false | xD ⇒ false | xE ⇒ true | xF ⇒ true ]
- | x3 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false | xC ⇒ false | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x4 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ false | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x5 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ false | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x6 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ false | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x7 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ false | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x8 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ false
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | x9 ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ false | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xA ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ false | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xB ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ false | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xC ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ false | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xD ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ false | x3 ⇒ true | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xE ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ false | x2 ⇒ true | x3 ⇒ true | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- | xF ⇒ match e2 with
- [ x0 ⇒ false | x1 ⇒ true | x2 ⇒ true | x3 ⇒ true | x4 ⇒ true | x5 ⇒ true | x6 ⇒ true | x7 ⇒ true
- | x8 ⇒ true | x9 ⇒ true | xA ⇒ true | xB ⇒ true | xC ⇒ true | xD ⇒ true | xE ⇒ true | xF ⇒ true ]
- ].
-
-(* operatore predecessore *)
-ndefinition pred_ex ≝
-λe:exadecim.
- match e with
- [ x0 ⇒ xF | x1 ⇒ x0 | x2 ⇒ x1 | x3 ⇒ x2
- | x4 ⇒ x3 | x5 ⇒ x4 | x6 ⇒ x5 | x7 ⇒ x6
- | x8 ⇒ x7 | x9 ⇒ x8 | xA ⇒ x9 | xB ⇒ xA
- | xC ⇒ xB | xD ⇒ xC | xE ⇒ xD | xF ⇒ xE ].
-
-(* operatore successore *)
-ndefinition succ_ex ≝
-λe:exadecim.
- match e with
- [ x0 ⇒ x1 | x1 ⇒ x2 | x2 ⇒ x3 | x3 ⇒ x4
- | x4 ⇒ x5 | x5 ⇒ x6 | x6 ⇒ x7 | x7 ⇒ x8
- | x8 ⇒ x9 | x9 ⇒ xA | xA ⇒ xB | xB ⇒ xC
- | xC ⇒ xD | xD ⇒ xE | xE ⇒ xF | xF ⇒ x0 ].
-
-(* operatore neg/complemento a 2 *)
-ndefinition compl_ex ≝
-λe:exadecim.match e with
- [ x0 ⇒ x0 | x1 ⇒ xF | x2 ⇒ xE | x3 ⇒ xD
- | x4 ⇒ xC | x5 ⇒ xB | x6 ⇒ xA | x7 ⇒ x9
- | x8 ⇒ x8 | x9 ⇒ x7 | xA ⇒ x6 | xB ⇒ x5
- | xC ⇒ x4 | xD ⇒ x3 | xE ⇒ x2 | xF ⇒ x1 ].
-
-(* operatore abs *)
-ndefinition abs_ex ≝
-λe:exadecim.match getMSB_ex e with
- [ true ⇒ compl_ex e | false ⇒ e ].
-
-(* operatore x in [inf,sup] o in sup],[inf *)
-ndefinition inrange_ex ≝
-λx,inf,sup:exadecim.
- match le_ex inf sup with
- [ true ⇒ and_bool | false ⇒ or_bool ]
- (le_ex inf x) (le_ex x sup).
-
-(* esadecimali ricorsivi *)
-ninductive rec_exadecim : exadecim → Type ≝
- ex_O : rec_exadecim x0
-| ex_S : ∀n.rec_exadecim n → rec_exadecim (succ_ex n).
-
-(* esadecimali → esadecimali ricorsivi *)
-ndefinition ex_to_recex ≝
-λn.match n return λx.rec_exadecim x with
- [ x0 ⇒ ex_O
- | x1 ⇒ ex_S ? ex_O
- | x2 ⇒ ex_S ? (ex_S ? ex_O)
- | x3 ⇒ ex_S ? (ex_S ? (ex_S ? ex_O))
- | x4 ⇒ ex_S ? (ex_S ? (ex_S ? (ex_S ? ex_O)))
- | x5 ⇒ ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? ex_O))))
- | x6 ⇒ ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? ex_O)))))
- | x7 ⇒ ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? ex_O))))))
- | x8 ⇒ ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? ex_O)))))))
- | x9 ⇒ ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? ex_O))))))))
- | xA ⇒ ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? ex_O)))))))))
- | xB ⇒ ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? ex_O))))))))))
- | xC ⇒ ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? ex_O)))))))))))
- | xD ⇒ ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? ex_O))))))))))))
- | xE ⇒ ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? ex_O)))))))))))))
- | xF ⇒ ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? (ex_S ? ex_O))))))))))))))
- ].
-
-(* ottali → esadecimali *)
-ndefinition ex_of_oct ≝
-λn.match n with
- [ o0 ⇒ x0 | o1 ⇒ x1 | o2 ⇒ x2 | o3 ⇒ x3 | o4 ⇒ x4 | o5 ⇒ x5 | o6 ⇒ x6 | o7 ⇒ x7 ].
-
-(* esadecimali xNNNN → ottali *)
-ndefinition oct_of_exL ≝
-λn.match n with
- [ x0 ⇒ o0 | x1 ⇒ o1 | x2 ⇒ o2 | x3 ⇒ o3 | x4 ⇒ o4 | x5 ⇒ o5 | x6 ⇒ o6 | x7 ⇒ o7
- | x8 ⇒ o0 | x9 ⇒ o1 | xA ⇒ o2 | xB ⇒ o3 | xC ⇒ o4 | xD ⇒ o5 | xE ⇒ o6 | xF ⇒ o7 ].
-
-(* esadecimali NNNNx → ottali *)
-ndefinition oct_of_exH ≝
-λn.match n with
- [ x0 ⇒ o0 | x1 ⇒ o0 | x2 ⇒ o1 | x3 ⇒ o1 | x4 ⇒ o2 | x5 ⇒ o2 | x6 ⇒ o3 | x7 ⇒ o3
- | x8 ⇒ o4 | x9 ⇒ o4 | xA ⇒ o5 | xB ⇒ o5 | xC ⇒ o6 | xD ⇒ o6 | xE ⇒ o7 | xF ⇒ o7 ].
-
-ndefinition exadecim_destruct_aux ≝
-Πe1,e2.ΠP:Prop.ΠH:e1 = e2.
- match eq_ex e1 e2 with [ true ⇒ P → P | false ⇒ P ].
-
-ndefinition exadecim_destruct : exadecim_destruct_aux.
- #e1; #e2; #P; #H;
- nrewrite < H;
- nelim e1;
- nnormalize;
- napply (λx.x).
-nqed.
-
-nlemma eq_to_eqex : ∀n1,n2.n1 = n2 → eq_ex n1 n2 = true.
- #n1; #n2; #H;
- nrewrite > H;
- nelim n2;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma neqex_to_neq : ∀n1,n2.eq_ex n1 n2 = false → n1 ≠ n2.
- #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_ex n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqex n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-nlemma eqex_to_eq : ∀n1,n2.eq_ex n1 n2 = true → n1 = n2.
- #n1; #n2;
- ncases n1;
- ncases n2;
- nnormalize;
- ##[ ##1,18,35,52,69,86,103,120,137,154,171,188,205,222,239,256: #H; napply refl_eq
- ##| ##*: #H; (*ndestruct lentissima...*) napply (bool_destruct … H)
- ##]
-nqed.
-
-nlemma neq_to_neqex : ∀n1,n2.n1 ≠ n2 → eq_ex n1 n2 = false.
- #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_ex n1 n2));
- napply (not_to_not (eq_ex n1 n2 = true) (n1 = n2) ? H);
- napply (eqex_to_eq n1 n2).
-nqed.
-
-nlemma decidable_ex : ∀x,y:exadecim.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_ex x y = true) (eq_ex x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqex_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqex_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqex : symmetricT exadecim bool eq_ex.
- #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_ex n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqex n1 n2 H);
- napply (symmetric_eq ? (eq_ex n2 n1) false);
- napply (neq_to_neqex n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
-
-nlemma exadecim_is_comparable : comparable.
- @ exadecim
- ##[ napply x0
- ##| napply forall_ex
- ##| napply eq_ex
- ##| napply eqex_to_eq
- ##| napply eq_to_eqex
- ##| napply neqex_to_neq
- ##| napply neq_to_neqex
- ##| napply decidable_ex
- ##| napply symmetric_eqex
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr exadecim_is_comparable ≡ exadecim.
-
-nlemma exadecim_is_comparable_ext : comparable_ext.
- napply mk_comparable_ext;
- ##[ napply exadecim_is_comparable
- ##| napply lt_ex
- ##| napply le_ex
- ##| napply gt_ex
- ##| napply ge_ex
- ##| napply and_ex
- ##| napply or_ex
- ##| napply xor_ex
- ##| napply getMSB_ex
- ##| napply setMSB_ex
- ##| napply clrMSB_ex
- ##| napply getLSB_ex
- ##| napply setLSB_ex
- ##| napply clrLSB_ex
- ##| napply rcr_ex
- ##| napply shr_ex
- ##| napply ror_ex
- ##| napply rcl_ex
- ##| napply shl_ex
- ##| napply rol_ex
- ##| napply not_ex
- ##| napply plus_ex_dc_dc
- ##| napply plus_ex_d_dc
- ##| napply plus_ex_dc_d
- ##| napply plus_ex_d_d
- ##| napply plus_ex_dc_c
- ##| napply plus_ex_d_c
- ##| napply pred_ex
- ##| napply succ_ex
- ##| napply compl_ex
- ##| napply abs_ex
- ##| napply inrange_ex
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr (comp_base exadecim_is_comparable_ext) ≡ exadecim.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/comp.ma".
-include "num/bool_lemmas.ma".
-
-(* ****** *)
-(* OTTALI *)
-(* ****** *)
-
-ninductive oct : Type ≝
- o0: oct
-| o1: oct
-| o2: oct
-| o3: oct
-| o4: oct
-| o5: oct
-| o6: oct
-| o7: oct.
-
-(* iteratore sugli ottali *)
-ndefinition forall_oct ≝ λP.
- P o0 ⊗ P o1 ⊗ P o2 ⊗ P o3 ⊗ P o4 ⊗ P o5 ⊗ P o6 ⊗ P o7.
-
-(* operatore = *)
-ndefinition eq_oct ≝
-λn1,n2:oct.
- match n1 with
- [ o0 ⇒ match n2 with [ o0 ⇒ true | _ ⇒ false ]
- | o1 ⇒ match n2 with [ o1 ⇒ true | _ ⇒ false ]
- | o2 ⇒ match n2 with [ o2 ⇒ true | _ ⇒ false ]
- | o3 ⇒ match n2 with [ o3 ⇒ true | _ ⇒ false ]
- | o4 ⇒ match n2 with [ o4 ⇒ true | _ ⇒ false ]
- | o5 ⇒ match n2 with [ o5 ⇒ true | _ ⇒ false ]
- | o6 ⇒ match n2 with [ o6 ⇒ true | _ ⇒ false ]
- | o7 ⇒ match n2 with [ o7 ⇒ true | _ ⇒ false ]
- ].
-
-(* operatore and *)
-ndefinition and_oct ≝
-λe1,e2:oct.match e1 with
- [ o0 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o0 | o2 ⇒ o0 | o3 ⇒ o0
- | o4 ⇒ o0 | o5 ⇒ o0 | o6 ⇒ o0 | o7 ⇒ o0 ]
- | o1 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o1 | o2 ⇒ o0 | o3 ⇒ o1
- | o4 ⇒ o0 | o5 ⇒ o1 | o6 ⇒ o0 | o7 ⇒ o1 ]
- | o2 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o0 | o2 ⇒ o2 | o3 ⇒ o2
- | o4 ⇒ o0 | o5 ⇒ o0 | o6 ⇒ o2 | o7 ⇒ o2 ]
- | o3 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o1 | o2 ⇒ o2 | o3 ⇒ o3
- | o4 ⇒ o0 | o5 ⇒ o1 | o6 ⇒ o2 | o7 ⇒ o3 ]
- | o4 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o0 | o2 ⇒ o0 | o3 ⇒ o0
- | o4 ⇒ o4 | o5 ⇒ o4 | o6 ⇒ o4 | o7 ⇒ o4 ]
- | o5 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o1 | o2 ⇒ o0 | o3 ⇒ o1
- | o4 ⇒ o4 | o5 ⇒ o5 | o6 ⇒ o4 | o7 ⇒ o5 ]
- | o6 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o0 | o2 ⇒ o2 | o3 ⇒ o2
- | o4 ⇒ o4 | o5 ⇒ o4 | o6 ⇒ o6 | o7 ⇒ o6 ]
- | o7 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o1 | o2 ⇒ o2 | o3 ⇒ o3
- | o4 ⇒ o4 | o5 ⇒ o5 | o6 ⇒ o6 | o7 ⇒ o7 ]
- ].
-
-(* operatore or *)
-ndefinition or_oct ≝
-λe1,e2:oct.match e1 with
- [ o0 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o1 | o2 ⇒ o2 | o3 ⇒ o3
- | o4 ⇒ o4 | o5 ⇒ o5 | o6 ⇒ o6 | o7 ⇒ o7 ]
- | o1 ⇒ match e2 with
- [ o0 ⇒ o1 | o1 ⇒ o1 | o2 ⇒ o3 | o3 ⇒ o3
- | o4 ⇒ o5 | o5 ⇒ o5 | o6 ⇒ o7 | o7 ⇒ o7 ]
- | o2 ⇒ match e2 with
- [ o0 ⇒ o2 | o1 ⇒ o3 | o2 ⇒ o2 | o3 ⇒ o3
- | o4 ⇒ o6 | o5 ⇒ o7 | o6 ⇒ o6 | o7 ⇒ o7 ]
- | o3 ⇒ match e2 with
- [ o0 ⇒ o3 | o1 ⇒ o3 | o2 ⇒ o3 | o3 ⇒ o3
- | o4 ⇒ o7 | o5 ⇒ o7 | o6 ⇒ o7 | o7 ⇒ o7 ]
- | o4 ⇒ match e2 with
- [ o0 ⇒ o4 | o1 ⇒ o5 | o2 ⇒ o6 | o3 ⇒ o7
- | o4 ⇒ o4 | o5 ⇒ o5 | o6 ⇒ o6 | o7 ⇒ o7 ]
- | o5 ⇒ match e2 with
- [ o0 ⇒ o5 | o1 ⇒ o5 | o2 ⇒ o7 | o3 ⇒ o7
- | o4 ⇒ o5 | o5 ⇒ o5 | o6 ⇒ o7 | o7 ⇒ o7 ]
- | o6 ⇒ match e2 with
- [ o0 ⇒ o6 | o1 ⇒ o7 | o2 ⇒ o6 | o3 ⇒ o7
- | o4 ⇒ o6 | o5 ⇒ o7 | o6 ⇒ o6 | o7 ⇒ o7 ]
- | o7 ⇒ match e2 with
- [ o0 ⇒ o7 | o1 ⇒ o7 | o2 ⇒ o7 | o3 ⇒ o7
- | o4 ⇒ o7 | o5 ⇒ o7 | o6 ⇒ o7 | o7 ⇒ o7 ]
- ].
-
-(* operatore xor *)
-ndefinition xor_oct ≝
-λe1,e2:oct.match e1 with
- [ o0 ⇒ match e2 with
- [ o0 ⇒ o0 | o1 ⇒ o1 | o2 ⇒ o2 | o3 ⇒ o3
- | o4 ⇒ o4 | o5 ⇒ o5 | o6 ⇒ o6 | o7 ⇒ o7 ]
- | o1 ⇒ match e2 with
- [ o0 ⇒ o1 | o1 ⇒ o0 | o2 ⇒ o3 | o3 ⇒ o2
- | o4 ⇒ o5 | o5 ⇒ o4 | o6 ⇒ o7 | o7 ⇒ o6 ]
- | o2 ⇒ match e2 with
- [ o0 ⇒ o2 | o1 ⇒ o3 | o2 ⇒ o0 | o3 ⇒ o1
- | o4 ⇒ o6 | o5 ⇒ o7 | o6 ⇒ o4 | o7 ⇒ o5 ]
- | o3 ⇒ match e2 with
- [ o0 ⇒ o3 | o1 ⇒ o2 | o2 ⇒ o1 | o3 ⇒ o0
- | o4 ⇒ o7 | o5 ⇒ o6 | o6 ⇒ o5 | o7 ⇒ o4 ]
- | o4 ⇒ match e2 with
- [ o0 ⇒ o4 | o1 ⇒ o5 | o2 ⇒ o6 | o3 ⇒ o7
- | o4 ⇒ o0 | o5 ⇒ o1 | o6 ⇒ o2 | o7 ⇒ o3 ]
- | o5 ⇒ match e2 with
- [ o0 ⇒ o5 | o1 ⇒ o4 | o2 ⇒ o7 | o3 ⇒ o6
- | o4 ⇒ o1 | o5 ⇒ o0 | o6 ⇒ o3 | o7 ⇒ o2 ]
- | o6 ⇒ match e2 with
- [ o0 ⇒ o6 | o1 ⇒ o7 | o2 ⇒ o4 | o3 ⇒ o5
- | o4 ⇒ o2 | o5 ⇒ o3 | o6 ⇒ o0 | o7 ⇒ o1 ]
- | o7 ⇒ match e2 with
- [ o0 ⇒ o7 | o1 ⇒ o6 | o2 ⇒ o5 | o3 ⇒ o4
- | o4 ⇒ o3 | o5 ⇒ o2 | o6 ⇒ o1 | o7 ⇒ o0 ]
- ].
-
-(* operatore predecessore *)
-ndefinition pred_oct ≝
-λn.match n with
- [ o0 ⇒ o7 | o1 ⇒ o0 | o2 ⇒ o1 | o3 ⇒ o2 | o4 ⇒ o3 | o5 ⇒ o4 | o6 ⇒ o5 | o7 ⇒ o6 ].
-
-(* operatore successore *)
-ndefinition succ_oct ≝
-λn.match n with
- [ o0 ⇒ o1 | o1 ⇒ o2 | o2 ⇒ o3 | o3 ⇒ o4 | o4 ⇒ o5 | o5 ⇒ o6 | o6 ⇒ o7 | o7 ⇒ o0 ].
-
-(* ottali ricorsivi *)
-ninductive rec_oct : oct → Type ≝
- oc_O : rec_oct o0
-| oc_S : ∀n.rec_oct n → rec_oct (succ_oct n).
-
-(* ottali → ottali ricorsivi *)
-ndefinition oct_to_recoct ≝
-λn.match n return λx.rec_oct x with
- [ o0 ⇒ oc_O
- | o1 ⇒ oc_S ? oc_O
- | o2 ⇒ oc_S ? (oc_S ? oc_O)
- | o3 ⇒ oc_S ? (oc_S ? (oc_S ? oc_O))
- | o4 ⇒ oc_S ? (oc_S ? (oc_S ? (oc_S ? oc_O)))
- | o5 ⇒ oc_S ? (oc_S ? (oc_S ? (oc_S ? (oc_S ? oc_O))))
- | o6 ⇒ oc_S ? (oc_S ? (oc_S ? (oc_S ? (oc_S ? (oc_S ? oc_O)))))
- | o7 ⇒ oc_S ? (oc_S ? (oc_S ? (oc_S ? (oc_S ? (oc_S ? (oc_S ? oc_O))))))
- ].
-
-ndefinition oct_destruct_aux ≝
-Πn1,n2:oct.ΠP:Prop.n1 = n2 →
- match eq_oct n1 n2 with [ true ⇒ P → P | false ⇒ P ].
-
-ndefinition oct_destruct : oct_destruct_aux.
- #n1; #n2; #P; #H;
- nrewrite < H;
- nelim n1;
- nnormalize;
- napply (λx.x).
-nqed.
-
-nlemma eq_to_eqoct : ∀n1,n2.n1 = n2 → eq_oct n1 n2 = true.
- #n1; #n2; #H;
- nrewrite > H;
- nelim n2;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma neqoct_to_neq : ∀n1,n2.eq_oct n1 n2 = false → n1 ≠ n2.
- #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_oct n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqoct n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-nlemma eqoct_to_eq : ∀n1,n2.eq_oct n1 n2 = true → n1 = n2.
- #n1; #n2;
- ncases n1;
- ncases n2;
- nnormalize;
- ##[ ##1,10,19,28,37,46,55,64: #H; napply refl_eq
- ##| ##*: #H; ndestruct (*napply (bool_destruct … H)*)
- ##]
-nqed.
-
-nlemma neq_to_neqoct : ∀n1,n2.n1 ≠ n2 → eq_oct n1 n2 = false.
- #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_oct n1 n2));
- napply (not_to_not (eq_oct n1 n2 = true) (n1 = n2) ? H);
- napply (eqoct_to_eq n1 n2).
-nqed.
-
-nlemma decidable_oct : ∀x,y:oct.decidable (x = y).
- #x; #y; nnormalize;
- napply (or2_elim (eq_oct x y = true) (eq_oct x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqoct_to_eq … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqoct_to_neq … H))
- ##]
-nqed.
-
-nlemma symmetric_eqoct : symmetricT oct bool eq_oct.
- #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_oct n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqoct n1 n2 H);
- napply (symmetric_eq ? (eq_oct n2 n1) false);
- napply (neq_to_neqoct n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
-
-nlemma oct_is_comparable : comparable.
- @ oct
- ##[ napply o0
- ##| napply forall_oct
- ##| napply eq_oct
- ##| napply eqoct_to_eq
- ##| napply eq_to_eqoct
- ##| napply neqoct_to_neq
- ##| napply neq_to_neqoct
- ##| napply decidable_oct
- ##| napply symmetric_eqoct
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr oct_is_comparable ≡ oct.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/byte8.ma".
-include "common/nat.ma".
-
-(* **** *)
-(* WORD *)
-(* **** *)
-
-ndefinition word16 ≝ comp_num byte8.
-ndefinition mk_word16 ≝ λb1,b2.mk_comp_num byte8 b1 b2.
-
-(* \langle \rangle *)
-notation "〈x:y〉" non associative with precedence 80
- for @{ mk_comp_num byte8 $x $y }.
-
-ndefinition word16_is_comparable ≝ cn_is_comparable byte8_is_comparable.
-ndefinition word16_is_comparable_ext ≝ cn_is_comparable_ext byte8_is_comparable_ext.
-unification hint 0 ≔ ⊢ carr (comp_base word16_is_comparable_ext) ≡ comp_num (comp_num exadecim).
-unification hint 0 ≔ ⊢ carr (comp_base word16_is_comparable_ext) ≡ comp_num byte8.
-unification hint 0 ≔ ⊢ carr (comp_base word16_is_comparable_ext) ≡ word16.
-unification hint 0 ≔ ⊢ carr word16_is_comparable ≡ comp_num (comp_num exadecim).
-unification hint 0 ≔ ⊢ carr word16_is_comparable ≡ comp_num byte8.
-unification hint 0 ≔ ⊢ carr word16_is_comparable ≡ word16.
-
-(* operatore estensione unsigned *)
-ndefinition extu_w16 ≝ λb2.〈zeroc ?:b2〉.
-ndefinition extu2_w16 ≝ λe2.〈zeroc ?:〈zeroc ?,e2〉〉.
-
-(* operatore estensione signed *)
-ndefinition exts_w16 ≝
-λb2.〈(match getMSBc ? b2 with
- [ true ⇒ predc ? (zeroc ?) | false ⇒ zeroc ? ]):b2〉.
-ndefinition exts2_w16 ≝
-λe2.(match getMSBc ? e2 with
- [ true ⇒ 〈predc ? (zeroc ?):〈predc ? (zeroc ?),e2〉〉
- | false ⇒ 〈zeroc ?:〈zeroc ?,e2〉〉 ]).
-
-(* operatore moltiplicazione senza segno *)
-(* 〈a1,a2〉 * 〈b1,b2〉 = (a1*b1) x0 x0 + x0 (a1*b2) x0 + x0 (a2*b1) x0 + x0 x0 (a2*b2) *)
-ndefinition mulu_b8_aux ≝
-λw:word16.nat_it ? (rolc ?) w nat4.
-
-ndefinition mulu_b8 ≝
-λb1,b2:byte8.
- plusc_d_d ? 〈(mulu_ex (cnH ? b1) (cnH ? b2)):zeroc ?〉
- (plusc_d_d ? (mulu_b8_aux (extu_w16 (mulu_ex (cnH ? b1) (cnL ? b2))))
- (plusc_d_d ? (mulu_b8_aux (extu_w16 (mulu_ex (cnL ? b1) (cnH ? b2))))
- (extu_w16 (mulu_ex (cnL ? b1) (cnL ? b2))))).
-
-(* operatore moltiplicazione con segno *)
-(* x * y = sgn(x) * sgn(y) * |x| * |y| *)
-ndefinition muls_b8 ≝
-λb1,b2:byte8.
-(* ++/-- → +, +-/-+ → - *)
- match (getMSBc ? b1) ⊙ (getMSBc ? b2) with
- (* +- -+ → - *)
- [ true ⇒ complc ?
- (* ++/-- → + *)
- | false ⇒ λx.x ] (mulu_b8 (absc ? b1) (absc ? b2)).
-
-(* divisione senza segno (secondo la logica delle ALU): (quoziente resto) overflow *)
-nlet rec div_b8_aux (divd:word16) (divs:word16) (molt:byte8) (q:byte8) (n:nat) on n ≝
- let w' ≝ plusc_d_d ? divd (complc ? divs) in
- match n with
- [ O ⇒ match lec ? divs divd with
- [ true ⇒ triple … (orc ? molt q) (cnL ? w') (⊖ (eqc ? (cnH ? w') (zeroc ?)))
- | false ⇒ triple … q (cnL ? divd) (⊖ (eqc ? (cnH ? divd) (zeroc ?))) ]
- | S n' ⇒ match lec ? divs divd with
- [ true ⇒ div_b8_aux w' (rorc ? divs) (rorc ? molt) (orc ? molt q) n'
- | false ⇒ div_b8_aux divd (rorc ? divs) (rorc ? molt) q n' ]].
-
-ndefinition div_b8 ≝
-λw:word16.λb:byte8.match eqc ? b (zeroc ?) with
-(* la combinazione n/0 e' illegale, segnala solo overflow senza dare risultato *)
- [ true ⇒ triple … 〈xF,xF〉 (cnL ? w) true
- | false ⇒ match eqc ? w (zeroc ?) with
-(* 0 diviso qualsiasi cosa diverso da 0 da' q=0 r=0 o=false *)
- [ true ⇒ triple … (zeroc ?) (zeroc ?) false
-(* 1) e' una divisione sensata che produrra' overflow/risultato *)
-(* 2) parametri: dividendo, divisore, moltiplicatore, quoziente, contatore *)
-(* 3) ad ogni ciclo il divisore e il moltiplicatore vengono scalati di 1 a dx *)
-(* 4) il moltiplicatore e' la quantita' aggiunta al quoziente se il divisore *)
-(* puo' essere sottratto al dividendo *)
- | false ⇒ div_b8_aux w (nat_it ? (rolc ?) (extu_w16 b) nat7) 〈x8,x0〉 (zeroc ?) nat7 ]].
-
-(* word16 ricorsive *)
-ninductive rec_word16 : word16 → Type ≝
- w16_O : rec_word16 (zeroc ?)
-| w16_S : ∀n.rec_word16 n → rec_word16 (succc ? n).
-
-(* word16 → word16 ricorsive *)
-
-(* EX: ancora problema di tempi ???
-ndefinition w16_to_recw16_aux1_1 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈n:〈x1,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S ? (w16_S ? (w16_S ? (w16_S ? (w16_S ? (w16_S ? (w16_S ? (w16_S ? (
- w16_S ? (w16_S ? (w16_S ? (w16_S ? (w16_S ? (w16_S ? (w16_S ? (w16_S ? recw
- ))))))))))))))).
-*)
-
-ndefinition w16_to_recw16_aux1_1 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈n:〈x1,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S 〈n:〈x0,xF〉〉 (w16_S 〈n:〈x0,xE〉〉 (w16_S 〈n:〈x0,xD〉〉 (w16_S 〈n:〈x0,xC〉〉 (
- w16_S 〈n:〈x0,xB〉〉 (w16_S 〈n:〈x0,xA〉〉 (w16_S 〈n:〈x0,x9〉〉 (w16_S 〈n:〈x0,x8〉〉 (
- w16_S 〈n:〈x0,x7〉〉 (w16_S 〈n:〈x0,x6〉〉 (w16_S 〈n:〈x0,x5〉〉 (w16_S 〈n:〈x0,x4〉〉 (
- w16_S 〈n:〈x0,x3〉〉 (w16_S 〈n:〈x0,x2〉〉 (w16_S 〈n:〈x0,x1〉〉 (w16_S 〈n:〈x0,x0〉〉 recw
- ))))))))))))))).
-
-ndefinition w16_to_recw16_aux1_2 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈n:〈x2,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S 〈n:〈x1,xF〉〉 (w16_S 〈n:〈x1,xE〉〉 (w16_S 〈n:〈x1,xD〉〉 (w16_S 〈n:〈x1,xC〉〉 (
- w16_S 〈n:〈x1,xB〉〉 (w16_S 〈n:〈x1,xA〉〉 (w16_S 〈n:〈x1,x9〉〉 (w16_S 〈n:〈x1,x8〉〉 (
- w16_S 〈n:〈x1,x7〉〉 (w16_S 〈n:〈x1,x6〉〉 (w16_S 〈n:〈x1,x5〉〉 (w16_S 〈n:〈x1,x4〉〉 (
- w16_S 〈n:〈x1,x3〉〉 (w16_S 〈n:〈x1,x2〉〉 (w16_S 〈n:〈x1,x1〉〉 (w16_S 〈n:〈x1,x0〉〉 (w16_to_recw16_aux1_1 ? recw)
- ))))))))))))))).
-
-ndefinition w16_to_recw16_aux1_3 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈n:〈x3,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S 〈n:〈x2,xF〉〉 (w16_S 〈n:〈x2,xE〉〉 (w16_S 〈n:〈x2,xD〉〉 (w16_S 〈n:〈x2,xC〉〉 (
- w16_S 〈n:〈x2,xB〉〉 (w16_S 〈n:〈x2,xA〉〉 (w16_S 〈n:〈x2,x9〉〉 (w16_S 〈n:〈x2,x8〉〉 (
- w16_S 〈n:〈x2,x7〉〉 (w16_S 〈n:〈x2,x6〉〉 (w16_S 〈n:〈x2,x5〉〉 (w16_S 〈n:〈x2,x4〉〉 (
- w16_S 〈n:〈x2,x3〉〉 (w16_S 〈n:〈x2,x2〉〉 (w16_S 〈n:〈x2,x1〉〉 (w16_S 〈n:〈x2,x0〉〉 (w16_to_recw16_aux1_2 ? recw)
- ))))))))))))))).
-
-ndefinition w16_to_recw16_aux1_4 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈n:〈x4,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S 〈n:〈x3,xF〉〉 (w16_S 〈n:〈x3,xE〉〉 (w16_S 〈n:〈x3,xD〉〉 (w16_S 〈n:〈x3,xC〉〉 (
- w16_S 〈n:〈x3,xB〉〉 (w16_S 〈n:〈x3,xA〉〉 (w16_S 〈n:〈x3,x9〉〉 (w16_S 〈n:〈x3,x8〉〉 (
- w16_S 〈n:〈x3,x7〉〉 (w16_S 〈n:〈x3,x6〉〉 (w16_S 〈n:〈x3,x5〉〉 (w16_S 〈n:〈x3,x4〉〉 (
- w16_S 〈n:〈x3,x3〉〉 (w16_S 〈n:〈x3,x2〉〉 (w16_S 〈n:〈x3,x1〉〉 (w16_S 〈n:〈x3,x0〉〉 (w16_to_recw16_aux1_3 ? recw)
- ))))))))))))))).
-
-ndefinition w16_to_recw16_aux1_5 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈n:〈x5,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S 〈n:〈x4,xF〉〉 (w16_S 〈n:〈x4,xE〉〉 (w16_S 〈n:〈x4,xD〉〉 (w16_S 〈n:〈x4,xC〉〉 (
- w16_S 〈n:〈x4,xB〉〉 (w16_S 〈n:〈x4,xA〉〉 (w16_S 〈n:〈x4,x9〉〉 (w16_S 〈n:〈x4,x8〉〉 (
- w16_S 〈n:〈x4,x7〉〉 (w16_S 〈n:〈x4,x6〉〉 (w16_S 〈n:〈x4,x5〉〉 (w16_S 〈n:〈x4,x4〉〉 (
- w16_S 〈n:〈x4,x3〉〉 (w16_S 〈n:〈x4,x2〉〉 (w16_S 〈n:〈x4,x1〉〉 (w16_S 〈n:〈x4,x0〉〉 (w16_to_recw16_aux1_4 ? recw)
- ))))))))))))))).
-
-ndefinition w16_to_recw16_aux1_6 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈n:〈x6,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S 〈n:〈x5,xF〉〉 (w16_S 〈n:〈x5,xE〉〉 (w16_S 〈n:〈x5,xD〉〉 (w16_S 〈n:〈x5,xC〉〉 (
- w16_S 〈n:〈x5,xB〉〉 (w16_S 〈n:〈x5,xA〉〉 (w16_S 〈n:〈x5,x9〉〉 (w16_S 〈n:〈x5,x8〉〉 (
- w16_S 〈n:〈x5,x7〉〉 (w16_S 〈n:〈x5,x6〉〉 (w16_S 〈n:〈x5,x5〉〉 (w16_S 〈n:〈x5,x4〉〉 (
- w16_S 〈n:〈x5,x3〉〉 (w16_S 〈n:〈x5,x2〉〉 (w16_S 〈n:〈x5,x1〉〉 (w16_S 〈n:〈x5,x0〉〉 (w16_to_recw16_aux1_5 ? recw)
- ))))))))))))))).
-
-ndefinition w16_to_recw16_aux1_7 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈n:〈x7,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S 〈n:〈x6,xF〉〉 (w16_S 〈n:〈x6,xE〉〉 (w16_S 〈n:〈x6,xD〉〉 (w16_S 〈n:〈x6,xC〉〉 (
- w16_S 〈n:〈x6,xB〉〉 (w16_S 〈n:〈x6,xA〉〉 (w16_S 〈n:〈x6,x9〉〉 (w16_S 〈n:〈x6,x8〉〉 (
- w16_S 〈n:〈x6,x7〉〉 (w16_S 〈n:〈x6,x6〉〉 (w16_S 〈n:〈x6,x5〉〉 (w16_S 〈n:〈x6,x4〉〉 (
- w16_S 〈n:〈x6,x3〉〉 (w16_S 〈n:〈x6,x2〉〉 (w16_S 〈n:〈x6,x1〉〉 (w16_S 〈n:〈x6,x0〉〉 (w16_to_recw16_aux1_6 ? recw)
- ))))))))))))))).
-
-ndefinition w16_to_recw16_aux1_8 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈n:〈x8,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S 〈n:〈x7,xF〉〉 (w16_S 〈n:〈x7,xE〉〉 (w16_S 〈n:〈x7,xD〉〉 (w16_S 〈n:〈x7,xC〉〉 (
- w16_S 〈n:〈x7,xB〉〉 (w16_S 〈n:〈x7,xA〉〉 (w16_S 〈n:〈x7,x9〉〉 (w16_S 〈n:〈x7,x8〉〉 (
- w16_S 〈n:〈x7,x7〉〉 (w16_S 〈n:〈x7,x6〉〉 (w16_S 〈n:〈x7,x5〉〉 (w16_S 〈n:〈x7,x4〉〉 (
- w16_S 〈n:〈x7,x3〉〉 (w16_S 〈n:〈x7,x2〉〉 (w16_S 〈n:〈x7,x1〉〉 (w16_S 〈n:〈x7,x0〉〉 (w16_to_recw16_aux1_7 ? recw)
- ))))))))))))))).
-
-ndefinition w16_to_recw16_aux1_9 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈n:〈x9,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S 〈n:〈x8,xF〉〉 (w16_S 〈n:〈x8,xE〉〉 (w16_S 〈n:〈x8,xD〉〉 (w16_S 〈n:〈x8,xC〉〉 (
- w16_S 〈n:〈x8,xB〉〉 (w16_S 〈n:〈x8,xA〉〉 (w16_S 〈n:〈x8,x9〉〉 (w16_S 〈n:〈x8,x8〉〉 (
- w16_S 〈n:〈x8,x7〉〉 (w16_S 〈n:〈x8,x6〉〉 (w16_S 〈n:〈x8,x5〉〉 (w16_S 〈n:〈x8,x4〉〉 (
- w16_S 〈n:〈x8,x3〉〉 (w16_S 〈n:〈x8,x2〉〉 (w16_S 〈n:〈x8,x1〉〉 (w16_S 〈n:〈x8,x0〉〉 (w16_to_recw16_aux1_8 ? recw)
- ))))))))))))))).
-
-ndefinition w16_to_recw16_aux1_10 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈n:〈xA,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S 〈n:〈x9,xF〉〉 (w16_S 〈n:〈x9,xE〉〉 (w16_S 〈n:〈x9,xD〉〉 (w16_S 〈n:〈x9,xC〉〉 (
- w16_S 〈n:〈x9,xB〉〉 (w16_S 〈n:〈x9,xA〉〉 (w16_S 〈n:〈x9,x9〉〉 (w16_S 〈n:〈x9,x8〉〉 (
- w16_S 〈n:〈x9,x7〉〉 (w16_S 〈n:〈x9,x6〉〉 (w16_S 〈n:〈x9,x5〉〉 (w16_S 〈n:〈x9,x4〉〉 (
- w16_S 〈n:〈x9,x3〉〉 (w16_S 〈n:〈x9,x2〉〉 (w16_S 〈n:〈x9,x1〉〉 (w16_S 〈n:〈x9,x0〉〉 (w16_to_recw16_aux1_9 ? recw)
- ))))))))))))))).
-
-ndefinition w16_to_recw16_aux1_11 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈n:〈xB,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S 〈n:〈xA,xF〉〉 (w16_S 〈n:〈xA,xE〉〉 (w16_S 〈n:〈xA,xD〉〉 (w16_S 〈n:〈xA,xC〉〉 (
- w16_S 〈n:〈xA,xB〉〉 (w16_S 〈n:〈xA,xA〉〉 (w16_S 〈n:〈xA,x9〉〉 (w16_S 〈n:〈xA,x8〉〉 (
- w16_S 〈n:〈xA,x7〉〉 (w16_S 〈n:〈xA,x6〉〉 (w16_S 〈n:〈xA,x5〉〉 (w16_S 〈n:〈xA,x4〉〉 (
- w16_S 〈n:〈xA,x3〉〉 (w16_S 〈n:〈xA,x2〉〉 (w16_S 〈n:〈xA,x1〉〉 (w16_S 〈n:〈xA,x0〉〉 (w16_to_recw16_aux1_10 ? recw)
- ))))))))))))))).
-
-ndefinition w16_to_recw16_aux1_12 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈n:〈xC,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S 〈n:〈xB,xF〉〉 (w16_S 〈n:〈xB,xE〉〉 (w16_S 〈n:〈xB,xD〉〉 (w16_S 〈n:〈xB,xC〉〉 (
- w16_S 〈n:〈xB,xB〉〉 (w16_S 〈n:〈xB,xA〉〉 (w16_S 〈n:〈xB,x9〉〉 (w16_S 〈n:〈xB,x8〉〉 (
- w16_S 〈n:〈xB,x7〉〉 (w16_S 〈n:〈xB,x6〉〉 (w16_S 〈n:〈xB,x5〉〉 (w16_S 〈n:〈xB,x4〉〉 (
- w16_S 〈n:〈xB,x3〉〉 (w16_S 〈n:〈xB,x2〉〉 (w16_S 〈n:〈xB,x1〉〉 (w16_S 〈n:〈xB,x0〉〉 (w16_to_recw16_aux1_11 ? recw)
- ))))))))))))))).
-
-ndefinition w16_to_recw16_aux1_13 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈n:〈xD,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S 〈n:〈xC,xF〉〉 (w16_S 〈n:〈xC,xE〉〉 (w16_S 〈n:〈xC,xD〉〉 (w16_S 〈n:〈xC,xC〉〉 (
- w16_S 〈n:〈xC,xB〉〉 (w16_S 〈n:〈xC,xA〉〉 (w16_S 〈n:〈xC,x9〉〉 (w16_S 〈n:〈xC,x8〉〉 (
- w16_S 〈n:〈xC,x7〉〉 (w16_S 〈n:〈xC,x6〉〉 (w16_S 〈n:〈xC,x5〉〉 (w16_S 〈n:〈xC,x4〉〉 (
- w16_S 〈n:〈xC,x3〉〉 (w16_S 〈n:〈xC,x2〉〉 (w16_S 〈n:〈xC,x1〉〉 (w16_S 〈n:〈xC,x0〉〉 (w16_to_recw16_aux1_12 ? recw)
- ))))))))))))))).
-
-ndefinition w16_to_recw16_aux1_14 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈n:〈xE,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S 〈n:〈xD,xF〉〉 (w16_S 〈n:〈xD,xE〉〉 (w16_S 〈n:〈xD,xD〉〉 (w16_S 〈n:〈xD,xC〉〉 (
- w16_S 〈n:〈xD,xB〉〉 (w16_S 〈n:〈xD,xA〉〉 (w16_S 〈n:〈xD,x9〉〉 (w16_S 〈n:〈xD,x8〉〉 (
- w16_S 〈n:〈xD,x7〉〉 (w16_S 〈n:〈xD,x6〉〉 (w16_S 〈n:〈xD,x5〉〉 (w16_S 〈n:〈xD,x4〉〉 (
- w16_S 〈n:〈xD,x3〉〉 (w16_S 〈n:〈xD,x2〉〉 (w16_S 〈n:〈xD,x1〉〉 (w16_S 〈n:〈xD,x0〉〉 (w16_to_recw16_aux1_13 ? recw)
- ))))))))))))))).
-
-ndefinition w16_to_recw16_aux1_15 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈n:〈xF,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S 〈n:〈xE,xF〉〉 (w16_S 〈n:〈xE,xE〉〉 (w16_S 〈n:〈xE,xD〉〉 (w16_S 〈n:〈xE,xC〉〉 (
- w16_S 〈n:〈xE,xB〉〉 (w16_S 〈n:〈xE,xA〉〉 (w16_S 〈n:〈xE,x9〉〉 (w16_S 〈n:〈xE,x8〉〉 (
- w16_S 〈n:〈xE,x7〉〉 (w16_S 〈n:〈xE,x6〉〉 (w16_S 〈n:〈xE,x5〉〉 (w16_S 〈n:〈xE,x4〉〉 (
- w16_S 〈n:〈xE,x3〉〉 (w16_S 〈n:〈xE,x2〉〉 (w16_S 〈n:〈xE,x1〉〉 (w16_S 〈n:〈xE,x0〉〉 (w16_to_recw16_aux1_14 ? recw)
- ))))))))))))))).
-
-ndefinition w16_to_recw16_aux1 : Πn.rec_word16 〈n:〈x0,x0〉〉 → rec_word16 〈(succc ? n):〈x0,x0〉〉 ≝
-λn.λrecw:rec_word16 〈n:〈x0,x0〉〉.
- w16_S 〈n:〈xF,xF〉〉 (w16_S 〈n:〈xF,xE〉〉 (w16_S 〈n:〈xF,xD〉〉 (w16_S 〈n:〈xF,xC〉〉 (
- w16_S 〈n:〈xF,xB〉〉 (w16_S 〈n:〈xF,xA〉〉 (w16_S 〈n:〈xF,x9〉〉 (w16_S 〈n:〈xF,x8〉〉 (
- w16_S 〈n:〈xF,x7〉〉 (w16_S 〈n:〈xF,x6〉〉 (w16_S 〈n:〈xF,x5〉〉 (w16_S 〈n:〈xF,x4〉〉 (
- w16_S 〈n:〈xF,x3〉〉 (w16_S 〈n:〈xF,x2〉〉 (w16_S 〈n:〈xF,x1〉〉 (w16_S 〈n:〈xF,x0〉〉 (w16_to_recw16_aux1_15 ? recw)
- ))))))))))))))).
-
-(* ... cifra byte superiore *)
-nlet rec w16_to_recw16_aux2 (n:byte8) (r:rec_byte8 n) on r ≝
- match r return λx.λy:rec_byte8 x.rec_word16 〈x:〈x0,x0〉〉 with
- [ b8_O ⇒ w16_O
- | b8_S t n' ⇒ w16_to_recw16_aux1 ? (w16_to_recw16_aux2 t n')
- ].
-
-(* ... cifra esadecimale n.2 *)
-ndefinition w16_to_recw16_aux3 ≝
-λb,n.λrecw:rec_word16 〈b:〈x0,x0〉〉.
- match n return λx.rec_word16 〈b:〈x,x0〉〉 with
- [ x0 ⇒ recw
- | x1 ⇒ w16_to_recw16_aux1_1 ? recw
- | x2 ⇒ w16_to_recw16_aux1_2 ? recw
- | x3 ⇒ w16_to_recw16_aux1_3 ? recw
- | x4 ⇒ w16_to_recw16_aux1_4 ? recw
- | x5 ⇒ w16_to_recw16_aux1_5 ? recw
- | x6 ⇒ w16_to_recw16_aux1_6 ? recw
- | x7 ⇒ w16_to_recw16_aux1_7 ? recw
- | x8 ⇒ w16_to_recw16_aux1_8 ? recw
- | x9 ⇒ w16_to_recw16_aux1_9 ? recw
- | xA ⇒ w16_to_recw16_aux1_10 ? recw
- | xB ⇒ w16_to_recw16_aux1_11 ? recw
- | xC ⇒ w16_to_recw16_aux1_12 ? recw
- | xD ⇒ w16_to_recw16_aux1_13 ? recw
- | xE ⇒ w16_to_recw16_aux1_14 ? recw
- | xF ⇒ w16_to_recw16_aux1_15 ? recw
- ].
-
-ndefinition w16_to_recw16_aux4_1 : Πn,e.rec_word16 〈n:〈e,x0〉〉 → rec_word16 〈n:〈e,x1〉〉 ≝
-λn,e.
- match e return λx.rec_word16 〈n:〈x,x0〉〉 → rec_word16 〈n:〈x,x1〉〉 with
- [ x0 ⇒ λrecw:rec_word16 〈n:〈x0,x0〉〉.w16_S ? recw
- | x1 ⇒ λrecw:rec_word16 〈n:〈x1,x0〉〉.w16_S ? recw
- | x2 ⇒ λrecw:rec_word16 〈n:〈x2,x0〉〉.w16_S ? recw
- | x3 ⇒ λrecw:rec_word16 〈n:〈x3,x0〉〉.w16_S ? recw
- | x4 ⇒ λrecw:rec_word16 〈n:〈x4,x0〉〉.w16_S ? recw
- | x5 ⇒ λrecw:rec_word16 〈n:〈x5,x0〉〉.w16_S ? recw
- | x6 ⇒ λrecw:rec_word16 〈n:〈x6,x0〉〉.w16_S ? recw
- | x7 ⇒ λrecw:rec_word16 〈n:〈x7,x0〉〉.w16_S ? recw
- | x8 ⇒ λrecw:rec_word16 〈n:〈x8,x0〉〉.w16_S ? recw
- | x9 ⇒ λrecw:rec_word16 〈n:〈x9,x0〉〉.w16_S ? recw
- | xA ⇒ λrecw:rec_word16 〈n:〈xA,x0〉〉.w16_S ? recw
- | xB ⇒ λrecw:rec_word16 〈n:〈xB,x0〉〉.w16_S ? recw
- | xC ⇒ λrecw:rec_word16 〈n:〈xC,x0〉〉.w16_S ? recw
- | xD ⇒ λrecw:rec_word16 〈n:〈xD,x0〉〉.w16_S ? recw
- | xE ⇒ λrecw:rec_word16 〈n:〈xE,x0〉〉.w16_S ? recw
- | xF ⇒ λrecw:rec_word16 〈n:〈xF,x0〉〉.w16_S ? recw
- ].
-
-ndefinition w16_to_recw16_aux4_2 : Πn,e.rec_word16 〈n:〈e,x0〉〉 → rec_word16 〈n:〈e,x2〉〉 ≝
-λn,e.
- match e return λx.rec_word16 〈n:〈x,x0〉〉 → rec_word16 〈n:〈x,x2〉〉 with
- [ x0 ⇒ λrecw:rec_word16 〈n:〈x0,x0〉〉.w16_S ? (w16_to_recw16_aux4_1 … recw)
- | x1 ⇒ λrecw:rec_word16 〈n:〈x1,x0〉〉.w16_S ? (w16_to_recw16_aux4_1 … recw)
- | x2 ⇒ λrecw:rec_word16 〈n:〈x2,x0〉〉.w16_S ? (w16_to_recw16_aux4_1 … recw)
- | x3 ⇒ λrecw:rec_word16 〈n:〈x3,x0〉〉.w16_S ? (w16_to_recw16_aux4_1 … recw)
- | x4 ⇒ λrecw:rec_word16 〈n:〈x4,x0〉〉.w16_S ? (w16_to_recw16_aux4_1 … recw)
- | x5 ⇒ λrecw:rec_word16 〈n:〈x5,x0〉〉.w16_S ? (w16_to_recw16_aux4_1 … recw)
- | x6 ⇒ λrecw:rec_word16 〈n:〈x6,x0〉〉.w16_S ? (w16_to_recw16_aux4_1 … recw)
- | x7 ⇒ λrecw:rec_word16 〈n:〈x7,x0〉〉.w16_S ? (w16_to_recw16_aux4_1 … recw)
- | x8 ⇒ λrecw:rec_word16 〈n:〈x8,x0〉〉.w16_S ? (w16_to_recw16_aux4_1 … recw)
- | x9 ⇒ λrecw:rec_word16 〈n:〈x9,x0〉〉.w16_S ? (w16_to_recw16_aux4_1 … recw)
- | xA ⇒ λrecw:rec_word16 〈n:〈xA,x0〉〉.w16_S ? (w16_to_recw16_aux4_1 … recw)
- | xB ⇒ λrecw:rec_word16 〈n:〈xB,x0〉〉.w16_S ? (w16_to_recw16_aux4_1 … recw)
- | xC ⇒ λrecw:rec_word16 〈n:〈xC,x0〉〉.w16_S ? (w16_to_recw16_aux4_1 … recw)
- | xD ⇒ λrecw:rec_word16 〈n:〈xD,x0〉〉.w16_S ? (w16_to_recw16_aux4_1 … recw)
- | xE ⇒ λrecw:rec_word16 〈n:〈xE,x0〉〉.w16_S ? (w16_to_recw16_aux4_1 … recw)
- | xF ⇒ λrecw:rec_word16 〈n:〈xF,x0〉〉.w16_S ? (w16_to_recw16_aux4_1 … recw)
- ].
-
-ndefinition w16_to_recw16_aux4_3 : Πn,e.rec_word16 〈n:〈e,x0〉〉 → rec_word16 〈n:〈e,x3〉〉 ≝
-λn,e.
- match e return λx.rec_word16 〈n:〈x,x0〉〉 → rec_word16 〈n:〈x,x3〉〉 with
- [ x0 ⇒ λrecw:rec_word16 〈n:〈x0,x0〉〉.w16_S ? (w16_to_recw16_aux4_2 … recw)
- | x1 ⇒ λrecw:rec_word16 〈n:〈x1,x0〉〉.w16_S ? (w16_to_recw16_aux4_2 … recw)
- | x2 ⇒ λrecw:rec_word16 〈n:〈x2,x0〉〉.w16_S ? (w16_to_recw16_aux4_2 … recw)
- | x3 ⇒ λrecw:rec_word16 〈n:〈x3,x0〉〉.w16_S ? (w16_to_recw16_aux4_2 … recw)
- | x4 ⇒ λrecw:rec_word16 〈n:〈x4,x0〉〉.w16_S ? (w16_to_recw16_aux4_2 … recw)
- | x5 ⇒ λrecw:rec_word16 〈n:〈x5,x0〉〉.w16_S ? (w16_to_recw16_aux4_2 … recw)
- | x6 ⇒ λrecw:rec_word16 〈n:〈x6,x0〉〉.w16_S ? (w16_to_recw16_aux4_2 … recw)
- | x7 ⇒ λrecw:rec_word16 〈n:〈x7,x0〉〉.w16_S ? (w16_to_recw16_aux4_2 … recw)
- | x8 ⇒ λrecw:rec_word16 〈n:〈x8,x0〉〉.w16_S ? (w16_to_recw16_aux4_2 … recw)
- | x9 ⇒ λrecw:rec_word16 〈n:〈x9,x0〉〉.w16_S ? (w16_to_recw16_aux4_2 … recw)
- | xA ⇒ λrecw:rec_word16 〈n:〈xA,x0〉〉.w16_S ? (w16_to_recw16_aux4_2 … recw)
- | xB ⇒ λrecw:rec_word16 〈n:〈xB,x0〉〉.w16_S ? (w16_to_recw16_aux4_2 … recw)
- | xC ⇒ λrecw:rec_word16 〈n:〈xC,x0〉〉.w16_S ? (w16_to_recw16_aux4_2 … recw)
- | xD ⇒ λrecw:rec_word16 〈n:〈xD,x0〉〉.w16_S ? (w16_to_recw16_aux4_2 … recw)
- | xE ⇒ λrecw:rec_word16 〈n:〈xE,x0〉〉.w16_S ? (w16_to_recw16_aux4_2 … recw)
- | xF ⇒ λrecw:rec_word16 〈n:〈xF,x0〉〉.w16_S ? (w16_to_recw16_aux4_2 … recw)
- ].
-
-ndefinition w16_to_recw16_aux4_4 : Πn,e.rec_word16 〈n:〈e,x0〉〉 → rec_word16 〈n:〈e,x4〉〉 ≝
-λn,e.
- match e return λx.rec_word16 〈n:〈x,x0〉〉 → rec_word16 〈n:〈x,x4〉〉 with
- [ x0 ⇒ λrecw:rec_word16 〈n:〈x0,x0〉〉.w16_S ? (w16_to_recw16_aux4_3 … recw)
- | x1 ⇒ λrecw:rec_word16 〈n:〈x1,x0〉〉.w16_S ? (w16_to_recw16_aux4_3 … recw)
- | x2 ⇒ λrecw:rec_word16 〈n:〈x2,x0〉〉.w16_S ? (w16_to_recw16_aux4_3 … recw)
- | x3 ⇒ λrecw:rec_word16 〈n:〈x3,x0〉〉.w16_S ? (w16_to_recw16_aux4_3 … recw)
- | x4 ⇒ λrecw:rec_word16 〈n:〈x4,x0〉〉.w16_S ? (w16_to_recw16_aux4_3 … recw)
- | x5 ⇒ λrecw:rec_word16 〈n:〈x5,x0〉〉.w16_S ? (w16_to_recw16_aux4_3 … recw)
- | x6 ⇒ λrecw:rec_word16 〈n:〈x6,x0〉〉.w16_S ? (w16_to_recw16_aux4_3 … recw)
- | x7 ⇒ λrecw:rec_word16 〈n:〈x7,x0〉〉.w16_S ? (w16_to_recw16_aux4_3 … recw)
- | x8 ⇒ λrecw:rec_word16 〈n:〈x8,x0〉〉.w16_S ? (w16_to_recw16_aux4_3 … recw)
- | x9 ⇒ λrecw:rec_word16 〈n:〈x9,x0〉〉.w16_S ? (w16_to_recw16_aux4_3 … recw)
- | xA ⇒ λrecw:rec_word16 〈n:〈xA,x0〉〉.w16_S ? (w16_to_recw16_aux4_3 … recw)
- | xB ⇒ λrecw:rec_word16 〈n:〈xB,x0〉〉.w16_S ? (w16_to_recw16_aux4_3 … recw)
- | xC ⇒ λrecw:rec_word16 〈n:〈xC,x0〉〉.w16_S ? (w16_to_recw16_aux4_3 … recw)
- | xD ⇒ λrecw:rec_word16 〈n:〈xD,x0〉〉.w16_S ? (w16_to_recw16_aux4_3 … recw)
- | xE ⇒ λrecw:rec_word16 〈n:〈xE,x0〉〉.w16_S ? (w16_to_recw16_aux4_3 … recw)
- | xF ⇒ λrecw:rec_word16 〈n:〈xF,x0〉〉.w16_S ? (w16_to_recw16_aux4_3 … recw)
- ].
-
-ndefinition w16_to_recw16_aux4_5 : Πn,e.rec_word16 〈n:〈e,x0〉〉 → rec_word16 〈n:〈e,x5〉〉 ≝
-λn,e.
- match e return λx.rec_word16 〈n:〈x,x0〉〉 → rec_word16 〈n:〈x,x5〉〉 with
- [ x0 ⇒ λrecw:rec_word16 〈n:〈x0,x0〉〉.w16_S ? (w16_to_recw16_aux4_4 … recw)
- | x1 ⇒ λrecw:rec_word16 〈n:〈x1,x0〉〉.w16_S ? (w16_to_recw16_aux4_4 … recw)
- | x2 ⇒ λrecw:rec_word16 〈n:〈x2,x0〉〉.w16_S ? (w16_to_recw16_aux4_4 … recw)
- | x3 ⇒ λrecw:rec_word16 〈n:〈x3,x0〉〉.w16_S ? (w16_to_recw16_aux4_4 … recw)
- | x4 ⇒ λrecw:rec_word16 〈n:〈x4,x0〉〉.w16_S ? (w16_to_recw16_aux4_4 … recw)
- | x5 ⇒ λrecw:rec_word16 〈n:〈x5,x0〉〉.w16_S ? (w16_to_recw16_aux4_4 … recw)
- | x6 ⇒ λrecw:rec_word16 〈n:〈x6,x0〉〉.w16_S ? (w16_to_recw16_aux4_4 … recw)
- | x7 ⇒ λrecw:rec_word16 〈n:〈x7,x0〉〉.w16_S ? (w16_to_recw16_aux4_4 … recw)
- | x8 ⇒ λrecw:rec_word16 〈n:〈x8,x0〉〉.w16_S ? (w16_to_recw16_aux4_4 … recw)
- | x9 ⇒ λrecw:rec_word16 〈n:〈x9,x0〉〉.w16_S ? (w16_to_recw16_aux4_4 … recw)
- | xA ⇒ λrecw:rec_word16 〈n:〈xA,x0〉〉.w16_S ? (w16_to_recw16_aux4_4 … recw)
- | xB ⇒ λrecw:rec_word16 〈n:〈xB,x0〉〉.w16_S ? (w16_to_recw16_aux4_4 … recw)
- | xC ⇒ λrecw:rec_word16 〈n:〈xC,x0〉〉.w16_S ? (w16_to_recw16_aux4_4 … recw)
- | xD ⇒ λrecw:rec_word16 〈n:〈xD,x0〉〉.w16_S ? (w16_to_recw16_aux4_4 … recw)
- | xE ⇒ λrecw:rec_word16 〈n:〈xE,x0〉〉.w16_S ? (w16_to_recw16_aux4_4 … recw)
- | xF ⇒ λrecw:rec_word16 〈n:〈xF,x0〉〉.w16_S ? (w16_to_recw16_aux4_4 … recw)
- ].
-
-ndefinition w16_to_recw16_aux4_6 : Πn,e.rec_word16 〈n:〈e,x0〉〉 → rec_word16 〈n:〈e,x6〉〉 ≝
-λn,e.
- match e return λx.rec_word16 〈n:〈x,x0〉〉 → rec_word16 〈n:〈x,x6〉〉 with
- [ x0 ⇒ λrecw:rec_word16 〈n:〈x0,x0〉〉.w16_S ? (w16_to_recw16_aux4_5 … recw)
- | x1 ⇒ λrecw:rec_word16 〈n:〈x1,x0〉〉.w16_S ? (w16_to_recw16_aux4_5 … recw)
- | x2 ⇒ λrecw:rec_word16 〈n:〈x2,x0〉〉.w16_S ? (w16_to_recw16_aux4_5 … recw)
- | x3 ⇒ λrecw:rec_word16 〈n:〈x3,x0〉〉.w16_S ? (w16_to_recw16_aux4_5 … recw)
- | x4 ⇒ λrecw:rec_word16 〈n:〈x4,x0〉〉.w16_S ? (w16_to_recw16_aux4_5 … recw)
- | x5 ⇒ λrecw:rec_word16 〈n:〈x5,x0〉〉.w16_S ? (w16_to_recw16_aux4_5 … recw)
- | x6 ⇒ λrecw:rec_word16 〈n:〈x6,x0〉〉.w16_S ? (w16_to_recw16_aux4_5 … recw)
- | x7 ⇒ λrecw:rec_word16 〈n:〈x7,x0〉〉.w16_S ? (w16_to_recw16_aux4_5 … recw)
- | x8 ⇒ λrecw:rec_word16 〈n:〈x8,x0〉〉.w16_S ? (w16_to_recw16_aux4_5 … recw)
- | x9 ⇒ λrecw:rec_word16 〈n:〈x9,x0〉〉.w16_S ? (w16_to_recw16_aux4_5 … recw)
- | xA ⇒ λrecw:rec_word16 〈n:〈xA,x0〉〉.w16_S ? (w16_to_recw16_aux4_5 … recw)
- | xB ⇒ λrecw:rec_word16 〈n:〈xB,x0〉〉.w16_S ? (w16_to_recw16_aux4_5 … recw)
- | xC ⇒ λrecw:rec_word16 〈n:〈xC,x0〉〉.w16_S ? (w16_to_recw16_aux4_5 … recw)
- | xD ⇒ λrecw:rec_word16 〈n:〈xD,x0〉〉.w16_S ? (w16_to_recw16_aux4_5 … recw)
- | xE ⇒ λrecw:rec_word16 〈n:〈xE,x0〉〉.w16_S ? (w16_to_recw16_aux4_5 … recw)
- | xF ⇒ λrecw:rec_word16 〈n:〈xF,x0〉〉.w16_S ? (w16_to_recw16_aux4_5 … recw)
- ].
-
-ndefinition w16_to_recw16_aux4_7 : Πn,e.rec_word16 〈n:〈e,x0〉〉 → rec_word16 〈n:〈e,x7〉〉 ≝
-λn,e.
- match e return λx.rec_word16 〈n:〈x,x0〉〉 → rec_word16 〈n:〈x,x7〉〉 with
- [ x0 ⇒ λrecw:rec_word16 〈n:〈x0,x0〉〉.w16_S ? (w16_to_recw16_aux4_6 … recw)
- | x1 ⇒ λrecw:rec_word16 〈n:〈x1,x0〉〉.w16_S ? (w16_to_recw16_aux4_6 … recw)
- | x2 ⇒ λrecw:rec_word16 〈n:〈x2,x0〉〉.w16_S ? (w16_to_recw16_aux4_6 … recw)
- | x3 ⇒ λrecw:rec_word16 〈n:〈x3,x0〉〉.w16_S ? (w16_to_recw16_aux4_6 … recw)
- | x4 ⇒ λrecw:rec_word16 〈n:〈x4,x0〉〉.w16_S ? (w16_to_recw16_aux4_6 … recw)
- | x5 ⇒ λrecw:rec_word16 〈n:〈x5,x0〉〉.w16_S ? (w16_to_recw16_aux4_6 … recw)
- | x6 ⇒ λrecw:rec_word16 〈n:〈x6,x0〉〉.w16_S ? (w16_to_recw16_aux4_6 … recw)
- | x7 ⇒ λrecw:rec_word16 〈n:〈x7,x0〉〉.w16_S ? (w16_to_recw16_aux4_6 … recw)
- | x8 ⇒ λrecw:rec_word16 〈n:〈x8,x0〉〉.w16_S ? (w16_to_recw16_aux4_6 … recw)
- | x9 ⇒ λrecw:rec_word16 〈n:〈x9,x0〉〉.w16_S ? (w16_to_recw16_aux4_6 … recw)
- | xA ⇒ λrecw:rec_word16 〈n:〈xA,x0〉〉.w16_S ? (w16_to_recw16_aux4_6 … recw)
- | xB ⇒ λrecw:rec_word16 〈n:〈xB,x0〉〉.w16_S ? (w16_to_recw16_aux4_6 … recw)
- | xC ⇒ λrecw:rec_word16 〈n:〈xC,x0〉〉.w16_S ? (w16_to_recw16_aux4_6 … recw)
- | xD ⇒ λrecw:rec_word16 〈n:〈xD,x0〉〉.w16_S ? (w16_to_recw16_aux4_6 … recw)
- | xE ⇒ λrecw:rec_word16 〈n:〈xE,x0〉〉.w16_S ? (w16_to_recw16_aux4_6 … recw)
- | xF ⇒ λrecw:rec_word16 〈n:〈xF,x0〉〉.w16_S ? (w16_to_recw16_aux4_6 … recw)
- ].
-
-ndefinition w16_to_recw16_aux4_8 : Πn,e.rec_word16 〈n:〈e,x0〉〉 → rec_word16 〈n:〈e,x8〉〉 ≝
-λn,e.
- match e return λx.rec_word16 〈n:〈x,x0〉〉 → rec_word16 〈n:〈x,x8〉〉 with
- [ x0 ⇒ λrecw:rec_word16 〈n:〈x0,x0〉〉.w16_S ? (w16_to_recw16_aux4_7 … recw)
- | x1 ⇒ λrecw:rec_word16 〈n:〈x1,x0〉〉.w16_S ? (w16_to_recw16_aux4_7 … recw)
- | x2 ⇒ λrecw:rec_word16 〈n:〈x2,x0〉〉.w16_S ? (w16_to_recw16_aux4_7 … recw)
- | x3 ⇒ λrecw:rec_word16 〈n:〈x3,x0〉〉.w16_S ? (w16_to_recw16_aux4_7 … recw)
- | x4 ⇒ λrecw:rec_word16 〈n:〈x4,x0〉〉.w16_S ? (w16_to_recw16_aux4_7 … recw)
- | x5 ⇒ λrecw:rec_word16 〈n:〈x5,x0〉〉.w16_S ? (w16_to_recw16_aux4_7 … recw)
- | x6 ⇒ λrecw:rec_word16 〈n:〈x6,x0〉〉.w16_S ? (w16_to_recw16_aux4_7 … recw)
- | x7 ⇒ λrecw:rec_word16 〈n:〈x7,x0〉〉.w16_S ? (w16_to_recw16_aux4_7 … recw)
- | x8 ⇒ λrecw:rec_word16 〈n:〈x8,x0〉〉.w16_S ? (w16_to_recw16_aux4_7 … recw)
- | x9 ⇒ λrecw:rec_word16 〈n:〈x9,x0〉〉.w16_S ? (w16_to_recw16_aux4_7 … recw)
- | xA ⇒ λrecw:rec_word16 〈n:〈xA,x0〉〉.w16_S ? (w16_to_recw16_aux4_7 … recw)
- | xB ⇒ λrecw:rec_word16 〈n:〈xB,x0〉〉.w16_S ? (w16_to_recw16_aux4_7 … recw)
- | xC ⇒ λrecw:rec_word16 〈n:〈xC,x0〉〉.w16_S ? (w16_to_recw16_aux4_7 … recw)
- | xD ⇒ λrecw:rec_word16 〈n:〈xD,x0〉〉.w16_S ? (w16_to_recw16_aux4_7 … recw)
- | xE ⇒ λrecw:rec_word16 〈n:〈xE,x0〉〉.w16_S ? (w16_to_recw16_aux4_7 … recw)
- | xF ⇒ λrecw:rec_word16 〈n:〈xF,x0〉〉.w16_S ? (w16_to_recw16_aux4_7 … recw)
- ].
-
-ndefinition w16_to_recw16_aux4_9 : Πn,e.rec_word16 〈n:〈e,x0〉〉 → rec_word16 〈n:〈e,x9〉〉 ≝
-λn,e.
- match e return λx.rec_word16 〈n:〈x,x0〉〉 → rec_word16 〈n:〈x,x9〉〉 with
- [ x0 ⇒ λrecw:rec_word16 〈n:〈x0,x0〉〉.w16_S ? (w16_to_recw16_aux4_8 … recw)
- | x1 ⇒ λrecw:rec_word16 〈n:〈x1,x0〉〉.w16_S ? (w16_to_recw16_aux4_8 … recw)
- | x2 ⇒ λrecw:rec_word16 〈n:〈x2,x0〉〉.w16_S ? (w16_to_recw16_aux4_8 … recw)
- | x3 ⇒ λrecw:rec_word16 〈n:〈x3,x0〉〉.w16_S ? (w16_to_recw16_aux4_8 … recw)
- | x4 ⇒ λrecw:rec_word16 〈n:〈x4,x0〉〉.w16_S ? (w16_to_recw16_aux4_8 … recw)
- | x5 ⇒ λrecw:rec_word16 〈n:〈x5,x0〉〉.w16_S ? (w16_to_recw16_aux4_8 … recw)
- | x6 ⇒ λrecw:rec_word16 〈n:〈x6,x0〉〉.w16_S ? (w16_to_recw16_aux4_8 … recw)
- | x7 ⇒ λrecw:rec_word16 〈n:〈x7,x0〉〉.w16_S ? (w16_to_recw16_aux4_8 … recw)
- | x8 ⇒ λrecw:rec_word16 〈n:〈x8,x0〉〉.w16_S ? (w16_to_recw16_aux4_8 … recw)
- | x9 ⇒ λrecw:rec_word16 〈n:〈x9,x0〉〉.w16_S ? (w16_to_recw16_aux4_8 … recw)
- | xA ⇒ λrecw:rec_word16 〈n:〈xA,x0〉〉.w16_S ? (w16_to_recw16_aux4_8 … recw)
- | xB ⇒ λrecw:rec_word16 〈n:〈xB,x0〉〉.w16_S ? (w16_to_recw16_aux4_8 … recw)
- | xC ⇒ λrecw:rec_word16 〈n:〈xC,x0〉〉.w16_S ? (w16_to_recw16_aux4_8 … recw)
- | xD ⇒ λrecw:rec_word16 〈n:〈xD,x0〉〉.w16_S ? (w16_to_recw16_aux4_8 … recw)
- | xE ⇒ λrecw:rec_word16 〈n:〈xE,x0〉〉.w16_S ? (w16_to_recw16_aux4_8 … recw)
- | xF ⇒ λrecw:rec_word16 〈n:〈xF,x0〉〉.w16_S ? (w16_to_recw16_aux4_8 … recw)
- ].
-
-ndefinition w16_to_recw16_aux4_10 : Πn,e.rec_word16 〈n:〈e,x0〉〉 → rec_word16 〈n:〈e,xA〉〉 ≝
-λn,e.
- match e return λx.rec_word16 〈n:〈x,x0〉〉 → rec_word16 〈n:〈x,xA〉〉 with
- [ x0 ⇒ λrecw:rec_word16 〈n:〈x0,x0〉〉.w16_S ? (w16_to_recw16_aux4_9 … recw)
- | x1 ⇒ λrecw:rec_word16 〈n:〈x1,x0〉〉.w16_S ? (w16_to_recw16_aux4_9 … recw)
- | x2 ⇒ λrecw:rec_word16 〈n:〈x2,x0〉〉.w16_S ? (w16_to_recw16_aux4_9 … recw)
- | x3 ⇒ λrecw:rec_word16 〈n:〈x3,x0〉〉.w16_S ? (w16_to_recw16_aux4_9 … recw)
- | x4 ⇒ λrecw:rec_word16 〈n:〈x4,x0〉〉.w16_S ? (w16_to_recw16_aux4_9 … recw)
- | x5 ⇒ λrecw:rec_word16 〈n:〈x5,x0〉〉.w16_S ? (w16_to_recw16_aux4_9 … recw)
- | x6 ⇒ λrecw:rec_word16 〈n:〈x6,x0〉〉.w16_S ? (w16_to_recw16_aux4_9 … recw)
- | x7 ⇒ λrecw:rec_word16 〈n:〈x7,x0〉〉.w16_S ? (w16_to_recw16_aux4_9 … recw)
- | x8 ⇒ λrecw:rec_word16 〈n:〈x8,x0〉〉.w16_S ? (w16_to_recw16_aux4_9 … recw)
- | x9 ⇒ λrecw:rec_word16 〈n:〈x9,x0〉〉.w16_S ? (w16_to_recw16_aux4_9 … recw)
- | xA ⇒ λrecw:rec_word16 〈n:〈xA,x0〉〉.w16_S ? (w16_to_recw16_aux4_9 … recw)
- | xB ⇒ λrecw:rec_word16 〈n:〈xB,x0〉〉.w16_S ? (w16_to_recw16_aux4_9 … recw)
- | xC ⇒ λrecw:rec_word16 〈n:〈xC,x0〉〉.w16_S ? (w16_to_recw16_aux4_9 … recw)
- | xD ⇒ λrecw:rec_word16 〈n:〈xD,x0〉〉.w16_S ? (w16_to_recw16_aux4_9 … recw)
- | xE ⇒ λrecw:rec_word16 〈n:〈xE,x0〉〉.w16_S ? (w16_to_recw16_aux4_9 … recw)
- | xF ⇒ λrecw:rec_word16 〈n:〈xF,x0〉〉.w16_S ? (w16_to_recw16_aux4_9 … recw)
- ].
-
-ndefinition w16_to_recw16_aux4_11 : Πn,e.rec_word16 〈n:〈e,x0〉〉 → rec_word16 〈n:〈e,xB〉〉 ≝
-λn,e.
- match e return λx.rec_word16 〈n:〈x,x0〉〉 → rec_word16 〈n:〈x,xB〉〉 with
- [ x0 ⇒ λrecw:rec_word16 〈n:〈x0,x0〉〉.w16_S ? (w16_to_recw16_aux4_10 … recw)
- | x1 ⇒ λrecw:rec_word16 〈n:〈x1,x0〉〉.w16_S ? (w16_to_recw16_aux4_10 … recw)
- | x2 ⇒ λrecw:rec_word16 〈n:〈x2,x0〉〉.w16_S ? (w16_to_recw16_aux4_10 … recw)
- | x3 ⇒ λrecw:rec_word16 〈n:〈x3,x0〉〉.w16_S ? (w16_to_recw16_aux4_10 … recw)
- | x4 ⇒ λrecw:rec_word16 〈n:〈x4,x0〉〉.w16_S ? (w16_to_recw16_aux4_10 … recw)
- | x5 ⇒ λrecw:rec_word16 〈n:〈x5,x0〉〉.w16_S ? (w16_to_recw16_aux4_10 … recw)
- | x6 ⇒ λrecw:rec_word16 〈n:〈x6,x0〉〉.w16_S ? (w16_to_recw16_aux4_10 … recw)
- | x7 ⇒ λrecw:rec_word16 〈n:〈x7,x0〉〉.w16_S ? (w16_to_recw16_aux4_10 … recw)
- | x8 ⇒ λrecw:rec_word16 〈n:〈x8,x0〉〉.w16_S ? (w16_to_recw16_aux4_10 … recw)
- | x9 ⇒ λrecw:rec_word16 〈n:〈x9,x0〉〉.w16_S ? (w16_to_recw16_aux4_10 … recw)
- | xA ⇒ λrecw:rec_word16 〈n:〈xA,x0〉〉.w16_S ? (w16_to_recw16_aux4_10 … recw)
- | xB ⇒ λrecw:rec_word16 〈n:〈xB,x0〉〉.w16_S ? (w16_to_recw16_aux4_10 … recw)
- | xC ⇒ λrecw:rec_word16 〈n:〈xC,x0〉〉.w16_S ? (w16_to_recw16_aux4_10 … recw)
- | xD ⇒ λrecw:rec_word16 〈n:〈xD,x0〉〉.w16_S ? (w16_to_recw16_aux4_10 … recw)
- | xE ⇒ λrecw:rec_word16 〈n:〈xE,x0〉〉.w16_S ? (w16_to_recw16_aux4_10 … recw)
- | xF ⇒ λrecw:rec_word16 〈n:〈xF,x0〉〉.w16_S ? (w16_to_recw16_aux4_10 … recw)
- ].
-
-ndefinition w16_to_recw16_aux4_12 : Πn,e.rec_word16 〈n:〈e,x0〉〉 → rec_word16 〈n:〈e,xC〉〉 ≝
-λn,e.
- match e return λx.rec_word16 〈n:〈x,x0〉〉 → rec_word16 〈n:〈x,xC〉〉 with
- [ x0 ⇒ λrecw:rec_word16 〈n:〈x0,x0〉〉.w16_S ? (w16_to_recw16_aux4_11 … recw)
- | x1 ⇒ λrecw:rec_word16 〈n:〈x1,x0〉〉.w16_S ? (w16_to_recw16_aux4_11 … recw)
- | x2 ⇒ λrecw:rec_word16 〈n:〈x2,x0〉〉.w16_S ? (w16_to_recw16_aux4_11 … recw)
- | x3 ⇒ λrecw:rec_word16 〈n:〈x3,x0〉〉.w16_S ? (w16_to_recw16_aux4_11 … recw)
- | x4 ⇒ λrecw:rec_word16 〈n:〈x4,x0〉〉.w16_S ? (w16_to_recw16_aux4_11 … recw)
- | x5 ⇒ λrecw:rec_word16 〈n:〈x5,x0〉〉.w16_S ? (w16_to_recw16_aux4_11 … recw)
- | x6 ⇒ λrecw:rec_word16 〈n:〈x6,x0〉〉.w16_S ? (w16_to_recw16_aux4_11 … recw)
- | x7 ⇒ λrecw:rec_word16 〈n:〈x7,x0〉〉.w16_S ? (w16_to_recw16_aux4_11 … recw)
- | x8 ⇒ λrecw:rec_word16 〈n:〈x8,x0〉〉.w16_S ? (w16_to_recw16_aux4_11 … recw)
- | x9 ⇒ λrecw:rec_word16 〈n:〈x9,x0〉〉.w16_S ? (w16_to_recw16_aux4_11 … recw)
- | xA ⇒ λrecw:rec_word16 〈n:〈xA,x0〉〉.w16_S ? (w16_to_recw16_aux4_11 … recw)
- | xB ⇒ λrecw:rec_word16 〈n:〈xB,x0〉〉.w16_S ? (w16_to_recw16_aux4_11 … recw)
- | xC ⇒ λrecw:rec_word16 〈n:〈xC,x0〉〉.w16_S ? (w16_to_recw16_aux4_11 … recw)
- | xD ⇒ λrecw:rec_word16 〈n:〈xD,x0〉〉.w16_S ? (w16_to_recw16_aux4_11 … recw)
- | xE ⇒ λrecw:rec_word16 〈n:〈xE,x0〉〉.w16_S ? (w16_to_recw16_aux4_11 … recw)
- | xF ⇒ λrecw:rec_word16 〈n:〈xF,x0〉〉.w16_S ? (w16_to_recw16_aux4_11 … recw)
- ].
-
-ndefinition w16_to_recw16_aux4_13 : Πn,e.rec_word16 〈n:〈e,x0〉〉 → rec_word16 〈n:〈e,xD〉〉 ≝
-λn,e.
- match e return λx.rec_word16 〈n:〈x,x0〉〉 → rec_word16 〈n:〈x,xD〉〉 with
- [ x0 ⇒ λrecw:rec_word16 〈n:〈x0,x0〉〉.w16_S ? (w16_to_recw16_aux4_12 … recw)
- | x1 ⇒ λrecw:rec_word16 〈n:〈x1,x0〉〉.w16_S ? (w16_to_recw16_aux4_12 … recw)
- | x2 ⇒ λrecw:rec_word16 〈n:〈x2,x0〉〉.w16_S ? (w16_to_recw16_aux4_12 … recw)
- | x3 ⇒ λrecw:rec_word16 〈n:〈x3,x0〉〉.w16_S ? (w16_to_recw16_aux4_12 … recw)
- | x4 ⇒ λrecw:rec_word16 〈n:〈x4,x0〉〉.w16_S ? (w16_to_recw16_aux4_12 … recw)
- | x5 ⇒ λrecw:rec_word16 〈n:〈x5,x0〉〉.w16_S ? (w16_to_recw16_aux4_12 … recw)
- | x6 ⇒ λrecw:rec_word16 〈n:〈x6,x0〉〉.w16_S ? (w16_to_recw16_aux4_12 … recw)
- | x7 ⇒ λrecw:rec_word16 〈n:〈x7,x0〉〉.w16_S ? (w16_to_recw16_aux4_12 … recw)
- | x8 ⇒ λrecw:rec_word16 〈n:〈x8,x0〉〉.w16_S ? (w16_to_recw16_aux4_12 … recw)
- | x9 ⇒ λrecw:rec_word16 〈n:〈x9,x0〉〉.w16_S ? (w16_to_recw16_aux4_12 … recw)
- | xA ⇒ λrecw:rec_word16 〈n:〈xA,x0〉〉.w16_S ? (w16_to_recw16_aux4_12 … recw)
- | xB ⇒ λrecw:rec_word16 〈n:〈xB,x0〉〉.w16_S ? (w16_to_recw16_aux4_12 … recw)
- | xC ⇒ λrecw:rec_word16 〈n:〈xC,x0〉〉.w16_S ? (w16_to_recw16_aux4_12 … recw)
- | xD ⇒ λrecw:rec_word16 〈n:〈xD,x0〉〉.w16_S ? (w16_to_recw16_aux4_12 … recw)
- | xE ⇒ λrecw:rec_word16 〈n:〈xE,x0〉〉.w16_S ? (w16_to_recw16_aux4_12 … recw)
- | xF ⇒ λrecw:rec_word16 〈n:〈xF,x0〉〉.w16_S ? (w16_to_recw16_aux4_12 … recw)
- ].
-
-ndefinition w16_to_recw16_aux4_14 : Πn,e.rec_word16 〈n:〈e,x0〉〉 → rec_word16 〈n:〈e,xE〉〉 ≝
-λn,e.
- match e return λx.rec_word16 〈n:〈x,x0〉〉 → rec_word16 〈n:〈x,xE〉〉 with
- [ x0 ⇒ λrecw:rec_word16 〈n:〈x0,x0〉〉.w16_S ? (w16_to_recw16_aux4_13 … recw)
- | x1 ⇒ λrecw:rec_word16 〈n:〈x1,x0〉〉.w16_S ? (w16_to_recw16_aux4_13 … recw)
- | x2 ⇒ λrecw:rec_word16 〈n:〈x2,x0〉〉.w16_S ? (w16_to_recw16_aux4_13 … recw)
- | x3 ⇒ λrecw:rec_word16 〈n:〈x3,x0〉〉.w16_S ? (w16_to_recw16_aux4_13 … recw)
- | x4 ⇒ λrecw:rec_word16 〈n:〈x4,x0〉〉.w16_S ? (w16_to_recw16_aux4_13 … recw)
- | x5 ⇒ λrecw:rec_word16 〈n:〈x5,x0〉〉.w16_S ? (w16_to_recw16_aux4_13 … recw)
- | x6 ⇒ λrecw:rec_word16 〈n:〈x6,x0〉〉.w16_S ? (w16_to_recw16_aux4_13 … recw)
- | x7 ⇒ λrecw:rec_word16 〈n:〈x7,x0〉〉.w16_S ? (w16_to_recw16_aux4_13 … recw)
- | x8 ⇒ λrecw:rec_word16 〈n:〈x8,x0〉〉.w16_S ? (w16_to_recw16_aux4_13 … recw)
- | x9 ⇒ λrecw:rec_word16 〈n:〈x9,x0〉〉.w16_S ? (w16_to_recw16_aux4_13 … recw)
- | xA ⇒ λrecw:rec_word16 〈n:〈xA,x0〉〉.w16_S ? (w16_to_recw16_aux4_13 … recw)
- | xB ⇒ λrecw:rec_word16 〈n:〈xB,x0〉〉.w16_S ? (w16_to_recw16_aux4_13 … recw)
- | xC ⇒ λrecw:rec_word16 〈n:〈xC,x0〉〉.w16_S ? (w16_to_recw16_aux4_13 … recw)
- | xD ⇒ λrecw:rec_word16 〈n:〈xD,x0〉〉.w16_S ? (w16_to_recw16_aux4_13 … recw)
- | xE ⇒ λrecw:rec_word16 〈n:〈xE,x0〉〉.w16_S ? (w16_to_recw16_aux4_13 … recw)
- | xF ⇒ λrecw:rec_word16 〈n:〈xF,x0〉〉.w16_S ? (w16_to_recw16_aux4_13 … recw)
- ].
-
-ndefinition w16_to_recw16_aux4_15 : Πn,e.rec_word16 〈n:〈e,x0〉〉 → rec_word16 〈n:〈e,xF〉〉 ≝
-λn,e.
- match e return λx.rec_word16 〈n:〈x,x0〉〉 → rec_word16 〈n:〈x,xF〉〉 with
- [ x0 ⇒ λrecw:rec_word16 〈n:〈x0,x0〉〉.w16_S ? (w16_to_recw16_aux4_14 … recw)
- | x1 ⇒ λrecw:rec_word16 〈n:〈x1,x0〉〉.w16_S ? (w16_to_recw16_aux4_14 … recw)
- | x2 ⇒ λrecw:rec_word16 〈n:〈x2,x0〉〉.w16_S ? (w16_to_recw16_aux4_14 … recw)
- | x3 ⇒ λrecw:rec_word16 〈n:〈x3,x0〉〉.w16_S ? (w16_to_recw16_aux4_14 … recw)
- | x4 ⇒ λrecw:rec_word16 〈n:〈x4,x0〉〉.w16_S ? (w16_to_recw16_aux4_14 … recw)
- | x5 ⇒ λrecw:rec_word16 〈n:〈x5,x0〉〉.w16_S ? (w16_to_recw16_aux4_14 … recw)
- | x6 ⇒ λrecw:rec_word16 〈n:〈x6,x0〉〉.w16_S ? (w16_to_recw16_aux4_14 … recw)
- | x7 ⇒ λrecw:rec_word16 〈n:〈x7,x0〉〉.w16_S ? (w16_to_recw16_aux4_14 … recw)
- | x8 ⇒ λrecw:rec_word16 〈n:〈x8,x0〉〉.w16_S ? (w16_to_recw16_aux4_14 … recw)
- | x9 ⇒ λrecw:rec_word16 〈n:〈x9,x0〉〉.w16_S ? (w16_to_recw16_aux4_14 … recw)
- | xA ⇒ λrecw:rec_word16 〈n:〈xA,x0〉〉.w16_S ? (w16_to_recw16_aux4_14 … recw)
- | xB ⇒ λrecw:rec_word16 〈n:〈xB,x0〉〉.w16_S ? (w16_to_recw16_aux4_14 … recw)
- | xC ⇒ λrecw:rec_word16 〈n:〈xC,x0〉〉.w16_S ? (w16_to_recw16_aux4_14 … recw)
- | xD ⇒ λrecw:rec_word16 〈n:〈xD,x0〉〉.w16_S ? (w16_to_recw16_aux4_14 … recw)
- | xE ⇒ λrecw:rec_word16 〈n:〈xE,x0〉〉.w16_S ? (w16_to_recw16_aux4_14 … recw)
- | xF ⇒ λrecw:rec_word16 〈n:〈xF,x0〉〉.w16_S ? (w16_to_recw16_aux4_14 … recw)
- ].
-
-(* ... cifra esadecimale n.1 *)
-ndefinition w16_to_recw16_aux4 ≝
-λb,e,n.λrecw:rec_word16 〈b:〈e,x0〉〉.
- match n return λx.rec_word16 〈b:〈e,x〉〉 with
- [ x0 ⇒ recw
- | x1 ⇒ w16_to_recw16_aux4_1 … recw
- | x2 ⇒ w16_to_recw16_aux4_2 … recw
- | x3 ⇒ w16_to_recw16_aux4_3 … recw
- | x4 ⇒ w16_to_recw16_aux4_4 … recw
- | x5 ⇒ w16_to_recw16_aux4_5 … recw
- | x6 ⇒ w16_to_recw16_aux4_6 … recw
- | x7 ⇒ w16_to_recw16_aux4_7 … recw
- | x8 ⇒ w16_to_recw16_aux4_8 … recw
- | x9 ⇒ w16_to_recw16_aux4_9 … recw
- | xA ⇒ w16_to_recw16_aux4_10 … recw
- | xB ⇒ w16_to_recw16_aux4_11 … recw
- | xC ⇒ w16_to_recw16_aux4_12 … recw
- | xD ⇒ w16_to_recw16_aux4_13 … recw
- | xE ⇒ w16_to_recw16_aux4_14 … recw
- | xF ⇒ w16_to_recw16_aux4_15 … recw
- ].
-
-ndefinition w16_to_recw16 : Πw.rec_word16 w ≝
-λw.
- match w with [ mk_comp_num h l ⇒
- match l with [ mk_comp_num lh ll ⇒
- w16_to_recw16_aux4 h lh ll (w16_to_recw16_aux3 h lh (w16_to_recw16_aux2 h (b8_to_recb8 h))) ]].
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/byte8.ma".
-
-(* ********* *)
-(* BYTE+WORD *)
-(* ********* *)
-
-nrecord word24 : Type ≝
- {
- w24x: byte8;
- w24h: byte8;
- w24l: byte8
- }.
-
-(* \langle \rangle *)
-notation "〈x;y;z〉" non associative with precedence 80
- for @{ 'mk_word24 $x $y $z }.
-interpretation "mk_word24" 'mk_word24 x y z = (mk_word24 x y z).
-
-(* operatore = *)
-ndefinition eq_w24 ≝
-λw1,w2.(eqc ? (w24x w1) (w24x w2)) ⊗
- (eqc ? (w24h w1) (w24h w2)) ⊗
- (eqc ? (w24l w1) (w24l w2)).
-
-ndefinition succ_w24 ≝
-λw.match eqc ? (predc ? (zeroc ?)) (w24l w) with
- [ true ⇒ match eqc ? (predc ? (zeroc ?)) (w24h w) with
- [ true ⇒ 〈(succc ? (w24x w));(succc ? (w24h w));(succc ? (w24l w))〉
- | false ⇒ 〈(w24x w);(succc ? (w24h w));(succc ? (w24l w))〉 ]
- | false ⇒ 〈(w24x w);(w24h w);(succc ? (w24l w))〉 ].
-
-nlemma word24_destruct_1 :
-∀x1,x2,y1,y2,z1,z2.
- mk_word24 x1 y1 z1 = mk_word24 x2 y2 z2 → x1 = x2.
- #x1; #x2; #y1; #y2; #z1; #z2; #H;
- nchange with (match mk_word24 x2 y2 z2 with [ mk_word24 a _ _ ⇒ x1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma word24_destruct_2 :
-∀x1,x2,y1,y2,z1,z2.
- mk_word24 x1 y1 z1 = mk_word24 x2 y2 z2 → y1 = y2.
- #x1; #x2; #y1; #y2; #z1; #z2; #H;
- nchange with (match mk_word24 x2 y2 z2 with [ mk_word24 _ a _ ⇒ y1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma word24_destruct_3 :
-∀x1,x2,y1,y2,z1,z2.
- mk_word24 x1 y1 z1 = mk_word24 x2 y2 z2 → z1 = z2.
- #x1; #x2; #y1; #y2; #z1; #z2; #H;
- nchange with (match mk_word24 x2 y2 z2 with [ mk_word24 _ _ a ⇒ z1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma symmetric_eqw24 : symmetricT word24 bool eq_w24.
- #b1; nelim b1; #e1; #e2; #e3;
- #b2; nelim b2; #e4; #e5; #e6;
- nchange with (((eqc ? e1 e4)⊗(eqc ? e2 e5)⊗(eqc ? e3 e6)) = ((eqc ? e4 e1)⊗(eqc ? e5 e2)⊗(eqc ? e6 e3)));
- nrewrite > (symmetric_eqc ? e1 e4);
- nrewrite > (symmetric_eqc ? e2 e5);
- nrewrite > (symmetric_eqc ? e3 e6);
- napply refl_eq.
-nqed.
-
-nlemma eqw24_to_eq : ∀b1,b2.(eq_w24 b1 b2 = true) → (b1 = b2).
- #b1; nelim b1; #e1; #e2; #e3;
- #b2; nelim b2; #e4; #e5; #e6;
- nchange in ⊢ (% → ?) with (((eqc ? e1 e4)⊗(eqc ? e2 e5)⊗(eqc ? e3 e6)) = true);
- #H;
- nrewrite < (eqc_to_eq … (andb_true_true_r … H));
- nrewrite < (eqc_to_eq … (andb_true_true_r … (andb_true_true_l … H)));
- nrewrite < (eqc_to_eq … (andb_true_true_l … (andb_true_true_l … H)));
- napply refl_eq.
-nqed.
-
-nlemma eq_to_eqw24 : ∀b1,b2.(b1 = b2) → (eq_w24 b1 b2 = true).
- #b1; nelim b1; #e1; #e2; #e3;
- #b2; nelim b2; #e4; #e5; #e6;
- #H;
- nchange with (((eqc ? e1 e4)⊗(eqc ? e2 e5)⊗(eqc ? e3 e6)) = true);
- nrewrite < (word24_destruct_1 … H);
- nrewrite < (word24_destruct_2 … H);
- nrewrite < (word24_destruct_3 … H);
- nrewrite > (eq_to_eqc ? e1 e1 (refl_eq …));
- nrewrite > (eq_to_eqc ? e2 e2 (refl_eq …));
- nrewrite > (eq_to_eqc ? e3 e3 (refl_eq …));
- nnormalize;
- napply refl_eq.
-nqed.
-
-nlemma decidable_w24_aux1 :
-∀e1,e2,e3,e4,e5,e6.e1 ≠ e4 → (mk_word24 e1 e2 e3) ≠ (mk_word24 e4 e5 e6).
- #e1; #e2; #e3; #e4; #e5; #e6;
- nnormalize; #H; #H1;
- napply (H (word24_destruct_1 … H1)).
-nqed.
-
-nlemma decidable_w24_aux2 :
-∀e1,e2,e3,e4,e5,e6.e2 ≠ e5 → (mk_word24 e1 e2 e3) ≠ (mk_word24 e4 e5 e6).
- #e1; #e2; #e3; #e4; #e5; #e6;
- nnormalize; #H; #H1;
- napply (H (word24_destruct_2 … H1)).
-nqed.
-
-nlemma decidable_w24_aux3 :
-∀e1,e2,e3,e4,e5,e6.e3 ≠ e6 → (mk_word24 e1 e2 e3) ≠ (mk_word24 e4 e5 e6).
- #e1; #e2; #e3; #e4; #e5; #e6;
- nnormalize; #H; #H1;
- napply (H (word24_destruct_3 … H1)).
-nqed.
-
-nlemma decidable_w24 : ∀b1,b2:word24.(decidable (b1 = b2)).
- #b1; nelim b1; #e1; #e2; #e3;
- #b2; nelim b2; #e4; #e5; #e6;
- nnormalize;
- napply (or2_elim (e1 = e4) (e1 ≠ e4) ? (decidable_c ? e1 e4) …);
- ##[ ##2: #H; napply (or2_intro2 … (decidable_w24_aux1 e1 e2 e3 e4 e5 e6 H))
- ##| ##1: #H; napply (or2_elim (e2 = e5) (e2 ≠ e5) ? (decidable_c ? e2 e5) …);
- ##[ ##2: #H1; napply (or2_intro2 … (decidable_w24_aux2 e1 e2 e3 e4 e5 e6 H1))
- ##| ##1: #H1; napply (or2_elim (e3 = e6) (e3 ≠ e6) ? (decidable_c ? e3 e6) …);
- ##[ ##2: #H2; napply (or2_intro2 … (decidable_w24_aux3 e1 e2 e3 e4 e5 e6 H2))
- ##| ##1: #H2; nrewrite > H; nrewrite > H1; nrewrite > H2;
- napply (or2_intro1 … (refl_eq ? (mk_word24 e4 e5 e6)))
- ##]
- ##]
- ##]
-nqed.
-
-nlemma neqw24_to_neq : ∀b1,b2.(eq_w24 b1 b2 = false) → (b1 ≠ b2).
- #b1; nelim b1; #e1; #e2; #e3;
- #b2; nelim b2; #e4; #e5; #e6;
- #H;
- nchange in H:(%) with (((eqc ? e1 e4)⊗(eqc ? e2 e5)⊗(eqc ? e3 e6)) = false);
- #H1;
- nrewrite > (word24_destruct_1 … H1) in H:(%);
- nrewrite > (word24_destruct_2 … H1);
- nrewrite > (word24_destruct_3 … H1);
- nrewrite > (eq_to_eqc ? e4 e4 (refl_eq …));
- nrewrite > (eq_to_eqc ? e5 e5 (refl_eq …));
- nrewrite > (eq_to_eqc ? e6 e6 (refl_eq …));
- #H; ndestruct.
-nqed.
-
-nlemma word24_destruct :
-∀e1,e2,e3,e4,e5,e6.
- ((mk_word24 e1 e2 e3) ≠ (mk_word24 e4 e5 e6)) →
- (Or3 (e1 ≠ e4) (e2 ≠ e5) (e3 ≠ e6)).
- #e1; #e2; #e3; #e4; #e5; #e6;
- nnormalize; #H;
- napply (or2_elim (e1 = e4) (e1 ≠ e4) ? (decidable_c ? e1 e4) …);
- ##[ ##2: #H1; napply (or3_intro1 … H1)
- ##| ##1: #H1; napply (or2_elim (e2 = e5) (e2 ≠ e5) ? (decidable_c ? e2 e5) …);
- ##[ ##2: #H2; napply (or3_intro2 … H2)
- ##| ##1: #H2; napply (or2_elim (e3 = e6) (e3 ≠ e6) ? (decidable_c ? e3 e6) …);
- ##[ ##2: #H3; napply (or3_intro3 … H3)
- ##| ##1: #H3; nrewrite > H1 in H:(%);
- nrewrite > H2; nrewrite > H3;
- #H; nelim (H (refl_eq …))
- ##]
- ##]
- ##]
-nqed.
-
-nlemma neq_to_neqw24 : ∀b1,b2.((b1 ≠ b2) → (eq_w24 b1 b2 = false)).
- #b1; nelim b1; #e1; #e2; #e3;
- #b2; nelim b2; #e4; #e5; #e6;
- #H; nchange with (((eqc ? e1 e4)⊗(eqc ? e2 e5)⊗(eqc ? e3 e6)) = false);
- napply (or3_elim (e1 ≠ e4) (e2 ≠ e5) (e3 ≠ e6) ? (word24_destruct e1 e2 e3 e4 e5 e6 … H) …);
- ##[ ##1: #H1; nrewrite > (neq_to_neqc ? e1 e4 H1); nnormalize; napply refl_eq
- ##| ##2: #H1; nrewrite > (neq_to_neqc ? e2 e5 H1);
- nrewrite > (symmetric_andbool (eqc ? e1 e4) …);
- nnormalize; napply refl_eq
- ##| ##3: #H1; nrewrite > (neq_to_neqc ? e3 e6 H1);
- nrewrite > (symmetric_andbool ((eqc ? e1 e4)⊗(eqc ? e2 e5)) …);
- nnormalize; napply refl_eq
- ##]
-nqed.
-
-nlemma word24_is_comparable : comparable.
- @ word24
- ##[ napply (mk_word24 (zeroc ?) (zeroc ?) (zeroc ?))
- ##| napply (λP.forallc ?
- (λx.forallc ?
- (λh.forallc ?
- (λl.P (mk_word24 x h l)))))
- ##| napply eq_w24
- ##| napply eqw24_to_eq
- ##| napply eq_to_eqw24
- ##| napply neqw24_to_neq
- ##| napply neq_to_neqw24
- ##| napply decidable_w24
- ##| napply symmetric_eqw24
- ##]
-nqed.
-
-unification hint 0 ≔ ⊢ carr word24_is_comparable ≡ word24.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "num/word16.ma".
-
-(* ***** *)
-(* DWORD *)
-(* ***** *)
-
-ndefinition word32 ≝ comp_num word16.
-ndefinition mk_word32 ≝ λw1,w2.mk_comp_num word16 w1 w2.
-
-(* \langle \rangle *)
-notation "〈x.y〉" non associative with precedence 80
- for @{ mk_comp_num word16 $x $y }.
-
-ndefinition word32_is_comparable ≝ cn_is_comparable word16_is_comparable.
-ndefinition word32_is_comparable_ext ≝ cn_is_comparable_ext word16_is_comparable_ext.
-unification hint 0 ≔ ⊢ carr (comp_base word32_is_comparable_ext) ≡ comp_num (comp_num (comp_num exadecim)).
-unification hint 0 ≔ ⊢ carr (comp_base word32_is_comparable_ext) ≡ comp_num (comp_num byte8).
-unification hint 0 ≔ ⊢ carr (comp_base word32_is_comparable_ext) ≡ comp_num word16.
-unification hint 0 ≔ ⊢ carr (comp_base word32_is_comparable_ext) ≡ word32.
-unification hint 0 ≔ ⊢ carr word32_is_comparable ≡ comp_num (comp_num (comp_num exadecim)).
-unification hint 0 ≔ ⊢ carr word32_is_comparable ≡ comp_num (comp_num byte8).
-unification hint 0 ≔ ⊢ carr word32_is_comparable ≡ comp_num word16.
-unification hint 0 ≔ ⊢ carr word32_is_comparable ≡ word32.
-
-(* operatore estensione unsigned *)
-ndefinition extu_w32 ≝ λw2.〈zeroc ?.w2〉.
-ndefinition extu2_w32 ≝ λb2.〈zeroc ?.〈zeroc ?:b2〉〉.
-ndefinition extu3_w32 ≝ λe2.〈zeroc ?.〈zeroc ?:〈zeroc ?,e2〉〉〉.
-
-(* operatore estensione signed *)
-ndefinition exts_w32 ≝
-λw2.〈(match getMSBc ? w2 with
- [ true ⇒ predc ? (zeroc ?) | false ⇒ zeroc ? ]).w2〉.
-ndefinition exts2_w32 ≝
-λb2.(match getMSBc ? b2 with
- [ true ⇒ 〈predc ? (zeroc ?).〈predc ? (zeroc ?):b2〉〉
- | false ⇒ 〈zeroc ?.〈zeroc ?:b2〉〉 ]).
-ndefinition exts3_w32 ≝
-λe2.(match getMSBc ? e2 with
- [ true ⇒ 〈predc ? (zeroc ?).〈predc ? (zeroc ?):〈predc ? (zeroc ?),e2〉〉〉
- | false ⇒ 〈zeroc ?.〈zeroc ?:〈zeroc ?,e2〉〉〉 ]).
-
-(* operatore moltiplicazione senza segno *)
-(* 〈a1,a2〉 * 〈b1,b2〉 = (a1*b1) x0 x0 + x0 (a1*b2) x0 + x0 (a2*b1) x0 + x0 x0 (a2*b2) *)
-ndefinition mulu_w16_aux ≝
-λw:word32.nat_it ? (rolc ?) w nat8.
-
-ndefinition mulu_w16 ≝
-λw1,w2:word16.
- plusc_d_d ? 〈(mulu_b8 (cnH ? w1) (cnH ? w2)).zeroc ?〉
- (plusc_d_d ? (mulu_w16_aux (extu_w32 (mulu_b8 (cnH ? w1) (cnL ? w2))))
- (plusc_d_d ? (mulu_w16_aux (extu_w32 (mulu_b8 (cnL ? w1) (cnH ? w2))))
- (extu_w32 (mulu_b8 (cnL ? w1) (cnL ? w2))))).
-
-(* operatore moltiplicazione con segno *)
-(* x * y = sgn(x) * sgn(y) * |x| * |y| *)
-ndefinition muls_w16 ≝
-λw1,w2:word16.
-(* ++/-- → +, +-/-+ → - *)
- match (getMSBc ? w1) ⊙ (getMSBc ? w2) with
- (* +- -+ → - *)
- [ true ⇒ complc ?
- (* ++/-- → + *)
- | false ⇒ λx.x ] (mulu_w16 (absc ? w1) (absc ? w2)).
+++ /dev/null
-baseuri=cic:/matita
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-(* ********************************************************************** *)
-(* Progetto FreeScale *)
-(* *)
-(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Sviluppo: 2008-2010 *)
-(* *)
-(* ********************************************************************** *)
-
-include "common/nelist.ma".
-include "common/prod.ma".
-
-nlet rec nmember_natList (elem:nat) (l:ne_list nat) on l ≝
- match l with
- [ ne_nil h ⇒ ⊖(eqc ? elem h)
- | ne_cons h t ⇒ match eqc ? elem h with
- [ true ⇒ false | false ⇒ nmember_natList elem t ]
- ].
-
-(* elem presente una ed una sola volta in l *)
-nlet rec member_natList (elem:nat) (l:ne_list nat) on l ≝
- match l with
- [ ne_nil h ⇒ eqc ? elem h
- | ne_cons h t ⇒ match eqc ? elem h with
- [ true ⇒ nmember_natList elem t | false ⇒ member_natList elem t ]
- ].
-
-(* costruttore di un sottouniverso:
- S_EL cioe' uno qualsiasi degli elementi del sottouniverso
-*)
-ninductive S_UN (l:ne_list nat) : Type ≝
- S_EL : Πx:nat.((member_natList x l) = true) → S_UN l.
-
-ndefinition getelem : ∀l.∀e:S_UN l.nat.
- #l; #s; nelim s;
- #u; #dim;
- napply u.
-nqed.
-
-ndefinition eq_SUN ≝ λl.λx,y:S_UN l.eq_nat (getelem ? x) (getelem ? y).
-
-ndefinition getdim : ∀l.∀e:S_UN l.member_natList (getelem ? e) l = true.
- #l; #s; nelim s;
- #u; #dim;
- napply dim.
-nqed.
-
-nlemma SUN_destruct_1
- : ∀l.∀e1,e2.∀dim1,dim2.S_EL l e1 dim1 = S_EL l e2 dim2 → e1 = e2.
- #l; #e1; #e2; #dim1; #dim2; #H;
- nchange with (match S_EL l e2 dim2 with [ S_EL a _ ⇒ e1 = a ]);
- nrewrite < H;
- nnormalize;
- napply refl_eq.
-nqed.
-
-(* destruct universale *)
-ndefinition SUN_destruct : ∀l.∀x,y:S_UN l.∀P:Prop.x = y → match eq_SUN l x y with [ true ⇒ P → P | false ⇒ P ].
- #l; #x; nelim x;
- #u1; #dim1;
- #y; nelim y;
- #u2; #dim2;
- #P;
- nchange with (? → (match eq_nat u1 u2 with [ true ⇒ P → P | false ⇒ P ]));
- #H;
- nrewrite > (SUN_destruct_1 l … H);
- nrewrite > (eq_to_eqc ? u2 u2 (refl_eq …));
- nnormalize;
- napply (λx.x).
-nqed.
-
-(* eq_to_eqxx universale *)
-nlemma eq_to_eqSUN : ∀l.∀x,y:S_UN l.x = y → eq_SUN l x y = true.
- #l; #x; nelim x;
- #u1; #dim1;
- #y; nelim y;
- #u2; #dim2;
- nchange with (? → (eqc ? u1 u2) = true);
- #H; napply (eq_to_eqc ? u1 u2);
- napply (SUN_destruct_1 l … H).
-nqed.
-
-(* neqxx_to_neq universale *)
-nlemma neqSUN_to_neq : ∀l.∀x,y:S_UN l.eq_SUN l x y = false → x ≠ y.
- #l; #n1; #n2; #H;
- napply (not_to_not (n1 = n2) (eq_SUN l n1 n2 = true) …);
- ##[ ##1: napply (eq_to_eqSUN l n1 n2)
- ##| ##2: napply (eqfalse_to_neqtrue … H)
- ##]
-nqed.
-
-(* eqxx_to_eq universale *)
-(* !!! evidente ma come si fa? *)
-naxiom eqSUN_to_eq_aux : ∀l,x,y.((getelem l x) = (getelem l y)) → x = y.
-
-nlemma eqSUN_to_eq : ∀l.∀x,y:S_UN l.eq_SUN l x y = true → x = y.
- #l; #x; #y;
- nchange with (((eqc ? (getelem ? x) (getelem ? y)) = true) → x = y);
- #H; napply (eqSUN_to_eq_aux l x y (eqc_to_eq … H)).
-nqed.
-
-(* neq_to_neqxx universale *)
-nlemma neq_to_neqSUN : ∀l.∀x,y:S_UN l.x ≠ y → eq_SUN l x y = false.
- #l; #n1; #n2; #H;
- napply (neqtrue_to_eqfalse (eq_SUN l n1 n2));
- napply (not_to_not (eq_SUN l n1 n2 = true) (n1 = n2) ? H);
- napply (eqSUN_to_eq l n1 n2).
-nqed.
-
-(* decidibilita' universale *)
-nlemma decidable_SUN : ∀l.∀x,y:S_UN l.decidable (x = y).
- #l; #x; #y; nnormalize;
- napply (or2_elim (eq_SUN l x y = true) (eq_SUN l x y = false) ? (decidable_bexpr ?));
- ##[ ##1: #H; napply (or2_intro1 (x = y) (x ≠ y) (eqSUN_to_eq l … H))
- ##| ##2: #H; napply (or2_intro2 (x = y) (x ≠ y) (neqSUN_to_neq l … H))
- ##]
-nqed.
-
-(* simmetria di uguaglianza universale *)
-nlemma symmetric_eqSUN : ∀l.symmetricT (S_UN l) bool (eq_SUN l).
- #l; #n1; #n2;
- napply (or2_elim (n1 = n2) (n1 ≠ n2) ? (decidable_SUN l n1 n2));
- ##[ ##1: #H; nrewrite > H; napply refl_eq
- ##| ##2: #H; nrewrite > (neq_to_neqSUN l n1 n2 H);
- napply (symmetric_eq ? (eq_SUN l n2 n1) false);
- napply (neq_to_neqSUN l n2 n1 (symmetric_neq ? n1 n2 H))
- ##]
-nqed.
-
-(* scheletro di funzione generica ad 1 argomento *)
-nlet rec farg1_auxT (T:Type) (l:ne_list nat) on l ≝
- match l with
- [ ne_nil _ ⇒ T
- | ne_cons _ t ⇒ ProdT T (farg1_auxT T t)
- ].
-
-nlemma farg1_auxDim : ∀h,t,x.(eqc ? x h) = false → member_natList x (h§§t) = true → member_natList x t = true.
- #h; #t; #x; #H; #H1;
- nnormalize in H1:(%);
- nrewrite > H in H1:(%);
- nnormalize;
- napply (λx.x).
-nqed.
-
-nlet rec farg1 (T:Type) (l:ne_list nat) on l ≝
- match l with
- [ ne_nil h ⇒ λarg:farg1_auxT T «£h».λx:S_UN «£h».arg
- | ne_cons h t ⇒ λarg:farg1_auxT T (h§§t).λx:S_UN (h§§t).
- match eqc ? (getelem ? x) h
- return λy.(eqc ? (getelem ? x) h) = y → ?
- with
- [ true ⇒ λp:((eqc ? (getelem ? x) h) = true).fst … arg
- | false ⇒ λp:((eqc ? (getelem ? x) h) = false).
- farg1 T t
- (snd … arg)
- (S_EL t (getelem ? x) (farg1_auxDim h t (getelem ? x) p (getdim ? x)))
- ] (refl_eq ? (eqc ? (getelem ? x) h))
- ].
-
-(* scheletro di funzione generica a 2 argomenti *)
-nlet rec farg2 (T:Type) (l,lfix:ne_list nat) on l ≝
- match l with
- [ ne_nil h ⇒ λarg:farg1_auxT (farg1_auxT T lfix) «£h».λx:S_UN «£h».farg1 T lfix arg
- | ne_cons h t ⇒ λarg:farg1_auxT (farg1_auxT T lfix) (h§§t).λx:S_UN (h§§t).
- match eqc ? (getelem ? x) h
- return λy.(eqc ? (getelem ? x) h) = y → ?
- with
- [ true ⇒ λp:((eqc ? (getelem ? x) h) = true).farg1 T lfix (fst … arg)
- | false ⇒ λp:((eqc ? (getelem ? x) h) = false).
- farg2 T t lfix
- (snd … arg)
- (S_EL t (getelem ? x) (farg1_auxDim h t (getelem ? x) p (getdim ? x)))
- ] (refl_eq ? (eqc ? (getelem ? x) h))
- ].
-
-(* esempio0: universo ottale *)
-ndefinition oct0 ≝ O.
-ndefinition oct1 ≝ nat1.
-ndefinition oct2 ≝ nat2.
-ndefinition oct3 ≝ nat3.
-ndefinition oct4 ≝ nat4.
-ndefinition oct5 ≝ nat5.
-ndefinition oct6 ≝ nat6.
-ndefinition oct7 ≝ nat7.
-
-ndefinition oct_UN ≝ « oct0 ; oct1 ; oct2 ; oct3 ; oct4 ; oct5 ; oct6 £ oct7 ».
-
-ndefinition uoct0 ≝ S_EL oct_UN oct0 (refl_eq …).
-ndefinition uoct1 ≝ S_EL oct_UN oct1 (refl_eq …).
-ndefinition uoct2 ≝ S_EL oct_UN oct2 (refl_eq …).
-ndefinition uoct3 ≝ S_EL oct_UN oct3 (refl_eq …).
-ndefinition uoct4 ≝ S_EL oct_UN oct4 (refl_eq …).
-ndefinition uoct5 ≝ S_EL oct_UN oct5 (refl_eq …).
-ndefinition uoct6 ≝ S_EL oct_UN oct6 (refl_eq …).
-ndefinition uoct7 ≝ S_EL oct_UN oct7 (refl_eq …).
-
-(* esempio1: NOT ottale *)
-ndefinition octNOT ≝
- farg1 (S_UN oct_UN) oct_UN
- (pair … uoct7 (pair … uoct6 (pair … uoct5 (pair … uoct4 (pair … uoct3 (pair … uoct2 (pair … uoct1 uoct0))))))).
-
-(* esempio2: AND ottale *)
-ndefinition octAND0 ≝ pair … uoct0 (pair … uoct0 (pair … uoct0 (pair … uoct0 (pair … uoct0 (pair … uoct0 (pair … uoct0 uoct0)))))).
-ndefinition octAND1 ≝ pair … uoct0 (pair … uoct1 (pair … uoct0 (pair … uoct1 (pair … uoct0 (pair … uoct1 (pair … uoct0 uoct1)))))).
-ndefinition octAND2 ≝ pair … uoct0 (pair … uoct0 (pair … uoct2 (pair … uoct2 (pair … uoct0 (pair … uoct0 (pair … uoct2 uoct2)))))).
-ndefinition octAND3 ≝ pair … uoct0 (pair … uoct1 (pair … uoct2 (pair … uoct3 (pair … uoct0 (pair … uoct1 (pair … uoct2 uoct3)))))).
-ndefinition octAND4 ≝ pair … uoct0 (pair … uoct0 (pair … uoct0 (pair … uoct0 (pair … uoct4 (pair … uoct4 (pair … uoct4 uoct4)))))).
-ndefinition octAND5 ≝ pair … uoct0 (pair … uoct1 (pair … uoct0 (pair … uoct1 (pair … uoct4 (pair … uoct5 (pair … uoct4 uoct5)))))).
-ndefinition octAND6 ≝ pair … uoct0 (pair … uoct0 (pair … uoct2 (pair … uoct2 (pair … uoct4 (pair … uoct4 (pair … uoct6 uoct6)))))).
-ndefinition octAND7 ≝ pair … uoct0 (pair … uoct1 (pair … uoct2 (pair … uoct3 (pair … uoct4 (pair … uoct5 (pair … uoct6 uoct7)))))).
-
-ndefinition octAND ≝
- farg2 (S_UN oct_UN) oct_UN oct_UN
- (pair … octAND0 (pair … octAND1 (pair … octAND2 (pair … octAND3 (pair … octAND4 (pair … octAND5 (pair … octAND6 octAND7))))))).
-
-(* ora e' possibile fare
- octNOT uoctX
- octAND uoctX uoctY
-*)
for @{ 'iff $a $b }.
-notation "hvbox(\Omega \sup term 90 A)" non associative with precedence 90
+notation "hvbox(\Omega \sup term 90 A)" non associative with precedence 70
for @{ 'powerset $A }.
-notation > "hvbox(\Omega ^ term 90 A)" non associative with precedence 90
+notation > "hvbox(\Omega ^ term 90 A)" non associative with precedence 70
for @{ 'powerset $A }.
notation < "hvbox({ ident i | term 19 p })" with precedence 90
notation "hvbox(a break ⊆ b)" non associative with precedence 45
for @{ 'subseteq $a $b }. (* \subseteq *)
-notation "hvbox(a break ∩ b)" left associative with precedence 55
+notation "hvbox(a break ∩ b)" non associative with precedence 55
for @{ 'intersects $a $b }. (* \cap *)
-notation "hvbox(a break ∪ b)" left associative with precedence 50
+notation "hvbox(a break ∪ b)" non associative with precedence 50
for @{ 'union $a $b }. (* \cup *)
notation "hvbox({ term 19 a })" with precedence 90 for @{ 'singl $a}.
notation "hvbox(a break ↑ b)" with precedence 55 for @{ 'funion $a $b }.
-notation < "term 76 a \sup term 90 b" non associative with precedence 75 for @{ 'exp $a $b}.
-notation > "a \sup term 90 b" non associative with precedence 75 for @{ 'exp $a $b}.
-notation > "a ^ term 90 b" non associative with precedence 75 for @{ 'exp $a $b}.
-notation "s \sup (-1)" non associative with precedence 75 for @{ 'invert $s }.
-notation > "s ^ (-1)" non associative with precedence 75 for @{ 'invert $s }.
-notation < "s \sup (-1) x" non associative with precedence 90 for @{ 'invert_appl $s $x}.
+notation < "term 91 a \sup term 90 b" with precedence 90 for @{ 'exp $a $b}.
+notation > "a \sup term 89 b" with precedence 90 for @{ 'exp $a $b}.
+notation > "a ^ term 89 b" with precedence 90 for @{ 'exp $a $b}.
+notation "s \sup (-1)" with precedence 90 for @{ 'invert $s }.
+notation > "s ^ (-1)" with precedence 90 for @{ 'invert $s }.
+notation < "s \sup (-1) x" with precedence 90 for @{ 'invert_appl $s $x}.
-notation "| term 19 C |" with precedence 70 for @{ 'card $C }.
+notation "hvbox(|term 90 C|)" with precedence 69 for @{ 'card $C }.
notation "\naturals" non associative with precedence 90 for @{'N}.
notation "\rationals" non associative with precedence 90 for @{'Q}.
+0.5.9 - 22/12/2014 - minor fixes + library upgrade
+ * Ported to new version of OCaml libraries
+ * the USER name is used by default for mangling the DB table names.
+ The latter cannot contain dots and other special characters. A check
+ has been put in place.
+
0.5.8 - 02/12/2009 - toward the 1.x series
* Complete rewriting of paramodulation code (thanks to Maxime Denes),
that is abstract over the data type embedded in the fisrt order
they are in a standard path
* including a file of the standard library triggers its compilation
in the user's space
- * gtksourceview2 based text widget (lablgtk >= 2.14)
0.5.7 - 15/02/2009 - Pàdoa release
* are_convertible bug solved, arguments of application where
-formal_topology/formal_topologies.ma formal_topology/basic_topologies.ma
-demo/formal_topology.ma logic/cprop_connectives.ma logic/equality.ma
dama/sandwich.ma dama/ordered_uniform.ma
+demo/formal_topology.ma logic/cprop_connectives.ma logic/equality.ma
Q/ratio/rtimes.ma Q/fraction/ftimes.ma Q/ratio/rinv.ma
demo/power_derivative.ma nat/compare.ma nat/orders.ma nat/plus.ma
nat/compare.ma datatypes/bool.ma datatypes/compare.ma nat/orders.ma
dama/ordered_uniform.ma dama/uniform.ma
nat/lt_arith.ma nat/div_and_mod.ma
-formal_topology/o-basic_pairs_to_o-basic_topologies.ma formal_topology/notation.ma formal_topology/o-basic_pairs.ma formal_topology/o-basic_topologies.ma
demo/propositional_sequent_calculus.ma datatypes/constructors.ma list/sort.ma nat/compare.ma nat/plus.ma
Z/inversion.ma Z/dirichlet_product.ma Z/moebius.ma
-formal_topology/basic_topologies_to_o-basic_topologies.ma formal_topology/basic_topologies.ma formal_topology/notation.ma formal_topology/o-basic_topologies.ma formal_topology/relations_to_o-algebra.ma
dama/models/nat_order_continuous.ma dama/models/increasing_supremum_stabilizes.ma dama/models/nat_ordered_uniform.ma
nat/factorial2.ma nat/exp.ma nat/factorial.ma
nat/orders.ma higher_order_defs/ordering.ma nat/nat.ma
-technicalities/setoids.ma datatypes/constructors.ma logic/coimplication.ma logic/connectives2.ma
nat/sieve.ma list/sort.ma nat/primes.ma
-formal_topology/subsets.ma formal_topology/categories.ma
+technicalities/setoids.ma datatypes/constructors.ma logic/coimplication.ma logic/connectives2.ma
nat/div_and_mod_diseq.ma nat/lt_arith.ma
logic/cprop_connectives.ma logic/connectives.ma
algebra/groups.ma algebra/monoids.ma datatypes/bool.ma nat/compare.ma nat/le_arith.ma
nat/chinese_reminder.ma nat/congruence.ma nat/exp.ma nat/gcd.ma nat/permutation.ma
Q/q/qinv.ma Q/q/q.ma Q/ratio/rinv.ma
nat/exp.ma nat/div_and_mod.ma nat/lt_arith.ma
+dama/models/nat_uniform.ma dama/models/discrete_uniformity.ma dama/nat_ordered_set.ma
list/in.ma datatypes/bool.ma datatypes/constructors.ma list/list.ma
datatypes/compare.ma
-dama/models/nat_uniform.ma dama/models/discrete_uniformity.ma dama/nat_ordered_set.ma
didactic/exercises/natural_deduction_fst_order.ma didactic/support/natural_deduction.ma
didactic/exercises/substitution.ma nat/minus.ma
nat/factorization2.ma list/list.ma nat/factorization.ma nat/sieve.ma
-formal_topology/basic_topologies.ma formal_topology/relations.ma formal_topology/saturations.ma
dama/models/increasing_supremum_stabilizes.ma dama/models/nat_uniform.ma dama/russell_support.ma dama/supremum.ma nat/le_arith.ma
logic/connectives.ma
Q/nat_fact/times.ma nat/factorization.ma
decidable_kit/fintype.ma decidable_kit/eqtype.ma decidable_kit/list_aux.ma
didactic/exercises/duality.ma nat/minus.ma
nat/ord.ma datatypes/constructors.ma nat/exp.ma nat/gcd.ma nat/nth_prime.ma nat/relevant_equations.ma
-formal_topology/cprop_connectives.ma logic/connectives.ma
dama/supremum.ma dama/nat_ordered_set.ma dama/sequence.ma datatypes/constructors.ma nat/plus.ma
nat/totient1.ma nat/gcd_properties1.ma nat/iteration2.ma nat/totient.ma
-didactic/exercises/natural_deduction1.ma didactic/support/natural_deduction.ma
R/Rexp.ma R/root.ma Z/times.ma nat/orders.ma
+didactic/exercises/natural_deduction1.ma didactic/support/natural_deduction.ma
nat/times.ma nat/plus.ma
nat/chebyshev_thm.ma nat/neper.ma
Z/z.ma datatypes/bool.ma nat/nat.ma
demo/cantor.ma datatypes/constructors.ma demo/formal_topology.ma
-decidable_kit/fgraph.ma decidable_kit/fintype.ma
+dama/models/nat_ordered_uniform.ma dama/bishop_set_rewrite.ma dama/models/nat_uniform.ma dama/ordered_uniform.ma
nat/nth_prime.ma nat/lt_arith.ma nat/primes.ma
nat/le_arith.ma nat/orders.ma nat/times.ma
-dama/models/nat_ordered_uniform.ma dama/bishop_set_rewrite.ma dama/models/nat_uniform.ma dama/ordered_uniform.ma
+decidable_kit/fgraph.ma decidable_kit/fintype.ma
dama/bishop_set.ma dama/ordered_set.ma
nat/euler_theorem.ma nat/map_iter_p.ma nat/totient.ma
Q/fraction/ftimes.ma Q/fraction/finv.ma Q/nat_fact/times.ma Q/ratio/ratio.ma Z/times.ma
nat/factorial.ma nat/le_arith.ma
Z/plus.ma Z/z.ma nat/minus.ma
Q/ratio/rinv.ma Q/fraction/finv.ma Q/ratio/ratio.ma
-decidable_kit/streicher.ma logic/connectives.ma logic/equality.ma
dama/ordered_set.ma datatypes/constructors.ma logic/cprop_connectives.ma
+decidable_kit/streicher.ma logic/connectives.ma logic/equality.ma
nat/fermat_little_theorem.ma nat/congruence.ma nat/exp.ma nat/gcd.ma nat/permutation.ma
-decidable_kit/list_aux.ma decidable_kit/eqtype.ma list/list.ma nat/plus.ma
Q/q/qplus.ma nat/factorization.ma
+decidable_kit/list_aux.ma decidable_kit/eqtype.ma list/list.ma nat/plus.ma
R/r.ma Z/z.ma datatypes/constructors.ma logic/coimplication.ma logic/cprop_connectives.ma logic/equality.ma nat/orders.ma
-Z/orders.ma Z/z.ma nat/orders.ma
nat/map_iter_p.ma nat/count.ma nat/permutation.ma
Q/q.ma Q/fraction/fraction.ma Z/compare.ma Z/plus.ma nat/factorization.ma
+Z/orders.ma Z/z.ma nat/orders.ma
nat/permutation.ma nat/compare.ma nat/sigma_and_pi.ma
-formal_topology/saturations.ma formal_topology/relations.ma
demo/realisability.ma datatypes/constructors.ma logic/connectives.ma
-formal_topology/saturations_to_o-saturations.ma formal_topology/o-saturations.ma formal_topology/relations_to_o-algebra.ma formal_topology/saturations.ma
-list/list.ma datatypes/bool.ma higher_order_defs/functions.ma logic/equality.ma nat/orders.ma nat/plus.ma
+list/list.ma datatypes/bool.ma higher_order_defs/functions.ma logic/equality.ma nat/nat.ma nat/orders.ma nat/plus.ma
nat/totient.ma nat/chinese_reminder.ma nat/iteration2.ma
didactic/support/natural_deduction.ma
nat/sigma_and_pi.ma nat/exp.ma nat/factorial.ma nat/lt_arith.ma
nat/count.ma nat/permutation.ma nat/relevant_equations.ma nat/sigma_and_pi.ma
-formal_topology/o-algebra.ma formal_topology/categories.ma
-formal_topology/basic_pairs.ma formal_topology/notation.ma formal_topology/relations.ma
Q/frac.ma Q/q/qinv.ma
didactic/exercises/shannon.ma nat/minus.ma
Q/q/qtimes.ma Q/q/qinv.ma Q/ratio/rtimes.ma
-formal_topology/concrete_spaces.ma formal_topology/basic_pairs.ma
nat/minus.ma nat/compare.ma nat/le_arith.ma
-formal_topology/o-saturations.ma formal_topology/o-algebra.ma
Q/ratio/ratio.ma Q/fraction/fraction.ma
nat/chebyshev_teta.ma nat/binomial.ma nat/pi_p.ma
algebra/finite_groups.ma algebra/groups.ma nat/relevant_equations.ma
algebra/semigroups.ma higher_order_defs/functions.ma
dama/lebesgue.ma dama/ordered_set.ma dama/property_exhaustivity.ma dama/sandwich.ma
dama/models/discrete_uniformity.ma dama/bishop_set_rewrite.ma dama/uniform.ma
-formal_topology/relations.ma formal_topology/subsets.ma
higher_order_defs/relations.ma logic/connectives.ma
nat/factorization.ma nat/ord.ma
nat/neper.ma nat/binomial.ma nat/chebyshev.ma nat/div_and_mod_diseq.ma nat/iteration2.ma nat/log.ma
Z/moebius.ma Z/sigma_p.ma nat/factorization.ma
-formal_topology/r-o-basic_pairs.ma formal_topology/apply_functor.ma formal_topology/basic_pairs_to_o-basic_pairs.ma formal_topology/o-basic_pairs_to_o-basic_topologies.ma logic/equality.ma
demo/toolbox.ma logic/cprop_connectives.ma
nat/iteration2.ma nat/count.ma nat/generic_iter_p.ma nat/ord.ma nat/primes.ma
logic/coimplication.ma logic/connectives.ma
nat/minimization.ma nat/minus.ma
-formal_topology/apply_functor.ma formal_topology/categories.ma formal_topology/notation.ma
logic/connectives2.ma higher_order_defs/relations.ma
datatypes/subsets.ma datatypes/categories.ma logic/cprop_connectives.ma
-decidable_kit/eqtype.ma datatypes/constructors.ma decidable_kit/decidable.ma
nat/chebyshev.ma nat/factorial2.ma nat/factorization.ma nat/log.ma nat/o.ma nat/pi_p.ma
+decidable_kit/eqtype.ma datatypes/constructors.ma decidable_kit/decidable.ma
Q/q/q.ma Q/fraction/numerator_denominator.ma Q/ratio/ratio.ma
dama/models/nat_lebesgue.ma dama/lebesgue.ma dama/models/nat_order_continuous.ma
nat/bertrand.ma list/in.ma list/sort.ma nat/chebyshev.ma nat/chebyshev_teta.ma nat/o.ma nat/sieve.ma nat/sqrt.ma
nat/nat.ma higher_order_defs/functions.ma
-formal_topology/basic_pairs_to_basic_topologies.ma formal_topology/basic_pairs.ma formal_topology/basic_pairs_to_o-basic_pairs.ma formal_topology/basic_topologies.ma formal_topology/o-basic_pairs_to_o-basic_topologies.ma
Q/Qaxioms.ma Z/compare.ma Z/times.ma nat/iteration2.ma
dama/uniform.ma dama/supremum.ma
demo/natural_deduction.ma didactic/support/natural_deduction.ma
higher_order_defs/ordering.ma logic/equality.ma
nat/congruence.ma nat/primes.ma nat/relevant_equations.ma
logic/equality.ma higher_order_defs/relations.ma
-formal_topology/o-concrete_spaces.ma formal_topology/o-basic_pairs.ma formal_topology/o-saturations.ma
-formal_topology/o-basic_topologies.ma formal_topology/o-algebra.ma formal_topology/o-saturations.ma
-formal_topology/concrete_spaces_to_o-concrete_spaces.ma formal_topology/basic_pairs_to_o-basic_pairs.ma formal_topology/concrete_spaces.ma formal_topology/o-concrete_spaces.ma
dama/property_exhaustivity.ma dama/ordered_uniform.ma dama/property_sigma.ma
-Z/compare.ma Z/orders.ma nat/compare.ma
nat/gcd.ma nat/lt_arith.ma nat/primes.ma
datatypes/bool.ma higher_order_defs/functions.ma logic/equality.ma
-Z/dirichlet_product.ma Z/sigma_p.ma Z/times.ma nat/primes.ma
+Z/compare.ma Z/orders.ma nat/compare.ma
algebra/monoids.ma algebra/semigroups.ma
nat/div_and_mod.ma datatypes/constructors.ma nat/minus.ma
+Z/dirichlet_product.ma Z/sigma_p.ma Z/times.ma nat/primes.ma
nat/sqrt.ma nat/compare.ma nat/log.ma nat/times.ma
datatypes/categories.ma logic/cprop_connectives.ma
-formal_topology/o-basic_pairs.ma formal_topology/notation.ma formal_topology/o-algebra.ma
-formal_topology/categories.ma formal_topology/cprop_connectives.ma logic/equality.ma
nat/relevant_equations.ma nat/gcd.ma nat/minus.ma nat/times.ma
-formal_topology/notation.ma
dama/nat_ordered_set.ma nat/orders.ma dama/bishop_set.ma nat/compare.ma
-Q/fraction/finv.ma Q/fraction/fraction.ma Z/plus.ma
dama/russell_support.ma logic/cprop_connectives.ma nat/nat.ma
-formal_topology/relations_to_o-algebra.ma formal_topology/o-algebra.ma formal_topology/relations.ma
+Q/fraction/finv.ma Q/fraction/fraction.ma Z/plus.ma
nat/binomial.ma nat/factorial2.ma nat/iteration2.ma
-nat/log.ma datatypes/constructors.ma nat/div_and_mod_diseq.ma nat/iteration2.ma nat/minimization.ma nat/primes.ma nat/relevant_equations.ma
R/root.ma logic/connectives.ma Q/q/q.ma R/r.ma
+nat/log.ma datatypes/constructors.ma nat/div_and_mod_diseq.ma nat/iteration2.ma nat/minimization.ma nat/primes.ma nat/relevant_equations.ma
higher_order_defs/functions.ma logic/equality.ma
Q/fraction/numerator_denominator.ma Q/fraction/finv.ma
nat/generic_iter_p.ma nat/div_and_mod_diseq.ma nat/ord.ma nat/primes.ma
datatypes/constructors.ma logic/equality.ma
didactic/exercises/natural_deduction_theories.ma didactic/support/natural_deduction.ma nat/plus.ma
-Q/fraction/fraction.ma Z/compare.ma nat/factorization.ma
nat/plus.ma nat/nat.ma
-formal_topology/o-formal_topologies.ma formal_topology/o-basic_topologies.ma
+Q/fraction/fraction.ma Z/compare.ma nat/factorization.ma
dama/sequence.ma nat/nat.ma
nat/primes.ma nat/div_and_mod.ma nat/factorial.ma nat/minimization.ma nat/sigma_and_pi.ma
nat/gcd_properties1.ma nat/gcd.ma
list/sort.ma datatypes/bool.ma datatypes/constructors.ma list/in.ma
didactic/exercises/natural_deduction.ma didactic/support/natural_deduction.ma
-formal_topology/basic_pairs_to_o-basic_pairs.ma formal_topology/basic_pairs.ma formal_topology/o-basic_pairs.ma formal_topology/relations_to_o-algebra.ma
dama/bishop_set_rewrite.ma dama/bishop_set.ma
Z/times.ma Z/plus.ma nat/lt_arith.ma
-Z/sigma_p.ma Z/times.ma nat/generic_iter_p.ma nat/ord.ma nat/primes.ma
R/Rlog.ma R/Rexp.ma
+Z/sigma_p.ma Z/times.ma nat/generic_iter_p.ma nat/ord.ma nat/primes.ma
nat/o.ma nat/binomial.ma nat/sqrt.ma
dama/property_sigma.ma dama/ordered_uniform.ma dama/russell_support.ma
Q/inv.ma Q/fraction/finv.ma Q/q.ma Q/q/q.ma
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/categories.ma".
-include "formal_topology/notation.ma".
-
-record Fo (C1,C2:CAT2) (F:arrows3 CAT2 C1 C2) : Type2 ≝ {
- F2: C2;
- F1: C1;
- FP: map_objs2 ?? F F1 =_\ID F2
-}.
-
-notation "ℱ\sub 1 x" non associative with precedence 60 for @{'F1 $x}.
-notation > "ℱ_1" non associative with precedence 90 for @{F1 ???}.
-interpretation "F1" 'F1 x = (F1 ??? x).
-
-notation "ℱ\sub 2 x" non associative with precedence 60 for @{'F2 $x}.
-notation > "ℱ_2" non associative with precedence 90 for @{F2 ???}.
-interpretation "F2" 'F2 x = (F2 ??? x).
-
-lemma REW : ∀C1,C2: CAT2.∀F:arrows3 CAT2 C1 C2.∀X,Y:Fo ?? F.
- arrows2 C2 (F (ℱ_1 X)) (F (ℱ_1 Y)) →
- arrows2 C2 (ℱ_2 X) (ℱ_2 Y).
-intros 5; cases X; cases Y; clear X Y;
-cases H; cases H1; intros; assumption;
-qed.
-
-record Fm_c (C1,C2:CAT2) (F:arrows3 CAT2 C1 C2) (X,Y:Fo ?? F) : Type2 ≝ {
- Fm2: arrows2 C2 (F2 ??? X) (F2 ??? Y);
- Fm1: arrows2 C1 (F1 ??? X) (F1 ??? Y);
- FmP: REW ?? F X Y (map_arrows2 ?? F ?? Fm1) = Fm2
-}.
-
-notation "ℳ\sub 1 x" non associative with precedence 60 for @{'Fm1 $x}.
-notation > "ℳ_1" non associative with precedence 90 for @{Fm1 ?????}.
-interpretation "Fm1" 'Fm1 x = (Fm1 ????? x).
-
-notation "ℳ\sub 2 x" non associative with precedence 60 for @{'Fm2 $x}.
-notation > "ℳ_2" non associative with precedence 90 for @{Fm2 ?????}.
-interpretation "Fm2" 'Fm2 x = (Fm2 ????? x).
-
-definition Fm :
- ∀C1,C2: CAT2.∀F:arrows3 CAT2 C1 C2.
- Fo ?? F → Fo ?? F → setoid2.
-intros (C1 C2 F X Y); constructor 1; [apply (Fm_c C1 C2 F X Y)]
-constructor 1; [apply (λf,g.Fm2 ????? f =_2 Fm2 ????? g);]
-[ intro; apply refl2;
-| intros 3; apply sym2; assumption;
-| intros 5; apply (trans2 ?? ??? x1 x2);]
-qed.
-
-definition F_id :
- ∀C1,C2: CAT2.∀F:arrows3 CAT2 C1 C2.∀o.Fm ?? F o o.
-intros; constructor 1;
- [ apply (id2 C2 (F2 ??? o));
- | apply (id2 C1 (F1 ??? o));
- | cases o; cases H; simplify; apply (respects_id2 ?? F);]
-qed.
-
-definition F_comp :
- ∀C1,C2: CAT2.∀F:arrows3 CAT2 C1 C2.∀o1,o2,o3.
- (Fm ?? F o1 o2) × (Fm ?? F o2 o3) ⇒_2 (Fm ?? F o1 o3).
-intros; constructor 1;
-[ intros (f g); constructor 1;
- [ apply (comp2 C2 ??? (ℳ_2 f) (ℳ_2 g));
- | apply (comp2 C1 ??? (ℳ_1 f) (ℳ_1 g));
- | apply hide; cases o1 in f; cases o2 in g; cases o3; clear o1 o2 o3;
- cases H; cases H1; cases H2; intros 2; cases c; cases c1; clear c c1;
- simplify; apply (.= (respects_comp2:?)); apply (e1‡e);]
-| intros 6; change with ((ℳ_2 b ∘ ℳ_2 a) = (ℳ_2 b' ∘ ℳ_2 a'));
- change in e1 with (ℳ_2 b = ℳ_2 b');
- change in e with (ℳ_2 a = ℳ_2 a');
- apply (e‡e1);]
-qed.
-
-
-definition Apply : ∀C1,C2: CAT2.arrows3 CAT2 C1 C2 → CAT2.
-intros (C1 C2 F);
-constructor 1;
-[ apply (Fo ?? F);
-| apply (Fm ?? F);
-| apply F_id;
-| apply F_comp;
-| intros; apply (comp_assoc2 C2 ???? (ℳ_2 a12) (ℳ_2 a23) (ℳ_2 a34));
-| intros; apply (id_neutral_right2 C2 ?? (ℳ_2 a));
-| intros; apply (id_neutral_left2 C2 ?? (ℳ_2 a));]
-qed.
-
-definition faithful ≝
- λC1,C2.λF:arrows3 CAT2 C1 C2.∀S,T.∀f,g:arrows2 C1 S T.
- map_arrows2 ?? F ?? f = map_arrows2 ?? F ?? g → f=g.
-
-definition Ylppa : ∀C1,C2: CAT2.∀F:arrows3 CAT2 C1 C2.
- faithful ?? F → let rC2 ≝ Apply ?? F in arrows3 CAT2 rC2 C1.
-intros; constructor 1;
-[ intro; apply (ℱ_1 o);
-| intros; constructor 1;
- [ intros; apply (ℳ_1 c);
- | apply hide; intros; apply f; change in e with (ℳ_2 a = ℳ_2 a');
- lapply (FmP ????? a) as H1; lapply (FmP ????? a') as H2;
- cut (REW ????? (map_arrows2 ?? F ?? (ℳ_1 a)) =
- REW ????? (map_arrows2 ?? F ?? (ℳ_1 a')));[2:
- apply (.= H1); apply (.= e); apply (H2^-1);]
- clear H1 H2 e; cases S in a a' Hcut; cases T;
- cases H; cases H1; simplify; intros; assumption;]
-| intro; apply rule #;
-| intros; simplify; apply rule #;]
-qed.
-
-
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/relations.ma".
-include "formal_topology/notation.ma".
-
-record basic_pair: Type1 ≝ {
- concr: REL; form: REL; rel: concr ⇒_\r1 form
-}.
-
-interpretation "basic pair relation" 'Vdash2 x y c = (fun21 ??? (rel c) x y).
-interpretation "basic pair relation (non applied)" 'Vdash c = (rel c).
-
-record relation_pair (BP1,BP2: basic_pair): Type1 ≝ {
- concr_rel: (concr BP1) ⇒_\r1 (concr BP2); form_rel: (form BP1) ⇒_\r1 (form BP2);
- commute: comp1 REL ??? concr_rel (rel ?) =_1 form_rel ∘ ⊩
- }.
-
-interpretation "concrete relation" 'concr_rel r = (concr_rel ?? r).
-interpretation "formal relation" 'form_rel r = (form_rel ?? r).
-
-definition relation_pair_equality: ∀o1,o2. equivalence_relation1 (relation_pair o1 o2).
- intros; constructor 1; [ apply (λr,r'. ⊩ ∘ r \sub\c = ⊩ ∘ r' \sub\c);
- | simplify; intros; apply refl1;
- | simplify; intros 2; apply sym1;
- | simplify; intros 3; apply trans1; ]
-qed.
-
-definition relation_pair_setoid: basic_pair → basic_pair → setoid1.
- intros;
- constructor 1;
- [ apply (relation_pair b b1)
- | apply relation_pair_equality
- ]
-qed.
-
-definition relation_pair_of_relation_pair_setoid :
- ∀P,Q. relation_pair_setoid P Q → relation_pair P Q ≝ λP,Q,x.x.
-coercion relation_pair_of_relation_pair_setoid.
-
-alias symbol "compose" (instance 1) = "category1 composition".
-lemma eq_to_eq':
- ∀o1,o2.∀r,r':relation_pair_setoid o1 o2. r =_1 r' → r \sub\f ∘ ⊩ =_1 r'\sub\f ∘ ⊩.
- intros 5 (o1 o2 r r' H);
- apply (.= (commute ?? r)^-1);
- change in H with (⊩ ∘ r \sub\c = ⊩ ∘ r' \sub\c);
- apply rule (.= H);
- apply (commute ?? r').
-qed.
-
-definition id_relation_pair: ∀o:basic_pair. relation_pair o o.
- intro;
- constructor 1;
- [1,2: apply id1;
- | lapply (id_neutral_right1 ? (concr o) ? (⊩)) as H;
- lapply (id_neutral_left1 ?? (form o) (⊩)) as H1;
- apply (.= H);
- apply (H1^-1);]
-qed.
-
-lemma relation_pair_composition:
- ∀o1,o2,o3: basic_pair.
- relation_pair_setoid o1 o2 → relation_pair_setoid o2 o3 → relation_pair_setoid o1 o3.
-intros 3 (o1 o2 o3);
- intros (r r1);
- constructor 1;
- [ apply (r1 \sub\c ∘ r \sub\c)
- | apply (r1 \sub\f ∘ r \sub\f)
- | lapply (commute ?? r) as H;
- lapply (commute ?? r1) as H1;
- alias symbol "trans" = "trans1".
- alias symbol "assoc" = "category1 assoc".
- apply (.= ASSOC);
- apply (.= #‡H1);
- alias symbol "invert" = "setoid1 symmetry".
- apply (.= ASSOC ^ -1);
- apply (.= H‡#);
- apply ASSOC]
-qed.
-
-lemma relation_pair_composition_is_morphism:
- ∀o1,o2,o3: basic_pair.
- ∀a,a':relation_pair_setoid o1 o2.
- ∀b,b':relation_pair_setoid o2 o3.
- a=a' → b=b' →
- relation_pair_composition o1 o2 o3 a b
- = relation_pair_composition o1 o2 o3 a' b'.
-intros 3 (o1 o2 o3);
- intros;
- change with (⊩ ∘ (b\sub\c ∘ a\sub\c) = ⊩ ∘ (b'\sub\c ∘ a'\sub\c));
- change in e with (⊩ ∘ a \sub\c = ⊩ ∘ a' \sub\c);
- change in e1 with (⊩ ∘ b \sub\c = ⊩ ∘ b' \sub\c);
- apply (.= ASSOC);
- apply (.= #‡e1);
- apply (.= #‡(commute ?? b'));
- apply (.= ASSOC ^ -1);
- apply (.= e‡#);
- apply (.= ASSOC);
- apply (.= #‡(commute ?? b')^-1);
- apply (ASSOC ^ -1);
-qed.
-
-definition relation_pair_composition_morphism:
- ∀o1,o2,o3. binary_morphism1 (relation_pair_setoid o1 o2) (relation_pair_setoid o2 o3) (relation_pair_setoid o1 o3).
- intros;
- constructor 1;
- [ apply relation_pair_composition;
- | apply relation_pair_composition_is_morphism;]
-qed.
-
-lemma relation_pair_composition_morphism_assoc:
-Πo1:basic_pair
-.Πo2:basic_pair
- .Πo3:basic_pair
- .Πo4:basic_pair
- .Πa12:relation_pair_setoid o1 o2
- .Πa23:relation_pair_setoid o2 o3
- .Πa34:relation_pair_setoid o3 o4
- .relation_pair_composition_morphism o1 o3 o4
- (relation_pair_composition_morphism o1 o2 o3 a12 a23) a34
- =relation_pair_composition_morphism o1 o2 o4 a12
- (relation_pair_composition_morphism o2 o3 o4 a23 a34).
- intros;
- change with (⊩ ∘ (a34\sub\c ∘ (a23\sub\c ∘ a12\sub\c)) =
- ⊩ ∘ ((a34\sub\c ∘ a23\sub\c) ∘ a12\sub\c));
- alias symbol "refl" = "refl1".
- alias symbol "prop2" = "prop21".
- apply (ASSOC‡#);
-qed.
-
-lemma relation_pair_composition_morphism_respects_id:
- ∀o1,o2:basic_pair.∀a:relation_pair_setoid o1 o2.
- relation_pair_composition_morphism o1 o1 o2 (id_relation_pair o1) a=a.
- intros;
- change with (⊩ ∘ (a\sub\c ∘ (id_relation_pair o1)\sub\c) = ⊩ ∘ a\sub\c);
- apply ((id_neutral_right1 ????)‡#);
-qed.
-
-lemma relation_pair_composition_morphism_respects_id_r:
- ∀o1,o2:basic_pair.∀a:relation_pair_setoid o1 o2.
- relation_pair_composition_morphism o1 o2 o2 a (id_relation_pair o2)=a.
- intros;
- change with (⊩ ∘ ((id_relation_pair o2)\sub\c ∘ a\sub\c) = ⊩ ∘ a\sub\c);
- apply ((id_neutral_left1 ????)‡#);
-qed.
-
-definition BP: category1.
- constructor 1;
- [ apply basic_pair
- | apply relation_pair_setoid
- | apply id_relation_pair
- | apply relation_pair_composition_morphism
- | apply relation_pair_composition_morphism_assoc;
- | apply relation_pair_composition_morphism_respects_id;
- | apply relation_pair_composition_morphism_respects_id_r;]
-qed.
-
-definition basic_pair_of_BP : objs1 BP → basic_pair ≝ λx.x.
-coercion basic_pair_of_BP.
-
-definition relation_pair_setoid_of_arrows1_BP :
- ∀P,Q. arrows1 BP P Q → relation_pair_setoid P Q ≝ λP,Q,x.x.
-coercion relation_pair_setoid_of_arrows1_BP.
-
-(*
-definition BPext: ∀o: BP. (form o) ⇒_1 Ω^(concr o).
- intros; constructor 1;
- [ apply (ext ? ? (rel o));
- | intros;
- apply (.= #‡e);
- apply refl1]
-qed.
-
-definition BPextS: ∀o: BP. Ω^(form o) ⇒_1 Ω^(concr o).
- intros; constructor 1;
- [ apply (minus_image ?? (rel o));
- | intros; apply (#‡e); ]
-qed.
-
-definition fintersects: ∀o: BP. (form o) × (form o) ⇒_1 Ω^(form o).
- intros (o); constructor 1;
- [ apply (λa,b: form o.{c | BPext o c ⊆ BPext o a ∩ BPext o b });
- intros; simplify; apply (.= (†e)‡#); apply refl1
- | intros; split; simplify; intros;
- [ apply (. #‡((†e^-1)‡(†e1^-1))); assumption
- | apply (. #‡((†e)‡(†e1))); assumption]]
-qed.
-
-interpretation "fintersects" 'fintersects U V = (fun21 ??? (fintersects ?) U V).
-
-definition fintersectsS:
- ∀o:BP. Ω^(form o) × Ω^(form o) ⇒_1 Ω^(form o).
- intros (o); constructor 1;
- [ apply (λo: basic_pair.λa,b: Ω^(form o).{c | BPext o c ⊆ BPextS o a ∩ BPextS o b });
- intros; simplify; apply (.= (†e)‡#); apply refl1
- | intros; split; simplify; intros;
- [ apply (. #‡((†e^-1)‡(†e1^-1))); assumption
- | apply (. #‡((†e)‡(†e1))); assumption]]
-qed.
-
-interpretation "fintersectsS" 'fintersects U V = (fun21 ??? (fintersectsS ?) U V).
-
-definition relS: ∀o: BP. (concr o) × Ω^(form o) ⇒_1 CPROP.
- intros (o); constructor 1;
- [ apply (λx:concr o.λS: Ω^(form o).∃y:form o.y ∈ S ∧ x ⊩⎽o y);
- | intros; split; intros; cases e2; exists [1,3: apply w]
- [ apply (. (#‡e1^-1)‡(e^-1‡#)); assumption
- | apply (. (#‡e1)‡(e‡#)); assumption]]
-qed.
-
-interpretation "basic pair relation for subsets" 'Vdash2 x y c = (fun21 (concr ?) ?? (relS c) x y).
-interpretation "basic pair relation for subsets (non applied)" 'Vdash c = (fun21 ??? (relS c)).
-*)
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/basic_pairs_to_o-basic_pairs.ma".
-include "formal_topology/o-basic_pairs_to_o-basic_topologies.ma".
-include "formal_topology/basic_pairs.ma".
-include "formal_topology/basic_topologies.ma".
-
-definition basic_topology_of_basic_pair: basic_pair → basic_topology.
- intro bp;
- letin obt ≝ (OR (BP_to_OBP bp));
- constructor 1;
- [ apply (form bp);
- | apply (oA obt);
- | apply (oJ obt);
- | apply (oA_is_saturation obt);
- | apply (oJ_is_reduction obt);
- | apply (Ocompatibility obt); ]
-qed.
-
-definition continuous_relation_of_relation_pair:
- ∀BP1,BP2.relation_pair BP1 BP2 →
- continuous_relation (basic_topology_of_basic_pair BP1) (basic_topology_of_basic_pair BP2).
- intros (BP1 BP2 rp);
- letin ocr ≝ (OR⎽⇒ (BP_to_OBP⎽⇒ rp));
- constructor 1;
- [ apply (rp \sub \f);
- | apply (Oreduced ?? ocr);
- | apply (Osaturated ?? ocr); ]
-qed.
-
-alias symbol "compose" (instance 3) = "category1 composition".
-alias symbol "compose" (instance 3) = "category1 composition".
-record functor1 (C1: category1) (C2: category1) : Type2 ≝
- { map_objs1:1> C1 → C2;
- map_arrows1: ∀S,T. unary_morphism1 (arrows1 ? S T) (arrows1 ? (map_objs1 S) (map_objs1 T));
- respects_id1: ∀o:C1. map_arrows1 ?? (id1 ? o) =_1 id1 ? (map_objs1 o);
- respects_comp1:
- ∀o1,o2,o3.∀f1:arrows1 ? o1 o2.∀f2:arrows1 ? o2 o3.
- map_arrows1 ?? (f2 ∘ f1) =_1 map_arrows1 ?? f2 ∘ map_arrows1 ?? f1}.
-
-(*
-definition BTop_of_BP: functor1 BP BTop.
- constructor 1;
- [ apply basic_topology_of_basic_pair
- | intros; constructor 1 [ apply continuous_relation_of_relation_pair; ]
- | simplify; intro;
- ]
-qed.
-
-lemma BBBB_faithful : failthful2 ?? VVV
-FIXME
-*)
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/basic_pairs.ma".
-include "formal_topology/o-basic_pairs.ma".
-include "formal_topology/relations_to_o-algebra.ma".
-
-definition o_basic_pair_of_basic_pair: basic_pair → Obasic_pair.
- intro b;
- constructor 1;
- [ apply (POW (concr b));
- | apply (POW (form b));
- | apply (POW⎽⇒ ?); apply (rel b); ]
-qed.
-
-definition o_relation_pair_of_relation_pair:
- ∀BP1,BP2. relation_pair BP1 BP2 →
- Orelation_pair (o_basic_pair_of_basic_pair BP1) (o_basic_pair_of_basic_pair BP2).
- intros;
- constructor 1;
- [ unfold o_basic_pair_of_basic_pair; simplify; apply (POW⎽⇒ ?); apply (r\sub \c);
- | apply (map_arrows2 ?? POW (form BP1) (form BP2) (r \sub \f));
- | apply (.= (respects_comp2 ?? POW (concr BP1) (concr BP2) (form BP2) r\sub\c (⊩\sub BP2) )^-1);
- cut ( ⊩ \sub BP2 ∘ r \sub \c =_12 r\sub\f ∘ ⊩ \sub BP1) as H;
- [ apply (.= †H);
- apply (respects_comp2 ?? POW (concr BP1) (form BP1) (form BP2) (⊩\sub BP1) r\sub\f);
- | apply commute;]]
-qed.
-
-lemma o_relation_pair_of_relation_pair_is_morphism :
- ∀S,T:category2_of_category1 BP.
- ∀a,b:arrows2 (category2_of_category1 BP) S T.a=b →
- (eq2 (arrows2 OBP (o_basic_pair_of_basic_pair S) (o_basic_pair_of_basic_pair T)))
- (o_relation_pair_of_relation_pair S T a) (o_relation_pair_of_relation_pair S T b).
-intros 2 (S T);
- intros (a b Eab); split; unfold o_relation_pair_of_relation_pair; simplify;
- unfold o_basic_pair_of_basic_pair; simplify;
- [ change in match or_f_minus_star_ with (λq,w,x.fun12 ?? (or_f_minus_star q w) x);
- | change in match or_f_minus_ with (λq,w,x.fun12 ?? (or_f_minus q w) x);
- | change in match or_f_ with (λq,w,x.fun12 ?? (or_f q w) x);
- | change in match or_f_star_ with (λq,w,x.fun12 ?? (or_f_star q w) x);]
- simplify;
- apply (prop12);
- apply (.= (respects_comp2 ?? POW (concr S) (concr T) (form T) (a\sub\c) (⊩\sub T))^-1);
- apply sym2;
- apply (.= (respects_comp2 ?? POW (concr S) (concr T) (form T) (b\sub\c) (⊩\sub T))^-1);
- apply sym2;
- apply prop12;
- apply Eab;
-qed.
-
-lemma o_relation_pair_of_relation_pair_morphism :
- ∀S,T:category2_of_category1 BP.
- unary_morphism2 (arrows2 (category2_of_category1 BP) S T)
- (arrows2 OBP (o_basic_pair_of_basic_pair S) (o_basic_pair_of_basic_pair T)).
-intros (S T);
- constructor 1;
- [ apply (o_relation_pair_of_relation_pair S T);
- | apply (o_relation_pair_of_relation_pair_is_morphism S T)]
-qed.
-
-lemma o_relation_pair_of_relation_pair_morphism_respects_id:
- ∀o:category2_of_category1 BP.
- o_relation_pair_of_relation_pair_morphism o o (id2 (category2_of_category1 BP) o)
- = id2 OBP (o_basic_pair_of_basic_pair o).
- simplify; intros; whd; split;
- [ change in match or_f_minus_star_ with (λq,w,x.fun12 ?? (or_f_minus_star q w) x);
- | change in match or_f_minus_ with (λq,w,x.fun12 ?? (or_f_minus q w) x);
- | change in match or_f_ with (λq,w,x.fun12 ?? (or_f q w) x);
- | change in match or_f_star_ with (λq,w,x.fun12 ?? (or_f_star q w) x);]
- simplify;
- apply prop12;
- apply prop22;[2,4,6,8: apply rule #;]
- apply (respects_id2 ?? POW (concr o));
-qed.
-
-lemma o_relation_pair_of_relation_pair_morphism_respects_comp:
- ∀o1,o2,o3:category2_of_category1 BP.
- ∀f1:arrows2 (category2_of_category1 BP) o1 o2.
- ∀f2:arrows2 (category2_of_category1 BP) o2 o3.
- (eq2 (arrows2 OBP (o_basic_pair_of_basic_pair o1) (o_basic_pair_of_basic_pair o3)))
- (o_relation_pair_of_relation_pair_morphism o1 o3 (f2 ∘ f1))
- (comp2 OBP ???
- (o_relation_pair_of_relation_pair_morphism o1 o2 f1)
- (o_relation_pair_of_relation_pair_morphism o2 o3 f2)).
- simplify; intros; whd; split;
- [ change in match or_f_minus_star_ with (λq,w,x.fun12 ?? (or_f_minus_star q w) x);
- | change in match or_f_minus_ with (λq,w,x.fun12 ?? (or_f_minus q w) x);
- | change in match or_f_ with (λq,w,x.fun12 ?? (or_f q w) x);
- | change in match or_f_star_ with (λq,w,x.fun12 ?? (or_f_star q w) x);]
- simplify;
- apply prop12;
- apply prop22;[2,4,6,8: apply rule #;]
- apply (respects_comp2 ?? POW (concr o1) (concr o2) (concr o3) f1\sub\c f2\sub\c);
-qed.
-
-definition BP_to_OBP: carr3 (arrows3 CAT2 (category2_of_category1 BP) OBP).
- constructor 1;
- [ apply o_basic_pair_of_basic_pair;
- | intros; apply o_relation_pair_of_relation_pair_morphism;
- | apply o_relation_pair_of_relation_pair_morphism_respects_id;
- | apply o_relation_pair_of_relation_pair_morphism_respects_comp;]
-qed.
-
-theorem BP_to_OBP_faithful: faithful2 ?? BP_to_OBP.
- intros 5 (S T); change with ( (⊩) ∘ f \sub \c = (⊩) ∘ g \sub \c);
- apply (POW_faithful);
- apply (.= respects_comp2 ?? POW (concr S) (concr T) (form T) f \sub \c (⊩ \sub T));
- apply sym2;
- apply (.= respects_comp2 ?? POW (concr S) (concr T) (form T) g \sub \c (⊩ \sub T));
- apply sym2;
- apply e;
-qed.
-
-theorem BP_to_OBP_full: full2 ?? BP_to_OBP.
- intros 3 (S T);
- cases (POW_full (concr S) (concr T) (Oconcr_rel ?? f)) (gc Hgc);
- cases (POW_full (form S) (form T) (Oform_rel ?? f)) (gf Hgf);
- exists[
- constructor 1; [apply gc|apply gf]
- apply (POW_faithful);
- apply (let xxxx ≝POW in .= respects_comp2 ?? POW (concr S) (concr T) (form T) gc (rel T));
- apply rule (.= Hgc‡#);
- apply (.= Ocommute ?? f);
- apply (.= #‡Hgf^-1);
- apply (let xxxx ≝POW in (respects_comp2 ?? POW (concr S) (form S) (form T) (rel S) gf)^-1)]
- split;
- [ change in match or_f_minus_star_ with (λq,w,x.fun12 ?? (or_f_minus_star q w) x);
- | change in match or_f_minus_ with (λq,w,x.fun12 ?? (or_f_minus q w) x);
- | change in match or_f_ with (λq,w,x.fun12 ?? (or_f q w) x);
- | change in match or_f_star_ with (λq,w,x.fun12 ?? (or_f_star q w) x);]
- simplify; apply (†(Hgc‡#));
-qed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/relations.ma".
-include "formal_topology/saturations.ma".
-
-record basic_topology: Type1 ≝
- { carrbt:> REL;
- A: Ω^carrbt ⇒_1 Ω^carrbt;
- J: Ω^carrbt ⇒_1 Ω^carrbt;
- A_is_saturation: is_saturation ? A;
- J_is_reduction: is_reduction ? J;
- compatibility: ∀U,V. (A U ≬ J V) =_1 (U ≬ J V)
- }.
-
-record continuous_relation (S,T: basic_topology) : Type1 ≝
- { cont_rel:> S ⇒_\r1 T;
- reduced: ∀U. U =_1 J ? U → image_coercion ?? cont_rel U =_1 J ? (image_coercion ?? cont_rel U);
- saturated: ∀U. U =_1 A ? U → (cont_rel)⎻* U = _1A ? ((cont_rel)⎻* U)
- }.
-
-definition continuous_relation_setoid: basic_topology → basic_topology → setoid1.
- intros (S T); constructor 1;
- [ apply (continuous_relation S T)
- | constructor 1;
- [ apply (λr,s:continuous_relation S T.∀b. A ? (ext ?? r b) = A ? (ext ?? s b));
- | simplify; intros; apply refl1;
- | simplify; intros (x y H); apply sym1; apply H
- | simplify; intros; apply trans1; [2: apply f |3: apply f1; |1: skip]]]
-qed.
-
-definition continuos_relation_of_continuous_relation_setoid :
- ∀P,Q. continuous_relation_setoid P Q → continuous_relation P Q ≝ λP,Q,x.x.
-coercion continuos_relation_of_continuous_relation_setoid.
-
-axiom continuous_relation_eq':
- ∀o1,o2.∀a,a': continuous_relation_setoid o1 o2.
- a = a' → ∀X.a⎻* (A o1 X) = a'⎻* (A o1 X).
-(*
- intros; split; intro; unfold minus_star_image; simplify; intros;
- [ cut (ext ?? a a1 ⊆ A ? X); [2: intros 2; apply (H1 a2); cases f1; assumption;]
- lapply (if ?? (A_is_saturation ???) Hcut); clear Hcut;
- cut (A ? (ext ?? a' a1) ⊆ A ? X); [2: apply (. (H ?)‡#); assumption]
- lapply (fi ?? (A_is_saturation ???) Hcut);
- apply (Hletin1 x); change with (x ∈ ext ?? a' a1); split; simplify;
- [ apply I | assumption ]
- | cut (ext ?? a' a1 ⊆ A ? X); [2: intros 2; apply (H1 a2); cases f1; assumption;]
- lapply (if ?? (A_is_saturation ???) Hcut); clear Hcut;
- cut (A ? (ext ?? a a1) ⊆ A ? X); [2: apply (. (H ?)\sup -1‡#); assumption]
- lapply (fi ?? (A_is_saturation ???) Hcut);
- apply (Hletin1 x); change with (x ∈ ext ?? a a1); split; simplify;
- [ apply I | assumption ]]
-qed.*)
-
-lemma continuous_relation_eq_inv':
- ∀o1,o2.∀a,a': continuous_relation_setoid o1 o2.
- (∀X.a⎻* (A o1 X) = a'⎻* (A o1 X)) → a=a'.
- intros 6;
- cut (∀a,a': continuous_relation_setoid o1 o2.
- (∀X.a⎻* (A o1 X) = a'⎻* (A o1 X)) →
- ∀V:o2. A ? (ext ?? a' V) ⊆ A ? (ext ?? a V));
- [2: clear b f a' a; intros;
- lapply depth=0 (λV.saturation_expansive ??? (extS ?? a V)); [2: apply A_is_saturation;|skip]
- (* fundamental adjunction here! to be taken out *)
- cut (∀V:Ω^o2.V ⊆ a⎻* (A ? (extS ?? a V)));
- [2: intro; intros 2; unfold minus_star_image; simplify; intros;
- apply (Hletin V1 x); whd; split; [ exact I | exists; [apply a1] split; assumption]]
- clear Hletin;
- cut (∀V:Ω^o2.V ⊆ a'⎻* (A ? (extS ?? a V)));
- [2: intro; apply (. #‡(f ?)^-1); apply Hcut] clear f Hcut;
- (* second half of the fundamental adjunction here! to be taken out too *)
- intro; lapply (Hcut1 {(V)}); clear Hcut1;
- unfold minus_star_image in Hletin; unfold singleton in Hletin; simplify in Hletin;
- whd in Hletin; whd in Hletin:(?→?→%); simplify in Hletin;
- apply (if ?? (A_is_saturation ???));
- intros 2 (x H); lapply (Hletin V ? x ?);
- [ apply refl | unfold foo; apply H; ]
- change with (x ∈ A ? (ext ?? a V));
- apply (. #‡(†(extS_singleton ????)^-1));
- assumption;]
- split; apply Hcut; [2: assumption | intro; apply sym1; apply f]
-qed.
-
-definition continuous_relation_comp:
- ∀o1,o2,o3.
- continuous_relation_setoid o1 o2 →
- continuous_relation_setoid o2 o3 →
- continuous_relation_setoid o1 o3.
- intros (o1 o2 o3 r s); constructor 1;
- [ alias symbol "compose" (instance 1) = "category1 composition".
-apply (s ∘ r)
- | intros;
- apply sym1;
- (*change in ⊢ (? ? ? (? ? ? ? %) ?) with (image_coercion ?? (s ∘ r) U);*)
- apply (.= †(image_comp ??????));
- apply (.= (reduced ?? s (image_coercion ?? r U) ?)^-1);
- [ apply (.= (reduced ?????)); [ assumption | apply refl1 ]
- | change in ⊢ (? ? ? % ?) with ((image_coercion ?? s ∘ image_coercion ?? r) U);
- apply (.= (image_comp ??????)^-1);
- apply refl1]
- | intros;
- apply sym1;
- apply (.= †(minus_star_image_comp ??? s r ?));
- apply (.= (saturated ?? s ((r)⎻* U) ?)^-1);
- [ apply (.= (saturated ?????)); [ assumption | apply refl1 ]
- | change in ⊢ (? ? ? % ?) with ((s⎻* ∘ r⎻* ) U);
- apply (.= (minus_star_image_comp ??????)^-1);
- apply refl1]]
-qed.
-
-definition BTop: category1.
- constructor 1;
- [ apply basic_topology
- | apply continuous_relation_setoid
- | intro; constructor 1;
- [ apply id1
- | intros;
- apply (.= (image_id ??));
- apply sym1;
- apply (.= †(image_id ??));
- apply sym1;
- assumption
- | intros;
- apply (.= (minus_star_image_id ??));
- apply sym1;
- apply (.= †(minus_star_image_id ??));
- apply sym1;
- assumption]
- | intros; constructor 1;
- [ apply continuous_relation_comp;
- | intros; simplify; intro x; simplify;
- lapply depth=0 (continuous_relation_eq' ???? e) as H';
- lapply depth=0 (continuous_relation_eq' ???? e1) as H1';
- letin K ≝ (λX.H1' ((a)⎻* (A ? X))); clearbody K;
- cut (∀X:Ω \sup o1.
- (b)⎻* (A o2 ((a)⎻* (A o1 X)))
- =_1 (b')⎻* (A o2 ((a')⎻* (A o1 X))));
- [2: intro; apply sym1;
- apply (.= (†(†((H' X)^-1)))); apply sym1; apply (K X);]
- clear K H' H1';
-alias symbol "powerset" (instance 5) = "powerset low".
-alias symbol "compose" (instance 2) = "category1 composition".
-cut (∀X:Ω^o1.
- ((b ∘ a))⎻* (A o1 X) =_1 ((b'∘a'))⎻* (A o1 X));
- [2: intro; unfold foo;
- apply (.= (minus_star_image_comp ??????));
- change in ⊢ (? ? ? % ?) with ((b)⎻* ((a)⎻* (A o1 X)));
- apply (.= †(saturated ?????));
- [ apply ((saturation_idempotent ????)^-1); apply A_is_saturation ]
- apply sym1;
- apply (.= (minus_star_image_comp ??????));
- change in ⊢ (? ? ? % ?) with ((b')⎻* ((a')⎻* (A o1 X)));
- apply (.= †(saturated ?????));
- [ apply ((saturation_idempotent ????)^-1); apply A_is_saturation ]
- apply ((Hcut X)^-1)]
- clear Hcut; generalize in match x; clear x;
- apply (continuous_relation_eq_inv');
- apply Hcut1;]
- | intros; simplify; intro; do 2 (unfold continuous_relation_comp); simplify;
- alias symbol "trans" (instance 1) = "trans1".
-alias symbol "refl" (instance 5) = "refl1".
-alias symbol "prop2" (instance 3) = "prop21".
-alias symbol "prop1" (instance 2) = "prop11".
-alias symbol "assoc" (instance 4) = "category1 assoc".
-apply (.= †(ASSOC‡#));
- apply refl1
- | intros; simplify; intro; unfold continuous_relation_comp; simplify;
- apply (.= †((id_neutral_right1 ????)‡#));
- apply refl1
- | intros; simplify; intro; simplify;
- apply (.= †((id_neutral_left1 ????)‡#));
- apply refl1]
-qed.
-
-(*
-(*CSC: unused! *)
-(* this proof is more logic-oriented than set/lattice oriented *)
-theorem continuous_relation_eqS:
- ∀o1,o2:basic_topology.∀a,a': continuous_relation_setoid o1 o2.
- a = a' → ∀X. A ? (extS ?? a X) = A ? (extS ?? a' X).
- intros;
- cut (∀a: arrows1 ? o1 ?.∀x. x ∈ extS ?? a X → ∃y:o2.y ∈ X ∧ x ∈ ext ?? a y);
- [2: intros; cases f; clear f; cases H1; exists [apply w] cases x1; split;
- try assumption; split; assumption]
- cut (∀a,a':continuous_relation_setoid o1 o2.eq1 ? a a' → ∀x. x ∈ extS ?? a X → ∃y:o2. y ∈ X ∧ x ∈ A ? (ext ?? a' y));
- [2: intros; cases (Hcut ?? f); exists; [apply w] cases x1; split; try assumption;
- apply (. #‡(H1 ?));
- apply (saturation_expansive ?? (A_is_saturation o1) (ext ?? a1 w) x);
- assumption;] clear Hcut;
- split; apply (if ?? (A_is_saturation ???)); intros 2;
- [lapply (Hcut1 a a' H a1 f) | lapply (Hcut1 a' a (H \sup -1) a1 f)]
- cases Hletin; clear Hletin; cases x; clear x;
- cut (∀a: arrows1 ? o1 ?. ext ?? a w ⊆ extS ?? a X);
- [2,4: intros 3; cases f3; clear f3; simplify in f5; split; try assumption;
- exists [1,3: apply w] split; assumption;]
- cut (∀a. A ? (ext o1 o2 a w) ⊆ A ? (extS o1 o2 a X));
- [2,4: intros; apply saturation_monotone; try (apply A_is_saturation); apply Hcut;]
- apply Hcut2; assumption.
-qed.
-*)
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/basic_topologies.ma".
-include "formal_topology/o-basic_topologies.ma".
-include "formal_topology/relations_to_o-algebra.ma".
-
-definition o_basic_topology_of_basic_topology: basic_topology → Obasic_topology.
- intros (b); constructor 1;
- [ apply (POW' b) | apply (A b) | apply (J b);
- | apply (A_is_saturation b) | apply (J_is_reduction b) | apply (compatibility b) ]
-qed.
-
-definition o_continuous_relation_of_continuous_relation:
- ∀BT1,BT2.continuous_relation BT1 BT2 →
- Ocontinuous_relation (o_basic_topology_of_basic_topology BT1) (o_basic_topology_of_basic_topology BT2).
- intros (BT1 BT2 c); constructor 1;
- [ apply (orelation_of_relation ?? c) | apply (reduced ?? c) | apply (saturated ?? c) ]
-qed.
-
-axiom daemon: False.
-
-lemma o_continuous_relation_of_continuous_relation_morphism :
- ∀S,T:category2_of_category1 BTop.
- unary_morphism2 (arrows2 (category2_of_category1 BTop) S T)
- (arrows2 OBTop (o_basic_topology_of_basic_topology S) (o_basic_topology_of_basic_topology T)).
-intros (S T);
- constructor 1;
- [ apply (o_continuous_relation_of_continuous_relation S T);
- | cases daemon (*apply (o_relation_pair_of_relation_pair_is_morphism S T)*)]
-qed.
-
-definition BTop_to_OBTop: carr3 ((category2_of_category1 BTop) ⇒_\c3 OBTop).
- constructor 1;
- [ apply o_basic_topology_of_basic_topology;
- | intros; apply o_continuous_relation_of_continuous_relation_morphism;
- | cases daemon (*apply o_relation_topology_of_relation_topology_morphism_respects_id*);
- | cases daemon (*apply o_relation_topology_of_relation_topology_morphism_respects_comp*);]
-qed.
-
-theorem BTop_to_OBTop_faithful: faithful2 ?? BTop_to_OBTop.
- intros 5; apply (continuous_relation_eq_inv' o1 o2 f g); apply e;
-qed.
-
-include "formal_topology/notation.ma".
-
-theorem BTop_to_OBTop_full: full2 ?? BTop_to_OBTop.
- intros 3 (S T);
- cases (POW_full (carrbt S) (carrbt T) (Ocont_rel ?? f)) (g Hg);
- (* cases Hg; *)
- exists [
- constructor 1;
- [ apply g
- | unfold image_coercion; cases daemon (*apply hide; intros; lapply (Oreduced ?? f ? e); unfold image_coercion;
- cases Hg; lapply (e3 U) as K; apply (.= K);
- apply (.= Hletin); apply rule (†(K^-1)); *)
- | cases daemon (* apply hide; intros; lapply (Osaturated ?? f ? e);
- cases Hg; lapply (e1 U) as K; apply (.= K);
- apply (.= Hletin); apply rule (†(K^-1)); *)
- ]
- | simplify; unfold BTop_to_OBTop; simplify;
- cases Hg; unfold o_continuous_relation_of_continuous_relation_morphism;
- simplify;
- change with ((orelation_of_relation ?? g)⎻* ∘ oA (o_basic_topology_of_basic_topology S) =
- f⎻* ∘ oA (o_basic_topology_of_basic_topology S));
-
-
- change with (g⎻* ∘ oA (o_basic_topology_of_basic_topology S) =
- f⎻* ∘ oA (o_basic_topology_of_basic_topology S));
- apply sym2; whd in T;
- intro;
- apply trans2; [2: apply sym2; [2: apply Hg;
-
- whd in ⊢ (?(??%%)???);
- apply (.= Hg^-1);
- unfold o_continuous_relation_of_continuous_relation_morphism; simplify;
- intro; simplify;
- unfold image_coercion; cases Hg; whd; simplify; intro; simplify;
-qed.
-*)
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/cprop_connectives.ma".
-
-notation "hvbox(a break = \sub \ID b)" non associative with precedence 45
-for @{ 'eqID $a $b }.
-
-notation > "hvbox(a break =_\ID b)" non associative with precedence 45
-for @{ cic:/matita/logic/equality/eq.ind#xpointer(1/1) ? $a $b }.
-
-interpretation "ID eq" 'eqID x y = (cic:/matita/logic/equality/eq.ind#xpointer(1/1) ? x y).
-
-record equivalence_relation (A:Type0) : Type1 ≝
- { eq_rel:2> A → A → CProp0;
- refl: reflexive ? eq_rel;
- sym: symmetric ? eq_rel;
- trans: transitive ? eq_rel
- }.
-
-record setoid : Type1 ≝
- { carr:> Type0;
- eq: equivalence_relation carr
- }.
-
-record equivalence_relation1 (A:Type1) : Type2 ≝
- { eq_rel1:2> A → A → CProp1;
- refl1: reflexive1 ? eq_rel1;
- sym1: symmetric1 ? eq_rel1;
- trans1: transitive1 ? eq_rel1
- }.
-
-record setoid1: Type2 ≝
- { carr1:> Type1;
- eq1: equivalence_relation1 carr1
- }.
-
-definition setoid1_of_setoid: setoid → setoid1.
- intro;
- constructor 1;
- [ apply (carr s)
- | constructor 1;
- [ apply (eq_rel s);
- apply (eq s)
- | apply (refl s)
- | apply (sym s)
- | apply (trans s)]]
-qed.
-
-coercion setoid1_of_setoid.
-prefer coercion Type_OF_setoid.
-
-record equivalence_relation2 (A:Type2) : Type3 ≝
- { eq_rel2:2> A → A → CProp2;
- refl2: reflexive2 ? eq_rel2;
- sym2: symmetric2 ? eq_rel2;
- trans2: transitive2 ? eq_rel2
- }.
-
-record setoid2: Type3 ≝
- { carr2:> Type2;
- eq2: equivalence_relation2 carr2
- }.
-
-definition setoid2_of_setoid1: setoid1 → setoid2.
- intro;
- constructor 1;
- [ apply (carr1 s)
- | constructor 1;
- [ apply (eq_rel1 s);
- apply (eq1 s)
- | apply (refl1 s)
- | apply (sym1 s)
- | apply (trans1 s)]]
-qed.
-
-coercion setoid2_of_setoid1.
-prefer coercion Type_OF_setoid2.
-prefer coercion Type_OF_setoid.
-prefer coercion Type_OF_setoid1.
-(* we prefer 0 < 1 < 2 *)
-
-record equivalence_relation3 (A:Type3) : Type4 ≝
- { eq_rel3:2> A → A → CProp3;
- refl3: reflexive3 ? eq_rel3;
- sym3: symmetric3 ? eq_rel3;
- trans3: transitive3 ? eq_rel3
- }.
-
-record setoid3: Type4 ≝
- { carr3:> Type3;
- eq3: equivalence_relation3 carr3
- }.
-
-interpretation "setoid3 eq" 'eq t x y = (eq_rel3 ? (eq3 t) x y).
-interpretation "setoid2 eq" 'eq t x y = (eq_rel2 ? (eq2 t) x y).
-interpretation "setoid1 eq" 'eq t x y = (eq_rel1 ? (eq1 t) x y).
-interpretation "setoid eq" 'eq t x y = (eq_rel ? (eq t) x y).
-
-notation > "hvbox(a break =_12 b)" non associative with precedence 45
-for @{ eq_rel2 (carr2 (setoid2_of_setoid1 ?)) (eq2 (setoid2_of_setoid1 ?)) $a $b }.
-notation > "hvbox(a break =_0 b)" non associative with precedence 45
-for @{ eq_rel ? (eq ?) $a $b }.
-notation > "hvbox(a break =_1 b)" non associative with precedence 45
-for @{ eq_rel1 ? (eq1 ?) $a $b }.
-notation > "hvbox(a break =_2 b)" non associative with precedence 45
-for @{ eq_rel2 ? (eq2 ?) $a $b }.
-notation > "hvbox(a break =_3 b)" non associative with precedence 45
-for @{ eq_rel3 ? (eq3 ?) $a $b }.
-
-interpretation "setoid3 symmetry" 'invert r = (sym3 ???? r).
-interpretation "setoid2 symmetry" 'invert r = (sym2 ???? r).
-interpretation "setoid1 symmetry" 'invert r = (sym1 ???? r).
-interpretation "setoid symmetry" 'invert r = (sym ???? r).
-notation ".= r" with precedence 50 for @{'trans $r}.
-interpretation "trans3" 'trans r = (trans3 ????? r).
-interpretation "trans2" 'trans r = (trans2 ????? r).
-interpretation "trans1" 'trans r = (trans1 ????? r).
-interpretation "trans" 'trans r = (trans ????? r).
-
-record unary_morphism (A,B: setoid) : Type0 ≝
- { fun1:1> A → B;
- prop1: ∀a,a'. eq ? a a' → eq ? (fun1 a) (fun1 a')
- }.
-
-record unary_morphism1 (A,B: setoid1) : Type1 ≝
- { fun11:1> A → B;
- prop11: ∀a,a'. eq1 ? a a' → eq1 ? (fun11 a) (fun11 a')
- }.
-
-record unary_morphism2 (A,B: setoid2) : Type2 ≝
- { fun12:1> A → B;
- prop12: ∀a,a'. eq2 ? a a' → eq2 ? (fun12 a) (fun12 a')
- }.
-
-record unary_morphism3 (A,B: setoid3) : Type3 ≝
- { fun13:1> A → B;
- prop13: ∀a,a'. eq3 ? a a' → eq3 ? (fun13 a) (fun13 a')
- }.
-
-record binary_morphism (A,B,C:setoid) : Type0 ≝
- { fun2:2> A → B → C;
- prop2: ∀a,a',b,b'. eq ? a a' → eq ? b b' → eq ? (fun2 a b) (fun2 a' b')
- }.
-
-record binary_morphism1 (A,B,C:setoid1) : Type1 ≝
- { fun21:2> A → B → C;
- prop21: ∀a,a',b,b'. eq1 ? a a' → eq1 ? b b' → eq1 ? (fun21 a b) (fun21 a' b')
- }.
-
-record binary_morphism2 (A,B,C:setoid2) : Type2 ≝
- { fun22:2> A → B → C;
- prop22: ∀a,a',b,b'. eq2 ? a a' → eq2 ? b b' → eq2 ? (fun22 a b) (fun22 a' b')
- }.
-
-record binary_morphism3 (A,B,C:setoid3) : Type3 ≝
- { fun23:2> A → B → C;
- prop23: ∀a,a',b,b'. eq3 ? a a' → eq3 ? b b' → eq3 ? (fun23 a b) (fun23 a' b')
- }.
-
-notation "† c" with precedence 90 for @{'prop1 $c }.
-notation "l ‡ r" with precedence 90 for @{'prop2 $l $r }.
-notation "#" with precedence 90 for @{'refl}.
-interpretation "prop1" 'prop1 c = (prop1 ????? c).
-interpretation "prop11" 'prop1 c = (prop11 ????? c).
-interpretation "prop12" 'prop1 c = (prop12 ????? c).
-interpretation "prop13" 'prop1 c = (prop13 ????? c).
-interpretation "prop2" 'prop2 l r = (prop2 ???????? l r).
-interpretation "prop21" 'prop2 l r = (prop21 ???????? l r).
-interpretation "prop22" 'prop2 l r = (prop22 ???????? l r).
-interpretation "prop23" 'prop2 l r = (prop23 ???????? l r).
-interpretation "refl" 'refl = (refl ???).
-interpretation "refl1" 'refl = (refl1 ???).
-interpretation "refl2" 'refl = (refl2 ???).
-interpretation "refl3" 'refl = (refl3 ???).
-
-notation > "A × term 74 B ⇒ term 19 C" non associative with precedence 72 for @{'binary_morphism0 $A $B $C}.
-notation > "A × term 74 B ⇒_1 term 19 C" non associative with precedence 72 for @{'binary_morphism1 $A $B $C}.
-notation > "A × term 74 B ⇒_2 term 19 C" non associative with precedence 72 for @{'binary_morphism2 $A $B $C}.
-notation > "A × term 74 B ⇒_3 term 19 C" non associative with precedence 72 for @{'binary_morphism3 $A $B $C}.
-notation > "B ⇒_1 C" right associative with precedence 72 for @{'arrows1_SET $B $C}.
-notation > "B ⇒_1. C" right associative with precedence 72 for @{'arrows1_SETlow $B $C}.
-notation > "B ⇒_2 C" right associative with precedence 72 for @{'arrows2_SET1 $B $C}.
-notation > "B ⇒_2. C" right associative with precedence 72 for @{'arrows2_SET1low $B $C}.
-
-notation "A × term 74 B ⇒ term 19 C" non associative with precedence 72 for @{'binary_morphism0 $A $B $C}.
-notation "A × term 74 B ⇒\sub 1 term 19 C" non associative with precedence 72 for @{'binary_morphism1 $A $B $C}.
-notation "A × term 74 B ⇒\sub 2 term 19 C" non associative with precedence 72 for @{'binary_morphism2 $A $B $C}.
-notation "A × term 74 B ⇒\sub 3 term 19 C" non associative with precedence 72 for @{'binary_morphism3 $A $B $C}.
-notation "B ⇒\sub 1 C" right associative with precedence 72 for @{'arrows1_SET $B $C}.
-notation "B ⇒\sub 2 C" right associative with precedence 72 for @{'arrows2_SET1 $B $C}.
-notation "B ⇒\sub 1. C" right associative with precedence 72 for @{'arrows1_SETlow $B $C}.
-notation "B ⇒\sub 2. C" right associative with precedence 72 for @{'arrows2_SET1low $B $C}.
-
-interpretation "'binary_morphism0" 'binary_morphism0 A B C = (binary_morphism A B C).
-interpretation "'arrows2_SET1 low" 'arrows2_SET1 A B = (unary_morphism2 A B).
-interpretation "'arrows2_SET1low" 'arrows2_SET1low A B = (unary_morphism2 A B).
-interpretation "'binary_morphism1" 'binary_morphism1 A B C = (binary_morphism1 A B C).
-interpretation "'binary_morphism2" 'binary_morphism2 A B C = (binary_morphism2 A B C).
-interpretation "'binary_morphism3" 'binary_morphism3 A B C = (binary_morphism3 A B C).
-interpretation "'arrows1_SET low" 'arrows1_SET A B = (unary_morphism1 A B).
-interpretation "'arrows1_SETlow" 'arrows1_SETlow A B = (unary_morphism1 A B).
-
-
-definition unary_morphism2_of_unary_morphism1:
- ∀S,T:setoid1.unary_morphism1 S T → unary_morphism2 (setoid2_of_setoid1 S) T.
- intros;
- constructor 1;
- [ apply (fun11 ?? u);
- | apply (prop11 ?? u); ]
-qed.
-
-definition CPROP: setoid1.
- constructor 1;
- [ apply CProp0
- | constructor 1;
- [ apply Iff
- | intros 1; split; intro; assumption
- | intros 3; cases i; split; assumption
- | intros 5; cases i; cases i1; split; intro;
- [ apply (f2 (f x1)) | apply (f1 (f3 z1))]]]
-qed.
-
-definition CProp0_of_CPROP: carr1 CPROP → CProp0 ≝ λx.x.
-coercion CProp0_of_CPROP.
-
-alias symbol "eq" = "setoid1 eq".
-definition fi': ∀A,B:CPROP. A = B → B → A.
- intros; apply (fi ?? e); assumption.
-qed.
-
-notation ". r" with precedence 50 for @{'fi $r}.
-interpretation "fi" 'fi r = (fi' ?? r).
-
-definition and_morphism: binary_morphism1 CPROP CPROP CPROP.
- constructor 1;
- [ apply And
- | intros; split; intro; cases a1; split;
- [ apply (if ?? e a2)
- | apply (if ?? e1 b1)
- | apply (fi ?? e a2)
- | apply (fi ?? e1 b1)]]
-qed.
-
-interpretation "and_morphism" 'and a b = (fun21 ??? and_morphism a b).
-
-definition or_morphism: binary_morphism1 CPROP CPROP CPROP.
- constructor 1;
- [ apply Or
- | intros; split; intro; cases o; [1,3:left |2,4: right]
- [ apply (if ?? e a1)
- | apply (fi ?? e a1)
- | apply (if ?? e1 b1)
- | apply (fi ?? e1 b1)]]
-qed.
-
-interpretation "or_morphism" 'or a b = (fun21 ??? or_morphism a b).
-
-definition if_morphism: binary_morphism1 CPROP CPROP CPROP.
- constructor 1;
- [ apply (λA,B. A → B)
- | intros; split; intros;
- [ apply (if ?? e1); apply f; apply (fi ?? e); assumption
- | apply (fi ?? e1); apply f; apply (if ?? e); assumption]]
-qed.
-
-notation > "hvbox(a break ∘ b)" left associative with precedence 55 for @{ comp ??? $a $b }.
-record category : Type1 ≝ {
- objs:> Type0;
- arrows: objs → objs → setoid;
- id: ∀o:objs. arrows o o;
- comp: ∀o1,o2,o3. (arrows o1 o2) × (arrows o2 o3) ⇒ (arrows o1 o3);
- comp_assoc: ∀o1,o2,o3,o4.∀a12:arrows o1 ?.∀a23:arrows o2 ?.∀a34:arrows o3 o4.
- (a12 ∘ a23) ∘ a34 =_0 a12 ∘ (a23 ∘ a34);
- id_neutral_left : ∀o1,o2. ∀a: arrows o1 o2. (id o1) ∘ a =_0 a;
- id_neutral_right: ∀o1,o2. ∀a: arrows o1 o2. a ∘ (id o2) =_0 a
-}.
-notation "hvbox(a break ∘ b)" left associative with precedence 55 for @{ 'compose $a $b }.
-
-record category1 : Type2 ≝
- { objs1:> Type1;
- arrows1: objs1 → objs1 → setoid1;
- id1: ∀o:objs1. arrows1 o o;
- comp1: ∀o1,o2,o3. binary_morphism1 (arrows1 o1 o2) (arrows1 o2 o3) (arrows1 o1 o3);
- comp_assoc1: ∀o1,o2,o3,o4. ∀a12,a23,a34.
- comp1 o1 o3 o4 (comp1 o1 o2 o3 a12 a23) a34 =_1 comp1 o1 o2 o4 a12 (comp1 o2 o3 o4 a23 a34);
- id_neutral_right1: ∀o1,o2. ∀a: arrows1 o1 o2. comp1 ??? (id1 o1) a =_1 a;
- id_neutral_left1: ∀o1,o2. ∀a: arrows1 o1 o2. comp1 ??? a (id1 o2) =_1 a
- }.
-
-record category2 : Type3 ≝
- { objs2:> Type2;
- arrows2: objs2 → objs2 → setoid2;
- id2: ∀o:objs2. arrows2 o o;
- comp2: ∀o1,o2,o3. binary_morphism2 (arrows2 o1 o2) (arrows2 o2 o3) (arrows2 o1 o3);
- comp_assoc2: ∀o1,o2,o3,o4. ∀a12,a23,a34.
- comp2 o1 o3 o4 (comp2 o1 o2 o3 a12 a23) a34 =_2 comp2 o1 o2 o4 a12 (comp2 o2 o3 o4 a23 a34);
- id_neutral_right2: ∀o1,o2. ∀a: arrows2 o1 o2. comp2 ??? (id2 o1) a =_2 a;
- id_neutral_left2: ∀o1,o2. ∀a: arrows2 o1 o2. comp2 ??? a (id2 o2) =_2 a
- }.
-
-record category3 : Type4 ≝
- { objs3:> Type3;
- arrows3: objs3 → objs3 → setoid3;
- id3: ∀o:objs3. arrows3 o o;
- comp3: ∀o1,o2,o3. binary_morphism3 (arrows3 o1 o2) (arrows3 o2 o3) (arrows3 o1 o3);
- comp_assoc3: ∀o1,o2,o3,o4. ∀a12,a23,a34.
- comp3 o1 o3 o4 (comp3 o1 o2 o3 a12 a23) a34 =_3 comp3 o1 o2 o4 a12 (comp3 o2 o3 o4 a23 a34);
- id_neutral_right3: ∀o1,o2. ∀a: arrows3 o1 o2. comp3 ??? (id3 o1) a =_3 a;
- id_neutral_left3: ∀o1,o2. ∀a: arrows3 o1 o2. comp3 ??? a (id3 o2) =_3 a
- }.
-
-notation "'ASSOC'" with precedence 90 for @{'assoc}.
-
-interpretation "category2 composition" 'compose x y = (fun22 ??? (comp2 ????) y x).
-interpretation "category2 assoc" 'assoc = (comp_assoc2 ????????).
-interpretation "category1 composition" 'compose x y = (fun21 ??? (comp1 ????) y x).
-interpretation "category1 assoc" 'assoc = (comp_assoc1 ????????).
-interpretation "category composition" 'compose x y = (fun2 ??? (comp ????) y x).
-interpretation "category assoc" 'assoc = (comp_assoc ????????).
-
-definition category2_of_category1: category1 → category2.
- intro;
- constructor 1;
- [ apply (objs1 c);
- | intros; apply (setoid2_of_setoid1 (arrows1 c o o1));
- | apply (id1 c);
- | intros;
- constructor 1;
- [ intros; apply (comp1 c o1 o2 o3 c1 c2);
- | intros; unfold setoid2_of_setoid1 in e e1 a a' b b'; simplify in e e1 a a' b b';
- change with ((b∘a) =_1 (b'∘a')); apply (e‡e1); ]
- | intros; simplify; whd in a12 a23 a34; whd; apply rule (ASSOC);
- | intros; simplify; whd in a; whd; apply id_neutral_right1;
- | intros; simplify; whd in a; whd; apply id_neutral_left1; ]
-qed.
-(*coercion category2_of_category1.*)
-
-record functor2 (C1: category2) (C2: category2) : Type3 ≝
- { map_objs2:1> C1 → C2;
- map_arrows2: ∀S,T. unary_morphism2 (arrows2 ? S T) (arrows2 ? (map_objs2 S) (map_objs2 T));
- respects_id2: ∀o:C1. map_arrows2 ?? (id2 ? o) = id2 ? (map_objs2 o);
- respects_comp2:
- ∀o1,o2,o3.∀f1:arrows2 ? o1 o2.∀f2:arrows2 ? o2 o3.
- map_arrows2 ?? (f2 ∘ f1) = map_arrows2 ?? f2 ∘ map_arrows2 ?? f1}.
-
-notation > "F⎽⇒ x" left associative with precedence 60 for @{'map_arrows2 $F $x}.
-notation "F\sub⇒ x" left associative with precedence 60 for @{'map_arrows2 $F $x}.
-interpretation "map_arrows2" 'map_arrows2 F x = (fun12 ?? (map_arrows2 ?? F ??) x).
-
-definition functor2_setoid: category2 → category2 → setoid3.
- intros (C1 C2);
- constructor 1;
- [ apply (functor2 C1 C2);
- | constructor 1;
- [ intros (f g);
- apply (∀c:C1. cic:/matita/logic/equality/eq.ind#xpointer(1/1) ? (f c) (g c));
- | simplify; intros; apply cic:/matita/logic/equality/eq.ind#xpointer(1/1/1);
- | simplify; intros; apply cic:/matita/logic/equality/sym_eq.con; apply H;
- | simplify; intros; apply cic:/matita/logic/equality/trans_eq.con;
- [2: apply H; | skip | apply H1;]]]
-qed.
-
-definition functor2_of_functor2_setoid: ∀S,T. functor2_setoid S T → functor2 S T ≝ λS,T,x.x.
-coercion functor2_of_functor2_setoid.
-
-definition CAT2: category3.
- constructor 1;
- [ apply category2;
- | apply functor2_setoid;
- | intros; constructor 1;
- [ apply (λx.x);
- | intros; constructor 1;
- [ apply (λx.x);
- | intros; assumption;]
- | intros; apply rule #;
- | intros; apply rule #; ]
- | intros; constructor 1;
- [ intros; constructor 1;
- [ intros; apply (c1 (c o));
- | intros; constructor 1;
- [ intro; apply (map_arrows2 ?? c1 ?? (map_arrows2 ?? c ?? c2));
- | intros; apply (††e); ]
- | intros; simplify;
- apply (.= †(respects_id2 : ?));
- apply (respects_id2 : ?);
- | intros; simplify;
- apply (.= †(respects_comp2 : ?));
- apply (respects_comp2 : ?); ]
- | intros; intro; simplify;
- apply (cic:/matita/logic/equality/eq_ind.con ????? (e ?));
- apply (cic:/matita/logic/equality/eq_ind.con ????? (e1 ?));
- constructor 1; ]
- | intros; intro; simplify; constructor 1;
- | intros; intro; simplify; constructor 1;
- | intros; intro; simplify; constructor 1; ]
-qed.
-
-definition category2_of_objs3_CAT2: objs3 CAT2 → category2 ≝ λx.x.
-coercion category2_of_objs3_CAT2.
-
-definition functor2_setoid_of_arrows3_CAT2: ∀S,T. arrows3 CAT2 S T → functor2_setoid S T ≝ λS,T,x.x.
-coercion functor2_setoid_of_arrows3_CAT2.
-
-notation > "B ⇒_\c3 C" right associative with precedence 72 for @{'arrows3_CAT $B $C}.
-notation "B ⇒\sub (\c 3) C" right associative with precedence 72 for @{'arrows3_CAT $B $C}.
-interpretation "'arrows3_CAT" 'arrows3_CAT A B = (arrows3 CAT2 A B).
-
-definition unary_morphism_setoid: setoid → setoid → setoid.
- intros;
- constructor 1;
- [ apply (unary_morphism s s1);
- | constructor 1;
- [ intros (f g); apply (∀a:s. eq ? (f a) (g a));
- | intros 1; simplify; intros; apply refl;
- | simplify; intros; apply sym; apply f;
- | simplify; intros; apply trans; [2: apply f; | skip | apply f1]]]
-qed.
-
-definition SET: category1.
- constructor 1;
- [ apply setoid;
- | apply rule (λS,T:setoid.setoid1_of_setoid (unary_morphism_setoid S T));
- | intros; constructor 1; [ apply (λx:carr o.x); | intros; assumption ]
- | intros; constructor 1; [ intros; constructor 1; [ apply (λx. c1 (c x)); | intros;
- apply († (†e));]
- | intros; whd; intros; simplify; whd in H1; whd in H;
- apply trans; [ apply (b (a' a1)); | lapply (prop1 ?? b (a a1) (a' a1));
- [ apply Hletin | apply (e a1); ] | apply e1; ]]
- | intros; whd; intros; simplify; apply refl;
- | intros; simplify; whd; intros; simplify; apply refl;
- | intros; simplify; whd; intros; simplify; apply refl;
- ]
-qed.
-
-definition setoid_of_SET: objs1 SET → setoid ≝ λx.x.
-coercion setoid_of_SET.
-
-definition unary_morphism_setoid_of_arrows1_SET:
- ∀P,Q.arrows1 SET P Q → unary_morphism_setoid P Q ≝ λP,Q,x.x.
-coercion unary_morphism_setoid_of_arrows1_SET.
-
-interpretation "'arrows1_SET" 'arrows1_SET A B = (arrows1 SET A B).
-
-definition unary_morphism1_setoid1: setoid1 → setoid1 → setoid1.
- intros;
- constructor 1;
- [ apply (unary_morphism1 s s1);
- | constructor 1;
- [ intros (f g);
- alias symbol "eq" = "setoid1 eq".
- apply (∀a: carr1 s. f a = g a);
- | intros 1; simplify; intros; apply refl1;
- | simplify; intros; apply sym1; apply f;
- | simplify; intros; apply trans1; [2: apply f; | skip | apply f1]]]
-qed.
-
-definition unary_morphism1_of_unary_morphism1_setoid1 :
- ∀S,T. unary_morphism1_setoid1 S T → unary_morphism1 S T ≝ λP,Q,x.x.
-coercion unary_morphism1_of_unary_morphism1_setoid1.
-
-definition SET1: objs3 CAT2.
- constructor 1;
- [ apply setoid1;
- | apply rule (λS,T.setoid2_of_setoid1 (unary_morphism1_setoid1 S T));
- | intros; constructor 1; [ apply (λx.x); | intros; assumption ]
- | intros; constructor 1; [ intros; constructor 1; [ apply (λx. c1 (c x)); | intros;
- apply († (†e));]
- | intros; whd; intros; simplify; whd in H1; whd in H;
- apply trans1; [ apply (b (a' a1)); | lapply (prop11 ?? b (a a1) (a' a1));
- [ apply Hletin | apply (e a1); ] | apply e1; ]]
- | intros; whd; intros; simplify; apply refl1;
- | intros; simplify; whd; intros; simplify; apply refl1;
- | intros; simplify; whd; intros; simplify; apply refl1;
- ]
-qed.
-
-interpretation "'arrows2_SET1" 'arrows2_SET1 A B = (arrows2 SET1 A B).
-
-definition setoid1_of_SET1: objs2 SET1 → setoid1 ≝ λx.x.
-coercion setoid1_of_SET1.
-
-definition unary_morphism1_setoid1_of_arrows2_SET1:
- ∀P,Q.arrows2 SET1 P Q → unary_morphism1_setoid1 P Q ≝ λP,Q,x.x.
-coercion unary_morphism1_setoid1_of_arrows2_SET1.
-
-variant objs2_of_category1: objs1 SET → objs2 SET1 ≝ setoid1_of_setoid.
-coercion objs2_of_category1.
-
-prefer coercion Type_OF_setoid. (* we prefer the lower carrier projection *)
-prefer coercion Type_OF_objs1.
-
-alias symbol "exists" (instance 1) = "CProp2 exists".
-definition full2 ≝
- λA,B:CAT2.λF:carr3 (arrows3 CAT2 A B).
- ∀o1,o2:A.∀f.∃g:arrows2 A o1 o2.F⎽⇒ g =_2 f.
-alias symbol "exists" (instance 1) = "CProp exists".
-
-definition faithful2 ≝
- λA,B:CAT2.λF:carr3 (arrows3 CAT2 A B).
- ∀o1,o2:A.∀f,g:arrows2 A o1 o2.F⎽⇒ f =_2 F⎽⇒ g → f =_2 g.
-
-
-notation "r \sup *" non associative with precedence 90 for @{'OR_f_star $r}.
-notation > "r *" non associative with precedence 90 for @{'OR_f_star $r}.
-
-notation "r \sup (⎻* )" non associative with precedence 90 for @{'OR_f_minus_star $r}.
-notation > "r⎻*" non associative with precedence 90 for @{'OR_f_minus_star $r}.
-
-notation "r \sup ⎻" non associative with precedence 90 for @{'OR_f_minus $r}.
-notation > "r⎻" non associative with precedence 90 for @{'OR_f_minus $r}.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/basic_pairs.ma".
-
-(* carr1 e' necessario perche' ci sega via la coercion per gli oggetti di REL!
- (confondendola con la coercion per gli oggetti di SET
-record concrete_space : Type1 ≝
- { bp:> BP;
- converges: ∀a: carr1 (concr bp).∀U,V: carr1 (form bp). a ⊩ U → a ⊩ V → a ⊩ (U ↓ V);
- all_covered: ∀x: carr1 (concr bp). x ⊩ form bp
- }.
-
-record convergent_relation_pair (CS1,CS2: concrete_space) : Type1 ≝
- { rp:> arrows1 ? CS1 CS2;
- respects_converges:
- ∀b,c.
- minus_image ?? rp \sub\c (BPextS CS2 (b ↓ c)) =
- BPextS CS1 ((minus_image ?? rp \sub\f b) ↓ (minus_image ?? rp \sub\f c));
- respects_all_covered:
- minus_image ?? rp\sub\c (BPextS CS2 (full_subset (form CS2))) = BPextS CS1 (full_subset (form CS1))
- }.
-
-definition convergent_relation_space_setoid: concrete_space → concrete_space → setoid1.
- intros;
- constructor 1;
- [ apply (convergent_relation_pair c c1)
- | constructor 1;
- [ intros;
- apply (relation_pair_equality c c1 c2 c3);
- | intros 1; apply refl1;
- | intros 2; apply sym1;
- | intros 3; apply trans1]]
-qed.
-
-definition convergent_relation_space_composition:
- ∀o1,o2,o3: concrete_space.
- binary_morphism1
- (convergent_relation_space_setoid o1 o2)
- (convergent_relation_space_setoid o2 o3)
- (convergent_relation_space_setoid o1 o3).
- intros; constructor 1;
- [ intros; whd in c c1 ⊢ %;
- constructor 1;
- [ apply (fun1 ??? (comp1 BP ???)); [apply (bp o2) |*: apply rp; assumption]
- | intros;
- change in ⊢ (? ? ? (? ? ? (? ? ? %) ?) ?) with (c1 \sub \c ∘ c \sub \c);
- change in ⊢ (? ? ? ? (? ? ? ? (? ? ? ? ? (? ? ? (? ? ? %) ?) ?)))
- with (c1 \sub \f ∘ c \sub \f);
- change in ⊢ (? ? ? ? (? ? ? ? (? ? ? ? ? ? (? ? ? (? ? ? %) ?))))
- with (c1 \sub \f ∘ c \sub \f);
- apply (.= (extS_com ??????));
- apply (.= (†(respects_converges ?????)));
- apply (.= (respects_converges ?????));
- apply (.= (†(((extS_com ??????) \sup -1)‡(extS_com ??????)\sup -1)));
- apply refl1;
- | change in ⊢ (? ? ? (? ? ? (? ? ? %) ?) ?) with (c1 \sub \c ∘ c \sub \c);
- apply (.= (extS_com ??????));
- apply (.= (†(respects_all_covered ???)));
- apply (.= respects_all_covered ???);
- apply refl1]
- | intros;
- change with (b ∘ a = b' ∘ a');
- change in H with (rp'' ?? a = rp'' ?? a');
- change in H1 with (rp'' ?? b = rp ?? b');
- apply (.= (H‡H1));
- apply refl1]
-qed.
-
-definition CSPA: category1.
- constructor 1;
- [ apply concrete_space
- | apply convergent_relation_space_setoid
- | intro; constructor 1;
- [ apply id1
- | intros;
- unfold id; simplify;
- apply (.= (equalset_extS_id_X_X ??));
- apply (.= (†((equalset_extS_id_X_X ??)\sup -1‡
- (equalset_extS_id_X_X ??)\sup -1)));
- apply refl1;
- | apply (.= (equalset_extS_id_X_X ??));
- apply refl1]
- | apply convergent_relation_space_composition
- | intros; simplify;
- change with (a34 ∘ (a23 ∘ a12) = (a34 ∘ a23) ∘ a12);
- apply (.= ASSOC1);
- apply refl1
- | intros; simplify;
- change with (a ∘ id1 ? o1 = a);
- apply (.= id_neutral_right1 ????);
- apply refl1
- | intros; simplify;
- change with (id1 ? o2 ∘ a = a);
- apply (.= id_neutral_left1 ????);
- apply refl1]
-qed.
-*)
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/concrete_spaces.ma".
-include "formal_topology/o-concrete_spaces.ma".
-include "formal_topology/basic_pairs_to_o-basic_pairs.ma".
-
-(*
-(* Qui, per fare le cose per bene, ci serve la nozione di funtore categorico *)
-definition o_concrete_space_of_concrete_space: cic:/matita/formal_topology/concrete_spaces/concrete_space.ind#xpointer(1/1) → concrete_space.
- intro;
- constructor 1;
- [ apply (o_basic_pair_of_basic_pair (bp c));
- | lapply depth=0 (downarrow c);
- constructor 1;
- [ apply
- |
- apply (o_operator_of_operator);fintersectsS);
- |
- |
- |
- |
- |
- ]
-qed.
-
-definition o_convergent_relation_pair_of_convergent_relation_pair:
- ∀BP1,BP2.cic:/matita/formal_topology/concrete_spaces/convergent_relation_pair.ind#xpointer(1/1) BP1 BP2 →
- convergent_relation_pair (o_concrete_space_of_concrete_space BP1) (o_concrete_space_of_concrete_space BP2).
- intros;
- constructor 1;
- [ apply (orelation_of_relation ?? (r \sub \c));
- | apply (orelation_of_relation ?? (r \sub \f));
- | lapply (commute ?? r);
- lapply (orelation_of_relation_preserves_equality ???? Hletin);
- apply (.= (orelation_of_relation_preserves_composition (concr BP1) ??? (rel BP2)) ^ -1);
- apply (.= (orelation_of_relation_preserves_equality ???? (commute ?? r)));
- apply (orelation_of_relation_preserves_composition ?? (form BP2) (rel BP1) ?); ]
-qed.
-
-*)
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "logic/connectives.ma".
-
-definition Type4 : Type := Type.
-definition Type3 : Type4 := Type.
-definition Type2 : Type3 := Type.
-definition Type1 : Type2 := Type.
-definition Type0 : Type1 := Type.
-
-definition Type_of_Type0: Type0 → Type := λx.x.
-definition Type_of_Type1: Type1 → Type := λx.x.
-definition Type_of_Type2: Type2 → Type := λx.x.
-definition Type_of_Type3: Type3 → Type := λx.x.
-definition Type_of_Type4: Type4 → Type := λx.x.
-coercion Type_of_Type0.
-coercion Type_of_Type1.
-coercion Type_of_Type2.
-coercion Type_of_Type3.
-coercion Type_of_Type4.
-
-definition CProp0 : Type1 := Type0.
-definition CProp1 : Type2 := Type1.
-definition CProp2 : Type3 := Type2.
-definition CProp3 : Type4 := Type3.
-definition CProp_of_CProp0: CProp0 → CProp ≝ λx.x.
-definition CProp_of_CProp1: CProp1 → CProp ≝ λx.x.
-definition CProp_of_CProp2: CProp2 → CProp ≝ λx.x.
-definition CProp_of_CProp3: CProp3 → CProp ≝ λx.x.
-coercion CProp_of_CProp0.
-coercion CProp_of_CProp1.
-coercion CProp_of_CProp2.
-coercion CProp_of_CProp3.
-
-inductive Or (A,B:CProp0) : CProp0 ≝
- | Left : A → Or A B
- | Right : B → Or A B.
-
-interpretation "constructive or" 'or x y = (Or x y).
-
-inductive Or3 (A,B,C:CProp0) : CProp0 ≝
- | Left3 : A → Or3 A B C
- | Middle3 : B → Or3 A B C
- | Right3 : C → Or3 A B C.
-
-interpretation "constructive ternary or" 'or3 x y z= (Or3 x y z).
-
-notation < "hvbox(a break ∨ b break ∨ c)" with precedence 35 for @{'or3 $a $b $c}.
-
-inductive Or4 (A,B,C,D:CProp0) : CProp0 ≝
- | Left3 : A → Or4 A B C D
- | Middle3 : B → Or4 A B C D
- | Right3 : C → Or4 A B C D
- | Extra3: D → Or4 A B C D.
-
-interpretation "constructive ternary or" 'or4 x y z t = (Or4 x y z t).
-
-notation < "hvbox(a break ∨ b break ∨ c break ∨ d)" with precedence 35 for @{'or4 $a $b $c $d}.
-
-inductive And (A,B:CProp0) : CProp0 ≝
- | Conj : A → B → And A B.
-
-interpretation "constructive and" 'and x y = (And x y).
-
-inductive And3 (A,B,C:CProp0) : CProp0 ≝
- | Conj3 : A → B → C → And3 A B C.
-
-notation < "hvbox(a break ∧ b break ∧ c)" with precedence 35 for @{'and3 $a $b $c}.
-
-interpretation "constructive ternary and" 'and3 x y z = (And3 x y z).
-
-inductive And42 (A,B,C,D:CProp2) : CProp2 ≝
- | Conj42 : A → B → C → D → And42 A B C D.
-
-notation < "hvbox(a break ∧ b break ∧ c break ∧ d)" with precedence 35 for @{'and4 $a $b $c $d}.
-
-interpretation "constructive quaternary and2" 'and4 x y z t = (And42 x y z t).
-
-record Iff (A,B:CProp0) : CProp0 ≝
- { if: A → B;
- fi: B → A
- }.
-
-record Iff1 (A,B:CProp1) : CProp1 ≝
- { if1: A → B;
- fi1: B → A
- }.
-
-notation "hvbox(a break ⇔ b)" right associative with precedence 25 for @{'iff1 $a $b}.
-interpretation "logical iff" 'iff x y = (Iff x y).
-interpretation "logical iff type1" 'iff1 x y = (Iff1 x y).
-
-inductive exT22 (A:Type2) (P:A→CProp2) : CProp2 ≝
- ex_introT22: ∀w:A. P w → exT22 A P.
-
-interpretation "CProp2 exists" 'exists \eta.x = (exT22 ? x).
-
-definition pi1exT22 ≝ λA,P.λx:exT22 A P.match x with [ex_introT22 x _ ⇒ x].
-definition pi2exT22 ≝
- λA,P.λx:exT22 A P.match x return λx.P (pi1exT22 ?? x) with [ex_introT22 _ p ⇒ p].
-
-interpretation "exT22 \fst" 'pi1 = (pi1exT22 ? ?).
-interpretation "exT22 \snd" 'pi2 = (pi2exT22 ? ?).
-interpretation "exT22 \fst a" 'pi1a x = (pi1exT22 ? ? x).
-interpretation "exT22 \snd a" 'pi2a x = (pi2exT22 ? ? x).
-interpretation "exT22 \fst b" 'pi1b x y = (pi1exT22 ? ? x y).
-interpretation "exT22 \snd b" 'pi2b x y = (pi2exT22 ? ? x y).
-
-inductive exT (A:Type0) (P:A→CProp0) : CProp0 ≝
- ex_introT: ∀w:A. P w → exT A P.
-
-interpretation "CProp exists" 'exists \eta.x = (exT ? x).
-
-notation "\ll term 19 a, break term 19 b \gg"
-with precedence 90 for @{'dependent_pair $a $b}.
-interpretation "dependent pair" 'dependent_pair a b =
- (ex_introT ? ? a b).
-
-
-definition pi1exT ≝ λA,P.λx:exT A P.match x with [ex_introT x _ ⇒ x].
-definition pi2exT ≝
- λA,P.λx:exT A P.match x return λx.P (pi1exT ?? x) with [ex_introT _ p ⇒ p].
-
-interpretation "exT \fst" 'pi1 = (pi1exT ? ?).
-interpretation "exT \fst a" 'pi1a x = (pi1exT ? ? x).
-interpretation "exT \fst b" 'pi1b x y = (pi1exT ? ? x y).
-interpretation "exT \snd" 'pi2 = (pi2exT ? ?).
-interpretation "exT \snd a" 'pi2a x = (pi2exT ? ? x).
-interpretation "exT \snd b" 'pi2b x y = (pi2exT ? ? x y).
-
-inductive exT23 (A:Type0) (P:A→CProp0) (Q:A→CProp0) (R:A→A→CProp0) : CProp0 ≝
- ex_introT23: ∀w,p:A. P w → Q p → R w p → exT23 A P Q R.
-
-definition pi1exT23 ≝
- λA,P,Q,R.λx:exT23 A P Q R.match x with [ex_introT23 x _ _ _ _ ⇒ x].
-definition pi2exT23 ≝
- λA,P,Q,R.λx:exT23 A P Q R.match x with [ex_introT23 _ x _ _ _ ⇒ x].
-
-interpretation "exT2 \fst" 'pi1 = (pi1exT23 ? ? ? ?).
-interpretation "exT2 \snd" 'pi2 = (pi2exT23 ? ? ? ?).
-interpretation "exT2 \fst a" 'pi1a x = (pi1exT23 ? ? ? ? x).
-interpretation "exT2 \snd a" 'pi2a x = (pi2exT23 ? ? ? ? x).
-interpretation "exT2 \fst b" 'pi1b x y = (pi1exT23 ? ? ? ? x y).
-interpretation "exT2 \snd b" 'pi2b x y = (pi2exT23 ? ? ? ? x y).
-
-inductive exT2 (A:Type0) (P,Q:A→CProp0) : CProp0 ≝
- ex_introT2: ∀w:A. P w → Q w → exT2 A P Q.
-
-
-definition Not : CProp0 → Prop ≝ λx:CProp.x → False.
-
-interpretation "constructive not" 'not x = (Not x).
-
-definition cotransitive: ∀C:Type0. ∀lt:C→C→CProp0.CProp0 ≝
- λC:Type0.λlt:C→C→CProp0.∀x,y,z:C. lt x y → lt x z ∨ lt z y.
-
-definition coreflexive: ∀C:Type0. ∀lt:C→C→CProp0.CProp0 ≝
- λC:Type0.λlt:C→C→CProp0. ∀x:C. ¬ (lt x x).
-
-definition symmetric: ∀C:Type0. ∀lt:C→C→CProp0.CProp0 ≝
- λC:Type0.λlt:C→C→CProp0. ∀x,y:C.lt x y → lt y x.
-
-definition antisymmetric: ∀A:Type0. ∀R:A→A→CProp0. ∀eq:A→A→Prop.CProp0 ≝
- λA:Type0.λR:A→A→CProp0.λeq:A→A→Prop.∀x:A.∀y:A.R x y→R y x→eq x y.
-
-definition reflexive: ∀C:Type0. ∀lt:C→C→CProp0.CProp0 ≝ λA:Type0.λR:A→A→CProp0.∀x:A.R x x.
-
-definition transitive: ∀C:Type0. ∀lt:C→C→CProp0.CProp0 ≝ λA:Type0.λR:A→A→CProp0.∀x,y,z:A.R x y → R y z → R x z.
-
-definition reflexive1: ∀A:Type1.∀R:A→A→CProp1.CProp1 ≝ λA:Type1.λR:A→A→CProp1.∀x:A.R x x.
-definition symmetric1: ∀A:Type1.∀R:A→A→CProp1.CProp1 ≝ λC:Type1.λlt:C→C→CProp1. ∀x,y:C.lt x y → lt y x.
-definition transitive1: ∀A:Type1.∀R:A→A→CProp1.CProp1 ≝ λA:Type1.λR:A→A→CProp1.∀x,y,z:A.R x y → R y z → R x z.
-
-definition reflexive2: ∀A:Type2.∀R:A→A→CProp2.CProp2 ≝ λA:Type2.λR:A→A→CProp2.∀x:A.R x x.
-definition symmetric2: ∀A:Type2.∀R:A→A→CProp2.CProp2 ≝ λC:Type2.λlt:C→C→CProp2. ∀x,y:C.lt x y → lt y x.
-definition transitive2: ∀A:Type2.∀R:A→A→CProp2.CProp2 ≝ λA:Type2.λR:A→A→CProp2.∀x,y,z:A.R x y → R y z → R x z.
-
-definition reflexive3: ∀A:Type3.∀R:A→A→CProp3.CProp3 ≝ λA:Type3.λR:A→A→CProp3.∀x:A.R x x.
-definition symmetric3: ∀A:Type3.∀R:A→A→CProp3.CProp3 ≝ λC:Type3.λlt:C→C→CProp3. ∀x,y:C.lt x y → lt y x.
-definition transitive3: ∀A:Type3.∀R:A→A→CProp3.CProp3 ≝ λA:Type3.λR:A→A→CProp3.∀x,y,z:A.R x y → R y z → R x z.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/basic_topologies.ma".
-
-(*
-definition downarrow: ∀S:BTop. unary_morphism (Ω \sup S) (Ω \sup S).
- intros; constructor 1;
- [ apply (λU:Ω \sup S.{a | ∃b:carrbt S. b ∈ U ∧ a ∈ A ? (singleton ? b)});
- intros; simplify; split; intro; cases H1; cases x; exists [1,3: apply w]
- split; try assumption; [ apply (. H‡#) | apply (. H \sup -1‡#) ] assumption
- | intros; split; intros 2; cases f; exists; [1,3: apply w] cases x; split;
- try assumption; [ apply (. #‡H) | apply (. #‡H \sup -1)] assumption]
-qed.
-
-interpretation "downarrow" 'downarrow a = (fun_1 ?? (downarrow ?) a).
-
-definition ffintersects: ∀S:BTop. binary_morphism1 (Ω \sup S) (Ω \sup S) (Ω \sup S).
- intros; constructor 1;
- [ apply (λU,V. ↓U ∩ ↓V);
- | intros; apply (.= (†H)‡(†H1)); apply refl1]
-qed.
-
-interpretation "ffintersects" 'fintersects U V = (fun1 ??? (ffintersects ?) U V).
-
-record formal_topology: Type ≝
- { bt:> BTop;
- converges: ∀U,V: Ω \sup bt. A ? (U ↓ V) = A ? U ∩ A ? V
- }.
-
-
-definition ffintersects': ∀S:BTop. binary_morphism1 S S (Ω \sup S).
- intros; constructor 1;
- [ apply (λb,c:S. (singleton S b) ↓ (singleton S c));
- | intros; apply (.= (†H)‡(†H1)); apply refl1]
-qed.
-
-interpretation "ffintersects'" 'fintersects U V = (fun1 ??? (ffintersects' ?) U V).
-
-record formal_map (S,T: formal_topology) : Type ≝
- { cr:> continuous_relation_setoid S T;
- C1: ∀b,c. extS ?? cr (b ↓ c) = ext ?? cr b ↓ ext ?? cr c;
- C2: extS ?? cr T = S
- }.
-
-definition formal_map_setoid: formal_topology → formal_topology → setoid1.
- intros (S T); constructor 1;
- [ apply (formal_map S T);
- | constructor 1;
- [ apply (λf,f1: formal_map S T.f=f1);
- | simplify; intros 1; apply refl1
- | simplify; intros 2; apply sym1
- | simplify; intros 3; apply trans1]]
-qed.
-
-axiom C1':
- ∀S,T: formal_topology.∀f:formal_map_setoid S T.∀U,V: Ω \sup T.
- extS ?? f (U ↓ V) = extS ?? f U ↓ extS ?? f V.
-
-definition formal_map_composition:
- ∀o1,o2,o3: formal_topology.
- binary_morphism1
- (formal_map_setoid o1 o2)
- (formal_map_setoid o2 o3)
- (formal_map_setoid o1 o3).
- intros; constructor 1;
- [ intros; whd in c c1; constructor 1;
- [ apply (comp1 BTop ??? c c1);
- | intros;
- apply (.= (extS_com ??? c c1 ?));
- apply (.= †(C1 ?????));
- apply (.= (C1' ?????));
- apply (.= ((†((extS_singleton ????) \sup -1))‡(†((extS_singleton ????) \sup -1))));
- apply (.= (extS_com ??????)\sup -1 ‡ (extS_com ??????) \sup -1);
- apply (.= (extS_singleton ????)‡(extS_singleton ????));
- apply refl1;
- | apply (.= (extS_com ??? c c1 ?));
- apply (.= (†(C2 ???)));
- apply (.= (C2 ???));
- apply refl1;]
- | intros; simplify;
- change with (comp1 BTop ??? a b = comp1 BTop ??? a' b');
- apply prop1; assumption]
-qed.
-
-*)
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-notation "hvbox (r \sub \c)" with precedence 90 for @{'concr_rel $r}.
-notation "hvbox (r \sub \f)" with precedence 90 for @{'form_rel $r}.
-
-definition hide ≝ λA:Type.λx:A.x.
-
-interpretation "hide" 'hide x = (hide ? x).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/categories.ma".
-
-inductive bool : Type0 := true : bool | false : bool.
-
-lemma BOOL : objs1 SET.
-constructor 1; [apply bool] constructor 1;
-[ intros (x y); apply (match x with [ true ⇒ match y with [ true ⇒ True | _ ⇒ False] | false ⇒ match y with [ true ⇒ False | false ⇒ True ]]);
-| whd; simplify; intros; cases x; apply I;
-| whd; simplify; intros 2; cases x; cases y; simplify; intros; assumption;
-| whd; simplify; intros 3; cases x; cases y; cases z; simplify; intros;
- try assumption; apply I]
-qed.
-
-lemma IF_THEN_ELSE_p :
- ∀S:setoid1.∀a,b:S.∀x,y:BOOL.x = y →
- (λm.match m with [ true ⇒ a | false ⇒ b ]) x =
- (λm.match m with [ true ⇒ a | false ⇒ b ]) y.
-whd in ⊢ (?→?→?→%→?);
-intros; cases x in e; cases y; simplify; intros; try apply refl1; whd in e; cases e;
-qed.
-
-interpretation "unary morphism comprehension with no proof" 'comprehension T P =
- (mk_unary_morphism T ? P ?).
-interpretation "unary morphism1 comprehension with no proof" 'comprehension T P =
- (mk_unary_morphism1 T ? P ?).
-
-notation > "hvbox({ ident i ∈ s | term 19 p | by })" with precedence 90
-for @{ 'comprehension_by $s (λ${ident i}. $p) $by}.
-notation < "hvbox({ ident i ∈ s | term 19 p })" with precedence 90
-for @{ 'comprehension_by $s (λ${ident i}:$_. $p) $by}.
-
-interpretation "unary morphism comprehension with proof" 'comprehension_by s \eta.f p =
- (mk_unary_morphism s ? f p).
-interpretation "unary morphism1 comprehension with proof" 'comprehension_by s \eta.f p =
- (mk_unary_morphism1 s ? f p).
-
-(* per il set-indexing vedere capitolo BPTools (foundational tools), Sect. 0.3.4 complete
- lattices, Definizione 0.9 *)
-(* USARE L'ESISTENZIALE DEBOLE *)
-
-definition if_then_else ≝ λT:Type.λe,t,f.match e return λ_.T with [ true ⇒ t | false ⇒ f].
-notation > "'If' term 19 e 'then' term 19 t 'else' term 90 f" non associative with precedence 19 for @{ 'if_then_else $e $t $f }.
-notation < "'If' \nbsp term 19 e \nbsp 'then' \nbsp term 19 t \nbsp 'else' \nbsp term 90 f \nbsp" non associative with precedence 19 for @{ 'if_then_else $e $t $f }.
-interpretation "Formula if_then_else" 'if_then_else e t f = (if_then_else ? e t f).
-
-notation > "hvbox(a break ≤ b)" non associative with precedence 45 for @{oa_leq $a $b}.
-notation > "a >< b" non associative with precedence 45 for @{oa_overlap $a $b}.
-notation > "⋁ p" non associative with precedence 45 for @{oa_join ? $p}.
-notation > "⋀ p" non associative with precedence 45 for @{oa_meet ? $p}.
-notation > "𝟙" non associative with precedence 90 for @{oa_one}.
-notation > "𝟘" non associative with precedence 90 for @{oa_zero}.
-record OAlgebra : Type2 := {
- oa_P :> SET1;
- oa_leq : oa_P × oa_P ⇒_1 CPROP;
- oa_overlap: oa_P × oa_P ⇒_1 CPROP;
- oa_meet: ∀I:SET.(I ⇒_2 oa_P) ⇒_2. oa_P;
- oa_join: ∀I:SET.(I ⇒_2 oa_P) ⇒_2. oa_P;
- oa_one: oa_P;
- oa_zero: oa_P;
- oa_leq_refl: ∀a:oa_P. a ≤ a;
- oa_leq_antisym: ∀a,b:oa_P.a ≤ b → b ≤ a → a = b;
- oa_leq_trans: ∀a,b,c:oa_P.a ≤ b → b ≤ c → a ≤ c;
- oa_overlap_sym: ∀a,b:oa_P.a >< b → b >< a;
- oa_meet_inf: ∀I:SET.∀p_i:I ⇒_2 oa_P.∀p:oa_P.p ≤ (⋀ p_i) = (∀i:I.p ≤ (p_i i));
- oa_join_sup: ∀I:SET.∀p_i:I ⇒_2 oa_P.∀p:oa_P.(⋁ p_i) ≤ p = (∀i:I.p_i i ≤ p);
- oa_zero_bot: ∀p:oa_P.𝟘 ≤ p;
- oa_one_top: ∀p:oa_P.p ≤ 𝟙;
- oa_overlap_preserves_meet_: ∀p,q:oa_P.p >< q →
- p >< (⋀ { x ∈ BOOL | If x then p else q | IF_THEN_ELSE_p oa_P p q });
- oa_join_split: ∀I:SET.∀p.∀q:I ⇒_2 oa_P.p >< (⋁ q) = (∃i:I.p >< (q i));
- (*oa_base : setoid;
- 1) enum non e' il nome giusto perche' non e' suriettiva
- 2) manca (vedere altro capitolo) la "suriettivita'" come immagine di insiemi di oa_base
- oa_enum : ums oa_base oa_P;
- oa_density: ∀p,q.(∀i.oa_overlap p (oa_enum i) → oa_overlap q (oa_enum i)) → oa_leq p q
- *)
- oa_density: ∀p,q.(∀r.p >< r → q >< r) → p ≤ q
-}.
-
-notation "hvbox(a break ≤ b)" non associative with precedence 45 for @{ 'leq $a $b }.
-
-interpretation "o-algebra leq" 'leq a b = (fun21 ??? (oa_leq ?) a b).
-
-notation "hovbox(a mpadded width -150% (>)< b)" non associative with precedence 45
-for @{ 'overlap $a $b}.
-interpretation "o-algebra overlap" 'overlap a b = (fun21 ??? (oa_overlap ?) a b).
-
-notation < "hovbox(mstyle scriptlevel 1 scriptsizemultiplier 1.7 (∧) \below (\emsp) \nbsp term 90 p)"
-non associative with precedence 50 for @{ 'oa_meet $p }.
-notation < "hovbox(mstyle scriptlevel 1 scriptsizemultiplier 1.7 (∧) \below (ident i ∈ I) break term 90 p)"
-non associative with precedence 50 for @{ 'oa_meet_mk (λ${ident i}:$I.$p) }.
-
-notation > "hovbox(∧ f)" non associative with precedence 60
-for @{ 'oa_meet $f }.
-interpretation "o-algebra meet" 'oa_meet f =
- (fun12 ?? (oa_meet ??) f).
-interpretation "o-algebra meet with explicit function" 'oa_meet_mk f =
- (fun12 ?? (oa_meet ??) (mk_unary_morphism1 ?? f ?)).
-
-notation < "hovbox(mstyle scriptlevel 1 scriptsizemultiplier 1.7 (∨) \below (\emsp) \nbsp term 90 p)"
-non associative with precedence 50 for @{ 'oa_join $p }.
-notation < "hovbox(mstyle scriptlevel 1 scriptsizemultiplier 1.7 (∨) \below (ident i ∈ I) break term 90 p)"
-non associative with precedence 50 for @{ 'oa_join_mk (λ${ident i}:$I.$p) }.
-
-notation > "hovbox(∨ f)" non associative with precedence 60
-for @{ 'oa_join $f }.
-interpretation "o-algebra join" 'oa_join f =
- (fun12 ?? (oa_join ??) f).
-interpretation "o-algebra join with explicit function" 'oa_join_mk f =
- (fun12 ?? (oa_join ??) (mk_unary_morphism ?? f ?)).
-
-definition binary_meet : ∀O:OAlgebra. O × O ⇒_1 O.
-intros; split;
-[ intros (p q);
- apply (∧ { x ∈ BOOL | match x with [ true ⇒ p | false ⇒ q ] | IF_THEN_ELSE_p ? p q });
-| intros; lapply (prop12 ? O (oa_meet O BOOL));
- [2: apply ({ x ∈ BOOL | match x with [ true ⇒ a | false ⇒ b ] | IF_THEN_ELSE_p ? a b });
- |3: apply ({ x ∈ BOOL | match x with [ true ⇒ a' | false ⇒ b' ] | IF_THEN_ELSE_p ? a' b' });
- | apply Hletin;]
- intro x; simplify; cases x; simplify; assumption;]
-qed.
-
-interpretation "o-algebra binary meet" 'and a b =
- (fun21 ??? (binary_meet ?) a b).
-
-prefer coercion Type1_OF_OAlgebra.
-
-definition binary_join : ∀O:OAlgebra. O × O ⇒_1 O.
-intros; split;
-[ intros (p q);
- apply (∨ { x ∈ BOOL | match x with [ true ⇒ p | false ⇒ q ] | IF_THEN_ELSE_p ? p q });
-| intros; lapply (prop12 ? O (oa_join O BOOL));
- [2: apply ({ x ∈ BOOL | match x with [ true ⇒ a | false ⇒ b ] | IF_THEN_ELSE_p ? a b });
- |3: apply ({ x ∈ BOOL | match x with [ true ⇒ a' | false ⇒ b' ] | IF_THEN_ELSE_p ? a' b' });
- | apply Hletin;]
- intro x; simplify; cases x; simplify; assumption;]
-qed.
-
-interpretation "o-algebra binary join" 'or a b =
- (fun21 ??? (binary_join ?) a b).
-
-lemma oa_overlap_preservers_meet: ∀O:OAlgebra.∀p,q:O.p >< q → p >< (p ∧ q).
-intros; lapply (oa_overlap_preserves_meet_ O p q f) as H; clear f;
-(** screenshot "screenoa". *)
-assumption;
-qed.
-
-notation < "hovbox(mstyle scriptlevel 1 scriptsizemultiplier 1.7 (∨) \below (\emsp) \nbsp term 90 p)"
-non associative with precedence 49 for @{ 'oa_join $p }.
-notation < "hovbox(mstyle scriptlevel 1 scriptsizemultiplier 1.7 (∨) \below (ident i ∈ I) break term 90 p)"
-non associative with precedence 49 for @{ 'oa_join_mk (λ${ident i}:$I.$p) }.
-notation < "hovbox(a ∨ b)" left associative with precedence 49
-for @{ 'oa_join_mk (λ${ident i}:$_.match $i with [ true ⇒ $a | false ⇒ $b ]) }.
-
-notation > "hovbox(∨ f)" non associative with precedence 59
-for @{ 'oa_join $f }.
-notation > "hovbox(a ∨ b)" left associative with precedence 49
-for @{ 'oa_join (mk_unary_morphism BOOL ? (λx__:bool.match x__ with [ true ⇒ $a | false ⇒ $b ]) (IF_THEN_ELSE_p ? $a $b)) }.
-
-interpretation "o-algebra join" 'oa_join f =
- (fun12 ?? (oa_join ??) f).
-interpretation "o-algebra join with explicit function" 'oa_join_mk f =
- (fun12 ?? (oa_join ??) (mk_unary_morphism ?? f ?)).
-
-record ORelation (P,Q : OAlgebra) : Type2 ≝ {
- or_f_ : P ⇒_2 Q;
- or_f_minus_star_ : P ⇒_2 Q;
- or_f_star_ : Q ⇒_2 P;
- or_f_minus_ : Q ⇒_2 P;
- or_prop1_ : ∀p,q. (or_f_ p ≤ q) = (p ≤ or_f_star_ q);
- or_prop2_ : ∀p,q. (or_f_minus_ p ≤ q) = (p ≤ or_f_minus_star_ q);
- or_prop3_ : ∀p,q. (or_f_ p >< q) = (p >< or_f_minus_ q)
-}.
-
-definition ORelation_setoid : OAlgebra → OAlgebra → setoid2.
-intros (P Q);
-constructor 1;
-[ apply (ORelation P Q);
-| constructor 1;
- (* tenere solo una uguaglianza e usare la proposizione 9.9 per
- le altre (unicita' degli aggiunti e del simmetrico) *)
- [ apply (λp,q. And42
- (or_f_minus_star_ ?? p = or_f_minus_star_ ?? q)
- (or_f_minus_ ?? p = or_f_minus_ ?? q)
- (or_f_ ?? p = or_f_ ?? q)
- (or_f_star_ ?? p = or_f_star_ ?? q));
- | whd; simplify; intros; repeat split; intros; apply refl2;
- | whd; simplify; intros; cases a; clear a; split;
- intro a; apply sym1; generalize in match a;assumption;
- | whd; simplify; intros; cases a; cases a1; clear a a1; split; intro a;
- [ apply (.= (e a)); apply e4;
- | apply (.= (e1 a)); apply e5;
- | apply (.= (e2 a)); apply e6;
- | apply (.= (e3 a)); apply e7;]]]
-qed.
-
-definition ORelation_of_ORelation_setoid :
- ∀P,Q.ORelation_setoid P Q → ORelation P Q ≝ λP,Q,x.x.
-coercion ORelation_of_ORelation_setoid.
-
-definition or_f_minus_star: ∀P,Q:OAlgebra.(ORelation_setoid P Q) ⇒_2 (P ⇒_2 Q).
- intros; constructor 1;
- [ apply or_f_minus_star_;
- | intros; cases e; assumption]
-qed.
-
-definition or_f: ∀P,Q:OAlgebra.(ORelation_setoid P Q) ⇒_2 (P ⇒_2 Q).
- intros; constructor 1;
- [ apply or_f_;
- | intros; cases e; assumption]
-qed.
-
-definition or_f_minus: ∀P,Q:OAlgebra.(ORelation_setoid P Q) ⇒_2 (Q ⇒_2 P).
- intros; constructor 1;
- [ apply or_f_minus_;
- | intros; cases e; assumption]
-qed.
-
-definition or_f_star: ∀P,Q:OAlgebra.(ORelation_setoid P Q) ⇒_2 (Q ⇒_2 P).
- intros; constructor 1;
- [ apply or_f_star_;
- | intros; cases e; assumption]
-qed.
-
-lemma arrows1_of_ORelation_setoid : ∀P,Q. ORelation_setoid P Q → (P ⇒_2 Q).
-intros; apply (or_f ?? c);
-qed.
-coercion arrows1_of_ORelation_setoid.
-
-interpretation "o-relation f⎻*" 'OR_f_minus_star r = (fun12 ?? (or_f_minus_star ? ?) r).
-interpretation "o-relation f⎻" 'OR_f_minus r = (fun12 ?? (or_f_minus ? ?) r).
-interpretation "o-relation f*" 'OR_f_star r = (fun12 ?? (or_f_star ? ?) r).
-
-definition or_prop1 : ∀P,Q:OAlgebra.∀F:ORelation_setoid P Q.∀p,q.
- (F p ≤ q) =_1 (p ≤ F* q).
-intros; apply (or_prop1_ ?? F p q);
-qed.
-
-definition or_prop2 : ∀P,Q:OAlgebra.∀F:ORelation_setoid P Q.∀p,q.
- (F⎻ p ≤ q) = (p ≤ F⎻* q).
-intros; apply (or_prop2_ ?? F p q);
-qed.
-
-definition or_prop3 : ∀P,Q:OAlgebra.∀F:ORelation_setoid P Q.∀p,q.
- (F p >< q) = (p >< F⎻ q).
-intros; apply (or_prop3_ ?? F p q);
-qed.
-
-definition ORelation_composition : ∀P,Q,R.
- (ORelation_setoid P Q) × (ORelation_setoid Q R) ⇒_2 (ORelation_setoid P R).
-intros;
-constructor 1;
-[ intros (F G);
- constructor 1;
- [ apply (G ∘ F);
- | apply rule (G⎻* ∘ F⎻* );
- | apply (F* ∘ G* );
- | apply (F⎻ ∘ G⎻);
- | intros;
- change with ((G (F p) ≤ q) = (p ≤ (F* (G* q))));
- apply (.= (or_prop1 :?));
- apply (or_prop1 :?);
- | intros;
- change with ((F⎻ (G⎻ p) ≤ q) = (p ≤ (G⎻* (F⎻* q))));
- apply (.= (or_prop2 :?));
- apply or_prop2 ;
- | intros; change with ((G (F (p)) >< q) = (p >< (F⎻ (G⎻ q))));
- apply (.= (or_prop3 :?));
- apply or_prop3;
- ]
-| intros; split; simplify;
- [3: unfold arrows1_of_ORelation_setoid; apply ((†e)‡(†e1));
- |1: apply ((†e)‡(†e1));
- |2,4: apply ((†e1)‡(†e));]]
-qed.
-
-definition OA : category2.
-split;
-[ apply (OAlgebra);
-| intros; apply (ORelation_setoid o o1);
-| intro O; split;
- [1,2,3,4: apply id2;
- |5,6,7:intros; apply refl1;]
-| apply ORelation_composition;
-| intros (P Q R S F G H); split;
- [ change with (H⎻* ∘ G⎻* ∘ F⎻* = H⎻* ∘ (G⎻* ∘ F⎻* ));
- apply (comp_assoc2 ????? (F⎻* ) (G⎻* ) (H⎻* ));
- | apply ((comp_assoc2 ????? (H⎻) (G⎻) (F⎻))^-1);
- | apply ((comp_assoc2 ????? F G H)^-1);
- | apply ((comp_assoc2 ????? H* G* F* ));]
-| intros; split; unfold ORelation_composition; simplify; apply id_neutral_left2;
-| intros; split; unfold ORelation_composition; simplify; apply id_neutral_right2;]
-qed.
-
-definition OAlgebra_of_objs2_OA: objs2 OA → OAlgebra ≝ λx.x.
-coercion OAlgebra_of_objs2_OA.
-
-definition ORelation_setoid_of_arrows2_OA:
- ∀P,Q. arrows2 OA P Q → ORelation_setoid P Q ≝ λP,Q,c.c.
-coercion ORelation_setoid_of_arrows2_OA.
-
-prefer coercion Type_OF_objs2.
-
-notation > "B ⇒_\o2 C" right associative with precedence 72 for @{'arrows2_OA $B $C}.
-notation "B ⇒\sub (\o 2) C" right associative with precedence 72 for @{'arrows2_OA $B $C}.
-interpretation "'arrows2_OA" 'arrows2_OA A B = (arrows2 OA A B).
-
-(* qui la notazione non va *)
-lemma leq_to_eq_join: ∀S:OA.∀p,q:S. p ≤ q → q = (binary_join ? p q).
- intros;
- apply oa_leq_antisym;
- [ apply oa_density; intros;
- apply oa_overlap_sym;
- unfold binary_join; simplify;
- apply (. (oa_join_split : ?));
- exists; [ apply false ]
- apply oa_overlap_sym;
- assumption
- | unfold binary_join; simplify;
- apply (. (oa_join_sup : ?)); intro;
- cases i; whd in ⊢ (? ? ? ? ? % ?);
- [ assumption | apply oa_leq_refl ]]
-qed.
-
-lemma overlap_monotone_left: ∀S:OA.∀p,q,r:S. p ≤ q → p >< r → q >< r.
- intros;
- apply (. (leq_to_eq_join : ?)‡#);
- [ apply f;
- | skip
- | apply oa_overlap_sym;
- unfold binary_join; simplify;
- apply (. (oa_join_split : ?));
- exists [ apply true ]
- apply oa_overlap_sym;
- assumption; ]
-qed.
-
-(* Part of proposition 9.9 *)
-lemma f_minus_image_monotone: ∀S,T.∀R:arrows2 OA S T.∀p,q. p ≤ q → R⎻ p ≤ R⎻ q.
- intros;
- apply (. (or_prop2 : ?));
- apply oa_leq_trans; [2: apply f; | skip | apply (. (or_prop2 : ?)^ -1); apply oa_leq_refl;]
-qed.
-
-(* Part of proposition 9.9 *)
-lemma f_minus_star_image_monotone: ∀S,T.∀R:arrows2 OA S T.∀p,q. p ≤ q → R⎻* p ≤ R⎻* q.
- intros;
- apply (. (or_prop2 : ?)^ -1);
- apply oa_leq_trans; [3: apply f; | skip | apply (. (or_prop2 : ?)); apply oa_leq_refl;]
-qed.
-
-(* Part of proposition 9.9 *)
-lemma f_image_monotone: ∀S,T.∀R:arrows2 OA S T.∀p,q. p ≤ q → R p ≤ R q.
- intros;
- apply (. (or_prop1 : ?));
- apply oa_leq_trans; [2: apply f; | skip | apply (. (or_prop1 : ?)^ -1); apply oa_leq_refl;]
-qed.
-
-(* Part of proposition 9.9 *)
-lemma f_star_image_monotone: ∀S,T.∀R:arrows2 OA S T.∀p,q. p ≤ q → R* p ≤ R* q.
- intros;
- apply (. (or_prop1 : ?)^ -1);
- apply oa_leq_trans; [3: apply f; | skip | apply (. (or_prop1 : ?)); apply oa_leq_refl;]
-qed.
-
-lemma lemma_10_2_a: ∀S,T.∀R:arrows2 OA S T.∀p. p ≤ R⎻* (R⎻ p).
- intros;
- apply (. (or_prop2 : ?)^-1);
- apply oa_leq_refl.
-qed.
-
-lemma lemma_10_2_b: ∀S,T.∀R:arrows2 OA S T.∀p. R⎻ (R⎻* p) ≤ p.
- intros;
- apply (. (or_prop2 : ?));
- apply oa_leq_refl.
-qed.
-
-lemma lemma_10_2_c: ∀S,T.∀R:arrows2 OA S T.∀p. p ≤ R* (R p).
- intros;
- apply (. (or_prop1 : ?)^-1);
- apply oa_leq_refl.
-qed.
-
-lemma lemma_10_2_d: ∀S,T.∀R:arrows2 OA S T.∀p. R (R* p) ≤ p.
- intros;
- apply (. (or_prop1 : ?));
- apply oa_leq_refl.
-qed.
-
-lemma lemma_10_3_a: ∀S,T.∀R:arrows2 OA S T.∀p. R⎻ (R⎻* (R⎻ p)) = R⎻ p.
- intros; apply oa_leq_antisym;
- [ apply lemma_10_2_b;
- | apply f_minus_image_monotone;
- apply lemma_10_2_a; ]
-qed.
-
-lemma lemma_10_3_b: ∀S,T.∀R:arrows2 OA S T.∀p. R* (R (R* p)) = R* p.
- intros; apply oa_leq_antisym;
- [ apply f_star_image_monotone;
- apply (lemma_10_2_d ?? R p);
- | apply lemma_10_2_c; ]
-qed.
-
-lemma lemma_10_3_c: ∀S,T.∀R:arrows2 OA S T.∀p. R (R* (R p)) = R p.
- intros; apply oa_leq_antisym;
- [ apply lemma_10_2_d;
- | apply f_image_monotone;
- apply (lemma_10_2_c ?? R p); ]
-qed.
-
-lemma lemma_10_3_d: ∀S,T.∀R:arrows2 OA S T.∀p. R⎻* (R⎻ (R⎻* p)) = R⎻* p.
- intros; apply oa_leq_antisym;
- [ apply f_minus_star_image_monotone;
- apply (lemma_10_2_b ?? R p);
- | apply lemma_10_2_a; ]
-qed.
-
-lemma lemma_10_4_a: ∀S,T.∀R:arrows2 OA S T.∀p. R⎻* (R⎻ (R⎻* (R⎻ p))) = R⎻* (R⎻ p).
- intros; apply (†(lemma_10_3_a ?? R p));
-qed.
-
-lemma lemma_10_4_b: ∀S,T.∀R:arrows2 OA S T.∀p. R (R* (R (R* p))) = R (R* p).
-intros; unfold in ⊢ (? ? ? % %); apply (†(lemma_10_3_b ?? R p));
-qed.
-
-lemma oa_overlap_sym': ∀o:OA.∀U,V:o. (U >< V) = (V >< U).
- intros; split; intro; apply oa_overlap_sym; assumption.
-qed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/o-algebra.ma".
-include "formal_topology/notation.ma".
-
-record Obasic_pair: Type2 ≝ {
- Oconcr: OA; Oform: OA; Orel: arrows2 ? Oconcr Oform
-}.
-
-(* FIX *)
-interpretation "o-basic pair relation indexed" 'Vdash2 x y c = (Orel c x y).
-interpretation "o-basic pair relation (non applied)" 'Vdash c = (Orel c).
-
-record Orelation_pair (BP1,BP2: Obasic_pair): Type2 ≝ {
- Oconcr_rel: (Oconcr BP1) ⇒_\o2 (Oconcr BP2); Oform_rel: (Oform BP1) ⇒_\o2 (Oform BP2);
- Ocommute: ⊩ ∘ Oconcr_rel =_2 Oform_rel ∘ ⊩
-}.
-
-(* FIX *)
-interpretation "o-concrete relation" 'concr_rel r = (Oconcr_rel ?? r).
-interpretation "o-formal relation" 'form_rel r = (Oform_rel ?? r).
-
-definition Orelation_pair_equality:
- ∀o1,o2. equivalence_relation2 (Orelation_pair o1 o2).
- intros;
- constructor 1;
- [ apply (λr,r'. ⊩ ∘ r \sub\c = ⊩ ∘ r' \sub\c);
- | simplify;
- intros;
- apply refl2;
- | simplify;
- intros 2;
- apply sym2;
- | simplify;
- intros 3;
- apply trans2;
- ]
-qed.
-
-(* qui setoid1 e' giusto: ma non lo e'!!! *)
-definition Orelation_pair_setoid: Obasic_pair → Obasic_pair → setoid2.
- intros;
- constructor 1;
- [ apply (Orelation_pair o o1)
- | apply Orelation_pair_equality
- ]
-qed.
-
-definition Orelation_pair_of_Orelation_pair_setoid:
- ∀P,Q. Orelation_pair_setoid P Q → Orelation_pair P Q ≝ λP,Q,x.x.
-coercion Orelation_pair_of_Orelation_pair_setoid.
-
-lemma eq_to_eq': ∀o1,o2.∀r,r': Orelation_pair_setoid o1 o2. r =_2 r' → r \sub\f ∘ ⊩ =_2 r'\sub\f ∘ ⊩.
- intros 5 (o1 o2 r r' H); change in H with (⊩ ∘ r\sub\c = ⊩ ∘ r'\sub\c);
- apply (.= ((Ocommute ?? r) ^ -1));
- apply (.= H);
- apply (.= (Ocommute ?? r'));
- apply refl2;
-qed.
-
-
-definition Oid_relation_pair: ∀o:Obasic_pair. Orelation_pair o o.
- intro;
- constructor 1;
- [1,2: apply id2;
- | lapply (id_neutral_right2 ? (Oconcr o) ? (⊩)) as H;
- lapply (id_neutral_left2 ?? (Oform o) (⊩)) as H1;
- apply (.= H);
- apply (H1^-1);]
-qed.
-
-lemma Orelation_pair_composition:
- ∀o1,o2,o3:Obasic_pair.
- Orelation_pair_setoid o1 o2 → Orelation_pair_setoid o2 o3→Orelation_pair_setoid o1 o3.
-intros 3 (o1 o2 o3);
- intros (r r1);
- constructor 1;
- [ apply (r1 \sub\c ∘ r \sub\c)
- | apply (r1 \sub\f ∘ r \sub\f)
- | lapply (Ocommute ?? r) as H;
- lapply (Ocommute ?? r1) as H1;
- apply rule (.= ASSOC);
- apply (.= #‡H1);
- apply rule (.= ASSOC ^ -1);
- apply (.= H‡#);
- apply rule ASSOC]
-qed.
-
-
-lemma Orelation_pair_composition_is_morphism:
- ∀o1,o2,o3:Obasic_pair.
- Πa,a':Orelation_pair_setoid o1 o2.Πb,b':Orelation_pair_setoid o2 o3.
- a=a' →b=b' →
- Orelation_pair_composition o1 o2 o3 a b
- = Orelation_pair_composition o1 o2 o3 a' b'.
-intros;
- change with (⊩ ∘ (b\sub\c ∘ a\sub\c) = ⊩ ∘ (b'\sub\c ∘ a'\sub\c));
- change in e with (⊩ ∘ a \sub\c = ⊩ ∘ a' \sub\c);
- change in e1 with (⊩ ∘ b \sub\c = ⊩ ∘ b' \sub\c);
- apply rule (.= ASSOC);
- apply (.= #‡e1);
- apply (.= #‡(Ocommute ?? b'));
- apply rule (.= ASSOC^-1);
- apply (.= e‡#);
- apply rule (.= ASSOC);
- apply (.= #‡(Ocommute ?? b')^-1);
- apply rule (ASSOC^-1);
-qed.
-
-definition Orelation_pair_composition_morphism:
- ∀o1,o2,o3. binary_morphism2 (Orelation_pair_setoid o1 o2) (Orelation_pair_setoid o2 o3) (Orelation_pair_setoid o1 o3).
-intros; constructor 1;
-[ apply Orelation_pair_composition;
-| apply Orelation_pair_composition_is_morphism;]
-qed.
-
-lemma Orelation_pair_composition_morphism_assoc:
-∀o1,o2,o3,o4:Obasic_pair
- .Πa12:Orelation_pair_setoid o1 o2
- .Πa23:Orelation_pair_setoid o2 o3
- .Πa34:Orelation_pair_setoid o3 o4
- .Orelation_pair_composition_morphism o1 o3 o4
- (Orelation_pair_composition_morphism o1 o2 o3 a12 a23) a34
- =Orelation_pair_composition_morphism o1 o2 o4 a12
- (Orelation_pair_composition_morphism o2 o3 o4 a23 a34).
- intros;
- change with (⊩ ∘ (a34\sub\c ∘ (a23\sub\c ∘ a12\sub\c)) =
- ⊩ ∘ ((a34\sub\c ∘ a23\sub\c) ∘ a12\sub\c));
- apply rule (ASSOC‡#);
-qed.
-
-lemma Orelation_pair_composition_morphism_respects_id:
-Πo1:Obasic_pair
-.Πo2:Obasic_pair
- .Πa:Orelation_pair_setoid o1 o2
- .Orelation_pair_composition_morphism o1 o1 o2 (Oid_relation_pair o1) a=a.
- intros;
- change with (⊩ ∘ (a\sub\c ∘ (Oid_relation_pair o1)\sub\c) = ⊩ ∘ a\sub\c);
- apply ((id_neutral_right2 ????)‡#);
-qed.
-
-lemma Orelation_pair_composition_morphism_respects_id_r:
-Πo1:Obasic_pair
-.Πo2:Obasic_pair
- .Πa:Orelation_pair_setoid o1 o2
- .Orelation_pair_composition_morphism o1 o2 o2 a (Oid_relation_pair o2)=a.
-intros;
- change with (⊩ ∘ ((Oid_relation_pair o2)\sub\c ∘ a\sub\c) = ⊩ ∘ a\sub\c);
- apply ((id_neutral_left2 ????)‡#);
-qed.
-
-definition OBP: category2.
- constructor 1;
- [ apply Obasic_pair
- | apply Orelation_pair_setoid
- | apply Oid_relation_pair
- | apply Orelation_pair_composition_morphism
- | apply Orelation_pair_composition_morphism_assoc;
- | apply Orelation_pair_composition_morphism_respects_id;
- | apply Orelation_pair_composition_morphism_respects_id_r;]
-qed.
-
-definition Obasic_pair_of_objs2_OBP: objs2 OBP → Obasic_pair ≝ λx.x.
-coercion Obasic_pair_of_objs2_OBP.
-
-definition Orelation_pair_setoid_of_arrows2_OBP:
- ∀P,Q.arrows2 OBP P Q → Orelation_pair_setoid P Q ≝ λP,Q,c.c.
-coercion Orelation_pair_setoid_of_arrows2_OBP.
-
-notation > "B ⇒_\obp2 C" right associative with precedence 72 for @{'arrows2_OBP $B $C}.
-notation "B ⇒\sub (\obp 2) C" right associative with precedence 72 for @{'arrows2_OBP $B $C}.
-interpretation "'arrows2_OBP" 'arrows2_OBP A B = (arrows2 OBP A B).
-
-(*
-definition BPext: ∀o: BP. form o ⇒ Ω \sup (concr o).
- intros; constructor 1;
- [ apply (ext ? ? (rel o));
- | intros;
- apply (.= #‡H);
- apply refl1]
-qed.
-
-definition BPextS: ∀o: BP. Ω \sup (form o) ⇒ Ω \sup (concr o) ≝
- λo.extS ?? (rel o).
-*)
-
-(*
-definition fintersects: ∀o: BP. binary_morphism1 (form o) (form o) (Ω \sup (form o)).
- intros (o); constructor 1;
- [ apply (λa,b: form o.{c | BPext o c ⊆ BPext o a ∩ BPext o b });
- intros; simplify; apply (.= (†H)‡#); apply refl1
- | intros; split; simplify; intros;
- [ apply (. #‡((†H)‡(†H1))); assumption
- | apply (. #‡((†H\sup -1)‡(†H1\sup -1))); assumption]]
-qed.
-
-interpretation "fintersects" 'fintersects U V = (fun1 ??? (fintersects ?) U V).
-
-definition fintersectsS:
- ∀o:BP. binary_morphism1 (Ω \sup (form o)) (Ω \sup (form o)) (Ω \sup (form o)).
- intros (o); constructor 1;
- [ apply (λo: basic_pair.λa,b: Ω \sup (form o).{c | BPext o c ⊆ BPextS o a ∩ BPextS o b });
- intros; simplify; apply (.= (†H)‡#); apply refl1
- | intros; split; simplify; intros;
- [ apply (. #‡((†H)‡(†H1))); assumption
- | apply (. #‡((†H\sup -1)‡(†H1\sup -1))); assumption]]
-qed.
-
-interpretation "fintersectsS" 'fintersects U V = (fun1 ??? (fintersectsS ?) U V).
-*)
-
-(*
-definition relS: ∀o: BP. binary_morphism1 (concr o) (Ω \sup (form o)) CPROP.
- intros (o); constructor 1;
- [ apply (λx:concr o.λS: Ω \sup (form o).∃y: form o.y ∈ S ∧ x ⊩ y);
- | intros; split; intros; cases H2; exists [1,3: apply w]
- [ apply (. (#‡H1)‡(H‡#)); assumption
- | apply (. (#‡H1 \sup -1)‡(H \sup -1‡#)); assumption]]
-qed.
-
-interpretation "basic pair relation for subsets" 'Vdash2 x y = (fun1 (concr ?) ?? (relS ?) x y).
-interpretation "basic pair relation for subsets (non applied)" 'Vdash = (fun1 ??? (relS ?)).
-*)
-
-notation "□ \sub b" non associative with precedence 90 for @{'box $b}.
-notation > "□⎽term 90 b" non associative with precedence 90 for @{'box $b}.
-interpretation "Universal image ⊩⎻*" 'box x = (fun12 ? ? (or_f_minus_star ? ?) (Orel x)).
-
-notation "◊ \sub b" non associative with precedence 90 for @{'diamond $b}.
-notation > "◊⎽term 90 b" non associative with precedence 90 for @{'diamond $b}.
-interpretation "Existential image ⊩" 'diamond x = (fun12 ? ? (or_f ? ?) (Orel x)).
-
-notation "'Rest' \sub b" non associative with precedence 90 for @{'rest $b}.
-notation > "'Rest'⎽term 90 b" non associative with precedence 90 for @{'rest $b}.
-interpretation "Universal pre-image ⊩*" 'rest x = (fun12 ? ? (or_f_star ? ?) (Orel x)).
-
-notation "'Ext' \sub b" non associative with precedence 90 for @{'ext $b}.
-notation > "'Ext'⎽term 90 b" non associative with precedence 90 for @{'ext $b}.
-interpretation "Existential pre-image ⊩⎻" 'ext x = (fun12 ? ? (or_f_minus ? ?) (Orel x)).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/notation.ma".
-include "formal_topology/o-basic_pairs.ma".
-include "formal_topology/o-basic_topologies.ma".
-
-alias symbol "eq" = "setoid1 eq".
-
-(* Qui, per fare le cose per bene, ci serve la nozione di funtore categorico *)
-definition o_basic_topology_of_o_basic_pair: OBP → OBTop.
- intro t;
- constructor 1;
- [ apply (Oform t);
- | apply (□⎽t ∘ Ext⎽t);
- | apply (◊⎽t ∘ Rest⎽t);
- | apply hide; intros 2; split; intro;
- [ change with ((⊩) \sup ⎻* ((⊩) \sup ⎻ U) ≤ (⊩) \sup ⎻* ((⊩) \sup ⎻ V));
- apply (. (#‡(lemma_10_4_a ?? (⊩) V)^-1));
- apply f_minus_star_image_monotone;
- apply f_minus_image_monotone;
- assumption
- | apply oa_leq_trans;
- [3: apply f;
- | skip
- | change with (U ≤ (⊩)⎻* ((⊩)⎻ U));
- apply (. (or_prop2 : ?) ^ -1);
- apply oa_leq_refl; ]]
- | apply hide; intros 2; split; intro;
- [ change with (◊⎽t ((⊩) \sup * U) ≤ ◊⎽t ((⊩) \sup * V));
- apply (. ((lemma_10_4_b ?? (⊩) U)^-1)‡#);
- apply (f_image_monotone ?? (⊩) ? ((⊩)* V));
- apply f_star_image_monotone;
- assumption;
- | apply oa_leq_trans;
- [2: apply f;
- | skip
- | change with ((⊩) ((⊩)* V) ≤ V);
- apply (. (or_prop1 : ?));
- apply oa_leq_refl; ]]
- | apply hide; intros;
- apply (.= (oa_overlap_sym' : ?));
- change with ((◊⎽t ((⊩)* V) >< (⊩)⎻* ((⊩)⎻ U)) = (U >< (◊⎽t ((⊩)* V))));
- apply (.= (or_prop3 ?? (⊩) ((⊩)* V) ?));
- apply (.= #‡(lemma_10_3_a : ?));
- apply (.= (or_prop3 : ?)^-1);
- apply (oa_overlap_sym' ? ((⊩) ((⊩)* V)) U); ]
-qed.
-
-definition o_continuous_relation_of_o_relation_pair:
- ∀BP1,BP2.BP1 ⇒_\obp2 BP2 →
- (o_basic_topology_of_o_basic_pair BP1) ⇒_\obt2 (o_basic_topology_of_o_basic_pair BP2).
- intros (BP1 BP2 t);
- constructor 1;
- [ apply (t \sub \f);
- | apply hide; unfold o_basic_topology_of_o_basic_pair; simplify; intros (U e);
- apply sym1;
- apply (.= †(†e));
- change in ⊢ (? ? ? (? ? ? ? %) ?) with ((t \sub \f ∘ (⊩)) ((⊩\sub BP1)* U));
- cut ((t \sub \f ∘ (⊩)) ((⊩\sub BP1)* U) = ((⊩) ∘ t \sub \c) ((⊩\sub BP1)* U)) as COM;[2:
- cases (Ocommute ?? t); apply (e3 ^ -1 ((⊩\sub BP1)* U));]
- apply (.= †COM);
- change in ⊢ (? ? ? % ?) with (((⊩) ∘ (⊩)* ) (((⊩) ∘ t \sub \c ∘ (⊩)* ) U));
- apply (.= (lemma_10_3_c ?? (⊩) (t \sub \c ((⊩\sub BP1)* U))));
- apply (.= COM ^ -1);
- change in ⊢ (? ? ? % ?) with (t \sub \f (((⊩) ∘ (⊩\sub BP1)* ) U));
- change in e with (U=((⊩)∘(⊩ \sub BP1) \sup * ) U);
- apply (†e^-1);
- | apply hide; unfold o_basic_topology_of_o_basic_pair; simplify; intros;
- apply sym1;
- apply (.= †(†e));
- change in ⊢ (? ? ? (? ? ? ? %) ?) with ((t \sub \f⎻* ∘ (⊩)⎻* ) ((⊩\sub BP1)⎻ U));
- cut ((t \sub \f⎻* ∘ (⊩)⎻* ) ((⊩\sub BP1)⎻ U) = ((⊩)⎻* ∘ t \sub \c⎻* ) ((⊩\sub BP1)⎻ U)) as COM;[2:
- cases (Ocommute ?? t); apply (e1 ^ -1 ((⊩\sub BP1)⎻ U));]
- apply (.= †COM);
- change in ⊢ (? ? ? % ?) with (((⊩)⎻* ∘ (⊩)⎻ ) (((⊩)⎻* ∘ t \sub \c⎻* ∘ (⊩)⎻ ) U));
- apply (.= (lemma_10_3_d ?? (⊩) (t \sub \c⎻* ((⊩\sub BP1)⎻ U))));
- apply (.= COM ^ -1);
- change in ⊢ (? ? ? % ?) with (t \sub \f⎻* (((⊩)⎻* ∘ (⊩\sub BP1)⎻ ) U));
- change in e with (U=((⊩)⎻* ∘(⊩ \sub BP1)⎻ ) U);
- apply (†e^-1);]
-qed.
-
-
-definition OR : carr3 (OBP ⇒_\c3 OBTop).
-constructor 1;
-[ apply o_basic_topology_of_o_basic_pair;
-| intros; constructor 1;
- [ apply o_continuous_relation_of_o_relation_pair;
- | apply hide;
- intros; whd; unfold o_continuous_relation_of_o_relation_pair; simplify;;
- change with ((a \sub \f ⎻* ∘ oA (o_basic_topology_of_o_basic_pair S)) =
- (a' \sub \f ⎻*∘ oA (o_basic_topology_of_o_basic_pair S)));
- whd in e; cases e; clear e e2 e3 e4;
- change in ⊢ (? ? ? (? ? ? ? ? % ?) ?) with ((⊩\sub S)⎻* ∘ (⊩\sub S)⎻);
- apply (.= (comp_assoc2 ? ???? ?? a\sub\f⎻* ));
- change in ⊢ (? ? ? (? ? ? ? ? ? %) ?) with (a\sub\f ∘ ⊩\sub S)⎻*;
- apply (.= #‡†(Ocommute:?)^-1);
- apply (.= #‡e1);
- change in ⊢ (? ? ? (? ? ? ? ? ? %) ?) with (⊩\sub T ∘ a'\sub\c)⎻*;
- apply (.= #‡†(Ocommute:?));
- change in ⊢ (? ? ? (? ? ? ? ? ? %) ?) with (a'\sub\f⎻* ∘ (⊩\sub S)⎻* );
- apply (.= (comp_assoc2 ? ???? ?? a'\sub\f⎻* )^-1);
- apply refl2;]
-| intros 2 (o a); apply refl1;
-| intros 6; apply refl1;]
-qed.
-
+++ /dev/null
- (**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/o-algebra.ma".
-include "formal_topology/o-saturations.ma".
-
-record Obasic_topology: Type2 ≝ {
- Ocarrbt:> OA;
- oA: Ocarrbt ⇒_2 Ocarrbt; oJ: Ocarrbt ⇒_2 Ocarrbt;
- oA_is_saturation: is_o_saturation ? oA; oJ_is_reduction: is_o_reduction ? oJ;
- Ocompatibility: ∀U,V. (oA U >< oJ V) =_1 (U >< oJ V)
- }.
-
-record Ocontinuous_relation (S,T: Obasic_topology) : Type2 ≝ {
- Ocont_rel:> arrows2 OA S T;
- Oreduced: ∀U:S. U = oJ ? U → Ocont_rel U =_1 oJ ? (Ocont_rel U);
- Osaturated: ∀U:S. U = oA ? U → Ocont_rel⎻* U =_1 oA ? (Ocont_rel⎻* U)
- }.
-
-definition Ocontinuous_relation_setoid: Obasic_topology → Obasic_topology → setoid2.
- intros (S T); constructor 1;
- [ apply (Ocontinuous_relation S T)
- | constructor 1;
- [ alias symbol "eq" = "setoid2 eq".
- alias symbol "compose" = "category2 composition".
- apply (λr,s:Ocontinuous_relation S T. (r⎻* ) ∘ (oA S) = (s⎻* ∘ (oA ?)));
- | simplify; intros; apply refl2;
- | simplify; intros; apply sym2; apply e
- | simplify; intros; apply trans2; [2: apply e |3: apply e1; |1: skip]]]
-qed.
-
-definition Ocontinuous_relation_of_Ocontinuous_relation_setoid:
- ∀P,Q. Ocontinuous_relation_setoid P Q → Ocontinuous_relation P Q ≝ λP,Q,c.c.
-coercion Ocontinuous_relation_of_Ocontinuous_relation_setoid.
-
-(*
-theorem continuous_relation_eq':
- ∀o1,o2.∀a,a': continuous_relation_setoid o1 o2.
- a = a' → ∀X.a⎻* (A o1 X) = a'⎻* (A o1 X).
- intros; apply oa_leq_antisym; intro; unfold minus_star_image; simplify; intros;
- [ cut (ext ?? a a1 ⊆ A ? X); [2: intros 2; apply (H1 a2); cases f1; assumption;]
- lapply (if ?? (A_is_saturation ???) Hcut); clear Hcut;
- cut (A ? (ext ?? a' a1) ⊆ A ? X); [2: apply (. (H ?)‡#); assumption]
- lapply (fi ?? (A_is_saturation ???) Hcut);
- apply (Hletin1 x); change with (x ∈ ext ?? a' a1); split; simplify;
- [ apply I | assumption ]
- | cut (ext ?? a' a1 ⊆ A ? X); [2: intros 2; apply (H1 a2); cases f1; assumption;]
- lapply (if ?? (A_is_saturation ???) Hcut); clear Hcut;
- cut (A ? (ext ?? a a1) ⊆ A ? X); [2: apply (. (H ?)\sup -1‡#); assumption]
- lapply (fi ?? (A_is_saturation ???) Hcut);
- apply (Hletin1 x); change with (x ∈ ext ?? a a1); split; simplify;
- [ apply I | assumption ]]
-qed.
-
-theorem continuous_relation_eq_inv':
- ∀o1,o2.∀a,a': continuous_relation_setoid o1 o2.
- (∀X.a⎻* (A o1 X) = a'⎻* (A o1 X)) → a=a'.
- intros 6;
- cut (∀a,a': continuous_relation_setoid o1 o2.
- (∀X.a⎻* (A o1 X) = a'⎻* (A o1 X)) →
- ∀V:(oa_P (carrbt o2)). A o1 (a'⎻ V) ≤ A o1 (a⎻ V));
- [2: clear b H a' a; intros;
- lapply depth=0 (λV.saturation_expansive ??? (extS ?? a V)); [2: apply A_is_saturation;|skip]
- (* fundamental adjunction here! to be taken out *)
- cut (∀V:Ω \sup o2.V ⊆ minus_star_image ?? a (A ? (extS ?? a V)));
- [2: intro; intros 2; unfold minus_star_image; simplify; intros;
- apply (Hletin V1 x); whd; split; [ exact I | exists; [apply a1] split; assumption]]
- clear Hletin;
- cut (∀V:Ω \sup o2.V ⊆ minus_star_image ?? a' (A ? (extS ?? a V)));
- [2: intro; apply (. #‡(H ?)); apply Hcut] clear H Hcut;
- (* second half of the fundamental adjunction here! to be taken out too *)
- intro; lapply (Hcut1 (singleton ? V)); clear Hcut1;
- unfold minus_star_image in Hletin; unfold singleton in Hletin; simplify in Hletin;
- whd in Hletin; whd in Hletin:(?→?→%); simplify in Hletin;
- apply (if ?? (A_is_saturation ???));
- intros 2 (x H); lapply (Hletin V ? x ?);
- [ apply refl | cases H; assumption; ]
- change with (x ∈ A ? (ext ?? a V));
- apply (. #‡(†(extS_singleton ????)));
- assumption;]
- split; apply Hcut; [2: assumption | intro; apply sym1; apply H]
-qed.
-*)
-
-definition Ocontinuous_relation_comp:
- ∀o1,o2,o3.
- Ocontinuous_relation_setoid o1 o2 →
- Ocontinuous_relation_setoid o2 o3 →
- Ocontinuous_relation_setoid o1 o3.
- intros (o1 o2 o3 r s); constructor 1;
- [ apply (s ∘ r);
- | intros;
- apply sym1;
- change in match ((s ∘ r) U) with (s (r U));
- apply (.= (Oreduced : ?)^-1);
- [ apply (.= (Oreduced :?)); [ assumption | apply refl1 ]
- | apply refl1]
- | intros;
- apply sym1;
- change in match ((s ∘ r)⎻* U) with (s⎻* (r⎻* U));
- apply (.= (Osaturated : ?)^-1);
- [ apply (.= (Osaturated : ?)); [ assumption | apply refl1 ]
- | apply refl1]]
-qed.
-
-definition OBTop: category2.
- constructor 1;
- [ apply Obasic_topology
- | apply Ocontinuous_relation_setoid
- | intro; constructor 1;
- [ apply id2
- | intros; apply e;
- | intros; apply e;]
- | intros; constructor 1;
- [ apply Ocontinuous_relation_comp;
- | intros; simplify;
- change with ((b⎻* ∘ a⎻* ) ∘ oA o1 = ((b'⎻* ∘ a'⎻* ) ∘ oA o1));
- change with (b⎻* ∘ (a⎻* ∘ oA o1) = b'⎻* ∘ (a'⎻* ∘ oA o1));
- change in e with (a⎻* ∘ oA o1 = a'⎻* ∘ oA o1);
- change in e1 with (b⎻* ∘ oA o2 = b'⎻* ∘ oA o2);
- apply (.= e‡#);
- intro x;
- change with (b⎻* (a'⎻* (oA o1 x)) =_1 b'⎻*(a'⎻* (oA o1 x)));
- apply (.= †(Osaturated o1 o2 a' (oA o1 x) ?)); [
- apply ((o_saturation_idempotent ?? (oA_is_saturation o1) x)^-1);]
- apply (.= (e1 (a'⎻* (oA o1 x))));
- change with (b'⎻* (oA o2 (a'⎻* (oA o1 x))) =_1 b'⎻*(a'⎻* (oA o1 x)));
- apply (.= †(Osaturated o1 o2 a' (oA o1 x):?)^-1); [
- apply ((o_saturation_idempotent ?? (oA_is_saturation o1) x)^-1);]
- apply rule #;]
- | intros; simplify;
- change with (((a34⎻* ∘ a23⎻* ) ∘ a12⎻* ) ∘ oA o1 = ((a34⎻* ∘ (a23⎻* ∘ a12⎻* )) ∘ oA o1));
- apply rule (#‡ASSOC ^ -1);
- | intros; simplify;
- change with ((a⎻* ∘ (id2 ? o1)⎻* ) ∘ oA o1 = a⎻* ∘ oA o1);
- apply (#‡(id_neutral_right2 : ?));
- | intros; simplify;
- change with (((id2 ? o2)⎻* ∘ a⎻* ) ∘ oA o1 = a⎻* ∘ oA o1);
- apply (#‡(id_neutral_left2 : ?));]
-qed.
-
-definition Obasic_topology_of_OBTop: objs2 OBTop → Obasic_topology ≝ λx.x.
-coercion Obasic_topology_of_OBTop.
-
-definition Ocontinuous_relation_setoid_of_arrows2_OBTop :
- ∀P,Q. arrows2 OBTop P Q → Ocontinuous_relation_setoid P Q ≝ λP,Q,x.x.
-coercion Ocontinuous_relation_setoid_of_arrows2_OBTop.
-
-notation > "B ⇒_\obt2 C" right associative with precedence 72 for @{'arrows2_OBT $B $C}.
-notation "B ⇒\sub (\obt 2) C" right associative with precedence 72 for @{'arrows2_OBT $B $C}.
-interpretation "'arrows2_OBT" 'arrows2_OBT A B = (arrows2 OBTop A B).
-
-
-(*
-(*CSC: unused! *)
-(* this proof is more logic-oriented than set/lattice oriented *)
-theorem continuous_relation_eqS:
- ∀o1,o2:basic_topology.∀a,a': continuous_relation_setoid o1 o2.
- a = a' → ∀X. A ? (extS ?? a X) = A ? (extS ?? a' X).
- intros;
- cut (∀a: arrows1 ? o1 ?.∀x. x ∈ extS ?? a X → ∃y:o2.y ∈ X ∧ x ∈ ext ?? a y);
- [2: intros; cases f; clear f; cases H1; exists [apply w] cases x1; split;
- try assumption; split; assumption]
- cut (∀a,a':continuous_relation_setoid o1 o2.eq1 ? a a' → ∀x. x ∈ extS ?? a X → ∃y:o2. y ∈ X ∧ x ∈ A ? (ext ?? a' y));
- [2: intros; cases (Hcut ?? f); exists; [apply w] cases x1; split; try assumption;
- apply (. #‡(H1 ?));
- apply (saturation_expansive ?? (A_is_saturation o1) (ext ?? a1 w) x);
- assumption;] clear Hcut;
- split; apply (if ?? (A_is_saturation ???)); intros 2;
- [lapply (Hcut1 a a' H a1 f) | lapply (Hcut1 a' a (H \sup -1) a1 f)]
- cases Hletin; clear Hletin; cases x; clear x;
- cut (∀a: arrows1 ? o1 ?. ext ?? a w ⊆ extS ?? a X);
- [2,4: intros 3; cases f3; clear f3; simplify in f5; split; try assumption;
- exists [1,3: apply w] split; assumption;]
- cut (∀a. A ? (ext o1 o2 a w) ⊆ A ? (extS o1 o2 a X));
- [2,4: intros; apply saturation_monotone; try (apply A_is_saturation); apply Hcut;]
- apply Hcut2; assumption.
-qed.
-*)
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/o-basic_pairs.ma".
-include "formal_topology/o-saturations.ma".
-
-definition A : ∀b:OBP. unary_morphism1 (Oform b) (Oform b).
-intros; constructor 1;
- [ apply (λx.□⎽b (Ext⎽b x));
- | intros; apply (†(†e));]
-qed.
-
-lemma down_p : ∀S:SET1.∀I:SET.∀u:S ⇒_1 S.∀c:arrows2 SET1 I S.∀a:I.∀a':I.a =_1 a'→u (c a) =_1 u (c a').
-intros; apply (†(†e));
-qed.
-
-record Oconcrete_space : Type2 ≝
- { Obp:> OBP;
- (*distr : is_distributive (form bp);*)
- Odownarrow: unary_morphism1 (Oform Obp) (Oform Obp);
- Odownarrow_is_sat: is_o_saturation ? Odownarrow;
- Oconverges: ∀q1,q2.
- (Ext⎽Obp q1 ∧ (Ext⎽Obp q2)) = (Ext⎽Obp ((Odownarrow q1) ∧ (Odownarrow q2)));
- Oall_covered: Ext⎽Obp (oa_one (Oform Obp)) = oa_one (Oconcr Obp);
- Oil2: ∀I:SET.∀p:arrows2 SET1 I (Oform Obp).
- Odownarrow (∨ { x ∈ I | Odownarrow (p x) | down_p ???? }) =
- ∨ { x ∈ I | Odownarrow (p x) | down_p ???? };
- Oil1: ∀q.Odownarrow (A ? q) = A ? q
- }.
-
-interpretation "o-concrete space downarrow" 'downarrow x =
- (fun11 ?? (Odownarrow ?) x).
-
-definition Obinary_downarrow :
- ∀C:Oconcrete_space.binary_morphism1 (Oform C) (Oform C) (Oform C).
-intros; constructor 1;
-[ intros; apply (↓ c ∧ ↓ c1);
-| intros;
- alias symbol "prop2" = "prop21".
- alias symbol "prop1" = "prop11".
- apply ((†e)‡(†e1));]
-qed.
-
-interpretation "concrete_space binary ↓" 'fintersects a b = (fun21 ? ? ? (Obinary_downarrow ?) a b).
-
-record Oconvergent_relation_pair (CS1,CS2: Oconcrete_space) : Type2 ≝
- { Orp:> arrows2 ? CS1 CS2;
- Orespects_converges:
- ∀b,c. eq1 ? (Orp\sub\c⎻ (Ext⎽CS2 (b ↓ c))) (Ext⎽CS1 (Orp\sub\f⎻ b ↓ Orp\sub\f⎻ c));
- Orespects_all_covered:
- eq1 ? (Orp\sub\c⎻ (Ext⎽CS2 (oa_one (Oform CS2))))
- (Ext⎽CS1 (oa_one (Oform CS1)))
- }.
-
-definition Oconvergent_relation_space_setoid: Oconcrete_space → Oconcrete_space → setoid2.
- intros (c c1);
- constructor 1;
- [ apply (Oconvergent_relation_pair c c1)
- | constructor 1;
- [ intros (c2 c3);
- apply (Orelation_pair_equality c c1 c2 c3);
- | intros 1; apply refl2;
- | intros 2; apply sym2;
- | intros 3; apply trans2]]
-qed.
-
-definition Oconvergent_relation_space_of_Oconvergent_relation_space_setoid:
- ∀CS1,CS2.carr2 (Oconvergent_relation_space_setoid CS1 CS2) →
- Oconvergent_relation_pair CS1 CS2 ≝ λP,Q,c.c.
-coercion Oconvergent_relation_space_of_Oconvergent_relation_space_setoid.
-
-definition Oconvergent_relation_space_composition:
- ∀o1,o2,o3: Oconcrete_space.
- binary_morphism2
- (Oconvergent_relation_space_setoid o1 o2)
- (Oconvergent_relation_space_setoid o2 o3)
- (Oconvergent_relation_space_setoid o1 o3).
- intros; constructor 1;
- [ intros; whd in t t1 ⊢ %;
- constructor 1;
- [ apply (c1 ∘ c);
- | intros;
- change in ⊢ (? ? ? % ?) with (c\sub\c⎻ (c1\sub\c⎻ (Ext⎽o3 (b↓c2))));
- alias symbol "trans" = "trans1".
- apply (.= († (Orespects_converges : ?)));
- apply (Orespects_converges ?? c (c1\sub\f⎻ b) (c1\sub\f⎻ c2));
- | change in ⊢ (? ? ? % ?) with (c\sub\c⎻ (c1\sub\c⎻ (Ext⎽o3 (oa_one (Oform o3)))));
- apply (.= (†(Orespects_all_covered :?)));
- apply rule (Orespects_all_covered ?? c);]
- | intros;
- change with (b ∘ a = b' ∘ a');
- change in e with (Orp ?? a = Orp ?? a');
- change in e1 with (Orp ?? b = Orp ?? b');
- apply (e‡e1);]
-qed.
-
-definition OCSPA: category2.
- constructor 1;
- [ apply Oconcrete_space
- | apply Oconvergent_relation_space_setoid
- | intro; constructor 1;
- [ apply id2
- | intros; apply refl1;
- | apply refl1]
- | apply Oconvergent_relation_space_composition
- | intros; simplify; whd in a12 a23 a34;
- change with (a34 ∘ (a23 ∘ a12) = (a34 ∘ a23) ∘ a12);
- apply rule ASSOC;
- | intros; simplify;
- change with (a ∘ id2 OBP o1 = a);
- apply (id_neutral_right2 : ?);
- | intros; simplify;
- change with (id2 ? o2 ∘ a = a);
- apply (id_neutral_left2 : ?);]
-qed.
-
-definition Oconcrete_space_of_OCSPA : objs2 OCSPA → Oconcrete_space ≝ λx.x.
-coercion Oconcrete_space_of_OCSPA.
-
-definition Oconvergent_relation_space_setoid_of_arrows2_OCSPA :
- ∀P,Q. arrows2 OCSPA P Q → Oconvergent_relation_space_setoid P Q ≝ λP,Q,x.x.
-coercion Oconvergent_relation_space_setoid_of_arrows2_OCSPA.
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/o-basic_topologies.ma".
-
-(*
-(*
-definition downarrow: ∀S:BTop. unary_morphism (Ω \sup S) (Ω \sup S).
- intros; constructor 1;
- [ apply (λU:Ω \sup S.{a | ∃b:carrbt S. b ∈ U ∧ a ∈ A ? (singleton ? b)});
- intros; simplify; split; intro; cases H1; cases x; exists [1,3: apply w]
- split; try assumption; [ apply (. H‡#) | apply (. H \sup -1‡#) ] assumption
- | intros; split; intros 2; cases f; exists; [1,3: apply w] cases x; split;
- try assumption; [ apply (. #‡H) | apply (. #‡H \sup -1)] assumption]
-qed.
-
-interpretation "downarrow" 'downarrow a = (fun_1 ?? (downarrow ?) a).
-
-definition ffintersects: ∀S:BTop. binary_morphism1 (Ω \sup S) (Ω \sup S) (Ω \sup S).
- intros; constructor 1;
- [ apply (λU,V. ↓U ∩ ↓V);
- | intros; apply (.= (†H)‡(†H1)); apply refl1]
-qed.
-
-interpretation "ffintersects" 'fintersects U V = (fun1 ??? (ffintersects ?) U V).
-*)
-
-record formal_topology: Type ≝
- { bt:> OBTop;
- converges: ∀U,V: bt. oA bt (U ↓ V) = (oA ? U ∧ oA ? V)
- }.
-
-(*
-
-definition ffintersects': ∀S:BTop. binary_morphism1 S S (Ω \sup S).
- intros; constructor 1;
- [ apply (λb,c:S. (singleton S b) ↓ (singleton S c));
- | intros; apply (.= (†H)‡(†H1)); apply refl1]
-qed.
-
-interpretation "ffintersects'" 'fintersects U V = (fun1 ??? (ffintersects' ?) U V).
-*)
-record formal_map (S,T: formal_topology) : Type ≝
- { cr:> continuous_relation_setoid S T;
- C1: ∀b,c. extS ?? cr (b ↓ c) = ext ?? cr b ↓ ext ?? cr c;
- C2: extS ?? cr T = S
- }.
-
-definition formal_map_setoid: formal_topology → formal_topology → setoid1.
- intros (S T); constructor 1;
- [ apply (formal_map S T);
- | constructor 1;
- [ apply (λf,f1: formal_map S T.f=f1);
- | simplify; intros 1; apply refl1
- | simplify; intros 2; apply sym1
- | simplify; intros 3; apply trans1]]
-qed.
-
-axiom C1':
- ∀S,T: formal_topology.∀f:formal_map_setoid S T.∀U,V: Ω \sup T.
- extS ?? f (U ↓ V) = extS ?? f U ↓ extS ?? f V.
-
-definition formal_map_composition:
- ∀o1,o2,o3: formal_topology.
- binary_morphism1
- (formal_map_setoid o1 o2)
- (formal_map_setoid o2 o3)
- (formal_map_setoid o1 o3).
- intros; constructor 1;
- [ intros; whd in c c1; constructor 1;
- [ apply (comp1 BTop ??? c c1);
- | intros;
- apply (.= (extS_com ??? c c1 ?));
- apply (.= †(C1 ?????));
- apply (.= (C1' ?????));
- apply (.= ((†((extS_singleton ????) \sup -1))‡(†((extS_singleton ????) \sup -1))));
- apply (.= (extS_com ??????)\sup -1 ‡ (extS_com ??????) \sup -1);
- apply (.= (extS_singleton ????)‡(extS_singleton ????));
- apply refl1;
- | apply (.= (extS_com ??? c c1 ?));
- apply (.= (†(C2 ???)));
- apply (.= (C2 ???));
- apply refl1;]
- | intros; simplify;
- change with (comp1 BTop ??? a b = comp1 BTop ??? a' b');
- apply prop1; assumption]
-qed.
-*)
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/o-algebra.ma".
-
-definition is_o_saturation: ∀C:OA. C ⇒_1 C → CProp1 ≝
- λC:OA.λA:C ⇒_1 C.∀U,V. (U ≤ A V) =_1 (A U ≤ A V).
-
-definition is_o_reduction: ∀C:OA. C ⇒_1 C → CProp1 ≝
- λC:OA.λJ:C ⇒_1 C.∀U,V. (J U ≤ V) =_1 (J U ≤ J V).
-
-theorem o_saturation_expansive: ∀C,A. is_o_saturation C A → ∀U. U ≤ A U.
- intros; apply (fi ?? (i ??)); apply (oa_leq_refl C).
-qed.
-
-theorem o_saturation_monotone: ∀C:OA.∀A:C ⇒_1 C. is_o_saturation C A → ∀U,V. U ≤ V → A U ≤ A V.
- intros; apply (if ?? (i ??)); apply (oa_leq_trans C);
- [apply V|3: apply o_saturation_expansive ]
- assumption.
-qed.
-
-theorem o_saturation_idempotent: ∀C:OA.∀A:C ⇒_1 C. is_o_saturation C A → ∀U. A (A U) =_1 A U.
- intros; apply (oa_leq_antisym C);
- [ apply (if ?? (i (A U) U)); apply (oa_leq_refl C).
- | apply o_saturation_expansive; assumption]
-qed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/basic_pairs_to_o-basic_pairs.ma".
-include "formal_topology/apply_functor.ma".
-
-definition rOBP ≝ Apply (category2_of_category1 BP) OBP BP_to_OBP.
-
-include "formal_topology/o-basic_pairs_to_o-basic_topologies.ma".
-
-lemma category2_of_category1_respects_comp_r:
- ∀C:category1.∀o1,o2,o3:C.
- ∀f:arrows1 ? o1 o2.∀g:arrows1 ? o2 o3.
- (comp1 ???? f g) =_\ID (comp2 (category2_of_category1 C) o1 o2 o3 f g).
- intros; constructor 1;
-qed.
-
-lemma category2_of_category1_respects_comp:
- ∀C:category1.∀o1,o2,o3:C.
- ∀f:arrows1 ? o1 o2.∀g:arrows1 ? o2 o3.
- (comp2 (category2_of_category1 C) o1 o2 o3 f g) =_\ID (comp1 ???? f g).
- intros; constructor 1;
-qed.
-
-lemma POW_full':
- ∀S,T:REL.∀f:arrows2 SET1 (POW S) (POW T).
- arrows1 REL S T.
- intros;
- constructor 1; constructor 1;
- [ intros (x y); apply (y ∈ c {(x)});
- | apply hide; intros; unfold FunClass_1_OF_Ocontinuous_relation;
- apply (e1ࠠe); ]
-qed.
-
-(*
-lemma POW_full_image:
- ∀S,T:REL.∀f:arrows2 SET1 (POW S) (POW T).
- exT22 ? (λg:arrows1 REL S T.or_f ?? (map_arrows2 ?? POW S T g) = f).
- intros; letin g ≝ (? : carr1 (arrows1 REL S T)); [
- constructor 1; constructor 1;
- [ intros (x y); apply (y ∈ f {(x)});
- | apply hide; intros; unfold FunClass_1_OF_Ocontinuous_relation;
- apply (e1ࠠe); ]]
-exists [apply g]
-intro; split; intro; simplify; intro;
-[ whd in f1; change in f1:(? ? (λ_:?.? ? ? ? ? % ?)) with (a1 ∈ f {(x)});
- cases f1; cases x; clear f1 x; change with (a1 ∈ f a);
- lapply (f_image_monotone ?? (map_arrows2 ?? POW S T g) (singleton ? w) a ? a1);
- [2: whd in Hletin;
- change in Hletin:(? ? (λ_:?.? ? ? ? ? % ?))
- with (a1 ∈ f {(x)}); cases Hletin; cases x;
- [ intros 2; change in f3 with (eq1 ? w a2); change with (a2 ∈ a);
- apply (. f3^-1‡#); assumption;
- | assumption; ]
-
-
-
- lapply (. (or_prop3 ?? (map_arrows2 ?? POW S T g) (singleton ? a1) a)^-1);
- [ whd in Hletin:(? ? ? ? ? ? %);
- change in Hletin:(? ? ? ? ? ? (? ? (? ? ? (λ_:?.? ? (λ_:?.? ? ? ? ? % ?)) ?)))
- with (y ∈ f {(x)});
- cases Hletin; cases x1; cases x2;
-
- [ cases Hletin; change in x with (eq1 ? a1 w1); apply (. x‡#); assumption;
- | exists; [apply w] assumption ]
-
-
- clear g;
- cases f1; cases x; simplify in f2; change with (a1 ∈ (f a));
- lapply depth=0 (let x ≝ POW in or_prop3 (POW S) (POW T) (map_arrows2 ?? POW S T g));
- lapply (Hletin {(w)} {(a1)}).
- lapply (if ?? Hletin1); [2: clear Hletin Hletin1;
- exists; [apply a1] [whd; exists[apply w] split; [assumption;|change with (w = w); apply rule #]]
- change with (a1=a1); apply rule #;]
- clear Hletin Hletin1; cases Hletin2; whd in x2;
-qed.
-*)
-lemma curry: ∀A,B,C.(A × B ⇒_1 C) → A → (B ⇒_1 C).
- intros;
- constructor 1;
- [ apply (b c);
- | intros; apply (#‡e); ]
-qed.
-
-notation < "F x" left associative with precedence 60 for @{'map_arrows $F $x}.
-interpretation "map arrows 2" 'map_arrows F x = (fun12 ? ? (map_arrows2 ? ? F ? ?) x).
-
-definition preserve_sup : ∀S,T.∀ f:Ω^S ⇒_1 Ω^T. CProp1.
-intros (S T f); apply (∀X:Ω \sup S. (f X) =_1 ?);
-constructor 1; constructor 1;
-[ intro y; alias symbol "singl" = "singleton". alias symbol "and" = "and_morphism".
- apply (∃x:S. x ∈ X ∧ y ∈ f {(x)});
-| intros (a b H); split; intro E; cases E; clear E; exists; [1,3:apply w]
- [ apply (. #‡(H^-1‡#)); | apply (. #‡(H‡#));] assumption]
-qed.
-
-alias symbol "singl" = "singleton".
-lemma eq_cones_to_eq_rel:
- ∀S,T. ∀f,g: arrows1 REL S T.
- (∀x. curry ??? (image ??) f {(x)} = curry ??? (image ??) g {(x)}) → f = g.
-intros; intros 2 (a b); split; intro;
-[ cases (f1 a); lapply depth=0 (s b); clear s s1;
- lapply (Hletin); clear Hletin;
- [ cases Hletin1; cases x; change in f4 with (a = w);
- change with (a ♮g b); apply (. f4‡#); assumption;
- | exists; [apply a] split; [ assumption | change with (a=a); apply rule #;]]
-| cases (f1 a); lapply depth=0 (s1 b); clear s s1;
- lapply (Hletin); clear Hletin;
- [ cases Hletin1; cases x; change in f4 with (a = w);
- change with (a ♮f b); apply (. f4‡#); assumption;
- | exists; [apply a] split; [ assumption | change with (a=a); apply rule #;]]]
-qed.
-
-variant eq_cones_to_eq_rel':
- ∀S,T. ∀f,g: arrows1 REL S T.
- (∀x:S. or_f ?? (map_arrows2 ?? POW S T f) {(x)} = or_f ?? (map_arrows2 ?? POW S T g) {(x)}) →
- f = g
-≝ eq_cones_to_eq_rel.
-
-(*
-lemma rOR_full :
- ∀s,t:rOBP.∀f:arrows2 OBTop (OR (ℱ_2 s)) (OR (ℱ_2 t)).
- exT22 ? (λg:arrows2 rOBP s t.
- map_arrows2 ?? OR ?? (ℳ_2 g) = f).
-intros 2 (s t); cases s (s_2 s_1 s_eq); clear s;
-change in match (F2 ??? (mk_Fo ??????)) with s_2;
-cases s_eq; clear s_eq s_2;
-letin s1 ≝ (BP_to_OBP s_1); change in match (BP_to_OBP s_1) with s1;
-cases t (t_2 t_1 t_eq); clear t;
-change in match (F2 ??? (mk_Fo ??????)) with t_2;
-cases t_eq; clear t_eq t_2;
-letin t1 ≝ (BP_to_OBP t_1); change in match (BP_to_OBP t_1) with t1;
-whd in ⊢ (%→?); whd in ⊢ (? (? ? ? ? %) (? ? ? ? %)→?);
-intro; whd in s_1 t_1;
-letin R ≝ (? : (carr2 (arrows2 (category2_of_category1 BP) s_1 t_1)));
-[2:
- exists;
- [ constructor 1;
- [2: simplify; apply R;
- | simplify; apply (fun12 ?? (map_arrows2 ?? BP_to_OBP s_1 t_1)); apply R;
- | simplify; apply rule #; ]]
- simplify;
-|1: constructor 1;
- [2: apply (pi1exT22 ?? (POW_full (form s_1) (form t_1) f));
- |1: letin u ≝ (or_f_star ?? (map_arrows2 ?? POW (concr t_1) (form t_1) (⊩ \sub t_1)));
- letin r ≝ (u ∘ (or_f ?? f));
- letin xxx ≝ (or_f ?? (map_arrows2 ?? POW (concr s_1) (form s_1) (⊩ \sub s_1)));
- letin r' ≝ (r ∘ xxx); clearbody r';
- apply (POW_full' (concr s_1) (concr t_1) r');
- | simplify in ⊢ (? ? ? (? ? ? ? ? % ?) ?);
- apply eq_cones_to_eq_rel'; intro;
- apply
- (cic:/matita/logic/equality/eq_elim_r''.con ?????
- (category2_of_category1_respects_comp_r : ?));
- apply rule (.= (#‡#));
- apply (.= (respects_comp2 ?? POW (concr s_1) (concr t_1) (form t_1) ? (⊩\sub t_1))‡#);
- apply sym2;
- apply (.= (respects_comp2 ?? POW (concr s_1) (form s_1) (form t_1) (⊩\sub s_1) (pi1exT22 ?? (POW_full (form s_1) (form t_1) (Ocont_rel ?? f)))));
- apply (let H ≝(\snd (POW_full (form s_1) (form t_1) (Ocont_rel ?? f))) in .= #‡H);
- apply sym2;
- ]
-
-STOP;
-
-
-(* Todo: rename BTop → OBTop *)
-
-(* scrivo gli statement qua cosi' verra' un conflitto :-)
-
-1. definire il funtore OR
-2. dimostrare che ORel e' faithful
-
-3. Definire la funzione
- Apply:
- ∀C1,C2: CAT2. F: arrows3 CAT2 C1 C2 → CAT2
- ≝
- constructor 1;
- [ gli oggetti sono gli oggetti di C1 mappati da F
- | i morfismi i morfismi di C1 mappati da F
- | ....
- ]
-
- E : objs CATS === Σx.∃y. F y = x
-
- Quindi (Apply C1 C2 F) (che usando da ora in avanti una coercion
- scrivero' (F C1) ) e' l'immagine di C1 tramite F ed e'
- una sottocategoria di C2 (qualcosa da dimostare qui??? vedi sotto
- al punto 5)
-
-4. Definire rOBP (le OBP rappresentabili) come (BP_to_OBP BP)
- [Si puo' fare lo stesso per le OA: rOA ≝ Rel_to_OA REL ]
-
-5. Dimostrare che OR (il funtore faithful da OBP a OBTop) e' full
- quando applicato a rOBP.
- Nota: puo' darsi che faccia storie ad accettare lo statement.
- Infatti rOBP e' (BP_to_OBP BP) ed e' "una sottocategoria di OBP"
- e OR va da OBP a OBTop. Non so se tipa subito o se devi dare
- una "proiezione" da rOBP a OBP.
-
-6. Definire rOBTop come (OBP_to_OBTop rOBP).
-
-7. Per composizione si ha un funtore full and faithful da BP a rOBTop:
- basta prendere (OR ∘ BP_to_OBP).
-
-8. Dimostrare (banale: quasi tutti i campi sono per conversione) che
- esiste un funtore da rOBTop a BTop. Dimostrare che tale funtore e'
- faithful e full (banale: tutta conversione).
-
-9. Per composizione si ha un funtore full and faithful da BP a BTop.
-
-10. Dimostrare che i seguenti funtori sono anche isomorphism-dense
- (http://planetmath.org/encyclopedia/DenseFunctor.html):
-
- BP_to_OBP
- OBP_to_OBTop quando applicato alle rOBP
- OBTop_to_BTop quando applicato alle rOBTop
-
- Concludere per composizione che anche il funtore da BP a BTop e'
- isomorphism-dense.
-
-====== Da qui in avanti non e' "necessario" nulla:
-
-== altre cose mancanti
-
-11. Dimostrare che le r* e le * orrizzontali
- sono isomorfe dando il funtore da r* a * e dimostrando che componendo i
- due funtori ottengo l'identita'
-
-12. La definizione di r* fa schifo: in pratica dici solo come ottieni
- qualcosa, ma non come lo caratterizzeresti. Ora un teorema carino
- e' che una a* (e.g. una aOBP) e' sempre una rOBP dove "a" sta per
- atomic. Dimostrarlo per tutte le r*.
-
-== categorish/future works
-
-13. definire astrattamente la FG-completion e usare quella per
- ottenere le BP da Rel e le OBP da OA.
-
-14. indebolire le OA, generalizzare le costruzioni, etc. come detto
- con Giovanni
-
-*)
-
-*)
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/subsets.ma".
-
-record binary_relation (A,B: SET) : Type1 ≝
- { satisfy:> binary_morphism1 A B CPROP }.
-
-notation < "hvbox (x \nbsp \natur term 90 r \nbsp y)" with precedence 45 for @{'satisfy $r $x $y}.
-notation > "hvbox (x \natur term 90 r y)" with precedence 45 for @{'satisfy $r $x $y}.
-interpretation "relation applied" 'satisfy r x y = (fun21 ??? (satisfy ?? r) x y).
-
-definition binary_relation_setoid: SET → SET → setoid1.
- intros (A B);
- constructor 1;
- [ apply (binary_relation A B)
- | constructor 1;
- [ apply (λA,B.λr,r': binary_relation A B. ∀x,y. r x y ↔ r' x y)
- | simplify; intros 3; split; intro; assumption
- | simplify; intros 5; split; intro;
- [ apply (fi ?? (f ??)) | apply (if ?? (f ??))] assumption
- | simplify; intros 7; split; intro;
- [ apply (if ?? (f1 ??)) | apply (fi ?? (f ??)) ]
- [ apply (if ?? (f ??)) | apply (fi ?? (f1 ??)) ]
- assumption]]
-qed.
-
-definition binary_relation_of_binary_relation_setoid :
- ∀A,B.binary_relation_setoid A B → binary_relation A B ≝ λA,B,c.c.
-coercion binary_relation_of_binary_relation_setoid.
-
-definition composition:
- ∀A,B,C.
- (binary_relation_setoid A B) × (binary_relation_setoid B C) ⇒_1 (binary_relation_setoid A C).
- intros;
- constructor 1;
- [ intros (R12 R23);
- constructor 1;
- constructor 1;
- [ apply (λs1:A.λs3:C.∃s2:B. s1 ♮R12 s2 ∧ s2 ♮R23 s3);
- | intros;
- split; intro; cases e2 (w H3); clear e2; exists; [1,3: apply w ]
- [ apply (. (e^-1‡#)‡(#‡e1^-1)); assumption
- | apply (. (e‡#)‡(#‡e1)); assumption]]
- | intros 8; split; intro H2; simplify in H2 ⊢ %;
- cases H2 (w H3); clear H2; exists [1,3: apply w] cases H3 (H2 H4); clear H3;
- [ lapply (if ?? (e x w) H2) | lapply (fi ?? (e x w) H2) ]
- [ lapply (if ?? (e1 w y) H4)| lapply (fi ?? (e1 w y) H4) ]
- exists; try assumption;
- split; assumption]
-qed.
-
-definition REL: category1.
- constructor 1;
- [ apply setoid
- | intros (T T1); apply (binary_relation_setoid T T1)
- | intros; constructor 1;
- constructor 1; unfold setoid1_of_setoid; simplify;
- [ (* changes required to avoid universe inconsistency *)
- change with (carr o → carr o → CProp); intros; apply (eq ? c c1)
- | intros; split; intro; change in a a' b b' with (carr o);
- change in e with (eq ? a a'); change in e1 with (eq ? b b');
- [ apply (.= (e ^ -1));
- apply (.= e2);
- apply e1
- | apply (.= e);
- apply (.= e2);
- apply (e1 ^ -1)]]
- | apply composition
- | intros 9;
- split; intro;
- cases f (w H); clear f; cases H; clear H;
- [cases f (w1 H); clear f | cases f1 (w1 H); clear f1]
- cases H; clear H;
- exists; try assumption;
- split; try assumption;
- exists; try assumption;
- split; assumption
- |6,7: intros 5; unfold composition; simplify; split; intro;
- unfold setoid1_of_setoid in x y; simplify in x y;
- [1,3: cases e (w H1); clear e; cases H1; clear H1; unfold;
- [ apply (. (e : eq1 ? x w)‡#); assumption
- | apply (. #‡(e : eq1 ? w y)^-1); assumption]
- |2,4: exists; try assumption; split;
- (* change required to avoid universe inconsistency *)
- change in x with (carr o1); change in y with (carr o2);
- first [apply refl | assumption]]]
-qed.
-
-definition setoid_of_REL : objs1 REL → setoid ≝ λx.x.
-coercion setoid_of_REL.
-
-definition binary_relation_setoid_of_arrow1_REL :
- ∀P,Q. arrows1 REL P Q → binary_relation_setoid P Q ≝ λP,Q,x.x.
-coercion binary_relation_setoid_of_arrow1_REL.
-
-
-notation > "B ⇒_\r1 C" right associative with precedence 72 for @{'arrows1_REL $B $C}.
-notation "B ⇒\sub (\r 1) C" right associative with precedence 72 for @{'arrows1_REL $B $C}.
-interpretation "'arrows1_REL" 'arrows1_REL A B = (arrows1 REL A B).
-notation > "B ⇒_\r2 C" right associative with precedence 72 for @{'arrows2_REL $B $C}.
-notation "B ⇒\sub (\r 2) C" right associative with precedence 72 for @{'arrows2_REL $B $C}.
-interpretation "'arrows2_REL" 'arrows2_REL A B = (arrows2 (category2_of_category1 REL) A B).
-
-
-definition full_subset: ∀s:REL. Ω^s.
- apply (λs.{x | True});
- intros; simplify; split; intro; assumption.
-qed.
-
-coercion full_subset.
-
-definition comprehension: ∀b:REL. (b ⇒_1. CPROP) → Ω^b.
- apply (λb:REL. λP: b ⇒_1 CPROP. {x | P x});
- intros; simplify;
- apply (.= †e); apply refl1.
-qed.
-
-interpretation "subset comprehension" 'comprehension s p =
- (comprehension s (mk_unary_morphism1 ?? p ?)).
-
-definition ext: ∀X,S:REL. (X ⇒_\r1 S) × S ⇒_1 (Ω^X).
- intros (X S); constructor 1;
- [ apply (λr:X ⇒_\r1 S.λf:S.{x ∈ X | x ♮r f}); intros; simplify; apply (.= (e‡#)); apply refl1
- | intros; simplify; split; intros; simplify;
- [ change with (∀x. x ♮a b → x ♮a' b'); intros;
- apply (. (#‡e1^-1)); whd in e; apply (if ?? (e ??)); assumption
- | change with (∀x. x ♮a' b' → x ♮a b); intros;
- apply (. (#‡e1)); whd in e; apply (fi ?? (e ??));assumption]]
-qed.
-
-definition extS: ∀X,S:REL. ∀r:X ⇒_\r1 S. Ω^S ⇒_1 Ω^X.
- (* ∃ is not yet a morphism apply (λX,S,r,F.{x ∈ X | ∃a. a ∈ F ∧ x ♮r a});*)
- intros (X S r); constructor 1;
- [ intro F; constructor 1; constructor 1;
- [ apply (λx. x ∈ X ∧ ∃a:S. a ∈ F ∧ x ♮r a);
- | intros; split; intro; cases f (H1 H2); clear f; split;
- [ apply (. (e^-1‡#)); assumption
- |3: apply (. (e‡#)); assumption
- |2,4: cases H2 (w H3); exists; [1,3: apply w]
- [ apply (. (#‡(e^-1‡#))); assumption
- | apply (. (#‡(e‡#))); assumption]]]
- | intros; split; simplify; intros; cases f; cases e1; split;
- [1,3: assumption
- |2,4: exists; [1,3: apply w]
- [ apply (. (#‡e^-1)‡#); assumption
- | apply (. (#‡e)‡#); assumption]]]
-qed.
-(*
-lemma equalset_extS_id_X_X: ∀o:REL.∀X.extS ?? (id1 ? o) X = X.
- intros;
- unfold extS; simplify;
- split; simplify;
- [ intros 2; change with (a ∈ X);
- cases f; clear f;
- cases H; clear H;
- cases x; clear x;
- change in f2 with (eq1 ? a w);
- apply (. (f2\sup -1‡#));
- assumption
- | intros 2; change in f with (a ∈ X);
- split;
- [ whd; exact I
- | exists; [ apply a ]
- split;
- [ assumption
- | change with (a = a); apply refl]]]
-qed.
-
-lemma extS_com: ∀o1,o2,o3,c1,c2,S. extS o1 o3 (c2 ∘ c1) S = extS o1 o2 c1 (extS o2 o3 c2 S).
- intros; unfold extS; simplify; split; intros; simplify; intros;
- [ cases f (H1 H2); cases H2 (w H3); clear f H2; split; [assumption]
- cases H3 (H4 H5); cases H5 (w1 H6); clear H3 H5; cases H6 (H7 H8); clear H6;
- exists; [apply w1] split [2: assumption] constructor 1; [assumption]
- exists; [apply w] split; assumption
- | cases f (H1 H2); cases H2 (w H3); clear f H2; split; [assumption]
- cases H3 (H4 H5); cases H4 (w1 H6); clear H3 H4; cases H6 (w2 H7); clear H6;
- cases H7; clear H7; exists; [apply w2] split; [assumption] exists [apply w] split;
- assumption]
-qed.
-*)
-
-(* the same as ⋄ for a basic pair *)
-definition image: ∀U,V:REL. (U ⇒_\r1 V) ⇒_2 (Ω^U ⇒_2 Ω^V).
- intros; constructor 1;
- [ intro r; constructor 1;
- [ apply (λS: Ω^U. {y | ∃x:U. x ♮r y ∧ x ∈ S });
- intros; simplify; split; intro; cases e1; exists [1,3: apply w]
- [ apply (. (#‡e^-1)‡#); assumption
- | apply (. (#‡e)‡#); assumption]
- | intros; split;
- [ intro y; simplify; intro yA; cases yA; exists; [ apply w ];
- apply (. #‡(#‡e^-1)); assumption;
- | intro y; simplify; intro yA; cases yA; exists; [ apply w ];
- apply (. #‡(#‡e)); assumption;]]
- | simplify; intros; intro y; simplify; split; simplify; intros (b H); cases H;
- exists; [1,3: apply w]; cases x; split; try assumption;
- [ apply (if ?? (e ??)); | apply (fi ?? (e ??)); ] assumption;]
-qed.
-
-(* the same as □ for a basic pair *)
-definition minus_star_image: ∀U,V:REL. (U ⇒_\r1 V) ⇒_2 (Ω^U ⇒_2 Ω^V).
- intros; constructor 1; intros;
- [ constructor 1;
- [ apply (λS: Ω^U. {y | ∀x:U. x ♮c y → x ∈ S});
- intros; simplify; split; intros; apply f;
- [ apply (. #‡e); | apply (. #‡e ^ -1)] assumption;
- | intros; split; intro; simplify; intros;
- [ apply (. #‡e^-1);| apply (. #‡e); ] apply f; assumption;]
- | intros; intro; simplify; split; simplify; intros; apply f;
- [ apply (. (e x a2)); assumption | apply (. (e^-1 x a2)); assumption]]
-qed.
-
-(* the same as Rest for a basic pair *)
-definition star_image: ∀U,V:REL. (U ⇒_\r1 V) ⇒_2 (Ω^V ⇒_2 Ω^U).
- intros; constructor 1;
- [ intro r; constructor 1;
- [ apply (λS: Ω \sup V. {x | ∀y:V. x ♮r y → y ∈ S});
- intros; simplify; split; intros; apply f;
- [ apply (. e ‡#);| apply (. e^ -1‡#);] assumption;
- | intros; split; simplify; intros;
- [ apply (. #‡e^-1);| apply (. #‡e); ] apply f; assumption;]
- | intros; intro; simplify; split; simplify; intros; apply f;
- [ apply (. e a2 y); | apply (. e^-1 a2 y)] assumption;]
-qed.
-
-(* the same as Ext for a basic pair *)
-definition minus_image: ∀U,V:REL. (U ⇒_\r1 V) ⇒_2 (Ω^V ⇒_2 Ω^U).
- intros; constructor 1;
- [ intro r; constructor 1;
- [ apply (λS: Ω^V. {x | ∃y:V. x ♮r y ∧ y ∈ S }).
- intros; simplify; split; intros; cases e1; cases x; exists; [1,3: apply w]
- split; try assumption; [ apply (. (e^-1‡#)); | apply (. (e‡#));] assumption;
- | intros; simplify; split; simplify; intros; cases e1; cases x;
- exists [1,3: apply w] split; try assumption;
- [ apply (. (#‡e^-1)); | apply (. (#‡e));] assumption]
- | intros; intro; simplify; split; simplify; intros; cases e1; exists [1,3: apply w]
- cases x; split; try assumption;
- [ apply (. e^-1 a2 w); | apply (. e a2 w)] assumption;]
-qed.
-
-definition foo : ∀o1,o2:REL.carr1 (o1 ⇒_\r1 o2) → carr2 (setoid2_of_setoid1 (o1 ⇒_\r1 o2)) ≝ λo1,o2,x.x.
-
-interpretation "relation f⎻*" 'OR_f_minus_star r = (fun12 ?? (minus_star_image ? ?) (foo ?? r)).
-interpretation "relation f⎻" 'OR_f_minus r = (fun12 ?? (minus_image ? ?) (foo ?? r)).
-interpretation "relation f*" 'OR_f_star r = (fun12 ?? (star_image ? ?) (foo ?? r)).
-
-definition image_coercion: ∀U,V:REL. (U ⇒_\r1 V) → Ω^U ⇒_2 Ω^V.
-intros (U V r Us); apply (image U V r); qed.
-coercion image_coercion.
-
-(* minus_image is the same as ext *)
-
-theorem image_id: ∀o. (id1 REL o : carr2 (Ω^o ⇒_2 Ω^o)) =_1 (id2 SET1 Ω^o).
- intros; unfold image_coercion; unfold image; simplify;
- whd in match (?:carr2 ?);
- intro U; simplify; split; simplify; intros;
- [ change with (a ∈ U);
- cases e; cases x; change in e1 with (w =_1 a); apply (. e1^-1‡#); assumption
- | change in f with (a ∈ U);
- exists; [apply a] split; [ change with (a = a); apply refl1 | assumption]]
-qed.
-
-theorem minus_star_image_id: ∀o:REL.
- ((id1 REL o)⎻* : carr2 (Ω^o ⇒_2 Ω^o)) =_1 (id2 SET1 Ω^o).
- intros; unfold minus_star_image; simplify; intro U; simplify;
- split; simplify; intros;
- [ change with (a ∈ U); apply f; change with (a=a); apply refl1
- | change in f1 with (eq1 ? x a); apply (. f1‡#); apply f]
-qed.
-
-alias symbol "compose" (instance 5) = "category2 composition".
-alias symbol "compose" (instance 4) = "category1 composition".
-theorem image_comp: ∀A,B,C.∀r:B ⇒_\r1 C.∀s:A ⇒_\r1 B.
- ((r ∘ s) : carr2 (Ω^A ⇒_2 Ω^C)) =_1 r ∘ s.
- intros; intro U; split; intro x; (unfold image; unfold SET1; simplify);
- intro H; cases H;
- cases x1; [cases f|cases f1]; exists; [1,3: apply w1] cases x2; split; try assumption;
- exists; try assumption; split; assumption;
-qed.
-
-theorem minus_star_image_comp:
- ∀A,B,C.∀r:B ⇒_\r1 C.∀s:A ⇒_\r1 B.
- minus_star_image A C (r ∘ s) =_1 minus_star_image B C r ∘ (minus_star_image A B s).
- intros; unfold minus_star_image; intro X; simplify; split; simplify; intros;
- [ whd; intros; simplify; whd; intros; apply f; exists; try assumption; split; assumption;
- | cases f1; cases x1; apply f; assumption]
-qed.
-
-
-(*
-(*CSC: unused! *)
-theorem ext_comp:
- ∀o1,o2,o3: REL.
- ∀a: arrows1 ? o1 o2.
- ∀b: arrows1 ? o2 o3.
- ∀x. ext ?? (b∘a) x = extS ?? a (ext ?? b x).
- intros;
- unfold ext; unfold extS; simplify; split; intro; simplify; intros;
- cases f; clear f; split; try assumption;
- [ cases f2; clear f2; cases x1; clear x1; exists; [apply w] split;
- [1: split] assumption;
- | cases H; clear H; cases x1; clear x1; exists [apply w]; split;
- [2: cases f] assumption]
-qed.
-*)
-
-axiom daemon : False.
-
-theorem extS_singleton:
- ∀o1,o2.∀a.∀x.extS o1 o2 a {(x)} = ext o1 o2 a x.
- intros; unfold extS; unfold ext; unfold singleton; simplify;
- split; intros 2; simplify; simplify in f;
- [ cases f; cases e; cases x1; change in f2 with (x =_1 w); apply (. #‡f2); assumption;
- | split; try apply I; exists [apply x] split; try assumption; change with (x = x); apply rule #;] qed.
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/relations.ma".
-include "formal_topology/o-algebra.ma".
-
-definition POW': objs1 SET → OAlgebra.
- intro A; constructor 1;
- [ apply (Ω^A);
- | apply subseteq;
- | apply overlaps;
- | apply big_intersects;
- | apply big_union;
- | apply ({x | True});
- simplify; intros; apply (refl1 ? (eq1 CPROP));
- | apply ({x | False});
- simplify; intros; apply (refl1 ? (eq1 CPROP));
- | intros; whd; intros; assumption
- | intros; whd; split; assumption
- | intros; apply transitive_subseteq_operator; [2: apply f; | skip | assumption]
- | intros; cases f; exists [apply w] assumption
- | intros; split; [ intros 4; apply (f ? f1 i); | intros 3; intro; apply (f i ? f1); ]
- | intros; split;
- [ intros 4; apply f; exists; [apply i] assumption;
- | intros 3; intros; cases f1; apply (f w a x); ]
- | intros 3; cases f;
- | intros 3; constructor 1;
- | intros; cases f; exists; [apply w]
- [ assumption
- | whd; intros; cases i; simplify; assumption]
- | intros; split; intro;
- [ (** screenshot "screen-pow". *) cases f; cases x1; exists [apply w1] exists [apply w] assumption;
- | cases e; cases x; exists; [apply w1] [ assumption | exists; [apply w] assumption]]
- | intros; intros 2; cases (f {(a)} ?);
- [ exists; [apply a] [assumption | change with (a = a); apply refl1;]
- | change in x1 with (a = w); change with (mem A a q); apply (. (x1‡#));
- assumption]]
-qed.
-
-definition powerset_of_POW': ∀A.oa_P (POW' A) → Ω^A ≝ λA,x.x.
-coercion powerset_of_POW'.
-
-definition orelation_of_relation: ∀o1,o2:REL. o1 ⇒_\r1 o2 → (POW' o1) ⇒_\o2 (POW' o2).
- intros;
- constructor 1;
- [ apply rule c;
- | apply rule (c⎻* );
- | apply rule (c* );
- | apply rule (c⎻);
- | intros; split; intro;
- [ intros 2; intros 2; apply (f y); exists[apply a] split; assumption;
- | intros 2; change with (a ∈ q); cases f1; cases x; clear f1 x;
- apply (f w f3); assumption; ]
- | unfold foo; intros; split; intro;
- [ intros 2; intros 2; apply (f x); exists [apply a] split; assumption;
- | intros 2; change with (a ∈ q); cases f1; cases x; apply (f w f3); assumption;]
- | intros; split; unfold foo; unfold image_coercion; simplify; intro; cases f; clear f;
- [ cases x; cases x2; clear x x2; exists; [apply w1]
- [ assumption | exists; [apply w] split; assumption]
- | cases x1; cases x2; clear x1 x2; exists; [apply w1]
- [ exists; [apply w] split; assumption;
- | assumption; ]]]
-qed.
-
-lemma orelation_of_relation_preserves_equality:
- ∀o1,o2:REL.∀t,t': o1 ⇒_\r1 o2.
- t = t' → orelation_of_relation ?? t =_2 orelation_of_relation ?? t'.
- intros; split; unfold orelation_of_relation; unfold foo; simplify;
- change in e with (t =_2 t'); unfold image_coercion; apply (†e);
-qed.
-
-lemma minus_image_id : ∀o:REL.((id1 REL o))⎻ =_1 (id2 SET1 Ω^o).
-unfold foo; intro o; intro; unfold minus_image; simplify; split; simplify; intros;
-[ cases e; cases x; change with (a1 ∈ a); change in f with (a1 =_1 w);
- apply (. f‡#); assumption;
-| change in f with (a1 ∈ a); exists [ apply a1] split; try assumption;
- change with (a1 =_1 a1); apply refl1;]
-qed.
-
-lemma star_image_id : ∀o:REL. ((id1 REL o))* =_1 (id2 SET1 Ω^o).
-unfold foo; intro o; intro; unfold star_image; simplify; split; simplify; intros;
-[ change with (a1 ∈ a); apply f; change with (a1 =_1 a1); apply rule refl1;
-| change in f1 with (a1 =_1 y); apply (. f1^-1‡#); apply f;]
-qed.
-
-lemma orelation_of_relation_preserves_identity:
- ∀o1:REL. orelation_of_relation ?? (id1 ? o1) =_2 id2 OA (POW' o1).
- intros; split;
- (unfold orelation_of_relation; unfold OA; unfold foo; simplify);
- [ apply (minus_star_image_id o1);
- | apply (minus_image_id o1);
- | apply (image_id o1);
- | apply (star_image_id o1) ]
-qed.
-
-(*
- split; whd; intro;
- [ change with ((∀x. x ♮(id1 REL o1) a1→x∈a) → a1 ∈ a); intros;
- apply (f a1); change with (a1 = a1); apply refl1;
- | change with (a1 ∈ a → ∀x. x ♮(id1 REL o1) a1→x∈a); intros;
- change in f1 with (x = a1); apply (. f1‡#); apply f;
- | alias symbol "and" = "and_morphism".
- change with ((∃y:o1.a1 ♮(id1 REL o1) y ∧ y∈a) → a1 ∈ a);
- intro; cases e; clear e; cases x; clear x; change in f with (a1=w);
- apply (. f‡#); apply f1;
- | change with (a1 ∈ a → ∃y:o1.a1 ♮(id1 REL o1) y ∧ y∈a);
- intro; exists; [apply a1]; split; [ change with (a1=a1); apply refl1; | apply f]
- | change with ((∃x:o1.x ♮(id1 REL o1) a1∧x∈a) → a1 ∈ a);
- intro; cases e; clear e; cases x; clear x; change in f with (w=a1);
- apply (. f^-1‡#); apply f1;
- | change with (a1 ∈ a → ∃x:o1.x ♮(id1 REL o1) a1∧x∈a);
- intro; exists; [apply a1]; split; [ change with (a1=a1); apply refl1; | apply f]
- | change with ((∀y.a1 ♮(id1 REL o1) y→y∈a) → a1 ∈ a); intros;
- apply (f a1); change with (a1 = a1); apply refl1;
- | change with (a1 ∈ a → ∀y.a1 ♮(id1 REL o1) y→y∈a); intros;
- change in f1 with (a1 = y); apply (. f1^-1‡#); apply f;]
-qed.
-*)
-
-(* CSC: ???? forse un uncertain mancato *)
-alias symbol "eq" = "setoid2 eq".
-alias symbol "compose" = "category1 composition".
-lemma orelation_of_relation_preserves_composition:
- ∀o1,o2,o3:REL.∀F: o1 ⇒_\r1 o2.∀G: o2 ⇒_\r1 o3.
- orelation_of_relation ?? (G ∘ F) =
- comp2 OA ??? (orelation_of_relation ?? F) (orelation_of_relation ?? G).
- intros; split; intro; split; whd; intro; whd in ⊢ (% → %); intros;
- [ whd; intros; apply f; exists; [ apply x] split; assumption;
- | cases f1; clear f1; cases x1; clear x1; apply (f w); assumption;
- | cases e; cases x; cases f; cases x1; clear e x f x1; exists; [ apply w1 ]
- split; [ assumption | exists; [apply w] split; assumption ]
- | cases e; cases x; cases f1; cases x1; clear e x f1 x1; exists; [apply w1 ]
- split; [ exists; [apply w] split; assumption | assumption ]
- | unfold arrows1_of_ORelation_setoid;
- cases e; cases x; cases f; cases x1; clear e x f x1; exists; [ apply w1 ]
- split; [ assumption | exists; [apply w] split; assumption ]
- | unfold arrows1_of_ORelation_setoid in e;
- cases e; cases x; cases f1; cases x1; clear e x f1 x1; exists; [apply w1 ]
- split; [ exists; [apply w] split; assumption | assumption ]
- | whd; intros; apply f; exists; [ apply y] split; assumption;
- | cases f1; clear f1; cases x; clear x; apply (f w); assumption;]
-qed.
-
-definition POW: carr3 (arrows3 CAT2 (category2_of_category1 REL) OA).
- constructor 1;
- [ apply POW';
- | intros; constructor 1;
- [ apply (orelation_of_relation S T);
- | intros; apply (orelation_of_relation_preserves_equality S T a a' e); ]
- | apply orelation_of_relation_preserves_identity;
- | apply orelation_of_relation_preserves_composition; ]
-qed.
-
-theorem POW_faithful: faithful2 ?? POW.
- intros 5; unfold POW in e; simplify in e; cases e;
- unfold orelation_of_relation in e3; simplify in e3; clear e e1 e2 e4;
- intros 2; simplify; unfold image_coercion in e3; cases (e3 {(x)});
- split; intro; [ lapply (s y); | lapply (s1 y); ]
- [2,4: exists; [1,3:apply x] split; [1,3: assumption |*: change with (x=x); apply rule #]
- |*: cases Hletin; cases x1; change in f3 with (x =_1 w); apply (. f3‡#); assumption;]
-qed.
-
-
-(*
-lemma currify: ∀A,B,C. (A × B ⇒_1 C) → A → (B ⇒_1 C).
-intros; constructor 1; [ apply (b c); | intros; apply (#‡e);]
-qed.
-*)
-
-include "formal_topology/notation.ma".
-
-theorem POW_full: full2 ?? POW.
- intros 3 (S T); exists;
- [ constructor 1; constructor 1;
- [ apply (λx:carr S.λy:carr T. y ∈ f {(x)});
- | apply hide; intros; unfold FunClass_1_OF_carr2; lapply (.= e1‡#);
- [4: apply mem; |6: apply Hletin;|1,2,3,5: skip]
- lapply (#‡prop11 ?? f ?? (†e)); [6: apply Hletin; |*:skip ]]
- | (split; intro; split; simplify);
- [ change with (∀a1.(∀x. a1 ∈ (f {(x):S}) → x ∈ a) → a1 ∈ f⎻* a);
- | change with (∀a1.a1 ∈ f⎻* a → (∀x.a1 ∈ f {(x):S} → x ∈ a));
- | alias symbol "and" (instance 4) = "and_morphism".
-change with (∀a1.(∃y:carr T. y ∈ f {(a1):S} ∧ y ∈ a) → a1 ∈ f⎻ a);
- | alias symbol "and" (instance 2) = "and_morphism".
-change with (∀a1.a1 ∈ f⎻ a → (∃y:carr T.y ∈ f {(a1):S} ∧ y ∈ a));
- | alias symbol "and" (instance 3) = "and_morphism".
-change with (∀a1.(∃x:carr S. a1 ∈ f {(x):S} ∧ x ∈ a) → a1 ∈ f a);
- | change with (∀a1.a1 ∈. f a → (∃x:carr S. a1 ∈ f {(x):S} ∧ x ∈ a));
- | change with (∀a1.(∀y. y ∈ f {(a1):S} → y ∈ a) → a1 ∈ f* a);
- | change with (∀a1.a1 ∈ f* a → (∀y. y ∈ f {(a1):S} → y ∈ a)); ]
- [ intros; apply ((. (or_prop2 ?? f (singleton ? a1) a)^-1) ? a1);
- [ intros 2; apply (f1 a2); change in f2 with (a2 ∈ f⎻ (singleton ? a1));
- lapply (. (or_prop3 ?? f (singleton ? a2) (singleton ? a1)));
- [ cases Hletin; change in x1 with (eq1 ? a1 w);
- apply (. x1‡#); assumption;
- | exists; [apply a2] [change with (a2=a2); apply rule #; | assumption]]
- | change with (a1 = a1); apply rule #; ]
- | intros; apply ((. (or_prop2 ?? f (singleton ? a1) a)) ? x);
- [ intros 2; change in f3 with (eq1 ? a1 a2); change with (a2 ∈ f⎻* a); apply (. f3^-1‡#);
- assumption;
- | lapply (. (or_prop3 ?? f (singleton ? x) (singleton ? a1))^-1);
- [ cases Hletin; change in x1 with (eq1 ? x w);
- change with (x ∈ f⎻ (singleton ? a1)); apply (. x1‡#); assumption;
- | exists; [apply a1] [assumption | change with (a1=a1); apply rule #; ]]]
- | intros; cases e; cases x; clear e x;
- lapply (. (or_prop3 ?? f (singleton ? a1) a)^-1);
- [ cases Hletin; change in x with (eq1 ? a1 w1); apply (. x‡#); assumption;
- | exists; [apply w] assumption ]
- | intros; lapply (. (or_prop3 ?? f (singleton ? a1) a));
- [ cases Hletin; exists; [apply w] split; assumption;
- | exists; [apply a1] [change with (a1=a1); apply rule #; | assumption ]]
- | intros; cases e; cases x; clear e x;
- apply (f_image_monotone ?? f (singleton ? w) a ? a1);
- [ intros 2; change in f3 with (eq1 ? w a2); change with (a2 ∈ a);
- apply (. f3^-1‡#); assumption;
- | assumption; ]
- | intros; lapply (. (or_prop3 ?? f a (singleton ? a1))^-1);
- [ cases Hletin; exists; [apply w] split;
- [ lapply (. (or_prop3 ?? f (singleton ? w) (singleton ? a1)));
- [ cases Hletin1; change in x3 with (eq1 ? a1 w1); apply (. x3‡#); assumption;
- | exists; [apply w] [change with (w=w); apply rule #; | assumption ]]
- | assumption ]
- | exists; [apply a1] [ assumption; | change with (a1=a1); apply rule #;]]
- | intros; apply ((. (or_prop1 ?? f (singleton ? a1) a)^-1) ? a1);
- [ apply f1; | change with (a1=a1); apply rule #; ]
- | intros; apply ((. (or_prop1 ?? f (singleton ? a1) a)) ? y);
- [ intros 2; change in f3 with (eq1 ? a1 a2); change with (a2 ∈ f* a);
- apply (. f3^-1‡#); assumption;
- | assumption ]]]
-qed.
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/relations.ma".
-
-definition is_saturation: ∀C:REL. Ω^C ⇒_1 Ω^C → CProp1 ≝
- λC:REL.λA:Ω^C ⇒_1 Ω^C. ∀U,V. (U ⊆ A V) =_1 (A U ⊆ A V).
-
-definition is_reduction: ∀C:REL. Ω^C ⇒_1 Ω^C → CProp1 ≝
- λC:REL.λJ: Ω^C ⇒_1 Ω^C. ∀U,V. (J U ⊆ V) =_1 (J U ⊆ J V).
-
-theorem saturation_expansive: ∀C,A. is_saturation C A → ∀U. U ⊆ A U.
- intros; apply (fi ?? (i ??)); apply subseteq_refl.
-qed.
-
-theorem saturation_monotone:
- ∀C,A. is_saturation C A →
- ∀U,V. U ⊆ V → A U ⊆ A V.
- intros; apply (if ?? (i ??)); apply subseteq_trans; [apply V|3: apply saturation_expansive ]
- assumption.
-qed.
-
-theorem saturation_idempotent: ∀C,A. is_saturation C A → ∀U. A (A U) = A U.
- intros; split;
- [ apply (if ?? (i ??)); apply subseteq_refl
- | apply saturation_expansive; assumption]
-qed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/saturations.ma".
-include "formal_topology/o-saturations.ma".
-include "formal_topology/relations_to_o-algebra.ma".
-
-(* These are only conversions :-) *)
-
-definition o_operator_of_operator: ∀C:REL. (Ω^C ⇒_1 Ω^C) → ((POW C) ⇒_1 (POW C)) ≝ λC,t.t.
-
-definition is_o_saturation_of_is_saturation:
- ∀C:REL.∀R: Ω^C ⇒_1 Ω^C. is_saturation ? R → is_o_saturation ? (o_operator_of_operator ? R).
-intros (C R i); apply i; qed.
-
-definition is_o_reduction_of_is_reduction:
- ∀C:REL.∀R: Ω^C ⇒_1 Ω^C.is_reduction ? R → is_o_reduction ? (o_operator_of_operator ? R).
-intros (C R i); apply i; qed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "formal_topology/categories.ma".
-
-record powerset_carrier (A: objs1 SET) : Type1 ≝ { mem_operator: A ⇒_1 CPROP }.
-interpretation "powerset low" 'powerset A = (powerset_carrier A).
-notation "hvbox(a break ∈. b)" non associative with precedence 45 for @{ 'mem_low $a $b }.
-interpretation "memlow" 'mem_low a S = (fun11 ?? (mem_operator ? S) a).
-
-definition subseteq_operator: ∀A: objs1 SET. Ω^A → Ω^A → CProp0 ≝
- λA:objs1 SET.λU,V.∀a:A. a ∈. U → a ∈. V.
-
-theorem transitive_subseteq_operator: ∀A. transitive2 ? (subseteq_operator A).
- intros 6; intros 2;
- apply s1; apply s;
- assumption.
-qed.
-
-definition powerset_setoid1: SET → SET1.
- intros (T);
- constructor 1;
- [ apply (powerset_carrier T)
- | constructor 1;
- [ apply (λU,V. subseteq_operator ? U V ∧ subseteq_operator ? V U)
- | simplify; intros; split; intros 2; assumption
- | simplify; intros (x y H); cases H; split; assumption
- | simplify; intros (x y z H H1); cases H; cases H1; split;
- apply transitive_subseteq_operator; [1,4: apply y ]
- assumption ]]
-qed.
-
-interpretation "powerset" 'powerset A = (powerset_setoid1 A).
-
-interpretation "subset construction" 'subset \eta.x =
- (mk_powerset_carrier ? (mk_unary_morphism1 ? CPROP x ?)).
-
-definition mem: ∀A. A × Ω^A ⇒_1 CPROP.
- intros;
- constructor 1;
- [ apply (λx,S. mem_operator ? S x)
- | intros 5;
- cases b; clear b; cases b'; clear b'; simplify; intros;
- apply (trans1 ????? (prop11 ?? u ?? e));
- cases e1; whd in s s1;
- split; intro;
- [ apply s; assumption
- | apply s1; assumption]]
-qed.
-
-interpretation "mem" 'mem a S = (fun21 ??? (mem ?) a S).
-
-definition subseteq: ∀A. Ω^A × Ω^A ⇒_1 CPROP.
- intros;
- constructor 1;
- [ apply (λU,V. subseteq_operator ? U V)
- | intros;
- cases e; cases e1;
- split; intros 1;
- [ apply (transitive_subseteq_operator ????? s2);
- apply (transitive_subseteq_operator ???? s1 s4)
- | apply (transitive_subseteq_operator ????? s3);
- apply (transitive_subseteq_operator ???? s s4) ]]
-qed.
-
-interpretation "subseteq" 'subseteq U V = (fun21 ??? (subseteq ?) U V).
-
-theorem subseteq_refl: ∀A.∀S:Ω^A.S ⊆ S.
- intros 4; assumption.
-qed.
-
-theorem subseteq_trans: ∀A.∀S1,S2,S3: Ω^A. S1 ⊆ S2 → S2 ⊆ S3 → S1 ⊆ S3.
- intros; apply transitive_subseteq_operator; [apply S2] assumption.
-qed.
-
-definition overlaps: ∀A. Ω^A × Ω^A ⇒_1 CPROP.
- intros;
- constructor 1;
- [ apply (λA:objs1 SET.λU,V:Ω^A.(exT2 ? (λx:A.x ∈ U) (λx:A.x ∈ V) : CProp0))
- | intros;
- constructor 1; intro; cases e2; exists; [1,4: apply w]
- [ apply (. #‡e^-1); assumption
- | apply (. #‡e1^-1); assumption
- | apply (. #‡e); assumption;
- | apply (. #‡e1); assumption]]
-qed.
-
-interpretation "overlaps" 'overlaps U V = (fun21 ??? (overlaps ?) U V).
-
-definition intersects: ∀A. Ω^A × Ω^A ⇒_1 Ω^A.
- intros;
- constructor 1;
- [ apply rule (λU,V. {x | x ∈ U ∧ x ∈ V });
- intros; simplify; apply (.= (e‡#)‡(e‡#)); apply refl1;
- | intros;
- split; intros 2; simplify in f ⊢ %;
- [ apply (. (#‡e^-1)‡(#‡e1^-1)); assumption
- | apply (. (#‡e)‡(#‡e1)); assumption]]
-qed.
-
-interpretation "intersects" 'intersects U V = (fun21 ??? (intersects ?) U V).
-
-definition union: ∀A. Ω^A × Ω^A ⇒_1 Ω^A.
- intros;
- constructor 1;
- [ apply (λU,V. {x | x ∈ U ∨ x ∈ V });
- intros; simplify; apply (.= (e‡#)‡(e‡#)); apply refl1
- | intros;
- split; intros 2; simplify in f ⊢ %;
- [ apply (. (#‡e^-1)‡(#‡e1^-1)); assumption
- | apply (. (#‡e)‡(#‡e1)); assumption]]
-qed.
-
-interpretation "union" 'union U V = (fun21 ??? (union ?) U V).
-
-(* qua non riesco a mettere set *)
-definition singleton: ∀A:setoid. A ⇒_1 Ω^A.
- intros; constructor 1;
- [ apply (λa:A.{b | a =_0 b}); unfold setoid1_of_setoid; simplify;
- intros; simplify;
- split; intro;
- apply (.= e1);
- [ apply e | apply (e^-1) ]
- | unfold setoid1_of_setoid; simplify;
- intros; split; intros 2; simplify in f ⊢ %; apply trans;
- [ apply a |4: apply a'] try assumption; apply sym; assumption]
-qed.
-
-interpretation "singleton" 'singl a = (fun11 ?? (singleton ?) a).
-notation > "{ term 19 a : S }" with precedence 90 for @{fun11 ?? (singleton $S) $a}.
-
-definition big_intersects: ∀A:SET.∀I:SET.(I ⇒_2 Ω^A) ⇒_2 Ω^A.
- intros; constructor 1;
- [ intro; whd; whd in I;
- apply ({x | ∀i:I. x ∈ c i});
- simplify; intros; split; intros; [ apply (. (e^-1‡#)); | apply (. e‡#); ]
- apply f;
- | intros; split; intros 2; simplify in f ⊢ %; intro;
- [ apply (. (#‡(e i)^-1)); apply f;
- | apply (. (#‡e i)); apply f]]
-qed.
-
-definition big_union: ∀A:SET.∀I:SET.(I ⇒_2 Ω^A) ⇒_2 Ω^A.
- intros; constructor 1;
- [ intro; whd; whd in A; whd in I;
- apply ({x | ∃i:I. x ∈ c i });
- simplify; intros; split; intros; cases e1; clear e1; exists; [1,3:apply w]
- [ apply (. (e^-1‡#)); | apply (. (e‡#)); ]
- apply x;
- | intros; split; intros 2; simplify in f ⊢ %; cases f; clear f; exists; [1,3:apply w]
- [ apply (. (#‡(e w)^-1)); apply x;
- | apply (. (#‡e w)); apply x]]
-qed.
-
-notation < "hovbox(mstyle scriptlevel 1 scriptsizemultiplier 1.7 (⋃) \below (\emsp) term 90 p)"
-non associative with precedence 50 for @{ 'bigcup $p }.
-notation < "hovbox(mstyle scriptlevel 1 scriptsizemultiplier 1.7 (⋃) \below (ident i ∈ I) break term 90 p)"
-non associative with precedence 50 for @{ 'bigcup_mk (λ${ident i}:$I.$p) }.
-notation > "hovbox(⋃ f)" non associative with precedence 60 for @{ 'bigcup $f }.
-
-notation < "hovbox(mstyle scriptlevel 1 scriptsizemultiplier 1.7 (⋂) \below (\emsp) term 90 p)"
-non associative with precedence 50 for @{ 'bigcap $p }.
-notation < "hovbox(mstyle scriptlevel 1 scriptsizemultiplier 1.7 (⋂) \below (ident i ∈ I) break term 90 p)"
-non associative with precedence 50 for @{ 'bigcap_mk (λ${ident i}:$I.$p) }.
-notation > "hovbox(⋂ f)" non associative with precedence 60 for @{ 'bigcap $f }.
-
-interpretation "bigcup" 'bigcup f = (fun12 ?? (big_union ??) f).
-interpretation "bigcap" 'bigcap f = (fun12 ?? (big_intersects ??) f).
-interpretation "bigcup mk" 'bigcup_mk f = (fun12 ?? (big_union ??) (mk_unary_morphism2 ?? f ?)).
-interpretation "bigcap mk" 'bigcap_mk f = (fun12 ?? (big_intersects ??) (mk_unary_morphism2 ?? f ?)).
<!-- The following snippet is used by the helm team
note that user's tables are named diffrently from library tables,
- so they can coexists on the same db -->
+ so they can coexists on the same db
<key name="metadata">@DBHOST@ matita helm none library</key>
<key name="metadata">@DBHOST@ matita helm none user</key>
+ -->
+
<!-- The following snippet it what you want to use a local sqlite db
and acess remotely to the coq library trought mowgli
<key name="metadata">@DBHOST@ matita helm none legacy</key>
- <key name="metadata">file://$(matita.rt_base_dir) metadata.db helm helm library</key>
- <key name="metadata">file://$(matita.basedir) user.db helm helm user</key>
-->
+ <key name="metadata">file://$(matita.basedir) user.db helm helm user</key>
<!--
If you have a large amount of metadata, you may be interested in using
(e.g. the Matita standard library)
"legacy" implies "ro"
-->
- <key name="prefix">
- cic:/matita/
- file://$(matita.rt_base_dir)/xml/standard-library/
- ro
- </key>
<key name="prefix">
cic:/matita/
file://$(user.home)/.matita/xml/matita/
</key>
+<!--
<key name="prefix">
cic:/
file://@RT_BASE_DIR@/xml/legacy-library/coq/
http://mowgli.cs.unibo.it/xml/
legacy
</key>
+-->
</section>
</helm_registry>
<?xml version="1.0" encoding="UTF-8"?>
-<language id="grafite" _name="grafite" version="2.0" _section="Sources">
- <metadata>
- <property name="mimetypes">text/x-matita</property>
- <property name="globs">*.ma</property>
- <property name="block-comment-start">(*</property>
- <property name="block-comment-end">*)</property>
- </metadata>
+<language _name="grafite" version="1.0" _section="Sources" mimetypes="text/x-matita">
- <styles>
- <style id="comment" _name="Comment" map-to="def:comment"/>
- <style id="string" _name="String" map-to="def:string"/>
- <style id="escape" _name="Escape" map-to="def:string"/>
- <style id="keyword" _name="Keyword" map-to="def:keyword"/>
- <style id="type" _name="Data Type" map-to="def:type"/>
- <style id="latex" _name="LaTeX Escaped" map-to="def:special-char"/>
- <style id="macros" _name="Macros" map-to="def:keyword"/>
- <style id="tinycals" _name="Tinycals" map-to="def:keyword"/>
- <style id="quantifiers" _name="Quantifiers" map-to="def:type"/>
- </styles>
+ <escape-char>\</escape-char>
- <definitions>
- <define-regex id="char-esc">\\"|[0-9a-zA-Z]</define-regex>
- <context id="escape-seq" style-ref="escape">
- <match>\%{char-esc}</match>
- </context>
- <!-- here's the main context -->
- <context id="grafite">
- <include>
- <context id="comment" style-ref="comment">
- <start>\(\*</start>
- <end>\*\)</end>
- <include>
- <context ref="string"/>
- <context id="comment-in-comment" style-ref="comment">
- <start>\(\*</start>
- <end>\*\)</end>
- <include>
- <context ref="string"/>
- <context ref="comment-in-comment"/>
- <context ref="def:in-comment:*"/>
- </include>
- </context>
- <context ref="def:in-comment:*"/>
- </include>
- </context>
- <context id="string" style-ref="string">
- <start>"</start>
- <end>"</end>
- <include>
- <context ref="escape-seq"/>
- </include>
- </context>
- <context id="character-constant" style-ref="string">
- <match>('\%{char-esc}')|('[^\\']')</match>
- </context>
- <context id="whelp_macros" style-ref="macros">
- <prefix>whelp *</prefix>
- <keyword>elim</keyword>
- <keyword>hint</keyword>
- <keyword>instance</keyword>
- <keyword>locate</keyword>
- <keyword>match</keyword>
- </context>
- <context id="latex" style-ref="latex">
- <prefix>\\</prefix>
- <keyword>def</keyword>
- <keyword>forall</keyword>
- <keyword>lambda</keyword>
- <keyword>to</keyword>
- <keyword>exists</keyword>
- <keyword>Rightarrow</keyword>
- <keyword>Assign</keyword>
- <keyword>land</keyword>
- <keyword>lor</keyword>
- <keyword>lnot</keyword>
- <keyword>liff</keyword>
- <keyword>subst</keyword>
- <keyword>vdash</keyword>
- <keyword>iforall</keyword>
- <keyword>iexists</keyword>
- </context>
- <!-- Flow control & common keywords -->
- <context id="keywords" style-ref="keyword">
- <!-- objects -->
- <keyword>theorem</keyword>
- <keyword>definition</keyword>
- <keyword>lemma</keyword>
- <keyword>fact</keyword>
- <keyword>remark</keyword>
- <keyword>variant</keyword>
- <keyword>axiom</keyword>
+ <block-comment _name = "Commented Code" style = "Comment">
+ <start-regex>\(\*\*[^\)]</start-regex>
+ <end-regex>[^\(]\*\)</end-regex>
+ </block-comment>
- <!-- nobjects -->
- <keyword>ntheorem</keyword>
- <keyword>nrecord</keyword>
- <keyword>ndefinition</keyword>
- <keyword>ninductive</keyword>
- <keyword>ncoinductive</keyword>
- <keyword>nlet</keyword>
- <keyword>nlemma</keyword>
- <keyword>nremark</keyword>
- <keyword>naxiom</keyword>
+ <block-comment _name = "Block Comment" style = "Comment">
+ <start-regex>\(\*</start-regex>
+ <end-regex>\*\)</end-regex>
+ </block-comment>
- <!-- tactics -->
- <keyword>absurd</keyword>
- <keyword>apply</keyword>
- <keyword>applyP</keyword>
- <keyword>assumption</keyword>
- <keyword>autobatch</keyword>
- <keyword>cases</keyword>
- <keyword>clear</keyword>
- <keyword>clearbody</keyword>
- <keyword>change</keyword>
- <keyword>compose</keyword>
- <keyword>constructor</keyword>
- <keyword>contradiction</keyword>
- <keyword>cut</keyword>
- <keyword>decompose</keyword>
- <keyword>destruct</keyword>
- <keyword>elim</keyword>
- <keyword>elimType</keyword>
- <keyword>exact</keyword>
- <keyword>exists</keyword>
- <keyword>fail</keyword>
- <keyword>fold</keyword>
- <keyword>fourier</keyword>
- <keyword>fwd</keyword>
- <keyword>generalize</keyword>
- <keyword>id</keyword>
- <keyword>intro</keyword>
- <keyword>intros</keyword>
- <keyword>inversion</keyword>
- <keyword>lapply</keyword>
- <keyword>linear</keyword>
- <keyword>left</keyword>
- <keyword>letin</keyword>
- <keyword>normalize</keyword>
- <keyword>reflexivity</keyword>
- <keyword>replace</keyword>
- <keyword>rewrite</keyword>
- <keyword>ring</keyword>
- <keyword>right</keyword>
- <keyword>symmetry</keyword>
- <keyword>simplify</keyword>
- <keyword>split</keyword>
- <keyword>to</keyword>
- <keyword>transitivity</keyword>
- <keyword>unfold</keyword>
- <keyword>whd</keyword>
- <keyword>assume</keyword>
- <keyword>suppose</keyword>
- <keyword>by</keyword>
- <keyword>is</keyword>
- <keyword>or</keyword>
- <keyword>equivalent</keyword>
- <keyword>equivalently</keyword>
- <keyword>we</keyword>
- <keyword>prove</keyword>
- <keyword>proved</keyword>
- <keyword>need</keyword>
- <keyword>proceed</keyword>
- <keyword>induction</keyword>
- <keyword>inductive</keyword>
- <keyword>case</keyword>
- <keyword>base</keyword>
- <keyword>let</keyword>
- <keyword>such</keyword>
- <keyword>that</keyword>
- <keyword>by</keyword>
- <keyword>have</keyword>
- <keyword>and</keyword>
- <keyword>the</keyword>
- <keyword>thesis</keyword>
- <keyword>becomes</keyword>
- <keyword>hypothesis</keyword>
- <keyword>know</keyword>
- <keyword>case</keyword>
- <keyword>obtain</keyword>
- <keyword>conclude</keyword>
- <keyword>done</keyword>
- <keyword>rule</keyword>
+ <keyword-list _name = "Theorem Kinds" style = "Keyword" case-sensitive="TRUE">
+ <keyword>theorem</keyword>
+ <keyword>definition</keyword>
+ <keyword>lemma</keyword>
+ <keyword>fact</keyword>
+ <keyword>remark</keyword>
+ <keyword>variant</keyword>
+ <keyword>axiom</keyword>
+ </keyword-list>
- <!-- ntactics -->
- <keyword>napply</keyword>
- <keyword>napplyS</keyword>
- <keyword>ncases</keyword>
- <keyword>nletin</keyword>
- <keyword>nauto</keyword>
- <keyword>nelim</keyword>
- <keyword>nwhd</keyword>
- <keyword>nnormalize</keyword>
- <keyword>nassumption</keyword>
- <keyword>ngeneralize</keyword>
- <keyword>nchange</keyword>
- <keyword>nrewrite</keyword>
- <keyword>ncut</keyword>
- <keyword>ninversion</keyword>
- <keyword>nlapply</keyword>
- <keyword>ndestruct</keyword>
+ <keyword-list _name = "NTheorem Kinds" style = "Keyword" case-sensitive="TRUE">
+ <keyword>ntheorem</keyword>
+ <keyword>nrecord</keyword>
+ <keyword>ndefinition</keyword>
+ <keyword>ninductive</keyword>
+ <keyword>ncoinductive</keyword>
+ <keyword>nlet</keyword>
+ <keyword>nlemma</keyword>
+ <keyword>naxiom</keyword>
+ </keyword-list>
+
+ <keyword-list _name = "Commands" style = "Keyword" case-sensitive="TRUE">
+ <keyword>alias</keyword>
+ <keyword>and</keyword>
+ <keyword>as</keyword>
+ <keyword>coercion</keyword>
+ <keyword>prefer</keyword>
+ <keyword>nocomposites</keyword>
+ <keyword>coinductive</keyword>
+ <keyword>corec</keyword>
+ <keyword>default</keyword>
+ <keyword>for</keyword>
+ <keyword>include</keyword>
+ <keyword>include'</keyword>
+ <keyword>inductive</keyword>
+ <keyword>inverter</keyword>
+ <keyword>in</keyword>
+ <keyword>interpretation</keyword>
+ <keyword>let</keyword>
+ <keyword>match</keyword>
+ <keyword>names</keyword>
+ <keyword>notation</keyword>
+ <keyword>on</keyword>
+ <keyword>qed</keyword>
+ <keyword>rec</keyword>
+ <keyword>record</keyword>
+ <keyword>return</keyword>
+ <keyword>source</keyword>
+ <keyword>to</keyword>
+ <keyword>using</keyword>
+ <keyword>with</keyword>
+ </keyword-list>
- <!-- commands -->
- <keyword>alias</keyword>
- <keyword>and</keyword>
- <keyword>as</keyword>
- <keyword>coercion</keyword>
- <keyword>prefer</keyword>
- <keyword>nocomposites</keyword>
- <keyword>coinductive</keyword>
- <keyword>corec</keyword>
- <keyword>default</keyword>
- <keyword>for</keyword>
- <keyword>include</keyword>
- <keyword>include'</keyword>
- <keyword>inductive</keyword>
- <keyword>inverter</keyword>
- <keyword>in</keyword>
- <keyword>interpretation</keyword>
- <keyword>let</keyword>
- <keyword>match</keyword>
- <keyword>names</keyword>
- <keyword>notation</keyword>
- <keyword>on</keyword>
- <keyword>qed</keyword>
- <keyword>rec</keyword>
- <keyword>record</keyword>
- <keyword>return</keyword>
- <keyword>source</keyword>
- <keyword>to</keyword>
- <keyword>using</keyword>
- <keyword>with</keyword>
-
-
- <!-- ncommands -->
- <keyword>unification</keyword>
- <keyword>hint</keyword>
- <keyword>ncoercion</keyword>
- <keyword>ninverter</keyword>
- <keyword>nqed</keyword>
+ <keyword-list _name = "NCommands" style = "Keyword" case-sensitive="TRUE">
+ <keyword>unification</keyword>
+ <keyword>hint</keyword>
+ <keyword>ncoercion</keyword>
+ <keyword>ninverter</keyword>
+ <keyword>nqed</keyword>
+ </keyword-list>
- <!-- macros -->
- <keyword>inline</keyword>
- <keyword>procedural</keyword>
- <keyword>check</keyword>
- <keyword>eval</keyword>
- <keyword>hint</keyword>
- <keyword>set</keyword>
- <keyword>auto</keyword>
- <keyword>nodefaults</keyword>
- <keyword>coercions</keyword>
- <keyword>comments</keyword>
- <keyword>debug</keyword>
- <keyword>cr</keyword>
-
- <!-- nmacros -->
- <keyword>ncheck</keyword>
-
- <!-- tinycals -->
- <keyword>try</keyword>
- <keyword>solve</keyword>
- <keyword>do</keyword>
- <keyword>repeat</keyword>
- <keyword>first</keyword>
- <keyword>focus</keyword>
- <keyword>unfocus</keyword>
- <keyword>progress</keyword>
- <keyword>skip</keyword>
- </context>
- <context id="types" style-ref="type">
- <!-- sorts -->
- <keyword>Set</keyword>
- <keyword>Prop</keyword>
- <keyword>Type</keyword>
- <keyword>CProp</keyword>
+ <pattern-item _name = "Command [" style = "Keyword">
+ <regex>\[</regex>
+ </pattern-item>
+ <pattern-item _name = "Command |" style = "Keyword">
+ <regex>\|</regex>
+ </pattern-item>
+ <pattern-item _name = "Command ]" style = "Keyword">
+ <regex>\]</regex>
+ </pattern-item>
+ <pattern-item _name = "Command {" style = "Keyword">
+ <regex>\{</regex>
+ </pattern-item>
+ <pattern-item _name = "Command }" style = "Keyword">
+ <regex>\}</regex>
+ </pattern-item>
+ <pattern-item _name = "Notation ast mark" style = "Keyword">
+ <regex>@</regex>
+ </pattern-item>
+ <pattern-item _name = "Notation meta mark" style = "Keyword">
+ <regex>\$</regex>
+ </pattern-item>
- <!-- nsorts -->
- <keyword>Prop</keyword>
- <keyword>Type[0]</keyword>
- <keyword>CProp[0]</keyword>
- <keyword>Type[1]</keyword>
- <keyword>CProp[1]</keyword>
- <keyword>Type[2]</keyword>
- <keyword>CProp[2]</keyword>
- </context>
- <context id="quantifiers" style-ref="quantifiers">
- <!-- quantifiers -->
- <match>∀|∃|λ|=|→|⇒|…|≝|≡|\?</match>
- </context>
- <context id="tinycals" style-ref="tinycals">
- <match>\[|\||\]|\{|\}|@|\$|#|\\\\|;|\.|:>|:</match>
- </context>
- </include>
- </context>
- </definitions>
+ <keyword-list _name = "Sorts" style = "Data Type" case-sensitive="TRUE">
+ <keyword>Set</keyword>
+ <keyword>Prop</keyword>
+ <keyword>Type</keyword>
+ <keyword>CProp</keyword>
+ </keyword-list>
+
+ <keyword-list _name = "NSorts" style = "Data Type" case-sensitive="TRUE">
+ <keyword>Prop</keyword>
+ <keyword>Type[0]</keyword>
+ <keyword>CProp[0]</keyword>
+ <keyword>Type[1]</keyword>
+ <keyword>CProp[1]</keyword>
+ <keyword>Type[2]</keyword>
+ <keyword>CProp[2]</keyword>
+ </keyword-list>
+
+ <keyword-list _name = "Tactics" style = "Others 2" case-sensitive="TRUE">
+ <keyword>absurd</keyword>
+ <keyword>apply</keyword>
+ <keyword>applyP</keyword>
+ <keyword>assumption</keyword>
+ <keyword>autobatch</keyword>
+ <keyword>cases</keyword>
+ <keyword>clear</keyword>
+ <keyword>clearbody</keyword>
+ <keyword>change</keyword>
+ <keyword>compose</keyword>
+ <keyword>constructor</keyword>
+ <keyword>contradiction</keyword>
+ <keyword>cut</keyword>
+ <keyword>decompose</keyword>
+ <keyword>destruct</keyword>
+ <keyword>elim</keyword>
+ <keyword>elimType</keyword>
+ <keyword>exact</keyword>
+ <keyword>exists</keyword>
+ <keyword>fail</keyword>
+ <keyword>fold</keyword>
+ <keyword>fourier</keyword>
+ <keyword>fwd</keyword>
+ <keyword>generalize</keyword>
+ <keyword>id</keyword>
+ <keyword>intro</keyword>
+ <keyword>intros</keyword>
+ <keyword>inversion</keyword>
+ <keyword>lapply</keyword>
+ <keyword>linear</keyword>
+ <keyword>left</keyword>
+ <keyword>letin</keyword>
+ <keyword>normalize</keyword>
+ <keyword>reflexivity</keyword>
+ <keyword>replace</keyword>
+ <keyword>rewrite</keyword>
+ <keyword>ring</keyword>
+ <keyword>right</keyword>
+ <keyword>symmetry</keyword>
+ <keyword>simplify</keyword>
+ <keyword>split</keyword>
+ <keyword>to</keyword>
+ <keyword>transitivity</keyword>
+ <keyword>unfold</keyword>
+ <keyword>whd</keyword>
+ <keyword>assume</keyword>
+ <keyword>suppose</keyword>
+ <keyword>by</keyword>
+ <keyword>is</keyword>
+ <keyword>or</keyword>
+ <keyword>equivalent</keyword>
+ <keyword>equivalently</keyword>
+ <keyword>we</keyword>
+ <keyword>prove</keyword>
+ <keyword>proved</keyword>
+ <keyword>need</keyword>
+ <keyword>proceed</keyword>
+ <keyword>induction</keyword>
+ <keyword>inductive</keyword>
+ <keyword>case</keyword>
+ <keyword>base</keyword>
+ <keyword>let</keyword>
+ <keyword>such</keyword>
+ <keyword>that</keyword>
+ <keyword>by</keyword>
+ <keyword>have</keyword>
+ <keyword>and</keyword>
+ <keyword>the</keyword>
+ <keyword>thesis</keyword>
+ <keyword>becomes</keyword>
+ <keyword>hypothesis</keyword>
+ <keyword>know</keyword>
+ <keyword>case</keyword>
+ <keyword>obtain</keyword>
+ <keyword>conclude</keyword>
+ <keyword>done</keyword>
+ <keyword>rule</keyword>
+</keyword-list>
+
+<keyword-list _name = "NTactics" style = "Others 2" case-sensitive="TRUE">
+ <keyword>napply</keyword>
+ <keyword>ncases</keyword>
+ <keyword>nletin</keyword>
+ <keyword>nauto</keyword>
+ <keyword>nelim</keyword>
+ <keyword>nwhd</keyword>
+ <keyword>nnormalize</keyword>
+ <keyword>nassumption</keyword>
+ <keyword>ngeneralize</keyword>
+ <keyword>nchange</keyword>
+ <keyword>nrewrite</keyword>
+ <keyword>ncut</keyword>
+ <keyword>nlapply</keyword>
+ <keyword>ndestruct</keyword>
+</keyword-list>
+
+ <keyword-list _name = "Tacticals" style = "Keyword" case-sensitive="TRUE">
+ <keyword>try</keyword>
+ <keyword>solve</keyword>
+ <keyword>do</keyword>
+ <keyword>repeat</keyword>
+ <keyword>first</keyword>
+ <keyword>focus</keyword>
+ <keyword>unfocus</keyword>
+ <keyword>progress</keyword>
+ <keyword>skip</keyword>
+ </keyword-list>
+
+
+ <keyword-list _name = "Matita Macro" style = "Others 3" case-sensitive="TRUE">
+ <keyword>inline</keyword>
+ <keyword>procedural</keyword>
+ <keyword>check</keyword>
+ <keyword>eval</keyword>
+ <keyword>hint</keyword>
+ <keyword>set</keyword>
+ <keyword>auto</keyword>
+ <keyword>nodefaults</keyword>
+ <keyword>coercions</keyword>
+ <keyword>comments</keyword>
+ <keyword>debug</keyword>
+ <keyword>cr</keyword>
+ </keyword-list>
+
+ <keyword-list _name = "NMacro" style = "Others 3" case-sensitive="TRUE">
+ <keyword>ncheck</keyword>
+ </keyword-list>
+
+ <keyword-list _name = "Whelp Macro" style = "Others 3"
+ case-sensitive="TRUE"
+ beginning-regex="whelp *"
+ match-empty-string-at-beginning="FALSE"
+ match-empty-string-at-end="FALSE" >
+ <keyword>elim</keyword>
+ <keyword>hint</keyword>
+ <keyword>instance</keyword>
+ <keyword>locate</keyword>
+ <keyword>match</keyword>
+ </keyword-list>
+
+ <keyword-list _name = "TeX Macro" style = "Preprocessor"
+ case-sensitive="TRUE"
+ beginning-regex="\\"
+ match-empty-string-at-beginning="FALSE"
+ match-empty-string-at-end="FALSE" >
+ <keyword>def</keyword>
+ <keyword>forall</keyword>
+ <keyword>lambda</keyword>
+ <keyword>to</keyword>
+ <keyword>exists</keyword>
+ <keyword>Rightarrow</keyword>
+ <keyword>Assign</keyword>
+ <keyword>land</keyword>
+ <keyword>lor</keyword>
+ <keyword>lnot</keyword>
+ <keyword>liff</keyword>
+ <keyword>subst</keyword>
+ <keyword>vdash</keyword>
+ <keyword>iforall</keyword>
+ <keyword>iexists</keyword>
+ </keyword-list>
+
+ <string _name = "String" style = "String" >
+ <start-regex>"</start-regex>
+ <end-regex>"</end-regex>
+ </string>
+
</language>
let _ =
let source_language_manager =
GSourceView2.source_language_manager ~default:true in
- source_language_manager#set_search_path
- (BuildTimeConf.runtime_base_dir ::
- source_language_manager#search_path);
+ source_language_manager#set_search_path[BuildTimeConf.runtime_base_dir];
match source_language_manager#language "grafite" with
| None ->
HLog.warn(sprintf "can't load a language file for \"grafite\" in %s"
(* focus *)
self#sourceView#misc#grab_focus ();
(* main win dimension *)
- let width = Gdk.Screen.width ~screen:(Gdk.Screen.default ()) () in
- let height = Gdk.Screen.height ~screen:(Gdk.Screen.default ()) () in
- (* hack for xinerama, no proper support of monitors from lablgtk *)
- let width = if width > 1600 then width / 2 else width in
- let height = if height > 1200 then height / 2 else height in
+ let width = Gdk.Screen.width () in
+ let height = Gdk.Screen.height () in
let main_w = width * 90 / 100 in
let main_h = height * 80 / 100 in
let script_w = main_w * 6 / 10 in
let inplaceof, symb = Virtuals.symbol_of_virtual last_word in
self#reset_similarsymbols;
let s = Glib.Utf8.from_unichar symb in
+ let iter = source_buffer#get_iter_at_mark `INSERT in
assert(Glib.Utf8.validate s);
source_buffer#delete ~start:iter
~stop:(iter#copy#backward_chars
(MatitaGtkMisc.utf8_string_length inplaceof + len));
- source_buffer#insert ~iter
+ source_buffer#insert ~iter:(source_buffer#get_iter_at_mark `INSERT)
(if inplaceof.[0] = '\\' then s else (s ^ tok));
true
with Virtuals.Not_a_virtual -> false
if not (already_configured [ Db ] init_status) then
begin
if not (Helm_registry.get_bool "matita.system") then
- MetadataTypes.ownerize_tables (Helm_registry.get "matita.owner");
+ ((* SQL does not allow dots in table names. Let's replace them
+ with underscore and let's quote underscores by doubling them *)
+ let owner = Helm_registry.get "matita.owner" in
+ let owner = Str.global_replace (Str.regexp "_") "__" owner in
+ let owner = Str.global_replace (Str.regexp "\\.") "_" owner in
+ if Str.string_match (Str.regexp "^[a-zA-Z][a-zA-Z0-9_]*$") owner 0 then
+ MetadataTypes.ownerize_tables owner
+ else (
+ prerr_endline ("Error: the matita.owner configuration variable must contain only latin characters, digits and underscores. If the default configuration is used, the variable is set to the USER environment variable and can be changed prepending the USER=any_valid_name to the matita command.");
+ exit (-1)
+ )
+ );
LibraryDb.create_owner_environment ();
Db::init_status
end
let dir_RE = Pcre.regexp "^cic:((/([^/]+/)*[^/]+(/)?)|/|)$" in
let metadata_RE = Pcre.regexp "^metadata:/(deps)/(forward|backward)/(.*)$" in
let whelp_query_RE = Pcre.regexp
- "^\\s*whelp\\s+([^\\s]+)\\s+(.*)$"
+ "^\\s*whelp\\s+([^\\s]+)\\s+(\"|\\()(.*)(\\)|\")$"
in
let is_metadata txt = Pcre.pmatch ~rex:metadata_RE txt in
let is_whelp txt = Pcre.pmatch ~rex:whelp_RE txt in
| `NRef nref -> self#_loadNReference nref
| `Univs uri -> self#_loadUnivs uri
| `Whelp (query, results) ->
+ set_whelp_query query;
self#_loadList (List.map (fun r -> "obj",
UriManager.string_of_uri r) results));
self#setEntry entry
in
guistuff.mathviewer#show_entry (`NCic (t,ctx,m,s));
[status, parsed_text], "", parsed_text_length
- | TA.NIntroGuess _loc ->
- let names_ref = ref [] in
- let s =
- NTactics.intros_tac ~names_ref [] script#grafite_status
- in
- let rex = Pcre.regexp ~flags:[`MULTILINE] "\\A([\\n\\t\\r ]*).*\\Z" in
- let nl = Pcre.replace ~rex ~templ:"$1" parsed_text in
- [s, nl ^ "#" ^ String.concat " " !names_ref ^ ";"], "", parsed_text_length
- | TA.NAutoInteractive (_loc, (None,a)) ->
- let trace_ref = ref [] in
- let s =
- NnAuto.auto_tac
- ~params:(None,a) ~trace_ref script#grafite_status
- in
- let depth =
- try List.assoc "depth" a
- with Not_found -> ""
- in
- let trace = "/"^(if int_of_string depth > 1 then depth else "")^"/ by " in
- let thms =
- match !trace_ref with
- | [] -> "{}"
- | thms ->
- String.concat ", "
- (HExtlib.filter_map (function
- | CicNotationPt.NRef r -> Some (NCicPp.r2s true r)
- | _ -> None)
- thms)
- in
- let rex = Pcre.regexp ~flags:[`MULTILINE] "\\A([\\n\\t\\r ]*).*\\Z" in
- let nl = Pcre.replace ~rex ~templ:"$1" parsed_text in
- [s, nl ^ trace ^ thms ^ ";"], "", parsed_text_length
- | TA.NAutoInteractive (_, (Some _,_)) -> assert false
let rec eval_macro include_paths (buffer : GText.buffer) guistuff grafite_status user_goal unparsed_text parsed_text script mac =
let module MQ = MetadataQuery in
(* no idea why ocaml wants this *)
let parsed_text_length = String.length parsed_text in
let dbd = LibraryDb.instance () in
- let pp_macro = ApplyTransformation.txt_of_macro ~map_unicode_to_tex:false in
+ let pp_macro = ApplyTransformation.txt_of_macro ~map_unicode_to_tex:true in
match mac with
(* WHELP's stuff *)
| TA.WMatch (loc, term) ->
in
let ty,_ =
CicTypeChecker.type_of_aux'
- [] [] proof_term CicUniv.empty_ugraph
+ menv [] proof_term CicUniv.empty_ugraph
in
- prerr_endline (CicPp.ppterm proof_term ^ " n lambda= " ^ string_of_int how_many_lambdas);
+ prerr_endline (CicPp.ppterm proof_term);
(* use declarative output *)
let obj =
(* il proof_term vive in cc, devo metterci i lambda no? *)
- (Cic.CurrentProof ("xxx",[],proof_term,ty,[],[]))
+ (Cic.CurrentProof ("xxx",menv,proof_term,ty,[],[]))
in
ApplyTransformation.txt_of_cic_object
~map_unicode_to_tex:(Helm_registry.get_bool
() =
let buffer = source_view#buffer in
let source_buffer = source_view#source_buffer in
-let initial_statuses current baseuri =
- let empty_lstatus = new LexiconEngine.status in
- (match current with
- Some current ->
- LexiconSync.time_travel ~present:current ~past:empty_lstatus;
- GrafiteSync.time_travel ~present:current ();
- (* CSC: there is a known bug in invalidation; temporary fix here *)
- NCicEnvironment.invalidate ()
- | None -> ());
+let initial_statuses baseuri =
let lexicon_status =
- CicNotation2.load_notation ~include_paths:[] empty_lstatus
+ CicNotation2.load_notation ~include_paths:[] (new LexiconEngine.status)
BuildTimeConf.core_notation_script
in
let grafite_status = GrafiteSync.init lexicon_status baseuri in
val mutable statements = [] (** executed statements *)
- val mutable history = [ initial_statuses None default_buri ]
+ val mutable history = [ initial_statuses default_buri ]
(** list of states before having executed statements. Head element of this
* list is the current state, last element is the state at the beginning of
* the script.
match history with s::_ -> s | [] -> assert false
in
LexiconSync.time_travel ~present:cur_grafite_status ~past:grafite_status;
- GrafiteSync.time_travel ~present:cur_grafite_status ~past:grafite_status ();
+ GrafiteSync.time_travel ~present:cur_grafite_status ~past:grafite_status;
statements <- new_statements;
history <- new_history;
self#moveMark (- offset)
| Some f -> Some (Librarian.absolutize f)
| None -> None
in
+ self#goto_top;
filename_ <- file;
include_paths_ <-
(match file with Some file -> read_include_paths file | None -> []);
HLog.debug ("backup " ^ f ^ " saved")
end
+ method private goto_top =
+ let grafite_status =
+ let rec last x = function
+ | [] -> x
+ | hd::tl -> last hd tl
+ in
+ last (self#grafite_status) history
+ in
+ (* FIXME: this is not correct since there is no undo for
+ * library_objects.set_default... *)
+ GrafiteSync.time_travel ~present:self#grafite_status ~past:grafite_status;
+ LexiconSync.time_travel ~present:self#grafite_status ~past:grafite_status
+
method private reset_buffer =
statements <- [];
- history <- [ initial_statuses (Some self#grafite_status) self#buri_of_current_file ];
+ history <- [ initial_statuses self#buri_of_current_file ];
userGoal <- None;
self#notify;
buffer#remove_tag locked_tag ~start:buffer#start_iter ~stop:buffer#end_iter;
match pos with
| `Top ->
dispose_old_locked_mark ();
+ self#goto_top;
self#reset_buffer;
self#notify
| `Bottom ->
LexiconSync.time_travel
~present:cur_grafite_status ~past:grafite_status;
GrafiteSync.time_travel
- ~present:cur_grafite_status ~past:grafite_status ();
+ ~present:cur_grafite_status ~past:grafite_status;
interactive_loop (Some n)
| `Do command ->
let str = Ulexing.from_utf8_string command in
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-include "PTS/subst.ma".
-
-(*************************** substl *****************************)
-
-nlet rec substl (G:list T) (N:T) : list T ≝
- match G with
- [ nil ⇒ nil T
- | cons A D ⇒ ((subst A (length T D) N)::(substl D N))
- ].
-
-(*
-nlemma substl_cons: ∀A,N.∀G.
-substl (A::G) N = (subst_aux A (length T G) N)::(substl G N).
-//; nqed.
-*)
-
-(*
-nlemma length_cons: ∀A.∀G. length T (A::G) = length T G + 1.
-/2/; nqed.*)
-
-(****************************************************************)
-
-naxiom A: nat → nat → Prop.
-naxiom R: nat → nat → nat → Prop.
-naxiom conv: T → T → Prop.
-
-ninductive TJ: list T → T → T → Prop ≝
- | ax : ∀i,j. A i j → TJ (nil T) (Sort i) (Sort j)
- | start: ∀G.∀A.∀i.TJ G A (Sort i) → TJ (A::G) (Rel 0) (lift A 0 1)
- | weak: ∀G.∀A,B,C.∀i.
- TJ G A B → TJ G C (Sort i) → TJ (C::G) (lift A 0 1) (lift B 0 1)
- | prod: ∀G.∀A,B.∀i,j,k. R i j k →
- TJ G A (Sort i) → TJ (A::G) B (Sort j) → TJ G (Prod A B) (Sort k)
- | app: ∀G.∀F,A,B,a.
- TJ G F (Prod A B) → TJ G a A → TJ G (App F a) (subst B 0 a)
- | abs: ∀G.∀A,B,b.∀i.
- TJ (A::G) b B → TJ G (Prod A B) (Sort i) → TJ G (Lambda A b) (Prod A B)
- | conv: ∀G.∀A,B,C.∀i. conv B C →
- TJ G A B → TJ G B (Sort i) → TJ G A C.
-
-notation "hvbox(G break ⊢ A : B)" non associative with precedence 50 for @{'TJ $G $A $B}.
-interpretation "type judgement" 'TJ G A B = (TJ G A B).
-
-(* ninverter TJ_inv2 for TJ (%?%) : Prop. *)
-
-(**** definitions ****)
-
-ninductive Glegal (G: list T) : Prop ≝
-glegalk : ∀A,B. G ⊢ A : B → Glegal G.
-
-ninductive Gterm (G: list T) (A:T) : Prop ≝
- | is_term: ∀B.G ⊢ A:B → Gterm G A
- | is_type: ∀B.G ⊢ B:A → Gterm G A.
-
-ninductive Gtype (G: list T) (A:T) : Prop ≝
-gtypek: ∀i.G ⊢ A : Sort i → Gtype G A.
-
-ninductive Gelement (G:list T) (A:T) : Prop ≝
-gelementk: ∀B.G ⊢ A:B → Gtype G B → Gelement G A.
-
-ninductive Tlegal (A:T) : Prop ≝
-tlegalk: ∀G. Gterm G A → Tlegal A.
-
-(*
-ndefinition Glegal ≝ λG: list T.∃A,B:T.TJ G A B .
-
-ndefinition Gterm ≝ λG: list T.λA.∃B.TJ G A B ∨ TJ G B A.
-
-ndefinition Gtype ≝ λG: list T.λA.∃i.TJ G A (Sort i).
-
-ndefinition Gelement ≝ λG: list T.λA.∃B.TJ G A B ∨ Gtype G B.
-
-ndefinition Tlegal ≝ λA:T.∃G: list T.Gterm G A.
-*)
-
-(*
-ntheorem free_var1: ∀G.∀A,B,C. TJ G A B →
-subst C A
-#G; #i; #j; #axij; #Gleg; ncases Gleg;
-#A; #B; #tjAB; nelim tjAB; /2/; (* bello *) nqed.
-*)
-
-ntheorem start_lemma1: ∀G.∀i,j.
-A i j → Glegal G → G ⊢ Sort i: Sort j.
-#G; #i; #j; #axij; #Gleg; ncases Gleg;
-#A; #B; #tjAB; nelim tjAB; /2/;
-(* bello *) nqed.
-
-ntheorem start_rel: ∀G.∀A.∀C.∀n,i,q.
-G ⊢ C: Sort q → G ⊢ Rel n: lift A 0 i → (C::G) ⊢ Rel (S n): lift A 0 (S i).
-#G; #A; #C; #n; #i; #p; #tjC; #tjn;
- napplyS (weak G (Rel n));//. (* bello *)
- (*
- nrewrite > (plus_n_O i);
- nrewrite > (plus_n_Sm i O);
- nrewrite < (lift_lift A 1 i);
- nrewrite > (plus_n_O n); nrewrite > (plus_n_Sm n O);
- applyS (weak G (Rel n) (lift A i) C p tjn tjC). *)
-nqed.
-
-ntheorem start_lemma2: ∀G.
-Glegal G → ∀n. n < |G| → G ⊢ Rel n: lift (nth n T G (Rel O)) 0 (S n).
-#G; #Gleg; ncases Gleg; #A; #B; #tjAB; nelim tjAB; /2/;
- ##[#i; #j; #axij; #p; nnormalize; #abs; napply False_ind;
- napply (absurd … abs); //;
- ##|#G; #A; #i; #tjA; #Hind; #m; ncases m; /2/;
- #p; #Hle; napply start_rel; //; napply Hind;
- napply le_S_S_to_le; napply Hle;
- ##|#G; #A; #B; #C; #i; #tjAB; #tjC; #Hind1; #_; #m; ncases m;
- /2/; #p; #Hle; napply start_rel; //;
- napply Hind1; napply le_S_S_to_le; napply Hle;
- ##]
-nqed.
-
-(*
-nlet rec TJm G D on D : Prop ≝
- match D with
- [ nil ⇒ True
- | cons A D1 ⇒ TJ G (Rel 0) A ∧ TJm G D1
- ].
-
-nlemma tjm1: ∀G,D.∀A. TJm G (A::D) → TJ G (Rel 0) A.
-#G; #D; #A; *; //; nqed.
-
-ntheorem transitivity_tj: ∀D.∀A,B. TJ D A B →
- ∀G. Glegal G → TJm G D → TJ G A B.
-#D; #A; #B; #tjAB; nelim tjAB;
- ##[/2/;
- ##|/2/;
- ##|#E; #T; #T0; #T1; #n; #tjT; #tjT1; #H; #H1; #G; #HlegG;
- #tjGcons;
- napply weak;
-*)
-(*
-ntheorem substitution_tj:
-∀G.∀A,B,N,M.TJ (A::G) M B → TJ G N A →
- TJ G (subst N M) (subst N B).
-#G;#A;#B;#N;#M;#tjM;
- napply (TJ_inv2 (A::G) M B);
- ##[nnormalize; /3/;
- ##|#G; #A; #N; #tjA; #Hind; #Heq;
- ndestruct;//;
- ##|#G; #A; #B; #C; #n; #tjA; #tjC; #Hind1; #Hind2; #Heq;
- ndestruct;//;
- ##|nnormalize; #E; #A; #B; #i; #j; #k;
- #Ax; #tjA; #tjB; #Hind1; #_;
- #Heq; #HeqB; #tjN; napply (prod ?????? Ax);
- ##[/2/;
- ##|nnormalize; napplyS weak;
-
-*)
-
-ntheorem substitution_tj:
-∀E.∀A,B,M. E ⊢M:B → ∀G,D.∀N. E = D@A::G → G ⊢ N:A →
- ((substl D N)@G) ⊢ M[|D| ← N]: B[|D| ← N].
-#E; #A; #B; #M; #tjMB; nelim tjMB;
- ##[nnormalize; #i; #j; #k; #G; #D; #N; ncases D;
- ##[nnormalize; #isnil; ndestruct;
- ##|#P; #L; nnormalize; #isnil; ndestruct;
- ##]
- ##|#G; #A1; #i; #tjA; #Hind; #G1; #D; ncases D;
- ##[#N; #Heq; #tjN;
- nrewrite > (delift (lift N O O) A1 O O O ??); //;
- nnormalize in Heq; ndestruct;/2/;
- ##|#H; #L; #N1; #Heq; nnormalize in Heq;
- #tjN1; nnormalize; ndestruct;
- napplyS start; /2/;
- ##]
- ##|#G; #P; #Q; #R; #i; #tjP; #tjR; #Hind1; #Hind2;
- #G1; #D; #N; ncases D; nnormalize;
- ##[#Heq; ndestruct; #tjN; //;
- ##|#H; #L; #Heq;
- #tjN1; ndestruct;
- (* napplyS weak non va *)
- ncut (S (length T L) = (length T L)+0+1); ##[//##] #Heq;
- napplyS weak; /2/;
- ##]
- ##|#G; #P; #Q; #i; #j; #k; #Ax; #tjP; #tjQ; #Hind1; #Hind2;
- #G1; #D; #N; #Heq; #tjN; nnormalize;
- napply (prod … Ax);
- ##[/2/;
- ##|ncut (S (length T D) = (length T D)+1); ##[//##] #Heq1;
- nrewrite < Heq1;
- napply (Hind2 ? (P::D));nnormalize;//;
- ##]
- ##|#G; #P; #Q; #R; #S; #tjP; #tjS; #Hind1; #Hind2;
- #G1; #D; #N; #Heq; #tjN; nnormalize in Hind1 ⊢ %;
- nrewrite > (plus_n_O (length ? D)) in ⊢ (? ? ? (? ? % ?));
- nrewrite > (subst_lemma R S N ? 0);
- napplyS app; /2/;
- ##|#G; #P; #Q; #R; #i; #tjR; #tjProd; #Hind1; #Hind2;
- #G1; #D; #N; #Heq; #tjN; nnormalize;
- napplyS abs;
- ##[nnormalize in Hind2; /2/;
- ##|(* napplyS (Hind1 G1 (P::D) N ? tjN); sistemare *)
- ngeneralize in match (Hind1 G1 (P::D) N ? tjN);
- ##[#H; nnormalize in H; napplyS H;##|nnormalize; //##]
- ##|##]
- ##|
-
-
-
-
-
-
-
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-include "basics/list2.ma".
-
-ninductive T : Type ≝
- | Sort: nat → T
- | Rel: nat → T
- | App: T → T → T
- | Lambda: T → T → T (* type, body *)
- | Prod: T → T → T (* type, body *)
-.
-
-nlet rec lift t k p ≝
- match t with
- [ Sort n ⇒ Sort n
- | Rel n ⇒ if_then_else T (leb (S n) k) (Rel n) (Rel (n+p))
- | App m n ⇒ App (lift m k p) (lift n k p)
- | Lambda m n ⇒ Lambda (lift m k p) (lift n (k+1) p)
- | Prod m n ⇒ Prod (lift m k p) (lift n (k+1) p)
- ].
-
-(*
-ndefinition lift ≝ λt.λp.lift_aux t 0 p.*)
-
-notation "↑ \sup n ( M )" non associative with precedence 70 for @{'Lift O $M}.
-notation "↑ \sub k \sup n ( M )" non associative with precedence 70 for @{'Lift $n $k $M}.
-
-(* interpretation "Lift" 'Lift n M = (lift M n). *)
-interpretation "Lift" 'Lift n k M = (lift M k n).
-
-nlet rec subst t k a ≝
- match t with
- [ Sort n ⇒ Sort n
- | Rel n ⇒ if_then_else T (leb (S n) k) (Rel n)
- (if_then_else T (eqb n k) (lift a 0 n) (Rel (n-1)))
- | App m n ⇒ App (subst m k a) (subst n k a)
- | Lambda m n ⇒ Lambda (subst m k a) (subst n (k+1) a)
- | Prod m n ⇒ Prod (subst m k a) (subst n (k+1) a)
- ].
-
-(* meglio non definire
-ndefinition subst ≝ λa.λt.subst_aux t 0 a.
-notation "M [ N ]" non associative with precedence 90 for @{'Subst $N $M}.
-*)
-
-notation "M [ k ← N]" non associative with precedence 90 for @{'Subst $M $k $N}.
-
-(* interpretation "Subst" 'Subst N M = (subst N M). *)
-interpretation "Subst" 'Subst M k N = (subst M k N).
-
-(*** properties of lift and subst ***)
-
-nlemma lift_0: ∀t:T.∀k. lift t k 0 = t.
-#t; nelim t; nnormalize; //; #n; #k; ncases (leb (S n) k);
-nnormalize;//;nqed.
-
-(* nlemma lift_0: ∀t:T. lift t 0 = t.
-#t; nelim t; nnormalize; //; nqed. *)
-
-nlemma lift_sort: ∀i,k,n. lift (Sort i) k n = Sort i.
-//; nqed.
-
-nlemma lift_rel: ∀i,n. lift (Rel i) 0 n = Rel (i+n).
-//; nqed.
-
-nlemma lift_rel1: ∀i.lift (Rel i) 0 1 = Rel (S i).
-#i; nchange with (lift (Rel i) 0 1 = Rel (1 + i)); //; nqed.
-
-nlemma lift_lift: ∀t.∀i,j.j ≤ i → ∀h,k.
- lift (lift t k i) (j+k) h = lift t k (i+h).
-#t; #i; #j; #h; nelim t; nnormalize; //; #n; #h;#k;
-napply (leb_elim (S n) k); #Hnk;nnormalize;
- ##[nrewrite > (le_to_leb_true (S n) (j+k) ?);nnormalize;/2/;
- ##|nrewrite > (lt_to_leb_false (S n+i) (j+k) ?);
- nnormalize;//;napply le_S_S; nrewrite > (symmetric_plus j k);
- napply le_plus;//;napply not_lt_to_le;/2/;
- ##]
-nqed.
-
-nlemma lift_lift1: ∀t.∀i,j,k.
- lift(lift t k j) k i = lift t k (j+i).
-#t;/3/; nqed.
-
-nlemma lift_lift2: ∀t.∀i,j,k.
- lift (lift t k j) (j+k) i = lift t k (j+i).
-#t; /2/; nqed.
-
-(*
-nlemma lift_lift: ∀t.∀i,j. lift (lift t j) i = lift t (j+i).
-nnormalize; //; nqed. *)
-
-nlemma subst_lift_k: ∀A,B.∀k. subst (lift B k 1) k A = B.
-#A; #B; nelim B; nnormalize; /2/; #n; #k;
-napply (leb_elim (S n) k); nnormalize; #Hnk;
- ##[nrewrite > (le_to_leb_true ?? Hnk);nnormalize;//;
- ##|nrewrite > (lt_to_leb_false (S (n + 1)) k ?); nnormalize;
- ##[nrewrite > (not_eq_to_eqb_false (n+1) k ?);
- nnormalize;/2/
- ##|napply le_S; napplyS (not_le_to_lt (S n) k Hnk);
- ##]
- ##]
-nqed.
-
-(*
-nlemma subst_lift: ∀A,B. subst A (lift B 1) = B.
-nnormalize; //; nqed. *)
-
-nlemma subst_sort: ∀A.∀n,k. subst (Sort n) k A = Sort n.
-//; nqed.
-
-nlemma subst_rel: ∀A.subst (Rel 0) 0 A = A.
-nnormalize; //; nqed.
-
-nlemma subst_rel1: ∀A.∀k,i. i < k →
- subst (Rel i) k A = Rel i.
-#A; #k; #i; nnormalize; #ltik;
-nrewrite > (le_to_leb_true (S i) k ?); //; nqed.
-
-nlemma subst_rel2: ∀A.∀k.
- subst (Rel k) k A = lift A 0 k.
-#A; #k; nnormalize;
-nrewrite > (lt_to_leb_false (S k) k ?); //;
-nrewrite > (eq_to_eqb_true … (refl …)); //;
-nqed.
-
-nlemma subst_rel3: ∀A.∀k,i. k < i →
- subst (Rel i) k A = Rel (i-1).
-#A; #k; #i; nnormalize; #ltik;
-nrewrite > (lt_to_leb_false (S i) k ?); /2/;
-nrewrite > (not_eq_to_eqb_false i k ?); //;
-napply nmk; #eqik; nelim (lt_to_not_eq … (ltik …)); /2/;
-nqed.
-
-nlemma lift_subst_ijk: ∀A,B.∀i,j,k.
- lift (subst B (j+k) A) k i = subst (lift B k i) (j+k+i) A.
-#A; #B; #i; #j; nelim B; nnormalize; /2/; #n; #k;
-napply (leb_elim (S n) (j + k)); nnormalize; #Hnjk;
- ##[nelim (leb (S n) k);
- ##[nrewrite > (subst_rel1 A (j+k+i) n ?);/2/;
- ##|nrewrite > (subst_rel1 A (j+k+i) (n+i) ?);/2/;
- ##]
- ##|napply (eqb_elim n (j+k)); nnormalize; #Heqnjk;
- ##[nrewrite > (lt_to_leb_false (S n) k ?);
- ##[ncut (j+k+i = n+i);##[//;##] #Heq;
- nrewrite > Heq; nrewrite > (subst_rel2 A ?);
- nnormalize; napplyS lift_lift;//;
- ##|/2/;
- ##]
- ##|ncut (j + k < n);
- ##[napply not_eq_to_le_to_lt;
- ##[/2/;##|napply le_S_S_to_le;napply not_le_to_lt;/2/;##]
- ##|#ltjkn;
- ncut (O < n); ##[/2/; ##] #posn;
- ncut (k ≤ n); ##[/2/; ##] #lekn;
- nrewrite > (lt_to_leb_false (S (n-1)) k ?); nnormalize;
- ##[nrewrite > (lt_to_leb_false … (le_S_S … lekn));
- nrewrite > (subst_rel3 A (j+k+i) (n+i) ?);
- ##[/3/; ##|/2/; ##]
- ##|napply le_S_S;/3/; (* /3/;*)
- ##]
- ##]
- ##]
-nqed.
-
-ntheorem delift : ∀A,B.∀i,j,k. i ≤ j → j ≤ i + k →
- subst (lift B i (S k)) j A = (lift B i k).
-#A; #B; nelim B; nnormalize; /2/;
- ##[##2,3,4: #T; #T0; #Hind1; #Hind2; #i; #j; #k; #leij; #lejk;
- napply eq_f2; /2/; napply Hind2;
- napplyS (monotonic_le_plus_l 1);//
- ##|#n; #i; #j; #k; #leij; #ltjk;
- napply (leb_elim (S n) i); nnormalize; #len;
- ##[nrewrite > (le_to_leb_true (S n) j ?);/2/;
- ##|nrewrite > (lt_to_leb_false (S (n+S k)) j ?);
- ##[nnormalize;
- nrewrite > (not_eq_to_eqb_false (n+S k) j ?);
- nnormalize; /2/; napply (not_to_not …len);
- #H; napply (le_plus_to_le_r k); (* why napplyS ltjk; *)
- nnormalize; //;
- ##|napply le_S_S; napply (transitive_le … ltjk);
- napply le_plus;//; napply not_lt_to_le; /2/;
- ##]
- ##]
-nqed.
-
-(********************* substitution lemma ***********************)
-
-nlemma subst_lemma: ∀A,B,C.∀k,i.
- subst (subst A i B) (k+i) C =
- subst (subst A (S (k+i)) C) i (subst B k C).
-#A; #B; #C; #k; nelim A; nnormalize;//; (* WOW *)
-#n; #i; napply (leb_elim (S n) i); #Hle;
- ##[ncut (n < k+i); ##[/2/##] #ltn; (* lento *)
- ncut (n ≤ k+i); ##[/2/##] #len;
- nrewrite > (subst_rel1 C (k+i) n ltn);
- nrewrite > (le_to_leb_true n (k+i) len);
- nrewrite > (subst_rel1 … Hle);//;
- ##|napply (eqb_elim n i); #eqni;
- ##[nrewrite > eqni;
- nrewrite > (le_to_leb_true i (k+i) ?); //;
- nrewrite > (subst_rel2 …); nnormalize;
- napply sym_eq;
- napplyS (lift_subst_ijk C B i k O);
- ##|napply (leb_elim (S (n-1)) (k+i)); #nk;
- ##[nrewrite > (subst_rel1 C (k+i) (n-1) nk);
- nrewrite > (le_to_leb_true n (k+i) ?);
- ##[nrewrite > (subst_rel3 ? i n ?);//;
- napply not_eq_to_le_to_lt;
- ##[/2/;
- ##|napply not_lt_to_le;/2/;
- ##]
- ##|napply (transitive_le … nk);//;
- ##]
- ##|ncut (i < n);
- ##[napply not_eq_to_le_to_lt; ##[/2/]
- napply (not_lt_to_le … Hle);##]
- #ltin; ncut (O < n); ##[/2/;##] #posn;
- napply (eqb_elim (n-1) (k+i)); #H
- ##[nrewrite > H; nrewrite > (subst_rel2 C (k+i));
- nrewrite > (lt_to_leb_false n (k+i) ?);
- ##[nrewrite > (eq_to_eqb_true n (S(k+i)) ?);
- ##[nnormalize;
- ##|nrewrite < H; napplyS plus_minus_m_m;//;
- ##]
- ##|nrewrite < H; napply (lt_O_n_elim … posn);
- #m; nnormalize;//;
- ##]
- ##|ncut (k+i < n-1);
- ##[napply not_eq_to_le_to_lt;
- ##[napply symmetric_not_eq; napply H;
- ##|napply (not_lt_to_le … nk);
- ##]
- ##]
- #Hlt; nrewrite > (lt_to_leb_false n (k+i) ?);
- ##[nrewrite > (not_eq_to_eqb_false n (S(k+i)) ?);
- ##[nrewrite > (subst_rel3 C (k+i) (n-1) Hlt);
- nrewrite > (subst_rel3 ? i (n-1) ?);//;
- napply (le_to_lt_to_lt … Hlt);//;
- ##|napply (not_to_not … H); #Hn; nrewrite > Hn; nnormalize;//;
- ##]
- ##|napply (transitive_lt … Hlt);
- napply (lt_O_n_elim … posn);
- #m; nnormalize;//;
- ##]
- ##]
- nrewrite <H;
- ncut (∃m:nat. S m = n);
- ##[napply (lt_O_n_elim … posn); #m;@ m;//;
- ##|*; #m; #Hm; nrewrite < Hm;
- nrewrite > (delift ???????);nnormalize;/2/;
- ##]
-nqed.
-
-
-
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-include "Plogic/equality.ma".
-
-ninductive True: Prop ≝
-I : True.
-
-default "true" cic:/matita/basics/connectives/True.ind.
-
-ninductive False: Prop ≝ .
-
-default "false" cic:/matita/basics/connectives/False.ind.
-
-(*
-ndefinition Not: Prop → Prop ≝
-λA. A → False. *)
-
-ninductive Not (A:Prop): Prop ≝
-nmk: (A → False) → Not A.
-
-interpretation "logical not" 'not x = (Not x).
-
-ntheorem absurd : ∀ A:Prop. A → ¬A → False.
-#A; #H; #Hn; nelim Hn;/2/; nqed.
-
-(*
-ntheorem absurd : ∀ A,C:Prop. A → ¬A → C.
-#A; #C; #H; #Hn; nelim (Hn H).
-nqed. *)
-
-ntheorem not_to_not : ∀A,B:Prop. (A → B) → ¬B →¬A.
-/4/; nqed.
-
-ninductive And (A,B:Prop) : Prop ≝
- conj : A → B → And A B.
-
-interpretation "logical and" 'and x y = (And x y).
-
-ntheorem proj1: ∀A,B:Prop. A ∧ B → A.
-#A; #B; #AB; nelim AB; //.
-nqed.
-
-ntheorem proj2: ∀ A,B:Prop. A ∧ B → B.
-#A; #B; #AB; nelim AB; //.
-nqed.
-
-ninductive Or (A,B:Prop) : Prop ≝
- or_introl : A → (Or A B)
- | or_intror : B → (Or A B).
-
-interpretation "logical or" 'or x y = (Or x y).
-
-ndefinition decidable : Prop → Prop ≝
-λ A:Prop. A ∨ ¬ A.
-
-ninductive ex (A:Type[0]) (P:A → Prop) : Prop ≝
- ex_intro: ∀ x:A. P x → ex A P.
-
-interpretation "exists" 'exists x = (ex ? x).
-
-ninductive ex2 (A:Type[0]) (P,Q:A \to Prop) : Prop ≝
- ex_intro2: ∀ x:A. P x → Q x → ex2 A P Q.
-
-ndefinition iff :=
- λ A,B. (A → B) ∧ (B → A).
-
-interpretation "iff" 'iff a b = (iff a b).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-include "logic/pts.ma".
-
-ninductive eq (A:Type[2]) (x:A) : A → Prop ≝
- refl: eq A x x.
-
-interpretation "leibnitz's equality" 'eq t x y = (eq t x y).
-
-nlemma eq_rect_r:
- ∀A.∀a,x.∀p:eq ? x a.∀P: ∀x:A. eq ? x a → Type. P a (refl A a) → P x p.
- #A; #a; #x; #p; ncases p; #P; #H; nassumption.
-nqed.
-
-nlemma eq_ind_r :
- ∀A.∀a.∀P: ∀x:A. x = a → Prop. P a (refl A a) → ∀x.∀p:eq ? x a.P x p.
- #A; #a; #P; #p; #x0; #p0; napply (eq_rect_r ? ? ? p0); nassumption.
-nqed.
-
-nlemma eq_rect_Type2_r :
- ∀A:Type.∀a.∀P: ∀x:A. eq ? x a → Type[2]. P a (refl A a) → ∀x.∀p:eq ? x a.P x p.
- #A;#a;#P;#H;#x;#p;ngeneralize in match H;ngeneralize in match P;
- ncases p;//;
-nqed.
-
-(*
-nlemma eq_ind_r :
- ∀A.∀a.∀P: ∀x:A. x = a → Prop. P a (refl_eq A a) → ∀x.∀p:eq ? x a.P x p.
- #A; #a; #P; #p; #x0; #p0; ngeneralize in match p;
-ncases p0; #Heq; nassumption.
-nqed.
-*)
-
-ntheorem rewrite_l: ∀A:Type[2].∀x.∀P:A → Prop. P x → ∀y. x = y → P y.
-#A; #x; #P; #Hx; #y; #Heq;ncases Heq;nassumption.
-nqed.
-
-ntheorem sym_eq: ∀A:Type[2].∀x,y:A. x = y → y = x.
-#A; #x; #y; #Heq; napply (rewrite_l A x (λz.z=x));
-##[ @; ##| nassumption; ##]
-nqed.
-
-ntheorem rewrite_r: ∀A:Type[2].∀x.∀P:A → Prop. P x → ∀y. y = x → P y.
-#A; #x; #P; #Hx; #y; #Heq;ncases (sym_eq ? ? ?Heq);nassumption.
-nqed.
-
-ntheorem eq_coerc: ∀A,B:Type[1].A→(A=B)→B.
-#A; #B; #Ha; #Heq;nelim Heq; nassumption.
-nqed.
-
-ndefinition R0 ≝ λT:Type[0].λt:T.t.
-
-ndefinition R1 ≝ eq_rect_Type0.
-
-ndefinition R2 :
- ∀T0:Type[0].
- ∀a0:T0.
- ∀T1:∀x0:T0. a0=x0 → Type[0].
- ∀a1:T1 a0 (refl ? a0).
- ∀T2:∀x0:T0. ∀p0:a0=x0. ∀x1:T1 x0 p0. R1 ?? T1 a1 ? p0 = x1 → Type[0].
- ∀a2:T2 a0 (refl ? a0) a1 (refl ? a1).
- ∀b0:T0.
- ∀e0:a0 = b0.
- ∀b1: T1 b0 e0.
- ∀e1:R1 ?? T1 a1 ? e0 = b1.
- T2 b0 e0 b1 e1.
-#T0;#a0;#T1;#a1;#T2;#a2;#b0;#e0;#b1;#e1;
-napply (eq_rect_Type0 ????? e1);
-napply (R1 ?? ? ?? e0);
-napply a2;
-nqed.
-
-ndefinition R3 :
- ∀T0:Type[0].
- ∀a0:T0.
- ∀T1:∀x0:T0. a0=x0 → Type[0].
- ∀a1:T1 a0 (refl ? a0).
- ∀T2:∀x0:T0. ∀p0:a0=x0. ∀x1:T1 x0 p0. R1 ?? T1 a1 ? p0 = x1 → Type[0].
- ∀a2:T2 a0 (refl ? a0) a1 (refl ? a1).
- ∀T3:∀x0:T0. ∀p0:a0=x0. ∀x1:T1 x0 p0.∀p1:R1 ?? T1 a1 ? p0 = x1.
- ∀x2:T2 x0 p0 x1 p1.R2 ???? T2 a2 x0 p0 ? p1 = x2 → Type[0].
- ∀a3:T3 a0 (refl ? a0) a1 (refl ? a1) a2 (refl ? a2).
- ∀b0:T0.
- ∀e0:a0 = b0.
- ∀b1: T1 b0 e0.
- ∀e1:R1 ?? T1 a1 ? e0 = b1.
- ∀b2: T2 b0 e0 b1 e1.
- ∀e2:R2 ???? T2 a2 b0 e0 ? e1 = b2.
- T3 b0 e0 b1 e1 b2 e2.
-#T0;#a0;#T1;#a1;#T2;#a2;#T3;#a3;#b0;#e0;#b1;#e1;#b2;#e2;
-napply (eq_rect_Type0 ????? e2);
-napply (R2 ?? ? ???? e0 ? e1);
-napply a3;
-nqed.
-
-ndefinition R4 :
- ∀T0:Type[0].
- ∀a0:T0.
- ∀T1:∀x0:T0. eq T0 a0 x0 → Type[0].
- ∀a1:T1 a0 (refl T0 a0).
- ∀T2:∀x0:T0. ∀p0:eq (T0 …) a0 x0. ∀x1:T1 x0 p0.eq (T1 …) (R1 T0 a0 T1 a1 x0 p0) x1 → Type[0].
- ∀a2:T2 a0 (refl T0 a0) a1 (refl (T1 a0 (refl T0 a0)) a1).
- ∀T3:∀x0:T0. ∀p0:eq (T0 …) a0 x0. ∀x1:T1 x0 p0.∀p1:eq (T1 …) (R1 T0 a0 T1 a1 x0 p0) x1.
- ∀x2:T2 x0 p0 x1 p1.eq (T2 …) (R2 T0 a0 T1 a1 T2 a2 x0 p0 x1 p1) x2 → Type[0].
- ∀a3:T3 a0 (refl T0 a0) a1 (refl (T1 a0 (refl T0 a0)) a1)
- a2 (refl (T2 a0 (refl T0 a0) a1 (refl (T1 a0 (refl T0 a0)) a1)) a2).
- ∀T4:∀x0:T0. ∀p0:eq (T0 …) a0 x0. ∀x1:T1 x0 p0.∀p1:eq (T1 …) (R1 T0 a0 T1 a1 x0 p0) x1.
- ∀x2:T2 x0 p0 x1 p1.∀p2:eq (T2 …) (R2 T0 a0 T1 a1 T2 a2 x0 p0 x1 p1) x2.
- ∀x3:T3 x0 p0 x1 p1 x2 p2.∀p3:eq (T3 …) (R3 T0 a0 T1 a1 T2 a2 T3 a3 x0 p0 x1 p1 x2 p2) x3.
- Type[0].
- ∀a4:T4 a0 (refl T0 a0) a1 (refl (T1 a0 (refl T0 a0)) a1)
- a2 (refl (T2 a0 (refl T0 a0) a1 (refl (T1 a0 (refl T0 a0)) a1)) a2)
- a3 (refl (T3 a0 (refl T0 a0) a1 (refl (T1 a0 (refl T0 a0)) a1)
- a2 (refl (T2 a0 (refl T0 a0) a1 (refl (T1 a0 (refl T0 a0)) a1)) a2))
- a3).
- ∀b0:T0.
- ∀e0:eq (T0 …) a0 b0.
- ∀b1: T1 b0 e0.
- ∀e1:eq (T1 …) (R1 T0 a0 T1 a1 b0 e0) b1.
- ∀b2: T2 b0 e0 b1 e1.
- ∀e2:eq (T2 …) (R2 T0 a0 T1 a1 T2 a2 b0 e0 b1 e1) b2.
- ∀b3: T3 b0 e0 b1 e1 b2 e2.
- ∀e3:eq (T3 …) (R3 T0 a0 T1 a1 T2 a2 T3 a3 b0 e0 b1 e1 b2 e2) b3.
- T4 b0 e0 b1 e1 b2 e2 b3 e3.
-#T0;#a0;#T1;#a1;#T2;#a2;#T3;#a3;#T4;#a4;#b0;#e0;#b1;#e1;#b2;#e2;#b3;#e3;
-napply (eq_rect_Type0 ????? e3);
-napply (R3 ????????? e0 ? e1 ? e2);
-napply a4;
-nqed.
-
-naxiom streicherK : ∀T:Type[2].∀t:T.∀P:t = t → Type[2].P (refl ? t) → ∀p.P p.
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "Plogic/equality.ma".
-
-(* experimental: JMeq support *)
-
-ninductive jmeq (A:Type[2]) (a:A) : ∀B:Type[2].B → Prop ≝
-| refl_jmeq : jmeq A a A a.
-
-naxiom jmeq_to_eq : ∀A:Type[2].∀a,b:A.jmeq A a A b → a = b.
-
-ncoercion jmeq_to_eq : ∀A:Type[2].∀a,b:A.∀p:jmeq A a A b.a = b ≝
- jmeq_to_eq on _p: jmeq ???? to eq ???.
-
-notation > "hvbox(a break ≃ b)"
- non associative with precedence 45
-for @{ 'jmeq ? $a ? $b }.
-
-notation < "hvbox(term 46 a break maction (≃) (≃\sub(t,u)) term 46 b)"
- non associative with precedence 45
-for @{ 'jmeq $t $a $u $b }.
-
-interpretation "john major's equality" 'jmeq t x u y = (jmeq t x u y).
-
-naxiom streicherKjmeq : ∀T:Type[2].∀t:T.∀P:t ≃ t → Type[2].P (refl_jmeq ? t) → ∀p.P p.
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "Plogic/jmeq.ma".
-include "logic/connectives.ma".
-include "datatypes/sums.ma".
-
-include "Plogic/connectives.ma".
-
-(* experimental: Russell support *)
-
-alias id "False" = "cic:/matita/ng/Plogic/connectives/False.ind(1,0,0)".
-
-ndefinition P_to_P_option : ∀A:Type[0].∀P:A → CProp[0].option A → CProp[0] ≝
- λA,P,a.match a with [ None ⇒ False | Some y ⇒ P y ].
-
-ndefinition subset : ∀A:Type[0].(A → CProp[0]) → Type[0] ≝
- λA,P.Σx.P_to_P_option A P x.
-
-notation < "hvbox({ ident i : s | term 19 p })" with precedence 90
-for @{ 'subset_spec $s (\lambda ${ident i} : $nonexistent . $p)}.
-
-notation > "hvbox({ ident i : s | term 19 p })" with precedence 90
-for @{ 'subset_spec $s (\lambda ${ident i}. $p)}.
-
-(*
- * the advantage is that we can use None to mean that some branch of the
- * function we are defining will never be reached
- * for all other purposes, they are the same as sigma types
- *
- * TODO: add on-the-fly rewriting for dependent types
- *)
-interpretation "russell-style subset specification" 'subset_spec s p = (subset s p).
-
-ndefinition inject : ∀A.∀P:A → CProp[0].∀a.∀p:P_to_P_option ? P a.{ x : A | P x } ≝
- λA.λP:A → CProp[0].λa:option A.λp:P_to_P_option ? P a.
- sig_intro (option A) (P_to_P_option A P) a p.
-ndefinition eject : ∀A.∀P: A → CProp[0].{ x : A | P x } → A ≝
- λA,P,c.match c with [ sig_intro w p ⇒ ?].
-ngeneralize in match p;ncases w;nnormalize
-##[*
-##|#x;#_;napply x ##]
-nqed.
-
-ncoercion inject :
- ∀A.∀P:A → CProp[0].∀a.∀p:P_to_P_option ? P a.subset ? (λx.P x) ≝ inject
- on a:option ? to subset ? ?.
-ncoercion eject : ∀A.∀P:A → CProp[0].∀c:subset ? P.A ≝ eject
- on _c:subset ? ? to ?.
-
-(*
-(* tests...*)
-
-include "datatypes/list.ma".
-
-ndefinition head : ∀l.l ≠ [] → { x : nat | ∃l2.l = x::l2 } ≝
- λl,p.match l with
- [ nil ⇒ None ?
- | cons x tl ⇒ Some ? x ].nnormalize;
-##[ncases p;/3/
-##|/2/
-##]
-nqed.
-
-ninductive vec : nat → Type[0] ≝
-| vnil : vec O
-| vcons : ∀n:nat.nat → vec n → vec (S n).
-
-ndefinition vtail :
- ∀n.∀v:vec (S n). { w : vec (pred (S n)) | ∃m:nat.v ≃ vcons ? m w } ≝
-λn,v.match v with
- [ vnil ⇒ None (vec (pred O))
- | vcons p hd tl ⇒ Some (vec (pred (S p))) tl ].
-nnormalize;ndestruct;/2/;
-nqed.*)
\ No newline at end of file
+++ /dev/null
-(*
-universe constraint Type[0] < Type[1].
-
-ndefinition o ≝ Prop.
-naxiom i : Type[0].
-
-ninductive And (A,B:Prop) : Prop ≝ conj : A → B → And A B.
-ninductive Exists (A : Type[0]) (P : A → Prop) : Prop ≝ exin : ∀a:A.P a → Exists A P.
-ninductive Or (A,B:Prop) : Prop ≝ orl : A → Or A B | orr : B → Or A B.
-ninductive True : Prop ≝ I : True.
-ninductive False : Prop ≝ .
-ninductive Not (A : Prop) : Prop ≝ abs : (A → False) → Not A.
-
-ninductive Eq (a:i) : i → Prop ≝ refl : Eq a a.
-ndefinition eq1 ≝ λT:Type[0].λp1,p2 : T → Prop. ∀x:T.And (p1 x → p2 x) (p2 x → p1 x).
-
-interpretation "eq" 'eq T A B = (Eq A B).
-interpretation "exteq1" 'eq T A B = (eq1 T A B).
-
-notation > "'Eq' term 90 A term 90 B"
-non associative with precedence 40 for @{'eq ? $A $B}.
-
-interpretation "TPTP and" 'and A B = (And A B).
-interpretation "TPTP not" 'not B = (Not B).
-interpretation "TPTP ex" 'exists f = (Exists ? f).
-*)
-include "basics/eq.ma".
-
-ndefinition o ≝ Prop.
-naxiom i : Type[0].
-
-interpretation "myeq" 'myeq T A B = (eq T A B).
-
-notation > "'Eq' term 90 A term 90 B"
-non associative with precedence 40 for @{'myeq ? $A $B}.
-
-naxiom bool_ext : ∀P,Q: o. (P → Q) → (Q → P) → P = Q.
-naxiom f_ext_1 : ∀a,b:Type[0].∀f,g: a → b. (∀x.f x = g x) → f = g.
nqed.
nlemma eq_ind_r_CProp0 : ∀A:Type[1].∀a:A.∀P:A → CProp[0].P a → ∀b:A.b = a → P b.
-#A; #a; #P; #p; #b; #E; ncases E in p; //;
+#A; #a; #P; #p; #b; #E; ncases E in p; nauto;
nqed.
nlemma csc :
nrecord magma_type : Type[1] ≝
{ mtcarr:> setoid;
- op: unary_morphism mtcarr (unary_morph_setoid mtcarr mtcarr)
+ op: binary_morphism mtcarr mtcarr mtcarr
}.
nrecord magma (A: magma_type) : Type[1] ≝
nrecord magma_morphism (A) (B) (Ma: magma A) (Mb: magma B) : Type[0] ≝
{ mmmcarr:> magma_morphism_type A B;
- mmclosed: ∀x:A. x ∈ mcarr ? Ma → (fun1 ?? mmmcarr x) ∈ mcarr ? Mb
- }. (* XXX bug nelle coercions, fun1 non inserita *)
+ mmclosed: ∀x:A. x ∈ mcarr ? Ma → mmmcarr x ∈ mcarr ? Mb
+ }.
(*
ndefinition mm_image:
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "arithmetics/nat.ma".
-
-naxiom Q: Type[0].
-naxiom nat_to_Q: nat → Q.
-ncoercion nat_to_Q : ∀x:nat.Q ≝ nat_to_Q on _x:nat to Q.
-ndefinition bool_to_nat ≝ λb. match b with [ true ⇒ 1 | false ⇒ 0 ].
-ncoercion bool_to_nat : ∀b:bool.nat ≝ bool_to_nat on _b:bool to nat.
-naxiom Qplus: Q → Q → Q.
-naxiom Qminus: Q → Q → Q.
-naxiom Qtimes: Q → Q → Q.
-naxiom Qdivides: Q → Q → Q.
-naxiom Qle : Q → Q → Prop.
-naxiom Qlt: Q → Q → Prop.
-naxiom Qmin: Q → Q → Q.
-naxiom Qmax: Q → Q → Q.
-interpretation "Q plus" 'plus x y = (Qplus x y).
-interpretation "Q minus" 'minus x y = (Qminus x y).
-interpretation "Q times" 'times x y = (Qtimes x y).
-interpretation "Q divides" 'divide x y = (Qdivides x y).
-interpretation "Q le" 'leq x y = (Qle x y).
-interpretation "Q lt" 'lt x y = (Qlt x y).
-naxiom Qtimes_plus: ∀n,m:nat.∀q:Q. (n * q + m * q) = (plus n m) * q.
-naxiom Qmult_one: ∀q:Q. 1 * q = q.
-naxiom Qdivides_mult: ∀q1,q2. (q1 * q2) / q1 = q2.
-naxiom Qtimes_distr: ∀q1,q2,q3:Q.(q3 * q1 + q3 * q2) = q3 * (q1 + q2).
-naxiom Qdivides_distr: ∀q1,q2,q3:Q.(q1 / q3 + q2 / q3) = (q1 + q2) / q3.
-naxiom Qplus_comm: ∀q1,q2. q1 + q2 = q2 + q1.
-naxiom Qplus_assoc: ∀q1,q2,q3. q1 + q2 + q3 = q1 + (q2 + q3).
-ntheorem Qplus_assoc1: ∀q1,q2,q3. q1 + q2 + q3 = q3 + q2 + q1.
-#a; #b; #c; //; nqed.
-naxiom Qle_refl: ∀q1. q1≤q1.
-naxiom Qle_trans: ∀x,y,z. x≤y → y≤z → x≤z.
-naxiom Qlt_trans: ∀x,y,z. x < y → y < z → x < z.
-naxiom Qle_lt_trans1: ∀x,y,z. x ≤ y → y < z → x < z.
-naxiom Qle_lt_trans2: ∀x,y,z. x < y → y ≤ z → x < z.
-naxiom Qle_plus_compat: ∀x,y,z,t. x≤y → z≤t → x+z ≤ y+t.
-naxiom Qmult_zero: ∀q:Q. 0 * q = 0.
-
-naxiom phi: Q. (* the golden number *)
-naxiom golden: phi = phi * phi + phi * phi * phi.
-
-(* naxiom Ndivides_mult: ∀n:nat.∀q. (n * q) / n = q. *)
-
-ntheorem lem1: ∀n:nat.∀q:Q. (n * q + q) = (S n) * q.
-#n; #q; ncut (plus n 1 = S n);##[//##]
-//; nqed.
-
-ntheorem Qplus_zero: ∀q:Q. 0 + q = q. //. nqed.
-
-ncoinductive locate : Q → Q → Prop ≝
- L: ∀l,u. locate l ((1 - phi) * l + phi * u) → locate l u
- | H: ∀l,u. locate (phi * l + (1 - phi) * u) u → locate l u.
-
-ndefinition locate_inv_ind':
- ∀l,u:Q.∀P:Q → Q → Prop.
- ∀H1: locate l ((1 - phi) * l + phi * u) → P l u.
- ∀H2: locate (phi * l + (1 - phi) * u) u → P l u.
- locate l u → P l u.
- #l; #u; #P; #H1; #H2; #p; ninversion p; #l; #u; #H; #E1; #E2;
- ndestruct; /2/.
-nqed.
-
-ndefinition R ≝ ∃l,u:Q. locate l u.
-
-(*
-nlet corec Q_to_locate q : locate q q ≝ L q q … (Q_to_locate q).
- //; nrewrite < (Qdivides_mult 3 q) in ⊢ (? % ?); //.
-nqed.
-
-ndefinition Q_to_R : Q → R.
- #q; @ q; @q; //.
-nqed.
-*)
-
-nlemma help_auto1: ∀q:Q. false * q = 0. #q; nnormalize; //. nqed.
-
-(*
-nlet corec locate_add (l,u:?) (r1,r2: locate l u) (c1,c2:bool) :
- locate (l + l + c1 * phi + c2 * phi * phi) (u + u + c1 * phi + c2 * phi * phi) ≝ ?.
- napply (locate_inv_ind' … r1); napply (locate_inv_ind' … r2);
- #r2'; #r1'; ncases c1; ncases c2
- [ ##4: nnormalize; @1;
- nlapply (locate_add … r1' r2' false false); nnormalize;
- nrewrite > (Qmult_zero …); nrewrite > (Qmult_zero …); #K; nauto demod;
- #K;
- nnormalize in K; nrewrite > (Qmult_zero …) in K; nnormalize; #K;
- napplyS K;
-
-
-
-
- [ ##1,4: ##[ @1 ? (l1'+l2') (u1'+u2') | @2 ? (l1'+l2') (u1'+u2') ]
- ##[ ##1,5: /2/ | napplyS (Qle_plus_compat …leq1u leq2u) |
- ##4: napplyS (Qle_plus_compat …leq1l leq2l)
- |##*: /2/ ]
- ##| ninversion r2; #l2''; #u2''; #leq2l'; #leq2u'; #r2';
- ninversion r1; #l1''; #u1''; #leq1l'; #leq1u'; #r1';
- ##[ @1 ? (l1''+l2'') (u1''+u2'');
- ##[ napply Qle_plus_compat; /3/;
- ##| ##3: /2/;
- ##| napplyS (Qle_plus_compat …leq1u' leq2u');
-
-(*
-nlet corec locate_add (l1,u1:?) (r1: locate l1 u1) (l2,u2:?) (r2: locate l2 u2) :
- locate (l1 + l2) (u1 + u2) ≝ ?.
- napply (locate_inv_ind' … r1); napply (locate_inv_ind' … r2); #l2'; #u2'; #leq2l; #leq2u; #r2;
- #l1'; #u1'; #leq1l; #leq1u; #r1
- [ ##1,4: ##[ @1 ? (l1'+l2') (u1'+u2') | @2 ? (l1'+l2') (u1'+u2') ]
- ##[ ##1,5: /2/ | napplyS (Qle_plus_compat …leq1u leq2u) |
- ##4: napplyS (Qle_plus_compat …leq1l leq2l)
- |##*: /2/ ]
- ##| ninversion r2; #l2''; #u2''; #leq2l'; #leq2u'; #r2';
- ninversion r1; #l1''; #u1''; #leq1l'; #leq1u'; #r1';
- ##[ @1 ? (l1''+l2'') (u1''+u2'');
- ##[ napply Qle_plus_compat; /3/;
- ##| ##3: /2/;
- ##| napplyS (Qle_plus_compat …leq1u' leq2u');
- .
-
-nlet corec apart (l1,u1) (r1: locate l1 u1) (l2,u2) (r2: locate l2 u2) : CProp[0] ≝
- match disjoint l1 u1 l2 u2 with
- [ true ⇒ True
- | false ⇒
-*)
-*)
-
-include "topology/igft.ma".
-include "datatypes/pairs.ma".
-include "datatypes/sums.ma".
-
-nrecord pre_order (A: Type[0]) : Type[1] ≝
- { pre_r :2> A → A → CProp[0];
- pre_refl: reflexive … pre_r;
- pre_trans: transitive … pre_r
- }.
-
-nrecord Ax_pro : Type[1] ≝
- { AAx :> Ax;
- Aleq: pre_order AAx
- }.
-
-interpretation "Ax_pro leq" 'leq x y = (pre_r ? (Aleq ?) x y).
-
-(*CSC: per auto per sotto, ma non sembra aiutare *)
-nlemma And_elim1: ∀A,B. A ∧ B → A.
- #A; #B; *; //.
-nqed.
-
-nlemma And_elim2: ∀A,B. A ∧ B → B.
- #A; #B; *; //.
-nqed.
-(*CSC: /fine per auto per sotto *)
-
-ndefinition Rax : Ax_pro.
- @
- [ @ (Q × Q)
- [ #p; napply (unit + sigma … (λc. fst … p < fst … c ∧ fst … c < snd … c ∧ snd … c < snd … p))
- | #c; *
- [ #_; napply {c' | fst … c < fst … c' ∧ snd … c' < snd … c}
- | *; #c'; #_; napply {d' | fst … d' = fst … c ∧ snd … d' = fst … c'
- ∨ fst … d' = snd … c' ∧ snd … d' = snd … c } ]##]
-##| @ (λc,d. fst … d ≤ fst … c ∧ snd … c ≤ snd … d)
- [ /2/
- | nnormalize; #z; #x; #y; *; #H1; #H2; *; /3/; (*CSC: perche' non va? *) ##]
-nqed.
-
-ndefinition downarrow: ∀S:Ax_pro. Ω \sup S → Ω \sup S ≝
- λS:Ax_pro.λU:Ω ^S.{a | ∃b:S. b ∈ U ∧ a ≤ b}.
-
-interpretation "downarrow" 'downarrow a = (downarrow ? a).
-
-ndefinition fintersects: ∀S:Ax_pro. Ω \sup S → Ω \sup S → Ω \sup S ≝
- λS.λU,V. ↓U ∩ ↓V.
-
-interpretation "fintersects" 'fintersects U V = (fintersects ? U V).
-
-ndefinition singleton ≝ λA.λa:A.{b | b=a}.
-
-interpretation "singleton" 'singl a = (singleton ? a).
-
-ninductive ftcover (A : Ax_pro) (U : Ω^A) : A → CProp[0] ≝
-| ftreflexivity : ∀a. a ∈ U → ftcover A U a
-| ftleqinfinity : ∀a,b. a ≤ b → ∀i. (∀x. x ∈ 𝐂 b i ↓ (singleton … a) → ftcover A U x) → ftcover A U a
-| ftleqleft : ∀a,b. a ≤ b → ftcover A U b → ftcover A U a.
-
-interpretation "ftcovers" 'covers a U = (ftcover ? U a).
-
-ntheorem ftinfinity: ∀A: Ax_pro. ∀U: Ω^A. ∀a. ∀i. (∀x. x ∈ 𝐂 a i → x ◃ U) → a ◃ U.
- #A; #U; #a; #i; #H;
- napply (ftleqinfinity … a … i); //;
- #b; *; *; #b; *; #H1; #H2; #H3; napply (ftleqleft … b); //;
- napply H; napply H1 (*CSC: auto non va! *).
-nqed.
-
-ncoinductive ftfish (A : Ax_pro) (F : Ω^A) : A → CProp[0] ≝
-| ftfish : ∀a.
- a ∈ F →
- (∀b. a ≤ b → ftfish A F b) →
- (∀b. a ≤ b → ∀i:𝐈 b. ∃x. x ∈ 𝐂 b i ↓ (singleton … a) ∧ ftfish A F x) →
- ftfish A F a.
-
-interpretation "fish" 'fish a U = (ftfish ? U a).
-
-nlemma ftcoreflexivity: ∀A: Ax_pro.∀F.∀a:A. a ⋉ F → a ∈ F.
- #A; #F; #a; #H; ncases H; //.
-nqed.
-
-nlemma ftcoleqinfinity:
- ∀A: Ax_pro.∀F.∀a:A. a ⋉ F →
- ∀b. (a ≤ b → ∀i. (∃x. x ∈ 𝐂 b i ↓ (singleton … a) ∧ x ⋉ F)).
- #A; #F; #a; #H; ncases H; /2/.
-nqed.
-
-nlemma ftcoleqleft:
- ∀A: Ax_pro.∀F.∀a:A. a ⋉ F →
- (∀b. a ≤ b → b ⋉ F).
- #A; #F; #a; #H; ncases H; /2/.
-nqed.
-
-(* XXX: disambiguation crazy *)
-alias id "I" = "cic:/matita/ng/topology/igft/I.fix(0,0,2)".
-nlet corec ftfish_coind
- (A: Ax_pro) (F: Ω^A) (P: A → CProp[0])
- (Hcorefl: ∀a:A. P a → a ∈ F)
- (Hcoleqleft: ∀a:A. P a → ∀b:A. pre_r ? (Aleq A) a (*≤*) b → P b)
- (Hcoleqinfinity: ∀a:A. P a → ∀b:A. pre_r ? (Aleq A) a (*≤*) b → ∀i:I A b. ∃x:A. x ∈ C A b i ↓ {(a)} ∧ P x)
-: ∀a:A. P a → a ⋉ F ≝ ?.
- #a; #H; @
- [ /2/
- | #b; #H; napply (ftfish_coind ??? Hcorefl Hcoleqleft Hcoleqinfinity); /2/
- | #b; #H1; #i; ncases (Hcoleqinfinity a H ? H1 i); #x; *; #H2; #H3;
- @ x; @; //; napply (ftfish_coind ??? Hcorefl Hcoleqleft Hcoleqinfinity); //]
-nqed.
-
-(*CSC: non serve manco questo (vedi sotto)
-nlemma auto_hint3: ∀A. S__o__AAx A = S (AAx A).
- #A; //.
-nqed.*)
-
-alias symbol "I" (instance 6) = "I".
-ntheorem ftcoinfinity: ∀A: Ax_pro. ∀F: Ω^A. ∀a. a ⋉ F → (∀i: 𝐈 a. ∃b. b ∈ 𝐂 a i ∧ b ⋉ F).
- #A; #F; #a; #H; #i; nlapply (ftcoleqinfinity … F … a … i); //; #H;
- ncases H; #c; *; *; *; #b; *; #H1; #H2; #H3; #H4; @ b; @ [ napply H1 (*CSC: auto non va *)]
- napply (ftcoleqleft … c); //.
-nqed.
-
-nrecord Pt (A: Ax_pro) : Type[1] ≝
- { pt_set: Ω^A;
- pt_inhabited: ∃a. a ∈ pt_set;
- pt_filtering: ∀a,b. a ∈ pt_set → b ∈ pt_set → ∃c. c ∈ (singleton … a) ↓ (singleton … b) → c ∈ pt_set;
- pt_closed: pt_set ⊆ {b | b ⋉ pt_set}
- }.
-
-ndefinition Rd ≝ Pt Rax.
-
-naxiom daemon: False.
-
-ndefinition Q_to_R: Q → Rd.
- #q; @
- [ napply { c | fst … c < q ∧ q < snd … c }
- | @ [ @ (Qminus q 1) (Qplus q 1) | ncases daemon ]
-##| #c; #d; #Hc; #Hd; @ [ @ (Qmin (fst … c) (fst … d)) (Qmax (snd … c) (snd … d)) | ncases daemon]
-##| #a; #H; napply (ftfish_coind Rax ? (λa. fst … a < q ∧ q < snd … a)); /2/
- [ ncases daemon; ##| #b; *; #H1; #H2; #c; *; #H3; #H4; #i; ncases i
- [ #w; nnormalize; ncases daemon;
- ##| nnormalize; ncases daemon;
-##]
-nqed.
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-include "arithmetics/nat.ma".
-
-ninductive Z : Type ≝
- OZ : Z
-| pos : nat → Z
-| neg : nat → Z.
-
-interpretation "Integers" 'Z = Z.
-
-ndefinition Z_of_nat ≝
-λn. match n with
-[ O ⇒ OZ
-| S n ⇒ pos n].
-
-ncoercion Z_of_nat : ∀n:nat.Z ≝ Z_of_nat on _n:nat to Z.
-
-ndefinition neg_Z_of_nat \def
-λn. match n with
-[ O ⇒ OZ
-| S n ⇒ neg n].
-
-nlemma pos_n_eq_S_n : ∀n : nat.pos n = S n.
-//.
-nqed.
-
-ndefinition abs ≝
-λz.match z with
-[ OZ ⇒ O
-| pos n ⇒ S n
-| neg n ⇒ S n].
-
-ndefinition OZ_test ≝
-λz.match z with
-[ OZ ⇒ true
-| pos _ ⇒ false
-| neg _ ⇒ false].
-
-ntheorem OZ_test_to_Prop : ∀z:Z.
- match OZ_test z with
- [true ⇒ z=OZ
- |false ⇒ z ≠ OZ].
-#z;ncases z
-##[napply refl
-##|##*:#z1;napply nmk;#H;ndestruct]
-nqed.
-
-(* discrimination *)
-ntheorem injective_pos: injective nat Z pos.
-#n;#m;#H;ndestruct;//;
-nqed.
-
-(* variant inj_pos : \forall n,m:nat. pos n = pos m \to n = m
-\def injective_pos. *)
-
-ntheorem injective_neg: injective nat Z neg.
-#n;#m;#H;ndestruct;//;
-nqed.
-
-(* variant inj_neg : \forall n,m:nat. neg n = neg m \to n = m
-\def injective_neg. *)
-
-ntheorem not_eq_OZ_pos: ∀n:nat. OZ ≠ pos n.
-#n;napply nmk;#H;ndestruct;
-nqed.
-
-ntheorem not_eq_OZ_neg :∀n:nat. OZ ≠ neg n.
-#n;napply nmk;#H;ndestruct;
-nqed.
-
-ntheorem not_eq_pos_neg : ∀n,m:nat. pos n ≠ neg m.
-#n;#m;napply nmk;#H;ndestruct;
-nqed.
-
-ntheorem decidable_eq_Z : ∀x,y:Z. decidable (x=y).
-#x;#y;ncases x;
-##[ncases y;
- ##[@;//
- ##|##*:#n;@2;napply nmk;#H;ndestruct]
-##|#n;ncases y;
- ##[@2;napply nmk;#H;ndestruct;
- ##|#m;ncases (decidable_eq_nat n m);#H;
- ##[nrewrite > H;@;//
- ##|@2;napply nmk;#H2;nelim H;
- (* bug if you don't introduce H3 *)#H3;ndestruct;
- napply H3;@]
- ##|#m;@2;napply nmk;#H;ndestruct]
-##|#n;ncases y;
- ##[@2;napply nmk;#H;ndestruct;
- ##|#m;@2;napply nmk;#H;ndestruct
- ##|#m;ncases (decidable_eq_nat n m);#H;
- ##[nrewrite > H;@;//
- ##|@2;napply nmk;#H2;nelim H;#H3;ndestruct;
- napply H3;@]##]##]
-nqed.
-
-ndefinition Zsucc ≝
-λz. match z with
-[ OZ ⇒ pos O
-| pos n ⇒ pos (S n)
-| neg n ⇒
- match n with
- [ O ⇒ OZ
- | S p ⇒ neg p]].
-
-ndefinition Zpred ≝
-λz. match z with
-[ OZ ⇒ neg O
-| pos n ⇒
- match n with
- [ O ⇒ OZ
- | S p ⇒ pos p]
-| neg n ⇒ neg (S n)].
-
-ntheorem Zpred_Zsucc: ∀z:Z. Zpred (Zsucc z) = z.
-#z;ncases z;
-##[##1,2://
-##|#n;ncases n;//]
-nqed.
-
-ntheorem Zsucc_Zpred: ∀z:Z. Zsucc (Zpred z) = z.
-#z;ncases z
-##[##2:#n;ncases n;//
-##|##*://]
-nqed.
-
-ndefinition Zle : Z → Z → Prop ≝
-λx,y:Z.
- match x with
- [ OZ ⇒
- match y with
- [ OZ ⇒ True
- | pos m ⇒ True
- | neg m ⇒ False ]
- | pos n ⇒
- match y with
- [ OZ ⇒ False
- | pos m ⇒ n ≤ m
- | neg m ⇒ False ]
- | neg n ⇒
- match y with
- [ OZ ⇒ True
- | pos m ⇒ True
- | neg m ⇒ m ≤ n ]].
-
-interpretation "integer 'less or equal to'" 'leq x y = (Zle x y).
-interpretation "integer 'neither less nor equal to'" 'nleq x y = (Not (Zle x y)).
-
-ndefinition Zlt : Z → Z → Prop ≝
-λx,y:Z.
- match x with
- [ OZ ⇒
- match y with
- [ OZ ⇒ False
- | pos m ⇒ True
- | neg m ⇒ False ]
- | pos n ⇒
- match y with
- [ OZ ⇒ False
- | pos m ⇒ n<m
- | neg m ⇒ False ]
- | neg n ⇒
- match y with
- [ OZ ⇒ True
- | pos m ⇒ True
- | neg m ⇒ m<n ]].
-
-interpretation "integer 'less than'" 'lt x y = (Zlt x y).
-interpretation "integer 'not less than'" 'nless x y = (Not (Zlt x y)).
-
-ntheorem irreflexive_Zlt: irreflexive Z Zlt.
-#x;ncases x
-##[napply nmk;//
-##|##*:#n;napply (not_le_Sn_n n) (* XXX: auto?? *)]
-nqed.
-
-(* transitivity *)
-ntheorem transitive_Zle : transitive Z Zle.
-#x;#y;#z;ncases x
-##[ncases y
- ##[//
- ##|##*:#n;ncases z;//]
-##|#n;ncases y
- ##[#H;ncases H
- ##|(*##*:#m;#Hl;ncases z;//;*)
- #m;#Hl;ncases z;//;#p;#Hr;
- napply (transitive_le n m p);//; (* XXX: auto??? *)
- ##|#m;#Hl;ncases Hl]
-##|#n;ncases y
- ##[#Hl;ncases z
- ##[##1,2://
- ##|#m;#Hr;ncases Hr]
- ##|#m;#Hl;ncases z;
- ##[##1,2://
- ##|#p;#Hr;ncases Hr]
- ##|#m;#Hl;ncases z;//;#p;#Hr;
- napply (transitive_le p m n);//; (* XXX: auto??? *) ##]
-nqed.
-
-(* variant trans_Zle: transitive Z Zle
-\def transitive_Zle.*)
-
-ntheorem transitive_Zlt: transitive Z Zlt.
-#x;#y;#z;ncases x
-##[ncases y
- ##[//
- ##|#n;ncases z
- ##[#_;#Hr;ncases Hr
- ##|//
- ##|#m;#_;#Hr;ncases Hr]
- ##|#n;#Hl;ncases Hl]
-##|#n;ncases y
- ##[#Hl;ncases Hl
- ##|#m;ncases z
- ##[//
- ##|#p;napply transitive_lt (* XXX: auto??? *)
- ##|//##]
- ##|#m;#Hl;ncases Hl]
-##|#n;ncases y
- ##[ncases z;
- ##[##1,2://
- ##|#m;#_;#Hr;ncases Hr]
- ##|#m;ncases z;
- ##[##1,2://
- ##|#p;#_;#Hr;ncases Hr]
- ##|#m;ncases z
- ##[##1,2://
- ##|#p;#Hl;#Hr;napply (transitive_lt … Hr Hl)]
- ##]
-##]
-nqed.
-
-(* variant trans_Zlt: transitive Z Zlt
-\def transitive_Zlt.
-theorem irrefl_Zlt: irreflexive Z Zlt
-\def irreflexive_Zlt.*)
-
-ntheorem Zlt_neg_neg_to_lt:
- ∀n,m:nat. neg n < neg m → m < n.
-//;
-nqed.
-
-ntheorem lt_to_Zlt_neg_neg: ∀n,m:nat.m < n → neg n < neg m.
-//;
-nqed.
-
-ntheorem Zlt_pos_pos_to_lt:
- ∀n,m:nat. pos n < pos m → n < m.
-//;
-nqed.
-
-ntheorem lt_to_Zlt_pos_pos: ∀n,m:nat.n < m → pos n < pos m.
-//;
-nqed.
-
-ntheorem Zlt_to_Zle: ∀x,y:Z. x < y → Zsucc x ≤ y.
-#x;#y;ncases x
-##[ncases y
- ##[#H;ncases H
- ##|//;
- ##|#p;#H;ncases H]
-##|#n;ncases y
- ##[#H;ncases H
- ##|#p;nnormalize;//
- ##|#p;#H;ncases H]
-##|#n;ncases y
- ##[##1,2:ncases n;//
- ##|#p;ncases n;nnormalize;
- ##[#H;nelim (not_le_Sn_O p);#H2;napply H2;//; (* XXX: auto? *)
- ##|#m;napply le_S_S_to_le (* XXX: auto? *)]
- ##]
-##]
-nqed.
-
-(*** COMPARE ***)
-
-(* boolean equality *)
-ndefinition eqZb : Z → Z → bool ≝
-λx,y:Z.
- match x with
- [ OZ ⇒
- match y with
- [ OZ ⇒ true
- | pos q ⇒ false
- | neg q ⇒ false]
- | pos p ⇒
- match y with
- [ OZ ⇒ false
- | pos q ⇒ eqb p q
- | neg q ⇒ false]
- | neg p ⇒
- match y with
- [ OZ ⇒ false
- | pos q ⇒ false
- | neg q ⇒ eqb p q]].
-
-ntheorem eqZb_to_Prop:
- ∀x,y:Z.
- match eqZb x y with
- [ true ⇒ x=y
- | false ⇒ x ≠ y].
-#x;#y;ncases x
-##[ncases y;
- ##[//
- ##|napply not_eq_OZ_pos (* XXX: auto? *)
- ##|napply not_eq_OZ_neg (* XXX: auto? *)]
-##|#n;ncases y;
- ##[napply nmk;#H;nelim (not_eq_OZ_pos n);#H2;/2/;
- ##|#m;napply eqb_elim;
- ##[//
- ##|#H;napply nmk;#H2;nelim H;#H3;ndestruct;/2/]
- ##|#m;napply not_eq_pos_neg]
-##|#n;ncases y
- ##[napply nmk;#H;nelim (not_eq_OZ_neg n);#H;/2/;
- ##|#m;napply nmk;#H;ndestruct
- ##|#m;napply eqb_elim;
- ##[//
- ##|#H;napply nmk;#H2;ndestruct;nelim H;/2/]
- ##]
-##]
-nqed.
-
-ntheorem eqZb_elim: ∀x,y:Z.∀P:bool → Prop.
- (x=y → P true) → (x ≠ y → P false) → P (eqZb x y).
-#x;#y;#P;#HP1;#HP2;
-ncut
-(match (eqZb x y) with
-[ true ⇒ x=y
-| false ⇒ x ≠ y] → P (eqZb x y))
-##[ncases (eqZb x y);nnormalize; (* XXX: auto?? *)
- ##[napply HP1
- ##|napply HP2]
-##|#Hcut;napply Hcut;napply eqZb_to_Prop]
-nqed.
-
-include "arithmetics/compare.ma".
-
-ndefinition Z_compare : Z → Z → compare ≝
-λx,y:Z.
- match x with
- [ OZ ⇒
- match y with
- [ OZ ⇒ EQ
- | pos m ⇒ LT
- | neg m ⇒ GT ]
- | pos n ⇒
- match y with
- [ OZ ⇒ GT
- | pos m ⇒ nat_compare n m
- | neg m ⇒ GT]
- | neg n ⇒
- match y with
- [ OZ ⇒ LT
- | pos m ⇒ LT
- | neg m ⇒ nat_compare m n ]].
-
-ntheorem Z_compare_to_Prop :
-∀x,y:Z. match (Z_compare x y) with
-[ LT ⇒ x < y
-| EQ ⇒ x=y
-| GT ⇒ y < x].
-#x;#y;nelim x
-##[nelim y;//;
-##|nelim y
- ##[##1,3://
- ##|#n;#m;nnormalize;
- ncut (match (nat_compare m n) with
- [ LT ⇒ m < n
- | EQ ⇒ m = n
- | GT ⇒ n < m ] →
- match (nat_compare m n) with
- [ LT ⇒ S m ≤ n
- | EQ ⇒ pos m = pos n
- | GT ⇒ S n ≤ m])
- ##[ncases (nat_compare m n);//
- ##|#Hcut;napply Hcut;napply nat_compare_to_Prop]
- ##]
-##|nelim y
- ##[#n;//
- ##|nnormalize;//
- ##|nnormalize;#n;#m;
- ncut (match (nat_compare n m) with
- [ LT ⇒ n < m
- | EQ ⇒ n = m
- | GT ⇒ m < n] →
- match (nat_compare n m) with
- [ LT ⇒ S n ≤ m
- | EQ ⇒ neg m = neg n
- | GT ⇒ S m ≤ n])
- ##[ncases (nat_compare n m);//
- ##|#Hcut;napply Hcut;napply nat_compare_to_Prop]
- ##]
-##]
-nqed.
-
-ndefinition Zplus : Z → Z → Z ≝
- λx,y. match x with
- [ OZ ⇒ y
- | pos m ⇒
- match y with
- [ OZ ⇒ x
- | pos n ⇒ (pos (pred ((S m)+(S n))))
- | neg n ⇒
- match nat_compare m n with
- [ LT ⇒ (neg (pred (n-m)))
- | EQ ⇒ OZ
- | GT ⇒ (pos (pred (m-n)))] ]
- | neg m ⇒
- match y with
- [ OZ ⇒ x
- | pos n ⇒
- match nat_compare m n with
- [ LT ⇒ (pos (pred (n-m)))
- | EQ ⇒ OZ
- | GT ⇒ (neg (pred (m-n)))]
- | neg n ⇒ (neg (pred ((S m)+(S n))))] ].
-
-interpretation "integer plus" 'plus x y = (Zplus x y).
-
-ntheorem eq_plus_Zplus: ∀n,m:nat. Z_of_nat (n+m) = Z_of_nat n + Z_of_nat m.
-#n;#m;ncases n
-##[//
-##|#p;ncases m
- ##[nnormalize;//
- ##|//]
-nqed.
-
-ntheorem Zplus_z_OZ: ∀z:Z. z+OZ = z.
-#z;ncases z;//;
-nqed.
-
-(* theorem symmetric_Zplus: symmetric Z Zplus. *)
-
-ntheorem sym_Zplus : ∀x,y:Z. x+y = y+x.
-#x;#y;ncases x;
-##[nrewrite > (Zplus_z_OZ ?) (*XXX*);//
-##|#p;ncases y
- ##[//
- ##|nnormalize;//
- ##|#q;nnormalize;nrewrite > (nat_compare_n_m_m_n ??) (*XXX*);
- ncases (nat_compare q p);//]
-##|#p;ncases y
- ##[//;
- ##|#q;nnormalize;nrewrite > (nat_compare_n_m_m_n ??) (*XXX*);
- ncases (nat_compare q p);//
- ##|nnormalize;//]
-##]
-nqed.
-
-ntheorem Zpred_Zplus_neg_O : ∀z. Zpred z = (neg O)+z.
-#z;ncases z
-##[//
-##|##*:#n;ncases n;//]
-nqed.
-
-ntheorem Zsucc_Zplus_pos_O : ∀z. Zsucc z = (pos O)+z.
-#z;ncases z
-##[//
-##|##*:#n;ncases n;//]
-nqed.
-
-ntheorem Zplus_pos_pos:
- ∀n,m. (pos n)+(pos m) = (Zsucc (pos n))+(Zpred (pos m)).
-#n;#m;ncases n
-##[ncases m;//
-##|#p;ncases m
- ##[nnormalize;
- nrewrite < (plus_n_Sm ??);nrewrite < (plus_n_O ?); (* XXX yet again *)
- //
- ##|#q;nnormalize;nrewrite < (plus_n_Sm ??);nrewrite < (plus_n_Sm ??);//]
-##]
-nqed.
-
-ntheorem Zplus_pos_neg:
- ∀n,m. (pos n)+(neg m) = (Zsucc (pos n))+(Zpred (neg m)).
-//;
-nqed.
-
-ntheorem Zplus_neg_pos :
- ∀n,m. (neg n)+(pos m) = (Zsucc (neg n))+(Zpred (pos m)).
-#n;#m;ncases n;ncases m;//;
-nqed.
-
-ntheorem Zplus_neg_neg:
- ∀n,m. (neg n)+(neg m) = (Zsucc (neg n))+(Zpred (neg m)).
-#n;#m;ncases n
-##[ncases m;//
-##|#p;ncases m;nnormalize;
- ##[nrewrite > (plus_n_Sm ??);//
- ##|#q;nrewrite > (plus_n_Sm ??);//]
-##]
-nqed.
-
-ntheorem Zplus_Zsucc_Zpred: ∀x,y. x+y = (Zsucc x)+(Zpred y).
-#x;#y;ncases x
-##[ncases y
- ##[//
- ##|#n;nrewrite < (Zsucc_Zplus_pos_O ?);nrewrite > (Zsucc_Zpred ?);//
- ##|//]
-##|ncases y;/2/;
-##|ncases y
- ##[#n;nrewrite < (sym_Zplus ??);nrewrite < (sym_Zplus (Zpred OZ) ?);
- nrewrite < (Zpred_Zplus_neg_O ?);nrewrite > (Zpred_Zsucc ?);//
- ##|##*://]
-nqed.
-
-ntheorem Zplus_Zsucc_pos_pos :
- ∀n,m. (Zsucc (pos n))+(pos m) = Zsucc ((pos n)+(pos m)).
-//;
-nqed.
-
-ntheorem Zplus_Zsucc_pos_neg:
- ∀n,m. (Zsucc (pos n))+(neg m) = (Zsucc ((pos n)+(neg m))).
-#n;#m;
-napply (nat_elim2 (λn,m. (Zsucc (pos n))+(neg m) = (Zsucc ((pos n)+(neg m)))))
-##[#n1;nelim n1
- ##[//
- ##|#n2;#IH;nelim n2;//]
-##|//
-##|#n1;#m1;#IH;nrewrite < (Zplus_pos_neg ? m1);nelim IH;//]
-nqed.
-
-ntheorem Zplus_Zsucc_neg_neg :
- ∀n,m. Zsucc (neg n) + neg m = Zsucc (neg n + neg m).
-#n;#m;
-napply (nat_elim2 (λ n,m. Zsucc (neg n) + neg m = Zsucc (neg n + neg m)))
-##[#n1;nelim n1
- ##[//
- ##|#n2;#IH;nelim n2;//]
-##|##*://]
-nqed.
-
-ntheorem Zplus_Zsucc_neg_pos:
- ∀n,m. Zsucc (neg n)+(pos m) = Zsucc ((neg n)+(pos m)).
-#n;#m;
-napply (nat_elim2 (λn,m. Zsucc (neg n) + (pos m) = Zsucc (neg n + pos m)))
-##[#n1;nelim n1
- ##[//
- ##|#n2;#IH;nelim n2;//]
-##|//
-##|#n1;#m1;#IH;nrewrite < IH;nrewrite < (Zplus_neg_pos ? (S m1));//]
-nqed.
-
-ntheorem Zplus_Zsucc : ∀x,y:Z. (Zsucc x)+y = Zsucc (x+y).
-#x;#y;ncases x
-##[ncases y;//;#n;nnormalize;ncases n;//;
-##|##*:#n;ncases y;//]
-nqed.
-
-ntheorem Zplus_Zpred: ∀x,y:Z. (Zpred x)+y = Zpred (x+y).
-#x;#y;ncut (Zpred (x+y) = Zpred ((Zsucc (Zpred x))+y))
-##[nrewrite > (Zsucc_Zpred ?);//
-##|#Hcut;nrewrite > Hcut;nrewrite > (Zplus_Zsucc ??);//]
-nqed.
-
-ntheorem associative_Zplus: associative Z Zplus.
-(* nchange with (\forall x,y,z:Z. (x + y) + z = x + (y + z));*)
-#x;#y;#z;ncases x
-##[//
-##|#n;nelim n
- ##[nrewrite < (Zsucc_Zplus_pos_O ?);nrewrite < (Zsucc_Zplus_pos_O ?);//;
- ##|#n1;#IH;
- nrewrite > (Zplus_Zsucc (pos n1) ?);nrewrite > (Zplus_Zsucc (pos n1) ?);
- nrewrite > (Zplus_Zsucc ((pos n1)+y) ?);//]
-##|#n;nelim n
- ##[nrewrite < (Zpred_Zplus_neg_O (y+z));nrewrite < (Zpred_Zplus_neg_O y);//;
- ##|#n1;#IH;
- nrewrite > (Zplus_Zpred (neg n1) ?);nrewrite > (Zplus_Zpred (neg n1) ?);
- nrewrite > (Zplus_Zpred ((neg n1)+y) ?);//]
-##]
-nqed.
-
-(* variant assoc_Zplus : \forall x,y,z:Z. (x+y)+z = x+(y+z)
-\def associative_Zplus. *)
-
-(* Zopp *)
-ndefinition Zopp : Z → Z ≝
- λx:Z. match x with
- [ OZ ⇒ OZ
- | pos n ⇒ neg n
- | neg n ⇒ pos n ].
-
-interpretation "integer unary minus" 'uminus x = (Zopp x).
-
-ntheorem eq_OZ_Zopp_OZ : OZ = (- OZ).
-//;
-nqed.
-
-ntheorem Zopp_Zplus: ∀x,y:Z. -(x+y) = -x + -y.
-#x;#y;ncases x
-##[ncases y;//
-##|##*:#n;ncases y;//;#m;nnormalize;napply nat_compare_elim;nnormalize;//]
-nqed.
-
-ntheorem Zopp_Zopp: ∀x:Z. --x = x.
-#x;ncases x;//;
-nqed.
-
-ntheorem Zplus_Zopp: ∀ x:Z. x+ -x = OZ.
-#x;ncases x
-##[//
-##|##*:#n;nnormalize;nrewrite > (nat_compare_n_n ?);//]
-nqed.
-
-ntheorem injective_Zplus_l: ∀x:Z.injective Z Z (λy.y+x).
-#x;#z;#y;#H;
-nrewrite < (Zplus_z_OZ z);nrewrite < (Zplus_z_OZ y);
-nrewrite < (Zplus_Zopp x);
-nrewrite < (associative_Zplus ???);nrewrite < (associative_Zplus ???);
-//;
-nqed.
-
-ntheorem injective_Zplus_r: ∀x:Z.injective Z Z (λy.x+y).
-#x;#z;#y;#H;
-napply (injective_Zplus_l x);
-nrewrite < (sym_Zplus ??);
-//;
-nqed.
-
-(* minus *)
-ndefinition Zminus : Z → Z → Z ≝ λx,y:Z. x + (-y).
-
-interpretation "integer minus" 'minus x y = (Zminus x y).
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-include "arithmetics/nat.ma".
-
-ninductive compare : Type[0] ≝
-| LT : compare
-| EQ : compare
-| GT : compare.
-
-ndefinition compare_invert: compare → compare ≝
- λc.match c with
- [ LT ⇒ GT
- | EQ ⇒ EQ
- | GT ⇒ LT ].
-
-nlet rec nat_compare n m: compare ≝
-match n with
-[ O ⇒ match m with
- [ O ⇒ EQ
- | (S q) ⇒ LT ]
-| S p ⇒ match m with
- [ O ⇒ GT
- | S q ⇒ nat_compare p q]].
-
-ntheorem nat_compare_n_n: ∀n. nat_compare n n = EQ.
-#n;nelim n
-##[//
-##|#m;#IH;nnormalize;//]
-nqed.
-
-ntheorem nat_compare_S_S: ∀n,m:nat.nat_compare n m = nat_compare (S n) (S m).
-//;
-nqed.
-
-ntheorem nat_compare_pred_pred:
- ∀n,m.O < n → O < m → nat_compare n m = nat_compare (pred n) (pred m).
-#n;#m;#Hn;#Hm;
-napply (lt_O_n_elim n Hn);
-napply (lt_O_n_elim m Hm);
-#p;#q;//;
-nqed.
-
-ntheorem nat_compare_to_Prop:
- ∀n,m.match (nat_compare n m) with
- [ LT ⇒ n < m
- | EQ ⇒ n = m
- | GT ⇒ m < n ].
-#n;#m;
-napply (nat_elim2 (λn,m.match (nat_compare n m) with
- [ LT ⇒ n < m
- | EQ ⇒ n = m
- | GT ⇒ m < n ]) ?????) (* FIXME: don't want to put all these ?, especially when … does not work! *)
-##[##1,2:#n1;ncases n1;//;
-##|#n1;#m1;nnormalize;ncases (nat_compare n1 m1);
- ##[##1,3:nnormalize;#IH;napply le_S_S;//;
- ##|nnormalize;#IH;nrewrite > IH;//]
-nqed.
-
-ntheorem nat_compare_n_m_m_n:
- ∀n,m:nat.nat_compare n m = compare_invert (nat_compare m n).
-#n;#m;
-napply (nat_elim2 (λn,m. nat_compare n m = compare_invert (nat_compare m n)))
-##[##1,2:#n1;ncases n1;//;
-##|#n1;#m1;#IH;nnormalize;napply IH]
-nqed.
-
-ntheorem nat_compare_elim :
- ∀n,m. ∀P:compare → Prop.
- (n < m → P LT) → (n=m → P EQ) → (m < n → P GT) → P (nat_compare n m).
-#n;#m;#P;#Hlt;#Heq;#Hgt;
-ncut (match (nat_compare n m) with
- [ LT ⇒ n < m
- | EQ ⇒ n=m
- | GT ⇒ m < n] →
- P (nat_compare n m))
-##[ncases (nat_compare n m);
- ##[napply Hlt
- ##|napply Heq
- ##|napply Hgt]
-##|#Hcut;napply Hcut;//;
-nqed.
-
-ninductive cmp_cases (n,m:nat) : CProp[0] ≝
- | cmp_le : n ≤ m → cmp_cases n m
- | cmp_gt : m < n → cmp_cases n m.
-
-ntheorem lt_to_le : ∀n,m:nat. n < m → n ≤ m.
-(* sic
-#n;#m;#H;nelim H
-##[//
-##|/2/] *)
-/2/; nqed.
-
-nlemma cmp_nat: ∀n,m.cmp_cases n m.
-#n;#m; nlapply (nat_compare_to_Prop n m);
-ncases (nat_compare n m);nnormalize; /3/;
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / Matita is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-include "arithmetics/nat.ma".
-
-nlet rec max i f ≝
- match i with
- [ O ⇒ O
- | (S n) ⇒ match f i with
- [ true ⇒ i
- | false ⇒ max n f ]].
-
-ntheorem max_O_f : ∀f: nat → bool. max O f = O.
-//; nqed.
-
-ntheorem max_S_max : ∀f: nat → bool.∀n:nat.
- (f (S n) = true ∧ max (S n) f = (S n)) ∨
- (f (S n) = false ∧ max (S n) f = max n f).
-#f; #n; nnormalize; ncases (f (S n)); /3/;
-nqed.
-
-ntheorem le_max_n : ∀f: nat → bool. ∀n:nat.
- max n f ≤ n.
-#f; #n; nelim n;//;
-#n; #Hind; nnormalize; ncases (f (S n)); nnormalize; /2/;
-nqed.
-
-ntheorem le_to_le_max : ∀f: nat → bool. ∀n,m:nat.
-n ≤ m → max n f ≤ max m f.
-#f; #n; #m; #lenm; nelim lenm; //;
-#m; #le_n_m; #Hind; ncases (max_S_max f m); *; #_; #maxf;
-##[napplyS le_S; /2/; ##| //; ##]
-nqed.
-
-ntheorem f_m_to_le_max: ∀f.∀ n,m:nat.
- m ≤n → f m = true → m ≤ max n f.
-#f; #n; nelim n; //;
-#m; #Hind; #a; #lea; #fa; ncases (max_S_max f m);*;//;
-#fSm; #max; napplyS Hind;//; napply (le_n_Sm_elim … lea);
-##[/2/; ##| #eqa; napply False_ind;/2/;##]
-nqed.
-
-ntheorem max_f_g: ∀f,g,n. (∀i. i ≤ n → f i = g i) →
- max n f = max n g.
-#f; #g; #n; nelim n;//;
-#a; #Hind; #eqfg; nnormalize;
-nrewrite > (eqfg …);//;
-nrewrite > (Hind ?);/3/;
-nqed.
-
-(* spostare *)
-ntheorem bool_elim: ∀P:bool→Prop.∀b.
-(b = true → P true) → ( b = false → P false) → P b.
-#P; #b; ncases b;/2/; nqed.
-
-ntheorem le_max_f_max_g: ∀f,g,n. (∀i. i ≤ n → f i = true → g i =true) →
- max n f ≤ max n g.
-#f; #g; #n; nelim n;//;
-#a; #Hind; #eqfg; nnormalize;
-napply (bool_elim ? (f (S a)));#fSa;
- ##[nrewrite > (eqfg …);//;
- ##|ncases (g (S a));nnormalize;
- ##[/2/; ##| napply Hind; /3/;
-nqed.
-
-ntheorem max_O : ∀f:nat → bool. ∀n:nat.
-(∀i:nat. le i n → f i = false) → max n f = O.
-#f; #n; nelim n; //;
-#a; #Hind; #ffalse; nnormalize;
-nrewrite > (ffalse ??);//; napply Hind; /3/;
-nqed.
-
-ntheorem f_max_true : ∀f:nat → bool. ∀n:nat.
-(∃i:nat. i ≤ n ∧ f i = true) → f (max n f) = true.
-#f; #n; nelim n;
-##[*;#x;*; #lexO; napply (le_n_O_elim … lexO);//;
-##|#a; #Hind; #exi;
- ncases (max_S_max f a); *; //;
- #fSa; #eqmax; napplyS Hind;
- ncases exi; #x; *;#lex; #fx; @ x; @;//;
- napply (le_n_Sm_elim x a lex);
- ##[/2/; ##|#eqx; napply False_ind; /2/;##]
-##]
-nqed.
-
-ntheorem exists_forall_le:∀f,n.
- (∃i. i ≤ n ∧ f i = true) ∨ (∀i. i ≤ n → f i = false).
-#f; #n; nelim n
- ##[napply (bool_elim ? (f O)); #f0;
- ##[/4/;
- ##|@2; #i; #lei; napply (le_n_O_elim ? lei); //; ##]
- ##|#a; *;
- ##[*;#x;*;#lex;#fx;@1;@x;/3/;
- ##|#H; napply (bool_elim ? (f (S a)));#fSa;
- ##[@1;@ (S a);/2/;
- ##|@2;#i;#lei; napply (le_n_Sm_elim …lei);/3/;
- ##]
- ##]
- ##]
-nqed.
-
-ntheorem exists_max_forall_false:∀f,n.
- (∃i. i ≤ n ∧ f i = true) ∧ (f (max n f) = true) ∨
- (∀i. i ≤ n → f i = false) ∧ (max n f) = O.
-#f; #n; ncases (exists_forall_le f n); #H;/5/;
-nqed.
-
-ntheorem false_to_lt_max: ∀f,n,m.O < n →
-f n = false → max m f ≤ n → max m f < n.
-#f; #n; #m; #posn; #fn; #maxf;
-nelim (le_to_or_lt_eq ? ? maxf);//;
-#maxfn; ncases (exists_max_forall_false f m);*;//;
-#_; #fmax; napply False_ind; /2/;
-nqed.
-
-ntheorem lt_max_to_false : ∀f:nat → bool. ∀n,m:nat.
- max n f < m → m ≤ n → f m = false.
-#f; #n; nelim n;
- ##[#m; #H; #H1; napply False_ind; /3/;
- ##|#a; #Hind; #m;
- ncases (max_S_max f a); *;
- ##[#_;#eqmax;#H; #nH;napply False_ind;/3/;
- ##|#eqf;#eqmax;#lemax;#lem;
- napply (le_n_Sm_elim m a lem);/3/;
-nqed.
-
-ntheorem f_false_to_le_max: ∀f,n,p. (∃i:nat.i≤n∧f i=true) →
-(∀m. p < m → f m = false) → max n f \le p.
-#f; #n; #p; #exi; #allm;
-napply not_lt_to_le; napply (not_to_not … not_eq_true_false);
-#ltp; nrewrite < (allm ? ltp);
-napply sym_eq; napply (f_max_true ? n exi); (* ? *)
-nqed.
-
-ndefinition max_spec ≝ λf:nat → bool.λn,m: nat.
-m ≤ n ∧ f m =true ∧ ∀i. m < i → i ≤ n → f i = false.
-
-ntheorem max_spec_to_max: ∀f:nat → bool.∀n,m:nat.
- max_spec f n m → max n f = m.
-#f; #n; nelim n
- ##[#m; *; *; #lemO; #_; #_; napply (le_n_O_elim ? lemO); //;
- ##|#n1; #Hind; #a; *; *; #lea; #fa; #all;
- ncases (max_S_max f n1); *; #fSn1; #maxSn1;
- ##[ncases (le_to_or_lt_eq … lea); #Ha;
- ##[napply False_ind;napply (absurd ?? not_eq_true_false);
- nrewrite < fSn1; napply all;//;
- ##|//;
- ##]
- ##|napplyS Hind; @;
- ##[@; //; ncases (le_to_or_lt_eq … lea); #Ha;
- ##[/2/;
- ##|napply False_ind;/2/;
- ##]
- ##|/3/;
- ##]
- ##]
-nqed.
-
-(************************ minimization ************************)
-
-nlet rec min_aux off n f ≝
- match off with
- [ O ⇒ n
- | S p ⇒ match f n with
- [ true ⇒ n
- | false ⇒ min_aux p (S n) f]].
-
-ndefinition min : nat → (nat → bool) → nat ≝
- λn.λf.min_aux n O f.
-
-ntheorem min_aux_O_f: ∀f:nat → bool. ∀i :nat.
- min_aux O i f = i.
-#f; #i; ncases i; //; nqed.
-
-ntheorem min_O_f : ∀f:nat → bool.
- min O f = O.
-//; nqed.
-
-ntheorem min_aux_S : ∀f: nat → bool. ∀i,n:nat.
-(f n = true ∧ min_aux (S i) n f = n) ∨
-(f n = false ∧ min_aux (S i) n f = min_aux i (S n) f).
-#f; #i; #n; nnormalize; ncases (f n); nnormalize;/3/;
-nqed.
-
-ntheorem f_min_aux_true: ∀f:nat → bool. ∀off,m:nat.
- (∃i. m ≤ i ∧ i ≤ off + m ∧ f i = true) →
- f (min_aux off m f) = true.
-#f; #off; nelim off;
- ##[#m; *; #a; *; *; #leam; #lema; ncut (a = m);/2/;
- ##|#n; #Hind; #m; #exi; nnormalize;
- napply (bool_elim … (f m)); nnormalize; //;
- #fm; napply Hind;
- ncases exi; #x; *; *; #lemx; #lex; #fx;
- @ x; @; //; @; //;
- ncases (le_to_or_lt_eq …lemx); #eqx; //;
- napply False_ind; /2/;
- ##]
-nqed.
-
-ntheorem f_min_true: ∀f:nat → bool. ∀m:nat.
- (∃i. i ≤ m ∧ f i = true) → f (min m f) = true.
-#f; #m; *; #x; *; #lexm; #fx;
-napply (f_min_aux_true f m 0 ?); /4/;
-nqed.
-
-ntheorem lt_min_aux_to_false : ∀f:nat → bool.∀off,n,m:nat.
- n ≤ m → m < min_aux off n f → f m = false.
-#f; #off; nelim off;
- ##[#n; #m; #lenm; #ltmn; napply False_ind;
- napply (absurd … lenm);/2/;
- ##|#n; #Hind; #a; #m; #leam;
- nnormalize; napply (bool_elim ? (f a)); nnormalize;
- ##[#fa; #ltm; napply False_ind; napply (absurd (m < a));/2/;
- ##|ncases (le_to_or_lt_eq … leam);/2/;
-nqed.
-
-nlemma le_min_aux : ∀f:nat → bool. ∀off,n:nat.
- n ≤ min_aux off n f.
-#f; #off; nelim off;//;
-#n; #Hind; #a; nelim (min_aux_S f n a); *; /2/;
-nqed.
-
-ntheorem le_min_aux_r : ∀f:nat → bool.
- ∀off,n:nat. min_aux off n f ≤ n+off.
-#f; #off; nelim off; //;
-#n; #Hind; #a; nelim (min_aux_S f n a); *; /2/;
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-include "hints_declaration.ma".
-include "basics/functions.ma".
-include "basics/eq.ma".
-
-ninductive nat : Type ≝
- | O : nat
- | S : nat → nat.
-
-interpretation "Natural numbers" 'N = nat.
-
-alias num (instance 0) = "nnatural number".
-
-(*
-nrecord pos : Type ≝
- {n:>nat; is_pos: n ≠ 0}.
-
-ncoercion nat_to_pos: ∀n:nat. n ≠0 →pos ≝ mk_pos on
-*)
-
-(* default "natural numbers" cic:/matita/ng/arithmetics/nat/nat.ind.
-*)
-
-ndefinition pred ≝
- λn. match n with [ O ⇒ O | S p ⇒ p].
-
-ntheorem pred_Sn : ∀n. n = pred (S n).
-//; nqed.
-
-ntheorem injective_S : injective nat nat S.
-//; nqed.
-
-(*
-ntheorem inj_S : \forall n,m:nat.(S n)=(S m) \to n=m.
-//. nqed. *)
-
-ntheorem not_eq_S: ∀n,m:nat. n ≠ m → S n ≠ S m.
-/3/; nqed.
-
-ndefinition not_zero: nat → Prop ≝
- λn: nat. match n with
- [ O ⇒ False | (S p) ⇒ True ].
-
-ntheorem not_eq_O_S : ∀n:nat. O ≠ S n.
-#n; napply nmk; #eqOS; nchange with (not_zero O);
-nrewrite > eqOS; //.
-nqed.
-
-ntheorem not_eq_n_Sn: ∀n:nat. n ≠ S n.
-#n; nelim n;/2/; nqed.
-
-ntheorem nat_case:
- ∀n:nat.∀P:nat → Prop.
- (n=O → P O) → (∀m:nat. (n=(S m) → P (S m))) → P n.
-#n; #P; nelim n; /2/; nqed.
-
-ntheorem nat_elim2 :
- ∀R:nat → nat → Prop.
- (∀n:nat. R O n)
- → (∀n:nat. R (S n) O)
- → (∀n,m:nat. R n m → R (S n) (S m))
- → ∀n,m:nat. R n m.
-#R; #ROn; #RSO; #RSS; #n; nelim n;//;
-#n0; #Rn0m; #m; ncases m;/2/; nqed.
-
-ntheorem decidable_eq_nat : ∀n,m:nat.decidable (n=m).
-napply nat_elim2; #n;
- ##[ ncases n; /2/;
- ##| /3/;
- ##| #m; #Hind; ncases Hind;/3/;
- ##]
-nqed.
-
-(*************************** plus ******************************)
-
-nlet rec plus n m ≝
- match n with
- [ O ⇒ m
- | S p ⇒ S (plus p m) ].
-
-interpretation "natural plus" 'plus x y = (plus x y).
-
-ntheorem plus_O_n: ∀n:nat. n = 0+n.
-//; nqed.
-
-(*
-ntheorem plus_Sn_m: ∀n,m:nat. S (n + m) = S n + m.
-//; nqed.
-*)
-
-ntheorem plus_n_O: ∀n:nat. n = n+0.
-#n; nelim n; nnormalize; //; nqed.
-
-ntheorem plus_n_Sm : ∀n,m:nat. S (n+m) = n + S m.
-#n; nelim n; nnormalize; //; nqed.
-
-(*
-ntheorem plus_Sn_m1: ∀n,m:nat. S m + n = n + S m.
-#n; nelim n; nnormalize; //; nqed.
-*)
-
-(* deleterio?
-ntheorem plus_n_1 : ∀n:nat. S n = n+1.
-//; nqed.
-*)
-
-ntheorem symmetric_plus: symmetric ? plus.
-#n; nelim n; nnormalize; //; nqed.
-
-ntheorem associative_plus : associative nat plus.
-#n; nelim n; nnormalize; //; nqed.
-
-ntheorem assoc_plus1: ∀a,b,c. c + (b + a) = b + c + a.
-//; nqed.
-
-ntheorem injective_plus_r: ∀n:nat.injective nat nat (λm.n+m).
-#n; nelim n; nnormalize; /3/; nqed.
-
-(* ntheorem inj_plus_r: \forall p,n,m:nat. p+n = p+m \to n=m
-\def injective_plus_r.
-
-ntheorem injective_plus_l: ∀m:nat.injective nat nat (λn.n+m).
-/2/; nqed. *)
-
-(* ntheorem inj_plus_l: \forall p,n,m:nat. n+p = m+p \to n=m
-\def injective_plus_l. *)
-
-(*************************** times *****************************)
-
-nlet rec times n m ≝
- match n with
- [ O ⇒ O
- | S p ⇒ m+(times p m) ].
-
-interpretation "natural times" 'times x y = (times x y).
-
-ntheorem times_Sn_m: ∀n,m:nat. m+n*m = S n*m.
-//; nqed.
-
-ntheorem times_O_n: ∀n:nat. O = O*n.
-//; nqed.
-
-ntheorem times_n_O: ∀n:nat. O = n*O.
-#n; nelim n; //; nqed.
-
-ntheorem times_n_Sm : ∀n,m:nat. n+(n*m) = n*(S m).
-#n; nelim n; nnormalize; //; nqed.
-
-ntheorem symmetric_times : symmetric nat times.
-#n; nelim n; nnormalize; //; nqed.
-
-(* variant sym_times : \forall n,m:nat. n*m = m*n \def
-symmetric_times. *)
-
-ntheorem distributive_times_plus : distributive nat times plus.
-#n; nelim n; nnormalize; //; nqed.
-
-ntheorem distributive_times_plus_r :
- ∀a,b,c:nat. (b+c)*a = b*a + c*a.
-//; nqed.
-
-ntheorem associative_times: associative nat times.
-#n; nelim n; nnormalize; //; nqed.
-
-nlemma times_times: ∀x,y,z. x*(y*z) = y*(x*z).
-//; nqed.
-
-(* ci servono questi risultati?
-ntheorem times_O_to_O: ∀n,m:nat.n*m=O → n=O ∨ m=O.
-napply nat_elim2; /2/;
-#n; #m; #H; nnormalize; #H1; napply False_ind;napply not_eq_O_S;
-//; nqed.
-
-ntheorem times_n_SO : ∀n:nat. n = n * S O.
-#n; //; nqed.
-
-ntheorem times_SSO_n : ∀n:nat. n + n = (S(S O)) * n.
-nnormalize; //; nqed.
-
-nlemma times_SSO: \forall n.(S(S O))*(S n) = S(S((S(S O))*n)).
-//; nqed.
-
-ntheorem or_eq_eq_S: \forall n.\exists m.
-n = (S(S O))*m \lor n = S ((S(S O))*m).
-#n; nelim n;
- ##[@; /2/;
- ##|#a; #H; nelim H; #b;#or;nelim or;#aeq;
- ##[@ b; @ 2; //;
- ##|@ (S b); @ 1; /2/;
- ##]
-nqed.
-*)
-
-(******************** ordering relations ************************)
-
-ninductive le (n:nat) : nat → Prop ≝
- | le_n : le n n
- | le_S : ∀ m:nat. le n m → le n (S m).
-
-interpretation "natural 'less or equal to'" 'leq x y = (le x y).
-
-interpretation "natural 'neither less nor equal to'" 'nleq x y = (Not (le x y)).
-
-ndefinition lt: nat → nat → Prop ≝
-λn,m:nat. S n ≤ m.
-
-interpretation "natural 'less than'" 'lt x y = (lt x y).
-
-interpretation "natural 'not less than'" 'nless x y = (Not (lt x y)).
-
-(* nlemma eq_lt: ∀n,m. (n < m) = (S n ≤ m).
-//; nqed. *)
-
-ndefinition ge: nat → nat → Prop ≝
-λn,m:nat.m ≤ n.
-
-interpretation "natural 'greater or equal to'" 'geq x y = (ge x y).
-
-ndefinition gt: nat → nat → Prop ≝
-λn,m:nat.m<n.
-
-interpretation "natural 'greater than'" 'gt x y = (gt x y).
-
-interpretation "natural 'not greater than'" 'ngtr x y = (Not (gt x y)).
-
-ntheorem transitive_le : transitive nat le.
-#a; #b; #c; #leab; #lebc;nelim lebc;/2/;
-nqed.
-
-(*
-ntheorem trans_le: \forall n,m,p:nat. n \leq m \to m \leq p \to n \leq p
-\def transitive_le. *)
-
-
-ntheorem transitive_lt: transitive nat lt.
-#a; #b; #c; #ltab; #ltbc;nelim ltbc;/2/;nqed.
-
-(*
-theorem trans_lt: \forall n,m,p:nat. lt n m \to lt m p \to lt n p
-\def transitive_lt. *)
-
-ntheorem le_S_S: ∀n,m:nat. n ≤ m → S n ≤ S m.
-#n; #m; #lenm; nelim lenm; /2/; nqed.
-
-ntheorem le_O_n : ∀n:nat. O ≤ n.
-#n; nelim n; /2/; nqed.
-
-ntheorem le_n_Sn : ∀n:nat. n ≤ S n.
-/2/; nqed.
-
-ntheorem le_pred_n : ∀n:nat. pred n ≤ n.
-#n; nelim n; //; nqed.
-
-(* XXX global problem
-nlemma my_trans_le : ∀x,y,z:nat.x ≤ y → y ≤ z → x ≤ z.
-napply transitive_le.
-nqed. *)
-
-ntheorem monotonic_pred: monotonic ? le pred.
-#n; #m; #lenm; nelim lenm; /2/;nqed.
-
-ntheorem le_S_S_to_le: ∀n,m:nat. S n ≤ S m → n ≤ m.
-/2/; nqed.
-
-(* this are instances of the le versions
-ntheorem lt_S_S_to_lt: ∀n,m. S n < S m → n < m.
-/2/; nqed.
-
-ntheorem lt_to_lt_S_S: ∀n,m. n < m → S n < S m.
-/2/; nqed. *)
-
-ntheorem lt_to_not_zero : ∀n,m:nat. n < m → not_zero m.
-#n; #m; #Hlt; nelim Hlt;//; nqed.
-
-(* lt vs. le *)
-ntheorem not_le_Sn_O: ∀ n:nat. S n ≰ O.
-#n; napply nmk; #Hlen0; napply (lt_to_not_zero ?? Hlen0); nqed.
-
-ntheorem not_le_to_not_le_S_S: ∀ n,m:nat. n ≰ m → S n ≰ S m.
-/3/; nqed.
-
-ntheorem not_le_S_S_to_not_le: ∀ n,m:nat. S n ≰ S m → n ≰ m.
-/3/; nqed.
-
-ntheorem decidable_le: ∀n,m. decidable (n≤m).
-napply nat_elim2; #n; /2/;
-#m; *; /3/; nqed.
-
-ntheorem decidable_lt: ∀n,m. decidable (n < m).
-#n; #m; napply decidable_le ; nqed.
-
-ntheorem not_le_Sn_n: ∀n:nat. S n ≰ n.
-#n; nelim n; /2/; nqed.
-
-(* this is le_S_S_to_le
-ntheorem lt_S_to_le: ∀n,m:nat. n < S m → n ≤ m.
-/2/; nqed.
-*)
-
-ntheorem not_le_to_lt: ∀n,m. n ≰ m → m < n.
-napply nat_elim2; #n;
- ##[#abs; napply False_ind;/2/;
- ##|/2/;
- ##|#m;#Hind;#HnotleSS; napply le_S_S;/3/;
- ##]
-nqed.
-
-ntheorem lt_to_not_le: ∀n,m. n < m → m ≰ n.
-#n; #m; #Hltnm; nelim Hltnm;/3/; nqed.
-
-ntheorem not_lt_to_le: ∀n,m:nat. n ≮ m → m ≤ n.
-/4/; nqed.
-
-(*
-#n; #m; #Hnlt; napply le_S_S_to_le;/2/;
-(* something strange here: /2/ fails *)
-napply not_le_to_lt; napply Hnlt; nqed. *)
-
-ntheorem le_to_not_lt: ∀n,m:nat. n ≤ m → m ≮ n.
-#n; #m; #H;napply lt_to_not_le; /2/; (* /3/ *) nqed.
-
-(* lt and le trans *)
-
-ntheorem lt_to_le_to_lt: ∀n,m,p:nat. n < m → m ≤ p → n < p.
-#n; #m; #p; #H; #H1; nelim H1; /2/; nqed.
-
-ntheorem le_to_lt_to_lt: ∀n,m,p:nat. n ≤ m → m < p → n < p.
-#n; #m; #p; #H; nelim H; /3/; nqed.
-
-ntheorem lt_S_to_lt: ∀n,m. S n < m → n < m.
-/2/; nqed.
-
-ntheorem ltn_to_ltO: ∀n,m:nat. n < m → O < m.
-/2/; nqed.
-
-(*
-theorem lt_SO_n_to_lt_O_pred_n: \forall n:nat.
-(S O) \lt n \to O \lt (pred n).
-intros.
-apply (ltn_to_ltO (pred (S O)) (pred n) ?).
- apply (lt_pred (S O) n);
- [ apply (lt_O_S O)
- | assumption
- ]
-qed. *)
-
-ntheorem lt_O_n_elim: ∀n:nat. O < n →
- ∀P:nat → Prop.(∀m:nat.P (S m)) → P n.
-#n; nelim n; //; #abs; napply False_ind;/2/;
-nqed.
-
-(*
-theorem lt_pred: \forall n,m.
- O < n \to n < m \to pred n < pred m.
-apply nat_elim2
- [intros.apply False_ind.apply (not_le_Sn_O ? H)
- |intros.apply False_ind.apply (not_le_Sn_O ? H1)
- |intros.simplify.unfold.apply le_S_S_to_le.assumption
- ]
-qed.
-
-theorem S_pred: \forall n:nat.lt O n \to eq nat n (S (pred n)).
-intro.elim n.apply False_ind.exact (not_le_Sn_O O H).
-apply eq_f.apply pred_Sn.
-qed.
-
-theorem le_pred_to_le:
- ∀n,m. O < m → pred n ≤ pred m → n ≤ m.
-intros 2;
-elim n;
-[ apply le_O_n
-| simplify in H2;
- rewrite > (S_pred m);
- [ apply le_S_S;
- assumption
- | assumption
- ]
-].
-qed.
-
-*)
-
-(* le to lt or eq *)
-ntheorem le_to_or_lt_eq: ∀n,m:nat. n ≤ m → n < m ∨ n = m.
-#n; #m; #lenm; nelim lenm; /3/; nqed.
-
-(* not eq *)
-ntheorem lt_to_not_eq : ∀n,m:nat. n < m → n ≠ m.
-#n; #m; #H; napply not_to_not;/2/; nqed.
-
-(*not lt
-ntheorem eq_to_not_lt: ∀a,b:nat. a = b → a ≮ b.
-intros.
-unfold Not.
-intros.
-rewrite > H in H1.
-apply (lt_to_not_eq b b)
-[ assumption
-| reflexivity
-]
-qed.
-
-theorem lt_n_m_to_not_lt_m_Sn: ∀n,m. n < m → m ≮ S n.
-intros;
-unfold Not;
-intro;
-unfold lt in H;
-unfold lt in H1;
-generalize in match (le_S_S ? ? H);
-intro;
-generalize in match (transitive_le ? ? ? H2 H1);
-intro;
-apply (not_le_Sn_n ? H3).
-qed. *)
-
-ntheorem not_eq_to_le_to_lt: ∀n,m. n≠m → n≤m → n<m.
-#n; #m; #Hneq; #Hle; ncases (le_to_or_lt_eq ?? Hle); //;
-#Heq; /3/; nqed.
-(*
-nelim (Hneq Heq); nqed. *)
-
-(* le elimination *)
-ntheorem le_n_O_to_eq : ∀n:nat. n ≤ O → O=n.
-#n; ncases n; //; #a ; #abs;
-napply False_ind; /2/;nqed.
-
-ntheorem le_n_O_elim: ∀n:nat. n ≤ O → ∀P: nat →Prop. P O → P n.
-#n; ncases n; //; #a; #abs;
-napply False_ind; /2/; nqed.
-
-ntheorem le_n_Sm_elim : ∀n,m:nat.n ≤ S m →
-∀P:Prop. (S n ≤ S m → P) → (n=S m → P) → P.
-#n; #m; #Hle; #P; nelim Hle; /3/; nqed.
-
-(* le and eq *)
-
-ntheorem le_to_le_to_eq: ∀n,m. n ≤ m → m ≤ n → n = m.
-napply nat_elim2; /4/;
-nqed.
-
-ntheorem lt_O_S : ∀n:nat. O < S n.
-/2/; nqed.
-
-(*
-(* other abstract properties *)
-theorem antisymmetric_le : antisymmetric nat le.
-unfold antisymmetric.intros 2.
-apply (nat_elim2 (\lambda n,m.(n \leq m \to m \leq n \to n=m))).
-intros.apply le_n_O_to_eq.assumption.
-intros.apply False_ind.apply (not_le_Sn_O ? H).
-intros.apply eq_f.apply H.
-apply le_S_S_to_le.assumption.
-apply le_S_S_to_le.assumption.
-qed.
-
-theorem antisym_le: \forall n,m:nat. n \leq m \to m \leq n \to n=m
-\def antisymmetric_le.
-
-theorem le_n_m_to_lt_m_Sn_to_eq_n_m: ∀n,m. n ≤ m → m < S n → n=m.
-intros;
-unfold lt in H1;
-generalize in match (le_S_S_to_le ? ? H1);
-intro;
-apply antisym_le;
-assumption.
-qed.
-*)
-
-(* well founded induction principles *)
-
-ntheorem nat_elim1 : ∀n:nat.∀P:nat → Prop.
-(∀m.(∀p. p < m → P p) → P m) → P n.
-#n; #P; #H;
-ncut (∀q:nat. q ≤ n → P q);/2/;
-nelim n;
- ##[#q; #HleO; (* applica male *)
- napply (le_n_O_elim ? HleO);
- napply H; #p; #ltpO;
- napply (False_ind ??); /2/; (* 3 *)
- ##|#p; #Hind; #q; #HleS;
- napply H; #a; #lta; napply Hind;
- napply le_S_S_to_le;/2/;
- ##]
-nqed.
-
-(* some properties of functions *)
-(*
-definition increasing \def \lambda f:nat \to nat.
-\forall n:nat. f n < f (S n).
-
-theorem increasing_to_monotonic: \forall f:nat \to nat.
-increasing f \to monotonic nat lt f.
-unfold monotonic.unfold lt.unfold increasing.unfold lt.intros.elim H1.apply H.
-apply (trans_le ? (f n1)).
-assumption.apply (trans_le ? (S (f n1))).
-apply le_n_Sn.
-apply H.
-qed.
-
-theorem le_n_fn: \forall f:nat \to nat. (increasing f)
-\to \forall n:nat. n \le (f n).
-intros.elim n.
-apply le_O_n.
-apply (trans_le ? (S (f n1))).
-apply le_S_S.apply H1.
-simplify in H. unfold increasing in H.unfold lt in H.apply H.
-qed.
-
-theorem increasing_to_le: \forall f:nat \to nat. (increasing f)
-\to \forall m:nat. \exists i. m \le (f i).
-intros.elim m.
-apply (ex_intro ? ? O).apply le_O_n.
-elim H1.
-apply (ex_intro ? ? (S a)).
-apply (trans_le ? (S (f a))).
-apply le_S_S.assumption.
-simplify in H.unfold increasing in H.unfold lt in H.
-apply H.
-qed.
-
-theorem increasing_to_le2: \forall f:nat \to nat. (increasing f)
-\to \forall m:nat. (f O) \le m \to
-\exists i. (f i) \le m \land m <(f (S i)).
-intros.elim H1.
-apply (ex_intro ? ? O).
-split.apply le_n.apply H.
-elim H3.elim H4.
-cut ((S n1) < (f (S a)) \lor (S n1) = (f (S a))).
-elim Hcut.
-apply (ex_intro ? ? a).
-split.apply le_S. assumption.assumption.
-apply (ex_intro ? ? (S a)).
-split.rewrite < H7.apply le_n.
-rewrite > H7.
-apply H.
-apply le_to_or_lt_eq.apply H6.
-qed.
-*)
-
-(*********************** monotonicity ***************************)
-ntheorem monotonic_le_plus_r:
-∀n:nat.monotonic nat le (λm.n + m).
-#n; #a; #b; nelim n; nnormalize; //;
-#m; #H; #leab;napply le_S_S; /2/; nqed.
-
-(*
-ntheorem le_plus_r: ∀p,n,m:nat. n ≤ m → p + n ≤ p + m
-≝ monotonic_le_plus_r. *)
-
-ntheorem monotonic_le_plus_l:
-∀m:nat.monotonic nat le (λn.n + m).
-/2/; nqed.
-
-(*
-ntheorem le_plus_l: \forall p,n,m:nat. n \le m \to n + p \le m + p
-\def monotonic_le_plus_l. *)
-
-ntheorem le_plus: ∀n1,n2,m1,m2:nat. n1 ≤ n2 → m1 ≤ m2
-→ n1 + m1 ≤ n2 + m2.
-#n1; #n2; #m1; #m2; #len; #lem; napply (transitive_le ? (n1+m2));
-/2/; nqed.
-
-ntheorem le_plus_n :∀n,m:nat. m ≤ n + m.
-/2/; nqed.
-
-nlemma le_plus_a: ∀a,n,m. n ≤ m → n ≤ a + m.
-/2/; nqed.
-
-nlemma le_plus_b: ∀b,n,m. n + b ≤ m → n ≤ m.
-/2/; nqed.
-
-ntheorem le_plus_n_r :∀n,m:nat. m ≤ m + n.
-/2/; nqed.
-
-ntheorem eq_plus_to_le: ∀n,m,p:nat.n=m+p → m ≤ n.
-//; nqed.
-
-ntheorem le_plus_to_le: ∀a,n,m. a + n ≤ a + m → n ≤ m.
-#a; nelim a; nnormalize; /3/; nqed.
-
-ntheorem le_plus_to_le_r: ∀a,n,m. n + a ≤ m +a → n ≤ m.
-/2/; nqed.
-
-(* plus & lt *)
-
-ntheorem monotonic_lt_plus_r:
-∀n:nat.monotonic nat lt (λm.n+m).
-/2/; nqed.
-
-(*
-variant lt_plus_r: \forall n,p,q:nat. p < q \to n + p < n + q \def
-monotonic_lt_plus_r. *)
-
-ntheorem monotonic_lt_plus_l:
-∀n:nat.monotonic nat lt (λm.m+n).
-/2/; nqed.
-
-(*
-variant lt_plus_l: \forall n,p,q:nat. p < q \to p + n < q + n \def
-monotonic_lt_plus_l. *)
-
-ntheorem lt_plus: ∀n,m,p,q:nat. n < m → p < q → n + p < m + q.
-#n; #m; #p; #q; #ltnm; #ltpq;
-napply (transitive_lt ? (n+q));/2/; nqed.
-
-ntheorem lt_plus_to_lt_l :∀n,p,q:nat. p+n < q+n → p<q.
-/2/; nqed.
-
-ntheorem lt_plus_to_lt_r :∀n,p,q:nat. n+p < n+q → p<q.
-/2/; nqed.
-
-(*
-ntheorem le_to_lt_to_lt_plus: ∀a,b,c,d:nat.
-a ≤ c → b < d → a + b < c+d.
-(* bello /2/ un po' lento *)
-#a; #b; #c; #d; #leac; #lebd;
-nnormalize; napplyS le_plus; //; nqed.
-*)
-
-(* times *)
-ntheorem monotonic_le_times_r:
-∀n:nat.monotonic nat le (λm. n * m).
-#n; #x; #y; #lexy; nelim n; nnormalize;//;(* lento /2/;*)
-#a; #lea; napply le_plus; //;
-nqed.
-
-(*
-ntheorem le_times_r: \forall p,n,m:nat. n \le m \to p*n \le p*m
-\def monotonic_le_times_r. *)
-
-(*
-ntheorem monotonic_le_times_l:
-∀m:nat.monotonic nat le (λn.n*m).
-/2/; nqed.
-*)
-
-(*
-theorem le_times_l: \forall p,n,m:nat. n \le m \to n*p \le m*p
-\def monotonic_le_times_l. *)
-
-ntheorem le_times: ∀n1,n2,m1,m2:nat.
-n1 ≤ n2 → m1 ≤ m2 → n1*m1 ≤ n2*m2.
-#n1; #n2; #m1; #m2; #len; #lem;
-napply (transitive_le ? (n1*m2)); (* /2/ slow *)
- ##[ napply monotonic_le_times_r;//;
- ##| napplyS monotonic_le_times_r;//;
- ##]
-nqed.
-
-(* interesssante *)
-ntheorem lt_times_n: ∀n,m:nat. O < n → m ≤ n*m.
-#n; #m; #H; /2/; nqed.
-
-ntheorem le_times_to_le:
-∀a,n,m. O < a → a * n ≤ a * m → n ≤ m.
-#a; napply nat_elim2; nnormalize;
- ##[//;
- ##|#n; #H1; #H2;
- napply (transitive_le ? (a*S n));/2/;
- ##|#n; #m; #H; #lta; #le;
- napply le_S_S; napply H; /2/;
- ##]
-nqed.
-
-ntheorem le_S_times_2: ∀n,m.O < m → n ≤ m → S n ≤ 2*m.
-#n; #m; #posm; #lenm; (* interessante *)
-napplyS (le_plus n m); //; nqed.
-
-(* times & lt *)
-(*
-ntheorem lt_O_times_S_S: ∀n,m:nat.O < (S n)*(S m).
-intros.simplify.unfold lt.apply le_S_S.apply le_O_n.
-qed. *)
-
-(*
-ntheorem lt_times_eq_O: \forall a,b:nat.
-O < a → a * b = O → b = O.
-intros.
-apply (nat_case1 b)
-[ intros.
- reflexivity
-| intros.
- rewrite > H2 in H1.
- rewrite > (S_pred a) in H1
- [ apply False_ind.
- apply (eq_to_not_lt O ((S (pred a))*(S m)))
- [ apply sym_eq.
- assumption
- | apply lt_O_times_S_S
- ]
- | assumption
- ]
-]
-qed.
-
-theorem O_lt_times_to_O_lt: \forall a,c:nat.
-O \lt (a * c) \to O \lt a.
-intros.
-apply (nat_case1 a)
-[ intros.
- rewrite > H1 in H.
- simplify in H.
- assumption
-| intros.
- apply lt_O_S
-]
-qed.
-
-lemma lt_times_to_lt_O: \forall i,n,m:nat. i < n*m \to O < m.
-intros.
-elim (le_to_or_lt_eq O ? (le_O_n m))
- [assumption
- |apply False_ind.
- rewrite < H1 in H.
- rewrite < times_n_O in H.
- apply (not_le_Sn_O ? H)
- ]
-qed. *)
-
-(*
-ntheorem monotonic_lt_times_r:
-∀n:nat.monotonic nat lt (λm.(S n)*m).
-/2/;
-simplify.
-intros.elim n.
-simplify.rewrite < plus_n_O.rewrite < plus_n_O.assumption.
-apply lt_plus.assumption.assumption.
-qed. *)
-
-ntheorem monotonic_lt_times_l:
- ∀c:nat. O < c → monotonic nat lt (λt.(t*c)).
-#c; #posc; #n; #m; #ltnm;
-nelim ltnm; nnormalize;
- ##[/2/;
- ##|#a; #_; #lt1; napply (transitive_le ??? lt1);//;
- ##]
-nqed.
-
-ntheorem monotonic_lt_times_r:
- ∀c:nat. O < c → monotonic nat lt (λt.(c*t)).
-/2/; nqed.
-
-ntheorem lt_to_le_to_lt_times:
-∀n,m,p,q:nat. n < m → p ≤ q → O < q → n*p < m*q.
-#n; #m; #p; #q; #ltnm; #lepq; #posq;
-napply (le_to_lt_to_lt ? (n*q));
- ##[napply monotonic_le_times_r;//;
- ##|napply monotonic_lt_times_l;//;
- ##]
-nqed.
-
-ntheorem lt_times:∀n,m,p,q:nat. n<m → p<q → n*p < m*q.
-#n; #m; #p; #q; #ltnm; #ltpq;
-napply lt_to_le_to_lt_times;/2/;
-nqed.
-
-ntheorem lt_times_n_to_lt_l:
-∀n,p,q:nat. p*n < q*n → p < q.
-#n; #p; #q; #Hlt;
-nelim (decidable_lt p q);//;
-#nltpq; napply False_ind;
-napply (absurd ? ? (lt_to_not_le ? ? Hlt));
-napplyS monotonic_le_times_r;/2/;
-nqed.
-
-ntheorem lt_times_n_to_lt_r:
-∀n,p,q:nat. n*p < n*q → p < q.
-/2/; nqed.
-
-(*
-theorem nat_compare_times_l : \forall n,p,q:nat.
-nat_compare p q = nat_compare ((S n) * p) ((S n) * q).
-intros.apply nat_compare_elim.intro.
-apply nat_compare_elim.
-intro.reflexivity.
-intro.absurd (p=q).
-apply (inj_times_r n).assumption.
-apply lt_to_not_eq. assumption.
-intro.absurd (q<p).
-apply (lt_times_to_lt_r n).assumption.
-apply le_to_not_lt.apply lt_to_le.assumption.
-intro.rewrite < H.rewrite > nat_compare_n_n.reflexivity.
-intro.apply nat_compare_elim.intro.
-absurd (p<q).
-apply (lt_times_to_lt_r n).assumption.
-apply le_to_not_lt.apply lt_to_le.assumption.
-intro.absurd (q=p).
-symmetry.
-apply (inj_times_r n).assumption.
-apply lt_to_not_eq.assumption.
-intro.reflexivity.
-qed. *)
-
-(* times and plus
-theorem lt_times_plus_times: \forall a,b,n,m:nat.
-a < n \to b < m \to a*m + b < n*m.
-intros 3.
-apply (nat_case n)
- [intros.apply False_ind.apply (not_le_Sn_O ? H)
- |intros.simplify.
- rewrite < sym_plus.
- unfold.
- change with (S b+a*m1 \leq m1+m*m1).
- apply le_plus
- [assumption
- |apply le_times
- [apply le_S_S_to_le.assumption
- |apply le_n
- ]
- ]
- ]
-qed. *)
-
-(************************** minus ******************************)
-
-nlet rec minus n m ≝
- match n with
- [ O ⇒ O
- | S p ⇒
- match m with
- [ O ⇒ S p
- | S q ⇒ minus p q ]].
-
-interpretation "natural minus" 'minus x y = (minus x y).
-
-ntheorem minus_S_S: ∀n,m:nat.S n - S m = n -m.
-//; nqed.
-
-ntheorem minus_O_n: ∀n:nat.O=O-n.
-#n; ncases n; //; nqed.
-
-ntheorem minus_n_O: ∀n:nat.n=n-O.
-#n; ncases n; //; nqed.
-
-ntheorem minus_n_n: ∀n:nat.O=n-n.
-#n; nelim n; //; nqed.
-
-ntheorem minus_Sn_n: ∀n:nat. S O = (S n)-n.
-#n; nelim n; nnormalize; //; nqed.
-
-ntheorem minus_Sn_m: ∀m,n:nat. m ≤ n → S n -m = S (n-m).
-(* qualcosa da capire qui
-#n; #m; #lenm; nelim lenm; napplyS refl_eq. *)
-napply nat_elim2;
- ##[//
- ##|#n; #abs; napply False_ind; /2/
- ##|#n; #m; #Hind; #c; napplyS Hind; /2/;
- ##]
-nqed.
-
-ntheorem not_eq_to_le_to_le_minus:
- ∀n,m.n ≠ m → n ≤ m → n ≤ m - 1.
-#n; #m; ncases m;//; #m; nnormalize;
-#H; #H1; napply le_S_S_to_le;
-napplyS (not_eq_to_le_to_lt n (S m) H H1);
-nqed.
-
-ntheorem eq_minus_S_pred: ∀n,m. n - (S m) = pred(n -m).
-napply nat_elim2; nnormalize; //; nqed.
-
-ntheorem plus_minus:
-∀m,n,p:nat. m ≤ n → (n-m)+p = (n+p)-m.
-napply nat_elim2;
- ##[//
- ##|#n; #p; #abs; napply False_ind; /2/;
- ##|nnormalize;/3/;
- ##]
-nqed.
-
-ntheorem minus_plus_m_m: ∀n,m:nat.n = (n+m)-m.
-#n; #m; napplyS (plus_minus m m n); //; nqed.
-
-ntheorem plus_minus_m_m: ∀n,m:nat.
- m ≤ n → n = (n-m)+m.
-#n; #m; #lemn; napplyS sym_eq;
-napplyS (plus_minus m n m); //; nqed.
-
-ntheorem le_plus_minus_m_m: ∀n,m:nat. n ≤ (n-m)+m.
-#n; nelim n;
- ##[//
- ##|#a; #Hind; #m; ncases m;//;
- nnormalize; #n;/2/;
- ##]
-nqed.
-
-ntheorem minus_to_plus :∀n,m,p:nat.
- m ≤ n → n-m = p → n = m+p.
-#n; #m; #p; #lemn; #eqp; napplyS plus_minus_m_m; //;
-nqed.
-
-ntheorem plus_to_minus :∀n,m,p:nat.n = m+p → n-m = p.
-(* /4/ done in 43.5 *)
-#n; #m; #p; #eqp;
-napply sym_eq;
-napplyS (minus_plus_m_m p m);
-nqed.
-
-ntheorem minus_pred_pred : ∀n,m:nat. O < n → O < m →
-pred n - pred m = n - m.
-#n; #m; #posn; #posm;
-napply (lt_O_n_elim n posn);
-napply (lt_O_n_elim m posm);//.
-nqed.
-
-(*
-theorem eq_minus_n_m_O: \forall n,m:nat.
-n \leq m \to n-m = O.
-intros 2.
-apply (nat_elim2 (\lambda n,m.n \leq m \to n-m = O)).
-intros.simplify.reflexivity.
-intros.apply False_ind.
-apply not_le_Sn_O;
-[2: apply H | skip].
-intros.
-simplify.apply H.apply le_S_S_to_le. apply H1.
-qed.
-
-theorem le_SO_minus: \forall n,m:nat.S n \leq m \to S O \leq m-n.
-intros.elim H.elim (minus_Sn_n n).apply le_n.
-rewrite > minus_Sn_m.
-apply le_S.assumption.
-apply lt_to_le.assumption.
-qed.
-
-theorem minus_le_S_minus_S: \forall n,m:nat. m-n \leq S (m-(S n)).
-intros.
-apply (nat_elim2 (\lambda n,m.m-n \leq S (m-(S n)))).
-intro.elim n1.simplify.apply le_n_Sn.
-simplify.rewrite < minus_n_O.apply le_n.
-intros.simplify.apply le_n_Sn.
-intros.simplify.apply H.
-qed.
-
-theorem lt_minus_S_n_to_le_minus_n : \forall n,m,p:nat. m-(S n) < p \to m-n \leq p.
-intros 3.intro.
-(* autobatch *)
-(* end auto($Revision: 9739 $) proof: TIME=1.33 SIZE=100 DEPTH=100 *)
-apply (trans_le (m-n) (S (m-(S n))) p).
-apply minus_le_S_minus_S.
-assumption.
-qed.
-
-theorem le_minus_m: \forall n,m:nat. n-m \leq n.
-intros.apply (nat_elim2 (\lambda m,n. n-m \leq n)).
-intros.rewrite < minus_n_O.apply le_n.
-intros.simplify.apply le_n.
-intros.simplify.apply le_S.assumption.
-qed.
-
-theorem lt_minus_m: \forall n,m:nat. O < n \to O < m \to n-m \lt n.
-intros.apply (lt_O_n_elim n H).intro.
-apply (lt_O_n_elim m H1).intro.
-simplify.unfold lt.apply le_S_S.apply le_minus_m.
-qed.
-
-theorem minus_le_O_to_le: \forall n,m:nat. n-m \leq O \to n \leq m.
-intros 2.
-apply (nat_elim2 (\lambda n,m:nat.n-m \leq O \to n \leq m)).
-intros.apply le_O_n.
-simplify.intros. assumption.
-simplify.intros.apply le_S_S.apply H.assumption.
-qed.
-*)
-
-(* monotonicity and galois *)
-
-ntheorem monotonic_le_minus_l:
-∀p,q,n:nat. q ≤ p → q-n ≤ p-n.
-napply nat_elim2; #p; #q;
- ##[#lePO; napply (le_n_O_elim ? lePO);//;
- ##|//;
- ##|#Hind; #n; ncases n;
- ##[//;
- ##|#a; #leSS; napply Hind; /2/;
- ##]
- ##]
-nqed.
-
-ntheorem le_minus_to_plus: ∀n,m,p. n-m ≤ p → n≤ p+m.
-#n; #m; #p; #lep;
-napply transitive_le;
- ##[##|napply le_plus_minus_m_m
- ##|napply monotonic_le_plus_l;//;
- ##]
-nqed.
-
-ntheorem le_plus_to_minus: ∀n,m,p. n ≤ p+m → n-m ≤ p.
-#n; #m; #p; #lep;
-(* bello *)
-napplyS monotonic_le_minus_l;//;
-(* /2/; *)
-nqed.
-
-ntheorem monotonic_le_minus_r:
-∀p,q,n:nat. q ≤ p → n-p ≤ n-q.
-#p; #q; #n; #lepq;
-napply le_plus_to_minus;
-napply (transitive_le ??? (le_plus_minus_m_m ? q));/2/;
-nqed.
-
-(*********************** boolean arithmetics ********************)
-include "basics/bool.ma".
-
-nlet rec eqb n m ≝
-match n with
- [ O ⇒ match m with [ O ⇒ true | S q ⇒ false]
- | S p ⇒ match m with [ O ⇒ false | S q ⇒ eqb p q]
- ].
-
-(*
-ntheorem eqb_to_Prop: ∀n,m:nat.
-match (eqb n m) with
-[ true \Rightarrow n = m
-| false \Rightarrow n \neq m].
-intros.
-apply (nat_elim2
-(\lambda n,m:nat.match (eqb n m) with
-[ true \Rightarrow n = m
-| false \Rightarrow n \neq m])).
-intro.elim n1.
-simplify.reflexivity.
-simplify.apply not_eq_O_S.
-intro.
-simplify.unfold Not.
-intro. apply (not_eq_O_S n1).apply sym_eq.assumption.
-intros.simplify.
-generalize in match H.
-elim ((eqb n1 m1)).
-simplify.apply eq_f.apply H1.
-simplify.unfold Not.intro.apply H1.apply inj_S.assumption.
-qed.
-*)
-
-ntheorem eqb_elim : ∀ n,m:nat.∀ P:bool → Prop.
-(n=m → (P true)) → (n ≠ m → (P false)) → (P (eqb n m)).
-napply nat_elim2;
- ##[#n; ncases n; nnormalize; /3/;
- ##|nnormalize; /3/;
- ##|nnormalize; /4/;
- ##]
-nqed.
-
-ntheorem eqb_n_n: ∀n. eqb n n = true.
-#n; nelim n; nnormalize; //.
-nqed.
-
-ntheorem eqb_true_to_eq: ∀n,m:nat. eqb n m = true → n = m.
-#n; #m; napply (eqb_elim n m);//;
-#_; #abs; napply False_ind; /2/;
-nqed.
-
-ntheorem eqb_false_to_not_eq: ∀n,m:nat. eqb n m = false → n ≠ m.
-#n; #m; napply (eqb_elim n m);/2/;
-nqed.
-
-ntheorem eq_to_eqb_true: ∀n,m:nat.
- n = m → eqb n m = true.
-//; nqed.
-
-ntheorem not_eq_to_eqb_false: ∀n,m:nat.
- n ≠ m → eqb n m = false.
-#n; #m; #noteq;
-napply eqb_elim;//;
-#Heq; napply False_ind; /2/;
-nqed.
-
-nlet rec leb n m ≝
-match n with
- [ O ⇒ true
- | (S p) ⇒
- match m with
- [ O ⇒ false
- | (S q) ⇒ leb p q]].
-
-ntheorem leb_elim: ∀n,m:nat. ∀P:bool → Prop.
-(n ≤ m → P true) → (n ≰ m → P false) → P (leb n m).
-napply nat_elim2; nnormalize;
- ##[/2/
- ##|/3/;
- ##|#n; #m; #Hind; #P; #Pt; #Pf; napply Hind;
- ##[#lenm; napply Pt; napply le_S_S;//;
- ##|#nlenm; napply Pf; /2/;
- ##]
- ##]
-nqed.
-
-ntheorem leb_true_to_le:∀n,m.leb n m = true → n ≤ m.
-#n; #m; napply leb_elim;
- ##[//;
- ##|#_; #abs; napply False_ind; /2/;
- ##]
-nqed.
-
-ntheorem leb_false_to_not_le:∀n,m.
- leb n m = false → n ≰ m.
-#n; #m; napply leb_elim;
- ##[#_; #abs; napply False_ind; /2/;
- ##|//;
- ##]
-nqed.
-
-ntheorem le_to_leb_true: ∀n,m. n ≤ m → leb n m = true.
-#n; #m; napply leb_elim; //;
-#H; #H1; napply False_ind; /2/;
-nqed.
-
-ntheorem not_le_to_leb_false: ∀n,m. n ≰ m → leb n m = false.
-#n; #m; napply leb_elim; //;
-#H; #H1; napply False_ind; /2/;
-nqed.
-
-ntheorem lt_to_leb_false: ∀n,m. m < n → leb n m = false.
-/3/; nqed.
-
-(* serve anche ltb?
-ndefinition ltb ≝λn,m. leb (S n) m.
-
-ntheorem ltb_elim: ∀n,m:nat. ∀P:bool → Prop.
-(n < m → P true) → (n ≮ m → P false) → P (ltb n m).
-#n; #m; #P; #Hlt; #Hnlt;
-napply leb_elim; /3/; nqed.
-
-ntheorem ltb_true_to_lt:∀n,m.ltb n m = true → n < m.
-#n; #m; #Hltb; napply leb_true_to_le; nassumption;
-nqed.
-
-ntheorem ltb_false_to_not_lt:∀n,m.
- ltb n m = false → n ≮ m.
-#n; #m; #Hltb; napply leb_false_to_not_le; nassumption;
-nqed.
-
-ntheorem lt_to_ltb_true: ∀n,m. n < m → ltb n m = true.
-#n; #m; #Hltb; napply le_to_leb_true; nassumption;
-nqed.
-
-ntheorem le_to_ltb_false: ∀n,m. m \le n → ltb n m = false.
-#n; #m; #Hltb; napply lt_to_leb_false; /2/;
-nqed. *)
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-include "basics/eq.ma".
-include "basics/functions.ma".
-
-ninductive bool: Type ≝
- | true : bool
- | false : bool.
-
-(*
-ntheorem bool_elim: \forall P:bool \to Prop. \forall b:bool.
- (b = true \to P true)
- \to (b = false \to P false)
- \to P b.
- intros 2 (P b).
- elim b;
- [ apply H; reflexivity
- | apply H1; reflexivity
- ]
-qed.*)
-
-(* ndestrcut does not work *)
-ntheorem not_eq_true_false : true \neq false.
-napply nmk; #Heq;
-nchange with match true with [true ⇒ False|false ⇒ True];
-nrewrite > Heq; //; nqed.
-
-ndefinition notb : bool → bool ≝
-\lambda b:bool. match b with
- [true ⇒ false
- |false ⇒ true ].
-
-interpretation "boolean not" 'not x = (notb x).
-
-ntheorem notb_elim: ∀ b:bool.∀ P:bool → Prop.
-match b with
-[ true ⇒ P false
-| false ⇒ P true] → P (notb b).
-#b; #P; nelim b; nnormalize; //; nqed.
-
-ntheorem notb_notb: ∀b:bool. notb (notb b) = b.
-#b; nelim b; //; nqed.
-
-ntheorem injective_notb: injective bool bool notb.
-#b1; #b2; #H; //; nqed.
-
-ndefinition andb : bool → bool → bool ≝
-\lambda b1,b2:bool. match b1 with
- [ true ⇒ b2
- | false ⇒ false ].
-
-interpretation "boolean and" 'and x y = (andb x y).
-
-ntheorem andb_elim: ∀ b1,b2:bool. ∀ P:bool → Prop.
-match b1 with
- [ true ⇒ P b2
- | false ⇒ P false] → P (b1 ∧ b2).
-#b1; #b2; #P; nelim b1; nnormalize; //; nqed.
-
-(*
-ntheorem and_true: ∀ a,b:bool.
-andb a b =true → a =true ∧ b= true.
-#a; #b; ncases a; nnormalize;#H;napply conj;//;
- [split
- [reflexivity|assumption]
- |apply False_ind.
- apply not_eq_true_false.
- apply sym_eq.
- assumption
- ]
-qed. *)
-
-ntheorem andb_true_l: ∀ b1,b2. (b1 ∧ b2) = true → b1 = true.
-#b1; ncases b1; nnormalize; //; nqed.
-
-ntheorem andb_true_r: \forall b1,b2. (b1 ∧ b2) = true → b2 = true.
-#b1; ncases b1; nnormalize; //;
-#b2; ncases b2; //; nqed.
-
-ndefinition orb : bool → bool → bool ≝
-λ b1,b2:bool.
- match b1 with
- [ true ⇒ true
- | false ⇒ b2].
-
-interpretation "boolean or" 'or x y = (orb x y).
-
-ntheorem orb_elim: ∀ b1,b2:bool. ∀ P:bool → Prop.
-match b1 with
- [ true ⇒ P true
- | false ⇒ P b2] → P (orb b1 b2).
-#b1; #b2; #P; nelim b1; nnormalize; //; nqed.
-
-ndefinition if_then_else: ∀A:Type. bool → A → A → A ≝
-λA:Type.λb:bool.λ P,Q:A. match b with
- [ true ⇒ P
- | false ⇒ Q].
-
-(*
-ntheorem fff: false ≠ true.
-/2/;
-//; nqed. *)
-
-ntheorem bool_to_decidable_eq:
- ∀b1,b2:bool. decidable (b1=b2).
-#b1; #b2; ncases b1; ncases b2; /2/;
-@2;/3/; nqed.
-
-ntheorem true_or_false:
-∀b:bool. b = true ∨ b = false.
-#b; ncases b; /2/; nqed.
-
-
-(*
-theorem P_x_to_P_x_to_eq:
- \forall A:Set. \forall P: A \to bool.
- \forall x:A. \forall p1,p2:P x = true. p1 = p2.
- intros.
- apply eq_to_eq_to_eq_p_q.
- exact bool_to_decidable_eq.
-qed.
-
-
-(* some basic properties of and - or*)
-theorem andb_sym: \forall A,B:bool.
-(A \land B) = (B \land A).
-intros.
-elim A;
- elim B;
- simplify;
- reflexivity.
-qed.
-
-theorem andb_assoc: \forall A,B,C:bool.
-(A \land (B \land C)) = ((A \land B) \land C).
-intros.
-elim A;
- elim B;
- elim C;
- simplify;
- reflexivity.
-qed.
-
-theorem orb_sym: \forall A,B:bool.
-(A \lor B) = (B \lor A).
-intros.
-elim A;
- elim B;
- simplify;
- reflexivity.
-qed.
-
-theorem true_to_true_to_andb_true: \forall A,B:bool.
-A = true \to B = true \to (A \land B) = true.
-intros.
-rewrite > H.
-rewrite > H1.
-reflexivity.
-qed. *)
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-include "basics/relations.ma".
-
-interpretation "leibnitz's non-equality" 'neq t x y = (Not (eq t x y)).
-
-(* this is refl
-ntheorem reflexive_eq : ∀A:Type. reflexive A (eq A).
-//; nqed. *)
-
-(* this is sym_eq
-ntheorem symmetric_eq: ∀A:Type. symmetric A (eq A).
-//; nqed. *)
-
-ntheorem transitive_eq : ∀A:Type. transitive A (eq A).
-#A; #x; #y; #z; #H1; #H2; nrewrite > H1; //; nqed.
-
-(*
-ntheorem symmetric_not_eq: ∀A:Type. symmetric A (λx,y.x ≠ y).
-/3/; nqed.
-*)
-
-ntheorem symmetric_not_eq: ∀A:Type. ∀x,y:A. x ≠ y → y ≠ x.
-/3/; nqed.
-
-(*
-#A; #x; #y; #H; #K; napply H; napply symmetric_eq; //; nqed.
-*)
-
-ntheorem eq_f: ∀A,B:Type.∀f:A→B.∀x,y:A. x=y → f x = f y.
-#A; #B; #f; #x; #y; #H; nrewrite > H; //; nqed.
-
-(*
-theorem eq_f': \forall A,B:Type.\forall f:A\to B.
-\forall x,y:A. x=y \to f y = f x.
-intros.elim H.apply refl_eq.
-qed. *)
-
-(* deleterio per auto*)
-ntheorem eq_f2: ∀A,B,C:Type.∀f:A→B→C.
-∀x1,x2:A.∀y1,y2:B. x1=x2 → y1=y2 → f x1 y1 = f x2 y2.
-#A; #B; #C; #f; #x1; #x2; #y1; #y2; #E1; #E2; nrewrite > E1; nrewrite > E2;//.
-nqed.
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-include "Plogic/equality.ma".
-include "Plogic/connectives.ma".
-
-ndefinition compose ≝
- λA,B,C:Type.λf:B→C.λg:A→B.λx:A.
- f (g x).
-
-interpretation "function composition" 'compose f g = (compose ? ? ? f g).
-
-ndefinition injective: ∀A,B:Type[0].∀ f:A→B.Prop
-≝ λA,B.λf.∀x,y:A.f x = f y → x=y.
-
-ndefinition surjective: ∀A,B:Type[0].∀f:A→B.Prop
-≝λA,B.λf.∀z:B.∃x:A.z = f x.
-
-ndefinition symmetric: ∀A:Type[0].∀f:A→A→A.Prop
-≝ λA.λf.∀x,y.f x y = f y x.
-
-ndefinition symmetric2: ∀A,B:Type[0].∀f:A→A→B.Prop
-≝ λA,B.λf.∀x,y.f x y = f y x.
-
-ndefinition associative: ∀A:Type[0].∀f:A→A→A.Prop
-≝ λA.λf.∀x,y,z.f (f x y) z = f x (f y z).
-
-(*
-ntheorem eq_f_g_h:
- ∀A,B,C,D:Type[0].∀f:C→D.∀g:B→C.∀h:A→B.
- f∘(g∘h) = (f∘g)∘h.
- //.
-nqed. *)
-
-(* functions and relations *)
-ndefinition monotonic : ∀A:Type.∀R:A→A→Prop.
-∀f:A→A.Prop ≝
-λA.λR.λf.∀x,y:A.R x y → R (f x) (f y).
-
-(* functions and functions *)
-ndefinition distributive: ∀A:Type[0].∀f,g:A→A→A.Prop
-≝ λA.λf,g.∀x,y,z:A. f x (g y z) = g (f x y) (f x z).
-
-ndefinition distributive2: ∀A,B:Type[0].∀f:A→B→B.∀g:B→B→B.Prop
-≝ λA,B.λf,g.∀x:A.∀y,z:B. f x (g y z) = g (f x y) (f x z).
-
-nlemma injective_compose : ∀A,B,C,f,g.
-injective A B f → injective B C g → injective A C (λx.g (f x)).
-/3/.
-nqed.
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "basics/eq.ma".
-include "basics/bool.ma".
-
-ninductive list (A:Type) : Type :=
- | nil: list A
- | cons: A -> list A -> list A.
-
-notation "hvbox(hd break :: tl)"
- right associative with precedence 47
- for @{'cons $hd $tl}.
-
-notation "[ list0 x sep ; ]"
- non associative with precedence 90
- for ${fold right @'nil rec acc @{'cons $x $acc}}.
-
-notation "hvbox(l1 break @ l2)"
- right associative with precedence 47
- for @{'append $l1 $l2 }.
-
-interpretation "nil" 'nil = (nil ?).
-interpretation "cons" 'cons hd tl = (cons ? hd tl).
-
-ndefinition not_nil: ∀A:Type.list A → Prop ≝
- λA.λl.match l with [ nil ⇒ True | cons hd tl ⇒ False ].
-
-ntheorem nil_cons:
- ∀A:Type.∀l:list A.∀a:A. a::l ≠ [].
- #A; #l; #a; napply nmk; #Heq; nchange with (not_nil ? (a::l));
- nrewrite > Heq; //;
-nqed.
-
-(*
-let rec id_list A (l: list A) on l :=
- match l with
- [ nil => []
- | (cons hd tl) => hd :: id_list A tl ]. *)
-
-nlet rec append A (l1: list A) l2 on l1 :=
- match l1 with
- [ nil ⇒ l2
- | cons hd tl ⇒ hd :: append A tl l2 ].
-
-ndefinition hd ≝ λA:Type.λl: list A.λd:A.
- match l with
- [ nil ⇒ d
- | cons a _ ⇒ a].
-
-ndefinition tail ≝ λA:Type.λl: list A.
- match l with
- [ nil ⇒ []
- | cons hd tl ⇒ tl].
-
-interpretation "append" 'append l1 l2 = (append ? l1 l2).
-
-ntheorem append_nil: ∀A:Type.∀l:list A.l @ [] = l.
-#A; #l; nelim l; nnormalize;//; nqed.
-
-ntheorem associative_append:
- ∀A:Type.associative (list A) (append A).
-#A; #l1; #l2; #l3; nelim l1; nnormalize; //; nqed.
-
-(* deleterio per auto
-ntheorem cons_append_commute:
- ∀A:Type.∀l1,l2:list A.∀a:A.
- a :: (l1 @ l2) = (a :: l1) @ l2.
-//; nqed. *)
-
-ntheorem append_cons:∀A.∀a:A.∀l,l1.l@(a::l1)=(l@[a])@l1.
-#A; #a; #l; #l1; napply sym_eq.
-napply associative_append.
-(* /2/; *) nqed.
-
-ntheorem nil_append_elim: ∀A.∀l1,l2: list A.∀P: list A → list A → Prop.
- l1@l2 = [] → P (nil A) (nil A) → P l1 l2.
-#A;#l1; #l2; #P; ncases l1; nnormalize;//;
-#a; #l3; #heq; ndestruct;
-nqed.
-
-ntheorem nil_to_nil: ∀A.∀l1,l2:list A.
- l1@l2 = [] → l1 = [] ∧ l2 = [].
-#A; #l1; #l2; #isnil; napply (nil_append_elim A l1 l2);/2/;
-nqed.
-
-(* ierators *)
-
-nlet rec map (A,B:Type) (f: A → B) (l:list A) on l: list B ≝
- match l with [ nil ⇒ nil ? | cons x tl ⇒ f x :: (map A B f tl)].
-
-nlet rec foldr (A,B:Type) (f:A → B → B) (b:B) (l:list A) on l :B ≝
- match l with [ nil ⇒ b | cons a l ⇒ f a (foldr A B f b l)].
-
-ndefinition filter ≝
- λT:Type.λl:list T.λp:T → bool.
- foldr T (list T) (λx,l0.if_then_else ? (p x) (x::l0) l0).
-
-ntheorem eq_map : ∀A,B,f,g,l. (∀x.f x = g x) → map A B f l = map A B g l.
-#A; #B; #f; #g; #l; #eqfg; nelim l; nnormalize; //; nqed.
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "basics/list.ma".
-include "arithmetics/nat.ma".
-
-nlet rec length (A:Type) (l:list A) on l ≝
- match l with
- [ nil ⇒ 0
- | cons a tl ⇒ S (length A tl)].
-
-notation "|M|" non associative with precedence 60 for @{'norm $M}.
-interpretation "norm" 'norm l = (length ? l).
-
-nlet rec nth n (A:Type) (l:list A) (d:A) ≝
- match n with
- [O ⇒ hd A l d
- |S m ⇒ nth m A (tail A l) d].
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-include "Plogic/connectives.ma".
-
-ndefinition relation : Type \to Type
-≝ λA:Type.A→A→Prop.
-
-nrecord relation (A:Type) : Type ≝
-{fun:2> A→A→Prop}.
-
-ndefinition reflexive: ∀A:Type.∀R :relation A.Prop
-≝ λA.λR.∀x:A.R x x.
-
-ndefinition symmetric: ∀A:Type.∀R: relation A.Prop
-≝ λA.λR.∀x,y:A.R x y → R y x.
-
-ndefinition transitive: ∀A:Type.∀R:relation A.Prop
-≝ λA.λR.∀x,y,z:A.R x y → R y z → R x z.
-
-ndefinition irreflexive: ∀A:Type.∀R:relation A.Prop
-≝ λA.λR.∀x:A.¬(R x x).
-
-ndefinition cotransitive: ∀A:Type.∀R:relation A.Prop
-≝ λA.λR.∀x,y:A.R x y → ∀z:A. R x z ∨ R z y.
-
-ndefinition tight_apart: ∀A:Type.∀eq,ap:relation A.Prop
-≝ λA.λeq,ap.∀x,y:A. (¬(ap x y) → eq x y) ∧
-(eq x y → ¬(ap x y)).
-
-ndefinition antisymmetric: ∀A:Type.∀R:relation A.Prop
-≝ λA.λR.∀x,y:A. R x y → ¬(R y x).
-
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "datatypes/bool.ma".
-include "sets/setoids.ma".
-
-ndefinition eq_bool ≝
- λa,b.match a with
- [ true ⇒ match b with [ true ⇒ True | _ ⇒ False ]
- | false ⇒ match b with [ false ⇒ True | _ ⇒ False ]].
-
- (* XXX move to bool *)
-interpretation "bool eq" 'eq_low a b = (eq_bool a b).
-
-ndefinition BOOL : setoid.
-@bool; @(eq_bool); #x; ncases x; //; #y; ncases y; //; #z; ncases z; //; nqed.
-
-alias symbol "hint_decl" (instance 1) = "hint_decl_Type1".
-alias id "refl" = "cic:/matita/ng/properties/relations/refl.fix(0,1,3)".
-unification hint 0 ≔ ;
- P1 ≟ refl ? (eq0 BOOL),
- P2 ≟ sym ? (eq0 BOOL),
- P3 ≟ trans ? (eq0 BOOL),
- X ≟ mk_setoid bool (mk_equivalence_relation ? (eq_bool) P1 P2 P3)
-(*-----------------------------------------------------------------------*) ⊢
- carr X ≡ bool.
-
-unification hint 0 ≔ a,b;
- R ≟ eq0 BOOL,
- L ≟ bool
-(* -------------------------------------------- *) ⊢
- eq_bool a b ≡ eq_rel L R a b.
include "logic/pts.ma".
-ninductive bool: Type[0] ≝ true: bool | false: bool.
-
-ndefinition orb ≝ λa,b:bool. match a with [ true ⇒ true | _ ⇒ b ].
-
-notation "a || b" left associative with precedence 30 for @{'orb $a $b}.
-interpretation "orb" 'orb a b = (orb a b).
\ No newline at end of file
+ninductive bool: Type[0] ≝
+ true: bool
+ | false: bool.
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "datatypes/list.ma".
-include "sets/setoids.ma".
-
-nlet rec eq_list (A : setoid) (l1, l2 : list A) on l1 : CProp[0] ≝
-match l1 with
-[ nil ⇒ match l2 return λ_.CProp[0] with [ nil ⇒ True | _ ⇒ False ]
-| cons x xs ⇒ match l2 with [ nil ⇒ False | cons y ys ⇒ x = y ∧ eq_list ? xs ys]].
-
-interpretation "eq_list" 'eq_low a b = (eq_list ? a b).
-
-ndefinition LIST : setoid → setoid.
-#S; @(list S); @(eq_list S);
-##[ #l; nelim l; //; #; @; //;
-##| #l1; nelim l1; ##[ #y; ncases y; //] #x xs H y; ncases y; ##[*] #y ys; *; #; @; /2/;
-##| #l1; nelim l1; ##[ #l2 l3; ncases l2; ncases l3; /3/; #z zs y ys; *]
- #x xs H l2 l3; ncases l2; ncases l3; /2/; #z zs y yz; *; #H1 H2; *; #H3 H4; @; /3/;##]
-nqed.
-
-alias symbol "hint_decl" (instance 1) = "hint_decl_Type1".
-unification hint 0 ≔ S : setoid;
- T ≟ carr S,
- P1 ≟ refl ? (eq0 (LIST S)),
- P2 ≟ sym ? (eq0 (LIST S)),
- P3 ≟ trans ? (eq0 (LIST S)),
- X ≟ mk_setoid (list (carr S)) (mk_equivalence_relation ? (eq_list S) P1 P2 P3)
-(*-----------------------------------------------------------------------*) ⊢
- carr X ≡ list T.
-
-unification hint 0 ≔ S:setoid, a,b:list (carr S);
- R ≟ eq0 (LIST S),
- L ≟ (list (carr S))
-(* -------------------------------------------- *) ⊢
- eq_list S a b ≡ eq_rel L R a b.
-
-nlemma append_is_morph : ∀A:setoid.(list A) ⇒_0 (list A) ⇒_0 (list A).
-#A; napply (mk_binary_morphism … (λs1,s2:list A. s1 @ s2)); #a; nelim a;
-##[ #l1 l2 l3 defl1 El2l3; ncases l1 in defl1; ##[#;nassumption] #x xs; *;
-##| #x xs IH l1 l2 l3 defl1 El2l3; ncases l1 in defl1; ##[ *] #y ys; *; #; /3/]
-nqed.
-
-alias symbol "hint_decl" (instance 1) = "hint_decl_Type0".
-unification hint 0 ≔ S:setoid, A,B:list (carr S);
- SS ≟ carr S,
- MM ≟ mk_unary_morphism ?? (λA:list (carr S).
- mk_unary_morphism ??
- (λB:list (carr S).A @ B) (prop1 ?? (fun1 ??(append_is_morph S) A)))
- (prop1 ?? (append_is_morph S)),
- T ≟ LIST S
-(*--------------------------------------------------------------------------*) ⊢
- fun1 T T (fun1 T (unary_morph_setoid T T) MM A) B ≡ append SS A B.
-
-
-(* XXX to understand if are always needed or only if the coercion is active *)
-include "sets/setoids1.ma".
-
-unification hint 0 ≔ SS : setoid;
- S ≟ carr SS,
- TT ≟ setoid1_of_setoid (LIST SS)
-(*-----------------------------------------------------------------*) ⊢
- list S ≡ carr1 TT.
-
-alias symbol "hint_decl" (instance 1) = "hint_decl_CProp2".
-unification hint 0 ≔ S : setoid, x,y;
- SS ≟ LIST S,
- TT ≟ setoid1_of_setoid SS
-(*-----------------------------------------*) ⊢
- eq_list S x y ≡ eq_rel1 ? (eq1 TT) x y.
-
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "arithmetics/nat.ma".
-include "datatypes/list.ma".
-
-ntheorem nil_cons:
- ∀A:Type[0].∀l:list A.∀a:A. a::l ≠ [].
-#A;#l;#a; @; #H; ndestruct;
-nqed.
-
-ntheorem append_nil: ∀A:Type.∀l:list A.l @ [ ] = l.
-#A;#l;nelim l;//;
-#a;#l1;#IH;nnormalize;//;
-nqed.
-
-ntheorem associative_append: ∀A:Type[0].associative (list A) (append A).
-#A;#x;#y;#z;nelim x
-##[//
-##|#a;#x1;#H;nnormalize;//]
-nqed.
-
-ntheorem cons_append_commute:
- ∀A:Type[0].∀l1,l2:list A.∀a:A.
- a :: (l1 @ l2) = (a :: l1) @ l2.
-//;
-nqed.
-
-nlemma append_cons: ∀A.∀a:A.∀l,l1. l@(a::l1)=(l@[a])@l1.
-#A;#a;#l;#l1;nrewrite > (associative_append ????);//;
-nqed.
-
-(*ninductive permutation (A:Type) : list A -> list A -> Prop \def
- | refl : \forall l:list A. permutation ? l l
- | swap : \forall l:list A. \forall x,y:A.
- permutation ? (x :: y :: l) (y :: x :: l)
- | trans : \forall l1,l2,l3:list A.
- permutation ? l1 l2 -> permut1 ? l2 l3 -> permutation ? l1 l3
-with permut1 : list A -> list A -> Prop \def
- | step : \forall l1,l2:list A. \forall x,y:A.
- permut1 ? (l1 @ (x :: y :: l2)) (l1 @ (y :: x :: l2)).*)
-
-(*
-
-definition x1 \def S O.
-definition x2 \def S x1.
-definition x3 \def S x2.
-
-theorem tmp : permutation nat (x1 :: x2 :: x3 :: []) (x1 :: x3 :: x2 :: []).
- apply (trans ? (x1 :: x2 :: x3 :: []) (x1 :: x2 :: x3 :: []) ?).
- apply refl.
- apply (step ? (x1::[]) [] x2 x3).
- qed.
-
-theorem nil_append_nil_both:
- \forall A:Type.\forall l1,l2:list A.
- l1 @ l2 = [] \to l1 = [] \land l2 = [].
-
-theorem test_notation: [O; S O; S (S O)] = O :: S O :: S (S O) :: [].
-reflexivity.
-qed.
-
-theorem test_append: [O;O;O;O;O;O] = [O;O;O] @ [O;O] @ [O].
-simplify.
-reflexivity.
-qed.
-
-*)
-
-nlet rec nth A l d n on n ≝
- match n with
- [ O ⇒ match l with
- [ nil ⇒ d
- | cons (x : A) _ ⇒ x ]
- | S n' ⇒ nth A (tail ? l) d n'].
-
-nlet rec map A B f l on l ≝
- match l with [ nil ⇒ nil B | cons (x:A) tl ⇒ f x :: map A B f tl ].
-
-nlet rec foldr (A,B:Type[0]) (f : A → B → B) (b:B) l on l ≝
- match l with [ nil ⇒ b | cons (a:A) tl ⇒ f a (foldr A B f b tl) ].
-
-ndefinition length ≝ λT:Type[0].λl:list T.foldr T nat (λx,c.S c) O l.
-
-ndefinition filter ≝
- λT:Type[0].λl:list T.λp:T → bool.
- foldr T (list T)
- (λx,l0.match (p x) with [ true => x::l0 | false => l0]) [] l.
-
-ndefinition iota : nat → nat → list nat ≝
- λn,m. nat_rect_Type0 (λ_.list ?) (nil ?) (λx,acc.cons ? (n+x) acc) m.
-
-(* ### induction principle for functions visiting 2 lists in parallel *)
-nlemma list_ind2 :
- ∀T1,T2:Type[0].∀l1:list T1.∀l2:list T2.∀P:list T1 → list T2 → Prop.
- length ? l1 = length ? l2 →
- (P (nil ?) (nil ?)) →
- (∀tl1,tl2,hd1,hd2. P tl1 tl2 → P (hd1::tl1) (hd2::tl2)) →
- P l1 l2.
-#T1;#T2;#l1;#l2;#P;#Hl;#Pnil;#Pcons;
-ngeneralize in match Hl; ngeneralize in match l2;
-nelim l1
-##[#l2;ncases l2;//;
- nnormalize;#t2;#tl2;#H;ndestruct;
-##|#t1;#tl1;#IH;#l2;ncases l2
- ##[nnormalize;#H;ndestruct
- ##|#t2;#tl2;#H;napply Pcons;napply IH;nnormalize in H;ndestruct;//]
-##]
-nqed.
-
-nlemma eq_map : ∀A,B,f,g,l. (∀x.f x = g x) → map A B f l = map A B g l.
-#A;#B;#f;#g;#l;#Efg;
-nelim l; nnormalize;//;
-nqed.
-
-nlemma le_length_filter : ∀A,l,p.length A (filter A l p) ≤ length A l.
-#A;#l;#p;nelim l;nnormalize
-##[//
-##|#a;#tl;#IH;ncases (p a);nnormalize;
- ##[napply le_S_S;//;
- ##|@2;//]
-##]
-nqed.
-
-nlemma length_append : ∀A,l,m.length A (l@m) = length A l + length A m.
-#A;#l;#m;nelim l;
-##[//
-##|#H;#tl;#IH;nnormalize;nrewrite < IH;//]
-nqed.
-
-ninductive in_list (A:Type): A → (list A) → Prop ≝
-| in_list_head : ∀ x,l.(in_list A x (x::l))
-| in_list_cons : ∀ x,y,l.(in_list A x l) → (in_list A x (y::l)).
-
-ndefinition incl : \forall A.(list A) \to (list A) →Prop \def
- \lambda A,l,m.\forall x.in_list A x l \to in_list A x m.
-
-notation "hvbox(a break ∉ b)" non associative with precedence 45
-for @{ 'notmem $a $b }.
-
-interpretation "list member" 'mem x l = (in_list ? x l).
-interpretation "list not member" 'notmem x l = (Not (in_list ? x l)).
-interpretation "list inclusion" 'subseteq l1 l2 = (incl ? l1 l2).
-
-naxiom not_in_list_nil : \forall A,x.\lnot in_list A x [].
-(*intros.unfold.intro.inversion H
- [intros;lapply (sym_eq ? ? ? H2);destruct Hletin
- |intros;destruct H4]
-qed.*)
-
-naxiom in_list_cons_case : \forall A,x,a,l.in_list A x (a::l) \to
- x = a \lor in_list A x l.
-(*intros;inversion H;intros
- [destruct H2;left;reflexivity
- |destruct H4;right;assumption]
-qed.*)
-
-naxiom in_list_tail : \forall l,x,y.
- in_list nat x (y::l) \to x \neq y \to in_list nat x l.
-(*intros 4;elim (in_list_cons_case ? ? ? ? H)
- [elim (H2 H1)
- |assumption]
-qed.*)
-
-naxiom in_list_singleton_to_eq : \forall A,x,y.in_list A x [y] \to x = y.
-(*intros;elim (in_list_cons_case ? ? ? ? H)
- [assumption
- |elim (not_in_list_nil ? ? H1)]
-qed.*)
-
-naxiom in_list_to_in_list_append_l: \forall A.\forall x:A.
-\forall l1,l2.in_list ? x l1 \to in_list ? x (l1@l2).
-(*intros.
-elim H;simplify
- [apply in_list_head
- |apply in_list_cons;assumption
- ]
-qed.*)
-
-naxiom in_list_to_in_list_append_r: \forall A.\forall x:A.
-\forall l1,l2. in_list ? x l2 \to in_list ? x (l1@l2).
-(*intros 3.
-elim l1;simplify
- [assumption
- |apply in_list_cons;apply H;assumption
- ]
-qed.*)
-
-naxiom in_list_append_to_or_in_list: \forall A:Type.\forall x:A.
-\forall l,l1. in_list ? x (l@l1) \to in_list ? x l \lor in_list ? x l1.
-(*intros 3.
-elim l
- [right.apply H
- |simplify in H1.inversion H1;intros; destruct;
- [left.apply in_list_head
- | elim (H l2)
- [left.apply in_list_cons. assumption
- |right.assumption
- |assumption
- ]
- ]
- ]
-qed.*)
-
-nlet rec mem (A:Type) (eq: A → A → bool) x (l: list A) on l ≝
- match l with
- [ nil ⇒ false
- | (cons a l') ⇒
- match eq x a with
- [ true ⇒ true
- | false ⇒ mem A eq x l'
- ]
- ].
-
-naxiom mem_true_to_in_list :
- \forall A,equ.
- (\forall x,y.equ x y = true \to x = y) \to
- \forall x,l.mem A equ x l = true \to in_list A x l.
-(* intros 5.elim l
- [simplify in H1;destruct H1
- |simplify in H2;apply (bool_elim ? (equ x a))
- [intro;rewrite > (H ? ? H3);apply in_list_head
- |intro;rewrite > H3 in H2;simplify in H2;
- apply in_list_cons;apply H1;assumption]]
-qed.*)
-
-naxiom in_list_to_mem_true :
- \forall A,equ.
- (\forall x.equ x x = true) \to
- \forall x,l.in_list A x l \to mem A equ x l = true.
-(*intros 5.elim l
- [elim (not_in_list_nil ? ? H1)
- |elim H2
- [simplify;rewrite > H;reflexivity
- |simplify;rewrite > H4;apply (bool_elim ? (equ a1 a2));intro;reflexivity]].
-qed.*)
-
-naxiom in_list_filter_to_p_true : \forall A,l,x,p.
-in_list A x (filter A l p) \to p x = true.
-(* intros 4;elim l
- [simplify in H;elim (not_in_list_nil ? ? H)
- |simplify in H1;apply (bool_elim ? (p a));intro;rewrite > H2 in H1;
- simplify in H1
- [elim (in_list_cons_case ? ? ? ? H1)
- [rewrite > H3;assumption
- |apply (H H3)]
- |apply (H H1)]]
-qed.*)
-
-naxiom in_list_filter : \forall A,l,p,x.in_list A x (filter A l p) \to in_list A x l.
-(*intros 4;elim l
- [simplify in H;elim (not_in_list_nil ? ? H)
- |simplify in H1;apply (bool_elim ? (p a));intro;rewrite > H2 in H1;
- simplify in H1
- [elim (in_list_cons_case ? ? ? ? H1)
- [rewrite > H3;apply in_list_head
- |apply in_list_cons;apply H;assumption]
- |apply in_list_cons;apply H;assumption]]
-qed.*)
-
-naxiom in_list_filter_r : \forall A,l,p,x.
- in_list A x l \to p x = true \to in_list A x (filter A l p).
-(* intros 4;elim l
- [elim (not_in_list_nil ? ? H)
- |elim (in_list_cons_case ? ? ? ? H1)
- [rewrite < H3;simplify;rewrite > H2;simplify;apply in_list_head
- |simplify;apply (bool_elim ? (p a));intro;simplify;
- [apply in_list_cons;apply H;assumption
- |apply H;assumption]]]
-qed.*)
-
-naxiom incl_A_A: ∀T,A.incl T A A.
-(*intros.unfold incl.intros.assumption.
-qed.*)
-
-naxiom incl_append_l : ∀T,A,B.incl T A (A @ B).
-(*unfold incl; intros;autobatch.
-qed.*)
-
-naxiom incl_append_r : ∀T,A,B.incl T B (A @ B).
-(*unfold incl; intros;autobatch.
-qed.*)
-
-naxiom incl_cons : ∀T,A,B,x.incl T A B → incl T (x::A) (x::B).
-(*unfold incl; intros;elim (in_list_cons_case ? ? ? ? H1);autobatch.
-qed.*)
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "logic/pts.ma".
-include "arithmetics/nat.ma".
-
-ninductive list (A:Type[0]) : Type[0] ≝
- | nil: list A
- | cons: A -> list A -> list A.
-
-notation "hvbox(hd break :: tl)"
- right associative with precedence 47
- for @{'cons $hd $tl}.
-
-notation "[ list0 x sep ; ]"
- non associative with precedence 90
- for ${fold right @'nil rec acc @{'cons $x $acc}}.
-
-notation "hvbox(l1 break @ l2)"
- right associative with precedence 47
- for @{'append $l1 $l2 }.
-
-interpretation "nil" 'nil = (nil ?).
-interpretation "cons" 'cons hd tl = (cons ? hd tl).
-
-nlet rec append A (l1: list A) l2 on l1 ≝
- match l1 with
- [ nil ⇒ l2
- | cons hd tl ⇒ hd :: append A tl l2 ].
-
-interpretation "append" 'append l1 l2 = (append ? l1 l2).
-
-nlet rec id_list A (l: list A) on l ≝
- match l with
- [ nil ⇒ []
- | cons hd tl ⇒ hd :: id_list A tl ].
-
-
-ndefinition tail ≝ λA:Type[0].λl:list A.
- match l with
- [ nil ⇒ []
- | cons hd tl ⇒ tl].
-
-nlet rec flatten S (l : list (list S)) on l : list S ≝
-match l with [ nil ⇒ [ ] | cons w tl ⇒ w @ flatten ? tl ].
-
-ntheorem append_nil: ∀A:Type.∀l:list A.l @ [] = l.
-#A;#l;nelim l;//;
-#a;#l1;#IH;nnormalize;
-nrewrite > IH;//;
-nqed.
-
-ntheorem associative_append: ∀A:Type[0].associative (list A) (append A).
-#A;#x;#y;#z;nelim x
-##[//
-##|#a;#x1;#H;nnormalize;//]
-nqed.
-
-ntheorem cons_append_commute:
- ∀A:Type[0].∀l1,l2:list A.∀a:A.
- a :: (l1 @ l2) = (a :: l1) @ l2.
-//;
-nqed.
-
-nlemma append_cons: ∀A.∀a:A.∀l,l1. l@(a::l1)=(l@[a])@l1.
-#A;#a;#l;#l1;nrewrite > (associative_append ????);//;
-nqed.
-
-(*ninductive permutation (A:Type) : list A -> list A -> Prop \def
- | refl : \forall l:list A. permutation ? l l
- | swap : \forall l:list A. \forall x,y:A.
- permutation ? (x :: y :: l) (y :: x :: l)
- | trans : \forall l1,l2,l3:list A.
- permutation ? l1 l2 -> permut1 ? l2 l3 -> permutation ? l1 l3
-with permut1 : list A -> list A -> Prop \def
- | step : \forall l1,l2:list A. \forall x,y:A.
- permut1 ? (l1 @ (x :: y :: l2)) (l1 @ (y :: x :: l2)).*)
-
-(*
-
-definition x1 \def S O.
-definition x2 \def S x1.
-definition x3 \def S x2.
-
-theorem tmp : permutation nat (x1 :: x2 :: x3 :: []) (x1 :: x3 :: x2 :: []).
- apply (trans ? (x1 :: x2 :: x3 :: []) (x1 :: x2 :: x3 :: []) ?).
- apply refl.
- apply (step ? (x1::[]) [] x2 x3).
- qed.
-
-theorem nil_append_nil_both:
- \forall A:Type.\forall l1,l2:list A.
- l1 @ l2 = [] \to l1 = [] \land l2 = [].
-
-theorem test_notation: [O; S O; S (S O)] = O :: S O :: S (S O) :: [].
-reflexivity.
-qed.
-
-theorem test_append: [O;O;O;O;O;O] = [O;O;O] @ [O;O] @ [O].
-simplify.
-reflexivity.
-qed.
-
-*)
-
-nlet rec nth A l d n on l ≝
- match l with
- [ nil ⇒ d
- | cons (x:A) tl ⇒ match n with
- [ O ⇒ x
- | S n' ⇒ nth A tl d n' ] ].
-
-nlet rec map A B f l on l ≝
- match l with [ nil ⇒ nil B | cons (x:A) tl ⇒ f x :: map A B f tl ].
-
-nlet rec foldr (A,B:Type[0]) (f : A → B → B) (b:B) l on l ≝
- match l with [ nil ⇒ b | cons (a:A) tl ⇒ f a (foldr A B f b tl) ].
-
-ndefinition length ≝ λT:Type[0].λl:list T.foldr T nat (λx,c.S c) O l.
-
-ndefinition filter ≝
- λT:Type[0].λl:list T.λp:T → bool.
- foldr T (list T)
- (λx,l0.match (p x) with [ true => x::l0 | false => l0]) [] l.
-
-ndefinition iota : nat → nat → list nat ≝
- λn,m. nat_rect_Type0 (λ_.list ?) (nil ?) (λx,acc.cons ? (n+x) acc) m.
-
-(* ### induction principle for functions visiting 2 lists in parallel *)
-nlemma list_ind2 :
- ∀T1,T2:Type[0].∀l1:list T1.∀l2:list T2.∀P:list T1 → list T2 → Prop.
- length ? l1 = length ? l2 →
- (P (nil ?) (nil ?)) →
- (∀tl1,tl2,hd1,hd2. P tl1 tl2 → P (hd1::tl1) (hd2::tl2)) →
- P l1 l2.
-#T1;#T2;#l1;#l2;#P;#Hl;#Pnil;#Pcons;
-ngeneralize in match Hl; ngeneralize in match l2;
-nelim l1
-##[#l2;ncases l2;//;
- nnormalize;#t2;#tl2;#H;ndestruct;
-##|#t1;#tl1;#IH;#l2;ncases l2
- ##[nnormalize;#H;ndestruct
- ##|#t2;#tl2;#H;napply Pcons;napply IH;nnormalize in H;ndestruct;//]
-##]
-nqed.
-
-nlemma eq_map : ∀A,B,f,g,l. (∀x.f x = g x) → map A B f l = map A B g l.
-#A;#B;#f;#g;#l;#Efg;
-nelim l; nnormalize;//;
-nqed.
-
-nlemma le_length_filter : ∀A,l,p.length A (filter A l p) ≤ length A l.
-#A;#l;#p;nelim l;nnormalize
-##[//
-##|#a;#tl;#IH;ncases (p a);nnormalize;
- ##[napply le_S_S;//;
- ##|@2;//]
-##]
-nqed.
-
-nlemma length_append : ∀A,l,m.length A (l@m) = length A l + length A m.
-#A;#l;#m;nelim l;
-##[//
-##|#H;#tl;#IH;nnormalize;nrewrite < IH;//]
-nqed.
-
-ninductive in_list (A:Type): A → (list A) → Prop ≝
-| in_list_head : ∀ x,l.(in_list A x (x::l))
-| in_list_cons : ∀ x,y,l.(in_list A x l) → (in_list A x (y::l)).
-
-ndefinition incl : \forall A.(list A) \to (list A) \to Prop \def
- \lambda A,l,m.\forall x.in_list A x l \to in_list A x m.
-
-notation "hvbox(a break ∉ b)" non associative with precedence 45
-for @{ 'notmem $a $b }.
-
-interpretation "list member" 'mem x l = (in_list ? x l).
-interpretation "list not member" 'notmem x l = (Not (in_list ? x l)).
-interpretation "list inclusion" 'subseteq l1 l2 = (incl ? l1 l2).
-
-nlemma not_in_list_nil : \forall A,x.\lnot in_list A x [].
-#A x;@;#H1;ninversion H1;
-##[#a0 al0 H2 H3;ndestruct (H3);
-##|#a0 a1 al0 H2 H3 H4 H5;ndestruct (H5)
-##]
-nqed.
-
-nlemma in_list_cons_case : \forall A,x,a,l.in_list A x (a::l) \to
- x = a \lor in_list A x l.
-#A a0 a1 al0 H1;ninversion H1
-##[#a2 al1 H2 H3;ndestruct (H3);@;@
-##|#a2 a3 al1 H2 H3 H4 H5;ndestruct (H5);@2;//
-##]
-nqed.
-
-nlemma in_list_tail : \forall A,l,x,y.
- in_list A x (y::l) \to x \neq y \to in_list A x l.
-#A;#l;#x;#y;#H;#Hneq;
-ninversion H;
-##[#x1;#l1;#Hx;#Hl;ndestruct;nelim Hneq;#Hfalse;
- nelim (Hfalse ?);@;
-##|#x1;#y1;#l1;#H1;#_;#Hx;#Heq;ndestruct;//;
-##]
-nqed.
-
-nlemma in_list_singleton_to_eq : \forall A,x,y.in_list A x [y] \to x = y.
-#A a0 a1 H1;ncases (in_list_cons_case ???? H1)
-##[//
-##|#H2;napply False_ind;ncases (not_in_list_nil ? a0);#H3;/2/
-##]
-nqed.
-
-nlemma in_list_to_in_list_append_l: \forall A.\forall x:A.
-\forall l1,l2.in_list ? x l1 \to in_list ? x (l1@l2).
-#A a0 al0 al1 H1;nelim H1
-##[#a1 al2;@;
-##|#a1 a2 al2 H2 H3;@2;//
-##]
-nqed.
-
-nlemma in_list_to_in_list_append_r: \forall A.\forall x:A.
-\forall l1,l2. in_list ? x l2 \to in_list ? x (l1@l2).
-#A a0 al0 al1 H1;nelim al0
-##[napply H1
-##|#a1 al2 IH;@2;napply IH
-##]
-nqed.
-
-nlemma in_list_append_to_or_in_list: \forall A:Type.\forall x:A.
-\forall l,l1. in_list ? x (l@l1) \to in_list ? x l \lor in_list ? x l1.
-#A a0 al0;nelim al0
-##[#al1 H1;@2;napply H1
-##|#a1 al1 IH al2 H1;nnormalize in H1;
- ncases (in_list_cons_case ???? H1);#H2
- ##[@;nrewrite > H2;@
- ##|ncases (IH … H2);#H3
- ##[@;@2;//
- ##|@2;//
- ##]
- ##]
-##]
-nqed.
-
-nlet rec mem (A:Type) (eq: A → A → bool) x (l: list A) on l ≝
- match l with
- [ nil ⇒ false
- | (cons a l') ⇒
- match eq x a with
- [ true ⇒ true
- | false ⇒ mem A eq x l'
- ]
- ].
-
-nlemma mem_true_to_in_list :
- \forall A,equ.
- (\forall x,y.equ x y = true \to x = y) \to
- \forall x,l.mem A equ x l = true \to in_list A x l.
-#A equ H1 a0 al0;nelim al0
-##[nnormalize;#H2;ndestruct (H2)
-##|#a1 al1 IH H2;nwhd in H2:(??%?);
- nlapply (refl ? (equ a0 a1));ncases (equ a0 a1) in ⊢ (???% → %);#H3
- ##[nrewrite > (H1 … H3);@
- ##|@2;napply IH;nrewrite > H3 in H2;nnormalize;//;
- ##]
-##]
-nqed.
-
-nlemma in_list_to_mem_true :
- \forall A,equ.
- (\forall x.equ x x = true) \to
- \forall x,l.in_list A x l \to mem A equ x l = true.
-#A equ H1 a0 al0;nelim al0
-##[#H2;napply False_ind;ncases (not_in_list_nil ? a0);/2/
-##|#a1 al1 IH H2;nelim H2
- ##[nnormalize;#a2 al2;nrewrite > (H1 …);@
- ##|#a2 a3 al2 H3 H4;nnormalize;ncases (equ a2 a3);nnormalize;//;
- ##]
-##]
-nqed.
-
-nlemma in_list_filter_to_p_true : \forall A,l,x,p.
-in_list A x (filter A l p) \to p x = true.
-#A al0 a0 p;nelim al0
-##[nnormalize;#H1;napply False_ind;ncases (not_in_list_nil ? a0);/2/
-##|#a1 al1 IH H1;nnormalize in H1;nlapply (refl ? (p a1));
- ngeneralize in match H1;ncases (p a1) in ⊢ (???% -> ???% → %);
- ##[#H2 H3;ncases (in_list_cons_case ???? H2);#H4
- ##[nrewrite > H4;//
- ##|napply (IH H4);
- ##]
- ##|#H2 H3;napply (IH H2);
- ##]
-##]
-nqed.
-
-nlemma in_list_filter : \forall A,l,p,x.in_list A x (filter A l p) \to in_list A x l.
-#A al0 p a0;nelim al0
-##[nnormalize;//;
-##|#a1 al1 IH H1;nnormalize in H1;
- nlapply (refl ? (p a1));ncases (p a1) in ⊢ (???% → %);#H2
- ##[nrewrite > H2 in H1;#H1;ncases (in_list_cons_case ???? H1);#H3
- ##[nrewrite > H3;@
- ##|@2;napply IH;napply H3
- ##]
- ##|@2;napply IH;nrewrite > H2 in H1;#H1;napply H1;
- ##]
-##]
-nqed.
-
-nlemma in_list_filter_r : \forall A,l,p,x.
- in_list A x l \to p x = true \to in_list A x (filter A l p).
-#A al0 p a0;nelim al0
-##[#H1;napply False_ind;ncases (not_in_list_nil ? a0);/2/
-##|#a1 al1 IH H1 H2;ncases (in_list_cons_case ???? H1);#H3
- ##[nnormalize;nrewrite < H3;nrewrite > H2;@
- ##|nnormalize;ncases (p a1);nnormalize;
- ##[@2;napply IH;//
- ##|napply IH;//
- ##]
- ##]
-##]
-nqed.
-
-nlemma incl_A_A: ∀T,A.incl T A A.
-#A al0 a0 H1;//;
-nqed.
-
-nlemma incl_append_l : ∀T,A,B.incl T A (A @ B).
-#A al0 al1 a0 H1;/2/;
-nqed.
-
-nlemma incl_append_r : ∀T,A,B.incl T B (A @ B).
-#A al0 al1 a0 H1;/2/;
-nqed.
-
-nlemma incl_cons : ∀T,A,B,x.incl T A B → incl T (x::A) (x::B).
-#A al0 al1 a0 H1 a1 H2;ncases (in_list_cons_case ???? H2);/2/;
-#H3;@2;napply H1;//;
-nqed.
-
-nlet rec foldl (A,B:Type[0]) (f:A → B → A) (a:A) (l:list B) on l ≝
- match l with
- [ nil ⇒ a
- | cons b bl ⇒ foldl A B f (f a b) bl ].
-
-nlet rec foldl2 (A,B,C:Type[0]) (f:A → B → C → A) (a:A) (bl:list B) (cl:list C) on bl ≝
- match bl with
- [ nil ⇒ a
- | cons b0 bl0 ⇒ match cl with
- [ nil ⇒ a
- | cons c0 cl0 ⇒ foldl2 A B C f (f a b0 c0) bl0 cl0 ] ].
-
-nlet rec foldr2 (A,B : Type[0]) (X : Type[0]) (f: A → B → X → X) (x:X)
- (al : list A) (bl : list B) on al : X ≝
- match al with
- [ nil ⇒ x
- | cons a al1 ⇒ match bl with
- [ nil ⇒ x
- | cons b bl1 ⇒ f a b (foldr2 ??? f x al1 bl1) ] ].
-
-nlet rec rev (A:Type[0]) (l:list A) on l ≝
- match l with
- [ nil ⇒ nil A
- | cons hd tl ⇒ (rev A tl)@[hd] ].
-
-notation > "hvbox(a break \liff b)"
- left associative with precedence 25
-for @{ 'iff $a $b }.
-
-notation "hvbox(a break \leftrightarrow b)"
- left associative with precedence 25
-for @{ 'iff $a $b }.
-
-interpretation "logical iff" 'iff x y = (iff x y).
-
-ndefinition coincl : ∀A.list A → list A → Prop ≝ λA,l1,l2.∀x.x ∈ l1 ↔ x ∈ l2.
-
-notation > "hvbox(a break ≡ b)"
- non associative with precedence 45
-for @{'equiv $a $b}.
-
-notation < "hvbox(term 46 a break ≡ term 46 b)"
- non associative with precedence 45
-for @{'equiv $a $b}.
-
-interpretation "list coinclusion" 'equiv x y = (coincl ? x y).
-
-nlemma refl_coincl : ∀A.∀l:list A.l ≡ l.
-#;@;#;//;
-nqed.
-
-nlemma coincl_rev : ∀A.∀l:list A.l ≡ rev ? l.
-#A l x;@;nelim l
-##[##1,3:#H;napply False_ind;ncases (not_in_list_nil ? x);
- #H1;napply (H1 H);
-##|#a l0 IH H;ncases (in_list_cons_case ???? H);#H1
- ##[napply in_list_to_in_list_append_r;nrewrite > H1;@
- ##|napply in_list_to_in_list_append_l;/2/
- ##]
-##|#a l0 IH H;ncases (in_list_append_to_or_in_list ???? H);#H1
- ##[/3/;
- ##|nrewrite > (in_list_singleton_to_eq ??? H1);@
- ##]
-##]
-nqed.
-
-nlemma not_in_list_nil_r : ∀A.∀l:list A.l = [] → ∀x.x ∉ l.
-#A l;nelim l
-##[#;napply not_in_list_nil
-##|#a l0 IH Hfalse;ndestruct (Hfalse)
-##]
-nqed.
-
-nlemma eq_filter_append :
- ∀A,p,l1,l2.filter A (l1@l2) p = filter A l1 p@filter A l2 p.
-#A p l1 l2;nelim l1
-##[@
-##|#a0 l0 IH;nwhd in ⊢ (??%(??%?));ncases (p a0)
- ##[nwhd in ⊢ (??%%);nrewrite < IH;@
- ##|nwhd in ⊢ (??%(??%?));nrewrite < IH;@
- ##]
-##]
-nqed.
-
-nlemma map_ind :
- ∀A,B:Type[0].∀f:A→B.∀P:B → Prop.
- ∀al.(∀a.a ∈ al → P (f a)) →
- ∀b. b ∈ map ?? f al → P b.
-#A B f P al;nelim al
-##[#H1 b Hfalse;napply False_ind;
- ncases (not_in_list_nil ? b);#H2;napply H2;napply Hfalse;
-##|#a1 al1 IH H1 b Hin;nwhd in Hin:(???%);ncases (in_list_cons_case ???? Hin);
- ##[#e;nrewrite > e;napply H1;@
- ##|#Hin1;napply IH;
- ##[#a2 Hin2;napply H1;@2;//;
- ##|//
- ##]
- ##]
-##]
-nqed.
-
-nlemma map_compose :
- ∀A,B,C,f,g,l.map B C f (map A B g l) = map A C (λx.f (g x)) l.
-#A B C f g l;nelim l
-##[@
-##|#a0 al0 IH;nchange in ⊢ (??%%) with (cons ???);
- napply eq_f2; //;
-##]
-nqed.
-
-nlemma incl_incl_to_incl_append :
- ∀A.∀l1,l2,l1',l2':list A.l1 ⊆ l1' → l2 ⊆ l2' → l1@l2 ⊆ l1'@l2'.
-#A al0 al1 al2 al3 H1 H2 a0 H3;
-ncases (in_list_append_to_or_in_list ???? H3);#H4;
-##[napply in_list_to_in_list_append_l;napply H1;//
-##|napply in_list_to_in_list_append_r;napply H2;//
-##]
-nqed.
-
-nlemma eq_map_append :
- ∀A,B,f,l1,l2.map A B f (l1@l2) = map A B f l1@map A B f l2.
-#A B f al1 al2;nelim al1
-##[@
-##|#a0 al3 IH;nnormalize;nrewrite > IH;@;
-##]
-nqed.
-
-nlemma not_in_list_to_mem_false :
- ∀A,equ.
- (∀x,y.equ x y = true → x = y) →
- ∀x:A.∀l. x ∉ l → mem A equ x l = false.
-#A equ H1 a0 al0;nelim al0
-##[#_;@
-##|#a1 al1 IH H2;nwhd in ⊢ (??%?);
- nlapply (refl ? (equ a0 a1));ncases (equ a0 a1) in ⊢ (???% → %);#H3;
- ##[napply False_ind;ncases H2;#H4;napply H4;
- nrewrite > (H1 … H3);@
- ##|napply IH;@;#H4;ncases H2;#H5;napply H5;@2;//
- ##]
-##]
-nqed.
-
-nlet rec list_forall (A:Type[0]) (l:list A) (p:A → bool) on l : bool ≝
- match l with
- [ nil ⇒ (true:bool)
- | cons a al ⇒ p a ∧ list_forall A al p ].
-
-nlemma eq_map_f_g :
- ∀A,B,f,g,xl.(∀x.x ∈ xl → f x = g x) → map A B f xl = map A B g xl.
-#A B f g xl;nelim xl
-##[#;@
-##|#a al IH H1;nwhd in ⊢ (??%%);napply eq_f2
- ##[napply H1;@;
- ##|napply IH;#x Hx;napply H1;@2;//
- ##]
-##]
-nqed.
-
-nlemma x_in_map_to_eq :
- ∀A,B,f,x,l.x ∈ map A B f l → ∃x'.x = f x' ∧ x' ∈ l.
-#A B f x l;nelim l
-##[#H;ncases (not_in_list_nil ? x);#H1;napply False_ind;napply (H1 H)
-##|#a l0 IH H;ncases (in_list_cons_case ???? H);#H1
- ##[nrewrite > H1;@ a;@;@
- ##|ncases (IH H1);#a0;*;#H2 H3;@a0;@
- ##[// ##|@2;// ##]
- ##]
-##]
-nqed.
-
-nlemma list_forall_false :
- ∀A:Type[0].∀x,xl,p. p x = false → x ∈ xl → list_forall A xl p = false.
-#A x xl p H1;nelim xl
-##[#Hfalse;napply False_ind;ncases (not_in_list_nil ? x);#H2;napply (H2 Hfalse)
-##|#x0 xl0 IH H2;ncases (in_list_cons_case ???? H2);#H3
- ##[nwhd in ⊢ (??%?);nrewrite < H3;nrewrite > H1;@
- ##|nwhd in ⊢ (??%?);ncases (p x0)
- ##[nrewrite > (IH H3);@
- ##|@
- ##]
- ##]
-##]
-nqed.
-
-nlemma list_forall_true :
- ∀A:Type[0].∀xl,p. (∀x.x ∈ xl → p x = true) → list_forall A xl p = true.
-#A xl p;nelim xl
-##[#;@
-##|#x0 xl0 IH H1;nwhd in ⊢ (??%?);nrewrite > (H1 …)
- ##[napply IH;#x Hx;napply H1;@2;//
- ##|@
- ##]
-##]
-nqed.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "datatypes/pairs.ma".
-include "sets/setoids.ma".
-
-nlet rec eq_pair (A, B : setoid) (a : A × B) (b : A × B) on a : CProp[0] ≝
- match a with [ mk_pair a1 a2 ⇒
- match b with [ mk_pair b1 b2 ⇒ a1 = b1 ∧ a2 = b2 ]].
-
-interpretation "eq_pair" 'eq_low a b = (eq_pair ?? a b).
-
-nlemma PAIR : ∀A,B:setoid. setoid.
-#A B; @(A × B); @(eq_pair …);
-##[ #ab; ncases ab; #a b; @; napply #;
-##| #ab cd; ncases ab; ncases cd; #a1 a2 b1 b2; *; #E1 E2;
- @; napply (?^-1); //;
-##| #a b c; ncases a; ncases b; ncases c; #c1 c2 b1 b2 a1 a2;
- *; #E1 E2; *; #E3 E4; @; ##[ napply (.= E1); //] napply (.= E2); //.##]
-nqed.
-
-alias symbol "hint_decl" (instance 1) = "hint_decl_Type1".
-unification hint 0 ≔ AA, BB;
- A ≟ carr AA, B ≟ carr BB,
- P1 ≟ refl ? (eq0 (PAIR AA BB)),
- P2 ≟ sym ? (eq0 (PAIR AA BB)),
- P3 ≟ trans ? (eq0 (PAIR AA BB)),
- R ≟ mk_setoid (A × B) (mk_equivalence_relation ? (eq_pair …) P1 P2 P3)
-(*---------------------------------------------------------------------------*)⊢
- carr R ≡ A × B.
-
-unification hint 0 ≔ S1,S2,a,b;
- R ≟ PAIR S1 S2,
- L ≟ pair (carr S1) (carr S2)
-(* -------------------------------------------- *) ⊢
- eq_pair S1 S2 a b ≡ eq_rel L (eq0 R) a b.
-
-
\ No newline at end of file
nrecord pair (A,B: Type[0]) : Type[0] ≝
{ fst: A;
snd: B
- }.
-
-interpretation "Pair construction" 'pair x y = (mk_pair ? ? x y).
-
-interpretation "Product" 'product x y = (pair x y).
-
-interpretation "pair pi1" 'pi1 = (fst ? ?).
-interpretation "pair pi2" 'pi2 = (snd ? ?).
-interpretation "pair pi1" 'pi1a x = (fst ? ? x).
-interpretation "pair pi2" 'pi2a x = (snd ? ? x).
-interpretation "pair pi1" 'pi1b x y = (fst ? ? x y).
-interpretation "pair pi2" 'pi2b x y = (snd ? ? x y).
+ }.
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-include "datatypes/pairs.ma".
-
-ninductive void : Type[0] ≝.
-
-ninductive unit : Type[0] ≝ something: unit.
-
-ninductive Sum (A,B:Type[0]) : Type[0] ≝
-| inl : A → Sum A B
-| inr : B → Sum A B.
-
-interpretation "Disjoint union" 'plus A B = (Sum A B).
-
-ninductive option (A:Type[0]) : Type[0] ≝
- | None : option A
- | Some : A → option A.
\ No newline at end of file
-topology/igft3.ma arithmetics/nat.ma datatypes/bool.ma topology/igft.ma
-PTS/subst.ma basics/list2.ma
-basics/functions.ma Plogic/connectives.ma Plogic/equality.ma
-nat/compare.ma datatypes/bool.ma nat/order.ma
-arithmetics/compare.ma arithmetics/nat.ma
-datatypes/list-setoids.ma datatypes/list.ma sets/setoids.ma sets/setoids1.ma
-datatypes/list-theory.ma arithmetics/nat.ma datatypes/list.ma
-logic/pts.ma
-basics/relations.ma Plogic/connectives.ma
-Plogic/equality.ma logic/pts.ma
-Plogic/connectives.ma Plogic/equality.ma
-sets/categories.ma sets/sets.ma
-algebra/magmas.ma sets/sets.ma
-datatypes/pairs.ma logic/pts.ma
-Plogic/russell_support.ma Plogic/connectives.ma Plogic/jmeq.ma datatypes/sums.ma logic/connectives.ma
-topology/cantor.ma nat/nat.ma topology/igft.ma
-logic/cprop.ma hints_declaration.ma sets/setoids1.ma
-TPTP.ma basics/eq.ma
-sets/setoids2.ma properties/relations2.ma sets/setoids1.ma
-nat/plus.ma algebra/abelian_magmas.ma algebra/unital_magmas.ma nat/big_ops.ma
-sets/sets.ma logic/connectives.ma logic/cprop.ma properties/relations1.ma sets/setoids1.ma
-PTS/gpts.ma PTS/subst.ma
-re/re-setoids.ma datatypes/bool-setoids.ma datatypes/list-setoids.ma datatypes/pairs-setoids.ma hints_declaration.ma sets/sets.ma
-topology/igft2.ma arithmetics/nat.ma topology/igft.ma
-arithmetics/Z.ma arithmetics/compare.ma arithmetics/nat.ma
+algebra/bool.ma logic/equality.ma
+algebra/abelian_magmas.ma algebra/magmas.ma
+logic/destruct_bb.ma logic/equality.ma
datatypes/bool.ma logic/pts.ma
-algebra/bool.ma logic/connectives.ma
-logic/connectives.ma logic/pts.ma
-properties/relations2.ma logic/pts.ma
-sets/categories2.ma sets/categories.ma sets/setoids2.ma sets/sets.ma
-basics/list2.ma arithmetics/nat.ma basics/list.ma
-arithmetics/nat.ma basics/bool.ma basics/eq.ma basics/functions.ma hints_declaration.ma
-sets/setoids1.ma hints_declaration.ma properties/relations1.ma sets/setoids.ma
-nat/minus.ma nat/order.ma
-logic/cologic.ma Plogic/connectives.ma Plogic/equality.ma datatypes/bool.ma logic/equality.ma logic/pts.ma
-datatypes/list.ma arithmetics/nat.ma logic/pts.ma
-Plogic/jmeq.ma Plogic/equality.ma
-topology/igft-setoid.ma sets/sets.ma
-sets/partitions.ma datatypes/pairs.ma nat/compare.ma nat/minus.ma nat/plus.ma sets/sets.ma
-sets/setoids.ma hints_declaration.ma logic/connectives.ma properties/relations.ma
-properties/relations.ma logic/pts.ma
-nat/big_ops.ma algebra/magmas.ma nat/order.ma
-arithmetics/R.ma arithmetics/nat.ma datatypes/pairs.ma datatypes/sums.ma topology/igft.ma
-algebra/unital_magmas.ma algebra/magmas.ma
-arithmetics/minimization.ma arithmetics/nat.ma
-properties/relations1.ma logic/pts.ma
-basics/bool.ma basics/eq.ma basics/functions.ma
-datatypes/bool-setoids.ma datatypes/bool.ma sets/setoids.ma
logic/equality.ma logic/connectives.ma properties/relations.ma
-datatypes/pairs-setoids.ma datatypes/pairs.ma sets/setoids.ma
-topology/igft4.ma arithmetics/nat.ma datatypes/bool.ma topology/igft.ma
-basics/eq.ma basics/relations.ma
-datatypes/sums.ma datatypes/pairs.ma
-hints_declaration.ma logic/pts.ma
-logic/destruct_bb.ma logic/equality.ma
-algebra/abelian_magmas.ma algebra/magmas.ma
+sets/partitions.ma datatypes/pairs.ma nat/compare.ma nat/minus.ma nat/plus.ma sets/sets.ma
+logic/cprop.ma hints_declaration.ma sets/setoids1.ma
topology/igft.ma logic/equality.ma sets/sets.ma
-overlap/o-algebra.ma sets/categories2.ma
-re/re.ma arithmetics/nat.ma datatypes/list.ma datatypes/pairs.ma hints_declaration.ma
-basics/list.ma basics/bool.ma basics/eq.ma
+nat/minus.ma nat/order.ma
+algebra/magmas.ma sets/sets.ma
+hints_declaration.ma logic/pts.ma
+properties/relations1.ma logic/pts.ma
+algebra/unital_magmas.ma algebra/magmas.ma
+nat/compare.ma datatypes/bool.ma nat/order.ma
+logic/connectives.ma logic/pts.ma
nat/nat.ma hints_declaration.ma logic/equality.ma sets/setoids.ma
+topology/igft-setoid.ma sets/sets.ma
+sets/sets.ma hints_declaration.ma logic/connectives.ma logic/cprop.ma properties/relations1.ma sets/setoids1.ma
+logic/pts.ma
nat/order.ma nat/nat.ma sets/sets.ma
+nat/plus.ma algebra/abelian_magmas.ma algebra/unital_magmas.ma nat/big_ops.ma
+datatypes/pairs.ma logic/pts.ma
+topology/cantor.ma nat/nat.ma topology/igft.ma
+sets/setoids1.ma properties/relations1.ma sets/setoids.ma
+nat/big_ops.ma algebra/magmas.ma nat/order.ma
+topology/igft2.ma topology/igft.ma
+logic/markov.ma nat/order.ma
+properties/relations.ma logic/pts.ma
+sets/setoids.ma logic/connectives.ma properties/relations.ma
digraph g {
- "topology/igft3.ma" [];
- "topology/igft3.ma" -> "arithmetics/nat.ma" [];
- "topology/igft3.ma" -> "datatypes/bool.ma" [];
- "topology/igft3.ma" -> "topology/igft.ma" [];
- "PTS/subst.ma" [];
- "PTS/subst.ma" -> "basics/list2.ma" [];
- "basics/functions.ma" [];
- "basics/functions.ma" -> "Plogic/connectives.ma" [];
- "basics/functions.ma" -> "Plogic/equality.ma" [];
- "nat/compare.ma" [];
- "nat/compare.ma" -> "datatypes/bool.ma" [];
- "nat/compare.ma" -> "nat/order.ma" [];
- "arithmetics/compare.ma" [];
- "arithmetics/compare.ma" -> "arithmetics/nat.ma" [];
- "datatypes/list-setoids.ma" [];
- "datatypes/list-setoids.ma" -> "datatypes/list.ma" [];
- "datatypes/list-setoids.ma" -> "sets/setoids.ma" [];
- "datatypes/list-setoids.ma" -> "sets/setoids1.ma" [];
- "datatypes/list-theory.ma" [];
- "datatypes/list-theory.ma" -> "arithmetics/nat.ma" [];
- "datatypes/list-theory.ma" -> "datatypes/list.ma" [];
- "logic/pts.ma" [];
- "basics/relations.ma" [];
- "basics/relations.ma" -> "Plogic/connectives.ma" [];
- "Plogic/equality.ma" [];
- "Plogic/equality.ma" -> "logic/pts.ma" [];
- "Plogic/connectives.ma" [];
- "Plogic/connectives.ma" -> "Plogic/equality.ma" [];
- "sets/categories.ma" [];
- "sets/categories.ma" -> "sets/sets.ma" [];
- "algebra/magmas.ma" [];
- "algebra/magmas.ma" -> "sets/sets.ma" [];
- "datatypes/pairs.ma" [];
- "datatypes/pairs.ma" -> "logic/pts.ma" [];
- "Plogic/russell_support.ma" [];
- "Plogic/russell_support.ma" -> "Plogic/connectives.ma" [];
- "Plogic/russell_support.ma" -> "Plogic/jmeq.ma" [];
- "Plogic/russell_support.ma" -> "datatypes/sums.ma" [];
- "Plogic/russell_support.ma" -> "logic/connectives.ma" [];
- "topology/cantor.ma" [];
- "topology/cantor.ma" -> "nat/nat.ma" [];
- "topology/cantor.ma" -> "topology/igft.ma" [];
- "logic/cprop.ma" [];
- "logic/cprop.ma" -> "hints_declaration.ma" [];
- "logic/cprop.ma" -> "sets/setoids1.ma" [];
- "TPTP.ma" [];
- "TPTP.ma" -> "basics/eq.ma" [];
- "sets/setoids2.ma" [];
- "sets/setoids2.ma" -> "properties/relations2.ma" [];
- "sets/setoids2.ma" -> "sets/setoids1.ma" [];
- "nat/plus.ma" [];
- "nat/plus.ma" -> "algebra/abelian_magmas.ma" [];
- "nat/plus.ma" -> "algebra/unital_magmas.ma" [];
- "nat/plus.ma" -> "nat/big_ops.ma" [];
- "sets/sets.ma" [];
- "sets/sets.ma" -> "logic/connectives.ma" [];
- "sets/sets.ma" -> "logic/cprop.ma" [];
- "sets/sets.ma" -> "properties/relations1.ma" [];
- "sets/sets.ma" -> "sets/setoids1.ma" [];
- "PTS/gpts.ma" [];
- "PTS/gpts.ma" -> "PTS/subst.ma" [];
- "re/re-setoids.ma" [];
- "re/re-setoids.ma" -> "datatypes/bool-setoids.ma" [];
- "re/re-setoids.ma" -> "datatypes/list-setoids.ma" [];
- "re/re-setoids.ma" -> "datatypes/pairs-setoids.ma" [];
- "re/re-setoids.ma" -> "hints_declaration.ma" [];
- "re/re-setoids.ma" -> "sets/sets.ma" [];
- "topology/igft2.ma" [];
- "topology/igft2.ma" -> "arithmetics/nat.ma" [];
- "topology/igft2.ma" -> "topology/igft.ma" [];
- "arithmetics/Z.ma" [];
- "arithmetics/Z.ma" -> "arithmetics/compare.ma" [];
- "arithmetics/Z.ma" -> "arithmetics/nat.ma" [];
+ "algebra/bool.ma" [];
+ "algebra/bool.ma" -> "logic/equality.ma" [];
+ "algebra/abelian_magmas.ma" [];
+ "algebra/abelian_magmas.ma" -> "algebra/magmas.ma" [];
+ "logic/destruct_bb.ma" [];
+ "logic/destruct_bb.ma" -> "logic/equality.ma" [];
"datatypes/bool.ma" [];
"datatypes/bool.ma" -> "logic/pts.ma" [];
- "algebra/bool.ma" [];
- "algebra/bool.ma" -> "logic/connectives.ma" [];
- "logic/connectives.ma" [];
- "logic/connectives.ma" -> "logic/pts.ma" [];
- "properties/relations2.ma" [];
- "properties/relations2.ma" -> "logic/pts.ma" [];
- "sets/categories2.ma" [];
- "sets/categories2.ma" -> "sets/categories.ma" [];
- "sets/categories2.ma" -> "sets/setoids2.ma" [];
- "sets/categories2.ma" -> "sets/sets.ma" [];
- "basics/list2.ma" [];
- "basics/list2.ma" -> "arithmetics/nat.ma" [];
- "basics/list2.ma" -> "basics/list.ma" [];
- "arithmetics/nat.ma" [];
- "arithmetics/nat.ma" -> "basics/bool.ma" [];
- "arithmetics/nat.ma" -> "basics/eq.ma" [];
- "arithmetics/nat.ma" -> "basics/functions.ma" [];
- "arithmetics/nat.ma" -> "hints_declaration.ma" [];
- "sets/setoids1.ma" [];
- "sets/setoids1.ma" -> "hints_declaration.ma" [];
- "sets/setoids1.ma" -> "properties/relations1.ma" [];
- "sets/setoids1.ma" -> "sets/setoids.ma" [];
- "nat/minus.ma" [];
- "nat/minus.ma" -> "nat/order.ma" [];
- "logic/cologic.ma" [];
- "logic/cologic.ma" -> "Plogic/connectives.ma" [];
- "logic/cologic.ma" -> "Plogic/equality.ma" [];
- "logic/cologic.ma" -> "datatypes/bool.ma" [];
- "logic/cologic.ma" -> "logic/equality.ma" [];
- "logic/cologic.ma" -> "logic/pts.ma" [];
- "datatypes/list.ma" [];
- "datatypes/list.ma" -> "arithmetics/nat.ma" [];
- "datatypes/list.ma" -> "logic/equality.ma" [];
- "datatypes/list.ma" -> "logic/pts.ma" [];
- "Plogic/jmeq.ma" [];
- "Plogic/jmeq.ma" -> "Plogic/equality.ma" [];
- "topology/igft-setoid.ma" [];
- "topology/igft-setoid.ma" -> "sets/sets.ma" [];
+ "logic/equality.ma" [];
+ "logic/equality.ma" -> "logic/connectives.ma" [];
+ "logic/equality.ma" -> "properties/relations.ma" [];
"sets/partitions.ma" [];
"sets/partitions.ma" -> "datatypes/pairs.ma" [];
"sets/partitions.ma" -> "nat/compare.ma" [];
"sets/partitions.ma" -> "nat/minus.ma" [];
"sets/partitions.ma" -> "nat/plus.ma" [];
"sets/partitions.ma" -> "sets/sets.ma" [];
- "sets/setoids.ma" [];
- "sets/setoids.ma" -> "hints_declaration.ma" [];
- "sets/setoids.ma" -> "logic/connectives.ma" [];
- "sets/setoids.ma" -> "properties/relations.ma" [];
- "properties/relations.ma" [];
- "properties/relations.ma" -> "logic/pts.ma" [];
- "nat/big_ops.ma" [];
- "nat/big_ops.ma" -> "algebra/magmas.ma" [];
- "nat/big_ops.ma" -> "nat/order.ma" [];
- "arithmetics/R.ma" [];
- "arithmetics/R.ma" -> "arithmetics/nat.ma" [];
- "arithmetics/R.ma" -> "datatypes/pairs.ma" [];
- "arithmetics/R.ma" -> "datatypes/sums.ma" [];
- "arithmetics/R.ma" -> "topology/igft.ma" [];
- "algebra/unital_magmas.ma" [];
- "algebra/unital_magmas.ma" -> "algebra/magmas.ma" [];
- "arithmetics/minimization.ma" [];
- "arithmetics/minimization.ma" -> "arithmetics/nat.ma" [];
- "properties/relations1.ma" [];
- "properties/relations1.ma" -> "logic/pts.ma" [];
- "basics/bool.ma" [];
- "basics/bool.ma" -> "basics/eq.ma" [];
- "basics/bool.ma" -> "basics/functions.ma" [];
- "datatypes/bool-setoids.ma" [];
- "datatypes/bool-setoids.ma" -> "datatypes/bool.ma" [];
- "datatypes/bool-setoids.ma" -> "sets/setoids.ma" [];
- "logic/equality.ma" [];
- "logic/equality.ma" -> "logic/connectives.ma" [];
- "logic/equality.ma" -> "properties/relations.ma" [];
- "datatypes/pairs-setoids.ma" [];
- "datatypes/pairs-setoids.ma" -> "datatypes/pairs.ma" [];
- "datatypes/pairs-setoids.ma" -> "sets/setoids.ma" [];
- "topology/igft4.ma" [];
- "topology/igft4.ma" -> "arithmetics/nat.ma" [];
- "topology/igft4.ma" -> "datatypes/bool.ma" [];
- "topology/igft4.ma" -> "topology/igft.ma" [];
- "basics/eq.ma" [];
- "basics/eq.ma" -> "basics/relations.ma" [];
- "datatypes/sums.ma" [];
- "datatypes/sums.ma" -> "datatypes/pairs.ma" [];
- "hints_declaration.ma" [];
- "hints_declaration.ma" -> "logic/pts.ma" [];
- "logic/destruct_bb.ma" [];
- "logic/destruct_bb.ma" -> "logic/equality.ma" [];
- "algebra/abelian_magmas.ma" [];
- "algebra/abelian_magmas.ma" -> "algebra/magmas.ma" [];
+ "logic/cprop.ma" [];
+ "logic/cprop.ma" -> "hints_declaration.ma" [];
+ "logic/cprop.ma" -> "sets/setoids1.ma" [];
"topology/igft.ma" [];
"topology/igft.ma" -> "logic/equality.ma" [];
"topology/igft.ma" -> "sets/sets.ma" [];
- "overlap/o-algebra.ma" [];
- "overlap/o-algebra.ma" -> "sets/categories2.ma" [];
- "re/re.ma" [];
- "re/re.ma" -> "arithmetics/nat.ma" [];
- "re/re.ma" -> "datatypes/list.ma" [];
- "re/re.ma" -> "datatypes/pairs.ma" [];
- "re/re.ma" -> "hints_declaration.ma" [];
- "basics/list.ma" [];
- "basics/list.ma" -> "basics/bool.ma" [];
- "basics/list.ma" -> "basics/eq.ma" [];
+ "nat/minus.ma" [];
+ "nat/minus.ma" -> "nat/order.ma" [];
+ "algebra/magmas.ma" [];
+ "algebra/magmas.ma" -> "sets/sets.ma" [];
+ "hints_declaration.ma" [];
+ "hints_declaration.ma" -> "logic/pts.ma" [];
+ "properties/relations1.ma" [];
+ "properties/relations1.ma" -> "logic/pts.ma" [];
+ "algebra/unital_magmas.ma" [];
+ "algebra/unital_magmas.ma" -> "algebra/magmas.ma" [];
+ "nat/compare.ma" [];
+ "nat/compare.ma" -> "datatypes/bool.ma" [];
+ "nat/compare.ma" -> "nat/order.ma" [];
+ "logic/connectives.ma" [];
+ "logic/connectives.ma" -> "logic/pts.ma" [];
"nat/nat.ma" [];
"nat/nat.ma" -> "hints_declaration.ma" [];
"nat/nat.ma" -> "logic/equality.ma" [];
"nat/nat.ma" -> "sets/setoids.ma" [];
+ "topology/igft-setoid.ma" [];
+ "topology/igft-setoid.ma" -> "sets/sets.ma" [];
+ "sets/sets.ma" [];
+ "sets/sets.ma" -> "hints_declaration.ma" [];
+ "sets/sets.ma" -> "logic/connectives.ma" [];
+ "sets/sets.ma" -> "logic/cprop.ma" [];
+ "sets/sets.ma" -> "properties/relations1.ma" [];
+ "sets/sets.ma" -> "sets/setoids1.ma" [];
+ "logic/pts.ma" [];
"nat/order.ma" [];
"nat/order.ma" -> "nat/nat.ma" [];
"nat/order.ma" -> "sets/sets.ma" [];
+ "nat/plus.ma" [];
+ "nat/plus.ma" -> "algebra/abelian_magmas.ma" [];
+ "nat/plus.ma" -> "algebra/unital_magmas.ma" [];
+ "nat/plus.ma" -> "nat/big_ops.ma" [];
+ "datatypes/pairs.ma" [];
+ "datatypes/pairs.ma" -> "logic/pts.ma" [];
+ "topology/cantor.ma" [];
+ "topology/cantor.ma" -> "nat/nat.ma" [];
+ "topology/cantor.ma" -> "topology/igft.ma" [];
+ "sets/setoids1.ma" [];
+ "sets/setoids1.ma" -> "properties/relations1.ma" [];
+ "sets/setoids1.ma" -> "sets/setoids.ma" [];
+ "nat/big_ops.ma" [];
+ "nat/big_ops.ma" -> "algebra/magmas.ma" [];
+ "nat/big_ops.ma" -> "nat/order.ma" [];
+ "topology/igft2.ma" [];
+ "topology/igft2.ma" -> "topology/igft.ma" [];
+ "logic/markov.ma" [];
+ "logic/markov.ma" -> "nat/order.ma" [];
+ "properties/relations.ma" [];
+ "properties/relations.ma" -> "logic/pts.ma" [];
+ "sets/setoids.ma" [];
+ "sets/setoids.ma" -> "logic/connectives.ma" [];
+ "sets/setoids.ma" -> "properties/relations.ma" [];
}
\ No newline at end of file
(*---------------------*) ⊢
T1 ≡ T2
-The order of premises is relevant, since they are processed in order
-(left to right).
-
*)
(* it seems unbelivable, but it works! *)
-notation > "≔ (list0 ( (list1 (ident x) sep , ) opt (: T) ) sep ,) opt (; (list1 (ident U ≟ term 19 V ) sep ,)) ⊢ term 19 Px ≡ term 19 Py"
+notation > "≔ (list0 ( (list1 (ident x) sep , ) opt (: T) ) sep ,) opt (; (list1 (ident U ≟ term 90 V ) sep ,)) ⊢ term 19 Px ≡ term 19 Py"
with precedence 90
for @{ ${ fold right
@{ ${ default
interpretation "hint_decl_CProp0" 'hint_decl a b = (hint_declaration_CProp0 ? a b).
interpretation "hint_decl_Type0" 'hint_decl a b = (hint_declaration_Type0 ? a b).
-(* Non uniform coercions support *)
-nrecord lock2 (S : Type[2]) (s : S) : Type[3] ≝ {
- force2 : Type[2];
- lift2 : force2
-}.
-
-nrecord lock1 (S : Type[1]) (s : S) : Type[2] ≝ {
- force1 : Type[1];
- lift1 : force1
-}.
-
-ncoercion lift1 : ∀S:Type[1].∀s:S.∀l:lock1 S s. force1 S s l ≝ lift1
- on s : ? to force1 ???.
-
-ncoercion lift2 : ∀S:Type[2].∀s:S.∀l:lock2 S s. force2 S s l ≝ lift2
- on s : ? to force2 ???.
-
-(* Example of a non uniform coercion declaration
-
- Type[0] setoid
- >--->
- MR R
-
- provided MR = carr R
-
-unification hint 0 ≔ R : setoid;
- MR ≟ carr R,
- lock ≟ mk_lock1 Type[0] MR setoid R
-(* ---------------------------------------- *) ⊢
- setoid ≡ force1 ? MR lock.
-
-*)
\ No newline at end of file
+(* little test
+naxiom A : Type[0].
+naxiom C : A → A → Type[0].
+ndefinition D ≝ C.
+alias symbol "hint_decl" = "hint_decl_Type1".
+unification hint 0 ≔
+ X, R : A, Y ; Z ≟ X, W ≟ Y ⊢ C X Y ≡ D Z W.
+*)
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "logic/pts.ma".
-include "logic/equality.ma".
-include "datatypes/bool.ma".
-
-ncoinductive cprop: Type[0] ≝
- certain: bool → cprop
- | maybe: cprop → cprop.
-
-ntheorem ccases:
- ∀c. c = match c with [ certain b ⇒ certain b | maybe c ⇒ maybe c ].
- #c; ncases c; //.
-nqed.
-
-ninductive cconv : cprop → cprop → CProp[0] ≝
- certain_certain: ∀b. cconv b b
- | maybe1: ∀c1,c2. cconv c1 c2 → cconv (maybe c1) c2
- | maybe2: ∀c1,c2. cconv c1 c2 → cconv c1 (maybe c2).
-
-nlemma cconv_sym: ∀c,d. cconv c d → cconv d c.
- #c d K; nelim K; /2/.
-nqed.
-
-ncoinductive ceq: cprop → cprop → CProp[0] ≝
- maybe_maybe: ∀c,d. ceq c d → ceq (maybe c) (maybe d)
- | certain_maybe: ∀b,c. cconv (certain b) c → ceq (certain b) c
- | maybe_certain: ∀b,c. cconv c (certain b) → ceq c (certain b).
-
-nlet corec ceq_refl c : ceq c c ≝ ?.
- ncases c [ #b; @2; @1 | #d; @1; //]
-nqed.
-
-nlet corec ceq_sym c d : ceq c d → ceq d c ≝ ?.
- ncases c; ncases d; #x y K; ninversion K; #a b E1 E2 E3
- [##4,10: @1; napply ceq_sym; napply E1]
- ndestruct [ @2 | @2 | @3 | @2] /2/.
-nqed.
-
-nlemma ceq_to_cconv: ∀c,b. ceq c (certain b) → cconv c (certain b).
- #c b K; ninversion K; #; ndestruct; //.
-nqed.
-
-nlemma ceq_to_cconv2: ∀c,b. ceq (certain b) c → cconv (certain b) c.
- #c b K; ninversion K; #; ndestruct; //.
-nqed.
-
-nlet corec cand c1 c2 : cprop ≝
- match c1 with
- [ certain b ⇒ match b with [ false ⇒ certain false | true ⇒ c2 ]
- | maybe c ⇒
- match c2 with
- [ certain b ⇒ match b with [ false ⇒ certain false | true ⇒ maybe c ]
- | maybe d ⇒ maybe (cand c d) ]].
-
-nlemma cand_false: ∀c. cand (certain false) c = certain false.
- #c; ncases c; nrewrite > (ccases (cand …)); //; #d;
- nrewrite > (ccases (cand …)); //.
-nqed.
-
-nlemma cand_true: ∀c. cand (certain true) c = c.
- #c; ncases c; nrewrite > (ccases (cand …)); //; #d;
- nrewrite > (ccases (cand …)); //.
-nqed.
-
-nlemma cand_truer: ∀c. cand c (certain true) = c.
- #c; ncases c
- [ #b; ncases b; //
- | #d; nrewrite > (ccases (cand …)); // ]
-nqed.
-
-
-ntheorem cand_true: ∀c1,c2. ceq c1 (certain true) → ceq (cand c1 c2) c2.
- #c1 c2 K; ninversion K; #x y E1 E2 E3 [ ndestruct ]
- ##[ nrewrite < E3 in E1; #K1; ninversion K1; #; ndestruct; nrewrite > (cand_true c2);
- //
- | nrewrite < E3 in E1; #K1;
- ncut (∀y,z. cconv y z → z = certain true → ceq (cand y c2) c2); /2/;
- #a b X; nelim X
- [ #e E; nrewrite > E; nrewrite > (cand_true c2); //
- | ncases c2
- [ #bb; ncases bb; #xx yy KK1 KK2 EE;
- ##[ nlapply (KK2 EE); #XX; nrewrite > (cand_truer …) in XX; #YY;
- @3;
-
- rewrite > (ccases (cand (maybe xx) (certain true)));
- nnormalize; @3; @2;
-
-
-
-ncoinductive cprop: Type[0] ≝
- false: cprop
- | true: cprop
- | hmm: cprop → cprop.
-
-nlet corec cand c1 c2 : cprop ≝
- match c1 with
- [ false ⇒ false
- | true ⇒ c2
- | hmm c ⇒ hmm (cand c c2) ].
-
-nlet corec cor c1 c2 : cprop ≝
- match c1 with
- [ false ⇒ c2
- | true ⇒ true
- | hmm c ⇒ hmm (cor c c2) ].
-
-nlet corec cimpl c1 c2 : cprop ≝
- match c2 with
- [ false ⇒
- match c1 with
- [ false ⇒ true
- | true ⇒ false
- | hmm c ⇒ hmm (cimpl c c2) ]
- | true ⇒ true
- | hmm c ⇒ hmm (cimpl c1 c) ].
-
-include "Plogic/equality.ma".
-
-nlet corec ceq c1 c2 : cprop ≝
- match c1 with
- [ false ⇒
- match c2 with
- [ false ⇒ true
- | true ⇒ false
- | hmm c ⇒ hmm (ceq c1 c) ]
- | true ⇒ c2
- | hmm c ⇒ hmm (ceq c c2) ].
-
-ninductive holds: cprop → Prop ≝
- holds_true: holds true
- | holds_hmm: ∀c. holds c → holds (hmm c).
-
-include "Plogic/connectives.ma".
-
-nlemma ccases1:
- ∀c. holds c →
- match c with
- [ true ⇒ True
- | false ⇒ False
- | hmm c' ⇒ holds c'].
- #c; #H; ninversion H; //.
-nqed.
-
-nlemma ccases2:
- ∀c.
- match c with
- [ true ⇒ True
- | false ⇒ False
- | hmm c' ⇒ holds c'] → holds c ≝ ?.
- #c; ncases c; nnormalize; /2/; *.
-nqed.
-
-(*CSC: ??? *)
-naxiom cimpl1: ∀c. holds (cimpl true c) → holds c.
-
-nlemma ceq1: ∀c. holds c → holds (ceq c true).
- #c H; nelim H; /2/.
-nqed.
-
-ncoinductive EQ: cprop → cprop → Prop ≝
- EQ_true: EQ true true
- | EQ_false: EQ false false
- | EQ_hmm1: ∀x,y. EQ x y → EQ (hmm x) y
- | EQ_hmm2: ∀x,y. EQ x y → EQ x (hmm y).
-
-naxiom daemon: False.
-
-nlet corec tech1 x: ∀y. EQ (hmm x) y → EQ x y ≝ ?.
- #y; ncases y
- [##1,2: #X; ninversion X; #; ndestruct; //
- | #c; #X; ninversion X; #; ndestruct; //;
- @4; ncases daemon (* napply tech1; //*) (* BUG GBC??? *)
- ]
-nqed.
-
-nlemma Ccases1:
- ∀c,d. EQ c d →
- match c with
- [ true ⇒ EQ true d
- | false ⇒ EQ false d
- | hmm c' ⇒ EQ c' d] ≝ ?.
- #c d H; ninversion H; //;
- #x y H H1 H2; ndestruct; ncases x in H ⊢ %; nnormalize; #; @4; //;
- napply tech1; //.
-nqed.
-
-nlemma Ccases2:
- ∀c,d.
- match c with
- [ true ⇒ EQ true d
- | false ⇒ EQ false d
- | hmm c' ⇒ EQ c' d] → EQ c d ≝ ?.
- #c; ncases c; nnormalize; /2/.
-nqed.
-
-nlet corec heyting5 x: ∀y. EQ (cimpl (cand x y) x) true ≝ ?.
- #y; napply Ccases2; ncases x; ncases y; nnormalize; /3/
- [ #c; napply heyting5;
-
-
-nlemma heyting3: ∀x,y. holds (cimpl x (cimpl y x)).
- #x; #y; ncases x; ncases y; /3/; nnormalize
- [ #d; napply ccases2; nnormalize; napply ccases2; nnormalize;
-
-nlemma heyting1: ∀x,y. holds (cimpl x y) → holds (cimpl y x) → holds (ceq x y).
- #x y; #H; ngeneralize in match (refl … (cimpl x y));
- nelim H in ⊢ (???% → % → %)
- [ #K1; #K2; nrewrite > K1 in K2; #X1;
-
- napply ccases2; nlapply (ccases1 … H1); nlapply (ccases1 … H2);
- ncases x; ncases y; nnormalize; /2/
- [ #c; #H3 H4; nlapply (cimpl1 … H3); napply ceq1
- | #d; #e; #H3; #H4;
-
- ncases x; nnormalize
- [ #y; ncases y; //
- | #y; ncases y; //
- [ #H1; ninversion H1; ##[##1,4: #; ndestruct]
- ##[ ncases (cimpl true false);
- [ ninversion H1; #; ndestruct;
\ No newline at end of file
notation ". r" with precedence 50 for @{'fi $r}.
interpretation "fi" 'fi r = (fi' ?? r).
-ndefinition and_morphism: unary_morphism1 CPROP (unary_morphism1_setoid1 CPROP CPROP).
- napply (mk_binary_morphism1 … And);
- #a; #a'; #b; #b'; #Ha; #Hb; @; *; #x; #y; @
- [ napply (. Ha^-1) | napply (. Hb^-1) | napply (. Ha) | napply (. Hb)] //.
+ndefinition and_morphism: binary_morphism1 CPROP CPROP CPROP.
+ napply mk_binary_morphism1
+ [ napply And
+ | #a; #a'; #b; #b'; *; #H1; #H2; *; #H3; #H4; napply mk_iff; *; #K1; #K2; napply conj
+ [ napply (H1 K1)
+ | napply (H3 K2)
+ | napply (H2 K1)
+ | napply (H4 K2)]##]
nqed.
-unification hint 0 ≔ A,B:CProp[0];
- T ≟ CPROP,
- MM ≟ mk_unary_morphism1 ??
- (λX.mk_unary_morphism1 ?? (And X) (prop11 ?? (fun11 ?? and_morphism X)))
- (prop11 ?? and_morphism)
-(*-------------------------------------------------------------*) ⊢
- fun11 T T (fun11 T (unary_morphism1_setoid1 T T) MM A) B ≡ And A B.
-
-(*
-naxiom daemon: False.
-
-nlemma test: ∀A,A',B: CProp[0]. A=A' → (B ∨ A) = B → (B ∧ A) ∧ B.
- #A; #A'; #B; #H1; #H2; napply (. (#‡H1)‡H2^-1); nelim daemon.
+unification hint 0 ≔ A,B ⊢ fun21 … (mk_binary_morphism1 … And (prop21 … and_morphism)) A B ≡ And A B.
+
+(*nlemma test: ∀A,A',B: CProp[0]. A=A' → (B ∨ A) = B → (B ∧ A) ∧ B.
+ #A; #A'; #B; #H1; #H2;
+ napply (. ((#‡H1)‡H2^-1)); nnormalize;
+nqed.*)
+
+ndefinition or_morphism: binary_morphism1 CPROP CPROP CPROP.
+ napply mk_binary_morphism1
+ [ napply Or
+ | #a; #a'; #b; #b'; *; #H1; #H2; *; #H3; #H4; napply mk_iff; *; #H;
+ ##[##1,3: napply or_introl |##*: napply or_intror ]
+ ##[ napply (H1 H)
+ | napply (H2 H)
+ | napply (H3 H)
+ | napply (H4 H)]##]
nqed.
-CSC: ugly proof term
-ncheck test.
-*)
+unification hint 0 ≔ A,B ⊢ fun21 … (mk_binary_morphism1 … Or (prop21 … or_morphism)) A B ≡ Or A B.
-ndefinition or_morphism: unary_morphism1 CPROP (unary_morphism1_setoid1 CPROP CPROP).
- napply (mk_binary_morphism1 … Or);
- #a; #a'; #b; #b'; #Ha; #Hb; @; *; #x
- [ @1; napply (. Ha^-1) | @2; napply (. Hb^-1) | @1; napply (. Ha) | @2; napply (. Hb)] //.
+ndefinition if_morphism: binary_morphism1 CPROP CPROP CPROP.
+ napply mk_binary_morphism1
+ [ napply (λA,B. A → B)
+ | #a; #a'; #b; #b'; #H1; #H2; napply mk_iff; #H; #w
+ [ napply (if … H2); napply H; napply (fi … H1); nassumption
+ | napply (fi … H2); napply H; napply (if … H1); nassumption]##]
nqed.
-
-unification hint 0 ≔ A,B:CProp[0];
- T ≟ CPROP,
- MM ≟ mk_unary_morphism1 …
- (λX.mk_unary_morphism1 … (Or X) (prop11 … (fun11 ?? or_morphism X)))
- (prop11 … or_morphism)
-(*-------------------------------------------------------------*) ⊢
- fun11 T T (fun11 T (unary_morphism1_setoid1 T T) MM A) B ≡ Or A B.
-
-(* XXX always applied, generates hard unif problems
-ndefinition if_morphism: unary_morphism1 CPROP (unary_morphism1_setoid1 CPROP CPROP).
- napply (mk_binary_morphism1 … (λA,B:CProp[0]. A → B));
- #a; #a'; #b; #b'; #Ha; #Hb; @; #H; #x
- [ napply (. Hb^-1); napply H; napply (. Ha) | napply (. Hb); napply H; napply (. Ha^-1)]
- //.
-nqed.
-
-unification hint 0 ≔ A,B:CProp[0];
- T ≟ CPROP,
- R ≟ mk_unary_morphism1 …
- (λX:CProp[0].mk_unary_morphism1 …
- (λY:CProp[0]. X → Y) (prop11 … (if_morphism X)))
- (prop11 … if_morphism)
-(*----------------------------------------------------------------------*) ⊢
- fun11 T T (fun11 T (unary_morphism1_setoid1 T T) R A) B ≡ A → B.
-*)
-
-(* not as morphism *)
-nlemma Not_morphism : CProp[0] ⇒_1 CProp[0].
-@(λx:CProp[0].¬ x); #a b; *; #; @; /3/; nqed.
-
-unification hint 0 ≔ P : CProp[0];
- A ≟ CPROP,
- B ≟ CPROP,
- M ≟ mk_unary_morphism1 ?? (λP.¬ P) (prop11 ?? Not_morphism)
-(*------------------------*)⊢
- fun11 A B M P ≡ ¬ P.
-
-(* Ex setoid support *)
-
-(* The caml, as some patches for it
-ncoercion setoid1_of_setoid : ∀s:setoid. setoid1 ≝ setoid1_of_setoid on _s: setoid to setoid1.
-*)
-
-(* simple case where the whole predicate can be rewritten *)
-nlemma Ex_morphism : ∀S:setoid.((setoid1_of_setoid S) ⇒_1 CProp[0]) ⇒_1 CProp[0].
-#S; @(λP: (setoid1_of_setoid S) ⇒_1 CProp[0].Ex S P);
-#P Q E; @; *; #x Px; @x; ncases (E x x #); /2/; nqed.
-
-unification hint 0 ≔ S : setoid, P : (setoid1_of_setoid S) ⇒_1 CPROP;
- A ≟ unary_morphism1_setoid1 (setoid1_of_setoid S) CPROP,
- B ≟ CPROP,
- M ≟ mk_unary_morphism1 ??
- (λP: (setoid1_of_setoid S) ⇒_1 CPROP.Ex (carr S) (fun11 ?? P))
- (prop11 ?? (Ex_morphism S))
-(*------------------------*)⊢
- fun11 A B M P ≡ Ex (carr S) (fun11 (setoid1_of_setoid S) CPROP P).
-
-nlemma Ex_morphism_eta : ∀S:setoid.((setoid1_of_setoid S) ⇒_1 CProp[0]) ⇒_1 CProp[0].
-#S; @(λP: (setoid1_of_setoid S) ⇒_1 CProp[0].Ex S (λx.P x));
-#P Q E; @; *; #x Px; @x; ncases (E x x #); /2/; nqed.
-
-unification hint 0 ≔ S : setoid, P : (setoid1_of_setoid S) ⇒_1 CPROP;
- A ≟ unary_morphism1_setoid1 (setoid1_of_setoid S) CPROP,
- B ≟ CPROP,
- M ≟ mk_unary_morphism1 ??
- (λP: (setoid1_of_setoid S) ⇒_1 CPROP.Ex (carr S) (λx.fun11 ?? P x))
- (prop11 ?? (Ex_morphism_eta S))
-(*------------------------*)⊢
- fun11 A B M P ≡ Ex (carr S) (λx.fun11 (setoid1_of_setoid S) CPROP P x).
-
-nlemma Ex_setoid : ∀S:setoid.((setoid1_of_setoid S) ⇒_1 CPROP) → setoid.
-#T P; @ (Ex T (λx:T.P x)); @; ##[ #H1 H2; napply True |##*: //; ##] nqed.
-
-unification hint 0 ≔ T : setoid,P ;
- S ≟ (Ex_setoid T P)
-(*---------------------------*) ⊢
- Ex (carr T) (λx:carr T.fun11 ?? P x) ≡ carr S.
-
-(* couts how many Ex we are traversing *)
-ninductive counter : Type[0] ≝
- | End : counter
- | Next : (Prop → Prop) → (* dummy arg please the notation mechanism *)
- counter → counter.
-
-(* to rewrite terms (live in setoid) *)
-nlet rec mk_P (S, T : setoid) (n : counter) on n ≝
- match n with [ End ⇒ T → CProp[0] | Next _ m ⇒ S → (mk_P S T m) ].
-
-nlet rec mk_F (S, T : setoid) (n : counter) on n ≝
- match n with [ End ⇒ T | Next _ m ⇒ S → (mk_F S T m) ].
-
-nlet rec mk_E (S, T : setoid) (n : counter) on n : ∀f,g : mk_F S T n. CProp[0] ≝
- match n with
- [ End ⇒ λf,g:T. f = g
- | Next q m ⇒ λf,g: mk_F S T (Next q m). ∀x:S.mk_E S T m (f x) (g x) ].
-
-nlet rec mk_H (S, T : setoid) (n : counter) on n :
-∀P1,P2: mk_P S T n.∀f,g : mk_F S T n. CProp[1] ≝
- match n with
- [ End ⇒ λP1,P2:mk_P S T End.λf,g:T. f = g → P1 f =_1 P2 g
- | Next q m ⇒ λP1,P2: mk_P S T (Next q m).λf,g: mk_F S T (Next q m).
- ∀x:S.mk_H S T m (P1 x) (P2 x) (f x) (g x) ].
-
-nlet rec mk_Ex (S, T : setoid) (n : counter) on n :
-∀P: mk_P S T n.∀f : mk_F S T n. CProp[0] ≝
- match n with
- [ End ⇒ λP:mk_P S T End.λf:T. P f
- | Next q m ⇒ λP: mk_P S T (Next q m).λf: mk_F S T (Next q m).
- ∃x:S.mk_Ex S T m (P x) (f x) ].
-
-nlemma Sig_generic : ∀S,T.∀n:counter.∀P,f,g.
- mk_E S T n f g → mk_H S T n P P f g → mk_Ex S T n P f =_1 mk_Ex S T n P g.
-#S T n; nelim n; nnormalize;
-##[ #P f g E H; /2/;
-##| #q m IH P f g E H; @; *; #x Px; @x; ncases (IH … (E x) (H x)); /3/; ##]
-nqed.
-
-(* to rewrite propositions (live in setoid1) *)
-nlet rec mk_P1 (S : setoid) (T : setoid1) (n : counter) on n ≝
- match n with [ End ⇒ T → CProp[0] | Next _ m ⇒ S → (mk_P1 S T m) ].
-
-nlet rec mk_F1 (S : setoid) (T : setoid1) (n : counter) on n ≝
- match n with [ End ⇒ T | Next _ m ⇒ S → (mk_F1 S T m) ].
-
-nlet rec mk_E1 (S : setoid) (T : setoid1) (n : counter) on n : ∀f,g : mk_F1 S T n. CProp[1] ≝
- match n with
- [ End ⇒ λf,g:T. f =_1 g
- | Next q m ⇒ λf,g: mk_F1 S T (Next q m). ∀x:S.mk_E1 S T m (f x) (g x) ].
-
-nlet rec mk_H1 (S : setoid) (T : setoid1) (n : counter) on n :
-∀P1,P2: mk_P1 S T n.∀f,g : mk_F1 S T n. CProp[1] ≝
- match n with
- [ End ⇒ λP1,P2:mk_P1 S T End.λf,g:T. f = g → P1 f =_1 P2 g
- | Next q m ⇒ λP1,P2: mk_P1 S T (Next q m).λf,g: mk_F1 S T (Next q m).
- ∀x:S.mk_H1 S T m (P1 x) (P2 x) (f x) (g x) ].
-
-nlet rec mk_Ex1 (S : setoid) (T : setoid1) (n : counter) on n :
-∀P: mk_P1 S T n.∀f : mk_F1 S T n. CProp[0] ≝
- match n with
- [ End ⇒ λP:mk_P1 S T End.λf:T. P f
- | Next q m ⇒ λP: mk_P1 S T (Next q m).λf: mk_F1 S T (Next q m).
- ∃x:S.mk_Ex1 S T m (P x) (f x) ].
-
-nlemma Sig_generic1 : ∀S,T.∀n:counter.∀P,f,g.
- mk_E1 S T n f g → mk_H1 S T n P P f g → mk_Ex1 S T n P f =_1 mk_Ex1 S T n P g.
-#S T n; nelim n; nnormalize;
-##[ #P f g E H; /2/;
-##| #q m IH P f g E H; @; *; #x Px; @x; ncases (IH … (E x) (H x)); /3/; ##]
-nqed.
-
-(* notation "∑x1,...,xn. E / H ; P" were:
- - x1...xn are bound in E and P, H is bound in P
- - H is an identifier that will have the type of E in P
- - P is the proof that the two existentially quantified predicates are equal*)
-notation > "∑ list1 ident x sep , . term 56 E / ident nE ; term 19 H" with precedence 20
-for @{ 'Sig_gen
- ${ fold right @{ 'End } rec acc @{ ('Next (λ${ident x}.${ident x}) $acc) } }
- ${ fold right @{ $E } rec acc @{ λ${ident x}.$acc } }
- ${ fold right @{ λ${ident nE}.$H } rec acc @{ λ${ident x}.$acc } }
-}.
-
-interpretation "next" 'Next x y = (Next x y).
-interpretation "end" 'End = End.
-interpretation "sig_gen" 'Sig_gen n E H = (Sig_generic ?? n ??? E H).
-interpretation "sig_gen1" 'Sig_gen n E H = (Sig_generic1 ?? n ??? E H).
-
-(*
-nlemma test0 : ∀S:setoid. ∀P: (setoid1_of_setoid S) ⇒_1 CPROP.∀f,g:S → S.
- (∀x:S.f x = g x) → (Ex S (λw.P (f w))) =_1 (Ex S (λw.P (g w))).
-#S P f g E; napply (∑w. E w / H ; ┼_1H); nqed.
-
-nlemma test : ∀S:setoid. ∀P: (setoid1_of_setoid S) ⇒_1 CPROP.∀f,g:S → S.
- (∀x:S.f x = g x) → (Ex S (λw.P (f w)∧ True)) =_1 (Ex S (λw.P (g w)∧ True)).
-#S P f g E; napply (∑w. E w / H ; (┼_1H)╪_1#); nqed.
-
-nlemma test_bound : ∀S:setoid. ∀e,f: (setoid1_of_setoid S) ⇒_1 CPROP. e = f →
- (Ex S (λw.e w ∧ True)) =_1 (Ex S (λw.f w ∧ True)).
-#S f g E; napply (.=_1 ∑x. E x x # / H ; (H ╪_1 #)); //; nqed.
-
-nlemma test2 : ∀S:setoid. ∀ee: (setoid1_of_setoid S) ⇒_1 (setoid1_of_setoid S) ⇒_1 CPROP.
- ∀x,y:setoid1_of_setoid S.x =_1 y →
- (True ∧ (Ex S (λw.ee x w ∧ True))) =_1 (True ∧ (Ex S (λw.ee y w ∧ True))).
-#S m x y E; napply (.=_1 #╪_1(∑w. E / E ; ((E ╪_1 #) ╪_1 #))). //; nqed.
-
-nlemma test3 : ∀S:setoid. ∀ee: (setoid1_of_setoid S) ⇒_1 (setoid1_of_setoid S) ⇒_1 CPROP.
- ∀x,y:setoid1_of_setoid S.x =_1 y →
- ((Ex S (λw.ee x w ∧ True) ∨ True)) =_1 ((Ex S (λw.ee y w ∧ True) ∨ True)).
-#S m x y E; napply (.=_1 (∑w. E / E ; ((E ╪_1 #) ╪_1 #)) ╪_1 #). //; nqed.
-*)
-
\ No newline at end of file
include "logic/equality.ma".
-ninductive unit: Type[0] ≝ k: unit.
-
-ninductive bool: unit → Type[0] ≝ true : bool k | false : bool k.
-
-nlemma foo: true = false → False. #H; ndestruct;
-nqed.
-
(* nlemma prova : ∀T:Type[0].∀a,b:T.∀e:a = b.
∀P:∀x,y:T.x=y→Prop.P a a (refl T a) → P a b e.
#T;#a;#b;#e;#P;#H;
ninductive eq (A: Type[0]) (a: A) : A → CProp[0] ≝
refl: eq A a a.
-nlemma eq_rect_Type0_r':
- ∀A.∀a,x.∀p:eq ? x a.∀P: ∀x:A. eq ? x a → Type[0]. P a (refl A a) → P x p.
- #A; #a; #x; #p; ncases p; #P; #H; nassumption.
-nqed.
-
-nlemma eq_rect_Type0_r:
- ∀A.∀a.∀P: ∀x:A. eq ? x a → Type[0]. P a (refl A a) → ∀x.∀p:eq ? x a.P x p.
- #A; #a; #P; #p; #x0; #p0; napply (eq_rect_Type0_r' ??? p0); nassumption.
-nqed.
-
nlemma eq_rect_CProp0_r':
∀A.∀a,x.∀p:eq ? x a.∀P: ∀x:A. eq ? x a → CProp[0]. P a (refl A a) → P x p.
#A; #a; #x; #p; ncases p; #P; #H; nassumption.
napply a4;
nqed.
-naxiom streicherK : ∀T:Type[0].∀t:T.∀P:t = t → Type[2].P (refl ? t) → ∀p.P p.
-
ndefinition EQ: ∀A:Type[0]. equivalence_relation A.
#A; napply mk_equivalence_relation
[ napply eq
| napply refl
| #x; #y; #H; nrewrite < H; napply refl
| #x; #y; #z; #Hyx; #Hxz; nrewrite < Hxz; nassumption]
-nqed.
-
-naxiom T1 : Type[0].
-naxiom T2 : T1 → Type[0].
-naxiom t1 : T1.
-naxiom t2 : ∀x:T1. T2 x.
-
-ninductive I2 : ∀r1:T1.T2 r1 → Type[0] ≝
-| i2c1 : ∀x1:T1.∀x2:T2 x1. I2 x1 x2
-| i2c2 : I2 t1 (t2 t1).
-
-(* nlemma i2d : ∀a,b.∀x,y:I2 a b.
- ∀e1:a = a.∀e2:R1 T1 a (λz,p.T2 z) b a e1 = b.
- ∀e: R2 T1 a (λz,p.T2 z) b (λz1,p1,z2,p2.I2 z1 z2) x a e1 b e2 = y.
- Type[2].
-#a;#b;#x;#y;
-napply (
-match x return (λr1,r2,r.
- ∀e1:r1 = a. ∀e2:R1 T1 r1 (λz,p. T2 z) r2 a e1 = b.
- ∀e :R2 T1 r1 (λz,p. T2 z) r2 (λz1,p1,z2,p2. I2 z1 z2) r a e1 b e2 = y. Type[2]) with
- [ i2c1 x1 x2 ⇒ ?
- | i2c2 ⇒ ?]
-)
-[napply (match y return (λr1,r2,r.
- ∀e1: x1 = r1. ∀e2: R1 T1 x1 (λz,p. T2 z) x2 r1 e1 = r2.
- ∀e : R2 T1 x1 (λz,p.T2 z) x2 (λz1,p1,z2,p2. I2 z1 z2) (i2c1 x1 x2) r1 e1 r2 e2 = r. Type[2]) with
- [ i2c1 y1 y2 ⇒ ?
- | i2c2 ⇒ ? ])
- [#e1; #e2; #e;
- napply (∀P:Type[1].
- (∀f1:x1 = y1. ∀f2: R1 T1 x1 (λz,p.T2 z) x2 y1 f1 = y2.
- ∀f: R2 T1 x1 (λz,p.T2 z) x2
- (λz1,p1,z2,p2.eq ?
- (i2c1 (R1 ??? z1 ? (R1 ?? (λm,n.m = y1) f1 ? p1)) ?)
- (* (R2 ???? (λm1,n1,m2,n2.R1 ?? (λm,n.T2 m) ? ? f1 = y2) f2 ?
- p1 ? p2)))*)
-(* (R2 ???? (λw1,q1,w2,q2.I2 w1 w2) (i2c1 z1 z2)
- ? (R1 ?? (λw,q.w = y1) e1 z1 p1)
- ? (R2 ????
- (λw1,q1,w2,q2.R1 ?? (λm,n.T2 m) w2 ? q1 = y2)
- e2 z1 p1 (R1 T1 x1 (λw,q.w = y1) e1 z1 p1) p2))
- *) (i2c1 y1 y2))
- ? y1 f1 y2 f2 = refl (I2 y1 y2) (i2c1 y1 y2).P)
- → P);
- napply (∀P:Type[1].
- (∀f1:x1 = y1. ∀f2: R1 T1 x1 (λz,p.T2 z) x2 y1 f1 = y2.
- ∀f: R2 T1 x1 (λz,p.T2 z) x2
- (λz1,p1,z2,p2.eq (I2 y1 y2)
- (R2 T1 z1 (λw,q.T2 w) z2 (λw1,q1,w2,q2.I2 w1 w2) (i2c1 z1 z2)
- y1 (R1 T1 x1 (λw,q.w = y1) e1 z1 p1)
- y2 (R2 T1 x1 (λw,q.w = y1) e1
- (λw1,q1,w2,q2.R1 ??? w2 w1 q1 = y2) e2 z1 p1 (R1 T1 x1 (λw,q.w = y1) e1 z1 p1) p2))
- (i2c1 y1 y2))
- e y1 f1 y2 f2 = refl (I2 y1 y2) (i2c1 y1 y2).P)
- → P);
-
-
-
-ndefinition i2d : ∀a,b.∀x,y:I2 a b.
- ∀e1:a = a.∀e2:R1 T1 a (λz,p.T2 z) b a e1 = b.
- ∀e: R2 T1 a (λz,p.T2 z) b (λz1,p1,z2,p2.I2 z1 z2) x a e1 b e2 = y.Type[2] ≝
-λa,b,x,y.
-match x return (λr1,r2,r.
- ∀e1:r1 = a. ∀e2:R1 T1 r1 (λz,p. T2 z) r2 a e1 = b.
- ∀e :R2 T1 r1 (λz,p. T2 z) r2 (λz1,p1,z2,p2. I2 z1 z2) r a e1 b e2 = y. Type[2]) with
- [ i2c1 x1 x2 ⇒
- match y return (λr1,r2,r.
- ∀e1: x1 = r1. ∀e2: R1 T1 x1 (λz,p. T2 z) x2 r1 e1 = r2.
- ∀e : R2 T1 x1 (λz,p.T2 z) x2 (λz1,p1,z2,p2. I2 z1 z2) (i2c1 x1 x2) r1 e1 r2 e2 = r. Type[2]) with
- [ i2c1 y1 y2 ⇒ λe1,e2,e.∀P:Type[1].
- (∀f1:x1 = y1. ∀f2: R1 T1 x1 (λz,p.T2 z) x2 y1 f1 = y2.
- ∀f: R2 T1 x1 (λz,p.T2 z) x2
- (λz1,p1,z2,p2.eq (I2 y1 y2)
- (R2 T1 z1 (λw,q.T2 w) z2 (λw1,q1,w2,q2.I2 w1 w2) (i2c1 z1 z2)
- y1 (R1 T1 x1 (λw,q.w = y1) e1 z1 p1)
- y2 (R2 T1 x1 (λw,q.w = y1) e1
- (λw1,q1,w2,q2.R1 ??? w2 w1 q1 = y2) e2 z1 p1 (R1 T1 x1 (λw,q.w = y1) e1 z1 p1) p2))
- (i2c1 y1 y2))
- e y1 f1 y2 f2 = refl (I2 y1 y2) (i2c1 y1 y2).P)
- → P
- | i2c2 ⇒ λe1,e2,e.∀P:Type[1].P ]
- | i2c2 ⇒
- match y return (λr1,r2,r.
- ∀e1: x1 = r1. ∀e2: R1 ?? (λz,p. T2 z) x2 ? e1 = r2.
- ∀e : R2 ???? (λz1,p1,z2,p2. I2 z1 z2) i2c2 ? e1 ? e2 = r. Type[2]) with
- [ i2c1 _ _ ⇒ λe1,e2,e.∀P:Type[1].P
- | i2c2 ⇒ λe1,e2,e.∀P:Type[1].
- (∀f: R2 ????
- (λz1,p1,z2,p2.eq ? i2c2 i2c2)
- e ? e1 ? e2 = refl ? i2c2.P) → P ] ].
-
-*)
\ No newline at end of file
+nqed.
\ No newline at end of file
include "hints_declaration.ma".
include "logic/equality.ma".
-include "sets/setoids.ma".
ninductive nat: Type[0] ≝
O: nat
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "sets/categories2.ma".
-
-(*
-interpretation "unary morphism comprehension with no proof" 'comprehension T P =
- (mk_unary_morphism T ? P ?).
-interpretation "unary morphism1 comprehension with no proof" 'comprehension T P =
- (mk_unary_morphism1 T ? P ?).
-
-notation > "hvbox({ ident i ∈ s | term 19 p | by })" with precedence 90
-for @{ 'comprehension_by $s (λ${ident i}. $p) $by}.
-notation < "hvbox({ ident i ∈ s | term 19 p })" with precedence 90
-for @{ 'comprehension_by $s (λ${ident i}:$_. $p) $by}.
-
-interpretation "unary morphism comprehension with proof" 'comprehension_by s \eta.f p =
- (mk_unary_morphism s ? f p).
-interpretation "unary morphism1 comprehension with proof" 'comprehension_by s \eta.f p =
- (mk_unary_morphism1 s ? f p).
-*)
-
-(* per il set-indexing vedere capitolo BPTools (foundational tools), Sect. 0.3.4 complete
- lattices, Definizione 0.9 *)
-(* USARE L'ESISTENZIALE DEBOLE *)
-nrecord OAlgebra : Type[2] := {
- oa_P :> setoid1;
- oa_leq : unary_morphism1 oa_P (unary_morphism1_setoid1 oa_P CPROP); (*CSC: dovrebbe essere CProp bug refiner*)
- oa_overlap: unary_morphism1 oa_P (unary_morphism1_setoid1 oa_P CPROP);
- binary_meet: unary_morphism1 oa_P (unary_morphism1_setoid1 oa_P oa_P);
-(*CSC: oa_join: ∀I:setoid.unary_morphism1 (setoid1_of_setoid … I ⇒ oa_P) oa_P;*)
- oa_one: oa_P;
- oa_zero: oa_P;
- oa_leq_refl: ∀a:oa_P. oa_leq a a;
- oa_leq_antisym: ∀a,b:oa_P.oa_leq a b → oa_leq b a → a = b;
- oa_leq_trans: ∀a,b,c:oa_P.oa_leq a b → oa_leq b c → oa_leq a c;
- oa_overlap_sym: ∀a,b:oa_P.oa_overlap a b → oa_overlap b a;
-(*CSC: oa_join_sup: ∀I:setoid.∀p_i:I ⇒ oa_P.∀p:oa_P.oa_leq (oa_join I p_i) p = (∀i:I.oa_leq (p_i i) p);*)
- oa_zero_bot: ∀p:oa_P.oa_leq oa_zero p;
- oa_one_top: ∀p:oa_P.oa_leq p oa_one;
- oa_overlap_preservers_meet: ∀p,q:oa_P.oa_overlap p q → oa_overlap p (binary_meet p q);
-(*CSC: oa_join_split:
- ∀I:SET.∀p.∀q:I ⇒ oa_P.
- oa_overlap p (oa_join I q) = (∃i:I.oa_overlap p (q i));*)
- (*oa_base : setoid;
- 1) enum non e' il nome giusto perche' non e' suriettiva
- 2) manca (vedere altro capitolo) la "suriettivita'" come immagine di insiemi di oa_base
- oa_enum : ums oa_base oa_P;
- oa_density: ∀p,q.(∀i.oa_overlap p (oa_enum i) → oa_overlap q (oa_enum i)) → oa_leq p q
- *)
- oa_density:
- ∀p,q.(∀r.oa_overlap p r → oa_overlap q r) → oa_leq p q
-}.
-
-interpretation "o-algebra leq" 'leq a b = (fun11 ?? (fun11 ?? (oa_leq ?) a) b).
-
-notation "hovbox(a mpadded width -150% (>)< b)" non associative with precedence 45
-for @{ 'overlap $a $b}.
-interpretation "o-algebra overlap" 'overlap a b = (fun11 ?? (fun11 ?? (oa_overlap ?) a) b).
-
-notation < "hovbox(mstyle scriptlevel 1 scriptsizemultiplier 1.7 (∧) \below (\emsp) \nbsp term 90 p)"
-non associative with precedence 50 for @{ 'oa_meet $p }.
-notation < "hovbox(mstyle scriptlevel 1 scriptsizemultiplier 1.7 (∧) \below (ident i ∈ I) break term 90 p)"
-non associative with precedence 50 for @{ 'oa_meet_mk (λ${ident i}:$I.$p) }.
-
-(*notation > "hovbox(∧ f)" non associative with precedence 60
-for @{ 'oa_meet $f }.
-interpretation "o-algebra meet" 'oa_meet f =
- (fun12 ?? (oa_meet ??) f).
-interpretation "o-algebra meet with explicit function" 'oa_meet_mk f =
- (fun12 ?? (oa_meet ??) (mk_unary_morphism ?? f ?)).
-*)
-notation < "hovbox(mstyle scriptlevel 1 scriptsizemultiplier 1.7 (∨) \below (\emsp) \nbsp term 90 p)"
-non associative with precedence 50 for @{ 'oa_join $p }.
-notation < "hovbox(mstyle scriptlevel 1 scriptsizemultiplier 1.7 (∨) \below (ident i ∈ I) break term 90 p)"
-non associative with precedence 50 for @{ 'oa_join_mk (λ${ident i}:$I.$p) }.
-
-(*CSC
-notation > "hovbox(∨ f)" non associative with precedence 60
-for @{ 'oa_join $f }.
-interpretation "o-algebra join" 'oa_join f =
- (fun12 ?? (oa_join ??) f).
-interpretation "o-algebra join with explicit function" 'oa_join_mk f =
- (fun12 ?? (oa_join ??) (mk_unary_morphism ?? f ?)).
-*)
-(*definition binary_meet : ∀O:OAlgebra. binary_morphism1 O O O.
-intros; split;
-[ intros (p q);
- apply (∧ { x ∈ BOOL | match x with [ true ⇒ p | false ⇒ q ] | IF_THEN_ELSE_p ? p q });
-| intros; lapply (prop12 ? O (oa_meet O BOOL));
- [2: apply ({ x ∈ BOOL | match x with [ true ⇒ a | false ⇒ b ] | IF_THEN_ELSE_p ? a b });
- |3: apply ({ x ∈ BOOL | match x with [ true ⇒ a' | false ⇒ b' ] | IF_THEN_ELSE_p ? a' b' });
- | apply Hletin;]
- intro x; simplify; cases x; simplify; assumption;]
-qed.*)
-
-interpretation "o-algebra binary meet" 'and a b =
- (fun11 ?? (fun11 ?? (binary_meet ?) a) b).
-
-(*
-prefer coercion Type1_OF_OAlgebra.
-
-definition binary_join : ∀O:OAlgebra. binary_morphism1 O O O.
-intros; split;
-[ intros (p q);
- apply (∨ { x ∈ BOOL | match x with [ true ⇒ p | false ⇒ q ] | IF_THEN_ELSE_p ? p q });
-| intros; lapply (prop12 ? O (oa_join O BOOL));
- [2: apply ({ x ∈ BOOL | match x with [ true ⇒ a | false ⇒ b ] | IF_THEN_ELSE_p ? a b });
- |3: apply ({ x ∈ BOOL | match x with [ true ⇒ a' | false ⇒ b' ] | IF_THEN_ELSE_p ? a' b' });
- | apply Hletin;]
- intro x; simplify; cases x; simplify; assumption;]
-qed.
-
-interpretation "o-algebra binary join" 'or a b =
- (fun21 ??? (binary_join ?) a b).
-*)
-(*
-lemma oa_overlap_preservers_meet: ∀O:OAlgebra.∀p,q:O.p >< q → p >< (p ∧ q).
-(* next change to avoid universe inconsistency *)
-change in ⊢ (?→%→%→?) with (Type1_OF_OAlgebra O);
-intros; lapply (oa_overlap_preserves_meet_ O p q f);
-lapply (prop21 O O CPROP (oa_overlap O) p p ? (p ∧ q) # ?);
-[3: apply (if ?? (Hletin1)); apply Hletin;|skip] apply refl1;
-qed.
-*)
-notation < "hovbox(mstyle scriptlevel 1 scriptsizemultiplier 1.7 (∨) \below (\emsp) \nbsp term 90 p)"
-non associative with precedence 49 for @{ 'oa_join $p }.
-notation < "hovbox(mstyle scriptlevel 1 scriptsizemultiplier 1.7 (∨) \below (ident i ∈ I) break term 90 p)"
-non associative with precedence 49 for @{ 'oa_join_mk (λ${ident i}:$I.$p) }.
-notation < "hovbox(a ∨ b)" left associative with precedence 49
-for @{ 'oa_join_mk (λ${ident i}:$_.match $i with [ true ⇒ $a | false ⇒ $b ]) }.
-
-notation > "hovbox(∨ f)" non associative with precedence 59
-for @{ 'oa_join $f }.
-notation > "hovbox(a ∨ b)" left associative with precedence 49
-for @{ 'oa_join (mk_unary_morphism BOOL ? (λx__:bool.match x__ with [ true ⇒ $a | false ⇒ $b ]) (IF_THEN_ELSE_p ? $a $b)) }.
-
-(*interpretation "o-algebra join" 'oa_join f =
- (fun12 ?? (oa_join ??) f).
-interpretation "o-algebra join with explicit function" 'oa_join_mk f =
- (fun12 ?? (oa_join ??) (mk_unary_morphism ?? f ?)).
-*)
-nrecord ORelation (P,Q : OAlgebra) : Type[1] ≝ {
- or_f :> P ⇒ Q;
- or_f_minus_star : P ⇒ Q;
- or_f_star : Q ⇒ P;
- or_f_minus : Q ⇒ P;
- or_prop1 : ∀p,q. (or_f p ≤ q) = (p ≤ or_f_star q);
- or_prop2 : ∀p,q. (or_f_minus p ≤ q) = (p ≤ or_f_minus_star q);
- or_prop3 : ∀p,q. (or_f p >< q) = (p >< or_f_minus q)
-}.
-
-notation "r \sup *" non associative with precedence 90 for @{'OR_f_star $r}.
-notation > "r *" non associative with precedence 90 for @{'OR_f_star $r}.
-
-notation "r \sup (⎻* )" non associative with precedence 90 for @{'OR_f_minus_star $r}.
-notation > "r⎻*" non associative with precedence 90 for @{'OR_f_minus_star $r}.
-
-notation "r \sup ⎻" non associative with precedence 90 for @{'OR_f_minus $r}.
-notation > "r⎻" non associative with precedence 90 for @{'OR_f_minus $r}.
-
-interpretation "o-relation f⎻*" 'OR_f_minus_star r = (or_f_minus_star ? ? r).
-interpretation "o-relation f⎻" 'OR_f_minus r = (or_f_minus ? ? r).
-interpretation "o-relation f*" 'OR_f_star r = (or_f_star ? ? r).
-
-
-ndefinition ORelation_setoid : OAlgebra → OAlgebra → setoid1.
-#P; #Q; @ (ORelation P Q); @
- [ napply (λp,q.p = q)
- | #x; napply refl1
- | #x; #y; napply sym1
- | #x; #y; #z; napply trans1 ]
-nqed.
-
-unification hint 0 ≔ P, Q ;
- R ≟ (ORelation_setoid P Q)
-(* -------------------------- *) ⊢
- carr1 R ≡ ORelation P Q.
-
-ndefinition or_f_morphism1: ∀P,Q:OAlgebra.unary_morphism1 (ORelation_setoid P Q)
- (unary_morphism1_setoid1 P Q).
- #P; #Q; @
- [ napply or_f
- | #a; #a'; #e; nassumption]
-nqed.
-
-unification hint 0 ≔ P, Q, r;
- R ≟ (mk_unary_morphism1 … (or_f …) (prop11 … (or_f_morphism1 …)))
-(* ------------------------ *) ⊢
- fun11 … R r ≡ or_f P Q r.
-
-nlemma ORelation_eq_respects_leq_or_f_minus_:
- ∀P,Q:OAlgebra.∀r,r':ORelation P Q.
- r=r' → ∀x. r⎻ x ≤ r'⎻ x.
- #P; #Q; #a; #a'; #e; #x;
- napply oa_density; #r; #H;
- napply oa_overlap_sym;
- napply (. (or_prop3 … a' …)^-1); (*CSC: why a'? *)
- napply (. ?‡#)
- [##2: napply (a r)
- | napply (e^-1); //]
- napply (. (or_prop3 …));
- napply oa_overlap_sym;
- nassumption.
-nqed.
-
-nlemma ORelation_eq2:
- ∀P,Q:OAlgebra.∀r,r':ORelation P Q.
- r=r' → r⎻ = r'⎻.
- #P; #Q; #a; #a'; #e; #x; #x'; #Hx; napply (.= †Hx);
- napply oa_leq_antisym; napply ORelation_eq_respects_leq_or_f_minus_
- [ napply e | napply (e^-1)]
-nqed.
-
-ndefinition or_f_minus_morphism1: ∀P,Q:OAlgebra.unary_morphism1 (ORelation_setoid P Q)
- (unary_morphism1_setoid1 Q P).
- #P; #Q; @
- [ napply or_f_minus
- | napply ORelation_eq2]
-nqed.
-
-unification hint 0 ≔ P, Q, r;
- R ≟ (mk_unary_morphism1 … (or_f_minus …) (prop11 … (or_f_minus_morphism1 …)))
-(* ------------------------ *) ⊢
- fun11 … R r ≡ or_f_minus P Q r.
-
-naxiom daemon : False.
-
-nlemma ORelation_eq_respects_leq_or_f_star_:
- ∀P,Q:OAlgebra.∀r,r':ORelation P Q.
- r=r' → ∀x. r* x ≤ r'* x.
- #P; #Q; #a; #a'; #e; #x; (*CSC: una schifezza *)
- ncases daemon.
- (*
- ngeneralize in match (. (or_prop1 P Q a' (a* x) x)^-1) in ⊢ %; #H; napply H;
- nchange with (or_f P Q a' (a* x) ≤ x);
- napply (. ?‡#)
- [##2: napply (a (a* x))
- | ngeneralize in match (a* x);
- nchange with (or_f P Q a' = or_f P Q a);
- napply (.= †e^-1); napply #]
- napply (. (or_prop1 …));
- napply oa_leq_refl.*)
-nqed.
-
-nlemma ORelation_eq3:
- ∀P,Q:OAlgebra.∀r,r':ORelation P Q.
- r=r' → r* = r'*.
- #P; #Q; #a; #a'; #e; #x; #x'; #Hx; napply (.= †Hx);
- napply oa_leq_antisym; napply ORelation_eq_respects_leq_or_f_star_
- [ napply e | napply (e^-1)]
-nqed.
-
-ndefinition or_f_star_morphism1: ∀P,Q:OAlgebra.unary_morphism1 (ORelation_setoid P Q)
- (unary_morphism1_setoid1 Q P).
- #P; #Q; @
- [ napply or_f_star
- | napply ORelation_eq3]
-nqed.
-
-unification hint 0 ≔ P, Q, r;
- R ≟ (mk_unary_morphism1 … (or_f_star …) (prop11 … (or_f_star_morphism1 …)))
-(* ------------------------ *) ⊢
- fun11 … R r ≡ or_f_star P Q r.
-
-nlemma ORelation_eq_respects_leq_or_f_minus_star_:
- ∀P,Q:OAlgebra.∀r,r':ORelation P Q.
- r=r' → ∀x. r⎻* x ≤ r'⎻* x.
- #P; #Q; #a; #a'; #e; #x; (*CSC: una schifezza *)
- ncases daemon. (*
- ngeneralize in match (. (or_prop2 P Q a' (a⎻* x) x)^-1) in ⊢ %; #H; napply H;
- nchange with (or_f_minus P Q a' (a⎻* x) ≤ x);
- napply (. ?‡#)
- [##2: napply (a⎻ (a⎻* x))
- | ngeneralize in match (a⎻* x);
- nchange with (a'⎻ = a⎻);
- napply (.= †e^-1); napply #]
- napply (. (or_prop2 …));
- napply oa_leq_refl.*)
-nqed.
-
-nlemma ORelation_eq4:
- ∀P,Q:OAlgebra.∀r,r':ORelation P Q.
- r=r' → r⎻* = r'⎻*.
- #P; #Q; #a; #a'; #e; #x; #x'; #Hx; napply (.= †Hx);
- napply oa_leq_antisym; napply ORelation_eq_respects_leq_or_f_minus_star_
- [ napply e | napply (e^-1)]
-nqed.
-
-ndefinition or_f_minus_star_morphism1:
- ∀P,Q:OAlgebra.unary_morphism1 (ORelation_setoid P Q) (unary_morphism1_setoid1 P Q).
- #P; #Q; @
- [ napply or_f_minus_star
- | napply ORelation_eq4]
-nqed.
-
-
-unification hint 0 ≔ P, Q, r;
- R ≟ (mk_unary_morphism1 … (or_f_minus_star …) (prop11 … (or_f_minus_star_morphism1 …)))
-(* ------------------------ *) ⊢
- fun11 … R r ≡ or_f_minus_star P Q r.
-
-(* qui la notazione non va *)
-(*CSC
-nlemma leq_to_eq_join: ∀S:OAlgebra.∀p,q:S. p ≤ q → q = (binary_join ? p q).
- intros;
- apply oa_leq_antisym;
- [ apply oa_density; intros;
- apply oa_overlap_sym;
- unfold binary_join; simplify;
- apply (. (oa_join_split : ?));
- exists; [ apply false ]
- apply oa_overlap_sym;
- assumption
- | unfold binary_join; simplify;
- apply (. (oa_join_sup : ?)); intro;
- cases i; whd in ⊢ (? ? ? ? ? % ?);
- [ assumption | apply oa_leq_refl ]]
-qed.
-
-nlemma overlap_monotone_left: ∀S:OAlgebra.∀p,q,r:S. p ≤ q → p >< r → q >< r.
- #S; #p; #q; #r; #H1; #H2;
- apply (. (leq_to_eq_join : ?)‡#);
- [ apply f;
- | skip
- | apply oa_overlap_sym;
- unfold binary_join; simplify;
- apply (. (oa_join_split : ?));
- exists [ apply true ]
- apply oa_overlap_sym;
- assumption; ]
-qed.*)
-
-(* Part of proposition 9.9 *)
-nlemma f_minus_image_monotone: ∀S,T.∀R:ORelation S T.∀p,q. p ≤ q → R⎻ p ≤ R⎻ q.
- #S; #T; #R; #p; #q; #H;
- napply (. (or_prop2 …));
- napply oa_leq_trans; ##[##2: napply H; ##| ##skip |
- napply (. (or_prop2 … q …)^ -1);(*CSC: why q?*) napply oa_leq_refl]
-nqed.
-
-(* Part of proposition 9.9 *)
-nlemma f_minus_star_image_monotone: ∀S,T.∀R:ORelation S T.∀p,q. p ≤ q → R⎻* p ≤ R⎻* q.
- #S; #T; #R; #p; #q; #H;
- napply (. (or_prop2 … (R⎻* p) q)^ -1); (*CSC: why ?*)
- napply oa_leq_trans; ##[##3: napply H; ##| ##skip | napply (. (or_prop2 …)); napply oa_leq_refl]
-nqed.
-
-(* Part of proposition 9.9 *)
-nlemma f_image_monotone: ∀S,T.∀R:ORelation S T.∀p,q. p ≤ q → R p ≤ R q.
- #S; #T; #R; #p; #q; #H;
- napply (. (or_prop1 …));
- napply oa_leq_trans; ##[##2: napply H; ##| ##skip | napply (. (or_prop1 … q …)^ -1); napply oa_leq_refl]
-nqed.
-
-(* Part of proposition 9.9 *)
-nlemma f_star_image_monotone: ∀S,T.∀R:ORelation S T.∀p,q. p ≤ q → R* p ≤ R* q.
- #S; #T; #R; #p; #q; #H;
- napply (. (or_prop1 … (R* p) q)^ -1);
- napply oa_leq_trans; ##[##3: napply H; ##| ##skip | napply (. (or_prop1 …)); napply oa_leq_refl]
-nqed.
-
-nlemma lemma_10_2_a: ∀S,T.∀R:ORelation S T.∀p. p ≤ R⎻* (R⎻ p).
- #S; #T; #R; #p;
- napply (. (or_prop2 … p …)^-1);
- napply oa_leq_refl.
-nqed.
-
-nlemma lemma_10_2_b: ∀S,T.∀R:ORelation S T.∀p. R⎻ (R⎻* p) ≤ p.
- #S; #T; #R; #p;
- napply (. (or_prop2 …));
- napply oa_leq_refl.
-nqed.
-
-nlemma lemma_10_2_c: ∀S,T.∀R:ORelation S T.∀p. p ≤ R* (R p).
- #S; #T; #R; #p;
- napply (. (or_prop1 … p …)^-1);
- napply oa_leq_refl.
-nqed.
-
-nlemma lemma_10_2_d: ∀S,T.∀R:ORelation S T.∀p. R (R* p) ≤ p.
- #S; #T; #R; #p;
- napply (. (or_prop1 …));
- napply oa_leq_refl.
-nqed.
-
-nlemma lemma_10_3_a: ∀S,T.∀R:ORelation S T.∀p. R⎻ (R⎻* (R⎻ p)) = R⎻ p.
- #S; #T; #R; #p; napply oa_leq_antisym
- [ napply lemma_10_2_b
- | napply f_minus_image_monotone;
- napply lemma_10_2_a ]
-nqed.
-
-nlemma lemma_10_3_b: ∀S,T.∀R:ORelation S T.∀p. R* (R (R* p)) = R* p.
- #S; #T; #R; #p; napply oa_leq_antisym
- [ napply f_star_image_monotone;
- napply (lemma_10_2_d ?? R p)
- | napply lemma_10_2_c ]
-nqed.
-
-nlemma lemma_10_3_c: ∀S,T.∀R:ORelation S T.∀p. R (R* (R p)) = R p.
- #S; #T; #R; #p; napply oa_leq_antisym
- [ napply lemma_10_2_d
- | napply f_image_monotone;
- napply (lemma_10_2_c ?? R p) ]
-nqed.
-
-nlemma lemma_10_3_d: ∀S,T.∀R:ORelation S T.∀p. R⎻* (R⎻ (R⎻* p)) = R⎻* p.
- #S; #T; #R; #p; napply oa_leq_antisym
- [ napply f_minus_star_image_monotone;
- napply (lemma_10_2_b ?? R p)
- | napply lemma_10_2_a ]
-nqed.
-
-nlemma lemma_10_4_a: ∀S,T.∀R:ORelation S T.∀p. R⎻* (R⎻ (R⎻* (R⎻ p))) = R⎻* (R⎻ p).
- #S; #T; #R; #p; napply (†(lemma_10_3_a …)).
-nqed.
-
-nlemma lemma_10_4_b: ∀S,T.∀R:ORelation S T.∀p. R (R* (R (R* p))) = R (R* p).
- #S; #T; #R; #p; napply (†(lemma_10_3_b …));
-nqed.
-
-nlemma oa_overlap_sym': ∀o:OAlgebra.∀U,V:o. (U >< V) = (V >< U).
- #o; #U; #V; @; #H; napply oa_overlap_sym; nassumption.
-nqed.
-
-(******************* CATEGORIES **********************)
-
-ninductive one : Type[0] ≝ unit : one.
-
-ndefinition force : ∀S:Type[2]. S → ∀T:Type[2]. T → one → Type[2] ≝
- λS,s,T,t,lock. match lock with [ unit => S ].
-
-ndefinition enrich_as :
- ∀S:Type[2].∀s:S.∀T:Type[2].∀t:T.∀lock:one.force S s T t lock ≝
- λS,s,T,t,lock. match lock return λlock.match lock with [ unit ⇒ S ]
- with [ unit ⇒ s ].
-
-ncoercion enrich_as : ∀S:Type[2].∀s:S.∀T:Type[2].∀t:T.∀lock:one. force S s T t lock
- ≝ enrich_as on t: ? to force ? ? ? ? ?.
-
-(* does not work here
-nlemma foo : ∀A,B,C:setoid1.∀f:B ⇒ C.∀g:A ⇒ B. unary_morphism1 A C.
-#A; #B; #C; #f; #g; napply(f \circ g).
-nqed.*)
-
-(* This precise hint does not leave spurious metavariables *)
-unification hint 0 ≔ A,B,C : setoid1, f:B ⇒ C, g: A ⇒ B;
- lock ≟ unit
-(* --------------------------------------------------------------- *) ⊢
- (unary_morphism1 A C)
- ≡
- (force (unary_morphism1 A C) (comp1_unary_morphisms A B C f g)
- (carr1 A → carr1 C) (composition1 A B C f g) lock)
- .
-
-(* This uniform hint opens spurious metavariables
-unification hint 0 ≔ A,B,C : setoid1, f:B ⇒ C, g: A ⇒ B, X;
- lock ≟ unit
-(* --------------------------------------------------------------- *) ⊢
- (unary_morphism1 A C)
- ≡
- (force (unary_morphism1 A C) X (carr1 A → carr1 C) (fun11 … X) lock)
- .
-*)
-
-nlemma foo : ∀A,B,C:setoid1.∀f:B ⇒ C.∀g:A ⇒ B. unary_morphism1 A C.
-#A; #B; #C; #f; #g; napply(f ∘ g).
-nqed.
-
-(*
-
-ndefinition uffa: ∀A,B. ∀U: unary_morphism1 A B. (A → B) → CProp[0].
- #A;#B;#_;#_; napply True.
-nqed.
-ndefinition mk_uffa: ∀A,B.∀U: unary_morphism1 A B. ∀f: (A → B). uffa A B U f.
- #A; #B; #U; #f; napply I.
-nqed.
-
-ndefinition coerc_to_unary_morphism1:
- ∀A,B. ∀U: unary_morphism1 A B. uffa A B U (fun11 … U) → unary_morphism1 A B.
- #A; #B; #U; #_; nassumption.
-nqed.
-
-ncheck (λA,B,C,f,g.coerc_to_unary_morphism1 ??? (mk_uffa ??? (composition1 A B C f g))).
-*)
-ndefinition ORelation_composition : ∀P,Q,R.
- unary_morphism1 (ORelation_setoid P Q)
- (unary_morphism1_setoid1 (ORelation_setoid Q R) (ORelation_setoid P R)).
-#P; #Q; #R; napply mk_binary_morphism1
-[ #F; #G; @
- [ napply (G ∘ F) (* napply (comp1_unary_morphisms … G F) (*CSC: was (G ∘ F);*) *)
- | napply (G⎻* ∘ F⎻* ) (* napply (comp1_unary_morphisms … G⎻* F⎻* ) (*CSC: was (G⎻* ∘ F⎻* );*)*)
- | napply (comp1_unary_morphisms … F* G* ) (*CSC: was (F* ∘ G* );*)
- | napply (comp1_unary_morphisms … F⎻ G⎻) (*CSC: was (F⎻ ∘ G⎻);*)
- | #p; #q; nnormalize;
- napply (.= (or_prop1 … G …)); (*CSC: it used to understand without G *)
- napply (or_prop1 …)
- | #p; #q; nnormalize;
- napply (.= (or_prop2 … F …));
- napply or_prop2
- | #p; #q; nnormalize;
- napply (.= (or_prop3 … G …));
- napply or_prop3
- ]
-##| nnormalize; /3/]
-nqed.
-
-(*
-ndefinition OA : category2.
-split;
-[ apply (OAlgebra);
-| intros; apply (ORelation_setoid o o1);
-| intro O; split;
- [1,2,3,4: apply id2;
- |5,6,7:intros; apply refl1;]
-| apply ORelation_composition;
-| intros (P Q R S F G H); split;
- [ change with (H⎻* ∘ G⎻* ∘ F⎻* = H⎻* ∘ (G⎻* ∘ F⎻* ));
- apply (comp_assoc2 ????? (F⎻* ) (G⎻* ) (H⎻* ));
- | apply ((comp_assoc2 ????? (H⎻) (G⎻) (F⎻))^-1);
- | apply ((comp_assoc2 ????? F G H)^-1);
- | apply ((comp_assoc2 ????? H* G* F* ));]
-| intros; split; unfold ORelation_composition; simplify; apply id_neutral_left2;
-| intros; split; unfold ORelation_composition; simplify; apply id_neutral_right2;]
-qed.
-
-definition OAlgebra_of_objs2_OA: objs2 OA → OAlgebra ≝ λx.x.
-coercion OAlgebra_of_objs2_OA.
-
-definition ORelation_setoid_of_arrows2_OA:
- ∀P,Q. arrows2 OA P Q → ORelation_setoid P Q ≝ λP,Q,c.c.
-coercion ORelation_setoid_of_arrows2_OA.
-
-prefer coercion Type_OF_objs2.
-*)
-(* alias symbol "eq" = "setoid1 eq". *)
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "logic/pts.ma".
-
-ndefinition reflexive2 ≝ λT:Type[2].λP:T → T → CProp[2]. ∀x.P x x.
-ndefinition symmetric2 ≝ λT:Type[2].λP:T → T → CProp[2]. ∀x,y.P x y → P y x.
-ndefinition transitive2 ≝ λT:Type[2].λP:T → T → CProp[2]. ∀z,x,y. P x z → P z y → P x y.
-
-nrecord equivalence_relation2 (A:Type[2]) : Type[3] ≝
- { eq_rel2:2> A → A → CProp[2];
- refl2: reflexive2 ? eq_rel2;
- sym2: symmetric2 ? eq_rel2;
- trans2: transitive2 ? eq_rel2
- }.
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "datatypes/pairs-setoids.ma".
-include "datatypes/bool-setoids.ma".
-include "datatypes/list-setoids.ma".
-include "sets/sets.ma".
-
-(*
-ninductive Admit : CProp[0] ≝ .
-naxiom admit : Admit.
-*)
-
-(* XXX move somewere else *)
-ndefinition if': ∀A,B:CPROP. A = B → A → B.
-#A B; *; /2/. nqed.
-
-ncoercion if : ∀A,B:CPROP. ∀p:A = B. A → B ≝ if' on _p : eq_rel1 ? (eq1 CPROP) ?? to ∀_:?.?.
-
-ndefinition ifs': ∀S.∀A,B:Ω^S. A = B → ∀x. x ∈ A → x ∈ B.
-#S A B; *; /2/. nqed.
-
-ncoercion ifs : ∀S.∀A,B:Ω^S. ∀p:A = B.∀x. x ∈ A → x ∈ B ≝ ifs' on _p : eq_rel1 ? (eq1 (powerclass_setoid ?))?? to ∀_:?.?.
-
-(* XXX move to list-setoids-theory.ma *)
-
-ntheorem append_nil: ∀A:setoid.∀l:list A.l @ [] = l.
-#A;#l;nelim l;//; #a;#l1;#IH;nnormalize;/2/;nqed.
-
-ndefinition associative ≝ λA:setoid.λf:A → A → A.∀x,y,z.f x (f y z) = f (f x y) z.
-
-ntheorem associative_append: ∀A:setoid.associative (list A) (append A).
-#A;#x;#y;#z;nelim x[ napply (refl ???) |#a;#x1;#H;nnormalize;/2/]nqed.
-
-(* end move to list *)
-
-
-(* XXX to undestand what I want inside Alpha
- the eqb part should be split away, but when available it should be
- possible to obtain a leibnitz equality on lemmas proved on setoids
-*)
-interpretation "iff" 'iff a b = (iff a b).
-
-ninductive eq (A:Type[0]) (x:A) : A → CProp[0] ≝ erefl: eq A x x.
-
-nlemma eq_rect_Type0_r':
- ∀A.∀a,x.∀p:eq ? x a.∀P: ∀x:A. eq ? x a → Type[0]. P a (erefl A a) → P x p.
- #A; #a; #x; #p; ncases p; #P; #H; nassumption.
-nqed.
-
-nlemma eq_rect_Type0_r:
- ∀A.∀a.∀P: ∀x:A. eq ? x a → Type[0]. P a (erefl A a) → ∀x.∀p:eq ? x a.P x p.
- #A; #a; #P; #p; #x0; #p0; napply (eq_rect_Type0_r' ??? p0); nassumption.
-nqed.
-
-nlemma eq_rect_CProp0_r':
- ∀A.∀a,x.∀p:eq ? x a.∀P: ∀x:A. eq ? x a → CProp[0]. P a (erefl A a) → P x p.
- #A; #a; #x; #p; ncases p; #P; #H; nassumption.
-nqed.
-
-nlemma eq_rect_CProp0_r:
- ∀A.∀a.∀P: ∀x:A. eq ? x a → CProp[0]. P a (erefl A a) → ∀x.∀p:eq ? x a.P x p.
- #A; #a; #P; #p; #x0; #p0; napply (eq_rect_CProp0_r' ??? p0); nassumption.
-nqed.
-
-nrecord Alpha : Type[1] ≝ {
- acarr :> setoid;
- eqb: acarr → acarr → bool;
- eqb_true: ∀x,y. (eqb x y = true) = (x = y)
-}.
-
-interpretation "eqb" 'eq_low a b = (eqb ? a b).
-(* end alpha *)
-
-(* re *)
-ninductive re (S: Type[0]) : Type[0] ≝
- z: re S
- | e: re S
- | s: S → re S
- | c: re S → re S → re S
- | o: re S → re S → re S
- | k: re S → re S.
-
-notation < "a \sup ⋇" non associative with precedence 90 for @{ 'pk $a}.
-notation > "a ^ *" non associative with precedence 75 for @{ 'pk $a}.
-interpretation "star" 'pk a = (k ? a).
-interpretation "or" 'plus a b = (o ? a b).
-
-notation "a · b" non associative with precedence 60 for @{ 'pc $a $b}.
-interpretation "cat" 'pc a b = (c ? a b).
-
-(* to get rid of \middot *)
-ncoercion c : ∀S.∀p:re S. re S → re S ≝ c on _p : re ? to ∀_:?.?.
-
-notation < "a" non associative with precedence 90 for @{ 'ps $a}.
-notation > "` term 90 a" non associative with precedence 90 for @{ 'ps $a}.
-interpretation "atom" 'ps a = (s ? a).
-
-notation "ϵ" non associative with precedence 90 for @{ 'epsilon }.
-interpretation "epsilon" 'epsilon = (e ?).
-
-notation "0" non associative with precedence 90 for @{ 'empty_r }.
-interpretation "empty" 'empty_r = (z ?).
-
-notation > "'lang' S" non associative with precedence 90 for @{ Ω^(list $S) }.
-notation > "'Elang' S" non associative with precedence 90 for @{ 𝛀^(LIST $S) }.
-
-(* setoid support for re *)
-
-nlet rec eq_re (S:Alpha) (a,b : re S) on a : CProp[0] ≝
- match a with
- [ z ⇒ match b with [ z ⇒ True | _ ⇒ False]
- | e ⇒ match b with [ e ⇒ True | _ ⇒ False]
- | s x ⇒ match b with [ s y ⇒ x = y | _ ⇒ False]
- | c r1 r2 ⇒ match b with [ c s1 s2 ⇒ eq_re ? r1 s1 ∧ eq_re ? r2 s2 | _ ⇒ False]
- | o r1 r2 ⇒ match b with [ o s1 s2 ⇒ eq_re ? r1 s1 ∧ eq_re ? r2 s2 | _ ⇒ False]
- | k r1 ⇒ match b with [ k r2 ⇒ eq_re ? r1 r2 | _ ⇒ False]].
-
-interpretation "eq_re" 'eq_low a b = (eq_re ? a b).
-
-ndefinition RE : Alpha → setoid.
-#A; @(re A); @(eq_re A);
-##[ #p; nelim p; /2/;
-##| #p1; nelim p1; ##[##1,2: #p2; ncases p2; /2/;
- ##|##2,3: #x p2; ncases p2; /2/;
- ##|##4,5: #e1 e2 H1 H2 p2; ncases p2; /3/; #e3 e4; *; #; @; /2/;
- ##|#r H p2; ncases p2; /2/;##]
-##| #p1; nelim p1;
- ##[ ##1,2: #y z; ncases y; ncases z; //; nnormalize; #; ncases (?:False); //;
- ##| ##3: #a; #y z; ncases y; ncases z; /2/; nnormalize; #; ncases (?:False); //;
- ##| ##4,5: #r1 r2 H1 H2 y z; ncases y; ncases z; //; nnormalize;
- ##[##1,3,4,5,6,8: #; ncases (?:False); //;##]
- #r1 r2 r3 r4; nnormalize; *; #H1 H2; *; #H3 H4; /3/;
- ##| #r H y z; ncases y; ncases z; //; nnormalize; ##[##1,2,3: #; ncases (?:False); //]
- #r2 r3; /3/; ##]##]
-nqed.
-
-unification hint 0 ≔ A : Alpha;
- S ≟ acarr A,
- T ≟ carr S,
- P1 ≟ refl ? (eq0 (RE A)),
- P2 ≟ sym ? (eq0 (RE A)),
- P3 ≟ trans ? (eq0 (RE A)),
- X ≟ mk_setoid (re T) (mk_equivalence_relation ? (eq_re A) P1 P2 P3)
-(*-----------------------------------------------------------------------*) ⊢
- carr X ≡ re T.
-
-unification hint 0 ≔ A:Alpha, a,b:re (carr (acarr A));
- R ≟ eq0 (RE A),
- L ≟ re (carr (acarr A))
-(* -------------------------------------------- *) ⊢
- eq_re A a b ≡ eq_rel L R a b.
-
-(* XXX This seems to be a pattern for equations in setoid(0) *)
-unification hint 0 ≔ AA;
- A ≟ carr (acarr AA),
- R ≟ setoid1_of_setoid (RE AA)
-(*-----------------------------------------------*) ⊢
- re A ≡ carr1 R.
-
-alias symbol "hint_decl" (instance 1) = "hint_decl_CProp2".
-unification hint 0 ≔ S : Alpha, x,y: re (carr (acarr S));
- SS ≟ RE S,
- TT ≟ setoid1_of_setoid SS,
- T ≟ carr1 TT
-(*-----------------------------------------*) ⊢
- eq_re S x y ≡ eq_rel1 T (eq1 TT) x y.
-
-(* contructors are morphisms *)
-nlemma c_is_morph : ∀A:Alpha.(re A) ⇒_0 (re A) ⇒_0 (re A).
-#A; napply (mk_binary_morphism … (λs1,s2:re A. s1 · s2)); #a; nelim a; /2/ by conj; nqed.
-
-(* XXX This is the good format for hints about morphisms, fix the others *)
-alias symbol "hint_decl" (instance 1) = "hint_decl_Type0".
-unification hint 0 ≔ S:Alpha, A,B:re (carr (acarr S));
- SS ≟ carr (acarr S),
- MM ≟ mk_unary_morphism ?? (λA.
- mk_unary_morphism ??
- (λB.A · B) (prop1 ?? (fun1 ?? (c_is_morph S) A)))
- (prop1 ?? (c_is_morph S)),
- T ≟ RE S
-(*--------------------------------------------------------------------------*) ⊢
- fun1 T T (fun1 T (unary_morph_setoid T T) MM A) B ≡ c SS A B.
-
-nlemma o_is_morph : ∀A:Alpha.(re A) ⇒_0 (re A) ⇒_0 (re A).
-#A; napply (mk_binary_morphism … (λs1,s2:re A. s1 + s2)); #a; nelim a; /2/ by conj; nqed.
-
-unification hint 0 ≔ S:Alpha, A,B:re (carr (acarr S));
- SS ≟ carr (acarr S),
- MM ≟ mk_unary_morphism ?? (λA.
- mk_unary_morphism ??
- (λB.A + B) (prop1 ?? (fun1 ?? (o_is_morph S) A)))
- (prop1 ?? (o_is_morph S)),
- T ≟ RE S
-(*--------------------------------------------------------------------------*) ⊢
- fun1 T T (fun1 T (unary_morph_setoid T T) MM A) B ≡ o SS A B.
-
-nlemma k_is_morph : ∀A:Alpha.(re A) ⇒_0 (re A).
-#A; @(λs1:re A. s1^* ); #a; nelim a; /2/ by conj; nqed.
-
-unification hint 0 ≔ S:Alpha, A:re (carr (acarr S));
- SS ≟ carr (acarr S),
- MM ≟ mk_unary_morphism ?? (λB.B^* ) (prop1 ?? (k_is_morph S)),
- T ≟ RE S
-(*--------------------------------------------------------------------------*) ⊢
- fun1 T T MM A ≡ k SS A.
-
-nlemma s_is_morph : ∀A:Alpha.A ⇒_0 (re A).
-#A; @(λs1:A. s ? s1 ); #x y E; //; nqed.
-
-unification hint 0 ≔ S:Alpha, a: carr (acarr S);
- SS ≟ carr (acarr S),
- MM ≟ mk_unary_morphism ?? (λb.s ? b ) (prop1 ?? (s_is_morph S)),
- T ≟ RE S, T1 ≟ acarr S
-(*--------------------------------------------------------------------------*) ⊢
- fun1 T1 T MM a ≡ s SS a.
-
-(* end setoids support for re *)
-
-nlet rec conjunct S (l : list (list S)) (L : lang S) on l: CProp[0] ≝
-match l with [ nil ⇒ True | cons w tl ⇒ w ∈ L ∧ conjunct ? tl L ].
-
-interpretation "subset construction with type" 'comprehension t \eta.x =
- (mk_powerclass t x).
-
-ndefinition cat : ∀A:setoid.∀l1,l2:lang A.lang A ≝
- λS.λl1,l2.{ w ∈ list S | ∃w1,w2.w =_0 w1 @ w2 ∧ w1 ∈ l1 ∧ w2 ∈ l2}.
-interpretation "cat lang" 'pc a b = (cat ? a b).
-
-(* hints for cat *)
-nlemma cat_is_morph : ∀A:setoid. (lang A) ⇒_1 (lang A) ⇒_1 (lang A).
-#X; napply (mk_binary_morphism1 … (λA,B:lang X.A · B));
-#A1 A2 B1 B2 EA EB; napply ext_set; #x;
-ncut (∀y,x:list X.(x ∈ B1) =_1 (x ∈ B2)); ##[
- #_; #y; ncases EA; ncases EB; #h1 h2 h3 h4; @; ##[ napply h1 | napply h2] ##] #YY;
-ncut (∀x,y:list X.(x ∈ A1) =_1 (x ∈ A2)); ##[
- #y; #y; ncases EA; ncases EB; #h1 h2 h3 h4; @; ##[ napply h3 | napply h4] ##] #XX;
-napply (.=_1 (∑w1, w2. XX w1 w2/ E ; (# ╪_1 E) ╪_1 #));
-napply (.=_1 (∑w1, w2. YY w1 w2/ E ; # ╪_1 E)); //;
-nqed.
-
-nlemma cat_is_ext: ∀A:setoid. (Elang A) → (Elang A) → (Elang A).
- #S A B; @ (ext_carr … A · ext_carr … B); (* XXX coercion ext_carr che non funge *)
-#x y Exy;
-ncut (∀w1,w2.(x == w1@w2) = (y == w1@w2)); ##[
- #w1 w2; @; #H; ##[ napply (.= Exy^-1) | napply (.= Exy)] // ]
-#E; @; #H;
-##[ napply (. (∑w1,w2. (E w1 w2)^-1 / E ; (E ╪_1 #) ╪_1 #)); napply H;
-##| napply (. (∑w1,w2. E w1 w2 / E ; (E ╪_1 #) ╪_1 #)); napply H ]
-nqed.
-
-alias symbol "hint_decl" = "hint_decl_Type1".
-unification hint 0 ≔ A : setoid, B,C : Elang A;
- AA ≟ LIST A,
- BB ≟ ext_carr AA B,
- CC ≟ ext_carr AA C,
- R ≟ mk_ext_powerclass AA
- (cat A (ext_carr AA B) (ext_carr AA C))
- (ext_prop AA (cat_is_ext A B C))
-(*----------------------------------------------------------*) ⊢
- ext_carr AA R ≡ cat A BB CC.
-
-unification hint 0 ≔ S:setoid, A,B:lang (carr S);
- T ≟ powerclass_setoid (list (carr S)),
- MM ≟ mk_unary_morphism1 T (unary_morphism1_setoid1 T T)
- (λA:lang (carr S).
- mk_unary_morphism1 T T
- (λB:lang (carr S).cat S A B)
- (prop11 T T (fun11 ?? (cat_is_morph S) A)))
- (prop11 T (unary_morphism1_setoid1 T T) (cat_is_morph S))
-(*--------------------------------------------------------------------------*) ⊢
- fun11 T T (fun11 T (unary_morphism1_setoid1 T T) MM A) B ≡ cat S A B.
-
-nlemma cat_is_ext_morph:∀A:setoid.(Elang A) ⇒_1 (Elang A) ⇒_1 (Elang A).
-#A; napply (mk_binary_morphism1 … (cat_is_ext …));
-#x1 x2 y1 y2 Ex Ey; napply (prop11 … (cat_is_morph A)); nassumption.
-nqed.
-
-unification hint 1 ≔ AA : setoid, B,C : Elang AA;
- AAS ≟ LIST AA,
- T ≟ ext_powerclass_setoid AAS,
- R ≟ mk_unary_morphism1 T (unary_morphism1_setoid1 T T) (λX:Elang AA.
- mk_unary_morphism1 T T (λY:Elang AA.
- mk_ext_powerclass AAS
- (cat AA (ext_carr ? X) (ext_carr ? Y))
- (ext_prop AAS (cat_is_ext AA X Y)))
- (prop11 T T (fun11 ?? (cat_is_ext_morph AA) X)))
- (prop11 T (unary_morphism1_setoid1 T T) (cat_is_ext_morph AA)),
- BB ≟ ext_carr ? B,
- CC ≟ ext_carr ? C
-(*------------------------------------------------------*) ⊢
- ext_carr AAS (fun11 T T (fun11 T (unary_morphism1_setoid1 T T) R B) C) ≡ cat AA BB CC.
-
-(* end hints for cat *)
-
-ndefinition star : ∀A:setoid.∀l:lang A.lang A ≝
- λS.λl.{ w ∈ list S | ∃lw.flatten ? lw = w ∧ conjunct ? lw l}.
-interpretation "star lang" 'pk l = (star ? l).
-
-(* hints for star *)
-nlemma star_is_morph : ∀A:setoid. (lang A) ⇒_1 (lang A).
-#X; @(λA:lang X.A^* ); #a1 a2 E; @; #x; *; #wl; *; #defx Px; @wl; @; //;
-nelim wl in Px; //; #s tl IH; *; #a1s a1tl; /4/; nqed.
-
-nlemma star_is_ext: ∀A:setoid. (Elang A) → (Elang A).
- #S A; @ ((ext_carr … A) ^* ); #w1 w2 E; @; *; #wl; *; #defw1 Pwl;
- @wl; @; //; napply (.=_0 defw1); /2/; nqed.
-
-alias symbol "hint_decl" = "hint_decl_Type1".
-unification hint 0 ≔ A : setoid, B : Elang A;
- AA ≟ LIST A,
- BB ≟ ext_carr AA B,
- R ≟ mk_ext_powerclass ?
- ((ext_carr ? B)^* ) (ext_prop ? (star_is_ext ? B))
-(*--------------------------------------------------------------------*) ⊢
- ext_carr AA R ≡ star A BB.
-
-unification hint 0 ≔ S:setoid, A:lang (carr S);
- T ≟ powerclass_setoid (list (carr S)),
- MM ≟ mk_unary_morphism1 T T
- (λB:lang (carr S).star S B) (prop11 T T (star_is_morph S))
-(*--------------------------------------------------------------------------*) ⊢
- fun11 T T MM A ≡ star S A.
-
-nlemma star_is_ext_morph:∀A:setoid.(Elang A) ⇒_1 (Elang A).
-#A; @(star_is_ext …);
-#x1 x2 Ex; napply (prop11 … (star_is_morph A)); nassumption.
-nqed.
-
-unification hint 1 ≔ AA : setoid, B : Elang AA;
- AAS ≟ LIST AA,
- T ≟ ext_powerclass_setoid AAS,
- R ≟ mk_unary_morphism1 T T
- (λS:Elang AA.
- mk_ext_powerclass AAS (star AA (ext_carr ? S))
- (ext_prop AAS (star_is_ext AA S)))
- (prop11 T T (star_is_ext_morph AA)),
- BB ≟ ext_carr ? B
-(*------------------------------------------------------*) ⊢
- ext_carr AAS (fun11 T T R B) ≡ star AA BB.
-
-(* end hints for star *)
-
-notation > "𝐋 term 70 E" non associative with precedence 75 for @{L_re ? $E}.
-nlet rec L_re (S : Alpha) (r : re S) on r : lang S ≝
-match r with
-[ z ⇒ ∅
-| e ⇒ { [ ] }
-| s x ⇒ { [x] }
-| c r1 r2 ⇒ 𝐋 r1 · 𝐋 r2
-| o r1 r2 ⇒ 𝐋 r1 ∪ 𝐋 r2
-| k r1 ⇒ (𝐋 r1) ^*].
-notation "𝐋 term 70 E" non associative with precedence 75 for @{'L_re $E}.
-interpretation "in_l" 'L_re E = (L_re ? E).
-
-(* support for 𝐋 as an extensional set *)
-ndefinition L_re_is_ext : ∀S:Alpha.∀r:re S.Elang S.
-#S r; @(𝐋 r); #w1 w2 E; nelim r;
-##[ ##1,2: /2/; @; #defw1; napply (.=_0 (defw1 : [ ] = ?)); //; napply (?^-1); //;
-##| #x; @; #defw1; napply (.=_0 (defw1 : [x] = ?)); //; napply (?^-1); //;
-##| #e1 e2 H1 H2; (* not shure I shoud Inline *)
- @; *; #s1; *; #s2; *; *; #defw1 s1L1 s2L2;
- ##[ nlapply (trans … E^-1 defw1); #defw2;
- ##| nlapply (trans … E defw1); #defw2; ##] @s1; @s2; /3/;
-##| #e1 e2 H1 H2; napply (H1‡H2); (* good! *)
-##| #e H; @; *; #l; *; #defw1 Pl; @l; @; //; napply (.=_1 defw1); /2/; ##]
-nqed.
-
-unification hint 0 ≔ S : Alpha,e : re (carr (acarr S));
- SS ≟ LIST (acarr S),
- X ≟ mk_ext_powerclass SS (𝐋 e) (ext_prop SS (L_re_is_ext S e))
-(*-----------------------------------------------------------------*)⊢
- ext_carr SS X ≡ L_re S e.
-
-nlemma L_re_is_morph:∀A:Alpha.(setoid1_of_setoid (re A)) ⇒_1 Ω^(list A).
-#A; @; ##[ napply (λr:re A.𝐋 r); ##] #r1; nelim r1;
-##[##1,2: #r2; ncases r2; //; ##[##1,6: *|##2,7,5,12,10: #a; *|##3,4,8,9: #a1 a2; *]
-##|#x r2; ncases r2; ##[##1,2: *|##4,5: #a1 a2; *|##6: #a; *] #y E; @; #z defz;
- ncases z in defz; ##[##1,3: *] #zh ztl; ncases ztl; ##[##2,4: #d dl; *; #_; *]
- *; #defx; #_; @; //; napply (?^-1); napply (.= defx^-1); //; napply (?^-1); //;
-##|#e1 e2 IH1 IH2 r2; ncases r2; ##[##1,2: *|##5: #a1 a2; *|##3,6: #a1; *]
- #f1 f2; *; #E1 E2; nlapply (IH2 … E2); nlapply (IH1 … E1); #H1 H2;
- nchange in match (𝐋 (e1 · e2)) with (?·?);
- napply (.=_1 (H1 ╪_1 H2)); //;
-##|#e1 e2 IH1 IH2 r2; ncases r2; ##[##1,2: *|##4: #a1 a2; *|##3,6: #a1; *]
- #f1 f2; *; #E1 E2; nlapply (IH2 … E2); nlapply (IH1 … E1); #H1 H2;
- napply (.=_1 H1╪_1H2); //;
-##|#r IH r2; ncases r2; ##[##1,2: *|##4,5: #a1 a2; *|##3: #a1; *]
- #e; #defe; nlapply (IH e defe); #H;
- @; #x; *; #wl; *; #defx Px; @wl; @; //; nelim wl in Px; //; #l ls IH; *; #lr Pr;
- ##[ nlapply (ifs' … H … lr) | nlapply (ifs' … H^-1 … lr) ] #le;
- @; ##[##1,3: nassumption] /2/; ##]
-nqed.
-
-unification hint 0 ≔ A:Alpha, a:re (carr (acarr A));
- T ≟ setoid1_of_setoid (RE A),
- T2 ≟ powerclass_setoid (list (carr (acarr A))),
- MM ≟ mk_unary_morphism1 ??
- (λa:carr1 (setoid1_of_setoid (RE A)).𝐋 a) (prop11 ?? (L_re_is_morph A))
-(*--------------------------------------------------------------------------*) ⊢
- fun11 T T2 MM a ≡ L_re A a.
-
-nlemma L_re_is_ext_morph:∀A:Alpha.(setoid1_of_setoid (re A)) ⇒_1 𝛀^(list A).
-#A; @; ##[ #a; napply (L_re_is_ext ? a); ##] #a b E;
-ncut (𝐋 b = 𝐋 a); ##[ napply (.=_1 (┼_1 E^-1)); // ] #EL;
-@; #x H; nchange in H ⊢ % with (x ∈ 𝐋 ?);
-##[ napply (. (# ╪_1 ?)); ##[##3: napply H |##2: ##skip ] napply EL;
-##| napply (. (# ╪_1 ?)); ##[##3: napply H |##2: ##skip ] napply (EL^-1)]
-nqed.
-
-unification hint 1 ≔ AA : Alpha, a: re (carr (acarr AA));
- T ≟ RE AA, T1 ≟ LIST (acarr AA), T2 ≟ setoid1_of_setoid T,
- TT ≟ ext_powerclass_setoid T1,
- R ≟ mk_unary_morphism1 T2 TT
- (λa:carr1 (setoid1_of_setoid T).
- mk_ext_powerclass T1 (𝐋 a) (ext_prop T1 (L_re_is_ext AA a)))
- (prop11 T2 TT (L_re_is_ext_morph AA))
-(*------------------------------------------------------*) ⊢
- ext_carr T1 (fun11 (setoid1_of_setoid T) TT R a) ≡ L_re AA a.
-
-(* end support for 𝐋 as an extensional set *)
-
-ninductive pitem (S: Type[0]) : Type[0] ≝
- pz: pitem S
- | pe: pitem S
- | ps: S → pitem S
- | pp: S → pitem S
- | pc: pitem S → pitem S → pitem S
- | po: pitem S → pitem S → pitem S
- | pk: pitem S → pitem S.
-
-interpretation "pstar" 'pk a = (pk ? a).
-interpretation "por" 'plus a b = (po ? a b).
-interpretation "pcat" 'pc a b = (pc ? a b).
-notation < ".a" non associative with precedence 90 for @{ 'pp $a}.
-notation > "`. term 90 a" non associative with precedence 90 for @{ 'pp $a}.
-interpretation "ppatom" 'pp a = (pp ? a).
-(* to get rid of \middot *)
-ncoercion pc : ∀S.∀p:pitem S. pitem S → pitem S ≝ pc on _p : pitem ? to ∀_:?.?.
-interpretation "patom" 'ps a = (ps ? a).
-interpretation "pepsilon" 'epsilon = (pe ?).
-interpretation "pempty" 'empty_r = (pz ?).
-
-(* setoids for pitem *)
-nlet rec eq_pitem (S : Alpha) (p1, p2 : pitem S) on p1 : CProp[0] ≝
- match p1 with
- [ pz ⇒ match p2 with [ pz ⇒ True | _ ⇒ False]
- | pe ⇒ match p2 with [ pe ⇒ True | _ ⇒ False]
- | ps x ⇒ match p2 with [ ps y ⇒ x = y | _ ⇒ False]
- | pp x ⇒ match p2 with [ pp y ⇒ x = y | _ ⇒ False]
- | pc a1 a2 ⇒ match p2 with [ pc b1 b2 ⇒ eq_pitem ? a1 b1 ∧ eq_pitem ? a2 b2| _ ⇒ False]
- | po a1 a2 ⇒ match p2 with [ po b1 b2 ⇒ eq_pitem ? a1 b1 ∧ eq_pitem ? a2 b2| _ ⇒ False]
- | pk a ⇒ match p2 with [ pk b ⇒ eq_pitem ? a b | _ ⇒ False]].
-
-interpretation "eq_pitem" 'eq_low a b = (eq_pitem ? a b).
-
-nlemma PITEM : ∀S:Alpha.setoid.
-#S; @(pitem S); @(eq_pitem …);
-##[ #p; nelim p; //; nnormalize; #; @; //;
-##| #p; nelim p; ##[##1,2: #y; ncases y; //; ##|##3,4: #x y; ncases y; //; #; napply (?^-1); nassumption;
- ##|##5,6: #r1 r2 H1 H2 p2; ncases p2; //; #s1 s2; nnormalize; *; #; @; /2/;
- ##| #r H y; ncases y; //; nnormalize; /2/;##]
-##| #x; nelim x;
- ##[ ##1,2: #y z; ncases y; ncases z; //; nnormalize; #; ncases (?:False); //;
- ##| ##3,4: #a; #y z; ncases y; ncases z; /2/; nnormalize; #; ncases (?:False); //;
- ##| ##5,6: #r1 r2 H1 H2 y z; ncases y; ncases z; //; nnormalize;
- ##[##1,2,5,6,7,8,4,10: #; ncases (?:False); //;##]
- #r1 r2 r3 r4; nnormalize; *; #H1 H2; *; #H3 H4; /3/;
- ##| #r H y z; ncases y; ncases z; //; nnormalize; ##[##1,2,3,4: #; ncases (?:False); //]
- #r2 r3; /3/; ##]##]
-nqed.
-
-alias symbol "hint_decl" (instance 1) = "hint_decl_Type1".
-unification hint 0 ≔ SS:Alpha;
- S ≟ acarr SS,
- A ≟ carr S,
- P1 ≟ refl ? (eq0 (PITEM SS)),
- P2 ≟ sym ? (eq0 (PITEM SS)),
- P3 ≟ trans ? (eq0 (PITEM SS)),
- R ≟ mk_setoid (pitem (carr S))
- (mk_equivalence_relation (pitem A) (eq_pitem SS) P1 P2 P3)
-(*-----------------------------------------------------------------*)⊢
- carr R ≡ pitem A.
-
-unification hint 0 ≔ S:Alpha,a,b:pitem (carr (acarr S));
- R ≟ PITEM S, L ≟ pitem (carr (acarr S))
-(* -------------------------------------------- *) ⊢
- eq_pitem S a b ≡ eq_rel L (eq0 R) a b.
-
-(* end setoids for pitem *)
-
-ndefinition pre ≝ λS.pitem S × bool.
-
-notation "\fst term 90 x" non associative with precedence 90 for @{'fst $x}.
-interpretation "fst" 'fst x = (fst ? ? x).
-notation > "\snd term 90 x" non associative with precedence 90 for @{'snd $x}.
-interpretation "snd" 'snd x = (snd ? ? x).
-
-notation > "|term 19 e|" non associative with precedence 70 for @{forget ? $e}.
-nlet rec forget (S: Alpha) (l : pitem S) on l: re S ≝
- match l with
- [ pz ⇒ 0
- | pe ⇒ ϵ
- | ps x ⇒ `x
- | pp x ⇒ `x
- | pc E1 E2 ⇒ (|E1| · |E2|)
- | po E1 E2 ⇒ (|E1| + |E2|)
- | pk E ⇒ |E|^* ].
-
-notation < "|term 19 e|" non associative with precedence 70 for @{'forget $e}.
-interpretation "forget" 'forget a = (forget ? a).
-
-notation > "𝐋\p\ term 70 E" non associative with precedence 75 for @{L_pi ? $E}.
-nlet rec L_pi (S : Alpha) (r : pitem S) on r : lang S ≝
-match r with
-[ pz ⇒ ∅
-| pe ⇒ ∅
-| ps _ ⇒ ∅
-| pp x ⇒ { [x] }
-| pc r1 r2 ⇒ 𝐋\p\ r1 · 𝐋 |r2| ∪ 𝐋\p\ r2
-| po r1 r2 ⇒ 𝐋\p\ r1 ∪ 𝐋\p\ r2
-| pk r1 ⇒ 𝐋\p\ r1 · 𝐋 (|r1|^* ) ].
-notation > "𝐋\p term 70 E" non associative with precedence 75 for @{'L_pi $E}.
-notation "𝐋\sub(\p) term 70 E" non associative with precedence 75 for @{'L_pi $E}.
-interpretation "in_pl" 'L_pi E = (L_pi ? E).
-
-(* set support for 𝐋\p *)
-ndefinition L_pi_ext : ∀S:Alpha.∀r:pitem S.Elang S.
-#S r; @(𝐋\p r); #w1 w2 E; nelim r;
-##[ ##1,2: /2/;
-##| #x; @; *;
-##| #x; @; #H; nchange in H with ([?] =_0 ?); ##[ napply ((.=_0 H) E); ##]
- napply ((.=_0 H) E^-1);
-##| #e1 e2 H1 H2;
- napply (.= (#‡H2));
- ncut (∀x1,x2. (w1 = (x1@x2)) = (w2 = (x1@x2)));##[
- #x1 x2; @; #X; ##[ napply ((.= E^-1) X) | napply ((.= E) X) ] ##] #X;
- napply ((∑w1,w2. X w1 w2 / H ; (H╪_1#)╪_1#) ╪_1 #);
-##| #e1 e2 H1 H2; napply (H1‡H2);
-##| #e H;
- ncut (∀x1,x2.(w1 = (x1@x2)) = (w2 = (x1@x2)));##[
- #x1 x2; @; #X; ##[ napply ((.= E^-1) X) | napply ((.= E) X) ] ##] #X;
- napply (∑w1,w2. X w1 w2 / H ; (H╪_1#)╪_1#);
-##]
-nqed.
-
-unification hint 0 ≔ S : Alpha,e : pitem (carr (acarr S));
- SS ≟ LIST (acarr S),
- X ≟ mk_ext_powerclass SS (𝐋\p e) (ext_prop SS (L_pi_ext S e))
-(*-----------------------------------------------------------------*)⊢
- ext_carr SS X ≡ 𝐋\p e.
-
-(* end set support for 𝐋\p *)
-
-ndefinition epsilon ≝
- λS:Alpha.λb.match b return λ_.lang S with [ true ⇒ { [ ] } | _ ⇒ ∅ ].
-
-interpretation "epsilon" 'epsilon = (epsilon ?).
-notation < "ϵ b" non associative with precedence 90 for @{'app_epsilon $b}.
-interpretation "epsilon lang" 'app_epsilon b = (epsilon ? b).
-
-(* hints for epsilon *)
-nlemma epsilon_is_morph : ∀A:Alpha. (setoid1_of_setoid bool) ⇒_1 (lang A).
-#X; @; ##[#b; napply(ϵ b)] #a1 a2; ncases a1; ncases a2; //; *; nqed.
-
-nlemma epsilon_is_ext: ∀A:Alpha. (setoid1_of_setoid bool) → (Elang A).
- #S b; @(ϵ b); #w1 w2 E; ncases b; @; ##[##3,4:*]
-nchange in match (w1 ∈ ϵ true) with ([] =_0 w1);
-nchange in match (w2 ∈ ϵ true) with ([] =_0 w2); #H; napply (.= H); /2/;
-nqed.
-
-alias symbol "hint_decl" = "hint_decl_Type1".
-unification hint 0 ≔ A : Alpha, B : bool;
- AA ≟ LIST (acarr A),
- R ≟ mk_ext_powerclass ?
- (ϵ B) (ext_prop ? (epsilon_is_ext ? B))
-(*--------------------------------------------------------------------*) ⊢
- ext_carr AA R ≡ epsilon A B.
-
-unification hint 0 ≔ S:Alpha, A:bool;
- B ≟ setoid1_of_setoid BOOL,
- T ≟ powerclass_setoid (list (carr (acarr S))),
- MM ≟ mk_unary_morphism1 B T
- (λB.ϵ B) (prop11 B T (epsilon_is_morph S))
-(*--------------------------------------------------------------------------*) ⊢
- fun11 B T MM A ≡ epsilon S A.
-
-nlemma epsilon_is_ext_morph:∀A:Alpha. (setoid1_of_setoid bool) ⇒_1 (Elang A).
-#A; @(epsilon_is_ext …);
-#x1 x2 Ex; napply (prop11 … (epsilon_is_morph A)); nassumption.
-nqed.
-
-unification hint 1 ≔ AA : Alpha, B : bool;
- AAS ≟ LIST (acarr AA),
- BB ≟ setoid1_of_setoid BOOL,
- T ≟ ext_powerclass_setoid AAS,
- R ≟ mk_unary_morphism1 BB T
- (λS.
- mk_ext_powerclass AAS (epsilon AA S)
- (ext_prop AAS (epsilon_is_ext AA S)))
- (prop11 BB T (epsilon_is_ext_morph AA))
-(*------------------------------------------------------*) ⊢
- ext_carr AAS (fun11 BB T R B) ≡ epsilon AA B.
-
-(* end hints for epsilon *)
-
-ndefinition L_pr ≝ λS : Alpha.λp:pre S. 𝐋\p\ (\fst p) ∪ ϵ (\snd p).
-
-interpretation "L_pr" 'L_pi E = (L_pr ? E).
-
-nlemma append_eq_nil : ∀S:setoid.∀w1,w2:list S. [ ] = w1 @ w2 → w1 = [ ].
-#S w1; ncases w1; //. nqed.
-
-(* lemma 12 *) (* XXX: a case where Leibnitz equality could be exploited for H *)
-nlemma epsilon_in_true : ∀S:Alpha.∀e:pre S. [ ] ∈ 𝐋\p e = (\snd e = true).
-#S r; ncases r; #e b; @; ##[##2: #H; ncases b in H; ##[##2:*] #; @2; /2/; ##]
-ncases b; //; *; ##[##2:*] nelim e;
-##[ ##1,2: *; ##| #c; *; ##| #c; *| ##7: #p H;
-##| #r1 r2 H G; *; ##[##2: nassumption; ##]
-##| #r1 r2 H1 H2; *; /2/ by {}]
-*; #w1; *; #w2; *; *;
-##[ #defw1 H1 foo; napply H;
- napply (. (append_eq_nil ? ?? defw1)^-1╪_1#);
- nassumption;
-##| #defw1 H1 foo; napply H;
- napply (. (append_eq_nil ? ?? defw1)^-1╪_1#);
- nassumption;
-##]
-nqed.
-
-nlemma not_epsilon_lp : ∀S:Alpha.∀e:pitem S. ¬ ([ ] ∈ (𝐋\p e)).
-#S e; nelim e; ##[##1,2,3,4: nnormalize;/2/]
-##[ #p1 p2 np1 np2; *; ##[##2: napply np2] *; #w1; *; #w2; *; *; #abs;
- nlapply (append_eq_nil ??? abs); # defw1; #; napply np1;
- napply (. defw1^-1╪_1#);
- nassumption;
-##| #p1 p2 np1 np2; *; nchange with (¬?); //;
-##| #r n; *; #w1; *; #w2; *; *; #abs; #; napply n;
- nlapply (append_eq_nil ??? abs); # defw1; #;
- napply (. defw1^-1╪_1#);
- nassumption;##]
-nqed.
-
-ndefinition lo ≝ λS:Alpha.λa,b:pre S.〈\fst a + \fst b,\snd a || \snd b〉.
-notation "a ⊕ b" left associative with precedence 60 for @{'oplus $a $b}.
-interpretation "oplus" 'oplus a b = (lo ? a b).
-
-ndefinition lc ≝ λS:Alpha.λbcast:∀S:Alpha.∀E:pitem S.pre S.λa,b:pre S.
- match a with [ mk_pair e1 b1 ⇒
- match b1 with
- [ false ⇒ 〈e1 · \fst b, \snd b〉
- | true ⇒ 〈e1 · \fst (bcast ? (\fst b)),\snd b || \snd (bcast ? (\fst b))〉]].
-
-notation < "a ⊙ b" left associative with precedence 60 for @{'lc $op $a $b}.
-interpretation "lc" 'lc op a b = (lc ? op a b).
-notation > "a ⊙ b" left associative with precedence 60 for @{'lc eclose $a $b}.
-
-ndefinition lk ≝ λS:Alpha.λbcast:∀S:Alpha.∀E:pitem S.pre S.λa:pre S.
- match a with [ mk_pair e1 b1 ⇒
- match b1 with
- [ false ⇒ 〈e1^*, false〉
- | true ⇒ 〈(\fst (bcast ? e1))^*, true〉]].
-
-notation < "a \sup ⊛" non associative with precedence 90 for @{'lk $op $a}.
-interpretation "lk" 'lk op a = (lk ? op a).
-notation > "a ^ ⊛" non associative with precedence 75 for @{'lk eclose $a}.
-
-notation > "•" non associative with precedence 60 for @{eclose ?}.
-nlet rec eclose (S: Alpha) (E: pitem S) on E : pre S ≝
- match E with
- [ pz ⇒ 〈 0, false 〉
- | pe ⇒ 〈 ϵ, true 〉
- | ps x ⇒ 〈 `.x, false 〉
- | pp x ⇒ 〈 `.x, false 〉
- | po E1 E2 ⇒ •E1 ⊕ •E2
- | pc E1 E2 ⇒ •E1 ⊙ 〈 E2, false 〉
- | pk E ⇒ 〈(\fst (•E))^*,true〉].
-notation < "• x" non associative with precedence 60 for @{'eclose $x}.
-interpretation "eclose" 'eclose x = (eclose ? x).
-notation > "• x" non associative with precedence 60 for @{'eclose $x}.
-
-ndefinition reclose ≝ λS:Alpha.λp:pre S.let p' ≝ •\fst p in 〈\fst p',\snd p || \snd p'〉.
-interpretation "reclose" 'eclose x = (reclose ? x).
-
-nlemma epsilon_or : ∀S:Alpha.∀b1,b2. ϵ(b1 || b2) = ϵ b1 ∪ ϵ b2. ##[##2: napply S]
-#S b1 b2; ncases b1; ncases b2;
-nchange in match (true || true) with true;
-nchange in match (true || false) with true;
-nchange in match (ϵ true) with {[]};
-nchange in match (ϵ false) with ∅;
-##[##1,4: napply ((cupID…)^-1);
-##| napply ((cup0 ? {[]})^-1);
-##| napply (.= (cup0 ? {[]})^-1); napply cupC; ##]
-nqed.
-
-(* theorem 16: 2 *)
-nlemma oplus_cup : ∀S:Alpha.∀e1,e2:pre S.𝐋\p (e1 ⊕ e2) = 𝐋\p e1 ∪ 𝐋\p e2.
-#S r1; ncases r1; #e1 b1 r2; ncases r2; #e2 b2;
-napply (.=_1 #╪_1 (epsilon_or ???));
-napply (.=_1 (cupA…)^-1);
-napply (.=_1 (cupA…)╪_1#);
-napply (.=_1 (#╪_1(cupC…))╪_1#);
-napply (.=_1 (cupA…)^-1╪_1#);
-napply (.=_1 (cupA…));
-//;
-nqed.
-
-
-(* XXX problem: auto does not find # (refl) when it has a concrete == *)
-nlemma odotEt : ∀S:Alpha.∀e1,e2:pitem S.∀b2:bool.
- 〈e1,true〉 ⊙ 〈e2,b2〉 = 〈e1 · \fst (•e2),b2 || \snd (•e2)〉.
-#S e1 e2 b2; ncases b2; @; /3/ by refl, conj, I; nqed.
-
-(*
-nlemma LcatE : ∀S:Alpha.∀e1,e2:pitem S.
- 𝐋\p (e1 · e2) = 𝐋\p e1 · 𝐋 |e2| ∪ 𝐋\p e2. //; nqed.
-*)
-
-nlemma cup_dotD : ∀S:Alpha.∀p,q,r:lang S.(p ∪ q) · r = (p · r) ∪ (q · r).
-#S p q r; napply ext_set; #w; nnormalize; @;
-##[ *; #x; *; #y; *; *; #defw; *; /7/ by or_introl, or_intror, ex_intro, conj;
-##| *; *; #x; *; #y; *; *; /7/ by or_introl, or_intror, ex_intro, conj; ##]
-nqed.
-
-
-nlemma erase_dot : ∀S:Alpha.∀e1,e2:pitem S.𝐋 |e1 · e2| = 𝐋 |e1| · 𝐋 |e2|.
-#S e1 e2; napply ext_set; nnormalize; #w; @; *; #w1; *; #w2; *; *; /7/ by ex_intro, conj;
-nqed.
-
-nlemma erase_plus : ∀S:Alpha.∀e1,e2:pitem S.𝐋 |e1 + e2| = 𝐋 |e1| ∪ 𝐋 |e2|.
-#S e1 e2; napply ext_set; nnormalize; #w; @; *; /4/ by or_introl, or_intror; nqed.
-
-nlemma erase_star : ∀S:Alpha.∀e1:pitem S.𝐋 |e1|^* = 𝐋 |e1^*|. //; nqed.
-
-nlemma mem_single : ∀S:setoid.∀a,b:S. a ∈ {(b)} → a = b.
-#S a b; nnormalize; /2/; nqed.
-
-nlemma cup_sub: ∀S.∀A,B:𝛀^S.∀x. ¬ (x ∈ A) → A ∪ (B - {(x)}) = (A ∪ B) - {(x)}.
-#S A B x H; napply ext_set; #w; @;
-##[ *; ##[ #wa; @; ##[@;//] #H2; napply H; napply (. (mem_single ??? H2)^-1╪_1#); //]
- *; #wb nwn; @; ##[@2;//] //;
-##| *; *; ##[ #wa nwn; @; //] #wb nwn; @2; @; //;##]
-nqed.
-
-nlemma sub0 : ∀S.∀a:Ω^S. a - ∅ = a.
-#S a; napply ext_set; #w; nnormalize; @; /3/; *; //; nqed.
-
-nlemma subK : ∀S.∀a:Ω^S. a - a = ∅.
-#S a; napply ext_set; #w; nnormalize; @; *; /2/; nqed.
-
-nlemma subW : ∀S.∀a,b:Ω^S.∀w.w ∈ (a - b) → w ∈ a.
-#S a b w; nnormalize; *; //; nqed.
-
-alias symbol "eclose" (instance 3) = "eclose".
-nlemma erase_bull : ∀S:Alpha.∀a:pitem S. |\fst (•a)| = |a|.
-#S a; nelim a; // by {};
-##[ #e1 e2 IH1 IH2;
- napply (?^-1);
- napply (.=_0 (IH1^-1)╪_0 (IH2^-1));
- nchange in match (•(e1 · ?)) with (?⊙?);
- ncases (•e1); #e3 b; ncases b; ##[ nnormalize; ncases (•e2); /3/ by refl, conj]
- napply (.=_0 #╪_0 (IH2)); //;
-##| #e1 e2 IH1 IH2; napply (?^-1);
- napply (.=_0 (IH1^-1)╪_0(IH2^-1));
- nchange in match (•(e1+?)) with (?⊕?);
- ncases (•e1); ncases (•e2); //]
-nqed.
-
-(*
-nlemma eta_lp : ∀S:Alpha.∀p:pre S. 𝐋\p p = 𝐋\p 〈\fst p, \snd p〉.
-#S p; ncases p; //; nqed.
-*)
-
-(* XXX coercion ext_carr non applica *)
-nlemma epsilon_dot: ∀S:Alpha.∀p:Elang S. {[]} · (ext_carr ? p) = p.
-#S e; napply ext_set; #w; @; ##[##2: #Hw; @[]; @w; @; //; @; //; napply #; (* XXX auto *) ##]
-*; #w1; *; #w2; *; *; #defw defw1 Hw2;
-napply (. defw╪_1#);
-napply (. ((defw1 : [ ] = ?)^-1 ╪_0 #)╪_1#);
-napply Hw2;
-nqed.
-
-
-
-(* theorem 16: 1 → 3 *)
-nlemma odot_dot_aux : ∀S:Alpha.∀e1,e2: pre S.
- 𝐋\p (•(\fst e2)) = 𝐋\p (\fst e2) ∪ 𝐋 |\fst e2| →
- 𝐋\p (e1 ⊙ e2) = 𝐋\p e1 · 𝐋 |\fst e2| ∪ 𝐋\p e2.
-#S e1 e2 th1; ncases e1; #e1' b1'; ncases b1';
-##[ nchange in match (〈?,true〉⊙?) with 〈?,?〉;
- nletin e2' ≝ (\fst e2); nletin b2' ≝ (\snd e2);
- nletin e2'' ≝ (\fst (•(\fst e2))); nletin b2'' ≝ (\snd (•(\fst e2)));
- napply (.=_1 (# ╪_1 (epsilon_or …))); (* XXX … is too slow if combined with .= *)
- nchange in match b2'' with b2''; (* XXX some unfoldings happened *)
- nchange in match b2' with b2';
- napply (.=_1 (# ╪_1 (cupC …))); napply (.=_1 (cupA …));
- napply (.=_1 (# ╪_1 (cupA …)^-1)); (* XXX slow, but not because of disamb! *)
- ncut (𝐋\p e2'' ∪ ϵ b2'' = 𝐋\p e2' ∪ 𝐋 |e2'|); ##[
- napply (?^-1); napply (.=_1 th1^-1); //;##] #E;
- napply (.=_1 (# ╪_1 (E ╪_1 #)));
- napply (?^-1);
- napply (.=_1 (cup_dotD …) ╪_1 #);
- napply (.=_1 (# ╪_1 (epsilon_dot …)) ╪_1 #);
- napply (?^-1);
- napply (.=_1 # ╪_1 ((cupC …) ╪_1 #));
- napply (.=_1 (cupA …)^-1);
- napply (.=_1 (cupA …)^-1 ╪_1 #);
- napply (.=_1 (cupA …));
- napply (.=_1 (((# ╪_1 (┼_1 (erase_bull S e2')) )╪_1 #)╪_1 #));
- //;
-##| ncases e2; #e2' b2'; nchange in match (𝐋\p ?) with (?∪?∪?);
- napply (.=_1 (cupA…));
- napply (?^-1); nchange in match (𝐋\p 〈?,false〉) with (?∪?);
- napply (.=_1 ((cup0…)╪_1#)╪_1#);
- //]
-nqed.
-
-
-
-nlemma sub_dot_star :
- ∀S:Alpha.∀X:Elang S.∀b. (X - ϵ b) · (ext_carr … X)^* ∪ {[]} = (ext_carr … X)^*.
-#S X b; napply ext_set; #w; @;
-##[ *; ##[##2: #defw; @[]; @; //]
- *; #w1; *; #w2; *; *; #defw sube; *; #lw; *; #flx cj;
- @ (w1 :: lw); @; ##[ napply (.=_0 # ╪_0 flx); napply (?^-1); //]
- @; //; napply (subW … sube);
-##| *; #wl; *; #defw Pwl; napply (. (defw^-1 ╪_1 #));
- nelim wl in Pwl; /2/;
- #s tl IH; *; #Xs Ptl; ncases s in Xs; ##[ #; napply IH; //] #x xs Xxxs;
- @; @(x :: xs); @(flatten ? tl); @;
- ##[ @; ##[ napply #] @; ##[nassumption] ncases b; *; ##]
- nelim tl in Ptl; ##[ #; @[]; /2/] #w ws IH; *; #Xw Pws; @(w :: ws); @; ##[ napply #]
- @; //;##]
-nqed.
-
-(* theorem 16: 1 *)
-alias symbol "pc" (instance 13) = "cat lang".
-alias symbol "in_pl" (instance 23) = "in_pl".
-alias symbol "in_pl" (instance 5) = "in_pl".
-alias symbol "eclose" (instance 21) = "eclose".
-ntheorem bull_cup : ∀S:Alpha. ∀e:pitem S. 𝐋\p (•e) = 𝐋\p e ∪ 𝐋 |e|.
-#S e; nelim e; //;
- ##[ #a; napply ext_set; #w; @; *; /3/ by or_introl, or_intror;
- ##| #a; napply ext_set; #w; @; *; /3/ by or_introl; *;
- ##| #e1 e2 IH1 IH2;
- nchange in match (•(e1·e2)) with (•e1 ⊙ 〈e2,false〉);
- napply (.=_1 (odot_dot_aux ?? 〈e2,false〉 IH2));
- napply (.=_1 (IH1 ╪_1 #) ╪_1 #);
- napply (.=_1 (cup_dotD …) ╪_1 #);
- napply (.=_1 (cupA …));
- napply (.=_1 # ╪_1 ((erase_dot ???)^-1 ╪_1 (cup0 ??)));
- napply (.=_1 # ╪_1 (cupC…));
- napply (.=_1 (cupA …)^-1); //;
- ##| #e1 e2 IH1 IH2;
- nchange in match (•(?+?)) with (•e1 ⊕ •e2);
- napply (.=_1 (oplus_cup …));
- napply (.=_1 IH1 ╪_1 IH2);
- napply (.=_1 (cupA …));
- napply (.=_1 # ╪_1 (# ╪_1 (cupC…)));
- napply (.=_1 # ╪_1 (cupA ????)^-1);
- napply (.=_1 # ╪_1 (cupC…));
- napply (.=_1 (cupA ????)^-1);
- napply (.=_1 # ╪_1 (erase_plus ???)^-1); //;
- ##| #e; nletin e' ≝ (\fst (•e)); nletin b' ≝ (\snd (•e)); #IH;
- nchange in match (𝐋\p ?) with (𝐋\p 〈e'^*,true〉);
- nchange in match (𝐋\p ?) with (𝐋\p (e'^* ) ∪ {[ ]});
- (* nwhd in match (𝐋\p e'^* ); (* XXX bug uncertain *) *)
- nchange in ⊢ (???(??%?)?) with (𝐋\p e' · ?);
- napply (.=_1 (# ╪_1 (┼_1 (┼_0 (erase_bull S e)))) ╪_1 #);
- napply (.=_1 (# ╪_1 (erase_star …)) ╪_1 #);
- ncut ( 𝐋\p e' = 𝐋\p e ∪ (𝐋 |e| - ϵ b')); ##[
- nchange in IH : (???%?) with (𝐋\p e' ∪ ϵ b'); ncases b' in IH;
- ##[ #IH; napply (?^-1); napply (.=_1 (cup_sub … (not_epsilon_lp…)));
- napply (.=_1 (IH^-1 ╪_1 #));
- alias symbol "invert" = "setoid1 symmetry".
- (* XXX too slow if ambiguous, since it tries with a ? (takes 12s) then
- tries with sym0 and fails immediately, then with sym1 that is OK *)
- napply (.=_1 (cup_sub …(not_epsilon_lp …))^-1);
- napply (.=_1 # ╪_1 (subK…)); napply (.=_1 (cup0…)); //;
- ##| #IH; napply (?^-1); napply (.=_1 # ╪_1 (sub0 …));
- napply (.=_1 IH^-1); napply (.=_1 (cup0 …)); //; ##]##] #EE;
- napply (.=_1 (EE ╪_1 #) ╪_1 #);
- napply (.=_1 (cup_dotD…) ╪_1 #);
- napply (.=_1 (cupA…));
- napply (.=_1 # ╪_1 (sub_dot_star…)); //; ##]
-nqed.
-
-STOP
-
-(* theorem 16: 3 *)
-nlemma odot_dot:
- ∀S.∀e1,e2: pre S. 𝐋\p (e1 ⊙ e2) = 𝐋\p e1 · 𝐋 .|\fst e2| ∪ 𝐋\p e2.
-#S e1 e2; napply odot_dot_aux; napply (bull_cup S (\fst e2)); nqed.
-
-nlemma dot_star_epsilon : ∀S.∀e:re S.𝐋 e · 𝐋 e^* ∪ {[]} = 𝐋 e^*.
-#S e; napply extP; #w; nnormalize; @;
-##[ *; ##[##2: #H; nrewrite < H; @[]; /3/] *; #w1; *; #w2;
- *; *; #defw Hw1; *; #wl; *; #defw2 Hwl; @(w1 :: wl);
- nrewrite < defw; nrewrite < defw2; @; //; @;//;
-##| *; #wl; *; #defw Hwl; ncases wl in defw Hwl; ##[#defw; #; @2; nrewrite < defw; //]
- #x xs defw; *; #Hx Hxs; @; @x; @(flatten ? xs); nrewrite < defw;
- @; /2/; @xs; /2/;##]
- nqed.
-
-nlemma nil_star : ∀S.∀e:re S. [ ] ∈ e^*.
-#S e; @[]; /2/; nqed.
-
-nlemma cupID : ∀S.∀l:word S → Prop.l ∪ l = l.
-#S l; napply extP; #w; @; ##[*]//; #; @; //; nqed.
-
-nlemma cup_star_nil : ∀S.∀l:word S → Prop. l^* ∪ {[]} = l^*.
-#S a; napply extP; #w; @; ##[*; //; #H; nrewrite < H; @[]; @; //] #;@; //;nqed.
-
-nlemma rcanc_sing : ∀S.∀A,C:word S → Prop.∀b:word S .
- ¬ (A b) → A ∪ { (b) } = C → A = C - { (b) }.
-#S A C b nbA defC; nrewrite < defC; napply extP; #w; @;
-##[ #Aw; /3/| *; *; //; #H nH; ncases nH; #abs; nlapply (abs H); *]
-nqed.
-
-(* theorem 16: 4 *)
-nlemma star_dot: ∀S.∀e:pre S. 𝐋\p (e^⊛) = 𝐋\p e · (𝐋 .|\fst e|)^*.
-#S p; ncases p; #e b; ncases b;
-##[ nchange in match (〈e,true〉^⊛) with 〈?,?〉;
- nletin e' ≝ (\fst (•e)); nletin b' ≝ (\snd (•e));
- nchange in ⊢ (??%?) with (?∪?);
- nchange in ⊢ (??(??%?)?) with (𝐋\p e' · 𝐋 .|e'|^* );
- nrewrite > (?: 𝐋\p e' = 𝐋\p e ∪ (𝐋 .|e| - ϵ b' )); ##[##2:
- nlapply (bull_cup ? e); #bc;
- nchange in match (𝐋\p (•e)) in bc with (?∪?);
- nchange in match b' in bc with b';
- ncases b' in bc; ##[##2: nrewrite > (cup0…); nrewrite > (sub0…); //]
- nrewrite > (cup_sub…); ##[napply rcanc_sing] //;##]
- nrewrite > (cup_dotD…); nrewrite > (cupA…);nrewrite > (erase_bull…);
- nrewrite > (sub_dot_star…);
- nchange in match (𝐋\p 〈?,?〉) with (?∪?);
- nrewrite > (cup_dotD…); nrewrite > (epsilon_dot…); //;
-##| nwhd in match (〈e,false〉^⊛); nchange in match (𝐋\p 〈?,?〉) with (?∪?);
- nrewrite > (cup0…);
- nchange in ⊢ (??%?) with (𝐋\p e · 𝐋 .|e|^* );
- nrewrite < (cup0 ? (𝐋\p e)); //;##]
-nqed.
-
-nlet rec pre_of_re (S : Alpha) (e : re S) on e : pitem S ≝
- match e with
- [ z ⇒ pz ?
- | e ⇒ pe ?
- | s x ⇒ ps ? x
- | c e1 e2 ⇒ pc ? (pre_of_re ? e1) (pre_of_re ? e2)
- | o e1 e2 ⇒ po ? (pre_of_re ? e1) (pre_of_re ? e2)
- | k e1 ⇒ pk ? (pre_of_re ? e1)].
-
-nlemma notFalse : ¬False. @; //; nqed.
-
-nlemma dot0 : ∀S.∀A:word S → Prop. {} · A = {}.
-#S A; nnormalize; napply extP; #w; @; ##[##2: *]
-*; #w1; *; #w2; *; *; //; nqed.
-
-nlemma Lp_pre_of_re : ∀S.∀e:re S. 𝐋\p (pre_of_re ? e) = {}.
-#S e; nelim e; ##[##1,2,3: //]
-##[ #e1 e2 H1 H2; nchange in match (𝐋\p (pre_of_re S (e1 e2))) with (?∪?);
- nrewrite > H1; nrewrite > H2; nrewrite > (dot0…); nrewrite > (cupID…);//
-##| #e1 e2 H1 H2; nchange in match (𝐋\p (pre_of_re S (e1+e2))) with (?∪?);
- nrewrite > H1; nrewrite > H2; nrewrite > (cupID…); //
-##| #e1 H1; nchange in match (𝐋\p (pre_of_re S (e1^* ))) with (𝐋\p (pre_of_re ??) · ?);
- nrewrite > H1; napply dot0; ##]
-nqed.
-
-nlemma erase_pre_of_reK : ∀S.∀e. 𝐋 .|pre_of_re S e| = 𝐋 e.
-#S A; nelim A; //;
-##[ #e1 e2 H1 H2; nchange in match (𝐋 (e1 · e2)) with (𝐋 e1·?);
- nrewrite < H1; nrewrite < H2; //
-##| #e1 e2 H1 H2; nchange in match (𝐋 (e1 + e2)) with (𝐋 e1 ∪ ?);
- nrewrite < H1; nrewrite < H2; //
-##| #e1 H1; nchange in match (𝐋 (e1^* )) with ((𝐋 e1)^* );
- nrewrite < H1; //]
-nqed.
-
-(* corollary 17 *)
-nlemma L_Lp_bull : ∀S.∀e:re S.𝐋 e = 𝐋\p (•pre_of_re ? e).
-#S e; nrewrite > (bull_cup…); nrewrite > (Lp_pre_of_re…);
-nrewrite > (cupC…); nrewrite > (cup0…); nrewrite > (erase_pre_of_reK…); //;
-nqed.
-
-nlemma Pext : ∀S.∀f,g:word S → Prop. f = g → ∀w.f w → g w.
-#S f g H; nrewrite > H; //; nqed.
-
-(* corollary 18 *)
-ntheorem bull_true_epsilon : ∀S.∀e:pitem S. \snd (•e) = true ↔ [ ] ∈ .|e|.
-#S e; @;
-##[ #defsnde; nlapply (bull_cup ? e); nchange in match (𝐋\p (•e)) with (?∪?);
- nrewrite > defsnde; #H;
- nlapply (Pext ??? H [ ] ?); ##[ @2; //] *; //;
- E MO?
-
-STOP
-
-notation > "\move term 90 x term 90 E"
-non associative with precedence 60 for @{move ? $x $E}.
-nlet rec move (S: Alpha) (x:S) (E: pitem S) on E : pre S ≝
- match E with
- [ pz ⇒ 〈 ∅, false 〉
- | pe ⇒ 〈 ϵ, false 〉
- | ps y ⇒ 〈 `y, false 〉
- | pp y ⇒ 〈 `y, x == y 〉
- | po e1 e2 ⇒ \move x e1 ⊕ \move x e2
- | pc e1 e2 ⇒ \move x e1 ⊙ \move x e2
- | pk e ⇒ (\move x e)^⊛ ].
-notation < "\move\shy x\shy E" non associative with precedence 60 for @{'move $x $E}.
-notation > "\move term 90 x term 90 E" non associative with precedence 60 for @{'move $x $E}.
-interpretation "move" 'move x E = (move ? x E).
-
-ndefinition rmove ≝ λS:Alpha.λx:S.λe:pre S. \move x (\fst e).
-interpretation "rmove" 'move x E = (rmove ? x E).
-
-nlemma XXz : ∀S:Alpha.∀w:word S. w .∈ ∅ → False.
-#S w abs; ninversion abs; #; ndestruct;
-nqed.
-
-
-nlemma XXe : ∀S:Alpha.∀w:word S. w .∈ ϵ → False.
-#S w abs; ninversion abs; #; ndestruct;
-nqed.
-
-nlemma XXze : ∀S:Alpha.∀w:word S. w .∈ (∅ · ϵ) → False.
-#S w abs; ninversion abs; #; ndestruct; /2/ by XXz,XXe;
-nqed.
-
-
-naxiom in_move_cat:
- ∀S.∀w:word S.∀x.∀E1,E2:pitem S. w .∈ \move x (E1 · E2) →
- (∃w1.∃w2. w = w1@w2 ∧ w1 .∈ \move x E1 ∧ w2 ∈ .|E2|) ∨ w .∈ \move x E2.
-#S w x e1 e2 H; nchange in H with (w .∈ \move x e1 ⊙ \move x e2);
-ncases e1 in H; ncases e2;
-##[##1: *; ##[*; nnormalize; #; ndestruct]
- #H; ninversion H; ##[##1,4,5,6: nnormalize; #; ndestruct]
- nnormalize; #; ndestruct; ncases (?:False); /2/ by XXz,XXze;
-##|##2: *; ##[*; nnormalize; #; ndestruct]
- #H; ninversion H; ##[##1,4,5,6: nnormalize; #; ndestruct]
- nnormalize; #; ndestruct; ncases (?:False); /2/ by XXz,XXze;
-##| #r; *; ##[ *; nnormalize; #; ndestruct]
- #H; ninversion H; ##[##1,4,5,6: nnormalize; #; ndestruct]
- ##[##2: nnormalize; #; ndestruct; @2; @2; //.##]
- nnormalize; #; ndestruct; ncases (?:False); /2/ by XXz;
-##| #y; *; ##[ *; nnormalize; #defw defx; ndestruct; @2; @1; /2/ by conj;##]
- #H; ninversion H; nnormalize; #; ndestruct;
- ##[ncases (?:False); /2/ by XXz] /3/ by or_intror;
-##| #r1 r2; *; ##[ *; #defw]
- ...
-nqed.
-
-ntheorem move_ok:
- ∀S:Alpha.∀E:pre S.∀a,w.w .∈ \move a E ↔ (a :: w) .∈ E.
-#S E; ncases E; #r b; nelim r;
-##[##1,2: #a w; @;
- ##[##1,3: nnormalize; *; ##[##1,3: *; #; ndestruct; ##| #abs; ncases (XXz … abs); ##]
- #H; ninversion H; #; ndestruct;
- ##|##*:nnormalize; *; ##[##1,3: *; #; ndestruct; ##| #H1; ncases (XXz … H1); ##]
- #H; ninversion H; #; ndestruct;##]
-##|#a c w; @; nnormalize; ##[*; ##[*; #; ndestruct; ##] #abs; ninversion abs; #; ndestruct;##]
- *; ##[##2: #abs; ninversion abs; #; ndestruct; ##] *; #; ndestruct;
-##|#a c w; @; nnormalize;
- ##[ *; ##[ *; #defw; nrewrite > defw; #ca; @2; nrewrite > (eqb_t … ca); @; ##]
- #H; ninversion H; #; ndestruct;
- ##| *; ##[ *; #; ndestruct; ##] #H; ninversion H; ##[##2,3,4,5,6: #; ndestruct]
- #d defw defa; ndestruct; @1; @; //; nrewrite > (eqb_true S d d); //. ##]
-##|#r1 r2 H1 H2 a w; @;
- ##[ #H; ncases (in_move_cat … H);
- ##[ *; #w1; *; #w2; *; *; #defw w1m w2m;
- ncases (H1 a w1); #H1w1; #_; nlapply (H1w1 w1m); #good;
- nrewrite > defw; @2; @2 (a::w1); //; ncases good; ##[ *; #; ndestruct] //.
- ##|
- ...
-##|
-##|
-##]
-nqed.
-
-
-notation > "x ↦* E" non associative with precedence 60 for @{move_star ? $x $E}.
-nlet rec move_star (S : decidable) w E on w : bool × (pre S) ≝
- match w with
- [ nil ⇒ E
- | cons x w' ⇒ w' ↦* (x ↦ \snd E)].
-
-ndefinition in_moves ≝ λS:decidable.λw.λE:bool × (pre S). \fst(w ↦* E).
-
-ncoinductive equiv (S:decidable) : bool × (pre S) → bool × (pre S) → Prop ≝
- mk_equiv:
- ∀E1,E2: bool × (pre S).
- \fst E1 = \fst E2 →
- (∀x. equiv S (x ↦ \snd E1) (x ↦ \snd E2)) →
- equiv S E1 E2.
-
-ndefinition NAT: decidable.
- @ nat eqb; /2/.
-nqed.
-
-include "hints_declaration.ma".
-
-alias symbol "hint_decl" (instance 1) = "hint_decl_Type1".
-unification hint 0 ≔ ; X ≟ NAT ⊢ carr X ≡ nat.
-
-ninductive unit: Type[0] ≝ I: unit.
-
-nlet corec foo_nop (b: bool):
- equiv ?
- 〈 b, pc ? (ps ? 0) (pk ? (pc ? (ps ? 1) (ps ? 0))) 〉
- 〈 b, pc ? (pk ? (pc ? (ps ? 0) (ps ? 1))) (ps ? 0) 〉 ≝ ?.
- @; //; #x; ncases x
- [ nnormalize in ⊢ (??%%); napply (foo_nop false)
- | #y; ncases y
- [ nnormalize in ⊢ (??%%); napply (foo_nop false)
- | #w; nnormalize in ⊢ (??%%); napply (foo_nop false) ]##]
-nqed.
-
-(*
-nlet corec foo (a: unit):
- equiv NAT
- (eclose NAT (pc ? (ps ? 0) (pk ? (pc ? (ps ? 1) (ps ? 0)))))
- (eclose NAT (pc ? (pk ? (pc ? (ps ? 0) (ps ? 1))) (ps ? 0)))
-≝ ?.
- @;
- ##[ nnormalize; //
- ##| #x; ncases x
- [ nnormalize in ⊢ (??%%);
- nnormalize in foo: (? → ??%%);
- @; //; #y; ncases y
- [ nnormalize in ⊢ (??%%); napply foo_nop
- | #y; ncases y
- [ nnormalize in ⊢ (??%%);
-
- ##| #z; nnormalize in ⊢ (??%%); napply foo_nop ]##]
- ##| #y; nnormalize in ⊢ (??%%); napply foo_nop
- ##]
-nqed.
-*)
-
-ndefinition test1 : pre ? ≝ ❨ `0 | `1 ❩^* `0.
-ndefinition test2 : pre ? ≝ ❨ (`0`1)^* `0 | (`0`1)^* `1 ❩.
-ndefinition test3 : pre ? ≝ (`0 (`0`1)^* `1)^*.
-
-
-nlemma foo: in_moves ? [0;0;1;0;1;1] (ɛ test3) = true.
- nnormalize in match test3;
- nnormalize;
-//;
-nqed.
-
-(**********************************************************)
-
-ninductive der (S: Type[0]) (a: S) : re S → re S → CProp[0] ≝
- der_z: der S a (z S) (z S)
- | der_e: der S a (e S) (z S)
- | der_s1: der S a (s S a) (e ?)
- | der_s2: ∀b. a ≠ b → der S a (s S b) (z S)
- | der_c1: ∀e1,e2,e1',e2'. in_l S [] e1 → der S a e1 e1' → der S a e2 e2' →
- der S a (c ? e1 e2) (o ? (c ? e1' e2) e2')
- | der_c2: ∀e1,e2,e1'. Not (in_l S [] e1) → der S a e1 e1' →
- der S a (c ? e1 e2) (c ? e1' e2)
- | der_o: ∀e1,e2,e1',e2'. der S a e1 e1' → der S a e2 e2' →
- der S a (o ? e1 e2) (o ? e1' e2').
-
-nlemma eq_rect_CProp0_r:
- ∀A.∀a,x.∀p:eq ? x a.∀P: ∀x:A. eq ? x a → CProp[0]. P a (refl A a) → P x p.
- #A; #a; #x; #p; ncases p; #P; #H; nassumption.
-nqed.
-
-nlemma append1: ∀A.∀a:A.∀l. [a] @ l = a::l. //. nqed.
-
-naxiom in_l1: ∀S,r1,r2,w. in_l S [ ] r1 → in_l S w r2 → in_l S w (c S r1 r2).
-(* #S; #r1; #r2; #w; nelim r1
- [ #K; ninversion K
- | #H1; #H2; napply (in_c ? []); //
- | (* tutti casi assurdi *) *)
-
-ninductive in_l' (S: Type[0]) : word S → re S → CProp[0] ≝
- in_l_empty1: ∀E.in_l S [] E → in_l' S [] E
- | in_l_cons: ∀a,w,e,e'. in_l' S w e' → der S a e e' → in_l' S (a::w) e.
-
-ncoinductive eq_re (S: Type[0]) : re S → re S → CProp[0] ≝
- mk_eq_re: ∀E1,E2.
- (in_l S [] E1 → in_l S [] E2) →
- (in_l S [] E2 → in_l S [] E1) →
- (∀a,E1',E2'. der S a E1 E1' → der S a E2 E2' → eq_re S E1' E2') →
- eq_re S E1 E2.
-
-(* serve il lemma dopo? *)
-ntheorem eq_re_is_eq: ∀S.∀E1,E2. eq_re S E1 E2 → ∀w. in_l ? w E1 → in_l ? w E2.
- #S; #E1; #E2; #H1; #w; #H2; nelim H2 in E2 H1 ⊢ %
- [ #r; #K (* ok *)
- | #a; #w; #R1; #R2; #K1; #K2; #K3; #R3; #K4; @2 R2; //; ncases K4;
-
-(* IL VICEVERSA NON VALE *)
-naxiom in_l_to_in_l: ∀S,w,E. in_l' S w E → in_l S w E.
-(* #S; #w; #E; #H; nelim H
- [ //
- | #a; #w'; #r; #r'; #H1; (* e si cade qua sotto! *)
- ]
-nqed. *)
-
-ntheorem der1: ∀S,a,e,e',w. der S a e e' → in_l S w e' → in_l S (a::w) e.
- #S; #a; #E; #E'; #w; #H; nelim H
- [##1,2: #H1; ninversion H1
- [##1,8: #_; #K; (* non va ndestruct K; *) ncases (?:False); (* perche' due goal?*) /2/
- |##2,9: #X; #Y; #K; ncases (?:False); /2/
- |##3,10: #x; #y; #z; #w; #a; #b; #c; #d; #e; #K; ncases (?:False); /2/
- |##4,11: #x; #y; #z; #w; #a; #b; #K; ncases (?:False); /2/
- |##5,12: #x; #y; #z; #w; #a; #b; #K; ncases (?:False); /2/
- |##6,13: #x; #y; #K; ncases (?:False); /2/
- |##7,14: #x; #y; #z; #w; #a; #b; #c; #d; #K; ncases (?:False); /2/]
-##| #H1; ninversion H1
- [ //
- | #X; #Y; #K; ncases (?:False); /2/
- | #x; #y; #z; #w; #a; #b; #c; #d; #e; #K; ncases (?:False); /2/
- | #x; #y; #z; #w; #a; #b; #K; ncases (?:False); /2/
- | #x; #y; #z; #w; #a; #b; #K; ncases (?:False); /2/
- | #x; #y; #K; ncases (?:False); /2/
- | #x; #y; #z; #w; #a; #b; #c; #d; #K; ncases (?:False); /2/ ]
-##| #H1; #H2; #H3; ninversion H3
- [ #_; #K; ncases (?:False); /2/
- | #X; #Y; #K; ncases (?:False); /2/
- | #x; #y; #z; #w; #a; #b; #c; #d; #e; #K; ncases (?:False); /2/
- | #x; #y; #z; #w; #a; #b; #K; ncases (?:False); /2/
- | #x; #y; #z; #w; #a; #b; #K; ncases (?:False); /2/
- | #x; #y; #K; ncases (?:False); /2/
- | #x; #y; #z; #w; #a; #b; #c; #d; #K; ncases (?:False); /2/ ]
-##| #r1; #r2; #r1'; #r2'; #H1; #H2; #H3; #H4; #H5; #H6;
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "datatypes/list.ma".
-include "datatypes/pairs.ma".
-include "arithmetics/nat.ma".
-
-interpretation "iff" 'iff a b = (iff a b).
-
-nrecord Alpha : Type[1] ≝ { carr :> Type[0];
- eqb: carr → carr → bool;
- eqb_true: ∀x,y. (eqb x y = true) ↔ (x = y)
-}.
-
-notation "a == b" non associative with precedence 45 for @{ 'eqb $a $b }.
-interpretation "eqb" 'eqb a b = (eqb ? a b).
-
-ndefinition word ≝ λS:Alpha.list S.
-
-ninductive re (S: Alpha) : Type[0] ≝
- z: re S
- | e: re S
- | s: S → re S
- | c: re S → re S → re S
- | o: re S → re S → re S
- | k: re S → re S.
-
-notation < "a \sup ⋇" non associative with precedence 90 for @{ 'pk $a}.
-notation > "a ^ *" non associative with precedence 90 for @{ 'pk $a}.
-interpretation "star" 'pk a = (k ? a).
-interpretation "or" 'plus a b = (o ? a b).
-
-notation "a · b" non associative with precedence 60 for @{ 'pc $a $b}.
-interpretation "cat" 'pc a b = (c ? a b).
-
-(* to get rid of \middot *)
-ncoercion c : ∀S:Alpha.∀p:re S. re S → re S ≝ c on _p : re ? to ∀_:?.?.
-
-notation < "a" non associative with precedence 90 for @{ 'ps $a}.
-notation > "` term 90 a" non associative with precedence 90 for @{ 'ps $a}.
-interpretation "atom" 'ps a = (s ? a).
-
-notation "ϵ" non associative with precedence 90 for @{ 'epsilon }.
-interpretation "epsilon" 'epsilon = (e ?).
-
-notation "∅" non associative with precedence 90 for @{ 'empty }.
-interpretation "empty" 'empty = (z ?).
-
-nlet rec flatten (S : Alpha) (l : list (word S)) on l : word S ≝
-match l with [ nil ⇒ [ ] | cons w tl ⇒ w @ flatten ? tl ].
-
-nlet rec conjunct (S : Alpha) (l : list (word S)) (r : word S → Prop) on l: Prop ≝
-match l with [ nil ⇒ ? | cons w tl ⇒ r w ∧ conjunct ? tl r ]. napply True. nqed.
-
-ndefinition empty_lang ≝ λS.λw:word S.False.
-notation "{}" non associative with precedence 90 for @{'empty_lang}.
-interpretation "empty lang" 'empty_lang = (empty_lang ?).
-
-ndefinition sing_lang ≝ λS.λx,w:word S.x=w.
-notation "{x}" non associative with precedence 90 for @{'sing_lang $x}.
-interpretation "sing lang" 'sing_lang x = (sing_lang ? x).
-
-ndefinition union : ∀S,l1,l2,w.Prop ≝ λS.λl1,l2.λw:word S.l1 w ∨ l2 w.
-interpretation "union lang" 'union a b = (union ? a b).
-
-ndefinition cat : ∀S,l1,l2,w.Prop ≝
- λS.λl1,l2.λw:word S.∃w1,w2.w1 @ w2 = w ∧ l1 w1 ∧ l2 w2.
-interpretation "cat lang" 'pc a b = (cat ? a b).
-
-ndefinition star ≝ λS.λl.λw:word S.∃lw.flatten ? lw = w ∧ conjunct ? lw l.
-interpretation "star lang" 'pk l = (star ? l).
-
-notation > "𝐋 term 70 E" non associative with precedence 75 for @{in_l ? $E}.
-nlet rec in_l (S : Alpha) (r : re S) on r : word S → Prop ≝
-match r with
-[ z ⇒ {}
-| e ⇒ { [ ] }
-| s x ⇒ { [x] }
-| c r1 r2 ⇒ 𝐋 r1 · 𝐋 r2
-| o r1 r2 ⇒ 𝐋 r1 ∪ 𝐋 r2
-| k r1 ⇒ (𝐋 r1) ^*].
-notation "𝐋 term 70 E" non associative with precedence 75 for @{'in_l $E}.
-interpretation "in_l" 'in_l E = (in_l ? E).
-interpretation "in_l mem" 'mem w l = (in_l ? l w).
-
-notation "a || b" left associative with precedence 30 for @{'orb $a $b}.
-interpretation "orb" 'orb a b = (orb a b).
-
-ndefinition if_then_else ≝ λT:Type[0].λe,t,f.match e return λ_.T with [ true ⇒ t | false ⇒ f].
-notation > "'if' term 19 e 'then' term 19 t 'else' term 19 f" non associative with precedence 19 for @{ 'if_then_else $e $t $f }.
-notation < "'if' \nbsp term 19 e \nbsp 'then' \nbsp term 19 t \nbsp 'else' \nbsp term 90 f \nbsp" non associative with precedence 19 for @{ 'if_then_else $e $t $f }.
-interpretation "if_then_else" 'if_then_else e t f = (if_then_else ? e t f).
-
-ninductive pitem (S: Alpha) : Type[0] ≝
- pz: pitem S
- | pe: pitem S
- | ps: S → pitem S
- | pp: S → pitem S
- | pc: pitem S → pitem S → pitem S
- | po: pitem S → pitem S → pitem S
- | pk: pitem S → pitem S.
-
-ndefinition pre ≝ λS.pitem S × bool.
-
-interpretation "pstar" 'pk a = (pk ? a).
-interpretation "por" 'plus a b = (po ? a b).
-interpretation "pcat" 'pc a b = (pc ? a b).
-notation < ".a" non associative with precedence 90 for @{ 'pp $a}.
-notation > "`. term 90 a" non associative with precedence 90 for @{ 'pp $a}.
-interpretation "ppatom" 'pp a = (pp ? a).
-(* to get rid of \middot *)
-ncoercion pc : ∀S.∀p:pitem S. pitem S → pitem S ≝ pc on _p : pitem ? to ∀_:?.?.
-interpretation "patom" 'ps a = (ps ? a).
-interpretation "pepsilon" 'epsilon = (pe ?).
-interpretation "pempty" 'empty = (pz ?).
-
-notation > "|term 19 e|" non associative with precedence 70 for @{forget ? $e}.
-nlet rec forget (S: Alpha) (l : pitem S) on l: re S ≝
- match l with
- [ pz ⇒ ∅
- | pe ⇒ ϵ
- | ps x ⇒ `x
- | pp x ⇒ `x
- | pc E1 E2 ⇒ (|E1| · |E2|)
- | po E1 E2 ⇒ (|E1| + |E2|)
- | pk E ⇒ |E|^* ].
-notation < "|term 19 e|" non associative with precedence 70 for @{'forget $e}.
-interpretation "forget" 'forget a = (forget ? a).
-
-notation "\fst term 90 x" non associative with precedence 90 for @{'fst $x}.
-interpretation "fst" 'fst x = (fst ? ? x).
-notation > "\snd term 90 x" non associative with precedence 90 for @{'snd $x}.
-interpretation "snd" 'snd x = (snd ? ? x).
-
-notation > "𝐋\p\ term 70 E" non associative with precedence 75 for @{in_pl ? $E}.
-nlet rec in_pl (S : Alpha) (r : pitem S) on r : word S → Prop ≝
-match r with
-[ pz ⇒ {}
-| pe ⇒ {}
-| ps _ ⇒ {}
-| pp x ⇒ { [x] }
-| pc r1 r2 ⇒ 𝐋\p\ r1 · 𝐋 |r2| ∪ 𝐋\p\ r2
-| po r1 r2 ⇒ 𝐋\p\ r1 ∪ 𝐋\p\ r2
-| pk r1 ⇒ 𝐋\p\ r1 · 𝐋 (|r1|^* ) ].
-notation > "𝐋\p term 70 E" non associative with precedence 75 for @{'in_pl $E}.
-notation "𝐋\sub(\p) term 70 E" non associative with precedence 75 for @{'in_pl $E}.
-interpretation "in_pl" 'in_pl E = (in_pl ? E).
-interpretation "in_pl mem" 'mem w l = (in_pl ? l w).
-
-ndefinition epsilon ≝ λS,b.if b then { ([ ] : word S) } else {}.
-
-interpretation "epsilon" 'epsilon = (epsilon ?).
-notation < "ϵ b" non associative with precedence 90 for @{'app_epsilon $b}.
-interpretation "epsilon lang" 'app_epsilon b = (epsilon ? b).
-
-ndefinition in_prl ≝ λS : Alpha.λp:pre S. 𝐋\p (\fst p) ∪ ϵ (\snd p).
-
-interpretation "in_prl mem" 'mem w l = (in_prl ? l w).
-interpretation "in_prl" 'in_pl E = (in_prl ? E).
-
-nlemma append_eq_nil : ∀S.∀w1,w2:word S. w1 @ w2 = [ ] → w1 = [ ].
-#S w1; nelim w1; //. #x tl IH w2; nnormalize; #abs; ndestruct; nqed.
-
-(* lemma 12 *)
-nlemma epsilon_in_true : ∀S.∀e:pre S. [ ] ∈ e ↔ \snd e = true.
-#S r; ncases r; #e b; @; ##[##2: #H; nrewrite > H; @2; /2/; ##] ncases b;//;
-nnormalize; *; ##[##2:*] nelim e;
-##[ ##1,2: *; ##| #c; *; ##| #c; nnormalize; #; ndestruct; ##| ##7: #p H;
-##| #r1 r2 H G; *; ##[##2: /3/ by or_intror]
-##| #r1 r2 H1 H2; *; /3/ by or_intror, or_introl; ##]
-*; #w1; *; #w2; *; *; #defw1; nrewrite > (append_eq_nil … w1 w2 …); /3/ by {};//;
-nqed.
-
-nlemma not_epsilon_lp : ∀S:Alpha.∀e:pitem S. ¬ ((𝐋\p e) [ ]).
-#S e; nelim e; nnormalize; /2/ by nmk;
-##[ #; @; #; ndestruct;
-##| #r1 r2 n1 n2; @; *; /2/; *; #w1; *; #w2; *; *; #H;
- nrewrite > (append_eq_nil …H…); /2/;
-##| #r1 r2 n1 n2; @; *; /2/;
-##| #r n; @; *; #w1; *; #w2; *; *; #H;
- nrewrite > (append_eq_nil …H…); /2/;##]
-nqed.
-
-ndefinition lo ≝ λS:Alpha.λa,b:pre S.〈\fst a + \fst b,\snd a || \snd b〉.
-notation "a ⊕ b" left associative with precedence 60 for @{'oplus $a $b}.
-interpretation "oplus" 'oplus a b = (lo ? a b).
-
-ndefinition lc ≝ λS:Alpha.λbcast:∀S:Alpha.∀E:pitem S.pre S.λa,b:pre S.
- match a with [ mk_pair e1 b1 ⇒
- match b1 with
- [ false ⇒ 〈e1 · \fst b, \snd b〉
- | true ⇒ 〈e1 · \fst (bcast ? (\fst b)),\snd b || \snd (bcast ? (\fst b))〉]].
-
-notation < "a ⊙ b" left associative with precedence 60 for @{'lc $op $a $b}.
-interpretation "lc" 'lc op a b = (lc ? op a b).
-notation > "a ⊙ b" left associative with precedence 60 for @{'lc eclose $a $b}.
-
-ndefinition lk ≝ λS:Alpha.λbcast:∀S:Alpha.∀E:pitem S.pre S.λa:pre S.
- match a with [ mk_pair e1 b1 ⇒
- match b1 with
- [ false ⇒ 〈e1^*, false〉
- | true ⇒ 〈(\fst (bcast ? e1))^*, true〉]].
-
-notation < "a \sup ⊛" non associative with precedence 90 for @{'lk $op $a}.
-interpretation "lk" 'lk op a = (lk ? op a).
-notation > "a^⊛" non associative with precedence 90 for @{'lk eclose $a}.
-
-notation > "•" non associative with precedence 60 for @{eclose ?}.
-nlet rec eclose (S: Alpha) (E: pitem S) on E : pre S ≝
- match E with
- [ pz ⇒ 〈 ∅, false 〉
- | pe ⇒ 〈 ϵ, true 〉
- | ps x ⇒ 〈 `.x, false 〉
- | pp x ⇒ 〈 `.x, false 〉
- | po E1 E2 ⇒ •E1 ⊕ •E2
- | pc E1 E2 ⇒ •E1 ⊙ 〈 E2, false 〉
- | pk E ⇒ 〈(\fst (•E))^*,true〉].
-notation < "• x" non associative with precedence 60 for @{'eclose $x}.
-interpretation "eclose" 'eclose x = (eclose ? x).
-notation > "• x" non associative with precedence 60 for @{'eclose $x}.
-
-ndefinition reclose ≝ λS:Alpha.λp:pre S.let p' ≝ •\fst p in 〈\fst p',\snd p || \snd p'〉.
-interpretation "reclose" 'eclose x = (reclose ? x).
-
-ndefinition eq_f1 ≝ λS.λa,b:word S → Prop.∀w.a w ↔ b w.
-notation > "A =1 B" non associative with precedence 45 for @{'eq_f1 $A $B}.
-notation "A =\sub 1 B" non associative with precedence 45 for @{'eq_f1 $A $B}.
-interpretation "eq f1" 'eq_f1 a b = (eq_f1 ? a b).
-
-naxiom extP : ∀S.∀p,q:word S → Prop.(p =1 q) → p = q.
-
-nlemma epsilon_or : ∀S:Alpha.∀b1,b2. ϵ(b1 || b2) = ϵ b1 ∪ ϵ b2. ##[##2: napply S]
-#S b1 b2; ncases b1; ncases b2; napply extP; #w; nnormalize; @; /2/; *; //; *;
-nqed.
-
-nlemma cupA : ∀S.∀a,b,c:word S → Prop.a ∪ b ∪ c = a ∪ (b ∪ c).
-#S a b c; napply extP; #w; nnormalize; @; *; /3/; *; /3/; nqed.
-
-nlemma cupC : ∀S. ∀a,b:word S → Prop.a ∪ b = b ∪ a.
-#S a b; napply extP; #w; @; *; nnormalize; /2/; nqed.
-
-(* theorem 16: 2 *)
-nlemma oplus_cup : ∀S:Alpha.∀e1,e2:pre S.𝐋\p (e1 ⊕ e2) = 𝐋\p e1 ∪ 𝐋\p e2.
-#S r1; ncases r1; #e1 b1 r2; ncases r2; #e2 b2;
-nwhd in ⊢ (??(??%)?);
-nchange in ⊢(??%?) with (𝐋\p (e1 + e2) ∪ ϵ (b1 || b2));
-nchange in ⊢(??(??%?)?) with (𝐋\p (e1) ∪ 𝐋\p (e2));
-nrewrite > (epsilon_or S …); nrewrite > (cupA S (𝐋\p e1) …);
-nrewrite > (cupC ? (ϵ b1) …); nrewrite < (cupA S (𝐋\p e2) …);
-nrewrite > (cupC ? ? (ϵ b1) …); nrewrite < (cupA …); //;
-nqed.
-
-nlemma odotEt :
- ∀S.∀e1,e2:pitem S.∀b2. 〈e1,true〉 ⊙ 〈e2,b2〉 = 〈e1 · \fst (•e2),b2 || \snd (•e2)〉.
-#S e1 e2 b2; nnormalize; ncases (•e2); //; nqed.
-
-nlemma LcatE : ∀S.∀e1,e2:pitem S.𝐋\p (e1 · e2) = 𝐋\p e1 · 𝐋 |e2| ∪ 𝐋\p e2. //; nqed.
-
-nlemma cup_dotD : ∀S.∀p,q,r:word S → Prop.(p ∪ q) · r = (p · r) ∪ (q · r).
-#S p q r; napply extP; #w; nnormalize; @;
-##[ *; #x; *; #y; *; *; #defw; *; /7/ by or_introl, or_intror, ex_intro, conj;
-##| *; *; #x; *; #y; *; *; /7/ by or_introl, or_intror, ex_intro, conj; ##]
-nqed.
-
-nlemma cup0 :∀S.∀p:word S → Prop.p ∪ {} = p.
-#S p; napply extP; #w; nnormalize; @; /2/; *; //; *; nqed.
-
-nlemma erase_dot : ∀S.∀e1,e2:pitem S.𝐋 |e1 · e2| = 𝐋 |e1| · 𝐋 |e2|.
-#S e1 e2; napply extP; nnormalize; #w; @; *; #w1; *; #w2; *; *; /7/ by ex_intro, conj;
-nqed.
-
-nlemma erase_plus : ∀S.∀e1,e2:pitem S.𝐋 |e1 + e2| = 𝐋 |e1| ∪ 𝐋 |e2|.
-#S e1 e2; napply extP; nnormalize; #w; @; *; /4/ by or_introl, or_intror; nqed.
-
-nlemma erase_star : ∀S.∀e1:pitem S.𝐋 |e1|^* = 𝐋 |e1^*|. //; nqed.
-
-ndefinition substract := λS.λp,q:word S → Prop.λw.p w ∧ ¬ q w.
-interpretation "substract" 'minus a b = (substract ? a b).
-
-nlemma cup_sub: ∀S.∀a,b:word S → Prop. ¬ (a []) → a ∪ (b - {[]}) = (a ∪ b) - {[]}.
-#S a b c; napply extP; #w; nnormalize; @; *; /4/; *; /4/; nqed.
-
-nlemma sub0 : ∀S.∀a:word S → Prop. a - {} = a.
-#S a; napply extP; #w; nnormalize; @; /3/; *; //; nqed.
-
-nlemma subK : ∀S.∀a:word S → Prop. a - a = {}.
-#S a; napply extP; #w; nnormalize; @; *; /2/; nqed.
-
-nlemma subW : ∀S.∀a,b:word S → Prop.∀w.(a - b) w → a w.
-#S a b w; nnormalize; *; //; nqed.
-
-nlemma erase_bull : ∀S.∀a:pitem S. |\fst (•a)| = |a|.
-#S a; nelim a; // by {};
-##[ #e1 e2 IH1 IH2; nchange in ⊢ (???%) with (|e1| · |e2|);
- nrewrite < IH1; nrewrite < IH2;
- nchange in ⊢ (??(??%)?) with (\fst (•e1 ⊙ 〈e2,false〉));
- ncases (•e1); #e3 b; ncases b; nnormalize;
- ##[ ncases (•e2); //; ##| nrewrite > IH2; //]
-##| #e1 e2 IH1 IH2; nchange in ⊢ (???%) with (|e1| + |e2|);
- nrewrite < IH2; nrewrite < IH1;
- nchange in ⊢ (??(??%)?) with (\fst (•e1 ⊕ •e2));
- ncases (•e1); ncases (•e2); //;
-##| #e IH; nchange in ⊢ (???%) with (|e|^* ); nrewrite < IH;
- nchange in ⊢ (??(??%)?) with (\fst (•e))^*; //; ##]
-nqed.
-
-nlemma eta_lp : ∀S.∀p:pre S.𝐋\p p = 𝐋\p 〈\fst p, \snd p〉.
-#S p; ncases p; //; nqed.
-
-nlemma epsilon_dot: ∀S.∀p:word S → Prop. {[]} · p = p.
-#S e; napply extP; #w; nnormalize; @; ##[##2: #Hw; @[]; @w; /3/; ##]
-*; #w1; *; #w2; *; *; #defw defw1 Hw2; nrewrite < defw; nrewrite < defw1;
-napply Hw2; nqed.
-
-(* theorem 16: 1 → 3 *)
-nlemma odot_dot_aux : ∀S.∀e1,e2: pre S.
- 𝐋\p (•(\fst e2)) = 𝐋\p (\fst e2) ∪ 𝐋 |\fst e2| →
- 𝐋\p (e1 ⊙ e2) = 𝐋\p e1 · 𝐋 |\fst e2| ∪ 𝐋\p e2.
-#S e1 e2 th1; ncases e1; #e1' b1'; ncases b1';
-##[ nwhd in ⊢ (??(??%)?); nletin e2' ≝ (\fst e2); nletin b2' ≝ (\snd e2);
- nletin e2'' ≝ (\fst (•(\fst e2))); nletin b2'' ≝ (\snd (•(\fst e2)));
- nchange in ⊢ (??%?) with (?∪?);
- nchange in ⊢ (??(??%?)?) with (?∪?);
- nchange in match (𝐋\p 〈?,?〉) with (?∪?);
- nrewrite > (epsilon_or …); nrewrite > (cupC ? (ϵ ?)…);
- nrewrite > (cupA …);nrewrite < (cupA ?? (ϵ?)…);
- nrewrite > (?: 𝐋\p e2'' ∪ ϵ b2'' = 𝐋\p e2' ∪ 𝐋 |e2'|); ##[##2:
- nchange with (𝐋\p 〈e2'',b2''〉 = 𝐋\p e2' ∪ 𝐋 |e2'|);
- ngeneralize in match th1;
- nrewrite > (eta_lp…); #th1; nrewrite > th1; //;##]
- nrewrite > (eta_lp ? e2);
- nchange in match (𝐋\p 〈\fst e2,?〉) with (𝐋\p e2'∪ ϵ b2');
- nrewrite > (cup_dotD …); nrewrite > (epsilon_dot…);
- nrewrite > (cupC ? (𝐋\p e2')…); nrewrite > (cupA…);nrewrite > (cupA…);
- nrewrite < (erase_bull S e2') in ⊢ (???(??%?)); //;
-##| ncases e2; #e2' b2'; nchange in match (〈e1',false〉⊙?) with 〈?,?〉;
- nchange in match (𝐋\p ?) with (?∪?);
- nchange in match (𝐋\p (e1'·?)) with (?∪?);
- nchange in match (𝐋\p 〈e1',?〉) with (?∪?);
- nrewrite > (cup0…);
- nrewrite > (cupA…); //;##]
-nqed.
-
-nlemma sub_dot_star :
- ∀S.∀X:word S → Prop.∀b. (X - ϵ b) · X^* ∪ {[]} = X^*.
-#S X b; napply extP; #w; @;
-##[ *; ##[##2: nnormalize; #defw; nrewrite < defw; @[]; @; //]
- *; #w1; *; #w2; *; *; #defw sube; *; #lw; *; #flx cj;
- @ (w1 :: lw); nrewrite < defw; nrewrite < flx; @; //;
- @; //; napply (subW … sube);
-##| *; #wl; *; #defw Pwl; nrewrite < defw; nelim wl in Pwl; ##[ #_; @2; //]
- #w' wl' IH; *; #Pw' IHp; nlapply (IH IHp); *;
- ##[ *; #w1; *; #w2; *; *; #defwl' H1 H2;
- @; ncases b in H1; #H1;
- ##[##2: nrewrite > (sub0…); @w'; @(w1@w2);
- nrewrite > (associative_append ? w' w1 w2);
- nrewrite > defwl'; @; ##[@;//] @(wl'); @; //;
- ##| ncases w' in Pw';
- ##[ #ne; @w1; @w2; nrewrite > defwl'; @; //; @; //;
- ##| #x xs Px; @(x::xs); @(w1@w2);
- nrewrite > (defwl'); @; ##[@; //; @; //; @; nnormalize; #; ndestruct]
- @wl'; @; //; ##] ##]
- ##| #wlnil; nchange in match (flatten ? (w'::wl')) with (w' @ flatten ? wl');
- nrewrite < (wlnil); nrewrite > (append_nil…); ncases b;
- ##[ ncases w' in Pw'; /2/; #x xs Pxs; @; @(x::xs); @([]);
- nrewrite > (append_nil…); @; ##[ @; //;@; //; nnormalize; @; #; ndestruct]
- @[]; @; //;
- ##| @; @w'; @[]; nrewrite > (append_nil…); @; ##[##2: @[]; @; //]
- @; //; @; //; @; *;##]##]##]
-nqed.
-
-(* theorem 16: 1 *)
-alias symbol "pc" (instance 13) = "cat lang".
-alias symbol "in_pl" (instance 23) = "in_pl".
-alias symbol "in_pl" (instance 5) = "in_pl".
-alias symbol "eclose" (instance 21) = "eclose".
-ntheorem bull_cup : ∀S:Alpha. ∀e:pitem S. 𝐋\p (•e) = 𝐋\p e ∪ 𝐋 |e|.
-#S e; nelim e; //;
- ##[ #a; napply extP; #w; nnormalize; @; *; /3/ by or_introl, or_intror;
- ##| #a; napply extP; #w; nnormalize; @; *; /3/ by or_introl; *;
- ##| #e1 e2 IH1 IH2;
- nchange in ⊢ (??(??(%))?) with (•e1 ⊙ 〈e2,false〉);
- nrewrite > (odot_dot_aux S (•e1) 〈e2,false〉 IH2);
- nrewrite > (IH1 …); nrewrite > (cup_dotD …);
- nrewrite > (cupA …); nrewrite > (cupC ?? (𝐋\p ?) …);
- nchange in match (𝐋\p 〈?,?〉) with (𝐋\p e2 ∪ {}); nrewrite > (cup0 …);
- nrewrite < (erase_dot …); nrewrite < (cupA …); //;
- ##| #e1 e2 IH1 IH2;
- nchange in match (•(?+?)) with (•e1 ⊕ •e2); nrewrite > (oplus_cup …);
- nrewrite > (IH1 …); nrewrite > (IH2 …); nrewrite > (cupA …);
- nrewrite > (cupC ? (𝐋\p e2)…);nrewrite < (cupA ??? (𝐋\p e2)…);
- nrewrite > (cupC ?? (𝐋\p e2)…); nrewrite < (cupA …);
- nrewrite < (erase_plus …); //.
- ##| #e; nletin e' ≝ (\fst (•e)); nletin b' ≝ (\snd (•e)); #IH;
- nchange in match (𝐋\p ?) with (𝐋\p 〈e'^*,true〉);
- nchange in match (𝐋\p ?) with (𝐋\p (e'^* ) ∪ {[ ]});
- nchange in ⊢ (??(??%?)?) with (𝐋\p e' · 𝐋 |e'|^* );
- nrewrite > (erase_bull…e);
- nrewrite > (erase_star …);
- nrewrite > (?: 𝐋\p e' = 𝐋\p e ∪ (𝐋 |e| - ϵ b')); ##[##2:
- nchange in IH : (??%?) with (𝐋\p e' ∪ ϵ b'); ncases b' in IH;
- ##[ #IH; nrewrite > (cup_sub…); //; nrewrite < IH;
- nrewrite < (cup_sub…); //; nrewrite > (subK…); nrewrite > (cup0…);//;
- ##| nrewrite > (sub0 …); #IH; nrewrite < IH; nrewrite > (cup0 …);//; ##]##]
- nrewrite > (cup_dotD…); nrewrite > (cupA…);
- nrewrite > (?: ((?·?)∪{[]} = 𝐋 |e^*|)); //;
- nchange in match (𝐋 |e^*|) with ((𝐋 |e|)^* ); napply sub_dot_star;##]
- nqed.
-
-(* theorem 16: 3 *)
-nlemma odot_dot:
- ∀S.∀e1,e2: pre S. 𝐋\p (e1 ⊙ e2) = 𝐋\p e1 · 𝐋 |\fst e2| ∪ 𝐋\p e2.
-#S e1 e2; napply odot_dot_aux; napply (bull_cup S (\fst e2)); nqed.
-
-nlemma dot_star_epsilon : ∀S.∀e:re S.𝐋 e · 𝐋 e^* ∪ {[]} = 𝐋 e^*.
-#S e; napply extP; #w; nnormalize; @;
-##[ *; ##[##2: #H; nrewrite < H; @[]; /3/] *; #w1; *; #w2;
- *; *; #defw Hw1; *; #wl; *; #defw2 Hwl; @(w1 :: wl);
- nrewrite < defw; nrewrite < defw2; @; //; @;//;
-##| *; #wl; *; #defw Hwl; ncases wl in defw Hwl; ##[#defw; #; @2; nrewrite < defw; //]
- #x xs defw; *; #Hx Hxs; @; @x; @(flatten ? xs); nrewrite < defw;
- @; /2/; @xs; /2/;##]
- nqed.
-
-nlemma nil_star : ∀S.∀e:re S. [ ] ∈ e^*.
-#S e; @[]; /2/; nqed.
-
-nlemma cupID : ∀S.∀l:word S → Prop.l ∪ l = l.
-#S l; napply extP; #w; @; ##[*]//; #; @; //; nqed.
-
-nlemma cup_star_nil : ∀S.∀l:word S → Prop. l^* ∪ {[]} = l^*.
-#S a; napply extP; #w; @; ##[*; //; #H; nrewrite < H; @[]; @; //] #;@; //;nqed.
-
-nlemma rcanc_sing : ∀S.∀A,C:word S → Prop.∀b:word S .
- ¬ (A b) → A ∪ { (b) } = C → A = C - { (b) }.
-#S A C b nbA defC; nrewrite < defC; napply extP; #w; @;
-##[ #Aw; /3/| *; *; //; #H nH; ncases nH; #abs; nlapply (abs H); *]
-nqed.
-
-(* theorem 16: 4 *)
-nlemma star_dot: ∀S.∀e:pre S. 𝐋\p (e^⊛) = 𝐋\p e · (𝐋 |\fst e|)^*.
-#S p; ncases p; #e b; ncases b;
-##[ nchange in match (〈e,true〉^⊛) with 〈?,?〉;
- nletin e' ≝ (\fst (•e)); nletin b' ≝ (\snd (•e));
- nchange in ⊢ (??%?) with (?∪?);
- nchange in ⊢ (??(??%?)?) with (𝐋\p e' · 𝐋 |e'|^* );
- nrewrite > (?: 𝐋\p e' = 𝐋\p e ∪ (𝐋 |e| - ϵ b' )); ##[##2:
- nlapply (bull_cup ? e); #bc;
- nchange in match (𝐋\p (•e)) in bc with (?∪?);
- nchange in match b' in bc with b';
- ncases b' in bc; ##[##2: nrewrite > (cup0…); nrewrite > (sub0…); //]
- nrewrite > (cup_sub…); ##[napply rcanc_sing] //;##]
- nrewrite > (cup_dotD…); nrewrite > (cupA…);nrewrite > (erase_bull…);
- nrewrite > (sub_dot_star…);
- nchange in match (𝐋\p 〈?,?〉) with (?∪?);
- nrewrite > (cup_dotD…); nrewrite > (epsilon_dot…); //;
-##| nwhd in match (〈e,false〉^⊛); nchange in match (𝐋\p 〈?,?〉) with (?∪?);
- nrewrite > (cup0…);
- nchange in ⊢ (??%?) with (𝐋\p e · 𝐋 |e|^* );
- nrewrite < (cup0 ? (𝐋\p e)); //;##]
-nqed.
-
-nlet rec pre_of_re (S : Alpha) (e : re S) on e : pitem S ≝
- match e with
- [ z ⇒ pz ?
- | e ⇒ pe ?
- | s x ⇒ ps ? x
- | c e1 e2 ⇒ pc ? (pre_of_re ? e1) (pre_of_re ? e2)
- | o e1 e2 ⇒ po ? (pre_of_re ? e1) (pre_of_re ? e2)
- | k e1 ⇒ pk ? (pre_of_re ? e1)].
-
-nlemma notFalse : ¬False. @; //; nqed.
-
-nlemma dot0 : ∀S.∀A:word S → Prop. {} · A = {}.
-#S A; nnormalize; napply extP; #w; @; ##[##2: *]
-*; #w1; *; #w2; *; *; //; nqed.
-
-nlemma Lp_pre_of_re : ∀S.∀e:re S. 𝐋\p (pre_of_re ? e) = {}.
-#S e; nelim e; ##[##1,2,3: //]
-##[ #e1 e2 H1 H2; nchange in match (𝐋\p (pre_of_re S (e1 e2))) with (?∪?);
- nrewrite > H1; nrewrite > H2; nrewrite > (dot0…); nrewrite > (cupID…);//
-##| #e1 e2 H1 H2; nchange in match (𝐋\p (pre_of_re S (e1+e2))) with (?∪?);
- nrewrite > H1; nrewrite > H2; nrewrite > (cupID…); //
-##| #e1 H1; nchange in match (𝐋\p (pre_of_re S (e1^* ))) with (𝐋\p (pre_of_re ??) · ?);
- nrewrite > H1; napply dot0; ##]
-nqed.
-
-nlemma erase_pre_of_reK : ∀S.∀e. 𝐋 |pre_of_re S e| = 𝐋 e.
-#S A; nelim A; //;
-##[ #e1 e2 H1 H2; nchange in match (𝐋 (e1 · e2)) with (𝐋 e1·?);
- nrewrite < H1; nrewrite < H2; //
-##| #e1 e2 H1 H2; nchange in match (𝐋 (e1 + e2)) with (𝐋 e1 ∪ ?);
- nrewrite < H1; nrewrite < H2; //
-##| #e1 H1; nchange in match (𝐋 (e1^* )) with ((𝐋 e1)^* );
- nrewrite < H1; //]
-nqed.
-
-(* corollary 17 *)
-nlemma L_Lp_bull : ∀S.∀e:re S.𝐋 e = 𝐋\p (•pre_of_re ? e).
-#S e; nrewrite > (bull_cup…); nrewrite > (Lp_pre_of_re…);
-nrewrite > (cupC…); nrewrite > (cup0…); nrewrite > (erase_pre_of_reK…); //;
-nqed.
-
-nlemma Pext : ∀S.∀f,g:word S → Prop. f = g → ∀w.f w → g w.
-#S f g H; nrewrite > H; //; nqed.
-
-(* corollary 18 *)
-ntheorem bull_true_epsilon : ∀S.∀e:pitem S. \snd (•e) = true ↔ [ ] ∈ |e|.
-#S e; @;
-##[ #defsnde; nlapply (bull_cup ? e); nchange in match (𝐋\p (•e)) with (?∪?);
- nrewrite > defsnde; #H;
- nlapply (Pext ??? H [ ] ?); ##[ @2; //] *; //;
-
-STOP
-
-notation > "\move term 90 x term 90 E"
-non associative with precedence 60 for @{move ? $x $E}.
-nlet rec move (S: Alpha) (x:S) (E: pitem S) on E : pre S ≝
- match E with
- [ pz ⇒ 〈 ∅, false 〉
- | pe ⇒ 〈 ϵ, false 〉
- | ps y ⇒ 〈 `y, false 〉
- | pp y ⇒ 〈 `y, x == y 〉
- | po e1 e2 ⇒ \move x e1 ⊕ \move x e2
- | pc e1 e2 ⇒ \move x e1 ⊙ \move x e2
- | pk e ⇒ (\move x e)^⊛ ].
-notation < "\move\shy x\shy E" non associative with precedence 60 for @{'move $x $E}.
-notation > "\move term 90 x term 90 E" non associative with precedence 60 for @{'move $x $E}.
-interpretation "move" 'move x E = (move ? x E).
-
-ndefinition rmove ≝ λS:Alpha.λx:S.λe:pre S. \move x (\fst e).
-interpretation "rmove" 'move x E = (rmove ? x E).
-
-nlemma XXz : ∀S:Alpha.∀w:word S. w ∈ ∅ → False.
-#S w abs; ninversion abs; #; ndestruct;
-nqed.
-
-
-nlemma XXe : ∀S:Alpha.∀w:word S. w .∈ ϵ → False.
-#S w abs; ninversion abs; #; ndestruct;
-nqed.
-
-nlemma XXze : ∀S:Alpha.∀w:word S. w .∈ (∅ · ϵ) → False.
-#S w abs; ninversion abs; #; ndestruct; /2/ by XXz,XXe;
-nqed.
-
-
-naxiom in_move_cat:
- ∀S.∀w:word S.∀x.∀E1,E2:pitem S. w .∈ \move x (E1 · E2) →
- (∃w1.∃w2. w = w1@w2 ∧ w1 .∈ \move x E1 ∧ w2 ∈ .|E2|) ∨ w .∈ \move x E2.
-#S w x e1 e2 H; nchange in H with (w .∈ \move x e1 ⊙ \move x e2);
-ncases e1 in H; ncases e2;
-##[##1: *; ##[*; nnormalize; #; ndestruct]
- #H; ninversion H; ##[##1,4,5,6: nnormalize; #; ndestruct]
- nnormalize; #; ndestruct; ncases (?:False); /2/ by XXz,XXze;
-##|##2: *; ##[*; nnormalize; #; ndestruct]
- #H; ninversion H; ##[##1,4,5,6: nnormalize; #; ndestruct]
- nnormalize; #; ndestruct; ncases (?:False); /2/ by XXz,XXze;
-##| #r; *; ##[ *; nnormalize; #; ndestruct]
- #H; ninversion H; ##[##1,4,5,6: nnormalize; #; ndestruct]
- ##[##2: nnormalize; #; ndestruct; @2; @2; //.##]
- nnormalize; #; ndestruct; ncases (?:False); /2/ by XXz;
-##| #y; *; ##[ *; nnormalize; #defw defx; ndestruct; @2; @1; /2/ by conj;##]
- #H; ninversion H; nnormalize; #; ndestruct;
- ##[ncases (?:False); /2/ by XXz] /3/ by or_intror;
-##| #r1 r2; *; ##[ *; #defw]
- ...
-nqed.
-
-ntheorem move_ok:
- ∀S:Alpha.∀E:pre S.∀a,w.w .∈ \move a E ↔ (a :: w) .∈ E.
-#S E; ncases E; #r b; nelim r;
-##[##1,2: #a w; @;
- ##[##1,3: nnormalize; *; ##[##1,3: *; #; ndestruct; ##| #abs; ncases (XXz … abs); ##]
- #H; ninversion H; #; ndestruct;
- ##|##*:nnormalize; *; ##[##1,3: *; #; ndestruct; ##| #H1; ncases (XXz … H1); ##]
- #H; ninversion H; #; ndestruct;##]
-##|#a c w; @; nnormalize; ##[*; ##[*; #; ndestruct; ##] #abs; ninversion abs; #; ndestruct;##]
- *; ##[##2: #abs; ninversion abs; #; ndestruct; ##] *; #; ndestruct;
-##|#a c w; @; nnormalize;
- ##[ *; ##[ *; #defw; nrewrite > defw; #ca; @2; nrewrite > (eqb_t … ca); @; ##]
- #H; ninversion H; #; ndestruct;
- ##| *; ##[ *; #; ndestruct; ##] #H; ninversion H; ##[##2,3,4,5,6: #; ndestruct]
- #d defw defa; ndestruct; @1; @; //; nrewrite > (eqb_true S d d); //. ##]
-##|#r1 r2 H1 H2 a w; @;
- ##[ #H; ncases (in_move_cat … H);
- ##[ *; #w1; *; #w2; *; *; #defw w1m w2m;
- ncases (H1 a w1); #H1w1; #_; nlapply (H1w1 w1m); #good;
- nrewrite > defw; @2; @2 (a::w1); //; ncases good; ##[ *; #; ndestruct] //.
- ##|
- ...
-##|
-##|
-##]
-nqed.
-
-
-notation > "x ↦* E" non associative with precedence 60 for @{move_star ? $x $E}.
-nlet rec move_star (S : decidable) w E on w : bool × (pre S) ≝
- match w with
- [ nil ⇒ E
- | cons x w' ⇒ w' ↦* (x ↦ \snd E)].
-
-ndefinition in_moves ≝ λS:decidable.λw.λE:bool × (pre S). \fst(w ↦* E).
-
-ncoinductive equiv (S:decidable) : bool × (pre S) → bool × (pre S) → Prop ≝
- mk_equiv:
- ∀E1,E2: bool × (pre S).
- \fst E1 = \fst E2 →
- (∀x. equiv S (x ↦ \snd E1) (x ↦ \snd E2)) →
- equiv S E1 E2.
-
-ndefinition NAT: decidable.
- @ nat eqb; /2/.
-nqed.
-
-include "hints_declaration.ma".
-
-alias symbol "hint_decl" (instance 1) = "hint_decl_Type1".
-unification hint 0 ≔ ; X ≟ NAT ⊢ carr X ≡ nat.
-
-ninductive unit: Type[0] ≝ I: unit.
-
-nlet corec foo_nop (b: bool):
- equiv ?
- 〈 b, pc ? (ps ? 0) (pk ? (pc ? (ps ? 1) (ps ? 0))) 〉
- 〈 b, pc ? (pk ? (pc ? (ps ? 0) (ps ? 1))) (ps ? 0) 〉 ≝ ?.
- @; //; #x; ncases x
- [ nnormalize in ⊢ (??%%); napply (foo_nop false)
- | #y; ncases y
- [ nnormalize in ⊢ (??%%); napply (foo_nop false)
- | #w; nnormalize in ⊢ (??%%); napply (foo_nop false) ]##]
-nqed.
-
-(*
-nlet corec foo (a: unit):
- equiv NAT
- (eclose NAT (pc ? (ps ? 0) (pk ? (pc ? (ps ? 1) (ps ? 0)))))
- (eclose NAT (pc ? (pk ? (pc ? (ps ? 0) (ps ? 1))) (ps ? 0)))
-≝ ?.
- @;
- ##[ nnormalize; //
- ##| #x; ncases x
- [ nnormalize in ⊢ (??%%);
- nnormalize in foo: (? → ??%%);
- @; //; #y; ncases y
- [ nnormalize in ⊢ (??%%); napply foo_nop
- | #y; ncases y
- [ nnormalize in ⊢ (??%%);
-
- ##| #z; nnormalize in ⊢ (??%%); napply foo_nop ]##]
- ##| #y; nnormalize in ⊢ (??%%); napply foo_nop
- ##]
-nqed.
-*)
-
-ndefinition test1 : pre ? ≝ ❨ `0 | `1 ❩^* `0.
-ndefinition test2 : pre ? ≝ ❨ (`0`1)^* `0 | (`0`1)^* `1 ❩.
-ndefinition test3 : pre ? ≝ (`0 (`0`1)^* `1)^*.
-
-
-nlemma foo: in_moves ? [0;0;1;0;1;1] (ɛ test3) = true.
- nnormalize in match test3;
- nnormalize;
-//;
-nqed.
-
-(**********************************************************)
-
-ninductive der (S: Type[0]) (a: S) : re S → re S → CProp[0] ≝
- der_z: der S a (z S) (z S)
- | der_e: der S a (e S) (z S)
- | der_s1: der S a (s S a) (e ?)
- | der_s2: ∀b. a ≠ b → der S a (s S b) (z S)
- | der_c1: ∀e1,e2,e1',e2'. in_l S [] e1 → der S a e1 e1' → der S a e2 e2' →
- der S a (c ? e1 e2) (o ? (c ? e1' e2) e2')
- | der_c2: ∀e1,e2,e1'. Not (in_l S [] e1) → der S a e1 e1' →
- der S a (c ? e1 e2) (c ? e1' e2)
- | der_o: ∀e1,e2,e1',e2'. der S a e1 e1' → der S a e2 e2' →
- der S a (o ? e1 e2) (o ? e1' e2').
-
-nlemma eq_rect_CProp0_r:
- ∀A.∀a,x.∀p:eq ? x a.∀P: ∀x:A. eq ? x a → CProp[0]. P a (refl A a) → P x p.
- #A; #a; #x; #p; ncases p; #P; #H; nassumption.
-nqed.
-
-nlemma append1: ∀A.∀a:A.∀l. [a] @ l = a::l. //. nqed.
-
-naxiom in_l1: ∀S,r1,r2,w. in_l S [ ] r1 → in_l S w r2 → in_l S w (c S r1 r2).
-(* #S; #r1; #r2; #w; nelim r1
- [ #K; ninversion K
- | #H1; #H2; napply (in_c ? []); //
- | (* tutti casi assurdi *) *)
-
-ninductive in_l' (S: Type[0]) : word S → re S → CProp[0] ≝
- in_l_empty1: ∀E.in_l S [] E → in_l' S [] E
- | in_l_cons: ∀a,w,e,e'. in_l' S w e' → der S a e e' → in_l' S (a::w) e.
-
-ncoinductive eq_re (S: Type[0]) : re S → re S → CProp[0] ≝
- mk_eq_re: ∀E1,E2.
- (in_l S [] E1 → in_l S [] E2) →
- (in_l S [] E2 → in_l S [] E1) →
- (∀a,E1',E2'. der S a E1 E1' → der S a E2 E2' → eq_re S E1' E2') →
- eq_re S E1 E2.
-
-(* serve il lemma dopo? *)
-ntheorem eq_re_is_eq: ∀S.∀E1,E2. eq_re S E1 E2 → ∀w. in_l ? w E1 → in_l ? w E2.
- #S; #E1; #E2; #H1; #w; #H2; nelim H2 in E2 H1 ⊢ %
- [ #r; #K (* ok *)
- | #a; #w; #R1; #R2; #K1; #K2; #K3; #R3; #K4; @2 R2; //; ncases K4;
-
-(* IL VICEVERSA NON VALE *)
-naxiom in_l_to_in_l: ∀S,w,E. in_l' S w E → in_l S w E.
-(* #S; #w; #E; #H; nelim H
- [ //
- | #a; #w'; #r; #r'; #H1; (* e si cade qua sotto! *)
- ]
-nqed. *)
-
-ntheorem der1: ∀S,a,e,e',w. der S a e e' → in_l S w e' → in_l S (a::w) e.
- #S; #a; #E; #E'; #w; #H; nelim H
- [##1,2: #H1; ninversion H1
- [##1,8: #_; #K; (* non va ndestruct K; *) ncases (?:False); (* perche' due goal?*) /2/
- |##2,9: #X; #Y; #K; ncases (?:False); /2/
- |##3,10: #x; #y; #z; #w; #a; #b; #c; #d; #e; #K; ncases (?:False); /2/
- |##4,11: #x; #y; #z; #w; #a; #b; #K; ncases (?:False); /2/
- |##5,12: #x; #y; #z; #w; #a; #b; #K; ncases (?:False); /2/
- |##6,13: #x; #y; #K; ncases (?:False); /2/
- |##7,14: #x; #y; #z; #w; #a; #b; #c; #d; #K; ncases (?:False); /2/]
-##| #H1; ninversion H1
- [ //
- | #X; #Y; #K; ncases (?:False); /2/
- | #x; #y; #z; #w; #a; #b; #c; #d; #e; #K; ncases (?:False); /2/
- | #x; #y; #z; #w; #a; #b; #K; ncases (?:False); /2/
- | #x; #y; #z; #w; #a; #b; #K; ncases (?:False); /2/
- | #x; #y; #K; ncases (?:False); /2/
- | #x; #y; #z; #w; #a; #b; #c; #d; #K; ncases (?:False); /2/ ]
-##| #H1; #H2; #H3; ninversion H3
- [ #_; #K; ncases (?:False); /2/
- | #X; #Y; #K; ncases (?:False); /2/
- | #x; #y; #z; #w; #a; #b; #c; #d; #e; #K; ncases (?:False); /2/
- | #x; #y; #z; #w; #a; #b; #K; ncases (?:False); /2/
- | #x; #y; #z; #w; #a; #b; #K; ncases (?:False); /2/
- | #x; #y; #K; ncases (?:False); /2/
- | #x; #y; #z; #w; #a; #b; #c; #d; #K; ncases (?:False); /2/ ]
-##| #r1; #r2; #r1'; #r2'; #H1; #H2; #H3; #H4; #H5; #H6;
-
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-
-include "sets/sets.ma".
-
-nrecord category : Type[2] ≝
- { objs:> Type[1];
- arrows: objs → objs → setoid;
- id: ∀o:objs. arrows o o;
- comp: ∀o1,o2,o3. unary_morphism (arrows o2 o3) (unary_morph_setoid (arrows o1 o2) (arrows o1 o3));
- comp_assoc: ∀o1,o2,o3,o4. ∀a34,a23,a12.
- comp o1 o3 o4 a34 (comp o1 o2 o3 a23 a12) = comp o1 o2 o4 (comp o2 o3 o4 a34 a23) a12;
- id_neutral_left: ∀o1,o2. ∀a: arrows o1 o2. comp ??? (id o2) a = a;
- id_neutral_right: ∀o1,o2. ∀a: arrows o1 o2. comp ??? a (id o1) = a
- }.
-
-notation > "𝐈𝐝 term 90 A" non associative with precedence 90 for @{ 'id $A }.
-notation < "mpadded width -90% (𝐈) 𝐝 \sub term 90 A" non associative with precedence 90 for @{ 'id $A }.
-
-interpretation "id" 'id A = (id ? A).
-
-ndefinition SETOID : category.
-@;
-##[ napply setoid;
-##| napply unary_morph_setoid;
-##| #o; @ (λx.x); #a; #b; #H; napply H;
-##| napply comp_binary_morphisms; (*CSC: why not ∘?*)
-##| #o1; #o2; #o3; #o4; #f; #g; #h; #x; #x'; #Hx; nnormalize; napply (†(†(†Hx)))
-##|##6,7: #o1; #o2; #f; #x; #x'; #Hx; nnormalize; napply (†Hx) ]
-nqed.
-
-unification hint 0 ≔ ;
- R ≟ (mk_category setoid unary_morph_setoid (id SETOID) (comp SETOID)
- (comp_assoc SETOID) (id_neutral_left SETOID)
- (id_neutral_right SETOID))
- (* -------------------------------------------------------------------- *) ⊢
- objs R ≡ setoid.
-
- unification hint 0 ≔ x,y ;
- R ≟ (mk_category setoid unary_morph_setoid (id SETOID) (comp SETOID)
- (comp_assoc SETOID) (id_neutral_left SETOID)
- (id_neutral_right SETOID))
- (* -------------------------------------------------------------------- *) ⊢
- arrows R x y ≡ unary_morph_setoid x y.
-
-unification hint 0 ≔ A,B ;
- T ≟ (unary_morph_setoid A B)
- (* ----------------------------------- *) ⊢
- unary_morphism A B ≡ carr T.
-
-
-ndefinition TYPE : setoid1.
-@ setoid; @;
-##[ #T1; #T2;
- alias symbol "eq" = "setoid eq".
- napply (∃f:T1 ⇒_0 T2.∃g:T2 ⇒_0 T1. (∀x.f (g x) = x) ∧ (∀y.g (f y) = y));
-##| #A; @ (𝐈𝐝 A); @ (𝐈𝐝 A); @; #x; napply #;
-##| #A; #B; *; #f; *; #g; *; #Hfg; #Hgf; @g; @f; @; nassumption;
-##| #A; #B; #C; *; #f; *; #f'; *; #Hf; #Hf'; *; #g; *; #g'; *; #Hg; #Hg';
- @; ##[ @(λx.g (f x)); #a; #b; #H; napply (.= (††H)); napply #;
- ##| @; ##[ @(λx.f'(g' x)); #a; #b; #H; napply (.= (††H)); napply #; ##]
- @; #x;
- ##[ napply (.= (†(Hf …))); napply Hg;
- ##| napply (.= (†(Hg' …))); napply Hf'; ##] ##]
-nqed.
-
-unification hint 0 ≔ ;
- R ≟ (mk_setoid1 setoid (eq1 TYPE))
- (* -------------------------------------------- *) ⊢
- carr1 R ≡ setoid.
-
-nrecord unary_morphism01 (A : setoid) (B: setoid1) : Type[1] ≝
- { fun01:1> A → B;
- prop01: ∀a,a'. eq0 ? a a' → eq1 ? (fun01 a) (fun01 a')
- }.
-
-interpretation "prop01" 'prop1 c = (prop01 ????? c).
+++ /dev/null
-
-include "sets/sets.ma".
-include "sets/setoids2.ma".
-include "sets/categories.ma".
-
-(*
-ndefinition binary_morph_setoid : setoid → setoid → setoid → setoid.
-#S1; #S2; #T; @ (binary_morphism S1 S2 T); @;
-##[ #f; #g; napply (∀x,y. f x y = g x y);
-##| #f; #x; #y; napply #;
-##| #f; #g; #H; #x; #y; napply ((H x y)^-1);
-##| #f; #g; #h; #H1; #H2; #x; #y; napply (trans … (H1 …) (H2 …)); ##]
-nqed.
-
-ndefinition unary_morph_setoid : setoid → setoid → setoid.
-#S1; #S2; @ (unary_morphism S1 S2); @;
-##[ #f; #g; napply (∀x. f x = g x);
-##| #f; #x; napply #;
-##| #f; #g; #H; #x; napply ((H x)^-1);
-##| #f; #g; #h; #H1; #H2; #x; napply (trans … (H1 …) (H2 …)); ##]
-nqed.
-
-nrecord category : Type[2] ≝
- { objs:> Type[1];
- arrows: objs → objs → setoid;
- id: ∀o:objs. arrows o o;
- comp: ∀o1,o2,o3. binary_morphism (arrows o1 o2) (arrows o2 o3) (arrows o1 o3);
- comp_assoc: ∀o1,o2,o3,o4. ∀a12,a23,a34.
- comp o1 o3 o4 (comp o1 o2 o3 a12 a23) a34 = comp o1 o2 o4 a12 (comp o2 o3 o4 a23 a34);
- id_neutral_left: ∀o1,o2. ∀a: arrows o1 o2. comp ??? (id o1) a = a;
- id_neutral_right: ∀o1,o2. ∀a: arrows o1 o2. comp ??? a (id o2) = a
- }.
-*)
-
-notation "hvbox(A break ⇒ B)" right associative with precedence 50 for @{ 'arrows $A $B }.
-interpretation "arrows1" 'arrows A B = (unary_morphism1 A B).
-interpretation "arrows" 'arrows A B = (unary_morphism A B).
-
-(*
-notation > "𝐈𝐝 term 90 A" non associative with precedence 90 for @{ 'id $A }.
-notation < "mpadded width -90% (𝐈) 𝐝 \sub term 90 A" non associative with precedence 90 for @{ 'id $A }.
-
-interpretation "id" 'id A = (id ? A).
-
-ndefinition SETOID : category.
-@;
-##[ napply setoid;
-##| napply unary_morph_setoid;
-##| #o; @ (λx.x); #a; #b; #H; napply H;
-##| #o1; #o2; #o3; @;
- ##[ #f; #g; @(λx.g (f x)); #a; #b; #H; napply (.= (††H)); napply #;
- ##| #f; #g; #f'; #g'; #H1; #H2; nwhd; #x; napply (.= (H2 (f x)));
- napply (.= (†(H1 x))); napply #; ##]
-##| #o1; #o2; #o3; #o4; #f; #g; #h; nwhd; #x; napply #;
-##|##6,7: #o1; #o2; #f; nwhd; #x; napply #; ##]
-nqed.
-
-unification hint 0 ≔ ;
- R ≟ (mk_category setoid unary_morph_setoid (id SETOID) (comp SETOID)
- (comp_assoc SETOID) (id_neutral_left SETOID)
- (id_neutral_right SETOID))
- (* -------------------------------------------------------------------- *) ⊢
- objs R ≡ setoid.
-
- unification hint 0 ≔ x,y ;
- R ≟ (mk_category setoid unary_morph_setoid (id SETOID) (comp SETOID)
- (comp_assoc SETOID) (id_neutral_left SETOID)
- (id_neutral_right SETOID))
- (* -------------------------------------------------------------------- *) ⊢
- arrows R x y ≡ unary_morph_setoid x y.
-
-unification hint 0 ≔ A,B ;
- T ≟ (unary_morph_setoid A B)
- (* ----------------------------------- *) ⊢
- unary_morphism A B ≡ carr T.
-
-
-ndefinition TYPE : setoid1.
-@ setoid; @;
-##[ #T1; #T2;
- alias symbol "eq" = "setoid eq".
- napply (∃f:T1 ⇒ T2.∃g:T2 ⇒ T1. (∀x.f (g x) = x) ∧ (∀y.g (f y) = y));
-##| #A; @ (𝐈𝐝 A); @ (𝐈𝐝 A); @; #x; napply #;
-##| #A; #B; *; #f; *; #g; *; #Hfg; #Hgf; @g; @f; @; nassumption;
-##| #A; #B; #C; *; #f; *; #f'; *; #Hf; #Hf'; *; #g; *; #g'; *; #Hg; #Hg';
- @; ##[ @(λx.g (f x)); #a; #b; #H; napply (.= (††H)); napply #;
- ##| @; ##[ @(λx.f'(g' x)); #a; #b; #H; napply (.= (††H)); napply #; ##]
- @; #x;
- ##[ napply (.= (†(Hf …))); napply Hg;
- ##| napply (.= (†(Hg' …))); napply Hf'; ##] ##]
-nqed.
-
-unification hint 0 ≔ ;
- R ≟ (mk_setoid1 setoid (eq1 TYPE))
- (* -------------------------------------------- *) ⊢
- carr1 R ≡ setoid.
-
-nrecord unary_morphism01 (A : setoid) (B: setoid1) : Type[1] ≝
- { fun01:1> A → B;
- prop01: ∀a,a'. eq ? a a' → eq1 ? (fun01 a) (fun01 a')
- }.
-
-interpretation "prop01" 'prop1 c = (prop01 ????? c).
-*)
fst … p ≤ n ∧ snd … p < s (fst … p).
#n; #s; nelim n
[ #m; nwhd in ⊢ (??% → let p ≝ % in ?); nwhd in ⊢ (??(??%) → ?);
- nrewrite > (plus_n_O (s O)); #H; nrewrite > (ltb_t … H); nnormalize; @; /2/
+ nrewrite > (plus_n_O (s O)); #H; nrewrite > (ltb_t … H); nnormalize; @
+ [ @ [ napply refl | napply le_n ] ##| nassumption ]
##| #n'; #Hrec; #m; nwhd in ⊢ (??% → let p ≝ % in ?); #H;
ncases (ltb_cases m (s (S n'))); *; #H1; #H2; nrewrite > H2;
nwhd in ⊢ (let p ≝ % in ?); nwhd
- [ napply conj [napply conj; //;
- nwhd in ⊢ (???(?(?%(λ_.λ_:(??%).?))%)); nrewrite > (minus_canc n'); //
- ##| nnormalize; // ]
-##| nchange in H with (m < s (S n') + big_plus (S n') (λi.λ_.s i));
- nlapply (Hrec (m - s (S n')) ?); /2/; *; *; #Hrec1; #Hrec2; #Hrec3; @; //; @; /2/;
- nrewrite > (split_big_plus …); ##[##2:napply ad_hoc11;##|##3:##skip]
- nrewrite > (ad_hoc12 …); //;
- nwhd in ⊢ (???(?(??%)?));
- nrewrite > (ad_hoc13 …); //;
- napply ad_hoc14; /2/;
- nwhd in ⊢ (???(?(??%)?));
- nrewrite > (plus_n_O …); // ##]##]
+ [ napply conj [napply conj
+ [ nwhd in ⊢ (???(?(?%(λ_.λ_:(??%).?))%)); nrewrite > (minus_canc n'); napply refl
+ | nnormalize; napply le_n]
+ ##| nnormalize; nassumption ]
+ ##| nchange in H with (m < s (S n') + big_plus (S n') (λi.λ_.s i));
+ nlapply (Hrec (m - s (S n')) ?)
+ [ napply ad_hoc9; nassumption] *; *; #Hrec1; #Hrec2; #Hrec3; @
+ [##2: nassumption
+ |@
+ [nrewrite > (split_big_plus …); ##[##2:napply ad_hoc11;##|##3:##skip]
+ nrewrite > (ad_hoc12 …); ##[##2: nassumption]
+ nwhd in ⊢ (???(?(??%)?));
+ nrewrite > (ad_hoc13 …);##[##2: nassumption]
+ napply ad_hoc14 [ napply not_lt_to_le; nassumption ]
+ nwhd in ⊢ (???(?(??%)?));
+ nrewrite > (plus_n_O …);
+ nassumption;
+ ##| napply le_S; nassumption ]##]##]##]
nqed.
ntheorem iso_nat_nat_union_pre:
∀n:nat. ∀s: nat → nat.
∀i1,i2. i1 ≤ n → i2 < s i1 →
big_plus (n - i1) (λi.λ_.s (S (i + i1))) + i2 < big_plus (S n) (λi.λ_.s i).
-/2/. nqed.
+ #n; #s; #i1; #i2; #H1; #H2;
+ nrewrite > (split_big_plus (S n) (S i1) (λi.λ_.s i) ?)
+ [##2: napply le_to_le_S_S; nassumption]
+ napply ad_hoc15
+ [ nwhd in ⊢ (???(?%?));
+ napply big_plus_preserves_ext; #i; #_;
+ nrewrite > (plus_n_S i i1); napply refl
+ | nrewrite > (split_big_plus (S i1) i1 (λi.λ_.s i) ?) [##2: napply le_S; napply le_n]
+ napply ad_hoc16; nrewrite > (minus_S i1); nnormalize; nrewrite > (plus_n_O (s i1) …);
+ nassumption ]
+nqed.
ntheorem iso_nat_nat_union_uniq:
∀n:nat. ∀s: nat → nat.
nlapply (Hc y I); *; #index; *; #Hi1; #Hi2;
nlapply (f_sur ???? f ? Hi1); *; #nindex; *; #Hni1; #Hni2;
nlapply (f_sur ???? (fi nindex) y ?)
- [ alias symbol "refl" (instance 3) = "refl".
-alias symbol "prop2" (instance 2) = "prop21".
-alias symbol "prop1" (instance 4) = "prop11".
+ [ alias symbol "refl" = "refl".
+alias symbol "prop1" = "prop11".
+alias symbol "prop2" = "prop21 mem".
napply (. #‡(†?));##[##2: napply Hni2 |##1: ##skip | nassumption]##]
*; #nindex2; *; #Hni21; #Hni22;
nletin xxx ≝ (plus (big_plus (minus n nindex) (λi.λ_.s (S (plus i nindex)))) nindex2);
*; *; #K1; #K2; #K3;
nlapply
(iso_nat_nat_union_uniq n s nindex (fst … (iso_nat_nat_union s xxx n))
- nindex2 (snd … (iso_nat_nat_union s xxx n)) ?????); /2/
- [##2: *; #E1; #E2; nrewrite > E1; nrewrite > E2; //
- | nassumption ]##]
+ nindex2 (snd … (iso_nat_nat_union s xxx n)) ?????)
+ [##6: *; #E1; #E2; nrewrite > E1; nrewrite > E2; napply refl
+ |##5: napply le_S_S_to_le; nassumption
+ |##*: nassumption]##]
##| #x; #x'; nnormalize in ⊢ (? → ? → %); #Hx; #Hx'; #E;
- ncut(∀i1,i2,i1',i2'. i1 ∈ Nat_ (S n) → i1' ∈ Nat_ (S n) → i2 ∈ Nat_ (s i1) → i2' ∈ Nat_ (s i1') → eq_rel (carr A) (eq0 A) (fi i1 i2) (fi i1' i2') → i1=i1' ∧ i2=i2');
+ ncut(∀i1,i2,i1',i2'. i1 ∈ Nat_ (S n) → i1' ∈ Nat_ (S n) → i2 ∈ Nat_ (s i1) → i2' ∈ Nat_ (s i1') → eq_rel (carr A) (eq A) (fi i1 i2) (fi i1' i2') → i1=i1' ∧ i2=i2');
##[ #i1; #i2; #i1'; #i2'; #Hi1; #Hi1'; #Hi2; #Hi2'; #E;
nlapply(disjoint … P (f i1) (f i1') ???)
- [##2,3: napply f_closed; //
+ [##2,3: napply f_closed; nassumption
|##1: @ (fi i1 i2); @;
- ##[ napply f_closed; // ##| alias symbol "refl" = "refl1".
+ ##[ napply f_closed; nassumption ##| alias symbol "refl" = "refl1".
napply (. E‡#);
- nwhd; napply f_closed; //]##]
- #E'; ncut(i1 = i1'); ##[ napply (f_inj … E'); // ##]
- #E''; nrewrite < E''; @; //;
- nrewrite < E'' in E; #E'''; napply (f_inj … E'''); //;
- nrewrite > E''; // ]##]
+ nwhd; napply f_closed; nassumption]##]
+ #E'; ncut(i1 = i1'); ##[ napply (f_inj … E'); nassumption; ##]
+ #E''; nrewrite < E''; @;
+ ##[ @;
+ ##| nrewrite < E'' in E; #E'''; napply (f_inj … E''')
+ [ nassumption | nrewrite > E''; nassumption ]##]##]
##] #K;
nelim (iso_nat_nat_union_char n s x Hx); *; #i1x; #i2x; #i3x;
nelim (iso_nat_nat_union_char n s x' Hx'); *; #i1x'; #i2x'; #i3x';
*; #K1; #K2;
napply (eq_rect_CProp0_r ?? (λX.λ_.? = X) ?? i1x');
napply (eq_rect_CProp0_r ?? (λX.λ_.X = ?) ?? i1x);
- nrewrite > K1; nrewrite > K2; napply refl.
+ nrewrite > K1; nrewrite > K2; napply refl ]
nqed.
(************** equivalence relations vs partitions **********************)
| napply Full_set
| napply mk_unary_morphism1
[ #a; napply mk_ext_powerclass
- [ napply {x | rel ? R x a}
+ [ napply {x | R x a}
| #x; #x'; #H; nnormalize; napply mk_iff; #K; nelim daemon]
##| #a; #a'; #H; napply conj; #x; nnormalize; #K [ nelim daemon | nelim daemon]##]
-##| #x; #_; nnormalize; /3/
- | #x; #x'; #_; #_; nnormalize; *; #x''; *; /3/
- | nnormalize; napply conj; /4/ ]
-nqed.
\ No newline at end of file
+##| #x; #_; nnormalize; napply (ex_intro … x); napply conj; napply refl
+ | #x; #x'; #_; #_; nnormalize; *; #x''; *; #H1; #H2; napply (trans ?????? H2);
+ napply sym; nassumption
+ | nnormalize; napply conj
+ [ #a; #_; napply I | #a; #_; napply (ex_intro … a); napply conj [ napply I | napply refl]##]
+nqed.
include "logic/connectives.ma".
include "properties/relations.ma".
-include "hints_declaration.ma".
-nrecord setoid : Type[1] ≝ {
- carr:> Type[0];
- eq0: equivalence_relation carr
-}.
+(*
+notation "hvbox(a break = \sub \ID b)" non associative with precedence 45
+for @{ 'eqID $a $b }.
-(* activate non uniform coercions on: Type → setoid *)
-unification hint 0 ≔ R : setoid;
- MR ≟ carr R,
- lock ≟ mk_lock1 Type[0] MR setoid R
-(* ---------------------------------------- *) ⊢
- setoid ≡ force1 ? MR lock.
+notation > "hvbox(a break =_\ID b)" non associative with precedence 45
+for @{ cic:/matita/logic/equality/eq.ind#xpointer(1/1) ? $a $b }.
-notation < "[\setoid\ensp\of term 19 x]" non associative with precedence 90 for @{'mk_setoid $x}.
-interpretation "mk_setoid" 'mk_setoid x = (mk_setoid x ?).
+interpretation "ID eq" 'eqID x y = (cic:/matita/logic/equality/eq.ind#xpointer(1/1) ? x y).
+*)
-interpretation "setoid eq" 'eq t x y = (eq_rel ? (eq0 t) x y).
-(* single = is for the abstract equality of setoids, == is for concrete
- equalities (that may be lifted to the setoid level when needed *)
-notation < "hvbox(a break mpadded width -50% (=)= b)" non associative with precedence 45 for @{ 'eq_low $a $b }.
-notation > "a == b" non associative with precedence 45 for @{ 'eq_low $a $b }.
+nrecord setoid : Type[1] ≝
+ { carr:> Type[0];
+ eq: equivalence_relation carr
+ }.
+
+interpretation "setoid eq" 'eq t x y = (eq_rel ? (eq t) x y).
notation > "hvbox(a break =_0 b)" non associative with precedence 45
-for @{ eq_rel ? (eq0 ?) $a $b }.
+for @{ eq_rel ? (eq ?) $a $b }.
interpretation "setoid symmetry" 'invert r = (sym ???? r).
notation ".= r" with precedence 50 for @{'trans $r}.
interpretation "trans" 'trans r = (trans ????? r).
-notation > ".=_0 r" with precedence 50 for @{'trans_x0 $r}.
-interpretation "trans_x0" 'trans_x0 r = (trans ????? r).
-nrecord unary_morphism (A,B: setoid) : Type[0] ≝ {
- fun1:1> A → B;
- prop1: ∀a,a'. a = a' → fun1 a = fun1 a'
-}.
+nrecord unary_morphism (A,B: setoid) : Type[0] ≝
+ { fun1:1> A → B;
+ prop1: ∀a,a'. eq ? a a' → eq ? (fun1 a) (fun1 a')
+ }.
-notation > "B ⇒_0 C" right associative with precedence 72 for @{'umorph0 $B $C}.
-notation "hvbox(B break ⇒\sub 0 C)" right associative with precedence 72 for @{'umorph0 $B $C}.
-interpretation "unary morphism 0" 'umorph0 A B = (unary_morphism A B).
+nrecord binary_morphism (A,B,C:setoid) : Type[0] ≝
+ { fun2:2> A → B → C;
+ prop2: ∀a,a',b,b'. eq ? a a' → eq ? b b' → eq ? (fun2 a b) (fun2 a' b')
+ }.
notation "† c" with precedence 90 for @{'prop1 $c }.
notation "l ‡ r" with precedence 90 for @{'prop2 $l $r }.
notation "#" with precedence 90 for @{'refl}.
interpretation "prop1" 'prop1 c = (prop1 ????? c).
+interpretation "prop2" 'prop2 l r = (prop2 ???????? l r).
interpretation "refl" 'refl = (refl ???).
-notation "┼_0 c" with precedence 89 for @{'prop1_x0 $c }.
-notation "l ╪_0 r" with precedence 89 for @{'prop2_x0 $l $r }.
-interpretation "prop1_x0" 'prop1_x0 c = (prop1 ????? c).
-
-ndefinition unary_morph_setoid : setoid → setoid → setoid.
-#S1; #S2; @ (S1 ⇒_0 S2); @;
-##[ #f; #g; napply (∀x,x'. x=x' → f x = g x');
-##| #f; #x; #x'; #Hx; napply (.= †Hx); napply #;
-##| #f; #g; #H; #x; #x'; #Hx; napply ((H … Hx^-1)^-1);
-##| #f; #g; #h; #H1; #H2; #x; #x'; #Hx; napply (trans … (H1 …) (H2 …)); //; ##]
-nqed.
-
-alias symbol "hint_decl" (instance 1) = "hint_decl_Type1".
-unification hint 0 ≔ o1,o2 ;
- X ≟ unary_morph_setoid o1 o2
- (* ----------------------------- *) ⊢
- carr X ≡ o1 ⇒_0 o2.
-
-interpretation "prop2" 'prop2 l r = (prop1 ? (unary_morph_setoid ??) ? ?? l ?? r).
-interpretation "prop2_x0" 'prop2_x0 l r = (prop1 ? (unary_morph_setoid ??) ? ?? l ?? r).
-
-nlemma unary_morph_eq: ∀A,B.∀f,g:A ⇒_0 B. (∀x. f x = g x) → f = g.
-#A B f g H x1 x2 E; napply (.= †E); napply H; nqed.
-
-nlemma mk_binary_morphism:
- ∀A,B,C: setoid. ∀f: A → B → C. (∀a,a',b,b'. a=a' → b=b' → f a b = f a' b') →
- A ⇒_0 (unary_morph_setoid B C).
- #A; #B; #C; #f; #H; @; ##[ #x; @ (f x) ] #a; #a'; #Ha [##2: napply unary_morph_eq; #y]
- /2/.
-nqed.
-
-ndefinition composition ≝
- λo1,o2,o3:Type[0].λf:o2 → o3.λg: o1 → o2.λx.f (g x).
-
-interpretation "function composition" 'compose f g = (composition ??? f g).
-
-ndefinition comp_unary_morphisms:
- ∀o1,o2,o3:setoid.o2 ⇒_0 o3 → o1 ⇒_0 o2 → o1 ⇒_0 o3.
-#o1; #o2; #o3; #f; #g; @ (f ∘ g);
- #a; #a'; #e; nnormalize; napply (.= †(†e)); napply #.
-nqed.
-
-unification hint 0 ≔ o1,o2,o3:setoid,f:o2 ⇒_0 o3,g:o1 ⇒_0 o2;
- R ≟ mk_unary_morphism o1 o3
- (composition ??? (fun1 o2 o3 f) (fun1 o1 o2 g))
- (prop1 o1 o3 (comp_unary_morphisms o1 o2 o3 f g))
- (* -------------------------------------------------------------------- *) ⊢
- fun1 o1 o3 R ≡ composition ??? (fun1 o2 o3 f) (fun1 o1 o2 g).
-
-ndefinition comp_binary_morphisms:
- ∀o1,o2,o3.(o2 ⇒_0 o3) ⇒_0 ((o1 ⇒_0 o2) ⇒_0 (o1 ⇒_0 o3)).
-#o1; #o2; #o3; napply mk_binary_morphism
- [ #f; #g; napply (comp_unary_morphisms ??? f g)
- (* CSC: why not ∘?
- GARES: because the coercion to FunClass is not triggered if there
- are no "extra" arguments. We could fix that in the refiner
- *)
- | #a; #a'; #b; #b'; #ea; #eb; #x; #x'; #Hx; nnormalize; /3/ ]
-nqed.
include "properties/relations1.ma".
include "sets/setoids.ma".
-include "hints_declaration.ma".
-nrecord setoid1: Type[2] ≝ {
- carr1:> Type[1];
- eq1: equivalence_relation1 carr1
-}.
+nrecord setoid1: Type[2] ≝
+ { carr1:> Type[1];
+ eq1: equivalence_relation1 carr1
+ }.
-unification hint 0 ≔ R : setoid1;
- MR ≟ (carr1 R),
- lock ≟ mk_lock2 Type[1] MR setoid1 R
-(* ---------------------------------------- *) ⊢
- setoid1 ≡ force2 ? MR lock.
-
-notation < "[\setoid1\ensp\of term 19 x]" non associative with precedence 90 for @{'mk_setoid1 $x}.
-interpretation "mk_setoid1" 'mk_setoid1 x = (mk_setoid1 x ?).
-
-(* da capire se mettere come coercion *)
ndefinition setoid1_of_setoid: setoid → setoid1.
- #s; @ (carr s); @ (eq0…) (refl…) (sym…) (trans…);
+ #s; napply mk_setoid1
+ [ napply (carr s)
+ | napply (mk_equivalence_relation1 s)
+ [ napply eq
+ | napply refl
+ | napply sym
+ | napply trans]##]
nqed.
-alias symbol "hint_decl" = "hint_decl_CProp2".
-alias symbol "hint_decl" (instance 1) = "hint_decl_Type2".
-unification hint 0 ≔ A,x,y;
- T ≟ carr A,
- R ≟ setoid1_of_setoid A,
- T1 ≟ carr1 R
-(*-----------------------------------------------*) ⊢
- eq_rel T (eq0 A) x y ≡ eq_rel1 T1 (eq1 R) x y.
-
-unification hint 0 ≔ A;
- R ≟ setoid1_of_setoid A
-(*-----------------------------------------------*) ⊢
- carr A ≡ carr1 R.
+(*ncoercion setoid1_of_setoid : ∀s:setoid. setoid1 ≝ setoid1_of_setoid
+ on _s: setoid to setoid1.*)
+(*prefer coercion Type_OF_setoid.*)
interpretation "setoid1 eq" 'eq t x y = (eq_rel1 ? (eq1 t) x y).
-interpretation "setoid eq" 'eq t x y = (eq_rel ? (eq0 t) x y).
+interpretation "setoid eq" 'eq t x y = (eq_rel ? (eq t) x y).
notation > "hvbox(a break =_12 b)" non associative with precedence 45
for @{ eq_rel2 (carr2 (setoid2_of_setoid1 ?)) (eq2 (setoid2_of_setoid1 ?)) $a $b }.
notation > "hvbox(a break =_0 b)" non associative with precedence 45
-for @{ eq_rel ? (eq0 ?) $a $b }.
+for @{ eq_rel ? (eq ?) $a $b }.
notation > "hvbox(a break =_1 b)" non associative with precedence 45
for @{ eq_rel1 ? (eq1 ?) $a $b }.
interpretation "setoid1 symmetry" 'invert r = (sym1 ???? r).
interpretation "setoid symmetry" 'invert r = (sym ???? r).
-notation ".=_1 r" with precedence 50 for @{'trans_x1 $r}.
+notation ".= r" with precedence 50 for @{'trans $r}.
interpretation "trans1" 'trans r = (trans1 ????? r).
interpretation "trans" 'trans r = (trans ????? r).
-interpretation "trans1_x1" 'trans_x1 r = (trans1 ????? r).
-
-nrecord unary_morphism1 (A,B: setoid1) : Type[1] ≝ {
- fun11:1> A → B;
- prop11: ∀a,a'. eq1 ? a a' → eq1 ? (fun11 a) (fun11 a')
-}.
-
-notation > "B ⇒_1 C" right associative with precedence 72 for @{'umorph1 $B $C}.
-notation "hvbox(B break ⇒\sub 1 C)" right associative with precedence 72 for @{'umorph1 $B $C}.
-interpretation "unary morphism 1" 'umorph1 A B = (unary_morphism1 A B).
-
-notation "┼_1 c" with precedence 89 for @{'prop1_x1 $c }.
-interpretation "prop11" 'prop1 c = (prop11 ????? c).
-interpretation "prop11_x1" 'prop1_x1 c = (prop11 ????? c).
-interpretation "refl1" 'refl = (refl1 ???).
-
-ndefinition unary_morphism1_setoid1: setoid1 → setoid1 → setoid1.
- #s; #s1; @ (s ⇒_1 s1); @
- [ #f; #g; napply (∀a,a':s. a=a' → f a = g a')
- | #x; #a; #a'; #Ha; napply (.= †Ha); napply refl1
- | #x; #y; #H; #a; #a'; #Ha; napply (.= †Ha); napply sym1; /2/
- | #x; #y; #z; #H1; #H2; #a; #a'; #Ha; napply (.= †Ha); napply trans1; ##[##2: napply H1 | ##skip | napply H2]//;##]
-nqed.
-unification hint 0 ≔ S, T ;
- R ≟ (unary_morphism1_setoid1 S T)
-(* --------------------------------- *) ⊢
- carr1 R ≡ unary_morphism1 S T.
-
-notation "l ╪_1 r" with precedence 89 for @{'prop2_x1 $l $r }.
-interpretation "prop21" 'prop2 l r = (prop11 ? (unary_morphism1_setoid1 ??) ? ?? l ?? r).
-interpretation "prop21_x1" 'prop2_x1 l r = (prop11 ? (unary_morphism1_setoid1 ??) ? ?? l ?? r).
+nrecord unary_morphism1 (A,B: setoid1) : Type[1] ≝
+ { fun11:1> A → B;
+ prop11: ∀a,a'. eq1 ? a a' → eq1 ? (fun11 a) (fun11 a')
+ }.
-nlemma unary_morph1_eq1: ∀A,B.∀f,g: A ⇒_1 B. (∀x. f x = g x) → f = g.
-/3/. nqed.
+nrecord binary_morphism1 (A,B,C:setoid1) : Type[1] ≝
+ { fun21:2> A → B → C;
+ prop21: ∀a,a',b,b'. eq1 ? a a' → eq1 ? b b' → eq1 ? (fun21 a b) (fun21 a' b')
+ }.
-nlemma mk_binary_morphism1:
- ∀A,B,C: setoid1. ∀f: A → B → C. (∀a,a',b,b'. a=a' → b=b' → f a b = f a' b') →
- A ⇒_1 (unary_morphism1_setoid1 B C).
- #A; #B; #C; #f; #H; @ [ #x; @ (f x) ] #a; #a'; #Ha [##2: napply unary_morph1_eq1; #y]
- /2/.
-nqed.
-
-ndefinition composition1 ≝
- λo1,o2,o3:Type[1].λf:o2 → o3.λg: o1 → o2.λx.f (g x).
-
-interpretation "function composition" 'compose f g = (composition ??? f g).
-interpretation "function composition1" 'compose f g = (composition1 ??? f g).
-
-ndefinition comp1_unary_morphisms:
- ∀o1,o2,o3:setoid1.o2 ⇒_1 o3 → o1 ⇒_1 o2 → o1 ⇒_1 o3.
-#o1; #o2; #o3; #f; #g; @ (f ∘ g);
- #a; #a'; #e; nnormalize; napply (.= †(†e)); napply #.
-nqed.
-
-unification hint 0 ≔ o1,o2,o3:setoid1,f:o2 ⇒_1 o3,g:o1 ⇒_1 o2;
- R ≟ (mk_unary_morphism1 ?? (composition1 ??? (fun11 ?? f) (fun11 ?? g))
- (prop11 ?? (comp1_unary_morphisms o1 o2 o3 f g)))
- (* -------------------------------------------------------------------- *) ⊢
- fun11 o1 o3 R ≡ composition1 ??? (fun11 ?? f) (fun11 ?? g).
-
-ndefinition comp1_binary_morphisms:
- ∀o1,o2,o3. (o2 ⇒_1 o3) ⇒_1 ((o1 ⇒_1 o2) ⇒_1 (o1 ⇒_1 o3)).
-#o1; #o2; #o3; napply mk_binary_morphism1
- [ #f; #g; napply (comp1_unary_morphisms … f g)
- | #a; #a'; #b; #b'; #ea; #eb; #x; #x'; #Hx; nnormalize; /3/ ]
-nqed.
+interpretation "prop11" 'prop1 c = (prop11 ????? c).
+interpretation "prop21" 'prop2 l r = (prop21 ???????? l r).
+interpretation "refl1" 'refl = (refl1 ???).
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "properties/relations2.ma".
-include "sets/setoids1.ma".
-
-nrecord setoid2: Type[3] ≝
- { carr2:> Type[2];
- eq2: equivalence_relation2 carr2
- }.
-
-ndefinition setoid2_of_setoid1: setoid1 → setoid2.
- #s; @ (carr1 s); @ (carr1 s) (eq1 ?)
- [ napply refl1
- | napply sym1
- | napply trans1]
-nqed.
-
-(*ncoercion setoid1_of_setoid : ∀s:setoid. setoid1 ≝ setoid1_of_setoid
- on _s: setoid to setoid1.*)
-(*prefer coercion Type_OF_setoid.*)
-
-interpretation "setoid2 eq" 'eq t x y = (eq_rel2 ? (eq2 t) x y).
-interpretation "setoid1 eq" 'eq t x y = (eq_rel1 ? (eq1 t) x y).
-interpretation "setoid eq" 'eq t x y = (eq_rel ? (eq t) x y).
-
-(*
-notation > "hvbox(a break =_12 b)" non associative with precedence 45
-for @{ eq_rel2 (carr2 (setoid2_of_setoid1 ?)) (eq2 (setoid2_of_setoid1 ?)) $a $b }.
-*)
-notation > "hvbox(a break =_0 b)" non associative with precedence 45
-for @{ eq_rel ? (eq0 ?) $a $b }.
-notation > "hvbox(a break =_1 b)" non associative with precedence 45
-for @{ eq_rel1 ? (eq1 ?) $a $b }.
-notation > "hvbox(a break =_2 b)" non associative with precedence 45
-for @{ eq_rel2 ? (eq2 ?) $a $b }.
-
-interpretation "setoid2 symmetry" 'invert r = (sym2 ???? r).
-interpretation "setoid1 symmetry" 'invert r = (sym1 ???? r).
-interpretation "setoid symmetry" 'invert r = (sym ???? r).
-notation ".= r" with precedence 50 for @{'trans $r}.
-interpretation "trans2" 'trans r = (trans2 ????? r).
-interpretation "trans1" 'trans r = (trans1 ????? r).
-interpretation "trans" 'trans r = (trans ????? r).
-
-nrecord unary_morphism2 (A,B: setoid2) : Type[2] ≝
- { fun12:1> A → B;
- prop12: ∀a,a'. eq2 ? a a' → eq2 ? (fun12 a) (fun12 a')
- }.
-
-nrecord binary_morphism2 (A,B,C:setoid2) : Type[2] ≝
- { fun22:2> A → B → C;
- prop22: ∀a,a',b,b'. eq2 ? a a' → eq2 ? b b' → eq2 ? (fun22 a b) (fun22 a' b')
- }.
-
-interpretation "prop12" 'prop1 c = (prop12 ????? c).
-interpretation "prop22" 'prop2 l r = (prop22 ???????? l r).
-interpretation "refl2" 'refl = (refl2 ???).
ndefinition union ≝ λA.λU,V:Ω^A.{ x | x ∈ U ∨ x ∈ V }.
interpretation "union" 'union U V = (union ? U V).
-ndefinition substract ≝ λA.λU,V:Ω^A.{ x | x ∈ U ∧ ¬ x ∈ V }.
-interpretation "substract" 'minus U V = (substract ? U V).
-
-
ndefinition big_union ≝ λA,B.λT:Ω^A.λf:A → Ω^B.{ x | ∃i. i ∈ T ∧ x ∈ f i }.
ndefinition big_intersection ≝ λA,B.λT:Ω^A.λf:A → Ω^B.{ x | ∀i. i ∈ T → x ∈ f i }.
ndefinition full_set: ∀A. Ω^A ≝ λA.{ x | True }.
nlemma subseteq_refl: ∀A.∀S: Ω^A. S ⊆ S.
-//.nqed.
+ #A; #S; #x; #H; nassumption.
+nqed.
nlemma subseteq_trans: ∀A.∀S,T,U: Ω^A. S ⊆ T → T ⊆ U → S ⊆ U.
-/3/.nqed.
+ #A; #S; #T; #U; #H1; #H2; #x; #P; napply H2; napply H1; nassumption.
+nqed.
include "properties/relations1.ma".
ndefinition seteq: ∀A. equivalence_relation1 (Ω^A).
-#A; @(λS,S'. S ⊆ S' ∧ S' ⊆ S); /2/; ##[ #A B; *; /3/]
-#S T U; *; #H1 H2; *; /4/;
+ #A; @
+ [ napply (λS,S'. S ⊆ S' ∧ S' ⊆ S)
+ | #S; @; napply subseteq_refl
+ | #S; #S'; *; #H1; #H2; @; nassumption
+ | #S; #T; #U; *; #H1; #H2; *; #H3; #H4; @; napply subseteq_trans;
+ ##[##2,5: nassumption |##1,4: ##skip |##*: nassumption]##]
nqed.
include "sets/setoids1.ma".
-ndefinition singleton ≝ λA:setoid.λa:A.{ x | a = x }.
-interpretation "singl" 'singl a = (singleton ? a).
-
(* this has to be declared here, so that it is combined with carr *)
ncoercion full_set : ∀A:Type[0]. Ω^A ≝ full_set on A: Type[0] to (Ω^?).
ndefinition powerclass_setoid: Type[0] → setoid1.
- #A; @(Ω^A);//.
+ #A; @[ napply (Ω^A)| napply seteq ]
nqed.
+include "hints_declaration.ma".
+
alias symbol "hint_decl" = "hint_decl_Type2".
-unification hint 0 ≔ A;
- R ≟ (mk_setoid1 (Ω^A) (eq1 (powerclass_setoid A)))
-(*--------------------------------------------------*)⊢
- carr1 R ≡ Ω^A.
+unification hint 0 ≔ A ⊢ carr1 (mk_setoid1 (Ω^A) (eq1 (powerclass_setoid A))) ≡ Ω^A.
(************ SETS OVER SETOIDS ********************)
include "logic/cprop.ma".
-nrecord ext_powerclass (A: setoid) : Type[1] ≝ {
- ext_carr:> Ω^A; (* qui pc viene dichiarato con un target preciso...
- forse lo si vorrebbe dichiarato con un target più lasco
- ma la sintassi :> non lo supporta *)
+nrecord ext_powerclass (A: setoid) : Type[1] ≝
+ { ext_carr:> Ω^A; (* qui pc viene dichiarato con un target preciso...
+ forse lo si vorrebbe dichiarato con un target più lasco
+ ma la sintassi :> non lo supporta *)
ext_prop: ∀x,x':A. x=x' → (x ∈ ext_carr) = (x' ∈ ext_carr)
-}.
+ }.
notation > "𝛀 ^ term 90 A" non associative with precedence 70
for @{ 'ext_powerclass $A }.
-notation < "Ω term 90 A \atop ≈" non associative with precedence 90
+notation "Ω term 90 A \atop ≈" non associative with precedence 70
for @{ 'ext_powerclass $A }.
interpretation "extensional powerclass" 'ext_powerclass a = (ext_powerclass a).
ncoercion Full_set: ∀A. ext_powerclass A ≝ Full_set on A: setoid to ext_powerclass ?.
ndefinition ext_seteq: ∀A. equivalence_relation1 (𝛀^A).
- #A; @ [ napply (λS,S'. S = S') ] /2/.
+ #A; @
+ [ napply (λS,S'. S = S')
+ | #S; napply (refl1 ? (seteq A))
+ | #S; #S'; napply (sym1 ? (seteq A))
+ | #S; #T; #U; napply (trans1 ? (seteq A))]
nqed.
ndefinition ext_powerclass_setoid: setoid → setoid1.
- #A; @ (ext_seteq A).
+ #A; @
+ [ napply (ext_powerclass A)
+ | napply (ext_seteq A) ]
nqed.
unification hint 0 ≔ A;
(* ----------------------------------------------------- *) ⊢
carr1 R ≡ ext_powerclass A.
+interpretation "prop21 mem" 'prop2 l r = (prop21 (setoid1_of_setoid ?) (ext_powerclass_setoid ?) ? ? ???? l r).
+
+(*
+ncoercion ext_carr' : ∀A.∀x:ext_powerclass_setoid A. Ω^A ≝ ext_carr
+on _x : (carr1 (ext_powerclass_setoid ?)) to (Ω^?).
+*)
+
nlemma mem_ext_powerclass_setoid_is_morph:
- ∀A. (setoid1_of_setoid A) ⇒_1 ((𝛀^A) ⇒_1 CPROP).
-#A; napply (mk_binary_morphism1 … (λx:setoid1_of_setoid A.λS: 𝛀^A. x ∈ S));
-#a; #a'; #b; #b'; #Ha; *; #Hb1; #Hb2; @; #H
-[ napply (. (ext_prop … Ha^-1)) | napply (. (ext_prop … Ha)) ] /2/.
+ ∀A. binary_morphism1 (setoid1_of_setoid A) (ext_powerclass_setoid A) CPROP.
+ #A; @
+ [ napply (λx,S. x ∈ S)
+ | #a; #a'; #b; #b'; #Ha; *; #Hb1; #Hb2; @; #H;
+ ##[ napply Hb1; napply (. (ext_prop … Ha^-1)); nassumption;
+ ##| napply Hb2; napply (. (ext_prop … Ha)); nassumption;
+ ##]
+ ##]
nqed.
-unification hint 0 ≔ AA : setoid, S : 𝛀^AA, x : carr AA;
- A ≟ carr AA,
+unification hint 0 ≔ A:setoid, x, S;
SS ≟ (ext_carr ? S),
- TT ≟ (mk_unary_morphism1 ??
- (λx:carr1 (setoid1_of_setoid ?).
- mk_unary_morphism1 ??
- (λS:carr1 (ext_powerclass_setoid ?). x ∈ (ext_carr ? S))
- (prop11 ?? (fun11 ?? (mem_ext_powerclass_setoid_is_morph AA) x)))
- (prop11 ?? (mem_ext_powerclass_setoid_is_morph AA))),
- T2 ≟ (ext_powerclass_setoid AA)
-(*---------------------------------------------------------------------------*) ⊢
- fun11 T2 CPROP (fun11 (setoid1_of_setoid AA) (unary_morphism1_setoid1 T2 CPROP) TT x) S ≡ mem A SS x.
-
-nlemma set_ext : ∀S.∀A,B:Ω^S.A =_1 B → ∀x:S.(x ∈ A) =_1 (x ∈ B).
-#S A B; *; #H1 H2 x; @; ##[ napply H1 | napply H2] nqed.
-
-nlemma ext_set : ∀S.∀A,B:Ω^S.(∀x:S. (x ∈ A) = (x ∈ B)) → A = B.
-#S A B H; @; #x; ncases (H x); #H1 H2; ##[ napply H1 | napply H2] nqed.
-
-nlemma subseteq_is_morph: ∀A. 𝛀^A ⇒_1 𝛀^A ⇒_1 CPROP.
- #A; napply (mk_binary_morphism1 … (λS,S':𝛀^A. S ⊆ S'));
- #a; #a'; #b; #b'; *; #H1; #H2; *; /5/ by mk_iff, sym1, subseteq_trans;
+ TT ≟ (mk_binary_morphism1 ???
+ (λx:setoid1_of_setoid ?.λS:ext_powerclass_setoid ?. x ∈ S)
+ (prop21 ??? (mem_ext_powerclass_setoid_is_morph A))),
+ XX ≟ (ext_powerclass_setoid A)
+ (*-------------------------------------*) ⊢
+ fun21 (setoid1_of_setoid A) XX CPROP TT x S
+ ≡ mem A SS x.
+
+nlemma subseteq_is_morph: ∀A. binary_morphism1 (ext_powerclass_setoid A) (ext_powerclass_setoid A) CPROP.
+ #A; @
+ [ napply (λS,S'. S ⊆ S')
+ | #a; #a'; #b; #b'; *; #Ha1; #Ha2; *; #Hb1; #Hb2; @; #H
+ [ napply (subseteq_trans … a)
+ [ nassumption | napply (subseteq_trans … b); nassumption ]
+ ##| napply (subseteq_trans … a')
+ [ nassumption | napply (subseteq_trans … b'); nassumption ] ##]
nqed.
-(* hints for ∩ *)
+unification hint 0 ≔ A,a,a'
+ (*-----------------------------------------------------------------*) ⊢
+ eq_rel ? (eq A) a a' ≡ eq_rel1 ? (eq1 (setoid1_of_setoid A)) a a'.
+
nlemma intersect_is_ext: ∀A. 𝛀^A → 𝛀^A → 𝛀^A.
-#S A B; @ (A ∩ B); #x y Exy; @; *; #H1 H2; @;
-##[##1,2: napply (. Exy^-1╪_1#); nassumption;
-##|##3,4: napply (. Exy‡#); nassumption]
+ #A; #S; #S'; @ (S ∩ S');
+ #a; #a'; #Ha; @; *; #H1; #H2; @
+ [##1,2: napply (. Ha^-1‡#); nassumption;
+##|##3,4: napply (. Ha‡#); nassumption]
nqed.
alias symbol "hint_decl" = "hint_decl_Type1".
-unification hint 0 ≔ A : setoid, B,C : 𝛀^A;
- AA ≟ carr A,
- BB ≟ ext_carr ? B,
- CC ≟ ext_carr ? C,
- R ≟ (mk_ext_powerclass ?
- (ext_carr ? B ∩ ext_carr ? C)
- (ext_prop ? (intersect_is_ext ? B C)))
+unification hint 0 ≔
+ A : setoid, B,C : ext_powerclass A;
+ R ≟ (mk_ext_powerclass ? (B ∩ C) (ext_prop ? (intersect_is_ext ? B C)))
+
(* ------------------------------------------*) ⊢
- ext_carr A R ≡ intersect AA BB CC.
-
-nlemma intersect_is_morph: ∀A. Ω^A ⇒_1 Ω^A ⇒_1 Ω^A.
-#A; napply (mk_binary_morphism1 … (λS,S'. S ∩ S'));
-#a; #a'; #b; #b'; *; #Ha1; #Ha2; *; #Hb1; #Hb2; @; #x; nnormalize; *;/3/.
+ ext_carr A R ≡ intersect ? (ext_carr ? B) (ext_carr ? C).
+
+nlemma intersect_is_morph:
+ ∀A. binary_morphism1 (powerclass_setoid A) (powerclass_setoid A) (powerclass_setoid A).
+ #A; @ (λS,S'. S ∩ S');
+ #a; #a'; #b; #b'; *; #Ha1; #Ha2; *; #Hb1; #Hb2; @; #x; nnormalize; *; #Ka; #Kb; @
+ [ napply Ha1; nassumption
+ | napply Hb1; nassumption
+ | napply Ha2; nassumption
+ | napply Hb2; nassumption]
nqed.
alias symbol "hint_decl" = "hint_decl_Type1".
-unification hint 0 ≔ A : Type[0], B,C : Ω^A;
- T ≟ powerclass_setoid A,
- R ≟ mk_unary_morphism1 ??
- (λX. mk_unary_morphism1 ??
- (λY.X ∩ Y) (prop11 ?? (fun11 ?? (intersect_is_morph A) X)))
- (prop11 ?? (intersect_is_morph A))
-(*------------------------------------------------------------------------*) ⊢
- fun11 T T (fun11 T (unary_morphism1_setoid1 T T) R B) C ≡ intersect A B C.
-
-interpretation "prop21 ext" 'prop2 l r =
- (prop11 (ext_powerclass_setoid ?)
- (unary_morphism1_setoid1 (ext_powerclass_setoid ?) ?) ? ?? l ?? r).
-
-nlemma intersect_is_ext_morph: ∀A. 𝛀^A ⇒_1 𝛀^A ⇒_1 𝛀^A.
- #A; napply (mk_binary_morphism1 … (intersect_is_ext …));
- #a; #a'; #b; #b'; #Ha; #Hb; napply (prop11 … (intersect_is_morph A)); nassumption.
+unification hint 0 ≔
+ A : Type[0], B,C : Ω^A;
+ R ≟ (mk_binary_morphism1 …
+ (λS,S'.S ∩ S')
+ (prop21 … (intersect_is_morph A)))
+ ⊢
+ fun21 (powerclass_setoid A) (powerclass_setoid A) (powerclass_setoid A) R B C
+ ≡ intersect ? B C.
+
+interpretation "prop21 ext" 'prop2 l r = (prop21 (ext_powerclass_setoid ?) (ext_powerclass_setoid ?) ? ? ???? l r).
+
+nlemma intersect_is_ext_morph:
+ ∀A. binary_morphism1 (ext_powerclass_setoid A) (ext_powerclass_setoid A) (ext_powerclass_setoid A).
+ #A; @ (intersect_is_ext …); nlapply (prop21 … (intersect_is_morph A));
+#H; #a; #a'; #b; #b'; #H1; #H2; napply H; nassumption;
nqed.
unification hint 1 ≔
- AA : setoid, B,C : 𝛀^AA;
- A ≟ carr AA,
- T ≟ ext_powerclass_setoid AA,
- R ≟ (mk_unary_morphism1 ?? (λX:𝛀^AA.
- mk_unary_morphism1 ?? (λY:𝛀^AA.
- mk_ext_powerclass AA
- (ext_carr ? X ∩ ext_carr ? Y)
- (ext_prop AA (intersect_is_ext ? X Y)))
- (prop11 ?? (fun11 ?? (intersect_is_ext_morph AA) X)))
- (prop11 ?? (intersect_is_ext_morph AA))) ,
+ A:setoid, B,C : 𝛀^A;
+ R ≟ (mk_binary_morphism1 (ext_powerclass_setoid A) (ext_powerclass_setoid A) (ext_powerclass_setoid A)
+ (λS,S':carr1 (ext_powerclass_setoid A).
+ mk_ext_powerclass A (S∩S') (ext_prop A (intersect_is_ext ? S S')))
+ (prop21 … (intersect_is_ext_morph A))) ,
BB ≟ (ext_carr ? B),
CC ≟ (ext_carr ? C)
- (* ---------------------------------------------------------------------------------------*) ⊢
- ext_carr AA (fun11 T T (fun11 T (unary_morphism1_setoid1 T T) R B) C) ≡ intersect A BB CC.
-
-
-(* hints for ∪ *)
-nlemma union_is_morph : ∀A. Ω^A ⇒_1 (Ω^A ⇒_1 Ω^A).
-#X; napply (mk_binary_morphism1 … (λA,B.A ∪ B));
-#A1 A2 B1 B2 EA EB; napply ext_set; #x;
-nchange in match (x ∈ (A1 ∪ B1)) with (?∨?);
-napply (.= (set_ext ??? EA x)‡#);
-napply (.= #‡(set_ext ??? EB x)); //;
-nqed.
-
-nlemma union_is_ext: ∀A. 𝛀^A → 𝛀^A → 𝛀^A.
- #S A B; @ (A ∪ B); #x y Exy; @; *; #H1;
-##[##1,3: @; ##|##*: @2 ]
-##[##1,3: napply (. (Exy^-1)╪_1#)
-##|##2,4: napply (. Exy╪_1#)]
-nassumption;
-nqed.
-
-alias symbol "hint_decl" = "hint_decl_Type1".
-unification hint 0 ≔ A : setoid, B,C : 𝛀^A;
- AA ≟ carr A,
- BB ≟ ext_carr ? B,
- CC ≟ ext_carr ? C,
- R ≟ mk_ext_powerclass ?
- (ext_carr ? B ∪ ext_carr ? C) (ext_prop ? (union_is_ext ? B C))
-(*-------------------------------------------------------------------------*) ⊢
- ext_carr A R ≡ union AA BB CC.
-
-unification hint 0 ≔ S:Type[0], A,B:Ω^S;
- T ≟ powerclass_setoid S,
- MM ≟ mk_unary_morphism1 ??
- (λA.mk_unary_morphism1 ??
- (λB.A ∪ B) (prop11 ?? (fun11 ?? (union_is_morph S) A)))
- (prop11 ?? (union_is_morph S))
-(*--------------------------------------------------------------------------*) ⊢
- fun11 T T (fun11 T (unary_morphism1_setoid1 T T) MM A) B ≡ A ∪ B.
-
-nlemma union_is_ext_morph:∀A.𝛀^A ⇒_1 𝛀^A ⇒_1 𝛀^A.
-#A; napply (mk_binary_morphism1 … (union_is_ext …));
-#x1 x2 y1 y2 Ex Ey; napply (prop11 … (union_is_morph A)); nassumption.
-nqed.
-
-unification hint 1 ≔
- AA : setoid, B,C : 𝛀^AA;
- A ≟ carr AA,
- T ≟ ext_powerclass_setoid AA,
- R ≟ mk_unary_morphism1 ?? (λX:𝛀^AA.
- mk_unary_morphism1 ?? (λY:𝛀^AA.
- mk_ext_powerclass AA
- (ext_carr ? X ∪ ext_carr ? Y) (ext_prop AA (union_is_ext ? X Y)))
- (prop11 ?? (fun11 ?? (union_is_ext_morph AA) X)))
- (prop11 ?? (union_is_ext_morph AA)),
- BB ≟ (ext_carr ? B),
- CC ≟ (ext_carr ? C)
-(*------------------------------------------------------*) ⊢
- ext_carr AA (fun11 T T (fun11 T (unary_morphism1_setoid1 T T) R B) C) ≡ union A BB CC.
-
-
-(* hints for - *)
-nlemma substract_is_morph : ∀A. Ω^A ⇒_1 (Ω^A ⇒_1 Ω^A).
-#X; napply (mk_binary_morphism1 … (λA,B.A - B));
-#A1 A2 B1 B2 EA EB; napply ext_set; #x;
-nchange in match (x ∈ (A1 - B1)) with (?∧?);
-napply (.= (set_ext ??? EA x)‡#); @; *; #H H1; @; //; #H2; napply H1;
-##[ napply (. (set_ext ??? EB x)); ##| napply (. (set_ext ??? EB^-1 x)); ##] //;
-nqed.
-
-nlemma substract_is_ext: ∀A. 𝛀^A → 𝛀^A → 𝛀^A.
- #S A B; @ (A - B); #x y Exy; @; *; #H1 H2; @; ##[##2,4: #H3; napply H2]
-##[##1,4: napply (. Exy╪_1#); // ##|##2,3: napply (. Exy^-1╪_1#); //]
-nqed.
-
-alias symbol "hint_decl" = "hint_decl_Type1".
-unification hint 0 ≔ A : setoid, B,C : 𝛀^A;
- AA ≟ carr A,
- BB ≟ ext_carr ? B,
- CC ≟ ext_carr ? C,
- R ≟ mk_ext_powerclass ?
- (ext_carr ? B - ext_carr ? C)
- (ext_prop ? (substract_is_ext ? B C))
-(*---------------------------------------------------*) ⊢
- ext_carr A R ≡ substract AA BB CC.
-
-unification hint 0 ≔ S:Type[0], A,B:Ω^S;
- T ≟ powerclass_setoid S,
- MM ≟ mk_unary_morphism1 ??
- (λA.mk_unary_morphism1 ??
- (λB.A - B) (prop11 ?? (fun11 ?? (substract_is_morph S) A)))
- (prop11 ?? (substract_is_morph S))
-(*--------------------------------------------------------------------------*) ⊢
- fun11 T T (fun11 T (unary_morphism1_setoid1 T T) MM A) B ≡ A - B.
-
-nlemma substract_is_ext_morph:∀A.𝛀^A ⇒_1 𝛀^A ⇒_1 𝛀^A.
-#A; napply (mk_binary_morphism1 … (substract_is_ext …));
-#x1 x2 y1 y2 Ex Ey; napply (prop11 … (substract_is_morph A)); nassumption.
-nqed.
-
-unification hint 1 ≔
- AA : setoid, B,C : 𝛀^AA;
- A ≟ carr AA,
- T ≟ ext_powerclass_setoid AA,
- R ≟ mk_unary_morphism1 ?? (λX:𝛀^AA.
- mk_unary_morphism1 ?? (λY:𝛀^AA.
- mk_ext_powerclass AA
- (ext_carr ? X - ext_carr ? Y)
- (ext_prop AA (substract_is_ext ? X Y)))
- (prop11 ?? (fun11 ?? (substract_is_ext_morph AA) X)))
- (prop11 ?? (substract_is_ext_morph AA)),
- BB ≟ (ext_carr ? B),
- CC ≟ (ext_carr ? C)
-(*------------------------------------------------------*) ⊢
- ext_carr AA (fun11 T T (fun11 T (unary_morphism1_setoid1 T T) R B) C) ≡ substract A BB CC.
-
-(* hints for {x} *)
-nlemma single_is_morph : ∀A:setoid. (setoid1_of_setoid A) ⇒_1 Ω^A.
-#X; @; ##[ napply (λx.{(x)}); ##]
-#a b E; napply ext_set; #x; @; #H; /3/; nqed.
-
-nlemma single_is_ext: ∀A:setoid. A → 𝛀^A.
-#X a; @; ##[ napply ({(a)}); ##] #x y E; @; #H; /3/; nqed.
-
-alias symbol "hint_decl" = "hint_decl_Type1".
-unification hint 0 ≔ A : setoid, a : carr A;
- R ≟ (mk_ext_powerclass ? {(a)} (ext_prop ? (single_is_ext ? a)))
-(*-------------------------------------------------------------------------*) ⊢
- ext_carr A R ≡ singleton A a.
-
-unification hint 0 ≔ A:setoid, a : carr A;
- T ≟ setoid1_of_setoid A,
- AA ≟ carr A,
- MM ≟ mk_unary_morphism1 ??
- (λa:carr1 (setoid1_of_setoid A).{(a)}) (prop11 ?? (single_is_morph A))
-(*--------------------------------------------------------------------------*) ⊢
- fun11 T (powerclass_setoid AA) MM a ≡ {(a)}.
-
-nlemma single_is_ext_morph:∀A:setoid.(setoid1_of_setoid A) ⇒_1 𝛀^A.
-#A; @; ##[ #a; napply (single_is_ext ? a); ##] #a b E; @; #x; /3/; nqed.
-
-unification hint 1 ≔ AA : setoid, a: carr AA;
- T ≟ ext_powerclass_setoid AA,
- R ≟ mk_unary_morphism1 ??
- (λa:carr1 (setoid1_of_setoid AA).
- mk_ext_powerclass AA {(a)} (ext_prop ? (single_is_ext AA a)))
- (prop11 ?? (single_is_ext_morph AA))
-(*------------------------------------------------------*) ⊢
- ext_carr AA (fun11 (setoid1_of_setoid AA) T R a) ≡ singleton AA a.
-
+ (* ------------------------------------------------------*) ⊢
+ ext_carr A
+ (fun21
+ (ext_powerclass_setoid A)
+ (ext_powerclass_setoid A)
+ (ext_powerclass_setoid A) R B C) ≡
+ intersect (carr A) BB CC.
(*
alias symbol "hint_decl" = "hint_decl_Type2".
ndefinition image: ∀A,B. (carr A → carr B) → Ω^A → Ω^B ≝
λA,B:setoid.λf:carr A → carr B.λSa:Ω^A.
- {y | ∃x. x ∈ Sa ∧ eq_rel (carr B) (eq0 B) (f x) y}.
+ {y | ∃x. x ∈ Sa ∧ eq_rel (carr B) (eq B) (f x) y}.
ndefinition counter_image: ∀A,B. (carr A → carr B) → Ω^B → Ω^A ≝
λA,B,f,Sb. {x | ∃y. y ∈ Sb ∧ f x = y}.
(******************* first omomorphism theorem for sets **********************)
ndefinition eqrel_of_morphism:
- ∀A,B. A ⇒_0 B → compatible_equivalence_relation A.
+ ∀A,B. unary_morphism A B → compatible_equivalence_relation A.
#A; #B; #f; @
- [ @ [ napply (λx,y. f x = f y) ] /2/;
+ [ @
+ [ napply (λx,y. f x = f y)
+ | #x; napply refl | #x; #y; napply sym | #x; #y; #z; napply trans]
##| #x; #x'; #H; nwhd; alias symbol "prop1" = "prop1".
-napply (.= (†H)); // ]
+napply (.= (†H)); napply refl ]
nqed.
-ndefinition canonical_proj: ∀A,R. A ⇒_0 (quotient A R).
+ndefinition canonical_proj: ∀A,R. unary_morphism A (quotient A R).
#A; #R; @
- [ napply (λx.x) | #a; #a'; #H; napply (compatibility … R … H) ]
+ [ napply (λx.x) | #a; #a'; #H; napply (compatibility … R … H) ]
nqed.
ndefinition quotiented_mor:
- ∀A,B.∀f:A ⇒_0 B.(quotient … (eqrel_of_morphism … f)) ⇒_0 B.
- #A; #B; #f; @ [ napply f ] //.
+ ∀A,B.∀f:unary_morphism A B.
+ unary_morphism (quotient … (eqrel_of_morphism … f)) B.
+ #A; #B; #f; @
+ [ napply f | #a; #a'; #H; nassumption]
nqed.
nlemma first_omomorphism_theorem_functions1:
∀A,B.∀f: unary_morphism A B.
∀x. f x = quotiented_mor … (canonical_proj … (eqrel_of_morphism … f) x).
-//. nqed.
+ #A; #B; #f; #x; napply refl;
+nqed.
alias symbol "eq" = "setoid eq".
ndefinition surjective ≝
- λA,B.λS: ext_powerclass A.λT: ext_powerclass B.λf:A ⇒_0 B.
+ λA,B.λS: ext_powerclass A.λT: ext_powerclass B.λf:unary_morphism A B.
∀y. y ∈ T → ∃x. x ∈ S ∧ f x = y.
ndefinition injective ≝
- λA,B.λS: ext_powerclass A.λf:A ⇒_0 B.
+ λA,B.λS: ext_powerclass A.λf:unary_morphism A B.
∀x,x'. x ∈ S → x' ∈ S → f x = f x' → x = x'.
nlemma first_omomorphism_theorem_functions2:
- ∀A,B.∀f:A ⇒_0 B.
+ ∀A,B.∀f: unary_morphism A B.
surjective … (Full_set ?) (Full_set ?) (canonical_proj ? (eqrel_of_morphism … f)).
-/3/. nqed.
+ #A; #B; #f; nwhd; #y; #Hy; @ y; @ I ; napply refl;
+ (* bug, prova @ I refl *)
+nqed.
nlemma first_omomorphism_theorem_functions3:
- ∀A,B.∀f:A ⇒_0 B.
+ ∀A,B.∀f: unary_morphism A B.
injective … (Full_set ?) (quotiented_mor … f).
#A; #B; #f; nwhd; #x; #x'; #Hx; #Hx'; #K; nassumption.
nqed.
nrecord isomorphism (A, B : setoid) (S: ext_powerclass A) (T: ext_powerclass B) : Type[0] ≝
- { iso_f:> A ⇒_0 B;
+ { iso_f:> unary_morphism A B;
f_closed: ∀x. x ∈ S → iso_f x ∈ T;
f_sur: surjective … S T iso_f;
f_inj: injective … S iso_f
}.
+nlemma subseteq_intersection_l: ∀A.∀U,V,W:Ω^A.U ⊆ W ∨ V ⊆ W → U ∩ V ⊆ W.
+#A; #U; #V; #W; *; #H; #x; *; #xU; #xV; napply H; nassumption;
+nqed.
+
+nlemma subseteq_union_l: ∀A.∀U,V,W:Ω^A.U ⊆ W → V ⊆ W → U ∪ V ⊆ W.
+#A; #U; #V; #W; #H; #H1; #x; *; #Hx; ##[ napply H; ##| napply H1; ##] nassumption;
+nqed.
+
+nlemma subseteq_intersection_r: ∀A.∀U,V,W:Ω^A.W ⊆ U → W ⊆ V → W ⊆ U ∩ V.
+#A; #U; #V; #W; #H1; #H2; #x; #Hx; @; ##[ napply H1; ##| napply H2; ##] nassumption;
+nqed.
(*
nrecord isomorphism (A, B : setoid) (S: qpowerclass A) (T: qpowerclass B) : CProp[0] ≝
;
}.
*)
-
-(* Set theory *)
-
-nlemma subseteq_intersection_l: ∀A.∀U,V,W:Ω^A.U ⊆ W ∨ V ⊆ W → U ∩ V ⊆ W.
-#A; #U; #V; #W; *; #H; #x; *; /2/.
-nqed.
-
-nlemma subseteq_union_l: ∀A.∀U,V,W:Ω^A.U ⊆ W → V ⊆ W → U ∪ V ⊆ W.
-#A; #U; #V; #W; #H; #H1; #x; *; /2/.
-nqed.
-
-nlemma subseteq_intersection_r: ∀A.∀U,V,W:Ω^A.W ⊆ U → W ⊆ V → W ⊆ U ∩ V.
-/3/. nqed.
-
-nlemma cupC : ∀S. ∀a,b:Ω^S.a ∪ b = b ∪ a.
-#S a b; @; #w; *; nnormalize; /2/; nqed.
-
-nlemma cupID : ∀S. ∀a:Ω^S.a ∪ a = a.
-#S a; @; #w; ##[*; //] /2/; nqed.
-
-(* XXX Bug notazione \cup, niente parentesi *)
-nlemma cupA : ∀S.∀a,b,c:Ω^S.a ∪ b ∪ c = a ∪ (b ∪ c).
-#S a b c; @; #w; *; /3/; *; /3/; nqed.
-
-ndefinition Empty_set : ∀A.Ω^A ≝ λA.{ x | False }.
-
-notation "∅" non associative with precedence 90 for @{ 'empty }.
-interpretation "empty set" 'empty = (Empty_set ?).
-
-nlemma cup0 :∀S.∀A:Ω^S.A ∪ ∅ = A.
-#S p; @; #w; ##[*; //| #; @1; //] *; nqed.
-
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
+
include "topology/igft.ma".
nqed.
nlemma hint_auto1 : ∀A,U,V. (∀x.x ∈ U → x ◃ V) → cover_set cover A U V.
-nnormalize; /2/.
+nnormalize; nauto.
nqed.
alias symbol "covers" (instance 1) = "covers".
alias symbol "covers" (instance 2) = "covers set".
alias symbol "covers" (instance 3) = "covers".
ntheorem transitivity: ∀A:Ax.∀a:A.∀U,V. a ◃ U → U ◃ V → a ◃ V.
-#A; #a; #U; #V; #aU; #UV; nelim aU; /3/;
+#A; #a; #U; #V; #aU; #UV; nelim aU; nauto depth=4;
nqed.
ndefinition emptyset: ∀A.Ω^A ≝ λA.{x | False}.
∀A:Ax.∀a:A. a ◃ ∅ → ∃i. ¬ a ∈ 𝐂 a i.
#A; #a; #H; nelim H;
##[ #n; *;
-##| #b; #i_star; #IH1; #IH2; ncases (EM … b i_star); /3/;
+##| #b; #i_star; #IH1; #IH2; ncases (EM … b i_star); nauto;
##]
nqed.
ndefinition uax : uAx → Ax.
#A; @ (uax_ A) (λx.unit); #a; #_;
-napply (𝐂 a ?); nlapply one; ncases (with_ A a); //;
+napply (𝐂 a ?); nlapply one; ncases (with_ A a); nauto;
nqed.
ncoercion uax : ∀u:uAx. Ax ≝ uax on _u : uAx to Ax.
unification hint 0 ≔ ;
x ≟ axs
(* -------------- *) ⊢
- S (uax x) ≡ A. (* XXX: bug coercions/ disamb multipasso che ne fa 1 solo*)
+ S x ≡ A.
+
ntheorem col2_4 :
- ∀A:uAx.∀a:uax A. a ◃ ∅ → ¬ a ∈ 𝐂 a one.
+ ∀A:uAx.∀a:A. a ◃ ∅ → ¬ a ∈ 𝐂 a one.
#A; #a; #H; nelim H;
##[ #n; *;
-##| #b; #i_star; #IH1; #IH2; #H3; nlapply (IH2 … H3); /2/;
-##]
+##| #b; #i_star; #IH1; #IH2; #H3; nlapply (IH2 … H3); nauto;
+##]
nqed.
-(* bug interpretazione non aggiunta per ∅ *)
-ndefinition Z : Ω^axs ≝ { x | x ◃ (emptyset ?) }.
+ndefinition Z : Ω^axs ≝ { x | x ◃ ∅ }.
ntheorem cover_monotone: ∀A:Ax.∀a:A.∀U,V.U ⊆ V → a ◃ U → a ◃ V.
-#A; #a; #U; #V; #HUV; #H; nelim H; /3/;
+#A; #a; #U; #V; #HUV; #H; nelim H; nauto depth=4;
nqed.
ntheorem th3_1: ¬∃a:axs.Z ⊆ S a ∧ S a ⊆ Z.
ncut (a ◃ Z); ##[
nlapply (axiom_cond … a one); #AxCon; nchange in AxCon with (a ◃ S a);
napply (cover_monotone … AxCon); nassumption; ##] #H;
-ncut (a ◃ ∅); ##[ napply (transitivity … H); nwhd in match Z; //; ##] #H1;
+ncut (a ◃ ∅); ##[ napply (transitivity … H); nwhd in match Z; nauto; ##] #H1;
ncut (¬ a ∈ S a); ##[ napply (col2_4 … H1); ##] #H2;
ncut (a ∈ S a); ##[ napply ZSa; napply H1; ##] #H3;
-/2/;
+nauto;
nqed.
include "nat/nat.ma".
unification hint 0 ≔ ;
x ≟ caxs
(* -------------- *) ⊢
- S (uax x) ≡ nat.
+ S x ≡ nat.
naxiom h : nat → nat.
nlemma replace_char:
∀A:Ax.∀U,V.U ⊆ V → V ⊆ U → ∀a:A.a ◃ U → a ◃ V.
-#A; #U; #V; #UV; #VU; #a; #aU; nelim aU; /3/;
+#A; #U; #V; #UV; #VU; #a; #aU; nelim aU; nauto;
nqed.
ntheorem th_ch3: ¬∃a:caxs.∀x.ϕ a x = h x.
*; #a; #H;
ncut (a ◃ { x | x ◃ ∅}); ##[
- napply (replace_char … { x | h x = O }); ##[ ##1,2: #x; ncases (Ph x); /2/; ##]
- napply (replace_char … { x | ϕ a x = O }); ##[##1,2: #x; nrewrite > (H x); //; ##]
+ napply (replace_char … { x | h x = O }); ##[ ##1,2: #x; ncases (Ph x); nauto; ##]
+ napply (replace_char … { x | ϕ a x = O }); ##[##1,2: #x; nrewrite > (H x); nauto; ##]
napply (axiom_cond … a one); ##] #H1;
-ncut (a ◃ ∅); ##[ napply (transitivity … H1); //; ##] #H2;
+ncut (a ◃ ∅); ##[ napply (transitivity … H1); nauto; ##] #H2;
nlapply (col2_4 …H2); #H3;
ncut (a ∈ 𝐂 a one); ##[
- nnormalize; ncases (Ph a); nrewrite > (H a); /2/; ##] #H4;
-/2/;
-nqed.
\ No newline at end of file
+ nnormalize; ncases (Ph a); nrewrite > (H a); nauto; ##] #H4;
+nauto;
+nqed.
+
+
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
include "sets/sets.ma".
+ndefinition binary_morph_setoid : setoid → setoid → setoid → setoid.
+#S1; #S2; #T; @ (binary_morphism S1 S2 T); @;
+##[ #f; #g; napply (∀x,y. f x y = g x y);
+##| #f; #x; #y; napply #;
+##| #f; #g; #H; #x; #y; napply ((H x y)^-1);
+##| #f; #g; #h; #H1; #H2; #x; #y; napply (trans … (H1 …) (H2 …)); ##]
+nqed.
+
+ndefinition unary_morph_setoid : setoid → setoid → setoid.
+#S1; #S2; @ (unary_morphism S1 S2); @;
+##[ #f; #g; napply (∀x. f x = g x);
+##| #f; #x; napply #;
+##| #f; #g; #H; #x; napply ((H x)^-1);
+##| #f; #g; #h; #H1; #H2; #x; napply (trans … (H1 …) (H2 …)); ##]
+nqed.
+
nrecord category : Type[2] ≝
{ objs:> Type[1];
arrows: objs → objs → setoid;
id: ∀o:objs. arrows o o;
- comp: ∀o1,o2,o3. unary_morphism (arrows o1 o2) (unary_morph_setoid (arrows o2 o3) (arrows o1 o3));
+ comp: ∀o1,o2,o3. binary_morphism (arrows o1 o2) (arrows o2 o3) (arrows o1 o3);
comp_assoc: ∀o1,o2,o3,o4. ∀a12,a23,a34.
comp o1 o3 o4 (comp o1 o2 o3 a12 a23) a34 = comp o1 o2 o4 a12 (comp o2 o3 o4 a23 a34);
id_neutral_left: ∀o1,o2. ∀a: arrows o1 o2. comp ??? (id o1) a = a;
@;
##[ napply setoid;
##| napply unary_morph_setoid;
-##| #o; @ (λx.x); //
-##| #o1; #o2; #o3; napply mk_binary_morphism [ #f; #g; @(λx.g (f x)) ]
- nnormalize; /3/
-##| nnormalize; /4/
-##|##6,7: nnormalize; /2/ ]
+##| #o; @ (λx.x); #a; #b; #H; napply H;
+##| #o1; #o2; #o3; @;
+ ##[ #f; #g; @(λx.g (f x)); #a; #b; #H; napply (.= (††H)); napply #;
+ ##| #f; #g; #f'; #g'; #H1; #H2; nwhd; #x; napply (.= (H2 (f x)));
+ napply (.= (†(H1 x))); napply #; ##]
+##| #o1; #o2; #o3; #o4; #f; #g; #h; nwhd; #x; napply #;
+##|##6,7: #o1; #o2; #f; nwhd; #x; napply #; ##]
nqed.
unification hint 0 ≔ ;
(* ----------------------------------- *) ⊢
unary_morphism A B ≡ carr T.
-(*
ndefinition TYPE : setoid1.
@ setoid; @;
interpretation "new I" 'I a = (nI ? a).
ndefinition image ≝ λA:nAx.λa:A.λi. { x | ∃j:𝐃 a i. x = 𝐝 a i j }.
-
+(*
nlemma elim_eq_TYPE : ∀A,B:setoid.∀P:CProp[1]. A=B → ((B ⇒ A) → P) → P.
#A; #B; #P; *; #f; *; #g; #_; #IH; napply IH; napply g;
nqed.
##[ @(f e);
*)
-(*
ndefinition image_is_ext : ∀A:nAx.∀a:A.∀i:𝐈 a.𝛀^A.
#A; #a; #i; @ (image … i); #x; #y; #H; @;
##[ *; #d; #Ex; @ d; napply (.= H^-1); nassumption;
@ (f i); #a; #Ha; napply H1;
ncut (𝐈𝐦[𝐝 y (f i)] = 𝐈𝐦[𝐝 x i]);
- ##[##2: #E; napply (. (#‡E^-1)); napply Ha; ##]
+ ##[##2: #E; alias symbol "refl" = "refl".
+ alias symbol "prop2" = "prop21 mem".
+ alias symbol "invert" = "setoid1 symmetry".
+ napply (. (#‡E^-1)); napply Ha; ##]
@; #w; #Hw; nwhd;
ncut (𝐈𝐦[𝐝 y (f i)] = 𝐈𝐦[𝐝 x i]);
-(*
+
notation < "term 90 U \sub (term 90 x)" non associative with precedence 50 for @{ 'famU $U $x }.
notation > "U ⎽ term 90 x" non associative with precedence 50 for @{ 'famU $U $x }.
[1]: http://upsilon.cc/~zack/research/publications/notation.pdf
D*)
-*)*)
\ No newline at end of file
(* *)
(**************************************************************************)
-include "arithmetics/nat.ma".
-
-ndefinition two ≝ S (S O).
-ndefinition natone ≝ S O.
-ndefinition four ≝ two * two.
-ndefinition eight ≝ two * four.
-ndefinition natS ≝ S.
-
include "topology/igft.ma".
nlemma hint_auto2 : ∀T.∀U,V:Ω^T.(∀x.x ∈ U → x ∈ V) → U ⊆ V.
-nnormalize; /2/;
+nnormalize; nauto;
nqed.
alias symbol "covers" = "covers set".
∀A:Ax.∀U,P:Ω^A.
(U ⊆ P) → (∀a:A.∀j:𝐈 a. 𝐂 a j ◃ U → 𝐂 a j ⊆ P → a ∈ P) →
◃ U ⊆ P.
- #A; #U; #P; #refl; #infty; #a; #H; nelim H; /3/.
+ #A; #U; #P; #refl; #infty; #a; #H; nelim H
+ [ nauto | (*nauto depth=4;*) #b; #j; #K1; #K2;
+ napply infty; nauto; ##]
nqed.
alias symbol "covers" (instance 1) = "covers".
nlemma eq_rect_Type0_r':
∀A.∀a,x.∀p:eq ? x a.∀P: ∀x:A. eq ? x a → Type[0]. P a (refl A a) → P x p.
- #A; #a; #x; #p; ncases p; //;
+ #A; #a; #x; #p; ncases p; nauto;
nqed.
nlemma eq_rect_Type0_r:
≝ ?.
nlapply (decide_mem_ok … memdec b); nlapply (decide_mem_ko … memdec b);
ncases (decide_mem … memdec b)
- [ #_; #H; napply refl; /2/
- | #H; #_; ncut (uuC … b=uuC … b) [//] ncases (uuC … b) in ⊢ (???% → ?)
- [ #E; napply False_rect_Type0; ncut (b=b) [//] ncases p in ⊢ (???% → ?)
- [ #a; #K; #E2; napply H [ // | nrewrite > E2; // ]
+ [ #_; #H; napply refl; nauto
+ | #H; #_; ncut (uuC … b=uuC … b) [nauto] ncases (uuC … b) in ⊢ (???% → ?)
+ [ #E; napply False_rect_Type0; ncut (b=b) [nauto] ncases p in ⊢ (???% → ?)
+ [ #a; #K; #E2; napply H [ nauto | nrewrite > E2; nauto ]
##| #a; #i; #K; #E2; nrewrite < E2 in i; nnormalize; nrewrite > E; nnormalize;
- //]
+ nauto]
##| #a; #E;
ncut (a ◃ U)
- [ nlapply E; nlapply (H ?) [//] ncases p
+ [ nlapply E; nlapply (H ?) [nauto] ncases p
[ #x; #Hx; #K1; #_; ncases (K1 Hx)
##| #x; #i; #Hx; #K1; #E2; napply Hx; ngeneralize in match i; nnormalize;
- nrewrite > E2; nnormalize; #_; //]##]
+ nrewrite > E2; nnormalize; #_; nauto]##]
#Hcut;
nlapply (infty b); nnormalize; nrewrite > E; nnormalize; #H2;
napply (H2 one); #y; #E2; nrewrite > E2
- (* [##2: napply cover_rect] //; *)
+ (* [##2: napply cover_rect] nauto depth=1; *)
[ napply Hcut
- ##| napply (cover_rect A U memdec P refl infty a); // ]##]
-nqed.
-
-(********* Esempio:
- let rec skipfact n =
- match n with
- [ O ⇒ 1
- | S m ⇒ S m * skipfact (pred m) ]
-**)
-
-ntheorem psym_plus: ∀n,m. n + m = m + n.//.
-nqed.
-
-nlemma easy1: ∀n:nat. two * (S n) = two + two * n.//.
-nqed.
-
-ndefinition skipfact_dom: uuAx.
- @ nat; #n; ncases n [ napply None | #m; napply (Some … (pred m)) ]
-nqed.
-
-ntheorem skipfact_base_dec:
- memdec (uuax skipfact_dom) (mk_powerclass ? (λx: uuax skipfact_dom. x=O)).
- nnormalize; @ (λx. match x with [ O ⇒ true | S _ ⇒ false ]); #n; nelim n;
- nnormalize; //; #X; ndestruct; #Y; #Z; ndestruct; #W; ndestruct.
-nqed.
-
-ntheorem skipfact_partial:
- ∀n: uuax skipfact_dom. two * n ◃ mk_powerclass ? (λx: uuax skipfact_dom.x=O).
- #n; nelim n
- [ @1; nnormalize; @1
- | #m; #H; @2
- [ nnormalize; @1
- | nnormalize; #y; nchange in ⊢ (% → ?) with (y = pred (pred (two * (natone + m))));
- nnormalize; nrewrite < (plus_n_Sm …); nnormalize;
- #E; nrewrite > E; napply H ]##]
-nqed.
-
-ndefinition skipfact: ∀n:nat. n ◃ mk_powerclass ? (λx: uuax skipfact_dom.x=O) → nat.
- #n; #D; napply (cover_rect … skipfact_base_dec … n D)
- [ #a; #_; napply natone
- | #a; ncases a
- [ nnormalize; #i; nelim i
- | #m; #i; nnormalize in i; #d; #H;
- napply (S m * H (pred m) …); //]
-nqed.
-
-nlemma test: skipfact four ? = eight. ##[##2: napply (skipfact_partial two)] //.
+ ##| napply (cover_rect A U memdec P refl infty a); nauto ]##]
nqed.
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "arithmetics/nat.ma".
-include "datatypes/bool.ma".
-
-ndefinition two ≝ S (S O).
-ndefinition natone ≝ S O.
-ndefinition four ≝ two * two.
-ndefinition eight ≝ two * four.
-ndefinition natS ≝ S.
-
-include "topology/igft.ma".
-
-nlemma hint_auto2 : ∀T.∀U,V:Ω^T.(∀x.x ∈ U → x ∈ V) → U ⊆ V./2/.nqed.
-
-ninductive Sigma (A: Type[0]) (P: A → CProp[0]) : Type[0] ≝
- mk_Sigma: ∀a:A. P a → Sigma A P.
-
-(*<< To be moved in igft.ma *)
-ninductive ncover (A : nAx) (U : Ω^A) : A → CProp[0] ≝
-| ncreflexivity : ∀a. a ∈ U → ncover A U a
-| ncinfinity : ∀a. ∀i. (∀y.Sigma ? (λj.y = 𝐝 a i j) → ncover A U y) → ncover A U a.
-
-interpretation "ncovers" 'covers a U = (ncover ? U a).
-
-ntheorem ncover_cover_ok: ∀A:nAx.∀U.∀a:A. a ◃ U → cover (Ax_of_nAx A) U a.
- #A; #U; #a; #H; nelim H
- [ #n; #H1; @1; nassumption
- | #a; #i; #IH; #H; @2 [ napply i ]
- nnormalize; #y; *; #j; #E; nrewrite > E;
- napply H;
- /2/ ]
-nqed.
-
-ntheorem cover_ncover_ok: ∀A:Ax.∀U.∀a:A. a ◃ U → ncover (nAx_of_Ax A) U a.
- #A; #U; #a; #H; nelim H
- [ #n; #H1; @1; nassumption
- | #a; #i; #IH; #H; @2 [ napply i ] #y; *; #j; #E; nrewrite > E; ncases j; #x; #K;
- napply H; nnormalize; //.
-nqed.
-
-ndefinition ncoverage : ∀A:nAx.∀U:Ω^A.Ω^A ≝ λA,U.{ a | a ◃ U }.
-
-interpretation "ncoverage cover" 'coverage U = (ncoverage ? U).
-
-(*>> To be moved in igft.ma *)
-
-(*XXX
-nlemma ncover_ind':
- ∀A:nAx.∀U,P:Ω^A.
- (U ⊆ P) → (∀a:A.∀i:𝐈 a.(∀j. 𝐝 a i j ◃ U) → (∀j. 𝐝 a i j ∈ P) → a ∈ P) →
- ◃ U ⊆ P.
- #A; #U; #P; #refl; #infty; #a; #H; nelim H
- [ // | #b; #j; #K1; #K2; napply infty; //; ##]
-nqed.
-
-alias symbol "covers" (instance 3) = "ncovers".
-nlemma cover_ind'':
- ∀A:nAx.∀U:Ω^A.∀P:A → CProp[0].
- (∀a. a ∈ U → P a) → (∀a:A.∀i:𝐈 a.(∀j. 𝐝 a i j ◃ U) → (∀j. P (𝐝 a i j)) → P a) →
- ∀b. b ◃ U → P b.
- #A; #U; #P; nletin V ≝ {x | P x}; napply (ncover_ind' … V).
-nqed.
-*)
-
-(*********** from Cantor **********)
-ninductive eq1 (A : Type[0]) : Type[0] → CProp[0] ≝
-| refl1 : eq1 A A.
-
-notation "hvbox( a break ∼ b)" non associative with precedence 40
-for @{ 'eqT $a $b }.
-
-interpretation "eq between types" 'eqT a b = (eq1 a b).
-
-ninductive unit : Type[0] ≝ one : unit.
-
-ninductive option (A: Type[0]) : Type[0] ≝
- None: option A
- | Some: A → option A
- | Twice: A → A → option A.
-
-nrecord uuAx : Type[1] ≝ {
- uuS : Type[0];
- uuC : uuS → option uuS
-}.
-
-ndefinition uuax : uuAx → nAx.
-#A; @ (uuS A)
- [ #a; ncases (uuC … a) [ napply False | #_; napply unit | #_; #_; napply unit]
-##| #a; ncases (uuC … a); nnormalize
- [ #H; napply (False_rect_Type1 … H)
- | #_; #_; napply unit
- | #_; #_; #_; napply bool ]
-##| #a; ncases (uuC … a); nnormalize
- [ #H; napply (False_rect_Type1 … H)
- | #b; #_; #_; napply b
- | #b1; #b2; #_; * [ napply b1 | napply b2]##]##]
-nqed.
-
-ncoercion uuax : ∀u:uuAx. nAx ≝ uuax on _u : uuAx to nAx.
-
-nlemma eq_rect_Type0_r':
- ∀A.∀a,x.∀p:eq ? x a.∀P: ∀x:A. eq ? x a → Type[0]. P a (refl A a) → P x p.
- #A; #a; #x; #p; ncases p; //;
-nqed.
-
-nlemma eq_rect_Type0_r:
- ∀A.∀a.∀P: ∀x:A. eq ? x a → Type[0]. P a (refl A a) → ∀x.∀p:eq ? x a.P x p.
- #A; #a; #P; #p; #x0; #p0; napply (eq_rect_Type0_r' ??? p0); //.
-nqed.
-
-nrecord memdec (A: Type[0]) (U:Ω^A) : Type[0] ≝
- { decide_mem:> A → bool;
- decide_mem_ok: ∀x. decide_mem x = true → x ∈ U;
- decide_mem_ko: ∀x. decide_mem x = false → ¬ (x ∈ U)
- }.
-
-(*********** end from Cantor ********)
-
-nlemma csc_sym_eq: ∀A,x,y. eq A x y → eq A y x.
- #A; #x; #y; #H; ncases H; @1.
-nqed.
-
-nlemma csc_eq_rect_CProp0_r':
- ∀A.∀a,x.∀p:eq ? x a.∀P: ∀x:A. CProp[0]. P a → P x.
- #A; #a; #x; #p; #P; #H;
- napply (match csc_sym_eq ??? p return λa.λ_.P a with [ refl ⇒ H ]).
-nqed.
-
-nlet rec cover_rect
- (A:uuAx) (U:Ω^(uuax A)) (memdec: memdec … U) (P:uuax A → Type[0])
- (refl: ∀a:uuax A. a ∈ U → P a)
- (infty: ∀a:uuax A.∀i: 𝐈 a.(∀j. 𝐝 a i j ◃ U) → (∀j.P (𝐝 a i j)) → P a)
- (b:uuax A) (p: b ◃ U) on p : P b
-≝ ?.
- nlapply (decide_mem_ok … memdec b); nlapply (decide_mem_ko … memdec b);
- ncases (decide_mem … memdec b)
- [ #_; #H; napply refl; /2/
- | #H; #_; ncut (uuC … b=uuC … b) [//] ncases (uuC … b) in ⊢ (???% → ?)
- [ #E; napply False_rect_Type0; ncut (b=b); //; ncases p in ⊢ (???% → ?)
- [ #a; #K; #E2; napply H; //; nrewrite > E2; //
- ##| #a; #i; #K; #E2; nrewrite < E2 in i; nnormalize; nrewrite > E; nnormalize;
- //]
- ##| #a; #E;
- ncut (a ◃ U)
- [ nlapply E; nlapply (H ?) [//] ncases p
- [ #x; #Hx; #K1; #_; ncases (K1 Hx)
- ##| #x; #i; #Hx; #K1; #E2; napply Hx; ngeneralize in match i; nnormalize;
- nrewrite > E2; nnormalize; /2/ ]##]
- #Hcut;
- nlapply (infty b); nnormalize; nrewrite > E; nnormalize; #H2;
- napply (H2 one); #y
- [ napply Hcut
- ##| napply (cover_rect A U memdec P refl infty a); // ]
- ##| #a; #a1; #E;
- ncut (a ◃ U)
- [ nlapply E; nlapply (H ?) [//] ncases p
- [ #x; #Hx; #K1; #_; ncases (K1 Hx)
- ##| #x; #i; #Hx; #K1; #E2; napply Hx; ngeneralize in match i; nnormalize;
- nrewrite > E2; nnormalize; #_; @1 (true); /2/ ]##]
- #Hcut;
- ncut (a1 ◃ U)
- [ nlapply E; nlapply (H ?) [//] ncases p
- [ #x; #Hx; #K1; #_; ncases (K1 Hx)
- ##| #x; #i; #Hx; #K1; #E2; napply Hx; ngeneralize in match i; nnormalize;
- nrewrite > E2; nnormalize; #_; @1 (false); /2/ ]##]
- #Hcut1;
- nlapply (infty b); nnormalize; nrewrite > E; nnormalize; #H2;
- napply (H2 one); #y; ncases y; nnormalize
- [##1,2: nassumption
- | napply (cover_rect A U memdec P refl infty a); //
- | napply (cover_rect A U memdec P refl infty a1); //]
-nqed.
-
-(********* Esempio:
- let rec skip n =
- match n with
- [ O ⇒ 1
- | S m ⇒
- match m with
- [ O ⇒ skipfact O
- | S _ ⇒ S m * skipfact (pred m) * skipfact (pred m) ]]
-**)
-
-ntheorem psym_plus: ∀n,m. n + m = m + n.//.
-nqed.
-
-nlemma easy1: ∀n:nat. two * (S n) = two + two * n.//.
-nqed.
-
-ndefinition skipfact_dom: uuAx.
- @ nat; #n; ncases n [ napply None | #m; ncases m [ napply (Some … O) | #_; napply (Twice … (pred m) (pred m)) ]
-nqed.
-
-ntheorem skipfact_base_dec:
- memdec (uuax skipfact_dom) (mk_powerclass ? (λx: uuax skipfact_dom. x=O)).
- nnormalize; @ (λx. match x with [ O ⇒ true | S _ ⇒ false ]); #n; nelim n;
- nnormalize; //; #X; ndestruct; #Y; #Z; ndestruct; #W; ndestruct.
-nqed.
-
-ntheorem skipfact_partial:
- ∀n: uuax skipfact_dom. two * n ◃ mk_powerclass ? (λx: uuax skipfact_dom.x=O).
- #n; nelim n; /2/;
- #m; nelim m; nnormalize
- [ #H; @2; nnormalize; ##[//;##] (* XXX: bug auto *)
- #y; *; #a; #E; nrewrite > E; ncases a; nnormalize; //
- ##| #p; #H1; #H2; @2; nnormalize; //;
- #y; *; #a; #E; nrewrite > E; ncases a; nnormalize;
- nrewrite < (plus_n_Sm …); // ]
-nqed.
-
-ndefinition skipfact: ∀n:nat. n ◃ mk_powerclass ? (λx: uuax skipfact_dom.x=O) → nat.
- #n; #D; napply (cover_rect … skipfact_base_dec … n D)
- [ #a; #_; napply natone
- | #a; ncases a
- [ nnormalize; #i; nelim i
- | #m; ncases m
- [ nnormalize; #_; #_; #H; napply H; @1
- | #p; #i; nnormalize in i; #K;
- #H; nnormalize in H;
- napply (S m * H true * H false) ]
-nqed.
-
-nlemma test: skipfact four ? = four * two * two. ##[##2: napply (skipfact_partial two)]//.
-nqed.
\ No newline at end of file
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "arithmetics/nat.ma".
-include "datatypes/bool.ma".
-
-ndefinition two ≝ S (S O).
-ndefinition natone ≝ S O.
-ndefinition four ≝ two * two.
-ndefinition eight ≝ two * four.
-ndefinition natS ≝ S.
-
-include "topology/igft.ma".
-
-nlemma hint_auto2 : ∀T.∀U,V:Ω^T.(∀x.x ∈ U → x ∈ V) → U ⊆ V./2/.nqed.
-
-ninductive Sigma (A: Type[0]) (P: A → CProp[0]) : Type[0] ≝
- mk_Sigma: ∀a:A. P a → Sigma A P.
-
-(*<< To be moved in igft.ma *)
-ninductive ncover (A : nAx) (U : Ω^A) : A → CProp[0] ≝
-| ncreflexivity : ∀a. a ∈ U → ncover A U a
-| ncinfinity : ∀a. ∀i. (∀y.Sigma ? (λj.y = 𝐝 a i j) → ncover A U y) → ncover A U a.
-
-interpretation "ncovers" 'covers a U = (ncover ? U a).
-
-ntheorem ncover_cover_ok: ∀A:nAx.∀U.∀a:A. a ◃ U → cover (Ax_of_nAx A) U a.
- #A; #U; #a; #H; nelim H
- [ #n; #H1; @1; nassumption
- | #a; #i; #IH; #H; @2 [ napply i ]
- nnormalize; #y; *; #j; #E; nrewrite > E;
- napply H;
- /2/ ]
-nqed.
-
-ntheorem cover_ncover_ok: ∀A:Ax.∀U.∀a:A. a ◃ U → ncover (nAx_of_Ax A) U a.
- #A; #U; #a; #H; nelim H
- [ #n; #H1; @1; nassumption
- | #a; #i; #IH; #H; @2 [ napply i ] #y; *; #j; #E; nrewrite > E; ncases j; #x; #K;
- napply H; nnormalize; //.
-nqed.
-
-ndefinition ncoverage : ∀A:nAx.∀U:Ω^A.Ω^A ≝ λA,U.{ a | a ◃ U }.
-
-interpretation "ncoverage cover" 'coverage U = (ncoverage ? U).
-
-(*>> To be moved in igft.ma *)
-
-(*XXX
-nlemma ncover_ind':
- ∀A:nAx.∀U,P:Ω^A.
- (U ⊆ P) → (∀a:A.∀i:𝐈 a.(∀j. 𝐝 a i j ◃ U) → (∀j. 𝐝 a i j ∈ P) → a ∈ P) →
- ◃ U ⊆ P.
- #A; #U; #P; #refl; #infty; #a; #H; nelim H
- [ // | #b; #j; #K1; #K2; napply infty; //; ##]
-nqed.
-
-alias symbol "covers" (instance 3) = "ncovers".
-nlemma cover_ind'':
- ∀A:nAx.∀U:Ω^A.∀P:A → CProp[0].
- (∀a. a ∈ U → P a) → (∀a:A.∀i:𝐈 a.(∀j. 𝐝 a i j ◃ U) → (∀j. P (𝐝 a i j)) → P a) →
- ∀b. b ◃ U → P b.
- #A; #U; #P; nletin V ≝ {x | P x}; napply (ncover_ind' … V).
-nqed.
-*)
-
-(*********** from Cantor **********)
-ninductive eq1 (A : Type[0]) : Type[0] → CProp[0] ≝
-| refl1 : eq1 A A.
-
-notation "hvbox( a break ∼ b)" non associative with precedence 40
-for @{ 'eqT $a $b }.
-
-interpretation "eq between types" 'eqT a b = (eq1 a b).
-
-ninductive unit : Type[0] ≝ one : unit.
-
-ninductive option (A: Type[0]) : Type[0] ≝
- None: option A
- | Some: A → option A
- | Twice: A → A → option A.
-
-nrecord uuAx : Type[1] ≝ {
- uuS : Type[0];
- uuC : uuS → option uuS
-}.
-
-ndefinition uuax : uuAx → nAx.
-#A; @ (uuS A)
- [ #a; napply unit
-##| #a; ncases (uuC … a); nnormalize
- [ #_; napply False
- | #_; #_; napply unit
- | #_; #_; #_; napply bool ]
-##| #a; ncases (uuC … a); nnormalize
- [ #_; #H; napply (False_rect_Type1 … H)
- | #b; #_; #_; napply b
- | #b1; #b2; #_; * [ napply b1 | napply b2]##]##]
-nqed.
-
-ncoercion uuax : ∀u:uuAx. nAx ≝ uuax on _u : uuAx to nAx.
-
-nlemma eq_rect_Type0_r':
- ∀A.∀a,x.∀p:eq ? x a.∀P: ∀x:A. eq ? x a → Type[0]. P a (refl A a) → P x p.
- #A; #a; #x; #p; ncases p; //;
-nqed.
-
-nlemma eq_rect_Type0_r:
- ∀A.∀a.∀P: ∀x:A. eq ? x a → Type[0]. P a (refl A a) → ∀x.∀p:eq ? x a.P x p.
- #A; #a; #P; #p; #x0; #p0; napply (eq_rect_Type0_r' ??? p0); //.
-nqed.
-
-nrecord memdec (A: Type[0]) (U:Ω^A) : Type[0] ≝
- { decide_mem:> A → bool;
- decide_mem_ok: ∀x. decide_mem x = true → x ∈ U;
- decide_mem_ko: ∀x. decide_mem x = false → ¬ (x ∈ U)
- }.
-
-(*********** end from Cantor ********)
-
-nlemma csc_sym_eq: ∀A,x,y. eq A x y → eq A y x.
- #A; #x; #y; #H; ncases H; @1.
-nqed.
-
-nlemma csc_eq_rect_CProp0_r':
- ∀A.∀a,x.∀p:eq ? x a.∀P: ∀x:A. CProp[0]. P a → P x.
- #A; #a; #x; #p; #P; #H;
- napply (match csc_sym_eq ??? p return λa.λ_.P a with [ refl ⇒ H ]).
-nqed.
-
-nlet rec cover_rect
- (A:uuAx) (U:Ω^(uuax A)) (memdec: memdec … U) (P:uuax A → Type[0])
- (refl: ∀a:uuax A. a ∈ U → P a)
- (infty: ∀a:uuax A.∀i: 𝐈 a.(∀j. 𝐝 a i j ◃ U) → (∀j.P (𝐝 a i j)) → P a)
- (b:uuax A) (p: b ◃ U) on p : P b
-≝ ?.
- nlapply (decide_mem_ok … memdec b); nlapply (decide_mem_ko … memdec b);
- ncases (decide_mem … memdec b)
- [ #_; #H; napply refl; /2/
- | #H; #_; ncut (uuC … b=uuC … b) [//] ncases (uuC … b) in ⊢ (???% → ?)
- [ #E;
- nlapply (infty b); nnormalize; nrewrite > E; nnormalize; #H2;
- napply (H2 one); #y; nelim y
- ##| #a; #E;
- ncut (a ◃ U)
- [ nlapply E; nlapply (H ?); //; ncases p
- [ #x; #Hx; #K1; #_; ncases (K1 Hx)
- ##| #x; #i; #Hx; #K1; #E2; napply Hx; ngeneralize in match i; nnormalize;
- nrewrite > E2; nnormalize; /2/ ]##]
- #Hcut;
- nlapply (infty b); nnormalize; nrewrite > E; nnormalize; #H2;
- napply (H2 one); #y
- [ napply Hcut
- ##| napply (cover_rect A U memdec P refl infty a); // ]
- ##| #a; #a1; #E;
- ncut (a ◃ U)
- [ nlapply E; nlapply (H ?) [//] ncases p
- [ #x; #Hx; #K1; #_; ncases (K1 Hx)
- ##| #x; #i; #Hx; #K1; #E2; napply Hx; ngeneralize in match i; nnormalize;
- nrewrite > E2; nnormalize; #_; @1 (true); /2/ ]##]
- #Hcut;
- ncut (a1 ◃ U)
- [ nlapply E; nlapply (H ?) [//] ncases p
- [ #x; #Hx; #K1; #_; ncases (K1 Hx)
- ##| #x; #i; #Hx; #K1; #E2; napply Hx; ngeneralize in match i; nnormalize;
- nrewrite > E2; nnormalize; #_; @1 (false); /2/ ]##]
- #Hcut1;
- nlapply (infty b); nnormalize; nrewrite > E; nnormalize; #H2;
- napply (H2 one); #y; ncases y; nnormalize
- [##1,2: nassumption
- | napply (cover_rect A U memdec P refl infty a); //
- | napply (cover_rect A U memdec P refl infty a1); //]
-nqed.
-
-(********* Esempio:
- let rec skip n =
- match n with
- [ O ⇒ 1
- | S m ⇒
- match m with
- [ O ⇒ skipfact O
- | S _ ⇒ S m * skipfact (pred m) * skipfact (pred m) ]]
-**)
-
-ntheorem psym_plus: ∀n,m. n + m = m + n.//.
-nqed.
-
-nlemma easy1: ∀n:nat. two * (S n) = two + two * n.//.
-nqed.
-
-ndefinition skipfact_dom: uuAx.
- @ nat; #n; ncases n [ napply None | #m; ncases m [ napply (Some … O) | #_; napply (Twice … (pred m) (pred m)) ]
-nqed.
-
-ntheorem skipfact_base_dec:
- memdec (uuax skipfact_dom) (mk_powerclass ? (λx: uuax skipfact_dom. False)).
- nnormalize; @ (λ_.false); //. #_; #H; ndestruct.
-nqed.
-
-ntheorem skipfact_partial:
- ∀n: uuax skipfact_dom. two * n ◃ mk_powerclass ? (λx: uuax skipfact_dom.False).
- #n; nelim n
- [ @2; nnormalize; //; #y; *; #a; ncases a
- |
- #m; nelim m; nnormalize
- [ #H; @2; nnormalize; ##[//;##] (* XXX: bug auto *)
- #y; *; #a; #E; nrewrite > E; ncases a; nnormalize; //
- ##| #p; #H1; #H2; @2; nnormalize; //;
- #y; *; #a; #E; nrewrite > E; ncases a; nnormalize;
- nrewrite < (plus_n_Sm …); // ]
-nqed.
-
-ndefinition skipfact: ∀n:nat. n ◃ mk_powerclass ? (λx: uuax skipfact_dom.False) → nat.
- #n; #D; napply (cover_rect … skipfact_base_dec … n D)
- [ #a; #H; nelim H
- | #a; ncases a
- [ nnormalize; #i; #_; #_; napply natone
- | #m; ncases m
- [ nnormalize; #_; #_; #H; napply H; @1
- | #p; #i; nnormalize in i; #K;
- #H; nnormalize in H;
- napply (S m * H true * H false) ]
-nqed.
-
-nlemma test: skipfact four ? = four * two * two. ##[##2: napply (skipfact_partial two)]//.
-nqed.
\ No newline at end of file
["z"; "ζ"; "𝕫"; "𝐳"; "𝛇"; ] ;
["Z"; "ℨ"; "ℤ"; "𝐙";] ;
["0"; "𝟘"; ] ;
- ["1"; "𝟙"; "¹"] ;
- ["2"; "𝟚"; "²"] ;
- ["3"; "𝟛"; "³"] ;
+ ["1"; "𝟙"; ] ;
+ ["2"; "𝟚"; ] ;
+ ["3"; "𝟛"; ] ;
["4"; "𝟜"; ] ;
["5"; "𝟝"; ] ;
["6"; "𝟞"; ] ;
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| A.Asperti, C.Sacerdoti Coen, *)
-(* ||A|| E.Tassi, S.Zacchiroli *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU Lesser General Public License Version 2.1 *)
-(* *)
-(**************************************************************************)
-
-include "arithmetics/nat.ma".
-
-ninductive Z : Type ≝
- OZ : Z
-| pos : nat → Z
-| neg : nat → Z.
-
-interpretation "Integers" 'Z = Z.
-
-(* TODO: move the following two to datatypes/compare.ma *)
-ninductive compare : Type[0] ≝
-| LT : compare
-| EQ : compare
-| GT : compare.
-
-nlet rec nat_compare n m: compare ≝
-match n with
-[ O ⇒ match m with
- [ O ⇒ EQ
- | (S q) ⇒ LT ]
-| S p ⇒ match m with
- [ O ⇒ GT
- | S q ⇒ nat_compare p q]].
-
-ndefinition Zplus : Z → Z → Z ≝
- λx,y. match x with
- [ OZ ⇒ y
- | pos m ⇒
- match y with
- [ OZ ⇒ x
- | pos n ⇒ (pos (pred ((S m)+(S n))))
- | neg n ⇒
- match nat_compare m n with
- [ LT ⇒ (neg (pred (n-m)))
- | EQ ⇒ OZ
- | GT ⇒ (pos (pred (m-n)))] ]
- | neg m ⇒
- match y with
- [ OZ ⇒ x
- | pos n ⇒
- match nat_compare m n with
- [ LT ⇒ (pos (pred (n-m)))
- | EQ ⇒ OZ
- | GT ⇒ (neg (pred (m-n)))]
- | neg n ⇒ (neg (pred ((S m)+(S n))))] ].
-
-interpretation "integer plus" 'plus x y = (Zplus x y).
-
-ndefinition Z_of_nat ≝
-λn. match n with
-[ O ⇒ OZ
-| S n ⇒ pos n].
-
-nlemma fails : ∀p. p + Z_of_nat 1 = Z_of_nat 1 + p.
-#p;nnormalize;
+++ /dev/null
-(**************************************************************************)
-(* ___ *)
-(* ||M|| *)
-(* ||A|| A project by Andrea Asperti *)
-(* ||T|| *)
-(* ||I|| Developers: *)
-(* ||T|| The HELM team. *)
-(* ||A|| http://helm.cs.unibo.it *)
-(* \ / *)
-(* \ / This file is distributed under the terms of the *)
-(* v GNU General Public License Version 2 *)
-(* *)
-(**************************************************************************)
-
-include "logic/pts.ma".
-
-(*naxiom foo : ?.
-##[##2:napply Prop;##|##skip]
-nqed.*)
-
-(*nlemma foo : ? → Prop.
-##[#a;*)
-
-ninductive eq (A:Type[2]) (x:A) : A → Prop ≝
-| refl : eq A x x.
-
-ninductive nat : Type[0] ≝
-| O : nat
-| S : nat → nat.
-
-(*ninductive pippo : nat → Type[1] ≝
-| pO : pippo O
-| pSS : ∀n.pippo n → pippo (S (S n)).
-*)
-
-ninductive list (A:Type[0]) : Type[0] ≝
-| nil : list A
-| cons : A → list A → list A.
-
-ninductive False : Prop ≝ .
-
-naxiom daemon : False.
-
-ninductive in_list (A:Type[0]) : A → list A → Prop ≝
-| in_list_head : ∀x,l.in_list A x (cons A x l)
-| in_list_cons : ∀x,y,l.in_list A x l → in_list A x (cons A y l).
-
-ninductive ppippo : nat → Prop ≝
-| ppO : ppippo O
-| ppSS : ∀n.ppippo n → ppippo (S (S n)).
-
-ndefinition Not : Prop → Prop ≝ λP.P → False.
-
-ninductive Typ : Type[0] ≝
-| TVar : nat → Typ
-| TFree : nat → Typ
-| Top : Typ
-| Arrow : Typ → Typ → Typ
-| Forall : Typ → Typ → Typ.
-
-ninductive bool : Type[0] ≝
-| true : bool
-| false : bool.
-
-nrecord bound : Type ≝ {
- istype : bool; (* is subtyping bound? *)
- name : nat ; (* name *)
- btype : Typ (* type to which the name is bound *)
- }.
-
-nlet rec eqb m n ≝
- match m with
- [ O ⇒ match n with
- [ O ⇒ true
- | S q ⇒ false ]
- | S p ⇒ match n with
- [ O ⇒ false
- | S q ⇒ eqb p q ]].
-
-(*** Various kinds of substitution, not all will be used probably ***)
-
-(* substitutes i-th dangling index in type T with type U *)
-nlet rec subst_type_nat T U i ≝
- match T with
- [ TVar n ⇒ match eqb n i with
- [ true ⇒ U
- | false ⇒ T]
- | TFree X ⇒ T
- | Top ⇒ T
- | Arrow T1 T2 ⇒ Arrow (subst_type_nat T1 U i) (subst_type_nat T2 U i)
- | Forall T1 T2 ⇒ Forall (subst_type_nat T1 U i) (subst_type_nat T2 U (S i)) ].
-
-nlet rec map A B f (l : list A) on l : list B ≝
- match l with [ nil ⇒ nil ? | cons x tl ⇒ cons ? (f x) (map ?? f tl)].
-
-nlet rec foldr (A,B:Type[0]) f b (l : list A) on l : B ≝
- match l with [ nil ⇒ b | (cons a l) ⇒ f a (foldr A B f b l)].
-
-ndefinition length ≝ λT:Type.λl:list T.foldr T nat (λx,c.S c) O l.
-
-ndefinition filter \def
- \lambda T:Type.\lambda l:list T.\lambda p:T \to bool.
- foldr T (list T)
- (\lambda x,l0.match (p x) with [ true => cons ? x l0 | false => l0]) (nil ?) l.
-
-
-(*** definitions about lists ***)
-
-ndefinition filter_types : list bound → list bound ≝
- λG.(filter ? G (λB.match B with [mk_bound B X T ⇒ B])).
-
-ndefinition fv_env : list bound → list nat ≝
- λG.(map ? ? (λb.match b with [mk_bound B X T ⇒ X]) (filter_types G)).
-
-nlet rec append A (l1: list A) l2 on l1 :=
- match l1 with
- [ nil => l2
- | (cons hd tl) => cons ? hd (append A tl l2) ].
-
-nlet rec fv_type T ≝
- match T with
- [TVar n ⇒ nil ?
- |TFree x ⇒ cons ? x (nil ?)
- |Top ⇒ nil ?
- |Arrow U V ⇒ append ? (fv_type U) (fv_type V)
- |Forall U V ⇒ append ? (fv_type U) (fv_type V)].
-
-(*** Type Well-Formedness judgement ***)
-
-ninductive WFType : list bound → Typ → Prop ≝
- | WFT_TFree : ∀X,G.in_list ? X (fv_env G) → WFType G (TFree X)
- | WFT_Top : ∀G.WFType G Top
- | WFT_Arrow : ∀G,T,U.WFType G T → WFType G U → WFType G (Arrow T U)
- | WFT_Forall : ∀G,T,U.WFType G T →
- (∀X:nat.
- (Not (in_list ? X (fv_env G))) →
- (Not (in_list ? X (fv_type U))) →
- (WFType (cons ? (mk_bound true X T) G)
- (subst_type_nat U (TFree X) O))) →
- (WFType G (Forall T U)).
-
-ninductive WFEnv : list bound → Prop ≝
- | WFE_Empty : WFEnv (nil ?)
- | WFE_cons : ∀B,X,T,G.WFEnv G → Not (in_list ? X (fv_env G)) →
- WFType G T → WFEnv (cons ? (mk_bound B X T) G).
-
-(*** Subtyping judgement ***)
-ninductive JSubtype : list bound → Typ → Typ → Prop ≝
- | SA_Top : ∀G,T.WFEnv G → WFType G T → JSubtype G T Top
- | SA_Refl_TVar : ∀G,X.WFEnv G → in_list ? X (fv_env G)
- → JSubtype G (TFree X) (TFree X)
- | SA_Trans_TVar : ∀G,X,T,U.in_list ? (mk_bound true X U) G →
- JSubtype G U T → JSubtype G (TFree X) T
- | SA_Arrow : ∀G,S1,S2,T1,T2. JSubtype G T1 S1 → JSubtype G S2 T2 →
- JSubtype G (Arrow S1 S2) (Arrow T1 T2)
- | SA_All : ∀G,S1,S2,T1,T2. JSubtype G T1 S1 →
- (∀X.Not (in_list ? X (fv_env G)) →
- JSubtype (cons ? (mk_bound true X T1) G)
- (subst_type_nat S2 (TFree X) O) (subst_type_nat T2 (TFree X) O)) →
- JSubtype G (Forall S1 S2) (Forall T1 T2).
-
-inductive jmeq (A:Type) (a:A) : ∀B:Type.B → Prop ≝
-| refl_jmeq : jmeq A a A a.
-
-ninverter JS_indinv for JSubtype (%?%).
-
-(*** ***)
-
-ninverter dasd for pippo (?) : Type.
-
-inductive nat : Type ≝
-| O : nat
-| S : nat → nat.
-
-inductive ppippo : nat → Prop ≝
-| ppO : ppippo O
-| ppSS : ∀n.ppippo n → ppippo (S (S n)).
-
-nlemma pippo_inv : ∀x.∀P:? → Prop.? → ? → ? → P x.
-##[ (* ok, qui bisogna selezionare la meta del goal *)
- #x;#P;#H1;#H2;#H;
- napply ((λHcut:(eqn ? x x → P x).?) ?);
- ##[(* questa e` la meta cut *)
- nletin p ≝ pippo_ind;
- napply (pippo_ind (λy,p.eqn ? x y → P y) H1 H2 … H);
- (* [ * cons 1 *
- napply H1
- | * cons 2 *
- napply H2
- | * inductive term *
- napply H ] *)
- ##| napply Hcut; napply nrefl_eq]
- ##]
- ##skip;
-nqed.
projects / helm.git / commitdiff
